diff --git a/Notebooks/RUHF_EPSpherium.nb b/Notebooks/RUHF_EPSpherium.nb new file mode 100644 index 0000000..5168e05 --- /dev/null +++ b/Notebooks/RUHF_EPSpherium.nb @@ -0,0 +1,85152 @@ +(* Content-type: application/vnd.wolfram.mathematica *) + +(*** Wolfram Notebook File ***) +(* http://www.wolfram.com/nb *) + +(* CreatedBy='Mathematica 12.1' *) + +(*CacheID: 234*) +(* Internal cache information: +NotebookFileLineBreakTest +NotebookFileLineBreakTest +NotebookDataPosition[ 158, 7] +NotebookDataLength[ 4216520, 85144] +NotebookOptionsPosition[ 4142755, 83940] +NotebookOutlinePosition[ 4143219, 83958] +CellTagsIndexPosition[ 4143176, 83955] +WindowFrame->Normal*) + +(* Beginning of Notebook Content *) +Notebook[{ + +Cell[CellGroupData[{ +Cell["Initialisation", "Title", + CellChangeTimes->{{3.799388789459779*^9, + 3.799388801761128*^9}},ExpressionUUID->"16dce8c1-32b6-49d8-81b0-\ +4ab61451eb68"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["Y", + RowBox[{"\[ScriptL]_", ",", "m_"}]], "[", + RowBox[{"\[Theta]_", ",", "\[Phi]_"}], "]"}], "=", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"\[ScriptL]", ",", "m", ",", "\[Theta]", ",", "\[Phi]"}], "]"}]}], + ";"}]], "Input", + InitializationCell->True, + CellLabel->"In[1]:=",ExpressionUUID->"80ad60af-86a2-4fda-8827-489ce9a5dc31"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["Y", "\[ScriptL]_"], "[", "\[Theta]_", "]"}], "=", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"\[ScriptL]", ",", "0", ",", "\[Theta]", ",", "\[Phi]"}], "]"}]}], + ";"}]], "Input", + InitializationCell->True, + CellLabel->"In[2]:=",ExpressionUUID->"e3c918f7-5418-4fe0-a7f0-83630d2402d3"], + +Cell[BoxData[{ + RowBox[{"Needs", "[", "\"\\"", "]"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"SetOptions", "[", + RowBox[{"MaTeX", ",", + RowBox[{"\"\\"", "\[Rule]", + RowBox[{"{", + RowBox[{ + "\"\<\\\\usepackage{amssymb,amsmath,latexsym,amsfonts,amsthm,mathpazo,\ +xcolor,bm,mhchem}\>\"", ",", + "\"\<\\\\definecolor{darkgreen}{RGB}{0, 180, 0}\>\"", ",", + "\"\<\\\\definecolor{darkcyan}{RGB}{0, 180, 180}\>\"", ",", + "\"\<\\\\definecolor{darkmagenta}{RGB}{180,0, 180}\>\""}], "}"}]}]}], + "]"}], ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{3.804247120805704*^9}, + CellLabel->"In[3]:=",ExpressionUUID->"4b3fa302-b0b1-4b48-afcc-dd7d3cb6f69e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Useful calculs and results", "Title", + CellChangeTimes->{{3.799992410899127*^9, + 3.799992442032549*^9}},ExpressionUUID->"d67f97ba-1e03-42ba-af26-\ +2ba27f192a75"], + +Cell[CellGroupData[{ + +Cell["Hyperspherical rotation matrix", "Section", + CellChangeTimes->{{3.799493178147408*^9, 3.799493183312126*^9}, { + 3.799992458378956*^9, + 3.799992462302994*^9}},ExpressionUUID->"3c74c21e-9502-4bc9-a659-\ +650e70b4ea0c"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"mapping", "=", + RowBox[{"CoordinateTransformData", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\"\\"", "\[Rule]", "\"\\""}], ",", + "3"}], "}"}], ",", "\"\\""}], "]"}]}]], "Input", + CellChangeTimes->{{3.799493187322681*^9, 3.7994932652664557`*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"d885c70d-1710-499c-a414-e4316bd418c4"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"#1", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], + "]"}], " ", + RowBox[{"#1", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], + ",", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"#1", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], + "]"}], " ", + RowBox[{"Sin", "[", + RowBox[{"#1", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], + "]"}], " ", + RowBox[{"#1", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], + ",", + RowBox[{ + RowBox[{"Sin", "[", + RowBox[{"#1", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], + "]"}], " ", + RowBox[{"Sin", "[", + RowBox[{"#1", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], + "]"}], " ", + RowBox[{"#1", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}]}], + "}"}], "&"}]], "Output", + CellChangeTimes->{{3.799493191756102*^9, 3.799493265620201*^9}, + 3.801298298861149*^9}, + CellLabel->"Out[32]=",ExpressionUUID->"d5fead00-b3a6-4446-b4ca-0ce7b6b6d160"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"MatrixForm", "[", + RowBox[{"rotation", "=", + RowBox[{"CoordinateTransformData", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + "\"\\"", "\[Rule]", " ", "\"\\""}], ",", + "4"}], "}"}], ",", "\"\\"", ",", + RowBox[{"{", + RowBox[{"r", ",", "\[Theta]", ",", "\[Phi]", ",", "\[Alpha]"}], "}"}]}], + "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.799493480145965*^9, 3.799493492764624*^9}, { + 3.799493527696116*^9, 3.799493556248288*^9}, {3.799493662588883*^9, + 3.799493666588726*^9}, {3.799493766855884*^9, 3.799493786012108*^9}, { + 3.799493973726797*^9, 3.799493997879751*^9}}, + CellLabel->"In[33]:=",ExpressionUUID->"a18716d3-6a39-495f-8f4e-6a966becdb15"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"Cos", "[", "\[Theta]", "]"}], + RowBox[{ + RowBox[{"Cos", "[", "\[Phi]", "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]", "]"}]}], + RowBox[{ + RowBox[{"Cos", "[", "\[Alpha]", "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]", "]"}], " ", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}], + RowBox[{ + RowBox[{"Sin", "[", "\[Alpha]", "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]", "]"}], " ", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}]}, + { + RowBox[{"-", + RowBox[{"Sin", "[", "\[Theta]", "]"}]}], + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", + RowBox[{"Cos", "[", "\[Phi]", "]"}]}], + RowBox[{ + RowBox[{"Cos", "[", "\[Alpha]", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}], + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", + RowBox[{"Sin", "[", "\[Alpha]", "]"}], " ", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}]}, + {"0", + RowBox[{"-", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}], + RowBox[{ + RowBox[{"Cos", "[", "\[Alpha]", "]"}], " ", + RowBox[{"Cos", "[", "\[Phi]", "]"}]}], + RowBox[{ + RowBox[{"Cos", "[", "\[Phi]", "]"}], " ", + RowBox[{"Sin", "[", "\[Alpha]", "]"}]}]}, + {"0", "0", + RowBox[{"-", + RowBox[{"Sin", "[", "\[Alpha]", "]"}]}], + RowBox[{"Cos", "[", "\[Alpha]", "]"}]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{ + 3.799493495705141*^9, {3.799493539086556*^9, 3.79949355674233*^9}, + 3.799493667545238*^9, {3.799493767980646*^9, 3.7994937868716507`*^9}, + 3.799493974539198*^9, 3.799494004791428*^9, 3.801298299423567*^9}, + CellLabel-> + "Out[33]//MatrixForm=",ExpressionUUID->"692af3ef-045e-4764-8352-\ +7f7255bd65ac"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"MatrixForm", "[", + RowBox[{"rotation", "=", + RowBox[{"CoordinateTransformData", "[", + RowBox[{ + RowBox[{"\"\\"", "\[Rule]", " ", "\"\\""}], ",", + "\"\\"", ",", + RowBox[{"{", + RowBox[{"r", ",", "\[Theta]", ",", "\[Phi]"}], "}"}]}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.7994940266067*^9, 3.799494033254299*^9}, + 3.7995493171257067`*^9}, + CellLabel->"In[34]:=",ExpressionUUID->"e45051e9-76b7-4644-ab40-79b851ee4e1f"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{ + RowBox[{"Cos", "[", "\[Phi]", "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]", "]"}]}], + RowBox[{ + RowBox[{"Sin", "[", "\[Theta]", "]"}], " ", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}], + RowBox[{"Cos", "[", "\[Theta]", "]"}]}, + { + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", + RowBox[{"Cos", "[", "\[Phi]", "]"}]}], + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]", "]"}], " ", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}], + RowBox[{"-", + RowBox[{"Sin", "[", "\[Theta]", "]"}]}]}, + { + RowBox[{"-", + RowBox[{"Sin", "[", "\[Phi]", "]"}]}], + RowBox[{"Cos", "[", "\[Phi]", "]"}], "0"} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.799494034063278*^9, 3.8012982998933887`*^9}, + CellLabel-> + "Out[34]//MatrixForm=",ExpressionUUID->"5d5c64b4-8720-404c-aa67-\ +eaa2ad14bff5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"MatrixForm", "[", + RowBox[{"rotation", "=", + RowBox[{"CoordinateTransformData", "[", + RowBox[{ + RowBox[{"\"\\"", "\[Rule]", " ", "\"\\""}], ",", + "\"\\"", ",", + RowBox[{"{", + RowBox[{"r", ",", "\[Theta]"}], "}"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.7995493233625097`*^9, 3.79954933154604*^9}}, + CellLabel->"In[35]:=",ExpressionUUID->"82d466d4-7d32-479e-93a7-5759e9c1f0d8"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"Cos", "[", "\[Theta]", "]"}], + RowBox[{"Sin", "[", "\[Theta]", "]"}]}, + { + RowBox[{"-", + RowBox[{"Sin", "[", "\[Theta]", "]"}]}], + RowBox[{"Cos", "[", "\[Theta]", "]"}]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.799549335916635*^9, 3.8012983002429323`*^9}, + CellLabel-> + "Out[35]//MatrixForm=",ExpressionUUID->"2218a806-c790-41d1-8dbd-\ +4d365289cad3"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Two electron integrals", "Section", + CellChangeTimes->{{3.799389075535295*^9, + 3.799389079742866*^9}},ExpressionUUID->"844fe8d0-f3cb-4eb1-9e94-\ +a26f5035c4ce"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{"(", + RowBox[{"ij", "|", "kl"}], ")"}], "=", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"i", ",", "0"}]], "[", + RowBox[{ + SubscriptBox["\[Theta]", "1"], ",", + SubscriptBox["\[Phi]", "1"]}], "]"}], "R"], + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"j", ",", "0"}]], "[", + RowBox[{ + SubscriptBox["\[Theta]", "1"], ",", + SubscriptBox["\[Phi]", "1"]}], "]"}], "R"]}], "|", + FractionBox["1", + SubscriptBox["r", "12"]], "|", + RowBox[{ + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"k", ",", "0"}]], "[", + RowBox[{ + RowBox[{"\[Pi]", "-", + SubscriptBox["\[Theta]", "2"]}], ",", + SubscriptBox["\[Phi]", "2"]}], "]"}], "R"], + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"l", ",", "0"}]], "[", + RowBox[{ + RowBox[{"\[Pi]", "-", + SubscriptBox["\[Theta]", "2"]}], ",", + SubscriptBox["\[Phi]", "2"]}], "]"}], "R"]}]}], + ")"}]}], "\[IndentingNewLine]", + RowBox[{" ", + RowBox[{"=", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", + RowBox[{"2", "\[Pi]"}]], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", + RowBox[{"2", "\[Pi]"}]], + RowBox[{ + RowBox[{ + SubscriptBox["Y", "i"], "[", + SubscriptBox["\[Theta]", "1"], "]"}], + RowBox[{ + SubscriptBox["Y", "j"], "[", + SubscriptBox["\[Theta]", "1"], "]"}], + RowBox[{"(", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "\[Pi]"}], + RowBox[{ + RowBox[{"2", "L"}], "+", "1"}]], + RowBox[{ + SubscriptBox["Y", "L"], "[", + SubscriptBox["\[Theta]", "1"], "]"}], + RowBox[{ + SubscriptBox["Y", "L"], "[", + SubscriptBox["\[Theta]", "2"], "]"}]}]}], ")"}], + RowBox[{ + SubscriptBox["Y", "k"], "[", + SubscriptBox["\[Theta]", "2"], "]"}], + RowBox[{ + SubscriptBox["Y", "l"], "[", + SubscriptBox["\[Theta]", "2"], "]"}], + RowBox[{"Sin", "[", + SubscriptBox["\[Theta]", "1"], "]"}], + RowBox[{"Sin", "[", + SubscriptBox["\[Theta]", "2"], "]"}], + RowBox[{"\[DifferentialD]", + SubscriptBox["\[Phi]", "2"]}], + RowBox[{"\[DifferentialD]", + SubscriptBox["\[Theta]", "2"]}], + RowBox[{"\[DifferentialD]", + SubscriptBox["\[Phi]", "1"]}], + RowBox[{"\[DifferentialD]", + + SubscriptBox["\[Theta]", + "1"]}]}]}]}]}]}]}]}]}], "\[IndentingNewLine]", + RowBox[{"\t ", + RowBox[{"=", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], "R"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "\[Pi]"}], + RowBox[{ + RowBox[{"2", "L"}], "+", "1"}]], + RowBox[{"(", + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", + RowBox[{"2", "\[Pi]"}]], + RowBox[{ + RowBox[{ + SubscriptBox["Y", "i"], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", "j"], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", "L"], "[", "\[Theta]", "]"}], + RowBox[{"Sin", "[", "\[Theta]", "]"}], + RowBox[{"\[DifferentialD]", "\[Phi]"}], + RowBox[{"\[DifferentialD]", "\[Theta]"}]}]}]}], ")"}], + RowBox[{"(", + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", + RowBox[{"2", "\[Pi]"}]], + RowBox[{ + RowBox[{ + SubscriptBox["Y", "k"], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", "l"], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", "L"], "[", "\[Theta]", "]"}], + RowBox[{"Sin", "[", "\[Theta]", "]"}], + RowBox[{"\[DifferentialD]", "\[Phi]"}], + RowBox[{"\[DifferentialD]", "\[Theta]"}]}]}]}], + ")"}]}]}]}]}]}], "\[IndentingNewLine]", + RowBox[{"\t ", + RowBox[{"=", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "\[Infinity]"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"i", "j", "L"}, + {"0", "0", "0"} + }], "\[NoBreak]", ")"}], "2"], + SuperscriptBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"k", "l", "L"}, + {"0", "0", "0"} + }], "\[NoBreak]", ")"}], "2"]}]}]}]}]}]}], "Input", + CellChangeTimes->{{3.798972130817108*^9, 3.798972160573216*^9}, { + 3.7989721934935513`*^9, 3.798972220713028*^9}, {3.79897234708609*^9, + 3.798972355492897*^9}, {3.7993956285506763`*^9, 3.7993956316266737`*^9}}, + EmphasizeSyntaxErrors->True, + CellLabel->"In[36]:=",ExpressionUUID->"c9b257fd-5638-4f66-ba9e-a268c80376cb"], + +Cell[BoxData[ + TemplateBox[{ + "Set", "altno", + "\"Use multiple sets instead of Alternatives in \ +\\!\\(\\*RowBox[{\\\"ij\\\", \\\"|\\\", \\\"kl\\\"}]\\).\"", 2, 36, 1, + 22564386845442116828, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.801298300607183*^9}, + CellLabel-> + "During evaluation of \ +In[36]:=",ExpressionUUID->"d364e640-37f9-4f76-9665-427d6edb053b"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"i", ",", "0", ",", + SubscriptBox["\[Theta]", "1"], ",", + SubscriptBox["\[Phi]", "1"]}], "]"}], " ", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"j", ",", "0", ",", + SubscriptBox["\[Theta]", "1"], ",", + SubscriptBox["\[Phi]", "1"]}], "]"}]}], + SuperscriptBox["R", "2"]], "|", + FractionBox["1", + SubscriptBox["r", "12"]], "|", + FractionBox[ + RowBox[{ + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"k", ",", "0", ",", + RowBox[{"\[Pi]", "-", + SubscriptBox["\[Theta]", "2"]}], ",", + SubscriptBox["\[Phi]", "2"]}], "]"}], " ", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"l", ",", "0", ",", + RowBox[{"\[Pi]", "-", + SubscriptBox["\[Theta]", "2"]}], ",", + SubscriptBox["\[Phi]", "2"]}], "]"}]}], + SuperscriptBox["R", "2"]]}]], "Output", + CellChangeTimes->{3.801298301000825*^9}, + CellLabel->"Out[36]=",ExpressionUUID->"7cfbeb1e-1755-4c48-a5c2-f45e30e03619"] +}, Open ]], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"(", + RowBox[{"im", ",", + RowBox[{"jn", "|", "ko"}], ",", "lp"}], ")"}], "=", + RowBox[{"(", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"i", ",", "m"}]], "[", + RowBox[{ + SubscriptBox["\[Theta]", "1"], ",", + SubscriptBox["\[Phi]", "1"]}], "]"}], "R"], + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"j", ",", "n"}]], "[", + RowBox[{ + SubscriptBox["\[Theta]", "1"], ",", + SubscriptBox["\[Phi]", "1"]}], "]"}], "R"]}], "|", + FractionBox["1", + SubscriptBox["r", "12"]], "|", + RowBox[{ + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"k", ",", "o"}]], "[", + RowBox[{ + RowBox[{"\[Pi]", "-", + SubscriptBox["\[Theta]", "2"]}], ",", + SubscriptBox["\[Phi]", "2"]}], "]"}], "R"], + FractionBox[ + RowBox[{ + SubscriptBox["Y", + RowBox[{"l", ",", "p"}]], "[", + RowBox[{ + RowBox[{"\[Pi]", "-", + SubscriptBox["\[Theta]", "2"]}], ",", + SubscriptBox["\[Phi]", "2"]}], "]"}], "R"]}]}], + ")"}]}], "\[IndentingNewLine]", + RowBox[{" ", + RowBox[{"=", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], "R"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "\[Infinity]"], + RowBox[{ + FractionBox[ + RowBox[{"4", "\[Pi]"}], + RowBox[{ + RowBox[{"2", "L"}], "+", "1"}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"M", "=", + RowBox[{"-", "L"}]}], "L"], + RowBox[{ + RowBox[{"(", + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", + RowBox[{"2", "\[Pi]"}]], + RowBox[{ + RowBox[{ + SubscriptBox["Y", + RowBox[{"i", ",", "m"}]], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", + RowBox[{"j", ",", "n"}]], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", + RowBox[{"L", ",", "M"}]], "[", "\[Theta]", "]"}], + RowBox[{"Sin", "[", "\[Theta]", "]"}], + RowBox[{"\[DifferentialD]", "\[Phi]"}], + RowBox[{"\[DifferentialD]", "\[Theta]"}]}]}]}], ")"}], + RowBox[{"(", + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", + RowBox[{"2", "\[Pi]"}]], + RowBox[{ + RowBox[{ + SubscriptBox["Y", + RowBox[{"k", ",", "o"}]], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", + RowBox[{"l", ",", "p"}]], "[", "\[Theta]", "]"}], + RowBox[{ + SubscriptBox["Y", + RowBox[{"L", ",", "M"}]], "[", "\[Theta]", "]"}], + RowBox[{"Sin", "[", "\[Theta]", "]"}], + RowBox[{"\[DifferentialD]", "\[Phi]"}], + RowBox[{"\[DifferentialD]", "\[Theta]"}]}]}]}], + ")"}]}]}]}]}]}]}]}], "\[IndentingNewLine]", + RowBox[{"\t ", + RowBox[{"=", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], + RowBox[{"Max", "[", + RowBox[{ + RowBox[{"i", "+", "j"}], ",", + RowBox[{"k", "+", "l"}]}], "]"}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"M", "=", + RowBox[{"-", "L"}]}], "L"], + RowBox[{ + SuperscriptBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"i", "j", "L"}, + {"m", "n", "M"} + }], "\[NoBreak]", ")"}], "2"], + SuperscriptBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"k", "l", "L"}, + {"o", "p", "M"} + }], "\[NoBreak]", ")"}], "2"]}]}]}]}]}]}]}], "Input", + CellChangeTimes->{{3.7993952263805532`*^9, 3.7993952967622223`*^9}, { + 3.799395336550023*^9, 3.799395338797583*^9}, {3.799395593684607*^9, + 3.799395696231195*^9}, {3.799395726541176*^9, 3.7993957975706387`*^9}}, + EmphasizeSyntaxErrors->True, + CellLabel->"In[37]:=",ExpressionUUID->"f3e4fc84-acd8-47e3-a94c-8b95c14b97ab"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"TEIu", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i_", ",", "m_"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j_", ",", "n_"}], "}"}], ",", + RowBox[{"{", + RowBox[{"k_", ",", "o_"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l_", ",", "p_"}], "}"}]}], "]"}], ":=", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", + RowBox[{"Max", "[", + RowBox[{ + RowBox[{"Abs", "[", + RowBox[{"i", "-", "j"}], "]"}], ",", + RowBox[{"Abs", "[", + RowBox[{"k", "-", "l"}], "]"}]}], "]"}]}], + RowBox[{"Min", "[", + RowBox[{ + RowBox[{"i", "+", "j"}], ",", + RowBox[{"k", "+", "l"}]}], "]"}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"M", "=", + RowBox[{"-", "L"}]}], "L"], + RowBox[{ + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "m"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "n"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "M"}], "}"}]}], "]"}], "2"], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"k", ",", "o"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "p"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "M"}], "}"}]}], "]"}], "2"]}]}]}]}]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.7993958027605*^9, 3.7993959343780413`*^9}, + 3.7993969944327106`*^9, {3.799397079357765*^9, 3.7993971092830963`*^9}, { + 3.79939740140565*^9, 3.79939742366696*^9}, {3.799397456139041*^9, + 3.799397492879713*^9}}, + CellLabel->"In[5]:=",ExpressionUUID->"28efe04f-fdbf-4afb-ad7d-2abba99fee3c"], + +Cell[TextData[{ + "Without the spherium shortcuts (\[Pi] - ", + Cell[BoxData[ + FormBox[ + SubscriptBox["\[Theta]", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "3753181a-7437-4990-95d0-3698493e526a"], + ") there are no ", + Cell[BoxData[ + FormBox[ + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], " ", "factor"}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "d35a50b8-a236-471b-8532-d70d46f19721"] +}], "Text", + CellChangeTimes->{{3.799992677359459*^9, + 3.79999272317367*^9}},ExpressionUUID->"13696ba3-1f41-49ff-b5aa-\ +247dca623925"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"TEIr", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i_", ",", "m_"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j_", ",", "n_"}], "}"}], ",", + RowBox[{"{", + RowBox[{"k_", ",", "o_"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l_", ",", "p_"}], "}"}], ",", "R_"}], "]"}], ":=", + RowBox[{ + FractionBox["1", "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", + RowBox[{"Max", "[", + RowBox[{ + RowBox[{"Abs", "[", + RowBox[{"i", "-", "j"}], "]"}], ",", + RowBox[{"Abs", "[", + RowBox[{"k", "-", "l"}], "]"}]}], "]"}]}], + RowBox[{"Min", "[", + RowBox[{ + RowBox[{"i", "+", "j"}], ",", + RowBox[{"k", "+", "l"}]}], "]"}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"M", "=", + RowBox[{"-", "L"}]}], "L"], + RowBox[{ + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "m"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "n"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "M"}], "}"}]}], "]"}], "2"], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"k", ",", "o"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "p"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "M"}], "}"}]}], "]"}], "2"]}]}]}]}]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.7993971190029287`*^9, 3.7993971191491623`*^9}, { + 3.799397473949041*^9, 3.799397511445822*^9}, {3.801392801358354*^9, + 3.801392802429214*^9}}, + CellLabel->"In[6]:=",ExpressionUUID->"8fd7199b-136d-46ea-b887-2f3fba74f761"], + +Cell[CellGroupData[{ + +Cell["Minimal basis verification", "Subsubsection", + CellChangeTimes->{{3.7993972452010527`*^9, 3.799397248670454*^9}, { + 3.7999927509760513`*^9, + 3.7999927721765633`*^9}},ExpressionUUID->"df63035a-1fc6-43ef-a84d-\ +d3f08d517f21"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], ",", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "}"}]], "Input", + CellChangeTimes->{3.7999928196258497`*^9, 3.799993152171343*^9}, + CellLabel->"In[39]:=",ExpressionUUID->"63b49f2e-34fe-45b8-9472-e38d5bfd391d"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"2", " ", + SqrtBox["\[Pi]"]}]], ",", + RowBox[{ + FractionBox["1", "2"], " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], "}"}]], "Output", + CellChangeTimes->{3.799992820677084*^9, 3.801298301432296*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"0b91233b-d1f4-4af1-baad-4f1c5b2f4926"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "\[Mu]"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "\[Nu]"], "[", "\[Theta]1", "]"}], + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + FractionBox["1", "4"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}]}], ")"}]}]}], + ")"}], " ", + RowBox[{ + SubscriptBox["\[Psi]", "\[Lambda]"], "[", "\[Theta]2", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "\[Sigma]"], "[", "\[Theta]2", "]"}], + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "2"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.7993973283348017`*^9, 3.799397330937827*^9}, { + 3.799397536446756*^9, 3.799397536800218*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"846899ea-4557-4a5d-a656-61004b83f6f6"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["1", "R"]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"3", " ", "R"}]], ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", + + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"3", " ", "R"}]], ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], "}"}]}], "}"}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.799397348946137*^9, 3.7993975594488287`*^9, + 3.801298322084158*^9}, + CellLabel->"Out[40]=",ExpressionUUID->"3eb3b03a-f6fe-4027-a3f8-f07757fef3b7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"TEIr", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.7993973597077627`*^9, 3.7993973598265257`*^9}, { + 3.7993975402874813`*^9, 3.799397540494282*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"6d0f8a35-4401-473a-9174-b9f5cd75aa52"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 41, 4, + 22564386845442116828, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.801298322533474*^9}, + CellLabel-> + "During evaluation of \ +In[41]:=",ExpressionUUID->"e4c9d9c7-11a8-48da-9c56-31ede496dfe7"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 41, 5, + 22564386845442116828, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.801298322899742*^9}, + CellLabel-> + "During evaluation of \ +In[41]:=",ExpressionUUID->"7669b32b-557b-431a-8e5d-657ac4d4e959"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"1\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 41, 6, + 22564386845442116828, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8012983232568417`*^9}, + CellLabel-> + "During evaluation of \ +In[41]:=",ExpressionUUID->"8f727b4f-ae13-4277-9660-4019ee9fb558"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"phy\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 41, 7, 22564386845442116828, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8012983235782127`*^9}, + CellLabel-> + "During evaluation of \ +In[41]:=",ExpressionUUID->"2e17d0f1-44b7-417a-a615-3cd938948c77"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["1", "R"]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"3", " ", "R"}]], ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", + + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"3", " ", "R"}]], ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], "}"}]}], "}"}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{ + 3.799397360499398*^9, {3.799397501379059*^9, 3.799397515457122*^9}, + 3.799397559536655*^9, 3.801298323906097*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"157d73c1-19c0-47cb-872c-82cc90436f66"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "\[Mu]"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "\[Nu]"], "[", "\[Theta]1", "]"}], + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + FractionBox["1", "4"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}]}], ")"}]}]}], + ")"}], " ", + RowBox[{ + SubscriptBox["\[Psi]", "\[Lambda]"], "[", + RowBox[{"\[Pi]", "-", "\[Theta]2"}], "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "\[Sigma]"], "[", + RowBox[{"\[Pi]", "-", "\[Theta]2"}], "]"}], + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "2"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.799395025772976*^9, 3.7993950325994787`*^9}, { + 3.7993952047044163`*^9, 3.799395210603614*^9}, {3.799397041838778*^9, + 3.7993970530167723`*^9}, {3.799397547564001*^9, 3.799397547830676*^9}}, + CellLabel->"In[42]:=",ExpressionUUID->"39a76bda-9b84-47c4-aaac-115b2fa0ab3c"], + +Cell[BoxData["$Aborted"], "Output", + CellChangeTimes->{3.7993970707918673`*^9, 3.801298336780199*^9}, + CellLabel->"Out[42]=",ExpressionUUID->"096b7e94-d759-42a6-85de-99710d182c3a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"TEIu", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.799396150683653*^9, 3.799396260595922*^9}, + 3.799397288408113*^9, {3.7993975494448233`*^9, 3.7993975497907963`*^9}}, + CellLabel-> + "In[144]:=",ExpressionUUID->"55ebc313-238e-4414-bd29-e68cc73a5644"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["1", "R"]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}], ",", "0"}], "}"}]}], "}"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}], ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], "}"}]}], "}"}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{ + 3.799396261983705*^9, 3.799397002220264*^9, 3.799397091717456*^9, { + 3.7993972909681787`*^9, 3.799397299759378*^9}, 3.799397435129719*^9, + 3.799397590973344*^9}, + CellLabel-> + "Out[144]=",ExpressionUUID->"8d3a171f-015b-4cd5-af3a-e0cf8295d1fd"] +}, Open ]] +}, Closed]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF equations and SCF algorithm", "Section", + CellChangeTimes->{{3.7991244725798073`*^9, 3.7991244849719343`*^9}, { + 3.7991253922796173`*^9, 3.79912539639213*^9}, {3.799388917895101*^9, + 3.799388923565757*^9}},ExpressionUUID->"0f3a9cca-e608-42dd-8cc4-\ +19f13235aa5c"], + +Cell[BoxData[ + RowBox[{ + SuperscriptBox["N", "\[Alpha]"], ",", + RowBox[{ + SuperscriptBox["N", "\[Beta]"], " ", "number", " ", "of", " ", "electrons", + " ", "with", " ", "spin", " ", "up", " ", "or", " ", "down"}]}]], "Input",\ + + CellChangeTimes->{{3.799124495964856*^9, 3.7991245886563387`*^9}, { + 3.799124644604498*^9, + 3.799124679847286*^9}},ExpressionUUID->"b8072621-4f64-4c90-aec6-\ +7e04d8ad9729"], + +Cell["Introduction of a basis set:", "Text", + CellChangeTimes->{{3.799124681428863*^9, + 3.7991247397945213`*^9}},ExpressionUUID->"a72092fd-cf0d-407e-823f-\ +afea1402ca86"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + SubsuperscriptBox["\[Psi]", "i", "\[Alpha]"], "=", + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Mu]", "=", "1"}], "K"], + RowBox[{ + SubsuperscriptBox["c", + RowBox[{"\[Mu]", " ", "i"}], "\[Alpha]"], + SubscriptBox["\[Phi]", "\[Mu]"], " ", "i"}]}], "=", "1"}]}], ",", + "...", ",", "K"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubsuperscriptBox["\[Psi]", "i", "\[Beta]"], "=", + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Mu]", "=", "1"}], "K"], + RowBox[{ + SubsuperscriptBox["c", + RowBox[{"\[Mu]", " ", "i"}], "\[Beta]"], + SubscriptBox["\[Phi]", "\[Mu]"], " ", "i"}]}], "=", "1"}]}], ",", + "...", ",", "K"}]}], "Input", + CellChangeTimes->{{3.799124742144261*^9, 3.7991247618977413`*^9}, { + 3.799124798167281*^9, 3.7991248009552526`*^9}, {3.79912483393946*^9, + 3.799125056180552*^9}},ExpressionUUID->"934d15a4-507b-4f5d-8a24-\ +2d5e42913e70"], + +Cell["We define the unrestricted density matrix as", "Text", + CellChangeTimes->{{3.79912516909801*^9, + 3.799125186160612*^9}},ExpressionUUID->"5e1f8c76-898e-44d1-a6a6-\ +d54937a3c5db"], + +Cell[BoxData[{ + RowBox[{ + SubsuperscriptBox["P", + RowBox[{"\[Mu]", " ", "\[Nu]"}], "\[Alpha]"], "=", + RowBox[{ + UnderoverscriptBox["\[Sum]", "a", + SuperscriptBox["N", "\[Alpha]"]], + RowBox[{ + SubsuperscriptBox["c", + RowBox[{"\[Mu]", " ", "a"}], "\[Alpha]"], + SuperscriptBox[ + RowBox[{"(", + SubsuperscriptBox["c", + RowBox[{"\[Nu]", " ", "a"}], "\[Alpha]"], ")"}], + "*"]}]}]}], "\[IndentingNewLine]", + RowBox[{ + SubsuperscriptBox["P", + RowBox[{"\[Mu]", " ", "\[Nu]"}], "\[Beta]"], "=", + RowBox[{ + UnderoverscriptBox["\[Sum]", "a", + SuperscriptBox["N", "\[Beta]"]], + RowBox[{ + SubsuperscriptBox["c", + RowBox[{"\[Mu]", " ", "a"}], "\[Beta]"], + SuperscriptBox[ + RowBox[{"(", + SubsuperscriptBox["c", + RowBox[{"\[Nu]", " ", "a"}], "\[Beta]"], ")"}], "*"]}]}]}]}], "Input", + CellChangeTimes->{{3.799125198952877*^9, 3.799125242308874*^9}, { + 3.799125322967175*^9, + 3.79912538355825*^9}},ExpressionUUID->"f7215fc1-fb84-4352-96f0-\ +625f766b6f63"], + +Cell["We use the following notation for 2 electrons integrals", "Text", + CellChangeTimes->{{3.7991254234929132`*^9, + 3.799125448582654*^9}},ExpressionUUID->"0b76a565-f848-4a42-9110-\ +3696e691a3b8"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"(", + RowBox[{"\[Mu]\[Nu]", "|", "\[Sigma]\[Lambda]"}], ")"}], "=", + RowBox[{"(", + RowBox[{ + RowBox[{ + SubscriptBox["\[Phi]", "\[Mu]"], + SubscriptBox["\[Phi]", "\[Nu]"]}], "|", + RowBox[{ + SubscriptBox["\[Phi]", "\[Sigma]"], + SubscriptBox["\[Phi]", "\[Lambda]"]}]}], ")"}]}], "\[IndentingNewLine]", + + RowBox[{" ", + RowBox[{"=", " ", + RowBox[{"\[Integral]", + RowBox[{"\[Integral]", + RowBox[{ + SubscriptBox["\[Phi]", "\[Mu]"], + SuperscriptBox[ + RowBox[{"(", "1", ")"}], "*"], + SubscriptBox["\[Phi]", "\[Nu]"], + RowBox[{"(", "1", ")"}], + FractionBox["1", + SubscriptBox["r", "12"]], + SubscriptBox["\[Phi]", "\[Sigma]"], + SuperscriptBox[ + RowBox[{"(", "2", ")"}], "*"], + SubscriptBox["\[Phi]", "\[Lambda]"], + RowBox[{"(", "2", ")"}], + RowBox[{"\[DifferentialD]", + SubscriptBox["\[CapitalOmega]", "1"]}], + RowBox[{"\[DifferentialD]", + SubscriptBox["\[CapitalOmega]", "2"]}]}]}]}]}]}]}], "Input", + CellChangeTimes->{{3.799125452917562*^9, 3.7991254841772003`*^9}, { + 3.799125728015522*^9, 3.799125793564528*^9}, {3.7991258384205503`*^9, + 3.799125868945969*^9}, {3.7991259772227097`*^9, 3.799126058735235*^9}, { + 3.7991270793943043`*^9, + 3.7991270803923197`*^9}},ExpressionUUID->"dab43983-d755-4b03-bafb-\ +790ad3657b6e"], + +Cell["The expressions of the unrestricted Fock operator are", "Text", + CellChangeTimes->{{3.7991260715671463`*^9, + 3.799126088022646*^9}},ExpressionUUID->"5faddd9f-47a6-44e1-a54e-\ +f2d4e1fe5b45"], + +Cell[BoxData[{ + RowBox[{ + SubsuperscriptBox["F", + RowBox[{"\[Mu]", " ", "\[Nu]"}], "\[Alpha]"], "=", + RowBox[{ + SubsuperscriptBox["H", + RowBox[{"\[Mu]", " ", "\[Nu]"}], "core"], "+", + RowBox[{ + UnderscriptBox["\[Sum]", "\[Lambda]"], + RowBox[{ + UnderscriptBox["\[Sum]", "\[Sigma]"], + RowBox[{ + SubsuperscriptBox["P", + RowBox[{"\[Lambda]", " ", "\[Sigma]"}], "T"], + RowBox[{"(", + RowBox[{"\[Mu]\[Nu]", "|", "\[Sigma]\[Lambda]"}], ")"}]}]}]}], "-", + RowBox[{ + SubsuperscriptBox["P", + RowBox[{"\[Lambda]", " ", "\[Sigma]"}], "\[Alpha]"], + RowBox[{"(", + RowBox[{"\[Mu]\[Lambda]", "|", "\[Sigma]\[Nu]"}], + ")"}]}]}]}], "\[IndentingNewLine]", + RowBox[{ + SubsuperscriptBox["F", + RowBox[{"\[Mu]", " ", "\[Nu]"}], "\[Beta]"], "=", + RowBox[{ + SubsuperscriptBox["H", + RowBox[{"\[Mu]", " ", "\[Nu]"}], "core"], "+", + RowBox[{ + UnderscriptBox["\[Sum]", "\[Lambda]"], + RowBox[{ + UnderscriptBox["\[Sum]", "\[Sigma]"], + RowBox[{ + SubsuperscriptBox["P", + RowBox[{"\[Lambda]", " ", "\[Sigma]"}], "T"], + RowBox[{"(", + RowBox[{"\[Mu]\[Nu]", "|", "\[Sigma]\[Lambda]"}], ")"}]}]}]}], "-", + RowBox[{ + SubsuperscriptBox["P", + RowBox[{"\[Lambda]", " ", "\[Sigma]"}], "\[Beta]"], + RowBox[{"(", + RowBox[{"\[Mu]\[Lambda]", "|", "\[Sigma]\[Nu]"}], ")"}]}]}]}]}], "Input",\ + + CellChangeTimes->{{3.7991261112849817`*^9, + 3.7991262566362667`*^9}},ExpressionUUID->"1972c041-98b1-4941-94dc-\ +257513a35524"], + +Cell[TextData[{ + "If we choose a basis set of size K, the basis set will be of size ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["K", "2"], TraditionalForm]],ExpressionUUID-> + "d658f4da-5cd9-4bf7-9afd-1b4c762d6908"] +}], "Text", + CellChangeTimes->{{3.799127098912312*^9, + 3.799127170513702*^9}},ExpressionUUID->"75e70534-a77f-4fbc-bbfe-\ +3f61c923d1bd"], + +Cell["SCF algorithm in an orthonormal basis:", "Text", + CellChangeTimes->{{3.7991271780616007`*^9, 3.799127179096154*^9}, { + 3.799127296100884*^9, 3.799127296321487*^9}, {3.79938264740606*^9, + 3.799382657405221*^9}, {3.799383290378018*^9, + 3.7993832953778877`*^9}},ExpressionUUID->"54fc6b45-7f4e-4fb8-acaf-\ +5b00791f14c0"], + +Cell[TextData[{ + "1) Calculate all required molecular integrals ", + Cell[BoxData[ + FormBox[ + RowBox[{ + SubscriptBox["S", "\[Mu]\[Nu]"], " ", ",", " ", + SubscriptBox[ + RowBox[{"(", + SuperscriptBox["H", "core"], ")"}], "\[Mu]\[Nu]"]}], TraditionalForm]], + ExpressionUUID->"cb3d4644-992c-4ef0-978f-5952f0a89cb0"], + " and (\[Mu]\[Nu] | \[Lambda]\[Sigma]) \n2) Obtain a guess at the density \ +matrix P\n3) Calculate G from P and the two electrons integrals, add ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["H", "core"], TraditionalForm]],ExpressionUUID-> + "18584d2f-7578-4e02-892d-29ca248af8e7"], + " to get the Fock matrix F\n4) Solve ", + Cell[BoxData[ + FormBox[ + RowBox[{ + RowBox[{ + SuperscriptBox["C", "t"], "F", " ", "C"}], "=", "\[Epsilon]"}], + TraditionalForm]],ExpressionUUID->"82064650-98ca-4863-9a58-2b835467edcf"], + " , obtain the new C\[CloseCurlyQuote]\n5) Calculate the new density matrix \ +P\[CloseCurlyQuote] and determine whether the procedure has converged" +}], "Text", + CellChangeTimes->{{3.7993831720217543`*^9, + 3.799383580901733*^9}},ExpressionUUID->"2d67f35a-a8f7-4395-9db6-\ +aada87889d6d"] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF minimal basis minimization", "Section", + CellChangeTimes->{{3.7999936475553102`*^9, + 3.7999936581211443`*^9}},ExpressionUUID->"88d1b6b5-5bea-4e44-ac1d-\ +422fac666e30"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"\[Psi]1\[Alpha]", "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}], ",", + "\[IndentingNewLine]", + RowBox[{ + RowBox[{"\[Psi]1\[Beta]", "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}], ",", + "\[IndentingNewLine]", + RowBox[{ + RowBox[{"\[Psi]2\[Alpha]", "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}]}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}], ",", + "\[IndentingNewLine]", + RowBox[{ + RowBox[{"\[Psi]2\[Beta]", "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}]}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}]}], "}"}], + ";"}]], "Input",ExpressionUUID->"a5619f0a-81c8-47b4-bc04-0f01cf0e4e32"], + +Cell["Ground state energy:", "Text", + CellChangeTimes->{{3.800171569468564*^9, + 3.800171578143929*^9}},ExpressionUUID->"4a723b0a-595b-40e7-a718-\ +b8dceda3c167"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"EUHF", "[", + RowBox[{"R_", ",", "\[Lambda]_"}], "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{"2", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["c", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"i", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"j", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"k", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"l", "=", "0"}], "1"], + RowBox[{ + SubscriptBox["c", "i"], + SubscriptBox["c", "j"], + SubscriptBox["c", "k"], + SubscriptBox["c", "l"], + SuperscriptBox[ + RowBox[{"(", + RowBox[{"-", "1"}], ")"}], + RowBox[{"k", "+", "l"}]], + FractionBox["\[Lambda]", "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "2"], + RowBox[{ + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"k", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"]}]}]}]}]}]}]}]}], + "/.", + RowBox[{"{", + RowBox[{ + RowBox[{ + SubscriptBox["c", "0"], "\[Rule]", + RowBox[{"Cos", "[", "\[Chi]", "]"}]}], ",", + RowBox[{ + SubscriptBox["c", "1"], "\[Rule]", + RowBox[{"Sin", "[", "\[Chi]", "]"}]}]}], "}"}]}]}]], "Input", + CellLabel->"In[56]:=",ExpressionUUID->"2c510fb9-7815-465e-8275-3af213e72b3e"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 56, 5, + 22572770504959543681, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802579071058299*^9}, + CellLabel-> + "During evaluation of \ +In[56]:=",ExpressionUUID->"188c0920-3ba6-4be8-bd1e-c12e32ee6c39"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 56, 6, + 22572770504959543681, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8025790715771*^9}, + CellLabel-> + "During evaluation of \ +In[56]:=",ExpressionUUID->"63c996d4-5549-48a1-8127-af639bec2f9d"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 56, 7, + 22572770504959543681, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802579072058694*^9}, + CellLabel-> + "During evaluation of \ +In[56]:=",ExpressionUUID->"6e3e76eb-b38b-4b08-9424-4c2ad8375465"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 56, 8, 22572770504959543681, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802579072482175*^9}, + CellLabel-> + "During evaluation of \ +In[56]:=",ExpressionUUID->"ebb5ac60-e8d3-4550-8ff9-48d3268fa57b"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{"\[Lambda]", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Chi]", "]"}], "4"]}], "R"], "+", + FractionBox[ + RowBox[{"2", " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "\[Chi]", "]"}], "2"]}], + SuperscriptBox["R", "2"]], "+", + FractionBox[ + RowBox[{"2", " ", "\[Lambda]", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Chi]", "]"}], "2"], " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "\[Chi]", "]"}], "2"]}], + RowBox[{"3", " ", "R"}]], "+", + FractionBox[ + RowBox[{"29", " ", "\[Lambda]", " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "\[Chi]", "]"}], "4"]}], + RowBox[{"25", " ", "R"}]]}]], "Output", + CellChangeTimes->{3.800171593491824*^9, 3.802579072962158*^9}, + CellLabel->"Out[56]=",ExpressionUUID->"92a2088f-cc7b-4037-b9c7-d3578f2988b6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Solve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[PartialD]", "\[Chi]"], + RowBox[{"EUHF", "[", + RowBox[{"R", ",", "\[Lambda]"}], "]"}]}], "\[Equal]", "0"}], ",", + "\[Chi]"}], "]"}]], "Input", + CellLabel->"In[23]:=",ExpressionUUID->"85af60a7-84f1-4bf3-84e4-8b303f58a7aa"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"-", + FractionBox["\[Pi]", "2"]}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + FractionBox["\[Pi]", "2"], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{"\[Pi]", "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + RowBox[{"-", + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + RowBox[{"-", + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.800171613453534*^9}, + CellLabel->"Out[23]=",ExpressionUUID->"d566a9d5-cc70-4ca9-bd59-bb86b782151a"] +}, Open ]], + +Cell["We choose:", "Text", + CellChangeTimes->{{3.8001716274319077`*^9, + 3.8001716322751017`*^9}},ExpressionUUID->"d228c982-60f2-4308-8c3d-\ +a729ff0d9551"], + +Cell[BoxData[ + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]], "Input",ExpressionUUID->"24b1c0ba-b8f6-48b0-\ +a919-960805693e6b"], + +Cell[CellGroupData[{ + +Cell[BoxData["ArcTan"], "Input", + CellChangeTimes->{{3.802578088412201*^9, 3.802578099479707*^9}, { + 3.802578144515023*^9, 3.802578146805437*^9}, {3.802578654586584*^9, + 3.802578654885808*^9}},ExpressionUUID->"cde28f95-f4aa-4c06-835d-\ +e9e835badcd3"], + +Cell[BoxData[ + RowBox[{"ArcTan", "[", + RowBox[{"\[Pi]", "-", "\[Theta]"}], "]"}]], "Output", + CellChangeTimes->{3.8025781030471888`*^9}, + CellLabel->"Out[45]=",ExpressionUUID->"5f2482cb-270b-44d8-9815-1058327d746c"] +}, Open ]], + +Cell["And the symmetry gives us", "Text", + CellChangeTimes->{{3.8001716427101793`*^9, + 3.800171649305901*^9}},ExpressionUUID->"be4eec09-b8a2-40a9-ae71-\ +21c1e084172c"], + +Cell[BoxData[ + RowBox[{"\[Chi]\[Beta]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}]}], "]"}]}]], "Input",ExpressionUUID->"0865ccf0-0456-\ +46d0-84af-873c05ba40ab"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[PartialD]", + RowBox[{"\[Chi]", ",", "\[Chi]"}]], + RowBox[{"EUHF", "[", + RowBox[{"R", ",", "1"}], "]"}]}], "/.", + RowBox[{"\[Chi]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.802579081257702*^9, 3.802579122035019*^9}, + 3.802579268349122*^9}, + CellLabel->"In[59]:=",ExpressionUUID->"792b115f-d62c-41d3-9ed4-386e1cd85623"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], ")"}]}], + RowBox[{"42", " ", + SuperscriptBox["R", "3"]}]]], "Output", + CellChangeTimes->{3.80257912234461*^9, 3.802579268875536*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"817db579-e47e-4f92-8513-a370faf9484d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Plot", "[", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], ")"}]}], + RowBox[{"42", " ", + SuperscriptBox["R", "3"]}]], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"-", "5"}], ",", "5"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8025791390277843`*^9, 3.802579155590673*^9}}, + CellLabel->"In[58]:=",ExpressionUUID->"eb2c39a5-344c-448f-bb74-25006d1b2338"], + +Cell[BoxData[ + GraphicsBox[{{{{}, {}, + TagBox[ + {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], + Opacity[1.], LineBox[CompressedData[" +1:eJwVlnk4Fe0bx+ccSxElVJYsqSiJkiJLQ1lCCFlT2SohJaHXnhepqGwl8cqS +XWixlNzP+6ZEZSlR2bLvzpzj2A7O+c3vj7nm+lzzzFzz3Pf3+72fba5XrM5T +MQwbIa//30NHzRgcjgiKvfizYf6fARgJ3jzXtSKCxC0ORWdlDYC5UN9C1ZII +6szkmT2ROwCyh6+uXpkl18d2/3lWOAD/3Ulc+2dEBCn2Fa1zfjUAa5U7pdFX +EVT2kdEy1zgAydedTSOeiCCtguP5BXMDUEzxy8XURdC6421OGhaDwHPeSFX8 +jDDiag0fbZEcApGfH7yzEzaike+B15PHhsDqfZrb7iYhJHHxOXU/DEMwTcf7 +weAG1E70BsRXj0B1YJpnmcV6NBt/Mja7YhTME21k2Y8F0Bd7Vvt02xgYZbwz +Pz7Fj57wrzQZccYhr+GvDr/TfOjZY+KmjsIknI1K3tRSsAa9TzKw1bo+BWHO +XM/XifAipbFtcbHPpwHbKwPHormRbeCwdXvnDIRs1jsbHcaN3Hpcb+Z3z8AC +x3X1YyA3ishtlLvRPwMz3/K0TDy5UdDJvEcbJ2eg64Zy9UkLbqQuNiKzgz0D +lfU6FWfEuZE5TRSr206Dy05OOYGlXCgmPyLE15sGYwZhR2vyuJBrn11z91Ua +uKs87WdlcqGTRzQE9f1p4EgdkglL5EJZ2hfEeMNocLzAKz0qkAvFljt8sr1P +gx3MoJQEPS6kU7FBSaqCBr/vPr5V/IOKAg7Y6jcRNPj+QbbEuYWKIo7y37Fm +0uALJ791UyMVXQ/DLncu0KDOr1I8opaKZg1LGpvZNMg+/b34VA4VjTkyeHV4 +CfDcI9i6epWKOje5dzmIEOB2Ppn5wpOKIrOfXqaJEuCUKSnu4U5FBtfb/7u5 +mQBzEUXXb3ZUxOet8CBdnADVZUNm3hEqMrF0zi+UIWC5KULspAAVaexuXhXb +QwCTe60ODy8VYRRZ8QAlAmaO3Hd5w6Gg25sVT7XsJeDPi4yiHbMUtBq3tOK/ +j4D6tDfaS78oaOC3ZXfiQQLeteu5PP9OQRqqjOqWQwRUrm+MdvtKQTdKoxzW +ahBQENnZ/BVRkPEer0pvTQLiPJnO2fkUxEHjtzCcgOjc4Gi7LAoKp6buldAl +IKyXWiTwhILs9fsPqOgRcNVq42zAPQqq/PugsukxAk5pKkeb+lMQM1LqgrER +AWbXXxdiVyhIEEcZ2scJMHyu3fzag4KKblxqUjQmQEPOdIusEwXdy/dsWjAh +YCu/RyHzKAXhpc7frMwJOFv3JU5Om4KkuVMalCwIyLq2/+rJgxTkwwwwwE4S +IN/FOlSiQEHah83jkywJ8Lh/TuK3LAXxnwYVaysCio7Vr66RIPfv0r5OwJoA +lZL4ejcBCqLfCJC5dIqAa86M/AQe8v34mr2CNgS8ErW7C2wMZe5et72IZI1Q +WStJOoY2ptdebrYlIGh/9EHjCQy5x80/srEj6zs8LhY4iCG3errVD5KPmr/s ++/YDQ2rC6nJ19gREUcXeYy0YEufz4FNwIKChMiRP+ROG7kXIK8SSzO/Vf9vp +XwyZfD3m3k/yCRnDy3feYKgHsyhUdSTg3veik9UvMZQrmdwbTHLbrQ1qIyUY +YmpJTtWSLKp9fYtoHvm9pvyaOZJtiZ8svUwMCedWKcufJiA1V6f3SiqGsvFI +VXOSu+yz/81IwFDqt4XiyyRLC6559vkOhvb4optRJDv/6xW79DeGJJW00hJJ +zvZv9VIIxZD+ntCuRyQP7T5oYROAIaEPJ/ckkyzf+1j17ysYqktUu3KL5EuJ +7E0VHhi6fNMxzpfkEkO3pV4XDE305V20InmG1dAtcBpDcpfKhneTvK9MCWme +wpCG6ZuJBfL/r7kl5HiYYejwnneO/9/fqy3zMQ8NyfrsdBIPJHnhs6NnPY4h +q8Yxvl0ka0aAGUMDQ2KiLhtayPqFqO3YL6uKoZfuPgLeJNeNxYqa7yHX+7gP +ssl+UDKmF4J3YOiQvG7ALZL1La26CqUwxCnNy+MhOYanqq5zM4YmDw/Z/EX2 +81ONZDaPEIZsZifcB8j+8/tERB/gw5BUp+UrXZKlS5NSpRc4oGv2Nbmb1FPO +pjPngsY5sJSkMyxO8q4wefmOLg58FnzPNCX1t9+i5mU84gBXcdbneFKvlVWR +QeMvOFDfYWaRQepZU/aEnsEzDli/f8GfRepdn97bvHKbA5daGelRZgQ0OhSk +2Idw4K0EoeR+gsyT/3ydXvlwwKBt9IK6KQH2SdwTXtYc+P0hwLCa9JvXQUWe +rq3k84HGJzKkP6/x1OQHbOCApk9YSSbp36AfRibCVA4Y8zm+Fib9fcf//H3j +UTZUFj/b0qZN+uf1U/HqCjZsjv6nt4jMkxfRKrXWuWzg7HvoV3eAgDc2dWdp +D9lwolr/w/v9BDTNdeXIh7Dhl7/GYjaZT+MHtyinGLIh2G7n7PMdBBA8ea37 +DrPh1semBlM5AhZ/qPl92cOGwBUJzk8y/9YGWFVzbWTD+eLJ3vcSZP0q449e +61oFeuleg44NpF5itg4LNq8Cz/VyUboA6U/b4luFaBWSJ4eaWHwEHJ//9OXP +s1WItb8j95uLgIuHuO0srq7CW6ntddHTNPDhTVqacF0F0b+YD/4ZoUFAx7b0 +GJtV4F2cmE7oo0FMAN7/TnMVgi7GxvG20SCvMshLiWcV8sv3rUq8oMHzGL71 +nxZWYNPsz6blQhpU2qaWu02swKHwd3dfZtHg4/zrubSWFeg1ZGB5D2gwfIge +zpe2ApW/r4nfJufZFG+E3LO4Fbgw6zkp4kYDZsf6D7rhK7ChN7PW14EG3IFK +/DfcV+Dr2179XANyflVdTB5RXgEbzTNjPyRp4KbeW/D+/TKYSxjlTtfNwIUC +dVvDqmWIO2wzjr+cAU/xBK7GomWgue6ScMufgavLx842JyzDJTUjZYn75LyG +QpFf55Yhf2uflbbTDCQb+YfNLLNgK9fDD+1T0/CounmPL40F705VX2f2TEPa +7l2/ZgdYwJuzTbC7eRqerus6sNTIArGmY8FY+TSUtuiOc6WyQFS51TPuyjR8 +tBM4Ja7GgumfZSMSg1PQ+Ok8JV2BBdV3X6l6tk7Bl8PwXFqSBaql3jcD3k3B +N8lrfDuoLLjf80j2/cMp6OvrrFNuXQI3KHyx2XAKFi/m7Nb3XgKrXU/M6A8n +YfnnSsfHc0vQdju4rzx8EtjGtlHG1ktgVmGqJusxCdxKfH3mmksg90smkF9j +EjYSPskOa5fgnInMFOP7BCje0OT45C5Cms7hhweXxwH1mCsOPlyEt0H9jXzd +42B7zM3G7vYiWBx/5uddOw6R6+OKcZ9FKD4n5t4ZPA6/cnvshDQWIa5tWkli +bgxi2yLKKz4vgMmV0T5myyhIq6d07axbAJeVAzyLBaPwKr2QN618AXo/LFCv +3hyFPxe/OUWmLIB3ro9p1b5RUGdv57M+twD48viUT+wIjCg2uDAZ8+D3ubSv +UWIYQh50xXkMz0NbZky76sQQCM/Tqro75+FtXqQHUT0ER/4VW/+hdh4yNOtN +nE8NQYqd55uUmHlgW2wXaYscBP0oQRF1iXnoZ4f0fXrbD7/Htx0pFpiH1a14 +vG14P1y1OHRJhjMH/H63uIWO9sMTiXOwZmgOMuLcy1j1f4BRXu71s3QOxuPq +hCoj+iCrx7r+L705MHTxb+WIdoHqkCqrXW0OrFzXLdfG/ob6iY379u2agy2W +2UQp6xeMLLQ8GVk/By9KcV6RXz9BUfiEn3U3ExziFI9ohXfAC0N9ub2BTCjK +SWnV8WqDY2bb7WM9mcDrUfVSGVqh3Zp6b/AME+a7clRGhVph3hktPdZnQtZX +WWPZ019BK1i7jVeYCVxh9mYNKQ1QX6YW8adkFqSzHVS/aFSCTaVIpdbTWeCf ++N7GmngBI7WMyYdJs9Dv+FnhyI4yWNtUbmcWNAuue7k6ToVmgdmQksobo1n4 +vtvBoaA5Be8Q29mbNMCAJyW3Mxc2/YdflOEWpf1gwDPbt2d2ydTjizsHjU0a +GaBq+c/VoyofcYkDWa+xcgaohEjSU92b8LNmUvGXQxkgL6231jGpDR+9uUnb +SIwBLtuTWLlCXTh/aBktiZ8BzmnPzsj5dOPKN4xz/qzQodtgVgG19uABPqH8 +Qf106AkbU/pl9QfnPT38s6SIDupaiZM+xwdxRdvwuKV0OvAK2qsPCQzh5pbi +uob36YA334vTbx/CU4zM8vv86HAEKcwueI3gO9Re+wvr0KEsvyUzEY3jx1Us +dp9ToUPDo50JDRkTuLfieHfxNjpkGLzTswybxF/JSukb8NJhPup1XbrxNH5M +MFr4RgsB4VVpr52iCdx15FRZjwsB277Fh6dnM/GY/hlXRXLubQp23JioMocX +dcduDjQkIDJ2aUt13RzO+FYbKkSea/tra0zfDc7j1HDj1JgxGgiaZgQ2Gy/h +Jv6hHJmvNCB69MM9xpfwBK+KCzXkuT3RZN+22LssXNZe/OBUEA18gy/L3upc +xvH9422WgmRuevWU/L7PxmMUpA5P0mfAgfXh73l9Dt4sZfk0qmMGWu6kJays +cPCz/DU+VZkzUPR22Y/zBtMNGYxdJ6U6A/sfbb5UY0jVfZOyy2DMdhq+Fb48 +QC/j0V17etSNoj0NfR36vnrbeXVtZfMiJbZNg7zhqmVgKq8uo2g7OjE5BXL7 +HrvUxK7R3Y2ktSrCp2A2jBFecJNP17GvQk/Mdwp8N5s38jfy6f4PyXHkAA== + + "]], LineBox[CompressedData[" +1:eJwV1nc8Ve8fAPA7jSjlFqFhlJCV7PB5lLQIJSSSa5RUZsrXKqGMUEqyG0Y0 +jEjLvVkpI5SQdXHvIaNs18rv/P46r/frOee8zvNZz5GiexxzIREIBEEigfD/ +6yifzPoFz7/ARxyMzAJBZm7n3LWxB3/hz/WhTIEsAaaIYZ0sz9JfIMckc2V2 +rGLOU3XeStDHYeVbjleSMy8z23uqIf3SOHCknOePrONlWva+6JcKGAdN49dv +1zB4mAVl0oJy98ZB0s03tXAzD9PVXdBBvWYcFCth8h9GYf5o6qWYKkyAS88u ++WvZJGaofrJYk+YECDaYfKXTSUzVPEvl4/smQO7ICSWJrSRm9I0v1iftJkCz +W/4PIYXI3KtZnOcSOwEJ/2WrmKYSmAUpEebBkxOQHF829jdsmVFHixgUIkyC +YmO+iJXAMgOLDg9+tHoSnqEjU0cSlhibAsOeV8lNgn6+ZW9jziLjll0on4DD +JDgYLs/H9c8zzmwOZj6om4SiCO57o+RZRsD9IGv5jkn4mMJnv1prlpG4OujP +O2wSTN491FvXOsOoXw7Y1EOcAqPjs5ll62cY2j3+V7dpT8FTwr2HAo+nGGsz +LqsWPp2Ckv8yYxUmxhk7RS9/3ls0BVZTQXdeZowzjON8T/9gTMGsdkKSktk4 +IzDEJ2bu1xRI9CSXbKb/ZQw5eA3pr5uGvk75MgJhjMGUvJj5NWgajtuVzpXF +DTE6ky5o2UVPw3XD4RZx/iHG7NoLjWNJ03Bxxfu3UNggQ5HovrT29TQwTNtt +04MxRlLfORvr4WnYqzI1/C6czfB47LyWbTUDYi+th3PbWIxY/4epsU4z4HnV +zPSwB4vx0rxRTsdzBnTWtbnw8bEYf/5pGcZGzgB3c/a2ZP8exoVTAt7aH/D1 ++tgJTddOxvn1Rd9jpGZBcey7sUhmKyNqBHPQUp4Fu613d4z9/cHIq5AY7dOd +BRG9pKRkwx+M357hFC3LWXjdxmfuNNzCONdgo9EXMQupHCtFUYsmhmvESqLG +6Cwwv65O0OquYUTYq8uwuLjrXiX1F1UzstXdXkVR5+C7ROBASnQVg9Pf8rl3 +yxzk+U6RRYwrGM6QzY20mINvk9XDHh/eM+hcE9ue0jngFU9vkzPPZpw+n7z5 +5nUuDBce3WmsVwSLHfyNE7e5cCbOLlx2oBiSDvkH2yVzoZ0e4jsYXgLNcja9 +u4q5IK+ZoqnFKAOjwQ2Puthc0HYdwvaQGCDvfGeb2sF5eEOvd7vkVg013wmt +qZbzwNcUf8d6Sw3Q93mG8zrOQ2XYPv7Q5hpIlTbDuvzn4aPKKckXarWwpk8w +92b+PLT9LA5qZ32FaftbO7vXLMDXz5bd+uPfIL5hrvOAxAJcfNxQ9Gh/Eyjp +n40p2rEAJyWsn7jebQLXTcZjN9ECXN30Pqlcvhk6fpFfqXkvQOEnqZhfZi1Q +bh2idqt1AaYuPRIxC/gBkRZ+OrtTF8Hbfb9KvG073K1XuPD82SKcKr7udiWp +HVIP9KZvf7MIRksnbrxvbYcC/YOUjS2LMDmaIex4tAPa5cW/LfEuQS26UWCm +/QvkSOXONT5LECK6NkdivBPUgrwfwPUluNzlPhK/rQv0uLJfy2KXoI+42B5g +0wXmf+JU8p/h6w4BxmXlXXDll+NCXO8SgKdFzkRYN9QUUeNPHlmGFBJfevR8 +DzQpvatosVmG0N3Kywvbe+FX7qWZI67LsKKTlDlt0Qt/0ttsDa4vQ+OeH3bR +ub0gEv1su8ybZeDXPnxgtxwLXJxM349K/wNWVuhBdjULKOvvYyEL/+BfGuGa +TFcfCP8JXiPMuwKHRnc9nh7uA6nac5pPaSugprPBOHO+DwwC9SJqFVegxNX5 +3C2RfvBnD2xf57ACi1QNg6yj/fDntZrL48oVGE+b+Whd1g/LsZtuqzetgC8S +MZ2r6gdBN56Smi78eWMDK7/mfpDf/IsyMrMCgZPyC7ThfiiqQC1i6wmo+eKH +k61iAzCqMORFNyYgp2tmtc99BmBatDs834SAaJE/Sp2DB2CR0vJw+hgBMc/v +cyBEDsCq3vefIhwIaKzlfttA2gDsSIhbl3+VgDQ/8YrRawaAvqhZOJVHQKmO +KMlDmA1uQzur9QoJSEJ8j3aIBBs8WyU7wt8Q0Mn6Q1p+29gQ8moVcWMVAa0T +0JCX0GRDqlOPuV43AZXaXUg3tmFDW134eJgQEdnW8JiYJ7HhnkHa/hMiRORQ +YPw7PpMNxwpfJ2/fTEQHk3UOleWyoTFxwKhGgYj07/jrfShjQ42j4UNeYyIa +SGMYZLSxoXRuyTAqkIiiOjeak9ZxwPf8+ge2N4iorS4o5IsoB9S6d44qRBER +s0m7578tHHhZYZtY94CI8u2jJ1N3ciD7dtmwYDEROT+50jFgxIFEGd+EuN9E +xC1eUsr24YBlYvSQwzgRdZUr9Mv6c0CY/4m+6hwRTfnKFt8L5kDsn+bBJgoJ +5REjrbUjORDxVkVPWJKEPhTuOfA0jQN+ZiPse1YkJLzwxVGtkgPqFSRdF3sS +avxYpp30mQOT6uJxGs4kFFu75dVYHQcuiR/S+elFQselBNec+8EBV072bdHb +JFS60Tw6nc2BEwF0zeRKEpL9kCSzi4RBYtp6nrkvJGS1Ib3oLBWDn4ya1uNN +JBRFWvXrDh8GVpSdl1d3k1D13tqTn9ZgYHN7qvjaLAkhTVssThyDpFdZN7qX +SCjBIJfsuhmD9mbr47pkMso+tvaGqiQGJ0U+TE4JkdFb0QW+J9sxsM0I23VW +nowIygfrCKoYJH/SJFapkJFKxvS9QDUMOgeGmiQ1yehrtUDQmDoGdnKmnr/2 +klFPDov0SgcD+8INr0ztyEiHYnq8eC8GZyqzFdXjyKjDNLT7+zEMMjk2S/H3 +ycjml0NlviUGfbwC9WMpZGSftiDxnxUGdBMP95xcMmIKO/ounMTAqVUrT7yC +jAriHvZFn8Hg6dxv/yu1ZMQZ0AgWo2PAFks99KORjPiem+xId8LA+TTh9+1O +Moo2qB2KccXAdbB2B3GGjCpEYraTLmCQzR8wZ7+Iv98pV+bwRQwGdyp9fkek +IGofrTzyEgbnPO+4+q6hoIyz84Ljnhjk3t2n2byegtxFnw2IeGMw9HqGqixB +QX5jtBQNHwzc5k9mDe6goPPly39sL2OQJyF42UiZgtwCE587+mEwrF9u9Eid +gkQit9w+cwWD86HSbFtDCoIbJXPG/hhcEBiRbrSlIPW/xaplgRiM+L+jCDhS +UPYLvoGgIPz+oUjswFkKql88EaIXjMHZarm8Tz4UJGS+8vJpCAbYbm70P38K +MtfNOn30Gr7/x58v7rlGQa3/2lQncNNDXHeVxFDQSK2+r3QoHu8xDdrkXQpi +R7YRCnGfsaPOKD+kIAOxekz7BgandZ6W5WZRkEeH07R6GAbdOT7JnHwKeuZ1 +V/MZbjuRfYHSRRQUtnU3r2g4Xj9TfZBaTkFFJR9u9uJudyyU6qiiIBMdewvd +CLw+m66RReooiBvY2xWLu9XAnHOsGY/veI9mN27LF1s/x7VRkFN+t/v2mxh+ +bv/Nre+moIInRrfO4j4WVR7Fz6agfMwp6QnuZu7tC8bDFKT4zTu3A7f5Wfuj +N8YpaKNefBX/LQy+tSqqMmcpyLqmgrsb91GjpXXLSxSkMss1t8FdX1Q3pUOm +og1X+Tv8cB+RSmn146eirRbFqXG4v8adf1MsREXNwuk5j3Ef/KfzcHwDFQWs +saUW4P58gT9AaRMVbbt15tMb3Mad7XbnpakIG6INvsVdfSjXIEeOin6NM66X +4jYquyLJVqaimKGHqS9wV8geIElpUNFcM3NvBm7D+yJs+z1UtJSkHxKNm0nG +qpMNqch/H9neG7eBd0lO2wEq6pH8ix3H/ZEVFrn+KBVZzNfuUMWtZ2bpbmFJ +RS56+xR4cb//KGMaa0tFdJVFbjseH13FKeW6M1TEL+GfnoW7LLliLd9ZKuLz +V91+EbcW/91Jo4tUNCZ57YEK7tIrjj+u+1DRa9+ilVE8P+qYamm5PxVxYpbP +ZuFWq/zmrx1BRYfIxxx5cRfuyjh1OYaKmHlOPIV4/lUzL+kX3aWiW//Sv5/A +rRS0mqiYQUVPt9evvoPXz/ORrv5zWVSUlqsQuwO3gu3zqqx8KvKJjLF/i9ef +nNaRW1vLqGih1knoG16fOVni5+3KqUie/opyHLfs+uEjD6uoyHdz/qWW6xhs +m7glRGumouCjidWVeL1vza9J5BmmIvbeyCAvvF8sM8refh2nope7Mpyr8H6K +Ssjrip2jIruAqIPCuKcDYqVFqTzos8yW3RkBeP5NrF7ukORBJmo/K4OvYkAw +PNg8IsuDhCM7KvLw/tXQ0J1+pcSDtA93rG/B+ztz8xZd7T086Im4Tqcw3v9+ +fzjVB614EH1V0ZrTXvh++9uGBO15UKiXe6ULPk/6fn4RaHbiQVs8GyTcPDAw +YbywOOnFgyYoVj10fB5Jx1/udovhQfFRj0tk3DBo2EWdiargQcae/9X0O2BA +kp0TNfvCg06/79n47DQG2uK/dWlNPMjLwvSRuz0Gj0kN11K6eVDJRls/ji0G +V7/fE3zO5UGf/NokXpzA43V527YGZV703HXcK+EwBgFl+44LpfAi/waTkYld +eH7tmsYdHvGiyif1tufx+T+8YhdbkMOLzMsyzFjK+PlwwO+LxWteFD76uqdq +J15fP3PhXgMvqtFMk/XCzw/u1GpFMQIfgmOo23YjHg+VdoqMCx+i3yifv7fE +Ac/sC6WaKvzoisb37CQGB3q+Sdxfo8mPTN59mXb/yAHT+a8+mB4/Upa2TdN/ +zwEFE/ldiYf5UQnJSairlAPsCU7+jAs/GlGYHqW+5IC1vsOj16n86G82UXpd +KgcMfljEqK1ahTRWh1yRvMIBQZIWXZmzCvXO05MG5Dmw/6LlfYUEQRR0PRp+ +RrJh49vNHvu3rUEeTN7sjeMDcNf71h3VNiFk7c5X6X5oAI5FmCmlla5FurcD +F5IL+kHhVNiJp0HrUMvy4palLf3wE+N/nHBCGMVc1RgvjOiDRjrHUHgrDb2z +WOvp8Y8FfZQc7n1pGrLPv6i5aYkF09nnXonJ0hAXwry+zLNAbGRkk5QSDZVu +ntu/fYYFzj6Tcyp7aOiKeMq5/hEWLNxYeWFqTUOUJvTQu4MFslli4pFxNNRg +YFM+/JoFOgc6mwQTaKhIjCGTXcQCk9+pN+MTaSi0S+ufYwELvJQkZx6k0dDs +mlPCnfks+FAi25SdT0PBJ9GblscsOFazO6LqMw29f5Mx0RaP/w+fm9E7WEdD +mUMoJzmWBVdXvZmqa6Sh2IL6ZvsYFqQd1XX83kpDn4ISwjk3WTD0E+n1D9BQ +t+KZswvB+PdeJU25DNLQodCOSmYgC1ZLVD37PUxD3wtF79/8jwVqDgdEJyZo +aOps/X0RPxbsJ/I3+s7Q0D4XreoeHxbYPPkaxuXS0A8Fc7ccLxac3x+zJ3CJ +hkZvrg319GBB0KDp5MoKDalKeQvpXmTB/wC0nSBO + "]]}, + Annotation[#, + "Charting`Private`Tag$35931#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{-5, 5}, {-3.531077458727058, 3.223165104575678}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.8025791566902*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"fefbb2f5-4364-4785-bfa2-3d6ca23cbbe5"] +}, Open ]], + +Cell[BoxData["Log"], "Input", + CellChangeTimes->{{3.802579643735317*^9, + 3.802579644898148*^9}},ExpressionUUID->"92edf535-0da5-498d-afe4-\ +d2067a4b8960"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"ERHF", "[", + RowBox[{"R_", ",", "\[Lambda]_"}], "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{"2", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["c", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"i", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"j", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"k", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"l", "=", "0"}], "1"], + RowBox[{ + SubscriptBox["c", "i"], + SubscriptBox["c", "j"], + SubscriptBox["c", "k"], + SubscriptBox["c", "l"], + FractionBox["\[Lambda]", "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "2"], + RowBox[{ + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"k", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"]}]}]}]}]}]}]}]}], + "/.", + RowBox[{"{", + RowBox[{ + RowBox[{ + SubscriptBox["c", "0"], "\[Rule]", + RowBox[{"Cos", "[", "\[Chi]", "]"}]}], ",", + RowBox[{ + SubscriptBox["c", "1"], "\[Rule]", + RowBox[{"Sin", "[", "\[Chi]", "]"}]}]}], "}"}]}]}]], "Input", + CellChangeTimes->{{3.8024921926077747`*^9, 3.802492196441489*^9}}, + CellLabel->"In[1]:=",ExpressionUUID->"a9a2e93a-6c8c-4f78-b9eb-90631ab6c195"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 1, 1, + 22572210984893282261, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802492201133101*^9}, + CellLabel-> + "During evaluation of \ +In[1]:=",ExpressionUUID->"b82e6414-4cc7-4061-bd95-51c7d6e87268"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 1, 2, + 22572210984893282261, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802492202040123*^9}, + CellLabel-> + "During evaluation of \ +In[1]:=",ExpressionUUID->"13e5a827-ec4b-4d07-a14d-e39dba52c8d6"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 1, 3, + 22572210984893282261, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8024922025122147`*^9}, + CellLabel-> + "During evaluation of \ +In[1]:=",ExpressionUUID->"429a7d6c-b98e-4229-b19a-c97f3162d499"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 1, 4, 22572210984893282261, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8024922028725853`*^9}, + CellLabel-> + "During evaluation of \ +In[1]:=",ExpressionUUID->"d5addb50-6cd3-42e6-ae7d-f79e03c0a258"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{"\[Lambda]", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Chi]", "]"}], "4"]}], "R"], "+", + FractionBox[ + RowBox[{"2", " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "\[Chi]", "]"}], "2"]}], + SuperscriptBox["R", "2"]], "+", + FractionBox[ + RowBox[{"10", " ", "\[Lambda]", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Chi]", "]"}], "2"], " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "\[Chi]", "]"}], "2"]}], + RowBox[{"3", " ", "R"}]], "+", + FractionBox[ + RowBox[{"29", " ", "\[Lambda]", " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "\[Chi]", "]"}], "4"]}], + RowBox[{"25", " ", "R"}]]}]], "Output", + CellChangeTimes->{3.8024922033036013`*^9}, + CellLabel->"Out[1]=",ExpressionUUID->"ff6af3de-9a55-4901-9fcc-62b34e79b63f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Solve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[PartialD]", "\[Chi]"], + RowBox[{"ERHF", "[", + RowBox[{"R", ",", "\[Lambda]"}], "]"}]}], "\[Equal]", "0"}], ",", + "\[Chi]"}], "]"}]], "Input", + CellChangeTimes->{{3.802492213407578*^9, 3.8024922137635803`*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"cb14f184-1c90-4d30-bc32-15d0e8145bc0"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"-", + FractionBox["\[Pi]", "2"]}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + FractionBox["\[Pi]", "2"], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{"\[Pi]", "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + RowBox[{"-", + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + RowBox[{"-", + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Chi]", "\[Rule]", + TemplateBox[{ + RowBox[{ + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R", " ", "\[Lambda]"}]}]], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R", " ", "\[Lambda]"}]}]]}], + RowBox[{"2", " ", + SqrtBox["22"], " ", + SqrtBox["R"], " ", + SqrtBox["\[Lambda]"]}]]}], "]"}], "+", + RowBox[{"2", " ", "\[Pi]", " ", + TemplateBox[{"1"}, "C"]}]}], + RowBox[{ + TemplateBox[{"1"}, "C"], "\[Element]", + TemplateBox[{}, "Integers"]}]}, + "ConditionalExpression"]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.80249221474746*^9}, + CellLabel->"Out[2]=",ExpressionUUID->"032f6e8d-dc9d-4ec5-bc63-565b049cbfc8"] +}, Open ]] +}, Closed]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["\<\ +RHF vs UHF: minimal basis, Fock matrix, Hamiltonian and spin contamination\ +\>", "Title", + CellChangeTimes->{{3.7999930345285892`*^9, 3.799993041915907*^9}, { + 3.799993355935072*^9, 3.79999337576303*^9}, {3.8000005865062838`*^9, + 3.800000618911915*^9}},ExpressionUUID->"0a52074e-c7dc-42d7-ba34-\ +e36f8a07c424"], + +Cell[CellGroupData[{ + +Cell["One electron basis and Fock matrix", "Section", + CellChangeTimes->{{3.799993392506085*^9, + 3.7999933948423767`*^9}},ExpressionUUID->"df11dec1-6a95-483e-b301-\ +63ee055cae1b"], + +Cell[CellGroupData[{ + +Cell["RHF ", "Subsection", + CellChangeTimes->{{3.799993092090961*^9, 3.7999931196011257`*^9}, { + 3.799993387387727*^9, + 3.799993399043241*^9}},ExpressionUUID->"db909c0e-e94d-4e53-98ff-\ +1fcd1e9db327"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], ",", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "}"}]], "Input", + InitializationCell->True, + CellChangeTimes->{3.799993160271023*^9}, + CellLabel->"In[7]:=",ExpressionUUID->"4180999f-b578-4334-b501-0e64761602e7"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"2", " ", + SqrtBox["\[Pi]"]}]], ",", + RowBox[{ + FractionBox["1", "2"], " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], "}"}]], "Output", + CellChangeTimes->{ + 3.8000026252128*^9, 3.800008290862617*^9, 3.800074343409177*^9, + 3.8000906806097403`*^9, 3.800104023806819*^9, 3.80015705583879*^9, + 3.800171589941497*^9, 3.8001814900908613`*^9, 3.8001818674919243`*^9, + 3.800182343251149*^9, 3.800250598713025*^9, 3.800336404588154*^9, + 3.800338945206175*^9, 3.800347263242309*^9, 3.800874525564262*^9, + 3.800934728994132*^9, 3.8011948410586367`*^9, 3.8012982972225924`*^9, + 3.801298350260435*^9, 3.801391068876822*^9, 3.801393058548064*^9, + 3.801638196896677*^9, 3.8017426334310827`*^9, 3.8017993047107267`*^9, + 3.801802895900681*^9, 3.801814474653829*^9, 3.801820090072027*^9, + 3.801823421160515*^9, 3.801825563920274*^9, 3.801831566929063*^9, + 3.8018850783288116`*^9, 3.801885344568172*^9, 3.801885628610591*^9, + 3.8018857742615147`*^9, 3.801907047382818*^9, 3.801970350043779*^9, + 3.8019717483795013`*^9, 3.801980397494182*^9, 3.8019916825830803`*^9, + 3.80199565448978*^9, 3.802144333215562*^9, 3.8025781021224747`*^9, + 3.802680703025485*^9, {3.8031154252750483`*^9, 3.803115441719665*^9}, + 3.8031161100797253`*^9, 3.803182861851646*^9, 3.803188055246521*^9, + 3.8037881135144043`*^9, 3.8042358456532*^9, 3.804238432297248*^9, + 3.804242393187325*^9, 3.8042443661455107`*^9, 3.8043913108388863`*^9, + 3.804395011986464*^9, 3.804396519226778*^9, 3.8044040894549303`*^9, + 3.8044142723196697`*^9, 3.804414307818306*^9, 3.8044147275881844`*^9, + 3.804419410019491*^9, 3.804421116112615*^9, 3.804482072616241*^9, + 3.804484154047114*^9, 3.80449883914611*^9, 3.8045688581106873`*^9, + 3.804583421491001*^9}, + CellLabel->"Out[7]=",ExpressionUUID->"bba80de9-d61a-4ad2-87be-f452ba11863d"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"c", "=", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"1", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "1"}], "}"}]}], "}"}]}], ";", + RowBox[{"o", "=", + RowBox[{ + RowBox[{"{", + RowBox[{"{", + RowBox[{"1", ",", "0"}], "}"}], "}"}], "\[Transpose]"}]}], ";", + RowBox[{"P", "=", + RowBox[{"2", + RowBox[{"o", ".", + RowBox[{"o", "\[Transpose]"}]}]}]}], ";"}]], "Input", + CellLabel->"In[27]:=",ExpressionUUID->"d33afd0a-5117-4ecf-ab34-88219e7c735c"], + +Cell[BoxData[ + RowBox[{"Hc", "=", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{ + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]"], + RowBox[{ + SubscriptBox["\[Psi]", "\[Mu]"], "[", "\[Theta]", "]"}]}], ")"}], + + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]"], + RowBox[{ + SubscriptBox["\[Psi]", "\[Nu]"], "[", "\[Theta]", "]"}]}], + ")"}]}], "]"}], + RowBox[{"Sin", "[", "\[Theta]", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]"}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}]}], "]"}]}]], "Input", + CellChangeTimes->{3.7999931119886847`*^9, 3.799993167870599*^9}, + CellLabel->"In[7]:=",ExpressionUUID->"8435f84e-9b1a-4d78-9a8d-7f4fad49a8c3"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"Hc", "[", "R_", "]"}], ":=", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"0", "0"}, + {"0", + FractionBox["1", + SuperscriptBox["R", "2"]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.799994308310364*^9, 3.799994309412603*^9}, { + 3.80025262505022*^9, 3.800252629336606*^9}}, + CellLabel->"In[8]:=",ExpressionUUID->"dc095120-7d46-4759-83f1-b544ce0a97f3"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"G", "=", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"TEIr", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0", ",", "1"}], "}"}]}], "]"}]}], + ";"}]], "Input", + CellLabel->"In[9]:=",ExpressionUUID->"738d43b2-6207-4158-86ee-ca90203397ca"], + +Cell[BoxData[ + RowBox[{"f", "=", " ", + RowBox[{"Hc", "+", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Lambda]", "=", "1"}], "2"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Sigma]", "=", "1"}], "2"], + RowBox[{ + RowBox[{"P", "\[LeftDoubleBracket]", + RowBox[{"\[Lambda]", ",", "\[Sigma]"}], "\[RightDoubleBracket]"}], + RowBox[{"(", + RowBox[{ + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Lambda]", ",", "\[Sigma]"}], + "\[RightDoubleBracket]"}], "-", + RowBox[{ + FractionBox["1", "2"], + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{ + "\[Mu]", ",", "\[Sigma]", ",", "\[Lambda]", ",", "\[Nu]"}], + "\[RightDoubleBracket]"}]}]}], ")"}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}]}], "]"}]}]}]], "Input", + CellChangeTimes->{{3.799401491576138*^9, 3.7994015018150806`*^9}, { + 3.799471245629293*^9, 3.7994712623238707`*^9}, 3.799471426405301*^9, + 3.799993234270146*^9}, + CellLabel->"In[12]:=",ExpressionUUID->"369acc51-3a0a-4316-8ce9-1efe4c9ba39f"], + +Cell[BoxData[ + RowBox[{"F", "=", + RowBox[{ + RowBox[{"c", "\[Transpose]"}], ".", "f", ".", "c"}]}]], "Input", + CellLabel->"In[28]:=",ExpressionUUID->"996e578e-5a50-408d-bc5e-b69971106628"], + +Cell[BoxData[ + RowBox[{ + TagBox[ + RowBox[{ + RowBox[{"F", "[", "R_", "]"}], ":=", + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["1", "R"], "0"}, + {"0", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["5", + RowBox[{"3", " ", "R"}]]}]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}]}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800002719030403*^9, 3.800002719958639*^9}, + 3.800005544320897*^9, {3.8002525527966557`*^9, 3.80025255607839*^9}}, + CellLabel->"In[9]:=",ExpressionUUID->"ded60f15-55a7-42b7-af7e-242d53d444e8"] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF ", "Subsection", + CellChangeTimes->{{3.799993331656663*^9, 3.799993342115625*^9}, + 3.7999934058111343`*^9},ExpressionUUID->"f3499336-7c71-4263-9391-\ +c088a34f380a"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{"c10\[Alpha]", " ", + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{"c11\[Alpha]", " ", + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}], ",", + "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{"c10\[Beta]", " ", + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{"c11\[Beta]", " ", + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}], ",", + "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{"c20\[Alpha]", " ", + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{"c21\[Alpha]", " ", + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}], ",", + "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "2"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + RowBox[{"c20\[Beta]", " ", + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{"c21\[Beta]", " ", + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}]}]}], "}"}], + ";"}]], "Input", + CellChangeTimes->{{3.7999934193217983`*^9, + 3.799993443183601*^9}},ExpressionUUID->"03828073-977c-4344-a85a-\ +bd2de2c1a82b"], + +Cell["\<\ +The coeffcients are obtained in the useful calculs and results part\ +\>", "Text", + CellChangeTimes->{{3.799993509604323*^9, + 3.799993548078808*^9}},ExpressionUUID->"b3250612-8996-4f80-ab8a-\ +2c01684cec36"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}]}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Beta]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}]}], "]"}]}]}]}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}]}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}]}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "2"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}]}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Beta]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}]}], "]"}]}]}]}]}], "}"}], "//", "FullSimplify"}], + ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.7999936000367727`*^9, 3.799993616856702*^9}, { + 3.799993707621728*^9, 3.799993734090374*^9}, {3.79999383162755*^9, + 3.799993876531172*^9}, {3.801823523544009*^9, 3.801823543594131*^9}}, + CellLabel->"In[10]:=",ExpressionUUID->"c4d8ac54-6336-4dfa-a72c-5eafe69d8908"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}]}], "y0"}], "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], "y1"}]}], "/.", + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.804482135492865*^9, 3.804482152097711*^9}, { + 3.804482317063911*^9, 3.804482345450529*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"0b371f85-d103-432e-a0cb-c7cd280964d4"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + RowBox[{ + RowBox[{"-", "5"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", "y0"}], "+", + RowBox[{ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "y1"}]}], + RowBox[{"4", " ", + SqrtBox["7"], " ", + SqrtBox["R"]}]]], "Output", + CellChangeTimes->{{3.804482147421647*^9, 3.80448215244728*^9}, { + 3.8044823178285227`*^9, 3.8044823460347157`*^9}}, + CellLabel->"Out[46]=",ExpressionUUID->"22385a75-1d06-4a72-b2b8-c66dc0d09c2c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]", ",", "R"}], "]"}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.8025832902063017`*^9, 3.802583291630026*^9}, { + 3.804482089050167*^9, 3.804482091996099*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"2edc62d2-b563-403a-83f1-4e61580dcf3e"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], "+", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], + RowBox[{"8", " ", + SqrtBox[ + RowBox[{"7", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]], "Output", + CellChangeTimes->{3.802583292211362*^9, 3.804482092727456*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"f2624ecc-0d6d-4c95-8d36-0a08b2b11662"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", + RowBox[{"\[Theta]", ",", "R"}], "]"}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.802583250183707*^9, 3.802583251618064*^9}, { + 3.804482098353063*^9, 3.80448210157699*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"83b07df0-48e0-4362-8d9a-18b81ddb4da5"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], "-", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], + RowBox[{"8", " ", + SqrtBox[ + RowBox[{"7", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]], "Output", + CellChangeTimes->{3.8025832520745897`*^9, 3.804482102120905*^9}, + CellLabel->"Out[40]=",ExpressionUUID->"c859d2ac-076e-4256-9c74-adfeed7f053d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", + RowBox[{"\[Theta]", ",", "R"}], "]"}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.8025832627576103`*^9, 3.802583264198324*^9}, { + 3.8044821089033813`*^9, 3.804482111949585*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"1030fbac-32a2-4c96-80de-d441dea46703"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + RowBox[{ + RowBox[{"-", "5"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], "+", + RowBox[{ + SqrtBox["3"], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], + RowBox[{"8", " ", + SqrtBox[ + RowBox[{"7", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]], "Output", + CellChangeTimes->{3.802583264538742*^9, 3.804482112487176*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"c0badb89-13f0-40b2-9706-9b8b6d9e829f"] +}, Open ]], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"c\[Alpha]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], ",", + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}]}], ",", + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}]}], "}"}]}], "}"}], + "\[Transpose]"}]}], ";", "\t", + RowBox[{"o\[Alpha]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{"{", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], ",", + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}]}], "}"}], "}"}], + "\[Transpose]"}]}], ";", "\t", + RowBox[{"P\[Alpha]", "=", + RowBox[{"o\[Alpha]", ".", + RowBox[{"o\[Alpha]", "\[Transpose]"}]}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"c\[Beta]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], ",", + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}]}], ",", + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}]}], "}"}]}], "}"}], + "\[Transpose]"}]}], ";", "\t", + RowBox[{"o\[Beta]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{"{", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], ",", + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}]}], "}"}], "}"}], + "\[Transpose]"}]}], ";", "\t", + RowBox[{"P\[Beta]", "=", + RowBox[{"o\[Beta]", ".", + RowBox[{"o\[Beta]", "\[Transpose]"}]}]}], ";"}]}], "Input", + CellChangeTimes->{3.802584492826613*^9}, + CellLabel->"In[25]:=",ExpressionUUID->"bc2a4e01-4a42-4c88-842a-a0e75c77df17"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"G", "=", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"TEIr", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0"}], "}"}], ",", "R"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Sigma]", ",", "0", ",", "1"}], "}"}]}], "]"}]}], + ";"}]], "Input", + CellChangeTimes->{{3.802584509588841*^9, 3.802584509941169*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"5d1ea56f-13fa-48f8-a048-b7acb1c3f360"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 31, 9, + 22572811419242671654, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802584510834346*^9}, + CellLabel-> + "During evaluation of \ +In[31]:=",ExpressionUUID->"ae4b385c-0321-432a-bd4d-5b745499e98e"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 31, 10, + 22572811419242671654, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802584511337598*^9}, + CellLabel-> + "During evaluation of \ +In[31]:=",ExpressionUUID->"3cfba2f0-e481-4fb9-9f91-90def4ea69c2"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"1\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 31, 11, + 22572811419242671654, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8025845118439293`*^9}, + CellLabel-> + "During evaluation of \ +In[31]:=",ExpressionUUID->"e3b3dd00-60fc-4500-a76b-516e3630df6f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"phy\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 31, 12, 22572811419242671654, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802584512303248*^9}, + CellLabel-> + "During evaluation of \ +In[31]:=",ExpressionUUID->"b417f738-2820-47da-b6ba-5c0b9d3438c1"] +}, Open ]], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"f\[Alpha]", "=", + RowBox[{ + RowBox[{"Hc", "[", "R", "]"}], "+", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Lambda]", "=", "1"}], "2"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Sigma]", "=", "1"}], "2"], + RowBox[{ + RowBox[{"P\[Alpha]", "\[LeftDoubleBracket]", + RowBox[{"\[Lambda]", ",", "\[Sigma]"}], "\[RightDoubleBracket]"}], + RowBox[{"(", + RowBox[{ + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{ + "\[Mu]", ",", "\[Nu]", ",", "\[Lambda]", ",", "\[Sigma]"}], + "\[RightDoubleBracket]"}], "-", + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{ + "\[Mu]", ",", "\[Sigma]", ",", "\[Lambda]", ",", "\[Nu]"}], + "\[RightDoubleBracket]"}]}], ")"}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}]}], "]"}], "+", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Lambda]", "=", "1"}], "2"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Sigma]", "=", "1"}], "2"], + RowBox[{ + RowBox[{"P\[Beta]", "\[LeftDoubleBracket]", + RowBox[{"\[Lambda]", ",", "\[Sigma]"}], "\[RightDoubleBracket]"}], + RowBox[{"(", + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Lambda]", ",", "\[Sigma]"}], + "\[RightDoubleBracket]"}], ")"}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}]}], "]"}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"f\[Beta]", "=", + RowBox[{ + RowBox[{"Hc", "[", "R", "]"}], "+", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Lambda]", "=", "1"}], "2"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Sigma]", "=", "1"}], "2"], + RowBox[{ + RowBox[{"P\[Beta]", "\[LeftDoubleBracket]", + RowBox[{"\[Lambda]", ",", "\[Sigma]"}], "\[RightDoubleBracket]"}], + RowBox[{"(", + RowBox[{ + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{ + "\[Mu]", ",", "\[Nu]", ",", "\[Lambda]", ",", "\[Sigma]"}], + "\[RightDoubleBracket]"}], "-", + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{ + "\[Mu]", ",", "\[Sigma]", ",", "\[Lambda]", ",", "\[Nu]"}], + "\[RightDoubleBracket]"}]}], ")"}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}]}], "]"}], "+", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Lambda]", "=", "1"}], "2"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"\[Sigma]", "=", "1"}], "2"], + RowBox[{ + RowBox[{"P\[Alpha]", " ", "\[LeftDoubleBracket]", + RowBox[{"\[Lambda]", ",", "\[Sigma]"}], "\[RightDoubleBracket]"}], + RowBox[{"(", + RowBox[{"G", "\[LeftDoubleBracket]", + RowBox[{"\[Mu]", ",", "\[Nu]", ",", "\[Lambda]", ",", "\[Sigma]"}], + "\[RightDoubleBracket]"}], ")"}]}]}]}], ",", + RowBox[{"{", + RowBox[{"\[Mu]", ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Nu]", ",", "2"}], "}"}]}], "]"}]}]}], ";"}]}], "Input", + CellChangeTimes->{{3.802584547265459*^9, 3.802584552436728*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"0d545a38-c01e-4db9-95e4-f88c5af2dbb5"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"f\[Alpha]", "/.", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}], ",", + RowBox[{"\[Chi]\[Beta]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}]}], "]"}]}]}], "}"}]}], "//", + "FullSimplify"}]], "Input", + CellChangeTimes->{{3.802583068883011*^9, 3.802583074697132*^9}, { + 3.802584540662136*^9, 3.8025845626479692`*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"fa0248f0-3f7d-4f6e-9993-42a1e4ec4f8c"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"218", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"84", " ", + SuperscriptBox["R", "2"]}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"84", " ", + SuperscriptBox["R", "2"]}]]}], ",", + FractionBox[ + RowBox[{"225", "+", + RowBox[{"242", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]]}], "}"}]}], "}"}], "//", "Expand"}]], \ +"Input", + CellChangeTimes->{{3.8025845723231153`*^9, 3.8025845743726587`*^9}}, + CellLabel->"In[41]:=",ExpressionUUID->"94cc5c4c-414d-4dd3-9335-d32a6920c12f"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"-", + FractionBox["25", + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]]}], "+", + FractionBox["109", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"84", " ", + SuperscriptBox["R", "2"]}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"84", " ", + SuperscriptBox["R", "2"]}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["121", + RowBox[{"84", " ", "R"}]]}]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.802584574652103*^9}, + CellLabel->"Out[41]=",ExpressionUUID->"316756b9-0356-4dfb-8d5b-9a6a362c3e84"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{"F\[Alpha]", ",", "F\[Beta]"}], "}"}], "=", + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"c\[Alpha]", "\[Transpose]"}], ".", "f\[Alpha]", ".", + "c\[Alpha]"}], ",", + RowBox[{ + RowBox[{"c\[Beta]", "\[Transpose]"}], ".", "f\[Beta]", ".", + "c\[Beta]"}]}], "}"}], "/.", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}], ",", + RowBox[{"\[Chi]\[Beta]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}]}], "]"}]}]}], "}"}]}], "//", + "FullSimplify"}]}]], "Input", + CellLabel->"In[35]:=",ExpressionUUID->"f6e5065a-29ee-4b4f-a77a-07f55b26ed28"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{"F\[Alpha]", ",", "F\[Beta]"}], "}"}], "=", + RowBox[{ + RowBox[{"{", + RowBox[{ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], "0"}, + {"0", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]], ",", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], "0"}, + {"0", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}], "}"}], "//", "Expand"}]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8000027400667686`*^9, 3.800002740091992*^9}, + 3.800005549353466*^9, {3.8025837322134867`*^9, 3.802583740120566*^9}}, + CellLabel->"In[11]:=",ExpressionUUID->"42ec6d28-d8db-46df-a550-a32767af2be3"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + FractionBox["25", + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{ + FractionBox["25", + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"28", " ", "R"}]]}]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + FractionBox["25", + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{ + FractionBox["25", + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"28", " ", "R"}]]}]}], "}"}]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{ + 3.802583740447805*^9, 3.802680703787733*^9, {3.803115426031837*^9, + 3.803115443220334*^9}, 3.803116111659665*^9, 3.803182862498369*^9, + 3.803188056718606*^9, 3.80378811555951*^9, 3.804235846404626*^9, + 3.8042423939551373`*^9, 3.804244366691134*^9, 3.804391311529827*^9, + 3.8043950127417917`*^9, 3.8043965207155523`*^9, 3.804404090217104*^9, + 3.8044142731842813`*^9, 3.804414308494985*^9, 3.8044147283686457`*^9, + 3.804419411029365*^9, 3.804421117053446*^9, 3.804482073473496*^9, + 3.804484154568108*^9, 3.804498839828072*^9, 3.8045688586345587`*^9, + 3.80458342220444*^9}, + CellLabel->"Out[11]=",ExpressionUUID->"a293ff27-c086-40b9-99a1-30c24f86810b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], ",", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"-", "5"}], ",", "5"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.802582647334622*^9, 3.8025826667517853`*^9}}, + CellLabel->"In[66]:=",ExpressionUUID->"8a81f1a5-de33-4fb1-a7c8-ef7e5c069523"], + +Cell[BoxData[ + GraphicsBox[{{{{}, {}, + TagBox[ + {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], + Opacity[1.], LineBox[CompressedData[" +1:eJwVl3c8Vf8fx6NcpCE3vqWs+rY0SEpKnSuijFKk4atkZCQpJEJW8k3LjORb +oXIR2qXxurbMe5S9s0e4y47f+f1xHufxfJw/zvm8xvtzPkrWF4/aCc+ZM2ec +uv5/9+0x5s7O0lmqV3OOjNoA3ddkBI3TdJbQqs+TmxyAQ5KtYx8m6KzGLTNf +bJ0BRU3XPxd5dFaKEe1erTuQeytCrK2bzoqyeO1ecgMQ21Irzyqns+74Zyd1 +vQCi3K0M/ePprNf6jcH8QSBNyC15jgadlfba7LDeHhZE7PTVlltKsRZl1mRp +trJArytwTgxfwkp6rJBdFpCDo3kPbTaUSLI+esa4j2/KxbXhPc73OxazHpAl +/fqCXHz0fOiUeXgRK2GumrQX8nAo4pjiTNwC1uDsoTCFl/nQT/h66MDgfJae +uidhllaA50VeNW4W4qx07X1NW14W4nRwlHRliiiLWRflX9xcBD+ruRkSdBqL +edWhL5/+HXM2K0DnxjyWb1Z6pJVlCRrC4m6mVQuz3nQbm75uK8XK+Q5M/j4h +lnTlicUvbMtxfruySOPKWSiKMVsPKFTCRqMlJS9vCkYpmxY9dWLjXIqGud6H +KdRvrrP6doENp+Xhc7+nToH9kpnU4MqG65TO6YrwKXjeqGlZ7MmGD5j0+jNT +mJui4uQcxEaUvoff0NQk9EM9/Hvi2Sg8vsBsufokIpX2j7wsZeN7sZ3Qo3WT +qHs25f2wgo0yTWTIr5iE1eDe4WCSjaoVl8X/Fp5Eb5mSs2ktG62ttd+2sCew +XG5BTPUvNsbtkzboOk/Ao0Jhi90EG8pXd826JI9j65h4heXfJFjNh5Q7YsYR +d2TF5Pp1JMx1bI4d/3cc61cuaxveQCJw0e00wmUcDlI7b7uqkKhPbj4uuXMc +/1zas2P3LhKhpH/Wq9IxhC1Os+s4REJeI7pxzbcxbAljXLc6QuLtIybtYdYY +7M3lJ2tNSbTZV/0TGD0Gu74Tr9+dIKExs1rc9MwYrgv5XtxgTaJbuegsnzsK +8+j9Ew1uJHzuN9526BrFsZLMKY4HCanR4Q9NtaPQmDqUIXSVxN6cZYsKvoxC +5XsUc74PiejjTtnRIaOIupcYjCASyl/9usS9RtEerxgbe4Na76pISb/zo/jH +Iu6U400Sg78/nztnMgrX/pfWnFskdIMX0jVkR2E80JDwIJxEQ5/S3rQFo7Bw +kzFUjiTheniHo8KsAKu2zw15E0UiXvYMRDsFcL9RL858QELV363/Wo0Af6Tz +5krHkSjsuik9UiyA1fSJ31cekuBmZZ2veymA/dLf/SsSKP1kCmKMngiQtnVx +2un/KP186nNYEQK8VVd8E/OYhIG+8DKmpwCtGvqDXU8p/dJldOScBBDcMcmf +TiRxRWqjS/g/ArAKN6iJJZN42mya76UtQJntC+npZyTUOtUmf6oLEDvoKFP9 +nER+/xJV1fUClMjZBCW9IHGMM2IXtkIAR6csdfsUSv+xyvjuRQKs39kspMgk +4TmTQWoLC3AwvC2nnGIxkbuiCQI+6KWyhq6plL5SRm6mTXxoHni3ODKNxOdl +G5kZlXzkDFfwpdJJGCnMbxXP42MP485oCMXNa/qW2r3no0p/V+8QxS6big1Y +TD4iLb0fGbwkMav2wn9FAh/E1YNdcRTf1wx5f+U+H++vjkc2UazEsBskg/j4 +Ya/sJZVB4rWe7qrNnnzcfEHa7qZYx3j1iVAnPr7LbF57nOKfpsJ3Oyz52LG+ +IMyOYrtT7Xl7j/ChNOBgc47iUSvWRJwuH7G0jd4nKb5p/1hFoMHHqeenH+2l +eJmLn53JRj4MT0ZFS1Oc6m4ZnybPx8L2GNUW6nt2X9MiaVJ8xHPtNWIpLgtY +IWotwodXj5abDsWnQye1vo7zsPLMtfRWar3Dd+svLxvk4ST7Xaozxf7RH1Pc +Wnm4OD9FvZ/Sb8mjBy0VVTwYPtsmeYLixMQrS5ULeSi0+kf4PaX3NuYxgxuf +ePC8rFs5l+L8THX/tnQe/stZv0ub8ufYe/r73U94mLfEUsTl/35+4Q7ERPKw +Q+YA91/Kb888UokbwkOR75mcKCoPYiVZx429edBuWq12l8pLHPvenZQLPBwP +Wzn3CpUn5VqXvLlneSi4/INjmETCuHOTSrY+Dy3uMctznpBo6Zewk97Nw1Wp +R8VnqLy6cvofum7h4ePAwYABKt8RMym0ddI8yMnXDRdT+V8tEqoVKMaDsimd +Lkv1462E/eXmKS4cchJlj1P9qVm2piXyFxdMo57kSKpv9grzlg5Xc6HX9SUs +gurj+JqOgwbfqecb5RR87pGQ3fb03ZwsLtbfNqYtCiORpuk/YJHExeoAi7fv +QkloMc4ofYjhws3HNk8vhPLDWO7OBV8uPBZdS10dQPlhOp1b7MrFAd7mKhc/ +yo9TjeOrbbmo3iI7+fQapb99nG2DARcJjR4N36j50xMgraW/jAuW9juvYgcS +830zhyPnc1FlsVv7jy2JLVcPJrVNc/DXwYf7pM5S/XTxne/dzoG9lVFLAzXv +aBZddempHNQ+yber1aP0Nb9+e+IRB3d3l43NaJM4dGQ5Q+8eB0zGmIXwHmqe +6Ru/aHXjwCgwbcdDNRJ/q7/zkNrDwXE1euv0ChIHVA5vOKPCQbzcj68caRLO +yn1NaUocLLhz0vLrYkpfRTnd/TTq/XVBcjXCVD8W3pC6WjkCtV9ZyRPd1P4l +plCYnzOC9r+0n95vZePW3E9eS95SrCgaMk7tJ1UTg22psSOo1j1br1HMhnW3 +WWbz2RHojvT8a/mcjZD2IWtlsxH0pH7Ls01gI7UpVMZTbwSns/1W7Yhig1v1 +xVdy4wjGwj3+2xbAhvD1g7EhvcOoqvfI8TvBhoGH76xC+TDyHE9c+mLMRvj5 +V+c+vRrGiLzahS/72FA8sXz7oPcwdMwkZ2c2skFs7SOPLBzGz01337WMViJk +nZzmAGcIFwaufWI0V6JC7siT4JohDNyaJymdV4nT8z+5fHg8BFqGzNv5dyrh +0xEqIac2hNI2zrz25ZXIjl6/v9f8N7JMhjgFSysgZtFjI6T1GymZZ3Rfcsph +rvg8UFbpN6S6VW1by8vBTV3NMhoYxAcDlthfweXYwJLf/er6IDQm/l7o0VOG +KzeaT5bYDlJ6VJ01+1aGfINHVzsODuIxnF5bR5XBqnr5e+mlgxAs3zcxvacM +sf1Lt3qnDODRLqHLH0NK0Z3543DknQF8TB7wf2JeCnWPCJf0ywPo2Lu1IGZN +KSpnF6e3aA3AI2x7QzyrBDRpiXU6ZD9UmBWbgvu/w4MQklsw2YexJYGFpuLF +yJ3H2r2mtQ/rgulXvhcVQbLE79Te/D6crTrnNR5chHSz6Qeud/ugEuAy4DBV +iE7HManqVX3Yo214tK62AGoq77cOifah85C//emwAvjz3U1Ef/ciUecZzu0p +wIrr3DuaH3ohzf0c2/ooH0ejfov9Z9iLIItSm/ADeXhyMn3dB9Ve3D4YpGow +nIsh+fN6bOleXKFNKupE5eIWszdIuK0HHPXOUHZdDnK+dcycc++B2sxQpIEh +C6p99XyVhG7sf36Y1h/7Ce4jmzf8FdwN48jE0X3vPuLjWIDljFM3vu4skj5d +/gHaNOXCsp3d2Ox14UngyDscXe39wPFnFz7dclj6Z/YVYpQrSk0+d6HdJnRZ +x1gWGreumrMzsQvTGowvsdWZsGWUONBcu/DN+WfWtcA0eFjK7kqS6IJouImS +jEUism1dXG5xO2H72b9wrO8xZs7nJl6q70Q++eDYVlo8QrydJBgvOrFtMIXX +JbiP2AfZTU37OkFuTn8fdfkSkU2eui7j3YFY8eBf5NpUYqYu480fqw74SJts +LTr/ktjXJtzbqd+BFBGmWbZVFlE6lGryRroDRg8cbbTZb4gmiSklk1e/QFZ+ +bnFY+ZlQpB8214j9Bfm7gZdcRL8SdrJJt+Sv/0J8Q6G6//Q3Ymi9IW/Q6Bci +aELLWwNziNn98fn/9rZjQiOA31ZeQOgaD4+7VrYjusu8XG64kAg109l84n07 +1BfeHnGRKSYkbQai1wa3Y+mr0cRezxJilf9u+zyFdqy1PhLy7lYlce7mvfhU +Wjt2NcxGBLuyidS7HZXhv9uQ+3pK3EaBJLYlhO20+tyGS2b+Qk9Cqwjd7Ebx +P+ZtEN1nasMPqyYyUp9pFu1uQ3zX96c8hxpiWfxFx3DFNrwVb4gzMawlasZo +EYY/W5F8bw07X7GeWHPNXDJhsgUPa+lSJvRmYtyi/+LW/BYMrRkb+K3QQpRp ++VUW3GlBx/OVH023tRLuM8/uDim2oFLsfNDzD21EboBgAUO/GcE2WvpKSh1E +jPW/zj8lm2FfdoPMLOggHHXkyhwamsBOtjoa5dJJSIrsDwu/0ASf2IVWw+Vd +xJnQKPGOyEZ0S6/7oVrUS6g5rnf0tGzEZrMod2ZEH0Ez+FIssa4RPgrMpyyb +fiJDovOmenYDLrqsO3r/r0Fi+u42WkhbPdJPOjyMKh0m2BeL7GRT67HhlC+j +33aESDKxKMhwq4epUWbSl54RwkAqKLiWVo8DTu484QkOIc+T6TzPrgN5P6Ee +N7kE90eqzpyHdTg7tdQ4R5ZHxEVXCW/YXAetvPDkHYf4hPOVc9ZfR2sR3j+d +KTTMJxjHJ3OOsGphXEEdbqIERO+yVQHeprUQORvZ0DA8Sux4dGm21KsG7pY3 +k336J4j5viJnrHRqMBuVdTv34yTRbBn3jb+gBvofM9tK7kwRwQo5vnJPqvFW +zfiBrvEf4sScY82vHKthYea1w2TnDLGpvVdLb1s1hGJyVU03zhI/EiWnXQp/ +wsndedIkeg7jeVCyxdz7P7H21/qA6hVCDG/bnZ8fnPyJxjfu+vQXQoxVa628 +WYM/UPmMczG6TJjhyswcX0L/gQq1r9HWp0QYqotcgva1VcFgaXPELiEag3N5 +0yK3l1Vw1AzOHHtJY1zWYq7+qV+Fc6kmvO2yYoxtT+0z5klXIfDobYZhgxiD +L7JWc/svEsI2IYEuT8UZHpWJh2Koc4So0k3bnXoSjB3qZ+sLD5KIicmIiP17 +AWM0VsF2TIb6T1nRcdtbYiHjlfgPzfEZNkoSM9lcv4WM/wFnCLRb + "]], + LineBox[CompressedData[" +1:eJwVlHc8FP4DxrnOColTGfmWo4zSQPmW8nyU0ZAosiUdSkNUooz6VspsoqUS +KRpGRkqLQ1FSIXvdOePC3RknI79+fzyv54/36/X89bze6p5+O7woIiIi6X/z +/969U9U9dnkLKh5kVgvCZMk2DY6zk0kLBoT2h/R9ZMmmigmT8iMtuN+Gxa/m +yRITJS2JlNoW8KaX1imEypAluaGJzvdasbQ04zDPQZpQAuc0M5Tb8fVt+o8j +llLE2SPj+0vDdoRu8BMsFZMiOVvwScamHf5GBcw5TEniuWB/fm5EO1KKK5bb +mEuS4o9Fl6nD7ejKmbP+kZ0EUXlhe8FRrgN7HHxdxVUlSEASJ/Spbgfi4+xk +3TrFCT1g9gG7PR1QiNq6tvGoODmryjBPrerAnS5ufEiyGGkW+2081tuBEx7b +vk0fFiOGvFh9K7FObPeu7LZZL0bYzIIFw8adYF9MidjSTCVmh6XHN6Z3IvKN +ZIqGBpVQP+Q8Z51lIeUfpTLpbxTi+sTyodE9Fu6oO9VEplNIbnzz7ehXLMRe +DZ+8+R+FMHzFIw34LDyZ95LFWE0hpTTnvWfd2Xj8pUXHIVWURHiLKmms6QKe +h9gFJoqQVpuEWSfsuiAlUvK+8YQIWW28RKzSrwtyJp1iGY4ihCNnLwhI6wJv +3xGTM6oixKLw8ediGgcBk+saXm+dhoSMzRnPAQ50Gt5Z3E2cgqOW8/vVUt3w +eSvVLe41hYwNjOmZmt2InsGXm2kwBevgoNAXTt24Ebf1aW31JBI494Oppd0o +76Vz19EmsfgD3z/tdg++9rr/a5U9jqDmiayT+T1oX3lx1sYL46gQivGsv/XA +RlOTneU2jsPLVA4LxXth5GOztE96HPm3N/huCuhFtkFzdPKh3zAPvObZt6kP +Z37+ezzHbAwJV5KS3+7twz0vhd5t6mPoefqo/WpYH1Y8lHpi8UeIGNZrd+Pc +PkS/LcreUihEjQ3bOWYBF88Dkx2CDIRgLFm1c9koFwPHZpU7GY3ibHvdxoCU +flwuUGv5cHwYrYVbDwUV9aNptemqOLdhrL32PiGsth+JBQdr4syHwTPP6I2S +GEDNScX9unOH4f4k9FLKgQEsfPdhorBwCGsDNZtqDAaRw39W8kpqCAnbb1Kb +rAYhP9su5PywAHztWcs6vAahpN0RcapNgMdNwtP9iX/5lPyd7jwB5ppWLhaf +HMQ+2/PHchgC/BZbU6jqyYNkpgr72Sc+0gKGvtw9zIM1JerCaD4fdm3POtVP +8TCY4+K7N5WPrJd0Ge3rPOQEe+5+HM6H9wGZ3YZlPChfVThYY8RHTXUbdZsu +Hyvv2pxgPOch63aETZiAj6tDLzvXMAZRSYvolhMRoL5VNlbCbBCc6PNhybIC +sJkOPgqag5gfcu4pU1sA7TOL5rSwB3DR9T9J6d0CSMM313D/ADzUwt4nVgqw +fEdtv3dIP2bfO74iO3UIUyrng6U/cbFk3vHyDTlDqHAotmdkcmFx6Zh7zbsh +xL+0de+N5yIk/GiMsHEI4sXupoF7uejZ7d+zXn4YrxhjuZdEuHi/8ND9itBh +/La1ytq3oQ9+Dxiz2btGwFvmJ7ukswdxwTfvxO0dQVS8g0RWVQ+e21Rprzky +gtpO9bu2r3sw8MfINC5yBP0cenbv9R4cdJEO+LdoBKq7JoXem3vgq5jzI0Z9 +FG0ROgxGQTe8I6YTVv0ahfQWLUw85CDCzVCjfWwUbF2hSkY8B2mG+zOjxIQo +jLyywO88B12d38vb/hHCgT40staLAwbSxiJthaA3NOjXLuLAc8zKuTVfiIpT +5xbyMrrg7ntL7cKZMZy+f90tr4SNiQapKn7sGNQWbD1Pz2fjxubgMNdbY5BY +KRp8/zEb37Qd21a+GEOqcphVVSwbZt1zkpvZYxgt2nFgwJENHcYVTf1Nv6EW +UnpPS8DCsNvFJS2zxqHHU/EqWc7C5S/CJkvVcSy+GpOvqMmC3nqfmBytccRI +dkUfVWLBe75F/wUyjvHBdh8nURYaGmdk6geMw4VTHVjyoxNvHcL1L9aOo9h0 +VPnPyb+esw1cY3BnAsnr7tWHf+/A1c+6B5+mT2Be+sJbIeV/PWrZdndRwQR8 +6TS7iKIOZK3fRFX6PoE4kWrH92kdqNdR+TopMYnNp0bNPp/qgDblLaPs6CQu +WSutX6ndgbIcsctOW6cwuOaU98PIdlTrvSr+7jgF2t3ml8qn29H4+PDIVu8p +ZL8Ku34jsB0Dd386m5yZwj8c8dS8ve2YG52+SKNgCkxjl50HTNrhtXfb61/0 +PxjOaC44xG0DVTGeEz7+B9bmGp8/1rVCYSBsloLENErDDPiG5a1Q/7hvdSpt +GqdlZi/LKmiFSci6iI9Lp6F/m37rx41WBLNZi+R3T2ODVAuv0qUVA7n6Xg9K +ppFfrfb2CLsFv3R7/D0tRMitTjeXGSIt+Fl5nndOTpRY0N/HnHRtwnWTJHP7 +uaJk/sy5ivLbm7AjO/fWIjVRwl4XZ5Fr2oSqBJZZma4o+eWv5rNQqwlle0xv +SliIkkQvWl6soBH5wknTqBBR4v+6v/FZdCMSNI5du9QrSuozG7jXyxpgf8pz +9a0SCjnmMeBZ71KPhCRFceEnCpGy3aP807Yede/KandWUwj9E7ekxbIeu6hL +jsu2UEjEAqtqimE9HGOHXpwepZAp/4NlGTL1cL53bqWPzgzyrS95l++7n/Ao +SVtqeGkGaRsI1zmo+xMHpbn0KmcqYboVzyhRrAM3+BVVeg+VNOWbOTySqYNv +TyTH0odK3jhyAq5Q6+BTqp3x4ehfLuPaFzhcC89w75V5MVTyTj5TP6KmFk5D +fz/0lkpWOHtIZsfXwqKp3tWXLkZSog87z55fiwVPyhLE+8TIvTbh829GNTj1 +cuNOudsS5H6p1Ls5577jSNrB/NXLpcjZLQ5F8TrfIEMx8lzWNZPsti4w3vr5 +K8wP2cXrXpMhmy/YXzZI+wKlQjU/c81ZRNJoYssiViWuBly8suKnHGnRFtHQ +06/Ajojtekn5s8mSVU6LjSs+QtflnH1qqDyJTNKKiospRx1H6sE1ewVSlfdV ++b59Gao8u0wVFtCIwO62W4V1KTqoj8bi6TSiqNcqcmBLKYbT9mUqL6aRixJq +vrIWpVDmcuer69GI6rPNUQ7rS8E4KhAuN6YRj8QMlsjSUoyfnX62zYFGTOjp +co+kSrH4obJK5CUa8TUNWri2jIk1lk3VMtdo5HkW44x8MRNWvXcuXE74u897 +caHvDRP+egtHEpNoZD7jzunkPCaK8hZXpz2hkc6MdEmNh0zsKDOIYJbTyI3i +j3eOnmPCa9/Iuk2VNGJ7wKmDcZqJoJkFQ5VVNNKTo13kEMJEkvXaPT9qaeS7 +348VG44x0VNH1nWyaGTA+8WkDoOJ8SDKkFc3jcz4Etug5cGErCozvbePRh68 +cTLXcmVCf7flPD6fRjYMLi3TtWPCXFSq6tgIjRwi+xuW2TDhmFJxbmyMRnSM +RYMMrZjwNY8xDpmkEZ/58snGm5gI7d4mmJ6mkZSqvJ1mZkz8DykEIIM= + "]]}, + Annotation[#, "Charting`Private`Tag$47516#1"]& ], + TagBox[ + {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], + Opacity[1.], LineBox[CompressedData[" +1:eJwVlHk41H0Xxuf3K5ItGoSnkhYhEZWyNURUQmRJoihCIsuYEAol7UoSeSIt +TItUPFI63yL7vs5gGGRkH2PGNhqv949znevz131f59znKHsE2HniBAKheKn+ +3yMHrTiLi0QUZKWdJzlMA1aEHK9zgYhItSfoVWM0sJbqmflvjog+vfikdGOS +Bhv0Lv4NmCKiS0lcEeE5Gvy8+UCEySKij401LqtE6CCi2b4e1RLRAOVZyHEV +OiSFnLa8kkZEOckG0hVn6PAGC35B2ENE0rrDPP0+Ogh5WugouK5GDlb6KQKh +TiDSfvk9T5RGcZZxSTc1u8CuJPWMWpUUeulVnsnxZUDEhJHf/f5V6K53IGmx +rxsKKam+uTaSSPNbrvwbHSZYP3DYIHgijvreD8V7K/aCRXqx9cFRUXT5pOKP +APk+eFUe1hbsshJpWTUXWCv3g1tckmx99gqUVfTaCs7+hqjTy96LEYXRhVnn +wwFfB4CwXQlMry1HXgK9Zw/1BqHj1pP4N604yvzkuTlxzRCsFfXO4e7H0Dvt +bqGTSiPg9r3m9kZDDGU/Noxjqo5AZpD2xaO7MZS/uS/5vM4IqHTO677diqGt +t8ofPjowAlpv75SeEcdQw9yRHD2/Edhv/amnqZWA0k+et6woGgGfBwLZPG8C +Mhr7+ETbdRTO71YX6ly7CAZhgTKDhWMQJPTldeiqRfiZnSsiVzoG4a0Wh1fj +i3DQnWJoVT8GN8me9w4NCsBZQv16y8AYUPMzFArzBEC/HJZuQRyHod1rNB+Z +C6A5vbCnPGAczukud7K5+BcuxN+IDNaagDN7urNLSvigkCndzPBkg1f2Hkfz +//jQo0U+peXHBl+FxGWVVD4YDttkXwtiw0W+qVtdIh/Q/d5Y42g2XIYcIv0U +H+Jt90xNpLAhyYIcNc6fByefRhv9WjaUOYnbK+yahy1C5d5ZepOgfkl/0f/F +LLRU2K2U2cQBxLBW70+eBWGkZOW9jQOOpmccnBJmwX6322jJTg7ESN5+Q/Kf +hecBNPdEMw7QXzCcpPbOQmWdk8Z1Lw7caLzyIa96BtTeURJ63nCApV7uzuVM +g4E7epZsOAWZjGOlYSY8sBGXfhp4iQs6v3XmW3bxgGY3MaAfw4XSYekdO1R5 +oP/13IL4bS6wZurTWJI8MLF8+KX6GRfUVx8JPtbFhfWK6Rmfy7nw0dxs43YK +F/qleTlGCjwozd11hfl2CrSx9bcjSnjgUEAsMMiYAnX3B4PBdTxgfeOMJD+c +ggtPzSNC6TwQqfrgZBU+Bac2r72cOsEDq98aWkUWU5AoV6R/au00tMlv6X7Y +x4HHBcMJLMo0DF6VNbSQ58B5uxcXD+yZAdHI3ImHoktz0PareGk2A5qXDmUx +FyZBwbyJIGM3A6H+kaLhvZPQ4sZzVLwwA8IuA7S31Ek4u3d9UEPWDGzelU9e +bTQJzd7S+pPEWfBg2ecy3NnQYWF0LGJxFq73jnuo27Oh2TI5sFByDqhdN+Qo +5myo+lIUL7R+DjhN3yKltrHhID21o95wDvDoQynX/0wA+Zh6nUrEHJC0hxpt +JSbg10vtlSPzc1D0SPXAH8cxeOl2OEl9BR9EXAbPYIZjcDCfXrdDng+OG17F +KCqPQe39CxMWanzgUDehIyOjYMvO52db8kENrTfIix6Fu0i3WXcpdynDMtrh +2SPgHG+4MU5pAcgkbJ34/BAoRxO6mw7+hR1DdK5WOgs+n7UJyqhchBD2drU1 +cSxwindkiTEWoXDmqqvAlwVBzuXNUexFMBFWL6vZy4IVl7iV38QIyG5T+GOf +lgHQceLc6tQhILKron6W2AAUja0JC75KQEWNJ6LlwvtBmVNGqF2HIQHt/ae/ +p/uhdfix8/mlu9/PxP/8tugH0zvug5g2hqrHqUc/yfaD4iHyP7JmGOoS4ysf +zeuDrxrjDOSDocUDaaUJf3qh5cPH9KiPGDKzmpi9WN8LjyZIvuZfMXTD3nT7 +8YJekLa9LDlXgiGpMyOPVOJ6IWVnra1iK4Y2XjE4V6LUC6nX0oPUpzHkFX8v +jSrcC1/qdSZVBBii3u2vTxxjAtn459wyYRztTL+19/RXJuRleF13lsWRWVHn +yr+OTGi1rt5ppoOj99SXeuUGTBBazpfJ1sORfFqAT+IGJjBppV5txjhqmxF+ +YNnSA6n5O/LirXFEpaVO9qT3gERxo6iQA46ivmjahpzrAZlrR5JMXHC0JcJR +Kn2+Gyodu5JHvHA06zIcoF3aDYL2D+fs/HBUYxhV/+tON4wduSJzPhBHGetW +a51w6gaVHapD2qE4ChG8vDu+oRuwA6UrssJxdLBHbzxmmAE9PjleRVE4+gfV +Wq35zAATM7O64BgcjWe4v3sTyYAfEh1tVddw9PMqT9zYggFDVDVW0Q0cJXsk ++LVIMcBHZkSDdAtHPqbrarw7uuDYrPoLuzs4Mtyct+1vVhdEH7siyr6LIymh +A7cSL3TBq1SFXun7OPo9QBvesqcL1vT86/1xiQvL/A4XEbpASoOVXr3Et18T +qNZVnVCiQtF1WuJTN5JW9j/sBMPSjqfW93Ck46PqQ3HtBJt3n0apS3rCh79V +iG3tBP/stPGzS3461I+qZrA7QG/tTyJ5ye97sd/xu4o6wDPIIrA5Dkcxo5TB +itgOYDQe/Uq5giOHWjELV6sOCLWuJzlH4Ej1/bNXk3Id0GnFY/qTcbRwd6fw +dSYd/MLsV+X646ghoNxTkUqHzs3/lqw6h6Osoy6/3gfTQfvxIuW6G45CtSc2 +mxrR4YYSUVlkaZ+HV8fGtQvTIcbaTSXhMI7WT8n9Pt9Ag29SDif+7sMRp5lq +SkilAfUrbdJpKT9PHjXhattp8H0lqSVhKV9+oV4exdPt0H8weoOZEI6MneZ/ +2KJ28DtcUkydwpDM3rvKrIR2CKZm7H3HxNAf+Y1Xw4+1Q8oAi6Rfg6Fvc/lM +yXXtkJ5l8phUgKF7HYeMs1htsKFjXIT6L4Z0nwYuVoe1wTs5a9WTvhgSjRQ6 +ddq0DZr6HBcoVhhiuD75zhVvg5hZOWKmJoY+7Nu+PqGtFTywNJfvEhiKU/oR +uS6jFbJie1zzhwnoOMGBkefTCvc0X2zy/UVAGr1/DM13tkLf3HUlSCeg5udS +C/5lLVDb0DdWZU5Ar2JfuCy73wKGFg0FRmsIKPzs3q+PnZfYsa30/tL/2ahy +OhyNNgOX3L5RfEwA08Jcun1BM5gp5ZaWhQigcjBebyi6GTS4hZ+ceX/hYk7u +rDSxGRh0U0ZIzwLskPSP3c9sAupR1kyg3QJMBmlIBr9rAk+/wE3FxXwIMszZ +1GLRBEUXY4efRszDzsxz75fLNoE5v8/UtnYOuEIqerv7GiGz4dT+B7JzQK5/ +bp18uRGGJ+XTc+JnQHeXO73sUCO0mdwr9vgwDdMpSmdn5Brh19rxGr9aHlA8 +noYdz2uAgPEo4freKdhbfmJ5QlQDUB9SmIXtHJjdpnDvi2UDTLlKHJGFSZga +3nZod0092J7bKkQuHoeQz9luyV71EFpnkGWjPgrTkVtCZgj1UGv5If5p0BDM +Sik9+7K7Dt6led5Jvd0PYR1pnxUbaoEULf7K15kJ81nyVRG+tdBHyvxYPkGH +Bd3VPKNnNXAJzWyhU8ogknBP9JleDZAthwJkJ3NAUCm2gdBSDRUUp8s36Z9J +mKuQ5U+RamCa2qtHZbWTYlRiTm/KqoLGMc3OujYmaTlbQI4zqgKj+8mWraos +knDsbIZ5UCUkze/ULf3NJsUfIRe8Fq+EfQeN7JVWc0kicpxqkdcVYLvH1Vks +aIaU0OPf62NSAQMlwhoGInySaM7IdFVnOfjtmyjPpwlIt4K8xTVCy6Frd/ij +iWDMWNxwQPmOVDkcUjiuZZK+zHhVffcRmwNlIFEqQW49JWJ8P8XF40PPL/iZ +knzhn0VR400rC9WWX/sFVc9zGzhREsb/A7/rcL4= + "]], LineBox[CompressedData[" + +1:eJwVk3s80/sfx23M/ZK+RSmkEEqERNH7Q7l0IbVWUuEsJKmVS4dc0m1KQlYT +WuVyVk6KEOni8tMR6aBciq0jlxg7NJtdzGrH74/X4/XP6/nf82VCpuwNxSso +KCTN5/9NaPUkemmOwfvCsk5+shb60z1Erm46Bh51mT05B7WQb3xcUuXBMRgi +9B29o6yF6KMP4pX+GgMi1ZDxIVQTmTdOn2Hmc2AwoSvo1kYNFMeeKz9XzYH6 +Hp93KZgGei8m8Hw/cqDDjeLa+kMdnVpncEqsPA7MPSb44yXqqDrfPcI7ahyo +bXUqDSvUkcdZGnnCewJ+GCRZNxipIfpNRkHd0Qk4en+Dab9cFXFKH37LTp6A +euXvya6Dqih9+FXg5qoJ6K3BR7CLVVG330hAujEXpLY2xGAbVRSyZgNxnYgL +ta2FXTV+KujSt96tUUWToIdePTKqJ6B/aneejHs9CRkRxBZiCQFtojXQk3sm +oZF51aeSRkA8jz/H01SmQHTlE/NHOAEFPk7KLDoxBUn+Zi1+i+f3Z01Z3fY/ +QND9vo4Yq4RmCc61y8g8qDWP/71gtyJiRgn+vneKB33UVNsDWxTRvoEnQyYJ +PFjsFLNojbUiKn+xUtPiFg8O6MVYrNVQRGEnNIMcmnlwTzy4/XoLHnV3Dij5 +WE1DUazz52RvPCrPp/ol86chbJlLavQhHGrDqGM6Cny4XUkZ3LwLh0avX0ku +0OIDs3ahr5ErDi1PvFz61oIPr7YG+9sa49DVwxdVNYL4QBHoOVwcUUDBhskN +OW18GKYrvHkYrYAW3I+1fVYsgMNbIJG7TQ5r9GPfuVcIgBISQzFeKwfPzJjA +7noB5CpWceMxOSSej04X9wtgeBnXqGDoF3CCznBcdWegQNarXHbxFzSsOPng +fdIMVJSeaUlp/QmUwpAFI/uF4DoIWRMUGWTE597NOCqEE35E86rDMnjq127h +fFoI903sXXK2y2Dq10a3jGtCGHz+xrhklQwiD2lEOb0WgmdIVaToyxxELKro +SjcRgQ7j9KiW9xyEUeX0Df+KQOBUMP3TUQrUIw6rvklEwP629fp9cykwHY6X +pRHEwHmq707Sk8L3oU/vBozEkG9GipUJZyEEmJJre8QwZG6r4lg9C2TJroB/ +qsUwvPp79sZNsxAYkWeYekECv450LcneLYG5PrX26RsS2Cf0znjjJoE72+OT +D+dJIFHpf1ck9hL4aOE/sL5SAs2nR2h3l0hg29jiAvaIBBJi1h3PGxKDZchN +UzvvWUi19Lt+IF4MM0eurvmqLYUH6y89dXwmgqy/xSyvZVKId/+dYvqHCKxd +j6VXrJZC94ZytlGuCMKWe06mIinwdS1POl8QQV+/YpldlBQecdK8FPeKoO7A +eburPVLYYXAysk8ohGt7zjrb352DSZUMH8xTCNkfrCJLS+bAq6TRKX2TEO56 +Ddwzq5mDptyRc7o2Qih39VZa8mkODPlVz9ESIXyxNOiQqchAfyxrwoY7Axb4 +upDmaBnYqdvOIdoMNFcQsg7u/AnvdCSFFVwBKC26PXpe+guuS0SBx17yYeFU +svZClXmvOtRzNCr4YNIS7lg879FqfNH6mhI+bEl0obbMe2bdWHTMNJcP8SPD +ZrpBcpiuDW0jxfFhqsoutLBJDo+7du7UdOLDv1acM2RPBeSQR16V9noaPrdd +4V3WwSFKv2+X8hce3NrC8CDp4ZBJZpVbWScP9j6ryjMzxKEIibZqYCsP2unD +25qtcKijQzux/SUPmn9zy1XxnP+Rt9MKKYMH1WKZW1oiDvXfNE+KDeUBfVUM +LXMch3yJn29kTf8AUgLZMa8Jj64Vf5ppCpwCOmORsrgVj/hpKQF5xCnorW/u +IXbikbF+70ic9xTsV1oTq/UVj1hhhtt87abA/4agMkWERw39YU4Hlacg4P7l +9ccsFdFf8p5znLJJCG5irnXIVEQTFdmTFaqTEKnBXdkeoIROkXfc2N3BBePH +zXTlCQJqjXW57V82DgkvthJ18lWQ5UCGfX3NGJxmRlY72qihpuASg+iVo6CJ +30he910dLfKhRSsXj4DHyX23rWiaqOvLBXLqoWFYUmtI8TDVRk78e6T2nUOQ +HXX1pu1nHeQ2uvjr4LZB2Evdbc2oXoCKZAXUJ+HfwOrQZVJxki6KpR25smLH +APSOqhXSSAtRpNpKwceWr9BO/u620BhDPWURSU4X2DCo9FByeyWGNgZsP9eY +wIYZZnjZUnMMqV3YkrHrLBuWcrnLTawxxDUpFoWfYENINF9ssxlDz27pPXpJ +YoP0kvyJzwEMzb7xpzZYscH8j6UG1zIxFGx72NS3lwXOXqxOTRqG6NlfmvQ/ +smDX+N3ULDqGtEt7ScNtLDhjvUKYw8DQYvHPXSmNLHj93LyT+RhDgjdlxz+W +smBvsz317TsMwZ2ZyI5LLAgNF7p4t2Eo5y2zsiaZBXHqNYK2dgytetvOKohn +AcN3029dPRhqpvt/SKCwgNOLXIaGMcRghut6HmKBNA4vCB3D0A2zPk/X/SzQ +Wva2ZHwCQ44jl0iOe1hgF+SlPz2NoeWMOKm1Fws8cGrtMUIMuZa/zljrzgL/ +oveXJZJ53t5GstaVBREe6ZsTZRiy1ejYYOPEgqQxH75cjqEXvfme9vYs+A+t +Rcto + "]]}, + Annotation[#, + "Charting`Private`Tag$47516#2"]& ]}, {{}, {}, {}, {}, {}}, {{}, {}, \ +{}, {}, {}}}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{-5, 5}, {-2.320700868212505, 3.686986570701582}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.802582668143413*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"e347d9a3-a698-43bb-8bf2-2715ea5cfe7f"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["NRJ of the Fock orbitals", "Subsection", + CellChangeTimes->{{3.80000064992311*^9, + 3.800000675071621*^9}},ExpressionUUID->"2e29f87d-b002-4387-9dcd-\ +1e29397736f3"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["5", + RowBox[{"3", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], ",", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0", ",", "5"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", "\"\<\\\\text{GS RHF}\>\"", "]"}], ",", + RowBox[{"MaTeX", "[", "\"\<\\\\text{ES RHF}\>\"", "]"}], ",", + RowBox[{"MaTeX", "[", "\"\<\\\\text{GS UHF}\>\"", "]"}], ",", + RowBox[{"MaTeX", "[", "\"\<\\\\text{ES UHF}\>\"", "]"}]}], "}"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], ",", + + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800000685747664*^9, 3.8000007004241867`*^9}, { + 3.800001148319057*^9, 3.800001352416725*^9}, {3.800001415423552*^9, + 3.8000014975247383`*^9}, {3.80000156302775*^9, 3.800001563452786*^9}}, + CellLabel->"In[58]:=",ExpressionUUID->"dc9b02f9-e10a-4196-842d-f4415b6e4ec4"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwVlXs80/sfx83cQjHf8+tXqpHquB5xSpJ4f+iCqCQSpaJcQkKhonJyiUqW +iEiiXEMq5ZKQdNhmaybklsvcmttmxsayX78/Xo/n/88/nq+NHhcdPCUlJCQK +f+//PKP/ltrLpIBLzAKzdDWGnu1WyGYJKfBZ/MqPsaiCksj3vFy/UOHF4R7U +cFEFhbISuVYnaTCXvFRpGkhAb/ZzcrYk0kDD5nyKiQMBzRTaO+IbaLBh3yW5 +p9sJyCeQUFGrSQe7SlpK0qIycv2VFGHEo4NHyN7AuTvKKEuBGkXYxwDOguVZ +zStKyNws/GTkKQaoU6Z8La2UUG+ArtFMGAPMY5LC5lYroTXMu6MtRQywTghi +qlSuQg/S7GzilFth573SUI7EKhS1hb5K3NMKksF23cSXikjD+cbYBX4rXMPr +mcfcUkT1cfr1vauYULKzZdnNVRGJJu4HVVsw4VxKLPG0giIKeXP4W0g+E/Bb +06gXghWQN7Q+ngxuA4F2mKbtUXkkkTNf3XO3DbwpZqbvDeVRmtT6XsqLNmBt +u5QYqiyPmslexMKONuBquvO49BVIy1GU47nrG9CCInpeH16Bxn00i3/g2iHl +IC7B9bQciqTa0Wiq7ZBjOfxHoqUcWqMfPF2zrR16w74ck/1TDlnzagwyPNvB +dlegU92ULCq87vDOmdwOWsUS+7dHyiLfpOu1DFIH3I1vVgsrk0GS/Jz+usIO +qPlXNSMyVQalOzdLvGrogKwWheb6GzKIsh7bkzDXATKcoQtDB2WQbn5Bk83x +TlBQe05Im5ZGkx/aGA1q3yFIzXs9mEijgBFtVnlpF/i4fzAlzeDRwKkuuU/k +LoDNRYH53Xh09HucPm24CypTdR3ZX/BoJ3Xs6ohqN3QGUGW5T/AI/zpXefXt +brCjDtXz7PAoLWKjedjpHvA65kT0KJdEn7C1j02U+6Di/s+tPzJxaHtCc+0+ +3T6YrdnoHJeAQ3kyV4aP7O+DbZTqEvvrOHRP2LHVN6IPvjZTn+xyw6Fj/cn/ +po/3gZHqgVJfIg6xi5Tnlup/wPKdG9mCXAkkvzFas3/nAGy1X3mZkSiG5t0P +tt7YNwA78nYYO4WJIfb4U+MNDgOQdCmpU3xKDJKkSqsTfgMQtpTp8EVfDIvL +k96dmQOg4b+9X5axDBO9TgVfJQeBfn5euGntMrSkaWrXtwwCY39Tf/FnEdwp +3254umsQ2I2bhU6vRGDNsDBZHhmECibr07oMETTKnrTZLR6E9v+qB4qCRVAT +SjpfaTgErfs9KQqbRVDiKCwsezQE5wt+dhvcXYL7ylSd7DMsKNN50LvFfxGq +jDe8OxTAAuOOIz73XBZh+NRFEIWzIESgSlhptQimJZijcyoL9MLFP05oLMK4 +zcnrK+ksONpQ/EC7Wwh7oqa+XjUdBvlaK9fjh4Qg4CuFOKwegdSNpFUVVgLY +tMFDLN40AkaC7dG4nQI4tLc8vsRwBEYlktAZLQHkJh1/KndwBPYGGXNdVgjA +YWt2U23UCDSVm0nualmAEp+/VXW5IxAdNvDkntMCePQ41uFbRkHxgHnh3ZB5 +kM8YvBDUNQpukWZlx33m4Y1rwPr+0VH47lJraHRiHvDdt69W48aAs6PHeL3F +PLz4Xr0tyHgMesYcvbNWzsNou3rBj5wx0Hd0Ypwt5IMvY5JUdXUcjOT1rHZP +zIEK6Spo3h6HOraaX3P/HFQflplOTh6HnKkwFfdvc6DwVc028NU4aOrnPq74 +OAfFNAdpzZFx+KOZ5rxAmoNpSuXVZPufwHoynlBmMgdBX6I9LmqyIfeK+Vj8 +Qx4Qh/fLzG9jw1nlsB36d3hAlVxRFIHYYO3Sd6knkgdbUAI33oUNP5MsYu0D +eNBVnRL54i4b2F3KRc9teGBRlve0a4YN7u+zgYXjASGjuXtP5QTEvk6oCL0y +C68DFY+usZmCfikf74JwLrSkY1dLjk1BjKjIhXSJC6ONqlmW56bgmadM000/ +Lqiu1Z7wvzkFlqllPy+f4EL0p31Rn95NweCKDMMKUy4cU7n51ldjGh7GHSY+ +/MWBxbdc7OPSNLx5eZHkFcuB7HA/toEzBzrF+bnIaQYM6lcIbrtxIIWUqbXB +ZgbqpQqk+89yQOdooRLebAYGEobVEwI54JeV8IO9eQaIz9ycf8ZzYKaA76DN +n4b0xsON2TUc0AiR9j6eOg1JK7c/VdHgwmLYMHfn0BTcyhIdmZvkQs54Q584 +cRLsDSqDdHlcWNIxwq+PnQTip0sPPIRc8LXMFZtHTEL1EJvBkP7tpcHA/bHP +JMxu6TpcQpyFB9e5klkWk+BR/O6gl/0s9Gjr1Y/NTYBFVYDN97ezMOo+I0Bn +JkCibQDVXONB7LhTTY01G/687HXFUYcPEfh1ez8bjMMwP/WYwsd5qFZ0EztG +j8KBEd/rSUEC8C+y9toxOwyHhkm6ROIiBBC5VTHpLGB/9ohsLlkChqSZW8jN +IdAndGzYc/oXlLaYZoUGDII88N17ectQti3ALOPOAFhNuS5oOEmgRn1CnqFL +P3xvOIdz1cOhnHLjX06MPngX13hKnY9Dx+vij0lE9YKXdMgAnS6JDFw9mDiT +HjgbHP5OMR2PGkJdfeuI3bDVW5du5y6FcOa5M2fUuuCrip5CyO9O631gRMX8 +7vaH0lsZengZlPVB2yHUshPCcTr2LX0ySKwcrvfHuQ6Q771mHVAui+LXjRY5 +P26HkbyNyVkRcshhG8e9YfwbJGutlapyWoG0TXfHpRh9A1K6V5O7ujwqvhba +xkxrA9dkN7rimDw6JNSaVJX7/Yt7c4VZtQqozX0Nc9dlJrBGLK803FZEmRXp ++RtnWyHHzHAdzX0lKmE8lOD7t0JJTAjB+69VaHWyy+uzCwy47XTWFs9fhfaO +JRb8imeAUW924W2aEuqvszA+t5YBadoZJTRbZaT/sbl3i99XuFmfkGZbpYzs +lP7THZxJh4PrnHIpmwkoog9fGt5HA4uAphOEeAJKnL0o/fZvGmSt99jcwieg +2rigvJl/WmDz5/xHh06oIKvWeX3bYSqQ/mrQYdaqIC2kcM7EngpePKlWsg6G +1JxL00+9p4DH61n1+EQMeeyVSSHrUcD/1lHRgQcYonP2My/qUCDkaHmn4kMM +OdCTwldrUSCOH3Kf9AhD0y2dBM9NFCg1ES6lZmJo7SzbRlaVAsJP4o68lxia +KhDQT8tSgMRUTGhswlDLoaFzZ4bIkP78gk8sGUMiTf4ENkCG55fpe6ypGFK1 +iO5p6iPD+9WkRSodQ+4L+TyDLjL0umI+be0YGhCKpOQYZNBkrd0zxMJQfnHV +Q/JHMhiUXyO+GMHQx/aMlKgPZNgV0yP0HMOQX53FslkVGew0M8t+sjFkIueP +Ly8nQ7CfOpHLxRCXa9n94iUZInb/I3zDw9DbU7ZKHoVkiFk59O0yH0NrJs2L +1PLJkPbq+V2BAEPvaeGEJzlkyImU8q5exJCKf2Kf6zMyvDziaRkhwpBtnYaS +6lMylGv8u8F8GUNyUuvyujLIUMv7UygWY8g50i3n8WMy/A/VzjWH + "]]}, + Annotation[#, "Charting`Private`Tag$30617#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwVk3k81Akfx2fGOAaDmV/1QplkHYtElx6V/X7RVm65QmhDd4RqN3J1SJdS +zWJZWUekQkIPNkSTqxIVhiRhHOMaxjjG9fT88X59Xu8/Pn++1/mcdjxMIZFI +l3/w/y38uKVEdxcP3KNnPuatIvDhPbcHMrY8aB25YcOXJdDRMK224jIPnpvf +7qt+zcTcY5tU9Sd4ENyqS+FvZ6LPF+dKiXf98HK/DMfGlIGyyd/9g9r7oTV+ +nn5rAwOfewSs+dbfD3RDGr1nLQMlOmJCysgD4Lq3+HAzhYGZ3LLNQdsGgP3q +pWlJvRL2t6g/6kofAM0mwcqIA0p4omkkrjRkECZs6B8jVisiMy4EdGIGQUpt +RdQSRRHL7KXG2OxBOFcQqZzGV0C5D2utA/MHYYtG9rhtmQI+fe8oqcMbhOSa +0Ge/HFDAsYaSELbDEGT/VRVunkHHoDdXfE7r8EG8KgU1reSR1bdbanozH5xq +7h8dMJbHtxTa4zDkw6sbmQeqf5JHLYyduO7OB8Pwg9TKRTlsL/szKvMmH5yL +c742PpdDs2dZD9rH+SAY8qdor5NDRnJdh0XJMETxemdz6bJYUXojooEzDMbs +liD1RRqe5Npo7Gsehg11TT9ljdDwzcrm4978YTCy2V7Ef0vDkLj22fNrRkB5 +5j3L5SYNv0fzV+VFjYCGdngem07DgkB5J2XLUXjgU1M3w5LBd0lESK7rKEiH +KFB8FWWwn6Oaau43CrLO4UXdy9KoqqI7fCryh//mIEN8l8YrVb9erioehQAL +EuGQKY2uzMjCExpjkKRh9JqxQRrFhRNE+fwY7FdTjBbYSuGKrlkTR9o4VESr +bD+DUrhBhvTbwKpx2CVgzlE3S6Gvp8JTxqZxcLvtsNVFWQrfUfV3HTk2Dsrx +0iuzeiXxgYvfWcWWcfBTCAgThUli2oWTfKP9AgihoVdRKRWNXtFmY7wEcGb3 +Le/iPCq+oj6S/OYrAMaA5/qqDCp2x/apxwYKYKP/kmA2loqsf7z2D10XAJXj +FTbgQ8Ukjj0n7aUA+oWevYUKVLxH3/KAqTEB7J18txx/CbyUurBvamQCRLWs +WJvdFHQwKgnSF05A4OiKQI4pBVlVZ+76zE3ATi3jSoutFCzr4Tc1SU5Cq6w4 +zE2TgpNa7fa5rEloWVf3ezuFgj5Pi22POEyCydQye2MVGc1KAyy5hZPgpLbc +uWRORtKnbnwZKgRxp9K8uzsJrwxVpIVeFAJZq2aiZR8JaaQUisk1ISwdp/m4 +WZGQaeDOKf5TCG52BncCd5BQK6Z5T/4zIWiOev0yqkZCqx3Vdun9QnB48dld +o24Z7mdkeF5znIJVpWxIHVoC7bNHzjvriYDsqejkYbsIBtu/OaUaiWAvpydS +YLYIW0huhnxjEeile9PvGC+C+S3L/kiLH366S5u3dhG8M9c7P/EUwRTc9J6a +XID4z5OGlDsi6NrCP5CQtACSWyMH8oUimH1hXVk8Pg99ogRXufJp+Kxa9Z9H ++WJIN9t85uvraZDytw+0eiiGg7GNd/IbpkElQmnPVJIYOjQl65240+Cx6W2B +91UxNDsF7/hbOA20IWFyrJcYKgps1A30ZuCerjPPhi6GBH8y3y5hBkZV7S+v +CZ4DK96J8HtBs5CpRLiG2M+CXV+cPov14ydFjrfbPw381z5RdbnzoFu9eqm/ +ego2MFrVLA4uwkjE/U6t3UKQBdGhTuESTJa3RzkoTsKeUY8ZDRcSnnyVUR/b +LwButR/ZYz0Z8+i1L8gN41B8jeOtLiJjfsfjKNc1Y3BE8lx3YyMFAw1lcrND +RsA3+EKxfJIESg1SnD8oD4PhUf1Gm0NUDGOakN98HYIPzPVy50wk0e/xz/6s +rEH4N+9S8noJKbxkHGTD/HsALpD1HN59lULzGyY5gff7QbYzdG9AkTSmXrW7 +2pzJA17WOnZqmAwWBucuSLb1AftnFWqpCw3LO1JUdWT6IC7pSO0hdVkcKVYq +5zj3ggfbq1F+QBY3fZoWRDzrgdldD+dSK+RwjtTLEdF6oJdnfr46Rh5PpTW5 +3Tr/HdJNN65+f4iOdkWmOZy+bsiNPsc4aqCANU3t77f4dkOMi6+1hEgBE/+o +V/vQ+g22dqblxLxXxKltaTdKvndBom5y7ntrJdQv+/1uJa0LIl/FJlqXKuHa +i2bvwtZ/BdvVLg8bNBkYkHZTVu9gJ5gF1B5gXGfgyvQNrKCcL5C6xkfznYiB +YV2XTliPdYDm6+x4uwNMJJrkVTbt7YA4g2q9jxVM9NNULP/2tB2OCKnN9XoE +aidm2G6Ubwefgkn163cI9D1bpMIK58KpS04LVncJ7JGJ+Cs3lAvnnIra5O8T +uHFlMNv0PBeuic7djosn8LOa5bz3GS7kmczNJ6QQWPNv9bXs41yYq1puzXpC +oHBH3GV7Vy7EfZSP5dQSWLe1liQ25EJShv+xq/UEejkO/5NowIWMs40We98S +mHO86b/b9LnwYlWc+G0jgS3dTpZ/aHOh04M49qmFQFWInJlfwwWdXhWLnl7i +R+exPqtluWBUFMrK5BGYHVXmXSXNhe3RX+YODxBYufbah6OSXLDRSXk2xCcw +piNc4QWJC8En1VkTEwS6/aq7tH+mDcJ2Xpx7LiRwLiUvmSxqg2h6z+ezIgIt +q+uePplsg8T8jJuzswQmpxrrksfaID2KerRMTKBYaS/76XAbPNl32DxsgcCK +iuPBbkNtUKRRo/bLEoG3MkNfUwfaoEKoPbe8TGBCg3tMQV8b/A9G297T + "]]}, + Annotation[#, "Charting`Private`Tag$30617#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwVlHlYzHsDxadpkZbbMm7WupVltEiuNeF825AU2pBQUxQhKUspJbmVK0LS +LaJNaBOFQot+0a4QTYumZaaa1mmaNtLr/eM85/k85+/P0WB5Wh+i02i0x7/z +/64YDL+xvKEBey+PfcpUYZCM2l9sw64GuHO6eaniDHKCq9WRk8lGOssgZsls +ZcI5wJYuLmdDlJMpGTOuRGwawvSqO9nYVlbPcm5UIusqu3y58xrR7ZoVMBqv +RMSzUxRVQhtx8m+dVEldJRLjr7Hp7MEmRKu4FaTaKhKZ0VqXS35NSA9QtaEb +KpIAz6Dw67ebcOuSCi9BQ5GwWK1fUiubwAycVNzTqkB0t97zaFjbjBFfXlyi +qgIpZsz9z0CxBXz7ZwLdbHmyKqKswEynBXfvupxJvixPHkqd69y1uQVcden2 +cAd5cnXi6/Kj/i14W+19KkZSnti3Rr2P7W5BmFiC+F0nOcJ/ojjyo+g7qmXy +beW1ZImMRgizdR0HgfSjfmt/SJOyDTeWXzDjYH98WP7sFmnyz574tarWHKjl +mi1aWyhN6JGvtuzz4ODiDLlo/RBpMvmrz+3bPQ4OfG72nFSUJr3Ndo8+0tvg +FsSVsV89g1TFMLWKqtowvbUlm54iSa7krFpxkN2G9eyunsgISbK11sjgF7cN +UtyhZIszkoSa4Wi+YboNZ+fHVJtulSRvzkQeebWiHVvqV7AMBiRIhu3E46fR +7VB7qs2sMpIg1xQrtROcOrA4V2lGu4Q4yVurmmt1ogO+L3cffDREJ50HPPHz +fAdaVmdnRTXTiWEGw3b3nQ4ETxY+acmhk25zxwD5mg7c27/Ra4kbnZhc6v/o +a9iJDlqCn/EnMTIuUjhtrcLFxjnmL/cU0chCVdb09EIu/gqXdVv5lEasTHPC +M1ZwkRazrETrAY2k3NwTL23JBd9n8Ix7EI1YL0/4UHCJi319WrlLjGkkw/3v +eToCLvK1c29zoqbBarItFK/iISx6k5QtewoycW3Hvdg89GjMexpWOIVnDicW +tPJ4yPU4ZMRNmYJ4Y6hvvlgXvs33L5zlPYXkhvyVXmu74Dzbut1EYQq8evVH +3xO7EOfhdi7O6ieO1vZF5vl2w2ZLnphG1ySUI33BDO2GSsbztvy6SeTvkBqI +iupGzFiPu/ebSch+/MviZFY3mi3STuPmJNKrrSWZ3G4U+z7o2oBJDFS88o3a +2QO9ZI35sfET8CoNYXky+Yj+s3Qjy2scap2bpUZX8iGxzooT4zSOSvrMJ/6E +jxjvRpfOHeNYTCIE4Xv5SDU3OZ+nNw52/u2g5H/5cA0wmtzdPwajpw/j2YN8 +aHLYOVtOjEEprqzR5FUvfpWs2CR/YRQFeVcuVFC9WP8wLi7ecxQeDds1d9X1 +YrqP+kScR1H6Z92RA/xeTO3oP/DSdBS+kezxcwv60GB0Z/CI3CjaLvNVMoP6 +0J+olVsdL0L2STmbOeb9UEktaefUjKAqluGbYd8P8SJWrWXxCHjUvPvGrv0Q +KKT1VTwfwby5Wr3HAvthJVVmIooZQUix2aXi3H6Y5aucn+E6AnvlwOdHNQeQ +aPuJyE4JMflcwHj7YwD6P5VKOg2EmPV93MB65iDMBoZjl+gJoSdNc+pSGYT0 +8Za7pzWFcHH8I13p70FoPemuWC8rRJWEjulh90GMtPMiDrYMI97O1UehfhBt +xTOWioUMI+G8B19/9xAK5zn7qDcKoF80czx0/2+mb6y5XitAkcQjyVaXITCL +bWOlPwjAiehUjzg5BFMfBVuVHAHUHuzf3RM+hFPrvn5/cE2AWGoHlfBmCE7a +dkw3MwFuyq+KV9YUwNJ5wWuXvCEE3/+5a6RPgMjUd9YnvQaxU/+Vl45QgD8C +9ty7xxqEWrH3DdaEAHwPDc43m0Hkt/NrayWH8eKxu7z3mkEML2bvyFAbRtEP +s83GPwfASs+1PLxzGI9MrwStuTIAo7wT5g3Ph1Hj5XNVPqsftM8c8sZPCDIq +sveb24eQnoIEv4tCbIo9EuAp14eZtHt0gzAh9kyzhzyne6G8bC+Ve1uI5pAr +/9zk9mJxaN2WrKdCbJ4t1eP4rBfbDN9ZJfKEGOIxsycte3ErKckxzHoEdhrp +1dNX+Vjic/icrbYIc8c7K2OZPVi2vtXmvr4IC2+UpLxQ7cEq2p7l/DUiJHvI +V7MZPTC+as4LNBHhm2Zr52paDw4k69qmOYpQ6fCcZcruRvSX4eX06yIk+M4U +z7naDcnVgV1ZQhEct/sZp413oVN0x1727SjO5s/yuNTBQ6LRSu+WklGMFRgP +hDfycDCi5npWxSguFgfPulPHQ+MiyXKbhlHc2N+7rLSQhzqbU4Z3haPQ1HGp +9bzLQ0H2dvVl2mPwfef0edyehzvHxfhWd8ZQI3k0M62Wi23cowE3f3v6UUbJ +DfWdsOqM1FFTm4R1eLGxh0YH+CWsoLKMH7C/JWu8kGqDntJXVZODv3+IXn8/ +4jwHMhA5Nwt/wUpblS/d+h1b+h3GNO1oxOPhg7/iWpvR8M5VzEFXjHztf2qo +uKgJuWHUAXWRGNGzy6nY9YyNw5KnOTU1dBJzWOHDpm0NcDl1PlcuVpxIXugx +HJv3DcvddGq2O0uQTDWFkV1yX/FRWVf2tIEkoRsmPXxFq8frzOA4XXEpcixj +vNxlwRecF9PeWdUiRdpcXj53MvgMmWa/rSdyZpDarlkLS499AvehRtR9f2ly +9LhdnfObOkQtnSuRZzeT6NiHWC6SrUNk7OEPzuoy5LruC8tgr1o4RO2vkeuS +Ie7Mxy2vyz9i3DRl4n6BLIn2deSkpdegg2t87l2oHDk7nGfPfl6NxI0r5lc7 +yxPj+dkf5V9WIePyaSW3ZX+Q44dexgawKxFq52IhLvqDOF5THkiXq8Tq5oTH +odUK5HNDe+d6wwrEaMVlVFsoklBtcb2XweUILIqIschTJOvO6ru9Li2D5Xy7 +lIpFSqRWPZnmrlIGoxMf9imFK5GbSZ5Lzc5/wP0FrEVVIiWSbvVmwZWm91hU +khpttU+ZzF9lqlNj+R6Ry95pfypQJg73vc5ZlJfisFCirlybQRyrrxzZSErB +yh5WD7/OIEnmjnPWv6dwLNjm57YbDNK1cU7UYorCaZucb3K3GIQ7YOGr9I5C +mOj0tchoBmlixQfy31LINJj4ceceg/xaF3EuIZfCRPH014dpDBKgl0pbmEIh +8pNcBPWBQdZYtEZ5h1CITTru/k/57/26tcSxYApJPjUmWysZxFXOm+0aROGF +SuRkZQ2DPDhqlrPbn0KzA8P9cz2DeO8YXWrsQ4HZMdekvYNB5C62j2i5UtDP +8VNL5jLIyv9cs5eyKKy/3DRxqItBbASFdUwnCtuZ95728BnEhX9tI9ORwikP +dTWBgEFSmO4F2rYU/DdcnHgmZJDmudeida0pXJZv/+IjYhAJ/9Q6vZ0UYrKS +/h0fZ5B154xPrtpOITFIwi1/kkEuafz7ee02Cmm7Dhn7/2SQFXvt/jPcSiFH +873qpl8MMlUcUozNFAqESyampxnEa+aUhakphf8Bpc4rjw== + "]]}, + Annotation[#, "Charting`Private`Tag$30617#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwV0vk/1IkfwHGMc8aE+Wx2UzRRKbHp0rda+34LW265Qicj2pIj+WaiRUgq +mdCSkkbpJufGfHM2tuQK1dJHkTGOYTAmOVZm9/vD6/H8B14rfINdjijIyclF +/tv/5YnT+E9e9IFXwnR7gTaBVzQbjbiHBXA6bZHDmj0MrNiqW+YYJIDW5lCX +TmRg/8FgmI8UQK3YTPWuKQN35BNuezMEcC+SGp6sycAhm/1n6S0CEFl1Etw2 +LbSME7eyd/QDczGhnO6phTNTGuEu2kK4P7qW9l2EJhro+spkBkLgBmb08I9p +oqNVaVL+BiFMrzhpf/GAJualet5SdRDC5S0XzVwsNdFlPfdlVZwQQja67WvT +0MT8oxt11kmEUJZSr9riqYG+pFs1pWkAptt2NxQJ6Ui98flEaNcAbNIyi5C1 +0rHYO2hZz8AAVEvOBx7n0ZHyIZHNkx+EnsS89dkpdLzbydsUunUQLO75XPLZ +QceBd8wHn3IHQSyulWzPVMdjb0Y5FewhWOHuVFh+hIYMDhsME4fg0KvrdJYr +DXlOymPp6UMgsNLRXmVBQ1rrcruQp0OgqnP9v+PLaPik2UXJUDgE44FeBZnv +qDj2upyd7jwMFM577R/sqBhaH+8bbCiCK6bqFc+s1VCv/xflr5tEcL2tcXjx +VjVsVFB7FIUicAlfFx2/Rg1XYbIkyUsEL5QjAlNpatjFuxZz95IIZpxig4La +VdGi8N6trnER3P817qkmSxW1brz6YFk+AgoUfb57igpWVVz87TV/BLy6ODGc +cyp4vNNef0/bCJxeGvqoM1wF6xe3/XpQNAL9Z/qknP0qyOZ0zUQsG4WtistX +5hip4OcEkXZBzCgYbPArZjYoY1GIuusPNmJgGt+nmWkoY1MWwc73EINyyYyB +CkUZB/g6OTv9xFDe6OUs/KqEOkvWjgRGi0EWoJj26pMSxtdax9WWicFv0e6k +NU+V0IMRXXJMfwwOJEjVzF2UcK5EQlT+PQYpIR21ZlxF5EYeF5nunQDX5KOh +bw5S0LRGbSbxwARcLfpmM+9OwRrFB0o9rAmwj6J/W+9Awd7kfmZyyATctLrc +ULCDgnq3D+wdTpqATw8DelWXUDCL78TnPp+AAf8nh1e/U8BU+uZbDH0J5Hl+ +6OS7KOC5nPk9X0YlUG9/82CRjzw6m5aHrpNKIMOksrLQWx71asOu+s5KIOzP +9NwyV3nk9YnevFGahIc11YJWa3mcXNXllK83CU0PLqdaG8mj75MyB3/nSdDN +Ob/F9IscWlQE2XSWTELNYCCt65IcynX04vMzUmjFUldOqgzih6u4Z2Kl8Cwt +VnU+QQZqctkK2y5IoTakLDWULQOGiRe/7JoUwq58mWUflsGqxLZdTwulsFhE +/bDwowxsd9Q55g5I4bs5H5vW5gVIu3Nn/wWXLxDo1BJmwViA1af8I9yMpqC0 +wyvNqXQe+qcyPGiVX8FXM4yad2oObIXHzqaGzkARl5Ub5DMDjv2cdXp6czDZ +6aHrl/sVRC98Y17l/w09zK4k6tYp+FHrva7loW8QURqQUtMtBSpM+XRLF0Dt +RCTrbdUk7BJ7T+u7y+H5K5lu048k0FnnJ+9tLI+PTz8sZ1ZMQNkF/kHmlDy2 +u9GWryXHwV8pvLelRQEDx8OymHZjwDoZWaaeRcE41vkU5+lRWB+wrsXeRxE9 +WczxqvoRaGUY08K3KWF2cKLc4Wsi+F/BuRvG/374uqNu6fuUYYiUN3Ju+qiM +1pUm+sTFIaB2n9kdVKqCYlM2JfvmIAjvrUjPiVLFkU7b6OKWAUhfs0Sxwl0N +N35Lj729IAROlv9LHyYV/SrfljjYCME7/UCL+iAVWdamopjcfpixypvNqaJh +9iHD+PszAhAId0bUJapjMXdxyDOWAHLNNyxt9qHj9ahZveeNfZCfEK4VYLII +qwd+3jht3QeJ7iw7ytQirDdP8Xjb8Bm2dHMfJjZrINNM45O/7WfIXHsjv9lO +E5UPBR3jdfVCdE1ypl2FJg7pd5wWHekFh6Xuea9XaiHPUaa34UsPWAS93KeV +pIUdr/7K4G/ugZxlviubprQw+pzbWY3gT7Dyxf3fHfcx0NxZsnlJ9UfgmNQZ +tVcxsN4J3VbofAR/qWJbgxGBL25vC1UN7gbfoklmUgqBAS4bdRzfkxB4znXe +9iqBZ6s5j4s7SAh3Lf1LPY1AWUxxxfdtJFyYCr/C+Z3Acr9SO0EjCQXbZv/O +yCZQaC7YGVNLwmyt7P29xwR+VLl7qO0JCZx29WT+SwKb45VZrXEkZN05cfR8 +A4FadH1by1gS7pxqsdzdSKDl/ucPn/1Gwh/anLnGFgIHFYfauGwSur2Jox3v +CMwzYNdFBpNgKFhi2ScgkFuSofLLPhJMS8/o3RUSGGSqE1DrScL2BHL2yCCB +N5tp5uYeJNgbZhcOiwjcu4pnZ7aHhJPHmXoSCYGnqH9MmOwiIeqn2NliKYG8 +rwZy+VYkJND73p6aIvB54bd4450kZD69c2lmhkCsDxszNichN0YxgDdHYFNn +a3v+dhIe7zmyM2qewOXG3xuv/w8Jpfp/6v68QKBixdq5wi0kVElXz8pkBErj +B3/atImEfwA8aag5 + "]]}, + Annotation[#, "Charting`Private`Tag$30617#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.1023541453428864], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]]}, { + Thickness[0.1023541453428864]}, StripOnInput -> False]}, { + ImageSize -> {14.662804483188044`, 24.508064757160646`}, + ImageSize -> {9.77520298879203, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.77}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09523809523809523], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI1IAaxQYAJSjNCxZjR2DA5dDXI4rjYpKrHpZcY95DK +ppabKTGTVHfiEgcA+NYCcw== + "], CompressedData[" +1:eJxllG1IU2EUx6dOU9uc3W3XzW3urjm3u4WZikFvHgmzDFLMDysss5qjQCUy +SDMKX5KakZjkC2L5QksqtA+SC7Uiqg9qFIKEfVDSsIVipsggbe25z/UZ1IGH +8Xvuztv/nHt1p0tybEECgSDAdw77TqDvfBZ/oW0pwSAMu6U9U2yGUWR14bBz +z1DOvQIzrAwv9dsnRNAXX9wVkGeGl47hyuQZMTTVS8pTLH5urK05Pj7IEm7r +1LvW7Cx0TzpndlSJIcHcI/3YbQLTr1h3a5gY+gyzVe0LRlA/o+8HTgeDEd2z +KmhBdkwI0+n5aa2faBClRWQ2s0J876L55wIc5yYNKs7fkyoraygdO0vDzBH3 +qXWtJ5V58WDYFiGHC87Svj8SAczfKHIkquR8f0JITkImh32laVdH8kIIFyJ7 +GEqY+1mOhI14d6yOrIAEinAts8kwmkvBRn6rwar+sCYh9XH1nxND7sL4UnMH +zecXwWukU1AUYU7nVT9LuXgKsHH1iHAd4wq4jfL/FMEr5N+lxHmrKehFehaZ +CDcjncpMOM8bCuR1mT+EKya+HwpSuPmycGXKM5m0WQrZk6qKggYW542Vknly +fRyS4rpEZihH/38sA3X7SXYkwQxPqW0R9nY5zJ23rDbtNYPr6C6rd44mrOV0 +UhFe9/osVQPfCjomkrNYwvMX++W/HUbC3P5kGHC8WiXO36bHc7krI8ztQxlF +eGMeeE/0kPHkrVMwwOtYqOHnGg15aE5qFdjR9TsNmedQScVCyyWGzF9yInsq +0elnLq7bz6hc76KfB5F/ug7vUZwcz8GlI/EXO3uZsdCt//EBVKeVxvrLdFCD ++mik+feA4feDhp5V9+VRhsF9eRR4r69Ewf76KqowXM/veTREoroz9LjPChU8 +Qn71vH5JGphF+m+P5eNoeTbgegYYiHF+Pxh/LY4w57dsJMz17WX5vY+BanFW +b6PBgvVRKuE5VH59r7Dw+7YF6xxiwfXt9jMXJj+SsADZ9WDi/+/36S/Q2/hm + + "]]}, { + Thickness[0.09523809523809523]}, StripOnInput -> False]}, { + ImageSize -> {15.756732254047321`, 24.508064757160646`}, + ImageSize -> {10.504488169364882`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 10.5}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 5}, {0., 4.7721512759756815`}}, PlotRangeClipping -> + True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.02224199288256228], + 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[{{{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}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4vNXw97o39Zz8Ls4MeafsroDjO+xv1bWIl3D +QaTH6xXLFz2HBpaj/Ybmmg4y8+I0TxvoOzyIEN9+sUHLof63VcE5D10Hf5B+ +Z20HnxPstrNNdaDy2g7paUDwTAvO3+HQ9Oh4hDqc38Lrv37KURWHX29fH7B0 +1oTzf4L4ympwPljfDxWHzPwPrSdFVB2mtLdGXZZRcUgFmX9M1cFjzdHlDBXK +EPunqjlU3v9xy3i3kgMLZ5d88jp1hw+L1iucjVByOHHYaW3mP02HmSDAqQTx +3xVtqDmKDvEhQeoLVuo4GINAsyLcf/yxAfeNvis4uIPC5TmUX64ADQ89hzMg +0CMP58eoRsic2yML5z9wjXecVSgJsSdNx8EN5N4IMYcXxVtFf7/WhPN9QeHI +rAHnz1mkvPOPuppDqwK76hkTCYdakHs41Bx2BFtF/FeXckiJvePGfEPV4U1b +brdRtCw8fGD8C6D4lFZ1WCukw5deJwPng+V3S8P598HuQ/AZQMBB0uFp4sJr +JvyqcPu3mP84lPJKxUFh14J9qXxiEP+4qUHMvycCce9ydQjfTgSinksTzj++ +a0cvm4EunA+K3lQJA7h9MP7e/Jq3M0UV4Pw7mrJr/hsrOpja7A2a9lDfofzw +NteZfxWh6VLfQfnao2CGOUoQ+UQ9iP5UZYcnoHSWoOsgUjmp5OwWaPrYquUg +BYoXARVIvJ1Rdwi8JV2TWARLT2oOG/TyFjPaqML5f7+VPpgjqA7nB4DUC2lC +8om7Bjw//AeBeC04f73qk+Z5vtpwPsT/OhA6QMshAxRfV3Sg+UzT4XmW9rfp +c3UdXoPSRbcmxP0PdB2kwelI08EElC4/60LsqdeAxL8EZv6F8QFDZ5x5 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld +AKjmAn0= + "], CompressedData[" +1:eJx1lHtIU3EUx6epZZKGsTvxAbo7nZth5ua9u0vhWFgilaaBQprM0pWRFSpZ +WFCavTEhM21Y9hJBqbBMpexhNstXD7EQaSaCj2ngMlF8rP3u3f0NCg/8/vjA +73fO95zvudcv7Uh8+gqBQGBnOTssx95yylHMhYHuLtm0MCKDKzHjDkoNBc/h +7JDeQw6dKF5Q4F25V9YRIocQec26TxIac/VodLBZo8L8pqg68aM7A8bsZ8J5 +FxnmwjWxj647SjELUaFeCbw65aPSKlUwGJUaWXGMBI/SXucDXyjMfH2eWX1V +Nmb1n6AguratWpBHgulx3KEKLQV17utdtcEknJ5XH+2+QEGiM3FeYRDDQ6S3 +hAK3lDhDqF4M391NkT0NFGxj34thYSZ3UPeTAm2GJQgx+A8XVHaNU3C8tSGq +fNEPppv6Ly060jAg86k11/tx9WgGdk9+nbpZJQKXrf659jEMCFCACPb4Rk7t +S2Y4PT8I+NC6ue5gFgOBJslYxUUCdn4uSV4qYGCi6PDlUC8C/qD8pQzXd60Q +NqB5P2XAt/lOS7qrEGLR/S1qUCpQCOEdmmeajdl5Ftq4OCFHUnZ7eTajSN2E +8/Oc7J/k3Z1PgB7pXVJb+yNgJDNopqxLDfmG2X6FkYDt7Ssjbj1Qcz40iTh/ +pmgg+4YSBBNieBKcdc9Op4KambG8TiCh7JrbScqo4uZXQHL1YhnwRPuzVgI5 +lrXp+MXArn6vfI1JgvudmzS+ZsgAzOw+nZNiHtZU9Sl7ZHi+3P4GcfP9TWNm ++261MbI5g7L67fQ/s3q6wzCvRv5mLs/s/RYFzs8zHf4y/oZGzs0jXAn65sar +TnFycLW0kd6u5OYaIYdptE/flNZ8Nq6nZ9/ulwdi5ubvibkxQZ1klopwPraP +9wSux/vH+lSjwP7yzPs/inSkWN8HCHE+fl/OOLQVb9SGYY5B/jtSmO8bWlx1 +2RR+z34fUhrn55mvP2CxObSUwvrY73UVhfXz/ye+P575/v/9f/0FzX4PBA== + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlF1IFGEUhmdrsy7MqFg3+sHU0tpFSV0UtpnxzFxJCC1atEgSW432Axl4 +FQwIQQT9UEg/bnWhGEVEJFRogntR1CwoGyFo2MWKFUUpZcW2IbHNN/megQ58 +Fw/Dd877nvOdKT7Y0WQslSTJY5+99llin3exvonQAY3MdHaq5st6Ag81h6O5 +cj89nTr3x9inUZuIl4V0Yddnb2i1Rnvmxud7+gopJ8Ii2r81ujFlurx5uDdh +FPjo7qeGylzx4v0yH+cL1YjwUecT38LoHZcrLvdmqzIue/u7w54Kne+/F/rO +6pwfjPpF2vyhMUVnfT8GIsdv/HL1O/q+uv7A8A9+VJd9djiwjXlMRH6A8308 +FsxcVwJczxoeupgXCbCeOnmk6VrM5UE6PWOtC5K1Pdw96tepXejJC7JfMPoB +nl2Z2BFvcTnqH3wt1UJPkPuN/GDUx7ygD/2Hfswb/sDwD94yMdMszZbS/fNv +j0j1Go10mHPxD4tcpJEkYrqU8nc/vGJME/Pkmu/aq4zK3BO345TLhvBVq3I+ +5/tvheuBoQcMvV0L4ZOpFSr7ebPBjFVfVdnvTzGv8nruBxj9cu43qNzfxuRy +5eYyl7u8Ly5VtSvMyef6g6Mpmdmpd0bmeTj67u3k/GDUf1x5ot8jy6zP6VdS +Zv3fhL5Jmf2B4R+M9wrGe0Y+vHfUwz5AD/YFjH1ydLTKvG/Ih31EP8DoF/h2 +OlFwq1Pl++g38oNRH/OCPswT+jFv+APDP3hVayRdbZXQgPDbqJIjZ7zkXx9N +l/EewXiv4LX257ZNGjP2DYx9QL3//59/AVTVVew= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGZigIIPzg5782vezkxVcnjDu89gppSLwwPXeMdZ +hUoOvP7rp6R6uDi4rzm6nKFCyeGmdE2iUS+CHym+/SLDPwT/SeLCaybqrnDz +VJ80zzvr5OqwVkiHL11PyWFN9+0MBn+o/FRFh3k2Oldmhbk6lB/e5jpTV8Hh +QK2sRXoLgn9C02rS6XqEebj4xiBwGcEXqZxUctZEGYMPM7+R5Wi/4XRVuP0w +Psx9M0EgUsVB5JPj+TRfV4efb18fsFRWcaj7bVVwzsPVQeXao2CGN8pw/1Xe +/3HLeLcy3P8uE5qF0rqUHaZ8Y4uf8cfFwQMcPlD3TEfjhyP4FRErTM8qu0DC +q07ZARY/MPNg/DmLlHf+ea7poOD4MfmMrItDwC1gxAhpOfR4vWIxsXRx2O7Q +9Oi4hJaDCShcJiP4YP/fQfCXvfDQ+28IDB+Qxi+aEP2Jrg4/QP49DDW/1dXh +xGGntZnzNB0kpl7hzOhydfgPAvUIvihYvwac77EfZJE6xH/7MfleJ9htZ1/V +cNh5q+tv6nFXh5pPGwKyf2k6WFw7mmtyw9UhPQ0I2LQh4d/rCvGHsLYDSNms +eFeo+7Uh6U8OwQfHR5ULXD04vAxc4OaB0/cvZzgfHD9XEHyw/Stw88H+Pu4E +tw/GN7fZGzQtERr+gs4Ox3ft6GUL0IL4L9zZ4XmW9rfptlqQ9BXv7HAGBHgQ +/M3mPw6laGnA+TWg9PRaCs7fEWwV8V9dHG4eyDlpx8Tg9oW8vfxxxkIxuHti +VCNkztUg+Aq7FuxL5RN1WA6Kb0WofjVRuHng8DIWdSjZKvr79DIEPwIUvt8Q +fJbFk6wYdV3g+sHua3eBmw/jw+wHpx9bF7j7voDi7zvC/bD0DPMfjA/zP3r5 +BAAATfRw + "]]}, { + Thickness[0.02224199288256228]}, StripOnInput -> False]}, { + ImageSize -> {44.95900373599004, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {45., 17.}, PlotRange -> {{0., 44.96}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.023180343069077423`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJNIAaxQYAJSjNCxZiR+PjEcakhlU2JOcToxeVmSvTS +wl+U2EWMmQB8+QKp + "], CompressedData[" +1:eJx1lG1Ik1EUx6cThXzZcu59j+k2cy8WmJYWyc5KzUbg0D5oiGE0h0WIJJUw +K5WEmmUE6aZiGZRfEpTQzPKlxBTUoDQDP6RoIKVCiomWZt7nPveOFC9cHn48 +957/Of9z7w0/l59m4/N4PK/Nmb05vTdnbAwaS6a4o51pVTkGGP3z/kt95rqp +v6P9rq/VAAWNhc1/BXyYuWBcrk4wgG5R+73mNh+G0Ajw8Iu4lXfnDTrKjomV +8ZhZBeX29CMZG5FS8DcHWVx6PkwmnTXXfJRQvdPzIwuuBgm0Wprj64qWTVkR +GaoPDg+HdTzusgWJIZKN5wW5aOwV4zxO+QCuQwxtaP2qL2X2e9mPsqpF8sg7 +bBdlVudNII3HQ+OmGIjeVmb1KiSU7Wifr2xH7nF2lcaWhVI9wktdC632ZSmO +NxTK1aUAG9qfvAdCih4UDvswMFd+yXmglqGM9zPA+mVW4X15DI5XpYSm4Kgg +ezaD88hVwq0wv4ihEAbcaGTK8borKrzuqxT3aVCJ4zUQVnC+SuFehjPVy8p9 +hVIQsXmIKOO8hZRNhebiwSwB7beLFQ7A/S7wcGe+Y95tU8PT8cbp6OMC7r8a +Ktk4u+HE875G3jU1zveQiPIZtl8SysRvEu8t8mdahuvbr8b5Jsrx/4fhkI7q +LJHD1d62JPe+MKz3U0GZ1E/i7cRsO0c8zPYnVrONSfwSn77K6OoIqk+Y5If7 +o8V1xcthdX6257BGi3VEctCOTaXz5jS0viKk81pD60+8Xxace0eDfWyRQArr +jwavc4q28G7Kv5C/YwLs13UN7Q+JR7juiebV2oyeO/8CsI4rHTnBBu7cCeEl +lE71ywz4vkyKKCcjHZeEMqnXsdhsvfhbT/1aQfX26jm/lDDQe6wpr17PnV8V +bKBxw8PiCssPnyUd5ZTuYibeHgnraF03s40tA34JtZ91+L6vMVSf3EfsoxGG +UX1RKnxfRUbOTwWXvxH3yS2jzJ5zu5RyOcpnVEyZ+EHisXVMCLn304h1nwVS +/dRvJz8dFPlTtiIe8aP8//trBPJ+E72t7/k/IVB43g== + "]], + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYCYnObvUHTHLUd/C5OjPmnrO4A43vsr5W1SNdw +qPm0ISA7StuhgeVov6G5JoSeru3wIEJ8+8UGLYfniQuvmazXdPAH6XfWdtik +l7eYcY4GVF7b4QwI+KjD+RGcYu3G+5XhfOVrj4IZdBQdfr19fcDSWRPO/wni +K6vB+Tscmh4d/6HiUH3/xy3jakWHKe2tUZdlVBxOg8zXUXLwWHN0OUOFMkT9 +HyWHSpC63UoOmfkfWk+KqDh8WLRe4WyEkoOB1krhCylqDjNBgFPJoRrkPysN +h9Q0IDim6HB8145eNgFNB2MQaFaE+48/NuC+0XcFh/WqT5rn+WpB+OUK0PDQ +gvizRx7Oj1GNkDm3RxbOf+Aa7zirUBKi7oyGgxvIvRFiDgG3pGsSg9Tg/C3m +Pw6lZKnA+WuFdPjS+5QcWhXYVc+YSDiEg8IvX8lhR7BVxH91KYi8nZLDm7bc +bqNoWXj4wPhgexsVIerqZOB8sPxuaTj/Pth9CD4DCDhIOuzNr3k7s1QRbv+K +by8rzgQoOijsWrAvlU8MEv5rlCDm3xNxYOHskk/mU4G6S8RBZl6c5ukCVThf +V1H+S840TTgfEj46cPtgfLC9ogpw/h1N2TX/jRUd5ixS3vnHXceh/PA215l/ +gfGTpf1t+lxoOpqjBJE/rgXRn6oMScfHNR1EKieVnN2iDEmfMuoOUiB3Cag4 +mIAjWsUhEBQPRbD0pOywAaTORhXO//ut9MEcQXU4HxxvQpoOG0DpYa0KPD9A +0pEanC/a4/WKZYs6nA/xvwYknQVoOZy/GvZG3xroPpC6L9B8xKzl8Lp4q+jv +bk2I+921HKRB7jXQdJgBSreRWg7/QaBew+HEYae1mXVaGPkXxgcAvSGZ4g== + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld +AKjmAn0= + "], CompressedData[" +1:eJx1lAtIU2EUx6/PyNDC2l34ou1O56aI2+7d3UTjGGgiRKaBI7Iw1KFRFiUa +aFCW0dMgTV0mWZAKSoXVVEosMc1Me4iYjBQRfEOOGoaK7bvX7xsUHfgYP3a/ +c/7n/M+9smP5qdkeFEW5Oc8+53F3ngEUkSzUPmTaV6dV0FUSbDBXsGCFi5O9 +O9VAofjBQlDdEdWHaDVkZdgSPUwcYVtgcaa2Uk/4Z/vYtbUEHubPvJCsbFER +vuS7/0mFl5Kw5EbynOewAuxPU45bzHqYSDgabznNQHLfprh7XhxhXB+zoG/Y +xYL+ZhaSmnsaqCIGQqdK6z5aWGjxj/QzRzHwLOrkI7dXLKRvpq/oxuXwDent +YWFrRsq4tlcOPomhBe5zLOwV7sshWt20/dMODsw5zqDlYJJaP1MhHBR2v0yo +WZNB+KJvZ7SRA5squHm9VSbWy+Ph4OLXpep6Kew+Z2rkSnhRN0jhVtpZRVU5 +L+r5TsOqo2Citp6HcLti1nKVhguePeUaKw8LZSeuawNpMf97fqMviTjvGR52 +dTzozPaTiM8XGoDVoZDALzTPShcL87S6+E1ZQ3r/l/+z8HPHSPJjPhxqChos +pmEN6dUYN/qjIRD5TBmheHx5TDdPw/mVmFODowaoQdEuFf1R6IEZmUyjFuQw +lVk/wg7pockxWzQADPR372nJDeHF+ZUyoo5SHgJQ3m0KaJhJilqXGeDAmNMo +u4L0+3txvsvIhBEW9umykrBYR0XmK+5vhPi/Uk8Y2Zrj4AgLunNZ0W/vf7kR +6XFzcRzy977uvyzoX9KQ/Jj52NepdzPVos58LfR2tN30TlFDvPOx6hUtTOdF +OKri1KBE++SD87m4lV9+m6UOJyzOP4BwW1qMaV0pJfmEPt/RpB72T9grm4b4 +ixn7L/h7e+N+mITkw/vyHOmw6AiXIP8NLOFRf3v80GOW3Bfej0McyY8Z1/dz +2pjdxxJ9wvsayxL9+PuE+8OM+//7+/UH8+UE4w== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlF9IU3EUx+8shGIkBbMIH0q3zHslyA1md7+xcx/0IQKHKxxhwcLbX2g+ +KPSwEOwh6A9URM4hpgT1UGCQ0BKMSGiRacTSBwsUMYTKhxJEUFv3d9n3XOzA +ZXzY/Z3z/Z7zO3f/mWSzuUVRFJf1nLCeEuu5uqa3T14hSs2uzvh/7iVwNqbH +C9W7Kdbh7Sm0E52V8a6cqheu9U+oRMeX8r/Tg+UU8FsxFqFWX7xiMuXwvpGB +1+YOD1H3fC4dKp4/4OF89nt+D7mbhu6bbxzO1ej3xssM5oei9kum0eDzXVLf +gMH5waj/aubGhtlisL5bR39sDew0WH+vjG0G+wPDP/hFcPVtm3qQ+aMMt8r5 +Fi9qKz1hlevlRrK3S6Mq6wmK0eYHCYdfykbs0SgxltfMwwadk3pKNfYLRj/A +15+0fKjrcHj5efRSpomKejTuN/KDUR/zgj70H/oxb/gDwz/YOz0fU35VUYOv +syQTJxpNppZ6vxe5nkiRMVdFxz7fbf27HGF2N1ovqGFmu84zwZyW/b0gOJ/9 +f63gemDoAUPv8KHLj1xCsB+7f+8F+/VJ/yfD3A8w+mWfTwnur+233uFhWTcT +Yl5f6Zzrc4U2zyur8zzs329HOD8Y9RcTg9OBpM76InI/1nTW75X6tofYHxj+ +wbivYNxn5MN9Rz3sA/RgX8DYp4r+0zXjd3TeN+TDPqIfYPQLPLXrj/HpseDz +6Dfyg1Ef84I+zBP6MW/4A8M/uOxUdLYuV0kL0m+XIFtOvpIKMoYcxn0E476C +n978el4JEjP2DYx9QL3/v5//AHlpROk= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4pkgwOnssDe/5u3MVCWH9uXhp4xMnB0euMY7 +zipUcljxwkPvf6Kzg/uao8sZKpQcSraK/j69DMH/siEge5a4C5xf99uq4JyD +C9y8A7WyFukxLg5rhXT40vWUHNxUS5lmZUDlpyo6WFw7mmtS4OJQfnib60xd +BYdI8e0XGeYh+AmHL2unzkSYh4tvDAKXEXyRykklZ02UMfgw8xtZjvYbTleF +2w/jw9wHDpdIFYc13bczGNJdHH6+fX3AUlnFQWLqFc6MJBcHlWuPghneKMP9 +V3n/xy3j3cpw/7tMaBZK61J20J2w4IehmIuDBzh8lB0SQe7Z6IzKL0TwhT85 +nk+zdYaEV52yAyx+YObB+HMWKe/881zTYeetrr+p5s4OAbekaxKFtBxUnzTP +Oxvk7LDdoenRcQkthzMgsAbBjwD5/xuCD6JmeAPDp8frFcsXTYj+KheHHyD/ +HoaaP9/F4cRhp7WZ8zQdNurlLWZc4uLwHwTqEXxRsH4NON9jPyhg1CHhfxOT +73WC3Xb2VQ2HkBKV6f8fuDjUfAImpF+aDhfz49nPfXRxSE8DAjZtSPgvd3Ew +AcWvsLYDyBqTSheo+7Uh6c8cwQfHxxRnuHpweHk6w80Dp28RBF8fFD/vnOD8 +yyD7D+Lmg8176Ai3D8Y3t9kbNC1Ry0EdFH5aTg7Hd+3oZQvQcggG+a/AyeF5 +lva36bZaDq6g9FXhBIkXHgR/s/mPQylaGnB+DSg9vZaC83cEW0X8VxeHmwdy +TtoxMbh9IW8vf5yxUAzunhjVCJlzNQi+wq4F+1L5RCHxbQ3VryYKNw8cXsai +Djz+66ekHkDwP4PCl98Zzp9vo3NllpszXL87yH0LnOHmw/gw+8HpJ9wZ7j5w +/Ak6w90PS88w/8H4MP+jl08ALJj6pA== + "]]}, { + Thickness[0.023180343069077423`]}, StripOnInput -> False]}, { + ImageSize -> {43.141947696139475`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {44., 17.}, PlotRange -> {{0., 43.14}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.021612275772638856`], + 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[{{{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}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4vNXw97o39Zz8Ls4MeafsroDjO+xv1bWIl3D +QaTH6xXLFz2HBpaj/Ybmmg4y8+I0TxvoOzyIEN9+sUHLof63VcE5D10Hf5B+ +Z20HnxPstrNNdaDy2g7paUDwTAvO3+HQ9Oh4hDqc38Lrv37KURWHX29fH7B0 +1oTzf4L4ympwPljfDxWHzPwPrSdFVB2mtLdGXZZRcUgFmX9M1cFjzdHlDBXK +EPunqjlU3v9xy3i3kgMLZ5d88jp1hw+L1iucjVByOHHYaW3mP02HmSDAqQTx +3xVtqDmKDvEhQeoLVuo4GINAsyLcf/yxAfeNvis4uIPC5TmUX64ADQ89hzMg +0CMP58eoRsic2yML5z9wjXecVSgJsSdNx8EN5N4IMYcXxVtFf7/WhPN9QeHI +rAHnz1mkvPOPuppDqwK76hkTCYdakHs41Bx2BFtF/FeXckiJvePGfEPV4U1b +brdRtCw8fGD8C6D4lFZ1WCukw5deJwPng+V3S8P598HuQ/AZQMBB0uFp4sJr +JvyqcPu3mP84lPJKxUFh14J9qXxiEP+4qUHMvycCce9ydQjfTgSinksTzj++ +a0cvm4EunA+K3lQJA7h9MP7e/Jq3M0UV4Pw7mrJr/hsrOpja7A2a9lDfofzw +NteZfxWh6VLfQfnao2CGOUoQ+UQ9iP5UZYcnoHSWoOsgUjmp5OwWaPrYquUg +BYoXARVIvJ1Rdwi8JV2TWARLT2oOG/TyFjPaqML5f7+VPpgjqA7nB4DUC2lC +8om7Bjw//AeBeC04f73qk+Z5vtpwPsT/OhA6QMshAxRfV3Sg+UzT4XmW9rfp +c3UdXoPSRbcmxP0PdB2kwelI08EElC4/60LsqdeAxL8EZv6F8QFDZ5x5 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWaBsBiifAY3NCJVnRmMTo55Uc0g1nxbuIcZ8 +AJ0vAkM= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYCYpl5cZqnA6wdNpv/OJSipeEA46enAQGblsN/ +EIi3dniepf1tuq2WQ4yC48fkN9YOx3ft6GUL0HIQn3qFM6PIxsHcZm/QtEQE +f7tD06PjEtoOy1946P03hJmHyd9fK2uRzoLgF6zpvp1xwQonXwJk/iJLuPkw +Psz++t9WBec0rODuuyFdk2i01QrufrB9R6zg/oPxYf6H8WeCQKcCnD8dxI+U +ctDXWil84Yulg4kxCIg7bAHps7KA85eB/DfRDM6fNoG/yuy2KYR/WRLOl921 +YF/qO3k4H2Y/jH8GBHi0IOa/MoW7/4bQJ8fzZWZw/2m85d1nwGkO9z+MDwsf +sH4tM3j4NbIc7Td8bgrn8/mvn5LqgeAzgMAGEzgfbF+aCdQ92g4zQO7rNoab +D+PD7H8BcqesCdx9XG6qpUyrTODuB7tvpwncfzA+zP8w/o5gq4j/6fJwfn9E +tz/jBmmI+z6YOPSB+AKSDn4XJ8b8SzaFh3eE+PaLDPdMIeocRCHu32bmsFZI +hy/dTsQhJfaOG/MLczgfnF6VLOF8WPzC9IeDzKuzcnjgGu84q1Ac4g9eawd5 +UPytk4Tnl5C3lz/OcJSF81NB4eem6ICevwDto1XN + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlG1IU2EUx29FE6H0Q1wXWZS6XtioaKuM4d099wYRZDS2pAWGWM1JQgvq +Q8QkKKggAqOmsyTWhygiKLCYCFtR1KxsMRbRG6wkKSg/WDAWUmv3tv95oAee +D787nnP+//Oyhr1hX3COJEmzyretfGeX77axKuXyXJ0i+eI717dFBB7xuwOl +lVZaqk3vG/+tUZdxntTRzzvenksJjXZO5aZjV+soZHw/qFH78sDiTETwstF4 +Klgj0/wdty8GxyrvV8gcb73LODK9rY90OrfrzBcKlo7YkOCe6l/xUE7n96a+ +1Zs5Phj5T1/f9cz5WWd9u62JrHRFZ/2mvn7hDwz/4OHm4sP99lXM48aZZ+d4 +Xw44CgOKnfOlR0fOWbx21tPckvT1dwpO0ImJ9EIHre2LF9el9H9xLQ72C0Y9 +wP4jtoGSJPh+75JNoQ9aRY+D6434YORHv6AP9Yd+9Bv+wPAPtr2e8Evfm2jB +D+1l16RGyXBkanCywo81kozzsYkO35Nnnp8SnAt3VGUaiDlo9kFlNvt8UuV4 +5u9bVM4Hhh4w9LYa+tpU9nPt69Y1pU8q+82naoZcbuJ6gFEv831U5fpao6+q +u32CW7Pn2/8Me5ijfbXHNtYLNvNlFe6Hqa/QwvHByH98xn0oc0ZhfW+Mfsse +1p80+mvzsD8w/IMxr2DMM+Jh3pEP+wA92Bcw9umukeemwvuGeNhH1AOMeoHD +t86+736g8nvUG/HByI9+QR/6Cf3oN/yB4R9cu8ebd6YbqdfwG1PJlJNrpNhg ++TwVjHkEY17BRwM3Nrx4JBj7BsY+IN///59/ASxFHA4= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4jQQmObisDe/5u3MVCWHkBKV6f8PuDg8cI13 +nFWo5FCyVfT36XcuDu5rji5nqFBycGh6dHyGsSucf6BW1iJ9CYLvc4LddvZZ +V7h5PV6vWExeujqsFdLhS9dTchD55Hg+7StUfqqiA8viSVaMf10dyg9vc52p +q+Cg9qR53lktNzhfd8KCH4ZqbnDzcPGNQeAygi9SOankrIkyBh9mfiPL0X7D +6apw+2F8mPtmgkCkikNlxArTs59dHX6+fX3AUlnF4Uniwmsm710dVK49CmZ4 +owz3X+X9H7eMdyvD/e8yoVkorUvZ4VdM7tF/i1wdPMDho+ygB3KPHRr/nwuc +/2Af3xzjUy6Q8KpTdoDFD8w8GH/OIuWdf55rOrQtDz9ldMTFIeCWdE2ikJbD +pw0B2bPuuzhsB0WUhBbEH5aucL4qyP9NCD6P//opqTdcHURAHvmiCdHP7ubw +A+Tfw1DzddwcThx2Wps5T9Oh7rdVwTkDN4f/IFCP4IuC9WvA+R77QQlDHRL+ +aZh8L1A4XdVwUHD8mHwm182hBmTxL02HeTY6V2bVuTmkg/zJpg0Jf2M3BxNQ +/AprO0SIb7/IwOYGdb82JP0dcYXzwfGh6ApXDw6vay5w88DpewGC/wcUP1UI +/gKQ/X64+WA6zxluH4xvbrM3aFqilsMXUPhtd3Y4vmtHL1uAFsR/f50dnmdp +f5tuq+UgBEpfrC4OZ0CAB8HfbP7jUIqWBpxfA0pPr6Xg/B3BVhH/1cXh5oH9 +dUwMbl/I28sfZywUg7snRjVC5lwNgq+wa8G+VD5RB15QfJ+A6lcThZsHDi9j +UYebwGRk5OsC54PDdw6Cn8P5c0H6ZRe4fnB+0XWFmw/jw+wHp58nLnD3RYLi +b54L3P2w9AzzH4wP8z96+QQA+bH4ZQ== + "]]}, { + Thickness[0.021612275772638856`]}, StripOnInput -> False]}, { + ImageSize -> {46.27404234122042, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {47., 17.}, PlotRange -> {{0., 46.27}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.02249212775528565], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJNIAaxQYAJSjNCxZiR+PjEcakhlU2JOcToxeVmSvTS +wl+U2EWMmQB8+QKp + "], CompressedData[" +1:eJx1lG1Ik1EUx6cThXzZcu59j+k2cy8WmJYWyc5KzUbg0D5oiGE0h0WIJJUw +K5WEmmUE6aZiGZRfEpTQzPKlxBTUoDQDP6RoIKVCiomWZt7nPveOFC9cHn48 +957/Of9z7w0/l59m4/N4PK/Nmb05vTdnbAwaS6a4o51pVTkGGP3z/kt95rqp +v6P9rq/VAAWNhc1/BXyYuWBcrk4wgG5R+73mNh+G0Ajw8Iu4lXfnDTrKjomV +8ZhZBeX29CMZG5FS8DcHWVx6PkwmnTXXfJRQvdPzIwuuBgm0Wprj64qWTVkR +GaoPDg+HdTzusgWJIZKN5wW5aOwV4zxO+QCuQwxtaP2qL2X2e9mPsqpF8sg7 +bBdlVudNII3HQ+OmGIjeVmb1KiSU7Wifr2xH7nF2lcaWhVI9wktdC632ZSmO +NxTK1aUAG9qfvAdCih4UDvswMFd+yXmglqGM9zPA+mVW4X15DI5XpYSm4Kgg +ezaD88hVwq0wv4ihEAbcaGTK8borKrzuqxT3aVCJ4zUQVnC+SuFehjPVy8p9 +hVIQsXmIKOO8hZRNhebiwSwB7beLFQ7A/S7wcGe+Y95tU8PT8cbp6OMC7r8a +Ktk4u+HE875G3jU1zveQiPIZtl8SysRvEu8t8mdahuvbr8b5Jsrx/4fhkI7q +LJHD1d62JPe+MKz3U0GZ1E/i7cRsO0c8zPYnVrONSfwSn77K6OoIqk+Y5If7 +o8V1xcthdX6257BGi3VEctCOTaXz5jS0viKk81pD60+8Xxace0eDfWyRQArr +jwavc4q28G7Kv5C/YwLs13UN7Q+JR7juiebV2oyeO/8CsI4rHTnBBu7cCeEl +lE71ywz4vkyKKCcjHZeEMqnXsdhsvfhbT/1aQfX26jm/lDDQe6wpr17PnV8V +bKBxw8PiCssPnyUd5ZTuYibeHgnraF03s40tA34JtZ91+L6vMVSf3EfsoxGG +UX1RKnxfRUbOTwWXvxH3yS2jzJ5zu5RyOcpnVEyZ+EHisXVMCLn304h1nwVS +/dRvJz8dFPlTtiIe8aP8//trBPJ+E72t7/k/IVB43g== + "]], + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYCYnObvUHTHLUd/C5OjPmnrO4A43vsr5W1SNdw +qPm0ISA7StuhgeVov6G5JoSeru3wIEJ8+8UGLYfniQuvmazXdPAH6XfWdtik +l7eYcY4GVF7b4QwI+KjD+RGcYu3G+5XhfOVrj4IZdBQdfr19fcDSWRPO/wni +K6vB+Tscmh4d/6HiUH3/xy3jakWHKe2tUZdlVBxOg8zXUXLwWHN0OUOFMkT9 +HyWHSpC63UoOmfkfWk+KqDh8WLRe4WyEkoOB1krhCylqDjNBgFPJoRrkPysN +h9Q0IDim6HB8145eNgFNB2MQaFaE+48/NuC+0XcFh/WqT5rn+WpB+OUK0PDQ +gvizRx7Oj1GNkDm3RxbOf+Aa7zirUBKi7oyGgxvIvRFiDgG3pGsSg9Tg/C3m +Pw6lZKnA+WuFdPjS+5QcWhXYVc+YSDiEg8IvX8lhR7BVxH91KYi8nZLDm7bc +bqNoWXj4wPhgexsVIerqZOB8sPxuaTj/Pth9CD4DCDhIOuzNr3k7s1QRbv+K +by8rzgQoOijsWrAvlU8MEv5rlCDm3xNxYOHskk/mU4G6S8RBZl6c5ukCVThf +V1H+S840TTgfEj46cPtgfLC9ogpw/h1N2TX/jRUd5ixS3vnHXceh/PA215l/ +gfGTpf1t+lxoOpqjBJE/rgXRn6oMScfHNR1EKieVnN2iDEmfMuoOUiB3Cag4 +mIAjWsUhEBQPRbD0pOywAaTORhXO//ut9MEcQXU4HxxvQpoOG0DpYa0KPD9A +0pEanC/a4/WKZYs6nA/xvwYknQVoOZy/GvZG3xroPpC6L9B8xKzl8Lp4q+jv +bk2I+921HKRB7jXQdJgBSreRWg7/QaBew+HEYae1mXVaGPkXxgcAvSGZ4g== + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWaBsBiifAY3NCJVnRmMTo55Uc0g1nxbuIcZ8 +AJ0vAkM= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYCYr+LE2P+NVs6bDb/cShFS8MBxk9PAwI2LQdj +EJhs6fA8S/vbdFsth/7gEpXp8lYOx3ft6GUL0HLwOcFuO3uplYO5zd6gaYkI +/naHpkfHJbQdbknXJBqlwszD5H/aEJA9yxzBX3x/H98cZtx8sPlXzeHmw/gw ++zfq5S1mjLGAu4/Xf/2U1BcWcPeD7ftuAfcfjA/zP4w/EwQ6FeD86SB+pJRD +cuwdN2YNCwcTcMCIO7wAmZtrBuffBPnvqAmcf/Kw09pMPij/siScL7trwb7U +d/JwPsx+GP8MCPBoQcyXNYG7n8tNtZRplQncfzEKjh+TbUzh/ofxYeED1h9r +Ag+/LSB7pBB8R6CyGdXGcD7Y2Y+N4HxukH2zjKDu0XY4DXLfPkO4+TA+zH7p +eXGapwOM4O6zrYxYYXrXCO7+aJD73hjB/Qfjw/wP4+8Itor4ny4P5/dHdPsz +bpCGuE/Z2KEPxBeQdGhkOdpvON0YHt49Xq9YTARNHBhAwEEUEl6vTBzWCunw +pduJOEybwF9lJm0G54PTT6g5nA+LX5h+sHkbLRweuMY7zioUh/jPwdJBHhR/ +6yTh+SXk7eWPMxxl4fxUUPi5KTqg5y8AyI5Waw== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlF9IU3EUx+9q2YsZFNeFBZb2z40kdSBs945zfUkiamjRHuxh1V3/IIMg +CAZCEEV/KCTKVQ8TAx8iFCpnknsoagOHIYKGISsrjHKQGbIwWfd39Xt+0IHf +w4fL75zv95zfuVuOtjaZKxVFcVjnkHVWWOdzuHPMW25QNJufqPtRRuD+Zl+o +sMNFLyauLZougyIi3pbSjb3fnd4RooO50dmOzlIqiLhC1LIttGk4KnnzQDxp +lqjU/a2xuvCJlu5vVzmft06ESuefqwtDEcm7bsfzNX2SnV3tPkfO4PtfhL49 +DZwfjPrlxuyxzKLB+uZ6g2fuJ6R+W1+P9AeGf/DT+vyr4+6dzBkRxW7ON33a +M39Pd3O91ED/zaKgm/XUa4NNd8OSE3RpKrXBQ6kqX/vQuEEnhJ4iD/sFox/g +mTXJ3bEyySFXYkSZp2U9Hu438oNRH/OCPvQf+jFv+APDP3jr2FSzMlNJj69/ +OKkUiAZbo7nY12XOEikiPlZS8YGeO2Zc8vi6X8a7CwHmjpgVf3RmU/jq0zmf +/f2izvXA0AOG3rYF37nhqzr7eb8xGq5VA+z3t5hXd4D7AUa/7Ptpnfu7L71a +f3BZcpvzza2aaY05/brhyan9ku16qzSeh62vys/5waj/rPpsl+Oln/XZ/WrU +WP9Poe+wxv7A8A/GewXjPSMf3jvqYR+gB/sCxj7ZOib9vG/Ih31EP8DoF/hR +NlnycE7n++g38oNRH/OCPswT+jFv+APDP3jtkWC2NlVBvcJvRidbzmjFUh// +SsZ7BOO9gtdbnyOTkrFvYOwD6v3///wHgTJVDQ== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGZigIINzg5782vezkxVcnjDu89g5i1nhweu8Y6z +CpUceP3XT0nlcHFwX3N0OUOFksNN6ZpEI18EP1J8+0WGfQj+k8SF10yeu8DN +U33SPO8sk6vDWiEdvnQ9JYc13bczGPhdIfJTFR3m2ehcmSXm6lB+eJvrTF0F +hwO1shbpLgj+CU2rSaftXeHm4eIbg8BlBF+kclLJWRNlDD7M/EaWo/2G01Xh +9sP4MPfNBIFIFQeRT47n03hdHX6+fX3AUlnFoe63VcE5DlcHlWuPghneKMP9 +V3n/xy3j3cpw/7tMaBZK61J2mPKNLX7GHhcHD3D4QN0TjsYXR/ArIlaYnn3s +DAmvOmUHWPzAzIPx5yxS3vnnuaaDguPH5DN3nR0CbgEjRkjLocfrFYvJT2eH +7Q5Nj45LaDmYgMIl2AXOB/t/DoK/7IWH3v+PLg4iII1fNCH6FV0dfoD8exhq +vqurw4nDTmsz52k6SEy9wpnh5erwHwTqEXxRsH4NON9jP8gidYj/6jH5XifY +bWdf1XDYeavrb2q7q0PNpw0B2b80HSyuHc01meHqkJ4GBGzakPD3dYX4Q1jb +AaRslrwr1P3akPR3zwXOB8eHlQtcPTi8PjjDzQOn710IPjh+piD4YPszcPPB +/m53gtsH45vb7A2alggN/4tODsd37ehlC9CC+E/c2eF5lva36bZaDqtB6Uve +2eEMCPAg+JvNfxxK0dKA82tA6em1FJy/I9gq4r+6ONw8kHPSjonB7Qt5e/nj +jIVicPfEqEbInKtB8BV2LdiXyifqsBwU3w+dIPrVROHmgcPLWNShZKvo79Np +CH4EKHy3IfgsiydZMb51husH5xd3F7j5MD7MfnD6+esMd98XUPxtR7gflp5h +/oPxYf5HL58AC17vng== + "]]}, { + Thickness[0.02249212775528565]}, StripOnInput -> False]}, { + ImageSize -> {44.45698630136986, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {45., 17.}, PlotRange -> {{0., 44.46}, {0., 16.34}}, + AspectRatio -> Automatic}]}, "LineLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800001162727559*^9, 3.800001184439625*^9}, + 3.8000012354705687`*^9, 3.800001356112529*^9, 3.80000143718644*^9, { + 3.8000014787761583`*^9, 3.800001500273628*^9}, 3.800001563924923*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"e586e923-c09d-48d5-bf34-97e29d2fa68b"] +}, Open ]], + +Cell[TextData[{ + "We observe the Coulson-Fischer point at ", + Cell[BoxData[ + FormBox[ + RowBox[{"R", "=", + FractionBox["3", "2"]}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "bdb614c3-cd1c-4dec-9cb5-18d2312a7774"], + ", the symmetry is broken for ", + Cell[BoxData[ + FormBox[ + RowBox[{"R", ">", + FractionBox["3", "2"]}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "1a7959e6-2dcd-4542-b1ad-a7430073751e"], + "." +}], "Text", + CellChangeTimes->{{3.800004808143817*^9, + 3.80000485670133*^9}},ExpressionUUID->"4eaa2d7b-45fa-4318-b7e7-\ +ea808455e59f"] +}, Closed]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Two electron basis, Hamiltonian and spin contamination", "Section", + CellChangeTimes->{{3.8000016304764423`*^9, + 3.8000016515404797`*^9}},ExpressionUUID->"6c64cb96-3334-4292-9b6e-\ +dd886d2af85c"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.800001949438826*^9, + 3.800001950246894*^9}},ExpressionUUID->"9e6aaa81-06ba-42d2-a090-\ +49e3f5a0e79b"], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.801823052315659*^9, + 3.801823059614296*^9}},ExpressionUUID->"bfe01521-4810-445b-a5d5-\ +dd0be413fbd7"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[CapitalPsi]1", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]2", "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]2", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]2", "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]3", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]2", "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]4", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]2", "]"}]}]}]}], "}"}], + ";"}]], "Input", + CellChangeTimes->{{3.8000019632284203`*^9, 3.800002015343547*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"31834666-ac95-48bb-888c-5e3473c0b895"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1_", ",", "\[CapitalPsi]2_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], " ", + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{"\[CapitalPsi]1", " ", "\[CapitalPsi]2"}], "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], "//", + "FullSimplify"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1_", ",", "\[CapitalPsi]2_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], + RowBox[{"2", + SuperscriptBox["R", "2"]}]], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{ + RowBox[{ + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], "\[CapitalPsi]1"}], + ")"}], + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], "\[CapitalPsi]2"}], + ")"}]}], "+", + RowBox[{ + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]2"], "\[CapitalPsi]1"}], + ")"}], + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]2"], "\[CapitalPsi]2"}], + ")"}]}]}], "]"}], + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], "+", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], " ", + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{"\[CapitalPsi]1", " ", "\[CapitalPsi]2", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + FractionBox["1", "4"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}]}], ")"}]}]}], + ")"}]}], "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}]}], "//", + "FullSimplify"}]}]}], "Input", + CellLabel->"In[69]:=",ExpressionUUID->"10bae95d-3a3b-49d5-b6c0-da421cf9f00d"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{"rH", ",", "rS"}], "}"}], "=", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4"}], "]"}]} + }], "\[NoBreak]", ")"}], ",", + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4"}], "]"}]} + }], "\[NoBreak]", ")"}]}], "}"}], "//", "FullSimplify"}]}], + ";"}]], "Input", + CellChangeTimes->{ + 3.800004320144642*^9},ExpressionUUID->"b5faa348-1eb1-474f-a5a4-\ +d3ed39d023d0"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"rH", "[", "R_", "]"}], ",", "rS"}], "}"}], ":=", + RowBox[{"{", + RowBox[{ + TagBox[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["1", "R"], "0", "0", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}, + {"0", + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0"}, + {"0", + FractionBox["1", + RowBox[{"3", " ", "R"}]], + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], "0"}, + { + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0", "0", + FractionBox[ + RowBox[{"50", "+", + RowBox[{"29", " ", "R"}]}], + RowBox[{"25", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]], ",", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"1", "0", "0", "0"}, + {"0", "1", "0", "0"}, + {"0", "0", "1", "0"}, + {"0", "0", "0", "1"} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}], "}"}]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800002151407773*^9, 3.8000021726393013`*^9}, + 3.8000043633670197`*^9, 3.800004411340724*^9, {3.8001821324871187`*^9, + 3.8001821388313828`*^9}}, + CellLabel->"In[12]:=",ExpressionUUID->"6e4f6e6d-5616-448d-9ef8-04d79a2d1823"], + +Cell[TextData[{ + "The two electron basis is orthonormal. The Hamiltonian is block diagonal: \ +", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "dc20253c-5fab-46dd-a3ab-4879b8f24c3c"], + " interact with ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "43283fc9-c20e-40e3-9de4-98813f4b9890"], + " and ", + Cell[BoxData[ + FormBox[ + RowBox[{ + SubscriptBox["sp", "z"], " ", "interact", " ", "with", " ", + SubscriptBox["p", "z"], "s"}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "19684be1-9be9-4fec-9bd5-e8521728354c"], + ".\nThe singlet symmetry block has the same expression as in the minimal \ +basis of legendre polynomials: those polynomials are singlet CSF." +}], "Text", + CellChangeTimes->{{3.800002178441375*^9, 3.800002289316906*^9}, { + 3.800004429063689*^9, + 3.800004485173311*^9}},ExpressionUUID->"575d1f25-9a6b-417d-865f-\ +0934d7769291"] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.80000231558915*^9, + 3.8000023176386843`*^9}},ExpressionUUID->"1ff36fea-f6e0-4927-b494-\ +83381e142e8e"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[CapitalPsi]1", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", "\[Theta]2", "]"}]}]}], ",", + + RowBox[{"\[CapitalPsi]2", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "2"], "[", "\[Theta]2", "]"}]}]}], ",", + + RowBox[{"\[CapitalPsi]3", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", "\[Theta]2", "]"}]}]}], ",", + + RowBox[{"\[CapitalPsi]4", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "2"], "[", "\[Theta]2", "]"}]}]}]}], + "}"}], "//", "FullSimplify"}], ";"}]], "Input", + CellChangeTimes->{{3.800002353416954*^9, 3.800002356433406*^9}, { + 3.8000023874548407`*^9, 3.80000242283701*^9}, {3.800003737333551*^9, + 3.8000037439246063`*^9}}, + CellLabel->"In[64]:=",ExpressionUUID->"0cfd58b0-264c-4a32-a787-6dc97e0bede3"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{"uH", ",", "uS"}], "}"}], "=", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4"}], "]"}]} + }], "\[NoBreak]", ")"}], ",", + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4"}], "]"}]} + }], "\[NoBreak]", ")"}]}], "}"}], "//", "FullSimplify"}]}], + ";"}]], "Input", + CellChangeTimes->{3.800002799019884*^9, 3.8000033299580936`*^9, + 3.800003756203944*^9}, + CellLabel->"In[19]:=",ExpressionUUID->"9884ee06-2438-48e5-a706-7ed7a2d33d4e"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"uH", "[", "R_", "]"}], ",", "uS"}], "}"}], ":=", + RowBox[{"{", + RowBox[{ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{ + RowBox[{"-", "225"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"59", " ", "R"}]}], ")"}]}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], "0", "0", + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + { + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]], ",", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"1", "0", "0", "0"}, + {"0", "1", "0", "0"}, + {"0", "0", "1", "0"}, + {"0", "0", "0", "1"} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}], "}"}]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800003869649755*^9, 3.8000038767153397`*^9}, + 3.8000039306983137`*^9, {3.800182146333519*^9, 3.800182152792946*^9}}, + CellLabel->"In[13]:=",ExpressionUUID->"3f786932-48d4-4f24-b3f3-24e1289acc74"], + +Cell[TextData[{ + "The two electron basis is orthonormal. We see that the singlet state ", + Cell[BoxData[ + FormBox[ + RowBox[{ + RowBox[{ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], " ", "is", " ", "spin", " ", + "contaminated", " ", "for", " ", "R"}], ">", + RowBox[{ + RowBox[{ + FractionBox["3", "2"], " ", + RowBox[{"i", ".", "e", ".", " ", "the"}], " ", "Coulson"}], "-", + RowBox[{ + "Fischer", " ", "point", " ", "by", " ", "the", " ", "triplet", " ", + RowBox[{"states", "."}]}]}]}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "a1c20ee2-a50c-414b-96db-23db0692c302"], + " Coherent with the UHF description of ", + Cell[BoxData[ + FormBox[ + RowBox[{ + SubscriptBox["H", "2"], " ", "Gill", " ", "1988."}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "8e48dc62-49ce-4c74-bb4b-13cfb3eddde9"], + "\nSee equation (3.6) of Gill 1988 for the expression of ", + Cell[BoxData[ + FormBox[ + RowBox[{"<", + SuperscriptBox["S", "2"]}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "de9860fd-1d8b-4084-8077-ca477d296811"], + " >." +}], "Text", + CellChangeTimes->{{3.800003951126396*^9, 3.800004053175095*^9}, { + 3.800004579396243*^9, + 3.80000463443943*^9}},ExpressionUUID->"3cada83f-24c3-49fe-a339-\ +0566f14382ec"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Plot", "[", + RowBox[{ + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], ",", + RowBox[{"{", + RowBox[{"R", ",", "0", ",", "10"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8014537914596043`*^9, 3.801453827125749*^9}}, + CellLabel->"In[2]:=",ExpressionUUID->"cb4026f0-35a4-4d45-8b9a-35314725a5e7"], + +Cell[BoxData[ + GraphicsBox[{{{}, {}, + TagBox[ + {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwVlXk41NsfxydRljaSSvYREiVL5d54n2gfVxFpuSQVKWW5KVLRYil3wiBF +kSVRSbYs2Y35FiXpkkqIpGiT1Ozzm98f5znP6znPc87n/Xmf9zm6Xv7O+2Vo +NFqldPx/1rLJjTWncTG+xrnVbfAIImbzD/dK+Y6n/fjDZREwehGl4TCDC4Wx +OIMdLjfQzprdWrmAi98zZx3cei0XIc43Qg0XcdGglbFEb98d6KiYGiUv56Lj +dD2jx70Qj59Xdsms4YLvTn3af6AIQQnrIgOcuCgcpY/MGyuGutMLi14PLn5l +2HnDpRSNszwHGH5cLDIvDLW9WoaD7Z/jK0O5cA1JTF3X/AAq8aEwjObCotF6 +qVFPOao2T/malMSF5zLVjy39FVB6ps0IKOTimt0Bc8HDKpReust7W82F9XD3 +11fJD/G3o3Ueo4WL+tGMH477qnH3qbOc4RAXy+LCDCcN1sCF2VeS9IMLzXU/ +Vn9IqoXQwc9LhsZDh+wD+zrbOvz1JLLurToPqSZdaRts6/G1pSI0aQsPmj3z +GbnbGnD54lojGQ8evKbybouTG2C7qaPL/xAP5gH1Y986GhD3eNSCEcWDUaa/ +SH1dI1ZeCBmoSOTBJ9rXhXmyEf0b5BIMMnlgTqHWKxY1wuyR1tdJ1Txw6T1T +wlWb0B1955r/Yx7k2jxcb9g3IWL9SsbbLh5ymf6XtQOb0M5xyqsY48Fhb1D8 +SaoJgc3nvfwN+djJUR1y28uG1vt1U35Z8CFXkX7r4Xk2WmUUbp8kfMSa5cbP +ucnGQsIcu7CDD5vPt/PaBtjo8NicPMtbuv5ZfrktrRnhp5StU4L4aP8iW8bW +aMarquSInFg+en4X21lsbUbUKzf9xVf4MF2ePGh0uBkW3PmPinL4GI6PydkS +1QymVfrMuho+LH1mJzs+aMbq+7npr77xUSa+bJkxnYOvbQfsPIVSfvPsSaMu +B2lfjD98kBdgd9/3p3ZWHEwYF5r+1BVg6HPjed+dHGRtDHx+YokAbgxz1jw/ +DjYfsAie9KcAewuUqy1PcZB/s7x6hosAJTG5Z5quc7CNHeqZ7CmATevwdpsC +DiYP/imrcViAwxWtHPNqDtx16hmLogSIpWmxrndzoJz26LV9hQDBYa/sHitR +qK28eLqFLUDB8i7RsbkUDnU76Dk9F+Cr9juVCj0KzXOe+3qMCJB5OjNcvIJC +kGXi9KFfArzzs2qQt6OgvdW16NBkIZbe0jK/z6AQGv+KG6IhRPAD0f0+dwoG +hWnXJEZCZL9arennTeHFU3cSZSVEZ0X5sfQjFEyVBqITHYWYsyxDTnSKwutF +OYvVdwnhM96vaxpJIXqD97MbPkL4Cfg8xX8pvIscUbsXIcTGT/7qL69QuJRz +t8qSKURdadzAo3QKfzYd8Xh4VYjY5BFv/xwKybTxm4+KhbBytDR4d4+CnXbZ +xs11QmTcCYkuLKHwzeb4l85WIeydtv9YWUFhY5jAcvC9EJc6eE1n6yn8ulrT +7TsmZWORzDo2heyK8JPfRUIkLy4XPqYobHm5Wue4oggi561TZ7VSEE1MZovU +RKiZWxIwv43CbVWOz3m6CFmthaeH2ym4WcQoKZmJsKF3h3/YCwqyzpsKE1aJ +cCzLKrSrk0JRwLSt8zaKoFoW3Mp7SeFJ6uzQgm0iXHW2uj39NYUPbPUMu30i +bK2qez7whgLtm27zy0ARrJeS/BNvKajPXzTqFy5CNX/8UlcvBUt7M2UZpgjm +ikHdv/sobD68YkVKqghpxd86+vopHEyxdTfJEyGl9mxT3DsK5xvWnmsoE8H5 +o+ew/ACF9FGH/G1NItj0aRx1kHLFHJdno+0iBPzuT9kl5Q7smojoFUEu41bo +Cil/8fVaoPZZBJPSQOt30v3kk3xX3+GJoNR54vsOKevVBviQqWJYNRwqypKe +v+rjcWanqhiegxdjqqX1bVMJLzmoJ8bGeaNhedL6A1ZFvZIsFcOFuhLrI9V3 +0ZspSbIRI2V3cxFfqj8nPmmhMUOMUMbYgJe0P3VVaYy67WJY+KnOyOyW3qf3 +WYEu3mIomDZrPOii8HPG7ZRP/4gxbOMxnvUfBaO9FYOz48SofuoVMFXqjx2z +TiH/mhiB3amciKcU/i7nLLW9LcZx85Q1nS0UEpQ6ww40i+HX7/JepZnCXaue +TFGHGNH7nBJEDRQ4uwcpVr8Y73WbTnJqKfBLxmbXCMTAlojfE+UUVHu51s4K +EvjWaY+5l1JYIk/zHFaT4EH7THHufQp7/55xV9lcAtc9yqLePKn/sovXeB+Q +4KLm/hBuitT/JeYHBcESFNzsmBmWKPV/h3V8/DkJkuoflQ9eomBVsL6nKl2C +Kq+vJ3yl+Ul33Xd0ZqcEweNWv10Dpf6FH0rNGZDAYmaJ0zw/aR7zg+qtv0tg +Fpv5iy3Np2w4mVIsRyMLnEIU+3ZRWPnC0blHh0Yiwxba0tdSyAw7NGLmRiPl +95WyGKoUzOoVuNHuNMKfXHTdZQaFetk8ub69NOK3ouP4FnkK/cz3OswAGknn +hYzqCjnQuuHu9ukCjajfVT1vMchBKnszO7OaRtSGLugzCjlgTbdMV9GbRAo1 +zq55Rzg4myF0+vl5Eik1DeWfk77HtBf9pPrEZNJ/l7lwnfR/MDjqHeJiLEfY +vf9m8MMb8H4iZZtSzRTy3wdGaXFVHTYNHTzFCpQnIz3rsh9crYbj+/jFWlqK +RFHni6z550qMNHlFPCpQIjVrK5QKq8uxRLlL0373dJJWc7fILr8MipjY0zM+ +gzhKXtYa/CrB+i87f+u5ziIXZgm8HN2K0d24b9JOE2VSY6v37dP3+yiLYXvo +TCgTlGru7o4rhLdccH9bmwq54cs/x3EqwN6gsLJpqbNJsUJg/fmgO1jqs7jN +YY8q4RRYj7a05OOZiolSsPUcksIPq5lnkoeH986mmUxWI/pdKtcV23IRNsl4 +y5O3akTZbPhjT/BNKPac2HCkdC5RTErduMY+B0O5ukkZJ+cRflu01ZhNNpKM +5stWus4n+trpjB1/ZCE+1Zvao6NOVlXiwuiuTOxMcm+bNqxOTGMaF8WwboC7 +5iYvo3YB2Vj5bMvxhAwMDtmFNEZrkM/p+sV0q3Rk2Sxb8HSPJmllv86yenkN +BZHByj6mWqQtCIyvt9IQ7bqXMXlCi7wx1AmJZqVCGo/86KfaxMRAf+lQ6FVc +WZRW8JShQ6qNLbc4RF5BeD3zCqNSh5xIHPjnIDMFfy1wvdmir0v0dtGzP+Zf +xuoj1C7lC7okOCq7NXMgGRkaXvpPJnTJqi6rmRFzk6HfdOuy4y49MslCPlRh +fxLiTRuNO2r1SPLjeeY1dYnwHpd9/tiYTvRdmKFeaonwKvqhcyGOTqryzqVN +OcOC39mtwk0JdFKtv6nq1GkWgreWvpyWSCdyoTv+mQhjIWYi+FL8ZTqZ/jOq +5MMxFu5Z8wQp1+mkty/Ou92PBV6DpCv3Dp2Y77Y8VL+dhfiOaUw2RSentD8m +KC9jITX78IGox3Syn3X7StoSFrKPttlvaKWTfMUICwMTFh6oxfNb2+jEoyBL +38aQhZ6dsw+86KQTu4tnvgVqsmA4ON9+YJBOYjfXiH4psGBWekIrZ4hOdvxl +tvTiVBb+iHzD2z9MJzUvK8c05VhwMLx+/9OIVB/dZdF6GgtBh3S0xsboRLv9 +rPuNXwk4ueoMr3icTjjvolRW/kxA5PSB/45O0EnbVWO39rEEXCnMjuVy6STg +9+VLMl8SkBUh61PFp5NZLTJnro0k4I7TfruTQjqZet1FZsXHBJTqcTRtxXQS +uNxDpWMoAbXjBjyJhE58/MfuHx5MwP8Aao/HsA== + "]]}, + Annotation[#, "Charting`Private`Tag$3031#1"]& ]}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{0, 10}, {0., 0.18659539142566528`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{{3.8014538192748203`*^9, 3.801453827469933*^9}}, + CellLabel->"Out[2]=",ExpressionUUID->"c26e2d6c-ee16-4853-861c-a39115a14019"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + FractionBox[ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "225"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"59", " ", "R"}]}], ")"}]}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], "-", + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]}]], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.801454228657283*^9, 3.8014542325718393`*^9}}, + CellLabel->"In[3]:=",ExpressionUUID->"d094781c-d1c5-425c-b3e5-23f0293bed05"], + +Cell[BoxData[ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"75", "-", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}]}], + RowBox[{"12", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], "2"]}]]], "Output", + CellChangeTimes->{3.80145423330802*^9}, + CellLabel->"Out[3]=",ExpressionUUID->"ff995faa-4bba-4da9-b77f-ee24c7ff147e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Abs", "[", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"75", "-", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}]}], + RowBox[{"12", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], "2"]}]], "]"}], ",", "0.25"}], + "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0", ",", "20"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8014541950953503`*^9, 3.801454278991845*^9}}, + CellLabel->"In[5]:=",ExpressionUUID->"853ec222-1da3-4b95-8cda-b665d0e9c2e8"], + +Cell[BoxData[ + GraphicsBox[{{{}, {}, + TagBox[ + {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwV1Xk01PsbB3BGKlQ3bpkRMfZMEaZuoTwfW0qorq2UXBOGSJYmEnWzXBGR +PSm7riWiST9uXFvZ54uxL1lmumlsMYMsXb+5zznPec7rj+ec54/nnLc85eav +LjgBAYEifv83n9+jbNVyfqafv/lfYdDIJJrbEe9AVKK72Trfmx9rQonESKi9 +V64xy/eu+IrXogPxoFQ8+6aX7+e1MXLCxKdw938HJuh8H5p3frxJzYDJBY/q +KL5Hd734d6M/G351qDpnx7dSvsgva+t5MFslnrGPb8+TtBsrcgVwK+p6ec+/ +GLzpGc/lGRVD3k//iwvne83DfGSBWgpptlNIne9MwZHIFZMywB9nt7T9wMC4 +44nycn85zDnEajvxPZVqWsdzp4OpafOD2Q0Mop1/XOGuv4V5c7cab76Z626J +3+QqQee6mvSVdQxuN8lqzpdVwcE01unGNQz2JfS0zRq9B3+5Y/cV+aaQkNA0 +9W/Y+yCX2PQdA9x6IMYLqoWRGY2nYnz3jNvs55nUgVEv+ajpCgYBxWKVi/31 +8EbKbjFnCQOz+H+2LmY2wC+4GuIHHgYyAXXWC+6NkPhQM2aUi0Gtkf+3+fUP +ECSToMtbwGDb8KTqrFwLpHlXvKicxWCgtpo2M9UCrjhhWtIMBoX5qQ3TZa2w +HpxU7TaNgaWvpSPHqB22mev9vTSFQbJIVfIXKgYxps3HClkY0P3NfP0InaDM +o1kZTmKQzjkmxQ3qhIRp6p7ucQy8OiWoiyZdYHQMZQyMYiCR3oxb6O+G1uau +iJB+DNZ3VRR4n2ACCbqDBnoxYD/IOf8tkwmr5rOnVXowqKDeezHv3gMqU1vv +F3RiYE8+oju33gsj08yd51owyGrN8JmWGwTJpFub0pUY8FLfksaiB4Fx7rtl +QwUGp6htrO7VQQg/KX/HiY7BjNCKTRVzCEQaTe6GlGJw/KSlbmTECPhG1W29 +mIdBZ+kGTnV+DKpCffLtYvn3gsjVnRrjELReuMc7GgM9lUTdCOdxOK7n2X0/ +EoPHvAJuYNc4eDXxLoaHYnDkSa8LpWgCWF5f7dT8MbjfeshMy5EFlzJ9dIav +YPBn2TuVoiQWGJU+/upxCYPuVEMh5XYW1Em7X+TZ8P+XevE9QYcNtDPOMTOW +GLQKhWkI/PwZqruKd99FGEieHJbAPv4DDmIb5pIKGJSURg57anBg0OTrbr8x +BnAkONFmThw449gbaDXMANXbZvoHEjnQsm2Xq3o/AzJPiGWxVjmgC1d6OhgM +iG+JdrX/MA1OU5RnddUMuM2KXTC9Mgvx0auyd9IYkCHWFipu8g0qVvKyzpxj +ABW6ns74ckHEd2+S78sOEMherhp+xIV9Nu0ZvKwOSN0iM9Kay4VcSna4T3oH +NLe4yhb0caFPzmHx8pMOOGC9ke2iy4MtKWbV3MAOmHJTLf4kuASF2OodbYsO +uB4fXNMZtwxqBXdEts21g9dnNRa9ZBWo8tXD/fLtICofpjp2XADxnGZy3TVa +4fHuNlLWb0JIUvvJCk2+GSjD1n8LtW9FEdcWvwzRP4DPhzDKTVVRpPy1QbNa +rQHKvHdYEc7sRDeR0fZPxbWQddeDo2m3G+Fu/r7iU/8XhGRsXODNiKPWNJcw +C9cKEGCOo/eBPyPPtsLOozvKQOWWa4A1aS8qqVCnzlnlA3spxVasWhK1CUZz +DEKSIduA7DfaIIk8aYo/luWTwTGGEVvaKols1YXNCuuSYEhJuMVqQBLdfPi5 +UEwwCbqsfPXSuZLIPHhQq+p+AtSUmRPVSXjk6+ge3RYUB0E/vpzY1MQj4rUf +4lSZONA5E3qp6xgeRXXWO+ECYoE+XhlPM8GjVOWYHMpyDBT+pCpc8xseXXR/ +HSLEjYKUG4IcyxQ8KuwxL+icDgPryvSt8i/wyPMBR2+cFAYSwscVubl4tFTf +WzHrHgqP072upJTjUesZ9hPc1AMIaxtmjHXgUZZAugKpORgM8f7TZT14xPl1 +7SjpVBBsUiS2hw3jUUBdQotKYyAErp02OPAVj4wOyzTvrfUHb7WKN95bCGjc +MSW4450PaNAudBqKEdDrivNzb456w3TtzMweCQISSFzce5h6A1wvKqpUyhHQ +kddPdV5dpYJSbo3hIxUC2j5hF+Bs7wyT85ccHdQJqJz04Z2krRM4RMSlCuoR +UHCmQ+1gmi3sYx58yzQgILVOpKMQfx4GZJu68k4TUCKnBNcoYQLJ1ylz/uf4 ++/8IlLjgtMG64oeomS0BKWYq2PuFEkAC91RVxoGAxvA5+vrG+oBZHDGeu0ZA +7TGdmZ/IZ8Hs8/XgeB8Cej8UU9NQdAlOBSsWGwcQUOwFqQf+qY5guHdkaPke +AX1cNk9OraeAronF8cvRBBTkvP0P+1I3IOUd5iq+JKAo1aW8YGNfEHPhub0d +IaAZG3aVqew9aGcHWw+YSqEupvvS5lQUWLLjDsrK7kNBXcVHHlo8BU4D5ffm +V9JIZ7P/9UjJS9AQ79tv5LgfRXUdjKS3l4EoLDmNcGWRWGbys2qrd2A6a7+i +YENEBl6km7tMqmGg3lnQ/pA80t/TnKD9Rx28fdh4lbgkj3D21/3FtRrBVZg2 +zmAoIP8vignTO5rgmu/dtzvSFBHT49HN8tIWOEw9yDB3UkJ+f4Fy34l2wCQO +idF0lJFx4aGgghUG/FUS8uyQkAqaSJDxPVrdCXcFSefbR1UQvcegxGJPN4iO +BJ72oquijD9ZO5sdmfA5Xz4xI+gA0rVgaCvG9UDiAaktlTZqSPV4KJPT0wtx +aa5NTkQSStJtDVXY7AP7RAfGji8k1JPg96JfdgC+G+etZtQcRLgFg/bRC4PA ++mwYUB9xCF2X7XAN8RiC7JNa0h1O6qinxLM9I2UYXoXTxKnqGog2lJe+rWgE +ImyunRVa0kDxh1+axNJH4ehIVkFEx2G0W//fh9nYJ0hVe/aq46wmyjw6edmA +OQb3a2NSz1ZqIonpS9sH/MbBQtomr1VJC3Uu6x2RWh0HA6+my+KRWsjm8SlT +Q78JyJChKLUvaSEJyZBGj6UJUGp4mWx5WRvZ6VD8uj0nIU69ntRdo42mpJmB +s2OT4Mrd0tVCIiNZu3OVRfYsoJQtEiNjychCcqvxiTYWeIZYbZg9IaPRYxaZ +Gh0soFnR+3ckkJGbs3s/EWPBwyXa47hkMnrZp963hcmCEp3V9ZTnZDTBNpBs +G2LBat1mX34RGV196JlznsOCuO4dMY1NZBRofHs7EmFDWs4Ntz9ayOiFQ94H +dTE25NxiGJ1uIyMngvhV6Z1sqJCMW2tjkJGZYxFxeTcbRux/dmP2kpF7rsls +AYENqiwpo0kWGQ0asfNFD7BBkx4om/uZjBJWfpNaVmODbvjwqssXMppbtKBO +HGSDuerz1185ZGSdH5707jAbfD2IsgsLZORg+FGPcowNQScerJZzycj2tlyU +OT8Xw3dO9txaIqOiKhz9Fz02pJbmPPr+nYzybW+liQIbsn/fQq1aIyNlORE7 +HmJD0QUXw6ANMioYPDI/asgGusLH/fr/kpF9zRqlyZgNNVyV1c1NMtITvlr+ ++hQb/g98FTyJ + "]]}, + Annotation[#, "Charting`Private`Tag$4443#1"]& ], + TagBox[ + {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQPbcuic0wZbYdAxhcsGe//Uj9rfxJexh/4an5ha/l +b8L569Z33s7RewXnp9tfnPmm6DOcn/dU8/GWdT/hfC7FFvX7FgwOMH6fwGmt +hQnMcH7S7ZD9zGfY4PzCoy1J+epccP7GAp5gCU9eOH9hdfYrg3ABOL9p/p/A +L28E4XyGyw8c9lQJw/lqJWkVIVqicP6Tr9PDuPeKwfleT7NqJxVKwPl+TyZo +y8lJwfmvDic1nFgrDefrCV6TdY6XhfO57L8m3vksB+e7v436rhSqAOffOJTC +GKWjCOdv7TgSp/AVwU9jLX1w7pwSnJ9cVL2VZ5YynK+frn3OJ1EFzj8vpMNd +aqkK5+9e1zRbh1kNzq9m1Ao4cxfB57pT5ZG3RR3Of7pMccr8Gg04f4qGJMvO +UE04f8KstOOJClpwftSU2HM8zxH8Hy5Lf87fpw3nP37qVHGoXQfOX2RrKH02 +URfOX9taKpiuqwfnt4cmezN/RfBN7yxc2X5WH86foTl77VlvAzi//kDvDO+d +CL6vdOjSUyqGcL5j3vFowU4Ef75MksqZrwi+yuHl0/yijRD+0z2kdWkfgp/2 +meXiSS1jOD9p4yeFzn4Ef8Ilnt4jxxH8fZ/Vfv7/j+ADAB7l6x8= + "]]}, + Annotation[#, "Charting`Private`Tag$4443#2"]& ]}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{0, 20}, {0., 0.633629177449769}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{{3.801454251338786*^9, 3.80145427988146*^9}}, + CellLabel->"Out[5]=",ExpressionUUID->"1cebf0ca-1a6a-48a8-bb81-e24f7a7d6bb2"] +}, Open ]] +}, Closed]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Electron density", "Section", + CellChangeTimes->{{3.801823303780429*^9, + 3.8018233147642117`*^9}},ExpressionUUID->"100bae6f-3872-495a-ab0c-\ +896ce0c0e84e"], + +Cell[BoxData[ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", "\[Theta]", "]"}]], "Input", + CellChangeTimes->{3.801823361455533*^9}, + CellLabel->"In[28]:=",ExpressionUUID->"d6e67f73-194b-41c7-9739-d78c807ca3d6"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "+", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], "//", "FullSimplify"}]], \ +"Input", + CellChangeTimes->{{3.8018258476232653`*^9, 3.801825852000239*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"eec71e21-c0ee-45fe-8701-eb10d240bef1"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], "+", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}], + RowBox[{"8", " ", + SqrtBox[ + RowBox[{"7", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]], "/.", + RowBox[{"R", "\[Rule]", "10"}]}], "//", "N"}], "//", "Simplify"}]], \ +"Input", + CellChangeTimes->{{3.801825883043236*^9, 3.8018258982383757`*^9}}, + CellLabel->"In[40]:=",ExpressionUUID->"12dbfe5c-372a-4f2b-beef-914402780641"], + +Cell[BoxData[ + RowBox[{"0.22221760314344077`", "\[VeryThinSpace]", "+", + RowBox[{"0.3009824333701151`", " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}]}]], "Output", + CellChangeTimes->{{3.801825890432496*^9, 3.8018258984418592`*^9}}, + CellLabel->"Out[40]=",ExpressionUUID->"22d286a5-afa0-408f-9bb0-e903a4edff97"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", "\[Theta]", "]"}]], "Input", + CellChangeTimes->{{3.8018234295615883`*^9, 3.801823430791071*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"498cd2d2-cabf-4c0a-b8cf-ff6444abbefd"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}]], "Output", + CellChangeTimes->{3.801823431530818*^9}, + CellLabel->"Out[29]=",ExpressionUUID->"c29eeae9-169d-40b3-b8ae-3606dee56b0a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "10"}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "+", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "2"], ",", + RowBox[{"{", + RowBox[{"\[Theta]", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Phi]", ",", "0", ",", + RowBox[{"2", "\[Pi]"}]}], "}"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8018234459418488`*^9, 3.801823504241561*^9}, { + 3.80182354947348*^9, 3.801823603630808*^9}, {3.8018255522598352`*^9, + 3.8018255920914288`*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"cf48f2e3-669e-4a29-858e-1a9fc6957703"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJxlnH24zVXagCVxEopRITHHlGTijSZ9MLPVcFKpkRrNDBl9+SrSlHCS1Bzv +6BRDo2iKqEgqKsnXyFA+KxyVzzKVQkI4yjfv2+x1r31d9/prX9ftZ+1n3fv3 +rN/az3r2yb/tnvZ3li1TpsyCcmXKnPj/rwUrnpx8fZ3hv8m+jvtN54vPGb6z +qCQz4sjSdT+f/WEGvnLkj3cPLFeSafu3NVvrzv4s8isGNfp0T4OVmQZtXnpz +bfE3kZd5t/Grz3ywPDOl7S331J29I/LVVX7W9/jgRZmnGzz+9PTSPZGf+9y9 +5Yo/n59ZO6Vb37XFP0T+Xc3mp+7sPiNTo1Grmw7nH4y8V6/iWne3eSXzx2k/ +v6ju7CORz1k/auv818dkPhpzbGh+gzIt4SfNml13dJNHMjvX391/eukJkXc5 +cO53tUfemKl81sZureefGHmv964tumhQ/UyjTlffvLb4pMhfW7PiuVdfuD1z +3diZBT06VIh8Q4s6+x9YfH/mnk3nNjucf3LkVU5sd8OVPQZk8Jz1+lnGnuH2 +DLdnuD3D7Rluz3B7htsz3J7h9gy35zi+PMPtGW7PcHvO+tuReIbbM9ye4fYM +t2e4PcPtGW7PcHuG2zPcnuP48gy3Z7g9w+056+mHxDPcnuH2DLdnuD3D7Rlu +z3B7htsz3J7h9hzHl2e4PcPtGW7PWR9HEs9we4bbM9ye4fYMt2e4PcPtGW7P +cHuG23McX57h9gy3Z7g9Z+d9Qkt7htsz3J7h9gy3Z7g9w+0Zbs9we4bbM9ye +4/jyDLdnuD3D7Tk7v5MSz3B7htsz3J7h9gy3Z7g9w+0Zbs9we4bbcxxfnuH2 +DLdnuD1n53Fy4hluz3B7htsz3J7h9gy3Z7g9w+0Zbs9we47jyzPcnuH2DLfn +bLyVEs9we4bbM9ye4fYMt2e4PcPtGW7PcHuG23McX57h9gy3Z7g9Z+M6LfEM +t2e4PcPtGW7PcHuG2zPcnuH2DLdnuD3H8eUZbs9we4bbc/b9qyae4fYMt2e4 +PcPtGW7PcHuG2zPcnuH2DLfnOL48w+0Zbs9we86+z88Sz3B7htsz3J7h9gy3 +Z7g9w+0Zbs9we4bbcxxfnuH2DLdnuD1nxzs98Qy3Z7g9w+0Zbs9we4bbM9ye +4fYMt2e4Pcfx5Rluz3B7httz9v+dmXiG2zPcnuH2DLdnuD3D7Rluz3B7htsz +3J7j+PIMt2e4PcPtOfvvNRPPcHuG2zPcnuH2DLdnuD3D7Rluz3B7httzHF+e +4fYMt2c4nmtufX1Ovdn/Cq8fZkbf/s19xXeURP9w/G+a1/s3TVvktYQXTT19 +RLdf9Y/jwz1+9v/VaOnx4R4fzvhw4oczPnVIxud6uK9nHK4nft6X+H/5r36D +6s9+Lbz+KzPuaEH7VQNLMvWvv2bOGdPyWsLvarPx+avOyl2f/fcaLX09nOvx +wDh44Hri9/jEz/jEz/iOn3F8Pe/rvGMcx8P7Es/vCnccPJK/LFe/Lag9srh6 +SabiSYfyjuSvj+87ptstT5d+sTJyroc/sGXQ8oHrv4rX1yzYNeefvT+MnOvh +3ZcPHnE4/9t4fc8tPx/Rtv7SyLke/qepj3Yo7Pl9vP7xZicUn9/zvci5Hl7/ +6iuHD1y/N3dfHf7Fkttazouc6+F1m/92z9yjuXr+kFuONO7Q7u3IuR5etW7r +mZcX5Or5n69vtafe9mcj53p4xaoFtQp7Ho/Xb3rnqWurtngscq6HP/LIi+92 +uipX/590b7XZc7feEznXwx869Is+A9eXjdev6DOt4+YuBZFzPXzAfS/lP3dX +uXh9QaU9cz97sF3kXA/vu+Ocj+cezZ0v9M40bNLi7B6Rcz383jsnFm38e+7c +oVXNTmeXTugbOdeP73vHbav+1Dfeh7G+rfsQ7vsN7vsK7vsH7vsE7vsB7s8d +7s8X7s8R7s8L7s8Fbv9we4bbZ6xjyyfcPuH2CbdPuH3C7RNun3D7hNsn3D7h +9gm3T7h9wu0z1qvlE26fcPuE2yfcPuH2CbdPuH3C7RNun3D7hNsn3D7h9hnr +0vIJt0+4fcLtE26fcPuE2yfcPuH2CbdPuH3C7RNun3D7jPVn+YTbJ9w+4fYJ +t0+4fcLtE26fcPuE2yfcPuH2CbdPuH3GOrN8wu0Tbp9w+4TbJ9w+4fYJt0+4 +fcLtE26fcPuE2yfcPmM9WT7h9gm3T7h9wu0Tbp9w+4TbJ9w+4fYJt0+4fcLt +E26fsW4sn3D7hNsn3D7h9gm3T7h9wu0Tbp9w+4TbJ9w+4fYJt89YH5ZPuH3C +7RNun3D7hNsn3D7h9gm3T7h9wu0Tbp9w+4TbZ6wDyyfcPuH2CbdPuH3C7RNu +n3D7hNsn3D7h9gm3T7h9wu0z1nvlE26fcPuE2yfcPuH2CbdPuH3C7RNun3D7 +hNsn3D7h9hnruvIJt0+4fcLtE26fcPuE2yfcPuH2CbdPuH3C7RNun3D7jPXb +grd2PVw75xNun3D7hNsn3D5jPVA+4fYJt0+4fcLtE26fcPuE4xNv2df1GXur +dODUs9YXf5p8r1za96IWM0pLku+VVUP91t5GfrXvyIbiRcn3ynNC/dDe2nQ9 +pXzj2a8l3yvbhTjt7bQQZ/IcD3HaG3Vmexsd4rS3C0Kc9nZBQfcDw3ZuT76P +Z1+/Tbxte+/xmj07bE28LX307Ibrir9JvE2+YtrlBfM3J96Glrni2rdLv0y8 +dZ+/umO9Bl8k3ojT3iqFOO1te4jT3paHOJPv4yFOe3ssxOn87RridP6OOW/n +7CoT9yU+K1RotrD1/NLEZ/Z1b+Jzy6Ilq386h7HPDhNP27i98p7E5+KiP27O +b7A78Xn30lZr3yzalfgkTvvMC3HaZ78Qp31uDXHa580hTvskTvvsGeK0z1oX +TOrX4ePDic/HTvn+4WE7DyU+D2y/ZOj7FQ4lPrOvBxOf615ZNqZpiwOJzzaP +VZvQo8P+xOes7h1fGd/nx8QncdpncYjTPg+GOO2zR4jTPteHOO2TOO1zZojT +Pq8fM63WysFpvah83ifjtldO60Xz+h2oV/7ZMsnzpe/W2i//dI5nn9nX44nP +5cM+6Pxm0bHE5+W9qnfbNu5o4pM47ZM47fPdEKd9PhDitM+OIU77JE77vCzE +aZ9/r/XEwb1npvWiguI3HqoysVzi89jBT05o2LRc4vOdHgeH/HTOaZ+9159d +8da2JybP6+xr2eR5vWlW12pjupZNntfEaZ9XhTjt83iI0z6J0z6J0z6J0z6J +0z5XPdd93U/nbPY5tNKwTj+dZ9pnZuCbX1y3rELic/93n97x0zmwfU7reGhb +0ebyic9uH9TpNb5P+cRn9jWtvxGnfRKnfbYMcdrngRCnfRKnfRKnfRKnfWbj +TetFS4f3aN7h41MSn4OPDZt/b5dTEp+X9n7rt8N2Vkx87v58zZLJhRUTn5Ov +O3zt+xUqJj67zKu76j+j0vobcdrnshCnfT4S4rRP4rRP4rRP4rRP4rTP9hPy +n+78+amJz2y8pyY+FwzuOe6p/VUSnwN2D6/3ZlGVxGeTLtMnfVi1SuLz25Vr +G24bVznxOSFzZOqJF1ROfBKnfRKnfS4McdpnYYjTPonTPonTPonTPpdVffjy +K+ak9aKJV488smJwWi/KxpvWi26ZPWPw9sppveiyPUuu7P9JWn87/fwN5co/ +m9bf9nTZsfgft6b1N+K0T+JM7s8Qp30Sp30Sp30Sp30Sp31+237n+R8PSetF +i4qPf9elbVovmrCw6tRd1dJ6UTbeaml9uGmzphXHV0t8Xtyzzb7RXaslPqu+ +8Kd3zm1ULfFJnPZJnPZJnPZJnEl9OMRpn8Rpn8RpnyeP6ljzzhvSetE3H/Ta +uPfMtF604MTBYwdvqp74HNv8yT9XmVg98ZmNt3ri8/evvrP5/KbVE59NNi+d +OPNAWn8jTvskTvskTvskTvskTvskTvskTvs8/9Nleftrp/Wikyp/trxo8xmJ +zy9b7Xqi2pQzEp/zBpb53fg+ZyQ+n3m7WtXGl5yR+MzGm9bfbjjnkqeufj+t +vxGnfRKnfRKnfRKnfRKnfRKnfRKnfV57xqUHhm6rkdSL6F+yz7L/22ngS31r +JD7p+7LPOT8MLvPvsjUSn081+sfC65al9bdsvGn9jTjt87wQp30Sp30Sp30S +Z3L+G+J03aNdqM/gDc8XBu5+mxtD3QbOOMzX48A9Dh7MqWt5/Pj76zA+/Z/U +u+j/pG8NTt8afaGxPqa+ULj7QuHuC4W7LxTuvlC4+0Lh7guFuy8U7r7QOL76 +QuHuC4XTF4pP6l32CbdPuH3C7RNun3D7hNsn3D7h9gm3T7h9xvHlE26fcPfZ +wumrxDP1LnuG2zPcnuH2DLdnuD3D7Rluz3B7htsz3J7j+PIMt2e4PcPtmXqX +PcPtGW7PcHuG2zPcnuH2DLdnuD3D7Rluz3F8eYbbM9ye4fZMvcue4fYMt2e4 +PcPtGW7PcHuG2zPcnuH2DLfnOL48w+0Zbs9we6aOZM9we4bbM9ye4fYMt2e4 +PcPtGW7PcHuG23McX57h9gy3Z7g9U0eyZ7g9w+0Zbs9we4bbM9ye4fYMt2e4 +PcPtOY4vz3B7htsz3J6pd9kz3J5jHU+e4fYMt2e4PcPtGW7PcHuG2zPcnuP4 +8gy3Z7g9w+2Zeleyrws82dcFnuzrAk/2dYEn+7rAk31d4Mm+LvBkXxd4sq8L +PNnXBZ7s6xjf+7rAk31d4Mm+LnB7pt5lz3B7htsz3J7h9gy3Z7g9w+0Zbs9w +e4bbcxxfnuH2DLdnuD1T77JnuD3D7Rluz3B7htsz3J7h9gy3Z7g9w+05ji/P +cHuG2zPcnql32TPcnuH2DLdnuD3D7Rluz3B7htsz3J7h9hzHl2e4PcPtGW7P +1LvsGW7PcHuG2zPcnuH2DLdnuD3D7Rluz3B7juPLM9ye4fYMt2fqUf69cKxf +ySfcPuH2CbdPuH3C7RNun3D7hNtnHF8+4fYJt094/D3pf/uQNsT61Y6/LJqx +t2hl6Kf5OvK8p3u/0ermD0JfyHeRzypaM7d9w8WhvyFXT2t4xqh2lSb8O5zT +5+ppTbd/+frgme+E8+YDkV++pcLGZwa8Gs75jkd+38yXL/6k2ZBwXpWrm73e +f16zNg1uDecuubrZG/n3H3//+YvC+UGubtb5H78e0b7jraEOnqubvXJbhdWr +u90X6rl5ke/odcKEU2oPCH1Om2M96rTeU2d8/9UHoV9ne+TjDj1TdtLHi0M/ +R64O9tvO34+78cYFoX9iX+SFc4a2rV5+VjhfPxB53p+HPLtkyuvhHC5X17rg +h637TxjaPZwn5epaU29d2KJPmRbhXCRX16o1/g8VSs/rHOr75SPvP3T3a41P +/kv8/S/8kZHvFf69Zf/Qb7Q91oWK+txy9cGBS0LfzO7IO066Zuc/T1oY+j/2 +Rb6w+H++e/mm2aGPYX/k69aW7fTDxmnhfC5XL1rbLm/esAuvDOdM5SIvrNls +V8tn/hjOS8pHftXU9X8rntIn1P3zIp/zh4dObfZav9DHszvWW+7bNbH5VzMX +hn6U0shP7rjmseYvzgl9Ffsjb9+g5fCR5d8M51vlYp3k8yd/9unwir8P5zTl +I288eciiD0f3jr9Ph++re8lLn53ZL/S7lMa6RLtfPtRg5Z65oW/jx8hnfT2o +d4O6b4XznvKxbrCi9OYHizbcFc4t8iJvtHX3pX/96wOhz+PH+H287oR518+/ +ZHo4z8h9X+46dcpH53/fN9Mo5DvfL5zvcOc73PkOd77Dne9w5zv8L8p3uPMd +/qryPX7fVL7Dpyjf4W2Wn7xl2yf9Q7/g5vg9hXwvJt8DH+t8D/zKkO9Xke+B +D3C+B17e+R54Q+d74K843wOv53wPvDDk+3nke+DOd/bnzne48x2+IOR7y5Dv +8E+V7/AS5Tt8sPId3kb5Hr/XKN/Z9zrf4XnKd/gNynf4ZuU7/ELlO9z5zv7Q ++Q53vsf9ufId7nxnX1RH+Q7vFvI9ey74XO75PnjUkk8G5s714K3DOR37BDj7 +hAvDOOwfGIf9LZz9LfkVrw/PU85PGX9TOD895b/94ovic3D6oStmjDmnJPR1 +HY683IZ9h4bUfz7X/xP45nDemu2DX5A7H5nWbf2kX5WEPu+1kdebWti8sM6q +0B92OPLTe7V/9P4mE0Kf07HIb3rnr7def8WweJ4LnxrOc08Nf4eE9X/07cOO +vt2qJPSRfxp5/8mLXy1suyr0Q38ZeX6dxv9ufejD0Jd2KPLzejWsMGnlC6G/ +6ljkX2yYNbf1iyNCn1DuvKB6vzrz5rx4Xzxfhn8czpezff8z4nMnr8b0/Pdu +Ksm8/N9+8Y8jX/FCtdoPFq4K/dlfRn7+j70W7R7yUegz3pZ7rnX6es3zK5eG +/rlDkV/aq+wTa3u9FPrAjkU+esO0gq8nPhn6mXL1+ZtmTB87+sZ+oS+nbOSr +R3Q4dOnIa+L5eDx3COfj9fg7LeF5V/jhutYld5Rksv3uJZH/YmznJx6cvCr0 +l38ReZMVry9/tuqK0Ce9NfKLV798dmn/ZaHfd1fkLw7qtK5P7fdDX+ChyK/p +teG0kytNCv1tRyO/bsOkkkcnjwp9Wrk6+cjSNoPuP/HB0G9UNvIlbxwdM3zB +9aFvplzkN5wytvXvN1yVKQj5SD12x+BjPf5zf0n4vcGqyAeMnnLkwTWrQt/8 +psgvm7RzZcHYFaH/e0vktdrcdUdBveWhj3lnrv68eGb9WSveD/24eyPf9MHy +O38c/m7og8zVsTv1euupy6e8HPr5jkZebsPYTvmvPh360nJ17BVNNnW+Yfqg +0F9VNvLbu68+a2//G0KfUK6OfcGRafW/GvDr0O+Sq2NXfvzIltI/d82cynoS +nnesJ8tYT6h/hvXko7BuxPpbWDe2h3UDzrrxSFg34NXCurEwrBvwtmHdqBHW +B54XrA/LwvoA9/oAZ324LKwPsX4V1ofCsD7AN2l9gFcN68PosA7wfGEdeCWs +A3CvA3CvA/F5p3UAfklYB5qGdQA+SutAHEfrAHx5WAf4O0g875zvcOc73PkO +d77Dne/wq5Xv8LbKd/hw5Tvc+Q4n37uFvOZ5Sl73DHkNJ69nhryGnxXy+rKQ +1/C5ymu48xp+S8jr8SGv4eWV17E+o7yG36G8hlcLed0u5DW8Qshr+sHYP7gf +DO5+MLj7weDuB4O7HwxOPxj7kLifUd8X3H1fcPd9wd33Bafvi/my//F84Z4v +3POFe75w5su84J4X3POCe15w9wfC6Q9kXuy7PC+45wX3vODMK/6+JnDHD3f8 +cMcPJ37iZD/mOOO+0b8fDJw4iQfueOCOB048vG/cj+l94bwv48M9PpzxGYd9 +C+NwPZzryWu+jzuv4cnvWwP3/QC3Z3jS1x248xruvIb7/of7/oH784In/duB +4yfme9i3JPkeeJLvgSf5HniS74En+R54ku+BJ/keeJLvgSf5HrjznX2U5wX3 +vOCeF9z5Dnf8cMcPd/xw5zv7LscZ94GKE+58hzseuOOBO9/ZR/l94c53uMeH +O9/Ztzjf4VzvOgB91PQJx37U0FfP9fDkd0D63TTjxH5L9efDWWcYH+7x4V4H +4OQF7xv7D/W+cK9vcPKaeGL9WfHAHQ/ceQrnPifO+D1accIdJ9zrD5w8JX64 +44c7frjjj3UJ5SmcvGBesV9O84J7XnDPC+71B05eM1+45wv3fOGeL9zzhXu+ +sW9N84V7vnDPF+75wr2OwVlP8AC3h1g3kAe4PcT6gDzAvR7C/fuI2Afl9SRw +rz+xn0c+4V434J4v3OtS7GPR+HB/XnCvD3C/b6wDyDPc61Xs91A8cMcDT34H +GrjXAbjjhDtOuO+HWJfQOhb7KBQ/3PHDk78DELjvf7jzHe55wT0vuOcF930O +5z5nXnwv9rzgnhfc84I7r+HOa7jnG+sGmi/c84V7vnDnNdz7EPYP/M7o/wAQ +PhZn + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[{Polygon3DBox[CompressedData[" +1:eJxNmXf8T+X7x9/n3HdDKqQoDWmgkpkiqVD2pmwhZe+MsilCyWoglE0aiEpT +pb2nfJsatKS96/t8fV/37/H4/XF/rqfjvN/vc+5z36/rdV2nXK8hbQfnhULh +Wv4E4gJiCeILWaHwA6MSfBLxHcZhcAnid8TPGZ8xDuf8psTzOb4z82f/YhzG +8SbEuhw7Fu4IN4MPghvA58BHwW3hi+Hj4E5wc/hIuA18Efwe4wj4H8bb8KHE +YsT/6Dw4J77KOBAOxDcZh8BFia/p9+ADiK8wDoAz4suMCP/LeCnzff/NeBHW +XPzJ2AWXLOgDhcLvjLPA04jv67rhSHyDUQQuQnyLUVT3TfyAUQo+kPgbowZc +kfgLoxpcnng6PzQG7gufAA+Eu8KnwaPhPvAZ8DVwP7gCPBK+Ai4LD4K7waPh +h+E1mif4Mrg1XBzuBreEi8Fd4Rbw8fAAuAt8IjwY7g6Xg4fAl8EnwUPhHppX +uD58Nvwv41y4CvEfRm24suaVc+rBNbPC/yawDqEqPAreBq+GT4VHwJfDJ8PD +4J7wr4zqcAXiKRwfDveCy8NXwb3hivAo+Eo9/7SWmsJf63vhY4lf6fNwGeKZ +aT41P5XTXOkeq6T71T1WSvOgOa+a7l332wSeCV8NN4NvgMfCveCV8Dy4L3wX +fBvcB14P3wo3hWfB16Rn1z/Nc/V0v7qvamlude8Xw9fBI+GG8DR4FFwPngwP +gy+Cr4WvghvAU+ERcH14CjwcPjutDc1PjTSHmud+8AZ4YVpvfeHOWsvpWfRO +z6In3E77WusPLktszvEb4XHwEHgTvAz+VHsVPoL4mdYTfCRxr9YNfDRxt/Y8 +XJzYjc/eCy+GP2GUkWYQ92jNwaWJ32u+4HLE/bpW+ETil7o++Bjix4xj4EOJ +HfnORfD1cCd4MTwD7gzfDs+Ee8DL4TlwT3gFPBeW2G2El8KXwXfCN8Ft4fnw +FLgdvACeCreB58GT4S7wEngWPBTeDN8Bt4dvlobCreG58CS4BTwbHg/XTOtZ ++7co3AFuApeAu8Ot4LnRe+8LBOk2uDb8LXxrtC58A98SvR++hq+L3vO74Juj +NeIreH70ftsLXxv9G+/B0+CS8H/gedH7bQ+8IHq/fQnPidaCz+HZ0VrzKTwd +LgW/Dx8Trad94KOj9fRKuHS0nl4Bl4nW5b7wDdG68wl8Y7Te7YZvitagz+Dr +4dLwB/Cx0drdD54BH83xD+FZcBn4Y3gmfAz8EVwqWrt7w6PgP+EX4avhjHNe +gRfBjeDv4IXwhfA+eBwc4dfhxXBjeD88Hj4YfgPeCk+CixIfYkyFDyduZlwD +H0y8nzEWLkLcwhgHH0J8gDEZPpQ4gVEEfpPvnAgfAr8FT4peE2/DI+CfuP7n +4Kvgn+Hn4ZHwH/AL8HD4R/hZeBi8D34GHgP/Db8MXwPnfOer8Fg4wK/Bo+G/ +OOcleEp0bngXnhqdM3bCk6N19p3ga7yU9dmYz3wO94JvCP7NWnClpJnaj9Ph +S+G18AK4A7wOvjnzvC6Ep6X9K828JfMzuQ2+LvN6nwGPzjxPl8CNkh5qT03M +/NzmwBOUi5JWj4EvgdfA8+Gu8D3wIrglvEzXnNmHSAM7ZV5HfeCOmfdED7hN +Zu8hPWybeX1dCXfIvAavgC/NvE57w5fAreA74Bszr5f2cMOkA9KW2Zn3zeVw ++5QLpO1D4W+k3fDpxAeZ0+Kaq9w+StpYKvMzbAlfmPkZtoLrZc658kgNMq/x +FvAFmddya7h+5jVyPlyN+BGjInw88VvGOfAZSYflSU4lfsGoCp+iZ82oAp9M +/JBRAT4u8/pqDNfJvM8awrWJ4/nd7fDd8KPcyxvKQcR3+feJ8FHECZzzJHwP +fBO8Q/MpHYNfgLdkXuMXw7Uy74ML4OrE1/UM4IMz74kL4RqZ13Ij+NzM/qoe +fJbum++cAA/Wveb2D/JUtXL7K/mu3vAD8HJpFvwgvCJzTpdvWQVfDm+F75TG +wQ/BK+H+8KPwWnhYupd7U37RPGyAB8CPwevg4fAz8H3wCPhZeCO8WPoBP6b9 +Dj8Hb8rsnTQn98Mj4efhzZl16G2dD4+BX4K3wtOlzfAO+HrpKPxMZu15B34c +nibth5+Gp2jfw0/Ag+An4Lsya9tOeHvm57ILfipzffAe/CR8Nfwy/AA8EH4c +Xg/PlB7Dz8HbuJ8T4CHEXwuuGYoxvk6s2kFr4Aviw5zzG3E/403Gp4x9jN3a +V9JaYsnMx75Kx1WfqNb4g/FDOl+feyj4u/W72lP/d+73xN8ZXzJ6cfx14pzc +x39mfJJ+/6d0DbOUZ4jPZ75e3cPn6dp/TPeyL/12lr77+//3PbqfPYwZyl3E +Z9P1/5Lu4dt0/l7GN+kzmouJygnERzPnllfgBzP//550zvO59680fH3ufbEd +XgeX1jOFX8itz8oFm+Cyenbwl7m9h3LoPrhLwXn5i6Rdyr97kvYq5+5N+q88 ++1Vu7y0d3Zh7Xz8V7P/kA2dzbEVuHXtc8w+X13qDH8qtITvgbbm1SDlrO1y5 +4Fz2LFyz4Bz3XG5tVB5/IrcWKScuz/3cd6Z81K5gT7I5t2ZKz57KrWnSgydz +a5pyqPLzq1oj0sDcNZF8yC9Jz+V/Pkxaqjz4bm4tUr5+B76oYD/wEdy84Lz5 +Gly3YI+xM7ceKqe/l1uXlNOljVpvD2f2Ba/B2+DfUn6Rl9uVW1eVc1/NrdvK +3a/n1kDl7jdy6568yo8pT8m//5Q7L8vLfZe77pNn+yHlNfnJ73PXhvJ1+3N7 +TvmuT1MeUd77OOUaecWfU86Sh3wzt64q5+xO+UUe8pOUj+Q/H2E8nfbynHS/ +j2TeT/vTGj9dXlb7h3io/FnB/rZocJ2rfN4Y3qI9Jc8SXDcpZzYK1uGc4w2C +Pby0tkmwhgeO1wuuNf4l1mfcB6vQbxqs7VH+KHddpvrsCHmvgn1gOflR7Uli +x2B9Pozzd+Suf6dw7JncvYupwXlLmi9P+EduX6Ea61h52YJ95nHB/kT+6KRg +3/IDsVlwHjmAz54c7G3kF0oGewP5nTLBXkhe9Ok0/1rPpwX7pZ+I7YJzjdZX +bXi1dIhYK9gL/UGsE+zB/gqudzRvS/ie84I9mHJd99xzdTvH68Lj4UHJX+m5 +9IfrwGPhAcrJ8ER4iL4HHgcP1PnB3u9PYo1g/6PfrB7skX4jtg7OifLMbYJz +hzxz8+Ccq7zXKji3HsTxllpb8IHy7MG+7h/iBYy74b+JZwR7y5+JbYNzmbx3 +pWBfKr9ZFV6qOSRWC/aEvybN0b6+Vr+Tu6cxQb+fu9cxEd6Quy4eCd+ftEU6 +syx3nTtQaw0+E7466bB07yqtx9w9tDG63ty17Si4Q7AfUF2wNHddPEDzlLu+ +HqR7zV0Xj9Zc5tbYwfDKpHXSwFW56+6hwXlJ+Uk5VjlN+UV5RjlHuSdLx5QD +lXfm5+533cCfeSnfzSX+mtvrqpZcnbsGHwZ3D877R3DNa3P3XkZw7PfcXlr1 +6ZrcfZjhWm/B+ask5/cM1r2j4G7BvqUE/FbSH2nLO0nPZ/D/b+fuDV6f8ojy +wnj4A7gzPAt+P3fPcKZ+B24GT9eags+DJ0sbcvfuxmnd5e5NTdJ95O5bTtO1 +5O5VXgdvivY3Wntbc/fuxnL8ltx9SNWYnYP9WDHO6RLs0+SVusIvwsU53inY +y6lO7BGcd46El+TuY/QP9n7K16pzb83db1TtvCV3T+wa7fXcfU7V14ty9xVV +Uy/M3YdUDf5gtJ+TXn2W8oL0/Pbo+keado7WLsc3EntF97PEvaP7RJvhumkP +ShO6RPdB1nOsa3SP4y64W3TPZQN8eXQvbFPaj9qn+p7j076T7nWP7svcrfUQ +3UO5Bz4/uG+pzx4V3GNZRjw7uK9yH3FgdN0ib1MzuAd1L/GK6J7U/XC/6NpA +/rl/dL0h79Ezuu+j76matEK/Wzm4d6frPytYD6VRVYJ7ZbrOi6P7aAvgM5NO +SkMGRNdC8lcVGasKnpMe0f0mXdug6NpJXqtSdA9L66dUcH/pDmLp4P7SncSy +0X1t7fcTo/vs2uMnRPeUpS0nBPe4Vuqc4B7UauIpSWOVO8oG975WEcsH97vW +EU8N7oOtJVYI7mHqmR4ZnHeUa47R+oZXEI+L7mtrfVaI7tlJr06N7mtL08pH +9+OkhxdF9zTnw/Wje6xztQaie/HStIrRPUHp2BnRvUKt7ZOi++zSltOj+4nS +z5Oj+/vSkNOie47Sz1Oi++/SHOVu5eulxL7RteUDcJ/onvhW+K+Uv5Triwf3 +M28nHhzcd72V+G/KXzfBBwb3V28m6qWA8uAcYongPt6SYH8uD67a5fDgfu8i +YpHg/u1twTWIvPD2aC+0N+lqseB+8uLgmmR30t4suFbVvMnzTCp4Pi8JrqN1 +Xy2Ttui+VGfuSNewLbo2kxa1D/Zd8gN5cI6ep2cU7BPklxrCT8FbiAcF95Zv +0ZoPrs21p1oEa5pycQz2JPJgBwT3nLUv5JeUT9cE696upIGHwNPhhcSm0fW2 +uEN0T1nrtkl0Ta65ahTdG9U1NI7uZeu5NIzuU+tZNI/2GZq3jtF9Vf3uldF9 +WN1Ls2iPomchPyzfKG/cKbqHq/XfObrPq31xWLA3k8dpEe17tDZaRfsbratv +iP0450b469weT7WP+ht6pnq2/yRfNJtjf+Z+pyMf2DK6B6E10ya6d6+93zq6 +dy+tax/d99e+axvd65cmXBr97kF7uV30e4LlWg/R7xikA+Wi340p7x8d3H/W +OVWje+jyLUui+1PynEuje2Ty3mdGvy9RTlwZ3eOQb3w8uoZXnloV3R+Rh7wr +ukcgL313dC9DPvzh6J6C8t0T0TWz8vvq6H6KfGDl6Pc0yt3LovuD8q53RPcH +5dnuje59yJ8/Gt2/kMd4JLqvIZ/wWHQtLS9RLfqdgfL48uh3DPJyK6K9rHxm +lej3GfJyG6J7NKop6kS/m5RnuCe6F6Pa4c7ovqH84cbo3oo853nR7zjlNwZH +98hU89aCZZ7kN86Ofh8m/3Bu9DtOeZh60e+fpCEXRr+Xks40iH7npL1ZO/od +m3xO9eh3rvItNaPfO8qX1oh+T6Ya5Jzo93DyLWdFv19UPbI+uhej2ue+6J6R +6ovzo9+tag0Pie45qh5fE93PUl1QN/pdrPq6Q6P7g6rT10b3ueSx10X3s/7n +vaPfn2nN/xdOrMiA + "]], Polygon3DBox[CompressedData[" +1:eJwtmgXYFkUbhXdmVlAsDMSgQVApKUUBBQQRRAmRNAiDBinp7gYpFVQUECUU +G+zu7u7u9jf/c3P2uhxn7p1932/f3ZnnOc9ZKvcd1nlozLKsqf6Xq/9e/WD1 +FdQv0oEv1V8kPkz9fPEX6i8UH6p+nvjblGXjxANClq0Rf67jF4jLqp8r/lH9 +UHEl9UvEf6gfLa6hfqX4f+rHiI9Sv0p8kr5vK9/H94gfUV9f/Lu+v4H4UXED +8R/ihuLHxA3F/xM3EjfQ528Wn6fj14lPURuquck6FjRXX+0mjc/V/LWaa6M2 +UvMzdKyE5uqpbdf4HM2v19wZ4rvFl4ovFrdUG6LzJ+lYprnrdbyMhu/oWDXN +XSPeV/yauJL4avE+4lfFFcXN9Jkt4v463k+8Uf1B4rc0X0W8TlxK/LK4vHiD ++EDxm+LK4tvFVcVfimuJW6gN1niijv2nuT/VLtX4aPWrNVdXf2+duJf4fHFt +8ZXiHuJzxb+pHyk+Uv1l4tZql+j7pulYrnN/1/FRGldXv0JzjXTsOnEfcR/x +T+qHiSurXypupTZMn5+iY5F7rXaLxlfpWG/NHSfeIO6r8/uK71R/pPhrzdcR +/yoeIa6mfrn4DvXVxF9pvrb4NLVRGs/UsZL6roPUlmrcXOddrrm2aqM1P0vH +9tRcHbW1GvfU/Hma+1n9cHEV9cvEt6mvIv5Cn6kpbqjzrxX3jr7ee9XXFP+o ++XriU9VGaDxdx/bQuXeoPa3x7cHr42PxueIO4sXi78RTxcODr+9n8WrxLPFV +4nJqpTQ+VMfW6m/9ovk1Gs/Wsas197v4avGi4PXKmthH48Myr5UfNb9E48k6 +tlZz9+lYLfFP4vo8n+L+TBGvE9dQq6jx0Tq2NXrNHRp8D1iLf+j8azReHLx/ +WHNlWXuZ1+IbGh/C2hZfK/5N51+l8cLg/VJdrYLGR+nYFs1XEO8nPpw1EL0H +SouPyLw3uKd1xSdmvtfHiKsE/4abon/DseImmX/bseI64hPE94gf0N8vy7PW +sUGaO5prDn5m26P34IHicpn35sPJ185vGKq5o9QqaXyMjm3T/CeaP0/jjsHx +6iPxOeIzg+PhQ+KK4jLiIbmvgc/+EHxtv2r+cvEc8TXir4gb4sPVLyDA5o5P +6zS/ReMj1Y4I3gObdc43yef3CN6/XyXH227B8fILcT/x2cH79TNxb3Hn4PX8 +ubivuEvw/vkyOR53Dd6/m/Q3Dha/La4q3lvz88QnRMfvH9QPEVeMXr/fa34u +8U/nX8F8cf5Y8ZXEf503SFxe/UJxc83fKx4o3iz+VHy+uFNwfOBvHhYcw7iW +r5PzS/fg+P+3+AbxKvH14v+KeL1WfKM4ETPE14m3a1w/em+xx1JyDD48OGYQ +mwMxU+P1OrZV40hMYe2Kt5Ef9JkHxEOin8e/Rfy/UvM3iP8SbxavFG8S/0nM +F68QbyR/iTeJLxNvyL0myhT7Y4e+s4Xm79N4UPT3/SPeJr4i+P40UTtd4+48 +k+g1cIjG7wavDfZAefEnwXuDnLFJ412Zc8nLmu/IslI/UXNvqD9bvJf6yeKX +1Hfg3qifIH5e/RnkQvXjxK+r78L+UT9J/KL6M4nd6seLL1Tbpr/3oI61So5x +xLqnMufGMTrvNvGT4vbixpo/SdxO/GwRc9cE5zxicffoZ8szriVeJv6CfKa2 +nL2itlHzO8VNNf+muKvGpdRP0XctVP8R+YB7Hh0ziZ0v6jMDcmuG64NzNlri +w+j9fID6mezn6PV4oPpZ4p3qjxN/o88MEz8gPkn8s3gE+118svgX8Ujxw+Lm +4l/Fo8RPiFuL/xSPFu8SHy/+Vjxc/KT4VPFf4jHip8RtxH+LLxWfo7Y8OCfW +QGtovrHG3+nYJbk1zfEan5JZ67yl1k3jvdVP1dwH0fmmtPoZ4vei49X+6qfn +XlOsrX3UTxNfpLZd3/eQjrVO1lDHiVtm1lZPq52m8T86NlZziMOtwXuEvVKl +yEdnRuebXmrLgjVB9WRNsZq9mllr3Jb8t1hDrKWO0bmFHFNVc7erPZz5mri2 +HmpLyCU6Vo1YqvNLaPw8OURzV4hLil8gh4j7E4M1fpGYp/Obic8S92HPEOui +YyMx8mONbyn0HHuIvXSn+KXM38F3NVVrr3EPHXuHtSDuyZz4a/ER0bGZGE1s +v1WfvyfzmmPtrdGxPcTPkaOJ9Zq/lVwXrJd2cE/IRcH6Z3W07n4WDaDBqrhb +VmbPiMuKV4j1X/Y0eVd8fnTuIIegdW8lJ2r8WZHP0CxorR2ZtQx/k7+NBkO7 +EZPqavxpkb/I0eTq98WDc2vEy4M1ONqRa+Ra+Q1ot57ipcEa6chkDUCse13H +BubWB39n1qzohVnkXB17U9wreY+WFO+Vee+Ss8nd7OEbo6+hVKFvuLZJaneL +XxCflXxODY3fK/J9Vx17RTxFx5dEX8Of7PfM11a10DMdovXP8WrN9Nm23GP2 +Ps88eM2z9k8WDxSPZ49Gazz0ccNo7cc5aI9/gz+7f3It0Iy4Kt4vWYtTT7XP +XVOgnxtF1xr7iieIm4hPF58YnUvJqeRijo0Tz8987t9Ffq1VXBvXjFb6L/i3 +dFGbiTbQsUOT1yhrt1yxdtkDncVlovdGV7V5wTVABZ1frtArp0Xn87bR2oVj +zJ2tY3PJ/eLy4ubiQcG/4V+de3SRD8+O1rN7JdcfjcXtcmsqtN5HwVqrVVEP +DIuOB03Ed4kvjM6vaDa02sfBWo4cQC64KFoPoFnRkh8Ga9ma0bUnNeg/xd8c +I56d+Vq6ixcE10CVkmMea3l4dLxpnKwH+kXnb2oG6tHjo2sJagzq1eOiaw9i +3ArWYnTsY42yVj8I1r7EcJ5Fl+jYfmKyXrkgWi/UKvRNt2h9WLPQF12j9T73 +lPq7dvS97qY2P7iGqahzzxLPCL6GsuJXo3NDSdZF7me0QNwu+tmRg9HOBBFy +8wHJtdnJ4g65Y+xycafo2HsCz0jf30nHXoleIws1Pj167bDnLxN3jo4F/M3W +wWuMazk4uTZqqXFHzR2SXKu1Yh3m3vPs/ZeCax9qgr35W8G1wh78nmBNg7Zh +TfMsT41e6+Qz9u6+0dqpTHLtfoq4U+57Qu3XOvpeEcPRIvtFx/Zj1PcPXqPU +ylXV+gTXhNSGeAyNxC0yew94BtS3x0Z7CdS0nFsvutalRqZebRBdO7Pnxwc/ +A2IBwRz/o260d0CMmBB8T4kdXPO04GfAb6GGR3/Xia7tW0TXbtRw1Lpdinw6 +OTpfHV7Ui22i9TnPjFxeIvpZ8gym6vPLMj8bnsH04GfIs2ENTBIvzrw2zhRP +FC8Sl05ueCcnRc+xBplrH7022VN89ozovfabPtswWCOhlT5HxwbnKHLVo8nx +u3yhj7jmS4v4x28h/owr7h9rGb0wtbg/rFVi+JTi9xDb0SCTi/uDNqHGph6Y +Vtyvx5LzW4VCT3E/8TemF/eDmEUtzj3cHcty61P0C7EHPbq60K/obWLUykK/ +ErvY09QC7GH2OjGEWoCYSGwhpo4t4jnxlPy9pMif5GdqAGoBao7dtZP4LvFz +4vPFS6O1CRrlXnE/tW8za2b4brXPNP5c7R6NH9TnF+kzn4h3snaTx5+q7Uqu +QahtqKmoTe5BA4mfFZ8nfiB3vkVP9SU2i28RPyHuIb5fvKvIx334++I7xM+I +z03O99QHeCLniHflrg+oF8j/O8W3BtcLPcX3iXeKnxf3TvY4FhX6EK+OmDi7 +yEfESmLmnCIfEUtnqrXKrJHRyjOS4yGaFm07PXk/sKfZ27OS40fTIn/PIedm +rlmIj3OTYxkxkP0zOzl+NCvy7Shx9ayo2cn3ue8Nv4nfVjr3b+eecG8OzH1v +eaY82wNy3yvuOfd+X7XHM99j7vX+ue8N94x7NyK5lt1dMxMrxE0zeyJ4I1OT +4zseCl7KOHHtzB4K9SKatzd7Qf3s3PUF3s/3mq+b27PBu0HT433i+aDP12fW +l9Rrcwu9gJ6fmOy3HhXsx00SN2LvBPt3E5L92RrB/uTkZL1Uu/h7U5L1Cx4O +fsnYZK+ncpHvV+rvfZy5xrsLLZHs5VQq9MPo5OuvUOTb8cn+cPVg/25Msh9T +sdAH+6g9Jt4hvjN3Y8w9757sCeANoAHaJHsgAwr9hx7Dg0Hv9y/yBR4FXgX6 +H+8aTwZvBg8DbxuPp11wzUV9gL4bWOgl9Bz1A/U+Gg2tRn3SqsifaDX0TK9g +zYf2o+asVsRPalFq2BbBNT21LTVsyyJfflQ841OK/M2zxx/pG5yjyFXkP+qZ +AeK/omtY4nO9Il7jEeEV4Tnh/eLxnxZcg+P94+Hg5bCm8H7xyPDKqKnx+olH +j2h8U7AeJx4tjvYw1qt/KriG13+7axs8JrxSanS8J94xtA2ucXn3gKdF/dYn +c37G88L7uiCzd807hjbBngfvHuaITw32ND6L9qTOCK6J8arw8PDyqJm/L/I/ +9WJf8S/RnhneWb/MXjT5jLXFGkMP4AlUDa6h8Aqo+Y8J9hDwAm7PXS8/mLle +uU28Jbh+7oz2Fd8Q7Al1TPZPqEWpSfFTdmh+c7CH1gGtKr5RfL+4U3I+xY+t +ktm7vjm3X4IfhP+CJ4Y3hqZul+xx4XWhQdsm11PU4mgItAT1PfUimhxtjgdG +fUn9SL2P54b3Rr3ZUnyTeEOwJj892XMi37fIrNfQb8RaYi5aBM+pQbAewIvC +86gV7HHghZCT2cvsaWITmgBtQM7GS8GTKResGfBq8FBqBnsseCt4QicGeyp4 +RXgiTYLrObwSPA9iPTEf7YgndkKwJ4NXhsdVP9jjwfvCE6sX7AHhld0hvjk4 +hnRL9sgaB3s+eGd4LCcHe2p4L3gwzYM9NLwZPBRiHzGQ2nFv8aOZv5PvJr/j +gX1Q5NuSuZ89a4S18kLytXEPuZfkzDfEM6LzDTHsNfG06Nj2fPK185v4bXnu +tcAz49ntkfvZsWZYO8/p/GaZfzO//SD1X2fWDOiIErn9DdYka5M1RewcGb3W +nkl+FjxTnu1TRT5gT7A3Xkx+9qwR1goxlt9/SXTsfTZ5LXCPuFesKfLpqOjr +Zc1y70dEr+Wnk/caa4C1cK/6bzJrIDwAPJN/M/sPeClokrc1nh2dj9E474jn +ROffxcmxmRhNfY3melc8Nzpfo0neE8+L1irEFGLDIUWsQQO9L54frY2Ib/gP +pYv8tSTZD6Bmpp5bVuhp3iFSD+Dp4JccUMRDNNbrGk+P1gNLk/0F3vFRD7BG +WCsLorXa8uR6jnec1CeXJXvhvIOjPkFz4b3MjNYTC8Q9M3tc1EMvFfqJNc3a +fiV5b7Cn2Ft4bnnwO068ODytGPwOAa+LnE/uRxPwLg8PKwt+p4m3RcxCy46P +jmXEQLTehOjYSAxEH42LXu/3J9877iFeDhoDrYGm4F0gOb56ka+If48UeowY +QazAEywR7KHjFaJBahTxm3enDyZ7TXhMeE0fintlzhHkivvEe2b2qPCq6hb7 +t3ERn15O3vvEEGIJMR4tPLGI/Y+L62TOEeQKYjJ6bnQRqz9Izm1oBLTCk8m5 +nRxMLn4/OdeSA8mF7ybnMnIcue4d8VmZcxzr773k3EeOJleTM9CXY6P3KzHr +VfHUIpa9mhwriZHEyieScxkaA63xRnIsI4YRy95K1hpoDLTGm8mxDQ2CFnld +3D5zDCQWvpYce4m5xN63k7UJmgRtMj9Z+6CBqN/JKeS2wdG5Bg+Td3OVM9eL +VyfXftSA1LLzit+P54D3sCnZ28EjoR69Ntl/wSOh/r8mudalxqbWvjK59qZG +p1YfkPz+kDXD2hmY7OewPvAnLkiOJexR9ur1ye878ZSody9MXuvEHGLPRcl7 +gz3AXrg4ee+wZ9g7G5O9HDw4/JRByX4W73R5t3tDspeOx4q/sirZP+HfKOAf +bkjW4mhy/J2tybUpNSre+xXJtTM1NF7i5eI5mT0xvLE1yX4K78jxt7Yle728 +o+Fdzepk/4R37Phda5PrfTwLvIvrxKsye474MeuTvSg8BbyFq5LfR+Mp4C2s +S/YH8BTwD7Ynv//CY8Zr3iLemPkdCH7ZjcnvQningL/WP3kvE4OIRcOTtc/u +d9LiFcm1PDU9/suiZG2LxsX/3Cv3+kKDEW9K5dZiaDT269Bkbco7Yt4VH5w7 +PlHjEs/RrPsVuRAtOzjZz+SdNn7VJcnvMne/QxePTH6Xu/sdJPk0d/yjxiV/ +LEzWmmhO/NghyX4n78R5N7452RvAI8CP2zO3VkQDEj9XJvtd/BsE/OgyueMP +NTv54P8QiijI + "]], Polygon3DBox[CompressedData[" +1:eJwt13XUVWUWB+D7gXQjjUqMIBiESomEKCEpSijdOqSUIKDSYY/SUg4gMYRF +6FJAJJUSpVsFYQZQGDFHmGcvzh+/tfd+zv245557zvteSnTp92jfdKlUaplk +kHHpU6mraalUObnPvMPBkeySuYTcydax59mP5mJyO/uEbWYXzHdIZfYR28sy +q/XYY2y/fh/Lpj7MWrFD+v0su9qQtWaH9W+x+9Xe7DmWy/yNZGUNWEt2UP81 +y6LWZy3YAf00VlntwZ5hmc2fyxnzrVKevef4ctZGfZHNZuXNuyUdq82asN36 +7eyK+R6pxTayXSxNrcUasz36AyyX2oS1ZSf0B1lutSlrx47rl7En1ElsFitn +3iinzX+L68/ed/wlllOtyRqxY/oVrG0cY3NYBfNXcgOrw5qxvfo9LL36AGvK +vorPyXKoNVhDdlS/g/0vvm+px7aznewvc3Wpz75g29jP5rulJtvAtrL/mitK +DfYZO8tKqV3ZAHZF/zLLr9ZN7oPT+ufYf8xFpTRby15ld6rtWG92VX+BVVOH +sIksu/k1uYu1Z33YNf3rrJzagfVlqbhHpT4bx6ahouZ1cb3MmaUge8vxN1lF +tTPrH39qniz3JJ9jYDwf5n/Lbaw7G8R+1Z9nZdUnk3vtd/10ViWxISyL+Sdp +wMaz6ayIeYZUZU+xoSyreYrcy7ol75HRPFOqs15sBMsZ107KJPf4YPab/hJr +Gtc7uTdKmN+QCqwTe5qlM2+S8/HsSqXk2r8Q52guHs8w+5RNZZWSzxvvkck8 +XM6ZC8ezxFY7PiKujbmIlGJr2CvsJrUxa8PO6y+y2rF+sNdYXvMouWwuKXex +9Y5vYMfNNyX3xhI2lv1uLpuc81a2hV2MdUmqsI/ZZ+yE+Wa5jS1l/2Dl1Y6s +H0szj5Zf4zXxXLPNjo9hv5nLyL1sC1vPDpjzx3rH5rNzrHTyHcW98Yv+FLtZ +bct6sovxXbNrsd7Es8R2su9YseTejXv8R/3b7CF1EBvHCsZ5SAc2i61kd8f5 +SvtYG9kKVtE8Tx5kA9lYVsC8Rp6PtYJ9zlqa50odNoCNYfnjekrXeH+2ilUz +/yLt2Ey2PFlfvpA/zFXloeTaZ74hlRqmrmU72SNek2J92L/YemOdWJvZcPYR +28Was1XyNJvHPmT1zH1knzmX5GDzYu2PNT9myc7mxjPAvjZni7A5rC/bb84j +Odnb7J+srjqYjWeFzAPkiDldfJ9skeMfsn7qXPYBqxvnJofMV803ykLH57N6 +6jN8Aisce5HPNoJ9zHazR1l/OZwWN1kqlU95x/E/WLc4J7aaVY33lFv0+dir +cX3Mmfx7z+rXsB2ONYu9iA1g77LNrD4bJmfNhWK/YKscz+h1Q9XV7EvWNNZ1 +6cEWsLWseuxZXtefrWSbWAO2UBqx4ewVVsz8jjSOZzvOjxU3L5ImsXYnz2+s +Lxn8e4PZB2wbaxT3vPRmS9k69kDsT143iL3PtrKGbLE0Z6PYm6yU+ar0YkvY +p6x27DvSik1mi1jZ2HekZazd7B12e+xZ0pMtZp+wWuYr0ppNYYvZHeYv5U9z +NanLtjme3vkNVN9jW9jDXrNEHmWj2WRWOv5Ousf9wNaw+8wLpCEbxl5mt5i/ +je832ct6sQvxjLKj5hukAFvMhrLvzHljzWIr4/lhLWLNY1NZGfMxKchasq7s +jP4EK6y2Zt3ZWf1RVkBtwboke+1l1izWZDaXlTTPkhqsD3ue5Tbf6BpMin2d +HWMdWX72EtvOTrDOLB97MX4TsOOsE5sU9y+rkqwR8VuvW1xr85/Xt+PUVHYk +3kdtzjuyb/WHWV71EdaBndKfYSWTfSvW7Mv6iSyjWpk9yPbpv2fFk30/fgv8 +pD/NSiTrffwWuKT/gd2qdkn2+J/1J1kR9XHWg53TH2J51GasPTupP84Kqa1Y +N/ZD3O/s7+qMZJ2Me21CfEhWgd2v3aWfzWrGGsVeYHnimZSd5mup67+7p8ce +y3awv64vo6lprCfby7JIVjY71gHWOfY0toBVjvOQPeYMkjn5TbOUPRZ7GpvC +bjMPlpOxlsZezZbFesZOxbopRdly9iz7Pu362hRr1LuxN8U9aM6Ydv13U+zJ +Q+I+N+eOvZqtYLmc/Fh1IzvI2njNk7LLnBZ/z2bEc8a6qG+whayKOae/HRN7 +ODvAnmC52Xi2iR1m7eL7YRPYZnaEtY/7h02M3wTsKOvA5kgt1o+NTH5vZPO6 +kWwd+4a1YtnZqNjr2T7Wmq2UTux1Np9VMufwutFsA9vPHmerZQhblKw5se4+ +JbvN6SUTmxnrXrg6Pe36/7dqmv8P/OqjpQ== + "]]}, + Annotation[#, "Charting`Private`Tag$3923#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}}, { + {GrayLevel[0], Line3DBox[CompressedData[" +1:eJwt0csrpWEcwPF3nDnOHBxMs9IU2WmKrRRbKVZTNmPHaizYmqUVa8IfINYS +G7mf47aZ5D7jnia5Lhi3JD5PWXzfz1tP79vv6Vfa3P697UMURZ26V3i/0Yn6 +sqKokIMs4SgrOMcarrKBh2ziNVv5wl/Mi0VRN79ygN84zCqOs44ZTvKUj1rX +f11qyjAbnOYmZ7jFWW6HObjDef5hmn+Z4S4XuMdF7nOJB1zmIVd4xB7znvFJ +x7rTlVrMtcZGplnLMVZyiGXsZxG7mMMOPvvfz3AH/uA+6/mb1eEeLOcIiznh +u398UIFudaEv5svnZ6bCGfOYYi5zmcMkk0zwE+NMMMbssFPG+aqPYT/hLMwp +I0S9Hufv+38Df9xIqw== + "]]}, + {GrayLevel[0.2], + Line3DBox[{661, 952, 458, 660, 1046, 868, 662, 1047, 869, 663, 1048, + 870, 664, 1049, 871, 665, 1050, 872, 666, 1051, 873, 667, 958, 1129, + 668, 1052, 874, 669, 1053, 875, 670, 1054, 876, 671, 1055, 877, 672, + 1056, 878, 673, 1217, 953, 879, 954}], + Line3DBox[{675, 959, 1130, 674, 472, 676, 1057, 880, 677, 1058, 881, + 678, 1059, 882, 679, 1060, 883, 680, 1061, 884, 681, 960, 1131, 682, + 961, 1132, 683, 1062, 885, 684, 1063, 886, 685, 1064, 887, 686, 1065, + 888, 687, 1066, 889, 688}], + Line3DBox[{690, 962, 1133, 689, 963, 1134, 691, 487, 692, 1067, 890, + 693, 1068, 891, 694, 1069, 892, 695, 1070, 893, 696, 964, 1135, 697, + 965, 1136, 698, 966, 1137, 699, 1071, 894, 700, 1072, 895, 701, 1073, + 896, 702, 1074, 897, 703}], + Line3DBox[{705, 967, 1138, 704, 968, 1139, 706, 969, 1140, 707, 502, + 708, 1075, 898, 709, 1076, 899, 710, 1077, 900, 711, 970, 1141, 712, + 971, 1142, 713, 972, 1143, 714, 973, 1144, 715, 1078, 901, 716, 1079, + 902, 717, 1080, 903, 718}], + Line3DBox[{720, 974, 1145, 719, 975, 1146, 721, 976, 1147, 722, 977, + 1148, 723, 517, 724, 1081, 904, 725, 1082, 905, 726, 978, 1149, 727, + 979, 1150, 728, 980, 1151, 729, 981, 1152, 730, 982, 1153, 731, 1083, + 906, 732, 1084, 907, 733}], + Line3DBox[{735, 983, 1154, 734, 984, 1155, 736, 985, 1156, 737, 986, + 1157, 738, 987, 1158, 739, 532, 740, 1085, 908, 741, 988, 1159, 742, + 989, 1160, 743, 990, 1161, 744, 991, 1162, 745, 992, 1163, 746, 539, + 747, 1086, 909, 748}], + Line3DBox[{106, 347, 107, 348, 108, 349, 109, 350, 110, 351, 111, 352, + 112, 353, 113, 354, 114, 355, 115, 356, 116, 357, 117, 358, 118, 359, + 119, 360, 120}], + Line3DBox[{750, 993, 1164, 749, 994, 1165, 751, 995, 1166, 752, 996, + 1167, 753, 997, 1168, 754, 998, 1169, 755, 547, 756, 999, 1170, 757, + 1000, 1171, 758, 1001, 1172, 759, 1002, 1173, 760, 1003, 1174, 761, + 1004, 1175, 762, 554, 763}], + Line3DBox[{765, 555, 764, 1087, 910, 766, 1088, 911, 767, 1089, 912, + 768, 1090, 913, 769, 1091, 914, 770, 1092, 915, 771, 562, 772, 1093, + 916, 773, 1094, 917, 774, 1095, 918, 775, 1096, 919, 776, 1097, 920, + 777, 1098, 921, 778}], + Line3DBox[{780, 1005, 1176, 779, 570, 781, 1099, 922, 782, 1100, 923, + 783, 1101, 924, 784, 1102, 925, 785, 1103, 926, 786, 1006, 1177, 787, + 577, 788, 1104, 927, 789, 1105, 928, 790, 1106, 929, 791, 1107, 930, + 792, 1108, 931, 793}], + Line3DBox[{795, 1007, 1178, 794, 1008, 1179, 796, 585, 797, 1109, 932, + 798, 1110, 933, 799, 1111, 934, 800, 1112, 935, 801, 1009, 1180, 802, + 1010, 1181, 803, 592, 804, 1113, 936, 805, 1114, 937, 806, 1115, 938, + 807, 1116, 939, 808}], + Line3DBox[{810, 1011, 1182, 809, 1012, 1183, 811, 1013, 1184, 812, 600, + 813, 1117, 940, 814, 1118, 941, 815, 1119, 942, 816, 1014, 1185, 817, + 1015, 1186, 818, 1016, 1187, 819, 607, 820, 1120, 943, 821, 1121, + 944, 822, 1122, 945, 823}], + Line3DBox[{825, 1017, 1188, 824, 1018, 1189, 826, 1019, 1190, 827, + 1020, 1191, 828, 615, 829, 1123, 946, 830, 1124, 947, 831, 1021, 1192, + 832, 1022, 1193, 833, 1023, 1194, 834, 1024, 1195, 835, 622, 836, + 1125, 948, 837, 1126, 949, 838}], + Line3DBox[{840, 1025, 1196, 839, 1026, 1197, 841, 1027, 1198, 842, + 1028, 1199, 843, 1029, 1200, 844, 630, 845, 1127, 950, 846, 1030, + 1201, 847, 1031, 1202, 848, 1032, 1203, 849, 1033, 1204, 850, 1034, + 1205, 851, 637, 852, 1128, 951, 853}], + Line3DBox[{867, 957, 656, 866, 1216, 1045, 865, 1215, 1044, 864, 1214, + 1043, 863, 1213, 1042, 862, 1212, 1041, 861, 1211, 1040, 860, 645, + 859, 1210, 1039, 858, 1209, 1038, 857, 1208, 1037, 856, 1207, 1036, + 855, 1206, 1035, 854, 655, 955, 956}]}, + {GrayLevel[0.2], + Line3DBox[{251, 459, 1046, 252, 472, 278, 1134, 486, 292, 1139, 500, + 306, 1146, 514, 320, 1155, 528, 334, 1165, 542, 348, 556, 1087, 362, + 570, 376, 1179, 584, 390, 1183, 598, 404, 1189, 612, 418, 1197, 626, + 432, 1206, 640, 446}], + Line3DBox[{253, 460, 1047, 254, 473, 1057, 279, 487, 293, 1140, 501, + 307, 1147, 515, 321, 1156, 529, 335, 1166, 543, 349, 557, 1088, 363, + 571, 1099, 377, 585, 391, 1184, 599, 405, 1190, 613, 419, 1198, 627, + 433, 1207, 641, 447}], + Line3DBox[{255, 461, 1048, 256, 474, 1058, 280, 488, 1067, 294, 502, + 308, 1148, 516, 322, 1157, 530, 336, 1167, 544, 350, 558, 1089, 364, + 572, 1100, 378, 586, 1109, 392, 600, 406, 1191, 614, 420, 1199, 628, + 434, 1208, 642, 448}], + Line3DBox[{257, 462, 1049, 258, 475, 1059, 281, 489, 1068, 295, 503, + 1075, 309, 517, 323, 1158, 531, 337, 1168, 545, 351, 559, 1090, 365, + 573, 1101, 379, 587, 1110, 393, 601, 1117, 407, 615, 421, 1200, 629, + 435, 1209, 643, 449}], + Line3DBox[{259, 463, 1050, 260, 476, 1060, 282, 490, 1069, 296, 504, + 1076, 310, 518, 1081, 324, 532, 338, 1169, 546, 352, 560, 1091, 366, + 574, 1102, 380, 588, 1111, 394, 602, 1118, 408, 616, 1123, 422, 630, + 436, 1210, 644, 450}], + Line3DBox[{261, 464, 1051, 262, 477, 1061, 283, 491, 1070, 297, 505, + 1077, 311, 519, 1082, 325, 533, 1085, 339, 547, 353, 561, 1092, 367, + 575, 1103, 381, 589, 1112, 395, 603, 1119, 409, 617, 1124, 423, 631, + 1127, 437, 645, 451}], + Line3DBox[{8, 667, 23, 681, 38, 696, 53, 711, 68, 726, 83, 741, 98, + 756, 113, 771, 128, 786, 143, 801, 158, 816, 173, 831, 188, 846, 203, + 860, 218}], + Line3DBox[{263, 1129, 465, 264, 1131, 478, 284, 1135, 492, 298, 1141, + 506, 312, 1149, 520, 326, 1159, 534, 340, 1170, 548, 354, 562, 368, + 1177, 576, 382, 1180, 590, 396, 1185, 604, 410, 1192, 618, 424, 1201, + 632, 438, 1211, 646, 452}], + Line3DBox[{265, 466, 1052, 266, 1132, 479, 285, 1136, 493, 299, 1142, + 507, 313, 1150, 521, 327, 1160, 535, 341, 1171, 549, 355, 563, 1093, + 369, 577, 383, 1181, 591, 397, 1186, 605, 411, 1193, 619, 425, 1202, + 633, 439, 1212, 647, 453}], + Line3DBox[{267, 467, 1053, 268, 480, 1062, 286, 1137, 494, 300, 1143, + 508, 314, 1151, 522, 328, 1161, 536, 342, 1172, 550, 356, 564, 1094, + 370, 578, 1104, 384, 592, 398, 1187, 606, 412, 1194, 620, 426, 1203, + 634, 440, 1213, 648, 454}], + Line3DBox[{269, 468, 1054, 270, 481, 1063, 287, 495, 1071, 301, 1144, + 509, 315, 1152, 523, 329, 1162, 537, 343, 1173, 551, 357, 565, 1095, + 371, 579, 1105, 385, 593, 1113, 399, 607, 413, 1195, 621, 427, 1204, + 635, 441, 1214, 649, 455}], + Line3DBox[{271, 469, 1055, 272, 482, 1064, 288, 496, 1072, 302, 510, + 1078, 316, 1153, 524, 330, 1163, 538, 344, 1174, 552, 358, 566, 1096, + 372, 580, 1106, 386, 594, 1114, 400, 608, 1120, 414, 622, 428, 1205, + 636, 442, 1215, 650, 456}], + Line3DBox[{273, 470, 1056, 274, 483, 1065, 289, 497, 1073, 303, 511, + 1079, 317, 525, 1083, 331, 539, 345, 1175, 553, 359, 567, 1097, 373, + 581, 1107, 387, 595, 1115, 401, 609, 1121, 415, 623, 1125, 429, 637, + 443, 1216, 651, 457}], + Line3DBox[{275, 653, 1217, 654, 276, 484, 1066, 290, 498, 1074, 304, + 512, 1080, 318, 526, 1084, 332, 540, 1086, 346, 554, 360, 568, 1098, + 374, 582, 1108, 388, 596, 1116, 402, 610, 1122, 416, 624, 1126, 430, + 638, 1128, 444, 656, 657, 658}], + Line3DBox[{445, 639, 655, 431, 625, 1196, 417, 611, 1188, 403, 597, + 1182, 389, 583, 1178, 375, 569, 1176, 361, 555, 347, 541, 1164, 333, + 527, 1154, 319, 513, 1145, 305, 499, 1138, 291, 485, 1133, 277, 471, + 1130, 250, 458, 652, 659}]}, {}, {}}}, + VertexNormals->CompressedData[" +1:eJztnHlUjVsfx58ULeV63Uy5b90bIspUKseQnVZmJUN1tcKlTupULzoimjRP +xiQy3VJp4OAoKeKcpqsJkaEiylAibVIJ4X1aau+rZbvreOvyrrvPP631Wc/a +z96f5/n+zjnP/p0Gr1y9kNuNYZgMGYaRZv96FslPETY7TWU+vjY/+dD6gkDO +wdrzWbQQtPMUKXWNgFoIIlu2P5a3FCOu0uNkcVE6BC6m0+8XJuQgHli+L+1a +EATcrJVL90/NRVyYeWP2aXsINsZlggW9MZcOqf9B9j/sODUhWfU8PE4vx3S+ +1xYIei49Ubq7GZ/X2r5aT3AGgvjl0tO0J51B3Et78geduxDohJZk8+wSEG9w +nrC8uhECk1fhj2TidiD+eMpZwZP3EDxrmu3CG7pO1M7zrJXjqlgP8+zzU4PH +BiOusaxh52KW9z6apmQa5IP4AeVlYZEszxSXx48pnXGhnX/88xxQz9Qz9Uw9 +U8/UM/VMPVPP1DP1TD1Tz9Qz9Uw9U8/UM/X8/Xj2zfG+ueZNFDrvqu5NafVv +INF/YWJ+RjLHGY3fNMKk7MHfMD6Jk8aX9HjS/HnH8m+u6BOKjs9wFiamsdfF +nz/e8o9YLhq/ZE+AoJkdX9LjSR4kHV/S+UuaO9J8enjqKdZVHG8fnxnc98qO +AS8gaMx7Ge/WmI64g6Z/Ja+AzM2H9qkQCLIQf7UswPrAITJ/q+Cm6tPwB+Ih +0rnLx7mSeajQ6J3nKJRr5u4QL48wBzLXNbM8kcq9iPj4TPO1b5zJXO5mrYt0 +eTbiObPyDjuFknmYnzb3xM5UxBUWb7IfW0bmW449G8MTYM+zJipqz3pB5pnv +Vm1Y7XIQ8TILWZP9LWTuampQnzBlA+KG+37Xv/uBzHdOqWioVdrcfj8wPr/6 +DRR9gRcJeY/f+wUiLho5NNbuC7yMV+CkaOyFeGDlg8GnWd7de9CkcYqYK9hu +fpHyFfehpPeVpPeJpNdd0uso6XUheaY+qU/qk/qkPqlP6pP6pD6pT+qT+qQ+ +qc+/0+e6qTNmWjTi+STK9i/sRn3+pU/q7eu80fzSekh9Up/UJ/VJfVKf1Cf1 +SX1Sn9Qn9Ul9fv8+6XOPzn1eROq3IfHOGkfS8Tv0fzLt/Z8d+taY9r61Dn2h +DKEvlCH0hTLtfaGbPu0LZWTa+kI3ftoXyvRu6wuV+7QvlOF+vi+UIfSFMu19 +oQs+7Qtlaj7fF8q094UafdoXyoz6fF8o094XSn12rs8OfZVtr+fUM/VMPVPP +1DP1TD1Tz9Qz9Uw9U8/UM/VMPX8Dz9Tn1/k8cPunLVK3LqDzqq6ZX2yWDcFi +pTGvQxm83st5x5e+3gHBsKOVItVa/LxUxSN4SfxqCGSXzDtt0Q97S125dMB5 +RwhMh0V7eYnwOMl1+qceBEIgMpBS1QzIQHyxoNur4lMQOA2yLfWWP4Z4wS27 +bUkvIXDl+75+UhuG+Bnnhf3msH5EAtXgW+Er0Xq9cjMj3rDrrVFaf/i6Bn5e +ap9eVufI8ofhZyOVlvkirsndNXsvy88VTSoWc0wR75kerfe+9XiegbKWOX4O +vGxqrlH1Hgj0YqbsiI7AHnzdCx9t5UOgnJ+gZP0T9rBZbVIvPushWVigINsP +P5cuaZQWT/CDwMbELj+tfybi2/oOcb8mgKDHiMtyF7QiEHcp1GnwfQeB4jTh +boV8DuIKRXtKW+uJ0ZDwKKUR/mj+c/gzDf1YHpsX1fhAyw/x8vQlR7azfGt2 +5V3bICvERWoGPVu91WpUcxRn4nX57Pau4W6A4PjsImdHFbyuiZZBcAS7Lh9+ +s4yPLV6XSvmFKHcvdp4JLcdHx+B1nbpeWREfD8GpyHFZFnm2OC/vN9s0tT7f +5s9StFLF12X/PJ3QfSxfqRzS76gsXleslTDRn+Xa5gZjlI0dEY+3KQ6rZ/m7 +4afF64fjeQ7xnSu+6wBBkpRBVUM6nqe9ubXlaXcILHbHJAdr4X2EgMQ4bfNo +CNa3HLWNV/FG45+dFFkiYMd/tSa0ae0dPB+1qH1m7iwfIc67sSqIj7iKq8yw +xyzvFVtjaPkj9snMV2m8uxGCqtgZostifN69IVFbyg9CoJFQHMYRBqBxwnP6 +J/Jb95s23Lt0wd4FcQWTkrSyVg+ptUmvjPH96TQq+/3kvRCEry0drGDsjo7/ +3WTxonz2+EPfWd7XSpj3AkLen0qY99/O/fiCF7QI8ZOLTLxb8/6ok/KeRMg7 +l5B3GULeU/U/n3cTQt5jCHn3I+S9TsK8exPyPpCQ9zBC3osJeV9ByPuYTsr7 +EkLeXQh5byLkfbiEeX8kYd5lJcz7bkLeeyYP12XeeqHjy3N2jjrB8tIO+3RB +bft0pM8JTUmfH4f0+fYw4f10d4f9075t+6dWZYII9Y2JiHNyTl6UYz8Xuald +mti9Jg1xkc+26robEGwn7LfmX4+r2NTnCOIgcr/IqhmC3P47Vnj3PYf4+c2N +Cj9cg2Dkvw01OPqYi4ddsVl3FQJOpcGx0LiTiMccfTontg6Ci4T9XK7bGa1f +4tD/IWFSEoeoDn7Lvv/WdKuS18Tz1zskt1avBALgfK5Pdxl8PzQObREoxrL+ +3S2q9ffg/W61JyktokII7F8u4Fs248+9OzbV5Oc/heBnkXyfbvciEa/6NX34 +Vva8gYT9ZaNm8dsTm/bhnMauOWfA1hndqFT+aGP8eXVqRnri23L2/vQ84aZr +gXPdN4s33vIoBPojPcc+jML5ml42f84zD7YONMj/rFh3Hl+X4nXiqxchcNa0 +3CY/Owlx+ZxtotTHbJ0fON1JLBWNeLr68PUWb9i8OBo+NZLD95vhpZZVZ9j5 +byfsj6vleG4pOLITHb8qcqlNLvt+YWz03Owt7zTmD63cZz5g65jGxpTpJ/H7 +kbpddJGNEAIzDzPdyfPxugyWxyQe8Ibg2saDGkFauM7c7qWuPoetM2VqZt4p +hiL8vUDqSWFCJgSP3fgqERHJiE+2vDBh9SO2nvfW32mvGou4+yDuNOnXEAhj +0mUM1/vj+9/D6Y4Xu64BH37jrNByQ+uN8akyvsxyzT3+xqpH/pTHOxtUTrHc +4eaGqqAA7Dm38GKyCus5ZOD9hbo98HqXuvbmctjvKSrRCdGBLfj92mFevetU +fwgq/hU/N5SD16szYEbWB/b7USAnca7cWVzfdo30vSLrBEFCpSc32Ah/D7K5 +fkR/1nkInnimGL+vwf5FlqLpdZUQiIODlFpmxCH+Uthna8ArCM7E3iscez8E +8Z91dA/psetS1rziWqWO6+HIpGyP2yyviIh+mW0RhOvY2cyZy1luS6gnmwj1 +pIhQN/IIdUONUDe0CXXDnlAf4iSsDxmE+mBHqA9KhPpgSqgDnE6qAwMIdWAd +oQ64EOrAHUIdGP2N8l5KyHs1Ie8pnZR3ewlz/UsX5/opIdcZhFyfI+RakZDr ++4Rcd1Y/2K4O/WD32vrBJnToB9P+i36wru77utqh70vc1vf1rdbb1esi9Qd2 +9bq6ev6dNc/Omo+k55V0fNI4pONprr/sk+ad5v1/mc/3lnfScwBSXz3peFJO +Je3Pl3R8Ui4663cBnTUf0n3e1b9f6Or5k3LR1esi5fqftl5SPflWHkj1StJ6 +0tV143urD//vdeCflnea64+5vk3Yv/gvxY/uAA== + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{365.9522022439016, 144.71094473679827`}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, 2 Pi}, {0., 0.2737382782077783}}, {{ + 0, 3.141592653589793}, {0, 6.283185307179586}, {0., 0.2737382782077783}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{-0.0838037116420912, -3.3800194762104896`, 0.13581339533637288`}, + ViewVertical->{0.0009948336515092158, 0.040124202756705155`, + 0.9991942046765206}]], "Output", + CellChangeTimes->{{3.801823481856159*^9, 3.801823510667101*^9}, { + 3.8018235517409487`*^9, 3.801823603980329*^9}, {3.801825565244288*^9, + 3.801825592824583*^9}}, + CellLabel->"Out[31]=",ExpressionUUID->"a6383fdd-4e4f-4ff7-84bd-bd68d5465477"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "2"], ",", + RowBox[{"{", + RowBox[{"\[Theta]", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Phi]", ",", "0", ",", + RowBox[{"2", "\[Pi]"}]}], "}"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8018236379392157`*^9, 3.8018236383373127`*^9}, { + 3.801823830810561*^9, 3.801823832062315*^9}, {3.8018255977279177`*^9, + 3.8018256036549997`*^9}}, + CellLabel->"In[32]:=",ExpressionUUID->"eebf3ccb-1559-4da7-bdeb-234ad307674a"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJx1nHu8jWXehyU2ESKJCkNGJZrSTIXG0lQ6oKQZ1VCjE6VRzbxJjBENRruc +t0NTSQclNUQ5bOVs20glKsnQQSKhQjlv89a6r3u9n+v+vH+tz+fq6Xm+97XX +717P+j2/pd5t93W4s3SpUqUWlSlV6tj/fW397qjJ19QZ1jL7OqHlJ3tvn9Nw +zKDMiMPLP/5F4aoM/IU1i4f36vjPTNt/frS1buF/Iq/45dNXN93+eObMK1+Y +vi5/S+Qnb1n64KzRozNT2t58X93CHZEfGNakwt8LnsyMPfOxsa/v+T7y/iXT +u7f52/OZdVO69VyX/0PkR8c3fuWRQ1MyNZtc9vtD9Q5EfsWlp+adXmtG5qZp +vzi/buHhyD95rHyzv9w6O/PO+JIh9c4s1Qo+o3bbntXy5mV2rv/zQ6/vOSby +335ctnmXdosylU7d0O3yBcdGXrK2ev9ya5ZkmnS+6oZ1+WUj37X3vB92rS3K +tHt6duu7O5aL/IFGa3r1qFucuW/TLy84VO+4yNuNnvj+/pHFGTxnvf4nY89w +e4bbM9ye4fYMt2e4PcPtOeaXZ7g9w+0Zbs9we4bbM9yes/52JJ7h9gy3Z7g9 +w+0Zbs9we4bbc8wvz3B7htsz3J7h9gy3Z7g9Zz39kHiG2zPcnuH2DLdnuD3D +7RluzzG/PMPtGW7PcHuG2zPcnuH2nPVxOPEMt2e4PcPtGW7PcHuG2zPcnmN+ +eYbbM9ye4fYMt2e4PcPtObvuY1rZM9ye4fYMt2e4PcPtGW7PcHuO+eUZbs9w +e4bbM9ye4fYMt+fs+somnuH2DLdnuD3D7Rluz3B7httzzC/PcHuG2zPcnuH2 +DLdnuD1n13Fc4hluz3B7htsz3J7h9gy3Z7g9x/zyDLdnuD3D7Rluz3B7httz +Nu/xiWe4PcPtGW7PcHuG2zPcnuH2HPPLM9ye4fYMt2e4PcPtGW7P2VwnJJ7h +9gy3Z7g9w+0Zbs9we4bbc8wvz3B7htsz3J7h9gy3Z7g9Z69fNfEMt2e4PcPt +GW7PcHuG2zPcnmN+eYbbM9ye4fYMt2e4PcPtOXudExPPcHuG2zPcnuH2DLdn +uD3D7Tnml2e4PcPtGW7PcHuG2zPcnrPnOynxDLdnuD3D7Rluz3B7htsz3J5j +fnmG2zPcnuH2DLdnuD3D7Tn7/52ceIbbM9ye4fYMt2e4PcPtGW7PMb88w+0Z +bs9we4bbM9ye4fac/e+1Es9we4bbM9ye4fYMt2e4PcPtOeaXZ7g9w+0Zbs9w +e4bbMxzPtbb+e279wrfC66pM7YUj2vyqzODoH47/TfPubdn04vKt4J3PfuSv +DXrmzg/3+bP/X81WPj/c54dzfjj54ZyfPiTn53i4j+c8HE9+rkv+s9/q1a9h +4avh9a3Miw/c8OPa1wZlGl5z9dwa08q3gj/yzptPLszPHZ/97zVb+Xg4x+OB +8+CB48nv85Of85Of8zs/5/HxXNd1x3mch+uS59o+Ow4crrci9ku/+fGjB9rV ++WemQtmD5Q/XWx+vO73u1icvHfRY5BwPf/Crfiv7rv8iHv/dyxc91GLyyMg5 +Hn7Xyv4jDtX7Oh5frnnvhbUKxkXO8fA/Tn2kY5/u38bjm++/dVbr9c9EzvHw +hlf9bljf9bvj8XUnrW5+U6dJkXM8vG6LS79/80iunz/9o3Ynd6r/auRxvYFX +rXv57Oatc/385V9M+Wu3ObMi53h4haqtT+nT/Wg8/uJmLRpuf+rNyDkePmDA +8/M7X5Hr/8/Zccm/Hr5kYeQcD//7wdPv77u+dDy+TsdKG18fvjhyjof3/p8X +6j11T5l4/I0Lj7aZP2pp5BwP77mjwdo3j+SeL7Qv/cmYdxsui5zj4X+5c9LA +DcNzzx2mNup3wYZfF0fO8cP3Vdw8v0nufUj/1u9DuN9vcL+v4H7/wP0+gfv9 +EK+rvzvcf1+4/45w/73g/rvA7R9uz3D7pE9rn3D7hNsn3D7h9gm3z3hd+YTb +J9w+4fYJt0+4fcLtE26f9GPtE26fcPuE2yfcPuH2Ga8rn3D7hNsn3D7h9gm3 +T7h9wu2Tvqt9wu0Tbp9w+4TbJ9w+43XlE26fcPuE2yfcPuH2CbdPuH3SX7VP +uH3C7RNun3D7hNtnvK58wu0Tbp9w+4TbJ9w+4fYJt0/6qPYJt0+4fcLtE26f +cPuM15VPuH3C7RNun3D7hNsn3D7h9km/1D7h9gm3T7h9wu0Tbp/xuvIJt0+4 +fcLtE26fcPuE2yfcPumL2ifcPuH2CbdPuH3C7TNeVz7h9gm3T7h9wu0Tbp9w ++4TbJ/1P+4TbJ9w+4fYJt0+4fcbryifcPuH2CbdPuH3C7RNun3D7pM9pn3D7 +hNsn3D7h9gm3z3hd+YTbJ9w+4fYJt0+4fcLtE26f9DPtE26fcPuE2yfcPuH2 +Ga8rn3D7hNsn3D7h9gm3T7h9wu2TvqV9wu0Tbp9w+4TbJ9w+43XlE26fcPuE +2yfcPuH2CbdPuH3SXyp9zax+W47J+YTbJ9w+4fYJt0+4fcbryifcPuH2CbdP +uH3C7ROOT7xlX9dn7O34/VVOXZ//YfK9cnnP8y+euef95Htl1dC/tbeRX+w9 +/El+UfK9skHoH9rblV0r5p1T+GryvbJ9yGlvJ4Scyed4yGlv9JntbVzIaW+N +Q057a9z6rv1Dd25Pvo9nX79OvG1b8lit7h23Jt6WP1K70cf5WxJvky+Z1rz1 +gs2JtyGlLmnzxp7PE293LVjTqf6ZnyXeyGlvx4ec9rY95LS3lSFn8n085LS3 +R0NO12/XkNP1O/6MnYWVJ+1NfJYrd8HiyxfsSXxmX3cnPr8qKl7z03MY++w4 +6YQN2yt9n/hcNvCmzfXO/C7x+efll62bPnBX4pOc9lk+5LTPXiGnfW4NOe3z +hpDTPslpn91DTvs8pfGLvTquPZT4fLTitw8P3Xkw8bl/+4VDlpY7mPjMvh5I +fH788orxTS/en/i88tFqz97dcV/ic85dnV6eeP+PiU9y2md+yGmfB0JO+7w7 +5LTP9SGnfZLTPmeHnPZ5zfhpp7zXP+0X5ZX/YML2Smm/aF6v/fXzniyVfL70 +3HraSz89x7PP7OvRxOfKoW/fMn1gSeKzeY/q3bZNOJL4JKd9ktM+54ec9vlg +yGmfnUJO+ySnfTYLOe1z+CmPH9h9ctovap3/2t8rTyqT+Cw58MExjZqWSXzO +uvvAoJ+ec9rnvetrV7i17bHJ53X2tXTyeb1pTtdq47uWTj6vyWmfV4Sc9nk0 +5LRPctonOe2TnPZJTvtc/dRdH//0nM0+hxw/tPNPzzPtM9N3+mftVpRLfO77 +5sM7fnoObJ/TOh3cNnBzXuKz29t1eky8Py/xmX1N+2/ktE9y2merkNM+94ec +9klO+ySnfZLTPrN5037R8mF3t+i4tmLis3/J0AV/6VIx8XnRvTMuHbqzQuLz +u40fFU/uUyHxObndoTZLy1VIfHaZV3f1pwVp/42c9rki5LTPASGnfZLTPslp +n+S0T3LaZ4dn6429ZWOVxGc2b5XE56L+3SeM2Vc58dn7u2H1pw+snPg8r8vr +L66qWjnx+fV76xptm1Ap8fls5vDUYxtXSnyS0z7JaZ+LQ0777BNy2ic57ZOc +9klO+1xR9eHml8xN+0WTrhp5+N3+ab8omzftF91cOLP/9kppv6jZ98W/e+iD +tP920lmflMl7Mu2/fd9lx7LRt6b9N3LaJzmT92fIaZ/ktE9y2ic57ZOc9vl1 +h51nrR2U9ouK8o9+06Vt2i96dnHVqbuqpf2ibN5qaX+46QVNK0yslvj8Tfcr +947rWi3xWfW5P876ZZNqiU9y2ic57ZOc9knOpD8cctonOe2TnPZ5XEGnWnde +l/aLtrzdY8Puk9N+0aJj+z/df1P1xOfTLUb9qfKk6onPbN7qic8/vDJr81lN +qyc+z9u8fNLs/Wn/jZz2SU77JKd9ktM+yWmf5LRPctrnWR+uKL/vtLRfVLbS +f1YO3Fwj8fn5ZbserzalRuJzXt9S1068v0bi84k3qlU958Iaic9s3rT/dl2D +C8dctTTtv5HTPslpn+S0T3LaJzntk5z2SU77bFPjov1DttVM+kXML9ln6cGd ++77Qs2bik7kv+5z7Q/9SC0vXTHyOaTJ6cbsVaf8tmzftv5HTPs8IOe2TnPZJ +TvskZ/L8N+R036N96M/gDc/nBu55m+tD3wbOeVivzwP3efBgTl/L52f+h/Mz +/0m/i/lP5tbgzK0xFwr3XCjcc6Fwz4XCPRcK91wo3HOhMafmQuGeC4V7LhTu +uVC450LhzIXik36XfcLtE26fcPuE2yfcPuH2CbfPmFM+4fYJt0+4fcLtE+45 +WzhzlXim32XPcHuG2zPcnuH2DLdnuD3D7TnmlGe4PcPtGW7PcHuG2zPcnul3 +2TPcnuH2DLdnuD3D7Rluz3B7jjnlGW7PcHuG2zPcnuH2DLdn+l32DLdnuD3D +7Rluz3B7htsz3J5jTnmG2zPcnuH2DLdnuD3D7Zk+kj3D7Rluz3B7htsz3J7h +9gy355hTnuH2DLdnuD3D7Rluz3B7po9kz3B7htsz3J7h9gy3Z7g9w+055pRn +uD3D7Rluz3B7htsz3J7pd9kz3J7h9gy3Z7g9w+0Zbs9we4455Rluz3B7htsz +3J7h9gy3Z/pdyX1d4Ml9XeDJfV3gyX1d4Ml9XeDJfV3gyX1d4Ml9HTl9Xxd4 +cl8XeHJfF3hyXxd4cl8XeHJfF7g90++yZ7g9w+0Zbs9we4bbM9ye4fYcc8oz +3J7h9gy3Z7g9w+0Zbs/0u+wZbs9we4bbM9ye4fYMt2e4Pcec8gy3Z7g9w+0Z +bs9we4bbM/0ue4bbM9ye4fYMt2e4PcPtGW7PMac8w+0Zbs9we4bbM9ye4fZM +v8ue4fYMt2e4PcPtGW7PcHuG23PMKc9we4bbM9ye4fYMt2e4PdOP8u+F4fYJ +t0+4fcLtE26fcPuE2yfcPuH2CbdPuH3C7RMef0/68xzSJ7F/tWnA7/bMvfDx +ME/zZeQzG45d9cW3o8JcyDeRz+u98MI7Cv4V5hty/bSJ40reOavoufCcPtdP +m3Z57SV/qzglPG/eH/m9L1RYPWvQ9PCc72jkvV5Z0q7fdW+F51W5vlnVT2v9 +8aS9C8Nzl1zfbPDeDuP+OmBJeH6Q65utbj8sb8bootAHz/XNlpze76UjPywL +/dzykV934OPCJfnFYc5pc+xHXX9Xt/pV2o4K8zrbc/2uO66/s03BE2GeI9cH +W3Bum/PKV3kuzE/sjfxPuytteODUl8Pz9f2Rjyl78Imrd78WnsPl+lpfbmnS +Z+W/FobnSbm+VuWTRk7deO6S8Fwk19ea8er2k3teXxT6+3mRn1i70bqhq5bF +3//G/t6Bxof+0LM4zBttj32hS6/9alTTgvFhbua7yDetGFfw1Y3PhvmPvZFX +fqZkd4+zJ4c5hn2Rv9n169s33fJaeD6X6xeN/c17RVd+tjg8ZyoTeUH5K866 +6MSi8LwkL/LbanyUV+f5ZaHvXz7yw2fvGV6mW3GY4/ku9luO3PblvqXPTQzz +KHsin9/m2wrdWrwU5ir2Rb5s+PROX46dFp5vlYl9kgfveL75oTVLw3OavMin +V3nkgqm9l8Xfp8M/u6Wwwes3Fod5lz2xL3Hf/k/rd2nzYpjb+DHy6h1GfFvx +/qnheU9e7Bscc9w5XVu2XxaeW5SPvGjkw4W3Xl0c5jx+jN/Hb6t+3z/Ov+rf +4XlG7vvylKWXX3PCxcWZJqHe+X7xqeod7nqHu97hrnf4a6p3uOsd7nqHu97h +rne46x3ueoc3Xda160v/KA7zgpvj9xTqPZ96D3yA6z3whaHer6DeA+/ieg98 +rOs98KTeA0/qne9NrvfAqfczqHe+96neuT+/TPUOd73Dq4R6bxXqHf6W6h3u +eoe73uGud7jrPd4/q97hC1TvcNc73PUOd73DXe/cH7re4Sep3uGud7jrnfui +21XvcOo9+1zwqfh5+soZv9q47bVB8TndtXoOyH0CnPuEc8N5uH/gPNzfxvuc +cH9LfcH5POX5Kefn+WnFn+fFi+LnYNNTv7np9K8Gh7muQ5HPbNbu1Zur/J/5 +n8BbhOet2Tn4RfFz56HM0ZYH/j04zHmvi3zgvMcuW7UmP8yHHYr8uRHfbrm+ +68ww51QSeaniGSV/2DY3Ps+F8zy3Svh3SNj/F9x+YoP3eg4Oc+QfRn5Dp3N3 +/v4X+WEe+vPIh31z3LvdyowMc2kHIx+xdWTdq+e9EearSiIv+n2jdYvOnxvm +hHLPC2psfeWBu1cviM+X4Txfzs79z4yfO3lDzjhu0m8HZ176eV58beSNDnww +ZmOPR8N89ueRN26y4fSCLiPCnPG2yN9ucPyuUgVjw/zcwcj7tfz1Ta2qvxHm +wEoiz//i2WlNHi4M80y5/vy8vWvfWFt7QZjLKR35pAfb7K2TyT0fh/N8vD7/ +Tkv4vGv7aotdfcoOzmTn3d+PvGRs75Zd3xwS5ss/i7xg4417+vceHuakt0Y+ +vMozp24bPSbM++6KvE+jQ32P7TEhzAUejPyeMR+NuuCe18N825HIr72/1pAn +Vs4Jc1q5PvkdpQ/v/e0988O8UenIzxn3aMX8XYvC3EyZyJuf1vnmAR2WZlqH +eqQfO3r1tWvbvzMo/N5gdeTv/7rO1l3lh4S5+U2Rv9fl0IT15w0L899fRX79 +wfOuem90QZhj3hl5YeeCSxeWejrM4+6OfPV1izp0uOeFMAeZ62PftOOhVY0X +zwjzfEciP6lkRJeyNeaEubRcH7viCQ1+M3nOvDBfVTrymbOL6//w9KIwJ5Tr +Y5/20Jx7L6u2NMy75PrYzxwaVHTLkaJMFfaT8HnHfrKC/STwWWE/eSfsG3y+ +sG9sD/sGnH1jQNg34M+HfWNx2Dfgx4R9o2bYH+LnUdgfVoT9Ae79Ac7+0Czs +D/CRYX/oE/aH+Lmm/SH2x8L+MC7sA3y+sA+8HPYBuPcBuPcBuPcBOPtA07AP +wB/TPgCfr30A/mLYB/h3kGJ/QPUe+w+qd7jrHe56h7ve4X9Wvcd5J9U73PUO +d73Dqfduoa75PF0d6rp7qGv4u6GuZ4e6hncIdd0s1DV8tuo6nl91DaeuJ4a6 +hldXXcc+jOoa7rqGU9ftQ13DqWvmwbh/8DwY3PNgcM+DwT0PBvc8WLxumAfj +PgTuuS+4577gnvuCe+4LztwX6+X+x+uFe71wrxfu9cbfzYX1si641wX3uuBe +F9zzgXDmA1kX911eF9zrgntdcNYVf18TuPPDnR/u/HDyk5P7MeeEJ78fpM8Q +cpIH7jxw54GTh+tyH+Xrwrku54f7/HDOz3m4b+E8HB/vr8Lx1DXfx13X8OT3 +rYH7/QC3Z3gy1811Vddw1zXc73+43z9w/73gyfx24PiJ9R7uW5J6Dzyp98CT +eg88qXd+9+F6Dzyp98CTeg88qffAk3oP3PXOfZTXBfe64F4X3PUOd36488Od +H+56577LOeHOGfsMqne488CdB+565z7K14W73uE+P9z1zn2L6z3eX4Xj/78+ +AHPC7P/M1XM8PPkdkH43zXnYhz2fH/f/sM9wfrjPD/c+4D4A12W/9XXjfq79 +DU5dkwfuPHDngbtO3QcgJ/u2c8b9Xznh3n/g1Cn54c4Pd36488Ndp+4DsC4+ +X7yu+HmkdcG9Lrj3n/h9PNQ164V7vXCvF+71wr1euNfL91+vN/7eU+uFe71w +rxfufQzOfoIHuD3A7QFuD3B7gHs/hPv3EXy+JPtJ4N5/2M/tM36OaN+Ae71w +70vszz5/3P/194J7f4D7unB7hnu/Yj93nvi5oDzw5HeggXsfgDsn3Dnhfj/A +vY/x+eL88fNI+eHJvwMQuN//8fu46h3udcG9LrjXBff7HM77nHXF3yVpXXCv +C+51wV3XcNc13OuFe71wrxfu9cJd13Dfh/j5xX8BHKnTLA== + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[{Polygon3DBox[CompressedData[" +1:eJxNmXf8T+X7x9/n3HdDKqQoDWmgkpkiqVD2pmwhZe+MsilCyWoglE0aiEpT +pb2nfJsatKS96/t8fV/37/H4/XF/rqfjvN/vc+5z36/rdV2nXK8hbQfnhULh +Wv4E4gJiCeILWaHwA6MSfBLxHcZhcAnid8TPGZ8xDuf8psTzOb4z82f/YhzG +8SbEuhw7Fu4IN4MPghvA58BHwW3hi+Hj4E5wc/hIuA18Efwe4wj4H8bb8KHE +YsT/6Dw4J77KOBAOxDcZh8BFia/p9+ADiK8wDoAz4suMCP/LeCnzff/NeBHW +XPzJ2AWXLOgDhcLvjLPA04jv67rhSHyDUQQuQnyLUVT3TfyAUQo+kPgbowZc +kfgLoxpcnng6PzQG7gufAA+Eu8KnwaPhPvAZ8DVwP7gCPBK+Ai4LD4K7waPh +h+E1mif4Mrg1XBzuBreEi8Fd4Rbw8fAAuAt8IjwY7g6Xg4fAl8EnwUPhHppX +uD58Nvwv41y4CvEfRm24suaVc+rBNbPC/yawDqEqPAreBq+GT4VHwJfDJ8PD +4J7wr4zqcAXiKRwfDveCy8NXwb3hivAo+Eo9/7SWmsJf63vhY4lf6fNwGeKZ +aT41P5XTXOkeq6T71T1WSvOgOa+a7l332wSeCV8NN4NvgMfCveCV8Dy4L3wX +fBvcB14P3wo3hWfB16Rn1z/Nc/V0v7qvamlude8Xw9fBI+GG8DR4FFwPngwP +gy+Cr4WvghvAU+ERcH14CjwcPjutDc1PjTSHmud+8AZ4YVpvfeHOWsvpWfRO +z6In3E77WusPLktszvEb4XHwEHgTvAz+VHsVPoL4mdYTfCRxr9YNfDRxt/Y8 +XJzYjc/eCy+GP2GUkWYQ92jNwaWJ32u+4HLE/bpW+ETil7o++Bjix4xj4EOJ +HfnORfD1cCd4MTwD7gzfDs+Ee8DL4TlwT3gFPBeW2G2El8KXwXfCN8Ft4fnw +FLgdvACeCreB58GT4S7wEngWPBTeDN8Bt4dvlobCreG58CS4BTwbHg/XTOtZ ++7co3AFuApeAu8Ot4LnRe+8LBOk2uDb8LXxrtC58A98SvR++hq+L3vO74Juj +NeIreH70ftsLXxv9G+/B0+CS8H/gedH7bQ+8IHq/fQnPidaCz+HZ0VrzKTwd +LgW/Dx8Trad94KOj9fRKuHS0nl4Bl4nW5b7wDdG68wl8Y7Te7YZvitagz+Dr +4dLwB/Cx0drdD54BH83xD+FZcBn4Y3gmfAz8EVwqWrt7w6PgP+EX4avhjHNe +gRfBjeDv4IXwhfA+eBwc4dfhxXBjeD88Hj4YfgPeCk+CixIfYkyFDyduZlwD +H0y8nzEWLkLcwhgHH0J8gDEZPpQ4gVEEfpPvnAgfAr8FT4peE2/DI+CfuP7n +4Kvgn+Hn4ZHwH/AL8HD4R/hZeBi8D34GHgP/Db8MXwPnfOer8Fg4wK/Bo+G/ +OOcleEp0bngXnhqdM3bCk6N19p3ga7yU9dmYz3wO94JvCP7NWnClpJnaj9Ph +S+G18AK4A7wOvjnzvC6Ep6X9K828JfMzuQ2+LvN6nwGPzjxPl8CNkh5qT03M +/NzmwBOUi5JWj4EvgdfA8+Gu8D3wIrglvEzXnNmHSAM7ZV5HfeCOmfdED7hN +Zu8hPWybeX1dCXfIvAavgC/NvE57w5fAreA74Bszr5f2cMOkA9KW2Zn3zeVw ++5QLpO1D4W+k3fDpxAeZ0+Kaq9w+StpYKvMzbAlfmPkZtoLrZc658kgNMq/x +FvAFmddya7h+5jVyPlyN+BGjInw88VvGOfAZSYflSU4lfsGoCp+iZ82oAp9M +/JBRAT4u8/pqDNfJvM8awrWJ4/nd7fDd8KPcyxvKQcR3+feJ8FHECZzzJHwP +fBO8Q/MpHYNfgLdkXuMXw7Uy74ML4OrE1/UM4IMz74kL4RqZ13Ij+NzM/qoe +fJbum++cAA/Wveb2D/JUtXL7K/mu3vAD8HJpFvwgvCJzTpdvWQVfDm+F75TG +wQ/BK+H+8KPwWnhYupd7U37RPGyAB8CPwevg4fAz8H3wCPhZeCO8WPoBP6b9 +Dj8Hb8rsnTQn98Mj4efhzZl16G2dD4+BX4K3wtOlzfAO+HrpKPxMZu15B34c +nibth5+Gp2jfw0/Ag+An4Lsya9tOeHvm57ILfipzffAe/CR8Nfwy/AA8EH4c +Xg/PlB7Dz8HbuJ8T4CHEXwuuGYoxvk6s2kFr4Aviw5zzG3E/403Gp4x9jN3a +V9JaYsnMx75Kx1WfqNb4g/FDOl+feyj4u/W72lP/d+73xN8ZXzJ6cfx14pzc +x39mfJJ+/6d0DbOUZ4jPZ75e3cPn6dp/TPeyL/12lr77+//3PbqfPYwZyl3E +Z9P1/5Lu4dt0/l7GN+kzmouJygnERzPnllfgBzP//550zvO59680fH3ufbEd +XgeX1jOFX8itz8oFm+Cyenbwl7m9h3LoPrhLwXn5i6Rdyr97kvYq5+5N+q88 ++1Vu7y0d3Zh7Xz8V7P/kA2dzbEVuHXtc8w+X13qDH8qtITvgbbm1SDlrO1y5 +4Fz2LFyz4Bz3XG5tVB5/IrcWKScuz/3cd6Z81K5gT7I5t2ZKz57KrWnSgydz +a5pyqPLzq1oj0sDcNZF8yC9Jz+V/Pkxaqjz4bm4tUr5+B76oYD/wEdy84Lz5 +Gly3YI+xM7ceKqe/l1uXlNOljVpvD2f2Ba/B2+DfUn6Rl9uVW1eVc1/NrdvK +3a/n1kDl7jdy6568yo8pT8m//5Q7L8vLfZe77pNn+yHlNfnJ73PXhvJ1+3N7 +TvmuT1MeUd77OOUaecWfU86Sh3wzt64q5+xO+UUe8pOUj+Q/H2E8nfbynHS/ +j2TeT/vTGj9dXlb7h3io/FnB/rZocJ2rfN4Y3qI9Jc8SXDcpZzYK1uGc4w2C +Pby0tkmwhgeO1wuuNf4l1mfcB6vQbxqs7VH+KHddpvrsCHmvgn1gOflR7Uli +x2B9Pozzd+Suf6dw7JncvYupwXlLmi9P+EduX6Ea61h52YJ95nHB/kT+6KRg +3/IDsVlwHjmAz54c7G3kF0oGewP5nTLBXkhe9Ok0/1rPpwX7pZ+I7YJzjdZX +bXi1dIhYK9gL/UGsE+zB/gqudzRvS/ie84I9mHJd99xzdTvH68Lj4UHJX+m5 +9IfrwGPhAcrJ8ER4iL4HHgcP1PnB3u9PYo1g/6PfrB7skX4jtg7OifLMbYJz +hzxz8+Ccq7zXKji3HsTxllpb8IHy7MG+7h/iBYy74b+JZwR7y5+JbYNzmbx3 +pWBfKr9ZFV6qOSRWC/aEvybN0b6+Vr+Tu6cxQb+fu9cxEd6Quy4eCd+ftEU6 +syx3nTtQaw0+E7466bB07yqtx9w9tDG63ty17Si4Q7AfUF2wNHddPEDzlLu+ +HqR7zV0Xj9Zc5tbYwfDKpHXSwFW56+6hwXlJ+Uk5VjlN+UV5RjlHuSdLx5QD +lXfm5+533cCfeSnfzSX+mtvrqpZcnbsGHwZ3D877R3DNa3P3XkZw7PfcXlr1 +6ZrcfZjhWm/B+ask5/cM1r2j4G7BvqUE/FbSH2nLO0nPZ/D/b+fuDV6f8ojy +wnj4A7gzPAt+P3fPcKZ+B24GT9eags+DJ0sbcvfuxmnd5e5NTdJ95O5bTtO1 +5O5VXgdvivY3Wntbc/fuxnL8ltx9SNWYnYP9WDHO6RLs0+SVusIvwsU53inY +y6lO7BGcd46El+TuY/QP9n7K16pzb83db1TtvCV3T+wa7fXcfU7V14ty9xVV +Uy/M3YdUDf5gtJ+TXn2W8oL0/Pbo+keado7WLsc3EntF97PEvaP7RJvhumkP +ShO6RPdB1nOsa3SP4y64W3TPZQN8eXQvbFPaj9qn+p7j076T7nWP7svcrfUQ +3UO5Bz4/uG+pzx4V3GNZRjw7uK9yH3FgdN0ib1MzuAd1L/GK6J7U/XC/6NpA +/rl/dL0h79Ezuu+j76matEK/Wzm4d6frPytYD6VRVYJ7ZbrOi6P7aAvgM5NO +SkMGRNdC8lcVGasKnpMe0f0mXdug6NpJXqtSdA9L66dUcH/pDmLp4P7SncSy +0X1t7fcTo/vs2uMnRPeUpS0nBPe4Vuqc4B7UauIpSWOVO8oG975WEcsH97vW +EU8N7oOtJVYI7mHqmR4ZnHeUa47R+oZXEI+L7mtrfVaI7tlJr06N7mtL08pH +9+OkhxdF9zTnw/Wje6xztQaie/HStIrRPUHp2BnRvUKt7ZOi++zSltOj+4nS +z5Oj+/vSkNOie47Sz1Oi++/SHOVu5eulxL7RteUDcJ/onvhW+K+Uv5Triwf3 +M28nHhzcd72V+G/KXzfBBwb3V28m6qWA8uAcYongPt6SYH8uD67a5fDgfu8i +YpHg/u1twTWIvPD2aC+0N+lqseB+8uLgmmR30t4suFbVvMnzTCp4Pi8JrqN1 +Xy2Ttui+VGfuSNewLbo2kxa1D/Zd8gN5cI6ep2cU7BPklxrCT8FbiAcF95Zv +0ZoPrs21p1oEa5pycQz2JPJgBwT3nLUv5JeUT9cE696upIGHwNPhhcSm0fW2 +uEN0T1nrtkl0Ta65ahTdG9U1NI7uZeu5NIzuU+tZNI/2GZq3jtF9Vf3uldF9 +WN1Ls2iPomchPyzfKG/cKbqHq/XfObrPq31xWLA3k8dpEe17tDZaRfsbratv +iP0450b469weT7WP+ht6pnq2/yRfNJtjf+Z+pyMf2DK6B6E10ya6d6+93zq6 +dy+tax/d99e+axvd65cmXBr97kF7uV30e4LlWg/R7xikA+Wi340p7x8d3H/W +OVWje+jyLUui+1PynEuje2Ty3mdGvy9RTlwZ3eOQb3w8uoZXnloV3R+Rh7wr +ukcgL313dC9DPvzh6J6C8t0T0TWz8vvq6H6KfGDl6Pc0yt3LovuD8q53RPcH +5dnuje59yJ8/Gt2/kMd4JLqvIZ/wWHQtLS9RLfqdgfL48uh3DPJyK6K9rHxm +lej3GfJyG6J7NKop6kS/m5RnuCe6F6Pa4c7ovqH84cbo3oo853nR7zjlNwZH +98hU89aCZZ7kN86Ofh8m/3Bu9DtOeZh60e+fpCEXRr+Xks40iH7npL1ZO/od +m3xO9eh3rvItNaPfO8qX1oh+T6Ya5Jzo93DyLWdFv19UPbI+uhej2ue+6J6R +6ovzo9+tag0Pie45qh5fE93PUl1QN/pdrPq6Q6P7g6rT10b3ueSx10X3s/7n +vaPfn2nN/xdOrMiA + "]], Polygon3DBox[CompressedData[" +1:eJwtmgXYFkUbhXdmVlAsDMSgQVApKUUBBQQRRAmRNAiDBinp7gYpFVQUECUU +G+zu7u7u9jf/c3P2uhxn7p1932/f3ZnnOc9ZKvcd1nlozLKsqf6Xq/9e/WD1 +FdQv0oEv1V8kPkz9fPEX6i8UH6p+nvjblGXjxANClq0Rf67jF4jLqp8r/lH9 +UHEl9UvEf6gfLa6hfqX4f+rHiI9Sv0p8kr5vK9/H94gfUV9f/Lu+v4H4UXED +8R/ihuLHxA3F/xM3EjfQ528Wn6fj14lPURuquck6FjRXX+0mjc/V/LWaa6M2 +UvMzdKyE5uqpbdf4HM2v19wZ4rvFl4ovFrdUG6LzJ+lYprnrdbyMhu/oWDXN +XSPeV/yauJL4avE+4lfFFcXN9Jkt4v463k+8Uf1B4rc0X0W8TlxK/LK4vHiD ++EDxm+LK4tvFVcVfimuJW6gN1niijv2nuT/VLtX4aPWrNVdXf2+duJf4fHFt +8ZXiHuJzxb+pHyk+Uv1l4tZql+j7pulYrnN/1/FRGldXv0JzjXTsOnEfcR/x +T+qHiSurXypupTZMn5+iY5F7rXaLxlfpWG/NHSfeIO6r8/uK71R/pPhrzdcR +/yoeIa6mfrn4DvXVxF9pvrb4NLVRGs/UsZL6roPUlmrcXOddrrm2aqM1P0vH +9tRcHbW1GvfU/Hma+1n9cHEV9cvEt6mvIv5Cn6kpbqjzrxX3jr7ee9XXFP+o ++XriU9VGaDxdx/bQuXeoPa3x7cHr42PxueIO4sXi78RTxcODr+9n8WrxLPFV +4nJqpTQ+VMfW6m/9ovk1Gs/Wsas197v4avGi4PXKmthH48Myr5UfNb9E48k6 +tlZz9+lYLfFP4vo8n+L+TBGvE9dQq6jx0Tq2NXrNHRp8D1iLf+j8azReHLx/ +WHNlWXuZ1+IbGh/C2hZfK/5N51+l8cLg/VJdrYLGR+nYFs1XEO8nPpw1EL0H +SouPyLw3uKd1xSdmvtfHiKsE/4abon/DseImmX/bseI64hPE94gf0N8vy7PW +sUGaO5prDn5m26P34IHicpn35sPJ185vGKq5o9QqaXyMjm3T/CeaP0/jjsHx +6iPxOeIzg+PhQ+KK4jLiIbmvgc/+EHxtv2r+cvEc8TXir4gb4sPVLyDA5o5P +6zS/ReMj1Y4I3gObdc43yef3CN6/XyXH227B8fILcT/x2cH79TNxb3Hn4PX8 +ubivuEvw/vkyOR53Dd6/m/Q3Dha/La4q3lvz88QnRMfvH9QPEVeMXr/fa34u +8U/nX8F8cf5Y8ZXEf503SFxe/UJxc83fKx4o3iz+VHy+uFNwfOBvHhYcw7iW +r5PzS/fg+P+3+AbxKvH14v+KeL1WfKM4ETPE14m3a1w/em+xx1JyDD48OGYQ +mwMxU+P1OrZV40hMYe2Kt5Ef9JkHxEOin8e/Rfy/UvM3iP8SbxavFG8S/0nM +F68QbyR/iTeJLxNvyL0myhT7Y4e+s4Xm79N4UPT3/SPeJr4i+P40UTtd4+48 +k+g1cIjG7wavDfZAefEnwXuDnLFJ412Zc8nLmu/IslI/UXNvqD9bvJf6yeKX +1Hfg3qifIH5e/RnkQvXjxK+r78L+UT9J/KL6M4nd6seLL1Tbpr/3oI61So5x +xLqnMufGMTrvNvGT4vbixpo/SdxO/GwRc9cE5zxicffoZ8szriVeJv6CfKa2 +nL2itlHzO8VNNf+muKvGpdRP0XctVP8R+YB7Hh0ziZ0v6jMDcmuG64NzNlri +w+j9fID6mezn6PV4oPpZ4p3qjxN/o88MEz8gPkn8s3gE+118svgX8Ujxw+Lm +4l/Fo8RPiFuL/xSPFu8SHy/+Vjxc/KT4VPFf4jHip8RtxH+LLxWfo7Y8OCfW +QGtovrHG3+nYJbk1zfEan5JZ67yl1k3jvdVP1dwH0fmmtPoZ4vei49X+6qfn +XlOsrX3UTxNfpLZd3/eQjrVO1lDHiVtm1lZPq52m8T86NlZziMOtwXuEvVKl +yEdnRuebXmrLgjVB9WRNsZq9mllr3Jb8t1hDrKWO0bmFHFNVc7erPZz5mri2 +HmpLyCU6Vo1YqvNLaPw8OURzV4hLil8gh4j7E4M1fpGYp/Obic8S92HPEOui +YyMx8mONbyn0HHuIvXSn+KXM38F3NVVrr3EPHXuHtSDuyZz4a/ER0bGZGE1s +v1WfvyfzmmPtrdGxPcTPkaOJ9Zq/lVwXrJd2cE/IRcH6Z3W07n4WDaDBqrhb +VmbPiMuKV4j1X/Y0eVd8fnTuIIegdW8lJ2r8WZHP0CxorR2ZtQx/k7+NBkO7 +EZPqavxpkb/I0eTq98WDc2vEy4M1ONqRa+Ra+Q1ot57ipcEa6chkDUCse13H +BubWB39n1qzohVnkXB17U9wreY+WFO+Vee+Ss8nd7OEbo6+hVKFvuLZJaneL +XxCflXxODY3fK/J9Vx17RTxFx5dEX8Of7PfM11a10DMdovXP8WrN9Nm23GP2 +Ps88eM2z9k8WDxSPZ49Gazz0ccNo7cc5aI9/gz+7f3It0Iy4Kt4vWYtTT7XP +XVOgnxtF1xr7iieIm4hPF58YnUvJqeRijo0Tz8987t9Ffq1VXBvXjFb6L/i3 +dFGbiTbQsUOT1yhrt1yxdtkDncVlovdGV7V5wTVABZ1frtArp0Xn87bR2oVj +zJ2tY3PJ/eLy4ubiQcG/4V+de3SRD8+O1rN7JdcfjcXtcmsqtN5HwVqrVVEP +DIuOB03Ed4kvjM6vaDa02sfBWo4cQC64KFoPoFnRkh8Ga9ma0bUnNeg/xd8c +I56d+Vq6ixcE10CVkmMea3l4dLxpnKwH+kXnb2oG6tHjo2sJagzq1eOiaw9i +3ArWYnTsY42yVj8I1r7EcJ5Fl+jYfmKyXrkgWi/UKvRNt2h9WLPQF12j9T73 +lPq7dvS97qY2P7iGqahzzxLPCL6GsuJXo3NDSdZF7me0QNwu+tmRg9HOBBFy +8wHJtdnJ4g65Y+xycafo2HsCz0jf30nHXoleIws1Pj167bDnLxN3jo4F/M3W +wWuMazk4uTZqqXFHzR2SXKu1Yh3m3vPs/ZeCax9qgr35W8G1wh78nmBNg7Zh +TfMsT41e6+Qz9u6+0dqpTHLtfoq4U+57Qu3XOvpeEcPRIvtFx/Zj1PcPXqPU +ylXV+gTXhNSGeAyNxC0yew94BtS3x0Z7CdS0nFsvutalRqZebRBdO7Pnxwc/ +A2IBwRz/o260d0CMmBB8T4kdXPO04GfAb6GGR3/Xia7tW0TXbtRw1Lpdinw6 +OTpfHV7Ui22i9TnPjFxeIvpZ8gym6vPLMj8bnsH04GfIs2ENTBIvzrw2zhRP +FC8Sl05ueCcnRc+xBplrH7022VN89ozovfabPtswWCOhlT5HxwbnKHLVo8nx +u3yhj7jmS4v4x28h/owr7h9rGb0wtbg/rFVi+JTi9xDb0SCTi/uDNqHGph6Y +Vtyvx5LzW4VCT3E/8TemF/eDmEUtzj3cHcty61P0C7EHPbq60K/obWLUykK/ +ErvY09QC7GH2OjGEWoCYSGwhpo4t4jnxlPy9pMif5GdqAGoBao7dtZP4LvFz +4vPFS6O1CRrlXnE/tW8za2b4brXPNP5c7R6NH9TnF+kzn4h3snaTx5+q7Uqu +QahtqKmoTe5BA4mfFZ8nfiB3vkVP9SU2i28RPyHuIb5fvKvIx334++I7xM+I +z03O99QHeCLniHflrg+oF8j/O8W3BtcLPcX3iXeKnxf3TvY4FhX6EK+OmDi7 +yEfESmLmnCIfEUtnqrXKrJHRyjOS4yGaFm07PXk/sKfZ27OS40fTIn/PIedm +rlmIj3OTYxkxkP0zOzl+NCvy7Shx9ayo2cn3ue8Nv4nfVjr3b+eecG8OzH1v +eaY82wNy3yvuOfd+X7XHM99j7vX+ue8N94x7NyK5lt1dMxMrxE0zeyJ4I1OT +4zseCl7KOHHtzB4K9SKatzd7Qf3s3PUF3s/3mq+b27PBu0HT433i+aDP12fW +l9Rrcwu9gJ6fmOy3HhXsx00SN2LvBPt3E5L92RrB/uTkZL1Uu/h7U5L1Cx4O +fsnYZK+ncpHvV+rvfZy5xrsLLZHs5VQq9MPo5OuvUOTb8cn+cPVg/25Msh9T +sdAH+6g9Jt4hvjN3Y8w9757sCeANoAHaJHsgAwr9hx7Dg0Hv9y/yBR4FXgX6 +H+8aTwZvBg8DbxuPp11wzUV9gL4bWOgl9Bz1A/U+Gg2tRn3SqsifaDX0TK9g +zYf2o+asVsRPalFq2BbBNT21LTVsyyJfflQ841OK/M2zxx/pG5yjyFXkP+qZ +AeK/omtY4nO9Il7jEeEV4Tnh/eLxnxZcg+P94+Hg5bCm8H7xyPDKqKnx+olH +j2h8U7AeJx4tjvYw1qt/KriG13+7axs8JrxSanS8J94xtA2ucXn3gKdF/dYn +c37G88L7uiCzd807hjbBngfvHuaITw32ND6L9qTOCK6J8arw8PDyqJm/L/I/ +9WJf8S/RnhneWb/MXjT5jLXFGkMP4AlUDa6h8Aqo+Y8J9hDwAm7PXS8/mLle +uU28Jbh+7oz2Fd8Q7Al1TPZPqEWpSfFTdmh+c7CH1gGtKr5RfL+4U3I+xY+t +ktm7vjm3X4IfhP+CJ4Y3hqZul+xx4XWhQdsm11PU4mgItAT1PfUimhxtjgdG +fUn9SL2P54b3Rr3ZUnyTeEOwJj892XMi37fIrNfQb8RaYi5aBM+pQbAewIvC +86gV7HHghZCT2cvsaWITmgBtQM7GS8GTKResGfBq8FBqBnsseCt4QicGeyp4 +RXgiTYLrObwSPA9iPTEf7YgndkKwJ4NXhsdVP9jjwfvCE6sX7AHhld0hvjk4 +hnRL9sgaB3s+eGd4LCcHe2p4L3gwzYM9NLwZPBRiHzGQ2nFv8aOZv5PvJr/j +gX1Q5NuSuZ89a4S18kLytXEPuZfkzDfEM6LzDTHsNfG06Nj2fPK185v4bXnu +tcAz49ntkfvZsWZYO8/p/GaZfzO//SD1X2fWDOiIErn9DdYka5M1RewcGb3W +nkl+FjxTnu1TRT5gT7A3Xkx+9qwR1goxlt9/SXTsfTZ5LXCPuFesKfLpqOjr +Zc1y70dEr+Wnk/caa4C1cK/6bzJrIDwAPJN/M/sPeClokrc1nh2dj9E474jn +ROffxcmxmRhNfY3melc8Nzpfo0neE8+L1irEFGLDIUWsQQO9L54frY2Ib/gP +pYv8tSTZD6Bmpp5bVuhp3iFSD+Dp4JccUMRDNNbrGk+P1gNLk/0F3vFRD7BG +WCsLorXa8uR6jnec1CeXJXvhvIOjPkFz4b3MjNYTC8Q9M3tc1EMvFfqJNc3a +fiV5b7Cn2Ft4bnnwO068ODytGPwOAa+LnE/uRxPwLg8PKwt+p4m3RcxCy46P +jmXEQLTehOjYSAxEH42LXu/3J9877iFeDhoDrYGm4F0gOb56ka+If48UeowY +QazAEywR7KHjFaJBahTxm3enDyZ7TXhMeE0fintlzhHkivvEe2b2qPCq6hb7 +t3ERn15O3vvEEGIJMR4tPLGI/Y+L62TOEeQKYjJ6bnQRqz9Izm1oBLTCk8m5 +nRxMLn4/OdeSA8mF7ybnMnIcue4d8VmZcxzr773k3EeOJleTM9CXY6P3KzHr +VfHUIpa9mhwriZHEyieScxkaA63xRnIsI4YRy95K1hpoDLTGm8mxDQ2CFnld +3D5zDCQWvpYce4m5xN63k7UJmgRtMj9Z+6CBqN/JKeS2wdG5Bg+Td3OVM9eL +VyfXftSA1LLzit+P54D3sCnZ28EjoR69Ntl/wSOh/r8mudalxqbWvjK59qZG +p1YfkPz+kDXD2hmY7OewPvAnLkiOJexR9ur1ye878ZSody9MXuvEHGLPRcl7 +gz3AXrg4ee+wZ9g7G5O9HDw4/JRByX4W73R5t3tDspeOx4q/sirZP+HfKOAf +bkjW4mhy/J2tybUpNSre+xXJtTM1NF7i5eI5mT0xvLE1yX4K78jxt7Yle728 +o+Fdzepk/4R37Phda5PrfTwLvIvrxKsye474MeuTvSg8BbyFq5LfR+Mp4C2s +S/YH8BTwD7Ynv//CY8Zr3iLemPkdCH7ZjcnvQningL/WP3kvE4OIRcOTtc/u +d9LiFcm1PDU9/suiZG2LxsX/3Cv3+kKDEW9K5dZiaDT269Bkbco7Yt4VH5w7 +PlHjEs/RrPsVuRAtOzjZz+SdNn7VJcnvMne/QxePTH6Xu/sdJPk0d/yjxiV/ +LEzWmmhO/NghyX4n78R5N7452RvAI8CP2zO3VkQDEj9XJvtd/BsE/OgyueMP +NTv54P8QiijI + "]], Polygon3DBox[CompressedData[" +1:eJwt13XUVWUWB+D7gXQjjUqMIBiESomEKCEpSijdOqSUIKDSYY/SUg4gMYRF +6FJAJJUSpVsFYQZQGDFHmGcvzh+/tfd+zv245557zvteSnTp92jfdKlUaplk +kHHpU6mraalUObnPvMPBkeySuYTcydax59mP5mJyO/uEbWYXzHdIZfYR28sy +q/XYY2y/fh/Lpj7MWrFD+v0su9qQtWaH9W+x+9Xe7DmWy/yNZGUNWEt2UP81 +y6LWZy3YAf00VlntwZ5hmc2fyxnzrVKevef4ctZGfZHNZuXNuyUdq82asN36 +7eyK+R6pxTayXSxNrcUasz36AyyX2oS1ZSf0B1lutSlrx47rl7En1ElsFitn +3iinzX+L68/ed/wlllOtyRqxY/oVrG0cY3NYBfNXcgOrw5qxvfo9LL36AGvK +vorPyXKoNVhDdlS/g/0vvm+px7aznewvc3Wpz75g29jP5rulJtvAtrL/mitK +DfYZO8tKqV3ZAHZF/zLLr9ZN7oPT+ufYf8xFpTRby15ld6rtWG92VX+BVVOH +sIksu/k1uYu1Z33YNf3rrJzagfVlqbhHpT4bx6ahouZ1cb3MmaUge8vxN1lF +tTPrH39qniz3JJ9jYDwf5n/Lbaw7G8R+1Z9nZdUnk3vtd/10ViWxISyL+Sdp +wMaz6ayIeYZUZU+xoSyreYrcy7ol75HRPFOqs15sBMsZ107KJPf4YPab/hJr +Gtc7uTdKmN+QCqwTe5qlM2+S8/HsSqXk2r8Q52guHs8w+5RNZZWSzxvvkck8 +XM6ZC8ezxFY7PiKujbmIlGJr2CvsJrUxa8PO6y+y2rF+sNdYXvMouWwuKXex +9Y5vYMfNNyX3xhI2lv1uLpuc81a2hV2MdUmqsI/ZZ+yE+Wa5jS1l/2Dl1Y6s +H0szj5Zf4zXxXLPNjo9hv5nLyL1sC1vPDpjzx3rH5rNzrHTyHcW98Yv+FLtZ +bct6sovxXbNrsd7Es8R2su9YseTejXv8R/3b7CF1EBvHCsZ5SAc2i61kd8f5 +SvtYG9kKVtE8Tx5kA9lYVsC8Rp6PtYJ9zlqa50odNoCNYfnjekrXeH+2ilUz +/yLt2Ey2PFlfvpA/zFXloeTaZ74hlRqmrmU72SNek2J92L/YemOdWJvZcPYR +28Was1XyNJvHPmT1zH1knzmX5GDzYu2PNT9myc7mxjPAvjZni7A5rC/bb84j +Odnb7J+srjqYjWeFzAPkiDldfJ9skeMfsn7qXPYBqxvnJofMV803ykLH57N6 +6jN8Aisce5HPNoJ9zHazR1l/OZwWN1kqlU95x/E/WLc4J7aaVY33lFv0+dir +cX3Mmfx7z+rXsB2ONYu9iA1g77LNrD4bJmfNhWK/YKscz+h1Q9XV7EvWNNZ1 +6cEWsLWseuxZXtefrWSbWAO2UBqx4ewVVsz8jjSOZzvOjxU3L5ImsXYnz2+s +Lxn8e4PZB2wbaxT3vPRmS9k69kDsT143iL3PtrKGbLE0Z6PYm6yU+ar0YkvY +p6x27DvSik1mi1jZ2HekZazd7B12e+xZ0pMtZp+wWuYr0ppNYYvZHeYv5U9z +NanLtjme3vkNVN9jW9jDXrNEHmWj2WRWOv5Ousf9wNaw+8wLpCEbxl5mt5i/ +je832ct6sQvxjLKj5hukAFvMhrLvzHljzWIr4/lhLWLNY1NZGfMxKchasq7s +jP4EK6y2Zt3ZWf1RVkBtwboke+1l1izWZDaXlTTPkhqsD3ue5Tbf6BpMin2d +HWMdWX72EtvOTrDOLB97MX4TsOOsE5sU9y+rkqwR8VuvW1xr85/Xt+PUVHYk +3kdtzjuyb/WHWV71EdaBndKfYSWTfSvW7Mv6iSyjWpk9yPbpv2fFk30/fgv8 +pD/NSiTrffwWuKT/gd2qdkn2+J/1J1kR9XHWg53TH2J51GasPTupP84Kqa1Y +N/ZD3O/s7+qMZJ2Me21CfEhWgd2v3aWfzWrGGsVeYHnimZSd5mup67+7p8ce +y3awv64vo6lprCfby7JIVjY71gHWOfY0toBVjvOQPeYMkjn5TbOUPRZ7GpvC +bjMPlpOxlsZezZbFesZOxbopRdly9iz7Pu362hRr1LuxN8U9aM6Ydv13U+zJ +Q+I+N+eOvZqtYLmc/Fh1IzvI2njNk7LLnBZ/z2bEc8a6qG+whayKOae/HRN7 +ODvAnmC52Xi2iR1m7eL7YRPYZnaEtY/7h02M3wTsKOvA5kgt1o+NTH5vZPO6 +kWwd+4a1YtnZqNjr2T7Wmq2UTux1Np9VMufwutFsA9vPHmerZQhblKw5se4+ +JbvN6SUTmxnrXrg6Pe36/7dqmv8P/OqjpQ== + "]]}, + Annotation[#, "Charting`Private`Tag$4263#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}}, { + {GrayLevel[0], Line3DBox[CompressedData[" +1:eJwt0csrpWEcwPF3nDnOHBxMs9IU2WmKrRRbKVZTNmPHaizYmqUVa8IfINYS +G7mf47aZ5D7jnia5Lhi3JD5PWXzfz1tP79vv6Vfa3P697UMURZ26V3i/0Yn6 +sqKokIMs4SgrOMcarrKBh2ziNVv5wl/Mi0VRN79ygN84zCqOs44ZTvKUj1rX +f11qyjAbnOYmZ7jFWW6HObjDef5hmn+Z4S4XuMdF7nOJB1zmIVd4xB7znvFJ +x7rTlVrMtcZGplnLMVZyiGXsZxG7mMMOPvvfz3AH/uA+6/mb1eEeLOcIiznh +u398UIFudaEv5svnZ6bCGfOYYi5zmcMkk0zwE+NMMMbssFPG+aqPYT/hLMwp +I0S9Hufv+38Df9xIqw== + "]]}, + {GrayLevel[0.2], + Line3DBox[{661, 952, 458, 660, 1046, 868, 662, 1047, 869, 663, 1048, + 870, 664, 1049, 871, 665, 1050, 872, 666, 1051, 873, 667, 958, 1129, + 668, 1052, 874, 669, 1053, 875, 670, 1054, 876, 671, 1055, 877, 672, + 1056, 878, 673, 1217, 953, 879, 954}], + Line3DBox[{675, 959, 1130, 674, 472, 676, 1057, 880, 677, 1058, 881, + 678, 1059, 882, 679, 1060, 883, 680, 1061, 884, 681, 960, 1131, 682, + 961, 1132, 683, 1062, 885, 684, 1063, 886, 685, 1064, 887, 686, 1065, + 888, 687, 1066, 889, 688}], + Line3DBox[{690, 962, 1133, 689, 963, 1134, 691, 487, 692, 1067, 890, + 693, 1068, 891, 694, 1069, 892, 695, 1070, 893, 696, 964, 1135, 697, + 965, 1136, 698, 966, 1137, 699, 1071, 894, 700, 1072, 895, 701, 1073, + 896, 702, 1074, 897, 703}], + Line3DBox[{705, 967, 1138, 704, 968, 1139, 706, 969, 1140, 707, 502, + 708, 1075, 898, 709, 1076, 899, 710, 1077, 900, 711, 970, 1141, 712, + 971, 1142, 713, 972, 1143, 714, 973, 1144, 715, 1078, 901, 716, 1079, + 902, 717, 1080, 903, 718}], + Line3DBox[{720, 974, 1145, 719, 975, 1146, 721, 976, 1147, 722, 977, + 1148, 723, 517, 724, 1081, 904, 725, 1082, 905, 726, 978, 1149, 727, + 979, 1150, 728, 980, 1151, 729, 981, 1152, 730, 982, 1153, 731, 1083, + 906, 732, 1084, 907, 733}], + Line3DBox[{735, 983, 1154, 734, 984, 1155, 736, 985, 1156, 737, 986, + 1157, 738, 987, 1158, 739, 532, 740, 1085, 908, 741, 988, 1159, 742, + 989, 1160, 743, 990, 1161, 744, 991, 1162, 745, 992, 1163, 746, 539, + 747, 1086, 909, 748}], + Line3DBox[{106, 347, 107, 348, 108, 349, 109, 350, 110, 351, 111, 352, + 112, 353, 113, 354, 114, 355, 115, 356, 116, 357, 117, 358, 118, 359, + 119, 360, 120}], + Line3DBox[{750, 993, 1164, 749, 994, 1165, 751, 995, 1166, 752, 996, + 1167, 753, 997, 1168, 754, 998, 1169, 755, 547, 756, 999, 1170, 757, + 1000, 1171, 758, 1001, 1172, 759, 1002, 1173, 760, 1003, 1174, 761, + 1004, 1175, 762, 554, 763}], + Line3DBox[{765, 555, 764, 1087, 910, 766, 1088, 911, 767, 1089, 912, + 768, 1090, 913, 769, 1091, 914, 770, 1092, 915, 771, 562, 772, 1093, + 916, 773, 1094, 917, 774, 1095, 918, 775, 1096, 919, 776, 1097, 920, + 777, 1098, 921, 778}], + Line3DBox[{780, 1005, 1176, 779, 570, 781, 1099, 922, 782, 1100, 923, + 783, 1101, 924, 784, 1102, 925, 785, 1103, 926, 786, 1006, 1177, 787, + 577, 788, 1104, 927, 789, 1105, 928, 790, 1106, 929, 791, 1107, 930, + 792, 1108, 931, 793}], + Line3DBox[{795, 1007, 1178, 794, 1008, 1179, 796, 585, 797, 1109, 932, + 798, 1110, 933, 799, 1111, 934, 800, 1112, 935, 801, 1009, 1180, 802, + 1010, 1181, 803, 592, 804, 1113, 936, 805, 1114, 937, 806, 1115, 938, + 807, 1116, 939, 808}], + Line3DBox[{810, 1011, 1182, 809, 1012, 1183, 811, 1013, 1184, 812, 600, + 813, 1117, 940, 814, 1118, 941, 815, 1119, 942, 816, 1014, 1185, 817, + 1015, 1186, 818, 1016, 1187, 819, 607, 820, 1120, 943, 821, 1121, + 944, 822, 1122, 945, 823}], + Line3DBox[{825, 1017, 1188, 824, 1018, 1189, 826, 1019, 1190, 827, + 1020, 1191, 828, 615, 829, 1123, 946, 830, 1124, 947, 831, 1021, 1192, + 832, 1022, 1193, 833, 1023, 1194, 834, 1024, 1195, 835, 622, 836, + 1125, 948, 837, 1126, 949, 838}], + Line3DBox[{840, 1025, 1196, 839, 1026, 1197, 841, 1027, 1198, 842, + 1028, 1199, 843, 1029, 1200, 844, 630, 845, 1127, 950, 846, 1030, + 1201, 847, 1031, 1202, 848, 1032, 1203, 849, 1033, 1204, 850, 1034, + 1205, 851, 637, 852, 1128, 951, 853}], + Line3DBox[{867, 957, 656, 866, 1216, 1045, 865, 1215, 1044, 864, 1214, + 1043, 863, 1213, 1042, 862, 1212, 1041, 861, 1211, 1040, 860, 645, + 859, 1210, 1039, 858, 1209, 1038, 857, 1208, 1037, 856, 1207, 1036, + 855, 1206, 1035, 854, 655, 955, 956}]}, + {GrayLevel[0.2], + Line3DBox[{251, 459, 1046, 252, 472, 278, 1134, 486, 292, 1139, 500, + 306, 1146, 514, 320, 1155, 528, 334, 1165, 542, 348, 556, 1087, 362, + 570, 376, 1179, 584, 390, 1183, 598, 404, 1189, 612, 418, 1197, 626, + 432, 1206, 640, 446}], + Line3DBox[{253, 460, 1047, 254, 473, 1057, 279, 487, 293, 1140, 501, + 307, 1147, 515, 321, 1156, 529, 335, 1166, 543, 349, 557, 1088, 363, + 571, 1099, 377, 585, 391, 1184, 599, 405, 1190, 613, 419, 1198, 627, + 433, 1207, 641, 447}], + Line3DBox[{255, 461, 1048, 256, 474, 1058, 280, 488, 1067, 294, 502, + 308, 1148, 516, 322, 1157, 530, 336, 1167, 544, 350, 558, 1089, 364, + 572, 1100, 378, 586, 1109, 392, 600, 406, 1191, 614, 420, 1199, 628, + 434, 1208, 642, 448}], + Line3DBox[{257, 462, 1049, 258, 475, 1059, 281, 489, 1068, 295, 503, + 1075, 309, 517, 323, 1158, 531, 337, 1168, 545, 351, 559, 1090, 365, + 573, 1101, 379, 587, 1110, 393, 601, 1117, 407, 615, 421, 1200, 629, + 435, 1209, 643, 449}], + Line3DBox[{259, 463, 1050, 260, 476, 1060, 282, 490, 1069, 296, 504, + 1076, 310, 518, 1081, 324, 532, 338, 1169, 546, 352, 560, 1091, 366, + 574, 1102, 380, 588, 1111, 394, 602, 1118, 408, 616, 1123, 422, 630, + 436, 1210, 644, 450}], + Line3DBox[{261, 464, 1051, 262, 477, 1061, 283, 491, 1070, 297, 505, + 1077, 311, 519, 1082, 325, 533, 1085, 339, 547, 353, 561, 1092, 367, + 575, 1103, 381, 589, 1112, 395, 603, 1119, 409, 617, 1124, 423, 631, + 1127, 437, 645, 451}], + Line3DBox[{8, 667, 23, 681, 38, 696, 53, 711, 68, 726, 83, 741, 98, + 756, 113, 771, 128, 786, 143, 801, 158, 816, 173, 831, 188, 846, 203, + 860, 218}], + Line3DBox[{263, 1129, 465, 264, 1131, 478, 284, 1135, 492, 298, 1141, + 506, 312, 1149, 520, 326, 1159, 534, 340, 1170, 548, 354, 562, 368, + 1177, 576, 382, 1180, 590, 396, 1185, 604, 410, 1192, 618, 424, 1201, + 632, 438, 1211, 646, 452}], + Line3DBox[{265, 466, 1052, 266, 1132, 479, 285, 1136, 493, 299, 1142, + 507, 313, 1150, 521, 327, 1160, 535, 341, 1171, 549, 355, 563, 1093, + 369, 577, 383, 1181, 591, 397, 1186, 605, 411, 1193, 619, 425, 1202, + 633, 439, 1212, 647, 453}], + Line3DBox[{267, 467, 1053, 268, 480, 1062, 286, 1137, 494, 300, 1143, + 508, 314, 1151, 522, 328, 1161, 536, 342, 1172, 550, 356, 564, 1094, + 370, 578, 1104, 384, 592, 398, 1187, 606, 412, 1194, 620, 426, 1203, + 634, 440, 1213, 648, 454}], + Line3DBox[{269, 468, 1054, 270, 481, 1063, 287, 495, 1071, 301, 1144, + 509, 315, 1152, 523, 329, 1162, 537, 343, 1173, 551, 357, 565, 1095, + 371, 579, 1105, 385, 593, 1113, 399, 607, 413, 1195, 621, 427, 1204, + 635, 441, 1214, 649, 455}], + Line3DBox[{271, 469, 1055, 272, 482, 1064, 288, 496, 1072, 302, 510, + 1078, 316, 1153, 524, 330, 1163, 538, 344, 1174, 552, 358, 566, 1096, + 372, 580, 1106, 386, 594, 1114, 400, 608, 1120, 414, 622, 428, 1205, + 636, 442, 1215, 650, 456}], + Line3DBox[{273, 470, 1056, 274, 483, 1065, 289, 497, 1073, 303, 511, + 1079, 317, 525, 1083, 331, 539, 345, 1175, 553, 359, 567, 1097, 373, + 581, 1107, 387, 595, 1115, 401, 609, 1121, 415, 623, 1125, 429, 637, + 443, 1216, 651, 457}], + Line3DBox[{275, 653, 1217, 654, 276, 484, 1066, 290, 498, 1074, 304, + 512, 1080, 318, 526, 1084, 332, 540, 1086, 346, 554, 360, 568, 1098, + 374, 582, 1108, 388, 596, 1116, 402, 610, 1122, 416, 624, 1126, 430, + 638, 1128, 444, 656, 657, 658}], + Line3DBox[{445, 639, 655, 431, 625, 1196, 417, 611, 1188, 403, 597, + 1182, 389, 583, 1178, 375, 569, 1176, 361, 555, 347, 541, 1164, 333, + 527, 1154, 319, 513, 1145, 305, 499, 1138, 291, 485, 1133, 277, 471, + 1130, 250, 458, 652, 659}]}, {}, {}}}, + VertexNormals->CompressedData[" +1:eJztnHs4ldkex9+hPRRyi06lm+QSRSo1aF5NKjOlC0p3CimTKFFSJ9EhlSKV +W+1SIZFyHcPJJR0cEjGMyyZJhHjlGpFZnljr5DmreXaHyXla+x/P833Ws/Zv +fdb7/e3Xu757T99ppWfGQ1FUyiiK4gV/NXcmHt8hq5VIfXg5fvjTRO+sDBFV +TT2eNKCPcxVrTu5laOulF7v2anhCvcZwE//v7xn62B6H3QVPrkD9tb5cU0o3 +Q994qaPsaRkI9ctzxp3Pe8vQ32vbWhTp34V6W/auh2ebGTro7izWneBIqIu0 +STssqmNoA98VjRtmxEI9zfFx1prnDO2ibHI+wikO6odazNnbShg6Nl5Aqlr9 +V6hLyhQunlLE0EX1FwvG1P8C9QWBnVGzOAwdLrnf28o6Gup6kxbPKH7J0IYZ +CTJJL1Gd3407cJIF6nSP03k/xu8a1JXXJY6fANab46S35XyFMeTZ3dv3YmjC +mXAmnAlnwplwJpwJZ8KZcCacCWfCmXAmnAlnwplwJpxHDuffZQ53ZwtYwfGp +8aebmj7Bv9GPtcia5QHH3ykq0O19P/zz43Tc/NyOx9XPNorU1y3bDsebbd65 +ohvona8ao0PFHaHOY0TtTPqM8TgO3M7Pbf3c+g5Xj5uGpVBepsOATsUHrvw1 +B+i3tsnm+jx1hzpl2BA5/RN6vmP+sqBDPlCPc2MtDenB68lNo/186wKgLlGW +cvVdF15f4zXX92+mt6Fe3/i2PbIdr+dsLFpVrXcP6ulSvt7BTXh9bvqpHUrj +o6AuerIqSqUWry9sXZeUrQb7AyX0s2X6slK87hs/dV6JIOwblP3EI4H3ivC6 +HDWLn2cPmkd0TYZzWAleD/GwZT2bDfsYFbm23Vn1OV4vNRlf4LcD9kMqeOJL +8dI6vB6/79lTAeM7UPdqGuM+tQ2v79+yOEEgxh9dVz2OihTY94C9R1fJByP9 +1U9BSrw93F+H3F5X3F4n3O47t/vI7b7gOBOehCfhSXgSnoQn4Ul4Ep6EJ+FJ +eBKehOdfyXN/yIPO51GIZwKrlD+X8PxTnoTb53Ej/iX9kPAkPAlPwpPwJDwJ +T8KT8CQ8CU/Ck/Ac+TzJc4+hfV6Ey9tg9aGah8v5B+U/qYH856DcWv+raXAu +lMLkQilMLpTC5EIpTC6UwuRCKUwulMLkQqmBXGjxx7lQSq0/F3rv41wopf/f +c6HUQC703Me5UEqlPxdKeA4tz0G5SmogV0k4E86EM+FMOBPOhDPhTDgTzoQz +4Uw4E86E81/PmfD8PJ6nC9K3TxaD36ulNAM7Y3sAN4Hknjc2W9FzvNtajIZ4 +D0OvFrqnWXz2FtSl1zeL7+pkaO1513VlDcOgvqKwLNe6haGnC7a4fyOPuD1u +Vm/eXs/Qr47OPM9ExUB9lIy/klMlQ8veLFtSMQPxETnQLGYO+FjHZ7jzSyCe +7LwWxbBShpbzXW7x9Bniw77c6xNXxdCLNm0u3rwMPdc94a5dFt3E0AstRIz0 +PdDzYU6nVsTsdwxdzdkQeI5lDfXrKZxWBvAxYd7EjK3zhfrGZB9DY8Ch4JZa +t1TYTagH2XtYtgAOJzPZp/duDoV6eISqqG4rQ+9PXiJkcDsC6h5TGqyOvWbo +rQuyA5y1EYeMoxvsw1+A8aUZ11g0Wm/PpdNpSmC9014bWCqvQeOXLvHr8gTj +RYImlxzUuw91S4PJkusZhtZvzRT11Ud1el71MlfoYmj1E6vNxvsjH7Em1nqk +gPUGdLYxW7NuQN1Wzdf/CBjfHB9WEroNPX/WsItzmt7G0GwmszJAHq1r7721 +LV4NDF0k22UmXoD2JStJO+I3sC+LY5qM3RJR/eYCkTpmYN/PlPM8n8+D5lHs +fKRSDeY5ta7RPk8S+XSDjbmmIOAsqPDIY1e0K9S38+8+aQPq9z4s0VFlHAJ1 +V7N8mUZQZ3mW7r7624hPePY5hxuNDM24Wk26Zobq9PWMzW8F/mpzfeL6OgLV +8/CgtvJusF/aEYZH3hUHofnrJqkWdjB0DP8VXlX/81C/lChDfwvquTHbS3iu +AnrfKZcr+ULAvswL7fhGrh2dL/jz81WMrWHoK1KG7cJX0TnFA8/Ela7tDP0g +Sda2PtkL6gHjjB7aA5/e1THZFOqC5mkK9y+QfsXQzmFpYlOjvaG+tmu3yBNw +3Z4ZYX6XG2a/q2H8HugSolDpB383gEpYdsS073cDTDF+L8T4/R8Yvx8YZr8L +Y/y+DuP3WVz6vQXj92sYvxdj/K6J8ftpjN9dMH7/dpj93orx+1KM36OG2e+J +XPrdCeN3ZTv/Qo7AGqjrdPEJ933uWw46p0voP6fD3SeMxsyDu78twHye4s5P +tf0MvK3yDkH9Su6kUxwwfnyrQUxNHbovWq98cLIiB3/eOmdLhvWYEhuoV291 +2l4D5kkOTu9q+fsZ5KN0te4fgL7yfrhFLxvNf/yS+3WhMtDPOQFMfhuq8+co +y7aOT5znplWJhS5PRf1kc4GDZl8/8ZHTFVil5Iau/7jCCzuALqg1Y786C+1X +uTz9vgHwl39xrmWcPqpHY+ORtQ2gHqXKeYeyy9H7quRk82gVM/T8WuGMngtI +v+QUYqII6rmDOV8efTOaxy7PHOo/cFjSHaCeMWxpn4BiF6hv3ZFqdwzoBRJG +fFkXLiGf6q90mwOuQ2cviZy80f/RV6tkD9qBvrpSXM5Ung/Vr27To5RZztBZ +qrsy09JRnR23fLJdQf3NauyKt/9EusaZWbtCgP6vaClrlauofgVJlbDOZwzN +wZyP69S+TdJJNULXg+JU4b7fRfGiYhe2uZxE98mstuDLQJc8O8pv47SLaL2m +QlUWYF3p9C8m/ArXoa5txZlSD9alL7XUebl5MNR72aadVn2f+4fv5H6XgOp0 +m8FZcAvUuVz937VJ99G6cq0fr88B6/II3rO6pRrpmSXrz8gCvTF6QuwxQcQt +Zvm0lHjA7ZHqZCktUeT3AxyJ8u9rGbrG7VHtqlTkR7OL6bx9fuyNt3NcMd8J +6j+1mMneBTpvy8X4F3cvQD0w2HLsTbDeyphJ0bYebKgbGPtf3QT+X/D77cSh +fRao74kEaSvNBP8fxZW9nGmiH472sZNXkf2Gobuf6+r+aIU4FNWUWThUMPTE +3Q0Fcb5ovRE25v6SfdenNN/YBhHk34kT1PJvAH8le2d6pzkgDi9j7VNtwfXP +M5f3PicZcVBni7t7gf5p9Mhwb5M0ug8RmOPdxgb3IT9y2U/mY/rGQ0zfWMVl +38jF9Ac/LvuDwhD1BxFMHxAc5j7weIj6gN5X5vf3GF/zYHxdgfG1L5e+fjdE +vk7B+JoX42sTjK+5zYOlDMqDSfbnwdYOyoO9/pM8mOqgPJhYfx7sS+W+vtR6 +v1Q+cLjXNdz1D1WdQ1UPt+/L7fy4eXDjia8/zZP4nfj9f6lnpPkd9xwAl6vn +NnfNbT5/qHLdQ/W9gOHOmQ9VnTiffqmc/HCvC+frr229uH4y0r4fwW0/Ge6+ +MdL6w/97H/ja/E58/cHXBzDnF38AYWfPkw== + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{339.8862186084723, 136.09279661142423`}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, 2 Pi}, {0., 0.18414221034722758`}}, {{ + 0, 3.141592653589793}, {0, 6.283185307179586}, {0., + 0.18414221034722758`}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{-0.0922638721505621, 3.3763906031479225`, 0.20365135126042658`}, + + ViewVertical->{0.0016439986601792383`, -0.06016202765432161, + 0.9981872708549865}]], "Output", + CellChangeTimes->{3.801823638837199*^9, 3.801823832472835*^9, + 3.80182560658733*^9}, + CellLabel->"Out[32]=",ExpressionUUID->"669e99bd-436b-4846-a43e-5d860e77ffb0"] +}, Open ]], + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "2"], "]"}], + ",", + RowBox[{"Re", "[", + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "+", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "2"], "]"}], + ",", + RowBox[{"Re", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "2"], + SuperscriptBox[ + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "+", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "2"]}], + "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Theta]2", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"Mesh", "\[Rule]", "None"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"Opacity", "[", "0.7", "]"}]}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8018260966863213`*^9, 3.801826123231099*^9}, { + 3.801826187625939*^9, 3.8018262048870583`*^9}, {3.801826595983247*^9, + 3.8018266415416813`*^9}, {3.801907648436627*^9, 3.801907661890799*^9}, { + 3.801910985969706*^9, 3.801911030723186*^9}}, + CellLabel->"In[57]:=",ExpressionUUID->"ecd4cdf8-af5f-4cab-859d-aba1c354768f"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJx1mH1wVNUZh7PoVrYiKjqOjoUAjjFqsZ1Y0I7AXeVDFIj4We1YFKsG2wij +DkKmgxMCKgQNSQiiteqgFkXoGI1FApSttlJtg1ZroegOxdZICys1hkurrFh2 +uM+9c37vwT/cuU/Ovvfdh3PPOfc35JaZV93Wp6ysbM+h/x116HP8263PVw9q +Gs3n6unlT4YPrwyai2/+bXBnVwBvumbeO2/vei6Y9ODWXeWd+Zhfc/vEcz9o +Xx1UTnj2pW2N3TEfO6dhdVtbe/DCpB/NLO8sxPyKcZtbX3qiI3ikcvEjHb09 +MX905LpB229YG2x7oWbWtsYw5t+Zt2n91NHrglOHjb3mwJAvYl58r2LUxD3r +ghteHHx+eWfRjN/y6MGFQyrLslr/0+21czp6U1nt57jTP6wZlzsq5uOj/ofd +eNkPtjWmY35D9HsnP/Hq+DuuOybmSyM/M3ecOeLAkExWfXKNV/XMp3qGq2e4 +eoarZ7h6hqtnuHrW8XjW+njWfvAczy/xDFfPcPWsPvGMP/UMV898qme4eoar +Z7h6hqtnuHrW8XjW+njWfvAcP6/iGa6e4epZfeIZT+oZrp7h6plP9QxXz3D1 +DFfPcPWs4/Gs9fGs/eA5Xv/EM1w9w9Wz+sQzPtQzXD3D1TNcPfOpnuHqGa6e +4epZx+NZ6+NZ+8FzvJ+IZ7h6hqtn9Ylnfrd6hqtnuHqGq2e4euZTPcPVM1w9 +63g8a308az94jvdn8QxXz3D1rD7xzO9Tz3D1DFfPcPUMV89w9cyneoarZx2P +Z62PZ+0Hz/F5RzzD1TNcPatPPPM71DNcPcPVM1w9w9UzXD3D1TOf6lnH41nr +41n7wXN8fhTPcPUMV8/qMz4XRv2qZ7h6hqtnuHqGq2e4eoarZ7h61vF41vp4 +1n7wHJ/HxXN8H/EMV8/qE8/0pZ7h6hmunuHqGa6e4eoZrp7h6lnHc6318az9 +4Dl+vxHP8b+beIarZ/WJZ+6vnuHqGa6e4eoZrp7h6hmunuHqWcfzO7U+19oP +nuP3RfEcPwfiGa6e1SeeuY96hqtnuHqGq2e4eoarZ7h6hqtnHY9nrc/v1364 +jt+/xXO8rohnuHpWn3imnnqGq2e4eoarZ7h6hqtnuHqGq2cdj2etj2ftBy9x +niGe43VaPMPVs/rEM99Tz3D1DFfPcPUMV89w9QxXz3D1rOPxrPXxrP3gOc6H +xHO874lnPtWz+sQzf1fPcPUMV89w9QxXz3D1DFfPcPWs4/Gs9fGs/eA5ztvE +c3yOEM9w9aw+T9v1q/VDOzfGnz//65ZwQXfiH874Hb+ZMbpqZN+sjqeujuea +72l9uNbX8VxzHzj1qafjlTNe63Ct/Zy7cfZ9FZ1r4s+PnhpeseeZlUFF9eXr +T3mxb1Y51/xdxyunP77HfRnH37U+/cK55nvav9ZhvN6XcVqHa71vmfx3Zs3h +8dkVGy4qP/Sc+nne8M/WddWWnlP/+ILhb4699v7Sc+qvExrOc+qvXzT8lcbH +WkrPqf++KcPzB0+oKz2n/n7Shh99z8KbS8+pv8+M4Vzjdclnk1eVnmuu/Txv +OJ794wuG49lfJzQcz/76RcPx7L9vynA8+/tJG45nf58Zw13P+WDtA3t7th9a +V13PyvOGu551fMFw17PWCQ13PWv9ouGuZ71vynDXs/aTNtz1rH1mDMcznuo3 +dzeV9jU8+3necK794wuG49lfJzQcz/76RcPx7L9vynA8+/tJG45nf58Zw935 +XAj6/3bK3NK5wp3PyvOGu/NZxxcMd+ez1gkNd+ez1i8a7s5nvW/KcHc+az9p +w935rH1mDMczv/t7Y4KTSuc6PPt53nA8+8cXDOfaXyc0HM/++kXD8ey/b8pw +PPv7SRuOZ3+fGcPddSMMLm1a8mrpXO2uG8rzhrvrho4vGO6uG1onNNxdN7R+ +0XB33dD7pgx31w3tJ224u25onxnD8ax5NZ79PG84nv3jC4bj2V8nNPxIuTqe +lePZf9+U4Xj295M2HM/+PjOGu+tzMZgg89nP84a767OOLxjurs9aJzTcXZ+1 +ftFwd33W+6YMd9dn7SdtuLs+a58Zw/FMX7o++3necDz7xxcMx7O/Tmg4nv31 +i4Zz7b9vynA8+/tJG45nf58Zw919MJU9Xs4bfp433N0HdXzBcHcf1Dqh4e4+ +qPWLhrv7oN43Zbi7D2o/acPdfVD7zBiOZ+6j52c/zxuOZ//4guF49tcJDcez +v37RcDz775synGt/P2nD8ezvM2O4e95IZ/V90M/zhrvnDR1fMNw9b2id0HD3 +vKH1i4a75w29b8pw97yh/aQNd88b2mfGcDzzPc03/DxvOJ794wuG49lfJzQc +z/76RcPx7L9vynA8+/tJG861v8+M4e65LpPVvM7P84a75zodXzDcPddpndBw +91yn9YuGu+c6vW/KcPdcp/2kDXfPddpnxvDDfW6MP2+a2bazlDO7572E959y ++w9LubNy9zyTcK75ntZXzvWR+JH61xyS8coZfyQ/et/D49fEn/2XDTq9lCcv +HX3ttlLOrJxr/q7jlbuebX1//2uO2L/WZ7zWcf+9kvsy7kj9633L5L/dM+tO +/dNFy02u3ndgUNb97iMmV7/jLwOqy5YtM7l6z4AdX920cKnJ1Y/7d133gFea +Ta5+/ZYhg6+e0mhy9cqB5/Xb+vU8k6sPmH7O61c032Vy9ebu4bvLho3Kaa4+ +oXDGzq5Bs3Kaq8+aOnvq2rb5Oc3Vv5G9Y9ex0xbnNFe/eEBH98cdzTnN1cc+ +N+6Sxsdbc5qrV/234vvTLlma4xqvrs8kVz/YO+0no+5MPMM/rTz23cXBMnn/ +6grm3t5b23R54hl+zuMH3u/X1izvX11BceiXmTeuapT3r65g7Nmb3z9rfIPJ +1Wf0XbFoxRN3m1y9flR+Vd0HJ+c0V9+zdn9lc/aenPv+1RXcPPXXx6+qb8hp +rv5le9uMEVWNsef4Pam17K0nT0o8w6dXXXn9xP0tOXf+H+o/8u96zgfMT9dz +Pvbpes4Hlx19dG7vqDaTq6cGTtzZ+nCrydW/qrh0/aZh6jkfrHzq4KaBE9Rz +PvhHS0PT8D7zTa6++fTbrgyaZ5lc/cLilgunP3CFydVHT57yx8G/+6l4zgeb +DuxtOe739+U0V+9X2/fyitcfEM/5YOv+yf/aWP9QTnP1VyP/mquPieY/nvHk +Pu9Jru7OzyRXx6fm6nd2rOt/3YQWk6sftX3DG8/ubDK5+gfv7P9068FFJldv +P7G6d+y++XJe7Q6qFw49ueO9OpOrF1LXnvWfNbeaXP27c+t21q2+LueeV7uD +JVtbvmg7bVZOc/XaT/aOKr9lXuwZfkzkX3N15r/m6qw/7nwuBKyf7nwuxM+7 +O58L8fzUXB2f7nwuBOUXj2gYsPghk6tvrD979/iqRTKfC8FFL1eM2/jaApOr +//hnfR7r8/B9Jldvf+vbkxr33mVy9Tk9++Y+88srTa4+6evnT9nzxbSc5uqt +kX/N1Tuj+a+5+i3R+qO5+r3R+o9nfjf7kZsn9MTrp5sn9MjznuTqzE83T+iJ +fWquvqWscsdtv3jQ5Or3LljRcUHmfpOrh71/H7ahZp7J1S/5ZOobN66qM7n6 +x3/Yt+DJu2eYXL0+8m9y9Wj+a65eFa0/mquz/muuzv7rrhthwP7urhthvB+5 +60YYr5+aq/O8u+tGGM9PzdXxqbl678hbq1bPWSDrRhis+Oq1E7/5UYOsG2HQ +sGHRybeOqTe5ejbyr7n6i9H811y9O1p/NFefEK3/mqtnRx/efzVXb4/OP3jm +d7jnpSRXd/f3JFdnP9Jc3V0/k1yd511zdean5ur41Fz9z5Pnhi/XzI89w5+O +xmuuTn3N1elHc/VJUf+aq/N7NVevjfxorn5C5NNdn4sB5093fS7G5yV3fS7G ++7vm6uxH7vpcjNdPzdV53jVXZ35qrv60zGc+90XzX3P12dHzorn6yOj50lyd +51Fz9Y+i51dz9THO+TPJ1Sui9QHP9MV6Ep8XI876g2c45yXN1dnf8Qx396Mk +V2f91Fyd511zdV2f4fjUXJ31X3N19gvN1bc7558kV2c/0lyd/UtzdfY7dx9M +ZXk/cvfBVJbzvLsPprKcPzVX57zk7oOpLPu75ursR5qrs35qrq7nDTjzU3N1 +d/9NcvXB0flHc/U+0XlJc/VidL7SXJ3zmObq/aLzG565D+c9PMM5H+IZ7p7n +k1yd8yee4ZyXNFd39/ckV2c/0lx9kpyf4TzvmqszPzVXx6fm6pz/NVf/+luH +3xc0V+f9QnN13kfc80Y6y/u7e9449NxE7zvueSOd5f1Ic3XO8+55I53l/Km5 +epWz/iS5Ovu75ur6Pghn/dRcneddc3Xmp+bq+NRcfXz0/qu5+u7ofVlz9Zro +/RrPfI/3cTzDeX/HM5z3Tc3V3fmf5Oqc5zVXZ/3XXN09LyW5eq3kG3D2I83V +WT81V+d511yd+am5Oj41Vyf/0VydvMg912Wy5EvuuS4j/pNcnfd3zdXd9SfJ +1Xk/0lyd/Vdzdc6fmqufIHkdnP1dc3X2I83VWT81V+d511yd+am5Oj41V3fz +zyRXLyxZ0XDWMctNrt79vw1bqocsN7n6m+m7Ll25N8kD4Ve/ffb5s0/l3yvJ +1RlPfTjjNVenH83V6Yf61NM+4doPdeCaq7v1k1z98+yDn7ect9zk6hdu3TCi +Zhj1k1wdrrk6dVzPa4L+VdUfnjt8ucnV28/pmfnPC5L68TyMuMnVozqMj31H +XHN16jCOOnDN1anzf62ir1c= + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], Opacity[0.7], EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[Polygon3DBox[CompressedData[" +1:eJwBCQX2+iFib1JiAgAAAKgBAAADAAAA4gIRESEgEgIDEwMEFAQFKRkaFQUG +GQkKGgoLFwcIGwsMGAgJHAwN7+XkIBARIRESIhITIxMUJBQVJRUWJhYXJxcY +KBgZHQ0OFgYHgHBxKhobLR0eLx8gMCAhMSEiKxscMiIjNiYnNycoNCQlOCgp +OSkqOiorOyssPi4vPy8wLBwdPCwtRjY3QDAxQjIzQzM0RDQ1RTU2QTEyNSUm +Rzc4bV1eSzs8TT0+Tj4/Tz9AUEBBUUFCUkJDU0NEVERFVUVGVkZHV0dIWEhJ +WUlKWkpLXExNXU1OXk5PX09QYFBRYVFSYlJTY1NUZFRVZVVWZlZXa1tcZ1dY +aFhZSTk6bFxdbl5fb19gcGBhcWFiaVlacmJjc2NkdGRldmZnd2doeGhpempr +SDg5e2tsf29wdWVmfW1ufm5vfGxtECAfMyMkSjo7uamqhXV2jn5/g3N0hnZ3 +nIyNjX1+inp7h3d4j3+AjHx9kICBmYmKk4OElISFuKipkoKDlYWGloaHmoqL +m4uMmIiJkYGCi3t8iXl6nY2OoJCRoZGSqpqbq5uco5OUopKTp5eYqJiZpZWW +t6eorJydrZ2etKSlsKChn4+QhHR1r5+g5sXUrp6fsqKjtqanno6Ps6OksaGi +gXFyuqqr4NDRva2uvq6vxra3vKytv6+wwLCxw7O0xbW2wbGyyLi5wrKz1cXG +0MDBy7u8zLy95B0Oyrq7zb2+zr6/0cHC0sLDz7/Aybm6x7e41sbH18fI2cnK +2srL28vM3MzNu6us3c3O7ejS4+IQ38/QAhIRAxMSBBQTBRUUBxcWCBgX2MjJ +BhYV3s7PCRkYCxsaDBwbDR0cgnJzChoZgpKREiIhqbm4FCQjFSUkFiYlFycm +GCgnGSkoGiopGysqHCwrHS0sHy8uIDAvITEwIjIxIzMyJDQzJTU0JjY1Jzc2 +KDg3KTk4Kjo5Kzs6LDw7Lj49Lz8+M0NCMEA/MUFASVlYNERDNkZFN0dGOEhH +OUlIMkJBOkpJO0tKPU1MP09OQFBPQVFQQlJRSFhXQ1NSR1dWPk5NRVVURlZV +RFRTNUVESlpZbn59TV1cTl5dT19eUGBfUWFgUmJhU2NiVGRjVWVkVmZlV2dm +WGhnWWloW2tqXGxrXW1sXm5tX29uYHBvYXFwYnJxY3NyZHRzZXV0ZnZ1Z3d2 +bHx7aHh3anp5TFxbbX18b39+cIB/cYGAcoKBa3t6c4OCdISDdYWEd4eGeYmI +eoqJe4uKgZGQfIyLgJCPdoaFfo6Nf4+OfY2Mg5OShJSThZWUipqZhpaViJiX +n6+ui5uajZ2cjp6dj5+ekKCfiZmYjJybkaGgk6OimamolaWkl6emmqqpm6uq +nq6tlKSjnKyrna2skqKhEyMioLCvorKxp7e2o7OypLSzobGwqLi3qrq5q7u6 +rLy7rb28pra1rr69r7++sMC/ssLBs8PCtcXEtsbFmKint8fGu8vKscHAucnI +usrJuMjHvMzLvc3Mvs7N8OfmwNDPwdHQxdXUxtbVydnYy9vax9fWyNjXwtLR +ytrZzNzb5OUezt7dz9/e0ODf6ODRxebE7uriHeQezd3c8u7j6+QOEOIRqZma +7ObU7/MPv8/O4uoC0ujR8+/r9fHt9+8P9PDs9u4B4+7i8eno6Ong6+/k+PDT +8PTT+fHh7vIB8fXh5ufE7vbq8Pjn7PDm7fHo7/fl8fnppJSVlYFeKQ== + "]], + Annotation[#, "Charting`Private`Tag$10851#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, + {RGBColor[0.368417, 0.506779, 0.709798], Opacity[0.7], EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[Polygon3DBox[CompressedData[" +1:eJxNmGnYTlUUhr/VTHMqkcoUSZIhKSKEJEKkUEJkihIRETIWSjJ9SGQOIbMy +y5RMEU2GypiUn83rud57X8uPdT32OWfvde9zvOfcFGjZuUGnC7KysmZZVtaF +njU9G3s96XW5119+7G+vKyyT/3hdaZn81+sqy+R/XldbJrM8r7FMmte15AVe +15EXeuUiL/K6nrzY6wbyEq8byUu9Tnj96PWDVx6vHF45vfKS4r2ZFG8+Ury3 +kOK9lRTvbaR485PiLUCKtyAp3kKkeAuT4r2dFO+dMImlCMdye93hdRPsD3nd +41XKqzjXircErGK8mxRjSTI/8/LDWIz18rJWAXhLk+ItQ4r3XljFdZ9XUbjK +k1rvflL7qExv9XyAY+KtBJ/OlWVtrVvR6y728SCp6yow7y4qH/usArd4W3s1 +sszfvWpwa+2HSbHX8CoHe01S7I+QYq9FivdRUv1rk2J8jBRjHVJ7qktq34+T +elb1SPHWJ6t6NSDF+wT5MPuoDu+TZPpt1YT3KVK8T5PibUKKtykp3makeJ8h +xfssKd6WMImlOcfE/hxZH97S3N/nvRrC2wZWMb5AirEtKcZ2pBhbsJ76teeY +eDuQ4u1IircTrOLqTIrrJVLrvUxqHz3orZ6veLWCtzt8Ovcia2vdbpb5O6R9 +vErquq7M0zm9M/R70e/wNdYWey+4xfup10de07x600PsfUixv0GKfbTXQK9B +Xn059jLHusEyiBT7m+xHXIM5pr0O4JjmDOGYGN/y6gnj2+TrXsNIMQ4nxTiC +FOM7pLhGevXz6u/1HimWUaT6v0+KfSj9e3JtF7jHsJ/B9O/IPZrOvdD5bLjF +O4EU70RSvJNI8Y6nn+ZMhW8Uz2EUXB96vcs+pnFM/ebQT31m0H+s10xynNds +emRzbDD3eByp3rMY67pFcKj/x6wt9nlwf+D1iddkuBaQU7wWkpo/l3ma851l +vqf6Vn3ltdprjdc3Xpu9tngtZQ9iX0aKazmpfawgte+VpBhXker5GTmPPvPh +XUOKdy0p3nWk9r2e1O9gA7nYayO5xGsTKd4vyGXsYxm8W0jxbiXFu40U73ZS +vIdg3WGZv3P6Xeo3uRNu8e4ixbubFO8+mMSyh2Ni30tuhHc693c/14r3AKxi +PEiK8ZjXERi/5/np/fE1623ieco39EyTJ2mcPEnj5EZyjuRGGic30ji50bXc +42mwJk/SOXmPXEIulNxLPZIzyUWSM2mcvCqXhSflsfAkjafyrBdaOJA8I71r +3rJwJn2v9Y3Xd7ishSflt3CjghZuVMjCjQrDVYRxcq9bLRxLa+m9LA8pCp98 +o5iFA8kl5A5yiOIwlWCc3Kgka5ViXBjeMuy7OOsmTypl4UmluUfF4Ejf9QYw +yTfKWXhSeQvXqci6D3BOfSowTo51H3uoxBzxySsqw1GFsTiqMi4DR1X2WZF1 +kxtVg0mOUd3CjWpY+NAjFj5Uy8KHHrXwodoW3pn2VIdzyXvqWfhWTQtPqmvh +SY9buFQdnkdljiVnqg+rvKOhhffILfQt13f2RQtPamzhQ00sfKiphd80Z225 +QwsLT2oGU3PWTr71lIWLdIKpBWuJSc7QysKB5BLyI3lFawtPakMf8XaET++u +duyvNWslf2pr4UntLTypg4XPPcMxfV97WbiR3EJ+oO/zAAt/6mzhPd3g1re6 +C4zdOaf++qb3gLc3PdpyrDtMPbmuA/17soeurNuaPl0t3Ki3hRv1sfCegcyR +Y/RnzgDG6jeY69K/0/LBMoRz6q330FD22pceXVivH6xDmZOcu5GFJ+lddsrr +nNdRC08abuFA71k40wjWlWvIOeQF+v7OtPCkUXDLN0bDOpZxcouxcI1nnNxr +JPdlNGtpf9lclzxpAtfqHT0FJnnHJJjkG5MtPGkqa01jnBxohoVvTaTndK4b +w/npFq6WbeGUw2Cazf51Xo4xx8J7PmHduZxTn3mMs7l2toUbLYBPXrEIjsWM +xbGEsbiWMp5Mn/kWbrTUwo2WWbjRcgsfWmnhQ6uYL8f43MKHVvM8ppy3p7Wc +S96zwcK3Vlh40joLT1pv4VJrLTxpo4UnbbLwJI1Peh22jPskT9pi4Ulb4ZMv +7oBpJ2P1k+vspoe8ZK+FJ+208KRdFr61zcKN9sC0j/lyDP0fS24Y5ab7YTrA +OHmSxkf48zY4D3Fvj3v9ZBlnupF1c7Pn/fQ7zXVyq5+5Rm6Tg3k5eSZ6Nvod +/ML6ug/6v6BfvS6zcM3NzFNfedl2+LZx7Qn6/GaZd4H87neOa50zPA/1OQvb +n1kZvuOsrXlHWfcIfz7IuifYwx+s8yV5hj+fY/63rHea9U/B9C37O3zePTzL +fk6y7mH4TnLtMdY8Qv/feX7p/7/kO3pn6N2h99r/dQpSUw== + "]], + Annotation[#, "Charting`Private`Tag$10851#2"]& ]], + Lighting->{{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`]}, { + "Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], + + ImageScaled[{2, 0, 2}]}}]}, + {RGBColor[0.560181, 0.691569, 0.194885], Opacity[0.7], EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[Polygon3DBox[CompressedData[" +1:eJxFmHm4VWMUh28fGTJFcyKSuJk1ScqVBjdUCqVIrkSTS0qKSoZokCiZkhAi +bmUspdKVKSVjiQZDhvxpHsJ6n/PuZ/+xnnX3XtO7vnPO3r86vKy8x9WpqKho +fpWiot3Cd42LfmGXhO0R9lvc/z3sk/j7F3LC7+7fv4btmQrxP8L2SgX/Z9g+ +8fff4f8J2y/+3hX+37C9UyH+V1i1VPDkVU2Ffsw7OBXq99XoQX39VKghVlMO +6r4K2xj2WdhBYSkVOGsZZ4/aenjrpQIHvQ4I+y96F4WvY5w96urJ2z8V2Mlr +IBM7HaInfmLYYWGHh50SdnRYcVgjmWqEHWouM4/wHnscKWtt6+rK2Ng4sSbG +YTxKT15D+1V39oHOK7YHZ9ZUz7meZB5cx7kDXMfr6Xey8Ywx+8ybeQ+uFnLD +dYy9OZtj9fRtbi55Lc2F/dqwy8LKwlp5j72vCetv7PSwEzzXNs6g92l62EuM +s9MZetg7OBvGTs5mTnvj7HGmnry29uMMzre+o9bC+p7WEDtHDupKw1qHnRrW +RQ8vv6N27tFND28POeh1Vip8V6jvbpw9ztOT11l28i6QiZ0u1BO/Kqx32EXO +b+p59ZHp7LBe5jKzr/fYo5+s3Tz382Tk93+usUuNd/fz6W5eb/uVOrvUeWX2 +4Mwu13Oug8yDa6A7wHWlnn6Djff1XIrdZ2jYxXJdLTdcA+zN2Vyhp+8wc8kr +N7e/e7fx8xsuK4wrwirCFoaNkolz/TpsZ9jnYSOdAftdYWPDxoXdYC773Rg2 +RN6b9MPMHSb7OD1c19uPeaPtwRmMN85vYkIq/GbgnWgNjLeGXRc2Iuw2PYx3 +GIfrTj29p8oEyy32o35y2BjZp+jJu9n5zOaZynOF58s0d4BxunkwzpTj9rB7 +vMece/Xw3m0dNfeZy073yw3vg2GT5HpID9fDevaYYT/mzfYen8kjehjn6Jk5 +V1a4HtPD9biefk/oZ8o10rOe5z14n5EPrkftTd+nwma5x/ywB8x70rpZnjXf +Nb6zz9qDnZ5zB9gXywdXhTswZ6GePV4wDu+LehhfDXva+UtlZc5LxmF5WQ/v +Ivsx723rl2jzrd/k/bfCVspB3XK5nw97XQ/vKuPs8YYe3jflYP6ysAXWrzbO +HpV68l6Tnbx3ZGKnd/XE/1RP7OX8RzyvdTLxm37PXGau9x57bJAVxm1hm2X8 +wDixD43D+JEexrX24wze1zPv01TQSfxW0Ee8M3l3ZloH1t/VTGiRTDNx/bea +qZo7P+x3Au2D3iCGBkE/oDl+VTMxA81EP653qbeoQa+gDahBG/E3OofnBN/B +K+TjHc9vm3c278FjU66B0Bk8J/j9TnCHesZg4r1f3xmH2qOa9+rJ0cC8TDM1 +SLkmQ9vwPOa53MWzqGOMZw1a5TDnoREy7YNHT6CP0BhHOK/YvEyLZNoE39Q9 +G9m3hnWNUq6Tij2nhu6TaaPjrEFjoDkyDdFePu6hV9A6aIbm9j3ZGlhbGoOP +93krudj/VHdqZR4crc1rary1vM3s29g5zVKujdrI2tZr4h1kzXRSifXtvYap +o3m13KGxHJ2MwcG7vrN7omfauXeJ162Md5K11Bqeezyrb/FzbeKMqs6rmXIN +0TvlGgidkb3XB8jbwxisvPd7OhP9cKF79jSvo/Xnp1wzXZByTdbVewOdUeLM +bu5G/Fyv0Q/9vEZXoEX4zqJT+siEfurv7DKvM81EfRdzL0q5NiqTb4DXZ3kG +vbzm7IZ7D42BTkBf8I4eIxNaItM7+KHOGGQNs8vNK7NfpsHxvOP5rpzjTpwF +774Rsl9jPeyD7Xuxc4bIPkJWzvJ66zMNdKMc6JBR1o/2OtNG5GUaujTlOmms +89EL41OuFzPNNMp55cbHudMEa3jH8HxeJhPvdTQDz3We77wHeIfzbp3jmaI3 +Jtl3ojWZNposExpjqjOm2+Mm702RY5p5441Pk/cO+2a67daUazVimWa6J+Ua +KNNE+AdkQlfMTLk2eijluifTQfjZzphh39usmyHvbOsnOHO6NtdzyXQSOgEd +wfv5xZRrKfLQN2iKJ1OupR6XFS3xtHy805+R63k/nwe9N1+OBebNNr5A3nn2 +vc8589y1wl6ZTqpIudZ5SQ40xuKUa6YXZELbvOLnMcvecCwxBgf6Yal7LnLG +Y/ZbJPtSa2BdZg2f5f32zXTScvlWeM2/L/i3xSZZ0SCVKddPq+RAn71lXzRN +poPw6CPe7/wfSPWU65K1Mr1jPTuvtm+mt1bLu9a+MK2zPtM9/E7QRGij9TJt +8HqzOZVybvI8t4d9mQp66Fuv0UcHyFrdM1jvvGQuemSLOUWe3UTPcqv9OYef +wr4J+9g6ZqG5Fsm3UrYv5PvOs94qx3brfvDvn6sUPteVcu1Ihf9XguV7Z21z +/ufu+KYzKo1/4fWP1lZxJrPXeG+H97dZs1n/vbts97x+Vj/ybqzh/R/cc4u9 +OKOdzljjbl/L+JUcG+3/k3z/AyEgSW4= + "]], + Annotation[#, "Charting`Private`Tag$10851#3"]& ]], + Lighting->{{"Ambient", + RGBColor[0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}, {}, {}}, { + {GrayLevel[0], + Line3DBox[{246, 1, 242, 227, 16, 31, 46, 61, 76, 91, 106, 121, 136, + 151, 166, 181, 196, 231, 248, 211, 244, 236, 212, 213, 214, 215, 216, + 217, 218, 219, 220, 221, 222, 223, 224, 233, 249, 225, 245, 237, 210, + 195, 180, 165, 150, 135, 120, 105, 90, 75, 60, 45, 30, 229, 247, 15, + 243, 235, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 234, 246}]}, + {GrayLevel[0], + Line3DBox[{495, 250, 491, 476, 265, 280, 295, 310, 325, 340, 355, 370, + 385, 400, 415, 430, 445, 480, 497, 460, 493, 485, 461, 462, 463, 464, + 465, 466, 467, 468, 469, 470, 471, 472, 473, 482, 498, 474, 494, 486, + 459, 444, 429, 414, 399, 384, 369, 354, 339, 324, 309, 294, 279, 478, + 496, 264, 492, 484, 263, 262, 261, 260, 259, 258, 257, 256, 255, 254, + 253, 252, 251, 483, 495}]}, + {GrayLevel[0], + Line3DBox[{744, 499, 740, 725, 514, 529, 544, 559, 574, 589, 604, 619, + 634, 649, 664, 679, 694, 729, 746, 709, 742, 734, 710, 711, 712, 713, + 714, 715, 716, 717, 718, 719, 720, 721, 722, 731, 747, 723, 743, 735, + 708, 693, 678, 663, 648, 633, 618, 603, 588, 573, 558, 543, 528, 727, + 745, 513, 741, 733, 512, 511, 510, 509, 508, 507, 506, 505, 504, 503, + 502, 501, 500, 732, 744}]}}}, + VertexNormals->CompressedData[" +1:eJztWXtUzWnbLowmEkUzxhQ1jjmbzFBf2zNSTaIih4ScGiVKKSrR6DBI2job +yTR4w5Dz0Ohle1CSVyQpETGUHNLeRjONU/u99+/XtZd8q2+91sda37fW7g/3 ++l09Pb9nX/u+7+u6H2bz/F3nt9LS0npM/7Sm2KhU/bif1BJ/IsRnOYtOl0xd +lPUjB35Ukre36LWcZf/0yNhwwg41HnTK1v7+33J2+9jkHVMT9qjxdr/1lzbU +y5lN4ga/N/FNnd0FXFo7a63BG/v4Bfwi7LPGq+NBnzfee3yy4T7Ve6MLzvsN +nd1lFHAxKFgPD4dKWs+Aty7QFdbHrYrcSPur8W3uGcL+kRcdl9N51LiHq4tw +HpMHil1v4hnr+wl4mk+OluEb+wStdxP2mb77b71Fb7y314VigZ/iPEP3ZGs3 +9TnBp4ZnDc8anjU8a3jW8KzhWcOzhmcNzxqeNTxreNbwrOFZw7OGZw3PGp7/ +D/Fc/GRDmEOM+nNN8i1M9v0f+N/P/c1pvXr//dbFwvoPvX9LeEv7v+v6ls5f +njc5o29AqHp9xfC5e28QfqFtm7o+AaHq/UNdPAX8Xde3xMO77v+u53/Xumvp +PHgWg2nT3yk0+AfCq6si9BdSH8q6qSX0Ew3+YfCB54ccVenAs+p1Ql/V4B8G +nxTtJ1XpcELqKEHXNLgG//+Mv3bqdkiV55UZcc3yXIO/X7wsXfuhyo9bFeo0 +69sa/P3izecbhQb/QHjooRgj8iEsN165903+Nfj7xSOct2er5u8/62Ka9RMN +/n7xE586qfSRRR9sro8a/P3idu0HrFXhaefHaPAPiD9tPWmXKs8TeiY3y3MN +/n5xHbtpl1X3po0z9Jr5EA3+fvHPM2ZH6Q7r99/ulzT4+8WHlHQuCnGI4Wcv +PRHumd837ufQaEk4a/V7/f8Kb+n8YvjP7ydb2qel9xbdW1BpFhDKx58NbHaf +3BLe+JtegWlAKNv+afB/hLe0z7uev6X9W9rnXc/fwntHNY8KVnBXqzIgzI+5 +bDT2/UMplzRFZhB74n6nGeFs/qcHev6L8KbIlBYVq60urVa/R7vvcNN1hJdt +zlY4xcSxiVc6hQyn9U2RyQPDdI7YJDK9dMcOZY23ZWKUs66Rpg3n9ySr96mZ +9kf/cMKfHtwY+0iSyrQnfyLd11gjm3rW5IQ14f3/6VGw7FQq80yfeKlPo1zW +FNkPu32GLW6TynK7B2UdaWyQHSips7Qn/MckSXD8syRmP2/Alj8In1VueXkT +4Vnb/jrjOSiexZVfe6GnVMrEKGf7Ul0bzgxbw05M+/b6D0q5rCky458cfHob +hbC2A3R+rSS8KbKg+E5zHEu08f8aap7B41u8Mvusod2P6PiqY7vVywNrCD+c +MfWeycsV7PE3nQ11Sr3Z3LXKofmEH/2pdeOUmz+wu92XZM5zmsuq5A1rNhAe +a25sZL9oPZMabQvP+MKVjVr0/WkbwvPGT3M3ykpgn9Zf/r71YMVJyb6RfR7R +5617Pm5ErVEyM7WKn/u77iS+eoufYxLho7PaxWUcTWFHfHv/cnfxPF6adTLX +ifAn5rvGSselsuOtKn5+OW0hj+2VkjGE8I9ine28dqYwW8ek5zNDA/iB3zYl +2xKemPjn3pt7k1htjzZ5zu2DuIWzPCaO8MjSpVa9LmxgJnvzM1MfLeWPtRem +NBBu8aJ7j9f1q1mrnEkhW/oF88P715xbQOe/tM671c6KYGYa7uVAke8sNT54 +kvCstuNKRhDPtx4m7qHvge9c3FbgH3n5Vp6qeQSv4NP0oba04XWIOi50+L39 +McKz9e1/8TKJYtFGHnnp+UuY1mnJ15sJ7+t1p6fBoBh2bFzgR2Ulniy9vcNx +b8K9HAdEm96RMi3zYj5+0zDmE5Kdb6qqF7NDSWZzE1lZn26D5hTP5t1tNr24 +SJ+3TdnovtKeyezwvczbWekB/Krhbb8IwrfoaNVMUiSzvu3GVC6aGcoD5+q5 +qPgfObXrwfy4ZBYzeIm3XdX3fMRjf2NVPutE7zD56Foiy/1LapepE8XvFvZa +HEC4n1tq+YkMKQvRnxBqpIjmlysW2JwmPPPKX6ctLVezScOtKynyqfdy87rT +OYMdar8k3tnY1o5j6HvgXW6vFvh385qW/xHxXC9L1csdtobn+doL+Y/6RN2j +3pGXyFPkJ3gEr+Dz21NzdG9krlDHmbt9l28lPNFgflZro2iWkPMgoNvxAPZj +2bLQZMIPxuTEh3nHsPx9fGTnHRPZxa+M7vkQHnfcsGveRCmrnzG3IenYHJ5m +mJDdi3DpqdwbpekJbPqlO9nPji7llfo3JhYTD+a6j08m5iQyy8F+vEG+ig9J +Xd5+DeFTXn6RdJbwQqtF0SXnfuDtVlwudCe8X3LOiUd+CexM/Ez7jD0xPHvg +yVoV3k1i45SQtp4VGhjOpMjrDW99Ek1462Upc4h3ljc4qYa+B+7/SOR/sm5b +L8p7tvXXKeOpDviRJB8h/7v0tdxxPU7rpJ2B7TXqQ1xnS5nQf9A33+qj6jpH +3aPekZfIU+QneASv4LN213Cbhu7L1fFl7E8mhwjvlzrl+PXJkexSjVHH+6u+ +YxUX5k/dT7jtNyFOQy3WMB+b+2b+IVN4zNK0V1GEd/jbbGt+eCzzn98ve3j2 +Un5Cy/34V4SPSWIlg5ZKmVGZe+TckEieEeh69QZ9XutOXUeYeG8gnQmfM/DX +tbxn1vZgVX+orbB5PPNmHCsaHv6MIv/MwnvlbMJfDfsvK+KdKR765NH3wHee +lQn8b95qOZTynv2zqKAv1QFf2FPM/5+f8DjqO6xINz6b+hAfsKhO6D8l+y12 +LJE2ynxd68JJB3jpkZFC/4cONdclubpvoo+if6LOUfeod+Ql8hT5CR7BK/j8 +I9m07xbXQHVcdvLyx2WEd000yBuwfwVrtcW/t06Xgaz4lnOny4QvvnCnept/ +FLszwPi2ZEsA1z6lX5Cm6mN3u0TM+nwNK78/u8/naRH85rcSxTeq76XnRnZY +P4Z1cBppTZFXpJxOq6Tzr1neYxrxzhbsPPoVfQ98Ts9/CPxf2XF9OeU9u2a+ +PpHqgEc9E/NfS3ZkNPUdtlSWcoj6EL9uEyD0n0uuAYXU91mbPlX2pAN8YInY +/133FP8+W/uV7OvD1V+SDnO7VFF/0Teg89B36BB0CXqEvok+iv6JOkfdo96R +l8hT5Cd4BK/gM4NdGX5OPk8dz422vFCv0ovdLicGPQxk0TdTzhf6z+Pxc+ZM +rSK82tbRMcp7BWsTWsUo8ojf1vfYTrj2C4F39ssS2Ur6Hnihr8j/Nbl0JeU9 +U/ZxuUh1wF8/E/P/4Z4Dh6nvsDNWVieoD/GgvmFC/wk29TxNfZ9ZZBveJx3g +HpVi/48P9p1BusuiHGMdSIe5U5yovxkNuqm5D/+SeX5tcI58EL9fIvof+CT4 +Jvgl6Dp0HvoOHYIuQY/QN9FH0T9R56h71DvyEnmK/ASP4BV8ivfUVRJE+KXR +VRYKWs8ap3+8j9bzRYvF9R3HND6i/Zmv8fk7tD+3LxP3rwiadITOw6r35KXR +efgFd/E84/YWZdH5mfugkeV0ft4lQjx/2YywK/R5mb+1e2/6vFwSIn5eswyX +MOKHZb/KiyV+uOKFyI9lu051fnEKWd6zCeuIT+71UuQTvvMtH6r2SfBN8EvQ +deg89B06BF2CHqFvoo+if6LOUfeod+Ql8hT5CR7BK/hc+GcHE8p7jljjIeb/ +6EojPaoXvvJqVg7VC7+n7SLUS7l+v1FUX8xaKbWl+uJHr4j11cZv1iuqR1Zw +s6Yj1SOXrRXr8Ypx2iSqX9bm9C0p1S93viPW76mUIa5U72xrUb0F1Tt3675Y +qHfbVXJzq1lVsixfuz+pP/AH28T+AB8PXw8/D98JHwr/CZ8E3wS/BF2HzkPf +oUPQJegR+ib6KPon6hx1j3pHXiJPkZ/gEbyCz979K7tS3+eI+Uqx/z9o3+9h +9arveOIM3UOkF9xb4iXoxe6saAPSF5554+Ja0hd+K13Ul6HLTs0jPeLVzqUr +SY94ZZmoR361wRVagxWjykrPuJF+ccO7on7l6F/kgbPyZA0zHNuS3vGOeaLe +YS7CnIT5CD4evh5+Hr4TPhT+Ez4Jvgl+CboOnYe+Q4egS9Aj9E30UfRP1Dnq +HvWOvESeIj/BI3gFn+FeBwaQ7+GIvl0zBP9zR6qzkPwSl5gtSye/xNuHBwt+ +qca6rLy0xJMfN6/pRP6KZ+iNFfxVuWHCMvJj3LQwR4f8GK/uuUrwY3WLz9zY +P+uq5HXw6Fvk37iixkDwb5gzm8+dcvVchDkJ8xF8PHw9/Dx8J3wo/Cd8EnwT +/BJ0HToPfYcOQZegR+ib6KPon6hz1D3qHXmJPEV+gkfwCj5H+mqrfD9HrMsS +/X+HzE+20rzA20VO3ETzAjfbPkqYF34+5jmX5gvuWVAtp/mCz9/1tzBfzJvo +fKpqVpWkg1w3nOYR3mutOI9gbn9rjlfPmZg7MW9iLsKchPkIPh6+Hn4evhM+ +FP4TPgm+CX4Jug6dh75Dh6BL0CP0TfRR9E/UOeoe9Y68RJ4iP8EjeAWfl2L0 +vWnu5Yj6A+8K86/kX/sutS315ps/O5hD8zIfM05rmGpeDpEXfZW6oU5iry3P +pfmaG/8ozte4B3nrXkQ9t2OOx/yOORNzJ+ZNzEWYkzAfwcfD18PPw3fCh8J/ +wifBN8EvQdeh89B36BB0CXqEvok+iv6JOkfdo96Rl8hT5Cd4BK/gc+PPZed+ +1fHliBONw4T7n7qgr48/DX4uke0e6x4Q5seTOpkI90W4V2p+z6RguAfBvQju +QzC3Y47H/I45E3Mn5k3MRZiTMB/Bx8PXw8/Dd8KHwn/CJ8E3wS9B16Hz0Hfo +EHQJeoS+iT6K/ok6R92j3pGXyFPkJ3gEr+Az08p63St6RgSfPmcCg12+8FDH +j40XznpO651uxKe9Uiolyv5hJpcjPJqe6Tzd9t21He3NYsbVjbAb7c2n9/7H +Z3KVv+r+3Q474n3syisHJ7h4c2XK5qgGwrEOf4f18huq3ytl+YeLJ9D6pmda +f3DXNecvPDjihO/E89Q+UCwoivDgKwYkXH1O53/cOkE4T/PzKSU4Z/N9lTLs +j/PhvDgn9sV7sP/J/vaBiQud1HHUeDeXRsKtTpneC5zuxoZNfe4ZNN2NO/qO +kr0kHM/4PXDf09Ft6e854tZp4j5uj536KJVyycbPvhnhEuWEZ7Yxtr+9wsON +cYdXt15Tv2mK7MFIx6eE88659un5GxplkeYivu7Jl/eGzK6XTPe1KHCOcuKy +p037NN9Xgv3x99gP++B9b72fYV+8B/v/G++owhg= + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{418.92529466668094`, 215.41989924112062`}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, Pi}, {-0.01880790625886348, 0.09734030001602528}}, {{ + 0, 3.141592653589793}, {0, 3.141592653589793}, {-0.01880790625886348, + 0.09734030001602528}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{-1.5080713019819163`, -2.906452883126842, 0.8533771653273892}, + ViewVertical->{0.11615217970914925`, 0.22385601871308294`, + 0.967676161758024}]], "Input", + CellChangeTimes->{3.8019713391283207`*^9}, + CellLabel->"In[40]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\ +eJyUfQdcFWe6/jgzp9MUYteosfdGRFDBgnRQmiIiRTpIVxFEUewtsXdAbDHd +OSYq2AFN25RtSXY3e3M3e+8eS2Ky2axH/f9+9/++7/fNnMGQu3f9/d5vvjMz +Z2aYeZ73eb4yx6j0itysZekVeUvTB4SUpZfk5i0tHzC3uAxWSV0EocsqQRBu +DRBkqP8PVPVFl//5n/+pwqJjvYQWhh6FhYWvZWdnt2RlZR2ApXnFihVsPwPb +r5gWxi7/+Mc/lsH2A7Cfafny5fuhnpCTk9PJrtbi4uKzsLlbUVERromG3XbA +1zrZtSec/Ypu1xDYFa+mk13d4ai4qTt8BdfEQn3HM7vyv2kFrK6AsMDfshOW +mRBCJ/t5lJSUnIIL+xK274HwhFN02O+X7t0v1ZfRQhqRm5s7OC8vjz7Rdivb +Xsi298/Pz18F55sDf60gFeHVSfOhxK2u7/BryGfXaq6srJwGx42C/TCsFRUV +gsRuDR4rRxfz4Lh94RxibygECf9M7dAB7HB4a3CrGu6lpaXCFXbGPP4Y4SlP +hjMOhM24Rj0rP+kS3QVjeC9btiwATixOx7/KEATfxL9PjQnwWZjKTj4K7k0t +fP0ExHYI3PeZky+F1QPwT2hra/v5ySX9yQWD60/qBhehxmg8qlRMd3cU1LX9 +J7H9TatXr8b9tsIe/nCF+PeqV5HDTuMFsEznp+I3W1KvhD6JbF2k/nLc2LrF ++IfBYfGBCCKVhlnwUX/X6ZTj2P54Q0bzy1Qvg58Yrx4PZVi3bh1Q/OeX0dV1 +Su0y2KUZ+sFppsF31ZhJmAumsjd/srTniF++jCy2aRKsRkAgFPlN7/Qy3PV4 +M1JpcSsrK9M/HLxj+GgO8KU/Pqxhv3wJS9km86pVqybwyxBMnVzCALYumd8J +Qp2UTTffF+p94C9Ww1peXi70o/3lobDHi3BPdvNTX+1w1tmwZSSslfbt2/e/ +nRUfr/aHM7gYhgHW9fd/lu7+S0eOHNH278GuZDicZwVszYB4DlIdv5J0dkzk +YgGcGW+xYPnlK0Fsa0dmV2ywwSPoCrdejZPEjBIqh/FsRXv+lp0yjR2qT0FB +gR9clGHDhg2CtZNTjmWHr3kmH+BNE8QsOvwiKIfDKTApCSKVUpdPPvlEO+VH +7JSp7PCI9SlwSkpK/JR4urmw3gQIUCkzVX+/OS+QUvjUA+j0WMpz6Wb3hL9D +2/k9dr4lrueGm/GuCTa2bgBcLiJC/OCDD1jSFDEbCFISyhXcvnl0glL6+zAd ++cA6+mo7O/ZiTgb4G8bC9SCHBXe2bhAcezK/dmE6WxcBn6XGxkZ9WukKJ4yH +Q9NNZLdSRj731cV1drZk9g1EzAw4E+U+j18+G13sb37zGxc+ZH9K2/iXoAhj +4M1zw0fgz54wPpIdXHUxFuE3qtn5F7HjegIup6tPzrOT80ewQ6XB1/F2YmCa +T6e/kN3MCP1T9WX74xO6DVtROTHw+tVTJ7HTYDJbyP2B4PWLp5YS9UmSg2YQ +fDdTNQoillI/AimiArOuDugyPvjLsEtfPPD333/PL2MhO9RIjj19QvyXl2Hm +qfLXv/41PgaMtbAd8wVmCjGEEDxOL2Kj2GHQgh2GXely+ZUsYJvwS8gQ8dy5 +c0K3X74SzIPaYTn68ezSnj176DmK5IsM4+H0ZbBeDcocXDXEpqYmzEsIH/Uy +EtgmlGU0LkPh1IJPJ5fBn98E/V/HVMMgHT9+XH0uGCkEEPZoVL7RniyNG5Aw +PvD8xVdffRUvpUZ3OfHsNEhdTE2IOuG5Ti6Hi5380ksvoWhPJZpTaZgBZagu +XsBj9GGnxmdeBV5yDSy3chV55tSYBW1ws8X29vZ/deo41XVwGTfW1tZ6wGNQ +g8l4Od2PMD2UnuP719TUYJJHg40PUTp69Kh6OfP5abZs2YL4Rtcg9OzkcsrY +oYbAOoTYUh7hdOr++DglRIZ26p0dDj+KCx9eSaeHL2d0WqS7enymkp/mH8Og +pgbmUGE7O8M8djQ0ARMh8H4JvX7xDJKqVDrGW9BIoC9WA7+Dd/McBC7xOMJm +drpodhi0PcjGF/FK+nRyulq2ror/QUx2Msh7YE5+HvbFwPxF7t2fQ/1Pf/oT ++pEA2GcqBBLBsnLlykB29ih2VFT+YK5TQt9fPvtCPRi4B0HC4F1Vg7U7wgg8 +z/HmFO05mV2RaLfbMeMiy/NhiU4BHRW/okjXFQXCtep8VKdX1MGLGHn5hz/8 +wQJKjT7GG64A4b4Ac04FXdQUfS4Yz7/yz3/+U96xY4d49uzZLp999hmahHWu +i+LJDI0Mfhv5IvTv5KJ2uB5mTEdnb0A84ePCSIWYRObxeQI6Xqx2RSMZkpBf +Y2AffOCFcHx+JeHsmLN5o4dS6PP/xyvht0eqr6+nv4SbRqQdPnwpHCos5cpI +QDQHb+CVus4exo6Kj68HdzyqKezs7IaNGzeOUpuq3FDi34oOD5eChA5AWq55 +xRd4m0EYzDP/m2++iTjZi3vwawhhm9AMYJok6zOok2s4xBPRtm3b+quH5XdA +3rx5M8IUjQEGGgYUIPJlDP4GfD7zOJyPwfaFukuYyw6NZgD9CKJceKGTSzjN +1iGY5vE2gCBiKUXQn4zXr/Y4CN3ZedF2pcN6fOaREBYkMz9vMDse8hnxjM0e +9U51dl5kprdqHCnV0/0WjGiMEmFnvPHLufJhsmXaLsxxfT1Cxc6QTk5znq3D +lF3B76IgYikNJFj317cAWZ4TZnEUgG4H8IShtsw6OzbiVEMa+xPoLhrxi3hx +agTwNnZEh9OgNcDDIo7+t9NIBw4cQFlnj8CVp7BVg9EdLgEtQh6EuILpot5I +MkAIQexo3hwXqG2qh+lwVtbslPD5BanrRJcepvGbiZFEJ2P3E02oAaBLe85g +p2TIIOMRCIfCW84zSKenlHbv3u3FZVVlgxFSqC/sh4HdK/iH4l8nRtK5OxhD +/w5nRRdkWL9+vT5v6c8aIQiCuBKKek4EqK7kIdiolPobjUbt8N05t+EKEVWU +I0SSAMqfK+F82Iiu449C8GOXM42nm02bNmG6QTURxrA/blhKSkpCcGjQpp6D +DVdmJNmUyCIPJarIQ/x4xDSzYHz7hUnGnb0GG8p7DzVMGzjOMnXgeMson74m +cRBcliB5eHl5aRe3gt9qq9WKW2kPvt+kvsNMUweNNU8dONYMLcdBWK7oPUTe +2fMFCkGi0nh1yIvGj0f4m9T4ZHgALeFq/OEr8NH88YgA83X/OJtgUMILPQRJ +iSj0UCKWUcA6LOX3xs+14PV/QhFglumPkW4M9TPt7zvcgH+QIFJpSe0zzDB1 +0HjL1BdYTO4/0jzE5k5X38dkMhkmTpyodj7hbQ9VAcNNMiYM7OFA14m9mIht +ruTqbR8Ntxxvu7xz505+26WiEWMGXpkV+4ISlu8hiEr4Mg+JLt1NicQ/pcjj +YnCW+80psbZbU+Zb3/CNstZPDLfWTwq37hjub17//BhTVb+RxgVWD0mM6tKl +yzMooQuU2Ya0rj2kdc+PNmAIIpXSyyOnGesnhpoxBJFK+eKLkeabU2LMtyBw +KUJhEYwXg5fa4D67wV12h6U7LeFC6ZIFGR8B1pTwIlqK9EcY8Q+gVRE8ItlS +wgo8sqhiwhgGHANLg2tdMYU9ugRvDNRwf9d69knwaJ6Z4nbTb77t5lQWzVPm +WZt8I6z1k8OtB8cHWza8MMG0buBY0/K+w41xJouY6ObmluLn58e7Y6J4Sxub +u2/wuvrYWCetlM9NiHT48GFhNCPvYEmSDnv3kS5H5fS/GZs/FDBY4EF3QfCi ++6CCMZw9xQuh+R7vhOR5XIB4OzTP463QXIg8j+tjZlneHzDG+P7zELCsluQu +IuP7DCi0J5nIoDZSFMWVutywCp7sW0AY+X14nuJbIdk2QXorJMuGtfP4SX4H +S5M9LA+eXgGPZW70BMOXudPDE/GyZf4c1QfGH5oBHxS7+0a833a6+yW6J4T7 +wIreSlQpfN8eWeJxAW7FO+H5HnYI8S3EtfvVF6Nt7w8Ya7zRf5QRrzuM/20o +USt5LxY6MPHChQsRvN9DfQqst5ocMloM0nL2FMxe8CxDeg40vjZmltkelutx +JSafngY+DAXOTk8FLgofBq0qoAcj2rUUoeEWVtNa2EbI1N0HRDci8/rUeBvm +DzVODRhnxOwxBJi0Dsqw/qNM/pAaBYmVkOvMLxgMBgxBYmVPs9msPdTRrjyp +7Sez/UZ594JjjTVjCCKVUgCU5b0Hy7t6QYYUqZR2QvkSrIO0CNmVlW2Tws3q +wxZMWMIfUOAGfxTyN5zxl566O63jxCUkRFD+gb/WaFfpGglPOQJ4iMtIom6x +St3IEkZFEREgKshUGav26FIPJbrUU4kq8zAr0WW4f3S5hxLDAvbH8tl18MmA +VdhK36AtZRRwWHWDgY5nosND7WpQivutGfHdr0+cOmhzSEgIarPan4TuLURN +02y4gQshdTWh86B2HH8OY2VZ3j7Mz/i2f6wVLicsz12Qr8Tk9b85P28oognD +TIgyKxEFBG87fLJHMGQRyghGhR4SYYkDT40C/DYpFdxrTATX/BNsAuTXeTZM +skDdiy9GQ34PoxAkVh6ADIF5fv3zo02CiDWRqhJWc336sfTejyX50l4vGGA9 +BCb5OqgJMtbr+LrdABAD5Xk8uvnVyRGU4/EiINNjygcBmJNutWu5It9m0RAE +kClgkHFX/yomWSISRFQYc6Bqjyim7CGwdTJhiOdtrLOEIrNEUsqjBHIQVEQE +jZGDJqbck0Ayj+AyDyEwn6rzYcM8CPxkxlJW5ld44HrcpcLDjbYY8StXZy5x +uzpxVvfGoNBJhYGzpg5ZtGiR8ZcBMoVtwmY1dn5gq0hN+mlePaRmIJd9bpZN +Cc2F+xGa5wYYicrte3N+7mBAjBuGhNCRUdBFhAzAIDyP0KIQYvLwTsFqgwYg +LTUBtGwEMIlR0nWPCznyJHtYAWAnh0KQqZQuhOR6KBBvQWD+h9JCAsPXafXQ +HFhma3XBDT/hN7LdUTFIP7iK2ENybBd4CAYqZZeK5NMSr8tmoJodanjVBTas +UeaR+C4F7piDmFFgmVTSrEAkYYSpf6RO8xkYSlBaSvGPji7VgILJoxTzU3SZ +p5o8lJgKD8IKQAJgQkCowH0QJrGwTY35FfB5uacBCnwAsSs87XErvHCJa3AJ +h8dtkhK33ANr9MmNSpsdvsrWqYdk9S+HTnK7M3PWjMSUlMXYXtMPUHUGsRfZ +pvF8bJa65nijwNqzZ8+w5/rLrwwYZ7jiH28xKKFw56UrUTl9b87LGQyogydE +pQTgsylhuRSUroCkiD54Su4MeJKdAw6DfWJgVLMZfy6qUBrUFKYXS8FK24wd +cpnmbgoRzFjQ99X01+H7IgeuemzXMSmpuGxJgTvb1cQ8ZoE7fAX9phss+S4A +MtklaIgrd52Vcec705fovO4yu0Sy1QA98jeiaj454DQrqiaqEi0oI0mYjEis +MCOVUTbikoV5SSbkzSd0ebAsBJgwMhjZ45Z7KbErGIyMWIP94+Bz3EqAXqUX +LEEsoIKIY6vok8jWQQnrVnribnA6LD1wHdbYYVbA5xXaZ9jXi6/3fBdwcH56 +gscbY/36Yg+V7ZcByYZ3aDh0uDriO9JldLcNmmh8c8p8iz04Cwg9N9smKZgj +jEpotg1Q+cLVqJx+iFPEJS41gKqrcvGxUWlHwAJwKZVAYK50w6zGUqc9LB+c +CZWYbdyxBvgkNEhYQRS78MuwJZLRxOxp4clTB0ECCYemBkuu1hyasgpbNYwM +8QxdHRDqpqUzSm/qZgY2lz4WuJAuqjszf0k2y6DhEa8L5ZJJpk42yWhFUUFy +ifaKGexovWZycHJcRpcxXMoupTQwULpyGaY/gcApYoojMMJRCTeVHkr8Sg97 +/EpPUYmvhCwZX4nEhyrW7PGrvLCOS9wsYgW+mlCJH2kVhklJqGTfh1vP1ne9 +GLnMU4H2WPHgyabpg0b0dJs9e7Y6QaMzPLIFzZjBHjfsVFLxiJa/0sNHbBkV +aLowMw2wNjvTJlgUgKYSnO2KuWz5cXz2ZACrG35GDGbbzCyj2gmcLBCquYha +hkcb4dHG8QgCr1DJMJrvZufrRfyA2KNHnu9uD2dYZWmJpVsNqCYVaYQ+dzUI +K7An678o0JKnCzbPYIzJqpuGbnc1kXJ08/4P8g+Yc1krjto0MmvZEMgiGdiw +tUMtOzTyka62uMJbeUx+DXr5RXdGAkyOnMQWjom6Op+JIjwLl4CyTEefViLg +Kj0YqGQOIgDcKogqWJ2AqxUEUwJugkio8pLsCVVdcXVVV7suDLgCLjthVVes +wbd4sM8ifhDkX8cW91vX/Xm5l09vqzxlyhQ+7I/ddDi3heYC8TbmRI7F4uJi +7AmlwevhrMltGD169GBojaVBM1sZ4mu8NG2BVZmdDkiZnYHFUgDOnEx8LnOy +AG5ZvghFeFZYyhoUeVDiFJWQHJ4e0WXZyWERDq0qKu1hKjpzbXau8WzJUicq +vQ0+5aMS5nNRVG0ZLiUVK7gqn+HHTLtKLm9fYGN5i/DjpuIM65gS3UyUwGSt +G4OLv5s9wmX2IU/ZCUwlvPEPx48sBQPHgrUMBYOGHDW0NiFYAZ62Opi5eRUk +s/Z5Faq0Qk4BdJFzk1FHXZCCAyGSElgQiDwIHPB5lacrqjztCdVeMuGKAGRV +EqoBMKu76pd2jES2VHhdxAr8ZbpVQB0oJfwo0sHka4mV3e9E5nW/OnlO93ho +jXX95fw2gW3CERkcIaJpFBxuqLflPQcZTo4ONF+eGktQU2alY55LR5hAlVZR +ZNBSIChC6z8u0xfxqMJRBSVC0T4HQWkPJmuPuZIDEtbNRcEmWEJ2ZDiUEaGE +Qx6UICERhDL1RvSRiofmcSNqwFUmBKQRUSbyRkE+9c7m61oN+RruaFcEqZ25 +NibJ5BNllErKXtiFyKGnwZD3TBEMMX8xPyeriU1tbDLoSQTFaBbw12IJwHPB +UaAG5zOdEQYEH2tESKie9vnM+cMnXmJiYwkOfdkKDzJnlNwolYkIPwSGJxZe +CCAvRCbHWSLDmogfJPwkKQtWd4XTLqjpijV1ace1ItZErBppL4ud9mBhT1zd +rXVhVc8PFq7qc2lScNec4ZM9vV4Y1U2datIZ/NhQLo2S4LAmDj7yMR8jyau7 +t9gyIsCkzEi2KUFLAH6p8EBnpSEuCI1pNnXJUGnsiMp0G0MigRaA6clWL6Ww +z9EvM2GZyQDKQWrnQq4uBTKccGcAoQhQlhVhO7VVCa1Ge4hLy/XZU8QKACNU +vznXRoB1ZVA1SzKEgnyFU1YtsDEHqCIT8WfnvYQmJqjPQlLs2LolbZV4yXvP +eIs3soTBk/V4ECgNLlACCDkYVSs3r0OrAvIf2LRYbBYwfZUwDcoa+OASKPlV +YWCLFsDHM1ViTVcTggsMCVTtC12Ba1l9TVfBpiyAEkC5pht87gZLb+AO1AQz +7EOfbySt7vnbpKoBv5q1uNuhbr0M1tGT+0nx8fHev4w7NnNLslVUVODgF818 +GErrTL09upn9er1g2txjoPzB0KmmS1PjrUpQqk2ZmYoPaOYSBB/UaR1fLyrg +/yQXDCUVdjxVYikjAu1zMniyzMBdl/LsiPDD/AifUKzd9LBjdS7cCD0SanWp +witE7yRxyRBJ7R+DhjILokxkOm3nSRBaMbQ0qDpdyJoXEaxnVm1w2wl0y7Tk +h3VZBV+RbsSFK7LIuusjmanj2kyhtmnVvGjSGhJaXy0uyzwBjJ4Cb/LGdGje +ohYDBkVwe9hc1TpA1ISIzQhqivKoJHnG1ga1LLhEM9PniXVZS5LwtBKqPRGn +LFh6hDsBqRGuALNhohqUBmswYwJEZYQrwZfBtJuIFVqNyPVWFq6FWOMtY8WA +NUTwGlrXnFTT/Tqg+FdJq/vfiirocWxSmDWk5yBT919G8BjXoDzOY8bhWz7g +7469x+t6DTYcHupnujx2jtk+YxEgdTFECsuiMzFSbHaKJRCpqL6IbIPCP2Oo +KIc/HveQEd8fxy71pbQ7i3wnSb4u5QpsnYUwPocH1Zdy7C+lOlkCUYV8ts4E +4CeJqkZEOyFcn3BDCNRqS0lNpKwnyqQB3aABnaRf6mBEyWDqmt00CEOjTmzI +xdBh6IlnVIHGn7DUN04AuDQoiBCmvkHMoNAeBfTCx3JPljWpfxgCPST2CXvC +k59f7oVtFXss9spQh58XYTaWSTl5SoZXbAWrTVoVsyTq6CwRyqt4VHmyRFvt +yUQeEu1qL1XkBRJ3EfFqJLyCwq/tijX9EtYuXEugXcsBC5FU6y3aoYA/Bkpl +EcZaChE/SFoNfD1Uryev6fn+4pq+rck1vW8kVfd8bVqCW+KAMeYeJpOpB8+7 +ZWVlOB0K0fsMoHFiHE7F7PLb3/6WT9AxFguC8KZ3H/nKqCCzPWChzT4dAD1j +MTzlwMX4RDVspyCOsZRVrNsxZi2xSQhvkdAsfTw/w1fh+ObYtqiY1ryDZi3Y +ZwQvT+QSS+DMNAgsi8sKNw9qxiavQGCGtDwnRw/wUAQ4a/nr3IKg+l3V2PKg +bgBjRzuLTpZa467RnnBtwNDM7EGRh7YML/JQm98sPSOQTQRgPrPi2aXgsgSs +zY2ohvBiLaQyQny5F5wrBiAMNXsMxLxyL0zFCG3WvQ0ZmnKyCbu2mVFlLoF1 +JPIWOWs5yVo6hsA2uYgVbB15oGHw4NYBMGzQMIwZFiG9FtGNWTcJ0brWG4jB +ILnOG24ylITZ5HXoHLCUlMXrvZXF6yjgTmBpbl68tvuvU1Y/37p4ba8LfNvJ +3oMNo6zuspiVlcVnrHb5/e9/jxOX+rB3Fsgy2EpLS3EyPs77s/LJW8MLCgry +aXYV+95gPi9wPk3QYeuS+HcGYvJmcxPVadw4xpwAm2g+EpuuZ+xhNpvHuHcz +zOg1xHigxyDpxoCxhnf9462iffpChOX0JGBFks0OATcVkr6Ivhk2BIJ7BqYQ +W0QqjXYo7UFqpNASOSMhaZBSqTaiCRLGyEuiTBqjho4eJq0PQnU05Ga4o6Hu +B0YEg9oVpoXLOWvtPNXWGFxJ3s6pIEhaatc7ZXWAh0yym54Zak8rmwJiZral +SAu1P8plmiM7DhEyMkjqHA9Xd6cgsg5PbK4Zyaog/oEH5FBigAPACxEJIbgR +HWKBJpwSOHTDMj32xTOHwvvfcekpMbsCmZ28M3U5edqh5aa6aFHL8GSi0Rsz +M0Jumj7JlOFNlNkXYqxhrgRyO/ADorYb7AikMCrJteBIFhNRkpEULAQrleaL +i9c/d3Xxuh63F6/tfWfx2j7vLF7vA9/rdm5WinuhT1+ZTbI2IFpx2t8QAHk0 +vgnhIoc3vhe6mc8X/h3EczhlDfZt4NMUcUL6Z3yCLb78tYuvxzmkb0PgLMzf +QAzIzMzks4rV2XJd+Qw6U1VVFeePdYIoiqlWT3FDjxfkA4MmGc6NnG68MSrI +qAQkWuwBCyxKwEKLfdpCiwiFVVSAOZIyA+hjRuogaTDsgbhE1iSzJYiNjMQR +UWuQHkxdPp6f7gtYgJoJOSK7fJKqI3aoG7Ei8066TBvZHgMTCSCApfO8rw6j +/Qzrsla6cM4Gzwo50E12XebXz3tiHa16lJdoA52ibpBT7RejXjGaDSHQdAjy +3awfjHy4gAbcE0cjmZEhaPMRTIS2nZtvhcaJ0MngeBJ1yJtd1kXtMFPbidVk +YSSyMAatjyKRdzQksm4IzXW73AsLEQEPRS34b4A6kID8CuTzZKYBCsKcL6F1 +iTAHPahj0E+pw08p68GgY9XywZLavrdTavvcSKntdTll3XO4qSVqmeeOEQHm +8d37m0yDBg0SerPxgGF8qn4CJwBL/EYPqOL7xDjtG9ccBC3BGXuMHrYCqK7n +kMfRhT/j+Bgs3+MT93D9anzBBjWCw5/PT0XfjxPB6XUHNgXaVgVWaY/FQ/wA +Wq9XRs4wnp8Sa77gF2u2Yyt2aoIFgpZ2/wQLUN4/0SIiM+BGAzfsnBsKdixP +X4BTT2YsQJ8CLGH0YMqShJicwTwYBuAAiCIxZUFOqG7s/WFTTTfHz7UgQ8zI +ELUlMTNN57TSYRsaK5PLWC3VDJYyG0zVbFIPMlP6xgCyhnyUro+adQKKfETv +Z+zRRi7y1UE0NvjroZ9/VMQHLNQpJK7OkqJORmYNXAt4C1UblNX6S6i7GLtK +llPvMTZacTBWpEF+iYb9ef7nA6uS1kzFEQokDGpBJQ5odGSJh6utupq3SVlb +tYY5fdIBiQwSVUkMUADIHiWptl0ibpDn0VI/sGAD5wR8EqmUkBS0PmUj+iao +CYYLUH60pLbf50tqB1yA9XbcJtIe0tuzlrinevWQjMOHD+cJ2ojvsvXVzTLH +dsDXOEebgboG6JHS8V0n0znYpVj3Gssfs9mb1F/p/BVOvN4H36VPjAzq7HF1 +jjHOcmCvQ4lDcWqbdULX7oYgMFMJQJZtPv2lA90Hytf7jzb86vlxBiAMkAUj +ASgCFUir/sQfi8Yj9TNySSRG2ZSpicQt2tcf60x27P4oPQuQWnp6TV+AwJ6h +0ktdLiKCgXdzR059ErNk8s3JYV3v+84MfhybWPgkJXzmk+xZg34Km9T9P4On +ef9lzGi3zyYFuL03Yprp1qRIH0G8OjnSAo04YqGrp4p6qcROGu0G3nf6M/oB +9ebwtgxsfmYESWWi/LOBdr1dE4mERj0JeQenm2uehY576iQjidMwssP8HNYE +jyrycJm0Et6fzgalmXSx+X4oYTKf3xfjmhSBTKxAO0gqtYIHa5TwWQ+8y6hD +FzrgXSdPQDjPDs1rapUYSJMsLs/l8lskQ0kuKYILBhEirokoP5KqPcCuJRjI +H16mbvRWUjd54xIuHmqC3Jy6oXtral2vj1LX92tO3dhdotXS+ZgSr0O+kVZf +SZLUZsOzhJvYkXA4ABn/DOEOZrOX8NWvINFGw9e+1BEOXznY1DnhovAdH5xd +vn37dv7Sr2zt0aNHIHiz+V26dEmxuIniFppd3zDM39gI8daIacaboFdXx84x +2UGzRMUvDgRKmRpnwZriF4+fsLTaoVT8dFT073zJGGlWVzFGEiutwEQrMTGA +9G8B6B/p3vSFVlQ8hfSO2lSodTT88F/T507+0TcoyplSuMe5pGifM2PZS87a +gkxBdDblThY8Hm9MGPWkOmbY08ygAf8InNj//vCxQ/5rxKyoP44ImvLH4YGT +Px0W0PsDkMPbI2eYLuLpeUtK1JpQv0xAIxFQ0vrDtO4C0cUzNk8gH7WYWBee +z5tFKHP2cG3+h8EeUdihE1edeK3vt5XVafCq0rFmDxufsumHBfRiR0OlfJKH +2tphsucal8I5R6RrnupkDlE/TsAHTrEnltROr3AQvJGj9r5Sg8fAXB9onMSs +H7o+A+uhUh0fd3siVzZ9Q0dW1Y65P2KhSMomoYYhA4mFosrITZyLm1QumpXU +zXzdZoq21A2930+t64v8bGHc3Aw72+Ggrwcuck8YOM7c3WQyDWQNlmfpaVqx +YsVHwK3n+Ut4zVCfgy9oMYOHL0Y2ctrh24B/wPd5ampq3oXlBN5HfBzfP4R9 +VL/IRjYkfB8b310X33jjDf7LA+7V3C9+CBL4UZ+h8sVxwaa3/eZbz+MkKwyo +AwmtREJY2pGWRE7JzhjKNtBG2AAl24oMRf4i8ZiKAr5VVooon4IPiKUVRZKE +MYCLpb/Lh4LvtDDvucB2dWKI5cfhfaSn8xbmOdPKjjozyo8502GZXnbEmV56 +yFm7LB+omOcreDtP5PlizVmfM8l5PHvy42Whwx5NmTT++2GBix3Ts/f8bXrW +y3f9lmx8OHha3Pf9Jwbf7T9+8ud9Rhg+7zvSoO/zwyXTRol38nE+qkqo9u8F +s0FAXTeeWeu34NS0AzWRnipNRW2Ez03fitOGlyNcs2iYC4UspO+ki+z48gO2 +2WjkTh21U8M1OVDS6BlLY8lQymzyKeuZW6kL1XXS7Bg2zYo30UStQw4pS9Qk +OrKhERcXBZl7za7AxK7caq71Zr0OREje8ILSqO95UBaj7WTNMXKdREbyk1wO +7Us2anQTiFsifjTSZ8M7qZt8Pk9bN/BK6sYednUvIOpmH0H6YPhU8yiLmyzi +ixv8/VP82YUR6kxD/kLfYuDRdf7uN76JI7/88su8O8MmQf06cOsorEdZnMll +En8R5W+8C+MmEq2urk7lH3/fsy806/Cnr3S/1WIeBkbU16ePcWn3gdL+HoOk +6/3HyL8aMM6gttNk5BETQ4NCwseoxoNzkYSScZTvGWchLmr8tBIfRY2VVu5t +ibOckBI7IaqmN/O3iZqHZfRcYLnkG2N+f/ps0/2wyW7O2NQ1T7JKdzizVp50 +Zq484Vy6AqPRuXR5gzOr4ohzY3GOsynfT5ChfFFEWgqWx7uXjHsUN9v3h+Co +pG9nJi2/N3XJZkdg3gGIg44ZuQcg9gvi98NmpgiWvw0NDPtq6LQJvxs5a8xt +35iB7b7zBt54Mabb1RejLc3+0KBFVrJpd5Kem4JGzJ/Na3L1s3BiSroh0WfZ +KLKXJOza4LqqlD+bNx7JO1CepWG0bgCd3hrg0yB1I5YqHVElcehS4jT0pBFL +XeMPJZJ3BK5SJVLu4EUTa9iApOiiocm+UGv2dcVeEc2Lah7UhFSjLhBIW2oD +j1tQkjviGzTsYGlAplkY0+xQXkrd1P1G2sZeH6Zt6AfRH/681C0+KJObfd6a +V+61YdhUs/oesl7oVBOJEz5w/QJ6QZgPDpWXl8fC58moYLynHDsX8W1u/Fk4 +taecv739AmxC8tHbWGyqu8nSs2fPaI9uEr5B2giG6/zoIGPzxHATohkuTlUg +F/SpZqJmHrlMhbf+BGr6icQ0Wc8xrEucm/HIOE4nhcSO+lqsTP5gG3efWrtw +qtZetKru9CZc4VeLZxvvVUZ5/JS6cKEzu+r0k+zyl2B5FuKM6MxadVowODNX +nXJmVZ505q487qwrK3KeLJwiSM6mgilCbySZ84Qu9qZNcK5JGP9T9vygv08P +Sbznn7rNMavwmGNWwVHHzHyMw46g/EOOwPyDdwOW7nwwKWHVg4nxlf89MS7/ +LxNiM74eF5UA7tX3jyNm+n46fEbPD4ZPM30wfLpJ1Ma3Ou2N6cAwVwtQ1k1t +ccOJqGzCqaupJ2uU4s07ejVH1vVIRnUgkkvP6AULkjKzfqon9Thim04dN9Va +cpK+w5EmpXgSk7wYi1hXiqR1MlIfIxxb6zxRWQR1Xaci8Qiets5Jan0lJF0i +a6Pp7SLyZTOyagtu3eKDBQjilbTNPZFS7ekb+1xN29TzQtoWbyUN90nb6iMp +6VuBYq1TY90SB44zuXfr1q1TirGZpKrO4ew+6nasr6/nNJELwfx93G+k4fKk +CPBbC2ysa4/1R0ynFhK1kjDvC6yZJGP/BukCWjcIIo6qKBzaJo1WSAsrfMmP +k4O12qwiIw6Rw+4ijNaxInR2VBdZBa9fjfI1/veKCLPj5FLro+jwaGfemtch +3nySu3wPLF9z5tW85sxd/SrEOWdu9TlnTvUrzhzGJGddeTkwpnAqylKhn/NE +AcYUYMwU0dmY/6JgdDbmveg8lvuiMzN07A++oUscs4vqHXOKG0WoNAhujtnL +6h2zlh2HYFwKKjgCPDpMChaYuw8UbK9jRs7uv03Pfvlv07JfFn/oPylYkL/o +P8r0eb9Rhg9HBJjsIVlsDFimBpxR4a5QC949aeIcYW9BFuus37Mzo000eUZr +iOkaYygvpmcnQqtTVbXGV5XWCU98oLkF3N2Rw6vWGl6uzndJHXnl6pKEA6xU +GqmXg3coUgA/7KAwrAUm27X+dsYVSWfvGD2Y5Ahk6oxECtiw1Qfxz+CPdICb +mrZ+4HvpG/tdSNvqbYdAgqBFhFJJ3+aDAZeEpfTm2CCLeda8YSK6ryGu10wO +cwOozkNgzTL69Sn1RyL5W5wGm7e393jv3sYVvYcZrg2aaHw3YAENr9KQEPWF +s+EiNvoKuNc69RZSnwION6EquLiFUMfud5l5Ld6n6M8FiVpMemZo3feSJlpI +SW0fK7JJZR5JTyff5+zysfvFmq+9GGr64xw/4/1diea7x1Mtj6LmznUWrr/g +LFxndxbWKk/yVux3FtSeh3jbmV/7ljN/7ZvOPIw1bzDS1bzuLFh92rmrPFN0 +nlzmj6RaNhXpRXGi0E9EhglDgVpTIPxouWvJhEdJc30fhiTk3Z+Z9bJjbukp +x9yyk47gUowTjjklJ5BwEA2O2cX1wLjjEMccMwtBtQqBbQWHHTMxgHUz8w45 +gvIO3vNL2fj98Flp3w6fmfT18MCAr4bPmPT7MXPG3vaLHwQx8MbU+G5X/eMs +l2Yusboolu9m7KTzX/zZaLCLbpIqSOX6IbIYTZDYC3n08p46/UFWexhVZaIZ +DzR5BzsVtR59TxfleN+G2JFwYBfU0a6Fa/Wd+ahH3vakdbx3kewcaZHKM61R +tYH3MaJOuXo3GN82I31BmAwu0rlz0nm7Yhsyy/siEPFa+uaebemb+vwKCKiu +t0PAGbA02jPYOuRfS2Sh17oR/uYeFotl+C+LFf9ZJHzrAX/JZCjykv+2S1d3 +d/cVvYcaXh8XbL4YAOrDZ6fJOLgk0twfNhNInelA8x5QzRZpg1c0RQInS7Ce +dwtnoo36AwN4v2BAokVlIbWFiErYjWg1diJL9AnuE9Q/mTTF8NeScJOjKcN6 +93ia5YfSBf7OTGgTFW+4BHHRWbTh4pOCykPOorp3ncvq3hFE57L1FwQTI9s6 +xUW0tW85K1Yfcx4qi4V9ThYFgCY1FQVA+DtPLIMohCjAmAqSVTBVsEDp52yA +2LZk8j/z42b+PSgy5V5g9n5HaMU5iLOOkIqzgugIKT8tuAPTGNvmljU55iDb +ShuBZYxtc4owQO6QcegVgXGgcfBd4Jtguzstc9eDyYlV6BX/e3J8wV8mxS39 +j3ERUX8cOdv3j6Nm+344JsjyAURLYLKba1zNNTVUYD+3QT/goES7xtDUaZ+i +wud8uoRMENmbPVq7aX4FfzWW2kuiRihqKnV45ULrrtfmcYraJDic6VajGzlm +vBJYq8nYgVvYlch9nlHttthA3s6u9RP+rG+CdQ9u9pa5t9tKn9HGMQWD8JZI +mUyMN1t9WtM397mTsanPjYwtvZoztvZQ0rfjl2CrpFV93gpa5B4xYqrVA/6N ++GUi8V86w0HnQPU3x/gv9KLr+xDUi+bRq1PaaE6PNt0TSpoIRBMdZFXgkrX5 +EWwQmEaHRWUaK6xw13g/HpnEALXzQLV6HXlj/Ll4dWySCdLVsXPMf5k0SnY0 +LQXRcpzOtAqmB9uTfB4tya51lmy6TFG66ZKzZPOlJ4VVh4ErxZsuQbHxkmB2 +Fm28BITDuOhchrH+XVK2ZevOOw+XxwKviqeLQKlpIFBF06ARdWJZgLMRozBA +QFoFADMb8v2dDXn+4AanPloS5vcgIG27I6zyTUfYytfhisJWvCYYHaErXnWE +Ln8VKHYO4hWkmmNu+RnGNglYdpqYNrf0BHwluKRR6AX6xtmG2lbEtG3WMmQa +tsgOgJ7tB13b5wjK3QOOcvd3I+em/fD85LnfPj9p2p+eH9ft8wFjjNf9E2zE +qg69groeQQMfEIsu03XSU58fzeDXdEnXWnKNeOHEC/1gF2pSDZ94gTNJa/h7 +IWzCkavPD6mUxKkDcqT2+emcoPCsBSQq1em6+VhjSbOALkmiZpLQFbmE7o9Y +pC251LAlGj/vX2Vs6v/7jA0Dr6Vv6WUnGdrO5Wi7NzeFJrZuhxo+9tStz50b +N9uKP7ekTsXrjF66XzfU3tLjJtHXw1veNWCc4TzqE84IZbPgcMKzgU195lOi +Z7GlILL3UxgbZ/Fp1/rp19qcvJRnpvGp8/t0CofMZEYT/SdK2zRV2hKtEnlN +N+41eXe7bnSMDGRHo6n1CwrS7YDZpv8sZPIGuCY6/rg0dqYzH3xg2ebLFKVb +MJqfLKtGOpZuBjoCOyUkJnCyGDmpBnByxbpTzqNl851NxTM4HYtnyEDH6UJX +JCXQEaJwGihbgLOhMACXj1fHj/0pIizi29CszXfnlp91RFQpjvCqtx1hVW85 +wlYBNSvfAHpivMYpanGEAT2ZEkLAd0gRy09DgBKWoxKeRG4CQz2QocDPBkdw +MTb6jkMcA0U8Chw9AnEYVPEQ8PQgeM8D306YV/r9iNmpEEvEr0bOnCxIn02M +GH172sLBrdOS+gritek4kv9uaJ47e6eh3FN7U1/XPHN1xXd8VVX82Ws0zCIK +9LIWgEWlofpCgkZHFDcuajohE1Q6Juu64DsoGuux4GNdRv1Ylza+BeskXZ8F +NbcYA1mTC/404CBcADCtJWNLz+sgZh8BEy9nbO2uNsUUjY07iIk7vLHwwS/t +eE7J2PHc+fnLu+31m+/WB3+pjf8mDrbREtSXIDgN+c+ejuYvQOAPJ3IamtN8 ++sqnX4y2vIN0o8EY1+sz7B3Duer7NvRmIn8hYSmbyQr5Cb5npwl8/P0yO3// +R51PscTGZv51Zj1Fsp46yVSJCXdnOnWuaEH6CbtOczlQahNaO/YbanO2eLfJ +5Ynh5i9DAoyOuljz3fo0C9FRdJyCUvohL2Lg48zKRmf59stAQiih2HZZkJ8U +rT7iLNt6maJ0K6wGuoLylQJxS1gIxFdoxZWArpZuete5qXq9s6lkpgTFDMFA +TD2hRtEM4iqIJZRewNbpzgZgbcMyDKgDc9ckTflpcVzUQ9/YlY6oNe86omow +LjgiMVbbHRGrgb3V54HB50VH+Kq3BW9HOOmrSuLXkchcY4G8y1/hdvaMRuAQ +IHBIOQhs2QmIRhBaIG8pkLekHu4I0Be7bIjAh0FkMQ7dm5ax9YHvwqq7vgvK +//JiYuY3vomZfx4fEfKn0cFTfj82eIT4wfg5kPGag5e6aS8WydovFfAu+vgO +b/kadJbTS23EsVkhOoU08IZbN3UWFs2/EvXWUus+3KBOo5JdesiIKLvU0ERq +iL6SeUumflwFGQsF+Xr65l4fZGzq15qxpc/1jK29iHJIwx0+qvARDX2weE5C +BgrS2/PKuiYP97N2N5vN6vtyWbo5IfzVYfWHj3sVFBTgj4TTL2xLVMqBcXFx +u3oOMrw7O9Udf4SIfo5I7e1SJwqxl3js7L0eV8cyDbHiS5iZ9AZFBk0PZO9h +6GlJXGQvhAbRzEJ8v4nPPkRKknmV1BlVancMMQ5KiciHpOugk/YA5l+vTw01 +3U2ZZrjbmG52nMm0SsQv+f72eLMzKWetc/muy87lOy9Lzoqdl8Eslu+8/KRo +zREkHEUZLrfBchvSCjgnMdKVAOnMSDPnvpXpyCtiVVNxoI5dgSJWgFnFM4Cg +jcC0BhZwJCwtznr4fBxYdmzZ9EdhswLvobbFrGtxxKxthrjsiF5zCeAfveai +YHDEAOuia94B5kGsvgCsuwDbIqoV0PGI6reAfRCr3kS9rHxd6EuUC1v5KosV +50A/Ge1CK05D/JxywWUNsGzQqBdcCrpZArpZfBS087BjTuFB0MwDEPscs/L2 +gLfd892o4NQfBkye+18DJw4TP4fmiGBg7z6pwWc/MnZJrgnw1Z408oxuE9+N +5731nc4IZlSTVNVb6zKhRrWvvo7657XQDKc662qz1i+idomYNb/5TJcI95dI +Ii6APpcztnX/9dJNA9qAeHZV4RjLBKKZspQFnABL2Z6x87kbgYs9og1GUdz2 +cu24f807/Pk4VRb5aFn+yNHD3h4wwuudSbNBc6/OiO8hyL8NSuz+wfSErq3B +ad2uReT7iFBA+rgcnu9lD8t10yI0x02hoJfq6IcbkZH0Bmow00mSSRl9LDyX +2TiTN82mzutNRRPL9dHFxcW8m5QMq/gsGxeq4mhhk69c0eIfZf10TpDpu1Vh +RsfZTAuSkFtP693j6e4/ZSbPB9pdcK58+bJzBcZLEMhKxswnxWuOEDslZ/mO +y4JVo2XZNh5bm1UxdK7aeNp5vCISCBnI1A6ahCWBqtoJGheBp1Djn5CL7s76 +ZTMgAp0HcgKcefP8f4hJLnwQXnz8LnJxft11x/z11xzz12FcdcyvbXHMW9sC +XJu39rIwHrh6CeKiI3otcvRd4mhkjR3UUYE4D/E2cTSi+k3gKcSq10EiQRYr +VY4CP1e8AgH8XI5xhnGUgvE0pPwERCPnaD3jKPAzGPgZXHyEcbToEEjkQfC3 +B78fFZwGkXpv1Jz5X40J9v1yfNjED6YvGnY7aMng1plL+l6bnWq7hg+dz9Mn +L8rmgdj5u9zoPwXdOLS+R4Xe0VLngRh0PZW8R6XjqJkg6edWCTrtk1nrj+sd +hKjRjxlN40UwnddA8D5aurn/nYwtfd9N3/4cY2AGK0DsgHeikgnkMzIy7iRC +nl9U63MicJHHCFEUOQnNK1euxCn3+J+eqYMFnZGQdbNYfSwWC76JixHWf6Q5 +edSL3dcOm9y1Yegkj5tjpnt8MX6Wx6+nxXUTP4zK7yXIH0Xl9YRaz7bIvOfs +YfjLfKG5+EOZ6kuuITmcj8y4GpRg/pJVcKb2Vjn7VQTem8Nf4tX15vyvTnVR +h6nH6FRvT5ll/iY/1HRv3yJQvyyLgXgnPaxKGOTMW33YWbm3GUhRuQfItXI3 +uEsk35OS2iNExOUvwWpgoeis2IXbKnY1Oyt2gB7uaMZAV9oMq8u2Nzvr1u9y +NpTNdTaVEu8CQUmJd6CLajSWEN+cDRrnmP7VFwVqsTvT71H5otk/hCxc5ojd +eMMRt+kWcCxu4y3Qv7iNNx1xG2Bd3Q1HLCxj667DtvnrrwoycBL4uK7ZMa8W +dfOSiGSEJmMM0nHNO0DJCxB2oKUC0gl0rOZ0XI1yGV71hmCGEui4CuhYCXSs +BDquBDquPAuUBCouPy0CH09C2gqtACZWEBOxL7YMxxLnltUDI48DI4GNpchG +YGLx4buz8vfcn7p47YMpSavuTkkq/4vfoqy/+CVliX8aF+oHyXxC6KAPJ4VZ +MWjCB1IOOabvzXQZzc7afQY+warOu4PJ3MSnfOhNpqgOPeMxNLHT+vlJ6VrS +t/b4EFh2G1h2PWNbL+YnOad0QodMw6WRKCcrmUC3jC3P1Y6fbRvYtYeZ/x4I +vtGCv59e9C+oxv4rKJuI/yNBZGSkHBk3wxCZ6BcgG8T1otTlfPfn5S8GjDHe +9JtnvRpZ4P27mHxolH8ek99P/Dw6r58gtUbk+oATVdUOpy+YFLWhqE5zp7d6 +M7W3fTP4FHrZrn9VeBYNRKidNa63kTUPylqD//niWMP9DfNM2J2ZBS0M5BXU +rBi0jsvbk8jFZc6q/cicyn1Aosq92E5buffyk9L1R4huIpaicwVUbZr0LecB +nGOMw+VOYN3OZufK7eed+1dl4Hzl0kDwn03IsdJAzjXQNKg34pLpm0RkM0AZ +iDVnPSwpigLhEMeXBYKaHisMfBQ4I/A+dmXGb2lzJEDgMn4zRivUW3EJLNx8 +S3BHRgIzbzIGbriOLHTEojKuvwLRAky8DEzEuATa+C5SUEA6viMMYlRcY6eI +WgNUrHkblPEtoOObEK8DJSGqXnNErHoVFBKi8pUONAyDBmPYipNAR+QgU8RQ +UMSQ8gZgInCw/Dhw8RhwkfOwBFSxGBSx6CAo435Y7gN13Cv+faBviGD4erBv +vy+G+Jo+GxNkuYS//rmATW10+Uw9ywDm1KjboPlMMpcGbXgApxBv9bZTC26b +t52rGS6x39Kesd1b5yntYDNRzz5YurmfXWu54eBAR4YxUZO0VZnkMpnQZcHn +bBY3ogq8KiW5i5RfkjLp33Ob7Hd93H27dOmS695Nern/KOPBIZNNTX7zwbjF +265OS3RrDcvy+Sg6vxeoG0QuRs/3I3J7COK18JxugnwtLLsbRFeMi3OzPdiP +lUHrj/WTUrtPxzlN2Tq8ut/BbrosZ+uUEMs3KTONd09kmDnfrHq+sci03j2W +ankUGxPqrD7Y7Kw6eNlZdQD0qerAZcHoXHUAfOF+LZ6U1R1xriJCclYCKVEA +kYZG5/KXmzkFgXqwXLX9DefxFdESMU7Ssw19JJRGYluDPpiqiShvEpHN6Dxe +FPiofOG076MyaxyJW285ErcB1ba2SY6EbW2QLuK3tTvit7ZigJwB51DwttxC +0jniN4HwbQLh23gDxXDDNdgjtu4qBKfc+mYReQdmtPai4EWqB4SDsDtiiG7n +Qf3OE92iat4EBQS6rX6DUw7oVoV0Owe0e8URvvIstB9XnoG7HLbilMY2ClC9 +0IpG8qDIuLnlxDgRKQdaO7f0iGNuyWEg3aG7QXm7vhsXlfdwdEjaN2NDg78a +Fzrlq/GhLwrineDMYeI1/K1gQ3NMiRdrytX9rK/Erg1p6/pKJGKZNxs52Oaj +9VeqbOMsUyDsGTu8kWLXMrb0wv4SFLXmjG091I4SVcyAs5lIMqAS8JLItJNI +djYk0zNs0Hiz+lOm/1c2sf+nyw3fkxkDljEULGPcgDGm9aBfrw2dYnpv3GzL +JexHCc/3eCc8z+t6RJ7PdZAv8Xp4ro9gg9L7dnjOcx9G5PT4MCK7+4fh2T0+ +DM/qcSMksxuziuorJZpNtFC7TWcVkUiX/WKtv54aYPprbbz5biMR52y2JlSZ +VuYBqTR+X5Yw0lm8+YRz9eFmimqMQ0Ce6kPACaCSID0p23AEuYRMAt3A0uCs +BDYBgbRYuY/0DPwk0qkZKYVLAeUN163beszZVBZINBKRRiJyyIAUkpE12CWC +lClGtlC/CPjB47DcsnTGP2Jj4+9FVb0mORZsbwNmIHkSt7cxElG0AyeQSQYk +lcokHmgh47fcQgW7KSKThL7ApesQ1yAYj2LrWkDGmiEuAZUw3gU2YbwDcQG4 +dIHxae15xqc1bwGngEs1bwCfXgcuvQacAi5VA5eQT1XnmHxVnkU6IadOCR7A +J+DRCs6n5Y3AJ1CuinrgE8ZxUDFQr7KjRKbg0kMPpiavfuCXvFr8S8DiHMH4 +tV/igj9NiJj6p4nhfp/6RvX6cEq07VZwurtIXR4dm1iiizISowzv2le773XC +hN0YUBraMrb0/iBjc1/sXlTpovYpamJk0ouRqlO0zCJxymZc2gVceum5M77h +tjG9BprpFet/k0vstzosXb788kuxuLhYWpwe27Wrt1tmF1FYB/HF82OMrb6R +VvX3TfE3e6HJJYAPzPNQcLSG94K0hmd7fxGV3eeLSIgIjKy+X0Rk9n13zlJ3 +ZJLMf9kLSNQyJcb617hpRkfTUgtxBgrm8LDbApTmTKY6iC092J7s48xZXuus +OdoCgK452iw5Vx/B4jDCHSj0pHzTUVzC1qqDzYBqpkuXmSAdaFaXEnIJzBxj +UTM6RFqugOX2unXIGOSLjO5O5JLTUPKM5LDPBuKPyXm8OJDzJ9B5dNkM59LI +yd9GF+92JO1AsUna2SY6FlJ14c52xiTglUjskohVC7YRu2AdlFi0CiYgWCvQ +q1VbIr1oCXKFFAN2xW++gfqFarWJs2tDiwj0aoYmVmwdEGv9RYh3iWDz1wG5 +1mJcgLCDTVxzXjACt97m3EKteoPz6jXs63wVNkcAtSKqQKoqz0CcBskCnVp5 +EocJmwRvRxjQKqyCUwuNIcpUGTeGZaBRpYdApw6ATu2Hhtr+B1MWrfz7wBdD +IOZ+PcSv3xfD/UxtM1PcVBJp/EndRgPVguQa/sK5USg1gkildCdjc+8vlm4c +eC1jaw+2jnXSy1rjqUPDyay3cKQ8wJjmhau72Yf7WaSsggVT/j3CsHlXtgmS +JJV16y3tGzTeVD8xzNLiH2drmbHQjf14MHAjjPgBketO7SU3wRPaS25sYC3b +9j6ozkfh2T0/Cs/q+VFYJsTSnh8GLvD+Tehcy/2iMMuDMzm2B2eyrfch7iI9 +iCRYWCH9nnH5sr/nJk5xLt/zBrBhzfFmwd255lizs0aLFrY8CrJztOVJBXCF +JOhIi0uGDqOkIINkZBDjDwumQkZnJVCIlIjHmpdfcR5ZlQjaUhZIKoMmTW0U +AXNkZAqojFrFmhoiJ099kYs8EI+rEif8EJ+27H5cDU4FWfRSO1JoV5sj6aU2 +XDJCAeoX7mxDVlHoKQb0WgCrFmxvRXJtR4MHdeSUGiJSChUMjGHCtltsuRXp +tOUG8C5+M4jVZqDTpqtAqRZH/MYrYAObIeD+IKsEm2N+3UXGLeQUitY6EKta +BQRLcUSjaK19C+j1JpDrDRxRqHkdvhMFxIoEwYqsBkZVvwIG8CwYQcaqMMYq +iCYgFs56AWJhJ0g9qGdoxTFoeB0Dbh2FOAy8Ooy8ejB1cfXD0WHpD0eHpn01 +McIPYsqvZqaOuROSO6w9LG/wDWi+X48s9GyOr/RC3cGe9Vtg0UBz+l3HuVJo +2zLYRA5aZoBVA7qYXC5NcnFlJ6nNS7DuSnSxV9HEEJtb165d1f+R5f9KGjZT +2IQ/boD/VU7I86PMyeDYdoO6tI+abr4yfaEbUxdJCcP/DgNZA5whdeF96wbs +zGvzCzf/NT3c9mDfYiuwww0E4gxss313Osvt4elsd4pTGFnu38I6JMj97Qlm +Z3rZWufa+mbn2uMoFGvqm4ktEpIFsAsUebJ88xFcAmBXH22GFjuoDNGkGqmi +1g+3OKswDgFNDrU4V6GDW3UQD1EJzNm4Y5+zsWwWa7+QkEjOBio47EWUDKrJ +WBPcnLuz/P+5LCXiu7BlOx3Ju9scyXvaYdnuWr7c5lgEwZdIDCwQ9wz8O9GN +JSEXdrS6YjtKxcLtrRLxQUY+EAsWAOwhkAm3gCacAY6ELTcERoN+HWmw6QpR +IXbTZVCYy0xa6t4laYld/44jdt0FoIIdqKCQZ4tZ+zbEW8y3rXkDCQD6ArEa +4A8Rtfoc0OAVR2QVTkY5A1QAYak8hb2DK5uEXkgBMG4NYNow6iGOEwtCKo4S +C0LLD98PzNz4wH/J6nv+Syr/Oi214JtpqTnf+Ccl/sfk6Knf+Eb7fT4tzvNj +/1jbdZzcla4h3QeHi9jAEe9OW7rT5a2yEPjZZLu4pVLjrVkpHiEjp9EcQvV/ +mTGuXbt25P+hy429y+jV5dNPPxVra2ul8uqsmC5dhMPu3uJv+o8yKvz/u8Lh +XlQL/L+wmGLkYLj/duA4w4ON802y45VsK/okbE2czbY5APcgA25okXDM6f6p +LNuPTdme/y96zrina+svi0/XHofMDWgXEe4yyQIh/cnyLQzjhHgTAd3irAZt +qD7STECv1kDerAH9YA32hEGmhxyP6b6hLNCIsJZZNj9ewsDM8rr0eEOK74/j +QlIci/e2wxViaYDytmMxIJqWe9uxDtsA4wBNQjkifzehXEaYixzmu9pY1geE +72rFGkQrxaIdmOYB65j/sboAYM9Qzu0UNWBUF3UTXNQNWDKYXxN8AOZXwUC1 +sNh4GeISwTu2jkF7PoYKbwyA9zyA9zye4WMA3jFrXgOIY7wqIrYBwZHVZwHd +Zxi6q05CooeohOReeQIw3ugIB3SHUdSDf8I49mN4+aGHYZDfQ8oPQRyE5skB +yPX7v50Ul//3QVNC7g6eMvHL4f7mLyCuzivDeUuuMRiOXle+3vWczNL122HZ +nuOfH8H6fXm67vLo0SP8PzRP/gvksh8NsyR26dKlsvvzhsMjp5lf8ZsH/iYJ +Rz49rs1ZYPvzgjkmxwlq4b6SYyWM6uGZzeAJCdpxKtvt29q4bs78tS8BjtY2 +YIoFcD4BqKohPgHICsbHUEI0P17D4ing9TFL0wThmuPNWMMlNI15sj6GzkaN +FhnhDLseXZWAkEXEauAtBeMOuIUv1Zd2sCQSrhAIzwjnjk5FxlU/JSdGPUio +PuJYsq9ddCzZj+YkZf9trDlS9tEn3JCyt11CgCPuAbqL9wCSF++GWjJhmgMb +C4TsIsD0op0U5G5aRZehGY+tBDI0ZGwoOMC3Y7cW5GwMAvV1hDQEAHrzFQ5q +sC2Qs+M2Ylx0xIFtia2DfF13AcBth7ytOObXnodggJ639k3HPAI0xusqqCF3 +nwNcvwJx1hFVfeZuRPXpBxFVp76LXNX0MJIQfQKQDS2BlRj1DNXLjyGq0cQc +EdwwZSOwv/VNKHk4NjzDMT4i9qtJUVO/gnT98ez0sXci8kdADL8WU9z1WkxJ +V+41LqbU+eyfOt9tMv44y7R/z2uwSXAmHFSc5NHNsAQ8xsdjRxvu5s813WtM +tzjO5Vgh7bxC5dkcKyKXcPtKtptIwDUQhAG8d4+n237MXxIMwLoALUeErgmh ++1gXT1dsPYK4JQRLT9bwkvBLsJURriKi1YBgBTeNCXfTSwec9ctDEJ/OE+WA +03JsdJahkW5gsMUl+wQ4pLwLGDU8C13ncTLf9WwbroPth4um/3N5Wsjfw5Lz +AFipBxCyB9qNhFsTIhWwy2OfbrkPfXTKXkjBgF6B4IvoxaVAOIbiZdyQ/FIr +GRIIwZWqybW3oTehnK0zKBI37K1oSagB3CqMAxCjF7lJkbgNgLztGoAZAoG8 +BYC8WQ/kSwzIG94FMAOQ1wOQ6+yQpQHI6wDI696GACDXIpjfeDhvzWvfQTyY +t+bVuzEA5GgAcjQCuZqADHEKUvUpSNFNkKIhKnVAxvSsMx+hFWQ87gVmbQLj +UXPff0m1IH4zPT1PMH41Ocb/6/FhfreG+o3ME/C/lu7SBe1xwL+HWPZ7vvQf +Yx6Y9YL07qU088WbmeZPzy00f39kgflBU4YF8SohXAm6Nqi5UZxG0KIRlhG6 +325NHfg4a80e57pGFP/GZiuB1v0JgJTZX4wGAGZDC5pgZ019yxNYPgWIPl1z +7PJTTLoAYYIxAVewOVcDkCnLatHi3FtXjJAlnOKyQUu18AnbfLQuiC3LmWkQ +KPsyAKtRxiGNEGZgJkCDq4At8qOI0KB7idsUR9qhdkfqIYAxVADQB9sZrB2p ++ykAUqmI71Sel9spL/MsvQ9NRuq+NsQ3ohtDIoTLDOF72tUQ0YxgAbhNJrP9 +MtoI8t6I7F0ssDVqJIz3I1Cj40b7sZCAzMCcCFm5A5i3NAOgMS4BqCE2ApA3 +vvt9fJ39x/i68wRmyszrz3NA86y89g2I18BVvwqZGYC85hw1LM8JVp6ZEcyn +wUmfIr9BgMbMTGAmryGi0YBMHIZGuuzIZ/7pp5XAghvK9Pwbl32TT/2636RF +n/caGX2hW/8ptYBh/JmboZB2+f931+Xrr78uUX/zqiOGh4IHnqS+98neAJDd +vby8Zs8Hc1s2zXhRSTFLyu0ci+CptOdYb11ItXx2bpHlq1PJlr+eSbfcOwmw +Rgyf4VjGrHuGYRpNwz8XJIQ51zVhBl13AjW99kQzYhoDPkEpsZT8ZMW2I4Rq +V7SoKGeOg9wwemDI2RCYnwURQS4+qSHjASVEMwXg/fGGfSecDRVzZISzhAiW +eTquR1Dz5Gwk/EoqktVPbAus218Q4CxI8P82oWrf3eQ9lxzpRwG86UcQlWlH +2h1ph9sRzwjlQ2iSAdaONF0gzA1a9hZZjUE8dX8bhzjmWai5/IdABoQSOnpv +WXXgLI/TklL3bvxmMk/nvI35Ek/nIiZxNN07Xc1Kyt47blH2vil4QHnjbuK2 +6/cTt119kLjtysPELc33Era26IAOnnoTZGwMBDtk7tgNF7AjRcGpJOtZwqao +fRNneL0h9AQT8hq5ag51ADpAvAYsNcA8EmFedfIu2Om/zC4+9Ztp2W8os0o/ +gHhfmVnynjKz6LYSVNSuBC1rVYIKbwHGb9mn515tGxW+8cPBM4pfH+CbJu7u +NSpaMIb2GTsvtM/omElu3s+PkmV5kMFgMA4ZMoT/rnqpPm2P7wB5/GVe/NEN +nUuW+vgPsmxZPF5uORhjEgjvIsAdQd+WY4GwUrTmWG+8k2q5fT7N+seTyda7 +9cnW+ycybAT20wD6UzluD4uCzY/LdjU515/ETor1TTSg09SM8CcKiEgBwPIJ +aNQRCRjyGwn1gqgSAxnQSAxgnwD3DdijwRK+FsiEx7hkoG+h5c6ttfKTxvIg +QX7SUK7lbwwjYt6ggTwIIE7BII8eJUgwMB4A9tdmBP49PS/37uK9OLV26XFE +YsbxdkfGMR5HAa5ACEBZ2tF2rCEzWBzGhA7skHi6J45wRhArZM6FA7e5Dqjp +3sC5QCRZsk/1NXg8yPrUENU0wJGyh1kbiVn0xejOk19iXSywK3j0+4t23fou +aefNBxiLdt7EPhWgwGQobyINwM5cB/uCcQ0y/hXI+BBbkAQA/i2Q5TcD8De9 +ywnwDlgXZlviwLbEQpaPdTEArAt477WvQ4D3XvPqf4ZUvH59TvltJWTlb5W5 +K3+jBK/4tRK8/FMluOJjZU45xofK7LIPCf6zEP7Fd4AC7YwChUiBm9cnxB+8 +PiFu/7lxMS+dGBO9s35ESO3evhMW7Oo1MjLH1m0gtu9iIEb8S9zn6jexl5JN +XX7/2Uf+Yhfhk7wpBjsAHpEPYSXwywh+Kq3KrWyLcjPbiiFBYRMM772ebP3+ +QKLlQUMaMeBxaGwC4LfuJKAbwG8g7Fv02KcA9D+t2LiHhKC2kT4zIcDyRAtD +fWMLWHUEvJkAvwZ1oF6NFo0ER6oT0KwEMcciPYXqU0D80/rymYIIZZBgIQbU +UwSyKONLXEcMQKuCHJD1IoBBFBE5W/bkBTjjwqY6Mo/jDLvM+ttgHzKBDJn1 +7Y6lGFg/TkvJsfQYQBvoAbhcepSIQjxhbAH9OHpbx5L0Q8iG9MO3gSpaADMO +3gE3dPC2YAapuK23Suwzd/wu4QCuyNz67yFjtLvtweLdt35c/PKNb5NfvuXy +RDI5fRPrmYe268Kdaq8jsuEGsoG6X64Jg3WMaIa4zL3PRdX7gBy8g5LAvE/d ++b/OLDh/NWTFZ0p4zZ8h/qSEV/9BCavC+FwJXQVR+XslFNgQAmyYC2yYS2z4 +RJlT8StldjlE2UfKbBSEEow7xIigZUwQApe1iqAINwU3JTD/+jv+mcoXIAUY +r3j2Ggu+p8s8CPF1+3XxNeVal8st17pcv369y+eff87fX+xy7969Lj/99BOS +RH2nqjNysN/1lJ/v09W0Onm8fHV/tEmTBKIDSERrNpKCCCGIWBqJFsZbSort +vwrm9PppzeE3H9WdbHkMXEBSGEgRJGQF1lzKIMhPKzYBH2A9DxCBJkaHZkYJ +kg2oYaeLyz851/AGApqiRs4S0hAsbax9wJmzfdcOZ8Py2UwHKlATmC6Q7y/H +/I/+6Ek9iQag/jGLwMegFxIUXCE024SNgSDiB04HJ7oEPUqPC3yYvGLD3aVH +bziyG287shrvQMCy4TYtMxtvq58BX1kNgNms+nYkE9SAO6QxIpIHOMJE5jZy +BdlxBMu0I8CNw1pgU4LUAyiTeugOBrYiDjJF4ZQ5wA2YRLbLxG0XxL62u0v2 +tj1Ysrf14ZI9N79N2Yu+SGs/qyqD63gPkMjlhdoTi3bz9gQ0ozGSdrVSa/mW +MBR4dMuRhMqy44amLAu2XgVGIZfIXt2dX3fpD2GVN5V5Gx1KzIb/VqLrINb/ +VYla940SVfsXJXLt10oExpo/KxHIo9WcS9VfApe+AC79XgkBLpGyEI+YssxB +LgGP5iCPQFmQSzNLwFwVvyeitAgejErorQpvtkxOavhwcGDJh4OnlzT0m5C0 +u/fomHKI8L5jYkJ7j4qa7OEzaDSYK+yH4f8hCP7suy80ev8Vh9iPcFqiQJoa +Vs80nj+/WBMW7qf4Mhtf8mvNRqFhIqMJjYkYZbr02iLrn0sKs+9tPHPzwaYz +t77fcPr6I5CSx+uaLqHgnCJaMZapJCMR0ri1DjZgALck4pbMeNWk8qvFiMRi +ZJKJTC6OtTA+wUGPvO48VJOMTEH8V4A0ULO4vlzt8eFEQCUBjpiRN0ggLZBQ +QLEnLGZKIE4ziXqqSQvCA5fTAcqDHm3MDvoxMS3Vkd0AsANCAXqzgVI5J24T +vbJPuOo5jQh63MdAdKPtje0d6YbbQKmgRktUrkzahmomAQNvAwEpiH+3BYsj +nTEQFExdvgfLO8DHO8DG94CFSDnSqzSSsVSSL63xIzEC3ks90PYwdf+t71L3 +tT5Ysr8VWShgX1YbWrw2IzFN0jdwBJdcCVM4y9TWO+txBa6Bct28F7fx+q+i +a393MXbLt0r8tu+VuK3fK7FbHiqxmx8o8zE23QOW3QWWAdOIZZxpyDIKZNl/ +KOEq01TVqkaWQVT+Dpj2O2JaCPm3z5higX9DxUIPN6uUeThgGbCNe7hl5OEu +Tk1/Cz3c1QlxB14dN29309iYnYdfmFa4p9fo6D29RkUJIjo4QfIVRVEjTzfX ++/alnbfbO3CNDVKZvDw93GqGPyeev5hqJq7ddnENOAZMMxDRJD3RBMYy6ZNV +8ePurTr4lmPLOUy/VN7ffPbWT+tPtDytbbzImCY5605jMwSqRDeIp8uBYaRo +J1touY5UrIUpGVRQzlpkZBvJFxKMhK1TEdu6dx9QaxZasgoUmHK98iCrZO7H +SImYhxNEtROqLMjl7Zjn44SS0BOiI9S84UzB8Bjox8hXFvho9uwZD+I3nAAI +ZzcBmnOakAQ5TXewRp8Maom0g/WMdneIejISk6h3h6kdX2Y23AHSIr0MQKs7 +nF53KJBgaBJpG6dYxhFOtSN4drCEgvQw/WAbRCtpnYi8EiTWl8YbUmInfWky +EkzCHjOo6vrMsK42o3jTSes/S2bjebvbhSHAuvbvY2qvtsVs+EZZsPuxsuBl +iJecSuIujEdKwo6fIP6hJGz/UYnb/ncljnj3HfAO41vg3n3g3H2ubg4lChQu +itQN4z+BcxBrvoZAznHeaU4ROFelOUV7yApyivgjpxWfClbNKTLOoUt8XwkC +zgXpnGJQ4S10ijfwFbv8azfGxuz6svfo6PbuQ+ZsM1i8art0EcNESZaKql6W +iqt2CSIO7YI9fPvttzVOWf699hT72UELdp35TeprPJrzonzpfIqZKEiSl21h +kqfKHXpGKG7xmiBx1bMxOrI2lnIDPl/Ptl16NdnqSM0vdmx9DR/SltfwgUMd +a44tr9I6KA3fbzh17R91J6/8s+4UGs/LXByRs9LT5ZuBp6d0EomdcqSMLUwd +T7ZIUDQbNYlsRuaqNlTk5GWNtGaQwiQkD+pfkJmPbjAWEit1LSliYX0F9TlU +qMxknjNI7WcmCQS1LA9CVYSNj1cuDfn7gupdD3JOAJ4f5DbBn3w39+RtRy7n +I7ITiXoSCYQr1Y25J+/gEu5JbhPSL5d08j1d3CHtzG58D3WxEZpZIJMSktaI +XEUvCpR+kHms/bulR9seZh5tvbcUuzqAnSBawE2tm4O6/9iSCaARezo0AdT6 +O8h+HmgjWsooe9haaxOsnJvt90Dgvo7f/EHLgl3fKYv2PVWS9j5VFmLswXgi +Kgt3PxH6AhefEBcTkYvEx38qiTv+SXyMBz7GIx+3/UAayPj4LdPAjaiBEBu4 +21z/jNus5W6zpoPbFIGMXwq9dWaTN9qggRe8/BPNbLJGG5dANJtFum6MZW3g +NFuvT4jd/+GQoHJsrf2m58iIpp7de58d1sutuqenaSFIXwiEiBPBBcnWvXt3 +jVfyv0dDNkfJ6GOz2VbPGym/uS/KTPRrz7Zg94aE/EP5o04MKqBBR+02lWpq +fJE6e8jd2sZLJuQZo5zh7pZX2+5veuXWw41nb/y0/uSVJ7XMgQK9TECvvYxe +p1p4qHVkDYijiEzDNh9xjQKbdSe5J5X0hGOfoNxw5BW1wUaukEjk6s4QWJ+2 +rFpPlXAkn8S3QMa5iiBBXccOF6j6WBrZKWdmVjA7j5bMcG7InfPP6PS8B3kn +2x/kQvDld0BC8WFuUysUJ1oF6bvcE21AyXbioAn5B0Q8+R7y7j1U0PeAo1AF +QYU4gZ+AelS+R8qJmimTaTWDx719FxTzu6zjbQ+z6lsfgEG9y8wqqClxsv42 +WVRsHyINsW3IXGk7tQuRlhlIw3Te6ahqJdPJNuQfjTExFlI3Y9u95Jdufpaw +9fMrSbu/VVIOPMVfa4LSqCQfeKok7+cBfFy0lzgpQoFk3PNEGO4SRi1UgQRC +7uSkBELGg0C6jOl3OmN6nxtTjL+xJiAIZOQ6ZkxZ8+8/qCslouYrIOUfgZRq +8+/zDsZ0rmpMl396e3Tklo9HziwV/xw+c67g9s2qhBkQ01kkTv/bukTfB9sS +R323MnLEw8Tg2f+RHB5yJyM67Mq4Qb1C3Dy8jf8e4dhMWqO4YcOGAKPU5Y3E +MQayntx2EuEEGwqeHQKXz7TytKVdNaQiV0AdIWEdltLVQ7HWuzlVm0kHbS5m +mlD+/rHu5BUkFzEROOmsO9MCQWJ3mpUaM7Frnsi4njcN16lyiKWrK4aLYpM6 +dIW+dtfOdTitnLX/gkj1ZG5AG9ROxnKVdoyvjI/alwKZ9BkexUTNurdkn+LI +PXXbkUeBzan8Uwhw/Azr7+Weav8h92Trj3lNt37MbbolYkUw3M872UZfI9Wj +eA9olHvqPaBU3qn3sEZLCJE2Mi7msBCInyLSUJC+zW5o/yGnofVeTmM7I6SE +fMQ2IxascVh/BymIS9iFeJh5DMl4lBqL5F1JEwXOwHRSQ70SQv1B0q6bn8Vv +/b2spB5+iu/gHn6qpBzicfCphOyDYv9TaJUQ7XigHC7Y+9S+cA/QbM9j/NGL +3Y+FUeBJ/z9n5wEexXX1/clsUQFsJw5ucYlLjMEF0xES6iBAEl10EOplV9Kq +rBrqFNF7R703BOxKqNIkENhxix2XxF+cxHbsEZIAU8So8p1z7szuQuy8b948 +z7n3zszumsD9zf9/zpT7iC/dBb50xz2zL90KWoi5IPlSxA6Q2yLroGCY/5Av +xaoL86VYdYE80Ai4XbJbU/jXVyb6dLtOfLNr9+oJQlHIdKE41E4oDrMTCsMc +hN0R64XNkVFCZmSs4B9dKPjpCoT1uvzrq7Q5d9+yW5nAcdyreAeM1c+AJb3A +4ldff/31rz799FPGEtvHt7W1/aqzs5O2pNfH/+qjjz6i/QMDA/IaRD8HJXsb +ovIx53FPar3eUDUd9LbCi7cIo2Xpso22AEc1OVClyYFeZKEg6JSGC0Ej6pr8 +R/w5epmdsKmkxRa5UxF3aiG7+sr1LZXtvfrsQ3ezSlp7gbG+zJImBYLHI4HI +GHAosYdKaKrXyNxZSdwxUWwRN58oE09sWEI4PVQekfSKQJP2xUkh1WRMHpN0 +j23J+6TPMgWk1snyd+NQYI9EOPSGrpvbsyrzoBBeBvM7vLRDiUDSiBfCSju4 +kTjsCSu5fDOsuF0KHF+5GVYCWllyFaIDNLODjYvhBxBL4K8UcIQIL8WtcNhn +yxAtvtYdVtSBcSOs8EoX2FYklngNw3HRVR5dLICHh7DmIwUC3EG1IaXsYbGR +PSzY2ZyryClqJoU/XY2Aw0iqbSeo4Q+Q8V1dte9bg1/eoGE9Ru6gwTd3wLA+ +Z8Dgi3ECkPQ9PgDZyLrjA4TsuqMsAFl8lRq01kgugvuwapqUs18h29g+HsWS +R/vKo1TymEiCtV26HZRStq6A7BLZum653jQr7o+XXAKrrnn5Hfxmoceif62Z +7didsmSqcEy7UDgUuVLYowsUNsckCSlx2wRtfKkQklAjhMRXQ1QJQfrK66t1 +ZT94B+V8YbcgPfu5N72eBHf4c+kdo+xJXNU1MCgoCK8Tvyy9CBEXYlgg3epj +nZiY6AyfwSWHPHEJ5JiYGHz0Cl+fjbcTx8Pn8E3bNnFxcRKeP0updFFiDJwc +TgRMVp2BdJFVafCSG5BogSkvVWraJKm8GAIh9ZeCSE453ngRH8CCdoQsnUw2 +eQQYMQ4c0Vq48snvIxKSQS7becTYCjHmkWKYkdlVV3Akb0FrfTth2xHYj663 +/cam8kv3wML2ZRQ1MZ7LwNNmleF9nIR4WbOEejMeZqgrpHRTTjLZZXFZbWFf +UYO4b1sC4qdkypjHDKmTlQyr3owuIa5Epv8NYsKXtVlBTreXhWo6A3KahfBy +AAJIRuBKO3CEuzi2D8guu8r20zHALLzsGopr6dWusDKMDtYD9vwtwBtSbAAd +Rxg9qNH4DQUxre4C4PE49B04RsaReB4xBxrDS02ajNDLvWSYMVtVUrbKKL/K +4AbMsbQrF30L0CEEU7k3pEDeh8lusCTW0Ejod3T6H7/8lzUH/tS29kinIaBw +yBBQMMQb/AsGlQa//EEeccd3guYy6NfnQJwYROCRd6QdX414DFwvwI6vamPI +E/ZklHn0yTziDieA1Qf7AfZ+hJ0CeDdIeo1qTdhzv2Mu2Zy+1i3O7vrg3YU7 +/uoxz/efoYu9/5W+yq0rce0yYU9MhJCadEBISj4mxKWUCLqUGiE89SxEvRCW +WieEpUBsMHT5xZ/qXKI79bW3rvFPM31Ltr0ybf2kp162owdcpHUfRgCguJrK +b7VabbRpabEnRkVERNTAJi5gGwZRJMH5skajOSiN7YHpo8D5bOB5D+xbCT3f +3t4+DhcUXIiruChypN30o8/9Mu7SPoU+dI3ftBcUbWmuKo7ZYxXh3vawJSYb +bENpKimz5UEbHgiHxPUCJa7AteFCAItzAbZth9e91hO++ZiVVCYioqsoOEa6 +0pJ0DJ4OjridsP2w/FGKLay/nVl8vj+9sFHMxJS2lChHzMqwHEznALO9ltjn +ZZmXEuHMEtyXSfvy4t0BckcMZo45JdNrMs0UKuSaEKcRkq2XLlyyMwFvAt6k +4ezUwM4KBzQz7nktmQ+624aQ0zmggqgv7xA05XgOQIw07ExQDqCWXyOQbXHE +WSH0d8JL2iEuSwEqX3qFPmMtCzj7jsUJgESdUQ6GW06Gi69S7dhUScYCM1Gt +NKk3fCAYy8V5V/6xYtf7DQEFvYbg0mF8hKt4GAgNLB42BBax8C8cRowhBg1+ +BYP4eGX+oALVm/GsApYHSMCJY8YyPph5jBA2G258WQfSC6LNo1JzjwG+fQxf +QlY0Lt9z95MJ8zfe9pn2ClhdF2GPPlrYkF4iRG26KERuxLggRGy8yAsRWeeh +yWyFvxttRougSW/q8kuqv7lQZ7g6N/FTI2S5FyctPej71KuOIxkFuI5z+cOr +cKodgbVMaZ/i0KFDuCogumLpMF9bW7sBdk2W7lbEldDx41KFaClsbpN/8T9g +yA4ppk55UbXRd4LyXN5iK0l1VcbLmKWGPJSl0uURVijClDTIBlUWwEM+LwTB +gQv4ikTD+QAbw7lAW4zvVvrMV1uwt1VSVFvGHoOs2gQXjwM8WHWlc0vV5Rsb +yy7dzUQjXdIq8WahrOipET4V5bYmX820mCEIqakEoZgJPcb2Q3hNxVEFZDmS +IebNPvhhaf3ZfdYMPpRhU7DtAgrp55Q4ZLviMCwZvR/g49Tju+VwZ3DRBR4h +VCKPSkFTgYUjDQCoqbgG/TXqwzHKqQcwYKSioeJOeGk7O1Au8adC+NQ4Qim/ +JlMYZtZZjmmvgvSWKsPFVykVvgoSSdXiwo7OkPyO7/1PvPfp2oNfGkIrh3lD +aMUw4BFSPmwIhQgpGzYEYzAkS+ADQSXD8K8ehEwijyithSithUNwQgaBhRhi +ff4gAopo8qiyPPpqxDHHDCePrcKktLzZUTcs3/bte/OCcr/wWRHTvXSe9/XN +mkAhM/2YEL+lnhei8THy6OxLSkG35RJnc10LOAamX/z76tSrny/a8HHb/Kxv +0Vyf8Uz56uC4WYl/wCz0MQbTAkDiWYtVONcCPXtNi+Q+0YELclpQgwqab8Ge +HXz8uLQq50idTvc0/NRvITbDZ5DR/+B62W0ET9qOHj062OUVZe0+L3VD3Vpr +JBD5kytFyCH1v1AtMvUX6YLKBWT0QjCuMHYB+QQUKQDL89DLeLYG2L4fba/u +Sjhco0QwFZLX3Vr9iPNliqg2gbqlmoLghV5J0NqYRFKK65sr2ns2IcDFrZTN +ZrJKE8mjmVi2r4U3Q2vSTYawirA9mrEGiZWCqaSjfCGFIepsgvZRdNE3I4F6 +Z3ytv17Kki24xW0AFt/Jo8cb6Eg30/xn3l4UGgG4oUvQVKIwhVd24AgCKb2K +PUpnBWJE1Fa8B/uu0ecRwwrQvPBKbIhZDTLLoAbUoVXI+MqUw5YNtmS+Mc8G +rMPQTpt8MjD7ve/h99oD8gWDpvoBbwivRvzCq4YNYebgGbshFdiU4wcQ3JBS +AheDYWtrCAI5DSoeYvgWDQHChC/Si8wa/Zm08gguR9JKHhmCI4a5kYDvoKW+ +ole+vDbp1FfzFoV95+21utvfN7IrTLdXSMo+I8Rtv6AUYrcDprHbLnG2XdpN +F35Yndr+2fKsz9qXZX/X6LPrtql+vGRrV9IY56hRYyZ7s4Wk1U9A5jlbspcY +aDV3m0m9BsNnpKVzMWwh6TxuQao9fFw2s7hsYCGMmyCQVHyK8D+Q+hS7q4Df +uXOnWus9/szc15XN5cusGKkhRCgVkzDplCjFpJSTxdLCr8LJ9ALltSY4GZg8 +UglNAH6+1c/W0LzepsfTZxW7xmlDPKofdasEYzbCixAqIEUFJiuvYMC0Ym12 +VYcssGh6q8Bm4QGrzi2Vl29llVzoTyto7MuQ5HWjRKWtBCRp5pEjRBrxRuSZ +0k5mTHnJhsqUKcyUMeXU0wsVLJJXK4k0PT4V4+7h2L1iewEwc0WIqAJ/qsU/ +o4ZGlSa0Kim4ERJg2sprd7Rl7fJ+NX5IzYjTVMjEydJJYFmbtBF0ELH7dvW+ +9w2aUw8MmtoH8K+iOfkAQToJ2zXD1Ieb+QqrBq4qGV+EVhjJIogjQoZ0GVEi +QRrx9QKlw8yuKoyyVYXAF7IVoj0Fp2pLQuiXN2Bcn9N7dV1ixfdLPGbftxv/ +dvdK7QFBv/uSoN91CXuloN8JyqbfcQlOP3HbL0G09QRlnfth6Ya29xZt/oYj +0wp/ktWHIOU82AchnneNaNJx8L9fswvxj2KDinUIsamsrMTlKz6jN3bTZ631 +MJ6Hn/3xxx8Xw3irRIEr8OKP3+GNRiOnwMMmOJ79ZW7Ym60UWH1dOW+M6mKM +vYocpi1ouuQsTQrXxq57IDeGS0E2CqrhKCVhs0Vxw0B9wwaOjQJ8bEjP5DgH +25D2GVr9bQihVj/qP4z1eP7HjYUNZidqa7KbSkbJQ+QwQNQyNWZpq5RtaiUq +3hYJLIiejWVtdzJLzvVCcsdquSXkNznexJHsQSn5Q8XDw0pxY8Ep8dDGIHO2 +JxtThQkUJ3SQpvJuARMrgopwU5rAY0ApZC9q3oID8fg0Q0G8k1iod7qf5Od4 +a01C6nW/E0b4P6utxtQPoMMRxFXah5ka7au6BvEe66tRijRV15SyzFVdu6Mp +v4w9Bv4KoljJKJSUTUZXRa0CFfFhKNGSll/7IajwvU/8cr6GCRJ5BiaNIeLM +A0PE6QcG7WnIiwzaUwCjthYPAK84MmhP4gHglkdkoQFUbRBYhmvVsJHksHLY +CMgaKCqo55gqKh6ys7zZztoYIc2EGGr13/NZx/q005+vCEy/7T1z0t15brNu +LgnI7Izeia9xjt+HTzrH720X9Pvahfg9eNssto8Bum1dkdsv/Bi+te3vAdnX +PvLJ/urcyn3dII79prKxVEMyrjl0v2p2zHnX59/2/M3PE6vOysrC1aWTJCK3 +WBCLK2CUwbYffB7rL+7S95DYAiQ2nl7L/7RGo3mUWCn/w+XWXpZ0UyLWegzP +85sWjlPWlS6zNrYF2lhUYMlv0t06TN6MUibIqakleUMTSgJ3nhGKthTaEUYY +G8/5I6UQ/jZGRqqJ1sayZdbfRGqDhc0VbXCqlyFlUqYSshmgciC03Egc0ad4 +YbOEbUfXpvK2no3ll25nlZ6/jxcqgUeeFWkzS+XrMBKTHENRJW49ekLM07tK +KDoCUfTKfcYjc5um9M4CSNK+ArMTZcYSL8zoWbWGJYlSRsizLBFGCoJSLRYC +lEV6Fru1Tve0AZ7X1x0+qSAuVUgicRkBfQTrsbRQDc4QiEN1rAYlrGhH9OCk +hC2Bhgopo0eftH0UvwokmHTyh/XHrl0LLv6+LuL0EPyjRhoeqCQGI08zBiNk +BhE/JpkWsqkwampQNh9gzzHNVKF8MggRPNZzLJ+0ZblkOYhm2fCFwB0df14X +ltW1Yr733dl2k+7NnuV9Y13k7k7dtrO8kET37SUdbBcSIZIOQH+gnRcS97dz +Nt2ROy4I/lva/ui7929taw/+2LT2yB1zCTe3n/JLHo0pvjv8+EDD7Nhm95en +LFO9+eab0m2llqRJxRflE1FRUXOlCxejYMze6m2F1zTwusckCFVmZibuHQ3y +6YGlT34+FUDxq79AWaSlLj7JDK1i+cK5c23VfGuKs1q6zkGaqDLbxkfoUhiB +KuN5tI4mqqyY9pmDUcXo4nhjiz/qKLQ4ajuw5tWesE3HSAHVlhbxIfGzshRE +FiYh7JCspbX5e1K/WfrsZvZ5Jfvwjayyi/fTi5r72F0+lgAykVRIWngoK0DW +QZMWsiQPhnq234SYfMmDHCg5ToVZA5WWGohjJcFmDbA5M+BQCSXwwpZM7lm/ +5QBAclmBiMF8M8PWIURWX+VhgOhEVl/DkbQVgQyiJCoZf9UkkLh7BGEInyDt +pEBNlTNDSzTJySoYmtdDSjr+tu7IRwadEa1opPHBCGSRRwp5QlCFYogYUiCE +EackDUTBRO/KQto3gqAMRz8LMIZXDdWFld9vC9xx8eYqD3txiet00dNh8v1p +U+y7fWMPwR94w5HLcNpNOXxZ2CBFyiHogbzkA+03Qrad/9uyLR+0rzkogKEd +RDvLYaGHMkMq9EDCmI/75Gyx/7yHvmk63tT925/h7d1fBoThqR6rVCpTV41X +nT6x0NqiFGlrK9cjpSIkQkL5FMIRiHkVwnGecqnz/iQ1GLAPkVAgGAgDQgFb +rG32t/lu+dL5lCdZm+lQWlo/JjOSGFVdeQgS9j0p85Ks4WYCajN93rSPQSQd +Q0JUXZsq2m9llly4m1HSeh8oAVLwfQWMjc255WJOgoc5BcPG0XRDGxVF2GWD +/1UtUy8VRNSSEMUjR2QMCQ28Nw5aHgmBJgFfgZSxdsJP63Xa7oD9JfD/LaoG +r81F1SAZHdBfQyx4IbKGZnyNmRArxokJDtySSdJakKTGrccJEmVnePnVH4ML +r30SVPj12cgz/bxBV49TO6r+gUFX98AQVUdb1AIfhigIQARsH7QKEi1rNI5G +GJlYIRPJWEFmmI20bdKU370cuOPCZ+ti9vSs8J4rLnKZJs51nH537ryFN1eE +ZXUmHmgVUo9f5oW0Y3BiSDt6mVN1x+67+K/o/R1/C9n3wZ98933VFFBwF41j +2bBcDIWsT02VlIBiiKIhAKKvcl7yRdcXJ3hJDOBFdczBkAP5UYafY+AJalVY +Hlw2ZjSft3MuKw+2U5lPvluablVhTozKDHIREPFAHAAFcl1yjiSVGzgqNfBE +hYJZMIkHpSQYwIOhyd/mjzp7VVf8oRqqPdDUNmkCN+pnkieFKTsy64Zlb5r+ +VTIaChgTDhIosAVzYlNVR+emqivdWeWXbmWWXuhNK2ruTytsVEhU7N8aa7qz +hahQS1SAa3vo9hYnXqrtWZQJLY2aWhYMQKCAIYDKQBTA7kKJjCImGgyJEWJx +gpN4JHJGrz7E88bytF2C7iSgcPIqRAehoQMOABTYxjkPkCh/BhAGg/JORGU7 +7SN5qTGxJKFl1h6mObLQMIpkxwcHukJLrvw1qODTS+FV3YYYwMbKEF2PmgEI +4YgAkiECUal7oEaGVASQgoiRgmMkjURyWjXFP3wWkFUlrFodeHuZ52zRx90O +lGNar6uz2w1//Z7O+H1nhfScK0I6Pu0LA/i3SztxuSdm/8Vvg/e9fyUk74eL +gfnd9aHlALNcmgRholRMvqogXVmgAiVLxxo8k8+7vzp9ueqtt96SxeMlSFIm +/i/AkQr7vF6vVy+cOW7v20/zLeXLreh6FmEDBFmTgjxBicpFSlhINbAiJ6Ni +ROW4YCot2BqlpEW2VsgJj8gwi6VCBTE0+xE1dQ3rrXvmLV3FdMJWkgzmoTos +/ZTkt2xxm3Fk6aks5YIxQ7DYIB1wEt4En4ORHGrcwanuphW29qXmN1LZPftY +gXgiyZMJhNpCOfKZoeKsTMU7qn9Ll61M7slZlgkqJZj4QNGQZAKHREcCEQJb +AAen7NsaOPmO3ZK1QmRVOyLBIx8KAAUapALa2ms4khk5iRMfDzAecPKfNDGC +SOC2HLz8G8hZNQVjhEjA+gUrRnCKH8FffRpY+BdDbAPOa2yVhuiGB4aYsw8M +sRDRZx/YIB4kNYBFPcMCkhTggkSGegNqynBd5OnBi9rSH4WADSfEFQs8kQZe +XOo+nVP1T3tnzG33paFCet4Viow8/NfNyMV/+fTcywjIDc3eC5+v2vf5uaCS +n6TcSY0WzRCOUT1sWbzgsXIBf1asW4SUD7w/bcUWdFJP/3dGahRjAR8kWOL0 +srIsZKpKMlK28lM30iVdFTkpuvuY9eZLuzxd2lVY1tvQWAWgTJC18mNAtEpA +QKJP7sqPBTCBbBibMGC7Yb3NR7rZz/+YkX8WU3ruNyyFl2wS04Hb8cCClE+w +ma6AKY4foMn+0MTHv+ZNlPqbjsnHWY+HMWuhzQoK/CFsb2YUX7idWdBw78Cm +CHxLU19urHSrpNUjpTiFXHYzXStyMjknCnJOmKtYJhks0FUxNpCSYhbAJLX3 +gtZ7dwfsPMHEg0ECf2QghcPhNUFXS4Gui7Unr92Jqrosw6Nk2AgREh5Ihhpb +woPUhGcejaEEucY/Q4o/eC+4+FtDbCNMeWCCx5GS6LAyxAAdsRIhFpSQmihQ +WZQ0HEliEo2iUi8FExcj5C8NkafF9ojyzi9DdjZ0+UZkiMs93XjRZ5Yd/P0s +cJ5yf66Lw23vlaHX9fuMQmY+moAMaK07k45f/i7u+LW/hh795OOA4183hlfd +Zx6O5TwKVgI0ak+SpcMeKxKsBIhkY+0+tFw84Bh48LlXJnk883+hxSrL6w1V +bckyazRPj15p5VTSHcIXg6UbIDAHCbQhRhSUkCtM6nGeco5ziAVYLJZpqORU +nGkFRKMfctboh5YN2GgpWPnrb8N1scLG0jZhczkgAAE9SkUFcoLNlgo43cMm +81s4wv3wr0uOqif1+Kk7+uyDt5L2FnIK1nal5zfIcEjAKCyAYXxgxUnaZlHB +Po8EdtgyZK7vOF7cXRA361Z+jEtvjs6p/4TO0cKDSZeJ8pEgi3o02SuJEYWk +IBIcMhrxzlZEhC18eWZvasisOwsDgsy2SuqBC7JbOkYK5hkECIJy8j3s70RV +X5ageY/pDP8zkmNrQgTvciy58llI6V9adIY7Bn3zA0NcM86ruCaYcHGNNJSY +QEJ4SUtMnMhbcDK35IainthhxKhadLV3vtLmfPZjUMrxn9auDwEJmccxLJTi +0lnTRbcZk24vWO7frcnKVQiZBXBO60zNvXxTd/DC/ws58vH7YQX/OB9afhPV +SPmzFTrYgn1aaZ+WigNauU5n0LI4uyC9Zdqvn31NqlD9r+lg715V8Ns2RI79 +7Ujl5UXjlOymeemxTVlAzNUr1AyqBNM9CBzTEZPRMl/+DGAaIqXprG6FxMBf +aKufrVEChkHDhIRHcuAwsIPMyPFJ7MK3r+sPnFIAPEDJxnKaumXID0xm5Kii +g+DhiSglDmVJwGMKiaJNFZfhy+3A0KHutONnmFgob2w4WI67WGw9zOOAU3Sn +Hj8tbGTfgEmGrYq2LQiiHyDCRtDQSti/d5tQrHeFcMO4eyLKue94lKPpLn1H +ul+IytByOZqSeRuTI1OR3ihlhOQgkpjegMLEm/QGQymWAGCje5cudrsedOw0 +mLMrUu7SIUMlkUS5C42jJLJMssPIerSX5ElB5EVJkqXCkcJs1v4VmH/tsqZa +gAmpb4WTNrCmRNh4ZI0j2Ag1CDBgiJm1EfCBGK6Lrh9siDaI32sPXxH9Y7LF +1ct8xGWz7GR8fNyn46jXzml2V+TWMl7IKoAZgAwpboXsPfdlwNHPGiJOiQiJ +EX2eQa4hSPaOeygROk0lBE4qu7FywqkHxohTQ+cWZrZSSeu5/44edpu9arS1 +tXXgqvGqhk2z1HXnAlgewm5qV//CXT227HqnwswNq/0GohhZXgOVvJhc5kKC +5CsssA+sGI+aw9BRoODI2MAWtsrGIh8rYXVwtJBVfEXYWAKeK6sEMSpFJjaW +duBI2FjWgQG7yzBxyQKqNkqxqYJRBkdw+3p6flNPypHam0n7S0cAEfBTNPe7 +006cuZl8oIzF/lK5v7HhcBXHd6flGDgVfMYAIyNGV0ZBIyLJjaTvjxTyNyyV +uZHC9WZ+tPPt3Ginu7nRzr25MY59uTEzGTdxjqYimMWF0V80cAqzHD3s3uRk +pxgOyBZOIQkWUCWWSoHjnGgHMXat/U/+Ok33+p05nZqyi8gYJUHAvlnPWDDM +rt6JrMYTyMNaZRIx+Cd4BDseB5Ir7IyovvpjeNm1L0PLPm+KPnvPFgEDmxLX +CjS1PDDoW6jncYD0ocg1SdH4QMJPtoOcVUNMXd/FmNqezyPz/nQ9ZHOpGBCb +La5aukj0mW0H/68ROZu+2TPevefl6X1raWCCsLHwSmdmweXu5BOX/qnPff/L +sBOffRCY9w38KKVVWHOwkg0iRWSdqXyHPWct1bpR1c4u3/m+56t2iyxvU/3f +cmbNOHOd/ILyWKSdsqVkmZVcOpbux1Fb3o/DbiwgH2erkuybhS7B1jlLlsjC +sYTfymTkmkxGDmhiPfCGRKmNRJivjeEsi69WOf2hM+loE5yZirBMlgmgZclR +8u99ZgmiByNokMKbiXtKejYcrr2entcMey6rhawyxLT8iprUTs0YBNHZyKIz +q/RSV3peA/i/vLPMBaJe3UraU8QpoQVnCIjWkOKZ8yKFsPfgPhkvcIvQYuMK +fqQozrWrINblRkGMy528aKf+3OiZwJojlRCsfjErUkhVNGcTT3iJ1MIAWrAG +gCkkukos0iWetOs3Ykmis1gqxbGoGfczQl3vrgpY071qR6FUc3vYMDLAaD/o +V5sMHONMZfaEFrzxxJTtQ7xZjLu0FR1/DS379FKkobs+rqVfadCfh6kbf/4B +gHXugZrQe0xGzhI/1DrZYBrjGoc+1xV/+WPU8Y4b4VvKxHX+YeKK+XN4ZIwX +lwFotn1zHd7tdXWb3ROWsv96wgGDsKnoyo3owxe+0uR+di2y/LtWbc1P6DN5 +KvgpDKSVrNzHKaXWIjPDoMofiCuyF8UYNEZJpfQoJoWGsMo7SRMW6Ea9PXPh +7/47+tgjm2or7+mvBrzzDN++fY7a2C7ZwrYgeojD9CQHWcNAU7DkyeYhVyhX +rlnZTb6zRyZQbXjEFbLygp+NEhrU04b1tgRePYPv/F4vm06/uGwrhE+J7MFE +zyzpIAqRNIXEW0ZRe1fa8YY7sZsOdWYUtZEM2iKACsSNR9xQEMFTbjSrH3o+ +8ngA4EapyqBkNAF79bf12YfJLyqZa+zcWHpJ2Jp/WshJWwMTrjDOHb5bGAfE +xbkSagScQiiBoaKrKNb1Xq7OuT8Hci3LknWhOahkrbCsyFnSRrpFesXUq8RE +lErehkCqnJAs+CSMeLEsET7Ql7p6/O2lIaGd2vKLeD1UvgaEFQpAql3WMSrj +dSBYV6lKAec3C6pMBMF2V2jx5U/Dyv6KzMC0BXyskRwYxp97YEiAiJe3sAUN +A6SkLYTLyqhvGa7TNw+1xZy+/q0u9z0xcn+DGJaVI65aSBnV7BmEEWcNUjVd +XDp7Rv/4cWNurIneKmxCa1N0pSv0wKW/+h35RCmVBGPMCR6OeUSJVTsMMlBq +U5lQkrLI+gdG6hk+xogzg0eff9tZfpwxGcBIhXg+PDz8PzHD7uRRqseOHTvN +5VV1Ueg0dUvhUmuLN+JQbQ7rcqw2h1c8A+ke0kCqzbHiAyjo+QBbdr3Tj0Wr +v+lmAAOrVkseEP6fmQRrvSxWKhIvZKbBF7khduAY0MMp6k6ttvmzZrGdsAFX +qhMy0FxnFGIik1l4BUcsiix6ejNNehHVPwvbujYcrb+ZsKesJ+nASTyOtdFi +/JGiKzRSIYVKBJD0Dr6aBYYTmCPhI/BQCYE1GFEAfwxFyLkk5pBAtdlpKsFZ +lpPD3JiVdnOPbgEPzXy++3DMPL77SMxcyN2OxMzD0fXc2Fm4xAeonRW07jcL +ol1vF0S73C2Idr5fEOvUR6+IJOwKmRV0UpnyLJQsuipkcobOFLJ6lUhjiS3s +iS9ncI64rwwjiaLvoHZ6b/CaWTcD0jd1rT9UI0TWdGB1myfmFHciH6WN/KIs +dB0cc5gjZEf5UK+reU8IL736ZVjZ5+ejDDeNiQw1zhI9PQuYW3hklAlHCUm5 +N8afG26LO9P1aWz5X7/T5V4TNdklYqAuTVy3zhf+ry3zmAH/15Z52IkLXabc +n+fqcGeBz+qffMJSuzbkXfpHfOEfP48o/PxaSOl36Dt5NKBUgLRipUjAT4Wi +xo0g9GKkgLERq41yDxzWh1fdypmrL3sNn+dgj/or8Dbv56XnObjx/xN16v3W +ql+9b/8S/3HIVNX7ekebxlO+v2Z3uLGbtU1pGORZF0GNLvrL991Ym5SK5WXS +xSJ/Ux7GShimW2/oKqsJQCXB14juEEsYfrbEII9eEYnDR5zrSblspd7m3FGf +X38fHJUspOdjgSG94IoFhtaA2BWArYP1hVe6NhwB3HYWdycfMsBnLzMSldLH +TGGF/FmZ0CPqJAdaiuBCa03oKViixzjj5NLKluIm0K+1UiHDVdl1PMYD1Op4 +zJyuEzFzeg5Ge0L2vStqIWdza3fUQohF3cdi5nWVxLr2lMS53iqKdblXwN4G +KbnEn8+98MkN3CbA5EgwwcaZ7aIsYChu2Cpl4KgvI0lLghyvPMmJG9m3O3Rq +b0LI3NueQVrStcga0rY7kZXtZCURvkipPAIUmYBDJtlH5RsirmvLr/wtpOiT +tqgzXfX65n4FkmItoWQBFo55YkthlLhCDmFKobhZN8Y3930SW/n199H5127p +jl28H7GzSvQLjxVXLZkvLp/jwBNajxFaPrOni+72k28vXh3QE5Wd26k52PLn +yJIvLsfU/tiiM94xxjUPPWQ99VRmaX6gsIAuroFBB37wEQHEsgtCSOWXqNN9 +x+fpy8a8+I7zS/8dZeyeutEIaNkzz43pcZnt37lkZXLn4uWJXV4Lwu+/8uq7 +4mtvzxFfHe/9g7u985f+syZCTPhQ7/lGwynfJ+rr14+qr/cdWd/oZ1vXjOE/ +gj3GREmZCTK16X5vLKo3g1NsZnkZj4ix8gYDDdXOiLqmRHUzSmkZcsaEToVD +I67tELVg/HXdrlNCWj5xk4+XtxG3NGzS6f0w6QUd11NPnLul35bfk7iv2pZ2 +KywZg1MxtgpUOGYzi5EeaNXIG88KLMia2lLvmMaxnmmcFdslyd+24+VCkd6d +uCsBzVKiTUT5ggwNRUwoswjY7jkS7cXfzo5cqoDGh1MMZ4YvvJencx7IiWaS +xi7lMiFTWYiYk4kxZhZBtixMIk+tWhIxZyZkkpiVJzmrCTMrsSLJaWCZ0yu3 +PKPSOrVllyzwukoXeDvgb4luJqpmNxWx8VXp6u7VTkQzKP/KR2FlfyNYFA8D +RFtWSBehxo20UCmK+vjWwbY4Q/dXsaV/FnWHm0XdoUYxct8ZMSA6VVzh7cIE +y0pcNgeo8pguejhM7LV3mXMjZGvpj2HHOz4PyP+CySNVLWGKxEmG1BQtSLCe +2HqkmNn0AJWNM19g46XrBTA8HVz247qX3nXlfv9/gcp2nFKpxPfdH3vn+ccO +e7/7dLXb2CffXzFl9L8CHV+47/XWr2/OHf9s74x33+X77CbbcyP6ZkyxF2dM +cRAnTXIVJ05y+ZeP44RvVzq/8+1Kp7c/2eD5yodZ3i99uGfxc1eP+DzNKS6c +XvcYJ1+/tQWUbKnWLomWUSocGhvIITYQOBJPxnoWhjqijNzjxe1zrXrWxR8Q +0vLoBpE8gAm5skaucHQ95Vhzd/JBw42EPZWdqTnncZ9EWv6Vx5ErUjgeaSLF +I+GSuMqgQkkH44qXcjgpp5NDIZnKoxs1AkgPS6sYNQgQDYmcUtoCbhRCOQxV +0LrjSKiIdxcq9G439+vmczy0Czj1vT1RXnf3RXuLe6I8xSMxHgOHoj36D8d4 +KPqOxHlQhuZiSq5KE5wopwK8zJIk4UIolSWhkJUzdIgc2uIRH4Qo2QlHfYfB +IIaunX0/IG1jZ1BBI+qWBJEt0zDpvlXp3tXr2sqOf4WVvveXkJJPm2Lq7yEb +RA6zeMgTbhlNcvWYJT3Y1+tbBtHrfRRT9bcfonOv3os60ipGAUFhWUfE9SFa +wmb5HDukyA5OBovcJvfPcplx133Rmu+XJZ/4S1TRp5ciTnXzxnis+GODo1HS +BYAWKlI+XCFRWAAU22gBEKc4t+bgh34vvetOBPwHbKRLW89qNBpvuWzB3oEx +CtelekOlUjmDJs1xeFlV4Piy4i/v/M7mp/FvvNljP9n+J/tJM+7OmAwxya53 +xqQZ/UgP3283aQZYfLupM0V7CFc7u7uzZ0y7scRx4o01LuNv6OaM+T7J69Xv +dy/53feHlj37ee7K0Rz/x+JVv+GUHeWrnkBO5DKgApHgiQ4FCo3s7+D/ohF8 +n/KHOW6uQloOTP9cCqWQiu+ChxHk00COkMoCFKe2J3Hvya7kQw20H5FJpXdb +p9EVdcCHYZSPkgNbjyFHmIyRSBVckb0iiIssUh1S6oa/klEsFUlUwo5D+UJh +gifVJkriXJAgjpcYYtAQPFIGRfgQM0iQGlsV4OPGWXeVx7l258XOuZEbM+en +EzEevcejZ/UfjXYfgOjbHzNP0b872pvDdj6OxNx4d2bkeJN3IyqcZU7gKIxU +SIZCrISjqoG9odPuBQUs/skjJI6AQDR4wkQlQ3EzIPfC52FlX17QGW4wDngL +JBLMykFI8DjibFrizt79MK76Hz/ocq+iNwMGmkhNwrKOiWvXrhFXLnDH3GeO +HcwTQKF/2tuvDUydMuWO49LQz5dtOtUWVvaPpuj6XlbKYMqBJHAEBStsyPu5 +J6hVWJIBn2MFfMnHcYrG0LLvMyYsiKB5/fL/CIMbHHpSq9Va3OqgwmXe/vXr +597uGffmdMFukn0nAAD/fg5T7OFvywFgmDFp+u0ZE6fftps4vddukh3820yX +QHAU7aZgzBR93ceLYR7jxI0Lfy9uWfSSmL34JXHrohfubl/8/DeHfJ7h+C+P +LRvNWV8uW/X42TNrbRtOr7M9e2adbd2ZdTYQI96LdhzxY8K+OoWQQmuCpMLc +T2EBW9gq4Uh7V9LB+tvRG490Jx4wWCET8CdMAURSc01IQOAdDKkoL6n5TGPU +OPMfl50ZJkiSM2MZkQ3WKUwZEU7+zCLJqUF/eHOcUIJvpofWFX65JM6NqUes +G41L43DOw2xXS1OdRCLezSJomxcqWePOPSZUJbgLVfEYbkJ1vNvtkhjn+0Ux +Tv24cCKV4RJJLfr3xXgOZEcthlg0kK1bzA9s1S3mrPv3xXqJpUlSDTzJhcZl +0CMRgIGaMBgxUJnsLFaCZkA/sMLp5V5377k350WldmpKW7uD8lv/vv7oNTrL +s+zDZKjkmc9ZYatmGUydvnWoQd8k/i266OM7UUfO8Tj3uVHQNogRe0+Jvr7r +UAGYgZo9TfSZNVVcMsuub+K77/ROm7vy2+Bj166FlX/H3BPNeaU8+w1SPGe+ +XmXU1fducwzIfnzUqFGv/HezWrr1c6bVyKdOPv7C1PeefM31ry+Pdfzurbdn +Xp820Z6Hie2gpNn9mgAzHWc49jftJtrdhNl9c8ZEu9twor+LAfP8ruOU6b2L +Zk7qXePyTm/YrLFi9JzX+xI9X+3LnP9SX/aiF8VsnO2LXry9ffEL3+9b+ux3 +m+c/99O69eE/xR04fyvh0EWISzcSj7R1Jx1p70462n49+Wi7sOH4ZYgr3Qn7 +jD3xO6t6EvbUwnY7j7OfprsSp7Vp4ud2sFkOsxt6G9PkVuLkVuLk5hSyW6JZ +bsXSFDivK0z5SId8uufIPPFYtMMHf45WQwrhTlOcxynO46ym2W6e30rT/Fag +/4HtSjizV8LXYE7jlOZxNvMwld3hmDSpheoEiER3/mZ5nAtnfbc0zvluqd75 +Xmm8Uy8Ezu8+vFgKp/C+ggQ3Rf+BWE8eGi84wRyOm9d3In42hAfH44hT4Rg+ +545zm2Z2VRJm+FXJTpwN7rt/WGPXG7vo7a6QlXO+CtJE/jE48+il5bvON2hP +XqfZzPJrhexpaJ8KWyXN8N9cjDP0/Cmm4q//iCn8kE7q8sk9YleNGLJhj7g+ +WMMKWq6T++bNeLN/scOYPm83u9sLFyz4fq5m5+dRx9svaU920byGdNTi/C6f +103+51lmfeLwBF++KPPUO+DjLU/heI+zn/RQplw3/uXJbq2aPHmyk/Vjz9Y9 +8eJ049NjvVqffmPuRy+MdRPGvuVwffpkB5j0Ux1o5tMI/o3spzjQzJdCgQhw +j3XaT7LvAr9DAQD0OE+Z3jNr2tQerxmTfvJ1fvNu4tzf381e8FwvRP/mBc8P +LnedMByWVcUPRe1u5R4f0u1uHYje29ofs/ccRl/MvnP3Y3adFaOy8vp120/d +it/fehN4gGjrAhaE5GPAAQXmARtoIcENOR2PnPqZHKSy8zye23PB+qfiMjmp +dG6XGFCbM3I21VkosUIGv75n5w6c5DjFhVLspfN4aSzNcbQt7o/YFpXJvEj2 +3xTuOPnZyVxB8x1P5jj7CQTYVw0neJr/CW605QbWvDrR7XpVgmsXRHdlgmtP +VaIrAVGmBxD0Tv2lekexPFFy+8/Ayd21Lz/B3SJmUX9c79G/N8Z7cG/MfNAH +bxCD+YN7dN59B6I9eyoTZwmnk90h3DrL45y7DoXafb870vtb7boF/1y9fPHH +LqG7WgILv8IJTyd37reEgr51+JOYiq//GZ3/x5tkaw42sdl/CGb/ntNiYGym +uHr5EnHRrBn99u++Prhw0tMD65xeHdSs8Oj2Tdz7Zfi+hgu62usNMQ2iFXMt +lud1zuz7H5c9jTlzli7nPLyPZ/uueiaVvvXyZGb1JR14DZBYhm/k+R/QYM/O +2E6B7Ljl1y9MNz4z1tvwzDjvs8+M9fr8udddrr/9jgOjAGMqSYKDGvfAv5f9 +FNIEgkIltW7TpgvaWa/3BDmM7lsdc0zU7WzlFANRO5o5q8HInc3DETuahyN3 +NA5rUg4Pa9NzgYgWooIHKloAkD0tnNWQbk8LQtIfvaf1jn7/xTvx+y/+FH/w +Ylfi4TaO7wRpUHRuOHqZRyB45AFwOMGgMPshpYVAAAojEQXy+wpMlBkFNkJu +ymqa6iykUznZdHepKuQOUJTTyRznd4U5eJzc8B+tjJdNCpvl/z7Xq9HRwORW +4NzmRgo1SW7CSSlqMWAq1ia73axMcLldrsdw7i+Nc4SA034CzPTKJGec7ljc +pdN6kktfWZzzrep4V5zG1ysTZ/+0L3oRp7y9U7eUe+zW/uhF16sSPTpPJ7lj +3IpZ8PYPczxm/dnJN6U1tPCLs7HGnoY4Yw/1sWd6zsWe/NdnuoKPFGLE7tPc +SFGzs2bA0XPlwEzPFQMz5y4bmDLhnYEJr/9u0G3ck0Prpj05sGvJi/cyE2N+ +CDt2tTXK8BNNW2tpdkpnb3IuNLvJnlMdiKPPsNtspDks9Y3++V+tHePo84f/ +zsKwt3YoZluPeubsk793wGkLRGCrbH16zNw/v/iGK9gZR7AzDuDQp8xUmeYu +L8yACTxKmDHZ4fqkdyb3Tp0XIfpuahMDtlwUQ7aeFzXbzomR21vEyOy6voiN +lX3ajGIxantTf9R2XD6WJvNA5I6WwcgdzTCpWwZhz2AU9DTe2cIph6J24WTe +DcO+6L3nemP3nce4F7f/An8LZjKnvhV/6FJ3IpodFszwHGOTGiYbzGqc1HIo +TZ5HgVNaaTq7U4mIN81rmHu7dh8UivQeOJ052aXQdI7DwH0wkdk528p0npaD +zAozLXiSxllehXe0mHyLgnkWmtv4W3AGV9KJWyXUwIn8ZKJl4G/UJuKx2iR3 +HAmnkii6amAvf7My3pW/U4FX2+9Uxjv3VtJ8xl+FFhsXbFzhbwO2hTNwsq5N +mnUjN85LefN47HxOdWuPdt6dqKV2d8IWTLkfNn/y/dD5kzl+OMxrIvfYcMz8 +t4fj5o8zhX7eq0MlIe8MFa77/VDeiqcHc1a9MLTPd8Kd7KjV/0zckf+xtvCz +c1Fnbo1kluPf88yRP3P+VeMWOwlbPVzqbMHLA33ZzsHbcVkJ7v82s0c8//s3 +4kb85uUzT4+ZA/9lnNkqPEG3Pgu+5cU33P75yhuO3VPedeDQszha4xxnp+YR +ndMnzrg9yXG5uDi5VfRJvyL6ZFwRl2deFldmtvf5ptb2+adU9Gk3nRG12U3g +DiO2tXC2YuS2FhxR4DgKCdje0ocRRX1rX+SOVgQATtJwTpcmPk1+PKtDQA9j +OJsDAJwaCejX7TnXDwxgMKez7zx/P3b/eQV6HE7dBZNfcjhXWMDMTz4G52o0 +OkoCIEWKDbiiSgquk5kq2x45sYW/A2hVrAyEtVMrYeOxs8KJFF/z+Z2sDIGA +DgbNTLmeGrTjjADZtbixs7uKYAAMkAIpJPci23gLHDDI0zAvQ0DUkLMBHKBF +AGoTEQR32nJ/aJ8bweJOsAAkia4Yd2oSaQzHTiXCjwMT8KXTSa6CgQK/ZEBY +DMmYdQMjZGoAsVsgXf0F0fCBoYIoV34oP8oVqDgYMXd4j9ZreHeYx/DOQMfh +HeunD29fN2VgV6DTUEboYiEu+8RHccfPX4w+01Mf1zgg+xOqQdL5HM7i8Y/U +9B85m0t+3XIXo0OuykgfkczLRefgHc+/Ns2Dpvx/yQl7O4Rin9r2SeDCixHC +FKDjqT/M7n51jP2PMyY7gnWnk78jmJQpjjw4FUfucRx2T57oKDqt3i0uSWkX +l6S2iz6pbRCXBtbGHO1bkXRGXJp2GfC5LK7JvCSGbm4RwzG24MsZNNn4cK0m +u0XUbKWAfdqtLdBsw3fxRTB2TAH8wMcRHGtRt6N1AJRkIGpbM/aDBI4ET+TO +Jt4kHuSJQEyYHWrBvhfA4e/oD1yAs1/8wUudkB50Jh25DJ7oMloicEegIaQe +AAo1EjJWiAw5IUyCgZlt+/KE4jh3ymbR1sfibCSXH+tOW7xQFou2vgy2yzHi +sAdA4sz2xywRlNDKlRp3iYR4nM1mj+9OgUQohZMJ8B+tTTBhkUABXgu2eJrx +CpzxMP/dsWfzH77HuHABBFyEM4mQhp+G3TawCQKRhJPftfMURG2S653qeKe+ +qtiZQ5XRDkMV0XCWHKrQOXC2Q+U6h6HyKIwZQ0UBbwzlrXxm6PjKF/oPr37t +bkpK6jeaPYYvInZWKqGp4pTv64631+sbRTkUddCQleGNzMPHml0NZ/PI5I+T +NYMmvyQfcaYypRkXY2zTUPOy7a3T8Ib5Mf8nDF5RKBTHHn9uQj2YHyAOMVB8 +8Mzr7t+88aZT59SJM6la6UhZrSOOqIdQEhDW16eMn9470T1UXJTcLi7e0N7n +k9jYv1xf3b9CXy4uTmlXACWXwYEiJ0tTgQvo12RcFP2yzonBm1rFsE3IRfjm +ZoBjC8IBoDBAslsImBYFEgIHUGBgRLJD4qNERrBKtr21P3J7MwUSQv6KPFaz +2WPtAtnZ1YKQDMFYkhobTCIGdXtaRZCXXozY/ReQE/RZEBdvJmDugE6LU3Qn +g+SkgNRAoIqw9rhJZzhWX1ULqbBtkVTLakKcwMwuI1rciBAcl5PjKieSKmJN +porqQJQVmHSEsgI6Uq2XgXGX8gQmLQhGDdByEk2VTAxqA4JiAsadoEGQSDcS +XOGYK+vh+CnCC1lS38HfOsX2sYDfsOAHN2F35ylIvGvjXW5Vxzn3VsU4DlYC +KxU6+6GKKHtOAcTYw990WYTdUHHIu0MFfq8P5Kx7fWin77Rbm2MC/hG/o+Ba +aNl3Tbq6e1i1lM71nLIl9pTwXtSJy1JcUbynO3FFfSmm9Eve7KmMsRIU5KlQ +MFrMucIjCsPJEiN/5n/aB+Ozaw697/X6zCXSIuaUH9vJ17v+A1vSE/Wv2owa +fRjYqnv6DU+JLavGZ97w/PCFN9x+HPfWTDNPJDeOlA8DVLjvzuvj7EXP6EZx +cXxT/4qYoj6fuFpxUcI5cWFSOy8uoiYZmsXUbGjnlKRHy1LaxBWpl8T1GecU +YtjGJlCVsI3NiJkpADYka3MTIteEekTIwQFJnfBtXVrY1gKGEdmW1IHB41Gl +4GOyx4OMhuP7QKPQ4bVyI5jD22lyeSRS6PSidjXLeTsihw4P0qKYvefgTw5Z +zn2K/efvxB+4qLiZCCbPVgBtkktYjDyZthxGWNaROiE/cQnoUAzlKxJRZRJR +buDPYlEdzDnKQ7mKjBbpkQLRIoaUjKYabE4SUoRTPEPq5/QH96H01Ca4wH6Q +mUSs9wIVKD0JtI1x5yRm86dIsE7DV08DcTJZ8DM3a/TO96piHfsBHwWywxM6 +I4bKI+2HyiCKAsYO5a15aej48t/dzYoN+16XXdgRm/fB+ciTN+qj6wfoUUoV +XttVS7Kht5zVrbE130OOG1PzPY7k4D+KOtTMKT+KPNT8ccTBJuwxGE/KR3Nv +G7MoqR/iK8p4N3HiosiR450XjmVzP8jyjop3fhkV9kY85ctKpfLkY89OYI5s +7HxGi7L56Tfm/fO1sY7C9IkzBftJM7GWil5sCqNk5s1xY8aLczW1fT7Rpf3L +dEXiAv0Fcb7+kjg/vo0XF8S3KcUFCW3cCHFBYhtEu7hQjqR2hIjJFsSqlAti +UEaTGJKBqU1oJoGThRfhm6SA8UZcgy8coFKL4ZuaRI1F4HY4IbXZrGIUku1T +kuXTyrGthRQN/itk9na0QrRQoN3jxaidrXDMZPowmKRBqoqlBAUw1URypgMh +U7A6WPRuHEaD8YsB0xe3/zzH34k/eIFT3ko8dBGcXjv4vPbO3dnb+M4SIEbZ +Wcr0RwqY7xXo6sCrofqga4OoBOcGoSA5Uj6U1jBi9ESMLEI1lO6fBGEiYhg/ +8W4MESUhwg64QrgQM5B1ISWnTDi4ytt3aoguRMZK3t9ZG+96Hb7+U02s00CF +bib5M0QFMljAhLk0xKUswn6oVGs3VBQ0fujY8hf69gTMvBuXuu2Ldcf+fE5b +cwtyc7pdKK6B3RChYrdG0OVfmNZKVn36Qruj6gvtzqovNDuqPsdeGl+JKvjk +bOxZka+PbRA5JbT3cVQX2zRoBDykbzN9epghY0xj/xnPxGJcqkuSlccjIyMT +gJc0fJfkfyi7svckW78CrBx97Ll360eP8TA8Nc7b+NRYb8PTGOOoZ0m/shFU +5+Pfve72j7FvUTkLsZkJZ1X7yTNx1D1lgt19J+/I/sXaQnG+zih6xZyHuCB6 +xV4UvWMv8qJ33EWYyt5xQBOG/hLMS2j5R+CyEhcmgLlLuiSu2nBe9EtrEYPS +EaRGMTgDgQnNaFQAUY2AQChQBCPqgShSKCKKR4DgA4AQEkT8QJA2AQcaSY0s +8EEPuBUXBzEVHljwcta0vRVREnW4RTU45YCp8ACh29HMD+p2wsFB3S4pU9qN +xhAhegyyptaBhB01vfsSAnpzI1x78yJcbxdGud3CKIpyu1ES7d5dFuPWXRbt +1gU9IwXhqaTSmaVpU8nKwmCh7J9l/sAKk5kaBOQkZj8wscFCgpliYkK0uMrE +AC1w2ApaNxzRx5AU+ng80kK1M2SuG8TkVnWsU29VtCPmMEDHKCl/sSdKKCIc +iJDikIkDuSHT+7cHefRk6iP/HpN19P3Qon/WR53px4ee5Eef5NvF8bkNenoD +31whP6HPW9x8Z5R2Ss9+sMf5TXcbNdGHm+hz8mOSzWS7mtntF5z64TuWWh6c +j6n4+3tRkJmiE+Qefy/yxBUcAYQfXdKVfnEpGsKiv6gr+wv7CTN2TfMSi2h1 +vDf/O3162mTlfnt41HPj60aPmQN/1NFjPXnj6LFegPhTIFhPjfOUAsZjvZqf +Hjv3y9+Pde6aMN4eCwcO3OM3p0+2E+etTOmbE1wsemjqxDnaenFORIM4N7JR +nBfZJM6Lahbn6VpET4pWsH6tolf0OaQSprpXLJzFGZlxFwlJCCAUmLRmeqdv +YxHfBi7xorgk8YK4Mvmc6JcCmVVQWgMvBqdjk9EA4hWS0UB8mgKRzGjkiVKF +TCcGh4g2MtFTySKHDpJCw5wky9tgPzONuA9bNZjHZoDUHJEULZKPJFgBT0Wf +DiTviT6AsT+axYAOcjfYHoTxYPKm3OGj4bOGj4W7Dh8Pdx06rnEbOqF1H8jR +uvfnRrj350W490HwYn6kG76FOdLtVmm0283SaHeM7opYlje5MRBZ7iT38fIx +pQSjmxQWUGIWZWYQA3e7oJjFMzwlFq0ITxv85B34L/TUxIKfi3bsB/gGy1GY +MCLIywGSIE+c9VApiZT9UGHgO4OH/Sb3pUWH/0ObXXk5Kv/Lc+FVtxT44JMV +e8aXno5C/EY9/NwG3kQu3VAu3VRuoG2Lm80ZoDHsSaxG6UZ01rMb/1QIpHwz +oDzG20Wa8Do+IWqmsSHWcItTtEaDn7QhPwmjc9FV/yQDCYH9nwM2lRQsWhe+ +HCXtv0ROeqsMWcJRz4w3jn59LvxRRo+ZpzCMfgObsfO4J9pHj5l1663xjnc8 +F6zr8wo8JLoFVUFUi+7BNaJ7yEmIWnFW6ClxVthpiDPi7HAMgzhbYwD46nig +7yzM0bkSg3NlBqNagMNWHgA8B7PJM9osikwYUQUBPjiGqrhQf1Fct6FJDEg5 +Kwam1MOxoNSzgENQ2lkxOK0BA7aAPWxxOx3Qgy0e2kbOlvALNUWTBXtNpj4c +CcRcTsFs58ZGtJxIHrQjRS3s0xKN0G/BaDaldEhgZLaZvqhtzQQe6iMiuIMa +SNvQaoqbUjeLORo3CJeBExA5FK6DJ8Ldho9rXIdPYGhdYfLmRLjxQ7nY5EUA +INC6D+VFUtwpiXbj7wCBnKqnIsb9enUchlsn9BBg5zprSCKhFWr0GFinrpGM +IrlCUkHccuEJqRGywlkEbrt1wg/Az7neqopxHiZ1i0QvCNqGXhDVDfGSogQw +K9I6DJ4ImHh/f5DzbW3akY99j/6/Bk2NyN7KTK+uYEP25gojShF7nUUd0hBV +Z37LH4QS387E4wPBTCSVRkkk5Yc76ClHHmnk2UOPsSZ1hDCaXpnGGxltMoP0 +io4m+TZEWSFRLZlKcsq6yNO3tzgFbsObbUfExsaq2GvIY6AdGxYWZgu7OIXU +xsXFKffs2UNQvfDfkcj2KdFwHh/19FtNT77iDBzOtUIYuTdbXpmw4Mo79ku+ +g7g3edG2Poe1haKTb7HovL5EdPYrEV38ykQXf4iActE1oEJ0DawU3TAQ1eBH +UZVwDT0tziZkAdVwI2ilkfTSA/VS22DSTEtePaNQL88RrAtiWkUffbO4OqFB +XJ9ULwZsqINAMAMATyVCCgGwpp5FVJVIKpwGgtIZm8HpjeY+A3wpAArchWQ2 +kUpCUHrYSNkhaG84wkjRRIEwRmxqkqCE70dswXQxAnhELiNlHhmTCiaHACT8 +N3brQ8VcjYuYq3WBLWgVIrhOTg0i5woiRzGQp3UbBOQgXHkcgH0F9gbzI9yG +IGDu5yOUoIHciIHCSLfeYp0rRYnO9XZZtOtP5TGutyB6KmNduzGqYl2BSiIQ +b0A7SbcX1wKWtXpX7OEA7vtNV3Wcy02g7H6FznGgnHnH4VLZQ5KPZH0J9MVa ++8HcsJm9O2L8r6cnp/1Vu/XUB/45/6BFBozsHUr4XiX5dZhqbOkVs5yV6bWz +cli89Awmv66OvexCgSP28gvDQw/kS0/qMwKZOqLynZWfQZaU0gh7VGYmVcZY +873weVN89E9bWVnJ6ygrt23bNjU0NNSLEGOtJ1CChfYp+K5MJbWKFy0Wx5FS +tf81aOwxFPWzIx4fHWL92LNXR/z2D4bRr8+CmA3hAYZzjAfoPpjPj2a4Lftg +3OQ5Xz/zmoPwltfOzkkri7onryy4N3VFjuiwKkecuTpPnLkGYm0+RAFMV8d1 +hSATTr5FD8Hp7FcqOvv/O6CuQQQoj4TyiCc3WnQPNWvp7DCmox7hMphoZs+S +kM6LbBC9oxrERTFnxVV6g7g+8bTol3gGwiD6JRlE/ySj6J8MQCbXIZAb6kBF +zUA2AJANCCZHlpUjNolMKXhJSJlvRQ/LtvCjobBNIgqUhmWiZaWMMzxL5pMC +NRMa7SaEWsMYFSM20+VspDWSSqDxWSXiAd1KMSfcBQ7kalzhrwDJzNNiuLKI +cBPzI1zBdGLAOIqNCyJd+1i4UV8Y6dJfAFEY6TpQEOE6mB/pMkg9oM0PI+DK +YRgjsrgfoHXl+4uiXPHlUvCTJSzulepc+ZsVMZD9QQtGNM4FBNS1pyrWRSyP +cuwrj5w5CCSSrXTgEUTIYdFXIo4lGoehojC7/v26lX1J+g1/02yuuRKa801r +SMlt+U1/+P4yYwQGvsAZ33quMr8XsNb0nmeOHVMatLh4iDnohbajpJc+RRlN +j+yjZhqRanoThvQaQ6mnR/t19AZdSTzNLBuYpp7Fc0PMWcnjniUve8o94shL +arWa3Z2pUBQVFT2j0WjoZk4ltQoHIGs9gLeeUGXtVIv1PqSb85WvWwCLoEqV +l2fMz7Y4yrV+9vDzU9kKlU3TY8+8febJVxzrnnrN+f0JDov6Jk916PzNS/Y3 +X5i0Vnh7/l5h/OIjwruLjwrvLj3e+e7SE7cnLDl8f/qyg6LdisPiDIyVR0T7 +lcdE+1UYxwHaE7zosDoHJpnD6lzi13FNvui4tkB0QkFdV2jBbrEkrKXAbSkw +WwZhKa5VJK7uKK4hJK4wgYFc7mnGbjjzwR7ggZdE1YqrYmrENXE14jp9jeiL +EX9SXB9fK/olnAJmTzF2k84As8BushGINZKgBm5AZoFJCGBXcr0qMRj4DQZh +pUirh8BjIWnoiEPSz4qhwHEouV9sVQRtmByZGFRhhXYkkRsO7leDBEsUazE2 +NYLCNpLCZiVuEnPDAcZwF5WYp3EBpc3TIJuuZjYjiEkeGhd8ZIwQdZFDIRYC +aipoXUQg1SLAgAKv8JXBfK3rcL7WZbgAIj/CRTGEPzcErHKPDxVGOA8XRzg8 +gBgu0toPF2ughyjUyEqIMXO4QOM8lKNxF/fpA2+ujzvwwZrD33C8MawGZ384 +YBeG6wjgmljy+gK41McoHCpxQRAkzvwiQgxS0IdeqSa9Zk0tvaod4UPRNL/H +3chUk8e9kpJG10nWVQE0Dtd4b6gd+8rEWdzzjIDJMPvRVzJvyVp8SQ2u0YjB +KahV2cTHx+OaqZYsSQ9RPiyA0oOVT0qrI2PJE/8biiNHjvw6MjIyEMaPR0VF +2ej1+nW4ts4m/CErXBhrVHR0tFVKSspSqUqKKqxOTU2VVwH5OWbZo9Rjpr/w +wgsH//DGWzsnTpq6a4Jr8NbX3VK3vj4r49CY2Zn1Y2ZlNI6ZvbHxjTlbPhw7 +Z4swdk62MG7ethvj5m29N94rW5y0YKs4ZeE2ceriHeK0JbvEaUt3i9N89orT +l+0X7ZYfgDgITB/6N64dGNeINQCdywQZoZbAdkSo1xXBZAesud9IolzKxPhR +xywltm7oloNPih6hNaK3pkpcGlEhLo8qF9dGl4vrYqCPreDFdXGVPKBcDdZ0 +vb4aYD4JMGPUEtD+IMj+AHRAsgH0N9kIGWhgMvJshIA+pQ6YxqgHooFfDMax +CgHmKXdVShybMleewFVTwhpuETtjwNGGO/PAJ76OKg8lVOMs5lO4iAAV/AUU +oNEt0NI6CRFAHgRyx1OrsAQWn6SGFml1NRFbhAEM89C6cDa43Q+/gewOwK8O +FWgcgT6HB/ka+wesB5V8kB/uwD/IC3fgRj44rp31YGf0+gfpsbEDUQn7eldn +Nt1bkHnl78t3ffF3n+1/+nD1ob93+B77oTWw4Ba+O1ohvTy6mpazq5bfLf2A +LReJb8lV0C55pRBr+TXUbFUtFFh5tQRjxCkmtvQaRHn9H8s3jlqhrrKXKVob +JcJN78uW3yYlvWGKJ6lVyLss13JoXHvw01VjHFdY3ur9CoifJ1DkyfwsttYI +93SIqVLg0o3YjwP3qzEtZ/5bdVpaGq6VhWsio9bi8sp/gJ97MiIiQgtjfJmV +Oj09fRocOwDbxyBmwNg6MTER180qhm28io7rvPpC/x8YZrqrfAr24RJAeP0d +TwXsD+JkM33ppuffnJX84puz0l58c07Gm2/MSrN/Y1aq/RuzM+zHemw88AfX +5LpX7YI7p8xY/L2X53px/Owk8V2PDeKEuanixHnp4iTPTHGy9yZxyoLNENni +1EUS6kt3idOX7hGnP4S6hPkKxFxCfeVx0X71CYich1Ffy/w3Yu7o+0v6XUb6 +7R5YLs4NLhMXhJWIKyMLxdWRReJqHUaxuEZXIq6JxigFzCFiysR1seWib2wF +THjfuEpuFGBeJaFeI/phSLj7g4YHJJ0Gyk8D42eAbwNxHrTBiHqdUgcaG5Ra +xxiXNDsEI62BtDoknfWhGajb1PMo1MC5Nv20eFi7QMwLc2YR7oxgK5FsRNbE +OD4/CluclVgI1hn3mwK2CynoXfdwJhgpo089BqEdQWKM233wnYF8rdNQvsZx +qAAAHs4Ps+dGDueF2Q/BaCgvlEUuxD7dqntJiVt/Ck6v/mll5rkbSzZ/+NPi +TR9eX7zlT7ywNPtPnBW0n3Yt3vzhD0uyP/5u6dZPvl2S/eF7qw/842xQ8X2O +1nYFevDl8GEVtL4Wx14Yr5DWgMW1t5BPIB/fkC2fB2hpoHB6Xza9OhvstdG8 +ZpCW1sCU7DZ7ZTDabTg1KNmiKQx8af0hUnxprZVHenqPo1LOmM88dF44t2rf +x6tfn7kcFzbh2MV4ayTvhfDwcPTHGIlA3g6INohsE9hqBBhXfMVMVnHw4MEM +GOP5gC3RZRsCm1EWer5bOn3gGFeBxbXz+NOnTz/zyzyz190pFQcOHBgJHIfB +N9bgGYN9FJ8nubTqXZWhfKU1/HXVrLHhnrycuXjcpyHeLp+Gznf9NGy++80Z +7mG3p87W3Z7mEXN7+pzYe5PnJN2bOi/53jSvlPtTvDPEyfM3Es8mlpfsBJ73 +oGzDbJy+7ABII8q2nYVsz1h59N/tuEp0WJNnVm5S7QJS7CLuCdHDv1CcH5Qn +LgvLFVeE54grw3PFldo8cZU2X1wVkS+ujigAlAHnKBllGWfEuBSUOqYMBM0X +aY6rAMmuBIpBu9fHV4OK+SfUgFafhKgVAzAA5MAkBnIQgByUghAHp9QpkFvg +i5Er0Qt9bHKOeFTjJeaG4QtE8lCE88NxxZUCjYsJUBgTrdi4EKkox86MRxux +ED5aqHHuLwh3GsrTOA3nhUOEOkigUQ8JJ4w426EToS6DR8NmDWQmpN0Nz6jp +8tn4gbAw60/Cwo2fQP8J9jcXZX3IC4s2AoGLNv1JISze/CdOLQCR1xdv+ujW +/LTLf1ma/Unb2iOCMah4AFf9GQIMy4a4EWwBk/IhtsZkuWmdSYgHiKYhvAp7 +hiQu1kytJMvhbPkHBbGptJRmBFMtLbCn/be1vdRGYvCkiUdjJMuHJbHGMpaa +8cpeaEyhOdm3+TW7xa8z7NDIyrBg8JcvX0azjFMfk1ZeT+Irr6DMIGAoPg+H +a3F9c+lOzhggaPkvo/i+xdKUr8FXjsA2Fn7/A4qs5KTEPwdWsjylb7ClwV59 +ZvLvR25aNUHVsNfbCkE0VENUrbEx1qy2MZxkvfEkjtl2R/ridyDGQ7z7Wcj8 +WV+v9Fr49Srvxf9vufeyH+bMC+h0nxfWOctL0+PsFX1/4jyQX88McZLXRsB1 +szgZpJdc9qIdgOxOctnTl6L07hPtAFgexReYowwaUJ1hkT2j/KL0OqzJFWf5 +nhDn+R0XFwUeFX2Cj4jLQzCOiitCj4krwo7x4sqwE0DDSsB1lSYXguHKUC3g +xTVRhTDt14L4ro0uhigBSDFKAdMyQnV9bIW4HmSXB6mtghOJf3w1sFpNvAYA +r8hqYNIpYjUo+QyPsAKdocm1YmZMMtIo5oc6iflhTpJ40vJKYc5q2IXL7IUj +ixKnzgifHDztfqI/P9xpEL41lBvmOJwbCn3IzKG8YBA9CNY7DB0O9xraE7FG +zNJF90Yk5d5anX5OmJ/+EcTHvDA/42NOJSzI+FhYkElxc2HGh9hzPLSf8MJC +arI+4UYIiwBc4FWOzgWZf/zcZ9uXbasP/mgIKBqkVeqCMIpxVbqgkkEALKhk +yBBUOmQIhggplRBmS8ESxkxXK+Q11MOoqcIFLUlUaVHLB0Q0Sisvr8Ju8tZE +KYMY16MwL495ki1XIassfU5eybbW5K7Dq/v2OQbue+7VKR6cRGmgxBEay3cB +xWnS4pRIhCvaVkYkgpJrQaReWirpF4isDQoKsiRyDxxTZWRk/Aci2T4lXs/B ++jJ++1n4JrtDTvXkyJEjV01/UXEqcIpKplESSaWJypOMSgVucNMsATVWrx7R +lLviqZajy3/XcnTFc+cOLH+pPXvp2PYtPm+2Z/u89XHkQudvfDx9vvHxWv7N +cu8VNxznRoBXThYnzEkhrzwRvbIM7EIAdtFWi7QYvfI+8spY6pq+/DDB6rDy +sOi0+rDosfagOM/3gLjUf6/oE7BP9AncLy4LOgBxUFwefAggPSyuQFhDEdaj +wOkxoPQ4xAmgFEKbI67W5kLkiWtAXNdEohAjro8DrsWE6zqKEtFXwnU9Rhwg +C+rqhwEK64e4QgTFl4sbdClY3A3BFTVCadkmABNGACgtTBuKyzaF4eo0YUw8 +AcEwtLIwxBGEUz98fhC+N5gXgijinTY5wY7c49A6DOUEYdgPHQtxG9oZsX5I +n3CwNzSp7MaKDS3X56f8sdMz5UNhXurHgmfqRxDQp2F8BBx6QasSvNI/vjk/ +7QPBG9ClAHKVyC+P+CqQVk59fX7Gh98vyPr4k6Vbvzrre+KewT9/wOBXAPrp +XzAAyad/4YAhACJQjiKI4gFAFmOQqMWlmXFByeDSQcJWWq65HHJdxFVpssFh +lQ8kYCsfKEhtFcbwh2jFVmmE1hhWTVUt3EMJMe42F7gsPHK73Zrs516bxB7l +YUiqt+GKyxCLAYExYEbRkKKYsiUy1Lhs7C7gayzQiiUoXIgZRZRpp1KVlZX1 +BGzKSLKykzoCvhEiERoOPVaXfnX37t3/QCS7iqO0Sk5OngE/iIuv/w6OS1dw +Xp/wgtVJn3eUZ08skUgkEDmVUWJODtrL4wgbWyXR6WKopaO2htq1tobTFDam +3rDW9mz56l//MWHR9E/DF7hCuP1r7px1t6fNjgTnq7ttNzf23pQ5ifemeibf +m+qVcm+ad5o4yRvoXLAFpHQrSSk53yWsYOW0fLfovnKP6LVml7ho3Q5x8fqd +4pL1u8Slfhh7gEoMoDNwH1DJ6FwOdK4AOldIdK4kMjGOi6uATiJTg2T+/8LO +A76KKmvgszOv5VHcVbAAsrhKEgihhxIS0nvvyUt/L40SSCC0FAgJAYUQekmh +CYgiRWcSSiQBRFlcqi6r+6G47i67DlgQpQzC+37fOffeeZlQ/PL7nZmXaW/e +ved/zzl37tzD6CzeCkLoRDaBzB3EmBIyHYZ0t1Ixfa7SVOijtBR64YPOQi9c +eCOBhd5AoDchUCBLo8NcknUREFc4+X+BMcIZb2+GpQk/25vzvUEm2xsL/O2r +pqY+rCqp+NVW3vpLWnknL4fOvyDIoQtgEVZ+gTPJYRUX5HAiF+XwSpQLNyMr +z8kRlYgjsAVMAoFIZCRI1MILVBahlQQzyvWE5SX8dCNq4fl/RC06dyRj889S +Vosi5rTcF7O33BdzQHIxSTJI7tYHgpi7DaAkZNrI4s0HgBzBES3pTgQwny53 +AYa7iAUlyS+J+WQeMAjLrq6j3q/qBb8DOBWh4ysRSCmUEqx54g8bkUeWpZb4 +w7Dr4ZGoqg/G4ZtDtKdUN07jhxJ3Ff1UTodkoaM6hxk/ljgzDiBpg00YBTZh +Fy1AybxXHfYAvQvbvgXJdxCoR7ZEFnp+ijNwwJV/qweXWj4BDbIfdkPh050B +rEfIZDKVBQ7WiVUBhrbtyYw8gRhAZgwpcWgKcbbX/Qw2XKvgHYT1wUw8EJCD +Ukb43qcC28QsJ50o4oRiUrYT98rHdYlup2sTh59ekjTidF3SyCuZUTFXMqPj +QOK/TolOux4UXnQ9OGLK9dCoaT9PipinjAmHYDSyhnQwecUuUSYn1CkBSXVK +cMpSJcKyVIlKXwYoLlUSsl5XErLfUBJzVoDUEySTrA0EyWRAMhmQTAGDmZK/ +FuxSasF6oCKtcAPIRkByE0HSAgbTQrGEY9KntYCbi0hmAJLZxU1K6dQqZX1+ +kNKc7ykoLfme4GCCaVJaCqiA96iDhRf3rLK1wOs+fHoA1uthM1iwpjwUb/vm +PD/76sJYe0NRkn3ZVJt9ybSp9sriCqVo1tY7aXOP/hhTdupG2JxP5OCy83Lw +HAj0QuacB3MVMvc8yAU5lApQOO8C4ZEDFhecvxk+/yysyX/lsAPA5JFMAZGE +T4ChkRjHSDCSYBZ/DJ3/8adxS77oTFn1rZjZeA8qLQuWOjGrSRGzmhUxm8h9 +XsxuuQ8+ZU4LJTBnK1JI1iR/8q+gEcxSoqF0mEnbjofo2cIxQCVcFrgkPBKv +dhd4swAlOrPEr/1frodEwHyHhaQ0LJVQGIWYlb0tcdnZyFcnJrH59HQ2nGAD +OEK1RuHDSRToro0CWf70UbAtCPY+h5rfg24bCKeGwmkD8ax+T4eHvt+nQ3uV +zqb0wIcrjPXxY1/Wb5ruaWjdk2YSARieWi7VidRYL0wlgDTpqa1CfDIJNl3Q +wBHvE5vlhNAAM2YewQH3Az7iJyQIRZLovJW4xrn59GRivv6tBzN7tW+3vATS +r31Her8TG9JeO9WQMvRUQ6rb2Yr4sVctkQlX06KTr1piUm4Eh09RxobMVzzC +ypUJkRWKV3SVEhhXqYQlVSnRqVVKjGWREmtZrMSl1yrxGXWAF0UskSC2HGev +z63nlWRrA9cTlsBY3mrgizKWCmYPCHPwZQGzZwHGCgqXKmvzAnilKW+8DhYT +uBeV5ryJSkuX3If/HzTaJj5stE601xTmgOTay6ZV2ouLl9unz1hpL5qx3l44 +c+MDa8mOuyklB34Im3HsRtCMk7L/zI9APpYDSk7LAaV/lgNnnQH5hJeDZv8F +jFDQ7LMA1TmNEK6Qrpuhc/7yGF2I0rwLctj8CwQsHpc80iUgXXDB8Mrz18Mq +zv0nrPzsycTl18T0jXdB3zM23hXEjE13oZ4zNt8TM1EamTRhj2h20z1cKJxB +hQwY+xVsHaFKAuEJXgIFi8LFET8Us5g/4Jye4IiS2NFBGFg9jiAG34GJalnQ +2BG+4EjeoDGRPd2949kDAfT68LkgPobwBkh4VG//p8PAbBYO5UGjhuFVEnsi +wR6IkEFu69xeEA7uSDZJey0mweGvcYLGelAcMDXUQYfLRoVZjUw8nmJAhCMs +8MSI6HEKSlGFoJVN4qqZGVmdrFKdNJlO/srSR7HpzB3JcOhM5144iaw6Afrp +15NGfFYS6wcS8HlRbMR34RF5t4Iip9+Kjp32c1zC9DuxCaV3YpNm3YlLmXM3 +PmWeEp86X0lIq1ASLVVKcvoiJTmjWknOrAFiljFqliM1SjIYp+TcegBmpZIC +xikFwMm3VSlrrH5KU66H0mgdp2y2TlQ22SYpG61eyjrrZGW91ed+dV7Ggzl5 +U+2FhdV2MFT2tKmNdjBSIM128B3t6dOaH1qmtjwAuRU55R3Zq/Cw7FV0BOSo +7F30gew95QN58pRj8uSpHfLkaZ0gJ3jZZ/oJrpfsV/yh7DcDBPkpAX5Ku/GD ++CA8N4Nnn5GDEJzZ54ANQAhsEzAkEFMFHKGNAkxwqQOKziNEVJjXyAnfB5ed +/ltE5aW2lNW3oErS1t2BOrasuwNyV7Ssvwv/pW9AdIAlJAlFApgAJdyXSZeN +d8FYoWCWNDBYcDyarCzwGLO2IE3oOaJ9Av+Re4Z5jxSlHBWpbb9K1u2/Eptl +285sFpBk2/lQsm2/fzh8/lHi0VGnymRl4Q4+Ku9VUlLybHFxMc7vVAaCwQyd +MsTA7927F8ewzWdeXh/s4rh///5vDIh5hkKDMOEjQDRI+ICBxm9C2mt9+O3F +nnrx7TRt4NP1iWOWJEONfMwMIWpFNNaEuGAEHCcGDxUEx0ineqXTjZMpYLtS +FZKZyQWWi62dpcqlCQOO0WnNzVyY2GE1ix2Y1YPmyDmyP7vv6fWWoafXp7ud +3pDhfml1+sgrKyweV+ot466sTB9/fanF6/qydG+QyT+WpCUrxWlpygyLRZlp +yVBmpmcpJRnZSklmDkiuUpplU0qzbUpddqSyJtsL1hHKzOwipSi7VLHllP8K +KD0AK2SHtT3J1gCyyg62CGSNHUKwh0lgi2Jsm2+H25p/8M3Zfd0z5115Ys4B +eWLuAdnT+p7saUN5X55kE+VJeZI8Kb8VpA0QaqMYFR4BhFCOAkJajFCOA0Uo +J4Chkzf9Z+D6FLVFJcwWlQBLpZgjGmgihojwBCyhQSJGCfYFU5TmMJTmOFC6 +EVz2ydXQeec+jKn9RkxedZsXU1bdhrpIXn1bTF1DBFQjde1tqJG0tbdB7iBY +Ytr6OzxjyrLhLnKFNMGh6ZuYhdIhVgiVaqV41Qls1DqBCnUCjSQUy9nicASl +nC339oTNO+Y7aEwMA8WIfX9V7GmXD0gYfMbOvb7Tp09nnpShD3zeycae4KCy +Tfn5+b0g0PkNSuggNR0ihyNXXoB9QlNTE52pwaD38PAY6PqSU+3Y/kLHinBH +jMJrLc+BjC5niyfOlp7EKCIRByZoc1ioQuc5FoAQhznhBAcpLAUGNShsyn5i +WI5iXieau4ahwhIbElw6CDkdcDwiQ1IE2FhenD9gCilMLqpmdJeOWx3JPHDd +fjS31wftub1h3bvjSO4zp6ScZz9szXnuw9bcPpffzh5wdWfWII6/ujP7Fc7l +3sb0ocrGdDeQYcra9FFKffpEpSo94v40S44d3Dt7TOpCO7h39rj0GntcxhJ7 +XGYdyLJfIzLq74RkrPneM635xri0LfLotDflMWk75TGWnfLY9F0gu2WPjLfk +cRlvy+MyUd6Rx2e9K09Ayd4nT8jZ30VX7kFC1ySkC8jyymuVvQracMakgkPc +y7I30AVk3fQpgvUUMFRT2oGsLiPlQ+g6KfsWo3xIyPKb8VEXXaWELGqpZjss +FVoopOo6/H8taPa5S2HzPz2U8PoPYlL9z1APSSt/hrpJWnlbTGq4LSY3ID64 +dCJIpTCsUtaoeN2RACkJ0UoFe0Wtlh7xArruiOkoyNdGJM3h/TnB8p4EXEka +7w+M1b32oNJDPi+PjNCPGjVKDU8sjw/uMmCvuZXp+2jwzNAxQ7NDu9IMI2Ez +doXrVq5ciZuxK+BlwOI3IKJxjw5tGA5amc1GmLhTcuP69vjd7tneemlPaleA +f5AG+QwYwdGzJjIXzYm6aBITjYvWHR4z88FUhMxqnkE2KT9LfJGtTfMENieH +pn5qJ/i0k8TTGqSY0HwaNJ8o5kDUkYxsmsxslC7do3TpSI4cAcEST7KMOQJZ +uuH/4klg82Q+SJ6TxParx7V15Jq+2p764q1NCc//3Jj0/O21SYMezEvweRAb +bbsXET3lJ+/IspsTIsqvDQ+v+5dbxHLZLXKl7B69Sh4euxZkvTwyfqM8MmGz +PCqxEaRZHpXUIo9KBtiSt8mjU7aD7ADgdhDoxlgodGMzUN4i0I0nsheg2wsw +AXacAaDbr0J3c5L1AINO5MGWSZwJueuyaEWqc9hOmZtyjEfowBmkvmEXdn4M +O/8Sh3N4A4Ksf/jPPHU4ZoksxS37Aco94Y2foNwTlt8SE1eg/IzCi4nAm0lK +WvmLmAiS1EAlueEXiaxX/YKmTIfIQaCCwKUQ+8VkHQraMODN6LBhjLXWtLU3 +DwcUS8RLYxE9DmwcysYiswx/QiVoeW/w2LDzjeNnkx4CdVYfcgQ1XAbsyK5n +GOJr5KvAKA2Gc36DJ6cuntzgSB8QHJ1Fz9Bj1ou6tBF6cWGAsW1nsglZoh1k +ArpllB5wyrLMaoCDoiPhDWKjzrdPsTHTDBUqSg4DxJlZMjSW5oLZoCMsuMGU +GCQ1htVJz5w2knONJX8CImg2QyNNA8+4OU7TwqP5Uamw4cMxDQUoPNmpJ1Cw +TQSWEyTtL+4bLh7PdWo7lmP66IDF9MXORKPcEmu8vi3eKG9HiTP+fWuc4dCW +WOPMtdHPBvkE5Pq7+JX7u/hXpTgHVNU6B1TWOgcuqnUJWtziElzThuIauqRt +SPiyL8j40rBlMsI1DOGKWiW7x6whcI2I20DHjgNcI5OaAKwWAAvgStkmj0nd +DgJgoVVT4bK8hRbt5ngADK3a+Mx3eDBpe8FVe8ygWd8D3sBZ5PohW4gWcRe1 +cHkXMlexqJ26i90N2n/B0F0MKD1zOGLhP8Tomv+K0bXfitF1shi79AbIdyA/ +iHHLfpTiX/9RjH/jJoVLQLikBAoXh2T9AnVJqOoSAdGCCmFgUVlNTBl6iGvQ +a0xa9VOTR8raSc+/OpHrSZUa+wDU4UfqsAnsV5vARjHi4CL047BjjXYbGKI1 +tKANwRFLg4C8/5cWAUcpDYcL4ThlbjTd0xv+xo192bA9YZiuFSIdTQij+ma0 +HxkpoKCY0dyIUhbrD6DAMEeNJXPRMRtjpnYl2yxosgcyR41BwtJO0/S54gfW +xzw2QVT56MwzqwkNO/NYEl4HKHyXScFPXdt4hAPTI8LGk1YHKiJFBU4XkBTO +6erWOON/Qa5vi6OM4Lol1jALGHHfmmAesCWxF8scPKj3iMiF/d2CKvu7hSzq +7xZW6z4kaNE4V5ChoYuDXIMXVwNDq1yCqle5BteedQ6sloEj2SVkiUzGZ4e9 +DuyskN2iVsrDolcDO+vk4XHATsJGEDRMTWiUbo5JQXa2EqOkZWesZSeP7iAY +FuoM7qHOYBY6g2iX9hF2wCbxCA7O9mpVfUGRoOMF6BBsCg4BNoe+BbnqXdB2 +InDWWTG88isxvOoqFE3Ewm84kxix6J9i1KJ/iZGL/y1G1Vyj2NR8K4IBEmPq +bvBibN13ULFgi8Q4pOb1m0DOT0gPsU23KD4i4pNUjx0P4Ag6/MCGX3YN9i56 +caB7kPo+ixYIfFrK24jZwP4x7DRGYXOgG/CB6kbmSPUDdX+XPdvpDgKOQMCB +SFrD1HvmzJm4nZikCXTbyuEvCoer/Y2t+ywm1gWmZxbCrOkCRr/qyWbCiSg9 +lNhhVe21gUmXceAfC1DMVPlVA4HxSS7ReBLPE19JIEpsRAXWmgGiyLg+QZwv +oseH27NNF95ONt7aFG1APb4Gevz51ljjwZYYY3BzjIm/tL+e9bkHFb3qO6/I +2W9+kbN/1RTXwOpLg/0qLg0OXHQJ9PWya0jtV66hdV9BW//t8Mg3rqEjNSyq +gbX1qLPoSGFb39TNkRqVQnV2dKrqSKHOqo7UWyB71LaeOVIYvdAIZiIKdaS+ +n5D1zt/AkTocOOu8GDz3r2LwvMtiyPzPxZAFn4thC/5HDCsHqbgihqHGVl5F +rRWxYY9c9A0I1djImmtSVM1/JNBaCRv72LobEmgtNPTfS3FLv2cqC7Lsphi1 +8OttzpOLGeOkaX40MEAvB5UHg2B8lwQVCJto2mWkNy1YsAAf+6NWtmKEje9U +juqmjkUFj2d1/T1c0YN1QGF04EkPnej6vK5xynjD0Q3RJk7zFE+nUT0nGhO3 +Eb1U+1wdCbe6craaH3FNWKtLHROjmo2SOiawPm5VUy6rmSx16v/qWmCevaa9 +RU9EQN+d+isOJYVDmG7ixTukDKKf18AfubElzngR/JDdoJ/F0M7+aVtcT+41 +8vMnv+AWWOHn7LsgwNW/clFw4uwZ4JPUOAcuBFlc4xqypA10tA3a1LYhYcsu +ok8Ca3zvBdrVetBT8Emi18juTE+JT5KwmepqUjPzSbZCm7pN26469NQjnfgl +Nzwsu/7tkb7rjKdNOuxTfEr0L/lECoBWMmDWOZDzYuDsi2Jg2UUxaM6nIJ+B +jv5VDGF6GrrgCzG0/O+gp1eksMovJWxZI6q+loigjlb/U4qs/tdxaI2bRsWv +LXjJNQSnTKbq55TNFKUnqCHGoBNZr04oG9n1PPbqsHnK8Bg09l7oaI9+ur5R +B0OYBIfFMV3jvKkOvjBuUM+0CQOFMyVeBvrwiySa0j7wQhF+O4xUnWCO9Vw+ +pSuGZGUUMCDkzCwk7ErzzfplWNZUs2rQBZa/+ASGhjaHvtFQUTXpaO27LDpR +Zfimz6EFJNrWHGM8B1pWCp+HbInv8dz2lGfVWRGFxsbGxO6OmEv/YUEVIAv7 +Dwutdh0SvMhjSNBCjyEhi8cNCastdQ6sanAJWNgAVn4rWPkrsJZdgmvlISHU +wg8Nx9ATNBFCz2ExNPQcEb+hmxZS75i0lt/C+hvQyjPQIoreU4+Lk6edEH2m +nRR9p50SfYs/En1nfAxyWvSbeUb0K/kLFKR/6VmuB9HCgLILUiCRS2LwnM+k +4LmfoRa2Bc6+0PbKeGv4APeYAfgyOBt6VAu/EwcMJmHLBTqAnd7Yj5Gr1Ryj +VnN0DQ0NOCcDvkAzHLXGj2rNy3DVptihOnFHklPrgQyz2svQ1W2H7ZIjYHJy +5NjE/IBHs6lNbIfP6uMfVBh9l+9noD11qCFwEhXagUC0gQRQpBOBNFTMA2RK +Qyymjjp/9JhcKp10DSXYSRu/XKfDR7NMF/YkGb9bG274AjSkviXO6NEU68QN +e4J20AcOr7422Hd+obPvvEJn/8pCl8BFW8CGXhgM4hxUfdE1eMmX0DZ9CW3S +l+DrfTM0oh60oQE0YTXazu/Aht6C+OkyaEOnR+beQxNz32/1tLWJngVHRK+C +dtGr6JjoXdQhek85zrThJGjDh5Lv9FMS0YTij6VJBYePvepVPI2DPzqAUzBU +V1e7qVE4j4/KOd0YoB3n1JjFXooo0NayQa1lTCiDD0E84Gh87ymAWrS+JpMp +fXg/oSHfQy9V+Bqk9zJMjr4kZmsetTc9aA1DjbbnODkeW2CyVUdDYHWsOW23 +bCcKrXAeaxutjrWrJaCpzEnwa9O4+syTJ3anyyHCc6xauyN25ji1fZBtOvGe +xXQR6vpyc4xhY1OM0QqtgXtzvJlNbdC9rmkp9Rdyy1r8BvvO83Pxq/AD6tNc +AqoWO6MEVi8G+t8CW9TKYuSj0BL8A3yny9AC/Nk9Zm07+ETi2PQ94riMvdK4 +rP2dYyy7T0HdnxoSUnNqSGjtqaFhS5qc/ebm9xnkSabMZ04qklnG3jrj+BAy +PUO38RWF2orU4cuokTjUEA7BYb50LKLuWbii64RBxiVj+gtnZnkZdCwRp7a3 +gkHIPeqZfmBl7TUnkBTxHV19fQScTsZkp5ZR9BxsLE7DpSP3tRnzYxMeaQdF +L9rya6DsgIYAKkmC9YkDqaavm6ON74LkbYwyDtsSbzbvzn6ZzSzYvZLomJTn +nnMPrug3LLiqHzTX/dzDa8e6BFV5OPvNG+0aUJHz3CuTV/R6YdiK3i8Oe6P3 +SyMi+49IHvnHsZkj+7lFgkSN7O8W3R8aM7xSGIk4mMMHHl0eay6xk2kway6n +dzOyOA0Gln8pOROXJgxKOAFflHDUF7W0vQbC12wbN0A4sD3B1LYvzSQdYQ/8 +1LhYS40jQMAK4AwSc9RIX6rDWcslBo80h7msFqAGDKQG9NRgEnGQQY+ktlci +l0PJJjXQBk1hm2Qxnd4SY9yxJtzw2ra4HmOfUOijWAFVVFTggFR87SqRFcNU +9aksGefDCWr4Rc6w0JIjnRkmqtU4Ls6TCWcgS8E0b948xznjaGPkx/N8deoI +vVTlZ5Basx71Y4lXwZmpE8tELRDtZ6aivKqhDu0kZUS7CwS1ASEFRYrLYS6g +eo5lOx05lGE63BJtXLEj3pSyIdL00ua43uxGuxcUdWe7FwLVrh665cuXv6aZ +wEH19TyZr4dP6By+HhsLhV0/x0DeAVkM+zJoebKH1vgMELtYUTgDWZJun3wm +nJ4shTA4E4MZctYIFr0MHDjQxXOQacnY/oKYM1p3ZE+KkeO74lM1OiX8o2Z1 +MG47rY41p7bbjgKn3p3gUEYWs+axZp30Yh5n9p7HguX0H6+LMBws89SX+L4i +DCn3MT+zJqaPGqY/qWiLH/dxyduCMazzDH9yMvN1sEj+ALrKpkScisMyWaPK +saIcT3dhN9xUFWoDRRtfMkKyCd16yjhaWRyTQ85iXRO/79WrV6lLH0Ga423Y +926aSdyfZjoMovZodXR5M+TnmzlSWrQzy6a1eI6+KlJUukcU8dCRTJMETaW4 +J9HUGTtEVx/mrHPT6XSc11NLy1CuKS1sn/BXoI/A0584SDsDUL+nl5Iv3YXm +Jpi9RcLpyVJAlfVmkwtxhkmPWy56WRNOjhcMTNsmDtTNjR6ia57rrd9T6WP4 +sC7QeOTtZPyh1JdHVq0EWHQJ1QLSECqRA7FYTGjmsWg6N0UZd9b4GeY3RpmK +Ilz0Iwf31fNwE5OfXjL48HwSu29f9rvwvv/49FIIpbt0K1asQEi12OGZDuwM +uKTWwgld8VecXzC5x7iZisYPELYHvyZczB2tOzN/ssGhFfTHdvk4xxlb6F6p +bHXmElt5MX+M/lLuKN3uCh/DivEDeLdZXk5/HDXAxM+ZM4c56t1/Lp1AzRSq +mU6GtNbr1q3Dn4y3WoEDnunvwCbFUXO/URSkYTeVECXCzjWkDIUzkKXA79u3 +z3EdM2PMYDCUgPt6JMJVx/EdoAOc0BHjqnsbyMftHNkLfq2zs7Pj3KAn/CQ6 +otqoq6+vxw5D/EbsUcG7wdbhVfwlLMXK1vz8/P1syB2XSe/dSncNgsOCWHzN +GXBp8iLai5MHCM3NzeSw1Cd8P30ybMZ+IYyk1HvF87wYDRmsMR8G20jQyZOv +EbTHc+n0fmhvJenExx5NFE5PlmQ4LXojBUStyFJw1cIV89TbM+GbYeHwpez0 +ArwWXhVVV7906dLl9NupVSCViK+ezCR2gywFfCr+KnsazhnIUsBBWY5vfxJe +7M1oHMWL32RGveTxXJ5eVKuIXAO9hyX0nB5lZWUTutUIJ/izUIVUjYFW0PNs +EjJylscT7oE9AuE7Ojr6sAJXB/pjxaKlTQNB7Em9rKO3sZIeiN5IPyiofoRv +shTQ2caSLCQVgcsRT/he1uXCv//++39SE5rQbWZU1nD20/ldu3YFswti7eKI +A3SeED46TE3vyt4GUgWLgVtMb3MbYY+WJg7xwcIllaNnVYQM//TTTxpWnnSb +PXCOxQRt3A/tGtoHHEJUzlQBeUKnhSWI0EfBfZ2DbfPZ/hDNfe2hFw9gbwIG +EiMR6HD6vJlwBrIU+mpr8bmn3qZJvU3EC8/Evi/1OxAvatx1+Ox5BmzaDIf2 +hXKooTd1kF4Kbd9Lj9RplKZ8OT1ZCug5PAtlQEvoCTdF+4aNWCYYTeOMQBhN +4xXxB+nr6urUF5WNVVVVOayDGMuVFdMJelX0obGVmEE0iiwF9GFwriEUjidL +Ukw5bDvHz3icIdZKo1dSA3tjNDXyCd2FEWIAKzWOJ0vCOzJA/qMDivXIH7pS +v7t06VIKswvqpX6hhyTA4TikDPuGDkHb6qf5ttv023AsZhzsfgaVkdUCudNy ++vkzeiX+zTff9C2gPeoobvhlb2oPMeBrcdiRgaiUgFwuoLO77KBHfU6/D4+o +UqtnO911mdZAH7hDH9h1CiNrkB3d9uIWnDAG35HtCdrT/bJoNWyPXPav9NbL +MfSBS+O34nvs/fDWd2gP0fVlZYQ+5Ssgbz5eDtrP3O/+D7EI7gM=\ +\>", "ImageResolution" -> \ +72.],ExpressionUUID->"5c38a6a2-82a4-43d6-8233-ba811ff2d35f"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + SuperscriptBox[ + RowBox[{"Abs", "[", + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "]"}], "2"], + ",", + SuperscriptBox[ + RowBox[{"Abs", "[", + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "+", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], "]"}], "2"], + ",", + SuperscriptBox[ + RowBox[{"Abs", "[", + RowBox[{ + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}], + RowBox[{"(", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + RowBox[{"2", " ", + SqrtBox["\[Pi]"], " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]], "+", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + FractionBox["3", "\[Pi]"]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], + RowBox[{"2", " ", + SqrtBox["R"], " ", + SqrtBox[ + RowBox[{ + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}]}], "R"], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], "R"]}]]}]]}], ")"}]}], "]"}], + "2"]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Theta]2", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"Mesh", "\[Rule]", "None"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"Opacity", "[", "0.7", "]"}]}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.80197132593405*^9, 3.801971333429564*^9}, { + 3.801971701220582*^9, 3.801971783020898*^9}, {3.8019718311383753`*^9, + 3.801971831508401*^9}}, + CellLabel->"In[37]:=",ExpressionUUID->"940d9eff-6030-437b-8335-864a85272893"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJx1mHuMXVUZR+dKL+01QhAfoEZLC9ZGqQlgEQPtmZZhLEqBKJTIIzwUxlKg +fxCVEjCGR/qg9kWnDyMNRBKx1FQppAwM5VExGIaCPByKN40J0BZ6eZR6Ewk3 +xU6469zs9e32D07Omn2/853FPvvs8xt3xdwfXfmprq6uPQf+c8iBY++2Ffed +/bUlUzm++L91rzz3/a3FstYzrx4zMFTAX725d+EFe58qzpr/r11jB+ol7/vw +xw98/uMni4kz7v3r8KI3S/7aqit3dd3zRLH+rEvmjh1olPy+y+bveuOULcWq +iXes2rRvb8kvnd1/0WM3PVoMr+/7xfCiZsmfPW7p499dM1AcPannvI/GfVjy +1osTpvxwz8PFTzYec9LYgVbJn2mPf27N/gXjJnZ1u/4726+5YdO+Srf7Oewr +/+474/FDSr693f+ki8+8YHhRteRXte935l2be2fPGl3y4bafuTu+fvJH42rd +9sk5Xu2Zoz3D7Rluz3B7htsz3J7h9gy3Z9fHs/vBM9ye4fYMt2f7xDP+7Blu +zxztGW7PcHuG2zPcnuH2DLdn18ez+8Ez3J7h9gy3Z/vEM57sGW7PcHvmaM9w +e4bbM9ye4fYMt2fXx7P7wTPcnuH2DLdn+8QzPuwZbs9we4bbM0d7htsz3J7h +9gy3Z9fHs/vBM9ye4fYMt2f7xDP3bc9we4bbM9ye4fbM0Z7h9gy3Z7g9uz6e +3Q+e4fYMt2e4Pdtn+b5s3589w+0Zbs9we4bbM9yeOdoz3J7h9uz6eHY/eIbb +M9yey37l2T7xzH3YM9ye4fYMt2e4PcPtGW7PHO0Zbs+uj2f3g2e4PcPtufz/ +L8/2iWf6tWe4PcPtGW7PcHuG2zPcnuH2zNGeXR/P7gfPcHuG23P5PMmzfeKZ +vuwZbs9we4bbM9ye4fYMt2e4PcPt2fXx7H7wDLdnuD2X65M82yeeub49w+0Z +bs9we4bbM9ye4fYMt2e4Pbs+5+4Hz3B7httzud7Ls33imevYM9ye4fYMt2e4 +PcPtGW7PcHuG27Prc//uh3OO9gy35/L9Kc/2iWfq2TPcnuH2DLdnuD3D7Rlu +z3B7htuz6+PZ/eAFbs8c7bncj8izfeKZ39kz3J7h9gy3Z7g9w+0Zbs9we4bb +s+vj2f3gGW7PcHsu93fybJ945u/2DLdnuD3D7Rluz3B7htsz3J7h9uz6eHY/ +eIbbM9yey/2yPNvnl3b9+ZHxA4Plsf+STR+/dULHP5zxOx67buqJp43p9njq +ejzn/M714a7v8ZxzHTj1qefx5ox3Hc7dz7cGf/XrCQMbyuOoOWuvP3f61mLC +2T945Isbx3Sbc87fPd6c/vgd12Ucf3d9+oVzzu/cv+sw3tdlnOtw7ut26d9J +H34yvvueR08de+A5zfN64O8/PHTNyHOaH98I/Jme828feU7zdZqB85zm67cC +f3DR2uUjz2n+upXA6/uPmDfynOb7qQY+6voFl408p/k+a4Fzjtfts15aMfJc +c57n9cDxnB/fCBzP+TrNwPGcr98KHM/561YCx3O+n2rgeM73WQs89XzgvX3C +/U+MrKupZ/N64Klnj28Ennp2nWbgqWfXbwWeevZ1K4Gnnt1PNfDUs/usBY5n +PA2+t6k58l7Dc57XA+c8P74ROJ7zdZqB4zlfvxU4nvPXrQSO53w/1cDxnO+z +Fng6nxvFnjdbrZF9RTqfzeuBp/PZ4xuBp/PZdZqBp/PZ9VuBp/PZ160Ens5n +91MNPJ3P7rMWOJ65761XHN43sq/Dc57XA8dzfnwjcM7zdZqBlzljtn4rcDzn +r1sJHM/5fqqB4znfZy3wdN1oFn85astTI/vqdN0wrweerhse3wg8XTdcpxl4 +um64fivwdN3wdSuBp+uG+6kGnq4b7rMWOJ6dV+M5z+uB4zk/vhE4nvN1moEf +LFfHszme89etBI7nfD/VwPGc77MWeLo+t8J8zvN64On67PGNwNP12XWagafr +s+u3Ak/XZ1+3Eni6PrufauDp+uw+a4Hjmb68Pud5PXA858c3Asdzvk4zcDzn +67cC5zx/3UrgeM73Uw0cz/k+a4Gn78FK927tN/K8Hnj6HvT4RuDpe9B1moGn +70HXbwWevgd93Urg6XvQ/VQDT9+D7rMWOJ65jvfPeV4PHM/58Y3A8Zyv0wwc +z/n6rcDxnL9uJXDO8/1UA8dzvs9a4Ol+o9rt78E8rwee7jc8vhF4ut9wnWbg +6X7D9VuBp/sNX7cSeLrfcD/VwNP9hvusBY5nfud8I8/rgeM5P74ROJ7zdZqB +4zlfvxU4nvPXrQSO53w/1cA5z/dZCzzd19W6ndfleT3wdF/n8Y3A032d6zQD +T/d1rt8KPN3X+bqVwNN9nfupBp7u69xnLfBP+hwsj8dtrlTfPsE5Xocffu5V +F47kzubpfqbDOed3rm/O+cH4wfp3Dsl4c8YfzI+v+8n4DeVxYNKlvxzJk++c +ev7wSM5szjl/93jz1HOsn+9/w0H7d33Gu076/6tzXcYdrH9ft0v/9sydd/Sz +p64Oufr0dZ+993cvrQq5eu8jV3xhw8b+kKvvru++7Z+1lSFX39Z765o1k1eE +XP262bUxW5YuC7n6zk8/9MG64SUhV+/ve7M2dfSSkKvvbo93rk595+r041yd +/p2r97Tv17l6T9uPc/XdbZ+c4zX12cnVW/suv3rKtR3P8D+8fFPlmrP79f01 +VEy78J2TmxvvDLn6Q+d8r+v915eHXP38V/40ed4Zy/T9NVTsm7Nw7Tkzl+j7 +a6iYfdQ3J/T/5rchV2e8c3XqO1enH+fqp7f7d65+d/t+navvb/txro7/1HO9 +YH6mnuulz9RzvZgxatTj705ZKc/14sgpr/Uf/+CKkKsfeduGu8d/vEye68Wj +86rvPfH2kpCrj9n+uav//o/FIVffctiM6b2jF4dcnfHO1anvXJ1+nKvTv3N1 +7te5On6cq89o+8QzntLnvZOrp/Ozk6un/XRy9es2PXz4rBnLQ65+7fozZx4y +e2nI1Y9ZfWgxa/nikKtvvfg/rb+tXRRy9RsueOuyz+xcGHL1J9vjnatT37n6 +nHY/ztXp37k69+tcnfnvXB2f6XxuFKxX6XxulM9XOp8b5Xxwro7PdD43irHT +Tr7lyDsWaz43ip+/PmHJC82FIVcff9Zhz08+fkHI1d+5ZN66NxbMD7n6se3x +ztWp71ydfpyr079z9SPa9+tcHT/O1fGJZ+6b90WaJ+wt17c0T9ir572TqzN/ +0jxhr+63k6tv65q448rfzw+5+o7nt1/+ndbtIVe//49ffmx93+0hV2e8c/Wh +dn3n6n3tfpyrp89XJ1cfaN+vc3X8OFfHZ7puNAve7+m60SzfL+m60SzXQ+fq +PO/putEs56dzdfw4V//vaT878f4bbgu5+v67Ttl+0bu3hlyd8c7V6+36ztWZ +/87Vn27371z90Pb9OldP39edXJ39D565j3S/1MnV0/d7J1fnfeRcPV0/O7k6 +z7tzdeanc3V8Old/YebNzQf6Op493rk69Z2r049z9Rvb/TtXH2zfr3N1/DhX +x2e6PrdK/+n63ArzGe75DH9S8xl+rOYz3PMZ7vkM93wu+9R8LvMzzWf4eM1n +uOez79e5uuczfKfmM315fYZ7fYZ7fYZ7fYZ7fYYPaX0uc0Stz3Cvzx7vXH2b +1me412f371x9s9Zn+3Gu7vWZ63u/Afd+A+79BnyO9htw7zfgfdpvwI/VfgPu +/QZ8vPYbru9c/avab8C934B7v2E/ztW93+A63j/DT9f+Ge79M9z7Z7j3z3Dv +n+FPa/8Mv1H7Z493ru79s/txru79s+/Xufo07Z/tM91vVLt79D0Iv1vfg3B/ +D8L9PQg/Qt+D8AF9D8IP1fcgfFDfg3B/D8I363vQ/ThX9/cgxzP0PWg/ztV7 +9T3I73qUb8D3K9+AO9+An658A+58A+58A+58A+58w+OdqzvfcD/O1acp34A7 +3+DYUr4Bn658g7/vVl4H71FeB5+hvK6so7wO7rwO7ryurKO8Du68Dr5TeZ3r +O1d3Xuf+nav3Kq+DT1dexzHNPzu5+p6l99zyjdHO8QaLm1+efN7V41aHXJ3x +ztUZzzm/c32463u8c3XXp57rmDPedZyrp+M7ufoH3fM/WP7t1SFXh3PO3z3e +PPW8oSh+2rdy0uTVIVeHM45+4c7VPd51nKvDGec6ztXh/wcZMxta + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], Opacity[0.7], EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[Polygon3DBox[CompressedData[" +1:eJwBCQX2+iFib1JiAgAAAKgBAAADAAAA4gIRESEgEgIDEwMEFAQFKRkaFQUG +GQkKGgoLFwcIGwsMGAgJHAwN7+XkIBARIRESIhITIxMUJBQVJRUWJhYXJxcY +KBgZHQ0OFgYHgHBxKhobLR0eLx8gMCAhMSEiKxscMiIjNiYnNycoNCQlOCgp +OSkqOiorOyssPi4vPy8wLBwdPCwtRjY3QDAxQjIzQzM0RDQ1RTU2QTEyNSUm +Rzc4bV1eSzs8TT0+Tj4/Tz9AUEBBUUFCUkJDU0NEVERFVUVGVkZHV0dIWEhJ +WUlKWkpLXExNXU1OXk5PX09QYFBRYVFSYlJTY1NUZFRVZVVWZlZXa1tcZ1dY +aFhZSTk6bFxdbl5fb19gcGBhcWFiaVlacmJjc2NkdGRldmZnd2doeGhpempr +SDg5e2tsf29wdWVmfW1ufm5vfGxtECAfMyMkSjo7uamqhXV2jn5/g3N0hnZ3 +nIyNjX1+inp7h3d4j3+AjHx9kICBmYmKk4OElISFuKipkoKDlYWGloaHmoqL +m4uMmIiJkYGCi3t8iXl6nY2OoJCRoZGSqpqbq5uco5OUopKTp5eYqJiZpZWW +t6eorJydrZ2etKSlsKChn4+QhHR1r5+g5sXUrp6fsqKjtqanno6Ps6OksaGi +gXFyuqqr4NDRva2uvq6vxra3vKytv6+wwLCxw7O0xbW2wbGyyLi5wrKz1cXG +0MDBy7u8zLy95B0Oyrq7zb2+zr6/0cHC0sLDz7/Aybm6x7e41sbH18fI2cnK +2srL28vM3MzNu6us3c3O7ejS4+IQ38/QAhIRAxMSBBQTBRUUBxcWCBgX2MjJ +BhYV3s7PCRkYCxsaDBwbDR0cgnJzChoZgpKREiIhqbm4FCQjFSUkFiYlFycm +GCgnGSkoGiopGysqHCwrHS0sHy8uIDAvITEwIjIxIzMyJDQzJTU0JjY1Jzc2 +KDg3KTk4Kjo5Kzs6LDw7Lj49Lz8+M0NCMEA/MUFASVlYNERDNkZFN0dGOEhH +OUlIMkJBOkpJO0tKPU1MP09OQFBPQVFQQlJRSFhXQ1NSR1dWPk5NRVVURlZV +RFRTNUVESlpZbn59TV1cTl5dT19eUGBfUWFgUmJhU2NiVGRjVWVkVmZlV2dm +WGhnWWloW2tqXGxrXW1sXm5tX29uYHBvYXFwYnJxY3NyZHRzZXV0ZnZ1Z3d2 +bHx7aHh3anp5TFxbbX18b39+cIB/cYGAcoKBa3t6c4OCdISDdYWEd4eGeYmI +eoqJe4uKgZGQfIyLgJCPdoaFfo6Nf4+OfY2Mg5OShJSThZWUipqZhpaViJiX +n6+ui5uajZ2cjp6dj5+ekKCfiZmYjJybkaGgk6OimamolaWkl6emmqqpm6uq +nq6tlKSjnKyrna2skqKhEyMioLCvorKxp7e2o7OypLSzobGwqLi3qrq5q7u6 +rLy7rb28pra1rr69r7++sMC/ssLBs8PCtcXEtsbFmKint8fGu8vKscHAucnI +usrJuMjHvMzLvc3Mvs7N8OfmwNDPwdHQxdXUxtbVydnYy9vax9fWyNjXwtLR +ytrZzNzb5OUezt7dz9/e0ODf6ODRxebE7uriHeQezd3c8u7j6+QOEOIRqZma +7ObU7/MPv8/O4uoC0ujR8+/r9fHt9+8P9PDs9u4B4+7i8eno6Ong6+/k+PDT +8PTT+fHh7vIB8fXh5ufE7vbq8Pjn7PDm7fHo7/fl8fnppJSVlYFeKQ== + "]], + Annotation[#, "Charting`Private`Tag$3990#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, + {RGBColor[0.368417, 0.506779, 0.709798], Opacity[0.7], EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[Polygon3DBox[CompressedData[" +1:eJxNmGnYTlUUhr/VTHMqkcoUSZIhKSKEJEKkUEJkihIRETIWSjJ9SGQOIbMy +y5RMEU2GypiUn83rud57X8uPdT32OWfvde9zvOfcFGjZuUGnC7KysmZZVtaF +njU9G3s96XW5119+7G+vKyyT/3hdaZn81+sqy+R/XldbJrM8r7FMmte15AVe +15EXeuUiL/K6nrzY6wbyEq8byUu9Tnj96PWDVx6vHF45vfKS4r2ZFG8+Ury3 +kOK9lRTvbaR485PiLUCKtyAp3kKkeAuT4r2dFO+dMImlCMdye93hdRPsD3nd +41XKqzjXircErGK8mxRjSTI/8/LDWIz18rJWAXhLk+ItQ4r3XljFdZ9XUbjK +k1rvflL7qExv9XyAY+KtBJ/OlWVtrVvR6y728SCp6yow7y4qH/usArd4W3s1 +sszfvWpwa+2HSbHX8CoHe01S7I+QYq9FivdRUv1rk2J8jBRjHVJ7qktq34+T +elb1SPHWJ6t6NSDF+wT5MPuoDu+TZPpt1YT3KVK8T5PibUKKtykp3makeJ8h +xfssKd6WMImlOcfE/hxZH97S3N/nvRrC2wZWMb5AirEtKcZ2pBhbsJ76teeY +eDuQ4u1IircTrOLqTIrrJVLrvUxqHz3orZ6veLWCtzt8Ovcia2vdbpb5O6R9 +vErquq7M0zm9M/R70e/wNdYWey+4xfup10de07x600PsfUixv0GKfbTXQK9B +Xn059jLHusEyiBT7m+xHXIM5pr0O4JjmDOGYGN/y6gnj2+TrXsNIMQ4nxTiC +FOM7pLhGevXz6u/1HimWUaT6v0+KfSj9e3JtF7jHsJ/B9O/IPZrOvdD5bLjF +O4EU70RSvJNI8Y6nn+ZMhW8Uz2EUXB96vcs+pnFM/ebQT31m0H+s10xynNds +emRzbDD3eByp3rMY67pFcKj/x6wt9nlwf+D1iddkuBaQU7wWkpo/l3ma851l +vqf6Vn3ltdprjdc3Xpu9tngtZQ9iX0aKazmpfawgte+VpBhXker5GTmPPvPh +XUOKdy0p3nWk9r2e1O9gA7nYayO5xGsTKd4vyGXsYxm8W0jxbiXFu40U73ZS +vIdg3WGZv3P6Xeo3uRNu8e4ixbubFO8+mMSyh2Ni30tuhHc693c/14r3AKxi +PEiK8ZjXERi/5/np/fE1623ieco39EyTJ2mcPEnj5EZyjuRGGic30ji50bXc +42mwJk/SOXmPXEIulNxLPZIzyUWSM2mcvCqXhSflsfAkjafyrBdaOJA8I71r +3rJwJn2v9Y3Xd7ishSflt3CjghZuVMjCjQrDVYRxcq9bLRxLa+m9LA8pCp98 +o5iFA8kl5A5yiOIwlWCc3Kgka5ViXBjeMuy7OOsmTypl4UmluUfF4Ejf9QYw +yTfKWXhSeQvXqci6D3BOfSowTo51H3uoxBzxySsqw1GFsTiqMi4DR1X2WZF1 +kxtVg0mOUd3CjWpY+NAjFj5Uy8KHHrXwodoW3pn2VIdzyXvqWfhWTQtPqmvh +SY9buFQdnkdljiVnqg+rvKOhhffILfQt13f2RQtPamzhQ00sfKiphd80Z225 +QwsLT2oGU3PWTr71lIWLdIKpBWuJSc7QysKB5BLyI3lFawtPakMf8XaET++u +duyvNWslf2pr4UntLTypg4XPPcMxfV97WbiR3EJ+oO/zAAt/6mzhPd3g1re6 +C4zdOaf++qb3gLc3PdpyrDtMPbmuA/17soeurNuaPl0t3Ki3hRv1sfCegcyR +Y/RnzgDG6jeY69K/0/LBMoRz6q330FD22pceXVivH6xDmZOcu5GFJ+lddsrr +nNdRC08abuFA71k40wjWlWvIOeQF+v7OtPCkUXDLN0bDOpZxcouxcI1nnNxr +JPdlNGtpf9lclzxpAtfqHT0FJnnHJJjkG5MtPGkqa01jnBxohoVvTaTndK4b +w/npFq6WbeGUw2Cazf51Xo4xx8J7PmHduZxTn3mMs7l2toUbLYBPXrEIjsWM +xbGEsbiWMp5Mn/kWbrTUwo2WWbjRcgsfWmnhQ6uYL8f43MKHVvM8ppy3p7Wc +S96zwcK3Vlh40joLT1pv4VJrLTxpo4UnbbLwJI1Peh22jPskT9pi4Ulb4ZMv +7oBpJ2P1k+vspoe8ZK+FJ+208KRdFr61zcKN9sC0j/lyDP0fS24Y5ab7YTrA +OHmSxkf48zY4D3Fvj3v9ZBlnupF1c7Pn/fQ7zXVyq5+5Rm6Tg3k5eSZ6Nvod +/ML6ug/6v6BfvS6zcM3NzFNfedl2+LZx7Qn6/GaZd4H87neOa50zPA/1OQvb +n1kZvuOsrXlHWfcIfz7IuifYwx+s8yV5hj+fY/63rHea9U/B9C37O3zePTzL +fk6y7mH4TnLtMdY8Qv/feX7p/7/kO3pn6N2h99r/dQpSUw== + "]], + Annotation[#, "Charting`Private`Tag$3990#2"]& ]], + Lighting->{{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`]}, { + "Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, 0.29811516000000005`], + + ImageScaled[{2, 0, 2}]}}]}, + {RGBColor[0.560181, 0.691569, 0.194885], Opacity[0.7], EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[Polygon3DBox[CompressedData[" +1:eJxFmHm4VWMUh28fGTJFcyKSuJk1ScqVBjdUCqVIrkSTS0qKSoZokCiZkhAi +bmUspdKVKSVjiQZDhvxpHsJ6n/PuZ/+xnnX3XtO7vnPO3r86vKy8x9WpqKho +fpWiot3Cd42LfmGXhO0R9lvc/z3sk/j7F3LC7+7fv4btmQrxP8L2SgX/Z9g+ +8fff4f8J2y/+3hX+37C9UyH+V1i1VPDkVU2Ffsw7OBXq99XoQX39VKghVlMO +6r4K2xj2WdhBYSkVOGsZZ4/aenjrpQIHvQ4I+y96F4WvY5w96urJ2z8V2Mlr +IBM7HaInfmLYYWGHh50SdnRYcVgjmWqEHWouM4/wHnscKWtt6+rK2Ng4sSbG +YTxKT15D+1V39oHOK7YHZ9ZUz7meZB5cx7kDXMfr6Xey8Ywx+8ybeQ+uFnLD +dYy9OZtj9fRtbi55Lc2F/dqwy8LKwlp5j72vCetv7PSwEzzXNs6g92l62EuM +s9MZetg7OBvGTs5mTnvj7HGmnry29uMMzre+o9bC+p7WEDtHDupKw1qHnRrW +RQ8vv6N27tFND28POeh1Vip8V6jvbpw9ztOT11l28i6QiZ0u1BO/Kqx32EXO +b+p59ZHp7LBe5jKzr/fYo5+s3Tz382Tk93+usUuNd/fz6W5eb/uVOrvUeWX2 +4Mwu13Oug8yDa6A7wHWlnn6Djff1XIrdZ2jYxXJdLTdcA+zN2Vyhp+8wc8kr +N7e/e7fx8xsuK4wrwirCFoaNkolz/TpsZ9jnYSOdAftdYWPDxoXdYC773Rg2 +RN6b9MPMHSb7OD1c19uPeaPtwRmMN85vYkIq/GbgnWgNjLeGXRc2Iuw2PYx3 +GIfrTj29p8oEyy32o35y2BjZp+jJu9n5zOaZynOF58s0d4BxunkwzpTj9rB7 +vMece/Xw3m0dNfeZy073yw3vg2GT5HpID9fDevaYYT/mzfYen8kjehjn6Jk5 +V1a4HtPD9biefk/oZ8o10rOe5z14n5EPrkftTd+nwma5x/ywB8x70rpZnjXf +Nb6zz9qDnZ5zB9gXywdXhTswZ6GePV4wDu+LehhfDXva+UtlZc5LxmF5WQ/v +Ivsx723rl2jzrd/k/bfCVspB3XK5nw97XQ/vKuPs8YYe3jflYP6ysAXWrzbO +HpV68l6Tnbx3ZGKnd/XE/1RP7OX8RzyvdTLxm37PXGau9x57bJAVxm1hm2X8 +wDixD43D+JEexrX24wze1zPv01TQSfxW0Ee8M3l3ZloH1t/VTGiRTDNx/bea +qZo7P+x3Au2D3iCGBkE/oDl+VTMxA81EP653qbeoQa+gDahBG/E3OofnBN/B +K+TjHc9vm3c278FjU66B0Bk8J/j9TnCHesZg4r1f3xmH2qOa9+rJ0cC8TDM1 +SLkmQ9vwPOa53MWzqGOMZw1a5TDnoREy7YNHT6CP0BhHOK/YvEyLZNoE39Q9 +G9m3hnWNUq6Tij2nhu6TaaPjrEFjoDkyDdFePu6hV9A6aIbm9j3ZGlhbGoOP +93krudj/VHdqZR4crc1rary1vM3s29g5zVKujdrI2tZr4h1kzXRSifXtvYap +o3m13KGxHJ2MwcG7vrN7omfauXeJ162Md5K11Bqeezyrb/FzbeKMqs6rmXIN +0TvlGgidkb3XB8jbwxisvPd7OhP9cKF79jSvo/Xnp1wzXZByTdbVewOdUeLM +bu5G/Fyv0Q/9vEZXoEX4zqJT+siEfurv7DKvM81EfRdzL0q5NiqTb4DXZ3kG +vbzm7IZ7D42BTkBf8I4eIxNaItM7+KHOGGQNs8vNK7NfpsHxvOP5rpzjTpwF +774Rsl9jPeyD7Xuxc4bIPkJWzvJ66zMNdKMc6JBR1o/2OtNG5GUaujTlOmms +89EL41OuFzPNNMp55cbHudMEa3jH8HxeJhPvdTQDz3We77wHeIfzbp3jmaI3 +Jtl3ojWZNposExpjqjOm2+Mm702RY5p5441Pk/cO+2a67daUazVimWa6J+Ua +KNNE+AdkQlfMTLk2eijluifTQfjZzphh39usmyHvbOsnOHO6NtdzyXQSOgEd +wfv5xZRrKfLQN2iKJ1OupR6XFS3xtHy805+R63k/nwe9N1+OBebNNr5A3nn2 +vc8589y1wl6ZTqpIudZ5SQ40xuKUa6YXZELbvOLnMcvecCwxBgf6Yal7LnLG +Y/ZbJPtSa2BdZg2f5f32zXTScvlWeM2/L/i3xSZZ0SCVKddPq+RAn71lXzRN +poPw6CPe7/wfSPWU65K1Mr1jPTuvtm+mt1bLu9a+MK2zPtM9/E7QRGij9TJt +8HqzOZVybvI8t4d9mQp66Fuv0UcHyFrdM1jvvGQuemSLOUWe3UTPcqv9OYef +wr4J+9g6ZqG5Fsm3UrYv5PvOs94qx3brfvDvn6sUPteVcu1Ihf9XguV7Z21z +/ufu+KYzKo1/4fWP1lZxJrPXeG+H97dZs1n/vbts97x+Vj/ybqzh/R/cc4u9 +OKOdzljjbl/L+JUcG+3/k3z/AyEgSW4= + "]], + Annotation[#, "Charting`Private`Tag$3990#3"]& ]], + Lighting->{{"Ambient", + RGBColor[0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}, {}, {}}, { + {GrayLevel[0], + Line3DBox[{246, 1, 242, 227, 16, 31, 46, 61, 76, 91, 106, 121, 136, + 151, 166, 181, 196, 231, 248, 211, 244, 236, 212, 213, 214, 215, 216, + 217, 218, 219, 220, 221, 222, 223, 224, 233, 249, 225, 245, 237, 210, + 195, 180, 165, 150, 135, 120, 105, 90, 75, 60, 45, 30, 229, 247, 15, + 243, 235, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 234, 246}]}, + {GrayLevel[0], + Line3DBox[{495, 250, 491, 476, 265, 280, 295, 310, 325, 340, 355, 370, + 385, 400, 415, 430, 445, 480, 497, 460, 493, 485, 461, 462, 463, 464, + 465, 466, 467, 468, 469, 470, 471, 472, 473, 482, 498, 474, 494, 486, + 459, 444, 429, 414, 399, 384, 369, 354, 339, 324, 309, 294, 279, 478, + 496, 264, 492, 484, 263, 262, 261, 260, 259, 258, 257, 256, 255, 254, + 253, 252, 251, 483, 495}]}, + {GrayLevel[0], + Line3DBox[{744, 499, 740, 725, 514, 529, 544, 559, 574, 589, 604, 619, + 634, 649, 664, 679, 694, 729, 746, 709, 742, 734, 710, 711, 712, 713, + 714, 715, 716, 717, 718, 719, 720, 721, 722, 731, 747, 723, 743, 735, + 708, 693, 678, 663, 648, 633, 618, 603, 588, 573, 558, 543, 528, 727, + 745, 513, 741, 733, 512, 511, 510, 509, 508, 507, 506, 505, 504, 503, + 502, 501, 500, 732, 744}]}}}, + VertexNormals->CompressedData[" +1:eJztWntYzmcfz6mlw1Kb5o1IqYapXMip5/kREtNBVpkOj7HQiYQOSHJsiddG +hBxCc1iSmcmoH2VqjGULk2imkENlmhh53vt+vn2eq6f37b3meuu63j9+/nBf +v49v3/tzf/re38N96TltjmdgWy0trYfsr3Zsfa3kf3zlWvRnKX1XC+mC4Bby +1WYB+ODs7zN+qq8Wvt3+oJuxR7oan3d6tPPd59VCWfZH6d7rD6px3eN91tbV +Vgu5xZsCG+OmRxUqPO1jp6VGjfxo2x5S+YmtvFQQ1HjfGoNDfN+zGZl7C9d1 +zwVOS43gZGt/j9mLwD0sdFT2J3xn7WD+1bh95y0q//EXx8cwPmrc39Ndxcfs +fs2+xviONe+rcDdzubKxn7EJk1V+umyuei+k0b6WZ39S6ZM4pdDYzMVbzRN6 +SjpLOks6SzpLOks6SzpLOks6SzpLOks6SzpLOks6SzpLOks6Szr//+g8Oagm +YKFLgvpcOkcvbQj9L/o/e7pOzuzV/h0ci1T2re2/Obw5/29q3xz/nwd6LbEJ +j1bbb930SUYJwy9ot6+yDo9W+492n67C39S+OR3e1P+b8n/Te9ccH3zTYt7w +czUS3kp4RfnSt4NZHvqqVEuVTyS8dfCT08ev5XVgyJK9qrwq4a2Doz6jLkt4 +6+B+r/y2c3ytd38Jb0Xc4GT9AR7n0X6fa8S5hLcsfrWL02Xej+fa62vkbQlv +WVxzvqmR8FbCU5aFd2d9iNjpQX1GY/0lvGXx3JTFeXxunqATr5FPJLxl8VPv +ua7l7xbLs+Qa9VHCWxa/ebRmOcdjo50lvBXxYa6X9vM4z7H+QiPOJbxlcVu3 +m+f5u2mcwkCjD5HwlsWpD7H9t/clCW9Z3OiZcVmUS4KQoP9Y9c7c0viBcYEf +MVwM3fX0f8Kb40/L33+fbM5Pc/temTfrdc/waCFpeoTGe3JzuElyyM/m4dFi +bd2Cv4U35+dN+Tfnvzk/b8r/P++rI9dca4Qn9/sFHV4dKrjKu0Y+U74lN5rU +y+Up85PQw26F6zcxan/OE5Z/c5Xhrgkedd9oL1XjK7fqnxcZHpntUd0Y31VC ++Dqjd7wa+0m/0+DHdGlXvi/wSSm07/LCH8LsFbU5mnrUCCM2vTeG2YuyedxO +KaO1Wsh+OCee+Rdhb+pF/q2ez+V81Pim68Rnb3jPOxwf42jAvpUyWquFJ3c3 +z23sp20C+fE+VP0sk+37OJv2pRU8y2UNeqrnL+gIXaFnVa3966NvhapX05yY +iHsMNww269ZmZIyQZ5/oa5kWLFRF9Da8yPARCzb0/zI2Tijdk+3RadssISu5 +3z+zGf5UXlC0j+EVHWxO9vCbIbz4+N1B33EdtndPa8/81FrNdv/A+1PhovHk +Q5cZnpZU9NMJtl+Uwi8kv3qaMNf7WvcqrkMve/1+ivKcbedTf7s+Z5rQe9XE +rL8Y7lK08R6zF60mkf3OkWTvNef4MeZfTHsVpvJfeNlH5f/hbcdTjI8YKCc+ +xQeJzyK7Z+8w/mJ8PfEfrWur4j/B3LxSi/kpUiYO5+ddZdtHdV55Re59posY +69D/Ften8iHpU3sjaPyoX9rId6f2O8D1bGNKeuL3hDhFfEJH6Ao9DbzaxtbV +R6nXT/bf1uN8pqxUBJc8iBUm3Jp9dXDfSCHXL8znAMPPjLVeVMZwZ/nxOcOs +5gvbdN2OZDL8a7vjh9u+jhKc7iZv3eAZIVw85qZbwM+Vaq8cyPbtuGh+6X7D +uUJXb73vfme4td6weVaK4pzyUmf94NRwwaav7Rmup0PdgnGD0oLFyoXzf+T2 +IcPIXlj25XnmX4yqTE7k/g9+Rv47hFgkMT7iWBPi0/mCq4rP7L6zNzL+ovdc +4h8lhqr4r/BShrJzim/H0Hln/Ernff/cpnsWbN+kAWaOXJ9Zs0mfHfVnLU0U +tbJ9e2z3cj2jKpap9ITOuPe474hLxCniEzpCV+h5LE3Ru2TvIvU69MeQmF0M +f94+edxt9r3I88mZmu4xwuPE+Av7GT4rvqybC/MjLlpYr3M9Uqj84PG+0wwX +p/dt14ft2+1EvbOf8wLBdEafETzvJb8Y3fHwuqqc3glTR3/57XwhSM/eroLh +sXNO2jF7Me5yvQO3/3Q22d/dpNWL+Rd9+i006Mj8Rz58pPJvGXthLOMjKg4+ +OcL5TM4nPmfGLDZkvEVlFfE/bBWq4j9ii9kTdl7xcExAIj9vr22k/9OSgleG +bN9ok409uT6DOlP8bwn8KPyHyBeypnpCZ+RR5E/cc9x73HfEJeIU8QkdoSv0 +fLRvoFMdw7G+TNxudoTrXDHSaBzz89h0V5k+0+Fsp5I253ic77xyz4Htu3Zv +vMKf6ZYYZXL3BsPDQpb79mD5eVrW1IFc5ysDSedTywLfHew3Q8yMjp/J7XuO +InvFqnxT5l+80pH8Fz+/rvIfkG08kvEQsw8SnzXriE+7l0syGH/RRiD+zpeI +f5CJw0x2XvGcL523gzmd9wstmTvTR7T5jPSZmk76HLvQae1bLJ7PdZlYxvUs +nmKgoTPqEuoR8ibyKPIn7jnuPe474hJxiviEjtAVeuoplD1SmR+s3cqKdPi+ +uUldrYaxfe/2GTnmK5YH/I44TeZ5L6QL5Q1ZuWNbnjeUAuWN+l/KHJm9+KsF +2Y/YTfaRASkDmV8xoeCUEfefUkT+wyqDbjE+4s1Mc13Ox96a+CTLn+uyuBeD +X6W+zflX9CP+bnMrEth5RWM3Ou/EW3Re792xbkwf8cT5LSu4PqFhpM+jsd+r +8saeiSVxXE/7Kcs180ZDnUd9Rx1CXUI9Qt5EHkX+xD3Hvcd9R1wiThGf0BG6 +Qs/gPw3MCti+WO/5D71Qy/D1Q3gdLM4ZesrtIK+D89KpDr7U2zGO2YnGhjXv +c/t4R7KfaVvyMfMvru/tY8D9J2wk/747Xd0ZH7Gqy2I9dg+E7M+IzzjjpAGM +v5h8ttqU809cTfw9fY8XsfOKFkfovFZz6LzGPgHdmD7ihmOkj91K0mem4vO4 +U+uqZE31hM6afVONgLqOOo/6jjqEuoR6hLyJPIr8iXuOe4/7jrhEnCI+oSN0 +hZ7ErzgHK3hO792+kNmLS0a7fJHP9vXaSPb2OfXazL9oaUz+ezqQf+tXeZyn +GOZBfEJ0iY/O1sdyjqv70n8QHmT97usg5uehGfdTnrPHhfzoxWin8H1HC6TP +y8ONeZbLmuqJvlOzD2V9ZkOfhL4J/RLqOuo86jvqEOoS6hHyJvIo8ifuOe49 +7jviEnGK+ISO0BV6+qWu9uR2WLd3J3tf/aqJPJ6L8sj/kNXkf+igW548nssE +dzPOp3Ae8fm+E8XziQ/vm3H+TiuJf8agc+d5PMf8uHswP++1CXTeWusZRjye +K1+TPjciSZ89ZhTPcVq5s7ieCyZpxjP6evTz6DvRh6L/RJ+Evgn9Euo66jzq +O+oQ6hLqEfIm8ijyJ+457j3uO+IScYr4hI7QFXr+9cHpXtwvVp8fyP+9dS7X +eH6OSDnRnfPJ1Kb8HHFxcXuen7P2E3/LDpSfDUZRfrZZSedNXEvn3ayg/Gwa +WpbO9ZnRnvJz1mjKz031hM6YkzAfoY9HX49+Hn0n+lD0n+iT0DehX0JdR51H +fUcdQl1CPULeRB5F/sQ9x73HfUdcIk4Rn9ARukLPqdcGuHAeWD0DG/goqd94 +uIb4zy8m/qFVg1T9hn4cnXfpb3TeLl1ch/J+w2G4TKXP+g6dVfqExfB+o1zW +VE/MmZpzZ7WAuQhzEuYj9PHo69HPo+9EH4r+E30S+ib0S6jrqPOo76hDqEuo +R4gH5FHkT9xz3Hvcd8Ql4hTxCR2hK/TsuIF4Y7WMI/6+edQ/H20Xv5CfN+Zq +w/zy13Fjpo9YV/TInOvzQJv08bhL/XNTPcEfczzmd8yZmDsxb2IuwpyE+Qh9 +PPp69PPoO9GHov9En4S+Cf0S6jrqPOo76hDqEuoR8ibyKPIn7jnuPe474hJx +iviEjtAVeq6MoXNiDdH5XXXezmKcDtNH/M2p7Z9cn8UDSJ8zpd9m3GA6K+4c +C+R69s8kPfEOovkuwuashrkdczzmd8yZmDsxb2IuwpyE+Qh9PPp69PPoO9GH +ov9En4S+Cf0S6jrqPOo76hDqEuoR8ibyKPIn7jnuPe474hJxiviEjtAVeu4s +PHeT64L19p8N+qxwC/6D6Xy8qkyf10H/9MZ1UCdX852pRsA7CN5F8B6CuR1z +POZ3zJmYOzFvYi7CnIT5CH08+nr08+g70Yc2fa9ryhN1HXUe9R11CHWp6Xsd +8mjT9zrce9x3xCXiFPEJHaEr9CR+7eVYwTMoLyLS3cJfvep0Cw54wezzpuza +94rFeb7/9aw1o/wbvqsF7bKCR24W/mLNLbIPGE72bjFbJ9iy8yT1vB6exOxL +bckedvg52I9fQP4nBl1yZP5F+q4W1rwkO6xfTyF7P33DmdyufiftsyuE7DX5 +KWXgqelXKYN/8ANf8IRf7AP/USbOf3we7KpeE2U+7q95nOQr7di3mD/c+Y/1 +DJ/lQzi+8e/Ap56mb6ylkwhH3jYqis6ujXAV6obY2/D/H64b4lHIvtX9vEED +Djubl3l37FicwP5B7tHSl+z37fNp6Yf85wYLmvbwA3v8fNN9YYf9sS/8Yh/4 +/xfyAjLG + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{303.72856125765617`, 143.75433003135836`}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, Pi}, {0., 0.1506287854262581}}, {{ + 0, 3.141592653589793}, {0, 3.141592653589793}, {0., 0.1506287854262581}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{0.04594731413309502, -3.3442623683058055`, 0.513612749313721}, + ViewVertical->{-0.00208521986788912, 0.15177214305986653`, + 0.988413308514772}]], "Output", + CellChangeTimes->{ + 3.8019713499006023`*^9, {3.801971749310088*^9, 3.80197178387834*^9}, + 3.801971832972389*^9}, + CellLabel->"Out[37]=",ExpressionUUID->"7b764416-c238-4186-9012-f9b34d9d7185"] +}, Open ]] +}, Closed]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Exact energies", "Title", + CellChangeTimes->{{3.801299411564414*^9, + 3.8012994156820307`*^9}},ExpressionUUID->"9bbe0ea0-6528-4545-9c4f-\ +868b32b20dcb"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + SubscriptBox["A", + RowBox[{"i_", ",", "j_"}]], ":=", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"i", "+", "1"}], ")"}], + RowBox[{"3", "/", "2"}]], + SuperscriptBox[ + RowBox[{"(", + RowBox[{"j", "+", "1"}], ")"}], + RowBox[{"3", "/", "2"}]], + RowBox[{"If", "[", + RowBox[{ + RowBox[{"i", ">", "j"}], ",", + RowBox[{ + FractionBox["j", + RowBox[{"2", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"1", "+", "i"}], ")"}], "2"]}]], "+", + FractionBox[ + SuperscriptBox["j", "2"], + RowBox[{"4", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"1", "+", "i"}], ")"}], "2"]}]]}], ",", + RowBox[{"If", "[", + RowBox[{ + RowBox[{"i", "<", "j"}], ",", + RowBox[{ + FractionBox["i", + RowBox[{"2", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"1", "+", "j"}], ")"}], "2"]}]], "+", + FractionBox[ + SuperscriptBox["i", "2"], + RowBox[{"4", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"1", "+", "j"}], ")"}], "2"]}]]}], ",", + FractionBox[ + RowBox[{"i", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "+", "i"}], ")"}], "2"]}], + RowBox[{"4", " ", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"1", "+", "i"}], ")"}], "3"]}]]}], "]"}]}], "]"}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["B", + RowBox[{"i_", ",", "j_"}]], ":=", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"i", "+", "1"}], ")"}], + RowBox[{"3", "/", "2"}]], + SuperscriptBox[ + RowBox[{"(", + RowBox[{"j", "+", "1"}], ")"}], + RowBox[{"3", "/", "2"}]], + RowBox[{"If", "[", + RowBox[{ + RowBox[{"i", ">", "j"}], ",", + FractionBox["1", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"i", "+", "1"}], ")"}], "2"]], ",", + FractionBox["1", + SuperscriptBox[ + RowBox[{"(", + RowBox[{"j", "+", "1"}], ")"}], "2"]]}], "]"}]}]}], ";"}]}], "Input",\ + + InitializationCell->True, + CellLabel->"In[14]:=",ExpressionUUID->"4ff6a594-012a-42c1-9e1e-0ce854cee633"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[CapitalXi]", "l_"], "[", + RowBox[{"u_", ",", "R_"}], "]"}], ":=", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"l", "+", "1"}]], + RowBox[{"4", "\[Pi]", " ", + SuperscriptBox["R", "2"]}]], + RowBox[{"JacobiP", "[", + RowBox[{"l", ",", "1", ",", "0", ",", + RowBox[{"1", "-", + FractionBox["u", "R"]}]}], "]"}], " "}]}]], "Input", + InitializationCell->True, + CellLabel->"In[16]:=",ExpressionUUID->"5be72a3b-c8f8-4b96-9265-4e9c94871b49"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"Hexa", "[", "R_", "]"}], ":=", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + FractionBox[ + SubscriptBox["A", + RowBox[{"i", ",", "j"}]], + SuperscriptBox["R", "2"]], "+", + FractionBox[ + SubscriptBox["B", + RowBox[{"i", ",", "j"}]], "R"]}], ",", + RowBox[{"{", + RowBox[{"i", ",", "0", ",", "14"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0", ",", "14"}], "}"}]}], "]"}], ",", "15"}], + "]"}]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.801299480841412*^9, 3.8012995392870417`*^9}}, + CellLabel->"In[17]:=",ExpressionUUID->"140d9680-5488-4cd6-9e93-90da85bb14ac"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R_", "]"}], ":=", + RowBox[{"Eigenvalues", "[", + RowBox[{"Hexa", "[", "R", "]"}], "]"}]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8012995457698*^9, 3.801299579852026*^9}}, + CellLabel->"In[18]:=",ExpressionUUID->"729d0ca0-7b17-493f-bf05-6177ed58c74b"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"Eigensystem", "[", + RowBox[{"Hexa", "[", "100", "]"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}], "\[LeftDoubleBracket]", "15", + "\[RightDoubleBracket]"}]], "Input", + CellChangeTimes->{{3.801831590944212*^9, 3.8018316229093246`*^9}, { + 3.801885660185794*^9, 3.801885692845845*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"e1945473-5c00-42db-99a4-83a13b93fd62"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"0.56582720976686260501877321644723726373`15.", ",", + RowBox[{"-", "0.60511128612261675040414458303455191969`15."}], ",", + "0.46454111504944465268467645623612299218`15.", ",", + RowBox[{"-", "0.27810829696411035936747813588004995802`15."}], ",", + "0.13290817196901076905510686583729714093`15.", ",", + RowBox[{"-", "0.05106910060098795180105135468264209066`15."}], ",", + "0.01577405105471967050841368070181086196`15.", ",", + RowBox[{"-", "0.00389591214560623018752579399339296625`15."}], ",", + "0.00076159632108301700786622522273040339`15.", ",", + RowBox[{"-", "0.00011594126728626892218202265681549099`15."}], ",", + "0.00001340667738004250605711545336969641`15.", ",", + RowBox[{"-", "1.13232484802582511815949056526151`15.*^-6"}], ",", + "6.539758368987717147960868395478`15.*^-8", ",", + RowBox[{"-", "2.2729877293621515982232821672`15.*^-9"}], ",", + "3.383506183247444833252462528`15.*^-11"}], "}"}]], "Output", + CellChangeTimes->{ + 3.801831623294814*^9, {3.8018856605657043`*^9, 3.801885693569869*^9}, + 3.801885812884367*^9}, + CellLabel->"Out[36]=",ExpressionUUID->"4093005d-2040-49d0-a908-cdc1c80d3aed"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "0.82465661425964856288024366682528176888`15."}], ",", + "0.53727701978549676082504563075775565322`15.", ",", + RowBox[{"-", "0.17452095311349187291869504119527529972`15."}], ",", + "0.02852169793776642744342094261106605818`15.", ",", + RowBox[{"-", "0.00195498686012338440102052266792391892`15."}], ",", + "0.00001629228242546981128114106308795977`15.", ",", + "5.2018856554108174480210646638262`15.*^-7", ",", + "3.121239702824123259766471667307`15.*^-8", ",", + "2.50554144291865954665130547175`15.*^-9", ",", + "2.3891310367697317150336409614`15.*^-10", ",", + "2.553050250326141645923770064`15.*^-11", ",", + "2.95737510925779517642776513`15.*^-12", ",", + "3.6369580904908151731488518`15.*^-13", ",", + "4.694710201501790322291318`15.*^-14", ",", + "7.0560748171665399151488049893920937170603743`15.*^-15"}], "}"}], "//", + "Chop"}]], "Input", + CellChangeTimes->{{3.80188507429563*^9, 3.801885076119246*^9}}, + CellLabel->"In[88]:=",ExpressionUUID->"29e6def1-058c-4787-8a36-da20af8eb94a"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "0.82465661425964856288024366682528176888`15."}], ",", + "0.53727701978549676082504563075775565322`15.", ",", + RowBox[{"-", "0.17452095311349187291869504119527529972`15."}], ",", + "0.02852169793776642744342094261106605818`15.", ",", + RowBox[{"-", "0.00195498686012338440102052266792391892`15."}], ",", + "0.00001629228242546981128114106308795977`15.", ",", + "5.2018856554108174480210646638262`15.*^-7", ",", + "3.121239702824123259766471667307`15.*^-8", ",", + "2.50554144291865954665130547175`15.*^-9", ",", + "2.3891310367697317150336409614`15.*^-10", ",", "0", ",", "0", ",", "0", + ",", "0", ",", "0"}], "}"}]], "Output", + CellChangeTimes->{3.801885079074353*^9}, + CellLabel->"Out[88]=",ExpressionUUID->"0fb21a07-f74b-416f-9ea7-5f7d559d1b1c"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.801885089907299*^9, 3.8018850925520973`*^9}, { + 3.801885129713052*^9, 3.8018851480736*^9}, {3.801885189714094*^9, + 3.801885277370439*^9}, + 3.801885328145001*^9},ExpressionUUID->"27c016bb-5a31-44dc-840b-\ +1501bd3a1b35"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"\[Psi]", "[", + RowBox[{"u_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + SubscriptBox["\[CapitalXi]", "n"], "[", + RowBox[{"u", ",", "R"}], "]"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "14"}], "}"}]}], "]"}], ".", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"Eigensystem", "[", + RowBox[{"Hexa", "[", "R", "]"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}], "\[LeftDoubleBracket]", "15", + "\[RightDoubleBracket]"}], "//", "Chop"}], ")"}]}]}], ";"}]], "Input", + CellChangeTimes->{{3.801885288944332*^9, 3.801885325359079*^9}, { + 3.801885611025597*^9, 3.801885615189487*^9}, {3.801885713468998*^9, + 3.801885746863061*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"40d902eb-88de-426a-a413-db609c284d32"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"\[Psi]", "[", + RowBox[{"u", ",", "4"}], "]"}]], "Input", + CellChangeTimes->{{3.801885779317939*^9, 3.801885785643499*^9}, { + 3.801885845052886*^9, 3.8018858455238733`*^9}, {3.8018860250852747`*^9, + 3.801886046289537*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"8871427b-e128-4795-a3f4-cc84bc1de9ec"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", "0.00450603597182860930559589870804534575`15."}], "+", + RowBox[{"0.00146842996795529993981909413188133418`15.", " ", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{"1", "-", + FractionBox["u", "4"]}], ")"}]}]}], ")"}]}], "-", + RowBox[{"0.00059873197087574366956156566571252833`15.", " ", + RowBox[{"(", + RowBox[{"3", "-", + FractionBox[ + RowBox[{"3", " ", "u"}], "2"], "+", + FractionBox[ + RowBox[{"5", " ", + SuperscriptBox["u", "2"]}], "32"]}], ")"}]}], "+", + RowBox[{"0.00002759146490282762431285400426987617`15.", " ", + RowBox[{"(", + RowBox[{"4", "-", + FractionBox[ + RowBox[{"15", " ", "u"}], "4"], "+", + FractionBox[ + RowBox[{"15", " ", + SuperscriptBox["u", "2"]}], "16"], "-", + FractionBox[ + RowBox[{"35", " ", + SuperscriptBox["u", "3"]}], "512"]}], ")"}]}], "+", + RowBox[{"8.1263146471855923932237146226554`15.*^-7", " ", + RowBox[{"(", + RowBox[{"5", "-", + FractionBox[ + RowBox[{"15", " ", "u"}], "2"], "+", + FractionBox[ + RowBox[{"105", " ", + SuperscriptBox["u", "2"]}], "32"], "-", + FractionBox[ + RowBox[{"35", " ", + SuperscriptBox["u", "3"]}], "64"], "+", + FractionBox[ + RowBox[{"63", " ", + SuperscriptBox["u", "4"]}], "2048"]}], ")"}]}], "+", + RowBox[{"5.794811194307946160194053056989`15.*^-8", " ", + RowBox[{"(", + RowBox[{"6", "-", + FractionBox[ + RowBox[{"105", " ", "u"}], "8"], "+", + FractionBox[ + RowBox[{"35", " ", + SuperscriptBox["u", "2"]}], "4"], "-", + FractionBox[ + RowBox[{"315", " ", + SuperscriptBox["u", "3"]}], "128"], "+", + FractionBox[ + RowBox[{"315", " ", + SuperscriptBox["u", "4"]}], "1024"], "-", + FractionBox[ + RowBox[{"231", " ", + SuperscriptBox["u", "5"]}], "16384"]}], ")"}]}], "+", + RowBox[{"5.61087913862401933193450545601`15.*^-9", " ", + RowBox[{"(", + RowBox[{"7", "-", + RowBox[{"21", " ", "u"}], "+", + FractionBox[ + RowBox[{"315", " ", + SuperscriptBox["u", "2"]}], "16"], "-", + FractionBox[ + RowBox[{"525", " ", + SuperscriptBox["u", "3"]}], "64"], "+", + FractionBox[ + RowBox[{"3465", " ", + SuperscriptBox["u", "4"]}], "2048"], "-", + FractionBox[ + RowBox[{"693", " ", + SuperscriptBox["u", "5"]}], "4096"], "+", + FractionBox[ + RowBox[{"429", " ", + SuperscriptBox["u", "6"]}], "65536"]}], ")"}]}], "+", + RowBox[{"6.368270639998519482089675811`15.*^-10", " ", + RowBox[{"(", + RowBox[{"8", "-", + FractionBox[ + RowBox[{"63", " ", "u"}], "2"], "+", + FractionBox[ + RowBox[{"315", " ", + SuperscriptBox["u", "2"]}], "8"], "-", + FractionBox[ + RowBox[{"5775", " ", + SuperscriptBox["u", "3"]}], "256"], "+", + FractionBox[ + RowBox[{"3465", " ", + SuperscriptBox["u", "4"]}], "512"], "-", + FractionBox[ + RowBox[{"9009", " ", + SuperscriptBox["u", "5"]}], "8192"], "+", + FractionBox[ + RowBox[{"3003", " ", + SuperscriptBox["u", "6"]}], "32768"], "-", + FractionBox[ + RowBox[{"6435", " ", + SuperscriptBox["u", "7"]}], "2097152"]}], ")"}]}], "+", + RowBox[{"7.959477089915783966167334596`15.*^-11", " ", + RowBox[{"(", + RowBox[{"9", "-", + RowBox[{"45", " ", "u"}], "+", + FractionBox[ + RowBox[{"1155", " ", + SuperscriptBox["u", "2"]}], "16"], "-", + FractionBox[ + RowBox[{"3465", " ", + SuperscriptBox["u", "3"]}], "64"], "+", + FractionBox[ + RowBox[{"45045", " ", + SuperscriptBox["u", "4"]}], "2048"], "-", + FractionBox[ + RowBox[{"21021", " ", + SuperscriptBox["u", "5"]}], "4096"], "+", + FractionBox[ + RowBox[{"45045", " ", + SuperscriptBox["u", "6"]}], "65536"], "-", + FractionBox[ + RowBox[{"6435", " ", + SuperscriptBox["u", "7"]}], "131072"], "+", + FractionBox[ + RowBox[{"12155", " ", + SuperscriptBox["u", "8"]}], "8388608"]}], ")"}]}], "+", + RowBox[{"1.060527615603453827317086645`15.*^-11", " ", + RowBox[{"(", + RowBox[{"10", "-", + FractionBox[ + RowBox[{"495", " ", "u"}], "8"], "+", + FractionBox[ + RowBox[{"495", " ", + SuperscriptBox["u", "2"]}], "4"], "-", + FractionBox[ + RowBox[{"15015", " ", + SuperscriptBox["u", "3"]}], "128"], "+", + FractionBox[ + RowBox[{"63063", " ", + SuperscriptBox["u", "4"]}], "1024"], "-", + FractionBox[ + RowBox[{"315315", " ", + SuperscriptBox["u", "5"]}], "16384"], "+", + FractionBox[ + RowBox[{"15015", " ", + SuperscriptBox["u", "6"]}], "4096"], "-", + FractionBox[ + RowBox[{"109395", " ", + SuperscriptBox["u", "7"]}], "262144"], "+", + FractionBox[ + RowBox[{"109395", " ", + SuperscriptBox["u", "8"]}], "4194304"], "-", + FractionBox[ + RowBox[{"46189", " ", + SuperscriptBox["u", "9"]}], "67108864"]}], ")"}]}]}]], "Output", + CellChangeTimes->{ + 3.8018857891575603`*^9, 3.801885845843503*^9, {3.80188602578784*^9, + 3.801886046602819*^9}}, + CellLabel->"Out[44]=",ExpressionUUID->"021ab0aa-c0dc-4a5f-86ad-5a65e04cba03"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Zeta]", "[", + RowBox[{ + "\[Theta]1_", ",", "\[Theta]2_", ",", "\[Phi]1_", ",", "\[Phi]2_"}], "]"}], + ":=", + RowBox[{"\[Pi]", " ", "-", " ", + RowBox[{"ArcCos", "[", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"\[Phi]1", "-", "\[Phi]2"}], "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]2", "]"}]}]}], "]"}]}]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.801467099387476*^9, 3.801467111123537*^9}, { + 3.8016446836356487`*^9, 3.8016447022537327`*^9}, {3.8016456218677397`*^9, + 3.801645689420854*^9}, {3.801646649688272*^9, 3.8016466626432753`*^9}, + 3.801646698079185*^9, {3.801651867010997*^9, 3.801651916700856*^9}, { + 3.801652038498434*^9, 3.801652097753989*^9}, {3.8017366534474077`*^9, + 3.8017366552312117`*^9}, {3.801736876696393*^9, 3.801736877609166*^9}}, + CellLabel->"In[19]:=",ExpressionUUID->"f6128365-6e64-4c25-825d-64c6722e0685"], + +Cell[BoxData[ + RowBox[{"Sin", "[", + RowBox[{ + RowBox[{"(", + RowBox[{"\[Pi]", "-", "\[Omega]"}], ")"}], "/", "2"}], "]"}]], "Input", + CellChangeTimes->{{3.801889555999948*^9, 3.80188957445296*^9}}, + CellLabel->"In[96]:=",ExpressionUUID->"558e7195-ec20-4ae1-a25e-3c80a0b9b80b"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Sin", "[", + FractionBox[ + RowBox[{"\[Pi]", "-", "\[Omega]"}], "2"], "]"}]], "Input", + CellChangeTimes->{3.801889616165143*^9}, + CellLabel->"In[97]:=",ExpressionUUID->"f622e75f-0f5b-4118-a203-1d6f94cc0e12"], + +Cell[BoxData[ + RowBox[{"Sin", "[", + FractionBox[ + RowBox[{"\[Pi]", "-", "\[Omega]"}], "2"], "]"}]], "Output", + CellChangeTimes->{3.801889616259348*^9}, + CellLabel->"Out[97]=",ExpressionUUID->"29635d95-93d7-453f-84ae-15597df23491"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Sin", "[", + RowBox[{ + RowBox[{"\[Pi]", "/", "2"}], "-", "\[Omega]"}], "]"}]], "Input", + CellChangeTimes->{{3.801889581685525*^9, 3.8018895818866453`*^9}, { + 3.801889620991137*^9, 3.8018896223601513`*^9}}, + CellLabel->"In[98]:=",ExpressionUUID->"bcb22def-eda0-45df-849f-608a0687b97f"], + +Cell[BoxData[ + RowBox[{"Cos", "[", "\[Omega]", "]"}]], "Output", + CellChangeTimes->{3.801889582503603*^9, 3.801889622995813*^9}, + CellLabel->"Out[98]=",ExpressionUUID->"f3e95ef0-60a8-415c-a5eb-83f467b75947"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Theta]2", "=", + RowBox[{"\[Pi]", "/", "2"}]}], ",", + RowBox[{"\[Phi]2", "=", + RowBox[{"\[Pi]", "/", "2"}]}], ",", + RowBox[{"R", "=", "5"}]}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"\[Psi]", "[", + RowBox[{ + RowBox[{"2", "R", " ", + RowBox[{"Cos", "[", + RowBox[{ + RowBox[{"\[Zeta]", "[", + RowBox[{ + "\[Theta]1", ",", "\[Theta]2", ",", "\[Phi]1", ",", "\[Phi]2"}], + "]"}], "/", "2"}], "]"}]}], ",", "R"}], "]"}], ")"}], "2"], ",", + + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Phi]1", ",", "0", ",", + RowBox[{"2", "\[Pi]"}]}], "}"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.80188662991249*^9, 3.801886631327209*^9}, { + 3.801889493177137*^9, 3.801889493815372*^9}, {3.8018896291706457`*^9, + 3.801889631936281*^9}}, + CellLabel->"In[99]:=",ExpressionUUID->"b8433c3f-b91a-4f84-ab67-731c9d1c1b2f"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJx1nHlYTs0bx5MkVBSSLa89e7Jvz3MkZN/3LVtEyE7IFiXLS/YtRSiSpVCK +VKgoSmmXFpX2tK/8nvOe+c4Zx/X7q+v6GPPc8+nMzP3cZ6aOKzbNXK2spKQU +oKKkVF/xc9xHB9epeqdkwk9HmYP5yyRPxxTZ6dqQuH98wuTgsrbz7/N8sm1M +VgefJMor0i328lzfxOVxrH0G5Xs1587k+b3JSzZ18MmjfFxmv348v6B//IJn +yU/Kn9x42YLnsffWbI+1L6Nc3XumCs91+xjPrulYRfn5woBfTxR8wcN/BnTw +qf2rffilX3Yd9ZU4af/58Ra7PEvqcdJ4NNomrhnrX5+Txt9n8YR5sfYNOOl4 +p1x/Ps58bkNO6mdTctfBNR0bcVKf8Cx4TZIHdzvvznoGTy/4djM5PJF6Bnf+ +MaDxvHax1DP4wmqddAOTKOoZfFPB3IR+iyKoZ/DUPl72G53DqGdwswsr076M +eE89g8/IcZ6dtjmUegZfQdrDs7R/eAbfQOKBZ9o/iR+ewa+Q8cIzeDLxA89S +n/As+MuT67iWH2E9g/vfC+8Z/ymWegZvG/a7nYEiTngGt3/UaM5N37fUM/i3 +VfM8D+zzo57BE4avKJxg4Ek9g/e929jwyX536hk8K/7glbaWbtQzeEfSHp6l +/cOzNB54Brcl8cMzeCsyXngG9yN+4Bm8GfEJz4KnMvliLTtL1jN4v7QZPXr4 +faGewWMKt/nEKJ4feAb/Xnrt8PUkP+oZ3NG91xBPhQd4Bj8yLztrd8kl6hnc ++07FgGEyG+oZvEOfeaYvL+6knsHtSXt4lvYPz+DHSTzwDP6RxA/P4B/IeOEZ +XI/4gWfwOcQnPAs+auWttP/0DH53dc5w1jP44FqHAtYzeI5j/XLWM3jPzefU +vBjP4NsvHR23h/EMHt01Zf8IxjP4hU8B/gGMZ/B3pD08S/uHZ/D2JB54Bk8j +8cMzeDcyXngGdyR+4Bm8qfafnoVx1+N07/25boC/2GS9lF03wHPmd7Bk1w3w +jF5VrW4x6wb4GbevRoeYdQP8WFHZpknMugEetO+pxlNm3QBvb9THTI9ZN8B9 +SHt4lvYPz5STeOAZPIbED8/gqWS88Az+mPiBZ6lPeBbG14B70ePPfRC8esa3 +EnYfBF+8+cpldh8E79A7xLE/sw+CRw4JeWLA7IPgjt/6L7Fk9kHwggUub2OZ +fRDcOCxp5HdmH5S2h2fwK6R/eJbGA8/gbUn88Ay+kIwXnsFLiR94lvqEZ2Ec +in+3+DOvk3J4lnJ4lnJ4lnJ4lnJ4lnJ4lnJ4lnJ4lnJ4lnJ4lnJ4lnJ4lnJ4 +lnJ4FuJV50Y/ylD3YjyDJ/oblPteSqeewW8F3fPtcT+Tegb3VnbWOeKcTT2D +X9Pd0zBkdB71DB789Hv5+FkF1DP4xSmHzWbeKaSewZ38pgy00yiinqXt4Vna +PzxL44FnafzwLB0vPIMnEz/wLPUJz0JczThbA5sBrGfwjXkL293qnUk9g+e9 +OjeejxOewc+b3NjzesBP6hnctKar5hvVUuoZ/GST+tkDp5VTz+DNPWtdgz9U +UM/gjTsYuWVPq6Sepe3hWdo/PEvjgWfwyyR+eAYvJuOFZ/CtxA88g9sRn/As +fL4W1zS02IT1DG5gs3x96oMs6hncSXl9Kv/8wDO4RivzyObFJdQzeMCZl1G8 +B3gG773ksf2vn9XUM7j5QuO2+cp11DP4PK+jSqN866hnaXt4lvYPz+ChJB54 +ph5I/PAM7krGC8/gMuIHnsG1iE94Fj6nORcq8Qzu73Z/F+sZfPCPt79Zz+Bq +s/vnsJ7Bfd1Vy1nP4INMNZ6ynsGDTNUnsZ7BA8KGGLKepe3hWdo/PEvjgWdw +LRI/PIMPJ+OFZ/B3xA88S33Cs9BfS+6M4Z/rBvjlzpM4dt0AD+AOX2TXDfBV +N6/4susG+IE761az6wZ4XZ/wWYOYdQPc/3jwPyHMugGuP/l61xxm3ZC2h2dp +//AMfojEA8/S+OFZOl54Br9B/MAz+FnDP9cN4f+14vp6/rkPgndzCOnmx+yD +4C+TOnfqyeyD4O/mq3ix+yD4+6xrsew+CG68o3+RCbMPgp9yfGA1i9kHwbep +agax+6C0PTxL+4dnaTzwLI0fnsHfkvHCM3h/4geewQ08/9wHhX9vzXWw/DOv +Aw941UnTi8nrwL+Xa4zyYvI68GvhXdZ4MXkdeN+KifZeTF4HXl/+0sWLyevA +rbvrP/Vi8jpwkyLvF15MXidtD8/S/uFZGg88S+OHZ+l44VnqB56lPltnPXjR +ycdPLvwMkx/Sri97GfqN+gffFNj4Dd8++eVGmeFINU7aHv2DW5D26F/4f7rc +m4l9XxUvTqX9g89rZVnG9i9tD474h7W+VMb2jzrkv6/Tgth+pBztpf0gfmk8 +vfx2WnfzcZcLP/3kHQZd7LljU4qs29SJL3QeqnFSjvbCv+tyW8dvNxn2UWwv +5fCAflq0nB7Bfy7aI/5wrUkRbDyI/0dwv2w2fvR/+03PbLa9tB+0l34u4pH2 +g3iknzvNKq+qtmMorZd6D3fz+bQnSda4QbVabcd4+rmhj7vb8e3B0d4wZ2mR +t0mcbEem9fu98Wm0vb2j3gq+PTjaP40K6O//PFq29v2B0zUds2n75dWBHN8e +HO1Xlz5b+igyUrbQ49Bcq3WFtP2nJmO78u3B0Z4bUWR8pO8nWbcJRqf2xheL +8WfcbPafB8LRXlnNyVRNLUzWYcSYn751Yj2/ztGpPt8enNa9Te9bXuz0XqbV +Yezz4eNq/2oPjvYppH1jrXFtrNb9/isecLSvR+I5ePDWq8Xjxfr/RzJecLQf +Rca7r7qz5d54ZU7qExztlxGfu7e6dLy2XoWT/r7A0d6d/L6253WJ8q0T3y/g +eQBH+17kedi8+rZN4r/ieweHN1aP+fbgaO9Jnjc8h6jfWtz4mWlfF0efN/A3 +Y7aaLhz6mT5XtH1Whr1bfCh9fsCtHy+c178ugD4n4HrbE3ucUPKhzwN443of +fPqUPqa/d/AjJ1sv82/vTn+/4FaE4/cIrkb6we8LvD35XPxewPeQOOEf3IyM +C57BXxMP8Am+hniDT9RpuXsTUqb3jqU+watcXt8os/9IfYJbZbq/Wp4YSH2C +X1t9+d8Rp55Sn+BT1Cu+7th3h/oE31u+4dwK2XnqE9yzi3V6fr/D1CetVxMO +n+A7SD/wScdFPhc+aZ2cxAmf4BZkXPAJnkU8wCd4X+INPlGP3dX+YSHrE7xu +08oI1ic4x80vZ32CB+Z2q2N9gs+sf+HmTsYnePOKlO8rGZ+Uy1J6FTE+wRsS +Dp/g2qQf+AQ3IZ8Ln+DeJE74BB9ExgWf4HnEA3yCWxBv8Im664TJvVscZ+Y7 +uKPe8/vsfAfvKGs+5h4z38HnK3m1M2TmO3i/N+88TzLzHfyfLg8H9WPmO/jU +HW+GBjLzHXwc4fAJrkf6gU/wHuRz4RN8CokTPsE1ybjgE/w88QCf4BzxBp+o +r/Z4YqcUwezj4DZuvSx9mP0avJVqbBK7L4NX9g/Rf8zsv+DOVRbKtsw+C25o +PXVIY2Y/BR+29vjsy8y+KeXwCd6P9AOf4DfI58IneDmJEz7Bm5NxwSf4AeIB +PsE7E2/wKa2jwqeUw6eUw6eUw6eUw6eUw6eUw+dfcRKfUg6fUg6fUg6fUg6f +Ug6fUg6fqJf+WNKwympYOvUJ/tho8sRTmRnUJ3iz+zbRnY78oD7B72lo/nvn +Zw71CX7C06jefLV86hPcd1GYQ2PXAuoTXH3Wu245XoXUp5TDp7Qf+JR+LnxK +44RP6bjgE/wJ8QCf4LnEG3yiLvqzBSfPsMqgPsEnT3xXa+2XQ32C99j8MOGB +ehH1CV7tnGZsdL2Y+gTfnDrUtCC1lPqkdezt9S4v8CinPsEdTBtkT0qqoD6l +HD6l/cCn9HPhE7yWxAmf4H3IuOATfCbxAJ/g5cQbfKL+GebePLjmQyb1Ca5y +68fhwa751Cd4xquu+XvMiqlPcLPZZz/nJ5dRn+CNfs2f3666kvoE39Mupu/w +HTXUJ/jd23mtKlrXUZ9SDp/SfuATXJN8LnyCW5A44RM8m4wLPmk/xAN8gscT +b/CJOufrk16fWZ/gl+b/vs76BNcsmqW8l/EJvlypXRHrk9aTDdz2sT7B5/9z +ciHrE3zMx5/jWZ9SDp/SfuATvBH5XPgENyNxwie4DhkXfIJfJx7gEzyYeINP +1DN3jX2ylJ3v4DuGPR29n5nv4DdHu2l5MPMdfIvLodPsfAefdvnTK3a+g294 +26ThQma+g4eNWbF8MjPfpRw+pf3AJ/h08rnwCb6VxAmf4LfIuOCT+iEe4BPc +mniDT9Qtxw8+0XkPsx+Bt2o85Ra7H4Eb9Zy+pDOzH4GbOEWMvcvsR+BDr0en +sPsR+NwDEQ5NmP0IfIFF25G5zH4k5fAp7Qc+pZ8Ln9I44RN8HBkXfIL/QzzA +J/gM4g0+UV9a1lJJzYvJl8AT9Wf192LyJfBWoxbP82LyJfDVac93eTH5Erje +50HnvJh8CbxTVayrF5MvgV/kEv6r38KnlMOntB/4lH4ufErjhE/puOBT6gHe +hJ/x8g/PXSfEhIl5u3pl07bx9l/kurUz2191iafeQrYPGPm0JFK+rSHXq6tN +HPWmReq3z44clE8Ki6PezqSV1ibYv5Vvc63zcumSQL11IfXDBWlrF9kOSqLe +TMyaqPb1cZf7piRYxLonU2/TSZxL2+667TXmE/XWjMQ5LL93eVqTKHEfJ3G+ +P6EyVOVRDPWGOvPGlb5OH4wSqLeLJM45jfzfK23+Sr31JnHem7Eo3Sb1G/XW +e9zaypP5OfLW8stFbL1I+Jkt/xi981XikCjq7UfQ8dbr5mbJo2vD/I7mfKTe +Qg617xnHn4eKymt6Zs176s119MPh4/zT5TotPz1o1CSEerNTGj3JqyRV/jWs +exPN0cHU21r/z4s66afIzQ1zlZP8g6k3xPmks8bxudFPqDd1EufMnb6rOh3y +pd5ySJwvUjTdA24FUW/vSZyP3iWq1Bv2Qfw+TuKsMfl4aXq/z9TbMRJnpwUL +HYZMiKXz14zEqXq13iO2/nape76P5u1SecG02xlsfaNhw8GBY/1L5KOPWTuF +n/tEfQo/i+U3MlKmzpnwlvrMfBv8mX8P8+xqdKd/E/2oz7m3myXmaPyUG+2P +/jqmqxf1+c5mQXpH/SL5088zrWaqe1CfFiHGsY9tCuS/PCamtpnqRn0iTndH +n4T9G09Rn2okzis9rcYM3+NEfe4kcdbtUfat3+YR9ZlF4ozpbdW26QM/6nMe +iZP78bj66fpg6hNxXp7RwnSjZyT1uY7E6V11PpWtv7XpfWfn3Kga+QRJvehY +k8L9J/Or5aP7Xgxm60WVOUPs3jSsll+rsUhj60XCzyr5qwslQWy9KM4t9JLh +yEq5lZ1XB7ZeZHJM29l8boV8mWruV7b+5r12kZuTZbk88eO2HgVMvQhxppzN +zihk6kX2JM6eWSuvsvWiKhJnG9s4U7ZeZE7iPPciLIStF8WTODV7XfrM1osQ +593ME65sveg5iXOxpP429dLDNp8O1ONM7kRosvUiVbVoxxyNelybdp9v8r8X ++Hy5s7KT6lUlTiVhi90zxe8RPrdntbvLv8eTuVi2a/ZAfD6Fn7/lp6/fO6Gi +eE7g8/3JD0sf2/ySX437tm+E4rmCz+EbWqz54Vgn7xpYbXRY8RzCJ+Ic/aVu +S3vFcwufiLN3bsG32YrnHD5fkThH66+pNFbMC/jcQeLUM9FrczpRfD4XkTin +u1Q+4ucdfCLOsm190vh5Cp/DSJybghqXsT7/bXOiqrhVA260dmr5H+997B/t +07ytwpVaRjUeqlg34PNXVXS9noYqXG6SSZ8ZinUGPp+ZVx3h33MGhr+RKSvW +JfjcGN++8fLJ9bnYytjYQMU6Bp/CT2VusfP7HV0U6x58JnubaV8yU+ZaXhk8 +dr5inYRPxBk4tOPrr4p1FT7HkzhP+7++0FSxDsPnbxJnyopdKk0U6zZ8Ik7r +C/v7OSjWefhEnOan+920VewL8Ik4u81rqpWk2EfgE3Hq50W1Z+tvEdfWxvHv +2bau8o5h60V26icX8+8zAyqa2x1R7F/wKd/7OGVKaEPu5JOjD+op9jv4rMj9 +sop/D/z9UEf3MMX+CJ8PF1X/sElX5Q4NnDSngWI/hc81H/Q2OFmqcuPWzdD6 +rth/4VP42YBrc2Sq7zPFfg2fiHPUpNaq8Yr9HT4R5yGPiCA7RT4AnxyJs7qj +WcZtRf4An5Ukztd2HQdPVuQb8Ik4Dft8+MHnJ/CJODcdd3Dm8xn4RJw5gQ7q +bP1NiFeds5qjXMLWi0JOmY+YG9WEK9pQOEZdX8zPD/w66b/ZtAl36F6u0w4u +k/ocuvHJmJP5jTlvo3bFoywzqc+irzHBrlaNOQP9E2brAzOoT9cpNZPeNGzM +qWb03X/V9Dv1afqyQ8S3c424VX2HbZSfSqM+EeeBMxPPL32bT32GkjhPpC8s +6pSZQ30eJHEaVm7d6fQ9i/pEnCFDHu5u908G9Yk4V22Y28w0PY36RJyXR7dJ +H7QklfpEnMbbA9PY+ttM544Xln5tyv0wthjOfn8U4m3KdfcfMeBIK/H7Y8CB +dY7nKzS5ll2yuBSlAupzd9GpTo9tNLklMt/JQeuLqM/+pp53wrQ0uQbXni8w +MvxJfWZ/iu35w1GDKyyKzuw98yf16Syv9ajfW4OLelrPKCCtiPpEnGOjzV78 +jiqnPhHnkicONf0flVKfgSTO/jc6NYwbUEx9WpE4s6IX73eZXUh9Is6p5rUm +jtdzqE/EGRse09zueCb1iThL+yTWsfW3UK39w0e/0OJ841e/Yesbtyecqf14 +QItrXtetKHO8WN8Q4tXiBjhMKXIO+kl9LvF5eiBHQ4vrucGj+5v9pdTnsJ/B +Rruim3HqXEJtlWM59dmyR4KK6tVmnPGys2Wdaiuoz5+mee/OLm/GjSjJn/Xs +WCX1iTjrtFUenLCopT4R5x1D48+W+tXi80ni3HLjuW+zURXUJ+Iceiy4cH1t +CfWJOL9dt421fSh+H0ecY4tsT39sl0t9Ik61H/mj2e/j2TPze0Qdac65SepF +b+1/55pObs4N/OR+ha0XOQdqeRRoN+eUM27WsvU3IV5tLj31eTpbL1pgONiw +sZM213v/iLVsvWjQOpPSi2banLZeyHC2XqR1c+Gzrn20Oa+QTnpsvQhxDrrv +O5qtFyHOQL2rU9l6EeLM8Hi3ga0XIc78LRXJbL0IcZaGxhSz9TfEadl7hC1b +L0KcRZL6W6Nzi1qvntGSW6Zrupyd7xkfNiQWt2rJKS0K/8T/Xuh8r3/g+oHk +FpxawKAGdg/FetH1EQ7LNG+34IzrwrtbKH7v8CnE24Ib2L5/Ff+cwOec+8/S +exi24HRza5puVjxX8Nk/PeT288rmnIH10kz+OYRPxPntbFkg/9zCJ+L0qL42 +o7PiOYdPxNnVffyYasW8gE/EefpuxHx+HsEn4nxoGax5UzHv4BNxNh+S1TRr +vOgTcaa+UI1gffb4EqpW0a4VN0DVVJ+tFzXQSHpvk67DbfN4YM6vG/CZalxw +QvueDve2cFYov87A58u9StOcLHW4iTrm3W8r1iX4vOylrdV3iA43qmC9Bb+O +wacQb0tu+oV+Gw0V6x58zugy5PyENy05nUXNBilFl1OfiDPdcdl7fl2FT8Q5 +YZPxij6KdRg+EadHVXggv27DJ+LcYv7sBr/OwyfiDH459Tm/L8An4mx/fvYe +fh+BT8TpsD15ATvfJ+kMrbT7ocsFOnd9MeajmC/h/NLT63uHDFbsa/CpfHTx +XpftutzErcYn+X0QPnHuq+Zu9w7tFfsmfL4oO6D0WlmXO6h2zNhZsc/C5/k+ +ZwOnhLbiznXalNpZsS/DpxBvK+6d2sObyxT7OHwizl4u46Zxin0fPruTODPm +Dlt4TZEnwCfijDE7aGChyCvgE3F6JpjekCnyEPhEnFqla7rvVOQt9P0vidP4 +fOfrfJ4Db9NJfcZ/h9FamaX43s3g//BZpG7zjtSX0A/GO1XpZlhoo3TaHnyu +hEt/X+DSuh/6l57/wflP1LtiKhb8d/4H59bAH5/c8oS97wNu76Kmtts0jp4L +BfdwnHA1VvULPRcKbtg47t6OnZ/puVDwXyOSO07xiKDnQsGd9nOufF0L50LB +I1w2Hvvt8JGeCwW/RtrjXKi0f5wLBe9P4sG5UPA7JH6cCwW3IePFuVDwz8Qb +fKLeFTLis93CT3HUJ3jgeMd/WZ/go6Imx+1u8pn6BL8QMLP/56JQ6hNcfZSF +gWtSIPUJrhOU7l3g5Ud9gmeFlgWFhz+nPsHT7oy2qTF6Rn2CfyPt4VPaP3xK +44FP8H9J/PAJPpSMFz7B3xJvOFcJ/op4g2fUu1ZPSelx/HAM9QyeduzMLtYz +eE2B64T3bmHUM7ifh0rrqb0CqGfwkPXWxpUXPKln8EMXlU9MMbhDPYMfWf72 +yBDPq9Qz+GHlwonvgy5Qz+AbSHt4lvYPz+CBJB54Bvci8cMz+E8yXngGX0i8 +wTN4IvEGz6h35XbWM+Tvw8IzuA+5dwzP4Krl9aPZe8TgWRMi/Nh7xODfNVNu +sPe1wesqhly0Yu4Rg4/LzF0wnLlHDL7QWv20P3OPGFyftIdnaf/wDB5N4oFn +8DgSPzyDV5YJ44Vn8GTiDZ7Bn0juv6PetTF7tAn7PIO3Ov7n8ww+3XSAG/s8 +g+s5JB9hn2fw4kMBbauY5xlczUa5zTTmeQbv0FO2YjjzPIMrDb+kHc48z+At +SHt4lvYPz+C5JB54Btch8cMzOEfGC8/gq4k3eAbXPv7n84w60kTXmCB2fQZX +mvjn+gyu2sF6uBWzPoNXly/tGMWsz+DWI3YaujHrM/jAVWcCi5j1GVxvZHnw +J2Z9Bs9Z6m9Tx6zP4G1Ie3gGNyT9wzP4HhIPPIPnk/jhGfy3njBeeAYfTbzR +c/ISb/CMOlIRqSPBM7ie4ZU/8gpwM+sL19m8AjzioN6KOCavAFc/4Xh2J5NX +gDfuU9ZhKpNXSOtv8AzeLfvGrXpnxbxC2h6ewdVI//AsjQeewcNJ/PAMvoqM +F57Bc4k3eJZ6g2fUu/aQuhw8g0ffTVFl7/WAv9cN/30lO4N6Bq/9d1Vhz4M/ +qGfwLis7H1odnkM9g98Lu7H16bU86llaf4NncK/nHWJtehVQz9L28CztH56l +8cCzNH54lo4XnsH3EW/wLPVG8zpS75qwPGKmm22GmNcRvuN0Ug/WM3gb7orL +P0k5Yl5HePCF47+V2haJeR3h174dbzL5ZLGY1xG+8pvjg4gjpWJeR7hy0ckm +TuFlYl5HuKVqg8kz5OViXidpT/M6Sf80r5PEQ/M6wt+T+GleR7geGS/N6wif +SrzRvE7iDZ5R7xrfxF9jXfss6hk8aVo2x3oGH+n2IsvRtIB6BncyH3XGK6eY +egZf4uNinrm8nHoGP/2raUHxwCrqGdxtj3kzuWYN9Qy+sDbMv+5JDfUsbQ/P +0v7hGXwFiQeewW+R+OEZ3JiMF57BZxJv8AyeTLzBM+pdlRdUt/D3YeEZ3ILc +h4Vn8PXbLxWx94jB7QeFf2XvEYPLOqR9Z+8Rgz9a+u0Ge48Y/MIS/QHsPWLw +E9yy1uw9Yml7eJb2D8/gRiQeeAY/TeKHZ/DNZLzwDK58UfAGz+AbJPeyUe/a +vNO2M/s8g7eY8efzDL4u2133BvM8Ux7p7c0+z+Cre4bdYJ9ncNMp5w1KmOcZ +PO204SL2eQa3S9qn8Yt5nqXt4VnaPzyDm5F44BncksQPz+AbyHjhGXwn8QbP +4C1n/Pk8o941cn/ObnZ9Bvd2+HN9Bn+9plc1uz6Df7cZOKYesz6Dx1+uv4Zd +n8HHaaW0i2TWZ3Dnxbm27PoM7mtVFcauz9L28CztH57BE0k88CyNH57BA8l4 +4RncmHiDZ/AXDn+uz6hHvYj1/O+8GXyC1//n4OqrTF4BvmLNWvteTF4B7u1W +PMWMySvAlxYGmj1j8gpwj8Ja52VMXkHrY24P844weYW0PXxK+4dPaTzwKY0f +PsEbk/HCJ3gQ8QOf4MMnqzXkffb67xxSAq1fLd4S1JzPA4XzNN8p15j96TZf +jxLOheRSzp1z9uTrV8L5BrGe5hJupc/Xu4T39GI9bUvJ9kd8fUx431xJuWaj +ISf4eprwnu835S0PBbXn+xHeV4l1sxO7Rrjwnyu8dxHrZpdaHHDg4xTeH4h1 +s26Fh+p2KcYl1MHFuplSzxsP+LqZUMdUo9xMbmDO10uFc07ptB71YmiqcUbC +B5lwXieH8vpjwrz0Z72RCec5xDrY+SspU9b4v5IJ5ydKKXdpqad7RclHJrxf +r6Q8b2+nSWV3n8mE93BiXWtKZH7G+tgAmfA+SaxrXfMtdp9hFSIT3ouIda07 +F49MtdSJlAn1fVXKBwy/e7PyZiy9/wv+qcLtJ3+OTjhvlEPrQktzVAKcB/rI +hHMzRZSr7ax2HNzzgUw4/1FK+eClriuLTjrLhHMMFZTvvnZ+5J6ml2XCey+x +XhSdfOhpsbefTHh/o0J5M++w5kHHQ2TCewhVsS7U2vPNh+dRMqGerkb5w0HP +/WZ4fZUJ53iKaL1l494hG7z3usiEcx4llA9/mhc16dgZmXCuooLyMePzGmk0 +OCAT3hup0DqJsa9BnPacNzLh/Ycq5QEbP09qvCGS3k8Hb1e/f4OQvYky4RxJ +Ca1LhOn1XV+956ZMOA9RTvmquourjq25LBPeo6jSuoHH/LoHLv9EyoT3AWqU +t9g/ydxJPUEmnJ8op9/HTbY71I9Z+1wmvM8Qvy87re3xdWSvBFkfMt+l30cw +36XfXzDfpd93MN+l348w36XfpzDfpd+/MN+l/WC+g3cmn4v5Dl5H4sR8l44L +8136PQvzXfo9Sw3znXwvCL2+QH/9rkKZPeY74SnXLB+MGVYsznfCX91//NBp +TKlsPOY74Wrtr7yU3SoT5zvhNUqBx30MysX5Tvjo5rsb7f1ULM53wo/G31nS +aFORON8J//5p3p7nl3PF+U64PK3vG+PJmbLumO84LzG7Xxf+PRrmO/Lz6YOf +aL+dWUbnO/h+3bqrIQsq6XwHj0lar2a3v1rGkfkO/rXkyW/LgzV0voN75PX7 +8aWqhM53cM3e4S1WzCui8x3c6EVp3bzV2XS+g8+NGRaX75lG5zvy3ppdq43T +l1bR+U6/XyQn52yvrqHzHfx881fdWi6ro/Od5vMN7rg6pv2k8x18yNwmfdrc +y6XzHVyle8+Eid2+0/mO/PCYwdZR94Kq6HwHb+Sj3D5MXkPnO/iB5IpWj3Xz +6Hyn+flXP2sDtQw635EXbei5YMLQpDI638Ftgjdv7R76XSa8F7wml+5reE8H +HkzeAyJPAH9E3rsZkH6QPzSPH+Izhvl7F+BDSV6B+QXekrTH+1P0b0rOjTf5 +77z4W7oPbota9Yxfr4RzXTWUx5W0qItSrG/0/A/h88h5aeEcfADddyx7TV7K +r5PCOe9Yymvv1bPn11XhfFgN5QeC9c4dVazDwjmnX5Q3zhmZW6lYt/E+F/wX +OT/clPwdEqz/hsZ1Gvz6L5wj/0J5t0dTpvP7hXAeOpVy12UjEvj9RTjvVU15 +z+QGuvx+JJyv+kV54qDRRfz+JZy/Ed8XbDhlbM3vd3i/DO5Azt8K5/6f0n3n +8IHWEfy+efe/8+JRlKdyyQX8Piucz06lXHdqa2t+XxbOGf+gPHvFF4cSxT4u +nEurptzLTNbMWrHvC+erflE+0ark209FniCcExLr82+mGgwdqsgrhPMuypQP +NHY7d1ORh+D9OPhUct61E/5OC9nvbkVlN+DPVQrn3SMp72w5Np/Pf4Rz2ymU +Pz8Z6svnS8L54yzKo2uX3p+pyK+Ec7QFlO+7uKzIQpGPCeftqin379p5QoUi +fxPOjdVRXvjLr/k1Rb4nnH8S6+QD3V+PM1fkh8I5HmXKnQftdO2hyCeF8ygq +lJ9sHaKXqcg/x5H5KK3HCvcNIv6qewvn5pP/qm8L578z/6pvC+eY8/+qbwvn +XIv/qm8L5wv/rmML5+Tq/qpjC+e9/q5jC+eWlP+qYwvnb/6uYwvnSP6uYzfF +eoK64vV98/n1MBTrCeE7yyI+DFGsn+Fk3cD+EmmzcQe/3uaQdQN8SrVNxSPF ++nyQrBvgXW0OR3xQrOeBZN0AX3ldo9xNsf7rkvUB+8WaYZ9S+P0ilKwP4AOe +nR3E7y9YH8Dvr9v6gN+PhpH1AfykfWhXfv+yIusD+LSv+j/4/Q7rA3iJymKO +3x8vknWA1jdyPTP4/dSNrAO0rnJoZJf5iv0X6wD4ji/jB/P7NdYB8LLPZrox +iv0d6wDtx+vBpM2KfMCQrAPg3g9mT+XzB6wD4A4LDWL5fAPrAHiivh7H5yf4 +O0jY73ZMnGPA5zOY7+BpMwIq+fwH8x086OitZD5fwnwHf3Ph7l0+v8J8B3fr +pbOOz8cw38GL3I83eaHI3zDfwS/FXh0sV+R7mO/gO/eHt3ZW5IeY7+DVtqeV +jRX5JOY7eHBOkTOff64h8xr76SvZmR789/p1ZF6DJ1QHrePrAM/JvAY/1zv8 +FF83GEbmNbhXMTeDrzNgXoNbTI5Yy9clMK/BR52uy+XrG05kXoPfcCi8wdc3 +MK/BV97ZtpLvB/Ma/Oj3kxP4z8W8Bj9+ousRPs7pZF6Dq/rcWsaPC+fBkD90 +LYlTvVcu/v0K8Bv/XuiXWvOFngcD97mUrTPvdBQ9Dwa+aljVlmOekfQ8GHiz +HtHqV5ZH0PNg4O0m2g3e0VO87wbuuEt2tsQ2guYJ4A+Maq3jSiPpvgzeudnQ +fhX5UXRfA6+3qzR79Y4Yeu4LXOfOgIKEE+K9P+Q/j8v21xs1PJyOF9w+8NaA +5Ybv6HjBe4/1yO2jF0DHCz7+2OTDn3eJ9y/AtUftWxh97TkdF7i7tcfuS0YB +dFzgrUa27dv66js6LvCNlX3XxGuK9ynAUye+buvyQ7xPAW5pUG6sXhdPx4W8 +y+BjA9lwNV86LnrvrO33VgnnxXs64HWZxmkBc1zouOh5GCe7r1q9r4r3awhX +rTk4dGHGCxo/uE+b9JbLL4n3a8Abzqy+uG1vBI0f3LxlXMqTklgaJ/IxdefU +Yez9LPCrcx0GsX/PB/zIr9wG/D0sxAP+8PyrePb+FL0XZh79lL0/Be6emJbJ +3/fB5yKPGpS77baO9y36ueCD2y72nl14hfYPHr29/+mmhuJ4wUvfFtaNfBxL ++0He4jn/TcbMq89pe3BLtQMRk/bF03mN7+Mz4tqPn2Ir3uMAH6J0V/dcUJZ4 +v5XwgiuRayZHZlPP4C1+5ewpO5tLxwvuuMW26a6feeK5bsJLL5ycUx4l3tcA +d7lxNkAnOI8+/+Ab39ftezsjlz4/4IbznzUy3pdNf1/gs4eaPAhZlUV9gsdf +3HjqdxfxPjW4fUlc2bCENHG+k7zlwMpV2l6e4v0L8N5FH0MO2fwU5zvhD946 +LtmxtkSc74QbT7i+pOy7eH4Y/OD1C5O6JJeJ853wcU+ju9jrlojznfChR02M +3nf+Kc53wl9aD3mZlJUvznfC93/4sCB2brY43wmPPPZ0e+6X73RcyKOq7qxx +OBUr3oMAd+nKFQw/LZ4zB095OdChr08VHRd45jstjQlda2j84A32Wq1V3y6e +Dwffp1Xt3m6ZeD4c/N6EofaHVuTR+MHzB2w2txkh3idC3nX8po0Fe78APFpv +2Vj2fgG4zgcNA/4eAeIBPxdZWMae/6f9ZESeYs//g9ff0zSMP6+Oz0UeFfk9 +Kr3VOdEPeKFJ+NUgvRraP3iXtOTAOYnieMHnXS4Y7b4+k/aDvMV2zM21edFl +tD34qs4eO9bqZ/zfOgDOCWP9d7S9eoNfH9AePGnpkZTpV/9/HQD9YB3WNlLJ +5NclrDPg3QvHr+XXMfQPrtc3/dsMxbqH/sGTO0f/01KxTkrrAL9JHQCfi/W2 +NrdlNnvPF7zH/Wkv2Hu+tP3pcYn8eo54aPtVWxqx93DBCy74jWHv4YLbbbw/ +jr2HC457uIgT67bcWbWO36cQJ7h6zsG3/L6GOOn3feVBB/l9EPOUntMb7Nhi +kWLfRPz0+/tgmXcLxT6L+MHnefYzD1Lsy4ifnuubHPiD38cRP7jy5hTtEYp9 +X1oHmEbqABgX9pd4G5vdfP5A7xEQ7vu95Q4+38C4wAc32j05QVP8OwDgGmv8 ++rS5KuZR4Hlt+x++rMh/MF5wU+99S2Kuic8n+LuLE+2id4n3+sHfh+Tm9NUT +8yhwsw+tu60wFPMo8EnvI2L5fA/jxfffDp1Htg7o8ZWOF/zUs+7bEpm8ETxk +UR8nM0WeifGCDzjq2KgyX8yT6ffxFw5b4kvFPBn80ey9F0ptxXkEvvrsoIm7 +mDwZfNbe+hpXl4t5Mq0nRKqvsPcU82RwV1u9PD5vhwfw9s2jUvg8H+sV+K42 +3+z47wV0PSH7y9zfd+aw6w+435aHubmK9QrtsZ6/H+BiwK9v8Al+bWDeNX49 +RD/g+j22TOfXT4yX3ptbq+nIr7foH+vzWX/vcPZeG/inljpn2Xtt4Cu/Hqvi +1398Ll3/XSP6sffOwJX0VIzZe2fgtsf3mfP7EeLBer5l0el9/P6FeMDDFmQ+ +4/c7xEPPk2xIjOD3R3oPlPAm1qmX+f0UcYIv/9VqPr//Ik7wwxotY/j9GnGC +ez7Y2H3EafG+Ifi7fbde8fkA4sf+0tZ5xiU+f0D84NtNl7jw+Qbip+cNTI4a +flXkJ/TvABAedrGtA5/P4Pmn3+v3ptny+Q/GBe7R4mgIny9hXODPXPUi+PwK +46L1hBNrX/P5GMYFXny0ne5hGzGPAh9/r/oIn+9hXPhevGTKvUw+b8S4wJOH +eg0IXSXmyeCDV3Tz4/NSjAt8lo7ZvHczxDwZfHtkhxetgsXnHHz3y3UrK5g8 +Gdyyanmj3T/FPBm827Ke88rPinky+HePge2mRIp5Mq0DbHjgxOf5mNfgntOG +OvHfC/7f+4v/ATK6GKU= + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[{Polygon3DBox[CompressedData[" +1:eJxNmXf8T+X7x9/n3HdDKqQoDWmgkpkiqVD2pmwhZe+MsilCyWoglE0aiEpT +pb2nfJsatKS96/t8fV/37/H4/XF/rqfjvN/vc+5z36/rdV2nXK8hbQfnhULh +Wv4E4gJiCeILWaHwA6MSfBLxHcZhcAnid8TPGZ8xDuf8psTzOb4z82f/YhzG +8SbEuhw7Fu4IN4MPghvA58BHwW3hi+Hj4E5wc/hIuA18Efwe4wj4H8bb8KHE +YsT/6Dw4J77KOBAOxDcZh8BFia/p9+ADiK8wDoAz4suMCP/LeCnzff/NeBHW +XPzJ2AWXLOgDhcLvjLPA04jv67rhSHyDUQQuQnyLUVT3TfyAUQo+kPgbowZc +kfgLoxpcnng6PzQG7gufAA+Eu8KnwaPhPvAZ8DVwP7gCPBK+Ai4LD4K7waPh +h+E1mif4Mrg1XBzuBreEi8Fd4Rbw8fAAuAt8IjwY7g6Xg4fAl8EnwUPhHppX +uD58Nvwv41y4CvEfRm24suaVc+rBNbPC/yawDqEqPAreBq+GT4VHwJfDJ8PD +4J7wr4zqcAXiKRwfDveCy8NXwb3hivAo+Eo9/7SWmsJf63vhY4lf6fNwGeKZ +aT41P5XTXOkeq6T71T1WSvOgOa+a7l332wSeCV8NN4NvgMfCveCV8Dy4L3wX +fBvcB14P3wo3hWfB16Rn1z/Nc/V0v7qvamlude8Xw9fBI+GG8DR4FFwPngwP +gy+Cr4WvghvAU+ERcH14CjwcPjutDc1PjTSHmud+8AZ4YVpvfeHOWsvpWfRO +z6In3E77WusPLktszvEb4XHwEHgTvAz+VHsVPoL4mdYTfCRxr9YNfDRxt/Y8 +XJzYjc/eCy+GP2GUkWYQ92jNwaWJ32u+4HLE/bpW+ETil7o++Bjix4xj4EOJ +HfnORfD1cCd4MTwD7gzfDs+Ee8DL4TlwT3gFPBeW2G2El8KXwXfCN8Ft4fnw +FLgdvACeCreB58GT4S7wEngWPBTeDN8Bt4dvlobCreG58CS4BTwbHg/XTOtZ ++7co3AFuApeAu8Ot4LnRe+8LBOk2uDb8LXxrtC58A98SvR++hq+L3vO74Juj +NeIreH70ftsLXxv9G+/B0+CS8H/gedH7bQ+8IHq/fQnPidaCz+HZ0VrzKTwd +LgW/Dx8Trad94KOj9fRKuHS0nl4Bl4nW5b7wDdG68wl8Y7Te7YZvitagz+Dr +4dLwB/Cx0drdD54BH83xD+FZcBn4Y3gmfAz8EVwqWrt7w6PgP+EX4avhjHNe +gRfBjeDv4IXwhfA+eBwc4dfhxXBjeD88Hj4YfgPeCk+CixIfYkyFDyduZlwD +H0y8nzEWLkLcwhgHH0J8gDEZPpQ4gVEEfpPvnAgfAr8FT4peE2/DI+CfuP7n +4Kvgn+Hn4ZHwH/AL8HD4R/hZeBi8D34GHgP/Db8MXwPnfOer8Fg4wK/Bo+G/ +OOcleEp0bngXnhqdM3bCk6N19p3ga7yU9dmYz3wO94JvCP7NWnClpJnaj9Ph +S+G18AK4A7wOvjnzvC6Ep6X9K828JfMzuQ2+LvN6nwGPzjxPl8CNkh5qT03M +/NzmwBOUi5JWj4EvgdfA8+Gu8D3wIrglvEzXnNmHSAM7ZV5HfeCOmfdED7hN +Zu8hPWybeX1dCXfIvAavgC/NvE57w5fAreA74Bszr5f2cMOkA9KW2Zn3zeVw ++5QLpO1D4W+k3fDpxAeZ0+Kaq9w+StpYKvMzbAlfmPkZtoLrZc658kgNMq/x +FvAFmddya7h+5jVyPlyN+BGjInw88VvGOfAZSYflSU4lfsGoCp+iZ82oAp9M +/JBRAT4u8/pqDNfJvM8awrWJ4/nd7fDd8KPcyxvKQcR3+feJ8FHECZzzJHwP +fBO8Q/MpHYNfgLdkXuMXw7Uy74ML4OrE1/UM4IMz74kL4RqZ13Ij+NzM/qoe +fJbum++cAA/Wveb2D/JUtXL7K/mu3vAD8HJpFvwgvCJzTpdvWQVfDm+F75TG +wQ/BK+H+8KPwWnhYupd7U37RPGyAB8CPwevg4fAz8H3wCPhZeCO8WPoBP6b9 +Dj8Hb8rsnTQn98Mj4efhzZl16G2dD4+BX4K3wtOlzfAO+HrpKPxMZu15B34c +nibth5+Gp2jfw0/Ag+An4Lsya9tOeHvm57ILfipzffAe/CR8Nfwy/AA8EH4c +Xg/PlB7Dz8HbuJ8T4CHEXwuuGYoxvk6s2kFr4Aviw5zzG3E/403Gp4x9jN3a +V9JaYsnMx75Kx1WfqNb4g/FDOl+feyj4u/W72lP/d+73xN8ZXzJ6cfx14pzc +x39mfJJ+/6d0DbOUZ4jPZ75e3cPn6dp/TPeyL/12lr77+//3PbqfPYwZyl3E +Z9P1/5Lu4dt0/l7GN+kzmouJygnERzPnllfgBzP//550zvO59680fH3ufbEd +XgeX1jOFX8itz8oFm+Cyenbwl7m9h3LoPrhLwXn5i6Rdyr97kvYq5+5N+q88 ++1Vu7y0d3Zh7Xz8V7P/kA2dzbEVuHXtc8w+X13qDH8qtITvgbbm1SDlrO1y5 +4Fz2LFyz4Bz3XG5tVB5/IrcWKScuz/3cd6Z81K5gT7I5t2ZKz57KrWnSgydz +a5pyqPLzq1oj0sDcNZF8yC9Jz+V/Pkxaqjz4bm4tUr5+B76oYD/wEdy84Lz5 +Gly3YI+xM7ceKqe/l1uXlNOljVpvD2f2Ba/B2+DfUn6Rl9uVW1eVc1/NrdvK +3a/n1kDl7jdy6568yo8pT8m//5Q7L8vLfZe77pNn+yHlNfnJ73PXhvJ1+3N7 +TvmuT1MeUd77OOUaecWfU86Sh3wzt64q5+xO+UUe8pOUj+Q/H2E8nfbynHS/ +j2TeT/vTGj9dXlb7h3io/FnB/rZocJ2rfN4Y3qI9Jc8SXDcpZzYK1uGc4w2C +Pby0tkmwhgeO1wuuNf4l1mfcB6vQbxqs7VH+KHddpvrsCHmvgn1gOflR7Uli +x2B9Pozzd+Suf6dw7JncvYupwXlLmi9P+EduX6Ea61h52YJ95nHB/kT+6KRg +3/IDsVlwHjmAz54c7G3kF0oGewP5nTLBXkhe9Ok0/1rPpwX7pZ+I7YJzjdZX +bXi1dIhYK9gL/UGsE+zB/gqudzRvS/ie84I9mHJd99xzdTvH68Lj4UHJX+m5 +9IfrwGPhAcrJ8ER4iL4HHgcP1PnB3u9PYo1g/6PfrB7skX4jtg7OifLMbYJz +hzxz8+Ccq7zXKji3HsTxllpb8IHy7MG+7h/iBYy74b+JZwR7y5+JbYNzmbx3 +pWBfKr9ZFV6qOSRWC/aEvybN0b6+Vr+Tu6cxQb+fu9cxEd6Quy4eCd+ftEU6 +syx3nTtQaw0+E7466bB07yqtx9w9tDG63ty17Si4Q7AfUF2wNHddPEDzlLu+ +HqR7zV0Xj9Zc5tbYwfDKpHXSwFW56+6hwXlJ+Uk5VjlN+UV5RjlHuSdLx5QD +lXfm5+533cCfeSnfzSX+mtvrqpZcnbsGHwZ3D877R3DNa3P3XkZw7PfcXlr1 +6ZrcfZjhWm/B+ask5/cM1r2j4G7BvqUE/FbSH2nLO0nPZ/D/b+fuDV6f8ojy +wnj4A7gzPAt+P3fPcKZ+B24GT9eags+DJ0sbcvfuxmnd5e5NTdJ95O5bTtO1 +5O5VXgdvivY3Wntbc/fuxnL8ltx9SNWYnYP9WDHO6RLs0+SVusIvwsU53inY +y6lO7BGcd46El+TuY/QP9n7K16pzb83db1TtvCV3T+wa7fXcfU7V14ty9xVV +Uy/M3YdUDf5gtJ+TXn2W8oL0/Pbo+keado7WLsc3EntF97PEvaP7RJvhumkP +ShO6RPdB1nOsa3SP4y64W3TPZQN8eXQvbFPaj9qn+p7j076T7nWP7svcrfUQ +3UO5Bz4/uG+pzx4V3GNZRjw7uK9yH3FgdN0ib1MzuAd1L/GK6J7U/XC/6NpA +/rl/dL0h79Ezuu+j76matEK/Wzm4d6frPytYD6VRVYJ7ZbrOi6P7aAvgM5NO +SkMGRNdC8lcVGasKnpMe0f0mXdug6NpJXqtSdA9L66dUcH/pDmLp4P7SncSy +0X1t7fcTo/vs2uMnRPeUpS0nBPe4Vuqc4B7UauIpSWOVO8oG975WEcsH97vW +EU8N7oOtJVYI7mHqmR4ZnHeUa47R+oZXEI+L7mtrfVaI7tlJr06N7mtL08pH +9+OkhxdF9zTnw/Wje6xztQaie/HStIrRPUHp2BnRvUKt7ZOi++zSltOj+4nS +z5Oj+/vSkNOie47Sz1Oi++/SHOVu5eulxL7RteUDcJ/onvhW+K+Uv5Triwf3 +M28nHhzcd72V+G/KXzfBBwb3V28m6qWA8uAcYongPt6SYH8uD67a5fDgfu8i +YpHg/u1twTWIvPD2aC+0N+lqseB+8uLgmmR30t4suFbVvMnzTCp4Pi8JrqN1 +Xy2Ttui+VGfuSNewLbo2kxa1D/Zd8gN5cI6ep2cU7BPklxrCT8FbiAcF95Zv +0ZoPrs21p1oEa5pycQz2JPJgBwT3nLUv5JeUT9cE696upIGHwNPhhcSm0fW2 +uEN0T1nrtkl0Ta65ahTdG9U1NI7uZeu5NIzuU+tZNI/2GZq3jtF9Vf3uldF9 +WN1Ls2iPomchPyzfKG/cKbqHq/XfObrPq31xWLA3k8dpEe17tDZaRfsbratv +iP0450b469weT7WP+ht6pnq2/yRfNJtjf+Z+pyMf2DK6B6E10ya6d6+93zq6 +dy+tax/d99e+axvd65cmXBr97kF7uV30e4LlWg/R7xikA+Wi340p7x8d3H/W +OVWje+jyLUui+1PynEuje2Ty3mdGvy9RTlwZ3eOQb3w8uoZXnloV3R+Rh7wr +ukcgL313dC9DPvzh6J6C8t0T0TWz8vvq6H6KfGDl6Pc0yt3LovuD8q53RPcH +5dnuje59yJ8/Gt2/kMd4JLqvIZ/wWHQtLS9RLfqdgfL48uh3DPJyK6K9rHxm +lej3GfJyG6J7NKop6kS/m5RnuCe6F6Pa4c7ovqH84cbo3oo853nR7zjlNwZH +98hU89aCZZ7kN86Ofh8m/3Bu9DtOeZh60e+fpCEXRr+Xks40iH7npL1ZO/od +m3xO9eh3rvItNaPfO8qX1oh+T6Ya5Jzo93DyLWdFv19UPbI+uhej2ue+6J6R +6ovzo9+tag0Pie45qh5fE93PUl1QN/pdrPq6Q6P7g6rT10b3ueSx10X3s/7n +vaPfn2nN/xdOrMiA + "]], Polygon3DBox[CompressedData[" +1:eJwtmgXYFkUbhXdmVlAsDMSgQVApKUUBBQQRRAmRNAiDBinp7gYpFVQUECUU +G+zu7u7u9jf/c3P2uhxn7p1932/f3ZnnOc9ZKvcd1nlozLKsqf6Xq/9e/WD1 +FdQv0oEv1V8kPkz9fPEX6i8UH6p+nvjblGXjxANClq0Rf67jF4jLqp8r/lH9 +UHEl9UvEf6gfLa6hfqX4f+rHiI9Sv0p8kr5vK9/H94gfUV9f/Lu+v4H4UXED +8R/ihuLHxA3F/xM3EjfQ528Wn6fj14lPURuquck6FjRXX+0mjc/V/LWaa6M2 +UvMzdKyE5uqpbdf4HM2v19wZ4rvFl4ovFrdUG6LzJ+lYprnrdbyMhu/oWDXN +XSPeV/yauJL4avE+4lfFFcXN9Jkt4v463k+8Uf1B4rc0X0W8TlxK/LK4vHiD ++EDxm+LK4tvFVcVfimuJW6gN1niijv2nuT/VLtX4aPWrNVdXf2+duJf4fHFt +8ZXiHuJzxb+pHyk+Uv1l4tZql+j7pulYrnN/1/FRGldXv0JzjXTsOnEfcR/x +T+qHiSurXypupTZMn5+iY5F7rXaLxlfpWG/NHSfeIO6r8/uK71R/pPhrzdcR +/yoeIa6mfrn4DvXVxF9pvrb4NLVRGs/UsZL6roPUlmrcXOddrrm2aqM1P0vH +9tRcHbW1GvfU/Hma+1n9cHEV9cvEt6mvIv5Cn6kpbqjzrxX3jr7ee9XXFP+o ++XriU9VGaDxdx/bQuXeoPa3x7cHr42PxueIO4sXi78RTxcODr+9n8WrxLPFV +4nJqpTQ+VMfW6m/9ovk1Gs/Wsas197v4avGi4PXKmthH48Myr5UfNb9E48k6 +tlZz9+lYLfFP4vo8n+L+TBGvE9dQq6jx0Tq2NXrNHRp8D1iLf+j8azReHLx/ +WHNlWXuZ1+IbGh/C2hZfK/5N51+l8cLg/VJdrYLGR+nYFs1XEO8nPpw1EL0H +SouPyLw3uKd1xSdmvtfHiKsE/4abon/DseImmX/bseI64hPE94gf0N8vy7PW +sUGaO5prDn5m26P34IHicpn35sPJ185vGKq5o9QqaXyMjm3T/CeaP0/jjsHx +6iPxOeIzg+PhQ+KK4jLiIbmvgc/+EHxtv2r+cvEc8TXir4gb4sPVLyDA5o5P +6zS/ReMj1Y4I3gObdc43yef3CN6/XyXH227B8fILcT/x2cH79TNxb3Hn4PX8 +ubivuEvw/vkyOR53Dd6/m/Q3Dha/La4q3lvz88QnRMfvH9QPEVeMXr/fa34u +8U/nX8F8cf5Y8ZXEf503SFxe/UJxc83fKx4o3iz+VHy+uFNwfOBvHhYcw7iW +r5PzS/fg+P+3+AbxKvH14v+KeL1WfKM4ETPE14m3a1w/em+xx1JyDD48OGYQ +mwMxU+P1OrZV40hMYe2Kt5Ef9JkHxEOin8e/Rfy/UvM3iP8SbxavFG8S/0nM +F68QbyR/iTeJLxNvyL0myhT7Y4e+s4Xm79N4UPT3/SPeJr4i+P40UTtd4+48 +k+g1cIjG7wavDfZAefEnwXuDnLFJ412Zc8nLmu/IslI/UXNvqD9bvJf6yeKX +1Hfg3qifIH5e/RnkQvXjxK+r78L+UT9J/KL6M4nd6seLL1Tbpr/3oI61So5x +xLqnMufGMTrvNvGT4vbixpo/SdxO/GwRc9cE5zxicffoZ8szriVeJv6CfKa2 +nL2itlHzO8VNNf+muKvGpdRP0XctVP8R+YB7Hh0ziZ0v6jMDcmuG64NzNlri +w+j9fID6mezn6PV4oPpZ4p3qjxN/o88MEz8gPkn8s3gE+118svgX8Ujxw+Lm +4l/Fo8RPiFuL/xSPFu8SHy/+Vjxc/KT4VPFf4jHip8RtxH+LLxWfo7Y8OCfW +QGtovrHG3+nYJbk1zfEan5JZ67yl1k3jvdVP1dwH0fmmtPoZ4vei49X+6qfn +XlOsrX3UTxNfpLZd3/eQjrVO1lDHiVtm1lZPq52m8T86NlZziMOtwXuEvVKl +yEdnRuebXmrLgjVB9WRNsZq9mllr3Jb8t1hDrKWO0bmFHFNVc7erPZz5mri2 +HmpLyCU6Vo1YqvNLaPw8OURzV4hLil8gh4j7E4M1fpGYp/Obic8S92HPEOui +YyMx8mONbyn0HHuIvXSn+KXM38F3NVVrr3EPHXuHtSDuyZz4a/ER0bGZGE1s +v1WfvyfzmmPtrdGxPcTPkaOJ9Zq/lVwXrJd2cE/IRcH6Z3W07n4WDaDBqrhb +VmbPiMuKV4j1X/Y0eVd8fnTuIIegdW8lJ2r8WZHP0CxorR2ZtQx/k7+NBkO7 +EZPqavxpkb/I0eTq98WDc2vEy4M1ONqRa+Ra+Q1ot57ipcEa6chkDUCse13H +BubWB39n1qzohVnkXB17U9wreY+WFO+Vee+Ss8nd7OEbo6+hVKFvuLZJaneL +XxCflXxODY3fK/J9Vx17RTxFx5dEX8Of7PfM11a10DMdovXP8WrN9Nm23GP2 +Ps88eM2z9k8WDxSPZ49Gazz0ccNo7cc5aI9/gz+7f3It0Iy4Kt4vWYtTT7XP +XVOgnxtF1xr7iieIm4hPF58YnUvJqeRijo0Tz8987t9Ffq1VXBvXjFb6L/i3 +dFGbiTbQsUOT1yhrt1yxdtkDncVlovdGV7V5wTVABZ1frtArp0Xn87bR2oVj +zJ2tY3PJ/eLy4ubiQcG/4V+de3SRD8+O1rN7JdcfjcXtcmsqtN5HwVqrVVEP +DIuOB03Ed4kvjM6vaDa02sfBWo4cQC64KFoPoFnRkh8Ga9ma0bUnNeg/xd8c +I56d+Vq6ixcE10CVkmMea3l4dLxpnKwH+kXnb2oG6tHjo2sJagzq1eOiaw9i +3ArWYnTsY42yVj8I1r7EcJ5Fl+jYfmKyXrkgWi/UKvRNt2h9WLPQF12j9T73 +lPq7dvS97qY2P7iGqahzzxLPCL6GsuJXo3NDSdZF7me0QNwu+tmRg9HOBBFy +8wHJtdnJ4g65Y+xycafo2HsCz0jf30nHXoleIws1Pj167bDnLxN3jo4F/M3W +wWuMazk4uTZqqXFHzR2SXKu1Yh3m3vPs/ZeCax9qgr35W8G1wh78nmBNg7Zh +TfMsT41e6+Qz9u6+0dqpTHLtfoq4U+57Qu3XOvpeEcPRIvtFx/Zj1PcPXqPU +ylXV+gTXhNSGeAyNxC0yew94BtS3x0Z7CdS0nFsvutalRqZebRBdO7Pnxwc/ +A2IBwRz/o260d0CMmBB8T4kdXPO04GfAb6GGR3/Xia7tW0TXbtRw1Lpdinw6 +OTpfHV7Ui22i9TnPjFxeIvpZ8gym6vPLMj8bnsH04GfIs2ENTBIvzrw2zhRP +FC8Sl05ueCcnRc+xBplrH7022VN89ozovfabPtswWCOhlT5HxwbnKHLVo8nx +u3yhj7jmS4v4x28h/owr7h9rGb0wtbg/rFVi+JTi9xDb0SCTi/uDNqHGph6Y +Vtyvx5LzW4VCT3E/8TemF/eDmEUtzj3cHcty61P0C7EHPbq60K/obWLUykK/ +ErvY09QC7GH2OjGEWoCYSGwhpo4t4jnxlPy9pMif5GdqAGoBao7dtZP4LvFz +4vPFS6O1CRrlXnE/tW8za2b4brXPNP5c7R6NH9TnF+kzn4h3snaTx5+q7Uqu +QahtqKmoTe5BA4mfFZ8nfiB3vkVP9SU2i28RPyHuIb5fvKvIx334++I7xM+I +z03O99QHeCLniHflrg+oF8j/O8W3BtcLPcX3iXeKnxf3TvY4FhX6EK+OmDi7 +yEfESmLmnCIfEUtnqrXKrJHRyjOS4yGaFm07PXk/sKfZ27OS40fTIn/PIedm +rlmIj3OTYxkxkP0zOzl+NCvy7Shx9ayo2cn3ue8Nv4nfVjr3b+eecG8OzH1v +eaY82wNy3yvuOfd+X7XHM99j7vX+ue8N94x7NyK5lt1dMxMrxE0zeyJ4I1OT +4zseCl7KOHHtzB4K9SKatzd7Qf3s3PUF3s/3mq+b27PBu0HT433i+aDP12fW +l9Rrcwu9gJ6fmOy3HhXsx00SN2LvBPt3E5L92RrB/uTkZL1Uu/h7U5L1Cx4O +fsnYZK+ncpHvV+rvfZy5xrsLLZHs5VQq9MPo5OuvUOTb8cn+cPVg/25Msh9T +sdAH+6g9Jt4hvjN3Y8w9757sCeANoAHaJHsgAwr9hx7Dg0Hv9y/yBR4FXgX6 +H+8aTwZvBg8DbxuPp11wzUV9gL4bWOgl9Bz1A/U+Gg2tRn3SqsifaDX0TK9g +zYf2o+asVsRPalFq2BbBNT21LTVsyyJfflQ841OK/M2zxx/pG5yjyFXkP+qZ +AeK/omtY4nO9Il7jEeEV4Tnh/eLxnxZcg+P94+Hg5bCm8H7xyPDKqKnx+olH +j2h8U7AeJx4tjvYw1qt/KriG13+7axs8JrxSanS8J94xtA2ucXn3gKdF/dYn +c37G88L7uiCzd807hjbBngfvHuaITw32ND6L9qTOCK6J8arw8PDyqJm/L/I/ +9WJf8S/RnhneWb/MXjT5jLXFGkMP4AlUDa6h8Aqo+Y8J9hDwAm7PXS8/mLle +uU28Jbh+7oz2Fd8Q7Al1TPZPqEWpSfFTdmh+c7CH1gGtKr5RfL+4U3I+xY+t +ktm7vjm3X4IfhP+CJ4Y3hqZul+xx4XWhQdsm11PU4mgItAT1PfUimhxtjgdG +fUn9SL2P54b3Rr3ZUnyTeEOwJj892XMi37fIrNfQb8RaYi5aBM+pQbAewIvC +86gV7HHghZCT2cvsaWITmgBtQM7GS8GTKResGfBq8FBqBnsseCt4QicGeyp4 +RXgiTYLrObwSPA9iPTEf7YgndkKwJ4NXhsdVP9jjwfvCE6sX7AHhld0hvjk4 +hnRL9sgaB3s+eGd4LCcHe2p4L3gwzYM9NLwZPBRiHzGQ2nFv8aOZv5PvJr/j +gX1Q5NuSuZ89a4S18kLytXEPuZfkzDfEM6LzDTHsNfG06Nj2fPK185v4bXnu +tcAz49ntkfvZsWZYO8/p/GaZfzO//SD1X2fWDOiIErn9DdYka5M1RewcGb3W +nkl+FjxTnu1TRT5gT7A3Xkx+9qwR1goxlt9/SXTsfTZ5LXCPuFesKfLpqOjr +Zc1y70dEr+Wnk/caa4C1cK/6bzJrIDwAPJN/M/sPeClokrc1nh2dj9E474jn +ROffxcmxmRhNfY3melc8Nzpfo0neE8+L1irEFGLDIUWsQQO9L54frY2Ib/gP +pYv8tSTZD6Bmpp5bVuhp3iFSD+Dp4JccUMRDNNbrGk+P1gNLk/0F3vFRD7BG +WCsLorXa8uR6jnec1CeXJXvhvIOjPkFz4b3MjNYTC8Q9M3tc1EMvFfqJNc3a +fiV5b7Cn2Ft4bnnwO068ODytGPwOAa+LnE/uRxPwLg8PKwt+p4m3RcxCy46P +jmXEQLTehOjYSAxEH42LXu/3J9877iFeDhoDrYGm4F0gOb56ka+If48UeowY +QazAEywR7KHjFaJBahTxm3enDyZ7TXhMeE0fintlzhHkivvEe2b2qPCq6hb7 +t3ERn15O3vvEEGIJMR4tPLGI/Y+L62TOEeQKYjJ6bnQRqz9Izm1oBLTCk8m5 +nRxMLn4/OdeSA8mF7ybnMnIcue4d8VmZcxzr773k3EeOJleTM9CXY6P3KzHr +VfHUIpa9mhwriZHEyieScxkaA63xRnIsI4YRy95K1hpoDLTGm8mxDQ2CFnld +3D5zDCQWvpYce4m5xN63k7UJmgRtMj9Z+6CBqN/JKeS2wdG5Bg+Td3OVM9eL +VyfXftSA1LLzit+P54D3sCnZ28EjoR69Ntl/wSOh/r8mudalxqbWvjK59qZG +p1YfkPz+kDXD2hmY7OewPvAnLkiOJexR9ur1ye878ZSody9MXuvEHGLPRcl7 +gz3AXrg4ee+wZ9g7G5O9HDw4/JRByX4W73R5t3tDspeOx4q/sirZP+HfKOAf +bkjW4mhy/J2tybUpNSre+xXJtTM1NF7i5eI5mT0xvLE1yX4K78jxt7Yle728 +o+Fdzepk/4R37Phda5PrfTwLvIvrxKsye474MeuTvSg8BbyFq5LfR+Mp4C2s +S/YH8BTwD7Ynv//CY8Zr3iLemPkdCH7ZjcnvQningL/WP3kvE4OIRcOTtc/u +d9LiFcm1PDU9/suiZG2LxsX/3Cv3+kKDEW9K5dZiaDT269Bkbco7Yt4VH5w7 +PlHjEs/RrPsVuRAtOzjZz+SdNn7VJcnvMne/QxePTH6Xu/sdJPk0d/yjxiV/ +LEzWmmhO/NghyX4n78R5N7452RvAI8CP2zO3VkQDEj9XJvtd/BsE/OgyueMP +NTv54P8QiijI + "]], Polygon3DBox[CompressedData[" +1:eJwt13XUVWUWB+D7gXQjjUqMIBiESomEKCEpSijdOqSUIKDSYY/SUg4gMYRF +6FJAJJUSpVsFYQZQGDFHmGcvzh+/tfd+zv245557zvteSnTp92jfdKlUaplk +kHHpU6mraalUObnPvMPBkeySuYTcydax59mP5mJyO/uEbWYXzHdIZfYR28sy +q/XYY2y/fh/Lpj7MWrFD+v0su9qQtWaH9W+x+9Xe7DmWy/yNZGUNWEt2UP81 +y6LWZy3YAf00VlntwZ5hmc2fyxnzrVKevef4ctZGfZHNZuXNuyUdq82asN36 +7eyK+R6pxTayXSxNrcUasz36AyyX2oS1ZSf0B1lutSlrx47rl7En1ElsFitn +3iinzX+L68/ed/wlllOtyRqxY/oVrG0cY3NYBfNXcgOrw5qxvfo9LL36AGvK +vorPyXKoNVhDdlS/g/0vvm+px7aznewvc3Wpz75g29jP5rulJtvAtrL/mitK +DfYZO8tKqV3ZAHZF/zLLr9ZN7oPT+ufYf8xFpTRby15ld6rtWG92VX+BVVOH +sIksu/k1uYu1Z33YNf3rrJzagfVlqbhHpT4bx6ahouZ1cb3MmaUge8vxN1lF +tTPrH39qniz3JJ9jYDwf5n/Lbaw7G8R+1Z9nZdUnk3vtd/10ViWxISyL+Sdp +wMaz6ayIeYZUZU+xoSyreYrcy7ol75HRPFOqs15sBMsZ107KJPf4YPab/hJr +Gtc7uTdKmN+QCqwTe5qlM2+S8/HsSqXk2r8Q52guHs8w+5RNZZWSzxvvkck8 +XM6ZC8ezxFY7PiKujbmIlGJr2CvsJrUxa8PO6y+y2rF+sNdYXvMouWwuKXex +9Y5vYMfNNyX3xhI2lv1uLpuc81a2hV2MdUmqsI/ZZ+yE+Wa5jS1l/2Dl1Y6s +H0szj5Zf4zXxXLPNjo9hv5nLyL1sC1vPDpjzx3rH5rNzrHTyHcW98Yv+FLtZ +bct6sovxXbNrsd7Es8R2su9YseTejXv8R/3b7CF1EBvHCsZ5SAc2i61kd8f5 +SvtYG9kKVtE8Tx5kA9lYVsC8Rp6PtYJ9zlqa50odNoCNYfnjekrXeH+2ilUz +/yLt2Ey2PFlfvpA/zFXloeTaZ74hlRqmrmU72SNek2J92L/YemOdWJvZcPYR +28Was1XyNJvHPmT1zH1knzmX5GDzYu2PNT9myc7mxjPAvjZni7A5rC/bb84j +Odnb7J+srjqYjWeFzAPkiDldfJ9skeMfsn7qXPYBqxvnJofMV803ykLH57N6 +6jN8Aisce5HPNoJ9zHazR1l/OZwWN1kqlU95x/E/WLc4J7aaVY33lFv0+dir +cX3Mmfx7z+rXsB2ONYu9iA1g77LNrD4bJmfNhWK/YKscz+h1Q9XV7EvWNNZ1 +6cEWsLWseuxZXtefrWSbWAO2UBqx4ewVVsz8jjSOZzvOjxU3L5ImsXYnz2+s +Lxn8e4PZB2wbaxT3vPRmS9k69kDsT143iL3PtrKGbLE0Z6PYm6yU+ar0YkvY +p6x27DvSik1mi1jZ2HekZazd7B12e+xZ0pMtZp+wWuYr0ppNYYvZHeYv5U9z +NanLtjme3vkNVN9jW9jDXrNEHmWj2WRWOv5Ousf9wNaw+8wLpCEbxl5mt5i/ +je832ct6sQvxjLKj5hukAFvMhrLvzHljzWIr4/lhLWLNY1NZGfMxKchasq7s +jP4EK6y2Zt3ZWf1RVkBtwboke+1l1izWZDaXlTTPkhqsD3ue5Tbf6BpMin2d +HWMdWX72EtvOTrDOLB97MX4TsOOsE5sU9y+rkqwR8VuvW1xr85/Xt+PUVHYk +3kdtzjuyb/WHWV71EdaBndKfYSWTfSvW7Mv6iSyjWpk9yPbpv2fFk30/fgv8 +pD/NSiTrffwWuKT/gd2qdkn2+J/1J1kR9XHWg53TH2J51GasPTupP84Kqa1Y +N/ZD3O/s7+qMZJ2Me21CfEhWgd2v3aWfzWrGGsVeYHnimZSd5mup67+7p8ce +y3awv64vo6lprCfby7JIVjY71gHWOfY0toBVjvOQPeYMkjn5TbOUPRZ7GpvC +bjMPlpOxlsZezZbFesZOxbopRdly9iz7Pu362hRr1LuxN8U9aM6Ydv13U+zJ +Q+I+N+eOvZqtYLmc/Fh1IzvI2njNk7LLnBZ/z2bEc8a6qG+whayKOae/HRN7 +ODvAnmC52Xi2iR1m7eL7YRPYZnaEtY/7h02M3wTsKOvA5kgt1o+NTH5vZPO6 +kWwd+4a1YtnZqNjr2T7Wmq2UTux1Np9VMufwutFsA9vPHmerZQhblKw5se4+ +JbvN6SUTmxnrXrg6Pe36/7dqmv8P/OqjpQ== + "]]}, + Annotation[#, "Charting`Private`Tag$22017#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}}, { + {GrayLevel[0], Line3DBox[CompressedData[" +1:eJwt0csrpWEcwPF3nDnOHBxMs9IU2WmKrRRbKVZTNmPHaizYmqUVa8IfINYS +G7mf47aZ5D7jnia5Lhi3JD5PWXzfz1tP79vv6Vfa3P697UMURZ26V3i/0Yn6 +sqKokIMs4SgrOMcarrKBh2ziNVv5wl/Mi0VRN79ygN84zCqOs44ZTvKUj1rX +f11qyjAbnOYmZ7jFWW6HObjDef5hmn+Z4S4XuMdF7nOJB1zmIVd4xB7znvFJ +x7rTlVrMtcZGplnLMVZyiGXsZxG7mMMOPvvfz3AH/uA+6/mb1eEeLOcIiznh +u398UIFudaEv5svnZ6bCGfOYYi5zmcMkk0zwE+NMMMbssFPG+aqPYT/hLMwp +I0S9Hufv+38Df9xIqw== + "]]}, + {GrayLevel[0.2], + Line3DBox[{661, 952, 458, 660, 1046, 868, 662, 1047, 869, 663, 1048, + 870, 664, 1049, 871, 665, 1050, 872, 666, 1051, 873, 667, 958, 1129, + 668, 1052, 874, 669, 1053, 875, 670, 1054, 876, 671, 1055, 877, 672, + 1056, 878, 673, 1217, 953, 879, 954}], + Line3DBox[{675, 959, 1130, 674, 472, 676, 1057, 880, 677, 1058, 881, + 678, 1059, 882, 679, 1060, 883, 680, 1061, 884, 681, 960, 1131, 682, + 961, 1132, 683, 1062, 885, 684, 1063, 886, 685, 1064, 887, 686, 1065, + 888, 687, 1066, 889, 688}], + Line3DBox[{690, 962, 1133, 689, 963, 1134, 691, 487, 692, 1067, 890, + 693, 1068, 891, 694, 1069, 892, 695, 1070, 893, 696, 964, 1135, 697, + 965, 1136, 698, 966, 1137, 699, 1071, 894, 700, 1072, 895, 701, 1073, + 896, 702, 1074, 897, 703}], + Line3DBox[{705, 967, 1138, 704, 968, 1139, 706, 969, 1140, 707, 502, + 708, 1075, 898, 709, 1076, 899, 710, 1077, 900, 711, 970, 1141, 712, + 971, 1142, 713, 972, 1143, 714, 973, 1144, 715, 1078, 901, 716, 1079, + 902, 717, 1080, 903, 718}], + Line3DBox[{720, 974, 1145, 719, 975, 1146, 721, 976, 1147, 722, 977, + 1148, 723, 517, 724, 1081, 904, 725, 1082, 905, 726, 978, 1149, 727, + 979, 1150, 728, 980, 1151, 729, 981, 1152, 730, 982, 1153, 731, 1083, + 906, 732, 1084, 907, 733}], + Line3DBox[{735, 983, 1154, 734, 984, 1155, 736, 985, 1156, 737, 986, + 1157, 738, 987, 1158, 739, 532, 740, 1085, 908, 741, 988, 1159, 742, + 989, 1160, 743, 990, 1161, 744, 991, 1162, 745, 992, 1163, 746, 539, + 747, 1086, 909, 748}], + Line3DBox[{106, 347, 107, 348, 108, 349, 109, 350, 110, 351, 111, 352, + 112, 353, 113, 354, 114, 355, 115, 356, 116, 357, 117, 358, 118, 359, + 119, 360, 120}], + Line3DBox[{750, 993, 1164, 749, 994, 1165, 751, 995, 1166, 752, 996, + 1167, 753, 997, 1168, 754, 998, 1169, 755, 547, 756, 999, 1170, 757, + 1000, 1171, 758, 1001, 1172, 759, 1002, 1173, 760, 1003, 1174, 761, + 1004, 1175, 762, 554, 763}], + Line3DBox[{765, 555, 764, 1087, 910, 766, 1088, 911, 767, 1089, 912, + 768, 1090, 913, 769, 1091, 914, 770, 1092, 915, 771, 562, 772, 1093, + 916, 773, 1094, 917, 774, 1095, 918, 775, 1096, 919, 776, 1097, 920, + 777, 1098, 921, 778}], + Line3DBox[{780, 1005, 1176, 779, 570, 781, 1099, 922, 782, 1100, 923, + 783, 1101, 924, 784, 1102, 925, 785, 1103, 926, 786, 1006, 1177, 787, + 577, 788, 1104, 927, 789, 1105, 928, 790, 1106, 929, 791, 1107, 930, + 792, 1108, 931, 793}], + Line3DBox[{795, 1007, 1178, 794, 1008, 1179, 796, 585, 797, 1109, 932, + 798, 1110, 933, 799, 1111, 934, 800, 1112, 935, 801, 1009, 1180, 802, + 1010, 1181, 803, 592, 804, 1113, 936, 805, 1114, 937, 806, 1115, 938, + 807, 1116, 939, 808}], + Line3DBox[{810, 1011, 1182, 809, 1012, 1183, 811, 1013, 1184, 812, 600, + 813, 1117, 940, 814, 1118, 941, 815, 1119, 942, 816, 1014, 1185, 817, + 1015, 1186, 818, 1016, 1187, 819, 607, 820, 1120, 943, 821, 1121, + 944, 822, 1122, 945, 823}], + Line3DBox[{825, 1017, 1188, 824, 1018, 1189, 826, 1019, 1190, 827, + 1020, 1191, 828, 615, 829, 1123, 946, 830, 1124, 947, 831, 1021, 1192, + 832, 1022, 1193, 833, 1023, 1194, 834, 1024, 1195, 835, 622, 836, + 1125, 948, 837, 1126, 949, 838}], + Line3DBox[{840, 1025, 1196, 839, 1026, 1197, 841, 1027, 1198, 842, + 1028, 1199, 843, 1029, 1200, 844, 630, 845, 1127, 950, 846, 1030, + 1201, 847, 1031, 1202, 848, 1032, 1203, 849, 1033, 1204, 850, 1034, + 1205, 851, 637, 852, 1128, 951, 853}], + Line3DBox[{867, 957, 656, 866, 1216, 1045, 865, 1215, 1044, 864, 1214, + 1043, 863, 1213, 1042, 862, 1212, 1041, 861, 1211, 1040, 860, 645, + 859, 1210, 1039, 858, 1209, 1038, 857, 1208, 1037, 856, 1207, 1036, + 855, 1206, 1035, 854, 655, 955, 956}]}, + {GrayLevel[0.2], + Line3DBox[{251, 459, 1046, 252, 472, 278, 1134, 486, 292, 1139, 500, + 306, 1146, 514, 320, 1155, 528, 334, 1165, 542, 348, 556, 1087, 362, + 570, 376, 1179, 584, 390, 1183, 598, 404, 1189, 612, 418, 1197, 626, + 432, 1206, 640, 446}], + Line3DBox[{253, 460, 1047, 254, 473, 1057, 279, 487, 293, 1140, 501, + 307, 1147, 515, 321, 1156, 529, 335, 1166, 543, 349, 557, 1088, 363, + 571, 1099, 377, 585, 391, 1184, 599, 405, 1190, 613, 419, 1198, 627, + 433, 1207, 641, 447}], + Line3DBox[{255, 461, 1048, 256, 474, 1058, 280, 488, 1067, 294, 502, + 308, 1148, 516, 322, 1157, 530, 336, 1167, 544, 350, 558, 1089, 364, + 572, 1100, 378, 586, 1109, 392, 600, 406, 1191, 614, 420, 1199, 628, + 434, 1208, 642, 448}], + Line3DBox[{257, 462, 1049, 258, 475, 1059, 281, 489, 1068, 295, 503, + 1075, 309, 517, 323, 1158, 531, 337, 1168, 545, 351, 559, 1090, 365, + 573, 1101, 379, 587, 1110, 393, 601, 1117, 407, 615, 421, 1200, 629, + 435, 1209, 643, 449}], + Line3DBox[{259, 463, 1050, 260, 476, 1060, 282, 490, 1069, 296, 504, + 1076, 310, 518, 1081, 324, 532, 338, 1169, 546, 352, 560, 1091, 366, + 574, 1102, 380, 588, 1111, 394, 602, 1118, 408, 616, 1123, 422, 630, + 436, 1210, 644, 450}], + Line3DBox[{261, 464, 1051, 262, 477, 1061, 283, 491, 1070, 297, 505, + 1077, 311, 519, 1082, 325, 533, 1085, 339, 547, 353, 561, 1092, 367, + 575, 1103, 381, 589, 1112, 395, 603, 1119, 409, 617, 1124, 423, 631, + 1127, 437, 645, 451}], + Line3DBox[{8, 667, 23, 681, 38, 696, 53, 711, 68, 726, 83, 741, 98, + 756, 113, 771, 128, 786, 143, 801, 158, 816, 173, 831, 188, 846, 203, + 860, 218}], + Line3DBox[{263, 1129, 465, 264, 1131, 478, 284, 1135, 492, 298, 1141, + 506, 312, 1149, 520, 326, 1159, 534, 340, 1170, 548, 354, 562, 368, + 1177, 576, 382, 1180, 590, 396, 1185, 604, 410, 1192, 618, 424, 1201, + 632, 438, 1211, 646, 452}], + Line3DBox[{265, 466, 1052, 266, 1132, 479, 285, 1136, 493, 299, 1142, + 507, 313, 1150, 521, 327, 1160, 535, 341, 1171, 549, 355, 563, 1093, + 369, 577, 383, 1181, 591, 397, 1186, 605, 411, 1193, 619, 425, 1202, + 633, 439, 1212, 647, 453}], + Line3DBox[{267, 467, 1053, 268, 480, 1062, 286, 1137, 494, 300, 1143, + 508, 314, 1151, 522, 328, 1161, 536, 342, 1172, 550, 356, 564, 1094, + 370, 578, 1104, 384, 592, 398, 1187, 606, 412, 1194, 620, 426, 1203, + 634, 440, 1213, 648, 454}], + Line3DBox[{269, 468, 1054, 270, 481, 1063, 287, 495, 1071, 301, 1144, + 509, 315, 1152, 523, 329, 1162, 537, 343, 1173, 551, 357, 565, 1095, + 371, 579, 1105, 385, 593, 1113, 399, 607, 413, 1195, 621, 427, 1204, + 635, 441, 1214, 649, 455}], + Line3DBox[{271, 469, 1055, 272, 482, 1064, 288, 496, 1072, 302, 510, + 1078, 316, 1153, 524, 330, 1163, 538, 344, 1174, 552, 358, 566, 1096, + 372, 580, 1106, 386, 594, 1114, 400, 608, 1120, 414, 622, 428, 1205, + 636, 442, 1215, 650, 456}], + Line3DBox[{273, 470, 1056, 274, 483, 1065, 289, 497, 1073, 303, 511, + 1079, 317, 525, 1083, 331, 539, 345, 1175, 553, 359, 567, 1097, 373, + 581, 1107, 387, 595, 1115, 401, 609, 1121, 415, 623, 1125, 429, 637, + 443, 1216, 651, 457}], + Line3DBox[{275, 653, 1217, 654, 276, 484, 1066, 290, 498, 1074, 304, + 512, 1080, 318, 526, 1084, 332, 540, 1086, 346, 554, 360, 568, 1098, + 374, 582, 1108, 388, 596, 1116, 402, 610, 1122, 416, 624, 1126, 430, + 638, 1128, 444, 656, 657, 658}], + Line3DBox[{445, 639, 655, 431, 625, 1196, 417, 611, 1188, 403, 597, + 1182, 389, 583, 1178, 375, 569, 1176, 361, 555, 347, 541, 1164, 333, + 527, 1154, 319, 513, 1145, 305, 499, 1138, 291, 485, 1133, 277, 471, + 1130, 250, 458, 652, 659}]}, {}, {}}}, + VertexNormals->CompressedData[" +1:eJyMfHk4Ve0XNkVJKpokRaJZUSnEWTRqIqlUSlIaRYUmU0qDUpEhJCWUIkWZ +OQ8yy0zmmcgYyhTn+J7dPrv2e67vd33f+8+5Wu9j7bXuvZ77Xs86ex+pY+d1 +Tozh4eFJ4uPhGctD/feUQX7e53x2q0lbjOL/vBilZqN5bxhZULWH+PcPNY8l +bPz5hJH8izVFxb0cbl1k/bHv+TSCP10ZoQMjn54ZNsCt6N9/7C/3DuPPxwxN +/t/mr4VaoPnjwB972ntVHg3Zu4wb5f2SuU5t0Dz064/9Q7iS1PGUK4yhU782 +spgd8Ej05x87J1C7yTY/o9ZadcJZ494/9g358U0HBqyZ3OtrbztsXbDRgcnt +//Vnt69LFz9mcsdzab0262SdO5M7/m9Fjw7fuenJ5M7XvFxhTth0byY3PpvV +XMVeLnvG5MYT/30p8fcfeAj8HBiUnwfq7J9GH0ugcj/7/Cf7VJC5R9o3abNr +r08sAvwpSXw+WUraVRpGpkiI58IlY9aUo51lIBg68seeeZG1CKangfq7kS9V +qAoKd5D2F+ob+y/Fx8O85SMqC3/XQK4QaW9SbXiQqfgOzvWxVj2YWAcZncP/ +wfl+O6unfE0dNDeRdk/zyeV4PcLrV9DXP62bGoz9I+x/G93/+YCSrTgehONJ +pscjU7p8Mo4f4fjbDWjxq+upDeI8Ec53NT1fjWJtFsYHYXxe0PEp0hTpwXgi +lQ7i3/f+4onv68RAfF/dBYj7d4dB3d9un5GWl5UN0DR12CDuUhwc20DeXxyf +VTWOD+OnxsD4UXF+e8iWitArhvVL2AP+jZkgE8vBv4odlnA3C/BnJ8Kf033Z +f+wLx3/wLC9FcF5rtDHgXibYSZH10F8/oT4+LxgK74yO5duRAUePkvbXppkm +8gbTmXIeo28mJKdDmRlpt/I7s4KZF4y41yd/0vmM/SPsn0X3v1jtbD6OB+F4 +JiXQ4uEVS1fF8SMcfzs9/pt8Eq9wvgjne56eb+rJSwMYH4TxGaXjcxPtFMB4 +IkEP4n7b/cUT77dkYr+ZDHqv+xF/lkHtu6xrv83zTZrhxdymoI4wP9CSGPxj +x3XzhqibSWzzKem47v7WTwW7j1FTDBpqBg0ix9/DLCDjx/k3Eflfm/x6XRzG +j8KhJ2uLd5VTNFjsXfpt29ZAKC4g7ePd8x7Puu0PLVfU1UXx56xfpN3sgfDR +7UVSTPb8tJYT7n7w7Ddpz2aujMXrUeJykxX09YG8DunYP+L2v1v7+iiOBwX6 +rx5Dj2d+7JcpUFOMamKn80ylxR/gaPcB54u+JI8APV/+eA1bjA9KipV0pePz +42BEGcYT2dxNrjmWcuovnhhnJwLnV/Usgx/xekwazpoEzpkScfVdYX6IhvNj +Auc5AqHbvuD9SsO5ncB56I7FiZnH3yMazuP4Mc43QlS3JeC6o/Jy6tzcSeC8 +Ukf0rebWQEThoON9pIzAOWhC3InZGD8KNwXR9tnFNfOYAj8WBJx290MUzo8O +TRcSw+uEx/Ueo6/fdX/DzGqM84mDb9/T/Z+5qTwTx4O448m+pD+JwPlab856 +evzGzU9eEzhXMasU6fm6rjLQJ3C+F/zUgY6Pk6WKP4GzeTgr8MDAub94Yt4w +JvTAj7VCfY3hDSZV570+I44Eb2xLbRRgXopDRv94Q43gjdPdJ48SPEfjjRkE +b/REOh5/1ZiJqH23ropdSuzPaZtEwhLxfp3K2af35kzlqcC8UfKK2fT6Xiai +9rXWyTtWmAdATmQVm8CDwkFm8NeThjGyTN6goJiJyemI4o2H041DCN5Ibnw9 +Zhxt/T3/z8MEbyx4a1RL93/J4GA9wRvc8eSofZxJ8EbEsWRDevwhTAcNgjdq +PQeO0/Mtsfv8kuCNYHnGt3gaPrX6g5YYT1RXdXrlvB92f/HEOqi2Duug+cnU +EAtpByZNB/OOYx2Ubjqcj3ke0XRw2Bbrwei51gRCH2g6+GIO1sEXB7c0YR1E +NB30IHhNe1iKtwbHS8UZ6j253ALr4NXFkwIW/a5BlE59PvHleAben8vKXwk/ +xHWUxqmfdGE7q5ntW5jiEo8LKtbUIUoHX4mG5OD1iHv9zKXhfIQOVoXzB9L9 +G91+Z4TjQR2mS9jVtHh+MlPqcPyIO/7Aa66CRJ45C00QPd8PD6JiMD6IG58t +PjP2YzwRN56UjqsKF/p83fqQSfUhlH1VfpbkW0YWovoWyv7RQm8Loavcfpy7 +3YV9DBsQ1RdR9ryctFHiPlP3l7Jrblf9gvsuRPVdlN3HLViCjfcfd18nnjrZ +WdGqE53m9HX/r/X/y///iud/xf+/8v1f+HDjies5ncC/1efcjjs3/+EvPDyy +KESlEnlP01xnm5+JUszJ+/tu2nAtS7ESpe4am8fGn1vXkvFceT24KAHKkb7W +PTSlpQnxfej/Y1/Q2u+hqPIVBfHw/NQOaEe9O0l8npesSsyOzEW9B0SmsB92 +ow0/O//YV3wrzJabl4hOGNdmh+n2olmxbf+Jf2jO1zXGfb1o9r3WP3Zl+WcM +vB641/PlfsvD/oHb/4zwm2dwPMAdT7zcJiUcP3DHf7vrTQnOF6bGMAro+Xqf +MRLF+MApx2ANOj7nN0sEE/zAjSfm5xbivvKsnL6Wb/8/PrFp6R9oU2pDwckj +hbaiyehCM1kPbkt/WRHxCSz+fFMJ40fFWdnaazAxpg31JLkHvmHXoS17u//Y +15f8LBVd0YI0xCwNZuFP6zU//tgPui67KiRVj/beq4211+9AfGVdf+yxyRd8 +o9cWosAv9k/fF/xAZg2kfX4Xwn2dEUN37LkHvLe6UfxP0p59fnIMXg/c69+m +1dzA/oHb/7qOqhgcD3DHM87D0AzHD6fCXvjT49eVdL2D84WAgwGP6PnOkIgs +wvgANz4VSV+7CL2z2563a9GMf3qH+43jxH4rd9Gv33j7nz7mW/bzv+7uRslX +prCPM96hOXxknBPzfiYRdWMzcV2pPK47qn6aRH6JC8/oRbtco5977M1CKxpJ +u9Jw1yIi/3OC537HYPwoHO59ZwToMlvQlPZVTsiuBB1Q7CN5VV574uxj5ehI +hWG2OP48NvDf/ft+AuNL+4kKJKNB1ond5gh1vB6414tJu73C/oHbf5ZysDSO +Bx6kNVcT8Vhw4vEqGVyO4weNpvJX9PhTIk4gnC8MfcqqoOe7JVtqLMYHdqZF +2dDxmW7TrYPxhOAYDX/cJzNpfZ0HgXOATbCpqMSZv/1ermW/KIGzpryogCHj +Hcz+h3M5gXNKVosssV9pOO8hcP4yblaT294soOJcN9xlQODc0DmWl6g7Kq9U +Ecd2Aueek8bz4+1KgMLhQnj2KwLnBQt2LhbD+BlxcKsXysD1bMEYs/GjWOuJ +CqBwton56kXg/PTlkcn09SK/p5YTOHP7P8evco3AuZ4TD3Xfr/CvOUrgnGJq +KuFOi7/K2aGRwLn+zLmF9HylcoalCJybG/eHHKXhszJlnS2B8+JF/mJFH04y +aH3dXeL8smFAX6lozM2/5xerln7Hdswbhp57t+J9Aab/eMNgN+YNnyIhNsFz +1D6qaO29LoR5Q3zVPAbed0DjjSvE/rTar1FA7Fdqn3qULZkzCfPGQvPI+Xhf +wzjOvpboZLYQvCH3a0FPCMaDui9UPfNGaylg3gDE4Y3k/buMcV0C9/oJKidm +Yf/A7f94+o0bOB5obFQrpsezuW7uMhw/bBeTU6THrx42XQfnC9z5yqzTcsH4 +ADc+T4aHrxPn62Nz9gYn+d9g0Po6A1Wsg4sMY3M0Kv7NN6YMj4y+xzrIjOEf +i3keaDqYN4r14LLThgSsC0DpwuXXg6OJWAf7pm+LxzoClI7ItPbLKWNe26f2 +6DfBc1ScWVUza3KxDvodDZHEOgWUTrlMnjed2J+yAucqiDri1kFnab3tWAeB +0sGYJcateD24X9cvo693SWxfmYd1kNv/Om03aRwPcMfzU3LN5CSsgzcmOMbQ +4398JzsN5wvy7i8T6fnGik//gfGB2VVqE+n43A3eshrjCYuT2LcWj/s33yCj +92Yql92Jbhjz4O98qegy/t/XvZgThjLWv6XNo8j5iBdTVcvqAX1+9UKBuM4T +pmOb+SEf2ryr5BLuZ68/Zs5CDecCafMxcxnPwIzrt5hX9ikczXNqgyZO31VV +f6fVKsKGOaU+J439f5nXJRjc26Rk1QlUX6cUaoR1/SqDe301Oa9jcPvnzOsY +3PF4nraeOHfrEwZ3/GnBfpffqnsxuPNV5h2zYY+nN4MbHxLHZwxuPO8bjL5Y +eSUT3AxHd5nKxMCRteT6UrNRyWD898+PEP9+yKD8RH1P3YvXI7z+BX39aeuu +kCDcR342Jf59/+96DQ0McyjuL0d4tD8fjIU78//jH/Gnd0y5KOL4d/1axpt8 +vB6418+wPS612tmb8WJY+q3s6Vg4V0zar5QQ9fCcIVg1mkC3c9Yzue0PK4j1 +3kxuP3MqpLtx/MAdj1jxqEHQmlhQLR69bjcvCE5mkXbNgroKbEeE/QbNbl84 +mmBzOxY9mXL097QLQSCRSdolQu7dwnbgtuP4RuX+xuHEoOJpH9aszhN4xhzo +H00oMQuCqX2k3bufjP9UnXsH3d5yr0dQHvvRriX+7sFfP5JEGY16Mbj9iBwN +SMbXRdzXxfHUEnZuP+O2RCYeV/ZmcF+3XN02P2FyKVS6sVczij5DoitZh6WP +8Tk7wYNxxJJ94uWVElAeT567O/exZZT7ikDXiZ06Yygfnu4m1/PtwZ+S7oyn +6TZjWVvrQK6SPG92nmUfyHyQD8GZrIjg6BIobSV5o02Y+HRheD0YdpWKaoLr +O4ZI/pdnib8XzYLtU1kmEiUV4H17hIObsO9TeSfGh+qre7/qfwfRGJKvxo1b +NjAilwz1diP7ZrlXQ5kSub7be29A0sFbDBn1/u8Hxduh/ha5T9fFagXtnh4D +KpLWacfW10LWeHL9hucizJIvFoyi7RZmAV87QGMMud91+zcfyg99A3W/qtu+ +CteBYBeZl/HaBRkmB64xudcrvO7wwetR3S/9Fvr6Gh72VI2C20zueCYNnbfC +8SAVyZFcejwP5ZffOe74iMmdb8gnLxbOFzXYqerS8z3gZNa69ZYrkxtPoU03 +l2E8EcZzPx1PzZzxSauqnzC575eC+B1DfL9QSCbrNf1+yZ67KiSyyItpwFUP +Bz/bK+N6QLgeKuj1cPSenc/j1d7MIx6jqzcNp8GAFVlv0JlRiesN1bixDej1 +5q9j/eCzYSPIxg7v4hsfDdtZZPxd9cPCAyM1sMyedegbKxkKOHEKNDM3brIr +hagelln1pQyYt4GjF3zXbbbn5cOkh2yzsDVZ8FGZjHPGvDpvbf004JuktvTS +4ixoLiXtV28F5FZ4xwIYjAaPKGfCGwUyzvBPfhtT9+H7fu9FNN+6DOAz4vDb +sYZ72I647aMMxwHsB4HB9QS6ny1dYZH4umjspFEN+nVb5tu64DgRjtOaHqcw +ajmO80LRPTY29Lzub32siHFAGAdXOg72B529MG5ILnY4mY7b65ShuSWKLeB5 +g3fHh0O+cN2J1CP7RUzvuQH18FVC+7J2yVtgziL9lJbaKDlPK4c58zWKvrqE +wE0b8rolB9QU6m7kw8rom49OioWARgMZp9eo6rmqzGR4/8EjtntOEJi7kvne +F/pwx6EqHKRrf6jY7H8NPNWk3UL5kM2l6S/hw/KVM6RO+YMTh3+ifyx4he0o +Z6cnP90evK7jHfaDvISsFOl+MkTFbuProlZZbQ/6dQdjUzVwnMhVXeYGPU6F +4uuaOC90szx4gJ5X7OlV/hgHZPyU3+0/OFi7L8G4IUOXTfJ03F6nKPd/xXg6 +fFKfF3bIF/3Dk2VH4Bnc/FFub8lb9A9P1jwCz7BeQZUKlxD0D88ERQLPR8EH +Ss+KhSAqTtGSKmcCz3UfV4T8mhOEqLy2afDkEHg2rFcvs9v/GlE4oM61cQSe +cScdlsuc8kcUbkNBIR0Enm72s5bR7fUWCr0EnsfuxFXS/UReEPYj8Gy32PyB +ft09Cxg7CTy1DG+n0uN0C9mxmcBzwtNpEvS8zAW3uRF4LtUREqLj8CZj9jgC +Tz/hyz2hNNwCdEYWEft987KdIfzjo9EOTt121w9H9OP9bhp95kwzKxnR9vsC +Yr8nDel/rrmUgf7t91E7Yr8X3tUS/LQmC1H7aFb4mHRiv3/sush3ZXEWovbd +5BO2cpV4vx9Lnh3MVs5E1D5dA+4ZxH7fseBlxLh1GYja1zpTYJjY7w/178bQ +7TOOXl+F/SD7dWve0P2cMxDKJvZ7t9OFMfTrGtp+sCf2e7j+2Qn0OBPjxiwh +9vs2Po//5GVedzcN44DWGL08RccBNrWqEvt97AydB3TcytXZPgjreJ+S5x3M +q4jiVazX8kpYr40jf2+bOZSPKH7uPGvrnIF1ecc9/8vvoksQxfObsP6GYP1t +lg83kyypQE85ejF7UdgpQmcd5dc9F3OvRqUc3fE/vumDNtZTn5zDG43W1yJK +v6pNq3bkYd203JCcUSJchygdHOUxScB2xG1/l6Jajf2g72s9NtP9CD3P2UXo +nfkkax/6dTsDo+fjOFFEm+JFepxz8hSCcF7od9f0/+TF43B4LcYBpd2o3krH +4e6B4w8xbmiQCzfOuYCndcXxtb/60pCC9eh/7KzNTE+sg4jSQco+P+6RBtZT +tKLyP99T82w3WSEwP6oJUbpM2Xd+m9qB9R3N5Og7ZW+WnOWrJ96O6m79Z27M +0/S7dOerrx1oy5if/1/2/+Xnf113x/+IU/p/5MX+Hzh0cuHWuoRVWTOuEhXc +FwgwfZKGeF6T90X+/XBYq1IlerXuQcPkgFI0uYM8HwVGD71bO1KOPj9o9mld +2oBuK5Dfi0W2DxgMq5aiMTkpB0I3f0fnPpB5mf4YK71tfBHylVkuvTKsE53L +I+cGaW169gtEvqCullvspTw9yEaJPBd3i158vUcpHk1dyB5yONuLkrzJc/TG +QwXBOkrxwG2fcWWPMfYD3H4CqzoE8HXhJdd189wbtXGcwMcVp/28oE84L7hp +t/s5Pa++ztLXGAfwKmv8RschJrwyE+MGgavjPtBxy9MduHSsqBXNV9kh5hSe +iPS1yPlVR/ev2Ve2tSPW5ouqersKkelksh5E7M23bxZpR4Myt8Y4KFSjq0o9 +5L67+9P78c/vyG6Sg/3RmU0odICcw0xtEnBb3dqEJugkvqyTbEUDmqR9Yop+ +lboa7kNyM8weretEpdNIu1ij++Tk2jzUeUVr6bXBH+jeBNIeyDNBC9uB2y4w +ItKD/QC3n4mp1bfwdUGQ67pwRvIJjhNU+R/eoMc5fcevgzgv+H6M/09eVzh5 +yfRXimEcYHW73mY6DgslZu/HuMGBG+mz6bgFDV5edvF5N7o9+0BUVMQbZP6J +nFOZX/9VuILVg3wEvD73RcWh3U/ayXobWR37bnkv+irTOq3HLg1JVpB1svRr +n8dPdjcqPZeRyW+Yh6aOdPyxL8p7oDspqwNB+tqPVoVF6Is9GadZmKfqpt9N +yKLNtmaGcimy4CP1ceqh5sySNSXo4VVGtvvNctR9l9x3eTnPB7EduO1CPFs2 +YT/A7Wdt9rG9+LqQb33cl37dxRotL3CcYF5QFErEKcKJsylEKgXnBS/XhovR +86pMdMvDOMDSKS1RdBw2vuxYhHGD1EjLjXTc3g5eBgLP2fbaYhERb8DsL54W +rQSeT58faeqNigMans0EnvG/TiR02aWBxD88kwg8JwgKm48xzAMqzudomxuB +Z2Xj/YfXCouAyqtt3rHbBJ5TKhqPT1MuhUscHN5GNm4pxXgukLq20PVmOfRw +cLv5JUsb22GiVuYUuj1VbsJlAk/Za6f16X5mq8r6EHhWcV3XbveZXALP8aDi +TI/zgL5FD4HniTCTenpeRicW/CTwjPXXzKPjcGmc72YCTy8PodRwGm65ulcm +Hsf7XePTLv9H4YlwmFO3nd2/2oj9vnm9W/rBXYVA1bmw/c89W/B+t18ZsuOu +QjVc+bffrVzwfv/QtHo83kdA7SMBcFijgPe7p3zBFLzvgNp3apdXNK3H+z3o +rk7Jw3WdQO1TZP/AndjvDwVm2F0d/AH3Ofv6CDvLKgXvd267W5PxKPYD3H4C +lUXX4evCQYd3IvTrmg3v0sVxgtXzKH56nK5OsWI4L7hZqLaJnpfnUukGYr9v +4cKhgzVWGOMGcs6P/ei4YT0KrsN6tPrFQQvMq0DTI+92rEcrEgrzMA8DTY8e +KmE9Ktx03wvzNlC8HdE+IMrCehSQZ3wI8zxQPP8k9Pnd7ViPnEQOKWBdAEoX +EpW9li3CetQ4XX/yMp4eoHTEYJ6S9F6sR9PyzwjcO9sLlO40Oll57sN65DTL +ZxzdbhD85QX2A8isfBLdT8ywpxO+LjhzXZdV2TQLxwntmUJ69DiDppi64rwA +ac3wpOd150GNM8YB0jTqC+g47Ld56oFxg0hosqLjpvKE0HkvZq+a1R36ed/k +JO4Lar2Y6u/dC+hzA6cf+O8kPZlLfK/bE/MHqq/gb8Sfam7Mc8eWGc2nzTEC +jYug3ekhM8hA6nSJ/neg+pZPQw2/b8+0Zx6Lq1A+JN4OVJ9TzK97Lpt9jTln +9+1+3BcB1Rcdmj14Y43ZJQa3PWekMOHdhtsMbj8PyDkMI5jrukL+Dt3S0a4M +E644V5cGfdp9woOxlCuv156Wra4lXgxuHK4FsdvCFIrBOY6tv1cjGfIESfvv +WNYL9cfZYFvEvrjXuQBsR8m+9I0su/pn/mfIyWDJ6ciWQ85y0l7zmBWoPj0S +YhHrwe2jdRAeSl73/bOPs448fAVbIuJW561tAq0nZJyQIdpVofgANtVFBzC7 +WmChEMlvSVnkHCytMKJ8ULYdflwicZBu5My1CufY3Yiph6JJpP+t7cvCDzyM +QGPYce80cxqg7TBZJ+E+q9haXnEoqU1lm0tPA/xUIO1O+atXzxNHSCpuRCE4 +qR6WV5D22+/OG2x8HI8GFlu77ZGogdr1ZF0ZnMpyP/MxEiX7shOO1X0FZV4S +n1t91qdviDWAbeLwfmLu4cAk/ciKsg4mqFQCXyjry+zuVBjvR/q5aA1LeKuL +IOQ5q/Db5VwwfUjiJsBm1ZnuzganG7bJL2YVQVUWaQ868uKVpHsyfO5ntM1K +KoGjT0l7fEPRdO3xMXBqh81y1qYKSF5I2tMW8OgRc8Irj7N/nnCuhosPyOse +efzMgTg/ro60tXY+nAPKkuS+0Jla96DqTSw6V4f6j3sVQLkPmRffUt3e5YOp +qP60hPC670UwcZhzXeYqw2KjPLROlH14f1kxiO4n7UtzDt4Uki9G5yVtry6K +LgLvRvK6EtZtfRciS1G3IkuzfzQPonJIu7l0rOSGF+XIJYqtSczf2maSflKM +f28JvtEMu57ezSHmHq9ESB5I9GcOPk6ogyNbs2wOmoXBr/ucOeFcyLhWWAoj +XXF3pCfHwrTnpB8PVbUscfV88GjbczzTOBHsw8m8FN8cli2QS4Wt+1U2PE/+ +DJ8VSRwW7GRuuuMSA4YuYyUfGqSA/nnSfmnz+w3EeXxZHvOjVkkqOFwn7YG2 +KwOI+Qa/vuTcob53oNtF2k+vN1ep/haBDN7/iPKpC4esNNIuJyP569BACvL8 +JCe3sCwOXhuSdns7npHJIgVontiY9PXCSdDjSsZ5htcnUy+pDB0OPil1A+Pj +wjmPf9O2YYw/XofKV8tX74xNAp3rJA4Mex/zTtEmZKiY6EHUYdcDav4WM0LM +iz59m5BPn3u0L7W5T8yLmCKOO/VtfFGHBOnnQz1jFTEvWpu47tO4Qmc09T55 +3dcGCarEvMjCf3qm21MjsP5Bxvmr8pkVMS9SlbDNOq/5GH48I/PK7rZzIuZF +c3gaAuqXeMHeBtLulHntz/xt8MCpu4/sfUBwkLTPUMn+My9K4Vv7yc3eB1F2 +P5nBFmJedO1Setf3JV6I8vPLWtOVmBdtln734YrmY0Rd1+fFoy3EvGivY+FI ++VMjRMU53y9/CzEv0r6oMJNd4AxUXunbBp8S8yKB4Zk5B218gcKhXb15PjEv +2iuek/aeNn/bEmElhHGGLd8XXCLmHhTOcN1mIr4vIDzhTKRmbBKi7kteDMMb +30fQ6pU0uYnP9dR9HKc02o7vOzzaorhgo3ASou5785LjfIcHUmDN1ou9i8vi +EFUnBdtPGOK6gojCGxK+deGIqivpi4UxBJ6V48r7RvreIaoO77mXDxH7vQbM +72qXpCKqbtWf7n2O6xzt/BCb88ggBVF1PseUzxDvC+SfKBj1IvkzovbFBbeW +fLyPkPyhCU+zjBMRtY9iU5Yn432HNGTuJyyYHIuofadcYPgN71MUL7rB9JBZ +GKL26d0DU6XwvkYTD/CoEXPL15x93bya1a3+ohxyq6ZdI+YeFA8oa7PGYN6A +vUO/1QdG8xDFG46jrNaJ8sXAZ52gvji6CFE8o+3Fqi8yygPZ+RYHD5QVI4qX +Nql9zMM8Bq53K6arfC9CFI/Jqt0leA9EVs+WOOFVgCjes1zpm0js9wcOCoEu +h3MQxZP3fl2JIuZFCiJMz1PO1Yji1cXRCtd2jY9BBYe9bNibKhDFw6pX5wHm +bWTaEy8wO6kEUbx9Y/kUQ8zzyMvl1HPfWUWI4vnFcQsLeaqLkOXYjmUtl3MR +pQvbrkxvQiqV6FS3cIJ4dyqidMT9yfBUrDtoi4n0W6IOKd0RYLDV1rm/hZO+ +s2SJucfvi2T8mn7E86KRAIV5XVi/EKVf/OPY1+BxPBTc/6S6V6IGUXo3Ysd6 +MUccQbteXzTWR0Tp41gDFmunVxwk+TzuwHqKKD0dt/eL3/6HEWC8SP6EVk4D +ovRXUFFnPzF/WyLtevRmTD2i9LpvPfG86EzmQjuBiCHZdtTF0ff8Y8Tzog9Q +TueTw6irBVH9QO6Ou8n7H75CE6yX5+H+AWly+ge7V8TzopGo2Pjr+DtH6xDV +b/DOtBLqzf+MXk6anIn7E0T1J8LXqp3gcTYSPvqlF/cziOpnfqTabRCtKkIW +4o3ORB2OziHxef2KdVOxuBTZHXMPIeYeL7eS66UTRk6xzxSjnQdU1cLDSlHl +chK3pb4DPaaP8tBrVY1fRlX1iGciiUPmuQEPRZVUpH33C+/AmBa0fBuZ17iH +C53FJkQh+aQl7ScL25DcSxKHIZGibLl5vmgTVLNXi3ai+s//ec6TJ8Rxx2Kv +xk7kJkjaX5mS86Iuy01CTo09aFwueY57favDW2xCOji7zN8FY7pR5WXy/OIb +07iR/34WSA3MlPFVbUeO0Zz5TBjxXGImvLNdbFA59A19Kybj1JAbPco+kwIL +33v13PCoQ0HbSZyfDBHPJcaBeUIMY+RMCdpYSeLz9CHxXOJbeJVc8p86HL/i +6mYpx+9I4aTfEmLuEaFN9rHHlAZ4P87/ju75HlpiubAIyV4hz0djDw1ELMz9 +hg6IzTXQMa9FrHASH/a+wYi45nq0lG/MFDfBZvTtJBn/dClxsey5FWjCwE9W +cms7OryEPJflbZDrXjc1Hz2x8TkSbtSNvq7kPCfWIeJCzN/C+QtSDs3pReu0 +SNxGr5RvJOZF107tzTqzHa83Jtdr7bwZ5BlRCUYCnh+tLnYhvtuk3XDHm/G9 ++vXwXP93mmZLGzr0m8R5vI6L657gBhCs1v5ivbsZnUkl71fLskm/lNc3wBaN +rxdvTaxHneqc51fB5Jtych3wHtMa6MouQavdyDqPuLFc3tCjGn451/kSdZg7 +nay3xyejPh3a2I2WFPHzRke8Qf6m1NzsUuh8gR400LRUl68mEbl4kOcyMdvI +xUNW3Ugp0M8lQB7zOpu0r9nYk3x4cycSm5IdwD+7Aj38SfopZjsZ5R1vQQJL +7/T3hjeg2mHO3GaWo7cQfx3abxm++aTZd1T3mszrs0jaLOI8LpjfYl9q04l4 +jMn1l0WjWMS8aKmzkFj5lRp0wozcF8un60wrm94ElaN753wyqkO/r5P3vUSH +5+7FXW2wWtDEatneOvSQj/Rj9f274Jx3nWAg17sVkqvRqQwS/6lrtl9+Z9EF +xvqP+g5tKkPNCmT8jQ+vn3Ra3Qk+cq139uXmo3cupJ87Fj4bH95rg7C3w/xE +HerEkHX1dnCtCjEvssye8J4+9zB3/NVEzIuUvnptfPomHIKCyTrpV1CoJuZF +H1I+WrkXhIMfg7Tf2dv/ipgXCSq9SAtdGQCV7STO2rN2XCTmRa7bK61NnAKR +IB9Zt8V6rbuIedHOV4EbRIRTUUUoqY97H0UlEPO3t8t95cRbC9GsEPK+J7O9 +iTkSLBgraz6rtRAo+9x1zWeJedHNWxc1hYRTgfIjx19zj5gX6clZ7z/sFAjU +dX9W88cQ86K2RrSOuTIAUXG6D04uJOZFeTrXVz0tCEdUXlM1d5QS8yKHBbdX ++bwJRxQOEZtfLiXmRTtWvqyLpM3f5vpd7sQ4o0+i5Y7E3GM3B2e3kN5pzqs7 +0Yk7WePwfYFgzn3J8T6/OsSiCz0yK5bB9xGo+/jF84cTvu9oRb+WICO5Gqj7 +fqnwTjOuE7QM6YYs3VsHVJ2Ur32piesKmUWvmvDRqA6GOXV1LnvabmL+1tl+ +1qfkSg2c5NQhpC51JuZFM8b7pJTYdAIvp25njb+7YBJ/HTzd8NXqhNl3qOfU ++ZxnBxrwvoBGgznL8L4Aal/cSpbV0d/cCUsPhCnyza4Aah+5yd22wvsO5lun +e/rL54McZ9+lGHRX4X0KP3ybu8bUJAK1T9nL47/ifQ1X5n6RIeaW1L4uExnh +Pe5RjXYWBJ0k5h45HB4whZH8dcl16BjLugzzBqzi8IZK31DRuvUNaEOs9j7M +M9DB4ZkogUHHvcENKFq1zBvzElC8JKj45QPmMbQ+yMkS8xhQPDZyLPmdV0Ql +kr6jpoF5Dyje03Il52/jf3+5iXkSSjg8aexGzot+hVQmY14FilcfqD2YpDo1 +H4wzmvdhHgaKh7ckODjkzK2A+ks+mZi3geLtH+e0bsU314Ng+rc0V8FmoHje +1VLZeVHuN3Cap5Sz27wWRji6cO2GWSXWEdj2uyfh2sIiWMbRkXQp5UasO5B5 +SzeMqMNwju7knhl1uhcahMQGdVWuDKVB2wVSp6Y4smo/qcShE2+YZ7CuAaVr +cl9GAnnPpiB3Hf65Nz3q4C1HBwsWDYl+hkwkrvfEDesmNHF0s/nDz/7x97OQ +dcO7o1hn4T5HZx9qjBiKT0hHjfXeF7AuQwVHl5NWk/O39OWnpLGOA6Xj9avI +eZFi/v1ErPtA6b7U3jGX18zzhXhtXQsF0U6o4/QJTZ1R0yQmRMF8Rr7KqcI2 +WMHpK54FzHRYp5IKAf68y3AfAlQf8nzJFzuzR3lw2lKLjfsWoPqWg/OtNvKc +LYarBR+VcJ8DVJ8TZjtqoHLlLax/PnoiuzANAsxJ3PaZOVhjO9r8fPQ83W56 +1v17mEIxcoljO9LnS89TWWpFn0tR/r1N2U8C00B8B4lznarRcmwHL+kLhXT7 +Ec/0JfdDg2Au1/3SOlWhvOOJN6Ofa+53lXiOQNKbocf1/E+ht+29WVVF8NiP +Ld47Ow1MOeeCI5bszX5XSmDyBRyf2n2GEmc+tteHLSIclA96R9k+kfjvsg3I +9YMnWT6x+7NAcC5rnfjpClDwIvG5XssKitydDCjFKm9pWw0MNZN1Ml9a1q1F +JgZWajFsz9bWQdwJ0r4xZn8sMbfRa5+zr+JlPTTN/u/3m0kZ8fdv19RDyhjS +LqeeJVKAzyN67c9209erbWXqYv9opZb+Lbr/hR6HU3A8CMeTQY9HubzVH8eP +BOfaiNPjz3RRXYrzRXpHbT/Q892llu+KcUMYt8103K7q2giNG64DndfDagv1 +EmDNes57XpeGk2Wsm8BZnXhO9i7j6kWSl14tZ00fp1MBgftY1zunZ4HsS/K6 +ZV623sbjiyDBgsVrXJ8HuR6k/4mvbXfVns0ELHnZz+cXQK0SeV8ua08P5dmN +4GibrdEinQJwfMp5nkGZRyixNRgU+thPW6QKQCuXtNtdfB+Q8Wgy02HwiKcw +XwFcriHt+aLTDuL1CK/3pK9vH7oZj/2jo23oIt1/i/VtUxwPwvGU0OPJmnfo +A44f4fibz9Li1zVrVsb5IpxvCD1fJ7UNYhg3hHHLo+Mm2X4oBeOG8g/hdWr2 +f3Ez0rEaZc/8BnlXTygnSoeC1wip7+ue9YONdxucPrzzs6D3NcbKbnK/+22I +rx9TUgO7DQtlnh2NgaZ55HUfZNm+bntXDLcs4p1DW+Nh6zwy/pgDtT1ZUpkw +SaIoPOZJPPDJkftFtk/TsrItFu5nPPtcaBILwoGk/f2N23IzX74Gj8ppGhW7 +o2FCEYc/NdWl8trnMhe/Wy464BsF4pznfA4lp53A65Fx8Y319PVis9xeYf/o +fsacErr/JKvSSV+kMtG7w3Jx9HjOCQYl4vjR/GX8j+nx3xjdMYTzRXMlQ/bT +853VEj1xdOY31Co2aELH7bvSo+0YN5RV4/XtyHKLv7i9sPl9lHhfeNxYngnR +kYbMVGly/dCpX2+J94t3Tlk340f89r/vTbwZtvEh3iN2HTe4qPv7BabSb/I+ +jm1idxPvEUsL2EnsEzJj3tnJeT7BebSPeF97/rg6K711F5hXzpF5JR7bkkK8 +Rzw0/kLnKUlT5s4K0p4rLhpBvEf8gS/xYfGyM0whzvvCCcU2jCkHpZihY3mO +shtO/H3PbpewdCPxvnYqn/znhQH/1lvt/NZFvK/NLyC8aHDHP/+OZlWCxHuz +V8YtXiQz5+LfeI6+dJtMvEf8fvzimqZxF//GvylhYjDxHrGekHD+aNr5v/lK +WRWZEO8R6/HXTfyw3+AvbmpnB5nEe8S+n77LlH5R+PtezwkdlVSinoU6au8l +SYci6r6oPrvcYI3rOX9o/n6TtReZ1H0J2GD9nqjnExv37np+NAZ949xfxyzk +TdSz9GZ9wU+t8Yiqh+gDBjNw/cAT1ocd8U/iEVU/BS46xUQ963qduPDVJBZR +9abq8dCdqOca4Quoanc0ourTr9z03kGhBUxWq6PtkG8Uouo5ptstg6jnkOrv +ifT1ZwJ1Ooh6FrGdZ0r3L3v3xHyinrnjWa9VHUrUs9NAA+sjLX7j/ilfiHq+ +F2u6k8iXqudBS75SjBvS1A48SsdN5Mz8Xxg3FDbmUbl/4qW/uFnpsvz4MT+r +mZW/X6SXgNZyeEbs0vAsgp9r0tzEU0Xsmdc4PBO4nPWeH/Pz0JgNb7qmZyEa +PxsR/DxtZrb1ufo8RPGb0Gu2BsHPrcIfPr+YX4AoPtx0ZXckwc+/72XZLtYp +QBR/Krd4rCH4+VfFq/TvUgWI4ttY8cNrffvXMKuiT+eK8BUgip8NS6wuEfzc +/nZ3Jn39XPVRJsHPu7Xu2tD9G2iu2EDwc35ndxI9nng9CROCn1tKLlnR4xe5 +vSMa54uUj8gH0fNd2uYQinFDmTfnuNFx85Cdu4jg52vL7bTXxN/8i1uRN3uf +KNbLkYztllgfEaWP6qfZAy7HSmDO6vQv8zIcmK2CVF9hO2cK7ius3kbJR2Fd +pXR26CRrYgzuKwKXNU6cc7oCUbpsV8tqisB9xcRnP3hk22oQpeMF/R2MZtxX +rD+7fKVxbR2idP+WPDl/Wxt9clXly3pE9QmDIPzu06RNzDHso2fu1NSjZE5f +sfTdwCdizsm9/mzRXCPsH4UsslxF9x8oLBqN40EKUrrsZbR41mm824TjR9zx +O0qtX4LzRVM6zsrR8zVD5PyNG7eP4quFXI+VIG7cRD3JuVySEOuJdE0m5gFy +vdpptimxXv9WzBpt8Xt/1yd0Dkuz80vRxGtd+q/HVqKxP8j+9mPy0IaWmSVo +i8iX04ZPmlDoVbIfHl4+GJDvWogKJnqFHxJpR4oKJF+teSm7+GdtFvop0Kis +sqAb+fOQfbufHPkcl/v2FZfiSnvQ+e/t/+nfvK+Ib71o2ovuppDfm/eZkfM6 +7vXvlVvXYP/A7f/hdR1rHA9wx5NbqbIbxw/c8TMmFYvjfGGFe70BPd/8WVct +MG7gGvHBj45byfvYfRg34MbNXGaoZsHUFnRsYcE7lJqChDcOULxxh6h/52tn +45oM/9V/eX//LNX535FfbeGMs7El6EM9yT/e0X3nfFe1oHWjOiafB+vRXUfy +nLJXpL94cEIT0hs8dOv1ju8oxI7znh3/1p3nHKpRm29okdTDThTWS54Tl4yt +aZynl4f26i3p1LzVjQxZ5HlZ6/Jz3NcdYezdk9Z/aF4PGg4i7ePLRprweuBe +v2Dll8PYP3D7X37oSTSOB7jjCVhWaI3jh0IzvbP0+FNbkyVxvrBUcockPV9F +q4gkjBvopiwOpePmufOWA8G3wrmRk693/8Mtv/NCwKIxP9DUJ376uTJR6EJZ +N6evu+xO9Cfxl0eOfF96iSnP4XPdk5fl2QHdyHjTk+8OPFnowDgy/ouXLq+u +2tWNGq9urzUZKkY5r8l8Q8J6Mve5dSDNUclbaSlVSIWX9A8VUUWxG74heePi +3p3B9WjBFNL/+uMM+69hJWhMdf6S7dWNyLWQjF8n9QXGWYuxe+zXsgq/JuR1 +gIx/SVhpCF4P3Otn9sqXYf/A7Z8/iR2H44G68J1m9Hgq5FdswPFD5r4HNfT4 +TY1UiHyhSyf2Jz3fuRlarhg3eLbi7ho6bvOcTz4k+mF2X/1/cDt9o38y8b6w +8oRQlc8fTjEfC3dRfZ0N8X5x6Ftn9+PKy/72Jzt//cwh3iOWWus7UeaVJXP2 +MLl/i81/KRLvEatfnmfE9/U2086Z3L8zN3dvJN4jvqLxMuPGEyem/AoynsJf +39KJ94hHVvXMUz3pyoxdSeJz4KLzAeI94pNvk96GzHNnfrQi96N9Ruaf9+LV +vxqu0X3g/revc7HVMCHeI46IkUoT63ZnhnHWq4/bl0C8R8zt/+oZCy3iPWKW +QtL95bkP/8YzuEtUg3iP2N1E+N0hlVt/43+8dSCfeJ/ztKLdy6bNVn/z1Sx6 +NJV4jzhFQH7a6M2Tf3Hz83U/TbyXKLDdZaGZgvxf3HI7L/QS9bylNk0gRyYK +zv+t5/4eop5HZKribx+6xPhXz2vPEvUcWPXU8i5PFuzn3N8Lly4/IOpZTGpe +xLmhYqDq4X1Yz2JdXM9zqzyrU1KqgKqf3ybpjDhcz0/epg3sCK4Hqt6sFziw +iXp+3DhOdFt1I1D1eXeNyr2Ry2cY8e82JpT7NcFTTj37aRstLsH1fDmoYzJ9 +/fSAQnnsH7j9W5rpquJ4wHhzUS09njpxxVtEPf/Wav5Mjz/mqpcJUc9iiQ8v +0/ON2HOAdzGu5xOixh3ZNNyUdRpriHrOl7mplLzb4i9uF2WGHBZifr4kx6uI +eQYonsHn7pULMD/rb4jQD43+d34s6e/nZWB+ZoTqvT8TWwLvOXzlGd13/SXm +59GUtjmY3+AOh990RPqvD2F+Dr7sJY75ECg+rO/kvWOC+VmyuPYM5k+g+NNj +4qujUpifY7QnhGG+hWMcvqV00PJZQQzmZxjh8POB3t2H5mN+dn1/O5S+nv/5 +1/vYP3D7n7La7TaOB4Zqi+bS4/G0m7sBxw+3z6eJ0uNXuH+mn+Dndxc//iff +23d8HDFuIBQ9RZmO2yu+kwsxbuDXhwwPWf/DTcyTpaOM+w3l4zVnsW4CpZtJ +ncMTeApKUX976wGsszCGo7PhyUOTWnFfsf35igtYl4HS5ZHlg7KFuK8I5SnP +wDoOlI53Re1Z1of7iqPCcbux7gOl+y1y/keIeaDjVUdH3CcAd18heHf/CdxX +ANVXyIXbZRJz1/FJ6B59/fVoBWvsH7j9VzLMpHA8wB3PrO/sWTh+2Lw3w4Qe +v+JtCx6cLwwJz9Wj57va6thWjA/sWC9iRsdH3/naLWKeVnkwNvC3w72/8zSJ +p2xRYp523p2d0apZCOu9yfVKuqy3xDxtrjPr/KEx5TC5nnPuyGZ9JOZpQaet +DU4nVEMqZw4Z12aZTszTPr1iOvCfrwNlX7L/LNnxZnoB7ntL5HwuTD9cD4Kc +vv3SNGWp4ykajAVNqodr0uqhewppX33+hRwxN/MSrj4tv6AeXqmT9hnqG0KJ +uZnLAqtPv7JqofUDab/SJ/CYmJudvWftWO1SCWv0yHgm6Q3KEHOz2Wwby8sb +vsI+zvMAS7uCHxFzsyhd9g9HpUx4XELatxaekCw6UoJir48aXJXxArEJnO/l +7W0LWsYVw2AO655ldzY89CHXP7Gw3eZx7guojoCP2op8WMr5XS8kvl6ad2YS +aI+/LrAvOR/4n5N2tdBfu/l8woAtcF04uCIfHuST9rKSPaaZig/g0Jja6Nau +fLCpI+2zlT8+PmKTjvjTkOLFsAIYyyDt6RqhkU7jCpHAS9u307/lQwAnnpEL +z1j3dMqRgShrQg1/Dqx6R+LQI+17dcmdOvTZjSXWXJAMPgdJ3L71Nn7LlGxC +B3LZeZH2r6A0gNxfT5Off28zywXZNzrWr8TjobSZvG59xuaiqhdJoHxnzvaT +snGw6tboH3uGe+GWe0FhoJkw7Uehegz4p5D2R4bXXXIq3WDXa5PK3nHRoMSZ +b+To/EzU4ytExsm321KMmGB0mzPfu7ms0Dy0Eh0sDlFYohoPVnlk/JP9G6qN +Tzcil42DvBknI2GI835TbTDDSHxCK3KxfdOp6RkA61eQ3yNc3V4Qcm3bZ1Cf +prIlcq4Z7H5HXtdzapy9wpIw6LW2HLYSM4X7naR9Xlq33azbrjBu/277oj5N +uMkm7YtarN8HW1YgPevE9Wv1DKGE87yQ4/D5O+9VG9F8s5RzYRPtwUiR3HdW +cUnCLe6tqHZnUHJbmAssSiG/71jRb+Fd7RwOcd+sk6tsY1BPPOnfZpnF0JGT +nvDbTnBifXsUai0n7c82p99yE6tHij+N9z+Z+wnd2885J/pffXP0bTOabOix +3+SIBwoe4DwP0BXDn1sZAONtxN9MUSxAZZy6uvxG4dbR/fXokP8EEy3PcOS9 +ivRz8Bd5/oqulbxbblGOEjn7KzWdPH8955OwutHYiApaSf/Cq8jzlyTvp8u/ +rdrQ2jCSl9a9Ic9fpy/vtxSp+IG2XiR5zGoNef6q1B+4Xhbeg3rXdPyHJxka +/GE+x3oRqiV50mQ5ec5SHRSTk9jajbpiujj7izxnHQsf/z7xRjs6WkzqyOI8 +8pyVviLs9edl35CyKBln+VjynPW+WEXl5Jkq9OgleV++zyTPWdclNLWZw9lI +tp/zfnc4ec6qnt1c9onxFCkJkLildPdtzLjYgnRHnfezF9ShA7pkvuWL+9PO +3G9Ce6VBUfdZM9LjfC85RUHt6VGeWnQyuUVAUa4DXf5K4iD+Q0+46XoBGpsS +wZo3tRuZviXzKvlwuGzFPF+k2urwLGSwG1kPkzr78KmRJ1uzEa5NW7Dr8dtW +JNrIeT5k7e+bch+b4ard1aipbxrRxDbyuvNvDOyY3tgCSl/Vt/caVKCxR0g9 +7Vr8vPyDSAtsXFZ953nnF7Slg9wXP2ZPKukNbYLdev5WN/LfopmbyX0UnNg9 +5+L3TnRqtkLsKqkylJ9AXtff3k/0xd0WpDQobjjBvBbttyZxmBe5+qVYZBUy +FPw5I/ZxAzphROIvXx7UPV0nDlW7XVpitaIJ4fL+Yxc1Xibps+MHRMy/GMzr +U44OzydxYB8wU62/2g2daaIJkzIL0KFcEgflYsNIk/s/YJeObz+vbgraP4ns +K/pD140VzW6HSt8qDTX/d8isjoxH5yO6dzO9HR16O/JCYPFL8O8g7au+uA6v +VGxASgHJGcWCHvAxl6yHuzYlMWLHMtF348HiYlU7CD5C7ruWn4kC9Wt6YdSi +kp1/OgA9UiP1+maZfHewfw9YPWs9Eiblh+44kPUctkNtw6tdPyDgU+zUY4xn +6EAwGafAz2C2p3oDipu0kr+qvwG+ypI8MENtw66XsXlIaUpx8pvdTVDnTM4J +H6kEHKw82g28H6WLOlSTILKHxGdh8DXLRwWdMEM/bNqR1y/BcSZZ/2MUfQ7N +0PmCqnr5Jo0Ed8OaZhK3zh5phQPVzWAZH6oA/vHg9pK8L/tt2TOwrgHWtQ9X +aLpmzPke0Jnre8DDNfe34z4BJRr993s31jW2But2CYoaX/Xyy8GnMMJ5bu2Y +JTuYWB8voiEx9fS/viJX6v48vB4u7NT+SF8//388N668jfUd8xU8PjWyS9Mz +HCi+qruY15BTGYDqfthaTlYsAIrftDnPS5tyPS+9adfvDsyTcHChz4JzRzyA +4smWaz6+mFdB8lzhVbe5n4Di1Ve9ht2Yh9HymvU2Ne1RQPHwmJrTlzBvo/Cu +Z7MrbGOA4u0VnOeHfbieH57xeEAA8z980uhY0xnmgij+F9o7chPrBZyb6clg +TrRHlF6cusN6jvUF7lTwhVrqGSJKX0SDW+aK3XZF6U+tTzj1ayJKj+pjQ2Kw +fqHfN+t5w8VMEaVfm3PY8VjvUN3tbc5f55ohSu+ecZ6/zb//3+dvD2RemYx1 +E6yKD+3U8gxAlG5KisW/wzoLn3tKTTNPRiJKZ9lTmc+xLkP72NDHy1TjEaXL +TjKjwVjHYdKNG7fSjZiI0vH7nQv351a6oXjxbWv6xkUjSvcvmMq54D4BRapd +OflVPQZRfULdicsTq18kIQ/+Y19Oy8Yhqq9Yn9bKxn0Iag1Ykx8oHo+oPiSG +87zrRq7nXR3ch7fjfgZ8dD2mRtm/QlQ/M+2cjQDuf2Dsye3JuP9BVP8jr82y +x/0SnAy5sK6WPwdR/ZJEjK097q+gY4LP7Rnf8hHVX2kulLLB/Rhktp9ZZhaG +eZ3Tj/VJRUrh/g1piP/sbOvKR1T/5qq/5hju91Dq8sSl7yryEdXvbVNxE8X9 +IRpR1p6mm5yPqP6wW1NBCveTKEriqpX6inxE9ZM5LkGuuP9EOjL3vlt1ZyOq +/3xnQs6x605ofaDrl7wvOfe+uPL7ogdKmciF09/q+pPzbYs+EaErG74iqh8u +MSfn2z8cP9ytcalEVP+s0ErOt3sX5vzsy6pFVL8twdv5Z74tY+QtvnJBPaL6 +86sK5Bx70F1BpTatHlH9vJorOcdWTB3UmHG4HlH9P38UOcdecHai8rjzdYg6 +L/CwZ/6ZY68tuHfzTEI1SuGcL66tJefYdt0O8ofHlCPqPLJPgpxjj2x5dqBN +sxBR5xdR/SGX/dXNyKvdiUfNPx65c/hwwrD7DMyfMLbhpAbmT6TA4c8GDTMJ +zLfIRrd33NHXLxHFtx0NkYswPyPQ8J/RpZqEKH4WZpr/8I3Ng0P58uVvdzeh +Wg6fH4mUz8L8D4UeH8dV9zcgiv8lsru3Yb1AC0WS1QwYz4DSC5ZK3w+sL0ic +J0PvnZQfUPrySv6XINYjFHE5XizjdABQeuSXUeY1+1gmTDlelrOMYYco/VK5 +Gj2C9Q7aTEN2sQQ9EKV3M9XPOGF9BAnZOKXZi18iSh93nr9kjvUUlXUGnwL/ +d3CRo6feU7ulTO//QAef5CzC+guU/u45vdYO6zVygvp2ocwC0OPo9aBQlzvW +dyRlDUY8PuVA6ftd79COmTpx8Jv/ylTLFU0gy+kHPp8xM5sdWQW7fW/yxjxu +AKp/4GtVvYr7DfDy+WQx3rwWqH7D/Hi3N+5PQERw3NKVUmVA9ScfDYZv/wxt +QhtTHh7H/QzM4PQzz/mG/EJFWhDv5foZuP+BzZz+53RZ/6IZjS2IZ/qHqh6D +ChjD6ZcM4/puy39sRm8vWJ/D/RUIcvornsoyjVHNRjTAn9Ph/LYVqH7MUZn4 +vTVfSL+ko4/7N6D6tyPD0f243wMp94Ofcb8HVL93cIJNpyFPLZjcfOe5Vq4D +qP6wXvb7zbP3m0CkzSVn3zOsV5x+sme/vFjmxRa4nXmFF/efQPWfK56w9hBz +D2NGygLcxwLVxx5pGh5LzD2SHykC7nuB6nsnRQ2NIeYerpaHP+I+GZQ4fXJo ++xUJYu7hI7sxHffVQPXVm55MmEfMPZj+MltxHw5UH27bRPzu2VZGRoFVDu7b +gcnp2903OAwR8w0l+X2uuM8Hqs/fNm+XMzHfaOYVeoXPBUCdCw4v/LiMmG+s +UQy+g88RQJ0jxvJ3SxDzjQF3KeLcAdS542ytND8x3xinFmSNzylAnVOEn9vG +dkgUQG4EWzxiUwF8CCX3+8E9rBmfdLPhUyFrdeO9Ulg6ibSb+rHebt+bBtvi +RzzLtavgsSGJ27hTyywvmSRCwBOrgycTa8Egm/Sf46i4Ndk6Alq22iQLjK0H +B33SXnY8zqF0ySs41zkiJBNYDzc438e9HsoR/aodhXSF5t4fXVsPL1RJ+7Nu +06I1Rkko7YbN/UbZOijwIe1OKgKBC/elI3WG9eFzvNXguoKMZ6VSxgE53RwU +hBvUk6vLYGktaX87YGec6VqAKvxtdTWzCuDBIzIvJ01UdW7aV0hArI8PL2fD +5muknX8yu5N3MBcuttpCvFg+jJlE6kJPvYHyBfVUSOo90jbUmw+F50n7x9QJ +zbwzYiF3yHbrnqUFUPKetCeN9TLNOP8G+Ea0+k6JFcC2Qk5/NTdrdZNYGsrN +QU+cXhaAwC7O8/kZjoYV6vmIFYkmeQ7lw/tSMp4NeVYlv2VLkPgem6sB5rlw +Vpa0RyYezJZ0rkIdV1kF7ux0UFYn8+Vdox+38EY9Kt8/4nq+PQ4C+Tm/G7M5 +oemBdj6cWJfbXLEpHhqTyetOKJhzzc83BVb8/mKxlxkH906QfGi/NvLEXcUo +cHIfNTnXFwOrwkm71gIRcXP5AGhTfrCydkM0lHF+D82hoEdrY2c+6g0LtHRS +YcK0d6T/V4uPsFUbytBgdv4DlxvxMPYYGX91/f4LLmPr0ZuXK8fUy0XD/X1k +nDoh46L46r+hPqkZ1zb2hIDqFVIXAquqrhPvZzF1l+28J2sMU56T150cxxNA +vJ+l+Wxqlb7YEchqIu3xJj88iPeJ3ksfuvTq13K4OEzazSpu/nl/6pRp3CH1 +8Xqw1JHzvl4D05N4f+rZcT6rtxPNYYY0GY+esNNM4v2p1rPKjU1hZuDpSu6v +iGI0tvp9JOhkS7Ju5cYgpUjS/3XjZw0Si/xh2xqt5TVy0SjiK2nPtB+/YPL9 +OhSi9HlP1+oIFMmp54g1y8wkfb6h1D1Xp0w/+xZtf0vm+/P7m7npx95AUFCd +orVsAUrN45wvso7MXr2kHjlOdeVRGYpB5SqkH021ESELzGOCOk3O9UGlyNGT +tN+3+t291r0ElS45fIIp3IDcv5P+G3sGLaVnFKNyl3Fjx/S1oC4LUmdvyfDL +Nxjko+VyaU0qEp3oXDjJq0tf723fsS4dDTzRXXLaoxtFbCL5bZ6F6icN+Wh0 +nE/Tz6W9B+3IJHUW8fraS07KhOyEotcKN7rRi8Oc7yUfdalUiRfA1sv5V4Nr +O9CdYtK/n+6n427uxTAmW3923McWVPeYjGdH/MvsI8UlcGCd61aVino0OEzG +3zs8pqMV89uLt3ctIs+XooP+ZL5tB38sPPOiFCr2JghOD0hDBZzfpRlZcLlF +3qkFuda5ucd8qkGKr0j+fD+1/81Ck29oiuzmbZbC31B+ExnPhxbBx9NT61Ez +62WaKaMNZWqROq5yQUvJ7XY5+h3v5Sh7tgud5cyfbXe4hJllZ6FlQZPXfML4 +XBQl8z1SYLRS/0EDuMc+jrXd1YZqcsn1ncNlbmZ53+DJ5POvu1Z/Q+z75HVn +1BkZVdxvgfg+S6e4xbVo/gPO7wZ/EPp0LL0FygN5Sxxzi1DfSxKfj+fFNvu8 +a4b4yz8Hco99Rjz+nO/NebqPXDfvQvMVCn8FXC9FMXrkdRUEnQbDH7SiXOs2 +FYejNUhsFalf6jpTz7253oDMj1k+vTq+AbFdSP9fdYrWu9wuQqkILbnb2YhM +tEj8p9nPL3uU2AWvNPLPOUEFMncg8xWZsb/s6ulu0PK75vl0ShGalkTq+6dT +Z9db7egGp0WNv3Ti01FOBbn+4fGmKqZ+F1x8fnrW4NEIxGdF4pA5d8dV4v2C +WwFLWQLxXjBPkMTBrjPekHi/QLj15rEkwbsAkmTfslgpcIh4v2D54hRhXdWj +EDqV8/yko24Z8fz/mcZwflWf50h4H1mfElPd6ojn/2u3vE4Pl3JBk1M5zycL +rl5LPP/vtKvC/izDGn2JJ+O8JRUxbdf6RqTSeSxY16EBpEvJ/of3tnM9+2wx +SmrrezWNrwmc5pD4WAT6Rjy+0g0yBs8mfFmcAmmBpJ/z8yZff/GsC1b3Nfl2 +HvkIblvIfL9KSx0Rx/q1Zv74WhnPbvjeS+K2MKHOIGGgGdCE8LfvHZNgwIK8 +v/9rDtCozbTE/ADG40bSlYdioIzDD0Ibewg+QUo9aIKVbAGkcfhE53/MAc6y +f/tjXoLXS7N1pp59CxQvHfykr4J5DByNCw93rI4AisfMrqslYd5DUSVJQZWY +zyne++idXVH1PhJNaJhz8GZuDFA8Kfc/5gAv0ocEid/Z01e5WPEzzAxRfLt2 +OcOZeM+3Y4rwx9SJ5oji5/sNNquJ93x3DR6anjVeD1F8zlwvmku8h7tikZZo +8sByRPH/tFvbion3cKsjyzULxY4gSi+MFC8TvxeH1u+1a86QNUaUvlDv4SZy +zQHe+FmaYJ0CPfvNOpt7QhClUxcOMLZgXYPmzH2fGzD/U7rW/YWZj3UQ7B8u +7nO7EY8oHfTb8AOwbsL5sWiqiwoTUbq5X23FW6yzqEZyJKB+QzSidDb28aYM +rMuI8ewt3/m+GETpMt8l1fdYx1H+uXC2LjMOUToe9Dv+B9Z9ZBSN1Ko3xSNK +92P/xxygfhILcP8AlxvW77nQHoeo/uG9yYgM7jegqWpT2BN2OqL6DaNhhgXu +TyDT9HnlK/NcRPUnp7vZSrifgYVxmj9wP4OofsbAZP583P/Ag48Bj5xfFiCq +/zmbqZWM+yU0uyNJ5oxYAaL6Jbdfcb9wf4XP+T8M9y4tQFR/dXRzvSzux1CT +h2/b7958RPVjtyQVw3H/huadfCTCFMtHVP+25UyqF+73UN7HPAGny9mI6vfu +eLClzZSKYe2cO/LWZ5NRI2cOkPrCdneGawHsHciIxX0jovrGHXqsB8t1cyDu +lPrzU6vLENVnpvuxTi/Ylw7iTTfMTHirEdWXpuvPm437WBgd2LiiSbYOUX2s +duP4JcXaUeC/8/xGHsV6RPW9gXeiXpUseYWkZW614T4ZUX2ysP5r1c/WEehQ +2+cbE3DfRPXVT+co+VuYJCIe5hufU4m1iOrD/SR872zbm4YWRhR7VmhXIapv +NyhIeRymm41WhExtwX0+ovr8568XJLRLFKBdl4p98LkAUeeCjxuHotFAMwp9 +8GDmB8ckNMjhH5Fz21izMQ5PJLbOXuDZjSi+mn7y4nzMb0jBXK2t68j/6dru +XpqK4ziOR5QGko87jQqFKctWampe9OR3pWUk+ZRgDlGHC0p8CNM2piuFdFpp +ojnTZl4oXRRiYPhE+puBsrJp5cPEmTPndKVMvJiOTLPf6Hxv+gvOxYHP+3U4 +fDsI7lvNu41iuofE86ItRXd0kOAe5utG1HQ/gatQ93L2mAnuZ17hzGjshQUQ +zPW/vl5hIri3pdvSMMddW8kJQ2pSuAJwn3sbbUbHXdtUnZ/TK14t4J5HRYTp +HXdtVslmluBFM+D+yz4F8x13Z+818blvwsUEe9Gvc0pz3J2Nr5s73V3KCfYl +zCOg2HF35ptodD3e10iwR78NeUKSukoiSyQednEnYL9WXLvltHfkZIZJk9Cn +BeydJbvLR35rjWSe1bY0uo2DJ9vHuNHVq9UDq2RM4n3gCRjgDtvTCH/RHO0v +pHi1uCmtC5DL9ne+4sMI7TVEHrukkjmbYIft9UDgZXFn5U/gbImylWIjYN9b +0/Rm6gHglOmKWounAD0QVCHf19y2RLyEWzXUD7DT8u/9qtrslRKthexlTDLq +DbCx3gi9tpE488hCom9GuFCfAPpEsbT+IP/zIjkSpEygnoFt1jOj9enfqH9I +uWkzifoH0D9zgfd3FeiGQRa6be94tgboJYFBKlKVTcOspsib+grQV7M5AmCG +5uF0wvkU6jFAjzknx+X459DnTcYuyd0XAf0WInQjIdUWqC1YtPW8NQJ676Fs +a3KFOrnBvTCTuhGSWTc+H9pUiyf0hBm6HUOdCejMH/xfnHrVBNGXdgmoSwFd +OnMwvH328FfSkSFtoI4FdKxycDiKt/8jWbun0FD3Arr3sYVffSW4B3xFf7qp +kwGdfKiOsxxzRgulPIuQuhrQ1Q3T0qqF9C8QP/Zy9zkfK2SxDudUtfvxmQlo +4ka7UreDlXU7z86MnFLpgWHGb1DnAzqf+z1g+S51cggTXUa/CwC/C/D/xdP/ +/l/8Bcudqt8= + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{360.8392763127996, 246.938988841212}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, 2 Pi}, {0., 0.00002835407498298355}}, {{ + 0, 3.141592653589793}, {0, 6.283185307179586}, {0., + 0.00002835407498298355}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{3.041103309846449, 0.03717934987169338, 1.4833436401535816`}, + ViewVertical->{-0.4383354315213735, -0.005358919020253795, + 0.898795489229839}]], "Output", + CellChangeTimes->{3.801886661716386*^9, 3.801889662245392*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"731d0591-4abb-4ae7-8a8f-a252ef0c284a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Theta]2", "=", "0"}], ",", + RowBox[{"\[Phi]2", "=", "0"}], ",", + RowBox[{"R", "=", "5"}]}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"\[Psi]", "[", + RowBox[{ + RowBox[{"2", "R", " ", + RowBox[{"Cos", "[", + RowBox[{ + RowBox[{"\[Zeta]", "[", + RowBox[{ + "\[Theta]1", ",", "\[Theta]2", ",", "\[Phi]1", ",", "\[Phi]2"}], + "]"}], "/", "2"}], "]"}]}], ",", "R"}], "]"}], ")"}], "2"], ",", + + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Phi]1", ",", "0", ",", + RowBox[{"2", "\[Pi]"}]}], "}"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801886691410286*^9, 3.801886696690218*^9}, + 3.801889711061906*^9}, + CellLabel-> + "In[100]:=",ExpressionUUID->"9670fa52-71fd-44c7-a4a4-05a591e73124"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJx13Hu8TlXCwHG5HFKESnSTbphoSr2apE0liVDNOH0ijeadFCNpZqSRSo0x +MammC3rTRRhqmoypSCXpSroQpRPJpXILx/04jtO8zV6/9byf3/q8f53P5zvP +7LP2z7P2s8/a66npr26+8vqqVapUmV+9SpVq//uz08cPTe9+/P1Z/vPJbNvD +Ezb37X559mDFgi9OmPNhe3zcJ/PnzR8/NLvsz5+vbzJnZfTygde/0Pjbh7Pm +nafMXD7m2+jHXdiq3/GDn82eu6zPzU3mfB/947m1G/625WvZuOZ/Gffizu3R +O364st03tyzMlj93w5DlY3ZHH9ngVzXLbvssa9Sq4y/2N90XffnAuStffHJ1 +dvWME85qMqcieq16Lw9dv3p99tGEynubNq/SAX/69W5n31unNNtSMvC2F3ce +FP3DelP+MOKKXVmdY1bccPG8atGLmlz47MYeZVmray69avmYGtFH13+qc/Gj ++7NuT8zu1L+4ZvSrXhpV5fzXDmQ3rzqlzf6mB0d/cPO01aXDKjM6511Xtndn +3J1xd8bdGXdn3J1xd8bdGXdn3J1xd8bdGXdn3J1xd877fZ90xt0Zd2fcnXF3 +xt0Zd2fcnXF3xt0Zd2fcnXF3xt0Zd+e80+6kM+7OuDvj7oy7M+7OuDvj7oy7 +M+7OuDvj7oy7M+7OuDvnPSqSzrg74+6MuzPuzrg74+6MuzPuzrg74+6MuzPu +zrg74+6cn/dBHdwZd2fcnXF3xt0Zd2fcnXF3xt0Zd2fcnXF3xt0Zd2fcnfPz +q5F0xt0Zd2fcnXF3xt0Zd2fcnXF3xt0Zd2fcnXF3xt0Zd+f8PA5OOuPujLsz +7s64O+PujLsz7s64O+PujLsz7s64O+PujLtzPt5Dk864O+PujLsz7s64O+Pu +jLsz7s64O+PujLsz7s64O+PunI+rXtIZd2fcnXF3xt0Zd2fcnXF3xt0Zd2fc +nXF3xt0Zd2fcnfPfXz/pjLsz7s64O+PujLsz7s64O+PujLsz7s64O+PujLsz +7s757zk86Yy7M+7OuDvj7oy7M+7OuDvj7oy7M+7OuDvj7oy7M+7O+fGOTDrj +7oy7M+7OuDvj7oy7M+7OuDvj7oy7M+7OuDvj7oy7c/7/OyrpjLsz7s64O+Pu +jLsz7s64O+PujLsz7s64O+PujLsz7s75/9446Yy7M+7OuDvj7oy7M+7OuDvj +7oy7M+7OuDvj7oy7M07nxuv/8eqJc15vn//8sP3EQX2Kznz++tgfp/+quYOy +1u1qdcCPLGlxx8QulfH4uI+f//8adfDxcR8f5/g448c5PuuQHJ/X4349x+H1 +jJ/fy/hPe33onafOeb59/vP19vfPmtv15CG9s1O7d3m14YxaHfC9uz+56LNB +hdfn/3ujDn49zuvpwHHowOsZv4/P+Dk+4+f4Hj/H8ev5vZ53HMfj4fcynh7D +vt9X0XRhXC+9qNepD7RrNiSrXaO8VkXTkvh7Xzp9wbU9rn8wOq/Hb/3uzg+G +l6yNr3+j2wOLa06aHJ3X4zd+MOLB/U03xtcPnPHglA47XozO6/FeL9xTPGzA +tvj6Dc1mnf9Yrbei83r81EsvvH94yY74+t8/U3zm+iUfRef1eJPzLtr+2oHC +en7/06Ye+NP2z6Pzerx+k4tnt+1UWM9/5pji6pPKvovO6/Ha9TsdPWzAD/H1 +O1Zd13LUoVuj83r87rsnv3HNJYX1/3YzJ/+y2is7ovN6/I7ykwYPL6kaX7/x +qN/Vf/nyPdF5Pf6H301pOvE31Qvvz33Vr98xel90Xo8P+f7kpa8dKDxfaFc+ +Yc8nx1dEj+MJfsv1U0eueKDw3GHUHTO+PuLrA9F5fbZizPCzlh6I70PWb/0+ +xP1+w/2+wv3+wf0+wf1+wP3vjvvfF/e/I+5/L9z/Lrj7x+OoM+6erNO6J+6e +uHvi7om7J+6euHvi7om7J+6euHvi7hmPo564e7Ie6564e+Luibsn7p64e+Lu +ibsn7p64e+LuibtnPI564u7Juqt74u6Juyfunrh74u6Juyfunrh74u6Juyfu +nvE46om7J+ur7om7J+6euHvi7om7J+6euHvi7om7J+6euHvG46gn7p6so7on +7p64e+Luibsn7p64e+Luibsn7p64e+LuGY+jnrh7sl7qnrh74u6Juyfunrh7 +4u6Juyfunrh74u6Ju2c8jnri7sm6qHvi7om7J+6euHvi7om7J+6euHvi7om7 +J+6e8Tjqibsn65/uibsn7p64e+Luibsn7p64e+Luibsn7p64e8bjqCfunqxz +uifunrh74u6Juyfunrh74u6Juyfunrh74u4Zj6OeuHuynumeuHvi7om7J+6e +uHvi7om7J+6euHvi7om7ZzyOeuLuybqle+Luibsn7p64e+Luibsn7p64e+Lu +ibsn7p7xOOqJu2dcXz34icFX3fD72BN3T9w9cffE3RN3T9w9cffE3RN3T9w9 +4zqbesbjhJ50y3+WtHe3Q8sOO6ZkzGfJ35ULhpzV7uWdS5K/K+uH9Vt3++va +XRVfjnk3+bvy5LB+6G6d+x1SdPqc55O/Ky8P43S3emGcyed4GKe7sc7sbuPD +ON2tZRinu7XsdGPZ2C2bkr/H858bk24b3v5L4wHF65NuC+457idfjPk26Tb9 +ghltO81bl3S7t8oFXV/auSbpduO8T3uf2Hx10o1xutuhYZzutimM090+CONM +/h4P43S30WGcnr/9wjg9fyc02zKn7tRdSc+aNdu8dfG8nUnP/OeOpOd3777/ +6Y/PYdyzeGq9FZvqbE96vjfy6nVNm5cmPQcu6Lh85sitSU/G6Z61wjjdc2gY +p3uuD+N0z6vCON2TcbrngDBO9zy65d+GFi/dn/Qcfci2u8ZuKU96lm065953 +apYnPfOf+5KeXzy7cELrdmVJz86jG0zqX7w36fnKjb2ffXrwnqQn43TPMWGc +7rkvjNM9+4dxumdJGKd7Mk73nB3G6Z7dJ8w4+pMR6XpRUa1lT26qk64XzR1a +dmLR41WSz5ch64+d9uNzPPfMf/6Q9Pxg7KJrZ46sTHq2vemIGzY8eSDpyTjd +k3G65xthnO55axine/YO43RPxume54ZxuucDR9+3b8dR6XpRpzH/vKPu1OpJ +z8p9yw76SevqSc9Z/ff96cfnnO45qOS42tddVi35vM5/Vk0+r1e90q/BhH5V +k89rxumel4RxuucPYZzuyTjdk3G6J+N0T8bpnosn3vjFj8/Z3PPeQ8de8+Pz +TPdsP3zm6m4LayY9927+7Nc/Pgd2zxm9yzeMXFeU9Lxh0fE3PT24KOmZ/0zX +3xinezJO9+wQxumeZWGc7sk43ZNxuifjdM98vOl60YL7+59XvPSQpOeIyrHz +bul7SNLzZ4P+ddHYLbWTnqVfff7+9GG1k57Tu+3v+k7N2knPvnObLP76kXT9 +jXG658IwTve8O4zTPRmnezJO92Sc7sk43fPKSU3HXfvVYUnPfLyHJT3njxjw +5KN76yY9/1B6/4kzR9ZNep7Z98W/fVi/btJz4yfLf7LhyTpJz0ntK16o1rJO +0pNxuifjdM+3wjjdc1gYp3syTvdknO7JON1zYf272l7warpeNPXSv1Z8PCJd +L8rHm64X9Znz8ohNddL1onO3v3/hbcvS9bcjW3xZvejxdP1te9/v33v4unT9 +jXG6J+NM3p9hnO7JON2Tcbon43RPxumeG6/c0mLpn9L1onfH/LC572XpetGk +t+q/sLVBul6Uj7dBuj7cuk3r2k83SHr+14DOu8b3a5D0rP9Mr1mntGqQ9GSc +7sk43ZNxuifjTNaHwzjdk3G6J+N0z4Mf6d34+ivS9aJvF920YsdR6XrR/Goj +nhix6oik5xPnPfTLulOPSHrm4z0i6dnz77PWtWh9RNLzzHULps4uS9ffGKd7 +Mk73ZJzuyTjdk3G6J+N0T8bpni0+W1hr77HpelGNOis/GLmuYdJzTcet9zV4 +rmHSc+7wKj2eHtww6fnYSw3qn35Ow6RnPt50/e2Kk8959NJ30vU3xumejNM9 +Gad7Mk73ZJzuyTjdk3G6Z9eGPyu7d0OjZL2I/UvuWXXUNcOnDGmU9GTfl3u+ +untElTerNkp6Ptrq4be6LUzX3/LxputvjNM9m4VxuifjdE/G6Z6MM3n+G8bp +dY/Lw/oM3eh8RnDvt/l5WLfBOQ7n6+PgPg4d7Kxr+fjx+9Hh+Oz/ZL2L/Z/s +W8PZt8a+UNz7QnHvC8W9LxT3vtC4/qZ9obj3heLeF4p7XyjufaG494Xi3heK +sy+Unqx3uSfunrh74u6Juyfunrh74u6Juyfunrh74u6JuyfufbY4+yrpzHqX +O+PujLsz7s64O+PujLsz7s64O+PujLsz7s64O+PujLsz613ujLsz7s64O+Pu +jLsz7s64O+PujLsz7s64O+PujLsz7s6sd7kz7s64O+PujLsz7s64O+PujLsz +7s64O+PujLsz7s64O7OO5M64O+PujLsz7s64O+PujLsz7s64O+PujLsz7s64 +O+PuzDqSO+PujLsz7s64O+PujLsz7s64O+PujLsz7s64O+PujLsz613ujLsz +7s64O+PujLsz7s64O+PujLsz7s64O+PujLsz7s6sdyX3dcGT+7rgyX1d8OS+ +LnhyXxc8ua8LntzXBU/u64In93XBk/u64Ml9XfDkvi54cl8XPLmvC+7OrHe5 +M+7OuDvj7oy7M+7OuDvj7oy7M+7OuDvj7oy7M+7OuDuz3uXOuDvj7oy7M+7O +uDvj7oy7M+7OuDvj7oy7M+7OuDvj7sx6lzvj7oy7M+7OuDvj7oy7M+7OuDvj +7oy7M+7OuDvj7oy7M+td7oy7M+7OuDvj7oy7M+7OuDvj7oy7M+7OuDvj7oy7 +M+7OrEf5+8K4e+Luibsn7p5xfUw9cffE3RN3T9w9cffE3RN3Tzx+n/Q/+5C+ +LKxrfTRu1NmnPJTl+2m+if5sabezB46YluX7QjZHb9P2+Tnf9pmT5fsbCutp +E1ZN+nzQnvez/Dl9YT2tbOJFXfb2XZblz5vLoi9485y3S975Osuf8/0QvfHz +d3ZZdPi2LH9eVVg3u6TTvsEHLdyZ5c9dCutm7ft0/+Oxi/dm+fODwrrZub97 +8aXpLfdn+Tp4Yd3swLzRLUbceiDL1zFrRd/eb8H7KwZVZvk+p3VxPerspwZV +ffXBqVm+X2dT9Cdmdetz9QOzs3w/R2Ed7PvSfoP3DXsvy/dP7Ir+m2anjN3T +eWmWP18vi75u2q4Pu162KsufwxXWtebf3v3GezrszPLnSYV1raGP9+rT4/K9 +Wf5cpLCutWHZ+yfsf7s8y9f3i6JPXnTflW+feSB+/xd/64mnNlTrWpnl+402 +xXWh6mdtq/LRmy9n+b6Z0ujtq7WsPfKHd7J8/8eu6KtmFi3efcanWb6PYW/0 +ivtnfj536cosf+5VWC/6Z0m/c+5ZvCfLn99Ujz6+zcr7uvUuz/LnEEXRL13+ +wO1FWyqyfD29VvQvb318YJ2zKrN8H09pXG95+Mjtk+uOfDvL93nsjH5luw0N +djdakuX7KvZGb3TroNU/7b0iy58bVY/rJJdMKC17ase+LH/+URR929qHplw6 +vSJ+Px3f2WN8acNjKrN8H8nOuC7x3nsLe+6qsjjL90Psid66z2mbJq0tyfLn +KEVx3WDc1kc/uu+/K7L8eUCt6Ie2ePj3J1SrzPL9E3vi3+PdO27YefiAL7L8 +eUbh7+VTqj5Q1mLzgaxVmO/8fVGi+Y57vuOe77jnO+75ji/UfMc933HPd9zz +Hfd8xz3f4/m+M/nX5b+qzGox38PfBW3CfB/DfA/+lOd78C1hvl/CfA8+0PM9 ++Dee78GT+R78Ns/34Bs934NPCfO9GfM9uOc79+ee73gHzXf86zDfO4T5jldq +vuOe7/gEzXe8i+Y7vkLznfveRzTf8Z9rvuONNd9xz3e8VPMd93zn/tDzHT9b +8z3en2u+457v3Bd5vuPM9/y54MT4eXrBqWvOWlPvqvicroeeA3KfgHOfcEY4 +DvcPbcNxuL/Fub9lfuF8nvL8lOPz/PSQ/+wXfzd+Dm79Zsy1s2f9Nsv3de2P +fl6zvQ/2qvd/9v8E3x6et+b74OfHz53Hbt7WqnWnwVm+z3t59BOa7LxpWZex +Wb4/bH/0Za0nHHdE82+zfJ9TZfSF9S+ue0GNLfF5Ln5eeJ57WPjvkHD9v2/X +tPKr//6bLN9H/ln0lat7Hl970egs3w+9JnrXihlP9pw5Kcv3e5VHH5Sd+9xH +7b/J8v1VldGf6di8dP+BzVm+/6bwvGDWd2XFI39aeL6MbwjPl/N9/y/Hz53v +Dr7lsR4f9Mum/We/+NLC+v8zr3zcvuuoLN+fvSb6Cz0nlXT641NZvs94Q/Rl +p7Xu/NJJ/8ryfWnl0Q/u8mWbP1+1Lsv3V1VGHz70kE9n7dmU5fuECuvzZxzb +vXuNaduzfL9L1ehNi+/avH7x7vh8HOf5+In8d1rC592FTdr+7OKN12X5fvcl +0X/x62PuGrLonizft706+oJ/rR2ydvLjWb7/eH3086cv3dys5z+zfB/t1oK3 +vX35SWPfzPL9duXRJ/e8/e0ON6/N8n1jB6L3fG7ri7ds25jl+58K6+R/v2Ly +xaOO357l+3iqRu/1yF/ePfqK3Vm+H6V69Gm9Gy/p2HRf1inMR9Zjz+1f9MKQ +er2y/PsGiwvr1ZdVXFs8/s4s3ze/Kvqaw05ucOc747N8//d30S+7dNPx59T5 +R5bvY94S/eTHRqy95qQ3snyf647o18xuPPvbSYuyfH9hYR37/OuOvbx81Jos +3yd3IPpPv1ryaMsNG7J8v1dhHfuUP5e1qzmuNMv3LVWN/vCn45/qtmRXlu+/ +KaxjF89tdf74V8qyfB9JYR17bY2JTQ7/cn92GNeT8HlXGq4nC7meBG8Xricf +hesGny8Tw3VjU7hu4CeF68bd4bqBfx6uG2+F6wa+KFw3GoXrA58XD4Xrw8Jw +fcBX6fqAc304N1wf8MHh+jAsXB/wKbo+4FwfxofrAJ8vm8N14NlwHcD/R9cB +3NcB3NcBnOtA63AdwO/QdQA/U9cB/MRwHeC/gxTXPTTfcc933PMd93yPrvmO +e77jxZrvuOc77vmOM99vCPOaz9Ojw7weEOY1/lWY17PDvMY7h3l9bpjX+Ama +17jnNd4uzOunw7zGT9e8xj2vcc9rnHl9eZjXOPOa/WDcP3g/GO79YLj3g+He +D4Z7PxjOfjDuQ3Dv+8K97wv3vi/c+77iccK+L86X+x+fL+7zjesDOl/c54tz +vpwX7vPCfV64zyseR/sDcfYHcl7cd/m8cJ8X7vPCOa/4/ZrgHj/u8eMeP874 +GWe8H9M48eT7g8EZJ+PBPR7c48EZD7+X+yj/Xpzfy/FxHx/n+ByH+xaOw+tx +Xs+85u9xz2s8+X5rcL8fcHfGk33dwT2vcc9r3O9/3O8f3P9e8Tjevx2cPnG+ +h/uWZL6zzuD5HjyZ78GT+R48me/cL3m+s/7g+R48me8cx/M9uOc791E+L9zn +hfu8cM933OPHPf74PQiNH/d8577L48Q9TtzzHfd4cI8H93znPsq/F/d8x318 +3POd+xbPd5zX/3/rAOwT5vrPvnpejyffA9L3pjkO12Hvz8e5znB83MfHfR2I +1/8wL/i9XG/9e3Ff33DmNeOJf+9rPLjHE6//mqc473PGyXXb48Q9TtzXH5x5 +yvhxjx/3+OPni8aPe556HYDz4vPF54X7vHCfF+7rD8685nxxny/u843fJ9X5 +4j5f3OfL378+X9zni/t8cZ8v7usYzvWEDrg74O6AuwPuDrivh/E4+n4Eny/J +9SS4rz9cz90T93UD9/nivi5xffbxcf974b4+4P69uDvHzwtdr7ieezy4x4Mn +3wMN7usA7nHiHmf83NH7Afd1jM8Xjx/3+PHkvwMQ3O9/3PMd93nhPq/4fSid +F+73Oc77nPPi72KfF+7zwn1euOc17nmN+3xxn29cN9D54j5f3PM6Hkf3IX5+ +8W9AH4rU + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[{Polygon3DBox[CompressedData[" +1:eJxNmXf8T+X7x9/n3HdDKqQoDWmgkpkiqVD2pmwhZe+MsilCyWoglE0aiEpT +pb2nfJsatKS96/t8fV/37/H4/XF/rqfjvN/vc+5z36/rdV2nXK8hbQfnhULh +Wv4E4gJiCeILWaHwA6MSfBLxHcZhcAnid8TPGZ8xDuf8psTzOb4z82f/YhzG +8SbEuhw7Fu4IN4MPghvA58BHwW3hi+Hj4E5wc/hIuA18Efwe4wj4H8bb8KHE +YsT/6Dw4J77KOBAOxDcZh8BFia/p9+ADiK8wDoAz4suMCP/LeCnzff/NeBHW +XPzJ2AWXLOgDhcLvjLPA04jv67rhSHyDUQQuQnyLUVT3TfyAUQo+kPgbowZc +kfgLoxpcnng6PzQG7gufAA+Eu8KnwaPhPvAZ8DVwP7gCPBK+Ai4LD4K7waPh +h+E1mif4Mrg1XBzuBreEi8Fd4Rbw8fAAuAt8IjwY7g6Xg4fAl8EnwUPhHppX +uD58Nvwv41y4CvEfRm24suaVc+rBNbPC/yawDqEqPAreBq+GT4VHwJfDJ8PD +4J7wr4zqcAXiKRwfDveCy8NXwb3hivAo+Eo9/7SWmsJf63vhY4lf6fNwGeKZ +aT41P5XTXOkeq6T71T1WSvOgOa+a7l332wSeCV8NN4NvgMfCveCV8Dy4L3wX +fBvcB14P3wo3hWfB16Rn1z/Nc/V0v7qvamlude8Xw9fBI+GG8DR4FFwPngwP +gy+Cr4WvghvAU+ERcH14CjwcPjutDc1PjTSHmud+8AZ4YVpvfeHOWsvpWfRO +z6In3E77WusPLktszvEb4XHwEHgTvAz+VHsVPoL4mdYTfCRxr9YNfDRxt/Y8 +XJzYjc/eCy+GP2GUkWYQ92jNwaWJ32u+4HLE/bpW+ETil7o++Bjix4xj4EOJ +HfnORfD1cCd4MTwD7gzfDs+Ee8DL4TlwT3gFPBeW2G2El8KXwXfCN8Ft4fnw +FLgdvACeCreB58GT4S7wEngWPBTeDN8Bt4dvlobCreG58CS4BTwbHg/XTOtZ ++7co3AFuApeAu8Ot4LnRe+8LBOk2uDb8LXxrtC58A98SvR++hq+L3vO74Juj +NeIreH70ftsLXxv9G+/B0+CS8H/gedH7bQ+8IHq/fQnPidaCz+HZ0VrzKTwd +LgW/Dx8Trad94KOj9fRKuHS0nl4Bl4nW5b7wDdG68wl8Y7Te7YZvitagz+Dr +4dLwB/Cx0drdD54BH83xD+FZcBn4Y3gmfAz8EVwqWrt7w6PgP+EX4avhjHNe +gRfBjeDv4IXwhfA+eBwc4dfhxXBjeD88Hj4YfgPeCk+CixIfYkyFDyduZlwD +H0y8nzEWLkLcwhgHH0J8gDEZPpQ4gVEEfpPvnAgfAr8FT4peE2/DI+CfuP7n +4Kvgn+Hn4ZHwH/AL8HD4R/hZeBi8D34GHgP/Db8MXwPnfOer8Fg4wK/Bo+G/ +OOcleEp0bngXnhqdM3bCk6N19p3ga7yU9dmYz3wO94JvCP7NWnClpJnaj9Ph +S+G18AK4A7wOvjnzvC6Ep6X9K828JfMzuQ2+LvN6nwGPzjxPl8CNkh5qT03M +/NzmwBOUi5JWj4EvgdfA8+Gu8D3wIrglvEzXnNmHSAM7ZV5HfeCOmfdED7hN +Zu8hPWybeX1dCXfIvAavgC/NvE57w5fAreA74Bszr5f2cMOkA9KW2Zn3zeVw ++5QLpO1D4W+k3fDpxAeZ0+Kaq9w+StpYKvMzbAlfmPkZtoLrZc658kgNMq/x +FvAFmddya7h+5jVyPlyN+BGjInw88VvGOfAZSYflSU4lfsGoCp+iZ82oAp9M +/JBRAT4u8/pqDNfJvM8awrWJ4/nd7fDd8KPcyxvKQcR3+feJ8FHECZzzJHwP +fBO8Q/MpHYNfgLdkXuMXw7Uy74ML4OrE1/UM4IMz74kL4RqZ13Ij+NzM/qoe +fJbum++cAA/Wveb2D/JUtXL7K/mu3vAD8HJpFvwgvCJzTpdvWQVfDm+F75TG +wQ/BK+H+8KPwWnhYupd7U37RPGyAB8CPwevg4fAz8H3wCPhZeCO8WPoBP6b9 +Dj8Hb8rsnTQn98Mj4efhzZl16G2dD4+BX4K3wtOlzfAO+HrpKPxMZu15B34c +nibth5+Gp2jfw0/Ag+An4Lsya9tOeHvm57ILfipzffAe/CR8Nfwy/AA8EH4c +Xg/PlB7Dz8HbuJ8T4CHEXwuuGYoxvk6s2kFr4Aviw5zzG3E/403Gp4x9jN3a +V9JaYsnMx75Kx1WfqNb4g/FDOl+feyj4u/W72lP/d+73xN8ZXzJ6cfx14pzc +x39mfJJ+/6d0DbOUZ4jPZ75e3cPn6dp/TPeyL/12lr77+//3PbqfPYwZyl3E +Z9P1/5Lu4dt0/l7GN+kzmouJygnERzPnllfgBzP//550zvO59680fH3ufbEd +XgeX1jOFX8itz8oFm+Cyenbwl7m9h3LoPrhLwXn5i6Rdyr97kvYq5+5N+q88 ++1Vu7y0d3Zh7Xz8V7P/kA2dzbEVuHXtc8w+X13qDH8qtITvgbbm1SDlrO1y5 +4Fz2LFyz4Bz3XG5tVB5/IrcWKScuz/3cd6Z81K5gT7I5t2ZKz57KrWnSgydz +a5pyqPLzq1oj0sDcNZF8yC9Jz+V/Pkxaqjz4bm4tUr5+B76oYD/wEdy84Lz5 +Gly3YI+xM7ceKqe/l1uXlNOljVpvD2f2Ba/B2+DfUn6Rl9uVW1eVc1/NrdvK +3a/n1kDl7jdy6568yo8pT8m//5Q7L8vLfZe77pNn+yHlNfnJ73PXhvJ1+3N7 +TvmuT1MeUd77OOUaecWfU86Sh3wzt64q5+xO+UUe8pOUj+Q/H2E8nfbynHS/ +j2TeT/vTGj9dXlb7h3io/FnB/rZocJ2rfN4Y3qI9Jc8SXDcpZzYK1uGc4w2C +Pby0tkmwhgeO1wuuNf4l1mfcB6vQbxqs7VH+KHddpvrsCHmvgn1gOflR7Uli +x2B9Pozzd+Suf6dw7JncvYupwXlLmi9P+EduX6Ea61h52YJ95nHB/kT+6KRg +3/IDsVlwHjmAz54c7G3kF0oGewP5nTLBXkhe9Ok0/1rPpwX7pZ+I7YJzjdZX +bXi1dIhYK9gL/UGsE+zB/gqudzRvS/ie84I9mHJd99xzdTvH68Lj4UHJX+m5 +9IfrwGPhAcrJ8ER4iL4HHgcP1PnB3u9PYo1g/6PfrB7skX4jtg7OifLMbYJz +hzxz8+Ccq7zXKji3HsTxllpb8IHy7MG+7h/iBYy74b+JZwR7y5+JbYNzmbx3 +pWBfKr9ZFV6qOSRWC/aEvybN0b6+Vr+Tu6cxQb+fu9cxEd6Quy4eCd+ftEU6 +syx3nTtQaw0+E7466bB07yqtx9w9tDG63ty17Si4Q7AfUF2wNHddPEDzlLu+ +HqR7zV0Xj9Zc5tbYwfDKpHXSwFW56+6hwXlJ+Uk5VjlN+UV5RjlHuSdLx5QD +lXfm5+533cCfeSnfzSX+mtvrqpZcnbsGHwZ3D877R3DNa3P3XkZw7PfcXlr1 +6ZrcfZjhWm/B+ask5/cM1r2j4G7BvqUE/FbSH2nLO0nPZ/D/b+fuDV6f8ojy +wnj4A7gzPAt+P3fPcKZ+B24GT9eags+DJ0sbcvfuxmnd5e5NTdJ95O5bTtO1 +5O5VXgdvivY3Wntbc/fuxnL8ltx9SNWYnYP9WDHO6RLs0+SVusIvwsU53inY +y6lO7BGcd46El+TuY/QP9n7K16pzb83db1TtvCV3T+wa7fXcfU7V14ty9xVV +Uy/M3YdUDf5gtJ+TXn2W8oL0/Pbo+keado7WLsc3EntF97PEvaP7RJvhumkP +ShO6RPdB1nOsa3SP4y64W3TPZQN8eXQvbFPaj9qn+p7j076T7nWP7svcrfUQ +3UO5Bz4/uG+pzx4V3GNZRjw7uK9yH3FgdN0ib1MzuAd1L/GK6J7U/XC/6NpA +/rl/dL0h79Ezuu+j76matEK/Wzm4d6frPytYD6VRVYJ7ZbrOi6P7aAvgM5NO +SkMGRNdC8lcVGasKnpMe0f0mXdug6NpJXqtSdA9L66dUcH/pDmLp4P7SncSy +0X1t7fcTo/vs2uMnRPeUpS0nBPe4Vuqc4B7UauIpSWOVO8oG975WEcsH97vW +EU8N7oOtJVYI7mHqmR4ZnHeUa47R+oZXEI+L7mtrfVaI7tlJr06N7mtL08pH +9+OkhxdF9zTnw/Wje6xztQaie/HStIrRPUHp2BnRvUKt7ZOi++zSltOj+4nS +z5Oj+/vSkNOie47Sz1Oi++/SHOVu5eulxL7RteUDcJ/onvhW+K+Uv5Triwf3 +M28nHhzcd72V+G/KXzfBBwb3V28m6qWA8uAcYongPt6SYH8uD67a5fDgfu8i +YpHg/u1twTWIvPD2aC+0N+lqseB+8uLgmmR30t4suFbVvMnzTCp4Pi8JrqN1 +Xy2Ttui+VGfuSNewLbo2kxa1D/Zd8gN5cI6ep2cU7BPklxrCT8FbiAcF95Zv +0ZoPrs21p1oEa5pycQz2JPJgBwT3nLUv5JeUT9cE696upIGHwNPhhcSm0fW2 +uEN0T1nrtkl0Ta65ahTdG9U1NI7uZeu5NIzuU+tZNI/2GZq3jtF9Vf3uldF9 +WN1Ls2iPomchPyzfKG/cKbqHq/XfObrPq31xWLA3k8dpEe17tDZaRfsbratv +iP0450b469weT7WP+ht6pnq2/yRfNJtjf+Z+pyMf2DK6B6E10ya6d6+93zq6 +dy+tax/d99e+axvd65cmXBr97kF7uV30e4LlWg/R7xikA+Wi340p7x8d3H/W +OVWje+jyLUui+1PynEuje2Ty3mdGvy9RTlwZ3eOQb3w8uoZXnloV3R+Rh7wr +ukcgL313dC9DPvzh6J6C8t0T0TWz8vvq6H6KfGDl6Pc0yt3LovuD8q53RPcH +5dnuje59yJ8/Gt2/kMd4JLqvIZ/wWHQtLS9RLfqdgfL48uh3DPJyK6K9rHxm +lej3GfJyG6J7NKop6kS/m5RnuCe6F6Pa4c7ovqH84cbo3oo853nR7zjlNwZH +98hU89aCZZ7kN86Ofh8m/3Bu9DtOeZh60e+fpCEXRr+Xks40iH7npL1ZO/od +m3xO9eh3rvItNaPfO8qX1oh+T6Ya5Jzo93DyLWdFv19UPbI+uhej2ue+6J6R +6ovzo9+tag0Pie45qh5fE93PUl1QN/pdrPq6Q6P7g6rT10b3ueSx10X3s/7n +vaPfn2nN/xdOrMiA + "]], Polygon3DBox[CompressedData[" +1:eJwtmgXYFkUbhXdmVlAsDMSgQVApKUUBBQQRRAmRNAiDBinp7gYpFVQUECUU +G+zu7u7u9jf/c3P2uhxn7p1932/f3ZnnOc9ZKvcd1nlozLKsqf6Xq/9e/WD1 +FdQv0oEv1V8kPkz9fPEX6i8UH6p+nvjblGXjxANClq0Rf67jF4jLqp8r/lH9 +UHEl9UvEf6gfLa6hfqX4f+rHiI9Sv0p8kr5vK9/H94gfUV9f/Lu+v4H4UXED +8R/ihuLHxA3F/xM3EjfQ528Wn6fj14lPURuquck6FjRXX+0mjc/V/LWaa6M2 +UvMzdKyE5uqpbdf4HM2v19wZ4rvFl4ovFrdUG6LzJ+lYprnrdbyMhu/oWDXN +XSPeV/yauJL4avE+4lfFFcXN9Jkt4v463k+8Uf1B4rc0X0W8TlxK/LK4vHiD ++EDxm+LK4tvFVcVfimuJW6gN1niijv2nuT/VLtX4aPWrNVdXf2+duJf4fHFt +8ZXiHuJzxb+pHyk+Uv1l4tZql+j7pulYrnN/1/FRGldXv0JzjXTsOnEfcR/x +T+qHiSurXypupTZMn5+iY5F7rXaLxlfpWG/NHSfeIO6r8/uK71R/pPhrzdcR +/yoeIa6mfrn4DvXVxF9pvrb4NLVRGs/UsZL6roPUlmrcXOddrrm2aqM1P0vH +9tRcHbW1GvfU/Hma+1n9cHEV9cvEt6mvIv5Cn6kpbqjzrxX3jr7ee9XXFP+o ++XriU9VGaDxdx/bQuXeoPa3x7cHr42PxueIO4sXi78RTxcODr+9n8WrxLPFV +4nJqpTQ+VMfW6m/9ovk1Gs/Wsas197v4avGi4PXKmthH48Myr5UfNb9E48k6 +tlZz9+lYLfFP4vo8n+L+TBGvE9dQq6jx0Tq2NXrNHRp8D1iLf+j8azReHLx/ +WHNlWXuZ1+IbGh/C2hZfK/5N51+l8cLg/VJdrYLGR+nYFs1XEO8nPpw1EL0H +SouPyLw3uKd1xSdmvtfHiKsE/4abon/DseImmX/bseI64hPE94gf0N8vy7PW +sUGaO5prDn5m26P34IHicpn35sPJ185vGKq5o9QqaXyMjm3T/CeaP0/jjsHx +6iPxOeIzg+PhQ+KK4jLiIbmvgc/+EHxtv2r+cvEc8TXir4gb4sPVLyDA5o5P +6zS/ReMj1Y4I3gObdc43yef3CN6/XyXH227B8fILcT/x2cH79TNxb3Hn4PX8 +ubivuEvw/vkyOR53Dd6/m/Q3Dha/La4q3lvz88QnRMfvH9QPEVeMXr/fa34u +8U/nX8F8cf5Y8ZXEf503SFxe/UJxc83fKx4o3iz+VHy+uFNwfOBvHhYcw7iW +r5PzS/fg+P+3+AbxKvH14v+KeL1WfKM4ETPE14m3a1w/em+xx1JyDD48OGYQ +mwMxU+P1OrZV40hMYe2Kt5Ef9JkHxEOin8e/Rfy/UvM3iP8SbxavFG8S/0nM +F68QbyR/iTeJLxNvyL0myhT7Y4e+s4Xm79N4UPT3/SPeJr4i+P40UTtd4+48 +k+g1cIjG7wavDfZAefEnwXuDnLFJ412Zc8nLmu/IslI/UXNvqD9bvJf6yeKX +1Hfg3qifIH5e/RnkQvXjxK+r78L+UT9J/KL6M4nd6seLL1Tbpr/3oI61So5x +xLqnMufGMTrvNvGT4vbixpo/SdxO/GwRc9cE5zxicffoZ8szriVeJv6CfKa2 +nL2itlHzO8VNNf+muKvGpdRP0XctVP8R+YB7Hh0ziZ0v6jMDcmuG64NzNlri +w+j9fID6mezn6PV4oPpZ4p3qjxN/o88MEz8gPkn8s3gE+118svgX8Ujxw+Lm +4l/Fo8RPiFuL/xSPFu8SHy/+Vjxc/KT4VPFf4jHip8RtxH+LLxWfo7Y8OCfW +QGtovrHG3+nYJbk1zfEan5JZ67yl1k3jvdVP1dwH0fmmtPoZ4vei49X+6qfn +XlOsrX3UTxNfpLZd3/eQjrVO1lDHiVtm1lZPq52m8T86NlZziMOtwXuEvVKl +yEdnRuebXmrLgjVB9WRNsZq9mllr3Jb8t1hDrKWO0bmFHFNVc7erPZz5mri2 +HmpLyCU6Vo1YqvNLaPw8OURzV4hLil8gh4j7E4M1fpGYp/Obic8S92HPEOui +YyMx8mONbyn0HHuIvXSn+KXM38F3NVVrr3EPHXuHtSDuyZz4a/ER0bGZGE1s +v1WfvyfzmmPtrdGxPcTPkaOJ9Zq/lVwXrJd2cE/IRcH6Z3W07n4WDaDBqrhb +VmbPiMuKV4j1X/Y0eVd8fnTuIIegdW8lJ2r8WZHP0CxorR2ZtQx/k7+NBkO7 +EZPqavxpkb/I0eTq98WDc2vEy4M1ONqRa+Ra+Q1ot57ipcEa6chkDUCse13H +BubWB39n1qzohVnkXB17U9wreY+WFO+Vee+Ss8nd7OEbo6+hVKFvuLZJaneL +XxCflXxODY3fK/J9Vx17RTxFx5dEX8Of7PfM11a10DMdovXP8WrN9Nm23GP2 +Ps88eM2z9k8WDxSPZ49Gazz0ccNo7cc5aI9/gz+7f3It0Iy4Kt4vWYtTT7XP +XVOgnxtF1xr7iieIm4hPF58YnUvJqeRijo0Tz8987t9Ffq1VXBvXjFb6L/i3 +dFGbiTbQsUOT1yhrt1yxdtkDncVlovdGV7V5wTVABZ1frtArp0Xn87bR2oVj +zJ2tY3PJ/eLy4ubiQcG/4V+de3SRD8+O1rN7JdcfjcXtcmsqtN5HwVqrVVEP +DIuOB03Ed4kvjM6vaDa02sfBWo4cQC64KFoPoFnRkh8Ga9ma0bUnNeg/xd8c +I56d+Vq6ixcE10CVkmMea3l4dLxpnKwH+kXnb2oG6tHjo2sJagzq1eOiaw9i +3ArWYnTsY42yVj8I1r7EcJ5Fl+jYfmKyXrkgWi/UKvRNt2h9WLPQF12j9T73 +lPq7dvS97qY2P7iGqahzzxLPCL6GsuJXo3NDSdZF7me0QNwu+tmRg9HOBBFy +8wHJtdnJ4g65Y+xycafo2HsCz0jf30nHXoleIws1Pj167bDnLxN3jo4F/M3W +wWuMazk4uTZqqXFHzR2SXKu1Yh3m3vPs/ZeCax9qgr35W8G1wh78nmBNg7Zh +TfMsT41e6+Qz9u6+0dqpTHLtfoq4U+57Qu3XOvpeEcPRIvtFx/Zj1PcPXqPU +ylXV+gTXhNSGeAyNxC0yew94BtS3x0Z7CdS0nFsvutalRqZebRBdO7Pnxwc/ +A2IBwRz/o260d0CMmBB8T4kdXPO04GfAb6GGR3/Xia7tW0TXbtRw1Lpdinw6 +OTpfHV7Ui22i9TnPjFxeIvpZ8gym6vPLMj8bnsH04GfIs2ENTBIvzrw2zhRP +FC8Sl05ueCcnRc+xBplrH7022VN89ozovfabPtswWCOhlT5HxwbnKHLVo8nx +u3yhj7jmS4v4x28h/owr7h9rGb0wtbg/rFVi+JTi9xDb0SCTi/uDNqHGph6Y +Vtyvx5LzW4VCT3E/8TemF/eDmEUtzj3cHcty61P0C7EHPbq60K/obWLUykK/ +ErvY09QC7GH2OjGEWoCYSGwhpo4t4jnxlPy9pMif5GdqAGoBao7dtZP4LvFz +4vPFS6O1CRrlXnE/tW8za2b4brXPNP5c7R6NH9TnF+kzn4h3snaTx5+q7Uqu +QahtqKmoTe5BA4mfFZ8nfiB3vkVP9SU2i28RPyHuIb5fvKvIx334++I7xM+I +z03O99QHeCLniHflrg+oF8j/O8W3BtcLPcX3iXeKnxf3TvY4FhX6EK+OmDi7 +yEfESmLmnCIfEUtnqrXKrJHRyjOS4yGaFm07PXk/sKfZ27OS40fTIn/PIedm +rlmIj3OTYxkxkP0zOzl+NCvy7Shx9ayo2cn3ue8Nv4nfVjr3b+eecG8OzH1v +eaY82wNy3yvuOfd+X7XHM99j7vX+ue8N94x7NyK5lt1dMxMrxE0zeyJ4I1OT +4zseCl7KOHHtzB4K9SKatzd7Qf3s3PUF3s/3mq+b27PBu0HT433i+aDP12fW +l9Rrcwu9gJ6fmOy3HhXsx00SN2LvBPt3E5L92RrB/uTkZL1Uu/h7U5L1Cx4O +fsnYZK+ncpHvV+rvfZy5xrsLLZHs5VQq9MPo5OuvUOTb8cn+cPVg/25Msh9T +sdAH+6g9Jt4hvjN3Y8w9757sCeANoAHaJHsgAwr9hx7Dg0Hv9y/yBR4FXgX6 +H+8aTwZvBg8DbxuPp11wzUV9gL4bWOgl9Bz1A/U+Gg2tRn3SqsifaDX0TK9g +zYf2o+asVsRPalFq2BbBNT21LTVsyyJfflQ841OK/M2zxx/pG5yjyFXkP+qZ +AeK/omtY4nO9Il7jEeEV4Tnh/eLxnxZcg+P94+Hg5bCm8H7xyPDKqKnx+olH +j2h8U7AeJx4tjvYw1qt/KriG13+7axs8JrxSanS8J94xtA2ucXn3gKdF/dYn +c37G88L7uiCzd807hjbBngfvHuaITw32ND6L9qTOCK6J8arw8PDyqJm/L/I/ +9WJf8S/RnhneWb/MXjT5jLXFGkMP4AlUDa6h8Aqo+Y8J9hDwAm7PXS8/mLle +uU28Jbh+7oz2Fd8Q7Al1TPZPqEWpSfFTdmh+c7CH1gGtKr5RfL+4U3I+xY+t +ktm7vjm3X4IfhP+CJ4Y3hqZul+xx4XWhQdsm11PU4mgItAT1PfUimhxtjgdG +fUn9SL2P54b3Rr3ZUnyTeEOwJj892XMi37fIrNfQb8RaYi5aBM+pQbAewIvC +86gV7HHghZCT2cvsaWITmgBtQM7GS8GTKResGfBq8FBqBnsseCt4QicGeyp4 +RXgiTYLrObwSPA9iPTEf7YgndkKwJ4NXhsdVP9jjwfvCE6sX7AHhld0hvjk4 +hnRL9sgaB3s+eGd4LCcHe2p4L3gwzYM9NLwZPBRiHzGQ2nFv8aOZv5PvJr/j +gX1Q5NuSuZ89a4S18kLytXEPuZfkzDfEM6LzDTHsNfG06Nj2fPK185v4bXnu +tcAz49ntkfvZsWZYO8/p/GaZfzO//SD1X2fWDOiIErn9DdYka5M1RewcGb3W +nkl+FjxTnu1TRT5gT7A3Xkx+9qwR1goxlt9/SXTsfTZ5LXCPuFesKfLpqOjr +Zc1y70dEr+Wnk/caa4C1cK/6bzJrIDwAPJN/M/sPeClokrc1nh2dj9E474jn +ROffxcmxmRhNfY3melc8Nzpfo0neE8+L1irEFGLDIUWsQQO9L54frY2Ib/gP +pYv8tSTZD6Bmpp5bVuhp3iFSD+Dp4JccUMRDNNbrGk+P1gNLk/0F3vFRD7BG +WCsLorXa8uR6jnec1CeXJXvhvIOjPkFz4b3MjNYTC8Q9M3tc1EMvFfqJNc3a +fiV5b7Cn2Ft4bnnwO068ODytGPwOAa+LnE/uRxPwLg8PKwt+p4m3RcxCy46P +jmXEQLTehOjYSAxEH42LXu/3J9877iFeDhoDrYGm4F0gOb56ka+If48UeowY +QazAEywR7KHjFaJBahTxm3enDyZ7TXhMeE0fintlzhHkivvEe2b2qPCq6hb7 +t3ERn15O3vvEEGIJMR4tPLGI/Y+L62TOEeQKYjJ6bnQRqz9Izm1oBLTCk8m5 +nRxMLn4/OdeSA8mF7ybnMnIcue4d8VmZcxzr773k3EeOJleTM9CXY6P3KzHr +VfHUIpa9mhwriZHEyieScxkaA63xRnIsI4YRy95K1hpoDLTGm8mxDQ2CFnld +3D5zDCQWvpYce4m5xN63k7UJmgRtMj9Z+6CBqN/JKeS2wdG5Bg+Td3OVM9eL +VyfXftSA1LLzit+P54D3sCnZ28EjoR69Ntl/wSOh/r8mudalxqbWvjK59qZG +p1YfkPz+kDXD2hmY7OewPvAnLkiOJexR9ur1ye878ZSody9MXuvEHGLPRcl7 +gz3AXrg4ee+wZ9g7G5O9HDw4/JRByX4W73R5t3tDspeOx4q/sirZP+HfKOAf +bkjW4mhy/J2tybUpNSre+xXJtTM1NF7i5eI5mT0xvLE1yX4K78jxt7Yle728 +o+Fdzepk/4R37Phda5PrfTwLvIvrxKsye474MeuTvSg8BbyFq5LfR+Mp4C2s +S/YH8BTwD7Ynv//CY8Zr3iLemPkdCH7ZjcnvQningL/WP3kvE4OIRcOTtc/u +d9LiFcm1PDU9/suiZG2LxsX/3Cv3+kKDEW9K5dZiaDT269Bkbco7Yt4VH5w7 +PlHjEs/RrPsVuRAtOzjZz+SdNn7VJcnvMne/QxePTH6Xu/sdJPk0d/yjxiV/ +LEzWmmhO/NghyX4n78R5N7452RvAI8CP2zO3VkQDEj9XJvtd/BsE/OgyueMP +NTv54P8QiijI + "]], Polygon3DBox[CompressedData[" +1:eJwt13XUVWUWB+D7gXQjjUqMIBiESomEKCEpSijdOqSUIKDSYY/SUg4gMYRF +6FJAJJUSpVsFYQZQGDFHmGcvzh+/tfd+zv245557zvteSnTp92jfdKlUaplk +kHHpU6mraalUObnPvMPBkeySuYTcydax59mP5mJyO/uEbWYXzHdIZfYR28sy +q/XYY2y/fh/Lpj7MWrFD+v0su9qQtWaH9W+x+9Xe7DmWy/yNZGUNWEt2UP81 +y6LWZy3YAf00VlntwZ5hmc2fyxnzrVKevef4ctZGfZHNZuXNuyUdq82asN36 +7eyK+R6pxTayXSxNrcUasz36AyyX2oS1ZSf0B1lutSlrx47rl7En1ElsFitn +3iinzX+L68/ed/wlllOtyRqxY/oVrG0cY3NYBfNXcgOrw5qxvfo9LL36AGvK +vorPyXKoNVhDdlS/g/0vvm+px7aznewvc3Wpz75g29jP5rulJtvAtrL/mitK +DfYZO8tKqV3ZAHZF/zLLr9ZN7oPT+ufYf8xFpTRby15ld6rtWG92VX+BVVOH +sIksu/k1uYu1Z33YNf3rrJzagfVlqbhHpT4bx6ahouZ1cb3MmaUge8vxN1lF +tTPrH39qniz3JJ9jYDwf5n/Lbaw7G8R+1Z9nZdUnk3vtd/10ViWxISyL+Sdp +wMaz6ayIeYZUZU+xoSyreYrcy7ol75HRPFOqs15sBMsZ107KJPf4YPab/hJr +Gtc7uTdKmN+QCqwTe5qlM2+S8/HsSqXk2r8Q52guHs8w+5RNZZWSzxvvkck8 +XM6ZC8ezxFY7PiKujbmIlGJr2CvsJrUxa8PO6y+y2rF+sNdYXvMouWwuKXex +9Y5vYMfNNyX3xhI2lv1uLpuc81a2hV2MdUmqsI/ZZ+yE+Wa5jS1l/2Dl1Y6s +H0szj5Zf4zXxXLPNjo9hv5nLyL1sC1vPDpjzx3rH5rNzrHTyHcW98Yv+FLtZ +bct6sovxXbNrsd7Es8R2su9YseTejXv8R/3b7CF1EBvHCsZ5SAc2i61kd8f5 +SvtYG9kKVtE8Tx5kA9lYVsC8Rp6PtYJ9zlqa50odNoCNYfnjekrXeH+2ilUz +/yLt2Ey2PFlfvpA/zFXloeTaZ74hlRqmrmU72SNek2J92L/YemOdWJvZcPYR +28Was1XyNJvHPmT1zH1knzmX5GDzYu2PNT9myc7mxjPAvjZni7A5rC/bb84j +Odnb7J+srjqYjWeFzAPkiDldfJ9skeMfsn7qXPYBqxvnJofMV803ykLH57N6 +6jN8Aisce5HPNoJ9zHazR1l/OZwWN1kqlU95x/E/WLc4J7aaVY33lFv0+dir +cX3Mmfx7z+rXsB2ONYu9iA1g77LNrD4bJmfNhWK/YKscz+h1Q9XV7EvWNNZ1 +6cEWsLWseuxZXtefrWSbWAO2UBqx4ewVVsz8jjSOZzvOjxU3L5ImsXYnz2+s +Lxn8e4PZB2wbaxT3vPRmS9k69kDsT143iL3PtrKGbLE0Z6PYm6yU+ar0YkvY +p6x27DvSik1mi1jZ2HekZazd7B12e+xZ0pMtZp+wWuYr0ppNYYvZHeYv5U9z +NanLtjme3vkNVN9jW9jDXrNEHmWj2WRWOv5Ousf9wNaw+8wLpCEbxl5mt5i/ +je832ct6sQvxjLKj5hukAFvMhrLvzHljzWIr4/lhLWLNY1NZGfMxKchasq7s +jP4EK6y2Zt3ZWf1RVkBtwboke+1l1izWZDaXlTTPkhqsD3ue5Tbf6BpMin2d +HWMdWX72EtvOTrDOLB97MX4TsOOsE5sU9y+rkqwR8VuvW1xr85/Xt+PUVHYk +3kdtzjuyb/WHWV71EdaBndKfYSWTfSvW7Mv6iSyjWpk9yPbpv2fFk30/fgv8 +pD/NSiTrffwWuKT/gd2qdkn2+J/1J1kR9XHWg53TH2J51GasPTupP84Kqa1Y +N/ZD3O/s7+qMZJ2Me21CfEhWgd2v3aWfzWrGGsVeYHnimZSd5mup67+7p8ce +y3awv64vo6lprCfby7JIVjY71gHWOfY0toBVjvOQPeYMkjn5TbOUPRZ7GpvC +bjMPlpOxlsZezZbFesZOxbopRdly9iz7Pu362hRr1LuxN8U9aM6Ydv13U+zJ +Q+I+N+eOvZqtYLmc/Fh1IzvI2njNk7LLnBZ/z2bEc8a6qG+whayKOae/HRN7 +ODvAnmC52Xi2iR1m7eL7YRPYZnaEtY/7h02M3wTsKOvA5kgt1o+NTH5vZPO6 +kWwd+4a1YtnZqNjr2T7Wmq2UTux1Np9VMufwutFsA9vPHmerZQhblKw5se4+ +JbvN6SUTmxnrXrg6Pe36/7dqmv8P/OqjpQ== + "]]}, + Annotation[#, "Charting`Private`Tag$22545#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}}, { + {GrayLevel[0], Line3DBox[CompressedData[" +1:eJwt0csrpWEcwPF3nDnOHBxMs9IU2WmKrRRbKVZTNmPHaizYmqUVa8IfINYS +G7mf47aZ5D7jnia5Lhi3JD5PWXzfz1tP79vv6Vfa3P697UMURZ26V3i/0Yn6 +sqKokIMs4SgrOMcarrKBh2ziNVv5wl/Mi0VRN79ygN84zCqOs44ZTvKUj1rX +f11qyjAbnOYmZ7jFWW6HObjDef5hmn+Z4S4XuMdF7nOJB1zmIVd4xB7znvFJ +x7rTlVrMtcZGplnLMVZyiGXsZxG7mMMOPvvfz3AH/uA+6/mb1eEeLOcIiznh +u398UIFudaEv5svnZ6bCGfOYYi5zmcMkk0zwE+NMMMbssFPG+aqPYT/hLMwp +I0S9Hufv+38Df9xIqw== + "]]}, + {GrayLevel[0.2], + Line3DBox[{661, 952, 458, 660, 1046, 868, 662, 1047, 869, 663, 1048, + 870, 664, 1049, 871, 665, 1050, 872, 666, 1051, 873, 667, 958, 1129, + 668, 1052, 874, 669, 1053, 875, 670, 1054, 876, 671, 1055, 877, 672, + 1056, 878, 673, 1217, 953, 879, 954}], + Line3DBox[{675, 959, 1130, 674, 472, 676, 1057, 880, 677, 1058, 881, + 678, 1059, 882, 679, 1060, 883, 680, 1061, 884, 681, 960, 1131, 682, + 961, 1132, 683, 1062, 885, 684, 1063, 886, 685, 1064, 887, 686, 1065, + 888, 687, 1066, 889, 688}], + Line3DBox[{690, 962, 1133, 689, 963, 1134, 691, 487, 692, 1067, 890, + 693, 1068, 891, 694, 1069, 892, 695, 1070, 893, 696, 964, 1135, 697, + 965, 1136, 698, 966, 1137, 699, 1071, 894, 700, 1072, 895, 701, 1073, + 896, 702, 1074, 897, 703}], + Line3DBox[{705, 967, 1138, 704, 968, 1139, 706, 969, 1140, 707, 502, + 708, 1075, 898, 709, 1076, 899, 710, 1077, 900, 711, 970, 1141, 712, + 971, 1142, 713, 972, 1143, 714, 973, 1144, 715, 1078, 901, 716, 1079, + 902, 717, 1080, 903, 718}], + Line3DBox[{720, 974, 1145, 719, 975, 1146, 721, 976, 1147, 722, 977, + 1148, 723, 517, 724, 1081, 904, 725, 1082, 905, 726, 978, 1149, 727, + 979, 1150, 728, 980, 1151, 729, 981, 1152, 730, 982, 1153, 731, 1083, + 906, 732, 1084, 907, 733}], + Line3DBox[{735, 983, 1154, 734, 984, 1155, 736, 985, 1156, 737, 986, + 1157, 738, 987, 1158, 739, 532, 740, 1085, 908, 741, 988, 1159, 742, + 989, 1160, 743, 990, 1161, 744, 991, 1162, 745, 992, 1163, 746, 539, + 747, 1086, 909, 748}], + Line3DBox[{106, 347, 107, 348, 108, 349, 109, 350, 110, 351, 111, 352, + 112, 353, 113, 354, 114, 355, 115, 356, 116, 357, 117, 358, 118, 359, + 119, 360, 120}], + Line3DBox[{750, 993, 1164, 749, 994, 1165, 751, 995, 1166, 752, 996, + 1167, 753, 997, 1168, 754, 998, 1169, 755, 547, 756, 999, 1170, 757, + 1000, 1171, 758, 1001, 1172, 759, 1002, 1173, 760, 1003, 1174, 761, + 1004, 1175, 762, 554, 763}], + Line3DBox[{765, 555, 764, 1087, 910, 766, 1088, 911, 767, 1089, 912, + 768, 1090, 913, 769, 1091, 914, 770, 1092, 915, 771, 562, 772, 1093, + 916, 773, 1094, 917, 774, 1095, 918, 775, 1096, 919, 776, 1097, 920, + 777, 1098, 921, 778}], + Line3DBox[{780, 1005, 1176, 779, 570, 781, 1099, 922, 782, 1100, 923, + 783, 1101, 924, 784, 1102, 925, 785, 1103, 926, 786, 1006, 1177, 787, + 577, 788, 1104, 927, 789, 1105, 928, 790, 1106, 929, 791, 1107, 930, + 792, 1108, 931, 793}], + Line3DBox[{795, 1007, 1178, 794, 1008, 1179, 796, 585, 797, 1109, 932, + 798, 1110, 933, 799, 1111, 934, 800, 1112, 935, 801, 1009, 1180, 802, + 1010, 1181, 803, 592, 804, 1113, 936, 805, 1114, 937, 806, 1115, 938, + 807, 1116, 939, 808}], + Line3DBox[{810, 1011, 1182, 809, 1012, 1183, 811, 1013, 1184, 812, 600, + 813, 1117, 940, 814, 1118, 941, 815, 1119, 942, 816, 1014, 1185, 817, + 1015, 1186, 818, 1016, 1187, 819, 607, 820, 1120, 943, 821, 1121, + 944, 822, 1122, 945, 823}], + Line3DBox[{825, 1017, 1188, 824, 1018, 1189, 826, 1019, 1190, 827, + 1020, 1191, 828, 615, 829, 1123, 946, 830, 1124, 947, 831, 1021, 1192, + 832, 1022, 1193, 833, 1023, 1194, 834, 1024, 1195, 835, 622, 836, + 1125, 948, 837, 1126, 949, 838}], + Line3DBox[{840, 1025, 1196, 839, 1026, 1197, 841, 1027, 1198, 842, + 1028, 1199, 843, 1029, 1200, 844, 630, 845, 1127, 950, 846, 1030, + 1201, 847, 1031, 1202, 848, 1032, 1203, 849, 1033, 1204, 850, 1034, + 1205, 851, 637, 852, 1128, 951, 853}], + Line3DBox[{867, 957, 656, 866, 1216, 1045, 865, 1215, 1044, 864, 1214, + 1043, 863, 1213, 1042, 862, 1212, 1041, 861, 1211, 1040, 860, 645, + 859, 1210, 1039, 858, 1209, 1038, 857, 1208, 1037, 856, 1207, 1036, + 855, 1206, 1035, 854, 655, 955, 956}]}, + {GrayLevel[0.2], + Line3DBox[{251, 459, 1046, 252, 472, 278, 1134, 486, 292, 1139, 500, + 306, 1146, 514, 320, 1155, 528, 334, 1165, 542, 348, 556, 1087, 362, + 570, 376, 1179, 584, 390, 1183, 598, 404, 1189, 612, 418, 1197, 626, + 432, 1206, 640, 446}], + Line3DBox[{253, 460, 1047, 254, 473, 1057, 279, 487, 293, 1140, 501, + 307, 1147, 515, 321, 1156, 529, 335, 1166, 543, 349, 557, 1088, 363, + 571, 1099, 377, 585, 391, 1184, 599, 405, 1190, 613, 419, 1198, 627, + 433, 1207, 641, 447}], + Line3DBox[{255, 461, 1048, 256, 474, 1058, 280, 488, 1067, 294, 502, + 308, 1148, 516, 322, 1157, 530, 336, 1167, 544, 350, 558, 1089, 364, + 572, 1100, 378, 586, 1109, 392, 600, 406, 1191, 614, 420, 1199, 628, + 434, 1208, 642, 448}], + Line3DBox[{257, 462, 1049, 258, 475, 1059, 281, 489, 1068, 295, 503, + 1075, 309, 517, 323, 1158, 531, 337, 1168, 545, 351, 559, 1090, 365, + 573, 1101, 379, 587, 1110, 393, 601, 1117, 407, 615, 421, 1200, 629, + 435, 1209, 643, 449}], + Line3DBox[{259, 463, 1050, 260, 476, 1060, 282, 490, 1069, 296, 504, + 1076, 310, 518, 1081, 324, 532, 338, 1169, 546, 352, 560, 1091, 366, + 574, 1102, 380, 588, 1111, 394, 602, 1118, 408, 616, 1123, 422, 630, + 436, 1210, 644, 450}], + Line3DBox[{261, 464, 1051, 262, 477, 1061, 283, 491, 1070, 297, 505, + 1077, 311, 519, 1082, 325, 533, 1085, 339, 547, 353, 561, 1092, 367, + 575, 1103, 381, 589, 1112, 395, 603, 1119, 409, 617, 1124, 423, 631, + 1127, 437, 645, 451}], + Line3DBox[{8, 667, 23, 681, 38, 696, 53, 711, 68, 726, 83, 741, 98, + 756, 113, 771, 128, 786, 143, 801, 158, 816, 173, 831, 188, 846, 203, + 860, 218}], + Line3DBox[{263, 1129, 465, 264, 1131, 478, 284, 1135, 492, 298, 1141, + 506, 312, 1149, 520, 326, 1159, 534, 340, 1170, 548, 354, 562, 368, + 1177, 576, 382, 1180, 590, 396, 1185, 604, 410, 1192, 618, 424, 1201, + 632, 438, 1211, 646, 452}], + Line3DBox[{265, 466, 1052, 266, 1132, 479, 285, 1136, 493, 299, 1142, + 507, 313, 1150, 521, 327, 1160, 535, 341, 1171, 549, 355, 563, 1093, + 369, 577, 383, 1181, 591, 397, 1186, 605, 411, 1193, 619, 425, 1202, + 633, 439, 1212, 647, 453}], + Line3DBox[{267, 467, 1053, 268, 480, 1062, 286, 1137, 494, 300, 1143, + 508, 314, 1151, 522, 328, 1161, 536, 342, 1172, 550, 356, 564, 1094, + 370, 578, 1104, 384, 592, 398, 1187, 606, 412, 1194, 620, 426, 1203, + 634, 440, 1213, 648, 454}], + Line3DBox[{269, 468, 1054, 270, 481, 1063, 287, 495, 1071, 301, 1144, + 509, 315, 1152, 523, 329, 1162, 537, 343, 1173, 551, 357, 565, 1095, + 371, 579, 1105, 385, 593, 1113, 399, 607, 413, 1195, 621, 427, 1204, + 635, 441, 1214, 649, 455}], + Line3DBox[{271, 469, 1055, 272, 482, 1064, 288, 496, 1072, 302, 510, + 1078, 316, 1153, 524, 330, 1163, 538, 344, 1174, 552, 358, 566, 1096, + 372, 580, 1106, 386, 594, 1114, 400, 608, 1120, 414, 622, 428, 1205, + 636, 442, 1215, 650, 456}], + Line3DBox[{273, 470, 1056, 274, 483, 1065, 289, 497, 1073, 303, 511, + 1079, 317, 525, 1083, 331, 539, 345, 1175, 553, 359, 567, 1097, 373, + 581, 1107, 387, 595, 1115, 401, 609, 1121, 415, 623, 1125, 429, 637, + 443, 1216, 651, 457}], + Line3DBox[{275, 653, 1217, 654, 276, 484, 1066, 290, 498, 1074, 304, + 512, 1080, 318, 526, 1084, 332, 540, 1086, 346, 554, 360, 568, 1098, + 374, 582, 1108, 388, 596, 1116, 402, 610, 1122, 416, 624, 1126, 430, + 638, 1128, 444, 656, 657, 658}], + Line3DBox[{445, 639, 655, 431, 625, 1196, 417, 611, 1188, 403, 597, + 1182, 389, 583, 1178, 375, 569, 1176, 361, 555, 347, 541, 1164, 333, + 527, 1154, 319, 513, 1145, 305, 499, 1138, 291, 485, 1133, 277, 471, + 1130, 250, 458, 652, 659}]}, {}, {}}}, + VertexNormals->CompressedData[" +1:eJztnHtQU1cex6/gTCsRtYovfC9WrXRll4qRQqEtttj1iaWIWtDCZgTc8cGq +W5WdQDYoDx1WG4tVGx6lgNQWFCkVl1d1bQMCitAqUrE8JQmERxCFcLO79xfO +aZ2eTK8NDTs9+YeZz9w5+Z1PzvdnvPklcwJ2rBNZMAxTPJJhLP/7t1Avvv/2 +SmkBA4/wk/r/PTTudTp9etDxZMRP9wGf2KKvFPjnIn7vO+AO8fpPBZe/QvxW +KPAVzey0looqxGtXsxyP8NOX1TjdQ7y5sZ/jrici9iTXNiPuW93L8TF1kiPC +A22IB23r4vibkzyWBe/uRHxdj5rj5Yu2Crf1dCFuG93K8e/nbPddkI95hrWS +48UF+4+OkHYg/q/udo67nGvUzj17H/FJf3/A8VWFrU0qUQ3icz0HYJ0bVu2h +207mD3L40+FOPVPP1DP1TD1Tz9Qz9Uw9U8/UM/VMPVPP1DP1TD1Tz9Tz8PF8 +nxXHbL8qQ9evZcEPyX/kIW+f5FsliFeu0P8q65M4aX2+15PqX6wXV9ZlH8E+ +DXVeuTBZE9+Th7isEjjf60ke+K7Pt36+uSPVEzJgd2BmU+IgZ2L6gW9s39zt +dDsb8XdajPOugjXSaJfLiB/6yDifHSje97nvdcRLtaxR3tjOxnovvI14zsEB +ozyXrcs9XPc94n+06DfKPSsipuzJakH8dZdeo3zz/WOyuBmoPzCPstqM8sTn +5XkLj6P+wHSGKI3y6oOCv7xSifnvaluNcqcDWq0sET/vuzK1UT51e+aNuCbU +95iCp7uM8mlM8OLbZU2Iex97aJS/1ussjJz/LeL3WuB18UyxlC+aivnflANP +dA75niu+54Tv6873deT7upA8U5/UJ/VJfVKf1Cf1SX1Sn9Qn9Ul9Up/U56/p +Uz4wdm1tFPZ5ifr8WT6ptyfzRvNL+yH1SX1Sn9Qn9Ul9Up/UJ/VJfVKf1Cf1 +Ofx90vsepr1fRJq3IXFTrcN3/cfmP5nB+c/H5taYwbm1x+ZCGcJcKEOYC2UI +c6EMYS6UGZwLHfvjuVAm+KfnQpnBudCKH8+FMtN+ei6UIcyFMoS5UIYwF8oM +zoVSn6b1+dhcpeHRQT1Tz9Qz9Uw9U8/UM/VMPVPP1DP1TD1Tz9SzGTxTn0/m +s0bp0JB4KgddX1kPflw/3tET8/JVxJdIgV97anO37fmbiNuEgbfoMrbU5eFd +xOtf1nFc7Hc0XPEU9vZxCNy37LoqUf45TY2f176b46M/s3j0p39jD/F94Oew +x6oLf7iC+e8HgF932BAyrxT7SdwMfgRNqXmJua2Ih2X0cDxfI0oVLvsO8X1p +UOfs/AS3s7cyEM/Xwn53nK9ztSq4gvguGfCT8wtLVssqEa9IBQ9Bd9j+Yile +P+0ErB8wMym2wxHfvw3pAw9Lz0g8j91UIV7cDB4cRc+Pcy7F+/1EDfuVJwg9 +VozH50qggPvP58YHh0+/rER8XoWW45GCXdmvPIPP86ZeOM8ZjWNrOkTo+79M +aBXsS/varGTJ3huIj66AfQmbWPvlz9QiLlTDvtbcyXp/sn8j3q/0EcdXH5Sk +FOpxPcLTUM+0MZOm79yA62cdoH5vZ/vXT5RjDxNV4OGdKZnvbQ3H9+e/XgL1 +25ZU6UKv4fv/I+RQv1TFbir/EJ//oy5w/i/KipLcohsQ9xvVx/Ekf8mINntc +p+NKOCc2vm0Cmxp8PpezkOuXprf99YimHvEiEaxz90TS4TYR+n46o/CCeqxX +XD8ruoCvj42C6z90lPjb+uLzef4BPG+Djb139g98LjP4fH+BcMwFMf5co0QD +r0uWheSSpxT3gYunoA+UhM7w2XUN53Tku3B9Lc+8lxHyHkPIe4SZ8m5FyPsl +Qt6dwtS7e0U47zN6YL87CXk/Tch7CCHvgYS8O5so75mEvP+DkHc5Ie89hLwv +JeTdi5D3NTzzvo6Q9y2EvE8k5D2SkPc8Qt6TCXmfQMi7KyHvtTzzLifkvZ6Q +93ieeVcQ8v6mPqE77HQ04m/roc5XCZ/Tkd4nrCKsQ3p/a0H495T0+Wlpf9zJ +9GA54oE6uN77i/rGnKs4751BkHfi7yfovnWzGXUK8WcHYJ1jnXGWpZPOI35E +BXzBQUen2h14/RdnaDgeleEcZiXC69vXGP88129gVoM4PR7xG4bnFWsLJ2zx +zkLcRwM8r6Sw9OmLxYjvPwe830sSaTEV11NVBvVcmV/9knIxft5Xl6s4vjtd ++dUbtzF/r9T458uj2K2HVJ7o91IYkeH3Uja113kq7T7F7zO7gOdWO0yIWlKE ++BsFwAVsQVLVnnLcl6YArxamfOIl1eC87O/guE/KTr1iJK5zaQ7UP65EYbfu +HuZsHtTf3VxZdrEF17/vAVxvS/h8PJ3NtF/f8k/EGwz7Cuh2D7JJOIOvN/T5 +eUXuOWOC8hHXKoDPfEG81vXFa4iXLwU+V8Neqvkc5yW5DPIy92uPlfJv2hHX +2XVy3HP26OIzVbh+6zng/4wqXbyxBe83MAP2u9HrXOrdRZhb+MB+Mw/sihd0 +4vX3W8H6kawmIdI6Fr8uhtzZP0yIcrNNRdz/IXD1zVnLrANx/w8z9H+dyF3/ +EatAfPx64JPVrGqLxzeIbxwH/eR4pubLbCvcn9fshf5s91aDWrkA1xmjgDo/ +OJUmiU7BHopiwYObddSdgHa83y8/AA8b8uLElnsxH58NubONeMHvkA6fq32W +cK5S7qba6F3xnIYmDv5fVsGzn6QQ+oaM0DeeI/SNaELfCCD0h3Ce/UFnov5g +TegDW4a4D6w3UR/IMFPenzVT3hcSct1KyHUfIdcTh1mupxNynUbI9XCbBzPX +3Je59muu+cCh3tdQ12+qOk1VD9/n5bs+8ffTCNfTXBv3SfNO8/5L6hlueSfd +ByDN1fOdu+Y7n2+quW5TfS9gqOfMh/r7C+aakzfX9zJ+a/sl9ZPh9v0Ivv1k +qPvGcOsP/+994LeWd5pr478n/B+4YpXm + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{360.12108943216566`, 217.9928362642476}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, 2 Pi}, {0., 0.000029068220138466253`}}, {{ + 0, 3.141592653589793}, {0, 6.283185307179586}, {0., + 0.000029068220138466253`}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{-0.3229375965573488, -3.1772016615640193`, 1.1185262225288317`}, + + ViewVertical->{0.03342607536867222, 0.3288603845853228, + 0.9437868111686248}]], "Output", + CellChangeTimes->{3.8018867265286922`*^9, 3.801889740303474*^9}, + CellLabel-> + "Out[100]=",ExpressionUUID->"a2a5b14e-ccbd-48b5-8e14-35ea7371ffa1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Theta]2", "=", + RowBox[{"\[Pi]", "/", "2"}]}], ",", + RowBox[{"\[Phi]2", "=", + RowBox[{"\[Pi]", "/", "2"}]}], ",", + RowBox[{"R", "=", "0.2"}]}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"\[Psi]", "[", + RowBox[{ + RowBox[{"2", "R", " ", + RowBox[{"Cos", "[", + RowBox[{ + RowBox[{"\[Zeta]", "[", + RowBox[{ + "\[Theta]1", ",", "\[Theta]2", ",", "\[Phi]1", ",", "\[Phi]2"}], + "]"}], "/", "2"}], "]"}]}], ",", "R"}], "]"}], ")"}], "2"], ",", + + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Phi]1", ",", "0", ",", + RowBox[{"2", "\[Pi]"}]}], "}"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801889771616781*^9, 3.8018897720835733`*^9}, { + 3.8018898074616833`*^9, 3.801889808448044*^9}, {3.801889839275155*^9, + 3.801889839734996*^9}, {3.801890016361005*^9, 3.801890017053177*^9}}, + CellLabel-> + "In[106]:=",ExpressionUUID->"3145c817-fba8-4253-8ac9-2df1a740717a"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJyFnXVUlUsXxgGRrgOCHdh6xU68ymu3KDaCnShgByKg18QWUeRaqNgdKOo1 +MEGxO1EUFAvFRNDP4cwzM2wX6/vrrPVzmHfPMzN79qTOA/w9BhsZGBhk5jcw +yPf7t+XlpVs6lljYWP+7prHruYAhCZXstMVZF+6Wir3kBj77VrsBjLeffTu1 +ZOxDwT0jPPowXrH1xr13Ql8I/skuzpPxbe29/UvGvhG8r+GFHowvrzhv+f6M +D4IXXRfajfE724aOvxP6WfDwneW7Ml7IpXnXH87fBS+Yb1cXxnvtLlWrZGzW +H+kTI37Oca5ooNH8394bOWl/hqFG7bEu+mBoixP5NGq/i1ebHndC82u0vB1W +H2o5vLupRvXxf1yu7g9nc43qCZ31uj5089g9ZICqM/jFfzyOLbhpK3QGL5b6 +bmtAV1uhM/jLOx9beN+3ETqDRxm4l2/sZyN0BreKv+WxtpCN0Bn8UaP8BoOe +WgudwQ9H2Ya1vGwtdKbpoTPNHzpTe6AzeAq3HzrT8kJnqg90pnpCZ71+b9yS +Bjr3VXUGT2iVdv7jMKkz+K6tG6ozO6EzeMnkjQe/jbQWOoMfO3bg3fmxVkJn +8H8Gn3jksdJS6AwesmLzmrRsC6Ez+MkuY6pHnLEQOoMH8fTQmeYPnak90Jna +D53Bd/DyQmeqD3SmekJnvU6f3SyOdPJWdQZf0vPhoaOVpc7gbY8VL8DaD3QG +f5S1V1d1ipXQGXxD9LM9TAfoDN5+UKDTnvHmQmfwwOHvwnxNzYTO4OsO9arQ +sY2p0Jmmh840f+hM7YHO4A+4/dCZlhc6gy/i+kBnqid01uuR5VaE6AxedobB +EVVn8DIeBQqrOoMvS55XRNUZPKzbtBOqzuD+lvuqqjqDd0ovfFzVGfxwjPFg +VWdwd54eOtP8oTO1BzpT+6EzLS90Bi/N9YHOVE/orC+3oWY1KLffAK9X6Vii +6jfA24TMbKT6DXDHiwYXVb8BfmbjJ+sLit8AP5mx0bSL4jfAXQceu6b6DfDW +H3oPVf0GeH2eHjrT/KEzeBy3BzqDO3D7oTN4K15e6Axeh+sDname0Flfvt/+ +noyD4Kd+up9Rx0Fw9/igI+o4CO4V2KivOg6C16t0v5U6DoIvmuE+RR0Hwdtd +reKijoPg26sknVLHQZoeOtP8oTO1BzpT+6EzLS90pvpAZ6ondNaXw1ybTuI6 +yqEz5dCZcuhMOXSmHDpTDp0ph86UQ2fKoTPl0Jly6Ew5dKYcOlMOnfX2Wmn+ +jxb6qDqDr502Ov7xYKkzuGuDM65VVkmdwafdfb/tQYLUGbzfsgGPZqRLncHf +pz4yLmmlEzqDF/fsnv2pmE7oDN76bkrt1aV1QmeaHjrT/KEztQc6U/uhMy0v +dKb6QGeqJ3TW22Wnva5401fVGbxMQYvaT8OkzuCfZ9xMYnZCZ/DMtvfGlWis +EzqDJy2I+TV7ik7oDF4s1S84fbPUGbyS6ZkFF+OkzuAlesU6XrgodabpoTPN +HzpTe6AztR860/JCZ6oPdKZ6Qmf993Xajesb/VWdwR3ejd2wZYfUGbyXf9d8 +n3+3H+gMbtO9+9Snk6XO4H267F/MdIDO4N0PWc+v91XqDH4zrGO1y072Qmfw +xc7tp/Z2thc60/TQmeYPnak90JnaD53Be/PyQmeqD3SmekJn/XcctBdEZ/CL +h1tvVHUGD/G4YqzqDP6ra+dgVWfw69esw1SdwZeP3bZQ1Rn8Vlf7mqrO4OvO +FQtRdabpoTPNHzpTe6AztR860/JCZ/BErg90pnpCZ31+jlrBSrn9Bviwez51 +Vb8Bfr9VqReq3wCP+rg5QPUb4J/3bDWZo/gN8P6nqs5W/QZ4/hLZ4arfAD+w +okgJ1W/Q9NCZ5g+dqT3QmdoPnWl5oTO4D9cHOlM9obP+7wpqe8g4CL5hjnGi +Og6CN5s1ook6DoJvH1b6gDoOgg+vv/SlOg6CD7QI0KnjIPjRoYkWn5VxEDz0 +xaam6jhI00Nnmj90pvZAZ2o/dKblhc7g0Vwf6Ez1hM76fy+snSdxHXjgoa0+ +alwHvvLTej81rgN/P6XWGDWuAx87z2W8GteBb3rjM1GN68BLPLk8SY3rwCPn +tpqsxnU0PXSm+UNnag90pvZDZ1pe6Ez1gc5Uz8KpO4+Ujj3mpv+95DZ+zBqH +k4XttITpxSvfDb0leNXGe1yWZNhqqWfPX9+f8VTwkca19p6MsdVWN1za1yba +WKP8v0AD93WjTDSaz+P//BrX/NtMo99F/vrvv3A7lrz4du8AG214QsjiH86v +BHePHdLy2SlrbUJqsc3OFdMFn7XtZnh0Scn1+X1wM1nlUr5AloUWM/z7zBYn +MgTv1fh268rPzLWA9IWl9874+QdHen1+Blp2KafxanrKvWMPhqRZG2rgEw4X +asG+C67PL5927UTaUWbn1MwyowLvGQmus+s6kJULeoLfGOCWxnRAfX17fWtQ +zjg8Yb+jWl/gaSO6u6r1Bf56b6Vzan1Rjvqi+aC+6HdhT32/fc0WvLXQal4+ +2j2ygZ1ITznS6/+9kNb43KmeanrKkR7rzFPT+g5S/QDaT9LHgEc7zaXfAH/a +YeAgtb+AO3slH2LzSvQXmg/sod9FP6L5oz2gHY694eMSudFK1Dttn6h32p5R +L7T9oz3r+8F3t4sT6g9b/V62T/BQoz7L1tZAPX0V7Tn2y6fZPi7mvD4y/+BI +j3xqz6zg2bS3ifBjSP89w8qcrV8hH5oe5aX9DvpQO5Gelgv6IJ8Eu/WXfF2t +BEf6I3ZLXMYvtRT+AfwY4eiPKTvtnrJ8oCftp/DzyKdO/Wot2foedMZ6Wql9 +1Q2Xxsj1QJE+vNLZR0PzCz2R/1Rj75NMZ+iJ9LV4/tCTpodu9LvQDbxAwTd+ +LxrI9Uzk87Tm0zEjh8pygTeY4vw3q0fYD37tnWHTuw7mwm9Q/wM9qb+CntS/ +QTdwiyNab9Yv0H/hT+q/3fmU9TuM4+ADyp+4oPZTmh7+AePanPXhw9T4Af6k +lNvSYWr/pRz9neaD8Rr9sd3rS9uLP7QS4zX4wLezd7P1Q4zX4A6ejR93LCb7 +L9a9rUZW92L1BX3Ae+8b9XSJ0q7Q/m1t55qyekG7QvpKHWrdvRgs2w/lsB/5 +TLwU1oG1B7Qr+l20K2on+h34UyNf11fHZf9CO/zV+24LxlFe2j5hP/i4/qk2 +lxT7KUf8hvZTo07IF6Yn4jfwXSeLX2P6o/2DH6xneZvVF9Kj390undqOrScj +Pbh/8NmyTGfoRjnqneYzx2qBV82/v7mFWr4PZuVwsfQ9PnuiiXZh4fCG3W/8 +EHxvZ8fFLkVMNQtdyyIBPr8Er35qdP45p8y08m2aLgy899Gt9Vz7KKZT0X0m +X2YrnKYfdrGE77pRX0T68UuzfFn+sAe81l8VZjF7kJ7as6XDj3ZnTDP/SA/7 +af5IT8uLclH78V3hn9NGrv5+3US0c+RTMC1mMhtHYD/Se466frP2s/ziu5TD +Tpo/2hvsObF/hKfLcRPR3ihHetjzfX3wLDU95X8dmxhUPnaHm/73mNutCU6t +z5az08p3bHvEabeZRjnKK/QpFuHKyot89H/3O/6pXPnqRReZD+Vot7Rfm5jd +XJNm/cHNzLRuHPMr063/PXStnvT/dBxvGbpnqk30J5F+4Z26V899lftWdByB +f8B+x/ftqbdSDeR4iv3TQybd9zKO8Q751OPjjmOl+8Ym/xpoFxdc7MP80NS9 +Q24yO+G3oVvvnr6DmR+GDojHdrweOVidN6FcQbGWKWy/GHZSe+AHYM/HtT1/ +sfSwn5YL+qC+xg3+99v+V6aCoz2cq77Y5sBvnnblTuWXa7Lz5DQf1DvGnS5R +c4aq4xTqfVNtPUd6qgPSU92gJ80HetLvYlyg4zU49PGLaLZ5ZBNLMS5Az+c8 +vkK9gKdznaPbLMm6HGLI26mh9tLhk53hMTmO0HgP9UXrV99u3rmdm9ErmdXb +jY2DPxj8zgfjKY3DwdEezt/oM4nZD7+KfBpdeJ7V8rSFqC+0z03FR2WxfgH7 +6XdhDy0X2gn80vGXMfVrH5ftgXL4T+TzdFjDiq1+24Pvwp4hAxfGFHsp9z1R +X/v5eId89OUz0rLnFD3c2lHGz3S8ruPT+tOKIUYi/4FuofMfRlpq7gFvvmc5 +x4vzMOWf9F/t99xWs8ifaZblfE+0w+jUTjn7nuBI3/rybL/gcbbahJSghMB7 +z0T6I80KebH04Ei/ynt0u4pmttow3h6QvrJ5i14sPTjSt3hTKqbDRhvNc9f0 +7gE+70X6lKz07iw9ONLHzzNcUbqjjah3pA/YUCPn3BQ40mubnIOuWthoJRs2 ++3A0W57XahFRMOf8FTjS9wwd4mHwxFrTlWxxyLVl1h/pwWl61Be1B5zaM23a +huNereT5LpQXnJYX9U71BEf65lzPyWM3Oq8aYazR+gJH+kheX+PflL1xNFue +H0N7AKftYfTg6BkPFslzZWfuX83ZzwWn7Q3tEP03vsdBk1azZDsEr9N5fPfX +O2xEuwIP9z1zekyitWg/4O+uVPHol24l6hHc7H1Sp5NfLER9gZtwjnoBNxrz +PXHSGEuhP3j9AztPri0u+x39LvQEX8bthG7gtXm5oA/VAfogPjfMqn33trvU +B9xroHV2bC2pD/imQZEe0w2lPuBa57b95//2Y9ABfOj6X2VnvpD+CrzrvC8/ +SjmZCx3Ax2R67U3xsRDlBY/m30V5xXyE24nygv/6oS8Xygs/Vn59gftqecE3 +9HE3PKKUF9zC+lcv9l2UCzyifQcPtVzgF/p8KOislAv8wBDdabVcNH+Ui9qD +colzTdx+lEucS8m+ZKm2c/CZlcP6q+0c3HzRx1tqOwd/eyhgJGtv8G/ga69U +zmTtFu0fPKvrqBlq+wfP5Bz6gBdsOe5OX1/Z/sH/SktLVts/eBq3B7qBm3D7 +oRv4dF5e6Aau4/pAN5wPSdzWd6M6ToHvcMoIVMcjcV7l+/j+6rgDnnB93g11 +fAGf9Ff5o+o4Ah5059xmdbwAv9PwdLA6LlAOPWk+0JN+F3pSO6EnLRf0pDpA +T6ob9KTnQKAn5dCTcuhJOfSkHHpSDj0ph55/2Mn1pBx6Ug49KYeelENPyqEn +5dAT5z0Ku4Q38uoj9QTvMs//ccRCqSf4ucAnSb1ipZ7go+pWar7nkdQTPOZG +9R2PM6We4AHGWdO72umEnuDPhrc23lZcJ/SkHHrSfKAn/S70pHZCT1ou6El1 +gJ5UN+iJcx1evZr1XjNL6gke8irqc+97Uk/wwyE9Hhk764Se4L5vWrne8NIJ +PcG77/63WrX5OqEneMlqxs0275J6gg/bG1fi9WmpJ+XQk+YDPel3oSe1E3rS +ckFPqgP0pLpBT5zf2G6R+bD9KqknuKm71+unBjqhJ3jo2vArZj2knuAxN41n +d18j9QR/UP+zzbjbUk/w8e8e1S7+S+oJPq+Fzb2SheyFnpRDT5oP9KTfhZ7U +Tugp8uflgp7g5lwH6El1g544p2Hz94FHqp7gDjt2vlH1BLdd1u+aqif4sLBq +c1U9wacsHKZT9QRPGTGjnqqnsGfDjQeqnpRDT5oP9AQP5N+FntRO6EnLBT2p +DtAT3I7rBj1xHqNPvp7ean8Hb/RmzHe1v4Mvtw9/pvZ38IvXtmhqfwcvvuJB +XbW/g4f2fNZW7e/gDRMNKqj9nXLoSfOBnuAl+HehJ7UTetJyQU/wxlwH6Ane +j+sGPXHuosWNg5o6HoE/ONf5uToegZ+5UfyVOh6JcyadPDuq4xF4hQqvDqnj +EXjs08uL1PEIfPyKCzp1PKIcetJ8oCf9LvSkdkJPWi7oCf6Q6wA9wVty3aAn +1tPc9pX1UeMlcI/ojb5qvARerc2jUWq8BL73nz1j1XgJPGWR8QQ1XgJv/ur0 +RDVeAvf99GiSGi9RDj1pPtCTfhd6UjuhJy0X9KQ6QDf97z03h2LWPdq+kXG7 +1TfbovdCb7lFL73yOv9GGbdfGF/r74MZ19zafR9we3OwjNt1fF++xZJXvq/6 +2Qrdljz7lHU/9KxbMZeEHZOm2grdyvL10nVunUPMDtkK3VoPsTSpGrvD7ee1 +62PGG0rdOnE7U53SC2yrZiN0s+N2hu2stcVrs4zbE7mdk3sWjmhc1lbohvMD +Hr6nMr8tl/F2lZbDvi14m+YWvW2WqTrv0/++cqvTb5HD9fNy3vfy9LzCPt1T +3cKTu9nkqyfnHcNOXO9dumKS28ok+1kJU+W8A/mfjahd/EsPS2G/Jc9/SrHw +mV9KWAn703j+BXZbVdn1yUrU41yDJu0OZDx1a33Cd29ELzmPGMK/23b+4lXq +PCKiwttYtg46sfzWXOsSpnzfofITu1Otmsly6X8/uu1Y3b5417rSfuRz0Sr9 +6ptOZsJ+7F94dN5a7e12OU+fyPPxfXz/wtwsOU/vEW33gO2TLKpt/31dhJxv +Yl138K3RS71Xy/mmz4Xmd9j6bheXJrnWW4pU2TSR7TuVJusPc/n6/4ku5wzU +9YdvafXmsP2ru8tK91TXH4ryfAyjCm5OXGwq7P/O00/dZXG8ei1p/72t8RFs +f+z2wwld1XUG7C9ofstzrZ8cGtZ7K9t/y5eVe/2kY8TuIldCDLUV13vmWmfA ++rPWZOMqpgPs/2/it9Js3+ZI8dZmURHSfuQTOm9QYsJcaWfvnP73y61H0NYK +rB5hZwJfZ37ZqvE5Vu+ws4FvgaFsXTzq0pxc6yGLisz//rFgfu1Nj4Ubcq0/ +56yvG2ttnDueYO0Qdv78ftOwck1jrc6roFZeS2W/eHx4iH3EECNt2MOT7qz9 +w37kP+LAmAOsv4j1WJ5/+5KtX6/qYy3qBflXjkx53G6sLBfW21NK1i/J+inK +he9+dF9jpbafq6uG3WX7MKs/tr5+vpwcL/T7n2Zaw5/Xp8Xr5HjhFrg3qUO8 +qbZ3y8Pznx9Jv/eVn4vYM6Ow0/fl0u/t7p35ckayibbR70ws8z/we0Nz9mNN +tB0msVeYv4I++t/82rPUck2Yf4M+sDNwVPxM5g+hD+y87Z0vmvlP6KNxO++2 +6XGZ+Vv4PZzfKPFgaCjzz9BB/x0r7UyBMzsSPaUO+n1dS23+w71nw4KlDiE/ +F5wY3c9SO/WhWY3xC+W4ifNmo3e+i6qwQI6b6Y9un98SYKFZZjxx3hYkx039 +frKFNnx7DavwIXLc7PdfyatPlplrR1u3Pvm8tfT/sHNbasC2RT+lDvHczmUl +Wzyae0OOm9O4nS6bL6b/jJbjJuyc7n7QrEuAHDdh5+zOTk67u8pxE3a2GV8/ ++Ep9OW56RDkv7/O7HbzZfd9TjYf1dv0ez8788HyQKHU7FeKzJvyrjeYxSLd2 +oKGMhyfn7O/ZaNVrdblVo4yMh2v027/pks5GG1KrgmuHOjIefpWzf2Wt/edf +sEJCAxm/Rbll7cpXxVrLjh3Q70pNGb/Bzg79t8Sd3SXjN9j58PTLNTVmyvgt +jtu5yT066mRnGQ8HcDt3vi++tXNBGQ/Dziory5X8cVfqBjsP7HGcXDhSxm+w +c+7t7FzrCfG6YNcmR3Sa3+cTuea/+v03ndbu3jTbPZlST729Oi16c3Rcn5ZS +T/3+s06r4n7OaHyI1LPBh/NNJ92000Y26nHz1Vapp34/3E5re33I682npZ4f ++r05F9b/9/csDs5bfVnqCTunvik60tdazteEne2mzC+WJvWEnWe3NfCJPSz1 +hJ1fR886fiBA6gk710xqlbarhpxfwM6/+wZeW/BE6gk7V/pNzbWe8MrjbaUb +Mx00KzL/PRv663W/9g7a4MmTcs1/o+J0u97ZO2hPg65fVee/envttXSHmnPU ++W+vmnVrWqyz18b+em+rzn/1+5n2WszjhXXU+a9uvWdMORd7zcVzWK71BNg5 +cuHkXPNf2Bk95UZddf4LO5+f97VT57+ws2pXoznq/Bd2xh4oc1Wd/8LOw9OW +5FpPgJ07yXqC+bLehQd3dtQiCi3NNf99cdH3wceCjprToLSbrF5Ef88Xsjrk +cQEtPGbCO1aP0FN/zrSAljk9O47VO/TU21tA2/JXpB9rJ9Cz2/aY5Eo1C2g1 +SwQvZu0KetZIvhB96JuDVsM7zJ+1Q+gJOws5NAlj7RZ6ws7Gm1I/sHYOPWHn +h+9b77F+AT1hp+uz+yasH0FP2KlLDzrL+h30hJ2utevqWD+FnrDzdvmAXOsJ +lW7Fm30tVlDbF1iiiTr/zW/9MGFGspNm1Xt7EPMb0PNp83fz7bc5ad6rppVn +fgZ66s9NO2kzHVfvZX4Jeq48YK+rWs9JC7p+aBvzY9BTb6+j9s3HaQvze9Cz +c9l64W3OOGpfui+9yPwk9ISdR6zr+TK/Cj1hZ7srkTWZH4aesPPca6vmzG9D +T9h51WrII+bnoSfs/NmmRjQbF6An7LTuWbgvG0egJ+zM6PXeS+3v7Zzqf5vz +spBW5Wi1IcddpJ44f7KqV8NZbPyCnkazvAI3ji+kXQl+WZKNd9AT5zNtMzcX +YOMj9DzyOcTgpFEhzSCwzE82nkLPcJewuA7xBbWlbu6v2fgLPfX2FtS+bl91 +mI3X0BN2vn5ifp2N79CzArdzxLxmxVg8AD1hp3XDhGosfoCesLPK/QE7WbwB +PWFn2dX2riw+EftZ3M4l9kcvsngGunXi8824wHWX1TiwFp+fHu4dHqDGgVF8 +PnuxXat9LA7Ed1fkwS/zeWhbPl+GPVVI/uA2ZN6Neq/O7TzN7QTvQubvsHNH +k92uLU8ku53vN7wmi8NRvxfIuXfwS4Sj3jfxfKy1jFgWb4O/4/NTBz4/Be/G +53e+6+LnWXhZSv9G5oNoP3T+iPaA+eC7a23Djv8n0+OcTF2n551ZenDMm/qE +eh9n6ZEPTY925cXnR+8W3Jha6KOF4H73ilv0b59Ps27g24mVC/UInnzMvzSb +74PT+Q7aFeL52Ucc+6jrKsN4/L860idTXVfZw+cLczb6vWHtBPmDzyZcI/MR +tB/kv4rnD475wt98XoP2Q+0Ep/MjlAvxuZ/ZvAHMzyB9XpzOL5AP/IPF3Yzd +jCM9uCXh1L8hH3qOBRzrPGev5xuxz1r2L/CKifFjbJ/L8tL0aD9Yb9E6ljqp +zkO3kX4hziFwfo73O/A0sl4k9rX5esI0o4FH2DoD+A+y/gC/OpKvh3R8nxnB +5vvgdH0G/hbpO/D04DjXt/XTuS1rBsp+0Z3335G8/4LfI3bCbwwj9z7AffLg +9D5IXhw6ePJ++t+TfcnMb4Cf4Osh1YeYbGd2Qgec65usu/yhjI2p8A/0PAnS +u/J1j94Ht/1kuoFjXWUeX1eBbsh/Es8fHPl48nzwXZTr/dYfYy+WlfUFHupd +/RHTX6xLcz/znPsZ6EPvfeTFoY8v8WPgv7i/+ouvn8BOrJ+8uD1mL1uHFOf0 +yDoM+hfWE6Ldd/vl9Bfu38DLx4dOU/sXTQ/+x7o973c4R9r3yb9vep+U66Lg +jaY08cqsKfsduEeTwIi7A2T/ouegUC56bgr1ktc5K/SXYfnrtGP1CP3peU58 +l55TQv7gK/l5J9Q76nHECvedzP7/V7/gZiH1pjEdUC7wpG/RhbxOynpHu73s +XNb5YVmpA3jWySUPj66X67qUQ3+aD9o/1lc/Ni/9+r8apqK8WP/8PvVzCFtf +Bb/P/Um3F4731fR0PRYc+Wfw/PFdmj848u/K80d5aT0if+oPoQPtv9CTnjPE +d5F+Lu/X0A35DypT7vbAMrKdIH23fVsyVI5zVlX4OS7kg/RdeXrw49wfVuP+ +EBx+LP2J79hxj6UfTiHnvcFfEg578rLfn48vZ295d2b5Q2c6boLT/Q5w6Bld +zHa7ep5tJMlf7G+SciE9/HCjRv/ZGy6RcSD6xWPeL3A+H/tfX26/yPX+JLj7 +nhZvvMfJ96DAKxq+qDXD3Fackwd/UWri15fb5HtQ4B8OPcrO7ivfgwKf3cTG +ka334n4KeKuqK7ull7AR9zhoepw/p/nj/D+1B/fjwMtz+3EfEPtcCd2NZ977 +x1boA/5fzMe+qj7gFpO/dEzcLN8lA+/c7/C9zhfku2TgBzv8Gzj4o3yXDHzw +T+Mf5RpYCX3ACxr++nIhxlLoA954c+H4fLMthT7gTjw97h2Dm3E7cZ+Rlhf3 +OGh5oQ/2xVoufept11TqA37k+09vVR/wTp+vPK7jJPUBr+vgYnv/lnwPDbwO +57Af3J3nA/vBW3B7YD+1B/YjTvP0e3eYvVMH+8Ht+Tt1sB+8rulKJ/V9P/D6 +6SWc1Pf9wOn9PnDc40P9guOeL+oRHPdz0c5pPmjn9LvQE7wetxN60nJBT/Ce +XB/oSfWBnohLLZ8N6a+2B/BbpD2Ajz59PEVtD+CDjhwqxuodeoJ7Jg54z84J +Q09w4+G3+mdXlvfLwIMi1q4qWUTeLwZPWBeXUCfKTOgMHsjTQ2eaP3QG78nt +gc7UfugMPoqXFzqDm3PdoDPVDTojLl1Zov881S+BvyV+CTz0+mkv1S+Blwk5 +mbThjPRL4LE15/qzc9HQGfyI412/w67SL4EHBUVUjFf8ErizQXa26pfAp/L0 +0JnmD53Bn+T3W8X8JHQGH/zVNp35VegMPpeXFzqDR3DdxL02oht0xjrAzs/2 +zZs8lzqD+9V8lWt8BF+WZBMUrIyP4KODPrVXx0fwveFTC71SxkfwNS1mlPup +jI90PxQ6g8fcbfqPOj7S9NCZ5g+dqT3QmdoPncHPRSVmsXgAOlPdoDPVDTpj +PaThNvuc/S/oDL7E0yrXuzrgyRYNDZIWyHd1wJvU7T89Nka+qwO+MXLmwp13 +5H1V8FP/6EbffC/f1aH7qtAZ3LZ74QfT88n3i2h66Ezzh87UHuhM7YfOtLzQ +meoGnaluIp7h+5txHwau7DdH6gxuddvIN1c8w7nJmE6H/B5IncG93vWJ6+As +3+MCD1nkXO98T/keF3jnzQmlskLkO1HgKf9uedVtpXwnCvzV4RneU6OkzjQ9 +dKb5Q2dqD3Sm9ou4iJRXxEVENxEXEd2gM/Y3Jzfacc97g9QZvFjYFz9VZ/Bx +Ewd9aWsl35cDTxldwXPSQKkzuPvcrq72W6TO4Folj9TAe1Jn8AJrj9Ts8FXq +DD7YaXzd5obyfTmaHjrT/KEztQc6U/uhM/h4Xl7oTHWDzlQ36Iz9Tf8uj3Pe +/YPO4A/5e3TQGfxNki7XO37gs251CVLf8QOPWJq0RH3HD3yCo9cC9R0/8K7j +9lRX3/EDLzTuQJD6jh9ND51p/tCZ2gOdqf3QGfwdLy90Bh/FdYPOVDfojP1N +k5mOD9T2DF6ftGfw6bveflPbM3ixq0u81fYMHtxiWGO1PYPH2T18rbZn8Fb9 +Quup7Rnc7HPvhmp7pumhM80fOlN7oDO1HzrT8kJnYQ/XDTpT3aAz9jfrtdCt +Uv0zeCPin8HHFax1TPXP4GUXm8Sr/hn8+vUybqp/Bl8fdqqS6p/Bx1SvkaH6 +Z/DK2xsNVf0zTQ+daf7QmdoDnan90JmWFzqDN+C6QWeqG3TGfkpQ1dic89LQ +E9xmnL2pGleAF5j3fJ4aV4AnrC8XqcYV4DvK1w9S4wrwLcsXHFbjCnCrzIBX +alxB00NPmj/0pPZAT2o/9KTlhZ7gIVwf6CnsjLHNiSv+yjm/e1+swyT9/aSt +Fmir6fddngtunhxXaoLOVtOfT30teMLGOt/YOox+PU6uCzW18/3J1m305yDl +ulDFxkNz1nn0+3DfBE/peShnXUh/ruuX4J2OzshZ/9GfT5LrP8supH5h39Wf +s5HrP02mls9Z/9GfF8kv+Kh3J/6y8rXV9OceTAUf9HFrRMeHtnwfzkzwousO +5OxH688TJ4t1GL/kIi23ZVhr+vO4aYKbHF1Q5FYRa/FeCnh+s4QGgV7y3Q/w +gDrmQ5pesxTv0oC3sulR9uI8+a4FeNT+5nEx8Vaa/vxQPsHrXc4f5LvCWtOf +g5HrQgdaRubrMM5G05/nMBF8rf+IkzcH2or3OsD7904OelXYTtOvR6eJ9RzD +uvvyd3htqenPiX4VPKP8Zf+BB8z4uSW5znPZMuXR6rZW/PyNseD3ffZcPXrQ +mp8jMRE806lCtNVzG34ewkzwSadX/VrxQ74riPWK4AoDHdtUtRbvCop1j1K2 +qbazbMS7W+D9Uxo3qHjClp9HMRHz8YSmN1Y1+K2P/lyFmeBrvFcWtY601Yby +94Uwr1ze7Wyi4T5LTX8uRM5Dd08Iaffvht/zKd6PaJyPfkTnBehHdB6BfkTn +HehHdJ6CfkTnNehH4HE8H/Qj+l30I2on+hEtF/oRnb+gH4GvKxw5mO1rm6Ef +8Xg71KRrSpSjTgtFP+J8TtKMNC93nexHnPtef73cMUCntUI/4twzOHREqXCd +7Eec91m5zt1hnU72I84HDTI4tbOvTvYjzruu/mFzuLJO9iPO7/bqHVYk1U72 +I863rj38OSPcTquAfsR5oeCjM9h5JPQjxL31FzfZZLFEp+nPu6cLnmDqe+jW +BR0/b/FJcNv9ntYN3+r4eYivgm8tOPmfF9k60e/As31c3wX/1gf9DjymScqC +QZV0ot+Bbyk/ybXoOTvR78BHX2r7fWlnO208f78I8WRA8q5Fho904t0bcCcT +uydGpvbaV/7OFbjrzoN3ChSzF/0XvNVN+yYj2ulE/wUvsOzyjcvP5bt54IH9 +5s9tMMKOn1PJEHFgyNjhukXJOk1/Hv2L4K98w9O2Z+pEfwcvGD18xYJXdqK/ +i/RGj9zDp9iJ/o54I3VRBcOTkTrR38ED74/9p/dkO01/vmqVGx0v9PdkrrrR +8UW/3/PYjY5H2C+m95XO55wTSpL7C9yfe2N/jZw78uf6gN8+73bM8ry5VjPn +HPNPwUu3WVV0yghzzZenh99bWXRqMkv/i7dD8GsFerRi6WvwfMA7lzx9+NtI +c+10zrnqn3/koz/vK9ddvx84YZWx0kK80wX/eeHe+f5sfMR7QeA+nhvrs/EU +/RR8qW/lFep4B75g9DMHpo/G6wXrVEOfNrii1gu4ZeS1KLVewCf8M7wRqxf4 +Pcrh92g+8Hv0u7CH+sPqnCMeu7GiaM75H+RDOeJetJPWXj8asnU5xIHg3sYj +fYOVdTyaHnEg3R/E+1Fob5N5fIL6ovEM6ovGP3j3DOMv3l/Ni8OfgOMd17z4 +Ht7f0Z59umS0fZ1spn3IueeQ+Ud8gvf3kA/elc2Li/fleD6enc+OYPsIeK+P +ps+Lo/0jn0Idm5SeEinfyaTlyovj3TmqW15cfy7cSKPxG86XIj3euc2L++Rx +DuoHH9eEf7izoxDL/wQf18BrWwe7sfKiHsFbnC3Ws/kKc+G3xf6R26VgVo9N ++Hgn9qE+zNrK6vE9r1/K9fdhfvyRD/Sk34Vu4MUXL1g056IFv6eXJOK9hdyf +ID6hfgnxCfVjiPPB1y8MWs76EdYB6PxLrH/yfjS04rnm6r4JuF23Eu5sH0es +f3K+cs2HeLbvI94f5vVu1mnXWFau/9fvRDt/kFWV6ZNXvxPv+vL0tRtMXcT2 +3cS7xJx3n2/80CjOTL4/TLh4BxLj18dEN7YfJ94/J/b8v35By5tXvxDvCmL/ +OrHAlvlFrfJs/3g/EO1k5MqmR1h66EnbD3QAP/LvL4d8ig6U57WPDJ3FvIa/ +/5wXz2sfGe+jiv7L3y9FnCz2zck7qJTjHVSaT17+My9/mJf94n1p0h4QJ4Of +7fr83cff8YM7nx+BZ49cYbTWXXmPmvjtbB7PgH8KnTWfxS2YT4GfeRE18mhd +6R/EucE6ry60XCzrXcyje4ZvYFx/T0nGOdU+bijD7BHvVfL8Z487dZftLyN/ +mg/yp9+9nce5As88zhVgHEc+Udz/oB+B/12p6bR8GZZivID9GyYk1o1OsxTz +C/BOU/zfs3m9eO+UlAvnnSzIOSj4E/DVN557sO+uz7kvly36hd+l1quY/vCf +KBd935JyzGeRz7ZpGfcPaXJcAx/B+6/+HpTk2/w/nC0YKe/tIi7CfXzLnHsL +Z4X9IdZlWrH5PvoFuFXkqX/Z+oC4h0h00L8vcEro1iyuaRG2zqC/b39H8MhR +oSvYukQIH9donHOKx9s0zhfn6Mi8wJa/Zw7dimV1cmXrIRf4/+8g+nu3SS/Z ++kkKf6cd/P2VrgXZeov+vYODor4cJ100jPhhq23OORd+Q/B9Azy2s/Uc/Xnr +p/L8xq9LD9j6D861guMed2m8V8zb51OL5GC2HqU/b3dN8EbX3lxg61fwV+Dm +la72ZOtmh3POTab8sV+vPz/39o/9ev096o9/7Nfrz/3/uS8fxdst3ZeHHwBf +zfNBe6PftUW74usGMa23T2Pzyni0K85HH53/9cTveWgibz+Yp5c17pkzb03j +7Qe8+cKIcDbPRVwEfnV1zAs2L47j7Qe8heM+KzaPLsTbCebdV85+yZl3x/N2 +At52nfNNNk9HOwGv8swjZ17fgPt/8JoNd+esA8D/gB/8J+sxWzeAPwRfdmZB +zjrDCt7eME/v7lgtk61LbOXtDXzUwpV/s3UMtDfwBQsNlrB1j7s552VfCj5l +ov1Htk6SzuNJ8CGpneawdRXMl8FDs7N0bB0G8Tz4ysrbjrJ1G/hP8FJrUrey +dR68q4x1g0xt3Uy2LoT2DL7W+K/vbB0J8Se4zdWkCLbupH9/IVVwhxmlndg6 +VQJ/Hxi803nveLauhX4BHtOuVS+2DvaK+0/wYr0ejmPrZpjfgZdZO3stW2fD +/A782WPTj2xdTn8f0ljw0Ds937B1vKF8fo34tnT3+jn3H334/Br8+4wZOfsU +h3g/BTdObDafrTc24P0U/ENH35x9EPRT8MyNg3L2TdBPwf97PiJn/2Ud76fg +vQr1z9l/QT8FnxmQPpXlg34Kfr/fuZXsu/p7nnL/pVLAmJz9l0459xXl/otP ++zATVi6kxzhiyvdNOvP0dJ+lDa9fup5/idcvXf+fzv08/CfueWGdE/6wzb73 +z1l61Bd4htM6T7Z/gfVq+KUve8d5qvs+4CfnfqvP7Ee5KEe5wD/zfPBdum9y +m/dH2O/B4wqsD8POT9xOtH/wML7+g/exwdvy8t7NI17qmUe8dJ/bg3HzCt+/ +wL0P1NeEPX/tbDpf3msDv51yanJ2NfluBvhMR4eN427I+xrg1jsqDUsMle98 +gpcLr1Spmod8NwPcaKH/0JYu8l0g8LStlcOcesl3gcB3BZg3nRYu3/MEn2PV +Zva3JHlvC/wWtx/3yPIqL+pROxbw+bqDvMch4tgzbdo795L3OMBLmbzd93OH +fA9Zxr31t67ZLeM0mg/sBHfj34Wd4ItLXRgXkCLfRQGPH3LltEuUrBfU78tS +l0Z/LiLvP4L/DHDsVNVLvrsC3m/VifPzhsn8wQ/WcQ36a6i8t4h2tbPw0m7q ++zngMQ43f6rv54i4a77RPfYuDdKjX+zwvWSR3FWmB085OHHtoL7yXSm0f4u0 +qlMGH7AU6cE3JowacSRM3tPEOmT6fjsPp9ny/i+4f8fum6y3y3vT4NWXRRZd +GC/vTYNn3uvibfpM3psG77Cu2nvzT/LetMj/68i9zX/J+1DgpktLVX//Qd6P +Bp/jP6jQssfyfjT4wb/bf757Rt6PBp91v9PhetHyXiR4llfKhvYhsryIr+J9 +b+x/ZynfMQC/sihx9u+vyfbM+Zc9JkP9hst792L/6H3f5/tmy3v34OVabg4Y +Hynv0YPP8/961XWwvEcPbv1u32h7V3mPHrxI2UeVaxvLe/TgS24Xv9TijLx3 +Bv6j1uqTxafIekS8tzD91sC3s2W5wC/5LT985KgsF3i/fqUXD3gqywV+sVPA +wzXfpP3gmy02VV/9j7QffODRITvWatJ+8NI9Rj6uly7tB9d51nQwCpPtDfFh +E/eGduq7HODnrOvWVd/lAF8QN/o+e38D9oCvKDAw17sZ4NNc03O9mwG+/3ab +nHce8F3Ee683L9pdK0l+F3yq7cILI7/J/MFfeGjWpT/L8oJn7zIyKrpc9hfE +Vy79qmRaREp7wO8virN9HGKX57wV9xnhD8vtcxjC/ADSgy/p0K8N8xtIL+5f +rN+xivkZ+A3wO6uijJlfQnqxzqZrdU99rwy8za45v9T34cENe5r2YH4S+cC/ +WRtMmcb8KvIB/3Dl+2Xmh5EP+P3kyl7Mb0/LIy7Ka76J78JPTvg4Op6NF+J9 +Cc7PBV4LYeMLvgv+7850sxvKOAj+a2DqUDZ+QWdwt1HtH7DxDnaCFxz35jYb +H9GPwH/yfGC/uC/Avws7EXdtvLvrqDpeg2c/vLBIjU/Am7tV28jiAfQvcV/+ +jedgFj+gnYM7vj9xlMUbKJc4B97lWJgan4AviPjRmcUzKC/4hxXx81j8g/KC +P7nZ9BSLl1Be8CxuP/oRLa9o59zv/b16trXaL8C3b49MZ/0I6eFn9gW/MGD9 +DnqC/3xQw5L1U+QD7tEm9jTr1yivmHePTt3G/ADyh98wHTUo1ztF4P+eLJzr +nSLwfCXDcvwSvgtuVX7UffUdIfDw9lVyvSME7jipdI6fhD3wM23MphVgfhX2 +gBcwu5TE/DDsAa9iG7Wb+W3xrhfnTqahtZmfh51iX35Xu6drFH3A7c1jlrFx +BHaCVzI6fYyNO2gP4LNsRg1l4xTsF/7Q/2ccG9dgP/idozOvsnEQ9oMX3pNR +nY2bsB98S0bpyWycRfsH7zPc7x4bl1Eukf5J7RlsHEe5wBMqj3/Lxn2UC/zH +4W7+LE5AucA7+psuYnEF2jl4jWebY1kcgnJhXrnpwLetatwC7vLlyUkW56Bc +4K+PvP3F4iKUC9y/2eayLI5Cvxb52y1qxOIulBe8/7k5J9Q4Ddzw5/wsFteh +vOBzlgQOZ3EgygueMaZYeRY3orzgi06d2cXiTPRr8EMjTXqyuFTcU+bjjvdf +/o28Xsp3UeDP7ZPeD2A8r3MUea3HQh+MR/T+ODjuiYt70NweC49gSxszeb8e +6fE+Q17rsUgP+68E7GrE8kE90v0m5EPtRLnyshN8Enkvguop3m0g5UL+VGfk +D36Z2y/iWzLvg84Yvwrx8U7cE+ff9SPv59D6+h+XiwR7 + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[{Polygon3DBox[CompressedData[" +1:eJw1mgn8F9P3xmfmzpTlZ1eEShFtiux70UalBakUKpFo31RaEWmhRYVIQtYi +IpQsJUtElArRQiFrKbv/8/4+9/96dTrP3O+d+5m5c+45zzn3VurUs1WPLEmS +RSFJ9C85XP9tkv5VjT+nSTJQ+CC1/SQ8QPgA4QWSi8FFkswUPkf4f8KThGsJ +7yH8oPDZwnsL/6h7+wvvp7blki7Ch6r9ZeE2wrfqt6bnSfKn8CThpWrvJFxG +fd4Svlr4EOFlwp2Fywp/pTGvEd5LbbMk5wrvo/aJwrWF9xTeoTEHqd9YyTy1 +N+UZ1P662quo7SfpJ9TeWO37qv0jtbUWHiz9nqS58HH6+3rhq4TPEV4rfIXw +GcKTJcfzDLp3ndqvFD5LbSuEWwoXwnMlzYT3V5/31d5K+ES1VZbUEW4o/WXq +OflV8kbwbx3Mc0oWaD4qSL8heUW4ovRrkueFy0svlSwWriT9pmSR8JHMFfcI +V5Z+T7JCuKr0ixr/Uo0/Qe/+ga5Xqb0Gz8b7C1eXXivZKHyy9KfMtfBJ0msk +XwqfyG9pnI4aZ7yu3+Ja+ih+R/KhcDXpg/Ve4ySNEn+DG1N/k491b2+13aN+ +rwXP54G8b/AcHiT8Ls+tvx9beIzxcZx/c+Od0u/QT32OKTw+78X7LWde1H60 +9Mjc9txK12/r+h3pKtJHqt/han9Y972sPodLfyp9h+RHtS+UbqB+RwmPVN9b +dV1JeLhwW41xqPAM3dOB+RZ+HLvI3OcJ4VuwZ11vxf4ldXTfS2r7Qm2vqE9t +6RckE1kv0vXVp7LwCPV7TtcTsB/pabo+VOP9rHs/1/XLaq8lPV8yXjiXPkJ9 +vhH+Xfgp9btI/b+Svkft5wt/LtxVfzuB+WHdZF4jC4Rn6W/VhJdJPyipKrxU ++nFJE/19g/Rtkkxj7dAzXlJ4nHG6Pq/wHN4kPFp9Uuk/1NaR76b2ubr/2sxr +5AXhmbnbb1W/F9U+iXUq/ZJkCr6C95PcjT+R/kDypPCR0q9L7sc2pOdonJOF +35Neo+vnhKtKr+T9hStJr2aOhI+VXiaZhQ+RXi6ZLVxO+kXdf4iea430W7p+ +CL+EnUgeFj5M+rfc/uAf6fd1/YTaK0p/InlW+BhsWDIDG5ZeIrkP3yg9T3KH +cCr9iGS48G6N9YzwWOFMeqFkMj6E8STjhAO/LxkmvEv95wiPFP5D+DHhUcJ/ +Cr8qfC++hfeWjGZ9qP1J4VuF/xF+QvgW4b+FHxe+Wfgv4XX6Tpt0fYr0askG +4TrSn0g+w1akP5as5/tJV2e96d4zow+5I/rVY5k7tZ+m9raSy9T/NLVdKnwx +fgObkixXn9PVdozwMuFThY8TXiF8tvDxwiuF6wrXEH5X+Hvd317Xl0ufqbZ2 +wm2ETxe+XLid8BnCVwuX1rM0FG4j3FrtpwpfJnwp7yg8VM98QOI1ulvXI9T/ +d+lhat8/YbFprRReQ1dKP6a/l0+8hltj9/hD9b9R/fdQ+3+535956E0MUp+e +mWMfa/kf4Y7SD0l6ZY5H1XTP28QO4dmS3pljR218sdrPFb5GcrXaG6uts/BV ++AbWo35jiH7rb+GHUq873vkBSTnhCvr7nalj+A6+ucAxie+tKFmc2G8/ItxD +/f5kXatPzcS/9WDhtZpL367249R+gdqv0/UNam9GH913GPavv1+r9i6Z+1SQ +LEpsP0cKv5o4Xpwg/KFwPeGawu8RH/Gpwq8Lb9b9V+n6Sum6aqvFGiPOqq2D +pL3az1JbZclriW21nPCL+E/hQ4RfwB8KVxJekjhmHZHbT+IvDxd+KbE9Hya8 +MLE9Hyq8gPhOTJNsz/xsDfi+es9K0ht0/V1mm/9K8kNmW31Gsie8QbqH9C3q +X1V6XuEYfqfGfkT4xsy86FHJoMz85GHJwMy86EXJnZn5zMuSfTVGE+luqcfE +L7+k64mZ+dILkgmZedErkv3hNNILJXdl5kgLiJeZ+cMNGuNWSQvik66HZeY/ +HxHjM8/bEslcYghxm3ifeU5WSdZlnueV+ALhmqwLyZDMfOlVydPMsfRTktP1 +PC2kn5AMz8x5FvP+wodJN2Sdqs8c7pOMyswhF0lmCpdjDQU/c23ioK7vyMwN +npeMzcwNxgbHWWIaMaVQ/4y5x1fATQvHo+/VZ7n0L7puEeMgsWy72t8hnqp9 +W2a/tEXyS2Zb3Sj5MbMdso4OwYcLb5L8lHmdEvt2CV8hvVnyc2bf9ajG3Vu/ +tSJ3rOyq+7tKjwnmCayvXvr7bZIDJLdH3rJSuqdkdOp4v179vsnsJz+TbM3s +Y+n/E35M432n68a6fli/1aywzXYpHNPxDfjF3yVnqr2l9G5JZ43TAJ6jtorE +Gt6J9anri6S/kHyb2Uf9on69Nc5f0j/o+nq1l+Z5+D21fyl9f24/eU5uPgev ++05/u05yOf4IH4WPwL9Jz5Acgc+X7pSZb8xTn+nCvYS/Ff4X+xWeKjxVuIfw +VuFpwj2Ftwkvzj0PY6XvVXsf4oXac3gJ6z14rgbF+SodfRe+s6ukXcpH1bdV +v7/hohqnrPBfwp2EDxPWsCV50BXqdxwcgHdQ+064inRdyW9wFekywbkSOdOB +fHPhTcKbiRWJxyK3GSz9i9rvyx2P4KU34UeF30rNN8hHyEu68f2FX6a/cF/h +7altFxveJt08OJch7+gMT0xsTy3w/6lzlsm693q1bUnN1+HtnwlPEb5B+OvU +a5Hc6nP4CbYgvAT/KnwJ8wCvFD46de6DDyB3W5V6rXcQXpPax7QXXp3aF5Kj +kd/crfbuwt8IzxDuJ/xD6vXJOv2auJH7+cdjV5lzRnLHUZKRqd/5e/3tO+nz +0KztxLnMbfEdN7Om4nvxvrdkzq02pP5mfLtJ6v9A5nyWvHZMfDbmYb363BZt +4Gt4nnCDzHGe3yIXPVR9PiK2qv1vfJLwlGhT/ybON57O/e0+yO1XvhJumXkd +rxFulNn3fEr8zbzWVws3lP4D/yo8J+YRW+PamZh7zsmbR6tPW+FP1Gc3sUX4 +kdT2hF1NSJ1X0/9j7IpYJDw79fpeS3zPzLHWCzfJ7LuqMEf4GeFTsEPpkZnz +VvJXcmdy2+fU743c7c8Hx8l1whdK3wX3InYFx8zPhZtljrGfCTfN7F+/EL4o +s+/8EpvN7F83CDeXrpN7npnvRoVz84Xk05Kj9CynSXeQrpF6DZOzwiHrZeaz +cMtzMuev8Ku60uM0ZinWbeFcFr5xrvQicgq17yrMG+CfZ2XmwiW8V/rqYPsk +hhEnlwmfmpkjl/C6zHG1hA9njp8lvDdzjllf+NHg3AH+c1LmHBdOUiNz3gxP +Oz5zXg6fqZM5L4dTnZA5Pz2fbx3Mn5if8zNzebjWeZlj9WvCJ2bOcfCHDwfn +ynCn6pnzYLhTtcy1AThSzcw5DtzpOP6ue+thM7p3qK4vFF6uub6zcJ7WL/f3 +4LvAecZFH45/hhsSF+DR+FVyk3XBXH4v4ZmpecFdwqUy5zjkwqUz8/o9he9P +zQvG4EMjZ4W7kgsvyF0/uVtjPpg5z8LJzlb7iYJT1d5AfdtI9kmdr5K3whnI +aclt1+fmmHurfZauU8nXidcSeYP+nExWW7/gNX5yjHHkYr/H+JanXp9Z6hyc +dQt/J8Y9qra+uvfAxHkQuVEp4Wmp612DWFPB+UrBu6i9Hjl04pobuU5p4Xvw ++XDuxHzvWd1bDVsU7q8+Z6h9Mc8pfLrwIt6jcPwoJX2v+q/CHqRnq22o8G88 +b+F4OYacgjik9p1qnyU8RHgHvjfGKeIVtRRypT7BcRP7J5+7Ofc78q5bdO8b +wqdE38I6OjuzrWLzJ0uPD37OprqvI/lX5M/bCnMCuNwwtQ1NXX/5XtfXMUfk +CqnjxdH4ndzj3Kd7KWKSyzyf+hvDD58U7hjjRhXePzU3Iy8ip6kuPV/X3YVr +4NPwjYVrcw9p7AvwX2oP0sdK/se90m8Hx7UmkZ/CT4hr1OEeFy6fuVY3R/hw +6fka6zThH6RXBHMAuAD5IrXTJalzwbrCr6fOF6lnvibcNtZ/jpe+sHCtjJoZ +/BEeeYTklOCaFfXGS3TdHK4j6RRc36gd60AHShomzkWobb6r61ODa18lNUnp +8qlru1PieqkuXVVtuxLHVHw6vr1x5OPwsa2RV8D94G/kKPAxeOAFkvOIS8xh +ar5EnH4VX5A4FrcU3pNvHRyz4E4bU+c08AQ4D7kvdRh8zTWR08FLHgqet4ti +vgVveUd/r5+6/kjNkBy6rPS9uj4/OF8gX74ixsq7UudA97B+pW8Otpfzc+c3 +0/EJmeupc4UrZ64vPoMdZq7DUBeqkLkOOk/4KOn6GqdU6nx5dLCNNdKYx6fm +o+Tw1PsqJ85/qRdRz9kvc80R26+n9qm55+Td4HwRHgjXvTu3T8A3kFNSZ35b +7dPI24XfC84d4VFwLepg1KyqZK4fzxQ+WHpU8HqCUw3Q9Zl8n9T1yVnCZTPX +oR8ULpPZ32LDv6auNz8mfIT0hMK1vL7k67nzzvl808J1qG5wotQ5BdyC2N1H +8rHwrujPL4y5S+3UfP3DYH/VFh8WXEO7nL7Yt+Qk5jTY51Oj3Dd3fXUIHI98 +WriV8Fu51zs1ovuDY1nL3HEfm1+bOz8dk7rGgo9lvayKsaZM6rUwI5irt1Bb +RbVdG9fUuJiPkJc8FczNLs6d18HHqRVRJ6IGDn5auB02nHsPgHcvqZ/mtu85 +wfVN6pxNpP8JtjFsDZ5JDqN/JfGwTpwH/NOJ0b9Rz6V+QK5XIfoK8k3ssVbq +mlFp/e156cHSeW7bwEZK5a6pDpJeHMznJwvvk5sbwBHI2apG30igfFpqoPR/ +wTXYATHGnpT6Hf4NruX2hw8LPyDcS/h34UcSc4m7CtdP6bM7uAaLLW3PPc/k +Bb8F12l7C+8Mtk/stHHwHMBfdwXXePvkrkFTc8Zvk0dg592JpXHdPaW2D4Lj +3WW58wf808Fqm5e7bkD9gBwYu50r/af+Ni3xXgxjkZuMiuuO2E3+xx4W/hC/ +SP5GLtAi+jD8J3tNK4NjbhtiaObc4gu1Z7nXGvsX+O8jU3NufOhe0aeS38Lr +Loj2RJ6LrfXROA2xuWhLN6fOkVtj8/y29H7xe7FHA4cnTzw7uMbN8+2MtsyY ++Fj4PLkc9a0id139Rt412Dey3/R3sO/CPrtHf3JDcI2VWiu+lOIksfu64JjM +vOFnu0ReDb++M9j/XKT+E4K5DbXH4ak5AT4Re+a9Ggg/m3pdH8R3U/8ywtOF +/wr25+yLsWdE/KCGCmfrn5q3pbl9IPtW5PgDU+f57FGxTsl5Q24bY13cFONQ +6+i7BqTOPbB/7Jm9NtZmv9R5IGP2lWxkDvXbZ0k3J6cJru23yz0fXaJdst/0 +n36nE/Wk4P2OnupzYYxxNYK/d7n4/eE/xLhPpJsG5wVtpFsV5gzsHQ3O/A0/ +0PWb0VeVijG/coz17BNhn8+wZoM5P7EYn1EhzvOq6A/p80pqPgMHxabx6dh4 +o9Q8g9+AhxPT386dK2K/2Ni63HwAfk69i+fkuelLOzaNr62X+jngMmenzp3e +iM9CntYqNb+H51CPQm/Ovc/GeMxHo/j8+L0Pc2vWLzkY472Su04HJ8THHh3j +/tOp+SYx6iXhM9P4fIn54L7Rp8C5KqXOgXsFx4OlqXMOnu0sbCX1usMPMn8V +4/yMyMzlPtX1u7nXNXW8y1LX1k5ObdPVoo1Te2POmfu+mXnN0vjtsYHncs8n +tsFYZ6RxHhPvn9KHulLb1P6BOb0+jdxb7R/n/j04efXI/Rbq+tvccZZaE3Wm +uqn3p6kDnZt6v5a8jvyuo/osCa4FTcm917BXfL+1wXtSV+XmrL3it6Te2124 +s/QnwbkVOdbsaIe1pMumrmXDJ6i389zPSD4N3tu6UmNeHOd8nzgHPaNdfRm8 +p3Z1jCPUyB4Lrg2Cic3UFvZQ29wi+qHYPjqOwzvgN6hp7oePDs434UE/Be/9 +9dDYG4L39TrHuewWvx/73SOk2xNjg7k3dfLVwXt5HdT+VfB+bhfhNyVLE9ck +4Uf4murRl+BTaqauzTKP03XfN8F7iNflXmOstRXx254Sv+/ayHOw+Vpxblnr +8DPmlfowto7Nt1PbmuC9wivU/+vgvdquwluD92rhct8KT8XPC2/CdwtfK7wx +eP/6GuI7fiJ1bXRLcI5Prv9DjBclnDfYtrHh84JrZeWktwXvBV+fm/t2jbH1 +x+A91u74othO3sC5lE7Cl6q9eeH60JOFfUjbaPPUxzYlPufC/uTmxPtl5MjU +d6k1sde3RXin9IAYU9hPnJi6JkA7+4DsC7AXOTA4v2Dfk3rgt4n3//oH17HZ +f4SsERv4bfa7tkn/lbnWR/2gPFygcN2TNTKkcJ0U2x5cuP7Lt6Amw3pYnbtO +Ti2UmMG5hEqJc5r50f5Y09Tx8Fkrc9cksYmPctcDqXWwh0H9kNoF5wiohZLr +7RP5EnG6fXBNldyNmvcJ+IDUnJt9PeqH5PoHRQ5Jfat87tyfWhr79XDT93Pn +sIw9v7BNY9vU7kJcY8zFgblzK/abBsQ+5Ag1o/3znThzQP7E/uCQ4FyBPeL+ +cRzWKftj2B9nlngHage8E/tsuxOfR6JuTE2Yuj57ejsSnymibky9d484D9xL +jP4m97tTrx5auI6M32M/Bn+CXxkczK/Zm6Y/924h1jOPiffLBhXet2DtDy9c +f8FH3Ve4hjKCNSXZT/c+mdtnY8Nc31/43AlFo37RrtLEfLt1jDUPFD6Hwb7V +vYXPnQzXODMKn19h/3pm4bMg7AFtzO07H5O+u/AZCPKCpjGeEcsmFz4nAfcb +V/gMBzx8fOFzDPDtiYXPQ8D/xxY+ywLPn1L47AU5xR2Fz6/AbW4rfHYBHzKp +8DkP8ogxhc9D4FdvL3xmgvXO2ZbLYnw8KdgHwnXvKXwWZJj6TC18doQcsHus +kZHr3VC4Rkbudn3hmhF8bEDhfSb4WI/COTA548DCe07km8MK18Xw7aMKn+fA +140sfFYDXzeicH0NH35j4T0tfH7Pwns85IO9CtdSyft6F66t469GFz63ga+b +Xvj8ylDhaYXPtdwkfEvhMxz4+W6F61bw5L6F93jIX/B1l0Q76V9434XceVLq +GiY+5+bC50jw530K7yW0Fu5XeE+IfGRz5FTUSAfGdbdR95clPiWeZ3gm+cT2 +wnbSMsZf8qb/51z403+iP8d+m8dn2yN3fYyzW3sKP5r4XNZT0eaxfeyuaRyz +Vby3fuJzGtRX2UukPlZio8FnluiLLe+IsYbckJyoQeSPcKv2qXPSSyMX4vfg +xnBFOCP7Pvgkapz0bRL7c2aMswGcEWAflVyaGs9euWsgnFWDQ8InO0Suy/4s ++7TwcOLvVcF+EH9IPZNYTI5HrW7v3PVDzunB8eCLl4SkJG8i/+kWfHaFvOrP +wnkTOck1wfks9VL2m/fPXafiLB/7cOTv7H1dUHiv8tnC5z2pEfHdP0zNeRiH +3JCzHNgb+eSg6NOuDM5TeIaLg3l+o7gOm8X5mR7XI/vvnCVjfn7MvU/cLPox +9udZw3AMuCX12a3MR+76BrWFA3LX0DiXyDk8eDY1angpnJY8qGbkhZzPJHcm +X6O+8lGMcexTr4yxjxo49VbOl5LXH51734Sa9Be5+Tl+r0G0s/qRZ5DLU49n +b5d9YfYxNkeOCof5PLiGz7mFxjEeUoviDNbo2L9K7to7/pz5hxvDkcnHqVdQ +tyDvKamT8ny56+TEUJ4HXss6LJO7ro5P4LwNZ2nw598F749wfmN75KVwqnJx +TLjrL5GblY9cqFUck72rZdHO+ZbkJawD+Dg2CY+ER8FX4a3kcuRB1MY3RU7L +uQ7Oz9G/VhyHtY+NYHPYHjUkzieQp1OH45wl+SfnIYkrDeKcc36EvIJ9ZuaR +uhbzSq7Efh/7fr8G7xlxJpZzDeQk7IHDe6ljsO/9WXB9En7+f5KvYJI= + "]], + Polygon3DBox[CompressedData[" +1:eJw1mmWgJEW2hLuqsnGHwW2Awd3dYXF3Z3B3X2RwHdxdFnd3d1vc3WFxd973 +TeT7kbdPVFb37a7KPCciTg0cvNNqO7a9Xu8z/hRe/9P1ekvwOjuvX/d7veU4 +ODv49qbX2xq8Cce3JF6DY/vynnE8RvwGx24hHo2xDPgR8OXE7/D+1YlHZVxB +PAfvn4h4dc55htcxOGdF4ieIryQenbEC+HHPJ36P96xJPDrjauKxObYx86+D +byZek8+bmHgpju3K99kQvCl4EHgq4nd5zxrgCRlvEn/FmJe57Tj3K95/O3iC +Jr/5aOIBHBtM/BbHbiX+mmPbEU/LsQuI32KsAp4HfCaffwl4JPBqxF9w/niM +zZl7h2O3E4/P2AL8LvgO4jU4b0nif3FsN77DqBxbhPgBjl1K/A2ftwPxqh4j +HotjGxG/xrGbiMdlbAZ+G3wb8ZZ83r+J1+LYc7x+y3t25HVO8OnMrcI5KxM/ +5fUj3pZjBxJPybGNie/j/JWIn+TYVcxPwNgH/B34buIFmJ/Q3w7eADwT7xmX +eJX6mceBpyfent+yDfPHg2cEu6i26+d7+n335vUQjn3M6/bgnxlHgT8Cb0f8 +E+NI8F/8v2ObrKGfiO/i89YlPpy5Xfm8D5nbFvwj4wivH+dcRfws8WnMDwe+ +xPUDPhW8B+/npbcWeB2C9/39rnPwweB3wfuDLwYf5HoDHwC+BDwE/CP4JPBt +4GPBP4FPdj+AjwMfzP/7ELw6eE3w7l320ZrgtcGHAD4CrwFeC/xsl99/Cnh3 +8HPgHcGngfcEPw/eyXsH3gs8C3i8JmtiJz+bz7uI+UeZP5n5Vzm+IXhKXg/i +2C+ccyr4TuLj/X91r03SZL/OwPwA4vkZyxFfxViW+X8ztxPnXw1eDrw/eGfw +lOAROXcBxvLEZzPmY3535rdn/hzw/OA9wDuAn+5yP08G7wb+L3gH8KngPcAv +gHcGnwHe2/zg+gVfBD4Q3Of3XQx+DHwK+GbmVwMPAe/Sz75yf33HOJRj5zK/ +APGexDuaf3j/1eD/gk8H/8z8KeA7wENdj+D9wBeCD/D6gfcAnwv+N/gl8K7g +s8D7gA/j8z5zr4A3Af8PvEWTvTMYvC+vIzG/fpv9sR94ZPAG5iLwK+DdweeA +93NvgccHrws+x/XhfgJvAt4M/B8+ezTwJ4xfOLY/85MTb+hvZX4S94T7H3wW ++BLOnxg8Aq+T+1t5HQf8OeNPzjmMY9MQb0p8HuefxvwA8BeMvzl2RpP/f5D7 +kHOn4vMfBH/E3NmcPwB8E/gV8JnmB875CzwT5y9O/D3HP/CzGBOCLzbXE3/s +/rU+8P4biV/2f5lPOedY8A3go8DfgoeCbwIfY/4DHwe+EXw0+CvwMeDrwUeC +PwYfAr4CfCj4E/Ch4Cv9reDXwHuCz/PagT8CHwy+HHwI+He+z+FNcvZ/iD9l +/jDmr2L+cOY/Ax8Ovhp8RL1fI4LXA68PPgI8CXgL8Fbgw7tc/83BW4J3AR9d +16j5bi/w8MTrEK/H/B/8zyOa1KzviIcyPwPzOzC/LfN/cuyoWh+u8LcwhiNe +m/l1mf+NsQ3H/mdO5NxB4EuJJ2L+ceK/3KPg+8AngBd1D4IXB39I3DEm87P5 +H+cTP8NnzEU8F8cuIx6BYzMT38KxC4lHNAeBbwVfZK0yp4AX874Tr97Pb5nT +tdBPfVzCnAP+DjwSY1bzJ8cuJl7Y/wlelPe/T7yQOQO8CPg94jkY94BnA79C +PCfjXvDs4FeJ52LcB54D/Jr1ifEEeEHwO8QLMp4CLwx+l3gxcyx4CWsN8Twl +6999YD2Yu2S/uG/M1yvyvRduUnPNp6d24T9T8Po586Wf/Xgl51xgYWGMwcvQ +JvuzkQO435vst6l53yjEU3PsWl5X8p70knu/Ib6S/z83eBv+1//A87sHm3Ac +a/6q/dTazTj+K/EoXkPw/a5ffy/HBzXhYHKil0ty+2LeM+JXSnL34t4D4ufl +P5W/XEP8KmNB8JLWDOKRvSeuH45d4vVh3A+ek+/3umuJc+Zp8p2PJH6RMV8T +TnUj8T+uIeKzm+S3Z0v+17bWfvNrPd8acrPflWOPEy/A/NvE85bkI/OS631R +ft+0lTPID2bl2O3EMxK/SDwj43rwIPB/iadjXOP9Aj9NPD3jWusj+BniGRjX +gacCP+vaZtwGngH8AvFAxpng0cEPE0/EOBL8D9/hXuKZGLeAp2P+OfcK41bw +9ODnif9Vsp9v5PwtwFMxLgCPy/xjxNMwLrceg590fTAuA08MfsK9xDgK3APf +R/w3v/8c7zf4RPCUjPPBA8CPEk/BOA88DvgR4n84/1zwA+CTwNMyrgBPCn7K +etFlLRRePwEvxeusfNeJeqkfj/P9ZwPPAb6YeJkSPndTk/w2v3zZ/NokH85X +st7PapLfZmfcDZ6V//ey95PxKHg+8JuuXf7H1Jy7aS+aYT6OPUY8P/NvuT8Z +j4DnBb9BvCyfP5NrpUm+XcR6Vjmj/O/hEm4+mPgz5idhHA8eDny/e5VxBng0 +8EPmPsbp4FHBDxJPyDgI/CufeQ/xpIwTwMMz/wDxwV3yhbXxd/BsjDusf8y/ +RLxkyd6+pkn9XrDkWl7UpP6/zPt2cz9w/r7gY7rkw63a5I+lS/jzDdYM75d7 +FvxpvV4zgF8Hf1Hz2/Tg18Cf1/0ynXu4F/3m9ZsG/DL4k3r9Bpbk6/dq/py8 +JP++W/PrFCX14f2aT5fidXq+y58c+7iNXpN/DTRnEE/WRQ/MYs4gfpjXyRhj +NdEzk3ZZHzOrqYjHZuzlfjEnEU9Zko8/qPnkQY4vxFi6iX6brKQevFPXz1gl ++f6Ful+HY3wFXrZLPtlcPtdEA23RJWeZu8yR53eplQc00Tw9czmf9x7hd7Ue +HAX+Gjx33Q9jl+S7F2s+mQX8NvjrWq9mAr8J/rLWl/FK1uurNR9MULLeX6v5 +YOKS+vRmXS8Tlqz312u+magk/71R89nMakzwV7UeWg+sRdaklbrkd/XXjLV+ +LMPrnHJ5NaDcn/lfXO/EdzJ/GvhX8Bjgu8APVf59bBu9/mDVG8e00dMPVD1y +dBu9+Xjlxye20a+3dtFzB4Ovca9Wvjy0jV5+rPLdE9ro32vBG4APaKPnT+6i +d3duwydO7HKvdmrDN67vomcObOMH3F9SD+frol8frfvp+Db69wvmN2+ifa/1 +88A/MD8i510PHqOETzxX68FlnNcxPuXYbxxrOdava9X8cVGJ3lm11vt+Fy0+ +eZM10nXJN3M3WYPncn5LPAnxp/3w4dZ6wZiIY/1+6v80Xer725y/KnhW8Jfg +MUv4zfO1Pg3vdzY/dvEnZmP+Xea/rfxNv8O9smblXHeU+CnuTf2aqSvfH63+ +z3W6eBvjW0/NPZz/Dvibyt/kEHIJ78mFXTwIvYhFzWH1mnht3M/m2h/AG/jd +zb/gb/vxNNz/N4B/7MeDGRl8Kfjnfjwj9efd4PG7aAj3oHvxJ+Y3ci27JsGr +tbluXr+z9T+65A3zx5NqAY4dQjyp+bpkz3pfvD+X1JzgffH+yD1er/lngDqL +cZKapEv9UKtOzTkv1Vw3HnghxiqMRXn/TXUNuBYWa8IFvYdeV6+v3O0y8M5d +OPvS/axB16J+zL/68VTm7aLP9Vo+Kqmtm4A/Uas28WL2t775/Ti2Pvhl8Mjg +G1w/XfyRk9VS4FG7+CengM9kPEw8T/3+rinXlvd7tX7WkGtp2ybe15j9+AH6 +Au7f6bt4At7vU+oaci2Z7/UCZ2YMZmwvf69rfNha5/xDS97je3dpw+9/5Nhx +TTwcvZxr/Z9NNI/ax/l9m+Tsv0s4rdxWf0Pv6+L6v8xx8tdfzAlNPDi9uE9L +vK3B4M9L/EmvnTn+57r+BnU5x3PVS00XDu/8lcRr9/Id9JcGq8fAfzdZH9+X +eFXmOHPdGV247i5N9Jq/x1gO/FzJ+Xqh+4B/UPuUaGk5rNr+45J7Lad6jPiz +ku8+O+OJuv6Hc09z/uW8bgz+tY3+X5j5jcA/t9HTC4E3Bf/VRt8vVsIxB3bR +/3JPPQm9CdfUUua7Lt6oe+a3+v0GgYeAfy3xdLfucg29lscxtqo1/V7ioYw1 +e8mx5trFzce9eCB6IfqNrjU1tdraNeZaG7uJHri8/jY/88uaD+aq3+myyqnk +Vl6zX2p+abvsEffKtF3yofd/xy5+1TrM7dfGX9Zz0ZuUc+jFbNRGm03ei3fi +9XKPTQFesh+OJlcbVO+P1+ufNn6Iv0fOJneT4+jl6PlcBR7Yixfk/bik8uXF ++/HnDmuyZt0n6zFWaqKp72jyGzZukjP9bfrZzq/fRS+7V60HK9T87O89tMk1 +3LSuh0ubeAxL9JPPPVfNtkIXDi4X11PSq5CP6R2Yj8xLeiB/NfE49EYusDi1 +0Rhvms+Il2/DMeWaekoLqU168ZreaqOt5TBymbO6+NfmfHO/nP+sut71OtTQ +aumxe/FC1dhqbTW2Xqx7XT3rNdPPNN+rndXQQ0o81BPAY/biraoB1YJycL0Q +c8F0vVwj14Oe6knEY/Xitbrn9f+tQeYC199mTWqMe80cYK6QF5obtm7jTcjJ +5ebuB3sds4HX6IeT31D/54UlnuhLTTxpvVI9zR+beJh6ne5HtZ+cfsV+PN4f +mniOer9qKLWUGlHvSA/VXol+t96qnvm9TTxNvXQ9oXuaeKx6RXrsdzfRz3rv +eq6PNvFw9WL1QB9r4uHqjaqZ1E5qOL0rPdnvwfvW+qfn/FMTD/y5Wh/1/u0B +nGE+MNc04YxyRz3SP5t4bnqn5mz9hwW65HJz9HDmzza52z1uv0gO4N7XY36x +yR52L+vpfwDeuhev/zB5trUQfGcXz/fNJnpRL1hP/OcmHr1e+ZlttNtB4Be7 +eJZLyr178TL1XP9o4hnqxerp/gYe0ovXqwf9S5OegN60Gu33Jp6h2u3DNt6R +mkXtoqehtzFi3W/WT9eL9eWWEr98sV74grxBvbtJL3xCXqFfo7ezCHhlP7+L +3ry0jf78ootevaaN36DHPzXxDb14/1928Seurf7AI228Dz2QrqTnMW0bz9Ze +yEttvJv7e9E2egiTt+mZ6C3oEU5mzuzFO7y3jVegZ/BnFw9hYBtPXW9BT36a +Np6uXv23/I69if+oHMucYm45v03/6PsufsXNVY/7mX72PdVfkXPaf9q7DRdV +s9kP3KuNlpOD2r/apw03tSZNVnOb3OuPLn7K3VXf/9bFT7mr6vsfuvgvt1Q9 +35T4QQ9Wv8Rr5rV7uPozbYk/9FD1V/Ss5/K9vXjZI5X4RU9Wv2bkEj/qqern +jFDiBz3Rxo8dpcQveLr6L9Ye/QL5sf1JPfW523jueu32sGYG39lLb0uP9opa +z47q4hlcWeuR+UqPfKw2HpHeuZ76mG08YL12PfMxwGf14qWb766q9fDYLp77 +2G08I714Pctzaj05rNbTE2p+PbALx7ut5ke535MlXMaeo366mu7Wmk/VenIk +uZI90+tKNJ7esp6y2k/PdGjN99br69p4b65x1/qtbbwz76H30h7OBG16RPZ2 +7HFN2KbnZ+/LHsBIbXp09gb0/EcAn9hLL8CewYhtenr2EuwRzdKmp2LvyB7A +yG16RvYGLmvjBblH3av2DPttehb2Eu0RljY9C3uH9gTHb9Ojs1doz3A8tW0v +vcRn2nhHrgnXhj2GUdr07Ow92ANr2/Q87I3Zo2rAR/fSu7JH2bXpodi7/IDP +WLsJp7A/bs/A+i8Hl1/Lr7bvwtn0slbj2PK91AhrxWkcW7yJ5tXvU+OYu+wR +ms/UQOYuc7z96Bu75C41udpcTvoxn9eAzyFetaT2WJOsTeoH+4Z60K9UvThd +F79YLnFXifesB/RaiaehN66HrdexQkmt0zPWa76p5L1ivWT778s0WYOuxd26 +YTbPsJ6rfEAOLZdWo6vV1bz2LvS81MJq6sVrfldr6/HYm9Az0/sx/89V96f1 +ZOcSv9U9495Rz1pvXvD3lOwR94o9Q/mi/N9ejRxQvafntEStT7NXPi33HFDv +zyIl2qpw/nlVL6i15TTqHTm/3F8+NcTcV/JshRxSb+GqkmclfObBZx/kmPoE ++gVyTzWoWlSPRa9lnRLuIkeRq1zKsSmaeAr2A+QkcpNxmvj1Xn9jOaD3z/sz +duU78pGVwQv2wmHkMsuX9Jb0qJ4u8RD0EuQIPk/xFGOOJh6J/ad7uvi7+rzq +37U4tk0vHEGu8EiJ9zh8Ez62Ygk3khPJjd5wfRNvwPiwRMOqZfX4fL7D9a62 +cM28XnL9hnlnjPdLelb2rsas+cpjzvmZPr/i5/ssic+0vFOv94pN9qB78fqS +foc9lheIVynhZnI8uZ6ehN6Emsb+i56F3oU9fvszK5VwPzmf3M/9oXfiPfHe ++Pl6LfbYfP5k25JcZc4z960BXq8XjipX1WOds9Yv+cuOJbXCGmGt0EPQS7DH +cl8Xj0GvwXvgvVAfW9ut8W+ANyzhRnIouZQejV7Nh73w9We6PJ/xey/8UT/D +ZzU8dm8XPWnv3h7pbeD1S7iXnE5uJ+eT++nh6eVtXZKrzeHm8jvkk+DvGScw +d3xJvAXj9i5+iN71DHzeQ8RPdOkH64nqjVpDrT1btqmtm5RoIzmt3HaLklxu +jjXXblzCdeWQcsm1S7i8HFouvVEJt5Qzyh2f6nKtfmOcztxWJf0Ia4a1Y90S +rq1mUDtsVpLrzfHm+i1Laos1xdqyaUk/Wg2nlluvhPvK2eXum5fUAmuGtWNX +k1+Tnrx6yj3gXnCN+vyT+1Hu4Z5z7+lh2yvVc9fb1nO2F2uPQC96WE+16kH1 +4W4ltdYabC3etaQWW/OsfXuWcEU5plxzl5JaaA20Fu5Qwk3kJHITexT2evTM +7V1s7x7tpSZaG+2B2DvSM7c3Ys9jgapH7YXY87B3pIduL2Svkv6fnFXuqr5V +z9oTnrHEP9RrVJPoh+jh6eXZU7Cf6TNcq9WaaH7YpoRLyBnkDvpra3fJGebb +DUq0hxpCLaEHoxejXlff2d8xV9lje7TEP/u9zTME1iP9lm970aj6I3uUcHM5 +udx8d3NYLxxHrrNdCVeQo8hV5GhyNT3s85nbqYTLyQnlhnqmeqf2AOwFqKE2 +7aUH92BJz2eOqg/sBentWSt9BkV/3B6FvVE5rr2LORgzNnkGxHpnT2Omylf1 +B/QLZq58Sv9g4i7cwGdCfJ5lqRItrY5XH9ojsXcqp7Z3MqynW/mRvRF7PlNV +fWMvSI/cXq4cXe9cT99er5xer3/MLr9Vz/ebJpx70qpv5Fvyr8mq/pFf22Oy +V2mPwN7T6F1yhTnj6yY9oEFVf6mf5PiTVH0k95fj++yFmkPurwYZrfJXtYn6 +bLzKB9Vv6qsxKj9Xbw3r+bbRMGoLe0j2ltUQ9pbst1kr9bf0ueyv9Ss/1/fZ +r+Rae83VDvuXcBU5i9pFPt1UPin/VzP2Kp+UX6vJhqv8Vq2m5rTXrYZTix5U +wm3kOGrrH9rkel56x3PenCV8R42gd/NjG+5lGjrRnFrSD5Zjy7XVuOr1Ib3w +afmje0VPTW9NTWYvW82oVlO/qn/Vm+ov+4m/1Xqk9tTL/73WF58NXKGf+qGH +YL9L/m6tsmbJ/+VPU/biCeoNHliSG8wRel9qwHErX1cbHuA97UWjqdXUkMNX +PaEeWbRES6mp9Ar/aMP9vCb6UmrIAVW/qC3VvKNXPaYWXqYfP/qFJv2qfd2j +vWh4tfw+JVpeza32VlPrz+jfqLXtgfmM5ea99Mash/Yenpe/9FPP7b+90qSX +oF/yRZOenf6HPQB7AXrY+t36g9Y2a5x6Y6Qutdhr+l6T5031gs1Z9lvt+fms +7Ga99ALt+fmMnvXYXuDqJV6Zno/ejz1nn+2x52Uv2p60z/bY47VXbb9HrrdN +rZ/6T/o/g8EPy2NLYo/pDe1dsjZcI3ol9ih91laOYO/SHqjf2+9v/XdNuDa2 +/v982M9zM5v00gtVL5ib9Vw3rvxIruxzlvZe7EH63KsepvrHa+y19h7KR+yp ++lyDOVa/zP6Pz9bqYazcj7/ltfCa6HfZX5Sb2mN/ut4j75X/c9l++lEed958 +bX9phC4cSj/eNePa0U+TL9kz9VlqPRX5/fL9XAuvgddirhJv1rWpd+pv8rfZ +Y16un/6mtdAe4nVNesA+h6RnZW/YHq7PZuvR2NvVgxm+y3rQm1Gvj1D1tXpX +j17uKwfW79OT8dkLPS69Gp9HHtZL6CVp/B+79gCY + "]], + Polygon3DBox[CompressedData[" +1:eJwt1ne8VnMcB/DnPrcdqUh70r51K+2rYTSkQVFUVigjDU2aSIkUkkJDRlZD +KYrSXqQUDavwooWyI5H31/P88bnnfN/P93fOuef8zqjYq3/nfslEIvG85Jb6 +/nwFWsqH6gq5Eokm7LC6rexh1Vhj6aaenpFI5GXDMhOJi/T9zK6UA6yunnys +v3q1vmbsCX352QC2hjVnj7MCbCBby1qwqayR8V3ZNJaHDWWN9R1ibWQ3q6qn +KTuivkz2suqsBTuu7iRfsmxWl32uzpEtrDRryX5SXyH7WR3WUK5WT81InZMh +9lvPyn7WXD5g5fRcwA6oW8g2Vp6dlmvVM40tzoYbW1DfsNgna8+eY0XY/ewL +1ostY2ex0fF/sR5sESvMxsR5Zz3ZwszUhbqOvcrKK0ezc9kU9j27m21kRdnD +7CC7i61hZ7NH2CHWj61lSdaLLWJV2Rz/Qwa7iS1kVdg4feewSeww68/WsWJs +MjvKBrIN7E/j74t9Wu8rJ9TF9T2m7wc+SN8mXoI9zn5kg9lmdiH7gbWXz1iW +sc3ZMXXHOF+sNsthR9XtZB+rwTJZb/Uy26vNHra9XKwPe4tls4msGfuRdZDP +WS1jz2T3qN/X15HN1VeIjWC7WDf2GjuDDWdbWYc4V2yr8fXUbeJcygT1NqnP +2qoryzz15piDrLU6Q8arG9je17Z3kWy3vYqsElunriQLWCLuQblG/bTx+dLz +qgUrZ/0VdtJv49TDZZP1EvJCTBX1vbJFXUpeYnnV98TxqEvKiyyPeqTsUFdM +7/cs9SkZYfu32F9eae3YllveGnNCXz7rbXKn5lbMsYnsTOvt2H0xZ9i/7LS0 +Ym0lf9zv0ttvKyzH2MeXfs+Wlel7a4RsV1eQ+ayQure8qP7D8YxhXxt7dcy1 +eFaxLun76Dr2TPpeiLm2m93IZrFjbCjbx25is9lxNox9yq5nz6bnaczJPewG +NjM9T4ewvawPe4mdYGPZN6xLnEO2ibVj81lXNp59wrqzlay9c1A4ngGZqWPZ +arlPXzM966SBeqX6Khll7GZ2ub4FfFVcc/X6eCaqJ6lvlRf0/c5G6/uKj2K7 +WVV5kxVTX26/heI5k5n6P7ZY3sFf03PK2AfZIXY7e5X9zcaxg+w29go7yR5g +37ErbK+JZUdpzhdb3qnvdX3/qMfrO8wGsDdZbpnCfo79s9XqIvGsjDnCBrK3 +1fnj2ct+Z4PZO+oz5Cn2Z5wztkZdVGax03EMjiXLspZ0iveZZSt9N+u51Hq2 +49mo7ivz2b/qCfqO+O1KY3NiXNxTfInlyLjX4xhivsnFeloae0OcFznbb2Mz +U4n1U/E/x770NYhrZ/235P+3bmKwnvpWuqh/lXiED4r7hb2hTsokdoxNj17r +XS27Sed45lpWYn3iOshV8Z4wdo9x1WSp385V95clsU+ZzH7S248tjn3Ko+w4 +G8bWxv8gs9PPl1vk+Thm//8odEDfzWxuHDMbyfaznmwGO5J+3n8c59zx7GWN +ZAMroSebfapuEvcDK8lKsjnxLDD2IfaFsWXZUnZO+lhibjTV2z2urb4C7F5W +Tt8yVkzmsF9YabYgnjcynX3ParN96saykRW3rVJsnjpPev7FvToz3nG2Xybe +V/wSPWVkofVCMkPfUb91iDmjXqK3JpvMLot7Lpl67sbz9yHWNs4hm8fKsgks +h/WI42UF2QhWxz4+Y03jvmal4nuDfRNzTHawSqyzDFW/Z+yFbHbMUzaErWI5 +bFbcg2xwPDdZUzaT7YrvM/W7Ul29WH2p3KjvmfR3SbzPy9vvu6x0HDc7Ge9f +fT3VczNS8z/ug04sPhKXslrssbjf2F3xbGFZbAqraHurWNk4N+xvVp19pK6T +frbHO6Ua26bOkuWsYLyzpI5ttYrtxHnXM5Hlsl5XSvptedxDvIe6uzQ0doZl +bna7ba2IZ6d8GHM53qOZqXdtvHO3xPPGejXrLePejutoXDc+1dhveV/b2857 +sOnJ1HfOALaL5dF7B3uHNZIdMUflqWTqWyq+h3bqu4Y9yb5Lf3PtYNeyacnU +d1h8c33EGtneQdY63g2sip4V8R0R74e4Dnr3qvPquzOZupZxTXeymmwXqxfz +w9giLIt9rL5AVrOirAbbqa4bc4YVZlXZB+qa8jYrwKqw99U15C2Wj1VmW9XV +ZRnLzwbFMaoLyjR2Ip5/7Ft1Q1nPKudKvQfifdDBsnHMH9uqICv1lJGX9f3F +z2Pr1efJQpZh7Plsg/p8WcSS7G5Zri4gT7I/jP0PAHiGzw== + "]]}, + Annotation[#, "Charting`Private`Tag$26285#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}}, { + {GrayLevel[0], Line3DBox[CompressedData[" +1:eJwt0TsvZVEYBuCF43IwqEQURKFxa7Q0Esy4U45O5ShMYhg0EpUTjRliRCZu +EVSioRPN0YlmMOM6KCf+gCjEsxPFu5/17mSvb2XtioEvfcNpIYRpGbWI1oPR +Q0YyQiiynGI5Z1nHeTZynR3cYz+POMRTTvKWST5xiS/cZjwWwgFLeMwUq837 +Jmf6CKukOT2Ec72FF2zlH37kX37iJdt4xXZes4M37OQtu3jHbv5jD+/Zywc2 +OVeteePyqH9ljdQ712+9kikWc5/Z3OKz737yP2d4zQmeMMFDfuYu27nKBn6P +5jHJsui9/WLmjUmhnmCG7EiBvsUP3GQ+N5jHNeZyhXH+Yg6Xmc0lZnGRmVyg +UeFHtD/n6ApCqfL6/v/fAFAwPYY= + "]]}, + {GrayLevel[0.2], + Line3DBox[{882, 1153, 594, 1179, 1154, 1365, 1076, 883, 1155, 1366, + 1077, 884, 1367, 1078, 885, 1368, 1079, 886, 1369, 1080, 887, 1370, + 1081, 888, 1279, 1436, 889, 1371, 1082, 890, 1372, 1083, 891, 1373, + 1084, 892, 1346, 1374, 1085, 1180, 1347, 1375, 1086, 1181, 1511, 1156, + 1087, 1182}], + Line3DBox[{894, 1280, 1437, 893, 606, 895, 1157, 1376, 1088, 896, 1348, + 1377, 1089, 897, 1349, 1378, 1259, 1090, 898, 1530, 1271, 1272, 1091, + 899, 1379, 1092, 900, 1281, 1438, 901, 1183, 1282, 1512, 1220, 1184, + 1262, 1527, 1093, 1221, 1185, 1380, 1094, 1222, 1357, 1381, 1095, 902, + 1382, 1096, 903, 1383, 1097, 904}], + Line3DBox[{906, 1283, 1439, 905, 1284, 1440, 907, 616, 908, 1364, 1384, + 1098, 1270, 1529, 1158, 1223, 1253, 1254, 1252, 1523, 1159, 1225, + 1256, 1257, 1255, 1524, 1190, 1228, 1099, 1227, 1191, 1229, 1285, + 1515, 1194, 1160, 1231, 1286, 1509, 1230, 1197, 1233, 1287, 1517, + 1261, 1202, 1235, 1100, 909, 1385, 1101, 910, 1386, 1102, 911, 1387, + 1103, 912}], + Line3DBox[{914, 1288, 1441, 913, 1289, 1442, 915, 1290, 1443, 916, 810, + 1205, 917, 1513, 1186, 1224, 1187, 918, 1241, 1514, 1188, 1226, 1189, + 1274, 1264, 919, 1362, 1516, 1245, 1192, 1249, 1193, 1246, 1242, + 1251, 1243, 1247, 1195, 1250, 1196, 1248, 1522, 1363, 920, 1265, 1275, + 1198, 1232, 1199, 1521, 1244, 921, 1200, 1234, 1201, 1520, 922, 1203, + 1236, 1204, 923, 1388, 1104, 924, 1389, 1105, 925, 1390, 1106, 926}], + Line3DBox[{928, 1291, 1444, 927, 1292, 1445, 929, 1293, 1446, 930, + 1358, 1519, 1237, 1206, 931, 814, 1238, 1207, 932, 1510, 1161, 1208, + 1162, 933, 1518, 1209, 1239, 1210, 934, 1211, 1240, 1212, 1526, 935, + 1273, 1163, 1213, 1164, 1525, 936, 1260, 1165, 1214, 1447, 1350, 1276, + 937, 1278, 1268, 1277, 1269, 938, 1294, 1448, 939, 1391, 1107, 940, + 1392, 1108, 941}], + Line3DBox[{943, 1295, 1449, 942, 1296, 1450, 944, 1215, 1451, 1359, + 945, 1360, 1452, 1216, 946, 1361, 1528, 1263, 1217, 947, 829, 1218, + 948, 1393, 1109, 949, 1297, 1453, 950, 1266, 1267, 395, 951, 1166, + 1258, 1454, 1351, 952, 1167, 1455, 1168, 953, 1352, 1456, 1169, 954, + 645, 955, 1394, 1110, 956}], + Line3DBox[{106, 483, 107, 484, 108, 485, 109, 486, 110, 487, 111, 488, + 112, 489, 113, 490, 114, 491, 115, 492, 116, 493, 117, 494, 118, 495, + 119, 496, 120}], + Line3DBox[{958, 1170, 779, 957, 1171, 1457, 1353, 959, 1172, 1458, + 1354, 960, 1298, 1459, 961, 1299, 1460, 962, 1300, 1461, 963, 653, + 964, 1301, 1462, 965, 1302, 1463, 966, 1303, 1464, 967, 1304, 1465, + 968, 1355, 1466, 1173, 969, 1356, 1467, 1174, 970, 786, 1175, 971}], + Line3DBox[{973, 1176, 658, 972, 1395, 1111, 974, 1396, 1112, 975, 1397, + 1113, 976, 1398, 1114, 977, 1399, 1115, 978, 1400, 1116, 979, 665, + 980, 1401, 1117, 981, 1402, 1118, 982, 1403, 1119, 983, 1404, 1120, + 984, 1405, 1121, 985, 790, 1122, 986}], + Line3DBox[{988, 1305, 1468, 987, 672, 989, 1406, 1123, 990, 1407, 1124, + 991, 1408, 1125, 992, 1409, 1126, 993, 1410, 1127, 994, 1306, 1469, + 995, 679, 996, 1411, 1128, 997, 1412, 1129, 998, 1413, 1130, 999, + 1414, 1131, 1000, 1415, 1132, 1001}], + Line3DBox[{1003, 1307, 1470, 1002, 1308, 1471, 1004, 687, 1005, 1416, + 1133, 1006, 1417, 1134, 1007, 1418, 1135, 1008, 1419, 1136, 1009, + 1309, 1472, 1010, 1310, 1473, 1011, 694, 1012, 1420, 1137, 1013, 1421, + 1138, 1014, 1422, 1139, 1015, 1423, 1140, 1016}], + Line3DBox[{1018, 1311, 1474, 1017, 1312, 1475, 1019, 1313, 1476, 1020, + 702, 1021, 1424, 1141, 1022, 1425, 1142, 1023, 1426, 1143, 1024, 1314, + 1477, 1025, 1315, 1478, 1026, 1316, 1479, 1027, 709, 1028, 1427, + 1144, 1029, 1428, 1145, 1030, 1429, 1146, 1031}], + Line3DBox[{1033, 1317, 1480, 1032, 1318, 1481, 1034, 1319, 1482, 1035, + 1320, 1483, 1036, 717, 1037, 1430, 1147, 1038, 1431, 1148, 1039, 1321, + 1484, 1040, 1322, 1485, 1041, 1323, 1486, 1042, 1324, 1487, 1043, + 724, 1044, 1432, 1149, 1045, 1433, 1150, 1046}], + Line3DBox[{1048, 1325, 1488, 1047, 1326, 1489, 1049, 1327, 1490, 1050, + 1328, 1491, 1051, 1329, 1492, 1052, 732, 1053, 1434, 1151, 1054, 1330, + 1493, 1055, 1331, 1494, 1056, 1332, 1495, 1057, 1333, 1496, 1058, + 1334, 1497, 1059, 739, 1060, 1435, 1152, 1061}], + Line3DBox[{1075, 1178, 792, 1074, 1508, 1345, 1073, 1507, 1344, 1072, + 1506, 1343, 1071, 1505, 1342, 1070, 1504, 1341, 1069, 1503, 1340, + 1068, 747, 1067, 1502, 1339, 1066, 1501, 1338, 1065, 1500, 1337, 1064, + 1499, 1336, 1063, 1498, 1335, 1062, 791, 1177, 1219}]}, + {GrayLevel[0.2], + Line3DBox[{399, 755, 595, 1365, 400, 606, 426, 1440, 615, 438, 1442, + 624, 448, 1445, 632, 457, 1450, 639, 470, 1457, 780, 832, 648, 484, + 659, 1395, 498, 672, 512, 1471, 686, 526, 1475, 700, 540, 1481, 714, + 554, 1489, 728, 568, 1498, 742, 582}], + Line3DBox[{401, 756, 596, 1366, 402, 763, 607, 1376, 427, 616, 439, + 1443, 625, 449, 1446, 633, 458, 1451, 824, 845, 640, 471, 1458, 781, + 649, 485, 660, 1396, 499, 673, 1406, 513, 687, 527, 1476, 701, 541, + 1482, 715, 555, 1490, 729, 569, 1499, 743, 583}], + Line3DBox[{403, 597, 1367, 404, 764, 765, 1377, 428, 871, 872, 1384, + 440, 810, 811, 842, 1519, 812, 813, 459, 1452, 825, 846, 826, 472, + 1459, 650, 486, 661, 1397, 500, 674, 1407, 514, 688, 1416, 528, 702, + 542, 1483, 716, 556, 1491, 730, 570, 1500, 744, 584}], + Line3DBox[{405, 598, 1368, 406, 766, 767, 1378, 863, 874, 768, 873, + 1529, 769, 838, 802, 1513, 849, 803, 843, 814, 866, 815, 879, 867, + 1528, 827, 847, 828, 473, 1460, 651, 487, 662, 1398, 501, 675, 1408, + 515, 689, 1417, 529, 703, 1424, 543, 717, 557, 1492, 731, 571, 1501, + 745, 585}], + Line3DBox[{407, 599, 1369, 408, 875, 1530, 876, 877, 386, 860, 1523, + 770, 839, 328, 1514, 850, 329, 817, 772, 1510, 822, 773, 460, 829, + 848, 830, 474, 1461, 652, 488, 663, 1399, 502, 676, 1409, 516, 690, + 1418, 530, 704, 1425, 544, 718, 1430, 558, 732, 572, 1502, 746, 586}], + Line3DBox[{409, 600, 1370, 410, 608, 1379, 429, 804, 861, 1524, 805, + 840, 854, 855, 1516, 816, 857, 856, 844, 818, 1518, 823, 819, 461, + 641, 1393, 475, 653, 489, 664, 1400, 503, 677, 1410, 517, 691, 1419, + 531, 705, 1426, 545, 719, 1431, 559, 733, 1434, 573, 747, 587}], + Line3DBox[{8, 888, 23, 900, 38, 307, 1227, 53, 348, 1251, 282, 338, 68, + 934, 290, 83, 949, 98, 964, 113, 979, 128, 994, 143, 1009, 158, 1024, + 173, 1039, 188, 1054, 203, 1068, 218}], + Line3DBox[{411, 1436, 601, 412, 1438, 609, 430, 806, 807, 1515, 617, + 441, 858, 859, 1522, 820, 853, 626, 450, 821, 1526, 864, 634, 462, + 1453, 642, 476, 1462, 654, 490, 665, 504, 1469, 678, 518, 1472, 692, + 532, 1477, 706, 546, 1484, 720, 560, 1493, 734, 574, 1503, 748, 588}], + Line3DBox[{413, 602, 1371, 414, 798, 835, 1512, 610, 431, 771, 841, + 1509, 618, 442, 336, 1521, 851, 327, 451, 774, 1525, 862, 392, 463, + 395, 881, 643, 477, 1463, 655, 491, 666, 1401, 505, 679, 519, 1473, + 693, 533, 1478, 707, 547, 1485, 721, 561, 1494, 735, 575, 1504, 749, + 589}], Line3DBox[{415, 603, 1372, 416, 799, 836, 611, 1527, 432, 878, + 808, 865, 1517, 619, 443, 809, 1520, 852, 627, 452, 880, 1447, 775, + 868, 869, 870, 464, 1454, 776, 644, 478, 1464, 656, 492, 667, 1402, + 506, 680, 1411, 520, 694, 534, 1479, 708, 548, 1486, 722, 562, 1495, + 736, 576, 1505, 750, 590}], + Line3DBox[{417, 604, 1373, 418, 263, 1380, 433, 275, 1235, 313, 1236, + 276, 396, 1277, 378, 465, 1455, 242, 479, 1465, 657, 493, 668, 1403, + 507, 681, 1412, 521, 695, 1420, 535, 709, 549, 1487, 723, 563, 1496, + 737, 577, 1506, 751, 591}], + Line3DBox[{419, 757, 758, 1374, 420, 800, 837, 801, 1381, 434, 620, + 1385, 444, 628, 1388, 453, 1448, 635, 466, 1456, 777, 778, 480, 1466, + 782, 783, 494, 669, 1404, 508, 682, 1413, 522, 696, 1421, 536, 710, + 1427, 550, 724, 564, 1497, 738, 578, 1507, 752, 592}], + Line3DBox[{421, 759, 796, 760, 1375, 422, 612, 1382, 435, 621, 1386, + 445, 629, 1389, 454, 636, 1391, 467, 645, 481, 1467, 784, 785, 495, + 670, 1405, 509, 683, 1414, 523, 697, 1422, 537, 711, 1428, 551, 725, + 1432, 565, 739, 579, 1508, 753, 593}], + Line3DBox[{423, 761, 797, 1511, 762, 424, 613, 1383, 436, 622, 1387, + 446, 630, 1390, 455, 637, 1392, 468, 646, 1394, 482, 786, 833, 787, + 496, 789, 790, 510, 684, 1415, 524, 698, 1423, 538, 712, 1429, 552, + 726, 1433, 566, 740, 1435, 580, 792, 793, 834}], + Line3DBox[{581, 741, 791, 567, 727, 1488, 553, 713, 1480, 539, 699, + 1474, 525, 685, 1470, 511, 671, 1468, 497, 658, 788, 483, 647, 831, + 779, 469, 638, 1449, 456, 631, 1444, 447, 623, 1441, 437, 614, 1439, + 425, 605, 1437, 398, 594, 795, 754, 794}]}, {}, {}}}, + VertexNormals->CompressedData[" +1:eJyEu3lYjl33Pl5SKlKRSiVDkykyJ2qRSkiINFNJxhRFKJVoEEo0K6TBVEgD +Gu7dPM/zPM+jQqXIby96Pu/ze4/jPb7PP9fRepa1z3XuNe19X9dSY3ONkzOY +mJgmWJmYWOgzeeo3/c9D4e/Tfvo5BF5MU5mPMnwVOkZ+BIkGpkAm08tjQh+G +4MxnslJvpa+C/4y+5xPxxdAa/FtWvG0Q7MJWb5Urva/wsWpCdsPmqum/ByDN +VypVINVWQbe4teQ1b/303/3g80HcvK/uqsKG8chP0seb4EDd1Ib97X3wy3cA +gvZbKTz6/MT5xfNmWHBMWJbraB8w/f3Pwf7hJ0Ey3AwJqpIx+yWo3HbN93NW +Fxh+0/qi0/qG35eksD61YayYtq8ybd/khs8Nv+A7jLGiv3gMpvE8lPUsWLvY +kSFS/Rc/U/hf/M/PL9djjbzHUGH56++SkL/+sj7Nyn+/4i7j49e//CjM+MtP +3u0NzjLHvRjLpvlcNs1nxf3tPyfpvx9hbOcUb7NT+PschJG4HQkSIiVQ1sZZ +8H1LMpybp1e323MQZDZFPrljWgzuN+P7XOlT6+T5L4vKBsCR5YX0EbEC6JgZ +ULFpSTUoOMf298X3g6RP9uuDjllQvcg80PpxI7TbdJsdt+mDzrrIT7rnkoGj +8zCbVHQLvMy92WOs1QtZUqNyh6reg0Oj0vZvkm2gWywjFXCv5/94Ht2vFDrx +vA1meYTH71TqgRMBFQ1UnzxNv7IN9bWaFkmifsF1x99655LJqm8XmNC+iVhi +M9qPVPs4QfEQZd4CP8Rz6lTYWcRzeXVaLsVPvn0MDUL8MVb2g4hf3WNogPpL +3M4v70R/P3Ls60R/hT3utFJ+SIWQdC7ykyTwrQL5kR7UiKT7Qbi7fLaIt7kr +/H0Ogn/Mh7tv6L4W+BV7Ydz9ffZDLFdQSV5HAzwojBN2So+FwX3r8gNX9EPr +1+btVym+lGgL+wOUP11d+UOIc0Xwtru2GQ0wPyqh6edgKeT9enCBfOgFizvO +XCIZtVCoJwrC9LlVc1UMa0EPhF4bWVhaXw7nHva5iaq0wGZ27bUtFd1wIE34 +jK5aFvitfXYqX6cdONS4Dj/63QWNA0yNq0WOMTIyOMZa3Ttgc8xv359hXXCq +sG8D1Sc3Pm05g/pqzQNHUH/E6RIrtU9OL48MQvve1wMk0T5rrsUoxUGa1SLO +I57HylpvEY+UNfeITUYD4RR+PoH4C+/YeyH+vutDi6m/JFyd3Rn9vSQ1oo3+ +5orfraH8EI7NQkLIz/wbwrnIj/oXsWjKJwnPkrmLfP599oOVXOZezLd/4oX7 +ubM+5t0lA5ULJrNawfVA5CXuuU9A+nJ8e/G5XuiX9VTBuCnas9r9AI07X9E2 +MYyfHJUSv4vjbVB9XTfPki8JhmZofu1N7AYmU5P7f/w36tmsTfljOyimiTyo +fpdc4J/TBt+luhdEp5SCgbH3/XDNLtB/LnhruLIJ8iylDg3R5/OmeHHHpE6o +PhgzoHZVn+F6Yvdr2fZOUKsLStui3wnB5yo8qD5hebb/OuoLSzbyov6XL6V8 +1D4puryQH+2Xfyr9Yz+eN+gaxUOcx/aoIJ5Z6ydMEA87+/UQip8s+2CZgviv +f+juRfzh4l5A/SWXtQM80d/sDQIr0N98do+9lB+i7mTgjvzoRfD+Qn52B4Xk +UD5J94mG7kBa/8IfaHAjn7kezcuQZ4e4oXGsc67ihVYoNyi7zYw8z9go2D9/ +7hPyoui1dAm180vs0wbkua1ihjPm65qwstV/8rRB+RLyfGeenKs1XxJ5Y9fE +1Edxcswwl0ee587xtMS46z28/gr69TVjroUf5VmqaUotNqWU/Hz29AXyMJH0 +TBX5Oj9hEI78nVI/Joy8hftFZG7VPckwuHHWm/JMMsN/VCPPu17JnqH6xMpY +4hHqD7K+50d9mwpLU2qf7G0I1kD7akXP36J90S+rBJBnQ7ODnoinwq3SC/EM +vgUz5NmnvP0e4j9bXzUT8a+1Wi+CPP8Msl6C/jpr34Q//o7vXoc8C+3nzUJ+ +9owt4kJ+VG9+SUSeD1vYPkA+Bdi4BJDPE9P9iXvUW8Mv+Bojf7ovNKrev4p1 +o3UHvyfNC8LlcqYV86Jja1X9FVo3ZKROdGOd25Lx/Snm0bVzTSY07yCMt0Pk +12Ap+RWaHYt5J7zwxychmp8y2pxdmK8Zb0aaMU+XRvQpldC6se6nsC/Na5J5 +NuAw5vWD76ILMM4MdLJ1kY/kmcKOyIPCoPMMaRF1xrK9D6to3SD3pd/FYN0Q +XtempEP5enKsRwv1JYuFL6G+4q1mcWqfsLIUPkT7AQGHDdD+p2ieXxQPkc/z +r0Y8P4ZmlSGetW9852Hd6G/t2YT4T23ak434NZZ9PEHrOGHfe2sc/d1+7u41 +9HfrOe6tWDfmpF1hdqb8POzqGkZ+Hu+u2Y51Q6ZDYxvyuZlt7kvkU7C8aC32 +0fzF/cmBG28ypIa8VbFu7/U++Vic9kGdgbS80S3JpPy1zCTW+W1egx+xH9hF ++Z3F/hAvHTOFfeFMf7znIdoH/dOLt25eUk0WL58xo5/2EV5DnhCsa5G5V58h +XqcNrdcR52dDnRXYBxewu/DRPkU03tzrwD4lJ7fs/UGany/lu8UwjpyHW+T+ +3QcvuBhcpn2Q9A4vbMI+yFr78voBzKtacwnUf63Xvx31Z47vztShfVDg3EF+ +tG9ssKkb7Q+qigZRPOTM5RWeiGeq6oo94ilc3depQftgs/Z2QcTff/TCV+yD +nu5xhdRf0pw/dRr9Lc7KnUR/X6oNvaD8kG3v5Z4gPy8XjEwgPweJbckP2gfr +vTiykc/bhXqayOc/+Hdm55jJHL/N8Pv9dw75R86XrrZBJDCFiEaLWeHc8o/c +qXw2YF/dUuKk8m8725qOcdO5iGScV96Jc9E/8sPOnOq4z8V89SG4v//I29fK +dKw+3kTa+KzNce76PzzHh29i/vWxfJP791zHycnWyRhuJu7WeWV/5rr/h/7/ +sv+/8Pwv/P/L3//Fz3/z+XqnXeU4/feFVr87kX+/Im1rtBOtuSeFva2QsOaU +SSzenUTEjNefd64cBOe66803f+WSw1WT4Q70GfTtY6bq3UG4fmHJmNW2THJ/ +JIH34ulS4uKxIz9BbBAUubi3544mk2czGj9x8leSddy322MSBsBcz2mDSmUc +6c73OL/hSTURfRI1/6DpAOw67Pp86Ug4yfGKCJUXrCWKMg3Gi9f+x1+DJq4r +el61JCvVvGORyABohMjziI+Ew45DO0JQ3yNf2Qj1X5Vu+b67Mg781SJOo32Z +lDncaN8p7l1szmgyZHycSkA82szx3Yhn+fEEYcttmXDdYmIR4p8drdaM+N3n +vC6w/5ULz4beEvTX5cmbVvS38AqXOVtbISQfXFWM/DDvbXRHfqbjGcaf8ZT/ +O57ZGiasaH0mJmXSS37rXWYICpRV4/6yfj/U22xaQ2YpguZDuw9kY+uPfdm7 +B0DaSO4W4ouJ3emK/I1Yp/b9wbln7Fq6Yim5tUPaeHxrFjl0t7/lyqJBkH9+ +ZkyQL5+0vuR0W0ifgaYxs8rPDcJ4n/bVltlppLH4xNZDbkVkozCMKYcNwrJB +p+LdCtFE47fDF66iYlJSvSXNJPs/8ePtaFkRJ1VCng5OHtlSPgiqK2Ytp/rQ +sVBrGPUFRkg66g9WsUS1zk6DujuvpdH+wbHaPrSvbzg3i+KACxfu2iOeD2NH +fpZRPFs3JHdQ/HCnwtUD8aeNnixC/BpO5YMc/JUge/O1L/or65/OFkv9PZKX +cJvyA9n5808gPx9UmoyQn1WqGR+x33lxz+dDPvf3O2cjn6tOlm3+k2+/OQ3F +DE4z9p14fRrzbh17Wuazrw1kskXilNiYH5Ez3LoxQ6kfRjY8P4pxc79sNJXG +EfnxueYixo/irPDZS2MqyJfGG5fcAt6R2Q5PnEY5BsGEf1gY/Q+OqtJQpfy5 +HxttRB4erkw4uv57JnFqcd0yKy2WLO7fXMZiMAQsDb+04/Z/JF1H9HJi6fNl +7uzAioT/5OPnS4P7U0o/EluBnTcs64dg0bFVsjH7P0LO5+4C1M/JUHiO+qd4 +XIvWfc+EgWN529B+2l3dGrQ/72BhMcUDExYOuxDPHv7zmYhnoSpz6pKYCli5 +zswB8R9Z3/AQ8SsKBadTf0G5WaBZjPpb5PtdB/3N3fbWOPhrA6y4G62I/Fx2 +/MaJ/EjuNTmL81us0Hwl5HMp8549yOfqaZ4v/hJfvUTSVGH/NM/pfD7W1A5h +PvhaZNmYH+QVvmFFO3EeO/YqUJ75j4YKYL4mHu3bhuuWOHy+ijxzByftcw54 +B0zFqlcQZ4/hywfI85LdZuEqNO6cMzaXoV9xdV/4KQ8kU0g9Z2ZaLDTI+3Yj +D5odFnnvKF/xA0qHoyl/qRud4/7Ns/wZ7vqk0o9w7rW7C/J8aOt9eeTZ73rq +HtSPnv/oFepfOHqiHHlm8B5NQ/sLWX81oX2to62lyPOOHUXPEE/dablcxCO3 +pEuI4oerxnYGiD/UfbkL4m85w9aDPLN5/ThHeQYl8TUa6O/OncmHkefReE4J +5GfvqBQ38pPPI+6GPJuf4WFBPqPqRjchnz9Tc9dgPzh88DI7jXOFi4K2bzDO +237y92HdCBy16PW0+wCPfterYV7kkS1HsG7YehSFY517peXyE+vGVu4iG6wb +Tiyai2jewcdHo+2YdwZbdQqEaH7O8owaovUDmKvsv2Oeaqql8WHduBX36tZB +tyJg7ypgU6F5Pfp28WdlGmf3mXKvIx/iJ29X/7tuHByY5UPrBsy+X2iAdWPz +/TkYl+Au9cAa9WMnHpeivkxFbS61D/vLKmzRfrzfKia035AaUYB144jRk5+I +58onBxasY8FqT80zaN1wXFzDjPiPDh1OQfx+VntCqL/gFu3/BP1dbyA2iP4q +NK251ULrBoglViA/4x/5ViM/pYHP9+H5Wn7pNhbk0+rYpVDk8+lsqVs4h2xz +meowc3FUSDg+dhzr9qHd40s4aR8U4NJYI7o7CUyu1upgnW91CuzEPvjdcLOY +A/YHtZcF2BeWeTdXXqF9UG99v4/F6VKI6W3Nxj5yv+724nxa17be4Z+PeNOL +uUcQ54r5WY+VaB/stbOSp30KophuLsM+JVAgsWsJzc/d5c5pGEf5/bMN/t0H +i6Qqu3W9aqF3QQSrKO2DuTKdIitonO1U12L8ibvtoIX6WaaOeXtoH0xR+bEO +7X9syeVD+3OUZKZonYWYJ6ULEU9IzZJJxMPrXylzmfZBn/bcYMQ/MPddLeLn +fZBdg376d+XMwqdI6cxG9NfLW2ghB+2D+t3Z8siP4l7xs8hPaFYowTl5dq5q +PvJ5tFx4E/I54899ki9j7597ptsK2r/+ziG2SQ8qH2W4MEy7mVTp3AKHXpyz +xLnFdmzdXvE2d8Y4z4AY2vv79yCM3Kx498bAh5GixSmA910DWlmAc5FVydsY +es5nHAoS5MB9/vt3P7yaqRLVV3eV0XKh6D2du6DScZ0dzl3blcw0gvZbMbKk +owww/y5eYTn07zlNxcsqjs518OCJ7fC/57qKaX3naX3mQ4852Z7aKFRP2y+c +tl+1L8s+r+KeQnbgXzxdxX/xMFdZCHivcFVI1f6Lf4vOX/xzXtgvK/nirLCW +96+/bdP+DooHnPZmeaTQ3/WXn8vhf/mJ+ntfpxA1zefENJ8z5+Y6V8amwMxH +wU9VbaOgOXBFcVvQEGzSC27xYab8Bm8INp6XC6ss7y2dxzkETd4mIqd0GJAb +t0Feuq0cChftjt07YxB4tgrpn9ZhkOvJPHIo53HIeI/y0O1nXvgyp5DkouTH +aOdRE7cw2pHcnN5UEZtCvjrWPMd1iy9MVuC6ZefmflC7WgUeZWJS7HalkP9A +PPeEWj8YfN0/eqO1HE63SPHvkamFX02iSsZKfSCWo7BIyL0YSnn7P/TebobO +CW6rU0t64TrX8nWzjSjv+idDVYRr4FJQL8sPq254OV6sq7K3Bop40ybFT7VA +5Mpl2pnv6Xnz+q+bVE46+TNHUa5aonUI5ULxp0WUqT6PTbOaxKkWsneW80WU +zx5KFqByUr796n6U6wQduYTyMyxLUjmNmgmXVUb6buEaUrZDaSaua9DldmWh +ezH5vEUuh+Ik234YOCBO/9nuvNQvwh/PfZ36RYZZh7TQr7KuOwH7rlYRF8X9 +CykPxJNbn82E8jDqpHUX9+v03pfNSrZRxFpubzXylrrjkTHuV2dYqfaJeblE +2F5RBHl26nC4bEz3q/HAXUu6LyR6IISB+/LMumOTCd2v7OUS5iif8/PQJ5Tr +ugb1etH90p695gTaMeL1XY52rjJ2sZTR/dJYzjeC61Zczh3Ddd3EtDmJbAp5 +vntcM4cpinhLClsphgxBcLTISiqHaztM/sgL4mZZolys3OVrCtWPHMt4TOXg +PbRSF+XfFGbFUzkI9ZQEorzAfpE+yvM90+fy9nso8O/f3junJmr67yFYttwr +Q8ExBQ7PP5srT5+3WNv9FU8OweRlbhmM+z67HfQ8Y6/w9zkEyZfqOsboebLz +28AsvIc2awxrxXNlTM/I0p2OKSRkvI2BdhL55ZzQTqVFu2GOxUNGp9rfda9M +rztxZaBsET0vFYlEnET7f59DIC24vSP8cAaJVc1LOijcBqlsmceXifRAnKKT +EI1Pwje5KBrjc1ffsT/xeU2pRd6O7ruc++XZGM+3siZlcd/nCodE0fgnraMy +f+L/6RvZP/HfVTL+hPGlAzh05v+8dOchI+GYWKv6vi5w5/75qyGgE+r2Ljtz +NimI0cm2SMcgvBNSRNw67m1Oh80F7tuW+HeAbbnRsDdPF7SFn+V335xOOEe2 +bkD5pJhtN8qz/W+MnJKk//9i867Xyp8Z5x8atL8W6IQmKYucmJRScuaTSBje +k5kum+eN91cbdvWhPomY0v+jv/hVbxvqu+xnnKV5Rxbbcjth3knsN+kYp/Gv +xL/uK8VJJr+rWCPOYKfWE4hTOtQ1mvpFpMZf9aNfXZczCtGvPYbijzJTWkhq +osV8RaES4NO8MtG0qQdiD88VfCvWQa481c0/N8uJoam9Mp6ZrRv0bfgEqBxy +eIULUD53PVsCysNZ2hdQO3Qe4BXcJVRCFKVsJJupHXVW9y6ap7Db5tR7zNO0 +dWZfEKf42jIvvD8dT/DOdGB9yTBz8KrB+73UPWpKY49bYZbK6qZulWri9eKI +lfOsLtibfd3O1/op2ZL/Ru/pmS4i1xogG5vbAW4uSo/uUv6LPq88S3kmLAW7 +qpHnjJSEELw3dFyXLLyr5yWDHQ7lov2DL60E6H6RN2P3TVGfDU6Xo77U8ng9 +ui7RbrlfhOtKJd06ieuqFUwJj+1oJ6s+68jGmhWQovTybZtfdkGS7GGJz8UN +ED20yDy+uIH8/LIvIHVeN7TpuobgPe9C5yuVeB8Za6cajvv4f+e40aXmLXs6 +SWhefNL8UbqPrBrDtP5AFdNJMaw/cf4fRzAOHeO38WAd1tuj+KdewWsxbYxb +4uHUJEjr8Ikg9nKsb8Iqlz0xzmeLsG8JO5wBt5liGDQvSKVY32XMi8tQkYT5 +O7w01BBo/omfYrqHeafYJlOOv3805O7Wwd9DcoXKuzFPWb6WLFVAvcigE6h/ +7aumJ+pnL9XMnzPsy2ANN1+JeXrc8SIP5ql0ne9SUZqn7HzHthuesFcwif1h +/Od3PVkZX6wPOgsH96BciryxQDnPtnojmu8KztN2VG79tZMxsKmT40EeEYu6 +O0dxuAWiZhpVJ3n3QFPoTBu8N0w4G3kU70FD07he4f1hikaQgOLJSsJ85uXz +nScrYUea3bN7hX0Q2xrrTfcL1rxKZflgVgCJqefn4349czorO07jSquq8kKn +SjUskHt8GPf3n325FVD4gO4LuERxBuG++OToC75bXg5fPzKbc5xrB64nWaWp +Np0QNNm5gcqJ6Oahcyj/fP9kEcqv+P2Ng0UDglcxLjZxv3HAeDjz6qk4XZeA +L7strjvDdLEhrvvENO8xxtUN6dpfURTn086IuYjz3meFhbrb2gkXR8vcwKup +8FhZu61SrxsqXJfm62xrh4GzqSJPrqYSaYernFVUfuy2+zr0N7z62mGMz0K5 +XVJop+mBf2cExb+pZ2M9xUn057kOIE4AqWIqJ9bfYxtRfm50zxeUP4SL7Mij +WoLDJ/okp8w+lCKfm/aO7cDfewKi+mrxHndPTkMC8v+rJbxh1oM8EMs8K0T3 +i6hZRg/jfuUFen3B35/eyFdA+xVXRl5SaxDeJ59k73RBfgP5829GePkzpC6+ +D0Oe181Xv4/5EHboqw3K64Ytnv2Rj75vxfvotiuDamjnzKJ7r9HO/JXRo65B +5WBSxTiv8LadsPoM860U64T6hW3e3/jaiP4iwSet6jVkqfH5p8O6nVDq8Xxl +HrUj8ujCkTKrLPJlP7/vVHcn2HQdeEzl8MUkX7bAKguubRL1RLnIpo4lKC/4 +ud0A9Y/Kvn+K8uH7/mqjfG1Qx8zM0aheA3LR363Qvlxrh8l9iscmLF5b/m07 +cLQmzUU8q2RtIykecGcqu4d4oheteoD6/HOeJVB9Mk/ypTrqR6d8Z/mDfz67 +DLVP9uzuWYT2Fe3MXFA/xU34xB2qb5suZYj+OtlYz0L91U8VfNGvjtZr2xF/ +aVasF+LcNlu8Zg0bnadY4y8U6L1n1JoONshv7QTWg8opaYInGePmu75iP/G8 +4f6nj5z4sNLxi1IXiFk1S4a35zCesvIE2491AG+87C0qJz9VPSRQzjs5/BTl +zIFjJdQ+CbJfb4X2VX7pd6D9MLHQeS7KzbBvoL/nNn2udm719N/eSeNn7m9n +5WZy2ijlC8qFRrc8RvlQ++Vk/NuEu1eU/juyolfhBcoPLdvVTuVEvM8M7ZG9 +89f6oNyeMcfFuykKljK9Kl5eEgyKiXlSHF1DwHmqxY/KiWjcwz9ytbKQP/K6 +MLWOmUvPMyzT7rKfpv22SmdnAfrLsYt1vJURRezmpe5+8D4YCvuPqJtQ/dTk +qdNtjCgoatz8R17TqLMf5X71jLs0r0FkhsQhzOs56g23MK/Hq5/dmTuzFZZF +dlgwFVeCYWClkHp9F/wSC4ykfRwiOhpfYB/X7dTww/pvvjDe4Dp7PYgsJbs2 +sbWAF+NCxW6ZLph3MWkdtUuGxyPOYf1oCLnti/YTu9niSmSriV/Wd/XupEby ++vxYWvShHlD7KpZXKlsNc09Wfu1KaoTHXjpBKA9d8diD9h3yPHN5E/ad/JSe +57gu5+todoqTaM7Or2MuriSLn1+UQJwzfULbuWn9XXFTmJ23317h73MIeJOz +5qbFezHMi7tMfLuDIbUhPennxBAsX+5H8Pee2mHjw/j70iTv6Y34u48q654P +FA+JdRb5gXjuuUcFI55li1x34u/KmasP6+HvzE32L4+gfnqKjg/1C+6Yv9VE +v5Z4OuSg/ti90Owovg6obdKTgBvF8NHuyQ27J53AvCuPDeUCGooKu24Uk8Z7 +iy1RPn+nPDeVE+X367aifLJz9XmU73ng8wvlJjMfs6KdV4ncGiifPMGc8HPC +g7HmxN4jgdSvv3/T85eY4WHkIf/3/R3fhBwVTI0NOZAHi0b020OheJqHv38P +wZSFT9TcmigiuTmXE3n7+xwC7bKbnSi3ExDciXa06g//kTs7Gbw5K/ZQgXV6 +3ajpdQ8vKhal/Zr4B2gQ7NdlDxOuYL/+PuGyZOhFMZEx23m7bqKV8IybBZka +dQM7L9sqnNMGfUwlcL5aGam5AOcrG9vPqrgvluHJWsizWOmpg8jzZfV3T8Ni +Gkgs3xOWM+q1hMe+w8JFuAdamM744Zx2snQNL8578heXjeG8J35rxUfcr22z +H2nh/uYdMdmKdkzcs+PDYxrA4Nf9k6fVayGF64EK2pG4uC+RzuGQdKIK5w24 +ckzSCPHf4L3IoPjB1LX0HMUPmuw23oj/d875KO+pSujeFldXZtECXK/yzJPk +uyE+/9adq+z15FrTwVqaF6T708lvmBe+Vjca6brkw7omfVzX9J6KAq77+ZtQ +M/ULbhV8/Url5N7osBHKF6R4ZVgnd8K98dvvhyGEwSV//6uvQyc0cEIalROJ +73c+oLz3Uc93lN/K8ubzmqokuSajAxQPyVngmY54LhVpqSRntJLMMzp7mG+X +kiNTglM3N3ZDXAizIDudTxwCby/GfmdYua4X+92npqz4xaGFxNR4ZriOXSvJ +2rzdTnOsG3g4N5fTfk0WHbVqC6L9+lXcNTbs1yVNy4rMhdqIo8GNW459BUR9 +SGvJV/du2HdBvalpfgl8am28cvx0IsTeXPT58vNBmLp1pVxU11fhcZ2+YIVb +AbzU/ZpRtmwIROaYNHcEFANL4SdGSXQ+zO/S693BPQhLrh3dmTDrocLZWwM+ +AkXl8FPUUKZDcRAu7de/uvZhIRguqgtbrlwBYuLhlrfWD8BUZbuyvaizApcj +h/vDVzVgfM95wv/gAPSb8jaZHssF/tEtz5vP1IHp4pcNjlL0XOwcdctD3Ubh +jsK97E+HGiBlT2VdycV+eL1KKnuoKR18mZ7HPJal5685fimjC/rAXvXUipmf +rRVG/ZfoBNU0wb09EhnOKX2whbVk7GxdImypNPj1bV4rXDfqVChd3guha52z +h9MuKswajlz+MKIZnpl3NTIf7INvW8V6P16PhJy9OQditrRBXqor/xanHuCR +OEt6w84y5kzrv5zW9zx5fNbn65HEznbVH/1ZInELUH9JWWvPLeerjG/TeO5M +41kalDbbrC6R5LNL/UA81i6hsojH4tz4sx8bnRiHpv11mvZXYJem1ZemdLJi +tP49+ltR7p6A/r7aaJW1ocOJwT7Np+k0nxtvux89dSyXOFivdEI+DzIn/uFT +qYKNvU/YmdE1vV9Ji//ul9cR1wUyDwuJV8saB9yvsdtbLXC/0sPOPuPWuseo +rP8bD2N6f+NBJyBBojOgmDxnfRiL8VC54UgLxsP3rO2rxwPuM2pV6nPb2xiw +x7kuUTx9CGy/WFTReCO/ZvK+w3j7GHHyT7xtu7msJv1tAyiuEpy5fm40NN4+ +LDQF/aCnHmnic7kRyvyrnh09ng5Za1wqsiL7oOFA0/mipY0gxddwUUOpGAI+ +94+XsPdB6r48ziea9dBPsmfId1XCm6sHnnMc6IXFijaRCefToeXHG4Wzbu2Q +kPSlhIOpG7gDje5TOYn7dRNQPvf1YCnKDy6/qNcUWEoWeqrOOC7YCsE8xXX2 +H7rB6+KdFypN1WSm7Jfk5LQG0P41wDRl2QMh7w9+CNKsJ8l245K4rs+PnR9w +3b4zZjMoTrLRQvg24ryxtWp+KcV5RK39IPWLJNd6hKFfAnNTatEvFZ+RdsoD +ka0KnYE8tPPKCyAP7pJi4VF1LZC0713Ak/0B8Mtf1fu8Wy8sWuik79HcCg4q +5ipssyJB/UZ09aXMHtgX8bP/95s22E+enlru8Al2nPnKYcfVA8LRxcleq9vh +d7/oOtfBVFgdsv2VmXE32Lixyd/haSDz5G5cVFzaAnNNgwc25naCGM+2Bztk +24gN/2iemVsFFKl2dcpsonXynjSLrmo7UTkT3/GjMw/ErzSwXyBdcFdi2TBd +l0TJ1hjjumsD0tlwXUO5W+oUJyGz9h9AnO8/9rUizh3a3D7ULyLIcvzIU+qX +zbe+p+jXxu7Ynegv9xHvqef7A8i9mvQqlHfdrtiA/gYbhOdyzIoka8rvjKAd +7vJFhejvfNeDNqscPhHxe1L8uG7oYztmF+pXWDKz1q6lLSRv89Ex9OvIxs/l +QP1i8WBZYOFWQQReXphAv7jfz76rQ/0yW87a8bMzj/jeWLwF/VLbaJCKfnVp +ndJG+6p3exejfeNtL6TRr2ML+lcjHuu9qWOIh+uKkR36tZU5oAHx/7aeeIv4 +lTeoWWGcm/4oMaH7S9aezduA+1scMKriTeN8oHge0TqeTnZ+H+XPpvGgN1a/ +ppDG+ZndInU0fsizgzE7MX6sJGwKA2mc39jBb03jjWzUWdmI8SYRstilMbAU +XhOYOCbYSs6nRXM40LgVMU8K/UzjXyDJTJrGOdl86ORPjPOOOt2P8TT+b0m+ +X4Vy9zO7h1A+M+ujVUFmKYm7oLEiXbyVsH8eDr8U3A2v7mS9Uabx3+6yQyQl +rYEIRieKYfwb2O3IpHjIpkYbG8Tj532+CfHcYdmG+ElzaO8A4q+R4wLEz1Fw +P5D6S6Z+nqhBf2tHN05h/KveaduD8f9clycL+TFe3imP/Py8Ne91I+1Tti/r +txudTiQ7dz1vwLrxdmC8t532Iz67pUml0fnEM5T3F9afK6ueLJemfac8QpZv +hXIFGSlRdsY6Zhviw3mS9pelHg7ltB6SNwOV/VgPlQX2DwzSPlJwf1MCratE +/dr6bKyrBb7Hfp2h/eIpswfz93mtpIJJYwfWZ2270dE42hcC19ltpHWePJdc +uxrr/FfRX9UxtP6v5Hy9CeUep4k0yu/sPi1M7ZB7A8dZ0M7Piu+KaMefKyad +rku4mY9+xHWzu67m47r3yjSiKU7iGNGUiDjly+K6EWfNzkdz19D6LHmVdYrW +Z8J0SckG/WKT1f9NeSAjTO7vkAe7XTyTyMPhu+teUd5IXhDzgCHlLaqkpxF5 +m75/YMoS9LpwpoZBgqXUbPan/9/vpEyzN3zsKXMrIOG1HVVY5/+Rz5do0KL9 +gpje2rIN+8U/8osXGj7RvkOO8kkNY9/5R97gbJlO+xcJdmmvx/71j/yResen +wJomEhgv8hX74D9yxy+bRWk/JZ9G9nZgP/1/yf+Xnf+17qX/gZPvf/j1v3go ++C/e2gydWdS2FZFiWzPJ+SGfyRKL7neDDYNg+1jufdmvPCKyy8N2pD+LCF+M +z3kfNgj3Vmwp9OHIJu9ndZbf9Comx0avGx85NAjLuERc9APTSPZGJmUfxXKi +v4j17utvA/BQzfAUS3YS4WF+6+Y+u4qUvlnzs/LJAHyqfTZ7PVMMmXuCQ1t+ +qpqUbz5x54DuAJznzbC/xBdKCo6pPbi1vJZ4+hUW+UoPgPOSkadWfKFg5rjJ +A+VHAnwKUW4qWvh6A1MM9L9rPoJ2FNJDnNDOpQUyuC7M63P8s+7Coi1/1mXe +Y6OpF5gGJvJL1BCnAouGD+J8PubS4MWRDVZ64i3o1651566hXweOfLpX8isP +vhRJhiIPnF/mdCEPl9JL5PZuKwJXY5VE5O29XHUu8nZGkCusnFFDWKvsNU/I +vCdhn590sckNgL2HdXrlQCVhYj1Rf4efQU4PsMsahAyARX9x7OPYMiLVmxTz +uD2d3Ks9R/ZPDQDPQkUZyxXF5EF4e03Dmxyy/IZbp/beQYAPN+z2xGYT9Svh +srdOFhCJlQGuYc6DoBvaf2LyQzLpPqUnWM5RTEJ9Kr12fhgEzsDspoqq96Q2 ++Lnh9bpi4pQ//6hG/iDouW1Wo3KQ8lcxQrngmh1aKF8rs1Hu54dk+GDTwId2 +grfOcEc7GyR0Lu+NzQb5GlVpXPfMkXxbXLd+QjCA4oSppcp9iHP3c4cqxLnb +43Qy9QsenI2qQL+6lkAi+mXc3LyN8gABelvHkIfJPDYN5OFrae0RyhuIG1cZ +IW/b/Vf/QN6e6kta+h1vJOUx6XNu1XiTCO1RI4/l/fDea2T2jnl1pD78h1Xz +0VBybTjBtm+sH5KNpoQjDKqIkqrihR2GEeTck57YX4kDMKJkVhWqXEbKzlwT +tr4TRTSc3AK9zAeBERQ562BYAVEMXPnReWMMaR/UNZ5kG4JPV8WjrSXSCc/h +lw1fVsSRg282JTKuD8FcNubfx0xjiKOEpRG30UdyMrBq9eO0IVgg8XypgWkM +tDUMmaB8fYTvOpQnCzRxUDvgpnqiFe1Yhwykop0za30+03VBrDfnPa6rkJKn +heuef3dtdphyGYSFlC5AnKWqul6IU0r+piD1CwQ2nhFDvwyuN8ehX1+OJzpR +HsCE1SizifJw1S3VEHkw3H6E3f94I3z2YfQ7Ut5WzkvdirxVMZS4qJysrt3U +erPGG/qznsmi3HQ4aBD5fKlVnkvtQHOQgira0X1lnoh8jv5U9ZE3jAAjORF/ +XDeY44wqxUn86qW3Xb4TBZ7VE+6Ic7OEojjyyb3ENO32xhjwL0k4iX75Xwke +uUz5DDhvd2FwRRykH2KuQB6M3cR26lA+0zZz5c4x+gglb2V3IW937mpLIp+J +BumpKGc5obYV5TWz1s/9w+fjO6Zox3phcg7akSn/noR8/tpzNQnXXeEapI/r +Wtp4b0U+uU+0/sEpwa3hiTh9z+4yQD6reb8bol8KE0wR6NfpLTODkE8lGfV9 +yMNPz5d6yAOnvzUL8qn+macXedvatmsb8jYqoJqE+S7msWncWOY91BkLtGHc +bjwvF4z5LvRbwNyVnwFfOcOUMM5fPTgWhvm+5vfiTTQvwLM5Mgvz4phNeBjm +e+Ut69M0j6Cqoq0e88hPot6B5h0JbVno43iyAOLeHnTCvNv++3blBM33rYZM +H8s4iuFmq3445qnJoxbOcprvDm0nhq/VFUO3vfoZzGueU4JKlTTfRc37BlG+ +qD7LBOVnd8m8p3UDOtKNo9GO2XLzp2hny7pKMcz30bwOf1xXrSP3Dq6bOXq0 +BfP92WjxCcQ5I2h1BeLks0jWDaT5HnKAbQn6NVCW/xr9ElnaPaOK5nvv9x8G +yMPUdrb1yMP8LQzlCprvIje6O5C3ptfrM5C35TZbjffTfjRyMFhjXshnkPa9 +Hoh1dZPKBq5y2o8UWSYmhvuzwM2UkYt1uKzJZtKX9iNXS48LtG7DYc67Rli3 +X0vnnz5G+9GTk4Yx3orlcCsjzQPrvFmJqDQr7Uen5zLPp30BBCqOzKmifaFm +JDtShvaj8AuG22kfgZNzmB5hHxkOkVK7SPuR8qob/rTvQNfYwz99x1FUZ/Y1 +2o/02m57ozzhy9JclN/O2h65ifaj40XP1qMdrjlWLmhn3++l0XRdmBkgzovr +Lr/rw4nrmq6NmGlA+5Hc7bFExJm0tjUQcQblTrnTPgsPSu0t0K+WkaOWf/qs +oSwz7cvwIX5TN/JwbORbLfLwfV1NLu3jcJTPyxB5m9/WGIa85Su1L+Asvs8o +CxsXaKHnWf7nCnl4nt18Uk57SPI+45hJYgadE2AtN3stzglbVdcrtuU9Ynj6 +ZGrg+Vr0gsB2nCvi/OZ4RnndZ/h9tPPHc/rcwJnjOIeQmG+eHuo2DKV9+U54 +3r8azDGAc8uh/UsMZ362Zlx7bWpP5xyYknjM4kLnHLFvr6qH0y4yTHe5jXtG +NMP8b3t//nsuujgtF5uWi1eX/az9aKXgOG2HVfKvHc6knuKCTS4K43v/rrty +el37AsEVt53cFF5N45Sbxmm8267OJNFFQdH3r1+c5n/92tTEzP0m2U3h8TQP +6tM8BB2SXjEpWQjf2dotAlIS4bwvIcLtg5DL717UNJoNB37Ur1roWADzraxm ++dwcBLvmRBPPqFT40Lumsji+Au7PvpjcmzAAh5lYFy9//RGYfWJYL/DXQbrF +XX6dqn6Iuh0wppTwEsSaloxuHWmEt6PNm5PG+qD1fOnEzOYHoDixfe2YdzMs +zEwfttLvg1MuenXiWRcVtH5osOeytoDX3L7IZME+8Dh+bo/vjUjC4F1536Ct +FT74H/3ZkNYD60OzZVgjPpGkR7GN+VdaYPNAnFz3817Ytey4Ef/NJGLB49Lj +N7MJ9K/vfyNC+kDgV+9ahlYSkQ5J4mzeXQtLr3bv3TjSD7ucdzfM1KqH3c6P +ClYLR8PKOTJSXr79UH7KYPkmozpwHX9SFFKQAW4P5bXLTvVD5CqH7LF5NWAR +Ic9CnpZC5KeX+TKDfdB5rOehsV0kJEs9mXxm3QYbU2u1PI/0QPIqO6lWeo77 +tuzym+9q7XBsXr7lwo3d0GJzvrQwpIjsWCMjcXdnKxi+BjVhnh543M57nGd1 +GaluOW6u86gJ2MW4V7xY2gvOnuorufrKCHPUOZl5TnlgrMPudOjpAHjOUPGx +cikl+q5MKw9cToS3y9LGBc8PQkRsp+TAvRYYCJ1yPXokANQmvh1IZfRCldat +dBfxVphcejdp7aIPcM7gh9zaXb2w5Z3og4a9rWApeqTl+I8UKI5XuHumsQdu +cn8pE8yqJW4782cc8G6BCTf5bAvxLjCufLhrrWUzMf/ivjh7ZR2sENtnNlzT +BZaqs9aduNpC2KNFTtg0VIBq5ra8xuvdkDiSlGf0rJkcW35NMpsrD/TU1Ow7 +b/RC5cUrJnfZm8lslY0ZD5+lwitB9U8+an0wJBK0X/loI9lxquJ7wdxoWPqN +Q9lgfj+ElwWo4P1D5rKA23h+92L3K8fze6mKXABPeytkzj5k0OccRghLN9f2 +vB6QS2y1I0ltQGSF7LiLX5B1Tk89BMV7QFvfSSjkbgtZ77zgs2dYPbE0YdcY +CeiEGv0Zu1ODOojkJ56Wl4YvSKDu3hcF97pArdn2HrVD1P31H3AUv4DkMnc3 +tHNL+9cjui7RaTve1uUcBlvVDBfguvu8wrzwnqGA44gs3gudIBLBiPOSrE6h +0tFGUDK0PFxIz9GvMs6bol8cJ9fWurE3A+Pbs2+PnqUSPn6vn8jDVMmDAMob +9LJNvqO8keb7xt7IW8kw2ws710widzlgs+CbdiJhXil9K6MLEoM37Kf7SGrl +tj8x+pFCmC4ovMB95ErnfUj3ncyx5ZRct+gDOZA5pIP7LjKh099/r4VU+kTI +6R4JIAMzr17GOFG0E9C3dCkF22PaPQcvJ5Iji3mWLaRx9c305Ko5fWVgwhQ0 +Z75THukQWRiCcQhr0975qVWAkOXbxS++lpGJXk7J99f7ga+2b0/z+XTwYdnu +S+OfjH0cCcL4599+/O1xu0ji/lW5jeYLEY4aNMN8uXGhcqNlayoRDJZtEDnb +SuwbhWqzk3og+hLnTaXEQrKsbLvkIzkaRx2zbbNte6H2x8sdG43qyAcRp6Vh +BRlkULvBHvPUxEiLn+Y10XbQDZYWjiaWH5WPYl6fO5Kylys5GFZG3c74Wcsg +ESvuWBwidO7doHSHhysKmHwGnipWFxDxAZMYh9lDoO73Zc+1vDiYJzLq22Zf +QW6/kJIyYh6Ea6uN1D9rJUETW+pDWk+IomcZYD356qrGyXczCWoldgTR+kNC +mx7mYv1ZNSd37YyIT/Cr7UEfrVdERuSsPNar54uEtnrfiAQr73WXaH0jR/qu +zmtM+7/vg5gOSzBP5bC2kJXRpjFYD7+aC3lMNT0g9m+l6ka9m8lbs3iJy7R+ +Rh912L0z4SUp1NyrLjfSSMo8kpdivS09t3OdxOuPZEJaf8CMv46s8WqSwPoc +kzV5qP9mHjHZNPfaA4V4Mur6eeQk3xBozwg7IamVTgoZ5+2C0rLJm4TEeMHJ +Qbg6f5t2WHsC0bu6smVbdQlhac8pOOw6CByVpx+6MEWRtyt+Zi2OriRes76s +5Kmm8eD39NNNyWASfDu12byoluglzZWy5xgAoUvztdvGnInhrhbZST46p9+X +5eRX+M89gDlLjXAW3d9FXT7DW7z6oMriVlHKwlCIjlA547Wwjnw5a3Lz+Gg/ +hHHO3K0oHQWv6zqF/etqicLOVLvTdI69tOJUqe6BWOiSH3ncEFVDDqzbuiNh +7QA8u6JcVmscB0cnz9xWMK0i6vXKk8IvBqDaoGjO0KkY2geu3S79XEYcG3Pq +MzUHoTBq9Yp20XeQdNffXOBHPnnN7PWuXHgIXrT9uLhPt5r0CH3bEbnxPYlK ++6L/22kAFkvF3B25VE5sey2sykyTycYiw3mqswdBzscx3cmWnrcXTMWveplN +9lkctA1Ro/OkskCFinQOIXMOdeVuLyYHhq0DTdUHoeCzYL11egrh6e+dtZhR +RgL1cq/OWzQIQ0JdSlt/xBLBnNbnLynPo8oac8Zy6bnv3km7N0KhxHiKezJk +Rg2J8rh97pPZAKjN3PRhsuE9aOj2ViZyl5LHFi3Ol58NQr/IPNFn9wlUtooE +rTxXShZPxNpKmwzC7a41bs9HMsBBcvHpXUKlpGfbtevt6weh+KJZpk9PLgg4 +XRls+lZMNk+uPiZN8aS57dq35EUhBE/c4Mt0LyDyV70aT0oPgsgJB80a92Kw +aY7ctzIik6hr6M7oNh6EZLN1Db/mlUD22smeGx8+E40Lo68kIwbhR7PiKf5P +DUQ0X185vdqbjCa6uApr9sNPvd0rL/XXEKU6YQ/Ly69JUo+MZtemAYhYX1S3 +pb6CjC7VlWgOjCOzC35qbx8eAFuzywvyPUpIYXl1A7NlMhmPe1PYZkfjk5// +/hvZXMJ9UmeJ3dsMIuNxXGRPzSCwrmd8uaGQQjI1vzLlhOSSXVXrfYBpCCRY +Y5g6G98T0bg3SV9GC8mMs8/dj0zQ/dJf7uppHgO1eYWL9rMnkV3HHs2ofD8E +hhZXlg9Gp8FOeVH/lOBkki53v3ye9hAkrlccoTMjKHJVXxEfTCFW79qCb7UO +QvaLM5uTv5eA7Xatamm+VMKceNhezmgQfgtP7OpQrYCl447DexKTySs/zS98 +bQPQsXfumbWi1fCAlU/Zgi+BKA/smHX+0gAskij6+fBcLZyKy725kcah1jFi +pzt/AB53GP85/5KPG5bjOS4vIfHP+dfqNOQLLqgjWXXmjLcbAmEiccR4dKIf +lldJPLI6WUWGjOY8zz/qA3qXW9d0ZA5A7DpuZclDZeTKA2W2vU9sYO0t7UZC +50BrP2/jtYkFJOmp0dYFXB6kqaVwSb/oEPjuO//x9sZ0wq+t03qaN4wYhrLd +UXo4BJMPcrwWWMSQkbOL7X9YRpHojVHj8aU0j86EJMy3iAGe0PCmUcsoSItf +x5JA5Ydr7rdQOzDbd+WXE7xh8GlVqBvayZ/Q9JBJLID21YU6rFwe8NKpkhvX +vamtdJ7ihNZAf51TT2wI54XPVYizLCRHl/oFSyPl+kqP+pCTWZmy6BeYR92j +PEB02KokygOZtyL/IvIg6hbEg+ffC5861+N9gj3f6y1/7hMu8Kg+OldL6mpG ++CjP4OTmfwF5djzJ9pnuC6ljf5t5gS8BRJOP/zxH9yU/6uUmuo9EOdnlPd1H +MDux/DvuYzm/WgXddzIi+IuD7jtwszmZ476/HjvATuOEHHp5ME5sMAW+rlOO +wzi5p5FnPhCdRnK0Z19KDk6G7DjfDowr/lWu4ffNY4hz/bySvexJoPWJZQHG +4dCe8JM0buG+ulH00GghBBw98wTj9tlruX4a55BtHSieHZILLbYyzzHOE5Zt +aqd5AcFf5Q7feJsB+TopSzAvXJlf9dM8AjPvqztpHkFG8fcYzKOhkCvDNO/g +g57m2sbAOOC4810X865S6xCD5ik0LxdSv3T5NaSp22zCPJ15+OAvmtcgam24 +Kq3aG47HmxhhXgtWJLn+nldCGuJtrG0/fAYH9oOWWAfko3O31LoXk5ql7Okr +IjJBb6Cmp4vWjeMHerqXvSgkmW267BnuBcBrZJOOdSZdgs3NtyeXXN6rak3r +EljzzDLBuvS1ZZcnrWNE0rBWmtYx/C7IEeuYzdt7skH3Cblxd/AkrXuwMGOh +J9Y9rSPKFhMN74mpzXd9WidBzC/4MdbJdUrucz4IhULbgg+coTNqYFPxxxNY +Vy/5nF+w/UcsXE8/pkPrMDxOY52HdXgqg93qanoKzDY/5SDKKIMhVtM7WLeN +PLYb7JbOARfnL3dpnQf9xyHBWOd/7wpY42xbDGx7fJRpX4B031pL7Atmg4/f +0j4CX3gqXpSaJkOT47n52Ec02ifWq+lWw53T8ysiaBzWJvJsxr4TXaD+1Ugx +mJSapB69msAAXW0lZt7kISgzXsMYEH1HfNZGCtD+BXEKIm+wf81+vGj5t1Mx +xDJR/hztd6BhJFmG/S54Zo1jk3Ec2WIkIU77I9jtWMQkQvtjxLUWy2MHYolm +0f5ltJ/CpuMmB7GfNs76xbtDOor8/pDb6VdXC0J86g+w/wqs3HydsTCU1Kle +vUr7NSilSjpgv/6nv/PedviaKdcMtT+PcMjS/s43rL/++5gzHOJOFKDzAMyJ +E5uH80DFMaNBV8lgUNS68ZTODzB0s2Edzg8JmZlVd5ii4EGGvA2dNyCYXW8j +zhuqKzujwtsTgON1jjudT0CGt70c55MR3xsydJ4BuZSDM+k8A1z5Q6k4z4ic +6l7PT+fAXWKuh5nrGOC4u0YH58Ae9oGB+XQObC65G0rnQNC58SoC50BVjZmf +btA5sPLN1ut0DgR7PtbFOAcOS+Xvs8uLIy7bVl9Deb+y1SKUP2SMsjyMovX9 +Q0AGnpdJ3uYkPC8v3yDxmNonLc8fhKH9Je8ORKL9jRM9N5tHs4m1vKoYnrsH +BmumvGkday7y/8ibHEwWWRzRRJycaYf1EafGuqpt9PxOxh5nXcDz+48fIQw8 +v8e3Bj30p3O4P/unWXQOh/csZb/f0Tlc/7++45ia/o7DcFpu+l/fd1gfT2Uo +JxZChn0HP523Ye6JUxdw3o7SP3qKnk8h8oGeCZ5Pl3c3rsTzKc+VknenFZrg +OHfbpNbHGuBl9/J+ldsNR1q45tDzIOzojbiO58GGSr1mPA/+tn8oR8+PEOKQ +I4Hnx1k68Rfx/Pjj62zT2YJVxKHSL2qGLj1vjg9wz1XtBrOu9R5rqH6OwuF7 +OSvriNC9spuor/Kt8xCnYBVkvk+opvpkncHTTagvs7PGleqT0vX7PFDfUVPf +CfU/FN9hexjYQo5H246z1VWQD6llryyMusGDeSKEm567B36UvqJ+kVcLPm1F +v1odbXxH59UQszmZXPS8Tz5z6HOvo+f9hCcVPvS8Q/IjT3LheWd1e5c0nnc6 +OkWv/pAshPXDs6bovhDm7YuqcV8uCXiFN45mw5v2zzOFHAvIEx9XDrxXSRMW +nnKPSgW7SwMCJfEVZDDBKx/j5DO7/E8PGj+2qx/OQXnE/TfpKFf5EfT4Oo23 +4AcO3ngeidrvI4bx9vRpAAu1T6Jrzs5G+7P7rvCifcE7wXO5abwpsax+juea +jTsdP2K8Pf1SGzlO46culycNceaGHuhAnAvDdZI4aLzdDV6RjuejS21ulzDe +Np9O8tCldYZfaEyM1hkSvIOLDesM/6t376gcmopZxFGeHjXJinJni0m/3pt5 +MGytOornCwNvaw5Ter74XB84b5CeOzbviS30UIiH0Hqpejx3NG8WlR+g+jP1 +ompQ3sJT2oVyKz47UxNq315SVRPrm9HS7795qP1H6WUnlpZ7K7xR/vseyz6n +v++xtOxacEXcMwX2+Jm/7gtjAB+3oNPvK0OgmKV+ad7TZHLMsuuL3YpCuK5Z +V9pfMggJgcm8kp4p5MGLVn/Ut5CcvIL6z+zZN12m51Dn/Acl9BwK0bLfc/Ec +apViUEjzgvQxzP7kxcRvdzPMi6+VU6E074hHYv54OM27LwpMf/KuoO/aszEa +P44SU+x4X2RT/7Yc74sawq21UoM6YPedtkd+hi9gcbDBS7xnePby0g6Ub3x1 +LRXvH27ZX4hE+fIajVh710z49HzzFnreh28y+xbhef/IVoWXglm1IF+gPq7u +3QKur2rq8X5GaPWxGqpP9Cu48H4ANnuvFEF9jZg7K2OeFZPaw4raP3a3w4bz +obMtD3bB1Qc9kzR/ibiTcTfmr6f8K0fM36d6543xPuSuZn4I4uQxhyeI55/v +PpiYqvP//d3Hf+Ta/7/vQV5Ofw/iMP09yK7p70H++U7k1n/J78jyJRvTuhGx +VO+ebUMFCbxjXYN1o8141Y9TtM50rbHO0f5YQ/YIF/sjzuILKw3lvndCzUpx +Lp9jEYx1ztcPp+zthC/9AoUg2wbHcjWF8H2SI9Lvp/B9kh+1ip/5KW9hG3bW +HfBuIeOWAQR5ey3/O/gG5flbt9dWvFf5ej5ODnm7U/v7BLVP9hitO2ZdHMH4 +mO1yAO0PRHC3Ujtk7xm3UrQz/9e5eLSTZvDB64xvHWzepv/SU7qZNN0vzdLv +pfvbpf3rw7Ni2PPo1F3KP8nVq+VD/o+8lR6gdQYW18zmxjqjO693EuPk9vR3 +Hzr/9d2Hw7Rc97/kh3fNWUbrGBAtFoJ1TEFTch/WsXWXnz7ZRev5auOQtXh/ +ErAg1hnjNou9fGtBSBGozQpddndnK3mUo3UB7yEFuk5fsmxNhTNKPXV4DzOD +U7Ya49+L+dclzC8Rs6+iA2EM0nfI1f5PvoQWZPI8TYbuj1XP7FcUkuQ9Nysx +v5S+ZguL0fzaMp4ghfo32o7fRX0tX4uLU80PFZZP39s/DP57bz985va1Hqts +sprD/2igayvcmE2kRfV7ICuLbVhweQmJdJUZ4hBthllDi/tjdveCydWZZp2b +qsisfWYvS66VQbxD+be8tf2wJv4hvgcFjHOanfge1NArmz/vQV18vSRgB42H +X/d5MvC9qYuJ6s0YD8pBR6Tv8DRA7g75E/ieVZeZ9i98H0n4t9rAWd86In78 +FdB9hPsSO9/gPlb+1/cXa6a/v7ibUB+qQ9ft38M+gu8pZa0VXYLr3nE8N+BM +7YusHNHH950mupV/oP2i1Xz+HZuqwNNJ5g3FT1zTJxfnr/3P9z7/vb/CMl9j +BZaXwCkXEOQUbSa7Zh1ji6U8vPILDOqyyobNqhkGlDfSf1xGGXm7Wu6odq66 +A+YrhZ6eO/qAIWSYdW6JcRecquCXuHWpEzj8bLm3vHrMMN985JJ+YSdErNBa +RuUke4HnfJRvKWa/jPJHo+7a1A5ZXJx3DO20L3A2RDsDcvnn+i51kEOWsbp+ +DTnkmere+6E1nRCjWnkr9G4L2KrxHnUPq4evB1XU8H6VV9JRtf9SBwgvvWhx +vyEHxjULbqF+rj3L4hCq//PbuQS8j41YWLgf9YvYysypfUjSubIK7Y+Y1t5D +/Y0aB69S+2TQx8UK7bcd89yH+nM1xZWofXLxZMM5tL/bYasr6i85NNxN9xHO +u4/I4j46vuSKwn2c/3zPl2iaj1LxVgZYD+sHbvJiPsJkkh/NX+IY2/YC8/e4 +8Y9M1I+xWZGs0lQNe9aUReF7hjJzNX//suyBlIG9UzSvSZaK4gPM6/HVV3jQ +TolA5A7zwGay9hQJTZhbDeUf6oc1H3TDsRN1jAuBzdC25XFW4txqsvmU+Yyj +VH60r9ZRmdq/1JQqju9xucjDKnyP62tkUijVJ9d1FSpRf3L+LR7UT9h+OprW +QzKv4XQd1sPop2JvsB7ui9ZbrMJcRzrjhHYd8KwnNb4xzVd39EDz9Pvepv/1 +vnfrtNz4v+SBUvfmU/wgv9UnCfG/0FTjxHXfb78ou5u5DvgPdmWqe9bDz8a3 +n9C+2XnLG1a0biTdvViBffPTsH8x1o3W665lhbTO5H3oF8HfO9auW6OBdeYO +32OFwsxS4NPVXZgu3gqK8tvu4fts/MF3Fah9InGrKwPtP3bQ/Ij2mZJLZKhf +cO1QMqBfK1R+1qO8dMPsJfwubcS1b9mzALoP5+TLQgZHuuDX4bK3NC/IT7dE +Q8wLjubJnZgX4e9T3SrdCsBN6+e7smX2Cn+fQ3Bw03axC4X5YJ+4gO2+QzFE +S8lJ7OUdhMQWDdlJzxwQk/sS2ctXDb+aR03Pf+2HzwqvhN4FpoOenXrAkE4j +ePTcTHP90AdXstncZmckwimW88t20z4m3KfPe82T1mEX5TFzu0hoTuScMbO2 +FS5mXxOMzf3Pfa8+k9yvNwfagG9ghYzk7R7IO3iS6aJdJOE8Zs2M+mGH4gRQ +38RiXQFXRiKZeFq9CO1LuD7kRPszhsavUDzkGWe4D+JJUd+SjHjKdM5EUPzE +w+GsHeI3VbI4i/i/F3/Y0lVSC6vC/d+r3f0E987nLT/d3g9Km85a5x+qgexd +D+6+PHFD4e9zAAQ/H1W13lQH6W9FHltN5EBj0ZaDzHL9MGU8mBm3rBbMor64 +S+mXg1fTAv5Jwz5Qsf1pqClZBSrv0vl72+pAgFN/yvt4L4ztzWlKSS8BnZ4L +dVmXWiB9ncUBhwM90FDnde1AYBo8YZzjP7ugHXgOvn/6/Xw3rLeYb3fN7yhj +mf3zD7MEOiBjI9elRbzd8DrK4yTVJ9oXR/7oOyYqPkP9pAfblShOwsOx9g9O +k/INhxDnK5vfKtRfsrr5/6vjy8N6brr/P21o0UIbNwqFFGlBRR1ESopItKoo +JBWtUlKiyFIRkWgj0aaVtmnf933f9+UTlfb4zfTtfu7Hff2ef88113mfc2bm +dV5z3jPHMoL427hTSZD4eynXRwH7i1Y874h54uUit8+f8wXxt4Tpso1DXztc +s3EcDs4Kg+uaAl/s+IbAE0Q96LXa4JPoZfGNL43kCvQGHqX3DMGa4N5539wO +aLufwnRbPgWmPFt33MX+3rkRV35RvBPWztRMPLPOg/mpF64iYQMwS/tXKpaj +jB9XGZ9j+cGWE15ErtcoPY71oNqPa1YRPXYGhyWJnhi9Nn1sD1qe9n2M2LN5 ++kEasefajOk+Bq029NeHjq3nnGzlHmgbaRN7/CeY7QwYO6FKRGXN+z6DtDXN +rzSSzQZhy//1h4G7i33/9NI0lvrDaNfKrnol1gWW55j6+5+Yp7WeObKh5PUA +ZIc7sqev6QY53QepTby302zEbi/f0dv/n/d9FIr+//d9Hw3lzuL7vm1L7/s2 +L73zpaWcXHzna7b0zjd76X0uLcVu8X0u49L73L/fA9JQAhbfAzb/6z0ghXLn +j/eAa/1UVmM70WqJb1bbn9xOi6eRZiB2fsiKp8V+IZpjquxRc5fT9rYNCBG/ +wvo5buP4oJObornDu/XT1KIcT5H4nGY7lkX65+yIcnB5o3JYzqJIdDWJz17Z +0/xkPRTd1Qx7nxWGDv8l0EPi76z0lZOsh6jN45oDgpZp4o1ikST+GlIKMWQ9 +lNUw69yRT0ErivdpkHkc/WjlTNbD9hQONR/rPHR+sOsjmfc+9CNGj7cTun/N +h5B77oiVewW5J+wzNeX0cnc79BeKvmff1YRmw90W7Gj7ISVgmwsI1kJ2olRd +71AnspjcH3z9RB+ks3EHvtA6krYljqOk3qIXvTgcNvm7rBeUk0454PHIY9ve +ZjL+BaN3ABm/erzPGetHmRrWwUT/c66EeaL/+A3WSHJf+bmg6ntizwdvP2Zi +jyznD3Oybv0KZoyJ/SFDrHHE/t+DR5LJujXQ7hYk/h6UXq1G/BW/HCVB1q0w +1/EJEjcPmuJ6EjdHub0Usm6vPl4vTuKmMr/clMTNZrovqhfjkt6F/Y9UPL4i +qu3FI2Sf5oV33yrCuMTvyvnh4dCtNPW7KRlkn5Z6PaGxwbj09QdLv/VsAZJl +qfAg+/3MyVvbxzY3wkNuSebw+Gqk/eOGQ8eJIdiy0GC+v68WnOam35L3AQ+r +1BbvRU9LNUhna1ZAUjMnu1BwB9Icy9/kgvPL7Sn/DyoYl9yiM+kxziCpIyE5 +BGdqsj++uumrkHYt3fIpxiWU2tHhSXBpS3CkkSrGJcfkkMXxXU5bUsj4MN/h +vVg/+pg9x0b0S/GKbib6t2c8NVPfUodm69e5YpxEDfs/cL/AcaO7GO0Qv6kR +vaD52YxxFZ3zuahBcDUhx8Ac+4tmjT//JP7SbfKyIP5mloc547ghBdpX+SRu +vu9OnSBxO6aVm4jjhl4WOfuRuE0W18aRuHE39RwLxUckwwDPNQFe6Whnyb4v +tlVUaF7BotFxoQTSNu3zEP7snFabUOK0UXAURGsYb5D3JP0q2gE9r8vRMZW8 +KXKfmcbe5ss0zo9/bSz/jfML4rvy/ibJL5YC0tyROD/WspaF43yEeM8+LiT5 +6NcWdT0mnB914/VIfkRihbbcJH+tv5kTY4bz4/4FtmG6Rrw+3ReE/js/fjKq +KsH5EU2HMqqT/Bg95/bcFOdH4en9I2Q8s/9jYTL+bNq1aEacH5c7pG0m+tsS +nXmJ/gOtE+zYHqRqpfqO2IMoTqXEHo6U160zOD+aHZ3pIvYL15aZEfuTBGe1 +TEuL0b5vXy9jPoDOm9BJED4QH5+5F8cNeRfHTr/DcXt12jmWxI2PjjWq/UIJ +mmSI8yRxi2YKfUDiJmclF35kfRF63ibXYrAhDVle+ujTyjwKwflfxlrx+AGJ +6jAyXku8OZiMfz8j/cAmIg8lvFc5MdNahOjixre7faICnc/7jGrHLGSrN6qe +xlyFej9SfiRuw/EflGiUTk5FJ2p4DKRaa5F+L1NuRegICJ0v87ahiUOxfDW8 +o44NSP3UNv4iuRFoBPrb/bwhyG3NWftQ+ia0OuNS36G5f+q097SdzZJcm9DT +8B9KHHj99NB+ejvIGwKf6Q/eJONft+/sJeO9enjX29HEQXpDMxfRz8X3ch3R +b+cjR5VKToV3BbcuEHukRY4WEHvSn1rzVTlmwaMkFT1i/+WzJpSv2H7dDfvj +rSLywCB5nyHxt7PN+gDxt7hj3Tv59UVw7v6QmSGOGxv3+mgSt6U4Q/rtw37/ +HWd50yPGYjO1qMX4009RiEd+h9ZfTUUjEJ892lmI13/G5h/yz+Ls0qQFIjvJ ++udYe1iDf74K7fzEms3rmoXo62Yf29NQ4ZmLk82wSznKLH2tOBhZiM6+EFGG +XVRwsTDqUtAuQMsMDykc4C5HrWZ66gJqVNhuylwUviMDcd5RrO9iqERbhA4r +i1+iwq4i5gXhs1/Q0EOponciVah0nG9g1vKfe+whO03fX31SheI1OBd22FFB +b5a7GI+HEXOlxfGhxY8Wx1sXP6BG7MgANr7lVUT/6bPpB4n+qO1jeke1C8As +pEKe2DM1vk+V2NN2J/8xth9yuvMsif2xPa+PEPtV9m95zzdfBS8/ZNQSfxlW +Jnwi/lq+C63YNVMLN/wbRHbhuK1Hu9xI3M7leqgRvP35PX8nidsus6ZCEjdH +2gNvR440o31rytDLL+/RymXiC5wRw/BU5RILzoMo/WNtsvxR87Ts327RBM9v +mr0LlgqoR52hJ7i6hmKRIX9quq4Z5lc+IeaSVtWIYX/xwxHNZMT1YdKvlZ8K +KzgvT1ICylDucLyv9ot0ZPfgQf7XJCrs8K1tcnmag+prLI4ciM5EQ2dEvdvF +RuFOo+UL+uZ4lGDOtmX4Zxa6xswk7Oj4z7sApj1Bq1kuZKOH3dWrr70chRFJ +cRq65niY2btsGxm//4K2KBkvReWbx/rhMGfbQaJ/lcuwJ9H/0cFpK21AGT6f +bPQk9sj2S8QTe0452V7B9uM8ciea2D+wyv4NsV/V730M9hf0L5k1dWJ/rynt +TiP+TvDTNOO4AcejF+kkbkHR0yMkbtltjsaEPyTMpgWSuK2yl3pJ4iZa4J/R +/7MF2TLc81MOO5y2hubr+JDCMOxa6u9XvXrXuzVfN6adXuJv13VnSn5uaETa +Im/2V5kfSdMs4ZwM2jMCeYMFMWlpNSiH5QUXf7BF2jajWM9QXirI6xZkH2oq +Rzvg9oU1jSZpNtnqfumtVPDkpXH0YMpDHyaSfYbuWqZdjmKu3mk/Cnmm/Hu8 +jRPR4IGuDYk5lmm3a7YJxbX8E2dp32cViRG30sqX+pfOv50//8w4EdoHQkcj +9lilve9LFSTj0SkpX6wfhHb87mSutUxrHi2uJPrPawQekG8qh2GNyVxOOZO0 +D+WmD4k9Tqu/62H7IeBndHvlM4u0lRn174j95+72V2F/wdTqhhMLm2waRSpj +gvjrYf9pAccNLksr9fc3HUx7SF/eReLmvOOwPeG9Ug+5VqzFcbOhvgMSt8eT +qaxUvJ4ZOWwY8byA8XuaTjIvGdnjJ8h6ZuW7cux+9zW5u28e+5N5kaz0EZbG +6zlh8PhePL+gp/n+A5nfbfQz8WQ9b+FbyTKsmQwuyMqHrIfk4JPSeP2gOh2j +eq0X6RCgczCJrB//HAuqM17PSo535CA6E/LnFT+Q9fawYzD6d1M8ilRlXDH0 +MwuaXKbk/3s98+/QqmC6kA133ar5yXruT3IxJ+s5bEUSLRm/JzxPmoyPYEgI +I+uZoYxJhuhnLtZ5S/SnrNq/g6znteXMzcQek4z+RXucT6vUkPU8cn5gdgjb +fyfDwJPYv9rSkhn7C9u73s12YH93XKeNJP42Dn4VxXGDIQ7ZuRc4blqnhxpI +3AxVsrLJej5pYbGTxM2EJ8WBxO3xvSZPgs99vBeNMD7D2bA7FwnOBM/bvib8 +ZHfCWZYnejflmsK2JBOcqTnkIEHw2bBca4bHNQuiamjfELzaxCgbQ/BZX9Cx +eiCyEJDHVSWCb0rNRSmKGJ832/N0Anc5RC8bUCR4GHfXS4Xg8+6bn9wxfkLN +Ridtgp8Toe9hO8bnNOeIWxhvoT7Nb+a/8Vkw9Ikaxme4q/qAaSfGZ/7MDvkd +GJ/d65JsyXiPUe1xMj77A6MDwectNmYuRP/QvlQ1ol/MSy6O4PP9tMR+Ys/F +I81niD1C1/ftHcH4XJpxs4DY7z1Ut5fY7842q4r9hdwCCpX4W7uu5yXxN57+ +Tg+OG9xvydchcasdPKhO4mb6w3iO4HOu5NmpxzhutTQKH0jcen8Hsh/FfGNC +fwMj5hsgcu/qPZI3T7PfLyS8oi3HvXK6tQhuGXbtJHl2QvwBqsW8wtytbSCV +uQpgx4kRwiv4OM0uymJeMRUmlr+3tRa8vU7VkDxudi9TzxrzCuZBiX6qYwM4 +87LsJHnfqaTudR/mFe6J5zwwT4BSf9bu/+YVSk9F+765NoH21+0mhFfc0X/B +NIp5BaPhEzcyXsEvv42Mt1m48P0m5hVsuy62Ef2pMrabif68p7cD92FekX8v +tZjY89cTlyZiTxMNg0AN5hUzpXzjxH6JQLt5Yr9EgFCpNeYVgxx534i/Pgt2 ++4m/nW8KDilgXqEW7rWaxMdKz8mTxOfmyYrs6oclEFElua+u3llONayvkNSF +xpgOX7jZWwwhsZYz5iJlwFwVQlkpSoUQIeurUZEFcHrWQS9Dsw54Mqe2reYd +gYo3wbtd/bPh+TEnT7+sFjgqZvBdqGkIuHbSJ4XkpsBZFKHDqNABu2lcwvbG +DEKQYkZ5s1MEXJiZcbFP7YS0BW4G27YB+JJazmavflhOUkk73FChCz7lZqZs +9xiAmuX6YuaZKeiv/cFvAnw6QKw1/hP/7UHM6woLW15lo0+HbHtiM1vhUvfG +fQk+Q2CaO+q+/EkBOnTRqsg4ph4urG65YVw5DJJv0x3PWBcjK3PdrvynFdAy +qy2/7vsIyFhJq6+eL0GhQV4Ott8ywUpNttEggwosmgZs55+XIMd3K3Z2unoB +r9dTw+UbR+HZpJExY1gj7N4dwVibWgnqO4yHrj8cgtL7B4JHmuqgiadBN+lu +I/DF2E2mYx5ep6Vj4vCtEmI0lvFvHWgH3iTDZ+/uDEDWsmGW9ady4ftaKVvT +lC74zVUUsMOzHxT3zjqxt3lCh/36osC5bmh3ZjvssbUfvp70Mo1Nr0G/aEXX +yzK1Qtb9bZUinIPwifvL1xtmDehguPp7ydBaaDLlXp7BMwQhNE9Lujc0oTNJ +n+2iNUqhx0JW8/HMEBw/f1NaOBafm3jOnJB1SQfr8aiLCQXDoEUfmp1o0YC2 +83QXTp8KgD3rX/6wODcCrEkJfz0064SkHr255ffLoEW4ZeH6j34QpbDYvTBK +g93TEft2zfaAyMO08CtjvbDyRpM7u04n8jn7fvMmvRIIVzJNpG7D576rSfdM +YjrQwWx29sZPWeDSyrJKTHIQLolf5Oni6EA8TwPY9cwTIE4r6Gn90CAMOOXV +VjHgvE9D4VuhFQCP+VhLFSOHwOKRxkRLSBdaK19aKRPqC6JKTN15MAAxor/v +Ffl3omM29+ZvxXjDj7eb3mgzDEKZy9NqhrMdqBtm8zeuegJ+fsEnKN2D4Dj+ +veBRQAcqeeExEpIag2KpRZtTXg9CM4/cvgXvdlQVvXEyq9Yb9Ytc9f2uOwQK +XucYTz3IgODGmQsg242aVVjDTxj1Q/pI6vf09EY02dGuF3k1Gh2YTFPT+z0M +yu817qSF56FNypf2S3QVoIOSLF7quVRQU+a/3myfhTSTn/wKk6lEXJQJy1VK +eP9+nzzpEp+KHHrcOmOhFr3dmv/4V84IFP2lndW2EIt2S9Ckx7M3IP7w5LdG +GiNwfEcpvyR3CHqmvVdVKKcRmZs6Ds4x/vOetJhaIU2xaELlm0I9fvXj891z +i03ztHHQ3lila5PWgCZNfnwP3DUCYXsd9lenpsLFS6e0e1TqEMtRXU067xEY +t3bfZOiUBWbPta5fjKxCZXMmXM6sVEicORA6FZkHgb6l4YkeJUj1IO8RdS8q +uPaMMU1vKIKGw1u6ezgzUDl3ij/tHBV+Xhp3eWxdAhaPr6wyY/RCD4VjWYcx +zhQ/Vjx8gbMC8e6hlqXuzEdbjjWvSJClgk+CxWGBoELk5DXL4aRYivi9REdz +9Khwc/eU+mmPTPSkskVLQq8CnXvv2YFuUOGb5e0naSJxSJQrMmh5USVS3NaV +IeFAheld36xYGdzQdg4u7QjzKiR8QubeYyzPOFbYIUCbD7RRgm88M8vRsntq +l3WVqYB09W5eyC6D088Pv7niX4x8RPsuOglR4dAu+0QTsyr4/cTgywfWXLRG +Lk7u+fwIvL4VZn7MvRZUlR0lDR4mo1IZx4NR6SMg2rjlZA5jA3gNZTEEOvmj +dq5n6/XNRyBUYf5xl34Fsh1YLXHgdiqa3Nuaf/cZjme1s0fQ93zUeE7rr0L9 +DJR7Ta/mPdcoiHfyK56aSEHT5V5fZUWz0JMT3v7KZqOw7tVx3U/0/kjww249 +GsFs1PlFYuD5i1GQeLlgUDlQCV0HVxuN8SIUR2ff8eIUFYa2GlfzQB2UO9tt +kUv4ilSzN964ivNItdQvTWYenIc2h+VWfolGuxiM70UNDoN/YDOP4qVWMDZX +Hlat80OTWntnhQSHYSyM/+SXy8VI6myQPs2sJSAWx0wfCWyPJXXc2SgDddSs +rDbsuwT3dKeqx2NH4S6Xv72eZSi6LRHaudJMFR5kpUgaT42CPvVhcPVYHaRY +n5YRNHJG5n5Dxm7hI9Cdb+DMw9oMGQ+UD7ycdkWdX6/HOWQOw3zfgbI3AW3w +o61v2co5d/Tq07UtayuGgPUkK6fHykxkwV/AU387C2STkr48VRkF1ypJtitK +EaiTI2aZzv5sUN4t9MjIYxROlRrMX6ltAOXr53/N7AmHoK8TWZulR8CX7VvI +hQMtsEVzY0fSnqcgsPZt/G7rYRA4xmCr9DMcuaW+KnyjWgV/6YhovrSiwt5N +PaX1x+rApFC8Iq38Myh6127dkzEC8hJ8kgbPSyDntPP5ZpwvhpsLDpF84cN0 +un/VfAkc/fTgDskvikVh7SS/3Ktza1W3Lga3GPV+ko+Wi/EcJ/noxNJ9p4ml ++06zS/edSj1imzGeQ/uLPGuC51Ls2WcInqst3Ts6vnTvqHXp3hG3UmXGgHgL +NLcUjjfytsEZ3zhvrqY+2PN27LLoZCO6sLCglrGyA5bfdn/lfasP0OPllv14 +PF1K288m3jZkpsP8noxXYFTN2zHZCHQWh2vxeGSZo/mFjD/Gae9++HMj+sh9 +WKRvbweq0z8lJX6jDx7f3mWC9aDSVxVTRM8m3/WhRM+TyjHDLskO1Dsqot43 +XYf0FwZXjAj3w8itT363vlUipdknO3F+RG2y0VEkP6pbdIUON9WhLetkm3E+ +RfsC9NgycD7tylWJvY7zXST7snmc75DZEVVxku88PEQ7u3C++0x3dfMXjVIk +45Vwn8THiz3QXg/Pi6Tp7sMNrl5o9fYPpmReSuS/cnLgeXldssXU7lsmqqne +NUHm5fyPPOopPC9KTffOFDytQDHlbppkXvojtyqexvwhPMnrFJG7XAxVJ3Ku +hKkidswfDp0QUCV6IhiyZ4gereearLqYP7zxWjhLvludfMSFfLeIwvTbw7oE +fXt+lYPgYcDTYEGChyvfMCZjnETCZ01qsBzMbxxlJvKoWaVHTzF+2tVm1RM5 +GssaHcLyLRzZlDCeUvAV0pl865UOt+ePB5C63COflQVVsQS/GraRPkmWre7d +pG5ZPbKsHI9Hz4r9Rsl4tsKOZ2R8xOmQScwD0VPJLblMwh5ymQrjeYQHHt6c +vAzzE8S0wXyRnyT2TC/yk8KibD3MZ5A82wMhwmfkpyWfkvnSHUlMwvwH5XIa +mxH+ozm3aoTwn/6lvrI0lPY50n81ZamvbN9/5Ol/yP/uN0tD+XqZ9HHtW+o3 ++4/c8w85f9+cy8l3ZfBkev1OA8tuWEMXN9ml2gcX3847+BqloX1Zl/cQfjLx +kSeU8JO8pT60tJSPi31lry31oc1ZktNT7izKzZfkqy/XzhwQrEXz2+/f6B3q +hL5J5Ef+I+xa6k9LT6Esjt+01J9WfElOQxFYlPMvyYNqK6puHe5AkzyMd595 +1UHB+9Nzu2T+6VtLQ4m2IX4FLfWt/Ufe/of87362NBT9xX62/Uv9bHf+R27z +h3zPwqtVmL8hXU152hWYvw0/X0l/A/O3hKU+tzSU70Xk/pLGUp/bf+S8xf8t +/+e+U/Qf96BMVdg+PMD80E5elZvpfhkK2rx/O9Ff47JDAfsLgx6Bo8+96lB6 +lN9yMezvpkTem4oWzUDpiqLY7GxHqr6+9v1hfTA8GSWviudRTe+aJ55HRLtJ +poLM47I1e02eY54p7nntLJ5H1Ki80p/MYzat3n0fPL+DiffUiZyHd+IVke8V +ck7EelAYTeRDoqeP0bKY6Mmft3HB30VXLxX9tsbfjVW8aEe+e/9gwltbkw40 +Ma6RXepbi7p7zyWIaPVDaJFaHsYTmAgz2ETwJMFR+THBE8VCK1eMS6AxWdZJ +cCmeL4qL4NKbe9sNMI6BywTrXoJjgwqFcWRf5Iwk8f2FeX5Zk6EF3kfId79y +JtlH33rOKZC+HoK3ziiR85fIuE/H4rvdbXzrcjQr0Kvefmah4A4wDKz+5Xxg +ADxy7cNJX5tNZd58/meaQY0+IYX8x9kkdH9qbHMjasysHvkcXw2nPCdOkv8+ +yGL9KjuTDvg83HSvxLcW6oRiIohf/+y78j/2nfSc6IgSnpfsUmF7HB/4qVZg +TOLzz76L/mPfaV92Sc6325/GGHxrqN6iF/TE0urJfzfOx6oCiioF0Pg44OVG +7R4w3Jo5TZ3pBZaP1VxKKgUow+fUUyLPCm8cJfJ3W9W2+e5uRy0a8/psu5qA +6XRoH/kfd45B6De2By0oCtgSe3wOW18g9vyzL8r/2Bd6waxy2F+UdOK4KfE3 +eK3Ec+LvP/vl8h/7YoftvHT5lU60ozSO79qZUlAvCeNzYBn4r/XP/sf6X2n8 +Pb/sSidctGgQNj9Tisa/8yiT8V9iqhBePxB7pSCRrB94/SyQfNdCTm25Ao7D +6P30Cuwvsrw51Uf8LfTT1cNyJDiYVkrkvzhyuonc+D//kS//8R/ZO+//+j+L +LPV/Vljq/0xb8H9y4X/J//6PTKG4/9FXVmapPyoNxXWxP2rTUn/U80t9UOko +0Yt9UIOW+qCyLvVBpafoL/ZB5fxXH1Rayrwl0aO41Ac19z+46ruIe2ZL+Cm2 +hIe0FN5F+cYlPFTO/9P+o0v2S8x9FsfrARSexh0i62Fg+/4Bsh7mO9WaMH8A +xzeVrL3TdTDN20tH+IPuzVHdJ87t4Pqz652TYSPwM774ybKiHxSGRDsxbsOn +kC5zgtsS9s6L/4tXd7ByKXxuhF6xoK+9eztg+wnbdYS38HqLKrjb18HPLR+l +cuw6wefKaLTiOezPO9l968yqkfmPV2luE21oxGMkzDF3AC6V9a5db1YNWmKB +DlgOLRKs3kT+MOhJ7mPndiT60qbrjmEjop9Io1+J7Yl2AP7zvJ2IbWH2JemP +5XEhapD0c+uRqmPBelDSNW4noqfWivM50WPc9L39L6zf6kNSKfnu2zeVCUQu +8D/uFfzd95vmX/cKeL82fsb4g3Ztu29O8Ef80PJkgj/G6UxKfZpF6JnY5+Es +9i50XY7tnWBuP5TG7LZmtehEXvQyYXGM5egKZ/wCc08/7Gd8tYOc638528gI +6JWgMxyUKnKuZ3iuwkf601XohL4ifpUMsQ0Rv9r+xz2oAjaf+H7NInhVXNmG +vwv77hY+Jd/9qZyed9++DuVrV73B8Uchm2sySPw5l/pbUigH/uhv2bzU3xLL +/+hvue79xnMSKzrR6SJepy68Ny/6lVYquPdDvspsI96/aGNHuhjZv7dHDGXJ +/u0aLLi7a28neq5keYz3ewUyvPSxoTi5/z/v8dHSe/zYpff4os/u9GWkN0IZ +5cHbiKvRcMXUfS057/NuCQw5/SADbfO+4wiy3bD9k7ErqQ+0Lb1/P7j0/t1g +6f37J/NPFgve7SCYzuKRUesNrmP2dqTOsE/cnfI4oAPqJo69Dk6NgRdndehI +XaL8a8MVNZzX9FjeCxGeM8a1so/ktY+uIq2Y5yMtHpUhwvMDlhU/Inz77/fp +K5fepystvU//ziNvy3C2A1xYBiaFVj1B81EyHqQeUnfS9G2RfyfIqnlxuMR4 +I3tRrwekfiImdnSsJaQL7Pu0nh8J9UUsZvRdpN7yLtFVu4qhHbicqzlWaAUg +DU5zLqXIIZjkR5GdHB3wKdK09Lx5AlLX2VlM6jkbvI5eMInpgI2tO/MaP2Wh +Q7Hf+En9J3XpHXfDv95x/+zlL0qwaADDCp57M6cCEGuf/Nbr50Ygaa3lh+2x +jcBc+jtT1iUdrUwOdCH1q/kDXs3sbZ6IvZ02InCuG42zbNEjdbPj3Qx36J8U +wOOiToNLMfVo60i0I6kHnl/x0Ln5VTbcNB0vj81sRUPHpE6S+uHY2xuNVzNT +YG/MsogAnw5kfeNMJKk3/l1XcZtSdTFU6EInTBybSX3SCEXpNDhFIPfqa4b2 +qZ2oZ/VrflLPpBMorA3KTUH6Okw3GBU6kBF7VTCpfy6zDFh51z8beb+65OKX +1YL8ZmtotjcNgct3zp66Y3WoSlH/Dir/jPY0TKiTc+WGK/sClH+GwyvPqqP+ +qlVow9sj8uQcOtt4Zd7wQAsa2nvIKmXPU0SJymwn59arNfcv4XMuknhpKDm3 +Jxz9uhbdRc65lDP578yUIkCTzugXPhcj4z3sjuRcnOkVVYzP0bBr2b3dDbez +kEb++Dtyjo6hTXbF526UHLTfl3nOHVy4vuwj5+7ewym38Dkd3W3SMXkx7Qrs +v5viyTk9xvd+DD7XI2QswLPWyBl4hVUvknO9QcY7bR3LULij9lL6kbkqOqYl +uYfUAZ7GyRe7GGVAtEbE3pi+S6hpy8kSUjc46qdrHHO5GJLy9oRsmrVEexxP +xZA6w/Sv9bNHL7UixsbvDKp1frD9mx3tdsFhKBwFD2aeJmRw2LKj4ks0aLNR +b5E6xpHhzbS8UIf2/NDqlk34Cmfkl5uQusd0zN7lVQOV6NJO6sfvvAgYDlaX +kjpJi/ADls/0/vCYjvb7b4FsEKUPmSJ1lc/Rn/aoTaSAwtmaT/tFs6BUsvgz +qcM8qNV+FPQ9H4pf9m4q0M8AxU6aVlK3eZ6opNutXwE6OtzNcrdTob/1eTSp +89iKzK7NZWxA3MKHNN45+cOMYcvYefMR2DS15dcx91pU1DB3X/9hMnCdZRAi +dSSO3iK7q2aYWzDlxbxnzYVfejzCpO7klxxmdiG7DN3UuTJw2b8Y5m/vsSB1 +KmcvbzlB2nwkxhmh65lZDgZTOqakrlU4GznFxeAGJ9P1JSLMq0DhhYQHqYMx +8lYUIZE4sMtukV5eVAmK1pmlpG5WnMWZddojE2hYa4bE9SpAlGX3yGKdTf/L +uEBQIbxVbzW/rVgKbO2Ri3U59u4tLRc4K0Alpt0gdWc+HMnKnY6XpcJaPeuH +cxuKUIycxLYezgxYNbfHktQD64Rf1M9E5qHHNCsFEz1KQH39enFSP+SK+Xnf +yCkLya2vn7gQWQW2Wi+XkXqj0Z6bn+tTU9Fpc+/MbpU6cLZ+Z0Tqk4IHu7Rm +aOOQfbL1Dpu0BkjNkaEL2vVP/fOqmFP8b/MmeG3B8pnUP032Sfy1jzsEDjD8 +1hXKaQTv5GWdpF56/qeUTtdCLDxRXO4az94AvRtSA0l9VfKhLYNrfCowS9Wd +jYVaWFHTGUDqsVf4Z8ub7bNgGd023zCZSpA97uJE6rc7hHM7U8PzoNybPUq8 +qwDq+1YGkHpv9wd5xujIAuT+21qC/DfpZutZ/G8yQU1ltu8tRnOZd0fJfxYf +JskpFlEqlCkY9twwa4Cjq1wDSD3fZ4ffQjrPEOzy47ePTa8BFdmVy0n9/8uB +uBpS/49feud17l/vvMSlDfxi0muQ8FuuS3g8+hTg1E/G+1QErVsR1oiEvtDv +qE2tROO0YrtvPByC9uMyfba9xdBirNBtIVKGXjrKrCD/fTZ8uNseHlkAtA07 +E7H9qOkD1z5i/6ozR9dEYr/81WX9iby6foUokfMWy0VgPWjZeG0v0SNq4M5M +9KwofcfDiL9b8qSEi/w3abxkPE/+m7TW8PBhXgGcp5dvIbyCVWl1G+EVNKZ7 +r2M7QXnKUZDYqZ1A2UTsXJ9l03Idx4fGa+A7qf8c50zZTuo/xvymO7G/cEa8 +x5742/fx7gzx9+97mDQU/kW+ZP6ve5g0lOOLfIlpiS9xy04/IPasO7h7I/l/ +4fi7IIHYk7mWRffq2hKYL9SPZuYrAX3zayvCj1NBU0qf61pwIeR5nxivuV4D +DkNSt4ovjQAL23WRC1m5kKl3C5XpNsGrkg+rX+gMwww9eDH9zIDkl5+vcfG0 +A60fd8Fe5SF4UTXvXJvzFTRy8ta513UAXa7R7HrDQWAT6V+fqRgG23kFr7oN +dsJRwc3SXJiH+FkeXW+VnYSy6wM4dHM64CTf0Ecf40EYmWHNF6vLRGqU05m+ +s21wWiZNtu7kENzir1L6bZOHnhW8zTXd2gRysY/OOOsPQ98+o1hsP7qfElJN +7A9ob7El9nstvzuH/UV9VJ1Q4i+kWv3+jP2lG/lwYya/ETaV10W2NFaA5OG1 +/mc+DsF3cYevj8LqgU51d43Uq3rYwWhja1w/CH6zdNOzPDWQ8jxKeojSBk6i +o50PqfhcrPQqcSAxHabfl64aPtQNppbb4wuu9INrVGUE1oN8pYraiJ4bgg6L +euzuFUvg76I9dJpfyXcVDhd8It/VeizyYB9LE7rqePqjRl0uNN+T7+IzH4a7 +V9YJHPBtRFMph6ujK+PBiI7nghl5/746etLHqBPu27OL8d4oBddk8yqTlQNQ +3Z6f9qWnA90K35ZdL5YDihLLi3h+DYDwtD9/+O0ONLXeSUjjxzfQODL6qM93 +ECa37nmYmdSOZIsFe+51hsJ03lfN5v1DsDLC4vfFzC6klzN86I2bN/BKZBrS +bR+AKM0wJ4H+TpTiYHCl56sLPNTyfFBSPgCxtMnjwi0dSKF0QHmBwwxMtN4w +vXs0CEy+/Y+GIjqQ2JPfPuUD8Sgt0uaMgPsgBMn1i1GL2lFGgvCRlWohiOEy +RUp09xC4f+aIV3iWCb+iRz4/EOpGGueyZk/jeC6716NkWtiI1tY6t664FYdM +edZMFY4Nw+6V0916O/JR0a54VVHtfNSw++ArjmoqCPRE6ZtEZyNBN8HsILoK +dPTX0UqTK1Sw7lMXm61PR1GMPRP7uqqRQtKT8PnxEeC05HWqe/oNXX3Er+9e +UYeMtqZTTdxG4P7e6dcL274gEcFPFp3NDWh1GRODiNgIXDsQCKXSgSjs3iaB +PM4mVJa+ZqXmzDDIrPSjGL2MATOjBO36kQbEavsuqVdoBDQ2a2ibTiWBcFXD +x5jROjThf8j2pMMI3LLnFbrtmgGX/ce5xllr0LnfgwdFekfAJiiU6YpyDjyv +S9n2SKYCOQUN8yxoUeGOncOKXZ/zocRt9UOe8nyk05eRTcmnwoe323uVvSpQ +cBazyIkreSizR/6A224qNO//0Pc0pxjtiuhqPsRbgkLazJwFME/4frFGpmEi +B/FIldvzppSjsBAxOz4jKuhRrfY+CkpFm7VO3nNXqkS31dt4pi2o4C3s/LW7 +OQKZ0F/vkJWuQoGDdrm8tlRwKd8jYtyeC/Lq32gvzZSjORs+tjQ1KlBp9D37 +gktAauDtrFN5CSrRcpBzl6ZCcEaNN3WmAl5mjT1oMMxHx75pSKWvoYIq7beq +W7XVUCusKnvIPwPdSK1n2jI6AkxH1zG3qdWBrdrsvuCxGET9tHrsSxyOv6JL +E9/vCnTQtoS+myMVPXPN3yt9mwoPRTMe978tQicaeDQdODKQoqvAJbYJKsgX +TikrJWei+3cZVLJ7MK7wXjnLgvmh5ZRcLd+PGPTpaGs6PW02SraLWeblOgqV +rmEz+45XwtqZzxd+uiJ0fkFmcP4yFQKVlV+82lQLbn4tX8/lfUNcUrXGTI0j +cPT5+vlv/g2Q9IuGfyw4Bu3/nJlttW8ElAK/fgyMbYY3sV3thYIhKKuo8teg +9zDEctbepE0tQa7i1Ljb09fgqtlxaj7fKFzh5nPukcpGe4QnLpy7ehYEYo+f +WvdqFDr901IVHOLQhPaPXyeat4KImcHXpJ5RoKqqy2ca14G7ib53CK89aubp +2/gkfwQYlUtLgnia4Ojwik6xWSuEvOekIhcwblebcZ0xaIVVFbU1tLOXkdHT +/o7t24dBdf27e6uls9AcP2JjlskCLiuzAY4jo/DtaGxtolUsarkSLBbFkg38 +zyd6ulxGoWdbpWWCeQPIhon/9Z05GhhLFj4EK49A3hfTfqnXzbCOynvNgT0Q +fnpe0z3mNwzjSqzHJiui0HitubGLbBV4SGnPWWD+729tlPx5E57fMx/Xv3j2 +BYKkG30U8Xnhf51bo0NE+K8VNoJcnszY8ltx8I1/Uz7BAUsaVUPFZ5lIWaIi +A+MGPD17pJrgRomeqAXGGUit1L/LrBYCdvUtqwjOGHDz5GFcgnxtAUrZQDxw +vqVKEFwy+bK9HuMYGAY2e/KtMkMUS5r1BMe4lXyeYdwD6o0TnmNfXVDjR317 +gnsvq7gWME7CKWnrDR/dvNGmTNNFnFQY3CaHcRVE7Y8edOsMRUMvZN0IrnJd +7iv7fLsDHm6p33fuB14/+398Izj8Ul7bG+M2XBIbjWsQy0GlUpotBLfjlniR +5r940d99w+r/dd605P/sAL6NYJWf7v+lMh69n9jkRvJF2Qk5ZxmWJrhytDzi +bF0u2hjRy8mP84taBL31NM6D8dYsDTgfIb+xmCqSj3RaTd974Dy48y/dA9Kv +6lGyHvdbkr/YCi5X9iemo6Q55l9Dh7qRjJNkOcl3D8UQL86PyHTG8yHOj+hX +uNA0yY/zB6sCsR4krK5+iOh5k2mzqCc6X3k//i4q2jrcSr67dvJWO/lufZ5g +5RXMT2bCdP1Y+EpQfCb9KsJPnvhZpZpgfiJTNHqq9noNahLN8CD5ffcMz8S8 +TR4cj90mcG1rE7K/zK5H+IBm5/Xzu+oygc8yJwHzB2Rs9/kk4Q8St224rmcn +wa6t+9dhvoGeII5Iwjf8/Pu3I8UwNEqz6jTmJ2irXbwK4Seuw0HR1Tlf0R5x +YU7MZ9DyqyzLN2A+U2Hx04vxZwYq1rS2w/wHJdRLlxD+o5hXNWKQlYu8zfNL +MF9CveKi/IQvuc++/XwV85Op3fIHiP31ieHOxP6svmIf7C+i2xXvS/w14ijh +Iv6yNTQsw/sCWYywv8D7AjHR1iaSfeFnIzM0XREFOhH9xXgfoeWBpv1kH9lU +qJ7A+w4Nx3/jcGQPRKbGanfJvpvNGhmJN29AO2pS2/E+RalHdDPJPr1ENz+T +ZBUL97pVDkezZKM7bopVZF+/lYjU4pTOguttnQIsMlmoTMe3luBAFFtyjbpB +K5JXs94xO3MZZDvWjxPcWGexMh/jDOI5cqVo56wVPH6jI0NwpjpD9wLGJWS0 +tv6pB689MKeO/0Vw6SNFUvOoQxysucQt8bRjKwoRKE0gOPbD7s4sxj3w/HXR +dfLqWVR/W12F4N7rdjt3utQSCEy425E6fQ2pyPS2EJw0ypcowriK7kS07cG4 +Ci70QZMEV6WObT6X5N+AqJevGPwIjoGFEacYgsMmtpvLMW4jbyPmgbN536CP +MqRHcFucnvvO/uOViKFEJHHcFUHL/FgzwXmd5/NjG37EwBjfzSd0tNnwpm6e +k+SFk+v1phSTM2FeuOFAVk8mRAZ+uUjyyIjSVeaBt0Wws6zR7hZHBqzIaF7M +Oy/5HX34f1cAXebmoE6OVOASCNhI8tRnm3fFOK+huMajd4PGYmCr+/cSktfS +xjcaOtRWo2vBVx8d9M+AL7e8pgVxHizZ9m3Z6EwFujltn1xvmA9xHx3FSN68 +/WxuHudZtE5s1UGcZ4GadFie5Nl7Ro2SOC+jc4UJmcYz5TD+KZyH5OXCR9lC +fc0R8DtL1wfncTgtx1lO8ri8gPPjx0GpkBK7RQjnfYjLc+EneZ/mVUAj5glg +Yv6CE/MEeN7K4kR4gu2QfYtnTjFsetGsgHkFFA403CK8Imm34MXjXhVgbWcZ +rnolDyQ1NkoSHuJv0HBP/HM+ulN1kcpdng8d6yLCCW/Z6354palyDlp283q+ +h0wFuMwX0xGeY7twg9XZNQMl8997NMZaAycOT8sRXjSi/waZTSWhuaaDuzCP +Amvx+fuER9F6GlwyfBmDBg+mS2LeBTqJ/QWEd6m5/miukg6EWsWBdZingYuG +JTPhaW23i2hohL6AJPXAcczrAKX+tcjr3mzYw9r49Bso2z384VZRB+s8d80T +Hphtv7oe80ZoC1W8hXkjPHjXk0x4Y4y7iznmmWDxTdAI80zIF/jeSnimT9RN +S8xL4Zznyryd2vmANrq+J7x0+dkyy3HlVmR7ocKttKwF1ul0vrUZ7gOzHV3s +Y8qt8Pt65vuyshaUu14kgcj/vkcx8697FO3/ox57c+n9OA3FYvH9+F//ej9O +Q+FdfD9usfR+vEOgW/wkVzXqEas//sGyCza1Uy4fPNsHZUv9GWgo0SykP4PE +Un+Gv+uxzP+qxwqHP4tW5aoGSa4VsVgPspL7YUT0/P2/Sf9f/5v+fp9Oofj+ +8T797/fsFMq2P96zuy/1c6ChpOiSfg7flvo5lH1QuozjCW+/d98l8TTanBFM +4kZhD144ge35ZrVZhfi1DO2xJPZUrdJkwXFG2/K9P5A4p27UTiTjc+NtELYf +7VEfX7Q/9fKMARlvVbx1kOS1a0o9R8i57+rNtYvnvok6hvgZfB7MFnd4Q/Jd +iCD3cg8sP7V0j0XxX/dY2v/Hf4T/B7Pn94Q= + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{362.4290401212566, 235.6481356379338}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, 2 Pi}, {2.675715961772449, 4.532575608974781}}, {{ + 0, 3.141592653589793}, {0, 6.283185307179586}, {2.675715961772449, + 4.532575608974781}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{3.1369774092384084`, 0.03625238331938226, 1.2680924645433183`}, + ViewVertical->{-0.3747306185760079, -0.004330562912604685, + 0.927123621598815}]], "Output", + CellChangeTimes->{{3.801889798879286*^9, 3.80188982319788*^9}, + 3.801889898888165*^9, 3.8018900411449623`*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"c05f908b-f690-4f4e-b09a-fb4b83f06b3b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Phi]1", "=", "0"}], ",", + RowBox[{"\[Phi]2", "=", "0"}], ",", + RowBox[{"R", "=", "0.4"}]}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"\[Psi]", "[", + RowBox[{ + RowBox[{"2", "R", " ", + RowBox[{"Cos", "[", + RowBox[{ + RowBox[{"\[Zeta]", "[", + RowBox[{ + "\[Theta]1", ",", "\[Theta]2", ",", "\[Phi]1", ",", "\[Phi]2"}], + "]"}], "/", "2"}], "]"}]}], ",", "R"}], "]"}], ")"}], "2"], ",", + + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Theta]2", ",", "0", ",", "\[Pi]"}], "}"}]}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8018885294395847`*^9, 3.801888542631722*^9}, { + 3.801890112307804*^9, 3.801890116737638*^9}, {3.8018926121664762`*^9, + 3.8018926125545597`*^9}, {3.80189264576252*^9, 3.801892646199854*^9}}, + CellLabel-> + "In[118]:=",ExpressionUUID->"6ba4c5f1-b775-4e04-99c6-67ea67b1e47b"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJyF3X/81+O9x/FUqvkR2RmykQzLr1ANI77l1zjyYzbZDs7hOKgUNiVUW6yd +kyY2YcY4+R1zahg7FSGlUku/f2jyo7OVJr8yinC47XV/fc/t5fa9nb/et/fj +8/5e7+t6vq/Xdb2u63pd17fjv1586nnNmzVrtnOrZs1afHY9du4N407a5boj +XL/+j917fjLwyYZfbJq5bNeJcxrwId0/HL/sgmcaev3HktUdJv4pebcDRu19 +9C7TGjodd8/DS0f9OfkV3219V/MFzzU82OusiztMfCP56+/f/ODPBs9quLnT +z29+dP07yTff+rhZY1rMaVj64AWDlo76W/If3Nhml4svnNuw435Hf++jjhuT +7/rp0qN+fOq8hh9M2LVrh4mbkk/50s5/Hfjd+Q1/vOWTkR07NeuBr5r0u/V9 +ui1oWLe8/+WPrt8s+dKGy14e/86Chq2/uuKCY55qkXz+hG5rDhi5sGG/M48/ +femozZMf+eCrfYf8bWHDibf/4di+vVsnb9l8p3nPHbyo4eKVexz0UccvJV+/ +/rEFn5y4KPNHV3q6d6U/nfFh8Tyd8S6hP51x+tMZpz+dcfrTGac/nXH60xmn +P51x+tMZpz+dcfrTGac/nXH605l+6qfn8GGlPruuHLrrtz/Xn871eTrj9Kcz +Tn864/SnM05/OuP0pzNOfzrj9Kcz/mroT2ec/nTGXwj96YzTn850Ul464/Tx +93itz67qP53r83Su6dO55ofOOP3pjNOfzjj96YzTn844/emM05/OOP3pjKv/ +dKaH/NMZV146411K+4zX+uxKfzrX5+lc06dzzQ+da/7pjNOfzvjpoT+dcfrT +Gac/nXH60xmnP52VW37ojMs/nXHlpTNe22e81mdX+tMZ11/QuaZP55ofOtf8 +07mWl844/emM05/OOP3pjGv/s9+N8rGv7A+Cy0+2U8HlP+0nePU38No+40NK +fXbV/tMZ973oXNOnMz448kPnmn861/LSGac/nXH60xmnP52Vw/N0xulPZ1x+ +6IzLP53x6m/gtX3Gh5X67Kr+0xn3vehc06czTn8646sj/3TGW0R56Yz3Dn3o +XPVMPzXyS//0n4J7Pvv14PTP/iY4/emMV/8Zr/4GXttnfEipz670p3N9ns74 +/pE+nfFBkR864/SnM75ZlJfOVR86y5f2hM44/emM05/OWb5In844/emMV/8Z +H1z8Dby2z3itz670p3N9ns44/emM05/OOP3pXMtL52y3on+kM05/OuP0pzNO +fzrj2jc643U8iFf/GR9c/A18/9I+47U+u9KfzvV5Otf06YzTn841/3T2Hv4e +nbN/CP3pjPNn6IzTn844/emM05/OeB0P4quL/4wPKv4Gvn9pn/Fan13pT+f6 +PJ1r+nTGtYd0lp7xC51x+tM5++HQn844/emM05/OOP3pjJ9e5jfwFmU8iK8u +/jM+qPgbeG2f8VqfXelP5/o8nXHjazr7O+NxOuP0pzNuvEnn9HdCfzrj9Kcz +Tn864/SnM967zG/gm5XxIL66+M/4oOJv4LV9xmt9dqU/nXH+Ep39bn6Jzjj9 +6YzTn864+k/n9CtDfzrj2n864/SnM17n67KfL/MbeB0P4tV/xq8o/gberbTP ++LBSn13p3371f03abeITeTUueP7qnfdeNmpxXj2/evqMBY+ufzWveN/nh//i +o46v5xW/bPXX7u/Y6e284o/33fizY55an1d8w18X/1vf3h/kVX4OueiRo0av ++zCv+JVvX7fbwyM+yat0zpr42PC1W2/WwxUf9uHXLxm6vHkPV/z2w274l7b3 +tuzhKv0nhzY7eewlrXq4en7lkxcd0aV7mx6uVU/1d8vXbprSa5un897vuL/H +6/wqvs2/jjjr4uMWNX6n+Ls6H4h7Xjp4q/Jev1cuvfpez+P7PDH4x3tOfCiv +dNjzpH+ctP2ENj3w+rzfcfeu0pEPf/fipKM+fWjmlMyH5+cEd+/vjvr1lS/d +2qvxvf6ucs/X9P3uec95D+7e38kP+6Gf9tC93+s8ud99F/d+x9lhTce93+u6 +ht9bRjru/Y6z55qOe78PKfOcfq/59DuuXajpuPf7kDKP5/eaT7/j2hfpaA/d ++73OU/m95tPvuHaqpuPe73Ve0e+tSj79jmvvajru/V7nGfxe8+l3XLtZ03Hv +9zov5PeWJZ9+x7W/NR33fh9Wxol+r/n0O64dl456kunG73Uc5PdWJZ9+x/UH +NR33fq9+vt9blnz6Hdev1HTc+736sX6v+fR7bc9rOu79Xv00v9d8pt9b2o1c +nwruvrYz1zTrecLv18/Pa/UrtD/y7762J8+N+MGqjp1eyav+WjtQ2xn3fseP +u2a7O/v2Xp3X6rdoTzzvvrYPs0fP/ueHR7yZV/lh17XdcF/bgT2PP/K6ocvf +zWv1i2r74L7ae5/ZuwwYe8n7eZUOO63tgHu/4+NO/OiEaa0/zGv1u9i7591X ++137wtK919zxcV6lw+7YtXri3u/4V/Z6sWWr25r1cK1+Hfv1vPtqj9/sd9x7 +vzq/eQ/X6geyU36ae7/jp/328VV7dWnZw1U67KXao3u/44Pe2H3h5I8/G9/G +tfqZ7M7z7qtfd/N+Y6aeOKt1D1fptN2wzVeXj5qe/o7ncdf6PDul25abf9hm +U8flTXJX6bhnp55v0/qgqcc8tSp5q8JdpeOenUpn1JZv/WT0urXJWxXuKh33 +7NTzrdosumPt1u80yV2l456dev7YUb8b1vbe95rkrunfxj079fzIrUaf2aX7 +hia5Kztyz049P/O6vof1XvhRk9xVftyzU/V8i3bH7nRlv0+b5K7Scc9Ovffe +43+5ae7wzdJ+WxbuKh337NTz00d9+teze7VokrtKxz079fyfZw9Y8e4OmzfJ +XaXjnp16fvOt//T8iFWtkrcq3NX3cs9OPa+/NM6Y3ummF8dNnZr2xn6rH258 +YB4e1w9Lh71Jr/rb3i8dXD8sHfYmvepXe790cP2wdNib9Kr/7P3SwfXD0mFv +0htS/GTvN0+C64elw96kV/1h75cfXD8sHfYmver3er90cP2wdNib9IYV/9b7 +pYPrh6XD3qRX/VjvN4+H64elw96kV/1V75cOrh+WDnuTXvVLvV86uH5YOuxN +etLRL3o/fXD9sHTYofTofPKVb2zc1LExDuX2Todse16HKQ1bRL+G99hm5uM3 +TP5snPiXHz8/dPlrab8N5x/yzdvmTk/u+bH9bhh/fftnG/pE/fb8gXucvOe0 +3Wcm9/ziZ447/+uXT2/4p/FX976y31v5fNd/af/+Fv2fT+75Zw84fPqX583I +epzzG50vv2PU7XOSe/6S7kd1uWan5xs6HHbUO5M/boxLvPmqw2ePfWRucs+/ +tfMrXa8/ZU5Duw7H/OHQYxvjEvv16bZ9767zk3v+6pGHD/hz53nZL3j+1rk/ +f2efTfOTe36HGSf0PPjL8xuuuuruKWd+uzGOcdN+W93/+wcXJPf8oO9fccnW +r8zPeuv5RYMXr3qr+8Lknj9r2JjXtxyzoOGKS+/p+JsLW+bzk0cvXrbvwwuT +p/4PPHlXh70XZn3zfJenLz6qbatFyT0/4M3/HPnTuxc2/PC8e0esuL4xfrL1 +rQPXv33YouSeP/SxcUumfbww65v29r1D++9y35Rnsr7hl+6652uzZ03JeoXf +vWH8pIvPezrrA95/5x/86rcdp+d3x0/rvs+/nTtkRn5f/KH2Ay5qPWtWfsec +X//pJY9eusvc/F74qnZ339xry3n5XfBn9zi3/47r56X++Cmvnf/Wm8/OT53x +J+fstO+5QxaknvjiFfeec/IOjXriO5/c75AXb2rUTf9y26IrNk4eOC11w/t9 +a+XoS78yNXXDx/x5//FdBj6V+uAtr+g7s+vsaalPzm99u32LR/eckfrgR679 +4ebbPTI79cFH/GjZcZfP/2Pqg19zULvhF7zwQuqT6xUjrvzVxgXzUh98n/7f +u2je/fNTH3yXr9110aRzF6Q++JKtr9v1Jy0b9dFvyj99ct4sykufjCs7+JSP +e/SfmjrgdKYDPqT5z45fvNus1AH/8Yzbev7i7NmpA37LOZ+5RiP+mDpk/Onx +f1rwzZEvpA74V1f9cuqLj8xLHfDW7/dc9/DP56cO+PAL93q4Xa8FqYN+Xz2n +A84u6IAPCDvSPuPfP2hq/7bPTk0d8G0n7LBw1JDnUodcl2576Zrd585MHfBJ +90wf1nab2akDPv6UcZdedfAfUwe87Zn379Gy5wupAz6z5wPrJt8wL3XAX/vJ +/v3HXDw/deC3vB3tOR1w/QId8GnRv9ABX1L6KXxut25/WvFZf0efjPt689re +Z814NvXB79uiU8sv7/Fc6oPf0f6c/xh4xczUB//gqrcmXvvk86lP5rNh2y/9 ++9o5qQ8+/6IfXb5g49zUBx849ukdb//RvNQn4xCjH6QPrj+lD94t+mX64Pp3 ++uD8BO0PfkzX+0544JJG3fCVe7z6yGPtnknd8KEPXX/1ZZ89Tzf88Eifbvj+ +kR+6ZbxZ5J9u+LIoL93wMaEP3fif9KQbvjD0p1v6q/G96Ib7vnTD/zPqA93w ++6P+aK/wyQfuOPmyGY164r/h14WeOL+Onjj/jZ74gqj/9MSfDnuhJ35R2Bc9 +8TfCHumZ8WBhv/TE2Ts98W2jfaAnPiHaE3rik6P9oWfGuUR7RU+8bbRv9MTf +5beEnhnP2Lrby5/7LfTE7wq/hW5432hv6YafGu0z3TLOOtpzuhl3XB3tP91w +/QXdcP0L3XL/QfRHdMP1X3TD9Xd0yzir6B/plunwW0I3vE/4LXTDbwi/hT54 +s+jH6ZPxbNHv08d4ip9AH7xD+BX0wfkh9Mk4hfBb6IPzc+iD/zT8IvrgPcOP +og8u//TBlZc++MrwW+iA05kOxoMdwp+kA74k/E865Dxu+Kt0wPm3dMD5w3TA ++c90wAeEv02H3AfAbwkd8O+EXdABZ0faK/y08FvoYF7ZeIQOeP8Y19ABXxTj +IzrgZ8Y4iw74wBiv0QE37qMDflWMH+mAayfpgA+IdpUOuHaYDnhtt/E54bfQ +x/q+cRx98K4xHqQPblxJH9z4lD64cS59cONl+uB13J37EvgtoQ/Ob6FPxhFF +v08f/MDiJ+D8Fu1P7gsMv4Vurjk/HLptFesMQ80fhm4zB3Xt/tj6Z3Jei27t +Yp5THBTdfvnae5teHPVYxo3TbfeYLxVnRbfjzt+yVeeJv8m4a7qdEvkUx0W3 +bSOf4r6y/4p8ihOjm/lYcWV0+1XkUxwa3faNfIpbo9e+x/bZMHrdi1/QZ82z +P2/fr/fSnMejw7ieEw499qmFqQ8dRsZ8L33o0OepBWfs1mle6kMH76UPHbaK +70YfOqyN/NCHDuaTXwt9chwX+aQPHcxLzwt9tNvnRz6rPrd8Y93Etvf+T9YT +9ap1rBfRjQ7mq+lDh/4zj1768IiVqQ8dpE8fOliPog8dBsf3oQ8dzIfThw6n +37vtirVbv5r7tuggn/ShQ7/IpzhSOuy0732Dey/8a5aLDtfEelfOw0f+Nqw9 +eOS01muz/tDhv/uc8cDYS/6S6dBB+vShg/U0+tBhY6T//dCHDubz6UOH5Q/M +uqVL9zWpDx2sC9CHDn+IfNKHDifdMmGnF4Y37v+ig/U65aLDk4M37NbqtrdT +H+WVTuoZ5ZWO9JV3SqRDB+W17iD+WXnPCHulg/I+H+sXdFDebw34hwvW3LEu +dVDe63e6duO7OzTuq1Je64ryqbyfbFy02d5d3styaVfrugYdpJ/2FTp8O9K3 +H4EOn0b63ksH6csnHS5avvMW5/Ran/rQgb3Shw4r//v87W45/93Uhw7zftNn +2fYTNjS2V6GDdVHvpUPD0IdfOXHWB5lPOnwQ6zK1f5lwxodrRqx6/wv6eC87 +oo/3ep4+PeK9dKOP9aA1kR/6eG/LyD99Loh1JbrRhx3TjT7ym/1a6GO9l270 +Gf7J6Kd+ePZHqRt9rDfRjT5vv7RkxrgrP/xCv2PdqurmWteL5Ue7TTf5ObCs +T8nPZfFeusmPOHa6yU/zKBfdzn6yw7yXb2zcB0e3U+/sePM/v/Rp1je6yS89 +6fbM8H533PTBJ6kn3a6I9TV60u3Asx+9b067T77gt7we63S1n7qzYdP4Fvt+ +/AU95XNI0W1q5Iee9PFe8fz08V660cd77Regz6x2Pzm056TGfVL0sW5PN/rI +F93oY91Qf0Gfb70z48jLFzXu26KP9cfqz7xz9hvPjTmncZ8afeRz/9KOySd9 +6CB9+tBB+vShw+unrttr4c8a9zHRQdwB/4cOd05tN/7N7Rr3MdFBvaZPznd1 +OajLFmOb5z4aOlg/rf5tu7v+6fE99mveo/oz8jmo9GvyuX9pr+RTvaKD9KVD +hy/deEb7877TuM+IDuIm6JP20mL47cNXtsx9LnSwbksfOqi/9KGD9V/60OHA +VTPv/cOGxn1edJDP1cWfyfiO0q/JJ32Ud6/Fs9p88LXG/T7KK76DH6u8rx79 +5rXbPdgqdVBe69t0UN5f/367dp0PbpU6KK96Sgfl/c7uB990/LTG/VbKK5+b +FT9WPlcXf0Y+B5V+Sj6rDidsf8iGkWsa9yPQQVw8fejQ/N/PHHrPoDapDx2s +z9OHDpP+NrzZ083bpB3R4aZYt6cPHdRT+tBBPuu45huRz5bFj5XPNcWfkc/B +pd+RzwPLeGRUiZejw/fD//9KzIvSwVX/6L5fXHcPTh/Xq87tfPT/5U+FX7ri +tH5tfjt7SmM8QPhvzx0wZ/U+7Z5O3fgzHz7RodfVTzTOe2uHt498Kq/r8Hiv +e/byP0MWb/X5e9VX9c17fSff5e6Dzj3h8/eqV9bNX471Ds8fEON39Q3/bvyd +dXnp+B13b77iFesp8b26xnj89DI/Zlzf491xEz6fd/UdH4rxrHnaLZqIe8SN +i+t3/0vZZ4GvCX5lmQd4McZNPUv8ifGmdQ3p1H0cuU4X6Qwt/KMYx42N7yKd +ui+j8pqOcd9LobPn636NjJuMcdaMqCfSGRDjhWElfeOOC0N/6cjPkaGP562H +3hPrDuq/8Y56Kx1xXHU+gZ9v/Vc6xjvS97x1RutK2iV/Z73PPb90WBmn+7v6 +vPW4l8v6IL+3rlPzn4+I+szeu4R/KF5COhmnVtZx+Cd1vYxfJ24q18Xi+SHF +L+Vv3Bn1Ddfuqj/aE/219sTz+s2avn6NnUqHvyH/njdPLq5Gu6E/XRLtaq6/ +R380pPiT+kH6S0d/emek73nzz/Kj/dFuWC/TnrBr7QD7+sJ+q2gf2OPKYo99 +S/+C7+X8qEiHHbHfX8Y6FM7u7ojvjnePeQzxS+wiz1OJeoWzI1w9Z0cPnHT3 +P3yePm4c3TPqM+6qf3T/uxhft4/02YV6zn7Vf/W51vNaP9Uf602/Dn1w9e2h +yH+Oy8Jf/VrkR33Ic1wKV39w9Ur90f7n/En4LdYNcVf+hnv+zE6Rvnp4SvS/ +tX6a31bfcv065sl3LOmYf96+cPPDtd8cWfyoHI+XfQe5vhDX3Quv/XLaRcyv +Vntxzf1BcX9rzA/TB3885ifZi3qlPe9Z2n/zFfV58x47lPppPP7VwrXbbSId +9dO4tWXhrsrl3ni5tvPGfZsX/flp4k9ynBv1oUWsz2pPZpY4c3xO8AMLr/Hn ++EnBpwXXzpwWfrX0c/wY+To6+k1cO/nIgPEvvHdhYzqT4juOfWTGtB7/x68w +Ly193Hy4dh7XTt4Z6Wh/Do32UDq4+ee+0U/h2snRH7wy8dopjf6AedGhxU8w +v1rrm+fHRZyM9o2fsyjWQ3139dN31F4ZFxgP4v7uyNAZF4dAZ1y9orP2zfyG +9PHczxE649pb6WjHtKsHRDq4eQD+AK69pTN+Soyvh5b5kFvD32gIndmD9ow/ +ph7j4nvVP1xcpXqDi9tUD3BxjPpFXFwfvzDjH2NdWLwRLl5LPA0u7sj3w8XV +0B0XT0JHXHyF/gkXb0C3bFei/tAH55fSBxe/Sh9cPCd9cPGN9MGtj9MHF7dG +n5xHj/gr+uQ6ZMQX0QcXV0MfXJwJfXBxF8arOU6N8aw4cu2ueEt65rpHrNfn +PlbzUhEnk/vfg4t3pRsu/pNuuPgBuuHi+uiGi0+jGy7+im64uCO65TpexOHQ +DReXQjdcPAbd9Cf2WdANF//AfnHzA+onXvcL4/pfOuP6Czrj4mnpXPND51y/ +ijhJOuPi/TKeTL8a8Wx0zviUiOOiMy6uic64OB864+Jb6KxftT+Fzrj9LHTG +7V+gM67e0jnjQcK/pTPOn6czzl7ojLMXOuPiTumMi5+kMy4+kM64uDg6pz4R +J0ZnXNwUnXHxQnTmd2jf8tyS4No3Ouc8erSTdMa1q3TGtcN0zvjl8BvpjBsv +0Bk3j0FnXBwvnTN+MOJR6YyLt6QzLs6Qzri4Ozrj4tDynJng4q/ozM+yH4rO +6a9FP0tnXH9NZ1z/TmecP0BnXJwtnXHjYjrj/BA64+Ki6YyL76UzLn4140SD +i9vMeMrg4hjpnOPxiOujMy6ejc78VvvI6Ix7ns4ZBxfvpTNunw6dceWiM24f +B53xJ4puuO9Ct4wniu9IN1xcK91yP03UE7rh4h7plvtOor7RjV+vPqd/FVx9 +phvOLtLvCm4fU/pdwdld+l3ic8NO0+8Kbn9H+l3BjcvSjzIuiXYm/ajg4n7T +jwouDjb9qODiQtOPCq49pJvxi32FdMO1t3TDtdt0w7XzdMP1C3TD7QOiG27/ +C93ww0s/hYtfpRsuLppuuDjhjLsNLm6Wbjh/L/9/g/N4wh+gG84fyP83EJxf +kefgiz8NPyTPZ7ePMPyWPGc8uH1SeZ51cH5Rnstsf3Hxo3DxwOwaN96kW+V5 +jmFJJ8/jC85/y/9jEeNg+0zz/4sE56/m/10Izu/N/wcQnJ+c59QH51fn+enB +7SPLc8aD2z+V518H71L8fFw9oRuuXrFrXD3M80zN34f/RmfcPDydcfU8z0kM +zn/LfcIxT2B/Lp1x64N0xu0/pTNu3yWdceM+OuPGiXTG7UejM76sjENx+4by +HOTg9sXk+bzBtZN5jm1w7Wqer2q/V/hvee5ncP4bnXM/dLTbdDYvYlxPT9y+ +XXri5g3oidu/SU/cfkZ64uYx6ImPKfMeuP6Unrl/NPpfeuL6a3ri+nd64vwB +euLm5+mJW4/eJ+KwzZNYBxSXjJs/FKeLix8zn5jxShHPYL0TFycjDiD380W8 +hDgzXNyF+eKcL4o4DfFGud804jrMu+Hihayr4eJGxAfg1v3FeZsPMS8n7hmn +j3VlPM9PjngInD7Wdxvjev6uj7gxnA7mJXHxKtYpc39t6CAeAhfXbb0Qp4O4 +bfMYeW5GxHngyiveF1de8a+48lp/xZVLPEfOF0W5rKfm/uAol7gZXJyP+NqM +i4z8WA/Dvdf6Fu691rFy/3G817qvcbF0rGPhvov4IeO7/L82YXe5TzTqP7vD +1Qd2l3F2oSe7w5WX3eW6TXwvdpfjkfi+7K5ydoeb32Z3uDgudoeL+2J3uDgx +dld1sP8h98sGt/7RGF/293TS7oLTRxw5fnnkM+0uOH3S7oKz97S74NYL0u6C +0yHtLjgdxIHh4sHYHb9XnCq7w5WX3eHKK/4794tEftgd7vuyO1y52F2OUyId +doeLWxvk/NPwP8UH5rmlweWfneLSYXe4/Ftnyn0tkb74dZye4tf5D563rqyd +3xBxaOLntIfigsTPZfsT8Rji5PqUeAbxcNoB67bWZdVz73VekvogzsS6F52X +xXt9L+UV58CO9O/i3NxnPx7+J38At99Q3Ju/q+c/4563vi4d+RTfRk/z2Pw3 +z4vbEfeGi3+bEevo0hl0+DGvf66PeDjfhZ+Z8wzxPH3EteDi4sTD+Y7sYk3h +4uL4k97rXBfxMTi/a3UT6Ytf+f+49kecXM4bh58sngYXHyKODZeOODZcPJv3 +6qfEs2kncesI7Np8mnlvcQPqufogPkw9lw4/2fN0EzeGix8TNy8ddiougb2Y +N851NOdYxHcXf1O5uLGMTw874p/j4lvE6+Dqs3TYqe+rHcaNd7R3uO/I36jp +aJ9x9Z+fU8dT/D2c/vyf3IcR35G9sEfxYDnvF3YkffUcFw/AHtmF8XWevx1c +nFjfJtrVvcr6l/gQ9VZ9Fg8mDgzXDqi3dR1BXFfOM0d9E7+Fi+My7st4h8i/ +eoWzi1znjfpGN/WncvVWvaK/eoKrJ767+iDuS1wCLu7Ld6/jcf2v+qCe829x +/Zq4qzzPJri4KPXBdxTP5LtL5xtNrG8+0MT65o7hD/u+eW5t+MOV84d9x4FR +H/hRuOf5ybj2kH9VnxdH5buLp+I/53k5wfnPvot4Kv4zrp7vHf4z/fVfr0Q7 +gHvefmPfRXvITnHnzLC7HOdGnNVZ4i2dOxjzMPl/N4I7Z6mpfu235TvKJ3vE +6zmceNfC8zzCiJ95OeKNcN+Lf5jrv5FOz/iOWU9i/ko7oH0QT6X/wuVzVuwn +xK2n67/Uk0cjHokfiJtvEf+E3xXv1Z/i3iveTn3T/mtPcN9XnJN2xnyy9iTj +r+O7a0/U2+/F99VuqJ/Xhf72BdV+TbuR8aeRf+OI9NtDf+2PdkmclfKot/bd +bBnnJtT5Gfs881yosh8Hl47zINRn9cQ5CHU+hL3jxjX2Z+a5U2X/Pu6924Tf +W+crxC9Wu1CvcOM++z/TviI/6kPGgZT98rj8OOeCXUj//vC3M84x8tk7xke4 +fKrP9Xn7Qmv6xjt4/h/n8KPwus8dl//d/P+XsEfpOPch97/Ge8Xp4vIp/rLa +u/2ruPkEfmlNn93V/NhPiCvXsTH+ynPF7PONcRYuHe087r3OWcCVSzxoU+0J +nvtbI26yps+vqPnRDuDKtQ07DfvLeV12WuZb+BXsxnyvc0DyXATnpYQ94uap +7E/Gpb9j2F2e8xfze7PC7nDzeMaJuPd+y/81cR5D6Jb/j6ScMyx+Xf01L/2A +c1WcLxj5YV+5vyTysyz2U+Hyk/vkg5t3Mj7CzeewO1w+nQOuHTY/zI5yXSny +z47yHMTIPzvC5d85FLj862dx++jZHa5cuY/a/zeIcrE7XLkuCDviLymXc09w +8+TOAclzHKNczsvAc944/BBcufT7uHMAxkb/jpsXZY+48rJHXHnZY+5fjPLa +v5fx8jGeXRK8zg8437yeT65cGZ8TXDtGZ1wcs/zgx0d90P8ah5p/lr74Df2T +fv+IWG+Vb9x6t3zj4geki4vH0O7gF0acj/YCF8fCnnFxGuwHF4dAF7ye00WH +IeF3KRd+RDm3E1de5cp43Siv/Gc8c5Qr/b3gv45yyT/+UZRL/jM+Ocrlu+KT +SrnquD73S5Y4YfnHlSvb0+DyL5/4LZF/+cTlXz5x+c/zqSK/8pPzKfZDx3tz +PTu490ofr7r5ntLxfMZtlnQy7jGep2+Nv1IefEXU5zzHLHi3cn47Xu0l59nK +Oa74YUUfvHOko7yZfrw3z3MIvqScZ5vnFke50i5K3FTaRXDlSrsI/gW7CH54 +yT9+aDlfDleurOfBDyjn7rKzmyL/uU8++PJyHn6Na8o4RX5L0ROXT/nBO5fz +fn23GyM/2Y4Hp2eOP4N3Ld8LP6y0P/S7sZzbj9f0lcPzTY3j8Dwnu5wrWMdr +/l49OrqcY4yvKO18nrcd6Tc1Lsv9g/Gd2YV84PW9uO+b8YXB67mIuPrT1LhM +fvJcn/ju8oMfUf4fBF7Pef5COpFPvFvpR3D5l09c/psal8m/eqS+5TkeweVH +/nHtM11qXLf813TkH6/nT9Z4dfnHbyznTqvX6T/YbxNcueQ/x1nl/27gDcWf +qfv0lQvXjikXfkDpN2t+lAvXLrFPvJbX+/VHuPfn/9cIHXL9pZwXWvfrZbxR +5JcfJR2cf0JPvKZf2yv5xut76cFPy3id4PrxjGsJrr/O+ZrgNT9452Jf+KHl +O+I1n74PvzHXQYPLv3zi8i+fuPyrb3jNP35gacfwzsW+8MOK/5DjR/U58p/7 +v6Nc8o/z0+QfVy75x9UTdpvnWZZy5Tiu9As5birtHt652Bde/aIcV0Z5m1p/ +T/sKPfK8/biv/rPy0qOec1LXf+mAv1zS8fsr5fnc7xs8++XQqf5fgIz3Ludm +ZPxtOa/A7/V5Or1UdKCT59NvrLpFfup6XI6DSv4zbqCcU4F7bx2X+V37nOe3 +RDr1vJTa/+L+rupc+7vcFy8uK/KT/0eqtG90pPdRhVf9/xeDRmJj + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[{Polygon3DBox[CompressedData[" +1:eJxFmnf8V9Mfx++5595vO6tNGpKk0EIZpWWWpFI/MjITSmUmRWRFKpQkZRSZ +qcyMMjMiW0bIzCarxO/19Dq/x++P9+f9uudzzrnnnvGep8mQ4X1Pz7Msy4ss +i+In6KdyyLL64veI6qpshzLLHtL/lVTeXPh58YYqr63/7xXVE26h8rm0Fd5e ++BnV31L1qgsvVXkLlbcWfknlDVX+t/hqlfdUeUeV/6CyQ2irsjdEnYV3U/nr +wnsLtxdeJbyPcAfhx4R3EG4l/J5wD+E9hKuKrlFf1aijd1QTbin8mT7yNvoU +P1dlLUQd1e6O4PJdVfd90SLhzuIviOrov83Vdp3a3KXyvcRXqLy+yoeLvtbz +ApXvKf6g+mokvKPqv6g6DfR/LeGvhHsKjwjm9NlX9b5Rm7vF9xZ/VG2bC++k ++u8KdxfenbkS3l24rfDTwjsL7yw8XX1cLzpMz5eqvJv4Z3qeKNxV+BLxi0Xt +hN9V+bWiacH1rguuQ91nNbZT9bxRfJNoZFqXr/SOzzWugeLfQsJHMg+iL4X/ +I/4N3yZ8hPit6qu++jxebS+P/r7LxK9ImLJm6nu2qKlolugm0Uj997XaHCCc +qZ8VqteBtRB+WXgP4XbMp/Buwm2ElwvvIryL8A1qN1M0RM/b6XmxeBf1d6vG +dZzwX8EEbqt296t8lHDV3ATeLXoss9N4GovfKNqWM1Aa1xOvk95XW/xXtX1M +dfdnDfW+03iP+HrWUuX7scdy7/lXg/chY16id52Te9+uVPm43OVvCZ+jfpsK +36k6X4i2SXvmQ7V9WuWHiF+i5z1E3+u5Kd8pPlv8c9U/lPHov3fV57XsQ/H3 +RNcJtxS/WP8dKWqX+txNvJneuUB4V9X5VPxOUWPhj8U/EnVUnYp09tnbd+g9 +ddg3wn1UtlD0uvBg8edUXkv1Nwi/jUxIc0KdH1RnfRrnfunsPKrnJipfKj4h +9/quVvkvej4i+FubqH5N1oK9lPvsf8J/uffGB8IX5z4j7wt/oLYdgr/1O437 +O/03OJ3BL9P8fKiymZwj8TGcIdEg9f+mnq9iH4m/JbpauJn4KtEV7Av2TIX2 +onhv5JL4lSpvIv6GaBJrwtlQXzupz07R8qStcGPV30e4vXAh3LvwOvKNOwev +4y4qGye8q+hb9of6mijeULyW/pvG2UWeaQzvqKyv+tlZz3Myv2+NymZxdsQ/ +Et1In+Ifi27i7CDDVP+UtEZNRLeo/CbxXoX3BvO2t/Ag8Vh6Ldhrg/X8FnIp +yQrG+kDmsb/M3hLeWvwV0SXC24jvqfrfCNdkv4j2Vd0/07uWpT5ROC+KHab6 +X+t9X4gPQtYhw3PLvd0Ky1hkbUfhezLLohqahy5qf5ZwTeEewmcLVxdeoL5X +q24n0b2Z98CewvcJHyVcRXV2Vv0zhf9R+agkf5aLJueWM8+IpuSWP11VZ4mq +HC18sMqeZG7VprL62VH9jFZ5B85PZnlYqcJy9nmVBeFSdc5QeSncVPhpzi56 +RzRVbf7Rf1Hlw8Xf54yorJPwZqp/kt53lOo/KH4KUybeMrg9e6JCdZqpzaiS +B+0v4RHCF4m3VdGF4pOj67ZQ21bpvfTRSPVuD5YhH6jO/uiy0roQPYhu3EZ9 +Xq//mqp8a+FpSWe2VZ35mderFF2aZEVrld+s8sOFLxBhXKAXWolmq3yAyu4X +viidhXeFL0z7bXvhGarTT3ig8CuZ56SH8CPCxwm/IbxO+Dy1eV14SsLdhB8S +PlZ1xopORQeo7HzhYcJDOF/Cw4VPEB4vPEL4ROEWhWUCsqGd8LzMuq+98B2Z +9d2+rIHwMcLLRFfn1lPIUGTpPaI5ormiizi3mqsbost3UNsbVNZfdS8UnaG2 +JzEHwiOFT0a2C58lfJrwGOFThI8Vvlj4TOFThc8THip8DDaI+ARsnmhbhvc2 +R1aqzi3BsmINZ0n1eom/IrpZeC/xj0WvCh8ivl70G2sk/onoNeE+6F/RrNz7 +YaVojvDetMPOQxaLPyu6Lrdt9oJoRm67ZQW6Mrc99qJoZm4b7yX0ae69/QuU +e01/hlgjdKvod9aIcYn+YI2wR0Qf5J7DLxhr7r30GWcm9575VPS28KHia0Wr +hQ8T/x7KffafE12f24b8Acp9rv8U/SU8lPfzzBqJbxT9LTxM/Cco9x7bINrE +mWSM1GMdxX+Ecu+TLxlT7rPwvGh6bpt2leg24S6lzxPyv4Oet9CeeVz8cmxn +4ZfQ5YXPH+dxX+wNre1dwTYB+2u5+Ax0r+qfzLeo/ubCoxlb4b3APmmQW17P +S/pmr+jnfaLb08908QZq+wQ6r7AcRc5fp/I7g8/9ovRM+bXif+sbcvHTxT8U +LVLbg8RfR7YI78u6iR4QPpC1Ei0UPkD8I9Fi4YPF3xPdK7w/e5A9LNwZ+SC6 +R3g/1lZ0l3AP5l4U9N7TWDfRP5wR8bdEC4S7i78pmi/cDbkhmifcVfwd0d3C +PcUP13e+nHn8hb59fG5/4Q7mUeU36h1HR+vBLaJl+Rps3dx75FVkXe599Kxw +r9zr/5xw79xz8wFyKfd430eG5Jb3HwoPyb2/3kVP5f6O99BTufXjavRObrn+ +ETKQuYiWOd2j5YGGmj0QvB/fQT/m3qfPYzfmPmcrhA8Vf7uwXj5bbTeI/4jt +h8zFLwn+73Dx/skOQbbuGCx3j4225bYUP0LPr2XWucgP5rBfbhsYnd4399ld +icxnjVX/qcz6mvONbO+fW/7VEH4mWAa8gG0p/pf4r9iNmc/WW8jh3Gf0bfQs +/bNGavdU8mNqi/bVfztofF3Eq4jXKG2XYp8OC8bUQT9UEn8Y3RHsq3bN7K+C +0dGjctvDL+j58mC/mGUZob62EH4nWJZXV9ly4cnB42lKv2q/hfiJ+n9S7vGs +1X9rC9u0o8UniV8pqhqMqzMObDL1v1Xms1wLG1j4Of33d+Y1+0m0VfRYjhc/ +le/U/ytE40Vt0totV/vNhJ8Q/71w/9jb9waP7aRo3ahtnz0YrHP0+dni4P7w +nfl+zgQ+wtt6nhU9RmySn0TfCW+msgnBtjfPm0S/Z94rDyE7xQvx2cgA4W+C +/Wv80XeifTN8tN+jfdADRVuLHuZMY5rl9hnwHeqKbkJ+qHxdsM6szXuCfSfm +Hrm3QHg74WHCW5X2qfGt0aW1hJewb4TPFK4h/qRoNOvPfBSWmcjAZXo+S7gm +ezX5sbuLP8aYVF6ZPlTWC3tK9KieT1d5JfFz9d7jhf+ItjHxLb/K7Nfh3+GT +PKd657OenFfRWOFa4stFZzO34o+ITsO8E39GdB6yiLMiukC4NutW2O5Adzyr +5zGcU/EH9Pyz8FDxs/VcR/iR4BgF8YMvNbbHhdcyb8LLhD9DHgr/JlxFdR8R +bx59LrYT30u8U3CbzvgMwW1GizdJ39hb/GDR18gd8UOC7bZf1ddRwf4gPgC+ +Hn7GxGB/EzkbNG/bC7/KWPAbmWf8YuEvhKsKryscNyB+MCydfeqdlzsW8aSe +zxfeWvhpdJfwQN7PPhEeJPwb6xD9HRXiY1TeQHiZyscKbyP8rPAFueNdxL2u +zB2b+pSzHxzLYh1PD44LMT78TGI9+J29oseFLHom+hxxHk8W3lN1Doi2nY9m +XyFfgs94SOd8Q5LP1+q9e4p/HGxT4Mt0Fr8m2o/Dn8MOwl7dI7ftg32+u/iA +JA/uF92XfMYfxJ8UNULWVDiWg43dI7evRRyjZ24f+gnhA3PbCtgMe0fHhB5X ++QG57TJ8n46540MPC3fPbU/ju3XK7aMyZnzWWWkt1gfbg4cL/xJsVx4l/Gew +vTmYsyO8U3TcrEW0LTlA5T/reapwR+GPgm3PfsI/Ck8T7iS8JjgOSRzs+Wgb +EN/tIPF78AGQRYVt1f7Md7Bdic+4T25/FJ+im/hFou2FXwmOjeELdM1tL2Pb +t8ptU+O/7JQ7boBP0Zo6yU/BXzlT4+ijPgYy74X9P2y8hqUxZXOizyk+y4NJ +j6BPTssda31M7WOF9RPx2EqlZTKymXPLWWwcHbtk3vBDL2MNVP6Gni8Vbsl4 +gu1l/LW2fGvyGdFNF+q5mfDLqvMyz8IrxVcl/66x+JuiucJviT8cPc9nFvYz +jkSeq+0rep6MLCosu4ilNGKO9XyN8Hfil+u5lfCbyP3Scgx5NlHlOwqvCvZj +LhfeVnyFaJxwndx24tGcE9XpE33+qkXb2sSTv1d5GayTPknn6e90vjZmBpul +cs4e9hC2RxB+I3O7f1LbrtHxnM7iR0brus3F14uOyRxPuDvJanTWgqT78Nnv +SroMPbhX4bP4TuExRGRgGg8cef1bejc6FNvjMlFF8Fg2pf/r6r0fZ7bH+A7a +/5H6A/NdRfD38C1LWAPxxYVtavQUOmWRnrfNrCM26PlN4UG529H+1/RO5hG9 +jk4gF4B9/Gear/Xp3RvT+IkTrk/vCmkM1MXnrib+VLBtfhJrkHu/sm8rRfuU +vYS/VZ320WtdqJ9do+PqranLOcoce3kz2Xujkm/Xm32lelcJtxd+L9hf7yH8 +OetduvyF6HgPOYgvgmNOxF6+DI79EA/5Kth3wU7ANliY7IRque0V7JYGye/B +TsCWuDfZBtgA+EAnsOeCfT7sgU3Behf9Wzv5JSeyz1TeP1p/1ojWWSeztOKH +ReuZ6tExjKrCTwT7T9gJ2CdLROdkthkeTHbC5uIHRttyW0fbIMS2z8gcm6ki +vlTPAzS/L2X2p6YknYJuGVTYhiemhF4jztw3GmOPEdOtmzBnoGo6g5xF6lEf +uX1UtK5H5/8vF0JuYP+kP/k+bD5svxGZY5HYk8syy0b8WGIbyFLiHN8XliHY +FPgm/dT+2Mx749eEB4h3i/Y7OKcDUjl1t032CfOwKXremL/KhWOYkwqvMWt9 +tf6vVDjOeaV4VdGllGMfFY7TXlXYDv4P38haFY6XEjeNhe20ieJH6HlgqhMK +234X48AVttkmiP8dvXasIXk5bMJLCp8BzsKl4k1Kx5OJK/8WnQMhT4EN1jh9 +FzEhYlLMV93cMnx0tN2C/clckOMgh1JXvE2SY+wx/Ahi0Qsz21mcO95B3JP5 +JA46P9VhrxDjRjYSdyWe1ya1RUcQa/yxsO2Bf4kPij1CHeTge4X7RR7OCM5v +kTsbnmwq9hD2Vb2EydVgh49MmPwNeSXs8Cbp2ztE7yPOETIE2/yywvrlZr6/ +tF6j3beF7QFsVWzOdqktfWxR+r3kNFolmYN+wZ7FrmVO78s9liq57dbtgm2L +lUlvLs2dN0DfbZ/bV2qf9jZ99En9fBd93jn3C6N19Aj1MS/aFiVmeHu0TUvc +8rZoe5V45vxoG5VY4hPRdtE52M6FY+/E4MlT4et21X8PRNsDZ+j/xcKtkZ/C +i6J18chkpxNnIMfzSLTMPKuw7Y8PgF1C7pKc3dnJhievsSqzvY7di/17SLTP +je+wT7DPgKz/KNoOH6+2azg7whcW/p96TTL7buQ6txQfWToXNEn8tGi/48Xg +nEaXYNvlqWg7+Tx0bLT9MLxwLpsc6+nCd0XbNsRU746264i7PhltN54rvAw/ +R3hMYZsS23KSyupVOK/JPt0/OgZCXKhm4XzQZPGtgs8+e6VR4bj3rMKxYOJ3 +xIy3K5x3vrmwHOqd9m0z1lh8TuGyXqn8m2Svsof7pL23Lu059t4Z0Xlt9mW9 +3O1oz57GD71K/68u7Wtvm8770Oi1vE/UsnCOey62QOGc0Y3itQvnE68vvOZ7 +pnXfpnCO6QbxOoXzjNPF64quF55ROOaIzLwltaM9vtaWySachswsnDu7RnzH +wv4CfkONwrYiNuP3GudQ4YuwkwvnuWZiFxfO000V37xw/m4KZ7yw7Y0NjqzF +ZyFeif5BRi1nTtjznMPcfhf+18fZ/2OdxD6Pid7L3ZNdfbLKhkfrMPxU4oLc +lzg2OA5DbpU8GnuC3N4R6V1DUj/0R2wNf2xu5twjcTdkIrm//kmWoiuRDdiZ +2KP0/6n4kYX7oT/qHp76GZzeS24NWXO28KhoX/uY4Pr41hPD/9tTfhx6Jvre +R73oPM6q9J5L0jfimw9OsopxESM4Qc/DovOmOwTnUdlz2O3sQXQLOga9zh2L +dam8YSo/NvN9Azi6eo80Nt43IH0X+uHnwrnIvZNuxd7G7mbfHh/sszMe9hR+ +PHG5ocE+LT7RFcKVS/tQ2M5rCtuuxwXbr8R4mVfiG8TG6BM/ijVhbfDZkDMn +Bdul5KyJ1X1SOOZ2YrBNRcyPOk0zy60Tk+win87YiK+Qe0UeEs9Ar2EzrUgY +nYYdRUyAsRGXI27IOSNWR65s4P/2cLRexQdHZzI/6ONnk9x5rnAshJgIMpf8 +PrKWuA53FbDNiKNgg2F/cdegVqrP+HjvEL4hug5rSBwDHYgOpj1ybGZ0jqt+ +Kj807Xn2O/lt7DfOwwcJs3/Yn6zvBWnfYjuMS3v+vCTPOqa9PS7tAeLUnA/y +yZxZ2pJbP0t0fnB+mX7Gp/ro33OCdTC2ADYBur9XwshSykcnTP4XuwYbqnEq +x/5Gjp6bxkTOlHdNTeNkXzTPvUfGpGfGQ/x8h9z5+Tkqa5c7ds4ZuSa1JVdH +HGBuwpwZ+qAeff6Y7CXy8uRpW6X3gsn5tkx1x6R+eWe/NAbik2cF64Lx0fHP +l4LlHPEXxpSX7hOffW1u+6tLbl3aOe1bYhTMIbbi0mQ3Yj+S/yHnQx6Y+ypj +hSeUziVhC06NzjWTU8Z3wI+Yl8rJKWF3YUtXQR8Fx2bxa/Fv88w69cqkY7H9 +J6R9Q76Ys0+8mTmakuasfarDf9zPQT/Xr/A9H+4YofOItV8dPBeV07uQBedH +x9gXBcfgJ6WzvzC4vEF0bpozhn3aJu0xzh76mnlGt3LfjBx7bb23YXQOYFx0 +/n0K44u+a8UdLO4EsJ/Hskej83XIqDHRe+HctB+qp/Egay6IHj99cndgauqT +8TOHrEHD9J3cl1mSfMacuFTpWCd684DC8TryqgcWjumRVz2ocEyMXCc+IPkm +FAJ3CpAn3MfrWTgeSG6He4GVk3wg/0EeBJ1IXOjf/Vh67dkD3C/AD+oR7Bfi +v2+T1ph7E8jAltH/UefQ6Ng6tj36i7sPrBW6CV8SnxF/ER8ZP/HwaL9xv1SO +rc4cc/+CXAg5DPQUOr51mvOBuXN2+wofWjhPR853f3Rn5jw4+RryJgdHx6+Q +Jdz5mVU6Fo8vtiHaZyfXeVPpuD/+3ezSuQF8tPuDc3Os79zSuQT8xBmlcyHY +ureUjvXjS84snS+ZkOz2rsF2NPFwdDpnkTPLWeaeEfZwm8z5L3Jh2CfYKeR6 +0NHoxr6F84DkqRslu4v8eL/COUFypjeWzrXgh3YvHL8lF88dGXzyXaJz0fiR +3Dc4rHCejpx4g2SnYWsRkz8o2M8md/CvHlH5J3o+OEt3D6JjO9wlqJziJPRP +vpr9zrlbGx27I//7c3RMmPzvT9ExYfK2G4PjfuyfT6NjPtxJ+CW6nDzyt9Fx +Zvwp1pf4xvzCdwXJoXOnZWN0DIoc9A/RcUvyy/9E37fBB29T+G7hbeJ/Rsdz +yGX/KHxE5lwzeV/yv8S9yPccnznHvV/hfChn55voWDf56I5pv80TXxcd0yY3 +Tb6Ge7V5hfOt2KXYafUKxz+5m4E/1S2dF+J169N76yNPM9/r6JhkCjqHu3qM +jfsJrM1B6eygC8YmmYStRewCOwu7FnsSu6+5yqdnvkdB3hlbDd2/e5IJ5Aq4 +e4UN3VP8q2hfibsNN5fOqxEzIV6BTc39rD0K35+8vfD+Zp/3ZlzRfhz46+iY +PPcHuOeFLcGZnVM6b0d85q9oWYfMu7V03gv/a0Hp+3P4IHeVvquHn3J36bt6 ++A73lL7zh4/zanRe8gLhldG5xbHCi0rfn7tVeGHpe3X4R8SdicMQV5hfOh6N +L3NH6ftw+Ercd+KuGm0fL31PkbvKT5a+y8g93tf4ZtUZhzwufa+RO9KLy3Rf +WeW3l84L4tfcWfqO3fSkB3dM67uk9B1l5vP+0vc+8R+rFY4j4UPVrfBdYfxo +4p/cB65ZOs5CbAfdy/1t7ntzb+qE3PccWFPu5XYXPp89Ulh+cp+NO9bctf43 +5h+dh+XOUv+059EjdSp8F5l3VVf5uZnvI+1U+P7zLeL3lb63ii98b+n7l/jL +l5XOyREDmVg6f4n/fmnpPB9+/ezofC53oshnIbfJexPDwe5jjR4ofT+Sd91W +OueKv/lIme7j4iOUvpPNeby2dG6JPXBN6XwJMYHLS+cUiZk8VPoeMPLk4dK5 +Ge69zyudl8UnnVo6t0EMYUrpHAxxiadK5xG5wzytdJyaub2+dJ6P/TC5dP6D +GM7VpfNPxFgeLdPd4tJ3hYhfcYf5itI5S+I2xKPw8fH1ryqdyyFuc13p3Bj7 +/LHS94+5r35l6Rwn8Z+lpe/jchd9eulcO/GZ/wIUdtSY + "]], + Polygon3DBox[CompressedData[" +1:eJwtmnngVsMbxe+9M2+LLKVFpFXIlrVEikqlskYpSyGRNUIRhSylVEhpsaRQ +RLKEbCUkWsgSKaRSFBItwo/f+XTmj/l+nzMz933fe+/cec45z617Ue+OVxdZ +lv2sP1H/YynLBuVZ9qLi5uo4Wm2a4vUan6mx7cKXafxw9b0fsqy3Wq+Ev9T/ +6sJl9H+IWn/FB2n+IxpbqeNf0vFNhJ8V3iD8ivAumvOjcF3Nb6Q4qO92xS+o +r5nm/qV2ufARwvM0foVaT+G6wh/qfzPhhvrfRe1cxburbdTYNrU9FH+r1l7x +o/q+sfrsevq8B4W/En5e+AT+Cx+k41crflDzpyp+Wm204lqaM1nxA5pTU/Fh +Ov4JxWs092XhjcITOXfhCmWybISOeUzzr1NfBfWV0ZzBwkerfau5X6sdobil +5u2s+fsIj9bcZZo7Q3OvU38/jf+kvqMVj1d7TrixWlvFB2j+BI19q/kvaH5F +9f0i3EjjrRTvq75ywq8Lv6b4X83vo7iG2gLFe6tvouJBmlNDcZ2Sz/Ul4eUa +P1+fcU66/lzP39TXSfhx4c8VHx/8+89V66b4IbVpip9VG8uxap0Vz8h8Pbvr +mMqKX1BfFZ1vOX3fMMW7q6+s4ps1f6iw/mUzOEfNf0PxFh37qsYv0cBF6l+l +vj0V91C7IPc9vlBxY805nu9S3weK65f8W95V3zf6rKFqd3CsPm8vff+Jwdey +m9oFim9UG5DO7yjN+UfzqwuvFX5W8d9qJwpXVntf8QOaP0XxJI3fr/hWtZHC +9YQHKt4c/dmfcs6KD1R7WPF3+uwX9dsaqFUXfktzXi/5+65iPahvqY7fX317 +KH5DfbMUV1Lfr8LHCJ/ERWKN5H5mfkq/70rhFsJfcK00/pri1vq+31mvao2E +v9acdxQv1fxDcq/Z5xX3V2vK71Pf/RqfxRoSHqTjRwg/L7yncH/hwcI3af6x +rD/Nv4/v0nh94ds1Ply4jMavF54t/Bj3V/g4nn+eoZKfB85lCaeieLXGTxDu +oM+5V/iq6O9fqL67hGeofy/hm/V5Qzh3fj9rUePDhF/SeE2ufWF8qsbnCo+j +X/f7auH9hBdp/t0av1H4GNaG8EjhK6N//wLhO4WDcG+uvz7vUZ4l4b7C7wg/ +ztrS51YT7lf48yYL7yTcW/hW4WvVPhbuIpzr+68SXiB8lvD/FD+l+bsI9xEe +JFxWn3+D8BzhicLTNF5VuG/h83+SfUL4WuHbha9Qmy98hvDf/H61D4U7snYV +v6D5NYRvEb5H+Bq1xcJns8nr9/QWXqSws/B/il/V/H2Eb+N7NT5J/8sLkxQG +aryvft9R7Je572+/6PW0LPf6eELzKwhfo/m3CV+ttlC4k/C/ir9jvWhuJfW9 +onilWh3F12k86Pt6ac77wqcK/6m4j8YPFv5MxwzlegofJPxp7vM5TW2IcC3N +X6m4p9pbwu2Ftyg+Xe0e4drC35ecz47KvUfO0Gd1FZ6iuInGf1K8m/oGCH8g +/GTJ+aer5h+q9pXGTtb5tVB8gubcqzkXa/xNxe0Ub2Z/UntbuIPwVsXd1WYK +txTeqPgCtVeEWwn/pvhCrrnwicKbFO+q77iF3Cb8BPlQ+GZyq/Bk4XPUpvL8 +C69XvErjh3G/yNe6fpeqb7bwycLbFJ+hNlJ4X+FViruw5sglwj+SL3T8QOH5 +wk8Jfy/cLOXT1xV/o/Ntp/gRjT+k8TbBuWul+nqqr5/6Psm8F+2q77+eay58 +sHA54TOFHyKfau5qxS+qf2/hAYXv54HCe7D3qu9v/b+GPVLxktzP93lqzwk3 +1/yfFXdSGyd8iPAPis8lXwkfK7xB8dlqjwkfKbxOcbeS8zl5/Vf2A31fy8RP +2GPK6/v6KZ6r8UkaP0ttLL9feI3izmqPCh8hvFbx+WrThY8X/kXxZzr+APY+ +9U2HC6lvnuLTNL5d8eVqHwifLvyX4nc1Z3fN30/fXdL1uUP/H0h8ZpDiRprT +XPEq9c1TvLPa/YqPVN97Ovae6FxdXZ9XSccXwldzr4Qf0dwj1Zqk/ew9xdU0 +frfwYo0/w9pXayb8Pfmr5PzRTvFFCv/T3Jpqw9lPNf+5kvlWFY3/oL5p8AW1 +e3keNf4s11u/uUPKP53Ym9XXQ/H/1Pe14iPUjhZeQQ5WXEPHD+P51fHThIfp +mLEa20vtMMUV1fcg3IU1qbk5+VDxLM1/WGNVWE8aP1N9H8HdornY/hrfXdfj +AI3X5ljNeUNxC33mkbnXKHvwB5pfTfgg9ZfV/L6aMyczV9pFeGf9XydckzWi ++F84pvCrOnZ8yfn+qdwc8zjFjwTz5Ms03l/jhwSfC9f0LMVr1TpqfKj+V9fn +M/lK/XtN8ydo/uFqjYWXa/5ccgX5TvFt6nsumq/xWy7kmiruoTmzFLfR8X8o +PjSYy12jvnKsSeGuip9WPE7jN5T8bHEu5fX9lfQZtwp/qPEpHE8TXqrPmMOz +E3akhewKjd/C/iHcOvGJ0xRX0fF3ko81PlXjF0Xnv1dzz387+PkdXJgPXBid +v2Zq/GbOL5hfPKjxMfw21pfwS7mvX49ovjNLeIDwRO6T8JWF8cXR/AO+RD56 +Jvj4Gwrn6ynsQ8JV9L/QiVwSnf/eyZ2Pekbzh9m58/Ol0fvRu7nz6c/CpxFz +jop7RfOJ93Pn5/JqI3JzuzsU/xL97H+k799J3/ercEe4k/o+UVwhmDvumXtP +hJfCT3fLnT/KBz9bVYX3J/cG7w+tcl/vg0rmK4uF31RcVZ95l/AiHfs0e31w +PhxSmK/ND87Pw4VHCd8lPCr3M3W34kfDjkc+u7zw/ZgTnF/vKczH3kJTCN9d +mA81CH5e2qh1VLw4mO+N0vho1jtzOFeNv624IU34C+HZ5GbNH5P7mb1H8aJg +vvUA2krjtXQ+I5gvPF34YLX9hT/W/LcU947+PXw+fBM+Al++qrCe6UDOFc6E +vyn5epKbydGnBOeznRRfr/GK5Mdg7tFUfb2C+Qj69FKN71bGmoz81jrlM/QB +3LRJbr21Ino/OSHtF+ifdzJzCjQc938/xQvSfnR98Fo6XX038Ayq/2TFtdSe +L7ze6nGuaT9vrjmH5dYU7C8H6pwqKG4fnN9bR/O93xOfPzE6v2xK/KFVdP75 +LfGLY4O1LBz/JrRaNP/4IeX/o6L5x9rEfxpF64V1iV80jt5vfkz5tVFhvYsm +HhWs19l72ufe/5tG859fUn7sEM03/0x8qE00P/0j7V/tovnh1sSfWkTzv42J +L50czZ+3Jz7TPpqvbkv87gzhL+AOiS8eG83/fk58gf2c/a8tOSPYH0DLco25 +1p+pnSo8pnC+/Vz4NOGHCuvHJcKnCI8unC/fC35+hxXeL+cG5+uhhdf7KuHz +hScKLxZeKXye8GPCi4RXC3cTflz4Y+GvhTsJjxP+UHiZ8FnCY4XnC68QPlt4 +gvCCkvlYF+GHhRcKrxHuLjxJ+BPhj9ivhUcU1ncLhdsK31c4/y4QbiM8snC+ +4Xk8Sfj+wnyhLjk4t4atyf0tmZ/US3yF/YlcUCVxGPaHMzJrZHLqvGhtXJ88 +ovkfRvO7AxIfZD+EH6KhTyc38rwr7hrsl1yr/300Xl99fYI1L9qXZ366cMNo +Prcq8Ts8DPJfw5Tf8IzwjmrDmbi3mrOP4i7B+zP5mVy6d+Ibx0Xz5V8TP+wo +vFT4n8TfzhT+ktyb+BseGF7YM3Dkkv0bYjwTvJMY/Tzw3Uel7+S7ef7JFdvS ++fHsH8FeFe1N4Jnso+MfFZ6cmWPUFh4tPCl3ziX3knPIPfWEb0zjozJ7UrXS +8U/m9rTwtipH+x18Bn4VngfeB54P3g/XnGt/Zm7vipxZNTjnkUtPV9/niv/S +MdWCNVq74P0T7dYv2DNhf8FL6BzMCdkPtnD+wRyCfLZW47sFe0r4c5uELwr2 +cLoLnydcN53PSPXdx5qL9s7w0PCnapSxJ8c9ODSaU8EhuZ9r0x7JXtk8tzYq +F8z58RTWwFXKOCe21PEfBGvc24P5N9p3jzLOWXC2L/V/T+F70zP5YzC/fTj3 +PeReVheewL1X2xrsaeFt4WnhbR0SrRe+T/rhHOFvoYGaC9E6V/g7haVgfwAP +CG4Dx8FrGRLNBasVXk+dhJcJ/1dY3+ORoGPQM33g4xpfrjgP9he6CK8gPQbr +77OEvxL+t7BfME/f9Sf5JHGmi8OOVJqVU39PxftpTtnc95x735XnQuOb05ro +ikZUHIL9g+X631l4vMY+Kplvj078A26/NF17+ioJfxHtteG5FcJXRPsPcCy4 +FvcHL+I+4Z3IB3A2zk+f/y33ItgrxDMsm/gzXimeaZ74UKvMHGg3+HD0Z9XP +7FXtUXIu5h7uqfirYG0BZ6lc8v1FG41P4/PSWmFPZG+sqjYu95x1ab1MLtxX +LX0f2g0NV6HkPQx+c2PhvQ3eC38dDn9mfQXzFdYP66gM90T/d+Z5VVxD7ZLc +65t1zn3h/vRIfKZeyXsJPuzeie8wVl5tOpwjt9fKZ16W7veFin9TX+VgT3VV +5j7uP3sX++eNib/AZ4jRKHsU9tzrZv5NVwb77SszP8/4sfiVaK/zhLsH6zT0 +2i3CfYX/yX1tuV5ct53QsbmfsRmF9yie/bcL713UHNoqfj1zLeKnwloIjgJX +2VzY+4JjwDXw0BsnzoK3/k1hrwDPoEF0zeGkwh4ztYiy+k2X5s6BdYI9jy25 +cy65Fz41MLenjbcNp4XbomHReLsGn9vBak25HiWvpSFpb9m15LXIHsRehMfM ++h+Y+Bl7Bmu5V+G9hHzYNzdnhDtSA2B99035kRoLzz41mGuCNQxaBs2DV9g/ +rTE8d7QqnH9mWnNoATQb2g2NhvZDY6G90HRoLzxUvFU0At4qGgothYbC68Oj +wauBo+PN4snhzaEB8R7RZHipPNNoNfLXgOD1zvONp7kwPY94nXioeLP7ZvZW +8Yjw/tA4eEdoALRAg7Q/UvNoireRuRaCRkOroenwVgem/RT+gHZA0+CN4JGg +ddCoeNdoErQrNQvqBdRY8Iypb6El8P0q6358lDv3skauCtZceOVoIrQYmnJ2 +2r/xgtFUeN1oXrQW+3Ut1klurxsN9FNuDgYXQ1Otz+25obXQyBty16zQzmi6 +NXnyR4I9WLzYI9N+hgeLF4sGxLu/pHDNhP38teiaw3GFa3jUIqjBNStcg6M2 +tyFYTz2lvs80tjnY/54uvAy+EO2nviv8nXCdaL9taWF/kfW/IbMG5vn+O9gv +fynps+3B9YAXhJcL/xHsXz0n/JXwX8H+94vCK4R/Dt7vpwh/Lrwx2I95RvgL +4U3Bfso04aXCvwf7Rc8KfyncoDAXghPBKfaN9nu/LuxH7h/tpy4v7PexJ7A3 +rCjsL7JGWCt3Fda3bwb7WXcW1qdvBPs3dxTW56xJ1uZNhXM5+/fqzJ43++2C +tNbJQeS1f4L9x5dTPmP/WZPZg2V9zQz2Z24t7Gc1CdaX8LcdNaxoP/STwv52 +9Wj/8uPCfvh6ze/J+Qt/ylpjz+fZFV5Scj5BX+6S9u/GwXqUPZi9mHrinMwe ++HnBHvE+hT1CvGM8sUrC/TN7ZXhauxf2rPG6qJlULewxU0uh5ro1t0dFLRaP +qtB4r8zeFR5f5cIeON7f1MK5njXAWsDjrFLYo8f7nIluL3wNuZbUcNGokzPz +X2qGZ8JFMtcS8QyohZZP+wHkoXthTgW3gnPDvanlwT9f4Rqo3QTnCq7xtihc +H6X2i6d6YOGaLV7rksLeNPeEe/Ne4doDzwzPDp5+3cIeKF4/nn4d4aGZvX48 +ufqFPRG8OmoQ9Qp7rtQmqAnVKKwHqBXhAR2Q1jjeEDW2vQpzfmpveNo1C3vA +eN14rg2Fx2f2YvFwDy1cQ8bbnZqeGTg4egMP+LDCNUu8YTyawwvX8PFuqIHt +XdiTojb2ZuGaNfptcTSfG57yDfs/mr9Nyt/kZzQ8tRo8A7Q9HgC1FDQ83sDl +wbwH/rNN+OrgvEx+/hOvIdpLQ5OjzfEYqL2g6fAero/ea8k/8Hv4QduU71kP +eCitE3/AW4HDUgvDs4Db4jlQS+EZwIvAU6F2g2eC14JHQW0HTwXvAg+GWg4e +Ct4MOYPcwW+cnX4v9ZpKwnOjNQh8GM8Pfx+Nja6ukvgl+gmdjF5eF62Z0E68 +k0H96rJo7v4He6zil6O5+Ra1mdF7Pns/HtcrSQ/hi5HTfkj6DZ4CX4F/T1C8 +KTMHnJr0Gs89z//v3N/oewFHpT6Eh47uR//D59EY1PrwaNAeeAD4mvibeAPs +Z3Uy7zlvROen6Ymfbo3WXGgvPMf5SY+iSzjHF2O2QzNRu8QTQkuhcail4iGh +fWZF//aL0ufxzgh+zznp93M/agfzpe3pfOCvPdP6mhPNp3ql9UX9nncLeMdg +S/Q7Loy3TNcPzQrX5Z0O6td4EHjtePZ4EzwDPAvsqQvT8wFvhj+jTx5R34G5 +nze0L/kUPxlPZIniT9Ua5N7z8ZPRy7yn0C39HjQ72p2cS/2emn+LzJ496wU9 +Th2CesT6aE+D2hSeIV4Hnhm1VjxDvDQ04RmJP6MV0Zgd0/7J/sh+yX5KDbtz +tCdCbQtPEq8EjwefG78b7wdNhDaiJkK9Bo+T2hUeO94nHgFeAe+kUN/gHQZq +SR3S70UTU7dBQ6CV8VTREPALvFY8FbyV9ZnrbxvUTsnNkamfcH0nZX5nhXdX +prJ3ZNZMrwqfr7Y18z3m/Qw0E9pprvDx0Y29fkzw2JToc+cakFtalOzf/Z47 +v55QslewKXd+xTPokVnboA3fis61PANPK25Zsl7+Izff4v0RtC97Fv4b65ln +o2J6HgfxzGfOmeTObtF6Dl2Hf/1O9N7CHvOM4utK9sN5BnkW9w325/DgNur/ +5dF8Fl6LP96qZL9xc26+1bZkv/Kv3PysTcn+5vbc/KpZyf7oL7n9zuPYL8nV +uf3OU0rOnRUTX2xfMh/5Lze/a1cyH/k3Nx9sXrIf+2tuf7RpydwYjozfeWzJ +fuaPuf3QY0r2M9fl9htOVDtXeFtufti6ZP/1z9z88M5obgFHgaucVLJ/Su0Z +ftukZP90bW4/9mg+U/iH3H7s8SX7w1w7/NY7orkOHAgudFc0N4HDwGXujuY+ +cBa4y/DoXEzOJHeOEB6cOUeTqx+Izv1wLLjW/dFcCw4AFxgZzR3gDHCHYdFc +gJxP7r83OhfDEeAKo6Lr/3AKuMX46FxOzif3PxTNXeAQcIkx0VwCDgAXuC+a +e8BZ4C5jhcdk5jxwnwnRXACOAFcYF80l4BhwjYej6+dwBrjD7tF+Fp7CIsVP +kLMycyq41ZMx5ebCWv+W6OuP5kH7kC/ROncG6+cB0VqJ9YGWGhitldBQaKlb +hTtk1lBoqduFz8nMQeGit0VzUTQ+Wp/8g7YaHKzXB0fXS+GwcNmnot/3wDPA +O5go/GRmjwGvAU8S7kltBK/ysWjvAU4KN308WnuhWdGuk6K1F5oMbTY5+n0H +NBnaDP8PL5s9jb2Nd5h4B5B6FO824Z+Ru8khvI/HGmYtX5BZu6FpDk58FK2z +Q2PlXvNoLzQQ72agGdBGPIM8izyjaDVq+NTyeUZvKlkTHZL4I1oJTxVvlXcy +eT+AmgPvlqGJqEVQI1ma9iP4GXtAxaQX4MNoJmqbeGJoKTTO/LQ/whXgz5WS +noAfU2OhtogmovaCf4d/hI+En06Ng3cN0GzUPqhpoPfR9+hr+NF7ik8p7Gez +B7EXoXnRnmiwPOkR9AT+EveKe4bfRE2Ldz+oQVDroiaGn4T/gP+EBuZdG3I4 +uZwaFO+u4AFTm0Kj1U58H32AJ8y7JWhovGJqbrzbgwalFkdNjneT0KjU6qh5 +8G7LxMy1EPQPuYCc8L+kV0JhjYwew5PGm+YdQd7vQBPWSnoErYheqZP0CHoA +jZ4lvYV2xy9rmPQB/go1Q94dQkNTS0QDU6tF86KNqSnxLgMamVoT+m1L0nvo +O/IpuZV3Rnm/lJoL7+bwfii1GGqqvIvB+6vUWk+LfneSdzR5f5OaLO8a8c4g +tVremaXuSv2VegyeP97ompT/2PPZ+8lZeAVfRn/X4ez30Y2Yd4x5vwu9wTvF +5GhyNTmF3ELOwdsmp5BbyCl4EeQIcgU5iFoeOWFjyq/U5tArvBNNTiY3kyPJ +leQ4aoXkNPYu9jD8RXIeuY8cQ62QHEuuJQfjbZDzyH3kRGqDFZMnhV9ArZvn +dXiwf0qtgpxF7iKnLUvnz7tss9P1hqPAVeAweAPUQHn3CD1FbZSaJ+8KUeOk +FkpNlHcY4BTUSsnx5Ho4ALVOOBBcCE6D9wCngdvAKfCWqBlRO1qdmf/AMeAa ++KvoezgMXAa/hNo8mgHtwDutvG+LnsN/Z8/BP8OTwQ/Ef8SrocZErYl3aHlf +9/9bcto3 + "]], Polygon3DBox[CompressedData[" +1:eJwt1gfYlvMeB/Cn922phFJW4yq9ddraO1Rv2trRQgtpkQbtknBSMio0aRxH +dZFIStNuadHSEjpFVA7Fwfn8vPd19e1+v5/n97+feY8SvQa3H5SWSqXmSw55 +PnsqtRXUTk+lJukF9cflPZZLBrN0/Ul5X69pbmis1cvYwUi2I1sqVZot99gi +fjLmZDGrok+RtXpuGcKy66/KMb2KzGMV9Hr2N0f/2f66sMP2t5AfYZVlDiun +dzf3vd5c1rE67GXZq98o01gxfbKs0XPKIJam17X2Zf2C5+jMDnmOxfw0qy/L +WG39MXlXzyEDWTZ9iZzRG8jy5HknyWo9uwxIxZtLpUZ4jkz7bSpHUTd2vxTz +98eetxBfqdcx95J151knjx3kFdhj7BCryday4ewW21tlJ2tl7RYpGd+ZzDCb +z0yGDLR2rX6NuYUem2puI7tchrPcellz4/R95iqxd8xVYzPYKXYb28Zmmd3O +isjjrLBexdx0/Vtzmewzc1XZM+w71pRtZTPNbmM3yGRWSJ8hH+tXy1h2pT5d +PtQLyGiWX/+H/T2i77S/MmyF/U3jm9kVMpLl0Z+S9fF9e/xhllN/Wjax/DKC +XaaXtr+h+if2V5ytZs/IR6ygjGFX6BeT3/Yb7Gl/P2Lda7YF2WjbMTKSPWv2 +EzOFZJzHrtJ78B/0FvI+q8uGslLWZMjtbK/tc/xTM4VlPCug95R79Ws97l9q +jv/KWzuJHfSaa7D3WEU2mR1mtdg6NtvaHayoTGHX6HlzZP0mJnp8guTR/8k3 +mMknw8zl0iuH6yfMNmSbzfbnD7Prk/cd77+SuafYcXMN2Jb4vFlZ23JyFztp +exObZu4bc03Yp6w2e5GdYx3ZAVadvcC+Z63YbjaMVbKtnJ51zvnZthDr4O+f +zE3VC+s1ZKa1P7DWHtvFa7HZaVlzMb8/Xhcbz75gleM48r5qslnsLGvD9pjr +yc6ylrKe1TPXR+Ikuc5cHvaqud7mLrB28TtimWZuZq/ov5nryb42dwtbxP5g +vdmpOG7ZYvYn68P+wzLZ68l54wH2Ixtrn8/pR83VYztZQ3ML2SXWg51gjdnS +OIlLP5szrBFbov9lri87zeqz+exX1o0dZw3YAnaRdWfHWBP2b5Yu/ePzZq3Y +quQ4ivPG76wleys5l8Rv6DfWjK1IrhVxjr0Qv3W2Uy8vs9h13tdtbHlyLo7z +6Xlz+eNcZ7vfa6kex6C+2exV+hBeXDboTfmy5Fwc59hzfHQc6/qB5PiI39oY +9iw7wuqyHayttZ+zCjKbXWtmnDyvHzNXn30ex3Vc99guVo6tZ6Piusf2sops +U5wT4nrGdrPybAMbwSay7cl1MI7VkvE7je+er2I36gVkCjuZHB8F9YnWvmbm +F9aVnfX4eDaXnWYt2JE4jtk8doa1ZEdZc+vfZHnTss5bcf5qwz7TM2Q6227d +cJmgb7M2g60x9yh7gu1hFdhG1s7aL1jV5Jpc3Ex79qVeLS3rnmEXWyr/1Zsl +199mca6TsWlZ17e4zq2yv9bWbmHF5AmWz8xDMkb/0FxR9pa5B9lotoUVYSvZ +RnalXsLfxeQh+7pLfjTXWj4w18hMC7YyOa/FNeCS2UEszfaeuI6yLubmy369 +rLwQ34e+QA7o5WQmK6Xfae23emN5h1VlXdgJ/WZZwSqyITJK3+Q13sDe9Hxz +2D5WKvns4/MbLI/qG8xdH9cWc53t7zhrmJZ1HxH3Pp3YYb2O/IuVYS/Kbr2E +TGVF9A7mDuq1ZAkrze5mP+lt4nNlt7Je7LzeNr4T1oR1Y6f0THmX1WB92a96 +p/h9sObsHnZOv10+Yo1ZV/ad3kRWs+rsJdmjl4zrJSuqdzR3SK8tS1kGu4N9 +ozeSt1k19ooc1W+Suay83lsGxGvzWeVO7l96sQfiu2C52AJ2v/39j3WTfayd +mX7sot45jkPWIq6p7JLeRXawluw+9rveNY5r1pb1Z3/o3eN6wdrH62B/6T1l +P+sYr4P9qfeQL1kH9iDL4TX1ifMO6xrfOUuP184OszvYQJaN3c0Oss7xG2LZ +49rCvmJ3xrWH/aJ3lK3JsXVvPI++2WdwOVtiTb9YzzbGvR9bzPrGc7P1LC9b +FM8X955sZbas+/15cXzEPSpbk9wnxn37wDhPxHfLCrNlcfzEZxPnL5aTzWcD +2LD4HuM+lr3O7ovjOo5Jlp8tjXuC+KzZqPS/b4lTc23/D0sviC8= + "]]}, + Annotation[#, "Charting`Private`Tag$33306#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}}, { + {GrayLevel[0], Line3DBox[CompressedData[" +1:eJwt0rsrxlEYB/DD634vgyykZKNkpWSllM3rfhsYWDFa+AsYzGQUL0mSW2a5 +3y//gEhug8vnJ8NzPs9yzvfpnFPWO9IynBRCmFDJmqj/Vs9qNhZCARdYylVW +cZd1PGQTH9jGJw7xh2PMSQlhisWcYQXnWcMVNnCPK3xlivAjJvGTrckhHDPO +E7bxlO08YwfP2ckLdvGS3bxiD6/Zyxv28Zb9vOMA71lk3nemyn2I5ldv0fnm +OmQzd1nPBKs5x3JOR/s5ySyO8st5g3xknHds5AFruc1KJljCZfteGJOfH8Lf +I3xgn3ncYy53mMMtZnOTWdxgJteZwTWmR+/FtCiHqVyiqLBI0WHcMqV3DaFQ +//T/B34BshJC9g== + "]]}, + {GrayLevel[0.2], + Line3DBox[{923, 1192, 1209, 1270, 614, 1208, 1206, 1247, 1551, 1118, + 924, 1287, 1288, 1556, 1119, 925, 1402, 1120, 926, 1403, 1121, 927, + 1404, 1122, 928, 1405, 1123, 929, 1317, 1464, 930, 1406, 1124, 931, + 1407, 1125, 932, 1408, 1126, 933, 1409, 1127, 934, 1410, 1128, 935, + 1538, 1202, 1129, 1203}], + Line3DBox[{936, 1207, 1318, 1539, 1248, 1193, 1213, 874, 1271, 1212, + 1210, 1249, 1552, 1130, 937, 1400, 1411, 1289, 1131, 938, 1412, 1132, + 939, 1413, 1133, 940, 1414, 1134, 941, 1319, 1465, 942, 1320, 1466, + 943, 1415, 1135, 944, 1416, 1136, 945, 1417, 1137, 946, 1418, 1138, + 947, 1419, 1139, 948}], + Line3DBox[{950, 1321, 1467, 949, 1211, 1322, 1540, 1250, 1194, 1217, + 878, 1272, 1216, 1394, 1420, 1251, 1140, 951, 1557, 1290, 1291, 1141, + 952, 1421, 1142, 953, 1422, 1143, 954, 1323, 1468, 955, 1324, 1469, + 956, 1325, 1470, 957, 1423, 1144, 958, 1424, 1145, 959, 1425, 1146, + 960, 1426, 1147, 961}], + Line3DBox[{963, 1326, 1471, 962, 1327, 1472, 964, 1214, 1218, 1215, + 1555, 1273, 965, 1253, 776, 1252, 1195, 1274, 966, 1293, 1541, 1219, + 1292, 1220, 967, 1558, 1294, 1295, 968, 1427, 1148, 969, 1328, 1473, + 970, 1329, 1474, 971, 1330, 1475, 972, 1331, 1476, 973, 1428, 1149, + 974, 1429, 1150, 975, 1430, 1151, 976}], + Line3DBox[{978, 1332, 1477, 977, 1333, 1478, 979, 1334, 1479, 980, + 1395, 1542, 1222, 1221, 1275, 981, 1255, 778, 1254, 1196, 1276, 982, + 1297, 1543, 1223, 1296, 1224, 983, 1559, 1298, 1299, 984, 1335, 1480, + 985, 1336, 1481, 986, 1337, 1482, 987, 1338, 1483, 988, 1339, 1484, + 989, 1431, 1152, 990, 1432, 1153, 991}], + Line3DBox[{993, 1340, 1485, 992, 1341, 1486, 994, 1342, 1487, 995, + 1343, 1488, 996, 1396, 1544, 1225, 367, 997, 328, 1256, 368, 998, + 1560, 408, 1300, 1226, 999, 1301, 1302, 1561, 1000, 1344, 1489, 1001, + 1345, 1490, 1002, 1346, 1491, 1003, 1347, 1492, 1004, 680, 1005, 1433, + 1154, 1006}], + Line3DBox[{106, 515, 107, 516, 108, 517, 109, 518, 110, 519, 111, 520, + 112, 821, 289, 113, 332, 521, 114, 413, 522, 115, 523, 116, 524, 117, + 525, 118, 526, 119, 527, 120}], + Line3DBox[{1008, 1348, 1493, 1007, 1349, 1494, 1009, 1350, 1495, 1010, + 1351, 1496, 1011, 1352, 1497, 1012, 1397, 1545, 1227, 1278, 1277, + 1013, 854, 1258, 1257, 1280, 1279, 1014, 1304, 1305, 1303, 818, 1015, + 1306, 1498, 1401, 1016, 1353, 1499, 1017, 1354, 1500, 1018, 1355, + 1501, 1019, 1356, 1502, 1020, 693, 1021}], + Line3DBox[{1023, 694, 1022, 1434, 1155, 1024, 1435, 1156, 1025, 1436, + 1157, 1026, 1437, 1158, 1027, 1438, 1159, 1028, 820, 1160, 1259, 1197, + 1231, 1281, 700, 1230, 1228, 1260, 1553, 1161, 1029, 1307, 1308, + 1562, 1162, 1030, 1439, 1163, 1031, 1440, 1164, 1032, 1441, 1165, + 1033, 1442, 1166, 1034}], + Line3DBox[{1036, 1357, 1503, 1035, 708, 1037, 1443, 1167, 1038, 1444, + 1168, 1039, 1445, 1169, 1040, 1446, 1170, 1041, 1447, 1171, 1042, + 1229, 1358, 1546, 1261, 1198, 1235, 378, 1234, 1232, 1262, 1554, 1172, + 1043, 1309, 1310, 1173, 1044, 1448, 1174, 1045, 1449, 1175, 1046, + 1450, 1176, 1047}], + Line3DBox[{1049, 1359, 1504, 1048, 1360, 1505, 1050, 721, 1051, 1451, + 1177, 1052, 1452, 1178, 1053, 1453, 1179, 1054, 1454, 1180, 1055, + 1361, 1506, 1056, 1233, 1362, 1547, 1263, 1199, 1238, 887, 1282, 1237, + 1236, 1264, 1181, 1057, 912, 1311, 1182, 1058, 1455, 1183, 1059, + 1456, 1184, 1060}], + Line3DBox[{1062, 1363, 1507, 1061, 1364, 1508, 1063, 1365, 1509, 1064, + 733, 1065, 1457, 1185, 1066, 1458, 1186, 1067, 1459, 1187, 1068, 1366, + 1510, 1069, 1367, 1511, 1070, 299, 858, 342, 236, 304, 830, 302, + 1071, 1563, 424, 1072, 1460, 1188, 1073}], + Line3DBox[{1075, 1368, 1512, 1074, 1369, 1513, 1076, 1370, 1514, 1077, + 1371, 1515, 1078, 745, 1079, 1461, 1189, 1080, 1462, 1190, 1081, 1372, + 1516, 1082, 1373, 1517, 1083, 1374, 1518, 1084, 1239, 1241, 1240, + 1283, 1085, 1266, 783, 1265, 1200, 1284, 1086, 1313, 1548, 1242, 1312, + 1243, 1087, 1564, 1314, 1315, 1088}], + Line3DBox[{1090, 1375, 1519, 1089, 1376, 1520, 1091, 1377, 1521, 1092, + 1378, 1522, 1093, 1379, 1523, 1094, 756, 1095, 1463, 1191, 1096, 1380, + 1524, 1097, 1381, 1525, 1098, 1382, 1526, 1099, 1383, 1527, 1100, + 1398, 1549, 1244, 388, 1101, 349, 1267, 389, 1102, 1565, 429, 1316, + 1245, 1103}], + Line3DBox[{1117, 1201, 1268, 1269, 866, 1116, 1285, 1286, 1246, 1550, + 1399, 1115, 1537, 1393, 1114, 1536, 1392, 1113, 1535, 1391, 1112, + 1534, 1390, 1111, 1533, 1389, 1110, 768, 1109, 1532, 1388, 1108, 1531, + 1387, 1107, 1530, 1386, 1106, 1529, 1385, 1105, 1528, 1384, 1104, + 790, 1204, 1205}]}, + {GrayLevel[0.2], + Line3DBox[{432, 891, 616, 1556, 433, 794, 628, 1552, 458, 877, 775, + 800, 878, 879, 471, 880, 799, 1555, 844, 652, 483, 1479, 663, 494, + 1487, 673, 505, 1495, 684, 517, 696, 1435, 530, 709, 1443, 544, 721, + 557, 1509, 732, 569, 1514, 743, 580, 1521, 753, 591, 1529, 764, 603}], + Line3DBox[{434, 617, 1402, 435, 892, 893, 1411, 894, 895, 797, 801, + 798, 1420, 843, 846, 776, 845, 777, 807, 1542, 804, 805, 495, 1488, + 674, 506, 1496, 685, 518, 697, 1436, 531, 710, 1444, 545, 722, 1451, + 558, 733, 570, 1515, 744, 581, 1522, 754, 592, 1530, 765, 604}], + Line3DBox[{436, 618, 1403, 437, 629, 1412, 459, 896, 1557, 897, 898, + 899, 802, 1541, 806, 803, 847, 849, 778, 848, 779, 812, 1544, 809, + 810, 507, 1497, 686, 519, 698, 1437, 532, 711, 1445, 546, 723, 1452, + 559, 734, 1457, 571, 745, 582, 1523, 755, 593, 1531, 766, 605}], + Line3DBox[{438, 619, 1404, 439, 630, 1413, 460, 641, 1421, 472, 900, + 1558, 901, 902, 405, 1543, 811, 808, 850, 328, 851, 780, 817, 1545, + 814, 815, 520, 699, 1438, 533, 712, 1446, 547, 724, 1453, 560, 735, + 1458, 572, 746, 1461, 583, 756, 594, 1532, 767, 606}], + Line3DBox[{440, 620, 1405, 441, 631, 1414, 461, 642, 1422, 473, 653, + 1427, 484, 903, 1559, 904, 905, 906, 1560, 907, 816, 813, 852, 854, + 855, 853, 781, 821, 819, 820, 534, 713, 1447, 548, 725, 1454, 561, + 736, 1459, 573, 747, 1462, 584, 757, 1463, 595, 768, 607}], + Line3DBox[{8, 929, 23, 941, 38, 954, 53, 969, 68, 984, 83, 999, 98, + 1014, 288, 113, 333, 1259, 128, 1042, 143, 1055, 158, 1068, 173, 1081, + 188, 1096, 203, 1110, 218}], + Line3DBox[{442, 1464, 621, 443, 1465, 632, 462, 1468, 643, 474, 1473, + 654, 485, 1480, 664, 496, 908, 1561, 675, 508, 818, 687, 521, 881, + 882, 823, 883, 700, 535, 884, 885, 856, 1546, 714, 549, 1506, 726, + 562, 1510, 737, 574, 1516, 748, 585, 1524, 758, 596, 1533, 769, 608}], + Line3DBox[{444, 622, 1406, 445, 1466, 633, 463, 1469, 644, 475, 1474, + 655, 486, 1481, 665, 497, 1489, 676, 509, 1498, 909, 688, 522, 822, + 701, 1553, 536, 377, 825, 378, 550, 379, 857, 1547, 727, 563, 1511, + 738, 575, 1517, 749, 586, 1525, 759, 597, 1534, 770, 609}], + Line3DBox[{446, 623, 1407, 447, 634, 1415, 464, 1470, 645, 476, 1475, + 656, 487, 1482, 666, 498, 1490, 677, 510, 1499, 689, 523, 910, 702, + 1562, 537, 824, 715, 1554, 551, 886, 782, 827, 887, 888, 564, 889, + 826, 858, 739, 576, 1518, 750, 587, 1526, 760, 598, 1535, 771, 610}], + Line3DBox[{448, 624, 1408, 449, 635, 1416, 465, 646, 1423, 477, 1476, + 657, 488, 1483, 667, 499, 1491, 678, 511, 1500, 690, 524, 703, 1439, + 538, 418, 1310, 419, 298, 1264, 341, 236, 305, 1241, 303, 588, 1527, + 761, 599, 1536, 772, 611}], + Line3DBox[{450, 625, 1409, 451, 636, 1417, 466, 647, 1424, 478, 658, + 1428, 489, 1484, 668, 500, 1492, 679, 512, 1501, 691, 525, 704, 1440, + 539, 716, 1448, 552, 911, 912, 913, 914, 828, 830, 829, 859, 861, 783, + 860, 784, 835, 1549, 832, 833, 600, 1537, 773, 612}], + Line3DBox[{452, 626, 1410, 453, 637, 1418, 467, 648, 1425, 479, 659, + 1429, 490, 669, 1431, 501, 680, 513, 1502, 692, 526, 705, 1441, 540, + 717, 1449, 553, 728, 1455, 565, 915, 1563, 916, 917, 426, 1548, 834, + 831, 862, 349, 863, 785, 840, 1550, 837, 838, 613}], + Line3DBox[{454, 788, 1538, 789, 455, 638, 1419, 468, 649, 1426, 480, + 660, 1430, 491, 670, 1432, 502, 681, 1433, 514, 693, 527, 706, 1442, + 541, 718, 1450, 554, 729, 1456, 566, 740, 1460, 577, 918, 1564, 919, + 920, 921, 1565, 922, 839, 836, 864, 866, 867, 865, 786, 791}], + Line3DBox[{601, 762, 790, 589, 751, 1519, 578, 741, 1512, 567, 730, + 1507, 555, 719, 1504, 542, 707, 1503, 528, 694, 515, 682, 1493, 503, + 671, 1485, 492, 661, 1477, 481, 650, 1471, 469, 639, 1467, 456, 627, + 1539, 841, 872, 871, 430, 614, 870, 793, 869, 868, 787}], + Line3DBox[{602, 763, 1528, 590, 752, 1520, 579, 742, 1513, 568, 731, + 1508, 556, 720, 1505, 543, 708, 529, 1434, 695, 516, 683, 1494, 504, + 672, 1486, 493, 662, 1478, 482, 651, 1472, 470, 640, 1540, 842, 795, + 876, 457, 875, 874, 796, 774, 873, 431, 1551, 615, 792, + 890}]}, {}, {}}}, + VertexNormals->CompressedData[" +1:eJy1vXlUT9H3N565JEMkQ8kYMg8VSjdjiswhYyJTJEMDmclYQmaSkgakeVK6 +ZChDISEUkqmSSObouXvf+3rW8/2s1e/5fdb6/frnrHve9+57zuuec/Y+975e +u3b2yyc61FRRUdGtq6JSSyrbbmvdYvzsBBFlTNcbn1cllwluSUHH7V4liNN/ +t5snlYJenVqGyxLLhN0rjrb4+idB1K2qN00qBZ/ymFs3E8qEw37OzXtGJ4hZ +NbNnSaXQNPTahC1JZYJv5uICvToJYvfxF65KpbDQZ9bC9ZfLhBvNbp5++yNO +vDnZ4YxUCnenRAmrrpUJxyq3bb61N1Y8FOwdI5XCml9Zxip3ygQjr42Dp96L +FvvPm2gglUJckbUQ8rBM+BS412jxlUjRZURqDakUNCdr/MrNKxO2eW77Z5tz +QTQ4OOHN9JwLQvanndaVb8uEpqme3wZcCBFnj2jXZeCFEKH7s9ga7p/KhJ6V +049l6gaKzi80W0ulMPd9SULKtzLh1e9Fmn03HxWN1P81kErB2zI1euyfMuFk +9hgt+4Sd4nJDs+1zE3YK+Uard2T9k3BbeCWk0tU29V8V/U0yq+SyTACOwBV4 +Vof/iy0Zu+m8773/raTr2irnl01e3YXwT2rdfdT/G/x/9F//nvAfFOjP+L9o +OobxfzFB9CP8ezRzZPyHBicx/poX/DcS/r/u7mP8D+Q+ZPyb+AuGhH/R01mM +v9W4uYx/399LTQj/BUWJjP+E9rUY/9zpvhYS7uJO7eaMv66uBeN/tbD1A8L/ +wWBDxt/w9j3G/1ZbwyjC/42ROuPvtuAF438160Rtwt+9iYoG4f+19Arjv1Q3 +vhXhf7OGjP+/r6sYf4xLjFPgAxyBK/B82kLYt3bDGRGlYaNTZ3Ur/nv825ip +tiH8XxtdZfyHdgtn/NOtr3wm/NXHejH+w5f1Yfw/9vA/S/jH681k/NPrBjH+ +vrZ9DxL+3/ycGP/vv08x/sM0eo4l/P/0N2H8CyL1GX9TW/MBhP+/hSmM/7t0 +NcZfr+rWYsLfxdA+iPBvcn0u4x/wJO0X4T+svA3jvzIhivFfo3E4gvAvvdH/ ++V0Jf6fNtRIJ/wb31rRj/B/94fHfe2Ey449xhnGH8QZcgNP/Df/QP020J867 +IqLs9ON8h2PuZcLekWtpvohd109ZRdeNmeTO5x9U39WD7Gofacv36ZQQxPZ7 +FT0fTO0IylzL7br6biy3Z/t7i3uE/5DO2Yy/Wsp+xj/vWs/9hP+vz1sY//v6 +eYx/ztR/6wj/JkPtrhH+e65GMf57Hj43I/yFjeMZ/yfxVox/UKvMLoS/4ZJM +xr+onQHjv/3VVifCf8LM2Yx/4y2zGH+N2ePrSriLuY1aMP7dnEIZ//nZWisI +/zu39Xj8Z8TUZPyxbmIdxfr53+IPHIEr8Kxu/Xny++9GOu9kUvlauq6Gjzqf +P8HBYDDZHdvlrwXdx+O5C9sv6+Tdh9rRQfUwt+vX9FXcnj1N1t2ndusH3eN+ +TBixl9v/9M3dg4R/K811jH+scTbj36JWMq8/u/3l9WfcAXn9udBv3gjCX/fZ +J0vC32LnZzPCv32T0taEf+Lh54z/Ie0RjP+oEiN9wr+lyTHGX+fsKcb/4KxP +jH+fJG3G3+pXCOMPPwS/BH+EdRPrKNZPzHPMe8x3jEuMU4xP4AhcgafpR+3F +KvmxIsoGte/5LrpVJgTqRu6j83Z0zKTzhUXht/vT+XX/TG1Ndvd1Lx9K95mw +uITtD9cN6k7teHti53xq15Xhy7g9oaVTH1C7XVdZ36F+eJg5c/svu5oHUj9/ +mmdQf4V/a2O5v22DRx8i/P06rTxA+Aes/sL4P4+070f4fyzOnUr4t+n7m/F3 +b+TN+OeuiptM+EecPfKT8PfbtHwg4T/08ZXZhL/WgruMP/w6/Dz8O/wQ/BL8 +EdZNrKNYPzHPMe8x3zEuMU4xPoEjcAWe3pOS0h74hIkol/v9Gri3pEyoH3Vq +DZ03eeQgvk4trwk/r5LOr/i51vuY2IfuY7H6PdsfkLnVlNqx+XrYOGrXxr7r +uD2tDv9m/CsHmD6lfvT/M4LbP+dR+mHq5zaLhRHUb93r57m/M1Qv7iJcRt7V +9Sec+l76xPgYbFzWkfCfWVG7D+H/cdoaXn/mezTTJ/yX6RZ+XCTh//TxDB7/ +iJMQNyFegl+Hn4d/hx+CX4I/wrqJdRTrJ+Y55j3mO8YlxinGJ3AErsBzx6DK +Jxs040SU03e/GzY2o0zYuMxrC523fuaxrXTdwftF/LyGzHTjdU372Elrus9e +lzNs/8nODia8Dv59MYLatWmfH7dn9uSJedTuJ0PVb1A/HLztuf0VSxqepH4e +WB/K4z/k+w15/Rc/0LgX82J/HiWc8sV3jM8Bqw29CUfXObstCFeTQ50ZT8Sd +iEMRfyJOQtyEeAl+HX4e/h1+CH4J/gjrJtZRrJ+Y55j3mO8YlxinGJ/AEbgC +z0ZbfbWNfeJFlL9bDz7Q/kqZYNGtPq1X4lO1V/S8BNX4tvy8FsfV5nl1IfPD +ILpP/3w/efzvXGJO7RDjtQdRuwoqI7k9WgbNGf/vhcmp1A+j3S7c/vLrtuep +n16v9Ki/QvvTN7m/E3v787qQMWqCH+EkDlAdwONfieMR1yOeR9yJOBTxJ+Ik +xE2Il+DX4efh3+GH4Jfgj7BuYh3F+ol5jnmP+Y5xiXGK8QkcgSvw/Lnj3+oi +rVgR5bjb1gOXZErza+il5XSeR99pHDeVOE3h84/v79Sf7I4I+TSM7tNmkYx/ +1Pu6A6kd1gVx1B5BMBO5PVEW+x9Su/+O6/6I+tGnizW3/0DRiQDqp+GPSaHU +bwP7AO4v9kXYJ2F/hDgecT3iecSdiEMRfyJOQtyEeAl+HX4e/h1+CH4J/gjr +JtZRrJ+Y55j3mO8YlxinGJ/AEbgCT43dQdvI76JsNtOM/W/M0h8UL4mGM405 +bkpUt+DzG5oeHsDr2pxdA+k+xxwj2P6tNHMe/3/KI82oXc4pZ7g9X34u43YH +pXox/obDJ3L7sc/EvhP7TeyLsE/C/ghxPOJ6xPOIOxGHIv5EnIS4CfES/Dr8 +PPw7/BD8EvwR1k2so1g/Mc8x7zHfMS4xTjE+gSNwBZ67b51abd4nQUS575mP +w7oUKZ454e5G5xU316VSmJ/Wm8+fZbWU1jfR/a36ELpP+JyLbN9+1Bieh1Pz +Jo6ndnV7uZbbg3079vHYv2OfiX0n9pvYF2GfhP0R4njE9YjnEXciDkX8iTgJ +cRPiJfh1+Hn4d/gh+CX4I6ybWEexfmKeY95jvmNcYpxifAJH4Ao8Z8+JdDHd +niii3Oy/Ntg9tkzwL83awfjvLvGk61b9zWZ/EVPvRV+yOy/Sw4zu0zktiu3j +PQjei+B9CPbt2Mdj/459Jvad2G9iX4R9EvZHiOMR1yOeR9yJOBTxJ+IkxE2I +l+DX4efh3+GH4Jfgj7BuYh3F+ol5jnmP+Y5xiXGK8QkcgSvwTAvZltLjfLyI +srBBX5OtorSfylJZT+f1/byY9w3hBs35eeG9Et4z4f0S3oPgvQjeh2Dfjn08 +9u/YZ2Lfif0m9kXYJ2F/hDgecT3iecSdiEMRfyJOQtyEeAl+HX4e/h1+CH4J +/gjrJtZRrJ+Y55j3mO8YlxinGJ/AEbgCz6X9A7TreyaIKAved1fzuVT9e6Hq +9ssq8t+m/1l+rvb9RkDLYPNPJldElA17T5ik71EmNB9jZ9Mk7pKI0i7T0t02 +WNo3Dfcs07lyXER5XzVryqLfUjt11oxKKzkvonS/30bz+Hspzln90WyfR6KI +8kdVtzOXpHktWix61bQ8TkT5eEtXJ18a5663TtSwSBRRlt4aU/I3TnoucZ3b +TTsdKaJ88mCxzZx8ad8x60CO9/dEEWXw2uMjk6Ok+K3Ysd7ATgkiSvdFhsFp +0npuUZl3ve+FBHFS4OE3UikccylSD5aeF47xO+rX30/NlcazuMPNnMe1YQc3 +Hs/zdH+K/667ixENxwbWuOEuRGZEjI2Rxj/Ow3U4f+NMaz5P6/b4+lXSdRte +X+Tzz651uE/3M+6/SqT7G742bED3xTF+Rz2uhz3YQTvQLrSnuueub1BkR3Yq +vMbwdXMfh/P5OMbvqA+Y0vJc/+R4EWVpQq53Z2l9MH3U87P7zgRhv5H5B6kU +pzqpXlgrjdtDlV3L6HiTg5hHv3892IPrxWX9MpZlLBL1XPa1X56xSGjTZVnW +R8m+XlMfPo7/tKC5s/S76hxHrodd3Af2cR6uw/mwi/vAPtqBdqE9pxv78nvw +B0v/LaF52dynhNdDHON31D9W9/xIz+P6gU8p/+f4wTF+R/3EnOEcZ9ROmuJI +9obl2/F8xzF+R/3aCSGVdP04Lz9vsvdwx0h+7jjG76j//7v9bUdY8nuKSLOB +/N1g8Kd23E4c43fU+55q/Iiur+WzKJzszbs7i9uJY/yO+phmZykeFr1P65Md +odOHr/L7EOUYv6P+rcmPZ3R92mP9KLLnXGsI28Exfkd9lOHybXS9a4XdUrJ3 +u4EBtxPH+B3181YNfkjXv1xX14/sPe14kO3gGL+jfn/rDH6PMP71Lt5XTd3U +nu3gGL+jXqiySKXro7ul8vxWaebIdnCM31G/7/uk7XS9l915tqdmU8k44Bi/ +o75eee/HPD5+bLpK9ga6tGE7OMbvqE/bMtKVrm90aC29DxfOa/yW9+PKMX5H +vdWXdLIjXry67A7Ze3RlMNvBMX5H/cgWfXif+e7PbfJ3QmuXZowDjvE76vdX +7L5J1+9qEcf2tsT1ZDs4xu+onz1zCvvRGV13sj3xhvw+E8f4HfXBJ/7weuqw +8VkC2ducZcV2cIzfUe/ooc/Xd66y30T2XC7L3wtwjN9RX+f3kjy6/njSVZ5P +IfVbsR0c43fUx65vzN8hispdOC5el/yDccYxfkf9oKW1+fklqWTGkT3jD/I4 +xzF+R33ei7m8XqSKTcL/z/mOY/yO+urih/923ajOjl75be5/0zFNLtN1Cf+0 +uZ04xu+or85/TQwpfk/n7Uv5yfdf1uwH3xfH+B311bXn4ZSJ8XRewOuyD3Td +m4J6fF8c43fUH3px4P29ghgRZbeuv3Scs8qEwQkhb+m8w2+Tw+g6f8GYz8cx +fke9Rp24PSt9EkSU6+P3D50g+aPFmi1pnIsj1vRIouumOE7j83GM31G/1PxM +WeSrCyLKKW7r/7yV4mHLmvWSeZ7YHuZxndHOm8/HMX5H/XF/p4gJDmEiSrFX +imZ2ibQf99Pm9U4j7sQNuq5sdWu5/coxfkd9raqJvkd3xIsoTf4VPLW+UiY0 +nnEym9fNS5W36Lp32Y34fBzjd9TXPqB+a+WleBHloTrT3nST4o2cf1lJjLPV +D5qnwp46I2SclWP8jnrNGtPXLoqIF1E+2NqxsaNkp1v/bvl0Xp0H0el03eqO +8jjBMX5H/Wx7vZX2m+NFlD0jF2qvkPq16Yb2PTqv2baJGXRdrdF6fF8c43fU +Xxx97FcHX2n9VMoPP+zHm1yq3i9XF+f7+9+hOFXoEbGKr1Prk83n4xi/o766 +8e87o4Ljit5NprBfPvniErfzv23Pf2unuvZUt564mGfE0rHemcW8TnjZ720g +x+0+V2n/gLJCJYf3ERNPBj6l88Z/r7pC1129qMXnTyh2o3Er3nq98RL9Hj/S +get3uydlFnaLFlE+qfPn7qnH0jixHcN+OXW47TW6TrSQ45YLC3N4HvpqrM6i +35OSm8vrRq8JmjeTg0WUcV8WLX1UVia0W7iS/e/uOTvpfHHlOjme112YRuNN +PBH0m+8zX2ss1xf6bXi0dmSCiLLSoaSxirR/SX/05zWvm0evMB6PbGQ//qBq +Gfdz1XTL27yO9pXHv/6Cf9oBdxJElNMdj5UWkX/fMovHh2uXUTzvXh5qx+f/ +tprM8Yf3hp7UX+HOeTuuT7da96rR/DgRZef2k8cdv1km6Oh2p/OFI7pz+bk3 +fmjA5+dvKb9Lx4vnved1a3ryeK5PPPF555/EBBGl6J0ebCvVDx56kJ976Wft +NLpuRcfFfP7bMa3YH/da4cb+LXPvZK736fy6YNvKBBHllrduUZXSPDK7//4u +rydOixjnBaFN+fwXO1uyXYutJbxueZhZc/2R7KvjutS+KKJ886DmzTuFkp9t ++o2f17jnTuxP38zV4fPL99zU+Pg7QVRKIayFT43MhOrj/Op4Gv9f2ZkREahF +dlqnxLKdNbvc2E51vBG3tbodyI6V0QC2M6ziGttpdMGsB9mZNCL9b4lkZ+ZY +u/9HOzPrD2hOdpautGE7IX7FbCc0fk8rsuN+IozbE/xgEdvxGD2evvuIDedN +4X3D5rOj2M7KPhf4+5DTSg/+Xlc+J47txHRe0YLsbOxl1YTsGBjNZzs/67ZY +QXbqDHjqQnZUbsjvb9fp2HUnO6U/93clO8ODa98mO5naV1uTnTXf61VRv7Ys +3s92ZkX4LyM795vbrSM7H/eZsR2LIHNjstPnZ8uxZKfBEPm7rXZpOeN81KNJ +JdlJKD3Pdor+HuDnFWo6i+O1LykmbMdg+AJ+7za++yTGp7HTUbZz52o36o/Y +0u5yI+rX3MINbOdc3bbuZCev+1iOKzfoNmU72rGh3K/k0g/8PnuGXizbKcic +yuNnbH996p/w8NtCthM8rjnhIrYfNJDsCYuP9mc7KjnNTMjOjReFA/h55YSx +nV0z7NlO7cwUTbLTc+RmtjM5NN2D7Gg+SKLvdEJ6tgrbGRWsR+91xT0v04zI +Ts0+8WxHfeQ/ul40mfe3IdnRP+vBdmLa9WF8OoTV4++uf7M6yfuvnqd6kZ2/ +uV2pXcLl0zfYzh+LvWznb0AO29FatZ7trNPS2Ex2CmOuULsE3/I6Mg/nn/Ok +kVYhYqVdZMnLbQmiqv6x3Mc50ro06n0tq5tS3NJo+n3LmwnCwoGW39Wk+TvK +4/Py3EzJfu+psVIp5Kof9M+j9885rjk9pPY0uTk/TyqFG7GnVt2R7ju33Zno +sBkJ4hFtl5tSKcRtmea1VfJ3gubctk2eSPu6sNJJUinY51sOPCvZaV/a41+v +0/HinT6TSqRSsOjlWHFVijc2l62dOHqFNP6T3zhLpRDb++CnWpIdl9uTbwb7 +xYnLl2TlSKWgOnz/FvsbZcLtOZ3aPr4aLwboGNSRSmFcWm/vGpKdZ7ZnWr6e +Eiu6TK0zTCqFSwf6PNW7K8X/YzSLbt6OE+0vb6+QSsHFx7bA8XqZMN8g++PY +mlFiso5RilQKug8/h119XiY4hUWVjq4XI9Y0P1cslcJJs2bt/LLLhBZ+PRoc +qQoX397TOyWVQorr11k50nq4wdbRt+/wKDE+3tFBKoVNSae1g59J8edwwWXZ +iTCxpnbDEqkUemzP9/OQ4sb9pkkZPQ9dFE27D6+SSmGiVs9uia/LhM9vDiV3 +exskuowXD0mlsE+YaDStXNqP+NZc7GJ+Tjyz5MFrqRT+zstbu7y4TDi5RU2t +4pG/+FBFf/HXR/7CgDVj/jb9WSZcdk7K+XH4rFjs/TRbKoV6BaOvOH6R9lMR +qt++ux0Sp2xp/lIqhZxtYf8cKsuErkdOLToRfFos+lP/1/Hg08L8nZk5k3+U +CV1KVbT6BXqKVzfEVfYN9BQWDGn+R6uqTCgO9mpxrPKweCL/ZHOpFDzeR1W8 ++CPhMNnzSXah5D+WLHojlaL1Fa2V06TnXmFU8OxZyQmhV+COOR5XIsWpGU2u +zpNweFZz4DazpATRzPfQdKkUvsbubT6N4qjexy9bSuPZc8nEIqkUGi3zvEzj +WefQVv+P26VxPnHzNakU4hMyn22V/NqbDmPcPArjRdPB8dZSKQzxjVY1T5Xi +q5josC/JsWJ+U/G6VAo7SjxOat0uE5rfzKwnCDHii7DgCjMhRhi6p+iTzwNp +v+btqtlse5TY//GH1023RwnmHpuGbn8q9ddi8uirBhGi/jidvlIpvLyWv+5w +QZkQHtC6hvvbc+KAQF1jqRT8iheGzywqE/5lH9uSOipYXLN2pLNUCi0+nvFx ++yytY+sPexjbB4hG99yvGNkHCF8a5mt6f5f2LxG7Cy+VS/uZ2PxUqRQXeqZ5 +/pPmV1raI8MR7xOErXtFQSpFy4VdLwyTcPh2xnlbI6MzgsaB0uz2mpfEA57l +OifvSXH+lBMTtxQliDcTVztJpVBx37i7kXT+ofgRZ7xPSutbvaGXpVJwDysZ +X0vCbZ2n5j6flvFilOuyU1IpPNDOdkxMk55jjdaOLYpixc4H1gRJpTD2eA2V +rrfKhJ7Nnvbu7RYjdrm6wEwqhavtUsI23pfGeUX7AV/To0TjibNaSaUw5Xuf +bva5ZcLfd/utx16JEBs2q91HKoX71qMnLX8ltbP26iOrd58Xm6pbZUil4GXQ +1WjYhzKhama3+ht/B4teC//oSKUQP7/9WQ8pPmxltIvbPfic+lbqx6frVhOo +/aOn+HI/B3f+Mpz6bRRmx/3da9biYEJxgpAdZblBKsV9zjsKe0r19X3scgjf +Js2nM9667bYwzq57htxKa5UgBqeXXJVKwUXtZkCVFE/aerpkDzCJF9dnZj6V +SkHthcHayqsSPifGq5g1jxO7vTLWl0phXJ9B9oMypH1iQK9jehEx4uNpdnFS +KSzvNWTCUum51DMpUb+vFi32/fSntlQKf/tEPRj4RKo3tkovNogUJ83ddU0q +BbUtPSKGviwTjr0/fnJJrwti2tIpjRx7XRB8Zuk07/C+THg0JIPH91Czw040 +3u9vuMPj/Naw7Twf9hb39aP58Wl7Ds+LQmE0z58TBulXaD69L/fgeVRYw/9r +10/S/MnL/SCVopnZeO1WUn28fUDNhckJYv+j6wZIpeC206vbaGk+rgx3WubQ +O0EcVf7SVSqFVpp5DpslfNwb951aMDNe7K9Sa7JUCrazS5cIEj5TfRbZ2A+L +E3VihElSKaiPN79mmV4mzBs5XkfjfYzoGtu/i1QKl8xGv7PJkuKE9mOmnxsd +LVaolm2VSuGAWYKRhrS/yHcauvW8S6S458/xBKkUio1t9jV+IcUPE+V13PHz +WF7XjYqn8Xo+M701+4PUfO3O5B+uV+mwX+juGMJ+pcnJI07kZwZnD2H/ErD6 +HPsnl9MrzMhfNRj5eQD5qT5HC6xPfpH87p+VVIpVvXqOqiPVvxw4a3GU5Af9 +tzVxkErh4ZTcqRnS+AnLHvrU/3qCOH/9oQ9SKYxVHfa5qYTbrcD8tHrS/uTo +u4NZUimsffk1pqaE24SRx+vs2hAvjnu0W0sqhYn7RpptlvbLxgvMDD2d48RW +NS+MkUohbvOoDlOlfURsWrfjP9vEis03OIRLpZAyrWKRaWaZkOdUrrnFO1p0 +v3O/uVQKd/yPzMiT/HtgE1X2f4vP/9Ymf2h725D9YINVGexHDVdsuEV+NTdx +J/vTXoUL2B+3ORNWQf75m/Z29suFSUvYr3fq3C6B/Hz7haPZvw8ysbxA8cHy +Z0WbKV44OcKV44TMpkf9G35LEIbsWr9JKsV3FRddP9N31Vv1Rtg8TBCfHJ4y +RCqFXdYdzidL59c6auK/XMIzYn1+kFQKgQMj396Szv/x7KEX2c357RpA95n0 +z4Xt2zRfkUbt+D6yWwq16/HwUdyeZ5sG/aJ2b3668CP1Y6exK7d/cN2O6dTP +Kb6t71K/R6cEc3/b6A7qTLi8Pbq4F+Hk+cuc8Znleawp4di6U1IHwvVQTXfG +M+jdz0uEe1CL4cH0HD7ZxTD+7sIzfk4X/l3k51bn0Uh+Xl96vK5Fz/WAdcOa +9Jwvhmzh53td7UY6jYNZun+SaVwc09CJpfEQctT0J42b3/VmZNI4ssg05vGT +Hl1QuOmnNJ4W27+SSnG+wfWA5xI+DTsNN1bTDBZVXSy7OH2IF4PrNNu/XlpP +1N4+eybFc2LxRo2nFNd96nOO47oPOfoUt4mxTbyfUfy2rZ43x29jBgULNO5P +5DuZ0Dzw3mjIcZpalvMimid9ennY0rxp7nGU58u2Hf9a0by6N2npv0fSPHPP +m8jzK+DYwG80D3f3vlxA83LBNUeej5edbdxo3g4d7nqC5vF6lVCev+LU32No +ns/wn+VK876Nxjee72OyIwxpXXh3vIc2rRPGM4x4ffgT1mgZrSMZqjuG0rpS +kNaD15PN/jE2tO4ManR7LK1DlyxVHGn9qd8jdAWtU092L6BS1E56yetVo6q9 +nWlde92mqyatcxMS9vH6VrRrcB7FLV7iZYpfxDFRPThuGZjVsIFL5jrh6+qF +k69/ixPDcxMeHpP8vr/NvCUUt4wqLLWjuGVejVsct7T3Ur1H6+ymJxbPaN3V +MtnA6+32F64XaF1ulnc6gtbpesNe8/oc4zp0Fq3jn/U2z6F13XzGbV7Pre6/ +G0nrvtf+0wnkB/oufKhF639Rk7l3yE8MuRHzivyGjmrxRfIXZR8MvtyT/IrL +sVWa5GdajbnH/qWB44Gz5IcKBpUeIr9kMMeZ/ZHl5f6dyG/5mc+sQ36s9fpe +7L+ybALzyc8N1fqYR36vS25N9nfeZ1c9JL+ok5F2h/ykTvQe9o9fHL6QPxV6 +2698RH510JJz7E99N6v2pbjFvN6x3hS3tNlpz3HLkCVWQwz0w4Ql2w2dB6ol +iOtCc1bQfqTrgQ0zyH+H/bxPpdBooA378XqzA8+Sv39hlxFE/t97fQ/2+07q +mroUH3QJD3q1QYoXNhuac5zQZL0NxxMrzp/cTvFFnXPGHFdculiH44+ltndH +Uzzyp5E1xyFGX3oYULwSoLrIhOKX1VPqcdyS4ZIlUHwTlqJKcY6Y73iU45yX +X65soXioX/+UDRQf1YrQ57io4XzTMIqftK4cO0zxlPaTAI6j3NpEn6J227l3 +CKF+FLYz4fZPDne1p35a7u8/jfod3mI09zcrcdkBilt+Tf/tRXFLUBc7jluG +Nlp5h/A9tevUc8L7+epYxvnNIZufFEf6LWuyjuLK2UtSOZ58GjloE8Wdc1qr +bKU4tNvWoxx/Vtm15jj14q9GtSluVV3uwPHqMTtjjmvLTszoQ3FuR40fHN+a +tWpZQXHw8ZiE71Ip6iYc4Xj4zv70JlL8LIx9rflFip/FkkbPOH4e1TYwmuLs +YQ2t/Snubm99k+Pt29ZFVjS+36vXmU/j/Zd5uRy3FNc+R/Nhy5CjF2l+rDr4 +kedFwKaMhzR/yj9mPaD5ZOG8i+fR4uOLiiluqbitQ6X4aOAijluq3sr7kIba +RrwvqfdD3o/4h3e5RfsZt1YLFtL+Zq7Oe97XjK16eon2ReZa9t9on7S77kh5 +f9S/Ko32Vy0uFq2k/dZ4x0+8z+pq/Eyrl7RPy8v7e4L2bVUTh/F+zXTdhLO0 +37vc09qN9n8ZnSbxvm/txq60fxQmfrcvoH3kzrhuvH989KUPr49f/e1/0Hqp +Mnkhr5O5780bUdyS2/pEM1pf3Uv687p68/f1+bT+Hkzq6EDr8cH8TbwOr/h+ +15zW66DGNwbS+u2jZszrdq1uj0dT3NI4In0oxS2hvpM5bvHykfdvpz5db0T7 +uTpr5X3c1F/NeB94MbpmjR/SvvDUlhDeDz4b1Y/3k7Y/p+RJpXjq8FTeV2ae +SeN96YfuXSNpnzot3pb3p+GXPyXS/ra4h9Fh2u9+sizhfe6FQZ69aJ+sXty2 +N+2bnSIHzqb98qJ2p8Jpv631Pj2P9t8PzPqeo333uQ9G/cgfe+xo2YL8c/jX +WeyXs0rLs8l/f55Wye8DNHYfZD/+4eNR8vvCm3ObOG4J05rNfr9Lw+BbFB+U +zvG9TPGC9YeeHCc4VEwM5HgicdV+ii+O7HTguGJAN/UTFLfMDvp9gOIWr9xt +HLdU9z5fvBV+gN+3jP3nxN9treTvj5+V95CXlPeQ+/4vur9pzaIKiS/1ZW8I +88eb1ZjKvCn1+bVZ33L6+gLmO4ctiWGe1c6Jo5iPNVd9L/NzZx66J+sCTloY +EX9L03Em83mPvJ7NPK658w0HEd9rifkl5j9evViHeV9Pb/foTvywkQu6M184 +7c4c5omV3B9fSHzKY0O6Mb+sz8Q05pUV3RoTSPwzv6pGzEer/+Qd8zCfRnxr +SHy1dC+ZvxlSLvM2S4V/zoTLWP3kvYTTqc5/GZ/vYif+3l/jiDm9XxRMFlry +e6pbayxbEj5T4u8wPiMGJjM+3f9kFhE+vTKPMz4Dl8i84rnWyacIH3/DxYzP +5PJ4xudNrdP7CZ/HhSsZn3OHzzI+CSvKiecmGr0Yxvh4TDNkfI5prRhI+Gxv +kcz43LOsx/j8vXBxGuGzUd/0OuFz1Hky42O0cforwmd9QXfGp8fW64zPtxmZ +kYRP8HEtdcLHMPw943N7r7Eq4fNzVxXj03qwzKvsfLSzFY2Prbnu+qwTUsbJ +39UGxHsWjp6vy/qjvl/6MD6FXf52InwOnoxgfDocP8T4VJnv/0j49FU7xPjo +ug1mfPQepPgSPtnNN8i6ufaPGJ/h0+5sIXzqP50nEj7vGoUzPr3Djg8nfBZs +HcX4nOg/mPH5krS9N+HTuui6rJuraMn4BMf4OBI+qtftmO85oZsd42M68F0l +4RM6UJfxaesQwfg0r3szhPDZpd+3kPikSQtlHml1+jjMH8wn4PPBuRmPG90X +d70In45XGjI+6Y0nMr+wov8GtjfKZRLbsfKyYT3GrgpZn9ElVtZlHJ/5Vsbn +1nrGxyMmh/F5MTR2A+Gzft2GJMKn7pubjM/JrXpDCZ+LF/QGET4+/rqMTzPt +Xx0In/eXshkfdbP+jI/RGeeZhE+tZssYn4e3l8k8fN35zNesVUfmz/rMkXmz +v4wDuH3qGZfesX5k2FhZ/7v4Bvfnr017Heqf2+1o7lfOh46MT3OLgG6Ez7Jl +5xgfW7MhPei8ZZbn5tF1O+o58fmB39syL/NMVWkG6wuuuLF9tbaGrONaEHGH ++JzCtQCRcfCbvHU367vta5xhfffW14zDqZpnWCfgeFp/HOHws3MF86WTGj9i +Xm+NhgeaEw5tkuVx8vWvXxfCYUPPFycIB5NZQYzDkJlLGHdTg7Y8j21OJvJ9 +tTvsl3WUO5Z/ovaWNB/A7dQxPMQ41N/1kXVMK81Xcr9iXjZkHFYm2hry9wRL +b8ahcadN/N1kaK8Ieo8upF/5xPUmBXsG0PXT1xZMJnuN3NzZTtnhy4xP8cWa +OXT/5Tk2fN9G+tuY5y1c12beq49eJLfzx+7P+wgf3W19jxA+iU6fGZ/l88/2 +InxGlXYgPYuQ/aclj5Pvlfk6hE+DrskWhM+jbpHMf+6+SNZZdJiSxzqLCFNZ +Z5GTN4fx+WAUQqUY7BTG9838liDrwzUePaf2bjy1jNtZuGQn4+OzI9aY+pff +di73671ay5HUf5f1Hr0Jj/OfAxiH2rYz6DuKWL5ei74bCJ6Vsv8arpLH3x2C +Rj1nfYz1DC9ZlxEYwvqNvHp7LOk+5hr72b6pi/4Txu1yB9KdCWOGT+b2uFmn +HaV230p+GUb9aHIkjts/ML5yD/Vz6faDzC/2S/7I/T16tKwT4XYl4BHx8AW3 +tssZN/gz+Df4tfiuboxbv4saPmRvVt8LbGez/WrG7UxJLt8/q1U63zf27X3G +bWdlAevjwlX2cTu9qnrbUX8i0uJ6sS5ZcwX3yynvDPOThbq/9QiPRkvl73dT +Zqwof14cL6JsMi9klZYUx5Y27sV49ou7wbyzXZ7yurT2lTXrK0IO/hxO9p7e +OsZ2dqqmsx6yyPaPQPePHBnC99163YT1A8M2hqdRe/tdWMztXD2kwJ/6M37K +TRqPQt12Mu/9rbfI43B6+tZjhMfvT8WMw4eDSbweWfV6wP5/16LaPB+NFf8X +r/hD+MHtQQ6X6fp1uVGeZK9pwjm2s3vzRsZzes7fA6z37PVE9rMPZrPepPm2 +LF5fr9bcyu1s8G78HOrPELWTval/vVVkPMPmGtL8FFwb9uN56VzxQtZ7vsxm +vFqd0mGe2C0/bVk/tfLMajpeUrmC+IfCn06yDrFu97OMW1zdpjQeBQebeLa/ +/ksF6Y/EX/+mXqd2xa9w5PbsUGt/jtptP68u6cWE+T+vcvt1d+hy3NNr0woz +Wp9spo7jdcl2pxwHeGxW57hgSxtVxs1B8Yvwk/CPWc7uyYSba/hM9hulYWmM +W/gZd9JHCXtNco/R/T83lsfhk463sqh9149s4vUmLNyB2+nr6DyW+nPh+lT2 +Y8LsTdyvlhbCYP5eW38V6aVEYd8pxu3mvMUbWO9hr8LfD8eYdWF83Gc/Ir2P +mHS2P+Ek3J2VyHae5Y9hXcTDWQOYpx99R9ZHXE/ty36ogV7YI9YxLb3L/uhP +j3GxhE/DKaZzGZ9WMxifuWrpjE+biUd7Ej5dVdowPvCLJxQ/Cf/4oE+nEMLH +xPzBDsKnZ/oL2Z/WdA4ifBaOtedxbWEdzfgYt4p/TO177T2C27vW25Lbuct/ +Hz/vMaFXab6INj4XuV8ve4ezjmPv9FlGrHfxlHVMv5vq83fQueGB/N04rZXM +v13fL42v79z7LelBhIzTp9jO424NOK41yht4keKUg81fcfzW2bMj4xPW6lgZ +4dPBNInxuZI5h/26SvfUpYTPg1Zy/Oy2KYfxeaM1qz3hc/WkMeMDfwn/Cb9p +0ciP9F1ChNl81rnUuSn7kZFOPuGEj2ao8xHCx6l+BOPz8J6nSPjMidDldcLP +YBXjc25KQ9YZPbz3kp//h3A5fraevpzHT4fKEsZnzLlQWYd4X45HR662qUvx +6cJjclzazd6ghOIz6+y/rPeJHPSbcbgS1IpxCBp9ogbFL8FF5xmHuDsejMN7 +h1lWhMPhphsYh7OWpW0Jh62Nb3FcUNBAXn8sFb/orPhJ+MfpXW1PEQ6j5zzi +uOPDpVJZb17RmOI0IdrWmfyI+HW3vO5V9t/H/mb0pmgaz2KMubxvmnG3nMd9 +QOM9vE7oacjjxCHQinEwHlaD44Sgt7Lex8hf1uP0thpQn/Q4d0VZD7XmTSXj +83vs0FaEz+uMFMbnV2jnWjROvD947iR83qvIcaznG1mPc3+WP8d3yf3kuG6U +1qLdrIfqsLQH4bMmM4LxMXtxhdZlYXVxzzaEz++oDI4H4P/gD+EHRxvdPEn4 +DLXP2Er4nFGrzXqcPV+28zqzxE6d5pMYGnWO8el0aBHP8zVGJtmET6zteMYn +7P1mC463PUea8X7U2kfWgz/QMmc91JfvzMs4ESTr0XoqfDlfhS9XX+HLlb3S +22ieFCJuMFg+TiqFzv0qz83/VD0f9bRyHPIf9dHTH2u+HhMpotx63mtk4gvp +vlbqQ5+6RYtllsNqzHBNFee/1Js0JlLab+4/YKuX5ip+/pmYErokSYyttSzD +4Ym0j4s1PhowLFIY3je+dle/GLEiUNNjolS/ZZVxw/Xv4sWBHVLrDEh1FG6/ +7D5U52WZULPzlNeHQ2NElBfiQoK87pUJM1PzVz5tfFwcHt2k4JFHtNhWv8jg +23spft7eo6OJ21yxpu0F3TY7E8X7r262HfVMijcaq3tcnBAqXF+QfOHFdWld +WnMsYpL0vCwf7rah7x19ezzpR987Jgmt+HtHs4ld69I4+3ZDHndfv8jjLbGd +biF9l4/Y3ILfx4zYfoHfw5xXjmOV31FfPqO2KdkNa9Z3KN3HPsuE7U9sfL6E +3osN8jzK3/fssiz4/Vit8ne6sYNixYGhTs6uUReFOha5J45L+BQ80+lJ72db +DWhB72mFhPzl/J72oMJX7KPwFf0UvmJ0z3fDHp1KEFV8pmbf8h4mnHLec1kj +v3qdxRml/qpSr63UZzy7k0LfJ/RULX7S9wqdmGD+ThFza3qzP3FHxPPBkW9+ +xx0RTIe+sDzxp3r7Km92elN9TkJr5oNFrNHkdV5twPOk2RIur/ec/jLIMFRI +W3+/hpn0XKIUXUY7RZdhpugyqqvvLjycQPjqGOnqE94jQ8bK362q0Wu4jR85 +OGN1vHht3ZPce33dBb0PGX0tXkl+MPgp6wVMx/5h/lHeg19yvD03dDThfnBH +Nr0vF98easj4H13c9j3hUlj58xXhNO3cMsbnrsrlSfS9wVh35mr6/rAhMJu/ +O6z91z8tt3uEOF/vdurEf16i95d6w3+XlQkbG2i7sm4hzId5aq1myTqFyQWp +RTQ+Ohf9LKDxEn97C4+T553Cl5Pd0TNVhtB98iJbaJP98uEpWdSOdoMty6ld +tV5v4fZ8U3XaS+/LLmkM2U/vz0IMIvm92eQeWawvCFcP4/c9berIOj6ch+tw +vtXSGIHw7dannQnhfeLHCMY5v2ottVMcPynpG7XXqVIez9+rwj8utYoTn+V3 +X2h05IJgOe1P/TuPy4SQLluILyGuNW0/nHDt0U2X8RzZs3CXTa9E8avvIkdT +temiV3bOfdvnZYJhgvUL6tflEa0/UL/8L63kfr1U37fq2op48eKWZRo9O50V +J7V7McL5qeSnavoQH040/tuWeWjDx9Tlfp3/kJT6MV2KM3b2fxExOlTo0j+5 +/ThpvIXfP8Lzc1zhap6v56wGcr/aaS4f0XNconhLb9DLOQ8ni5N7r7n/S1pP +Wno24bjOvlYy88ui/8n7iNfjW5pRf0bXu25M/euxtwv3a+PbVqXUbpUdb7gf +a3/Pldt/zmMGPT/XdRNW0fNccCiVx8mW5MCKu/UTxFd3Cot7tA8WC7MbdG0k +rQPFqZF833NxZTvpvu4z3/I4qd2xYSnh3uyQ12d6Dtvuj2H8t4YasN3vq6dP +oftEzM1i+3kHe3I7OlWalFG7nifN4vbUUY8cQ+e9Gt3kIF2nUbCTzzc+vDqH +zo9+ZfSZzjcsd+Pz2ys6h9r/oYNoM+x5L8Ixp/OaGYTrR4dmjGd1/qWjYqdi +9P+00yvdWvXL+QTx9GOb1bvfSfGvR2eDMul5deowLiB7W7T4fe2SE6qLU8Wo +lM4D5kp+59TiTWvJ3z2778r+LuVkFfu7WR06l9hNjxcfVYUa+Pi4CkbCP5PD +0nxvWNbl+BwHd7Hq0CXNfuOTxPdd/wyOk3AOnxpyb61mhGh019kvcoG32GKw +XZXGZ2mfctvv5TidSCGwax2bBy4xYt/8rn9r5kr75bpqVtd6RIsoR28cLByW +xnnLl/UHn3nZXZjaUKd2QkKCWHYopN11KX548MFsGvOovP7OIpxdGqvy/LWZ +PIvGtzBXqPGWcL6bLz+Xdh69+Hu8y88z5oTntK+9Gc+UotWWG08niHMTM4Kr +KkMEh+xjo1RyyoTlTjUW/xh+XFx/2HzraadoUdfyrbraB6lfev0jLEcmiLZd +Hj48f2mO4FVmk9FQ8uPLVjQanto/UdTY0mzoVLsZYoapZitLad41sX1ZlHB5 +vvis+Ma/C8sSxfw6b1Yekcb/K+MaDbz/xouD/BcV9DYNFlcs1rXtIOHm7Tpp +/L+aocLl1b1mrfCTnlu9gzm1pfacD9C/2EMvQURZFN727dsUKQ7plJk/2qCr +4N5sTvohCYeYTQ19UyV83v56x7zHYbP+J++xOh6+55cqE/J3BX9PxzyS/N2E +RYHs73SONgx/Ih1n5ci/D7eR6y9GfEqk62unL6kgexMe5rMdxFGn/yOOknn9 +J1P+Z/kZ9ab/WV+dX66u/UZ3Gj/PXxIiokybrzEvVxq3rk0CuD/oH/rVw23F +Wdat7C19RfZaG0xk+63j1vC4GT9a5zXhZt5/OePme+EX88gHZF2+wnzwEUay +DvdK4t1rB6T10HGeyfZdlkJTo3UD+0j21c91iFr1eq7wtm/HhH+GCeKMgEKz +wdI4CdK2zGQ9SGYh6W/Ee8k2bEeoiCOdiJjZ0oFxm9XYjOu/jV+6v+n5OBFl +g5IDti1vlAnjL+lvmTZppZBY+WxX2Kl4MbSLl+MrKd7LPv6Zr2+m9p3uI1pe +7852Er4Y+hL/ZFNiaTTxT9pqnGP+Cfhk4JeBV1bd953q6qvjn1dXr9VnVUey +E9zLkO08/iqynQVnM5hP81f0PU3+81TL8+w3t963t7CsSBAbTLjSWSqFpmGN +9L5J9bqPbywNLpX8x6+OllIp9Exf1EdXav+v3a/akf1rtU3Y/sJz6XLegzG9 +82l9d7BL4rhxse4qXufttOvNJjsdFje2ITsZ1ivYjm2uFfOcH186ye8Xj6V4 +sh3r3h4jyD/F3qjN/mrK6qrz5KeG7uq5sZZUb7vvkrNUCh2cjg8YIdWP1XzD +780sej5k3b/hQDU5f9G/dTTORMfWabdovLl3vcrjbdPP33eJH2N6r+934st8 +URWYJ5N49/4g+g56beX9cfRd1DGtLn8PLR3/cDI9x8V5MYvoOfquGcrP0aGW +Lbf/zb5g5ldvTQrm9k9yKjhMOI+MbnCIcP5psIdxjrp/sh/hHBHgbEw4l1a1 +Zpx7DpxKuIjjtq+fQfj0auvO+HT78ozzejjp6TOffGxWNNs/umEuf7dWt63D +8deR446Mc/uYv2xnz8Z7k8jOzCnebGfetZ/83tbW3lcgO196yfx289tjmQ/6 +3CDdnHDOT1XjeCCsuIEb4dzuR8xqwvntt2DGeW8NJ9bxLtR7zHFLLfeP7N97 +/HlWQjg7NWvJfKGDLWT/i30L9jHYv4DXC54v+L3grYLHCv4q+Jrgb4K3Cf4i ++IzgMYLPB34feH3gsYHXBj4beFrgbYGvBb4R+EfgHYFPA34NeDXgkYBXAj4J +eBXgWYBfAZ4BeAfgG0x1sA+lcZO/JGI7jaOnFzfL81Th74LPCx5vdesMeJzg +dYLPCV4jeI7gN4LPB34feH3gq4G/Bt4aeFfgYYF/BV4ReEbgF4FPA34NeDXg +l4BvAp4J+BbgX4B3AZ4BeAfgG+RP6mNJvIWxU6zMiLfwWHcJ8xagQ4AuAXoE +8HrB8wW/FzxX8F7BdwXvEzxQ8D/BdwT/EbxH8PnA7wOvD7w08NTATwPvCjws +8K/ANwL/CLwj8G/AxwEPB3wU8FPASwEPA7wM8DGgr4DeAjoL6DGgz4AuI2bt +uTJad4QrMfyeoPu+Sbz+IM5u/x/64uryFYA3DB4x+MPg0YJXCz4t+KPgk4JH +Cn4k+JLgSYLnB94f+H7gsYHXBj4b+Fvgc4HHBT4T+E3gNYHfA74PeD7gtYDn +An4LdCnQqUCfAh0LdC3Qs0C3AB0D9AvFZU15vC5Z02cTjd95qZt53GIfgn0J +9iPY52Pfj/0+eMngKYOfDD4u+Lng5YJvCv4peKfgTYJHCf4keIHgCYIfCD4c ++HHgxYEfBr4YeGLgS4E/Bd4UeELgDYEvBD0P9D3Q9UD/Az0QdEDQgUAXAj0I +9A/QQ0AHUeB21YTW30YDHpnSetx1Wlteh7F/w34O+zi878D7D7z3AL8ZfGfw +nMHfBZ8XPF7wUMFLBR8VPEvwLsG3BL8QfEPwDMG3A/8OvDvwz8BHAw8NvCvw +sMC/gg4KuijooaCbgo4K+inoaqCzgb4GehLoS6Argb4CegvoLKKCtF9R3LD2 +Z3ER64Mml6yg+AH7YeyPsS/G+yC8H8J7IfChwY8GLxq8XvB8we8Fb/V/81gV +/ir4muBvgrcJ/iL4jOAxgs8Hfh94feCxgdcGPhv0Y9CTQUcGvRn0Z9CdQacE +3RL0StDnQK8DnQ70KtCvQLcC/Qb0HNBxPHpow3gdiBv+kvB73fsW4wbeM3jQ +4D+D1wueL/i94LOC3wpeK/id4HuC5wm+I/iP4D2C5wfeH/h+0NFBVwc9HXR3 +0OFBfwcdF3Rd0HNBvwQ9E3RM0PNA3wNdD/Qt0LtA5wJdB3Qe0Hd8jIjgeG/d +9n1etB5o1FzO6wB4z+BBg/8Mvi/4v+D9gv8KPix4sOCDgh8KXih4kOBFgg8J +PSH0hdAVQn8IPSJ0iNC5QfcGvRv0XdB7QecFvRP0T9A9Qf8DPRB0QNC9QAcD +/Qt0HdB5QN9R8c9jGPmzyab5w8m/Pdi0kP0a+NDgR4MXDX4w+MLgCYMv+7/5 +swpvFjxR8EbBF4WuEjpL6Cuhw4QuE3pM6AChC4QeEPo36OGgg4MeDPow6MKg +j4JeCjop6IKgE4I+CLoX6GCgf4F+A3oO6Dgscwfw+1tzmzpvKF5b1GYlx2ng +T4NPDR41+MTgF4NXDB4teLXg00JfCr0pdKbQo0KfCl0qdJLQTUIvCX0g9ILQ +CUIvB/0cdHPQj0FPBh0ZdFPQUUE/BV0QdELQB0HfAr0LdC7Qb0DPAR1H50s7 +9tL4G3wkiEqxxdsFPA7xnhTvTfG+FO/f8T4e7+HBzwZfGzxt8JLBUwY/Gbpc +6HShz4WOF7pe6HmhO4UOFfpT6C2hv4TuEvpD6BGhQ4QeD/o86PKgQ4MuDXo0 +6Kygu4LeCnoh6IegG4IeBvoY6GKgA4EuBHqQ+sUd6fuHsC14cz9aX0/PsOJ1 +Fe+X8b4Z75nxHQLfJfA9Ajxv8L7B94aeGfpm6Jqh14V+F7pd6FShW4VeFbpN +6Dih34SOEbpG6Bmh34OeDzo+6NOgV4NODTor6K6gt4KOCLoi6Imgn4GeBjoa +6EmgL4GupJZLIb3nEUbHN39LcUHqMjlOw3t5vKfH+3l8h8Z3aXyPBv8bfHDw +wP9bnjx4seDJgh8L/ij4pOCRgk8JfiV4lZYKHw78OPDiwANro/DCwAfTUHhR +4EmBHwWeEHhD4AuBTwN+DXg14JeAbwKeyTGF5w3eN/je1eEDHjB4weADgy8L +/ix4s0UKfxR8UvBIwW+brvDdwHNrpPC9wP8C7wv8J/ChwIMCTwi8IfCFwJsB +jwb8GfC2weMGfzt1dmIn6u/6sX25v5UdU7i/agrfF/xf8H7BfwUfFjxY8NLA +UwM/DTwtUeFtga8FPhP4TeA1gd8Dvg94PuDXvlH4tuDZvlX4Xu4K/wu8L/Ci +wJMCP+qBwhPapvCGwBfapvClwJ8Cbwr8IfCJwCNapfCHwCcCjwj6B+ghoIOA +HgD6AOgCwI8HXx48efDIwSsHn7xls1f96DmNa+/D/POicvn/F4BPDH4xeMXg +d25X+J7gebZsqcu8RhuHYcy3ddx8ku2A5wfeH/h+4L2BBwf+G/hh4IuBJwa+ +FPhT4E1B/wA9BHQQ0ANAHwBdQKDCmw9QePTgz4NHDl45+OQPw8/wd5HuPg8o +345o6iK/twdfE/xN8DZz2y/k9/ybbpdwHpuUazJPD3w+8PvA67NSeG/gwYH/ +Bh4YeGHgg0HPAH0DdA3g/asqOgDw/8GDBy/eSeHDg/8NPjh44OBZgncJvmXt +ni78fD+YaXC+8/mDznO/wM8DXw88PfDV9BX+GnhrBxUdAnQJ0COAlw+e/l6F +n1+k8NHBTwcvHbw38ODAfwOPH7x+8PnBXwefHTz2ZQp/fZDCZweP/e/4hKCW +KhHCjPGh8Q3tY8VJ1wW1Yile2pg7ZGDBpPHCBfHygqFSPDj/je8u+h7dV2dR +pyXFR4QdTqaDpVLsNef09R3SOgkewzGl1Ff4DIvVgtddNUsRW4e1LJkes180 +sbFtcFWKB9S0Sw4+f3tB+BLiZnV3RZx4/pLx1FbSfT0r1y4duW6SeHh2ybob +loliLbPXO+pLcZHj+2upXdXPiiEzzqvX3BgvvvpwvO1Mad+XpXJ0Ro5RrLgn +xCbKd6SXELdx7+oz0joDfhv4buC5xSm8tHCFpzZS4adBZwjdIfSG4L2BBwf+ +G/LLIN8M8sycCL3crN2BBNHsyaiw4b1DROeT9/3SpLgI/Dbw3cBzQ54j5D1C +viPw3sCDA//to1dP87vPIsWq04mjxcknheAv7iZa0r4YfDjw48CLQ/4a5LNB +Hhvw4cCPAy+uujzD1dUjnwvyuyCvC/hw4MeBF1edHfDYwGsDn626+pvlDsyH +qN0v6R/Fy039pnGcDN4beHDgv2lH/ua8tJmbU3k9fziyjZxvSuGxgdcGPht4 +bOC1gc8G/hn4aOChgX8GPhp4aLvvfnge/i1etGv/q17dn2fFmPmx9oul5wh+ +GPhi4IkhPwLyJSBPAnhj4JGBP1bHcMaLro3jRde8GucSnTcINvNeP7aS9vXg +k4FfBl4Z8gIgTwDyA4BnBt4Z+GbHPl/PDewtrXvX81Ifrw4TFh0f5dRJGp/Q +w0MfD108+Gfgo4GH1vT7V/5evvr0P34OZkdayTrK9Xb5hPM5JzXCW0yM9mac +wT8DHw08tH1Z3Xjd1p8cx/nHBt2U8wyDZwbeGfhm4JmBdwa+Gfhh4IuBJwZ+ +GPhi4ImBBwZeGPhgyEeG/GTg54AfBr4YeGLIG4U8UsgfBX4Y+GLgiWFdPf0f +PDHwwzr+x/cv8MDACwMfDDww8MLABwPfC/wv8L7A6wLPC/wu8LfA5wKPC3lS +kDcF+VLA6wLPC/wu5PtA/g/k/QDfC/wv8L6QtwJ5LJC/Ajww8MLABwPfC/wv +8L7A9wL/C7wv8LrA8wK/C/wt8LnA4wJPC7wt8LXAu/pPntJ/8KZMwY/CeeA3 +4fzq8idX933zXMhX5lEdfGpczL+P+CzzuFJfcj7SctNRnCe4Knohn++5Y9Lg +xrmHhG1eq2vXsogWz+wbd2lgUZlQ17HrRTpPc+ZozodqHe/O5xdEqBfSc/G0 +7krroXB92kJ+Lq6NUnPpvEO/tPn+4X/15TzkCo8KvCrwqcBzAu8JfCfHmzco +D7hQ4PaV+i1WNZvKdlzPDOV8nQ6HdDjvaPIYOd/ynoXbRo5oZye0ebovtdNw +afyMj3vXTHqOv9QKKA+ycP3MQL6uYadefH51fIbq8gSWVjThPD/RL76fI57V +yBGnmGdVHa/p2slzlF9JLL932oXyLBUtj+I8S9X5r+qe4ywlD+cyJQ9nqJKH +s7r6mh+7Lyb+TMe9WuuIPxO78xLzZ+a8duH3SP2S992m53Xp2RF+XktS97Be +4t3L5xy352w4y3ZK6geOo/dWAbHCEnqPZeFuze+vLq7uO4d4PiVPjowjnk/E +qA3M80lTz+O8o6LmUM4beafeT/n/Jbma9aD3sYFBtyzofWybSAt+H2tbI1cg +PlLVscEGxEfy+9iG+UiGvf15f+HbM5P51x5G8v5iUdBK5hetsnAdS/f10/Xn ++9ayGMD7Ds1eD5intOb9bb5v6YRl7Ofel6vy91LDJwP4+QYMEJ7S83UIe59P +z/fm+T38fH0KRr6i9f/wd0Ne/zeuWs/r/5mYun703M/X2htBz/3i/sP83Ds0 +CF9Oz/fw59lUCoHNg/n5rj5psJzw33vzCPPEvuncYfzPGLRlfnb9LCP2P4Gf +ZZ62c1wTbr/OzEBTbv99mS93wjp9EuEfH71iLuH/edsMxr/WsSaM/+FN75ln +5Rkm89mqy5/wRsnvgHwPyPPQX9GdQocK/Wl1eQZU9rfhfKnnXm5u/3/q2VWU +PAjflLwIyIcQpOhXtyh6VuhYoc+EXhM6zer0+/+tvh762BhFLwud7AxF/wk9 +KHSg0D1CBwn9Y3V6+XIlz4WtkvcC+S6Q9wF5IJD/4e+tztxOp5YzDaido0xl +3Rb0utDvQrcLPSr0qdCl+ig6zIuKLhN6TFNFl5it6BShT6xO5458HA2U/Bzn +lLwcyE+BfBXIU4F8DW+U/A3I27AgWZv7Vdt+Ba8fJiqyLhi6WehooZ+FXjRX +0Y9CNwr9pJ+ip4SOEnrCUYq+sK6iK0TeEOQRQf4Q5NFAXg3k00BeCeSZQH4J +5FlA3gXkW3icMYP/r6tqi8/MfzTy3sb9gq4VOlfoW6HzHKDoPqH3hO4ROkjo +H60UfaCtoheEThD5TZDvBHlOoMf+qOizocseoeQ9eabkQUH+E+QBOa7kBUE+ +kIqBH1ln+jtmHOsHp3z3535Bnwy9cqWiUz6q5E8pVvKpII8K8olUKvlFkFcE ++TXKlXwbyLMBfTj04lGKTnzNJUfmg27pcIhxDguUda/Iz4J8LcjTgnwlyF+C +vCXI34F8Hsjj8U7JZ4H8FshrAV06dOr9FX069Nj1FH02dNlWF1RZV7j9wT3G +bVlX+f8sI18M8scgbwzypyCfCvKoIJ8I8osgrwjyayDfBvJs1FTyUCAvBfJR +TFD086sUPT109NCNQ0cO/Th01G6Krhp66jyVJcwbPiPeYV2tfxdZL4k8L8j7 +gnwvyHuireRBQf4T5AFBXhDkA0G+DOTPQN4M5I/4oeSTQB6JGYr+H/kAkAcA +unfo4KF/z1Z04E8VXTj04PqKLnqdopOGPvrRiyR+jqpbjvN6VXlHXodtfCM1 +ggZeEr921GnweNsZIc+x4bDiLGm/udd8If+/Fk8t+n964pYdxjwvtMK9+P/r +3dgxgf2db3IV+9OtLeT/ux1S6M96viGer7m+vrqcz9p2zzje534S5H1uccex +nHc7aMIc1it9657H55srvMZYhecIfuP2mpnPibcx+sHLMuJxLD3Qifkbtaap +utL31rz2uy/S99ax3Xz5e2udF3fj6Xt388yJGfS9e1DaSP7e/e5423q9T8eL +Ol/6f6HvyWOKzPk78hTjmfTdU7xvMTOfvn9qHlzM3z07GrxQG1czSpx27fRj +4vs8tFvLPJ+3/i9TiL9S3nN/m6NV4cK1pTkziccSpTvc2ulEmKj+91GSVArt +pu4+STwNv5MbY7u/DRLD1389IpWCl09dQ+IhzHu9QOf7I3+xzQ4d+2+P/IUb +7laV9J39kxJvx/xHvL3j1Vd36u+JLYe5v/OG7ub+PhfHpFJ/Jz97w/21rZK/ +7wvPPDWov4dfdeb+rnrYk/trdnqQLvVrSIzpB+pX4dJu3K89yyPbS/0RNc2e +j6Z++atbcb8cnfrcpX7NTJmktlzqV0TqmxPUr4w+7u16SP2K0av1gvo13HV/ +f+rXEncz7ldm1mhN6lfi3Nncr8fKvl7jP/b1yQvit1G/uk1cx/26OHwh9+tf +3cQ71K/kIZ24X5cj1bhfVsHHW1P7D+dqf6H2+/5pze3X0q0pUPsDhofbUPsb +dNPn9j/wG/ac2r9zjBW3Xzsil9uv4ul+i57Lxis/N1L7m+xQ5edimPz2ILVn +9KQR3B5TG2Nuz45WmU3ovp3atvhG910zpwvfNyVoT0O6r9ZjVVO6b/QrR75v +Tt1ts+i+WfblATQeGrjvk8eDq6EK2SlwvlZTKgXLK73ZTlVzd38aV0OnxTYi +O98a/2M7cW/vlBLPTKeWdlM6P7y/IZ//sWFKX/q+nPGhe3P6vuzcaj5/X54x +xo/4RcKUnwExNK7X3izm8dyp9+w3NA4ivLe+Ix5F5Zo0Hg8/37dLJ3wnTqgR +S3jf3TBRHj/T+zEPVaPpjK2Eh1q/lYxD+3sTjtBxxaw4wkkwvr2O6/fsfEX8 +YNFz7t04snf6hzXbKQu9V5PGYZ8qj2K6f7SdHd/3UlxlLrVvs+cu4r8LsV3X +cztrHsnrQ/06Gbi3JvVr8s6j3C97Dc00Os/9tVcQXfe1V9utdP68sXO4X3vO +3qVSLLNNZ/s+9u+YryzU6Mr85ZJCS25PI9f1p6ndm14X76V+TDkr96u2XQXz +N7yjLhzh3/9u5fofocFX6fp+U/Yyf6e3i2yn/8aezBue+dGN+Uhb84byff8a +eHeh9pvUufe9QGr/r8VZ3P6wWkMuUfsnf58SSu0P7dSN2x9fw7iIrm90wpjw +EVe3Osd2aphr8Livk/Yume5fuWsA3/dru4O+zKf/+ZHxfzprB7ezT+fBzCvS +M/GlUtCpYcTnq5fpt6L21DdOUSE8Y54/5fZs8XRN4Ly67a9GU3uGLmjO7dk8 +7wvxrIQ5wX+5PYvdZF695y1Vvq/rXr/jdN+GH934vokH3zUl+xfTr6mT/e8B +mWz/8eTADLIvrBzH47Cy8zt+vrPVa7Sj881GHG1I56/ID5J5g9Xs4y4Xy+P7 +dBN5vM9Txnl1+zX9+U6B9D4i2OA08/oiEmUdR/vf8nyYai3Pj1XKvNhxVh5n ++5RxN1oZb9Xty+Bvair+Z5zidyJLV/B7EI3w46yPPpwq31fYK8+3y8r8+6XM +uw+F8jjWaCSP6xJlPOfXlsfNj27yOPqpjJ/q9mUtFT/3PV/2eyaKvzuj+An4 +DfiLxs5buZ0bz1xknUue+zFu5ypl/mM9wDrQL1ieV3HKPPuozK9Oyjj2ry2P +6xBlPOf1k8fZQ2XcXVLGW3X7sozPsj8OUvzzWMUvuyr+7Jni36Ypfm2Y4idS +FL8Bf9HqyCx+7q8++/tSv5rdXMr9KleR5/9tZT3AOjBZmW8uyvzDvEtvJ8+H +6Vvl+WGlzIv1N+Xx3fiAPN6rlHF+XYkbbJQ4AvFD7QLZ725W/PAKxf8uU/xZ +w3qyf0tV/NoIxd/A/5gofseywWvu16bb84jvJLa/Mon7NcFf6wCddyndLIiu +s3sxi8/PvyqvF58Fef34q6wbo87K83mAMr+XKfP65XJ5fgqT5Plar4s8TxsP +k+enqCbPVw9lnnYX5XgoqZMcH71T4iLf+nI8FLxKjo8aL5PjogMX5Tgj54Qc +d/xQ4g1dB5/j1K+o+JFHqF+lE9dwv7ocluMnz5RhHE9dVeKog23luMRoiByn +vFPikxGP5DhgZ5AcF5xS4oHvin/SUfwV/NThL7l83yNvHjKPbMZbT75vgzpy +fBasJ8drPfbJcdqEQ3LckzVYjoO+K/GP1wg5zkDcgXjjlBIfjNGR44XVSpzg +qvhFR8VPBij+cafib+oo/mez4nc6vHI8Ru18O9aGx/OE8J3czqJnrTle3DJA +jh9br5HjxnFKHDalvRyXjVXisWab5LhnUZYcB6VflOMf1VI5XumSIccvHkrc +MtxFjksqNstxShclPhmm+G8bxZ/HKX68meIXR4fJfrKX4h/zFf9Uofgr+Klz +w+yOUr+mXdA6SP0K3beL+7Vn/RiOF63bC9wveyVubNP3F8dn+zTWcLy2bLsc +p2lfl+OqOovkOMvZTY6vvLbL8VOCiRxPhShxVENVOX4qfiPHU0FKHNVKiT8e +KfEI4pBFil//ofj5TYp/76z41yGKv9VV/OxqxS/uVfwk/GNuvW2sM1mz5Ab3 +90jJCu5vwn/kjcH39wu7bnF8fLNwIcfL6vfkOPlj/sc+VL+9TYoF1d/ysOT6 +Hsr3XV3le6+F8p23uu+/HS7Y8Hcpzxoj+tLvf0PHcf02Q7thdGxuO4W/I322 +6Mb10Q138Hmrnu4aS/UPTfpx/ebaOwZS/df5gYOp3uLveK6vH7WJ7RR0akPf +LcUAX2OuL7EdxnbnOzVlPYjO0gFcnxiwnK4XOuzPpuvElJC+XO/VwNuM6o+Z +9BtD9T/bN+f6awouUQpOwGebgssbBSfgg/ZtU9qLdhYp7VNX2ntaaWd1eSrs +CjucoH3ZjZtVvC/TU/Tm1X0HiWzUaBvVT3u8idfvJ/YnuH7Xvsu8jqvUbs/1 +zb5N5nqDn5n03U482WwR4x3wzJbvW7vBGE8aT3sda4bS+Hr41Z3HlZWmMf3f +BdGrXWwotae11yFuj1Z+R9ZBL5+rwzpoK0Nvtn8msj2PP4N9M0+x7mmSG9c/ +fDNkFN13qooWPwc9B32+7/8COUotJg== + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{341.9249111281491, 116.77666580645048`}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, Pi}, {0.11506642429984786`, 0.31726046159002336`}}, {{ + 0, 3.141592653589793}, {0, 3.141592653589793}, {0.11506642429984786`, + 0.31726046159002336`}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{2.3594037423675083`, 2.425116942360076, 0.04496439013599124}, + ViewVertical->{-0.009266246113981946, -0.009524326014906579, + 0.9999117080507244}]], "Output", + CellChangeTimes->{3.801888559562628*^9, 3.801890157626231*^9, + 3.801892639211084*^9, 3.801892673279256*^9}, + CellLabel-> + "Out[118]=",ExpressionUUID->"30b2dd54-18f5-45ee-8d6e-9696a32d99dd"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Phi]1", "=", "0"}], ",", + RowBox[{"\[Phi]2", "=", "0"}], ",", + RowBox[{"R", "=", "20"}]}], "}"}], ",", + RowBox[{"Plot3D", "[", + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"\[Psi]", "[", + RowBox[{ + RowBox[{"2", "R", " ", + RowBox[{"Cos", "[", + RowBox[{ + RowBox[{"\[Zeta]", "[", + RowBox[{ + "\[Theta]1", ",", "\[Theta]2", ",", "\[Phi]1", ",", "\[Phi]2"}], + "]"}], "/", "2"}], "]"}]}], ",", "R"}], "]"}], ")"}], "2"], ",", + + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Theta]2", ",", "0", ",", "\[Pi]"}], "}"}]}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.801888981987007*^9, 3.801888993308877*^9}, { + 3.8018890655273647`*^9, 3.801889073915987*^9}, 3.801889270274333*^9, { + 3.801889421985284*^9, 3.801889423094659*^9}, {3.801890273348009*^9, + 3.801890282189543*^9}, {3.801890431969071*^9, 3.801890434637516*^9}}, + CellLabel-> + "In[109]:=",ExpressionUUID->"ec08b2f4-8c07-4bfb-82b2-045c5a32553f"], + +Cell[BoxData[ + Graphics3DBox[{GraphicsComplex3DBox[CompressedData[" +1:eJzV3Hvc1+P9wPHcpZJD6oeZc47lrDY5dB80EkLMMgqxIcawjVAsflmkchiN +iTllmMkxMjmPDrYi6g4hsQ5kkcPdQf1m9/t59fD+PvrD77F/9tf3cb/69Pm+ +r9f3On2u63192p101pEnVzVp0qTNmk2aNP3XZ7e/X3v3YVuMqPE5ashxV2/4 +5w+7XL18Qv1W416uxbu0XOf6Q3c5qbrHkOlztxz3VuHHX7Zoi+fev6O6ffc7 +H5wx9IPCT7pyyKzLLn2t+t4ex5215biPCn9zz/nv3HH4suqR7a8c+fDiTwrf +57ym/T+csknNjHtPPXfG0M8Lf/+sPk81TPtezca77H/UsnZLCv9swLKZfxt3 +cM0xY7bqtOW45YXv22HB5G3aHVfztxtWXN6ufZM6fOig1ovWuPhnNQtnnnH+ +w4vXKHx5h/PH3/29X9Ssu+mbpx7wdNMKvkufg46eMXTNCn7ozY91O61Xiwp+ +1tvb7bms3VoV3N+88ulvn/zzjH+vVeP1POPrhX+ecf55xvnnGeefZ5x/nnH+ +ecb55xnnn2c8e86c58x5zpxn/tRP1+F8+tvnfdtvMXqjf/nnOV/PM84/zzj/ +POP884zzzzPOP884/zzj/POM888znj1nznPmPPOkvDzj/Pj/eK7PPtV/nvP1 +POf785zj4Rnnn2ecf55x/nnG3w3/POPbh3+ecf55xrPnzHnmQ/w848rLM75e +6p/xXJ998s9zvp7nfH+eczw85/h5xvnnGZ8V/nnG+ecZ3yr884z/OvzzjGfP +yi0ennHx84wrL8947p/xXJ998s8zbrzgOd+f5xwPzzl+nnN5ecb55xmfEf55 +xvnnGVf/eVY+7YtnXDw84+LnGc/zDTz3zzif/vap/+cZ93vxnO/PM14X8fCc +4+c5l5dnnH+eS7zhn2dc/8+zchgveMb55xkXD8+4+HnG83wDz/0zzqe/far/ +PON+L57z/XnG+ecZHxfx84xvFeXlGZ8efnjG9T88i5d/nnH+ecb55xnnn2c8 +z5/xPN/Ac/+M8+lvn/zznK/nGR80uPH+POP884zfF/HzjG8S5eU5++FZXPoT +nnH+ecb55xl3f55x/nnG8/wZr0vzDTz3z3iuzz755zlfzzPOP885Hp5x/nnO +5eXZ9xsfecb55xnnn2dce+EZ17/xjOfnQTzPn/G6NN/A+VFOPNdnn/zznK/n +Od+f5xwPzzl+nn1P9pw5zzj/POPmnzzj/POM888znp8H8XFp/ozXpfkGzo/y +47k+++Sf53w9z/n+POP6Q57dL3vOnOfMecb55xk3/+G5jOfhn2d8VlrfKPdJ +z4P4fWn+jOf5Bp77ZzzXZ5/885yv5xn3fM2z/5c9Z85z5jxnzjNuPs8zzj/P +Zd4U/nnGp6f1DXyT9DyI35fmz3ieb+C5f8ZzffbJP8+4+RLP/j17zpznzHnO +nOfMecbVf55x/T/P+LtpvQ7P6xt4fh7E8/wZPynNN3D1k0ecT3/75P+7c//8 +xNbjnqz16bmAf/zZg+bt++MbOlW/Pf7nNR27tKzD83N95v72//JzaOb+9ilO +f/ue7/RojMf93S/HmdcnXZ9/d3/7f+6/05P9L95+3H21PsWz/WEHP7HRmJZ1 +uPv427/j/vbpPuLz/1qe0HfgNUs2qHZdjt91q4vf/zt+v8b7uN593N/1OX7X +rS7+Ut/i/lc/tXSnbdauXGdWn++rW/fIdduOL/d/YGW/TR+dXlWxnqme73bM +51Pa3vZ64a/UzWh14O3NKtbl1P+NHnx4u1dWzC78k0sOWFp/ZvOK9aXy/P7o +GXM23mV+4W2ff3j+6Xu3rFgnUc7Ws67t+cAuiwpXnjxvLOve4SP3V8qNK+fq +5j/KjSvn6sZr5S79WJRzdeOLcuPKWdHf/pf/vqv7HVf3u6/ud1zd7/7f/vse +fuFHS5a3m7hqv2Pkip3W+mfH6lZrLm25vN3M0m/0aN/mpuH9binc9a1rjl0w +6Yje1ef94+JJA2e+V65/ZOmUITcOmly461/c856D2j5+Y3W/SYOuXtZufrl+ ++rDRf9p6r0WFu37FTSe322Lli9XH3n9prwtP/2e5/uUL9p0y7c51anDX379/ +h/GD319Qvf1BXUcMnPlpub7b4Cl/+qz/tjW46+/b7YLdpo1uUbPlvj/45C9f +rdqPm/NM680Xzt2rcNc/+Ie7O33+z61q2mx5wGP7dFu1H/faTevsPqp978Jd +/6tpt907bUz3mlZtum1y4ekry/VXf3D5wtFd+xXu+jPW2+26DXY/puaSS+54 +qs+Bq/aV2t5wwEdf3nlKzUVLtzl74MyqivaI53Z3wS/vbDfqZ80qrsfz9ed+ +tO20v3xVuQ+I5+vPOXn04DevqtwfxPP16pt2MHXidutfVz+g1Cv8/p8uqz9q +UNdSf/Becw6efNLfepV6UvazDtivYWSL60s9wXtWL3vi9oueK/UBH3NWi21e ++PEH1X5ffPgHY6969a6q8jviv/+qe9WS1p3K71X2p3bsPmDm6G7l98KrLjmi +YVjno8vvgl93cNWHB7U4ufjM/R5vmfOmP5i3ssdbR3/+UPFW+sMX37u37tAh +xRu++5ILN9zuikOKN3zsqaPuXdr9yOINv/aomXdtevTVxRvedXy7ew5r+Evx +hvf9/uQ2LX7/TjVv+I5HbL3Dz3puXLzhPa/8frclh+xRvOGnXvrxIe/ctH/x +hl+5+Jd91qz9Uam3+PpfPTX/ptN+UrzlcYE3/eJPI07eyj5nlIs3/ObwwBv+ +bPJW1onDM2/44vhdeMPfj9+RN/zYHvXXPn9FQzVv+CY77zdjwdQNizd85R77 +b7C49W7FGz5v5nWbfXBN1+IN3/qUkc9c1O2HpR7iw8YMmLdw8onFm+ehEdEu +eMPHRjviDe8d7Y63cn1qp/iHRw6Y9HW75q2sR241/vWv+wHe8DsmNPYbvOGt ++hy544T9Xi3e8LdOfOmAOc9/Xs0bvlaLvkNOP+J/ijf8jEM3H7V4yE7FG37K +HvsuXDCkrnjDx9U/vu0Xhx5R6mFZfzppr7m1u/YtPj1HPhTjCJ+Fx3jEJ/5k +jGt84muN+ub4iD8e4yyf+Nk3vf/v8ZpPvHrWVZ2+Hvf5xC8Z1uW8wcNuKz7x +G3fevH+rNaYWn/jR/cc2VK34tJpPvGH2xZ0XvLJ+8YnX9/tim89W7lB84q+0 +eX7A7GVdik/8rpFj28y697Dis+zvxHjNJ35wjPt84vUxf+ATnxXzED7xx2M+ +wyc+f4fGeRGfeE2HvVt1mn5C8YlP3q6R81niifvwiQ+N7+UTfyHi5BN/KMrF +J945PPCJTwlvfFq3eCE884nPjd+FT/y9+B35xJfH784n3ifqCZ/4w1Gv+MQv +inrIJ77IfDV84lvu2zgv5ROvinbBJz415pl84pdFu+MTHxHtlE/81mjXfFrv +2TT6AT7xydFv8ImfF/0Mn4VHv8Qnvnb0Y3zib0S/x2fZH+jd2E/yid8d/Sqf ++NToh/nEz+7Z2G/ziTeLfp5PfNsYF/jER8Q4wif+qxh3+CzrkT32GPLq02cW +n/jvY/ziE98txjs+8QUxPvKJV3VsHE/5xDeN8ZdP3HjNZ8k7ME8Ln3jLmA/w +ie/6ReP8gU/8+ZMb5xt84s1ifsInvujJxvkMn/jeMf/hMz+f8omvNazDVa80 +Obv4xNvGvItPfHjM0/jEzev4xA+OeSCfeIeYN/KJ727+Fj7xj6K8fOJrhh8+ +8ReST3zn8M8nvnb8Xnzif4jfl8/8/M5n5nzi88554o1x7c4pPvGr4nmBT/zj +QY3PF3zib8fzCJ/4b+P5hU/8F+Z14RMfFu2RT1z75RPP7R0/J/oHPvFXoz/h +E58T/Q+feX2Dz8z5zJw3vEU8R/OGHxXP3bzhx8bzO2+4fp43/MoYF3jDjSO8 +4XncwZvGOMUbvkWMa7zhr9/QOA7yltd5eMuct8zVw8x5K3mpsY7BG/5qWg8p +6+vmaeGt5BHH/IQ3fGrMZ3jD30jzH/zJmC/xVtarY/2KH599xwx//et1eH7W +aWi96cyhf60du1bjvgk/E87t1OXRxc/W7hz7LPy0if0E+zLq2zXvfbb8jaGP +ljwW3raN9Xb7Prx1P2Xt5ruOG1XyQHjrGXHK6+Bt/YjTPlQZlyNO+1a85X0Z +3n4XceZ1np3TvgBfO3fr1zB84Ru1n4cf3nzOW7HwhK/3j3ib9/yV3z2914yS +B8XbhEs337F+6Oslb4e3u/cbs0+3p6cVn7xd3mS/Qx5Z/ErxyVu/p1/tvXX7 +qcUnb+Lkk7d1Ik4+eVsQcfLJ26SIk8/yHB1xZm9XRJx5PeeUiDP7vGGHhePW +G/1+7cbhgccWLfZ87oCn5xRvfPrs+vx2DV/XWz7/8deXXn148exyPZ+9Rq// +5oJ1ZxfPfL44+Jg57dq/WzzzecaE/Wc8OPjt4plPcfLMZ8uIk2c++/v9wzOf +cyPO3cMzn0dHnDzzKc7s8/SIM/vcZOe7+vea9mEpF59XrP3PXw9fuKB44LFh +QefLX2ixoKJ++rRPx2f9PRNv6NhlXrmez+5XtL3ttF5zy/35fLxf73tuPfsf +JR4+xckzn0MjTp75XBJxvhue+Twt4rTvzOfMiHPb8MynOIeEZz4fizizz8Nu +GLPJlEGr8mn5bN7ytVsWrLsq/5bP8f0btm5+06Ligcdz5272x3btF1XUT59l +XzV8Tho++fgHB39c+mE+9zlzg1Pn3bKw3J9PcZbfPXyKU/x8PhVx8szneRGn +fBU+e0ecs8Izn+KUj8Hn3hHnoPDM51WbDFvy6XdW5cGWfZahD1y03ujPSpx8 +rljy2ho7dvyslIvPsactueyApxdX9J8/n7l5qxN7LK7tv9Y366dP4x2fbz9+ +StsbTvm0dkDkafApTvfn88CIs3vEw+fKiFP8fIpTefkUJ898lvWq8MynOLcJ +z3xOHdWvfqMxDav6+fB5+TrD+3Ts0lC+l8/agQ++e+jEL0ucfH754es/Pa3X +lxXj+JjeS+cNnvNFRf956uQtzrz17C9qn2j5zfrpc1Lb31z69TjIpzh55lOc +7s9nXcQp34bPhohzUsTPpzh3j/LyKc43ww+f4qwPz3yKt8w3wueEEaft22va +suKZz0Erhj99Tt9lxTOfe/38oR8MX7i0eOZz0azpL9194dKK8f3uQ5cd8kKL +pRX9Z9/xW05957olZb4hPp/6DT4nRpzyjvi8JOJ8NPKU+BQnz3yK85GIn09x +bhHl5VOc9eGHzyNvazfy+Fkry7yizJciXp75fHbQ6bdc/+WK4pnPCxaN2PrB +wSuKZz736PvwXS+3WVExz5w/ZcaO8275qvbYNL7fVrv8/qY7f1XRf4qzS6qf +Pnnm87mI0/V8XhhxygfjU5w88ylO+WZ8ipNnPie2+fU++z2xKi+Xz9EHXbP8 +74NW5eXyKV7zED6PG/fooAXrrlE3OzzzufcnL3U9/7VVecJ8btjhjWbNb1qV +F83nJ30/evG3J67KQ+ZTnNcO/mb/Kc6K+hmfPPMpTtfzKU6e+RSnePgU50MR +P5/zj1zYYdplles/fx268sO+PVbl3/J523Nt7v+4bdO6XcMzn+I1DynrvR33 +7Njq1qqS/8nn90/v/tnvTqmqy89BbW4/dux2u1TVzUjzT3HWpfFdnDzwKM5c +P33yXNZ7I07X8ylO9+dTnPtHPHyudV3v7558ROX6zweTz3zz0+9Urv8823TQ +zYPeblY883nzvteesN7oZnXGOz7Fax7C54/+NHZOh47Nimc+95gzYfRjDU3r +OqfnI3Hen+af4qxL47s4B6X+U5y5fvrkmU9xup5PcY6K+/PZ4fWJLb/crHL9 +Z81135o0eE7zCp+z9/94WNt7m1esY4wf2OTwW89uXndZeObzxkfattm1c/OS +T8tn2Y8Kz3wesW3n6w96Yc26t9Jzujg3Tc9H4rwvzT/Fmcd3ceb+U5y5fvrk +mU9xmm/wechGezVcPq9lhc+c78dn1W/6DLzz3JYVPnPeJp9PfD6oyTNVLev+ +Nzzzef0uv33u0Ikt6nYIz3yK1zyET3G+l57fd4g4O6bnI3FOTPNPcR6Rxndx +Tkv958iI84nkrWesz5wZ+6fi3j14fj79Yfy//Dzl3/P1PvPvyMNmNd9c9yvn +tK7rOeeCi/qUOOXhfHF1I+dndfk/8kzmxvozD/Iomsf6v++VJ7Bf7L+oD6tb +d83rh753+GZ1t0xo+mbF+knnT9tt+JNJcyp8bj99mzdnt11Qm+vhpbcv/+S2 +H1Z+78WbXnTHsx+sqp88PP/y5T+p3+yWch/1pO8952878oPKPKVhnQfM6npz +VUV7ueKBZSNO2q1ZRXu5rMPAukufXfP//b3/KT//qfi/rWf5Xr5fPqH6h6uf +6l95not8MPUPl++k/uHyeeRb4PJV5A3g8i7sf+PyB+zj4vbB7Ufi9nPtAx2e +2rv9jMy1k8x58/vIq+St5MfFOjZvuHw53nD5YLyV+0S+U8mbCS6fhzdcXgpv +uPwK3nB5Arzh9rvtR+L2bXkr8SdvmetfMudTvZZ3yicuT5VPXJ4hn7g8Oj5x +eWJ84vKg+MTl8/CJy0vhE5dfUfIArAdHngCfuP1u9RO3b8snnn1mzqf+QF4u +n7g8Xj5x+Zl8lnWsyKPjE5dfx2e5Pu7DJy4Pik9cPg+fuLwUPnH5FXzi8gT4 +xO13q7e4fVuey/cmz5nzrH+Vz8wzLv+ZZ1y+K8+4fM6SXyi/Keozz7h8PJ5x +eWU8Fx7tiGdcng/PuHyVkj8RXN4Fz7j8AZ5x++Blvza4fV6e8ezZ/FQeeDn/ +In88+jeecfnD5X0oweXH8ozL/+S55OnEPjjPuDw9nsu6TuSJ8YzLm+IZl//D +My6PpZynDS4fg2dcXgHPuH3zcv5Ifn3sC/Nsvi9/nmdcvj3PuHxsnsu6YIz7 +POPyaXnG5YvyjMt75BmXv7cqn6yRy0PjueQBRT4Vz7i8IJ5x+S084/I0eC73 +iTwEnnH77Dx7fnLugGfcOQWecfntPOPyt3nGlYtnXP4tz7g8Up5x+ZA84/L6 +eMblp/Fc8n/jd+cZly/EMy7vhWdcXgfPuLyFMk+L51HnNco8zXmOqP9lnma9 +N9pRmacFlw9f5mnB5XuXeVpw+cxlnhZcXm6ZpwWvT/0GLk+yzNOCy/cr8zT7 +vdGP8YzLvyrzt+DyiMr8Lbg8mTJ/cz4m+luePT85/8Izns9VlfWAOH/BM24c +4bnsX0X+PM+4/PCSDx1cnjPP+NA0DpZ4YtzkGZc/yTMuD5BnXD4bz7i8LJ5x +eUc84/Jq+PQ8mn3izq3wiTuXwSfu3AGfuLx6Psu+VszH+MRfSPM3XN4Un7g8 +ND5x+ZN8lvsH5zPfh8/8vXzi8pHUW8/x+Vxh5jzj1mF4xp1z4Rl3joNn3DkF +nnH59jzjD6XnDlz94RlX33jG5aPyjMur5BmXH8gzLv+NZ1x+F8/WRbLnzHnO +nGfcehfPuHMxPOPOffCMO7/Ac1m/Sc/LuHxynguP/pNnXH4vz7g8VZ5x+ZY8 +4/IJecbly/Gc1y35zJzPzPnErR/yWfJqY12FT9y5Dz7xKWndBjeO84nLJ+ez +5GvEPIFPXH5vyWcNLk+VT1weJp/lvEWs0+4UeWnWf+xry68q51pif1aeEG7f +XL4Lbl9S3gZuf03+QVnvinV1+764/VP7l7j9Kftwef3KflLm9kUyt66dubw3 +6znyheRv4fav5ffg5X04kaeC8yPfAufHvizOg/1FnAf7ZHndyX5P5vZXMpd/ +Zr1FeeVR4corHwhXXnktuPLaB8Xt29rPw5XLvlRe/7G/krm8LusY4pf3g4tf +ng0ufvuIuH1P+2H44IjTvk5eP5FX5HlfHpT8GFw89tVw+4D2h3D7WfJpPOfa +J7K/VfKtvB812rvnCO1Oe8fVQ+0d9ztq7zhv2juuXNo7bh9Qe8ftJ2rvuLwF +7R23X6m94/aRtXfcfqj2jtvXkz9q/s+PPEicn9Leg/MjLw0/KOIs7T04P6W9 +B+ehtPfg9mFLew/OQ2nvwe3z2qfE7Vdq7+bh8jm1d1x5tXdceeWHlXyxiEd7 +x5VLe8eVS3vP99Hecfuq2rt5r3wD7R0Xv/Ze8qnjPto7Lk7tHRen9o7bz9Xe +S15ExKO94/LitHfc92rvuH1h7d28SB6d9o7rB+wTG9fyfnEe78wTMrevnOdR +5reZa1+4/WLznHKeJuZd5fk9xiPnvMxzSv5+PI+YB+bnRPuLOX77nfk53X5n +vo/9xdyf21/M67f2O7OH1cVjvzOPv/Y787j2beP5tuW9MvZ38/Og/d38nLK6 +8upPy35r5FGsHedDyr5ejIPyOPF8PgJ3H+de+HH+xbmOPG+RD4rrB+Q14vm8 +QKlv8b2t47xKnic4N5LnFc4/5HmI/E5c/ymfEhenfDt8dsq3x+W5OeejPrj/ +H+N8CC5+5zHyPMS5Alz88lDzfeRT5u+VF4iX9+1Hfhue89sLj3Jt7T1mMZ9x +H+dbcN/rnAYuTucNcOWVN4+rn/Jr8/XyRMt58bi/fMccj7y9HL/8M5yHbtHf +ln0E+bdxbqecP4j7OCeD+17nPXAenFvAlUteO26eJp8Y95woLzbfR34nXvJR +I0+xvO8h4pRvh8sPlDeGy3NrrT+JfqI8J+pP0jzKObSyLhrzZ+es8HJ+LfoN +XJ62POM8n9k4+ofcr06M/gH3vfoHfI/43r2jf8B5k8ec5yH6hzxvcY4u9+f3 +RD+QuX4AF6d+oKyzRZz6AVxeesfoB3Dx6wdw8esH8vzHewDzuKO9Z669Z669 +45dHubR33HOW9o5vGfVQe8fNq7V3XHm1d1x5tXdceU+Ndp3HU+fKMnc+KnPn +fHDnfbRr3O+oXZe8x2hft0a7xuW9a9e4/G3tGpeHrF2XfMLw0DPaNa6f+bbz +om87b3Ff85Mn2zfu97lvmbfE/pTxFb8/1nuNT3h9rLfrx8v7NmIdW/+FHxjr +rvop3H6o/qWc04r9O+08zyeVP3Plz1x5+eh7zMX/9qC8ZT4WHpS35F+l98/g +9h2UF7e/o1z4tCivcpX3+UV5lSvXB+XKXH3KvOTTRLntpysXLp9BuXD5JMqF +y+cp5/WCT4pyiR/3O4o/12fxZy5O5RC/OEteUHr/Dy5+8eDPRJziwYdGnOLJ +zx2+V1xdox2V/IDgb0Q87l/ysuN73b+sa6Xz+77nF70a62fJLw0+Pu7j9/b8 +sSDW4Xks5zKj3ZXz8sHr0/sb8bdSu8ZzfSjrSFFe7Rp/OfIK1H98u7he/cEv +TL8X/lTEwyd+T8RfzoME75TeN1Xe+xJ+SnsPzk9p796zFfcv7d16V27vwUdE +/KW9B5dfUdp78KrwUNp78PPT+xPwJ+N7S3v3Xrr0Hi3fL19CuUoeenoPJ/5q +6rfx6am948ol/rLPnuo/PjDKJf5yji2976vs50b84sT3j/hLPlDwv0f84sHF +KR5cnOLBL039fNm3Te8jxX8Q8bg/7nvdH98r9Vf+3/S4v+vLefHtv/kes7Jv +lc6N6g+M7yUfyHsh0ns/8IZ0H+1m8Q7ffN8sfmKMm+5f3vuSxnf8o/jevM7w +Ufpe9dd8w/fixmX/H69N73kr7+eL+iAe/LD0npOynhBx5nWG91Oc5T0EUW/F +iT+Q3ruLz0/zKzy/pw7XD4sfn57mFXj3KJf4ceXK6wzvpXKp7/Jay7kkz/UR +j3LhxgXlynmSvq/kZ6b6iT/md4/y5u9VXvz19F4aXP+gvHh9es9eed+wehvl +xc3flLec10/vSS7vmUjzZHxmml/hxnce8NlpPMWHpfGlrCek/jnHzwOe+yt8 +evLj+/N7lXHju+vFZb7HJz4t3af8nqm8eXxx/7zO4P647/V74RPS9+IDUn3D +10jvgczjiHjy85d4MhdPOVcUcZZz5cGfSnHiT6d+AB+Q6gNeleZXeTwS/+qe +EzMXf+blvSLBzZ/V/7Ivk8pV3neb+md8fGrv+MD0Hk48z6Pw8p7PKFdeN1Cu +zJUrc+XCzdu1azz/jninND7id6f+HH82teuyvpHmyXjHNO/Ca7f/5jwkPxf/ +H5Kq/3M= + "], {{ + {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[ + GrayLevel[1], 3], + StyleBox[GraphicsGroup3DBox[ + TagBox[{Polygon3DBox[CompressedData[" +1:eJw1mXfAjmUbxu/rufRVWlKalL3KStKwyc4qI7uFEBEio2FlhsrKioasBiUZ +DQ1CRZNCpFKh6Guv73d8x9Ufp/P33O73eZ/nuq/zPI/reIvc2LdVn1yWZVfx +TyS/Rz6dfChkWVd4BDwN1k2T4AXwKcdl2RJed86TZX3Jk7n+KNfzcX05r2/g ++mnwMrgrfCq8FO4CZ/AMuCV8MvwU3AkO8Gy4FZwXfgLuAP9DTIdbkE/i+mK4 +I3wcPA9uA0d4DnwdnIMfga+F88Bz4dbwH8QDcFPyl0Qj+DLyd0RPuBr5N2IS +3Jj8KzERbkT+hbgfbkj+mRgLNyD/SNwD1yMfI+6G65KPEiPgOuQfiCFwbfL3 +xGC4Fvkw0Q+uQT5E3A5XJ/9OTIabkL8lboWvIn9D3AhfST5IdICvIJ/Id3wc +bg9/RTSGq5K/JprAl5PXat3hk8kDyQ/x8kme135e1+d1ZfI+oh58Cflzoi5c +ibyXqANXJO8hasMVyLuJWnB58mdETbgc+VOiGnwx+T2iHFyEvCuP99hF5E+I +K+Ay5HeJi+HC5A+JS+GS5J3ElXBZ8gdEZbgEeQdRCS5G3k6Uh4uS3ycugYuT +3yEugi8kf0E0gC8lv0rkg/OTtxIl4ULkLUQJuCD5baI4fD55M1EMPo+8ibgQ +Ppf8FnEBfA75TaIQfDb5DaIgfBb5deJsuAB5I3EWfCb5NaIAfAZ5G1EWvoD8 +impGtUd+WTUD5yNvIE6ATyMfIBrCVcjrVDPwKeT1xPHwqeSXtI95tieR12iP +wnm1T4n83LOaIl8FT4C/g5+FR8IH4RfgafBheCU8Hv4WfgK+Dd4NPw73hj+D +n4NHwd/Aj8E94E/h1fAs+Aj8DHwf/DW8BB4A74Ofgu+AP4efh6fCh+DFedxT +9sIr4GHwl/DT8HD4K/jJPO5He+DpcBt4GzwTbge/C8+A28LvwHPgzvD78Lw8 +7msfwvPhG+CP4LlwF/gD+CbyvdTIw6xdb60RfC/XehHj4blcf5T7b+H1J/z/ +QrgbvBNeAN8Mfww/DLeGt8Kz4fbwdvgh+Fp4C/wg3Ap+G54FXw+/By9Ntbof +XgR3h3fBj8Cd4B3wNLglvBleDg+FD8DL4EHwF/BkuAb8BjwJrgq/Dk+EK8Ib +4QlwBfg1eDxcBn4VHgeXhl+Bx8JF4A3wGLgwvB4eDZ8Pr4NHwefBa+GR8Lnw +S/AgOAcvh++GT4dfgEfAp8DPw8Phk+FV8J1whFfAQ+G88HPwMPgkeCX8MXw5 +XFrrRPzDM1kWvU8n8ozm87on14+SF3C9N/xfeKHugX+CF8G94GN6nvAUuDk/ +/xY8FW4Bb4IfgJvBb8L94T+5/ym4H/wHvBi+Ff4Bng93gw/Dc+AB8N/wUv0s +7zGVz/ZY8N6fBj8eXE8T4Hnwi9y/gNffc38P+HuuzYO7w0fgufr8qr3MNfUR +16twfynydeR+XB8T3Mtvh0cF98uOcD/46nTPaPgy+AZ4EFwd7gEPD36/rvDA +4DW+CR4c3F87wf2D50b/9LvUw66De8JN4cHwxODe3xa+LXgW3QlPCO7Z7eA+ +wb2/Ddw7uGe3hnvB18B3wZOCZ0IXeEDwHOgM3wGXglvC3YPn0m2q0+CefQ18 +U3AvbwbfHDzT+sIjg3t5Q7hrcC9vAHcJ7uX14c7BvfxquFPwrOsN3wP/yrr/ +o5GaZkgLuFvwDGkO3xLc+2vB7eBz4Nrw9cFzoCbcNngWXQ63Cp4JNeA2wbO0 +F3w3/ANcOfOe13yoCrcMnml3wGODdcp6eCv8O1EErh48H0rD9YLnfylS3WB9 +8TL8DjxFtS7dF6x9NsDb4F/4fX/Bge/4pPoT/EnwbO8ODwvWLPPhZ+C74CXw +S8Fz+xb4ruCeORteCh+FL81c46qFR+HngvXRU/Ca4DlWAW4UrNdegd8NnoeX +wS2Ce7F68qtaH94rH7w9Zy32DPxK8Nw7B64YPDMHwPcH676B8LjgPq96XAT/ +zPv8AWfqDfAO8JFoTfc0/DL3jFM/gzcHz+SKcONgbbgG3gSfCFeCmwRrwBXw +hmBdNggeH6x9boaHBM/qwnA17UN+342Z+/Mx7qmSuTdKf/WB7wuegXPhp4Nn ++DJ4ffCsXgqvUw9Kz3R78BxeC2+BZ6bP/3Zwj3kN3pH2gNbzteB5OwdekZ6p +nt2yYI2wSJ8neOY/Br8QPHMegZcHz/mFer5prbQf1qbnpWe9Eu7P9ymo55xm +vvrYxmDdsVLfXe/DPRdojVPf7ZXqrnmqQdV469R/tP9bpNrX+rRKNa6+p3k+ +HJ4aPCf7pNpvk2pH+6Ft2hvaDx1Tz5kcPD8fhhcHa5YH4SeC5/Og1Mfap56m +Xtcu7avxqXf1TPUr3TEMnhI8t4fCD6Q+qX47IngGloDrBM/A4nDt4FndCr41 +9W316jtT31bf65H6tnpp3+CZfAV8XfCMOgMuHTz/r4dvTz1Tvah98JyvC3cM +nvN14A7BOr0bPDStiTTPnODzxxR4YfD5Y5xqJHju3As/BP9FnAmXDdYUjeAb +4ak808Kqj6R9NJs0gzQ/88Mlg2f4WXD5YO1wCXxNsKZQD2yWeqnqq2mw7lA/ +aR6sEYrCNYM1QjG4VrDWKAPXT7Wp3lgjeOYfD5cL1ibnwpVT/9T5t3iwXjgR +rhQ8z7ktKxY8h3VWLhE8n/lKWangOV8AvjhYd/wHvihYF3BMy8qQb4muC9XW +HXm8XkuiteRIrs8I7r1lM+ufr9Pnl3Y6kr67vscXac9IV3yf1koaaWf6LtI5 +H8NnZ9Y2E6J7gnrDDPidzOfxafDmzGfth+Atmc/XD8NbM5/NH4zu/5oD6pPn +ZdZOeqabMp89pXnvg6fz+fel9ZdG6hjdY9Xvb5LGzXwWvjm6t/x/HaL7v87X +46Jnk87sPaWnM5+ve0X3EPWSW6Pnjs7a+1O9aA0/T3tAemx89OyQP3B/9FyT +P9BDZ4DMZ/O9aT/omU/n+rbMnsZM+N3M3sVHOe9Jacgq0f1B9X1xdD2qLsul +vq1zdAlpwcx6+6JoHaUzddloDaMzdcloPaazc9XoniBt2TBau+qcUiZa5+jc +3SBaH0rz14+uR9XlFdH9TRq1eHQ/UT84L1qH6BxdCu6Q+WxeLLpX6J5Z8HuZ +vZodOdeg9OoHOdevNOeHOe9nadr3c+4n0p8dovuAvAv16hcz+zPtpZUz+xhF +o7WffACtT7+0VgWje5d62KXRWlG9ULPv2sx6vki0JpRXcGG0tpRXMDJ6zso7 +GhU9yzTTxsDrMntHX5CPEPuJw8RR4iCxivs+J6/UzCG2w3uD//+bdM/P6We5 +nD2fc72v4J+f0vvo/eQtaZ/sCvarVCM7g/2w3XqfYK9rj9432APbC38b7I3p +M3ynn43+DPos+p3fps98KPWfouo/Oes3+RV/5Kw35Cf8mfqAeuFvOesleQuH +4Asz+wA/5qz35CfIA9N+/kz9DS6f2X9QE5PGkF9xLH33f9fvWFoH+VWLyS+q +B6Z6Uf/5LmfdIl9CWqVkZr+icbQfqPO1no36xsfBXp322244RGs5eSYxWgPL +V5E/ob63Omdd9+966Nx5pT6D5i3Xl2f25YZEazN5ZYOjtZa8u7HRelgeoPSG +Pr/8urui9aE8wAGpD0unDI3WP9JBOhM3htfk/Mx/S/tDPtxM9bRg/097/q2k +tfQc9wR7ljvhA8E+5afwV8F9cxf8ZbDf+Rn8dfB763fsy+xfqid/mvbkT+n6 +kbQvtT9y0fpfvtOB1Nvl6e3Oec+oj+3JWQ/L/1H/PyGz//NlznpYflGTVKfy +PQ6kZ6ezc11ibGaP4pJonS//sHLqLarTy6K1jXrgNqJQ8DroOe1P9aI9fTDV +2ibi7/RMtxLnB+8laeyDaf9XS/1BOmJzzhtPz/pt1WDwsxjBPRsze1NXE0My ++5/1Uk9WP5yUdLvOzpplWnOtffNo/SavRt/9nsw+6jVpNukcsEVzM/j5VorW +P/JRJ6Y61XNuFO2ByyNqnfpwr9R/NDfld10brYvkJ49Oc1N10Cz6vC9faHi0 +9pbf1SnNtf5pb6uPyZeTlzYGnh3sl2tGfwQPTH1P+3ZQtLaXR9ctWv/L/5Gn +dTf8IPf35fWqzB6dPKpR+jzBftJoeFbwTFRNyVvrE63D5Qd2jz5fyH9rGq3x +tFbyrRfAz0pLpzmudegSfUaQv9c+zVn5eDcQj2f2ozpHnxHk+3WNPkfI4xoW +rU9Ug9dHn3Hk77WI9qvlrbWNPmvIe2wXfU6RJ1k42jeQV9wyWrfLK2tFTM/s +SZ6W5ot8Lfn90iFLpL3TPJIuPjfaK5DPfH70uV6+Sulo30O+94lw9cye8BnR +HoL85/LRPol85vzRfoJ875rRuk7+ZN7os3/B1HvrZfbNTo7W5PoMJ0T7APKf +T4/2IuSN/5OzVpe3Vihae2iG/p2zbpfPViBa58vH+yvn99SMOC5ah8uvOyna +l5Dv/XPO5wV5cfmivQ555ldF7x95khWiz6rynKul2pFvWTt6/8hrvTL670Ty +Ic+O9l7kw1dPe0Z1fWr0WUZeYsVof0B/f6kVvSfl056jfZbZ25fHop6/Oj07 +rZV88sujz1Py6OpE14j80hrR+lNe6/8AYMJG+Q== + "]], + Polygon3DBox[CompressedData[" +1:eJwtmXW8XcXVhs+euXzFCa4tnuISKAWKuxV3dwjubiU4wQmWBEJwCJYALQ6B +thAsQIGgQUrRFCgt/fA+z++dP+buec7sc+7Ze69Z613vmXf3gzc/qPR6vSn4 +08fx5Xb8ouv19mXyPjwz/BN8BPwePBP8I3w4/Ofa6w2ET4LPhz9gfRb4Z/hI ++G/wZPCX8EB4IjwD/D18KPw73n8IvAWvXwq/y3FG+AfWD4NnZn0DeCleHwy/ +xJGXev9kfR94a8Zj8Hh4Mv7RCiweBG/GeRf7/+Hz4GtYHw7/Fj4A3oT1C+GX +4cHw1awPg1+FL4Cvha+Bl4cPhDfl/IvgV+Dz4RGsXw2Ph8+Ar4SvhF+Ez4Sv +gq+CV2FcCF8HT/L7s34uPBweCq8IHwxvzudfAj8NnwRf1OX7V16fw/vBGMv8 +BsYE5tOw/hjzv3D+8fD58AWcPxge6/dj7U/wW/BQeBTrN8CX8fpT8Nzwo8xf +Yfwf/BW8H+trcP7R8PYl3388R+NjEut7w//hOCX8HeNxFv7K+Scwv6DL/XyV +134B/wveH16N9SPhbXn9CngCxyngf7N+APwVvKDXw/Ek+PP2/V9k/V74Z15f +Fp6T4+nwlxwXgKfmeCL8DcdF4Bk4ngJ/wXF+eCqOJ8D/4Dg7XDgeBX/K5z8I +j+Pzx8DbtvhwE9wEfwY/BD/D+j3GJ+MseCj8KfO3WR8G3w7fCK/EOBseBn/G +/O+s3wY/CN8OfwiPgh+C7/D7wLfDD8N3wv/k/84HT8nxePhHjgPg2TkO8n5z +XBienuPJ8Mq8/zB4K3iI8QUfDm8NXwZ/BI82Vvj8u+DV4aPg7UricwzHj+FP +GPcwv4PxPvNPGfcy/4LzX2I+sUv8TAavCM/L2pnwqvAR8Dbw5fDrJfFgXBwI +T8P6GvBCvH42vF3bLwfDN3u98DPwBM7/IzwtvCa8MOvnwB/DY+AnWL8b/gS+ +B34SHu3/gy+Fb4RHwjPB68NL8v5zjS/4EvgG1q+FfwlvDv+W9fPg1+CL4etZ +H+H+Y5wCXwp/wnwB1reDVynJZ+Pgk+GLu+zPp+AT4Qu75INn4VPhIV2ex94t +Pk4oed4btPfvVpJPDoBHwqeWPJ9N4NPgvUuuZ0bGEvD6fN5Y5v0Y/eE13a/M +Z2AsBK8NP858H94/HD6xJJ6W9zWZ9Y+YT8/4NbyW+YL5dIx54JXhR5j/vn3/ +PUvux0yMJeENWH+C+ayM5cyn8F/Mn16j1wf/g/lO7X4ezvtvgadkTO7zYP1+ +ny9jbngl+GHm6/cl/h+B/5/5Ni3/Hliyn/Zq+er4kv0zC+M35l/O/zPzA1m/ +Dh5UEh8zM5aCN2T9SeabMv4EPwX/zHznFg9HcP6tLR94/zqOD8EbMe4yl3H+ +9y0/zQZ/3b7/LRyvgOfg+AxrH5bcT5Pigz5fxh3go6x/a/5kXA3fBX/FfAvG +w/BzcKE+bd6X/PIs3MGfldzvX5Tcn0kl1zN5yfPZivEo/ALn93H+lvAj8PNw +hfu4vhXgeTj/DNY2Y9wPP826hfftkuf9LfwAa+u1+N2lpB6u5zXCD7D+X+br +tny+c0k9XJdxM3w/698w35BxJ/wY/B3zjTl/ELxXyX5bk3ENfDfr//J5t3q2 +a0m9XJ1xJXwb619aH/pyf2+Fv2C+FmMEPBr+mvmuvH8IfBTvHwX/UPMsfI/v +3aXlgyNZvw2e05xofuKcccx/5WfCO8HPGfuMdbx++AXmc5nTrE8+X/eKMQTv +A79q7DLW9n7AzzM/quXzc0vqw0I+Y3g/1l9jfmTL/+eU1JcVGMfC57H+sfnI +azYfw88yH+A1en3we+Yf96T7EX6Z+YLeY+8v/Dfmz7d8cXmX/PsCfDp8RZf6 ++lx7Hpd1qQc7MJ6GX7NuEw/9zTnmG/gV5tv3RQ+8Ck/B+nzGhPkKfpH5/O4R +eA/4JebzGhM+T3g885X7opdGwp+7V/n/+8Mbl+iRE1o9uqikni/tM/N5cf67 +zJdh7A4fA7/P/HvOn61LzbX2ntjqwcW8/z54NnMQvDnn/JX51OYoeKku+3F2 +cyC8BfwU82n6sp8HdNnvk/i8J+CXunze1k2PHVCijw6Cr4dPK6k3UzH6wfO1 +/bNpu9/7sH6d+63pv33h6+HTm764sqS+Le4zgA/l/W+Zq8xJ5iN4IvNlGXvA +x8IfeP8Ye8LHwX9nviRjJ/Mr/A7zJRg7wofBbzNfmLElvD88gfki5gyvB36d ++Rw+I3hr+Gnmz9TUu0u66O11mn7cqUSPLuo9MR+z/gbzxRjbwAfBbzJfjrGX ++Rn+sC85zFxmjjuTz3qTcRnzm7vcj+lrvs+iJftnqpr4W7Bkv81Y8/mLl8TT +DDX/f7GS/dmv5voWKdm/P8Gz8Nnb89oTNfV/W+ZLlMTrnDXxtWxJfM9Vs79+ +U7KfZ625f0uXxPPFNXpaXW38Xwa/Bd8CTw2fVrN/Li/Jp17js0yvKrn2K+B3 +zGfwtPAl8OvwjSX7bVDN/lJ3W4/OhcfDV5f0K+fAL8DDS/L75fDb5kN4GniI +99T7CU8Fz1ETP8uU5IPZa+JjQEm+mLomf/UvyS8b1fQfu5fom3lrnt+KJfEx +d038LV+Sv7qafDdXSb1dq0bf7lCSvxZu/dDqJfE4X40e+F1JvCzU+qvVSuJz +kZp+bI2SeC81+feXJXqi1uSTX5Xs5x/hrkvP9wjz70vy8ywlemSemv2xQkm8 +T1mTHxcoyfc/lOTXWUv0wOQ1+XT+kvj/tqQ+zFyir6yf5ru5S/LFv0vyy3Ql +ekn9bT7pV6K3zub85+FhJfW3f8t3q5bs77Pg5+ChJfXeHnqhLj2tvfXnXTS3 +4WRvNbpEk79rTPHe6azZXWLkypqYeqtLjBhrU/SldzOmLlIrMSb1oun/w9zm +3V7RnvGbms9Xy7/U1l+EP+hF838J9+Pz3zHXt/9vzL3Z5RqNRfeIud976N5x +j5r7vWfuXfeotdRn6N51T1tLfQbudffQG13uiXvLPWptUbO7d92T1trNetmr +xrS1zhxhrBvT1kKfsbHunrZ2GePu9a9L9Om0Jfp4/xo9d0qJftivRq+cXKJH +7GEX4P3Tt/vv8zC392v3w3vgs7i95N4cX+MvXFCiD+1pl+jicdjr2jMv1sUj +sZe2p7XWWHPUknoei3TxTPRC9Cz6d/FA9DIm1ujFO7v0RzvU6KdDSurpFjVa +Z2BJ/3lMTa4dXKKfD6/Ru2eW6LOBNXr0pBL9eVyNfjy/RK8dW6MfzyvRq0fU +6MWzSvTfVjX6bL+SfnaPGv13TIk+27NGLx5bot+M0YnwqJLYNeeobVbvJRfN +X9OPrFRSPxar8XvWKtE7s5Wcb7y4d+15t2/vtxc+zXvSpaf8qaTH37KL5rX3 +/3VJ/Gza/p896u4tvuxdz2jxZry61/VU9FbUwHpF9tRqBfe4e12PwN7KHsFe +Qc9hxy49ql6ENdPaaU+nd6XG00t4oBftd3aJ9vaeem//UNJbGJPGpj2kvaSa +WO9HDanXoGZQW6pJ1CZje9E+F5Z4W8agsbhlSa96ive0RlPplTzei9bSc1uj +i6eiF6dnt3oXz0QvT89utS4eiV6ePa7e3b699L4b8drgLh7QMubOEu2qhl2u +xuPR61Ez6KWtXNJr+ox91np0h3TpofXu7MkP7lKj3e/LlWjdXdt+tyc/Gt6t +l17dntre2h5E700Nqbd1XC/acm2fSZcYMpb0jDbp4hHpJR2tpunimXxU4iGu +2sVj0VvUM9oYXqYXL0nf097RnsveS8/o9108GL0kPYmBXTwEvQo9jX1bvtLr +0LPZCF66Fy/Hnl7v5e5eev1Fa/y9NUv0rj2r3oaa2F5WjagXMq4X7XhYSe8z +At7R2lLSK7kn3ZtqVL28q3rRrvbMelH2zPbS9uBj4Gt76c2PK+nt3LPuXXtq +valbe+m17anu66J57bXske/p4lHYO9tT3dul57bX0iO7o4vHoXdmzjJ36UHo +9Sxd4/etX6IPjSFjacMSP2JAjR+1QYl/oEZUK9rjqaWXqPG31inpB5as8bfW +LdHHS9X4T+uV6OPvungZ8/TS6+pBLdPF89ObUqPf1KVHVLvrkei92cPpnehx +6tWq4fU+9Wz06uzh9HLsWfV69QjtZfVw9Ib1tPR27KH1lvUw7K31tFeB5+3F +69ZDm9jqq97sNSX11vquFrzJ+9RFM6odryjp1dScak89Gb2qi3rxauyx9bb0 +XOy99yjxltV4aj17QHvB03rxXvX89KbtWfQC9Zj0zvRE9J7sIe0lB/Xi7dkz +2jue2ou3qKelt/WHXrxHPQG9cnsmvQJ7Br3sc3rpJXYs8ULVjGpHeyi9O3s4 +eyvz9fYtn7t/jHFj/dASf9w9q3apbS+rsfQ6rGFqLzXyCy0fqp3V2K+1/eP9 +UyO/3kWjD2n31/2l53hpjSbTi7EGqtXU/K+2+20vcHNNrvAZ+izV7E+1fD6o +5cOTu2g+85E1yVwyR6tVaoTH2/4/vj3PcS2/u7/tIZ5u9cLnu1tfYsGYUG/Y +E4xv+dz4GF2Ti8wx5hrj58VWHwa3+jKm7VfzzR01frg50PunRtBrUxMc0+rT +gy2+rVfW/AdaPjii5YtRLZ+YH+6pya3mTHPnmJrrNUeaK9UYel1qloGtXo1t ++c16pOZ4rNU/tciufdGyalz1ghritpbPzE9qttEtf1kv1Sh6a2o4tYsa7u6W +H9V2apJbW35Uq9ijnNfqhfG3S1+0rBpaLW3PaO9ojbJWja2pVdYoa5X5dniL +b/PrYzW535xv7n+8xu+xJlgbnqzxL6xh1rIHamLbGFfLPFTjP6kh1BIP1mgJ +NY3xYk92adtf7l8117C2n7Zq9eD6tt/N52rAoW1/qQ3vL+mV7JnGlfRMshpI +LfRwjRZSA6mF1Ij3t3qgdvxjjb+vplJbXVOjZdWsatdhNVpVzax23rEve8k9 +5l5zv5/f9ID7f6e+7D01v9p/575of3sKe4vhNb2QGlgtfF3Nfjdnm7tH1uRu +NbRa+toaf0fNrfY2R1zX8qG5Q408suU/tfN9NdpQTae2Mz8OafnM/DmiRrur +2dXuV9doc3s0ezX11RldapD5Tj2kPvI3zmXhe2v8aDWH2sOeUm/FntJe852a +WmiNtFZaA/VK7JGtjXq6K7f6MKnVNL2fPXupdXrAK7V6pjf8fk1ttgZbiz9Q +A/RSs63d6hdzlTlL/aFHZT8zfauH6jNj2xhX3+lp6837G9yEVoP18tVv1mZr +qt6THoG1Vs9sQKun6mE9Ar1OPRm9A3t+vSI9HL0ANb5ekXpPPagHoFelR6E3 +oOegN6XHoxehh6C3paeht2APrVemR2Nvraent2c/pff+bk2uM+epddRUeom7 +9qK11BjqUfWs2kPPQa9NT0gvQr1gLM/Q6vN7NdpGzaP2ub1GO9oD2AvoAfjb +if2A3oD6073unl+cc2+p0dJqTLWmnoRenJ6XXoWegZ/lZ9pfvFGjddQkahM9 +C71qPQ69DD0Jf/vxNwG9Cj0Pf4tRn+qFqJ/NReYk9bKemN62no1emR6bXrUe +i96bGkpvdY9etJU9sr8l+RuGvbP9l7XFGmO/pefjby321HpBt9b0DvYM9g56 +Kupl9a79mp6NXqz9k17OqJrfq+xB7EX0VNyL7kn7r9tqehN7EnsTPSB/W9Jz +0RuyJ7Q/2K0Xff8/TyslEQ== + "]], Polygon3DBox[CompressedData[" +1:eJwt1nn8VWMeB/B7L6OUqUg7Ldr3Xat2Lb9oV+nXvlHaN0XbVCopTaFFm0GE +wgwzmAmRGdFmQrTaIsXY9xTv79zzx+f1PN/3ee6555x7nuc+5YaO7zEuk0ql +1skfpNP5qdRSsCedSm1X33xeKlWclWaDWHuWYZeyoqwPa8F+1i/GLtcOZFez +tHFH5EZ2L1vEeqjbGTeX7WBPsNGsGmvKbmHDWVlWmTVkU9kgVorlsGVsL3ue +TWdF2WVsAGvHUuwatpztZy+iW1hndifbx15gM1gRVoz1ZS3ZGf0qrLF2OhvK +ShuXl+1lr7Jn2TxWgpVhg1mH+FpWm7Vmf2JjWBV2OavERrKuLD9rxHLYEjaV +1WWNWWd2B5vG6rGarCWbw0azyqw8q8smslxWnF3BarFxrA8rzLqxVexFKZ3O +XnNpVk09Wt3TuIKsPmvPFrKJrCYrw6qzm1gvVojVYW3YPDaWVWUNWAe2iE1i +tVhFVp9NZgNYCVaXtWXz2ThWjdVj7dgCNp5VZ1eyTux2NoXVYQ1ZR7aYTWa1 +2WWsIhvBurB8rByrycay3uwSdjEryLqzK9m3+lVZE+0MNoyVMa4wK8J6s6vY +L/olWXntMHYNu9C46qwZu5WNYOVYKVaBDWfXsrzsjyzN2rHK7GP9Gqy5diYb +ya4w7hJWiPVgjdh3+hedH5PM82KVdE/ol2U1tGPYdexiny3I8rIcVpt9pl+I +FdB2Yw3ZN/oFWB5tJ1aLfa5fiTXQTmEDWUnnq8VasbnsJlaJVWD12CTWnxVj +HdlitiuZC5PZ69Ij+S0nsGbqtsbNifePPc5GsU3ylbqqXMDedvw/rEvyvTFn +Gqnz+Owe9izbwiaxU7KA/YNtZuPVT0l+1opVYF/pb2BfqCtKPMo34zPxLmjb +s2rsB/1/xhzWXsvqs3P6f4/fTtsmefbx/D5jd2ifZ9uSNfG0LGHb2VY2Tf2p +zI9zsAfZOPX/ZCV7hT3NZsf1uqif1c2lDDvu+Bd8rXZ3su4uVH8uK9hO9hSb +pf5S7mMH2E62TP2JzGJPsI3sRvVJmceeZg+wseoTcivbxtazkeqPZSZ7nG1g +N6i3xzvNuibvUKynV7nmCezJ5Dv6sX9JSdaFNWC/6f+N5dO2ZOXZl/r/Zi20 +E1g/VjHuQb5WV5c87KDjG+P+Yr6ks/9Fb8UzZ2W1vVjT+I9Sp13LLvZMJvtb +/sh2xvqkfk4yxp5TZ4x7Ld6hTPazP7FXYu1Vj0rWv1jbX451mw1lOayIeqv8 +FvNFiiVzcFucU1uflWQn47mx87Qvy9nkWrbImXh/pDB737F8ruVbdZ3kfO+w +F2LNSq4vxc+qH5Dv9V9iZ+I9Vd8v37G6ko8dcuwv7Bt1TcmbnO8xdk5dQ4qy +j9ij7Gy881KEfcgeYb+qq8il7IN4T9hF2tYxb9jX+h+yqdqH2T1ssPq/0o8t +ZdNZW3VT9zaU3c+Ws87sOraBHWX72O2sF1vPjrC9bDHrydaxw2wPW8R6s43s +GNvPlrB3ZQRbzRawrup3ZDhbxeazLupjMpZtYstYX3Ub55sdzzuZvzE/jsqY +eOfYUtYn1i/j7mWH2O5kDn4gU9hD7G42KO7fuM1sR6zLfAU7JCPVa9S3GddN +PcC4R9hJdoTdww7LDWwtW8i6q7sbt5odZLvYfDaQPco+ZUfZKtafbWGfsMPs +bjaIPcZOsWNsNRvMtrLT7Dhbw9bHWhRzMv3/6Zw64PgQ47bF+sbeY2sdyGUP +sRPsXbaSvS+T2WZ2Fxuo3iFVWC5rywqoj0tsJu9jd7Lr1a2cb3qyjpeSX9l+ +6ZvJ7n1in9NavU/6JP/7sR9qpT4Qz5AtZzNZB/Vbcc9sBZvNOqlb+44ZMfeT +/4phrDkbHe8/W8N6xhrEJrK/sk0sl70Zz5r9mc1iHdV74x3MZPcbsQdpqW7m +s6Ni7rAScoa9Kl0z2b1e7Icaq3dJt0x2jxT7nCbqN+T6THZfdzNro94TcyST +3TfFnqaF+iOZxrawVWyI+qAMYXexucncejt+Y7aSzWE56pekKuufzu6BY1+3 +O+YXuy2d3dc1V78W71smuw+LPVdTdRP3lsvWscXsavaejI91JpnTsd7/DuC7 +aYg= + "]], + Polygon3DBox[{{951, 530, 695, 254, 255, 1016}, {1095, 647, 455, + 285, 284, 882}}]}, + Annotation[#, "Charting`Private`Tag$27903#1"]& ]], + Lighting->{{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, {}, + {GrayLevel[1], EdgeForm[None], + StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData[" +1:eJwtkzlMlFEQx993LRAUjwUajwRbtPPGxMojMWpiNGrsVmwBK49GMNFYqYka +axWhBArAMzbs2mkBaKIWiohnvHZ11wSNv8l/isn/982bb+a9N/PaCt37uuIQ +whEswa7wUUQnoxDOw+NwCW6IxPXoTfzT8Bv4O/oem8OW8t2O5tGPxKyGh0ma +j+Xfgf8FvAzux38OHoOL+H+lqrcd/c13I/61aBVbAK9Hc5lqHyTmH3YN3ov+ +xa7Ce9APXmuI/I/hxfy3Dqvj31t8HyLmJPYALqB92EP4KJr63jYQ/wpeAQ+Q +Zz7VvexGK6n2vQ3NeUwH8V2+bzvXWbiZtbvwaY8bgU/BWaw7sbp2L3fgH9gw +vCTTuYrwsVR5Lb+tjXhfLibav+3VztgD1yLtszvVfd2GX7K+PIhrQX2axL44 +W7++En+CuK1oHXG78D1CP6PfsFnsAmurYvkr2AS+Mlr1mEVBZ7Jam6i9n7UM +zVLNkO3Z9l7Afz2o1mXrDXwYvhFrLxZjZ7N46+9PeCU8mGhtzuv2w8/ht+Q+ +k2h+rO99iebT5uETMWuC7rwKdwTds9Wagl9HOpP5D0Q6xzs/b464FnwJeXrh +0aC+253VfNYtvur/PCVPG/H30SdYI3wPLWFN8Fis/s76WS5hpaA5tJmfYL0T +LXteu/vjxAwEzVgrnJAnhXvgwaA3UuO/LUEzVvGeWm+b/d3tjDQXC+GNaH2m +u7M7tzpl7529IevFtL/lis+JvZVn6EykGbG645Heme1/Cv5D7Zy9S3IO2Xnx +b+b7Pz5Gm18= + "]], Polygon3DBox[CompressedData[" +1:eJwtkr9r01EUxd/3vW++Fk3VQNRBHXStjiFUXUsLUgexqGv/gCSb1EUsFJxU +sNC5/ohjk6EJbcFFE7d2aGKhdnDwJ0pBDajFop/DfcPlnXPvee/dd949M129 +WvHOuTKREp8hp1hzrDMkZompxLmL5H6Rm4Qvgzvk/oIP5Jzrg1+Texgs3oCf +eKs9gPfhj+EZfIhYBR9izz9qOc5IwQtorsGvwzvgXmL6L2hPwzPW29TGiDq8 +TX0ADkQx9pex/2ZqvegO3XUD3nXWo/rJ1DP4Obk/6H8SH8GfiEGwO3W39qh3 +aaS9xXm77H1H7ZuzPYvePDkHLnrz6gL1r/D3xBK5lNwJcpfhx4P13I731+Bv +0QyDf5OrUbtHvCB3LLH3rBCXnP2Bzle/r+Cb8Ca6+/Be7KUZPZpIrCd5dwXe +AnfJ7YOb6M8700irPx4Hj8S/L/D+RvR8h/VZsHkoo6mm5qv8PQhf96Y5HN+q +vfVge0fjeypECXyU2At2hs46iWbbm0Za3SEvGsF6V0/qTZ6/1Owk9hdr4C3q +efiGN4/092e9eVeKZxc0k95mVLMqD+6gfRqsLp16kyfypk3ubrCe8pr1+F7l +NAvz3rQ6Q/P5KJ7d0izDj2hmvP2p7prz9tfyRN5oHr5rloLhD8QP8H8KE3YV + + "]], Polygon3DBox[CompressedData[" +1:eJwt0r8vQ1EUwPFT95WiCK+Jwa+wYhM/UonJj0SQSATrw1pMbHQgJiSInWpH +NVASPwZaf4CWBAsWDBIDbQz43tw3nNxzPufe93rPa70zPRzKE5E6wkt0WSJz +QMIjEqV2lMg4FsFesFtsHevBYuQF2BW9L8uc3cYs7BL7oN5jb5a6lSih94Af +Y0HyAHZGHWbfCRYg78Oa6eXI97FG8grslHqefRdYP1aJnWMrlnmeTd6LNdHL +ko/hu6zPWAZbY88otoM9YWlsFZvCiqivqbfo/VIPWSbP4Ck8rMxvsbA2rBp7 +JY9jXtYOrAZ7Iz/A8lmDWC32Tv6H+anvxMzRx6CjWA5rJ0rxR3yA926w3uiZ +YovsmcBsj5mD7c7qBy/DirFv1hA2SGzST1Mn8QVlZtWAjWCd+ltRR5Q500L4 +sXv6k5z1USeol91v6RDlWJWYe+vZx5S5k75bHPtUZlb6XKF+rzs//d/Qz0lh +R/Rm2NeNLWFJ7BCbxf4BGGRPrA== + "]]}], + Lighting->{{"Ambient", + GrayLevel[0.8]}}]}, {}, {}}, { + {GrayLevel[0], Line3DBox[CompressedData[" +1:eJwt0bkvBGEcBuBvd7G7EolK3EdERASRiE4lOtWWVHQUtESipdFq1P4Dalfj +LKicizjX0UhI3J5B8c7zezOZ75uZr25wNDMSCyFMyItE85NcyG48hGJmWcMH +tvKNXUwnQuhlKfvZyGF2cpw9nI7uW/TdXMYtz5bzQ6/gtp7MC6HSXCU7ekqv +Ni9F+zKt13JZL+K+NS95wCse8ppHvOExb3nCHLO84ynvecYFa+X4KufyLI8y +5732OMM1TnKBo5znAGeZ4RS7OcYODrGBfSyxz5c5zk17xfiZ+PvBG3rcN32r +X7Ie3dc/zavmDwb9HSv6GwulPfoXbGOKLUyymQVsYn50DrHfx0MDoy3raZmw +6HL3f84/YZZAfA== + "]], + Line3DBox[{308, 11, 694, 270, 710, 271, 1018, 272, 711, 273, 1122, 700, + 274, 275, 1123, 701, 276, 1027, 277, 702, 279, 1028, 259, 790, 75, + 775, 60, 760, 45, 746, 30, 1010, 229, 247, 15, 243, 235, 314, 14, 312, + 13, 310, 12, 308}], + Line3DBox[{852, 151, 866, 166, 881, 181, 896, 196, 1012, 231, 248, 211, + 244, 236, 480, 212, 481, 213, 482, 214, 483, 215, 699, 289, 719, 268, + 1023, 267, 718, 266, 1125, 709, 265, 264, 1124, 708, 263, 1030, 262, + 707, 260, 1029, 261, 852}]}, + {GrayLevel[0.2], + Line3DBox[{721, 1008, 492, 720, 1126, 924, 722, 1127, 925, 723, 1128, + 926, 724, 1129, 927, 725, 1130, 928, 726, 1131, 929, 727, 1034, 1209, + 728, 1132, 930, 729, 1133, 931, 1014, 1024}], + Line3DBox[{734, 1035, 1210, 733, 506, 735, 1137, 936, 736, 1138, 937, + 737, 1139, 938, 738, 1140, 939, 739, 1141, 940, 740, 1036, 1211, 741, + 1037, 1212, 742, 1142, 941, 743, 1143, 942, 1015, 1025}], + Line3DBox[{748, 1038, 1213, 747, 1039, 1214, 749, 521, 750, 1147, 946, + 751, 1148, 947, 752, 1149, 948, 753, 1150, 949, 754, 1040, 1215, 755, + 1041, 1216, 756, 1042, 1217, 757, 1151, 950, 758, 1152, 951, 1016, + 1026}], Line3DBox[{762, 1043, 1218, 761, 1044, 1219, 763, 1045, 1220, + 764, 536, 765, 1155, 954, 766, 1156, 955, 767, 1157, 956, 768, 1046, + 1221, 769, 1047, 1222, 770, 1048, 1223, 771, 1049, 1224, 772, 1158, + 957, 773, 1159, 958, 1021}], + Line3DBox[{777, 1050, 1225, 776, 1051, 1226, 778, 1052, 1227, 779, + 1053, 1228, 780, 551, 781, 1161, 960, 782, 1162, 961, 783, 1054, 1229, + 784, 1055, 1230, 785, 1056, 1231, 786, 1057, 1232, 787, 1058, 1233, + 788, 1163, 962, 789, 1164, 963, 1022}], + Line3DBox[{792, 1059, 1234, 791, 1060, 1235, 793, 1061, 1236, 794, + 1062, 1237, 795, 1063, 1238, 796, 566, 797, 1165, 964, 798, 1064, + 1239, 799, 1065, 1240, 800, 1066, 1241, 801, 1067, 1242, 802, 1068, + 1243, 803, 573, 804, 1166, 965, 805}], + Line3DBox[{106, 383, 107, 384, 108, 385, 109, 386, 110, 387, 111, 388, + 112, 389, 113, 390, 114, 391, 115, 392, 116, 393, 117, 394, 118, 395, + 119, 396, 120}], + Line3DBox[{807, 1069, 1244, 806, 1070, 1245, 808, 1071, 1246, 809, + 1072, 1247, 810, 1073, 1248, 811, 1074, 1249, 812, 581, 813, 1075, + 1250, 814, 1076, 1251, 815, 1077, 1252, 816, 1078, 1253, 817, 1079, + 1254, 818, 1080, 1255, 819, 588, 820}], + Line3DBox[{822, 589, 821, 1167, 966, 823, 1168, 967, 824, 1169, 968, + 825, 1170, 969, 826, 1171, 970, 827, 1172, 971, 828, 596, 829, 1173, + 972, 830, 1174, 973, 831, 1175, 974, 832, 1176, 975, 833, 1177, 976, + 834, 1178, 977, 835}], + Line3DBox[{837, 1081, 1256, 836, 604, 838, 1179, 978, 839, 1180, 979, + 840, 1181, 980, 841, 1182, 981, 842, 1183, 982, 843, 1082, 1257, 844, + 611, 845, 1184, 983, 846, 1185, 984, 847, 1186, 985, 848, 1187, 986, + 849, 1188, 987, 850}], + Line3DBox[{865, 995, 1196, 864, 994, 1195, 863, 993, 1194, 862, 992, + 1193, 861, 626, 860, 1261, 1086, 859, 1260, 1085, 858, 991, 1192, 857, + 990, 1191, 856, 989, 1190, 855, 988, 1189, 854, 619, 853, 1259, 1084, + 851, 1258, 1083, 1019}], + Line3DBox[{879, 1001, 1202, 878, 1000, 1201, 877, 999, 1200, 876, 641, + 875, 1267, 1092, 874, 1266, 1091, 873, 1265, 1090, 872, 998, 1199, + 871, 997, 1198, 870, 996, 1197, 869, 634, 868, 1264, 1089, 867, 1263, + 1088, 1020}], + Line3DBox[{894, 1005, 1206, 893, 1004, 1205, 892, 656, 891, 1275, 1100, + 890, 1274, 1099, 889, 1273, 1098, 888, 1272, 1097, 887, 1003, 1204, + 886, 1002, 1203, 885, 649, 884, 1271, 1096, 883, 1270, 1095, 882, + 1031}], Line3DBox[{909, 1007, 1208, 908, 671, 907, 1285, 1110, 906, + 1284, 1109, 905, 1283, 1108, 904, 1282, 1107, 903, 1281, 1106, 902, + 1006, 1207, 901, 664, 900, 1280, 1105, 899, 1279, 1104, 898, 1032}], + Line3DBox[{923, 1013, 690, 922, 1296, 1121, 921, 1295, 1120, 920, 1294, + 1119, 919, 1293, 1118, 918, 1292, 1117, 917, 1291, 1116, 916, 679, + 915, 1290, 1115, 914, 1289, 1114, 913, 1033}]}, + {GrayLevel[0.2], + Line3DBox[{291, 493, 1126, 292, 506, 317, 1214, 520, 330, 1219, 534, + 343, 1226, 548, 356, 1235, 562, 370, 1245, 576, 384, 590, 1167, 398, + 604, 412, 1259, 618, 426, 1263, 632, 440, 716}], + Line3DBox[{293, 494, 1127, 294, 507, 1137, 318, 521, 331, 1220, 535, + 344, 1227, 549, 357, 1236, 563, 371, 1246, 577, 385, 591, 1168, 399, + 605, 1179, 413, 619, 427, 1264, 633, 441, 1270, 647, 455, 717}], + Line3DBox[{295, 495, 1128, 296, 508, 1138, 319, 522, 1147, 332, 536, + 345, 1228, 550, 358, 1237, 564, 372, 1247, 578, 386, 592, 1169, 400, + 606, 1180, 414, 620, 1189, 428, 634, 442, 1271, 648, 456, 1279, 662, + 703}], Line3DBox[{297, 496, 1129, 298, 509, 1139, 320, 523, 1148, 333, + 537, 1155, 346, 551, 359, 1238, 565, 373, 1248, 579, 387, 593, 1170, + 401, 607, 1181, 415, 621, 1190, 429, 635, 1197, 443, 649, 457, 1280, + 663, 470, 1289, 677, 704}], + Line3DBox[{299, 497, 1130, 300, 510, 1140, 321, 524, 1149, 334, 538, + 1156, 347, 552, 1161, 360, 566, 374, 1249, 580, 388, 594, 1171, 402, + 608, 1182, 416, 622, 1191, 430, 636, 1198, 444, 650, 1203, 458, 664, + 471, 1290, 678, 484}], + Line3DBox[{301, 498, 1131, 302, 511, 1141, 322, 525, 1150, 335, 539, + 1157, 348, 553, 1162, 361, 567, 1165, 375, 581, 389, 595, 1172, 403, + 609, 1183, 417, 623, 1192, 431, 637, 1199, 445, 651, 1204, 459, 665, + 1207, 472, 679, 485}], + Line3DBox[{8, 727, 23, 740, 38, 754, 53, 768, 68, 783, 83, 798, 98, + 813, 113, 828, 128, 843, 143, 858, 158, 872, 173, 887, 188, 902, 203, + 916, 218}], + Line3DBox[{303, 1209, 499, 304, 1211, 512, 323, 1215, 526, 336, 1221, + 540, 349, 1229, 554, 362, 1239, 568, 376, 1250, 582, 390, 596, 404, + 1257, 610, 418, 1260, 624, 432, 1265, 638, 446, 1272, 652, 460, 1281, + 666, 473, 1291, 680, 486}], + Line3DBox[{305, 500, 1132, 306, 1212, 513, 324, 1216, 527, 337, 1222, + 541, 350, 1230, 555, 363, 1240, 569, 377, 1251, 583, 391, 597, 1173, + 405, 611, 419, 1261, 625, 433, 1266, 639, 447, 1273, 653, 461, 1282, + 667, 474, 1292, 681, 487}], + Line3DBox[{488, 682, 1293, 475, 668, 1283, 462, 654, 1274, 448, 640, + 1267, 434, 626, 420, 1184, 612, 406, 1174, 598, 392, 584, 1252, 378, + 570, 1241, 364, 556, 1231, 351, 542, 1223, 338, 528, 1217, 325, 1142, + 514, 307, 1133, 501, 705}], + Line3DBox[{489, 683, 1294, 476, 669, 1284, 463, 655, 1275, 449, 641, + 435, 1193, 627, 421, 1185, 613, 407, 1175, 599, 393, 585, 1253, 379, + 571, 1242, 365, 557, 1232, 352, 543, 1224, 339, 1151, 529, 326, 1143, + 515, 706}], + Line3DBox[{490, 684, 1295, 477, 670, 1285, 464, 656, 450, 1200, 642, + 436, 1194, 628, 422, 1186, 614, 408, 1176, 600, 394, 586, 1254, 380, + 572, 1243, 366, 558, 1233, 353, 1158, 544, 340, 1152, 530, 695, 712}], + Line3DBox[{491, 685, 1296, 478, 671, 465, 1205, 657, 451, 1201, 643, + 437, 1195, 629, 423, 1187, 615, 409, 1177, 601, 395, 587, 1255, 381, + 573, 367, 1163, 559, 354, 1159, 545, 696, 713}], + Line3DBox[{692, 691, 690, 479, 1208, 672, 466, 1206, 658, 452, 1202, + 644, 438, 1196, 630, 424, 1188, 616, 410, 1178, 602, 396, 588, 382, + 1166, 574, 368, 1164, 560, 697, 714}], + Line3DBox[{693, 686, 492, 290, 1210, 505, 316, 1213, 519, 329, 1218, + 533, 342, 1225, 547, 355, 1234, 561, 369, 1244, 575, 383, 589, 397, + 1256, 603, 411, 1258, 617, 425, 715}]}, {}, {}}}, + VertexNormals->CompressedData[" +1:eJzdnHdYFcf+xo+ILWpERaw0FUVBjCJGMRzAYEGNBRULKootGhERC9hAsHcs +aLAAsaIiWMCWcwA1kNhQsGAFDbFHQECl7m9nz7x7Zs+zXmOuuff5Xf7IPLxZ +Z2fenZnvd3c+g7mXj9tEPYVCUbeKQlFZIfzk1+jnrGJK/ifPkf+PZfuwKPI7 +1y4syoHRucK9d4leyJeMHnTjdPcqav6X83ypZK7/8/QfrYj+mC9F3aXTzafh +a7oT/Qpfirpxn8MDWhUNU5dznBlfKss48pPr2HfKD388XDJFncdx9/hS+Yrq +7auX+RU8mKNO57hpfKlMonqKud2pbycvVh/huEi+VE6lukL2J+8/ocNH+Ar9 +Q/4ftNFct9BG6n/rIo3/l3X8Pybn/5MnlaqckfE/09fjDzn/Awz2DZTz/+ir +W/ly/vveve0j5//SqOaq/5L/GJcYp9DhI3yFb/6qA9Yqbfn3/HcJ7nNTzn+b +YrdKcv7/or/7uZz/i6YVuMv5b9Zi7ys5/0dfODRXzv9d+fE/U//P/EP+036K +8x46fIFPH/HfbEDXOb1V2hK606D2Mv73fMwp5fwPamN9Tc7/nLUWZXLrTwuF +2Z9y/jfcmedG/W/D+u99dEoR9T+V9f/ka+951P9hrP/1kiuf/kz+o91YR3X9 +P/Zp/ou+Qpddf266n6yleU5Os9j1/yfLb23k/N+4MfOZnP+Nv6isJzf+zYY1 +fynn/530voOp/81Z/5NfzS+k/t9h/T/aced86v8I1v9hyd5Yf2L/ov9CO5i4 +JPGfWUcl/jPzXuI/M06prvFR66tG3z0ieV/zm0oVSuh/DHueRJ6TW1btl9aM +/+8i59Ug9V66uLCc9X/m1YZ3SDsmcdNPsv43jK1Wk7S7dsXGLNZ/ryW+r0k/ +o6qcu8T6P6/SzqHE/+gjXWxY/1eMcioj/g+eorrJ+n/Ka+pi4n9Vh9Y/sP6v +flGqJv6Psj9/lPUf6xrifJn2uQj+M3FJ4j+zjkr8Z+a9xH9mnAo6fISv0GMi +ts/vmtZRhRK6Z/Sg5eQ56fU/a8iuP3n1zTuSel/c2JvN+h8VHSqM/41rC/ax +/rdfaF+LtPt8zPgbrP/LGrzNJ/2098z+jfX/+6yQkcSXBBMnif9rv171nvjf +b+qbS6z/Dc4FLCT+n3kwUrL+I04gb3ql4z/ivK7/TFyS+M+soxL/mXkv6BiX +GKfQ4SN8hb4y6njUAAtHFUro3A3/5uQ5hZQn3mPXn6nzj7Ug9bY1OnOJ9b/m ++apCO7Z42fzE+v+q7QlD4v/+FyOvsP47NzQsIv10UEy8wPpftrXdCOKLefQq +S9b/uLywCuLjtjMDL7D+I+4iD9X1H3mTrv+I87r+M3FJ4j+zjgo65jnmPXSM +S4xT6PARvkK3+WWJ38A4JxVK6A0Sbr4mz2mAXkga67/ehuSFpN66bZP3sv6X +2vTPJ+2o66u3l/U/O39RQ9Lu6BbvUlj/F71YIPgfMNYkmfU/btCTccQX+5IF +rVj/kUcir5+q4z/yUF3/kTcx/gtxHXFe138mLgntwbqJdRQ65jnmPXSMS4xT +6PARvkI3uHvzZNdDDiqU0MPHxywm130zeUEG6793qqkPqffwifMJrP8Xp3HP +STsWp3uGsf5fTH9vTNpd+V1uKuv/2bC+JaSfQy58l8T6r5D9yRP9R16v6z/y +UMZ/IU9C3sT4L8R1xHn4jziEuIT7Yt3EOgod8xzzHjrGJcYpdPgIX8X5Mr1r +hh0fd1FCt7pTHkmuWzRY6cX6n2SX4knqzfX3jmX9nz/XpYS0I2v3m0jWf/Ny +dzPS7mT3zYms/x/y+V/4L+SRyOsZ/4W8E3ko47+QJyFvgv+I64jz8B9xCHEJ +98W6iXVU9JnOc8x76BiXGKfQ4SN8hX7VKfBA67bOKpTQly1TPiLXpcV0PMH6 +P7xg8mJSr8+El3Gs/8WpdpXO8O2oHRW/Uef7wyf5/DH/kdcz/gt5J/JQ+I88 +CXkT/EdcR5yH/4hDiEu4L9ZNrKPQMc8x76FjXGKcQoeP8BX6ufYXZze16q5C +CX1D0KOb5Lqvl75dzfqfuOmc8FxzXu89Lv3+8Hl8/hf+C3k88nr4j7wTeSj8 +R56EvAn+i3Gdxnn4jziEuIT7Yt3EOgod8xzzHjrGJcYpdPgIX6EvG71i+pBf +nFQoobsoZv9OrmuUr/dA5/vbP+rzh3Tk8cjr4T/yTuSh8B95EvIm+I+4jjgP +/xGHEJdwX6ybWEehY55j3kPHuMQ4hQ4f4Sv0buvuNeg6xVmFUuvDh74LJRl4 +Hwkg79HHpx8JYN+j/1H/Nx9pHWts7qxCCd1tpnX0VL49fZ0e2k+TtAftQ3v/ +3n1RL+6jvf5D320+rX6Xk+lvva47qVBqr0+qVG/2OP5+SYMMZo/72/V/YdM7 +3pD/92dXjdteV6hPrJ/Wi/v8vfpRL+4D/ZuHPc6cslqiXsxxJ/lS2ZmO83Z9 +PdRyesrtPio5fW0fL9l6RsefiJfTp7vXlL0+ZNn2U3L6pKuBP8vpZ+udOy2n +f6o//9/1sGN3k0n/J/tmJxI//ld8QH/Qv4/1C+MA4xrXQ8e41tUxrnV1jGtd +HeNaV8e41tUxrnV1jGtdHeP648+x9/XT4334dWGUMmienzivK7jALm1W3lBV +cO9a8aWDVn9U72FIOK/v3B+jDNfmpdxy53f1ylXFXERbvhT1Mm7Y9+fnXVeV +cR7t+FL7Hs2Zen3fuZm6lEt040ulVvcc5r/1vaqUCxzFl+L1Xz3N7aWsa6cu +5zy/4kvxekvvlastrjfk46vPHL4UdadaCUOr5bjyumNbvlRy1Icgn3Wd/O53 +UFdwjk35Urzeantdx9PDPNTvuaz6fKksQdxffqfZoC49+esjSgd26Slen+iQ +URAcPludyZn+yZfKFHp9yxn7/LdkTFYXcOu9+FKZS/XTJ/r7eqUHqhdyif34 +UhlMde/kZjPrDZulfsA5evOl8grVM7qNejtgyCL1as40nS+Va/9H5qNCEXft +iH48/1yzn/OlON70g8JcOjktdtAPmvLY8tViUS/2DH/cpW6YqjjCYl23J1uY +8eZYdibzMhlv2/lS1GMf1TlS3LSQH2+mG/lS1Kd77417/EN9/jmahvOl+Byn +NCuxGzigHRkPtfhS1Lu1j7Xva+rO67E1+FL8PvO818iyvs0nqYs40+d8qcyn +utugtu+i6vupH3Oef/KlMoPqaRmr/R1uLVCHc4G+fKnc9refY1LJO9cnfH8G +Wr13faL1TTHDuEVEkoO+YuxgvhT1L5O+X7R/2kqHWk4Nv8kZulrUSwMXdK7+ +PlRVGnh+69BOoVrfnucPzj2bws+75fdfn00R9aEml1OLnHLJfFzPl6Lu9EPX +zY61vyTzYj5fir6tsx7taffGic9TZ3TnS1G/NTuz6QzXIcT/Yh/XIcpy6sMI +69wVer4T1O+4rAl8qSzAfBkfOq/DNV/1U44bzZfKO1SvvKzXu7bD56ujOcff ++VK5+6N+RtL2xc0k7dX6FiT0R19hFkX6B72GYoXQ/xqKN87ED+hVFN8MrRgY +6lBFoR/geS9U1LvoLZzj8OVq1Xuu6GLfEytFf7YUhnQlz6OMu/SyOf98xOdy +KLoLeX4VXCJ9nhp9qneN0EbHW/Lty/TjS9G3t78XREbEKtV6iiQfvhR1kxsW +ii1+bryfA+5v9nNTVlAfGr00qHM60YtfxxKLTiV6KYvgT0xySdKaGeqXXNYf +fKl8SPVjKdPmN7oboE7gAj34Uhkj+ukkzAdrl35dyPzAffUUZsL8GZCz4BiZ +T9CrKcyE+dbgQdpRMv+0+op5ZH5aXglTnOXnK/SKB0ONA65scdjcP+vb4jZh +ol6SdX2DzYBgle0wi6Y2D4JEf15NajElll8vjN5tttCsHxrdMrHJzBL9yuq9 +RnOH8KXoT1en2xZzg5qrg20sKvOlqPd3N11zY1439WGjXcP5Ujs+H019cnrn +QLUqs9ZFvhT9bGs74kefL8epG6i3LeJL5TuqX5jzR3nkxunqkJhHN/lS+TvG +Z90yRdVR/uqyFrYvqozyVyZQnaPxo6XRdiGeaP10EuKQ5y1rWxKXtL7NEOLZ +o2q1NpL4ph2HQUJc/HFd4WwSJ6HP27ekCYmvy58XBpB4C32MbePWs/qHO8yL +uHPXaFa4qBtZGx4O2TlT5XzpfW7muhmin426lPRYv/W2alm1nLJ1W2+L+t1e +FQ27pSrUtzK75dinKkTfLDrPjL/5nZk623ziGr4U9fQT+rNr9OyiPtinWMmX +ol45vtl21frv1Ovc7o/lSzEuD61s6dTvzBh1+37R1flSWUx103G33yfWnKb2 +ubHqCl8qn1G9mMZpleUrIW6XaMetEO/T+64dRuI/6q+iGCvkDXlclf4kj9D6 +mSTkH2uPecwh+Qj0qpdCrEge49b5jQfJa6Cv6njBhuRDVZe5dyP5EfQTr+eU +OZzc5dDlXIThhFu7tN+X+rdsOZH//ZZ54jby/8XxufvOYPLv126IrsbmV2Pb +jxtN7tffO6P8LZNHHbkXv460r1/IEzs2X7o7ptcY0p/gNv4t2LzI58HECaT/ +asPQ1mz+YxEV8x3xKyJ4rSGb5zzjEu8Rf9vU3Z5H/IbP/DpSlTyPM9Wa25Pn +g+eir8geTp7f/NCpW8jz5EQ9qAd53ofPRXqT54/2FE6eGUbGx2HzHTFkvEC3 +m74tj4ynOb971SLjC7pLE4Uw/lJvTOpNxiP0zFx7k4tLfRzWjGyaO3eKNl89 +FN662v7gcFVuwGijHEdtXrqq4mIUmQ+THrrVZvPPsrFVo8j8GRx2piubZxrt +qRZD5puhycXhbD5ZUGfdt2R+7nhgVZPNG8Me9WxP5nNh+o9v2PzwAhfxlMz/ +La1f5PKlGutANhd4j6wXm1MnPyfrB9aNci4ikKwvvUyiN5L15p12PP9K1iP3 +HKccsj5hXdq73mokWb+SRpctJ+sZ7jthrrEeWe9ePbjaiqx/4njTd+lB1kcP +5ZdBZL2Ebjhq3wyyno5SuTeJZfIxG852dtucIAfr0y1dO/YOFvXeCw+/t7cM +U7kkpfp2SdPmY9l+Qx3J+r7J2daXzceSVtz/lcSDZjPdvdl8rEPHn1NI/Jj5 +wmMBm4+lhngOI/Gmx91GuQOYfGyZ6Yuc1U2ClZ3uryzlS/Vo6sNJztGLxK2a +Ld38SRxD/HrNeT4lca6xb2gxiXuIdyVc4isSF2dcWS7EScTHOuMMhTi68/AF +Glc1uvWi9tNI3O0W1mE/icNoj9mhZ5NInP5pfMGPmrit0eOOb79D4voSg+oe +bJ429tnyFyQPONinw1w2T4ub3ySuSepKh42d9qT5lK7S5iH99tS6kxGqisze ++jZ4uDZPc3QrG0jyEvXtl+Fsnrb7kk0FyWO6HD3rxeZp9Sa3vkTynjPzdvVj +8zSF7E+eY3nwIbsbV4KVIbGnvuZL9UDqwyGab01vW7uE5F/Iu55xgV4kP1v/ +ZqiQryFPOxX5YgbJ57rn3BXyO+R1T9c9KSX535WQWSYkH0QeeKBtHUeSL7Yr +HDVBkz9q2uO0rc4w0u4Nixap2Pzt8o3VU0g/kxqXlLD529ol0yKJL0GBgaPY +/G2++47zSwaFOtjcinC8fVebvw06N/Phy1qrVTa1TlaKiNfmb38cy11FntPV +jo4v2PxtypguU8hz9b6cfIvN3z7k54f03S6V/JotDlGuszGcxZfqb6kPOzhu +MnlP8BmZPoe8N+B9YV/I4GzyXlFz0Loy8p6B94vb9YyekPeQoclB1fvx7yV4 +H8mZqjYk7y15e5YoyXsM3l8GJvbJI/Oqu2njAWxedy4oaz6Zh6edA8+zeV3K ++6+mkXlbsXJOCpvXRV8tmEjmeWjV193YvO5EyYOrX/+yxeHkstyX3Tpq87or +JZNMO80IVpV84dvd8mdtXmfwxs+OrDuHr3/Zi83rPtXPD+lBCTY55P05wWhQ +OXmfxnu0wdl7U8j7drmBeRB5/8Z7d1hq2RDy3m58sWYgeY/H+/tRpXEBWd+t +jzdqx+Zv961XCvHA9UJpDzZ/87/sKMSP6ZXjTrD5m7eBwdck3jyZ7XuQzd/0 +Y5rXJfHJZNXTn9j8rdFJw+jTfDzbNCj2+bVgbf427cVq0ws/+Kk21s507rDY +5z+2b1K27uxE8v1i5MDMheR7Br5jHFlr+JJ8B8l6f7ycfBfB95BtK5PrkTxj +77cDhrJ52shr/i1IXvL4zqFpbJ7mcaRRM5LHtMrOmMjmafqJzi1J3mPqsyeS +zdMStto/I3nS9bnlIWyedmLVniJLPq9KD/tzFZunKRQbtrVaTvgDlNCDftPs +lwSN1uFgG9H9lXs6HPJ5OQ4wLEHxVo7DjD7fWZYDfxZ8SZYDd1ngmifHwWb/ +kT1DjoPdGep69p/lkJ28Nb4knWb3lfQUcVX6TbRVoWTq+SSu+E7e6kQ5P/2t +jPTluMrOE3Jkue7ypDayXPGSLfl/yvm5p9/Ps+T83Oj6ClxxzD/EFV+n/W/+ +V/jhci5xc3yxswql9vrIcjmf7xZy7eV8rv9KT/b8wi99YxRyPp8cG/dKzuf8 +gfmUX01szfpsUGb6RuNzYBrr86o7tQI0Pgd6sT5PNR189jPxw7Q/SQmfxgmv +qMdyYpUUBpHmj1xUKKFvSFpzW+Pzqcaszw+OX7OX8/mnBOcMOZ83juwly8mP +S46S5YTjdrWhPkdYsD43THsDTvga67PdgSzKaScOZ31u4WxyRuOz46m/6LPQ +vhoHK+nJ8ajHH229LOfztD85O6nPke/JfvQPh0qPsOM5zSknfsFWJxVK6I1v +nw8g192cWzCI5QFiGh5sQ+odcbp9Ouvz2yd17pF2BJg+OsX6nLk0pTpp9yql +TTbr85QMW4E7XPpt18usz22nzhpCfB48bIeEhzwcNvEd8Xl2tcmZrM/HFxkI +HIBpmusY1ueFyyIEbkN/cpc4HZ+F59rq4EFZ7nfHCaWszxdXNUyX83nW0qjO +rM+JtleciF/dGvaJY31u9fKdx4GMbiqU0A29En4k495y7bcGrM+hPWq1I/Xu +y3DKYX2+2fF4DmlHtan1DknO3fikCrxg1g9bMlmfCy/b5pF+Tu94/SLr8/HN +fsOIz0f8u0m4X9cMt1Lic2h0nwzJ+tz/VRDxudnR7yTcNdb3I7eXyfK9X5iF +PpPz2SzMqEKO760xJvg+63Mt6/UPSf/PFc01Y32usA+wE/iKaSEz2XXjWcQY +p7IRnVQooa/OrV+HXLdpctZj1ufV5v2F9ehulaJrrM8hd+wFzu+E2/vdrM9f +DplrQHy265d1jfXZ2t28gPRze9P0VNbntd/ZCNzVoOR0a8n5pqt9i4nP7p0q +LrI+Iy4i79DleBc2GDtUzuds8+sv5Xyu6GvIsT6nRESrSX+quuY9Zn0efKXX +W9L/eIc99Vmf3/y+vTZZZzPWJYSz4zlqUnvP7WucVCihpy1Ul5LrmjlvTGd9 +dn1W6kHqDQ+ukHBclQMOviLtyJiyTeLzCrukBsTn6kFFF1mfDfrZCLxUv+Gb +zrM+d4x1EXx2KegtWTeQT7QZO2qGHK+LfETrc4TACz086DtEzuefrMxfsT73 +MG34iLTvfeoEyXmN/OYDj5P+KHu8lYzneqOrC+M5y2nwV6zP8VFfXCd+vWnc +p4j1uUXKTyGbtilVKEV/gncIecn4RxXXWZ9PHZoxh9Q7xqf7EdbnNvs2vCbt +2D57aQTrc5Opxo1Ju4OG20l43apJRm9JPwv76Ut4aeS1a/OX6HKhgs+Pf0uY +LfVZk38gH9H6HCj4/P5rEwmX2+zcCiEeNK4+VuJzaZvU+6R9O72GSLjojs9G +Clz01X5BEi53c6+gg6T/PjGBM1mfK325SBiXXf3f7WB9btSwsPfciUoVSuhe +u4aGkutGj34Qzvp8+asxU0i9PcZUPsH6PCfWQPA5c5n+j6zPDba5mJB2lwbn +pPwVLvcIF3iC+LzN+LqOz1mexOebJhMDdMazkH8gH4HPC53thLxwqEtbyXiu +tsNV4J8PHXDLZX0euyU4g7Tv6THX2qzP3XP37yH9Wehskcf6XKVeyDHS/41d +f5X4/Ed4/BqBP49x3ML63Lystuu4Pk4qlNDbNTES3mdGFRUHsT632mvzPak3 +reCyhH9eHdW8lLRjaWUryXj+kJ8f9lmT7/baNOmMzngW8rYTG6pIOFvkH8hH +4PPhVfZCHC06dUtyzmJkwVcC56y6OeIN6/PKHeeF+ab3o4WEs7WYVz2c9Mfd +OOMl67N7WjvB53GXl09kfd4X1EXgPDPbmySzPk8dOb9ByCpnFUro1XtMfkiu +i97d4iDr88RetoGkXnV896P/BGfLj+d44nOn5C5nWZ9/SZg+VvC55UUJz4n8 +A/kIfK48Y2U74vN8oxESntm303JhnTK65iPhadudOyr4vGHkyGasz6O2lO4g +PgdsalvI+hw73VrgadcYbp3B+hxm0mwv8avPntL7rM+2Z4uPR193VqGEvixv +k/Cecrxeo7D/JE8baxct5LsXDSpLuFlbi1lC3rbefnoQ6zPyD+Qj8LlhnFpY +n+fZp41lfR79crHAzR5+2bCY9fnusYRzxGenGD9T1uc5zW8I6+AZU1U567PH +8HxhnAXm/jaP9bl9ZNdI4tfCsT3vSM7tOv3cZLtPuEqRdD4izy38s/v5W4c4 +dc/7TiqU0Ac1abVBzzHc4XLa2g0rQrTf/a5/1XCOVdl2B78JDxq1K9vOvGd1 +2q/5fU0a+f8fu69B9mFf8t0Z36Hx/dnya64T+e5fRvcB8P3/d4NtJWTfZain +SR7Zh8H+y+fy4VN1cG5mT/0k/FvK1O8I76cMutZHwukd3DrkrBzn6ffGWZZH +/W/1q22zmwly7eloM0iWUz3X9apsv/B7nYvrZblE1xv1ZHnCB+eO/UVu8EM6 +OEJwhdAxLjFOoYMDAxcGHZxTUol0nwUcT6SEO9JyKk4Sjgu8BafD74EbKNbh +/bT735r9cOyDYx8X+7oJn3mcgKcEX6nVNfwleEzo4OTAzYk65cDAhWl1DecE +7gk6OB5wPdDBo4BPgQ6uApwFR30AHwBeAJwA9rmx7439buzXYv825jP7Cd4U +/Cl08KngVUWd8oXgDaGDnwNPBx18GHgx6OCfwENBB8cDrgc6eBTwKdDBVYCz +gM/gA8ALgBPAPjf2vbHfjf3aQ3+Zl5PXweOCz9XqGn4XPC/js8BlgtMUr6fc +IThE6ODqwNlBBzcGjgw6+CfwUNDB8YDrgQ4eBXwKdHAV4Cyw7w8+ALwAOAHs +c2PfG/vd2K/F/u3f5TzBMYNrhg7uGRy09noN5wruVftcNBwnuE7o4BTBLUIH +hwcuDzp4MvBl0MFFgZMSfaZ8D3gf6OBUwK1AB28B/gL+gxsARwB+APvf2A/H +Pjj2d7Hf+zFeGvw3eHCtnxpeHPw45h24YXDEWp81XCw4WW09Gu4THCh0cI3g +HKGDzwOvBx2cGbgz6OClwE9BB/cDDgg6+BXwLNDBYYDLAI8BngB8AbgC7Jdj +/xz75tgPxv5wsOibJu6Co9eOQ03cBXdfIl6v4bDBZWufl4YzBnes1TUcLbha +6OBEwY1CB+8I/hE6uD1wfNDBn4FHgw6OClwVdPBA4IOgg2sB5wIdfAZ4Dbzv +gD8AjwAOAfvr2G/HPjvOG+D8Aa7H+QScV0gRfdZw7eDctd8bNdy2luPWtBNc +spZT1ujgbsHhQgc/Cp4UOjhIcJHQwfOB74MOLg2cGnTwVeCtoIMTAjcEHbwL ++Bfo4DnAd4j9orwC+AWMT5zTwLkNjH+c68A5D4x/nBPAuYF80X8NBw8uHvMO +nDe4b7QHHDO4ZtFPyuOCz4UOrhScKXTwkeAlRR8o5wfuDzp4NfBr0MFdgcOC +Dn4IPBF08DHgZaCD/wAPgvUW515wDuZj6znOXeAcBuICzhXgnEGB6L+Gm9dy +9BodXDg4cdQPvhm8M3RwuuB2oYM3BX8KHdwkOEro4P/AA0IHxwauDTp4LPBZ +0MEbgT+CDp4GfA30D/mJ8yo4v4J8BucxcD4D+Q/OG+D8AfIl8PTg6+EzuHBw +4rgv+GbwztDB6YLbhQ7eFPwpdHCT4Cihg/8DDwgdHBu4NujgtMBtQQeHBC7p +Y35+SMf3F3yPwXcYnG/BeRfk7Ti/gfMcyPNxPgHnFfBeAM4e3D3mF3hx8ONo +D7hncNDQwe+C54UODhVcqugz5SnBV0IHFwhOEDq4N3Bw0MF1gfP6uz5/SMd3 +Lnz3wvcunIfB+Ri8n+K8B85/4H0W5xZwjgHvv+DvwePDf3Dk4MrRHvDQ4KOh +g+sF5wsdfCp4VejgLMFdQgdHCK4QOjg5cHOf22d8N8R3RHw/xDkZnJvBdxWc +98D5D3yHwbkFnGNAXAZ/Dx4f9wVHDq4cOnho8NHQwfWC84UOPhW8KnTwl+Ax +oeP7LL7Xav0BPweeTvQNHNh16T6IyDNJOCKGy5FwRAxfIuGIYignocvFYX9a +l3/DPut/4e+afhI3yHBIEn8YnkbiD8OFSPzB/rGuD9gHxb7o5/dB5M8k/WU4 +Kkl/GR5I0l+Ga5H0F/u12L9Fv7Dv+O9yd1quS8N5QWf4JEn7Gc5G0n7sd2L/ +E+3Evh328T7WTvBP4KGgg+MB1yPel+7/YT8Q98U+Fva1cN9vKfcDDgj1bKD7 +W9jv0uWUKiiXqst1MHwlfBaeH8MJCjr4NvBu0MFpgduCDt4I/BF0cB4JlPuA +Dl4B/AJ07LtjHx469o+xnwwd+6DYFxXbT/fzsL9XJvqj4UfBk+r6w3CRQj3g ++W5Tvg86uDRwatDBV4G3gg4OA1wGdPAE4AugY18c++TQ19P9Xez3Qsc+JfYt +oYPjBNcp8smURwSfiOvB1YGzE8ct5cPAi0E3pNwDOAjo2L/Hfj50f7oPjX1p +6NhPxf4qdPCRbSgvKf7dYMr5gfvD9eDVwK9BBzcAjgA69r+xHw4d+7jY14UO +jhBcIdoDHg58HK53pfvo2FeHjv1g7A9DH0j5OfB0qB/7xNg3xvXiPjH2jaHL +/nw+HfvE2DeGjvNyOD+HvAvnu8p19nlxHkl3X/hT24P9ROy76u4zYt8VOvZx +dfcxsY+Lfd2P7Utiv1O3Hux36urY7/xP7//iftjv1fUH+726OvZ7oX/onIj2 +HAvOtWjuu4BynH/1fIRCe+6lUZEsPy89p8DwoJL8ClwjOMePnRdQaP/u9/nT +n8Tzi+chBJ3hUCV5EcNTStoJLhCc4Md4e9TLnPtBe4T2M+daJO1nzmdQXXOu +QHvOQKODlwU/K7aTcp/gQKGDXzSmPCN0d8rhgcv7GN8OX5hzS2i/0F/mXI6k +v8z5Ekl/mXMSgg6+H7w/dHDA4IKhg2cF3wodXCY4TejgC6tT3hA6ODlwc9o8 +RDMfntPzWLp5CHPeSOIDc25G4gNz/kPQcW4B5xigg78Hjw8d3DM4aOjgd8Hz +QgeHCi4VOnhK8JXQwQWCE4Q+j/Jt+pR30+WZH9HzZ8hvwVuDv0Y9eG/EuTRd +XhfnrlAP+Gzw2qgHnDG4Y8ZnmR/hvsJ5LZzf0t5Xc+4I55BwX/Df4MFRDzjm +k5Rrhg4edzzlcz/Wnn/RTs17Fz3/pG2n5twOzvGgneDRwaejHnDVlpSzhg4+ +GLwwdHCu4F7/bvs/3C/N+SKcN0K/cE4G52bEv19KeXrw9agHXHhTyolDv0P5 +ZvDO0MHpgtuFDt60BuVPP3d/cc4H537QX5xXwfkV9BfnBGzpuQHML/Du4N9R +P7htcNzQwR+DR4YOjhZcLXTwoOBDP7cPH9IruLx048xdqgquf4el8dp91TJu +/Xfke2MZ97Quu69dyvVqQb73lnJZrViuoI131A/ke3u5zt+La7HLVuBnKnT+ +Llw168ZDyPfWCp2//7Y/Y1G+3N9te7ti+hyyb7dA5++zfS4fykwfZpZe2aUq +yxpntT9R60MFt95N83f2ntZifTj6KKsT8aFCx4ftBgv9iQ+VdPiWsslB3xEf +KulwRCt3ry6S6+98244B9O/RTfon+lvJrM6q3lm7VJWyZ5h7HNH2937hb2NJ +f/UUzyT9jSko6kH6q6/IlvQ3+UC9WXI8T6My72LSrzuc5yO2XyeTnwjPcREX +OP3f6Zf54jM5ZNxWUjiuWsKMW/05czw07f9Jn23/ux9P9ZRrv3X0nRLaznts +O71fR83R+B845a+006prTKVvbvHzaF1I/ASGT+i5zWwUaY+75YqqbHtaPRwr +cAJn907MZu9bceHxAnLfWTvtx0vu+01elv21XaqYG1VcJ6u09afs7aUI4esx +y9v/QlIP5TcivkzuxX6Hr0K5wCKjx6PY/Q59Oi6DmzZ1Y/ebnqdtHkiea1mN +HgHsft+zL5ybEh9HHLjUh91Xze6nbET6mfvecRS7r92yr1tg8O1dKsOKpAem +Cdr2m75bKuxrNG+wJpfd1/imShMfUu8+i0aSv7OUfcl0E2nHoaPXOrDjbU8r +D0/Sbp9DN03Z+eVy8PEk0k/ro9tasutMJUVQY+KPybKfXVh/9BVJNuQ6q3mD +RrL+7Fv/sj2pd9amQxJ/4gZ49iXtMH74TQjrT8muRlWIP61PF41h/fEP9uy8 +/+YuVc+GzptKmHFy41jt1cQHw+rTC1gfzu8OnUr+vbvPD4WsD0tU3baQ+xUu +rtmO9eG3ZrFepH0LdxlLfCjlHIXxcGxDk55sf43P/SqMhyQPBw+2v5tXurYj +//7C797ubH/9lTccyP1surovY/u7JaiNMRn/nfTfWExk+nWm3a5g0q+E8RPy +2X55eu3wJv1q5Xc8n+3XN/PNd5J6n51sYMP2a57zUOF5Wf2SJWl/oe/s9qT9 +A39dMoZt/7JH7m1I+01npo9g2z/QYUt+KT8Ot906u3gvs268qNlrubBuWG2S +tLP3geOLSDtXG3d+y7bTOu2xMWnPs/a2fdn2PH2R2Y60x8DJZDzbnl3HCk3L ++fXqyPULl/ac0N53o/uKLeS+lzZMltw3qaq6Cal/pqWVZB+tRw2T/lv59p8p +PT/rC2Ye9aDfGfJ1vg+U07heTuM8rt9J14UyHb56Of3OUKBTD/IA5AWoB/Gy +nMZP6AV0fdHX4ZCN6XxT0PmH+9an3xkKdL4zlND4WkLzDtSPeIz4DF2PxjPE +N3G+0HVNXyf+tqXzHPMe7TxB50k5nTdoZxP6naFA5ztDGc17LGkeJPpD2x9L +8wWxnTS+It5CRzxrTuObOH/p+vuUrsfQsR7tp+sT9HN0PpvR+Y1+daDzJ4jO +J/Qrln5n8Nf5zoC8DXmctp2aeL+D5jvQEV+P0HxB219NPEZ8Fp8jjZdtafyE +jriCOAPdhK6zx+i6Cz2FrlNb6bolzne6LmCdgA/P6bxtR+cxfCin+WhVmp/i +egUdN8jjUH9V6gPyIF0fkHdAH0rzgB40L4COuF6JxnnoiKOIq9AtaVxBnIHe +ga7L8+g6Dd2croMr6LoIvS5dp57RdQv99aXrDtYh+HOb5qn7aJ6OfKM+jesW +NM6jfuTryN+DdepB/ot6kAcgL0A9iJeIn9AVsj/CfYW8GXk07ptJ81Ejmp/i +vgdonuFA8w7UU5/G4wwan6Hb0ji3lca9j7XnQ/pCmgfH07yYaaeQj1rR/BTt +PEzznsc0D0I9w2l+kELzBeiIu4jD0BH/EA//bvv/Rb+EvBl5NPqFfBf5L/qF +vA15HOpBfrOM5jvQW9O8YSzNI6AjfiOeQ0fcjaRx+HP314/m6xzN39Hf5sjL +aZ6O/iIfRX6KebeA5m2pNI9D/U9oPmRP8yPoK2he4kLzFOipNJ9YT/ML6Edp +3uBA84iP9ev/AJwRAlY= + "]], {}}, + Axes->True, + AxesLabel->{None, None, None}, + AxesOrigin->{Automatic, Automatic, Automatic}, + BoxRatios->{1, 1, 0.4}, + DisplayFunction->Identity, + FaceGrids->None, + FaceGridsStyle->Automatic, + ImageSize->{286.36438931902404`, 284.07431712721205`}, + ImageSizeRaw->Automatic, + Method->{"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "RotationControl" -> + "Globe"}, + PlotRange-> + NCache[{{0, Pi}, {0, Pi}, {0., 6.782151672921413*^-8}}, {{ + 0, 3.141592653589793}, {0, 3.141592653589793}, {0., + 6.782151672921413*^-8}}], + PlotRangePadding->{ + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, + Ticks->{Automatic, Automatic, Automatic}, + ViewPoint->{-1.6161626810947027`, 0.047578608802071265`, + 2.9724996996166815`}, + ViewVertical->{0.87807368658937, -0.02584982621015127, + 0.4778267336642624}]], "Output", + CellChangeTimes->{3.8018893661301403`*^9, 3.801889452390252*^9, + 3.801890317612669*^9, 3.801890465042478*^9}, + CellLabel-> + "Out[109]=",ExpressionUUID->"7f6e0222-0c66-4741-a2ef-0a7907009d3d"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["The Weak Correlation Expansion", "Title", + CellChangeTimes->{{3.800180264022499*^9, 3.800180275478266*^9}, + 3.800250590117984*^9},ExpressionUUID->"f8469860-fa97-4a60-9e16-\ +c7b467058037"], + +Cell[CellGroupData[{ + +Cell["Energies on the real axis", "Section", + CellChangeTimes->{{3.80018028757023*^9, + 3.800180288745204*^9}},ExpressionUUID->"256f249a-892f-4165-8448-\ +4758153da25e"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[CapitalPsi]1", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]2", "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]2", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]2", "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]3", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "1"], "[", "\[Theta]2", "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]4", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "2"], "[", "\[Theta]2", "]"}]}]}]}], "}"}], + ";"}]], "Input", + CellLabel->"In[25]:=",ExpressionUUID->"c903323c-20ea-4825-b68d-ed54a1640c47"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]1_", ",", "\[CapitalPsi]2_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], + RowBox[{"2", + SuperscriptBox["R", "2"]}]], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{ + RowBox[{ + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], "\[CapitalPsi]1"}], + ")"}], + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], "\[CapitalPsi]2"}], + ")"}]}], "+", + RowBox[{ + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]2"], "\[CapitalPsi]1"}], + ")"}], + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]2"], "\[CapitalPsi]2"}], + ")"}]}]}], "]"}], + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], "//", + "FullSimplify"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]1_", ",", "\[CapitalPsi]2_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], " ", + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{"\[CapitalPsi]1", " ", "\[CapitalPsi]2", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + FractionBox["1", "4"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}]}], ")"}], " ", + + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}]}], ")"}]}]}], + ")"}]}], "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], "//", + "FullSimplify"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1_", ",", "\[CapitalPsi]2_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], " ", + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{"\[CapitalPsi]1", " ", "\[CapitalPsi]2"}], "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], "//", + "FullSimplify"}]}]}], "Input", + CellChangeTimes->{{3.800180559308094*^9, 3.800180578338317*^9}, { + 3.800180612067296*^9, 3.800180612401112*^9}}, + CellLabel->"In[26]:=",ExpressionUUID->"d4535ec7-8743-4bd9-8dc9-a48c2508f7ff"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{"t", ",", "v", ",", "s"}], "}"}], "=", + RowBox[{"{", + RowBox[{ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1"}], "]"}]}, + { + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2"}], "]"}]}, + { + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3"}], "]"}]}, + { + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"T", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4"}], "]"}]} + }], "\[NoBreak]", ")"}], ",", + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1"}], "]"}]}, + { + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2"}], "]"}]}, + { + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3"}], "]"}]}, + { + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"V", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4"}], "]"}]} + }], "\[NoBreak]", ")"}], ",", + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3"}], "]"}]}, + { + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4"}], "]"}], + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4"}], "]"}]} + }], "\[NoBreak]", ")"}]}], "}"}]}], ";"}]], "Input", + CellChangeTimes->{{3.80018063715947*^9, 3.80018070274148*^9}, { + 3.80018127753087*^9, 3.800181329450368*^9}, {3.80018152300445*^9, + 3.800181527549115*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"93a4438e-3901-4102-a0ed-49f488288f8f"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"t", "[", "R_", "]"}], ",", + RowBox[{"v", "[", "R_", "]"}], ",", "s"}], "}"}], ":=", + RowBox[{"{", + RowBox[{ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"0", "0", "0", "0"}, + {"0", + FractionBox["1", + SuperscriptBox["R", "2"]], "0", "0"}, + {"0", "0", + FractionBox["1", + SuperscriptBox["R", "2"]], "0"}, + {"0", "0", "0", + FractionBox["2", + SuperscriptBox["R", "2"]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]], ",", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["1", "R"], "0", "0", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}, + {"0", + FractionBox["1", "R"], + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0"}, + {"0", + FractionBox["1", + RowBox[{"3", " ", "R"}]], + FractionBox["1", "R"], "0"}, + { + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0", "0", + FractionBox["29", + RowBox[{"25", " ", "R"}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]], ",", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"1", "0", "0", "0"}, + {"0", "1", "0", "0"}, + {"0", "0", "1", "0"}, + {"0", "0", "0", "1"} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}], "}"}]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800181587571941*^9, 3.800181589803165*^9}, { + 3.800181639078681*^9, 3.800181645061007*^9}, {3.800181755208486*^9, + 3.800181768374488*^9}}, + CellLabel->"In[20]:=",ExpressionUUID->"421b263c-0954-47e7-9e6d-3e92847ba093"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"H\[Lambda]", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{"t", "[", "R", "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"v", "[", "R", "]"}]}]}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{"Eigenvalues", "[", + RowBox[{"H\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}]}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8001816879075527`*^9, 3.800181723344047*^9}, { + 3.800181773164462*^9, 3.800181832710696*^9}}, + CellLabel->"In[21]:=",ExpressionUUID->"5bbd100d-b730-4596-b1f5-29dc4abf48e2"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.80018191521989*^9, 3.80018194152212*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"cacfdf0d-2f8b-44f2-b8fe-35d081abf0aa"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwtlHk41HkcgJ3zXWS2knZjybGjdCgVZmP3882Tsh4qV/QkJumaiEclunZ5 +xjGtmMdDiZZ6yJFyrHg6hu8vdxuLxq0m4xpnhp8c49r2efaP93n/fv95DX0D +XU4rKSgoOH3lP58qEEysrCDKDNaPrKxIyboFHRPrRUQFzRvHzMulpOrAY6+Q +OUQVFpub0F+kxET88u2YDFG7Njv5Do5KyciqvoxOCaLYa3hd9e1SEsS18Cyu +RBTum/z7foGU3GJ1UWeiEeUS3ZC320dKUlKNExqYiApt5AWcLR8k6Z9iAp3V +GFRLi8bIm5MDZH2T62FTbVVKjwpcZ/VDP6k74rr/HUuFKrlQpfrtx15ib8q6 +bGykTHFizWWdERKyN98rq3GHEjWXcD2GQA+R3z6jtctUkbLTE+7eWfmRfJnN +TPLepECxk3z7s7S6SZVRwp7ygGWi2lkhc0noINaqvxVv9Vsk8wy3if6uVpKI +raz23ZSTaoX0X586i8ipB54DI+lzxOz6O/OfWptIY7a+mmLKDLlJnL/3tKsn ++qsKzUnpNDli8Dsvx6aWqBsMNg4/mSJB7qtbq2rfEH+3yOScHBlJ+q42oqPj +BeFUfnqnnzBO3M/mJs6XPCNGPy87V4cPE67kHrdvrYDkniuWvC4dIA6HopLb +fJOBSxd5/ZEiIQMhLO9YZhGY3VI9xjDuJhUeGWLH5tegFdaicTdVRNJU9OZS +xyug3c9/S0FfDdHkRz2o9q6Dq9e2xL1Nyif1V27weZca4Ek8G2fufAbZhR7b +vayaIe58eBsnohZsbSjj1aMi0Jx2tP7aDSqLF8vjgtqg53LNnhBeNzxsHjuz +aVsnfH7pVHG1TgJpJvxweVc3ZEU/4vjxB6Cq4AJOPi4G1kyeVmjqMJzMjmNs +5veA+K+NZdbnxmFaoA7nGyTgfq8nZlQgA/arpMKDGn2Q9ji2zPHuFJy/+I3p +br9+UDkeMK4aNg3PbNJo5awB+IeTm+3CmwFxkm61REkKJZo6J2b958BITTiU +aT8EJimGQ8hRDhuEF+xUY4ZBHsJbynNdhMV5pdzg3hEYlesyc9jLMOVc5l3N +GoOHZ6NbdI0VcOseH10WbxwE++pjN7AUMddj9RqjD5+BGZhnW6mthNUcgrdF +MGVQvv9FWamOMm7Z3iQKE8pgKcDH8ihTBeekwY/93pOgiN7f37qkgo8WWK7R +W54ES/vgCgcFBg6LfBT+4ckUyD88HdKeYuCsIb1UpiMN+/3rBE4zDBzxZyRH +fIiGOwt97Eg5A3u7jLPynWkw0NHlTyshrC0UFjp50HDQg28q0kKYF3+8JtaX +hsTm01yBBcK+lvcn1cNoMKvRH1MPQ1ift84eZdEQ6r430fYmwnL2Dc32HBre +9LvbXAtHuG28731WHg1uyndih/kI3/EoPnGgiIbreGFbXQrCi1tcLkUKaah7 +1R4QKUS4qzk+TVlEw1oHWruMQrg0avaUqJUGr05m+XQVwgnWPqYZHTRMzNox +/RoQdnhs9txWTMN6i+f5tmKEX4Y2vA0fpoFT1Xj0Wi/CSdst4p3HaMh1HV0u +GkQ4qPeBm+EEDTbBRocNJxDe7Oj/iZqmIUrxl1lPGmEVxZZMwSwNTYJj6YJZ +hHtKrLkcOQ06BlcO1i0gLORm7Ni5RMP//8L3Nmp8WVmh4V/1inmj + "]]}, + Annotation[#, "Charting`Private`Tag$5815#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwt1Ps31GkcwPH5DuZJZbaIc2LJZUeolEoptc+H7SKHalBYYly6aSatbYsu +Ws5M2JQ5Dl1o0SaXiFpxqjWeb4WlssolmzSMKbnmNhgzg909Z394n9d/8LYI +jfQ6yGQwGJ7/9p9hpeLhuTlE22Oj/rk5NVmiNrZ21iD6xLRV4rRKTap33Ak8 +pUT0/TIH6/EJNbGWPq4fHEH0WhvP0J4BNelfKL/9ToZop8XC9ldtanIiwtGv +7DmiQT764kapmsRy2ulDCYj2SmgoWhesJhmZVqkNbERHNwoFh6tUJLszMZKr +y6JbWhb0Pw2ZJkavvffYGurQpnTkko1fK0ndXu9tLznadPmxap2vPkwSN1vO +SStLLZqX7DDyLn6CbC4JzGtczaSVqWcTCVYQ1S+HDNbaUvRvbOnS67IxMjGV +mx60nEHfdHeIak4aJdWWqeurBLMknh8SbbtrhDjrXChbEa4h0yyf4Y/tQyQN +Nm50Oa8iNYzsXcXcARJ20+9Tf7aS2J996bCptZc05pvpUhmTpKrTZmGxZQ8x +W3jfgVQoiM0icPXJkpP55j2NfXfHyCO7xIhueRfh+4iuFxSMkBeXwlz4/A7C +e9750ix1iLT62x2MFbQRy62z3Jq4PrJK4yUIZDaRwiNlsj8qPhEBX+rv/rme +RIw/CLyUISOO+uXffe6WEPtYHX+W1XsykRMlevUkhxjEtCy4mtlMRr7ppTv5 ++bgtnG9XKq8lJvp6my5JaHz6jN2V+vQScnVAqa/7+QW+m+IEuWvu4d0hpd8/ +Ot6ErxyNe8uL/xOLon/eaf62DespPJyLuc14nvLDOVNZB+46Wbv+lPA9znkz +eGj5Shn+8tjz2ek6Gc6yTopTtctxXsItXnjSJ1xdegyuB/RgzmSRQXRmH362 +21Rvr34flv6+TOJ8ZAj3WRjGNmUM4H3XuhIHxCP4h5MrQlKMvuCsO8kSj6tj ++OjxebbrwkewdoBgSCdGge9tyRrXyhvFf/EK872Ek1iablIjY47jcj3jA1N8 +JbbSrezNdVNg6wyLXuShwksrj23XSZzAqlPCmSJvDdZMMwujuifxgMqEXeA0 +i8e4kqAajhLnHE5oMbFiQOv6YBOOcBqLXV4lL+VQEOG7aLFlhwqzI4tcnxsy +QT/to5+2qQZXbXskqTDWgoKAnPzx6Bk8IwjesJ+tDdytF9zqJLOYQk03Vsxo +Q3GQwHKzZg5vcIt65s5gQYzoVlzHXQaoOop7DcdYkNdrmsn2oGAbv07sOcmC ++F9FPOluCi6r5U4iFQuCvIY4JVwKzI1NkhRMBIaVlfc9fSnY6Ztk22yAQJgS +UJscSkHam4MRYkcEoRtujM6PocC+1mxwfgwCM+ESN5RHQfS+zWmu5xGonM7p +tRVQ8PTjvi1n4hC8HZI35RVR4KN1ObkvCcFl37IDOx5QcBbUK+syEGjsvH4U +VVJQ96RNIKpE0P4mJUurmQJ993FDCY2g4uJUWHMrBYHv2FWKagSpzsG2t/+m +YHhqOzu8AYH7HfuHrlIKjBwflrhKETyObqiP66OAV924/0w3gvRVjincQQoK +vQdmH/QgONF908dimIItUZZ7LIYR2HjwO2kFBRepb6f8xhFoUy254ikKXov9 +s8VTCLrKnSN4KgqMzX/aWadGUBlxe/WaGQr+/xdcW7ZgYm6Ogn8Aa9VmlA== + + "]]}, Annotation[#, "Charting`Private`Tag$5815#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwtlGs01GkcgI3LvKfb7G6M3UZHgx0ttVTr0lL93iTJIeWWFsW6JJG0upiu +dmmQ2klol6Q2Sqi0WVLx/jG5pHEvidyVO/mPGQbTtufsh+c8356Pj87PoU7+ +ykpKSg6f+c++D4Tjnz4haun11euuGSuIxixH33IOUa8HLIMDDBVEZJPpeWwa +UQ2dpQ/X8BREv6OoemQCUcbN1vuecxRkaHHvrdZuRCUdzLUeV1OQw0Gm7o/K +EdX3pfnGre3z5AzvLRUgQJQJ1xfJY+ZJSqpegpj1uadWsyymZ46kd8aE7lrA +pNBArb8bf5Zo1js7GrDVKEGgpseUoZxU7XS2ruGpUvYBsXf0e6eJrQEvXE9X +hVpzpvBx7TkZsbjvebvOWJkq7PJnHjKXEnlcgPo6AwZ1+YsV8ZxmCZmSZSTt +XalEZVSWJnIjaCLSTTApCVGQs4wtHnvNJ4ml2tlHq/zmyI+ZfxU0tk+QRGxu +vvm0nChr0M63zMeJ7zX3/qH0adLvmHI1rXKE1N3RXsBIkRK75a6vfjIYItqL +89aSAglJCr1n+z35QBZy39cNZk8Sr/zeIVXDfhLsEv1HVtYEMYk6X6KV00O8 +yztrtBNGyTdHFVu9fLqI7kbFrueRg2TkmVdSWF8buRv4qPtpQT/R3573ZCas +hQTRDz0vpHST78SdbJviRmJ0Rm0PU6+NFOWm8oP4L4l6RPOi5NQmMubULdro +ICItfsGGD3orSPz+0favPQrJcb7hpeqk+6SSj+9teHGdZP++HmesuQdvaqwH +CSMNLh2IfO39ayVcuS2dObmoEJZI7C1zdzVBeNPU4Y78MugKrzA5FtUGrP68 ++CWOL2CsyKHseFU3TIpltr7iergtuOntF9sPeT6Xsh31moEnzVE/kToIB3nn +bGvzWqDj7xXFloGjEHahmnwleQuuV7tihoUTkPHuVIVAqwOuZ8YX2ydPQk9B +cgMu6QJVj5BRtQgJSAyfOnzr0AO13nfvOEVJwej5WTl3phf+WcLxkgVPg3hl +1TAnuh/0U3QGkL0cgpsfS22ZH0B+LGo+x3kOnuRvt2NnDsCwXIuVtV4BeZ03 +4gp4Q3Bjv6BZS08Jy51aozmiYRBufhm/jMfARaxF5eXuo8AKzbEqZyvjILHH +2t/qx6DE+nFxAUcF3zzJxit+mID5kH1mbixV7HlV4xfx+AQwUOOfq+ZVsV1M +XNyqrI9gZnukzE6JiZfrGPGTQydB3p47wJ5kYguHczv0DWiwDq4SOkiZWLzb +rM5nNQ0XZ3vXR8uZWNr6xibNmAYuRytWoozwK9NJjoYZDdt2xxo0qSPsEt7h +xthCQ2KDf5DQFGF/eQv3rScNRhXaIwsjEJYUlGlGC2k44WqRaHUaYXtd7ily +hYbSPtcN/EiE9w69ezOTTIOLysX4wViElS/HnDiURsNJPLu6KgVh31ezO3dn +01D1pCUk+hnCrdY+B1aKaFhqR7OLKYQ/1vrZ+FTS4NnKKpGIEH764RMn9QUN +47KtLD8xwhYuC3NYDTRomubft+pAWDO9NmDqHQ3eojo3fg/CTmtHlYy7abjr +PKx4+B7hRquShMA+GjYc0XXUGUfY1DI6rW2IhvOMTTJ3GuGM6khN9hgN9cI9 +6UIZwsH6mwQ7PtLA4R7dVjWLsPrN4nGBhIb//4XDBCo7S2U0/AtVWH0x + "]]}, + Annotation[#, "Charting`Private`Tag$5815#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8DdcYjP207rvxT7GiY7 +/AfAjC06ev9I67/ERqVcdvgHwM2Q/g0jQ+u/Jt65yezwB8CGSpnwaTfrv+oM +46PZ4QfAomALofYf679wajVYs8MHwM6feKYL8eq/fiXawGaHB8DElCX/I5Pq +v5qbI5LNDgfAvvBftAvX6b+f34hvUQkGwBKkDbrRPei/FtBTTykVBcAU5a38 +0b3mv8hQU0TLJQTAgxV+Pl5D5b9IKSV0IyIDwBQ7eeBXpuO/Oq5cps8vAsCh +le2YPiLiv/qKZhMyKQHA7IDtymV64L/196SVXicAwHiHQkkVrd2/xCKSNL5t +/r9zmiMkN5bavzsFf7MrZPy/wFjNfjQz17+UQDc3QX36v0ynjZi+/9O/Y5xY +5eqf+L8T5WhTsdHQv8+nHgkBmva/Xam+2qehyr8eDLAxv7b0v+WVHHYG+8O/ +CiDmz+mq8r83xA75d0O5v2xUhZioqPC/k6duzd0Ipb9gw9/LHpLtvyOa1nOa +aIw/Ij3+UcWB6b/UcmcgjjCzP6los+G7tuW/SFMmczgWwT9q87Fci5rhvxc3 +TptGbsk/Ln4FWQYj27+6vuvSa+7QPxN51AuWm9O/WJfxtnf51D/XZGwqr+PG +v3r6XDeLetk/d3oqjsmVrr+BxqJXnsvdP6qPOECkMK0/Nd7sP1kQ4T+OaYHW +YILHP4WrJs+Gd+M/DfRMO6xR0z8BvdwxcsHlP+B0xjR2hNs/u4ABAT9I6D/u +uU3Cd8jhPzBxPqj4zeo/poehYGSJ5T9B+4XQzjDtPyX2qxN4m+k/7sP+8IDP +7z/esh+9O2jtP5z4qIo6JPE/VZfgiOuQ8D87nzSiT13yP56ljL1MlvI/q2Fw +T9az8z8EW23tBXn0P/ooCe679fQ/zmCpp1KE9j+FSIF/51T2P7UNGl33bPg/ +vp76pqae9z8mmiHoB0z6P/5a3Gpz4/g/+naE/atT/D+xaJ2VQ0X6P+v6Gw6o +OP4/82s+gruQ+z+gZ4fUGyMAQFg2npwk+fw/kEHMjBklAUCJ5z2/Elz+Pw5v +q0LDFQJAIzKRAQio/z++RLi9thoDQDpZau9oiABA/W1fNlYOBEBu42G0LjEB +QAEH0pkr/QRAi0i8W/DWAUA2SHLCSgAGQFuPl9wUiwJA+tys6BXyBkD2GT0H +cDMDQERsyJBN9gZAWQFcTmA2A0CN++M4hfoGQO+sBJpQOQNAIBobifQCB0BX +2Os+MT8DQEdXiSnTEwdAx2vdvvJKA0CU0WVqkDUHQB0OsJV2YgNALsYe7Ap5 +B0CPelmSgZEDQHhVOpRCfQdAkLEkZ3KUA0DB5FU8eoEHQDG6P0BjlwNAVAON +jOmJB0A2QF7/RJ0DQHtA+yzImgdAtVAMsQipA0DIutdthbwHQFf+qOCQwANA +EkrzFb3AB0D5JaH5gcMDQFzZDr70xAdAPobNFnPGA0Dv90UOZM0HQFYpvF1V +zANAFjW0rkLeB0CYtsEdGtgDQGDEz1Z64gdAJlosWAvbA0CpU+v+seYHQBG+ +vZb83QNAPHIiTyHvB0A2G04g3+MDQIYBPvdY8wdAq8BJa9DmA0DQkFmfkPcH +QPR+ZbrB6QNAGiB1R8j7B0BLrp8Ns+wDQGOvkO///wdAxqf2ZKTvA0BtpGMU + + "]]}, Annotation[#, "Charting`Private`Tag$5815#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.032488628979857055`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4BHHxSZGPbIaUtXT2i5KzKeF +m5HFAbkaAl0= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJnIGYC4intrVGXbfQc0kBAjcPhSeLCayb+eg7RqhEy +52w4HcDyMXoOMWA+l4Opzd6gaYl6DjNmggAXRH2+noP/E89LpsHcDqI9Xq9Y +pug5RIDU1/BC1O3Uc+iP6PZnLOB3eJ6l/W36XgOH/yDQr+jg0PTo+IzTBg7d +Np670h4pOhxuWx5+6pGBg/K1R8EMPEoO3ifYbWeLGjrsza95O1NUyeExyL54 +QwdjEFBG8MsPb3OduVbJ4QwI5EDNn6/k8HXnra6/obj5PiDzv+rB9cP4MPPX +qz5pnrdWH27/5w0B2bPUDRzc1xxdzsCh5NAN9K6Jo4HDym8vK858UHRYfH8f +3xxnA4d0UHguQ/A/LFqvcHYGgl99/8ct425FuP6zIHfXKDo8iBDfflFBD2J+ +hKDDm+Ktor+1tSHh8UcBYu4xLYcVIPsElBxSYu+4Me/QgrjPVMnBBOTuyVoQ +919Wgvjzvyacf+Kw09rMeZoOwpWTSs5uUXQ4vmtHL1sAlP9EAaI+XsOhVYFd +9cwXGQe/ixNj/imrQdwzQ9BBR1H+S06YClz9nEXKO/+4q0DcJ6Po4AtS76zi +EM4p1m7sj+DD/Afjw+L777fSB3MKVeDxzcTZJZ/8TgUe3idA7tugCo8PGB8W +X84TmoXSspTh8ekC4nsh+O9B4d6hBHHvEiitogjXD+PDzIfFG8x+sLt0lODx +DVaXDNV3RRGS3nqUHNYK6fCl6yk6BN6SrkncpALJD5P54f7Z4rXBYk4lN5wP +tieNG5K/ZFTh+e/X29cHLJnV4Hyw+TpqDjd4b4ullnFBwitQzaEXlJ8MeBwS +QoLUF6xUg9sHVn9G0+FNW2630W55h7Wg9Mur4xDy9vLHGY3CDqlg/+lA0p+3 +gIMIKL9u0XEIBskzCkDSf6gu3H708gEAPVDUdA== + "]], + + FilledCurveBox[{{{0, 2, 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}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJlIGYCYpl5cZqnC8wd7Esca0/f4XPYqJe3mDHG3MH/ +iecl08n8DraVEStMz5o5mBgDwWYehxdZ2t+m65o5MICAA7fDqcNOazPrTOH8 +GAXHj8l7jOH8/yDQb+TQH9HtzxggBOdX3f9xyzhbEs7njw24b8Su4NDIcrTf +cLqxg/OEZqE0KyWHA7WyFukqpnB+GgiwmcH5E4JLVKa/N3N44BrvOKtREc4v +P7zNdeZZBTj/QPe+JhNmeYj55uZw/kwQsDR3cF9zdDlDhoLDwbbl4aeczB3W +CunwpfMpQvydbO4QzinWbmyv5FCyVfT36XlmEHfvh7rnm6mD8rVHwQx/lBwi +xLdfZPBD8G9K1yQatZrA+d4n2G1nHzV2qAb5f7aSg+qT5nlntYwh/n+u6LDk +/j6+OcpGDt02nrvSNik4aLzl3Wcw09DhTVtut9FsWTg/SjVC5tweCTj/Psj/ +HwUcvuy81fWX1djBDhSfMezw8IPx/S5OjPn3GMHv8XrFYjLRDOKPZRwOhWu6 +b2cYmMPjDz19AAD7ft9Y + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJNIAaxQYAJSjNCxZiR+PjEcakhlU2JOcToxeVmSvTS +wl+U2EWMmQB8+QKp + "], CompressedData[" +1:eJx1lGtIFFEUx9cU23Jd87k+yV01gkR8pbMzNzpG9sLUkmiptbJ8lWVCUlpJ +hOCHtrAi3TQpSmELXVTSokilTHrYaprYptGGCkYYPSgzjMw7d+8dSjxwP/xm +5p7z/58z96r3Ht6a5SiTyRxm167ZtWB2nU8rDDXOxEMMjhANPOtcY96fz0Hb +4ZOfqrw14JrSeCnLysH6hi6TTK6B5L4L+j+jHBjQxvvZI2rGOdmzcTSYcRWO +e0sYm4ZMo1GdLhA2VnrVMsSBDAe4sHpW12GfrMnFUHne7XhcAAczODok/t7+ +tTWnUg61tnZlzW0OWjc1cTX35IDLZk9y8EIMOZx26iqPitcyflhm2v58jcSi +z1KJjTj/sJbla4rIr3UIFFi9/7mw1Xu6O1li0Xfl/FzQYBjOfYlYPcr6MF1g +z28F6FR3+2TvEJTrDCkOBUvAGnAyI/qHnVM9oK0kiMupk/gcntc1BDvx/gfu +UIH1X0EwUXbIEC24Q8k0X9BzGZH6Pu4Qivt9BsHmsY39Kz3diI6D9veDCsJJ +iPgvVtj9IriL+ZcL1OF+HxFgdWFCSXeNCyThedbyjMXvwyVWVQwsyl3As3mP +ZVwfjO3QwjmsP1LB2Ja4O6E6ypfMeUYLnsUXCy1rfYn/RN6uyxdQse7mSrPE +e9LfrnPUCYxpv//J1yGA2SNcmfNORfT0C7AB/79TPvZ+2+cz6AWx4n+PGFP/ +NN98LJ4Hq8THbVNDMXl+c5jmz8I6nYNYfcpUXybmZQFEf69A9r3yh+WfXNsj +nwnk+Sl/5k/UG+fP/Iv9mPCDpKcLV13ZJsB7rLfPj/SvjWesD074uk8vsahH +yYMRn9c3fmw+NB9lt/RUW/QTNbz2+JbQ68wTHlfDdrw/goeQwZE02YQaxg+s +mDRaJD676aNT7BaBMfUrzntAzfp1AverXk3+tzREfJaroSV+6lHmDgSfbzQG +W4okFuerlNgL53u8lJyH+rks6v0ZTPTfQaw+PY9ivWsa4nc3IvfXLQ18aUrN +q1YhONZ5J7HKrAHThw0RM80CYwW+H4skJudBYtoPmq8Fv0c8qV+ngVP4vFq1 +rL7op1riZvx9ksT0PqX76f1N6/1/n/8FX7mtFw== + "]]}, { + Thickness[0.032488628979857055`]}, StripOnInput -> False]}, { + ImageSize -> {46.16461270236612, 24.508064757160646`}, + ImageSize -> {30.77640846824408, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {31., 17.}, + PlotRange -> {{0., 30.779999999999998`}, {0., 16.34}}, AspectRatio -> + Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-1.8866235694821438`, 2.492012776162457}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800181925714662*^9, 3.800181948411865*^9}, + 3.800182395263035*^9}, + CellLabel->"Out[31]=",ExpressionUUID->"1303c429-d8a4-4db5-af15-805751f0aed4"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Plot of the coefficients", "Section", + CellChangeTimes->{{3.800187742016594*^9, + 3.800187744146961*^9}},ExpressionUUID->"199c3e6a-3658-459b-a32b-\ +de545b86b670"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800187513233877*^9, 3.8001875150940742`*^9}, + 3.800252835246128*^9}, + CellLabel->"In[72]:=",ExpressionUUID->"322c1b80-08e6-45ae-9fd3-61c806283984"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {9.546283751456929*^-8, 9.54628375145693*^-7}}], + LineBox[{{4.893885699864604, 9.54628375145693*^-7}, { + 5., -3.419259259259268*^-7}, {6., -2.8750178326474514`*^-9}, {7., + 2.657436268861461*^-10}, {8., -1.3431262746532756`*^-12}, { + 9., -1.9027717544520693`*^-13}, {10., 3.6925954123340565`*^-15}, { + 11., 1.1159091652520284`*^-16}, {12., -4.816680254756593*^-18}, { + 13., -3.269600709255155*^-20}, {14., 4.9143343403488594`*^-21}, { + 15., -4.0029261522283654`*^-23}, {16., -4.1116729286621945`*^-24}, { + 17., 9.871991212293757*^-26}, {18., 2.57850174196834*^-27}, { + 19., -1.3568896514359788`*^-28}, {20., -5.673254558301484*^-31}}], + LineBox[{{1.9944750431861284`, 9.54628375145693*^-7}, { + 1.9944751984220623`, -6.063551819537473*^-7}}], + LineBox[{{2.9920526642923857`, -6.063551819537473*^-7}, { + 2.9920805389987626`, 9.54628375145693*^-7}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {4.773141875728464*^-7, 9.54628375145693*^-7}}], + LineBox[{{6.453132536495969, -6.063551819537473*^-7}, {7., + 8.304488340192101*^-7}, {8., -2.0986348041457245`*^-8}, { + 9., -1.4865404331656893`*^-8}, {10., 1.4424200829429937`*^-9}, {11., + 2.1795100883828923`*^-10}, {12., -4.703789311285762*^-11}, { + 13., -1.5964847213160376`*^-12}, {14., 1.199788657311744*^-12}, { + 15., -4.8863844631693536`*^-14}, {16., -2.509565996497954*^-14}, { + 17., 3.012692630704896*^-15}, {18., 3.9344814177984474`*^-16}, { + 19., -1.0352246486175476`*^-16}, {20., -2.1641748650748604`*^-18}}], + + LineBox[{{1.972972508559169, 9.54628375145693*^-7}, { + 1.972973267956575, -6.063551819537473*^-7}}], + LineBox[{{2.961527966929543, -6.063551819537473*^-7}, { + 2.9615549839526465`, 9.54628375145693*^-7}}], + LineBox[{{4.871353413114757, 9.54628375145693*^-7}, { + 4.875949213788101, -6.063551819537473*^-7}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {9.54628375145693*^-7, 9.54628375145693*^-7}}], + LineBox[{{9.570598026074808, -6.063551819537473*^-7}, {10., + 3.6925954123340283`*^-7}, {11., 1.1159091652520287`*^-7}, { + 12., -4.816680254756563*^-8}, {13., -3.269600709255202*^-9}, {14., + 4.914334340348835*^-9}, {15., -4.002926152228276*^-10}, { + 16., -4.111672928662182*^-10}, {17., 9.871991212293638*^-11}, {18., + 2.578501741968344*^-11}, {19., -1.3568896514359666`*^-11}, { + 20., -5.673254558301723*^-13}}], + LineBox[{{1.9473675166678552`, 9.54628375145693*^-7}, { + 1.947368995494383, -6.063551819537473*^-7}}], + LineBox[{{2.9259158200062267`, -6.063551819537473*^-7}, { + 2.925941836398845, 9.54628375145693*^-7}}], + LineBox[{{4.775833562839908, 9.54628375145693*^-7}, { + 4.776854093511802, -6.063551819537473*^-7}}], + LineBox[{{6.508704141564319, -6.063551819537473*^-7}, { + 6.536919171069466, 9.54628375145693*^-7}}], + LineBox[{{7.9176947950862555`, 9.54628375145693*^-7}, { + 7.97360897702265, -6.063551819537473*^-7}}]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2ENoFQeogIPC8UKZ44Vr9kO4HA4uehOj +uhRsoeoEHIye5azWfvHCDsIXcfi+TFXB7tO0fRC+hMO21DXq1ps0oHwZh2Wm +as+YnD/ZQvgKDlWforSeLyjfC+ErOVxte6xbetxrL8wdkce/nnFd+MEGwldz ++NJTmPFLZAGUr+Gw4Ngf9w6zsD0QvpbD7wf5TQ99Hu+G8HUcTO2PnBcw3W4N +4es5rD2vmW1l5AGVN3D45fRbk/GRMJRv6GBnM31jau8+KwjfyOFv+GV/985M +KN/Yod464ZhRg+ouCN/E4ZDHzYOFzMt3AgA3ilgZ + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2EMZDjBa53ihzPHCNfshXA6Hd3tmVYSZ +JEHVCTi8EX4rm1RqDOWLOMgeTVk9IYMNql7CofbTW9OJqvv2QfgyDvt483wa +7q62g/AVHNYtfvBlXUcYVF7J4YGK6+rwN/5QvoqDQYDw4ivHJaDq1RyYN4lo +VXx5awvhazjEVDNt+Xf75F4IX8thymbViW9Fa6B8HYcffHdV4qRLoer1HLae +sFzD2qQNlTdwCNz9/m6IowyUb+hwyKfq2mml1zYQvpHD7Tdugdci90D5xg6+ +D3cKzbk2dw+Eb+LwZfv6fOZvznsA5KJZag== + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2KPSDA4yxwuBaM1+CJfD4f6eWRVhJkVQ +eQGHa8JvZZNKg6F8EYe/R1JWT8gwg6qXcPD89NZ0ouq/fRC+jEMHb55Pw93f +dhC+gkPj4gdf1nVsg8orOfSruK4Of7MfyldxeOsvvPjK8RlQ9WoOyzeKaFV8 +qYXyNRxYq5m2/LudCVWv5aCzWXXiW1EdKF/HYSnfXZU4aVOoej0HlxOWa1ib +fu+F8A0cLu16fzfE8Q+Ub+jg5FN17bTSbVsI38jB+41b4LXIPVC+scOGBzuF +5lxbC1Vv4lC3fX0+87fkvQCjK1wL + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 20.}, {-6.063551819537473*^-7, 9.54628375145693*^-7}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.1`", "0.5`", "1"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800187517971747*^9, 3.8002528409585867`*^9}, + CellLabel->"Out[72]=",ExpressionUUID->"a53c8364-c0e6-4893-876b-6076df4fde18"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.5", ",", "1", ",", "2", ",", "3"}], "}"}]}], "}"}]}], + "]"}], "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.5", ",", "1", ",", "2", ",", "3"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8001876171444817`*^9, 3.800187620245058*^9}, { + 3.800187673002173*^9, 3.800187678678154*^9}, 3.800252849248801*^9}, + CellLabel->"In[73]:=",ExpressionUUID->"3548fd3b-492c-4629-9c62-ecefcf188899"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {0.0021156556875429285`, 0.004231311375085857}}], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBmIQ/dhG9pWaLbuDdG6T7Z7LWfsZwIDD4d2eWRVhJkn2 +EL6Awxvht7JJpcZQvoiD7NGU1RMy2KDqJRxqP701nai6bx+EL+OwjzfPp+Hu +ajsIX8Fh3eIHX9Z1hEHllRweqLiuDn/jD+WrOBgECC++clwCql7NgXmTiFbF +l7e2EL6GQ0w105Z/t0/uhfC1HKZsVp34VrQGytdx+MF3VyVOuhSqXs9h6wnL +NaxN2lB5A4fA3e/vhjjKQPmGDod8qq6dVnptA+EbOdx+4xZ4LXIPlG/s4Ptw +p9Cca3P3QPgmDl+2r89n/ua8BwC8Wlpj + "]], + LineBox[{{1.9709144971688772`, 0.004231311375085857}, { + 1.9745661147303721`, -0.0032747913902092646`}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {0.004231311375085857, 0.004231311375085857}}], + LineBox[{{3.065442678612758, 0.004231311375085857}, {4., + 0.0011876543209876542`}, {5., -0.0003419259259259259}, { + 6., -0.000028750178326474624`}, {7., 0.00002657436268861454}, { + 8., -1.3431262746532542`*^-6}, {9., -1.9027717544520651`*^-6}, {10., + 3.6925954123340283`*^-7}, {11., 1.1159091652520287`*^-7}, { + 12., -4.816680254756563*^-8}, {13., -3.269600709255202*^-9}, {14., + 4.914334340348835*^-9}, {15., -4.002926152228276*^-10}, { + 16., -4.111672928662182*^-10}, {17., 9.871991212293638*^-11}, {18., + 2.578501741968344*^-11}, {19., -1.3568896514359666`*^-11}, { + 20., -5.673254558301723*^-13}}], + LineBox[{{1.9433598102762344`, 0.004231311375085857}, { + 1.9504708550012508`, -0.0032747913902092646`}}], + LineBox[{{2.871346069422438, -0.0032747913902092646`}, { + 2.996447782177357, 0.004231311375085857}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {0.008462622750171714, 0.004231311375085857}}], + LineBox[{{4.069370050230298, 0.004231311375085857}, { + 5., -0.0027354074074074073`}, {6., -0.000460002853223594}, {7., + 0.0008503796060356653}, {8., -0.00008596008157780827}, { + 9., -0.00024355478456986434`}, {10., 0.00009453044255575112}, {11., + 0.00005713454926090387}, {12., -0.0000493228058087072}, { + 13., -6.696142252554654*^-6}, {14., 0.000020129113458068827`}, { + 15., -3.2791971039054037`*^-6}, {16., -6.736564926320119*^-6}, {17., + 3.2348540804443793`*^-6}, {18., 1.689846901616374*^-6}, { + 19., -1.77850240393015*^-6}, {20., -1.4872096429314468`*^-7}}], + LineBox[{{1.8923836395248455`, 0.004231311375085857}, { + 1.9058946245023767`, -0.0032747913902092646`}}], + LineBox[{{2.8112532370484766`, -0.0032747913902092646`}, { + 2.92772724547547, 0.004231311375085857}}]}, { + Hue[0.37820393249936934`, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {0.012693934125257572`, 0.004231311375085857}}], + LineBox[{{5.862958907000721, -0.0032747913902092646`}, { + 6., -0.0023287644444444444`}, {6.746622583223943, + 0.004231311375085857}}], + LineBox[{{7.299360739017851, 0.004231311375085857}, { + 8., -0.0009791390542222222}, { + 8.721399003122832, -0.0032747913902092646`}}], + LineBox[{{9.134653784308624, -0.0032747913902092646`}, {10., + 0.0024227118500323554`}, {11., 0.002196444009965568}, { + 12., -0.002844201523631203}, {13., -0.0005791999568424313}, {14., + 0.002611678756169325}, {15., -0.0006381957231799041}, { + 16., -0.001966600415593043}, {17., 0.0014165228381001864`}, {18., + 0.001109960450845253}, {19., -0.0017522895075945389`}, { + 20., -0.00021979350551987325`}}], + LineBox[{{1.8462623421783506`, 0.004231311375085857}, { + 1.8655637492891095`, -0.0032747913902092646`}}], + LineBox[{{2.75891431852922, -0.0032747913902092646`}, { + 2.8678738747996335`, 0.004231311375085857}}], + LineBox[{{4.324161112981501, 0.004231311375085857}, { + 4.700956687072662, -0.0032747913902092646`}}]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2EMZDjBa53ihzPHCNfshXA6Hd3tmVYSZ +JEHVCTi8EX4rm1RqDOWLOMgeTVk9IYMNql7CofbTW9OJqvv2QfgyDvt483wa +7q62g/AVHNYtfvBlXUcYVF7J4YGK6+rwN/5QvoqDQYDw4ivHJaDq1RyYN4lo +VXx5awvhazjEVDNt+Xf75F4IX8thymbViW9Fa6B8HYcffHdV4qRLoer1HLae +sFzD2qQNlTdwCNz9/m6IowyUb+hwyKfq2mml1zYQvpHD7Tdugdci90D5xg6+ +D3cKzbk2dw+Eb+LwZfv6fOZvznsA5KJZag== + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2KPSDA4yxwuBaM1+CJfD4f6eWRVhJkVQ +eQGHa8JvZZNKg6F8EYe/R1JWT8gwg6qXcPD89NZ0ouq/fRC+jEMHb55Pw93f +dhC+gkPj4gdf1nVsg8orOfSruK4Of7MfyldxeOsvvPjK8RlQ9WoOyzeKaFV8 +qYXyNRxYq5m2/LudCVWv5aCzWXXiW1EdKF/HYSnfXZU4aVOoej0HlxOWa1ib +fu+F8A0cLu16fzfE8Q+Ub+jg5FN17bTSbVsI38jB+41b4LXIPVC+scOGBzuF +5lxbC1Vv4lC3fX0+87fkvQCjK1wL + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2EPoB1CawUHmeCEQrdkP4XI43N8zqyLM +pAkqL+BwTfitbFJpMZQv4vD3SMrqCRlpUPUSDp6f3ppOVLWD8mUcOnjzfBru +ekPVKzg0Ln7wZV2HGFReyaFfxXV1+Bt9KF/F4a2/8OIrxyWg6tUclm8U0ar4 +wgvlaziwVjNt+XebE6pey0Fns+rEt6J39kH4Og5L+e6qxEl/tYPw9RxcTliu +YW06DZU3cLi06/3dEEeYekMHJ5+qa6eVTkPVGzl4v3ELvBa5B8o3dtjwYKfQ +nGt7oepNHOq2r89n/ta8DwCaGlm4 + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2IeCwVV7qICDzPFCIFqzH8LlcPCXfrGl +0a8bKi/gELhtVSLfk1YoX8TBjG2ugNWLJqh6CYegyQpPjgonQ/kyDjfKek44 +FFdB1Ss4pL250nuOKwAqr+TwtcqJv5G7EMpXcZjVb916+kYyVL2ag94rsWdu +/xKhfA0HLYH7Ajt90qHqtRyWtazNX/fLCcrXcbDq540WS02FqtdzWF9s/nDS +SxeovIHDbzeWfieZBCjf0MFA/MGFYNNwqHojh7W3Wr426QdB+cYOv+VNOxZt +jYGqN3Ew3sF3jfu8zn4A+AZWGw== + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 20.}, {-0.0032747913902092646`, 0.004231311375085857}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.5`", "1", "2", "3"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True", ",", "True"}], + "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.8001876216108027`*^9, {3.800187674967348*^9, 3.800187679428812*^9}, + 3.800252851597714*^9}, + CellLabel->"Out[73]=",ExpressionUUID->"e9bbbe02-9afe-415d-92f8-31790c8d6ec0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100", ",", "200"}], "}"}]}], "}"}]}], + "]"}], "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100", ",", "200"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800187696307919*^9, 3.800187699574429*^9}, + 3.800252870691618*^9}, + CellLabel->"In[74]:=",ExpressionUUID->"d859a61c-05f5-423c-aeec-df9b4ecd1493"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQjR18sJ81EwRO2kMFHGSOFwLRmv0QLoeDeM5BsZyD +06DyAg7/8w75ZabPg/JFHOIzEtxlHy2FqpdwUKzWepibNgnKl3HYvM3/U67T +Vqh6BYe8boZfhbVTofJKDrdtresl2A9D+SoOj1ZrrWotOwRVr+aQPKt78sWn +p6F8DYds3WrrDVL3oOq1HIzWhxTH5B+B8nUcftmHTA81+gxVr+eg8H2+wS3X ++1B5A4cjTwPCpguzHIDwDR2iLfhm/JPkcIDwjRzC/Q+mXKzkh/KNHd40HlkW +uUUFqt7EoXVS0kurAMYDABfXWZ4= + "]]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {1., 0.04}, {2., -0.05555555555555555}, {3., + 0.1111111111111111}, {4., 0.7422839506172839}, { + 5., -5.342592592592593}, {6., -11.23053840877915}, {7., + 259.51526063100135`}, {8., -327.9116881477671}, { + 9., -11613.597134106843`}, {10., 56344.53448996014}, {11., + 425685.564137279}, {12., -4.593544249302448*^6}, { + 13., -7.795335553300862*^6}, {14., 2.929171526639959*^8}, { + 15., -5.96482478414219*^8}, {16., -1.5317175271593712`*^10}, { + 16.483430754616556`, 3.653428189939*^10}}], + LineBox[{{18.06634353153246, 3.653428189939*^10}, { + 18.077807167949604`, -6.0889334670812294`*^10}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {1., 0.01}, {2., -0.05555555555555555}, {3., + 0.4444444444444444}, {4., 11.876543209876543`}, { + 5., -341.9259259259259}, {6., -2875.0178326474625`}, {7., + 265743.6268861454}, {8., -1.343126274653254*^6}, { + 9., -1.9027717544520652`*^8}, {10., 3.692595412334028*^9}, { + 10.304376251162438`, 3.653428189939*^10}}], + LineBox[{{11.015229810214825`, 3.653428189939*^10}, { + 11.034998125143986`, -6.0889334670812294`*^10}}], + LineBox[{{13.006596910765822`, -6.0889334670812294`*^10}, { + 13.006616604119152`, 3.653428189939*^10}}], + LineBox[{{14.109343672034772`, 3.653428189939*^10}, { + 14.109345839721062`, -6.0889334670812294`*^10}}], + LineBox[{{16.039984532628857`, -6.0889334670812294`*^10}, { + 16.039984533576266`, 3.653428189939*^10}}], + LineBox[{{18.018648651053006`, 3.653428189939*^10}, { + 18.01864865105371, -6.0889334670812294`*^10}}]}, { + Hue[0.37820393249936934`, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.}, {1., 0.005}, {2., -0.05555555555555555}, {3., + 0.8888888888888888}, {4., 47.50617283950617}, { + 5., -2735.4074074074074`}, {6., -46000.2853223594}, {7., + 8.503796060356652*^6}, {8., -8.596008157780826*^7}, { + 9., -2.4355478456986435`*^10}, {9.062794965641341, + 3.653428189939*^10}}], + LineBox[{{11.011443829284556`, 3.653428189939*^10}, { + 11.011463355344029`, -6.0889334670812294`*^10}}], + LineBox[{{13.00331556314938, -6.0889334670812294`*^10}, { + 13.003315567973269`, 3.653428189939*^10}}], + LineBox[{{14.057834165905097`, 3.653428189939*^10}, { + 14.05783416618501, -6.0889334670812294`*^10}}], + LineBox[{{16.02040011106987, -6.0889334670812294`*^10}, { + 16.020400111069897`, 3.653428189939*^10}}], + LineBox[{{18.00941208688867, 3.653428189939*^10}, { + 18.00941208688867, -6.0889334670812294`*^10}}]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2M+aCQIn7aECDjLHC4FozX4Il8NBPOeg +WM7BaVB5AYf/eYf8MtPnQfkiDvEZCe6yj5ZC1Us4KFZrPcxNmwTlyzhs3ub/ +KddpK1S9gkNeN8OvwtqpUHklh9u21vUS7IehfBWHR6u1VrWWHYKqV3NIntU9 ++eLT01C+hkO2brX1Bql7UPVaDkbrQ4pj8o9A+ToOv+xDpocafYaq13NQ+D7f +4Jbrfai8gcORpwFh04VZDkD4hg7RFnwz/klyOED4Rg7h/gdTLlbyQ/nGDm8a +jyyL3KICVW/i0Dop6aVVAOMBACGTWaA= + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2FeLrHN/WLXEHirgIHO8EIjW7IdwOaD8 +PVB5AYftz9pdTx14DuWLOLxV3TL9QpzoAQhfwsEvOkaRs0wNypdxEC5812hn +UeAA4Ss4/Fjj7zatrgQqr+Qg8+lx3pl1x6B8FYfoDV1Sgs2voerVHN4br3UM ++y3pCOFrODhO+sL/qDXwIISv5cDqkfl44Z5YKF/HYfHvlQv6SzdC1es5KLKa +Xj9z7CBU3sDhzX6b+DPtPIcgfEOH2aoqIXwZpk4QvpHDosVSZ/9UJEL5xg7i +6u2rtu2eA1Vv4sAw98KkjRzzDgEA4IRajw== + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2FeLrHN/WNViDxVwkDleCERr9kO4HFD+ +Hai8gMP2Z+2upw6oO0D4Ig5vVbdMvxBXegDCl3Dwi45R5CxbBuXLOAgXvmu0 +sxBwhPAVHH6s8XebVmdyEMJXcpD59DjvzLplUL6KQ/SGLinB5tdQ9WoO743X +Oob9tnSC8DUcHCd94X/UOvEQhK/lwOqR+Xjhnr1Qvo7D4t8rF/SXGjpD+HoO +iqym188cSzwM4Rs4vNlvE3+m/QyUb+gwW1UlhC9D1AXCN3JYtFjq7J+KRCjf +2EFcvX3Vtt17jkD4Jg4Mcy9M2shx7wgAlNla5A== + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAU+2FeLrHN/WFViDxVwkDleCERr9kO4HFD+ +G6i8gMP2Z+2upw64O0D4Ig5vVbdMvxC39ACEL+HgFx2jyFn2DMqXcRAufNdo +Z5HgCOErOPxY4+82rW7KQQhfyUHm0+O8M+vEDkH4Kg7RG7qkBJuznSB8NYf3 +xmsdw36fhPI1HBwnfeF/1Gp4GMLXcmD1yHy8cE8ulK/jsPj3ygX9pR+dIXw9 +B0VW0+tnjhkegfANHN7st4k/074Gyjd0mK2qEsKXweoK4Rs5LFosdfZPRSKU +b+wgrt6+atvuM0chfBMHhrkXJm3k+HcUAB9iW44= + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 20.}, {-6.0889334670812294`*^10, 3.653428189939*^10}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"5", "25", "100", "200"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True", ",", "True"}], + "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800187701044457*^9, 3.800252871492137*^9}, + CellLabel->"Out[74]=",ExpressionUUID->"8ba9d687-92c8-4daf-adba-5aa60f67d78e"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Singularity structure", "Section", + CellChangeTimes->{ + 3.8001877272408524`*^9},ExpressionUUID->"0d9de29c-52d5-49a5-99ce-\ +c99cd55b7634"], + +Cell[CellGroupData[{ + +Cell["\<\ +Can we give a physical signification to all the singularities ?\ +\>", "Subsection", + CellChangeTimes->{{3.800187824542141*^9, + 3.800187826453555*^9}},ExpressionUUID->"60a1c53c-e29b-478a-ab95-\ +abe0c1c7fcd4"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"H\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], + "]"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800187849928152*^9, 3.800187861161106*^9}}, + CellLabel-> + "In[131]:=",ExpressionUUID->"bcdacb72-a592-4dfb-8fea-6c60b17ad205"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "1.26376261582597333443134119895431337772`28.795880017344075"}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "3.04128784747792000329402359686318426813`28.795880017344075"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "1.26376261582597333443134119895431337772`28.795880017344075"}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "3.04128784747792000329402359686318426813`28.795880017344075"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.2499999999999999999999999999971797524503437666968812564849`28.\ +688084587924042"}], "-", + RowBox[{ + "1.35400640077266006007664726137887625495`28.7920324215085", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.7499999999999999999999999999954450884752717195483320444276`28.\ +74260353277321"}], "-", + RowBox[{ + "2.03100960115899009011497089206877300294`28.78476227290612", " ", + "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.2499999999999999999999999999971797524503437666968812564849`28.\ +688084587924042"}], "-", + RowBox[{ + "1.35400640077266006007664726137887625495`28.7920324215085", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.7499999999999999999999999999954450884752717195483320444276`28.\ +74260353277321"}], "-", + RowBox[{ + "2.03100960115899009011497089206877300294`28.78476227290612", " ", + "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.2499999999999999999999999999971797524503437666968812564849`28.\ +688084587924042"}], "+", + RowBox[{ + "1.35400640077266006007664726137887625495`28.7920324215085", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.7499999999999999999999999999954450884752717195483320444276`28.\ +74260353277321"}], "+", + RowBox[{ + "2.03100960115899009011497089206877300294`28.78476227290612", " ", + "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.2499999999999999999999999999971797524503437666968812564849`28.\ +688084587924042"}], "+", + RowBox[{ + "1.35400640077266006007664726137887625495`28.7920324215085", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.7499999999999999999999999999954450884752717195483320444276`28.\ +74260353277321"}], "+", + RowBox[{ + "2.03100960115899009011497089206877300294`28.78476227290612", " ", + "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.0661875945537065052950075642978412522757198688576470051505`28.\ +77048471616815", "-", + RowBox[{ + "0.7658850226928895612708018154320556538894811122748743846021`29.\ +397940008672034", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.3403933434190620272314674735228392126442119685245960440398`29.\ +031045514668527"}], "-", + RowBox[{ + "1.4183055975794251134644478063548087575992766865058079901977`29.\ +397940008672034", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.0661875945537065052950075642978412522757198688576470051505`28.\ +77048471616815", "+", + RowBox[{ + "0.7658850226928895612708018154320556538894811122748743846021`29.\ +397940008672034", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "0.3403933434190620272314674735228392126442119685245960440398`29.\ +031045514668527"}], "+", + RowBox[{ + "1.4183055975794251134644478063548087575992766865058079901977`29.\ +397940008672034", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.263762615825973334431341198949817176809850785602562772441`29.\ +397940008672037"}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "-", "1.5412878474779200032940235968860328464698285768799022062038`29.\ +397940008672037"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.263762615825973334431341198949817176809850785602562772441`29.\ +397940008672037"}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "-", "1.5412878474779200032940235968860328464698285768799022062038`29.\ +397940008672037"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "0.250000000000000000000000000003886389665610962383822995812`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "0.250000000000000000000000000003886389665610962383822995812`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.800187863663967*^9}, + CellLabel-> + "Out[133]=",ExpressionUUID->"5351795f-c7d2-4cc5-9a31-8e02d5330852"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 3.04128784747792, 0.}}, {{3.04128784747792, + 0.}}, {{-0.75, -2.03100960115899}}, {{-0.75, -2.03100960115899}}, \ +{{-0.75, 2.03100960115899}}, {{-0.75, + 2.03100960115899}}, {{-0.340393343419062, -1.4183055975794252`}}, \ +{{-0.340393343419062, 1.4183055975794252`}}, {{-1.54128784747792, + 0.}}, {{-1.54128784747792, 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.80018786399437*^9}, + CellLabel-> + "During evaluation of \ +In[131]:=",ExpressionUUID->"6e4da88d-aece-4c54-b324-d3caaf423e10"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158278610743*^9, 3.800158290872142*^9}, + 3.800158341741818*^9, {3.800158433517392*^9, 3.8001584377174377`*^9}, { + 3.80025892839108*^9, 3.80025893667137*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"bf8846fc-cc5e-42d6-b529-b0bb9ad6ef59"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{"-", "0.3403933434190623`"}], "-", + RowBox[{"1.4183055975794254`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{"-", "0.3403933434190623`"}], "+", + RowBox[{"1.4183055975794254`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.8001582338106213`*^9, 3.8001582919267*^9, + 3.8001583424528513`*^9, 3.800158439888423*^9, 3.800258938665888*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"1a933c9c-541d-4321-a1bd-2625af36f5d5"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "3467cd1e-48ad-46ac-bf17-3dea180e33dc"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]],ExpressionUUID-> + "3fd01f7f-0f46-4986-b468-b517ba7ab4cb"] +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, + 3.800158635398328*^9}},ExpressionUUID->"7b0f9a8e-40ae-4f81-a85a-\ +0b4e16541d98"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8001584637379913`*^9, 3.800158464134795*^9}, { + 3.8002589469477243`*^9, 3.800258951258066*^9}}, + CellLabel-> + "In[104]:=",ExpressionUUID->"bcecc14b-884d-4557-babf-8ec30e3d3eb4"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{"-", "0.7499999999999997`"}], "-", + RowBox[{"2.03100960115899`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{"-", "0.7499999999999997`"}], "+", + RowBox[{"2.03100960115899`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.8001584644905357`*^9, 3.8002589521382637`*^9}, + CellLabel-> + "Out[104]=",ExpressionUUID->"3ef05d4e-e8af-41c0-b0af-748113dab88a"] +}, Open ]], + +Cell[TextData[{ + "There s a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "b1bdaccb-1486-46e6-a525-f28dbd24b899"], + "and the ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]],ExpressionUUID-> + "8e9c0903-1b65-49fd-8b50-4a3cd8b8f1a7"], + " singlet (x2 degen)" +}], "Text", + CellChangeTimes->{{3.800158662872758*^9, 3.800158703136058*^9}, { + 3.800158955325688*^9, 3.8001589561925917`*^9}, {3.800159692397304*^9, + 3.800159701502852*^9}, 3.8001597753064337`*^9, {3.8002592717226963`*^9, + 3.800259273786427*^9}, {3.800259424891251*^9, + 3.8002594292941732`*^9}},ExpressionUUID->"6c283925-cd31-4f0e-9613-\ +89b9bb45a247"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158369960648*^9, 3.800158370393867*^9}, { + 3.800158408929471*^9, 3.800158409337016*^9}, {3.800158446099082*^9, + 3.80015845077838*^9}, {3.800258976395669*^9, 3.80025898174757*^9}}, + CellLabel-> + "In[105]:=",ExpressionUUID->"44af6aed-b238-4a93-89e8-1340e433a148"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "3.0412878474779195`"}], "}"}], + "}"}]], "Output", + CellChangeTimes->{3.800158371081614*^9, 3.800158409644907*^9, + 3.8001584513624277`*^9, 3.800258982393457*^9}, + CellLabel-> + "Out[105]=",ExpressionUUID->"5b5beadd-cd77-4464-a293-83098e0e5d37"] +}, Open ]], + +Cell[TextData[{ + "There is a CI between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "02bb7ac2-f9c2-40fb-ac80-e666887ecffa"], + " and ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]],ExpressionUUID-> + "97cfaa3c-8d04-44c5-9d74-60882bf4fb94"], + " triplet" +}], "Text", + CellChangeTimes->{{3.80015883203883*^9, 3.800158852480497*^9}, { + 3.800158963935526*^9, 3.800158964785277*^9}, {3.8001597693529873`*^9, + 3.800159771491109*^9}, {3.800259434147972*^9, + 3.800259461951907*^9}},ExpressionUUID->"82eff177-42be-4dd7-9453-\ +a54f54529238"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.80015887242031*^9, 3.8001588727346163`*^9}, { + 3.800259335892006*^9, 3.8002593503862677`*^9}}, + CellLabel-> + "In[106]:=",ExpressionUUID->"8ea8f494-540f-46b9-add5-8510ec0c1ba8"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", "1.5412878474779201`"}]}], "}"}], "}"}]], "Output", + CellChangeTimes->{3.800158873572803*^9, 3.800259359884632*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"355298db-6a2f-4e31-b53c-ce707c2ed739"] +}, Open ]], + +Cell[TextData[{ + "There is a CI between ", + Cell[BoxData[ + FormBox[ + RowBox[{" ", + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], + TraditionalForm]}], TraditionalForm]],ExpressionUUID-> + "b300b885-6f3f-4357-a6d1-5c2ea0b2dd9f"], + " and ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]],ExpressionUUID-> + "3a74ae82-46ad-4f8b-bf02-4b2281731928"], + " triplet" +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, 3.800158635398328*^9}, { + 3.800159734007469*^9, 3.8001597393953323`*^9}, {3.800159781544524*^9, + 3.800159796125751*^9}, {3.8002594681654167`*^9, + 3.800259498160296*^9}},ExpressionUUID->"afb9d0d5-37ff-48e1-8f85-\ +39ad49f0fc79"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158879878248*^9, 3.80015888237202*^9}, { + 3.800259508747184*^9, 3.800259514430435*^9}}, + CellLabel-> + "In[107]:=",ExpressionUUID->"4222a322-77a9-47ac-9cd7-b96c801433e8"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800158882705681*^9, 3.8002595168576736`*^9}, + CellLabel-> + "Out[107]=",ExpressionUUID->"a79d8ce1-ea68-4a85-bc5a-b69846a2058b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158986206258*^9, 3.800158995955509*^9}, { + 3.800259521761552*^9, 3.8002595271311703`*^9}}, + CellLabel-> + "In[108]:=",ExpressionUUID->"09b7b442-f051-408e-be5b-ac401dacdf6a"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "0.`"}], "}"}], "}"}]], "Output", + CellChangeTimes->{{3.800158989306931*^9, 3.8001589970199614`*^9}, + 3.800259529362917*^9}, + CellLabel-> + "Out[108]=",ExpressionUUID->"2d869042-8314-4786-b0c8-e39167a5e138"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["R dependance", "Subsection", + CellChangeTimes->{{3.80025956583044*^9, + 3.800259568077898*^9}},ExpressionUUID->"f911d4c6-5cfc-49b9-9ae3-\ +8e185e5e9327"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"H\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{3.800259592944755*^9}, + CellLabel-> + "In[109]:=",ExpressionUUID->"8af7f735-ca14-4a98-8c03-1fd2345b57a9"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 3.04128784747792, 0.}}, {{3.04128784747792, + 0.}}, {{-0.75, -2.03100960115899}}, {{-0.75, -2.03100960115899}}, \ +{{-0.75, 2.03100960115899}}, {{-0.75, + 2.03100960115899}}, {{-0.340393343419062, -1.4183055975794252`}}, \ +{{-0.340393343419062, 1.4183055975794252`}}, {{-1.54128784747792, + 0.}}, {{-1.54128784747792, 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.800259595706414*^9}, + CellLabel-> + "During evaluation of \ +In[109]:=",ExpressionUUID->"b1d5ba64-9c3b-4954-ab9e-30b07e59bdfa"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"H\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "3"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800259675970623*^9, 3.800259676468936*^9}}, + CellLabel-> + "In[119]:=",ExpressionUUID->"f3b52bee-17e8-4410-a817-4eea81fadeff"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.0275252316519468`, 0.}}, {{2.0275252316519468`, + 0.}}, {{-0.5, -1.35400640077266}}, {{-0.5, -1.35400640077266}}, {{-0.5, + 1.35400640077266}}, {{-0.5, + 1.35400640077266}}, {{-0.22692889561270801`, -0.9455370650529501}}, \ +{{-0.22692889561270801`, 0.9455370650529501}}, {{-1.0275252316519468`, + 0.}}, {{-1.0275252316519468`, 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.80025967077693*^9, 3.8002596771397047`*^9}}, + CellLabel-> + "During evaluation of \ +In[119]:=",ExpressionUUID->"2932b857-d006-42b0-96f1-bfa322b4f49c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Solve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]WCE", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]], "Input", + CellChangeTimes->{{3.800254865364702*^9, 3.800254870212039*^9}}, + CellLabel->"In[92]:=",ExpressionUUID->"ad74092e-deab-4815-8c86-07eef5c8d8ab"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", + FractionBox[ + RowBox[{ + FractionBox["450", "661"], "+", + FractionBox[ + RowBox[{"1875", " ", "\[ImaginaryI]"}], "661"]}], "R"]}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", + FractionBox[ + RowBox[{ + FractionBox["450", "661"], "-", + FractionBox[ + RowBox[{"1875", " ", "\[ImaginaryI]"}], "661"]}], "R"]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.800254871554925*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"8be537fb-e64e-4b3f-9c0f-8b49b03be012"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Abs", "[", + FractionBox[ + RowBox[{ + FractionBox["450", "661"], "-", + FractionBox[ + RowBox[{"1875", " ", "\[ImaginaryI]"}], "661"]}], "R"], "]"}], ",", + "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.1", ",", "1000"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{"0.96", ",", "25"}], "}"}]}]}], "]"}]], "Input", + CellChangeTimes->{{3.8002549064256783`*^9, 3.8002549300657587`*^9}, + 3.800258350062706*^9, {3.8002583874849453`*^9, 3.800258397439683*^9}}, + CellLabel-> + "In[101]:=",ExpressionUUID->"0c773149-d703-4bb6-94a6-7b5cc0ce8fae"], + +Cell[BoxData[ + GraphicsBox[{{{}, {}, + TagBox[ + {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwdiQk4FOoeh0cj0aSMJdyKRMpMNIwsh/r+5FAkWZLtVjgV3a4lJELk4rTJ +VooKSSHGUFkSH1IIw0SnQWWLIpkzGIxpxu3e3/O8z/u8z0/DJ9DpxAoCgRDz +i/+5QO1jyZSuRAPh/zOFfQEG54IFhIbyBwdu/uVmAqSO9BHqLKHB+KADo+V3 +E2Dp8A+OTxEafPNOVLQYmMDhsaptnkO//pjN9nNrTMDHa3efVQuhwUNT8U9x +ozFE2+4zV7lJaKApVZM69YyhQvvoCkwjNMj5EvqICkZgVK+wSbVbjJ3zDZZj +iYYg+ZrU5NMsxulNhpzBOTq8ayeeKqkWY9KNHp/943QI6JtlojwxFpwo/Ld5 +Gx0ez/VYnTwrxvV3jGLzbtBBhZpx5qmiGNeSCgePq9FBkKn40t5dhEuJesMX +9xrAy2Alz0sjQkzbdt7uSTENXix/7Zb6IMQcxvkbNfdpUH39hfXVdiGWsGT7 +dKfR4FnRMYOMZ0L8RndljvIFGpQMF8k8ShTiMnJrE+kADbId91S3UYRYn7Qw +tHpwJ0Tqn1IihyxhzckSJUqEHhjzqrtyiAJsNgg/ugaoYBTDVKcuLGLRmLzL +9jdUMCQVBlZOLmI/4sKNVCYVaFsz13WyfzW7yOlWAhUo7mEOSzmLOKJ8MPMU +jQpqjfpdLuaLOPIHY3TTZQpIphazZMIWsAbdNjPOWgfYtLudIeN8TOmLtkmY +1ob1Mm0TPf18fJA+rzfySRu8hvkrDbv4mLMmYLtdpzZ8S3XYM1fFx8oennoW +JdpAmF1RFnqZj72+/Zn28rQ20J77p4Tt4ONX3aX0iYmtkGxq7Bx+dg5foE9z +Pv+tBXaW7ziR4hnslv7SNFxdE9JUtbqGeTN4WYzzA+Q0gfN32Ot9YzP4uPeR +wWAJTfgjR7VifccMnpZXf5Q9ugVifh6/WnFnBufufB54oXALlFdyd08azuDD +KXULvoZbQJkqm+/+Lx52WaoJzXLRgDfbUvqDmFy8HEBIjfVXh4ov3/yeZXLx +/j8OvrdwVIecPIuFhRgudttP71YyVYfzG2YVLtpzcQhLismXVgedda721yen +cXXu1sT0IjW4Nr+hoUhrGmt//LrFbHoTOL9+XDByewpHPRpb3fefjTDkg4Nc +4iZwYnzCZv8vquBVeSnT4vQE9orQD2hmq8IHGet6PecJjG28t+tiVWAxO0gy +Wyew5ouiWu0sVagV9z2qa/2GgxjcQzWHVOFW1txHbblv2E8+cMy5QQXs3+ns +F9wfx+c3yadtKlKGFxYZGvdfjuJd29qt1uUogVF63s/b+aN4MXKXhl6yEjz9 +wviQfmUU33wrT/WIVoKSpLbrl91Gsb5o1f0+TyW41ykWhM6N4Lmg1pFQVSWI +dfd/Z7djBIeslSQrZiqCdfCeeEH2EE6KEoyWZSvAAwt2W9F8Px4VWSnbt5Kh +htzInGnpx/KV1ULXWjJ0DzMzze70Y5fpcqfTDDKI4lJOdJr1Y4NbDPPSDDK4 +NTlI8GL7sDRpt0W+NxnW7mWZmJA4OL7OdbOtSA4irNofv1F/jx86pvW4mMlB +XvIVUksqCwe7ZXbO5cnCQb89x3casfByHEWj9ZosLFnMPMvs78Si9h23isNl +wYnvftRPsxNbU21q7trLwgovnXKZ5+14+Yyo0nBpDfjotLoe4LRiYUW3JcV1 +DWg2r3zAVnuFMWlDzYgKCdLGiSNBZQzsXeDZ494iDU66IRE/NErx+1xZD61n +0kAOHZE7nfEEXykdaBblSkOKRCPyjSjE6xULVT5FSsP1jTH3Du99gMtOLYUf +2CkNarbDvhNeSfh8/++UL1mrIN5CgfaTkI9MAl+9LYqSgpNZVw557GhErJot +XeZ+khAZINmmeLkR3SK7Xopwl4RkyxiLrrFGFJRwdbTBVhIqJ4MNrHKakK/M +htRAXUlYZeauqCffjExvchrtZolQOLCNI7H4BiXU2vcuxhLh+8bXx4pedSD6 +KjkGL38FVHddNI7S7UUsWRsuS0oCGuq2k+qP9aK3kdNuYQICtD5hf15O7UXZ +A/q/aU8RoC9JMzF+vhfl8+stH7MJsIRaeq/g94iyqzZp6z0CmDHXnr3j+AHN +u7n3kowIUJ9yr6QyrB/VssqYKZ/FaKTwU8ri0SEkXRUQXSUUokSyiJMfPoS+ +7zf4TXdciKiRGzUcUoaQb1Py1afdQhRq51le0DiECtXW1fAKhEhqmsN20hpG +42pmHw0chUiH3itfOjGM2jri7OqKl1BQ3dsM79BRVEzExHv+AiRmV91+e3kc +WXYpPFpQWECKD8/s68gdR7I3jVefJC4gnXMai51V4+hkebbz0Mw8cvnH1SPs +sXFUVScRusieR8U+R9dzLL4iffMC0fOUeXR4VjJjTPAVsap2DByVm0clik43 +CKcn0MNksZ6eCh95HJlKMLKdQlp2prdl9s2iAOqROIrvFPqiyvSXMp1F8cuN +UWpRUyikKOj7WsosKnmcGSLFmEJjPwMGLNfMIvGCpfdf5B9o8old0C72DHpw ++475ub4fKNqvJ3v3P2fQRJ/17HM/LspTFvfejeYhc8YhZtZeHhqEjU8Ta7lo +uaN7GDnwkE2+yrVzD7mo6fshhTEPHmo6Q98efp2LbHQcz+08y0M/BeSI4mNc +5PTQ0bw5l4c+dsdROJJcNBhbEs9s5aFqtYTvjtXT6L/y8fVS + "]]}, + Annotation[#, "Charting`Private`Tag$60786#1"]& ], + TagBox[ + {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQ3XK3atHGbKYDDGDwwf7Z0rCeiZsY4XyPPKOywp8M +cL7ZPmFZyQv/9sP4ewpFo5se/YbzzT/uOD+f+Secf9FgztniZ1/hfG+nSzeq +/n2C84+pT7hVsOE9nP8gaX9BSONLOH+X4xTFeXsew/mLHC+eXPntFpy/sK+L ++/jEc3D+pGfMjwrWr4Pz02Z1BUTpHLSH8Xecrzev0b0C5z9acXfCj7gHcP6/ +i9tnnOp8BudHhb9pNfN6A+fbrAvYMMv5I5z/Ji5C4LnOFzi/zl/heU3Idzhf +usStPS73F5x//ZikFG/gXzh/15prE5ssGRxgfEne7/xP1zPC+XXtx4reyjHD ++VcUv02QWssC51sG12isU2CD8/uXJFWnbWaH81/z/9h0xI4Tzg8XepLcuZ4L +zt9iYnChyJ4Hzld8d2nroS28cP7kgyoNO5T44fzqqNdNL8MFEPrn5zNpCQrC ++U+/LL7/5yaCP29q88+mqUJwftThXawxvsJwPj/jovzjIiJwvk+Xidizcwh+ +o3K51PQZonD+Tk9BwdlxYnB+5e4wlyBxcTjf0Nbn6uz7CH4h19tFM2ZJINyb +8jTpRaAknP/+XG/DKQkpOH9Ty8Nb8ZcQfFeVV8ZfLaXh/BuHP/V0LUTwASWF +Ct8= + "]]}, + Annotation[#, "Charting`Private`Tag$60786#2"]& ]}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{-2.3025849050279152`, 0.96}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->{{-2.3025849050279152`, 6.907755091016007}, {0.96, 25}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, {0, 0}}, + Ticks->FrontEndValueCache[{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Automatic}, {{{-2.3025850929940455`, + FormBox[ + TagBox[ + InterpretationBox["\"0.1\"", 0.1, AutoDelete -> True], NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, {0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {6.907755278982137, + FormBox["1000", TraditionalForm], {0.01, 0.}}, {-4.605170185988091, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-3.506557897319982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-3.2188758248682006`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.8134107167600364`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.659260036932778, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.5257286443082556`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.4079456086518722`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.551080335043404, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.684611727667927, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.802394763324311, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 7.600902459542082, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.006367567650246, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.294049640102028, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.517193191416238, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.699514748210191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.85366542803745, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.987196820661973, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.104979856318357, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.210340371976184, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}, + Automatic}]]], "Output", + CellChangeTimes->{{3.800254907843933*^9, 3.80025493464567*^9}, + 3.8002583505883493`*^9, {3.8002583884215937`*^9, 3.800258398283313*^9}}, + CellLabel-> + "Out[101]=",ExpressionUUID->"0e5afb43-03a8-4921-a0b0-171f8b1c2ecd"] +}, Open ]] +}, Closed]] +}, Closed]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["RHF vs UHF: the M\[OSlash]ller-Plesset expansion", "Title", + CellChangeTimes->{{3.800004958258581*^9, 3.800004970460177*^9}, { + 3.8000050657655983`*^9, + 3.800005124042057*^9}},ExpressionUUID->"12d80845-73eb-493a-bcea-\ +3b0b87d21f3e"], + +Cell[CellGroupData[{ + +Cell["Energies on the real axis", "Section", + CellChangeTimes->{{3.800007190386896*^9, + 3.80000720493908*^9}},ExpressionUUID->"1e6ffb79-24e9-4397-b007-\ +32df81174525"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.8000051404799757`*^9, + 3.8000051434665403`*^9}},ExpressionUUID->"7a35c830-d09c-4c2a-ad54-\ +c9c15f347871"], + +Cell[BoxData[ + RowBox[{"HRMP", "=", + RowBox[{"DiagonalMatrix", "[", + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}]}], ",", + RowBox[{ + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", + RowBox[{ + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}]}], ",", + RowBox[{ + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}]}], "}"}], + "]"}]}]], "Input", + CellChangeTimes->{3.8000056226723022`*^9}, + CellLabel->"In[47]:=",ExpressionUUID->"40be5691-8587-4301-ab69-4bfeda29a864"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"HRMP", "[", "R_", "]"}], ":=", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["2", "R"], "0", "0", "0"}, + {"0", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["8", + RowBox[{"3", " ", "R"}]]}], "0", "0"}, + {"0", "0", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["8", + RowBox[{"3", " ", "R"}]]}], "0"}, + {"0", "0", "0", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["10", + RowBox[{"3", " ", "R"}]]}]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800005655116191*^9, 3.800005660288808*^9}, { + 3.800181738766815*^9, 3.800181743949849*^9}}, + CellLabel->"In[23]:=",ExpressionUUID->"30f17efb-d41d-4259-b874-cacd3b56ce75"], + +Cell["We define the adiabatic connection Hamiltonian as", "Text", + CellChangeTimes->{{3.800005777443572*^9, + 3.800005825433264*^9}},ExpressionUUID->"8924de9c-9efe-45a3-a9ad-\ +408e2b2b698d"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"rH\[Lambda]", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{"HRMP", "[", "R", "]"}], "+", + RowBox[{"\[Lambda]", + RowBox[{"(", + RowBox[{ + RowBox[{"rH", "[", "R", "]"}], "-", + RowBox[{"HRMP", "[", "R", "]"}]}], ")"}]}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{"Eigenvalues", "[", + RowBox[{"rH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RHF", "[", "R_", "]"}], ":=", + RowBox[{ + RowBox[{"Eigenvalues", "[", + RowBox[{"rH", "[", "R", "]"}], "]"}], "//", "FullSimplify"}]}], + ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800005845720145*^9, 3.800005863070434*^9}, { + 3.800008325211321*^9, 3.8000083292042847`*^9}, {3.800075430687092*^9, + 3.800075439968359*^9}, {3.8001820319866*^9, 3.800182038034882*^9}, { + 3.800182086112391*^9, 3.800182116687286*^9}, {3.800182186746798*^9, + 3.800182187341146*^9}}, + CellLabel->"In[24]:=",ExpressionUUID->"19c3a2e6-282e-4147-9930-7ff961395f5b"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "10"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "1.5"}], ",", "3"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{sp}_\\\\text{z} ~ ^{1}P\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{sp}_\\\\text{z} ~ ^{3}P\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{s}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{p}_\\\\text{z}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}], "}"}]}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "1"}], ",", "2.8"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "0.3"}], ",", "0.5"}], "}"}]}], "}"}]}]}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800005924706459*^9, 3.800005929948352*^9}, { + 3.800005982530142*^9, 3.800005983014323*^9}, {3.800006131382762*^9, + 3.800006149454649*^9}, {3.800006192806897*^9, 3.800006196955217*^9}, { + 3.8000067027873077`*^9, 3.800006706963251*^9}, {3.800937206850897*^9, + 3.800937234902536*^9}, {3.800952484422711*^9, 3.80095248463486*^9}, { + 3.801197029903492*^9, 3.801197030385521*^9}, {3.801209931377737*^9, + 3.801209946768364*^9}, 3.802144321900454*^9, {3.8021444043325863`*^9, + 3.802144470305004*^9}, {3.802144507416741*^9, 3.80214451243267*^9}, { + 3.802144619729239*^9, 3.802144651505146*^9}, {3.8021446987181177`*^9, + 3.802144744970624*^9}, {3.802144790128127*^9, 3.802144791072198*^9}, + 3.802144832024213*^9, {3.8042358406737633`*^9, 3.804235946443109*^9}, { + 3.804237195830031*^9, 3.804237196240169*^9}, 3.804247090659012*^9, { + 3.804247257292985*^9, 3.8042472752992697`*^9}, {3.804247320607801*^9, + 3.804247348818315*^9}, {3.804247417429537*^9, 3.804247417714069*^9}, { + 3.804247448101907*^9, 3.8042474908217783`*^9}, {3.804247528891056*^9, + 3.804247589748111*^9}, {3.804247672933235*^9, 3.8042477367949457`*^9}, { + 3.804247930356411*^9, 3.804248000150017*^9}, {3.804248102788391*^9, + 3.804248107627308*^9}, {3.804249275385282*^9, 3.8042492784520407`*^9}, { + 3.804397529014101*^9, 3.80439758761193*^9}, {3.804414254240368*^9, + 3.804414269480275*^9}, {3.8044143670901203`*^9, 3.804414396120419*^9}, { + 3.8044144274746933`*^9, 3.804414431618039*^9}, {3.804414474363975*^9, + 3.804414484182391*^9}, {3.804414716556189*^9, 3.804414717346142*^9}, + 3.804419404674508*^9, 3.804419441542829*^9, {3.804419471743248*^9, + 3.8044195394110527`*^9}, {3.8044211032354517`*^9, 3.804421109988982*^9}}, + CellLabel->"In[89]:=",ExpressionUUID->"b19cd367-957b-4cf0-b4ae-1fec45bd95df"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{}, {}, + TagBox[ + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwVj3k41HkcgMfVL6p9SmKjrXQ4WlnCGiWfr9qNJkdkPSJS6UCrYxPFg9F6 +inZktY1jszoMOpQcZTQzn3EU2zNjZYxrmmHJVUJNjDNr/3if99/3NT58yvuo +Oo1Gc5/nf+tR+/vn5lQYdm6so4ypgJxoM67flArTGRkLnsQpwOSdKuXJZxVy +1zpsKYpRgIOYbXlkUIWUODaZE6mAoOvNkS+bVJi3UZPODlXAvTV7NVkcFcpb +dG9EeSnAie5ibLhHhZ4OVp5bjRVwPNQuwJY9jlZfwmpQKIfTnu6mU0vGMFSN +V3Bt5A2sr5gd5+cqsb6q1t/R4g1YTsb2FdM/Ic/s9/f8kzIY4dtb2pWO4gZt +h2jNnA4o09FXRlwbxpL8TImprB3GbtlsZce8xxK+ZNNS7Xbo7x8WGp0fQNeY +poPirW2w2VbmkZPXiwvGrxw5frEVFJedWM7sbrR7Z3jk5b0WqKvicGqiOvHq +nyHW6v1SsJVqFws72zFaeUauayaFaFWAkUaDBFtr/ZMG/Jqh3nXtphhXEQbu +m57OzpCAmzCk86KaEH0CoiJ0XzZBXvNc5s3cXOzWfiYImngNjNbEM6kmRcCO +fCS/TH8NLFctneKLNcD3Z05EnmgE1Ytef5GsAQymDGqZbv9Ah+7YZ8tMKWRY +v029XSAG33+3bX/OkYHzU/sV4ToiuOGd9ryA0wXby6fow1degV7RIjPP8h5Y +VXDOZ7qvHkDdlzWV1geuy4OWVAfXATdfvdQlaBBuixqYW7pfQN1OutnZE0Og +iB7/YLGzFpgyR/YtpxEIzWWpurAaBu16zVvMPkJbhWxi9aoqqNgoH7B48Al6 +nQ6HL6EhyNMd85KWfwYubWjN3rnn4BYbTLlnj4FPYU9NPr8ClvW8P6ZPqSD1 +h8o7p0vLIe5MYX7xyQlYFZM7waooAbtY81Tu6CQMWvbGxE0+gh2aumdr/aeh +ee/u2LrRQsheiLPbe2Zgj1NyAP3YHXBJkSRxvb4AtemrQ2tuZMJNm5XDWtw5 +iGdeabD/Phn+ergsPjiXRoR+v9qMcei4Mo6hBT+pEWrd34xZzWTkso52+hiq +k98u7KxYkZ+Fm62zzCUydRI880vUd7vuott12lnvNA0i9F6Y8zPjHqbZML7S +9tEkLLmw51LjY4xPrysU6miRNAzsaFeWoHNSYGkXX4vMRor2rB4tR/On0mX0 +hAWkcJdY7LGZizwOMyLNjiLl60b0Ftvw0MaLbVFJpwhVWTSdQnh4f+b+u55t +FPH1Otmt7cHDrH3Nx+x3UGQ2fvAxFcrD82qmBxUeFHGV9zA0cnloFSjytDhB +kbaMtoQpHT7e1TOwrs+myPji6qGBbj4aCr8d+ZhDkR/zEiTHR/mYHk6KjG5T +JHsbVPbN8jGhOtT8VAFFnMJ4l99+LcADp3nG+mUUSax7uq7LQ4D6okO6IWKK +rEh84NdaKUBW1PlGViNFQlaGgW+9ADXXX019Jpn/KTYzkUoFqLxQprOogyKB +nRxl06gAG00pjZI+iuQ53kptMEF0kRhVyQbn+yRBke62iII4q3itD/M/4d8c +EDkjFkn3T/spKTKUlW3+6gDiBmYEN3F8vs96/9LdYYg3LS5FPZykyPV6A1Vd +FOLytgy7lhmK9B5ske9KQky59FA5N0cRW9UftS/SEf8DxJJ7WA== + "]]}, + Annotation[#, "Charting`Private`Tag$18998#1"]& ], + TagBox[ + {RGBColor[1., 0., 0.], AbsoluteThickness[1.6], Opacity[1.], + LineBox[CompressedData[" +1:eJwB4QIe/SFib1JlAgAAAC0AAAACAAAA3N3d3d3d8b8AAAAAAADgP++9Ny41 +s/C/20yuphIR3z+0Chbzbo/uvzC5va9H7t0/9aAzOpZ767+yW5YyJLPcP+fn +7sAbdui/EngUAsB92z8tNNtOnaTlvy4wpgcnXdo/3oc+jUGW4r91HgGHNSTZ +P8fBpaXDd9+/d6hvPA8A2D801QmwwN/Zv1msgz6o4dY/ePdbGwPO079n5mC6 +6KrVP8hIICp7SMy/MLxRbPSI1D9MwGTfegHAvyPIC5inTtM/pNT/mJyfn7/3 +TWsQGhrSP0rXgnGOJq0/hm/evlf60D+NSAUKsHrDP4KONc55hM8/98XlWszb +zj9sddWK2j3NP9oS9fQumNU/rcgHO4rGyj9W4Ts9u6XbP68PhYS4Wsg/lVKQ +u6el4D8mjik6fRjGPxStCyhPteM/9Hhg45Clwz8/AlaN+pDmPzibvvg6XME/ +uaYCs0de6T96Ys9Oxzy+P8dDOChyaOw/L2dGk7ZfuT+B2zyWoD7vP9LaC7DS +1bQ/6TXlKdYo8T8+TuxnGdWvP7gl3egsq/I/3rXs1Icspj/dkjykhRP0P6v2 +E+WfVJo/THxgB02a9T9IkYfznip7PxHj62YWB/c/suQsFDrlhr9+caimsGz4 +P/0qtwbtU52/NXwpjrnw+T97QGKzYl2ov0IEEnLEWvs/zQZmmTq1sL+aCL/9 +PeP8P7IU9vElnbW/R4rThblR/j+rszdy5DG6v5wzGe4Fuf8/H2vjv6Wvvr+e +rBF/YJ8AQPYkNZNkx8G/GX5KBT9VAUDlXFHaXw3Ev7mNZd9UGgJAfyjbLQyE +xr8tMZkp09sCQFkAGug578i/TJMAclKQA0C8oDE20TDLv5AzSg4JVARAytS2 +kBmjzb9/kseowAoFQGDRFH/L68+/QYVds+C9BUAa7RNqfxTRvym21RE4gAZA +WTvUmnFL0r8REREREREHQDMzMzMzM9O/lT5pog== + "]]}, + Annotation[#, "Charting`Private`Tag$18998#2"]& ], + TagBox[ + {RGBColor[0., 0., 1.], AbsoluteThickness[1.6], Opacity[1.], + LineBox[CompressedData[" +1:eJwBgQN+/CFib1JlAgAAADcAAAACAAAAFAdZ5///978PT57nxOzVP514KLlY ++ve/JiCucKvq1T8m6veKsfT3v1nvHfeR6NU/Oc2WLmPp978JRBn8XuTVP16T +1HXG0ve/qspg5vjb1T+pH1AEjaX3vyaJQTssy9U/PjhHIRpL97+R75zekKnV +P2dpNVs0lva/6YJYzFFm1T9wT00n+g31v0aLS85a1NQ/I7j99r2f87/aJb7C +2EvUPy75fOawOPK/HzMhIsrF0z/vvTcuNbPwv3R2HJcVNNM/tAoW826P7r9v +s825zKvSP/WgMzqWe+u/glxTg7oX0j/n5+7AG3bov/Vr5OLrhdE/LTTbTp2k +5b8shZUJd/3QP96HPo1BluK/4eoRGO5o0D/HwaWlw3ffv4ZQHGlKu88/NNUJ +sMDf2b+O6P7D16jOP3j3WxsDztO/hLr0o0V9zT/ISCAqe0jMvxaXwY2/Y8w/ +TMBk33oBwL9AqJ8k9i/LP6TU/5icn5+/zkK47JL+yT9K14JxjiatPyJWkUA7 +3sg/jUgFCrB6wz+oNb1Lt6DHP/fF5VrM284/GMTkTsRyxj/aEvX0LpjVP2Ns +JtreI8U/VuE7Pbul2z+OQ69SHdHDP5VSkLunpeA/5btskrOJwj8UrQsoT7Xj +PwFhBNfWFsE/PwJWjfqQ5j+1C3rikVO/P7mmArNHXuk/VBGa42NcvD/HQzgo +cmjsP4QJFpAo67g/gds8lqA+7z+XbLxEEXi1P+k15SnWKPE/KKGhG4x1sT+4 +Jd3oLKvyPyNrsI6Gg6o/3ZI8pIUT9D8elWIScD+iP0x8YAdNmvU/d+NCWVjH +kT8R4+tmFgf3PxKD+mBjCDO/fnGoprBs+D+tAQwG43eSvzV8KY658Pk/jVkw +zbFKo79CBBJyxFr7P7vjX5WW0qy/mgi//T3j/D9peLTL2qOzv0eK04W5Uf4/ +Zip4oLuRuL+cMxnuBbn/PwWgWFXZb72/nqwRf2CfAEAGUTcm0V/Bvxl+SgU/ +VQFABFbmCXvdw7+5jWXfVBoCQAonzC9Hk8a/LTGZKdPbAkAgO/xvwz7Jv0yT +AHJSkANAW1IdXxW+y7+QM0oOCVQEQFyPQLDmdM6/f5LHqMAKBUBLyQt7bn/Q +v0GFXbPgvQVAKYgOR4q+0b8pttUROIAGQPBYtpZBGdO/eWz7IL6OBkAzMzMz +MzPTvzt4xsQ= + "]]}, + Annotation[#, "Charting`Private`Tag$18998#3"]& ], + TagBox[ + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwB8QMO/CFib1JlAgAAAD4AAAACAAAASrFtr+hI5b8AAAAAAADgP96HPo1B +luK/Cd7SL8rM3j/HwaWlw3ffv103OdCHiN0/NNUJsMDf2b/Pb91VVEvcP3j3 +WxsDztO/15e1qA/02j/ISCAqe0jMv+vYDyDDtNk/TMBk33oBwL9EDJ9Q91vY +P6TU/5icn5+/qejD3hYL1z9K14JxjiatPwUndtCu0tU/jUgFCrB6wz/Wizz2 +O4LUP/fF5VrM284/irdyyf5K0z/aEvX0LpjVP+JiWeiZ/dE/VuE7Pbul2z+J +ZM+GQbvQP5VSkLunpeA/6mcx1nYozz8UrQsoT7XjPxjzZLmbuMw/PwJWjfqQ +5j84u9IZ7oTKP7mmArNHXuk/5ABPgAZyyD/HQzgocmjsP2hmmLDjTsY/gds8 +lqA+7z8q06cvq27EP+k15SnWKPE/SvASveeIwj+4Jd3oLKvyPwE5ewwDzsA/ +3ZI8pIUT9D8//FrHd5i+P0x8YAdNmvU/ZF9vaTyGuz8R4+tmFgf3P6BdCzj2 +zrg/fnGoprBs+D9jZePDO0K2PzV8KY658Pk/2MWkVW2Xsz9CBBJyxFr7P2o4 +H8wpLbE/mgi//T3j/D9SPfk8/z2tP0eK04W5Uf4/hFOf1D6QqD+cMxnuBbn/ +P/heFt7rC6Q/nqwRf2CfAEBZz8nTz2uePxl+SgU/VQFAO+Zgw9V9lT+5jWXf +VBoCQIBMDoG9zYc/LTGZKdPbAkCB1XKZf3pkP0yTAHJSkANAXcghL7tmeL+Q +M0oOCVQEQFGPqv2C4Y6/f5LHqMAKBUDuBWr1yR6Yv0GFXbPgvQVA/AmuO3BM +oL8pttUROIAGQF0dkuGm4aS/vKWBbpA1B0AbtJ3OIyWpvzNRliy6OAdAr6RR +/CY4qb+q/Krq4zsHQKNrMfMpS6m/mVPUZjdCB0A1UvE8L3Gpv3YBJ1/eTgdA ++krXQze9qb8wXcxPLGgHQNs1Fzo9Vaq/oxQXMciaB0BLWquaIYWrvxrAK+/x +nQdAwqimKB6Yq7+Sa0CtG6EHQMjOiYMaq6u/gMJpKW+nB0C/fHmgEtGrv1xw +vCEWtAdApNwWegAdrL8WzGESZM0HQLyEysTStKy/jXd20I3QB0AOnXAuzMes +vwQji4630wdAYb68ZsXarL/zebQKC9oHQO3rs0O3AK2/0CcHA7LmB0BaXBOy +mEytv0fTG8Hb6QdATLDfk5Bfrb++fjB/Be0HQB2zKUWIcq2/rdVZ+1jzB0DQ +KaEWd5itvySBbrmC9gdARKADN26rrb+cLIN3rPkHQAfLTSdlvq2/E9iXNdb8 +B0D1+5nnW9Gtv4qDrPP//wdAMnICeFLkrb83Aer1 + "]]}, + Annotation[#, "Charting`Private`Tag$18998#4"]& ]}, {}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.02853881278538813], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + 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:eJxTTMoPSmVmYGBgBGJlIGYC4gjx7RcZzpk61P62KjiXoedgoLVS+MITBL9k +q+jv03zmDiI9Xq9YSvQdQJSJoLnDdoemR8cr9B1MjIFAGMH3OcFuO1sUwV9y +fx/fHGUEPyX2jhuzhrnDk8SF10z8kfgghzzQg/NNbfYGTVNUg/P/fit9MMdQ +Fe6eU4ed1mb+U3FY9sJD7/9EMweZeXGapz+oQGgBM4dfb18fsHyM4O8A2R+h +4nCgVtYivcTcIQ0MMPkvsrS/Te9F8EHaZqxG8MH23kPwz4CAjoWDGci9iSoO +daBw87BwmNLeGnU5RsVhJhgg+Mkg//ywgLsHxoe59z8I1FvA/dMNCm9GC7h/ +udxUS5leIcIDxoeFF4wPtjbTAEKfNHe4LV2TaFRqAIkPY3OH60KfHM+rGTj0 +BZeoTO83c/gBsv+wPsT/e00dnoLiR1/fAT19AAAKfvOh + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, {{ + Thickness[0.02853881278538813]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.23854545454546}, + ImageSize -> {35.04043835616439, 17.49236363636364}, + BaselinePosition -> Scaled[0.3029987538415624], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.49}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.02853881278538813], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {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}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4jQQmGbqYGqzN2haoq5DhPj2iwz3EPxPGwKy +Z7GbOfhenBjzL1nPQWZenOZpBTOHB2CF+g4SU69wZmwyc3iepf1t+lx9hy3m +Pw6laJnD+QVrum9nHEDwVZ80zztrZeEQHxKkvmClHpyfCnJHmy6c/6Z4q+hv +bR2o+eYOCSD1nNoOJUDh03wIfoyC48fkP2Zw/qG25eGnHpk5rAcZxKvtYKC1 +UvjCETOHgFvSNYlC2hDzFpk5NLAc7TcU13YA+7/NzEEcJK6k5XBD6JPj+Wlm +DukgcTYth5OHndZmvjNz8DnBbjs7VAviPylzhxcg92VrOfD6r5+SGoHgJ8fe +cWOWsIDzr4PMa7OAiFdowvlGxkBwWR3On9LeGnX5j6oDl5tqKdMvcweP/bWy +FsdVHJbc38c3RxnB13jLu89gpxmcDw6vKDOHMyDAowpxp6iZwwaQRK8qPD5N +QPZ9VnVgAIEDpg4vQPERq+bgB4rXyaYOjaDwCFd3+LrzVtffUFOHht9WBec0 +1KHhY+rwNHHhNRN+NYc6kPgMqHyGKiS8lplCwrVJBZ4+noDU66vAwxccblwq +Dhv18hYz3kHwDwC9kT7FHM4Hm59h4TATBG6qQMLthQXcfrB5ZpYQ/55Rg6Sr +WEuI+6erw/nSIHcUaMD5zJxd8sl+mg79wSUq0/UtHY7v2tHLJqDlEA1KP3cs +HH68fX3AslkLkn4WWTjoK8p/ybmmBdGfa+Fw/mrYG/3fWvD40QelKxVoetsE +1e+sA3HvDwto+tKF8+csUt75R10PzgerP6zvYFsZscLUF+rfTAMo3xzOB8fX +BjM4PwWk3wOa32wNIOnhpik8f6HnZwDIbKDV + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, {{ + Thickness[0.02853881278538813]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.03675716064757}, + ImageSize -> {35.04043835616439, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.08305647840531562], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGYC4pkg8FPCQWpenObpCyoOMP4Oh6ZHxyNUHNzX +HF3OsEPeIQ0MMPndNp670poU4PwPi9YrnNVQxMn3uzgx5t9iFbj5NZ82BGTP +UnGYAbJ3J4I/Z5Hyzj/P0fjqqnA+2JxkBD/glnRN4iRVuPkpsXfcmH+oOqz4 +9rLizAQlh0cR4tsvPlB1OAMCexQdNunlLWa8A+WfkXFICAlSX3BS1WGtkA5f ++jpFBwOtlcIXXDQd1oD4ecoO/0FAXhvinx/KDicOO63NlNOB87eD/FOhC+dP +mcBfZdatD7cfHK6ZBg6poGBwU4DzWxXYVc98kYXzeyO6/RkNZBwcgcbNsDZw +qLn/45ZxtpTD0V07etkm6DvI71qwL/WcpMMGkPtldB2mg/TdlILzH7jGO84K +lHaQAMXnB12HdJB9z6QdtoDk/+g5mBiDgKzDcZB5BfoOMaoRMufmyMP51SD7 +ohXhfLC7IpUcdBTlv+SU6cH5LJxd8snvdOB88R6vVyxTtB34YwPuG00H6geF +j52Ww5u23G4jaXkHUZC8iIYDenoDAMDOG9o= + "]]}, {{ + Thickness[0.08305647840531562]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {18.06422914072229, 26.03675716064757}, + ImageSize -> {12.042819427148194`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {13., 18.}, PlotRange -> {{0., 12.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.07062146892655367], + StyleBox[{ + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQnZ4GBM8+2v98+/qApbKKwzavDRZzfv6A88+AgA+D +A4z/svZx9vk1DA4ea44uZ/ihDOfvza95OzNVCc63L3GsPT2HE43P7HCge1+T +STKDQ39Etz/jByao+b/s/4PAfiYH763+x5PbPtpf570tllqG4JsYg8B/e4h6 +JocW8VrWzGOY/D6QuRtY4PzC5SUb/vGz4+RD9As4oJov4ACz/waINuNxgLkP +Ej4ccPdD7OOA+w+VzwnnP3CNd5x1URTi3x5uhy/7Pm5N/ybiMGMmCPA5MIDA +AhGIukJBOL9dgV31zBUhVHlBEQeNTyovZ70UcWgDy4s4iFROKjmbIgqhXaQc +qu//uGX8WsLhLMg+HRmHHcFWEf/VpRxqQOLZcg73webIw/nhnGLtxvyKcD7Y +nC3KDttB+tilHOYsUt7557gqxB0NInD+m7bcbqPdQnC+MEgfi6DDjAn8VWbd +qg7Bby9/nOEo4PAkceE1E31VeHhA0osynH9i145etg2qDgFPPC+ZXmaHmweO +h29MEL67qoMHKD2w/bEPvCVdk/hJxQGWfjeoPmmedxbBh6VXAFUATEo= + "], {{ + 3.08594, 8.94844}, {3.08594, 9.11406}, {3.14531, + 9.245310000000002}, {3.3000000000000003`, 9.44844}, { + 3.6468799999999995`, 9.88906}, {4.134379999999999, 10.1156}, { + 4.731249999999999, 10.1156}, {5.851559999999999, 10.1156}, { + 6.56719, 9.32969}, {6.56719, 8.089060000000002}, {6.56719, + 6.75469}, {5.768750000000001, 5.76563}, {4.695309999999999, + 5.76563}, {4.039059999999999, 5.76563}, {3.5515600000000003`, + 5.9796900000000015`}, {3.08594, 6.468749999999999}, {3.08594, + 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGZigIINCg5S8+I0T19QcYDxdzg0PToeoeLwNHHh +NRN+FYc0MMDk+5xgt529FcHfpJe3mDFGFSe/keVov+F1Dbj561WfNM87q+Ew +YyYQ7ETw5yxS3vnnORpfXRXO97s4MeZfMoIfcEu6JnGSKtz8lNg7bsw/VB18 +QeoOqzk8ihDffvGBqsOxXTt62T6oQtx1R9VhJhgoOSSEBKkvOKnqYGazN2ja +Q1UHA62VwhdcNB1MQfyF6g7/QUBe2+FV8VbR39oaDicOO63NlNOB87eD/FOh +C+dPmcBfZdatD7cfbE2mAcSflSpwfvnhba4zdZXh/Or7P24Zeys5OAKNm2Ft +4PBh0XqFsxmKDkdB7p6g7+A8oVkoTUrRYQPI/TK6EHfNR/CVrz0KZrij6CAB +is8Pug7poGBXU3LYApL/o+dwBgyUHI6DzCvQh/iXUQXOZ+Hskk/uU4Xzwcp7 +1Bx0FOW/5JTpwflgde904HzxHq9XLFO0HbaY/ziUcgqoHxQ+dloOK7+9rDhz +QNlBFCQvouGAnt4AakwW/w== + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4vNXw97oz9ZwaFVgVz0zRdQBxtf4pPJy1kox +h5TYO27MEeoObmuOLmeYIeawQfVJ87yzag4KuxbsS+0Tc3iRpf1tuiyCL1w5 +qeTsEkW4fuVrj4IZ5ig6mBgDwWURB/7YgPtG0xUdREDqUkQcqu//uGVcreiQ +ngYEzwQd9uTXvJ3JqgTnlx/e5jrTVsnhTVtut1G0iMN/EPBXcohRjZA5JyPq +ADLWeLGSQxXIHG9Rhw+L1iuc/aEM558BgR41OP9V8VbR39pqDjNBQFIE4v67 +qhD73IQdHkWIb7+YoApxF7cQ3D6wOWdYHFZ+e1lx5oGiw3Xe22Kp25gg8vMV +HaJB7qlhdGAAgQ0KDjlTEwotin/Zg/1/RsEh4InnJdPJ3yH8NUoQff+/27uD +wvUEgr9WSIcvvU8Zzq/9bVVwrkMDrh/Gl9koNp/pwS/7v99KH8yZqOFw4fex +6/Mi/9kH3pKuSdyk4XCwe1+TyWImh/Xg+NJwaBGvZc1kY3P49fb1AUtnBP/Y +rh29bB/UHfxB5gczQMND3YFF/xfXJZ5/9pv08hYzyqg7sIL5f+1h4QPjP3CN +d5z1UQnOR09PAFTGHcA= + "]]}, {{ + Thickness[0.07062146892655367]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {21.23816189290162, 26.03675716064757}, + ImageSize -> {14.158774595267746`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {15., 18.}, PlotRange -> {{0., 14.16}, {0., 17.36}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, 0.33333333333333337`]], {}}}, + AspectRatio -> Full, ImageSize -> {20, 10}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.130718954248366, 0.5359477124183007, 0.130718954248366], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.196078431372549`", ",", "0.803921568627451`", ",", + "0.196078431372549`"}], "]"}], 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.196078431372549, 0.803921568627451, 0.196078431372549]; + 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.196078431372549, 0.803921568627451, 0.196078431372549], + Editable -> False, Selectable -> False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[1., 0., 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"1.`", ",", "0.`", ",", "0.`"}], "]"}], + NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[1., 0., 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[1., 0., 0.], Editable -> False, Selectable -> + False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0., 0., 1.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0., 0., 0.6666666666666667], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.`", ",", "0.`", ",", "1.`"}], "]"}], + 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., 0., 1.]; + 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., 0., 1.], Editable -> False, Selectable -> + False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[0.22222222222222227`, 0., 0.22222222222222227`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.33333333333333337`", ",", "0", ",", + "0.33333333333333337`"}], "]"}], 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.33333333333333337`, 0, 0.33333333333333337`]; + 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.33333333333333337`, 0, 0.33333333333333337`], + Editable -> False, Selectable -> False]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->1, + Axes->{True, True}, + AxesLabel->{ + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], + FormBox[ + GraphicsBox[{ + Thickness[0.1023541453428864], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]]}, { + Thickness[0.1023541453428864]}, StripOnInput -> False]}, { + ImageSize -> {14.662804483188044`, 24.508064757160646`}, + ImageSize -> {9.77520298879203, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.77}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm]}, + AxesOrigin->{0, 0}, + AxesStyle->Directive[ + Thickness[Large], 16], + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameStyle->Directive[ + Thickness[Large], 18], + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{-1, 2.8}, {-0.3, 0.5}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Line[CompressedData[" +1:eJwVj3k41HkcgMfVL6p9SmKjrXQ4WlnCGiWfr9qNJkdkPSJS6UCrYxPFg9F6 +inZktY1jszoMOpQcZTQzn3EU2zNjZYxrmmHJVUJNjDNr/3if99/3NT58yvuo +Oo1Gc5/nf+tR+/vn5lQYdm6so4ypgJxoM67flArTGRkLnsQpwOSdKuXJZxVy +1zpsKYpRgIOYbXlkUIWUODaZE6mAoOvNkS+bVJi3UZPODlXAvTV7NVkcFcpb +dG9EeSnAie5ibLhHhZ4OVp5bjRVwPNQuwJY9jlZfwmpQKIfTnu6mU0vGMFSN +V3Bt5A2sr5gd5+cqsb6q1t/R4g1YTsb2FdM/Ic/s9/f8kzIY4dtb2pWO4gZt +h2jNnA4o09FXRlwbxpL8TImprB3GbtlsZce8xxK+ZNNS7Xbo7x8WGp0fQNeY +poPirW2w2VbmkZPXiwvGrxw5frEVFJedWM7sbrR7Z3jk5b0WqKvicGqiOvHq +nyHW6v1SsJVqFws72zFaeUauayaFaFWAkUaDBFtr/ZMG/Jqh3nXtphhXEQbu +m57OzpCAmzCk86KaEH0CoiJ0XzZBXvNc5s3cXOzWfiYImngNjNbEM6kmRcCO +fCS/TH8NLFctneKLNcD3Z05EnmgE1Ytef5GsAQymDGqZbv9Ah+7YZ8tMKWRY +v029XSAG33+3bX/OkYHzU/sV4ToiuOGd9ryA0wXby6fow1degV7RIjPP8h5Y +VXDOZ7qvHkDdlzWV1geuy4OWVAfXATdfvdQlaBBuixqYW7pfQN1OutnZE0Og +iB7/YLGzFpgyR/YtpxEIzWWpurAaBu16zVvMPkJbhWxi9aoqqNgoH7B48Al6 +nQ6HL6EhyNMd85KWfwYubWjN3rnn4BYbTLlnj4FPYU9NPr8ClvW8P6ZPqSD1 +h8o7p0vLIe5MYX7xyQlYFZM7waooAbtY81Tu6CQMWvbGxE0+gh2aumdr/aeh +ee/u2LrRQsheiLPbe2Zgj1NyAP3YHXBJkSRxvb4AtemrQ2tuZMJNm5XDWtw5 +iGdeabD/Phn+ergsPjiXRoR+v9qMcei4Mo6hBT+pEWrd34xZzWTkso52+hiq +k98u7KxYkZ+Fm62zzCUydRI880vUd7vuott12lnvNA0i9F6Y8zPjHqbZML7S +9tEkLLmw51LjY4xPrysU6miRNAzsaFeWoHNSYGkXX4vMRor2rB4tR/On0mX0 +hAWkcJdY7LGZizwOMyLNjiLl60b0Ftvw0MaLbVFJpwhVWTSdQnh4f+b+u55t +FPH1Otmt7cHDrH3Nx+x3UGQ2fvAxFcrD82qmBxUeFHGV9zA0cnloFSjytDhB +kbaMtoQpHT7e1TOwrs+myPji6qGBbj4aCr8d+ZhDkR/zEiTHR/mYHk6KjG5T +JHsbVPbN8jGhOtT8VAFFnMJ4l99+LcADp3nG+mUUSax7uq7LQ4D6okO6IWKK +rEh84NdaKUBW1PlGViNFQlaGgW+9ADXXX019Jpn/KTYzkUoFqLxQprOogyKB +nRxl06gAG00pjZI+iuQ53kptMEF0kRhVyQbn+yRBke62iII4q3itD/M/4d8c +EDkjFkn3T/spKTKUlW3+6gDiBmYEN3F8vs96/9LdYYg3LS5FPZykyPV6A1Vd +FOLytgy7lhmK9B5ske9KQky59FA5N0cRW9UftS/SEf8DxJJ7WA== + "]]}, + "Charting`Private`Tag$18998#1"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + Line[CompressedData[" +1:eJwB4QIe/SFib1JlAgAAAC0AAAACAAAA3N3d3d3d8b8AAAAAAADgP++9Ny41 +s/C/20yuphIR3z+0Chbzbo/uvzC5va9H7t0/9aAzOpZ767+yW5YyJLPcP+fn +7sAbdui/EngUAsB92z8tNNtOnaTlvy4wpgcnXdo/3oc+jUGW4r91HgGHNSTZ +P8fBpaXDd9+/d6hvPA8A2D801QmwwN/Zv1msgz6o4dY/ePdbGwPO079n5mC6 +6KrVP8hIICp7SMy/MLxRbPSI1D9MwGTfegHAvyPIC5inTtM/pNT/mJyfn7/3 +TWsQGhrSP0rXgnGOJq0/hm/evlf60D+NSAUKsHrDP4KONc55hM8/98XlWszb +zj9sddWK2j3NP9oS9fQumNU/rcgHO4rGyj9W4Ts9u6XbP68PhYS4Wsg/lVKQ +u6el4D8mjik6fRjGPxStCyhPteM/9Hhg45Clwz8/AlaN+pDmPzibvvg6XME/ +uaYCs0de6T96Ys9Oxzy+P8dDOChyaOw/L2dGk7ZfuT+B2zyWoD7vP9LaC7DS +1bQ/6TXlKdYo8T8+TuxnGdWvP7gl3egsq/I/3rXs1Icspj/dkjykhRP0P6v2 +E+WfVJo/THxgB02a9T9IkYfznip7PxHj62YWB/c/suQsFDrlhr9+caimsGz4 +P/0qtwbtU52/NXwpjrnw+T97QGKzYl2ov0IEEnLEWvs/zQZmmTq1sL+aCL/9 +PeP8P7IU9vElnbW/R4rThblR/j+rszdy5DG6v5wzGe4Fuf8/H2vjv6Wvvr+e +rBF/YJ8AQPYkNZNkx8G/GX5KBT9VAUDlXFHaXw3Ev7mNZd9UGgJAfyjbLQyE +xr8tMZkp09sCQFkAGug578i/TJMAclKQA0C8oDE20TDLv5AzSg4JVARAytS2 +kBmjzb9/kseowAoFQGDRFH/L68+/QYVds+C9BUAa7RNqfxTRvym21RE4gAZA +WTvUmnFL0r8REREREREHQDMzMzMzM9O/lT5pog== + "]]}, + "Charting`Private`Tag$18998#2"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + Line[CompressedData[" +1:eJwBgQN+/CFib1JlAgAAADcAAAACAAAAFAdZ5///978PT57nxOzVP514KLlY ++ve/JiCucKvq1T8m6veKsfT3v1nvHfeR6NU/Oc2WLmPp978JRBn8XuTVP16T +1HXG0ve/qspg5vjb1T+pH1AEjaX3vyaJQTssy9U/PjhHIRpL97+R75zekKnV +P2dpNVs0lva/6YJYzFFm1T9wT00n+g31v0aLS85a1NQ/I7j99r2f87/aJb7C +2EvUPy75fOawOPK/HzMhIsrF0z/vvTcuNbPwv3R2HJcVNNM/tAoW826P7r9v +s825zKvSP/WgMzqWe+u/glxTg7oX0j/n5+7AG3bov/Vr5OLrhdE/LTTbTp2k +5b8shZUJd/3QP96HPo1BluK/4eoRGO5o0D/HwaWlw3ffv4ZQHGlKu88/NNUJ +sMDf2b+O6P7D16jOP3j3WxsDztO/hLr0o0V9zT/ISCAqe0jMvxaXwY2/Y8w/ +TMBk33oBwL9AqJ8k9i/LP6TU/5icn5+/zkK47JL+yT9K14JxjiatPyJWkUA7 +3sg/jUgFCrB6wz+oNb1Lt6DHP/fF5VrM284/GMTkTsRyxj/aEvX0LpjVP2Ns +JtreI8U/VuE7Pbul2z+OQ69SHdHDP5VSkLunpeA/5btskrOJwj8UrQsoT7Xj +PwFhBNfWFsE/PwJWjfqQ5j+1C3rikVO/P7mmArNHXuk/VBGa42NcvD/HQzgo +cmjsP4QJFpAo67g/gds8lqA+7z+XbLxEEXi1P+k15SnWKPE/KKGhG4x1sT+4 +Jd3oLKvyPyNrsI6Gg6o/3ZI8pIUT9D8elWIScD+iP0x8YAdNmvU/d+NCWVjH +kT8R4+tmFgf3PxKD+mBjCDO/fnGoprBs+D+tAQwG43eSvzV8KY658Pk/jVkw +zbFKo79CBBJyxFr7P7vjX5WW0qy/mgi//T3j/D9peLTL2qOzv0eK04W5Uf4/ +Zip4oLuRuL+cMxnuBbn/PwWgWFXZb72/nqwRf2CfAEAGUTcm0V/Bvxl+SgU/ +VQFABFbmCXvdw7+5jWXfVBoCQAonzC9Hk8a/LTGZKdPbAkAgO/xvwz7Jv0yT +AHJSkANAW1IdXxW+y7+QM0oOCVQEQFyPQLDmdM6/f5LHqMAKBUBLyQt7bn/Q +v0GFXbPgvQVAKYgOR4q+0b8pttUROIAGQPBYtpZBGdO/eWz7IL6OBkAzMzMz +MzPTvzt4xsQ= + "]]}, "Charting`Private`Tag$18998#3"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], + Line[CompressedData[" +1:eJwB8QMO/CFib1JlAgAAAD4AAAACAAAASrFtr+hI5b8AAAAAAADgP96HPo1B +luK/Cd7SL8rM3j/HwaWlw3ffv103OdCHiN0/NNUJsMDf2b/Pb91VVEvcP3j3 +WxsDztO/15e1qA/02j/ISCAqe0jMv+vYDyDDtNk/TMBk33oBwL9EDJ9Q91vY +P6TU/5icn5+/qejD3hYL1z9K14JxjiatPwUndtCu0tU/jUgFCrB6wz/Wizz2 +O4LUP/fF5VrM284/irdyyf5K0z/aEvX0LpjVP+JiWeiZ/dE/VuE7Pbul2z+J +ZM+GQbvQP5VSkLunpeA/6mcx1nYozz8UrQsoT7XjPxjzZLmbuMw/PwJWjfqQ +5j84u9IZ7oTKP7mmArNHXuk/5ABPgAZyyD/HQzgocmjsP2hmmLDjTsY/gds8 +lqA+7z8q06cvq27EP+k15SnWKPE/SvASveeIwj+4Jd3oLKvyPwE5ewwDzsA/ +3ZI8pIUT9D8//FrHd5i+P0x8YAdNmvU/ZF9vaTyGuz8R4+tmFgf3P6BdCzj2 +zrg/fnGoprBs+D9jZePDO0K2PzV8KY658Pk/2MWkVW2Xsz9CBBJyxFr7P2o4 +H8wpLbE/mgi//T3j/D9SPfk8/z2tP0eK04W5Uf4/hFOf1D6QqD+cMxnuBbn/ +P/heFt7rC6Q/nqwRf2CfAEBZz8nTz2uePxl+SgU/VQFAO+Zgw9V9lT+5jWXf +VBoCQIBMDoG9zYc/LTGZKdPbAkCB1XKZf3pkP0yTAHJSkANAXcghL7tmeL+Q +M0oOCVQEQFGPqv2C4Y6/f5LHqMAKBUDuBWr1yR6Yv0GFXbPgvQVA/AmuO3BM +oL8pttUROIAGQF0dkuGm4aS/vKWBbpA1B0AbtJ3OIyWpvzNRliy6OAdAr6RR +/CY4qb+q/Krq4zsHQKNrMfMpS6m/mVPUZjdCB0A1UvE8L3Gpv3YBJ1/eTgdA ++krXQze9qb8wXcxPLGgHQNs1Fzo9Vaq/oxQXMciaB0BLWquaIYWrvxrAK+/x +nQdAwqimKB6Yq7+Sa0CtG6EHQMjOiYMaq6u/gMJpKW+nB0C/fHmgEtGrv1xw +vCEWtAdApNwWegAdrL8WzGESZM0HQLyEysTStKy/jXd20I3QB0AOnXAuzMes +vwQji4630wdAYb68ZsXarL/zebQKC9oHQO3rs0O3AK2/0CcHA7LmB0BaXBOy +mEytv0fTG8Hb6QdATLDfk5Bfrb++fjB/Be0HQB2zKUWIcq2/rdVZ+1jzB0DQ +KaEWd5itvySBbrmC9gdARKADN26rrb+cLIN3rPkHQAfLTSdlvq2/E9iXNdb8 +B0D1+5nnW9Gtv4qDrPP//wdAMnICeFLkrb83Aer1 + "]]}, + "Charting`Private`Tag$18998#4"]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, DisplayFunction -> Identity, + PlotRangePadding -> {{0, 0}, {0, 0}}, PlotRangeClipping -> True, + ImagePadding -> All, DisplayFunction -> Identity, AspectRatio -> 1, + Axes -> {True, True}, AxesLabel -> { + Graphics[{ + Thickness[0.10504201680672269`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, + Thickness[0.10504201680672269`]]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.1023541453428864], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]]}, + Thickness[0.1023541453428864]]}, { + ImageSize -> {14.662804483188044`, 24.508064757160646`}, + ImageSize -> {9.77520298879203, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.77}, {0., 16.34}}, + AspectRatio -> Automatic}]}, AxesOrigin -> {0, 0}, AxesStyle -> + Directive[ + Thickness[Large], 16], DisplayFunction :> Identity, + Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, PlotRange -> {{-1, 2.8}, {-0.3, 0.5}}, + PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], { + Placed[ + LineLegend[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}, { + Graphics[{ + Thickness[0.02853881278538813], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + 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:eJxTTMoPSmVmYGBgBGJlIGYC4gjx7RcZzpk61P62KjiXoedgoLVS+MITBL9k +q+jv03zmDiI9Xq9YSvQdQJSJoLnDdoemR8cr9B1MjIFAGMH3OcFuO1sUwV9y +fx/fHGUEPyX2jhuzhrnDk8SF10z8kfgghzzQg/NNbfYGTVNUg/P/fit9MMdQ +Fe6eU4ed1mb+U3FY9sJD7/9EMweZeXGapz+oQGgBM4dfb18fsHyM4O8A2R+h +4nCgVtYivcTcIQ0MMPkvsrS/Te9F8EHaZqxG8MH23kPwz4CAjoWDGci9iSoO +daBw87BwmNLeGnU5RsVhJhgg+Mkg//ywgLsHxoe59z8I1FvA/dMNCm9GC7h/ +udxUS5leIcIDxoeFF4wPtjbTAEKfNHe4LV2TaFRqAIkPY3OH60KfHM+rGTj0 +BZeoTO83c/gBsv+wPsT/e00dnoLiR1/fAT19AAAKfvOh + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, { + Thickness[0.02853881278538813]}, StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.23854545454546}, + ImageSize -> {35.04043835616439, 17.49236363636364}, + BaselinePosition -> Scaled[0.3029987538415624], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.49}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.02853881278538813], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {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}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4jQQmGbqYGqzN2haoq5DhPj2iwz3EPxPGwKy +Z7GbOfhenBjzL1nPQWZenOZpBTOHB2CF+g4SU69wZmwyc3iepf1t+lx9hy3m +Pw6laJnD+QVrum9nHEDwVZ80zztrZeEQHxKkvmClHpyfCnJHmy6c/6Z4q+hv +bR2o+eYOCSD1nNoOJUDh03wIfoyC48fkP2Zw/qG25eGnHpk5rAcZxKvtYKC1 +UvjCETOHgFvSNYlC2hDzFpk5NLAc7TcU13YA+7/NzEEcJK6k5XBD6JPj+Wlm +DukgcTYth5OHndZmvjNz8DnBbjs7VAviPylzhxcg92VrOfD6r5+SGoHgJ8fe +cWOWsIDzr4PMa7OAiFdowvlGxkBwWR3On9LeGnX5j6oDl5tqKdMvcweP/bWy +FsdVHJbc38c3RxnB13jLu89gpxmcDw6vKDOHMyDAowpxp6iZwwaQRK8qPD5N +QPZ9VnVgAIEDpg4vQPERq+bgB4rXyaYOjaDwCFd3+LrzVtffUFOHht9WBec0 +1KHhY+rwNHHhNRN+NYc6kPgMqHyGKiS8lplCwrVJBZ4+noDU66vAwxccblwq +Dhv18hYz3kHwDwC9kT7FHM4Hm59h4TATBG6qQMLthQXcfrB5ZpYQ/55Rg6Sr +WEuI+6erw/nSIHcUaMD5zJxd8sl+mg79wSUq0/UtHY7v2tHLJqDlEA1KP3cs +HH68fX3AslkLkn4WWTjoK8p/ybmmBdGfa+Fw/mrYG/3fWvD40QelKxVoetsE +1e+sA3HvDwto+tKF8+csUt75R10PzgerP6zvYFsZscLUF+rfTAMo3xzOB8fX +BjM4PwWk3wOa32wNIOnhpik8f6HnZwDIbKDV + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, { + Thickness[0.02853881278538813]}, StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.03675716064757}, + ImageSize -> {35.04043835616439, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.08305647840531562], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, + 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGYC4pkg8FPCQWpenObpCyoOMP4Oh6ZHxyNUHNzX +HF3OsEPeIQ0MMPndNp670poU4PwPi9YrnNVQxMn3uzgx5t9iFbj5NZ82BGTP +UnGYAbJ3J4I/Z5Hyzj/P0fjqqnA+2JxkBD/glnRN4iRVuPkpsXfcmH+oOqz4 +9rLizAQlh0cR4tsvPlB1OAMCexQdNunlLWa8A+WfkXFICAlSX3BS1WGtkA5f ++jpFBwOtlcIXXDQd1oD4ecoO/0FAXhvinx/KDicOO63NlNOB87eD/FOhC+dP +mcBfZdatD7cfHK6ZBg6poGBwU4DzWxXYVc98kYXzeyO6/RkNZBwcgcbNsDZw +qLn/45ZxtpTD0V07etkm6DvI71qwL/WcpMMGkPtldB2mg/TdlILzH7jGO84K +lHaQAMXnB12HdJB9z6QdtoDk/+g5mBiDgKzDcZB5BfoOMaoRMufmyMP51SD7 +ohXhfLC7IpUcdBTlv+SU6cH5LJxd8snvdOB88R6vVyxTtB34YwPuG00H6geF +j52Ww5u23G4jaXkHUZC8iIYDenoDAMDOG9o= + "]]}, { + Thickness[0.08305647840531562]}, StripOnInput -> False]}, { + ImageSize -> {18.06422914072229, 26.03675716064757}, + ImageSize -> {12.042819427148194`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {13., 18.}, PlotRange -> {{0., 12.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.07062146892655367], + Style[{ + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQnZ4GBM8+2v98+/qApbKKwzavDRZzfv6A88+AgA+D +A4z/svZx9vk1DA4ea44uZ/ihDOfvza95OzNVCc63L3GsPT2HE43P7HCge1+T +STKDQ39Etz/jByao+b/s/4PAfiYH763+x5PbPtpf570tllqG4JsYg8B/e4h6 +JocW8VrWzGOY/D6QuRtY4PzC5SUb/vGz4+RD9As4oJov4ACz/waINuNxgLkP +Ej4ccPdD7OOA+w+VzwnnP3CNd5x1URTi3x5uhy/7Pm5N/ybiMGMmCPA5MIDA +AhGIukJBOL9dgV31zBUhVHlBEQeNTyovZ70UcWgDy4s4iFROKjmbIgqhXaQc +qu//uGX8WsLhLMg+HRmHHcFWEf/VpRxqQOLZcg73webIw/nhnGLtxvyKcD7Y +nC3KDttB+tilHOYsUt7557gqxB0NInD+m7bcbqPdQnC+MEgfi6DDjAn8VWbd +qg7Bby9/nOEo4PAkceE1E31VeHhA0osynH9i145etg2qDgFPPC+ZXmaHmweO +h29MEL67qoMHKD2w/bEPvCVdk/hJxQGWfjeoPmmedxbBh6VXAFUATEo= + "], {{ + 3.08594, 8.94844}, {3.08594, 9.11406}, {3.14531, + 9.245310000000002}, {3.3000000000000003`, 9.44844}, { + 3.6468799999999995`, 9.88906}, {4.134379999999999, 10.1156}, { + 4.731249999999999, 10.1156}, {5.851559999999999, 10.1156}, { + 6.56719, 9.32969}, {6.56719, 8.089060000000002}, {6.56719, + 6.75469}, {5.768750000000001, 5.76563}, {4.695309999999999, + 5.76563}, {4.039059999999999, 5.76563}, {3.5515600000000003`, + 5.9796900000000015`}, {3.08594, 6.468749999999999}, {3.08594, + 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, + 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGZigIINCg5S8+I0T19QcYDxdzg0PToeoeLwNHHh +NRN+FYc0MMDk+5xgt529FcHfpJe3mDFGFSe/keVov+F1Dbj561WfNM87q+Ew +YyYQ7ETw5yxS3vnnORpfXRXO97s4MeZfMoIfcEu6JnGSKtz8lNg7bsw/VB18 +QeoOqzk8ihDffvGBqsOxXTt62T6oQtx1R9VhJhgoOSSEBKkvOKnqYGazN2ja +Q1UHA62VwhdcNB1MQfyF6g7/QUBe2+FV8VbR39oaDicOO63NlNOB87eD/FOh +C+dPmcBfZdatD7cfbE2mAcSflSpwfvnhba4zdZXh/Or7P24Zeys5OAKNm2Ft +4PBh0XqFsxmKDkdB7p6g7+A8oVkoTUrRYQPI/TK6EHfNR/CVrz0KZrij6CAB +is8Pug7poGBXU3LYApL/o+dwBgyUHI6DzCvQh/iXUQXOZ+Hskk/uU4Xzwcp7 +1Bx0FOW/5JTpwflgde904HzxHq9XLFO0HbaY/ziUcgqoHxQ+dloOK7+9rDhz +QNlBFCQvouGAnt4AakwW/w== + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4vNXw97oz9ZwaFVgVz0zRdQBxtf4pPJy1kox +h5TYO27MEeoObmuOLmeYIeawQfVJ87yzag4KuxbsS+0Tc3iRpf1tuiyCL1w5 +qeTsEkW4fuVrj4IZ5ig6mBgDwWURB/7YgPtG0xUdREDqUkQcqu//uGVcreiQ +ngYEzwQd9uTXvJ3JqgTnlx/e5jrTVsnhTVtut1G0iMN/EPBXcohRjZA5JyPq +ADLWeLGSQxXIHG9Rhw+L1iuc/aEM558BgR41OP9V8VbR39pqDjNBQFIE4v67 +qhD73IQdHkWIb7+YoApxF7cQ3D6wOWdYHFZ+e1lx5oGiw3Xe22Kp25gg8vMV +HaJB7qlhdGAAgQ0KDjlTEwotin/Zg/1/RsEh4InnJdPJ3yH8NUoQff+/27uD +wvUEgr9WSIcvvU8Zzq/9bVVwrkMDrh/Gl9koNp/pwS/7v99KH8yZqOFw4fex +6/Mi/9kH3pKuSdyk4XCwe1+TyWImh/Xg+NJwaBGvZc1kY3P49fb1AUtnBP/Y +rh29bB/UHfxB5gczQMND3YFF/xfXJZ5/9pv08hYzyqg7sIL5f+1h4QPjP3CN +d5z1UQnOR09PAFTGHcA= + "]]}, { + Thickness[0.07062146892655367]}, StripOnInput -> False]}, { + ImageSize -> {21.23816189290162, 26.03675716064757}, + ImageSize -> {14.158774595267746`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {15., 18.}, PlotRange -> {{0., 14.16}, {0., 17.36}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {}, LegendLayout -> "Column"], {Right, Top}, + Identity]}]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{ + 3.8011970307917*^9, {3.801209933896214*^9, 3.801209947181204*^9}, + 3.802144342726698*^9, {3.802144436275229*^9, 3.802144470772834*^9}, + 3.802144523681036*^9, 3.802144654188965*^9, {3.802144706014353*^9, + 3.802144746644208*^9}, 3.802144792743145*^9, 3.802144835136469*^9, + 3.8042358502106113`*^9, {3.804235880788723*^9, 3.804235946878051*^9}, { + 3.804247350964299*^9, 3.804247380314415*^9}, 3.8042474198026247`*^9, { + 3.804247571539447*^9, 3.8042475912181873`*^9}, 3.804247676158637*^9, { + 3.80424771815418*^9, 3.804247737911091*^9}, {3.804247943709815*^9, + 3.804248010995947*^9}, 3.804248108394116*^9, 3.80424927898335*^9, + 3.804397614420239*^9, 3.804397645749982*^9, 3.804414282216022*^9, + 3.8044143199672823`*^9, {3.8044143687422857`*^9, 3.804414396823764*^9}, + 3.8044144323581953`*^9, {3.8044144756208353`*^9, 3.804414484818473*^9}, + 3.804414755891314*^9, {3.804414814210527*^9, 3.804414814994397*^9}, { + 3.804419423829937*^9, 3.804419442630877*^9}, 3.804419490975504*^9, + 3.8044195401542892`*^9, {3.8044211280467253`*^9, 3.8044211306431313`*^9}}, + CellLabel->"Out[89]=",ExpressionUUID->"e9ba8c85-bc48-415d-b020-e4d2f6d02579"] +}, Open ]], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8BCyrWfqqoeQBT7GiY7 +/AfAYqe8bieoHkDERqVcdvgHwIKEwz2kpR5AJt65yezwB8DEPtHbnaAeQOoM +46PZ4QfARrPsF5GWHkBwajVYs8MHwEqcI5B3gh5AfiXawGaHB8BUbpGARFoe +QJqbI5LNDgfAZhJtYd4JHkCf34hvUQkGwBWVsJ+LWx1AFtBTTykVBcC5iuI0 +xrgcQMhQU0TLJQTAheCMLTIZHEBIKSV0IyIDwNpww6IXbBtAOq5cps8vAsAm +dOhuisoaQPqKZhMyKQHA/LGZt3YbGkD196SVXicAwPhPw2OUbxlAxCKSNL5t +/r/sYNtmP88YQDsFf7MrZPy/aax/5mMhGECUQDc3QX36v9xqEr0VfxdAY5xY +5eqf+L92iR33+N8WQM+nHgkBmva/muK0rVUzFkAeDLAxv7b0v7WuOrs/khVA +CiDmz+mq8r9YtUxFo+MUQGxUhZioqPC/JBzXMjg4FEBgw9/LHpLtv+X1T3da +mBNAIj3+UcWB6b8wClU49uoSQKlos+G7tuW/cZFIUB9JEkBq87Fci5rhvzxT +yOTBmRFALn4FWQYj278udcDcle0QQBN51AuWm9O/FgqnK/dMEEDXZGwqr+PG +vxGzM+6jPQ9Ad3oqjsmVrr/iN/YydPgNQKqPOECkMK0/AX2pPqe5DECOaYHW +YILHPzQ3dUPNXwtADfRMO6xR0z9S1x32DR0KQOB0xjR2hNs/hezeoUG/CEDu +uU3Cd8jhPwXCkBTYZwdApoehYGSJ5T9yfR81iScGQCX2qxN4m+k/9K3GTi3M +BEDesh+9O2jtP2DEShbshwNAVZfgiOuQ8D8cm7+kDUoCQJ6ljL1MlvI/7OZM +LCLxAEAEW23tBXn0P1AxbsOiXv8/zmCpp1KE9j/tfnMg56T8P7UNGl33bPg/ +ZJgy2WAZ+j8mmiHoB0z6P3gy0x+gmvc/+naE/atT/D+ytqRYxeX0P+v6Gw6o +OP4/xgYw7R9f8j+gZ4fUGyMAQACC2OfARO8/kEHMjBklAUCq9xMRzeTpPw5v +q0LDFQJACgXD8UPh5D++RLi9thoDQGrNp20N494//W1fNlYOBEAgwLBmaLzU +PwEH0pkr/QRAlWp/LrORxT82SHLCSgAGQFVVZ2176yi/+tys6BXyBkCAv2cO +fizEv0RsyJBN9gZAAFteu3aGxL+N++M4hfoGQGr2VGhv4MS/IBobifQCB0BV +LULCYJTFv0dXiSnTEwdAQJscdkP8xr+U0WVqkDUHQAB30d0IzMm/LsYe7Ap5 +B0CALjutk2vPv3hVOpRCfQdAAMoxWozFz7/B5FU8eoEHQLUylIPCD9C/VAON +jOmJB0Aqzoowu2nQv3tA+yzImgdAIAV4iqwd0b/IutdthbwHQABzUj6PhdK/ +EkrzFb3AB0DAwM2Ui7LSv1zZDr70xAdAgA5J64ff0r/v90UOZM0HQPWpP5iA +OdO/FjW0rkLeB0Dq4Czyce3Tv2DEz1Z64gdAqi6oSG4a1L+pU+v+seYHQGB8 +I59qR9S/PHIiTyHvB0DVFxpMY6HUv4YBPvdY8wdAlWWVol/O1L/QkFmfkPcH +QFWzEPlb+9S/GiB1R8j7B0AVAYxPWCjVv2OvkO///wdAyk4HplRV1b+81E6m + + "]]}, Annotation[#, "Charting`Private`Tag$263551#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8AGrR1NVVUjQBT7GiY7 +/AfA39Ji6HJTI0DERqVcdvgHwLf4p4OQUSNAJt65yezwB8BoRDK6y00jQOoM +46PZ4QfAyttGJ0JGI0BwajVYs8MHwI0KcAEvNyNAfiXawGaHB8AUaMK1CBkj +QJqbI5LNDgfAIiNnHrzcIkCf34hvUQkGwCTFGQ3+WSJAFtBTTykVBcBgPf/8 +6d8hQMhQU0TLJQTAuf1+9zpoIUBIKSV0IyIDwPnpZw9n5iBAOq5cps8vAsBy +rIMoPW0gQPqKZhMyKQHApTURvtzTH0D196SVXicAwKCiT0AJ0h5AxCKSNL5t +/r8NvPPEieEdQDsFf7MrZPy/SC1qhMDcHECUQDc3QX36v/VKRkZL6RtAY5xY +5eqf+L/c+FYdoPoaQM+nHgkBmva/kv45L6v3GUAeDLAxv7b0v7mwgkMKBhlA +CiDmz+mq8r+wup2SHwAYQGxUhZioqPC/4FTt9v7+FkBgw9/LHpLtv4Kbol0y +DxZAIj3+UcWB6b/zOSr/GwsVQKlos+G7tuW/1YQXo1kYFEBq87Fci5rhv4Un +14FNERNALn4FWQYj279wWst1Cw8SQBN51AuWm9O/zTklbB0eEUDXZGwqr+PG +v/hwUZ3lGBBAd3oqjsmVrr8pqcahA0oOQKqPOECkMK0/2JBTM9BrDECOaYHW +YILHPyQohToJZQpADfRMO6xR0z9SGIJG6oAIQOB0xjR2hNs/HbgjyDd0BkDu +uU3Cd8jhP154LnQZcQRApoehYGSJ5T+CkQQlo5ACQCX2qxN4m+k/Qlp/S5mH +AEDesh+9O2jtP833iu1uQv0/VZfgiOuQ8D8AfOmY04j5P56ljL1MlvI/bl+R +LxF+9T8EW23tBXn0P6L0z8+euPE/zmCpp1KE9j8g0q+2CkTrP7UNGl33bPg/ +gB7t4Heh4z8mmiHoB0z6P4DZnWlrStg/+naE/atT/D+q5Q19lRrAP+v6Gw6o +OP4/qrLUGFdqvL+gZ4fUGyMAQFXPy50Sh9e/kEHMjBklAUAqtwwRd9Pjvw5v +q0LDFQJAGiMGwMRY67++RLi9thoDQE1oNkwwwPG//W1fNlYOBEBKDdMuro71 +vwEH0pkr/QRAWnGdvANK+b82SHLCSgAGQCp2Hl+AVv2/+tys6BXyBkCgZAR8 +1o4AwERsyJBN9gZAMoM7zEWXAMCN++M4hfoGQMWhchy1nwDAIBobifQCB0Dq +3uC8k7AAwEdXiSnTEwdAOFm9/VDSAMCU0WVqkDUHQNJNdn/LFQHALsYe7Ap5 +B0AFN+iCwJwBwHhVOpRCfQdAmlUf0y+lAcDB5FU8eoEHQC10ViOfrQHAVAON +jOmJB0BSscTDfb4BwHtA+yzImgdAoCuhBDvgAcDIutdthbwHQDogWoa1IwLA +EkrzFb3AB0DQPpHWJCwCwFzZDr70xAdAYl3IJpQ0AsDv90UOZM0HQIiaNsdy +RQLAFjW0rkLeB0DVFBMIMGcCwGDEz1Z64gdAajNKWJ9vAsCpU+v+seYHQP1R +gagOeALAPHIiTyHvB0Aij+9I7YgCwIYBPvdY8wdAta0mmVyRAsDQkFmfkPcH +QErMXenLmQLAGiB1R8j7B0Dg6pQ5O6ICwGOvkO///wdAcAnMiaqqAsBOmTxQ + + "]]}, Annotation[#, "Charting`Private`Tag$263551#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8AgLQ7Yom0TQBT7GiY7 +/AfA57dzKeJrE0DERqVcdvgHwAMYTnkhahNAJt65yezwB8DQvF8UoGYTQOoM +46PZ4QfABVHrN51fE0BwajVYs8MHwEbySDSXURNAfiXawGaHB8DwM0H/iTUT +QJqbI5LNDgfAiLDGxmr9EkCf34hvUQkGwJcZcGykgxJAFtBTTykVBcDj8MLo +0RESQMhQU0TLJQTA+qjxwhyiEUBIKSV0IyIDwGgg8W/LKBFAOq5cps8vAsA0 +9cj+bbcQQPqKZhMyKQHAStkKimc8EED196SVXicAwK9z8hfghg9AxCKSNL5t +/r91LATY16QOQDsFf7MrZPy/0bS3YlGvDUCUQDc3QX36vyNB3D2syQxAY5xY +5eqf+L8+JOYyGugLQM+nHgkBmva/6+0By9DyCkAeDLAxv7b0v9pg1+piDQpA +CiDmz+mq8r8fEJThBhQJQGxUhZioqPC/u8rZ1HseCEBgw9/LHpLtv2SHPC3B +OAdAIj3+UcWB6b8qSlndsz4GQKlos+G7tuW/2tL2AmNUBUBq87Fci5rhvx2H +gmhdVQRALn4FWQYj27+FAU2NtlkDQBN51AuWm9O/mKE5MKttAkDXZGwqr+PG +v0QSnVYtbAFAd3oqjsmVrr9PEI0SGnoAQKqPOECkMK0/25bd7wYW/z+OaYHW +YILHPzw/6dHHCv0/DfRMO6xR0z9jgIyBrR37P+B0xjR2hNs/fTqnDTgB+T/u +uU3Cd8jhPw4CBFOY5/Y/poehYGSJ5T/LPhKl4er0PyX2qxN4m+k/F67j/gW6 +8j/esh+9O2jtP+eJLft6pPA/VZfgiOuQ8D8HS7FzLR3tP56ljL1MlvI/eCbN +21R66D8EW23tBXn0P9f1qhpfCOQ/zmCpp1KE9j/p8fsjOiDeP7UNGl33bPg/ +gvBajv2E1D8mmiHoB0z6P0HZCM3VgsU/+naE/atT/D8p3Hsy/S9xv+v6Gw6o +OP4/4iZzNRsCxr+gZ4fUGyMAQA6gvoV/Kde/kEHMjBklAUCOL8SgvdPhvw5v +q0LDFQJAIyek+Pnn57++RLi9thoDQJqmp+H4xO6//W1fNlYOBEADj65I+bXy +vwEH0pkr/QRABnkZpikU9r82SHLCSgAGQIrSsQWq1/m/+tys6BXyBkDzx9AL +X3L9v0RsyJBN9gZAHxuy06aC/b+N++M4hfoGQPoKjCzwkv2/IBobifQCB0Di +45qNh7P9v0dXiSnTEwdAXZlH9Mj0/b+U0WVqkDUHQM3WpI2Vd/6/LsYe7Ap5 +B0DplnLKT37/v3hVOpRCfQdAhspK/MeO/7/B5FU8eoEHQNihEaNBn/+/VAON +jOmJB0CCrvpLOcD/v3tA+yzImgdAv+2a+RwBAMDIutdthbwHQBdiDew/QwDA +EkrzFb3AB0DozSB5h0sAwFzZDr70xAdAAObauc9TAMDv90UOZM0HQNEVlFRi +ZADAFjW0rkLeB0Ck4Fnjj4UAwGDEz1Z64gdAqQ3hAd2NAMCpU+v+seYHQBnd +tNAqlgDAPHIiTyHvB0CtVZh9yKYAwIYBPvdY8wdAv13TWhivAMDQkFmfkPcH +QHnGseZotwDAGiB1R8j7B0Dwpckgur8AwGOvkO///wdAhjuxCAzIAMCP6FtD + + "]]}, Annotation[#, "Charting`Private`Tag$263551#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8CLnT2iFv4nQBT7GiY7 +/AfAQIi+k/n7J0DERqVcdvgHwEwIBYbc+SdAJt65yezwB8AaluNsovUnQOoM +46PZ4QfAaIzsQy7tJ0BwajVYs8MHwJY8WxdG3CdAfiXawGaHB8BiHRpVdron +QJqbI5LNDgfAUmLNN9l2J0Cf34hvUQkGwDAEyY1K5CZAFtBTTykVBcCSm100 +gVsmQMhQU0TLJQTAoSVE3XXVJUBIKSV0IyIDwOifpjggRCVAOq5cps8vAsAo +mArfj7wkQPqKZhMyKQHAp9gdo7spJED196SVXicAwPu9Gp2smSNAxCKSNL5t +/r8KEvgjYxMjQDsFf7MrZPy/GUIR1OCBIkCUQDc3QX36v9Hd+2sl+iFAY5xY +5eqf+L/lBq3uMXUhQM+nHgkBmva/OwZ+5BPlIEAeDLAxv7b0v+dHTjS+XiBA +CiDmz+mq8r/FFJJUl5ofQGxUhZioqPC/MtrCJGN9HkBgw9/LHpLtv+R3QDrF +cx1AIj3+UcWB6b9SsqnbH1QcQKlos+G7tuW/E+MtuhpIG0Bq87Fci5rhv9qd +gzA/JhpALn4FWQYj27+vu7mpTQoZQBN51AuWm9O/9x+62wwCGEDXZGwqr+PG +v8C7x4NU5BZAd3oqjsmVrr8jaupYZdoVQKqPOECkMK0/HQDUO5HWFECOaYHW +YILHP1sptNDQvRNADfRMO6xR0z+wxQmqBbkSQOB0xjR2hNs/lyMKhOCfEUDu +uU3Cd8jhPz7EOVKfjRBApoehYGSJ5T/MwTCqRB8PQCX2qxN4m+k/aqGdm/v8 +DEDesh+9O2jtP179hCsHBAtAVZfgiOuQ8D+qRTsfchoJQJ6ljL1MlvI/g2TR +hz8OB0AEW23tBXn0P/S4bSrRLAVAzmCpp1KE9j8OAH5OlCwDQLUNGl33bPg/ +s9rNcqtYAUAmmiHoB0z6P8rjxzwAMv8/+naE/atT/D9vh/R/jIL7P+v6Gw6o +OP4/OeI2VZsu+D+gZ4fUGyMAQFYW4RrwtPQ/kEHMjBklAUCRj7veDG/xPw5v +q0LDFQJA/fMBfoUD7T++RLi9thoDQBRP9Y0t8OY//W1fNlYOBEB5bHUjxILh +PwEH0pkr/QRA2y4osBnP2D82SHLCSgAGQGN/Sj29Vcw/+tys6BXyBkC5UsmT +dm2yP0RsyJBN9gZAidSkiK/FsT+N++M4hfoGQIwhCo0BHrE/IBobifQCB0CX +nAgX4Z2vP0dXiSnTEwdABMXRovFjqj+U0WVqkDUHQBjLvHWY8p8/LsYe7Ap5 +B0Bnxn5Kdd+Cv3hVOpRCfQdAboAyqHgFiL/B5FU8eoEHQMBYlI7BKo2/VAON +jOmJB0CJiNTWkrmTv3tA+yzImgdAQVekm6H9nb/IutdthbwHQDQj0MRMOqm/ +EkrzFb3AB0AtkWiS8ICqv1zZDr70xAdAVu1VdmfHq7/v90UOZM0HQIa78OzO +U66/FjW0rkLeB0DGxqXCQ7Wxv2DEz1Z64gdANNf5euNXsr+pU+v+seYHQOyZ +uSlt+rK/PHIiTyHvB0At6b2fPj+0v4YBPvdY8wdA85eWgYbhtL/QkFmfkPcH +QDoxA4+4g7W/GiB1R8j7B0CG80DV1CW2v2OvkO///wdAY/GHYdvHtr9mBk05 + + "]]}, Annotation[#, "Charting`Private`Tag$263551#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.03519887363604365], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {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}, {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}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, { + 0, 1, 0}}}, CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + + FilledCurveBox[{{{1, 4, 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}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJfIGYCYgOtlcIXnqg4OE9oFkr7peggMfUKZ0aTqkM4 +p1i7sbySwxkQ4FFzeOAa7zjLUMkhISRIfcFKBD8exO/UgPO9T7Dbzp6q6XBH +U3bN/2BFON99zdHlDDPk4fzUNCBwk3EA2++i4SC/a8G+VD0piH06aqh8HgT/ +19vXBywfq8L5HvtrZS2Wq0LMt5BymDGBv8qsW9VhR7BVxP/jkg6nDjutzdyn +6tAX0e3PGCDp8KZ4q+jv06oOVfd/3DLWloSYx6zmYAwCmyUcfC9OjPnnrObw +HwTkJRz+fit9MCdQzeFNW2630W9xhwtXw97oV6tB3NUjDqHPaDq0iNeyZrrx +OtT/tio490LTwQRsHo+DP8g8Zi0HmY1i85kUeKDmQvkLuCF8ey2H7V4bLOb8 +5HLYoJe3mDFGy8H/iecl02Auhy3mPw6ldGk5HOze12SSzOnwB+TeZG2HmWAA +5IPcNxHBB9t3GMFfr/qked5b3HyZeXGapwV04ebD+BD/cTtMaW+Nulyj47D8 +1vLHhoe5If4y1oHSPA4tLEf7Db9rO7yofZx9PofXQXb5Cw+9++pQ8yQdzGz2 +Bk17qOEgUjmp5OwTSYi9kZoO6p9UXs7ylIK4/6Omw3ohHb50OWkHc7B6LQcD +kPHFMnD/hry9/HGGoxycfxqcThTgfHD8v1CEh+/Kby8rzjxQgqYXdTgf4m8E +H+w+R1VI/F/G5IPT5xIVOB+cfrhx8/fk17yd2aoINx/GTwel9zAliDpnJYcP +i9YrnPVQcuCPDbhvJK7sUAlKj9ZKDmtB4aCnDMlPggg+2NkrFeB8iD8F4fyS +5SUb/vXzwM2DpCduuH2w+NsLck+qIjx+YXxY/IP5pUoOTaD03MYJNw+WXsD5 +jV0Fzk+JvePG/APBf5Gl/W36XFW4fhbOLvnkdWpw82F8mP1SoPR2QRXuvo2g +9P9HBe5+WPkE8x+MD/M/evkFAFuQG5I= + "]], + + FilledCurveBox[{{{1, 4, 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}, { + 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}, {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, 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}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxdlFFIU2EUx6/Okos5yJDlfHBdGmXW3b3djYoovopKJAqKsh4SSs3sIaEm +lKwokx4s2Eth0pDIh8ti5oRCemhUIhhuWWggo3JQxCQGITUWZbbvjv/5oAPf +w49xz/mf/zlna053HG61SZJUlH9H8684/447Rt9Jdi9b4lGzkoH9pj/6N7iC +rb47I58t9rLRhujW0K8y1nLywz7bPYOZSfOzPlbG1mXKY1qtweI8bgt+eSvW +7W2W2WK2MxUaMVi348qy9psy5eu3QmZPtuRetXQJtn5fENwwUbrj/l4ffZ8+ +V5ftS/goPxj1/U8rf082+UiftiG86u0PoX891zcv+gOjf7BVPuwift4RyPRX +KpTv8lwuaWxXqN73h8OuRL1CetrO5OOY4HB2/lI8pbBkdeDUZrePGTymFeoX +DD/AsxULu6aWCw4e8a/tmzLY/si4Kc0q5Dfyg1Ef84I++A/9mDf6A6N/sJXv +q7PQz0eDRSo22ts+OQu+RwzW4yp1x2ec7PXY7qH2g4LNdL26pOvEg3Mxe2ha +I64eaKqdfKBRPgfXd0GjemDoAUPvCa7vqkb9lB8avtOa1qjf6yXjQb1RJz/A +8Mua32ON/B1Rzw8WBQRbem2CU9wQl4f4j7XfKs2jxxKwifKDUT+X+fZi2x6V +9F3jehwe0l8i99Y0qx7qD4z+wdhXMPYZ+bDvqId7gB7cCxj3dIDfW6dK94Z8 +uEf4AYZf4IvczzcafQ+/kR+M+pgX9GGe0I95oz8w+gd3cf/qqgr7FNXYEN+n +nVXs57Nk7+J7wdhHMPYV7P5yYyDxSDDuDYx7QL3//z//AckFQOg= + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 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, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnbpg7uK05upxhhoTDTBCQtHCouv/j +lvFqCYfiraK/T8dZOBiDwGYJh+tCnxzPH0Pw/34rfTCn0BLO/w8C6y3h5s0A +mXfT0kG4clLJWRcJhw16eYsZ31g6rBXS4UuPE3f4siEge9Z3S4cY1QiZczai +DmdAwMYKzvc5wW4729QKbh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/S0sIbSntcKRtefipR5YO6WlA8EwK7j+we+dIwf1vAgqPYCmHJ4kL +r5nkWzq4g9xrIQUJv2sWcP6Xnbe6/pYi+J9A7lG3gJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzgPCllCD63S0cwjnF2o3llSDmnEfwwfFpZ4kqvx8af8xK +Dh9A+tmh4XlP0aEErN4KIn9YEeJeVysH5WuPghnWIPjg8HVE8Pfm17ydKaoA +8e80TD7YvVqKDhJTr3BmLLKC+J9DycG+6dHxGbuh9l1Wcthi/uNQihc0vu4o +OdyQrkk0YrVyWPntZcWZB0oOy1946P1faAnnT5/AX2W22gKunstNtZTJygJu +nsZb3n0GL83h/AnBJSrT1yP4MQqOH5NzcPPB+iXN4PbB+OD0EKbkkBJ7x425 +w8zhw6L1Cmc9lBxWgNz30cyhEpSfrJUcXmRpf5v+1wwaHgg+ON+tVIDzwfEi +Lwjnlywv2fCvnwdu3navDRZzfnLD7Vt+a/ljw8PccPdA0i+Cf7B7X5NJMqdD +j9crFpOFZg5N4rWsmW2ccPPA9s/khIRXljmcD46fRwj+LVD4m1rA9T8HuW+v +Bdx8GB9mPzi9+VnA3XegVtYi/Yk53P2w9AzzH4wP8z96+QQAjSwZ1w== + "]]}, { + + Thickness[0.03519887363604365]}, StripOnInput -> False]}, { + ImageSize -> {42.61373349937733, 24.508064757160646`}, + ImageSize -> {28.409155666251557`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {29., 17.}, PlotRange -> {{0., 28.41}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-2.3333330884353742`, 11.996266431828891`}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + RowBox[{"Singly", " ", "excited", " ", "state", " ", "singlet", " ", + RowBox[{"(", "antisymmetric", ")"}]}], + RowBox[{"Singly", " ", "excited", " ", "state", " ", "triplet", " ", + RowBox[{"(", "antisymmetric", ")"}]}], + RowBox[{"Ground", " ", "state", " ", "singlet", " ", + RowBox[{"(", "symmetric", ")"}]}], + RowBox[{"Doubly", " ", "excited", " ", "state", " ", "singlet", " ", + RowBox[{"(", "symmetric", ")"}]}]}, "LineLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), Editable -> True, + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Input", + CellChangeTimes->{{3.8011947104686337`*^9, 3.801194730551322*^9}, { + 3.801194778516527*^9, + 3.8011948309452753`*^9}},ExpressionUUID->"0cd992a0-f8d4-431c-a159-\ +0894032808d8"] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.800005686762142*^9, + 3.800005687218752*^9}},ExpressionUUID->"950a0b1f-8163-47aa-bf65-\ +f1d765efe46f"], + +Cell[BoxData[ + RowBox[{"HUMP", "=", + RowBox[{"DiagonalMatrix", "[", + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"F\[Alpha]", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F\[Beta]", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}]}], ",", + RowBox[{ + RowBox[{"F\[Alpha]", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F\[Beta]", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", + RowBox[{ + RowBox[{"F\[Alpha]", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F\[Beta]", "\[LeftDoubleBracket]", + RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}]}], ",", + RowBox[{ + RowBox[{"F\[Alpha]", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}], "+", + RowBox[{"F\[Beta]", "\[LeftDoubleBracket]", + RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}]}], "}"}], + "]"}]}]], "Input", + CellChangeTimes->{3.800005704724044*^9}, + CellLabel->"In[51]:=",ExpressionUUID->"bb01d8e1-d6ab-461f-be8b-c75f50ab8739"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"HUMP", "[", "R_", "]"}], ":=", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"84", " ", + SuperscriptBox["R", "2"]}]], "0", "0", "0"}, + {"0", + RowBox[{ + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]]}], "0", "0"}, + {"0", "0", + RowBox[{ + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]]}], "0"}, + {"0", "0", "0", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8000057341255074`*^9, 3.800005736197897*^9}, { + 3.80018206114777*^9, 3.800182067262292*^9}}, + CellLabel->"In[27]:=",ExpressionUUID->"7a60d268-132a-4489-a887-307f3a80c51c"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{"HUMP", "[", "R", "]"}], "+", + RowBox[{"\[Lambda]", + RowBox[{"(", + RowBox[{ + RowBox[{"uH", "[", "R", "]"}], "-", + RowBox[{"HUMP", "[", "R", "]"}]}], ")"}]}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{"Eigenvalues", "[", + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}]}], ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8000083407776213`*^9, 3.800008341085771*^9}, { + 3.80007540884965*^9, 3.8000754138783693`*^9}, {3.800075452098218*^9, + 3.8000754565288067`*^9}, {3.800160270306171*^9, 3.8001602915134993`*^9}, { + 3.800182047450593*^9, 3.800182076419499*^9}, {3.800182197979561*^9, + 3.800182203753298*^9}, {3.800250699067483*^9, 3.800250702879772*^9}, { + 3.800339076543096*^9, 3.800339100412263*^9}}, + CellLabel->"In[28]:=",ExpressionUUID->"ddcd4a88-334b-4e04-ae2f-810ac917a7dd"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800006603566574*^9, 3.800006614030568*^9}, { + 3.800166724418672*^9, 3.800166739606538*^9}, {3.800338808735578*^9, + 3.8003388097602654`*^9}, {3.800338858730509*^9, 3.800338865114396*^9}, { + 3.8003390258084583`*^9, 3.800339067493021*^9}, {3.800339110460679*^9, + 3.8003391322518053`*^9}, 3.800339609359003*^9, {3.800347418339898*^9, + 3.8003474188213377`*^9}, {3.8009524046547403`*^9, 3.800952460029253*^9}, { + 3.80095249487425*^9, 3.800952496474988*^9}, {3.800952564605442*^9, + 3.8009526062131853`*^9}, {3.80095275804158*^9, 3.8009527844436703`*^9}, { + 3.8009530728463907`*^9, 3.80095307326536*^9}, {3.800953941361423*^9, + 3.800953941906702*^9}, {3.801194869489562*^9, 3.8011948705075073`*^9}, { + 3.801195075735506*^9, 3.801195080705673*^9}, {3.8011951300418243`*^9, + 3.801195135590292*^9}, {3.801196928760853*^9, 3.801196934778831*^9}, { + 3.8012031632653923`*^9, 3.801203163603958*^9}, 3.8012033208853703`*^9, { + 3.8012099527603407`*^9, 3.801209967371335*^9}, 3.80122053516481*^9, { + 3.801638194687008*^9, 3.801638230572485*^9}, {3.801742627187982*^9, + 3.801742628586721*^9}, {3.80174266002608*^9, 3.801742661247903*^9}, { + 3.8017993016559353`*^9, 3.801799364355666*^9}, {3.801800789986821*^9, + 3.801800791816894*^9}, {3.801800926691745*^9, 3.801800953869658*^9}, { + 3.801802893453863*^9, 3.8018028936719513`*^9}, {3.8018144710527563`*^9, + 3.8018144719283457`*^9}, {3.80181728224846*^9, 3.801817292704628*^9}, { + 3.8018200874884453`*^9, 3.8018201416144867`*^9}, {3.80191145278162*^9, + 3.801911453114036*^9}, 3.801971272575706*^9, {3.801980393348219*^9, + 3.80198039539342*^9}, 3.804248397640399*^9, 3.804499725824829*^9, { + 3.804573013605077*^9, 3.8045730508546247`*^9}}, + CellLabel->"In[47]:=",ExpressionUUID->"1975b756-0495-4b7e-aa86-45f0529e0f3c"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBAQX++iFib1JlAgAAAE8AAAACAAAAY6+Q7///B8CNom57YRgeQBT7GiY7 +/AfA5+LphO8VHkDERqVcdvgHwEAjZY59Ex5AJt65yezwB8Dwo1uhmQ4eQOoM +46PZ4QfAVaVIx9EEHkBwajVYs8MHwBuoIhNC8R1AfiXawGaHB8CnrdaqIsod +QJqbI5LNDgfAw7g+2uN7HUCf34hvUQkGwF4jjnQ80hxAFtBTTykVBcDeneUu +0zMcQMhQU0TLJQTAEz/CZ4WYG0BIKSV0IyIDwLA0HtwN8BpAOq5cps8vAsAv +OoJw1FIaQPqKZhMyKQHAEpRlQHGoGUD196SVXicAwK8Uzo4pARlAxCKSNL5t +/r8vpT79H2UYQDsFf7MrZPy/E4oup+y7F0CUQDc3QX36v9p+JnH3HRdAY5xY +5eqf+L9amqO5HYMWQM+nHgkBmva/PwqgPRrbFUAeDLAxv7b0vweKpOFUPhVA +CiDmz+mq8r8zXijBZZQUQGxUhZioqPC/GlkxH5LtE0Bgw9/LHpLtv+FjQp38 +URNAIj3+UcWB6b8Pw9JWPakSQKlos+G7tuW/HjJrMLwLEkBq87Fci5rhv5T1 +gkURYRFALn4FWQYj27/B3x/ZgbkQQBN51AuWm9O/0dnEjDAdEEB7eF5vuRrR +v9IV+BNu0g9A12RsKq/jxr+PUNL3aucOQHd6Ko7Jla6/Pg0rFvGqDUCqjzhA +pDCtP2AXjjGudAxAjmmB1mCCxz9Myu/DFyQLQA30TDusUdM//Zxhlv3pCUDg +dMY0doTbP3gY0t+PlQhA7rlNwnfI4T9m4UwmWUcHQKaHoWBkieU/F8rXrJ4P +BkAl9qsTeJvpP5NbYaqQvQRA3rIfvTto7T/VDPvn/oEDQFWX4IjrkPA/hwuf +IqRMAkCepYy9TJbyPwazQdT1/ABAbDjSYv5p8z+I5Ml5nHMAQARbbe0FefQ/ +kPToi4eH/z/OYKmnUoT2P6zUS1184Pw/tQ0aXfds+D9P9M6uaWb6PyaaIegH +TPo/1a5m+sT49z/6doT9q1P8P/K6+zN5VvU/6/obDqg4/j+YBrHtJeHyP6Bn +h9QbIwBA1aNjlSs38D+QQcyMGSUBQOS3VW4+M+s/Dm+rQsMVAkAwpySyFlLm +P75EuL22GgNAqjnu0aAH4T/9bV82Vg4EQG2W8OM3Ltg/AQfSmSv9BEAASq4Y +zP3MPzZIcsJKAAZAANCXZb/nrz/63KzoFfIGQJ7LwMlQRLe/RGzIkE32BkBJ +Ovw+cPO3v4374ziF+gZAw6g3tI+iuL8gGhuJ9AIHQOeFrp7OALq/R1eJKdMT +B0BhQJxzTL28v5TRZWqQNQdAqtq7DiQbwb8uxh7sCnkHQIZPl7gflMa/eFU6 +lEJ9B0DbBjVzr+vGv8HkVTx6gQdAGL7SLT9Dx79UA42M6YkHQMMsDqNe8se/ +e0D7LMiaB0AACoWNnVDJv8i6122FvAdAYcRyYhsNzL8SSvMVvcAHQLZ7EB2r +ZMy/XNkOvvTEB0AMM67XOrzMv+/3RQ5kzQdAtqHpTFprzb8WNbSuQt4HQPN+ +YDeZyc6/YMTPVnriB0BJNv7xKCHPv6lT6/6x5gdAhu2brLh4z788ciJPIe8H +QAyu6xDsE9C/hgE+91jzB0C3iTrusz/Qv9CQWZ+Q9wdAYWWJy3tr0L8aIHVH +yPsHQAxB2KhDl9C/Y6+Q7///B0CqHCeGC8PQv991YUM= + "]]}, + Annotation[#, "Charting`Private`Tag$5846#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB8QEO/iFib1JlAgAAAB4AAAACAAAAY6+Q7///B8Alsm2pGzQWQBT7GiY7 +/AfAHKJGOzwyFkDERqVcdvgHwMF8w8lcMBZAJt65yezwB8Au4qPcnSwWQOoM +46PZ4QfAOdjb2R8lFkBwajVYs8MHwJiwCTEjFhZAfiXawGaHB8B1BUVJJ/gV +QJqbI5LNDgfAjWVI1iS8FUCf34hvUQkGwFQ8BNDTORVAFtBTTykVBcB4YE/q +378UQMhQU0TLJQTAUeg35gdIFEBIKSV0IyIDwAQLOwKtxRNAOq5cps8vAsA/ ++K0RpksTQPqKZhMyKQHAd3Ff5fLGEkD196SVXicAwJJRsFslRBJAxCKSNL5t +/r/n6L5KmskRQDsFf7MrZPy/5UJsHQ9EEUCUQDc3QX36v2Ki99KsxhBAY5xY +5eqf+L9QCBSa/EoQQM+nHgkBmva/uutf+JCHD0AeDLAxv7b0vyeOWAsQiQ5A +CiDmz+mq8r+nwAp8X3INQGxUhZioqPC/lHXHkWVdDEBgw9/LHpLtv+y3Q5p7 +VwtAIj3+UcWB6b/67AqWsTYKQKlos+G7tuW//J0u+NQjCUBq87Fci5rhv2wA +CZkA8wdALn4FWQYj27/O6efHM78GQBN51AuWm9O/EWGsgACXBUC0VFlAEjrR +vwofyjRKNwVADdrcDw== + "]], + LineBox[CompressedData[" +1:eJwVVHk4lXkbJoxQkeT7tAjZJkuqUwm5T5aSEFo0fBpOSX1NU7aK1tMUvhSl +xVScLC0my6Qz0zZka0KoLINsDY04+b3nvO/vWNNozvfHcz3XfT3L9Sz38xgL +9vuHTVFSUtqnkP/rW1U7RCETb0qHOx1fCWzU+IfiFiXXXCksTdg+I7ZTXYV/ +L8Wef8uuAP7jyQNjpcr85D3ClpBTVfigUxeq46vEnz7k5Zjv1wSd7HoV2bu/ +8Wf0C97B0x04tyLl9fednyB94l1xqLoHZ5vsqbV0FHcSskJ2/q8PN3WsY5d5 +DsNsJG/W4RsSmHxoXFwlovj3734mefckGPGTpgRcodC8PGrX/USCZWaTKSSJ +gl3i6uPWJsG5mQOpprEUxfvaE3Vmf0T1V8Hp9ZsoNvdNncxN/oi2/OwyLU2K +U81hA2+Fgxg9PFR9NI5DTI7W6LSLgyhpmXZZHMFhd2SRGj9zECrl4WB3c/DR ++dvkzrNB7EsQhx0J4GDgdTk4cmIQ5ydc0M7jcL+yolEzhmBw2W3N31kW3Q8W +lDjuZrAx/LNa4T4W9faRi0wOMSgYka/qDWNR/Ox52tR4Bi4n7pfP387ixss9 +kX/kMJjwV5qe58NiW6/YYv87BuUJWjuM7Fg0zPRIzd4qxc7/puVqSmR4fuBA +uIa7DMrDsY1CdRnEIxXNsk0yZOs47FH/JEX20dkuLQIZ/NPWl2QSKYSJT+fl +nJShuqx7v3ajFM6Zqo1OxTLM0jMa6c2QojPcy/CxAYuo0S+FV1ZJ0XxveLOV +MQv9XOUPETZS1DKiJJEli8my4MwwYymeRnFjp1eyyPjapfiyhhQ/nrja5LeF +hT3/WJFBB4MtaX8mDl5g4eO5fJ7aDwyS14mnK19jMTSo+811xRyqR8+k6mex +WOcgi/X7joHDNqv0NUUs0h73RVhsZWBocPDntAYWWTMPeQutGATUePAK3rIY +7y+/wzNmcCF27pOKHkW8QWDQjH8xUGkvq2A4FnrhjwUrVRgMXNdqcdXlUPkp +uD2yi8B4Q3fgN3M48ILa3u1tJgicuP/uexMOlh0B7y/UEtQFbZVcW6rwt+6w +EDwlKJqX9Vnmr8DRy/QdrhN8rIsSqgVxuKGr65uXSmB6bO1Xc3dw2Om4q3Vj +EsHVrkHttVEcMk4tMVx5jCBOtGJh+iUOhaauRjd3EIh9NHKLbnBwlsbPqQ0m +IJMd1lU5HNbdSlzK20aw/VvhCirmQLuMciu9CdK0N/+mXsxB00lixngQvCk1 +589/zsG9WVk10I3A1ahuvUczh5fbp8pVnQiOvhG9Cu7kkGTsULnWnuDhyYhN +UX9xCE3yi2niEcjs3NoSicJ+McS8YAmBZY9+sGiIw4dOP+0WW4LQi5Ie8WcO +DleUEnytCa6vKd5Vo0rxce8Z1QWLCJq45MHuaRRHk0uN3SwJpmWHHhjSoxDP +NhZVmBO4+/OGNeZTbGuoCs0wIzg+RT1ugRnFLyJystWU4NGDt5M8G4pHFr8i +WoFZQf4PnsspPPpj9A8p8NezTkwNWU3xn4Loh+8VWFDpdz7GnaImy1n7mSJf +epSpbpI3RXBQ7mZNC4I/Fo5ezdxC8fhuqlq9op4ZzTVzHwZT0DeX5JpWBB6n +0zNrwyi2hudtqLEhEPL2m/Xso1AKsM2cruj/6V9r7o3EKP7ENZOhLsV85Jf1 +Fk87TtEp9a7mryKwdu8XG8dTaEzxXLTamSBs+In9ymQKQaHKi3ZXAtHtcyVe +VymGohd+MvYkiLb0ym7NoPgppfWMyJdgfZ5WguA2xflNcxqeBRAY2tbuZfIp +Mrt+qkr6lmDo/lnfw79QNEQLV2rvJni5zHO5SjHF67xeblMEQeZDjTnJlRSl +j7to2BGCDcWJ73MaFfv4cckjSwX/jOBRbdtOMZFDrcZFBCPl6gVPeigWznSW +tOQr+OxWddFNQjFe/O5s628E2VXxB1+zFBV2Vu2z6ggOe64NChyjKOuPEOYq +7sO7Xo3f94XiiN/48EOWYKzxtMbEDDnGPzc9/zCXwastbtIz+nIc4a92OsBj +kNOm0qRjKMdk9NjS9RsZHA6qfHTDTI4r21xSaxT37NN9Kt3cRo6Oc34LBecZ +mIa6CIt4cuj0zyy7W8Rg/L3yLicnOUxUXoyHtSvy7yr3rHKVQ3VgOKRsqhS3 +JCcX+2+QY8GwdkKUsxRx3/H1uvzl6H1dNyvsuBQbZV/GwgPlKOmr6zF/JYVp +ZGkXDZVDqW2V7wNHGWriL9laCuQovHk38yBk+AcslYxZ + "]], + LineBox[CompressedData[" +1:eJwBMQPO/CFib1JlAgAAADIAAAACAAAADeoQl9Rx8z8Apz9dLLQFQHx9vXAe +gPM/S1bNMIGjBUBRAH1VqYfzP5zh3s20mgVAJoM8OjSP8z9SZi6L6JEFQPwF +/B6/lvM/7leHbByJBUCoC3vo1KXzP+ifn6qEdwVA/hZ5ewDE8z9G5auAV1QF +QKotdaFXAPQ/EFiGCAoOBUAEW23tBXn0Pyf+vUS/gQRAG0tWIDOB9D9+iWAR +Q3gEQDI7P1NgifQ/YfOSpMduBEBgGxG5upn0P2OObDXTWwRAvdu0hG+69D/r +fqGh9DUEQHZc/BvZ+/Q/boO8u2XqA0DpXYtKrH71P/ieba4qVANAzmCpp1KE +9j8Nz2uRliwCQLUNGl33bPg/8KfxeN4eAEAmmiHoB0z6PxiItE9YkPw/+naE +/atT/D/JwShHdv/4P+v6Gw6oOP4/iH6dGmcE9j+gZ4fUGyMAQAAFDSsFFPM/ +kEHMjBklAUDzOtjLUGjwPw5vq0LDFQJAzKCoKd8b7D++RLi9thoDQEzd0tXq +Oec//W1fNlYOBEDRk3XMitLiPwEH0pkr/QRAz0cW1z473T82SHLCSgAGQPgv +OzvNS9Q/+tys6BXyBkDWtb0FJjTIP0RsyJBN9gZAtBNz3oLrxz+N++M4hfoG +QLrG2iDkosc/IBobifQCB0AxR8zSsxHHP0dXiSnTEwdAKGuRfIfvxT+U0WVq +kDUHQB0L3IH8q8M/LsYe7Ap5B0DCVXsmBlC+P3hVOpRCfQdAVnuMfcu/vT/B +5FU8eoEHQDtgBrqYL70/VAONjOmJB0CBwLHHSg+8P3tA+yzImgdAcP4SdwzP +uT/IutdthbwHQA4fE0kAULU/EkrzFb3AB0DCU6rNQMC0P1zZDr70xAdATjMp +zYgwtD/v90UOZM0HQK7iRiMvEbM/FjW0rkLeB0DQrXh61NKwP2DEz1Z64gdA +mRmQJFBDsD+pU+v+seYHQDvQOi6mZ68/PHIiTyHvB0Ag5NB53SmtP4YBPvdY +8wdAyxy+xw4LrD/QkFmfkPcHQDF8enVO7Ko/GiB1R8j7B0A5iuF2nM2pP2Ov +kO///wdA4o7cv/iuqD9xu3BV + "]]}, + Annotation[#, "Charting`Private`Tag$5846#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBYQOe/CFib1JlAgAAADUAAAACAAAAY6+Q7///B8BAZiDoYIokQBT7GiY7 +/AfAp989ynWIJEDERqVcdvgHwF9eMq2KhiRAJt65yezwB8DKr6F1tIIkQOoM +46PZ4QfA2IeiEAh7JEBwajVYs8MHwNq8dG+vayRAfiXawGaHB8DYPaHS/kwk +QJqbI5LNDgfAQBLXQaAPJECf34hvUQkGwLKGMhSdiiNAFtBTTykVBcDwns3T +ew4jQMhQU0TLJQTAwQg4DdyUIkBIKSV0IyIDwC3deOoDESJAOq5cps8vAsAQ +NkEAEJYhQPqKZhMyKQHAQv3WEO4QIUD196SVXicAwEGV+ypbjiBAxCKSNL5t +/r+PNlTcsBQgQDsFf7MrZPy//HBEAdshH0CUQDc3QX36v15gOEMyLB5AY5xY +5eqf+L+OIdFgwTsdQM+nHgkBmva/hkGkSGA3HEAeDLAxv7b0v+sdjsf3RBtA +CiDmz+mq8r/huMMG6T4aQGxUhZioqPC/QggkgX0+GUBgw9/LHpLtv4xim2lA +UBhAIj3+UcWB6b+8IvosCU8XQKlos+G7tuW/LrKIAUlgFkBq87Fci5rhv963 +I55UXxVALn4FWQYj27/Y8Ko7L2UUQBq60JfoBNu/uzPDSo5hFEAF9pvWyuba +v9WJA33tXRRA3G0yVI+q2r/hnlRLrFYUQIpdX08YMtq/siuikStIFEDnPLlF +KkHZvxTvPdgwKxRAoPtsMk5f17/olyjoVvETQIw3OHEwQde/t1gMh7rtE0B3 +cwOwEiPXv+2C2kse6hNATuuZLdfm1r+H8I1H5uITQP3axihgbta/YUy3CXjU +E0BauiAfcn3VvzFhNMyitxNAE3nUC5ab07+btH/hFX4TQPj/+RHvetO/FhZd +/DB6E0Dehh8YSFrTv1H8+UZMdhNAqJRqJPoY07/+G91rg24TQD6wAD1eltK/ +mQ4w9/NeE0AkNyZDt3XSv9Fx8ZIQWxNACb5LSRBV0r9l+0VfLVcTQNTLllXC +E9K/jdQQimdPE0C5UrxbG/PRv90Wu+iESxNAntnhYXTS0b/AY2B4okcTQGnn +LG4mkdG/KwgDK94/E0BOblJ0f3DRvyqYM078OxNANPV3ethP0b+qo8WiGjgT +QAI/WUASOtG/ZuEBHIQ1E0CW8Iun + "]], + LineBox[CompressedData[" +1:eJwVjXk41Hkcxx2VxjHNTCithhKVpFtCfb6hcq11pB2VYpCsdomM8pRFQhdJ +TMUKEx1IsjkqvqvDWWYIZQtFKWrMzO83M0yDtv3j/bz+eD3P672IHe4VrKai +ouL7Y/+TqAjM81cKcOS4+9rfhAz04fTnc0NCAWa3KbRWDDBQC42aafdCgJdq +mKlpP2GgO9x1V7JKBXivIvhgfQkDXWL6Xhs7K8AnjDOY67kMFFsUV7QjTIBH +PhSnJyUx0H6L6yX5Lj/8zomo1VEMZG4jqvaiCHAefejjMW8GYiYuP/5rBx8X +pmhw6hwZaCT9SCrlAh/PkYdZX7ZioLgSzYLfdfh49K5u6pOfGMi51qfM6Hk7 +pl/P3SanMpBuU35tx5l2rHh3LzZRjYFuDVp1bpjdjkdmprQljdJRl0Gg+rTa +C5y72VoaX0dH5qkPg9MmWrE1n+VBhNGRLGtWJKpuxfi+v+UeNh39w/OMI6Jb +seJLzN13LDrywZ+yd5EtuMhfM8xuOx3Fy+c2M8easRn7deK8xXT0KuiQeflQ +I26+X/k+p4+G6vs8NlYVN+IZm+vYw900VLxrg2NdaCN+9ueJk1vaaeiI07Rf +m+gZpvQfWqaPaYhmcSHjk/Ip5q4JzfQtoCFnsnLCSPcJjhvYCZIQGopWHz+/ +6HQ9ZlblR3SNz0ExseZpLVl3cCtPZ2FWOBW5j4l7yovL8K1zo862QVRkxq42 +yq4uxTz+JvdRFhV1OztWsHtv47aKhni2PRWtM9jXpTS8gd8m3Tau1aOi/nCT +DXudruEFh0tchXU6SFDKHNjptQtrNgWtks7VQbfTrdH11WXwLN91KuKlFkoL +TejxT2yCBkvBgdEACtKRutmWer6Eqwf2HA7ao4HeHWlcz0l6A2YRnNnufjPR +WO3Pj2Oa30MkJ31r4Hl1VJxS4B90+iNkBbh1sMSqyFReMvdozgh0uwQb7rZS +Qf33jOpsDwrBfh21SmIwBS+sI80Xxwjh/ZSOPUd7Ch7VP+XOThbCvLDhKdn0 +JOS0hkZ284Qwa4b04fDQJLAGK5eGDwhB9GKu49mySeigO10s3DUGbpp8Rz5M +wtOIiBDKNhGcMU5qurVfCZXyx10ibxGgrKm7YZ5KKDyuZ9/DFoFqII0wdVBC +QuoDQ168CD4n8WedNFPClvwZnXaPRNB32W/N26/f4G2IG7PGQAw2qRc5YzHf +wIf7LvXLBTHsV4QOpicrIG1HpY7qFTHc36dyvilaAc3jpy7qF4jBVVYUJg5S +gA1rRe7WCjF4cVTu6DoogGnAKed2iCF8OHbztekJ+HxVq8eBIYEbrwc9oiMn +IDbPyiQ3UwITptMUX5dxqHSn3KzIkYBe7weuysZx+Dr9xqKJJ4GsRR7zz5qM +w779CVZEpQSU3N7BbZNycDB+7uzUJYHwwaOetqVy0C4MiJDqEsBU2u/eMVMO +27zWyygLCTg5y6+mVCSDODWNWCNTAoT0iFNDvTIQs0tPumwg4NPw/PL6Mhl0 +m4xn5/sQYH6l6rnMSwZ5Refq3LIJ0BYkTG3KkMKRZW6Fr/4iQI+6fDvrmBSc +S7RS2EUE6H/JcTANkIL07hmPo38T4LT2D2XNKim4Pkod4nUSUPIgT7q8mQRj +cGq2/JeAqDkrNy8uI0HeoFFW+56A0+QKh0sZJBQ2JXP4YgIMtXvzalgkTHQm +UZRUEopYT+1Z/QS0+ziOndInYa/BWT9OHQG81+ovaUwSEm4VfziUQ4B7f2Ku +2UoSLG3Ke828CVgSYJ9QsZ4E54+MgyEWBCiGVA/Y2ZHwwEGzJkz9R+9Ag0uT +AwlGUdbfCl5J4PpI/CovVxK+DzT0r7gpgdhDSLfPiwSl+9Uz2VES+EX0fSJk +948/IyuKwUYJLInEfUQACd7cWl7VFzG0JGdaLmOTsKDSoNl+RAz/AZTf1Pk= + + "]], + LineBox[CompressedData[" +1:eJwBMQPO/CFib1JlAgAAADIAAAACAAAADeoQl9Rx8z++PtheFC/wP3x9vXAe +gPM/RqJn3I0b8D9RAH1VqYfzP0VKMxw/EfA/JoM8OjSP8z/e+MA78AbwP/wF +/B6/lvM/HXWKbkL57z+oC3vo1KXzP1uyzmUF0O8//hZ5ewDE8z8Twp+ghn3v +P6otdaFXAPQ/YhG+Xm/Y7j8EW23tBXn0P+su9YGgje0/G0tWIDOB9D8sw2Fd +LHftPzI7P1NgifQ/Upquq7Zg7T9gGxG5upn0PzG6XnPGM+0/vdu0hG+69D/X +hLtt0dnsP3Zc/BvZ+/Q/TtMS34ol7D/pXYtKrH71Px5Ly0Q4u+o/zmCpp1KE +9j/DSAQVz9znP7UNGl33bPg/pcSayK9M4j8mmiHoB0z6P5fErCEY/tg/+naE +/atT/D/8TAD1UR3HP+v6Gw6oOP4/Npzpg1PUmr+gZ4fUGyMAQArEUGmwmdC/ +kEHMjBklAUDJ/ER0aK7fvw5vq0LDFQJASgiWEVAD57++RLi9thoDQESGUThk +5u6//W1fNlYOBECj5wiXlyvzvwEH0pkr/QRAa25QqlbY9r82SHLCSgAGQM2j +bgMr2/q/+tys6BXyBkCP+OCd7J3+v0RsyJBN9gZAwY98KsCu/r+N++M4hfoG +QEBMs/2Tv/6/IBobifQCB0Dr5vJ2POH+v0dXiSnTEwdAdD7QrZAk/7+U0WVq +kDUHQALzpvZFq/+/LsYe7Ap5B0ARkWAocVwAwHhVOpRCfQdAUfZEHd9kAMDB +5FU8eoEHQIv+vjFNbQDAVAONjOmJB0Bd7QW5KX4AwHtA+yzImgdA/PTjPeSf +AMDIutdthbwHQMb6bAlf4wDAEkrzFb3AB0BCeAfrzusAwFzZDr70xAdAaZSN +6j70AMDv90UOZM0HQHlM9kIfBQHAFjW0rkLeB0BKlnNW4SYBwGDEz1Z64gdA +pRSkJFIvAcCpU+v+seYHQIVq9g/DNwHAPHIiTyHvB0D+1509pUgBwIYBPvdY +8wdAGdPBfxZRAcDQkFmfkPcHQINspd6HWQHAGiB1R8j7B0BJWzBa+WEBwGOv +kO///wdA+nFK8mpqAcDNEYhH + "]]}, + Annotation[#, "Charting`Private`Tag$5846#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBYQOe/CFib1JlAgAAADUAAAACAAAAY6+Q7///B8BAZiDoYIokQBT7GiY7 +/AfAp989ynWIJEDERqVcdvgHwF9eMq2KhiRAJt65yezwB8DKr6F1tIIkQOoM +46PZ4QfA2IeiEAh7JEBwajVYs8MHwNq8dG+vayRAfiXawGaHB8DYPaHS/kwk +QJqbI5LNDgfAQBLXQaAPJECf34hvUQkGwLKGMhSdiiNAFtBTTykVBcDwns3T +ew4jQMhQU0TLJQTAwQg4DdyUIkBIKSV0IyIDwC3deOoDESJAOq5cps8vAsAQ +NkEAEJYhQPqKZhMyKQHAQv3WEO4QIUD196SVXicAwEGV+ypbjiBAxCKSNL5t +/r+PNlTcsBQgQDsFf7MrZPy//HBEAdshH0CUQDc3QX36v15gOEMyLB5AY5xY +5eqf+L+OIdFgwTsdQM+nHgkBmva/hkGkSGA3HEAeDLAxv7b0v+sdjsf3RBtA +CiDmz+mq8r/huMMG6T4aQGxUhZioqPC/QggkgX0+GUBgw9/LHpLtv4xim2lA +UBhAIj3+UcWB6b+8IvosCU8XQKlos+G7tuW/LrKIAUlgFkBq87Fci5rhv963 +I55UXxVALn4FWQYj27/Y8Ko7L2UUQBq60JfoBNu/uzPDSo5hFEAF9pvWyuba +v9WJA33tXRRA3G0yVI+q2r/hnlRLrFYUQIpdX08YMtq/siuikStIFEDnPLlF +KkHZvxTvPdgwKxRAoPtsMk5f17/olyjoVvETQIw3OHEwQde/t1gMh7rtE0B3 +cwOwEiPXv+2C2kse6hNATuuZLdfm1r+H8I1H5uITQP3axihgbta/YUy3CXjU +E0BauiAfcn3VvzFhNMyitxNAE3nUC5ab07+btH/hFX4TQPj/+RHvetO/FhZd +/DB6E0Dehh8YSFrTv1H8+UZMdhNAqJRqJPoY07/+G91rg24TQD6wAD1eltK/ +mQ4w9/NeE0AkNyZDt3XSv9Fx8ZIQWxNACb5LSRBV0r9l+0VfLVcTQNTLllXC +E9K/jdQQimdPE0C5UrxbG/PRv90Wu+iESxNAntnhYXTS0b/AY2B4okcTQGnn +LG4mkdG/KwgDK94/E0BOblJ0f3DRvyqYM078OxNANPV3ethP0b+qo8WiGjgT +QAI/WUASOtG/ZuEBHIQ1E0CW8Iun + "]], + LineBox[CompressedData[" +1:eJwV1Hk8lNsfB/CEQSrL8+SHbpaSJEuhDXVOUZokcSNKyRSltPzKljZLi6XI +lbqW7FSIGBTJN/sgZkhEkVKNkMaMrat0z/3jeT2v9z/nec45n+9Hk3XK3n32 +rFmzIsjz31tYcCjp4DQP4odlW5+cpPCnsIEb/d94YPAh7HrVOQo3yM+PMW/m +gTv/Wr16JIXz7hrHxebyILzRYDrnHoVvqzknj0TwoKf07WafbAoHZF7KtDrO +A7oKjA8XU9hVLyMnZTsPzso9WzBVQWFLdkPBj+U8QJGWsZfrKaxr+v2JvQwP ++vZqHzDkUlgtePmFPa1c0PD1qtLroPDXKO9QmVtc0FEMdY55R+FLOXNST8zj +wuys98NDfAozSx0eqb9sAR3TtaXTwxSm61NKW8NbwDSw/WzhKIV724dqQ5gt +sHcMlFUmKPzw45q21dItQA0kmaz9h8LegqBefl0zcN1UjagZCm+ceTkYd7UZ +HOQDYgrFaNyuckh8ZnYzaFqq/rKRpnHysjy5x5UvwWYqtstOlsbHVv9YyAp8 +Ca7mEaM682n8e1eUSd2vJni/fpW8C0XjxgPd2L+8CZpDHv4qX0Dj215LbXTP +N4Fpyg7p6f/RWDf0mXvkVCNkaqV/XPAHjcdjGWfwk0ZIl1goNrGIxi/S7S4J +fRohTm/Jp1J1GocXJIZnmDRCt6RkH0uTxg7Av+MoaoDmYgcD4WIaazQbpUsX +NoCZfavgqBaNB7sv5pedbgAX53ZjzlIaB05QHLURDjSUZ8+31KGxtYRrOy+X +A5ttPT1Yy2mspJjdF3ycA9wbKZVeujT+oD4+bKLLAXQO9RxaQeNcffzjy0A9 +vHjrfmybHo39zCIk4+7Xg0PqEbmF+jTezOxQsPaoB5Zl0dF3xHP3aKr90qoH +rfZMmZsGNO487KWb318HWdmmF/UNaVzRs2ttSVYdVLinLC0mznJcbfncsw70 +rqVFGK6k8U2uil2NXh1wlP3k7hF7b5vZ3/S9FkZHM+bOEO+r/HisrbAWNtjv +7rZfRb5vWu/X5VMLOO/vpgTi5eycK33rakHZrsiwi1he71Y0f7oGfvzf0V7W +iMaTGd5JIxU14GfTft6IuHeRc854UA2IPds/upO49s6Gpz8tayAhV3/8IHGu +3OJacekaSP1ZUneUOCaU0TanqRpQT3OaB3GA2FCvQmQ1JJu2VO8lZgVwh5Tt +qkHnT3DbQswUsafU6Wo4UeNdqE280utvyWWdVcDd8ujrDPk/5c8XFA3iqwBZ +GK5vIf6930199f4qsAzp590m/tKxRc9cowqixUd6/9tvs63ueov+SmAZ1UZJ +Exdx5m/dnlUJZalW80vI+SRsEtnbeVbCkT28kH3EwWWdrk56leD0iqn8g5y3 +p3G5l+v3FzD4GQkjiXflppzzKHwBw16CNYuI1ZI8Y7zXvYCMcduoJeT+5hgk +4skJADbvIj+B3O8bdfe9khcBzF9dMp5H7CM+eVMzrALK8VattyQvluNw31Cu +AuJ8t0quI1bkh1ZuiH0OE7Vp9pEkX3mNquPOqeXQmaOauozk70v0Rpe/Ssvg +sYURX06b7CdEyjcFlcHmJH9ZM5LfYB9eVF5tKVD7it0PknyrO7OqG1ufQoH/ +CBVP8u+kcU1XfLAEKs4vSmpSo7G2oq2lwukSyD5o+7yRzNOYuPIB9YlikG5o +ZdeQeYvmP4w2m10MdZuEJx6qknnNa546q8qGV0tKBGuVSL4DdCMbYvOg7urr +ct+5NN45IujIz3oEt+aEHV5F5l+b9UT9zpNcOCoY+MWXofFrpmUBqysbKjb1 +GDOlaGyscqB9+o/7MNX44OM70ie9p5asdtmWDKdVN1rZkz7i5aq9323vCOsf +nvRhk36TcLPWCLXYiEbbx4ZnuklfGaT5zS1joTcd6V5WXRTu6fLMT93pj1wm +uu5xX1PYL9/Gelg5At3LCjj7vIX0azyKU7iUiPp5Rv9QLyicHbUOZ6x8hJ5x +esN5KWT9muRyKZM8FP2uyC4hifTzFGP98bX5SHNkwOlQIoXDHw8qqyQ/Rptl +D5sP3SV9qFKq0JdZiDoNj7/vJv2fNeggfpJdgiJUlBI2XKCw/82oL2EtFWgh +X/ubvgOFIz2DOg4G1yNGY3fFuVkUnje2wyzX7hVKvXQmI3mnIu7zrjPxvfIW +nQv/U/6XjwIeKbWp8uN8QF+QY6/STXmcdT314OGwz+jpiMR57W1yeOlEDuWf +8BUVLZLfIrFyHu4tVH9udvQb2t44XPJJUxY73O0LHbolQEedpsI+yMjgSCv2 +PLE4ASoPylqYNUsGcyav/qWUKkBbjtjEe05KY1OnFYmbCgRITP7KkW+fpLGa +im/+3VYBco7JDBoAaTwQL9thoTiKrMQ31uX5SOOApDVLEmNGUZmThdnNPinM +3inzoCBhFK1u/b7CpFMKD8+81atPH0XvQgb3dTdL4QOuQWuE7FGkZJF6VeuZ +FLbQeMnc1j6KrLl7dz+OlcJz09xOj9FCFPa0+M6D7VI4KfPG8x13hOj9T81W +oyIG9tbZkdZ5T4guh1d4eOYwMDNH9jorU4gckxQKk9MYeOxx+C7/IiGSVmH6 +ykYzsHV5aH96mxBJxa2f13eCgTXQNo5BtxDpuSY/oN0ZeKJS6lHpByFavEWX +YrowcFr9NV+uQIgiOttYBdsZeKrtisz0fBE61XSfGbiMgVscLEeuKolQkI3V +M7YaA6e/EX8lryZCCUN8Jf4CBt7ZG5yorS9CgmqpeBsJBtZy2xxUYCJCarIh +nMBpSfyjX8zD3FyETEMnR9hCSZzxNdDQ3lqEjDPEjVQ/SOIAL0z32IsQ07PW +weaNJLb9/nvqyF4R6strvxzIlcRaZ6BH6CZC7K/tbHadJG64FmOgwxIhxyWV +l32I/wVyWiJN + "]], + LineBox[CompressedData[" +1:eJwBMQPO/CFib1JlAgAAADIAAAACAAAADeoQl9Rx8z++PtheFC/wP3x9vXAe +gPM/RqJn3I0b8D9RAH1VqYfzP0VKMxw/EfA/JoM8OjSP8z/e+MA78AbwP/wF +/B6/lvM/HXWKbkL57z+oC3vo1KXzP1uyzmUF0O8//hZ5ewDE8z8Twp+ghn3v +P6otdaFXAPQ/YhG+Xm/Y7j8EW23tBXn0P+su9YGgje0/G0tWIDOB9D8sw2Fd +LHftPzI7P1NgifQ/Upquq7Zg7T9gGxG5upn0PzG6XnPGM+0/vdu0hG+69D/X +hLtt0dnsP3Zc/BvZ+/Q/TtMS34ol7D/pXYtKrH71Px5Ly0Q4u+o/zmCpp1KE +9j/DSAQVz9znP7UNGl33bPg/pcSayK9M4j8mmiHoB0z6P5fErCEY/tg/+naE +/atT/D/8TAD1UR3HP+v6Gw6oOP4/Npzpg1PUmr+gZ4fUGyMAQArEUGmwmdC/ +kEHMjBklAUDJ/ER0aK7fvw5vq0LDFQJASgiWEVAD57++RLi9thoDQESGUThk +5u6//W1fNlYOBECj5wiXlyvzvwEH0pkr/QRAa25QqlbY9r82SHLCSgAGQM2j +bgMr2/q/+tys6BXyBkCP+OCd7J3+v0RsyJBN9gZAwY98KsCu/r+N++M4hfoG +QEBMs/2Tv/6/IBobifQCB0Dr5vJ2POH+v0dXiSnTEwdAdD7QrZAk/7+U0WVq +kDUHQALzpvZFq/+/LsYe7Ap5B0ARkWAocVwAwHhVOpRCfQdAUfZEHd9kAMDB +5FU8eoEHQIv+vjFNbQDAVAONjOmJB0Bd7QW5KX4AwHtA+yzImgdA/PTjPeSf +AMDIutdthbwHQMb6bAlf4wDAEkrzFb3AB0BCeAfrzusAwFzZDr70xAdAaZSN +6j70AMDv90UOZM0HQHlM9kIfBQHAFjW0rkLeB0BKlnNW4SYBwGDEz1Z64gdA +pRSkJFIvAcCpU+v+seYHQIVq9g/DNwHAPHIiTyHvB0D+1509pUgBwIYBPvdY +8wdAGdPBfxZRAcDQkFmfkPcHQINspd6HWQHAGiB1R8j7B0BJWzBa+WEBwGOv +kO///wdA+nFK8mpqAcDNEYhH + "]]}, + Annotation[#, + "Charting`Private`Tag$5846#4"]& ], {}}, {{}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWaBsBiifAY3NCJVnRmMTo55Uc0g1nxbuIcZ8 +AJ0vAkM= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, { + + Thickness[0.034013605442176874`]}, StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-2.1769617966622237`, 10.270270589785582`}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.8011950936657553`*^9, {3.8011951313777523`*^9, 3.801195136051652*^9}, { + 3.801196930301363*^9, 3.801196935248947*^9}, 3.801203164330687*^9, + 3.801203321535222*^9, {3.801209954658423*^9, 3.8012099683477087`*^9}, + 3.8012205367498913`*^9, {3.801638203307798*^9, 3.8016382313452873`*^9}, { + 3.801742640712187*^9, 3.801742662141902*^9}, {3.801799311304936*^9, + 3.801799365273057*^9}, 3.801800792522273*^9, {3.8018009279555473`*^9, + 3.801800954325245*^9}, 3.8018029078059483`*^9, 3.801814487850665*^9, { + 3.801817286002305*^9, 3.801817293372366*^9}, {3.80182010385061*^9, + 3.80182014316886*^9}, 3.801911476033551*^9, 3.801971279193267*^9, + 3.8019804018731813`*^9, 3.804248400073784*^9, 3.804499726930204*^9, { + 3.804573022560817*^9, 3.8045730538828773`*^9}}, + CellLabel->"Out[47]=",ExpressionUUID->"975e5da1-423d-4c59-8ad0-8991cde1a8a3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"Sort", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], + "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"i", ",", "1", ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "0", ",", "0.01"}], "}"}]}], "]"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"Graphics", "@", + RowBox[{"{", + RowBox[{"Disk", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"Scaled", "@", "0.001"}]}], "]"}], "}"}]}]}], ",", + RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], ",", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"Sort", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], + "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"i", ",", "1", ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "3", ",", "0.01"}], "}"}]}], + "]"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"Graphics", "@", + RowBox[{"{", + RowBox[{"Disk", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"Scaled", "@", "0.001"}]}], "]"}], "}"}]}]}], ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{s}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{sp}_\\\\text{z} ~ ^{3}P\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{sp}_\\\\text{z} ~ ^{1}P\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{p}_\\\\text{z}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}], "}"}]}]}], "]"}], + ",", + RowBox[{"PlotRange", "\[Rule]", "All"}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{Re}(E)\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804579773115322*^9, 3.8045797770117598`*^9}, { + 3.804579810696821*^9, 3.804579840985402*^9}, {3.8045798826091347`*^9, + 3.804579922605805*^9}, {3.804579993719355*^9, 3.804580049648014*^9}, { + 3.804580258333684*^9, 3.804580302195118*^9}, {3.804580379963625*^9, + 3.80458039222339*^9}, {3.804580434338457*^9, 3.8045804433936996`*^9}, { + 3.804580550020213*^9, 3.804580879877652*^9}, {3.804581029793035*^9, + 3.804581057984408*^9}, {3.804581106029153*^9, 3.804581148510192*^9}, { + 3.8045811925085917`*^9, 3.804581193068328*^9}, {3.804581330783526*^9, + 3.804581334285849*^9}, {3.804581372041485*^9, 3.80458143127977*^9}, { + 3.804581748329752*^9, 3.804581753763822*^9}, 3.804581861143325*^9, { + 3.8045824478707647`*^9, 3.804582449680512*^9}, {3.804582886812017*^9, + 3.8045829035782146`*^9}, {3.804583405074765*^9, 3.804583417041098*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"434e3915-a94f-4412-bf3b-733524d65036"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{}, {{{}, {}, + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJw11ws41XcYB/BzP8c5zv0cs9pIlxWzEa2tbdavWuuGkK3kUlYpTKlWE9ZF +WDO3onKrrJJIlJYo9f7SjRaVyKU2t3IJJbkT47+33+N5PP/n/L3nfb+f9/yf +w+jHTQ7rOCwW6xM2izX2+/8joor1cefHz9Ajbfa5BiGtQloQm23x0liPVJzw +tRJXCOm5pa+WUkM9cqN7mktUgZD+8ny36IBWj2QuqPPXZArpEt/DzmskeiQh +fuwI6an7qxfOYOuRkNaxgkKakiwq4fVqyebRaid8hXTSzNzWsjYtGS02WlFI +LfYfSj5ZryULx8otENLCFYWtWyu1xJI5QjqxdNO9uSVaYsgUFNLBiow5ypta +ImYaFNLg0qTFNXla0jPWXreAfpi1sjEjS0uYcnUCOrViWO2foiXF98aOgN6Y +eqz0u0QtGZvWPldAk5ttjdT7teTk2LgnBHT8DYORf0O1hGkvSkDZeR94pwdq +ScBYOX8BFY13XLtti5Z4MEdAS3YVt8zeoCUOTEEBDcmLHNBx0xJmXCsBfXIv +4eCjZVpizAwsoK6Nr/OSFmkJU04joM/s9nusm60l/3sI6EOvrQmffKZFDz5V +JUU5dpto0YNPWUuqY/InaAnTXgGfNjz8dvlePS168GnF1qtHFulq0YNPs+zN +POQcLXrwqZ9bUFZZrwY9+FTumOgX365BDz51SnWmrg0a9ODTmYF/hhhVadCD +T8PiF9x5VqJBDz7NdJkSnHpTgx58Ov6s7IrnZQ168OjeV4+8Pj6nQQ8efdQ3 +50BbigY9eLSXNdH8bKIGPXg06eCseT77NejBo9bhi++a/qZBj9HXu1Q3WwM1 +6MGjYrGNWfoWDXrwaMaULPGGDRr04NEtWa2OU9w06MGjy+XndeuXadCDR2cd +TTM/ukiDHjwacCgAnGZr0INHCa/okuYzDXpwaeRFM/37Jhr04FIDk0U1+yZo +0INL84PSJXP1NOjBpft9nyUOSDTowaXcyXsjs9ka9ODS5V/J6j171YQZ15dL +WedFBye0q9GDS/cWdaQ8rlejB5d+xCbq8Eo1enCpX7/XE1KiRg8uFXvUDXXd +UKMHl87rl24/nadGDw5NtfthvnOWGj04tLp2nKc0RY0eHDquLqfmWoIaPTj0 +zMzdqZui1ejBodtW3blmGKpGDw6961Ix6X6AGj041OBId9mvm9XowaEmje4P +Pl6vRg8Ozbf6QVPloibfMA1yaE+p4FiIgxo9OHR3458bpy9UoweHns5euuep +lRo9OLTFwaI81FKNHmwqO7Nug7mxGj3Y9InNyBdVBmr0YNMpa2Tz92jU6MGm +NCIxbJpYjR5s6v3gtPD+iAo92LRky/TLP3er0INNw58bJ7/fqkIPNn2bsuvS +1VoVerCps9H7w6sfq9CDTR0Ol2/m3lOhB5tOHwpXpFxXoQebflctr5x/SYUe +LFprMfX28wwVerBogVtsZfBxFXqwaEy7QjopToUeLOoRYutOI1TowaJNowm6 +7FWhB4vaSM+s6vNToQeL3vqNx4/ZqEIPFk2tiqGma1XowaJnNHVRt5xU6MGi +/0Z4+7ouVaEHixrnpq3q+laFHiw6aVjkHPalCj1YtDmhfZWhuQrzH4HILdne +F6aoMO8R+KXldMB349/lOwIzr+hHVCre5TkCpg9mH/EUvMtvBJpUDmn9g0rM +awQsv92Rue+1EvMZhp0lZWl6TUrMYxiC4nbEnXiqxPmH4ebjzb+YlSpx3mFY +/TR/3uU7Svz8D0P+C9uBeVeVOM8w7GYp4+5lKwnTXutbcE+tfd/xtBL35y3o +XI8KrD6iJMy6xL8F1bJn+atilPj8fAv59nEVDfuUuA9vodHTqchjpxL930JC +UWFk81Yleg9BeZP/ZE9PJfoOgdGS3tBmNyV6DsFJ29xsD0cl+g3B3UaTkw2L +lOg1BF1rMpevmq1EnyHYOiO2qGqGEj2GYGKKYY+DiRI9BiEpOaTqrqESPQbB +3adt0xytEj0GIdbL+2KOWIkeg/D53+JTJiwlegzCUrsbVke6FegxCBvYO/1k +rQr0GICWBrXDzloFegxA9jmb223lCvQYgHX7Gh44/a1AjwGYeCrQ5xZVoMcA +gCLrsFmOAj0GYMfikcVxZxTo0Q+lwzVBI8kK9OgHedb5L9cdUqBHP/BcC3yK +/lCgRz8MWNq8Z7pHgR790G7mbxGxXYEe/bD8huvlNm8FevRBin9f2mJ3BXr0 +gePRmUOnflCgRx/cLX11hm2tQI8+SMtpvLByjgI9+qBiZ6Ese6YCPfqgPdr0 +ktBUgR59sHR8bKqzkQI9esHzjGf1WT0FevTCreusxcMSBXr0gsHagx3WbAV6 +9ELwysPRlu1y9OgF64tuh4oq5OjRC21ZHo3OBXL06IHo6B9/fpEhR48e0BtX +arntsBw9ekD/IEt/aI8cPXrgZhlXs+snOXr0wEczr4wb/kGOHj3glVhisGOO +HD26Ya37WVXHx3L06IZGu4jmH/Xk6NENpmGeBx6y5Pj87IZpP7E5X7fK0KMb +ordVTDteLkOPbkgyMu/jUhl6dEHBNYW7e7oMPbogg3zjeDlWhh5dYKv7dYFs +lww9uiD92uJEN08ZenRB5EuP+2nLZOjRBaVNC2w7rGTo0QW57m5Ci2ky9HgD +T80etWxUydDjDeS2hTw7NSRFjzegOiZprGqUoscbKHM6+1T4UIoebyC93CPH +/IoUPd5AGP/5ascUKXp0gjYluGhLlBQ9OiH1ut0/f+yQokcnlFqxfz+2Rooe +nRBu25971kaKHp3Q82a+U87nUvTohGPeSd/nGUnR4zUUH1kRnyORosdrKA0J +kGd266LHaxgXm3b8WI0ueryGL3SNrf4o0kWP1+DiWlvoe0EXPV6DbLujmd0R +XfTogEXqVCfj33TRowMmSg6aD/nqokcHuMT8nFS4Uhc9OsBtr2VI5Le66NEB +XjHfl9p8qoseHTD7cKeXQF8XPTrAL+evz3LZuiSDyf8VHP3zsf6aVgnm/Qo2 +3jIaEJRLiIjJ9xVMDmi7duKaBPN8CT5f6FvPOi0hG5j8XkLiVXnonf0SzOsl +2M67ZWcbICE3mXza4fbpc1HFayWYRzvsPV48Zb6thExg5m+HsBfx3X99LiHM +uPfa4OgWdd0HRhISyBRsg1PxOUWBYglh4pnWBo/XBkaXvRGTSmafWmHn1Urt +5H/EJPh/ICj4K3eW920xmcHsSyucL979JC1LTGqZ/XgBHUsl1TVxYhLNAL6A +28dPqaVBYvI14/8CrC6oPaZ7i/H7Tgv4rQvOtHYUkzjGtwVy1AlFblZi9GwB +3gdrY9Z/JCZdTIPNsG+nW5OHXIxezZAe4Zvs0qdD7JgAm8HuQmvcwjod9GgG +4yVh6SZ3ddCjCT49tDGTc0EHPZpAVWj064NEHfRoArVFzMuYYB30aASriPeq +rX10yFrGoxHGeWzQG/xeBz0awTfzxI6j3+igx3NYsH1J1cypOujxHBrvzxff +lOugx3M4Wf+0dn6fCD2ewYdmYJ5fK0KPZ7BAh1X8UZEIPZ5B+hL9fSHnRejR +AKULmiwr40Xo0QARfRf+NAgSoUcDWPl/enyFlwg96mFu8WZ+qIMIPerBpZmf +eOpLEXrUw7BB/fTLE0XoUQf5dZviqFiEHnVg/09EUl6nED3qoGZnjCSlWoge +tTC33jE7qECIHrXgN32qq0O6ED1qIcv/eYX6gBA9Rq+5Pe23dwjJCib/Gthu +ZOfl7S7EvP8F34Sg99iLhETB5PsvXEm4DL+ZCzHPf8B6zt+mI+8JSSGT31PI +Lv5s2voRAeb1FOZsswiARgHZx+TzBPqb8l4KSwSYRzX4hkctIRcF5P8HXDVw +/K1XbkgS4LxVsOxL74ZdewWkjylYCW4rHLNCvQQ4TyUM3fIODbQXkHPMPlWM +5mc43f0LAe5PBZx82PXLDEMBfn4fg59l0qQevoBQZj/KwSdseCiljY/7UA7l +CvvieY/4xI/xL4Pogalu9/P46P0IHIPCdixM5hNzxvcROPFELzJD+ehZCu+b +lvhzfPikmfF7CFtm0d65y/jo9RA63KM+8Z3FJ8lMgA8gxa6s5XdDPno8gNI7 +xoNRfD45x+RfAjnrFk4PauVh3sVwLHyS6+qHPDKByfcetG0U2ptc4mGed6H6 +q9zamiQeiWbyK4KvvA/U7Q7iYV6F4Dwpw0S6gUcUTD53wPJCb2ywDQ/zuAUO +49YPNlrwyG5m/pugjFV8NUOfh/PegLgPHS1/esslHcx812FuM/t2ZD0X56Eg +z9hTkXiHSyjT/zU4UjhgG5PBxX7zIWHSr3rb9o/ez/SXB8PnTMbP2c4lLKaf +S2AW6W7Tu5KL7/8XvIpvTD48m0tqmfc7D30+CunEye/qZ8K5Y53hh0Sj9zP1 +0mCJye+G3W0c/PuT4NfQcMfq4eg1c/9RuFhlH+F78d3rseDqHx4QEc8hLOY6 +GJKd64/H/sp59/8HSz/UffSHQ/4DZE/cFg== + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJw12Ad4zVcUAPC3n5W8vd+z91Y7gqu1gqpVWxGzFFGa2jNolJhFjQiC2lJB +aDk3pMSIHYmINFsSIXuv3nud/j/fly9fnvvuOb97zz3338h70ahZMolE0k4q +kfCfn59a1G+6dfN0a32SPTKs/qYPajp8TUiqpW59EnPCp3edGDWtd2jIV0+q +XORuUcvJO+6o6cvrKcf8cl3k4qCkFcaLanrw1SpJrxQXOfg7f9TUO880NS/a +RTZ94AOqaTP3S7dOR7rIYjbaCR81zWg92PndXy7CBmMjqullMY6LDOY/Bqmp +z8wVbx4GuUhn8ahp9/WGHuv3uEgDMaCaVh45v6/7ZhepIyaopvTmgKKPy1yk +mE+vSEX9YhJGB893ETFckooOKfz5z4nfuUjUY/6oqEHHnpEuwqMdGaai0e3O +Lrr/lYsE83BPqGgQC3d1NxcR09uhot5z4tt2aeUiK/lwK1S0qd9Pv2Y5XGS2 +eFQ0I8g9K8jdRUaJAVX0wq3Tg8dJXUSE21tFl8aR026FTtJKBKyiHiVvlBHp +TiKGM6popWEJi9hJPnuoaETHenc7Pnaih5L6f32y0fvbTvRQ0mHz+qw7EuIk +Ynp3lFSzhQfsRA8lfc0/t9+JHkoaSGsfpv5O9FBS73fHy31XOdFDSduW95rQ +bpETPZQ03Rx9PWW6Ez2U9GLnheaDY5zooaRLR6h/GjHIiR5K6rkg6KXKw4ke +Slrl3/OLW22d6KGgd0692LmkgRM9FHTz3fk5rfRO9FDQ4YkK9s+JHgpqrGLA +JQ70UNBoW/e6X2c50ENBA7s9+17+zoEeCuo9+vvIG08d6KGgzX1kLXzuONBD +QbO2HdrU/KoDPRT00pkuqfGnHeihoEvvRX2556ADPRS0R8rsY17bHeihoNU1 +7FnrQA85jXD+/t21Hx3oIad+LNwfZjnQQ06HjX3kaDLegR5yauS8QxzoIafR +O6pid/R2oIecHmbLeWBHBxHh+sjp9Acd9lU2dqCHnLZIjyz80+RADznNlrGI +aznQQ06vNKgIaVBhRw85Xeq5V/v6ox095NST6W5LtKOHjFb/xAJ+aUcPGY3c +PbVt2T929JDRrZdKt14Ks6OHjI58vCtz1jk7esioOZNt4EA7eshonDKCCdvR +Q0aDGk9R+m+0o4eMzuhbPKOvrx09ZLQ1n8ZcO+kjJiijuctaNjo/yY4eMhry +W/ha7+F29JBR3z8nJlj72dFDRj2eFng+7WxHDymVZXNgO3pI6f1azct72ezo +IaUBzWB8fl07ekjpiC/HX/+j2oYeUmqeyguWDT2kNG7l1qWmVBt6SGnQgSYv +H722oYeUzrz6d6cND2zoIaWtX3y7s8ffNvSQ0rxP7LloQw8pDa37y9cnj9nQ +Q0pX8HD32tBDQsmAm3X0W2zoIaFSvqCX29BDQiPXZN9f84MNPSR0B4u261Qb +ekjoaPEHG3pIqJVt32P9beghoQl5LOLuNvSQ0OO8XLW2oYeEzmqzsSbCaUMP +CW3DyvNKjQ09JDSXByyzoYeEXlk/3JFRaEUPCV0V+H554Hsr5r8G+vy1LnZM +nBXzXQOKWLaBo6yY3xpgq/m3cLBiPmtgm24Yq9BWzF8NjG6fNqr9SSvmqwas +Q9mBtN+K+amG+DkW7aGtVsxHNRz1u7xw5Gorxl8Nc495Ral9rBhvNbS/ndzm +trcV9381fOLA31oxnmoILTGyFW0lYnofqmAZ/4OHFddPFZBOg07tb2clYrn8 +XgW8Wg1vaMX6WQUP5y2foTBYcT1UwY4t+js3lVb0r4JRwecaLi61oHclOML7 +r23xwYK+lRD/jj8W9KyE4HJfz73PLOhXCXNZuEPuWtCrEtp3OVMmuWZBn0rI +Ewvagh6VELbg7bUFhyzoUQHL2HJuGmBBjwrof9ptadw6C3pUgIJv3yUW9KiA +yMS+nQbNtqBHBexi5apqvAU9KmCM/cdPV4Za0KMc7Kw8z+tjQY9ySBzNAu5k +QY9yOMmn0cSCHuUwb/vrudvNFvQoh7b8+K1tQY9yKLjHNnCFGT3KIJS1G5c/ +mdGjDHi3MTvJjB5l8KXrVT/XKzN6lIHagx1I98zoUQZRY1U1/jfM6FEGu5Yc +nULOm9GjFMaw3VscaEaPUnBeeG6/sMuMHqWQ9IAB+5nRoxSOp8tjbT+b0aMU +ZsqPsBPJjB6l0L5ht982TzajRynke7KC9Y0ZPUrg2oS5owr6mdGjBNb4SkPO +dDGjRwmww0gzrYUZPUpAfZkdwHYzepTAEz7Nemb0KIGATL6DTehRDDzcnvkm +9CiG+k0OZOSkmtCjGJIY76kYE3oUQ/DkhycnPzShRzHM58v5lgk9iqHjvkrv +B5dM6FEExWz7rj1uQo8iCHvKIzahRxGsYuUqe4sJ62cRDKw9/d3xFSb0KAJe +nicsMKFHETwSAZvQoxB28uNolAk9CmHsqn/GrRpgQo9CcLHj94seJvQohOSr +fAOb0KMQ+Go+6jKhRyEsyGn14lutCT0KgbdX9eQm9CiAz99rRI8CuMHbyQwj +ehTAOu+AYR3eGtGjANjuPZcWZUSPAqh7mDdYRvQogMdhDPiKET3yYW90/r1a +p4zokQ8T839tBgeM6JEPTk0z1lEa0SMfEtuwgrXGiB75cG7wuH7JPkb0yId5 +s3KPHphhRI886LzBv3r4WCN65EFpIDuAvYzokQd/8aeXET3yYGMs28HtjeiR +B4NZuC0bGdEjD9hhFJNgMKJHLjznvCojeuTCnqE39g4tM6BHLkxky1mabUCP +XGjMx0kwoEcu8O278LkBPXLhzG2XplmEAT1ywYeVq7fXDOS8yH8OdCj95vGu +MwbMdw6I8nzYQGqJ/OYAO339qwMMmM9PsIEdR6HrDWSuyN8n8JofOnD+UgPm +6xPw47fRHAOJEPn5CFHBbANPMGA+PsJe1m4EDDOQhiL+jzA5wRrev6+BiHAf +Z0N93l51MpBVYsBsSLewA6mpgYj0tMyGs6ydnGMxkFixnj6Az8jVverXMRC/ +z0DA2+dXlXrSRayXD1DGG6wcPUkU6yML+HWhX7Ke7BSAWbAhIulqySs98RT+ +WeDF03Jfj/1OJtStZheGm3pyQPhmwis7L1h69MwE3k0+P6onhWKCGTBpzL8B +W3br0SsDGi5e9rH3Jj0ZIRKYAenb+QGsR48MOH+WPfP06PEeFrDqPH2KHj3e +Qzce7gg9eryHMokvayj16JEOnNevq57MFB7psMHjj40eLfXokQ5DWLS5dj16 +pEE9cUHSo0ca8O07RaJHjzQ4cKFetaFAhx6pMImXqzQdeqRCo/e849ChRyqk +sfLc/ZEOPVLgPA/4lg49UmAh/57LOvRIga4TT7B/OvRIhhJ2/Gr36dAjGege +toF/0aFHMmzi7cZKHXokwdAoXqF16JEEGtZeZU3ToUcSvFCxA2m0Dj0SYT9r +J8cO1KFHIkwmP7R266lDj0Rowtrnu2106JEIvLtaXl9Hxov8/wvnOLBOh/lO +AJ8rz9iK1hGtyG8CdGHXoyPFWsznO6jkF4ZMLYkU+YsHXq1qx2sxX/GwuXnX +BvSJlvwi8vMWhrLrr2+4FvMRB5pp7AIcqiWfC1wcRPMD+JQW430D+8VPLSkV +A8bCtGtflH6zTYvxxEJTFq5qrZZ8vufHQHYOaygXa3H9xADnXTJTi/v3NSxu +tf/HVuO0hIr1EQ0ebDn/66XF9RANVd7sguSpJaJPW/EK7vDt20GL3i9h8+GK +bFljLekofF/CMFaubhi16PkCNK/ZhV+tJRnC7zmcTeMbQINez6ETy0bYGw0J +Egl8BuHjecHWoMczGLK7qdfuYA25LPL/BJ4+4ieuBvMdBRMZ3/xFGtJQ5Pcx +ZIqGWIP5fAg+bPsN8NCQnSJvD6AkhF/gNJivSBDrVKkhWpGf++DOj4csd8zH +P3CAHX+lT93JOhF/BDRgx/vMq+4Y7104x6rB84PuJFfEFw49eXu2zh3joXCH +H2Cz2Hhi/rdhIH/fM9Qd5/s3iPc7HdnnxfxugLgemdyJRMznOoj3NxVu+P2h +wK+3DxPdSKL4vhCo5u9n7rnh+BdBvI85xz4vxjsDWv7+Zdf//z8Y+Oul1b7s +d/H5QGjMw530/9/3wmVRIN2IRPzuB935+5Pmbv/fPyR3xYHuRv4DbDbdSw== + + "]]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6], + LineBox[CompressedData[" +1:eJw11wtYjPkXB/CZmmYSpcvcmprbO4NqN5Zcat1+siK3QuFvV6zFSq2tDa1C +LpGsSP8VFbnfq38oKnJ+ol1ltUhCFyldSPfpfvvndfyeeZ6ennc6c873c973 +mdSrfl24Ro/D4dhzOZxPPz8fQ/pOtr1x5X4t+bggTbGnVkCDNoYwuhAtKTzr +N9moUECp3e+/hG3SkvutNj8cyhJQtytxT2U+WpI0822QMElA4z7K3ZJWakls +zKcjoNlbHKqmLdaSPbWfCgpo2HqzowVztMR/oNpZPwG1WV/3o/c0LRkoNlBR +QL3Tel16x2vJrE/lZgpo8FdbXA5/rSUO7BHQkWOOrhzGaImSLSigtwsOHUmX +aIkR26CACu/EVc4z1pK2T+218mmzrc69XE9L2HJv+bSFl1+4uUNDHv/z6fDp +o4LfggbXa8inaRek8Wl0ronTqQoNOfdp3LN82p1WbjHulYaw7R3i0z2qrwbn +5mlI8KdyQXzKsR+mXPFAQ9ayh0+fpZm469I1ZCFbkE9XuQ2PD/+fhrDjTubT +qFFXBynPa4gtOzCfjplfEpUSqyFsOSGf/ndpr9PsSA357MGnkltz+9/s0aCH +Ac05ZFyxKViDHgbUJGdX5WB/DWHbyzKgnkMa+WfWatDDgBY9jJnp+IMGPQzo +uvHZF/MWaNDDgI5bmjZizUwNehjQf/vT/+6epEEPA6r3xGxf1BgNehjQ3KmG +3rY2GvQwoL+fqFpP5Rr0MKDJZu0RSyw06GFAo8+EPqs31KAHj/aOL3Lc28eg +B49ejZl5T65j0INHT22V+Ka+Z9CDR7dsjXGa94ZBDx59qpHbVT5n0INHb9c3 +T96Wy6AHj3rN990kogx68Oi2hKIniakMevDooF//dHe5yqAHj4p7PuhKTzHo +waPLM8feDYxm0INH3bQPE0wPMOjBo8WJPfTyTgY99OmBKrtu50AGPfSpz4aE +74t9GfTQp869ReWbVjHooU+frRUdHrqUQQ992hyfuvbyPAY99Knirmz19OkM +Ycf106fpBufCSxwZ9NCnce+uFQaOZNBDn17vPj/fXMughz49yVTUJ1gy6KFP +g3wfp80cyqCHPk36OjehnMeghx593j310bYuNXro0dw70ULLRjV66NH00xPC +UyrV6KFHl42OsHUvUqOHHh0+V7+t9okaPQbqjRY0hP2lRg89SvcKRNo7avTQ +oyH/2biOXlOjhx49YQPvf7ioJlPYBvWoW82ymM7javTQoxsM7wRGR6nRQ4+u +DVq6x2GfGj30qOeti1lPtqnRg0vn/MV8syFAjR5cGu/8Xd5gbzV6DFxfte/E +ZS81enDpxR7f+JkeavTg0r5I/6eVrmr04NLV8yQTQqeq0YNLb4ne/suMU6MH +l57Yv+j4PTs1enDpA9PW4ytVavTg0tkv5z3rF6nRg0vF76onnRysRg8uPWzm +VjKFq0YPDl2vMkspbVOhB4cGZGTe2/5RhR4cmhlcxVeWq9CDQ3O7FKFQqEIP +Dm140uO08rEKPTi04IzElntfhR4cOsl20MIzaSr04NAsp19Spyep0IMzcL+/ +XVR5VoUeHJouFowMi1GhB4dq/UO+sz2kQg8OvRLacPRRqAo9ODTYuc9mQ5AK +8++HQ00eHaZ+Ksy7H146nuSnrFFhvv3gY/uHx5LvVZhnP9i55pR3uaswv34I +OTHkeryLCvPqB/ubRvedJ33Jpw/i04LF1aO/5NEH1j6yxD9GfJm/DyLIubBv +5F/m7QPb1a8uFJir8P7vgyPZWwcHG36Zpw9cZ1/yndajJGx7tb1QQtzdI6qV +uD+9YLR93/1Xz5SEXZeYXhjUX/f38LtKfH72wrUczYqNl5W4D71wSpC/P+tP +Jfr3Qo766lyzHUr07oHLxT9eWOmjRN8eGLrpRkzyYiV69sC8zFU2XGcl+vXA +1IlOHgvtlejVAwkuAuU5qRJ9esDP5tz+Nn0levSA7Nv6Y64NCvTohp/4j+ac +eK1Aj27grh9xvilbgR7d4JPafsHlmgI9ukH674RFx48r0KMbohfXXm0OU6BH +Nwx6KL/hGqBAjy7IPVW+/rSXAj26YF2oZ0GnqwI9uiB6Vaxu4TgFenTB9RMl +uQkqBXp0wfoxHssEQxTo0QWRbyaeX9UuR49O+MmtKPFuuRw9OsF12q7NVnly +9OiEhSnh3C3pcvTohGJzjwWF5+To0QkVXvPWjY+Uo0cn2K+onRUdLEePDtj/ +OLG1ba0cPTogY4/Cf+lCOXp0wM7Up5kZk+Xo0QExxmtL5bZy9Bi43hJasFMo +R48O2JxSfr6q3xo9OmBG+pSFc2ut0aMdyO2fSq6/sEaPdrDoGjFblmWNHu1Q +/dsvcbsSrdGjHZZKmee1x6zRox0SB5N2z1Br9GgHbuFjwb1frdGjDcoulRra +f2+NHm2wMzKqN8bFGj3aIOu2+L1gjDV6tEFx6vm8zXJr9GiDkIth16oMrdGj +DRyOmR9ZorNCj1bISL6yNeeNFXq0Qsn2LJ9Jj6zQoxUivi1ak3zTCp+frTBk +yJ4Nw85YoUcr3Fq0Ijwuwgo9Buo1SzPMt1ihhw42HvHj/bHaCj100NE31pfn +boUeOrBePKN1+0Qr9NDB7oDDZ7uGW6GHDg6MlgUHmluhhw6+y2wKae2VoYcO +7tVMvLnxvQw9WmBqyEim9bkMPVpgSKzZw81Uhh4tsKV9akLnVRl6tEDuwhH5 +247K0KMFijJnTdPfLUOPFqjuduwO3yBDj2YwLD1lYL5Mhh7NUHJq8pq4GTL0 +aIbSOW8Vw0fL0KMZEs0CJly3lqFHMyy43nBjqqEMPZohoNQ7Jq/FEj2aoCrO +qM7rjSV6NMGHq2YpjbmW6NEE3zcXtOy+aYkeTeBRmn1NesYSPZrA5PnPLUkR +lujRBDVHl9112WKJHo1wPMNTWrbaEj0a4RLfThDsbokejRBXfy9SMskSPRrh +WI/6duoIS/RohCPO3gc8LSzRoxHOP3pq1N4nRY9GKDa+Nin2g5QksPk3gHD5 +7zZTX0gx7wbQeKU+r7wnJYZsvg1wO8h81sFEKeZZDz97Lgl3jJGSdWx+9aCZ +4n3yXagU86qHtAtzDkf5SckDNp86WHZUtdb5BynmUQeNjO0w3UwpUbHz10HL +6+yCiw5Swo77z0eocw4MWa6Ukq1swY/gML3UVjRYSth4bD6Cd+yd4rw2CXnJ +7lMtTJ3fenJ/uYSEfgYCP1lE8Kw8CRnL7kstTCy9EmiYISFl7H58gCTBseO5 +5yUkkgX8AJ09tPngYQmZxPp/gLJdqbs8t0nw+857WKSy9VR4S8gx1vc93N/e +8tt7Dwl6voeUv0wrbxIJ0bEN1oBlx+mUvV9L0KsG5k6p+7BUKiHubIA1UDvF +67A9T4IeNdC+au81XqMYParBUSb3LC0So0c13Jdw9mb8LUaPaiBhDvNjbojR +owpCvi2/FXRSTFazHlUwN2/5Y68/xOhRBWP/UsTMCBSjRyWQ+AfDRv0kRo9K +ePlUtN3KTYwelTC2sD/BaKIYPd6B2ORoZs9wMXq8g4jT4ttN5mL0eAdty8qS +3/eJ0KMCdGu2Xnn3QYQeFZClH3Oj/IUIPSpgub3Ry4osEXqUQxyTo6lJEqFH +ObyqbDnTECtCj3IYfeafH7v2itDjLezrTvM1DBChx1s45zLtieUKEXq8BZdL +Q2NGzhGhRxn4WTbku0wQoUcZxLvlRqzSiNCjDJaEXcnfOVSEHmUgG3Xz+rlu +IVnK5v8GEv1HOT6qFmLepeB74jf/1nwhMWXzLQWvn3U+GirEPEuACsg4zwQh +ecjmVwxnRra+3n9MiHkVQ05e9voHoUKyj82nCKzuBDRz/YWYx2vQk+eFTF8u +JJ8fcK/h5NUkVbirEOd9BQez28qfjROSDrbgSzCbdeC5ihHiPC/h6vjF+gEm +QpLM7lMheNs5bcvpssD9KYT7YRbu2moLvH9fgMeW9PDd+RaEsvtRALGJjROq +wQL3oQA4L3zWuSVYkN9Z/+cQWZltc+eYBXrnw0XjbXvt91iQb1jffBgRWHfw +rL8Fej6DibfmuCm8LEgN6/cUKnvjn5+YbYFeTyGnN+MrZoIFOcUG+AScl5Us +N7hgjh5P4LJJ0FsHN3OSzOafB71tJoeGDzbHvB/DA78pYzr/NSMqNt9/IM40 +f/v8WDPMMxeYooaS3evMSCSbXw4E14ysu+hkhnk9BL1gZ1eVsRkxZfP5GwK+ +DuPvLjfFPLKh2Nfyf7vTTckOdv4HMDZ1yruaw6Y4733Iy308Y6+PKWlk57sH +cef1Lzi6mOI8FDSZow5VqAfqsf3fhWRd3FdveoZiv3fAwyh6SdStoeQU2186 +eE1/GgkBQwmH7ecW/BJwOmr26KH4+SlwMiqxTdZoQsrYz7sGxnZPtlslm2D9 +JNixLD/Myd+E7GDrXQa7CZ6xqx1M8O/PwaT1c8wPthmTHez742HbpbuFlzKM +8fqfcMz9sfZyiDHhsL+HwrBCo8WhM4y//P/Buf/NkIGXMfk/QjrwvA== + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[1.6], + LineBox[CompressedData[" +1:eJw11nlczPkfB/CZaZppy1VzNjXXdwbFYp05wkdsbhJhLbEtdkuOHNsqscgR +m+uHhKLkLLmKpHp/UI5sbSRZEUandE/39cvXu88/Pb6Pvt/3vN+v53u+j9F6 +rHVdweNwOAO4HM7Xv9+OGS1QbK1atk9PvsxJUO0qE9ItG7cxxm16kntu3Vjz +XCGl/f5cvWeTnjyss1t88IGQul459VyxSk9iJ3/0E8cKafgX5ezYZXpyMvTr +EdJHm4cWTZivJ7vKvhYU0v1eliE50/XEp7PauXVC2t+r/BfPCXrSWayzopB6 +JbQ5t43Qkylfy00W0u39Nzsf/l5PhrJHSAcNCVnWm9ETNVtQSFNyDh67K9MT +c7ZBIZUknSqc2V1P6r+2VyegRnuji4GnJ2y5jwJay8/O/aNRRzL++XoENDNn +vZ9FhY58nXZOgoCeSO8x6uwnHYn6Ou45AW1NMIiG/6cjbHsHBXS3pr9FeqaO ++H8t5yegvAG91UtTdWQlewT0VUIPF+NdHXFlCwroitl9woOu6Qg77tjO+oOi +v1Of1xF7dmABHTLr3ZG4kzrClhML6LGFbaOmHdKRbx4CantnRsf7XTr0MKXp +B7t/2uSvQw9TavV0R6GFj46w7T0wpW7dqgSRK3XoYUrfPQmdPHKxDj1MqdeI +tIuZc3ToYUodFib0XTFZhx6mNLvj7uMWRx16mFJeluXeI0N06GFKM8abedrb +6dDDlAaEFXlRpQ49TOkNy4bgBSIdepjS0MjAFxVmOvTg07YReSN3tzPowacx +oZPvK40MevBpxBaZd3wpgx58unlL6KiZ7xn04NMXOmW/wpcMevBpSkXN2IB0 +Bj341GOW9yYJZdCDTwNi8rKuxjPowafd1h51cY5m0INPpa2fjflnGfTg06XJ +w1J8jzPowacu+icxvf5m0INP319tpZe3M+hhQoOL+rU4+TLoYUK918T8/Nab +QQ8TOqktz7DJg0EPE/pipeRwz4UMephQY3j8ysszGfQwodoUxfKJExnCjrvO +hN41jQp6N5JBDxMaVnAj13cggx4m9FbL+VlWegY9TOhZ5lNFjDWDHibU3zsj +YXJPBj1M6LXv02MMfAY9eDS3ZfyzgGYtevDos6TjYusqLXrw6L0Ih6C4Qi16 +8OiSwcH2Lnla9OBRuxkm9WVZWvTg0ZzBwso9j7TowaP3dwsl+iQtevDo9p82 +/k5vaNGDR8PtoHTxRS0ZxzbIo3NKFoU2ndaiB4+uNUvyPX5Eix48+pvfwl1D +92rRg0d/unPxQVaAFj24dNYj5oc1G7TowaVnnSZlWnhq0YNLp3vsDbvsrkUP +Lr3U6h0+eZ4WPbiUc9jneeFULXpw6YqZMofA8Vr04NJEycd/meFa9ODSiH1z +T9/vp0UPLn3cq+70Mo0WPbh02uuZLzokWvTgUnlBseMZCy16cOkRy9nvxnG1 +6MGhXhrLuPx6DXpw6IbE5Ptbv2jQg0NT/IsEaoMGPTg0o1kVCLka9ODQyqzW +UcsyNOjBoa8iZfbchxr04NCx9t+5RiZo0INDU0etjp8Yq0EPDhVkfZxbeE6D +HhyaKBUO3BOqQQ8O7euzbZL9QQ16cGh0YGXIs0ANenBogFO73Ro/DebfAf+r +ntfYa50G8+6A1yPPCOJWaDDfDlhlv3/egp81mGcHDJz61NDsosH8OmBHWLeb +4c4azKsDfrht/tDJsSufdjiT4C8tHtyVRzsoVymu7u/bNX87HCRRe35Qds3b +Dv2W/3chx0qD3/92OJ62xcLfrGuedpg27ZL3hFY1YdsrawMDcXEJLlbj/rRB +9617H/73Qk3YdQltA/OO8sd9UtT4/myDO091SzdeVuM+tMEFYfa+B0fV6N8G +mdroGZZ/qdG7Fa69/eXCslVq9G0Fy023Qq/PV6NnK8xN9rDjOqnRrxWcxoya +5zpAjV6tEOMsVEfJ1ejTCuvsovbVm6jRoxVUoytOTK1UoUcLLBc8mx72RoUe +LcDz6nu+Ok2FHi3gHd9wwfmGCj1awOZfh7mnT6vQowWOzy+LrtmjQo8WsHii +vDV1gwo9miHjrMErwl2FHs3gGeiW0zRVhR7NcNzjpNF1uAo9miEx7F16jEaF +Hs3gPWTeImE3FXo0w9H3Y857NCjRowk8Z+ddTTEo0aMJpk3Y8YdNphI9mmBu +XBB3810lejRBgdW8OblRSvTovHaf+fuIQ0r0aIJhS8umHPdXokcj/J1xta5+ +pRI9GiF5l8pnoasSPRphe/zz5MSxSvRohNDuK/OV9kr0aIQdtYE528VK9GiE +P+MM54s6bNGjEabdHec6o8wWPRpg0r1f3918ZYseDSBt7jtN8cAWPRqgbP3q +Uzuu2qJHA/wsZ16WnbBFjwaItSANboG26NEAgtwM4f21tuhRDx8u5ZsN+NkW +Peph16EjbaHOtuhRD4/uSUuFQ2zRox7y489n/qG0RY96CLy450aRmS161MOo +E1bHFhht0KMOkq5f2fL0vQ161EH+1gerHJ/ZoEcdBI/OW3H9tg2+P+tA3G3X +mt6RNujR+fzcpUGngm3Qow6gRp5otdkGPYzge2wdf/9yG/QwAqdjmDffxQY9 +jGA7/8e6rWNs0MMIOzccPtfcxwY9jHBgsMLf18oGPYwwObl6W12bAj2M8KRk +zO2NpQr0qIVJ2wYydS8V6FELlictn/xBFehRC34N42OaohXoUQvprn2zA0IU +6FELeclTJpjsVKBHLZS0jGwJWqNAjxowzz9rarVIgR41YDg7dsWpHxXoUQPv +p39U9RmsQI8aiLXc4HDTVoEeNfDTzcpb480U6FEDm/I9QzNrrdGjGkpPmZe7 +v7dGj2r4Em0ZV5VujR7VsLgmp3bnbWv0qIZ5+Wk35JHW6FENvV7+VhsbbI0e +nfVCFqU4b7ZGjyoIS3STf1hujR5VcFnQT+jvYo0eVXC64v4hmaM1elRBaKv2 +Xnxfa/TovHby/NtNZI0enc8/e27e0C5Hjyr40P2G48nPchLD5l8J0iV/2o1/ +Jce8K8HePf5l4X05MWPzrYRkP6spB67KMc8K8HJbEDQyVE5+Z/OrgD7jPM8U +BMoxrwpIvDD98JF1cpLK5lMOS0M0K50WyzGPcqhm7HsbJ8uJhp2/HIxv0nIu +DpUTdtx/vkClk++2JWo52cIW/AJDJ+bbSyzkhI3H7gusOpn0NrNeRl6z+1QG +zrPqzuwzyEjgNyDYoAj2n5IpI8PYfSkDx/wrvmaJMvKB3Y/PECs8cTr9vIwc +YgE/Q1srrTlwWEYcWf/PYNgRv8MtQIa/d0phgcbeTeUpIydY31J4srV2fek8 +GXqWQsKjXoW3iYwY2QZLQNEYEbf7exl6lcCcceWfF8plxIUNsAS+jHM/PIAv +Q48SaPLYfYNfJUWPYhitULrl50nRoxhSZZzdiY+l6FEMZM/QWaG3pOhRBDtG +G+74nZGS5axHEczMXJLhvl+KHkUw+pEq9EdfKXoUwqTw1N6DfpWiRyF8fC7Z +ajNbih6FMCK3I8Z8jBQ9CkDRIyS5tY8UPQrgQIT0XrWVFD0KoHHRh+ul7RL0 ++AQNK7ZcKfgsQY9P8NAk9JbhlQQ9PsGSAeavPz2QoIcBwpinupJYCXoY4G1h +bWTlSQl6GGB45D+/NO+WoMdHCGpJ8DbbIEGPjxDlPCHLeqkEPT6C86WeoQOn +S9DjA/hYV2Y7O0jQ4wNEzU4P9tBJ0OMD/LTnSvb2nhL0+AA2g27fjGoRk4Vs +/u/hus+gkc+KxZh3PqwOW+9Tly0mvdh882Hpb8ZVOirGPN9BmpAMd4sRkyds +fm/h0sC6N/tOiDGvt/A0M80rNVBM9rL55IEyaUMN10eMebwBgTJz28QlYvLt +BfcGIqJjNUFTxTjvf3Aord7wYriYNLIFX4Noyt8vNYwY53kNMSPmm2zoISbX +2X3KhTX9RgU8bRbh/uRC2h6Ri75YhN/fVzB/892gndkiQtn9yIHTV6scikGE ++5AD3Ferfp8dIyJ/sv4v4X+FaXZJJ0TonQ0XuwfsHrBLRH5gfbOhn2/5gXM+ +IvR8AY53ps9WuYtICev3HGrawl+GTROh13P4ty2xP+MgImfZALOAl3Js+ZwI +EXpkgcCwWjv+uYhcZ/PPBBhXGrG+QoR5Z8DBtLLBWTwx0bD5/gPHngQOi7fs +yjMdzva/Nj/VVkwOsfk9hZCTTK9KfVdeT6AnjXj9b79OTzafx3DzzfxrWQPF +mEcaUL8Y23GDxeQvdv5UCP7uxaE5Q8Q470OY8JBscei8rmLnuw/KkGwbUef9 +3+ahcH2wsJYzqLMe238KjG1+tln+fVe/SfDFbcDU1Xad97P93QW6e2Ftz87+ +OGw/d6D30Y2RPdRdnx8HN488O7jJunM+9vNuQFtVqvtsUVf9WCjP9vn1fLfO ++9l6l2HGMNM320y7no+C4a6tVkVtIvIXe384NEyPPp5fJ8L/H4WwMX2c1pZ3 +5s9eB8I9m1b3sIIuDw7nzuq826vzROT/Vgjxzg== + "]]}}, { + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJw113tczXcYB/BzP6dzOvdzWmOTXEatrZTZbGu+mLlVKm2kCw3psghjqeaS +ata6UeiGhqSkyKSI5yu3MkUpXdi60UVF0r3U8tvj+zr//F7n13Oe5/N+zu91 +Mvxxk/16LovF+oTNYo29WBzWuyOiig1x58fP1CPtdrkTQtqEtCA22/yFkR6p +POFrKa4U0nPLXi6jBnrkRs9056gCIf3l2W7RAa0eyVxY76/JFNKlvoed1kr0 +SEL82yOkp+6vWTSTrUdC2t4WFNKUZFEJr09LNo9VO+ErpJNn5baVt2vJWLGx +ikJqvv9Q8skGLVn0ttxCIS1cWdi2tUpLLJgjpJPKNt2bV6IlBkxBIR2qzJir +vKklYqZBIQ0uS1pSm6clvW/b6xHQD7NWNWVkaQlTrl5Ap1WOqP1TtKT43tsj +oDemHSv7LlFL3k5rlyugyS02hur9WnLy7bgnBHT8jQmj/4ZqCdNelICy8z7w +Tg/UkoC35fwFVDTeYd22LVrizhwBLdlV3DrHQ0vsmYICGpIXOajjqiXMuJYC ++vhewsGHy7XEiBlYQF2aXuUlLdYSppxGQJ/a7ndfP0dL/vcQ0FKvrQmffKZF +Dz5VJUU59Bhr0YNPWUtrYvInagnTXgGfNpZ+u2KvnhY9+LRy69Uji3W16MGn +WXam7nKOFj341M81KKu8T4MefCp3SPSL79CgB586pjpRl0YNevDprMA/Qwyr +NejBp2HxC+88LdGgB59mOk8NTr2pQQ8+HX9WdsXzsgY9eHTvy4deH5/ToAeP +Puyfe6A9RYMePNrHmmR2NlGDHjyadHD2fJ/9GvTgUavwJXdNftOgx9j73aqb +bYEa9OBRsdjaNH2LBj14NGNqltjDQ4MePLolq81hqqsGPXh0hfy8bsNyDXrw +6OyjaWZHF2vQg0cDDgWA4xwNevAo4RVd0nymQQ8ujbxoqn/fWIMeXDrBeHHt +voka9ODS/KB0yTw9DXpw6X7fp4mDEg16cCl3yt7IbLYGPbh0xVeyBs8+NWHG +9eVS1nnRwYkdavTg0r1FnSmPGtTowaUfsYk6vEqNHlzqN+D1mJSo0YNLxe71 +w9031OjBpfMHpNtP56nRg0NTbX9Y4JSlRg8Orakb5ylNUaMHh46rz6m9lqBG +Dw49M2t36qZoNXpw6LbVd64ZhKrRg0PvOldOvh+gRg8OnXCkp/zXzWr04FDj +JrcHH29QoweH5lv+oKl2VpNvmAY5tLdMcCzEXo0eHLq76c+NMxap0YNDT2cv +2/PEUo0eHNpqb14RaqFGDzaVnVnvYWakRg82fWw9+kX1BDV6sOnUtbIFezRq +9GBTGpEYNl2sRg829X5wWnh/VIUebFqyZcbln3tU6MGm4c+Mkt9vU6EHm75J +2XXpap0KPdjUyfD9kTWPVOjBpvaHKzZz76nQg01nDIcrUq6r0INNv6uRVy24 +pEIPFq0zn3b7WYYKPVi0wDW2Kvi4Cj1YNKZDIZ0cp0IPFnUPsXGjESr0YNHm +sQSd96rQg0WtpWdW9/up0INFb/3G48dsVKEHi6ZWx1CTdSr0YNEzmvqoW44q +9GDRfyO8fV2WqdCDRY1y01Z3f6tCDxadPCJyCvtShR4s2pLQsdrATIX5j0Lk +lmzvC1NVmPco/NJ6OuC78e/yHYVZV/QjqhTv8hwFkwdzjngK3uU3Cs0q+7SB +ISXmNQoW3+7I3PdKifmMwM6S8jS9ZiXmMQJBcTviTjxR4vwjcPPR5l9My5Q4 +7wiseZI///IdJX7/RyD/uc3g/KtKnGcEdrOUcfeylYRpr+0NuKXWve9wWon7 +8wZ0rkcF1hxREmZd4t+AavnT/NUxSnx+voF8u7jKxn1K3Ic30OTpWOS+U4n+ +byChqDCyZasSvYehotl/iqenEn2HwXBpX2iLqxI9h+GkTW62u4MS/YbhbpPx +ycbFSvQahu61mStWz1GizzBsnRlbVD1TiR7DMCnFoNfeWIkeQ5CUHFJ910CJ +HkPg5tO+aa5WiR5DEOvlfTFHrESPIfj8b/EpY5YSPYZgme0NyyM9CvQYAg/2 +Tj9ZmwI9BqG1UW2/s06BHoOQfc76dnuFAj0GYf2+xgeOfyvQYxAmnQr0uUUV +6DEIoMg6bJqjQI9B2LFkdEncGQV6DEDZSG3QaLICPQZAnnX+y/WHFOgxADyX +Ap+iPxToMQCDFtbvmexRoMcAdJj6m0dsV6DHAKy44XK53VuBHv2Q4t+ftsRN +gR794HB01vCpHxTo0Q93y16eYVsp0KMf0nKaLqyaq0CPfqjcWSjLnqVAj37o +iDa5JDRRoEc/LBsfm+pkqECPPvA841lzVk+BHn1w6zpryYhEgR59MGHdwU4r +tgI9+iB41eFoiw45evSB1UXXQ0WVcvTog/Ys9yanAjl69EJ09I8/P8+Qo0cv +6I0rs9h2WI4evaB/kKU/vEeOHr1ws5yr2fWTHD164aNZV8aN/CBHj17wSiyZ +sGOuHD16YJ3bWVXnx3L06IEm24iWH/Xk6NEDJmGeB0pZcnx+9sD0n9icr9tk +6NED0dsqpx+vkKFHDyQZmvVzqQw9uqHgmsLNLV2GHt2QQb5xuBwrQ49usNH9 +ukC2S4Ye3ZB+bUmiq6cMPboh8oX7/bTlMvTohrLmhTadljL06IZcN1eh+XQZ +eryGJ6YPWzeqZOjxGnLbQ56eGpaix2tQHZM0VTdJ0eM1lDuefSIslaLHa0iv +cM8xuyJFj9cQxn+2xiFFih5doE0JLtoSJUWPLki9bvvPHzuk6NEFZZbs34+t +laJHF4TbDOSetZaiRxf0vl7gmPO5FD264Jh30vd5hlL0eAXFR1bG50ik6PEK +ykIC5Jk9uujxCsbFph0/VquLHq/gC10jyz+KdNHjFTi71BX6XtBFj1cg2+5g +antEFz06YbE61dHoN1306IRJkoNmw7666NEJzjE/JxWu0kWPTnDdaxES+a0u +enSCV8z3Zdaf6qJHJ8w53OUl0NdFj07wy/nrs1y2Lslg8n8JR/98pL+2TYJ5 +v4SNtwwHBRUSImLyfQlTAtqvnbgmwTxfgM8X+lazT0uIB5PfC0i8Kg+9s1+C +eb0Am/m3bG0CJOQmk08H3D59Lqp4nQTz6IC9x4unLrCRkInM/B0Q9jy+56/P +JYQZ9147HN2irv/AUEICmYLtcCo+pyhQLCFMPNPb4dG6wOjy12JSxexTG+y8 +WqWd8o+YBP8PBAV/5c72vi0mM5l9aYPzxbsfp2WJSR2zH8+hc5mkpjZOTKIZ +wOdw+/gptTRITL5m/J+D5QW1+wxvMf7eaQW/9cGZVg5iEsf4tkKOOqHI1VKM +nq3A+2BdzIaPxKSbabAF9u10bXaXi9GrBdIjfJOd+3WILRNgC9heaItbVK+D +Hi1gtDQs3fiuDno0w6eHNmZyLuigRzOoCg1/fZCogx7NoDaPeRETrIMeTWAZ +8V6NlY8OWcd4NME4dw+9oe910KMJfDNP7Dj6jQ56PIOF25dWz5qmgx7PoOn+ +AvFNuQ56PIOTDU/qFvSL0OMpfGgKZvl1IvR4Cgt1WMUfFYnQ4ymkL9XfF3Je +hB6NULaw2aIqXoQejRDRf+HPCUEi9GgES/9Pj6/0EqFHA8wr3swPtRehRwM4 +t/ATT30pQo8GGJnQMOPyJBF61EN+/aY4KhahRz3Y/RORlNclRI96qN0ZI0mp +EaJHHcxrcMgOKhCiRx34zZjmYp8uRI86yPJ/Vqk+IESPsWtub8ftHUKyksm/ +FrYb2np5uwkx73/BNyHoPfZiIVEw+f4LVxIuw29mQszzH7Ca+7fJ6HtCUsjk +9wSyiz+bvmFUgHk9gbnbzAOgSUD2Mfk8hoHmvBfCEgHmUQO+4VFLyUUB+f8B +VwMcf6tVHkkCnLcaln/p3bhrr4D0MwWrwHWlQ1aolwDnqYLhW96hgXYCco7Z +p8qx/AxmuH0hwP2phJOl3b/MNBDg9/cR+FkkTe7lCwhl9qMCfMJGhlPa+bgP +FVChsCue/5BP/Bj/cogenOZ6P4+P3g/BIShsx6JkPjFjfB+CI0/0PDOUj55l +8L5JiT/Hh09aGL9S2DKb9s1bzkevUuh0i/rEdzafJDMBPoAU2/LW3w346PEA +yu4YDUXx+eQck38J5KxfNCOojYd5F8Ox8Mkua0p5ZCKT7z1o3yi0M77Ewzzv +Qs1XuXW1STwSzeRXBF95H6jfHcTDvArBaXKGsdSDRxRMPnfA4kJfbLA1D/O4 +BfbjNgw1mfPIbmb+m6CMVXw1U5+H896AuA8dLH56wyWdzHzXYV4L+3ZkAxfn +oSDP2FOZeIdLKNP/NThSOGgTk8HFfvMhYfKvetv2j93P9JcHI+eMx8/dziUs +pp9LYBrpZt23iouf/xe8jG9KPjyHS+qYzzsP/T4K6aQp7+pnwrljXeGHRGP3 +M/XSYKnx7wY97Rz8+5Pg19h4x7J07Jq5/yhcrLaL8L347v1YcPEPD4iI5xAW +cx0MyU4Nx2N/5bz7/4OlH+o29uKQ/wCRb9wY + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJw12Al0zUcXAPC3P1vy9v09+76rPYLR2qnaalfEWooozWdfg0btFLVEENRO +7VruSFKCBEEkItLskgjZ9+TlmxnX/+QcJyfPvLn3N3Pnzr+Bz8KRM+USiaSN +VCJhPxKZ5MtTg/pPs26aZq1Lskfcqrvxg5oOW30l1VK7Lok54duzVoya1jk0 ++JunVS4SWtR80o4QNX15M+WYf66LXByQtNx4UU0Pvlop6ZHiIgf/4I+a+uSZ +puRFu8jGD3xANW3ieenu6XAXWcRGO+GrphktBzp/+NtF2GBsRDW9LMZxkYH8 +nwFq6jtj+ZvHQS7SUTxq2nWdodu6PS5STwyoppVHzu/ruslFaokJqim906/o +41IXKebTK1JR/5iEUcHzXEQMl6Sigwv/99eEH1wkMoI/KmrQsWeEi/BoR9xS +0eg2Zxc+/MZFgnm4J1Q0iIW7qouLiOntUFGf2fGtO7VwkRV8uOUq2tj/l9+y +HC4ySzwqmhHkmRXk6SIjxYAqeuHu6YFjpS4iwu2pokviyGmPQidpIQJWUa+S +N8qwdCcRwxlVtNKwmEXsJJ89VDSsfZ3Q9hFO9FDSgG9PNnh/z4keSjp0bq+1 +R644iZheiJJqNvOAneihpK/55/Y70UNJA2nNwzTAiR5K6vPueLnfSid6KGnr +8h7j2yx0ooeSppujb6ZMc6KHkl7suMB8cLQTPZR0yXD1L8MHONFDSb3nB71U +eTnRQ0mrArp/dbe1Ez0UNOTUi52L6znRQ0E3hc7LaaF3ooeCDktUsB8neiio +sYoBlzjQQ0GjbV1rf5vlQA8FDezy/Ef5Owd6KKjPqB/Dbz9zoIeCNvWVNfMN +caCHgmZtPbSx6XUHeijopTOdUuNPO9BDQZc8iPx6z0EHeihot5RZxwZtc6CH +grqr2bPGgR5yGub844cbPzvQQ079Wbg/zXSgh5wOHfPE0WicAz3k1Mh5BzvQ +Q06jd1TF7ujpQA85PcyWc//2DiLC9ZXTaY/a7ats6EAPOW2WHl74l8mBHnKa +LWMR13Cgh5xerVdxpV6FHT3kdIn3Xu3rj3b0kFNvprs10Y4eMur+hQX80o4e +Mhq+e0rrsn/t6CGjWy6Vbrl0y44eMjoiYlfmzHN29JBRcybbwIF29JDROGUY +E7ajh4wGNZysDNhgRw8Znd67eHpvPzt6yGhLPo05dtJLTFBGc5c2b3B+oh09 +ZPTK7/fX+Ayzo4eM+v01IcHax44eMur1rMD7WUc7ekipLJsD29FDSh/WaFre +w2ZHDynd3gTG5de2o4eUDv963M0/3Tb0kFLzFF6wbOghpXErtiwxpdrQQ0qD +DjR6+eS1DT2kdMb1fzqsf2RDDylt+eL7nd3+saGHlOZ9Ys9FG3pI6bXav357 +8pgNPaR0OQ93rw09JJT0u1NLv9mGHhIq5Qt6mQ09JDR8dfbD1T/Z0ENCd7Bo +O0+xoYeEjhJ/sKGHhFrZ9j3W14YeEpqQxyLuakMPCT3Oy1VLG3pI6MxWG6rD +nDb0kNBWrDyv0NjQQ0JzecAyG3pI6NV1wxwZhVb0kNCVge+XBb63Yv6rodff +a2NHx1kx39WgiGUbONKK+a0Gtpp/vw9WzGc1bNUNZRXaivmrhlFt00a2PWnF +fFWDdQg7kPZbMT9uiJ9t0R7aYsV8uOGo/+UFI1ZZMX43zDk2KFLta8V43dD2 +XnKrez5W3P9u+MSBv7diPG64VmJkK9pKxPQ+VMFS/gcvK66fKiAdBpza38ZK +xHL5owp4tRpW34r1swoez102XWGw4nqogh2b9SF3lFb0r4KRwefqLyq1oHcl +OO73XdPsgwV9KyH+HX8s6FkJweV+3nufW9CvEuawcAeHWtCrEtp2OlMmuWFB +n0rIEwvagh6VcGv+2xvzD1nQowKWsuXceLsFPSqg72mPJXFrLehRAQq+fRdb +0KMCwhN7dxgwy4IeFbCLlauqcRb0qIDR9p8/XR1iQY9ysLPyPLeXBT3KIXEU +C7iDBT3K4SSfRiMLepTD3G2v52wzW9CjHFrz47emBT3KoeAB28AVZvQog2us +3bj8yYweZcC7jVlJZvQog69dr/q4XpnRowzUXuxAemBGjzKIHKOqDrhtRo8y +2LX46GRy3owepTCa7d7iQDN6lILzQpT9wi4zepRC0iMG7G9Gj1I4ni6Ptf3P +jB6lMEN+hJ1IZvQohbb1u/y+aZIZPUoh35sVrO/M6FECN8bPGVnQx4weJbDa +T3rlTCczepQAO4w0U5uZ0aME1JfZAWw3o0cJPOXTrGNGjxLYnsl3sAk9ioGH +2z3fhB7FULfRgYycVBN6FEMS4z0VY0KPYgie9PjkpMcm9CiGeXw53zWhRzG0 +31fp8+iSCT2KoJht3zXHTehRBLee8YhN6FEEK1m5yt5swvpZBP1rTnt3fLkJ +PYqAl+fx803oUQRPRMAm9CiEnfw4GmlCj0IYs/LfsSv7mdCjEFzs+P2qmwk9 +CiH5Ot/AJvQoBL6aj7pM6FEI83NavPhea0KPQuDtVR25CT0K4PP3GtGjAG7z +djLDiB4FsNZn+9B2b43oUQBs955LizSiRwHUPswbLCN6FEDELQZ81Yge+bA3 +Ov9BjVNG9MiHCfm/NYEDRvTIB6emCesojeiRD4mtWMFabUSPfDg3cGyfZF8j +euTD3Jm5Rw9MN6JHHnRcH+AeNsaIHnlQGsgO4EFG9MiDv/nTw4geebAhlu3g +tkb0yIOBLNzmDYzokQfsMIpJMBjRIxeiOK/KiB65sGfI7b1DygzokQsT2HKW +ZhvQIxca8nESDOiRC3z7LogyoEcunLnn0jQJM6BHLviycvX2hoGcF/nPgXal +30XsOmPAfOeAKM+HDaSGyG8OsNM3wL3dgPn8BOvZcXRtnYHMEfn7BIPmXes/ +b4kB8/UJ+PHbYLaBhIn8fITIYLaBxxswHx9hL2s3tg81kPoi/o8wKcF6v29v +AxHhRmRDXd5edTCQlWLAbEi3sAOpsYGI9DTPhrOsnZxtMZBYsZ4+gO+IVT3q +1jIQ/89AwNvnV5V60kmslw9QxhusHD1JFOsjC/h1oU+ynuwUgFmwPizpeskr +PfEW/lkwiKfloR77nUyo7WYXhjt6ckD4ZsIrOy9YevTMBN5NRh3Vk0IxwQyY +OPq/7Zt369ErA+ovWvqx50Y9GS4SmAHp2/gBrEePDDh/lj1z9ejxHuaz6jxt +sh493kMXHu5wPXq8hzKJH2so9eiRDpzXv7OezBAe6bDe688NXs316JEOg1m0 +uXY9eqRBHXFB0qNHGvDtO1miR480OHChjttQoEOPVJjIy1WaDj1SocF73nHo +0CMV0lh57vpEhx4pcJ4HfFeHHimwgH/PZR16pEDnCSfYjw49kqGEHb/afTr0 +SAa6h23gX3XokQwbebuxQoceSTAkkldoHXokgYa1V1lTdeiRBC9U7EAapUOP +RNjP2skx/XXokQiTyE8tPbrr0CMRGrH2ObSVDj0SgXdXy+rqyDiR///gHAfW +6TDfCeB79Tlb0TqiFflNgE7senSkWIv5fAeV/MKQqSXhIn/xwKtVzXgt5ise +NjXtXI8+1ZJfRX7ewhB2/fW7r8V8xIFmKrsAX9OSzwUuDqL5AXxKi/G+gf3i +Xy0pFQPGwtQbX5V+t1WL8cRCYxauao2WfL7nx0B2DmsoF2lx/cQA5108Q4v7 +9zUsarH/5xZjtYSK9RENXmw5/zdIi+shGqp82AXJW0tEn7b8FYTw7dtOi94v +YdPhimxZQy1pL3xfwlBWrm4btej5AjSv2YVfrSUZwi8KzqbxDaBBryjowLJx +642GBIkEPof743jB1qDHcxi8u/Gg3cEaclnk/yk8e8JPXA3mOxImML55CzWk +vshvBGSKhliD+XwMvmz79fPSkJ0ib4+g5Aq/wGkwX+Eg1qlSQ7QiPw/Bkx8P +WZ6Yj3/hADv+Sp95krUi/jCox473Gdc9Md5QOMeqQdRBT5Ir4rsP3Xl7ttYT +46EQwg+wmWw8Mf970J+/7xniifP9B8T7nfbs82J+t0Fcj0yeRCLmcxPE+5sK +D/z+a8Cvt48TPUii+L4r4ObvZx544PgXQbyPOcc+L8Y7A1r+/mXXl/8fDPz1 +0io/9rv4fCA05OFO/PL3vXBZFEgPIhG/+0NX/v6kqceX+4ckVBzoHuT/mVbd +TQ== + "]]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJw113dcU2cXB/CEhARRdhaBrJuoYKvWjXU9YsUtqKC+tqKlakWoheKooOJA +caHIW5UhiHsBLygo4DiPKK1goSoiKkMEWSKywl4v3h6fT/7J55KTc37fc+8n +aDx+XbyWx+FwhnM5nP4Xx4Dz5RjR9/KdDasP6cjHRanKfbVC6r8pkNEH6kjB +eZ8pxgVCSof9/kvwZh152GL3w7EMIXW+FvVM7qUjCbPe+YsShDTqo8I5YbWO +REZ8PkKauW1M5fSlOrKv9nNBIQ3eYHEqf56O+PZXO+8jpHYb6n70nK4j/cX6 +KwqpZ2qPU894HZn9udwsIQ34apvT8a91ZAx7hHTE6FOrBzM6omILCumd/GMn +0qQ6Ysw2KKSiu1EVC0x0pPVzey0C2mSvdykz0BG23DsBbebnFWxp15Kcvz8f +AX2S/5v/wE9a8nnaRakCejLbdGJsuZZc+DzueQHtSi2zGvdaS9j2jgnoPvVX +A7NztSTgczl/AeUMH6xa9UhL1rFHQJ+nmrro07RkMVtQQD2ch8Qc/J+WsONO +EdCwkdcHqC5qiT07sICOXlgclhypJWw5kYD+d3nPxLmhWvKvh4BKb8/ve7tP +ix6GNOuYSfnmAC16GFLTrD0VA321hG0vw5C6DWoQnFunRQ9DWvg4YpbDD1r0 +MKTrx2dezl2kRQ9DOm556tC1s7ToYUj/6Uv7q2uyFj0MqcFTiwNho7XoYUiz +pxl52ttp0cOQ/h5duYEqtOhhSBMt2kKWWWnRw5CePBf0/JORFj34tGd8ocP+ +XgY9+PR6xKwHCj2DHnwau13qnVLDoAefbtseMXHBWwY9+PSZVjGs4gWDHnx6 +51PTlB3ZDHrwqftC781iyqAHn+6IK3wan8KgB58O+PUPF6frDHrwqaT7g74k +lkEPPl15b+z9rScZ9OBTZ93jOPMjDHrwaVF8N726m0EPHj1SOazLcSuDHjzq +tTHu+yJvBj141LGnsGyzB4MePPp8nfi42XIGPXi0KSZl3dUFDHrwqPK+fM2M +GQxhx/Xh0TTDCweLHRj04NGo90kFW0cw6MGjN7ouLrTUMejBo2eY8k9x1gx6 +8Ki/d07qLDMGPXg04evsuDI+gx4G9EXXtCc7OjXoYUCz754UWTdo0MOApp2d +cDC5QoMeBnTFqBB7l0INehjQIfN5rbVPNejRX2+UsD74Tw16GFC6XyjW3dWg +hwEN/M+m9TRJgx4GNNoOan64rCFT2QYNqHP1ioiO0xr0MKAbje5uPRmmQQ8D +us5/+b4xBzToYUDdbl/OeLpDgx5cOu9P5puNfhr04NIYx+9yB3pq0KP/useB +6KvuGvTg0svd3jGzXDXowaW9ob7PKuZo0INL1yyQTgiapkEPLr0tfvcPM06D +HlwafWjJ6QfDNOjBpY/MW06vVmvQg0vnvlrwvE+sQQ8ulbyvmnxmoAY9uPS4 +hXPxVK4GPTh0g9oiuaRVjR4c6pd+78HOj2r04NB7AZUCVZkaPTg0u1MZBAVq +9ODQ+qfdE1fnqNGDQ/PPSe25D9XowaGT7QcsPpeqRg8OzZj4S8qMBDV6cPrv +93dLKs6r0YND0yTCEcERavTgUJ1v4Hf2x9TowaHXgupPPQlSoweHBjj22m30 +V2P+fXCs0bXd3EeNeffBK4czguS1asy3D7zsD7su+16NefbBsDlZZZ0uasyv +DwKjB92IcVJjXn0w/JbxQ8fJX/LphZjUAEnVqC959IKtlzz+8NAv8/dCCLkQ +/I3iy7y9YL/m9aV8SzXe/71wInP7wACjL/P0wpy5V7ynd6sI215tDxQTF5eQ +KhXuTw8Y7zzw8PVzFWHXJaIHBvTV/TXkvgqfnz2QlKVdtemqCvehB2KFeYcy +/lChfw9kaa7Pt9ilQu9uuFr046XVXir07QazzTcjEpeq0LMbFtzzsOM6qtCv +G6ZNmui6eLgKvbohzkmouiBToU83+NhdONTKU6FHN8i//RQ+p16JHl3wk+DJ +vOg3SvToAu6GoRcbM5Xo0QVeKW2XnJKU6NEFsn8mLDl9WokeXXByae31pmAl +enTBgMeKm3P8lOjRCdmxZRvOuivRoxPWB7nld8xRokcnnPSI1C8ep0SPTrgR +XZwdp1aiRydsGO26QjhIiR6dEPp20kWPNgV6dMBPzoXx98sU6NEBc6bv2WKT +q0CPDlicfJC7LU2BHh1QZOm6qOCCAj06oNx9wfrxoQr06IDhq2pnnwxQoEc7 +HMqJb2ldp0CPdkjfp/RdvliBHu2wO+XZvfQpCvRohwiTdSUKewV69F9vDsrf +LVKgRztsSS67WNlnix7tMDNt6uL5tbbo0Qbkzk/FN17aokcbWHUOnSvPsEWP +Nqj67ZeoPfG26NEGy2XMi9pwW/Rog/iBpM0tyBY92oBbkCN88KsterRC6ZUS +o+Hf26JHK+wODeuJcLJFj1bIuCOpEY62RY9WKEq5mLtFYYserRB4OTip0sgW +PVphTLjliWV6G/RogfTEa9uz3tqgRwsU78zwmvzEBj1aIOTbwrWJt2zw+dkC +gwbt2zj4nA16tMDtJasORoXYoEd/vSZZuuU2G/TQw6YTPvzDa2zQQw/tvWO9 ++S426KEH26UzW3ZOskEPPez1O36+c4gNeujhyCh5wFZLG/TQw3f3GgNbeuTo +oYcH1ZNubaqRo0czTAscwbS8kKNHMwyKtHi8hcrRoxm2tU2L67guR49myF48 +NG/HKTl6NEPhvdnTeXvl6NEMVV0OXQc3ytGjCYxKYg0tV8jRowmKY6esjZop +R48mKJn3TjlklBw9miDewm/CDVs5ejTBohv1N6cZydGjCfxKPCNym63RoxEq +o4zr3N9ao0cjfLhukdyQbY0ejfB9U37z3lvW6NEIriWZSbJz1ujRCKYvfm5O +CLFGj0aoPrXivtM2a/RogNPpbrLSNdbo0QBXBMOEAS7W6NEAUZ8ehEonW6NH +A4R3a+6kDLVGjwY44eh5xM3KGj0a4OKTZ8ZtvTL0aIAik6TJkR9kJI7Nvx5E +K3+3m/ZShnnXg9Y95UXFAxkxYvOthzv+lrOPxsswz0/ws9uygw4RMrKeze8T +aKd6nnkfJMO8PkHqpXnHw3xk5BGbTx2sOKVe5/iDDPOogwbGfrB+loyo2fnr +oPlNZv7lMTLCjvv3R6hz3Bq4UiUj29mCH2HMjBJ78UAZYeOx+wiekXeLclul +5BW7T7UwbWHLmUNlUhL0LxD4yEMCZudKyVh2X2phUsm1rUbpUlLK7scHSBCG +n86+KCWhLOAH6OimTUePS8lk1v8DlO5J2eO2Q4q/d2pgidreTekpJeGsbw08 +3Nn8W42rFD1rIPlP84pbREr0bIPVYN1+Nnn/11L0qob5U+s+LJdJiQsbYDXU +TnU/PpwvRY9qaPPYn8RvkKBHFTjIFW4lhRL0qIKHUs7+9L8k6FEFJHjMwoib +EvSohMBvy277n5GQNaxHJczPXZnjfliCHpUw9k9lxMytEvSoABLzaPDInyTo +UQGvnol32jhL0KMCxhb0xRlPkqDHe5CYnrrXPUSCHu8h5KzkTqOlBD3eQ+uK +0sSaXjF6lIN+7fZr7z+I0aMcMngRN8teitGjHFYON35VniFGjzKIYrK01Qli +9CiD1xXN5+ojxehRBqPO/f1j534xeryDA12p3kZ+YvR4Bxecpj+1XiVGj3fg +dMUsYsQ8MXqUgo91fZ7TBDF6lEKMc3aIh1aMHqWwLPha3m4zMXqUgnzkrRsX +ukRkOZv/W4j3HenwpEqEeZeAd/Rvvi15ImLO5lsC7j/rvbRUhHkWAxWScW5x +IvKYza8Izo1oeXMoXIR5FUFWbuaGR0EicoDNpxBs7vo1cX1FmMcbMFDkBs5Y +KSL/PuDewJnrCeqDc0Q472s4mtla9nyciLSzBV+BxewjL9SMCOd5BdfHL+X5 +mYpIIrtPBeA5bOKOrE4r3J8CeBhs5aKrssL79yW4bks7uDfPilB2P/IhMr5h +QhVY4T7kA+el13rnOCvyO+v/AkIrMu3uhluhdx5cNtmxf/g+K/IN65sHQ7fW +HT3va4Wez2HS7XnOSncrUs36PYOKnpgX0XOt0OsZZPWkf8VMsCKxbIBPwXFF +8UrDS5bo8RSumvq/G+NsSRLZ/HOhp9X02JCBlph3DjzymTq64x8Lombz/Rui +zPN2Loy0wDyzgSmsL9673oKEsvllQUD1iLrLEy0wr8dgEOA4R21iQczZfP4C +v6+DBXvLzDGPTCjytv7f3jRzsoud/xGMTZn6vvq4Oc77EHKzc2bu9zInDex8 +DyDqIu+Sg5M5zkNBe2/ksXJNfz22//uQqI/66m23GfZ7F1yNTy4Lu21GYtn+ +0sB9xrNQ8DMjHLaf2/CL39mwuaPM8PuT4UxYfKu8wZSUst+XBCbDnu60STTF ++gmwa0Ve8ERfU7KLrXcVhk1wi1wzxhQ/fwEmb5hnebTVhOxi/z4Gdly5X3Al +3QSv/wHhLjm6q4EmhMO+D4LBBcZLg2aafPn/g/Pwm0H9LxPyf29a8L4= + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJw11nlczPkfB/CZaZppy1VzNjXXdwbFYt03H7HllghriW2xW3Lk2JbEsimx +uX6uUJScJVeRVO8PypGtjSQrUqNS0j0dOn/ju+8+j/75Pvp+3/N+v57v+T5G +67nObaUZh8MZwOVwTH8cHqfrWNBixfaa5Xv15PPcRNXuCiHdtmkHY9yhJ3nn +1o+3zBNS2u/3NcGb9eRhg8OSAw+E1O3KqeeK1XoS51K0VRwnpBGflXPiluvJ +ybCvR0gfbRlaOmmBnuyu+FpQSPd5Wx/PnaEnvqZq59YLaX/vyp+8JumJqZip +opB6J7Y7t4/Qk6lfy7kI6c7+W5wPfasnQ9kjpIOGHF/em9ETNVtQSFNzDxy9 +K9MTS7ZBIZUknyqZ1V1PGr+21yCgRkejq4GnJ2y5IgGt5+fk/dasI5l/fz0C +mpW7YatVlY58nXZuooCeyOgx+uwHHYn+Ou45AW1LNIiG/6sjbHsHBDRI098q +I0tH/L+W2yqgvAG91cvSdGQVewT0VWIPV+NdHXFjCwroyjl9IkKu6Qg77nhT +/UEx36jP64gjO7CADpn97nD8SR1hy4kF9Oii9tHTD+rIfx4Can9nZuf73Tr0 +MKcZB7p/2OyvQw9zavN0V4mVr46w7T0wp+7dagRRq3ToYU7fPQlzGbVEhx7m +1HtE+sWsuTr0MKcjFyX2XemiQw9zmtN593HrOB16mFNetvWew0N06GFOMyda +eDk66NDDnAaEl3pTpQ49zOkN66bQhSIdepjTsKjAF1UWOvTg0/YR+aOCOhj0 +4NPYMJf7SiODHnwauU3mk1DOoAefbtkWNnrWewY9+PSFTtmv5CWDHnyaWlU3 +PiCDQQ8+9Zzts1lCGfTg04DY/OyrCQx68Gm3dUdcnWMY9OBTadsnY8FZBj34 +dFnKsFS/Ywx68Kmr/klsr78Y9ODT91fb6OWdDHqY0dDSfq1Ofgx6mFGftbE/ +vvVh0MOMTmnPN2z2ZNDDjL5YJTnUcxGDHmbUGJGw6vIsBj3MqDZVsWLyZIaw +4643o3fNo0PejWLQw4yGF9/I8xvIoIcZvdV6fraNnkEPM3qW+VAVa8ughxn1 +98lMdOnJoIcZvfZtRqyBz6AHj+a1TnwW0KJFDx59lnxMbFujRQ8evRc5MiS+ +RIsePLp0cKija74WPXjUYaZZY0W2Fj14NHewsDr4kRY9ePR+kFCiT9aiB4/u +/GHTr/SGFj14NMIBypdc1JIJbIM8OrdscdiX01r04NF1Fsl+xw5r0YNHf9m6 +aPfQPVr04NEf7lx8kB2gRQ8unf2I+W7tRi16cOlZpylZVl5a9ODSGZ57wi97 +aNGDSy+1+US4zNeiB5dyDvk+L5mmRQ8uXTlLNjJwohY9uDRJUvQPM1yLHlwa +uXfe6fv9tOjBpY97NZxertGiB5dOfz3rRadEix5cKi/+OO6MlRY9uPSw9Zx3 +E7ha9OBQb411fEGjBj04dGNSyv3tnzXowaGp/qUCtUGDHhya2aIKhDwNenBo +dXbb6OWZGvTg0FdRMkfuQw16cOh4x2/cohI16MGhaaPXJEyO06AHhwqyi+aV +nNOgB4cmSYUDg8M06MGhfX13THE8oEEPDo0JrD7+LFCDHhwa4NThsHarBvPv +hP/Vzm/utV6DeXfC61FnBPErNZhvJ6x23Dd/4Y8azLMTBk57amhx1WB+nbAr +vNvNCGcN5tUJ3922fOg0riufDjiT6C/9OLgrjw5QrlZc3de3a/4OOECig79T +ds3bAf1W/Hsh10aD3/8OOJa+zcrfomueDpg+/ZLPpDY1YduraAcDcXUN/ajG +/WmH7tv3PPz3hZqw6xLWDpadlY/7pKrx/dkOd57qlm26rMZ9aIcLwpy9D46o +0b8dsrQxM63/UKN3G1x7+9OF5avV6NsG1ptvhV1foEbPNpiX4unAdVKjXxs4 +jR09322AGr3aINZZqI6Wq9GnDdY7RO9tNFOjRxuoxlSdmFatQo9WWCF4NiP8 +jQo9WoHn3fd8bboKPVrBJ6HpgvMNFXq0gt0/I+edPq1Cj1Y4tqAipi5YhR6t +YPVEeWvaRhV6tEDmWYN3pIcKPVrAK9A998s0FXq0wDHPk0a34Sr0aIGk8HcZ +sRoVerSAz5D5i4XdVOjRAkfejz3v2aREjy/gNSf/aqpBiR5fYPqkXb/ZZSnR +4wvMiw/hbrmrRI8vUGwzf25etBI9TNces34dcVCJHl9g2LKKqcf8lejRDH9l +Xm1oXKVEj2ZI2a3yXeSmRI9m2JnwPCVpvBI9miGs+6oCpaMSPZphV31g7k6x +Ej2a4fd4w/nSTnv0aIbpdye4zaywR48mmHLv53c3X9mjRxNIW/pOVzywR48m +qNiw5tSuq/bo0QQ/ypmXFSfs0aMJ4qxIk3ugPXo0gSAvU3h/nT16NELhpQKL +AT/ao0cj7D54uD3M2R49GuHRPWm5cIg9ejRCQcL5rN+U9ujRCIEXg2+UWtij +RyOMPmFzdKHRDj0aIPn6lW1P39uhRwMUbH+wetwzO/RogNAx+Suv37bD92cD +iLvtXts7yg49TM/PWxZyKtQOPRoA6uRJNlvs0MMIfkfX8/etsEMPI3A6h/nw +Xe3Qwwj2C75v2D7WDj2M8OfGQ+da+tihhxH2D1b4+9nYoYcRXFJqdzS0K9DD +CE/Kxt7eVK5Aj3qYsmMg0/BSgR71YH3S+slvVIEe9bC1aWLslxgFetRDhlvf +nIDjCvSoh/yUqZPM/lSgRz2UtY5qDVmrQI86sCw4a26zWIEedWA4O37lqe8V +6FEH72cUqfoMVqBHHcRZbxx5016BHnXww83qWxMtFOhRB5sLvMKy6m3RoxbK +T1lWery3RY9a+BxjHV+TYYsetbCkLrf+z9u26FEL8wvSb8ijbNGjFnq9/KU+ +LtQWPUz1ji9Odd5iix41EJ7kLi9cYYseNXBZ0E/o72qLHjVwuur+Qdk4W/So +gbA27b2EvrboYbp28vrLXWSLHqbnnz23bOqQo0cNFHa/Me7kJzmJZfOvBunS +3x0mvpJj3tXg6JHwsuS+nFiw+VZDylabqfuvyjHPKvB2XxgyKkxOfmXzq4I+ +E7zOFAfKMa8qSLow49Dh9XKSxuZTCcuOa1Y5LZFjHpVQyzj2NrrIiYadvxKM +b9JzLw6VE3bcvz9DtZPfjqVqOdnGFvwMQycXOEqs5ISNx+EzrD6Z/DarUUZe +s/tUAc6zG87sNchI4H9AsFER6j81S0aGsftSAeMKrvhZJMlIIbsfnyBOeOJ0 +xnkZOcgCfoL2Nlq3/5CMjGP9P4FhV8Iu9wAZ/t4ph4UaR3eVl4ycYH3L4cn2 ++g3l82XoWQ6Jj3qV3CYyYmQbLANFc2R80Lcy9CqDuRMqPy2Sy4grG2AZfJ7g +cWgAX4YeZfDFM+gGv0aKHh9hjELpXpAvRY+PkCbjBCU9lqLHRyDBQ2eH3ZKi +RynsGmO4s/WMlKxgPUphVtbSTI99UvQohTGPVGHf+0nRowSmRKT1HvSzFD1K +oOi5ZLvdHCl6lMCIvM5Yy7FS9CgGRY/jKW19pOhRDPsjpfdqbaToUQzNiwuv +l3dI0OMDNK3cdqX4kwQ9PsBDs7BbhlcS9PgASwdYvv7wQIIeBghnnurK4iTo +YYC3JfVR1Scl6GGA4VF//9QSJEGPIghpTfSx2ChBjyKIdp6UbbtMgh5F4Hyp +Z9jAGRL0KARf2+oc55ES9CiE6DkZoZ46CXoUwg/BV3J29pSgRyHYDbp9M7pV +TBax+b+H676DRj37KMa8C2BN+Abfhhwx6cXmWwDLfjGu1lEx5vkO0oVkuHus +mDxh83sLlwY2vNl7Qox5vYWnWeneaYFisofNJx+UyRvruL5izOMNCJRZOyYv +FZP/XnBvIDImThMyTYzz/gsH0xsNL4aLSTNb8DWIpv71UsOIcZ7XEDtigdnG +HmJynd2nPFjbb3TA0xYR7k8epAeLXPUfRfj9fQULttwN+TNHRCi7H7lw+mrN +yI8gwn3IBe6r1b/OiRWR31n/l/C/knSH5BMi9M6Bi90DggbsFpHvWN8c6OdX +uf+crwg9X8C4OzPmqDxEpIz1ew517REvw6eL0Os5/NOe1J8ZKSJn2QCzgZd6 +dMXcSBF6ZIPAsEY78bmIXGfzzwKYUB65oUqEeWfCgfSKwdk8MdGw+f4NR58E +Dkuw7sozA872v7YgzV5MDrL5PYXjJ5le1fquvJ5ATxr5+p9+Jk82n8dw882C +a9kDxZhHOtCtsfYTBovJH+z8aRD6zYuDc4eIcd6HMOkh2TbSdF3DzncflMdz +7ESm+/+bh8L1wcJ6ziBTPbb/VBjf8myL/NuufpPhs/uAaWscTPez/d0FGrSo +vqepPw7bzx3ofWRTVA911+fHw83Dzw5stjXNx37eDWivSfOYI+qqHweVOb4/ +n+9mup+tdxlmDjN/s8O86/loGO7WZlPaLiJ/sPdHQNOMmGMFDSL8/xEIH9vH +aV2lKX/2OhDu2bV5hBd3eXA4d9bk316TLyL/B4Mo8dA= + "]]}}, { + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, { + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {{}, {{{}, {}, + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJw11wlUE9caB/BJSABpK4qIiAgVi4ACVYu4PPS7PhY3lir6pEhFURCpIio+ +NyxUhaLWikWt4ArF5dmCiNqyKAE3QMEFkE1ECGFNICsJ2R8wH/fknJzJTO69 +3//3ZU5mWtiuNeFMiqJcGBQ1/D46LJM2D72Y5LB5zrK2Q8chfxJDvtl79Pgc +TLF6GezoxCT5Non81flXoWerPqrx89HzWWAV7vXtPhGDpKcNj/9Bb8aThZoa +Bl6fA8kNfiHR/zCIYPXwJ/dA+XOS5FU6A7//AOaXqzwm/sggJvV/xCw2+QcU +y7yPrtw8Ol8B+ATMNN3hxSBOIWeeDDg+gpc38twPOYzOXwzCJV5r9pkwSNbQ +t+v/KAF+Sn7p930UrlcKD+Ni+N+8pcg3I+MpxN0P9xjMo3D9Z5CQtNDxz/MU +eTrgOLTCc7hlvtTJ7wCF+ymD6a9+LWkJpsiakQXLwXKect+mxRTurwLcLW0b +qm0p0nZoeMKX8Hl7ZJw7k8L9VoINf6xuUoUedg9vL6YKwjJb2bdP64He/2tI +SsrZYrNGD7TGWwhauupAnIUe6Hregmtoy72nTTpYPrLAO1jLqTg1cFUHdH3v +YFzfyV8nbNHB8GohZ6qh9eHFAFsHHdD11sCPQYt3W/G1MFJOfQ3E3t+ZaXhX +C3T9tWDYcuVqxx4t2A5vx+Y9nLye6lLgrgU6j/fQ6T1/+jGVBrZFDI86GPTZ +EupdrAE6n3pIXne/inFUA8OzmefUQ8LqwPBCbw3QeTWA5J/XjrvHaEA+PN1A +A4imttk7VqmBzq8R6vyX72tLUcOSkQmbIC/r4qJra9VA59kEIQvNs7ZYqmFk +e4kfwOZUYu/sZhXQ+TbDL+42q8dcV0FV5fBohhkRwfbCLSrM+yOo0nuKeQ4q +mDiywRaIi70SL+ArMf8WuDg1tMY4Vwkj04V8gndjnGd7xCrRoxWe51hZnFig +xHpawbF3m6lEM4g+rVBacTr3YOkg1tcK66K3XrRLGkSvNvB55RcjXDmI9bZB +tMlOAdd0EP3aoCii95W+VoH1c4Ef7NW4PF2Bnlz4dezd3pJQBebBhZOao9wo +ewX6tsPvn4ruruDLMZ92eGZ0wn/TPTl6t8OYdaLye/vlmBcPbL5OnL90iRz9 +eVAmd3syni3H/HjATZmZMaNyAPuhA441vZx6LHUA8+wAf+PK1JkbBrA/OiDZ +NWrPl9MHMN9OcI0tWhzJl2G/dMLB0hkp7AcyzLsTfrOgrDVxMuyfLqie6p8d +4CPD/LvAy/jxLNY4GfZTF+T4Pb08tUmKHt2w67TW/nqWFD264d6JMtOUXVL0 +6IbQCZPLxYuk6NENTiU5HRWGUvTogeKYn2dNrZGgRw8ozEp/EV2ToEcP2N5t +nb1ipwQ9euFVaeoB539JIGXEoxfa3dTM62Mk6NELpmNT7/+vQYwefOAvqsoP +uC1GDz6cbT+YevGAGD34cCbR2vbUCjF6CGAZFXjJdYoYPQSQLT/098k+EXoI +IOnty7RbJSL06INJ2TaK0+dE6NEHz78rs1y2XYQefXD+j0Jp8xIRevSDfk66 +R/BEEXr0w6cWT+p8oxA9+sHxUnh87EkhegihY06hffRiIXoI4XmG+dVrkn70 +EMJ3d3budLrTjx4iOB/tuvXrrf1Yjwh+Vzo7NH7Zjz4iiN/8rG5Nax/WJ4Kw +2CvNVZl96CWCdRur+D9F9mG9Iti8dr1nzpw+9BNB5bTfVlzSCbB+MfSnpl2/ +/EaAnmKIS3/EnXBDgHmIYfu5yX6x8QL0FcPCKSufLQsVYD5i8M9a0DLPW4De +YmimLpmMnSvAvCQwddnhx3UzBOgvgSrBG3bHVwLMTwLL1v9oZ+AqwN+nBL6Z +WPH0vpcA85RAzD7TQ/d2CLA/JFD5kRen/VOA+Uphyu3je0980Yf9IoUvXSyr +7e/0Yd5Dx0GLHlrw+rF/pKA0HprbXIT5S6HwkVXQgQIh9pMUJoqNl8SuEKKH +DHhNbAhtHPWQga99lKfb9lEPGRi8f2jaPzjqIYP0yPE+PyePegz9bt/YRaom +jXrIIGjuosaltwToIYMTtY2t691HPQbAIfpStvtzPnoMwOqQ2KCGQD56DMDX +5UHd7txe9BiA8FSP//jG9KLHAEgCd5010/WgxwBssAg4fuxUD3rIgd2+anKa +ZQ96yMEvwI343ehGDzl0XyyVps3pRg85OFgFwcHHXeghh3Ai9OpY3oUectD9 +bebZUNOJHgrY5NKX7ruxEz0UsNLSt86juwM9FFA84VT2H7s70EMB72es+yJO +xUMPBUjtZ1qXHuWhhwIy310Yusfz0GMQXliYTos/244eg5CmC84TTmpHj0H4 +a3vynEdXuOgxCL6n1jm32XHRYxD03ibHNtxqQ49B+NCZH+U4qw09BuFPz7Zo +75xW9FBCZvPePbmzW9FDCU3/jdr0Zusn9FCC6KbxvpqIFvRQQo2l2UDUto/o +oYTcK1nfn4toRg8l5BQ1Vvtv/YAeKkh+r7ZK39SEHioIWPHh4n83NKKHCriM +jd4daxvwfqkCZ+/w212+9eihgrivZ7yL96xDj6Hza8f75y54jx5D/wsOhH8V +51yLHmpYG5hc1mlTgx5qOFO9ZJzMtBo91OByrfmb2/q36KGGOGvGftPmN+ih +hiNqrtz17yr00ID++HcTC06/Qg8NWCu278sPq0APDbgkbLBdMK8MPTQwvuDy +bk/2c/TQgGHgNrPO6ifooYEOnQt31tUS9NBAZmHBx6WvH6GHFu7VcN9kbshH +Dy04p9bPSOXdRw8tpARuGbu+Ogc9tNBwpMx9TM0N9NCC+6wfTJovpKGHFigT +nwkPPh5BDx08WOcclbcrkUN76IBcyjO5IL/MoT10UMhrlLhl3uLQHjpYXxV+ +YXFkLof20MGx+rNnFcyHHNpDB40eJ4/MySjg0B56cDRWVdX+u5hDe+ihvvNk +TsfeUg7toYeE0on5+rKnHNpDD1dacz5mT33BoT304LrLP68jtpxDe+ihslDB +vFL1koOPH+TGmdP1FQ5VHLoeiqQc37g37NgbDu1DkUf++XdcRW+xPoqcO7/i +cpBtNYf2okj87asnZgbUcEbKjaCI6W/XPrseX8uh/YaeA3bcaHiQ+55D3x8o +0vCLy7Ot3DoO7UmR2qNHiv80b8A8KBJjvag2cVkjh/alSLuP1EV4qAnzoYgm +9aYpL+cDh/Yeeq6QLWzY1N6MeTFIrpmICrNs4dD+DGJxvt6a5/cJ82MQX7cp +AvHSVg7dDwySZKpUu35sxTwZJGHa4b9uHWjj0P3BIK0FlfuDzbmYL4OUaxPa +vXO5HLpfGMR6qXdCpG875s0gHvdTe0q62zl0/zAIuRzx3C+Rh/kzyKONgqdf +2HVw6H5iEOYOj2v64g70YJLab7+YYhfSiR5MolH9wIpVdqIHkzisjZ0ju9CF +HkyyyueznzLcutGDSSIWpzcdqu7G/mMSf7dKl/iYHvRgEtcg3z3ZY3vRg0lC +lyfdYmX3osfQefW22mOr+OjBJF8ttzea2ctHDybhTdaulScL0INJTHyopi6H +PvRgEjBpyte+6EMPA/LaMd1qfkQ/ehiQvIwE11S2ED0MyCzmK6fxN4ToYUA2 +ZpROD7IToYcBOT7JkTd/jwg9DEjWzekHHZ6I0MOA7LbdlDzDTIweBiSs3LzQ +LUyMHgZk5kFh/uo8MXoYkMfh1NwjTAl6GBCv1Ju1f6+RoIcBsZDGrdFlStCD +RZJtlocGSiXowSJdd3m5Dz2l6MEiYXPd9V+dk6IHi6y8acHK4EnRg0WyfvM5 +7DRPhh4skp75vV1xogw9WGRzWVH+xjoZerDIxeZDehOHAfRgkSUVmwqe7B9A +Dxbxsaq+k1g+gB4sQpk9TwucLEcPFilyfOjnHCVHDxa5oLpwxrRIjh5swrhW +6aT9TIEebCIIt+qWhSjQg032Ky79Ls9WoAebpFUXGDL1CvRgkwkOtuxJ3w6i +B5tYGudumZcxiB5sQmTxshDJIHqwCftu+cnTnkr0YJPMqDbVi3NK9GCTHYvd +rcZ0KtFjaP024ATOV6EHm0QUHS69maxCD0My236rktGkQg9DUq6OJOGz1Ohh +SEx3dMe8jVOjhyHx0TpEeL5Wo8fQ9XV+mse2GvQwJJolwePIbg16GBLr1dMS +Kp5o0MOQ+HZ7zQw216KHITEqdu0Xh2vRw5DsKjD5K+UfLXoYkgvRpV7uY3To +YUhOvJKkcYN16GFIGsSi0+f/0qGHEfFbVGQQoNOhhxGJDFO2jP1Wjx5G5PM2 +ucH7DD16GJFnm6+uz5Dq0cOIJOYVfiqwo0poDyPymlE57uYqqoT2MCKpUcFz +z8dSJbSHEck4zFrw8xWqhPYwIsFWORPjXlAltIcREd74kbNXSJXQHkZkudMn +p2hLRgntMbTepQMrfljKKKE9jImZ69wJP0QxSv4PGq9G7Q== + "]]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6], + LineBox[CompressedData[" +1:eJw11wlUU9cWBuCbOYCCUpyoQ6UKKOITRESL7mNRqhZEhSoCKkUmsU9waKuC +SqsoTlUL0joXK2gdkIeiUNQwiGAFZBRERBIChBlCBjI/4O6elbWybpJ7ztn/ +t+9NMj0ocn0Ik6IoewZFDT//OwrmjRp6jCbRFmlfCQ8chWvT911NqRqFx4nw +j9qnpv7yKJI1Na5zXdY1mLYjifEq+N/3b8JPohke2+eOIpcuDo+/oPhSXmDm +oAl+Pg1SHVZvuVVgQrrWDb/yP1jgp3y16KwJnv8IsjavOBrmb0KMa/+MWmL8 +BJjOywV2tiY4XzYkaycqfpIbk1kBZ/Pltk9hX++RlpACY5z/OYztXRFXdd6Y +3Bw6u/bPXEg67s4sCjTG9fLg6O+B2a7zjMn8kVEAb4oEjg6UMa7/AoSrnk5J +LjciBXLboRUKwWjNTM8TyUa4nyLYfLfrYetuI7J+ZMFiuO9tG/R4uRHu7xW0 +3t36s3y8EREeGJ7wH8iByRuT2/m43xLQhz12efKUT3YNby+qFNiRGxOczvFx +/2Vw/rRdy/hgPqE1yuFBwfOn/i58rKccopfFPqFG88nKkQUq4GpAeCxLxMP6 +KsC64FnZt094ZHi1gLOVMDFfETzpDA/rrYKl4odmttt4ZKSc2iqI3VFx89Qi +HtZfDZtCzjC/HMMj04a3M7UGSr1yTVe1cTGPGvhrt/Xja8+5JCx0eLwFiUtW +J0niYj61ME1tdtt+J5cMz2aRVgsu+e8lQe5czKsOLPM3pTdO5RLF8HTyOvCy +a2RfV3Iwv3dgWPNtX3I5hywdmbAernRaxLb8xcE860F901AQdoRDRrYX9x6o +h1fLrDdzMN8G2PYx7tFnCzmktGR4NMAp5djT3mM5mPcH2Cky+u+zTjYZN7LB +RpiQsDYq4CUb828Ep0m/PpibzCYj0wV8hKQJ0uWOMWz0aALj3uzVIRvZWE8T +fN7HeV/oyEafJsjoiDJbb8rG+ppg1t5nFL+DhV5CuAQxL1sKWVivENaK0n5o +T2ahnxAMW0Jnjj3EwvpFEP4mQOznx0JPEWyIPZH/wpmFeYjgcVnaa49PWOjb +DOLRQl5/LxPzaYbOTE70gxImejeDl+nqGcf+YmJeYjgbc063+xgT/cWw5Jcq +9Z5tTMxPDFNeHDQ6TpjYDy0QZJppdmcKE/NsgSUVv3fWqxnYHy3gYrdr94Q6 +BubbCifGl0VuzmRgv7RCfk3izTu/MjDvVrjcpyrURjKwf9rgWXlIzDpPBubf +BrqKZUGpsxnYT21wzPsuU8VjoIcEDBzjOvcWCj0k8IXPsdVn8in0kMDmbwLS +Xl2n0EMCm5x5X6piKPRoh8xdZM4kPwo92uH9/tL91gsp9GiH47fHfTrVgkKP +Dvj7ojRfJTTAuRGPDvA0Lxg8dNkAtEcH7PlD3/nCxwC0Rye4rg/Y+mK0AWiP +TgjKr8/5/qUeaI9OWFMu4FUc0gPt0QW+JLah1FkPtEcXRFwP8t/WowPaowsu +N9/6LD5FB7RHNzQSlZNjgA5oj24o7i7RbjDXAe3RDe0bg2Z2FmmB9uiB8h+b +fhHFaIH26IHXszjz5zlogfbogeb/pfNeijVAe/TC7S8iGhJ/0wDt0Qtee545 +nF6lAdqjF/xHM4wuqdVAe/TB3TvDQ4319MGDKQWBtzepgfbpA8ZNd6tonhrr +64P5s23s+I9UQHv1wcHEqdEOW1VYbx+s9v96fg1fBbRfH9iP8S0qSR/E+vsh +SmMp7dwwCLRnP5x+7bzBoFZiHv3g6pRy658rSqB9+yHsnqst11WJ+fSD/YLU +6f51CqC9+6GeyS/fskuBeUmhtyXj9UmuAmh/KbymalwdfpNjflJwCeWd224l +B/r6lMLRxOzqnlQZ5ikFbYUJp8lKhv0hhYVhF5NdEgYw3wFoLn1UEi2VYr8M +QH3e1k+XOEkx7wH4eGKNzQabfuyfAdDzuyDLog/zH4DCp5a++7J7sZ8GYEo/ +f+neVb3oIYP2eg5sfdeDHjL4fmaEm9P2HvSQgVlNplnPYDd6yOB++Fj34/Hd +6CGDPW+swtUTutFDBhGOi98tu9WFHjI4W/2uaaNzF3rIwXXn5fvOhZ3oIYf1 +AXt967w70UMOi4p9Jc6iDvSQQ2iC6waPqA70kMNEn8jz5vp29JBD5Hivo0dO +taOHAkybv550cWI7eihgrZcT8UyRoIcCdL/nDVx0kKCHAuZZ+sL+Z23ooYBI +0ru8ZWUbeijA4om5W11VK3ooIdy++5LHllb0UILXRI+3rpIW9FBC2Sen7v+5 +qwU9lNBu/c3oGLUYPZSgnzl7ct7PYvRQwt2KJNhpLEaPQagYbzb98Plm9BiE +63q/jN4JzegxCE+2xzs8vSpCj0HwOPXNHKGVCD0GgedufMT/lhA9BkHYmhVh +aydEj0HIcBPuXJHWhB4qSGnYszt9XhN6qOD9DxGBb4I/osfQdZXK/74qtBE9 +VFA30VweEfYBPVSQf/Xm5sTQBvRQwaOcd5Vrgt+jhxpu1GgsLwXWo8fQdb7q +/e8/+L9DDzV0MLasaPGpw/ulGjxXhNxu86hFDzUc/o91xWG3t+ihBkefsWvS +XWrQY+g+sy9kRsycavTQwHfe8UWtU6vQQwN/VC4dIzOrRA8NLL7eMP+2oRw9 +NPDLZMaPZg1v0EMDCRqRYu7jUvTQAjtu07jsM6/RQwublNu/zwp6hR5a+CLW +f5rLgiL00IJl9pVdbpxC9NDCBu8w89bKfPTQAtNgL7K7loseWuDmZH9YVvYU +PXQgrhK9ueGfhR46KE+otU4QP0QPHRR6bzPdWJmGHjoYPFjkbFSVgh46+MNu +h3FD0kX00MFME/dPHn04iB56yPWeE5ERGSegPfSw6HKGcZLiioD20EOg+J3U +6cYtAe2hB35pSNKS8HQB7aGHz2rPn1cyMwW0hx7SXU8edEjOFtAeBhjHV5dW +f/lcQHsY4F7rybSWPXkC2sMAbnnjsgxFBQLawwA+TWkf7k95KaA9DEBFrslo +2VssoD0M8OffSubV0n8E+PeDxJ89U/vKplRA10ORQ0e37Ak68kZA+1AkfU3W +nbl95VgfRaIurLriO61SQHtRZN/taydme1UJRsoNHfoeP3/d5I/D1QLajyId +36XUPUqvEdD3B4qUnbZ/ESx6K6A9KVL+88Hndy3qMA+KhE9eXB331TsB7UuR +JvcB+94D9ZgPRTQJqWbitPcC2psik2WL6gKbGzAvBnlg3kcFTWwU0P4MMupC +7WSx50fMj0G+cvq0q39Zk4DuBwY5ZKbSzP3QhHkOHU+Pvndrn1BA9weDNGaX +/OhnIcJ8h3536WKbV6SLBHS/MIjpshWx4R7NmDeD2DxMaM+VNAvo/mGQxVdC +Cz3jxJg/g6Rv6SoYbdUioPuJQdQ7XK8bnregB5MUrR39qVVAK3owiVy9g71X +1YoeTDLDZ6+DLKkNPZjE1d3kp2QnCXowyboll+oPVEqw/5hktVOJ/eGodvRg +ktm+Hrvvm3agB5P4rDx2i32/Az2YxFYTVn3k6070YBKrlTN5szs60YNJPkzS ++Sjiu9CDSRjuVH2bTTd6MMli4/os3ctu9GCRYttLlgtDe9CDRdKSY+cmcHrR +g0VmMF/PGpvSix4sEpCc97mvVR96sEjsBFvxwt196MEiyamf77fJ70MPFoma +Fhhvbd6PHiziV2zxt1NQP3qwiPX+3qx1Gf3owSJPQyjHg0wperDI8oTU6sfr +pejBIqMGYtbrb0jRg01ipq7c6j0gRQ82ET0Qp2e6DaAHmwQ6OhtmJA6gB5tA +6nh2sngAPdjk2q/u0bMWyNCDTRJvbLZ6HidDj6Hzi3KytryVoQebnG44YDC2 +kaMHm7i8CszO/1GOHmyy1LLyTlyxHD3YRDe28KL3JAV6sMlj20zPOREK9Bha +T5101ixHgR4cQl0vmaUzUaIHh0hCLCWyACV6cMhO5eXfFPeV6MEhJyuzuUyD +Ej04ZIzNNM6EtYPowSEW/PRtC5IH0YNDXGWHZQHSQfTgEPaD4pNn3FTowSGJ +EUL1y0QVenDId0ucLY1aVejBIbuFIPBeqEYPDgnOic5LjVejB5fYzAxWMerV +6MElxZpwEmKnQQ8uGfWdJKo8RoMeXOKuswl1K9Ogx9Dn33pqn03TogeXqJb6 +jSG7tOjBJWPWTY99la9FDy7xkCyf7WehQw8uYT+f29MfokMPLgnONr537okO +Pbjkws685c5GevTgkvjX0osiPz16cMnb/r4zF+7p0YNHVi7OYXnp9ejBI9uC +VI2maw3owSNcoYJVk2xADx7J+fbaxuQBA3rwyJGMvz9mW1G5tAePlDJKxqR+ +TeXSHjySEOHneGEvlUt78Mi1aLbL8atULu3BI5ss08bFvKRyaQ8e6Ug5JNjT +S+XSHjziPuvjrJ0TGbm0x9B6l/et2rGMkUt78In5XMdPdkQwcv8PMzEYvg== + + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJw12Al0VFUSBuDXr9csjLINiogoKiAigozKIlWDBhA5IODgEkBPVKKiyH4Y +QBEniMQBHBYBDatBRVBAtiCYBhIIErYQICHEkH0jJJ1eku5OunvevffnnZyT +k+29W/XVrbovDyZ8PP5dXdO0PiZNE5/vXBlPxhofbXhhh19HlCxIolEfDP1s +U2Msvl5Lud/PeC46L5bTui69NS5tM035a3tw3rE7P0+lur9fPVy2LZa/3Siu +nTT3Zfvcl5fd+f1fSUse2P+PD2O5bpz4zj76MmNaQ6/xd/7+AHUMbdr9zTOx +HJ0nHnSYtjx96X3z/Xfud4R6zdB7zNBjudekVSd9PY/Rvp0DygurYnD/dBpc +NnXbi+djOFUs8/vjdKrLximHfovB807QmInZ93XfEMNPySuDClaF8ld9EoPn +Z1LCn32/aU2I4QxfT+MJp6heT5jw/sgYrCeL5g9Ze/e1PjE8Xj7wDOnzTp8f +1j4G6/uTVuzxJ+/xR3PJAnHDs9S+5rGRXYqisd5ztPWhydblGdE8Uyxvxnnq +I77/UzTWf4H2rzuxOGFlNCuNSzTkomfIxdnRiOcSnXY8Ghz8ejSPlA/IofHD +Xjv809BoxJdDNxYmz+n4cDSLp01adZnePnis3+dR0Yg3lxrqxRXFMpy8XFrQ +88Hd8VeiEP8VEuGeORLFD4jldL1KK79b+ug/tkQhH1epg+BNiuLEqeK6Rtv/ +Vrv1bx9EIT951GdklykLx0axuFuHX/PowJIx91UPiEK+8mnI0c/yX+kcxU3i +dr58yvb+tu5ExIH8XacJT1SMf6LCwUPlDQuoKLHT3d+ddSCfBZRo6Nr3Olgu +b+kNchcYAa9zIL+FNF/G4eDz58RVSOYxxZYxbzmQ779o1bJ2J3+Pc3BHucAi +6nTihcU9ejuQ/yLaGpxnCDtY3m7STeo9YGdAa7LDo5jSPrpx6KMbdsRTTPxj +mzkFx+3wKabTxdRvxA92xFdMEzvPqt//lR1eJVQ0IXVXt5l2xFtC76249t6K +iXb4lZBLAtsRfykt1IyKftAOz1KyDvpoa67NjnyU0urZWyZznQ2+ZXTPLzmd +f8mxIT9ltKPSnH/vYRu8y6hvt6fXfZFiQ77KKe3198Z7ltjgX07Pr/n2rrcS +bchfOWWLT6NtqIcKGmeLLB/Y34Z8VlC5CLeTDfVRQe//+21L+5AV+a0kwbu4 +1Ip6qaTP6rI+rcuyIt+VFC3K+Rcr6qeKVr/5eODUaivyX0Wdje3bf74V9VRF +P17+2ojYCo9q6ifa1fNWeFTT0Tjf7fk9rfCoprjFPXZVtLHCo5ouyoAt8Kih +ePdXjzjzLfCooZLe6aW90y3wqKFp77q2bPjeAo9aatosNrCFv5YetSSqedZ0 +CzxqKabdsryiCRZ43KI1Lx1Z+9JACzxukQy7qwUet+in9PvvesRigUcd9feP +Pfe/GjM86sjYvcvDF8zwqKO4aQeGTztghsdtuphqAG80w+M2TSq6x6hoMzxu +U3mnlz7d944ZHvU0fdwng7uOMsOjngJGt0rua4ZHPX2eWXKwuYMZHg3UJtx+ +9jtBHR4NtPGZ4U/m3NTh0UAPzJx/+7lTOjxctPtncemIx0X9ygsTO32tw8dF +fxjhJs3VEZ+LRr76z1LXGzq8XJQjeFlHvC6KP7tj0tlHdPi5SJTzMzE64m+k +j+WfmeDZSC1i+14zIR+NlLTXiPioCb6N1MZoV7VbTchPI23onps98QsTvBup +m2jP00zIl5v2fmMEPM4EfzeJcbTpaRPy56aTUSnHo7qYsD/dNOr5C5/MM5mQ +TzddWWRs4EoN9eGmSYeEsIb8eqi64Z2Dx/ZpqBcPze61flav9Rry7aGwGEiL +NNSPh5altNTpCRry7yFjGP388QgN9eShFGP3Fj6uwcNL3V9c/fCL7TR4eCle +hNcQIeXhpdkGX9zvEVIeXkqSz4mQ8vBSyhSx4AgpDy/tFu2lc4SUh5cyXxAb +LEzKw0eXxXjYGybl4aOqx8RACJPy8JEc78PDpDx8dFdbcYVJefjooaS5X9Xe +CJHy8NHg5uvWzB9CpDyaaLQ4j8wMkfJoonhx/hgSIuXRRLPEecMeIuXRRMni +fHG5lZRHE22WgK2kPJporzg/JLaS8mimLHFe6N9KyqOZrorzQaiFlEezOg+c +aSHl0UyamP9rWkh5NFMHMe+ntJDyaCYZVc8WUh5+ek7Mc0+QlIefxor5nR6E +h5+minm9PAgPPy0S8/mVIDz8tELM4weC8PCr+VsbgIefjoh5eyAAjwCdlg04 +AI8AFYh5OioAjwBVifnZMQCPgJqXxX54BKizmI+7/PAIqHk4zw+PIA0V84/9 +8AjSq2LexfjhEVTz7VozqX4ZJLEdpm5rhkeQ5Hb/sBkeRpxygzfDo0XNJ1Mz +PFpIhn2uCR4tVCTmz/omeLSoeZPQBI8Wsov50qcJHi3UVfD6ffBoVfMjwweP +VhouynmFDx6t9IaYD6/54NFK08U86O6DRyt9Lvp/vRcerbRW9PsjXni00o+i +vyd54RGi30U/H+OFR4iyZcBeeISoTPTrcg88QiROk8l7PPAIUbToxws88AhR +N9F/4zzwCJOo5k53e+ARphGivxa44RGmyaKf7nDD486+dMMjTP8R/XKwGx5h +2ij6o80NjwiJ3ftkTiM8InRc9L+URnhEKFcCN8IjQpWiv/VrhEeEWuQB2wWP +CLUV/SvLBQ+NHxb9arUL8Wg84JiYuC74aDyqb/y9rT1ciE/jNNl/GuClsdx+ +CxtIhjtV41jZXxrgp/EQ2U/q0R80niz7Rz08NVb94jbyobF8v0i8DV+Nr8t+ +UIf8aByeK/Z/Hbw17ok5rvJlYnk+T78FfxPPkfv5FvJn4lS5f2tRDyZW+7UW ++TSxPN92rIWTiTvI/ViD/Jp4mNx/NagXE0+V+60a+Tbmktxf1agfE++T+6ka ++TexPL+tr0I9mViX+6UKHjoPkPujEh46T5D7oRIeOi+S9V8BD523y3qvgIfO +F2R9V6D+dPbKei6Hh85dZP2Ww0Pn0bJey+Chs5zvM8rgofNmWY9l8NDZKeuv +FB4618l6K4WHzrGyvkrgYUY9lcDDzG9ud6656i6Gh5mXfimuYniYWW6HrsXw +MPPPsh5uwsPMIelfBA8zj5Hef8HDzJulbyE8zFwtPQvhYWbVP2/Aw8wrpFcB +PMys+tt1eFhYvp5n5MPDwtNl/vPgYWHVT/LgYeG2Mr/X4GHhWXLdV+Fh4TSZ +vyvwsCBfufCw8BSZn8vwsCAfl+Fh4cgg8cKdAw8LjxXjd+4leFj4WRnfRXgY +52oZz3l4WHmpXH82PKzskOs9Cw8rp8v1nYGHlePkek7Dw3gPkC/8p+Bh5S9z +bcYbUgY8rDz6w8faDGw+AQ8r51jEgDsODyuH5fr/gIeV28nfPwIPK2/YNHP/ +pdRD8DC+viAm0n54GO9JEXHtgYeNOWHl6L7xO+Fh47RMcaDYDg8b/0v9AwIe +Nnb0qDzj/W0pPGycOmhJ+2eXvO1UHjYuzfzBeONZ5VQeNn49RR5gnMrDxqPq +/mucCHY4lYeNhxnTZWL2LqfysPE2427tn93nVB427m3sroXJB5zKw8aDZIM7 +7FQedr65WARw1Kk8jPdacZxYku5UHnY+Kuv5uFN52LmtPP+cdCoPO8+R/TTT +qTzsnCX78ymn8rDzE0b3u7kyy6k87LxEru9Pp/Kwc4P6v4lTediZ5XrPOZWH +nQ+K1/+nLjiVh/FeLtd/0ak8HDxQ7o9Lzv8DXQ3PJQ== + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[1.6], + LineBox[CompressedData[" +1:eJw11nk8VOsfB/DZR9ZZWkgbpbTQlSxp+T5KpVJX3VK5WrQpLZablBZSbr9Q +qZT2TdttcRNSkSIpXXuhQbKP3QyzMMz4Yb6ef+Z15pzzPM/38/6eM2O0xWvV +dhqFQjGjUij9n4MjcW/pq72lfHJ4aMziyoCTcIxIo2vyB48j4U1d6hjWFz55 +PSakaeXrWzB99MPMwneD5++Dr7RU4RLHJ9eu9o9/oF63NT388eD1MTA9ma46 +dJNPmlf2fxMLNtt+W2R0YfD+eNhc1Kod8jefaBZHe8/VTIT1KQ2XHgUMzvcG +du6epgzdxyeT3c6lSU2TId21wM5iy+D8KbDF2HHijTV8cr/v7uLoDzDF3uxQ +tuPgeqmQU1SdnzGbTywHxkcotBEknDYfXD8dHO9GXBxhxCcfpaZ9K3yCSc3+ +6T78wf18hiWy8LNXmXyyamDBLzDtuMAkQs7D/WVCmP/X5y4NPFIZ0D/hV/it +bIddawkP95sFAp5n/tosHvHp3553NgQlOOyOfMfD/edAcipLcj+GR9QaeRAU +ZuUUepuH9eSB6dVzSxZG8IjjwAL5cGnxh8SiIB7Wlw/1ZYz14MMj/au5nSsA +u8D0ukB3Htb7DcLWj+JdXckjA+UUf4MZfPeTYfY8rP87PLl9+ddaCx4Z27+d +MYWQt/xXimocD/MoBL6w6lUQh0c8dvSPIngdZe5S3svFfIrh8OKzJvptXNI/ +29CYYvDu3PTYvJyLef2A1peVbsbZXCLrn076AwQHA5I7kriYnwByY1Szo59w +ybyBCUtAY5NomcVVLuZZAtaxSetuneKSge2FlEJ6Q9vXRj8u5lsGaXP82CO2 +cUl2Vv8og/9ev/cav4qLef8Es9Bedw7hkmEDGyyHwNwVs8rNuJh/OVhY/1x+ +xpBLBqZz+wWScwbS0UO46FEBrHOC4xEyDtZTAXe+BTrUVnPQpwICfceFjcrn +YH0VcE///l3rFA56VUJMW0O+5VMO1lsJ57fUbx16hYN+lTC5Muvmj5McrL8K +pO9Hpgf5cNCzCiJXZBrobORgHlVQD+4VR5dy0Lcabh42WPfNmoP5VMMFn473 +OuM56F0Nw1nFa8z0OJhXDQjXuT3fJtND/xrYG0ZRzsrRw/xq4OSLkdzSB3rY +D7Wwb1fBRsejephnLfywMXMNXq2H/VELb9sdDpyeqof51sGd8GMmG2l62C91 +kLkiVUAR6GLedeAbG8Pw/VcX+0cICdKSES9DdDF/Ibg8YoWk/qmL/SSEsVPX +p9yx0EWPeigIumHtzNZFj3o44Rbgnlemgx71EJXyNs7opQ561MPC6SejHU7p +oEcDRH28+XiWmw56NMA+XtwcqoUOejRA/NxrpdeZOujRCIa2N+iaJdokYsCj +EZZ6vrdyitFGj0Z4Wj5UtiVYGz2aYMsIjawVLtro0QRacbHzOVO00aMJxtDN +Gh4ptdCjGb4kiFYNz9dCj2bQiZui73ZfCz2awdBpbNEhfy30aAFSHDbde6kW +erTAiQLtbBithR4tcObOqQ0NbZro0Qpe4qjLe9M00aMVvlRSrLIjNdGjFeKL +jJQaHpro0QbThnolGc3SRI822MZoddDX0kSPNrAbneDfUjYEPUTwbKHX7Hsx +Q7AeEew4X3XcJmgI+ojAbVTA4piVQ7A+EQQnF1xkjx+CXiKQzVwa4CDRwHpF +YHAkYuSOTxroJwLXy3Z3917WwPrFMGOPi6ObhwZ6iiGiUbXW0lYD8xDDl9tt +EyUaGugrhuGNww3vCNiYjxh8n5o8sX3CRm8xHFtj6Po+gI15tcNBRVaq1TI2 ++rfD9abtp28asjG/dnBcVOHZ2cTC57Md0h79NcMxmYV5tgPLoDPlbDgL+6Md +NoyaTctxY2G+HeBzy4GqYcbCfumAObtPf5+nZGLeHRB6X+Px/mwm9k8HhN9a +mfT0JhPz74D5Pl7udXuZ2E8dMDEwkTJpHhM9JLBgxkGety4TPSTAsgoxTi9n +oIcE7ENu5Zj8y0APCRyp/vdTVCADPSRgsK4uY5QzAz0kEJtz9U7iOAZ6SOCx +yZDpu8V09JBCY5DQ1S6Njh5SKLd4O8L0Ih09pNA+nr3FZhsdPaSwb8fqubut +6OghBXNzRWwGi44eUtDwy/zq9IOGHjJ4Zx16gfKEhh4yuGu6hlt7mIYeMhA8 +zV6iXE5DDxnYX7S3dhpHQ4++Y9OET9/bqeghg+7Iqh9XP1HRQw65x2fCrStU +9JCD+8z0uJrdVPSQw5vyrSVeQEUPOdgq382Zz6eihxxePriweKOQgh5yqPA3 +dMxIoqBHJ2w+emvXkQgKenRCcKxNXPB2Cnp0Am1CBbPUjoIenTA/6fXIUxwK +enRCodZsOje7F9QenWCQpElSD/WC2qMT1sRs3mw0qRfUHl3gt93puGWhCtQe +XZDrMmRn1wkVqD26oPisbfB+SxWoPbpAbPKy7kG1EtQeXXDZUuhyNlIJao8u +SJN8JeaLlKD2UECzjW1qSGcPqD0UwM/JeBj5tAfUHn3nU+l+rpt6QP2+VMA6 +b5VHEb8H1B4KWLRs1EF2ZjeoPRSg0jDZ2HysG9Qe3VCy6FDUCatuUHt0w9nJ +Ozz/a1aA2qMbdO1ON6beV4DaoxsE0bbKbRsUoPbohj09NRteDleA2qMb3n73 +vPcorwvUHj3gH7wM5od1gdqjB7oSPoUFLuoCtUcPVEZ//uRG6wK1Rw8kPEgY +VpzSCWqPvrp/p15oOtyJHj3gKTkzP2pWJ3r0QFV4xfhiuRw9lFD0xmDK41dy +9FCC1OfNAvYBOXoowSZwmpvYSo4eSogLn7Bxq0yGHkpY2p1k5ZooQw8lvND3 +KCg4KEMPFZg/jDf9aidDDxW8E/yynKuUoocKFlpay00/SNFDBcm3/ggMPSFF +DxWM9Lap3tj33Ko9VCDImrkwWkuKHr3gPjz12+o8CXr0guEv46/elyTo0Qsl +tXQfiasEPXoh5Wj9mJ/jJOjRCwdiz9qaCjvQoxcOr7ax+Pa8Az0o5LNBaWjp +/g6sh0K4j5YXzZvTgT4UsvOoc5yC3oH1UcgP76g87ax29KIQ/6Ufmnwj22Gg +3B0UslYP8qdsaEe/vuudiNuMie2gfj9QSPOz4AOn2sToSSEdclN90zdizINC +aiNDFvNOiNGXQuwCKvQdlosxHwrJ9raNSRohRm8KoftQbPyrRJgXlazPE7Tt +fy5Cfyq5XLnMOO6gCPOjkqDrhyb85iDCfqCSnIzCdY16IsyTSmJXPvvzQ2Ib +9geVXDN2mj3OuQ3zpZLrS2P/FNe3Yr9QibOPdflvwa2YN5W8l+Z2lRq2Yv9Q +CXWnr6ItoQXzpxL7MwHE07kF+4lKhItHEMemZvSgkejYhKBTfzejB42Meeh1 +w8S4GT1o5EXnERiX0oQeNDL66KNJfq5N6EEjm7XSxhvLG7H/aMT/qjHfJLIR +PWjk0PGxtYctGtGDRjRpEVcm5DagB40UsJ1nj97bgB400m3/uWGrVgN60Eho +yF85sn/q0YNG9I8dMPruWI8eNPLs4URThVCIHnQiPhE90+OUED36fmeG7X1g +MEmIHnTC8lfV6H2uQw86WXJl9y5Hjzr0oJPRXFp8KrsOPegkoaXZOeBxLXrQ +yWSf0iLvJbXoQScl8U/qohtr0INOnPR5U3nhNehBJ/meq9a9NatBDzqZliqc +ej23Gj3oxK9i7p44n2r0YBA/c4966tBq9GAQ6tAi/5BXVejBICtT9BVz1leh +B4PUmkW5TOqpRI++3/XAP44suF2JHgxyc9Mz94j5lejBIIoLRgydugr0YBD5 +qZE7X5+uQA8GiS+JuXLerAI9GETvWOWK6dG/0INBJh7xXXexqRw9GGS7b/Pp +5TPL0YNBTttLprgd/YkeTLLvwbWz7zLK0INJ9EfT+N6cMvRgEnED28jXtRQ9 +mEROE01Nu1+CHkzyu5Afu7FNgB5M8nJ6pM0iOwF6MMmsfG1n/5Af6MEkH4TL +IkV5xejBJDKG1qMXo4rRg0mSSp9YvtpZhB5MEjpH3NIbX4geTDLRKfN8OLUQ +PVgktYRZ7briO3r0/c/LNXm+6/o39GCRyxdGfkysL0APFnnoxuldYF2AHiwy +bZftfJ2T+ejBIp2Nkft5BXnowSITkzNOrhqXhx4sUrbnTe6VnznowSJdjktm +qAKy0YNFpgR1W37Tz0IPFmlZtb56WOJX9GARr2h31/Q1mejBIkf+Z51SJvmM +HmxSGZE9b0NkBnqwSfuFe8MdZn5CDzZRKfeEnvv+ET3YZEFocf1cvzT0YBPF +PLvQ5cNT0YNN0lY+v3PI6z16sMmUkGlOQ+OS0YNNdmdeUnnI36AHm7w7WPXC +Z04ierBJ0abGPebB8ejR9z/dRuR0/UsserBJ8vmtMs+xMeihQZgC2RZJzGP4 +PwE1tpM= + "]]}}, { + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxF13dcFNcWB/DZZReQJKKIiIgQMQgoEDWI5aHn+ig2ShR9EiSiKIhEERWf +DQNPhaDGiEGNYIVgeSYgoiYUZcEGKFgAaSJSlr6wvbcHzOHz7mf+2Z3Ze+/5 +fc/MZ2da2K414QYURbkwKGrooJjU/4dl0uahg0kOm+csazt0HPInMWSbvUc/ +n4MpVi+DHZ2YJN8msX91/lXo3aqPavx89HwWWIV7fbtPwCDpacPjv9CX8WSh +poaB1+dAcoNfSPTfDMJbPfzNPVD+lCR6lc7A3z+A+eUqj4k/MohJ/e8xi03+ +Bvky76MrN4/OVwA+ATNNd3gxiFPImSdSx0fw8kae+yGH0fmLgb/Ea80+EwbJ +Gvp1/e8l0J+SX/r9AIXrlcLDuJj+b95S5JuR8RTi7od7KPIoXP8ZJCQtdPzj +PEWeSh2HVngOt8yXOvkdoHA/ZTD91S8lLcEUWTOyYDlYzlPu27SYwv1VgLul +bUO1LUXaDg1P+BI+74iMc2dSuN9KsOkfq5tUoYfdw9uLqYKwzFb27dN6oPf/ +GpKScrbYrNEDrfEWgpauOhBnoQe6nrfgGtpy72mTDpaPLPAO1nIqTkmv6oCu +7x2MGzj5y4QtOhheLeRMNbQ+vBhg66ADut4a+DFo8W6rfi2MlFNfA7H3d2Ya +3tUCXX8tGLZcudq5Rwu2w9uxeQ8nr6e6FLhrgc7jPXR5z59+TKWBbRHDow4U +PltCvYs1QOdTD8nr7lcxjmpgeDbznHpIWB0YXuitATqvBhD9/dpx9xgNyIan +kzaAYGqbvWOVGuj8GqHOf/m+thQ1LBmZsAnysi4uurZWDXSeTRCy0Dxri6Ua +RraX+AFsTiX2zW5WAZ1vM/zsbrN6zHUVVFUOj2aYERFsz9+iwrw/giq9t5jr +oIKJIxtsgbjYK/G8fiXm3wIXp4bWGOcqYWS6kE/wbozzbI9YJXq0wvMcK4sT +C5RYTys49m0zFWkU6NMKpRWncw+WKrC+VlgXvfWiXZICvdrA55VfDH+lAutt +g2iTnbx2UwX6tUFRRN8rfa0c62+H/mCvxuXpcvRsh1/G3u0rCZVjHu1wUnO0 +Pcpejr4d8Nunorsr+mWYTwc8Mzrhv+meDL07YMw6Qfm9/TLMiws2XyfOX7pE +hv5cKJO5PRnPlmF+XGhPmZkxo1KK/dAJx5peTj2WKsU8O8HfuDJ15gYp9kcn +JLtG7flyuhTz7QLX2KLFkf0S7JcuOFg6I4X9QIJ5d8GvFpS1Jk6C/dMN1VP9 +swN8JJh/N3gZP57FGifBfuqGHL+nl6c2idGjB3ad1tpfzxKjRw/cO1FmmrJL +jB49EDphcrlwkRg9esCpJKezwlCMHr1QHPPTrKk1IvToBblZ6c+CayL06AXb +u62zV+wUoUcfvCpNPeD8DxGkjHj0QYebmnl9jAg9+sB0bOr9/zYI0aMf+hdV +5QfcFqJHP5ztOJh68YAQPfrhTKK17akVQvTgwTIq8JLrFCF68CBbduivkwMC +9OBB0tuXabdKBOgxAJOybeSnzwnQYwCef1dmuWy7AD0G4PzvheLmJQL0GAT9 +nHSP4IkC9BiETy2e1PlGPnoMguOl8PjYk3z04EPnnEL76MV89ODD8wzzq9dE +g+jBh+/u7NzpdGcQPQRwPtp169dbB7EeAfymdHZo/HIQfQQQv/lZ3ZrWAaxP +AGGxV5qrMgfQSwDrNlb1/ydyAOsVwOa16z1z5gygnwAqp/264pKOh/ULYTA1 +7frlNzz0FEJc+qP2CTd4mIcQtp+b7Bcbz0NfISycsvLZslAe5iME/6wFLfO8 +eegthGbqksnYuTzMSwRTlx1+XDeDh/4iqOK9YXd+xcP8RLBs/Y92Bq48vD9F +8M3Eiqf3vXiYpwhi9pkeureDh/0hgsqP3DjtHzzMVwxTbh/fe+KLAewXMXzp +Ylltf2cA8x76HLTooQV3EPtHDErjobnNBZi/GAofWQUdKOBjP4lhotB4SewK +PnpIgNvEhtDGUQ8J+NpHebptH/WQgMH7h6aDilEPCaRHjvf5KXnUY+i+fWMX +qZo06iGBoLmLGpfe4qGHBE7UNraudx/1kIJD9KVs9+f96CGF1SGxQQ2B/egh +ha/Lg3rc2/vQQwrhqR7/8o3pQw8piAJ3nTXT9aKHFDZYBBw/dqoXPWTA7lg1 +Oc2yFz1k4BfgRvxu9KCHDHoulorT5vSghwwcrILg4ONu9JBBOOF7dS7vRg8Z +6P4y82yo6UIPOWxyGUj33diFHnJYaelb59HTiR5yKJ5wKvv33Z3oIYf3M9Z9 +EafiooccxPYzrUuPctFDDpnvLgw947nooYAXFqbT4s92oIcC0nTBefxJHeih +gD+3J895dKUdPRTge2qdc5tdO3ooQO9tcmzDrTb0UMCHrvwox1lt6KGAPzzb +or1zWtFDCZnNe/fkzm5FDyU0/Ttq05utn9BDCYKbxvtqIlrQQwk1lmbSqG0f +0UMJuVeyvj8X0YweSsgpaqz23/oBPVSQ/F5tlb6pCT1UELDiw8V/b2hEDxW0 +MzZ6d65twOelCpy9w293+9ajhwrivp7xLt6zDj2Gzq8d75+74D16DP0vOBD+ +VZxzLXqoYW1gclmXTQ16qOFM9ZJxEtNq9FCDy7Xmb27r36KHGuKsGftNm9+g +hxqOqNtlrn9VoYcG9Me/m1hw+hV6aMBavn1fflgFemjAJWGD7YJ5ZeihgfEF +l3d7sp+jhwYMA7eZdVU/QQ8NdOpc2mddLUEPDWQWFnxc+voRemjhXk37m8wN ++eihBefU+hmp3PvooYWUwC1j11fnoIcWGo6UuY+puYEeWnCf9YNJ84U09NAC +ZeIz4cHHI+ihgwfrnKPydiVyaA8dkEt5Jhdklzm0hw4KuY0it8xbHNpDB+ur +wi8sjszl0B46OFZ/9qyc+ZBDe+ig0ePkkTkZBRzaQw+Oxqqq2n8Wc2gPPdR3 +nczp3FvKoT30kFA6MV9f9pRDe+jhSmvOx+ypLzi0hx5cd/nndcaWc2gPPVQW +yplXql5y8PWD3Dhzur7CoYpD10ORlOMb94Yde8OhfSjyyD//jqvgLdZHkXPn +V1wOsq3m0F4Uib999cTMgBrOSLkRFDH99dpn1+NrObTf0HvAjhsND3Lfc+jn +A0UafnZ5trW9jkN7UqT26JHiP8wbMA+KxFgvqk1c1sihfSnS4SN24R9qwnwo +okm9acrN+cChvYfeKyQLGzZ1NGNeDJJrJqDCLFs4tD+DWJyvt+b6fcL8GMTX +bQpPuLSVQ/cDgySZKtWuH1sxTwZJmHb4z1sH2jh0fzBIa0Hl/mDzdsyXQcq1 +CR3eue0cul8YxHqpd0KkbwfmzSAe91N7S3o6OHT/MAi5HPHcL5GL+TPIo428 +p1/YdXLofmIQ5g6Pa/riTvRgktpvv5hiF9KFHkyiUf3AilV2oQeTOKyNnSO5 +0I0eTLLK57P/ZLj1oAeTRCxObzpU3YP9xyT+bpUu8TG96MEkrkG+e7LH9qEH +k4QuT7rFyu5Dj6Hz6m21x1b1oweTfLXc3mhmXz96MAl3snatLJmHHkxi4kM1 +dTsMoAeTgElTvvbFAHoYkNeO6VbzIwbRw4DkZSS4prL56GFAZjFfOY2/wUcP +A7Ixo3R6kJ0APQzI8UmO3Pl7BOhhQLJuTj/o8ESAHgZkt+2m5BlmQvQwIGHl +5oVuYUL0MCAzD/LzV+cJ0cOAPA6n5h5hitDDgHil3qz9a40IPQyIhThujS5T +hB4skmyzPDRQLEIPFum+y8196ClGDxYJm+uu/+qcGD1YZOVNC1YGV4weLJL1 +q89hp3kS9GCR9Mzv7YoTJejBIpvLivI31knQg0UuNh/SmzhI0YNFllRsKniy +X4oeLOJjVX0nsVyKHixCmT1PC5wsQw8WKXJ86OccJUMPFrmgunDGtEiGHmzC +uFbppP1Mjh5swgu36pGEyNGDTfbLL/0my5ajB5ukVRcYMvVy9GCTCQ627Enf +KtCDTSyNc7fMy1CgB5sQSbwkRKRADzZh3y0/edpTiR5skhnVpnpxTokebLJj +sbvVmC4legyt3wacwPkq9GCTiKLDpTeTVehhSGbbb1UymlToYUjK1ZEkfJYa +PQyJ6Y6emLdxavQwJD5ahwjP12r0GLq+zk/z2FaDHoZEsyR4HNmtQQ9DYr16 +WkLFEw16GBLfHq+ZweZa9DAkRsWug8JwLXoYkl0FJn+m/K1FD0NyIbrUy32M +Dj0MyYlXorT2YB16GJIGoeD0+T916GFE/BYVGQTodOhhRCLDlC1jv9WjhxH5 +vE1m8D5Djx5G5Nnmq+szxHr0MCKJeYWfCuyoEtrDiLxmVI67uYoqoT2MSGpU +8NzzsVQJ7WFEMg6zFvx0hSqhPYxIsFXOxLgXVAntYUT4N37k7OVTJbSHEVnu +9Mkp2pJRQnsMrXfpwIofljJKaA9jYuY6d8IPUYyS/wFHz0bv + "]]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxF13lcE9cWB/DJzqKgFDfqUqkCivgEEdGi51qUqgVRoYqASpFN7BNc2qqg +0iqKW9WCtO7FCloX5KEoFDUsIlgBWQURkYSwLwkhC9kfMOd93v3MP0lm7r3n +9z0zSaYHR60PZVEU5cCgqKGDYlL/H4XzRg0do0mMZfpXggNH4dr0fVdTq0fh +6yT4R+1b23B5FMmeGt+9LvsaTNuRzHgV8r/Pb8JPwhme2+eOIpcuDo+/oORS +flDWoCmenw5pjqu33Co0JT3rht/5DyzwV75adNYUr38E2ZtXHA0PMCUmdX9G +LzF5AkyX5Xx7O1OcLwdStBMVP8lNyKzAswVyu6ewT3ykNbTQBOd/DmPFK+Kr +z5uQm0NX1/2ZB8nHPZjFQSa4Xj4c/T0ox22eCZk/MgrhTTHfyZEywfVfgGDV +0ykpFcakUG43tEIRGK+Z6XUixRj3Uwyb7/Y8bNttTNaPLFgC933sgh8vN8b9 +vYK2u1t/lo83JoIDwxP+A7kweWNKpxHutxT04Y9dnzw1IruGtxddBuyojYnO +54xw/+Vw/rR96/gQI0JrVMCDwudPA1yNsJ4KiFkW94QabURWjixQCVcDI+JY +Qh7WVwk2hc/Kv33CI8OrBZ6tgokFipBJZ3hYbzUsFT00t9vGIyPl1FVD3I7K +m6cW8bD+GtgUeob55RgemTa8nam1UOadZ7aqnYt51MJfu20eX3vOJeFhw+Mt +dLhmd5NkLuZTB9PU5rcddnLJ8GyW6XXgWvC+I9iDi3nVg1XBpoymqVyiGJ5O +Xg/e9k3s60oO5vcODGu+laRUcMjSkQkb4Eq3ZVzrXxzMswHUNw2F4Uc4ZGR7 +8e+Beni13GYzB/NthG0f4x99tpBDykqHRyOcUo497TOWg3l/gJ1C438/62aT +cSMbbIIJiWujA1+yMf8mcJ7064O5KWwyMl3gR0ieIF3uFMtGj2YwEeesDt3I +xnqa4XMJ532RExt9miGzK9p8vRkb62uGWXufUUZdLPQSwCWIfdlaxMJ6BbBW +mP5DZwoL/QRg2BI2c+whFtYvhIg3gSJ/fxZ6CmFD3ImCFy4szEMIj8vTX3t+ +wkLfFhCNFvD6xUzMpwW6szgxD0qZ6N0C3marZxz7i4l5ieBs7Dnd7mNM9BfB +kl+q1Xu2MTE/EUx5cdD4OGFiP7RCsFmW+Z0pTMyzFZZU/t7doGZgf7SCq/2u +3RPqGZhvG5wYXx61OYuB/dIGBbVJN+/8ysC82+CyRFWkjWJg/7TDs4rQ2HVe +DMy/HXSVy4LTZjOwn9rhmM9dporHQI8OMHBM6j1aKfTogC98j60+U0ChRwds +/iYw/dV1Cj06YJML70tVLIUenZC1i8yZ5E+hRye831+232YhhR6dcPz2uE+n +WlLo0QV/X5QWqAQGODfi0QVeFoWDhy4bgPbogj1/6Ltf+BqA9ugGt/WBW1+M +NgDt0Q3BBQ2537/UA+3RDWsq+LzKQ3qgPXrAj8Q1lrnogfbogcjrwQHb+nRA +e/TA5ZZbnyWk6oD26IUmonJ2CtQB7dELJb2l2g0WOqA9eqFzY/DM7mIt0B59 +UPFj8y/CWC3QHn3wehZn/jxHLdAefdDynwzeS5EGaA8x3P4isjHpNw3QHmLw +3vPM8fQqDdAeYggYzTC+pFYD7SGBu3eGhxrrkcCDKYVBtzepgfaRAOOmh3UM +T431SWD+bFt7o0cqoL0kcDBpaozjVhXWK4HVAV/PrzVSAe0nAYcxfsWlGYNY +fz9Ea6yk3RsGgfbsh9OvXTYY1ErMox/cnFNv/XNFCbRvP4Tfc7Pjuikxn35w +WJA2PaBeAbR3PzQwjSq27FJgXlIQt2a+PslVAO0vhddUrZvjb3LMTwquYbxz +263lQN+fUjialFPTlybDPKWgrTTlNFvLsD+ksDD8Yopr4gDmOwAtZY9KY6RS +7JcBaMjf+ukSZynmPQAfT6yx3WDbj/0zAHqjHsi2lGD+A1D01MpvX44Y+2kA +pvQbLd27SoweMuhs4MDWd33oIYPvZ0a6O2/vQw8ZmNdmmfcN9qKHDO5HjPU4 +ntCLHjLY88Y6Qj2hFz1kEOm0+N2yWz3oIYOzNe+aN7r0oIcc3HZevu9S1I0e +clgfuNev3qcbPeSwqMSvw0XYhR5yCEt02+AZ3YUecpjoG3XeQt+JHnKIGu99 +9MipTvRQgFnL15MuTuxEDwWs9XYmXqkd6KEA3e/5AxcdO9BDAfOs/GD/s3b0 +UEAUES9vXdmOHgqwfGLhXl/dhh5KiHDoveS5pQ09lOA90fOtW0creiih/JNT +9//c1YoeSui0+WZ0rFqEHkrQz5w9Of9nEXoo4W5lMuw0EaHHIFSON59++HwL +egzCdb1/pnhCC3oMwpPtCY5PrwrRYxA8T30zR2AtRI9B4HmYHAm4JUCPQRC0 +ZUfa2QvQYxAy3QU7V6Q3o4cKUhv37M6Y14weKnj/Q2TQm5CP6DF0X6UZfV8d +1oQeKqifaCGPDP+AHioouHpzc1JYI3qo4FHuu6o1Ie/RQw03ajVWl4Ia0GPo +Pl/1/vcfAt6hhxq6GFtWtPrW4/NSDV4rQm+3e9ahhxoO/8um8rD7W/RQg5Pv +2DUZrrXoMfSc2Rc6I3ZODXpo4DufhOK2qdXooYE/qpaOkZlXoYcGFl9vnH/b +UIEeGvhlMuNH88Y36KGBRI1QMfdxGXpogR2/aVzOmdfooYVNyu3fZwe/Qg8t +fBEXMM11QTF6aMEq58oud04Remhhg0+4RVtVAXpogWlwENpfy0MPLXBzcz4s +K3+KHjoQVQvf3AjIRg8dVCTW2SSKHqKHDop8tpltrEpHDx0MHix2Ma5ORQ8d +/GG/w6Qx+SJ66GCmqccnjz4cRA895PnMicyMiufTHnpYdDnTJFlxhU976CFI +9E7qfOMWn/bQg1FZaPKSiAw+7aGHz+rOn1cys/i0hx4y3E4edEzJ4dMeBhhn +pC6r+fI5n/YwwL22k+mte/L5tIcB3PPHZRuKC/m0hwF8m9M/3J/ykk97GICK +WpPZureET3sY4M+/lcyrZf/w8e8HSTh7pu6VbRmfrocih45u2RN85A2f9qFI +xprsO3MlFVgfRaIvrLriN62KT3tRZN/taydme1fzR8oNG/oeP3/d9I/DNXza +jyJd36XWP8qo5dPPB4qUn3Z4ESJ8y6c9KVLx88Hndy3rMQ+KRExeXBP/1Ts+ +7UuRZo8BB/GBBsyHIprENHNR+ns+7U2RybJF9UEtjZgXgzywkFDBE5v4tD+D +jLpQN1nk9RHzY5CvnD/t6V/WzKf7gUEOmas0cz80Y55Dr6fH3Lu1T8Cn+4NB +mnJKf/S3FGK+Q7+7dHEtKzKEfLpfGMRs2Yq4CM8WzJtBbB8mduZ1tPDp/mGQ +xVfCirziRZg/g2Rs6Skcbd3Kp/uJQdQ73K4bnreiB5MUrx39qXVgG3owiVy9 +g71X1YYeTDLDd6+jLLkdPZjEzcP0pxTnDvRgknVLLjUcqOrA/mOS1c6lDoej +O9GDSWb7ee6+b9aFHkziu/LYLfb9LvRgEjtNeM2Rr7vRg0msV87kze7qRg8m ++TBJ56tI6EEPJmF4UA3ttr3owSSLTRqydS970YNFSuwuWS0M60MPFklPiZub +yBGjB4vMYL6eNTZVjB4sEpiS/7mftQQ9WCRugp1o4W4JerBIStrn+20LJOjB +ItHTghJsLPrRg0X8Syz/dg7uRw8Wsdkvzl6X2Y8eLPI0lHI6yJSiB4ssT0yr +ebxeih4sMmogdr3+hhQ92CR26sqtPgNS9GAT4QNRRpb7AHqwSZCTi2FG0gB6 +sAmkjWeniAbQg02u/eoRM2uBDD3YJOnGZuvn8TL0GLq+ODd7y1sZerDJ6cYD +BhNbOXqwieuroJyCH+XowSZLraruxJfI0YNNdGOLLvpMUqAHmzy2y/KaE6lA +j6H11MlnzXMV6MEh1PXSWTpTJXpwSEeoVYcsUIkeHLJTefk3xX0lenDIyaoc +LtOgRA8OGWM7jTNh7SB6cIilUca2BSmD6MEhbrLDskDpIHpwCPtByckz7ir0 +4JCkSIH6ZZIKPTjkuyUuVsZtKvTgkN0C4PssVKMHh4TkxuSnJajRg0tsZ4ao +GA1q9OCSEk0ECbXXoAeXjPquI7oiVoMeXOKhsw1zL9egx9D5b720z6Zp0YNL +VEv9x5BdWvTgkjHrpse9KtCiB5d4diyf7W+pQw8uYT+f29cfqkMPLgnJMbl3 +7okOPbjkws785S7GevTgkoTX0otCfz16cMnbfsmZC/f06MEjKxfnsrz1evTg +kW3BqiaztQb04BGuQMGqTTGgB4/kfnttY8qAAT145Ejm3x9zrKk82oNHyhil +Y9K+pvJoDx5JjPR3urCXyqM9eORaDNv1+FUqj/bgkU1W6eNiX1J5tAePdKUe +4u8RU3m0B494zPo4a+dERh7tMbTe5X2rdixj5NEeRsRirtMnOyIZef8FYFEY +wA== + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxF2AlwVFUWBuDXr7dsqGyDIiKKCoiIIKOyyDmDBhApEHBwCaAVlagoshcD +KMIEkTiAwyKgYTWoCArIFgTTQAJBwhYCJIQYsm9k6fSS7nTS3fPuvT81r1KV +yvbePec795z78lD8J+PfM2ua1sekacaHpmv/v9KfijE+2vDCDr+OKF6QSKM+ +HPr55sYYfL2Ocr6f8XxUbgyndl12e1zqFpry147AvON3fp5CtX+7dqR0ewx/ +u0lcu2juK/a5ryy/8/u/kpY0sP8fH8Vw7Tjxnf30Zfq0hl7j7/z9QeoY3Lzn +m2djOCpXPOgIbX3m8gfmB+7c7yj1mqH3mKHHcK9Jq095ex6n/bsGlBVURuP+ +aTS4dOr2ly5Ec4pY5vcn6HSXTVMO/xaN552kMROz7u++MZqfllc65a8O5q3+ +NBrPz6D4P/t+0xofzenensYTTlO9Hj/hg5HRWE8mzR+y7p7rfaJ5vHzgWdLn +nbkwrH001vcnrdzrT9rrj+LiBeKG56h99eMjuxRGYb3nadvDk60r0qN4plje +jAvUR3z/pyis/yIdWH9ycfyqKFYal2nIJfeQS7OjEM9lOhPxWGDwG1E8Uj4g +m8YPe/3IT0OjEF823VyYNKfjI1EsnjZp9RV659DxfksjoxBvDjXUiyuSZTi5 +ObSg50N74q5GIv6rJMI9ezSSHxTL6XqNVn237LG/b41EPq5RB8GbGMkJU8V1 +nXbcVbPtrg8jkZ9c6jOyy5SFYyNZ3K3Dr7l0cMmY+6sGRCJfeTTk2Od5r3aO +5CZxO28eZXl+W38yHIH83aAJT5aPf7I8gofKG+ZTYUKne747F4F85lOCoWvf +F8FyectukivfCHh9BPJbQPNlHBF84by4Csg8psgy5u0I5PsvWr283anfYyO4 +o1xgIXU6+eLiHr0jkP9C2haYZwhHsLzdpFvUe8CuZq3JDo8iSv345uGPb9oR +TxHxj23m5J+ww6eIzhRRvxE/2BFfEU3sPKv+wFd2eBVT4YSU3d1m2hFvMb2/ +8vr7Kyfa4VdMTglsR/wltFAzKvohOzxLyDro4205NjvyUUJrZm+dzLU2+JbS +vb9kd/4l24b8lNLOCnPefUds8C6lvt2eWf9Fsg35KqPUN94f715ig38ZvbD2 +27vfTrAhf2WUJT6NtqEeymmcLbxiYH8b8llOZSLcTjbURzl98K93LO2DVuS3 +ggTv4hIr6qWCPq/N/Kw204p8V1CUKOdfrKifSlrz1hPNp9dYkf9K6mxs3/7z +rainSvrxytdGxFZ4VFE/0a5esMKjio7Feuvm97TCo4piF/fYXd7GCo8quiQD +tsCjmuJcXz3qyLPAo5qKe6eV9E6zwKOapr3n3Lrxews8aqhpi9jAFv5aetSQ +qOZZ0y3wqKHodstzCydY4HGb1r58dN3LAy3wuE0y7K4WeNymn9IeuPtRiwUe +tdTfP/b8f6vN8KglY/euCF00w6OWYqcdHD7toBkedXQpxQDeZIZHHU0qvNeo +aDM86qis08uf7X/XDI96mj7u08FdR5nhUU/NRrdK6muGRz0tzSg+5OtghkcD +tQm1n/1uQIdHA216dvhT2bd0eDTQgzPn1z1/WoeHk/b8LC4d8TipX1lBQqev +dfg46Q8j3MS5OuJz0sjX/lHifFOHl5OyBS/riNdJced2Tjr3qA4/J4lyfjZa +R/yN9In8MxM8G6lFbN/rJuSjkRL3GREfM8G3kdoY7apmmwn5aaSN3XOyJn5h +gncjdRPteZoJ+XLRvm+MgMeZ4O8iMY42P2NC/lx0KjL5RGQXE/ani0a9cPHT +eSYT8umiq4uMDVyhoT5cNOmwENaQXzdVNbx76Ph+DfXiptm9NszqtUFDvt0U +EgNpkYb6cdPy5JZaPV5D/t1kDKOfPxmhoZ7clGzs3oInNHh4qPtLax55qZ0G +Dw/FifAawqQ8PDTb4Iv9PUzKw0OJ8jlhUh4eSp4iFhwm5eGhPaK9dA6T8vBQ +xotig4VIeXjpihgP+0KkPLxU+bgYCCFSHl6S4314iJSHl+5uK64QKQ8vPZw4 +96uam0FSHl4a7LthzfghSMqjiUaL88jMICmPJooT548hQVIeTTRLnDfsQVIe +TZQkzhdXWkl5NNEWCdhKyqOJ9onzQ0IrKQ8fZYrzQv9WUh4+uibOB8EWUh4+ +dR4420LKw0eamP9rW0h5+KiDmPdTWkh5+EhG1bOFlIefnhfz3B0g5eGnsWJ+ +pwXg4aepYl6vCMDDT4vEfH41AA8/rRTz+MEAPPxq/tY0w8NPR8W8PdgMj2Y6 +IxtwMzyaKV/M01HN8GimSjE/OzbDo1nNyyI/PJqps5iPu/3waFbzcJ4fHgEa +KuYf++ERoNfEvIv2wyOg5tt1H6l+GSCxHaZu98EjQHK7f+SDhxGn3OA+eLSo ++WTywaOFZNjnm+DRQoVi/mxogkeLmjfxTfBoIbuYL32a4NFCXQWv3wuPVjU/ +0r3waKXhopxXeuHRSm+K+fC6Fx6tNF3Mg+5eeLTSUtH/6z3waKV1ot8f9cCj +lX4U/T3RA48g/S76+RgPPIKUJQP2wCNIpaJfl7nhESRxmkza64ZHkKJEP17g +hkeQuon+G+uGR4hENXe6xw2PEI0Q/TXfBY8QTRb9dKcLHnf2pQseIfq36JeD +XfAI0SbRH20ueIRJ7N6nshvhEaYTov8lN8IjTDkSuBEeYaoQ/a1fIzzC1CIP +2E54hKmt6F+ZTnho/IjoV2uciEfjAcfFxHXCR+NRfePua+3hRHwap8r+0wAv +jeX2W9hAMtypGsfI/tIAP42HyH5Sj/6g8WTZP+rhqbHqF3XIh8by/SKhDr4a +35D9oBb50Tg0V+z/Wnhr3BNzXOXLxPJ8nnYb/iaeI/fzbeTPxCly/9agHkys +9msN8mlieb7tWAMnE3eQ+7Ea+TXxMLn/qlEvJp4q91sV8m3MJbm/qlA/Jt4v +91MV8m9ieX7bUIl6MrEu90slPHQeIPdHBTx0niD3QwU8dF4k678cHjrvkPVe +Dg+dL8r6Lkf96eyR9VwGD527yPotg4fOo2W9lsJDZznfZ5TCQ+ctsh5L4aGz +Q9ZfCTx0rpX1VgIPnWNkfRXDw4x6KoaHmd/a4Vh7zVUEDzMv+1JcRfAws9wO +XYvgYeafZT3cgoeZg9K/EB5mHiO9/4KHmbdI3wJ4mLlKehbAw8yqf96Eh5lX +Sq98eJhZ9bcb8LCwfD1Pz4OHhafL/OfCw8Kqn+TCw8JtZX6vw8PCs+S6r8HD +wqkyf1fhYUG+cuBh4SkyP1fgYUE+rsDDwuFB4oU7Gx4WHivG79zL8LDwczK+ +S/AwztUyngvwsPIyuf4seFg5Qq73HDysnCbXdxYeVo6V6zkDD+M9QL7wn4aH +lb/MsRlvSOnwsPLojx5vM9B3Eh5WzraIAXcCHlYOyfX/AQ8rt5O/fxQeVt64 +eeaByymH4WF8fVFMpAPwMN6TwuLaCw8bc/yq0X3jdsHDxqkZ4kCxAx42/qf6 +BwQ8bBzRo+Ks57dl8LBxyqAl7Z9b8o5Dedi4JOMH441ntUN52PiNZHmAcSgP +G4+q/Y9xItjpUB42HmZMl4lZux3Kw8bbjbu1f26/Q3nYuLexuxYmHXQoDxsP +kg3uiEN52PnWYhHAMYfyMN5rxXFiSZpDedj5mKznEw7lYee28vxzyqE87DxH +9tMMh/Kwc6bsz6cdysPOTxrd79aqTIfysPMSub4/HcrDzg3q/yYO5WFnlus9 +71Aedj4kXv+fvuhQHsZ7uVz/JYfyiOCBcn9cdvwPii3PJw== + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxF1nk8VOsfB/DZR9ZZWkgbpbTQlSxp+T5KpVJX3VK5WrQpLZZfUlpIuf1C +pVLaN223xU1IRYqkdO2FBsk+djPMwjDjh/l6/Z7X/HPmnPM8z/fz/p4zY7TF +a9V2OoVCMaNSKH0fCo3y/5G4t/TV3lI+OTw0ZnFlwEk4RqTRNfmDx5Hwpi51 +DOsLn7weE9K08vUtmD76YWbhu8Hz98FXWqpwieOTa1f7x99Qr9uaHv548PoY +mJ5MVx26ySfNK/u/iQWbbb8tMroweH88bC5q1Q75i080i6O952omwvqUhkuP +AgbnewM7d09Thu7jk8lu59KkpsmQ7lpgZ7FlcP4U2GLsOPHGGj6533d3cfQH +mGJvdijbcXC9VMgpqs7PmM0nlgPjIxTaCBJOmw+unw6OdyMujjDik49S074V +PsGkZv90H/7gfj7DEln42atMPlk1sOAXmHZcYBIh5+H+MiHM/+tzlwYeqQzo +n/Ar/Fa2w661hIf7zQIBzzN/bRaP+PRvzzsbghIcdke+4+H+cyA5lSW5H8Mj +ao08CAqzcgq9zcN68sD06rklCyN4xHFggXy4tPhDYlEQD+vLh/oyxnrw4ZH+ +1dzOFYBdYHpdoDsP6/0GYetH8a6u5JGBcoq/wQy++8kwex7W/x2e3L78a60F +j4zt386YQshb/itFNY6HeRQCX1j1KojDIx47+kcRvI4ydynv5WI+xXB48VkT +/TYu6Z9taEwxeHduemxezsW8fkDry0o342wukfVPJ/0BgoMByR1JXMxPALkx +qtnRT7hk3sCEJaCxSbTM4ioX8ywB69ikdbdOccnA9kJKIb2h7WujHxfzLYO0 +OX7sEdu4JDurf5TBv6/fe41fxcW8f4JZaK87h3DJsIENlkNg7opZ5WZczL8c +LKx/Lj9jyCUD07n9Ask5A+noIVz0qADWOcHxCBkH66mAO98CHWqrOehTAYG+ +48JG5XOwvgq4p3//rnUKB70qIaatId/yKQfrrYTzW+q3Dr3CQb9KmFyZdfPH +SQ7WXwXS9yPTg3w46FkFkSsyDXQ2cjCPKqgH94qjSznoWw03Dxus+2bNwXyq +4YJPx3ud8Rz0robhrOI1ZnoczKsGhOvcnm+T6aF/DewNoyhn5ehhfjVw8sVI +bukDPeyHWti3q2Cj41E9zLMWftiYuQav1sP+qIW37Q4HTk/Vw3zr4E74MZON +ND3slzrIXJEqoAh0Me868I2NYfj+o4v9I4QEacmIlyG6mL8QXB6xQlL/1MV+ +EsLYqetT7ljookc9FATdsHZm66JHPZxwC3DPK9NBj3qISnkbZ/RSBz3qYeH0 +k9EOp3TQowGiPt58PMtNBz0aYB8vbg7VQgc9GiB+7rXS60wd9GgEQ9sbdM0S +bRIx4NEISz3fWznFaKNHIzwtHyrbEqyNHk2wZYRG1goXbfRoAq242PmcKdro +0QRj6GYNj5Ra6NEMXxJEq4bna6FHM+jETdF3u6+FHs1g6DS26JC/Fnq0ACkO +m+69VAs9WuBEgXY2jNZCjxY4c+fUhoY2TfRoBS9x1OW9aZro0QpfKilW2ZGa +6NEK8UVGSg0PTfRog2lDvZKMZmmiRxtsY7Q66Gtpokcb2I1O8G8pG4IeIni2 +0Gv2vZghWI8IdpyvOm4TNAR9ROA2KmBxzMohWJ8IgpMLLrLHD0EvEchmLg1w +kGhgvSIwOBIxcscnDfQTgetlu7t7L2tg/WKYscfF0c1DAz3FENGoWmtpq4F5 +iOHL7baJEg0N9BXD8MbhhncEbMxHDL5PTZ7YPmGjtxiOrTF0fR/Axrza4aAi +K9VqGRv92+F60/bTNw3ZmF87OC6q8OxsYuHz2Q5pj/4zwzGZhXm2A8ugM+Vs +OAv7ox02jJpNy3FjYb4d4HPLgaphxsJ+6YA5u09/n6dkYt4dEHpf4/H+bCb2 +TweE31qZ9PQmE/PvgPk+Xu51e5nYTx0wMTCRMmkeEz0ksGDGQZ63LhM9JMCy +CjFOL2eghwTsQ27lmPzDQA8JHKn+51NUIAM9JGCwri5jlDMDPSQQm3P1TuI4 +BnpI4LHJkOm7xXT0kEJjkNDVLo2OHlIot3g7wvQiHT2k0D6evcVmGx09pLBv +x+q5u63o6CEFc3NFbAaLjh5S0PDL/Or0g4YeMnhnHXqB8oSGHjK4a7qGW3uY +hh4yEDzNXqJcTkMPGdhftLd2GkdDj75j04RP39up6CGD7siqH1c/UdFDDrnH +Z8KtK1T0kIP7zPS4mt1U9JDDm/KtJV5ARQ852CrfzZnPp6KHHF4+uLB4o5CC +HnKo8Dd0zEiioEcnbD56a9eRCAp6dEJwrE1c8HYKenQCbUIFs9SOgh6dMD/p +9chTHAp6dEKh1mw6N7sX1B6dYJCkSVIP9YLaoxPWxGzebDSpF9QeXeC33em4 +ZaEK1B5dkOsyZGfXCRWoPbqg+Kxt8H5LFag9ukBs8rLuQbUS1B5dcNlS6HI2 +Uglqjy5Ik3wl5ouUoPZQQLONbWpIZw+oPRTAz8l4GPm0B9QefedT6X6um3pA +/b5UwDpvlUcRvwfUHgpYtGzUQXZmN6g9FKDSMNnYfKwb1B7dULLoUNQJq25Q +e3TD2ck7PP9tVoDaoxt07U43pt5XgNqjGwTRtsptGxSg9uiGPT01G14OV4Da +oxvefve89yivC9QePeAfvAzmh3WB2qMHuhI+hQUu6gK1Rw9URn/+5EbrArVH +DyQ8SBhWnNIJao++un+nXmg63IkePeApOTM/alYnevRAVXjF+GK5HD2UUPTG +YMrjV3L0UILU580C9gE5eijBJnCam9hKjh5KiAufsHGrTIYeSljanWTlmihD +DyW80PcoKDgoQw8VmD+MN/1qJ0MPFbwT/LKcq5SihwoWWlrLTT9I0UMFybf+ +CAw9IUUPFYz0tqne2Pfcqj1UIMiauTBaS4oeveA+PPXb6jwJevSC4S/jr96X +JOjRCyW1dB+JqwQ9eiHlaP2Yn+Mk6NELB2LP2poKO9CjFw6vtrH49rwDPSjk +s0FpaOn+DqyHQriPlhfNm9OBPhSy86hznILegfVRyA/vqDztrHb0ohD/pR+a +fCPbYaDcHRSyVg/yp2xoR7++652I24yJ7aB+P1BI87PgA6faxOhJIR1yU33T +N2LMg0JqI0MW806I0ZdC7AIq9B2WizEfCsn2to1JGiFGbwqh+1Bs/KtEmBeV +rM8TtO1/LkJ/Krlcucw47qAI86OSoOuHJvzmIMJ+oJKcjMJ1jXoizJNKYlc+ ++/NDYhv2B5VcM3aaPc65DfOlkutLY/8U17div1CJs491+W/BrZg3lbyX5naV +GrZi/1AJdaevoi2hBfOnEvszAcTTuQX7iUqEi0cQx6Zm9KCR6NiEoFN/NaMH +jYx56HXDxLgZPWjkRecRGJfShB40Mvroo0l+rk3oQSObtdLGG8sbsf9oxP+q +Md8kshE9aOTQ8bG1hy0a0YNGNGkRVybkNqAHjRSwnWeP3tuAHjTSbf+5YatW +A3rQSGjIf3Jkf9ejB43oHztg9N2xHj1o5NnDiaYKoRA96ER8InqmxykhevT9 +zgzb+8BgkhA96ITlr6rR+1yHHnSy5MruXY4edehBJ6O5tPhUdh160ElCS7Nz +wONa9KCTyT6lRd5LatGDTkrin9RFN9agB5046fOm8sJr0INO8j1XrXtrVoMe +dDItVTj1em41etCJX8XcPXE+1ejBIH7mHvXUodXowSDUoUX+Ia+q0INBVqbo +K+asr0IPBqk1i3KZ1FOJHn2/64F/HFlwuxI9GOTmpmfuEfMr0YNBFBeMGDp1 +FejBIPJTI3e+Pl2BHgwSXxJz5bxZBXowiN6xyhXTo3+hB4NMPOK77mJTOXow +yHbf5tPLZ5ajB4OctpdMcTv6Ez2YZN+Da2ffZZShB5Poj6bxvTll6MEk4ga2 +ka9rKXowiZwmmpp2vwQ9mOR3IT92Y5sAPZjk5fRIm0V2AvRgkln52s7+IT/Q +g0k+CJdFivKK0YNJZAytRy9GFaMHkySVPrF8tbMIPZgkdI64pTe+ED2YZKJT +5vlwaiF6sEhqCbPadcV39Oj7n5dr8nzX9W/owSKXL4z8mFhfgB4s8tCN07vA +ugA9WGTaLtv5Oifz0YNFOhsj9/MK8tCDRSYmZ5xcNS4PPVikbM+b3Cs/c9CD +Rbocl8xQBWSjB4tMCeq2/KafhR4s0rJqffWwxK/owSJe0e6u6Wsy0YNFjvzX +OqVM8hk92KQyInvehsgM9GCT9gv3hjvM/IQebKJS7gk99/0jerDJgtDi+rl+ +aejBJop5dqHLh6eiB5ukrXx+55DXe/Rgkykh05yGxiWjB5vszryk8pC/QQ82 +eXew6oXPnET0YJOiTY17zIPj0aPvf7qNyOn6l1j0YJPk81tlnmNj0EODMAWy +LZKYx/A/LlW2lQ== + "]]}}, { + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, { + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.08305647840531562], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGYC4pkg8FPCQWpenObpCyoOMP4Oh6ZHxyNUHNzX +HF3OsEPeIQ0MMPndNp670poU4PwPi9YrnNVQxMn3uzgx5t9iFbj5NZ82BGTP +UnGYAbJ3J4I/Z5Hyzj/P0fjqqnA+2JxkBD/glnRN4iRVuPkpsXfcmH+oOqz4 +9rLizAQlh0cR4tsvPlB1OAMCexQdNunlLWa8A+WfkXFICAlSX3BS1WGtkA5f ++jpFBwOtlcIXXDQd1oD4ecoO/0FAXhvinx/KDicOO63NlNOB87eD/FOhC+dP +mcBfZdatD7cfHK6ZBg6poGBwU4DzWxXYVc98kYXzeyO6/RkNZBwcgcbNsDZw +qLn/45ZxtpTD0V07etkm6DvI71qwL/WcpMMGkPtldB2mg/TdlILzH7jGO84K +lHaQAMXnB12HdJB9z6QdtoDk/+g5mBiDgKzDcZB5BfoOMaoRMufmyMP51SD7 +ohXhfLC7IpUcdBTlv+SU6cH5LJxd8snvdOB88R6vVyxTtB34YwPuG00H6geF +j52Ww5u23G4jaXkHUZC8iIYDenoDAMDOG9o= + "]]}, {{ + Thickness[0.08305647840531562]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {18.06422914072229, 26.03675716064757}, + ImageSize -> {12.042819427148194`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {13., 18.}, PlotRange -> {{0., 12.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.02853881278538813], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {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}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4jQQmGbqYGqzN2haoq5DhPj2iwz3EPxPGwKy +Z7GbOfhenBjzL1nPQWZenOZpBTOHB2CF+g4SU69wZmwyc3iepf1t+lx9hy3m +Pw6laJnD+QVrum9nHEDwVZ80zztrZeEQHxKkvmClHpyfCnJHmy6c/6Z4q+hv +bR2o+eYOCSD1nNoOJUDh03wIfoyC48fkP2Zw/qG25eGnHpk5rAcZxKvtYKC1 +UvjCETOHgFvSNYlC2hDzFpk5NLAc7TcU13YA+7/NzEEcJK6k5XBD6JPj+Wlm +DukgcTYth5OHndZmvjNz8DnBbjs7VAviPylzhxcg92VrOfD6r5+SGoHgJ8fe +cWOWsIDzr4PMa7OAiFdowvlGxkBwWR3On9LeGnX5j6oDl5tqKdMvcweP/bWy +FsdVHJbc38c3RxnB13jLu89gpxmcDw6vKDOHMyDAowpxp6iZwwaQRK8qPD5N +QPZ9VnVgAIEDpg4vQPERq+bgB4rXyaYOjaDwCFd3+LrzVtffUFOHht9WBec0 +1KHhY+rwNHHhNRN+NYc6kPgMqHyGKiS8lplCwrVJBZ4+noDU66vAwxccblwq +Dhv18hYz3kHwDwC9kT7FHM4Hm59h4TATBG6qQMLthQXcfrB5ZpYQ/55Rg6Sr +WEuI+6erw/nSIHcUaMD5zJxd8sl+mg79wSUq0/UtHY7v2tHLJqDlEA1KP3cs +HH68fX3AslkLkn4WWTjoK8p/ybmmBdGfa+Fw/mrYG/3fWvD40QelKxVoetsE +1e+sA3HvDwto+tKF8+csUt75R10PzgerP6zvYFsZscLUF+rfTAMo3xzOB8fX +BjM4PwWk3wOa32wNIOnhpik8f6HnZwDIbKDV + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, {{ + Thickness[0.02853881278538813]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.03675716064757}, + ImageSize -> {35.04043835616439, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.02853881278538813], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + 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:eJxTTMoPSmVmYGBgBGJlIGYC4gjx7RcZzpk61P62KjiXoedgoLVS+MITBL9k +q+jv03zmDiI9Xq9YSvQdQJSJoLnDdoemR8cr9B1MjIFAGMH3OcFuO1sUwV9y +fx/fHGUEPyX2jhuzhrnDk8SF10z8kfgghzzQg/NNbfYGTVNUg/P/fit9MMdQ +Fe6eU4ed1mb+U3FY9sJD7/9EMweZeXGapz+oQGgBM4dfb18fsHyM4O8A2R+h +4nCgVtYivcTcIQ0MMPkvsrS/Te9F8EHaZqxG8MH23kPwz4CAjoWDGci9iSoO +daBw87BwmNLeGnU5RsVhJhgg+Mkg//ywgLsHxoe59z8I1FvA/dMNCm9GC7h/ +udxUS5leIcIDxoeFF4wPtjbTAEKfNHe4LV2TaFRqAIkPY3OH60KfHM+rGTj0 +BZeoTO83c/gBsv+wPsT/e00dnoLiR1/fAT19AAAKfvOh + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, {{ + Thickness[0.02853881278538813]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.23854545454546}, + ImageSize -> {35.04043835616439, 17.49236363636364}, + BaselinePosition -> Scaled[0.3029987538415624], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.49}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.07062146892655367], + StyleBox[{ + + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQnZ4GBM8+2v98+/qApbKKwzavDRZzfv6A88+AgA+D +A4z/svZx9vk1DA4ea44uZ/ihDOfvza95OzNVCc63L3GsPT2HE43P7HCge1+T +STKDQ39Etz/jByao+b/s/4PAfiYH763+x5PbPtpf570tllqG4JsYg8B/e4h6 +JocW8VrWzGOY/D6QuRtY4PzC5SUb/vGz4+RD9As4oJov4ACz/waINuNxgLkP +Ej4ccPdD7OOA+w+VzwnnP3CNd5x1URTi3x5uhy/7Pm5N/ybiMGMmCPA5MIDA +AhGIukJBOL9dgV31zBUhVHlBEQeNTyovZ70UcWgDy4s4iFROKjmbIgqhXaQc +qu//uGX8WsLhLMg+HRmHHcFWEf/VpRxqQOLZcg73webIw/nhnGLtxvyKcD7Y +nC3KDttB+tilHOYsUt7557gqxB0NInD+m7bcbqPdQnC+MEgfi6DDjAn8VWbd +qg7Bby9/nOEo4PAkceE1E31VeHhA0osynH9i145etg2qDgFPPC+ZXmaHmweO +h29MEL67qoMHKD2w/bEPvCVdk/hJxQGWfjeoPmmedxbBh6VXAFUATEo= + "], {{ + 3.08594, 8.94844}, {3.08594, 9.11406}, {3.14531, + 9.245310000000002}, {3.3000000000000003`, 9.44844}, { + 3.6468799999999995`, 9.88906}, {4.134379999999999, 10.1156}, { + 4.731249999999999, 10.1156}, {5.851559999999999, 10.1156}, { + 6.56719, 9.32969}, {6.56719, 8.089060000000002}, {6.56719, + 6.75469}, {5.768750000000001, 5.76563}, {4.695309999999999, + 5.76563}, {4.039059999999999, 5.76563}, {3.5515600000000003`, + 5.9796900000000015`}, {3.08594, 6.468749999999999}, {3.08594, + 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGZigIINCg5S8+I0T19QcYDxdzg0PToeoeLwNHHh +NRN+FYc0MMDk+5xgt529FcHfpJe3mDFGFSe/keVov+F1Dbj561WfNM87q+Ew +YyYQ7ETw5yxS3vnnORpfXRXO97s4MeZfMoIfcEu6JnGSKtz8lNg7bsw/VB18 +QeoOqzk8ihDffvGBqsOxXTt62T6oQtx1R9VhJhgoOSSEBKkvOKnqYGazN2ja +Q1UHA62VwhdcNB1MQfyF6g7/QUBe2+FV8VbR39oaDicOO63NlNOB87eD/FOh +C+dPmcBfZdatD7cfbE2mAcSflSpwfvnhba4zdZXh/Or7P24Zeys5OAKNm2Ft +4PBh0XqFsxmKDkdB7p6g7+A8oVkoTUrRYQPI/TK6EHfNR/CVrz0KZrij6CAB +is8Pug7poGBXU3LYApL/o+dwBgyUHI6DzCvQh/iXUQXOZ+Hskk/uU4Xzwcp7 +1Bx0FOW/5JTpwflgde904HzxHq9XLFO0HbaY/ziUcgqoHxQ+dloOK7+9rDhz +QNlBFCQvouGAnt4AakwW/w== + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4vNXw97oz9ZwaFVgVz0zRdQBxtf4pPJy1kox +h5TYO27MEeoObmuOLmeYIeawQfVJ87yzag4KuxbsS+0Tc3iRpf1tuiyCL1w5 +qeTsEkW4fuVrj4IZ5ig6mBgDwWURB/7YgPtG0xUdREDqUkQcqu//uGVcreiQ +ngYEzwQd9uTXvJ3JqgTnlx/e5jrTVsnhTVtut1G0iMN/EPBXcohRjZA5JyPq +ADLWeLGSQxXIHG9Rhw+L1iuc/aEM558BgR41OP9V8VbR39pqDjNBQFIE4v67 +qhD73IQdHkWIb7+YoApxF7cQ3D6wOWdYHFZ+e1lx5oGiw3Xe22Kp25gg8vMV +HaJB7qlhdGAAgQ0KDjlTEwotin/Zg/1/RsEh4InnJdPJ3yH8NUoQff+/27uD +wvUEgr9WSIcvvU8Zzq/9bVVwrkMDrh/Gl9koNp/pwS/7v99KH8yZqOFw4fex +6/Mi/9kH3pKuSdyk4XCwe1+TyWImh/Xg+NJwaBGvZc1kY3P49fb1AUtnBP/Y +rh29bB/UHfxB5gczQMND3YFF/xfXJZ5/9pv08hYzyqg7sIL5f+1h4QPjP3CN +d5z1UQnOR09PAFTGHcA= + "]]}, {{ + Thickness[0.07062146892655367]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {21.23816189290162, 26.03675716064757}, + ImageSize -> {14.158774595267746`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {15., 18.}, PlotRange -> {{0., 14.16}, {0., 17.36}}, + AspectRatio -> Automatic}]}, + "PointLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], { + InsetBox[ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], { + InsetBox[ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], { + InsetBox[ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], { + InsetBox[ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, 0.33333333333333337`]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 10}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.004583333333333334`", "]"}], + ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[1., 0., 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"1.`", ",", "0.`", ",", "0.`"}], "]"}], + NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[1., 0., 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[1., 0., 0.], Editable -> False, Selectable -> + False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.004583333333333334`", "]"}], + ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.130718954248366, 0.5359477124183007, 0.130718954248366], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.196078431372549`", ",", "0.803921568627451`", ",", + "0.196078431372549`"}], "]"}], 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.196078431372549, 0.803921568627451, 0.196078431372549]; + 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.196078431372549, 0.803921568627451, 0.196078431372549], + Editable -> False, Selectable -> False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.004583333333333334`", "]"}], + ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0., 0., 1.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0., 0., 0.6666666666666667], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.`", ",", "0.`", ",", "1.`"}], "]"}], + 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., 0., 1.]; + 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., 0., 1.], Editable -> False, Selectable -> + False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.004583333333333334`", "]"}], + ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[0.22222222222222227`, 0., 0.22222222222222227`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.33333333333333337`", ",", "0", ",", + "0.33333333333333337`"}], "]"}], 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.33333333333333337`, 0, 0.33333333333333337`]; + 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.33333333333333337`, 0, 0.33333333333333337`], + Editable -> False, Selectable -> False]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}], ",", "Automatic"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}], ",", "Automatic"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}], ",", "Automatic"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + DiskBox[{0, 0}, + Scaled[0.001]]}], ",", "Automatic"}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True", ",", "True"}], + "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->1, + Axes->{True, True}, + AxesLabel->{ + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], + FormBox[ + GraphicsBox[{ + Thickness[0.02963841138114997], + 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}, {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:eJxTTMoPSmVmYGBgBGJ5IGYC4ieJC6+Z/DdyONi9r8lkMZMDjP+y9nH2+TcI +vvRGsflMCswOM0HgpJFD4fKSDf/OszjYV0asMLU1dBCunFRydomAQ3LsHTfm +GwYO/8FAEs53ntAslHZKAc7f4dD06LiEqkPBmu7bGQGGDnMWKe/8k67p8HXn +ra6/V40g+ut14Pa/Kd4q+vs0gr8VpP8Ggv8CJP8awU8B2SOh63C4bXn4qU9G +DlMn8FeZaes69AeXqEy/j+CD7dmP4IPVLzJ02KKXt5ixRtvh84aA7FnPDRwa +WY72G4ZrOHwBuc/VwOHUYae1mfNUIfrlDRzWCunwpd9TgvNh/oXx3dccXc6w +Q9bhIMh8JwNIOO4Ud+jxesVi8tHAIfjt5Y8zFIUg7ltv6OD/xPOSqTAH3H2Q ++GGEux/Gh/kPxof5vz+i25/xA4IPi18AYpP1dg== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdlAlIU3Ecx2dKdlpoczNX2pbp28IOt3fR8S06pCxDO1Ytw3KugyzIqIYG +JRlpqZWllVhmoEFRQZdRKzqwQzuwIsSSIui0MkQCS3v/91//R/3g8fjs7f/9 +3f8RK9anuAN1Ol2A8ixUnl7Kk3QveOLR5zx6iBWbEfMur7JRFhlP3OqsdezV +ePKOt/Xln0UcJrbbjMWGy0912yRsvn1p+uFcM96vsXWWNUqYefpujW6LGd/P +zVt7JFjGtJK80MwCC8pKBnn5LglDtu7Pbrxgwdyn+1zdgRIaiFVY6DtJRG3n +xy0NJRZkX9R3PUwTGDuJv6/8v5wl4MCunUuaJnDYHnS3eNxmAfduTz2zupLD +BxJProB36VUv7I85f9wCzaeHQ1zbQN/YCJH6HWCl+XtFzGuOzEkPtWJp9JT2 +lS0iLkNJ3GhFUWr2yLIoibF6rkXjPjNiNvVaIkOYcD3l0BuOfnfJcGcqls/h +pSI7fpOMxBu5w0RPLOpJnD6N1XrVyzhLAmmLw2RS/1cyTDUfEuOjrLQe3TI8 +RK+3jZ23JygWZsOd/JpFD1bI/nhsOBefVR0wWmP1u1njPbM+BdkDNM5Y1jIj +8IrE9PqTfGb9rY8N94m/eJH5vyD8vJXhFRifJ/5cGqv1/MQzHph8ttRdrrGq ++8vB/J1s9YVUbHSweFT9NQ4E9S2IWpllpX0cxNP6plupnpOnebqs6Efi9fJ0 +zmwal5L5uMYxrjhhqfvl4fzzw2Os9VTYk5NxeEDyS1P01PrHooX0a4E/viYD +tnXJGx4lOtDha7/o6QzHTdK2kQ7Mb2tqL68Kp3qVdnhbfzYnzA6n/SqyI/rq +cZ87RE/rM8CBL/nrCsdH6ll+pByZo/T4Qfofy1N/CXoaV4bGYwh3iExP/TlM +Yqzu4ySNVf0Cifl7T+r3TWL+1HqnykxfXYvlMnJI/J/D0VHXXPDbLeNM6OgQ +z2sDm1+6pxEwVaZxD0tk3Cz07bBXR9Lzx2T6bjXR+2COxuo5k0z3P2gond9u +//4nGel8vpXontYZUEz27ZgEV4zT9CjHgFvqfP/9v4HeH3kiipyFyQGDDXQ+ +WgXGtcra9KRrrPZjuOCvhwEust9JPI0nQ+Od0cExDaUa64jBSPWTeaSq/TbC +ePBZ31UpvF8/Av/fp38AMKhU+w== + "]], + + 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:eJxTTMoPSmVmYGBgBGJ5IGYCYol5cZqnE+wdnCc0C6WdUnCA8d8vWq9wdoeS +w9Ms7W/Tbe0dGliO9htuV3XoDy5Rmd5v5/Dr7esDls0aDj1er1hMLto6PElc +eM2kXxui/4CNw9QJ/FVm2roQ+YUIfoT49osMfQj+n2+lD+Y02kBoQQT/RfFW +0d+vdeD8rQ5Nj47fQPDfgORP60Dct9fGYcZMIIjUcdhfK2uR/sXWIT0NCJ5p +OtT+tio4t8LOQVdR/kvON1U4H+ZfGD9aNULmnIykw5L7+/jmGNtB9KcJOKg+ +aZ53dpWNQ+Hykg3//Fng9ktvFJvPpMAM57+sfZx9/g0TnH+we1+TyWIEX/2T +ystZnExw/0PkGeHhA+PDwg/GB6u/ZwuxL4ED4t4Zdg4g786sFHJQAbnPyt7h +DAi8EYfHX839H7eMs2Ud0OMXAI2x5G0= + "]]}, { + Thickness[0.02963841138114997]}, StripOnInput -> False]}, { + ImageSize -> {50.61767372353674, 24.508064757160646`}, + ImageSize -> {33.74511581569116, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {34., 17.}, PlotRange -> {{0., 33.74}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm]}, + AxesOrigin->{0, 0}, + AxesStyle->Directive[ + Thickness[Large], 16], + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImageSize->Large, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->All, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + Line[CompressedData[" +1:eJw11ws41XcYB/BzP8c5zv0cs9pIlxWzEa2tbdavWuuGkK3kUlYpTKlWE9ZF +WDO3onKrrJJIlJYo9f7SjRaVyKU2t3IJJbkT47+33+N5PP/n/L3nfb+f9/yf +w+jHTQ7rOCwW6xM2izX2+/8joor1cefHz9Ajbfa5BiGtQloQm23x0liPVJzw +tRJXCOm5pa+WUkM9cqN7mktUgZD+8ny36IBWj2QuqPPXZArpEt/DzmskeiQh +fuwI6an7qxfOYOuRkNaxgkKakiwq4fVqyebRaid8hXTSzNzWsjYtGS02WlFI +LfYfSj5ZryULx8otENLCFYWtWyu1xJI5QjqxdNO9uSVaYsgUFNLBiow5ypta +ImYaFNLg0qTFNXla0jPWXreAfpi1sjEjS0uYcnUCOrViWO2foiXF98aOgN6Y +eqz0u0QtGZvWPldAk5ttjdT7teTk2LgnBHT8DYORf0O1hGkvSkDZeR94pwdq +ScBYOX8BFY13XLtti5Z4MEdAS3YVt8zeoCUOTEEBDcmLHNBx0xJmXCsBfXIv +4eCjZVpizAwsoK6Nr/OSFmkJU04joM/s9nusm60l/3sI6EOvrQmffKZFDz5V +JUU5dpto0YNPWUuqY/InaAnTXgGfNjz8dvlePS168GnF1qtHFulq0YNPs+zN +POQcLXrwqZ9bUFZZrwY9+FTumOgX365BDz51SnWmrg0a9ODTmYF/hhhVadCD +T8PiF9x5VqJBDz7NdJkSnHpTgx58Ov6s7IrnZQ168OjeV4+8Pj6nQQ8efdQ3 +50BbigY9eLSXNdH8bKIGPXg06eCseT77NejBo9bhi++a/qZBj9HXu1Q3WwM1 +6MGjYrGNWfoWDXrwaMaULPGGDRr04NEtWa2OU9w06MGjy+XndeuXadCDR2cd +TTM/ukiDHjwacCgAnGZr0INHCa/okuYzDXpwaeRFM/37Jhr04FIDk0U1+yZo +0INL84PSJXP1NOjBpft9nyUOSDTowaXcyXsjs9ka9ODS5V/J6j171YQZ15dL +WedFBye0q9GDS/cWdaQ8rlejB5d+xCbq8Eo1enCpX7/XE1KiRg8uFXvUDXXd +UKMHl87rl24/nadGDw5NtfthvnOWGj04tLp2nKc0RY0eHDquLqfmWoIaPTj0 +zMzdqZui1ejBodtW3blmGKpGDw6961Ix6X6AGj041OBId9mvm9XowaEmje4P +Pl6vRg8Ozbf6QVPloibfMA1yaE+p4FiIgxo9OHR3458bpy9UoweHns5euuep +lRo9OLTFwaI81FKNHmwqO7Nug7mxGj3Y9InNyBdVBmr0YNMpa2Tz92jU6MGm +NCIxbJpYjR5s6v3gtPD+iAo92LRky/TLP3er0INNw58bJ7/fqkIPNn2bsuvS +1VoVerCps9H7w6sfq9CDTR0Ol2/m3lOhB5tOHwpXpFxXoQebflctr5x/SYUe +LFprMfX28wwVerBogVtsZfBxFXqwaEy7QjopToUeLOoRYutOI1TowaJNowm6 +7FWhB4vaSM+s6vNToQeL3vqNx4/ZqEIPFk2tiqGma1XowaJnNHVRt5xU6MGi +/0Z4+7ouVaEHixrnpq3q+laFHiw6aVjkHPalCj1YtDmhfZWhuQrzH4HILdne +F6aoMO8R+KXldMB349/lOwIzr+hHVCre5TkCpg9mH/EUvMtvBJpUDmn9g0rM +awQsv92Rue+1EvMZhp0lZWl6TUrMYxiC4nbEnXiqxPmH4ebjzb+YlSpx3mFY +/TR/3uU7Svz8D0P+C9uBeVeVOM8w7GYp4+5lKwnTXutbcE+tfd/xtBL35y3o +XI8KrD6iJMy6xL8F1bJn+atilPj8fAv59nEVDfuUuA9vodHTqchjpxL930JC +UWFk81Yleg9BeZP/ZE9PJfoOgdGS3tBmNyV6DsFJ29xsD0cl+g3B3UaTkw2L +lOg1BF1rMpevmq1EnyHYOiO2qGqGEj2GYGKKYY+DiRI9BiEpOaTqrqESPQbB +3adt0xytEj0GIdbL+2KOWIkeg/D53+JTJiwlegzCUrsbVke6FegxCBvYO/1k +rQr0GICWBrXDzloFegxA9jmb223lCvQYgHX7Gh44/a1AjwGYeCrQ5xZVoMcA +gCLrsFmOAj0GYMfikcVxZxTo0Q+lwzVBI8kK9OgHedb5L9cdUqBHP/BcC3yK +/lCgRz8MWNq8Z7pHgR790G7mbxGxXYEe/bD8huvlNm8FevRBin9f2mJ3BXr0 +gePRmUOnflCgRx/cLX11hm2tQI8+SMtpvLByjgI9+qBiZ6Ese6YCPfqgPdr0 +ktBUgR59sHR8bKqzkQI9esHzjGf1WT0FevTCreusxcMSBXr0gsHagx3WbAV6 +9ELwysPRlu1y9OgF64tuh4oq5OjRC21ZHo3OBXL06IHo6B9/fpEhR48e0BtX +arntsBw9ekD/IEt/aI8cPXrgZhlXs+snOXr0wEczr4wb/kGOHj3glVhisGOO +HD26Ya37WVXHx3L06IZGu4jmH/Xk6NENpmGeBx6y5Pj87IZpP7E5X7fK0KMb +ordVTDteLkOPbkgyMu/jUhl6dEHBNYW7e7oMPbogg3zjeDlWhh5dYKv7dYFs +lww9uiD92uJEN08ZenRB5EuP+2nLZOjRBaVNC2w7rGTo0QW57m5Ci2ky9HgD +T80etWxUydDjDeS2hTw7NSRFjzegOiZprGqUoscbKHM6+1T4UIoebyC93CPH +/IoUPd5AGP/5ascUKXp0gjYluGhLlBQ9OiH1ut0/f+yQokcnlFqxfz+2Rooe +nRBu25971kaKHp3Q82a+U87nUvTohGPeSd/nGUnR4zUUH1kRnyORosdrKA0J +kGd266LHaxgXm3b8WI0ueryGL3SNrf4o0kWP1+DiWlvoe0EXPV6DbLujmd0R +XfTogEXqVCfj33TRowMmSg6aD/nqokcHuMT8nFS4Uhc9OsBtr2VI5Le66NEB +XjHfl9p8qoseHTD7cKeXQF8XPTrAL+evz3LZuiSDyf8VHP3zsf6aVgnm/Qo2 +3jIaEJRLiIjJ9xVMDmi7duKaBPN8CT5f6FvPOi0hG5j8XkLiVXnonf0SzOsl +2M67ZWcbICE3mXza4fbpc1HFayWYRzvsPV48Zb6thExg5m+HsBfx3X99LiHM +uPfa4OgWdd0HRhISyBRsg1PxOUWBYglh4pnWBo/XBkaXvRGTSmafWmHn1Urt +5H/EJPh/ICj4K3eW920xmcHsSyucL979JC1LTGqZ/XgBHUsl1TVxYhLNAL6A +28dPqaVBYvI14/8CrC6oPaZ7i/H7Tgv4rQvOtHYUkzjGtwVy1AlFblZi9GwB +3gdrY9Z/JCZdTIPNsG+nW5OHXIxezZAe4Zvs0qdD7JgAm8HuQmvcwjod9GgG +4yVh6SZ3ddCjCT49tDGTc0EHPZpAVWj064NEHfRoArVFzMuYYB30aASriPeq +rX10yFrGoxHGeWzQG/xeBz0awTfzxI6j3+igx3NYsH1J1cypOujxHBrvzxff +lOugx3M4Wf+0dn6fCD2ewYdmYJ5fK0KPZ7BAh1X8UZEIPZ5B+hL9fSHnRejR +AKULmiwr40Xo0QARfRf+NAgSoUcDWPl/enyFlwg96mFu8WZ+qIMIPerBpZmf +eOpLEXrUw7BB/fTLE0XoUQf5dZviqFiEHnVg/09EUl6nED3qoGZnjCSlWoge +tTC33jE7qECIHrXgN32qq0O6ED1qIcv/eYX6gBA9Rq+5Pe23dwjJCib/Gthu +ZOfl7S7EvP8F34Sg99iLhETB5PsvXEm4DL+ZCzHPf8B6zt+mI+8JSSGT31PI +Lv5s2voRAeb1FOZsswiARgHZx+TzBPqb8l4KSwSYRzX4hkctIRcF5P8HXDVw +/K1XbkgS4LxVsOxL74ZdewWkjylYCW4rHLNCvQQ4TyUM3fIODbQXkHPMPlWM +5mc43f0LAe5PBZx82PXLDEMBfn4fg59l0qQevoBQZj/KwSdseCiljY/7UA7l +CvvieY/4xI/xL4Pogalu9/P46P0IHIPCdixM5hNzxvcROPFELzJD+ehZCu+b +lvhzfPikmfF7CFtm0d65y/jo9RA63KM+8Z3FJ8lMgA8gxa6s5XdDPno8gNI7 +xoNRfD45x+RfAjnrFk4PauVh3sVwLHyS6+qHPDKByfcetG0U2ptc4mGed6H6 +q9zamiQeiWbyK4KvvA/U7Q7iYV6F4Dwpw0S6gUcUTD53wPJCb2ywDQ/zuAUO +49YPNlrwyG5m/pugjFV8NUOfh/PegLgPHS1/esslHcx812FuM/t2ZD0X56Eg +z9hTkXiHSyjT/zU4UjhgG5PBxX7zIWHSr3rb9o/ez/SXB8PnTMbP2c4lLKaf +S2AW6W7Tu5KL7/8XvIpvTD48m0tqmfc7D30+CunEye/qZ8K5Y53hh0Sj9zP1 +0mCJye+G3W0c/PuT4NfQcMfq4eg1c/9RuFhlH+F78d3rseDqHx4QEc8hLOY6 +GJKd64/H/sp59/8HSz/UffSHQ/4DZE/cFg== + "]]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + Line[CompressedData[" +1:eJw12Ad4zVcUAPC3n5W8vd+z91Y7gqu1gqpVWxGzFFGa2jNolJhFjQiC2lJB +aDk3pMSIHYmINFsSIXuv3nud/j/fly9fnvvuOb97zz3338h70ahZMolE0k4q +kfCfn59a1G+6dfN0a32SPTKs/qYPajp8TUiqpW59EnPCp3edGDWtd2jIV0+q +XORuUcvJO+6o6cvrKcf8cl3k4qCkFcaLanrw1SpJrxQXOfg7f9TUO880NS/a +RTZ94AOqaTP3S7dOR7rIYjbaCR81zWg92PndXy7CBmMjqullMY6LDOY/Bqmp +z8wVbx4GuUhn8ahp9/WGHuv3uEgDMaCaVh45v6/7ZhepIyaopvTmgKKPy1yk +mE+vSEX9YhJGB893ETFckooOKfz5z4nfuUjUY/6oqEHHnpEuwqMdGaai0e3O +Lrr/lYsE83BPqGgQC3d1NxcR09uhot5z4tt2aeUiK/lwK1S0qd9Pv2Y5XGS2 +eFQ0I8g9K8jdRUaJAVX0wq3Tg8dJXUSE21tFl8aR026FTtJKBKyiHiVvlBHp +TiKGM6popWEJi9hJPnuoaETHenc7Pnaih5L6f32y0fvbTvRQ0mHz+qw7EuIk +Ynp3lFSzhQfsRA8lfc0/t9+JHkoaSGsfpv5O9FBS73fHy31XOdFDSduW95rQ +bpETPZQ03Rx9PWW6Ez2U9GLnheaDY5zooaRLR6h/GjHIiR5K6rkg6KXKw4ke +Slrl3/OLW22d6KGgd0692LmkgRM9FHTz3fk5rfRO9FDQ4YkK9s+JHgpqrGLA +JQ70UNBoW/e6X2c50ENBA7s9+17+zoEeCuo9+vvIG08d6KGgzX1kLXzuONBD +QbO2HdrU/KoDPRT00pkuqfGnHeihoEvvRX2556ADPRS0R8rsY17bHeihoNU1 +7FnrQA85jXD+/t21Hx3oIad+LNwfZjnQQ06HjX3kaDLegR5yauS8QxzoIafR +O6pid/R2oIecHmbLeWBHBxHh+sjp9Acd9lU2dqCHnLZIjyz80+RADznNlrGI +aznQQ06vNKgIaVBhRw85Xeq5V/v6ox095NST6W5LtKOHjFb/xAJ+aUcPGY3c +PbVt2T929JDRrZdKt14Ks6OHjI58vCtz1jk7esioOZNt4EA7eshonDKCCdvR +Q0aDGk9R+m+0o4eMzuhbPKOvrx09ZLQ1n8ZcO+kjJiijuctaNjo/yY4eMhry +W/ha7+F29JBR3z8nJlj72dFDRj2eFng+7WxHDymVZXNgO3pI6f1azct72ezo +IaUBzWB8fl07ekjpiC/HX/+j2oYeUmqeyguWDT2kNG7l1qWmVBt6SGnQgSYv +H722oYeUzrz6d6cND2zoIaWtX3y7s8ffNvSQ0rxP7LloQw8pDa37y9cnj9nQ +Q0pX8HD32tBDQsmAm3X0W2zoIaFSvqCX29BDQiPXZN9f84MNPSR0B4u261Qb +ekjoaPEHG3pIqJVt32P9beghoQl5LOLuNvSQ0OO8XLW2oYeEzmqzsSbCaUMP +CW3DyvNKjQ09JDSXByyzoYeEXlk/3JFRaEUPCV0V+H554Hsr5r8G+vy1LnZM +nBXzXQOKWLaBo6yY3xpgq/m3cLBiPmtgm24Yq9BWzF8NjG6fNqr9SSvmqwas +Q9mBtN+K+amG+DkW7aGtVsxHNRz1u7xw5Gorxl8Nc495Ral9rBhvNbS/ndzm +trcV9381fOLA31oxnmoILTGyFW0lYnofqmAZ/4OHFddPFZBOg07tb2clYrn8 +XgW8Wg1vaMX6WQUP5y2foTBYcT1UwY4t+js3lVb0r4JRwecaLi61oHclOML7 +r23xwYK+lRD/jj8W9KyE4HJfz73PLOhXCXNZuEPuWtCrEtp3OVMmuWZBn0rI +Ewvagh6VELbg7bUFhyzoUQHL2HJuGmBBjwrof9ptadw6C3pUgIJv3yUW9KiA +yMS+nQbNtqBHBexi5apqvAU9KmCM/cdPV4Za0KMc7Kw8z+tjQY9ySBzNAu5k +QY9yOMmn0cSCHuUwb/vrudvNFvQoh7b8+K1tQY9yKLjHNnCFGT3KIJS1G5c/ +mdGjDHi3MTvJjB5l8KXrVT/XKzN6lIHagx1I98zoUQZRY1U1/jfM6FEGu5Yc +nULOm9GjFMaw3VscaEaPUnBeeG6/sMuMHqWQ9IAB+5nRoxSOp8tjbT+b0aMU +ZsqPsBPJjB6l0L5ht982TzajRynke7KC9Y0ZPUrg2oS5owr6mdGjBNb4SkPO +dDGjRwmww0gzrYUZPUpAfZkdwHYzepTAEz7Nemb0KIGATL6DTehRDDzcnvkm +9CiG+k0OZOSkmtCjGJIY76kYE3oUQ/DkhycnPzShRzHM58v5lgk9iqHjvkrv +B5dM6FEExWz7rj1uQo8iCHvKIzahRxGsYuUqe4sJ62cRDKw9/d3xFSb0KAJe +nicsMKFHETwSAZvQoxB28uNolAk9CmHsqn/GrRpgQo9CcLHj94seJvQohOSr +fAOb0KMQ+Go+6jKhRyEsyGn14lutCT0KgbdX9eQm9CiAz99rRI8CuMHbyQwj +ehTAOu+AYR3eGtGjANjuPZcWZUSPAqh7mDdYRvQogMdhDPiKET3yYW90/r1a +p4zokQ8T839tBgeM6JEPTk0z1lEa0SMfEtuwgrXGiB75cG7wuH7JPkb0yId5 +s3KPHphhRI886LzBv3r4WCN65EFpIDuAvYzokQd/8aeXET3yYGMs28HtjeiR +B4NZuC0bGdEjD9hhFJNgMKJHLjznvCojeuTCnqE39g4tM6BHLkxky1mabUCP +XGjMx0kwoEcu8O278LkBPXLhzG2XplmEAT1ywYeVq7fXDOS8yH8OdCj95vGu +MwbMdw6I8nzYQGqJ/OYAO339qwMMmM9PsIEdR6HrDWSuyN8n8JofOnD+UgPm +6xPw47fRHAOJEPn5CFHBbANPMGA+PsJe1m4EDDOQhiL+jzA5wRrev6+BiHAf +Z0N93l51MpBVYsBsSLewA6mpgYj0tMyGs6ydnGMxkFixnj6Az8jVverXMRC/ +z0DA2+dXlXrSRayXD1DGG6wcPUkU6yML+HWhX7Ke7BSAWbAhIulqySs98RT+ +WeDF03Jfj/1OJtStZheGm3pyQPhmwis7L1h69MwE3k0+P6onhWKCGTBpzL8B +W3br0SsDGi5e9rH3Jj0ZIRKYAenb+QGsR48MOH+WPfP06PEeFrDqPH2KHj3e +Qzce7gg9eryHMokvayj16JEOnNevq57MFB7psMHjj40eLfXokQ5DWLS5dj16 +pEE9cUHSo0ca8O07RaJHjzQ4cKFetaFAhx6pMImXqzQdeqRCo/e849ChRyqk +sfLc/ZEOPVLgPA/4lg49UmAh/57LOvRIga4TT7B/OvRIhhJ2/Gr36dAjGege +toF/0aFHMmzi7cZKHXokwdAoXqF16JEEGtZeZU3ToUcSvFCxA2m0Dj0SYT9r +J8cO1KFHIkwmP7R266lDj0Rowtrnu2106JEIvLtaXl9Hxov8/wvnOLBOh/lO +AJ8rz9iK1hGtyG8CdGHXoyPFWsznO6jkF4ZMLYkU+YsHXq1qx2sxX/GwuXnX +BvSJlvwi8vMWhrLrr2+4FvMRB5pp7AIcqiWfC1wcRPMD+JQW430D+8VPLSkV +A8bCtGtflH6zTYvxxEJTFq5qrZZ8vufHQHYOaygXa3H9xADnXTJTi/v3NSxu +tf/HVuO0hIr1EQ0ebDn/66XF9RANVd7sguSpJaJPW/EK7vDt20GL3i9h8+GK +bFljLekofF/CMFaubhi16PkCNK/ZhV+tJRnC7zmcTeMbQINez6ETy0bYGw0J +Egl8BuHjecHWoMczGLK7qdfuYA25LPL/BJ4+4ieuBvMdBRMZ3/xFGtJQ5Pcx +ZIqGWIP5fAg+bPsN8NCQnSJvD6AkhF/gNJivSBDrVKkhWpGf++DOj4csd8zH +P3CAHX+lT93JOhF/BDRgx/vMq+4Y7104x6rB84PuJFfEFw49eXu2zh3joXCH +H2Cz2Hhi/rdhIH/fM9Qd5/s3iPc7HdnnxfxugLgemdyJRMznOoj3NxVu+P2h +wK+3DxPdSKL4vhCo5u9n7rnh+BdBvI85xz4vxjsDWv7+Zdf//z8Y+Oul1b7s +d/H5QGjMw530/9/3wmVRIN2IRPzuB935+5Pmbv/fPyR3xYHuRv4DbDbdSw== + + "]]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Line[CompressedData[" +1:eJw11wtYjPkXB/CZmmYSpcvcmprbO4NqN5Zcat1+siK3QuFvV6zFSq2tDa1C +LpGsSP8VFbnfq38oKnJ+ol1ltUhCFyldSPfpfvvndfyeeZ6ennc6c873c973 +mdSrfl24Ro/D4dhzOZxPPz8fQ/pOtr1x5X4t+bggTbGnVkCDNoYwuhAtKTzr +N9moUECp3e+/hG3SkvutNj8cyhJQtytxT2U+WpI0822QMElA4z7K3ZJWakls +zKcjoNlbHKqmLdaSPbWfCgpo2HqzowVztMR/oNpZPwG1WV/3o/c0LRkoNlBR +QL3Tel16x2vJrE/lZgpo8FdbXA5/rSUO7BHQkWOOrhzGaImSLSigtwsOHUmX +aIkR26CACu/EVc4z1pK2T+218mmzrc69XE9L2HJv+bSFl1+4uUNDHv/z6fDp +o4LfggbXa8inaRek8Wl0ronTqQoNOfdp3LN82p1WbjHulYaw7R3i0z2qrwbn +5mlI8KdyQXzKsR+mXPFAQ9ayh0+fpZm469I1ZCFbkE9XuQ2PD/+fhrDjTubT +qFFXBynPa4gtOzCfjplfEpUSqyFsOSGf/ndpr9PsSA357MGnkltz+9/s0aCH +Ac05ZFyxKViDHgbUJGdX5WB/DWHbyzKgnkMa+WfWatDDgBY9jJnp+IMGPQzo +uvHZF/MWaNDDgI5bmjZizUwNehjQf/vT/+6epEEPA6r3xGxf1BgNehjQ3KmG +3rY2GvQwoL+fqFpP5Rr0MKDJZu0RSyw06GFAo8+EPqs31KAHj/aOL3Lc28eg +B49ejZl5T65j0INHT22V+Ka+Z9CDR7dsjXGa94ZBDx59qpHbVT5n0INHb9c3 +T96Wy6AHj3rN990kogx68Oi2hKIniakMevDooF//dHe5yqAHj4p7PuhKTzHo +waPLM8feDYxm0INH3bQPE0wPMOjBo8WJPfTyTgY99OmBKrtu50AGPfSpz4aE +74t9GfTQp869ReWbVjHooU+frRUdHrqUQQ992hyfuvbyPAY99Knirmz19OkM +Ycf106fpBufCSxwZ9NCnce+uFQaOZNBDn17vPj/fXMughz49yVTUJ1gy6KFP +g3wfp80cyqCHPk36OjehnMeghx593j310bYuNXro0dw70ULLRjV66NH00xPC +UyrV6KFHl42OsHUvUqOHHh0+V7+t9okaPQbqjRY0hP2lRg89SvcKRNo7avTQ +oyH/2biOXlOjhx49YQPvf7ioJlPYBvWoW82ymM7javTQoxsM7wRGR6nRQ4+u +DVq6x2GfGj30qOeti1lPtqnRg0vn/MV8syFAjR5cGu/8Xd5gbzV6DFxfte/E +ZS81enDpxR7f+JkeavTg0r5I/6eVrmr04NLV8yQTQqeq0YNLb4ne/suMU6MH +l57Yv+j4PTs1enDpA9PW4ytVavTg0tkv5z3rF6nRg0vF76onnRysRg8uPWzm +VjKFq0YPDl2vMkspbVOhB4cGZGTe2/5RhR4cmhlcxVeWq9CDQ3O7FKFQqEIP +Dm140uO08rEKPTi04IzElntfhR4cOsl20MIzaSr04NAsp19Spyep0IMzcL+/ +XVR5VoUeHJouFowMi1GhB4dq/UO+sz2kQg8OvRLacPRRqAo9ODTYuc9mQ5AK +8++HQ00eHaZ+Ksy7H146nuSnrFFhvv3gY/uHx5LvVZhnP9i55pR3uaswv34I +OTHkeryLCvPqB/ubRvedJ33Jpw/i04LF1aO/5NEH1j6yxD9GfJm/DyLIubBv +5F/m7QPb1a8uFJir8P7vgyPZWwcHG36Zpw9cZ1/yndajJGx7tb1QQtzdI6qV +uD+9YLR93/1Xz5SEXZeYXhjUX/f38LtKfH72wrUczYqNl5W4D71wSpC/P+tP +Jfr3Qo766lyzHUr07oHLxT9eWOmjRN8eGLrpRkzyYiV69sC8zFU2XGcl+vXA +1IlOHgvtlejVAwkuAuU5qRJ9esDP5tz+Nn0levSA7Nv6Y64NCvTohp/4j+ac +eK1Aj27grh9xvilbgR7d4JPafsHlmgI9ukH674RFx48r0KMbohfXXm0OU6BH +Nwx6KL/hGqBAjy7IPVW+/rSXAj26YF2oZ0GnqwI9uiB6Vaxu4TgFenTB9RMl +uQkqBXp0wfoxHssEQxTo0QWRbyaeX9UuR49O+MmtKPFuuRw9OsF12q7NVnly +9OiEhSnh3C3pcvTohGJzjwWF5+To0QkVXvPWjY+Uo0cn2K+onRUdLEePDtj/ +OLG1ba0cPTogY4/Cf+lCOXp0wM7Up5kZk+Xo0QExxmtL5bZy9Bi43hJasFMo +R48O2JxSfr6q3xo9OmBG+pSFc2ut0aMdyO2fSq6/sEaPdrDoGjFblmWNHu1Q +/dsvcbsSrdGjHZZKmee1x6zRox0SB5N2z1Br9GgHbuFjwb1frdGjDcoulRra +f2+NHm2wMzKqN8bFGj3aIOu2+L1gjDV6tEFx6vm8zXJr9GiDkIth16oMrdGj +DRyOmR9ZorNCj1bISL6yNeeNFXq0Qsn2LJ9Jj6zQoxUivi1ak3zTCp+frTBk +yJ4Nw85YoUcr3Fq0Ijwuwgo9Buo1SzPMt1ihhw42HvHj/bHaCj100NE31pfn +boUeOrBePKN1+0Qr9NDB7oDDZ7uGW6GHDg6MlgUHmluhhw6+y2wKae2VoYcO +7tVMvLnxvQw9WmBqyEim9bkMPVpgSKzZw81Uhh4tsKV9akLnVRl6tEDuwhH5 +247K0KMFijJnTdPfLUOPFqjuduwO3yBDj2YwLD1lYL5Mhh7NUHJq8pq4GTL0 +aIbSOW8Vw0fL0KMZEs0CJly3lqFHMyy43nBjqqEMPZohoNQ7Jq/FEj2aoCrO +qM7rjSV6NMGHq2YpjbmW6NEE3zcXtOy+aYkeTeBRmn1NesYSPZrA5PnPLUkR +lujRBDVHl9112WKJHo1wPMNTWrbaEj0a4RLfThDsbokejRBXfy9SMskSPRrh +WI/6duoIS/RohCPO3gc8LSzRoxHOP3pq1N4nRY9GKDa+Nin2g5QksPk3gHD5 +7zZTX0gx7wbQeKU+r7wnJYZsvg1wO8h81sFEKeZZDz97Lgl3jJGSdWx+9aCZ +4n3yXagU86qHtAtzDkf5SckDNp86WHZUtdb5BynmUQeNjO0w3UwpUbHz10HL +6+yCiw5Swo77z0eocw4MWa6Ukq1swY/gML3UVjRYSth4bD6Cd+yd4rw2CXnJ +7lMtTJ3fenJ/uYSEfgYCP1lE8Kw8CRnL7kstTCy9EmiYISFl7H58gCTBseO5 +5yUkkgX8AJ09tPngYQmZxPp/gLJdqbs8t0nw+857WKSy9VR4S8gx1vc93N/e +8tt7Dwl6voeUv0wrbxIJ0bEN1oBlx+mUvV9L0KsG5k6p+7BUKiHubIA1UDvF +67A9T4IeNdC+au81XqMYParBUSb3LC0So0c13Jdw9mb8LUaPaiBhDvNjbojR +owpCvi2/FXRSTFazHlUwN2/5Y68/xOhRBWP/UsTMCBSjRyWQ+AfDRv0kRo9K +ePlUtN3KTYwelTC2sD/BaKIYPd6B2ORoZs9wMXq8g4jT4ttN5mL0eAdty8qS +3/eJ0KMCdGu2Xnn3QYQeFZClH3Oj/IUIPSpgub3Ry4osEXqUQxyTo6lJEqFH +ObyqbDnTECtCj3IYfeafH7v2itDjLezrTvM1DBChx1s45zLtieUKEXq8BZdL +Q2NGzhGhRxn4WTbku0wQoUcZxLvlRqzSiNCjDJaEXcnfOVSEHmUgG3Xz+rlu +IVnK5v8GEv1HOT6qFmLepeB74jf/1nwhMWXzLQWvn3U+GirEPEuACsg4zwQh +ecjmVwxnRra+3n9MiHkVQ05e9voHoUKyj82nCKzuBDRz/YWYx2vQk+eFTF8u +JJ8fcK/h5NUkVbirEOd9BQez28qfjROSDrbgSzCbdeC5ihHiPC/h6vjF+gEm +QpLM7lMheNs5bcvpssD9KYT7YRbu2moLvH9fgMeW9PDd+RaEsvtRALGJjROq +wQL3oQA4L3zWuSVYkN9Z/+cQWZltc+eYBXrnw0XjbXvt91iQb1jffBgRWHfw +rL8Fej6DibfmuCm8LEgN6/cUKnvjn5+YbYFeTyGnN+MrZoIFOcUG+AScl5Us +N7hgjh5P4LJJ0FsHN3OSzOafB71tJoeGDzbHvB/DA78pYzr/NSMqNt9/IM40 +f/v8WDPMMxeYooaS3evMSCSbXw4E14ysu+hkhnk9BL1gZ1eVsRkxZfP5GwK+ +DuPvLjfFPLKh2Nfyf7vTTckOdv4HMDZ1yruaw6Y4733Iy308Y6+PKWlk57sH +cef1Lzi6mOI8FDSZow5VqAfqsf3fhWRd3FdveoZiv3fAwyh6SdStoeQU2186 +eE1/GgkBQwmH7ecW/BJwOmr26KH4+SlwMiqxTdZoQsrYz7sGxnZPtlslm2D9 +JNixLD/Myd+E7GDrXQa7CZ6xqx1M8O/PwaT1c8wPthmTHez742HbpbuFlzKM +8fqfcMz9sfZyiDHhsL+HwrBCo8WhM4y//P/Buf/NkIGXMfk/QjrwvA== + "]]}, { + Hue[0.37820393249936934`, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], + Line[CompressedData[" +1:eJw11nlczPkfB/CZaZppy1VzNjXXdwbFYp05wkdsbhJhLbEtdkuOHNsqscgR +m+uHhKLkLLmKpHp/UI5sbSRZEUandE/39cvXu88/Pb6Pvt/3vN+v53u+j9F6 +rHVdweNwOAO4HM7Xv9+OGS1QbK1atk9PvsxJUO0qE9ItG7cxxm16kntu3Vjz +XCGl/f5cvWeTnjyss1t88IGQul459VyxSk9iJ3/0E8cKafgX5ezYZXpyMvTr +EdJHm4cWTZivJ7vKvhYU0v1eliE50/XEp7PauXVC2t+r/BfPCXrSWayzopB6 +JbQ5t43Qkylfy00W0u39Nzsf/l5PhrJHSAcNCVnWm9ETNVtQSFNyDh67K9MT +c7ZBIZUknSqc2V1P6r+2VyegRnuji4GnJ2y5jwJay8/O/aNRRzL++XoENDNn +vZ9FhY58nXZOgoCeSO8x6uwnHYn6Ou45AW1NMIiG/6cjbHsHBXS3pr9FeqaO ++H8t5yegvAG91UtTdWQlewT0VUIPF+NdHXFlCwroitl9woOu6Qg77tjO+oOi +v1Of1xF7dmABHTLr3ZG4kzrClhML6LGFbaOmHdKRbx4CantnRsf7XTr0MKXp +B7t/2uSvQw9TavV0R6GFj46w7T0wpW7dqgSRK3XoYUrfPQmdPHKxDj1MqdeI +tIuZc3ToYUodFib0XTFZhx6mNLvj7uMWRx16mFJeluXeI0N06GFKM8abedrb +6dDDlAaEFXlRpQ49TOkNy4bgBSIdepjS0MjAFxVmOvTg07YReSN3tzPowacx +oZPvK40MevBpxBaZd3wpgx58unlL6KiZ7xn04NMXOmW/wpcMevBpSkXN2IB0 +Bj341GOW9yYJZdCDTwNi8rKuxjPowafd1h51cY5m0INPpa2fjflnGfTg06XJ +w1J8jzPowacu+icxvf5m0INP319tpZe3M+hhQoOL+rU4+TLoYUK918T8/Nab +QQ8TOqktz7DJg0EPE/pipeRwz4UMephQY3j8ysszGfQwodoUxfKJExnCjrvO +hN41jQp6N5JBDxMaVnAj13cggx4m9FbL+VlWegY9TOhZ5lNFjDWDHibU3zsj +YXJPBj1M6LXv02MMfAY9eDS3ZfyzgGYtevDos6TjYusqLXrw6L0Ih6C4Qi16 +8OiSwcH2Lnla9OBRuxkm9WVZWvTg0ZzBwso9j7TowaP3dwsl+iQtevDo9p82 +/k5vaNGDR8PtoHTxRS0ZxzbIo3NKFoU2ndaiB4+uNUvyPX5Eix48+pvfwl1D +92rRg0d/unPxQVaAFj24dNYj5oc1G7TowaVnnSZlWnhq0YNLp3vsDbvsrkUP +Lr3U6h0+eZ4WPbiUc9jneeFULXpw6YqZMofA8Vr04NJEycd/meFa9ODSiH1z +T9/vp0UPLn3cq+70Mo0WPbh02uuZLzokWvTgUnlBseMZCy16cOkRy9nvxnG1 +6MGhXhrLuPx6DXpw6IbE5Ptbv2jQg0NT/IsEaoMGPTg0o1kVCLka9ODQyqzW +UcsyNOjBoa8iZfbchxr04NCx9t+5RiZo0INDU0etjp8Yq0EPDhVkfZxbeE6D +HhyaKBUO3BOqQQ8O7euzbZL9QQ16cGh0YGXIs0ANenBogFO73Ro/DebfAf+r +ntfYa50G8+6A1yPPCOJWaDDfDlhlv3/egp81mGcHDJz61NDsosH8OmBHWLeb +4c4azKsDfrht/tDJsSufdjiT4C8tHtyVRzsoVymu7u/bNX87HCRRe35Qds3b +Dv2W/3chx0qD3/92OJ62xcLfrGuedpg27ZL3hFY1YdsrawMDcXEJLlbj/rRB +9617H/73Qk3YdQltA/OO8sd9UtT4/myDO091SzdeVuM+tMEFYfa+B0fV6N8G +mdroGZZ/qdG7Fa69/eXCslVq9G0Fy023Qq/PV6NnK8xN9rDjOqnRrxWcxoya +5zpAjV6tEOMsVEfJ1ejTCuvsovbVm6jRoxVUoytOTK1UoUcLLBc8mx72RoUe +LcDz6nu+Ok2FHi3gHd9wwfmGCj1awOZfh7mnT6vQowWOzy+LrtmjQo8WsHii +vDV1gwo9miHjrMErwl2FHs3gGeiW0zRVhR7NcNzjpNF1uAo9miEx7F16jEaF +Hs3gPWTeImE3FXo0w9H3Y857NCjRowk8Z+ddTTEo0aMJpk3Y8YdNphI9mmBu +XBB3810lejRBgdW8OblRSvTovHaf+fuIQ0r0aIJhS8umHPdXokcj/J1xta5+ +pRI9GiF5l8pnoasSPRphe/zz5MSxSvRohNDuK/OV9kr0aIQdtYE528VK9GiE +P+MM54s6bNGjEabdHec6o8wWPRpg0r1f3918ZYseDSBt7jtN8cAWPRqgbP3q +Uzuu2qJHA/wsZ16WnbBFjwaItSANboG26NEAgtwM4f21tuhRDx8u5ZsN+NkW +Peph16EjbaHOtuhRD4/uSUuFQ2zRox7y489n/qG0RY96CLy450aRmS161MOo +E1bHFhht0KMOkq5f2fL0vQ161EH+1gerHJ/ZoEcdBI/OW3H9tg2+P+tA3G3X +mt6RNujR+fzcpUGngm3Qow6gRp5otdkGPYzge2wdf/9yG/QwAqdjmDffxQY9 +jGA7/8e6rWNs0MMIOzccPtfcxwY9jHBgsMLf18oGPYwwObl6W12bAj2M8KRk +zO2NpQr0qIVJ2wYydS8V6FELlictn/xBFehRC34N42OaohXoUQvprn2zA0IU +6FELeclTJpjsVKBHLZS0jGwJWqNAjxowzz9rarVIgR41YDg7dsWpHxXoUQPv +p39U9RmsQI8aiLXc4HDTVoEeNfDTzcpb480U6FEDm/I9QzNrrdGjGkpPmZe7 +v7dGj2r4Em0ZV5VujR7VsLgmp3bnbWv0qIZ5+Wk35JHW6FENvV7+VhsbbI0e +nfVCFqU4b7ZGjyoIS3STf1hujR5VcFnQT+jvYo0eVXC64v4hmaM1elRBaKv2 +Xnxfa/TovHby/NtNZI0enc8/e27e0C5Hjyr40P2G48nPchLD5l8J0iV/2o1/ +Jce8K8HePf5l4X05MWPzrYRkP6spB67KMc8K8HJbEDQyVE5+Z/OrgD7jPM8U +BMoxrwpIvDD98JF1cpLK5lMOS0M0K50WyzGPcqhm7HsbJ8uJhp2/HIxv0nIu +DpUTdtx/vkClk++2JWo52cIW/AJDJ+bbSyzkhI3H7gusOpn0NrNeRl6z+1QG +zrPqzuwzyEjgNyDYoAj2n5IpI8PYfSkDx/wrvmaJMvKB3Y/PECs8cTr9vIwc +YgE/Q1srrTlwWEYcWf/PYNgRv8MtQIa/d0phgcbeTeUpIydY31J4srV2fek8 +GXqWQsKjXoW3iYwY2QZLQNEYEbf7exl6lcCcceWfF8plxIUNsAS+jHM/PIAv +Q48SaPLYfYNfJUWPYhitULrl50nRoxhSZZzdiY+l6FEMZM/QWaG3pOhRBDtG +G+74nZGS5axHEczMXJLhvl+KHkUw+pEq9EdfKXoUwqTw1N6DfpWiRyF8fC7Z +ajNbih6FMCK3I8Z8jBQ9CkDRIyS5tY8UPQrgQIT0XrWVFD0KoHHRh+ul7RL0 ++AQNK7ZcKfgsQY9P8NAk9JbhlQQ9PsGSAeavPz2QoIcBwpinupJYCXoY4G1h +bWTlSQl6GGB45D+/NO+WoMdHCGpJ8DbbIEGPjxDlPCHLeqkEPT6C86WeoQOn +S9DjA/hYV2Y7O0jQ4wNEzU4P9tBJ0OMD/LTnSvb2nhL0+AA2g27fjGoRk4Vs +/u/hus+gkc+KxZh3PqwOW+9Tly0mvdh882Hpb8ZVOirGPN9BmpAMd4sRkyds +fm/h0sC6N/tOiDGvt/A0M80rNVBM9rL55IEyaUMN10eMebwBgTJz28QlYvLt +BfcGIqJjNUFTxTjvf3Aord7wYriYNLIFX4Noyt8vNYwY53kNMSPmm2zoISbX +2X3KhTX9RgU8bRbh/uRC2h6Ri75YhN/fVzB/892gndkiQtn9yIHTV6scikGE ++5AD3Ferfp8dIyJ/sv4v4X+FaXZJJ0TonQ0XuwfsHrBLRH5gfbOhn2/5gXM+ +IvR8AY53ps9WuYtICev3HGrawl+GTROh13P4ty2xP+MgImfZALOAl3Js+ZwI +EXpkgcCwWjv+uYhcZ/PPBBhXGrG+QoR5Z8DBtLLBWTwx0bD5/gPHngQOi7fs +yjMdzva/Nj/VVkwOsfk9hZCTTK9KfVdeT6AnjXj9b79OTzafx3DzzfxrWQPF +mEcaUL8Y23GDxeQvdv5UCP7uxaE5Q8Q470OY8JBscei8rmLnuw/KkGwbUef9 +3+ahcH2wsJYzqLMe238KjG1+tln+fVe/SfDFbcDU1Xad97P93QW6e2Ftz87+ +OGw/d6D30Y2RPdRdnx8HN488O7jJunM+9vNuQFtVqvtsUVf9WCjP9vn1fLfO ++9l6l2HGMNM320y7no+C4a6tVkVtIvIXe384NEyPPp5fJ8L/H4WwMX2c1pZ3 +5s9eB8I9m1b3sIIuDw7nzuq826vzROT/Vgjxzg== + "]]}}, {{ + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], {0., 0.}], CompressedData[" +1:eJw113tczXcYB/BzP6dzOvdzWmOTXEatrZTZbGu+mLlVKm2kCw3psghjqeaS +ata6UeiGhqSkyKSI5yu3MkUpXdi60UVF0r3U8tvj+zr//F7n13Oe5/N+zu91 +Mvxxk/16LovF+oTNYo29WBzWuyOiig1x58fP1CPtdrkTQtqEtCA22/yFkR6p +POFrKa4U0nPLXi6jBnrkRs9056gCIf3l2W7RAa0eyVxY76/JFNKlvoed1kr0 +SEL82yOkp+6vWTSTrUdC2t4WFNKUZFEJr09LNo9VO+ErpJNn5baVt2vJWLGx +ikJqvv9Q8skGLVn0ttxCIS1cWdi2tUpLLJgjpJPKNt2bV6IlBkxBIR2qzJir +vKklYqZBIQ0uS1pSm6clvW/b6xHQD7NWNWVkaQlTrl5Ap1WOqP1TtKT43tsj +oDemHSv7LlFL3k5rlyugyS02hur9WnLy7bgnBHT8jQmj/4ZqCdNelICy8z7w +Tg/UkoC35fwFVDTeYd22LVrizhwBLdlV3DrHQ0vsmYICGpIXOajjqiXMuJYC ++vhewsGHy7XEiBlYQF2aXuUlLdYSppxGQJ/a7ndfP0dL/vcQ0FKvrQmffKZF +Dz5VJUU59Bhr0YNPWUtrYvInagnTXgGfNpZ+u2KvnhY9+LRy69Uji3W16MGn +WXam7nKOFj341M81KKu8T4MefCp3SPSL79CgB586pjpRl0YNevDprMA/Qwyr +NejBp2HxC+88LdGgB59mOk8NTr2pQQ8+HX9WdsXzsgY9eHTvy4deH5/ToAeP +Puyfe6A9RYMePNrHmmR2NlGDHjyadHD2fJ/9GvTgUavwJXdNftOgx9j73aqb +bYEa9OBRsdjaNH2LBj14NGNqltjDQ4MePLolq81hqqsGPXh0hfy8bsNyDXrw +6OyjaWZHF2vQg0cDDgWA4xwNevAo4RVd0nymQQ8ujbxoqn/fWIMeXDrBeHHt +voka9ODS/KB0yTw9DXpw6X7fp4mDEg16cCl3yt7IbLYGPbh0xVeyBs8+NWHG +9eVS1nnRwYkdavTg0r1FnSmPGtTowaUfsYk6vEqNHlzqN+D1mJSo0YNLxe71 +w9031OjBpfMHpNtP56nRg0NTbX9Y4JSlRg8Orakb5ylNUaMHh46rz6m9lqBG +Dw49M2t36qZoNXpw6LbVd64ZhKrRg0PvOldOvh+gRg8OnXCkp/zXzWr04FDj +JrcHH29QoweH5lv+oKl2VpNvmAY5tLdMcCzEXo0eHLq76c+NMxap0YNDT2cv +2/PEUo0eHNpqb14RaqFGDzaVnVnvYWakRg82fWw9+kX1BDV6sOnUtbIFezRq +9GBTGpEYNl2sRg829X5wWnh/VIUebFqyZcbln3tU6MGm4c+Mkt9vU6EHm75J +2XXpap0KPdjUyfD9kTWPVOjBpvaHKzZz76nQg01nDIcrUq6r0INNv6uRVy24 +pEIPFq0zn3b7WYYKPVi0wDW2Kvi4Cj1YNKZDIZ0cp0IPFnUPsXGjESr0YNHm +sQSd96rQg0WtpWdW9/up0INFb/3G48dsVKEHi6ZWx1CTdSr0YNEzmvqoW44q +9GDRfyO8fV2WqdCDRY1y01Z3f6tCDxadPCJyCvtShR4s2pLQsdrATIX5j0Lk +lmzvC1NVmPco/NJ6OuC78e/yHYVZV/QjqhTv8hwFkwdzjngK3uU3Cs0q+7SB +ISXmNQoW3+7I3PdKifmMwM6S8jS9ZiXmMQJBcTviTjxR4vwjcPPR5l9My5Q4 +7wiseZI///IdJX7/RyD/uc3g/KtKnGcEdrOUcfeylYRpr+0NuKXWve9wWon7 +8wZ0rkcF1hxREmZd4t+AavnT/NUxSnx+voF8u7jKxn1K3Ic30OTpWOS+U4n+ +byChqDCyZasSvYehotl/iqenEn2HwXBpX2iLqxI9h+GkTW62u4MS/YbhbpPx +ycbFSvQahu61mStWz1GizzBsnRlbVD1TiR7DMCnFoNfeWIkeQ5CUHFJ910CJ +HkPg5tO+aa5WiR5DEOvlfTFHrESPIfj8b/EpY5YSPYZgme0NyyM9CvQYAg/2 +Tj9ZmwI9BqG1UW2/s06BHoOQfc76dnuFAj0GYf2+xgeOfyvQYxAmnQr0uUUV +6DEIoMg6bJqjQI9B2LFkdEncGQV6DEDZSG3QaLICPQZAnnX+y/WHFOgxADyX +Ap+iPxToMQCDFtbvmexRoMcAdJj6m0dsV6DHAKy44XK53VuBHv2Q4t+ftsRN +gR794HB01vCpHxTo0Q93y16eYVsp0KMf0nKaLqyaq0CPfqjcWSjLnqVAj37o +iDa5JDRRoEc/LBsfm+pkqECPPvA841lzVk+BHn1w6zpryYhEgR59MGHdwU4r +tgI9+iB41eFoiw45evSB1UXXQ0WVcvTog/Ys9yanAjl69EJ09I8/P8+Qo0cv +6I0rs9h2WI4evaB/kKU/vEeOHr1ws5yr2fWTHD164aNZV8aN/CBHj17wSiyZ +sGOuHD16YJ3bWVXnx3L06IEm24iWH/Xk6NEDJmGeB0pZcnx+9sD0n9icr9tk +6NED0dsqpx+vkKFHDyQZmvVzqQw9uqHgmsLNLV2GHt2QQb5xuBwrQ49usNH9 +ukC2S4Ye3ZB+bUmiq6cMPboh8oX7/bTlMvTohrLmhTadljL06IZcN1eh+XQZ +eryGJ6YPWzeqZOjxGnLbQ56eGpaix2tQHZM0VTdJ0eM1lDuefSIslaLHa0iv +cM8xuyJFj9cQxn+2xiFFih5doE0JLtoSJUWPLki9bvvPHzuk6NEFZZbs34+t +laJHF4TbDOSetZaiRxf0vl7gmPO5FD264Jh30vd5hlL0eAXFR1bG50ik6PEK +ykIC5Jk9uujxCsbFph0/VquLHq/gC10jyz+KdNHjFTi71BX6XtBFj1cg2+5g +antEFz06YbE61dHoN1306IRJkoNmw7666NEJzjE/JxWu0kWPTnDdaxES+a0u +enSCV8z3Zdaf6qJHJ8w53OUl0NdFj07wy/nrs1y2Lslg8n8JR/98pL+2TYJ5 +v4SNtwwHBRUSImLyfQlTAtqvnbgmwTxfgM8X+lazT0uIB5PfC0i8Kg+9s1+C +eb0Am/m3bG0CJOQmk08H3D59Lqp4nQTz6IC9x4unLrCRkInM/B0Q9jy+56/P +JYQZ9147HN2irv/AUEICmYLtcCo+pyhQLCFMPNPb4dG6wOjy12JSxexTG+y8 +WqWd8o+YBP8PBAV/5c72vi0mM5l9aYPzxbsfp2WJSR2zH8+hc5mkpjZOTKIZ +wOdw+/gptTRITL5m/J+D5QW1+wxvMf7eaQW/9cGZVg5iEsf4tkKOOqHI1VKM +nq3A+2BdzIaPxKSbabAF9u10bXaXi9GrBdIjfJOd+3WILRNgC9heaItbVK+D +Hi1gtDQs3fiuDno0w6eHNmZyLuigRzOoCg1/fZCogx7NoDaPeRETrIMeTWAZ +8V6NlY8OWcd4NME4dw+9oe910KMJfDNP7Dj6jQ56PIOF25dWz5qmgx7PoOn+ +AvFNuQ56PIOTDU/qFvSL0OMpfGgKZvl1IvR4Cgt1WMUfFYnQ4ymkL9XfF3Je +hB6NULaw2aIqXoQejRDRf+HPCUEi9GgES/9Pj6/0EqFHA8wr3swPtRehRwM4 +t/ATT30pQo8GGJnQMOPyJBF61EN+/aY4KhahRz3Y/RORlNclRI96qN0ZI0mp +EaJHHcxrcMgOKhCiRx34zZjmYp8uRI86yPJ/Vqk+IESPsWtub8ftHUKyksm/ +FrYb2np5uwkx73/BNyHoPfZiIVEw+f4LVxIuw29mQszzH7Ca+7fJ6HtCUsjk +9wSyiz+bvmFUgHk9gbnbzAOgSUD2Mfk8hoHmvBfCEgHmUQO+4VFLyUUB+f8B +VwMcf6tVHkkCnLcaln/p3bhrr4D0MwWrwHWlQ1aolwDnqYLhW96hgXYCco7Z +p8qx/AxmuH0hwP2phJOl3b/MNBDg9/cR+FkkTe7lCwhl9qMCfMJGhlPa+bgP +FVChsCue/5BP/Bj/cogenOZ6P4+P3g/BIShsx6JkPjFjfB+CI0/0PDOUj55l +8L5JiT/Hh09aGL9S2DKb9s1bzkevUuh0i/rEdzafJDMBPoAU2/LW3w346PEA +yu4YDUXx+eQck38J5KxfNCOojYd5F8Ox8Mkua0p5ZCKT7z1o3yi0M77Ewzzv +Qs1XuXW1STwSzeRXBF95H6jfHcTDvArBaXKGsdSDRxRMPnfA4kJfbLA1D/O4 +BfbjNgw1mfPIbmb+m6CMVXw1U5+H896AuA8dLH56wyWdzHzXYV4L+3ZkAxfn +oSDP2FOZeIdLKNP/NThSOGgTk8HFfvMhYfKvetv2j93P9JcHI+eMx8/dziUs +pp9LYBrpZt23iouf/xe8jG9KPjyHS+qYzzsP/T4K6aQp7+pnwrljXeGHRGP3 +M/XSYKnx7wY97Rz8+5Pg19h4x7J07Jq5/yhcrLaL8L347v1YcPEPD4iI5xAW +cx0MyU4Nx2N/5bz7/4OlH+o29uKQ/wCRb9wY + "]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], {0., 0.}], CompressedData[" +1:eJw12Al0zUcXAPC3P1vy9v09+76rPYLR2qnaalfEWooozWdfg0btFLVEENRO +7VruSFKCBEEkItLskgjZ9+TlmxnX/+QcJyfPvLn3N3Pnzr+Bz8KRM+USiaSN +VCJhPxKZ5MtTg/pPs26aZq1Lskfcqrvxg5oOW30l1VK7Lok54duzVoya1jk0 ++JunVS4SWtR80o4QNX15M+WYf66LXByQtNx4UU0Pvlop6ZHiIgf/4I+a+uSZ +puRFu8jGD3xANW3ieenu6XAXWcRGO+GrphktBzp/+NtF2GBsRDW9LMZxkYH8 +nwFq6jtj+ZvHQS7SUTxq2nWdodu6PS5STwyoppVHzu/ruslFaokJqim906/o +41IXKebTK1JR/5iEUcHzXEQMl6Sigwv/99eEH1wkMoI/KmrQsWeEi/BoR9xS +0eg2Zxc+/MZFgnm4J1Q0iIW7qouLiOntUFGf2fGtO7VwkRV8uOUq2tj/l9+y +HC4ySzwqmhHkmRXk6SIjxYAqeuHu6YFjpS4iwu2pokviyGmPQidpIQJWUa+S +N8qwdCcRwxlVtNKwmEXsJJ89VDSsfZ3Q9hFO9FDSgG9PNnh/z4keSjp0bq+1 +R644iZheiJJqNvOAneihpK/55/Y70UNJA2nNwzTAiR5K6vPueLnfSid6KGnr +8h7j2yx0ooeSppujb6ZMc6KHkl7suMB8cLQTPZR0yXD1L8MHONFDSb3nB71U +eTnRQ0mrArp/dbe1Ez0UNOTUi52L6znRQ0E3hc7LaaF3ooeCDktUsB8neiio +sYoBlzjQQ0GjbV1rf5vlQA8FDezy/Ef5Owd6KKjPqB/Dbz9zoIeCNvWVNfMN +caCHgmZtPbSx6XUHeijopTOdUuNPO9BDQZc8iPx6z0EHeihot5RZxwZtc6CH +grqr2bPGgR5yGub844cbPzvQQ079Wbg/zXSgh5wOHfPE0WicAz3k1Mh5BzvQ +Q06jd1TF7ujpQA85PcyWc//2DiLC9ZXTaY/a7ats6EAPOW2WHl74l8mBHnKa +LWMR13Cgh5xerVdxpV6FHT3kdIn3Xu3rj3b0kFNvprs10Y4eMur+hQX80o4e +Mhq+e0rrsn/t6CGjWy6Vbrl0y44eMjoiYlfmzHN29JBRcybbwIF29JDROGUY +E7ajh4wGNZysDNhgRw8Znd67eHpvPzt6yGhLPo05dtJLTFBGc5c2b3B+oh09 +ZPTK7/fX+Ayzo4eM+v01IcHax44eMur1rMD7WUc7ekipLJsD29FDSh/WaFre +w2ZHDynd3gTG5de2o4eUDv963M0/3Tb0kFLzFF6wbOghpXErtiwxpdrQQ0qD +DjR6+eS1DT2kdMb1fzqsf2RDDylt+eL7nd3+saGHlOZ9Ys9FG3pI6bXav357 +8pgNPaR0OQ93rw09JJT0u1NLv9mGHhIq5Qt6mQ09JDR8dfbD1T/Z0ENCd7Bo +O0+xoYeEjhJ/sKGHhFrZ9j3W14YeEpqQxyLuakMPCT3Oy1VLG3pI6MxWG6rD +nDb0kNBWrDyv0NjQQ0JzecAyG3pI6NV1wxwZhVb0kNCVge+XBb63Yv6rodff +a2NHx1kx39WgiGUbONKK+a0Gtpp/vw9WzGc1bNUNZRXaivmrhlFt00a2PWnF +fFWDdQg7kPZbMT9uiJ9t0R7aYsV8uOGo/+UFI1ZZMX43zDk2KFLta8V43dD2 +XnKrez5W3P9u+MSBv7diPG64VmJkK9pKxPQ+VMFS/gcvK66fKiAdBpza38ZK +xHL5owp4tRpW34r1swoez102XWGw4nqogh2b9SF3lFb0r4KRwefqLyq1oHcl +OO73XdPsgwV9KyH+HX8s6FkJweV+3nufW9CvEuawcAeHWtCrEtp2OlMmuWFB +n0rIEwvagh6VcGv+2xvzD1nQowKWsuXceLsFPSqg72mPJXFrLehRAQq+fRdb +0KMCwhN7dxgwy4IeFbCLlauqcRb0qIDR9p8/XR1iQY9ysLPyPLeXBT3KIXEU +C7iDBT3K4SSfRiMLepTD3G2v52wzW9CjHFrz47emBT3KoeAB28AVZvQog2us +3bj8yYweZcC7jVlJZvQog69dr/q4XpnRowzUXuxAemBGjzKIHKOqDrhtRo8y +2LX46GRy3owepTCa7d7iQDN6lILzQpT9wi4zepRC0iMG7G9Gj1I4ni6Ptf3P +jB6lMEN+hJ1IZvQohbb1u/y+aZIZPUoh35sVrO/M6FECN8bPGVnQx4weJbDa +T3rlTCczepQAO4w0U5uZ0aME1JfZAWw3o0cJPOXTrGNGjxLYnsl3sAk9ioGH +2z3fhB7FULfRgYycVBN6FEMS4z0VY0KPYgie9PjkpMcm9CiGeXw53zWhRzG0 +31fp8+iSCT2KoJht3zXHTehRBLee8YhN6FEEK1m5yt5swvpZBP1rTnt3fLkJ +PYqAl+fx803oUQRPRMAm9CiEnfw4GmlCj0IYs/LfsSv7mdCjEFzs+P2qmwk9 +CiH5Ot/AJvQoBL6aj7pM6FEI83NavPhea0KPQuDtVR25CT0K4PP3GtGjAG7z +djLDiB4FsNZn+9B2b43oUQBs955LizSiRwHUPswbLCN6FEDELQZ81Yge+bA3 +Ov9BjVNG9MiHCfm/NYEDRvTIB6emCesojeiRD4mtWMFabUSPfDg3cGyfZF8j +euTD3Jm5Rw9MN6JHHnRcH+AeNsaIHnlQGsgO4EFG9MiDv/nTw4geebAhlu3g +tkb0yIOBLNzmDYzokQfsMIpJMBjRIxeiOK/KiB65sGfI7b1DygzokQsT2HKW +ZhvQIxca8nESDOiRC3z7LogyoEcunLnn0jQJM6BHLviycvX2hoGcF/nPgXal +30XsOmPAfOeAKM+HDaSGyG8OsNM3wL3dgPn8BOvZcXRtnYHMEfn7BIPmXes/ +b4kB8/UJ+PHbYLaBhIn8fITIYLaBxxswHx9hL2s3tg81kPoi/o8wKcF6v29v +AxHhRmRDXd5edTCQlWLAbEi3sAOpsYGI9DTPhrOsnZxtMZBYsZ4+gO+IVT3q +1jIQ/89AwNvnV5V60kmslw9QxhusHD1JFOsjC/h1oU+ynuwUgFmwPizpeskr +PfEW/lkwiKfloR77nUyo7WYXhjt6ckD4ZsIrOy9YevTMBN5NRh3Vk0IxwQyY +OPq/7Zt369ErA+ovWvqx50Y9GS4SmAHp2/gBrEePDDh/lj1z9ejxHuaz6jxt +sh493kMXHu5wPXq8hzKJH2so9eiRDpzXv7OezBAe6bDe688NXs316JEOg1m0 +uXY9eqRBHXFB0qNHGvDtO1miR480OHChjttQoEOPVJjIy1WaDj1SocF73nHo +0CMV0lh57vpEhx4pcJ4HfFeHHimwgH/PZR16pEDnCSfYjw49kqGEHb/afTr0 +SAa6h23gX3XokQwbebuxQoceSTAkkldoHXokgYa1V1lTdeiRBC9U7EAapUOP +RNjP2skx/XXokQiTyE8tPbrr0CMRGrH2ObSVDj0SgXdXy+rqyDiR///gHAfW +6TDfCeB79Tlb0TqiFflNgE7senSkWIv5fAeV/MKQqSXhIn/xwKtVzXgt5ise +NjXtXI8+1ZJfRX7ewhB2/fW7r8V8xIFmKrsAX9OSzwUuDqL5AXxKi/G+gf3i +Xy0pFQPGwtQbX5V+t1WL8cRCYxauao2WfL7nx0B2DmsoF2lx/cQA5108Q4v7 +9zUsarH/5xZjtYSK9RENXmw5/zdIi+shGqp82AXJW0tEn7b8FYTw7dtOi94v +YdPhimxZQy1pL3xfwlBWrm4btej5AjSv2YVfrSUZwi8KzqbxDaBBryjowLJx +642GBIkEPof743jB1qDHcxi8u/Gg3cEaclnk/yk8e8JPXA3mOxImML55CzWk +vshvBGSKhliD+XwMvmz79fPSkJ0ib4+g5Aq/wGkwX+Eg1qlSQ7QiPw/Bkx8P +WZ6Yj3/hADv+Sp95krUi/jCox473Gdc9Md5QOMeqQdRBT5Ir4rsP3Xl7ttYT +46EQwg+wmWw8Mf970J+/7xniifP9B8T7nfbs82J+t0Fcj0yeRCLmcxPE+5sK +D/z+a8Cvt48TPUii+L4r4ObvZx544PgXQbyPOcc+L8Y7A1r+/mXXl/8fDPz1 +0io/9rv4fCA05OFO/PL3vXBZFEgPIhG/+0NX/v6kqceX+4ckVBzoHuT/mVbd +TQ== + "]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]]}], {0., 0.}], CompressedData[" +1:eJw113dcU2cXB/CEhARRdhaBrJuoYKvWjXU9YsUtqKC+tqKlakWoheKooOJA +caHIW5UhiHsBLygo4DiPKK1goSoiKkMEWSKywl4v3h6fT/7J55KTc37fc+8n +aDx+XbyWx+FwhnM5nP4Xx4Dz5RjR9/KdDasP6cjHRanKfbVC6r8pkNEH6kjB +eZ8pxgVCSof9/kvwZh152GL3w7EMIXW+FvVM7qUjCbPe+YsShDTqo8I5YbWO +REZ8PkKauW1M5fSlOrKv9nNBIQ3eYHEqf56O+PZXO+8jpHYb6n70nK4j/cX6 +KwqpZ2qPU894HZn9udwsIQ34apvT8a91ZAx7hHTE6FOrBzM6omILCumd/GMn +0qQ6Ysw2KKSiu1EVC0x0pPVzey0C2mSvdykz0BG23DsBbebnFWxp15Kcvz8f +AX2S/5v/wE9a8nnaRakCejLbdGJsuZZc+DzueQHtSi2zGvdaS9j2jgnoPvVX +A7NztSTgczl/AeUMH6xa9UhL1rFHQJ+nmrro07RkMVtQQD2ch8Qc/J+WsONO +EdCwkdcHqC5qiT07sICOXlgclhypJWw5kYD+d3nPxLmhWvKvh4BKb8/ve7tP +ix6GNOuYSfnmAC16GFLTrD0VA321hG0vw5C6DWoQnFunRQ9DWvg4YpbDD1r0 +MKTrx2dezl2kRQ9DOm556tC1s7ToYUj/6Uv7q2uyFj0MqcFTiwNho7XoYUiz +pxl52ttp0cOQ/h5duYEqtOhhSBMt2kKWWWnRw5CePBf0/JORFj34tGd8ocP+ +XgY9+PR6xKwHCj2DHnwau13qnVLDoAefbtseMXHBWwY9+PSZVjGs4gWDHnx6 +51PTlB3ZDHrwqftC781iyqAHn+6IK3wan8KgB58O+PUPF6frDHrwqaT7g74k +lkEPPl15b+z9rScZ9OBTZ93jOPMjDHrwaVF8N726m0EPHj1SOazLcSuDHjzq +tTHu+yJvBj141LGnsGyzB4MePPp8nfi42XIGPXi0KSZl3dUFDHrwqPK+fM2M +GQxhx/Xh0TTDCweLHRj04NGo90kFW0cw6MGjN7ouLrTUMejBo2eY8k9x1gx6 +8Ki/d07qLDMGPXg04evsuDI+gx4G9EXXtCc7OjXoYUCz754UWTdo0MOApp2d +cDC5QoMeBnTFqBB7l0INehjQIfN5rbVPNejRX2+UsD74Tw16GFC6XyjW3dWg +hwEN/M+m9TRJgx4GNNoOan64rCFT2QYNqHP1ioiO0xr0MKAbje5uPRmmQQ8D +us5/+b4xBzToYUDdbl/OeLpDgx5cOu9P5puNfhr04NIYx+9yB3pq0KP/useB +6KvuGvTg0svd3jGzXDXowaW9ob7PKuZo0INL1yyQTgiapkEPLr0tfvcPM06D +HlwafWjJ6QfDNOjBpY/MW06vVmvQg0vnvlrwvE+sQQ8ulbyvmnxmoAY9uPS4 +hXPxVK4GPTh0g9oiuaRVjR4c6pd+78HOj2r04NB7AZUCVZkaPTg0u1MZBAVq +9ODQ+qfdE1fnqNGDQ/PPSe25D9XowaGT7QcsPpeqRg8OzZj4S8qMBDV6cPrv +93dLKs6r0YND0yTCEcERavTgUJ1v4Hf2x9TowaHXgupPPQlSoweHBjj22m30 +V2P+fXCs0bXd3EeNeffBK4czguS1asy3D7zsD7su+16NefbBsDlZZZ0uasyv +DwKjB92IcVJjXn0w/JbxQ8fJX/LphZjUAEnVqC959IKtlzz+8NAv8/dCCLkQ +/I3iy7y9YL/m9aV8SzXe/71wInP7wACjL/P0wpy5V7ynd6sI215tDxQTF5eQ +KhXuTw8Y7zzw8PVzFWHXJaIHBvTV/TXkvgqfnz2QlKVdtemqCvehB2KFeYcy +/lChfw9kaa7Pt9ilQu9uuFr046XVXir07QazzTcjEpeq0LMbFtzzsOM6qtCv +G6ZNmui6eLgKvbohzkmouiBToU83+NhdONTKU6FHN8i//RQ+p16JHl3wk+DJ +vOg3SvToAu6GoRcbM5Xo0QVeKW2XnJKU6NEFsn8mLDl9WokeXXByae31pmAl +enTBgMeKm3P8lOjRCdmxZRvOuivRoxPWB7nld8xRokcnnPSI1C8ep0SPTrgR +XZwdp1aiRydsGO26QjhIiR6dEPp20kWPNgV6dMBPzoXx98sU6NEBc6bv2WKT +q0CPDlicfJC7LU2BHh1QZOm6qOCCAj06oNx9wfrxoQr06IDhq2pnnwxQoEc7 +HMqJb2ldp0CPdkjfp/RdvliBHu2wO+XZvfQpCvRohwiTdSUKewV69F9vDsrf +LVKgRztsSS67WNlnix7tMDNt6uL5tbbo0Qbkzk/FN17aokcbWHUOnSvPsEWP +Nqj67ZeoPfG26NEGy2XMi9pwW/Rog/iBpM0tyBY92oBbkCN88KsterRC6ZUS +o+Hf26JHK+wODeuJcLJFj1bIuCOpEY62RY9WKEq5mLtFYYserRB4OTip0sgW +PVphTLjliWV6G/RogfTEa9uz3tqgRwsU78zwmvzEBj1aIOTbwrWJt2zw+dkC +gwbt2zj4nA16tMDtJasORoXYoEd/vSZZuuU2G/TQw6YTPvzDa2zQQw/tvWO9 ++S426KEH26UzW3ZOskEPPez1O36+c4gNeujhyCh5wFZLG/TQw3f3GgNbeuTo +oYcH1ZNubaqRo0czTAscwbS8kKNHMwyKtHi8hcrRoxm2tU2L67guR49myF48 +NG/HKTl6NEPhvdnTeXvl6NEMVV0OXQc3ytGjCYxKYg0tV8jRowmKY6esjZop +R48mKJn3TjlklBw9miDewm/CDVs5ejTBohv1N6cZydGjCfxKPCNym63RoxEq +o4zr3N9ao0cjfLhukdyQbY0ejfB9U37z3lvW6NEIriWZSbJz1ujRCKYvfm5O +CLFGj0aoPrXivtM2a/RogNPpbrLSNdbo0QBXBMOEAS7W6NEAUZ8ehEonW6NH +A4R3a+6kDLVGjwY44eh5xM3KGj0a4OKTZ8ZtvTL0aIAik6TJkR9kJI7Nvx5E +K3+3m/ZShnnXg9Y95UXFAxkxYvOthzv+lrOPxsswz0/ws9uygw4RMrKeze8T +aKd6nnkfJMO8PkHqpXnHw3xk5BGbTx2sOKVe5/iDDPOogwbGfrB+loyo2fnr +oPlNZv7lMTLCjvv3R6hz3Bq4UiUj29mCH2HMjBJ78UAZYeOx+wiekXeLclul +5BW7T7UwbWHLmUNlUhL0LxD4yEMCZudKyVh2X2phUsm1rUbpUlLK7scHSBCG +n86+KCWhLOAH6OimTUePS8lk1v8DlO5J2eO2Q4q/d2pgidreTekpJeGsbw08 +3Nn8W42rFD1rIPlP84pbREr0bIPVYN1+Nnn/11L0qob5U+s+LJdJiQsbYDXU +TnU/PpwvRY9qaPPYn8RvkKBHFTjIFW4lhRL0qIKHUs7+9L8k6FEFJHjMwoib +EvSohMBvy277n5GQNaxHJczPXZnjfliCHpUw9k9lxMytEvSoABLzaPDInyTo +UQGvnol32jhL0KMCxhb0xRlPkqDHe5CYnrrXPUSCHu8h5KzkTqOlBD3eQ+uK +0sSaXjF6lIN+7fZr7z+I0aMcMngRN8teitGjHFYON35VniFGjzKIYrK01Qli +9CiD1xXN5+ojxehRBqPO/f1j534xeryDA12p3kZ+YvR4Bxecpj+1XiVGj3fg +dMUsYsQ8MXqUgo91fZ7TBDF6lEKMc3aIh1aMHqWwLPha3m4zMXqUgnzkrRsX +ukRkOZv/W4j3HenwpEqEeZeAd/Rvvi15ImLO5lsC7j/rvbRUhHkWAxWScW5x +IvKYza8Izo1oeXMoXIR5FUFWbuaGR0EicoDNpxBs7vo1cX1FmMcbMFDkBs5Y +KSL/PuDewJnrCeqDc0Q472s4mtla9nyciLSzBV+BxewjL9SMCOd5BdfHL+X5 +mYpIIrtPBeA5bOKOrE4r3J8CeBhs5aKrssL79yW4bks7uDfPilB2P/IhMr5h +QhVY4T7kA+el13rnOCvyO+v/AkIrMu3uhluhdx5cNtmxf/g+K/IN65sHQ7fW +HT3va4Wez2HS7XnOSncrUs36PYOKnpgX0XOt0OsZZPWkf8VMsCKxbIBPwXFF +8UrDS5bo8RSumvq/G+NsSRLZ/HOhp9X02JCBlph3DjzymTq64x8Lombz/Rui +zPN2Loy0wDyzgSmsL9673oKEsvllQUD1iLrLEy0wr8dgEOA4R21iQczZfP4C +v6+DBXvLzDGPTCjytv7f3jRzsoud/xGMTZn6vvq4Oc77EHKzc2bu9zInDex8 +DyDqIu+Sg5M5zkNBe2/ksXJNfz22//uQqI/66m23GfZ7F1yNTy4Lu21GYtn+ +0sB9xrNQ8DMjHLaf2/CL39mwuaPM8PuT4UxYfKu8wZSUst+XBCbDnu60STTF ++gmwa0Ve8ERfU7KLrXcVhk1wi1wzxhQ/fwEmb5hnebTVhOxi/z4Gdly5X3Al +3QSv/wHhLjm6q4EmhMO+D4LBBcZLg2aafPn/g/Pwm0H9LxPyf29a8L4= + "]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], { + 0., 0.}], CompressedData[" +1:eJw11nlczPkfB/CZaZppy1VzNjXXdwbFYt03H7HllghriW2xW3Lk2JbEsimx +uX6uUJScJVeRVO8PypGtjSQrUqNS0j0dOn/ju+8+j/75Pvp+3/N+v57v+T5G +67nObaUZh8MZwOVwTH8cHqfrWNBixfaa5Xv15PPcRNXuCiHdtmkHY9yhJ3nn +1o+3zBNS2u/3NcGb9eRhg8OSAw+E1O3KqeeK1XoS51K0VRwnpBGflXPiluvJ +ybCvR0gfbRlaOmmBnuyu+FpQSPd5Wx/PnaEnvqZq59YLaX/vyp+8JumJqZip +opB6J7Y7t4/Qk6lfy7kI6c7+W5wPfasnQ9kjpIOGHF/em9ETNVtQSFNzDxy9 +K9MTS7ZBIZUknyqZ1V1PGr+21yCgRkejq4GnJ2y5IgGt5+fk/dasI5l/fz0C +mpW7YatVlY58nXZuooCeyOgx+uwHHYn+Ou45AW1LNIiG/6sjbHsHBDRI098q +I0tH/L+W2yqgvAG91cvSdGQVewT0VWIPV+NdHXFjCwroyjl9IkKu6Qg77nhT +/UEx36jP64gjO7CADpn97nD8SR1hy4kF9Oii9tHTD+rIfx4Can9nZuf73Tr0 +MKcZB7p/2OyvQw9zavN0V4mVr46w7T0wp+7dagRRq3ToYU7fPQlzGbVEhx7m +1HtE+sWsuTr0MKcjFyX2XemiQw9zmtN593HrOB16mFNetvWew0N06GFOMyda +eDk66NDDnAaEl3pTpQ49zOkN66bQhSIdepjTsKjAF1UWOvTg0/YR+aOCOhj0 +4NPYMJf7SiODHnwauU3mk1DOoAefbtkWNnrWewY9+PSFTtmv5CWDHnyaWlU3 +PiCDQQ8+9Zzts1lCGfTg04DY/OyrCQx68Gm3dUdcnWMY9OBTadsnY8FZBj34 +dFnKsFS/Ywx68Kmr/klsr78Y9ODT91fb6OWdDHqY0dDSfq1Ofgx6mFGftbE/ +vvVh0MOMTmnPN2z2ZNDDjL5YJTnUcxGDHmbUGJGw6vIsBj3MqDZVsWLyZIaw +4643o3fNo0PejWLQw4yGF9/I8xvIoIcZvdV6fraNnkEPM3qW+VAVa8ughxn1 +98lMdOnJoIcZvfZtRqyBz6AHj+a1TnwW0KJFDx59lnxMbFujRQ8evRc5MiS+ +RIsePLp0cKija74WPXjUYaZZY0W2Fj14NHewsDr4kRY9ePR+kFCiT9aiB4/u +/GHTr/SGFj14NMIBypdc1JIJbIM8OrdscdiX01r04NF1Fsl+xw5r0YNHf9m6 +aPfQPVr04NEf7lx8kB2gRQ8unf2I+W7tRi16cOlZpylZVl5a9ODSGZ57wi97 +aNGDSy+1+US4zNeiB5dyDvk+L5mmRQ8uXTlLNjJwohY9uDRJUvQPM1yLHlwa +uXfe6fv9tOjBpY97NZxertGiB5dOfz3rRadEix5cKi/+OO6MlRY9uPSw9Zx3 +E7ha9OBQb411fEGjBj04dGNSyv3tnzXowaGp/qUCtUGDHhya2aIKhDwNenBo +dXbb6OWZGvTg0FdRMkfuQw16cOh4x2/cohI16MGhaaPXJEyO06AHhwqyi+aV +nNOgB4cmSYUDg8M06MGhfX13THE8oEEPDo0JrD7+LFCDHhwa4NThsHarBvPv +hP/Vzm/utV6DeXfC61FnBPErNZhvJ6x23Dd/4Y8azLMTBk57amhx1WB+nbAr +vNvNCGcN5tUJ3922fOg0riufDjiT6C/9OLgrjw5QrlZc3de3a/4OOECig79T +ds3bAf1W/Hsh10aD3/8OOJa+zcrfomueDpg+/ZLPpDY1YduraAcDcXUN/ajG +/WmH7tv3PPz3hZqw6xLWDpadlY/7pKrx/dkOd57qlm26rMZ9aIcLwpy9D46o +0b8dsrQxM63/UKN3G1x7+9OF5avV6NsG1ptvhV1foEbPNpiX4unAdVKjXxs4 +jR09322AGr3aINZZqI6Wq9GnDdY7RO9tNFOjRxuoxlSdmFatQo9WWCF4NiP8 +jQo9WoHn3fd8bboKPVrBJ6HpgvMNFXq0gt0/I+edPq1Cj1Y4tqAipi5YhR6t +YPVEeWvaRhV6tEDmWYN3pIcKPVrAK9A998s0FXq0wDHPk0a34Sr0aIGk8HcZ +sRoVerSAz5D5i4XdVOjRAkfejz3v2aREjy/gNSf/aqpBiR5fYPqkXb/ZZSnR +4wvMiw/hbrmrRI8vUGwzf25etBI9TNces34dcVCJHl9g2LKKqcf8lejRDH9l +Xm1oXKVEj2ZI2a3yXeSmRI9m2JnwPCVpvBI9miGs+6oCpaMSPZphV31g7k6x +Ej2a4fd4w/nSTnv0aIbpdye4zaywR48mmHLv53c3X9mjRxNIW/pOVzywR48m +qNiw5tSuq/bo0QQ/ypmXFSfs0aMJ4qxIk3ugPXo0gSAvU3h/nT16NELhpQKL +AT/ao0cj7D54uD3M2R49GuHRPWm5cIg9ejRCQcL5rN+U9ujRCIEXg2+UWtij +RyOMPmFzdKHRDj0aIPn6lW1P39uhRwMUbH+wetwzO/RogNAx+Suv37bD92cD +iLvtXts7yg49TM/PWxZyKtQOPRoA6uRJNlvs0MMIfkfX8/etsEMPI3A6h/nw +Xe3Qwwj2C75v2D7WDj2M8OfGQ+da+tihhxH2D1b4+9nYoYcRXFJqdzS0K9DD +CE/Kxt7eVK5Aj3qYsmMg0/BSgR71YH3S+slvVIEe9bC1aWLslxgFetRDhlvf +nIDjCvSoh/yUqZPM/lSgRz2UtY5qDVmrQI86sCw4a26zWIEedWA4O37lqe8V +6FEH72cUqfoMVqBHHcRZbxx5016BHnXww83qWxMtFOhRB5sLvMKy6m3RoxbK +T1lWery3RY9a+BxjHV+TYYsetbCkLrf+z9u26FEL8wvSb8ijbNGjFnq9/KU+ +LtQWPUz1ji9Odd5iix41EJ7kLi9cYYseNXBZ0E/o72qLHjVwuur+Qdk4W/So +gbA27b2EvrboYbp28vrLXWSLHqbnnz23bOqQo0cNFHa/Me7kJzmJZfOvBunS +3x0mvpJj3tXg6JHwsuS+nFiw+VZDylabqfuvyjHPKvB2XxgyKkxOfmXzq4I+ +E7zOFAfKMa8qSLow49Dh9XKSxuZTCcuOa1Y5LZFjHpVQyzj2NrrIiYadvxKM +b9JzLw6VE3bcvz9DtZPfjqVqOdnGFvwMQycXOEqs5ISNx+EzrD6Z/DarUUZe +s/tUAc6zG87sNchI4H9AsFER6j81S0aGsftSAeMKrvhZJMlIIbsfnyBOeOJ0 +xnkZOcgCfoL2Nlq3/5CMjGP9P4FhV8Iu9wAZ/t4ph4UaR3eVl4ycYH3L4cn2 ++g3l82XoWQ6Jj3qV3CYyYmQbLANFc2R80Lcy9CqDuRMqPy2Sy4grG2AZfJ7g +cWgAX4YeZfDFM+gGv0aKHh9hjELpXpAvRY+PkCbjBCU9lqLHRyDBQ2eH3ZKi +RynsGmO4s/WMlKxgPUphVtbSTI99UvQohTGPVGHf+0nRowSmRKT1HvSzFD1K +oOi5ZLvdHCl6lMCIvM5Yy7FS9CgGRY/jKW19pOhRDPsjpfdqbaToUQzNiwuv +l3dI0OMDNK3cdqX4kwQ9PsBDs7BbhlcS9PgASwdYvv7wQIIeBghnnurK4iTo +YYC3JfVR1Scl6GGA4VF//9QSJEGPIghpTfSx2ChBjyKIdp6UbbtMgh5F4Hyp +Z9jAGRL0KARf2+oc55ES9CiE6DkZoZ46CXoUwg/BV3J29pSgRyHYDbp9M7pV +TBax+b+H676DRj37KMa8C2BN+Abfhhwx6cXmWwDLfjGu1lEx5vkO0oVkuHus +mDxh83sLlwY2vNl7Qox5vYWnWeneaYFisofNJx+UyRvruL5izOMNCJRZOyYv +FZP/XnBvIDImThMyTYzz/gsH0xsNL4aLSTNb8DWIpv71UsOIcZ7XEDtigdnG +HmJynd2nPFjbb3TA0xYR7k8epAeLXPUfRfj9fQULttwN+TNHRCi7H7lw+mrN +yI8gwn3IBe6r1b/OiRWR31n/l/C/knSH5BMi9M6Bi90DggbsFpHvWN8c6OdX +uf+crwg9X8C4OzPmqDxEpIz1ew517REvw6eL0Os5/NOe1J8ZKSJn2QCzgZd6 +dMXcSBF6ZIPAsEY78bmIXGfzzwKYUB65oUqEeWfCgfSKwdk8MdGw+f4NR58E +Dkuw7sozA872v7YgzV5MDrL5PYXjJ5le1fquvJ5ATxr5+p9+Jk82n8dw882C +a9kDxZhHOtCtsfYTBovJH+z8aRD6zYuDc4eIcd6HMOkh2TbSdF3DzncflMdz +7ESm+/+bh8L1wcJ6ziBTPbb/VBjf8myL/NuufpPhs/uAaWscTPez/d0FGrSo +vqepPw7bzx3ofWRTVA911+fHw83Dzw5stjXNx37eDWivSfOYI+qqHweVOb4/ +n+9mup+tdxlmDjN/s8O86/loGO7WZlPaLiJ/sPdHQNOMmGMFDSL8/xEIH9vH +aV2lKX/2OhDu2bV5hBd3eXA4d9bk316TLyL/B4Mo8dA= + "]]}}, {{ + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, + 0.33333333333333337`]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}}, {{ + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, + 0.33333333333333337`]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}}}, {{}, {}}}, {{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + Line[CompressedData[" +1:eJw11wlUE9caB/BJSABpK4qIiAgVi4ACVYu4PPS7PhY3lir6pEhFURCpIio+ +NyxUhaLWikWt4ArF5dmCiNqyKAE3QMEFkE1ECGFNICsJ2R8wH/fknJzJTO69 +3//3ZU5mWtiuNeFMiqJcGBQ1/D46LJM2D72Y5LB5zrK2Q8chfxJDvtl79Pgc +TLF6GezoxCT5Non81flXoWerPqrx89HzWWAV7vXtPhGDpKcNj/9Bb8aThZoa +Bl6fA8kNfiHR/zCIYPXwJ/dA+XOS5FU6A7//AOaXqzwm/sggJvV/xCw2+QcU +y7yPrtw8Ol8B+ATMNN3hxSBOIWeeDDg+gpc38twPOYzOXwzCJV5r9pkwSNbQ +t+v/KAF+Sn7p930UrlcKD+Ni+N+8pcg3I+MpxN0P9xjMo3D9Z5CQtNDxz/MU +eTrgOLTCc7hlvtTJ7wCF+ymD6a9+LWkJpsiakQXLwXKect+mxRTurwLcLW0b +qm0p0nZoeMKX8Hl7ZJw7k8L9VoINf6xuUoUedg9vL6YKwjJb2bdP64He/2tI +SsrZYrNGD7TGWwhauupAnIUe6Hregmtoy72nTTpYPrLAO1jLqTg1cFUHdH3v +YFzfyV8nbNHB8GohZ6qh9eHFAFsHHdD11sCPQYt3W/G1MFJOfQ3E3t+ZaXhX +C3T9tWDYcuVqxx4t2A5vx+Y9nLye6lLgrgU6j/fQ6T1/+jGVBrZFDI86GPTZ +EupdrAE6n3pIXne/inFUA8OzmefUQ8LqwPBCbw3QeTWA5J/XjrvHaEA+PN1A +A4imttk7VqmBzq8R6vyX72tLUcOSkQmbIC/r4qJra9VA59kEIQvNs7ZYqmFk +e4kfwOZUYu/sZhXQ+TbDL+42q8dcV0FV5fBohhkRwfbCLSrM+yOo0nuKeQ4q +mDiywRaIi70SL+ArMf8WuDg1tMY4Vwkj04V8gndjnGd7xCrRoxWe51hZnFig +xHpawbF3m6lEM4g+rVBacTr3YOkg1tcK66K3XrRLGkSvNvB55RcjXDmI9bZB +tMlOAdd0EP3aoCii95W+VoH1c4Ef7NW4PF2Bnlz4dezd3pJQBebBhZOao9wo +ewX6tsPvn4ruruDLMZ92eGZ0wn/TPTl6t8OYdaLye/vlmBcPbL5OnL90iRz9 +eVAmd3syni3H/HjATZmZMaNyAPuhA441vZx6LHUA8+wAf+PK1JkbBrA/OiDZ +NWrPl9MHMN9OcI0tWhzJl2G/dMLB0hkp7AcyzLsTfrOgrDVxMuyfLqie6p8d +4CPD/LvAy/jxLNY4GfZTF+T4Pb08tUmKHt2w67TW/nqWFD264d6JMtOUXVL0 +6IbQCZPLxYuk6NENTiU5HRWGUvTogeKYn2dNrZGgRw8ozEp/EV2ToEcP2N5t +nb1ipwQ9euFVaeoB539JIGXEoxfa3dTM62Mk6NELpmNT7/+vQYwefOAvqsoP +uC1GDz6cbT+YevGAGD34cCbR2vbUCjF6CGAZFXjJdYoYPQSQLT/098k+EXoI +IOnty7RbJSL06INJ2TaK0+dE6NEHz78rs1y2XYQefXD+j0Jp8xIRevSDfk66 +R/BEEXr0w6cWT+p8oxA9+sHxUnh87EkhegihY06hffRiIXoI4XmG+dVrkn70 +EMJ3d3budLrTjx4iOB/tuvXrrf1Yjwh+Vzo7NH7Zjz4iiN/8rG5Nax/WJ4Kw +2CvNVZl96CWCdRur+D9F9mG9Iti8dr1nzpw+9BNB5bTfVlzSCbB+MfSnpl2/ +/EaAnmKIS3/EnXBDgHmIYfu5yX6x8QL0FcPCKSufLQsVYD5i8M9a0DLPW4De +YmimLpmMnSvAvCQwddnhx3UzBOgvgSrBG3bHVwLMTwLL1v9oZ+AqwN+nBL6Z +WPH0vpcA85RAzD7TQ/d2CLA/JFD5kRen/VOA+Uphyu3je0980Yf9IoUvXSyr +7e/0Yd5Dx0GLHlrw+rF/pKA0HprbXIT5S6HwkVXQgQIh9pMUJoqNl8SuEKKH +DHhNbAhtHPWQga99lKfb9lEPGRi8f2jaPzjqIYP0yPE+PyePegz9bt/YRaom +jXrIIGjuosaltwToIYMTtY2t691HPQbAIfpStvtzPnoMwOqQ2KCGQD56DMDX +5UHd7txe9BiA8FSP//jG9KLHAEgCd5010/WgxwBssAg4fuxUD3rIgd2+anKa +ZQ96yMEvwI343ehGDzl0XyyVps3pRg85OFgFwcHHXeghh3Ai9OpY3oUectD9 +bebZUNOJHgrY5NKX7ruxEz0UsNLSt86juwM9FFA84VT2H7s70EMB72es+yJO +xUMPBUjtZ1qXHuWhhwIy310Yusfz0GMQXliYTos/244eg5CmC84TTmpHj0H4 +a3vynEdXuOgxCL6n1jm32XHRYxD03ibHNtxqQ49B+NCZH+U4qw09BuFPz7Zo +75xW9FBCZvPePbmzW9FDCU3/jdr0Zusn9FCC6KbxvpqIFvRQQo2l2UDUto/o +oYTcK1nfn4toRg8l5BQ1Vvtv/YAeKkh+r7ZK39SEHioIWPHh4n83NKKHCriM +jd4daxvwfqkCZ+/w212+9eihgrivZ7yL96xDj6Hza8f75y54jx5D/wsOhH8V +51yLHmpYG5hc1mlTgx5qOFO9ZJzMtBo91OByrfmb2/q36KGGOGvGftPmN+ih +hiNqrtz17yr00ID++HcTC06/Qg8NWCu278sPq0APDbgkbLBdMK8MPTQwvuDy +bk/2c/TQgGHgNrPO6ifooYEOnQt31tUS9NBAZmHBx6WvH6GHFu7VcN9kbshH +Dy04p9bPSOXdRw8tpARuGbu+Ogc9tNBwpMx9TM0N9NCC+6wfTJovpKGHFigT +nwkPPh5BDx08WOcclbcrkUN76IBcyjO5IL/MoT10UMhrlLhl3uLQHjpYXxV+ +YXFkLof20MGx+rNnFcyHHNpDB40eJ4/MySjg0B56cDRWVdX+u5hDe+ihvvNk +TsfeUg7toYeE0on5+rKnHNpDD1dacz5mT33BoT304LrLP68jtpxDe+ihslDB +vFL1koOPH+TGmdP1FQ5VHLoeiqQc37g37NgbDu1DkUf++XdcRW+xPoqcO7/i +cpBtNYf2okj87asnZgbUcEbKjaCI6W/XPrseX8uh/YaeA3bcaHiQ+55D3x8o +0vCLy7Ot3DoO7UmR2qNHiv80b8A8KBJjvag2cVkjh/alSLuP1EV4qAnzoYgm +9aYpL+cDh/Yeeq6QLWzY1N6MeTFIrpmICrNs4dD+DGJxvt6a5/cJ82MQX7cp +AvHSVg7dDwySZKpUu35sxTwZJGHa4b9uHWjj0P3BIK0FlfuDzbmYL4OUaxPa +vXO5HLpfGMR6qXdCpG875s0gHvdTe0q62zl0/zAIuRzx3C+Rh/kzyKONgqdf +2HVw6H5iEOYOj2v64g70YJLab7+YYhfSiR5MolH9wIpVdqIHkzisjZ0ju9CF +HkyyyueznzLcutGDSSIWpzcdqu7G/mMSf7dKl/iYHvRgEtcg3z3ZY3vRg0lC +lyfdYmX3osfQefW22mOr+OjBJF8ttzea2ctHDybhTdaulScL0INJTHyopi6H +PvRgEjBpyte+6EMPA/LaMd1qfkQ/ehiQvIwE11S2ED0MyCzmK6fxN4ToYUA2 +ZpROD7IToYcBOT7JkTd/jwg9DEjWzekHHZ6I0MOA7LbdlDzDTIweBiSs3LzQ +LUyMHgZk5kFh/uo8MXoYkMfh1NwjTAl6GBCv1Ju1f6+RoIcBsZDGrdFlStCD +RZJtlocGSiXowSJdd3m5Dz2l6MEiYXPd9V+dk6IHi6y8acHK4EnRg0WyfvM5 +7DRPhh4skp75vV1xogw9WGRzWVH+xjoZerDIxeZDehOHAfRgkSUVmwqe7B9A +Dxbxsaq+k1g+gB4sQpk9TwucLEcPFilyfOjnHCVHDxa5oLpwxrRIjh5swrhW +6aT9TIEebCIIt+qWhSjQg032Ky79Ls9WoAebpFUXGDL1CvRgkwkOtuxJ3w6i +B5tYGudumZcxiB5sQmTxshDJIHqwCftu+cnTnkr0YJPMqDbVi3NK9GCTHYvd +rcZ0KtFjaP024ATOV6EHm0QUHS69maxCD0My236rktGkQg9DUq6OJOGz1Ohh +SEx3dMe8jVOjhyHx0TpEeL5Wo8fQ9XV+mse2GvQwJJolwePIbg16GBLr1dMS +Kp5o0MOQ+HZ7zQw216KHITEqdu0Xh2vRw5DsKjD5K+UfLXoYkgvRpV7uY3To +YUhOvJKkcYN16GFIGsSi0+f/0qGHEfFbVGQQoNOhhxGJDFO2jP1Wjx5G5PM2 +ucH7DD16GJFnm6+uz5Dq0cOIJOYVfiqwo0poDyPymlE57uYqqoT2MCKpUcFz +z8dSJbSHEck4zFrw8xWqhPYwIsFWORPjXlAltIcREd74kbNXSJXQHkZkudMn +p2hLRgntMbTepQMrfljKKKE9jImZ69wJP0QxSv4PGq9G7Q== + "]]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Line[CompressedData[" +1:eJw11wlUU9cWBuCbOYCCUpyoQ6UKKOITRESL7mNRqhZEhSoCKkUmsU9waKuC +SqsoTlUL0joXK2gdkIeiUNQwiGAFZBRERBIChBlCBjI/4O6elbWybpJ7ztn/ +t+9NMj0ocn0Ik6IoewZFDT//OwrmjRp6jCbRFmlfCQ8chWvT911NqRqFx4nw +j9qnpv7yKJI1Na5zXdY1mLYjifEq+N/3b8JPohke2+eOIpcuDo+/oPhSXmDm +oAl+Pg1SHVZvuVVgQrrWDb/yP1jgp3y16KwJnv8IsjavOBrmb0KMa/+MWmL8 +BJjOywV2tiY4XzYkaycqfpIbk1kBZ/Pltk9hX++RlpACY5z/OYztXRFXdd6Y +3Bw6u/bPXEg67s4sCjTG9fLg6O+B2a7zjMn8kVEAb4oEjg6UMa7/AoSrnk5J +LjciBXLboRUKwWjNTM8TyUa4nyLYfLfrYetuI7J+ZMFiuO9tG/R4uRHu7xW0 +3t36s3y8EREeGJ7wH8iByRuT2/m43xLQhz12efKUT3YNby+qFNiRGxOczvFx +/2Vw/rRdy/hgPqE1yuFBwfOn/i58rKccopfFPqFG88nKkQUq4GpAeCxLxMP6 +KsC64FnZt094ZHi1gLOVMDFfETzpDA/rrYKl4odmttt4ZKSc2iqI3VFx89Qi +HtZfDZtCzjC/HMMj04a3M7UGSr1yTVe1cTGPGvhrt/Xja8+5JCx0eLwFiUtW +J0niYj61ME1tdtt+J5cMz2aRVgsu+e8lQe5czKsOLPM3pTdO5RLF8HTyOvCy +a2RfV3Iwv3dgWPNtX3I5hywdmbAernRaxLb8xcE860F901AQdoRDRrYX9x6o +h1fLrDdzMN8G2PYx7tFnCzmktGR4NMAp5djT3mM5mPcH2Cky+u+zTjYZN7LB +RpiQsDYq4CUb828Ep0m/PpibzCYj0wV8hKQJ0uWOMWz0aALj3uzVIRvZWE8T +fN7HeV/oyEafJsjoiDJbb8rG+ppg1t5nFL+DhV5CuAQxL1sKWVivENaK0n5o +T2ahnxAMW0Jnjj3EwvpFEP4mQOznx0JPEWyIPZH/wpmFeYjgcVnaa49PWOjb +DOLRQl5/LxPzaYbOTE70gxImejeDl+nqGcf+YmJeYjgbc063+xgT/cWw5Jcq +9Z5tTMxPDFNeHDQ6TpjYDy0QZJppdmcKE/NsgSUVv3fWqxnYHy3gYrdr94Q6 +BubbCifGl0VuzmRgv7RCfk3izTu/MjDvVrjcpyrURjKwf9rgWXlIzDpPBubf +BrqKZUGpsxnYT21wzPsuU8VjoIcEDBzjOvcWCj0k8IXPsdVn8in0kMDmbwLS +Xl2n0EMCm5x5X6piKPRoh8xdZM4kPwo92uH9/tL91gsp9GiH47fHfTrVgkKP +Dvj7ojRfJTTAuRGPDvA0Lxg8dNkAtEcH7PlD3/nCxwC0Rye4rg/Y+mK0AWiP +TgjKr8/5/qUeaI9OWFMu4FUc0gPt0QW+JLah1FkPtEcXRFwP8t/WowPaowsu +N9/6LD5FB7RHNzQSlZNjgA5oj24o7i7RbjDXAe3RDe0bg2Z2FmmB9uiB8h+b +fhHFaIH26IHXszjz5zlogfbogeb/pfNeijVAe/TC7S8iGhJ/0wDt0Qtee545 +nF6lAdqjF/xHM4wuqdVAe/TB3TvDQ4319MGDKQWBtzepgfbpA8ZNd6tonhrr +64P5s23s+I9UQHv1wcHEqdEOW1VYbx+s9v96fg1fBbRfH9iP8S0qSR/E+vsh +SmMp7dwwCLRnP5x+7bzBoFZiHv3g6pRy658rSqB9+yHsnqst11WJ+fSD/YLU +6f51CqC9+6GeyS/fskuBeUmhtyXj9UmuAmh/KbymalwdfpNjflJwCeWd224l +B/r6lMLRxOzqnlQZ5ikFbYUJp8lKhv0hhYVhF5NdEgYw3wFoLn1UEi2VYr8M +QH3e1k+XOEkx7wH4eGKNzQabfuyfAdDzuyDLog/zH4DCp5a++7J7sZ8GYEo/ +f+neVb3oIYP2eg5sfdeDHjL4fmaEm9P2HvSQgVlNplnPYDd6yOB++Fj34/Hd +6CGDPW+swtUTutFDBhGOi98tu9WFHjI4W/2uaaNzF3rIwXXn5fvOhZ3oIYf1 +AXt967w70UMOi4p9Jc6iDvSQQ2iC6waPqA70kMNEn8jz5vp29JBD5Hivo0dO +taOHAkybv550cWI7eihgrZcT8UyRoIcCdL/nDVx0kKCHAuZZ+sL+Z23ooYBI +0ru8ZWUbeijA4om5W11VK3ooIdy++5LHllb0UILXRI+3rpIW9FBC2Sen7v+5 +qwU9lNBu/c3oGLUYPZSgnzl7ct7PYvRQwt2KJNhpLEaPQagYbzb98Plm9BiE +63q/jN4JzegxCE+2xzs8vSpCj0HwOPXNHKGVCD0GgedufMT/lhA9BkHYmhVh +aydEj0HIcBPuXJHWhB4qSGnYszt9XhN6qOD9DxGBb4I/osfQdZXK/74qtBE9 +VFA30VweEfYBPVSQf/Xm5sTQBvRQwaOcd5Vrgt+jhxpu1GgsLwXWo8fQdb7q +/e8/+L9DDzV0MLasaPGpw/ulGjxXhNxu86hFDzUc/o91xWG3t+ihBkefsWvS +XWrQY+g+sy9kRsycavTQwHfe8UWtU6vQQwN/VC4dIzOrRA8NLL7eMP+2oRw9 +NPDLZMaPZg1v0EMDCRqRYu7jUvTQAjtu07jsM6/RQwublNu/zwp6hR5a+CLW +f5rLgiL00IJl9pVdbpxC9NDCBu8w89bKfPTQAtNgL7K7loseWuDmZH9YVvYU +PXQgrhK9ueGfhR46KE+otU4QP0QPHRR6bzPdWJmGHjoYPFjkbFSVgh46+MNu +h3FD0kX00MFME/dPHn04iB56yPWeE5ERGSegPfSw6HKGcZLiioD20EOg+J3U +6cYtAe2hB35pSNKS8HQB7aGHz2rPn1cyMwW0hx7SXU8edEjOFtAeBhjHV5dW +f/lcQHsY4F7rybSWPXkC2sMAbnnjsgxFBQLawwA+TWkf7k95KaA9DEBFrslo +2VssoD0M8OffSubV0n8E+PeDxJ89U/vKplRA10ORQ0e37Ak68kZA+1AkfU3W +nbl95VgfRaIurLriO61SQHtRZN/taydme1UJRsoNHfoeP3/d5I/D1QLajyId +36XUPUqvEdD3B4qUnbZ/ESx6K6A9KVL+88Hndy3qMA+KhE9eXB331TsB7UuR +JvcB+94D9ZgPRTQJqWbitPcC2psik2WL6gKbGzAvBnlg3kcFTWwU0P4MMupC +7WSx50fMj0G+cvq0q39Zk4DuBwY5ZKbSzP3QhHkOHU+Pvndrn1BA9weDNGaX +/OhnIcJ8h3536WKbV6SLBHS/MIjpshWx4R7NmDeD2DxMaM+VNAvo/mGQxVdC +Cz3jxJg/g6Rv6SoYbdUioPuJQdQ7XK8bnregB5MUrR39qVVAK3owiVy9g71X +1YoeTDLDZ6+DLKkNPZjE1d3kp2QnCXowyboll+oPVEqw/5hktVOJ/eGodvRg +ktm+Hrvvm3agB5P4rDx2i32/Az2YxFYTVn3k6070YBKrlTN5szs60YNJPkzS ++Sjiu9CDSRjuVH2bTTd6MMli4/os3ctu9GCRYttLlgtDe9CDRdKSY+cmcHrR +g0VmMF/PGpvSix4sEpCc97mvVR96sEjsBFvxwt196MEiyamf77fJ70MPFoma +Fhhvbd6PHiziV2zxt1NQP3qwiPX+3qx1Gf3owSJPQyjHg0wperDI8oTU6sfr +pejBIqMGYtbrb0jRg01ipq7c6j0gRQ82ET0Qp2e6DaAHmwQ6OhtmJA6gB5tA +6nh2sngAPdjk2q/u0bMWyNCDTRJvbLZ6HidDj6Hzi3KytryVoQebnG44YDC2 +kaMHm7i8CszO/1GOHmyy1LLyTlyxHD3YRDe28KL3JAV6sMlj20zPOREK9Bha +T5101ixHgR4cQl0vmaUzUaIHh0hCLCWyACV6cMhO5eXfFPeV6MEhJyuzuUyD +Ej04ZIzNNM6EtYPowSEW/PRtC5IH0YNDXGWHZQHSQfTgEPaD4pNn3FTowSGJ +EUL1y0QVenDId0ucLY1aVejBIbuFIPBeqEYPDgnOic5LjVejB5fYzAxWMerV +6MElxZpwEmKnQQ8uGfWdJKo8RoMeXOKuswl1K9Ogx9Dn33pqn03TogeXqJb6 +jSG7tOjBJWPWTY99la9FDy7xkCyf7WehQw8uYT+f29MfokMPLgnONr537okO +Pbjkws685c5GevTgkvjX0osiPz16cMnb/r4zF+7p0YNHVi7OYXnp9ejBI9uC +VI2maw3owSNcoYJVk2xADx7J+fbaxuQBA3rwyJGMvz9mW1G5tAePlDJKxqR+ +TeXSHjySEOHneGEvlUt78Mi1aLbL8atULu3BI5ss08bFvKRyaQ8e6Ug5JNjT +S+XSHjziPuvjrJ0TGbm0x9B6l/et2rGMkUt78In5XMdPdkQwcv8PMzEYvg== + + "]]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + Line[CompressedData[" +1:eJw12Al0VFUSBuDXr9csjLINiogoKiAigozKIlWDBhA5IODgEkBPVKKiyH4Y +QBEniMQBHBYBDatBRVBAtiCYBhIIErYQICHEkH0jJJ1eku5OunvevffnnZyT +k+29W/XVrbovDyZ8PP5dXdO0PiZNE5/vXBlPxhofbXhhh19HlCxIolEfDP1s +U2Msvl5Lud/PeC46L5bTui69NS5tM035a3tw3rE7P0+lur9fPVy2LZa/3Siu +nTT3Zfvcl5fd+f1fSUse2P+PD2O5bpz4zj76MmNaQ6/xd/7+AHUMbdr9zTOx +HJ0nHnSYtjx96X3z/Xfud4R6zdB7zNBjudekVSd9PY/Rvp0DygurYnD/dBpc +NnXbi+djOFUs8/vjdKrLximHfovB807QmInZ93XfEMNPySuDClaF8ld9EoPn +Z1LCn32/aU2I4QxfT+MJp6heT5jw/sgYrCeL5g9Ze/e1PjE8Xj7wDOnzTp8f +1j4G6/uTVuzxJ+/xR3PJAnHDs9S+5rGRXYqisd5ztPWhydblGdE8Uyxvxnnq +I77/UzTWf4H2rzuxOGFlNCuNSzTkomfIxdnRiOcSnXY8Ghz8ejSPlA/IofHD +Xjv809BoxJdDNxYmz+n4cDSLp01adZnePnis3+dR0Yg3lxrqxRXFMpy8XFrQ +88Hd8VeiEP8VEuGeORLFD4jldL1KK79b+ug/tkQhH1epg+BNiuLEqeK6Rtv/ +Vrv1bx9EIT951GdklykLx0axuFuHX/PowJIx91UPiEK+8mnI0c/yX+kcxU3i +dr58yvb+tu5ExIH8XacJT1SMf6LCwUPlDQuoKLHT3d+ddSCfBZRo6Nr3Olgu +b+kNchcYAa9zIL+FNF/G4eDz58RVSOYxxZYxbzmQ779o1bJ2J3+Pc3BHucAi +6nTihcU9ejuQ/yLaGpxnCDtY3m7STeo9YGdAa7LDo5jSPrpx6KMbdsRTTPxj +mzkFx+3wKabTxdRvxA92xFdMEzvPqt//lR1eJVQ0IXVXt5l2xFtC76249t6K +iXb4lZBLAtsRfykt1IyKftAOz1KyDvpoa67NjnyU0urZWyZznQ2+ZXTPLzmd +f8mxIT9ltKPSnH/vYRu8y6hvt6fXfZFiQ77KKe3198Z7ltjgX07Pr/n2rrcS +bchfOWWLT6NtqIcKGmeLLB/Y34Z8VlC5CLeTDfVRQe//+21L+5AV+a0kwbu4 +1Ip6qaTP6rI+rcuyIt+VFC3K+Rcr6qeKVr/5eODUaivyX0Wdje3bf74V9VRF +P17+2ojYCo9q6ifa1fNWeFTT0Tjf7fk9rfCoprjFPXZVtLHCo5ouyoAt8Kih +ePdXjzjzLfCooZLe6aW90y3wqKFp77q2bPjeAo9aatosNrCFv5YetSSqedZ0 +CzxqKabdsryiCRZ43KI1Lx1Z+9JACzxukQy7qwUet+in9PvvesRigUcd9feP +Pfe/GjM86sjYvcvDF8zwqKO4aQeGTztghsdtuphqAG80w+M2TSq6x6hoMzxu +U3mnlz7d944ZHvU0fdwng7uOMsOjngJGt0rua4ZHPX2eWXKwuYMZHg3UJtx+ +9jtBHR4NtPGZ4U/m3NTh0UAPzJx/+7lTOjxctPtncemIx0X9ygsTO32tw8dF +fxjhJs3VEZ+LRr76z1LXGzq8XJQjeFlHvC6KP7tj0tlHdPi5SJTzMzE64m+k +j+WfmeDZSC1i+14zIR+NlLTXiPioCb6N1MZoV7VbTchPI23onps98QsTvBup +m2jP00zIl5v2fmMEPM4EfzeJcbTpaRPy56aTUSnHo7qYsD/dNOr5C5/MM5mQ +TzddWWRs4EoN9eGmSYeEsIb8eqi64Z2Dx/ZpqBcPze61flav9Rry7aGwGEiL +NNSPh5altNTpCRry7yFjGP388QgN9eShFGP3Fj6uwcNL3V9c/fCL7TR4eCle +hNcQIeXhpdkGX9zvEVIeXkqSz4mQ8vBSyhSx4AgpDy/tFu2lc4SUh5cyXxAb +LEzKw0eXxXjYGybl4aOqx8RACJPy8JEc78PDpDx8dFdbcYVJefjooaS5X9Xe +CJHy8NHg5uvWzB9CpDyaaLQ4j8wMkfJoonhx/hgSIuXRRLPEecMeIuXRRMni +fHG5lZRHE22WgK2kPJporzg/JLaS8mimLHFe6N9KyqOZrorzQaiFlEezOg+c +aSHl0UyamP9rWkh5NFMHMe+ntJDyaCYZVc8WUh5+ek7Mc0+QlIefxor5nR6E +h5+minm9PAgPPy0S8/mVIDz8tELM4weC8PCr+VsbgIefjoh5eyAAjwCdlg04 +AI8AFYh5OioAjwBVifnZMQCPgJqXxX54BKizmI+7/PAIqHk4zw+PIA0V84/9 +8AjSq2LexfjhEVTz7VozqX4ZJLEdpm5rhkeQ5Hb/sBkeRpxygzfDo0XNJ1Mz +PFpIhn2uCR4tVCTmz/omeLSoeZPQBI8Wsov50qcJHi3UVfD6ffBoVfMjwweP +VhouynmFDx6t9IaYD6/54NFK08U86O6DRyt9Lvp/vRcerbRW9PsjXni00o+i +vyd54RGi30U/H+OFR4iyZcBeeISoTPTrcg88QiROk8l7PPAIUbToxws88AhR +N9F/4zzwCJOo5k53e+ARphGivxa44RGmyaKf7nDD486+dMMjTP8R/XKwGx5h +2ij6o80NjwiJ3ftkTiM8InRc9L+URnhEKFcCN8IjQpWiv/VrhEeEWuQB2wWP +CLUV/SvLBQ+NHxb9arUL8Wg84JiYuC74aDyqb/y9rT1ciE/jNNl/GuClsdx+ +CxtIhjtV41jZXxrgp/EQ2U/q0R80niz7Rz08NVb94jbyobF8v0i8DV+Nr8t+ +UIf8aByeK/Z/Hbw17ok5rvJlYnk+T78FfxPPkfv5FvJn4lS5f2tRDyZW+7UW ++TSxPN92rIWTiTvI/ViD/Jp4mNx/NagXE0+V+60a+Tbmktxf1agfE++T+6ka ++TexPL+tr0I9mViX+6UKHjoPkPujEh46T5D7oRIeOi+S9V8BD523y3qvgIfO +F2R9V6D+dPbKei6Hh85dZP2Ww0Pn0bJey+Chs5zvM8rgofNmWY9l8NDZKeuv +FB4618l6K4WHzrGyvkrgYUY9lcDDzG9ud6656i6Gh5mXfimuYniYWW6HrsXw +MPPPsh5uwsPMIelfBA8zj5Hef8HDzJulbyE8zFwtPQvhYWbVP2/Aw8wrpFcB +PMys+tt1eFhYvp5n5MPDwtNl/vPgYWHVT/LgYeG2Mr/X4GHhWXLdV+Fh4TSZ +vyvwsCBfufCw8BSZn8vwsCAfl+Fh4cgg8cKdAw8LjxXjd+4leFj4WRnfRXgY +52oZz3l4WHmpXH82PKzskOs9Cw8rp8v1nYGHlePkek7Dw3gPkC/8p+Bh5S9z +bcYbUgY8rDz6w8faDGw+AQ8r51jEgDsODyuH5fr/gIeV28nfPwIPK2/YNHP/ +pdRD8DC+viAm0n54GO9JEXHtgYeNOWHl6L7xO+Fh47RMcaDYDg8b/0v9AwIe +Nnb0qDzj/W0pPGycOmhJ+2eXvO1UHjYuzfzBeONZ5VQeNn49RR5gnMrDxqPq +/mucCHY4lYeNhxnTZWL2LqfysPE2427tn93nVB427m3sroXJB5zKw8aDZIM7 +7FQedr65WARw1Kk8jPdacZxYku5UHnY+Kuv5uFN52LmtPP+cdCoPO8+R/TTT +qTzsnCX78ymn8rDzE0b3u7kyy6k87LxEru9Pp/Kwc4P6v4lTediZ5XrPOZWH +nQ+K1/+nLjiVh/FeLtd/0ak8HDxQ7o9Lzv8DXQ3PJQ== + "]]}, { + Hue[0.37820393249936934`, 0.6, 0.6], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], + Line[CompressedData[" +1:eJw11nk8VOsfB/DZR9ZZWkgbpbTQlSxp+T5KpVJX3VK5WrQpLZablBZSbr9Q +qZT2TdttcRNSkSIpXXuhQbKP3QyzMMz4Yb6ef+Z15pzzPM/38/6eM2O0xWvV +dhqFQjGjUij9n4MjcW/pq72lfHJ4aMziyoCTcIxIo2vyB48j4U1d6hjWFz55 +PSakaeXrWzB99MPMwneD5++Dr7RU4RLHJ9eu9o9/oF63NT388eD1MTA9ma46 +dJNPmlf2fxMLNtt+W2R0YfD+eNhc1Kod8jefaBZHe8/VTIT1KQ2XHgUMzvcG +du6epgzdxyeT3c6lSU2TId21wM5iy+D8KbDF2HHijTV8cr/v7uLoDzDF3uxQ +tuPgeqmQU1SdnzGbTywHxkcotBEknDYfXD8dHO9GXBxhxCcfpaZ9K3yCSc3+ +6T78wf18hiWy8LNXmXyyamDBLzDtuMAkQs7D/WVCmP/X5y4NPFIZ0D/hV/it +bIddawkP95sFAp5n/tosHvHp3553NgQlOOyOfMfD/edAcipLcj+GR9QaeRAU +ZuUUepuH9eSB6dVzSxZG8IjjwAL5cGnxh8SiIB7Wlw/1ZYz14MMj/au5nSsA +u8D0ukB3Htb7DcLWj+JdXckjA+UUf4MZfPeTYfY8rP87PLl9+ddaCx4Z27+d +MYWQt/xXimocD/MoBL6w6lUQh0c8dvSPIngdZe5S3svFfIrh8OKzJvptXNI/ +29CYYvDu3PTYvJyLef2A1peVbsbZXCLrn076AwQHA5I7kriYnwByY1Szo59w +ybyBCUtAY5NomcVVLuZZAtaxSetuneKSge2FlEJ6Q9vXRj8u5lsGaXP82CO2 +cUl2Vv8og/9ev/cav4qLef8Es9Bedw7hkmEDGyyHwNwVs8rNuJh/OVhY/1x+ +xpBLBqZz+wWScwbS0UO46FEBrHOC4xEyDtZTAXe+BTrUVnPQpwICfceFjcrn +YH0VcE///l3rFA56VUJMW0O+5VMO1lsJ57fUbx16hYN+lTC5Muvmj5McrL8K +pO9Hpgf5cNCzCiJXZBrobORgHlVQD+4VR5dy0Lcabh42WPfNmoP5VMMFn473 +OuM56F0Nw1nFa8z0OJhXDQjXuT3fJtND/xrYG0ZRzsrRw/xq4OSLkdzSB3rY +D7Wwb1fBRsejephnLfywMXMNXq2H/VELb9sdDpyeqof51sGd8GMmG2l62C91 +kLkiVUAR6GLedeAbG8Pw/VcX+0cICdKSES9DdDF/Ibg8YoWk/qmL/SSEsVPX +p9yx0EWPeigIumHtzNZFj3o44Rbgnlemgx71EJXyNs7opQ561MPC6SejHU7p +oEcDRH28+XiWmw56NMA+XtwcqoUOejRA/NxrpdeZOujRCIa2N+iaJdokYsCj +EZZ6vrdyitFGj0Z4Wj5UtiVYGz2aYMsIjawVLtro0QRacbHzOVO00aMJxtDN +Gh4ptdCjGb4kiFYNz9dCj2bQiZui73ZfCz2awdBpbNEhfy30aAFSHDbde6kW +erTAiQLtbBithR4tcObOqQ0NbZro0Qpe4qjLe9M00aMVvlRSrLIjNdGjFeKL +jJQaHpro0QbThnolGc3SRI822MZoddDX0kSPNrAbneDfUjYEPUTwbKHX7Hsx +Q7AeEew4X3XcJmgI+ojAbVTA4piVQ7A+EQQnF1xkjx+CXiKQzVwa4CDRwHpF +YHAkYuSOTxroJwLXy3Z3917WwPrFMGOPi6ObhwZ6iiGiUbXW0lYD8xDDl9tt +EyUaGugrhuGNww3vCNiYjxh8n5o8sX3CRm8xHFtj6Po+gI15tcNBRVaq1TI2 ++rfD9abtp28asjG/dnBcVOHZ2cTC57Md0h79NcMxmYV5tgPLoDPlbDgL+6Md +NoyaTctxY2G+HeBzy4GqYcbCfumAObtPf5+nZGLeHRB6X+Px/mwm9k8HhN9a +mfT0JhPz74D5Pl7udXuZ2E8dMDEwkTJpHhM9JLBgxkGety4TPSTAsgoxTi9n +oIcE7ENu5Zj8y0APCRyp/vdTVCADPSRgsK4uY5QzAz0kEJtz9U7iOAZ6SOCx +yZDpu8V09JBCY5DQ1S6Njh5SKLd4O8L0Ih09pNA+nr3FZhsdPaSwb8fqubut +6OghBXNzRWwGi44eUtDwy/zq9IOGHjJ4Zx16gfKEhh4yuGu6hlt7mIYeMhA8 +zV6iXE5DDxnYX7S3dhpHQ4++Y9OET9/bqeghg+7Iqh9XP1HRQw65x2fCrStU +9JCD+8z0uJrdVPSQw5vyrSVeQEUPOdgq382Zz6eihxxePriweKOQgh5yqPA3 +dMxIoqBHJ2w+emvXkQgKenRCcKxNXPB2Cnp0Am1CBbPUjoIenTA/6fXIUxwK +enRCodZsOje7F9QenWCQpElSD/WC2qMT1sRs3mw0qRfUHl3gt93puGWhCtQe +XZDrMmRn1wkVqD26oPisbfB+SxWoPbpAbPKy7kG1EtQeXXDZUuhyNlIJao8u +SJN8JeaLlKD2UECzjW1qSGcPqD0UwM/JeBj5tAfUHn3nU+l+rpt6QP2+VMA6 +b5VHEb8H1B4KWLRs1EF2ZjeoPRSg0jDZ2HysG9Qe3VCy6FDUCatuUHt0w9nJ +Ozz/a1aA2qMbdO1ON6beV4DaoxsE0bbKbRsUoPbohj09NRteDleA2qMb3n73 +vPcorwvUHj3gH7wM5od1gdqjB7oSPoUFLuoCtUcPVEZ//uRG6wK1Rw8kPEgY +VpzSCWqPvrp/p15oOtyJHj3gKTkzP2pWJ3r0QFV4xfhiuRw9lFD0xmDK41dy +9FCC1OfNAvYBOXoowSZwmpvYSo4eSogLn7Bxq0yGHkpY2p1k5ZooQw8lvND3 +KCg4KEMPFZg/jDf9aidDDxW8E/yynKuUoocKFlpay00/SNFDBcm3/ggMPSFF +DxWM9Lap3tj33Ko9VCDImrkwWkuKHr3gPjz12+o8CXr0guEv46/elyTo0Qsl +tXQfiasEPXoh5Wj9mJ/jJOjRCwdiz9qaCjvQoxcOr7ax+Pa8Az0o5LNBaWjp +/g6sh0K4j5YXzZvTgT4UsvOoc5yC3oH1UcgP76g87ax29KIQ/6Ufmnwj22Gg +3B0UslYP8qdsaEe/vuudiNuMie2gfj9QSPOz4AOn2sToSSEdclN90zdizINC +aiNDFvNOiNGXQuwCKvQdlosxHwrJ9raNSRohRm8KoftQbPyrRJgXlazPE7Tt +fy5Cfyq5XLnMOO6gCPOjkqDrhyb85iDCfqCSnIzCdY16IsyTSmJXPvvzQ2Ib +9geVXDN2mj3OuQ3zpZLrS2P/FNe3Yr9QibOPdflvwa2YN5W8l+Z2lRq2Yv9Q +CXWnr6ItoQXzpxL7MwHE07kF+4lKhItHEMemZvSgkejYhKBTfzejB42Meeh1 +w8S4GT1o5EXnERiX0oQeNDL66KNJfq5N6EEjm7XSxhvLG7H/aMT/qjHfJLIR +PWjk0PGxtYctGtGDRjRpEVcm5DagB40UsJ1nj97bgB400m3/uWGrVgN60Eho +yF85sn/q0YNG9I8dMPruWI8eNPLs4URThVCIHnQiPhE90+OUED36fmeG7X1g +MEmIHnTC8lfV6H2uQw86WXJl9y5Hjzr0oJPRXFp8KrsOPegkoaXZOeBxLXrQ +yWSf0iLvJbXoQScl8U/qohtr0INOnPR5U3nhNehBJ/meq9a9NatBDzqZliqc +ej23Gj3oxK9i7p44n2r0YBA/c4966tBq9GAQ6tAi/5BXVejBICtT9BVz1leh +B4PUmkW5TOqpRI++3/XAP44suF2JHgxyc9Mz94j5lejBIIoLRgydugr0YBD5 +qZE7X5+uQA8GiS+JuXLerAI9GETvWOWK6dG/0INBJh7xXXexqRw9GGS7b/Pp +5TPL0YNBTttLprgd/YkeTLLvwbWz7zLK0INJ9EfT+N6cMvRgEnED28jXtRQ9 +mEROE01Nu1+CHkzyu5Afu7FNgB5M8nJ6pM0iOwF6MMmsfG1n/5Af6MEkH4TL +IkV5xejBJDKG1qMXo4rRg0mSSp9YvtpZhB5MEjpH3NIbX4geTDLRKfN8OLUQ +PVgktYRZ7briO3r0/c/LNXm+6/o39GCRyxdGfkysL0APFnnoxuldYF2AHiwy +bZftfJ2T+ejBIp2Nkft5BXnowSITkzNOrhqXhx4sUrbnTe6VnznowSJdjktm +qAKy0YNFpgR1W37Tz0IPFmlZtb56WOJX9GARr2h31/Q1mejBIkf+Z51SJvmM +HmxSGZE9b0NkBnqwSfuFe8MdZn5CDzZRKfeEnvv+ET3YZEFocf1cvzT0YBPF +PLvQ5cNT0YNN0lY+v3PI6z16sMmUkGlOQ+OS0YNNdmdeUnnI36AHm7w7WPXC +Z04ierBJ0abGPebB8ejR9z/dRuR0/UsserBJ8vmtMs+xMeihQZgC2RZJzGP4 +PwE1tpM= + "]]}}, {{ + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], {0., 0.}], CompressedData[" +1:eJxF13dcFNcWB/DZZReQJKKIiIgQMQgoEDWI5aHn+ig2ShR9EiSiKIhEERWf +DQNPhaDGiEGNYIVgeSYgoiYUZcEGKFgAaSJSlr6wvbcHzOHz7mf+2Z3Ze+/5 +fc/MZ2da2K414QYURbkwKGrooJjU/4dl0uahg0kOm+csazt0HPInMWSbvUc/ +n4MpVi+DHZ2YJN8msX91/lXo3aqPavx89HwWWIV7fbtPwCDpacPjv9CX8WSh +poaB1+dAcoNfSPTfDMJbPfzNPVD+lCR6lc7A3z+A+eUqj4k/MohJ/e8xi03+ +Bvky76MrN4/OVwA+ATNNd3gxiFPImSdSx0fw8kae+yGH0fmLgb/Ea80+EwbJ +Gvp1/e8l0J+SX/r9AIXrlcLDuJj+b95S5JuR8RTi7od7KPIoXP8ZJCQtdPzj +PEWeSh2HVngOt8yXOvkdoHA/ZTD91S8lLcEUWTOyYDlYzlPu27SYwv1VgLul +bUO1LUXaDg1P+BI+74iMc2dSuN9KsOkfq5tUoYfdw9uLqYKwzFb27dN6oPf/ +GpKScrbYrNEDrfEWgpauOhBnoQe6nrfgGtpy72mTDpaPLPAO1nIqTkmv6oCu +7x2MGzj5y4QtOhheLeRMNbQ+vBhg66ADut4a+DFo8W6rfi2MlFNfA7H3d2Ya +3tUCXX8tGLZcudq5Rwu2w9uxeQ8nr6e6FLhrgc7jPXR5z59+TKWBbRHDow4U +PltCvYs1QOdTD8nr7lcxjmpgeDbznHpIWB0YXuitATqvBhD9/dpx9xgNyIan +kzaAYGqbvWOVGuj8GqHOf/m+thQ1LBmZsAnysi4uurZWDXSeTRCy0Dxri6Ua +RraX+AFsTiX2zW5WAZ1vM/zsbrN6zHUVVFUOj2aYERFsz9+iwrw/giq9t5jr +oIKJIxtsgbjYK/G8fiXm3wIXp4bWGOcqYWS6kE/wbozzbI9YJXq0wvMcK4sT +C5RYTys49m0zFWkU6NMKpRWncw+WKrC+VlgXvfWiXZICvdrA55VfDH+lAutt +g2iTnbx2UwX6tUFRRN8rfa0c62+H/mCvxuXpcvRsh1/G3u0rCZVjHu1wUnO0 +Pcpejr4d8Nunorsr+mWYTwc8Mzrhv+meDL07YMw6Qfm9/TLMiws2XyfOX7pE +hv5cKJO5PRnPlmF+XGhPmZkxo1KK/dAJx5peTj2WKsU8O8HfuDJ15gYp9kcn +JLtG7flyuhTz7QLX2KLFkf0S7JcuOFg6I4X9QIJ5d8GvFpS1Jk6C/dMN1VP9 +swN8JJh/N3gZP57FGifBfuqGHL+nl6c2idGjB3ad1tpfzxKjRw/cO1FmmrJL +jB49EDphcrlwkRg9esCpJKezwlCMHr1QHPPTrKk1IvToBblZ6c+CayL06AXb +u62zV+wUoUcfvCpNPeD8DxGkjHj0QYebmnl9jAg9+sB0bOr9/zYI0aMf+hdV +5QfcFqJHP5ztOJh68YAQPfrhTKK17akVQvTgwTIq8JLrFCF68CBbduivkwMC +9OBB0tuXabdKBOgxAJOybeSnzwnQYwCef1dmuWy7AD0G4PzvheLmJQL0GAT9 +nHSP4IkC9BiETy2e1PlGPnoMguOl8PjYk3z04EPnnEL76MV89ODD8wzzq9dE +g+jBh+/u7NzpdGcQPQRwPtp169dbB7EeAfymdHZo/HIQfQQQv/lZ3ZrWAaxP +AGGxV5qrMgfQSwDrNlb1/ydyAOsVwOa16z1z5gygnwAqp/264pKOh/ULYTA1 +7frlNzz0FEJc+qP2CTd4mIcQtp+b7Bcbz0NfISycsvLZslAe5iME/6wFLfO8 +eegthGbqksnYuTzMSwRTlx1+XDeDh/4iqOK9YXd+xcP8RLBs/Y92Bq48vD9F +8M3Eiqf3vXiYpwhi9pkeureDh/0hgsqP3DjtHzzMVwxTbh/fe+KLAewXMXzp +Ylltf2cA8x76HLTooQV3EPtHDErjobnNBZi/GAofWQUdKOBjP4lhotB4SewK +PnpIgNvEhtDGUQ8J+NpHebptH/WQgMH7h6aDilEPCaRHjvf5KXnUY+i+fWMX +qZo06iGBoLmLGpfe4qGHBE7UNraudx/1kIJD9KVs9+f96CGF1SGxQQ2B/egh +ha/Lg3rc2/vQQwrhqR7/8o3pQw8piAJ3nTXT9aKHFDZYBBw/dqoXPWTA7lg1 +Oc2yFz1k4BfgRvxu9KCHDHoulorT5vSghwwcrILg4ONu9JBBOOF7dS7vRg8Z +6P4y82yo6UIPOWxyGUj33diFHnJYaelb59HTiR5yKJ5wKvv33Z3oIYf3M9Z9 +EafiooccxPYzrUuPctFDDpnvLgw947nooYAXFqbT4s92oIcC0nTBefxJHeih +gD+3J895dKUdPRTge2qdc5tdO3ooQO9tcmzDrTb0UMCHrvwox1lt6KGAPzzb +or1zWtFDCZnNe/fkzm5FDyU0/Ttq05utn9BDCYKbxvtqIlrQQwk1lmbSqG0f +0UMJuVeyvj8X0YweSsgpaqz23/oBPVSQ/F5tlb6pCT1UELDiw8V/b2hEDxW0 +MzZ6d65twOelCpy9w293+9ajhwrivp7xLt6zDj2Gzq8d75+74D16DP0vOBD+ +VZxzLXqoYW1gclmXTQ16qOFM9ZJxEtNq9FCDy7Xmb27r36KHGuKsGftNm9+g +hxqOqNtlrn9VoYcG9Me/m1hw+hV6aMBavn1fflgFemjAJWGD7YJ5ZeihgfEF +l3d7sp+jhwYMA7eZdVU/QQ8NdOpc2mddLUEPDWQWFnxc+voRemjhXk37m8wN ++eihBefU+hmp3PvooYWUwC1j11fnoIcWGo6UuY+puYEeWnCf9YNJ84U09NAC +ZeIz4cHHI+ihgwfrnKPydiVyaA8dkEt5Jhdklzm0hw4KuY0it8xbHNpDB+ur +wi8sjszl0B46OFZ/9qyc+ZBDe+ig0ePkkTkZBRzaQw+Oxqqq2n8Wc2gPPdR3 +nczp3FvKoT30kFA6MV9f9pRDe+jhSmvOx+ypLzi0hx5cd/nndcaWc2gPPVQW +yplXql5y8PWD3Dhzur7CoYpD10ORlOMb94Yde8OhfSjyyD//jqvgLdZHkXPn +V1wOsq3m0F4Uib999cTMgBrOSLkRFDH99dpn1+NrObTf0HvAjhsND3Lfc+jn +A0UafnZ5trW9jkN7UqT26JHiP8wbMA+KxFgvqk1c1sihfSnS4SN24R9qwnwo +okm9acrN+cChvYfeKyQLGzZ1NGNeDJJrJqDCLFs4tD+DWJyvt+b6fcL8GMTX +bQpPuLSVQ/cDgySZKtWuH1sxTwZJmHb4z1sH2jh0fzBIa0Hl/mDzdsyXQcq1 +CR3eue0cul8YxHqpd0KkbwfmzSAe91N7S3o6OHT/MAi5HPHcL5GL+TPIo428 +p1/YdXLofmIQ5g6Pa/riTvRgktpvv5hiF9KFHkyiUf3AilV2oQeTOKyNnSO5 +0I0eTLLK57P/ZLj1oAeTRCxObzpU3YP9xyT+bpUu8TG96MEkrkG+e7LH9qEH +k4QuT7rFyu5Dj6Hz6m21x1b1oweTfLXc3mhmXz96MAl3snatLJmHHkxi4kM1 +dTsMoAeTgElTvvbFAHoYkNeO6VbzIwbRw4DkZSS4prL56GFAZjFfOY2/wUcP +A7Ixo3R6kJ0APQzI8UmO3Pl7BOhhQLJuTj/o8ESAHgZkt+2m5BlmQvQwIGHl +5oVuYUL0MCAzD/LzV+cJ0cOAPA6n5h5hitDDgHil3qz9a40IPQyIhThujS5T +hB4skmyzPDRQLEIPFum+y8196ClGDxYJm+uu/+qcGD1YZOVNC1YGV4weLJL1 +q89hp3kS9GCR9Mzv7YoTJejBIpvLivI31knQg0UuNh/SmzhI0YNFllRsKniy +X4oeLOJjVX0nsVyKHixCmT1PC5wsQw8WKXJ86OccJUMPFrmgunDGtEiGHmzC +uFbppP1Mjh5swgu36pGEyNGDTfbLL/0my5ajB5ukVRcYMvVy9GCTCQ627Enf +KtCDTSyNc7fMy1CgB5sQSbwkRKRADzZh3y0/edpTiR5skhnVpnpxTokebLJj +sbvVmC4legyt3wacwPkq9GCTiKLDpTeTVehhSGbbb1UymlToYUjK1ZEkfJYa +PQyJ6Y6emLdxavQwJD5ahwjP12r0GLq+zk/z2FaDHoZEsyR4HNmtQQ9DYr16 +WkLFEw16GBLfHq+ZweZa9DAkRsWug8JwLXoYkl0FJn+m/K1FD0NyIbrUy32M +Dj0MyYlXorT2YB16GJIGoeD0+T916GFE/BYVGQTodOhhRCLDlC1jv9WjhxH5 +vE1m8D5Djx5G5Nnmq+szxHr0MCKJeYWfCuyoEtrDiLxmVI67uYoqoT2MSGpU +8NzzsVQJ7WFEMg6zFvx0hSqhPYxIsFXOxLgXVAntYUT4N37k7OVTJbSHEVnu +9Mkp2pJRQnsMrXfpwIofljJKaA9jYuY6d8IPUYyS/wFHz0bv + "]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]]}], {0., 0.}], CompressedData[" +1:eJxF13lcE9cWB/DJzqKgFDfqUqkCivgEEdGi51qUqgVRoYqASpFN7BNc2qqg +0iqKW9WCtO7FCloX5KEoFDUsIlgBWQURkYSwLwkhC9kfMOd93v3MP0lm7r3n +9z0zSaYHR60PZVEU5cCgqKGDYlL/H4XzRg0do0mMZfpXggNH4dr0fVdTq0fh +6yT4R+1b23B5FMmeGt+9LvsaTNuRzHgV8r/Pb8JPwhme2+eOIpcuDo+/oORS +flDWoCmenw5pjqu33Co0JT3rht/5DyzwV75adNYUr38E2ZtXHA0PMCUmdX9G +LzF5AkyX5Xx7O1OcLwdStBMVP8lNyKzAswVyu6ewT3ykNbTQBOd/DmPFK+Kr +z5uQm0NX1/2ZB8nHPZjFQSa4Xj4c/T0ox22eCZk/MgrhTTHfyZEywfVfgGDV +0ykpFcakUG43tEIRGK+Z6XUixRj3Uwyb7/Y8bNttTNaPLFgC933sgh8vN8b9 +vYK2u1t/lo83JoIDwxP+A7kweWNKpxHutxT04Y9dnzw1IruGtxddBuyojYnO +54xw/+Vw/rR96/gQI0JrVMCDwudPA1yNsJ4KiFkW94QabURWjixQCVcDI+JY +Qh7WVwk2hc/Kv33CI8OrBZ6tgokFipBJZ3hYbzUsFT00t9vGIyPl1FVD3I7K +m6cW8bD+GtgUeob55RgemTa8nam1UOadZ7aqnYt51MJfu20eX3vOJeFhw+Mt +dLhmd5NkLuZTB9PU5rcddnLJ8GyW6XXgWvC+I9iDi3nVg1XBpoymqVyiGJ5O +Xg/e9k3s60oO5vcODGu+laRUcMjSkQkb4Eq3ZVzrXxzMswHUNw2F4Uc4ZGR7 +8e+Beni13GYzB/NthG0f4x99tpBDykqHRyOcUo497TOWg3l/gJ1C438/62aT +cSMbbIIJiWujA1+yMf8mcJ7064O5KWwyMl3gR0ieIF3uFMtGj2YwEeesDt3I +xnqa4XMJ532RExt9miGzK9p8vRkb62uGWXufUUZdLPQSwCWIfdlaxMJ6BbBW +mP5DZwoL/QRg2BI2c+whFtYvhIg3gSJ/fxZ6CmFD3ImCFy4szEMIj8vTX3t+ +wkLfFhCNFvD6xUzMpwW6szgxD0qZ6N0C3marZxz7i4l5ieBs7Dnd7mNM9BfB +kl+q1Xu2MTE/EUx5cdD4OGFiP7RCsFmW+Z0pTMyzFZZU/t7doGZgf7SCq/2u +3RPqGZhvG5wYXx61OYuB/dIGBbVJN+/8ysC82+CyRFWkjWJg/7TDs4rQ2HVe +DMy/HXSVy4LTZjOwn9rhmM9dporHQI8OMHBM6j1aKfTogC98j60+U0ChRwds +/iYw/dV1Cj06YJML70tVLIUenZC1i8yZ5E+hRye831+232YhhR6dcPz2uE+n +WlLo0QV/X5QWqAQGODfi0QVeFoWDhy4bgPbogj1/6Ltf+BqA9ugGt/WBW1+M +NgDt0Q3BBQ2537/UA+3RDWsq+LzKQ3qgPXrAj8Q1lrnogfbogcjrwQHb+nRA +e/TA5ZZbnyWk6oD26IUmonJ2CtQB7dELJb2l2g0WOqA9eqFzY/DM7mIt0B59 +UPFj8y/CWC3QHn3wehZn/jxHLdAefdDynwzeS5EGaA8x3P4isjHpNw3QHmLw +3vPM8fQqDdAeYggYzTC+pFYD7SGBu3eGhxrrkcCDKYVBtzepgfaRAOOmh3UM +T431SWD+bFt7o0cqoL0kcDBpaozjVhXWK4HVAV/PrzVSAe0nAYcxfsWlGYNY +fz9Ea6yk3RsGgfbsh9OvXTYY1ErMox/cnFNv/XNFCbRvP4Tfc7Pjuikxn35w +WJA2PaBeAbR3PzQwjSq27FJgXlIQt2a+PslVAO0vhddUrZvjb3LMTwquYbxz +263lQN+fUjialFPTlybDPKWgrTTlNFvLsD+ksDD8Yopr4gDmOwAtZY9KY6RS +7JcBaMjf+ukSZynmPQAfT6yx3WDbj/0zAHqjHsi2lGD+A1D01MpvX44Y+2kA +pvQbLd27SoweMuhs4MDWd33oIYPvZ0a6O2/vQw8ZmNdmmfcN9qKHDO5HjPU4 +ntCLHjLY88Y6Qj2hFz1kEOm0+N2yWz3oIYOzNe+aN7r0oIcc3HZevu9S1I0e +clgfuNev3qcbPeSwqMSvw0XYhR5yCEt02+AZ3YUecpjoG3XeQt+JHnKIGu99 +9MipTvRQgFnL15MuTuxEDwWs9XYmXqkd6KEA3e/5AxcdO9BDAfOs/GD/s3b0 +UEAUES9vXdmOHgqwfGLhXl/dhh5KiHDoveS5pQ09lOA90fOtW0creiih/JNT +9//c1YoeSui0+WZ0rFqEHkrQz5w9Of9nEXoo4W5lMuw0EaHHIFSON59++HwL +egzCdb1/pnhCC3oMwpPtCY5PrwrRYxA8T30zR2AtRI9B4HmYHAm4JUCPQRC0 +ZUfa2QvQYxAy3QU7V6Q3o4cKUhv37M6Y14weKnj/Q2TQm5CP6DF0X6UZfV8d +1oQeKqifaCGPDP+AHioouHpzc1JYI3qo4FHuu6o1Ie/RQw03ajVWl4Ia0GPo +Pl/1/vcfAt6hhxq6GFtWtPrW4/NSDV4rQm+3e9ahhxoO/8um8rD7W/RQg5Pv +2DUZrrXoMfSc2Rc6I3ZODXpo4DufhOK2qdXooYE/qpaOkZlXoYcGFl9vnH/b +UIEeGvhlMuNH88Y36KGBRI1QMfdxGXpogR2/aVzOmdfooYVNyu3fZwe/Qg8t +fBEXMM11QTF6aMEq58oud04Remhhg0+4RVtVAXpogWlwENpfy0MPLXBzcz4s +K3+KHjoQVQvf3AjIRg8dVCTW2SSKHqKHDop8tpltrEpHDx0MHix2Ma5ORQ8d +/GG/w6Qx+SJ66GCmqccnjz4cRA895PnMicyMiufTHnpYdDnTJFlxhU976CFI +9E7qfOMWn/bQg1FZaPKSiAw+7aGHz+rOn1cys/i0hx4y3E4edEzJ4dMeBhhn +pC6r+fI5n/YwwL22k+mte/L5tIcB3PPHZRuKC/m0hwF8m9M/3J/ykk97GICK +WpPZureET3sY4M+/lcyrZf/w8e8HSTh7pu6VbRmfrocih45u2RN85A2f9qFI +xprsO3MlFVgfRaIvrLriN62KT3tRZN/taydme1fzR8oNG/oeP3/d9I/DNXza +jyJd36XWP8qo5dPPB4qUn3Z4ESJ8y6c9KVLx88Hndy3rMQ+KRExeXBP/1Ts+ +7UuRZo8BB/GBBsyHIprENHNR+ns+7U2RybJF9UEtjZgXgzywkFDBE5v4tD+D +jLpQN1nk9RHzY5CvnD/t6V/WzKf7gUEOmas0cz80Y55Dr6fH3Lu1T8Cn+4NB +mnJKf/S3FGK+Q7+7dHEtKzKEfLpfGMRs2Yq4CM8WzJtBbB8mduZ1tPDp/mGQ +xVfCirziRZg/g2Rs6Skcbd3Kp/uJQdQ73K4bnreiB5MUrx39qXVgG3owiVy9 +g71X1YYeTDLDd6+jLLkdPZjEzcP0pxTnDvRgknVLLjUcqOrA/mOS1c6lDoej +O9GDSWb7ee6+b9aFHkziu/LYLfb9LvRgEjtNeM2Rr7vRg0msV87kze7qRg8m ++TBJ56tI6EEPJmF4UA3ttr3owSSLTRqydS970YNFSuwuWS0M60MPFklPiZub +yBGjB4vMYL6eNTZVjB4sEpiS/7mftQQ9WCRugp1o4W4JerBIStrn+20LJOjB +ItHTghJsLPrRg0X8Syz/dg7uRw8Wsdkvzl6X2Y8eLPI0lHI6yJSiB4ssT0yr +ebxeih4sMmogdr3+hhQ92CR26sqtPgNS9GAT4QNRRpb7AHqwSZCTi2FG0gB6 +sAmkjWeniAbQg02u/eoRM2uBDD3YJOnGZuvn8TL0GLq+ODd7y1sZerDJ6cYD +BhNbOXqwieuroJyCH+XowSZLraruxJfI0YNNdGOLLvpMUqAHmzy2y/KaE6lA +j6H11MlnzXMV6MEh1PXSWTpTJXpwSEeoVYcsUIkeHLJTefk3xX0lenDIyaoc +LtOgRA8OGWM7jTNh7SB6cIilUca2BSmD6MEhbrLDskDpIHpwCPtByckz7ir0 +4JCkSIH6ZZIKPTjkuyUuVsZtKvTgkN0C4PssVKMHh4TkxuSnJajRg0tsZ4ao +GA1q9OCSEk0ECbXXoAeXjPquI7oiVoMeXOKhsw1zL9egx9D5b720z6Zp0YNL +VEv9x5BdWvTgkjHrpse9KtCiB5d4diyf7W+pQw8uYT+f29cfqkMPLgnJMbl3 +7okOPbjkws785S7GevTgkoTX0otCfz16cMnbfsmZC/f06MEjKxfnsrz1evTg +kW3BqiaztQb04BGuQMGqTTGgB4/kfnttY8qAAT145Ejm3x9zrKk82oNHyhil +Y9K+pvJoDx5JjPR3urCXyqM9eORaDNv1+FUqj/bgkU1W6eNiX1J5tAePdKUe +4u8RU3m0B494zPo4a+dERh7tMbTe5X2rdixj5NEeRsRirtMnOyIZef8FYFEY +wA== + "]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], {0., 0.}], CompressedData[" +1:eJxF2AlwVFUWBuDXr7dsqGyDIiKKCoiIIKOyyDmDBhApEHBwCaAVlagoshcD +KMIEkTiAwyKgYTWoCArIFgTTQAJBwhYCJIQYsm9k6fSS7nTS3fPuvT81r1KV +yvbePec795z78lD8J+PfM2ua1sekacaHpmv/v9KfijE+2vDCDr+OKF6QSKM+ +HPr55sYYfL2Ocr6f8XxUbgyndl12e1zqFpry147AvON3fp5CtX+7dqR0ewx/ +u0lcu2juK/a5ryy/8/u/kpY0sP8fH8Vw7Tjxnf30Zfq0hl7j7/z9QeoY3Lzn +m2djOCpXPOgIbX3m8gfmB+7c7yj1mqH3mKHHcK9Jq095ex6n/bsGlBVURuP+ +aTS4dOr2ly5Ec4pY5vcn6HSXTVMO/xaN552kMROz7u++MZqfllc65a8O5q3+ +NBrPz6D4P/t+0xofzenensYTTlO9Hj/hg5HRWE8mzR+y7p7rfaJ5vHzgWdLn +nbkwrH001vcnrdzrT9rrj+LiBeKG56h99eMjuxRGYb3nadvDk60r0qN4plje +jAvUR3z/pyis/yIdWH9ycfyqKFYal2nIJfeQS7OjEM9lOhPxWGDwG1E8Uj4g +m8YPe/3IT0OjEF823VyYNKfjI1EsnjZp9RV659DxfksjoxBvDjXUiyuSZTi5 +ObSg50N74q5GIv6rJMI9ezSSHxTL6XqNVn237LG/b41EPq5RB8GbGMkJU8V1 +nXbcVbPtrg8jkZ9c6jOyy5SFYyNZ3K3Dr7l0cMmY+6sGRCJfeTTk2Od5r3aO +5CZxO28eZXl+W38yHIH83aAJT5aPf7I8gofKG+ZTYUKne747F4F85lOCoWvf +F8FyectukivfCHh9BPJbQPNlHBF84by4Csg8psgy5u0I5PsvWr283anfYyO4 +o1xgIXU6+eLiHr0jkP9C2haYZwhHsLzdpFvUe8CuZq3JDo8iSv345uGPb9oR +TxHxj23m5J+ww6eIzhRRvxE/2BFfEU3sPKv+wFd2eBVT4YSU3d1m2hFvMb2/ +8vr7Kyfa4VdMTglsR/wltFAzKvohOzxLyDro4205NjvyUUJrZm+dzLU2+JbS +vb9kd/4l24b8lNLOCnPefUds8C6lvt2eWf9Fsg35KqPUN94f715ig38ZvbD2 +27vfTrAhf2WUJT6NtqEeymmcLbxiYH8b8llOZSLcTjbURzl98K93LO2DVuS3 +ggTv4hIr6qWCPq/N/Kw204p8V1CUKOdfrKifSlrz1hPNp9dYkf9K6mxs3/7z +rainSvrxytdGxFZ4VFE/0a5esMKjio7Feuvm97TCo4piF/fYXd7GCo8quiQD +tsCjmuJcXz3qyLPAo5qKe6eV9E6zwKOapr3n3Lrxews8aqhpi9jAFv5aetSQ +qOZZ0y3wqKHodstzCydY4HGb1r58dN3LAy3wuE0y7K4WeNymn9IeuPtRiwUe +tdTfP/b8f6vN8KglY/euCF00w6OWYqcdHD7toBkedXQpxQDeZIZHHU0qvNeo +aDM86qis08uf7X/XDI96mj7u08FdR5nhUU/NRrdK6muGRz0tzSg+5OtghkcD +tQm1n/1uQIdHA216dvhT2bd0eDTQgzPn1z1/WoeHk/b8LC4d8TipX1lBQqev +dfg46Q8j3MS5OuJz0sjX/lHifFOHl5OyBS/riNdJced2Tjr3qA4/J4lyfjZa +R/yN9In8MxM8G6lFbN/rJuSjkRL3GREfM8G3kdoY7apmmwn5aaSN3XOyJn5h +gncjdRPteZoJ+XLRvm+MgMeZ4O8iMY42P2NC/lx0KjL5RGQXE/ani0a9cPHT +eSYT8umiq4uMDVyhoT5cNOmwENaQXzdVNbx76Ph+DfXiptm9NszqtUFDvt0U +EgNpkYb6cdPy5JZaPV5D/t1kDKOfPxmhoZ7clGzs3oInNHh4qPtLax55qZ0G +Dw/FifAawqQ8PDTb4Iv9PUzKw0OJ8jlhUh4eSp4iFhwm5eGhPaK9dA6T8vBQ +xotig4VIeXjpihgP+0KkPLxU+bgYCCFSHl6S4314iJSHl+5uK64QKQ8vPZw4 +96uam0FSHl4a7LthzfghSMqjiUaL88jMICmPJooT548hQVIeTTRLnDfsQVIe +TZQkzhdXWkl5NNEWCdhKyqOJ9onzQ0IrKQ8fZYrzQv9WUh4+uibOB8EWUh4+ +dR4420LKw0eamP9rW0h5+KiDmPdTWkh5+EhG1bOFlIefnhfz3B0g5eGnsWJ+ +pwXg4aepYl6vCMDDT4vEfH41AA8/rRTz+MEAPPxq/tY0w8NPR8W8PdgMj2Y6 +IxtwMzyaKV/M01HN8GimSjE/OzbDo1nNyyI/PJqps5iPu/3waFbzcJ4fHgEa +KuYf++ERoNfEvIv2wyOg5tt1H6l+GSCxHaZu98EjQHK7f+SDhxGn3OA+eLSo ++WTywaOFZNjnm+DRQoVi/mxogkeLmjfxTfBoIbuYL32a4NFCXQWv3wuPVjU/ +0r3waKXhopxXeuHRSm+K+fC6Fx6tNF3Mg+5eeLTSUtH/6z3waKV1ot8f9cCj +lX4U/T3RA48g/S76+RgPPIKUJQP2wCNIpaJfl7nhESRxmkza64ZHkKJEP17g +hkeQuon+G+uGR4hENXe6xw2PEI0Q/TXfBY8QTRb9dKcLHnf2pQseIfq36JeD +XfAI0SbRH20ueIRJ7N6nshvhEaYTov8lN8IjTDkSuBEeYaoQ/a1fIzzC1CIP +2E54hKmt6F+ZTnho/IjoV2uciEfjAcfFxHXCR+NRfePua+3hRHwap8r+0wAv +jeX2W9hAMtypGsfI/tIAP42HyH5Sj/6g8WTZP+rhqbHqF3XIh8by/SKhDr4a +35D9oBb50Tg0V+z/Wnhr3BNzXOXLxPJ8nnYb/iaeI/fzbeTPxCly/9agHkys +9msN8mlieb7tWAMnE3eQ+7Ea+TXxMLn/qlEvJp4q91sV8m3MJbm/qlA/Jt4v +91MV8m9ieX7bUIl6MrEu90slPHQeIPdHBTx0niD3QwU8dF4k678cHjrvkPVe +Dg+dL8r6Lkf96eyR9VwGD527yPotg4fOo2W9lsJDZznfZ5TCQ+ctsh5L4aGz +Q9ZfCTx0rpX1VgIPnWNkfRXDw4x6KoaHmd/a4Vh7zVUEDzMv+1JcRfAws9wO +XYvgYeafZT3cgoeZg9K/EB5mHiO9/4KHmbdI3wJ4mLlKehbAw8yqf96Eh5lX +Sq98eJhZ9bcb8LCwfD1Pz4OHhafL/OfCw8Kqn+TCw8JtZX6vw8PCs+S6r8HD +wqkyf1fhYUG+cuBh4SkyP1fgYUE+rsDDwuFB4oU7Gx4WHivG79zL8LDwczK+ +S/AwztUyngvwsPIyuf4seFg5Qq73HDysnCbXdxYeVo6V6zkDD+M9QL7wn4aH +lb/MsRlvSOnwsPLojx5vM9B3Eh5WzraIAXcCHlYOyfX/AQ8rt5O/fxQeVt64 +eeaByymH4WF8fVFMpAPwMN6TwuLaCw8bc/yq0X3jdsHDxqkZ4kCxAx42/qf6 +BwQ8bBzRo+Ks57dl8LBxyqAl7Z9b8o5Dedi4JOMH441ntUN52PiNZHmAcSgP +G4+q/Y9xItjpUB42HmZMl4lZux3Kw8bbjbu1f26/Q3nYuLexuxYmHXQoDxsP +kg3uiEN52PnWYhHAMYfyMN5rxXFiSZpDedj5mKznEw7lYee28vxzyqE87DxH +9tMMh/Kwc6bsz6cdysPOTxrd79aqTIfysPMSub4/HcrDzg3q/yYO5WFnlus9 +71Aedj4kXv+fvuhQHsZ7uVz/JYfyiOCBcn9cdvwPii3PJw== + "]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], + GeometricTransformation[ + Inset[ + Style[ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], { + 0., 0.}], CompressedData[" +1:eJxF1nk8VOsfB/DZR9ZZWkgbpbTQlSxp+T5KpVJX3VK5WrQpLZZfUlpIuf1C +pVLaN223xU1IRYqkdO2FBsk+djPMwjDjh/l6/Z7X/HPmnPM8z/fz/p4zY7TF +a9V2OoVCMaNSKH0fCo3y/5G4t/TV3lI+OTw0ZnFlwEk4RqTRNfmDx5Hwpi51 +DOsLn7weE9K08vUtmD76YWbhu8Hz98FXWqpwieOTa1f7x99Qr9uaHv548PoY +mJ5MVx26ySfNK/u/iQWbbb8tMroweH88bC5q1Q75i080i6O952omwvqUhkuP +AgbnewM7d09Thu7jk8lu59KkpsmQ7lpgZ7FlcP4U2GLsOPHGGj6533d3cfQH +mGJvdijbcXC9VMgpqs7PmM0nlgPjIxTaCBJOmw+unw6OdyMujjDik49S074V +PsGkZv90H/7gfj7DEln42atMPlk1sOAXmHZcYBIh5+H+MiHM/+tzlwYeqQzo +n/Ar/Fa2w661hIf7zQIBzzN/bRaP+PRvzzsbghIcdke+4+H+cyA5lSW5H8Mj +ao08CAqzcgq9zcN68sD06rklCyN4xHFggXy4tPhDYlEQD+vLh/oyxnrw4ZH+ +1dzOFYBdYHpdoDsP6/0GYetH8a6u5JGBcoq/wQy++8kwex7W/x2e3L78a60F +j4zt386YQshb/itFNY6HeRQCX1j1KojDIx47+kcRvI4ydynv5WI+xXB48VkT +/TYu6Z9taEwxeHduemxezsW8fkDry0o342wukfVPJ/0BgoMByR1JXMxPALkx +qtnRT7hk3sCEJaCxSbTM4ioX8ywB69ikdbdOccnA9kJKIb2h7WujHxfzLYO0 +OX7sEdu4JDurf5TBv6/fe41fxcW8f4JZaK87h3DJsIENlkNg7opZ5WZczL8c +LKx/Lj9jyCUD07n9Ask5A+noIVz0qADWOcHxCBkH66mAO98CHWqrOehTAYG+ +48JG5XOwvgq4p3//rnUKB70qIaatId/yKQfrrYTzW+q3Dr3CQb9KmFyZdfPH +SQ7WXwXS9yPTg3w46FkFkSsyDXQ2cjCPKqgH94qjSznoWw03Dxus+2bNwXyq +4YJPx3ud8Rz0robhrOI1ZnoczKsGhOvcnm+T6aF/DewNoyhn5ehhfjVw8sVI +bukDPeyHWti3q2Cj41E9zLMWftiYuQav1sP+qIW37Q4HTk/Vw3zr4E74MZON +ND3slzrIXJEqoAh0Me868I2NYfj+o4v9I4QEacmIlyG6mL8QXB6xQlL/1MV+ +EsLYqetT7ljookc9FATdsHZm66JHPZxwC3DPK9NBj3qISnkbZ/RSBz3qYeH0 +k9EOp3TQowGiPt58PMtNBz0aYB8vbg7VQgc9GiB+7rXS60wd9GgEQ9sbdM0S +bRIx4NEISz3fWznFaKNHIzwtHyrbEqyNHk2wZYRG1goXbfRoAq242PmcKdro +0QRj6GYNj5Ra6NEMXxJEq4bna6FHM+jETdF3u6+FHs1g6DS26JC/Fnq0ACkO +m+69VAs9WuBEgXY2jNZCjxY4c+fUhoY2TfRoBS9x1OW9aZro0QpfKilW2ZGa +6NEK8UVGSg0PTfRog2lDvZKMZmmiRxtsY7Q66Gtpokcb2I1O8G8pG4IeIni2 +0Gv2vZghWI8IdpyvOm4TNAR9ROA2KmBxzMohWJ8IgpMLLrLHD0EvEchmLg1w +kGhgvSIwOBIxcscnDfQTgetlu7t7L2tg/WKYscfF0c1DAz3FENGoWmtpq4F5 +iOHL7baJEg0N9BXD8MbhhncEbMxHDL5PTZ7YPmGjtxiOrTF0fR/Axrza4aAi +K9VqGRv92+F60/bTNw3ZmF87OC6q8OxsYuHz2Q5pj/4zwzGZhXm2A8ugM+Vs +OAv7ox02jJpNy3FjYb4d4HPLgaphxsJ+6YA5u09/n6dkYt4dEHpf4/H+bCb2 +TweE31qZ9PQmE/PvgPk+Xu51e5nYTx0wMTCRMmkeEz0ksGDGQZ63LhM9JMCy +CjFOL2eghwTsQ27lmPzDQA8JHKn+51NUIAM9JGCwri5jlDMDPSQQm3P1TuI4 +BnpI4LHJkOm7xXT0kEJjkNDVLo2OHlIot3g7wvQiHT2k0D6evcVmGx09pLBv +x+q5u63o6CEFc3NFbAaLjh5S0PDL/Or0g4YeMnhnHXqB8oSGHjK4a7qGW3uY +hh4yEDzNXqJcTkMPGdhftLd2GkdDj75j04RP39up6CGD7siqH1c/UdFDDrnH +Z8KtK1T0kIP7zPS4mt1U9JDDm/KtJV5ARQ852CrfzZnPp6KHHF4+uLB4o5CC +HnKo8Dd0zEiioEcnbD56a9eRCAp6dEJwrE1c8HYKenQCbUIFs9SOgh6dMD/p +9chTHAp6dEKh1mw6N7sX1B6dYJCkSVIP9YLaoxPWxGzebDSpF9QeXeC33em4 +ZaEK1B5dkOsyZGfXCRWoPbqg+Kxt8H5LFag9ukBs8rLuQbUS1B5dcNlS6HI2 +Uglqjy5Ik3wl5ouUoPZQQLONbWpIZw+oPRTAz8l4GPm0B9QefedT6X6um3pA +/b5UwDpvlUcRvwfUHgpYtGzUQXZmN6g9FKDSMNnYfKwb1B7dULLoUNQJq25Q +e3TD2ck7PP9tVoDaoxt07U43pt5XgNqjGwTRtsptGxSg9uiGPT01G14OV4Da +oxvefve89yivC9QePeAfvAzmh3WB2qMHuhI+hQUu6gK1Rw9URn/+5EbrArVH +DyQ8SBhWnNIJao++un+nXmg63IkePeApOTM/alYnevRAVXjF+GK5HD2UUPTG +YMrjV3L0UILU580C9gE5eijBJnCam9hKjh5KiAufsHGrTIYeSljanWTlmihD +DyW80PcoKDgoQw8VmD+MN/1qJ0MPFbwT/LKcq5SihwoWWlrLTT9I0UMFybf+ +CAw9IUUPFYz0tqne2Pfcqj1UIMiauTBaS4oeveA+PPXb6jwJevSC4S/jr96X +JOjRCyW1dB+JqwQ9eiHlaP2Yn+Mk6NELB2LP2poKO9CjFw6vtrH49rwDPSjk +s0FpaOn+DqyHQriPlhfNm9OBPhSy86hznILegfVRyA/vqDztrHb0ohD/pR+a +fCPbYaDcHRSyVg/yp2xoR7++652I24yJ7aB+P1BI87PgA6faxOhJIR1yU33T +N2LMg0JqI0MW806I0ZdC7AIq9B2WizEfCsn2to1JGiFGbwqh+1Bs/KtEmBeV +rM8TtO1/LkJ/Krlcucw47qAI86OSoOuHJvzmIMJ+oJKcjMJ1jXoizJNKYlc+ ++/NDYhv2B5VcM3aaPc65DfOlkutLY/8U17div1CJs491+W/BrZg3lbyX5naV +GrZi/1AJdaevoi2hBfOnEvszAcTTuQX7iUqEi0cQx6Zm9KCR6NiEoFN/NaMH +jYx56HXDxLgZPWjkRecRGJfShB40Mvroo0l+rk3oQSObtdLGG8sbsf9oxP+q +Md8kshE9aOTQ8bG1hy0a0YNGNGkRVybkNqAHjRSwnWeP3tuAHjTSbf+5YatW +A3rQSGjIf3Jkf9ejB43oHztg9N2xHj1o5NnDiaYKoRA96ER8InqmxykhevT9 +zgzb+8BgkhA96ITlr6rR+1yHHnSy5MruXY4edehBJ6O5tPhUdh160ElCS7Nz +wONa9KCTyT6lRd5LatGDTkrin9RFN9agB5046fOm8sJr0INO8j1XrXtrVoMe +dDItVTj1em41etCJX8XcPXE+1ejBIH7mHvXUodXowSDUoUX+Ia+q0INBVqbo +K+asr0IPBqk1i3KZ1FOJHn2/64F/HFlwuxI9GOTmpmfuEfMr0YNBFBeMGDp1 +FejBIPJTI3e+Pl2BHgwSXxJz5bxZBXowiN6xyhXTo3+hB4NMPOK77mJTOXow +yHbf5tPLZ5ajB4OctpdMcTv6Ez2YZN+Da2ffZZShB5Poj6bxvTll6MEk4ga2 +ka9rKXowiZwmmpp2vwQ9mOR3IT92Y5sAPZjk5fRIm0V2AvRgkln52s7+IT/Q +g0k+CJdFivKK0YNJZAytRy9GFaMHkySVPrF8tbMIPZgkdI64pTe+ED2YZKJT +5vlwaiF6sEhqCbPadcV39Oj7n5dr8nzX9W/owSKXL4z8mFhfgB4s8tCN07vA +ugA9WGTaLtv5Oifz0YNFOhsj9/MK8tCDRSYmZ5xcNS4PPVikbM+b3Cs/c9CD +Rbocl8xQBWSjB4tMCeq2/KafhR4s0rJqffWwxK/owSJe0e6u6Wsy0YNFjvzX +OqVM8hk92KQyInvehsgM9GCT9gv3hjvM/IQebKJS7gk99/0jerDJgtDi+rl+ +aejBJop5dqHLh6eiB5ukrXx+55DXe/Rgkykh05yGxiWjB5vszryk8pC/QQ82 +eXew6oXPnET0YJOiTY17zIPj0aPvf7qNyOn6l1j0YJPk81tlnmNj0EODMAWy +LZKYx/A/LlW2lQ== + "]]}}, {{ + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, + 0.33333333333333337`]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}}, {{ + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}, { + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, + 0.33333333333333337`]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}}}, {{}, {}}}}, {PlotRange -> All, AxesLabel -> { + Graphics[{ + Thickness[0.10504201680672269`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, + Thickness[0.10504201680672269`]]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.02963841138114997], + 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}, {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:eJxTTMoPSmVmYGBgBGJ5IGYC4ieJC6+Z/DdyONi9r8lkMZMDjP+y9nH2+TcI +vvRGsflMCswOM0HgpJFD4fKSDf/OszjYV0asMLU1dBCunFRydomAQ3LsHTfm +GwYO/8FAEs53ntAslHZKAc7f4dD06LiEqkPBmu7bGQGGDnMWKe/8k67p8HXn +ra6/V40g+ut14Pa/Kd4q+vs0gr8VpP8Ggv8CJP8awU8B2SOh63C4bXn4qU9G +DlMn8FeZaes69AeXqEy/j+CD7dmP4IPVLzJ02KKXt5ixRtvh84aA7FnPDRwa +WY72G4ZrOHwBuc/VwOHUYae1mfNUIfrlDRzWCunwpd9TgvNh/oXx3dccXc6w +Q9bhIMh8JwNIOO4Ud+jxesVi8tHAIfjt5Y8zFIUg7ltv6OD/xPOSqTAH3H2Q ++GGEux/Gh/kPxof5vz+i25/xA4IPi18AYpP1dg== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdlAlIU3Ecx2dKdlpoczNX2pbp28IOt3fR8S06pCxDO1Ytw3KugyzIqIYG +JRlpqZWllVhmoEFRQZdRKzqwQzuwIsSSIui0MkQCS3v/91//R/3g8fjs7f/9 +3f8RK9anuAN1Ol2A8ixUnl7Kk3QveOLR5zx6iBWbEfMur7JRFhlP3OqsdezV +ePKOt/Xln0UcJrbbjMWGy0912yRsvn1p+uFcM96vsXWWNUqYefpujW6LGd/P +zVt7JFjGtJK80MwCC8pKBnn5LglDtu7Pbrxgwdyn+1zdgRIaiFVY6DtJRG3n +xy0NJRZkX9R3PUwTGDuJv6/8v5wl4MCunUuaJnDYHnS3eNxmAfduTz2zupLD +BxJProB36VUv7I85f9wCzaeHQ1zbQN/YCJH6HWCl+XtFzGuOzEkPtWJp9JT2 +lS0iLkNJ3GhFUWr2yLIoibF6rkXjPjNiNvVaIkOYcD3l0BuOfnfJcGcqls/h +pSI7fpOMxBu5w0RPLOpJnD6N1XrVyzhLAmmLw2RS/1cyTDUfEuOjrLQe3TI8 +RK+3jZ23JygWZsOd/JpFD1bI/nhsOBefVR0wWmP1u1njPbM+BdkDNM5Y1jIj +8IrE9PqTfGb9rY8N94m/eJH5vyD8vJXhFRifJ/5cGqv1/MQzHph8ttRdrrGq ++8vB/J1s9YVUbHSweFT9NQ4E9S2IWpllpX0cxNP6plupnpOnebqs6Efi9fJ0 +zmwal5L5uMYxrjhhqfvl4fzzw2Os9VTYk5NxeEDyS1P01PrHooX0a4E/viYD +tnXJGx4lOtDha7/o6QzHTdK2kQ7Mb2tqL68Kp3qVdnhbfzYnzA6n/SqyI/rq +cZ87RE/rM8CBL/nrCsdH6ll+pByZo/T4Qfofy1N/CXoaV4bGYwh3iExP/TlM +Yqzu4ySNVf0Cifl7T+r3TWL+1HqnykxfXYvlMnJI/J/D0VHXXPDbLeNM6OgQ +z2sDm1+6pxEwVaZxD0tk3Cz07bBXR9Lzx2T6bjXR+2COxuo5k0z3P2gond9u +//4nGel8vpXontYZUEz27ZgEV4zT9CjHgFvqfP/9v4HeH3kiipyFyQGDDXQ+ +WgXGtcra9KRrrPZjuOCvhwEust9JPI0nQ+Od0cExDaUa64jBSPWTeaSq/TbC +ePBZ31UpvF8/Av/fp38AMKhU+w== + "]], + + 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:eJxTTMoPSmVmYGBgBGJ5IGYCYol5cZqnE+wdnCc0C6WdUnCA8d8vWq9wdoeS +w9Ms7W/Tbe0dGliO9htuV3XoDy5Rmd5v5/Dr7esDls0aDj1er1hMLto6PElc +eM2kXxui/4CNw9QJ/FVm2roQ+YUIfoT49osMfQj+n2+lD+Y02kBoQQT/RfFW +0d+vdeD8rQ5Nj47fQPDfgORP60Dct9fGYcZMIIjUcdhfK2uR/sXWIT0NCJ5p +OtT+tio4t8LOQVdR/kvON1U4H+ZfGD9aNULmnIykw5L7+/jmGNtB9KcJOKg+ +aZ53dpWNQ+Hykg3//Fng9ktvFJvPpMAM57+sfZx9/g0TnH+we1+TyWIEX/2T +ystZnExw/0PkGeHhA+PDwg/GB6u/ZwuxL4ED4t4Zdg4g786sFHJQAbnPyt7h +DAi8EYfHX839H7eMs2Ud0OMXAI2x5G0= + "]]}, + Thickness[0.02963841138114997]]}, { + ImageSize -> {50.61767372353674, 24.508064757160646`}, + ImageSize -> {33.74511581569116, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {34., 17.}, PlotRange -> {{0., 33.74}, {0., 16.34}}, + AspectRatio -> Automatic}]}, ImageSize -> Large, AspectRatio -> 1, + AxesStyle -> Directive[ + Thickness[Large], 16], DisplayFunction -> Identity, DisplayFunction -> + Identity, AspectRatio -> GoldenRatio^(-1), Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3., 0}, {0, 10.270270839112932`}}, PlotRangeClipping -> + True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], { + Placed[ + PointLegend[{ + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}, { + Graphics[{ + Thickness[0.08305647840531562], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, + 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGYC4pkg8FPCQWpenObpCyoOMP4Oh6ZHxyNUHNzX +HF3OsEPeIQ0MMPndNp670poU4PwPi9YrnNVQxMn3uzgx5t9iFbj5NZ82BGTP +UnGYAbJ3J4I/Z5Hyzj/P0fjqqnA+2JxkBD/glnRN4iRVuPkpsXfcmH+oOqz4 +9rLizAQlh0cR4tsvPlB1OAMCexQdNunlLWa8A+WfkXFICAlSX3BS1WGtkA5f ++jpFBwOtlcIXXDQd1oD4ecoO/0FAXhvinx/KDicOO63NlNOB87eD/FOhC+dP +mcBfZdatD7cfHK6ZBg6poGBwU4DzWxXYVc98kYXzeyO6/RkNZBwcgcbNsDZw +qLn/45ZxtpTD0V07etkm6DvI71qwL/WcpMMGkPtldB2mg/TdlILzH7jGO84K +lHaQAMXnB12HdJB9z6QdtoDk/+g5mBiDgKzDcZB5BfoOMaoRMufmyMP51SD7 +ohXhfLC7IpUcdBTlv+SU6cH5LJxd8snvdOB88R6vVyxTtB34YwPuG00H6geF +j52Ww5u23G4jaXkHUZC8iIYDenoDAMDOG9o= + "]]}, { + Thickness[0.08305647840531562]}, StripOnInput -> False]}, { + ImageSize -> {18.06422914072229, 26.03675716064757}, + ImageSize -> {12.042819427148194`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {13., 18.}, PlotRange -> {{0., 12.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.02853881278538813], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {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}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4jQQmGbqYGqzN2haoq5DhPj2iwz3EPxPGwKy +Z7GbOfhenBjzL1nPQWZenOZpBTOHB2CF+g4SU69wZmwyc3iepf1t+lx9hy3m +Pw6laJnD+QVrum9nHEDwVZ80zztrZeEQHxKkvmClHpyfCnJHmy6c/6Z4q+hv +bR2o+eYOCSD1nNoOJUDh03wIfoyC48fkP2Zw/qG25eGnHpk5rAcZxKvtYKC1 +UvjCETOHgFvSNYlC2hDzFpk5NLAc7TcU13YA+7/NzEEcJK6k5XBD6JPj+Wlm +DukgcTYth5OHndZmvjNz8DnBbjs7VAviPylzhxcg92VrOfD6r5+SGoHgJ8fe +cWOWsIDzr4PMa7OAiFdowvlGxkBwWR3On9LeGnX5j6oDl5tqKdMvcweP/bWy +FsdVHJbc38c3RxnB13jLu89gpxmcDw6vKDOHMyDAowpxp6iZwwaQRK8qPD5N +QPZ9VnVgAIEDpg4vQPERq+bgB4rXyaYOjaDwCFd3+LrzVtffUFOHht9WBec0 +1KHhY+rwNHHhNRN+NYc6kPgMqHyGKiS8lplCwrVJBZ4+noDU66vAwxccblwq +Dhv18hYz3kHwDwC9kT7FHM4Hm59h4TATBG6qQMLthQXcfrB5ZpYQ/55Rg6Sr +WEuI+6erw/nSIHcUaMD5zJxd8sl+mg79wSUq0/UtHY7v2tHLJqDlEA1KP3cs +HH68fX3AslkLkn4WWTjoK8p/ybmmBdGfa+Fw/mrYG/3fWvD40QelKxVoetsE +1e+sA3HvDwto+tKF8+csUt75R10PzgerP6zvYFsZscLUF+rfTAMo3xzOB8fX +BjM4PwWk3wOa32wNIOnhpik8f6HnZwDIbKDV + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, { + Thickness[0.02853881278538813]}, StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.03675716064757}, + ImageSize -> {35.04043835616439, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.02853881278538813], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + 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:eJxTTMoPSmVmYGBgBGJlIGYC4gjx7RcZzpk61P62KjiXoedgoLVS+MITBL9k +q+jv03zmDiI9Xq9YSvQdQJSJoLnDdoemR8cr9B1MjIFAGMH3OcFuO1sUwV9y +fx/fHGUEPyX2jhuzhrnDk8SF10z8kfgghzzQg/NNbfYGTVNUg/P/fit9MMdQ +Fe6eU4ed1mb+U3FY9sJD7/9EMweZeXGapz+oQGgBM4dfb18fsHyM4O8A2R+h +4nCgVtYivcTcIQ0MMPkvsrS/Te9F8EHaZqxG8MH23kPwz4CAjoWDGci9iSoO +daBw87BwmNLeGnU5RsVhJhgg+Mkg//ywgLsHxoe59z8I1FvA/dMNCm9GC7h/ +udxUS5leIcIDxoeFF4wPtjbTAEKfNHe4LV2TaFRqAIkPY3OH60KfHM+rGTj0 +BZeoTO83c/gBsv+wPsT/e00dnoLiR1/fAT19AAAKfvOh + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, { + Thickness[0.02853881278538813]}, StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.23854545454546}, + ImageSize -> {35.04043835616439, 17.49236363636364}, + BaselinePosition -> Scaled[0.3029987538415624], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.49}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.07062146892655367], + Style[{ + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQnZ4GBM8+2v98+/qApbKKwzavDRZzfv6A88+AgA+D +A4z/svZx9vk1DA4ea44uZ/ihDOfvza95OzNVCc63L3GsPT2HE43P7HCge1+T +STKDQ39Etz/jByao+b/s/4PAfiYH763+x5PbPtpf570tllqG4JsYg8B/e4h6 +JocW8VrWzGOY/D6QuRtY4PzC5SUb/vGz4+RD9As4oJov4ACz/waINuNxgLkP +Ej4ccPdD7OOA+w+VzwnnP3CNd5x1URTi3x5uhy/7Pm5N/ybiMGMmCPA5MIDA +AhGIukJBOL9dgV31zBUhVHlBEQeNTyovZ70UcWgDy4s4iFROKjmbIgqhXaQc +qu//uGX8WsLhLMg+HRmHHcFWEf/VpRxqQOLZcg73webIw/nhnGLtxvyKcD7Y +nC3KDttB+tilHOYsUt7557gqxB0NInD+m7bcbqPdQnC+MEgfi6DDjAn8VWbd +qg7Bby9/nOEo4PAkceE1E31VeHhA0osynH9i145etg2qDgFPPC+ZXmaHmweO +h29MEL67qoMHKD2w/bEPvCVdk/hJxQGWfjeoPmmedxbBh6VXAFUATEo= + "], {{ + 3.08594, 8.94844}, {3.08594, 9.11406}, {3.14531, + 9.245310000000002}, {3.3000000000000003`, 9.44844}, { + 3.6468799999999995`, 9.88906}, {4.134379999999999, 10.1156}, { + 4.731249999999999, 10.1156}, {5.851559999999999, 10.1156}, { + 6.56719, 9.32969}, {6.56719, 8.089060000000002}, {6.56719, + 6.75469}, {5.768750000000001, 5.76563}, {4.695309999999999, + 5.76563}, {4.039059999999999, 5.76563}, {3.5515600000000003`, + 5.9796900000000015`}, {3.08594, 6.468749999999999}, {3.08594, + 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, + 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGZigIINCg5S8+I0T19QcYDxdzg0PToeoeLwNHHh +NRN+FYc0MMDk+5xgt529FcHfpJe3mDFGFSe/keVov+F1Dbj561WfNM87q+Ew +YyYQ7ETw5yxS3vnnORpfXRXO97s4MeZfMoIfcEu6JnGSKtz8lNg7bsw/VB18 +QeoOqzk8ihDffvGBqsOxXTt62T6oQtx1R9VhJhgoOSSEBKkvOKnqYGazN2ja +Q1UHA62VwhdcNB1MQfyF6g7/QUBe2+FV8VbR39oaDicOO63NlNOB87eD/FOh +C+dPmcBfZdatD7cfbE2mAcSflSpwfvnhba4zdZXh/Or7P24Zeys5OAKNm2Ft +4PBh0XqFsxmKDkdB7p6g7+A8oVkoTUrRYQPI/TK6EHfNR/CVrz0KZrij6CAB +is8Pug7poGBXU3LYApL/o+dwBgyUHI6DzCvQh/iXUQXOZ+Hskk/uU4Xzwcp7 +1Bx0FOW/5JTpwflgde904HzxHq9XLFO0HbaY/ziUcgqoHxQ+dloOK7+9rDhz +QNlBFCQvouGAnt4AakwW/w== + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4vNXw97oz9ZwaFVgVz0zRdQBxtf4pPJy1kox +h5TYO27MEeoObmuOLmeYIeawQfVJ87yzag4KuxbsS+0Tc3iRpf1tuiyCL1w5 +qeTsEkW4fuVrj4IZ5ig6mBgDwWURB/7YgPtG0xUdREDqUkQcqu//uGVcreiQ +ngYEzwQd9uTXvJ3JqgTnlx/e5jrTVsnhTVtut1G0iMN/EPBXcohRjZA5JyPq +ADLWeLGSQxXIHG9Rhw+L1iuc/aEM558BgR41OP9V8VbR39pqDjNBQFIE4v67 +qhD73IQdHkWIb7+YoApxF7cQ3D6wOWdYHFZ+e1lx5oGiw3Xe22Kp25gg8vMV +HaJB7qlhdGAAgQ0KDjlTEwotin/Zg/1/RsEh4InnJdPJ3yH8NUoQff+/27uD +wvUEgr9WSIcvvU8Zzq/9bVVwrkMDrh/Gl9koNp/pwS/7v99KH8yZqOFw4fex +6/Mi/9kH3pKuSdyk4XCwe1+TyWImh/Xg+NJwaBGvZc1kY3P49fb1AUtnBP/Y +rh29bB/UHfxB5gczQMND3YFF/xfXJZ5/9pv08hYzyqg7sIL5f+1h4QPjP3CN +d5z1UQnOR09PAFTGHcA= + "]]}, { + Thickness[0.07062146892655367]}, StripOnInput -> False]}, { + ImageSize -> {21.23816189290162, 26.03675716064757}, + ImageSize -> {14.158774595267746`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {15., 18.}, PlotRange -> {{0., 14.16}, {0., 17.36}}, + AspectRatio -> Automatic}]}, LegendMarkers -> {{ + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], Automatic}, { + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], Automatic}, { + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], Automatic}, { + Graphics[{ + Disk[{0, 0}, + Scaled[0.001]]}], Automatic}}, + Joined -> {True, True, True, True}, LabelStyle -> {}, LegendLayout -> + "Column"], {Right, Top}, Identity]}]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.80458343079906*^9}, + CellLabel->"Out[38]=",ExpressionUUID->"ce0b1897-2fee-4372-b7c0-1b8c3414355b"] +}, Open ]], + +Cell[BoxData["\[IndentingNewLine]"], "Input", + CellChangeTimes->{{3.804583067160775*^9, + 3.804583067921281*^9}},ExpressionUUID->"b10f85e1-de1a-45b5-b961-\ +43ea9978a88b"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"Sort", "[", + RowBox[{"Im", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], + "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"i", ",", "1", ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "0.6", ",", "0.01"}], "}"}]}], "]"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"Graphics", "@", + RowBox[{"{", + RowBox[{"Disk", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"Scaled", "@", "0.001"}]}], "]"}], "}"}]}]}], ",", + RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], ",", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"Sort", "[", + RowBox[{"Im", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], + "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"i", ",", "1", ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.8", ",", "3", ",", "0.01"}], "}"}]}], + "]"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"Graphics", "@", + RowBox[{"{", + RowBox[{"Disk", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"Scaled", "@", "0.001"}]}], "]"}], "}"}]}]}], ",", + RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], ",", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"Sort", "[", + RowBox[{"Im", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "1"}], "]"}], "]"}], "]"}], + "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"i", ",", "1", ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.6", ",", "0.8", ",", "0.01"}], "}"}]}], + "]"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"Graphics", "@", + RowBox[{"{", + RowBox[{"Disk", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"Scaled", "@", "0.001"}]}], "]"}], "}"}]}]}], ",", + RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", "All"}], ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{Im}(E)\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804582217002452*^9, 3.8045822783463793`*^9}, { + 3.804582310186738*^9, 3.804582362763131*^9}, {3.8045826574706163`*^9, + 3.804582662150242*^9}, {3.804582767332251*^9, 3.804582823514772*^9}, { + 3.8045828677128983`*^9, 3.804582882829104*^9}, {3.804583559229579*^9, + 3.804583666312928*^9}, {3.804583755991941*^9, 3.804583756851987*^9}}, + CellLabel->"In[55]:=",ExpressionUUID->"38f39947-d817-4c98-9bbd-6cf292924898"], + +Cell[BoxData[ + GraphicsBox[{{{}, {{{}, {}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6], + LineBox[CompressedData[" +1:eJxd1nk8VPv/B/Az+xiGKeqmhfZIi7rRpk5ppw1p1W3TotJOKlehfdN2W9x2 +XLRI5Wo7en+ULpVKllQoS9ZRpjEGw4yfznn7/fE9/3jMY2Y+Pu/X8/15f6bH +8o3uK/kURfnwKOrXX+6REuPNVT4FAQpS7fbQap9SQiLOXJtkt15BciM2jZHl +SsiDbuNOByxRkOd1Nl5hzyTk5c3jbi/cFSRuStFOizgJmUu77243WUHCL/x6 +JERtN73L4pEKsk/5a0EJmSwb1TtmgIJsbl0tYpOEfIrNOa+2VpDWxVpXlJD9 +/JztTuYKMvXXclMk5ESfKtgnVpDf2UdCvBbv/3qx1oxYswtKSLCPhcnAz2ZE +xm5QQmDrKz5DzIj21/bqxOTi8GoyLdqMsMsViUmx+N8JH46ZkTfpvx4xqYiZ +d3DZNjPyq1q3h2Jya4ThiHKhGYn8VW6EmBznv3LdNt6MsNsLE5NJy7JSmvqZ +kV2/ltspJh7htppgUzOyin1aP/8o84O4zpS4swuKSef1r30O55kSttwxYvLk +s/iGyTNTYssWLCaOoRvOHIsxJexyFmLSo11xH3mYKeE8xKTaYfiiI36m6CEi +oj0jh0i9TNFDRNYOuREZ6mxK2O09E5EfFuPu6W1M0UNERnlEz/U3M0UPEbky +Ofj49zo5eohIx5nec1fky9FDREZfybuR+0yOHiLy4LfVB11i5eghIuPlu5RP +wuToISLybnsy7Pzl6CEieY2Zv4d7ydFDRNaPTGknmSBHDyE52/38qi22cvQQ +km0b9g/KN5Ojh5Bs6Pt45UStCXoIyYgFbtKb+SboISSbqr3aK56boIeQjFtW +uHtrrAl6CEnNhffTc8JM0ENI0i918nPwN0EPIWn9kua0lwl6CInWl5eqcjZB +DyFpyrGrcLU1QQ8huQSMR5SZCXoIyUonD5G+zhg9BGQYtbvBPd8YPQRkfRdi +E/3MGD0EZELC/pONMcboISD9nw4d5BJmjB4CEnfHXHfezxg9BOSM4xpV6SJj +wpa7SUD8qxabDHE2Rg8BidYrpu20MUYPAelWfeRasqkxegjIfZtUhaROhh4C +sict5qRLngw9BKTPAKH10WQZevDJrugL919Hy9CDTy717ehidFyGHnyy7337 +gonbZOjBJ8LbFquDFsrQg09ejTxa/O84GXrwiVm7nGnKvjL04BNDkMM5K7kM +PfhkR+cvKbNqjdCDT+4vrEwP+mRExrIb5JPR/RfF3gQj9OATjX/3OR+ijNCD +T7yIaarhiBF68Mlf10qaem8xQg8ecV04sXrqfCP04BGhR9LJtWON0INH3l5J +Lj3U2wg9eKQ+6EbRPzIj9OCRjOzEoGSVFD14ZGKkLPHTByl68EhVaNyeGkaK +Hjyy3ywslx8hRQ8eGTM38L75ISl68Mjdibbynhul6MEjfsZ2BQM9pejR+n5w +Q5fho6XoQZGw0MrkMT2k6EGRpdMdU8dLpOhBkax0ba8J3yXoQZH6ph4Z47Mk +6EGRkN7Hno95JEEPimQOUNY5XpGgB0W6fn79x8DWOcx5UGS96d913ddJ0IMi +at7Vu+3cJOhBEVv/5kMtjhL0oIjs202/qq4S9KBIp8iQdZl8CXpQ5K1i4PIH +FWLMvwVCrw+afeGtGPNugXmiIruABDHm2wK/22xVeoSLMc8WmDOpYu+APWLM +rwXulXT8wWudq1xeLfAhI7prtqsY8zFAonkHccQQMeZhAOfcmCsbfhNj/QbY +PSPwi6NehPUaYNMh/wdNxSI8/waY4eZqnZQmwnoMYFK+Q7ardW6y21PqoU+a +q6/DGRH2jx5CV2SNrt4hImy7XNDD3hdVPleWiHB+6iF85FDlzEki7IfW10Wm +93X9ReivB/fxsQnXFSL0boY/QFk8WStE32ZYZxlsX54nRM9m2JaeGRaaLES/ +Zui5SVLbJVqIXs1wQMibHn9UiD7N4Dd00dFxW4To0QyyP32i0ucJ0aMJjng7 +HJzTOvc4jybYtSOwz8eeQvRogtglcb7zpEL0aIJtpGp25ncBejTBPbuWp1Oz +BOjRBF9LvaMfPxSghw7MI8c29rssQA8dfP99bsSJUAF66OCFaeczmjUC9NBB +WW74I4+ZAvTQwcaUg7y41jnGeejglNJ+gcBSgB6NMGX3ztseBj56NMJiZUnV +5RI+ejTCtM+79d/S+OjRCMes1Bl94vjo0QgBu9fPXnaajx6NULf65qpzAXz0 +aAAbf7U+dTEfPRrAoUpK1Trz0aMButc6zO3UOpc4j4bW/TtVDpfz0aMBBjTN +v+am5qFHA1g9HLlqZesc4jwaYF5Hg9VWhoce9ZDvbn9v5zUeetTDIadkUeB+ +HnrUg98yQYv/Oh561IOV8T8h62bz0KMeBJL4bQsceOhRDxNG7nw4rjMPPbRA +a2Pte7RQ6KGFD93tQFdCoYcWBLL+k96kUeihBTCVR5y/TaGHFs6pfB96naLQ +QwuKsvbeltsp9KiDLn+Uh75dRKFHHWzbqtHsGkehRx1MNl5wukcfCudnHewM +Hz8KjCj0qIO/OsOB2PwW4DzqIOMsaZ8S1QKchwa+Rqe+eLOhBTgPDRTllM78 +b3gLcB4aMERWLrhNtQDnoYEZ7aadCHlpAM5DA4MkxhcmnTIA56GBHml3OmkX +GoDz0EDfgZ3unu5lAM6jFnQJ63hW1XrgPGrhlKs+6kyCHjiPWjB/NGhEfaAe +OI9acLzmPnPSJD1wHrUgMRzdFSTXA+dRC2aGu7Ou5zQD56EGP7te8+IvNQPn +oQb35BudY1Y2A+ehhm8KT+tDA5uB81CD+sOUMve6JuA81ABLzlULk5qA81DD +eA/Lm5f3NgHn8RMcBQ5nrac3AefxE3qa3e12wLwJOI+fEGsfdCv7sw44j59w +VB8UI7muA87jJ7zwmb7F2keHHj/h4lutdxd7HXqo4Nnw5zk6bSN6qODi3W/m +SUmN6KGCszOGrFm2txE9VCA9mmlR7tKIHipQZKnmzGjXiB4qsDq9wOt0bgN6 +qOBVnPW8h5ca4Babfw38k+jg82RFA+ZdA8E7eHF/2zaAlM23BixXVAyfX1OP +ef6AS+2zzVQJ9bCGze8HeO+PG7Z8Zz3m9QNybXLCb9P1kMLm8x0MjcF274X1 +mMd3kDTbprx+qYXubP3foUbzzuHicS2w5aZXQ1Sgy8TxHloIZBesBhgWGPXo +Ny2w8dhUQ3h5ICXMr4OPbD8pYb3tvWqrq3WwlwOC+TU5Kql3HQxj+0UJScsr +g0m/Oihk+6MKHojb8ycqNXCCBayC9iZL4GScBpxY/yqI2LBNHb1ZA9zvnUqo +HGyZtHeYBs6zvpXw5VaUTd/6WvSsBHXczN6HH9WCht1gBfRcOy00blctelWA +rmuK7sSYWpjNBlgBs/3irAe3qNGjAmaNmO69n6jRoxzcKo50OBOsRo9y2Dyx +83xPZzV6lENaQP8+qXw1epTBqcjKyWWtfejNepRBgPbUnDshP9GjDGqaf4uz +cv6JHqVQnDNzuz3vJ3qUwqzrf50qBBV6lIJn64XRP0iFHt9AP/ZrvpGTCj2+ +wcLS2CtqdQ16fAPt4huW5etr0KMEPjl+OVxa+gM9SmC3OH1z0eIf6FECIbmG +WW+yv6NHMVj0pY+Hu3xHj2J4apHpNRKq0aMY7m2Uhp0fWo0eReDpQW+OilSi +RxHIejufd+2gRI8i6K5Kitm2two9CuG0qncHqboSPQphRHX9u6rFlehRCMPi +i2sMqRXoUQih7iude9lXwHw2/6+w+llO2tCz5Zj3FwDXSZ2FujJQsPl+gcz+ +vSLWLCrDPAtALLN+ZPe4FNLY/PKBfnXYv13HUswrHzqmfXLN2fANDrL55IHI +ZeBgm5QSzOMz3L1gNDWuQwmMY+v/DLtvHi5rWl6M9X6Cbn8lBp28WQQN7IIf +4Wx0pNOHH4VYz0d4dSzhiGJAIcSz/ZQLktSvigcpX7B/ckE32WjW4B4FeH4/ +wNqPhlHRa/OAsP2RAx0G2kyffekT9kMOZKYn+TXcz4UA1j8bTKauOD88Oge9 +s+DJn555eeuywJ71zYKXyryw0JoM9MyECDNPaap1OlSwfu9hn1WoxqYxBb3e +Q2SOTVTFivtwlQ0wA0o9/Zx9r75gOI8MOOj2oOydagsTz+b/FkSRX3qHu5Qx +XN5vQHTLLXrzfwOY7my+6bCvZ5cHG497M1yer8A68EKjb+pm5gSb30u4vqNf +0riReQyXVxp06D9kabzoGaNg80kFr/Ptjd+5n2S4PF7AlIS5W/a5+TJ72PpT +oNeQArroZCbD1fscspdmj4qMGs+o2PqSQXgziZf53YXh6iHQ8Wh6hjhkO0PY +/T/FPiO4XwaiGgWrYv8gzFV2f4+g/SJ3ZXWvlQzF7ufB/3+e+/8JQCnOfTO5 +p3lSyP6/u/h+PK4fB3lWoWN9D3Zl9rDrxUJop4LEf5m++P1IyHRueVT4/iKz +h/385f9Z/wwoB08NsiXJDMW+3guOw4atS29RP6H+9+nAvk9nhVIP7TZFPMHv +09ybDEOxF9xlWn5bb6J21+H7kfQhV0NNRcIFhvsBE0tvXPd+l/g/edv+aeks +91PJkk4MxV5od2n/wX28JyebttVP77ANHySJi2nLhx5tMma+nrZry4/ut3LJ +pTWWqieYLz1Ves6uc619W/60Y8Bez+HJjm0+tLxkexScG9vmR2f1Wn/iut34 +Nl/a97BTVsQJhzZ/+tu90TU73ia29Qfdv1PMUsvhpK1/6OYDB/UBcq+2/qLP +0aoXiYedcH8vabtNSckuMtO2/qT3xU//sWEzYey5/qUD76TvHOM0v62/aesX +c3w7HTDH/b+la6PUG7JsPNvOBx0eONNJEeDGxHDnhz6vD/H5dCiZwfNFT+Ar +exwaMx/re08TKmCey70lDJ5P2jpzcP9es1cyI7jzS3c5mLigR+JSBs833fNd +geXVVBesP5tuN7AssKziDYPzgXZwfXNo7eI+mEcOvbT26tMOc48wOF/ozmP/ +7X72hYjB+UObNhxeWrl6F4Pzifa0kM5I2DsK8/pIj9xHlRdHLmRwvtGBFuTj +Yd8QBucf/VyWH79udjyD85G+uPq/ZN7zfZjnZ+y/PQzOV3x9gsH5S3f/NHvu +YMsdTAY3n+lXd41qcgIDMe8Cuu08deLmO60bs/BYQa/tDM5/2mJVwHbVsAvM +Uu5+oFNfHl0+3TwBPQrpP0Pmq1X2Ccwc7n6h72xe2+Dv9pjB+4cutPts/feg +y1hfIT1H/eZZ8JX76FVEV2QXHLn0yp+5yN1vdMOW7J6GlBAG7z9aNmu0m09p +AtZfTF8Ncxx32i8EPYvp68mDNxHzIMyjmC4fvCjxH8lrBu9fOvlI8+OPz/2Y +/wPSio5o + "]]}, + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJxdmH1s1dUZx0/R+kJGQIUMk2XyKvg2q2xupFdPcURB/tAqviXGEGWkGs26 +xG1dgeyGoSPGFeM6I84YDMyoaFMCInJP+F21zaq2cNUK19rive2lvchb31+A +wnrP93nJzu+f8ulzznPOeT7npWH2E7+//3eTjDFPFRlT+InvsiT/60T53p8/ +f/xS4cPbKm+ffJg55T4bWvjY5k+ZO13d3dnq6XXa/vUthU/5+eOFhMz17g8T +2bZVanwi2URG5qRbVkh3N3O7W+Q/Hf8an1Djk/0EmXNuuDC9oUuIM86nyzKn +Yi3NhY/ZmMJqy/cqby8sd5uyn95m5pxbW0hXzdzv1vhP29/vEzInY365t8v4 +7jq/YOYTzqebLu0dfmo++CgWhg9lP71Pi6U/fGgcPpThgzlDPphTDj60PXwo +w4e2hw+Nw4cyfFws84MP5pyDD+ZUDD6Y2x18MP/g4EPakw/mNPlgZh/K8KEM +H8wZ8qFxfDoefFxE3OTg4yJpDx/MreSDOePgQ+Pwof39ciuZk+SDORWDD+ZO +Oh/aHz6U4UMZPiYR95MPZj4fk6Q9fEicfGh7+ND28MG8l3xof/hgTro7/AQ1 +Dh8ahw+N4yfzIPkokvHhQxk+lOGDOUU+lOFD28OHMnww5+m+0v7woQwfzEm6 +rzQffBjiNPkwEocP5oyDD2b2wZyk86Fx+NB88KHt4UPj8KH94UPj8KH96dfM +MdT/QsSMejNnqL4aRz2Z+X5h7qV6aX/U53zE80M9mLfSfjwv+bBebY/zz8z7 +Szjmp3d8XBj7h7k+5rfLlnHJj/tTGftBGf6Z8/Q+nZN88CtMPs9Jf/g7J/OF +L2X40fb4zsl64eMscZruo7MShw9l+Dgb+NA4fGg++DgT+FCGjzOBD2X4OCP1 +gQ+Nw8eYMHwow8dY4GMs8DEW+GAeJB+jxPweMWfIx2jgQxk+RmW98DEa+BiV +esHHiMThY0R8wofG4WMk8DEi9YKPERkfPoalPXwMS374UIaP4cAHcxP5GA58 +DAU+hgIfyrg/hwIfQzJf+GCuJx+D0h4+BqU9fDC30/02GPhQho/BwIcyfAzI ++PAxIOuHj4HAx4DUDz40Dh/K8NEv+eGjX+LwoQwf/YEPZfjoD3z0BT76Ah99 +gY++wIcyfPRJveGjN/ChDB/M9TH46A189AY+mNP0fvRKPd/39T8d1Fv5Ml9f +ZdTzlPiq8PVj3kr795S0b/D1OSntUY+TMv4sv35lv9zmE8LrfMIT0t+XZ6HG +034/HZfxNkKQ1POXfr9oPOP3x4/CL3uByjHvXxl/7xwTfs37PRb4VB70E8wH +70te5nufL2Be1oOfeekPHz2Bjx5pDx89kh8+uqX9au+jW3zDR7eMDx9Hg/15 +NPBxVMaDj5yMBx856Q8fucBHV+BDGT66Ah+dgY/OwEdn9OTosw+sb9nzMXxk +eb/F4CMr84WPrMwHPjLC8JGR/PChTLMSfsTX/4dg/x+R/T7N11c4hnp2yHhN +vn7tQb2UN/n6fB/Uo036l/n1t0n9sd7v5PyP+oTpYD1p6V/v99NhmR/2D/Ne +Or+HZD1Jvz++lXzYD8wvuyrvv1Xi8P2NcIn3+03g82vhvPf3leSDL+a42+oL +mIpMWVW658L5BH4/wRcXrdnU35qo9/U/EJmqn9wz+ReW7pOWyKSWL37hqtrE +LF/f5qCeX+h8fP0+j0zFjacXb76VzmOTxKf5+vw3MrMeX37DHd8lUI9Gicf9 ++hsi05yJlXfMdljvZxLv9ev7JDJLD33QsnhHAutJRmbZ2lumNjUkkn7++6MV +uy5p+WdVmcN8nfTf6uf3cWQqDx4cmLkrgQfzo8gVHzbXN9ziMP5uXZ8fb2dU +M/O214Z2vOeQv07n6/O9G8x/+8T6du1+4suGRNy3fzNqPFbxr2srxxKI10Ym +fvnI6lO1CTyAGyf6v/LTt4q69pnwm+Hj9v/z19onGxY8vKH8RYcH7s0gvt2a +sj9evTDXmEhifhPcs2NRdjnVp07a40HbGfTfbU3m1zuvfnSY6yNxqp8w1VeY +6q/t4ceaIx3P7Z/xbin5s6arZl7PpvoE+Q3Gb7Cm5MF7Tq+5ls5Lo121Yc/j +c9qGSmn/SHvaX8H8Prfm5tjlg+drSml/SrwE+1eY9reNLxj/y7Ql/6b6HND6 ++C9l48vnvP3g9I7EOzg/1izd+Vy+9S4+X9ZM/cd+s7sngfV9ZeMrx/sf2tOb +oPNp4we/vCZdOtP9BudX8tP5tmWt8a/fW52l/dFq490/O7ml8QF6L77V+uL+ +sKb8V1e8M3ca3y82uSL345HGt0rp/rGmbcb6lXOv4/vJxl99NndrRTpB95fk +o/vNxq+srm77awnffxKn+9GajTX3fvThIkf3p615+vvm4UXrHN2vdkr3SzdP +eWoV/f3QbpPpO6dXLFviUrifrZldvWH4P3fSfdJh16/duO+LY39zM3G/27JT +qfxNS2fRe3vExvana1f0/cmtwvsQ+MgIr8T7YvOvFF2Y89s/8/tjW8cfOrSv +ap3D+rQ9vV/20OvxBbe9Mde9gffNvnDlFcXFfy+h/3/JBuvvFKb3025oWz9W +N/9GqkenPTBvysF5b6+lv4e67DPzl3ySnTrf/Q+MeY7x + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJxdl3lsVUUUh4eWyhLRxtSFgFK3BBMTUSFB7rTToIABRbY/iBA1KIIYY1kC +BhBKhKASpSgkgASaFAKEppQEBeSF91iUghQfUGxZxNeVQgt0pS0t1b75nTnH +zP3n5cs5c+7M+Wbmtk/P+HzSzASl1Cc9lIr/4ukdwW9M1008+NSq2l7EBbok +NzOtb4njUn28ZfD0tcccK5U/pmxxSr7jcr15U/xxXKhX1cYLSv7c7mq5mY7r +dHex7ooSfzNebozwq/YRHmQLCve1E3S8Xd+NT6/lAY7bcmWOo7roTPyReHy1 +Ew8Kb48vN9dxjbbTWyvjl8TLLRb+2D6Or+pJtqDE7XLTpP4LdsHCtlyKMB7H +leQjiThCPoTt9I4l8Xj4EIYPxzXkw3FUw4fkw4fjAg0f8j74kHz4cFyp4UPq +w0dPzocPYfhwXKPhQ+Lw0TOSXp7Rb2eeOQQfLh4hH5IPH46ryYfjGPmQfPgQ +hg/HpRq/EoePRGb4cBwlHxKHD2H4EIYPxxFtl5spcfiQ+vAh+fDhOKbhQ8bD +h+NS8pHAcfhwXEznw3GEfEg+fDhupPMh+fCREPn58aaf+szNOQQfMh4+hNPt +BB1HQ/AhcfiQOH4lDh89+P3w4biOfDiOavjowePhQ+LwIfXgQxg+ZDx8cDwE +HxKHD6kPH8LwoTgfPhTH4UPi8OE4EoIPZvIh+fAh9eBDGD6E4UPGw4fjGg0f +EqeHx6P//4bBldRvx26/O3b9dByl/Sz56Jcw+tPFjH508Xisv4vrY72Sj/Mv +jPXIeDu92vvM2D+OY9pul033eTzuT8eldD4lDv/C8N3J+fDbyfOFT4nDn8Th +q5PrwU8nzw+/kg8fHZwPHx2eD2H46PB8dHg+Ojwf9zwfwvBxj9cDH8Lwcc/z +IXH4aOc4fLTz/OCjndcLH5IPHxKHj3bPRxszfAjDRxuPh482nh98tHk+HFeS +D4nDRytxHZ2PVs9HK9eHj1Z+P3y0ej5aPR93PR93eTx8SBw+HBeSD84PwYfk +w0cLzw8+Wng8fLSwH9yfEocP5hB8tHg+mjkfPpo9H808P/hw7P7+kvHwIYxf +x+7v2ybvfDg+GIKPJl4PfDguJh9N3F/4aOL68NHo+Wj0fDRyPnw0ej4a+f3w +Ifnw0cD14KOB8+GjgfPhQxg+Gnh+8NHg+ajnevBRz+uHj3ruP3zU8/zhQ/Lh +o57r43FcEMqz/b/jfR/u8Pt72/7e8fp5m3m27d9tXh/6JXzC9ucWvw/9uMXj +U+36he1yz9Tx+KW2YB3HbXsGC5fa/VTLvBKCmIfa/VLL64vZ/XGT62dbgTe5 +f9hQwvh75wbX22j93uB68CnxZjvBGq4PX8yhCbaBNZ6PGq4HH9d5PHw4zgnB +x3XPRzX7+sj6qOb3wUc158NHFb8PPoTho8rzUckMH5U8P/hwnKPho4LrwUeF +56PC81HO9xt8lHN9+Cjn8fBRxuPhgzkEH2Wej5h3nwnDR8zzEWP/U23///H6 +fY3fn2z7e83r59/MhbZ/V5nRr6tc72vbnyvu/qN+XGbfGXb9lzkf673E+W22 +YCn3C+thDhXY/VRCnEfnuYTr4fz+xRyx++Mi18N+uMjxL6z/YuJs8n2BeJce +Yv1e4Dh8nuf9UWP9neN68CWcYxsY9XwIF9j+n2VGv4vkPrH9PRNWmd9/k3Ow +KEA/T4dVSuyNc82Xgmzbv1Oe/8KwSo30G3u9Lki2/Tnp9eO3sDo/9Vhn5HyQ +Zdd/guNY7/Gwir6zc+vq3KDeru+ot56I1LPzPxJWGRvDees3B5hvKKySz6xa +UhEOcuz8Dsn67XwOhFV91aYDzSvo/fvDw75cOPmVpfk6Zt+3L6yytn0656eb +h1E/P6wmpA668sj0IMvW290d/6H1j9vv0/jtXD/L5m/tns9rz1QmD6D4enm/ +5ZWej/89j9q4UWrL8BGPrR9B443K2vFg8bYNh/GB22pUJGHUoLOD3PsN9wPz +E8b8u8dnp49b916Af2D3GZVc0qe67zS3fsrfpak/Rm3ZWv7LjJWuf0Zl/7ly +ybPjXX+NGj7t9Zfn/hhQ/43KTOpKyNwWkB/z0oK034euSdfkj+dDfo0aO7/r +ZO9dzj/FszXtD7NoxLrTY4ZN07R/jCoefe/5gSUB7S+jjuxZ8NbMX2l+p0zi +0P1F42r70Xk/bdTgqfMabvbSQ7B/jZq3oWDOtmsB7W+vP2dNVuh42kPJsYDO +B8d34fwQ59D36RzHsT5hOp/Mw3F+TUbi3pQ7TzYHdL45jvUXM9P9YLIGjv9w +woBwQPcHx+l+MVV5fXYsW5bk7h+O0/3ETPeXyTi08Lnls9sDut84TvefyTif +tP+zgkDT/chxuj9NZO+MYV/1T9V0v5qMKaGHZ5Ulhuj+5fwo7mdmur9NZGnK +yBeLRoaewP3Ocbr/mT/A98Ho+XtWTF49iv7ejZmB8xZNmRwZo6fg+8L59P1h +P1hfzHx7tHnw7rcnkq8yc+JS/7TlsxbpLfi+8Xj6/pnRa0b37dowhdZfbt4N +q+/WLh7ivp9ePxwXaPr+cvw/A84srQ== + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[1.6], LineBox[CompressedData[" + +1:eJxd1ndck9f3B/DshB1U6qiKVlSGWhxotQ+9wS1YK+DAVRdaEcVRt4hacA9Q +sAKtG8uwIAhVbNVzQSyoaJEhCqgMmQEJIQkz4YvPc/j98Xv+8ZXXY27O+bzP +vZeha7Z4rBPweDwfPo/3+V/ukVH5tjqfd3vkinr31MFHlFL6R9i1GQ6b5IrC +G1udjQul9N4gReielXLFY63t8uB0Kc24ddb9iYdckTCrbF+fBCldTDwOWs6U +KyIjPj9S2uQw98sVk+WKI8rPC0rpVOMpNjGj5Ipt3avd2CqlxbEF4WpruaJ7 +se4VpTRIULCb6S1XzP683CwpPTu8Do5I5Irx7COlPiuOfvi92UJhzS4opft9 ++piOLrJQGLMFdtfz8zPBA2qh0H0uTyuh1ybV0znRFgp2uTIJVUr+mvb6jIXi +RfbnR0I/xSw+vnqHheJzt+6pEhr3jeGUcqmFIupzuzckNETwzG2Hi4WCLS9Y +QhWr8zI6Rloo9n9ebp+EukfaaQ6bWyjWs4+Enruf+1qiNVd4sAtK6Febnvuc +LDZXsO06S+ijIkmcabq5wo5tWEIdA/3CzsSYK9jl+khof8vy4WbB5grOo7s+ +p0nLTu00Rw8xNT80eaxsuTl6iKnf2LiowKnmCra8dDFV9lHc0duao4eYTvaM +XrTLwhw9xPTazMNnG7Rm6CGmveZ5L1pbYoYeYjrlSnFcYboZeojp3b4/HXeN +NUMPMXU126/8J9gMPbrrGXQox2GXGXqIaW5b7vjI5WboIaZbJmdYSqeZoYeI +hg8JX7/dzgw9RHS339ExJRZm6CGie0f8vW66zhQ9RPS7Je6yWyWm6CGiW+qX +95I/NkUPEXVZXXrw51hT9BDR+ohXcwuCTdFDRJ9d6rfTaZcpeojo8OXBmtDl +pughovrN/EzVVFP0ENHmAocaNztT9OiuFx543rQwRQ8R9WM8xXqtCXoI6Xje +wVaPEhP0ENLNX1Lb6HQT9BDSqSlHz7XFmKCHkDo+GjfGNdgEPYQ06Xbv9vCd +JughpGcnblBVLjNRsO1uFdIddStMx041QQ8hjdHL5+yzNUEPIR1Uf+pamrkJ +eghpom2mXKo1Rg8hDciKOedabIweQuowSmR9Os0YPQR0d3RE8vNoY/QQ0Esj +vnA1OmuMHgJ65FWvd9N3GKOHgBrF9/kpYKkxegho1uTT5X8pjNFDQK0sC+Yo +Rxijh4CKDjpdHGxmjB4CunfA+4wfmo3QQ0DvLq3NDnhrpPiOLVBAJ9gvi70F +RughoILdQxa8vmmEHgL6IzXPNJwyQg8BjbpW0WGz3Qg9+HTu0un1s72M0INP +RZ4Pz238zgg9+PTFlbTKEzZG6MGn6oC4sj+MjdCDT7Pz7wakqWTowacuUcZ3 +376WoQefKgMTDjU+kKEHn4ZYBBcKbsjQg0+nLfJP7n1Chh58mjrdzuyrLTL0 +4NMdJg7vRi+UoQefphxu/XLStzL04NETgbVpzkNl6MGjG+dOzHSRytCDR59m +64ZNa5CiB4+qO4bmuORJ0YNHj9qceex8X4oePFo0SqmdeEWKHjw6qOj5j6OP +SNGDR7eb/6Yd4itFj+71+FeTLN2l6MGjX+/qPNE1UYoePCr5eGtn3UApevCo +ddQvvrkCKXrwaIF89Jp7NRLMvwtOXR8zP+KlBPPugoXiMoc9KRLMtwvG2P6s +9IyUYJ5d4DmjJmjUIQnm1wUpFV984q+XYF5dkJcTPTDfTYL5GOCv3laSG2Ml +mIcB3Apjrvj1lWD/Bgj83v/9RL0Y+zXAzhO77nWUi3H/G8DV3c36YZYY+zGA +pHqv8f4EsYItT6mHYVlum53CxDg/eji2Nu/b+r1iBTsuEXoIelLnc2WlGM9P +Pfw2eZxy3gwxzoMeQsvMk9vtxeivh0UusSnX5WL07oRFoCyfqROhbyds6n/Y +sbpYhJ6dcCA7NzgwTYR+nTB4q7T5y2gRenXCSRF/buJpEfp0wp5xy04rtovQ +oxNMDvjczF4sQo8OOOntdHyBswg9OmD3Xv/hb74SoUcHRK1M2LxYJkKPDthH +6+bnNgjRowNSHLoezc4TokcHlFR6R/+dKkSPdugf9V3byMtC9GiH2vGLboQE +CtGjHdLNB4RpNgjRox0aCyPve84Tokc7bMk4zk8YL0SPdjindFwi7C9EjzZw +Pbgv3tMgQI82WKOsqLtcIUCPNphedFD/MUuAHm1wYrA6Z3iCAD3aYMfBTfNX +hwrQow3UP91af3GPAD1awW6XWp+5QoAerTCpTsZrnipAj1YY0Oy0qJ+tAD1a +oayQqZ1kJkCPVhje4XXNXc1Hj1awTp28fl0hHz1aYeEXhsE/P+CjRwsUezje +2XeNjx4tcJxJE/sf5aNHC/ivFnbt8uWjRwsMMvnjF9/5fPRoAYk0cccSJz56 +tMC0yftSFQP46KEDF12s49AuHnroIH+IA7RX8NBDBwJj+xkvsnjooYNH5mY3 +wuN56KGDENXm1OXneeihA7OqXt79d/PQQwv9fqwOfLmMhx5a2PGzRrNfwUMP +Lcw0WRI6dDgPz08tHIh0mQJGPPTQQtgAOBZb0kU4Dy3k/0p7ZdzsIpyHBiqi +M5+88OsinEf354LKef9O6iKchwYMUbVL4nldhPPQgKflnJBfnhoI56GBCVKT +iBnnDYTz0IBl1u1+uqUGwnloYNzofkmhwwyE82gGVYovf3C9nnAezRDppr8Z +lqInnEcz9Ls/5psWfz3hPJphwjWPeTNm6Ann0Qwyw+n9AWZ6wnk0g5kh6Yfr +BZ2E81DDMYdhixMvdRLOQw1eaXEDYtZ1Es5DDWXyhdYnRncSzkMN7a9nVXlo +OwjnoYaUlRfrRQ87COehBuLZ/9bloA7CeTTBFKHTr9ZzOwjn0QTDLZIGHevd +QTiPJoh1DPgzv6idcB5NEKwPiJFebyecRxM89pm73dqnHT2a4OJLnfeXju3o +oYJ/Jz0uaNe1oYcKLid97P3wYRt6qCD8+7EbVge1oYcKZKdz+1S7tqGHCobk +qRZ8b9mGHiqwCV2yPLSwFT1UkJtgvTj1Uiv5k82/EaLuOvn8s7YV826EX/by +E36zayUyNt9GsFpbM8mrsQXz/ASXeuVbqFJayAY2v0+w6WjChDX7WjCvT1Bq +WxAZT1pIBptPA7S3HXZ4JWrBPBqA12mX8fypjgxh+2+ANs1/Tr+f1RG23ex6 +uOrvOt3FU0f82QXrIX2C/837fXWEjce2HsKq/XmiEi15w86TEjba3akffFVL +gjggcG8sUMm8tWQCOy9KuLOm9jAdqSWl7HzUwT+SXoLpSg0JYQHrwMJ0JZxL +0BCG9a+Dy3471NHbNIT7e6cWar/u/zBogoaEs761kPPnTdsRLc3oWQsNCfNs +Tt5vJhq2wBqw3zgnMGF/M3rVQMvAjPYQ52Yynw2wBr7fmWD9dZcaPbo/fzPX ++yhVo0c1LKo5ZRV2WI0e1RAwfYDXwqlq9KiGF3vsh2cK1OhRBcejamdWpTcR +b9ajCvbpzi+4/UsTelRBQ2ffhMFTm9CjEt4XzNvtyG9Cj0pYdP3C+VJQoUcl +eFUVRtoHqNDjI3R996HEiFGhx0fwqoy9olY3osdH0K6I61+9qRE9KkA38f3J +yspP6FEBxyXZ28pWfEKPCjhWaPjhRX4DepTD8BHkbKRrA3qUQ1Kf3OWToR49 +yiFtiyw4fFw9epSBmyfZdjNKiR5lYGwzNdzNSokeZfCN6mHMjqA69CjtPl9t +rGTqWvQohVX1Lf/VrahFj1IYlVjeaMisQY9SOOOxbuowxxrixeb/AZakF2SN ++7Ua834P2W4zBojaq4iczfc9PLYfdmPDsirM8x1Ija3vO/xdSbLY/Erg+2cn +d1l+UYl5lYA8661bgd9HcpzNpxha54z+2jajAvMogvgIo9kJVhWEu3CK4Mit +k1Uda8qx37dgfeFuwLlbZaSVXfANRERHMa8/lWI/b+D1mZRT8lGlJJGdp0KY +kPlBfi/jPc5PIdTPNPrh66HvcP++hm1vDFOiNxYTys5HAQwcbTt3/qW3OA8F +8Dz74c7W5EKyh/XPh/Gz14ZPii5A7zyIO7CwuNg3jziyvnmQqSwODmzMQc9c +mG2xUJZpnU1qWL9X8N/gQI1tWwZ6vYKcAtubNWuTyVU2wBzQmxZdvZOTy3Ae +ORD/Kue4qW47k8jm/xLWVo6sOjivnOHyfgECd7+N+3NGMUPYfLPh3qPWs/xj +3gyX5zMYM332ExXdxoSw+T2Fy9NvnPronMdweWXBqfBZ/arsQhg5m08mpFWm +rjhtn85weTyBwmPaZpvZm5lDbP8ZEBpplD/Z9gnD9fsYck/be6ZfdWFUbH9p +cGeI3c6rGleG64dC0YULBpsHlKFs/Y9gDvWb5LJTgfU+AMPtM5Yr/viJucrW +dx88xo5URCygDI+t5x40Z1X4KNPG4u+nwAvj3i1jHycypezvJUFYbsm8K/Fx +uH4CvBz1Sv7n0YHMIXa9WNAtO6C4+88I/H4ULK/pY3Us93fmEPv/L0PFqjfu +f29p+5Z7Hwaa+rlpaYLTDI/9HARDV902XORRhvf/Hyv2PTn0U8WfQ7fe6Pk+ +SX7336/x7icZHnvBXSbiiEP52z3a8X0UGd+XWIb/FcFQrj5SamcaHJVp1lM/ +Ua27fOCNuB/DYy+0JBKvWSutfGje0z/xnZ/jnpsY05MPCfcOivs4xaEnP+L4 +/NPoKCvVt5gvOTJ25gfnT449+ZN/dRkLlt2f2OOD+z6xx484+xqE1eNdenzJ +3fnOW64EOfX4k53vStfHv73bMx/4/fCe+SF2LmcLl+uW9cwXeRe6f6/7Vgbr +e/p/v4fzSUofrnlh0enLOHLzS+QDBsovD/LqmW/inP7ywJLrvbH+l2Tr4N0e +ybKFPfuDqC9rztlccGdiuP1D3ia0uCdcTWNwfxHvgRuGNW3ywv5eEZluWvIw +7UoG9ycJ2rbEIiQxkfmG27/E0v7M/sozqxjc32RX7sgn48zcsP988mE9Tdwm +/5fB84Hwbktqx1sPxzwKCPi+ufbcL5nB8wX7vcrg+UO2TJmlkD9OYvB8IsnP +IvotrJqCeb0h7nF+dQqylMHzjUT6n3ca++MdBs8/UrpXEHZthSuD5yM5sOx4 +o1X2HcyziPRd6Jhsn7yfwfOVLC58/vx86ioGz18yK/TMk2EpSUwOdz6TVcFa +t/4NSZj3O7IjNf923vU7TD/ufCfbn1ztNNzczeD5TzJzL/javn/OrOLuB8Jc +dCtpcAlGj1ISMu/RmDRxCLOAu1+I74zRYfnlLxi8f8g+ffyUiNhs7K+U2LTP +b/LKPYleZZgXZX7n7jcS3tHpOnFOIIP3H/kxb7b3jLnnsf9ycv3Ey8ePmg6j +ZznxS+yobtAEYB7d77N9PvmqXzF4/xJNmOTp4k27mP8B2Pn46Q== + "]]}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxd1nk8VPv/B/Az+xiGKeqmhfZIi7rRpk5ppw1p1W3TotJOKlehfdN2W9x2 +XLRI5Wo7en+ULpVKllQoS9ZRpjEGw4yfznn7/fE9D//MY2Y+Pu/X8/15f6bH +8o3uKwUURfnwKKr1j+JTbY+UGG+u8ikIUJBqt4dW+5QSEnHm2iS79QqSG7Fp +jCxXQh50G3c6YImCPK+z8Qp7JiEvbx53e+GuIHFTinZaxEnIXNp9d7vJChJ+ +4dcjIWq76V0Wj1SQfcpfC0rIZNmo3jEDFGRz62oRmyTkU2zOebW1grQu1rqi +hOzn52x3MleQqb+WmyIhJ/pUwT6xgvzOPhLitXj/14u1ZsSaXVBCgn0sTAZ+ +NiMydoMSAltf8RliRrS/tlcnJheHV5Np0WaEXa5ITIrF/074cMyMvEn/9YhJ +Rcy8g8u2mZFf1bo9FJNbIwxHlAvNSOSvciPE5Dj/leu28WaE3V6YmExalpXS +1M+M7Pq13E4x8Qi31QSbmpFV7NP6+UeZH8R1psSdXVBMOq9/7XM4z5Sw5Y4R +kyefxTdMnpkSW7ZgMXEM3XDmWIwpYZezEJMe7Yr7yMNMCechJtUOwxcd8TNF +DxER7Rk5ROplih4isnbIjchQZ1PCbu+ZiPywGHdPb2OKHiIyyiN6rr+ZKXqI +yJXJwce/18nRQ0Q6zvSeuyJfjh4iMvpK3o3cZ3L0EJEHv60+6BIrRw8RGS/f +pXwSJkcPEZF325Nh5y9HDxHJa8z8PdxLjh4isn5kSjvJBDl6CMnZ7udXbbGV +o4eQbNuwf1C+mRw9hGRD38crJ2pN0ENIRixwk97MN0EPIdlU7dVe8dwEPYRk +3LLC3VtjTdBDSGouvJ+eE2aCHkKSfqmTn4O/CXoISeuXNKe9TNBDSLS+vFSV +swl6CElTjl2Fq60JegjJJWA8osxM0ENIVjp5iPR1xughIMOo3Q3u+cboISDr +uxCb6GfG6CEgExL2n2yMMUYPAen/dOgglzBj9BCQuDvmuvN+xughIGcc16hK +FxkTttxNAuJftdhkiLMxeghItF4xbaeNMXoISLfqI9eSTY3RQ0Du26QqJHUy +9BCQPWkxJ13yZOghIH0GCK2PJsvQg092RV+4/zpahh58cqlvRxej4zL04JN9 +79sXTNwmQw8+Ed62WB20UIYefPJq5NHif8fJ0INPzNrlTFP2laEHnxiCHM5Z +yWXowSc7On9JmVVrhB58cn9hZXrQJyMylt0gn4zuvyj2JhihB59o/LvP+RBl +hB584kVMUw1HjNCDT/66VtLUe4sRevCI68KJ1VPnG6EHjwg9kk6uHWuEHjzy +9kpy6aHeRujBI/VBN4r+kRmhB49kZCcGJauk6MEjEyNliZ8+SNGDR6pC4/bU +MFL04JH9ZmG5/AgpevDImLmB980PSdGDR+5OtJX33ChFDx7xM7YrGOgpRY/W +94MbugwfLUUPioSFViaP6SFFD4osne6YOl4iRQ+KZKVre034LkEPitQ39cgY +nyVBD4qE9D72fMwjCXpQJHOAss7xigQ9KNL18+s/BrbOYc6DIutN/67rvk6C +HhRR867ebecmQQ+K2Po3H2pxlKAHRWTfbvpVdZWgB0U6RYasy+RL0IMibxUD +lz+oEGP+LRB6fdDsC2/FmHcLzBMV2QUkiDHfFvjdZqvSI1yMebbAnEkVewfs +EWN+LXCvpOMPXutc5fJqgQ8Z0V2zXcWYjwESzTuII4aIMQ8DOOfGXNnwmxjr +N8DuGYFfHPUirNcAmw75P2gqFuH5N8AMN1frpDQR1mMAk/Idsl2tc5PdnlIP +fdJcfR3OiLB/9BC6Imt09Q4RYdvlgh72vqjyubJEhPNTD+EjhypnThJhP7S+ +LjK9r+svQn89uI+PTbiuEKF3M/wByuLJWiH6NsM6y2D78jwhejbDtvTMsNBk +Ifo1Q89Nktou0UL0aoYDQt70+KNC9GkGv6GLjo7bIkSPZpD96ROVPk+IHk1w +xNvh4JzWucd5NMGuHYF9PvYUokcTxC6J850nFaJHE2wjVbMzvwvQownu2bU8 +nZolQI8m+FrqHf34oQA9dGAeObax32UBeujg++9zI06ECtBDBy9MO5/RrBGg +hw7KcsMfecwUoIcONqYc5MW1zjHOQwenlPYLBJYC9GiEKbt33vYw8NGjERYr +S6oul/DRoxGmfd6t/5bGR49GOGalzugTx0ePRgjYvX72stN89GiEutU3V50L +4KNHA9j4q/Wpi/no0QAOVVKq1pmPHg3QvdZhbqfWucR5NLTu36lyuJyPHg0w +oGn+NTc1Dz0awOrhyFUrW+cQ59EA8zoarLYyPPSoh3x3+3s7r/HQox4OOSWL +Avfz0KMe/JYJWvzX8dCjHqyM/wlZN5uHHvUgkMRvW+DAQ496mDBy58NxnXno +oQVaG2vfo4VCDy186G4HuhIKPbQgkPWf9CaNQg8tgKk84vxtCj20cE7l+9Dr +FIUeWlCUtfe23E6hRx10+aM89O0iCj3qYNtWjWbXOAo96mCy8YLTPfpQOD/r +YGf4+FFgRKFHHfzVGQ7E5rcA51EHGWdJ+5SoFuA8NPA1OvXFmw0twHlooCin +dOZ/w1uA89CAIbJywW2qBTgPDcxoN+1EyEsDcB4aGCQxvjDplAE4Dw30SLvT +SbvQAJyHBvoO7HT3dC8DcB61oEtYx7Oq1gPnUQunXPVRZxL0wHnUgvmjQSPq +A/XAedSC4zX3mZMm6YHzqAWJ4eiuILkeOI9aMDPcnXU9pxk4DzX42fWaF3+p +GTgPNbgn3+gcs7IZOA81fFN4Wh8a2AychxrUH6aUudc1AeehBlhyrlqY1ASc +hxrGe1jevLy3CTiPn+AocDhrPb0JOI+f0NPsbrcD5k3AefyEWPugW9mfdcB5 +/ISj+qAYyXUdcB4/4YXP9C3WPjr0+AkX32q9u9jr0EMFz4Y/z9FpG9FDBRfv +fjNPSmpEDxWcnTFkzbK9jeihAunRTItyl0b0UIEiSzVnRrtG9FCB1ekFXqdz +G9BDBa/irOc9vNQAt9j8a+CfRAefJysaMO8aCN7Bi/vbtgGkbL41YLmiYvj8 +mnrM8wdcap9tpkqohzVsfj/Ae3/csOU76zGvH5BrkxN+m66HFDaf72BoDLZ7 +L6zHPL6DpNk25fVLLXRn6/8ONZp3DhePa4EtN70aogJdJo730EIgu2A1wLDA +qEe/aYGNx6YawssDKWF+HXxk+0kJ623vVVtdrYO9HBDMr8lRSb3rYBjbL0pI +Wl4ZTPrVQSHbH1XwQNyeP1GpgRMsYBW0N1kCJ+M04MT6V0HEhm3q6M0a4H7v +VELlYMukvcM0cJ71rYQvt6Js+tbXomclqONm9j78qBY07AYroOfaaaFxu2rR +qwJ0XVN0J8bUwmw2wAqY7RdnPbhFjR4VMGvEdO/9RI0e5eBWcaTDmWA1epTD +5omd53s6q9GjHNIC+vdJ5avRowxORVZOLmvtQ2/WowwCtKfm3An5iR5lUNP8 +W5yV80/0KIXinJnb7Xk/0aMUZl3/61QhqNCjFDxbL4z+QSr0+Ab6sV/zjZxU +6PENFpbGXlGra9DjG2gX37AsX1+DHiXwyfHL4dLSH+hRArvF6ZuLFv9AjxII +yTXMepP9HT2KwaIvfTzc5Tt6FMNTi0yvkVCNHsVwb6M07PzQavQoAk8PenNU +pBI9ikDW2/m8awclehRBd1VSzLa9VehRCKdVvTtI1ZXoUQgjquvfVS2uRI9C +GBZfXGNIrUCPQgh1X+ncy74C5rP5f4XVz3LShp4tx7y/ALhO6izUlYGCzfcL +ZPbvFbFmURnmWQBimfUju8elkMbmlw/0q8P+7TqWYl750DHtk2vOhm9wkM0n +D0QuAwfbpJRgHp/h7gWjqXEdSmAcW/9n2H3zcFnT8mKs9xN0+ysx6OTNImhg +F/wIZ6MjnT78KMR6PsKrYwlHFAMKIZ7tp1yQpH5VPEj5gv2TC7rJRrMG9yjA +8/sB1n40jIpemweE7Y8c6DDQZvrsS5+wH3IgMz3Jr+F+LgSw/tlgMnXF+eHR +OeidBU/+9MzLW5cF9qxvFrxU5oWF1mSgZyZEmHlKU63ToYL1ew/7rEI1No0p +6PUeInNsoipW3IerbIAZUOrp5+x79QXDeWTAQbcHZe9UW5h4Nv+3IIr80jvc +pYzh8n4Doltu0Zv/G8B0Z/NNh309uzzYeNyb4fJ8BdaBFxp9UzczJ9j8XsL1 +Hf2Sxo3MY7i80qBD/yFL40XPGAWbTyp4nW9v/M79JMPl8QKmJMzdss/Nl9nD +1p8CvYYU0EUnMxmu3ueQvTR7VGTUeEbF1pcMwptJvMzvLgxXD4GOR9MzxCHb +GcLu/yn2GcH9MhDVKFgV+wdhrrL7ewTtF7krq3utZCh2Pw/+//Pc/08ASnHu +m8k9zZNC9v/dxffjcf04yLMKHet7sCuzh10vFkI7FST+y/TF70dCpnPLo8L3 +F5k97Ocv/8/6Z0A5eGqQLUlmKPb1XnAcNmxdeov6CfW/Twf2fTorlHpotyni +CX6f5t5kGIq94C7T8tt6E7W7Dt+PpA+5GmoqEi4w3A+YWHrjuve7xP/J2/ZP +S2e5n0qWdGIo9kK7S/sP7uM9Odm0rX56h234IElcTFs+9GiTMfP1tF1bfnS/ +lUsurbFUPcF86anSc3ada+3b8qcdA/Z6Dk92bPOh5SXbo+Dc2DY/OqvX+hPX +7ca3+dK+h52yIk44tPnT3+6NrtnxNrGtP+j+nWKWWg4nbf1DNx84qA+Qe7X1 +F32OVr1IPOyE+3tJ221KSnaRmbb1J70vfvqPDZsJY8/1Lx14J33nGKf5bf1N +W7+Y49vpgDnu/y1dG6XekGXj2XY+6PDAmU6KADcmhjs/9Hl9iM+nQ8kMni96 +Al/Z49CY+Vjfe5pQAfNc7i1h8HzS1pmD+/eavZIZwZ1fusvBxAU9EpcyeL7p +nu8KLK+mumD92XS7gWWBZRVvGJwPtIPrm0NrF/fBPHLopbVXn3aYe4TB+UJ3 +Hvtv97MvRAzOH9q04fDSytW7GJxPtKeFdEbC3lGY10d65D6qvDhyIYPzjQ60 +IB8P+4YwOP/o57L8+HWz4xmcj/TF1f8l857vwzw/Y//tYXC+4usTDM5fuvun +2XMHW+5gMrj5TL+6a1STExiIeRfQbeepEzffad2YhccKem1ncP7TFqsCtquG +XWCWcvcDnfry6PLp5gnoUUj/GTJfrbJPYOZw9wt9Z/PaBn+3xwzeP3Sh3Wfr +vwddxvoK6TnqN8+Cr9xHryK6IrvgyKVX/sxF7n6jG7Zk9zSkhDB4/9GyWaPd +fEoTsP5i+mqY47jTfiHoWUxfTx68iZgHYR7FdPngRYn/SF4zeP/SyUeaH398 +7sf8Hwgpjmo= + "]]}, + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxdmH1s1dUZx0/B+kIkoELExExeBZ3TKk5HevUURybIH1sV3ZYshiiSajTW +RGctEG8YKllmMdot4ozBwIyKNiUgIveE31XbWLWFq1a41hbvbS/tRd76/gIU +1p7v8xLPLyTlw3POc855PuelYdZDT977yERjzKMFxoz9MRMMfxcn+W/HS/f8 +6oVjFwkf2lp+x6RDzCn3+cCCv236jLnd1dydrZxWo+3f2Dz+Kb9wbDwhc617 +aizb1nKNjyUby8icdEvH093N3OoW+k/Hv8Yn1PgkP0HmnBscn97AhcQZ59Nl +mVOxpsbxj9mY8dWW7lHeNr7crcp+epuYc27NeLpK5l632n/a/l6fkDkZ88u9 +Q8Z31/kFMx93Pt00ae/wU/PBR6EwfCj76X1WKP3hQ+PwoQwfzBnywZxy8KHt +4UMZPrQ9fGgcPpTh4wKZH3ww5xx8MKdi8MHc6uCD+ScHH9KefDCnyQcz+1CG +D2X4YM6QD43j0/HgYyJxg4OPidIePpibyQdzxsGHxuFD+/vlljMnyQdzKgYf +zO10PrQ/fCjDhzJ8TCDuJR/MfD4mSHv4kDj50Pbwoe3hg3kP+dD+8MGcdHf6 +CWocPjQOHxrHT+Z+8lEg48OHMnwowwdzinwow4e2hw9l+GDO032l/eFDGT6Y +k3RfaT74MMRp8mEkDh/MGQcfzOyDOUnnQ+PwofngQ9vDh8bhQ/vDh8bhQ/vT +PzPHUP/zETPqzZyh+moc9WTm+4W5m+ql/VGfcxHPD/Vg3kL78Zzkw3q1Pc4/ +M+8v4Zif3rFRYewf5tqY3y6bRyU/7k9l7Adl+GfO0/t0VvLBrzD5PCv94e+s +zBe+lOFH2+M7K+uFjzPEabqPzkgcPpTh40zgQ+Pwofng43TgQxk+Tgc+lOHj +tNQHPjQOHyPC8KEMHyOBj5HAx0jgg7mffAwT83vEnCEfw4EPZfgYlvXCx3Dg +Y1jqBR9DEoePIfEJHxqHj6HAx5DUCz6GZHz4GJT28DEo+eFDGT4GAx/MDeRj +MPAxEPgYCHwo4/4cCHwMyHzhg7mWfPRLe/jol/bwwdxK91t/4EMZPvoDH8rw +0Sfjw0efrB8++gIffVI/+NA4fCjDR6/kh49eicOHMnz0Bj6U4aM38NET+OgJ +fPQEPnoCH8rw0SP1ho/uwIcyfDDXxuCjO/DRHfhgTtP70S31/MDX/1RQb+WL +fX2VUc+T4qvM1495C+3fk9K+ztfnhLRHPU7I+DP9+pX9chuPC6/1CY9Lf1+e +BRpP+/10TMbbAEFSz1v9ftF4xu+Pn4Vf8QKVY96/Mn7fOSr8uvd7NPCp3O8n +mA/el7zM90++gHlZD37mpT98dAU+uqQ9fHRJfvjolParvI9O8Q0fnTI+fBwJ +9ueRwMcRGQ8+cjIefOSkP3zkAh8dgQ9l+OgIfLQHPtoDH+3Rw8NP3Leuafcn +8JHl/RaDj6zMFz6yMh/4yAjDR0byw4cyzUr4L77+PwX7/7Ds96m+vsIx1LNN +xmvw9WsN6qW80dfnx6AeLdK/xK+/ReqP9f4g53/YJ0wH60lL/1q/nw7J/LB/ +mPfQ+T0o60n6/fG95MN+YH7FVXj/zRKH7++Ei7zf7wKf3wrnvb9vJB98Mcfd +Fl/AVGRKKtJd588l8O9jfEHB6o29zYlaX//9kam49J5JN1q6T5oik1q26MUr +qhMzfX0bg3p+pfPx9fsyMmU3nFq06RY6jw0Sn+rr80VkZj647Nd3/pBAPeol +Hvfrr4tMYyZW2jbLYb2fS7zbr+/TyCw5+GHTou0JrCcZmaVrbp7SUJdI+vnv +i5bvvLDptYoSh/k66b/Fz++TyJQfONA3Y2cCD+bHkSs8ZK6vu9lh/F26Pj/e +jqhqxm2vD2x/3yF/jc7X53svmP+2sfXt3PXQ13WJuG//VlR/tOzf15aPJBCv +jkz8kqFVJ6sTeAA3jPV/9cq3Czr2mvCb7uP2l/mr7cN18/+8vvSfDg/cW0F8 +mzUlz1y1IFefSGJ+Y9y1fWF2GdWnRtrjQdsR9N9lTeb2HVf9dZDrI3GqnzDV +V5jqr+3hx5rDbU/vm/5eMfmzpqNqbtfG2gT5Dcavs6bo/ntOrb6Wzku9Xbl+ +94OzWwaKaf9Ie9pfwfy+tOam2CX956qKaX9KvAj7V5j2t43PH31u6uL/Un32 +a338l7LxZbPfuX9aW+JdnB9rlux4Ot/8Bz5f1kx5eZ/Z1ZXA+r6x8RWjvQ/s +7k7Q+bTxA19fky6e4X6H8yv56Xzbkub4t++vytL+aLbxzqtPbK6/j96L77W+ +uD+sKf3tZe/Omcr3i00uz/18uP7tYrp/rGmZvm7FnOv4frLx/zyRu6UsnaD7 +S/LR/Wbjl1dWtjxfxPefxOl+tGZD1R8//miho/vTVj32Y+PgwrWO7lc7ufNf +N01+dCX9/tBqk+m7ppUtXexSuJ+tmVW5fvB/d9F90mbXrdmw96uj/3AzcL/b +kpOp/G+WzKT39rCN7UtXL+/5u1uJ9yHwkRFegffF5l8tOD/798/y+2ObRx84 +uLdircP6tD29X/bgG/H5t705x72J982+ePllhYUvFdH/v2SD9bcL0/tp17es +G6mZdwPVo93unzv5wNx31tDvQx328XmLP81Omef+D8IJjvM= + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxdl3lsVUUUh4eWyhLRxtSFgIJbUhMTUSFB7pRpUKgBRZb+QYSoQRHEGMsS +MIBQIgSVKEUhASSlCRAgNPBIUIq88B6LskjxUYoti/haSim00J22tFTb+Z05 +x8wNycuXc+bcmfPNzC1PT/980oxEpdQnPZTq+qcSlHt6R/Eb1zUTC55aWd2L +OKRLtmal9S1xXKqPNadOW3PUsVJ7MsoWpexxXK43bex+HJ/UK6u7C0r+nK5q +W7Mc1+iuYl0VJf5md7kM4VftIzzIFhTuayfoeJu+2z295gc4bsuVOY7pwjPd +j8S7VzuxQHhb93K3Oq7SdnprZPzi7nKLhD+2j+MrepItKHG73DSp/4JdsLAt +lyKMx3EF+UgijpIPYTu9o0k8Hj6E4cNxFflwHNPwIfnw4Tik4UPeBx+SDx+O +KzR8SH346Mn58CEMH46rNHxIHD56RkeWp/fbkW8OwoeLR8mH5MOH40ry4ThO +PiQfPoThw3Gpxq/E4SORGT4cx8iHxOFDGD6E4cNxVNvlZkkcPqQ+fEg+fDiO +a/iQ8fDhuJR8JHAcPhwX0/lwHCUfkg8fjhvofEg+fCREf3688ac+c/IOwoeM +hw/hkXaCjmNh+JA4fEgcvxKHjx78fvhwXEM+HMc0fPTg8fAhcfiQevAhDB8y +Hj44HoYPicOH1IcPYfhQnA8fiuPwIXH4cBwNwwcz+ZB8+JB68CEMH8LwIePh +w3GVhg+J08Pj0f9/I+AK6rdjt98du346jtF+lnz0Sxj96WRGPzp5PNbfyfWx +XsnH+RfGemS8nV71fWbsH8dxbbfLxvs8Hven41I6nxKHf2H47uB8+O3g+cKn +xOFP4vDVwfXgp4Pnh1/Jh492zoePds+HMHy0ez7aPR/tno97ng9h+LjH64EP +Yfi45/mQOHy0cRw+2nh+8NHG64UPyYcPicNHm+ejlRk+hOGjlcfDRyvPDz5a +PR+OK8iHxOGjhbiGzkeL56OF68NHC78fPlo8Hy2ej7uej7s8Hj4kDh+OT5IP +zg/Dh+TDRzPPDz6aeTx8NLMf3J8Shw/mMHw0ez6aOB8+mjwfTTw/+HDs/v6S +8fAhjF/H7u/bRu98OC4Iw0cjrwc+HBeTj0buL3w0cn34aPB8NHg+GjgfPho8 +Hw38fviQfPio53rwUc/58FHP+fAhDB/1PD/4qPd81HE9+Kjj9cNHHfcfPup4 +/vAh+fBRx/XxOA6F823/a73vQy2/v7ftb63XzzvMs2z/7vD60C/h47Y/t/l9 +6MdtHj/Yrl/YLvdMDY9fYgvWcNy2J1W41O6nauYVEMQ81O6Xal5f3O6PW1w/ +xwq8xf3DhhLG3zs3ud4G6/cm14NPiTfZCVZxffhiDk+wDazyfFRxPfi4wePh +w3FeGD5ueD4q2ddH1kclvw8+KjkfPq7z++BDGD6uez4qmOGjgucHH47zNHxc +43rwcc3zcc3zUc73G3yUc334KOfx8FHG4+GDOQwfZZ6PuHefCcNH3PMRZ/9T +bP//8fp9ld+fbPt71evn38wnbf+uMKNfV7je17Y/l939R/24xL7T7fovcT7W +e5HzW23BUu4X1sMcDtn9VEKcT+e5hOvh/P7FHLX74wLXw364wPEvrP9i4hzy +fZ54px5i/Z7nOHwW8f6osv7OcT34Es6zDYx5PoRDtv9nmdHvQrlPbH/PRFTW +99/kFRQG6OfpiEqJv3Gu6WKQY/t3yvN/MqIGR/uNvVETJNv+nPD68VtEFU05 +2hEtCrLt+o9zHOs9FlGxd3bkrtoa1Nn1HfHWE5V6dv6HIyp9QyR/3aYA8w1H +VPKZlYuvRYI8O7+Dsn47nwMRVXd944Gm5fT+/ZFhXy6Y/MqSPTpu37cvorK3 +fDr7p1uHUH9PRE0YPOjyI9OCbFtvV1f8h5Y/7rxP47dx/Wybn9s1n9eeqUge +QPF18n7LKzwf/3setXGj1ObhIx5bN4LGG5W9/cHiLesP4QOXa1Q0YfSgs4Pc ++w33A/MTxvy7xueMHLf2vQD/gd1nVHJJn8q+U936KX+npv4YtTm3/JfpK1z/ +jMr5c8XiZ8e7/ho1fOrrL8/5MaD+G5WV1JmQtSUgP+al+Wm/D109UpM/ng/5 +NWrsvM4TvXc6/xTP0bQ/zMIRa09nDJuqaf8YVTzm3vMDSwLaX0Yd3j3/rRm/ +0vxOmcSh+wvHVfej837aqNQpc+tv9dJDsH+Nmrs+NHvL1YD2t9efsyY7fCzt +oeR4QOeD4ztxfojz6Pt0juNYnzCdT+bhOL8mPXFvSu2TTQGdb45j/cXMdD+Y +7IHjP5wwIBLQ/cFxul/M9fw+25cuTXL3D8fpfmKm+8ukH1zw3LJZbQHdbxyn ++8+kFyXt/ywUaLofOU73p4nunT7sq/6DNd2vJj0z/PDMssQw3b+cH8P9zEz3 +t4kuSRn1YuGo8BO43zlO9z/zB/g+GD1v9/LJq0bT37txM3DuwszJ0Qydie8L +59P3h/1gfXHz7ZGm1F1vTyRfZeb4xf5py2Yu1JvxfePx9P0zY1aP6du5PpPW +X27ejajv1iwa4r6fXj8chzR9fzn+HzleLK8= + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.004583333333333334], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxd1ndck9f3B/DshB0cdVRFKyhDLQ602ofe4BaoFXDgqgutiOKoW0QtuAco +WIHWjWVYEIQ6WvVcEAsqWmSIAipDZkBCSMJM+OLzHH5//J6X/+T1mJtzPu9z +72XY6s2ea4U8Hs+Xz+N1/+MJeD2PjMq31vm+2y1X1HvcG3JYKaV/hF+d4bBR +rii8vsXZuFBK7w5WhO1eIVc81touC0mX0oybZzyeeMoVibPK9vZJlNJFxPOA +5Uy5Iiry8yOlTQ7uXy6fLFccVn5eUEqnGk+xjh0lV2ztXu36FiktjiuIUFvJ +Fd2Lda8opcGCgl1Mb7li9uflZknpGZs6OCyRK8azj5T6Lj/y4fdmC4UVu6CU +7vPtYzq6yEJhzBbYXc/PzwQPqIVC97k8rYRenVRP58RYKNjlyiRUKflr2uvT +FooX2Z8fCf0Uu+jYqu0Wis/detyT0PhvDCeVSywU0Z/bvS6hoYJnbttdLBRs +eSESqliVl9Ex0kKx7/NyeyXUI8pOc8jcQrGOfST07P3c1xKtucKTXVBCv9r4 +3PdEsbmCbddZQh8VSeJN080VdmzDEuoY5B9+OtZcwS7XR0IHWJbbmIWYKziP +7vqcJi09ucMcPcTU/ODksbJl5ughpv5j46ODppor2PLSxVTZR3Fbb2uOHmI6 +2Stm4U4Lc/QQ06szD51p0Jqhh5j2muuzcE2JGXqI6ZTLxfGF6WboIaZ3+v10 +zDXODD3E1NVsn/KfEDP06K5n8MEch51m6CGmuW2546OWmaGHmG6enGEpnWaG +HiIaMTRi3TY7M/QQ0V3+R8aUWJihh4juGfH32uk6U/QQ0e8We8hulpiih4hu +rl/WS/7YFD1E1GVV6YGf40zRQ0TrI1+5F4SYooeIPrvYf4fTTlP0EFGbZSGa +sGWm6CGi+k38TNVUU/QQ0eYChxo3O1P06K4XHnjdsDBFDxH1Z7zEeq0Jegjp +eN6BVs8SE/QQ0k1fUtuYdBP0ENKpqUfOtsWaoIeQOj4aN8Y1xAQ9hDT5Vu/2 +iB0m6CGkZyauV1UuNVGw7W4R0u11y03HTjVBDyGN1cvn7LU1QQ8hHVx/8mqa +uQl6CGmSbaZcqjVGDyENzIo961psjB5C6jBKZHUqzRg9BHRXTGTK8xhj9BDQ +iyO+cDU6Y4weAnr4Va9307cbo4eAGiX0+SlwiTF6CGjW5FPlfymM0UNA+1oW +zFGOMEYPARUdcLowxMwYPQR0z8D3GT80G6GHgN5ZUpsd+NZI8R1boIBOsF8a +dxOM0ENABbuGzn99wwg9BPRHap5pOGmEHgIafbWiw3qbEXrwqfuS6fWzvY3Q +g09FXg/PbvjOCD349MXltMrj1kbowafqwPiyP4yN0INPs/PvBKapZOjBpy7R +xnfevpahB58qgxIPNj6QoQefhlqEFAquy9CDT6ctDEjpfVyGHnx6b7qd2Veb +ZejBp9tNHN6NXiBDDz5NPdT65aRvZejBo8eDatOch8nQg0c3uE/MdJHK0INH +n2brhk9rkKIHj6o7huW45EnRg0ePWJ9+7Hxfih48WjRKqZ14WYoePDq46PmP +ow9L0YNHt5n/ph3qJ0WP7vX4V5ItPaTowaNf7+w83jVRih48Kvl4c0fdICl6 +8KhV9C9+uQIpevBogXz06rs1Esy/C05eGzMv8qUE8+6CBeIyh92pEsy3C8bY +/qz0ipJgnl3gNaMmeNRBCebXBakVX3zir5NgXl2QlxMzKN9NgvkY4K/efSXX +x0owDwO4FcZe9u8nwf4NEPR9wPuJejH2a4Adx3fe7SgX4/43gKuHm9XDLDH2 +YwBJ9R7jfYliBVueUg/Ds9w2OYWLcX70cHRN3rf1e8QKdlwi9RD8pM738gox +np96+G3yOOXcGWKcBz2ElZmntNuL0V8PC13iUq/JxejdCQtBWT5TJ0LfTtg4 +4JBjdbEIPTthf3ZuSFCaCP06YcgWafOXMSL06oQTIr570ikR+nTC7nFLTym2 +idCjE0z2+97IXiRCjw444eN0bL6zCD06YNeeAJs3X4nQowOiVyRuWiQToUcH +7KV183IbhOjRAakOXY9m5wnRowNKKn1i/r4nRI92GBD9XdvIS0L0aIfa8Quv +hwYJ0aMd0s0HhmvWC9GjHRoLo+57zRWiRztszjjGTxwvRI92OKt0XCwcIESP +NnA9sDfByyBAjzZYrayou1QhQI82mF50QP8xS4AebXB8iDrHJlGAHm2w/cDG +eavCBOjRBuqfbq67sFuAHq1gt1Otz1wuQI9WmFQn4zVPFaBHKwxsdlrY31aA +Hq1QVsjUTjIToEcr2HR4X/VQ89GjFazuTV63tpCPHq2w4AvDkJ8f8NGjBYo9 +HW/vvcpHjxY4xqSJA47w0aMFAlYJu3b68dGjBQab/PGL3zw+erSARJq0fbET +Hz1aYNrkvfcUA/nooQMXXZzjsC4eeuggf6gDtFfw0EMHAmP7GS+yeOihg0fm +ZtcjEnjooYNQ1aZ7y87x0EMHZlW9fAbs4qGHFvr/WB30cikPPbSw/WeNZp+C +hx5amGmyOGyYDQ/PTy3sj3KZAkY89NBC+EA4GlfSRTgPLeT/Sntl3OginIcG +KmIyn7zw7yKcR/fngsq5/07qIpyHBgzRtYsTeF2E89CAl+Wc0F+eGgjnoYEJ +UpPIGecMhPPQgGXWrf66JQbCeWhg3Oj+yWHDDYTzaAZVqh9/SL2ecB7NEOWm +vxGeqiecRzP0vz/mm5YAPeE8mmHCVc+5M2boCefRDDLDqX2BZnrCeTSDmSH5 +h2sFnYTzUMNRh+GLki52Es5DDd5p8QNj13YSzkMNZfIFVsdHdxLOQw3tr2dV +eWo7COehhtQVF+pFDzsI56EG4jXg5qXgDsJ5NMEUodOvVu4dhPNoAhuL5MFH +e3cQzqMJ4hwD/8wvaiecRxOE6ANjpdfaCefRBI993bdZ+bajRxNceKnz+dKx +HT1U8O+kxwXtujb0UMGl5I+9Hz5sQw8VRHw/dv2q4Db0UIHsVG6fatc29FDB +0DzV/O8t29BDBdZhi5eFFbaihwpyE60W3bvYSv5k82+E6DtOvv+sacW8G+GX +PfzE3+xaiYzNtxH6rqmZ5N3Ygnl+gou98i1UqS1kPZvfJ9h4JHHC6r0tmNcn +KLUtiEogLSSDzacB2tsOObwStWAeDcDrtMt4/lRHhrL9N0Cb5j+n38/oCNtu +dj1cCXCd7uKlIwHsgvWQPiHgxv1+OsLGY1sP4dUBPFGJlrxh50kJG+xu1w+5 +oiXBHBB4NBaoZD5aMoGdFyXcXl17iI7UklJ2PurgH0kvwXSlhoSygHVgYboC +ziZqCMP618El/+3qmK0awv29Uwu1Xw94GDxBQyJY31rI+fOG7YiWZvSshYbE +udYn7jcTDVtgDdhvmBOUuK8ZvWqgZVBGe6hzM5nHBlgD3+9ItPq6S40e3Z+/ +cfc5QtXoUQ0La072DT+kRo9qCJw+0HvBVDV6VMOL3fY2mQI1elTBsejamVXp +TcSH9aiCvbpz82/90oQeVdDQ2S9xyNQm9KiE9wVzdznym9CjEhZeO3+uFFTo +UQneVYVR9oEq9PgIXd99KDFiVOjxEbwr4y6r1Y3o8RG0y+MHVG9sRI8K0E18 +f6Ky8hN6VMAxSfbWsuWf0KMCjhYafniR34Ae5WAzgpyJcm1Aj3JI7pO7bDLU +o0c5pG2WhUSMq0ePMnDzIltvRCvRowyMradGuPVVokcZfKN6GLs9uA49SrvP +V+u+MnUtepTCyvqW/+qW16JHKYxKKm80ZNagRymc9lw7dbhjDfFm8/8Ai9ML +ssb9Wo15v4dstxkDRe1VRM7m+x4e2w+/vn5pFeb5DqTGVvcd/q4kWWx+JfD9 +sxM7Lb+oxLxKQJ711q3A/yM5xuZTDK1zRn9tm1GBeRRBQqTR7MS+FYS7cIrg +8M0TVR2ry7Hft2B1/k7g2ZtlpJVd8A1ExkQzrz+VYj9v4PXp1JPyUaUkiZ2n +QpiQ+UF+N+M9zk8h1M80+uHrYe9w/76GrW8MU2I2FBPKzkcBDBpt6z7v4luc +hwJ4nv1wR2tKIdnN+ufD+NlrIibFFKB3HsTvX1Bc7JdHHFnfPMhUFocENeag +Zy7Mtlggy7TKJjWs3yv4b0iQxrYtA71eQU6B7Y2aNSnkChtgDuhNi67czsll +OI8cSHiVc8xUt41JYvN/CWsqR1YdmFvOcHm/AIGH/4Z9OaOYoWy+2XD3UesZ +/lEfhsvzGYyZPvuJim5lQtn8nsKl6ddPfnTOY7i8suBkxKz+VXahjJzNJxPS +Ku8tP2WfznB5PIHCo9pm69mbmINs/xkQFmWUP9n2CcP1+xhyT9l7pV9xYVRs +f2lwe6jdjisaV4brh0LR+fMG6weUoWz9j2AO9Z/kskOB9T4Aw63Tlsv/+Im5 +wtZ3HzzHjlREzqcMj63nLjRnVfgq08bi76fCC+PeLWMfJzGl7O8lQ3huydzL +CfG4fiK8HPVK/ueRQcxBdr040C3dr7jzzwj8fjQsq+nT92ju78xB9v9fgoqV +bzz+3tz2Lfc+HDT17mlpglMMj/0cDMNW3jJc4FGG9/+fvux7cvCnij+Hbbne +832S8u6/XxM8TjA89oK7RMSRB/O3ebbj+2gyvh+xjPgrkqFcfaTUzjQkOtOs +p36iWntp/xtxf4bHXmjJJEGzRlr50Lynf+I3L8cjNym2Jx8S4RMc/3GKQ09+ +xPH5p9HRfVXfYr7k8NiZH5w/OfbkT/7VZcxfen9ijw/u+6QeP+LsZxBWj3fp +8SV35jlvvhzs1ONPdrwrXZfw9k7PfOD3I3rmh9i5nClcplvaM1/kXdi+PR5b +GKzv6f/9Hs4nKX24+oVFpx/jyM0vkQ8cJL802Ltnvolz+sv9i6/1xvpfki1D +dnmmyBb07A+ivqQ5a33eg4nl9g95m9jikXgljcH9RXwGrR/etNEb+3tFZLpp +KcO1KxjcnyR462KL0KQk5htu/xJL+9P7Kk+vZHB/k525I5+MM3PD/vPJh3U0 +aav8XwbPB8K7Jakdb2WDeRQQ8Htz9bl/CoPnC/Z7hcHzh2yeMkshf5zM4PlE +Up5F9l9QNQXzekM84v3rFGQJg+cbiQo45zT2x9sMnn+kdI8g/OpyVwbPR7J/ +6bHGvtm3Mc8i0m+BY4p9yj4Gz1eyqPD583P3VjJ4/pJZYaefDE9NZnK485ms +DNG6DWhIxrzfke338m/lXbvN9OfOd7LtyZVOw41dDJ7/JDP3vJ/t++fMSu5+ +IMwFt5IGlxD0KCWhcx+NSROHMvO5+4X4zRgdnl/+gsH7h+zVJ0yJjMvG/kqJ +dfu8Ju/cE+hVhnlR5nfufiMRHZ2uE+cEMXj/kR/zZvvMcD+H/ZeTa8dfPn7U +dAg9y4l/Ukd1gyYQ8+h+n+37yU/9isH7l2jCJU8XbdzJ/A8OmPjr + "]]}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6]}, + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.004583333333333334], AbsoluteThickness[1.6]}, + {RGBColor[1., 0., 0.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.004583333333333334], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.004583333333333334], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {{}, {{{}, {}, + {RGBColor[1., 0., 0.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJwt1QlYU8cWAOCbe7Mg4g61zwWrdadI1fq0rfYMVqS4FqkLPmxFBAQpWEWt +iMpDxIrFqmxVW30oWKEt4o72Pu4F3CpgUVFUwLLIIglLSEIWICnJnPm+fPnm +m5uTOec/M3fshogVgSzDMNV9H+v3yRPW8QZSF8mmqW6m8irvPOcDyjdw32Wo +82fu3/Cf2Fec2zKvBRjbyOWPFuom+/3QAud3xdwvqkvk66IcczxrW+Ai67bG +OPox/8FM61ACd0XtPiApko9X2gKCdNykdQGeS/jnfdHsK5Rgz1bB3qX/5af4 +/dAXUQUVe5au+DPnKL/bGi5KBfPfPVb7vXcCX1piHSrY3X5/lmpdJD/mgDVg +K5xbf8PtF7cs/pt51g22QufwikumiDt8kXV7ha3walTwwbQFN3gnazjHNggt +mjRV+Z/DfHCQdbSBfl5UeHXVLf6mszVgG6gmBprt3xP5/tZ07dshMsdnW+2i +JN62Pb92CLnXukthn8vbwuW0w8TCuW3Dy4p5WpcOsFiKmqTuSZhPByxM/7f+ +ZM49foU1e+8OKJZcKYiHq5hfh62eMd9n8xnWcpzrgK93qWFBRinmS9drfES+ +y5qOjs47nO5g/mrqESPwn1m340nn4pFfsR64/r+nPPW1zUn70vtYHzXkCLEu +Qe9dRG/bujiI3MZ6ddLf51aifydEj6h5f+zXV7B+uD75JfaDbf7jB6eKeFu6 +eba5r/J2NfZHJ7Dn99xcsqyEt4Wz18CyIbvc/BseYr9ogDnNLyctZVhvjS3+ ++k23eFu6BzSgyv+0Z/niKwKtvwYaLL7Jox/nC7ZwFRq44tE0mssuEqiHFt4z +BG+c5X5PoB5agOOxVbciHwjUQwsZ70yPKQgsFaiHFp4uUc8/OKxMoB5aCHNp +WPbhhkcC9dBCxOVRvO7sY4F6aGHnqughKc+fCNRDB2Exv1TPkD0VqIcO8sOK +h2ye+kygHjrwXhvctM+rQqAeOpAYGzZtDXguUA8dPMxI7xy664VAPXSgzMjJ +cjj8UrBtz7EL/vrpt+zWE5UC9eiCiT7fSV3PVwk2jqAumO0O09xyqwXq0QVn +vxoT6pX3SqAeXVDz8bqA2/l/C9SjL96eoNHt/jUC9dCD+/K6YY31NQL10MN8 +U3H9usBagXro4dGsiOGhjbUCPc96+OOMd+DI4Dr00MNpP+nAmKY6gZ5vPbT1 +TnLJCK5HDwPcL7nQeaypHj0MML3xQId38Gv0MMALoW2OsvE1ehjA6+dRyQFB +DehhgLgvLRlCQwN6GGCf+sf+XGAjehjg7f5X97//uhE9jLAlbi+zKKAJPYzw +IGjbnc/rmtDDCPHJLdEe/s3o0fd80fElk2ua0cMIZSMHNBu+fIMeRpgdVZF+ +vfqNQM+HCdI3ZUet92tBDxO0vg5x071sQQ8TVH5X5LHNV4keJghdfWz4iwol +ephgp/St6vGrVOhhAreHE65/Ua5Cj25wE5deDlrRih7dkOpj/3xNWSt6dAN7 +c7TLlGVt6NEND5OdLj8tbkOPbihLHLTbz6sdPbphzrniM3/cbUePHogLS8ww +jO1Ajx5Y5Fr1fM/6DvTogW1rlyarTnegRw/kjg3st6C6Az16YGH2xh37R6rR +owcytCUTsn3V6NED/LvXw2+kqdGjF77dxlzLfqpGj164VBgQsn9YJ3r0wtq5 +G/q5e3eiRy9cWzxuTP2RTvTohciLM91DSjrRoxdejft06JN+GvQwwyVBIO94 +atDDDHnNkfGfx2kEel+ZwW/eyAsBBRr0MMP8v+oifc0agd7/ZjAdNtyZ/rEW +Pcxw8YjdXtVOrUDfBxbY9zj/u0NXtehhgYEJni/t1Fr0sMDvrmXhoa46gd5X +FkifYr8oJ0SHHhZwVl7cUZ6pw/vKApo3DvLqWh16MGSS66FB90d34XlnyOrf +5+Sm+HahD0MqasLtF6Z0YX4MyTm/yuNFWRd6MWTx9SPfL3fQY/8xpOPCg0FZ +nnr0Y8igjG/Zxlg95s8Q/dnNp+T5evRkyDs+CY79jXrsz774EbHZmpkG9GXI +tNiYn8RwA9aHIV+1KF22ZhnQu+//+k36ye61AftXQlZH+MyIczaiv4SUVvxr +VsMaI9ZPQn7+e7vKJcmI/SAhsbMPpK8pNWI9JcTxg7WnNytM2B8SYnfkkWug +uwn7XUJGTdl8ymO3CftFQn6/OWHmgGsmrLeEDB6zzp1vMwm2dAslZPGyX4f6 +TO7G+kuIV2ax5pF/N/aThPjuj5n+4alu9GBJMrf77UPl3ejBkrfzFugKBvSg +B0vGebg4vl7Ygx4sic53LWjf14MeLMnLUno25PWgB0sCD6Vobqt70IMlkRWv +Bv4wtRc9WGJeqa7/NKAXPViScdqfrz/Vix4skVeOrw0v70UPlow6dvBkg4MZ +PVhSFTHh/c88zOjBkrn2dc2pe8zowZHY8Dr7x9fM6MGRjISDlcZWM3pwZNrS +kDMDJ1rQgyMLdqw4OfhLC3pwJLLfvEFMqgU9OPLFyuWkutSCHhwJLAybXc4y +IvXgyKaKrNZcZ0akHhxJdM2pi/uIEakHR57lVc76fBUjUg+OJN2dKB+2lRGp +B0eCnjhtLU1kROohJUcTCtL2ZTEi9ZCSEcry5Cl3GJF6SEntkcT44hpGpB5S +cnUIfyiwhxGph5QYk27f0g+XiNRDSpSrz8yKnSkRqYeUxG1/4SRbLhGph5Q0 +nkvZERMqEamHlKx1StyqPSARqYeUHNs4eLx/ukSkHlLy/6N2mXd5iUg9pGS9 +wjBwwnOJSD2k5K+b3VHRGolIPWRk5bwSSelAVqQeMhKtzf/jramsSD1kZCK5 +J/p6sCL1kJFvb+ycnLqeFamHjOQEcvYlu1mReshImgNEd6eyIvWQEWXo2ZTx +l1n0kBGHeK8wz1IWPWTkmU7ntLGZRQ8Z2Thj8IUojkMPGdlRd2H2YWcOPWRk +qEvUi5QPOfSQk63m5vSTX3DoISe5ofLMExEceshJftPRruMJHHr0rZ/TZcVn +cughJz+Wej+OFDn0kBPvV9ti11VyYrQtoJy0v6oqIV0ceshJ+W8FRc5DpOgh +J1kfOezSu0jRQ07+fOhnfrBQKto4SuRk/Cf9A0/4S9FDTh69Ozl/Q7QUPeTE +y2nviElpUvRQELsnxxMaL0lFWzhnBfHafsE5vUSKHgpSkZzfuKpJih4KErEl +qVPBytBDQeIGZHpfHSUTbdvboiBpK2cM85stQw8FaZ82d6HFW4Yefc8fizf+ +HCZDDwW5m3bi4zkHZeihIAMOF454mC4T6ftbQWQqx8yveBl6KEjBjs3Nqmcy +9LAjL8eFdG5Xy8R/AD9Q0Y0= + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJxdl3tMXEUUh3dhYSvGWA38Ua0YYlpp0TQpjV3rpfcmmtBoE6Sl1ViMhCD9 +xwckkBCEZkWoDT66RGOEFlgCNjXSTY2ElnYsy/Iq8lAesihatw8l5bm8CggW +uff8Zia5kwD5OHPPzplvzlyISX//0NshFovlz40v/WdFuT7uqhaMyeTL0SUT +kvdH+GuzEsbVC5EnjmaEVjKXbzE29fS4+kRB5kcj2x3sVn6kJ/HmuPqXo/f2 +1NNFbE+8PibUwGR20d7S99jJCSOh+lzcI+kD1vmrIxvZIvwTakn5sTdtadvY +jtTTGxknVV9h1bVA9W72gZ4uf1J8fm+PPiQ/WaInnBKcnaAvcEr99fGON6qT +zrJWfXk+Hr/IovR0kdNi/vFMfUhuitYTTqtxs0UnKx+rYw/q5UbMqPaaXbWe +F4uZsbzUGTHfSOeZUc+ERDSfHahm9NugiFM9nN3KIb36ZPD5z1Efj7tYnb4d +tUHV0ZHUPpHvZlRvUPUPlsfMJdaze3o5i0FT/bOqOy+s0bLlODugLydx1rQf +xIG9rYz88rgH+0N8bvIbhXzL52m/5kz+OV9UaP8E4zzMqbajXbM/PlTMjHIv +Ix5sw/mYE/thpIuYVy3O1vS2j+sVOi/zFB8pUmi/59WQwrbd1jMNzCi3BHFn +G6P9nxfrM9L5JdNYMPngPMDIB+c++FgQ9ZCPBdP5k0w+Fkw+FgWTj0WRj3xw +vg4fcj754LzAyAfnG8xYXuQ9kw/OI8zQkcn5JnzI+eRDMvmQTD6WwAH075KI +kw+wM4h+5vEh+OA8zKi/l0w+lkV+8sHZhf7g3AIfy2r21rEXTlVdhY9lsZ/k +g3M3+oPzEYV8rJh8gDUvfKyo9cFHy/akfA0fKyYf4NhR+JBx6o9/TT7A3kvw +IePkA/zabfQH+A/eH3w+749V8Tz54FyP+2hVzCcf4MYAfIBj/fABrriL+2qN +ONAIH+BfPOgPsO0afKyJ9ZAPcM8P8CHj5AOc5mXk4z+TD3DMMHyAkwbhA3xh +CPcVf94NH4IV8nGfOKWLkQ/wwSZG99V9kw/wUDOj+x9c3Akfcj69D9aJc4bQ +H+tiPeRjXcyn+0oy+VhXhwMHXj0Rn8fovkLc+T18WDTj++Ye9LtFq7P39Ppz +ffCD+PWfUR94Y5Av8Ev/4PzJOPmTTPWDfV3oL7DtO5xPOZ/8cnYrtD/gvzvR +fzx+hdH5tRrs/fAO/FtFPto/cMCD9xex85lh7KdVO79zfe7I8DmcD6uWkru5 +8t3kCtw/PJ8b50Xmp/0G72tkRrk+OZ/2H5+3cb7oPCEebIePEFEv+eDM3yeS +yQd4Sx/6B+x0woecTz4kkw/J5EMy+ZBMPiSTD7CjUiEfPO6Cj1Cqd+cAfISK +58mHZPIhmXyEinzkQzDuH85OhXzI58kHPj+tHz5knHyEag+8/Ozztqc64APx +KC982MR88iGZfIBf/xL9IePkA+z4CT5knHyA13x4f9q0qLJPbtwZq2kiH4hn +NKM/+PMuhXyAb3Xj/gDH8/6wafs/nRhcTaiFjzCKR16BjzCt6uHxxU0FDPcL +4uxb9Aex9sUo+oPYua8LPsJEPeSDcxZ8cHbh/cA5Dz7CtGP6PwOWNIV8IF7a +CR/gqFb4CDfYmzeK+yoc+b5SyAfnNIV8gOP60R/gkGb4AAcKWYGREGxtgQ+e +L0chH5xL4SNcK5iuaHvH380MHT3h2lpOw46G7b/BB59/Cj44O+HDzveLGemi +7drkuj5q4IPHeX/YxfPkg9j5Viszlpdl1z4bLvu9L7Yf9xWfz//esGuHt7Uf +vJTbDR8UD0S1wIddY/G7EsYc/P0tP598cHYp9HOTljEWubX3FS/7Hyk2hH0= + + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.0055000000000000005`], AbsoluteThickness[1.6], + LineBox[CompressedData[" +1:eJxdln1MlVUcxy9vXrzMZQtqzYWVbkkvzokbWMeep1XDVVaga7TRVi2QPwip +bDow9tDE2DS4RiQyyBtcs1qhmE5wF+IlM/TKgBgYL4mhTd4vFy6v4u0+z+97 +ztmes7F7P/zO8zsvn/M7z33s/T1JqcEWi2Ug8Kd/lh3X27BiW78q+fT9L7Gx +xNro/NFhRfs0b0PSw5nseVtPVda2ESXOvi7GN5TA7M2+DSlFI4oF7d/syOqE +m5ydbEus3kZF/NCokVDw9UA2W4/kmJSiQMYxwTl6uuwxZcuYN3xNcQy75tbb +mJL1eUnlXv9qtjZfTziuHHngyW9a3jzAPtqmT3BcPN+iT695XAn/KWfzueFc +FqWni5xQvohe39b8toXtTtPbhLJy75D31+U8VhetJ5zA8wUsQl+ubRJsZ8b0 +UiYV+1sFEcyRz4x01Txey+jToxSrNSOxu59jtB6PEdfSHSxJX32ix7Q+j7K6 +Pyord7GMOfXtqPIo9539JPPjlT9spfXy/g42qy/H51FmOncuRHVVYf1TIt92 +fToJU8ozawvrZ+PzsB8yTn6nTPsD1qrhe0rxJ79TMVD5C/bLq8cfPRV7Hv69 +1F+tw/5RfKSi2kXnwSvyG8ut9ZrOh85aRmHIJWaks00jfgbnRTLt97R43lhu +vmTaf85tzEjXA9YG4WMG8Xb4mBHPk48Zkw/J5EMy+eD8F3xw/gM+fOI8kA+f +WA/58Jl8gDUPIx8yTj58wr8xvchZ8D/wMSv6GzrSJJMPzv2MfMyK/SAfnDvh +Y048Tz7mxHrIh4xTPc+ZfEim+p5TnK8df6FqoB0+5k31Pq9MKxGTk3GXUB/z +Yr3kY97kA9zYjftAxskHWO2EjwXEv4aPBdGffCyYfIDf7YAPHj/jIh/gO72o +j0Xi7bfgY9HkA7y/C/eljJMPyeQDXN4LH0vE7T2ojyV+H7nIB/iDNkY+lsR8 +yQdnh4t8LInxqN0FZ6E+7oo4+ZBMPsDZbtxXMk4+wIUtqA8ZJx/LxC/2wsey +ycey8E8+ZJx8gHe14r4CLzbCxz3Rn3xIpvsKvLEFPmSc7v97YnzyAU7txvvA +b6oPsPYn6gPsvMbovgIXNOF94Vfsfr2dwH3lN/mwqPwL1btFHTb6n4YfHnfg +vIG7/0P9iLiLzh940xXUE9jWifXL/uRTjk/nE/zEbdQbcePgbeyP7E++5fzo +/AaB7S7yT6ydvIHzzOMOF52HIJGP9jNIHUwvPfjqrbN1dD6C1MOZxQ73nLOO +zjv6O5w4L+BvG7DfMp+x3GZwSj32X8bpPEmmFkz84EXcv+BNFfABbhqAj2Dx +PPmQTD7AP/bCB/ipZvgAL3SgvsDllbi/wR+2wwc48wJ88PH47wVi7Vg7fIQg +noX7EZzcAh/gcw2oT/ANN843mLnxPgPHl+P+AW9uhA/w0cvwwcfnPsA9nfAR +oj5k/MOO+pb9qYUS5/4GH+AK/n4HB54nH+Cfa1AfoSIf+QBv7IIPHtfgI1RN +7nu67+apJvjgcQd8gEu4Dzk++eCcDB+h6svlXV/WX/5+K/kIE/3JR5hYP/ng +8VL44Kzh/ufshA9wwwX4AO9pgQ/w633wAT50npGPMHXmasXC4aES+BDjwQfn +r1z0uQJcAB/gtCvwAc44CR+8/3744HwQ9xW4cR87YCTk8XT8viTWVnXDB+KB ++5x88P52l6HDLedHPogbM67Cxwo1Jy8yeEd8B+rDquZ/9kpZ/7O9zEgXbVWL +ao4dvfP7d/BhpfH3/Q0fVnXdrlh28b0a1IcV4wUqzPDBWYMPq8qKHmlI3NkK +Hzxeivc1Zzt8SKb3t1U98nhqa6mvHz6salzuG71rdlzH76twcT7+B3rzUxo= + + "]]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.0055000000000000005`], AbsoluteThickness[1.6], + LineBox[CompressedData[" +1:eJw11QlU1FUXAPD/rCAipkJmhpoLqXxYbp+mf72XFNFMES0NDxiriBDgghmi +EgqIiLmwhGiGQAEmkilR8aGgtigoIgoKmOzIPhszDMPMx8y7vXPmzHnzZu68 +e3/3vf/b3iEb/YQcx9UPv4zv51KN4xV4Nqz8eduEZL7LtXBSdOcrsJ2zpOHs +qu/45RbVGaHLOsBRs+DKypXn+VOlqpnuX3fAsStpJ7QZJ/nGcOs854YO+Cpo +3Z+Lr9bwC+YbRyf85xO/KZIDmXxMpykgeF5e1Lfrn4/4muFoFtWd4BHq6qq/ +9BU/y/3r4YhdUKl2frJ64BR/wBguvAsitnwehp1xfHmZcXRBXOpyn54Je/nJ +0caA3TBl/1+KJckx/K5lxg12Q1F3ynp1RA1/27i90m64fufQMc3lXN7GGM66 +B+wvuvmfXhvP+283jh6If2jbZ3chn/91kjFgD+ySCd9zS63hRxrTteiFkpth +3u4Febxpe+69UCGXNxi2JPGmcHm9YCUYfXthSy3PmUYfFC+d8MaOx2conz4w +fRz6hN9ozN6V5lw25ffvPIPPNJYjow/8blz65nBDHeVL61jO9xvTUf07r6D8 +ZWwefIVfbdyOM825UqqHDGYlZyYsuFDPM18ZuP+34eC4x/+j+vz7/Xzypnnk +T1QvOYxyimkNTrtL/nLjeui5XaVUPznEZkR3SwN/pn6Qs9/veMqb0i2Uw5rA +sGeVCY+oP2jdsoY3hbNQsLn9PeoXBYxfvkUVb1dJ9VbAjm012WU1f/OmdKMV +0Fe8Quey9mdg9VfACYNbom1lMZjCVSsgzanNVpR7m/JSwlyNv+9Cxz+BeSjB +5UxU3W977wHzUEL5lLmRJX7lwDyU0PiR7IPYcRXAPJTga9+y/n3vR8A8lOB1 +7a0i1aVKYB5K2L85YkxSzWNgHirwjfyhfp7kCTAPFTwKuj8mcPZTYB4q2LDV +v+3wmmpgHipo07Ts2O1TA8xDBWOy0uVjv3wGzEMFXZl5OZbxz8G0Pet+KD3/ +Y253ai0wj36w33RM7PB9HZg4tveDqyPMeTe/HphHP+R9NnnnmsIXwDz64cFS +D587xf8A8+iHJwe32/Z6vQTmoYZ1Lo3jWpteAvNQg5P2fpOHXwMwDzU0LgwZ +v7O1Adh5VsOVi65+E/0byUMNl9zFVpFtjcDOtxqqht6xz/RvIg/NcB2z5afb +mshDA0tao/tc/ZvJQwMVN3sWd7Y2k4cGVl94K9Fnewt5aCB2myHzZksLeWgg +SvbNSJFfK3loQDLy+pH3mlvJYwACjh7iPvRpI48BuLd9z90NjW3kMQAxiR0R +Tl7t5DEAgbfPfDTzZTt5DEDtxFHtmm2vyGMAZodXpxfUvwJ2PrSQsiM33NO9 +gzy00NEc8K7qeQd5aKHm2G2nPW6d5KGFmC2nxz8bvveYhxaCxa/XT9/cRR5a +sHswo+Djqi7yGIQ3bq27tn1jN3kMQuomi5pPK7rJYxC0hbb2s9b3kMcgPEy0 +ufbkfg95DMLLhNEH3Nf0kscgbMm4f/H3P3rJQwfRQQmZmrf7yEMH6x3qag56 +9pGHDj7fui6x69s+8tDB1bf9Rqys7yMPHazK9d13ZKKMPHSQpiybkesmIw8d +FE4rCP4lRUYeQ7B7D3cj94mMPIagpNQn4Mg4OXkMgRfvPcLRVU4eQ/Db2qmT +m07KyWMIgq7Odwwok5PHEDydumLs4xEK8tBDwc2bOMVZQR56KGzfG7PhqALY +faUH92UTs31KFOShhw8eNu510yuA3f960Mdr7s5dqiQPPfxw0vxQ1xdKYM8D +A3xVWXws7rqSPAwgPe783FymJA8DpDtUBO90UAG7rwzw3SyLD/MCVORhgGmd +V/dVZanovjKA6pWltL5BRR4cznGIG/2XbT+ddw49ryzOT3LrJx8O614GW6xK +6qf8OMz5frPTs4p+8uLQpeDkCRdLNfUfh/Lse6NznNXkx6Fl5n5ha5Sa8udQ +cSkwTVqsJk8O7TYdtx45oKb+5PBySFSuYr6GfDmcGhV5/lawhurD4Wcdnfa7 +czTkzaFsxDvnzZs11L8C9AjZNO/o8Dlk/gK8Wz1hYcunA1Q/AZ7/J6zL/uwA +9YMAjyyKTv+0fIDqKUDrBVu/DTTTUn8I0PzkIwc/Ry31uwCnzQpMczqgpX4R +YO6vM+aPuqGlegtwzGQPx6IeLZjSLRXg2vWXx26aOUj1F6BL1n3FI69B6icB +eh+JnPt+2iB5CPGc6MAbcVWD5CHENwtXqkpG6chDiDOc7K2bV+nIQ4iHih1K +eg/ryEOIRTmdzi2FOvIQomdckuKOTEceQtxX/cLq69lD5CFEbrOsaYXPEHkI +MfNbr6KmtCHyEKJ57fSG4Koh8hCi7enYcy2WevIQYmPIjPdWO+nJQ4i8RWN7 +8kE9eYjwRHCjReUNPXmI8MLx2NqBbj15iHDeuoCLVnYG8hDhin0bz722zUAe +IgwZsWw0l2wgDxFu/cQF68sN5CHCHaVBi6qEHDIPEQZX53TnT+KQeQz/v0Ne +49ElHDIPET4trF24YTOHzEOEKX/YScft5pB5iND/sc3u8gQOmYcYE4+XpBzO +4ZB5iHFsZ1XirLscMg8xNp9MiLn/kkPmIcb8MUVxfjoOmYcYdWfv/KYeL0Dm +IcaOLRcXRg33IfMQY2zYMxuJiwCZx3C8jKR9kTsFyDzE6GGTsFs53HfMQ4xn +fF+b7pUuQOYhxpJT5ll/FAmQeYjR20xjNaNGgMxDjA9/HQyPUAiQeUjQbVmZ +oNxKiMxDgoeVxb+/PluIzEOCM/HPW25OQmQew+u/fDEz2VOIzEOC+X4ii7ID +QmQeEjxlCRGDyUJkHhJs33kpafo1IXlI0CJmTZBzuZA8JPhcpbLxbReShwR9 +572WHS4SkYcE9zdmL4of7hPmIcHX7cOfJb0vIg8p7tG3p5/7WEQeUszbKc1K +DRGRhxRvtZ3qP3NcRB5SvJ6hyonJEpGHFL8rd63ce0tEHlLc9GJPlEetCCNM +AaWofFFXhv0i8pDi3z+W3J40RkweUry8xPJLtb2YPKRY/sBdf2+VGE0cZVK0 +Wz7SL9VLTB5SrJg2s9g7QkweUlxtc+jNd1LE5GGGVo/PHG/9SYymcJPMcHVY +9qT0YVfmYYZ1icWtm9vE5GGGoaFn5WZCCXmY4bFRWa7X35KgaXuhZpj2ybxx +7osk5GGG6jn8KoOrhDyGv386ZuBCkIQ8zPCvlNSli2Ml5GGGo+NL33yQLkH2 +/DZDUZd11mdFEvIww4J9ge1dTyXkYY7VUwPkYTIJ/h+xUGQO + "]]}}, { + {RGBColor[1., 0., 0.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJwt1XlYE9cWAPDJTBZE3KH2uWC17hSpWp+21Z6LFSmuReqCD1sRAUEKVlEr +ovIQsWKxKlvVVh8KVmiLuKOdxwzgVgGLiqIClkUWSVhCErIASUnuud83f9zv +Tk7uOb9z74zdELEikGMYprrvkfQ9bN9z8oR1vIHURbJpqpupvMo7z/mA8g3c +dxnq/Jn7N/wn9hXntsxrAcY2cvmjhbrJfj+0wPldMfeL6hL5uijHHM/aFrjI +uq0xjn7MfzDTOpTAXVG7D0iK5OOVtoAgHTdpXYDnEv55XzT7CiXYs1Wwd+l/ ++Sl+P/RFVEHFnqUr/sw5yu+2hotSwfx3j9V+753Al5ZYhwp2t9+fpVoXyY85 +YA3YCufW33D7xS2L/2aedYOt0Dm84pIp4g5fZN1eYSu8GhV8MG3BDd7JGs6x +DUKLJk1V/ucwHxxkHW2gnxcVXl11i7/pbA3YBqqJgWb790S+vzVd+3aIzPHZ +Vrsoibdtz68dQu617lLY5/K2cDntMLFwbtvwsmKe1qUDLJaiJql7EubTAQvT +/60/mXOPX2HN3rsDiiVXCuLhKubXYatnzPfZfIa1HOc64OtdaliQUYr50vUa +H5Hvsqajo/MOpzuYv5p6xAj8Z9bteNK5eORXrAeu/+8pT31tc9K+9D7WRw05 +QqxL0HsX0du2Lg4it7FenfT3uZXo3wnRI2reH/v1Fawfrk9+if1gm//4waki +3pZunm3uq7xdjf3RCez5PTeXLCvhbeHsNbBsyC43/4aH2C8aYE7zy0lLGdZb +Y4u/ftMt3pbuAQ2o8j/tWb74ikDrr4EGi2/y6Mf5gi1chQaueDSN5rKLBOqh +hfcMwRtnud8TqIcW4Hhs1a3IBwL10ELGO9NjCgJLBeqhhadL1PMPDisTqIcW +wlwaln244ZFAPbQQcXkUrzv7WKAeWti5KnpIyvMnAvXQQVjML9UzZE8F6qGD +/LDiIZunPhOohw681wY37fOqEKiHDiTGhk1bA54L1EMHDzPSO4fueiFQDx0o +M3KyHA6/FGzbc+yCv376Lbv1RKVAPbpgos93UtfzVYKNI6gLZrvDNLfcaoF6 +dMHZr8aEeuW9EqhHF9R8vC7gdv7fAvXoi7cnaHS7f41APfTgvrxuWGN9jUA9 +9DDfVFy/LrBWoB56eDQrYnhoY61Az7Me/jjjHTgyuA499HDaTzowpqlOoOdb +D229k1wyguvRwwD3Sy50HmuqRw8DTG880OEd/Bo9DPBCaJujbHyNHgbw+nlU +ckBQA3oYIO5LS4bQ0IAeBtin/rE/F9iIHgZ4u//V/e+/bkQPI2yJ28ssCmhC +DyM8CNp25/O6JvQwQnxyS7SHfzN69L1fdHzJ5Jpm9DBC2cgBzYYv36CHEWZH +VaRfr34j0PNhgvRN2VHr/VrQwwStr0PcdC9b0MMEld8VeWzzVaKHCUJXHxv+ +okKJHibYKX2revwqFXqYwO3hhOtflKvQoxvcxKWXg1a0okc3pPrYP19T1ooe +3cDeHO0yZVkbenTDw2Sny0+L29CjG8oSB+3282pHj26Yc674zB9329GjB+LC +EjMMYzvQowcWuVY937O+Az16YNvapcmq0x3o0QO5YwP7LajuQI8eWJi9ccf+ +kWr06IEMbcmEbF81evQA/+718BtpavTohW+3Mdeyn6rRoxcuFQaE7B/WiR69 +sHbuhn7u3p3o0QvXFo8bU3+kEz16IfLiTPeQkk706IVX4z4d+qSfBj3McEkQ +yDueGvQwQ15zZPzncRqB3ldm8Js38kJAgQY9zDD/r7pIX7NGoPe/GUyHDXem +f6xFDzNcPGK3V7VTK9DvgQX2Pc7/7tBVLXpYYGCC50s7tRY9LPC7a1l4qKtO +oPeVBdKn2C/KCdGhhwWclRd3lGfq8L6ygOaNg7y6VoceDJnkemjQ/dFdeN4Z +svr3Obkpvl3ow5CKmnD7hSldmB9Dcs6v8nhR1oVeDFl8/cj3yx302H8M6bjw +YFCWpx79GDIo41u2MVaP+TNEf3bzKXm+Hj0Z8o5PgmN/ox77sy9+RGy2ZqYB +fRkyLTbmJzHcgPVhyFctSpetWQb07vu/fpN+snttwP6VkNURPjPinI3oLyGl +Ff+a1bDGiPWTkJ//3q5ySTJiP0hI7OwD6WtKjVhPCXH8YO3pzQoT9oeE2B15 +5BrobsJ+l5BRUzaf8thtwn6RkN9vTpg54JoJ6y0hg8esc+fbTIIt3UIJWbzs +16E+k7ux/hLilVmseeTfjf0kIb77Y6Z/eKobPViSzO1++1B5N3qw5O28BbqC +AT3owZJxHi6Orxf2oAdLovNdC9r39aAHS/KylJ4NeT3owZLAQyma2+oe9GBJ +ZMWrgT9M7UUPlphXqus/DehFD5ZknPbn60/1ogdL5JXja8PLe9GDJaOOHTzZ +4GBGD5ZURUx4/zMPM3qwZK59XXPqHjN6cCQ2vM7+8TUzenAkI+FgpbHVjB4c +mbY05MzAiRb04MiCHStODv7Sgh4ciew3bxCTakEPjnyxcjmpLrWgB0cCC8Nm +l7OMSD04sqkiqzXXmRGpB0cSXXPq4j5iROrBkWd5lbM+X8WI1IMjSXcnyodt +ZUTqwZGgJ05bSxMZkXpIydGEgrR9WYxIPaRkhLI8ecodRqQeUlJ7JDG+uIYR +qYeUXB3CHwrsYUTqISXGpNu39MMlIvWQEuXqM7NiZ0pE6iElcdtfOMmWS0Tq +ISWN51J2xIRKROohJWudErdqD0hE6iElxzYOHu+fLhGph5T8/6hd5l1eIlIP +KVmvMAyc8FwiUg8p+etmd1S0RiJSDxlZOa9EUjqQFamHjERr8/94ayorUg8Z +mUjuib4erEg9ZOTbGzsnp65nReohIzmBnH3JblakHjKS5gDR3amsSD1kRBl6 +NmX8ZRY9ZMQh3ivMs5RFDxl5ptM5bWxm0UNGNs4YfCGK49BDRnbUXZh92JlD +DxkZ6hL1IuVDDj3kZKu5Of3kFxx6yEluqDzzRASHHnKS33S063gChx596+d0 +WfGZHHrIyY+l3o8jRQ495MT71bbYdZWcGG0LKCftr6pKSBeHHnJS/ltBkfMQ +KXrISdZHDrv0LlL0kJM/H/qZHyyUijaOEjkZ/0n/wBP+UvSQk0fvTs7fEC1F +Dznxcto7YlKaFD0UxO7J8YTGS1LRFs5ZQby2X3BOL5Gih4JUJOc3rmqSooeC +RGxJ6lSwMvRQkLgBmd5XR8lE2/a2KEjayhnD/GbL0ENB2qfNXWjxlqFH3/vH +4o0/h8nQQ0Hupp34eM5BGXooyIDDhSMepstE+v1WEJnKMfMrXoYeClKwY3Oz +6pkMPezIy3EhndvVMvEfZSzRjw== + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxdl3tMXEUUh3fZha0YYzXwR7ViiGmlRdOkNHatl96baEKjTZCWVmMxEoL0 +Hx+QQEIQmhWhNvjoEo0RWl4BmxopqZHQ0o5lWV5FHspDFkXr9qGkPJdXAcHi +3nt+M5PcSRbyceaenTPfnLltdNr7h962WSyWP4Mfa/ATEvyUl+njrmrBmEq6 +HFU8KXl/uK82M35CvRBx4mi6rYK5vUsxKacn1CfyMz4a3e5kt/IiGhJuTqh/ +OftuTz9dyPbE6WNS9U9lFe4teY+dnDQSqs/FPpI2aF24OhrMFu6bVIvLjr1p +T93GdqScDmacUr0Fldf8VbvZB3q6vCnx/X29+pD8ZLGecFpwVry+wGn118c7 +36hKPMva9OV5efwii9TTRcyI+ccz9CG5OUpPOKPGzhWerHisjj2olxs+qzpq +dtU2vFjEjOWlzIr5RrqGWfVMSHjL2cEqRn8NiDjVw7laOaRXnwQ+/znq43E3 +q9O3ozagOjsTOybzqhnVG1B9Q2XR8wn17J5ezlLAVP+cWp0b2mTZcpwd0JeT +MGfaD2L/3jZGfnm8AftDfG7qG4V8y+dpv+ZN/jlfVGj/BOM8zKv2o91zPz5U +xIxyLyMeaMf5mBf7YaQLX1Atrra09o/rFTovCxQfLVRovxfUkIL23dYzjcwo +txhxVzuj/V8Q6zPS+STTWDT54DzIyAfnfvhYFPWQj0XT+ZNMPhZNPpYEk48l +kY98cL4OH3I++eC8yMgH5xvMWF7EPZMPzqPM0JHB+SZ8yPnkQzL5kEw+lsF+ +9O+yiJMPsCuAfubxYfjgPMKov5dNPlZEfvLB2Y3+4NwKHytq1tbxF05VXoWP +FbGf5INzD/qD8xGFfKyafIA1D3ysqvWBR0v3JH8NH6smH+CYMfiQceqPf00+ +wJ5L8CHj5AP82m30B/gP3h98Pu+PNfE8+eBcj/toTcwnH+AmP3yAY3zwAS6/ +i/tqndjfBB/gXxrQH2D7NfhYF+shH+DeH+BDxskHONXDyMd/Jh/g6BH4ACcO +wQf4wjDuK/58NXwIVsjHfeLkbkY+wAebGd1X900+wMMtjO5/cFEXfMj59D7Y +IM4eRn9siPWQjw0xn+4ryeRjQx3xH3j1RFwuo/sKcdf38GHRjJ+be9HvFq3O +0dvny/HCD+LXf0Z94OAgX+CX/sH5k3HyJ5nqB3u70V9g+3c4n3I++eVcrdD+ +gP/uQv/x+BVG59dqsOfDO/BvFflo/8D+Bry/iF3PjGA/rdr5nRvzR0bO4XxY +teSczRXvJpXj/uH5qnFeZH7ab/C+JmaU65Xzaf/xfcHzRecJ8UAHfISIeskH +Z/4+kUw+wFv60T9glws+5HzyIZl8SCYfksmHZPIhmXyAnRUK+eBxN3zYqN6d +g/BhE8+TD8nkQzL5sIl85EMw7h/OLoV8yOfJB74/dQA+ZJx82LQHXn72eftT +nfCBeKQHPuxiPvmQTD7Ar3+J/pBx8gF2/gQfMk4+wOtevD/tWmTpJzfujNc0 +kw/E01vQH/x5t0I+wLd6cH+A43h/2LX9n04OrcXXwkcoxSOuwEeoVvnwxNKm +fIb7BXH2LfqDWPtiDP1B7NrXDR+hoh7ywTkTPji78X7gnAsfodox/T8DllSF +fCBe0gUf4Mg2+Agz2JM7hvsqDPm+UsgH51SFfIBjB9Af4JAW+AD7C1i+kRBs +bYUPni9bIR+cS+AjTMufKW9/x9fDDB29Ydp6duOOxu2/wQeffwo+OLvgw8H3 +ixnpohza1IY+auCDx3l/OMTz5IPY9VYbM5aX6dA+Gyn9vT9mAPcVn8//veHQ +Dm/rOHgppwc+KO6PbIUPh8bidsWPO/n7W34/+eDsVuj3Ji19PGJr3yse9j9P +EoR/ + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.0055000000000000005`], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxdln1MlVUcxy9vXrzMZQtqzYWVbkkvzokbWMeep1XDVVaga7TRVi2QPwip +bDow9tDE2DS4RiQyyBtcs1qhmE5wFwJuZigyIAbGS2Jok/fLywUuiLf7PL/v +OWd7znZ3+fA7z++8fM7vPPex9/ckpYZYLJaBwCco8AkOfMqO621Ysa1flXz6 +/pfYWGJtdP7osKJ9mrch6eFM9rytpypr24gSZ18X4x1KYPZm74aUohHFgvZv +dmR1wk3OTrYlVm+jIn5o1Ego+Hogm61HckxKUSDjmOAcPV32mLJlbDp8TXEM +u9aqtzEl6/OSyr3+1Wxtvp5wXDnywJPfuN88wD7apk9wXDzv1qfXPK6E/5Sz ++dxwLovS00VOKF9Er29rftvCdqfpbUJZuXdo+tflPFYXrSecwPMFLEJfrm0S +bGfG9FImFftbBRHMkc+MdNU8Xsvo26MUqzUjsbufY7QejxHX0h0sSV99ose0 +Po+yuj8qK3exjDn17ajyKPed/STz45U/bKX18v4ONqcvx+tRZjt3+qK6qrD+ +KZFvuz6dhCnlmbWF9XPxedgPGSe/U6b9AWvV8D2l+JPfqRio/AX7Na3HHz0V +ex7+p6m/Wof9o/hIRbWLzsO0yG8st3badD501jIKQy4xI51tBvEzOC+Sab9n +xPPGcvMl0/5zbmNGuh6wNggfs4i3w8eseJ58zJp8SCYfkskH57/gg/Mf8OEV +54F8eMV6yIfX5AOseRj5kHHy4RX+jelFzoH/gY850d/QkSaZfHDuZ+RjTuwH ++eDcCR/z4nnyMS/WQz5knOp53uRDMtX3vOJ87fgLVQPt8LFgqvcFZUaJmJyM +u4T6WBDrJR8LJh/gxm7cBzJOPsBqJ3z4EP8aPnyiP/nwmXyA3+2ADx4/4yIf +4Du9qI9F4u234GPR5AO8vwv3pYyTD8nkA1zeCx9LxO09qI8lfh+5yAf4gzZG +PpbEfMkHZ4eLfCyJ8ajdBWehPu6KOPmQTD7A2a24r2ScfIAL3agPGScfy8Qv +9sLHssnHsvBPPmScfIB3teC+Ai82wsc90Z98SKb7CrzRDR8yTvf/PTE++QCn +duN94DfVB1j7E/UBdl5jdF+BC5rwvvArdr/eTuC+8pt8WFT+B9W7RR02+p+G +Hx534LyBu/9D/Yi4i84feNMV1BPY1on1y/7kU45P5xP8xG3UG3Hj4G3sj+xP +vuX86PwGge0u8k+snbyB88zjDhedhyCRj/YzSB1MLz346q2zdXQ+gtTDmcWO +1nlnHZ139Hc4cV7A3zZgv2U+Y7nN4JR67L+M03mSTC2Y+MGLuH/BmyrgA9w0 +AB/B4nnyIZl8gH/shQ/wU83wAfZ1oL7A5ZW4v8EftsMHOPMCfPDx+O8FYu1Y +O3yEIJ6F+xGc7IYP8LkG1Cf4RivON5i14n0Gji/H/QPe3Agf4KOX4YOPz32A +ezrhI0R9yPiHHfUt+1MLJc79DT7AFfz9Dg48Tz7AP9egPkJFPvIB3tgFHzyu +wUeomtz3dN/NU03wweMO+ACXcB9yfPLBORk+QtWXy7u+rL/8/VbyESb6k48w +sX7yweOl8MFZw/3P2Qkf4IYL8AHe44YP8Ot98AE+dJ6RjzB19mqF7/BQCXyI +8eCD81cu+l4BLoAPcNoV+ABnnIQP3n8/fHA+iPsK3LiPHTAS8ng6fl8Sa6u6 +4QPxwH1OPnh/u8vQ0SrnRz6IGzOuwscKNScvMnhHfAfqw6rmf/ZKWf+zvcxI +F21Vi2qOHb3z+3fwYaXx9/0NH1Z13a5YdvG9GtSHFeMFKszwwVmDD6vKih5p +SNzZAh88Xor3NWc7fEim97dVPfJ4akuptx8+rGpc7hu9a3Zcx++rcHE+/geg +z1Mc + "]]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.0055000000000000005`], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJw11XlYlFUXAPB3dkTEVMjMUHMhlQ/L7dP01XNIEc0U0dLwAWMVEQJcMENU +QgERMReWEM0QKMBEMiUqPhTUFgVFREEBkx3ZZ2MGGIZvZu7pPs/7x507c+ae +8zv3vm97BW/0FXEcV2d4BIZHaHjOpRjHK/CoX/nztglJfKdLwaSojldgM2dJ +/dlV3/HLzavSQ5a1g4N2wZWVK8/zp0rUM92+bodjV1JPDKSf5BvCrHKd6tvh +q8B1fy6+Ws0vmG8cHfCfT3ynSA5k8NEdpoDgcXlR765/PuKrDdHMqzrAPcTF +RX/pK36W29eGiJ1QoXF6srr/FH/AGC6sE8K3fB6KHbF8WalxdEJsynLv7gl7 ++clRxoBdMGX/X8olSdH8rmXGDXZBYVfyek14NX/buL2SLrh+59Ax7eUc3toY +zqob7C66+p1eG8f7bTeOboh7aNNreyGP/3WSMWA37JIL33NNqeZHGtM174Hi +m6Febvm5vGl7bj1QrlDUD29J5E3hcnvAUjD69sLmGp4zjV4oWjrhjR2Pz1A+ +vWD6OOQJv9GYvQvNuSzK7995Op9hLEd6L/jeuPTN4fpaypfWsYzvM6aj/nde +TvnL2TzoCr/auB0nmnMlVA85zErKiF9woY5nvnJw+2/9wXGP/0f1+ff7eeRN +84ifqF4KGOUY3RKUepf8Fcb1kHO7Sqh+CohJj+qSBvxM/aBgv9/xlDelW6CA +NQGhzyriH1F/0LpFNW8KZ65kc7t71C9KGL98izrOtoLqrYQd26qzSqv/5k3p +Rimht2iFznntz8Dqr4QTw64JNhVFYApXpYRUx1YbUc5tyksFc7V+Pgsd/gTm +oQLnM5G1v+29B8xDBWVT5kYU+5YB81BBw0fyD2LGlQPzUIGPXfP6970eAfNQ +gee1twrVlyqAeahg/+bwMYnVj4F5qMEn4oe6eZInwDzU8Cjw/piA2U+Beahh +w1a/1sNrqoB5qKFV27xjt3c1MA81jMlMU4z98hkwDzV0ZuRmW8Q9B9P2rPqg +5PyPOV0pNcA8+sBu0zGx/fe1YOLY3gcuDjDn3bw6YB59kPvZ5J1rCl4A8+iD +B0vdve8U/QPMow+eHNxu0+P5EpiHBtY5N4xraXwJzEMDjgP3G91964F5aKBh +YfD4nS31wM6zBq5cdPGd6NdAHhq45Ca2jGhtAHa+NVA59I5dhl8jeWgNdcxS +nG5tJA8tLGmJ6nXxayIPLZTf7F7c0dJEHlpYfeGtBO/tzeShhZhtwxk3m5vJ +QwuR8m9GinxbyEMLkpHXj7zX1EIe/eB/9BD3oXcrefTDve177m5oaCWPfohO +aA939Gwjj34IuH3mo5kv28ijH2omjmrTbntFHv0wO6wqLb/uFbDzMQDJO3LC +PNzayWMA2pv831U/byePAag+dttxj2sHeQxA9JbT458Z7j3mMQBB4tfrpm/u +JI8BsH0wI//jyk7yGIQ3bq27tn1jF3kMQsom8+pPy7vIYxAGCmzsZq3vJo9B +eJhgfe3J/W7yGISX8aMPuK3pIY9B2JJ+/+Lvf/SQhw6iAuMztG/3kocO1tvX +Vh/06CUPHXy+dV1C57e95KGDq2/7jlhZ10seOliV47PvyEQ5eeggVVU6I8dV +Th46KJiWH/RLspw8hmD3Hu5GzhM5eQxBcYm3/5FxCvIYAk/ea4SDi4I8huC3 +tVMnN55UkMcQBF6d7+BfqiCPIXg6dcXYxyOU5KGH/Js3cYqTkjz0UNC2N3rD +USWw+0oPbssmZnkXK8lDDx88bNjrqlcCu//1oI/T3p27VEUeevjhpNmhzi9U +wN4Hw/BVRdGx2Osq8hgG6XGn52ZyFXkMQ5p9edBOezWw+2oYvptl/mGuv5o8 +hmFax9V9lZlquq+GQf3KQlpXryYPDufYx47+y6aPzjuHHlcW5yW69pEPh7Uv +g8xXJfZRfhxmf7/Z8Vl5H3lx6Jx/8oSzhYb6j0NF1r3R2U4a8uPQImO/sCVS +Q/lzqLwUkCot0pAnh7abjluN7NdQf3J4OTgyRzlfS74cTo2MOH8rSEv14fCz +9g673dla8uZQPuKd82ZNWupfAboHb5p31HAOmb8A71ZNWNj8aT/VT4Dn/wnt +tDvbT/0gwCOLotI+LeunegrQasHWbwNkA9QfAjQ7+cje12GA+l2A02YFpDoe +GKB+EWDOrzPmj7oxQPUW4JjJ7g6F3QNgSrdEgGvXXx67aeYg1V+Azpn3lY88 +B6mfBOh1JGLu+6mD5CHEc6IDb8RWDpKHEN8sWKkuHqUjDyHOcLSzalqlIw8h +HiqyL+45rCMPIRZmdzg1F+jIQ4gesYnKO3IdeQhxX9ULy69nD5GHELnN8sYV +3kPkIcSMbz0LG1OHyEOIZjXT64Mqh8hDiDanY841W+jJQ4gNwTPeW+2oJw8h +8uYNbUkH9eQhwhNBDeYVN/TkIcILx2Nq+rv05CHCeev8L1raDpOHCFfs23ju +tW3D5CHC4BHLRnNJw+Qhwq2fOGNd2TB5iHBHSeCiSiGHzEOEQVXZXXmTOGQe +hv+3z204uoRD5iHCpwU1Czds5pB5iDD5D1vpuN0cMg8R+j223l0WzyHzEGPC +8eLkw9kcMg8xju2oTJh1l0PmIcamk/HR919yyDzEmDemMNZXxyHzEKPu7J3f +NOMFyDzE2L7l4sJIQx8yDzHGhD6zljgLkHkY4qUn7ovYKUDmIUZ36/jdKkPf +MQ8xnvF5bbpnmgCZhxiLT5ll/lEoQOYhRi+Z1nJGtQCZhxgf/joYFq4UIPOQ +oOuyUkGZpRCZhwQPq4p+f322EJmHBGfin7dcHYXIPAzrv3wxM8lDiMxDgnm+ +IvPSA0JkHhI8ZQHhg0lCZB4SbNt5KXH6NSF5SNA8ek2gU5mQPCT4XK229mkT +kocEfea9lhUmEpGHBPc3ZC2KM/QJ85Dg63ZhzxLfF5GHFPfo29LOfSwiDynm +7pRmpgSLyEOKt1pP9Z05LiIPKV5PV2dHZ4rIQ4rflblU7L0lIg8pbnqxJ9K9 +RoThpoBSVL2oLcU+EXlI8e8fi29PGiMmDyleXmLxpcZOTB5SLHvgpr+3Sowm +jlIp2i4f6ZviKSYPKZZPm1nkFS4mDymutj705jvJYvKQoeXjM8dbfhKjKdwk +Ga4OzZqUZnBlHjKsTShq2dwqJg8ZhoScVciEEvKQ4bFRmS7X35KgaXshMkz9 +ZN44t0US8pChZg6/athFQh6G75+O7r8QKCEPGf6VnLJ0cYyEPGQ4Oq7kzQdp +EmTvbxmKOq0yPyuUkIcM8/cFtHU+lZCHGVZN9VeEyiX4f9csZBA= + "]]}}, { + {RGBColor[1., 0., 0.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.0055000000000000005`], AbsoluteThickness[1.6]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.0055000000000000005`], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, { + {RGBColor[1., 0., 0.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.0055000000000000005`], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.0055000000000000005`], AbsoluteThickness[1.6]}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.0055000000000000005`], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {{}, {{{}, {}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], + LineBox[{{0.6, -2.0657055697526004`*^-17}, { + 0.61, -2.52858646045418*^-17}, { + 0.619866901568, -2.5771301558739613`*^-16}}], + LineBox[{{0.6201915256019657, -2.5771301558739613`*^-16}, { + 0.63, -9.714700054446106*^-17}, {0.64, -1.0406974001331497`*^-16}, { + 0.643460068605471, -2.5771301558739613`*^-16}}], + LineBox[{{0.6560720580074626, -2.5771301558739613`*^-16}, { + 0.6599999999999999, -6.985436702831062*^-17}, { + 0.6637743105707853, -2.5771301558739613`*^-16}}], + LineBox[{{0.6760711799517256, -2.5771301558739613`*^-16}, { + 0.6799999999999999, -5.718731429636685*^-17}, { + 0.685182856522428, -2.5771301558739613`*^-16}}], + LineBox[{{0.699292538914211, -2.5771301558739613`*^-16}, { + 0.7, -2.435237928167865*^-16}, {0.71, -1.5353993478749245`*^-16}, { + 0.72, -1.9940545728809655`*^-17}, {0.73, -2.341903911037749*^-16}, { + 0.74, -1.704355779092405*^-17}, {0.75, -1.0596767344322826`*^-16}, { + 0.76, -2.783587828642101*^-17}, {0.77, -2.220446049250313*^-16}, { + 0.78, -1.3914257786933783`*^-16}, {0.79, -1.2538861780992416`*^-17}, { + 0.8, -7.88475537196756*^-17}}]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQbQwGj+0ZoKD1deAOuVYE//riAluu64/tWcr6k+pX +JNtoxvQf+qrxxD743P+AoJyEPdUi69wfVj2xX7ag6vzDvMQ9Z8+AwBP7OBZn +I1Oztj1yYAOf2nspc8/Q0knfAzJtccFT+yJh181h+9r3AA0DmvgUbh/YOJFn +9iKnNk+J2T5pTxoYPIPL7wAb+Mx+7grDlz2K2Xu4wA58bn9CmyM46LL6HrDz +Yp7bP+hfopTEG78HbNy653D9EPDCXrf56FXZ+742QWADX9jLHBQ+8/WV/p4l +YAe+sI87FqMce2nBnm8g5319Yb8x8MvWM6/L93iAjHN/aT+hbUtVAIv0nlkz +QeAl3HwA4GmPqQ== + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQbQwGj+2/XNppeiJOzab1deAOudbH9lo/V217dFTb +5vriAluu64/tWQQl73mVNNpoxvQf+qrxxJ4BCqpF1rk/rELwz54BAQRfDmzg +UzgfZNriAgQfaBjQxKf2ThxKSlYLHGzAxok8s884r3a02yp3TxoYPLN3qFoU +63sm2mYH2MBncP1cYAc+h/PBzotB8MHGrXtur9y8Qe9cnrINRPQFVH6aTRDY +wBdw9UvADnxh/6cy7r3DS3+bbyDnfUXIe4CMc39pf3o9856jB3NtZs0EgZf2 +XCq8EesFXWwAWLJ4UA== + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[1.6], + LineBox[{{0.6, 2.0050709060668603`*^-17}, {0.61, + 2.453307618526274*^-17}, {0.62, 8.326672684688674*^-17}, { + 0.6265821208167527, 2.4324338057016516`*^-16}}], + LineBox[{{0.6781166618040494, 2.4324338057016516`*^-16}, { + 0.6799999999999999, 5.5384732011079694`*^-17}, {0.6876905878320559, + 2.4324338057016516`*^-16}}], + LineBox[{{0.6919849185961461, 2.4324338057016516`*^-16}, {0.7, + 1.5451445457265022`*^-17}, {0.7061250969366043, + 2.4324338057016516`*^-16}}], + LineBox[{{0.7139291537045354, 2.4324338057016516`*^-16}, {0.72, + 2.0586336520523105`*^-17}, {0.73, 1.8879175779015923`*^-17}, {0.74, + 1.6516829780934654`*^-17}, {0.75, 1.0272899361145975`*^-16}, {0.76, + 2.870101234313389*^-17}, {0.77, 1.1326441175255768`*^-16}, { + 0.7748378486455871, 2.4324338057016516`*^-16}}], + LineBox[{{0.7846708041256747, 2.4324338057016516`*^-16}, {0.79, + 8.500145032286355*^-17}, {0.8, 7.667165951241988*^-17}}]}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGx/7s61/48ulO9pfR24Q671sb360vKX +guq1e64vLrDlug6Un3s97OzpTXs0Y/oPfdV4Yt9TzvZVj2HOnmqRde4Pq57Y +L2j4ce7vv7l7zp4BgSf2NiZW16r3H94jBzbwqb2Dx/L14UpT9oBMW1zw1J7b +p+U/Z/GRPUDDgCY+tS9bbXV5bfWEPWDjRJ7ZM4DBgT1pYPDMPm3R5RkWPRv3 +7AAbCJSPYl4/X2HZHi6wA5/bs0zJ5sz8W7YH7LyY5/aMF5tu8TzYsAds3Lrn +9smcqhfjlhXvgZj7wj7E6+FBju55e4LABr6wP3Lv2P6b3A17loAd+AJq/4Y9 +30DO+/rCXuP1n9oS3iV7PEDGub+0X8+tZ7H4Zc6eWTNB4KX9NC9WvTc7p+0B +AIbYqus= + "]]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGzPAAWtrwN3yLUi+NcXF9hyXX9sz1LW +n1S/ItlGM6b/0FeNJ/bB5/4HBOUk7KkWWef+sOqJ/bIFVecf5iXuOXsGBJ7Y +x7E4G5mate2RAxv41N5LmXuGlk76HpBpiwue2hcJu24O29e+B2gY0MSncPvA +xok8sxc5tXlKzPZJe9LA4BlcfgfYwGf2c1cYvuxRzN7DBXbgc/sT2hzBQZfV +94CdF/Pc/kH/EqUk3vg9YOPWPYfrh4AX9rrNR6/K3ve1CQIb+MJe5qDwma+v +9PcsATvwhX3csRjl2EsL9nwDOe/rC/uNgV+2nnldvscDZJz7S/sJbVuqAlik +98yaCQIv4eYDAOolj6s= + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGz/5dJO0xNxajatrwN3yLU+ttf6uWrb +o6PaNtcXF9hyXX9szyIoec+rpNFGM6b/0FeNJ/YMUFAtss79YRWCf/YMCCD4 +cmADn8L5INMWFyD4QMOAJj61d+JQUrJa4GADNk7kmX3GebWj3Va5e9LA4Jm9 +Q9WiWN8z0TY7wAY+g+vnAjvwOZwPdl4Mgg82bt1ze+XmDXrn8pRtIKIvoPLT +bILABr6Aq18CduAL+z+Vce8dXvrbfAM57ytC3gNknPtL+9PrmfccPZhrM2sm +CLy051LhjVgv6GIDAGJueFI= + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGyvzqe5741suU3r68Adcq2P7Q19D11+ +5FFjc31xgS3X9cf2DGAww0Yzpv/QV40n9kFzTvrnNW+3qRZZ5/6w6om9/FfL +JjPuHTZnz4DAE3svo/VT8idespEDG/jUXk97lcP3g1ttQKYtLnhqv8IvZmv5 +90s2QMOAJj61TzcLZol4228DNk7kmT27Zljz6ulbbdLA4Jn9wfaLpmUXCm12 +gA18Zq9sddou5uVuGy6wA5/b519lnsO8p9wG7LyY5/Ynja8ZqB0ptQEbt+65 +vX/r+vgXXMU2EH+8sLeUM77MP2euTRDYwBf2B3S/T2vtbrBZAnbgC/skn/ny +O4IW2HwDOe/rC/t1u2K5ylt323iAjHN/CQmPhhk2s2aCwEv7hIcum+Mkp9kA +AHCNm3I= + "]]}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}}, + AspectRatio->1, + Axes->{True, True}, + AxesLabel->{ + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], + FormBox[ + GraphicsBox[{ + Thickness[0.02888503755054881], + StyleBox[{ + FilledCurveBox[{{{1, 4, 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}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJlIGYC4hkzQYDHYbP5j0MpWhoOMP4ZEODRcvB94nnJ +VJjX4XmW9rfptloOb9pyu412Czgc37Wjly1Ay0G4clLJWRZhB3ObvUHTEhH8 +7Q5Nj45LaEP18zukpwEBm7bDVq8NFnN+8sD5zeK1rJlsHHA+Awg4MMP513lv +i6V+Y4C6R9vBxBgEvtjDzIfxYfZf+X3s+rzIv/Yw9xUuL9nwj58Z7n6NTyov +Z3Uyw/0H48P8D+PX3P9xy/i1FJy/I9gq4r+6ONw8kPPSjonB7Qt5e/njjIVi +cPfEqEbInKtB8BV2LdiXyifqkDM1odCi+L89WL+aKNw8iDpReHjA+LDwgvFb +FdhVz5gIOMD0w8IbZj6MD7MfFl8w98HiE+Z+WHzD/Afjw/yPnj4A/GLjpQ== + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJtIAaxQYAJSjNCxZiR+PjEcakhVT2p5gxm9ww2u4ix +FwCf5QKP + "], CompressedData[" +1:eJx11GtIU2EYB/B5ofCLirk51zF3dvY6tWWmUhRBT4RpNyobNqJlljfosg8V +3fYhNBOZ2ehCGiKbfVDBUAJ1CkklYtIWhdIHk4wQKkvQkjASbO85e55h4AuH +lx/Ic/nPc8RT9oLSCJVKFRZ4CgNPeOD5ceucM+tDPPyZ+f58q2QEFT9uDbnv +yDbrUo2WnNcx1KryaiGf3wsS+ZndMdNYaiDXWZ0Hw2J15HrZCZDNzz0tNPLT +p4Fq/Wrmm9eAZWZ0rsGjgRfOgcqcwXg4zqzCG0fI+n73QGm0Gn4NzHWXFyZC +jlxIDfL810P+lFu089E7HdnL5zcJ5Pirdy/6S5KgjJ8UNRyN0tRk79BTfTT2 +V+51NF9HnDm6/KNA8zfIt0D7oXF/dDnvpzGQZ1s69f5UCZb4mUwGdd3e6UiL +ES4N9uQ22kRyjO3QZFargSz3rZXAx48gLfd+kYz90ThfLK93WaL5sT7u94Tv +Vy/S/mjMp/33tyu+WYny/N8nLQUmd62RrH0wFlVhYCs6M719zdubJqqPxv7T +F7rVf8+k0HxPM84/DmtiNL/Sj9F+aNwfjfmjMf/7NdXHRgUT5fvQFXNtszOV +XGGfrR4ZSyObxeT5sz3plP8yB/JH4z7dWxZelqSbaV+h+UTa68yQe6Hy83BD +yE0tUt/il5VdYpvYHeHNoPpozEupt4HykvcdMVNeNyKH7mzqNVNeaMwLLb9H +cyK5i01VNR8I5mFZr8w1zILfhTRyp/x3qWQ53yYT6PjeLgZTxZ73ORtNwZtB +UuvX/IwiBm38/8glBX9fY7AuU+bwSFTPz3NeFMm7XFVxZbqQ5ffJrqd+zu17 ++svC9dRv2fvXJpFf9Xtvr+pi4JhcGM/eJ1A9K891IlFxHlO+R6cT4PD4Wkfx +TyPg91POxx8yfi//AfqtMwE= + "]], + 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:eJxTTMoPSmVmYGBgBGJ5IGYC4o16eYsZzxg7HOze12SymMkBxn9Z+zj7/BsE +X3qj2HwmBWaH9DQgmGbsULi8ZMO/8ywO3G6qpUxcRg7ClZNKzi4RcDDQWil8 +YYmhw38wkITznSc0C6WdUoDzdzg0PTouoepgWxmxwlTWyGHOIuWdf9I1HQ63 +LQ8/tcgYor9eB27/m+Ktor9PI/hbQfpvIPgvQPKvEfyU2DtuzBK6DhOCS1Sm +7zd2mDqBv8pMW9chRsHxY/IaBP8MCPQg+P0g9flGDltA5tRoO+yvlbVI32Lo +0MhytN8wXMPhIMh9QoYOpw47rc2cpwrR/8bAYa2QDl/6PSU4H+ZfGN99zdHl +DDtkIebzGzrMBIGd4g6R4tsvMuwzdAh+e/njDEUhh2iQ+2qMHPyfeF4yFeaA +uw8SP4xw98P4MP/B+DD/90d0+zN+QPBh8QsAPknafA== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdlHlIFFEcx9eSpLADbQ9zQ3Nbc3ZDy2Nndqboa4eGRYlGSVlguW23/WF0 +YEWXkRtptelWIl1ghqGBZUaZFZHlUWFUWHRRdEoYJYKV7XtvekM9eAyfmXnf +3/3GLM3LcA3U6XQB/j3fvwf4t+nIo8ErTonoJ6s4Ct9q01cfC3JyHpJi3TBg +ocbBc2u8rstOHCVrXxTGvt1V0ZYmY+OtSzOObo1Cndh7M/eYjNTq25W6TVG4 +vnW05H4kY3rJrpDlRRbkLn6eMrBZxsjNh/Lb6iwwVywRWh440UpWuYXphjlx +tufjptYSC6bsfHPHZ5c4W4m9K+K/LEs4vHfPwo5JAuY8PJj9e5qE5ltTz6+s +EJg/aRLe5px8nHhfwHKy5kssnn4BPxo6i369k5j9YBuLP9WJ9M7wgpwQG2K6 +hjZOqHKiHn5HTDZkRyZ3L/uisY/4WyVzfhLyLfl+tAJx0rWM0tcC+y4ocBG7 +hQIqP8yM7U9WMJMmZhy8JcO3ODwa04dXQQ0JrCsGwST/5xSYycEIG8tHiwI3 +0Rtk5+cTE/wr1I7izPyxZXGK6o8d2/vk9e29Mmf6/avGWcb6h7p2jeNsVaEP +dstcj8ZjUOsTbEcpsdcncfs7Am8XT0zVeBuxF6MxzWe9yJmkNd6lMa33XQe3 +t77a82wFHNwfqi86EDi4KGLZOhsuxK47HfDcwfKbY2N6VhG15H22DU+Jvyki +yoifdo29pD+uCpzLT1kafroFtX9ETCBxn4mBj57z69H8j8NZUq8xqn8dRsxu +Dpp8XO/A98bui+4eA/anfQpM7E7CvK6Obt9JA9NblYQtL3s7E2YZQMLwLUpC +5JUTja5hepafp0n4UrjWEx+u5/HRvozWo4nU/7tqL0GPXz0bXpVPFDn/JHzD +yfVoG7/UmM7jEJnzdqK/QOb26kiersrcXh7Jd6TC9WmdxysoIP5/NqCpsHLB +vXgF50PGD3O/MPL+pf/NDsP7VfaessUKmjyNOxNPh7P3axTVLzObv1Ea03n4 +qM5/4CjWvy2yqmdi/Vkjs75oMLJ5WyMj25plbi8wqv39938jwsn9ke7EgSzP +3IARRtYH1RLn/Iv6vpZYjWk9PotqPoxsvsNE5k+uxnsig6ytXo11ZMHE+s8s +IpPW28TulQhR1Q/D//fpH8/CUwk= + "]], + 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:eJxTTMoPSmVmYGBgBGJ5IGYC4uKtor9Pizk4OE9oFko7peAA479ftF7h7A4l +h5vSNYlGrA4ODSxH+w23qzrEKDh+TI6xd/j19vUBy2YNhwjx7RcZ5tk5PElc +eM2kX9vhaZb2t+m9tg5TJ/BXmWnrOoSD5PMQfNUnzfPORiH4Jw47rc30s3X4 +8630wRxBBP8FyCGvdeD8rQ5Nj47fQPDfgB2q47DF/MehlC5bhxkzgSBSx6HH +6xWLyUE7h/Q0IHim6eBzgt12dqm9g66i/Jecb6pwPsy/MH60aoTMORlJh/w1 +3bczGOwh+tMEHL5sCMieVW7rULi8ZMM/fxa4/dIbxeYzKTDD+S9rH2eff8ME +5x/s3tdkshjBV/+k8nIWJxPc/xB5Rnj4wPiw8IPxwepX2UHsS+CAuDfV3gHk +3ZmVQg4VEStMzzI7OJwBgTfi8Piruf/jlnG2rAN6/AIAT3XZag== + "]]}, { + Thickness[0.02888503755054881]}, StripOnInput -> False]}, { + ImageSize -> {51.92695890410959, 24.508064757160646`}, + ImageSize -> {34.61797260273973, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, + PlotRange -> {{0., 34.620000000000005`}, {0., 16.34}}, AspectRatio -> + Automatic}], TraditionalForm]}, + AxesOrigin->{0, 0}, + AxesStyle->Directive[ + Thickness[Large], 16], + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImageSize->Large, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->All, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{{3.804582219681877*^9, 3.804582232672345*^9}, { + 3.804582264883019*^9, 3.804582279725154*^9}, {3.804582319381925*^9, + 3.8045823637131233`*^9}, 3.8045826631495857`*^9, {3.804582845456711*^9, + 3.804582872785006*^9}, {3.80458356140613*^9, 3.804583667215358*^9}, + 3.804583758278961*^9}, + CellLabel->"Out[55]=",ExpressionUUID->"cb0f567a-0435-412b-8586-3e71be14dc1c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"Sort", "[", + RowBox[{"Im", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "1"}], "]"}], "]"}], "]"}], + "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], ",", + + RowBox[{"{", + RowBox[{"i", ",", "1", ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.6", ",", "0.8", ",", "0.01"}], "}"}]}], + "]"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"Graphics", "@", + RowBox[{"{", + RowBox[{"Disk", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"Scaled", "@", "0.001"}]}], "]"}], "}"}]}]}], ",", + RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804583723115193*^9, 3.804583737272275*^9}}, + CellLabel->"In[54]:=",ExpressionUUID->"d4c31428-ffb0-4bd2-981e-56ef0e5ea0ac"], + +Cell[BoxData[ + GraphicsBox[{{}, {{{}, {}, + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], + LineBox[{{0.6, -2.0657055697526004`*^-17}, { + 0.61, -2.52858646045418*^-17}, { + 0.619866901568, -2.5771301558739613`*^-16}}], + LineBox[{{0.6201915256019657, -2.5771301558739613`*^-16}, { + 0.63, -9.714700054446106*^-17}, {0.64, -1.0406974001331497`*^-16}, { + 0.643460068605471, -2.5771301558739613`*^-16}}], + LineBox[{{0.6560720580074626, -2.5771301558739613`*^-16}, { + 0.6599999999999999, -6.985436702831062*^-17}, { + 0.6637743105707853, -2.5771301558739613`*^-16}}], + LineBox[{{0.6760711799517256, -2.5771301558739613`*^-16}, { + 0.6799999999999999, -5.718731429636685*^-17}, { + 0.685182856522428, -2.5771301558739613`*^-16}}], + LineBox[{{0.699292538914211, -2.5771301558739613`*^-16}, { + 0.7, -2.435237928167865*^-16}, {0.71, -1.5353993478749245`*^-16}, { + 0.72, -1.9940545728809655`*^-17}, {0.73, -2.341903911037749*^-16}, { + 0.74, -1.704355779092405*^-17}, {0.75, -1.0596767344322826`*^-16}, { + 0.76, -2.783587828642101*^-17}, {0.77, -2.220446049250313*^-16}, { + 0.78, -1.3914257786933783`*^-16}, {0.79, -1.2538861780992416`*^-17}, { + 0.8, -7.88475537196756*^-17}}]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQbQwGj+0ZoKD1deAOuVYE//riAluu64/tWcr6k+pX +JNtoxvQf+qrxxD743P+AoJyEPdUi69wfVj2xX7ag6vzDvMQ9Z8+AwBP7OBZn +I1Oztj1yYAOf2nspc8/Q0knfAzJtccFT+yJh181h+9r3AA0DmvgUbh/YOJFn +9iKnNk+J2T5pTxoYPIPL7wAb+Mx+7grDlz2K2Xu4wA58bn9CmyM46LL6HrDz +Yp7bP+hfopTEG78HbNy653D9EPDCXrf56FXZ+742QWADX9jLHBQ+8/WV/p4l +YAe+sI87FqMce2nBnm8g5319Yb8x8MvWM6/L93iAjHN/aT+hbUtVAIv0nlkz +QeAl3HwA4GmPqQ== + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQbQwGj+2/XNppeiJOzab1deAOudbH9lo/V217dFTb +5vriAluu64/tWQQl73mVNNpoxvQf+qrxxJ4BCqpF1rk/rELwz54BAQRfDmzg +UzgfZNriAgQfaBjQxKf2ThxKSlYLHGzAxok8s884r3a02yp3TxoYPLN3qFoU +63sm2mYH2MBncP1cYAc+h/PBzotB8MHGrXtur9y8Qe9cnrINRPQFVH6aTRDY +wBdw9UvADnxh/6cy7r3DS3+bbyDnfUXIe4CMc39pf3o9856jB3NtZs0EgZf2 +XCq8EesFXWwAWLJ4UA== + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[1.6], + LineBox[{{0.6, 2.0050709060668603`*^-17}, {0.61, + 2.453307618526274*^-17}, {0.62, 8.326672684688674*^-17}, { + 0.6265821208167527, 2.4324338057016516`*^-16}}], + LineBox[{{0.6781166618040494, 2.4324338057016516`*^-16}, { + 0.6799999999999999, 5.5384732011079694`*^-17}, {0.6876905878320559, + 2.4324338057016516`*^-16}}], + LineBox[{{0.6919849185961461, 2.4324338057016516`*^-16}, {0.7, + 1.5451445457265022`*^-17}, {0.7061250969366043, + 2.4324338057016516`*^-16}}], + LineBox[{{0.7139291537045354, 2.4324338057016516`*^-16}, {0.72, + 2.0586336520523105`*^-17}, {0.73, 1.8879175779015923`*^-17}, {0.74, + 1.6516829780934654`*^-17}, {0.75, 1.0272899361145975`*^-16}, {0.76, + 2.870101234313389*^-17}, {0.77, 1.1326441175255768`*^-16}, { + 0.7748378486455871, 2.4324338057016516`*^-16}}], + LineBox[{{0.7846708041256747, 2.4324338057016516`*^-16}, {0.79, + 8.500145032286355*^-17}, {0.8, 7.667165951241988*^-17}}]}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGx/7s61/48ulO9pfR24Q671sb360vKX +guq1e64vLrDlug6Un3s97OzpTXs0Y/oPfdV4Yt9TzvZVj2HOnmqRde4Pq57Y +L2j4ce7vv7l7zp4BgSf2NiZW16r3H94jBzbwqb2Dx/L14UpT9oBMW1zw1J7b +p+U/Z/GRPUDDgCY+tS9bbXV5bfWEPWDjRJ7ZM4DBgT1pYPDMPm3R5RkWPRv3 +7AAbCJSPYl4/X2HZHi6wA5/bs0zJ5sz8W7YH7LyY5/aMF5tu8TzYsAds3Lrn +9smcqhfjlhXvgZj7wj7E6+FBju55e4LABr6wP3Lv2P6b3A17loAd+AJq/4Y9 +30DO+/rCXuP1n9oS3iV7PEDGub+0X8+tZ7H4Zc6eWTNB4KX9NC9WvTc7p+0B +AIbYqus= + "]]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGzPAAWtrwN3yLUi+NcXF9hyXX9sz1LW +n1S/ItlGM6b/0FeNJ/bB5/4HBOUk7KkWWef+sOqJ/bIFVecf5iXuOXsGBJ7Y +x7E4G5mate2RAxv41N5LmXuGlk76HpBpiwue2hcJu24O29e+B2gY0MSncPvA +xok8sxc5tXlKzPZJe9LA4BlcfgfYwGf2c1cYvuxRzN7DBXbgc/sT2hzBQZfV +94CdF/Pc/kH/EqUk3vg9YOPWPYfrh4AX9rrNR6/K3ve1CQIb+MJe5qDwma+v +9PcsATvwhX3csRjl2EsL9nwDOe/rC/uNgV+2nnldvscDZJz7S/sJbVuqAlik +98yaCQIv4eYDAOolj6s= + "]]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGz/5dJO0xNxajatrwN3yLU+ttf6uWrb +o6PaNtcXF9hyXX9szyIoec+rpNFGM6b/0FeNJ/YMUFAtss79YRWCf/YMCCD4 +cmADn8L5INMWFyD4QMOAJj61d+JQUrJa4GADNk7kmX3GebWj3Va5e9LA4Jm9 +Q9WiWN8z0TY7wAY+g+vnAjvwOZwPdl4Mgg82bt1ze+XmDXrn8pRtIKIvoPLT +bILABr6Aq18CduAL+z+Vce8dXvrbfAM57ytC3gNknPtL+9PrmfccPZhrM2sm +CLy051LhjVgv6GIDAGJueFI= + "]]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[1.6], + GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[DiskBox[{0, 0}, Scaled[0.001]]], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}], + TraditionalForm], {0., 0.}], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGYCYmMweGyvzqe5741suU3r68Adcq2P7Q19D11+ +5FFjc31xgS3X9cf2DGAww0Yzpv/QV40n9kFzTvrnNW+3qRZZ5/6w6om9/FfL +JjPuHTZnz4DAE3svo/VT8idespEDG/jUXk97lcP3g1ttQKYtLnhqv8IvZmv5 +90s2QMOAJj61TzcLZol4228DNk7kmT27Zljz6ulbbdLA4Jn9wfaLpmUXCm12 +gA18Zq9sddou5uVuGy6wA5/b519lnsO8p9wG7LyY5/Ynja8ZqB0ptQEbt+65 +vX/r+vgXXMU2EH+8sLeUM77MP2euTRDYwBf2B3S/T2vtbrBZAnbgC/skn/ny +O4IW2HwDOe/rC/t1u2K5ylt323iAjHN/CQmPhhk2s2aCwEv7hIcum+Mkp9kA +AHCNm3I= + "]]}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, { + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6]}, + {RGBColor[1., 0., 0.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0., 0., 1.], PointSize[0.011000000000000001`], + AbsoluteThickness[1.6]}, + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], PointSize[ + 0.011000000000000001`], AbsoluteThickness[ + 1.6]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0.5958333333333335, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{0.5958333333333335, 0.8}, {-2.5771301558739613`*^-16, + 2.4324338057016516`*^-16}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{{3.804583732923655*^9, 3.8045837375751047`*^9}}, + CellLabel->"Out[54]=",ExpressionUUID->"f8e01c31-b094-4485-baca-56687bdb1b84"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"Im", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801799517130879*^9, 3.801799518547235*^9}, + 3.8018008092478447`*^9}, + CellLabel-> + "In[103]:=",ExpressionUUID->"cd81a8fd-8f90-40d4-8f31-2c745a5956fc"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxF1H0sFHAYB/C749yI+6PrbJ3t4m6nHU0v83JzqmOKGROHWJduHGF3u2bi +MJpGXKGboTottbwTSVmqQ0hn0nlbJg2XmPMSc9ed3XGqjef3bN999/nz+8/j +FCcOT8BhMJjQf/nf8W2yjb09Qi9m/46YKM7sHeSBi7W89G1k59muobVN5BXb +hefTauQbKR7RHf3IuYzvvYmFyPIqetkIEbl6rkgcZm0Fth/lhjLJeLDyEtd/ +mGEJDmQy0ug0C7B3K69OdRIHNt5NJJ1hYsF/DDUVsccxaA+tzL1bZO45MBt/ +q8NVsAMu53h5+eYYwfGPoxdXqrfBqnqqNVauB1NtX57u6dSBbRyXVJqmLbAw +ouBhQ8MmmN8/N0wtWwfTzprDPuVpwI1JHer3nYvgFG07755cDXbLxcdY0WfA +pMzJQ5VVE+BsSay4izIGnhIIXdoWBsEZWS6lQxWt4Kb7LE7NqRfnD1yanPeN +f/sz2E4XzG4JmwDPpw26p+fPgH93hfRlKNXgusJnfIF0EczQN5MkVRrw7Ktj +CnbSOjjywXzRqmwT/KS2WBFcuQUWssbjzMlasOUV0To+Uwf+ym+sD8/Xg9/Y +Ua4ahNtgZ7nTMiHYCDam5+82c3fAq0YHYgPLDH56vXDSgY7hHFjm+6X4KAML +Joqb/frJOHC3/1tFJ8UCvCu65hlFtARjCeOPXHeRPQNT+4IwVmDjj5Zl8hay +v1ApC9Ejl5gWWAVGZEeKg1SHI4ADLkuZEyTk8rGEFJkHstsgdc0mE1kS6V3u +l4P88VekT1YecoRFSbFGipzNMZ1QypGV76ZEBR+QDwdpyYpeZN40sVs3gLxh +uEAUjCDbe7xu9ZtF5g+oorJ+IjdyV83tS8g+qbRQpw3kO9hzhmgt8qgsplpm +QKY43gxQmpD3/xv4L1AeM6o= + "]]}, + Annotation[#, "Charting`Private`Tag$194695#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGCQA2IQnbx+wvv//9kPMECByG8pNes/CP4Rt6UxZT8QfLV7 +O0+++YDgv+J5vPjmQwS/IMs0YvNhBL9O9daBtHYEf9Zs5Uln+RD8+fc78gM5 +2eB8sQvB/pqirHD+iYBgl9OqLHC+h6ZqibISM5xvtS5m2Xl9Jjj/V1easJEm +I5z/9fuSqXHqDAj/KE0y2Zf7bz+Mb81av1k75Q+cP8XB3Nyx9hecnzwn4umr ++T/g/PPL5TgZZ32D8+V4Nhju3/YFzudSeHb+5apPcH5OSOuMFSs+wPkJh++f +lpv0Fs5Xsv0XeLTxJZy/MmPzw93bnsL5WZ83xnTPegjn69WxRrIp34bzhSuv +cE+bfRnO3xIS6SBkdRHOBwAUtX2C + "]], + LineBox[{{-0.2653428599143075, 0.}, {-0.059736536602248806`, 0.}, { + 0.05701173099467323, 0.}, {0.183666329134962, 0.}, { + 0.30185991087984193`, 0.}, {0.42995982316808856`, 0.}, { + 0.5557211680405183, 0.}, {0.6730214965175392, 0.}, { + 0.8002281555379268, 0.}, {0.9189737981629056, 0.}, { + 1.0353808733720673`, 0.}, {1.1616942791245957`, 0.}, { + 1.2114641017328032`, 0.}}], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGBQAWIQzftKYPqVws/2DFBwLmHl8qCWb3D+Vl6p2O85P+B8 +tVmKL9h9fsH5v8pa/q4O/gPnv/4lzbfC4h+cvyC9/Yq0MoMDjD/B8UyPpCoj +nM+Xv9rpsCgTnL/PZcfebVLMcP7f3HizMD4WOJ+R/dJM7b8IvplH0SEvBjY4 +/9edNS9EPyH4LjknJvh+Q/B7fz+2aP2F4CtISXd+YWKH893DOzUvCyP4Uy6m +Zk0wRfD1jsm94apE8CtCraY41SL4B5+E2lQ1IvghzL09LzsR/GqH3zonZiH4 +J3Zdz23dg+ALeX0W3XsAwY+5ybfvyxEE//13V76Uswi+mOmWdU73EPyEI+fD +qh4h+CuDX//b+AzBtylS8ld8j+C3Mdp9j/iM4F+YEDl/wncEX0qh1P3EbwQ/ +ef2E9///I/gAPnN/Eg== + "]]}, + Annotation[#, "Charting`Private`Tag$194695#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwVjH041AcAx++pkwqb98lVLNFNCPMoOSGER8O8PWOal8zbY7ipxfWwWaqH +UFPpzNZjmOnUvNWJ9fR95nbcyLifO3eOO/djTu4e8tYVVpv98Xk+f3ye5/N+ +ck7E59soFIrnFv/7Q7Z/1/rVNcC+lt8ke4vd1qrhec4KTJJ16Kcj/0FW1GV2 +c/MSrs/zkw9cW0cib2pwf9UCNIG6iy9ILQ54vf2YXzwPh51mPJ/ZVdxL7yR/ +486iN+Pk34JXS8hcbY+/9j0JjxOu/WvmGtS4L3umlZFYpHn/WrahhqDAmebH +IpHG0KszUqhhS2kd34glwa6XqpYb1VDq34/J3EPi8UvjBq2LGtF2TeHBbCXW +qbWN00HzKO5wK33HYQqlRdLc2+lzUBzrDOzTmwKfw8iZDJ4DAy47ijQKWIh3 +hegfnoN20OnSAkeBpYBeuu2CClmz9MJnHyjQ2lcgd85V4ROLfcyyQ3I0LAuG +IpizcCrSid1hM4GHSwkah/gZWPaM3HlOnYC41cP7lecMdLS1YwMqGTYt92p/ +pM1g8gvXqOscGS6x1e2FsmmUnUkIs3CVISRt1ZwZM405RneAve846hvpLamn +SBD5JSX6NuOISWc9uGlD4unDMN4idauf7k+rpJCodlD5dAqkoJTFmT/vVsJ/ +rwmDES5FXSvFQNdeibrNLNfQBAnWKzp2O76Ro/zoMaazrwQ5XG+ltFWOC3nb +24xtJKi8YaijTpIjVFPjKFGNIdTP/xb9j0m8kfXRE7PH0KCXGVH0zQTieqyt +viwUg5p0KKmFkOKUVnMmKkEMDzOuZUe+FC6uXT+4+4rhThjwGvdJsZPzkeUm +VYzjZ4uSaCkScGtYZiXlIliyauQdpBj14oCo1GwRbI9kP/5261thZHQzKFwE +9uyJ5Z73xEgp/cXQwFSEPOtpT2qgCCYFIr3q2lFI/Ttt+RUEXv+7bvSCNYq1 ++nCX/ncJKK5YWQTFjSIlurz3p0ohmm9lHtywGEWw18gdbvEIKmk37CNfE6ga +Uf18UT2MvPpHzvclBG7frYo5K/gLJ9ooXp9VE5Bk6qgjU57h4FE7v67zBHgZ +3KEKq0HsehoSbBhNgGpo1zI++CcW/ZlhGW4EBrc37RekCiAarI7uNdn6ZVzU +d1roQ3fEk09pq0IoWWOcgTg+7o6TSecIIfZ4DDg+uMdDSaJu+lC7EPnzzBlz +4e/ImHPItvtOiPaV84cTrgCh2RHnvs4VQvHVWLzpcA/cXl5gScOECL1qHLJi ++gjbvGN9jI8LkWgquPzkSBv+A66jEUE= + "]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwA2IQ/Wlj8ryE3xf2M0DBk84XPY/fIvgnBfgm25xF8KfI +Rc5/143gVy2tW+qejeDH6yxZvcALwdeyer89iBPBr1vNtTCX9zyc77kzdK38 +mXNwvsjxBTsvdiH4Kx+ZXTLlQPCvSCYz/2M6izC/Y3dq349TcP71lByt9Y+P +wfn77gaYb1uG4C8LM3XZm4ngl3j8iz39/iicL6AzYeLz30cQ7vu8+Ye8yGE4 +v5T5e69i5z44v7xKq+/k1HVw/qp+C4clBmvtYfy+zMZrCU3H4XzeLz7WawIv +w/kPSo6ZlLXchvPf7fQ9VH7iIZy/rH1hQkrnUzhf9dtq4YrZL+H8e5vk91pn +vIXzQ6c/6Hg94QPCfvfNvIwzEfwT31sniS1E8K0itOc4bkTw5STL1k+/iOC/ +mMV9zVnoI5xfNc9Mec5kBH+zH+eKjbMR/Df/buscX4zgx8U3mn3ajOA7K5zx +9LiC4PMsSiz4IvIJzp+3tGevzzQEv0TDZ9H1uQi+52ru9qSlCP6XDV0BFVsQ +fO89HY8XX0Lwf1xq4fzN9xnOPxfq8q5VDMFffIP5soAcgu93r2mOmi6Cv+Rl +g36QN4JfleMgcjcIwfd///9HehSCf7Jtsp5GEoIPAPva7XE= + "]], + LineBox[CompressedData[" +1:eJwBIQLe/SFib1JlAgAAACEAAAACAAAADeoQl9Rx8z9X+/VGHamkv3x9vXAe +gPM/mNXTkVVosb9RAH1VqYfzP2U7gWkoMLS/JoM8OjSP8z+1A1W4v6S2v/wF +/B6/lvM/OjkX0tLeuL+oC3vo1KXzP5yj5HV82Ly/fo46zV+t8z89KXG+/6e+ +v1MR+rHqtPM/M4JI8xcwwL/+Fnl7AMTzP3mWOyn+y8G/1Jk4YIvL8z/ho3Qi +Q47Cv6kc+EQW0/M/VZqFUf1Jw79UIncOLOLzP8sSW4OYsMS/qi11oVcA9D9i +NIeiaEjHv4CwNIbiB/Q/C6x4c2Plx79VM/RqbQ/0P3P2q9dVf8i/ADlzNIMe +9D/0byCO/qrJv1dEcceuPPQ/aOcLCD/my78EW23tBXn0P3H0sFH3A9C/G0tW +IDOB9D8VTffyOEjQvzI7P1NgifQ/RDBzFsyL0L9gGxG5upn0P1kzERwJEdG/ +vdu0hG+69D8ury6KrhTSv3Zc/BvZ+/Q/uCx8XcoF1L/pXYtKrH71Py0ueBah +qte/zmCpp1KE9j/FgcTGSnHev7UNGl33bPg/tI66DBo75b8mmiHoB0z6PyXm +RxkHCOu/+naE/atT/D/ejoCjl6Hwv+v6Gw6oOP4/rVX3qSx987+gZ4fUGyMA +QPzvH087hPa/kEHMjBklAUBmTb1mD2v5vw5vq0LDFQJApYeItVYR/L/wf2gw +shcDQL8qm8Wm2v6/HCcStg== + "]]}, + Annotation[#, "Charting`Private`Tag$194695#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBwQM+/CFib1JlAgAAADsAAAACAAAAUgTGe3NV9L/nQfKKF5b+Pwog5s/p +qvK/E2IFKExT/D9sVIWYqKjwv4/pxWIii/k/YMPfyx6S7b/rRwfu7+H2PyI9 +/lHFgem/LAgVw0Dl8z+paLPhu7blv8JpQuTI9/A/avOxXIua4b85PjLH9Bbr +P5k28TtniuG/7hs/ror66j/IeTAbQ3rhv2c8C6AR3uo/JQCv2fpZ4b+Yotjm +8aTqP+AMrFZqGeG/uPUSo/Yx6j9VJqZQSZjgv/kEm6TiSOk/gbI0iQ4s37+J +fthwlWjnP944s0fGC9+/xao8b9xJ5z88vzEGfuvevxjVCUsMK+c/9ssug+2q +3r/wRcIoJe3mP2zlKH3MKd6/r8Z53TBw5j9YGB1xiifdv6PxyM1SceU/Ln4F +WQYj27+08F/rLFzjPxq60JfoBNu/1a85P/c74z8F9pvWyubav/saHPadG+M/ +3G0yVI+q2r+DmOqxfdriP4pdX08YMtq/S2fzFnFW4j/nPLlFKkHZv6KkKKtm +RuE/0niEhAwj2b9WaHqtkyPhP760T8PuBNm/okzHZ44A4T+WLOZAs8jYvwCK +WhboueA/RBwTPDxQ2L+grwANByrgP6D7bDJOX9e/+Y2yCi393T+MNzhxMEHX +v2+2P+DYr90/d3MDsBIj17+OkBAF6mHdP07rmS3X5ta/TkNElCjE3D/92sYo +YG7Wv6MLalJ+gNs/WrogH3J91b8EYSdhq9LYP0b2611UX9W/ORW2GrJ42D8x +MrecNkHVvzbSDcOkHdg/CKpNGvsE1b86Y35hG2TXP7aZehWEjNS/GnqZ3bLh +1T+i1UVUZm7UvyUvbriCfdU/jRERk0hQ1L+Y5T7xuhfVP2SJpxANFNS/cyDi +OwRH1D8TedQLlpvTv9hEsyXFjdI/+P/5Ee9607/0olAxxw/SP96GHxhIWtO/ +ZFWMwqGO0T+olGok+hjTv0k90Je2gdA/jhuQKlP40r+S0Oale+rPP3OitTCs +19K/lZ6SVmPIzj8+sAA9XpbSv9dqBepTZMw/JDcmQ7d10r/DabbNjR/LPwm+ +S0kQVdK/BBAmq9nLyT/uRHFPaTTSv8sDph7IZsg/1MuWVcIT0r+VaXsMLu3G +P7lSvFsb89G/4HrWqspaxT+e2eFhdNLRvxk5yi2tqcM/hGAHaM2x0b946XHj +FtHBP2nnLG4mkdG/sfJ1K1+Gvz9OblJ0f3DRv9521lwUz7o/NPV3ethP0b9O +hxJL8hS1PwI/WUASOtG/YBTIhbwvsD8R//JT + "]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwA2IQ/Wlj8ryE3xf2M0DBk84XPY/fIvgnBfgm25xF8KfI +Rc5/143gVy2tW+qejeDH6yxZvcALwdeyer89iBPBr1vNtTCX9zyc77kzdK38 +mXNwvsjxBTsvdiH4Kx+ZXTLlQPCvSCYz/2M6izC/Y3dq349TcP71lByt9Y+P +wfn77gaYb1uG4C8LM3XZm4ngl3j8iz39/iicL6AzYeLz30cQ7vu8+Ye8yGE4 +v5T5e69i5z44v7xKq+/k1HVw/qp+C4clBmvtYfy+zMZrCU3H4XzeLz7WawIv +w/kPSo6ZlLXchvPf7fQ9VH7iIZy/rH1hQkrnUzhf9dtq4YrZL+H8e5vk91pn +vIXzQ6c/6Hg94QPCfvfNvIwzEfwT31sniS1E8K0itOc4bkTw5STL1k+/iOC/ +mMV9zVnoI5xfNc9Mec5kBH+zH+eKjbMR/Df/buscX4zgx8U3mn3ajOA7K5zx +9LiC4PMsSiz4IvIJzp+3tGevzzQEv0TDZ9H1uQi+52ru9qSlCP6XDV0BFVsQ +fO89HY8XX0Lwf1xq4fzN9xnOPxfq8q5VDMFffIP5soAcgu93r2mOmi6Cv+Rl +g36QN4JfleMgcjcIwfd///9HehSCf7Jtsp5GEoIPAPva7XE= + "]], + LineBox[CompressedData[" +1:eJwBIQLe/SFib1JlAgAAACEAAAACAAAADeoQl9Rx8z9X+/VGHamkP3x9vXAe +gPM/mNXTkVVosT9RAH1VqYfzP2U7gWkoMLQ/JoM8OjSP8z+1A1W4v6S2P/wF +/B6/lvM/OjkX0tLeuD+oC3vo1KXzP5yj5HV82Lw/fo46zV+t8z89KXG+/6e+ +P1MR+rHqtPM/M4JI8xcwwD/+Fnl7AMTzP3mWOyn+y8E/1Jk4YIvL8z/ho3Qi +Q47CP6kc+EQW0/M/VZqFUf1Jwz9UIncOLOLzP8sSW4OYsMQ/qi11oVcA9D9i +NIeiaEjHP4CwNIbiB/Q/C6x4c2Plxz9VM/RqbQ/0P3P2q9dVf8g/ADlzNIMe +9D/0byCO/qrJP1dEcceuPPQ/aOcLCD/myz8EW23tBXn0P3H0sFH3A9A/G0tW +IDOB9D8VTffyOEjQPzI7P1NgifQ/RDBzFsyL0D9gGxG5upn0P1kzERwJEdE/ +vdu0hG+69D8ury6KrhTSP3Zc/BvZ+/Q/uCx8XcoF1D/pXYtKrH71Py0ueBah +qtc/zmCpp1KE9j/FgcTGSnHeP7UNGl33bPg/tI66DBo75T8mmiHoB0z6PyXm +RxkHCOs/+naE/atT/D/ejoCjl6HwP+v6Gw6oOP4/rVX3qSx98z+gZ4fUGyMA +QPzvH087hPY/kEHMjBklAUBmTb1mD2v5Pw5vq0LDFQJApYeItVYR/D9lmsKt +5/4CQOdB8ooXlv4/mu0DQA== + "]]}, + Annotation[#, + "Charting`Private`Tag$194695#4"]& ], {}}, {{}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}, {}}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {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}, {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}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, { + 0, 1, 0}}}, CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + + FilledCurveBox[{{{1, 4, 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}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + + FilledCurveBox[{{{1, 4, 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}, { + 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}, {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, 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}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 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, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, { + + Thickness[0.034013605442176874`]}, StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-1.928381702326689, 1.9116435458746481`}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.80179951951713*^9, 3.8018008097084846`*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"f0d5c1e3-c323-4923-96ed-5265df42efba"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1.5"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "1.5"}], ",", "3"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "3"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "1"}], ",", "2"}], "}"}]}], "}"}]}]}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.804484149414551*^9, 3.8044841497630787`*^9}, { + 3.804484198383057*^9, 3.804484211188677*^9}, {3.804484248523696*^9, + 3.8044842506425123`*^9}, {3.804484538622251*^9, 3.804484554897738*^9}, { + 3.8044847550451717`*^9, 3.8044847712550907`*^9}, {3.804498828998341*^9, + 3.8044988815194902`*^9}, {3.80449895853535*^9, 3.804498959755949*^9}, { + 3.8044991209945602`*^9, 3.8044991384418917`*^9}, 3.804499222150051*^9, { + 3.8044992616111717`*^9, 3.804499294663312*^9}, {3.804499390887241*^9, + 3.804499391377763*^9}}, + CellLabel->"In[66]:=",ExpressionUUID->"2cacca77-bb0e-4b9d-b70e-3dcdf52e7857"], + +Cell[BoxData[ + GraphicsBox[{{{}, {}, + TagBox[ + {RGBColor[1., 0., 0.], AbsoluteThickness[1.6], Opacity[1.], + LineBox[CompressedData[" +1:eJwBsQFO/iFib1JlAgAAABoAAAACAAAAUFVVVVVVxT8AAAAAAAAAQPfF5VrM +284/Oe1n1JZp/j/aEvX0LpjVP5oy55F+W/w/VuE7Pbul2z9wmM95+lb6P5VS +kLunpeA/KleDZh51+D8UrQsoT7XjP4DF28iuavY/PwJWjfqQ5j+5jP8v54L0 +P7mmArNHXuk/aHSMwbOk8j/HQzgocmjsP7QLvsjsnfA/gds8lqA+7z/G93Wp +m3PtP+k15SnWKPE/Wje5rDZa6T+4Jd3oLKvyP9y3zgT6U+U/3ZI8pIUT9D8k +6npmDZPhP0x8YAdNmvU/UPfgZvMB2z8R4+tmFgf3P+B9+RNsaNM/fnGoprBs ++D+QDG3VaurHPzV8KY658Pk/AGkywIT9rj9CBBJyxFr7P8BD5DuhWa2/mgi/ +/T3j/D9AP9kgzrDHv0eK04W5Uf4/QFMv5vl607+cMxnuBbn/PwCFTRI899q/ +nqwRf2CfAEAsfOwz5orhvxl+SgU/VQFAEIQbVd5U5b+5jWXfVBoCQLwsAYv9 +b+m/LTGZKdPbAkB8lBRs9Hftv1ZVVVVVVQNAAAAAAAAA8L9FIdEM + "]]}, + Annotation[#, "Charting`Private`Tag$14417#1"]& ], + TagBox[ + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwBUQOu/CFib1JlAgAAADQAAAACAAAA/v//////zz8AAAAAAAAAQNoS9fQu +mNU/Xd8erbzB/j9W4Ts9u6XbP0IjD51kaf0/lVKQu6el4D8STdw6Jyj8PxSt +CyhPteM/9uvB0dzL+j8/AlaN+pDmP8dwhBathvk/uaYCs0de6T/mtTci4Ef4 +P8dDOChyaOw/GnADJwbu9j+B2zyWoD7vPzgQrNlGq/U/6TXlKdYo8T9qJW2F +ek30P7gl3egsq/I/6/oe+BD28j/dkjykhRP0P1m2rRjCtfE/THxgB02a9T/a +5lQyZlrwPxHj62YWB/c/jvqx80ks7j9+caimsGz4PwaomxCNsOs/NXwpjrnw ++T+kP7Yftv7oP0IEEnLEWvs/HKOKihR75j+aCL/9PeP8P7jwj+dYweM/R4rT +hblR/j8wCk+g0jXhP5wzGe4Fuf8/iEjfzSNu3T+erBF/YJ8AQPhQgj9uBNg/ +GX5KBT9VAUAg8ZhoI/fSP7mNZd9UGgJAIMsi7Ej7yj8tMZkp09sCQHC2mT5h +O8A/TJMAclKQA0DARN//O9GoP5AzSg4JVARAwK2Z162sor9/kseowAoFQIDx +uvmgo72/QYVds+C9BUCAg05MX8XIvym21RE4gAZA4PJ9KavI0b+8pYFukDUH +QEgMYfU70ta/M1GWLLo4B0Aos54guujWv6r8qurjOwdAAFrcSzj/1r+ZU9Rm +N0IHQMCnV6I0LNe/dgEnX95OB0A4Q05PLYbXvzBdzE8saAdAKHo7qR462L+j +FBcxyJoHQAjoFV0Botm/GsAr7/GdB0DgjlOIf7jZv5JrQK0boQdAyDWRs/3O +2b+Awmkpb6cHQICDDAr6+9m/XHC8IRa0B0DwHgO38lXavxbMYRJkzQdA4FXw +EOQJ27+Nd3bQjdAHQMD8LTxiINu/BCOLjrfTB0Cgo2tn4Dbbv/N5tAoL2gdA +YPHmvdxj27/QJwcDsuYHQNiM3WrVvdu/R9MbwdvpB0CwMxuWU9Tbv75+MH8F +7QdAkNpYwdHq27+t1Vn7WPMHQFAo1BfOF9y/JIFuuYL2B0AozxFDTC7cv5ws +g3es+QdAEHZPbspE3L8T2Jc11vwHQOgcjZlIW9y/ioOs8///B0DIw8rExnHc +v7M0nwg= + "]]}, + Annotation[#, "Charting`Private`Tag$14417#2"]& ], + TagBox[ + {RGBColor[0., 0., 1.], AbsoluteThickness[1.6], Opacity[1.], + LineBox[CompressedData[" +1:eJwBkQJu/SFib1JlAgAAACgAAAACAAAAfF/bZLp78L8AAAAAAAAAQLQKFvNu +j+6/zHW2I5Y8/z/1oDM6lnvrv8bQrdb8Qf4/5+fuwBt26L9qnj8oNEv9Py00 +206dpOW/5AQUb0Nk/D/ehz6NQZbiv29tzJnyaPs/x8GlpcN337+mKJ58Z336 +PzTVCbDA39m/u/5ZgIiV+T9491sbA87Tvw/ArMXBmPg/yEggKntIzL9WA2yn +pav3P0zAZN96AcC/S2I/pRqp9j+k1P+YnJ+fv9JOmjmOqfU/SteCcY4mrT9C +Y6cxfLn0P41IBQqwesM/7ITT/fOy8z/3xeVazNvOP/Y1Oaygu/I/2hL19C6Y +1T8AYMV6y6zxP1bhOz27pds/rOGcepyf8D+VUpC7p6XgPyJeo1BCQu8/FK0L +KE+14z+Yy3gOBRLtPz8CVo36kOY/kOCbft796j+5pgKzR17pPyRFb7Zk6ug/ +x0M4KHJo7D8AbATOPZ3mP4HbPJagPu8/+GeXZORp5D/pNeUp1ijxP8ghc4VV +9uE/uCXd6Cyr8j9AVjE9IPXeP92SPKSFE/Q/6EDrfUIr2j9MfGAHTZr1P4j1 +aN8IydQ/EePrZhYH9z9QcTBUoB/PP35xqKawbPg/EDs2V616xD81fCmOufD5 +P6AvE0Kt5bA/QgQScsRa+z+AKUQBYvaZv5oIv/094/w/gD3NVgdxwL9HitOF +uVH+P8A3p5YDP82/nDMZ7gW5/z9wnZLMMR7Vv56sEX9gnwBACGZVP5Nk3L8Z +fkoFP1UBQNzBRg/hsOG/uY1l31QaAkAANdxSdJPlvy0xmSnT2wJAGKzajZJ6 +6b9MkwByUpADQGAEV8BvMO2/AszHwdQWBEAAAAAAAADwv4MlRVU= + "]]}, + Annotation[#, "Charting`Private`Tag$14417#3"]& ], + TagBox[ + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwBAQP+/CFib1JlAgAAAC8AAAACAAAAHnZNVfoa6T8AAAAAAAAAQLmmArNH +Xuk/ziahGr7R/z/HQzgocmjsPwy6nCkxwf0/gds8lqA+7z9QFdBoutr7P+k1 +5SnWKPE/PlFw0vzT+T+4Jd3oLKvyP6wx60SN4Pc/3ZI8pIUT9D+wDoFjrxj2 +P0x8YAdNmvU/zjh36YY29D8R4+tmFgf3P+Kx1yQbgfI/fnGoprBs+D/FzoJX +MuHwPzV8KY658Pk/xvHK4Yha7j9CBBJyxFr7P5IJv/4ZS+s/mgi//T3j/D9o +RzIIDhvoP0eK04W5Uf4/6DpgO+w/5T+cMxnuBbn/PxhJNukIj+I/nqwRf2Cf +AEAEdOFddoLfPxl+SgU/VQFAOHWmFJx52j+5jWXfVBoCQHA9ozEzN9U/LTGZ +KdPbAkCQPnBRqzrQP0yTAHJSkANAwJgnPipvxz+QM0oOCVQEQEB/QoPO1Ls/ +f5LHqMAKBUCAoiGWV/2kP0GFXbPgvQVAAIYqEO+TmL8pttUROIAGQGCXddKP +2be/vKWBbpA1B0DQph92LAvEvzNRliy6OAdAYLGobCQvxL+q/Krq4zsHQIDF +FgQaU8S/mVPUZjdCB0DAaUcb/prEv3YBJ1/eTgdAIDFMEqoqxb8wXcxPLGgH +QABYaVqSSca/oxQXMciaB0AAumLfrYXIvxrAK+/xnQdAwFhbnVypyL+Sa0Ct +G6EHQPACqCcJzci/gMJpKW+nB0BA6W+mWxTJv1xwvCEWtAdAUNLqcOaiyb8W +zGESZM0HQJCvRViUv8q/jXd20I3QB0CwR6J1IOPKvwQji4630wdA0Kq5c6oG +y7/zebQKC9oHQDAGFRe4Tcu/0CcHA7LmB0CAGjUdutvLv0fTG8Hb6QdAsOsk +YzX/y7++fjB/Be0HQIB2spOuIsy/rdVZ+1jzB0Agmoi5mmnMvySBbrmC9gdA +0BpAsQ2NzL+cLIN3rPkHQFAmc5h+sMy/E9iXNdb8B0BgKldw7dPMv4qDrPP/ +/wdAsMYgOlr3zL/EdGLN + "]]}, + Annotation[#, "Charting`Private`Tag$14417#4"]& ]}, {}}, + AspectRatio->1, + Axes->{True, True}, + AxesLabel->{ + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], + FormBox[ + GraphicsBox[{ + Thickness[0.1023541453428864], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]]}, { + Thickness[0.1023541453428864]}, StripOnInput -> False]}, { + ImageSize -> {14.662804483188044`, 24.508064757160646`}, + ImageSize -> {9.77520298879203, 16.338709838107096`}, BaselinePosition -> + Scaled[0.32439307852814453`], ImageSize -> {10., 17.}, + PlotRange -> {{0., 9.77}, {0., 16.34}}, AspectRatio -> Automatic}], + TraditionalForm]}, + AxesOrigin->{0, 0}, + AxesStyle->Directive[ + Thickness[Large], 16], + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameStyle->Directive[ + Thickness[Large], 18], + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{0, 3}, {-1, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{ + 3.804484161645864*^9, {3.804484200318059*^9, 3.8044842125135403`*^9}, + 3.804484251893461*^9, 3.804484555888534*^9, 3.8044847810689163`*^9, { + 3.804498847245267*^9, 3.804498881897105*^9}, 3.804498960164385*^9, { + 3.80449912445015*^9, 3.804499139528474*^9}, 3.804499223581234*^9, { + 3.804499266644086*^9, 3.8044992956124907`*^9}, 3.804499391908037*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"49f79181-58d5-4c98-b66a-b45b7b27753c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1.51"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "1.5"}], ",", "3"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{s}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{sp}_\\\\text{z} ~ ^{3}P\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{sp}_\\\\text{z} ~ ^{1}P\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{p}_\\\\text{z}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}], "}"}]}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "3"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "1"}], ",", "2"}], "}"}]}], "}"}]}]}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8044988929418287`*^9, 3.804498939118314*^9}, { + 3.8044989823150263`*^9, 3.8044990964448357`*^9}, {3.804499205162958*^9, + 3.804499206246594*^9}, {3.804499309610615*^9, 3.804499375938847*^9}}, + CellLabel->"In[65]:=",ExpressionUUID->"4844e83d-444c-4b0f-b5eb-e25af1479e1e"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{}, {}, + TagBox[ + {RGBColor[0., 0., 1.], AbsoluteThickness[1.6], Opacity[1.], + LineBox[CompressedData[" +1:eJwBgQJ+/SFib1JlAgAAACcAAAACAAAA1TGZnt7w8L8AAAAAAAAAQO+9Ny41 +s/C/2z1tWVXZ/z+0Chbzbo/uv+NHIXPZ9P4/9aAzOpZ7678xii35lPz9P+fn +7sAbdui/maoqeB0I/T8tNNtOnaTlv86XMC1dI/w/3oc+jUGW4r/DueCcdCr7 +P8fBpaXDd9+/pswnrDFB+j801QmwwN/Zvx3jD4GYW/k/ePdbGwPO079cjCxO +VGH4P8hIICp7SMy/RwYwU5t29z9MwGTfegHAvyrfrai0dvY/pNT/mJyfn7+j +ZYGPz3n1P0rXgnGOJq0/6H+h5UWM9D+NSAUKsHrDP01JwSmOiPM/98XlWszb +zj9vrBcp7JPyP9oS9fQumNU/O1wOPhSI8T9W4Ts9u6XbP5Cc1LHlffA/lVKQ +u6el4D8AYDf0hQTvPxStCyhPteM/tq+TYX3a7D8/AlaN+pDmP5es5mUMzOo/ +uaYCs0de6T9ZlQ9p473oP8dDOChyaOw/EYMMBsV15j+B2zyWoD7vP5yq6IW0 +ReQ/6TXlKdYo8T8y9ckAm9LhP7gl3egsq/I/L8MBZvKh3j/dkjykhRP0P4dT +l5FGttk/THxgB02a9T+r02gkhfzTPxHj62YWB/c/jRCTXx01zD9+caimsGz4 +P5rFhUw93b4/NXwpjrnw+T8U/mWb8VtpP0IEEnLEWvs/3IsXVC+evL+aCL/9 +PeP8PzhGbggbqM6/R4rThblR/j/pSJZCTBPXv5wzGe4Fuf8/W2/jQz++3r+e +rBF/YJ8AQFuPJpmdj+O/GX5KBT9VAUBRTd3isX7nv7mNZd9UGgJAsPhRkdrH +678MPIAwZtsCQAAAAAAAAPC/1eBAew== + "]]}, + Annotation[#, "Charting`Private`Tag$13987#1"]& ], + TagBox[ + {RGBColor[1., 0., 0.], AbsoluteThickness[1.6], Opacity[1.], + LineBox[CompressedData[" +1:eJwB0QEu/iFib1JlAgAAABwAAAACAAAAmv+gGEjewz8AAAAAAAAAQPfF5VrM +284/W5jyDDMv/j/aEvX0LpjVP8nnMNA3Jfw/VuE7Pbul2z80H6cUOiT6P5VS +kLunpeA/ExeC6TVF+D8UrQsoT7XjPyvez3FpPfY/PwJWjfqQ5j+412PQv1f0 +P7mmArNHXuk//+A+kGx78j/HQzgocmjsP9qgcoK0dvA/gds8lqA+7z+BVEsD +4CntP+k15SnWKPE/CNpKdToY6T+4Jd3oLKvyP1NW84OfH+U/3ZI8pIUT9D+r +v6TzxXbhP0x8YAdNmvU/AktyObsw2z8R4+tmFgf3PzHuFZNRT9Q/fnGoprBs ++D+r4wa8r/nLPzV8KY658Pk/w9lA2VPqvT9CBBJyxFr7Pw4iv66nPJg/mgi/ +/T3j/D8mbaSuZgG0v0eK04W5Uf4/6qr5J2Rqxr+cMxnuBbn/P0gHVFwmb9G/ +nqwRf2CfAEDqI4zHVVrYvxl+SgU/VQFAKdBPGJb13r+5jWXfVBoCQNtB7LZF +IuO/LTGZKdPbAkBt+/4f4cnmv0yTAHJSkANAoCKK8/Y/6r+QM0oOCVQEQGb4 +lIQiDe6/tj16Q0q3BEAAAAAAAADwvzJt2jU= + "]]}, + Annotation[#, "Charting`Private`Tag$13987#2"]& ], + TagBox[ + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwBYQOe/CFib1JlAgAAADUAAAACAAAAszAUyeewzT8AAAAAAAAAQPfF5VrM +284/XbZad//e/z/aEvX0LpjVP7d1CZl3gv4/VuE7Pbul2z86A5xBSCz9P5VS +kLunpeA/VyQkgg7t+z8UrQsoT7XjPy+pbCfzkvo/PwJWjfqQ5j+KvqpkzU/5 +P7mmArNHXuk/DqzMKAAT+D/HQzgocmjsPz78rlFRu/Y/gds8lqA+7z/N3YYS +mHr1P+k15SnWKPE/UiMfOP0e9D+4Jd3oLKvyP9BCm+S6yfI/3ZI8pIUT9D9N +7gwpbovxP0x8YAdNmvU/0AM/0j8y8D8R4+tmFgf3P4hOzSYO4O0/fnGoprBs ++D9bP+S2TWjrPzV8KY658Pk/wf97EMq66D9CBBJyxFr7P/Xd/pkxO+Y/mgi/ +/T3j/D8xkALt1YXjP0eK04W5Uf4/jVrxb2X+4D+cMxnuBbn/PxecTwFMB90/ +nqwRf2CfAEAvI761RqbXPxl+SgU/VQFAIekCyheh0j+5jWXfVBoCQE54kuLE +YMo/LTGZKdPbAkD8/nvQPGS/P0yTAHJSkANA3mBYtpLspj+QM0oOCVQEQIf5 +O5yHS6S/f5LHqMAKBUCtqQ54d1K+v0GFXbPgvQVAAPLgWdEMyb8pttUROIAG +QCjD2+i549G/vKWBbpA1B0DtuvDENOXWvzNRliy6OAdAPbR/1Y771r+q/Krq +4zsHQJGcDuboEde/mVPUZjdCB0DfkiwHnT7Xv3YBJ1/eTgdAJmpoSQWY178w +XcxPLGgHQOIS4M3VSti/oxQXMciaB0C2Zs/WdrDZvxrAK+/xnQdA4l9e59DG +2b+Sa0CtG6EHQCxR7fcq3dm/gMJpKW+nB0CtQQsZ3wnav1xwvCEWtAdAnA1H +W0dj2r8WzGESZM0HQIPKvt8XFtu/jXd20I3QB0D/rk3wcSzbvwQji4630wdA +0rPcAMxC27/zebQKC9oHQBSM+iGAb9u/0CcHA7LmB0AacDZk6Mjbv0fTG8Hb +6QdA/V3FdELf27++fjB/Be0HQBlSVIWc9du/rdVZ+1jzB0C7O3KmUCLcvySB +brmC9gdAzTMBt6o43L+cLIN3rPkHQNgskMcET9y/E9iXNdb8B0BGJR/YXmXc +v4qDrPP//wdAmA+u6Lh73L/YC6PT + "]]}, + Annotation[#, "Charting`Private`Tag$13987#3"]& ], + TagBox[ + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwBAQP+/CFib1JlAgAAAC8AAAACAAAAzEBXpN2n6D8AAAAAAAAAQLmmArNH +Xuk/MviJOXiD/z/HQzgocmjsP9oLtYLddv0/gds8lqA+7z8ZDQKIW5T7P+k1 +5SnWKPE/EYrE2SGS+T+4Jd3oLKvyP/uH1KlFo/c/3ZI8pIUT9D/f+iYStt/1 +P0x8YAdNmvU/K7S9xygC9D8R4+tmFgf3P8PB4jfiUPI/fnGoprBs+D9SXASO +0LTwPzV8KY658Pk/whrHcnkJ7j9CBBJyxFr7P5eyqCySAOs/mgi//T3j/D9s +eSa/4dbnP0eK04W5Uf4/sDs8bxAB5T+cMxnuBbn/PyNfZIHkVOI/nqwRf2Cf +AEBQhClGixffPxl+SgU/VQFAivxc/tcW2j+5jWXfVBoCQE115JPY3NQ/LTGZ +KdPbAkA13Yk5pNDPP0yTAHJSkANAehqCGy3Zxj+QM0oOCVQEQCvb52qNyLo/ +f5LHqMAKBUAAJHxLGyCjP0GFXbPgvQVA38xtwb3Zm78pttUROIAGQGYjyNwy +i7i/vKWBbpA1B0B4/T0nEFXEvzNRliy6OAdAe/vxRcV4xL+q/Krq4zsHQCEB +/gN4nMS/mVPUZjdCB0B14sVj1uPEv3YBJ1/eTgdAaT182XZyxb8wXcxPLGgH +QKrsstVHj8a/oxQXMciaB0CCAVujM8fIvxrAK+/xnQdAUL5fWZ/qyL+Sa0Ct +G6EHQKJ5RdoIDsm/gMJpKW+nB0AlzelB1VTJv1xwvCEWtAdA1m7gzFPiyb8W +zGESZM0HQCrPC/Ho/Mq/jXd20I3QB0BZJbHvMSDLvwQji4630wdAWtaszXhD +y7/zebQKC9oHQF0SqCwAisu/0CcHA7LmB0C4o36Z9RbMv0fTG8Hb6QdAJuqv +tS06zL++fjB/Be0HQA5TIrtjXcy/rdVZ+1jzB0A4hLCGyaPMvySBbrmC9gdA +rSU9T/nGzL+cLIN3rPkHQMi17AUn6sy/E9iXNdb8B0D7nfWrUg3Nv4qDrPP/ +/wdApZCNQnwwzb8Y726w + "]]}, + Annotation[#, "Charting`Private`Tag$13987#4"]& ]}, {}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.08305647840531562], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGYC4pkg8FPCQWpenObpCyoOMP4Oh6ZHxyNUHNzX +HF3OsEPeIQ0MMPndNp670poU4PwPi9YrnNVQxMn3uzgx5t9iFbj5NZ82BGTP +UnGYAbJ3J4I/Z5Hyzj/P0fjqqnA+2JxkBD/glnRN4iRVuPkpsXfcmH+oOqz4 +9rLizAQlh0cR4tsvPlB1OAMCexQdNunlLWa8A+WfkXFICAlSX3BS1WGtkA5f ++jpFBwOtlcIXXDQd1oD4ecoO/0FAXhvinx/KDicOO63NlNOB87eD/FOhC+dP +mcBfZdatD7cfHK6ZBg6poGBwU4DzWxXYVc98kYXzeyO6/RkNZBwcgcbNsDZw +qLn/45ZxtpTD0V07etkm6DvI71qwL/WcpMMGkPtldB2mg/TdlILzH7jGO84K +lHaQAMXnB12HdJB9z6QdtoDk/+g5mBiDgKzDcZB5BfoOMaoRMufmyMP51SD7 +ohXhfLC7IpUcdBTlv+SU6cH5LJxd8snvdOB88R6vVyxTtB34YwPuG00H6geF +j52Ww5u23G4jaXkHUZC8iIYDenoDAMDOG9o= + "]]}, {{ + Thickness[0.08305647840531562]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {18.06422914072229, 26.03675716064757}, + ImageSize -> {12.042819427148194`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {13., 18.}, PlotRange -> {{0., 12.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.02853881278538813], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {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}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4jQQmGbqYGqzN2haoq5DhPj2iwz3EPxPGwKy +Z7GbOfhenBjzL1nPQWZenOZpBTOHB2CF+g4SU69wZmwyc3iepf1t+lx9hy3m +Pw6laJnD+QVrum9nHEDwVZ80zztrZeEQHxKkvmClHpyfCnJHmy6c/6Z4q+hv +bR2o+eYOCSD1nNoOJUDh03wIfoyC48fkP2Zw/qG25eGnHpk5rAcZxKvtYKC1 +UvjCETOHgFvSNYlC2hDzFpk5NLAc7TcU13YA+7/NzEEcJK6k5XBD6JPj+Wlm +DukgcTYth5OHndZmvjNz8DnBbjs7VAviPylzhxcg92VrOfD6r5+SGoHgJ8fe +cWOWsIDzr4PMa7OAiFdowvlGxkBwWR3On9LeGnX5j6oDl5tqKdMvcweP/bWy +FsdVHJbc38c3RxnB13jLu89gpxmcDw6vKDOHMyDAowpxp6iZwwaQRK8qPD5N +QPZ9VnVgAIEDpg4vQPERq+bgB4rXyaYOjaDwCFd3+LrzVtffUFOHht9WBec0 +1KHhY+rwNHHhNRN+NYc6kPgMqHyGKiS8lplCwrVJBZ4+noDU66vAwxccblwq +Dhv18hYz3kHwDwC9kT7FHM4Hm59h4TATBG6qQMLthQXcfrB5ZpYQ/55Rg6Sr +WEuI+6erw/nSIHcUaMD5zJxd8sl+mg79wSUq0/UtHY7v2tHLJqDlEA1KP3cs +HH68fX3AslkLkn4WWTjoK8p/ybmmBdGfa+Fw/mrYG/3fWvD40QelKxVoetsE +1e+sA3HvDwto+tKF8+csUt75R10PzgerP6zvYFsZscLUF+rfTAMo3xzOB8fX +BjM4PwWk3wOa32wNIOnhpik8f6HnZwDIbKDV + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, {{ + Thickness[0.02853881278538813]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.03675716064757}, + ImageSize -> {35.04043835616439, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.02853881278538813], + StyleBox[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + 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:eJxTTMoPSmVmYGBgBGJlIGYC4gjx7RcZzpk61P62KjiXoedgoLVS+MITBL9k +q+jv03zmDiI9Xq9YSvQdQJSJoLnDdoemR8cr9B1MjIFAGMH3OcFuO1sUwV9y +fx/fHGUEPyX2jhuzhrnDk8SF10z8kfgghzzQg/NNbfYGTVNUg/P/fit9MMdQ +Fe6eU4ed1mb+U3FY9sJD7/9EMweZeXGapz+oQGgBM4dfb18fsHyM4O8A2R+h +4nCgVtYivcTcIQ0MMPkvsrS/Te9F8EHaZqxG8MH23kPwz4CAjoWDGci9iSoO +daBw87BwmNLeGnU5RsVhJhgg+Mkg//ywgLsHxoe59z8I1FvA/dMNCm9GC7h/ +udxUS5leIcIDxoeFF4wPtjbTAEKfNHe4LV2TaFRqAIkPY3OH60KfHM+rGTj0 +BZeoTO83c/gBsv+wPsT/e00dnoLiR1/fAT19AAAKfvOh + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, {{ + Thickness[0.02853881278538813]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.23854545454546}, + ImageSize -> {35.04043835616439, 17.49236363636364}, + BaselinePosition -> Scaled[0.3029987538415624], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.49}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.07062146892655367], + StyleBox[{ + + 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}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQnZ4GBM8+2v98+/qApbKKwzavDRZzfv6A88+AgA+D +A4z/svZx9vk1DA4ea44uZ/ihDOfvza95OzNVCc63L3GsPT2HE43P7HCge1+T +STKDQ39Etz/jByao+b/s/4PAfiYH763+x5PbPtpf570tllqG4JsYg8B/e4h6 +JocW8VrWzGOY/D6QuRtY4PzC5SUb/vGz4+RD9As4oJov4ACz/waINuNxgLkP +Ej4ccPdD7OOA+w+VzwnnP3CNd5x1URTi3x5uhy/7Pm5N/ybiMGMmCPA5MIDA +AhGIukJBOL9dgV31zBUhVHlBEQeNTyovZ70UcWgDy4s4iFROKjmbIgqhXaQc +qu//uGX8WsLhLMg+HRmHHcFWEf/VpRxqQOLZcg73webIw/nhnGLtxvyKcD7Y +nC3KDttB+tilHOYsUt7557gqxB0NInD+m7bcbqPdQnC+MEgfi6DDjAn8VWbd +qg7Bby9/nOEo4PAkceE1E31VeHhA0osynH9i145etg2qDgFPPC+ZXmaHmweO +h29MEL67qoMHKD2w/bEPvCVdk/hJxQGWfjeoPmmedxbBh6VXAFUATEo= + "], {{ + 3.08594, 8.94844}, {3.08594, 9.11406}, {3.14531, + 9.245310000000002}, {3.3000000000000003`, 9.44844}, { + 3.6468799999999995`, 9.88906}, {4.134379999999999, 10.1156}, { + 4.731249999999999, 10.1156}, {5.851559999999999, 10.1156}, { + 6.56719, 9.32969}, {6.56719, 8.089060000000002}, {6.56719, + 6.75469}, {5.768750000000001, 5.76563}, {4.695309999999999, + 5.76563}, {4.039059999999999, 5.76563}, {3.5515600000000003`, + 5.9796900000000015`}, {3.08594, 6.468749999999999}, {3.08594, + 8.94844}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGZigIINCg5S8+I0T19QcYDxdzg0PToeoeLwNHHh +NRN+FYc0MMDk+5xgt529FcHfpJe3mDFGFSe/keVov+F1Dbj561WfNM87q+Ew +YyYQ7ETw5yxS3vnnORpfXRXO97s4MeZfMoIfcEu6JnGSKtz8lNg7bsw/VB18 +QeoOqzk8ihDffvGBqsOxXTt62T6oQtx1R9VhJhgoOSSEBKkvOKnqYGazN2ja +Q1UHA62VwhdcNB1MQfyF6g7/QUBe2+FV8VbR39oaDicOO63NlNOB87eD/FOh +C+dPmcBfZdatD7cfbE2mAcSflSpwfvnhba4zdZXh/Or7P24Zeys5OAKNm2Ft +4PBh0XqFsxmKDkdB7p6g7+A8oVkoTUrRYQPI/TK6EHfNR/CVrz0KZrij6CAB +is8Pug7poGBXU3LYApL/o+dwBgyUHI6DzCvQh/iXUQXOZ+Hskk/uU4Xzwcp7 +1Bx0FOW/5JTpwflgde904HzxHq9XLFO0HbaY/ziUcgqoHxQ+dloOK7+9rDhz +QNlBFCQvouGAnt4AakwW/w== + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4vNXw97oz9ZwaFVgVz0zRdQBxtf4pPJy1kox +h5TYO27MEeoObmuOLmeYIeawQfVJ87yzag4KuxbsS+0Tc3iRpf1tuiyCL1w5 +qeTsEkW4fuVrj4IZ5ig6mBgDwWURB/7YgPtG0xUdREDqUkQcqu//uGVcreiQ +ngYEzwQd9uTXvJ3JqgTnlx/e5jrTVsnhTVtut1G0iMN/EPBXcohRjZA5JyPq +ADLWeLGSQxXIHG9Rhw+L1iuc/aEM558BgR41OP9V8VbR39pqDjNBQFIE4v67 +qhD73IQdHkWIb7+YoApxF7cQ3D6wOWdYHFZ+e1lx5oGiw3Xe22Kp25gg8vMV +HaJB7qlhdGAAgQ0KDjlTEwotin/Zg/1/RsEh4InnJdPJ3yH8NUoQff+/27uD +wvUEgr9WSIcvvU8Zzq/9bVVwrkMDrh/Gl9koNp/pwS/7v99KH8yZqOFw4fex +6/Mi/9kH3pKuSdyk4XCwe1+TyWImh/Xg+NJwaBGvZc1kY3P49fb1AUtnBP/Y +rh29bB/UHfxB5gczQMND3YFF/xfXJZ5/9pv08hYzyqg7sIL5f+1h4QPjP3CN +d5z1UQnOR09PAFTGHcA= + "]]}, {{ + Thickness[0.07062146892655367]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {21.23816189290162, 26.03675716064757}, + ImageSize -> {14.158774595267746`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {15., 18.}, PlotRange -> {{0., 14.16}, {0., 17.36}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, 0.33333333333333337`]], {}}}, + AspectRatio -> Full, ImageSize -> {20, 10}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0., 0., 1.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0., 0., 0.6666666666666667], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.`", ",", "0.`", ",", "1.`"}], "]"}], + 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., 0., 1.]; + 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., 0., 1.], Editable -> False, Selectable -> + False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[1., 0., 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6666666666666667, 0., 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"1.`", ",", "0.`", ",", "0.`"}], "]"}], + NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[1., 0., 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[1., 0., 0.], Editable -> False, Selectable -> + False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.130718954248366, 0.5359477124183007, 0.130718954248366], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.196078431372549`", ",", "0.803921568627451`", ",", + "0.196078431372549`"}], "]"}], 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.196078431372549, 0.803921568627451, 0.196078431372549]; + 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.196078431372549, 0.803921568627451, 0.196078431372549], + Editable -> False, Selectable -> False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[0.22222222222222227`, 0., 0.22222222222222227`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.33333333333333337`", ",", "0", ",", + "0.33333333333333337`"}], "]"}], 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.33333333333333337`, 0, 0.33333333333333337`]; + 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.33333333333333337`, 0, 0.33333333333333337`], + Editable -> False, Selectable -> False]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->1, + Axes->{True, True}, + AxesLabel->{ + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], + FormBox[ + GraphicsBox[{ + Thickness[0.1023541453428864], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]]}, { + Thickness[0.1023541453428864]}, StripOnInput -> False]}, { + ImageSize -> {14.662804483188044`, 24.508064757160646`}, + ImageSize -> {9.77520298879203, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.77}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm]}, + AxesOrigin->{0, 0}, + AxesStyle->Directive[ + Thickness[Large], 16], + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameStyle->Directive[ + Thickness[Large], 18], + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{0, 3}, {-1, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + Line[CompressedData[" +1:eJwBgQJ+/SFib1JlAgAAACcAAAACAAAA1TGZnt7w8L8AAAAAAAAAQO+9Ny41 +s/C/2z1tWVXZ/z+0Chbzbo/uv+NHIXPZ9P4/9aAzOpZ7678xii35lPz9P+fn +7sAbdui/maoqeB0I/T8tNNtOnaTlv86XMC1dI/w/3oc+jUGW4r/DueCcdCr7 +P8fBpaXDd9+/pswnrDFB+j801QmwwN/Zvx3jD4GYW/k/ePdbGwPO079cjCxO +VGH4P8hIICp7SMy/RwYwU5t29z9MwGTfegHAvyrfrai0dvY/pNT/mJyfn7+j +ZYGPz3n1P0rXgnGOJq0/6H+h5UWM9D+NSAUKsHrDP01JwSmOiPM/98XlWszb +zj9vrBcp7JPyP9oS9fQumNU/O1wOPhSI8T9W4Ts9u6XbP5Cc1LHlffA/lVKQ +u6el4D8AYDf0hQTvPxStCyhPteM/tq+TYX3a7D8/AlaN+pDmP5es5mUMzOo/ +uaYCs0de6T9ZlQ9p473oP8dDOChyaOw/EYMMBsV15j+B2zyWoD7vP5yq6IW0 +ReQ/6TXlKdYo8T8y9ckAm9LhP7gl3egsq/I/L8MBZvKh3j/dkjykhRP0P4dT +l5FGttk/THxgB02a9T+r02gkhfzTPxHj62YWB/c/jRCTXx01zD9+caimsGz4 +P5rFhUw93b4/NXwpjrnw+T8U/mWb8VtpP0IEEnLEWvs/3IsXVC+evL+aCL/9 +PeP8PzhGbggbqM6/R4rThblR/j/pSJZCTBPXv5wzGe4Fuf8/W2/jQz++3r+e +rBF/YJ8AQFuPJpmdj+O/GX5KBT9VAUBRTd3isX7nv7mNZd9UGgJAsPhRkdrH +678MPIAwZtsCQAAAAAAAAPC/1eBAew== + "]]}, + "Charting`Private`Tag$13987#1"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + Line[CompressedData[" +1:eJwB0QEu/iFib1JlAgAAABwAAAACAAAAmv+gGEjewz8AAAAAAAAAQPfF5VrM +284/W5jyDDMv/j/aEvX0LpjVP8nnMNA3Jfw/VuE7Pbul2z80H6cUOiT6P5VS +kLunpeA/ExeC6TVF+D8UrQsoT7XjPyvez3FpPfY/PwJWjfqQ5j+412PQv1f0 +P7mmArNHXuk//+A+kGx78j/HQzgocmjsP9qgcoK0dvA/gds8lqA+7z+BVEsD +4CntP+k15SnWKPE/CNpKdToY6T+4Jd3oLKvyP1NW84OfH+U/3ZI8pIUT9D+r +v6TzxXbhP0x8YAdNmvU/AktyObsw2z8R4+tmFgf3PzHuFZNRT9Q/fnGoprBs ++D+r4wa8r/nLPzV8KY658Pk/w9lA2VPqvT9CBBJyxFr7Pw4iv66nPJg/mgi/ +/T3j/D8mbaSuZgG0v0eK04W5Uf4/6qr5J2Rqxr+cMxnuBbn/P0gHVFwmb9G/ +nqwRf2CfAEDqI4zHVVrYvxl+SgU/VQFAKdBPGJb13r+5jWXfVBoCQNtB7LZF +IuO/LTGZKdPbAkBt+/4f4cnmv0yTAHJSkANAoCKK8/Y/6r+QM0oOCVQEQGb4 +lIQiDe6/tj16Q0q3BEAAAAAAAADwvzJt2jU= + "]]}, + "Charting`Private`Tag$13987#2"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Line[CompressedData[" +1:eJwBYQOe/CFib1JlAgAAADUAAAACAAAAszAUyeewzT8AAAAAAAAAQPfF5VrM +284/XbZad//e/z/aEvX0LpjVP7d1CZl3gv4/VuE7Pbul2z86A5xBSCz9P5VS +kLunpeA/VyQkgg7t+z8UrQsoT7XjPy+pbCfzkvo/PwJWjfqQ5j+KvqpkzU/5 +P7mmArNHXuk/DqzMKAAT+D/HQzgocmjsPz78rlFRu/Y/gds8lqA+7z/N3YYS +mHr1P+k15SnWKPE/UiMfOP0e9D+4Jd3oLKvyP9BCm+S6yfI/3ZI8pIUT9D9N +7gwpbovxP0x8YAdNmvU/0AM/0j8y8D8R4+tmFgf3P4hOzSYO4O0/fnGoprBs ++D9bP+S2TWjrPzV8KY658Pk/wf97EMq66D9CBBJyxFr7P/Xd/pkxO+Y/mgi/ +/T3j/D8xkALt1YXjP0eK04W5Uf4/jVrxb2X+4D+cMxnuBbn/PxecTwFMB90/ +nqwRf2CfAEAvI761RqbXPxl+SgU/VQFAIekCyheh0j+5jWXfVBoCQE54kuLE +YMo/LTGZKdPbAkD8/nvQPGS/P0yTAHJSkANA3mBYtpLspj+QM0oOCVQEQIf5 +O5yHS6S/f5LHqMAKBUCtqQ54d1K+v0GFXbPgvQVAAPLgWdEMyb8pttUROIAG +QCjD2+i549G/vKWBbpA1B0DtuvDENOXWvzNRliy6OAdAPbR/1Y771r+q/Krq +4zsHQJGcDuboEde/mVPUZjdCB0DfkiwHnT7Xv3YBJ1/eTgdAJmpoSQWY178w +XcxPLGgHQOIS4M3VSti/oxQXMciaB0C2Zs/WdrDZvxrAK+/xnQdA4l9e59DG +2b+Sa0CtG6EHQCxR7fcq3dm/gMJpKW+nB0CtQQsZ3wnav1xwvCEWtAdAnA1H +W0dj2r8WzGESZM0HQIPKvt8XFtu/jXd20I3QB0D/rk3wcSzbvwQji4630wdA +0rPcAMxC27/zebQKC9oHQBSM+iGAb9u/0CcHA7LmB0AacDZk6Mjbv0fTG8Hb +6QdA/V3FdELf27++fjB/Be0HQBlSVIWc9du/rdVZ+1jzB0C7O3KmUCLcvySB +brmC9gdAzTMBt6o43L+cLIN3rPkHQNgskMcET9y/E9iXNdb8B0BGJR/YXmXc +v4qDrPP//wdAmA+u6Lh73L/YC6PT + "]]}, "Charting`Private`Tag$13987#3"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], + Line[CompressedData[" +1:eJwBAQP+/CFib1JlAgAAAC8AAAACAAAAzEBXpN2n6D8AAAAAAAAAQLmmArNH +Xuk/MviJOXiD/z/HQzgocmjsP9oLtYLddv0/gds8lqA+7z8ZDQKIW5T7P+k1 +5SnWKPE/EYrE2SGS+T+4Jd3oLKvyP/uH1KlFo/c/3ZI8pIUT9D/f+iYStt/1 +P0x8YAdNmvU/K7S9xygC9D8R4+tmFgf3P8PB4jfiUPI/fnGoprBs+D9SXASO +0LTwPzV8KY658Pk/whrHcnkJ7j9CBBJyxFr7P5eyqCySAOs/mgi//T3j/D9s +eSa/4dbnP0eK04W5Uf4/sDs8bxAB5T+cMxnuBbn/PyNfZIHkVOI/nqwRf2Cf +AEBQhClGixffPxl+SgU/VQFAivxc/tcW2j+5jWXfVBoCQE115JPY3NQ/LTGZ +KdPbAkA13Yk5pNDPP0yTAHJSkANAehqCGy3Zxj+QM0oOCVQEQCvb52qNyLo/ +f5LHqMAKBUAAJHxLGyCjP0GFXbPgvQVA38xtwb3Zm78pttUROIAGQGYjyNwy +i7i/vKWBbpA1B0B4/T0nEFXEvzNRliy6OAdAe/vxRcV4xL+q/Krq4zsHQCEB +/gN4nMS/mVPUZjdCB0B14sVj1uPEv3YBJ1/eTgdAaT182XZyxb8wXcxPLGgH +QKrsstVHj8a/oxQXMciaB0CCAVujM8fIvxrAK+/xnQdAUL5fWZ/qyL+Sa0Ct +G6EHQKJ5RdoIDsm/gMJpKW+nB0AlzelB1VTJv1xwvCEWtAdA1m7gzFPiyb8W +zGESZM0HQCrPC/Ho/Mq/jXd20I3QB0BZJbHvMSDLvwQji4630wdAWtaszXhD +y7/zebQKC9oHQF0SqCwAisu/0CcHA7LmB0C4o36Z9RbMv0fTG8Hb6QdAJuqv +tS06zL++fjB/Be0HQA5TIrtjXcy/rdVZ+1jzB0A4hLCGyaPMvySBbrmC9gdA +rSU9T/nGzL+cLIN3rPkHQMi17AUn6sy/E9iXNdb8B0D7nfWrUg3Nv4qDrPP/ +/wdApZCNQnwwzb8Y726w + "]]}, + "Charting`Private`Tag$13987#4"]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, DisplayFunction -> Identity, + PlotRangePadding -> {{0, 0}, {0, 0}}, PlotRangeClipping -> True, + ImagePadding -> All, DisplayFunction -> Identity, AspectRatio -> 1, + Axes -> {True, True}, AxesLabel -> { + Graphics[{ + Thickness[0.10504201680672269`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, + Thickness[0.10504201680672269`]]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.1023541453428864], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]]}, + Thickness[0.1023541453428864]]}, { + ImageSize -> {14.662804483188044`, 24.508064757160646`}, + ImageSize -> {9.77520298879203, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.77}, {0., 16.34}}, + AspectRatio -> Automatic}]}, AxesOrigin -> {0, 0}, AxesStyle -> + Directive[ + Thickness[Large], 16], DisplayFunction :> Identity, + Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, FrameStyle -> Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, PlotRange -> {{0, 3}, {-1, 2}}, + PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], { + Placed[ + LineLegend[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0., 0., 1.]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[1., 0., 0.]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}, { + Graphics[{ + Thickness[0.08305647840531562], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, + 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGYC4pkg8FPCQWpenObpCyoOMP4Oh6ZHxyNUHNzX +HF3OsEPeIQ0MMPndNp670poU4PwPi9YrnNVQxMn3uzgx5t9iFbj5NZ82BGTP +UnGYAbJ3J4I/Z5Hyzj/P0fjqqnA+2JxkBD/glnRN4iRVuPkpsXfcmH+oOqz4 +9rLizAQlh0cR4tsvPlB1OAMCexQdNunlLWa8A+WfkXFICAlSX3BS1WGtkA5f ++jpFBwOtlcIXXDQd1oD4ecoO/0FAXhvinx/KDicOO63NlNOB87eD/FOhC+dP +mcBfZdatD7cfHK6ZBg6poGBwU4DzWxXYVc98kYXzeyO6/RkNZBwcgcbNsDZw +qLn/45ZxtpTD0V07etkm6DvI71qwL/WcpMMGkPtldB2mg/TdlILzH7jGO84K +lHaQAMXnB12HdJB9z6QdtoDk/+g5mBiDgKzDcZB5BfoOMaoRMufmyMP51SD7 +ohXhfLC7IpUcdBTlv+SU6cH5LJxd8snvdOB88R6vVyxTtB34YwPuG00H6geF +j52Ww5u23G4jaXkHUZC8iIYDenoDAMDOG9o= + "]]}, { + Thickness[0.08305647840531562]}, StripOnInput -> False]}, { + ImageSize -> {18.06422914072229, 26.03675716064757}, + ImageSize -> {12.042819427148194`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {13., 18.}, PlotRange -> {{0., 12.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.02853881278538813], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {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}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI7IGYC4jQQmGbqYGqzN2haoq5DhPj2iwz3EPxPGwKy +Z7GbOfhenBjzL1nPQWZenOZpBTOHB2CF+g4SU69wZmwyc3iepf1t+lx9hy3m +Pw6laJnD+QVrum9nHEDwVZ80zztrZeEQHxKkvmClHpyfCnJHmy6c/6Z4q+hv +bR2o+eYOCSD1nNoOJUDh03wIfoyC48fkP2Zw/qG25eGnHpk5rAcZxKvtYKC1 +UvjCETOHgFvSNYlC2hDzFpk5NLAc7TcU13YA+7/NzEEcJK6k5XBD6JPj+Wlm +DukgcTYth5OHndZmvjNz8DnBbjs7VAviPylzhxcg92VrOfD6r5+SGoHgJ8fe +cWOWsIDzr4PMa7OAiFdowvlGxkBwWR3On9LeGnX5j6oDl5tqKdMvcweP/bWy +FsdVHJbc38c3RxnB13jLu89gpxmcDw6vKDOHMyDAowpxp6iZwwaQRK8qPD5N +QPZ9VnVgAIEDpg4vQPERq+bgB4rXyaYOjaDwCFd3+LrzVtffUFOHht9WBec0 +1KHhY+rwNHHhNRN+NYc6kPgMqHyGKiS8lplCwrVJBZ4+noDU66vAwxccblwq +Dhv18hYz3kHwDwC9kT7FHM4Hm59h4TATBG6qQMLthQXcfrB5ZpYQ/55Rg6Sr +WEuI+6erw/nSIHcUaMD5zJxd8sl+mg79wSUq0/UtHY7v2tHLJqDlEA1KP3cs +HH68fX3AslkLkn4WWTjoK8p/ybmmBdGfa+Fw/mrYG/3fWvD40QelKxVoetsE +1e+sA3HvDwto+tKF8+csUt75R10PzgerP6zvYFsZscLUF+rfTAMo3xzOB8fX +BjM4PwWk3wOa32wNIOnhpik8f6HnZwDIbKDV + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, { + Thickness[0.02853881278538813]}, StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.03675716064757}, + ImageSize -> {35.04043835616439, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.36}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.02853881278538813], + Style[{ + + 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:eJxTTMoPSmVmYGBgBGJTIGYCYokmmSkGl7/bi1ROKjnLIuMA479py+022i3h +YJGka8fq8N3+DAj4iDvUvGj6NW3nV4j6FFGHuScmL8le9t++VYFd9cwUEQeN +TyovZ3UyO6wV0uFLtxNxeFH7OPv8G3Y4H6zORAjOB5uzRAwiPkUczg95e/nj +DEcZOD9GNULm3B5Zhy/7Pm5NNxNzaAGpvyLnoLBrwb5UP1EHdZC9J+UdHrjG +O84SFHE4C3JvjQLEnjohh9Q0IDim4DBjJgjwQMT1FB2axGtZM4+xOPwHgX5F +B2MwYHIAK+NUgvM7bTx3pSkpw/miPV6vWEJUoP5ldTh12Glt5j8VB/sSx9rT +MdxwPtjc+wJwPsS9wg4Nv60Kzmkg+M4TmoXSuJTh/PLD21xn1ipB/S8C5/dF +dPszbhBxYACBB8oOUeBwEXEIvCVdk1ikAgm3hyIOTxIXXjPRV4X4I1LI4UWW +9rfpc1UdDnbvazJZLOAwZ5Hyzj/HVaHu5YXzIfHMBOez6v/iusTz3T4l9o4b +c4UKnA8OhmAlOB8WnpD08hvCj1NwWHJr+WNDZiZo/MlD4m8aCyS+NOUdDoDd +wwmJnzQ5h36Q/wQEHHrB/pSFpxdIvMs6RIPMkRGGisvA+elg/VJwvgnIfZfF +HSDpWADib2Yxhx6wuVxw/navDRZzdjLD+Swg//T8tQfHwzpxOB+sT0AKzkfP +LzA+ACrCVkY= + "]], + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQ/R8E7ks4/Hz7+oClsoqDSOWkkrNLpOD8MyDQIwPn +x6hGyJzbI+PgsebocoYfynD+3vyatzNTleB8+xLH2tNzONH4zA7uIH0zZBz6 +I7r9GT8wOcyZCQQ/pRzA7tjP5LAj2Cri/3EJh+u8t8VSyxB8E2MQ+G8PcY+s +Q4t4LWvmMUz+GiEdvvR9cnC+7K4F+1LfyePkg6yfGakENx/Gh9m/8tvLijMO +inD3PXCNd5xVqAB3fzinWLtxvALcf6h8TjgfrO+iqEN6GhCIKTp82fdxa/o3 +EQewfTcVHRhAYIGIg/K1R8EMb5Tg/NLD21xnzlWG8zfo5S1mtFFx0Pik8nLW +SxGHF1na36bPhcZbiqiD1wl229mh6g7V93/cMn4t4ZAQEqS+wFMDEo7qUg71 +v60KzmVoOtwHuUdQHs4Hu5NfEc4Hm7dF2aGB5Wi/obm6w5xFyjv/HFeFhFOx +Cpy/AhQ+E5ThfHA62KrkMGMCf5VZt6rDHU3ZNf+DlRyeJC68ZqKvCg8PSHpR +hvNP7NrRy7ZBFZI+NBTg5oW8vfxxxkNZCN9dFeKPdGmHwFvSNYmfVBxg6XeD +6pPmeWcRfFh6BQDMMEWn + "], {{8.18594, 8.94844}, {8.18594, + 9.11406}, {8.245310000000002, 9.245310000000002}, { + 8.399999999999999, 9.44844}, {8.746879999999999, 9.88906}, { + 9.23438, 10.1156}, {9.831249999999999, 10.1156}, {10.9516, + 10.1156}, {11.667199999999998`, 9.32969}, {11.667199999999998`, + 8.089060000000002}, {11.667199999999998`, 6.75469}, {10.8688, + 5.76563}, {9.79531, 5.76563}, {9.139059999999999, 5.76563}, { + 8.651560000000002, 5.9796900000000015`}, {8.18594, + 6.468749999999999}, {8.18594, 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4kaWo/2G6YYOrQrsqmemiDrA+BqfVF7OWinm +4H2C3Xb2UQMHtzVHlzPMEHMoWNN9O6PBwEFh14J9qX1iDrz+66ekaiD4CbF3 +3JhvaMP1P0lceM3kvLaDiTEQXBZx2GL+41DKKW0HkcpJJWdTRBxYOLvkk9dp +O6SnAcEzQYetDk2PjlvowPkS8+I0TxfoOLxpy+02ihZx+PH29QHLZh2HGNUI +mXMyog66ivJfcq7pOFTd/3HL2FvU4U3xVtHf2npw/n8QiDeA8/uDS1Sm6xs4 +zAQBSREHfpD7OQwg9rkJO4j2eL1imaLvUA1Szy0Et+8MGLBA5EV0HK7z3hZL +3cYE9Ze2QzTIPTWMDn9A6h9rOeRMTSi0KP5lL7/8hYfefy2HgCeel0wnf7eX +BfHv60Dc9f+7/fmrYW/0fyP4pjZ7g6Yd1IXzI8S3X2SIM4Trh/FlNorNZ3rw +y1586hXOjCRDhwu/j12fF/nP/nDb8vBTRYYOB7v3NZksZoLGl6FDi3gtayYb +m8P0CfxVZtYI/t9vpQ/mCBo6+IPMD2aAhoehA4v+L65LPP/sP28IyJ613MCB +Fcz/aw8LHxhfV2ul8AUVXTgfPT0BAGL4DTg= + "]], + + 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:eJxTTMoPSmVmYGBgBGJlIGYC4gjx7RcZzpk61P62KjiXoedgoLVS+MITBL9k +q+jv03zmDiI9Xq9YSvQdQJSJoLnDdoemR8cr9B1MjIFAGMH3OcFuO1sUwV9y +fx/fHGUEPyX2jhuzhrnDk8SF10z8kfgghzzQg/NNbfYGTVNUg/P/fit9MMdQ +Fe6eU4ed1mb+U3FY9sJD7/9EMweZeXGapz+oQGgBM4dfb18fsHyM4O8A2R+h +4nCgVtYivcTcIQ0MMPkvsrS/Te9F8EHaZqxG8MH23kPwz4CAjoWDGci9iSoO +daBw87BwmNLeGnU5RsVhJhgg+Mkg//ywgLsHxoe59z8I1FvA/dMNCm9GC7h/ +udxUS5leIcIDxoeFF4wPtjbTAEKfNHe4LV2TaFRqAIkPY3OH60KfHM+rGTj0 +BZeoTO83c/gBsv+wPsT/e00dnoLiR1/fAT19AAAKfvOh + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGI5IAaxQYAJSjNCxZjR2DA5dDXI4rjYxJhJiV5cakhl +k2omMe5HZgMAEs4CVw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ7IGYCYg431VKmW9YOLJxd8sl5Wg5LX3jo/W+0cTC3 +2Rs0LVHLYcoE/iqz0zYOG/TyFjPGaDmcAYE3Ng7TQeLaCP6U9taoy3s04fw5 +i5R3/knXdMhf030744GNw2bzH4dSVmk49Hi9YjG5CDRP9UnzvLfqDs8TF14z +eW/toP5J5eUsTWkH+6ZHx2fstnZ44BrvOOuimAOP//opqTusHRR2LdiXuk7M +4fhhp7WZdtYOGiD1nWIQ8w5aOYhUTio5myLmcEO6JtFoqxVEPZ8ohG9q7fCm +LbfbSFrUQXzqFc6MTdYOaSCgJuogMy9O87SAjYOJMQiIOqTE3nFj9kDwwe6p +RvD31spapF+xges/AXKPny3c/P8g8N4Wbr/6W959Bj9t4e470LY8/JSRLdz9 +S+7v45vz2MahVYFd9cwUMQd9rZXCF47YOHzZ93Fr+jd0vjicLww2TwLi3hM2 +EPt3S8DD90D3viaTxZIQ95+2dVgPCu9cDThfFKSwRMPhw4aA7FnXofJvNRyu +Cn1yPP/M1sEMHP+aDjyg9PHKFuKvek1IOHy2hcd3jILjx+Q/tpB459GCqM+y +g4SrgZYDyNizs+wcnmdpf5tuqwVx/xUEP0J8+0UGNgc4v/63VcG5AAcHabB+ +TTh/hwPQ4T/U4Hxw+KepOHzZeavr71F7iP0+Sg4zZgLBTjs4PxWkrAzBB8eH +pZ1D9f0ft4yzlSDp64Stw8pvLyvOHFCCxOc5W4fbmrJr/jMrOfQGl6hMt7dz +2Jtf83bmVEWIf2vsHPhjA+4blSvC/QPjPwGlZ30HVP51B0h4OqrA+XLLgRmt +Xh3OB+eX55oOq4HZhaHcAZq/tB2OgNJLk73DdpD/JbQh4XTX1iEd5C82bYj9 +LdD0KawNoR9bw9Wj528Atna2+g== + "]]}, { + Thickness[0.02853881278538813]}, StripOnInput -> False]}, { + ImageSize -> {52.56065753424658, 26.23854545454546}, + ImageSize -> {35.04043835616439, 17.49236363636364}, + BaselinePosition -> Scaled[0.3029987538415624], + ImageSize -> {36., 18.}, PlotRange -> {{0., 35.04}, {0., 17.49}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.07062146892655367], + Style[{ + + 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}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGDQA2IQnZ4GBM8+2v98+/qApbKKwzavDRZzfv6A88+AgA+D +A4z/svZx9vk1DA4ea44uZ/ihDOfvza95OzNVCc63L3GsPT2HE43P7HCge1+T +STKDQ39Etz/jByao+b/s/4PAfiYH763+x5PbPtpf570tllqG4JsYg8B/e4h6 +JocW8VrWzGOY/D6QuRtY4PzC5SUb/vGz4+RD9As4oJov4ACz/waINuNxgLkP +Ej4ccPdD7OOA+w+VzwnnP3CNd5x1URTi3x5uhy/7Pm5N/ybiMGMmCPA5MIDA +AhGIukJBOL9dgV31zBUhVHlBEQeNTyovZ70UcWgDy4s4iFROKjmbIgqhXaQc +qu//uGX8WsLhLMg+HRmHHcFWEf/VpRxqQOLZcg73webIw/nhnGLtxvyKcD7Y +nC3KDttB+tilHOYsUt7557gqxB0NInD+m7bcbqPdQnC+MEgfi6DDjAn8VWbd +qg7Bby9/nOEo4PAkceE1E31VeHhA0osynH9i145etg2qDgFPPC+ZXmaHmweO +h29MEL67qoMHKD2w/bEPvCVdk/hJxQGWfjeoPmmedxbBh6VXAFUATEo= + "], {{ + 3.08594, 8.94844}, {3.08594, 9.11406}, {3.14531, + 9.245310000000002}, {3.3000000000000003`, 9.44844}, { + 3.6468799999999995`, 9.88906}, {4.134379999999999, 10.1156}, { + 4.731249999999999, 10.1156}, {5.851559999999999, 10.1156}, { + 6.56719, 9.32969}, {6.56719, 8.089060000000002}, {6.56719, + 6.75469}, {5.768750000000001, 5.76563}, {4.695309999999999, + 5.76563}, {4.039059999999999, 5.76563}, {3.5515600000000003`, + 5.9796900000000015`}, {3.08594, 6.468749999999999}, {3.08594, + 8.94844}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {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}, {0, + 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGINIGZigIINCg5S8+I0T19QcYDxdzg0PToeoeLwNHHh +NRN+FYc0MMDk+5xgt529FcHfpJe3mDFGFSe/keVov+F1Dbj561WfNM87q+Ew +YyYQ7ETw5yxS3vnnORpfXRXO97s4MeZfMoIfcEu6JnGSKtz8lNg7bsw/VB18 +QeoOqzk8ihDffvGBqsOxXTt62T6oQtx1R9VhJhgoOSSEBKkvOKnqYGazN2ja +Q1UHA62VwhdcNB1MQfyF6g7/QUBe2+FV8VbR39oaDicOO63NlNOB87eD/FOh +C+dPmcBfZdatD7cfbE2mAcSflSpwfvnhba4zdZXh/Or7P24Zeys5OAKNm2Ft +4PBh0XqFsxmKDkdB7p6g7+A8oVkoTUrRYQPI/TK6EHfNR/CVrz0KZrij6CAB +is8Pug7poGBXU3LYApL/o+dwBgyUHI6DzCvQh/iXUQXOZ+Hskk/uU4Xzwcp7 +1Bx0FOW/5JTpwflgde904HzxHq9XLFO0HbaY/ziUcgqoHxQ+dloOK7+9rDhz +QNlBFCQvouGAnt4AakwW/w== + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI1IGYC4vNXw97oz9ZwaFVgVz0zRdQBxtf4pPJy1kox +h5TYO27MEeoObmuOLmeYIeawQfVJ87yzag4KuxbsS+0Tc3iRpf1tuiyCL1w5 +qeTsEkW4fuVrj4IZ5ig6mBgDwWURB/7YgPtG0xUdREDqUkQcqu//uGVcreiQ +ngYEzwQd9uTXvJ3JqgTnlx/e5jrTVsnhTVtut1G0iMN/EPBXcohRjZA5JyPq +ADLWeLGSQxXIHG9Rhw+L1iuc/aEM558BgR41OP9V8VbR39pqDjNBQFIE4v67 +qhD73IQdHkWIb7+YoApxF7cQ3D6wOWdYHFZ+e1lx5oGiw3Xe22Kp25gg8vMV +HaJB7qlhdGAAgQ0KDjlTEwotin/Zg/1/RsEh4InnJdPJ3yH8NUoQff+/27uD +wvUEgr9WSIcvvU8Zzq/9bVVwrkMDrh/Gl9koNp/pwS/7v99KH8yZqOFw4fex +6/Mi/9kH3pKuSdyk4XCwe1+TyWImh/Xg+NJwaBGvZc1kY3P49fb1AUtnBP/Y +rh29bB/UHfxB5gczQMND3YFF/xfXJZ5/9pv08hYzyqg7sIL5f+1h4QPjP3CN +d5z1UQnOR09PAFTGHcA= + "]]}, { + Thickness[0.07062146892655367]}, StripOnInput -> False]}, { + ImageSize -> {21.23816189290162, 26.03675716064757}, + ImageSize -> {14.158774595267746`, 17.35783810709838}, + BaselinePosition -> Scaled[0.30534703405225183`], + ImageSize -> {15., 18.}, PlotRange -> {{0., 14.16}, {0., 17.36}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {}, LegendLayout -> "Column"], {Right, Top}, + Identity]}]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{{3.80449889398521*^9, 3.804498939550695*^9}, { + 3.804498983197625*^9, 3.804499097907105*^9}, 3.804499206732985*^9, + 3.8044993152643147`*^9, {3.8044993711766768`*^9, 3.804499376405216*^9}}, + CellLabel->"Out[65]=",ExpressionUUID->"39a83dfe-a7f6-41d1-a1b3-17af8c0ec4bf"] +}, Open ]], + +Cell["\<\ +RHF -> one avoided crossing +UHF -> more than one because of the spin contamination +The singularity structure will be really different.\ +\>", "Text", + CellChangeTimes->{{3.800006759175404*^9, 3.8000068092117243`*^9}, { + 3.800007212139903*^9, + 3.800007229315647*^9}},ExpressionUUID->"71c5c746-2cdb-40a2-8429-\ +b19419caa149"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "//", "MatrixForm"}]], "Input", + CellChangeTimes->{{3.800951857136671*^9, 3.800951874573229*^9}, { + 3.801816363026821*^9, 3.8018163650058403`*^9}}, + CellLabel->"In[64]:=",ExpressionUUID->"5aa6764c-4086-4c7f-97d0-832290cfb9d2"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"84", " ", + SuperscriptBox["R", "2"]}]], "+", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"84", " ", + SuperscriptBox["R", "2"]}]]}], "+", + FractionBox[ + RowBox[{ + RowBox[{"-", "225"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"59", " ", "R"}]}], ")"}]}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]]}], ")"}], " ", "\[Lambda]"}]}], "0", + "0", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + RowBox[{ + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], "+", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]]}], "-", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]]}], ")"}], " ", "\[Lambda]"}]}], + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + RowBox[{ + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], "+", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]]}], "-", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"118", " ", "R"}]}], + RowBox[{"168", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]]}], ")"}], " ", "\[Lambda]"}]}], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + { + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + RowBox[{ + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"25", "+", + RowBox[{"114", " ", "R"}]}], + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]]}], "+", + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]}], ")"}], " ", "\[Lambda]"}]}]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.800951877034357*^9, 3.801816365358841*^9}, + CellLabel-> + "Out[64]//MatrixForm=",ExpressionUUID->"7095227c-2d87-4ca2-985a-\ +dce33d61d518"] +}, Open ]], + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1.49"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801802978045505*^9, 3.8018029850873117`*^9}}, + CellLabel->"In[84]:=",ExpressionUUID->"121c8817-adb5-45f9-a185-17e726b281d0"], + +Cell[BoxData[ + RowBox[{ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBwQQ++yFib1JlAgAAAEsAAAACAAAAY6+Q7///B8A/wHK5NA8KQBT7GiY7 +/AfA63cuD9wMCkDERqVcdvgHwKlnHGODCgpAJt65yezwB8CK2IwF0gUKQOoM +46PZ4QfAZWSxNG/8CUBwajVYs8MHwOOIkzup6QlAfiXawGaHB8DZkQToG8QJ +QJqbI5LNDgfAgp8wnft4CUCf34hvUQkGwNOM4ZL81QhAFtBTTykVBcDENdsT +pz0IQMhQU0TLJQTAFGPoaCqoB0BIKSV0IyIDwGXVXlHWBQdAOq5cps8vAsDk +iwTAKm4GQPqKZhMyKQHAq0ADPZfJBUD196SVXicAwGIcDC/JJwVAxCKSNL5t +/r9wIIBfoZAEQDsFf7MrZPy/LyIWEnTsA0CUQDc3QX36v8Fof//nUgNAY5xY +5eqf+L9/U8xYF7wCQM+nHgkBmva/oFiFPxkYAkAeDLAxv7b0v1uKiR+1fgFA +CiDmz+mq8r8NR3Hd+9cAQGxUhZioqPC/TCWVf8szAEBgw9/LHpLtvybNE0ZP +NP8/Ij3+UcWB6b9opIu8wuX9P6los+G7tuW/7KoliSas/D9q87Fci5rhv4sA +j++mVvs/Ln4FWQYj279bTaWybAX6PxN51AuWm9O/f4s5cdLI+D/XZGwqr+PG +v5jfJ5MIb/c/d3oqjsmVrr+j7M3Pbin2P6qPOECkMK0/qGFzLznn9D+OaYHW +YILHP/XvoCu9hfM/DfRMO6xR0z8IQVhdhzfyP+B0xjR2hNs/zvTk0LLH8D/u +uU3Cd8jhP4Wuq5ivr+4/poehYGSJ5T+LSMrbMfPrPyX2qxN4m+k/SR9VCjDp +6D/esh+9O2jtP9t1pxP//uU/VZfgiOuQ8D+0keFGtQ7jP56ljL1MlvI/Xuz/ +DjqO3z8EW23tBXn0P2wzEHqwVdk/G0tWIDOB9D/39q3s2DrZPzI7P1NgifQ/ +gdeb7wUg2T9gGxG5upn0P6M8Nsdu6tg/vdu0hG+69D8n7GhahH/YP3Zc/BvZ ++/Q//v4VBRGr1z+NTOVOBgT1P7gNQESskNc/pDzOgTMM9T8bygeAUnbXP9Mc +oOeNHPU/H2LwWMJB1z8w3UOzQj31PyuXH4lC2dY/6V2LSqx+9T/lNfGIhAvW +PwBOdH3ZhvU/JXagNDDy1T8YPl2wBo/1P1OlFZX22NU/Rh4vFmGf9T+S4xRb +2qbVP6Le0uEVwPU/T7t0RTdE1T+5zrsUQ8j1P+muODbxK9U/0L6kR3DQ9T/M +44yG2BPVP/+edq3K4PU/XzFrqT3k1D9cXxp5fwH2P3ERSufgh9Q/c08DrKwJ +9j/1uHFlg3HUP4o/7N7ZEfY/V+IWOn9b1D+4H75ENCL2P3QNTDyrMNQ/zw+n +d2Eq9j/TTl889BvUP+b/j6qOMvY/t9D7QckH1D8V4GEQ6UL2P6XzSilr4dM/ +LNBKQxZL9j+2qgKYb8/TP0TAM3ZDU/Y/FzImn3O+0z9bsBypcFv2P+m3ChWt +rtM/cqAF3J1j9j/uZW/HZqDTP4mQ7g7La/Y/8UfGBA6U0z+ggNdB+HP2P7uO +a/xNitM/t3DAdCV89j+YFeSMT4TTP85gqadShPY/x60qUnOE0z90jU3G7Ir2 +P0YfgSJEjdM/VXJVvA== + "]], + LineBox[CompressedData[" +1:eJwBAQP+/CFib1JlAgAAAC8AAAACAAAAuPDKLpma9j/y9XKMAbLTP1Au1oV/ +qvY/FC1y0t9p0z8E8asYIrL2P2QziwI4R9M/a3ZXPmfB9j81XGVu3wHTPx45 +LdEJyfY/llqOpy7f0j/S+wJkrND2P8ybJuF6vNI/OoGuifHf9j+rZYJQCnfS +PwiMBdV7/vY/0ks9/ATs0T+8TttnHgb3P035LRU8ydE/bxGx+sAN9z/LsGok +cKbRP9aWXCAGHfc/8gLQIM9g0T+lobNrkDv3P1Hczm5o1dA/QrdhAqV49z/W +FfSgDnzPP7UNGl33bPg/aZoXqE6xxj8mmiHoB0z6P+d048t1oKQ/+naE/atT +/D9Eexh1o6a8v+v6Gw6oOP4/DEUQPJ540L+gZ4fUGyMAQFDcqCPNyNq/kEHM +jBklAUCnKeh+Lo/ivw5vq0LDFQJAlgt5ty1257++RLi9thoDQAw5+Mut2uy/ +/W1fNlYOBEBm0rvxkfnwvwEH0pkr/QRAX38fphl/8782SHLCSgAGQEMdkLYq +Qfa/+tys6BXyBkBuNWRPdtj4v0RsyJBN9gZAG/PLoRDk+L+N++M4hfoGQFYs +4Dqr7/i/IBobifQCB0D5gSxA4Qb5v0dXiSnTEwdAKZQ0kVA1+b+U0WVqkDUH +QIGOohw8kvm/LsYe7Ap5B0BNrtpfRUz6v3hVOpRCfQdAYX4mHuhX+r/B5FU8 +eoEHQII1bhyLY/q/VAONjOmJB0CIfCfY0Xr6v3tA+yzImgdATyvGRmKp+r/I +utdthbwHQM3Aa9WOBvu/EkrzFb3AB0BtLip8NRL7v1zZDr70xAdA7R7RX9wd ++7/v90UOZM0HQGChGd0qNfu/FjW0rkLeB0C1KmaqymP7v2DEz1Z64gdABIE4 +M3Nv+7+pU+v+seYHQBPaefcbe/u/PHIiTyHvB0DW8I8xbpL7v4YBPvdY8wdA +mUUIpxee+7/QkFmfkPcHQIvJNlfBqfu/GiB1R8j7B0ADr+1Ba7X7v2OvkO// +/wdAVlD/ZhXB+7/d/ne6 + "]]}, + Annotation[#, "Charting`Private`Tag$18476#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwVjHs81fcfx8/3e3AIdTgptx1iSnhkuWRlfN7T2X78jK4u7YcOOgrDftup +lFIa5RKiJAc7D6Ujd9JsyPl8F061Vlou7bA4MkIup5xzWMdY++P1eP7xfD5e +GyIS9vJIGo0W/n7/MrL+0tzKCoNqzT/w1+VGFqxVm250X2JQb/p0j/5Zz4LO +z2+GHFtkUKYmYrlLHQs2DrU8nJYzqFGh1URfFQum9EZvSEcY1M7a1/3ry1nw +dYxrcFMHg7p2//Sd4qssSLYZoKIuMKgKdVnCjSQWCIqt8x+vZlD3IqfGbn/G +AuFwesIeHS2KNtfyTPzUENY93bdrs5Em9TgvtScz0hAe7N7HeWSjQb04p+uW +tGgA3ptt+NZWdKrW4TdBcKoB7KgLEXU7ktTj2TxD1XoDeJcZxXLaTFAPovMy +z15ngnKhvCBsE42qcPbjOToyodMq30Uct4wnbLVvfXJhDbhrnmmyP7SEK7jz +aYrS1XAF3Nw+Pf0Op3X1Zjl06kNkSfDYlHARh0m2BNXO6kF3BVuHEKhw5A4t +a22GHrD1GrbiZgXmDfWsG92iC6ssx7snq97iEBVb9xpnFXy1P+3arVtyzK56 +2VkQpgPcjuFH7PwZ7JhdImKla4OVx/KerpRJPP+yJz1WyIDKI00jbc1j2OII +cXmnRAti5htDsgQjuI1bU6oc0IQtyZoHtKwH8YqiO04+rwGsE726V4t7sP3d +SV6suQY8P/SVXf2oBJfOnA2jnOggfrHbrVkkwTxbelOQIx1Ega6c9mgJZoam +Mebs6cD3Xg59NNeFrR5kNHxgQwemw6W8V+pOHCDIJ5PW08FnvmnRYm0HXu9T +LnJdIuEofSF7Q4YYR5Xdn63qIoGjxBWOa8Q48bnPTq97JBi+Sv/Zo6AdK5m/ +FkrFJNT9Yqo8UHYXe516Cto/kTCe5xmS39KK4/yl+bwqEoItz9vRp5pxztLU +NstcEo6ftMt5WFCHtwasPlMQTIL/rLy/XlSLi6JEKo8AEjZG/Ghx9ccavHTK +M358Dwl9PpzGCGkV/rshPtTNlwRnk7BetXkF/mP5ibvUg4ShBGvXEG8h9n2S +u2huTUJ2UIPENqYUt8xt+rrLgoRPkEewMqsYX9GnXsWZkyBYHZSU012Iabby +frERCYG1mT9TgZfw0aTdP3C1SVhl5ygyfXMRlyROOOhoknDkL++HTS4Z+GHj +2fJGggTra6fWjLelYDWj8TKpJoDsduAtLyfhnD5v3eoFAtrjuNUfnefjlzzZ +uX0KAt4Y2452mcbguRtJ79RyAp7WsIf37w3ER6+v+aZ8hgCNcF/L9J2eaHT+ +meXwJAGVW64f12uNQNsNBbN9fxLwQhpdX+afiCZK40o6Bgg4Xu/nO22chQ4v +/P9ToYQAjgAVGSSXoN3yjsag7wmoyv0Yyj+qRQPDhNNjv/f/ncK7DJc69AfH +MDbIm4CDi1rbY93qkYf+t9UjXgRkNkwZmwgb0FYvOy+VGwGeJi0Gspu30SIv ++76FFQGiqQB6fFMzyoC1znwVDRKzc8cznojRhxM7rlgJaZATndLPPXcfmfBW +IuxHVpC+4gv3mj096LzTZLVH4N9Ixpe4HEsdROIPq3PrCt6h2Ra/e8cfjKCK +eNb8yMsFJLpQxj2UMYZycozS4KAS2aiqWYnFk+jMhi9Z+OZbNHTbot39yAya +/rjiPxdN5SigUJb++pIcRX/mv1d/22v0/c2L7V9cfYtu92xdpXlvDGn8L25G +84QCnRQZf8cqkCEz30BL5xQF2rUtysQjWYac3NE+boYC6Qyw+eGHZYhrZtDS +WqRArr8sDxVtl6H2wTupCa3v+6IdzMy2YXQsZMlMqlagteWllnd8htBkaNZ/ +a5KVyMzczI0ZPIho/vzT0vNK1LnfwsncdhAZe4Y2aOUqUZTOsDljcQB9znZc +Fy587+8Ifv2mcABdH3o2YkQpUbz14qvDvVIUctD0xBlChezqoyrtOb+jb3fR +a2p0VMiZtORLmb+jTDQ9JDVQobZc9f5NL56jnyzEHBcrFXqdv6Q8yX+OjGTh +zEkvFYpqZ/8WU9KPnnArK/amqlBr7Jx/SmUv4mf7SaYzVSg0MLpw8FAv+gfo +W+xW + "]], + LineBox[CompressedData[" +1:eJwBAQP+/CFib1JlAgAAAC8AAAACAAAAuPDKLpma9j/19XKMAbLTP1Au1oV/ +qvY/Gy1y0t9p0z8E8asYIrL2P2YziwI4R9M/a3ZXPmfB9j82XGVu3wHTPx45 +LdEJyfY/mVqOpy7f0j/S+wJkrND2P86bJuF6vNI/OoGuifHf9j+sZYJQCnfS +PwiMBdV7/vY/1ks9/ATs0T+8TttnHgb3P075LRU8ydE/bxGx+sAN9z/NsGok +cKbRP9aWXCAGHfc/8gLQIM9g0T+lobNrkDv3P1bczm5o1dA/QrdhAqV49z/d +FfSgDnzPP7UNGl33bPg/bZoXqE6xxj8mmiHoB0z6P+p048t1oKQ/+naE/atT +/D9Dexh1o6a8v+v6Gw6oOP4/DEUQPJ540L+gZ4fUGyMAQFDcqCPNyNq/kEHM +jBklAUCnKeh+Lo/ivw5vq0LDFQJAlgt5ty1257++RLi9thoDQAw5+Mut2uy/ +/W1fNlYOBEBm0rvxkfnwvwEH0pkr/QRAX38fphl/8782SHLCSgAGQEMdkLYq +Qfa/+tys6BXyBkBtNWRPdtj4v0RsyJBN9gZAGvPLoRDk+L+N++M4hfoGQFYs +4Dqr7/i/IBobifQCB0D5gSxA4Qb5v0dXiSnTEwdAKZQ0kVA1+b+U0WVqkDUH +QIGOohw8kvm/LsYe7Ap5B0BMrtpfRUz6v3hVOpRCfQdAX34mHuhX+r/B5FU8 +eoEHQIE1bhyLY/q/VAONjOmJB0CHfCfY0Xr6v3tA+yzImgdATyvGRmKp+r/I +utdthbwHQM3Aa9WOBvu/EkrzFb3AB0BtLip8NRL7v1zZDr70xAdA7R7RX9wd ++7/v90UOZM0HQF+hGd0qNfu/FjW0rkLeB0CzKmaqymP7v2DEz1Z64gdAA4E4 +M3Nv+7+pU+v+seYHQBPaefcbe/u/PHIiTyHvB0DV8I8xbpL7v4YBPvdY8wdA +l0UIpxee+7/QkFmfkPcHQIrJNlfBqfu/GiB1R8j7B0ACr+1Ba7X7v2OvkO// +/wdAVVD/ZhXB+78/9XfV + "]]}, + Annotation[#, "Charting`Private`Tag$18476#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBMQXO+iFib1JlAgAAAFIAAAACAAAAY6+Q7///B8CtmBK6dU0ZQBT7GiY7 +/AfAcqlLPeBKGUDERqVcdvgHwEwFecFKSBlAJt65yezwB8B7JrHMH0MZQOoM +46PZ4QfA7vua7sk4GUBwajVYs8MHwFUQdGAeJBlAfiXawGaHB8DcfTb9x/oY +QJqbI5LNDgfAiRnsIh6oGECf34hvUQkGwAtClhTw9BdAFtBTTykVBcBXXPc6 +s00XQMhQU0TLJQTAAienPM+pFkBIKSV0IyIDwBzqzwMb+BVAOq5cps8vAsAx +bu0jVlIVQPqKZhMyKQHAk/6QdMaeFED196SVXicAwJLXI3WU7hNAxCKSNL5t +/r/nyJjMT0oTQDsFf7MrZPy/9zzvikiYEkCUQDc3QX36vwR2MxQu8hFAY5xY +5eqf+L9IPIA0cE8RQM+nHgkBmva/OyfnH/meEEAeDLAxv7b0vxLsoajZ9A9A +CiDmz+mq8r947FY6X5AOQGxUhZioqPC/Wjjg160yDUBgw9/LHpLtvyPHcMbN +7AtAIj3+UcWB6b+F/UbIpYsKQKlos+G7tuW/1OCmr05CCUBq87Fci5rhv217 +1kPG3QdALn4FWQYj278nY4eLFoAGQBN51AuWm9O/9sPcMDM6BUDXZGwqr+PG +v8mnSqxB2QNAvt1QN7amxr90HWRXHNQDQKZWNUS9aca/i4BrCPfOA0B0SP5d +y+/Fv9uvSHysxANAECyQkef7xL/RvV2rF7ADQEnzs/gfFMO/qE75J++GA0B1 +A/eNIYm+vysLJKOiNANARPW/py8Pvr+PKD8Ofi8DQBLniME9lb2/xnFtf1kq +A0Cuyhr1WaG8v+tMCHQQIANA5pE+XJK5ur9hL1emfgsDQFgghioD6ra/gGVZ +MFziAkB3eiqOyZWuv8zR3OEbkAJATu7w1q+mrb8z6F7oEYsCQCZitx+Wt6y/ +I2Ta9AeGAkDVSUSxYtmqv0C+wR/0ewJAMxle1Pscp78PPW+9zGcCQN5vIzVc +SJ+/pdwpGX8/AkCNV7DGKGqdv0v9vX91OgJAPD89WPWLm7/Q9lvsazUCQJoO +V3uOz5e/n2W511grAkBWrYrBwFaQv3l/FfcyFwJACiovphrxjL8l/xOOKRIC +QGj5SMmzNIm/TQokKyANAkAjmHwP5ruBv6uyfXcNAwJAAs8sZf7+e78DYskm +BP4BQL1tYKswhnS/84oq3Pr4AUDxGCjjxRpqvzYeopfx8wFA0Kwe31RSVr/B +FjNZ6O4BQARhSyCIQz4/pZOy6UzqAUCpLqJ3DLpiPzdOQmH15gFA3dlpr6FO +eD/1OnJQRuABQHevTUvsGIs/RDHSLujSAUBEmj+ZEX6cP3TzkusruAFAqo84 +QKQwrT+aaRRls4IBQATEn7wHNK4/6nWuRBN/AUBf+AY5azevPx1/SCRzewFA +irDqGBmfsD85lHzjMnQBQD4ZuRHgpbI/6MzkYbJlAUCm6lUDbrO2Pz05tV6x +SAFAeI2P5onOvj8iHlZYrw4BQI5pgdZggsc/u9WXS6uaAEAN9Ew7rFHTPzz6 +IrRGhP8/4HTGNHaE2z+VJhHS6q79P+65TcJ3yOE/+ZLweiDi+z+mh6FgZInl +P/xbvHNWNPo/JfarE3ib6T+oCoNtQGL4P96yH707aO0/hBk2tyqv9j9Vl+CI +65DwP1Rh2oumBPU/nqWMvUyW8j9Kjnlh1jXzPwRbbe0FefQ/VhoFhwaG8T/O +YKmnUoT2P58cF1vVY+8/UolNxuyK9j9N5uKeBVjvP+LKai0= + "]], + LineBox[CompressedData[" +1:eJwBMQLO/SFib1JlAgAAACIAAAACAAAAluzKLpma9j/U86go+zvvPyaaIegH +TPo/Bs3ESoqg6D/6doT9q1P8P32ngk/e/uQ/6/obDqg4/j9BRRn0MpvhP6Bn +h9QbIwBAPoFLNd/d2z+QQcyMGSUBQCMVKa6ep9Q/Dm+rQsMVAkChxnDNvtrL +P75EuL22GgNAP5LMjMCHuj/9bV82Vg4EQI9wQ1Dwvma/AQfSmSv9BECrkb3i +lmq7vzZIcsJKAAZA2UalGfsxzL/63KzoFfIGQERcRCFU29S/RGzIkE32BkCq +adNvgvnUv4374ziF+gZAPIRivrAX1b8gGhuJ9AIHQIekgFsNVNW/R1eJKdMT +B0DEAr2VxszVv5TRZWqQNQdA5ZQ1Cjm+1r8uxh7sCnkHQH7MJvMdodi/eFU6 +lEJ9B0Dj6bVBTL/Yv8HkVTx6gQdAV/xEkHrd2L9UA42M6YkHQAYYYy3XGdm/ +e0D7LMiaB0CYcJ9nkJLZv8i6122FvAdAnA4Y3AKE2r8SSvMVvcAHQGQepyox +otq/XNkOvvTEB0A6KjZ5X8Dav+/3RQ5kzQdAkUNUFrz82r8WNbSuQt4HQFuj +kFB1ddu/YMTPVnriB0AftR+fo5Pbv6lT6/6x5gdAJsKu7dGx2788ciJPIe8H +QCPqzIou7tu/hgE+91jzB0BlB1zZXAzcv9CQWZ+Q9wdAkhHrJ4sq3L8aIHVH +yPsHQMonena5SNy/Y6+Q7///B0CfPwnF52bcv+idDsc= + "]]}, + Annotation[#, "Charting`Private`Tag$18476#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB0QIu/SFib1JlAgAAACwAAAACAAAAY6+Q7///B8AXMAsEyTIeQBT7GiY7 +/AfAR8X4aQAwHkDERqVcdvgHwLPz2M83LR5AJt65yezwB8BknXGbpiceQOoM +46PZ4QfAX4gHMoQcHkBwajVYs8MHwDRu4Vw/Bh5AfiXawGaHB8Cdly6qtdkd +QJqbI5LNDgfAxSpzKqKAHUCf34hvUQkGwPleWsZ+vxxAFtBTTykVBcCRILVB +KAscQMhQU0TLJQTA2CWvYFxaG0BIKSV0IyIDwKX4xHeWmhpAOq5cps8vAsAr +RZ3Mn+cZQPqKZhMyKQHAdXAM8bElGUD196SVXicAwKzz/pNTZxhAxCKSNL5t +/r9cp6iax7UXQDsFf7MrZPy/UUKpAEv1FkCUQDc3QX36vx5TIdijQRZAY5xY +5eqf+L9LupZLkpEVQM+nHgkBmva/nFiFtJrSFEAeDLAxv7b0v6pZmjF+IBRA +CiDmz+mq8r8yTJYyh18TQGxUhZioqPC/nL2BJDeiEkBgw9/LHpLtv/T4DwfL +8RFAIj3+UcWB6b9VNWEbnjIRQKlos+G7tuW/4uozgV+AEEBq87Fci5rhv+W1 +6OL4fg9ALn4FWQYj278WOIEz1wQOQBN51AuWm9O/pQBU3L6kDEDXZGwqr+PG +v/gQ9IvgJwtAd3oqjsmVrr/Yr7EnRMUJQKqPOECkMK0/aBpMab5qCECOaYHW +YILHP2+e3LtY9AZADfRMO6xR0z+K2E4CtZgFQOB0xjR2hNs/tiX9aEUiBEDu +uU3Cd8jhP1CX1Z2XtQJApoehYGSJ5T9lou/bq2QBQCX2qxN4m+k/em9AX0r3 +/z/esh+9O2jtP2HHcFpRX/0/VZfgiOuQ8D+AP1k399/6P56ljL1MlvI/wFtD +8Oo5+D8EW23tBXn0P4tocvX00vU/zmCpp1KE9j+7bMimBE/zP1KJTcbsivY/ +dSU+Wg9H8z97NlL7 + "]], + LineBox[CompressedData[" +1:eJwBMQLO/SFib1JlAgAAACIAAAACAAAAluzKLpma9j9EaGUoLzTzPyaaIegH +TPo/xKR9r/3i7T/6doT9q1P8P5Rq2IlJiek/6/obDqg4/j+sqLH6abHlP6Bn +h9QbIwBAQo+kLhTB4T+QQcyMGSUBQDlKyDk9Mdw/Dm+rQsMVAkAGmynhXLLV +P75EuL22GgNAx6G12UDszT/9bV82Vg4EQClk9ULT1cE/AQfSmSv9BED+0q1V +tXipPzZIcsJKAAZAr1GJuIfepr/63KzoFfIGQJ/6nHFtt8C/RGzIkE32BkD/ +vl9TAejAv4374ziF+gZAm69aypAYwb8gGhuJ9AIHQB2IEoaiecG/R1eJKdMT +B0Cyj4uWkTvCv5TRZWqQNQdAqpOgIaG+w78uxh7sCnkHQALDB3Kdwca/eFU6 +lEJ9B0C6QImVqvHGv8HkVTx6gQdARmNMubMhx79UA42M6YkHQLQuNQ66gce/ +e0D7LMiaB0AveERFl0HIv8i6122FvAdA9LHfnJbAyb8SSvMVvcAHQC5yNzll +8Mm/XNkOvvTEB0BBDAcHMCDKv+/3RQ5kzQdA5iX8Qrp/yr8WNbSuQt4HQBC4 +LY+hPsu/YMTPVnriB0BW6UYKUm7Lv6lT6/6x5gdAuvdvzv6dy788ciJPIe8H +QOSuiz1N/cu/hgE+91jzB0A04kTu7izMv9CQWZ+Q9wdAekib84xczL8aIHVH +yPsHQEp+a1AnjMy/Y6+Q7///B0Di8o8HvrvMv3mWD5M= + "]]}, + Annotation[#, + "Charting`Private`Tag$18476#4"]& ], {}}, {{}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}, {}}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {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}, {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}, { + 0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}}}, CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + + FilledCurveBox[{{{1, 4, 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}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + + FilledCurveBox[{{{1, 4, 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}, {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}, {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, 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}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {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, 3, 3}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, { + Thickness[0.034013605442176874`]}, StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-1.73463955148056, 7.549594939406254}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox["", TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )], + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8DPre4tjuMYQBT7GiY7 +/AfA8Ir1/ArhGEDERqVcdvgHwBBo/MuH3hhAJt65yezwB8BRIgpqgdkYQOoM +46PZ4QfA1JYlpnTPGEBwajVYs8MHwNh/XB5buxhAfiXawGaHB8DhUcoOKJMY +QJqbI5LNDgfA9PWl78FCGECf34hvUQkGwKJ46S1vlBdAFtBTTykVBcBGbhvD +qfEWQMhQU0TLJQTAEsTFuxVSFkBIKSV0IyIDwGhU/DD7pBVAOq5cps8vAsC0 +VyH9bQMVQPqKZhMyKQHAiZXSRVpUFED196SVXicAwIYz/PF3qBNAxCKSNL5t +/r95RBT1IggTQDsFf7MrZPy/9o+4dEdaEkCUQDc3QX36v2pOS0v5txFAY5xY +5eqf+L8EbVaF3BgRQM+nHgkBmva/KMbtOzlsEEAeDLAxv7b0v4Qk55JGlg9A +CiDmz+mq8r/MMQunDTkOQGxUhZioqPC/Y/8fgjfiDEBgw9/LHpLtv+ayEQt8 +ogtAIj3+UcWB6b982xuNs0cKQKlos+G7tuW//ukCvQUECUBq87Fci5rhv5Rt +AuZKpQdALn4FWQYj2794sfLV8kwGQBN51AuWm9O/Sdu/c7ULBUDXZGwqr+PG +vy16pQprrwNAd3oqjsmVrr/+/mdPO2oCQKqPOECkMK0/HkQbW24rAUCOaYHW +YILHP6D8zb8oo/8/DfRMO6xR0z/ePB8lqh39P+B0xjR2hNs/QmehfBFi+j/u +uU3Cd8jhP0QSBWI+s/c/poehYGSJ5T8fiSKjoDL1PyX2qxN4m+k/IOpw1uh7 +8j/esh+9O2jtP/Qt8srM5u8/VZfgiOuQ8D/kiMUEU+/qP56ljL1MlvI/Irj6 +IqWL5T8EW23tBXn0PxJ/o/hhhOA/zmCpp1KE9j+cNFxl1SHWP7UNGl33bPg/ +8DSxkHjnxz8mmiHoB0z6P4AssC2Wi58/+naE/atT/D+g2L1zY7XBv+v6Gw6o +OP4/AKyxZ0f10r+gZ4fUGyMAQBjDwExF6N2/kEHMjBklAUDg6yR9FlTkvw5v +q0LDFQJAgN51nJ9X6b++RLi9thoDQNT8ZNdcx+6//W1fNlYOBEC+QXCtV+3x +vwEH0pkr/QRAcoRMYTtq9L82SHLCSgAGQADd9yI5Hfe/+tys6BXyBkC0aemI +AaL5v0RsyJBN9gZAJD2InkCt+b+N++M4hfoGQJIQJ7R/uPm/IBobifQCB0Bw +t2Tf/c75v0dXiSnTEwdALAXgNfr7+b+U0WVqkDUHQKSg1uLyVfq/LsYe7Ap5 +B0CU18M85An7v3hVOpRCfQdABKtiUiMV+7/B5FU8eoEHQHJ+AWhiIPu/VAON +jOmJB0BQJT+T4Db7v3tA+yzImgdADHO66dxj+7/IutdthbwHQIQOsZbVvfu/ +EkrzFb3AB0D04U+sFMn7v1zZDr70xAdAZLXuwVPU+7/v90UOZM0HQEJcLO3R +6vu/FjW0rkLeB0AAqqdDzhf8v2DEz1Z64gdAcH1GWQ0j/L+pU+v+seYHQNxQ +5W5MLvy/PHIiTyHvB0C69yKaykT8v4YBPvdY8wdAKsvBrwlQ/L/QkFmfkPcH +QJqeYMVIW/y/GiB1R8j7B0AKcv/ah2b8v2OvkO///wdAeEWe8MZx/L9o72Tw + + "]]}, Annotation[#, "Charting`Private`Tag$17567#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8DyTUDcOI4TQBT7GiY7 +/AfAB4zvEIyME0DERqVcdvgHwBzKnkXfihNAJt65yezwB8BIRv2uhYcTQOoM +46PZ4QfAnz66gdKAE0BwajVYs8MHwEwvNCdscxNAfiXawGaHB8CoEChyn1gT +QJqbI5LNDgfAYNMPCAYjE0Cf34hvUQkGwCjVPNzOrhJAFtBTTykVBcDseLM/ +S0ISQMhQU0TLJQTAdAclkOjXEUBIKSV0IyIDwFgS9IiBZBFAOq5cps8vAsA1 +vwwRzvgQQPqKZhMyKQHAbuiCQRaEEED196SVXicAwGz8815/ERBAxCKSNL5t +/r/GZF0XOE0PQDsFf7MrZPy/bcmNwWhlDkCUQDc3QX36vwZyUYoAjQ1AY5xY +5eqf+L8q8Aot2rgMQM+nHgkBmva/BGd/IKvSC0AeDLAxv7b0v9IhhzLj+wpA +CiDmz+mq8r9Y1UmVEhMKQGxUhZioqPC/Z14C0oMuCUBgw9/LHpLtv2krTi1c +WQhAIj3+UcWB6b8i8VTZK3IHQKlos+G7tuW/z/ruo2KaBkBq87Fci5rhvzP9 +Q7+QsAVALn4FWQYj278g1Y60AMsEQBN51AuWm9O/AfFsyNf0A0DXZGwqr+PG +v5kFBi2mDANAd3oqjsmVrr8kXjKw2zMCQKqPOECkMK0/OYxUDVNfAUCOaYHW +YILHPwazMbvBeABADfRMO6xR0z+KO0QPL0P/P+B0xjR2hNs/eAKbSclw/T/u +uU3Cd8jhP3l03Tfnpvs/poehYGSJ5T9gbkZj0/v5PyX2qxN4m+k/tlklMK4s ++D/esh+9O2jtP/LMKjpXfPY/VZfgiOuQ8D9D6xv4g9T0P56ljL1MlvI/AvuC +V58I8z8EW23tBXn0P6iSEPSIW/E/zmCpp1KE9j94NyhkwhTvP7UNGl33bPg/ +bFl8Wg+w6z8mmiHoB0z6P4bRp7hjXOg/+naE/atT/D+ALL9ZlcDkP+v6Gw6o +OP4/RpcjdWNi4T+gZ4fUGyMAQNDJ56YdeNs/kEHMjBklAUBcETczg03UPw5v +q0LDFQJAEPFAaEM8yz++RLi9thoDQMCVhuvqebk//W1fNlYOBEAAhsNw0nx5 +vwEH0pkr/QRAQFXk+kkhvL82SHLCSgAGQJCtrlvudcy/+tys6BXyBkCoeFvo +YvLUv0RsyJBN9gZAKFdYd2AQ1b+N++M4hfoGQKg1VQZeLtW/IBobifQCB0Cg +8k4kWWrVv0dXiSnTEwdAmGxCYE/i1b+U0WVqkDUHQIBgKdg70ta/LsYe7Ap5 +B0BYSPfHFLLYv3hVOpRCfQdA2Cb0VhLQ2L/B5FU8eoEHQFAF8eUP7ti/VAON +jOmJB0BIwuoDCyrZv3tA+yzImgdAQDzePwGi2b/IutdthbwHQCgwxbftkdq/ +EkrzFb3AB0CoDsJG66/av1zZDr70xAdAKO2+1ejN2r/v90UOZM0HQCCquPPj +Cdu/FjW0rkLeB0AgJKwv2oHbv2DEz1Z64gdAoAKpvtef27+pU+v+seYHQBjh +pU3Vvdu/PHIiTyHvB0AQnp9r0Pnbv4YBPvdY8wdAkHyc+s0X3L/QkFmfkPcH +QBBbmYnLNdy/GiB1R8j7B0CQOZYYyVPcv2OvkO///wdACBiTp8Zx3L80Dk2o + + "]]}, Annotation[#, "Charting`Private`Tag$17567#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8CZamO3ddMJQBT7GiY7 +/AfAMCzmLCLRCUDERqVcdvgHwA57qqDOzglAJt65yezwB8DqvvWCJ8oJQOoM +46PZ4QfAeciIMtnACUBwajVYs8MHwGeMLz08rglAfiXawGaHB8C89Or8AIkJ +QJqbI5LNDgfA3XvLCIU+CUCf34hvUQkGwOm3+zjrnAhAFtBTTykVBcBPcmh7 +5AUIQMhQU0TLJQTAHM7DOrFxB0BIKSV0IyIDwPIC8vjD0AZAOq5cps8vAsB7 +Ey3VaDoGQPqKZhMyKQHAHtMvw0OXBUD196SVXicAwCCL/obf9gRAxCKSNL5t +/r82NL1AC2EEQDsFf7MrZPy/hzusllC+A0CUQDc3QX36v2VdWhYhJgNAY5xY +5eqf+L8e74jRqJACQM+nHgkBmva/1AEetSPuAUAeDLAxv7b0vyX3mdYiVgFA +CiDmz+mq8r+qD17z7rAAQGxUhZioqPC/vj09ukEOAEBgw9/LHpLtv7C+SrgX +7P4/Ij3+UcWB6b8Civ9SsaD9P6los+G7tuW/pAyqkRJq/D9q87Fci5rhvwCd +U4/gF/s/Ln4FWQYj27+f8+kx98n5PxN51AuWm9O/XasQ4YeQ+D/XZGwqr+PG +v36EF9JEOvc/d3oqjsmVrr+kPXrtDvj1P6qPOECkMK0/BmoaJEa59D+OaYHW +YILHP3uxs/2gW/M/DfRMO6xR0z+vu14xHxHyP+B0xjR2hNs/z8hgnG2l8D/u +uU3Cd8jhPwpS+QFxc+4/poehYGSJ5T8uzvkmq77rPyX2qxN4m+k/VI2Ad5C8 +6D/esh+9O2jtP+h9BAZm2OU/VZfgiOuQ8D+cmwDm2OriP56ljL1MlvI/YGj7 +6Oo63z8EW23tBXn0P6DIl2Fhytg/zmCpp1KE9j+0yAKTE3XRP7UNGl33bPg/ +0Lh/8Yd4xD8mmiHoB0z6PwC8qJKhK6Y/+naE/atT/D+guZr5cRq3v+v6Gw6o +OP4/cP2xMBFbzL+gZ4fUGyMAQNi5nBwQute/kEHMjBklAUB4rwkgycHgvw5v +q0LDFQJAVF7Dlh985b++RLi9thoDQPRgDcKuw+q//W1fNlYOBECEDNhZrNDv +vwEH0pkr/QRACO0ATlxu8r82SHLCSgAGQMhxpg2tNvW/+tys6BXyBkCq2EDR +Q9j3v0RsyJBN9gZA9PrMtxTk97+N++M4hfoGQGawCizm7/e/IBobifQCB0AC +G9e7igf4v0dXiSnTEwdAXmBvbNo2+L+U0WVqkDUHQJILubCTlfi/LsYe7Ap5 +B0Bo/CrSalP5v3hVOpRCfQdAoiA7m0xf+b/B5FU8eoEHQECOleQua/m/VAON +jOmJB0BgnZT29IL5v3tA+yzImgdA6HK+DIey+b/IutdthbwHQMjd+arCEfq/ +EkrzFb3AB0AyEvpJrB36v1zZDr70xAdAytkZY5Yp+r/v90UOZM0HQJ5LOQJs +Qfq/FjW0rkLeB0CWXpLpHHH6v2DEz1Z64gdA5HonTwp9+r+pU+v+seYHQJoN +5yv4iPq/PHIiTyHvB0BmPHFJ1aD6v4YBPvdY8wdAHnqCicSs+r/QkFmfkPcH +QPZwSz+0uPq/GiB1R8j7B0ASP3BqpMT6v2OvkO///wdALlSVCpXQ+r/UQmug + + "]]}, Annotation[#, "Charting`Private`Tag$17567#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8AOyeIaXkAeQBT7GiY7 +/AfADlNmWIs9HkDERqVcdvgHwGwWyZa4Oh5AJt65yezwB8AYSi0WEzUeQOoM +46PZ4QfAiHB3H8gpHkBwajVYs8MHwPpkS1wyEx5AfiXawGaHB8CkXbyAB+Yd +QJqbI5LNDgfAvnNpg7SLHUCf34hvUQkGwJJzvKHpxxxAFtBTTykVBcAWxdiG +KREcQMhQU0TLJQTApvTSmRBeG0BIKSV0IyIDwDoilNLemxpAOq5cps8vAsDQ +cjZMuOYZQPqKZhMyKQHAYlYl4oAiGUD196SVXicAwIVsg/n5YRhAxCKSNL5t +/r/6GtFlf64XQDsFf7MrZPy/2wQ3KQLsFkCUQDc3QX36v1HypKeTNhZAY5xY +5eqf+L+Z1qd02oQVQM+nHgkBmva/6uSn0jHEFEAeDLAxv7b0v8wSnGGbEBRA +CiDmz+mq8r+cmRyYKE4TQGxUhZioqPC/ZMTkZYOPEkBgw9/LHpLtv0QGENb2 +3RFAIj3+UcWB6b+mkLIVsx0RQKlos+G7tuW/ED4/vJFqEEBq87Fci5rhvyYl +ebC+UQ9ALn4FWQYj27+MyKduV9YNQBN51AuWm9O/Gl1dxlt1DEDXZGwqr+PG +vwi2g0fe9wpAd3oqjsmVrr+sQEvTApUJQKqPOECkMK0/Mm8eqpI6CECOaYHW +YILHPz7l1fmkxAZADfRMO6xR0z+km1M8zmkFQOB0xjR2hNs/paWGraP0A0Du +uU3Cd8jhP5ojl7qciQJApoehYGSJ5T9alIRQlToBQCX2qxN4m+k/1JLiy+6n +/z/esh+9O2jtP6ynWxcMFf0/VZfgiOuQ8D/4YG1rHpv6P56ljL1MlvI/9EYA +fUT79z8EW23tBXn0P5zkSHcsmvU/zmCpp1KE9j9vhB8YbhzzP7UNGl33bPg/ +y+J/a+Hg8D8mmiHoB0z6P5jkffYwku0/+naE/atT/D9i2Ke0kEHpP+v6Gw6o +OP4/RJippgBx5T+gZ4fUGyMAQMxhV3ePh+E/kEHMjBklAUCQLJD0RcrbPw5v +q0LDFQJA+FvnwtxV1T++RLi9thoDQMi2y5oOSc0//W1fNlYOBEDwdL1ep0bB +PwEH0pkr/QRAAExGW2GKpz82SHLCSgAGQAA4IFp0d6i/+tys6BXyBkBwgkhn +mAnBv0RsyJBN9gZA4FWlYNI5wb+N++M4hfoGQNCPdewHasG/IBobifQCB0AQ +Bo7JZcrBv0dXiSnTEwdAsHHD++yKwr+U0WVqkDUHQPBEZUcsC8S/LsYe7Ap5 +B0AAGLQXhgjHv3hVOpRCfQdA8Nvw/Dg4x7/B5FU8eoEHQIBU29/nZ8e/VAON +jOmJB0Cgpl6rOcfHv3tA+yzImgdAAJEHsa2FyL/IutdthbwHQOBmGy3aAcq/ +EkrzFb3AB0AwqddiTjHKv1zZDr70xAdAEFKXx75gyr/v90UOZM0HQLCOFyqU +v8q/FjW0rkLeB0BwjUamEX3Lv2DEz1Z64gdAoJBbp2esy7+pU+v+seYHQHDg +HO+528u/PHIiTyHvB0BQNUdeUzrMv4YBPvdY8wdAMC17i5ppzL/QkFmfkPcH +QBBc8QremMy/GiB1R8j7B0Dw0IjfHcjMv2OvkO///wdAkA0eDFr3zL+WZFHh + + "]]}, Annotation[#, "Charting`Private`Tag$17567#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {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}, {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}, { + 0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}}}, CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + + FilledCurveBox[{{{1, 4, 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}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + + FilledCurveBox[{{{1, 4, 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}, {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}, {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, 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}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {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, 3, 3}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, { + Thickness[0.034013605442176874`]}, StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-1.7777776145124715`, 7.562858982173806}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox["", TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )], + TemplateBox[{ + GraphicsBox[{{{}, {}, + TagBox[{ + RGBColor[0.9, 0.36, 0.054], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8D4zufqq5gJQBT7GiY7 +/AfAMo5dbl2WCUDERqVcdvgHwIe1I/AOlAlAJt65yezwB8ChTZ/ucY8JQOoM +46PZ4QfA8g1G1zeGCUBwajVYs8MHwEOV5FbDcwlAfiXawGaHB8DjHfIL2U4J +QJqbI5LNDgfARNsRMf8ECUCf34hvUQkGwB70/LjFZAhAFtBTTykVBcCMCQ4j +Cc8HQMhQU0TLJQTAOJOzvxo8B0BIKSV0IyIDwI5qBFePnAZAOq5cps8vAsBz +bwrsfwcGQPqKZhMyKQHATCUMIcRlBUD196SVXicAwO9kIJLExgRAxCKSNL5t +/r9RfHP2PjIEQDsFf7MrZPy/jDHWkPGQA0CUQDc3QX36v3bw1oYZ+gJAY5xY +5eqf+L9+5MmH9GUCQM+nHgkBmva/yvb+u+LEAUAeDLAxv7b0v73EurA/LgFA +CiDmz+mq8r+Ll34di4oAQGxUhZioqPC/KU0px7XS/z9gw9/LHpLtv/zuMiga +pf4/Ij3+UcWB6b/DcsiCzFz9P6los+G7tuW/Xe3FJR4p/D9q87Fci5rhvya2 +nOMq2vo/Ln4FWQYj279bmPcEg4/5PxN51AuWm9O/c6WDeS9Z+D/XZGwqr+PG +v2pG8MRhBvc/d3oqjsmVrr/qeqxnfsf1P6qPOECkMK0/VOowaxCM9D+OaYHW +YILHP7zHhWgtMvM/DfRMO6xR0z8SU2VWS+vxP+B0xjR2hNs/jjrkK6aD8D/u +uU3Cd8jhP9no5HMCOO4/poehYGSJ5T8ijkmuz4rrPyX2qxN4m+k/RW7kbn2Q +6D/esh+9O2jtP7sopqJKsuU/VZfgiOuQ8D8lgj06esfiP56ljL1MlvI/jstJ +Kt7o3j8EW23tBXn0PylonIo5Rdg/zmCpp1KE9j+G1d4UkkjQP7UNGl33bPg/ +UVHEXfTXvj8mmiHoB0z6PyE+QqkAIJq/+naE/atT/D/ydD1XCaTIv+v6Gw6o +OP4/SRkq/fWK1r+gZ4fUGyMAQNRbExnR4uC/kEHMjBklAUBgmq1OkHPmvw5v +q0LDFQJAcz3/AVuu67++RLi9thoDQE673BOnsfC//W1fNlYOBEDcekGUoF/z +vwEH0pkr/QRAZdZn2qMD9r82SHLCSgAGQD3JI3PR5Pi/+tys6BXyBkAWZG5q +CZj7v0RsyJBN9gZA6Jrr6R6k+7+N++M4hfoGQFU8XqY0sPu/IBobifQCB0D5 +wOvVYMj7v0dXiSnTEwdAFaYfDrz4+7+U0WVqkDUHQAGmqdZ9Wfy/LsYe7Ap5 +B0B7hy1mLhv9v3hVOpRCfQdAlrgyaUsn/b/B5FU8eoEHQITEbKdoM/2/VAON +jOmJB0DkO0fVo0v9v3tA+yzImgdA8GsM9Rx8/b/IutdthbwHQGvGizga3f2/ +EkrzFb3AB0DteEjoOun9v1zZDr70xAdATB5Z0lv1/b/v90UOZM0HQIX0PVWe +Df6/FjW0rkLeB0B4pIsUJj7+v2DEz1Z64gdAt75dlUhK/r+pU+v+seYHQH0k +E1BrVv6/PHIiTyHvB0CAfu9ysW7+v4YBPvdY8wdAJT762tR6/r/QkFmfkPcH +QGfrr3z4hv6/GiB1R8j7B0BvagJYHJP+v2OvkO///wdAoqXjbECf/r9FeGoE + + "]]}, Annotation[#, "Charting`Private`Tag$18022#1"]& ], + TagBox[{ + RGBColor[0.365248, 0.427802, 0.758297], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwtlXs4lHkfh+d5MA9iHCYq7cphp4N0fBWl/L6FEtlCJm3ULFKU5Q2RwnY2 +DjXbQUUlHUTO642l+E4ZlpA21KolmlAoijGTw/T2Xtf7x+e6/7v/uq/rY+ob +4r6LZrFYYd/2P/oViAa/fmXE94fUj27fy4Wp40azbScYsbJBGVAUyAXJutve +BxSM2ODuiAuzhwuzO8rqBoYYcaBvp0GxPxf6tKQ327oY8e7m0mzNHVwIDVrm +VVzFiG1LAv4q28yFWN5LccApRsw7LDGZvpwLqWnmZxs5jDiR/Su2sLiQ/jo+ +xE2DLWadSzL2StYHw6cem+YZqIkTNkHhUVN9qN3s4VDPUxWPK4nkcakeOM3j +hZubqYh381q/fOeoByvzvTObFtFi10N6voYvdWEsIYC7dB4lbnWS9s8I0AWZ +/NaFHXNY4hhdeijinQ5IzM5aVQYr0XkwMZg9VQds1eKK5/tPIB9hYc4CDpwH +a+s1MWOY0m+/5RpfG/yueHX3pSswcKIjtuGYFjTdMdagUkfxxuStAU76FDDW +KlyCJSMo9SnD9DpN0DTpaXp/9zPOy1O0OrzRgH1bTlzKyhrCu2+ahn74qg6C +qtf1xmc/oHqELNRjvjqYrVa6VR95j6HDjlYpjgxk7ynuul/SjZov33rPCWFD +0HCRd2JqF0qy8msbTqrBwli1bWzzV6gp0F2Rd0MVuAdbpqSkNaP+v8WcfxpV +4IX/PosCaQ02R6fNmdVLQ2X7ZuuSzBqMMzof/FBKQyZ/mUNFYA2GVScV+3XS +EO6k9KkfrMbH02JJVhsNupai33rHJehyQ7B1SQMNG4aLFbOmVuHXRt4p+yIa +IlTkyabCSnSyLOzZfYgGBxneWaRTia0NWZaaUTTo98Y/XH2hAhfvz9ifG05D +/mMj2baMBxhWflY5FExDz2923mfLylHbM8IwWkCDl8lJC5W+ErwvXLkuyZGG +yGiL03UX8nGwXXK7UIeGHz8OPS/IzMNTPU0v/LRomO1bOiulNBdd3r3UmKZB +Q+sGhyLftrv4x5eh4Biahn/N2NEy/t0dbGG+X+4so6AjxHyZt1M6JvIiaqQv +KUjeWlgzN+gqVln8qkh5QcEqstpLlpiGKasSLZxbKEjlbD10uukimmzKOF3Y +SAE/L+GhmC9CZ/9GfoyYAk2LRZlGn5LwYtzf8YsrKNjzxamu2EqIIT9Jy6Vl +FJhfOqzTc/8Iqod9MXYupoBustylVB7C5EBVt8kCCiqCBTmLT4ZjRpvOscJc +Cj5NnyutNgpCvZUz7/llU/A01/j1Fnc+Pq2f02uYSYHqzy4m8fZ2xL9a/Zrg +BgXZC29EapX7koSdV4zDrlLQ3hZYkPFjFGnxDOdcOkdBZIGry8D0RHJEpTqr +K44Ch1RyWS/2Clkw8awmzIuCu2ds4NbiPBL7Jff6OY1vfkn6A8YqnziI1rqv +VKVgp4K9Yq91AXnl83aiU8mChMK+6TPSC0mh4frVC0dYYDejTK/z9u9kQOYb +VNvBgsw+T5VfikuIW2ld+HgxC6KSz/QIn1QS9nm3Nd47WHA68MhzwdE/ye6c +1o+6AV+J9shG21y3ZtIaHZr0sXuCdIbXWB04/orImB/0yKIx8rHM9VFkbRdR +CyuP9DkuJ5mnMgT+wm5y/Zjp7Eq2jPBGc7hRae9J3LVHVXXun0nH77MqbPd8 +IOzbnf7tlweJ58XO+H7REOk/GXH1VXYfuXY7qWJjymcSf9MjdRO/m6huD/6g +dnCEmBWoXLXZ30meCLLvuB8fJfxbfhWC8ufknraRj3yfgmgMX+DYy+vJ7FTT +d8zGMTL9Qb1hk7SUjB04PpnjMUH0b9od+/T8FvaPzeRk2SjJFMub1vdPV+P1 +3adaZpqz4B5O/FLb34yiNQ1JM3gU5Ln2v927tB05ITlrqwy+dRz//IxAS4qV +Dn9UlBipgDC0qY9M9uJk8M7lfI4qXBFqX7UuGkCKeXZ5/qQqbHdi2iMLhnC5 +0/5Hziw2NKivaHgDwzj2T+47g89sGGGHt3zIkaHDvlqR6ygb0pwdeZISGSaP +S21OjLGBP7zgz9SHMjQxmikcoRkY1yqbcHohw/VbhfOauQysNpOZZ9OjeP6v +XUGiZQzol1lzoraN4sIa4wHNgww8dVdDV0aOUZ4rz6+NYYAX9/fBBfpyfPjW +c1X0EQYWiAyitb+X4xaV5KT3QgZse0M2PFkqx0MwblmbykDlTgsjjx1yrC1/ +EXziAQPdF1grAu/JUd952KBCzEBotJWZq1iO3m2cyhEJAyyb4y5L6uU4KHfk ++DcyEHBxkc9YpxwNl/0nf20HA1Oan4Wd0VKgQNLEj37DQNcslmfENAVme/Qr +i3oYcE9+FLbdTIGr9pttMh1k4GJq3Z65Ngo8SdnJvYYZSIkJtdOxV+BT0bZ0 +kZwBT0Xo5lFXBRqZRKyvHWdAOHb4WruXAv//j+BSsW5utZ8C/wvStXpl + "]]}, + Annotation[#, "Charting`Private`Tag$18022#2"]& ], + TagBox[{ + RGBColor[0.945109, 0.593901, 0.], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwtlXs41Pkex+c3mF87LpGGMZ0lHHKJVYiwvh+XXVbJipClrFVJZHNaxEiW +iEFzOlYtYWsbl8Z1lctG30njMlRsUhiN5LIuJUoMotN5nvPH+3n/8Xrer3/f +2sGR+49QKRRK6Kf8r3+o4r75+JEUKEbxmm8lMWHzKkvf9gMpeP91uZtDIhOE +X/MCoqWkwOXN9mcP2UzQlzSKXs2RgmOO+bMTMUyYVhj9fWCEFMSGGahrnGTC +j2GWfrX3SUHb35P7EvyZcFZvUHA0jRR4lmr7fWXOhLx83UsPlUjBxRq3zt4x +dSgavhDp+RlNoO1kX1Jnow5qPV4ehgw5gWK8VXBfvhp0fOvl3KUnKwji50yT +FDVwNdQ7rasjI3CYPixZ9mGATWVAcfcXVMEDX/7KtsbNsJJxVHWnISFwvEHl +qChthvdLN345tI0iUG45WEE/qgpCnUsWdyPWsRQTdiDaBLZyibXGIR+waK23 +3khrE+SAlZVDwgo2u9ht5nlOBX646jc+XSTFumynw6ljytBdovkZkbeI1e12 +JobaKoOmQvUOXLeAdz8rdFe03Qj0rRPdUzff4u0ppdM5Y4oQ7n3+SmnpHNa6 +9S9smKMAQfeHuzQvvca3hZLkXf7yoPPlumdr0hQuDFw1iZajQ1lo7cidunGs +wLnEMW7fAGHvagI4eSP4Z06SdC2CBNOzcgdpumLsVeHkKWLRQPXME/nc/F6c +oHmcTpfIwrOQcKOq0TbcqN9r6ZwqAzFxRtmiXypxomNSyrwzFfbNzj2tKq7A +DacGBbJABf3geq3c+nLc35q7pG5Lhb5vnGuCB25iLt/c234HFcw1Dj1Z/UcJ +jpsSizI+p4IkUtcywLUIx3zfzdNZJCDLt7rNIKwAD2xrTbOcJ8AOfen3npOP +DRn0ENdXBOQp+cZnd1/GVhK2/MmXBPhUZNwT+HBxZuEYo/ERAXSjL4pZ85lY +22dnZ5eIgNBlV1GtRTqe02qLlQgJ0L3C3jhxJwl7dzYIZe4QQO3efmR9PR6r +cBnBanUENEcE8c1ST+PnNrXLBjUEzDMNRltZYTiXx+XYlhPQU6457L3fB2dn +89X3lRAg+/2erRec7FH9ERONzusElJlej1H4MxjVJdvsSSgi4PnA8apr+2KR +W4tn1egVAmKq3Pe8YnLQZUlCTDWHAOc89KvK2aso6WEf6XaKgJsXreGGWQWi +qKcaJNh98guLmkiLSpTWU8CftCbgsJS2+4RVFSph3zb1tiQgo3qaqVFUjfyH +xiyMTQmw12hUecH7Ay1fd3IY0CKgePqAzMnaOpSiT/hbyhAQm3VxIv3RXdRo +zea8FlEg+3jS06Cf21FmQNRsoC8FFBf22pZ79qLfBg+as2Q+ohen2yyiU8Qo +dPSfytfM19Bso3tLTMcIar+ltVgQvoqK064FhaSPo1TX+mIr4TLSW+SrxuZP +oY0NN54vLy0hyR9azbahr1HvhOmwn9siOnD5xYUZ7hy6J5mcMuEtoEJeZvPe +3LdIr04aZzz0Fsl+F/Fa7swCSnThPW3dMY8eBZWV7E9ZRGXRHqdU2mfRbUVW +4FK4FFX2Z3X2HJtB+nnak+TeFSTuNt7F1phEK9Epa3yvD+jRuZ8qY5PH0MzK +FqVS63U0UyK9U2k0gn47lvZkiy4FPEw8yk9sFiOuw4NMDT0Czu4Ml9v/vhcp +RfId7zOoUK0mVfG91onuOjc017FkwHUu6/LVqAa0FnF4l4+SLBh2OPg5FiRj +gnz8q/GaLNykX8/LfNyEd7lGtbhRaOC9IdLxdP0DvDJUPsl4SwNahtd84IY+ +7BzewXVfpMFfXU0Bxvp9OGt11Pr8Cg3+rarfIXXqw1tZW9IXqCSY8aSF/0ns +wy6+6Ya9qiR8c69gr2ixD+f8dSSMa0lCxurfJRbjT7Fpm+Yr+hkS4k+xD8m3 +9OPYAzY5jgkktDePi/qH+/G9sQN2cUkknCA8LIvX+rG3TFbmVDoJQ1naCg67 +B3A8rG7vyCNhvbKtMbp6AHf8+SzifBMJx0aUGS8LB/Emt3eMZgEJ8tpx56qa +BnHAgNLdBSEJuSGjM+zBQfxm6SulkIcknJ+63aKuJsZqlrcqHSWfOOO7H92z +xDhI2O0T95KEGX+hmMUX4zKvmfWaCRJqfzdxmewQY7soHQ/tN5/21hTNZNkh +nErYL/m9I0GOfTz9W50h3MM9WMRdIkEZP174HIYwa+tPLh2rJGyh2QXNBA7h +//8NlLnzuhrih/B/AcGSG3M= + "]]}, + Annotation[#, "Charting`Private`Tag$18022#3"]& ], + TagBox[{ + RGBColor[0.645957, 0.253192, 0.685109], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8DhJMRyGkceQBT7GiY7 +/AfA+ybc+z9EHkDERqVcdvgHwCchUoZlQR5AJt65yezwB8BhcFmfsDseQOoM +46PZ4QfAY8Tf4UYwHkBwajVYs8MHwHq6HalzGR5AfiXawGaHB8AnpPlCzusd +QJqbI5LNDgfAwJp3uYeQHUCf34hvUQkGwMPPPRC0yhxAFtBTTykVBcDE/HAr +FxIcQMhQU0TLJQTAFTy6QjRdG0BIKSV0IyIDwCpdgfIcmRpAOq5cps8vAsCG +VXOOPOIZQPqKZhMyKQHAdC2dZzMcGUD196SVXicAwFc1gnPxWRhAxCKSNL5t +/r9qjfws56QXQDsFf7MrZPy/FWyGX8jgFkCUQDc3QX36v5+QnfrjKRZAY5xY +5eqf+L9RhIc9zHYVQM+nHgkBmva/diyXdrq0FEAeDLAxv7b0v4SjOlvm/xNA +CiDmz+mq8r8rCDTeMTwTQGxUhZioqPC/DNJne2l8EkBgw9/LHpLtv73oGf/k +yRFAIj3+UcWB6b892dESsAgRQKlos+G7tuW/gh04jslUEEBq87Fci5rhv016 ++3jEJA9ALn4FWQYj27/QEnr9QKgNQBN51AuWm9O/cwQIH4BGDEDXZGwqr+PG +v8k4ZOV7yApAd3oqjsmVrr/cyd+DcWUJQKqPOECkMK0/90QCaiELCECOaYHW +YILHP61+LRuylQZADfRMO6xR0z9LCw+DqjsFQOB0xjR2hNs/5b4XBsTHA0Du +uU3Cd8jhP5nkb0FgXgJApoehYGSJ5T9B41i4NxEBQCX2qxN4m+k/wPg0MfVZ +/z/esh+9O2jtP8yXLjUWzPw/VZfgiOuQ8D8mwLFkf1f6P56ljL1MlvI/R59u +Fb299z8EW23tBXn0PyMJuCZoYvU/zmCpp1KE9j8CygyTvuryP7UNGl33bPg/ +GUfBXYC08D8mmiHoB0z6PyMcGb/WQu0/+naE/atT/D9gboCmJvvoP+v6Gw6o +OP4/y5D8PMwx5T+gZ4fUGyMAQNexHgMpT+E/kEHMjBklAUAxPMGXZGXbPw5v +q0LDFQJA7gThIVH71D++RLi9thoDQCmqNkCAqcw//W1fNlYOBECOp7B24brA +PwEH0pkr/QRAMh0we7uopT82SHLCSgAGQOdNvNqnBKq/+tys6BXyBkACa7ee +DFnBv0RsyJBN9gZAqUvlpO2Iwb+N++M4hfoGQIyirDrKuMG/IBobifQCB0CU +/CojdhjCv0dXiSnTEwdARdExSpnXwr+U0WVqkDUHQFNm2vgPVcS/LsYe7Ap5 +B0AfH2mA1kzHv3hVOpRCfQdAINNHGjB8x7/B5FU8eoEHQPmbMK+Fq8e/VAON +jOmJB0DPfs3WJArIv3tA+yzImgdAO9hWdTPHyL/IutdthbwHQOStt6eUQMq/ +EkrzFb3AB0CwrdRor2/Kv1zZDr70xAdAQEdzVsaeyr/v90UOZM0HQF8ANcPo +/Mq/FjW0rkLeB0CmKjQ2ALnLv2DEz1Z64gdAuJ/arvzny7+pU+v+seYHQHms +vWv1Fsy/PHIiTyHvB0AluOW923TMv4YBPvdY8wdAHlT6WMmjzL/QkFmfkPcH +QKTF6kOz0sy/GiB1R8j7B0BvZZiBmQHNv2OvkO///wdAAR/iFHwwzb97y09a + + "]]}, Annotation[#, "Charting`Private`Tag$18022#4"]& ]}, {}}, + AspectRatio -> 1, Axes -> {False, False}, AxesLabel -> {None, None}, + AxesOrigin -> {0, 0}, DisplayFunction -> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {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}, {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}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, { + 0, 1, 0}}}, CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + + FilledCurveBox[{{{1, 4, 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}, {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}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + + FilledCurveBox[{{{1, 4, 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}, { + 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}, {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, 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}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 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, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, {{ + Thickness[0.034013605442176874`]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, {{ + Thickness[0.10504201680672269`]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImagePadding -> All, + LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-1.9138798001753021`, 7.569436829778369}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}], + FormBox["", TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]}]], "Input", + CellChangeTimes->{{3.8018029977334557`*^9, 3.8018030401292133`*^9}, { + 3.8018032379661913`*^9, 3.801803239024744*^9}, {3.8018162835480623`*^9, + 3.8018162850297813`*^9}},ExpressionUUID->"5ebf123a-9b73-45fd-9416-\ +c8c20d2241b5"], + +Cell["\<\ + R=1.49 \ + \ + R=1.5 \ + R=1.51\ +\>", "Text", + CellChangeTimes->{{3.801816290742654*^9, + 3.801816334679912*^9}},ExpressionUUID->"81f281b2-7a45-44ac-a7f5-\ +5824ef59d144"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"Eigensystem", "[", + RowBox[{"uH\[Lambda]", "[", + RowBox[{"1", ",", "151"}], "]"}], "]"}], "//", "N"}], "//", + "Chop"}]], "Input", + CellChangeTimes->{{3.801906997534203*^9, 3.801906998515994*^9}, { + 3.801991667052741*^9, 3.80199176236134*^9}}, + CellLabel->"In[73]:=",ExpressionUUID->"4205314e-d4a3-4d2b-a2e0-34baba0f0950"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + "0.009477001185167906`", ",", "0.00887387980059354`", ",", + "0.004915350027498206`", ",", "0.004458868763065948`"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + "0.04839121406197561`", ",", "4.073634087390802`", ",", + "4.0736340873908015`", ",", "1.`"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", "1.`"}], ",", "1.`", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.0301016836428356`", ",", + RowBox[{"-", "0.12885888233412746`"}], ",", + RowBox[{"-", "0.12885888233412784`"}], ",", "1.`"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "1.`"}], ",", + RowBox[{"-", "0.11680096512393658`"}], ",", + RowBox[{"-", "0.11680096512393658`"}], ",", "1.`"}], "}"}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{{3.801991683732524*^9, 3.801991762696089*^9}}, + CellLabel->"Out[73]=",ExpressionUUID->"ea9352d9-1a5d-49c3-8319-1e5f14ad9553"] +}, Open ]] +}, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Plot of the coefficients", "Section", + CellChangeTimes->{{3.8000074158562183`*^9, + 3.800007426008451*^9}},ExpressionUUID->"38ecd62b-d033-488a-9f8c-\ +2e379ccb4dce"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.8000075107858887`*^9, + 3.8000075130713053`*^9}},ExpressionUUID->"0705a04a-bd50-4ebc-b528-\ +bbdc589f6dd6"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800009113386405*^9, 3.800009176290722*^9}, { + 3.8000093373796997`*^9, 3.800009385309951*^9}, {3.8000107767421093`*^9, + 3.800010786348114*^9}, {3.8001875852067204`*^9, 3.8001875887949133`*^9}, + 3.800252962467052*^9}, + CellLabel->"In[75]:=",ExpressionUUID->"de2ffbbf-c99a-4d93-b812-2f447550d662"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{3.040422747209737, -0.0027546436916149036`}, { + 4., -0.00014483642578125126`}, {5., -6.567281087239679*^-6}, { + 6., -2.5201468467712967`*^-7}, {7., -6.76447733243333*^-9}, {8., + 2.5707658197101737`*^-11}, {9., 2.0402187885111274`*^-11}, {10., + 1.8355950065548735`*^-12}, {11., 1.1500652201615652`*^-13}, {12., + 5.560441636492147*^-15}, {13., 1.870692932776771*^-16}, {14., + 8.903768686088493*^-19}, {15., -5.107082651128909*^-19}, { + 16., -5.380608536267927*^-20}, {17., -3.7134435855145356`*^-21}, { + 18., -1.9501521699013587`*^-22}, {19., -7.244793007549654*^-24}, { + 20., -7.384694616664903*^-26}}], + LineBox[{{0.6666115693000955, 0.0016529209971359506`}, { + 0.6667584881230538, -0.0027546436916149036`}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{3.8768266167230077`, -0.0027546436916149036`}, { + 4., -0.001853906250000001}, {5., -0.00033624479166666666`}, { + 6., -0.00005161260742187493}, {7., -5.5414598307291365`*^-6}, {8., + 8.423885438029824*^-8}, {9., 2.674155570477314*^-7}, {10., + 9.62380434796625*^-8}, {11., 2.4118615765921928`*^-8}, {12., + 4.664436519540895*^-9}, {13., 6.277003880573391*^-10}, {14., + 1.1950436036835743`*^-11}, {15., -2.741844120570996*^-11}, { + 16., -1.1554768847924302`*^-11}, {17., -3.1898237510650362`*^-12}, { + 18., -6.700671833559364*^-13}, {19., -9.957167690787823*^-14}, { + 20., -4.059778799297175*^-15}}], + LineBox[{{0.6663911798338107, 0.0016529209971359506`}, { + 0.6671257739486025, -0.0027546436916149036`}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{4.386700923751948, -0.0027546436916149036`}, { + 5., -0.0011018069333333332`}, {6., -0.0002705987072}, { + 7., -0.00004648513426773333}, {8., 1.1306347644245333`*^-6}, {9., + 5.742705359808102*^-6}, {10., 3.3067139950094013`*^-6}, {11., + 1.3259349240246346`*^-6}, {12., 4.102881752206591*^-7}, {13., + 8.834097605485534*^-8}, {14., 2.6909989641207808`*^-9}, { + 15., -9.87853452776908*^-9}, {16., -6.6608707427665655`*^-9}, { + 17., -2.94209311880684*^-9}, {18., -9.888446274846714*^-10}, { + 19., -2.351069748364469*^-10}, {20., -1.533741066373377*^-11}}], + LineBox[{{0.6661156930009546, 0.0016529209971359506`}, { + 0.6675848812305383, -0.0027546436916149036`}}]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQAcmDhD6gz2EVjkAlXBYuwoM9kO4HA5TykEg +HcoXcDji3J3z/LcSlC/icCPwaNWE7tv7IHwJhzo7Br8pLydA+TIOC87VS87n +tYXyFRy+8tf/53fZYwvhKzmcu106aUveNihfxeHHvIqqFNUGKF/NoWJLwYdu +fQcoX8NhDk/u5gNcP20gfC2HQwvSWhd/XQXl6zjkir6duj7HAMrXc/he/fhC +w3WlPRC+gQP33WzpT4fe74bwDR3ySh/Ku3duhPKNHG5y79P0rMiF8o0dZq7u +dvNvUdwNC7fSd9OZDt3atgsAk/1deA== + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQABGMCngAOF9sIcKH4DSDtGhILB0P4TL4XBq +UrzOz6NNUL6AQ9T81WtvxMdB+SIOQSXmSQ6cZlC+hINHMsOGYH5uKF/GoZ/L ++KGE3fV9EL6Cw+Rao5k355TZQfhKDi/XH+HT+jQRyldxuPv3wITcq5VQvpqD +e9vzzWueRkL5Gg6CnCqaszhMoHwthz8bX8/1n8gK5es4bOH3CKt3X2UL4es5 +5Cdcej5Ldd9eCN/A4WNN5/qDGSuhfEMHkRAm4xt8PVC+kYNC3r9duZPToXxj +hzqnNbZP2WygfBOHGf5uprM9Pu0BAGa8VJ4= + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAAOEOqDPZTeDxMXBIOFUD6Hw8tJLeFL2Tug +fAGHmQ+6qsql8qF8EYdXLzboB/AGQfkSDrt42Wc+2W0I5cs4mJpr8yrGc0D5 +Cg6OQn8EuX5ssoPwlRx45KOu6IndgPJVHPi+xdrJ7j0N5as5fBG+c/eG3TYo +X8PBuNipalPHbChfy+HNzOuP9m0rh/J1HC41Xt47UVYdytdzmNMeoXzCzHUf +hG/gcO/+6/wts22gfEOH9b7q+rtdNaF8I4eQ2vdCf/4IQPnGDpYcOuu5NT7s +hfBNHBpyXF5K3N2wFwDUrFPq + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 20.}, {-0.0027546436916149036`, + 0.0016529209971359506`}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.1`", "0.5`", "1"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.8000091259144087`*^9, 3.800009176622004*^9}, { + 3.8000093501939363`*^9, 3.800009385693008*^9}, {3.800010779395483*^9, + 3.800010787384062*^9}, 3.800182481161254*^9, 3.800252967272444*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"4403f607-c3b4-44e5-a15d-7283ecde4f9f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "50", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.5", ",", "1", ",", "2", ",", "3"}], "}"}]}], "}"}]}], + "]"}], "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.5", ",", "1", ",", "2", ",", "3"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800007617136105*^9, 3.800007629552762*^9}, { + 3.800009397618456*^9, 3.800009399018181*^9}, 3.8002529715032997`*^9}, + CellLabel->"In[76]:=",ExpressionUUID->"ecff5721-ebe6-4815-971f-c4d672c96905"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwtzWtIk3EUx/ExNFYxJby8y5auJzOLdNOabvZz6jadMTKJDAq1IjN1aM0a +NX1CEkwtbVBepsWgRiJ5SYjWkrTY3ohoa5DFSAxZJdG0wJAZXf7nwOHw4fvi +bC83Fp0RCgSC5L/77946/95WKd2GYKm7+JJ3dFzwfySwWlK752z1Wczx+DL0 +OiJppZMshX/9ZUe1z0zmoG0OPBlcLCEnYstG6a4ekZychNDIUp+hM5ycjLFI +3dFG7YCKeS+MpW8CPTvGXzDvw/LVlqGJikfkFEQXC2XvItrIqZDU/HZWW8+S +ZWhQD6oWNyjJcnQZNGm9uhUXcxrMby+n9CYsK5nT0RUf3miKmifvxypvt9yb +mSQfgPjVocIW+32yAhf9HVtb40zkDJQp6zY3XJORM3EjmjMJwdE/JTxGR5xn +PZaswujt08fNO0PPmbPg11d+qp2fIx/E1LS4OaJghAz8Cg+59EsXmHmAq11r +fRA8mcl6NmKOTYhEA4eZ+Wxws98fRjWlU1fjc+IJibg8hroaXvfC9XrftwzW +c+DcNDIRtnuMmc9BsMow3V5wx8l6LsLEHxw2Yxszn4uECsepPbN11PPQvhq4 +yZ0rop6HWJkhNPw4iboGa/orZU1VP5+xroGvJvKuXjOjYF2LPof6abLdw8xr +4bYWBksyh6nr8FXd/dFxpIO6DlNeT/6kpYJ6PhZ+9Kt4l1zxB9h7zXA= + "]], + LineBox[{{0.6666665516989473, 6.898063165293428*^-7}, { + 0.6666668536865672, -1.1221194028185147`*^-6}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGDQAGIQLfJp6/XNyeoOKl2HFFNUl9sxgIGGg3GxU9WmjtlQ +vpbDm5nXH+3bVg7l6zhcary8d6KsOpSv5zCnPUL5hJnrPgjfwOHe/df5W2bb +QPmGDut91fV3u2pC+UYOIbXvhf78EYDyjR0sOXTWc2t82Avhmzg05Li8lLi7 +Aco3dXjOw3jkm9dOWwjfzEGs+4na2l+boHxzh9y1X39rH10I5Vs45NyaURio +3AnlWzocUtimItORCeVbOZhMaLyccdcIyrd28PTofC9kbgi1z8bh0exFhbZl +OlC+rcPJqS8Ovn8oDeXbOUxsN+XObWCB8u0dHv1ta9/46ukeCN/B4dxyryc+ +xlsg/AYHh441Jz//lVxpA5F3dFjBsmDtu7fLIPwGR4elkZ0zdiRMh8o7ORRd +e/N55eFGqLyTw7MvFX+/XU6Gyjs7WBiuj3AuMoXKOzs8vX8jZeY3Jaj9Lg5e +e+652kcpQ+13cZjQV8FdWCsClXd1cGI/u3U3JwNU3tUhw5mB32fGo90QeTeH +hMSp6/4c3QbhN7g5/GxQ8n3NMdcaIu/u0F3K1tZzdwGE3+Du0Po0u3dSxySo +vIfDUeE/07dfroXKezhcZalasfBpIlTe00HU6/eZLXYW1gC2+8NB + "]], + LineBox[{{0.6666664367312278, 6.898063165293428*^-7}, { + 0.6666670407064677, -1.1221194028185147`*^-6}}], + LineBox[{{7.952688905103651, -1.1221194028185147`*^-6}, { + 7.990741965175498, 6.898063165293428*^-7}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGBQA2IQ/U1NgHHaYm0Hla5Diimqy+0YwEDHYbaAkWD34iYo +X89hx0aeeQfzV+yD8A0cYlSV2h90LofyDR32cc2zmr9lLpRv5FD2ZuqslW09 +UL6xw/quKctOJhRD+SYOaVenOvA/tYHyTR3OiXuKTPviB7XPzEHX2ri8dHoA +lG/uMCvDONHV0A3Kt3DgOrghcVKOGZRv6WDM/zJkoYsClG/lIFXPL/ZF+6Mt +hG/tIB+vtHh/0re9EL6NwyRvhtUL8n9B+bYOOW8Fni+o/wTl2zlsOsTZHZH3 +GMq3dyhYsFhx65qzUL6Dw9TPbr9cOxdD+A0ODs4qdjUi4Quh9jk6TH3PXXpq +wTIIv8HRwf9itfv8qgVQeSeHkuYLlrWPJ0LlnRxWNHs/k2+rgco7O1zq+3yv +mTMMKu/scLfvzBuja95Q+10crq9z+D3fKwRqv4vD5rOnugQ3+kHlXR3WHnJX +O6PhCJV3dSisvxb4NFsHKu/mECS8+tLzOxxQeTcHq1M6LbFLvtlA5N0dFl/V +4nx6kglqv7vDhalT3B/U/YXKezi0ON/7xvrlA4Tf4OGQUdR0J1bgLlTe08Gy +5oP1VPk9NgD3brN9 + "]], + LineBox[{{0.666666206795789, 6.898063165293428*^-7}, { + 0.6666674147462686, -1.1221194028185147`*^-6}}], + LineBox[{{7.960931139197449, -1.1221194028185147`*^-6}, { + 7.969794748373893, 6.898063165293428*^-7}}]}, { + Hue[0.37820393249936934`, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + LineBox[{{13.999765355527025`, 6.898063165293428*^-7}, {14., + 6.867932543309397*^-7}, { + 14.370013773762462`, -1.1221194028185147`*^-6}}], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGBQBGIQ/TN7R//6zUYOHxKOhZRf3rSPAQyMHRiNFHcXPlkJ +5Zs4PFgQsKq+tQzKN3V4Fr7LWVatxw7CN3PYmBV8SmLWRCjf3MHOp+DJgfJu +KN/CYd5v3QurDRqgfEsHnulTJH+lZ0P5Vg6PF85r/HXfAcq3djjR6pAZtMoT +ap+Ng77ThmDVdYFQvq3DoxaP3xz3fKB8Owe+iZOWaGxwhPLtHVgyvK7cbNaH +8h0clmiterTBhAPCb3BwOPGydNs5AU6ofY4OJQWeWfNEhCH8BkeHM8LTd8ua +CUDlnRz6bWSEf7WzQOWdHBptzb3PSny2hcg7OxR/mqfQanYRwm9wdnDK9uZ7 +HHtyL0TexWF7Urzx8klXIfwGFwfZ67Z7t3Fchsq7Opw71Ni87MoJqLyrQwtL +9dGdf7dD5d0cNobrrjCqmQGVd3OIPnlh51rmLqj97g6nV5qmh+jPhNrv7nBx +oo+clsB0qLyHw7fN/JXO7/qg8h4OnrsCa+a8q4PKezr4cdXFbylNtAUAxzSb +JA== + "]], + LineBox[{{0.6666659768603501, 6.898063165293428*^-7}, { + 0.6666677887860695, -1.1221194028185147`*^-6}}], + LineBox[{{7.957794663897385, -1.1221194028185147`*^-6}, { + 7.963037874705121, 6.898063165293428*^-7}}]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFzX8s1HEcx/Fz0Q47ND/mjzKhS1KL8yPc8XK4O067RbVokVNLDTfCuhW+ +ZdmE8mOTn2k23ZJC2VrXJVRua2YkizVLmqmsddSm7LTU57313t6fzx6f5x+f +7Rpt0qlNPB5PvLFWG8vn/R+rf6cTmMxR9DxIN44d/judzxgFeFWX7v/r5WWy +E1Lb796bTk8juyCpIFQD2xCyO5SZvN5kR3vyVly3E39wj3w7wOyJ+uLAppnW +okhmL3zueeHgt1JL9sHs+mBNzpSOLIKifPFh90IK2RdbbH12NQuCyH6w9C21 +qWttyP7od1QeKVV0SZn3Qnvi9WLzjoGnzPuwfLGiZyjrDjkALof44mmHKnIg +PHN/G3LqT5PFKJF1Sxc2S8hBaFTLg1uUK0bmYOjenA9o8V6WMIeg0cumtNB5 +jhyKVa6juH18mLwfwucHEis6bpHDUDBbs63So5AcjgxJvn3JJTE5AlddRIV8 +iOg/CUxavYdp3Y0sxYO6k6m6nZYnzJGYVZ39mDc3Q47C6Jiw3CGhjwz8tLEY +VUvnmDlAlLdW2WlOi2A9Gq5HhwSCroPMXDREE99uO5eFUJfhk+9xT6HGlboM +kyPzV4qmvoazHgODXd+Q9e5+Zi4G5mz1WHVCg4H1WFgL3+lbtVXMXCy8s/SZ +eybyqcehenXxmuhMEvU4uInVlt77ftTlWFNdyCjL/vGYdTmmch1vqOTjYawr +0KaXPfLvMDFzCozUJ5pTInqpK/FF1vRen1xDXYnRSVP8cHEW9XjMf78p5YxB +YX8ATQvexw== + "]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxl0VtI02EYx/G/JW2lK0+JlZJOUcuhzTmd6bafm/MwFEqCTIi0AxgpQ6OU +gfAXym1ZoQPRsQINLIVME1uHqdFBSDpctA4STWu48lQK2qjcIOn/dNUDLy+f +93vxXLwxR3UlJ9YzDCNZO35rZx3z34C7lpR0P/z3Hvx3ush8zJrPHezmGclB +sHy6oK/briOHYW5mIGWfoIQcgQcCnmXaLiZHQpqRJIg5widHIyfEG7zp56CC +sxCBO8veJIdPkOOw2XNYETXynByPldCPzgmFjZwIyWmVftBoJe/GguW9a9RW +RxbhdaNjpDUqgZyMK4bS2GfpmlHOezA5Na8bsmaTxegvTkixa3aRU3GgYTHE +6w0iS5DJF/UHJC6NcE4DW5U7G+EcIEvxNdDvqUd7X845HeHN0/F9vwfJGaju ++7GaNNZFlqHqQ0fN/lgTOROPo21xkcaT5L1Ia2l0VDpTyVkoLDAthmSIaV82 +XNZrNfKzIrIc420zjxY/7yAr0GqQBlSz/mQlXL4mw+059zB9L17d0E4XSYY4 +s4Dx5viyb1tvNtdz0OPf2ff923XObA66D5k67pW3U1eh9t3Ccu+TRuoqfFmp +93kcx6irIRP3l6prpdTVcE9NHLd4hLQ/F9rhSY2yLJb256Llcn1ATUMYdQ1U +vJd37BsZ6hpUqpktRR0uO9fzUF7Rdss7ZuPM5uEXKyye51/N4no+ms9saLro +7OTM5uO8+9Qls9FMvQBjod72u44G6gV466/v6XJXUC/EVu3qiyGFLOsPFvHl +Zg== + "]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxdzl1IU3EcxvGlCLqCTWYmkWwOE52r1JUv25yP7k0dWYlUF0luUAhZ602F +XLnUTJ0JiSsxc5OFM8zK3ugilUldODVM0LqYMrAlgcOlssIIGpzfTR3Onz8f +vgeek2Awlp4JZ7FYktDZFjphrP+fQN6/t3ecAuKa9aG3mxyJ8Jvtd9JutZC5 +sLxP5rUP1ZBjcCBr1O+ZMpDjMHx47c1WRTF5D2pnpuN/fk0hCzC1Lg1zuj0K +xkIYW/gCUTyb/iMRfsPOLwl1EeQk6LOd+pTeX/R9MoypGkPA5SOLcD7W1837 +4CaL8YCbEW1xNJD34+3Ijj6XcXCMcRpO7RXe9rY6yekYY/dJba8ekjNQs2rt +edzcTpbgWVvXwGTFFfJBnJ23guOTkw/h466imHubJbSXiX0ySW31/aPkLPRU +SvTqdA05G2zXc31nVSY5BxLO97J+lYAsxe56Tuxm6o9cxjLwTwsd44bgKGM5 +OnWsIbtxi5yLKj93xV6/TlbgxUSU5eSFZXIeLtodCa+fzJAB64ZmS93qYGwG +lIkKU8yJftrLh3Vte7XbPsDYnI8jn+q0tmt26gW42jibc335LvUCDDbqvvGb +TdSVmOvYWGqMOk5dicWO6dWMBR3tq/D5KX7bistoX4WXM+626JES6moMT2iT +ppPzqatxqX7hmO+cmLoGpbyhuRVPJHUNpG5xU/mjoJzpWjjmRVG+yTDa12LW +2qX13vhDvRBNyqVgxGaAsbkQlZcbPOXcRepFyDEFZFb+O/lfworknQ== + "]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFzmtI01EcxvGtCa0MG8wXBlu6UFHJptO5SuceNy9brkinKYmNhJrpi4wy +u4jNdIUVxUZgN1eSZM6SSTJTWVpizMzh8hK9KdnMbjKjQEG7Sf9fdOC8+PCF +8xxRyeHcAxwWi5WwctkrdxXr/8n/e94rGH1VMJ7sp4xScbOzfsFC5qIv1Plx +UXGOzIOoqMg//buKHAzH6tBfgTIDOQSn9o6eULN1ZAGeD3XZ5wal5DA0mMc6 +ZpPnUhlvwmP907md00L6TziyjJrwxXYBORK+mbsjedF8chSmPhQ6LIMccgx0 +QfPFbfv+vbcZX0QNe84GtpK34Ef8Te/Ubc8TxnHor2kqLHGPk+MxH/HgszJ6 +lCzBQbNW8Cp/gJwAtkTUd2SmjZyI6Tu7bWdMx8lSzBb0qoSRl2gvCZ1luhch +N8xkGVK1FTMDVRfJW2Fdjh1rjzOSt2Fd49UNS4Zy8nb4mq21S+9ATobLhEO5 +Ng3tpUCstOsiOnLIcnjr1cvct1pyKoLMlpYoexpZgYDSHRNv6sRkoCXG5rUn +chkbAdenSoebt4b20nCsQlNmDeYzNqbhJb+xT5jEo67ElRQBf+l8AHUlauWy +7NGQ73Kmq3D0mzXMlORhbFRBWZ4d5CsedjI9Hd0l+oRWyyRjYzqEr+VOB3ec +egbcz2rr7k24qGegPuD0UM/PbuqZ6CyIvS+pvkY9E0XDYz0PORdoPwsjbVJD +nvg67WfBY9ZujOE1Uldj4dH6kyr/ZepqaHpzqm/5a6hrsGttjb6rcr/8D9pR +6gY= + "]]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 50.}, {-1.1221194028185147`*^-6, + 6.898063165293428*^-7}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.5`", "1", "2", "3"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True", ",", "True"}], + "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800007631129875*^9, 3.8000083191314087`*^9, + 3.8000083758014793`*^9, 3.8000093998862886`*^9, 3.800182487781508*^9, + 3.8002529726369667`*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"2a70e00b-94e9-401e-a18e-53300a7c35ff"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100", ",", "200"}], "}"}]}], "}"}]}], + "]"}], "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100", ",", "200"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800007711118153*^9, 3.800007712566806*^9}, { + 3.80000838349804*^9, 3.80000838411401*^9}, 3.800252976993102*^9}, + CellLabel->"In[77]:=",ExpressionUUID->"7c651ed0-b6e6-48f6-be9e-cd2e24b5c91f"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{7.898640133176626, -0.00002789813727762447}, {8., + 0.00002199525114142007}, {8.015509651634792, + 0.00002498624159649449}}], + LineBox[CompressedData[" +1:eJwtjw1QkwUch3dCasqHymokFiIYRcjpkO+vn3woDgb7YhukEghq8rEr6ugc +5NKY2Fx5p+IpTaACYmvHoKNxhDLogES4RJTCAxFhONh1h0ch4EdZ73937+2e +e97/Pb/XK1shyl3BYrHkL57//v1X5W4Jn/eDbp/5wx2By9Gs/3/+OPimTsQP +7iEOgN74Q97QpflrDG9HfI296szRJeIdOGvLMF6v+JuYi86L87dKbHbiQNiO +z/4qLRsh3gmTKkfgpGsgDsKn3Bsf+3zSRb1gPMz2qJ+o6yMOAYfVkKF93ksc +irBCn8tnhRbiMKijczdVjjcSh8PE6Te516qJI8AWHRca7p2jXiQ2jGgD91dU +EUchIqY8k9OpI45GqPl1b8nLF4hjoJT1/3WlqowYsPa6x42/fZBhFVDf7RDc +bD1EvV1ILO7Wqjd9xLBqF65la5UCcxH5WCiCHAsNv+WTj4VboOHdMfsB8nGI +M0ysELNBPg5nSuaaS2UR1I+HpM7xZsFtHvXjkb88pVAIksgnAMduRH33ZTz5 +BBzRt65cnA0mvxsu1t7VT55uJL8bbw3er536Yh319yA2ssxYeWwL9fdgqcfq +qlF7k09E1zruxbUhb5BPhK94693WwvXk92Lyg8U295aFKMbvxYMAt5C6B5NX +Gc+DtrlOZF+zzLCKh8S5zf+wzj0ln4TiCx2l1T8ukE9Cd4BRXLnGTj4Zqom0 +I55+Q+ST4bHPnOezzcz0WHxs9Btl4/tb1Oej/NR17qnEO+RTcFgY9tiQPkg+ +BdM9qvUqXjf5VHj2uRxdCjWRT4XZWV6U7H2a+gJ8q/1s+GdnA8MQ4J2BdD/b +BhPtEaD+UdtzxYSeYYsAqb+7pOgXquleiIzzP2maT2voXogm36+zuAtS6gkx +Yxz48/PekwxbhLDcbSi9rSmnfSL084uazE5lDEOEzNzRx3yeku5FaDTnDxUW +HKZ7EVhWX5216RXqi/HVga62Q+z91BfD7MHRO9iyab8YHVODlf4179F+MWYc +22VKTyndS5DVtjVAtRhH9xI4DDx5v6V1oZ25lyCHA+MzRRD1JShTisccJVG0 +Pw31mpLJguJw2p+GE9OmxionLu1PQ/e0v+YbZy+6T0OMPmvVedZMJHMvRbH5 +0lzLFVfqS7FztGPsl/FXab8Uk9O8e17b6XstL97v48vvVDrTfhmqR/getX7P +mL2Q4f62kQpb0U3aL4NAN+wtS3jI9CwyKE8Ou71mf0R9OVYO2GrZTsSQ48Rs +jfd4jo1hlRxz6hZXt6U/6F6OzKaX3COVzXSfjs3sq3mhazvb/wW2krAw + "]], + LineBox[{{0.6666250229306725, 0.00002498624159649449}, { + 0.6667131635621294, -0.00002789813727762447}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{7.863301377084002, -0.00002789813727762447}, {8., + 0.00001835782941868287}, {8.032886443156153, + 0.00002498624159649449}}], + LineBox[{{13.820217925326215`, 0.00002498624159649449}, {14., + 7.519992132150188*^-6}, { + 14.487668853903314`, -0.00002789813727762447}}], + LineBox[{{19.49414618177778, -0.00002789813727762447}, { + 20., -7.3766769080742125`*^-6}, {20.966904026739503`, + 0.00002498624159649449}}], + LineBox[CompressedData[" +1:eJw1kGtMk2cAhWuFhWEypF4qq04xBCVipusw27j0QCmFFpC2UAqWyMgMGI0o +/NABzo4JGmHDW0whbKhlExu1oHIRhFZkgbFqUEaBEUy8zSFMEM1kbpNdenyT +L29Onpw85/38s3K1W4QCgSD+3++/e/7q8RrpGx/ia2Nz3nrpywjB/+cjpI0G +bBMoBplD8dBzZGyX91iHO4dBUrp0nWjrDHM4GuVzl78n/Ys5Ap/IWoYs+a+5 +DMXi5rKg/ifMwLGnzSt3OPrc2QRYhqefLSkfoi8STRsm6sN3PXZnUyQywtpb +L/ZOkkchv29vwfOiCfIo/GJ/+/op+z1yOfr+sLgejXWTy9GuyNmeNdlDfzSq +7Y+ixMI79Ecj58RnC7ra7pEroNs98LxKdZdcgYOmeB9F7SB5DCw/mxvyRNfI +Y7BuYmreiPUK/Urk/l5RMn38Fv1KZC4+uuF8j4s8Fj/U3ilt/GaAPBbTts62 +AvNN8jj4BvppI3e2kMehadgnTCqz0q/CsLHIOH/h9/Sr8E7NmmUrMpzkagiW +7YuZOf0juRqSqfsXut/tIo/H3Tb5g4ayBvJ4rBE5T7o8q+hPQE+rqEDcwPeY +EpBddCnkxsw18kR0784c733BbEqExG/o2SHvNvKNGFyRXzIQfZZ8I6xyfW2T +8CD9SVC/CF77W73NnZGEnOBX8jpxM/ckoWK2XK+8wOxIQvrm4txx3UX2NZCN +VcrMEafZ12BfqLYwpC6PPg1axbqg3kaLOzs0aHyw6ETl7Hnu02L1krd8O8tt +7gwt2iVdfj6LXu/VwuPkx5LwHP4Phxa/ZgtuNv2dQL8OzoxKXfV3Zvp1QN8B +V/8ZC/frcNS6dNVL6bfcr4PVbngyqz7FfjIqtttLIgKPsZ+MI1cu2zQtKvaT +EeD7peHPx1/Rn4zQs6MrPacquT8F/vUZ3gOXq7k/BbHFLo8soZn7UzByH/5e +t8vYT8HnVz/46ZUwjX09vPRPr1Zv+YJ+PXbGrsenIUfo12N/6CalrZz7HHoo +p6Nsxx2HuT8Vb3o413qH72c/FeNBwcY6gZH9VFSVCkVlcXvoT8U5cfD72ZOl +9Bswx2t00tZ5iPsNUI+qH6YXHuB+AxLn9t/OLNzLvgEGD6dheWc6+2lQdVj2 +1Mh3dPwDjHh7sA== + "]], + LineBox[{{0.6664584479866958, 0.00002498624159649449}, { + 0.6668991511439801, -0.00002789813727762447}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{7.689878406259116, -0.00002789813727762447}, {8., + 6.217847980931413*^-6}, {8.262240569828199, + 0.00002498624159649449}}], + LineBox[{{13.46774393692514, 0.00002498624159649449}, {14., + 3.3042667034285397`*^-6}, { + 14.940379470305743`, -0.00002789813727762447}}], + LineBox[{{18.906655054889733`, -0.00002789813727762447}, { + 19., -0.00002616958942181399}, {20., -4.204916809838949*^-6}, {21., + 0.000015533770694073283`}, {21.717394339683974`, + 0.00002498624159649449}}], + LineBox[CompressedData[" +1:eJw1k3lMW3UAx5+aOasOFYy6CwSzI2hlbGOBDeiXmw0YpTfHWAYyppKwCyTM +o5AZGX8wBnO4g2FhI5M1BDpII9FSOQrbWgtMK1CsMIgCYycBF6PZ1H73kpeX +bz7vm8/3Jb/nm5Uvy3laEISkf+//ntUS/XuS9GDUZhgPBm76K1z4/wpBzGu2 +pJUzD5i34uZYwHpx0CDzNliy92U2qSZN7hyKpYMnCoWWeeYwVGHog0rzn8zh +eCTf4rGidIFZgvgic/2CdI4ZMHiJBl71HHBnLdDh/0byVM0wfRE47Zo9Xtd0 +y521EZjcs765JPM+eSRazhvqX4+4Rx6JCWNomF39O3kUOtdll4i6beRRMF3L +nFZtpk+Ihn+p/MilXVP0R2P6vNRjXcUseQwWNwZ4Ljs9Qx6D8HMNr+yPvUke +i4thhgRZ5XXyWOzb3Jmhb+ilPw5tLQ+KLy+46I+DoL8Y+uz8FHk8/Cy61fou +Zm08chZvp5U3831hO3qMhelLv7pKvh1pluJBR9t39O+A53ztykyvYfp3QBtX +ealpdpw8AZE+jR3GLRPkCTDlhu5dEjVKnoht1udHjzn6yBNxND1n0+pCA/1J +KH7h7xHnczfoT0KguNNy3O4k34kNnXd01aJfyXdizH/m2wuDDvJkOHMjx69F +W8iT8fn3foe8ljfSL4X/cM5lQ8GP7gwpzqXlve8S/8I9UoTXHZA4hvh9ZilW +mLLP7H35J/ZT8Gnz+NsmZw/7KfgtcFJ8MvYUfSmwFjVuLK/ud2dzCl762jvV +s4zfI8hQEVMWZD30sztDhnyH1qPKzvOulaGg3Ucm+bKbfRmsshNjy7Z+RL8c +01XPZD28202/HJpyUZnvmSfnWY49uz82CW1D3C+HQny2YoPLzr4C73a19wXk +dbGvQFjcP70Fw8XsK/DOjbXf7Ao2069AkLdfjetDK/crcWrCfqE/b4D7lUjb +fzA/u5Vcq4TP9Zqo9Iwf2FdCN2AbsSVWsq/ClZ6iEa/cDvpVMDrzij4p7Kdf +hSPHdPdal9i4X4WWiVVvuh5e5X417KNVa6VZZvbVUOwW/mjW17CvxpW3jorq +DrTTr0aJ7sUGx5on/4cG6tzgz8Z6eL6hQW9qyPLo2j7u10C36qmMw4sm9jUo +nfuizze1lv1UzPnUh3grW02PAXXpiZw= + "]], + LineBox[{{0.6658337919467835, 0.00002498624159649449}, { + 0.6675966045759207, -0.00002789813727762447}}]}, { + Hue[0.37820393249936934`, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + LineBox[{{7.458160982021521, -0.00002789813727762447}, {8., + 3.274590640924815*^-6}, {8.571411545646926, + 0.00002498624159649449}}], + LineBox[{{12.956318501994476`, 0.00002498624159649449}, {13., + 0.000024069753573837916`}, {14., 1.8193570377914835`*^-6}, { + 15., -0.000016572647022626554`}, {16., -0.000027728432426850552`}, { + 16.063736137981934`, -0.00002789813727762447}}], + LineBox[CompressedData[" +1:eJw1kn1QkwUcxx+VwrgIhaQQKs15xUsUEg3kpe8YbuhgjL2wwSEv4xDQWicE +IoEM7EUh36ZggFq7/jCDO5OLFX8AA9FANgaYOhAwPOU4inmcFDgZve337O65 +3ee+z+8+nz+ezeqPpLmrGYaR//v891/tx8nRHgpB4B1h7igcncz/v20IWI4W +Wk7biUMhLtN5vJ7+iPhdqNr9T0SJe4nDUHukMvjEg/sxTn4Pbc+Wiwfq54m5 +kL3g+ebPmgXicFQIsqwRNnaPQPn3VQVxX00Tb8dGx/hYvaGXOBIzJX59J4vu +kC8K3/kEpe5xnyGORklho9tfkXPEMdAf5mnSm2eJ34csT/S45fIUMdBjXiWq +iaB+LbA9Q3NOEmwhHw+XXQyZkuYpJ2t5uMANgymV7YuFQVl3UO35kPZY/JQT +ZIgPnqCdj5i03RsKzlylnQ/x8hd5o2XXyB+HTru3XbPtLvnjcO/J0LhjnO3b +gYuW/Vk2FbF2BwwuOY28BSvtAvTztj4u+rOHdgE6ufyWeEcH+YXI99Idnzx3 +i/xC9FpduTUH2L545HaPff7WPmJtPEI/mWHqpul9ZicG7h/7+lJeD+070Vgn +D2dMP5J/F5YuLe3O0w2TfxeGb1nq9b+xfSJ4L689aNCO0i7CrO0Vb0HDTdoT +YG4KmH31j27aE+CY5FQVLjaTPxE/VC0caX3eTP5EvC2pvPhONtsnxmeFA8Wb +K27TLsbfWzvWPzQP056EhtXPDPpWddOehE21gXZrpZ78EjzwrA61J/Q5GRJc +d6tfiNWPUI8Ee96Izdf7/OpkowTV1o4tTMYQ3SfDrahVnMihfiTDdMNvInO/ +jnzJ4CxNrL1eSd+vMRlnRkxhTQVD1CdFhLstw99/xMmQYkUezSnIHqR7KULS +J1uKbxrpXorScVv4k40fk18GxVn/2/Nq1i/Dh1LkTwWaqV8Gr6xvrpqOUa9R +BndTiGvJXhPdyzGx7Ks5/6WR7uU4+lzbhjpRKd3LIXqZy3Scpu/JKIfOY0W9 +3vcG9SsQtGkwYTqXeqFA72v8uK4u2rUKJD1dU+MjZvsV4CwetR+wHqf7FFRf +STfPBbSTPwW+wtZ7qw79Qv4UqObUH6x5kXqNKfjd8m1tqaSf+pUQiVaWDnuz +/UrMR42VF+87S/dKZD7tmV/MaCO/EqlpLzU0RV4jvwqnHmVXXFlHvVAhyOvk +kGBdH/WrIL+7113d30X3KnS7tJ8vS7tA96n41HWwne/R2vkPvYOpjQ== + "]], + LineBox[{{0.6650009172269004, 0.00002498624159649449}, { + 0.668526542485175, -0.00002789813727762447}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFj3lMk3ccxjthypRL6QYDpiCIjCE6lEuuh0uxUOhFW9mUiaJMrhimLBZG +xYFI7TTxCjIEVGCUNZQurIShVBZgKmwi6oYBkdNCswXixuE5lveb7Jf398cn +n/d5n+d1Ts4SpJiwWKyUxfvW4l3C+v9cKv3v9IcyNB3K8K020rC/Frb4lBCb +gTsc32DWeYzYGvG1BvbI6iPEbIxcuetXoEkltkPfib8OiwUSYkf0Tma47O8N +IXZCfpqnW5z1XAjDa3HEnBU26e5Je1xxaCYx5qrXRmI3nP41RnB2hTuxO95E +lgQYyx2JPaB33Gi8r11G7Im9buUCrm8nfd8LKvX3aX2lz24wvAmRVcaKUwcX +iD/GGUOi+taFf4i9cfPis3u5BiPxZhjyp34RF/YTb4FGvo9nXl5H7IOvvO8c +dv2ynfp88TTZoXa45jaxH2xZdYnK113E/gjIdL10hq8nDkBRSIpj2VAD8VZo +bLs1dtVFxIFgC/L59Y/PUl8QVvUrN++6UEEcjMDQ4iTbm+XEIfDXfeAieuc8 +cShkku6/L1cUEgPjXXYRQx/uZVgO1HaY+GrH91NfGKJzOpRFjl8wLA/DjWSl +jKfLJh+OLB/TzPrf0smHw2Zz/SeDxt3kIxBRP7xEyAb5CJzKndbmSQKpPxKi +GtO7Gfc51B+J9OdjWVm8GPJRwNE7wde+iSQfhVRV89L5KV/y22A53mX24qU9 ++W1w731SPVZiTf3bER5UqC47upb6t2Ohc9xKUeRCPhrt1t4XV/itJh+N9cJ1 +j5ozV5LfgdFD8y12TbPBjN+BES8bv5qR0euM50CprREYlz9nWM5B9LTTG9bZ +l+RjkHO+La/yh1nyMejwUgvLlhvJx0I+nJC6xqOPfCwcPtWluW7QMX0sLuw9 +Btj47h71c1F84pb3iegH5ONwgB8wV7+zl3wcJjrlK+WcDvLxWHPb8uCCv4Z8 +PHQW0uxYl5PUz8NV5bGHP1nUMwwePurZ6WFYpaE9PNTOtLzOGlYxrOch/nfL +ONVsJeX5SDz3o0J7UkF5PhrXf7vHe1ZMfXxMqnv+/LrrOMN6PvSP6vLuK4pp +nwDd3OxGnXkhwxAgKWVgjsuRUV6ABl16X2bGAcoLwBpfXz7e+C71C3F6d3vL +fvYu6hdC52CrMjEk034h2sZ6yzyrPqP9Qkyatkpka8SUF2FPyzov+XwE5UUw +6XnxeVPzbCuTF2GfLdSvsnyoX4RCmXDQVBRM+xNQq8gdzcjZSvsTUDChaagw +96b9CeiY8FRcsXCmfAJCVXuWnWNNBjF5MXJ0pdNNl62oX4wtA22DPw+9R/vF +GJ3gPHbeRP+rX3z/Nlf6oMyC9ktQ2c91qPZ4xeyFBE829F8wZN+l/RLwyh+6 +SKKeMn16CWTHH9q8b5yhfimW9hiq2ebEkKJgqsplaJ+BYbkU00VNVjYLf1Be +iqTGt+2CZFrK74QT+3qa/4qbrf8CnQbl7g== + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFkHkw3GccxteiI5qpUMmSlQY1GkHqDnXsE+u+7bKWMlGNa6JI/JHUkYhi +jaNEjsGYJrK0mMRadcUd1VLRjFCLGulIJKmQuDKNiNDM7DfT38z7x2c+8/ye +5331opJ40YoMBiP63VF4d5iM/780zQb3udRmjpxWOHKu7iUNZtW83/3+eGIV +bLT4fb0aFU28B3VbTedieJHEmrBbiTAuChEQa2Gkw0Btac6TWAcZNUcs1F9b +Eeuiyf9C4jxn3UnO+nA5XLGsMm5CewzgpprAziu1JDbEXVOtE6IsC+JDsGVJ +Y/yVjIkPQ3Qzezs5mU1sgq32kiZR/t/0/yOwe3Jlt6e6OvWbIV8rQve4AZvY +HJvp4qQYNx1iC6x9YzMpi99HbInc/dJI5U93EVtBuccuq2blQY+crfFbrsLu +ovA31GeDkqMNvuY2KrTnKN4ah5y80qlKbIvnTTkiQ58PiO3gGD7W1dW8Sfkv +EDprcJLhOklsj8fKMwunVBeozwHsXB0zjfgNYke0cBUPWlhuETvhBKd9Spzy +3nOQxWorMBp/QQxcWm3TT+wblXMmIJ5eW9cqnKK+Y2i1WWp0PPVMzpnHEOHQ +3dE0vEzeGSmjGakv05fIO+NJ7/5fqnofkudi9LVY9nRhkDwX3a5xCVHLQ9Tv +gsrep84sJr1fpgvirp77eKDzIXlX8M9MvKzwmiPvirxMHzXX6knybhD/VSY9 +rXGHvBvMllY+nKm/Tf3uSPq3OGft8n3qd0fkvlKbW0My8h74vfpBbssPE+Q9 +sCbp70wtu0feE+qG2rxjye3kPdE6reZgyamnfi9Mh6eH79H8lfq98Mk14wO6 +ESPkvcE4cN5t48Zd8t5grzxqGPx8gLwP5jq589ICKXkfGGuMXJcpV1C/L4Y6 +NFJZUrpPpi9i03+2/mPjDnk/DJ6JXBx+RZzpB7b21Hq+aid5f0zqpuRMuNSR +90c9V1Ddysyj/gB4vzIxfd4okTMCEGeyza1ltdGeABTvFArcG4j7AhB2PCtp +kd9E+UBwFso5ZU43KB+I8/a8NOva09QXiA4W32i4RSznvkC0zO+9Wr5zi/bx +cEjrI/X+QomcwUM3e0Bbbe/7vTwoXf+K7RhH79HHwz+xjHutb32pn4+RiHJ+ +5Y9l1M8HRkWy8Z/EtJ+P0nqdzzYta2g/H/W9whc73lWUD0JxQm+Ok+Elygfh +4u1mSWC7F+WDYKBeJHzz7HvqD4J93ay+8ko57Q+GXmOE6kRzJe0PhkeWTCmK +WUb7gzHzCHoqYwWUD8aFLts/t5mhlBdARbDaVRn9HfULkOxhjm+tL1K/ANn2 +X7pLCmlfnwDua86Sy30ltD8Eu5RGTFUdsykfgkUjk/BaRjjlQ1CRy9Qo8DxL +/SG4yTKxil3OpX4hFFRmlyX9+bRfCO9Z78dhaSLaL4Sf4vhYZFoG5YUQKo0I +D/aHUT4UXj3is9e4iT3/AfSX4TU= + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFk3kwnHccxleNyiZoiiSCENqK2UYcYSvieJzrjLW7WGeCIm21pClVkmYZ +JuIPcdXViC6JUTEGYTTaro1bUEeSrStqw9QRaTVKM5NKmpn9mu7M+8dnPu+z +z/Ob+b1G0Ym8WGUGgxH7+lF6/bzB+P+Xrt3IkacVOylo3UnBWZ2kwWTpP7Ja +8ibehe2KOBmLzyHei31PpXdNSl2ItVHjt3yGX2RHrINytpr4My0LYn14GahF +udnoER9G+PwSM0J72lHBxvg7Nduf/aE27XkXtgylhJIn+sQmMDnA26OTv8Om +eDi8kb/as4+YBZXwlawX+1WJj0IvpOXBTPsQ/f8xCC2VC+T8VxIFW+BSWXRs +tfJu2mMJOG7nWfipEVshITxncPJTVeLjYGePXZxMekF5axTXcX58WT1ObIP2 +CyplY17r1MfG2tCdM1Ldl8QfwOmrQQeHMCXaZwu5uoDzg/2OPwH3/SN+eivP +iO3weNbc1MxmnPgk+mLORtYHLVCfPVTHC1IYTRvEDijExMf50n+IHfGKz9bQ +zdwkdoJnqrR6k7tGDLRoMce0NccULAI6WDr+i6WT1OeM8rnVq1X1TxQscsZC +lGljRuRf5F3QdL2l+oAznVfkAnm7vcNo8O/kXdF5JCaD2T1C3hWSe5HLQdbU +x3ADK5OfXhexSP1uWL7O1TiSt0reHVtW5prq5Svk3eF4rebtJI/H5D1w06HF +h5c/RN4DZ607wxtqeqmfg9amZ2m3NueonwNGw037NzcWyXvCuE98qKGLWOSJ +2K2nobmN9D7DCz3tKWGqZYPkvRDalzYua/2J+r2huVGpF6k1Sf3eEHHy6+pX +58n7wMWwtqOdLSfvA0m8fZyK6zR5X5wc3j19RdZP3hdZYbHHD6W0UL8f0vb8 +OzWz6z71+8HSrLPv6ugM+VOw6PxDXMR8RP4UZlkrd26My8j7YybeZf6eWx95 +f2T/bHxe62At9XPBmoy91ZL8i4LBxbXQhI/mzH6lPVw4Vp1zkk3Q+aRc6Epi +KuL2PqB8AL5unH9fMtND+QD8ZrlgVuxRQn0BGE6ttcotGlCwNABvfWcQoplD +52HwkOeeYzN8/qGCwUOiTKRROEr3XcRDcpshz+mbbsrzMMwrmFW3+5L6+Vgu +VI5+/mc39fMhzGXmGFXs3Gc+ok5fkDBaJ2g/HwKzb/Ms5kYpL8CxrrZ+84Qu +ygvgwNnuTZ5Mo7wAR++bfB9hK6V+AWwMjEvnPhmm/YEokY/eGEgYo/2BCE36 +PDGmmbwoEIZDpa5h4XcpHwjx2MjUiG8+5YNwuyd1Siu+g/qD0D6TkHoxZYD6 +g5B+RbzerDJC+4PQJNc/PPd8kPYHY3S60IQbLaV8MASnGUuNDaWUD8btd7KY +VefaqD8YGWK1Gtl7O9+HEMHxtpdme+h+Q4jekBMH3Sr7ab8QYn2l8C+2JJQX +InPtcr9RSCXlQ7BmWH3CILBZ8h8fD+qz + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFkmkwnAcch9eROiYScTWOtoi0rqijum4/R5Asa7FYxp1xptUJcUSoI2ma +0ES6QYrQ7uhMmjLRmNL4gHUkday7SZYglRGjWtTQuqWZ2f9Od+b98Mzv/e/z +fHgN4j4LjJdjMBjxbx6ZN48s4//fRY373rM5l10l9LerhM930IyHa0oTWTqO +xIowThEfS2hgEqui3Gk43UHWhlgD3fy55RMxZsRHYRkyOb1wX59YD4lNZX8w +0w4S68NXw9rFIHvARcKGsFGpqebUHaAeI8TomZXWLR4ifh+Gck478t1SNoam +bIODoFaB2BQuSosz5s5b9H/mGLF/xtS40k5sgf7v6wWNMavtErbEuMFWJEt9 +j9gKGxysKM68JraG6a6z9/CtbWIbsHP4hw0jVog/Aq/VpNSJ3UNsi5Kr+Ral +cy/J9zGa38plD1SsEjMRdEjN+GHqOrEd8rxixPbL0t0euT8WJnt+M0/sAJ29 +qcmKlh5iRyxk6vXeTH9GPif8oG0elqCyQOyMzLQq5X8dl4hdILjklhpRv0js +iqBE1lpD4ywx0DUowyq2p/4CwCEq9Q7HYph8bmiUb4nm1M9KuMANtUxbiMKk +fe5oCS2/EKf2inZ3/HLGvMXHYpp2D7iER2oml3XT7gH27peJEzmPyO+J9m2t +7VTr5+T3xIutkam9KWnfSdwdPhezzCMuOIkW+TNVbuti2r3Q53Z8Lf2fLtq9 +0M70aPDZayO/N5LU+Tdm7jwhvzd6xArM4ixpnw/iOyevnDhLXOADm4sLjPJ5 +ep9xCgMvr397L7GL9lOoKufaMUQ/k/80Nu9tRibyR8l/GqNPhisEv0v7WNDa +VbzQUjBBOwuLy+9oeVWO0+6LwWrTxXf/6qTdF3szRoVpG/Xk98NPhetXmw4O +kt8PH3Ly71rGSvvY+CJtIMMg7yntbLw+3nbk1eAo7f6olD0wpFvYSbs/9EvM +tsX5AvJzMKdWZLPt2ythcPBYuWLdXTBGPRwkfOCeJND+TcJCDorEbccYUSN0 +HwDl9Ca2nxH1IwCifr3p6HN88gXAaHNa8XE+fb/CAJSNiWyrk0eoLxD2KstR +JiZjEkYg9rnORsmxQ3QfCKuImYaMcSHdByJ7atluS+c8+YMQfNvk6Wqc1B+E +TwORNGs2SP1BUI/5rlt0nXqFQVARWSlkpojonovpXd3Umq+EdM/FNaVmzXJW +Nt1zwTrKZLTdou9JyAX/8H7cEd1+6g+Guf6Q73w89SIYPe95eHZ00F4QDP8d +uWJttrQ/GEYb17azxDfoPgRFDyIGl0xbyR8CXe+mFzKf/0r+EPCW4j6R06Be +YQj+HK4ryeb0UX8oWKz9zUta0v5QrDpN5macvU33oYje6VrdiGomfyjCwt+u +rHZ8RH4evl6JzXugSr3gwVz95oiXai/188B9nqIS19dB9zx0yrfW5ITX0n0Y +LisMtXocbmr/D7Mi7SE= + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-0.00002789813727762447, + 0.00002498624159649449}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"5", "25", "100", "200"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True", ",", "True"}], + "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800007713597684*^9, 3.800008385348489*^9, + 3.800009492731853*^9, 3.800252979527582*^9}, + CellLabel->"Out[77]=",ExpressionUUID->"cf49b5e5-2504-4041-8500-14815d97eac6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"100", ",", "300", ",", "500"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"100", ",", "300", ",", "500"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800157267882909*^9, 3.8001572811410637`*^9}, + 3.800252983221531*^9}, + CellLabel->"In[78]:=",ExpressionUUID->"130e809d-7d20-4f5c-9d02-13bea2e20883"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{7.740620395774781, -0.000022316091392252793`}, {8., + 6.217847980931413*^-6}, {8.2052996152538, + 0.000020911013080180836`}}], + LineBox[{{13.567783951588067`, 0.000020911013080180836`}, {14., + 3.3042667034285397`*^-6}, { + 14.77214751753391, -0.000022316091392252793`}}], + LineBox[{{19.175440722365252`, -0.000022316091392252793`}, { + 20., -4.204916809838949*^-6}, {21., 0.000015533770694073283`}, { + 21.40810527646419, 0.000020911013080180836`}}], + LineBox[{{24.73370562654217, 0.000020911013080180836`}, {25., + 0.000018034527659047004`}, {26., 4.102640221318611*^-6}, { + 27., -9.221333084717924*^-6}, {28., -0.000018775469844149242`}, { + 28.91337956492321, -0.000022316091392252793`}}], + LineBox[CompressedData[" +1:eJw1k3lQjHEcxl+MY1EohkirjGOWdCjj6Hi6o2jbu9OoqRiNSkqTa0tGMpPk +iHTYonE0Ta2aRsO2umWzJVa1WaWGSghT+oNx7bd35p13nvm8z3ye38z7mofF +8CKmMwzj/ff+99xwfkkFZ70jfp/OZB+K/KFg/l9O+M3fYrg8dZyyM7yTlEXj +3FHKgNyY1b7YqF2fpUANZ5nfYE6Xk5674Lpu5ELhvY/6LHXBwL71ZSmhX4m7 +orxAXrTUZYy4K/qrHRzV4vfE3VC7LjyFVd9G3A2K1tAhkR35GHdwUvnH7oQM +kt8dQwVcw3WZI8Q9MGFrZWRwfZi4B5zyihfFer4j7onbjnIfXtYz4p7Yb1cb +XFrcSH4vVJZ/S74/riO/F5jS2w6zvg8S94ZFk2xlaR1lqTciJj4FZpTR+8xO +NFQnBs2+9pT4TgQ2JXdoKh+RfxeMvuevCDXuIv8uSL2y7twb6SPuA1d2SU31 +ln7iPlBEOUTOdOsh7osdqrk95zTNxH2RFhSxeWWinPy7kTzvZ7d2Tif5d8PG +srbpglpLfA+saz/LLrHeEN+DXs7ww1sdGuJ+0Ea59rW6NxH3w5nHFvHGJiXk +54LTFXFfnvBcn8FFXmD0AZ3la9rDhVNhnLPmBZ1PycVyRXhu5MKX1PfHybK+ +DQptA/X98dZmwPKy51Xy+UOVVGKbcalFn5X+WHDTLMAonc7D8JDpkW6vin+l +z+AhRiM1zFZ3UJ+HhCo2z/lKPfV5UPEu9hpsP0p+PoayZ4RNfqknPx+SDFa6 +ee7U98zHvr3HFUzlC9rPh8DyRqa1Tk19ATbVVTVbRddRXwBHr1+NCV3J1Bdg +Y+fauyFbleQXwN7MIkd3UEX7hbjar77VEt1O+4UIjD0cE15BXCoE+1mOW1Dw +E+oLIWtv627zzaK+CA8akrqNo2rIL0K1NjrpRGIL+UU4dk42VjGzjfaLUN5v +uko3+ZT2i6HuyV7LDVNSXwzBXuZDWWkO9cV4sDqNVRhXRX4xUmTzizVrpv4P +CcRRW0/1NtD3DQkaA7aZuOc3034JZKbTgo9MKKgvQero2WbzgHzqB2CUXbTN +TFih+AO2bnJv + "]], + LineBox[{{0.6659696328973274, 0.000020911013080180836`}, { + 0.6674105363797418, -0.000022316091392252793`}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{7.369796644258474, -0.000022316091392252793`}, {8., + 2.2213587791328483`*^-6}, {8.723142492903635, + 0.000020911013080180836`}}], + LineBox[CompressedData[" +1:eJw1kg1QkwUcxgcG4eC8sjtEBgyKWELHjVIg5ePBsQ3Ewb4HicvgpvOAU6Ej +kagZR6MTcJEBGqTHVxekgKkg32pAYBQgZiAC09HgEi9IwY/gsvbfe/fee797 +3ud+z/vhlXRAqrFlMBgJz8//rqsvPf6qJHkTCm5lT0fMPwpj/H/4Ynq/88qg +YoH4TTxMz7md9MJFYn8w219x0K+YOy3MRWBya125x0PiAIw9czsfyloifgtq +/eC1wuxF4rfhp24+MTkxQ7wZHXO1622S2om34J/c8DRB1jj5AsF71JQivDhL +HIRit19iWb33iYPhuLfKHCSeI34HDgz1wpanU8RbYd8lyvNP7iDeBllP/lz6 +2SHyhSBoOLOl43UjcSgM7h78LpOJOAze44axCtY94nCcf19Q7aQdIwZEgspU +Z88OC+uAZjub0JmjveSLgI3PVmiKxyysi4DfbuP6K4HTlG9H3qGFssWaScq3 +Y/IJM9VHcJNyHk5vyDc3fdNOOQ97vp+/3ZLVRf5IqAKMfOOTG+SPxBfptSF7 +Y8cp56P+M9+PueW0V8fHgdrsE/hwhHIBRoKOBZg86f3rBOD3vVaXIrpEfiFK +n66kmN2GyC9E3IPRQLPdb5RHofVwmLaOSayLQrPe/1WvDLqfEQ1VsuO+T5vb +KI9GiUsV55Smgfw7cCfdy3dj2QD5d8BptP2DqCnrvhj43WrsY2qszxeDDHuN +mnt3kPKd6K8fjd+maaN8JyKVvDuH0mrIL8K6atEyU0zfQydCmzGQ926mdV8s +sjYulaxJHKY8Ft7qpj73ouuUx+Hb4R8k+jes++Nw80/huYmgr8kvRn+qS7j9 +4lUL4znncnhLHrRPJ8bg/qKEqE9+tXC3GOz8M394XuqnvgTpWm7xwGor9SXw +rjQ4D7sXkk8Cn4aC7Pbgbgt3SzAdssckZA7QPikmjuqftdz92cKQokN38Kwh ++CfqS1FRtk+5a6aV+lJcrmOfMbIOkl8GRv5sDucBvT/I4OS6xIrI6aP9Mtx3 +2Vz63WX6Pt0ycGpsvRtXe6kvh2rqd4eRMet+Oea64orYVzOoL4e258WqDe4t +5Jej3DFE5qXsof0KHBkXSNfO0l4osFx9L/HUY8p1ChxGJct13LpfgQp9TUFc +5ufUV6LQYKtquHGB/Er0cm3c2DnXyK9EE1vCNiXQ83Qr8V6nY8iUaw/tV2Ge +X5GYZrLuVyHP2dSoPf0l9VV4eZlzbNffTeRX4cKm40fWGK+QPx4n1x4X1zPo +/0I8apL+slu3+0faH49c/qRT9LJ1fzzkjR8lpA6dpH4CSpelZTHXz3X+C1Ov +u/Q= + "]], + LineBox[{{0.6645755653586485, 0.000020911013080180836`}, { + 0.6688982758058919, -0.000022316091392252793`}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{6.999241676989212, -0.000022316091392252793`}, { + 7., -0.00002229351451531446}, {8., 1.3515305287579716`*^-6}, {9., + 0.00001711035953902697}, {9.510373367889397, + 0.000020911013080180836`}}], + LineBox[CompressedData[" +1:eJw1lHlMkwcYh1sz8SA40wESC0wcTocEhDmZTOFHgQoWsAel7EIBqZtayv5g +TsBRCAOPEqcjgKSLEBRlk3sWEFfKVWpEC1IGrnLILHSgTEbALS7s6tsmX5on +b988z5t8qUeSXJiygsFgfPDv89/3bbZMIORthXI4cyLk2WIQ4//PNryoLYr/ +/OECsRfmZg0z/jFmYm+wX8rqRx5XE/tg8oyngFM2qrHyDhQ670jeOWEh9kP7 +BQe+XfIssT8Chv3y5fNTxG/DpDIGyv1MxDshXF5g9dQ1EL8D/dZLR64U9JNv +F/JWqVeXzowRByDPxBRVr5kkfhd15w2cob5x4t2Y/7uKGbLJSByIs/k15Smn +G4nfg4rp0lf7Wg/59iCxSjnWrR4i3ovr43+G3sj9mTgICx4rW+x4I8TBELjF +FGh9+omBtYOhsZeLG62sACZLxj86dOc2+ULwfVlGW3MS3aMIQU65pXJ+wNbH +wYRxPCe7eZDmHPjUXZeEye7SPBSmozK7sCzqV4TiQYl8uyHhB/KHofGzpatH +LXfIHwb5rwGbezcM0DwcmlOF0Rk3qFcRjnWGwbfaNuhpzsXYcde5uSRbPxfh +bhzd7K4a8u9Dpb3qQ5c3e8i/D5Kvf0ptWeqjeQR+z0xbq7e/R/MIRKqMYmkL +/Z4RCXNQAntAbOuPhGN9mrrCcIX8+6EcDLZ8V91B/v1IedCtjnSnexg8FDG8 +8r8ctd3HAzfV7smRF100j8LQyS4nb4mtPwqHzb5hH7eryB+Ng2tct11b/pH8 +0Xi+XWL51ltH8xhMNI6cm5L10jwGSn1bX39FJ80PIOt8c3W21NZ/AAl5qxyi +My6Snw+mg4odpGu1Mvh4ej9wo+9D6lPwwWVtaurKpfdNy8f0stnBt5TuZQjw +SonweV4u9UOA1V+NPrFn5pFPgLnFv944J1ZbWStAHSvxVOhSB/UJcTed6Ti1 +1GVlCJH1anq9i05L+0J0ryyVj1RTv1aImMrX06ukUvKLwGO9ZEvTm8gvQvL0 +zaCGFC31i3BrPudgTkMn9Yuwp/NxocaN5oxYXD58Ya+fydYfC/diXuKh+8do +PxYy5+71nzAayB+LX+ok98q3aKhfjFZVsC6tgu6BGNGsb2pnvNqpXwzP/rOe +cqcm2hdjgHXtmMEjl/bjEHlT3dHaUkP+OPhz/vht3Vgb+ePg4pXal3mLerVx +cN2cNFwQpaF+CRY7zcFlEtv9EnQcf+RcGKGkfQlOn/Rn65/S/59WAtGWT3d/ +Md5K/nhs7I1wTpymXsTD3Wn91RXFtvctHieKhp+Nltv643HJ69EJ4+BF2n8f +3dmOXPecKs0/I7XKhA== + "]], + LineBox[{{0.6631814978199698, 0.000020911013080180836`}, { + 0.6703860152320421, -0.000022316091392252793`}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFk3kwnHccxleNyiZoiiSCENqK2UYcYSvieJzrjLW7WGeCIm21pClVkmYZ +JuIPcdXViC6JUTEGYTTaro1bUEeSrStqw9QRaTVKM5NKmpn9mu7M+8dnPu+z +z/Ob+b1G0Ym8WGUGgxH7+lF6/bzB+P+Xrt3IkacVOylo3UnBWZ2kwWTpP7Ja +8ibehe2KOBmLzyHei31PpXdNSl2ItVHjt3yGX2RHrINytpr4My0LYn14GahF +udnoER9G+PwSM0J72lHBxvg7Nduf/aE27XkXtgylhJIn+sQmMDnA26OTv8Om +eDi8kb/as4+YBZXwlawX+1WJj0IvpOXBTPsQ/f8xCC2VC+T8VxIFW+BSWXRs +tfJu2mMJOG7nWfipEVshITxncPJTVeLjYGePXZxMekF5axTXcX58WT1ObIP2 +CyplY17r1MfG2tCdM1Ldl8QfwOmrQQeHMCXaZwu5uoDzg/2OPwH3/SN+eivP +iO3weNbc1MxmnPgk+mLORtYHLVCfPVTHC1IYTRvEDijExMf50n+IHfGKz9bQ +zdwkdoJnqrR6k7tGDLRoMce0NccULAI6WDr+i6WT1OeM8rnVq1X1TxQscsZC +lGljRuRf5F3QdL2l+oAznVfkAnm7vcNo8O/kXdF5JCaD2T1C3hWSe5HLQdbU +x3ADK5OfXhexSP1uWL7O1TiSt0reHVtW5prq5Svk3eF4rebtJI/H5D1w06HF +h5c/RN4DZ607wxtqeqmfg9amZ2m3NueonwNGw037NzcWyXvCuE98qKGLWOSJ +2K2nobmN9D7DCz3tKWGqZYPkvRDalzYua/2J+r2huVGpF6k1Sf3eEHHy6+pX +58n7wMWwtqOdLSfvA0m8fZyK6zR5X5wc3j19RdZP3hdZYbHHD6W0UL8f0vb8 +OzWz6z71+8HSrLPv6ugM+VOw6PxDXMR8RP4UZlkrd26My8j7YybeZf6eWx95 +f2T/bHxe62At9XPBmoy91ZL8i4LBxbXQhI/mzH6lPVw4Vp1zkk3Q+aRc6Epi +KuL2PqB8AL5unH9fMtND+QD8ZrlgVuxRQn0BGE6ttcotGlCwNABvfWcQoplD +52HwkOeeYzN8/qGCwUOiTKRROEr3XcRDcpshz+mbbsrzMMwrmFW3+5L6+Vgu +VI5+/mc39fMhzGXmGFXs3Gc+ok5fkDBaJ2g/HwKzb/Ms5kYpL8CxrrZ+84Qu +ygvgwNnuTZ5Mo7wAR++bfB9hK6V+AWwMjEvnPhmm/YEokY/eGEgYo/2BCE36 +PDGmmbwoEIZDpa5h4XcpHwjx2MjUiG8+5YNwuyd1Siu+g/qD0D6TkHoxZYD6 +g5B+RbzerDJC+4PQJNc/PPd8kPYHY3S60IQbLaV8MASnGUuNDaWUD8btd7KY +VefaqD8YGWK1Gtl7O9+HEMHxtpdme+h+Q4jekBMH3Sr7ab8QYn2l8C+2JJQX +InPtcr9RSCXlQ7BmWH3CILBZ8h8fD+qz + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFknswXHccxVeEyjKmTTKIxaJCQkdXmiDxOrJ2EWFZa5d6NGU2kSISOhpR +7apROglRMSEpTerVCU2QSrwfkXqm6hFpQwSbrKINE5rSRGVqZr87vTP3j8+c +e+Zzfvdes8h4oVSdwWBIN261jXsT4/9LwJqrS/NLcVPSczclx7RTDP2i7/6w +NN5DrAXuBZui3oZ3id/E0oJu+MOs3cTbwXF32d97wpzYAFH5HRZNGXrERhjs +Nvio0U2d2BQ9VYJZUUmnq5LN4TS4uLL5xDqxBXYKJupatmnQPkv0e4SubddU +8S6I4wuuddkyiK0xfVxvfSBoifrv4EVC6qPIzbeIbcFs2aaVuT7bpmQO7KOa +KotMXhDbYWzN6KYLa4V4DyIyB+5mpywTvwebiPr8yYkZ4r1ona/YqhbZQrwP +/6a7xfGTx8lnD+7ftTGet+aIHZBn9Isfq/sZsSO0j5bOOvjPE++HFiNiad+r +KeID0Gz3zbCNaiV2QmBX1nzC9SHyOcNhOKmhdaec2AW5xia8doWC2BUW47lj +xaynxG64+SG/TCd6jBjw5ZfE6pm2KlkG1GuoucykdZPPHWqWByDNG1OyzB02 +4fKtd+ynKT+IjFNLhcvlk5QfxORLZqwl/wHlXFzRz5qt/baFci6O/LDwqCG5 +nfwekNjJefKX98nvga8TKpyP+o1TzkPVl9afcYpor4yH+IqUfHwyQjkfIw5n +7RSm9P5lfPB63q6M8b1Nfk8UvFqPmTUaIr8nBIuj9rMav1LuhabTrtGVTGKZ +F+ozbc3NEul5hjckUdrHvqhvptwbFw1KrS5Lq8l/CI8TzKx3FPaT/xB0Rls+ +9ppS7fOBzW81PUyp6nw+SNSURnCeDFB+GH1Vo8FO0mbKD8NDzH18Kq6c/L7Q +LfNdZfrT95D5olluz30/SbXPD8k7Vi6qhw1T7geLiNoe45x7lAvw/fCPAZm7 +VPsFePCn540Jh2/I74++WAM3zeVOJWOD0624Kya0T+aPgeM5IV6fDyq5wx/s +rKu/m97uo34AEqI5ef2vm6gfAIuSXL1h42zyBcCy+lxKi2OHkjsCMO18ROHJ +7Kd9QkykZa41PPlZyRCiVXbyeq5jL/WFKC48Jg6daaK+EI2V7Kty1knyB4KR +NZdqtUjvD4HQMVxhuaf20P5APDPYW3Ctkb5PRyCsyjdZ1Lzupr4IkqmHWiNj +qv0izLcLctididQXIbrrjVJ94wbyi1Ck7RxoJu6i/UE4M84XbpmjvQjCatnT +sMv/UC4LwmmUsAzHVfuDUJxZfk6Q9BX1xcjO3SSpvl9HfjG6OWpG7NS75Bej +lh3AVoTQeTrE+KBN23nKsIv2S7DAKw6LU6j2S5Chp6iJvnKB+hK8tWp1NvSv +WvJLULf7/Bl1+R3yB+PSlvP+VQz6vxCM8sjnGrrhP9H+YKTzJnW8V1X7gyGq ++TQkdugS9UNQsCos9Ll3o+0/nHHojA== + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFlHlMk3cYx1udCBIcYVyxwDgdQwLCnCAifOUShCK0lLJsQw5Bp0IxGXMC +jkMGqBCnI4CkixCgysbNKCCulBsjWk7BIYdMjoFDKhNmMGwmfZq9ye+PT77v +k+/nSX7vaxIh4ERtZTAYUe8O893Zwvj/eVsuH2RHxLkqaMVVwWGtFMPx1Hpp +ZY8FsSoavu6RLbHMiDXheEkt8eCQEbE2Zp0v1Tz21SXWR9kG28vET53YAMuv +XopCw9YlCjaGiMXK6qkQuyjYFHpmfn+ryOXE5hBIqsa2St8Q78acZWX+uXtK +tsR6VW7IN09Wia2wvCRbtPefJbYGayOmZuxZObENZi6bB7oVTlD/XuTo7o3c +N71AbIfW6xoBKpFLxPZwGLXLEMjniD/BuHDYSWA3TrwPnM1Vra7qWuJP0fvR +zZOlmf3Utx/p28WqBYuTxA5IH2dyy9VmiB1RfU3mNtI3RXwA8n9FzMPGw8RO +uJJRWRSVVUd8EEKmfl/VB13U54xwUfZkp3iE+BDuTL1xr0j7ndgFqybbmlR8 +x4hdEWjonym16ScGdgy5B93Kq1NwCjCTP/VF2P171HcYvxQmtDRG0D4ph5Fa +tFAiH1D6uWF6eCo1uXGIcjfYVN/he8Q8oNwd46djVDySyD/FHYP5gj2y0F+p +3wN159bKTi/cp34PCP50MO3RG6DcE5KLOeyECvJN8cRO2dDHLXq9lHth8qzB +8nKE0t8LnoZu3Uv7K6n/CErUhZ/r7+6i/iPg//A4tmmtj3JvvEqM29Gr/pBy +b/gIh3nRTfQ+wwezLqGsAZ7S3wfaNXHiYlkp9R9F9pDrws/lbdR/FFGDnWIf +I9qH4YtchlXGdxPK/XzhFavy/OR6B+V+GLnQoWPNV/r74cSsrceXrULqZ+O4 +moHl7c3fqJ+NlT38hZ+suyn3x3Td2NW5mB7K/ZHd29LXX9xO+TEkXWssT45W ++h9DaPp2DXbCDeoPAFNDyHLpblYwAvDikdMu2yfklxIALy3j+o40um/SAMxv +zmrYFtC+jEC8l89ZSU8jfwRC9fuJ5+rMdOoLxPLrt2ZXefR9SwNRrRV+0X2t +jfw4eBDP1J5b61AwOEh6P75Gv1tK8xx0bisQjJWTv5QD/5IP40XR0dTPha/W +Bis6vp76uYicb3CpjZKSPxd35anHU2vbyZ8L5/ZnORJDyhlBuHXi+iG7caV/ +EIzyfMPDHp2h+SDE6HZqnmLUUn8Q/qjmPyyykJA/D81C1+64YtoHPLC1fqxa +tGolfx7M+6+YC3TqaZ6HAa3bZ2QmaTQfDJ8GcVtzUyX1B8Pe7Z+XOydbqD8Y ++laxfYl3yVcaDAPTiNFMPwn58/G6fda1kK/cn4+2s091c7yzaZ6PrAv2rN4X +9P+T8sG1+OrAt1PN1B+CXT3euuHz5IsQGOlolm3JU963EJzPHf1rokjpH4Kb +Vk/PDw/doPnP0Jms7WWUKpL8Bzr//D4= + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-0.000022316091392252793`, + 0.000020911013080180836`}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"100", "300", "500"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.800007820254202*^9, {3.800157272865856*^9, 3.800157282524054*^9}, + 3.800252984801407*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"0d332ed5-967b-4586-bb01-b421b9550e00"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "10", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"100", ",", "300", ",", "500"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"100", ",", "300", ",", "500"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801300518858911*^9, 3.801300534915441*^9}}, + CellLabel->"In[79]:=",ExpressionUUID->"005b1227-a5fb-4b5d-a72b-43e663de0b72"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{1.928355710358927, -0.0014786397029451538`}, { + 2., -0.0008210180623973727}, {3., -0.0007118186156745695}, { + 4., -0.000567335056536863}, {5., -0.00040550981148720406`}, { + 6., -0.0002452988710935716}, {7., -0.00010379056790210077`}, {8., + 6.217847980931413*^-6}, {9., 0.00007778722272664182}, {10., + 0.0001103220520244371}}], + LineBox[{{0.6349497993063238, 0.0009515060208102884}, { + 0.7159546567648385, -0.0014786397029451538`}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{1.6067162346061874`, -0.0014786397029451538`}, { + 2., -0.0002763957987838585}, {3., -0.00024201821187044324`}, { + 4., -0.00019481316715351486`}, {5., -0.00014063066611892097`}, { + 6., -0.00008591602926395904}, {7., -0.000036714406871486014`}, {8., + 2.2213587791328483`*^-6}, {9., 0.000028066409352780374`}, {10., + 0.00004020137440199763}}], + LineBox[{{0.5715160645856379, 0.0009515060208102884}, { + 0.814530636961182, -0.0014786397029451538`}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{1.284301039115265, -0.0014786397029451538`}, { + 2., -0.00016616816218012627`}, {3., -0.00014579061088585357`}, { + 4., -0.00011758852520805669`}, {5., -0.00008505342350705358}, { + 6., -0.000052065625630418826`}, {7., -0.00002229351451531446}, {8., + 1.3515305287579716`*^-6}, {9., 0.00001711035953902697}, {10., + 0.000024557169620186033`}}], + LineBox[{{0.5080823298649519, 0.0009515060208102884}, { + 0.9131066171575256, -0.0014786397029451538`}}]}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 0.02}}, {{1., -0.01}}, {{ + 2., -0.0008210180623973727}}, {{3., -0.0007118186156745695}}, {{ + 4., -0.000567335056536863}}, {{5., -0.00040550981148720406`}}, {{ + 6., -0.0002452988710935716}}, {{7., -0.00010379056790210077`}}, {{8., + 6.217847980931413*^-6}}, {{9., 0.00007778722272664182}}, {{10., + 0.0001103220520244371}}}]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 0.006666666666666667}}, {{ + 1., -0.0033333333333333335`}}, {{2., -0.0002763957987838585}}, {{ + 3., -0.00024201821187044324`}}, {{4., -0.00019481316715351486`}}, {{ + 5., -0.00014063066611892097`}}, {{6., -0.00008591602926395904}}, {{ + 7., -0.000036714406871486014`}}, {{8., 2.2213587791328483`*^-6}}, {{ + 9., 0.000028066409352780374`}}, {{10., 0.00004020137440199763}}}]}, { + + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 0.004}}, {{1., -0.002}}, {{ + 2., -0.00016616816218012627`}}, {{3., -0.00014579061088585357`}}, {{ + 4., -0.00011758852520805669`}}, {{5., -0.00008505342350705358}}, {{ + 6., -0.000052065625630418826`}}, {{7., -0.00002229351451531446}}, {{ + 8., 1.3515305287579716`*^-6}}, {{9., 0.00001711035953902697}}, {{10., + 0.000024557169620186033`}}}]}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 10.}, {-0.0014786397029451538`, + 0.0009515060208102884}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"100", "300", "500"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.8013005203192987`*^9, 3.801300535424065*^9}}, + CellLabel->"Out[79]=",ExpressionUUID->"b81d2a18-78dd-44fe-87c6-b7126c75f3d6"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "300", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", "500", "}"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", + ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", "500", "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.80010401161628*^9, 3.800104038522951*^9}, + 3.8002530377488317`*^9}, + CellLabel->"In[79]:=",ExpressionUUID->"f34dda2d-ccc2-4e95-8433-501f85dab860"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{7.66750451622899, -6.510340161958214*^-6}, {8., + 1.3515305287579716`*^-6}, {8.32329381113266, 6.44626241847574*^-6}}], + LineBox[{{13.395506962273885`, 6.44626241847574*^-6}, {14., + 7.71350045933184*^-7}, { + 14.930073723949649`, -6.510340161958214*^-6}}], + LineBox[{{18.99394203075019, -6.510340161958214*^-6}, { + 19., -6.483341093577883*^-6}, {20., -1.0542035616122525`*^-6}, {21., + 3.941023913942321*^-6}, {21.730386819385185`, + 6.44626241847574*^-6}}], + LineBox[CompressedData[" +1:eJw1l3s81OkXx0fbdUupJN0nRbf9RbWlteGTW3R1l0uMYcwYc2+tojIj3bUp +LZFqkCKVW0SKSRpsCuliSWYr3S+qrdVum1+/n/P1j9d5PR6f9+c855zn+U7l +St15/Vgs1hg9Fut/v1++NuqQChZj8+RBU44Nabdh/f/nB7ztPaG3lH2LYivs +3n5GzdtZRPGPSNczbjg7+mplX7wEwScS7teU3qbYGjmdn+xPx7VRbIP3UweU +DVzRSrEt3Cat3qGZ20Qx8G2Lveex5KK+WAk8SOkM4NRfJL2lyEuLrjjPbeqL +lUuhUj/NetvM8NlBd6tTFXu+hdbtMDc/x8dBfI3W7dEuFA902ET8SnvcTJHO +aQw8R/oOKJJ/zBY+rSd9B0ifWZrUjm2mdUdUbt67Kvo08SodMbyxZVbF2Dpa +d8J90cTXr7kMvxMcJ9lpXyw6Q/rLkDU03d/Y7CrpL4NP4h1J2ccGWnfGuxjZ +t3VDr9O6M1zSb3mFldHfs1zQZRM4odmL4XeBYYGsNKPxOOkvR0KL7dNTuZdJ +fzl4N2tKXSaTH9YKHGTN3r6lg/G3Ak6SgY/4f12h9ZW4vfHKmO98GP6VCO0y +d1hXlU76qxA0ZOLMk18ukf4qdM/xeXrkOy2tr4auqHXPY3Etra9GQl1FQ1NG +Na2vwaZ953Njwxj+NQiMH6S/KvoA6btCTz99go22vC+GK17esBpv/jvxKV3h +NIpdfCWO6k3jiidfuvTND5Fflhv6p7h3x8cRP9wweFvHo6F68aTnhtcfPk/b +41XaF2vckD8qeLP9x8vE545rkXqGjz9e6Yvhjk0jIguMtRra746aAYekrbnE +r3HH6qwpkSfCwkjfAytG/TMhLLKY9D0Q8qTEppCnIX4PXHirClIVVhO/B5ZU +/7G3chKtszxxLHS/9bx2ht8Tk5NXBHNuRNB+T4iNagwErELS98TDfJ/ratNK +4vdCebqtVpZBfuCFVaOSzj6fXUX8XpjetHu6dEwx7fdC86iTEY1T42i/N1xK +Si+Xl50hfW/Mt+t5M/x+Bel7w3i2pCHmAvFqvDHRhHt3x8pK4vfBh+ou2zQf +xr8PLovuGe11TqD9Pti5cf6Eupe5pO8DD9PwHzZ0lpP+WoyvdTYKfkK8WIvJ +Ywyy+yUz9bYWUQfvvupQM/xrkTr7XtStlgO03xc1sYZOk1UnSN8XO9L89owd +X0b6vuhyKH1SmkC8Gl+IYHt7d+9F4vdDtLlVfVw3w++HkQUnfH0sU2i/Hz6f ++WRawckifT/MiJra/U5F9cTyx5qRDXvK/IgX/jBpH+hstJXml9Iftr8UfXnq +eI72+0N4srLrLucw7Q9AretDw00xatIPQPOJiKKr+iWkHwCnPVNdBS7EqwnA +yvxrnQ8mMPzr8GxWO3ermuYZ1uHI2rovSwKP0f512Hk4NX/PLtLTrIOnYN1j ++1LKJysQb/OmNUjdK4g/ENZ18elTtBQrA+E8YqZnSy/DHwhVfrfD/CMZtD8I +w87u5Fjwkkk/CBaHVhemRDLzJAgL7Qx9imUXiD8II09tkOdvofpicfCgx8uD +F0J+2RxIrmhT3m/Jov/HQXav3vjGjfv79DgcHPE4Wt9/GfWDkgMX1tLa/mqq +JzUH5tebOP/aEb+Gg2/Ofvr+xm8lfbGOg6E5HaeafbKJPxg6+5yslJ92kX4w +Yhedack2KyD9YCR5p8W8uEf1xAnG04v5knsGTH8E46clSY05C0v7YnUwfM0q +ixNnnyS/wZi7f6xDgaWS9IPx513tgiiTs6TPRcxL9zkx08v6YjYXmf6WbdLH +F+g8uNju761/MIvqjcOF6mXxEcmnHPLPxcHAAI/UPBHpc3Fkf3vWyMGnSZ+L +GxGJ0xf+dL4v1nFxTltpOa6azoMVgnq7RavmGdI6OwQDa62sbbSnyH8IqrPf +FdcPX0n+Q+Bh5nhO/In6WRmCiiHjBr+tJz51CC4Zb6sXZhK/JgRtDtp+03ac +J/8hqOuxLYw5cJr8h2JjS5DaZV4k+Q/F8uYFb1XvKH8IxZ28uZ9+m0b55YSi +Nerx+4nbiV8ZigWfH+4Y+pn41aH44x/9Bv+gs+Q/FJa8xevs+VvJfyj2Wf+t +rXvDnD8Puammt8YoqT7YPLR+X9o7QMTkn4efGzvHJCjofDg85J1b8vSFUQH5 +52GD3hmt/aIE8s+D6E7YuRmvqX41PJw+sIvv2kH9qeMhg38pZbQHk/8wrJcO +vm//nOqLHYauYcMW+/cy9RcGi0/ly99sp/uSE4bcL9c72p9T/ynDEBU9/s+J +VtSf6jA8rKtJdrRi8h+G+a2LfmzkUn/owiDPPenn8oz6h8VH3PHM0qN/J5N/ +PiL9dOtva2l+gA+HwO1Cq19pPnL42DSm+24um8n/19ja/S9tO93faj4KMj6e +6r5F/a/h427PrV63jYfJPx9W8XOb5uQx80+AwAGH9WJf0f3KFqBoILdx7QAm +/wI8SLyprvKkmCPAlKcWvOhqml9KAVTDRxg96qcm/wJ4Zp7pydxC81sjwIHk +tb+3LCUenQDKlLwqxRPiZYVDtGfSK+fr5IcdjtZYU0tWETNPwzFt629jF7pl +kv9w6BuX/LzBOon0w/Hm+hv5vP2UT3U4DL6YREzSUr414UgU25m+cqB5pAtH +1udh0r1ZVG8sIVQmxVtO5Rwn/0J4Wl/bwqvbS/pCzP438Fp6G9UDRwh5p/7M +ODXxK4X4OGfyYYsKmkdqIVqvptybkkL9ohEiSfS8zOJb6iedEA86nIVzO+l9 +xIpAWlDsMNNJVM/sCJgN93NoiCR+RGBVQIDpfnO6zzgR2Brkvj4ngfpZGYHg +0Xm2v/5M80AdgXsx+Ud3KqJIPwLmodfMr+RTP+oiYMn+kjvDkcm/CFv/mZyx +LYPuM7YI2zqHXxgaT/3w9bYeGC7p2fk6j/yLUDd+udegne6kL0JhauAH3Wh6 +b6tFsPsmoqxKn8n/1/1VARs2G9D9rBPBJV5mYLKZeX+I4W9cyMpU0Dxmi1Hj +fLwtL0ZM/sVojg1Y8TyU0RejJYS1vPIG874QI+qEzXe6mEuUfzEu/Xql+XwU +c9+JIdih2XJWReenE6P/mpeOsf4q8i9BYFd0/dwMyh9bggFOwvvLd9C8gQQT +yv98MOwh8XMkeDa+0W/veuZ+lkC1KEBvXxNTfxIo/jY8qsjdQ/4lMDm2cMyA +Wub8JTA64vFo1yLiZ0nBCs/o8XWk9xFbioOls/7yltF5QIrO022JxmZM/0uR +1pPqctgsifxLkRvlllR/i+apWgpDs6GT09upPjRSrD81Mckwk96rOin0FOXl +F8XkhyWD7+hx3rw4ml8GMvix1Ws2Zx+ifMhgO2Mcv6OO5qmFDLs8cicdjaR5 +Dxn450WLlT3E7yrDDzwfe78IijkyTMspStvaRe8LmQwbLjx/6e1xlPhl+LS0 +qiQ7g+Zpogze6oF3Tn5D/GoZLC684N9ZRu/TAhlWWgyOrhRQrPm6f9mN05Fr +6O+bZGjKa3vSa5xJfmUY+iV1pVEF6XXLIPAV2TTEU3+y5BgxZOYip31VfbGB +HB5sQWrJfHpvs+XoDNmcO09D52Uhx5s3bs0pU7PJvxwPPlpZvP+Q2qfnKseC +1fxB43povnDk2HRX/eL9deKVyTFr6ku+sID5vpHDLjzEIsOS5muiHGlc0UUb +B3pfqOXoKPY30nQf7NMrkKN19e6g5ADKp0aOmscuHpv0iLdJjlfPZz+3+A99 +n+nkqLrZ2S+jhOZTtxy9abXCfBX1E0uBar5XW7XrPjp/BQb9blfrVEj1wFbg +WLoBq9CIeC0UsBFfsizJYb53FBiQtj+RZUX15KrA+B85c5LaqJ85ChS2O8/a +tiCezl+B9qMz35t9oHpWKmAs+aXN2Iz4ExXYUHCl97AJfa+pFVgrqlCoaqie +ChRYELUwTjOjkPwr8MrE56bfILnNfwHXW6Zh + "]], + LineBox[{{0.6655922895969206, 6.44626241847574*^-6}, { + 0.6677517233603263, -6.510340161958214*^-6}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFWHtYzPkXnlhhEy1JhB1RbruEVbalXt0URfe7mqam6TLTXGwbQtPFbbEi +KyVMpZR0VyJqNumyolJoS5rNRptbsahl6+d5Ot/n19M/73Pm9L7v+ZxzPp9p +HlfkyBvLYrG+VWGxPv+yxrD+//Mpe+CeHVdsOor6TUcxp5LCWBP04XxurR7h +CSj5sbbxuc58whpYEzsx8oeWuYQ10bM2tuDBJi3C2sj4aGc1z1aN8Gy8evM6 +04fzoWIUs5Gpo3Og9lKpySjWxYz5tv+oDgwQXgBRRV7bWMUQYX08XZSbKLnO +4EX4kHfC/ac/3hJeglfPG/tWbu4h/A10PgoL2v7MJrwM3QcXOJgldxK/AY5o +Gfh/p+wlvAKVx9TtVf2fE14Jo4cr9okGnhJehY6UVmPRig7C38Fx+O3UW/mF +hFejbmES//z+JuIzRNz40gmn+h4TNkJch4pT9sRuwmuQf7TR7H5DF+HvMTCS +qbKe3UrYGD/vy5XzDhQR/gEpKtoNedNuEd9a+GUeflxdep/wOmR1DZlfimkn +bIK388aVqW5qI2wKhzmb9yuWNREGvmwxdz53smgUy4DuxC5vTv114luPnOSd +5Ve45Ee2HtHy3vSBZkafGZStXdFRV1ooboZl+VluFsLbFDdHR4hQ1WIX6ZeZ +416iaGmjz2Xit0CR5H1GSG898VtA9LeRbu2MZopbomL3Ebudl0ivzBKTG1sW +l8+oo7gVHgtmv3rFZfRbwXKOWc1zw1zi34B0tRQvbf1bxL8BbvEPwsreN1Dc +Gm8ixV/Wqd2huDVsUlpdAsvo8ywb9Jj46DS7MPptoFkgLk1tPE/8G3G4xbT3 +YvZvxL8RvHvVpTZzyQ9rE06wluzb08n42wSrMNW/+B9uUtwW93fcnP6NG6Pf +FgE9yy22VqYQvx18J85edGH4BvHboX+pW++Zb2oovhnKorZDT4W1FN+Mw3Xl +DU2pVRTfgl1Hr2RHBTL6t8Anbry63c7jxG8PFfUUHZOaq6MY9nhx13jW8j9I +n8weVlPZxTdjqN8U9ng23KO+/BT5ZTngi0TH/rgY0g8HTNjb+ZeaShzxOeDV +u0/zD7nQfCsckD/Vb7f5+99InyNuh6toPn1/cxTDEbumhBdo1ygo3xHV406J +2rJJv8IRm9O/Ds8MDCR+J2ya+lEnMLyY+J3g/6zEpJCnIP1OuDYQ7RtdWEX6 +nbC26s8jFXMoznLGuYBj61Z0MPqdMffkJj/O3VDKd4ZQq1ojiFVI/M54ku92 +R65XQfpdcDXFtEacSn7gArupCXl9SypJvwsWNP28QDS9mPJd0Dz1QmjjvBjK +d4VNSelvV8tyid8VK80GX09+XE78rtBeEtYQeY30KlwxW5f7cL9tBel3w7uq +HtNkN8a/G34TPNI6Yn2Y8t1wYMdKnboXtP8UbnDSC/5+e9dV4nfHrFprLb9n +pBfumDtdI2PMSabf3BFx4uHLTjmj3x1JSx5FtLYcp3wPVEdpWs2NziR+D+xP +9jw0Y1YZ8Xugx6L0Welh0qvwgACm938euU76PbFzuXF9TD+j3xNfFWR6uBkl +Ur4nPuUO6ZVz0onfEwsj5vW/iWbuCy9s+arhUJkn6YUXdDtUrbViaX/JvGD6 +S9Fwr+VlyvdCyIWKnoec05TvjVr7J5q7IuXE743mzNCiW+olxO8Nq0Pz7INs +SK/CG7b5t7u6dRj9W/H34g5urJz2GbbijHvd8Fqfc5S/FQdOJ+UfOkh8iq1w +Dtr61LyU6snywUDO/AaRYznp98G6uriUr2sIy3xgPWWRc8sIo98H0fn9FivP +pFK+LyblHeAY8E4Svy8MTm0uTAxn9okvVptpuhWLr5F+X3x1cbskfw/1F4uD +7kEXJ54/+WVzEHazJvHtnnT6exxkjKjMatxxbJSPw8EZp7P1X2ygeZBxYMNa +X/uFnPpJzsHyO02c/8xIv4KDsXlD3939vWQUKzlQy+q82OyWQfr9oDTPSk/8 +8SDx+yHKMLclQ7+A+P2Q4Joc+fwR9RPHD73X88MeaTDz4Ycf1yY0Zq0uHcVy +P3joVxTHL7lAfv2w7NgMiwIjGfH74Z+HNasidPOIn4vIF45LIxeUjWI2F2le +Ru2ip9foPLjY5+WqfiKd+o3DRfSL4jNhQ1nkn4sTPt5OSTkC4ufizLGO9K8m +XCJ+Lu6Gxi9Y/eOVUazk4nJNhdHMKjoPlj/qzQztVmhSnO0P1VrjdSY1F8m/ +P6oy3hTXT7Yl//5w0re8LByieZb5o3zizAkD9aRP7o8b2nvrQ9JIv8If7RY1 +Y+bvv0L+/VE3aFoYefwS+Q/AjhZfuc2KcPIfgI3Nqwai31D9EIAHOcuGfp9P +9eUEoC3i6dvZ+0i/LACrPj3Zr/aJ9MsD8OdH9QYv3zzyHwAj3pqt5vxY8h+A +o+v+ral7zZw/D9lJeq3TZdQfbB7avisdGSdg6s/DT41d0w9L6Xw4PORcXtv7 +XKuA/POwXSW3xtzwMPnnQfAg8PLCV9S/Ch4uHT/It++k+VTykMq/kTjNial/ +ILaJJjw276P+YgeiZ9KkNV4jTP8FwmDo6sbX++i+5AQie/hOZ0cfzZ8sEBE7 +Z/0z25jmUx6IJ3XVJy2NmfoHYmWb4Q+NXJoPZSAk2Rc8bf6m+WHxEXM+rfTs +vyfJPx/hnspt92tof4APC599Ica/0n7k8LFrev/DbDZT/894neOHmg66v+V8 +FKS+v9jfSvOv4OPhYOuIw47T5J8P47hlTUtzmP0XBJ9xp1WiXtL9yg5CkSq3 +0X0cU/8gdMffk1c6E+YE4eteA97OKtpfsiBET56i9dcYOfkPgnNa7mDaHtrf +iiAcP+n+R8t60qMMgiwxp1L6jPSygiE4NOel9R3yww5GW5SeEauI2afBmB/7 ++4zVDmnkPxjq2iU/bV+XQPzBeH3ntWTFMaqnPBgaw7qhc2qo3opgxAvN9F5a +0D5SBiP90yTRkXTqN1YIonWL91zMOk/+Q+C87vYeXt0R4g/Bkv98bqe0Uz9w +QiDpUl8UIyf9shC8Xzr3tEE57SN5CNpuJT76OpHmRRGCBEFfmcGXNE/KEHR3 +Wocs66L3ESsUyb5Rk/TmUD+zQ6E/2dOiIZz0IxR23t56x5bTfcYJRayv47as +wzTPslD4Tcsx/fUn2gfyUDyKzD97QBpB/KFYHnB7+c18mkdlKIzYw9kLLZn6 +CxD7cW7q3lS6z9gC7O2afE0tjubh822tGhw2eOBVDvkXoG7WRpfxBxyJX4DC +JJ93ymn03pYLYDY2tKxSnan/5/xK7+27Neh+VgpgEyfW0N3NvD+E8NIuZKVJ +aR+zhai2Pt+eEykk/0I0R3lv6gtg+IVo8WdtrLjLvC+EiMg0+UYZeYPqL8SN +X282X4lg7jshgvYr9uRF0/kphfhiywvLKK9o8h8Gn56d9ctSqX7sMIyzCnm8 +cT/tG4RB5+o/3ZOekH5OGP6e1eh5ZBtzP4ch2tBb5WgT039hkP6reVaafYj8 +h0H33Orp42qZ8w+D1hmnvw4akn6WCKzg1EEPS3ofsUU4Ubr4g6uYzgMidF1q +j9fWZ+ZfhOTBJJvT+gnkX4TsCIeE+lbap3IRNPXV5qZ0UH8oRNh2cXaCZhq9 +V5UiqEivXr0uJD8sMTymzXTlxdD+0hDDky3fsjvjFNVDDNOFM/mddbRPDcQ4 +6JQ952w47XuIwb8iWCMbJP32YnzPczP3DCXMEWN+VlFybA+9L8RibL/W98LV +6SzpF2NofWVJRirt03gxXOWqDy6MJf1yMQyuPec/2EDv0wIxbA0m7KwIIqz4 +nL/h7qXwLfT5JjGactqfjWinkV8x1IaTbLXKia9fjCAPgUlDHM0nS4IpExcZ +Wh2tHMUaEjixg5JKVtJ7my1Bl//u7BUKOi8DCV6/dmhOnJdB/iXofm9s8PZd +0iifvQSrNvPHzxyk/cKRYNdD+fO3d0ivWILF817wQwqY7zcSmAX7G6Qa0X6N +lyCZK7huYkHvC7kEncVeWor+E6N8BRK0bf7Z96Q31VMhQfVTG6ddKqS3SYKX +fUv6DL6l72dKCSrvdY1JLaH91C/BSHJtSH40zRNLiiq+S3uV/VE6fynG/2FW +a1VI/cCW4lyKBqtQi/QaSGEivGFUksV835FiXPKxeJYx9ZO9FLN+4CxNaKd5 +5khR2GG9eO+qODp/KTrOLnqr/476WSaFdtgv7dr6pD9eiu0FN0dO69L3NbkU +7oJyaXQ19VOBFKsiVscoFtL/WxRSvNR1u+c5XmLyP3MqGZA= + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 300.}, {-6.510340161958214*^-6, 6.44626241847574*^-6}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"500"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + "}"}], ",", + RowBox[{"{", #, "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], "}"}]}], ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", "True", "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800104026969161*^9, 3.8001040396063023`*^9}, + 3.800253040121683*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"4e9683de-cadd-4c17-9a2f-9cf80bb6ed6e"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.800007505695323*^9, + 3.800007506100013*^9}},ExpressionUUID->"28c03220-4253-4ac2-af1b-\ +7e79584e73c8"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1", ",", "1.25"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800010148306141*^9, 3.8000101798107777`*^9}, { + 3.800010308469328*^9, 3.800010309483148*^9}, {3.8000906685538473`*^9, + 3.800090714057558*^9}, {3.8001739578815823`*^9, 3.800173969462998*^9}, { + 3.800253049852869*^9, 3.800253064974268*^9}, {3.8003527785440187`*^9, + 3.800352792306602*^9}}, + CellLabel->"In[71]:=",ExpressionUUID->"4770d01e-d16d-45c6-bc42-c53413d65f4f"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0., 116.6666666666566}, {1., -683.3333333312547}, {2., + 138121.1999992457}, {3., -3.383773814612787*^7}, { + 3.0180511374982135`, -9.541697276879734*^17}}], + LineBox[{{4.00000000000001, -9.541697276879734*^17}, { + 4.00000000000001, 6.043468764510557*^17}}], + LineBox[{{5.000000000000153, 6.043468764510557*^17}, { + 5.000000000000153, -9.541697276879734*^17}}], + LineBox[{{6.00000000000004, -9.541697276879734*^17}, { + 6.00000000000004, 6.043468764510557*^17}}], + LineBox[{{7.000000000000012, 6.043468764510557*^17}, { + 7.000000000000012, -9.541697276879734*^17}}], + LineBox[{{8.000000000000027, -9.541697276879734*^17}, { + 8.000000000000027, 6.043468764510557*^17}}], + LineBox[{{9.000000000000043, 6.043468764510557*^17}, { + 9.000000000000043, -9.541697276879734*^17}}], + LineBox[{{10.000000000000028`, -9.541697276879734*^17}, { + 10.000000000000028`, 6.043468764510557*^17}}], + LineBox[{{11.000000000000092`, 6.043468764510557*^17}, { + 11.000000000000092`, -9.541697276879734*^17}}], + LineBox[{{12.00000000000003, -9.541697276879734*^17}, { + 12.00000000000003, 6.043468764510557*^17}}], + LineBox[{{13.00000000000004, 6.043468764510557*^17}, { + 13.00000000000004, -9.541697276879734*^17}}], + LineBox[{{14.00000000000003, -9.541697276879734*^17}, { + 14.00000000000003, 6.043468764510557*^17}}], + LineBox[{{15.000000000000021`, 6.043468764510557*^17}, { + 15.000000000000021`, -9.541697276879734*^17}}], + LineBox[{{16.000000000000032`, -9.541697276879734*^17}, { + 16.000000000000032`, 6.043468764510557*^17}}], + LineBox[{{17.000000000000036`, 6.043468764510557*^17}, { + 17.000000000000036`, -9.541697276879734*^17}}], + LineBox[{{18.00000000000003, -9.541697276879734*^17}, { + 18.00000000000003, 6.043468764510557*^17}}], + LineBox[{{19.000000000000043`, 6.043468764510557*^17}, { + 19.000000000000043`, -9.541697276879734*^17}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0., 9.047619047619044}, {1., -13.809523809523887`}, {2., + 87.74204081632664}, {3., -819.0092781341125}, {4., + 10128.969126037517`}, {5., -145746.8936052744}, {6., + 2.2524076265043374`*^6}, {7., -3.644975953698418*^7}, {8., + 6.103552959362319*^8}, {9., -1.048841261152274*^10}, {10., + 1.8389704717225128`*^11}, {11., -3.2767321043834434`*^12}, {12., + 5.916289604358419*^13}, {13., -1.0800733080040032`*^15}, {14., + 1.990314989891986*^16}, {15., -3.697260011358374*^17}, { + 15.133692609442285`, 6.043468764510557*^17}}], + LineBox[{{16.04604325598516, 6.043468764510557*^17}, { + 16.05741223306091, -9.541697276879734*^17}}], + LineBox[{{17.04982594225325, -9.541697276879734*^17}, { + 17.050426915462456`, 6.043468764510557*^17}}], + LineBox[{{18.04995315124304, 6.043468764510557*^17}, { + 18.049984765982444`, -9.541697276879734*^17}}], + LineBox[{{19.049760622079745`, -9.541697276879734*^17}, { + 19.049762278020665`, 6.043468764510557*^17}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQDQNSbYkSbYlMDhDeB3vL859tzn/+uh8q7fDWObk2 +I+YUlM/hsGea8w0fiUX2EL6AQ8OVsCwptSNQvohD0O3jV5zFd0L5Eg4ca/P2 +MmxdDNUv4zDnWX9Ww6ptUL6CwzOFwIVz5tdD+UoO/QVLZ+pe3QrVr+JQbaGt +7Fy/HspXc0gOmFkg5bYSql7DIfea17Vd37dD+VoOmx+/jHQ1D4bydRzWzn6z +9cOHXVD9eg5rkhezx4tshPINHNadmf+rrXsLVL2hQ6fKzanWcQegfCOHdw3t +/e3uE6DqjR0CvVM/fP4B86+JA2/kmt4HDVvtAV0pYyg= + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQIBny1etWqUV6wDhfbC3Twbyo1oPQKUdYkxm +zvS8w+AI4XI4iLtqB05VajgI4Qs4XBMULet7w3YEwhdxENDqVZJZ+cENwpdw +8P1hetDl7IyTEL6Mg0oMl/PVXYk+EL6CA9uadQeOfHE+D+ErOaxU+v+fc45I +EISv4qBiwzNF9cWtKxC+mkOExrnpr/xXh0P4Gg61C7X8JH8m3ILwtRyuPpqj +liVvEAvh6zjcPyFTFFH37T6Er+fA8PCFxEqBo0kQvoFDdqpI55Gpc55C+IYO +M+zVA//ezsqA8I0cdANn8+oEmL2G8I0dlG5+fM8mx5oH4Zs4zHiwTNSS58wH +ABehWnM= + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQICWRIm2RAklBwjvg71w1bznlfO0D0ClHR7N +Ojyj9n0oVJ7DYZlIFoPwjE6ovIBDdl4QT82Jw1B5EYeVrVJq008xHoTwJRx8 +vA0vWOs7OkL4Mg6x+7z/5CU2QuUVHIqufddfYnAIKq/kMElP5pxzJ/MhCF/F +QUvBSaE/w9UJwldz6Pn9dX7y9XaovIaDhEL75vLnp6DyWg5SX6/5TdzEdxjC +13F4u/vFmeK1gc4Qvp5D81b3aPm2KVB5A4eddofkz/+7DpU3dPj+5m3PJUuZ +IxC+kcMCplmZjzckuED4xg7MIptmH7i6GCpv4nC4Y5e4zZrnLgBbdl1w + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQACptkSJtkQmBwjvg73l+c825z9/3Q+Vdnjr +nFybEXMKyudw2DPN+YaPxCJ7CF/AoeFKWJaU2hEoX8Qh6PbxK87iO6F8CQeO +tXl7GbYuhuqXcZjzrD+rYdU2KF/B4ZlC4MI58+uhfCWH/oKlM3WvboXqV3Go +ttBWdq5fD+WrOSQHzCyQclsJVa/hkHvN69qu79uhfC2HzY9fRrqaB0P5Og5r +Z7/Z+uHDLqh+PYc1yYvZ40U2QvkGDuvOzP/V1r0Fqt7QoVPl5lTruANQvpHD +u4b2/nb3CVD1xg6B3qkfPv+A+dfEgTdyTe+Dhq32AGblYyo= + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 20.}, {-9.541697276879734*^17, 6.043468764510557*^17}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.1`", "0.5`", "1", "1.25`"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.800010203896109*^9, 3.800010315087441*^9, 3.8000906901173763`*^9, { + 3.8001739651026773`*^9, 3.8001739721292763`*^9}, 3.80018249783724*^9, { + 3.800253051675563*^9, 3.800253065998494*^9}, {3.800352780177466*^9, + 3.800352794512775*^9}}, + CellLabel->"Out[71]=",ExpressionUUID->"1e2e5b00-6444-4d24-8ef1-8d2f252d7f82"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800007752402253*^9, 3.800007756193302*^9}, { + 3.800009436777871*^9, 3.800009448210932*^9}, {3.800009769459014*^9, + 3.800009772299378*^9}, {3.800009881279499*^9, 3.800009881825911*^9}, { + 3.8000101358425198`*^9, 3.8000101362532043`*^9}, {3.800010200123188*^9, + 3.800010208840814*^9}, 3.800253101920834*^9}, + CellLabel->"In[82]:=",ExpressionUUID->"6684712f-a153-4f02-b620-d9a25829205d"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1kX1Q03Ucx39AdsgpV6AFQnZw4sqeiBRBJry3AYONAXtiw8CrAQooJ6Bb +qSA7azEVVwZLkJp0HJtFnPnQycDkh5LQccCQrqJdcZpNO3lSalqQZO2z3933 +fve6173u88c7QrNLVuTLMIzi0fvv/1ZPkKMh7lWcqpvbM9HP72H+/2IQOqsb +L6kA8WtwDbbxjtYmEK/H7dHNQZX9scQbYLJn/xreGEMcizc0438xv7xEvBHy +qlRHyDsc4jg0VB/hnAiIJI7H5Nl5zmp2FfEmdOav+kgwEUScgMfPdNxd3uRP +zAVveuWVPNP8JQ9vxvALwd8zT94kTkTY/VMJXN+RRA8nYY3CJ8QhnCIGnn5e +e3zjGbeH9cC+dRkaV9kCeR5K3VHtwjAmyeN5WGE6bKx8xcfDDB+xd9dK5huJ +9Xzs9J8dE+z1egFYm0p4ccrbC+AsDV3zzBPETDKqQw4JxFP/0P1kOJjnlnYV +z9P9FJSftC1tP/uAfArChTOY+O1P8qkIK19pjQ+ZI5+KogXjF7zXZ8kL8e05 +cz9/7x3yQuS2XQ/kHnWRT8NchT1ihc8N8mn4ymDbwl50kk+HJUAy+YPiO/Lp +eGhfPsY2D5IXoVQist4QseRF2F4jPWhp/Zy8GNybnB3xfxs8e+jFCGuZuVdl +PU37ZOCA2u93HaeLfAbWnkh5ELzIkpdAbotfYIavkJdgZCBYG9r6DflM3KsJ +vKxpuUo+E/erd1k+cxEzWRBXrItjzF6fhehl5xT5A94+G1uHrtaqm/s8jGx8 +UsyzLUZ572WjpmPPj73VvR5ms3F6uLhpvLSHein4unK/yq5u6qUISNq/qW9J +J/VSXB8x6o8VnKdeioionluxri+pl2EfW7ElKK6dehku5+vHyp5to16Gd7nS +7guRJ6mXYYOz1fDYy2bq5TC4z9sLrxmpl6Ow7GGRRrqbejmG3OVdvdpczx6s +HG821PtnNe2nfRRI2yrtbJG952EoEGN+P+/T23W0pwIp62e0x37+gHoFOHVa +dUfVh9QrsdgysNpZUk+9Eu2WW/z0r4n1Sjg/LtCYTcSsEppJ3Wj+H94+B4GR +maI7fsTIgbsv4dCsg+7pcyA7nBHe/ZOJ+hykXli2zXjtCPUqbJu1Nh5vM1Kv +gnVwOrpgp4F6FdSharst4SD1KuxeCOx8Kv0A9WrUipe8aC15m3o1dNtHJcnT +ldSrobUMX/Id2kH9I64vjG62a6jPhTWmRZ2Zp0z8FwMrl4U= + "]], + LineBox[{{0.680083588049687, 0.0003475887285327859}, { + 0.6807603523871677, -0.0005731431100709687}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1zwkwnHccxnFnSAgihMa1jqCWtSRY13p2XXHEsWuXNpIJTVNBIw2NJh2s +JKYdrbTIJA0RqaCOymiqk9Q0rJCSdFChqSZ2GMrkUGej4uq1v/edeeedz3zf +Z+b/t07OEL2tpqKikvzv+9/XOH3ykVRDG3WfLmaNdgvbVf5/DFDa0Bj+aquA +bITy8YLr/VyQTVHJjp5Jig8gm2PRuXpprJhPZsHGZutJzpQ/2Qa3zF30BIGM +7XBpy3cp71X5ke2xIGEfDlBl7IgHofWTDw/6kp3QLErhrbX6kJ0huvq9Zp8x +Yw6+sPioMSvDm8wFR3t1s30Pj+yGksEKXTMWY3ewMisNirK9yLuxmi0abOnz +JO+BTM5du7+LsQc6ex7+rpbjQfbETf7MqQtDe8he4A4O2d90ZszD4yPt94oK +dpO90VdYXxI/6k72gcJUYcX3YeyLuahfIo5ddCP74cI7Et72P7lkfyR1Vgml +YsZ8eBxoeXUnxZUcgFt3W2JqORwyEG6Uk9y07Ky0DJDv75aYdLOpC+DYOVVm +V+ZEXQBDnZGn2068Tl2IpeJEP9NoR+pCHG1rG053c6AeCIsXd8IFr9lTD8RG +pNa7nZt2UQ/Cl9/Ijlms2FIPwtgR78fvL9pQD0aJ+ctrswvW1IPRZQG7hmUW +9RDcHl4VdmiQZSHoqq3uK+NYUg+Fces6u/uQOfVQ2Jq1rDtd20l9L5ZHXCwm +pk2p78WMOl99U6gJ9TB8kvdy9voNY+phKLBMMeq2NaIejlYZ2jJrDamH4yvj +jXN1ntuoR0DYdHz+hzp96hG4ISioNvxbl3okDt42DXM9voV6JKzn3C2nVrWo +70Nq2ui4SpUm9X2QZjTykaxOPQp+bWfYiX6q1KPQnB/VoX1oo03Zo+FapZbT +cWpFaVk0xr7WP2l7b4l6DPSWVCuSBItKIwZZPdn5gU9m6f8Y9PCH+1eKnykt +j8FDfoVYs2aC9rH4dtzGZMhuhPaxOM8bmOQ1D9A+Fs55DhHzle20j0XvzkyH +P86W8pV7EUZPWCkmj3YqDRHGBq6mtpQMKC0TIZe7v4TzaFhpuQjpDyzyWedG +aS+Gp16hftPP47QX43yk4lLi5Unai6GfLfUutXxKezFKPphIu5/8nPZxeHN7 ++1unU6ZpH4esXDu5jfsM7eOwqvMiKODuLO3jwHrS3F9TNEd7CbhXEsvHrOZp +L8GHZtYaOpfJMglyNxTdB1bIcgl2tC4q9IIXaC/FxzVdf8WcJkMKs99ytcTl +ZJkUxWO+vQH1ZLkURl55qf41zD4evxaarqV/zuzj0Tud6vM8jdnHoyVuB+sn +HrOPhyRk/aLVMp1HJQF1z66w5xuY8yeA/VnDj0IRc/4EuByeSjeYpfvKE+C8 +2UAz+gxz/zew0T9lO607x/8HehHabg== + "]], + LineBox[{{0.6862540582972866, 0.0003475887285327859}, { + 0.6873682211944205, -0.0005731431100709687}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1ywlM02ccxvE/h1gKTNCCwMim3HacIniA86FcWrBAKVBCcOWYTsfpkbAR +4W8GKqhTIyqMQ1EycAIOlE3E0WIIA2aIZtM5cdQhaGCgDIZhFGVb+L1v8ubN +J9/3WZ2SJf9Yn+O4tP/u/+/XNg+9q2YWttQfn96v/VGi5hYP7ivft/3zsi1Z +gIZM3fPRtpVkc6gHMn+qybYii5ApSKgTP7QkW+PtCf2nfYXMdmi959GmjmZe +hb2nDHQWHzDbw0N4f8DPmNkR86cFwiWjIrIzPspr2SnuZXbFyiRxp+0VZjFy +81OMq44yu6H89kbril3MHnj85dFss1BmL3R5pamnHJi98SBmQhqhx7wWJU2C +fXaDK8g+aJXlmO+8xbwOvvHm3m7nmH3x7uscXU4Osx8cEi9e2hTBvB7egYOq +YmfmDTiplRxI5pg3ImG0xL77t+XkTTAVf9p0q4XZHz0VNsmSY8wB+LZoolCV +yrwZrgeNd1r7M38I9BvLM5Yzb8ESw9bzKaMWZGBNTeNhnZrMA4/qHbP8z7Ee +iM9/Pl7jlM56IDLSZJk/BLIuwc0LeU5GK1mXQPWsyMpg3Jx6EAp2T5/8XkPm +g/DXTUut81nWg3G9TxOp2M16MF6O6rsFbWY9BFcVv7e/Nmc9BLahuuLhnmXU +Q3Ft5pVobxaZD0X5GsPySkvWw9C7dsepPe3vUA/DkRvKzCEVmdsK04E31UIj +1rfCUVV4ePQbM+rbcHhXP18USea34VjA2NPhaVPqUpyZK500KyPzUsy7ql8Z +BbAejvyYFaKHWhPq4Yiqyz966AsyFwHPqvb0ZS6sR8D55uAvRX1C6ttxVTXS +M5ZB5rcj6FlocLAF6zK0lR/xLbthTF2G/SH9B8fjyVwksmvyJkN1AuqRGPbu +kjdWk7kozMVFJDpJyIiC55Xu5hsjS+l/FAwul75UFZM1UbCv3v2VpzuZi8a4 +y6S7830j2kfDuCXHQnqAzEej4xJfedGGrImGUW+tpWfHEtrLUble2DKXQoYc +60rWnhUIyLwcnefr7yU1GtJejrDS71IX5GQuBvtq3/OfmjWgfQxEIw+8/C+Q ++Ri8edFpog0ha2Lwoi63YGhcn/YK6P2t7yYtJUOBSUVNlW0AmVfg1z1nIpTD +erRX4GXXH5VLT5C5WAT5iAfd/MiIRe3pzPC7Wo72sbhm8lw4VkzWxGLs0T33 +knVkLg57tZWqZPVCx+I+Dr1J6VN3rMh8HDAzfB1ZbxetiUNk2W27oZ43i+bi +IUqVftbkQEY8hLnhYw0F87SPR3NLQ9rwEx3t43FXnNCc6E/mlJAVmmXYVMzR +XokSfS+B4/w/tFdiQtnYfWgHWaPEKp/H6g13ZmmfgCefJAzKXGY7/gUvpdWE + + "]], + LineBox[{{0.6856837961249613, 0.0003475887285327859}, { + 0.687236326310591, -0.0005731431100709687}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxF0nlM02ccx/ECc0GixHFsYJkbBKhj6oApgiB8yk05e9HiwEk5BIRIUZgc +hUaH4MVQ6ATZCguh6IA5FSMFJ0URMYRL5jbWbAbnQCOnboCDyUj6bfZLfn+8 +8sk7zx/PYys5yEsyYjAYSau/wepvyPj/m8xVTuQqp3x0mvUJE65+D7WdNEPI +TpClxOaRjRF63WSCeVhK3gBmKysxZSiNbAFTM/8jeeXJZCsM56dptz5MINvA +TW4pc1HHk9+Hiftd/6z+T8l20LhM5xfKYsn2sJi7GPAqPYbsCCdEhdRXRpM3 +4zNp3rlnc3yyE0TxyT15x7jkLWittd7nXx5B3obF7xaaxwo4ZGeIRxwTYu4H +kl3Qoii+1Cz1I7vCejZnNFUK8scY72tgnynxJG/H0+HdZln33Mg7UKaO+sOm +ypXshn2S0VeM37eSd4JfEDhkdYxFdkel7BTrgokd2QOTV5dYmzQbybvQFrfx +S79HZmRPvHmlZW59tTHZC+xpyzuxZUu3dN6NgQ/Nf2K89YTsDebCRU8vw0Fv +nX1gLzCwGgqaIgPvfJB9fueVeZ3lQJ5TmGQ8Y5l2NtLmHZqCmAzd+5CzYVF2 +sjTrIwN6L75wm3MMX6oiy32Rbjw74per3/2gaRQF3ZzS937Qplnbv7uBzPCH +zOqEX+jUv3S+P4YYm9e2pyzR+QHIrG1c23R1kfYA2ATN4NGff9MeCGampcrD +6iXtgUhaLm1mfzJLexDuX1Pc8819TnsQYhrGTL3OjNMejJdSta2FwWPag3G9 +uHGP5qaW9hAoTcInfxb8SHsIXqvXj2hq+mjnIC2co3rM0dDOwf4i7lFl/be0 +h8LrCeuAxz/FuvuQh4JZN/OiQHWZ7icMhWKjZzmsdtrD4HghYNF8RUN7OPiN +HsuMgTu0h2Ow1zzbuv4u7RF4UWR6W1LXQ3sEFmQHlZfGyYxIhEqd3BkK/R4J +53XXBHG9+j4Ke/t7SsQ13TojCl+nsBtXHPTnRaGo5fAvXbIunTVRuDyQUj2a +1kk9F745mUZZ7R3Uc2Hik7+re00b9VyMDZbKzya0Us+FrUPnhNv499TzkKeR +7jFzb6Keh9tx8pGM9xqo5+FzL27HDbta6nnYoa0vfmObgno+iudb1YkPSqnn +IzHjdZKEe4h6PvrnM9u7smN096HhI76ywjiyOp/uR4Dgvdy2Ot5xnSGAq+KL +2G+enqb7FCBg+0z22d/KqReAdTpb3FJwjnohVup6N2lTK6gXokk54RvyA1ku +hParBImijKwRQjKZMxz3l76PhqldBOe5ERnRmO/2PDE7ROfJo8E7GWbT8WsZ +9dEIvLEuufTBKepFSJ5VVZ1vKKVeBFXftHNCejH1IoitxepGz6PUi3Bo2bTt +7ZBC6sUoCV2zRZV6hHoxcvYPh/tPZ1EvRrZy4JZh/wHqV12R6FyjllAfA5Vr +nTgiVuj9H0rn38I= + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFz3lM02ccx/FyCV6ACFLlKqUio1ArKpar/bQgyCFHSwubaISpQ2TqhMl0 +AYqTbGHBSTU6D8QhlyCGuS46MqEIDnQBRNzGVAKBQTwY52DI5Uz6/WW/5Pnj +lffvkzyPc9Ih+V4jFou1990xeHcMWf9/p4vd8ord+iR6jUpsQjW8UM2jesow +fTvJnr8RTDaDcfnq8vYWGdkSZyqrwt4sl5Ktcakv91q7EGQ2ivhRw4lxErI9 +JjxKpnoLxGQOuNzlRwWDAWQubtt7mksDGfNwfsmPyZ8U+5NdMa7k75EYMHbD +w5DrA493+ZHdUSNPFs3V+pI9IL/yk0mbDWMBvnX4sir9kA9ZCIHZ7GLXFhF5 +AzSdhcvsOIy9wEkrsszP2ELeiNkMeae2zZu8CWqdcO7BWsab0djy+C/DzM1k +b9wSDx87+2QTeQuEnU9cb3kwFuHpvvr7+bkbyT5oy7uuievxIvuim93tJPZl +7IfRyN/CD57bQPbH2Y+UopX/CMkBSGwslqkUjMXYvFP75m7yerIEt+9po8sE +AjIQZp2ZVD3tobca0O1oVto286lL4dY4eJF30Z26FFZLn79YceQ96jJMFST4 +s6PcqMuwv66uK3XDOuqBcHh9N0y62pV6IBYiTD9uXLSWehC++1590GHGhXoQ +evf5PP10gkt9KzT2k1dHxp2pb0WTA3iV0xzqwbjTNStrMCarg9FUVtJ2UeBI +PQQ2tfP85t321EPgYqedd7+6hvo2TD/3dOgfYlPfhmEjsdGiEFvqofg6e3Lk +2k0b6qHIdUy2bnaxph6GWjXq0sqsqIeh3GbhZIX3CurhkFUfHvu5woJ6OG5K +c0us3i6jHoFdd9ih6w8voR4B51Evx8FZU+rbkXKgp49VbEJ9O1SHqsRIMqIe +Cf+6E/wEfwPqkajJiWww271Qp+9RWF9smNlwbEZvdRR6b1gcdbk/RT0a5lMG +hYnSCb0RjfSWjJzAZyP0fzRaxF3tMwUv9dZF47G4UGFS2k/7GPzQx7V9wntO ++xicEnUMiGo6aB8Dj+x14WNF9bSPQeuatHV/f3FGrN/L0XPEqXtgf6PekKO3 +40qKVtOht1qOLOEOjeD3Lr11cqQ+dMjhnOyhvQLe5nkW1Y/6aK/AqYju8wkX +BmivgEWGyueM4wvaK6D5rP/Ag6RXtI/FByvrPzyePET7WKRn8XRcr2Hax2J2 +6esgyb0R2seC86ymvTR/lPZKCC8nXOp1GqO9Ep/bORsvvUBWK5G10N28c4as +U2JV7US3+dZx2qvwVWnTv9HHyVDB7s8sU8UlslqFgl6/Vsl1sk4F6y3ZKQGl +zD4Of+Sx51JPM/s4tA6l+L46wOzjoI1dxflVxOzjoAyeP+c0TfdhxaPi5WX+ +WCVz/3jwv6n8RSZn7h8Pzz2DqZYj9F5dPDwWW5pEnWDe/z4W2gddhpaNiv8D +Q8PkGw== + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy3tMk1ccxvGXgtgWmKBFgZnNcRM75Kp4AefDXaEWaAstIboKisNBAZ0J +G1FfM0BAnRpRYSKKkqATcCBsKo4WJQ6cIZhN58BRp0UDA2U4DaOgc+F3spNz +/vjke54PUrMVmy05jtv89lm8fQLu/3PDz/bt7V09rdHV/+lGz496yrijed/l +z7MuZCHqdOYng1fmke2h79P9VJ0zlyyBTphcK73nSHbC6wOCh7cKmOejpcfn +ij6BeQG2HbI0O3zI7Aof8Z2+IBGzOyYPC8UzBiVkT3yc35Qu7WL2wrz10naX +88xS5O1KFZ0sZvZGxbUVTie2MPug96viHLsoZj90+G3Sj7kx++OuciRGZsEc +gNIG4fb5/XPIgWiR59qnX2VegqVqe3/vY8xL8e6rXHNuLnMQ3FJOn1kpY14G +/9B+bYkn83IcNIbt2Mgxr0DyYKnrzd9mk1fCVvppw9Um5mB0nnDeGLaPOQTf +Fo4UaNOYV8FrpyjdKZj5I6BbpMiazbwaM6xajqcOOpCBRdX1RWY9mQfun3PP +Dj7Geii++Hl/tUcm66HI2iTX/RDKehgun8r3sJ7Hehi0jwvnWg7bUw/H7owX +B783kPlw/HXZ0eh5lPUIXLpliFNlsB6BZ4MC7/BVrEfigur31lf2rEfCJcpc +YuqcRT0KF18+l2zLJvNRqFhkVVHpyHo0ugI2HNra+g71aOxt1ugeacncGtj2 +TVWJrVlfA3dtQdHgN3bU16JoSzdfGEfm12JfyNBD0wtb6jE4MlE2aldO5mMw +6aV/bh3Ceix2KedI7hltqMcivnZX8Z4vyZwMvidbM2ctZF0Gz8v9vxTeElNf +hwvagc6hLDK/DuGPoyIiHFiX40rF3qXlzSLqcnwW2b1zWE3m4pBTnT8aZRZS +j4PJv0NRX0Xm4jGRJEvxCCMjHr7nbzY2D8yk//GwPFv2TFtCNsTDtSrja9/F +ZC4BwwtHF3vesaZ9AkRNuQ4xO8h8AtrO8JWnncmGBFh31Tj6ts2gvQKVy8RN +E6lkKLCkNOCoUEjmFWg/fq5nfb0V7RWILvsu7Y2CzCmxvea94LFxS9orIRm4 +6xd8iswrMfW03cYYSTYo8bQ2b/ejYQHtVbD4W+AdU0aGCqOq6pMuIWRehV+3 +HpFpTBa0V+FZxx+VMw+QuUSEB0r7vYPISETNYV3sbSNH+0RctHkiHiohGxIx +dL9ncekSMpeEbcZK7Ub9m7bpfRK61meOXZ9L5pOAl6ZLyH49bUMS4sqvzX/U +OTVtTg1JWsznDW5kqCHOix2q2z1JezUam+o2mR6Yaa/GbWlyY0owmdNAXmCX +5XxigvYalAr8hO6T/9BegxFN/c09G8gGDRYE9uqXXx+nfTIefJLcL1843vYv +nPPUGQ== + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-0.0005731431100709687, + 0.0003475887285327859}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"2", "3", "4"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800007794155422*^9, 3.800009482169447*^9, + 3.8000097404965363`*^9, 3.800009803362917*^9, 3.800010132768186*^9, + 3.800010169308859*^9, 3.80025311025338*^9}, + CellLabel->"Out[82]=",ExpressionUUID->"56618b1d-b8fa-44f5-b244-54ee774307a4"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100", ",", "200"}], "}"}]}], "}"}]}], + "]"}], "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100", ",", "200"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800007469448794*^9, 3.80000749812951*^9}, + 3.800253118037703*^9}, + CellLabel->"In[83]:=",ExpressionUUID->"e4ba48bd-b679-4118-8c22-a27665e21944"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1ywlM02ccxvFyiAiOK8w5ZoFJIaSCQzaQszyltNzYm2KwHtNwbTWYggZG +6GQuGIcHKAuLRjkEp0LBRGe0gohOoaA4GNcs04ps8wK0ONA5tmX/35u8efPJ +834/3LJdus2axWJt/ff+995x5vPPLCzEiK6rCpNOzrWz/j9weq4xaKt+Z2yP +Pf7Nb1gNk4xd8ER4/Z6p+xFjd9x1PGzcmUVeDraNefRyGHkFuMHSa3xvsjce +T6woU7iSV+LR+A85RXZkDiwj3C7J2wnGfug/aDz0s4Xsj88No1cOPyVzoTBl +6NQT5AAMWC0aY98jr0Zf+3pj9wA5CKG+rWVqI3kNtpq+3j52jRwMjtnxZdQl +8scYr9xt2tNG/gRneysCzp8ih6BV+OdMz3FyKAy5mQk3q8lrEeOVlHa6ghwG +fYsXR/sVORyWMc4TTjE5Ap+Wc24Y8smRsG/GYGQ2OQqb58cj6tTkaPwUeOKD +aTmZh3OOmTW+yeQY5Am8hmP5ZGAVjzsXv5axDnhXNO0VEkg7H+zhZTscfGjn +Y6VVgdut5bTHQnLXzVfjRHssdrT73/7LhnYBEpZ5BWvnHzK7AEF5FQWDzxmz +4lBnFXGFPUF7HPZHv79aPEq7EGrn1Gd5t2kXQr+J453fRbsIvTqPpxsv0i7C +zYNDhWHNtMcjY4o7+bqW9njkN7hvaqqmPQElvZccePtoT0CRjWZpRyntibhw +p2kfV0t7IjKWOuh12bQnoU2mPtaZSXsSEnOOlDwT056MjvofC22FtCcjV/lR +q1047SkYjAiWWAJoT8GLUeWXfd60pwKzCdmV7rSn4vup4UCBPe1piAt9Nf/r +GzOzp2H61EVL9hRj1jp0WStF42ba16Ep1u89DNEuRqFb3YH93YwhRmPQlpFu +A/0XI3LY0+OFnvFVMf7w0ZcsrqdeAkOpfYBDNfUSOC7mpb0up16CmenSd0aK +qZfgt1ceVfUa6qXYYNhpv2Ez9VL4hXp8ayunXopB19rs70TUS7GRfaPRM5x6 +GdQtquJDq6iXoXxJvMtLNvUyOPZUHRC4UC+DU+J6nzJr6uWYse2bbbM8YHo5 +nJaErOmfZKyT47F8ZsE0wviqHDZxhd/80sOYpYB0NsWq20C9AuZzbnsbW6hX +4FbGrjTtCeoVuNDJ/yK4knol3nKE0Q/KqFfidHmuQVdAvRJFnDMc1yzqlRAZ +XWorVdSnI1x2PnNREvXpyP+7c3dOJPXp2PVQw+sIoD4dUUrry3ae1KswJ+73 +gTP1KghM4Q15LOpVkJSczdo7c5/pVTh5pLamxsyYlYHPho5tOzpwv/0f/EEW +EA== + "]], + LineBox[{{0.684661218004115, 0.000010853339763120476`}, { + 0.6847355040145475, -0.000023503940061956706`}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1yw8w13ccx/FvMhMbXf51whCm9hPmp1LG64efvz/8/Pz8fj9rZUrYX6mf +buHa91bqqPWTP5NN/m2/M11E+XPKOde5ylwyo2Qx/yPmTLdhadZun/fn7n2f +e9zzXnYHU2SHdTiOS3h1//1jgvhNRf+s+QZ2qI6HapfbuP8fBi/XV8a+nGPW +R0lZVcq6PPJGNHrpLjyIJ5tCM2uyL0NC3oymwUOJJv5kK3ieKr1R60O2ReeU +vNTSm2wPnWFF3BMvsgN+eCOpIWAX2QkjT09m6wjJzsgz3Jiw4EreDksjvZer +28kCnOX/+MzWkbwDHb2xrkobshu6f526W2ZOdke34J2bK2+S38WD4e7XDuuS +PWDoMjE3ujLLLESX1e2BI/NkT+T2HA3fNEbeCc3K8PidPvIu+B00D9LcIe+G +Ml7f49Nmshf8WyaPHagi70GDZc9k4jfkvdAMXFWfOU32RoLL61ZtqeT38Pva +8pTRAbIPEv80WzgRQvaFz5ginhOSgdYGXfX31sw8YJJaeSRBj7oI3sYPawPm +n7EuQqujtFDcz8z5oVZ1vTj5FnU/vJ2jxrVy6v6Y7LpntSWLuj+kJid7apKp +B2CoftTwozDqAbifX/Z1hAt1MbjgCvsPjaiLEfjLrLZsfob1QNjJMjnjbmY+ +EDc/2bqt7ir1IDgUxzlk5VAPgkHATt3cJOrB0Gs3nO71px6MObv01ci3qIeg +ctkpY8Pf06yHYPFZ0ZV1fcxcKGx89Ib31FAPxViwe1pzFvUwPH/o+uTEfuph +aOFx7rSQugTFLy7pDRpQl6AvUTicOfKU9XBIistrUhqZ+XCUq3/a0phNPQL6 +fp2DkfupR+CMdXWVnxv1SJiphaG5OtQjUV7cWrC3b4p1KaIyRg8FaZkhxeNj +qtKmNGZeikbxdeF5MXO7FPtEtnZdprSPwvJ3u5OOj0+yfRSUqy0mF+uZ+Sis ++EV423zJ3P7KeZI1WwkzJ4NpRfqpks20lyEj4v5S/sQE28swU+Ccb1DH3C7D +o06bgvUZzFw0Yn2u4SsxM6LxrUh3KtuY9tHoOOc2YP14nO2j4W8xlyqqZObk +kH8uNV3+mBly/HW0wEnswczLEVh110zwYozt5eBXz8vrbjNzMdDu6H+/P5sZ +MfC8cUlbKmXmY2AkuthkbEH7GDxfWjQRDI2yvQKPXByDlyqZoUDOdPqoOpmZ +V2Blw2zqjy7M7QpUeN67ULg4wvZKnE37ose3mRlKSLWC3isZzLwS09VF7oO+ +zO1KRGdqL/y8nvYqhFglmG/T/Mb2KqRb8YXh5sy8Ci3OcRMWl4fZXoUo9UyE +ZiszF4sPpCX2t6qH2v4FAWgYVw== + "]], + LineBox[{{0.6717597200649537, 0.000010853339763120476`}, { + 0.6721603546789392, -0.000023503940061956706`}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1ywss3WccxvE/XYu0HUr1VK3FMDO6uR0brT447o7LcS5El4qNKerSuIRG ++18ZOqvO1jGpMTNT63K2aWU1cZxi7FRPGWqMsoXIurJVpi5VsS37vW/y5s0n +3/exSsiQJOpyHPfmv/e/96z5xOT88taxgN6Y3JCmNRX3/8Gnjpu232iHyfpY +6SlceOcLZiOceuGp8MxlZlOoDKvkU+XMApiPeXS4lTJbIMhze+x6EbMlNOd3 +ffeEZ7ZG34Ju2rVCZhtkyWIbNfnMdkgo2KEV5jDbw2NMOzyXweyA/tQ7Mu1J +Zkd0/ulas5jAfBhpp42uiOKYX8H1bAfnYQmzM/LibeurgpldMCo4lPjBMWZX +GOd/bt/nxuwGw/o/WlxeZHZH2PYu1bgFsxBxr1tGthsye2BcaRJ7T4f5Vczd +3znv9PdP5NfQkXnZtHeW2RO7W81NakaYvZCs02up7GY+gvejgi8+8y3zUVhb +jN78pI7ZG5VGkyZnypmPobJ182BdHjOws3w6Rf8NMg+0dG9Ud4hZ94Hb3hJ5 +uwfrPsgTCJO2WbHui5/HDlVdMWDdF+Hq4t6ipSHqftix0jjdOU7m/eD/uOzX +0C7WRTBvHh99uYl1EcS/1I6mvsu6P9KcntXTzWDdH4KM4w3LEtYD0FOQM+8v +ZD0AsR/ftlsTsB4IgwF7/sDKIPVANNY5eO5pJ3NBSAtoS5koYD0I6YVr+3O9 +WA/GjKYtefHJXerB2Fv0/SVRO5kLgdJHMcPnsh6Cq5pRVbML66HwPzt/TbWo +pR4Kq0xzz4FmMhcGfbPAPSPxrIch9NbK0qSAdTGWpoe+fDh4h7oYT810rPVL +yFw4SuJqIzy8WA9Hy/o273N/DVCPQLQqwGD+MzIfAd6Hn86SsR6Jl1KEG/Z6 +ZETihnfbV8Y3b9P/SFSanIxwSSarI1Hm6BFeuY/MRaFwdtTKvU9D+yjkJj8X +aZNN5qNw73BSaqIVWR2FSweGjbe0P9JegoayxoXVfDIkeOx88Wu5LZmXYJel +rsB6qJ/2Evg3FS/EF5C5aEy9vbyx34aMaNz3m7KQavtoH42S1U5Hs1yyOhru +R08YvnWQzEnRP2GqFPf9QHspksZ2rw6dIvNSPBLVTa2aktVS2KkuSDUdvbSX +4T2lWBGWQIYMxaWpM6X6ZF6Gggetv59X9tBehg+nyjNEUjInx6CjT+bIejft +5TDbCpkX1pN5OZav1wzkiMhqOYKdfttX/eAW7RV4VD7X1VBBhgIBBd03al3J +vALpAt/ZinE17RVwqbd0PVdI5mJgcfdESbY1GTEYPu2Q9bCii/Yx6BXkHDGZ +UNE+BtVXN/XSnydzsfhoyPm4QXqn6h9DJxEb + "]], + LineBox[{{0.6675391113276434, 0.000010853339763120476`}, { + 0.6691626951131391, -0.000023503940061956706`}}]}, { + Hue[0.37820393249936934`, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1yw1M1HUcx/E/MMYFMawREOBKBZJn5LhDhIMPKAcej/fEAYmHxGUEaUCC +6IDLcO0iGGpobT2wgpMHAeVBIBQPUHEZCi40ckPQBJSnohQwHdX4/n7bd7+9 +9t5nQ9p+mcaY47j0/+7/3zHmlVTx1GqI+HJinqRmuYdbe/Cw0su25vSTeVBH +SrW2sczr8NKCcY5CxGyNzXG5KS4CZjtkFQ2NlPgwO+IEr/iUjSfzm3DvCbHp +d2XeiBi19JCZC7MT2qPkt/QbmF3gYpE9UuLIvBnJ8rwjX9gwu6Gw96rJkBWz +BwzV30368Zi98I3YQtW32kf2QfbIbPTBp8xbMHDxM1fVLLMv9qBSp55g5kPg +WOd9fITZD4k/iJ4tXGMW4Ir+4VhBN7MQb9hZTPs0MvvDt36Yb/Mt81ZoFj/+ +y62cOQBiB37mh4XM25DTUPHnVCZzIJaiziwcT2IOQpvVL+M5YmYRnvRkyHS+ +zMEI0XU9uLOeOQTlu2+Gp/KYgatfSQKdFnvXrAUe3vb+0vkumQtF5GRn6Lv9 +rIdiz+hGr+l61sPg5nYovfEY62HYbaR53pHP+nY0V82sN09hfTtMl4KN9KGs +74CvpnC+zJn1HZjvOiC6zGM9HIKs95RRMwbq4VA4DJxxHiRzYgTtWrymbGJd +jNt3n4jGylmPwN6xsKbefaxHwNMp4yfjWNYjURN4I77ag/VImEnesawzZ30n +umtaWt4aukR9J2BVK7ipI3MS2EuFutgw1iXgc5UNDSs91KNgYWrUOttM1kah +TGg7aKthPRpvp3sE819nPRr6379PDf/5IvUYLHaJqhVFZG0Mjmiyy/Z6sx6L +3MMtbSX3LlCPRatl35WWcjIXh1KT5aLlINbjkJ9benbX427q8fB9bTRw8iQZ +8Zi4f/rVr8PI2nhYrGYKj879uGZDPEaeftpRe4rMSWGT/3mbZSgZUjSW5iV1 +P+qivRSe2tmxzmNkgxTVBQU6ywAyJ8PK+ECt4V4n7WW40/7bydGjZK0MSxPh +HWp3skGGF9WavOShDtrLYbqlMnL4IzLk8KtIr7tuR9bKUTUzaC+9cJ72cqyL +ft8pQ03mFLCeq5E5GJOhwONtfwv2V7fTXoF/TpikZYnJBgXiJ//Isp9uo70S +t0IPz2t1ZCjxIN+/+LQbWavEr+P9HZXXW2mvhHXqc295FplLwKZLXkVTL5OR +gAMH44TJjS20T4CNufejlhiyIQGG6eZNK3PnaK+Czv3FB37lZKiQwuuTZHmR +tSpEBKQJa2+cpb0KhWl8/cI+MpeI+YoOM4kVGYl4NnyuuFDdTPtEnA+IUdRX +NdE+EfpPXHxc7zfSPgmO/hlVPKfGnn8BJTwE2g== + "]], + LineBox[{{0.6663381358927464, 0.000010853339763120476`}, { + 0.6695922456882045, -0.000023503940061956706`}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy3lM03ccxvFyiBUcAmHOMQtMCiEVHHYDOcsDpaWc9qYYrMdGuDYMpqCB +ETqZC8bhAcrColGOgWNymegMVhCYUy6Hg3HNMq3INi+KFic6t2n8fbJP8v3j +lff3eXf7Dnm6DYvFSn/5rF4+a9b/J4h5daORr2WO7Gh6dT1dTIbjw1yDrvKP +ztdkY69v83NW/SxjJ9wT/XDD2HeHsSuuOxwZ2JVBXgWOjWnyQjB5NXh8eU+U +J9kTd2dWl6qcyWtwZ/r7rEI7MheWCV6v7MUMYx8MHxo4/IuF7ItPDJMXj9wn +86Aypuq1M2Q/jFgtmeLcIK/DUOemgb4RcgCCvNtKtQPk9fjI+MWOqR4yH1yT +w+PwDvL7mK7YY9zbTv4ApwfL/c6eIgeiTfTXfP8JchAM2WmSK1XkDYj0iE9u +KicHo7XFg6v7nBwCyxT3HreIHIoPy7iXDXnkMLCbMRqWSQ7HtsXp0FotOQI/ ++598x6wkC3DGIa3aO4EciRyhx3h0FBlYK+A9jd3AWA+8KTZ7BPpTjwJnfOVO +ey/qUVhjle9ydRX1aMiuu3jnOlKPxs5O32t/21AXQrLSg69bvM10IQJyyvNH +HzJmxaDWKvQiZ4Z6DA5EvL1OOkldBO2KpAc516iL0LqV65nXS12MQb3b/S3n +qYtx5dBYQXAz9VikzvFmn9VQj0VevevWxirqEhQPdtgL9lOXoNAmd3lXCfU4 +nPupcT9PRz0OqcvtW/WZ1OPRrtAe706jHo+4rKPFD6TUE9BV92OBrYh6ArLV +77XZhVBPxGgoX2bxo56IR5Pqz4Y8qScBC5LMClfqSfh2btxfyKaejJigJ4u/ +PTcxPRnmU+ctmXOMWRvRa60WT5uob0RjtM9bGKMuRYFL7cEDfYwhRUPA9ok+ +A/2XImzc3e1RK+NLUvzp1Vq8tI72MhhK2H72VbSXwWGpIPlZGe1lmDeXvDFR +RHsZfn/iVlmXS3s5Nht2sTdvo70cPkFuX9kqaS/HqHNN5tdi2suxhXO5wT2E +9gpoWzRFh9fSXoGyZbFOjzm0V8Chv/Kg0In2CjjGbfIqtaa9EvO2QwvtllvM +XgnHZYHrh2cZ65W4q5z/1zjB+JISNjEFX/7az5ilgnwh0arPQHsVTGdc9jW0 +0F6Fq6m7k3Unaa/Cue6oT/kVtFfjBVcUcauU9mo0lWUb9Pm0V6OQ+x3XOYP2 +aogHnGoqNLRPQYjibNqSeNqnIO+f7j1ZYbRPwe7buYIuP9qnIFxtfcHOnfYa +PJUOe2EF7TUQGkPqc1i010BWfDpj3/xNZq/BN0drqqtNjFmp+HjsePqxkZud +/wERzhav + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy39M1HUcx/EvcBFCgYtfDg8CBEIDgThUhODFHcfvHwccd5ApofzKfiB6 +tARn36XowB+H/EhJ5FcxwgmC8mMoI+acSkwkAkWSi9+CECNcAYkzNj/v9d7e +fzz23Mtmb3p0sg7Hcclrr7X22tz/52kQvt+Hr/N9rQXfIEHgRa/e0p9ZxtCl +xqr4l3Mdr6mH0vKadK0C8no0ewoWHiSSTaCeNd6VHUbegJahfSnGErIQHsfK +rtf7kK3RNSUvs/Am20Jbo0h44km2w49vpTb5byc7YOTp0VxtEdkRBQbrkxZc +yFtgYaj7cnUL2Qkn+b++sLYnb8XtvngXpRXZFT2/T90tNyO7ocfp/Rsrb5M/ +wANNzxvJArI7DJwn5kZXZplF6BbeGjwwT/ZAfu/B8HfGyNugXtGM3+knb4d4 +r1mg+g55B5SJeu6ft5I9IWmbPLSnhrwTTRa9kynfkb2gHryiOnGc7I0k5zeF +HRnkD/Hnq+Upwz1kH6T8bbpwOJjsC58xRSInIgPtTQLVD5bMPGCcUXUgSZe6 +H7yNHtb7zz9j3Q/t9rJi6QAzJ0Z93LWStJvUxXgvT4WrFdQlmOy+J9yYQ10C +mfHR3ro06v4Ybhw1+DSUuj/uF5afiXCmLgUXVGn7iSF1KQJ+m60un59hPQA2 +0Uc4ox5mPgA3Ptu0ueEK9UDYlSTY5eRRD4S+/zZBfir1IOh2Gkz3SagHYc4m +azXyXerBqFp2yF737zTrwVh8dv6yVj8zFwIrH13NzjrqIRgLcstszaEeiucP +XZ4c3k09FG08Th0XUQ9DyYsLukP61MPQnyLSHBl5yno4wkoq6tKbmflwVKh+ +2dicSz0CeuKuocjd1CNwwrK2RuxKPRKmKlFIvjb1SFSUtBd59U+xLkNU9ui+ +wGpmyPD4UFxZSyYzL0Oz9JrotJS5U4ZdftY23Sa0j8LyxR2pX41Psn0UlKtt +xucamfkorIgjvK2+Ye5cc0HYK+swZi4aJpVZx0o30D4a2RH3lwonJtg+GjNF +joX6Dcyd0XjUZVWkk83MxSDe5yq+lTIjBt/7CaZyjWgfg9unXActH4+zfQwk +5nMZflXMnBzyL2Umy/uZIcc/B4scpO7MvBwBNXdNnV6Msb0c/OppecMtZi4W +1VsHPhrIZUYsPK5fqC6TMfOxMPQ712JkTvtYPF9aNHYaHmV7BR452wctVTFD +gbzprFFVGjOvwMq62YyfnJk7Faj0uHe2eHGE7ZU4mfl1r28rM5SQVTv1Xc5m +5pWYrj3vNuTL3KlEzJHqs7/q0D4OwcIks83qP9g+DllCvjjcjJmPQ5tjwoT5 +JQ3bxyFKNROh3sTMxeNjWantzdrhjv8AiSwW8Q== + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy3ss3Wccx/Ef1iJth1I9VavLMDO6uR0bygfH/X6ccxBdKhamqEvjEjrr +b2XotDpbx6TGzDq1bmcbldXEcYpS1VOGGquyhci6shFKVaVr0u+TPcn3j1fe +z8csIUOcqMFxXOKzU3t26tz/z3NoxX1o5Yzncy153jD5XtR6/b0uyvjSdsvy +R9WI4jm1sNZTuPDhN8y6OPbKE+GJ88wGUOhUyabKmQUwGnfpcCplNkaA67bY +jSJmUwyc2vnzY57ZHH0L6mmXC5ktkCWNbRzIZ7ZCQsF2lTCH2Rou46qRuQxm +G/Sn3pKqjjLbovMfx5rFBOaDSDuue0EUx/wGWrNt7EfEzPbIi7esrwpkdsCY +wCTxE09mR+jlf23d58TsBJ36v5sdXmV2Rsi2LsWEMbMQcW+bRrTrMLtgQq4f +e0eN+U3M3dsxb7fyK/ktdGSeN+idZXbFrhYj/ZpRZjckq/WayruZ3fFxZODZ +F35iPgRz47GrX9Qxe6BS967+iXJmT1S2bB2oy2MGdpRPp2i9Q+aB5u7N6o5Q +1r3gtKdE1u7CuhfyBMIkDTPWvfHbuEnVBW3WvRGmLO4tWh6m7oPta43TnRNk +3ge+D8v+CO5iXQSjpomx1y+yLkLo77VjqR+x7os0uxc11TNY94Ug43DDqph1 +P/QU5Mz7Cln3Q+znN60eCVj3h/agNb9/bYi6PxrrbFx3t5O5AKT5taVMFrAe +gPTCR/ty3VgPxMxAW/Li49vUA7Gn6JdzonYyFwS5V/QMn8t6EC4NjCmaHFgP +hu/785cViyrqwTDLNHIdbCJzIdAy9N89Gs96CIKvrS3fFbAeiuXp4W8fDN2i +HoonhmrmWiVkLgwlcbXhLm6sh6F5Q8Pj5L+D1MMRpfDTnv+KzIeD9+Kns6Ss +R+C1FOGmtSYZEbji0fad3tWb9D8ClfpHwx2SycoIlNm6hFXuJXORKJwdM3Pu +G6B9JHKTX4qwyCbzkbhzMCk10YysjMS5/SN6T1U3aC9GQ1njwno+GWI8tD/7 +g8ySzIux01RdYD7cT3sxfC8WL8QXkLkoTH2wurnPgowo3POZMpao+mgfhZL1 +TlvDXLIyCs6Hjui8e4DMSdA/aSAP7btOewmSxnetDx8j8xIsieqm1g3ISgms +FKclAx29tJfijDw0OiSBDCmKS1NnSrXIvBQF91v+OiXvob0Un06VZ4gkZE6G +IVuvzNGNbtrLYPg0aF5YT+ZlWG2tGcwRkZUyBNr9ubf6/jXaR2OpfK6roYKM +aPgVdF+pdSTz0UgXeM9WTChpHw2HelPHk4VkLgbGt4+UZJuTEYOR4zZZDyq6 +aB+DXkGOu/6kgvYxqL60pZn+MpmLxWfD9oe10zsV/wGeUxHB + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy39M1HUcx/EvMMYFsXONgABXKpD8RuAOEQ5eoPyQ3/eDn4mHxEXEpQEJ +ogGX4dpFMNTQav1gBSc/PNADBELhgBCXoeBEIxuCJqL8MkoR05kb7896b+8/ +HnvutS5jj0RhxHGc4sUbvHhD7v+r+JqfnvXHR0GrehCUd7U833VQ2UsZrnyN +ZHPeQM8qeZBHiFVWscxr8NKiYZ5MxGyBjXH5aY4CZmsoS0bGyjyZ7XCUV3rc +0o35Dbj0BFkOODGvR4xcvN/Ekdke7VHSK5p1zI5wNMsdK7Nj3ohUacHBLyyZ +nVHcd95ohM/sCn3t99M+PGZ3fBtmltT/vJ/sidyxueh9j5g3YejcZ05Jc8xe +2IVqtXyK2RsCuwaPI2PMPkj+UfRk8QKzAIOaOxNF3cxCvG5tNuOpZfaFV+Oo +t+V3zJuhWPr4b+dKZj+E2XrnfFDMvAV5TVV/3c1h9sdy1MnFIynMAWjjX53M +C2MW4WFPtkTtxRyIIHXX7etrmYNQufNyaDqPGTj/VaS//VLfqlXAnWseXzrc +IHPBiJjuDH5ngPVg7Bpf7z7TyHoInJ33Z2oPsx6CnQaKpx2FrG9FS83sWtM0 +1rfCeDnQQBPM+jZ4KYoXKhxY34aFrr2in3msh0KgfDchalZPPRQy26GTDsNk +LgwBO5YuJDSzHoZrNx6KJipZD0fWREhz327Ww+Fmn/2LYSzrEajzvxRf68p6 +BEwi3zZvMGV9O7rrdLo3R3qpbwf49YLLajIXCRuxUB0bwnokvLnqpqaVHupR +MDM2aJ1rIauiUCG0GrZSsB6NtzJdA71fYz0amj9/SA/99Rz1GCx1iWplJWRV +DA4qciuyPFiPRf4BXVvZzbPUY9Fq3j+oqyRzcSg3elzyOID1OBTml5/acb+b +ejy8Xh33nz5GRjymbp145ZsQsioeZs9zhIfmf1q1Ph5jjz7tqD9O5sSwLPy8 +zTyYDDG05QUp3fe6aC+Gm2puovMwWS9GbVGR2tyPzEmwMjlUr7/ZSXsJrrf/ +fmz8EFklwfJUaIfchayX4FmtoiB1pIP2Uhhvqo4Y/ZAMKXyqMhsuWpNVUtTM +DtuIz56hvRRrot+zz5aTORks5usktoZkyHB/yz+CPbXttJfh36NGGcowsl6G ++OkHSpuZNton4ErwgQWVmowE3C70LT3hTFYl4LfJgY7qi620T4BF+lMPqZLM +JWJDr3vJ3ZfJSMTefXHCVK2O9omwNPW4p4sh6xOhn2nZsDJ/mvZJULs8e9+n +kowkpPH6I5XuZFUSwv0yhPWXTtE+CcUZ3prF3WQuGQtVHSaRfDKS8WT0dGmx +vIX2yTjjFyNrrGmmfTI0nzh6Ot3S0j4Fdr7ZNTx7bc9/G84GPg== + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[ + 1.6]]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {{}, \ +{}}}, {DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-0.000023503940061956706`, + 0.000010853339763120476`}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"5", "25", "100", "200"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.922526, 0.385626, 0.209179], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[ + + NCache[{{0, 1}, {-1, 1 - 3^Rational[1, 2]}, { + 1, 1 - 3^Rational[1, 2]}}, {{0, + 1}, {-1, -0.7320508075688772}, { + 1, -0.7320508075688772}}]]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True", ",", "True"}], + "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800007481705186*^9, 3.800007541386327*^9, + 3.800009538831128*^9, 3.8002531292781982`*^9}, + CellLabel->"Out[83]=",ExpressionUUID->"b3095197-d30c-4feb-ae34-4d45eea6cb69"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "20", ",", "300", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", "5", "}"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", ",", + + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", "5", "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800096681095546*^9, 3.8000967157777348`*^9}, + 3.800253142332921*^9, {3.800339223066864*^9, 3.800339238391082*^9}, { + 3.800339292112021*^9, 3.800339292648408*^9}}, + CellLabel-> + "In[167]:=",ExpressionUUID->"a374304b-756b-4003-b1a7-83d5cac5402e"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1z3lczPsex/GfJRyXhA6iNEmIIl1EiXeiUkmb9jTtMzXNpuwxtlAOSUWb +hpJC5DhZk0Gk3JA9KlPinHsSRfY6Xffh8+2fHs/Hu9fv09cgROIe3pvjOJ1e +HPf/3z9/ZuBeY6JJaWFL+U/PxBrfzo7qXOZZMFf4OlSmM1tAOMve5dhvzLOR +Wqk7PnYr8xxkfTRoHb+O2RKP8g1ulMmYreB82/qhlYB5LuJ16i0PL2e2xp2l +OWPaPZnnIXWab4aRE/N8zBXqPllgwwy0h0/8Ym9BVgBPJG36M03ZboPm3try +gYZst0H7VPmwW6PYvgDTemkZiTXZvgCCdqM7XX3YbotAR13z2K8vabeF8FBi +3MO3ZG4h+ltaXNZrYftCGK0eMdW1ju2LYOrs2BZ9h+2LUJ5rwJNdZ7sdDK6N +fBN0nu12EDx8sHJ2MdvtsWTmpNffDrHdHpffDOUfTWe7AyaNPD9wXhLbHZDk +Gj3oyka2L4a5/pGkybFsXwy75f1PKQRsd8SIQv+cqwFsd4SJKiW+zZXtTjDq +vr6y7yK2O8Hvd5OSfnPY7gz3jGlunSZsd4aGleemGh7bl+Cdj50gRZvtS/Bl +2SNT2wFsd8Gc3A9fX3xvpt0Fe7XPdgrekbmlGCHzsGtsZvtSnDhjOBKP2e4K +i4TcPburyHCF+dGgp1Vl7O9dsdtVd/T7U2SVKzSUJ+L757HeDcf+0TAZmM56 +N9TusHL5toP1bkiNix/8dB3r3SDaMGpfnpj17rhlFzcgMJj17pBcH7m/ryfr +3THo8EFBph3r3ZFecq1g7BzWe2D3Qq91e6ew3gOXDi/U+qDHeg/YROzdY6vF +eg9Y/eVtuKU36z1hfLT64+nOJuo94XbSfPq912SFJ2y63/Y0PCWrPBH3bsWu +59Vkbhma8hx7VZWxfhmywrR2Fpxk/TIc1VzpEqtk/TJcXjN/vXkK670wXb3A +umkL672gZS8oU8Sx3gu/vi4cPzSS9V7QTdY8lOLDem84jTkToOHIem9crLqy +WWjFem9o/C6ad8WE9d4wmMRd6jeW9T6YNOGOIYaw3gcVpRb50RzrfWDkeyxy +Z4eaeh9ci83NyGgmc75oPp8Vnv2ADF+sT5r6eW8FWeGLYHnHmrWlrPdFdPx2 +Ha8C1vvB8HR2L6P9rPdDvOxV4J/bWe+Hojd6fjmrWe+HkoRfxtkLWe+PwoXy +phZf1v/w7EkVKx1Z74+qNu5TlyXr/bHq4ePDq6awPgA6p3Z8ej2G9QH49M8X +XadBrA+AxcvRWx2+vqA+AO7ZAYav6shcIPbdTJKILpIRCJ3WjarGTLIiEG7+ +w8Rz17E+EJZD9O5t82f9cjzasmbeJSvWLweX2aPVMIb1y3Fy5dbc1u+N1C9H +cmidzZ/PyVwQgkuql967REYQVqWNNTiaRVYEwWFE6mDROtb/8Osmkb4/6/kQ +O5WmX7Uk8/hI6Xe62X00+x4f5RaiwgdfG36az4eTnWz+wjqygo+kW3N78s+T +lXyMjpk7/9N+soqPVy01XrNXkdV8HKuxzon2InPBaM65KUyeSeYF48bePcOP +apMRjH0Hjnec+lBP94Ohsh3lf/w+WRGMGWfLCjJOk5XBEKUJpqxLJquCcebb +/fmuErI6GLKIDEsdFzIXgsQz8+SPTci8EIgGTbbe8S8yQmDWdKRj6t/P6X4I +TBsbX1XfIitCsKmlWRJwlKwMgUEf5auX28iqEEyUvcwODiOrQ1Cw06f10QIy +F4pzldsn2BiQeaEYeONRXl7PM7ofCq/Zm893N5D5oaj/WHBhaRlZEYrl7bO6 +MjLJylC4z+1+WL+arArF52HZB0Z5k9WhGPM0KWvJTDIXhif6o83XDyfzwhB8 +VlCS31FH98Pw30JRVOVdMj8M4qVtZ1qKyYowBPpsUXclkZVhMHm031YriqwK +wyKHUDN9B7I6DIV/vPlqPIHMheND8YAPZn3JvHBMi/YRz2h+SvfDkVznUD5D +ReaHY8PpoTPND5IV4dix64/xpuvJynBod39vNPIjq8JxrmBtqe5ssjoctr6J +X4eOIHMR6J7i1KXR+YTuR6Am87Dm11oyIvA933JT6ykyPwLtbxT5Db+RFRF4 +X3fk1t1osjIC9RezrK8tJqsisPvvXz1KJ5LVEeA+bfcp0iBzkZhyfXzOwZeP +6X4k9l5skKRdJSMSHe3B+rtzyfxIqDz0vu2IJysiYfDYwiXBn6yMhL4yVZgw +h6z6sc+vzdg5kqyORHFvU5Pkj4/ovgBZPn/GZD4g8wQoOVNyvPA0GQIsf9nf +/NIeMl8Aq0FWS+7HkBUCxNb2XfzWiawUwGWPnmzIZLJKAI3EOq1ZA8hqAX4R +YEXI64d0XwgbyaCXqRVknhBHqoqO1RwmQ4hdN2ZqD95E5gtxe+wGoUcQWSHE +nAVcp9KarBRieMZfXR/HkFVC7L07tMb92wO6L8R0o77F556SuSg0lXa2jD9H +5kXBoKaiLDONjCho/LvXep1YMj8KmZubhIfcyYooJKy1rzGfTlZG4bBX+Zua +IWRVFOwM12queHuf7kcheYz36nE1ZC4abT1PJfXHybxodK2cbHkokYxoZEXq +6sqEZH403gYa+Tk7kBXR4Ffe9TOZSFb++F7vPd+M+pFV0cgoP2Ki/6qW7kfj ++PSPFmYVZE6EA69OFNjmkXkiVAzTMY7ZTIYINnbF9VnBZL4IEbL6xkaQFSLs +kifUG/PIShHE/Glh23vu0X0RtoXonXzXSFaLkOL1z2VBOZmLwb4qR493OWRe +DDTLea1b48mIgfhFVeXkQDI/BoUf7Fsa5pIVMVAemNgrX5esjEGsrMGi9ctd +uh8DWX5Yw4XzZHUMjJs75amryZwY5k0P3p+cTeaJsUW+Je/2lzt0X4yGZnX/ +KRfIfDHEFcd+T1pDVojRqf74cLolWSnGL4kR7k+/1dB9MQ7usth+7hJZLcYQ +z+KJpevJnASGTieT6q3JPAkmt3hWG/X8h+5LYHt97IT9KjJfgueBnytMN5MV +EqQ9S3j2ty1ZKYGzsC71ngZZJUGC1Wb955W36b4Ea47WFg1NJHNSjD7gkr/N +mawlhd9fUyM6Nck8KbriHnpdqq3+aTMpRmTkjV2fSoYU8vQZRfu9ya5SGLSZ +jj4xmsyXYmLR5ud6jVU/LZVi6rHeKdsPkRVSFJn16LuFk5OlMJ6y5vRQY7JS +ime6fbJmtN366RIpLsR9TltymqySomxwW8jtOPI9KeI7XrjMsySrpRg8eIhi +VE/lT7dLce7AxobX18mcDJ8W5bwZu5OsJUOwbvcMRxcyT4Zd2gdTm4aTzWTw +iFpsGV13k94vQ/p/6paF5pJdZShuH1LhHE7my5DmWNNTMIUslaEruSizo+MG +vV+GII8sj1Pnyck//p9tmqsDNpKVMiw+zvXdaEcukeFZQ3X/5MFklQymZfal +ox5V0PtlmJb9/vXubLJaBu0+87o3hJHbf7wvY2S+vwmZk0Pdahz6R+d1er8c +2VXzr3wpI/PkSMy6GnRpG9lMjvxN9UUCFzLkGPdqXGD6SLKrHJvqrt0sVl+j +98vx+Obts/bHyFI5dqaNj6peQVbIkWIb2JxiTU6W44xxYp2qP1n543tzFqz7 +VHuV3i+HqrLGaV82WSXHgLKoqRaRV8v/B8X8Jt8= + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJw1z3lYzHsfxvGfJRyPJctBRBNCKtKDKHEnKpWkkvamfaam2cgeYwvlkCTa +NEgbUcfJVjKIlBOiEJUp5ZznJIrsdXpcl8+3q39e19379+mrGyBxDu7DcZxW +L4778cv15tjPbDxsiDEszG4u+ek52OjR2VGRzjwXJgoP27JEZlMI59o45v7G +PA8JZdqT1+5ino+Uj7qtkzczm6EmQ/d2sYzZHA73LKrNBcwLEKVVZ3bSl9kC +91ekjWt3ZV6IhJkeSXr2zIuwQKj9dLElM9AePPWLjSlZATyVtOnMMWK7JZp6 +j5QPnMR2S7TPkA+/O4btizGzl6aeeAjbF0PQrne/qw/breBjp22y9usr2q0g +PBETWf2WzC1BfzPTa+Ob2b4EehtGzXCqZftSGDnYtYXfZ/tSlKTr8mS32G4N +3Zuj3/hdZrs1BNWP183LY7sNls+Z9vrbCbbb4NqbYfysRLbbYtroywMXxrLd +FrFO4YOub2P7MpjonI6dvpbty2Dt2/+8QsB2O4zK9kq74c12Oxiq4qPanNhu +D73uW+v6LmW7PTx/N8zvN5/tDnBOmrmy05DtDtAwd91eyWP7crxztxbEj2T7 +cnxZVWNkNYDtjpif/uHry+9NtDvi0MiLnYJ3ZG4FRslcrBua2L4CZy9MGo0n +bHeCaXT6wQPlZDjBJMvvWXkx+3snHHDSHvv+PFnlBA3l2aj+p1i/Ern/ahgO +TGT9SlTtNXf8tpf1K5EQGTX42WbWr4Ro65jDp8Ssd8Zd68gBPv6sd4bk1uij +fV1Z74xBJ48Lkq1Z74zE/JuZE+az3gUHlrhtPmTAehcUnVyi+WE8611gGXLo +oJUm611g/vfqSTt7s94V+lkVHws6G6l3xcpzJrMeviYrXGHZ/ban/hlZ5YrI +d2v2v6ggc6vQeMquV3kx61chJUhzX+Y51q9C1pB1jmuVrF+FaxsXbTGJZ70b +ZqkXWzTuZL0bNG0ExYpI1rvh19fZk4eFst4N2nFDTsS7s3417Mdd8NawY/1q +XC2/vkNozvrV0PhdtPC6IetXQ3caV9RvAuvdMW3K/UkYynp3lBaaZoRzrHeH +nkdu6L4ONfXuuLk2PSmpicx5oOlySnDqYzI8sCV2xudDpWSFB/zlHRs3FbLe +A+FRe7TcMlnviUkFqb30jrLeE1GyFp+/9rDeEzlvxnumbWC9J/Kjf5loI2S9 +F7KXyBubPVj/w/Omla6zY70Xytu4T11mrPfC+uonJ9cbsN4bWuf3fno9jvXe ++PTvF237Qaz3humrsbtsv76k3hvOqd6TWmrJnA8O34mViK6S4QOt1m2qhmSy +wgcrvYaLF2xmvQ/Mho5/uNuL9b6o2blxYZE5633BJfdo1o9jvS/OrduV3vq9 +gXpfxAXWWv71gsz5wT+/YsXDIjL8sP7IBN2sFLLCD7ajEgaLNrP+h183inS8 +WM+H2L4w8YYZmcdHfL+CJuex7Ht8lJiKsh9/rf9pPh/21rJFS2rJCj5i7y7o +ybhMVvIxNmLBok9HySo+Wpor3eatJ6v5yK20SAt3I3P+aEq7I4ybQ+b54/ah +gyOyRpLhj8PHznSc/1BH9/2hshrjdeYRWeGP2ReLM5MKyEp/iI4IDDbHkVX+ +uPDt0SInCVntD1lIkpmWI5kLQMyFhfInhmReAESDplvs/Q8ZATBuPN0x458X +dD8ARg0NLRV3yYoAbG9uknhnkZUB0O2jbHm1m6wKwFTZq1T/ILI6AJn73Ftr +FpO5QFwq2zPFUpfMC8TA2zWnTvU8p/uBcJu343J3PZkfiLqPmVdWFJMVgfBt +n9uVlExWBsJ5QXd13QayKhCfh6ceG7OarA7EuGexKcvnkLkgPNUZa7JlBJkX +BP+LgvyMjlq6H4T/ZYvCyh6Q+UEQr2i70JxHVgTBx32nuiuWrAyCYc1RK80w +sioIS20DjXVsyeogZP/x5qv+FDIXjA95Az4Y9yXzgjEz3F08u+kZ3Q9GXK1t +yWwVmR+MrQXD5pgcJyuCsXf/H5ONtpCVwRjZ/b1Bz5OsCsalzE2F2vPI6mBY +ecR8HTaKzIWg28C+S6PzKd0PQWXyySFfq8gIwfcMs+2t58n8ELS/UWTU/0ZW +hOB97em7D8LJyhDUXU2xuLmMrArBgX9+dSmcSlaHgPu0xz1Hg8yFwuDW5LTj +r57Q/VAculovOXKDjFB0tPvrHEgn80Ohchn/bW8UWREK3SemjtFeZGUodJQJ +wuj5ZNWPfVFV0r7RZHUo8nobGcZ9rKH7AqS4/xWR/JjMEyD/Qv6Z7AIyBPB9 +1d+k6CCZL4D5IPPljyLICgHWVvVd9taerBTA8eB42dDpZJUAGjG1mnMHkNUC +/CLAmoDX1XRfCEvJoFcJpWSeEKfLc3IrT5IhxP7bc0YO3k7mC3Fvwlahix9Z +IcT8xVyn0oKsFGJE0t9dH8eRVUIcejCs0vnbY7ovxCy9vnmXnpG5MDQWdjZP +vkTmhUG3srQ4+QgZYdD4b68tWmvJ/DAk72gUnnAmK8IQvcmm0mQWWRmGk24l +byqHklVhsJ60aciat4/ofhjixq3eMLGSzIWjreeZpO4MmReOrnXTzU7EkBGO +lFBtbZmQzA/HWx89TwdbsiIc/LIHnoZTycof3+t98JteP7IqHEklpw11Wqro +fjjOzPpoalxK5kQ41nI20+oUmSdC6XAt/YgdZIhgaZ1Xl+JP5osQIqtraABZ +IcJ+eXSdPo+sFEHMnxm0p+ch3Rdhd8D4c+8ayGoR4t3+vSYoIXMROFxu5/Iu +jcyLwJASXuuuKDIiIH5ZXjbdh8yPQPYHm+b6BWRFBJTHpvbK0CYrI7BWVm/a ++uUB3Y+ALCOo/splsjoC+k2d8oQNZE4Mk8bH78/NI/PE2Cnfeerel/t0X4z6 +JnV/gytkvhji0tzfYzeSFWJ0qj9WzzIjK8X4JSbE+dm3SrovxvH9pnsuFZHV +Ygx1zZtauIXMSTDJ/lxsnQWZJ8H0ZtcKvZ4/6b4EVrcmTDmqIvMleOHzudRo +B1khwZHn0c//sSIrJXAQ1iY81CCrJIg236Hzouwe3ZdgY1ZVzrAYMifF2GOO +GbsdyJpSeP49I6RzCJknRVdktVtRVcVPG0sxKunUhC0JZEghT5ydc3Q12UkK +3TajsWfHkvlSTM3Z8WJ8Q/lPS6WYkds7fs8JskKKHOMenZXB5Dgp9A02FgzT +JyuleK7dJ2V2292fzpfiSuTnI8sLyCopige3BdyLJD+UIqrjpeNCM7JaisGD +hyrG9JT9dLsUl45tq399i8zJ8Glp2psJ+8iaMvhrd8+2cyTzZNg/8nhC4wiy +sQwuYcvMwmvv0PtlSPyzdlVgOtlJhrz2oaUOwWS+DEfsKnsyDchSGbricpI7 +Om7T+2Xwc0lxOX+ZHPfj/9k9ZIP3NrJShmVnuL7brMn5Mjyvr+gfN5isksGo +2KZwTE0pvV+GmanvXx9IJatlGNlnYffWIHL7j/cljc7wMiRzcqhb9QP/6LxF +75cjtXzR9S/FZJ4cMSk3/Ip2k43lyNhelyNwJEOOiS0TfRJHk53k2F57806e ++ia9X44nd+5dtMklS+XYd2RyWMUaskKOeCufpngLcpwcF/RjalX9ycof35u/ +ePOnqhv0fjlUZZX2h1PJKjkGFIfNMA29UfJ/8Ewm4Q== + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 300.}, {-9.85098576343439*^-6, 0}}, PlotRangeClipping -> + True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"5"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + "}"}], ",", + RowBox[{"{", #, "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], "}"}]}], ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", "True", "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800096696258992*^9, 3.80009671692484*^9}, + 3.800253143400098*^9, {3.800339231797134*^9, 3.8003392553796177`*^9}, + 3.80033933081131*^9}, + CellLabel-> + "Out[167]=",ExpressionUUID->"4648b6d9-1be8-494e-a38c-33cbcbe73981"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"100", ",", "200", ",", "300"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"100", ",", "200", ",", "300"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800011150223881*^9, 3.800011154116885*^9}, + 3.8002531543444777`*^9}, + CellLabel->"In[85]:=",ExpressionUUID->"1189d55b-e3f1-4fa8-817c-47da353f8e75"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1yw8w33Ucx/Eva8NtC2P2m9mGkMTKv59isxd+P/9//vz8fj9k3Zwiw/zZ ++XN+O+3bGEqz1CI3kbTM1qlsrsn5+Q3Rb/YbYaIZdeRao+Yyf2ZSXe/P5+5z +n3vc8/OySsiQJupyHPf6v/e/95Uel8thf28cTjf/dW/ryqSK+//gE8d126+0 +Q2R9LHUXzJ35nNkIx599Ijx5ntkUKsNKxUQZswDmox7tbiXMFgj03By7Wshs +Cc3pbd885pmt0Tunm3algNkGWfLYBk0+sx0SlFu0whxme3iMaodmMpgd0Jd6 +S649xuyIjj9cq+cTmA8g7YTRBVEc84u4mu3gPCRldkZevG1dZRCzC0YE+xPf +P8zsCuP8z+x73ZjdYFj3e5PLc8zuCN3cqRqzYBYi7lXLiDZDZg+MNZvE3tFh +fgkz97bOOv31A/lltGeeN+2ZZvbE9hZzk+phZi8k6/RYNncxH8R7kUFnn/qa ++RCsLUauf1zL7I0Ko7smJ8uYD6OiZX1fbR4zsLVsMkX/NTIPNHWtVbVLWPeB +285iRZsH6z7IEwiTNlmx7osfR/dXXjBg3Rdh6qKewoVB6n7YstQw2TFG5v0g +flT6c0gn6yKYN46NvHCRdREkP9WMpL7DuhhpTk/r6WawLoYg40j9opR1f3Qr +c2bFQtb9EfvRTbsVAesBMOi35/csDVAPQEOtg+eONjIXiDT/1pRxJeuBSC9Y +2Z3rxXoQpjStyfOPb1MPws7Cb8+J2shcMJp9oqf4XNaDcUkzomp0YT0E4jdn +r6jmtdRDYJVp7tnfSOZCoW8WsGM4nvVQhNxYWrgrYF2ChcnByw8GblGX4ImZ +jrV+MZkLQ3FcTbiHF+thaFrd5H3qz37q4YhS+RvMfkrmw8H78JNZctYj8HyK +cM1ej4wIXPNu/cL4+k36H4EKk2PhLslkdQRKHT3CKnaRuUgUTI9YufdqaB+J +3OS9ETbZZD4Sdw4kpSZakdWROLdnyHhD+z3tpagvbZhbzidDikfOZ79U2JJ5 +KbZZ6gqsB/toL4X4YtFcvJLMRWHircW13TZkROGe34SFTNtL+ygUL3c4muWS +1VFwP3TU8I19ZE6GvnHTZknvd7SXIWl0+/LgcTIvw0NR7cSyKVktg53qbZmm +vYf2crzbLIkOTSBDjqKS1KkSfTIvh/J+y2+nm7tpL8cHE2UZIhmZU2DA0Sdz +eLWL9gqYbQTPCuvIvAKLV6v7c0RktQJBTr/sqrp/g/bReFg201lfTkY0/JVd +12pcyXw00gW+0+VjatpHw6XO0vVUAZmLgcXto8XZ1mTEYOiEQ9aD8k7ax6BH +kHPQZFxF+xhUXVrXS3+GzMXiw0HnIwbpHap/AOMMEJE= + "]], + LineBox[{{0.6679280396874013, 2.6230774215761176`*^-6}, { + 0.6684009417303822, -7.384184270548169*^-6}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1yw1M1HUcx/E/MMYFMVyjg3hYqUDyjBwHIk8fUB7k+R7ggMRD4jKCICBB +dMBluHYRDDW0th5YHScPAsqDB6F4QIrLUHChkRsCBqI8FaU8pKMa399v++63 +1977bE3PFSv0OY7L+O/+/+Nmp3L56xtBOVbTtp2r473c5oOLmUa8K3+AzIM8 +QqS0iGXegpeW9POlAczm2BFXkOogZLZEdunwaLkHsw1O88rO8l2Z34BzbxB/ +wJF5G2LkoqNGDsx26IyS3NFsZXaAg0neaLkN8w6kSAqPf85ndkJJ33WDYTNm +F+jU38548Zjd8HWYiax/o5/sgbzR+egjz5h3YvDKp46yeWZPHESNSj7JLIDQ +psH91CizF5K+D1hfusEsxDXN9HhxD7M3Xrc0mfVoZvaBZ+OIgP8N8y4olj/6 +y6mK2Rdh1oKsD0qYdyO/qfrPR1nMfliJOr90KpnZHx1mv0zkhzEH4Glvpljl +yRyIIFX3w3u2zEGoOnA7NI3HDFz/MtLPbrlv00pg+q77F/b3yVwwIma6gt8Z +YD0YB8e2uc02sh4CJ6ejGc0nWQ/BAT3Fc20R63vQWjtna5zK+h4YrgTqaYJZ +3wtPRclipT3re7HYfTjgRx7roRBmv5sQNaejHgqp9eB5+yEyFwb//cs3ElpY +D8Pd+08DxqtYD8eh8ZCWvhzWw+Fql/mTfizrEajzuxWvdmE9AkaRb5s2GLO+ +Dz11bW1vDl+lvg8wqxfeVpG5SFiJvFWxIaxHQsDVNDWt9VKPgomhXvt8K1kZ +hUpviyELBevReCvDJVDwGuvR0Pz+XVroz1eox2C5O0AtLSUrY3BckVd5yJ31 +WBQca+sof3CZeizaTfuvtVWRuThUGKyWrvqzHoeigooL+5/0UI+H56tjfjNn +yIjH5NS5V74KISvjYbKR5X1i4YdN6+Ix+uwTbf1ZMicCv+izDtNgMkRorihM +7nncTXsRXJXz410nyToR1MXFKlNfMifG2sRgve5BF+3FuNf525mxE2SlGCuT +oVq5M1knxgu1ojBlWEt7CQx31kSMfEiGBF7VGQ03LclKCWrnhqxEly/RXoIt +0e/ZZcrJnBTmC3Via30ypHiy+29hrrqT9lL8c9ogPTuMrJMifuaPbKvZDton +4E7wsUWliowEPCzyKTvnRFYm4NeJAW3NzXbaJ8A87bm7JJvMJWL7VbfSRy+T +kYjDR+K8U5rbaJ8IvrH747YYsi4RutnW7WsLF2kvg8r5xfteVWTIkMrrj8x2 +IytlCPdN966/dYH2MpSkCzRLOWQuCYvVWqNIMzKSsD5ysaxE3kr7JFzyjZE2 +1rbQPgmajx08HKeaaZ8MG5/MWp5dc++/AuMGwQ== + "]], + LineBox[{{0.6671176556172752, 2.6230774215761176`*^-6}, { + 0.6680654817683516, -7.384184270548169*^-6}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1y38s3Hccx/GjaayRtqJmdsaOXssoqx/lmB8vVT/uej3ncEcp64Vp9VY/ +Mu3QzVn7B7qOopdqabP4NYy11m6uVr5Bre26ozVqFmPpjqBGI4IlnXXZ+/NJ +Pvnkkefn5aDOVKSZ8ni81Ff3v1eqc75jWNkIPsk32t1e+72b9//BJ8O9Lj3e +d8ivIdHKNnR5M7MFSpY/lbkv6clWuK9/ciTPyGwDfVBBYdQk81u4Z5ivbhhn +FqDX6LPFYpTZEfa9sneMQ8xCVFcYl0ceMu9Gc3zt3bt9zM5wsNK3n+9idgF/ +x4sgUQfzHrRm9Eq5JmZ3hP04+MSxhnkvCvPNRlPKmD0Q7jBgPF3E7IkLT22n +TuQwe6Fy78RIgJrZGxX3Sl7Oy5n3wbPeri0/iNkHr7faquZcmH3hpnyjJMCa +WQTrxcW5HB6zH7b8nRRUNttJ9sc/JteTKx8zv4e80WAUdTIHgJc/tnT4GnMg +zHzHdI5nmYMQzEmyxz9gDsaZ1Jqn58TMgMt0op/QlawFLAfW7brMWQ+B6eI5 +oXT+e+oh2Nqdumn8AZm3H8+PWxSnN7G+H9LBPt3qWdZD0djs4XIhhfVQOIV4 +xbj6s34Ag7pc0cgO1g+gxEZo/cXz76iHYfdMeWBCP1kbhqbOcSv/q6yH4+LR +cmvvbNbD4WuheCwJZz0CR8KyZor4rEdAf6l428TCbeqRCIJg+/scWRuJhIaA +/m0VrItR2rrOX1CzLoaJvb3lhifrEkgs2/WRpqxL4Kou8DQM3aJ+EK4Rt9oq +r5G1B1GwK0tTe4J1Kd6u8u9Z9GVdivIbNZvLNrF+CMJH9W2Fhm+pH8JkkcZr +4DKZJ8Ox0FpBupp1Gdw0y+bprqxH4cFsz+WHyx3Uo+BecuyUrovMk6NrdTpl +8DMy5GgqDrfNF7P/r/rPgryr28mcHL/ueDNWNHKT9tHQDivL466QEQ2vXRv8 +tWSyNhpVkrZZ4U4yF43kpLn1qekbtFdgza1e7tFChgL5p+vW+R+StQo0K03M +6t4lcwr4Zokcap99Q/sYHM2xSQ9LJyMGcmf3neK5dtrHYI8s4ssODZmLgZvs +sPfnf7XRPhbdjpp9U5lkxGLrcK6pfulr2sdi7Kb4pSCbzMXiypmPSx1ftNI+ +DlWFPhb3s8iIg/cUVmyXWmgfB4FH33XnTDIXh+TswI/WFpppr8Sp6oxfLmnI +UKJ2zMnefP4r2iuxWpfUoj5O5pTQ6Z/91DjTRHsVpv1yDX+kkaGC/9rFFbs/ +G2mvwiNhVkGamsypMJk1W9Y71UD7ePxgyFAFp5ARj6EF46xxop728Qip6o/m +kshcPApXJkrHfqujfQLMnE4WiRLruv8FoF0JKg== + "]], + LineBox[{{0.6667615329930493, 2.6230774215761176`*^-6}, { + 0.6681842811195596, -7.384184270548169*^-6}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy3ss3Wccx/Ef1iJth1I9VavLMDO6uR0bygfH/X6ccxBdKhamqEvjEjrr +b2XotDpbx6TGzDq1bmcbldXEcYpS1VOGGquyhci6shFKVaVr0u+TPcn3j1fe +z8csIUOcqMFxXOKzU3t26tz/z3NoxX1o5Yzncy153jD5XtR6/b0uyvjSdsvy +R9WI4jm1sNZTuPDhN8y6OPbKE+GJ88wGUOhUyabKmQUwGnfpcCplNkaA67bY +jSJmUwyc2vnzY57ZHH0L6mmXC5ktkCWNbRzIZ7ZCQsF2lTCH2Rou46qRuQxm +G/Sn3pKqjjLbovMfx5rFBOaDSDuue0EUx/wGWrNt7EfEzPbIi7esrwpkdsCY +wCTxE09mR+jlf23d58TsBJ36v5sdXmV2Rsi2LsWEMbMQcW+bRrTrMLtgQq4f +e0eN+U3M3dsxb7fyK/ktdGSeN+idZXbFrhYj/ZpRZjckq/WayruZ3fFxZODZ +F35iPgRz47GrX9Qxe6BS967+iXJmT1S2bB2oy2MGdpRPp2i9Q+aB5u7N6o5Q +1r3gtKdE1u7CuhfyBMIkDTPWvfHbuEnVBW3WvRGmLO4tWh6m7oPta43TnRNk +3ge+D8v+CO5iXQSjpomx1y+yLkLo77VjqR+x7os0uxc11TNY94Ug43DDqph1 +P/QU5Mz7Cln3Q+znN60eCVj3h/agNb9/bYi6PxrrbFx3t5O5AKT5taVMFrAe +gPTCR/ty3VgPxMxAW/Li49vUA7Gn6JdzonYyFwS5V/QMn8t6EC4NjCmaHFgP +hu/785cViyrqwTDLNHIdbCJzIdAy9N89Gs96CIKvrS3fFbAeiuXp4W8fDN2i +HoonhmrmWiVkLgwlcbXhLm6sh6F5Q8Pj5L+D1MMRpfDTnv+KzIeD9+Kns6Ss +R+C1FOGmtSYZEbji0fad3tWb9D8ClfpHwx2SycoIlNm6hFXuJXORKJwdM3Pu +G6B9JHKTX4qwyCbzkbhzMCk10YysjMS5/SN6T1U3aC9GQ1njwno+GWI8tD/7 +g8ySzIux01RdYD7cT3sxfC8WL8QXkLkoTH2wurnPgowo3POZMpao+mgfhZL1 +TlvDXLIyCs6Hjui8e4DMSdA/aSAP7btOewmSxnetDx8j8xIsieqm1g3ISgms +FKclAx29tJfijDw0OiSBDCmKS1NnSrXIvBQF91v+OiXvob0Un06VZ4gkZE6G +IVuvzNGNbtrLYPg0aF5YT+ZlWG2tGcwRkZUyBNr9ubf6/jXaR2OpfK6roYKM +aPgVdF+pdSTz0UgXeM9WTChpHw2HelPHk4VkLgbGt4+UZJuTEYOR4zZZDyq6 +aB+DXkGOu/6kgvYxqL60pZn+MpmLxWfD9oe10zsV/wGeUxHB + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy39M1HUcx/EvMMYFsXONgABXKpD8RuAOEQ5eoPyQ3/eDn4mHxEXEpQEJ +ogGX4dpFMNTQav1gBSc/PNADBELhgBCXoeBEIxuCJqL8MkoR05kb7896b+8/ +HnvutS5jj0RhxHGc4sUbvHhD7v+r+JqfnvXHR0GrehCUd7U833VQ2UsZrnyN +ZHPeQM8qeZBHiFVWscxr8NKiYZ5MxGyBjXH5aY4CZmsoS0bGyjyZ7XCUV3rc +0o35Dbj0BFkOODGvR4xcvN/Ekdke7VHSK5p1zI5wNMsdK7Nj3ohUacHBLyyZ +nVHcd95ohM/sCn3t99M+PGZ3fBtmltT/vJ/sidyxueh9j5g3YejcZ05Jc8xe +2IVqtXyK2RsCuwaPI2PMPkj+UfRk8QKzAIOaOxNF3cxCvG5tNuOpZfaFV+Oo +t+V3zJuhWPr4b+dKZj+E2XrnfFDMvAV5TVV/3c1h9sdy1MnFIynMAWjjX53M +C2MW4WFPtkTtxRyIIHXX7etrmYNQufNyaDqPGTj/VaS//VLfqlXAnWseXzrc +IHPBiJjuDH5ngPVg7Bpf7z7TyHoInJ33Z2oPsx6CnQaKpx2FrG9FS83sWtM0 +1rfCeDnQQBPM+jZ4KYoXKhxY34aFrr2in3msh0KgfDchalZPPRQy26GTDsNk +LgwBO5YuJDSzHoZrNx6KJipZD0fWREhz327Ww+Fmn/2LYSzrEajzvxRf68p6 +BEwi3zZvMGV9O7rrdLo3R3qpbwf49YLLajIXCRuxUB0bwnokvLnqpqaVHupR +MDM2aJ1rIauiUCG0GrZSsB6NtzJdA71fYz0amj9/SA/99Rz1GCx1iWplJWRV +DA4qciuyPFiPRf4BXVvZzbPUY9Fq3j+oqyRzcSg3elzyOID1OBTml5/acb+b +ejy8Xh33nz5GRjymbp145ZsQsioeZs9zhIfmf1q1Ph5jjz7tqD9O5sSwLPy8 +zTyYDDG05QUp3fe6aC+Gm2puovMwWS9GbVGR2tyPzEmwMjlUr7/ZSXsJrrf/ +fmz8EFklwfJUaIfchayX4FmtoiB1pIP2Uhhvqo4Y/ZAMKXyqMhsuWpNVUtTM +DtuIz56hvRRrot+zz5aTORks5usktoZkyHB/yz+CPbXttJfh36NGGcowsl6G ++OkHSpuZNton4ErwgQWVmowE3C70LT3hTFYl4LfJgY7qi620T4BF+lMPqZLM +JWJDr3vJ3ZfJSMTefXHCVK2O9omwNPW4p4sh6xOhn2nZsDJ/mvZJULs8e9+n +kowkpPH6I5XuZFUSwv0yhPWXTtE+CcUZ3prF3WQuGQtVHSaRfDKS8WT0dGmx +vIX2yTjjFyNrrGmmfTI0nzh6Ot3S0j4Fdr7ZNTx7bc9/G84GPg== + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy38s3Hccx/FDGmusrWBmZ+zotYyy+lGOcV6qfl2Vc7ijlPVW1eptjk07 +dHPW/oGuo6hUi2bxaxhrrdvcrHyDWtu1aI2aRdzSHUGNRgRLrJP0/ck+yfuP +R56fl50yQ5ZqxOPxUjfPYPMMef8//sNa7XHRRwEvtRTA0+VtvOr6fg9lfDrS +69Tj+VP3S76CRAvroOUtzKYoWv4s0nVJS7bAXe3jIzl6ZitoxXn5UVPMb+LO +4HxVwwSzAL16r62mY8z2sO2NfFs/zCxEVZl+efQ+8240x9fcvt3H7Ag7C237 +hS5mJ/DNn4tFHcx70JreG8E1Mbsi+Jehx/bVzHuRn2s8llLC7IYQuwH9mQJm +d1x8Yq07lcXsgfK9k6N+SmZPlN0p2piXMu+De71NW66Y2QuvtVor5pyYveEi +f73Iz5JZBMvFxbksHrMPtv6TJC6Z7ST74l+D68nlj5jfRc5YAAo6mf3Ayx1f +OlzL7A9j7/FK+3PMYgRwksyJ48wBOHus+sn5cGbAaTrRR+hM1gBmA+s2XSas +B8Jw8bwwYv5H6oHY1n3MaOIembcfz06aFqY1sb4fEUN9lavnWA9CY7Ob08UU +1oPgEOgR4+zL+gEMVWaLRs1ZP4AiK6Hll89+oB6M3TOl/gn9ZE0wmjonLHyv +sR6CS0dLLT0zWQ+Bt6nskSSE9VAcCVbPFPBZD4X2cuH2yYXvqYdBDMGO9ziy +JgwJDX7928tYD0dx6zp/Qcl6OAxsbc1euLMugcSsXRtmyLoEzso898HhW9QP +wjn0Vlt5LVlzEHm71KqaU6xH4K0K355Fb9YjUHqjekuJEeuHIHxQ35Y/+B31 +Q5gqUHkMXCHzInEiqEaQpmQ9Ei6qZZM0Z9ajcG+258r95Q7qUXAtOnG6sovM +k6JrdTpl6HMypGgqDLHODWf/N/tDQc61HWROit/N34gVjd6kfTQ0I/LSuKtk +RMNj1wv+WjJZE40KSduscCeZi0Zy0ty6bvoG7WVYc6mXurWQIUPumbp1/gdk +jQzNcgPjunfInAzeapFdzdNvaR+Do1lWacFpZMRA6ui6M3yunfYx2BMZ+lWH +iszFwCXysOcXf7fRPhbd9qp9ugwyYrFtJNtQu/QN7WMxfjN8Q5BJ5mJx9ewn +xfbPW2kfh4p8L9O7ajLi4KnDivVSC+3jIHDru+6YQebikJzp//HaQjPt5Thd +lf7bZRUZctSMO9iazH9NezlW65JalCfJnByV2qe/Ns400V6BaZ/swT9TyVDA +d+3Sis1fjbRX4IFQnZeqJHMKTKlnS3p1DbSPx8+D6YqAFDLiMbygn9VP1tM+ +HoEV/dFcEpmLR/7KZPH4H3W0T4Cxw4cFosS67v8A1Q8IBg== + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-7.384184270548169*^-6, + 2.6230774215761176`*^-6}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"100", "200", "300"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800011190007951*^9, 3.800253163408025*^9}, + CellLabel->"Out[85]=",ExpressionUUID->"4fc7ede1-6329-49b2-9e92-4f2af7c23afa"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", "500", "}"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", + ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", "500", "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800162744236759*^9, 3.800162746449147*^9}}, + CellLabel-> + "In[199]:=",ExpressionUUID->"e96e85fe-afe5-4fe1-b645-8c01f0c18fd7"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw1ywlQ1GUcxvE/NqUCERQNEcVNknEUxrXB8sDCAgsiLLBsRsgR4AbDgqtM +QRziwbEUBU0gCSjggoByqRwytoliopEbyEQCjRBHjElTEI4FZuPvfWfeeecz +3/exiJeLEzdxHPfB4/v/a7K78YLLxiMvoSxje7R5/yXuyUFp3vuqX863k7dA +ECCq0clj1sc3IxcPZScyG6K7XTAxKmV+CTojN+0ywphfQfmSqexyELM58px4 +wleFzJY4/eGVyX4vZmukCkoL+G7Mr0GU/rd7jiOzLTo9iwISbJi3Y/niyN0F +Y2Y7VJxA4uZnmR2wuXD5jHrjLPlNeMebal5YZn4LFa1WRVrTzE5YVwqWSm4w +74DuU9NBnT3Mb4OXu8Uxs57ZGQdk/h53lMwuWBrT95pRMLsi9wsD6093M7vh +TrPPgykvZndctY9ZHLdi5sFClYusZ5jfwc/7bqUML5whe6BvIHDl+jVmT7iX +JRRkq5j5UDRpJu8eYvbC1Kjr4qM9zMDncZOqn3jkfGA0JspNbsi6N4Zr+BND +99qoe+PffSMzM4NkzgfbdpQNDx1j3QfaH61ZZKaxLoDGWeerFW/WBbjeunbf +z5B1Xxh5tD2XNtdK3RdlLumr6efJnB+cGw70iA+z7odSY9lRIzHrQhh1bbQO +mrIuxJTZJyXvLbVQ94c9h+Oz58j5/rCQCxWxuawHQLPc0jsuZD0AR3q22QXp +sR6I6JTyhstjp6kHIitWou1TTeZEmE67FzsSw7oIhcmhA6mWrAehi7/fz3Ku +mXoQUv7pcFtRkblgaHKc5xaSWQ/GpL2ibZMt6ztR3likJVpoor4TD+Na9g6e +InMhCKwvztyfwHoIdBP7fog3Z30XhH0Gtl9OqqjvQn+cgY9eFZkLxa1fPe+P +i8kIRYtJgfaKLvsfCn6E8mDK0KknVofi45dtRII8MheGkoGKpIOuZISho/b3 +2TeWG2kfhqcViokAFVkdhlnZQvJ0NJkTo04+2/vn82SIUVDqsKH8roH2Ysxn +G2R05JDVYjSXtYQlOZG5cPy1gvnu+Xrah6NXXplVV03OD4d5PX+PYwhZHQ73 +1flFmRaZi0CSW5c88txJ2kdgSvdIyIMkcn4ELjhJZ6TGZHUEtL4vLs65cYL2 +kQjocmhIzSEjEmvTCZ/ZOZLzI2HFR3jht3W0f+ytuo3p1mROAmVe6lWLwlra +S/DHlO/ept9qaC/B1lW1i14wWS2Bic36j/Fnj9M+CqVD7bc79cmIQtXrYzc3 +K76mfRT6JFG8jNvVtI/Ci31D5Q9dyZwUvEnOo6P6GO2l6E9cVNauV9FeCoXC ++JomlqyWIunoSTPJlUravwszy/5uV9vKS/8BTRoIZg== + "]], + LineBox[{{0.6669129651702559, 1.4805153980959068`*^-7}, { + 0.6673172710737478, -1.5572551690575146`*^-6}}]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFy3lQ1GUcx/EfmqFABEVDZHGTVByFcQrLBxaW5RDZBXa3IuQYQIJhwVWm +oAXElLMoaAJJQAEXBJRL45DRTRQTjSSQiQQaIY4YE6cgHAuKGb7P9Mx8/3jN ++/mYxcjFcVs5jovbOI2N28L9/ybTCzWU2gmem3rkuce8I2LbU9IrlFGc/b7q +l4utlze5HXxhQJV2NrMergxdOpoZx2yAzlb++IiM+UVoD922SRMxv4zSRePE +q4HMpsh2cBO8ImA2x9kPrk30ejJbIplfnMtzYX4VAal/uSrtma3R7pEvjLVi +fh1Ll4buzxsx26DsFOI0n2G2g2be0jn1+nnym/CKMR5+fon5LZQ1W+RrTDE7 +YK2Iv1h4i3k3dLZOBbZ3Mb8Nt6zt9um1zI44nOjnfq+I2QmLo3qe0wpmZ2R9 +oW/56bvMLrjX6P140pPZFddtIxfGLJjdYKbKQsbTzHvw88E7SYPz58ju6Onz +X755g9kDriWxuZkqZh4UDcMT948ye2JyxHnh3/3MwOfRE6qf3Mg5wEik1EVu +wLoXBqt44wMPWqh74Z+DQ9PT/WTOG7t2lwwOnGDdG1ofrpqlp7DOx7Cj9lfL +XqzzcbN59aGvAes+MHRveTZltpm6D0qcUldSL5I5XzjWHe4Sf8K6L4qNEo8b +ilkXwLBjvbnfmHUBJk0+LnxvsYm6H2w5nJy5QM7xg5lcoIjKYl2I4aWm7jEB +60Ic69plE6jLuj8ikkrrro6epe6PjCiJlnclmQvAVMqDqKFI1gOQlxDSl2zO +eiA6eId8zWcbqQci6e82l2UVmQvCsNJxdj6B9SBM2Cpatlizvhel9fkaAfMN +1PfiSXTTgf4zZC4Y/rUF6YdiWQ+GTlzPDzGmrO+DoEff+ssJFfV96I3W99at +IHMhuPOrx8MxMRkhaNqZq7Wsw/6HgBdWdCRp4Mym1SH46CWrAH42mROhsK8s +/ogzGSK0Vf8+88ZSPe1F2KZQjAtVZLUIM4nzCVMRZE6MGvlM9x/PkSFGbrHd +etF3dbQXYy5TP61NSVaL0VjSJIp3IHOh+HMZc51ztbQPRbe8PKOmkpwTCtNa +3n77YLI6FK4rcwuJGmQuDPEuHfLwC6dpH4ZJnWPBj+PJOWH4xkE2LTMiq8Og +8X1BgfLWKdqHQ9hhV5esJCMcq1Oxn9nYk3PCYcFDaN63NbTf8A6d+lRLMidB +UXbydbO8atpL8GjS50DDb1W0l2DHitpJN4islmCn1dqPMedP0l6K4oHWu+16 +ZEhR8drobU3F17SXokcidUu7W0l7KV7oGSh94kzmZHCb4NzbKk/QXobeuIWi +6rUK2sugUBjdGI4iq2WIP37aRHKtnPbvwMS8t9PZuvzyfyJFB68= + "]]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-1.5572551690575146`*^-6, + 1.4805153980959068`*^-7}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"500"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + "}"}], ",", + RowBox[{"{", #, "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], "}"}]}], ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", "True", "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800162762299748*^9}, + CellLabel-> + "Out[199]=",ExpressionUUID->"880d6549-cd45-454c-9d4f-d1e60f311942"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "250", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", "500", "}"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", + ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", "500", "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800157519007949*^9, 3.8001575414699793`*^9}, { + 3.8001621701076937`*^9, 3.800162174372952*^9}}, + CellLabel-> + "In[180]:=",ExpressionUUID->"8f2b59b3-2fa6-40e1-8907-0b0f99d32b21"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw11QdUk2cfBfBXrAuR4air1aBIcVAtDoaKF1BktMjeIyQkZIMGUEEkgogI +agvuKqIoKlpEqGW2Rpw4QCpuQBwI4ioUtUKtn9/h/3AOh/M7Nzf3nOR5H4wF +UZ4iHY7jej7//v+vjnqqq9+/nxb9/MI8ZcOK6j+4vh9kJoXkPzx9kjwYDk4u ++4YmMRviTG1lSoKIeSRKTjrcu+nPPAZDa6/NWO7B/BWyOiZIq12ZeUiysHH8 +2pF5Eo7JzjdWLGI2gcIhM9nWitkULtHvrBNnMpvh1MKNTsIpzNPwprL2UdtY +5hnIzoVo0DDmbzEo7c0v2v8KybNgJ5hQP+IN83fIPj55Y79mZgt8zHDo2HSV +eTb0+je7niplngObtYNnxh1knotY6dIFDzKY56GjwXDRYzWzJdb+ZGSyOZDZ +Cg+O2v/TtIjZGhfMQ9tvT2a2gXH+WsQPZJ6P+ytuyK+0/UJegPIq5+6aS8wL +Yb1VmJyQz2wL9ZH6xkcpzIvQdNOy/VMYM/BjeGP+XRuyBrgZ6mcVNZLldriy +z/bexZcnKLfDvytqHz8+R+bs8c3srVcu7ma5PXRXvTeOU7HcAfVzh+7otmO5 +A2qOv3+9ZCTLF2P0ghMGqtbjlC/G1nnRb6NPk7klmJsXW+q5nuVLkDlWumG0 +J8sdMbr4v+PnJrDcEU0T12wK6iigfCnMOex98itZsxTGUY5q/lqWO6H+TUHZ +bUeWOyG19JsZrvosd0awPCuvuuEY5c6I5/vq2u8hcy5oVr3k14ay3AVpke5V +ikksd0WxbcySSa1HKXeFvLfIqjufzH2P+sS5rW2RLP8ejebqEzpmLP8BWYc2 +9nNpO0L5D+gJL5CcO0zm3OB8MD0uRshyN+iJyusEPJYvg2O5kdm2xnzKl6Ei +3MhefxeZc8eNpwtf3/Ykwx0F45N1u/XY691h652xTn7xcJ+17lg9boqLQxKZ +88CmqmzxOksyPFCU8+rJ9DeHqO+BAWr1Pad8stYDT6Rtkc3BZM4T+6OelHUN +J8MTyZnf/pdxOY/6nniWYLS8KJGs9cTRrQUeYgsy54W/u/Gs5NlB6nuhLGpn +/P49ZI0XeAdtw2a6kbVesH77rF3aj8x5Q2xVHOXz6wHqe6NJL9XtHzFZ443f +LPwf+48la73R73p6euLVXOr7wKn42zxFIhk+eN8s3DJjJlnjg8m28Eo7u5/6 +nz1E71C0CZnzRUaS4oJxWg71ffFX02LJkef7qO+LIW+18/S/J2t9MX7Kxz8F +hXup74fMiydvnTIkww+7pjZcG6T+mfp+KPf1s1l+aw/1/TCq/GJWjyWZ84dN +I7egaM9u6vujQtSekfNxF/X9oVaPvVTPJ2v9Id5wYKLv+Z3UD8DESRUllmZk +fLbThszkzB3UD8B37/7ca9+5nfoBWFN7/0yKL5kLRIDBsDKPqm3UD0QTd9e8 +bBJZEwjjj3GF1enZ1A+Es9X5gjWdWdQPwgqFflxnABlBsNnctXjGuZ+oH4Rv +8q1nWJmTtUFIHVg5kbfrR+oHo6rRvvN1fzKCMexCT07ooy3UD8bz2Ovpd6o2 +Uz8Y6xcnKUP2ZFI/BHMn6F/+Ij6D+iGwv9x5+VHQJuqH4Mz+ycsGI536ITDr +nNWWYbqR+qGwNfavSTJIo34opj4suvOuJ5X6oQjeEba3//P11A+Fh0/D0rJ7 +KdQPw6bgUSdNrydTPwzVaaNc+OfWUT8MuWe/tIir0lA/DMbh36ErOon6fJzO +PnK7S5XYZx4fO1+uM9BXJ9D78SF6GjREmLi6z3w+phj//qXhlpX0/nxcMYir +tDgc2+dcPk7d+7KgrVpNe3wU9mrOurQt73MLH5nabN2Vw6NpPxy7Ktrkw9IV +tB+OkzcbZ5v2Smg/HBvvv+ZLE0S0H4474RunDdQV0H44/M0GGnq7hdB+OFLH +7A7sl+9L++GISE0zkIx3p/3Pjlz4qijEgfYFmL/jRs+HL6bTvgALagN4DStN +bfv2BXBTT74Yesauz3wBTpn2Tkk4+EOfNQKY1Mq6xHnefc4VgDuh1Ov0Ceyz +VgDrbtvxh9vD+twiwLahNgOO/iLoMyeE5U/hCx75ivrME8LG8Vhw+5tI2hei +Is5FdmyVjPaF2CHyXzy8U0H7Quj6VhwaHhBF+0KEvnpr4HY3mvaFeFdjN7y+ +dzntC1HqiI96o9W0H4HtNjPDP06Nof0IvI35pzxnTiztR+DJyBTV63lxtB+B +1aXtdR2zVtJ+BOKObhmTPWkV7UfgiMNkedvQ1bQfAb/ypPr2l+SWCByVq+bv +vhBP+yIYT/BN7N2eQPsi2M+54jYidA3ti7BhEefc+nUi7YuQwJveGneLrBFh +jE5VfO36tbQvwo3V6Qv/np5E+yIYjmua/+oKuUWEaU9nFz6epaF9MZTb9Qvt +V5F5Yly17239uZIMMVyK3AZ195D5YtRN+zTNY9462hfjgoXgRrmSnCuG697m +B3MOkLViWPlnb6+5QW4RQzbu7yNJ/5K5SESN8JkQZpJM+5F40B0vjHYiIxKP +V+mhSkLmR2LBkcH3XFPJmkgohpsXmuWQcyPxwtlrV3AJWRuJ0j/OX+o8T26J +xNiA1OquP8mcBLGftglkTWxfgq+WmTUIn7J9CQxr7mZ3tLF9Ca6dvqbQbWf7 +EnT0vxNXx16fK8Fv4q0jHZvZvgSWPYLO+Aa2L0FWyb5P8ZfYvhTDWhVxXqVs +X4oPXz+oMzrE9qWIO3nh4rnNbF+KsonXvFfGsH0pjG5bF9n4s30pDrt0OH9l +zfalcB9gdnXaaLYvxcnSDSNiu9jnL8OlP8rm6V4l82SwDeDHf8glQwbZw0Yv +zxgyXwbOdaTYZAn7/mWYE2ydlDSCff8yVBZs2aF+SOdFK4Nhp+kVw2PkFhny +Ww4GR0az8yfH2+svi9PmsvMnh8/A1rwvOum8Qo6hRpVldSvIfDnKBdt4WX/R +edfIsWJ1b7pSxs6/HA1FlvUpLfR8aOUoLijtfedJbpEjtDRh9vOz9HxxCkju +a6rXmJN5CtgONtdvYM8jFJhl9XuWUS89r3wFTJ+dbvYLIWsUsMvx3VJTRc93 +rgJd042Wpo9lz78CvAEDSsrVdD+0KGCUnrQm8SrdH5wSa46tc37PI/OUEGa7 +ljrH0H0DJYpfvPbZeYHuI74SByza83RGkTVKLH14ZkihgO6vXCViz5Xcqiyk ++02rBByllm4fVtC+ErN1js1PsydzKjh5mlzeuInuR54K4/yW7Iypp/sTKnzo +HTJHMZrMV6FD59YL43IV7augnLTrwyB7Je2rkFH+KeBajZz2VcjbnONb5E73 +d4sKdWbTi7tvS2g/Chvs63LvBdN9z4uCCW+bNucx/T9AFLzvvzRKkUTY/g8T +Hu3c + "]], + LineBox[{{0.666590101903677, 1.509844404540368*^-6}, { + 0.6674694434374214, -2.199097275332749*^-6}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxF1XdU02cfBfCfWxERHHW1GhApVakWB0PFKygyWmTvERKyB2ggKojEgYig +VnBXEUVR0QJCLSC0xi0OkIobEAeC1FEoapVaX8/J9zkv5+SPz7m5ueckz+/B +XBDrK+rFcVz351ePz6+e3P//GrUbeiQPlMw16K+5syxKwvv0DjpNMTJTIvIf +niz63cD+cHHz2DswhdkUp2sq1ySJmIehtMjl3s1g5pEYWHNt8mIf5i+R1T5W +dtaTmYcUW0fXr1yZLXBUfr7h1FxmSyhdMlc72TNbwSPurUPyFGZrnJiz3k04 +gXkiXlfWPGodxTwZ2bkQ9RvE/C36pb3+Wf9fIXkq5gnG1g19zfwdso+NX9+j +idkWHzNc2jdcZZ4G415NnifKmKfDcWX/KdoDzDOQIFs4+0EG80y015vOfaxh +tsPKLWaWG0OZ7fHgiPM/jXOZHXDBJrLt9nhmR5jnr0RiX+ZZuL/khuJK68/k +2aiocu+qvsQ8Bw6bhauT8pmdoDlc1/BoDfNcNN60a/sUxQz8GN2Qf9eRrANu +RgbZxw5j+Txc2et07+KL45TPw79Lah4/PkfmnPH1tM1XLu5iuTOMlr0z16pZ +7oK6GQO3d81juQuqj717tWAYy+djxOzjg9Utxyifj80z497EnSRzCzAjL6HM +dy3LFyBzlGzdCF+Wu2JEyX/Hzo1luSsax63YENZeQPlC2HDY8+QXsm4hzGNd +NfyVLHdD3euC8tuuLHdDatnXkz1NWO6OcEVW3tn6o5S7I5EfaOS8m8x5oEn9 +gl8TyXIPpEm8q5QWLPdEiVP8AouWI5R7QtFdbN+VT+a+R13yjJZWCcu/R4ON +5nhPa5b/gKyD63t4tB6m/Ad8iC6QnjtE5rzgfiBdGy9kuReMRRW1Ah7LF8G1 +wsx6a0M+5YtwKtrM2WQnmfPGjadzXt32JcMbBWNWG3UZs/d7w8k/Y5Xi4iGD +9d5YPnqCh0sKmfPBhqps8So7MnxQnPPyyaTXB6nvgz4azT23fLLeB09krZKm +cDLni32xT8o7h5Dhi9WZ3/6XcTmP+r54lmS2uDiZrPfFkc0FPmJbMueHv7vw +rPTZAer7oTx2R+K+3WSdH3gHnKKmeJH1fnB486xN1oPM+UNsXxIb8Mt+6vuj +0TjV6x8xWeePX22DHwePIuv90eN6enry1VzqB8Ct5Ns8ZTIZAXjXJNw0eQpZ +F4DxTvBLO7OP+p89wPhgnCWZC0RGivKCeVoO9QPxV+N86eHne6kfiAFv9DNN +vifrAzFmwsc/BIV7qB+EzItFt06YkhGEnd/UX+un+Yn6QagIDHJcfGs39YMw +vOJi1gc7MhcMxwZudvHuXdQPxilRW0bOx53UD4ZGM+pSHZ+sD4Z43f5xged3 +UD8E4yxOldpZk/HZbusyV2dup34Ivnv7xx7njm3UD8GKmvun1wSSuVCEDB5U +7lO1lfqhaOTu2pRbkHWhMP+oLTybnk39ULjbny9Y0ZFF/TAsUZpoO0LICIPj +xs75k89toX4Yvs53mGxvQ9aHIbVv5Tjezh+pH46qBueOV73ICMegCx9yIh9t +on44nidcT79TtZH64Vg7P0UVsTuT+hGYMdbkcu/EDOpHwPlyx+VHYRuoH4HT ++8Yv6o906kfAumNqa4bVeupHwsk8uDplcBr1I/HNw+I7bz+kUj8S4duj9vR6 +vpb6kfAJqF9Yfm8N9aOwIXx4kdX11dSPwtm04R78c6uoH4XcM1/Yaqt01I+C +efR36IxLoT4fJ7MP3+5UJxvM42PHi1WDTTRJ9Hl8iJ6GDRAmLzeYz8cE89++ +MN20lD6fjyuDtZW2hxIMzuXjxL0vClrPamiPj8Ju3RmP1sUGN/ORqc82Wjok +jvajsfNUq2JQupL2o1F0s2GaVbeU9qOx/v4rvixJRPvRuBO9fmJfIwHtRyPY +uq+pv1cE7UcjdeSu0B75gbQfjZjUtMHSMd60/9mSOS+LI1xoX4BZ2298eN97 +Eu0LMLsmhFe/1MrJsC+Al2b8xcjT8wzmC3DCqntC0oEfDNYJYFkj7xTn+Ruc +KwB3XGXcERBqsF4Ahy6nMYfaogxuFmDrQMc+R34WGMwJYbclevajQJHBPCEc +XY+Gt72W0L4Qp7Qe8qPL5LQvxHZR8PwhHUraF8Io8NTBISGxtC9E5Ms3g73u +xtG+EG+r5w2p615M+0KUueKj8QgN7cdgm+OU6I/fxNN+DN7E/1ORMz2B9mPw +ZNga9auZWtqPwfKyttr2qUtpPwbaI5tGZlsso/0YHHYZr2gduJz2YxBUkVLX +9oLcHIMjCvWsXRcSaV8E87GByd3bkmhfBOfpV7yGRq6gfRHWzeXcW75Kpn0R +kniTWrS3yDoRRvasSqxZu5L2RbixPH3O35NSaF8E09GNs15eITeLMPHptMLH +U3W0L4Zqm0mh8zIyT4yrzt0tP1WSIYZHsVe/rg9kvhi1Ez9N9Jm5ivbFuGAr +uFGhIueK4bmn6cH0/WS9GPbB2duqb5CbxZCP/vtwyr9kToLYoQFjoyxX074E +D7oShXFuZEjweJkxqqRkvgSzD/e/55lK1kmgHGJTaJ1DzpXgT3e/neGlZL0E +Zb+fv9RxntwswaiQ1LOdf5A5KRI+bRXIG9m+FF8usq4XPmX7UphW381ub2X7 +Ulw7eU1p1Mb2pWjvdUdby96fK8Wv4s3DXJvYvhR2HwQdifVsX4qs0r2fEi+x +fRkGtSi1fmVsX4b3Xz2oNTvI9mXQFl24eG4j25ehfNw1/6XxbF8Gs9sOxY7B +bF+GQx7t7l86sH0ZvPtYX504gu3LUFS2bmhCJ/v+5bj0e/lMo6tknhxOIfzE +97lkyCF/2ODnG0/my8F5DhNbLmC/vxzTwx1SUoay31+OyoJN2zUP6bzo5TDt +sLpiepTcLEd+84FwSRw7fwq8uf6iJG0GO38KBPRtyevdQecVCgw0qyyvXULm +K1Ah2MrL+ovOu06BJcu701Vydv4VqC+2q1vTTM+HXoGSgrLut77kZgUiy5Km +PT9DzxenhPS+7uwKGzJPCaf+Nib17HmEElPtf8sy66bnla+E1bOTTUERZJ0S +83ICN1VX0fOdq0TnJLOF6aPY868Er0+f0goN3Q/NSpilp6xIvkr3B6fCiqOr +3N/xyDwVhNmeZe7xdN9AhZI/XwXsuED3EV+F/bZteT2Hk3UqLHx4ekChgO6v +XBUSzpXeqiyk+02vAlxldl7vl9C+CtN6Hp2V5kzm1HDztby8fgPdjzw1Rgct +2BFfR/cn1HjfPWC6cgSZr0Z7z1t/mleoaV8NlcXO9/2cVbSvRkbFp5Br1Qra +VyNvY05gsTfd381q1FpPKum6LaX9WKxzrs29F073PS8Wlryt+pzH9P8AsfC/ +/8JsjTTG6X/8Bux8 + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 250.}, {-2.199097275332749*^-6, + 1.509844404540368*^-6}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"500"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + "}"}], ",", + RowBox[{"{", #, "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], "}"}]}], ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", "True", "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.8001575351661243`*^9, 3.800157844930668*^9, + 3.8001626197402563`*^9}, + CellLabel-> + "Out[180]=",ExpressionUUID->"09b932d0-8ecb-4518-ab9b-eb823d96f63c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Total energy corrections", "Subsubsection", + CellChangeTimes->{{3.800166330467697*^9, + 3.800166336764496*^9}},ExpressionUUID->"c6c546bc-5576-410f-9743-\ +59804a99096a"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], "/.", + + RowBox[{"\[Lambda]", "\[Rule]", "1."}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{ + 3.800074392994604*^9, {3.800074482271192*^9, 3.800074484025978*^9}, { + 3.800074572848796*^9, 3.8000746110650578`*^9}, {3.800074649794314*^9, + 3.8000746508449907`*^9}, 3.800166234636016*^9, {3.80016640330295*^9, + 3.80016641324934*^9}}, + CellLabel-> + "In[267]:=",ExpressionUUID->"69ee8234-1d63-42c1-bf74-c4bfb11a7643"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQjQpMHCD0B3sIrQLlMziEhQLBU2Uon8Ph3l0geAzj +CzgEF357eArOF3GoeTuTFcGXcAhXVv17Es6XcZDgeP0HwVdwWOCAzFdyqM1F +5qs4tBci89UcjqPwNRzOoPC10Pg6DqdR+HpofAM0viEa38jhFArfGI1vAlcP +AKclZr0= + "]]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQjQoEHCD0B3uogAOMDgsFgf9QcQ4Hg2l/kk7qw/gC +Dh7aF3MMNWB8EYcL7KdvXFCD8SUcLixX3jULzpdxaM6f+2oKnK/gIOtpxTgV +zldyiPjI5Ingqzi8iLuRhOCrOYieCsxE8DUcdgRPykLwtRzCy/Yi8XUcJnvs +Q+LrOVim7UHiGzh8mbUbiW/ocC0JmW/kwBOOzDd28AlF5ps4WEL5AG8MVOo= + + "]]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQjQYcINQHe1SaweEdBED5HA6L70yIvNAH4ws4HA4U +e7Q1H8YXcfCr/Ge5Pg3Gl3DIjsjeW54C48s47FN+7iAG5ys4/Et9MV8Czldy +0Lnwf5UKnK/icEjefZY2nK/mUGetlKQH52s4BJxPt9OH87UcRH2v5iL4Og6G +au75CL6eg0bJz0wE38Bh9t/UNATf0OHFwospCL6RA8cuTyS+scPHTE0kvomD +j586mA8A22ZW3A== + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQAcmDhD6gz2EVoHyGRzCQoHgqTKUz+Fw7y4Q +PIbxBRyCC789PAXnizjUvJ3JiuBLOIQrq/49CefLOEhwvP6D4Cs4LHBA5is5 +1OYi81Uc2guR+WoOx1H4Gg5nUPhaaHwdh9MofD00vgEa3xCNb+RwCoVvjMY3 +gasHALDhZr8= + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQAcCDhD6gz1UwAFGh4WCwH+oOIeDwbQ/SSf1 +YXwBBw/tizmGGjC+iMMF9tM3LqjB+BIOF5Yr75oF58s4NOfPfTUFzldwkPW0 +YpwK5ys5RHxk8kTwVRxexN1IQvDVHERPBWYi+BoOO4InZSH4Wg7hZXuR+DoO +kz32IfH1HCzT9iDxDRy+zNqNxDd0uJaEzDdy4AlH5hs7+IQi800cLKF8AHjI +VOw= + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiwAAOEOqDPSrN4PAOAqB8DofFdyZEXuiD8QUc +DgeKPdqaD+OLOPhV/rNcnwbjSzhkR2TvLU+B8WUc9ik/dxCD8xUc/qW+mC8B +5ys56Fz4v0oFzldxOCTvPksbzldzqLNWStKD8zUcAs6n2+nD+VoOor5XcxF8 +HQdDNfd8BF/PQaPkZyaCb+Aw+29qGoJv6PBi4cUUBN/IgWOXJxLf2OFjpiYS +38TBx08dzAcA5SJW3g== + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, PlotRange -> {{0, 20.}, {0, 20.}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.1`", "0.5`", "1"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800074607875884*^9, 3.800074622079007*^9}, + 3.800074654828618*^9, {3.800166407710341*^9, 3.800166418576078*^9}}, + CellLabel-> + "Out[267]=",ExpressionUUID->"4e82a56b-509f-4b7f-a295-4617e86524a0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1."}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"25", ",", "100", ",", "200"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"25", ",", "100", ",", "200"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800166276410769*^9, 3.8001663172086153`*^9}}, + CellLabel-> + "In[265]:=",ExpressionUUID->"8e5e3748-242c-4089-b15b-bf679b76b788"], + +Cell[BoxData["$Aborted"], "Output", + CellChangeTimes->{{3.80016628257409*^9, 3.8001663084766893`*^9}, + 3.800166397304242*^9}, + CellLabel-> + "Out[265]=",ExpressionUUID->"986928d9-4338-4727-bd90-a11f28de9bf9"] +}, Open ]] +}, Closed]] +}, Closed]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Singularity structure", "Section", + CellChangeTimes->{{3.8000116363098173`*^9, + 3.8000116429460573`*^9}},ExpressionUUID->"3cf320d3-6c13-4692-b242-\ +d4cad7fed598"], + +Cell[CellGroupData[{ + +Cell["\<\ +Can we give a physical signification to all the singularities ?\ +\>", "Subsection", + CellChangeTimes->{{3.8001634725245132`*^9, + 3.800163498432653*^9}},ExpressionUUID->"c40bb50c-519d-4650-b7f0-\ +37c61810c51e"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsubsection", + CellChangeTimes->{{3.800158223312038*^9, + 3.800158224232153*^9}},ExpressionUUID->"bc4855cb-d055-4c5b-a5e0-\ +792e82ed43f9"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"rH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "1"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], + "]"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}], "\[IndentingNewLine]"}], "Input", + CellChangeTimes->{ + 3.800075353492262*^9, {3.800075384742434*^9, 3.8000753928634853`*^9}, { + 3.800075477990193*^9, 3.800075488034968*^9}, {3.80007553412252*^9, + 3.80007557313133*^9}, 3.800075630282379*^9, {3.8000785359721327`*^9, + 3.800078550363659*^9}, {3.800079878860845*^9, 3.800079879068116*^9}, { + 3.800079913573428*^9, 3.800079932229224*^9}, 3.800080497085393*^9, { + 3.800080577175806*^9, 3.800080592742565*^9}, {3.8001120586218023`*^9, + 3.80011205888498*^9}, {3.80011214840434*^9, 3.800112172686603*^9}, + 3.800157110714922*^9, 3.800157352192288*^9, {3.800159556196183*^9, + 3.800159556698868*^9}, {3.801211548346614*^9, 3.8012115629489822`*^9}}, + CellLabel-> + "In[133]:=",ExpressionUUID->"8cde43e0-6c22-45c1-be31-fa4bfe9e9cfb"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "3.6666666666666666666666666666672735580425025327020576321609`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "3.6666666666666666666666666666672735580425025327020576321609`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "6.07244314268073333745086282941333863881`29.397940008672037"}]}], + ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "4.86955490467370000205876474804000265274`29.397940008672037"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "6.07244314268073333745086282941333863881`29.397940008672037"}]}], + ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "4.86955490467370000205876474804000265274`29.397940008672037"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.3333333333333333333333333333586396180369348585318655950544`28.\ +724743740256045", "-", + RowBox[{ + "1.23091490979332732734240660121611941447`28.78879912190311", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "2.49999999999999999999999999996231262111`28.784762272906125", "+", + RowBox[{ + "0.9231861823449954955068049509030809393971028716466513913391`28.\ +74260353277322", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.3333333333333333333333333333586396180369348585318655950544`28.\ +724743740256045", "-", + RowBox[{ + "1.23091490979332732734240660121611941447`28.78879912190311", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "2.49999999999999999999999999996231262111`28.784762272906125", "+", + RowBox[{ + "0.9231861823449954955068049509030809393971028716466513913391`28.\ +74260353277322", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.3333333333333333333333333333586396180369348585318655950544`28.\ +724743740256045", "+", + RowBox[{ + "1.23091490979332732734240660121611941447`28.78879912190311", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "2.49999999999999999999999999996231262111`28.784762272906125", "-", + RowBox[{ + "0.9231861823449954955068049509030809393971028716466513913391`28.\ +74260353277322", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.3333333333333333333333333333586396180369348585318655950544`28.\ +724743740256045", "+", + RowBox[{ + "1.23091490979332732734240660121611941447`28.78879912190311", " ", + "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "2.49999999999999999999999999996231262111`28.784762272906125", "-", + RowBox[{ + "0.9231861823449954955068049509030809393971028716466513913391`28.\ +74260353277322", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.2591435637120916308733567616817308431227456424704728655104`28.\ +787731338591815", "-", + RowBox[{ + "1.9360926721332812703371079005598996892797699710136339527829`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "2.147598594299101913315111284654129758427713101810106588795`29.\ +397940008672037", "+", + RowBox[{ + "1.2202264740335806325654041390084030578956571747704533592833`29.\ +218913175720193", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.2591435637120916308733567616817308431227456424704728655104`28.\ +787731338591815", "+", + RowBox[{ + "1.9360926721332812703371079005598996892797699710136339527829`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "2.147598594299101913315111284654129758427713101810106588795`29.\ +397940008672037", "-", + RowBox[{ + "1.2202264740335806325654041390084030578956571747704533592833`29.\ +218913175720193", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.3442235239859333292158038372542061055119348680239298661616`28.\ +795880017344075"}]}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "2.00544509532629999794123525196058947771`28.79588001734407"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.3442235239859333292158038372542061055119348680239298661616`28.\ +795880017344075"}]}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "2.00544509532629999794123525196058947771`28.79588001734407"}]}], + "}"}]}], "}"}]], "Output", + CellChangeTimes->{ + 3.800157111485978*^9, 3.800159557622061*^9, {3.8012115573209352`*^9, + 3.801211563576037*^9}}, + CellLabel-> + "Out[135]=",ExpressionUUID->"a500d884-be05-426a-92ad-6b010dd051f9"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{0., 0.}}, {{0., + 0.}}, {{4.8695549046737, 0.}}, {{4.8695549046737, 0.}}, {{2.5, + 0.9231861823449955}}, {{2.5, 0.9231861823449955}}, {{ + 2.5, -0.9231861823449955}}, {{2.5, -0.9231861823449955}}, {{ + 2.147598594299102, 1.2202264740335806`}}, {{ + 2.147598594299102, -1.2202264740335806`}}, {{2.0054450953263, 0.}}, {{ + 2.0054450953263, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.8000799242414637`*^9, 3.800079932735375*^9}, + 3.800080497627037*^9, {3.800080578049032*^9, 3.800080593176303*^9}, + 3.8001120600105143`*^9, {3.800112149697216*^9, 3.800112173030253*^9}, + 3.800157112282282*^9, 3.8001595578133802`*^9, {3.801211558982279*^9, + 3.801211564228888*^9}}, + CellLabel-> + "During evaluation of \ +In[133]:=",ExpressionUUID->"3f0cc588-78b3-4d5c-8d6c-8105081254f5"] +}, Open ]], + +Cell["\<\ +There are 12 singularities as expected, but we can\[CloseCurlyQuote]t give \ +them a physical signification for the moment. Let\[CloseCurlyQuote]s try to \ +do this for this simple case\ +\>", "Text", + CellChangeTimes->{{3.8001585199504757`*^9, + 3.800158580192855*^9}},ExpressionUUID->"b6c5864e-998f-4f55-a2b5-\ +3bcaed605691"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158278610743*^9, 3.800158290872142*^9}, + 3.800158341741818*^9, {3.800158433517392*^9, 3.8001584377174377`*^9}}, + CellLabel->"In[57]:=",ExpressionUUID->"26ff945b-30aa-447b-a7da-681164976c41"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.5033190160093715`", "\[VeryThinSpace]", "-", + RowBox[{"0.8541585318235065`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.5033190160093715`", "\[VeryThinSpace]", "+", + RowBox[{"0.8541585318235065`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.8001582338106213`*^9, 3.8001582919267*^9, + 3.8001583424528513`*^9, 3.800158439888423*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"83e94ffa-c2ad-4d89-b8d2-cc901505493b"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "021368e2-e268-4042-93b7-8bbbcb5001ee"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]],ExpressionUUID-> + "20c579e6-5452-473e-bb17-374d4565f130"] +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, + 3.800158635398328*^9}},ExpressionUUID->"22f026d8-1f14-4085-b8a9-\ +1103ac77f479"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8001584637379913`*^9, 3.800158464134795*^9}}, + CellLabel->"In[59]:=",ExpressionUUID->"78c83c8e-3dec-4b9a-9c7c-9e35dd60a379"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "3.4086884332715903`"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "1.40381156672841`"}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.8001584644905357`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"58320fa1-bce5-4901-93f8-d49d6c245680"] +}, Open ]], + +Cell[TextData[{ + "There are 2 CI between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "aea12598-6d20-4092-b9cd-57742c3fbbe8"], + "and the ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "bbf48207-b04c-4651-96f6-eca2657a860d"], + " triplet (x2 degen)" +}], "Text", + CellChangeTimes->{{3.800158662872758*^9, 3.800158703136058*^9}, { + 3.800158955325688*^9, 3.8001589561925917`*^9}, {3.800159692397304*^9, + 3.800159701502852*^9}, + 3.8001597753064337`*^9},ExpressionUUID->"fdd982d9-401c-4207-8eec-\ +b15a5550f82b"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158369960648*^9, 3.800158370393867*^9}, { + 3.800158408929471*^9, 3.800158409337016*^9}, {3.800158446099082*^9, + 3.80015845077838*^9}, {3.8012114754822483`*^9, 3.801211475852717*^9}}, + CellLabel-> + "In[127]:=",ExpressionUUID->"4dc967ab-5ddd-4a4a-8dbf-19317ee21c74"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800158371081614*^9, 3.800158409644907*^9, + 3.8001584513624277`*^9, 3.801211478913052*^9}, + CellLabel-> + "Out[127]=",ExpressionUUID->"2f717f13-fdf2-4e9f-ace7-b5cabc606e87"] +}, Open ]], + +Cell[TextData[{ + "The ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "9e866fd9-8787-4b45-a911-f5db1c085c10"], + " singlet is never degenerate with the ground state" +}], "Text", + CellChangeTimes->{{3.80015883203883*^9, 3.800158852480497*^9}, { + 3.800158963935526*^9, 3.800158964785277*^9}, {3.8001597693529873`*^9, + 3.800159771491109*^9}},ExpressionUUID->"625ce02e-78f9-4a40-a1e8-\ +3b4ec0b96e06"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.80015887242031*^9, 3.8001588727346163`*^9}}, + CellLabel->"In[60]:=",ExpressionUUID->"a14a0eaa-ac66-448a-b70b-0d2b2cc0e34c"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.75`", "\[VeryThinSpace]", "-", + RowBox[{"0.6462303276414967`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.75`", "\[VeryThinSpace]", "+", + RowBox[{"0.6462303276414967`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.800158873572803*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"373adab4-8b54-4869-89cf-c956d96b6e56"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]],ExpressionUUID-> + "2553c833-57cb-4e03-92a9-b71efbe31cd4"], + " and ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]],ExpressionUUID-> + "6c510e88-1226-4893-87bd-cb66a10c080a"], + " singlet (x2 degen)" +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, 3.800158635398328*^9}, { + 3.800159734007469*^9, 3.8001597393953323`*^9}, {3.800159781544524*^9, + 3.800159796125751*^9}, {3.8012115008133373`*^9, + 3.80121151150954*^9}},ExpressionUUID->"84597ffa-eafe-4f3c-9d4e-\ +7c888242eaa3"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158879878248*^9, 3.80015888237202*^9}}, + CellLabel->"In[61]:=",ExpressionUUID->"ecda13b7-567a-4553-abc4-f7b0df23882e"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800158882705681*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"732bc038-a50a-4fde-9440-76810f331904"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158986206258*^9, 3.800158995955509*^9}}, + CellLabel->"In[63]:=",ExpressionUUID->"a6d1004b-a7be-4819-87a2-62ffbe643df9"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "0.`"}], "}"}], "}"}]], "Output", + CellChangeTimes->{{3.800158989306931*^9, 3.8001589970199614`*^9}}, + CellLabel->"Out[63]=",ExpressionUUID->"9fb6b259-f8db-4801-86a5-1df5bf0977b1"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsubsection", + CellChangeTimes->{{3.800160005317541*^9, + 3.800160006948435*^9}},ExpressionUUID->"e8cefca3-48aa-4fe8-a42f-\ +a07a6d0d53ff"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "/.", + RowBox[{"R", "\[Rule]", "2"}]}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800157386799263*^9, 3.800157392222747*^9}, { + 3.800157471442925*^9, 3.800157480658167*^9}, {3.800159847972131*^9, + 3.800159857930311*^9}, {3.800159912370352*^9, 3.80015993354918*^9}, + 3.800160687275172*^9, {3.800160790277131*^9, 3.800160826481682*^9}, { + 3.8001626669660482`*^9, 3.800162679309074*^9}}, + CellLabel-> + "In[187]:=",ExpressionUUID->"86296c81-aa67-48e3-9459-a607c4dcb5fe"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"0", ",", "0", ",", + RowBox[{ + "0.6254114456184364355104366115940271936123253589211850368253`29.\ +29626262376412", "-", + RowBox[{ + "0.7227612308264697478366572157282773984850119545490837146743`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.6254114456184364355104366115940271936123253589211850368253`29.\ +29626262376412", "+", + RowBox[{ + "0.7227612308264697478366572157282773984850119545490837146743`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.0655678648783681952455499596090965480045810739079991800999`29.\ +397940008672037", "-", + RowBox[{ + "0.1414990387982489895023924064789054248077506698461980555895`28.\ +793316676554895", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.0655678648783681952455499596090965480045810739079991800999`29.\ +397940008672037", "+", + RowBox[{ + "0.1414990387982489895023924064789054248077506698461980555895`28.\ +793316676554895", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.27871148459383753501400560351706757106`28.78994900531733", "-", + RowBox[{ + "0.7872730783864882787741267924232730982697470982081209140303`28.\ +76790855015536", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.27871148459383753501400560351706757106`28.78994900531733", "-", + RowBox[{ + "0.7872730783864882787741267924232730982697470982081209140303`28.\ +76790855015536", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.27871148459383753501400560351706757106`28.78994900531733", "+", + RowBox[{ + "0.7872730783864882787741267924232730982697470982081209140303`28.\ +76790855015536", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.27871148459383753501400560351706757106`28.78994900531733", "+", + RowBox[{ + "0.7872730783864882787741267924232730982697470982081209140303`28.\ +76790855015536", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.398524068502727535849444223113998711579970804060092814152`29.\ +397940008672037", "-", + RowBox[{ + "0.7534704100368671715191860514409521719678895624593290832018`29.\ +33609079569882", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.398524068502727535849444223113998711579970804060092814152`29.\ +397940008672037", "+", + RowBox[{ + "0.7534704100368671715191860514409521719678895624593290832018`29.\ +33609079569882", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output", + CellChangeTimes->{{3.8001608065981483`*^9, 3.800160827149747*^9}, { + 3.800162670475374*^9, 3.800162679855598*^9}}, + CellLabel-> + "Out[191]=",ExpressionUUID->"bed7d171-990f-4d4e-800a-ab6c67336ddf"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 0.6254114456184364, 0.7227612308264697}}, {{ + 0.6254114456184364, -0.7227612308264697}}, {{0., 0.}}, {{0., 0.}}, {{ + 2.2787114845938374`, 0.7872730783864883}}, {{2.2787114845938374`, + 0.7872730783864883}}, {{2.2787114845938374`, -0.7872730783864883}}, {{ + 2.2787114845938374`, -0.7872730783864883}}, {{ + 2.3985240685027276`, -0.7534704100368672}}, {{2.3985240685027276`, + 0.7534704100368672}}, {{1.0655678648783682`, 0.141499038798249}}, {{ + 1.0655678648783682`, -0.141499038798249}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.800157393308854*^9, {3.800157472990631*^9, 3.800157481345057*^9}, + 3.800159861088769*^9, {3.8001599139430513`*^9, 3.800159934501748*^9}, + 3.800160688193177*^9, {3.800160803367661*^9, 3.800160827460278*^9}, { + 3.800162670675768*^9, 3.8001626800603456`*^9}}, + CellLabel-> + "During evaluation of \ +In[187]:=",ExpressionUUID->"0677df06-4be7-4bd3-80e0-e0306a28d5e2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158278610743*^9, 3.800158290872142*^9}, + 3.800158341741818*^9, {3.800158433517392*^9, 3.8001584377174377`*^9}, { + 3.800160208824222*^9, 3.8001602117761087`*^9}, {3.8001602500627193`*^9, + 3.800160250493102*^9}, {3.800160302859713*^9, 3.80016030318882*^9}}, + CellLabel->"In[90]:=",ExpressionUUID->"fa626888-9aa9-4ce4-a267-7560eb5953f5"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"2.2787114845938374`", "\[VeryThinSpace]", "-", + RowBox[{"0.7872730783864883`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"2.2787114845938374`", "\[VeryThinSpace]", "+", + RowBox[{"0.7872730783864883`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.8001582338106213`*^9, 3.8001582919267*^9, + 3.8001583424528513`*^9, 3.800158439888423*^9, 3.800160212646006*^9, + 3.800160252346768*^9, 3.800160304106626*^9}, + CellLabel->"Out[90]=",ExpressionUUID->"c1f4f9e8-4ed4-458a-afd7-21b721d6a2d6"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "d71c142c-77e3-4867-bd51-aa607d86edf1"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "2db03bf9-aefb-40c2-8b27-a290fb01d132"] +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, + 3.800158635398328*^9}},ExpressionUUID->"46b6972c-5f54-4408-a21a-\ +716067159692"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160349800825*^9, 3.800160355551343*^9}}, + CellLabel->"In[91]:=",ExpressionUUID->"7ac6dc4b-1be2-4222-ba5c-5417e4b23a35"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800160355933103*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"8f315252-fbc8-4570-9ccf-adf1bc0395f9"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160362984331*^9, 3.800160363411745*^9}}, + CellLabel->"In[92]:=",ExpressionUUID->"ed30fc9b-d583-4306-b0c4-1c9db9bb097a"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "0.`"}], "}"}], "}"}]], "Output", + CellChangeTimes->{3.800160363880258*^9}, + CellLabel->"Out[92]=",ExpressionUUID->"5d3a5b06-fa07-4994-866d-f2521b346836"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160405795185*^9, 3.8001604064545193`*^9}}, + CellLabel->"In[93]:=",ExpressionUUID->"b6aab6e2-ecab-4643-bd19-e1c96b86c0f0"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "infsolns", + "\"Infinite solution set has dimension at least \ +\\!\\(\\*RowBox[{\\\"1\\\"}]\\). Returning intersection of solutions with \\!\ +\\(\\*RowBox[{\\\"-\\\", FractionBox[RowBox[{\\\"142291\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"110500\\\"]}]\\) == 1.\"", 2, 93, 3, + 22556906998464431640, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8001604074336033`*^9}, + CellLabel-> + "During evaluation of \ +In[93]:=",ExpressionUUID->"89cf3103-e73d-48df-86db-ec7b26a06bb5"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800160407568763*^9}, + CellLabel->"Out[93]=",ExpressionUUID->"a0260599-8186-4a58-87ab-1debb7498190"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160415162305*^9, 3.8001604193690567`*^9}}, + CellLabel->"In[94]:=",ExpressionUUID->"c04c95d3-3228-4354-89b7-6c0a9bdc3525"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "infsolns", + "\"Infinite solution set has dimension at least \ +\\!\\(\\*RowBox[{\\\"1\\\"}]\\). Returning intersection of solutions with \\!\ +\\(\\*RowBox[{\\\"-\\\", FractionBox[RowBox[{\\\"142291\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"110500\\\"]}]\\) == 1.\"", 2, 94, 4, + 22556906998464431640, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8001604197705917`*^9}, + CellLabel-> + "During evaluation of \ +In[94]:=",ExpressionUUID->"2843fbbd-4d9f-4276-aa7a-fa585db89e52"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800160419931347*^9}, + CellLabel->"Out[94]=",ExpressionUUID->"b38c806d-706b-4d67-a8fc-8f46b49edac0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160439337159*^9, 3.800160442524119*^9}}, + CellLabel->"In[95]:=",ExpressionUUID->"182aad29-97d7-4575-8885-0a013b62cd47"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "infsolns", + "\"Infinite solution set has dimension at least \ +\\!\\(\\*RowBox[{\\\"1\\\"}]\\). Returning intersection of solutions with \\!\ +\\(\\*RowBox[{\\\"-\\\", FractionBox[RowBox[{\\\"142291\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"110500\\\"]}]\\) == 1.\"", 2, 95, 5, + 22556906998464431640, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.800160443083353*^9}, + CellLabel-> + "During evaluation of \ +In[95]:=",ExpressionUUID->"1f6e816a-7efe-44e3-ada9-cce2c848449d"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800160443296672*^9}, + CellLabel->"Out[95]=",ExpressionUUID->"5330f810-cf31-475c-a470-af6ad3fbb687"] +}, Open ]] +}, Closed]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["R dependance", "Subsection", + CellChangeTimes->{{3.8001613415022917`*^9, + 3.800161349374938*^9}},ExpressionUUID->"28754d59-75ad-4a9b-b825-\ +ac7c07b5aaf1"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsubsection", + CellChangeTimes->{{3.800163516163398*^9, + 3.80016351658918*^9}},ExpressionUUID->"9e25552a-74a8-4b5d-9071-\ +0790e0d767dd"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"rH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "1"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800161815075704*^9, 3.800161815832903*^9}, { + 3.800952639638629*^9, 3.800952645236867*^9}}, + CellLabel-> + "In[226]:=",ExpressionUUID->"8f6f46ef-b8d9-47f5-be7d-ce0b91081075"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{0., 0.}}, {{0., + 0.}}, {{4.8695549046737, 0.}}, {{4.8695549046737, 0.}}, {{2.5, + 0.9231861823449955}}, {{2.5, 0.9231861823449955}}, {{ + 2.5, -0.9231861823449955}}, {{2.5, -0.9231861823449955}}, {{ + 2.147598594299102, 1.2202264740335806`}}, {{ + 2.147598594299102, -1.2202264740335806`}}, {{2.0054450953263, 0.}}, {{ + 2.0054450953263, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.8001618162432337`*^9, 3.800952645821436*^9}, + CellLabel-> + "During evaluation of \ +In[226]:=",ExpressionUUID->"a1b609a5-51a7-4130-bf01-714db2e18059"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"rH\[Lambda]", "/.", + RowBox[{"R", "\[Rule]", "10"}]}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.8001618044907093`*^9, 3.800161804813216*^9}}, + CellLabel-> + "In[164]:=",ExpressionUUID->"85d2d939-bb10-4182-addf-ccf25f02abf0"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.239995256149902, 0.}}, {{2.239995256149902, 0.}}, {{ + 1.15, -0.42466564387869793`}}, {{1.15, -0.42466564387869793`}}, {{1.15, + 0.42466564387869793`}}, {{1.15, 0.42466564387869793`}}, {{ + 0.9878953533775868, -0.5613041780554471}}, {{0.9878953533775868, + 0.5613041780554471}}, {{0.922504743850098, 0.}}, {{0.922504743850098, + 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.800161805770297*^9}, + CellLabel-> + "During evaluation of \ +In[164]:=",ExpressionUUID->"835ee8f3-caeb-46b0-92de-39e21e53b73d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"rH\[Lambda]", "/.", + RowBox[{"R", "\[Rule]", "20"}]}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800161363324047*^9, 3.800161416810665*^9}, + 3.800161788273787*^9}, + CellLabel-> + "In[159]:=",ExpressionUUID->"704445d2-c8f7-4e6e-83e5-ccd083bb0be7"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.093908609009691, 0.}}, {{2.093908609009691, 0.}}, {{ + 1.075, -0.39697005840834804`}}, {{1.075, -0.39697005840834804`}}, {{ + 1.075, 0.39697005840834804`}}, {{1.075, 0.39697005840834804`}}, {{ + 0.9234673955486138, -0.5246973838344396}}, {{0.9234673955486138, + 0.5246973838344396}}, {{0.862341390990309, 0.}}, {{0.862341390990309, + 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.800161364196641*^9, 3.80016141741825*^9}, + 3.800161792020108*^9}, + CellLabel-> + "During evaluation of \ +In[159]:=",ExpressionUUID->"24bb5ac5-97cd-4066-b62a-0868f66da1e8"] +}, Open ]], + +Cell[TextData[{ + "We see that this is the EP between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "0fbbc381-1126-4bd9-9d38-7531fc7ddfb6"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "41f3a10b-0556-4a41-b8c8-4c8f31e1fedb"], + " that control the convergence" +}], "Text", + CellChangeTimes->{{3.8001618328734407`*^9, + 3.800161873937265*^9}},ExpressionUUID->"03e9208e-7955-4063-b8cd-\ +08c799624961"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Solve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]], "Input", + CellChangeTimes->{{3.800161479443656*^9, 3.800161509105171*^9}}, + CellLabel-> + "In[153]:=",ExpressionUUID->"cb729408-fa91-45df-acdb-30bdd1a725e8"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"88", "+", + FractionBox["132", "R"], "-", + FractionBox[ + RowBox[{"25", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "-", + RowBox[{"12", " ", "R"}], "-", + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]}]]}], "R"]}], ")"}]}], "2561"]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"88", "+", + FractionBox["132", "R"], "+", + FractionBox[ + RowBox[{"25", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "-", + RowBox[{"12", " ", "R"}], "-", + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]}]]}], "R"]}], ")"}]}], "2561"]}], + "}"}]}], "}"}]], "Output", + CellChangeTimes->{{3.80016147340481*^9, 3.8001614904991503`*^9}, + 3.800161598810849*^9}, + CellLabel-> + "Out[153]=",ExpressionUUID->"75542468-48ec-4ff8-a22f-6c34054f28fb"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"Abs", "[", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"88", "+", + FractionBox["132", "R"], "+", + FractionBox[ + RowBox[{"25", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "-", + RowBox[{"12", " ", "R"}], "-", + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]}]]}], "R"]}], ")"}]}], "2561"], + "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "1", ",", "2000"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{"0.96", ",", "1.06"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}]}], + "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "1", ",", "2000"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Dotted", ",", "Black"}], "}"}]}]}], "]"}], ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800161877836241*^9, 3.800161888048267*^9}, + 3.804236159219055*^9, {3.804236291600008*^9, 3.804236406795368*^9}, { + 3.804236453309339*^9, 3.804236491459683*^9}, {3.804236543451199*^9, + 3.804236550886325*^9}, {3.8042365851649513`*^9, 3.804236592799252*^9}, { + 3.804237208124061*^9, 3.8042372173770733`*^9}, {3.80424832160937*^9, + 3.804248371625347*^9}, {3.804248420095901*^9, 3.804248491709464*^9}, { + 3.804249140066662*^9, 3.804249148168638*^9}, {3.804249302542447*^9, + 3.804249315907031*^9}}, + CellLabel-> + "In[103]:=",ExpressionUUID->"9a5ccd83-eb3c-4c36-b3af-ee05e38ca73c"], + +Cell[BoxData[ + GraphicsBox[{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwVzH9Q03Ucx/HlERsymQwYm/P78cg6oLFRNn914PvNKfiDHxpowyRjHqgB +tTt2yo/sJOKHEsQkx0hRg8UGLZuVoS3uYF3zF2qmXV7oDINjKeLnC85xB9zl +xz9e97zHP6+YXYbswnkCgUDL9rxfvLshv2K1CANxec2/PuXhDnolUX+KcPqr +YnvxPzw4ypLLQDkfJTfGsl47x4Ox+q+U/Rmh6DkudAktPAxHzR7Lt4hxMJYc +S6jgIfXjXJ3u6gIMtOYYtunZn//sUNJsGBLjZIM2k4fGyqzAw5iFOHF0VHfg +TR5so/fOJP+yEG+u7EutV/EgjfhpWZE+HFWTwy91czxYLs+Xfx4kxU9ab16W +SHmQP5zTnG+XovFk16ErIh7Gr2sX9KVEoLP6oFst4MHFhXAX7kSgeKS26csp +Cp3+PNPF0kjM2vxoaGaMgrc5cKVTFoWaKnXTq3cpRJgTVtY4o1CxukxWd4tC ++87uItgmw2Rr4F7VIIWYloHfBbwMB1qqWxUeCv2ZuW0/10ej3FPl/b6fgvPa +8riMBDka71fWOVwUjp9zPhj1yDHUutFr76UwVGgo1ZUoUFhj09AfKCxr/26n +W7IIpbq1IbecFGqTGg683r0IEw1vtL19moKqw6H/KFOJdz972iJ0ULhmeL98 +0KdEXkksiT0UDl2wTUkPLsb4tKshHXYK5vvxWu1SDs/kFmzS2Cic3L3RvqOP +wy2+RGFwF4Wcd/bWCPs5PJGev+YFZlFWvf5HN4dzFnf53NcUSpd7lKEXORzf +HTY9xZwWlGJy/cFh+CmzYpj5cceqCoWPw84ltX4XM3hj02+HEwx7ue5JKbP/ +Rlrcp5EE1SPXGz9k/ua3whcTowmu54TxRcyR31r76xYTHNesKdIz/1e5RLsi +lqB4g0myhdkkj+bMSQQfN0eOqplTxStmEAi2/VviiGee+X/r7UcpBE9Pm/e9 +wlzgazmybj1Boy9byjGv6g0L9r9F0G9Z+4GYeaJHPXJqK8Eu58QmEXPniYyB +dB1Br227KohZXNtQac0jOPm3wT9rpeAu79Ftfo/gWLHMO828v+SSdlZPsPFw +2aUnzKp8X7i9gOA8/ZFeyjycE0yz9xA0xeyyjzM/Ax/bh0E= + "]]}, + Annotation[#, "Charting`Private`Tag$216562#1"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], Dashing[{0, Small}], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQPXeL1e+nF1vsGMDgg/1/3leGNyQ228P43utOP7km +cRjOn3N4xqaiZ5fh/PP+k3juTrgL5x/Xczof1/oYzreJyAySXfkCzu+/WJzE +W/oWzt9tFnbtafBHOF9oaUGn0sPPcH7k7j9MFU7f4PxXj+bPNLn+A87P2rTl +G6fDbzjfd9Hxh3vm/IXz9138UZItxuAA4/ssc7vT4sEI59czK1wKnMIE5z8p ++NHHe4sZznfcxLn+KicrnO9csyw2MJgNzreRqsm/2cYO5992uMsveoUDzl9d +bltuL80F5xc3XXMs8+GG8x+I/p6VMJ0HznetjQgPP8OLMO/Llls2v/ng/J4q +v2+vFAXg/GVP7m2w3Y3gCwlvNcpKFITzp5/kkuhjEYLzJV790dsxB8F/fc6E +d4+jMJy/S5ZT9thtBH/Rl5gJx4tE4Py7/d9OLRIThfOFp+qYt6xH8OfErciy +DxWD8xUnHTjP8AHB3+8bMWNnuzicv/6sqYaPjgScP3v7+pdPjiL4t1Lzi8Jz +JOF8oznr4g7yS8H5rTZdNYYrEHzthasTq32l4fyz+ZkVp58j+B3Hln0SqpeB +86c+1DQxUZaF8+eleS6P3oPg299V974uKAfnPwhmex+UjuADAN7M+kA= + "]]}, + Annotation[#, "Charting`Private`Tag$216610#1"]& ]}, {}}}, + AspectRatio->1, + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0., 0.96}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.0419639110365086], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI1IAaxQYAJSjNCxZjR2DA5dDXI4rjYpKrHpZcY95DK +ppabKTGTVHfiEgcA+NYCcw== + "], CompressedData[" +1:eJxllG1IU2EUx6dOU9uc3W3XzW3urjm3u4WZikFvHgmzDFLMDysss5qjQCUy +SDMKX5KakZjkC2L5QksqtA+SC7Uiqg9qFIKEfVDSsIVipsggbe25z/UZ1IGH +8Xvuztv/nHt1p0tybEECgSDAdw77TqDvfBZ/oW0pwSAMu6U9U2yGUWR14bBz +z1DOvQIzrAwv9dsnRNAXX9wVkGeGl47hyuQZMTTVS8pTLH5urK05Pj7IEm7r +1LvW7Cx0TzpndlSJIcHcI/3YbQLTr1h3a5gY+gyzVe0LRlA/o+8HTgeDEd2z +KmhBdkwI0+n5aa2faBClRWQ2s0J876L55wIc5yYNKs7fkyoraygdO0vDzBH3 +qXWtJ5V58WDYFiGHC87Svj8SAczfKHIkquR8f0JITkImh32laVdH8kIIFyJ7 +GEqY+1mOhI14d6yOrIAEinAts8kwmkvBRn6rwar+sCYh9XH1nxND7sL4UnMH +zecXwWukU1AUYU7nVT9LuXgKsHH1iHAd4wq4jfL/FMEr5N+lxHmrKehFehaZ +CDcjncpMOM8bCuR1mT+EKya+HwpSuPmycGXKM5m0WQrZk6qKggYW542Vknly +fRyS4rpEZihH/38sA3X7SXYkwQxPqW0R9nY5zJ23rDbtNYPr6C6rd44mrOV0 +UhFe9/osVQPfCjomkrNYwvMX++W/HUbC3P5kGHC8WiXO36bHc7krI8ztQxlF +eGMeeE/0kPHkrVMwwOtYqOHnGg15aE5qFdjR9TsNmedQScVCyyWGzF9yInsq +0elnLq7bz6hc76KfB5F/ug7vUZwcz8GlI/EXO3uZsdCt//EBVKeVxvrLdFCD ++mik+feA4feDhp5V9+VRhsF9eRR4r69Ewf76KqowXM/veTREoroz9LjPChU8 +Qn71vH5JGphF+m+P5eNoeTbgegYYiHF+Pxh/LY4w57dsJMz17WX5vY+BanFW +b6PBgvVRKuE5VH59r7Dw+7YF6xxiwfXt9jMXJj+SsADZ9WDi/+/36S/Q2/hm + + "]], + + FilledCurveBox[{{{0, 2, 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}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJlIGYC4oz8D60nRfQd7Esca0/f4XOYOoG/yuy1noP/ +E89LppP5HdaqPmmed1bXwcQYCDbzOLBwdskn9+k4MICAA7fD8V07etkMtOH8 +V8VbRX+vVofzjUD6glUd+iO6/RkDhOD8qvs/bhlnS8L5/LEB943YFRzMbPYG +TUtUd3Ce0CyUZqXksEUvbzFjjRac/x8E7HXg/IBb0jWJQnoOD1zjHWc1KsL5 +5Ye3uc48qwDnH+je12TCLO9gCjJ/IYKfmgYEy/Qc3NccXc6QoeCw1aHp0fEd +eg5rhXT40vkUHWbMBIKfeg7hnGLtxvZKDhLz4jRPF+hC3LEf6h55HQfla4+C +Gf4oOTxJXHjN5LwWnP88S/vbdFtNOP/UYae1mfvUHapB/p+t5FD726rgXIca +xP/PFR1qPm0IyK5Scei28dyVtknBYW9+zduZqcoOb9pyu41my8L5UaoRMuf2 +SMD590H+/yjgILf8hYeevZqDHSg+Y9jh4Qfjn78a9kb/tzac73OC3XZ2qK5D +GjgcOBxEe7xesUzRg8cfevoAAEy/3FA= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIAaxQYAJSjNCxZjR2DA5BjQ2LjXUEifGXlLdSS31 +AJgXAjc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJjIGYC4uKtor9Pxxk5GIOAspIDjF9+eJvrzLVKDtLz +4jRPJxg6/AeB+Zj8DXp5ixl1EPzrQp8cz38zwMn/8630wZyP+nDzYXyY/RtB +5vkYOOzNr3k7U1TJIVrB8WNyjYGD8rVHwQw8Sg6L7+/jmzPZwKHbxnNX2iNF +h78g/RsNHNzXHF3OEKHosAQkn2zkkJ4GBGxCDtMn8FeZrTZy8H/iecl0Mh/E +PceMHM6eAQIeHgf1t7z7DF4aOYCUp6lxOICEz8QYw/n1v60KznUYO8hsFJvP +tIDH4UCtrEX6EmOIf/7zORSu6b6d8cHY4WD3viaTZCGHFS889P43mjp8WLRe +4ewJBYdGlqP9httNIe49pOggAwq/C6YQ93IoOZSAwvufKdy/fhcnxvxzNoOH +B4wPCy+1J83zznqZwsOzx+sVi4miKWp8vDFxEK6cVHJ2iZKDBsh/K00cZoLA +SiWHF1na36bPRfDB/ixD8MHhGWgCtw/Gh7kHrO6kCdy9MaD4+WPisOLby4oz +AkoOW8x/HEqRMoXHD4xfCjJvLoIfzinWbpyv6GACMlfY1GGtkA5fup6ig9cJ +dtvZrKYQe14qODxJXHjNJB4avocFHHj9109JnWHokApyd5uiw9edt7r+TjWE +hPcMRWj6MITE/zIE/z1IfgeCvxLk3g+KDv3BJSrT1xvC3f8cFD53DeH+Q88f +AP2Ve/k= + "]]}, { + Thickness[0.0419639110365086]}, StripOnInput -> False]}, { + ImageSize -> {35.75016687422167, 24.508064757160646`}, + ImageSize -> {23.833444582814447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, + PlotRange -> {{0., 23.830000000000002`}, {0., 16.34}}, AspectRatio -> + Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09523809523809523], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGI1IAaxQYAJSjNCxZjR2DA5dDXI4rjYpKrHpZcY95DK +ppabKTGTVHfiEgcA+NYCcw== + "], CompressedData[" +1:eJxllG1IU2EUx6dOU9uc3W3XzW3urjm3u4WZikFvHgmzDFLMDysss5qjQCUy +SDMKX5KakZjkC2L5QksqtA+SC7Uiqg9qFIKEfVDSsIVipsggbe25z/UZ1IGH +8Xvuztv/nHt1p0tybEECgSDAdw77TqDvfBZ/oW0pwSAMu6U9U2yGUWR14bBz +z1DOvQIzrAwv9dsnRNAXX9wVkGeGl47hyuQZMTTVS8pTLH5urK05Pj7IEm7r +1LvW7Cx0TzpndlSJIcHcI/3YbQLTr1h3a5gY+gyzVe0LRlA/o+8HTgeDEd2z +KmhBdkwI0+n5aa2faBClRWQ2s0J876L55wIc5yYNKs7fkyoraygdO0vDzBH3 +qXWtJ5V58WDYFiGHC87Svj8SAczfKHIkquR8f0JITkImh32laVdH8kIIFyJ7 +GEqY+1mOhI14d6yOrIAEinAts8kwmkvBRn6rwar+sCYh9XH1nxND7sL4UnMH +zecXwWukU1AUYU7nVT9LuXgKsHH1iHAd4wq4jfL/FMEr5N+lxHmrKehFehaZ +CDcjncpMOM8bCuR1mT+EKya+HwpSuPmycGXKM5m0WQrZk6qKggYW542Vknly +fRyS4rpEZihH/38sA3X7SXYkwQxPqW0R9nY5zJ23rDbtNYPr6C6rd44mrOV0 +UhFe9/osVQPfCjomkrNYwvMX++W/HUbC3P5kGHC8WiXO36bHc7krI8ztQxlF +eGMeeE/0kPHkrVMwwOtYqOHnGg15aE5qFdjR9TsNmedQScVCyyWGzF9yInsq +0elnLq7bz6hc76KfB5F/ug7vUZwcz8GlI/EXO3uZsdCt//EBVKeVxvrLdFCD ++mik+feA4feDhp5V9+VRhsF9eRR4r69Ewf76KqowXM/veTREoroz9LjPChU8 +Qn71vH5JGphF+m+P5eNoeTbgegYYiHF+Pxh/LY4w57dsJMz17WX5vY+BanFW +b6PBgvVRKuE5VH59r7Dw+7YF6xxiwfXt9jMXJj+SsADZ9WDi/+/36S/Q2/hm + + "]]}, { + Thickness[0.09523809523809523]}, StripOnInput -> False]}, { + ImageSize -> {15.756732254047321`, 24.508064757160646`}, + ImageSize -> {10.504488169364882`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 10.5}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{Automatic, Automatic}, {{{0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {6.907755278982137, + FormBox["1000", TraditionalForm], {0.01, 0.}}, {-2.3025850929940455`, + + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.551080335043404, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.684611727667927, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.802394763324311, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 7.600902459542082, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.006367567650246, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.294049640102028, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.517193191416238, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.699514748210191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.85366542803745, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.987196820661973, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.104979856318357, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.210340371976184, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.305650551780507, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.392661928770137, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}, {{ + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 6.907755278982137, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-2.3025850929940455`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.551080335043404, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.684611727667927, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.802394763324311, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 7.600902459542082, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.006367567650246, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.294049640102028, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.517193191416238, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.699514748210191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.85366542803745, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.987196820661973, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.104979856318357, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.210340371976184, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.305650551780507, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.392661928770137, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->{{0., 7.6009023044216235`}, {0.96, 1.06}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Automatic}]], "Output", + CellChangeTimes->{ + 3.800161889311637*^9, 3.8042361608144007`*^9, 3.8042362922929296`*^9, { + 3.804236368828876*^9, 3.804236407606348*^9}, 3.804236492476513*^9, + 3.804236552125689*^9, 3.804236594454376*^9, {3.8042372097944717`*^9, + 3.8042372177592363`*^9}, {3.8042483273952837`*^9, 3.804248346915717*^9}, + 3.8042484444745626`*^9, 3.8042484928957787`*^9, 3.804249148795867*^9, + 3.8042493178911448`*^9}, + CellLabel-> + "Out[103]=",ExpressionUUID->"65bcc5c5-0688-44c1-957f-cbc413daffec"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Abs", "[", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"88", "+", + FractionBox["132", "R"], "+", + FractionBox[ + RowBox[{"25", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "-", + RowBox[{"12", " ", "R"}], "-", + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]}]]}], "R"]}], ")"}]}], "2561"], + "]"}], ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.1", ",", "1000"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{"0.96", ",", "25"}], "}"}]}]}], "]"}]], "Input", + CellChangeTimes->{{3.800257856938154*^9, 3.8002578672674007`*^9}, { + 3.800258413228198*^9, 3.800258415999654*^9}}, + CellLabel-> + "In[102]:=",ExpressionUUID->"0fca1f7d-de5c-4612-a519-21ba9c1fc6d4"], + +Cell[BoxData[ + GraphicsBox[{{{}, {}, + TagBox[ + {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwV13k4VN8bAPCxZiwxjG0mCVGWopQ2dV6iZMmXREqUSiplT0lIIZJsRRSh +QlTWrHWRbElItrLvWzPDjLH73d9f5/k85zz3fd9znrNcOXtn80ucBALhMgeB +8P/2Qbd3Ss41znI4Oq3X+VIdakrrkscucZY7NWz97vpQHfjjpZJlz3GWM0t0 +q6Xd1SHC8lPSYwvOcgMvj3+xBurw4ifjxZWDnOWxi4ebjJjboaDCMVZOmLNc +0/g0enh8O4y8sQyLzOUo37A+LIZv/TYwuLHzpusCoZzz7PmdI59UQKAhekB1 +llBew63d/TBVBRqVWcdHpgjlWUvh2fsjVODkcOGWM32E8kyOHcnfr6iAvc3B +Tr0aQrmigtu5ZBkVuGtooC31lFBu8O6iouhDZchVsuXENAjli07HxIsvbwWt +L2Iy0k2rmOVOu7OlpkrA/U2g0r5qFfsUOsPRA0rQ8p3rclbRKsbK2PxAYKcS +3OiczUbJq9hk9xuOYLISpDF/6Tm4rWKt+Zu51zoVQUo1ximPvIpVvlU1n3JQ +hIVYcpmJ9QpmkEKIDnq4Gcpcxc8EDCxht06eD5Ydl4eStdEm3vYlrKuuP3X5 +rzwUPS458uj7EuZjwXQbaJKH/Ay7nTH5S5iWw7BwbZE8ZPVnEN8GLWHpXCGx +iw/lIcHsUFGdyhK2rqvHn60iD947LouT3Bcx2dy2QiVPOdjDKPqZxLWAOWhG +n5KS2wRavtmyqux5rKVxx4qkxCbYJZDu/GliHmvjWd6+SWATaCjGCv9onscE +3nKhmAlZULH2NF1MmseuOc/M8cbIwsaKHT8ttOcxWS+hFsGJjcAd+a6R6MnG +TLl7+yFFBpo1XvxwH2Fhopw9bklABQli3fivLhbWptk7UKhOBZt+Fs+unyzs +smrYs78bqTAWaXqIWcjCtt059cZwhQKEWc6PHiEsbC5A7UpRCQU0Cq5EeKqx +sD/f0UDLHgqE79tzwsuNiY1akdNq9kuDkW5Lh/fqDPZZahQbOi8JUdKbf/Yz +ZjCpDy1GieaS0EH3/GYwPIOxLrI6LxyWhItJ0rkSDTNY6bXN7aKKkuC7fO5R +7vMZ7O+b18fXxiQg5xPt4MSuGcz8joQEv7sESKoKpVpfY2CVn28kpT0Rh+ot +EV0u2TTMP+i95MZxMcgdGnPMj6VhkxKhbQ1/xSApWYfN9qVh2B1NycAmMbhF +nRXzM6FhBjfiCKJFYqAsbGnyeOIfZtkTl/YiWAzC5qjlGZv/YUpftedvbBWD +E9/S3gzETWFXdjwwb3MRhT57zMXi3jgmu7y/WItKAptPAbE6V8exb6WBXF9I +JGgnHvmy/cQ4Vvw4R9aYjwSN2Q0CRMVxbCRcoMSHJQKlq51vP9eOYRC49d/2 +JhF4Fs/8qyQyhuVduE35FSQCJi3KxxYSR7Dm3Oy2GYYwlOjEyCWWDWLNxYEb +/XuFQCs6eTkudRCTslB8YN0oBHlDH9qjQwcxo/duJvBZCLKC6x6HnBrEyDym +/bsThODlj9UFD+YA1v/53CRmJQT+1ldajNQGsBGvycdHfgnCEddD9xcS+jDn +zzW/2n8JQIpOc13GXBf2ev1oLGOeCMWkiuyZmi5scclSsXqSCE392bEHnndh +qWe2Gb/uIcLKvYhLPw50Yc6D4oZ3q4hwqtKUg+HfibHntuklRxBh/eHGvXsF +OrCXapVqmSpEuK33Pa1a9jdWs/rufewlPkgODxWoiWzExgz8ha+yeOG446Fz +6lqNmJua85b0CV5Y1JnJj+36gcn+2EOb7uUFc5a1raPCD2zs8flbEfW8wGmj +nEMs+I5N7tLp0HjFC/bKtZbGHbVY0Kg2ucuYFxSqeFKaN37FSl5ke2Zk8kDU +CNeAy8cP2OhJVCzryw3m29xvT8u9x2qclG6e9eAGkseAyNWYTGxdKPY15So3 +RHBUoAu307Hg2WcLh6244fEG35cnD6dghymVan0a3LDRsP/CuE0wNqHGkeY9 +zAX3dcQ0lgmpKLVHOUDEggsc4kP/O61WgR4Z+t2K0ucE7xvcdeSQCiS//NJV +9BAnhOv66vwcrkA6toXtsVqc8GnCdadeUiUaa1D+k7uFE9YdsCZvF61CYqRO +M2V+Tkj/s6WDY74aXd3AfElu4oDJDd/sMr42oOsfPQ/V23FA0U+/PT7bWtHo +FKodeUyA8s9bBb7YtaLPrN4HG4MJUJvZ3LMW2YpaMtujzvgToDNYIej+XCvi +6VWIGnYjwCKqaQ3FfqN02UPv9p4iwIHs9W7PzdpRzExQZrsCAb5EvMz65NmF +ojkUB4rvrqGB9O6Ieds+dNe3YMWGdxUFkVY6Ur36UGlhRsi1pRWk6r1BzjSi +D0ka8gUE0FeQh9GZnDcVfUikTzqxrmsF8f7raDbf3I9+6x74WfpxBSlrtoq+ +H+9H8aa891XOrCCXz/Ux5z0GUXffjgSeomW02lwYVx8ygoTbt2279HAJkV87 +GTS8GkF7o/yOLvotIeWbcvM/CkeQUsik01OvJWRBeWTVPDyCRC1KarodltA7 +e1uJDp1RxOPlrfdJfwmdnOWOGV4YRbJF7YkB3Esoi2z+hHB1HO0J84i7FrSI +TltNBWoZTqHgO1U6ifEL6Iaq1T2VC1PI4VVU9UrUArq/VuGz0WcKmZdGHbjw +aAFlpcW6836Ywr/7fhD5LKBVtu75NtI0envkcyayXUApcc+1b3ZOo/yfpvIn +FRbQeOeR2QJHGmIkD8UV5cwj7Q//ZccfZqCB7NbtHj1stNbQ1I9MGeg2pexq +XAcbVU7+JzZ8moF+TGeMlbew0VFls5vqbgx0Rnl/4sYaNjJ/baZd9YqBr5dY +vGA2GznGm9dOrzCQaKa6anYAG8UEWfRB0QxaJn3rJKiy0ZTtKZFRNSY62Bkf +sjV4Dn3wzbscuI+Jqsgw231vDrkkrscUjjARR3Z4cKzPHGJ1V10/Z8dEJn/5 +FSTd5tCqzY7vnZFMlL3lcP3Rs3NI5Ax/UMMcE9G/7eRz2jWHdluVLeWUs9DP +3sv73g2zkK/pplEfCzbK2/tF7OQJFhIZe3W97xwbjQn1UEimLJTqL8c8fJ2N +DOb33WgyZKHaHHkOgSA28tPypJ3SZSFRsiL1eSEbKYSRxCN3sNCbDmXTAso8 ++qXAW5YgwkIN5zULp/vm0VKriSWxmYmoHkeCba8voqQHTTmVp5nIoSJSZ/rW +IjK6rqRxxwrPe3330p0Hi2jUS0BQy4KJjmS4uzxPWERazOzfuSZM5Nbzyrq1 +bhFtMaH71wIT1RssqRoqLaE95h6Y/RYmui2T3bS7dwmlN9Ntjs7NovZqaYqQ +2QoKBPeRW/GzSF4cFmPOrqBdEq5q92JnkdMFh64NV1dQt0tg1aOYWUQg5MWr +3V9BVn3Zg2nhs0hlnzHVuGAFSYq8yFwKmEW+mb4bHkmvIqWvaS3CTrNIKWJw +I3FgFe116TfuQbOoJKstMmAfAWLP21V9mp5B2tt/Um0QAZ4zQwKcJ2fQ5481 +b3brE2CZ+GxCeXwGlecWFY/9R4CTmFde6tAMqi6K7z/uSIDXs095M//MoJYq +2x3UWALovqt8u65+Bk38HWnKYxJAy/TAK3raDJIWYgsPf+QA0xPDZbqOM4jT +KGBHcgEHPM/Id3dwmEFTD4VOnC3lAN81L79HF/F43Juf/a7mgAVBgajOczPI +Yfm/DdXdHLDB/8/DQOsZlDv5bmuaACcE0+QnqUYzyLjeVufKZU7wecglrq0+ +g3yDq92mN3JBN1/De6klBhrTR1uUFLmgcTy/0XGBgcy4i/7YqnKB/A/2oRI2 +A22+l6HXtIcLDGq9ieeZDFTnHSaR9x8X6I2qqnyZZiDyDfOSWwFcsBTtU1LQ +x0AZFj0c3CNcMB9N1omuYaBWubkIyntuaBSwTP0Vx0Dx+y16x3K5IcZv/ffg +WAayO5G7rbCIGwwD9Qa1nzHQxIMb9SequCH9lctARjQDEcZGuB7/4Yaj1A6+ +J+EMtO1D+801Ig9wNbDsAh8wUND+YpshBx44dmlTsowrA+074bP1wyZeaLrm +odNpzEC+UzXEBSVeeOJtZfreiIGqAsUmD2/jhf6peoMAQwY6XvTufec+Xlh9 +5Le03YCBLsp07uQ5wQuC5uuMo/FzI3x090GbQF54+uT1YtB+Bhq6QzPjx+9R +6lp4nrgyAz15bX/HIW8dXPSL9snkYyDtRWBGF68DXXIO3uD1mMper8DWgbWh +xaVaXgbSW/pju6FhHbz6NrV7jJuBFs1O6rYMrYMSq2ofDQ4Gclg7SjwkwQd6 +KkGKgwt0dPD0tljx23zQ0Bmz4cckHU0Kz+dWHSICkSMBe9ZMR0ys9FuwHv4O +qNxU8LeJjlad/ToMDYmgf9xTQwG3aBPvatNJ/N1B5i/MaaSjvRHix7qdiDD+ +2mmh9TsdBYlo9rLiiRAcbEDYVU1HcqQbAlvYRHjrU/LYrJSOrESHLoR85Idj +HTF72G/pqE/3KbGugB9i9jSXHMd91f3IR74yfvh9zKPi7Rs68mlNXwyuxfun +LaxOvaajlGfXI4P6+cHMyTa+IpmO/lHYX+6LCcBPjmDFrBd4fAV+iq+XAKw9 +LUjqiaKj/F0aTW5IEIzlbsa89qejeKxa2EBfEMzSwtQVcPsbnjWVMRKEIZ7O +rSl+dGR0LrSxxlIQuGU5dif70tHAo6GGDTcEQdiBkpXqQ0fCg3F11S8EofuM +S1fxLTzfSI6vlEW8Xy3mirIrXu+/loLKfCHwKs30XneBjm7sXg7zLhGC419s +ql7a01GZj+LFneVC4Llyz3oX7lMCt0RTvgtB+7jZJfvzdBSxVcb53oAQ3J5W +W6mww+ffHv/pElkPxb1ea+E2dNTVvhT/+dp6SFw0GrS1pKPois3+RfLCwPXj +jf53Qzo6F3JgYmqrMNR2e566hnu7mbmFnLowvL37pEAAd32f39bQA8LAulVs +YnKMjp9vf5rOWAjDqdvptF9H6cjpUKTcWqAwcLber/2nR0d6pSuV+uPCkKgc +Y2SN6OjO6cmAcSsRWB9eyD+3C8/32viDxtMiMPmezzQL92uf0aC8syJgWJxc +a4+7MXEw9O4FEfDPIp1p0qQj+cE/USRnEbBrKJ5/vxPP51pDyj78Xa19SWDO +TYOOpO6+rwzJFwF+AV2WvBq+fknOnCr4u73noiCIbaYjouuQiQmZBASqcHiT +Ah3Z6lo/d5EkgdtxU5Fw3OuGdTUKZUigmzyUTcR9WkXCVk+FBFOyjLNc8ni9 +BWXFtodJcCLxqh5hEx0/z4iu0Z4kqLjHqyG7gY6Gmam9y50kOK6raTJOpiNH +d4H5ib8kaMropn7CPcFwE+nsJcE2zUXh+7jp/3R0CoZJkKe+wVEG9/JYb8p1 +BgmcG4i/T4jREbmb6tDDJwqbri+H1JDoSPdb9BS2RxRc8Aujbj0dJT69vxDw +VBQMSJFqmkQ6OumWf9Y+ThTEv/edJ+IWNB2u0EkQhbNiygW9fHTkzXc0lJAs +CscvmRSE4ba8w0/1zcLH8zyRHltHR0LnI7VvfxWFJ4Nedq958f2jluTnzBCF +9qQ1053c+Hx8LeGxMRGD6N05HYfWaMjsnH3e7f/EgC89U3J2lYYMVojnY0+I +QeN8ZGQa7t17rMtarMVAku/abhJukUy22zEHMdh72WLv6DIN1UTt6tPyE8Pv +h1SuxEUa2mX/oYSUg4/PPOaze46GhDlSnGvIZHAM9vzK+Q/vN9Ke+ChJhnN/ +NkfWTtPQqadtF+MoZOA9RQ4Jx52iLHD6yiYyhKvvY1Nwa5l76AmokcGNrle3 +e4qGbFOPSJseJkNsAYeK+wQNfdCfrGxzJUOK3WVhwVEaMg7dJTHSSIaNLzbu +y+6joZwY/S7BFjIY1yq8uYNbIskyUfM3GTx3Bu4/irs375bSvT9k8C3o6uvp +pSG37jKtDWNkGCw7KiWC+7mGvpU5hzgMTWpJeHfT0EjbybgvmuKQuWnM/VoX +Dd1T8KLExomDp12XxudWGqKEmal8TBCH9/TLDVG4c5mq+2sSxUFDPe+hI+6h +b33W7Nfi0Jssc4GM28DR8LlVjjhIy91/cf0XPl/vZaSk6sWha+S3gFILDb3U +qhJ/viQOxgfTdn74SUPFx0ikBFsJeEnf9VjiOw352/VM3z0vAZWOTUxWPQ0d +9cysP3dRAu7pjrn/xv37lf4DpasS8OzmsaIY3Az2bXaOpwSkCy5ZkXErvx3o +rg2TAK62R0OSdXi9nPnv5kokwLL0VLl6DQ3dLrXUM5eUBCnbRsmkr3i8yPir +7hRJ+Hxc+9k93EGXeyJiZCTh079Pqhdxx4g5dLcpSEKpXmiCMu7sa543z2hI +gk50flhBJQ2NUmPSLx6ThIGEpDfNFTR00qdZ0OuOJKT/6txLKaehHQeNfyf0 +SoJRsq7BeBkNOZQH1AYPSELEmO+rFtwJh4tL3YcloeSKDrEMN4+hUorRpCRU +TG0VfIK705LgvDQnCY1vdrbtxn3PJZ/vzHopeDXc4hJUSkPNqRu0KQeloK9Y +wlmzhIZc+adT4uKlIIGkJVdSSENdk1P9ni+lgOpj/CoNt96PqU0nXkkBWyxR +7SluiYipRKG3UmC32ODkgrtEfCo+IEcKZOzNQ7fg5pSbjHKqlYKtT9p3xH2i +oag94wEwh8eb4ZoNKKCh/IvD9mNm0lDe4mvhk0dDZ3ltJrlOSoNBvmjYNdy8 +6S3usqekQfhsZtNp3KcmsQeWttIgl1bpvw/3smv826qr0vBP3+UOO5eGDvuZ +Try6Lw02FpQWT9wtz4tdrQuk4Z3Tj/I7OTREa3zsXy9Fgd7h7y/efaShahn2 +72wqBRrPChe+xJ3odE41diMFfFbTuyJwG/Nrtl3YTIHpgq8HvXCn63eorqhT +wJbR5aaH+1yZfLv6UQoESpdH9X2goaaMwm1PPSnAHdt1RxZ37oP+LrsWCsgU +EJ99ysL3Z11G4IvfFNDPqYx+hztzvZtGZwcFCHHqCYm4X8dxBpn34vn85KkJ +wh2bpbBDf4oCg8y6SCvcPq2XglV4qUCeZ00tZtKQ/uYJTdY+KqQ36Aca4Na9 +ktuz4yAV8tK+vjuI+9AH75AbQIUwD97Onbj37hXoHT1ChaXIL6YyuFWM1UK7 +TlBhqlfzzcw7GlrvcaMPu04FLjeZiUTc/MVaj5ZdqMCKfB0Xg3vd6urufR5U +UJ+8ZxqKm/DwyaNcbypYn93c5ol7NiFb600wFb4uGR8xwU3vu9XfH0qFUu96 +rcO4pxR1wjaGU+HkqKP6PtwjH5v7Y2Oo4Hrs315F3APM52GtsVTYo1Z7jIq7 +d5/9HlICFaTb0+1JuP/6qgyYJFJh7EfI/XW4O77OhIUmUyHr+cWslQwa+h+2 +9/SS + "]]}, + Annotation[#, "Charting`Private`Tag$61733#1"]& ], + TagBox[ + {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQ3XK3atHGbKYDDGDwwf7Z0rCeiZsY4XyPPKOywp8M +cL7ZPmFZyQv/9sP4ewpFo5se/YbzzT/uOD+f+Secf9FgztniZ1/hfG+nSzeq +/n2C84+pT7hVsOE9nP8gaX9BSONLOH+X4xTFeXsew/mLHC+eXPntFpy/sK+L ++/jEc3D+pGfMjwrWr4Pz02Z1BUTpHLSH8Xecrzev0b0C5z9acXfCj7gHcP6/ +i9tnnOp8BudHhb9pNfN6A+fbrAvYMMv5I5z/Ji5C4LnOFzi/zl/heU3Idzhf +usStPS73F5x//ZikFG/gXzh/15prE5ssGRxgfEne7/xP1zPC+XXtx4reyjHD ++VcUv02QWssC51sG12isU2CD8/uXJFWnbWaH81/z/9h0xI4Tzg8XepLcuZ4L +zt9iYnChyJ4Hzld8d2nroS28cP7kgyoNO5T44fzqqNdNL8MFEPrn5zNpCQrC ++U+/LL7/5yaCP29q88+mqUJwftThXawxvsJwPj/jovzjIiJwvk+Xidizcwh+ +o3K51PQZonD+Tk9BwdlxYnB+5e4wlyBxcTjf0Nbn6uz7CH4h19tFM2ZJINyb +8jTpRaAknP/+XG/DKQkpOH9Ty8Nb8ZcQfFeVV8ZfLaXh/BuHP/V0LUTwASWF +Ct8= + "]]}, + Annotation[#, "Charting`Private`Tag$61733#2"]& ]}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{-2.3025849050279152`, 0.96}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->{{-2.3025849050279152`, 6.907755091016007}, {0.96, 25}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, {0, 0}}, + Ticks->FrontEndValueCache[{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Automatic}, {{{-2.3025850929940455`, + FormBox[ + TagBox[ + InterpretationBox["\"0.1\"", 0.1, AutoDelete -> True], NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, {0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {6.907755278982137, + FormBox["1000", TraditionalForm], {0.01, 0.}}, {-4.605170185988091, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-3.506557897319982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-3.2188758248682006`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.8134107167600364`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.659260036932778, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.5257286443082556`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-2.4079456086518722`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.551080335043404, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.684611727667927, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.802394763324311, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 7.600902459542082, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.006367567650246, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.294049640102028, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.517193191416238, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.699514748210191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.85366542803745, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.987196820661973, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.104979856318357, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 9.210340371976184, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}, + Automatic}]]], "Output", + CellChangeTimes->{{3.800257861428866*^9, 3.800257867566985*^9}, + 3.800258416357305*^9}, + CellLabel-> + "Out[102]=",ExpressionUUID->"0d5f8cbc-2c70-4ffb-819e-65593a755c77"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"100", ",", "200"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"100", ",", "200"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800161958911005*^9, 3.800161960726013*^9}}, + CellLabel-> + "In[179]:=",ExpressionUUID->"6459bbbb-2219-4d3b-abae-46f30f338dd6"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{7.650577754005099, -0.000032221539775258767`}, {8., + 6.217847980931413*^-6}, {8.338785501752387, + 0.00003046451451426151}}], + LineBox[{{13.333261538986713`, 0.00003046451451426151}, {14., + 3.3042667034285397`*^-6}, {15., -0.00002987638532729714}, { + 15.118791575770262`, -0.000032221539775258767`}}], + LineBox[{{18.673182913823645`, -0.000032221539775258767`}, { + 19., -0.00002616958942181399}, {20., -4.204916809838949*^-6}, {21., + 0.000015533770694073283`}, {22., 0.000028709886505894693`}, { + 22.39924862332279, 0.00003046451451426151}}], + LineBox[CompressedData[" +1:eJw1k3tQVHUAhW81ZlRQLY3lC4LGx1AbamKgCxyei/Ja9s2COMIgVsygEcRg +5cLYhPyBiCb5AFpQxpBhYIWhmFpWHgvqbgtYG682VpgColIZyD8qe+zxzty5 +c+a7Z75zZ37XLzNPnv2oIAhJ/97/PRfSZCJd7RsozV919NrdB2HC/1cwXJ5K +6ReSv5lDELPKlrh27h7zTtyeDNwsDhpm3gVL1sGMJvW0yZ0lWDl8slBoXWQO +RRVG3qo0/8EchgeKHV5rSpeYwxFXZK5fki0wA0Zvj6HnRUPurAe6Al5Mnqke +pS8CZ53zJ+qafnFnfQSm929uKcm4Sx6J1lpj/QsRd8gj4eqUhNo1P5FHoXtT +VolHr408CqYbGbPq7fQJ0QgoVRy5vHeG/mjM1sq8NlXMk8dgeVugyPPsHHkM +wi40PHco9jZ5LC6FGuPllTfJY3Fwe3d6c0M//VK0t94rvrLkpF8KofmS5PHF +GfI4+FsM65t7mPVxyF7+VVfewveF3ejrLExb+el18t3QWYqHHe1f0b8HosWa +tRneo/TvgV5aeblpfoo8HpG+jV2dO1zk8TDlSA6siBonT8Au65Pjxx0D5Ak4 +lpb9+vpCI/2JKH7qz7GJJ27Rn4it4m7LCfsEeRK2dP9mOOXxA3kSJgPmvrw4 +7CBPxkRO5NSNaAt5Mj762j/fe3Uj/TIEjGZfMRZ8486Q4YIu902n+HvukSGs +7nC4Y4TfZ5ZhjSnr3IFnv2U/BR+2TL1imuhjPwU/bp0Wn449Q18KrEWN28pP +DbqzOQXPfOaTKirj9whyVMSUBVnzv3NnyJHn0HtV2Xne9XIUdPjKwz/pZV8O +q/zkpOfO9+hXYLbqscz7v/fSr4C23KPM79zD86zA/n3vm4T2Ee5XQCk+X7HF +aWdfidd6OgYCc3vYVyJU+ld/wWgx+0q8emvj53uDzfQrEeTjX+1828r9Kpxx +2S8O5g5xvwq6Q+/kZbWR61XwvVkdlZZ+jX0VDEO2MVtCJftqXO0rGvPO6aJf +jc6J3KIPCgfpV+PIccOdthU27lej1bXuJef969yvgX28aqMs08y+Bsp9ws8t +zdXsa3D15WMedYc76NegxPB0g2PDw/9DC01O8NHJPp5vaNGfGrI6umaA+7Uw +rHsk/d1lE/talC58POCXWsN+KhZ860N8VG2mfwA46Y6t + "]], + LineBox[{{0.6656511828495245, 0.00003046451451426151}, { + 0.6677407179925086, -0.000032221539775258767`}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{7.383012340241925, -0.000032221539775258767`}, {8., + 3.274590640924815*^-6}, {8.715589821256774, + 0.00003046451451426151}}], + LineBox[CompressedData[" +1:eJw1kn1QkwUcx6dSIBehoCvESnJegYtEooG89OVFQAfjYS9s43gdh4AWnRCI +BDHQTCHfUDBArV3dmcEdycWKPxgD0XjZGC+pEwHDU46jGLeDAiYvvfDb7p7b +fe77/O7z+eNxU3wsTF/PYrHk/z7//ZsZb/ZsmjvKctkl7ebVINb/Pw8EbZwa +4wYuEnPR7/eAt+WUhtgTPd/VqxpTzJo13oMht8VEvvMysRfmGczYja0S74XH +UmCE4ZKF2BuCwkrHNxNmiN+DrMX9fICgk9gHFadLPM8/fUK+99H8YpGgt9pM +zIPoZae3f8meI/ZFcXiK0c9k3f1Q9ENpVthXE8T7sG15ZLha3Unsj8n87V0X +ch+QLwDfu3DlhxwmiQORn1Nr/7f/NHEQVCeCsxPqp4g/gCiDP9vQOE4MdOjX +8cv9qF8J7EvKvsp4GsgXjEYbdTJTP77GymBc5/lAJ7f2hUAtrTqucHpGewh+ +TuOqIz1HaQ9FUHzi1qzLt2kPhWDpi4yHhXfIHwaNhW3J3vuI/GF4vNg/sjxi +7duPG4ajKSYZsXI/1DZptcFzRtrD0R28azb3rw7aw6HhhTZELreSPwKZzpXn +xq7eI38EOo22vPJj1r5IpLcPn3rnCLEyEt6fTrKqJuh91gH0Pjn79c2MDtoP +oLZK7MvS/UT+g1i4uZCYUTlA/oMYuGeoVv1u7eODvWR3XK18SDsfU6bX2OE1 +Q7RHQV/nMfX6n+20R2F5jFOaM19P/mj8WDp3uuklPfmj8S5TcmNPqrVPgM9z +evPciu/TLsDqrtbNz/QDtMegZv0Lfa6l7bTHYEfFbouxREV+Bk+dyrwtUV1r +DAZ37avnQlSD1MPg0FshmSqX39ZYy6DM2LqTldRP97Gwz20SRHOoH7HQ9Wwf +TT5aSb5YcBZG7e6W0PerjcXlQZ1PXVY/9Qnh52BKcncfXGMIsSIO5GSl9tG9 +EF4JYw15Q1q6F6JgxOS7uO0T8osgueJ+36yw+kX4SIjM8d166hfBOeWb27qz +1KsVwUHnZZt/WEf3YowuuWZf+1JL92Kc2di8tYpfQPdi8F/lsVov0fekFaPS +cUWx2bWH+iXg7uiLmkinXkjQ+UZoWFsb7UoJYp5vKHcRWPsl4MyfsRwznqP7 +OJTdStBPe7SQPw6uEU2P1332K/njIJtWfLhhC/Vq4/CH4duKAqab+qXg81cW +TrCt/VKYA4aL8o5coXspkp93mOeTmskvhTz+lZo6/zvkl+HiTGrxrU3UCxm4 +zhf6wzd1Ub8M4keHHRTdbXQvQ7tNy7XC+Ot0L8dJ276WUMcmzT+g/sKz + "]], + LineBox[{{0.6646356990323826, 0.00003046451451426151}, { + 0.6688147693183506, -0.000032221539775258767`}}]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFk3kwnHccxleNyiZoiiSCENqK2UYcYSvieJzrjLW7WGeCIm21pClVkmYZ +JuIPcdXViC6JUTEGYTTaro1bUEeSrStqw9QRaTVKM5NKmpn9mu7M+8dnPu+z +z/Ob+b1G0Ym8WGUGgxH7+lF6/bzB+P+Xrt3IkacVOylo3UnBWZ2kwWTpP7Ja +8ibehe2KOBmLzyHei31PpXdNSl2ItVHjt3yGX2RHrINytpr4My0LYn14GahF +udnoER9G+PwSM0J72lHBxvg7Nduf/aE27XkXtgylhJIn+sQmMDnA26OTv8Om +eDi8kb/as4+YBZXwlawX+1WJj0IvpOXBTPsQ/f8xCC2VC+T8VxIFW+BSWXRs +tfJu2mMJOG7nWfipEVshITxncPJTVeLjYGePXZxMekF5axTXcX58WT1ObIP2 +CyplY17r1MfG2tCdM1Ldl8QfwOmrQQeHMCXaZwu5uoDzg/2OPwH3/SN+eivP +iO3weNbc1MxmnPgk+mLORtYHLVCfPVTHC1IYTRvEDijExMf50n+IHfGKz9bQ +zdwkdoJnqrR6k7tGDLRoMce0NccULAI6WDr+i6WT1OeM8rnVq1X1TxQscsZC +lGljRuRf5F3QdL2l+oAznVfkAnm7vcNo8O/kXdF5JCaD2T1C3hWSe5HLQdbU +x3ADK5OfXhexSP1uWL7O1TiSt0reHVtW5prq5Svk3eF4rebtJI/H5D1w06HF +h5c/RN4DZ607wxtqeqmfg9amZ2m3NueonwNGw037NzcWyXvCuE98qKGLWOSJ +2K2nobmN9D7DCz3tKWGqZYPkvRDalzYua/2J+r2huVGpF6k1Sf3eEHHy6+pX +58n7wMWwtqOdLSfvA0m8fZyK6zR5X5wc3j19RdZP3hdZYbHHD6W0UL8f0vb8 +OzWz6z71+8HSrLPv6ugM+VOw6PxDXMR8RP4UZlkrd26My8j7YybeZf6eWx95 +f2T/bHxe62At9XPBmoy91ZL8i4LBxbXQhI/mzH6lPVw4Vp1zkk3Q+aRc6Epi +KuL2PqB8AL5unH9fMtND+QD8ZrlgVuxRQn0BGE6ttcotGlCwNABvfWcQoplD +52HwkOeeYzN8/qGCwUOiTKRROEr3XcRDcpshz+mbbsrzMMwrmFW3+5L6+Vgu +VI5+/mc39fMhzGXmGFXs3Gc+ok5fkDBaJ2g/HwKzb/Ms5kYpL8CxrrZ+84Qu +ygvgwNnuTZ5Mo7wAR++bfB9hK6V+AWwMjEvnPhmm/YEokY/eGEgYo/2BCE36 +PDGmmbwoEIZDpa5h4XcpHwjx2MjUiG8+5YNwuyd1Siu+g/qD0D6TkHoxZYD6 +g5B+RbzerDJC+4PQJNc/PPd8kPYHY3S60IQbLaV8MASnGUuNDaWUD8btd7KY +VefaqD8YGWK1Gtl7O9+HEMHxtpdme+h+Q4jekBMH3Sr7ab8QYn2l8C+2JJQX +InPtcr9RSCXlQ7BmWH3CILBZ8h8fD+qz + "]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFkmkwnAcch9eROiYScTWOtoi0rqijum4/R5Asa7FYxp1xptUJcUSoI2ma +0ES6QYrQ7uhMmjLRmNL4gHUkday7SZYglRGjWtTQuqWZ2f9Od+b98Mzv/e/z +fHgN4j4LjJdjMBjxbx6ZN48s4//fRY373rM5l10l9LerhM930IyHa0oTWTqO +xIowThEfS2hgEqui3Gk43UHWhlgD3fy55RMxZsRHYRkyOb1wX59YD4lNZX8w +0w4S68NXw9rFIHvARcKGsFGpqebUHaAeI8TomZXWLR4ifh+Gck478t1SNoam +bIODoFaB2BQuSosz5s5b9H/mGLF/xtS40k5sgf7v6wWNMavtErbEuMFWJEt9 +j9gKGxysKM68JraG6a6z9/CtbWIbsHP4hw0jVog/Aq/VpNSJ3UNsi5Kr+Ral +cy/J9zGa38plD1SsEjMRdEjN+GHqOrEd8rxixPbL0t0euT8WJnt+M0/sAJ29 +qcmKlh5iRyxk6vXeTH9GPif8oG0elqCyQOyMzLQq5X8dl4hdILjklhpRv0js +iqBE1lpD4ywx0DUowyq2p/4CwCEq9Q7HYph8bmiUb4nm1M9KuMANtUxbiMKk +fe5oCS2/EKf2inZ3/HLGvMXHYpp2D7iER2oml3XT7gH27peJEzmPyO+J9m2t +7VTr5+T3xIutkam9KWnfSdwdPhezzCMuOIkW+TNVbuti2r3Q53Z8Lf2fLtq9 +0M70aPDZayO/N5LU+Tdm7jwhvzd6xArM4ixpnw/iOyevnDhLXOADm4sLjPJ5 +ep9xCgMvr397L7GL9lOoKufaMUQ/k/80Nu9tRibyR8l/GqNPhisEv0v7WNDa +VbzQUjBBOwuLy+9oeVWO0+6LwWrTxXf/6qTdF3szRoVpG/Xk98NPhetXmw4O +kt8PH3Ly71rGSvvY+CJtIMMg7yntbLw+3nbk1eAo7f6olD0wpFvYSbs/9EvM +tsX5AvJzMKdWZLPt2ythcPBYuWLdXTBGPRwkfOCeJND+TcJCDorEbccYUSN0 +HwDl9Ca2nxH1IwCifr3p6HN88gXAaHNa8XE+fb/CAJSNiWyrk0eoLxD2KstR +JiZjEkYg9rnORsmxQ3QfCKuImYaMcSHdByJ7atluS+c8+YMQfNvk6Wqc1B+E +TwORNGs2SP1BUI/5rlt0nXqFQVARWSlkpojonovpXd3Umq+EdM/FNaVmzXJW +Nt1zwTrKZLTdou9JyAX/8H7cEd1+6g+Guf6Q73w89SIYPe95eHZ00F4QDP8d +uWJttrQ/GEYb17azxDfoPgRFDyIGl0xbyR8CXe+mFzKf/0r+EPCW4j6R06Be +YQj+HK4ryeb0UX8oWKz9zUta0v5QrDpN5macvU33oYje6VrdiGomfyjCwt+u +rHZ8RH4evl6JzXugSr3gwVz95oiXai/188B9nqIS19dB9zx0yrfW5ITX0n0Y +LisMtXocbmr/D7Mi7SE= + "]]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, {}, {}, {}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-0.000032221539775258767`, + 0.00003046451451426151}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"100", "200"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + 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 -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.80016196175101*^9}, + CellLabel-> + "Out[179]=",ExpressionUUID->"55a47366-3c86-4fbf-89d1-56ca8b6051d8"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "400", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"100", ",", "200"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"100", ",", "200"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8001618939303102`*^9, 3.800161933197253*^9}}, + CellLabel-> + "In[178]:=",ExpressionUUID->"172ade52-bf8f-452c-a049-b4bf067dea13"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{13.94074715982819, 5.717989499794946*^-6}, {14., + 3.3042667034285397`*^-6}, { + 14.272210859595775`, -5.727867107803616*^-6}}], + LineBox[{{19.930663646808267`, -5.727867107803616*^-6}, { + 20., -4.204916809838949*^-6}, {20.50271358253517, + 5.717989499794946*^-6}}], + LineBox[{{25.88405380924182, 5.717989499794946*^-6}, {26., + 4.102640221318611*^-6}, { + 26.73780599100033, -5.727867107803616*^-6}}], + LineBox[{{31.80390976539185, -5.727867107803616*^-6}, { + 32., -3.831536787905872*^-6}, {32.984990609025395`, + 5.717989499794946*^-6}}], + LineBox[{{37.694613994587954`, 5.717989499794946*^-6}, {38., + 3.5478906382545377`*^-6}, {39., -3.86344220786272*^-6}, { + 39.31882758334346, -5.727867107803616*^-6}}], + LineBox[{{43.55014272783505, -5.727867107803616*^-6}, { + 44., -3.2858557382287268`*^-6}, {45., 2.5796113955812914`*^-6}, { + 45.65359132064743, 5.717989499794946*^-6}}], + LineBox[{{49.374551972573805`, 5.717989499794946*^-6}, {50., + 3.051026137255104*^-6}, {51., -1.711034945655815*^-6}, { + 51.99696794858891, -5.727867107803616*^-6}}], + LineBox[{{55.15599382494977, -5.727867107803616*^-6}, { + 56., -2.841715925982973*^-6}, {57., 1.1003841798495545`*^-6}, {58., + 4.538203398632136*^-6}, {58.56384211674849, 5.717989499794946*^-6}}], + LineBox[{{60.81280558246324, 5.717989499794946*^-6}, {61., + 5.440454428804887*^-6}, {62., 2.654638366972486*^-6}, { + 63., -6.58570320296733*^-7}, {64., -3.631086055107102*^-6}, { + 65., -5.526345964643406*^-6}, { + 65.51400967193632, -5.727867107803616*^-6}}], + LineBox[CompressedData[" +1:eJw1WHlczPkbn3VUbJK0saRDIncsUixvqdyZLh06ZprpmK65pwllIhUqU5QU +XawzmZBbZnWypXJ20I7burLkvn721zP90+t5feeZ9/U8n8+3LIP57iG9GAzG +8p8YjP9+F2xJ6XthExMGnlPModNayfjvR83EsEpOXqjh9Z6a4YaEMs34yo7q +nhpu+HvK/YnbXHLm/L9WuKFBvnfqpq31PbXaDQOLzHyNUq/11Ax3ZDinTm8Q +3+ip4Q7+TYVBVlML9btDWmHuPje7ivrd0eCeeXuAQyzhe+BJVu/gD11VhO8B +n039Ui3zmntqhQfYQWsqGcevEn8PeE7Mz7DtbKJ+T0y6WFE3Oeoi9Xvi9wVf +a6Stq6jfExOujT4QMFNN+J6YbjZye2dkA/H3Qs7dpj31Uc3E3wt+AhGfU07P +FV4w/2v7/JX+f1K/F4qbG9salyqpfwWOVcvbBoedIfwVONkRJY+X1RP+Cqze +WPyqvG8j8V8B1V1Ti84Pl4i/N5ras0Yzg9XU7w3PIMbjstLt1O+NY1ZJ/QqF +FYTvjcRi/d03rWsI3wfeYTPX3q6+RPx9UONr/6vTrjri74Ni05/8Je8qqd8H +656n1Fn67qJ+Xzw3L7E38yonfF9cea+765k3+anwhSRmg1fjx1ri74uk8crv +Juk1xN8Pn5Zazk1edJ76/dCbfWjV1LYi6veDrk2KidFfhwjfD0eXtX9NfXSB +8Fdi8mmn3OiMauK/Essnto7/dobmRbESl9Z+/+3N6bPUvxLlYf09rBQl1O+P +3rwXLcN77yV8fwidbHY9rz9L+P5wHmbHqxOSHrU/PO/k7y00pZoRgBfcb4Gr +nLT5BcC79e3Ined2U38A1nmaVZiZFxN+AHgsVkjXzFOEHwiv5BmmJTk0XwjE +neMvzt04QLUiEHMqWpMDHtHn1YE45lXZnLZ7D/UHIYs9bwPz5Q7CD8Itu3vh +3WYVhB+Eo3oTFpg8JH/VP55z9B0cT1USfxbKznSvXbjrZE9twYJvDj47Of9B +38dCr7x+XJ9bWT14LBZ8hq/Lmx5+lPix0La1xNr105meuoiFV8oBz5P9zxFf +FraePFP3e9iJnlrDwovZDksLy/4g/mxsT3i8pj19I+GzUbpoS1xeXxXhs7Fi +W3x3aNCpnprFhoBXmPnMjvxWsHG30c4qxZH0FrHxetylEa3/EH81G/eHXx+4 +yi2B8NnYsn7Q98obNE+MYAxxTtfx6kf8LIKRf6JAhzuf/EYwxLOKfQ9MPE76 +g1GVO7lu7HfirwhG9hufz0O6wwk/GGFunEHPh+8n/GBcNBuT9eXlsZ5aE4y4 +1ugtxnEnyH8OgjOu+/qNoecWHBhYfeuDt1r/OQjPd2vRP+9C+jkYXfChdmgj +5a/g4Bc/8+WX9SiPIg7Ov7MzMb5OfNUcJLVUzY+bRM81HLgd6+WS0aL1n4vA +fjWmtz/zST8XM2z3l4d0FBM+F9vSp5dxmZQHiwuzk9vrZjOJr4KLT0OFL3Ud +af+LuHAKd3urzNX6z8Xb5S56y5xWk34ubqxOz/GWFRB+CGoSjRd1Kg4Tfgiy +W73ddJ+Wk/8hqAoakG/NVpH/IRjnei30+zKt/yEoP1wwwES6jvSH4NyCyfkW +NbQP6hDI81uuV+w/SPghMEuIHxJTQHoYoehbXzv5F5Mj5H8oyh484b7u3kP6 +Q+G8f+jMvKxk0h8KvUP7LFhZ2YQfivjfFEfXG+4n/FAksJbfLb1RRv6H4rqg +xaVfAunT/Pi+vP6zeym1+xuG1X57I1IHbSL9YSh7aiM43ZRJ+GG4WuDxIbOc +/GSF4YPxzG9fdpSS/z+e54uuP/5wiPwPQ/+9w3wCLYm/Ogz23euvRfRNJ/1h +aHM4MqTgbhrhh8PZZfVgo+TdhB+OYJP1v93ZcJD8D4f+BH7fTG3N+lHPWf3x +74P0eUU4xinvjjNcu4X0h+Nmh3l5+w3ySx2OlD+ZD9+l0jxpwsHZlva+PZv2 +g8HDuQiPAobVAfKfh+xVxla/TqLzEzwselNcvrZWSfp52A0Hz828RMLnIZqd +MLg0spDwebAsEDu/qN1L/vNg6HQlbHHzPvKfh58DLuxglWrP/wgUdzgee7or +k/RHQP9mb1Xr0DjCj4C1vHn9rkE7CT8Cw2fdaeSaUB6KCCQvPmK9PY3uj6II +HLfNze0YXUL6IyBKUlYtXJJF+iPgblXSxmcJCD8SBqfHHX36JZfwI1H7lPtP +ZyL5i0jsE19mjPSmeWdFwvLnSyc2FNB9oohETUrD8IhrdD4XRYLL73rGs2QT +fiQeR5ydlTQmh/Ajcbjj0Z8OusSPEYXpXpuZMybTvFhEYWO1JNDOWLv/URhU +PyVko8NW0h8F+81uuooZ9oQfBb3A23KdtK2EH4W/BYNdlHuKyP8omMfnHJ9o +THo0UZjHrDE7lErPGdF43DXVlp1E/RbRKC2JP6YpdSf90Wh3HdVRbE37wIpG +rs42KzdVAfkfDWaHShjTl/QURcN6d6Z1n4+FpD8a0wyPt/9+nPhrouF/r3PO +pjgu6Y+B3x8nJhlo0gk/BmXJbQZd2En4MVi8KUo3ohf5zYrBuyvHjLdo6PxS +xMDGJnmLfqNWfwyMhg/y7WbHkP4YzI5R3Cy9QvebJgaMmSPrJ3yg84nBx0P7 +rrf5/el9x4L/Y1+UU57U7yL/+dDj8B6FtWj958NyOTPidbaY9POxIfXCg5GG +yYTPR8KDaS4J17YTPh9uDY6+g2YRXw0fhwMdlmiOkj6GAK+cjihLqoi/oQA8 +5z8RII8lPwQwr947xaxgXQ+erQCsXp6mmc3ZxE+ANY5ZdnFS2g+mAKZHZ0+Y +UJhPfAUYG+/Pa/6D+AsEsBhpPPnQfe37tQAivZJ5NQ/pflYKcH9D02nnF1o/ +BbCbbVqfU5XXU6sE+Hw1cX54BtVqAeZ6fZ50JY4+3yxAwPymwdPuxZNeAerW +Ln8vMKJ9fiWA35jLeQfG0D4yhCgRcecWjKI8DIWYoctTD0+k2kKIFePNLRbO +I/62QgRv7exdOkdB+oXYL7qcdOaUuAePKcTepwOdXsfT+z1LiJbqh+ubtlMe +AiEcb3fYn42lfVcIkfTM9MCFr7S/SiFCTZk3GgPpfCsSwnPHu7nthdE9eCoh +lg6yuvHvbTrP1UL4GI8ZLDWl/W4W4kTbxTcHRfT+rxGisG3YIqWK9L4SwiyR +v5TlRXkyROgf9ezTsCIu5S+C89w+vtFd2vtIhPde/fXul2/rqW1FkMgrrkJE +f99BhG3unY1v/Ig/UwT1tfPMF9brSb8IU/Srlwyt86H8RVjxb1faOttUyl8E +I9Pvv8u8yV+lCJkfn/evldF8FYmgX+vK0PlG+68SYW3vZ6bl19aTfhFK7CUG +R0TzKX8RHoTohSh3baD8RehYwknfqk/8Xomge8k+W64gPQwxZlXPvlWXR+e/ +oRhm+zuWlLCTSL8YdgkWy/7RtSX9YvydOd9p1DTChxhXhzwYsa+Z7iemGDcH +3xOlbdHuqxjWV7mOI6cSf4EYg93XPpBfTSL9YpR9Veg8TWSSfjEqjFPS3v6r +oPx/9Je75C5woftVJcbLmKa6CXtIj1qMw40VO59U07w1i6HvNGzjcRutfjFS +MpXrWzpWkn4xjncYRlYdiKf8JVi7eDP66tI8GUowxdKuZU0l8bWQYLpR3NV2 +D9JnK4GS0/6kOHQD6Zdg8QU+Tz2IQ/ol6BOZqGqpiKP8JRjuUrk36R7Nk0CC +GS8enc/tJL4KCdg7Pm12vUD6lBI8MaxJD8og/kUSGI3MNiuvCCP9Enyp+DLH +q4+M8pcg9Ex3VeMtmqdmCRpGpEXl9CG+Ggle3k5439qSQfMvgY2V0Yh7xcSf +IUWcYMb4ZfciSb8U6HXFoi5TRPlLYTMpyPP1QzpfbaXo3TxjjD47g+ZfinNm +geOl2vuDKcWbf0+Zfigh/iwpdFzhkFVI79cCKZr9MhMOVsRQ/lJwfns2ZoA+ +8VFKMU6n89DD6jSafynqRAMXjn1OtUoKV0db12Vb6fNqKbxSG39avUpI+qV4 +PtJl9LlT4ZS/FItUjA3zFtE+vpIifBo/vXbaZpp/GWoHbCy5/5ZqQxmezjYs +jZYQfwsZnrieajzVTX7YyjDqJXdb22jKGzI0m7rmn9mZSPnL8KDfq/PHVHTf +sWQwiWnsWPNtE82/DBdmupvULyD+Chn8q3Tqa+ZJSL8M3m9qmbe6aV6LZNCd +f6vPob60DyoZvt7ubDg4M5XmX4aCAXbq0zo0X80ymF53Oqky0M6/DKf7aeJV +XCnpl+HK/Aqb5f7ulH8sxoKzL1eH9sEwFt9Ojdhd0kDvrxaxmLpE/nbpQNJj +G4u65Y/Gci7T/iIWV84qbqxg0TwyY3FTfmSSdbcj5R+LLrfBK86PXUX5xyJL +7+T4tCjip4gF87VrfOtQ0qOMxaUtNrw+a+j8KYpFxU3BaZ4d3ceqWARpTNqa +FhlT/j++zzCqmimm/4c1x8JxWfsz96HETxOL3md+NeqySqH5j8XDg0UZe0bR +c4Ycczq+hQmeU7+hHKt72bL50+xJvxyJ+5LYz+5KKH85lgUOS7vTRH9vQY6c +UQ3sX6bQfjDlMJi7MBQ12vNfjqVGSuFfiXLSL4do2r66oJTFpF8Ol6/d1bYS +EeUvhySvzNNgK81TkRyXPazHV4HmRSXHySaH2xcDtee/HJ07Psec/Cgn/XK8 +lTm5Ld3nQfrluDtlpnWTDb1vv5Lj9fRZBVVsmidGHALWpYHrkTTnf0cLs+I= + + "]], + LineBox[{{0.6664760670166735, 5.717989499794946*^-6}, { + 0.6668575955702601, -5.727867107803616*^-6}}], + LineBox[{{7.891410898040415, -5.727867107803616*^-6}, { + 7.995456179628403, 5.717989499794946*^-6}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{7.843520821189949, -5.727867107803616*^-6}, {8., + 3.274590640924815*^-6}, {8.064305856861647, 5.717989499794946*^-6}}], + LineBox[{{13.82478368618341, 5.717989499794946*^-6}, {14., + 1.8193570377914835`*^-6}, { + 14.410353549336024`, -5.727867107803616*^-6}}], + LineBox[{{19.736115539222073`, -5.727867107803616*^-6}, { + 20., -2.420617528024027*^-6}, {20.712075788290434`, + 5.717989499794946*^-6}}], + LineBox[{{25.60880834175275, 5.717989499794946*^-6}, {26., + 2.4692105488329973`*^-6}, {27., -5.591256128115978*^-6}, { + 27.023241876550912`, -5.727867107803616*^-6}}], + LineBox[{{31.449248322535173`, -5.727867107803616*^-6}, { + 32., -2.410980037886971*^-6}, {33., 3.7170550259526556`*^-6}, { + 33.42498260869197, 5.717989499794946*^-6}}], + LineBox[{{37.26805367345759, 5.717989499794946*^-6}, {38., + 2.3340855176787886`*^-6}, {39., -2.5606012139518954`*^-6}, { + 39.80722019590613, -5.727867107803616*^-6}}], + LineBox[{{43.06007926185192, -5.727867107803616*^-6}, { + 44., -2.260065138738803*^-6}, {45., 1.7875069469488711`*^-6}, {46., + 5.152886140118207*^-6}, {46.30177749179897, 5.717989499794946*^-6}}], + LineBox[{{48.723026293772215`, 5.717989499794946*^-6}, {49., + 5.221536425041931*^-6}, {50., 2.194038867417034*^-6}, { + 51., -1.239590546939012*^-6}, {52., -4.189464987850663*^-6}, { + 52.88323306138496, -5.727867107803616*^-6}}], + LineBox[CompressedData[" +1:eJw1V3lYzGsbHjtZGlvJ1kQdCueUhGS5yxYl04L2ZqZ9n30GLROyhFYqOihL +iUpFZKmGU1nbbcdS2UJZQp2S7fNdPdM/Xc/1/p657/t91leHF2rn3ZfBYLj0 +YTD+///awIXM4SwrjHAw0sbAh6WM//8prND6YZLGigMNvTbDGlVpBq2T312l +c2v8aNSNEnadXtx7vgb5UR07C4dV9dqKNfiLHZllyL1H5zaIFt6W6ITfp3Mb +/NIrGfmqqo7O1+JA3wHVE6Ku0vlasHbP6HkYmUH4bLwctcW4x/pGrw02KtWS +Oywy6okPGz7TLPwytO722ko2tjwsmcpwryV/W6iJCm3W6BJ/2OLOrYlPPQSJ +hGcL3e6ngysjy3ttpS321d8xSfOvJX52MB3+wV1fv77Xhh1+OizS9edWk78d +jFwbcyQNSvK3g/zJh/lfx4sJ3x7rUvTvf+Kp8O0RbAe/ZzOqiL89RnPS/7mz +l/gq7TH8jtEgacAd8nfA0+8TQg7tUZK/A3YNKRq730pO/g6wGjePUZJUQvgO +SFT/yRs54RbxX4eZrGrrFm/ii3Uo1166rKyMzhXrsPZbvxgtGxX/ddDt2tUj +exhL/uuxpcC16r3BRcJfjwkrC5v6RFwn/PVwfM8L6jeG+CrXo63m2G45+ybx +3wArq5/dWzVU/Dfg08JHYZLAFPLfAI9v1z51uRcR/gY4OWseSDOrIHxHJHzk +hhcwiS8cMXN0fO0K5g3i7wiHxwHDeTfLyN8RV/tfPLTJ+TD5O2HboOqLS9UL +Cd8JHx/uYjqZ/0P4TjiT/KByqiq/lE5INSiMfNZZSfyd8aYn+9uq0DLyd0b/ +OfyhH+YdJX9n7Lhn9/btijzCd8bpie51lqp8Zrig4uuOUM6lSuLvgrz0X46z +ekifwgWDW5QRGpNU/F3wtS3pxJrW4+TvihU1x60Gj8omfFcsv3R57qZnxEfh +iqKMV5oz7SqIvyuCEwYcPKpJNsMNOelF/7rVlZK/G55tmlHfxyGL/N3QUB4X +YuFJeEo3LHaMDKkdQfnEcIeU/TJizTCqD7hj65Q5Ji9Wka1wR/JS6563MaXk +744DH7eo60Vlk78HHuSfmv+nbjrhe0CGwqzw8EuE74GS/xhWai+uEX8PJLkK +t/L3UnwYHKx5PpBxxpL4szjw3zPM23Dzafo9DsJe6Hkwt6f24nE4GOdTaDdy +ajHx42DQYIf6m3UUj3QOtJ6oj5I2XSO+HLAXep3+Zwjxb+bAZru2WcaqXOLP +hfD4WI8ZngmEz0Vh/rRSVlcR4XMRn2d+ru4u5TeHi4MWM1uOLiI9Ci5E/v1s +XapKeu10Liz/LB4q+JxHerngRqzXdUiIJnwuOo5bd9d9Pkv4PPQoInKn11N+ +sHjoasl+MCyT9ICHXbu1fikTKV4cHiql1rFzF+WTfh5ifU9+1o4TEj4PvMgh +bduYVA9KHvy1W/uMG0f328zDlX+iNSZoUr9ieOJqY/w+eyfiz/LEy7ptjy5/ +zif9njjFq1LzzrMl/Z5YuMhoUKKVCt8TA5r3/1oku0L374lcDa3HkjhVv/HE +oFkGKVtYxL/59/fLTqe5phWQfi+MH593PZqxifR7gRt+bKwRcgnfC8ahSRfH +vKN84njhQ/+RjV+HUzwUXijW0cm4/foK6feC9s3ict58lX4vNCne7B0yawfp +94Ibb4g0f+wpwvfGjZQ//j0qukj43ki/oGfmNpXigd/nFTEri/NIH8cbe3py +hE9uFZJ+b4SZP+h+7xNP+n/bp24vmTaK6k/pjdbnfTu4Q4sJ3xssRqo83Jji +wfDBnEgv7hMx8Wf5YOIZyylZ9mdJvw++nHv4rap7H+n3wbLxnlafDKmeFT7Y +du/COoOC84Tvg/5WHe0vVqvmhQ/uR0b8fdeU+Df7YEeZVoS8QZV/vii64TLI +3+4A6ffF0W/zjSeG0HyGLzaq3Wqf4kn1wPHFd9HkC2w/4qvwxehcvu3yH5fp +/n2Rd+O446vV50i/L+IsO7cP2XiI9Pti85P4rUl7DhG+H0KaTm05p32O8P0w +fvT6Czkxl+n+/dBW/yLm31KyOX5wsj28xPcSfa/wQ3eSeuS+4nTS7weJbddq +w+BUwvfDGcO7xpGvKB+a/VBxIkfUr4DyieGPLqdncy0iiD/LH7ylTl85U1T1 +74/MtcF7LI/QPOD4I/2U8ZpJG5MI3x+fupYZ2J2lfE73x8LWlLfhjyiflP6I +zrm8ycSM+Df7I6RErD9lK81DRgA6p5pbmwkpnqwATC1uyZznuJfwA9BwZ+cJ +3Z1Uj5wAVLvP9HQfSPNaEYCkf1OnhnSSnvQAiMdoW7U+If7KAGw99L7w+uxM +0h8A42jW0GEDthF+IL6fP5zFqqT5xgpEa96R/j+Mqb8iEOd+1fx5OucS3X8g +pD99ddv+onxTBMLLuYo36nkW6Q+EZXTuwpaXEsIPxOXuhKUHtucQfiAOB5l/ +KuddoPsPgkPnbJ8zHOLPCoJOUb/q1WHnSX8Qesqem46MovnICcLO+gtT3B+y +CT8Ihxw9s9exqZ7Tg2DQOabNKJH4KYMwUqgx3Hwk8W/+/XvHb3npXaNzRjAe +MguOJDBp32UFo6LqbN0YzQDSH4zQgZfi9aacJPxgGNXYrK++SverCMYI+4g0 +/VKKR3owGiqPSWL7kD5lMFgnjtYsSlDpD4ZFZtSrx6/DSX8IhE8m+TC+nSD8 +EATuyIw1+kT5jRC4pK6KNvGlfOKE4PMXhlHiggukPwRBunfXZvSj+KWH4IXI +LLZ89g7SH4LZMdPyGI+OEX4IGixGKH5qU30yQrE/P3XonGHEnxWK+L1u/LnB +xB+hUI/wvzTT7wzpD8X3jFMPxi2PI/2heP3q2CROaQbhh4LXMUf2fA31F2Uo +Nvt3anTlUD41h+KDxtjkzQeIP4OPrjl9w/72oHnC5ONEWVBpRjLVF4uPZNbs +uDc2R3rxDPk4pMNn7duk2vf42KffV8t+FfVXNh9DflnYuJURfw4fn5v6943u +X9Br8/n44SMOPyBV7ad8/Ff9I26DflovXjwfm3ICcutPqOqZD/vGkx2TnxHf +fD62Xho1t6GRbCUf5mGuWW+O0ve1fAj2Cd3NltLvNfNxWt0qV3Mo4bXzkeLn +PMG7huqZIcCy5LY2YzHxZQpgFv08uK6LbJYAJdPOtjxYQHoNBdC5nOSk++Mw +6RfA9mMnz/ULvXfYAiypMNE3/nCG8kWAiKcHE4P7El++APM+3tZapabanwTw +FI5/4XKH5lm8ABt0Uvy87VTxFKA02c/8xzXqR/kC3M9urt9lqtpvBPjEtKvI +3k31WitAYU1kw3QN1bwT4KLvdCPZBppn7QKEx2zTNJ9E+cgQYvmX6y5fsmk/ +YgpRtOPJ/G2KHIq/EBcnGh2/oU71aiiE88pGdbcJqv4kxJyU5h1/PKF8Ywux +uFEwcEkT9VOOEF+7NR5lmGym+AuRWaL368W1UxR/IcBtjM+JpXqOF2LeDMtN +tVrEP10Ih8S/3LjOVC/5QgyTjAoPSKV+qhQiWXPBHi0HH4q/EKUuy8okDNqP +m4Wo3Br414LB1O/bhVj0B3tl0EjizxDhXPJkwfh6qnemCMNc6qVXLU+SfhGm +H2bUGCy2J/0iXC7wkDFNab+ACD3WFf6OYcSPLcKIjwaKcX2JP0eEx0Xc1VhK ++vgi6Nozi03aqZ8qRHBujuwjuEDv2XgR5hwzHLE/iPpRugiTXnIl7a10v/ki +2D/uZ3mlTZX/ImR/kGaW5JK+WhFeVP9XnhtL/bRZhK/clsSbK7aQfhHOpz1+ +8/6gKv5i5Ki3Pnqv2neYYiSvnzFxcbUq/8XYW2rctHEk5ZehGBqawaUDdFX7 +oRj6auunX5seQ/rFWDlgRvyIcspfjhgW3zMiF1+g/OaLMWvte/Vt2ar+KYbt +6HUrnUIov+LFeHD93XRmvqqfirHAfWdROiOB9P+2tzIqW2qoHynFWJvhml8/ +huqzVowxn6/0F4cT/2YxIjf4RS4qJ/7tYmx/asa20lLVvwRqA3f90fSa9jum +BNpHFp20GP43xV+C0V63Zh0Kov5iKMGZ2yubvqwi/pAgYaVR+YDRZLMlEGqZ +Ls69R/2UI4GJbdjV8pv0fuJLMGt7kKcVaD9SSPDZvNs0qZT4xEvgsr/t4tsR +xD9dAoPw6HlxzmTnSzBRp7lQbS/1U6UEwXaMzNcn/ib9Ehzfvqd1hv8+ir8E +O4seZuaoEZ92CTbW/Ddm4R3V/JXiUY5Qt+gg8WdKcYOd2r5wCcWLJcXQsIKl +LYtovzOUYhnXykR7ZzzFX4rKbO/b1zOoH7GlODp52ID6KLpvjhRblvgssW0g +/nwpZpZ/e631juKlkOJqX7tzIj3a7+Kl6CcXdTQt2EXxlyLxfu6fQVPovZgv +hV7hZ48k1f6j/I1n/uW5WX+q51opCsqaROIkqpdmKfwbxbo2Q6gftUvRFhXb +0m4XRfGXIXZZh+mKFHrvMmWY5zDqjd89qleWDHHVJausZ1E9G8qwz7ouYaIJ +1fvv1/ag6NBn2m9PkH4ZqhoiTu8sFFL8ZcgLM7V3YdB+xJfhXW2NdKGI6lUh +Q1s4o9LRhvjHy7B6+YGUplrqR+ky3DFJrN1dTvtdvgwLPEwHXnq3jOIvQ4eO +Muu8G+1HtTKw73fqfR1M/JtlMPdlds31Jf7tMrhbWPrs9KFzhhzvFz89NyuN ++hFTjndqcknWrEDSL8dQY2+2/5lMiv9ve/Ra+e5k1X4kR8vBuT8uy4g/W46s +swvSmjpJH0eO52PVBAeDqB/x5VDb0KLp/iac9MvRUyeSxnQep/jLod8dF/Vs +At1vuhyOEwxyrkQS/3w51u6SlZ2OoPxSyvHqRuYKznzqR7VyFARvtjc1UL03 +5ZgTUyGfZ3iM4i+HvPPk8LZU1ftrI5boBl4ZHlm8+H/ezwdf + "]], + LineBox[{{0.6662854673666803, 5.717989499794946*^-6}, { + 0.6670485244738535, -5.727867107803616*^-6}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFWHk4lOsbnpOydNQRjjqRREratFESd9ZUGFuW0Axj32Y3KhpFqaShTSpb +ezlCSStzsrUQWmQph/a0nqI6p+3XdXnm+rn8c1/P93z3fT/L+35MCI73CFVi +MBhZvzAYP38ZQxj//1mjXeLUu3qnzSB6ZzOIU6spDDVTvQezny0lrIpvuWFt +pp5OhDXw+2v5X5P22BLWxkGX5yzPHZaEx2CvuXphnJYZYT0466uz7efpEjZA +QM8ztUDtTutBbIh+SZqbOUeb9EzEfMYvMbtf6hGehEmjPX4dI1NgE9xt/CDr +q/2dsCmGBbxI/aKjQngadP3K73RV3qD3z4DvLKWsXs8fVYPYDOtygkOLlIaT +nlmA9bdMMxd1wrMRE5B+rT1WhfAcmKe1JLVzv1D+XOw85nTxe1Er4XmoXDss +p8X5HfGZ49WN8yz52O+ELWCTeG3RopW/kL756B3h5XTOShFfAAedJhfdF+8J +W+Lh/Zkm0+e1El6I+pCIoBMrHhGfFVRas8SM0g+EFyEbt6Jk8k+ErfHD03zk +2PUDhG2wRCIvGmC+IgyUa6m1aGu2DGIpcMF0jNvjPe3Etxh7u/u25594OYil +i/GIbVKSEvQPxW1RmldeNHox+ZXaorfSalGzz1OK26F6ckiKWk0Txe1QdT3o ++Yq5xMewh+l6zzXHAh8Tvz2e5zFHTs7so7gDPs6eqTli7wuKO8B6/8FRXMeH +FHfE4UXlyzxkNyjuiIi51QHFB+uI3wlnSt+vPjnQTfxOYBQftlL+8JjiS2BY +Xziu+Aph6RKEfnztv6WEnmc4o7ZSvFIl5xrFneFfv7q17cwl4l8KzQ8HdIO0 +2ol/KaROsmMn+noovgy2449cqDTvpfgyVIVbhQ2z66T4cixsHN65ua2B4suR +ujJ0zjhxOfG7YPWvXzu6VG8TvwtmTa+u397cRXFXmFW/Kdyh9oDirrhv+uL8 +odY2iruhK9y257p9PcXdkHbZUKD1xxHiZ8K0PfRkuejmIAYT+/1jIrun3yM9 +TFjn82zabpE/ORNjq0JywzTuUL47kkt6plZ11VK+O/6e9Wj6TsfdxOeORsmR +2Vt2XB3Ecnf8VqDvp5lOfhgeyHRIn9couDuI4YH4NunI7Gaad6kHRBXjPWx2 +1VC+Bxo9su6PsEwgfk88z1YK/vy2hvg94btFLX1CrmKePcFetbaKceYW6feE +1/R9mWbdzZTvhRlXKhpmxlyhfC8scvpWJ2pfTflemHZ70vHA+XLi98I8fcM9 +3dGNpN8bu3ubD12NaSH93vDn8uNDyigu9cb4G3vsVgb8RfneKGxp6mhaLqP8 +FThdK+nQCr9A/CtQ2RUjSRJfJf4VWLO58F3ZsCbSvwKlvXoG3Z+vkX4fNHdm +T2IGyynfB16rGM9KivdQvg9OG6Wq5fMqiN8HKYXqB9uMFfvhC5/w+evu19J8 +wxd1fgv+sD/QQPp9Uaj3S4DwYxXl+2L9q00NE/wOUL4fXo0vWqDvXUb8frj5 +SeXASx+qp9QPwrg076Z/60m/H1Knyn7obKsj/f74b/kEm43OlynfH0rsk6tn +dxRQvj9UTDbpaN44Sfz+KHfp/Jb+tJr4V2Lmefuc2Mxa0r8SbtPbp36/QPMi +XYlr637M+XD+IuWvRFn4cE8jaRHlB0Ap8nWrrhLtAwLAszc58OrqReIPgMNY +i8gGHvmRB8Drwb4j+XqEGYF4zfketNpe0b9A+LQPGO6/dJDyA7HeS79Cf3wh +8QciksUKfTv/HPEHwXujuV7RbpovBOHBmdeX7h4nLA2CdUX7xsCn9Lw8CKe9 +q1oyDh6i/FXIZi9OY77ZS/yrcM/iYUS/fgXxr0K56jQnnSdUX/nPeIi6pe25 +KtLPQsmF/nVLDlQOYgMW/Hbji73DYXofC0Ny1Ti+97IH+Vgs+Oquz50XQeeT +lIWOHUXGrv9dGMQFLLyTjXi1MeAS6WVhR+WFhkXhZwdxDwuvrSyX55ccJv1s +7El+trZz22biZ6PYeXti7rBS4mdjxc6k/rBV5wYxiw1uZH7WSwuqt5SN3iYL +o0225LeAjfem18a1vyD9cjYe6d75bbV7MvGzsX3DqB9Vd2meGMEY7bBN2VuN +9BkEY9/ZPGWOHdUbwRAsLPQ7Pv0M+Q9GTc7Mhik/SL80GLs++H4Z3R9B/MEI +dw8Z9Ur3GPEH44r+5Oyvb04P4p5gJLbHbtdOPEv1D0Fw5h0//8kUNwjBSKPv +QzGgqH8IIva5t6pfdiT/IZiU97l+TBP1XxqC3/3Hu11XpX4UhODyRwsd7Tuk +Vx6C1NYau8QZFO8JgfvpIY6ZrYr6cxCkVqd3/0s8+efA3OxYWWhXIfFzsHPb +vBIOk/rB4kC/ck+DFZP0Sjn4bwzvjYot7X8BB/YR7gOyHEX9ORhwc1R1sV9D +/jm4u2bbbh9xHvGHoi5F27lb+ifxh2JXu4+7Sl8Z1T8UNatG7DNml1L9Q2Hq +ejvsh4ui/qEo+zNvhI5oPfkPxSWnmfsM6mgf5KGQ7Gu9U3HsBPGHQj85aXRc +HvlhhGHY1fqZv+ucovqHoeTxc877/kPkPwwOx8bMz83eSP7DoHryqAErexfx +hyFpjrR8g8Yx4g9DMsutt/huCdU/DHe4rY5qyeSv5+f7codbDZEp9jcca/yP +RKWP2kL+w1HSZ8I935xF/OG4lef5OauM6skKx2ft+d+/7i2m+v+M7+Pfefb5 +JNU/HMOPjPUNmkD65eFY0L/hdtSwbeQ/HB2Wp0bn9WYQfwQcHNdoaW48SPwR +CNbZMOdB2gmqfwTUp8UPy1Jg1k9svebfv0/Q89IImMp6TTXWbSf/EWjrGl/W +eZfqJY/Apr+YTz6m0zz1RCBkZ8anzl20H4xIXIryzGMYHaf6R2LXam2jP2bQ ++YlIOH8oLFtXLyP/kTgIS6+tkSnEH4lYdrJWcXQ+8UdiQp7A4XX9Eap/JDTs +b4YvbTlK9Y/Er4HVe1nFivM/CoVdtqf7DmSR/yiotymVto9JJP4oGEtaNhwY +tZ/4o6C78EETR4f6IY3CxqWnjPdk0P1REIUzZjk5XZOKyH8U+KmymiXLssl/ +FDyMijriWVzij8bI86blfV9ziD8a9X2cF90pVF9E46jgOsPQh+adFY0Jv147 +m5ZH94k0GnWbGnWjbtP5XBANTvzbl5ET2MQfjWdRFxemTt5N/NH4s+vpX5Yq +pI8Rg3neW5nmM2leDGKwuVYYZKGt2P8YjLo6K3Sz5Q7yH4MFW91VpOYLiD8G +qkH3JcoZO4g/Bn9ztRxlhwqo/jEYn7T7zHRt8tMTg8XMOv2T6RRnxOLZ29lm +7FTKN4hFcVHS6Z5iD/Ifi07XiV2FxrQPrFjkKO80ci/No/rHgtlVyosbRn4K +YmF8MMt46L/55D8WczXOdC46Q/p7YhHwsNt6SyKH/MfB//DZGSN7thF/HEo2 +dox8i/3EH4elW2JUooZQvVlx+HjztPb2Hjq/pHEwMdm4Xb1J4T8Omrqj/PrZ +ceQ/DlZx0rbim3S/9cSBMd/w6rTPdD4x4vFkwduBfcPpe8cg/ue+yGY9v3qA +6h8P1ZDIp+GtivrHY4IbM+r9LgH5j0daevVjQ42NxB+P5MdzHZNv7yH+eLg3 +2vqNWkh6e+LxZ5Dlsp5y8sfg4p39KVlRDenX4CLS4S8EShKoHlyMrz0ySz9v +/SCfGResIV56WS27SB8Xa22zLRJFtB9MLvTKraZNy99HermYkhQQ2XKY9HO5 +MDDUnnnykeL7mgu+atHiuid0P8u4eJTWfN7htaKeXFhY6V3dXZM7iEu5+HIr +xS4ik7CcCxvvLzNuJtLzLVwE2jVrzX2YRH65aFjn9omrSfv8jgv/yddzj0+m +fWTwUMTn2ORNpH5o8GCuEinXTSFswMOKqeMNliwm/WY8BO/oViq2lpJ/Ho7x +r6deOCcY5GPycKTvN/v3SfR9z+KhtfbJhuY91A8uD7b3uxZcTKB9l/KQ+lLv +ePU32l8ZD2F6zLtNQXS+FfDgtfejTWd+7CBfKQ/LRxnd/ec+nedyHny1J2uJ +9Gi/W3g423Hlwwk+ff/38JDfMdZZVkp+3/GgnxK/nOVN/WTwMTzm5X9jCzjU +fz4cbIb6xb5V3Ed8fPIervqobOcgNuNDKKm4BT79fQc+dnp0N33wJ/1MPuS3 +LzNfG28g/3zMUq9dNqbBl/rPx4p/3masN0un/vOhqfdjkdiH6ivjI+vfV8Pr +xTRfBXyo17sylL/T/pfysU7ppV7Z7Q3kn4+iBcKRp/h21H8+HoeqhsoOpFH/ ++ehaFrJthzrpe8eHyrUFuyRS8sMQYGGt1b2GXDr/NQTQP9a1rIidSv4FsEg2 +cHmhYkb+Bfg7y85+4lzihwC3Rj8ed7SF7iemAG1aD/kZ2xX7KoDxLY6t4WzS +zxVAy2PdY8mtVPIvQMk3qXJfCpP8C1ChvSlj4B8p9f9nfpljjpMj3a+lAryJ +a26Ydoj8yAX4s6li//NamrcWAdTtx24+Y6LwL8CmLNmG1q6V5F+AM10a0TXH +k6j/QqxbuhXDVGieNISYNcGidW0V6TUQYp5m4q1OT/JnJoQspPN5YVga+Rdi +aXV8pHxUCPkXYmh0SmlrRSL1Xwhdx6ojqQ9pnrhCmL9+ejmnm/RKhWDv/W+r +azX5kwnxXKNu26pM0l8ghKbhLv2yinDyL8TXiq/W3kPF1H8hwi701zTdo3lq +EaJxXEbM7qGkt0eIN/eTP7W3ZtL8C2FipDnuYSHpZ4iQyDWf6vIwmvyLgCE3 +DRqy+NR/EUxmrPJ6/4TOVzMRlFrMJ6uzM2n+RbikHzRVpLg/mCJ8+Oec3uci +0s8SQdkVltn59H3NFaHFPyv5REUc9V+EkDkvJ49QJz0yEUyVu08+qc2g+Reh +gf/bkimvCJeK4Gpr5uqyg56Xi+Cd3vTLmtU88i/CK0PHSZfORVD/RXAuZaQt +dqZ9fCdCxNz4bfVzt9L8i1E/YnPRowHCGmL0WWkUxwpJv4EYz13PNZ3rp3qY +iTHxDWdnxyTqN8Ro0XPdd2F/CvVfjMdq7y6fLqX7jiWGTlxT19rvW2j+xaie +76Fz1Yn0S8UIqFG+WrdYSP7F8PlQz7zXT/NaIIaK3b2hJ4fRPpSK8e1+d+OJ ++ek0/2LkjbCQn1em+WoRQ++OfWXpSMX8i3FerSeplCMi/2LctKswcQvwoP4n +YApCjuYo0z5oJOD7uXEHixrp+9UgAbOXSQaW/0Z+zBLQ4PZ0Ssh12l8k4OZF +6d0VLJpHZgLaJKdmGPfbUv8T8NZda8XlKaup/wnIVq2cmhFD+qQJYL53TWof +Q35kCbi23SRy6Fo6fwoSUNHGPR9pQfdxaQJW9eh0NDtrU/9/vk8jppYpoP+H +tSTA1qXzpccY0teTAKULf2i+NdpE85+AJycKMg9NpDhDAuuu7+HcV5SvIcGa +IWbs+LkLyL8EKUdT2S97hdR/CVyCxmY8aKa/tyDB7omN7N9n0X4wJRhpsyQM +dYrzX4LlmjLejRQJ+ZeAP/dow6pNS8m/BI7f+mvNhHzqvwTC3BKvkTtongok +uO5pPLUGNC+lElQ2W96/EqQ4/yXo3vslrvJfCfmXYEBs7778qCf5l6B31nzj +ZhP63n4nwft5C/Nq2DRPjEQErs8AxzPV+n9eK+j6 + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxFV3lYzGsbHmTLUkhkOSZyDllOSdJ+lyhKpgXtTdO+zz6DlrFkyVKK7JQl +0ioiWw2SNW0HIZUtlCXUKdHxua6e3/V19c99vb937vt+n+V9Xm1etHNgPxaL +tbMPi/X7n9WX9f+/NRp5ti9Wb7DsRW2WvVhcSsso/jb4iWycKeFBmBZWNyUo +x4iwOnabVYpM+hoQ1sCNlNefZnFnEB4LvRVPn7/LYxOegODCXe+NhEMJs+Gg +McdCW37PohdPhsGwQwc4x/qTHh1wJ8xIOtYynPCfmNzP7IfKDQZPw+i+OSYZ +hwcS1oXF4JaGmebf6fdmosr4sZHGxhLCs3H3eHZGPvdLSS/WQ632d2/7UT2E +9dHJwedBDb8Iz4HuT3PbytRuwgZwXJ2iNtnrM+G5cLs4PcnMsYywIbZujp+d +9Pol8c1D0YAYx3tpXwgbwWX4yGnFUe2E5yN2EbfO+BOzboyY02tDbfY2EzbB +uJ76p2nnywib4p10wu1k0WPiM8MprZnuQcPeETaHVLhf9V/Tj4QtkLHeKsor +u4WwJVyC7b/l5L8gDFyv6GOfaEz6FYCJT9RBzuxK4rNCvsp5X072i16ssMJh +I0Pcd2f0WeP8yt2reCPf0Lo1LvjPPG83+zmtL4CFh/fo0F03aH0BHH9uCn6y ++ibx26CkW7M7as4z4rdB4/eq+p56Rt9CnKwUcD+5EVYsxHkV//1W7XW0vgh3 +rKZ+E3Vcp/VFKDFakGPXc5X4bREyKmVHw8GHxG+LsrqBRokyRp8dAq893Tgr +nLDCDgZr3rF2N9P3rMW493L7kazg67S+GPt3u85n3T9H/EvQldXlHZxSTfxL +UP2wMi2jidFnD82fg1adVzyhdXu0fJqouWhfLa07oOKAbssfH67RugN6GnTW +CjuziX8pCta2by4cWkH8S/E3J/6knh+jzxEJwnsS7dhHtO6IX1OvjnhTUU3r +y7Cvb/8H49deo/VlYG+d0V0Xn0H8HLweuc6g2+F2LwYH5app7dYZNaSHg6C/ +rEMytP7pxUoO1tVdncLyqaL9TlAVFTou1SH9cML9uxOe+wpSiM8JOl3PB5XH +U/4qnbCr5r7hgdAq0ucM42GffKZPr+nFcMZ/ruY6oX4PaL8z9L0aciS1Strv +DHn9p/nfx4mJ3wXL90x/9IXH8Lsg0hkhL2ZUkH4XjOKm37i/nfQqXTDsvv5A +adh92u+K5z/HRx3apqT9rtgyuGj0bns57XeF/Vgj1tVUyielK1LU/uONGH+X +9C/HTPYDh+ZA0ovlKJu0wKa0lNYVy7HsR79ELUdG/3LodG7pltXtoP0rsO6M +V8VH3YvEvwLjbQsb+8TdIv4VcPvIi+inQXqVK9BaeWyrnHOH9K+Evf1/Xes1 +Gf0r8cXsaYwkfA/tXwnfH9e/dPoUEf9KuHuM2XfA9Cbxu2HnZ7/YM+qkF26Y +OSq5apH6bdLvBtdnYcN4d0ppvxuuqVw8tNrjMO13x4aBDy4uUCskfnd8rtui +7m51g/jdkZ/2uHwKk19Kd+zVLYx/0VFO+j3wrjvrx+LoUtrvAZW5/CGfjI7S +fg9seuj8/v2iPOL3QPYEn2o7Jp9Znrj5fVM091I56fdEXvovt1nd5E/hiUHN +yjjNiYx+T3xvTT2xtOU47ffCosrj9oNGZhG/FxZeujxv9QvSo/BCUcabMTOd +qV8pvRC5s//+o2OY/uWNnPSiJ97VJbTfGy9Wz6jp43qS9nujtiwpytqf+JTe +sHCLj6oazvQnH0g5r+OWDqX6gA/WT55r+GoxYYUP0hY4dL9PpPtL6YN9n9ep +TV2bRft98bjg9PzZOunE7wsZCk/Gxl4ifl9c/Zdlr/qK+qPSF6lewvX87RQf +FhdLXw5g5duRfjYXoduGBuqtyabf4yLm1VRf9Y17e/m4XIwNKnQeMaWY9HEx +cJBrzZ1qikc6F1r1aiOljdQvlVxwzAKybwwm/U1cOG6cZJqxOJf0+0F4fLTv +DP+dxO+HwoK/StidRcTvh+Q8q3PV/1B+c/2w33pm81Fzpt/7QRTaz8mz4mov +TveD3eziIYKveeTXD35xK3RcdyYQvx/ajzt0VX89S/w8dCvicqfVUH6weehs +zno8NJP8gIctW7V+KVMoXlweyqUOO+aZF5B/HnYEn/o6KUlI/Dzw4ge3blCn +elDyEDqppc/YsXS+TTxcuZGgOX4M9SuWP641JO9ycSf9bH+8rt7w9PLXAvLv +j9O8CtXAPCfy7w8zc/2BKfYMvz/6N+3+ZS67Qufvj1xNrWeSJKbf+GPgLN09 +69ikv+n39zbZB7wOnCH/ARg3Lu9WAms1+Q+AX+yx0frIJf4AGESnXtT4QPnE +DcAnlREN34dRPBQBKNbWzrj39gr5D8CkO8VlvPmM/wA0Kt5tHzxrE/kPgDdv +sLRg9GniD8TtPX8+OSq6SPyBSL8w1dR7CsUDv9dvJtoW55E/biC2decI6+8W +kv9AxFg97voYlEz+f+PT9yz/Gkn1pwxEy8u+7X5Diok/EGzWXnmsAcWDFYS5 +8QF+9WLSzw7ChHy7ySddzpL/IHw7V/ejomsX+Q+CzTh/+y96VM+KIGx4eGG5 +7pnzxB8EFfv2tldLmPsiCI/i4w7+Y0z6m4KwqVQrTl7L5F8wim57Dgx13kf+ +g3H0x3yDCVF0PyMYq1Tvtk32p3rgBuOn6I8LnBDSqwjGqFy+08Key3T+wci7 +fdztzRKaT5TBSLLr2Dh41SHyH4w19cnrU7cdIv4QRDWeXndu0jniD8G4USsu +5CRepvMPQWvNq8QnJYS5IXB3OmwZfIm+V4SgK1UtfldxOvkPgcSpc4le5F7i +D0G+3j8G8W8oH5pCcPNEjqjfGconVig63V/Ms44j/exQ8Ba4f+dOZuo/FJnL +IrfZHaH7gBuK9NMGSyeuSiX+UHzptNF1Pkv5nB4Ks5Y972OfUj4pQ5GQc3m1 +oSnpbwpF1FXx9Mnr6T5khaFjipWDqZDiyQ7DlOLmTCO37cQfhtr7m0/obKZ6 +5Ibhgc9Mf58BdF8rwpD6ZO+UqA7ykx4GscYk+5Z60q8Mw/pDHwtvzckk/2Ew +SGAPGdp/A/GH4+f5wyfZ5XS/scPRkndEpceA+ivCce5X5ezsnEt0/uGQ/hes +0/o35ZsiHAEeFbyRL0+S/3DYJeSaNb+WEH84LnftXLBvYw7xh+NwhNWXMt4F +Ov8IuHbMCcrnkn52BLSL+j1YEnOe/Eegu/Sl8Yi1dD9yI7C55sJknzoO8Ufg +kJt/1nIO1XN6BHQ7NFr1U0ifMgIjhJrDrEaQ/qbfv3f8bsDU67TOikSd+pkj +O9Vp3mVH4mbF2WqNMWHkPxLRAy4lT518ivgjoV/puOLBNTpfRSSGu8QdmF5C +8UiPRG35McmOPuRPGQn2iaOV5jsZ/5Gwzlz75tnbWPIfBWH9xCDWjxPEH4Xw +TZk79L9QfiMKnnsXJxgGUz5xo/D1G0s/xeQC+Y9ChM4/yzL6UfzSo/BKZLqj +bM4m8h+FOYl/5bGeHiP+KNRaD1f8N4l5P0Rjd8HeIXOHkn52NJK3e/PnRZJ+ +REMtLvTSzJB88h+NnxmnH49dmET+o/H2zbGJ3JIM4o8Gr32u7OVS6i/KaKwJ +7dDszKF8aorGJ83RaWv2kX4WH51z+8Yc9KX7RJ2PE6URJRlpVF9sPtLYc5Le +OR7p5dPj45A2n71rNTPv8bFrel8tl8XUXzl8DP5l7ehdSvq5fHxtVOmboHKm +F/P56AkSx+6TMvMpH/8+6ElaOf1AL18yH6tzwnJrTjD1zIdLw6n2P16Q3gI+ +1l8aOa+2gbCSD6sYr5PvjtL3VXwIdgl9TBfQ7zXxka1mnztmCPG18bEnxGN8 +YCXVM0sAm7TWVgMx6VUXwDThZWR1J2G2AFf/Otv82IT86gmgfTnVXafnMPkX +wOlzB8/rG713OAJY3jScbvApn/JFgLjn+1Mi+5JevgBGn+9pLVZl5icB/IXj +Xnnep/ssWYCV2ntCAp2ZeApQkhZi1XOd+lGBAI+ymmq2GDPzjQBf1J1vZm2l +eq0SoLAyvnaaJnPfCXAxeJq+bCXdZ20CxCZuGGM1kfKRJcTCb7c8v2XRfKQu +RNGm+vkbFDkUfyEuTtA/fluN6lVPCA/bBjXv8Ux/EmLunqZNf9ZTvnGEsGgQ +DLBspH7KFeJ7l+bTDMM1FH8hMq9O/fXq+mmKvxDwa0jO2UH1nCyE0Qy71VVa +pD9dCNeUv739PKheCoQYKhkZG7aX+qlSiLQxJtu0XIMo/kKUeNqUSlg0HzcJ +Ub4+/G+TQdTv24Qw/5NjGzGC9LNEOJf2h2BcDdW7ughDPWuk1+xOkX8Rph1m +VepauJB/ES6f8ZWpG9N8ARG6HW6GusWQPo4Iwz/rKsb2Jf1cEZ4V+S3BAvLH +F0HHRb3YsI36qUIEj6b4PoIL9J5NFmHuMb3huyOoH6WLMPG1n6Sthc63QASX +Z/3srrQy+S9C1idp5tVc8lclwqsH/5bl7qB+2iTCd7/mlDuL1pF/Ec4fePbu +434m/mLkqLU8/cjMO+pipK2YMcHiAZP/YmwvMWhcNYLyS08MzTGRJf11mPlQ +jOmqK6Zdn5ZI/sWw7T8jeXgZ5S9XDOufGfEWFyi/+WLMWvZRbUMW0z/FcBq1 +3NY9ivIrWYzHtz5MUy9g+qkYJj6bi9JZO8n/b7yeVd5cSf1IKcayDK+CGg2q +zyoxNL5eURHHkv4mMeJXhsSbl5H+NjE2Pjfl2Gsx9S+B6oAtfza+pflOXYJJ +R8xPWQ87SPGXYFTA3VmHIqi/6EmQf8+28dti0g8Jdtrql/UfRZgjgVDL2CL3 +IfVTrgSGTjHXyu7Q+4kvwayNEf72oPlIIcFXqy7j1BLSkyyB5+7Wi++Hk/50 +CXRjE4ySPAgXSDBBu6lQdTv1U6UEkc6szLcnDpJ/CY5v3NYyI3QXxV+CzUV1 +mTmqpKdNglWV/2qY3WfuXyme5gh1ivaTfnUpbnP2tplZUrzYUgyJObOg2Zzm +Oz0pbPzsDSdtTqb4S1GeFXjvVgb1I44UR/8Y2r9mLZ03V4p1lkGWTrWkny/F +zLIfb7U+ULwUUlzr63xONJXmu2Qp+slF7Y0mWyj+UqQ8yp0dMZneiwVSTC38 +6pvKzD/K33xW316aqlA9V0lxprRRJE6lemmSIrRBrOM4mPpRmxSta3c0tzmv +pfjLsMOm3XjRHnrvqstg5DryXchDqle2DEkPri52mEX1rCfDLofqnRMMqd5/ +v7YHJkS/mPT+BPmXoaI2LntzoZDiL0NejLGLJ4vmI74MH6oqpWYiqleFDK2x +rHI3R9KfLMOShfv2NFZRP0qX4b5hStXWMprvCmQw8TUecOmDDcVfhnZt5cnz +3jQfVcnAedQx9fsg0t8kg1Wweue8YNLfJoOPtV3Q5iBaZ8nx0eL5uVkHqB+p +y/FBVS45OSuc/MsxxCCQE5qfSfH/jUctk29NY+YjOZr3z+u5LCP9HDlOnjU5 +0NhB/rhyvBytKtgfQf2IL4fqyuYxPu9iyb8c3dUiaWLHcYq/HNO7kta+GE/n +my6H23jdnCvxpL9AjmVbZKXZcZRfSjne3M5cxJ1P/ahKjjORa1yMdZn3phxz +E2/KjfSOUfzlkHecGta6l3l/rYKlTviVYfHFFv8Djf8HWQ== + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, {}, {}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 400.}, {-5.727867107803616*^-6, + 5.717989499794946*^-6}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"100", "200"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + 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 -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800161904398321*^9, 3.800161937427348*^9}}, + CellLabel-> + "Out[178]=",ExpressionUUID->"1b28833d-960f-4f1e-bd91-35c66e2df63f"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsubsection", + CellChangeTimes->{{3.8001635262839327`*^9, + 3.800163526649042*^9}},ExpressionUUID->"795da5c1-b4d6-459c-98d3-\ +232c1d1c121e"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "2"}]}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", "\[Lambda]EP", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "5"}], ",", "5"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "5"}], ",", "5"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800953143821064*^9, 3.8009531503518248`*^9}, { + 3.800953234001981*^9, 3.800953419023226*^9}, {3.801195145159924*^9, + 3.801195153170494*^9}, {3.8011966403896637`*^9, 3.8011966475687237`*^9}, { + 3.8011968847881403`*^9, 3.80119691773741*^9}, {3.801213356647634*^9, + 3.801213359388258*^9}, {3.801213406959877*^9, 3.8012134092508087`*^9}, { + 3.801213951171216*^9, 3.801213957059557*^9}, {3.801638411530686*^9, + 3.801638439646798*^9}, {3.801742731581962*^9, 3.801742732812155*^9}, { + 3.802680699461314*^9, 3.802680749968492*^9}, {3.802680782872319*^9, + 3.802680796219284*^9}, {3.8026820855491037`*^9, 3.802682102103631*^9}}, + CellLabel-> + "In[159]:=",ExpressionUUID->"f7ea65c6-0702-443d-917a-3271c2330626"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + "18.02124777863211917827625400380607579701`28.795880017344075", ",", + "18.02124777863211917827625400380607579701`28.795880017344075", ",", + RowBox[{ + "2.4749706819633279265679774726575098125069179300034134082877`29.\ +397940008672037", "-", + RowBox[{ + "0.2498677443735087582690633046387563943249128959610923525891`28.\ +7528799184576", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.4749706819633279265679774726575098125069179300034134082877`29.\ +397940008672037", "+", + RowBox[{ + "0.2498677443735087582690633046387563943249128959610923525891`28.\ +7528799184576", " ", "\[ImaginaryI]"}]}], ",", + "2.3120855547012141550570793243087491195083618995901130361919`29.\ +397940008672037", ",", + "2.3120855547012141550570793243087491195083618995901130361919`29.\ +397940008672037", ",", "0", ",", "0", ",", + RowBox[{ + "0.6293234521073200803021008703752068737735482157756315498601`29.\ +69897000433602", "-", + RowBox[{ + "0.4284051806805184304328050771882186363876990867973406719195`29.\ +69897000433602", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.6293234521073200803021008703752068737735482157756315498601`29.\ +69897000433602", "+", + RowBox[{ + "0.4284051806805184304328050771882186363876990867973406719195`29.\ +69897000433602", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.0143294712593505317676900043244304583231858602756846829856`29.\ +397940008672037", "-", + RowBox[{ + "0.0581775140082001562602129090422371631297254229019887938953`28.\ +7161942760436", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.0143294712593505317676900043244304583231858602756846829856`29.\ +397940008672037", "+", + RowBox[{ + "0.0581775140082001562602129090422371631297254229019887938953`28.\ +7161942760436", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output", + CellChangeTimes->{ + 3.801213411410056*^9, {3.801213952536911*^9, 3.801213958102577*^9}, { + 3.8016384143675547`*^9, 3.80163844069832*^9}, 3.801742733392355*^9, { + 3.80268070502809*^9, 3.802680720937169*^9}, {3.802680755926688*^9, + 3.802680797048483*^9}, {3.8026820893927717`*^9, 3.8026821025649233`*^9}}, + CellLabel-> + "Out[163]=",ExpressionUUID->"2c0dc553-4bda-42b8-a192-6443430e9f60"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 18.02124777863212, 0.}}, {{18.02124777863212, 0.}}, {{ + 2.474970681963328, -0.24986774437350875`}}, {{2.474970681963328, + 0.24986774437350875`}}, {{2.312085554701214, 0.}}, {{2.312085554701214, + 0.}}, {{0., 0.}}, {{0., 0.}}, {{ + 0.6293234521073201, -0.4284051806805184}}, {{0.6293234521073201, + 0.4284051806805184}}, {{ + 1.0143294712593505`, -0.058177514008200155`}}, {{1.0143294712593505`, + 0.058177514008200155`}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-5, 5}, {-5, 5}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.800953145470113*^9, 3.800953151700378*^9}, { + 3.800953236309905*^9, 3.800953419744135*^9}, {3.8011951467141657`*^9, + 3.8011951539107428`*^9}, {3.801196642343095*^9, 3.801196648233199*^9}, { + 3.801196888050037*^9, 3.801196918194175*^9}, 3.801213411965068*^9, { + 3.801213952923017*^9, 3.801213958487378*^9}, {3.801638414914871*^9, + 3.801638441081643*^9}, 3.801742733888256*^9, {3.802680705647442*^9, + 3.802680721474024*^9}, {3.802680756450595*^9, 3.8026807975283318`*^9}, { + 3.802682089897787*^9, 3.802682103090658*^9}}, + CellLabel-> + "During evaluation of \ +In[159]:=",ExpressionUUID->"ba214c55-e592-407c-873f-1d6ac2dcedfa"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "10"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.802680938846628*^9, 3.802680990985557*^9}, { + 3.802682005976615*^9, 3.8026820474382477`*^9}, {3.804568908890685*^9, + 3.80456890906907*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"a059c68c-55ee-4f41-843f-0e4beea3d83d"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8AVud2mM27mPxT7GiY7 +/AfAFroRqxls5j/ERqVcdvgHwBa7Ra//aeY/Jt65yezwB8AYva23y2XmP+oM +46PZ4QfAG8F9yGNd5j9wajVYs8MHwCHJHeqTTOY/fiXawGaHB8As2V0t9Crm +P5qbI5LNDgfARPnds7Tn5T+f34hvUQkGwLTesZvlVeU/FtBTTykVBcBYu/gd +wM3kP8hQU0TLJQTAih4oUEZI5D9IKSV0IyIDwP0mK118t+M/Oq5cps8vAsCj +JqEEXDDjP/qKZhMyKQHAi8vqhuud4j/196SVXicAwAD3HLkmDuI/xCKSNL5t +/r+pGcKFC4jhPzsFf7MrZPy/leE6LaD24D+UQDc3QX36v7GgJm/ebuA/Y5xY +5eqf+L+5zPXBkNPfP8+nHgkBmva/kqJFW8Sy3j8eDLAxv7b0v9JmeylLpd0/ +CiDmz+mq8r+WdVitMYHcP2xUhZioqPC/dZEGkW9i2z9gw9/LHpLtv7ebmqkA +V9o/Ij3+UcWB6b9/8NV38TTZP6los+G7tuW/rDP3ejUm2D9q87Fci5rhv17B +vzPZANc/Ln4FWQYj278qXFlM1ODVPxN51AuWm9O/W+XYmSLU1D/XZGwqr+PG +vxK5/5zQsNM/d3oqjsmVrr8tewzV0aDSP6qPOECkMK0/Y0rqbCqW0T+OaYHW +YILHPx5kb7ridNA/DfRMO6xR0z972LR53M3OP+B0xjR2hNs/xX3Z6bKEzD/u +uU3Cd8jhP0I9oBk4Rso/poehYGSJ5T+K2TKzYy7IPyX2qxN4m+k/2woUuE7p +xT/esh+9O2jtP/gYwSbgysM/VZfgiOuQ8D9KQRBVILfBP56ljL1MlvI/Sv1b +3T/svj8EW23tBXn0P5QxL+SLt7o/zmCpp1KE9j/wj5/BVii2P7UNGl33bPg/ +46encm7msT8mmiHoB0z6P33o50XHc6s/+naE/atT/D9d1bpTr2WiP+v6Gw6o +OP4/ymp6EWLkkz+gZ4fUGyMAQDoyPV8NNlk/kEHMjBklAUDl8oFoKmiQvw5v +q0LDFQJATGlMLEGXoL++RLi9thoDQACFHXdvr6m//W1fNlYOBEDIll8Nghax +vwEH0pkr/QRApTbs3+4/tb82SHLCSgAGQG+s29vcw7m/+tys6BXyBkCkaDME +fvq9v0RsyJBN9gZA9UU7UE4Nvr+N++M4hfoGQD8jQ5weIL6/IBobifQCB0De +3VI0v0W+v0dXiSnTEwdAHFNyZACRvr+U0WVqkDUHQJg9scSCJ7+/LsYe7Ap5 +B0BGiZfCQyrAv3hVOpRCfQdA7neb6KszwL/B5FU8eoEHQJVmnw4UPcC/VAON +jOmJB0DjQ6da5E/Av3tA+yzImgdAhP628oR1wL/IutdthbwHQMBz1iLGwMC/ +EkrzFb3AB0BoYtpILsrAv1zZDr70xAdAEVHebpbTwL/v90UOZM0HQGEu5rpm +5sC/FjW0rkLeB0AA6fVSBwzBv2DEz1Z64gdAqNf5eG8Vwb+pU+v+seYHQE/G +/Z7XHsG/PHIiTyHvB0CdowXrpzHBv4YBPvdY8wdARZIJERA7wb/QkFmfkPcH +QO6ADTd4RMG/GiB1R8j7B0CXbxFd4E3Bv2OvkO///wdAO14Vg0hXwb9GKW+K + + "]]}, Annotation[#, "Charting`Private`Tag$4844#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwtlWk41Hsfh+3/UFqYelAKkThptbSc8/0LkaZF4qgUR6EjIqk05URPsoQ0 +jaVRiERIw4yRwu+fpIkkZlCEZooGzRIxNYZOz3U9Lz7X/ea+7rcfY/+wvQEq +SkpKF37tfzzyME3y8ydGTESMO+X+1g16UwbmmxUYob+NpHfBshsatxX6nPmO +EaxC24/eFt1g3l/z8osUIyI1o2IXLO+GkdkfC97xMWK270RdnGE3hAfbeDOf +YUTysh7bEK1u+MeshwiMx4imz24WG4VdQM82pbbqYMSbAkKTW9AFuQMJYe6a +GsRYrvPcuLldsPCNx+6VJHXi9stUhVZcJ3D2eDi1mKkR6+nrnFyneeC60izS +1ESVoHneeqEazINN5T732larEPwAjXU3PnBBnhSou26lMrE+yJObt4MLE7K7 +6YdXKBFLc/o5ATUd0GhC3VAfOoOmFg0VzKzpgM3qF5lWRxWo5/pfZaTb7UDD +7ewcouXIuUicqaTbDkdueQ+O5H5HvaHcjvyrb6CtyEhTmT6J9HjqB658bQOj +2Yy1iP0Nnb403nxi4DVoLRtqGy4ZQ5VrKQc92K0Qsi8uq7hYitQNhg7fo74C +v2cDLUZUEdq9kKJ151ILmPw+4/48dhgZVk6kZB5shvvHmPwn7EH0Kj6HbuP6 +EoLHK3yu0vloRtRp3raEA9b/qO/XMO1FBQV69K7vTaB7jqedkc1FvsJb9nGf +n0P30RDLhx+bkPwux8MaNcJZimXqy/RyNC6yGosueQYl1+zxu2seQK638dxN +2Q2Q+ndsl9+lF+DSv79BFPkU5nwjby5z50IzrVLo5E/Ah8imDWcu94JWMO25 +/sl6ENfsbDjL4UNR28DQEYtauBd/x+9o4iConsoPQxqPwWyyVDcqexg6r1Bn +VrOr4T/P3U1KS4bBHzdjxz+oBi2abE1/zTAwyP74wN1qkK513OX0dhhK+Ldf +pNyohtrQnoR5pBGIGTp/ThheDfsGZ80Up46A1lxdOdWqGi7xAoTvYkehcbvd +gbI8Npwu0JbNvj4KpcSTYHkmG45FVKjjeaNQueigzOUaG3bNmza5Vz8KsiDh +CX40G/TJtEMRU6PgtIJkNecgGxjPGjq0Tn+BH4O9Rg4kNvRXLq3bfEwEMfMd +a4iEKmi1j7A0OSsCZ0N9EimmCmrrGzNnXRHBg/71vMCzVZDd/HdEZ4EI4nUM +HisHVoG3gLkibEAEk/q8Kh3HKmif70rN9xLDhnxzK3sFC4hM+s+EADH4vIbb +W8ZZwFgiCgmLFEOBzSdruxEWpK6kumyhiiFyT5OF1lsWuDm8V3S2iiFvp/4D +RSULNr6wDq59L4ZohlVL/H0WWOyM7c4fFQOZ0RPwI5cF2H7zyjBNCWwPH9CO +SWZBY3h4kKazBOYnVl2LPMIC5mQDT+IhgeMkoTzFmwX5F0hbu/wloKzdZrdj +JwtiEx4vLoiRAEtiQvjasCBcZ05S4jUJtEfaZ8ZasMCP5isLy5HAUl7frh4D +FvyRp9axpVYCiVbkPRQFE1aZ/wmmLRLI6CT5e40yYXHZ/TLNHglsTmMtufmW +CbPXKfSlQglcjJoJm9vIhKnqXfFdMgkUqiw9mv6ACRM5eyiHVaWw6rN235J0 +Joj4PxjtWlJwmPW6vIrChPdBZKNH+lIIHnJaUYEzgVcysc/K+Jc/zyw7xpgJ +LaKcqzkWUsiwDhSZKzPh8amv3y/bSaHYtXTkSV0lZF3M4Lp7SkF1X87Gd6sr +wTPzQ8JomhSEeihhHlYBqS7MOco3pWB7fCzIrJ8BHFkcdeEdKTQLfA2Nqxiw +ydvqlkOFFE41fDJ9688AI/0zDzPbpYAFuvtNUR6CkK7d5bjgK4gYjvPC+WVA +ybE1vXXjK4gzjG56FxZBTmFyHTljDE5ab2fds6OD2sFQkfq5b+AppAXRy5PQ +a7/7RXsvT0LCx3NnxOvLUNUcg0OykO/QpFxFfbnqETKnGwsxshx0zls6HtJ8 +iuRnLk+XeiggpKTkWOyxJjQqN9Qptp+BDjtqUn9IC8oLiucZmirhEzrSA9Un +3qA0h1fJ+mbK+LW+bYszDbhIJ6x06zOSCt5KEX+oyepE9U6P6tgGqng4Z745 +l/wWTYf62nrpqOGLBm2SF3F7kDLWcdNqWg3/PdpmG0HuQ7auEQ1uShp44Mmk +Ng/FAJK/LxOSxjTwp25Bzj//4COnEE7azkkNfIOV4kumEx+lTH20j5Nr4BbB +pulr3PhomYFh4jcVDN8bsOLzX5585PJn4kquLoa7zpdfbzzOR7T2gOA0Gwwf +jzmpkpTFR9ZNRl+0zmF46eDEDtIYH0V5bqJtjcZw8ns99XIZHz395LmFEovh +NGlN/bZpPtqnmpI8nPirp5y+PmqWAJ3Hp37j0DF8El027TUSIM7j7tC4WgwP +LZoyvLNDgBa4jZPqCAy3/OLet9FdgHze6dR/a8RwxLDI7fASIInMWedoK4Zr +H/JaruYvQAttWOVb+zH8xKviDUFRAuTX2OZFEWC4etaPHz+jBei+x+hMxRCG +Z63joKz/CtCWCJPdxhIM74/tIzenCtAV5T9k3uMYPpZiqneEJkBv0vbnpskw +nL1oqHfqpgAZLDvtwpnC8Nsty+/ScgXo/3+N+3gNhKwqFKB/AWN28bo= + "]]}, + Annotation[#, "Charting`Private`Tag$4844#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwt1mk01O//BvAZ4ZM1LRRKGVJRijah3nfWFiqJVJTKVhHJrm+yU5ZJilSW +lC3ZZmQbc4/sSwsSZV9G9pkkyvrrf87/wXWuJ6+n1zmX7BXH09Y8JBKJ+S// +11ezqZylJYJln/FwqrqFDWvmpBQ05glW4HAErbqZDRV6r83d/hAs24VbztWN +bFDoKqod4xIsXu9hTtUHNowI9yd/6yVYQTnPhysr2eB0fa8ZrZxgMQSE2srz +2XB383eWTTDBehzATMSP2RD3TC7qgyjB+tin0P3OhA0J3SGORgL8rPkYc8Gu +ugGQ+Gx8cps4H+u4V0LUvqMDUHPKWKd+My+r85Ly9Nq6fjiybbOLHGUZy6ad +emYX6gf1LPOUTzt5WM0f32FP3Aez921Wq24jsybmBL/+2d0Hv2dePb64hcTi +eTiyfCmjFyooUXuYDotYaJT5Zq9SL2jw+dCUrOax/FY/SEjsgWi0f//h/2Zx +6hoJc7WNPXD1uRl7JOEPHmG6+L1F3fApVUaAHDeNZW6NHdDf0QUywjkq+N0U +tth6aFBjeycIbhr8NJwxif0vLu/2E+8A+zOBsWlpXCyvnXeiYlk7WJZ318tE +jeMtAVmrzvJ+B8rBRaNK32E8Ul29sJHTBul2tN6Sd2y8+GNPluJYK1z/lWv+ +IK4Xnz/v8FC7+Sso3+U7xy/XjvmRTYoYboHVnl+EnjxrxjMhLscGGF+g1cpe +Mbu/CncEfE7a+aoZ3L0UI2ofZ+GfffLRC8+bICNSDb3a9RbCDotXGz1thIhr +vl8t/aqhM3rvHrc7n0FkykAj06gZYpJSYnm/f4Qel6o9bgHtcO7FpH7VrQbo +qOGTSnvVDmtmhl6M2DZA23rdpW8V7WC8QyRS8GIDfK4orz3I1wGbst2nNI81 +AGtN2UW+oA4g2sQfXqM0QAK9JCQ6uBO0JOW6PzbWw8WpnI68+90w9Ltp5brt +9XD+CLdsIKMbjlJcH/jK1oPJ852pEvXdsP3qW8N+iXpQoLSqlfL1wLLH0jKR +5HqQqTNZJqvXAwWzj8b9v9aBqJRx7FBVD8RH3TBg3a2DiSLD9+41vXChRD/B +tLoWNgtUu3i39kIKEeuhx6gFczO0xWewF6gaKzsUc2uhblo1LIi3D/xVs158 +jquF17vXmT5GfXBPxCL8gcM//7ZvOK+wD/IMe048E/vnE91XTqT1A83stucq +gxogc7nlPwv64aga9taHGlCD626/q/pBmW+7i71qDaR0mrfPD/TD7HDqYOC6 +GvCV0notJDsAisf1XKb6q0EtWvjAtqcDcCtTuiHXvRpSgpMsrULZEJxtRQuN +qgLLXIfszKf/dvpD+oKtXxVItR9YnEpnw0S4XJ+KcxVEKDc9C6xjwzlXXt4I +oypwa+FpTREaBLPzq5VtVlSBnpyV4XD4IIht8U8tCK6EQaaC+s2oHzC7KT6Q +Yl8Bm6ffrPZ4NgytYh9iVFa8h3WVRpQ3GcNQVOos/ne+DASjZ3Z1FQ1Dx1R/ +a9FIGXBVtE/otA1Dpoth0paqMmA4fA8REx+BsHqRawV3yuAMe/liWsQI3Gp8 +EYiHWOD3xXrom+8oTBvvo6h5YXBNFpoRfjgK2Y7qXO8zGOycc/lQ4ig86HOE +QmUMJ8QWKCnMUUjg8MxJ9TNB0iDawnluFHZtLhUMP86EnPL3TYKuY2BfcmGH +jnQpdOVtLNWwGwc/RWqBSEExfFBzVqS4j8PuylDGzYfFwGBWxCwPGoebRxZz +P9wohmd115xbksfhpJK9a9CmYjDro21x7B6HEcrxhNHQImhceSTqpekESK4Q +s+02LwRWTNxSiPUEUCSRmOH+QsjZMG7v6DIBKqkOvayVhRCxLUpfM2oCxvvJ +hbiqAI4d7phv+TABXVKal/VUCqDCyclWQJcD+bpfrssKvQPa9PsvHGMOzKS/ +19b5kQ8v74hrfb3CgTdjPcdZ5fngG1K8PvkeB+qYqh7id/PBSVTkfmgkB36o +GMrLm+eDZfSlGcd4DhRFd6z9q54PhxJ5mzQZHLikZSiYOUeHHQpnQa6eA2Pg +a/y7kw7rM9MzBb5zQEs5HFrK6CCsOi/JHeJAcqbtyN1UOswVnAj+OsOBGiLC +SCKSDr/jT3ldXMYFgeXUuDQPOoz3/s1pFORC36vqv1ut6DAgn/xDZxUXYg0j +G24b0aHD1kCmUJILahw9I1NEhy8Zv88oyXKh47ZvWMwuOtSPxz+I38qFXQnJ +HkuydCi+/fNPwH4uHFbqqPAh6JD3Lm7nn0Nc4KlguRyZo0H6X22bG3pcWHvJ +6m8MhwaxPk+ajUy4EK+iIHLrGw2o70Gw0pwL+2i2cm0faRDMN4zUrLhQ7GZv +71NBA7cHGlkyt7nQffCChV0ODUxiekJGqVwY/BOkOB5Kgwh9mgj5KRdGZeIz +y31oUDMTGCWRxAUbXLSQ40oDdTOl54dzuTA9UsZfeZkGMpJu2TGNXHCq7YyM +U6fBUJzQV+1VP2HWN8qQO54HXvH75J4/+gmio73B2WfzIP51WKnBk0lQ1TM6 +fmhnLvBecBjn85wCv2ttv3VXZ8FHy/TU0wHT4J3SJLPnZjrki0hZzNj/gXyk +V/dw3WtQiJMdIgxmQUZI8gm7LRFm3QIW3hjPg9ZLkriiVyyMzkqLpqktAl3Y +WTeBGQmJtsFfpOVIqOR1yYoJBS9Y7m1XL7eFhLgSjxw2RHuCU8TR90pKJKTE +kD9+jOwJkC+Uo7GbhBpoDNXn7e7QxUN9cEGbhBCv50EZqiusj4/VenaVhIwn +JWb9/zhB7Jf0HKlXJJQYtmls49pLQBq6n0pJIyGmd4DNo1pzsJu7Ea+YSUJ5 +A24BbO/zsJ+iHKZOJyH5EFOtjT0m8NUxz/Z8BQnZnunNv2F4FNYIlcjEDZAQ +rbzU3ct0P6YebgiT3ExGVXYbLmuEWmM9ZvLujq1kdF2s4Ehwkg2eV/f+Hr+d +jERNFSXVi22x3R7FrfJ7yOhewrr9M2PXMNoSUq6sTUbVhRd0FsxuYq6wzqz2 +ZTLy2E3R5Ht7G6eESifxW5ORYv3ZTl7kgs35f+nX2v3zEqueTzS74JqlpMcn +nMjI9qLFhd+LrjhxcmnXOR8yYp5ObVm09sCmjq2t0v5k5G4h3HSN1xMLj2Xd +7Qoio5HqXN4drz2xB9ui4WoEGbUEnQgcmPDCJ9tKbG++IKOdlWd1p9/8h3lN +HomqJJHRRNrqbZnWd3Fx4/X8X6/IyErFaJxP3gcr1Esu88wko+ba8ya+Z+/h +xVL3eP8SMrqjcTpzYsEXZyXvbon9RkYrbamlg3GBWNTxjVa5OA/q1rE872kS +jq1fxoi1SvIgv9nwy6Od4ZjR4t81soEHrXkyeTDQJgJf0zT3WqXAg3TWDY1R +PCJxhYBI3uV9PEh69OmC+Ucq9np1U5Z0lgdh98n736ai8OA3FdLBWB60Mpyd +NKkbg5k6haXvpJahtCH/N/4TCXjB4dI+U1FeREs0KLi3Ig2TiaanSgu8SKx/ +9u39pWy874jz+2MkfhRxWfndvCEdz3ZkDolP8qNTk/0rTp8uxDr2NVTDaX4k +ueaK5WGrQhw+168WOMuPTNys3u5yK8SbpKRDp3gIVC7wV3NFXCHWPxu6rXk1 +gdjV7qoNvYU4utH6OnUvgQ4YhLnr3irCylUyY4KeBMpY0+a0l1qMPUzUo7X+ +I5D6yWRj+ZfFuGzARNPLl0DzJ1btXk0vxmeWhYcNhxKo4GTPD25rMfZGc9tr +4ggkQLPYlrmxBNcUtzoEMgg0YsoRpmSX4FXHfomXsgiUvBhcLFZWgs2/iTKn +KghEWdtmtdRUgjkzuqJWHwgUjJOzO6ZLsMReepZWF4FoWiIyMYcY2LLik6lX +H4HSigJzA08xcLrx6GLuIIFSRViHXa4wsKYz5aQsh0A/4n3MjIIYOIh8aMbs +F4GcA4luiGXgz9RzCdQZAv33wvSKcgYDS21y1a+ZI5D+oZt96xkM/P9/Hu1g +nbwk9JGB/wfebeco + "]]}, + Annotation[#, "Charting`Private`Tag$4844#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwt1mk41P0aB/D5D+YvhBRPUY540EYISer+PUjqaI8SlUKWx9JpkbWylGRp +ErIUTVK2ZtCDZPlNyL60KDGlBjOZkAnNlK3jXNd5cV/fN58X3xffF/fKk/77 +3akUCuXa/P0vXVn0sd+/SbZijt/fcjdFsGRaVWfzDMm28DAWxyaIoN4mxzng +J8keciIjZeNEoNNX0TwiJNl637vSZaJF8FVuILuHS7LlnBRapcNEcNrb5PCT +OpKtWyKlL+UlgovavexT0SRbYe2KuVkkgvQMrcR2eZINR3WaxoQ/IOvTNf99 +C2jsT4Fpfs5WP0Dl5YE9q5Wl2F8UZV7uZExC094D1q3akmwXqyw9T+ok2K7W +PqelKcF+Xa8UpOAwAeZM54ed66ls/1s9j8xKx2Hq+qnFRqsJ9v27Mb4jtHH4 +IX6QfEyXwjYvtFF86fQd6jUTjWt857AkX51nUiWEzVKXnqx1m8E8S+ciXQUh +JKGNG/8Km8JKv+uszDjfwPXOYd7XrJ+YaLcvj8gchc5H6guIdBE256xIE9iM +gLpckSEum8R/BMD7Q7RhkNHgdwryx3Hhs+KPX/IF4HPwSmpurhDvc6+O5doP +gUvdp1b1xFF8etllny9/fAHNLXP7XoQLcHG8ntkKzIM8zyfcyjIeniJeSnmE +DYL3RLFzbDoXH9l/p2NSYwD0L0o50rQ4uF0j5opCKxcWB3XJpmS8wRdVJL47 +xX2GbjefNayBBmwxg4r8T/XBheA1Cc3JTBy6vGq9wgAH8m+YoQcGjyHYsttA +7NsDCV7h71wiGoG6KVr5UcM7WDhpt7lw3xvg6F7UctrfBZ/PNRgHRHEgtWRC +aF/+Cr5V7Kq90MQFh3Pbnl/K7ADtBY3nQrq5UOP1YTQ3vgOcDyPdS3wu1JXs +SPwY2gEtIqO4q5L9kDpM53s5dUDOhqUOyagfcqfx5sXL5v3jfkHJ036gawT4 +taW0Q8u9C4u+5Q7AmrIYecGdNiCEwrrv5QMQI9Ps0h7fBmbgHfCjYQDGdk/i +5xfb4OFHZ87M4AC42MxIcVzaIFzVMkd25SAc6JtReK0975PkNq1OGwSvz51x +n0ta4WE0w8UthgezlOZ/Z/e0gEuxL6swjQcybQtto1pbQJWzaW4yjweuYr53 +YHULJOi/zrjSwoOQcD4zjdECAW+p3Q9l+dD6n913qrxbwEbLbZcgng/pNJW7 +JyktwK/RMfdL/AI+C7PFIxubQVtUsDgwQwAVC8sPjrU1wtIX+zQL5ndRyY1J +HaltBJkksUFfhQBkqBZM4dNGEBpa7bZ+LwDVs085cjmNUOXbe01R+StE0xUN +EsMa4SBPei434SuwBqyqK9Y3QkSX+1BP+DA42b62773dAH0l/6re7DkKGfoc +iaCzL8D+9udrw3Qh5B/TKlPaWweZOXHVdinj8Cen/6nDoucg6eQ7KhU0CXlK +6luZEjXQ4ZL3aH+UCHRFZ7YcSKmA0oWqR8U+P4HRKrOcF1QKOukrh0i7KRjZ +wYpjni+GqYCo2YIDM5B3iWZ70jwfhqfU5HPN5sC0Njiqa+V9uOcR3aWmRUEK +oT9JdXYiSId4tmrpUlC9ux3XJyQRTifsqF27loJyTp5gVJkmApTKFm3eQEG3 +X9kKjj2+CX1UeqyTFQX5NO7QY6XTYXlmqmWGKwXp/dLUkx6Og9SuvCLVBxSk +Vmw5G344CihD1x9p5lLQ3cbYy0GdkeA5/XfmmkIKOtsqV3DeJhI2aurHmf9D +QbnNTexQ4wh451/icaSegvZuT9napngZlshWqqcPUlDpRsYT1+QLQP+rLW6Z +NoG4kYYVLeZHwKYme8OHVQRymGbIb9ruADPmIb2Z6wgUVbZ7beDB/eBpvGbV +n8YEChPc8HQesAake61O34pA3n7yJoWqJlgoZz1ldYJAEpmLmzyNTuKHMWoM +mjuBDNkeZh7qbtiZNrG92ZNAiGYpTZc+hZt+M5J3nybQfbMlvwLeeeF7478N +HC8RKH+PeJ167mm8532lh99dAiWMGsb25V3Akva35A0ZBCpX87y3PCgQP3vl +XTrxgEC3z2xbV2YVhHVal0kEFRIosXFMJbMlGM9VX8iMrCSQI0M4FMUIw8zs +DW9Tewi0zdE9MvRQOHbTkA11+kigo4cbRUnZ4Vj1br+mOpdAIb2lejPfwvHV +lJuns4cIxDY9Hi8RFYGPxYzJMsXznqcWnZIbieX9CyzrlKloVS+ZoTR4Bbvf +v63YvYyKUkXPuVkGV3HV28i+ryuoKHmr/5Rk2FXsZeEcrKRDRe0GXuvclKNx +/YKFJSdMqci026i+1voaDn7gt5JyiIq4sQHtD7KuY36PIWVLKhUxLst4f7W7 +gWusn1aXqUogC/8NE3y7JDzre9zUQV4SWfe08SMm72CCfJ22dlYS3RLJPP5V +dh+b2p6p3UmhIZaP+tFDex7hqQ+FQ8rjNKRwSFb1TWoBtvZpou8S0ZB0p4et +uKAAx08PmF2ZoiFKX/I5NVyANVTVYiapJPoVE9zgyivA2w/FrH6zmEQujqN7 +Jw0LcdIrd2+6CYmoPpGSyq2FWL9BfUQmiERHKhdJ2s8+xoH25kmWYSSSzjL6 +EajIxM8H7S2Cw0lUvCJ/8I4WEx+UiI8TxJAoNCW/ZnAHE4eg6XVN6SSaHdt9 +/FwKEzc96/a9UkWiLJsJ+1vrWVhp54RyNZtEW/wk9cstWdi5R75msp5EdWWZ +khx7Fh4Tb5N3ayfRW53gx5qhLKxi8g/Tsm/em6h9K25iYZf6TofgfhIl7K1/ +9pbDwnkHhueK+SSi1Mpd/fWNhS3OaO5ZOTbff6lV3D2ZInyV2Co+PEGiDKM+ +f6MlRfgl3TGLLiZRrV7H/voVRVhV4/z2pmkS6e5ZYuKgW4T//2+gnPfFKkMG +Rfi/GxQkCw== + "]]}, + Annotation[#, "Charting`Private`Tag$4844#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWaBsBiifAY3NCJVnRmMTo55Uc0g1nxbuIcZ8 +AJ0vAkM= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, { + + Thickness[0.034013605442176874`]}, StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-0.5826632620252883, 1.4104122349329522`}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.8017427266082287`*^9, {3.8026809446851177`*^9, 3.802680991475967*^9}, { + 3.802682013769022*^9, 3.802682047876749*^9}, 3.804568913054068*^9}, + CellLabel->"Out[44]=",ExpressionUUID->"e792ed8c-e828-4f34-9203-2a647a04c235"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "1.5"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", "\[Lambda]EP", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800934803294652*^9, 3.800934828567528*^9}, { + 3.800951966073148*^9, 3.800951966466264*^9}, {3.800952044593308*^9, + 3.800952163791082*^9}, {3.8009522109247847`*^9, 3.800952237194292*^9}, { + 3.800953108338159*^9, 3.800953126707988*^9}}, + CellLabel-> + "In[247]:=",ExpressionUUID->"7b41ef67-6714-425a-b787-737d0e979814"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"20.484682213077264`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"40.38408779149519`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"28.8395061728395`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"8.888888888888888`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"40.2670324645633`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"59.417283950617254`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"28.223209876543194`\\\", \\\ +\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"4.337777777777776`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"29.22481329065689`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"28.69026063100135`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"6.802962962962959`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"9.273903368388957`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"4.544087791495196`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"1.0862734339277538`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"40.38408779149519`\\\"}], \\\"+\\\", \ +RowBox[{\\\"57.679012345679`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", \ +RowBox[{\\\"26.666666666666664`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"59.417283950617254`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\ +\"}], \\\"+\\\", RowBox[{\\\"13.013333333333328`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"28.69026063100135`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"13.605925925925918`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"4.544087791495196`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 249, 195, 22562004893941124449, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.800953123470736*^9, 3.8009531271315823`*^9}}, + CellLabel-> + "During evaluation of \ +In[247]:=",ExpressionUUID->"58b1743b-726c-4519-9132-62a0d005f519"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"0", ",", "0", ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "+", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "+", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "-", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "-", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.7180788754388699718668967211291306945962368709039930005602`29.\ +397940008672037", "+", + RowBox[{ + "0.9761811792275888495142615075427764654293363424569219777264`29.\ +218913175720342", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.7180788754388699718668967211291306945962368709039930005602`29.\ +397940008672037", "-", + RowBox[{ + "0.9761811792275888495142615075427764654293363424569219777264`29.\ +218913175720342", " ", "\[ImaginaryI]"}]}], ",", + "1.6043560762636770360450902914905972981907941771738780040049`29.\ +397940008672037", ",", + "1.6043560762636770360450902914905972981907941771738780040049`29.\ +397940008672037", ",", + "3.8956491285304137255402334376424383991239927620975145299407`29.\ +69897000433602", ",", + "3.895638718944517674062320722340606749540284037093544137643`29.\ +69897000433602"}], "}"}]], "Output", + CellChangeTimes->{ + 3.800952237965661*^9, {3.800953112162244*^9, 3.800953127469623*^9}}, + CellLabel-> + "Out[251]=",ExpressionUUID->"81b1d857-2115-44d1-a112-0c1196e98d5f"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{0., 0.}}, {{0., + 0.}}, {{2.0000000000002305`, 0.7385489458731721}}, {{ + 2.0000000000002305`, 0.7385489458731721}}, {{ + 2.0000000000002305`, -0.7385489458731721}}, {{ + 2.0000000000002305`, -0.7385489458731721}}, {{1.71807887543887, + 0.9761811792275888}}, {{1.71807887543887, -0.9761811792275888}}, {{ + 1.604356076263677, 0.}}, {{1.604356076263677, 0.}}, {{ + 3.8956491285304136`, 0.}}, {{3.8956387189445176`, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.800934805610818*^9, 3.800934829648621*^9}, { + 3.8009520405841093`*^9, 3.8009521643160667`*^9}, {3.8009522118256187`*^9, + 3.800952238302854*^9}, {3.80095311251492*^9, 3.80095312776015*^9}}, + CellLabel-> + "During evaluation of \ +In[247]:=",ExpressionUUID->"fb76247e-c69e-482f-914a-a6bbdd901b0f"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{ + RowBox[{"-", "75"}], "/", "62"}], "-", "0.1"}]}], "]"}], ",", + "\[Epsilon]"}], "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.8008746125961227`*^9, 3.800874613419094*^9}, { + 3.800939596258403*^9, 3.800939600023058*^9}, {3.800939645727189*^9, + 3.8009396465883713`*^9}}, + CellLabel->"In[83]:=",ExpressionUUID->"c16f29f6-13d0-4952-8989-a6da0e4c9f2a"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"(\\\", \ +RowBox[{RowBox[{\\\"3.522510012854967`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"+\ +\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\[ImaginaryI]\\\"}]}], \\\")\\\"}], \ +\\\"+\\\", RowBox[{\\\"12.228549366777413`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"13.755300704037847`\\\", \\\" \\\ +\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"6.280499289914708`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"13.957983774650579`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"33.965963824177564`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"24.506303401434522`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"5.436159461236507`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\ +\"19.842591108652265`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"+\\\", \ +RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\[ImaginaryI]\\\"}]}], \\\")\\\"}], \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"30.466408374880512`\\\", \\\"\ +\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\ +\[ImaginaryI]\\\"}]}], \\\")\\\"}], \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{RowBox[{\\\ +\"(\\\", RowBox[{RowBox[{\\\"10.614521405780252`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\ +\[ImaginaryI]\\\"}]}], \\\")\\\"}], \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{RowBox[{\\\"(\\\", \ +RowBox[{RowBox[{\\\"12.052444004929706`\\\", \\\"\[VeryThinSpace]\\\"}], \ +\\\"+\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\[ImaginaryI]\\\"}]}], \\\")\\\ +\"}], \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"8.845215234748615`\\\", \\\"\ +\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\ +\[ImaginaryI]\\\"}]}], \\\")\\\"}], \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{RowBox[{\\\ +\"(\\\", RowBox[{RowBox[{\\\"2.6542989498631937`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\ +\[ImaginaryI]\\\"}]}], \\\")\\\"}], \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"12.228549366777413`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"27.510601408075694`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"9\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\\\", RowBox[{RowBox[{\\\"(\\\", \ +RowBox[{RowBox[{\\\"21.229042811560504`\\\", \\\"\[VeryThinSpace]\\\"}], \ +\\\"+\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\[ImaginaryI]\\\"}]}], \\\")\\\ +\"}], \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{RowBox[{\\\ +\"(\\\", RowBox[{RowBox[{\\\"8.845215234748615`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.`\\\", \\\" \\\", \\\"\ +\[ImaginaryI]\\\"}]}], \\\")\\\"}], \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 85, 173, 22562004893941124449, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.800939647733653*^9}, + CellLabel-> + "During evaluation of \ +In[83]:=",ExpressionUUID->"6e12b5bf-75a6-41b9-ab18-4d6e8ce0ff09"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + "1.25147299277507894769776481171293416345027506`28.79588001734408*^-13", + ",", "1.25147299277507894769776481171293416345027506`28.79588001734408*^-\ +13", ",", + RowBox[{ + "0.7044418132311471198059829944620037038234383371091353176401`29.\ +27332195685486", "-", + RowBox[{ + "1.1837187019096520147274469831007333918272864851326280320654`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.7044418132311471198059829944620037038234383371091353176401`29.\ +27332195685486", "+", + RowBox[{ + "1.1837187019096520147274469831007333918272864851326280320654`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.171649153211529091483760355574507710167965060309438881891`29.\ +397940008672037", "-", + RowBox[{ + "0.2173326958640112444290943877853154896935951122957375964221`28.\ +888366659510226", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.171649153211529091483760355574507710167965060309438881891`29.\ +397940008672037", "+", + RowBox[{ + "0.2173326958640112444290943877853154896935951122957375964221`28.\ +888366659510226", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.0319282804099891449556339401930830445217344141673959431205`29.\ +397940008672037", "-", + RowBox[{ + "1.0033693925738271588977167870830430963652750219864339731272`29.\ +238996779230405", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.0319282804099891449556339401930830445217344141673959431205`29.\ +397940008672037", "+", + RowBox[{ + "1.0033693925738271588977167870830430963652750219864339731272`29.\ +238996779230405", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.06430282265860914075690077030619256584`28.78503321844003", "-", + RowBox[{ + "0.7592061375927757232742273043289737443585461135130584415611`28.\ +743992875124334", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.06430282265860914075690077030619256584`28.78503321844003", "-", + RowBox[{ + "0.7592061375927757232742273043289737443585461135130584415611`28.\ +743992875124334", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.06430282265860914075690077030619256584`28.78503321844003", "+", + RowBox[{ + "0.7592061375927757232742273043289737443585461135130584415611`28.\ +743992875124334", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.06430282265860914075690077030619256584`28.78503321844003", "+", + RowBox[{ + "0.7592061375927757232742273043289737443585461135130584415611`28.\ +743992875124334", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output", + CellChangeTimes->{3.800874615298991*^9, 3.8009396127062693`*^9, + 3.800939648108144*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"0e4ab51f-91fc-48dc-b11e-74c81bf0bbe9"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.031928280409989, -1.0033693925738272`}}, {{2.031928280409989, + 1.0033693925738272`}}, {{0.7044418132311471, -1.183718701909652}}, {{ + 0.7044418132311471, 1.183718701909652}}, {{ + 2.0643028226586093`, -0.7592061375927758}}, {{ + 2.0643028226586093`, -0.7592061375927758}}, {{2.0643028226586093`, + 0.7592061375927758}}, {{2.0643028226586093`, 0.7592061375927758}}, {{ + 1.251472992775079*^-13, 0.}}, {{1.251472992775079*^-13, 0.}}, {{ + 1.1716491532115292`, -0.21733269586401124`}}, {{1.1716491532115292`, + 0.21733269586401124`}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.800874615948715*^9, 3.8009396130450277`*^9, + 3.8009396483898706`*^9}, + CellLabel-> + "During evaluation of \ +In[83]:=",ExpressionUUID->"0bc56279-8d57-45ca-ae17-fc2b034c080d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2.6"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{ + 3.800166546436537*^9, {3.800166805610259*^9, 3.800166860773169*^9}, { + 3.800874570860207*^9, 3.80087457810506*^9}, {3.8018008850094957`*^9, + 3.801800915197033*^9}}, + CellLabel-> + "In[128]:=",ExpressionUUID->"fc527673-fba1-416c-8d9f-891a47b30e07"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"1.6037226082034441`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"6.035903738769181`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"8.165109977443354`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"4.740772048464356`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"3.313104753096014`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"9.468434049289387`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"8.651447202832207`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"2.549056072132995`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \\\"\[Lambda]\ +\\\"}], \\\"+\\\", RowBox[{\\\"2.5108100873927066`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"4.822861080577993`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"2.2224147825861196`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \ +\\\"-\\\", RowBox[{\\\"0.8314171248199549`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.8028747970168448`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.1018444341949686`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"6.035903738769181`\\\"}], \\\"+\\\", \ +RowBox[{\\\"16.330219954886708`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\ +\", RowBox[{\\\"14.222316145393068`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"9.468434049289387`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"17.302894405664414`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"7.647168216398985`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"4.822861080577993`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"4.444829565172239`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.8028747970168448`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 130, 34, + 22567661377401331996, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.8018008855692043`*^9, 3.801800915569872*^9}}, + CellLabel-> + "During evaluation of \ +In[128]:=",ExpressionUUID->"43ac5757-0975-4d44-958b-526a85138610"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 4.395128381858833, 0.}}, {{4.395128381858833, 0.}}, {{ + 2.500303296834466, -0.3705960999048549}}, {{2.500303296834466, + 0.3705960999048549}}, {{2.564771367552213, 0.}}, {{2.564771367552213, + 0.}}, {{0.6260848642929989, 0.49276603051116874`}}, {{ + 0.6260848642929989, -0.49276603051116874`}}, {{3.5599155040808635`*^-12, + 0.}}, {{3.5599155040808635`*^-12, 0.}}, {{1.0229679653341484`, + 0.07810050836783217}}, {{ + 1.0229679653341484`, -0.07810050836783217}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.800166543390896*^9, 3.800166547543006*^9}, + 3.8001668067075*^9, {3.800166841331936*^9, 3.800166862242193*^9}, { + 3.800874563882997*^9, 3.800874581321026*^9}, {3.8018008862471313`*^9, + 3.8018009159871893`*^9}}, + CellLabel-> + "During evaluation of \ +In[128]:=",ExpressionUUID->"a24c7cac-cc33-473e-b7ed-09df82cdca90"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "5"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "0.5"}], ",", "0.5"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800166562518999*^9, 3.8001665628812447`*^9}, { + 3.800339532860114*^9, 3.8003395898903093`*^9}}, + CellLabel-> + "In[180]:=",ExpressionUUID->"e3b16e5d-ae18-42ed-afea-82863f45eb0a"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.3146541396942277`, -0.02535111580965952}}, {{2.3146541396942277`, + 0.02535111580965952}}, {{2.038331342468702, 0.}}, {{2.038331342468702, + 0.}}, {{0.6407992624070532, -0.2647074635371719}}, {{0.6407992624070532, + 0.2647074635371719}}, {{ + 1.0012150794904753`, -0.009310445464666289}}, {{1.0012150794904753`, + 0.009310445464666289}}, {{0., 0.}}, {{0., 0.}}, {{-0.3716646758020353, + 0.}}, {{-0.3716646758020353, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-0.5, 0.5}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.800166563444701*^9, 3.800339539961884*^9, {3.800339579489428*^9, + 3.800339590506653*^9}}, + CellLabel-> + "During evaluation of \ +In[180]:=",ExpressionUUID->"52c694be-b5de-4671-9227-12a698e31511"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "10"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "0.2"}], ",", "0.2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.8001665802265377`*^9, 3.800166580792862*^9}, { + 3.8003473602245617`*^9, 3.800347376712645*^9}, 3.80456885513492*^9}, + CellLabel->"In[38]:=",ExpressionUUID->"c2d60e3d-4d64-439d-b5f1-b8a8639ae541"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + "0", ",", "0", ",", + "0.3743144185183432347073862583026645187221349731325378297899`29.\ +397940008672037", ",", + "0.3743144185183432347073862583026645187221349731325378297899`29.\ +397940008672037", ",", + RowBox[{ + "0.647944643781525555091838300499561960315896457622159918979`29.\ +69897000433602", "-", + RowBox[{ + "0.1658055066379045869815579671903376393915046646330429161858`29.\ +54480298027201", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.647944643781525555091838300499561960315896457622159918979`29.\ +69897000433602", "+", + RowBox[{ + "0.1658055066379045869815579671903376393915046646330429161858`29.\ +54480298027201", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.998996865660060367601336986542221409416472250425549856657`29.\ +69897000433602", "-", + RowBox[{ + "0.0136772947434721585087676614744037261321039358648589211705`28.\ +286910379004038", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.998996865660060367601336986542221409416472250425549856657`29.\ +69897000433602", "+", + RowBox[{ + "0.0136772947434721585087676614744037261321039358648589211705`28.\ +286910379004038", " ", "\[ImaginaryI]"}]}], ",", + "1.9462257378427086487325568831390053262985207648945402544841`29.\ +397940008672034", ",", + "1.9462257378427086487325568831390053262985207648945402544841`29.\ +397940008672034", ",", + RowBox[{ + "2.2069836847970620735219751679456088275965222550927890528616`29.\ +397940008672034", "-", + RowBox[{ + "0.0229855063787596658349055786945654800554864651130945424538`28.\ +168146398348416", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.2069836847970620735219751679456088275965222550927890528616`29.\ +397940008672034", "+", + RowBox[{ + "0.0229855063787596658349055786945654800554864651130945424538`28.\ +168146398348416", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output", + CellChangeTimes->{3.804568859311782*^9}, + CellLabel->"Out[42]=",ExpressionUUID->"178553f4-c694-427b-9a3e-86aaf01b5315"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.206983684797062, -0.022985506378759665`}}, {{2.206983684797062, + 0.022985506378759665`}}, {{1.9462257378427086`, 0.}}, {{ + 1.9462257378427086`, 0.}}, {{ + 0.9989968656600604, -0.013677294743472158`}}, {{0.9989968656600604, + 0.013677294743472158`}}, {{ + 0.6479446437815256, -0.16580550663790458`}}, {{0.6479446437815256, + 0.16580550663790458`}}, {{0.37431441851834324`, 0.}}, {{ + 0.37431441851834324`, 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-0.2, 0.2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.800166581305282*^9, {3.80034736676245*^9, 3.800347377569419*^9}, + 3.8045688603859463`*^9}, + CellLabel-> + "During evaluation of \ +In[38]:=",ExpressionUUID->"5d54fc1c-415a-45e2-8793-875d3395ce53"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "/.", + RowBox[{"R", "\[Rule]", "100"}]}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800166590256907*^9, 3.800166590932949*^9}}, + CellLabel-> + "In[293]:=",ExpressionUUID->"90b1403f-09f2-43dc-ab86-39c6e34ac1ba"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.1450617341170637`, -0.021257964240190448`}}, {{2.1450617341170637`, + 0.021257964240190448`}}, {{1.8991880089421604`, 0.}}, {{ + 1.8991880089421604`, 0.}}, {{ + 0.9989343505413181, -0.025890769500299476`}}, {{0.9989343505413181, + 0.025890769500299476`}}, {{ + 0.6523580786420188, -0.08200339560060316}}, {{0.6523580786420188, + 0.08200339560060316}}, {{0.6133710260426484, 0.}}, {{0.6133710260426484, + 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.800166591770562*^9}, + CellLabel-> + "During evaluation of \ +In[293]:=",ExpressionUUID->"448954c3-4b8c-4ae9-900e-87b9b9ce36df"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "500"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800166602638564*^9, 3.8001666036560717`*^9}, { + 3.800953180989818*^9, 3.8009531977255907`*^9}}, + CellLabel-> + "In[271]:=",ExpressionUUID->"c5867d15-affb-4f83-a970-58502ae71ab6"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + "0", ",", "0", ",", + "0.6251711422677905532187290469867663155282823045742149681683`29.\ +397940008672037", ",", + "0.6251711422677905532187290469867663155282823045742149681683`29.\ +397940008672037", ",", + RowBox[{ + "0.6526248255722772871635068983708714656128952731059899732768`29.\ +69897000433602", "-", + RowBox[{ + "0.074673035951051083310458537174570570315430666886436412798`29.\ +206190809275245", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.6526248255722772871635068983708714656128952731059899732768`29.\ +69897000433602", "+", + RowBox[{ + "0.074673035951051083310458537174570570315430666886436412798`29.\ +206190809275245", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.9989557672191235494441649557518694224250214675089170460413`29.\ +69897000433602", "-", + RowBox[{ + "0.0265838898439002517039454660631269104955269952510768396199`28.\ +575433542775446", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "0.9989557672191235494441649557518694224250214675089170460413`29.\ +69897000433602", "+", + RowBox[{ + "0.0265838898439002517039454660631269104955269952510768396199`28.\ +575433542775446", " ", "\[ImaginaryI]"}]}], ",", + "1.8965126483606129161877714975684385948492981550673900671348`29.\ +397940008672037", ",", + "1.8965126483606129161877714975684385948492981550673900671348`29.\ +397940008672037", ",", + RowBox[{ + "2.1414728688655398349598157798450962957469420520885184556199`29.\ +397940008672037", "-", + RowBox[{ + "0.0198608404483218912443287555866307388147179127994214337973`28.\ +117781366891457", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "2.1414728688655398349598157798450962957469420520885184556199`29.\ +397940008672037", "+", + RowBox[{ + "0.0198608404483218912443287555866307388147179127994214337973`28.\ +117781366891457", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output", + CellChangeTimes->{{3.80095318193006*^9, 3.800953198594833*^9}}, + CellLabel-> + "Out[275]=",ExpressionUUID->"9a4fb0ec-cd66-456e-835e-6d436cbd7d05"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 2.14147286886554, -0.01986084044832189}}, {{2.14147286886554, + 0.01986084044832189}}, {{1.896512648360613, 0.}}, {{1.896512648360613, + 0.}}, {{0.9989557672191236, -0.02658388984390025}}, {{ + 0.9989557672191236, 0.02658388984390025}}, {{ + 0.6526248255722773, -0.07467303595105108}}, {{0.6526248255722773, + 0.07467303595105108}}, {{0.6251711422677906, 0.}}, {{0.6251711422677906, + 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.800166604428187*^9, {3.8009531822227497`*^9, 3.80095319893862*^9}}, + CellLabel-> + "During evaluation of \ +In[271]:=",ExpressionUUID->"f2944c76-6125-42de-9c7a-945ab662159a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"1", ",", + RowBox[{ + "0.2374891467337787324088047102385541022612789519696924509021`29.\ +057249529911832", "-", + RowBox[{ + "0.8028546019039053543517392040254700532679904648679610977402`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.1", ",", + RowBox[{ + "0.4103602476827904930974827867820610912316749461629579191583`29.\ +397940008672034", "-", + RowBox[{ + "0.9199967823451507732947378036217367894690103625221676596362`29.\ +382045606050877", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.2", ",", + RowBox[{ + "0.6325132614340338064606724797757945618337008173994847866943`29.\ +397940008672037", "-", + RowBox[{ + "0.9969463513600492866805439325006681051550875709224992364534`29.\ +37657862532185", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.3", ",", + RowBox[{ + "0.8983661464806765204328282865490136810518356955335865118411`29.\ +397940008672037", "-", + RowBox[{ + "1.0117986604394248391677330434612120547211143805339788696858`29.\ +338150095970537", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.4", ",", + RowBox[{ + "1.2132194606214072560152425658109284555296301326112167278446`29.\ +358978980210164", "-", + RowBox[{ + "0.9398425629846078013761494783848553304053852385701496357056`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.5", ",", + RowBox[{ + "1.7180788754388699718668967211291306945962368709039930005602`29.\ +397940008672037", "+", + RowBox[{ + "0.9761811792275888495142615075427764654293363424569219777264`29.\ +218913175720342", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.6", ",", + RowBox[{ + "1.2213127273900431528823334673558248119938342390482437008927`29.\ +397940008672037", "-", + RowBox[{ + "0.2341254632770232770262092034821885597194057838759222967847`28.\ +902119336225294", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.7", ",", + RowBox[{ + "1.1462056976220943513227441662158693646748908075043656549443`29.\ +397940008672037", "-", + RowBox[{ + "0.2049914959325541227299672600454722499046824129731852508417`28.\ +87426974111576", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"1.8", ",", + RowBox[{ + "1.1070228917699778321081079490164397513201721157339728599782`29.\ +397940008672037", "-", + RowBox[{ + "0.1797376523337093194544259341484853513277700915761132064295`28.\ +842045645066868", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"2", ",", + RowBox[{ + "1.0655678648783681952455499596090965480045810739079991800999`29.\ +397940008672037", "-", + RowBox[{ + "0.1414990387982489895023924064789054248077506698461980555895`28.\ +793316676554895", " ", "\[ImaginaryI]"}]}]}], "}"}]}], "}"}], "//", + "Abs"}]], "Input", + CellChangeTimes->{{3.801986833849189*^9, 3.801986838184083*^9}, { + 3.801986892248054*^9, 3.801986902202458*^9}, {3.8019869406722593`*^9, + 3.8019870178662977`*^9}, {3.801987064204771*^9, 3.801987071093266*^9}, { + 3.801987252563355*^9, 3.801987260944914*^9}, {3.80198732097829*^9, + 3.8019873265086412`*^9}, {3.801987359799917*^9, 3.801987365633395*^9}, { + 3.801987460268141*^9, 3.801987524205697*^9}}, + CellLabel->"In[99]:=",ExpressionUUID->"141bf38d-c2c5-48bb-9032-5605f04bb986"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + "1", ",", + "0.8372434571942719174709848054876339028996391379036395056783`29.\ +35818958434467"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.1`", ",", + "1.0073676649583864253023301680161145856827842190835168673413`29.\ +384643216109342"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.2`", ",", + "1.1806672068707732360145619199598521452833111841474963223604`29.\ +38260262929695"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.3`", ",", + "1.35306993995489932677509118723192298330639713334041406073`29.\ +36349874541293"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.4`", ",", + "1.5346678803011336999024836477931887900818194739419630573141`29.\ +37318460654532"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.5`", ",", + "1.9760376304381093501790635490498365642526666691994111520203`29.\ +346978451060966"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.6`", ",", + "1.2435511692888180617058862112801644953777287893846624120874`29.\ +366300894915515"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.7`", ",", + "1.164392122382326297549203881433715740881463333262773216045`29.\ +367539851218485"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.8`", ",", + "1.1215191958095043752326967028200482032456150494419962200788`29.\ +369901027080203"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "2", ",", + "1.074921789081546487205347181983407558609538486715624845771`29.\ +375761277750755"}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.8019869698351517`*^9, 3.801987526559959*^9}, + CellLabel->"Out[99]=",ExpressionUUID->"2c1a6f30-deb3-42d6-8950-af7181d63d56"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + "1", ",", + "0.8372434571942719174709848054876339028996391379036395056783`29.\ +35818958434467"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.1`", ",", + "1.0073676649583864253023301680161145856827842190835168673413`29.\ +384643216109342"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.2`", ",", + "1.1806672068707732360145619199598521452833111841474963223604`29.\ +38260262929695"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.3`", ",", + "1.35306993995489932677509118723192298330639713334041406073`29.\ +36349874541293"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.4`", ",", + "1.5346678803011336999024836477931887900818194739419630573141`29.\ +37318460654532"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.5`", ",", + "1.9760376304381093501790635490498365642526666691994111520203`29.\ +346978451060966"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.6`", ",", + "1.2435511692888180617058862112801644953777287893846624120874`29.\ +366300894915515"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.7`", ",", + "1.164392122382326297549203881433715740881463333262773216045`29.\ +367539851218485"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "1.8`", ",", + "1.1215191958095043752326967028200482032456150494419962200788`29.\ +369901027080203"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + "2", ",", + "1.074921789081546487205347181983407558609538486715624845771`29.\ +375761277750755"}], "}"}]}], "}"}], "]"}]], "Input", + CellChangeTimes->{{3.801987529950062*^9, 3.8019875469711246`*^9}}, + CellLabel-> + "In[100]:=",ExpressionUUID->"882c4064-a2bb-45f0-ba21-eed2b7dfee7d"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.012833333333333334`], + AbsoluteThickness[1.6], + PointBox[{{1., 0.837243457194272}, {1.1, 1.0073676649583865`}, {1.2, + 1.1806672068707733`}, {1.3, 1.3530699399548993`}, {1.4, + 1.5346678803011338`}, {1.5, 1.9760376304381093`}, {1.6, + 1.2435511692888181`}, {1.7, 1.1643921223823264`}, {1.8, + 1.1215191958095043`}, {2., 1.0749217890815466`}}]}, { + {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ + 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}, { + {RGBColor[0.368417, 0.506779, 0.709798], PointSize[ + 0.012833333333333334`], AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0.9791666666666669, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{0.9791666666666669, 2.}, {0, 1.9760376304381093`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{3.801987548309491*^9}, + CellLabel-> + "Out[100]=",ExpressionUUID->"c34f4831-99f5-4642-b2dd-3e6e7cf55f49"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1.5"}], "}"}], ",", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}], ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], ";", + "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], ";", + "\[IndentingNewLine]", + RowBox[{"Print", "[", + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], "]"}], ";", + "\[IndentingNewLine]", + RowBox[{"Print", "[", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"Re", "[", + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}], "]"}]}]}], "]"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.8019867923002033`*^9, 3.801986823442676*^9}, { + 3.801986855897053*^9, 3.8019868720205*^9}, {3.801986922142303*^9, + 3.801986925569375*^9}, {3.801986992672366*^9, 3.801987022726304*^9}, { + 3.801987074106228*^9, 3.8019870784106073`*^9}, {3.801987269267577*^9, + 3.8019872696218643`*^9}, {3.8019873332522373`*^9, 3.8019873338085823`*^9}, { + 3.8019874440563602`*^9, 3.801987444465632*^9}, {3.8019874792163773`*^9, + 3.801987510534107*^9}, {3.801995650749317*^9, 3.801995651743333*^9}}, + CellLabel->"In[64]:=",ExpressionUUID->"3c69d6bc-455b-4e7c-8ee6-355abc159580"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"20.484682213077264`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"40.38408779149519`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"28.8395061728395`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"8.888888888888888`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"40.2670324645633`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"59.417283950617254`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"28.223209876543194`\\\", \\\ +\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"4.337777777777776`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"29.22481329065689`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"28.69026063100135`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"6.802962962962959`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"9.273903368388957`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"4.544087791495196`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"1.0862734339277538`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"40.38408779149519`\\\"}], \\\"+\\\", \ +RowBox[{\\\"57.679012345679`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", \ +RowBox[{\\\"26.666666666666664`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"59.417283950617254`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"56.44641975308639`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"13.013333333333328`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"28.69026063100135`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"13.605925925925918`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.544087791495196`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 64, 1, + 22568957072357172025, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.801995655735897*^9}, + CellLabel-> + "During evaluation of \ +In[64]:=",ExpressionUUID->"62be9c73-e32f-4d98-89db-e9be32def3bc"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + "0", ",", "0", ",", + "1.6043560762636770360450902914905972981907941771738780040049`29.\ +397940008672037", ",", + "1.6043560762636770360450902914905972981907941771738780040049`29.\ +397940008672037", ",", + RowBox[{ + "1.7180788754388699718668967211291306945962368709039930005602`29.\ +397940008672037", "-", + RowBox[{ + "0.9761811792275888495142615075427764654293363424569219777264`29.\ +218913175720342", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.7180788754388699718668967211291306945962368709039930005602`29.\ +397940008672037", "+", + RowBox[{ + "0.9761811792275888495142615075427764654293363424569219777264`29.\ +218913175720342", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "-", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "-", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "+", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"2.00000000000023060867968580876717723775`28.784762272908303", "+", + RowBox[{ + "0.7385489458731720481650625031578866979257415357905997710059`28.\ +742603532776247", " ", "\[ImaginaryI]"}]}], ",", + "3.895638718944517674062320722340606749540284037093544137643`29.\ +69897000433602", ",", + "3.8956491285304137255402334376424383991239927620975145299407`29.\ +69897000433602"}], "}"}]], "Print", + CellChangeTimes->{ + 3.801986823827594*^9, {3.801986860364794*^9, 3.801986872434085*^9}, + 3.8019869264188423`*^9, {3.801986993967682*^9, 3.8019870234942093`*^9}, { + 3.801987075210474*^9, 3.801987079138709*^9}, 3.801987270393096*^9, + 3.8019873349421453`*^9, 3.80198744537703*^9, 3.801987480320167*^9, + 3.801987510881637*^9, 3.801995656180057*^9}, + CellLabel-> + "During evaluation of \ +In[64]:=",ExpressionUUID->"37856ad8-140c-458d-abea-3eb9ff8417ec"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8DPre4tjuMYQBT7GiY7 +/AfA8Ir1/ArhGEDERqVcdvgHwBBo/MuH3hhAJt65yezwB8BRIgpqgdkYQOoM +46PZ4QfA1JYlpnTPGEBwajVYs8MHwNh/XB5buxhAfiXawGaHB8DhUcoOKJMY +QJqbI5LNDgfA9PWl78FCGECf34hvUQkGwKJ46S1vlBdAFtBTTykVBcBGbhvD +qfEWQMhQU0TLJQTAEsTFuxVSFkBIKSV0IyIDwGhU/DD7pBVAOq5cps8vAsC0 +VyH9bQMVQPqKZhMyKQHAiZXSRVpUFED196SVXicAwIYz/PF3qBNAxCKSNL5t +/r95RBT1IggTQDsFf7MrZPy/9o+4dEdaEkCUQDc3QX36v2pOS0v5txFAY5xY +5eqf+L8EbVaF3BgRQM+nHgkBmva/KMbtOzlsEEAeDLAxv7b0v4Qk55JGlg9A +CiDmz+mq8r/MMQunDTkOQGxUhZioqPC/Y/8fgjfiDEBgw9/LHpLtv+ayEQt8 +ogtAIj3+UcWB6b982xuNs0cKQKlos+G7tuW//ukCvQUECUBq87Fci5rhv5Rt +AuZKpQdALn4FWQYj2794sfLV8kwGQBN51AuWm9O/Sdu/c7ULBUDXZGwqr+PG +vy16pQprrwNAd3oqjsmVrr/+/mdPO2oCQKqPOECkMK0/HkQbW24rAUCOaYHW +YILHP6D8zb8oo/8/DfRMO6xR0z/ePB8lqh39P+B0xjR2hNs/QmehfBFi+j/u +uU3Cd8jhP0QSBWI+s/c/poehYGSJ5T8fiSKjoDL1PyX2qxN4m+k/IOpw1uh7 +8j/esh+9O2jtP/Qt8srM5u8/VZfgiOuQ8D/kiMUEU+/qP56ljL1MlvI/Irj6 +IqWL5T8EW23tBXn0PxJ/o/hhhOA/zmCpp1KE9j+cNFxl1SHWP7UNGl33bPg/ +8DSxkHjnxz8mmiHoB0z6P4AssC2Wi58/+naE/atT/D+g2L1zY7XBv+v6Gw6o +OP4/AKyxZ0f10r+gZ4fUGyMAQBjDwExF6N2/kEHMjBklAUDg6yR9FlTkvw5v +q0LDFQJAgN51nJ9X6b++RLi9thoDQNT8ZNdcx+6//W1fNlYOBEC+QXCtV+3x +vwEH0pkr/QRAcoRMYTtq9L82SHLCSgAGQADd9yI5Hfe/+tys6BXyBkC0aemI +AaL5v0RsyJBN9gZAJD2InkCt+b+N++M4hfoGQJIQJ7R/uPm/IBobifQCB0Bw +t2Tf/c75v0dXiSnTEwdALAXgNfr7+b+U0WVqkDUHQKSg1uLyVfq/LsYe7Ap5 +B0CU18M85An7v3hVOpRCfQdABKtiUiMV+7/B5FU8eoEHQHJ+AWhiIPu/VAON +jOmJB0BQJT+T4Db7v3tA+yzImgdADHO66dxj+7/IutdthbwHQIQOsZbVvfu/ +EkrzFb3AB0D04U+sFMn7v1zZDr70xAdAZLXuwVPU+7/v90UOZM0HQEJcLO3R +6vu/FjW0rkLeB0AAqqdDzhf8v2DEz1Z64gdAcH1GWQ0j/L+pU+v+seYHQNxQ +5W5MLvy/PHIiTyHvB0C69yKaykT8v4YBPvdY8wdAKsvBrwlQ/L/QkFmfkPcH +QJqeYMVIW/y/GiB1R8j7B0AKcv/ah2b8v2OvkO///wdAeEWe8MZx/L9o72Tw + + "]]}, Annotation[#, "Charting`Private`Tag$4637#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8DyTUDcOI4TQBT7GiY7 +/AfAB4zvEIyME0DERqVcdvgHwBzKnkXfihNAJt65yezwB8BIRv2uhYcTQOoM +46PZ4QfAnz66gdKAE0BwajVYs8MHwEwvNCdscxNAfiXawGaHB8CoEChyn1gT +QJqbI5LNDgfAYNMPCAYjE0Cf34hvUQkGwCjVPNzOrhJAFtBTTykVBcDseLM/ +S0ISQMhQU0TLJQTAdAclkOjXEUBIKSV0IyIDwFgS9IiBZBFAOq5cps8vAsA1 +vwwRzvgQQPqKZhMyKQHAbuiCQRaEEED196SVXicAwGz8815/ERBAxCKSNL5t +/r/GZF0XOE0PQDsFf7MrZPy/bcmNwWhlDkCUQDc3QX36vwZyUYoAjQ1AY5xY +5eqf+L8q8Aot2rgMQM+nHgkBmva/BGd/IKvSC0AeDLAxv7b0v9IhhzLj+wpA +CiDmz+mq8r9Y1UmVEhMKQGxUhZioqPC/Z14C0oMuCUBgw9/LHpLtv2krTi1c +WQhAIj3+UcWB6b8i8VTZK3IHQKlos+G7tuW/z/ruo2KaBkBq87Fci5rhvzP9 +Q7+QsAVALn4FWQYj278g1Y60AMsEQBN51AuWm9O/AfFsyNf0A0DXZGwqr+PG +v5kFBi2mDANAd3oqjsmVrr8kXjKw2zMCQKqPOECkMK0/OYxUDVNfAUCOaYHW +YILHPwazMbvBeABADfRMO6xR0z+KO0QPL0P/P+B0xjR2hNs/eAKbSclw/T/u +uU3Cd8jhP3l03Tfnpvs/poehYGSJ5T9gbkZj0/v5PyX2qxN4m+k/tlklMK4s ++D/esh+9O2jtP/LMKjpXfPY/VZfgiOuQ8D9D6xv4g9T0P56ljL1MlvI/AvuC +V58I8z8EW23tBXn0P6iSEPSIW/E/zmCpp1KE9j94NyhkwhTvP7UNGl33bPg/ +bFl8Wg+w6z8mmiHoB0z6P4bRp7hjXOg/+naE/atT/D+ALL9ZlcDkP+v6Gw6o +OP4/RpcjdWNi4T+gZ4fUGyMAQNDJ56YdeNs/kEHMjBklAUBcETczg03UPw5v +q0LDFQJAEPFAaEM8yz++RLi9thoDQMCVhuvqebk//W1fNlYOBEAAhsNw0nx5 +vwEH0pkr/QRAQFXk+kkhvL82SHLCSgAGQJCtrlvudcy/+tys6BXyBkCoeFvo +YvLUv0RsyJBN9gZAKFdYd2AQ1b+N++M4hfoGQKg1VQZeLtW/IBobifQCB0Cg +8k4kWWrVv0dXiSnTEwdAmGxCYE/i1b+U0WVqkDUHQIBgKdg70ta/LsYe7Ap5 +B0BYSPfHFLLYv3hVOpRCfQdA2Cb0VhLQ2L/B5FU8eoEHQFAF8eUP7ti/VAON +jOmJB0BIwuoDCyrZv3tA+yzImgdAQDzePwGi2b/IutdthbwHQCgwxbftkdq/ +EkrzFb3AB0CoDsJG66/av1zZDr70xAdAKO2+1ejN2r/v90UOZM0HQCCquPPj +Cdu/FjW0rkLeB0AgJKwv2oHbv2DEz1Z64gdAoAKpvtef27+pU+v+seYHQBjh +pU3Vvdu/PHIiTyHvB0AQnp9r0Pnbv4YBPvdY8wdAkHyc+s0X3L/QkFmfkPcH +QBBbmYnLNdy/GiB1R8j7B0CQOZYYyVPcv2OvkO///wdACBiTp8Zx3L80Dk2o + + "]]}, Annotation[#, "Charting`Private`Tag$4637#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8CZamO3ddMJQBT7GiY7 +/AfAMCzmLCLRCUDERqVcdvgHwA57qqDOzglAJt65yezwB8DqvvWCJ8oJQOoM +46PZ4QfAeciIMtnACUBwajVYs8MHwGeMLz08rglAfiXawGaHB8C89Or8AIkJ +QJqbI5LNDgfA3XvLCIU+CUCf34hvUQkGwOm3+zjrnAhAFtBTTykVBcBPcmh7 +5AUIQMhQU0TLJQTAHM7DOrFxB0BIKSV0IyIDwPIC8vjD0AZAOq5cps8vAsB7 +Ey3VaDoGQPqKZhMyKQHAHtMvw0OXBUD196SVXicAwCCL/obf9gRAxCKSNL5t +/r82NL1AC2EEQDsFf7MrZPy/hzusllC+A0CUQDc3QX36v2VdWhYhJgNAY5xY +5eqf+L8e74jRqJACQM+nHgkBmva/1AEetSPuAUAeDLAxv7b0vyX3mdYiVgFA +CiDmz+mq8r+qD17z7rAAQGxUhZioqPC/vj09ukEOAEBgw9/LHpLtv7C+SrgX +7P4/Ij3+UcWB6b8Civ9SsaD9P6los+G7tuW/pAyqkRJq/D9q87Fci5rhvwCd +U4/gF/s/Ln4FWQYj27+f8+kx98n5PxN51AuWm9O/XasQ4YeQ+D/XZGwqr+PG +v36EF9JEOvc/d3oqjsmVrr+kPXrtDvj1P6qPOECkMK0/BmoaJEa59D+OaYHW +YILHP3uxs/2gW/M/DfRMO6xR0z+vu14xHxHyP+B0xjR2hNs/z8hgnG2l8D/u +uU3Cd8jhPwpS+QFxc+4/poehYGSJ5T8uzvkmq77rPyX2qxN4m+k/VI2Ad5C8 +6D/esh+9O2jtP+h9BAZm2OU/VZfgiOuQ8D+cmwDm2OriP56ljL1MlvI/YGj7 +6Oo63z8EW23tBXn0P6DIl2Fhytg/zmCpp1KE9j+0yAKTE3XRP7UNGl33bPg/ +0Lh/8Yd4xD8mmiHoB0z6PwC8qJKhK6Y/+naE/atT/D+guZr5cRq3v+v6Gw6o +OP4/cP2xMBFbzL+gZ4fUGyMAQNi5nBwQute/kEHMjBklAUB4rwkgycHgvw5v +q0LDFQJAVF7Dlh985b++RLi9thoDQPRgDcKuw+q//W1fNlYOBECEDNhZrNDv +vwEH0pkr/QRACO0ATlxu8r82SHLCSgAGQMhxpg2tNvW/+tys6BXyBkCq2EDR +Q9j3v0RsyJBN9gZA9PrMtxTk97+N++M4hfoGQGawCizm7/e/IBobifQCB0AC +G9e7igf4v0dXiSnTEwdAXmBvbNo2+L+U0WVqkDUHQJILubCTlfi/LsYe7Ap5 +B0Bo/CrSalP5v3hVOpRCfQdAoiA7m0xf+b/B5FU8eoEHQECOleQua/m/VAON +jOmJB0BgnZT29IL5v3tA+yzImgdA6HK+DIey+b/IutdthbwHQMjd+arCEfq/ +EkrzFb3AB0AyEvpJrB36v1zZDr70xAdAytkZY5Yp+r/v90UOZM0HQJ5LOQJs +Qfq/FjW0rkLeB0CWXpLpHHH6v2DEz1Z64gdA5HonTwp9+r+pU+v+seYHQJoN +5yv4iPq/PHIiTyHvB0BmPHFJ1aD6v4YBPvdY8wdAHnqCicSs+r/QkFmfkPcH +QPZwSz+0uPq/GiB1R8j7B0ASP3BqpMT6v2OvkO///wdALlSVCpXQ+r/UQmug + + "]]}, Annotation[#, "Charting`Private`Tag$4637#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8AOyeIaXkAeQBT7GiY7 +/AfADlNmWIs9HkDERqVcdvgHwGwWyZa4Oh5AJt65yezwB8AYSi0WEzUeQOoM +46PZ4QfAiHB3H8gpHkBwajVYs8MHwPpkS1wyEx5AfiXawGaHB8CkXbyAB+Yd +QJqbI5LNDgfAvnNpg7SLHUCf34hvUQkGwJJzvKHpxxxAFtBTTykVBcAWxdiG +KREcQMhQU0TLJQTApvTSmRBeG0BIKSV0IyIDwDoilNLemxpAOq5cps8vAsDQ +cjZMuOYZQPqKZhMyKQHAYlYl4oAiGUD196SVXicAwIVsg/n5YRhAxCKSNL5t +/r/6GtFlf64XQDsFf7MrZPy/2wQ3KQLsFkCUQDc3QX36v1HypKeTNhZAY5xY +5eqf+L+Z1qd02oQVQM+nHgkBmva/6uSn0jHEFEAeDLAxv7b0v8wSnGGbEBRA +CiDmz+mq8r+cmRyYKE4TQGxUhZioqPC/ZMTkZYOPEkBgw9/LHpLtv0QGENb2 +3RFAIj3+UcWB6b+mkLIVsx0RQKlos+G7tuW/ED4/vJFqEEBq87Fci5rhvyYl +ebC+UQ9ALn4FWQYj27+MyKduV9YNQBN51AuWm9O/Gl1dxlt1DEDXZGwqr+PG +vwi2g0fe9wpAd3oqjsmVrr+sQEvTApUJQKqPOECkMK0/Mm8eqpI6CECOaYHW +YILHPz7l1fmkxAZADfRMO6xR0z+km1M8zmkFQOB0xjR2hNs/paWGraP0A0Du +uU3Cd8jhP5ojl7qciQJApoehYGSJ5T9alIRQlToBQCX2qxN4m+k/1JLiy+6n +/z/esh+9O2jtP6ynWxcMFf0/VZfgiOuQ8D/4YG1rHpv6P56ljL1MlvI/9EYA +fUT79z8EW23tBXn0P5zkSHcsmvU/zmCpp1KE9j9vhB8YbhzzP7UNGl33bPg/ +y+J/a+Hg8D8mmiHoB0z6P5jkffYwku0/+naE/atT/D9i2Ke0kEHpP+v6Gw6o +OP4/RJippgBx5T+gZ4fUGyMAQMxhV3ePh+E/kEHMjBklAUCQLJD0RcrbPw5v +q0LDFQJA+FvnwtxV1T++RLi9thoDQMi2y5oOSc0//W1fNlYOBEDwdL1ep0bB +PwEH0pkr/QRAAExGW2GKpz82SHLCSgAGQAA4IFp0d6i/+tys6BXyBkBwgkhn +mAnBv0RsyJBN9gZA4FWlYNI5wb+N++M4hfoGQNCPdewHasG/IBobifQCB0AQ +Bo7JZcrBv0dXiSnTEwdAsHHD++yKwr+U0WVqkDUHQPBEZUcsC8S/LsYe7Ap5 +B0AAGLQXhgjHv3hVOpRCfQdA8Nvw/Dg4x7/B5FU8eoEHQIBU29/nZ8e/VAON +jOmJB0Cgpl6rOcfHv3tA+yzImgdAAJEHsa2FyL/IutdthbwHQOBmGy3aAcq/ +EkrzFb3AB0AwqddiTjHKv1zZDr70xAdAEFKXx75gyr/v90UOZM0HQLCOFyqU +v8q/FjW0rkLeB0BwjUamEX3Lv2DEz1Z64gdAoJBbp2esy7+pU+v+seYHQHDg +HO+528u/PHIiTyHvB0BQNUdeUzrMv4YBPvdY8wdAMC17i5ppzL/QkFmfkPcH +QBBc8QremMy/GiB1R8j7B0Dw0IjfHcjMv2OvkO///wdAkA0eDFr3zL+WZFHh + + "]]}, Annotation[#, "Charting`Private`Tag$4637#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWaBsBiifAY3NCJVnRmMTo55Uc0g1nxbuIcZ8 +AJ0vAkM= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, { + + Thickness[0.034013605442176874`]}, StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-1.7777776145124715`, 7.562858982173806}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Print", + CellChangeTimes->{ + 3.801986823827594*^9, {3.801986860364794*^9, 3.801986872434085*^9}, + 3.8019869264188423`*^9, {3.801986993967682*^9, 3.8019870234942093`*^9}, { + 3.801987075210474*^9, 3.801987079138709*^9}, 3.801987270393096*^9, + 3.8019873349421453`*^9, 3.80198744537703*^9, 3.801987480320167*^9, + 3.801987510881637*^9, 3.8019956640557632`*^9}, + CellLabel-> + "During evaluation of \ +In[64]:=",ExpressionUUID->"baf9d57d-027c-4ffb-b08d-723e5a8a508b"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{0., 0.}}, {{0., + 0.}}, {{2.0000000000002305`, 0.7385489458731721}}, {{ + 2.0000000000002305`, 0.7385489458731721}}, {{ + 2.0000000000002305`, -0.7385489458731721}}, {{ + 2.0000000000002305`, -0.7385489458731721}}, {{1.71807887543887, + 0.9761811792275888}}, {{1.71807887543887, -0.9761811792275888}}, {{ + 1.604356076263677, 0.}}, {{1.604356076263677, 0.}}, {{ + 3.8956491285304136`, 0.}}, {{3.8956387189445176`, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.801986823827594*^9, {3.801986860364794*^9, 3.801986872434085*^9}, + 3.8019869264188423`*^9, {3.801986993967682*^9, 3.8019870234942093`*^9}, { + 3.801987075210474*^9, 3.801987079138709*^9}, 3.801987270393096*^9, + 3.8019873349421453`*^9, 3.80198744537703*^9, 3.801987480320167*^9, + 3.801987510881637*^9, 3.8019956650659323`*^9}, + CellLabel-> + "During evaluation of \ +In[64]:=",ExpressionUUID->"c105aa19-e7d4-42b0-a9dc-ad6aac351ca6"] +}, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"Eigensystem", "[", + RowBox[{"uH\[Lambda]", "[", + RowBox[{"1", ",", "1"}], "]"}], "]"}], "//", "N"}]], "Input", + CellChangeTimes->{{3.801995669977865*^9, 3.80199571765765*^9}}, + CellLabel->"In[70]:=",ExpressionUUID->"1993fadf-9490-4358-a574-f28745037061"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + "3.210270370801213`", ",", "2.3333333333333335`", ",", + "1.6666666666666667`", ",", "0.9497296291987872`"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "0.32436621643169966`"}], ",", + RowBox[{"0.`", "\[VeryThinSpace]", "+", + RowBox[{"0.4784354671366729`", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"0.`", "\[VeryThinSpace]", "+", + RowBox[{"0.4784354671366729`", " ", "\[ImaginaryI]"}]}], ",", "1.`"}], + "}"}], ",", + RowBox[{"{", + RowBox[{"0.`", ",", + RowBox[{"-", "1.`"}], ",", "1.`", ",", "0.`"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "1.`"}], ",", + RowBox[{"0.`", "\[VeryThinSpace]", "+", + RowBox[{"1.3840594055011526`", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"0.`", "\[VeryThinSpace]", "+", + RowBox[{"1.3840594055011526`", " ", "\[ImaginaryI]"}]}], ",", "1.`"}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "30.706033783568294`"}], ",", + RowBox[{"0.`", "\[VeryThinSpace]", "+", + RowBox[{"11.454000333203865`", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"0.`", "\[VeryThinSpace]", "+", + RowBox[{"11.454000333203865`", " ", "\[ImaginaryI]"}]}], ",", "1.`"}], + "}"}]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{{3.801995684107957*^9, 3.801995717985318*^9}}, + CellLabel->"Out[70]=",ExpressionUUID->"4abe87d7-27ca-46b1-a538-bd1bd5a81df1"] +}, Open ]], + +Cell[BoxData[""], "Input", + CellChangeTimes->{{3.801986803368832*^9, + 3.80198680782872*^9}},ExpressionUUID->"7fad1c66-1cd6-4763-a597-\ +5196829fd2a5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Riemann surfaces", "Subsubsection", + CellChangeTimes->{{3.800338173104447*^9, 3.8003381794532557`*^9}, { + 3.8003397372737637`*^9, + 3.8003397409852657`*^9}},ExpressionUUID->"a46bc08d-2a3e-4fc6-b5e6-\ +d8563708aeff"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"NRJ", " ", "=", + RowBox[{"\[Epsilon]", "/.", " ", + RowBox[{"{", + RowBox[{"ToRules", "[", + RowBox[{"Roots", "[", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", "\[Epsilon]"}], "]"}], "]"}], "}"}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Plot3D", "[", + RowBox[{ + RowBox[{"Evaluate", "@", + RowBox[{"Abs", "[", + RowBox[{"NRJ", "/.", + RowBox[{"\[Lambda]", "\[Rule]", " ", + RowBox[{"\[Lambda]x", "+", + RowBox[{"\[ImaginaryI]", " ", "\[Lambda]y"}]}]}]}], "]"}]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]x", ",", + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]y", ",", + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], + ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", "16", "]"}]}], ",", + RowBox[{"BoxRatios", "\[Rule]", + RowBox[{"{", + RowBox[{"1", ",", " ", "1", ",", " ", "1"}], "}"}]}], ",", + RowBox[{"Exclusions", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", + RowBox[{"Offset", "\[Rule]", " ", "0.05"}]}], "}"}]}], ",", + RowBox[{"Mesh", "\[Rule]", "None"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"Opacity", "[", "0.7", "]"}]}]}], "]"}]}], "Input", + CellChangeTimes->{{3.800337857557605*^9, 3.800337883825984*^9}, { + 3.800337923599936*^9, 3.800337925887891*^9}, {3.8003397715021753`*^9, + 3.800339773529853*^9}}, + CellLabel-> + "In[187]:=",ExpressionUUID->"de2fcd2f-38d0-473f-be89-2d15deffcdd7"], + +Cell[BoxData[ + TemplateBox[{ + Graphics3DBox[{ + GraphicsComplex3DBox[CompressedData[" +1:eJx0nHlcTd/3/5vnSRqQISEpEpIprZO8CSFjSYVMmTJT0YBQZiqiVAgVDUKF +OBVCSUrSoHme53n63equfT7u93f9cx497fbZ+7XXXnutdU5nvNXBtTv5eHh4 +7CV5ePhZ1/G5K1/29/fTeNXIVne/NVuR2nUs/G7kgW7C7boskwQS5alg8eHO +B3LaCE+tg8sPdslRdQ+P75q4rInw+32HCkdIDqd2DvZTTfjRkc/GeNHD2O2L +CD9wYM3pPmcZNk8jPDhjZ5lJsBTFw/6HXDNbSyz9rAS2B+SSfC90fwrxYv+E +L8oRSpnypx/Y4yHcItc/zup7L7DHT/j+p3uXXGjtBvZ8CW+NmxGtu60L2PoQ +fl9MW1ZvQif+THhvrsKUNOMO8jPqqlh2/Vv4UQWiM14n3bHR2dstR3RG3t+1 +QynWbTjRGfn7GQt7RinLEp2R1z5XKlodK0N0JvepW2YUkiVFdEYenf5cy2yt +BNEZecjIxIPDW0WJnsjj9pskz93dS/RE7ppgKyeo3U30RN7m133JRr2T6Il8 +/fiKrcXm7URP5K/nKIsJlbcSPZGbat0wn1/RAipsPbst6RFe6W30frOGQ3os ++8R2qF+HjNH7CUsZPfF6/8FqvSVfZam4/f5HrHY20c/Y/OPvYTYBpsOInth+ +hcmktrAYaaIn8mNT3o2qrSF2SHid6LcLtdpiRE/kUXYB8/N9hIndIq/W4s3g +0RYkOiMXVU5+G6XVTXRGHn3f3Lkxs4PojDyp/13nOM82ojNp/7nrxxSnFqIz +8pUBJz9afyB2T3ivTbqGu1MjsVu0O79pF3X/LGR0Rt4pcH1qXNhwojPygE8R +O9ZNkqUCLH6WrVneRB96n/2l0a6JzvvWHSXxVIbojO1f77kyfsNCKaIz8m/0 ++jPFhuJEZ+SXn20N/rFdhOiMfE5Kudiim4JEZ+SuNjxbpmfy4X0JVxjuck8l +s43oSfpZ0FO8ZVUL0RM576rTx4z/NhI9kRfsEgtzO1JP9ETemBgg1TunhuiJ +895jq1ZXlixH9ES+ZbwkXJrD6Im86FJ7cvijYcQPIH/h9tOhXJbRE6/GtHj9 +Q3FJoifynqa7SyZ3iRI9kV+SeF42ukmI6Ik8PMcvSbKJn+iJPCvpRlx6Aw+x +W+TJEp/fbn3A2C3yFQdUrwvZtBKdkX+8pLJu4nFix4TfWje5+ff4eqIz8sxT +O474NFQSnZFXOv7Rnv6ylMNui+hZ1U8lfpyW47DbInqK+Iq/pgWyHHZbRB85 +piNz5z9GZ+Q/PRKXd2+S5rDbItrDxd98iaYEh90W0baXDMc7iIpy2G0R/Y16 +WSRbK8hht0V0Z/mV0Tey+Djstohek7jm6s07aE9FhMe56Y95fqET/rXnItpP +dPmOwO8tcMXAwUFndBPhGQG/jMr1GjnsuYg2ir8eNd2pmsOei+iAe8IJ1ttL +Oey5iNbTK5h/alQBh85p9AJ5mY6wFZw6p9HtLaezzzzj1DmNPvxyfu81CU6d +0+i0ZS86PfKkOHROo4/6XPyVECjOoXManWB6synHToRD5zS6NmbhAqsNnDqn +0fu8k/Lc9Tl1TqPn6Runn/Ls49A5jXbZ8OS93EhOndNofzeNW29MWzj8Rhpt +oJ3j5kc1cOicRiu6RmTbjqnk0DmNPnvk3tGbRkUcOqfR9w5neU3XzeTUGbjo +DFx0Bi46AxedgYvOwEVn4KIzcNEZuOgMXHQGLjoDF52Bi87ARWf4/+tcBFz8 +BnDxG8DFbwAXvwFc/AZw8RvAxW8AF78BXPwGcPEbgH7DJ3uki8zIJmiwfeKq +o1MEn/Om+F6h/o/fAC5+A7j4DeD0G3h/LucgcDkHgcs5CFzOQeByDgKXcxC4 +nIPA5RwELucgcDkHgcs5CFzOQeByDgKXcxD+/+dgE3CJ34BL/AYYv6HO+6/f +4vGwa4Kfa+5euv/k/8RvwCV+Ay7xG3CJ34BL/AZc4jfgEr8Bl/gNuMRvwCV+ +A4zfMO9oHso7gEveAVzyDsC8A/XU7gz1HJPEat84TGvEyv+TdwCXvAO45B3A +Je8ALnkHcMk7gEveAVzyDuCSdwCXvAO45B3AmXfg73HJl4FLvgxc8mXgki8D +l3wZuOTLwCVfBi75MnDJl4FLvgxc8mXgki8Dl3wZMF/mqPMAlzoPcKnzAJc6 +D3Cp8wCXOg9wqfMAlzoPcKnzAJc6D3Cp8wCXOg9wqfMAlzoPcKnzANZ5hvqP +h09qTqo5kb20b+K52VM0xNj65BDufy6r+WkUjjMHlAf7qaely4R4R+7iYetf +RvhUK/PVqivaATn7SnfzrFVa976Nsx/g0g9gPxzjBC7jBBwnjpuMP/NbT7yi +AoV2hTzVvEvufqoCe13iCfcRMvR4YixB+sffW6hDb7x/godwkdhCiVsTO2np +xy2fOg73knFgP4rQ4TWbp53ojvzOpS+PvXzayLywH89bK0Je3mb8HnI+hwX7 +z58WIvogP9P78O7kMd2kHyOTxc2Gt1roip5Ztt4LBck4kU+BkVUmiXykH+Ru +XX6udG8HWRfcNyolhWbjr/CS9rhvFo+cNqHtQxuZL+oHz9Vi+Jb95eSAHPvH +/hxUHXnlNvUSjvsg6cjNyIfJfeT30R5u/9nPq0Ex8QzyhDy5ip6fvBT+jNcR +zufXRr9oAY75As6XQzfgohugbiSOZHOLrRFZH6Z3ca4j4Dpy2AmgnWB73K9p +VWEPqrNFONcXcH057Bm42DNwsWdAe0Z/hbzKMGHcZh1x0h7t9HkP/4aE65Jk +PNjecNwXYxEXZr2wPe4LDvsHtH/8GduXRp7/avysg8wL5xF2fM25XEcFzvHQ +OB68L54D+3a5X511rY+zfxr7x/XC/bLsPx6eUoMekkeh/S8qHkHf7+bnXF8a +1/ff+CqedsmxbvCp+c3JATnaMdrhwWt5byeJtRE7RL++8gv/6TjZDs7xwL/j +IX4A0A9wzAtwXhx6wr96FhGd/iwKKszx6uP0S4B+icMPAPoBDv0B9R+aZz7Q +hlLKtyY2Qsq0lrEVK3ko5HNGLVs3cVkXSF868rudFVdwtKex/ZA+GaSfraG/ +sg4/4CX9eP5QLDC81QNyZnuXh7Lui+3H9P59HnmgGXyUn2dc+cxHNZ0t238g +p4/Gq0UUb5TTEwXkgFw2woPWevh/zinAc4rD7wH6PRxP/KButXD4+3/h3f/1 +sdevhIzn2YTRF4XHdgLHeIDLeADHg+uO67lqzfkCxUOYrxG/QaPf4GgP2B71 +wfuvp9s38h1mOFtPOv2y9TezyH5O+6TRPk/s/B4a6lQCQfrLF+VPa6Q3zXsi +NndZB9v+KokOMwJSmpot2oDjvoD3xf3ZdlJTx+BDHz36xyXPpl4Ftl0lkf37 +s2f6pSRjXjLOUy+ezcuJbKXvf9SJ/49HgOJYdxrXHdcF993148GW8nv6gaMf +wH6wfdZO+4T+/naYGNO94MNq9A8RZPxzn/Kf1jARJ/fFffN2Vbqr3If/Y+c0 +2jn+Ps5rqbNKiZ59B6ed0GgnqAPuFwGXyDz158LEnvG+fjtWju7PIv6f3Oeh +3Qr1tyfagaM9je05/D/9r/8n86W5zJfG+XLcl8b7coyfxvH/u7/aaInpnaPK ++bqIDri+gelrhYzlu4jfRq7sWvkkNYQ5ZzH+NYxMWjVumxCxH1zHvUriskK7 +hMi+QK6/TXbtqQxBCvPi9iE7BC52CGiHHOsIuI4c9kOj/aD9YdzbdXi3mLJl +M4c/yaFz9h5/tDepjSNvLaNbLkmOr5Bo5diPRfTjxxkv3lYy/gd1mL/wR47D +t27O+IrG+OrffLmMNp72+07Yt06iP/tK63yZJErJd5D74r7mnzmP721XG3s9 +SqFxUI86qJ8l9LN+bzvnutBc1oXmsi40rguOH/fFYc9e0Vg1PoojPqQxPuTw +wzT64fxCkWFGlkWEh+5/c+rJ5x7g8A80+gf0Y+wrfTbi7ELHdkZ/5JmbFZPO +PW7jOC/agIs9w7/2HEHsJxryDMX5mPwC98vxmTbjLft6yT7C833p0i3vtwoL +UzhOXK/cl2PXrM5t5YyTaS5xMo1xMsc5S/97zpL4mcb4mSOeoTGe4fD/NPr/ +f+2qBdY/Tjz55nYncMSTNMaTHPEJjfEJx7lP47mPeiI3KzQOahARI34M+5H8 +0xvzNlSMzAvt5910/eXvWpqJfeP6SuXvXVRo00L0R/8z/4hDqcF0QeLnsf38 +pM9GI9f2EB1Qz1DJkbKzJdvJ+NFPhk8U8T4d3w//jieHPrXnQ7zAhSaOumsO +PbXz1KGN11tI/+z+6GcGPrMXvW8l48R911bp/cfpKzNOnK9ycfOWvfN6if7o +zz8IRQU0JjFxC45TIMEhY0oIyb9otMOwKQrxzztEyTmCXCTA2kE6ToToj/62 +SrbW3PemMNEf42rvbL9PH263ER0w3vjl6Cql69FK1gX1XOFW1O+S0Aoc/QD2 +g7ohb7pvtPtRYjvRDfdjcpxraUVpB8d9i+ijXfalzmVN5L6o86Utt4cnP2sm +/WBc92d97X+xle2c4wfO8WN7GyfKsiOsjdMP0OgHOPw5jf4cOepzZfSLfsNa +Ho76ZxmgP+doD9gedcH1TMyuexY3o4b4F+Rr+OT47lWVkP2DfkV8Q+/GEJvh +FOZRyENMmmnZH8Owf8JTetWnJGrK4LoTzj839eh3FZJXEn5iCmSH1IqiPyTc +QjvhytE4IZIPIn8/Izul5xE/iYfxWpz+3GSXP1OfQZ6X0Z487XY3x3kaD74h +HhpTnJh4FfMLjIexH7TDVeU8vUdbmToV+j08HzniFsC4BfvHuN3ua3ehzCSm +f/RjE8MiykzG94N23fQpOSEZ0Jway7/Wqht+vxFcs3NSP4e9xdOTrOemZkky +zw+QKz+0GS0tzPmcMZ6+4jBrxiyHCo7nCPG0o9B/LkdPFsK/z1nioSd3r6eu +ryyJ25GvsEwLMgM5jucv8TDKWMJft0+G1F2RezTXN/rSnM9t42FM7HC1LRc5 +n9vGQ/2OOy80NnI+t42HG6+OWptqcT5PjIczb0bNah7D+TwxHtpkr+w+bc75 +3DYe+my8Cy1bOf1APKCeHPsCcF9w6AaoG9oNe3/T++5JaQeMyefkgBzjSeSr +jd/KtZzL5OQ08n/z/Ur6lSKv9yRXJt5AvaN0cwSKn3UQf4jj7DrwWM1rVgtH +vSICpny7Gn3SmLOOEUEj5+gfsP+h/VAIgd7ZPYa3GkDyo5DoU9N+znMQ8BzE +/YL87teGa/5B7SSexH54Z87sf/GJqRehP/BXeGF2+WEBR10xjb5tcePYvXl5 +RDf2eUif5pevLmzNIv1ntOob5EQ2whuT3tWhUzqInY96E5XeqtBDN1kpGKwY +KU85fEsYI7C8i7xnuE1mw9YlfnJU70uvWDNf8ryCHiuS1//5RxcsdFI0znNo +Jf35nB79iy5rJ37cdv482yWHOulXf9TmXpw9nFpaseRy5cJW8v++6gfGZCxo +Jee00hUhpS1TWujTjzX9ArKlKHPNcLs72SX4/JFettBgmeUYCcrJ9++HEW/J ++wV0jFdAnThPMznP5kRn/J56vZG+HFiyJWI48xxT+kqBoq1EHX3w5F4VaXNh +au+H0H0nfONoPYe+nRsTq2lF63WKkUcEKd7RJ2O+xTbDDva4Iifc0r10sRFw +3z0Za+Zwe3UlXbNCW1HhBRNn2oi6i310KqXjem23fZnJQyksHqvcurwJxPsv +iT/fXEy/9HwfG7GoEXqKe2XWyzeSdfw+Jvu10fpG6PqXQwqbc9wXatn39Uw8 +uf9KRix7vapBNtPQMHQd8xx2RPOHgfEAODgOjgf30Rbr7ZP555fCyr9rvL++ +6IRWpX/mC7Hs+XLoCagnx7rAcva61P6rM6DOjv+uF7xlrxfHusMp9rpz2Amg +nQSx7Ub1yKBdQUXBkF1x2C2g3VJs+9zJ5vfY9slh/1DPtv++f+0cRrPt3HDZ +VFqIlxWvs6+e2u+kdtPyVEHhlvGObq0wzXd7x2O6h/ZMzpwTGN4BdkH9NQtM +W+HvAdXhfpYdtMpE+91+rHxBwVq4sqS7Bc4sOdP7XK2Flow+Bw+TmiFR0PoJ +NOfSVWnpo60eNNCmFuI+IZGi1HeTQ50VJi0gU2f/a8v8Bvq4QEXo1KlNMK0+ +cFj1GRocN56aY+dQTl/slIg4wcoTL1+Q2EVLF4AxnbfL7WwJ7SzZdv416/w0 +7limaWHRDAHfhMX++6+SDh7Gk+Zl2ggCYnknf89pBA+hdOWt1zLorzNWb9c0 +boTrJ1OhmLcRKqq+3QHTRHC4vdPQnWW3OvXausqRT+jDk2o91/NVQWB98crP +lAAVHJZxNdroI2SvqnZbO7oc1l7XPP34Dy/1US+pOUenmBb4nehnmNYIYpVT +5J+dEKf0X0yfE/I6m940bulMPs0GyDipasQ7TpQas/f40ePxyfSGaslDz8bX +gud1iZ/bw4WodQGp7tTWFkidW6l9QLQe+sx2nXYUa4KH7pW71mfX0WKnT9wd +O4mVB47LCvdVlaG2ezyqrBKrpOtkT+tdsm+Glk9+Cy+XSlJfO048/CPfCng1 +87xSRu1vATfp2wfrx3TQboemBWtrdMF7o3TdxvfDqdEWJ6Ta5rLyn7dhjSUO +HdBwyVx54hVZyn190v3TNq2w6r111Gcelh8UnqLkNbYdok7dSPTh66blD/y0 +/pnZDZYPrI9/r5WjthXOPrn2TitkRxwKLnnXB3OjbmlPEe+Cp+Lf4seV99L5 +/82+dPtCL91zc8QS03EKlN50ReUl8/vI87g7lQX3nPUVqPkRP8WbNv2B2+oT +5l1OLYFJVgck/tvUBxzrDrjus9n9Gy8Z7B+q2P0vZdsx+woebHte+O99wYt9 +37T2s3tMN/XTw6SWHzpr0UfHSmkISL1huOwQh3g2X8ge552hcdLK7HGi/9k+ +5H9oI7b/Sdm98KLSgmL40T+jW6yHxfVnj9nDylOU+Fr1P+UXk/Nz7WTxyZff +dsAptn3qDtknfY1tn/nGXc1youi34umrB4Wf/1JpBNc3XVPM4zHe6adVDAol +av92wpxZZpVTwxl/oCNwTr9mBDm/wF0jr/CnbAc9fNwe0x2LWmFx/byd4ZeY +97THvbbdxxNA3pegj7UM3zrOopXusl9zPkyeiQ/PPBONLqpopvO6trnrbJGl +nry7Sb/VJ+8T0dvlPlSfjmoi582wYzuLZ8s20u+NIWV0jSQVWBLycodWJI3/ +rzx5lYtUjgCJA2/s+i9+Vl4VXXI1QDqngDmPqm8XH5FPr6SvaNSvvvye8f9W +BdIV50qq6N1vR8kf2tINVez+8RyZyO4f/bPs0HgAx+PbML1HK6SR+P+IaueR +Mvtl2P6fdV54eY+RO1wPuk7T/8hdFSPnr4b/R+lljTWw9UXxmfXThamn/+oA +VmwdUM8jQ3oCp57OQ3pCLltPjnUBXBeOdQRcR451h9nsdeewE0A76fO6Ga2y +uwO+r06xX36sj7ab+WTGs9wOmH3hyaUT3m0w5qbT8R1K7bRcctEGx9gWWP/C +cHj0hXaI+WEvtD++i37b7lWVwsp//cwc32zR7aQLGwv8FIJb6HxFLd8N+sOp +Te3qHav8WkEvyqJu0flmelyvl+gflWa4MmfNDqPWctpZIGFF/ZUGeorQwnRV +Pwlquc0nkYRtGbRc9p+9wva19MdDEvcaqoSpI2qzF++73AJ7x0S65go10C0z +cls+tjXC7RfmnS8mXKP9eZNSJ7dWgVrYA3MNCQFK1eHbMKutP2AuX0WVbmEl ++F5/a+FrwEu90PP8JR9UCJNlfgoFJlfBlvhPUedyu+FS6+NbyctraYuirkov +s0aYqDD8UZm/FFUVJS8b5tIClr4NDUkl9bCmNkzhjHoTZK599cH0eg89b5r0 +5qQ3raC1KFp6posctfXHiUr9EZ10k2GYwl3fFkjamjLXY95wav2p8bpSPq20 +O5UqKePSDIYxXmXGVcOo/6JexgQeaAO8ZqxyNLptz9p3BrkL+praQfm5/Yal +53tgz2RZqwPf2uGEwfuaeYdZcX3AlYxnWZWwKmee0mk1Hvb7MzkQYyr5pnBc +FcQt2HLcfHsfaa881J7m0p6OZbcPZeujOqQPXbW/+m5UajfUawwEYLng7zU6 +/sDKKtrMjr/lvAfzvK/+6bOe6rNVtPUes/l3//YQf/gnb3A/godAxxK5vd3Q +dNz92IMm5v38QFnbUnpqN8w9q+Sr+akIlDzFrJ43VUFUsp3ytNAu+MjmtzwG +Of1t+Aynk6LMe+Hs/Uhz7sepQ/uRtmDvRw5/Apz+pHLIn8Bltj85bDBy3You +T1gerAgl76ton/mhqfoP+an8c48KLBeV0ccjLKdcNGoAA+0b+75JSFDb8wSS +nhnn0SqBj0adv1YHP24LqygfFKV4rO+90XufQv995jK282ENRAStsnf4KETd +ezL1xnvpz7T6GRmr/3qr6YNOT3IlPwpSmstOFxiO/Uzrd4jvHNdXDY2JVje1 +vghS58IuaISZtsEdn0KfEePaaM2v82TmrGoB6eqpz/pftQBsFZR0v9BAP31a +udJPuQmO8kBapMYj6BrrMerbkyqacs7WNTnGT4m/OPtO2a2ULoyL2bZsRgOs +cVkxKj1BnAp3+7i9fl0G/fioQM4M21o4WOxfP71BmDq1aNkN/XO/IMGGb8nv +X5W00hh4YHSOh8rS9L0WeO4PPfvwKGk//1ra9chidRdlEcpwjhqvfxANy23D +TBfPr4J72/smz3Pmo2o2KuyYcK6YHmE2zuBGUj3t3Dr9sHO/GLWUz8jt+sdW +GLbRx8OMvwX0Woerix5uBpYD6VgY2AZvxWaOtTJqh+yN6iobc1vgztczj76y +zkGFx86Pu9tf0l88TD5sGtkIe1pk3HsdU4h/dayI3e8yUoQ6ucT5ZYttAdze +Yjt4HvH6nB+/MJmHvG9mtX6n1wTnYHqDZ0/Q9nvMe9Q9D/7mjGPxebbUB/ku +pu6xXzKsewyLn/Qw+vk4UorCc8uqR+bbQPs16yyjIhyYuse2s6deqrG4gf7+ +MzkrmLrH4x37AVhcpDxOLWISU/folwyedZDFF7dd8E8ZztQ97CfHbfvG4v+l +ClubGjHxhlmEyMnVZ4LpuJxtC69WdUBwfbqzGutc+CTW+nyxUzCkOmaYX15V +AQFzW6Ius86D8/+1pJvdDIJDN+/3Fc4phD4160F9YvQG9YF7pZcH9TE4Zc6T +5/8DPlgVJuw83w2q8cXv42aJUN6h+l7x8/qBN/X8tkdfAulJu8XLDbb8gUK6 +bdgq6WaYeeLlz+6YQEhcMDkyzLMOot23N0/3+AR/y0Z76fL00Rrn67d0zBaj +8tsexr859A0WO3baV6T2wNaJiycpUaKUubXOPiHlHBBaaMCrOqyT/pu8ZnPT +kV5Y2RM9evfSv/CfnZDc668t9Cfvo+5JyXzUnKCEp+mTykh8kZ/58Jd8dRvc +TzC3qq8qJHWgz/4FY68u7YPKfAP/V0vzYN9pv8PfcpohSuXv/AfCfNTvQJnj +pncKSZ15p0aqrYllF2xmj0dwaDyQzR7P20NeC681Z0NrbPmE0Qad4BtU+cnm +BvO8Q83yeqNpXzPdmvxKsLaxk+S9GoUbkhLVu+DnMtkwCTlh6rec5ZYRi9JJ +Xep1/VhppUVC1AMhx7OyVQXwJd3umPfdRlpIpG7ptJU81Otbm+iJPwohpE07 +xGlhAz056oPLMe8++OATKjU8rBTc7U82fhGuALssAbPG3jaY/q8+UMjWZ+ty +vVcGYkXg6aLAOy6uHgrT94/tk+0D+aWVxklUMfzq4yu1+NUE18xDspPnMuOv +t54iKXGzl64LiDa9souH0nYdy1vxIpXUb/ZqB4j8seOhxicfTjH5lAzCob7u ++qr99LM2HtpdkJfabn7tzegJv+HTwxOh2hN76Aj9djOD6H7yvON+76/f21/3 +0w+3ufdeWMhL/Yl0G5P7NQsuTOzzuLmxjbb7dGyLWR8/pd8f65pIZcHeCaFd +47e1QeucfQJv5QSolIjIjc53M+Dh6gmnXerbIfDYU2haJkhJXzBRDLDIA/mf +p/Ot77RDrMJcb8mNPeBcZt86b3MMbKqb2Hv0aD9kNHppeu8Rp+iTPYM6jKSE +BnSg1z0JGtSh/Xj1D1ffGPj7osWn8kA/XSey8Nz5HeLU8boDN1dF/YTp9y+F +qFV10WetJa2qw5n3/SpVdqzRUemi24pnR0tKC1O7LmxxPZVTQJ5DWaYKRvpI +Mn+3oDBy9f5rxnXQUNAiZT6pF77uzkgxtcyATPbzF2f7Dz7mZoLUqvemRU90 +E/F9cLjmHbb2ohkv2y8lQXV2z6wvsf2wp2vH8RMUL3XwSKYKj2UeTBO3KHK6 +005vN3w3SoKlw72W5CgwY547H5+xfqt+PvOcQqZhp9efO22QsrC8T+pZN/jV +KimtuVoKxj8KHNL9asGe+hTktbwdJFKkD21xKYUtO8/qVErWQ/cl83kvHZnn +yKvC1v3qPdpHhy5JD5G5J0YlsOeVzX5ejPOKmrL5TIp/HoxmPy/+paDbu/QD +LzVWSmvQ/lcbikjwnK+nDWWzVp+X74NDhlu8hSeXQfinBEFJ1Ur6x7cPUJHG +sv/bRTahtZmgw34OKyE19aXbmj5olle/qmD9Bt7N6Jq3rqefjnk07U/qD3Fq +zxcTXcd9zPMav/Ll63r/MjoMG9KBRh2Q33i/YYN3TBMNzkKJntOY95puDnFA +bq/Va2rD8pPXXzQa630LpI9q79R0YPnJp1tOwq4H7WD/3VVYODmQ5lHqeP5+ +WDnE5mlvqJ7VQ28TdXnc9z0QLAqSTRoLZKnAebZHHj1op19PflM+OTkQWhrg +2n5qGJWySs/STLqZXnGzPnEKiy81qUt8tUiacvexuqjSVUM7DVt1Vo3FN4FG +7y8RCUrbPGLejd/FtLb9NfnxLL4/UqPk/G8Ryo/2tOve9psOnfuwSJLFt6dc +ulb1XJAqks47FpoQSHvfmvGqhDWexFeXX7y9zUd9+fFK4SEr3p6kEhp9m8Wf +Xzu5qnhRPwQrRATGxBSAup55ozKLO22c/7ntaycYhD1RMWbF5etvRN6pTwqE +KdI5cuOrW+DnEscJFzMLIL+l89PvG43Akx4ySZrl9+pNQre8mvkbbhu50lu1 +eiDUAcqWxPTDDX+FQTtMOjRoh6x5fB60w93s/WXPfl5jzt5f37wsKvQC/hI/ +Py3P0+PQIz4q9tOqpgE7tGbHBcUxJe7rZjPvF704dzJDemk3vatvoZWSLMOD +o5fbNm/oho3aG812j+wHGBemkpFbCMfkt6U+MGflSyamnktnd8GIjW9mLPb9 +BWnPI/qz7Doh7KDvpM0XhKhPTdGDvM99kNM++4e4OV/qWh3eYmiT2xAS8LoK +Fm6XUU+I7QJXR/uTf+OKoG/162CbsmpQ+GoYU3kV37/PgcLdpVtDuzroDuHD +PmqWvSCgo7F49dXPxD8va/9jMKtXlDqXbzV4Lm/4OXguQ9SZoXOZY/w0jn9h +usdlLclieP045UP8jBo6qFb43l2XbhA8Xqd2ii8NlluM+aP1uJc2u3Lz1PRD +PNTmk6t7Hj4oZd57WTG1oGt6O0yMWzgyYeA7CHPH9YYEBAFf0JTuoAVy1CnF +1mXjzjWCjc2wG49iA6Fe5+ed3Y8awDSgWN/2aRfMtG8KKmLFFY9dP4/t2VYE +FyaPaUlWTSfPYRQiunalCzPPB1cGP5MFq1a61qDD4RfwU9udn4z0auiBkgfH +5I4lBtJOTiv7hJpzwWayiPxvFv+0xsEy9EMgPDis6ryoKRcklm7cUcyKc14e +kbvYwBrP46gPmjmWf8B34fLplaf7gN/vx/EQOhDu+A2Pu3IyC8z0JXdKO/SB +99a9vve+BtJax1fTmizOoQ+gPl3pyrdzmotAfca14L5JlbRkiW9cRk8nXD91 +/XmzSxEYlUxN0FUspw3vgqLh/U4o2tMo2cby77LmTVv97gfRjurWf0Nm/wav ++95lk58Xw7NYu8H4zXGBz6sr5R3wyDdDQeZxIUQeOsErtrYB+pVdJG2+9UHY +o18pK6xZcdGy9+mTXjWA+zW+BxYm/bCMHV8tHoqvAOMrB7YdZg3ZIS3LtkPR +Dc93OY0rhQO1ZsO9lzTA+9LyR/5p7eA0UXx7wsgSMF+ZEX3KvxykJl3W6BLo +gNdlAh+ashuhYZOoa+GcIDpgz9c85Y0NIFHbOTOprxHOeY1dXdz2FOxuf1zt +rNMANX7rZK26s6HtpsdKPa1O0NG8oHTiQi90b6M+nrtaBA3nepWUasvoo6qa +WclXO+FYcJyg/r562Flk4+fd+pQWSZI+3mPQBGu3yi75zFMM97OkFQX5q8Hx +Zy/vxKoumDKitPbU5lLwCBr3+HRrHb29frr44vPtoL57w6PD7UWw+PNn87XP +q2mtRsjqXN4NOuvPjY8aeE4q/EMs0jGY1l3gZhXCsttJ/80e+Z7ln/MK7c99 +ig6kVzQmihew/PN0w5+HT7L8c13Sry/T3wTS0tF/xM1Z/rlRNme9Jss/T7i9 +OGMai1vZC7x3Z/nn/G0hxxI7a+gR9oFaA+0bw8K7I1j+uZNfe9lcln++Kaxd +q8PiAf+9UtrJ8s/LbFZsNWL558XpdNlyFn8VVWOWyPLPGauj/AziAukJv/je +HGfxI8YaSd4s/zxuwqyO1m0/QPVn2ecEFl8RKv0omOWfsyNCcqXeF8CxOB5p +/beBtF4pVH9m+Wfjyx+n+bP8s5Obzf2jLH6Wd/W89qoWOMl+XzR46H1RMGO/ +L7q9VtJs1oVUmKxwd8+d8l64/UO5r8OVh+qNyFKrak+EPW09a66f6wEbzTWZ +t3pEqLQblaPqHL6RuuX+l5ML/bbyUoWLb2mrh2WS8zfcUvPFtP0ClFDEI6sd +upngcb9Y50ZDG2i9LFJrPi9ANecWjM/5E0ueE3a4eJyTrBajwnkrnXjW/QQB +D3/lnu4uEKCXX/FMEKakKn9UTsxIJe9lTX5v6BQzU5gy910fdPhRAVi5nR3v +IdJG5685n7qS6gbZde56ugVF5H2P5Q6y4ebXO+FsQfkLsZTf8EhL0H6EQQeY +aso9+3JTkPobVF9+tDwZ/PaEKjxWZ+lr+jxqIO71NMkd1KF7b++ADvROGNJh +M/u+W4fuC3ns++Y8XTMmTaQM2scsWTBWsAbWufEazO5vAw89Jdkv50th0ZUi +zebXdeAVdfB+wuF2sNWQ/d59l+hA55w9b7+rToyS+TAUDx9eOxgP0+3seLhR +cdhpXdF8+JUkmS+o1UwvjB/1Wu8a83dMa38kS/ySqaP3aTi/EuLvBbfDjy0W +viP5FL296VrJ3O19IOoSLig1qgzCXn32OBdWRZvmux66VcCKx5VMBH/nRpN6 +o/H1LMcX6eLUtZkPp9WuzISm4ud6nx530fJ2Am9mu/dx6kyjztXscf4cGifM +Z49TbEFF39HNBaCxTMEu70QT7T86s+NeHQ9VXKz/pl+uDSo6JmZHs+Io+Z6J +CXpXK2HTq/1z17DOEX9eW7Xn3wPp/YlKJ/StiuDxkr/r3Oax8pOUmXVJPwIh +aY/M69yW4ZS5rlmQ89Mu+rftg/mTWPHP2dw7J6LXyVL7Kta6zZFvo79vEDw6 +EEf9yorRefhShure6mtTd7aRfiwf/30g7so4MyJgm7oUZdfgH7O8sJLer7jU +diBO09tw++nuJjFqtpTUp+iYAjph3yORsSx+INb43fh4YWrTeAtzn60/6F8T +aQlWHAg3tVbtCvAVoFaFn5V6kBAILp+vrf7DiqPuiCumXbzJS3203iPauu03 +nLSd0OXM4nOUk19HmLLOmboYqcu/i0Hd1NdbmsXbt2QLnpDpANrN9bGwZwGY +/HZx9mf53Tyv1pCZPjxUOtuerw/ZM63PtudI7Wr5ATucI+JFseyQ/iCz6L8B +O/xp1/h5rXUpHN63P106vo6+ET3L5Z19O3QfHhv9d0khfK4/mLh/eCtkjRi7 +wCG4C/qODPHFQ5y2YHPMx/cP5eN0NDsftwl5PmgngWfDBuwE5m8bspN7v6/+ +TTuTAZKPXbS9D3VD3sbGmPEz++FpqmlY9ehC8j5P+LoLycK9/bAt19Z3YL7n +n0m4sOZLL9VJeTEwXw77AbQfjvwdMH/PFHH7uV04DfMIKNbM36k+TZjqlz1k +uco9A3Qjl6aGbu6mg8pMx3pN6of3WhEHFk0neT1t62jounixEMXL3i/BQ/uF +lXIN7Zfmf99rhQfs91of1g/5VQ/5Qb9Kr2T71VJ2/cRgqH5CW7LrJ5rHXXXG +L8gl7+ndOLQyZ9/zHpJ/eR8bF2Li1AfBqj9iYv3FqL+1m5ds3ZsIxkbFFR75 +/fTpR4fjI4x5qVrbe20q89PBg/3+0ugP7WXuQjyU6+1RtsVrMyDkZqhS1vVu +2rnisZ7nUpaf+7d+Qm9n109EqmYeiLifB4e/3k3l0W6H5w3BS6Yr94Dif4Gf +La8lAm+S5BeB0n4YbuRm1My67+x/6wn0PnY9YVX5Bx8bi1zMf+k9+xKDq5/2 +QJtzWYw/K2+NKHq+8LNAO53pWbetspHlP3vqTgkUlMLpUXNcMjLKacF+daOK +NuZ9Qh5XZfXTZ4Lpu1Ovv1ik1gJUtN4EPVb8lDRNPOmKbxCdWPv6/dvqepgx +JeidDisfdtybtU0lIIiee2DDPp5VFWB9Su39QD3NyvC8aOaDIFqvtt+pdg7z +ntXmSkN7w0dBsEpt2Hiz/6krxmz6qGLE4n+POh0T/5+6ot7l/I6VLL7ye5nH +9f+pK54frT57oD391Cn23v/UFQ/eu2dvwOKPvkm3xf1PXfFAZ+juaSxuuflb +4p3/qSuKxGcc63sYBCcC69wi/6euWGOTpP6ExZ3Pr7XQ+p+6ouVUnVIVFt8e +2VtyuKoDjsZcixTtqgGvs9Yj3iYGQnLm95CZe5rhqvYEP11W3np+tGBR8ZtA +KL9j6tTKyluF/807aMw7ijRlTpU8zYbT7LpHhGXTr0mu/JTrDDmV3Fk9YL5q +o6oKKz73midVFy7NvBe0TXR1vYZ7EDiN8D0VHpED4wTrZH1Y7RcrRkwOY+UF +WWNmxQvLFJD37gqG8iBoZ+dB2I9zhM0iYf8gmr9y1LvPrH6enrKodrxYyj43 +6+CGar3qsxPtnPUuwHpXjndTSqprPpgs0BV++L6NHqlbmP8yqRtwXvh+4Av2 +vNL/bQ/YfvX5Vy1OX4ogMPeho86TCjoh7kxmRGknHPB4ORjPn24ZjOfpcKXb +g/E83yPlaV59xfD163Z+o/5Guu3MUZ3dkR2krmdjL67S/iAITBwVmiex7Lnf +pkdkIF8wUW086+4ZBCUV633vs/IFjJN25xwU28TKI1SVxbd/38e8n5Zs8lEt +m9XedKxb/AcW//FvvkxrsvPl06sqR4s3FMOFsYanBDsaYfnIkZ6Hozrgyb9+ +GF6y/fAenZ9Ry1yZ98osqz79mKrcT/LWZUP5GtSw8zWjO1qiPnNLSf3We0ru +267X7aTu2jJUd6V92HXXB1oq/HNtikFPZ6TQTsEKcLtmc9m3j/l7HO9q4ZPD +v5fSqlVvDtypY/Xze8vEgXzz15wuH+0vgfQfh4cZ1qx802XshdTFLD9wZlqT +aqdLMFjFjhMRrqmHz5ereyJ7sok/t6o214p37uXkgDxZatfDqv50EP54+56g +YQ9UfbeY5vWjH2ofx6eevcX8vcahjo81+y50wus9noo1nTVwWPyORcr7QNr2 +yb7RwNpfFpuGnpfhOk9VZT8vqzHfRPEVg7Hot/6Q3EpaNur0x5RVXTCJv26H +vzbRjZ4hqlrcGdkOzuw8SHYoD6Jl2XmQcra/44uBfGdLw9bUi1V0afSDR8fD +uvC9rFi8nlwee2iHkgT1l7VYA/4N+QKPhj7aXYyKHsAs/4Z8xri4LfzDRSmP +ictuDdgxctUX24zC7wlT+YP9VBM+7278uvtThajbg+2LCJ87WflyY6IAdW+Q +pxEuey78AL8tP9u/xcYgnzpunaukDh91aag9mUfsS97RnnfFqGtD/RMeN25U +uxKPKPVnaDyEXzY59VzymzB1Y2j8hPf5nFinKyBMvRqaL+HJFqnbVd4JUZlD ++hBuFF7UbF1Pvt+C11j1dKNAU2/yXDIWdR3rN9tg0S5xojNeM46u0V3yS5To +jFzneec5/iUiRGfk3UsSlrTRQkRn5Cskl3yUMhAkOiPf9vnU9rhUfqIzcnOJ +u8KNNnxEZ+Qfs9a9tB3DS/RE7n/wguPtfkGiJ/Kn+vL3g+4KED2Rpz5IG34z +ip/oiXzPbMejdrv4iZ7ILcNDv7x/yk/0RG5Lnd2ucoS8NxJrcuPgjIHvMcbs +fJi24YsYaYf6XbpfYrpWndETr3OvSRzMuyFMFey2TR34HmMkmy+rHe+dLcTo +ie0bjkiVdB4SIHoib7mUJa9Tz0f0RF62P9z9xileoifyMLcJ6pdH8RC7RR61 +PC9bya8XUGfkx45cefxIkZ/ojLztQsexniO8RGfkoe/LVBX28RCdiR3Bll26 +w3iIzsi78s9U39tJ7JXo9GKHbPvUTbxEZ7S7fM9pT6sWMTojF80U1J/pLUJ+ +H7mWgnuYXpsQ5f5LVG7t8ibaO6X698D3GIsK7+86by5IdMb2h/z7Nh5+w090 +Ri5h5KfaOInRGfkooS3+cn48RGfkx4ZHbFtq2geoM/LgK+Myp4d2A+qJPMfo +acSh8B5APZH3TvS+d0S/C1BP5FHOC/2WnWLlC2w9katkud3uMCd+lexXn1Xi +MgaRPcRf4Lxzvlx1eJQpSvREvqO78cJaNUZP5O4xwquU7YRIv8hFfVwfeSYJ +ED3xulpzytJgZUZP5Kk9AVrz7XmJnqQfk80nxkf3A+qJ/OGlKc4dPj1ET+ST +vy03PpjUSewW+Zs9RyO2hbYTnZGLtHvOzbrdRnRGfmO96eJpH5uJzsirJv5w +vFXURHRG/lNKtaZgZAvRGbmSvF9QoEI70Rnn/WWzibPyZUZn5KJRpbcV0oWJ +zsjNg9ZdCRzN6Iy8w+Tgtg87GJ2RWz7Yc8voOR/RGa/23TPOOjTzEJ2R0wGa +fJtO9BGdkTuLvhp3V6Kb6Ix8ouvxpth37URn5FkPgl7rPGohOiP/ONLiknJr +A/geTnQZ+B4j8itZ+87Nt6kmOiNPevzKbd6vCqIzue/X+Gi+zTVEZ+SfL65X +vTSWOS9xfrcKU1NqNjM6I8+d3pjq7s/ojPxU33HXuGJBojPyEq+p435PZHRG +viptw4+fVozOyI+1p++S92F0xut65RNSsd69RGfkRzXpAvuyTqIz8sW8uZEl +Am1EZ+TqS0WWRyY3Ep2RG6vNCFynVkXsGfnl0lunbE4UEJ2RZ6sl84+yzSQ6 +I5fecO7wL1USr5B59D6WLodkon8sjnfau3WuBt495LxEvktiLH0mqIv4d+SO +MYltu1hxO+qM/GeizNXcT8x+Qy6QXyr9NbWF2AHyzFc6y3pzmXkivzrB9bd+ +ZQPRmdw3qOqhQ1kt0ZmM/+FUQd72SqIz8t95a8TkBMqIzsjbrlz7+GNsEdEZ +uYPX3REHV+QSnZEvspvy7PmD30Rn5DLZdUZPvL4TnZGHaNyJ7Lf8SHTGce2S +9wqK+sHojDx3XdvFsgJGZ+Sjf19MtW5mdEaufOhXpZlQO9EZeaT68I/lI1uJ +zsitlVYnrNNsJjoj/9m01H/44kaiM3KZDINMvug6Mk/kOcU5M1Pqq8jPeO2P +04tpmVNOdEbusznh/ueHxXCJ7TeQd63es1l7G2PPyMssZtSJqGYTnZFXOcZk +X+xKJzojl+2Xt34azMTreP911W/335vQS3RGLtJZXqOsy8QryNtzNrTyb+wk +OiMfQ2tVPjnM6Ix8bvPV/+5cZ3RGLr9i34XH4YzOpP2ScduHZTA6I9c8nPEq +m7eB6EziiLh1HgE2NWT+yPf60TsL2yvIz3gNs91z7WVYKbFn5Mvllmya/ayI +6Iw87rRxfbVUAdGZ+CG3uytg1V+iM3IV76e0flw20RnvMyI30Dbci9EZ+SGz +e46BbxidkfPZDL+wNLcTPNk6f5+jLTXwPcbisqCun+IdzPnNbq9y6uuxC9OZ +cwX52txco2NbW4jOyJffn7un06uJ6Iz8gltucE0OozNyCV7HO91mdWT+yCds +G3d3r2YF+Rmv78KUMrwulhI9kW+Ond6+YmMx0RO588wlzbmJhURP5JUbPo/c +K0M45h0w+eWkHec1+oieeJ+RJ0/zupn0ED2Ruwg+vPj5Qhex20Xv+0IHvsc4 +uaqtzjWa0RPbKy5cZJfYyuiJvKz/RFDI3FaiJ3Lhu2Fbp19oJnoiP/q30yO4 +sJHoiXzrG/Fbb1Y3ELtF3i8y+7FmSC3RGbmNyNaJ8r3MeYd8zmQB8diACvIz +Xm01Gm+p0mVEZ+TSBw/fKLMuJTojfxlisX7sqxKiM/5esp3r6Iy/jM7Ir+r0 +NV4Y3kt0Rv50iVD/59VMXI48Ti1fMPVWJ9EZecsnRcogr53ojNxtWnmhtjZz +fiM/r/1w7I47LURn5DY5Gtm7xZuJnsi3010rc+c1ED2Raxo/ObGNv47oifzE +LoMdblWM7sgvn/l15p1uFfkZr2Wie4b9Eq8keiKv1IqermZVwVnnoaRPfpYW +D+wHjjoPtczwZ71+NaMn8p7I2QuPze4BjjoPNX1fVJqMaxdw1HkobY2qa6Ul +HcBR56Hk5uicnbeqHTjqPJTM56VTahJaiZ7Ip/w3ru/O2hbgqPNQvLvWVbxs +Zc4n5OenF0YHv2biNOSNXy2tM70agKPOQ2Vtlz3ga1QPHHUeSi4z7KxNYi1w +1HmoCSKqW02jmHgYryMKNq//NaoGzg72H8+yg4Ff7KUXRfBozRTlpX4N9pND +eI7CrANlK0QIVx34tVst9NE9GTpXdnQDcr7B7htox+gfdP2lTogYxGWEH/wK +mk/9ugl/O3Sll2fOXHv2WSv09A/8q4fiof7oMd9dj7/QriT84dB46dbfjbcV +vxeBytA4CE/22tMifDQFlgzgiZ2EbxaamCTrmUbGifNOeXc6cf3LcjIe5Bd4 +jyzk8y0m90U+QtEp168rj9wXuayZ27oR4Znkvsi362Zr1o36CfuHdCR8+o3g +uA6RWKIvXjMtD74PaSPfp41FvvSt6UnZD+IUzgf53O2RNpHL+Mi64O+p+yRe +ehEnSvjyoXHRSgn3VTVOCFI4Huzn1VXZzmIv8lyGQq52Mq5aXVCIwnFjP+Wf +cnmOVfQTO0eepDTl6fHAPqIn8sR2O+0JkfykH7SfOqF0JyXW/sV+kB+5K7r6 +9YMe0g9yU828NxGRPGReuL/1pn/bI3G0i6wX2tXbwOFvXlQ3kvVCHqT/IiAr +oJ6sF/J1MdsUe6UbyHohD8ibdfrEnSbSD9qn8by/HZGjikk/yLd0jkhY87eY +9INcK/NW8ArVatIe/Uqe+duvX9czcRG2/+H79f4BCWY8uP6veb82X3IuIeuH +fEnxbsO+wyJk/VDvlhnmywQ8mfovtucbtbpZ1FiUwnVCvvFGZ+ibV0KEYz/h +i2fV8D3sJOuB7T9G+libtApQyLF95PVqr32h7WT/Y/sU3n0bMmfyU8ixvb7l +wTS5t61Ed2yfFD4599Y+Xgo5tgeJMoWPn5qJvth+9/pJK+bN6yectPfc9H70 +j0aiI1535Ewxnnamm3CiW8Ph0SrPmP2P/79AyOPF/XvthON1wefppgteVRM/ +g+0lvsXwCm5j6kXIL3q0frly4ivx28hXdfv1f5+RS+wBucDXM9kWAVVk3fE+ +vDPXT3odzawvjmfk7qzDG6/1kH2I7V1uqIi5f2XWEXlWhEjJ1kxmvZC3aY49 +O66CWRdyDlzJFv7VzuhPuIHQ94vCTWQ+yFXMLIZvVWwgeiGXaFOOOLuayUfw +/4Ms5FaYPC8l7fBaoDbKSfoYk6dg+zl39W/2ni8kfgPbZ5hJuq1+WkLOU2xP +y5UuLB2fS/wGtn9SMLtlhnghWS9sn/0mWf3ypnSyXsg93p+efa7kC9nX2M/m +kalRpiZMXontg/cX8NxzekX2NbZX05Qom3n9B1lH5LdTZTbGhpN6LPF/KuGX +fVY5fyf2gP3JKA7rrDfvI/0gH/by+7550E/ui9dq+0M7Kx2ryM94n+GBdiki +ZjWkf+wvfMqahYkbmfMIeZTJtdBv6cx5hPHaiBuBCiV/hSiO/mMfqIsNF5oj +TPJttNPqxxMvFl8UIBzt9If8wysPwnlJ3oj2eN7PTcbuIbO/kNc9Pxqovqie +rBfyME+F8H1yjaQ92u+arT9CquyZOBh5stbnUadry4g+6Lf3v6agRLuc6IPn +WOyEKwH7H3aT+SBXvlgS6hzO7Dvkmv/lv5rxgdl3yNf/gWu7kph9h1z7t/yF +nj/MvkNu91lhdXwx499IXevd1WEFfxk/hrz5+ItPuvWMv0Ju1vAgOrGXiYuQ +797yTnOSRAnZL8iTr45NNdtQQOwf+YID3eva0lOJbsi/3U+5PeJVAqddUVv3 +TSnN/krsltiLoKCe4pqFVWQ8GL+36UpoWNIdxM5wfkq+Bos8vJl6F/LuVt3/ +jAKZehfyg6/MNmx+xdQVkS8eZSR4g2bqisgX3ddNefCNqSsi3+Bk2Twujakr +Io/w3yPoFc7UFZHrFm5SO/a6EjoG9cwH3sHf66A/JF6UMFwqQO0bnH8rRAy2 +j6AN4tLqYlzew6RB++mhkwbHmwT1eimn+cZ2k99H3t92wdZEoxNyB39uJjz3 +o7D2xLntcGSw/1rCy3/nSBosbgW1wf5LCN9jzjPTcXUzfBjUM4NwE/PNPOc3 +NZLxIb/TH+ga+rEO8Ge8zp02TEs7pYrMd8WgvTTS+78aG5RZd8LiwZ8rwWjo +Sgedz3C6M6INegfbt5P79GyenBf/6SOEDo0HjgxxMJQfIzXmUQXheN8d8q2b +NdIqYO/QfEn7N68ezK5UKYCsIX0I13oYKhhXmQ2oP/KVZfOOHdTLIONBrsez +2KAuLRWuD/7cRXiV6he9xspEdtzYQ3jHpGcTZ2qy4qPBcfYR7mS/KMTR6CVZ +X+Ru+RFeJXLd4D7UP+Eh3vy39ZW6yLoj3/BD1dR2fCdpjzp4nX82OmZiFxwc +mhdp33lDY7TL5A5iJ8jfSzbpb5nWTtpjP8oPwmt+zugg64ftt++YL8c/q43Y +FfKIjSccds9tJe2xn9Hjb+gb6bWR9cb23g+v+59d2ELsEHnBPa+lhouaSXvs +5+SSjet4l7eAwKAOBcx9T00bFrSkidgt8uSok9o3lzeS9tiP2I3FYaHrm6B6 +6GfSfpn5eveylQ3E/pArC/4cJ/6gjrTHfp5e0XKpt2gg60rss+SP3MmAGmKX +yPMaC6bZPa4iP+P/Z/WXXF+QWEPOKbx/jpz+n8iRbyBqyH5ovJr0jhMudBWn +0K6Qb/qbqrLAS4jCn7GfgDUXNgjkiVC4H/H+LY964yO8y4i/xfMkN3pbecSa +WmL/OO+xc+XFfGt/EfvH/sVStaaLKPwmdo78Q2nTMOGqMjI+nG/F1tToaYpM +nIPjcc0/sWbO7EDSHvs71XfHZzlfP+kfr2OULpmPN2Sex5D6hicVcnSGKInD +8NzYYCGQlX+KqZ/iucprdu3qQddSct6hv7c7obX798RSkg8irz5RO6rFJJvE +maibw6ZW0XGhmcQv4TxePigY7ndElEKO+/5kv847EBahUH88r1bZzpXY59wH +T5/LXx/4e4eLBUXuA9/HNrlUJBiwsI+ME8+r9JMfAlNn1RH/huv1Nrr6kObM +TFAe2l9k3WWu+q7PvMzUM20uvbYa+G62t7WpjV25OIXrhP+vkJNQMVFSnIwf +/cRIo2e/7Jx6yHzRr8gN+zK6/0I3GQ+xQ9MRO+ZU/ST2g+NspYPkD+7KIRz1 +vKryfR88/kPsBPsJP109cs/wKuJvkdc3aD3Vf1pAdMf5Rs21PLRTqodwtItR +zZvKw4f1kHMK562RE5dwP62M6IY8ccGkM/o/SwjHftJHZ79Y9qSEnGvEr17y +nndxXxHh2I/LgmW9kslF5JxC/rImtjY3q4Bw7N+Pv+L3cbsCeMsrNvh9HouZ +dy/pmSbC1QCNhT5P8sg+xX5m58bWC+akEU7iQe2qupw5aURnbC/c35mv9jmZ +6Il84kvNlz6WCYRjPz5hnwrf/f1I9iG2z8z49vzesVjCSX49TaixzOgN0RnP +K7XTOpnWEYLEj6G9XdrqZx2+U5hCndGuolSDri+w4yH+De1i9+XMNYvm9hM7 +wf4KKgp3f9eoBo72sSXr7kaXR4tTGL+h30gZ9bd35FNe4o/w93apFs3c4MdL +7B/7yfH1Le1XJ3U8Mi6Vj69vVaQIkX2E843P3jhMKKWf6IBx687uzIYVnvzE +DyBvV3hQ5zWLj+iA++6phbHzhnLm/TfktgsVp2dZ8ZH3HHAf3SgLFvNwF6bQ +7+B+sWqcf/5pP/MeIHLRsrfp0iuZ99OwH//8hnWbfgtSGIdg+2uxlil39Jn3 +UrB9Xk9M6g05AQrXD9t36epMVjrDvEeB7RWn8nY1reajMK7A9qPajlvzvGfe +r8D2YuU1yavP81AYP2B7Px1vMep/3m/B9s3dbt0Ht/WSOAHbL1pgvWk/xbz3 +gu0PmMz/fNWzk/gXvBpd+HNytH0XOXew/XDTx17ql1vJfsD2Mw4Y7/5rxzyf +xvbTZUIFdys0EnvA9i9vme0QV2gicSn6SSUd631RAcxzMuSlD17HSBozz6/x +/k+qewTeujPvd50b8vNw8KaS7ssDzHmK9jt6f+qXQJ0acr5gnto74fqOm/Id +pA6D/Pgcfpl6Pyaex3XrmnvJ/YpcJ2hf2+A08B08EUfFvIHv4JVm3bXPv1FC +5oXrsGOBqrNjVh7JTzEP9nHZIL3ZkXm/CHmnWMvz6tA2ErfgOX66q3fLzeoG +wtFe1sfa5F+rYp5nY/sj757cfmtfS/wtxolz/GY+WnGJ8b+4D9ZvVJOwL2H8 +He6D6XxPllnEM+/1IW+7dEBdV6WPnI/Yz2vFvpzNPEw9CPdHbOKVpbOrugjH +/aFu0iyr79NB7AR1Xus/Z9iOqx2wbvo0tYG/30Eeamrb3izEtMf1Cvi40cK1 +q4OMB+0t7Z3em80mzPtaaJ9GszyeL9Jh8ils31QXvvedFnlOGov+su21jdqo +y8x5ivp1PVH6ciu8jNgJcuNZPGOnuBfBom0uTQPfl3Nmc8XOJFWTxDxyTpE6 +osGstXxCzHsyuA77/dsOSF19T3RDf7s7fouMlZoQhT/j+H9IlLvkKwtT6DeR +uwYe9I7cJkhh/oKc+l5l6u3HT2E+QvzMjsJxfFm8FNoN8qh5Pg/miPNQuD9J +/HOs9p2bFZMfIudbeUTQ8VwH0Qfv/7PpxK0QyR7C0c9Vjb8i4qLTTDje31Tp +/KywVKbuiut+PXhJSJA0854k8pBzRgPPgIk94H3Hx33pabrTReJe1LWVJ/gg +j1IO4djf0ie3Cz5dzCL7mvifd1PUg5syyH7Ec3bB+uNugV+FyPmFPE1hyi0z +B2GSp+B5Vb5n6ZKzk4TJuYx8VeGvteOGMec19uMx29/uqgkvsQ9c5zfdw7Ya +xvUS+8T1FDm6/8/x++2E4zm+ebNB+Eg/EQr9IdbzNvjr6NjZM3E4nnt3n13n +q1zcTfYL6hlrd0BC3ZyJt9APXJik7Ttw7uB9cb/bbM6ZkTK6g/h51P+WxJkD +jv5/iM64bretvjk0WmUSnXFffuxe9HKqiQiJH3Bex2N5J18uZvQkcdGCQ1U2 +FbxEf5xX6k75HTuzO0kehb/X39x5V9GLqb8hX1WqUXcugKm/Ia/devPq3HCm +/oa8pLC3qu8tU39DXlztsvPCJ6b+hlzr5Rst4+9M/Q35A6sRa/gfMfU35N+S +1sYlBTDv9SEXuxe6Tc2zlPg95CEGm4w0VheS/A65q5hA8rvLzHt9yFvXvlky +U5B5XoD8Q/QI1ZrLCWT9cH0UeXddW/uzknC0o4Pbvq65EFhN2iGPelISsHNf +BWmP+0+1d9fBq8W1hGNdtiSCEsyezfgBrK8Wrnxr+rO5ibRHbjh6afu7O40k +r0E/Y5X6rElTpBXk2HmH0bTBvIPe4PDsup9kIekH7XyE1ood2/uY5yKog07t +3Awt/3IyH+QxvtnzdoXmkvkgv9q+Kir/PPOcHXm0lNMS3aUpZNzETrQ/CfuH +vyP7AufdOy6pmu9MBtknaL/2/Jn6fuuFyfML9Cf72o+5nWDFyehHsP89dL1U +0E2mzo/8p46IkJUvU+dH/vVLmaptMFPnRy4kE/zl/Wumzo/82Dcv/kaaqfMj +r9AXeB7ylanzI78ff1TTz5ep8yPv+Nofs+YxYz/Im/28jHwci6HAceicxf7e +Rr8c8zghj6w7jmux04/J3Z+Z+Aqvi+za3RcvZ37GfSNz5dCaz0blZN1x32xJ +U7o1/l0N4eTvaWxvrbhYzLxHh+s5VdzaCRY1kboB+kvL0dV2NVI5hOO852l2 +NfSWZxO7wvPUxdXWtSiwiHDsZ97H0vHx3flse2uAJ4PDSoCHI46qWJQxOqDf +qv7kdWXV5X7iN3DevmVbJJeIVJD2eN//rlg/PrKjnpzLyA+v+iq72byK3Jc8 +v5CYVbZxfh7RC8eZ8En3zueev2xdGsk4Mz0klwbl5cLIXo9ZxTwM7xu/5K67 +O9MPeb75QTp5w/08MGHH4YcdBuNwyDqwUp73ZD58FBGVHfguuht7HSZeKJpg +NiKf7JP3Xn+7Br5j35phMWt0vSjVEKJ4feB74Pj/rkbVt/UPiVL2x8fFD3zf +G8+RbXVHXjT8EKLUR3msHfhOOLbnN0xfEuHIz/w9T1f7nYHv2M8VDU5Uaxem +FJJPXB/4PnkU+/9PVFv2dGvxUAXs8yIrL2/awHfsQwV+u8UJCFDO+QZyXtkl +5O9uqiVKthje4aOer0v5PPBddOTOf6V2+//pJOfLMJ2ZRQPfsbcv83/7VIz5 ++52+Q7ETBr5j7z5sVVLzcB5qk+KW9pO+cfTT5ddPD3zH/lyZrJmDRh+EvJvw +deC77rnscaUGDG+XO8W83/iU/R376+mvt+pSTNxlqR/IP/Ade4kFT5x0jneA +3ZFI/agVTbDy9ExRsa3FtMqb7aYBT2rgK3tdcFymN40LsmqKSP/4vfrFdPC2 +wsh60BJN230tI5bOYO9H44AFrgeymP0loZE+cF+48NJ1ofkJ5r3qsOBJ+gPf +q1fPPuDf8b4cnrPnhf0svLzaOyK9kFM3eOJuucVlcQscYuuPdieUnTrhYhFT +J71pPagndOU6nKiRbIJn7HXB9jmXxs/L3lwCeWwdG94Nri9c1bQzLHJuA+WU +IXt4yT5vtaUbl8XsLSf2wbYfMJ7evndJRxdUsO0T/YzltGaN2oc9MJFth9ls +LiB5UnTM+yr2+hE7B53uoNw3M3uBw56pnXte2cjMqvs/36t3jTmrp+wjRu15 +Izhp4Hv1qvsMDjyhe2gbiw813w8LUKer5zYPfK++od7BfuB79boW5cMslvBS +JZ57mwe+V2/V82ZDiFoLffPypbifjj0gMXNYgV5zLp2Up8Y78L361gl9mUlr +eKmE8WKilaz8bMtkV6Wt8xtoy4s5uuMb2kBx9MzXdWdoMD36RWDge/URpbPW +Zp3tAt2TD/8fXXceT8X3/wHcvlZSRIXSoj1Sich7tIdUSGiltNOKFqQi7aIs +ERGF0p5S1NiLLElkX7Pv+85vJnPu7Xvu7/PXffQ2zZ07yzkzZ2Zez7d0bnld +ZvNxOq++U7dnTJtAF5yfrdQ37f0TUv9dyjM6Z76LmGxdtrgFtq4/Oo7OmQ9T ++eNJ58xPTkz+I325EX7dTllXqFJBHj929QOdM++lsqtrxYUOkCmblUDnzB+z +zlxD58yvtS+L/DGxHX7oFGyziUsjFW18b9M5868cVMrOhrQCVKffoXPmZyxo +mEbnzItkLMqpTCiHnJmLc+icebX3Zz7SOfP5BlP4JmzvhiQbTZ16kVrSP2GP +KZ0zv47HLXxycycoMvny6LPIxPi+xdoqePewNIrOmc93OphD58yH1hXz2Xj3 +Q9KTfAM6Z/7xksKJlfY9sDPv+PA1xT6Imr7Vn86ZLz5aHUfnzHs9lS+++LkW +vi5MkPXj6SebNKXu0znzvB1v5iwZHoBxdz//zZnfPbM8hs6Zr70e8PXKmkYY +EquRmVo9SBY+cf5C58wrHjHgLx8WIdavT/Kh896PM+cRSXYJw9bTRYmh7NiV +tBfAY2h3jvYCmiY3xQ9UtbLmUzQyH/C5sqrI7sAQuGmO7Ge3Rz7hrIa8+N2u +QVjJzB/1m9bDovZxrkMQrCv9lc6NT7vt/4TOk2+NV49PfChKBDD1lJE63Bsz +bqKTzDAo8WfM2nO6lXXeMerMlVGGxVWQp/ClutXkN3x+zLuCzpl/OH+URfR9 +9jjMx5F2g/xjvnXm1I5OuK+2ZQ+dJ4/OH+4YZk9o+9IFVf87HxBI3fj+yuY6 +WMrsn1Uj+yeccrEqUj5fA08XqW9TW1wB/ntqW41bK8nU0x/b0vm7QEl1ZP6o +/xUqWb9Kz7IaFjPL/4vp7/LPfpJ6UFoC3mHX1em8cdQfgfOo++U/BAi/voW9 +dD456o889EqLjU7yEqh9mTddOjJzXA95bsPKRas7uIir7Y9O0fnnEUx7s+Vg +x+ZjUlxEMfP/BxZLWdO59AKb+gvv9LPfi+xZtTOZzqUXLnf5On+BIBEslpVK +57Gj/og0NRgdFtMLqF/ru721kc6l/33DuyPvDi8hb/cOrJTek+jvLZqPDZRv +s98Xm8Tk0tsGOA0fcWL3L0HNj//m0u812H5c8hj7/cdytReNdC69YKt9lNWd +btB/+Pbv/FE7PyG6fH6lawuU/e/ywNnNXTpC1Pq/vvfitUXPW1nt/D0bnpTk +xG7wYvqF+3sXzKVz6bkkdV/+GGS/t9JXuEeSzqWf1WTvsa2rFR4z6wHNZ++w +94PUSX9Y26N/ZH3Cviuy+Z3TB1jtPLM+4Sz/nWT7iX1QwGwXtN2OdIhODCmt +Yl2XzR/ZjmDhIH2kLrwatgyObPc8pv3n/vLFbSN/Hfj8735ClK712ty7rRGW +WRln0rn0DsOXKulc+sAdvwr/vOInxvzaHkjn0u8R3J5K59KvS79du3E1FxHx +oWgunUuff/TIATqX/nbETP6WTh5qfneS6Vx6cnAwmM6lP2y/+17sZCHix1mD +MZsedsJZ6czlq5zbyZiLKgcrbfshbdeUNXQu/Y0e+XV0Ln2R1CfjySU8RFmu +vVuiWQ7JIy60nc6lnzXKu1lvNxdh+KPchM6lzzzzMoXOpb/muzZcwq8LRjVJ +xpDTb5PTdlsW0rn069+6uJ4a1wKnTC8eMduTDorn5zTSufQ+yQnZqZkNUDTs +/5HOXZ/hHs9D59JHrVH3Oy9ZCykTlwulazeSE9vL++lc+o5wZx/FE9T6HXgz +is6lH7tf6wedS694udw7fqgcanYPTjRxHSBDE3TO0Ln0JdJODnwhA3DvtqfG +SuleMld36iI6lz5CyeXEgEw/GJotvEjn0q/44z6dzqX3fXU0cO+tXsBz6ZWG +G640BlZBW9AaoHPppRt/76Vz6V+m9klt/VUHHX2mHstPZMPT73/y6Jx58/tT +akZz9bLahfqMT5/pnPlres5Sb7V7IJ75veNHfi+ZUvMkKSaMat/CZ7fSOfM8 +Gnd+0DnzH0RPrPgo1wNdzHjIOOd43oZLdeRAXs2riNpuqGG+N3Tke0HP7HWE +iks9rJ555LhSWjnMfq8z+LS2jtxS9emlbC27/dyl+vd4BOfYYiKloIZ1fsUc +R6T16qij9xPZ70EPjBxHpLLNuAkfetjvQbsxefJiW71KdzWzn9MKGWkH4NXT +tTuC5zWAwW2XbVv7PODguddKdJ68wtzY1fIwAEt9FNfuXllFkrVbVek8+X2i +y2QX/+mAS6f22oRvLiafyTsr03nyn848vd65uR2GNMV+wucM0vzsGCU6T/7z +lW3qfBGtQDC/d+bI7wWZ3Ndmzk9rwKTtVQCdMx+aLLiXzpmfmXHSKMthCPj7 +I2vonPmlti5/c+anX7y44IVsK6Te95hP58xXT/0VQOfMezUHCFjPGIZqf6NY +Omf+UkzkFjpnfh/Xq0J9vW6Qv3LZ+su8IFh57QA/nTN/Kuv36TviA0CeOMQn +f62S9FU+dpTOmVf/bu+5mDrvfHwgOZvOmT/XNbWOzpl/8vqNrN3hNlh01CaD +zpnf83vl35x57b3jh/es6qWu97tn0DnzvhV9XHTOvOYwXEg+z0WEqi8j/cJI +SLimYk7nzKuk806dpdME2aXi7+mc+dAxhaZ0zvxQwSerXTw8xAVL2bt0znxD +gtAHOmd+zrTXP0wUKqGjxVRcM7QLvHRXXaBz5r87TjsbNLcaIiW+zMi3KYfM +gBdT5tTVwZnsjrtXvtdAX1PR1QGHDFZ7aSxveExBhIvYbzTaZ+PyUlb/Yi7/ +8ZXOd/Z4XfJu/cm6/mEwelYLt6NXH9Qf1Zt/hmpXQ/aMEwCPMDB6xXWxIog9 +Xme0vec1Pb3RiqWRTi+7oD5b3Ow71S9IGPlLGFLTi1qGKWv8M14n5ZT3ez01 +fVPRwZWh8f+8bzze0XIlVe8sc9Q3+M4er3uVd9BxKVW/V+7d8TaAPV7XOnyY +T46q197wTO0IZI/XxfIFbx3wC4OH4oTCHLdKmCEWqfmEdrnaDq6e4RkGWseD +ZkevLoO3umuMJKl+xfbWzcSVd8Mg9+CZ0ryAIugdk7PenOoXDDW/P/l9j/re +B9vFcruyWOMRGvevT7ek5h+4L0pp9qYkOKPj6E7n0qN+6oyPD9dwYj3YlVzM +tT9Swupn1uRPiPp2njo+rnq/jBxMA4Xkbz/33OgHQTWR9K7iVrhb7M5zizeZ +1b/UP/jpJWfWDqNeCt0vWzxAFvb4vsyKDyVvOp+Ln1MgSPzQ3lLnHdhNrgiK +stqfGEp6Xa28WSojQFTxWEmqibWT8x78+iUaG0rat/DnCO3gI+S2Lxyn1tdA +TlgtcnT6t1Ay3a1ynTN1/TvdyV7wXHYFeahUdOcvav6bV/V09qVyEds1lxll +mGWTriJc6tn0924zn7y9dRC43130NaC+T1XJsTyHql+2yFh9R6EPVM/ePtlJ +9RdrUnc+yqPqS6OGvm6Q64LkxsAZP6JLQbRtjnshVfcdZXig4nkrWHbUuK6g ++pVoBd3Ie19DyUuehuoOp2tB4qtV3XzJLlj6696tidRyLn85blly4RuYWvky +/VZIH/xcYOBYSc3nxG3egy1uOVDVVaudrTYMuaqbZj5PCCXXulz4PJxZDdVZ +3tXfNlTAi8sXeFXK2uCk/WGeA/L1YLL95cyOsATQfjR9TyfPECm16cu8IkFu +Iu6XXPf+dYUQcMdhHp3bP87lQOXLXf1gVZr1a7l+Jdy0InWnvWwiZ3a7GJX5 +9ENNq5MqnbcvZnZ4Kp3//3KvTUbKSX4C9SN5rk37vt+hjqN1Z/2rH7DHM2fW +vNhpRO23Od93mG8/zB7PXDhT0fgxtV/5rPVpsb7Afr/+U2HjmCSPMLI4S2Jr +WlI++z2mmsNOue5hILnN1DZJlj3OqVqodWY3NZ/cbeIhViWfWMdF18dJ/lHD +7WSlvs22o8bcrHHLGffcaxtcw8A3O8Rlwj/jlsfWnz9GH9cfY+auSfBjj1sK +JoQl0vWdGeU7U8PY45ZveQx20/U3lWJi3P+MW84WHPbSpuoyhyx3TPln3DLC +f9bytVTdUVZnQ+xX9jijMf8NgRVU/dlb/UcOD9jjlpnrd+jOo+qyLll/vj6q +h6sXYwJpLwCd9/quNjDnn9kL8H3WhFFri+Fn2zX+y27dZNlqo/1fF/MRUoZp +O09S19ettjaNudT+076bq8Qt9DNU28Qdpf2CmDTnC7RfIJv3IG+CaS+MzXzF +E5JRBjFzUr9+0WghdQJ1u+cH9MALrf0N7oHdMGWWtGEktd+2JK3z1zgfDQnq +Tgo7d/XAuPQHvD+p/bZQXtNsvkoiSCcr2oeZZYP6jKXbZiWEAsEzg29Vew0k +7a0wju2l+sV0098hMaEwbev9lHibUiAm7lJbLNYOVR7+5b9iQyH4+l6167EF +0OLx0OYwtfxh98O05lLzMdx6p2ZlUw54tQ0cOkYtz5IHSvtUqPlEz9xwJ9rm +J6Rq5SS51fWCccvS981kKLj78uc7yKdCQYPD+NzFAyATo8BDL4+tHNHDoxMP +2ZvmBw/YDUHJzRfpClTdt8l+yuef71jnRROu9RrTed08W1Tj8nfwE/c/CJZW +twyQjuf+RJz4Egph0Vz9gRr98DSo+qNHSB/ZYRGnNIOaT1UNaVS/sg8ke27X +me7qIa3Xvv1Zn0TnfzbbSG/ohS/1Bk+MJLvI0dAytjwuFKzex39ftKkH9pvV +JYintpNvuwc66Ok9PfVchw2p67E3MosbL7WS8Sq3K+m6jbp5b5BpF5yfJf7p +86kmcuXVxl309946xJU1bk8ndKTJS14tqyW33v6yr4Ga/8pP+nGLLTog41S0 +5bxNlaShf7MbPT3vFv307kPtsMJMpjMiupRcujT1Zy01/xvjnQr0rdogWXTp +CuWtuaSrcWIrPf3mce6XNpxshcGDG7PBLJ30dxy/YiZVN7E+t/iJdQvcLogz +UFGKJOcV+AfS9TY5y40PW5rAVitxGr1+0adqbkTInI4GuJu+TWvhuW8gELo8 +mq5Pb70pZkKdj5/M3shbrjZMDi1xG78kLpR8kh0eYMgtTKyfUinFZT9ERp/R +C3xH58IlG0r7fhQi3p+7+OCuczEky/kLVVHb5eXXwRCrBvY4vJ2Ar4O2G3X8 +/lrOLXq2AoRXymt8pfaTpotaY1Op/bYg9SGvecBPsOXzX8xnPwRCAl9Hl1HH +S15ngfz1pEpW/zvGyeySt9Mg6WUtuvTPOGEizXv4hwjV/7kHjROT4npDft8o +TJR2ZMP1tllydM7wwghleDx3mGweNDjffViESIuz16F9jaPFn5JpX2PIO8fH +oFWQCOQLWuGfXQEJXP4RPl9DQXxZqcykoj9wOf62y+pNlZDwKKXDndqOKnry +KsuV/kAKMw6u2T4qnfY4Dn8XfvSkRITgd7pOah3Pg11fKzsKLLpIJ5Hxs/af +GmCNdxuW5F8/v76TPPE6s+TCm374Vn3o6OLUdtgnIXnlINVvtov+5l6wII3V +H4OcheFNrzBy7bb35Om+WhgUn+TwpmUAghP41lRR60d20q8rXhfLQFFfojON +2l6Sn6x3alH7j8nHs2LCKgOwRd1iHp1TPS7ShesIdVynFyfn7hEqhwyVGVW7 +D9TAE7ebHdOo4/Si7R77jV/Kwbj/WLfPmAo4MFHuw/LUNlKpmb/M9wQXoc9n +3nrFPxpqt6YX065Hgv+PibO9uQnTM0Lzadcjpmd1Je16SLXYck15x34fk7eu +8NrSaX1kzPPtciZThiFTrfmkzR32c2Wu9e/3BQXysu7nXjZbqLPgVRcZp/f8 +kMp5XkLs2hxz2ik4ztwfz/ot5cX7jv382OQJClLV98LId5uFRiW4ChLHjQSc +A6j2IVRtQ8T5lFByZdj5Y13ThAgu6wFjJ+r75AwOtLVTJ8ZlFdFRszL5iSs1 +bxPtqfbB48q3dvq8JUR3ntsYC/ZzYrcnOTpWUfNf/pT34TcxPqLc6XLgEqp9 +MPj27js9/VX5ac4fg/mIV4I/V1dQ/UHSV4GqYmr+7yprao5q8xD7+dc4PaXa +h7CDA4H0eZTyD7cV2aXs58TSWv1N66j5D/g1cN914CIqtT3XSFPtQ7Sh9S16 ++jWnXXXtpNjXWSbmPQkt1PRb9u4uHL95ELR+3J09imofZsWcOkNPv3ylycJ1 +19nPiak8EHszSE2vNenFJD37XuBaPKn4oWIkecpow356+tObcl5bJbGfE+uy +Hr1Qkur3b1k86/y+vxNuJVWl2lLtwxY/6/P09DMWCxk9SmE/Jzb7xK9CFWr6 +gI2m016WtoCG0WVx3yvFcPKef0BPcij5RVinTMzqn/fcvNX8t10YIuPXGR3/ +s5ybeHFq63ralUDPIz1e0jhbx2OQdT+UR8sw+FNpN/ksaprGKptB6A24uZx2 +T1jP8UYYDLbZ90HFKpkQ2usxnZIlMSW2mZzh3lISc6IHNsKX75mGuZCulHJk +mFqeYUvJgdFd7WB8a1yVO3V+rjfZJnkMtb2MxyU9GYyoBvnoBevCTzXBUO86 +lXfU77X0+bS0bQv7OeTevbdKB33DQDN5y8Fb1wdA6cKC7+rCrbDOG5TN9n4G +GZdbvz5pF4JRas/oKv485nqljwy6cPh1xUEBotrtmuDnul7SaFnkc3p9Nnms +X71uQIAYFnEL2WncSTaqvkum9yuvLL+lmRr8xPiXXy5LJFHXkwZxPKOoeuvl +B8v1z/ESaVCV4HmghvxoHzFE16c4K6+f+paboDopKeErxWT2x7wDYlR9Tezj +NVHfhsH5ssfvs+e+kfZFhU30eXWw9hIVV+o61OSy6c4AxUi4PYp3Kn1+wl23 +4Zr9/B5YI7lMSuLgRxg14OxC+y8OJ7WF7idzE73Mcfpg9MYZtOcS2HS5ZoVQ +H2wus7zjlt0Ktwd0hnjDX4PXqujN5z8Xw6bJ6/pt91aCz/Mjq0WuNsHlPUq/ +h11rQC85ab+Czh+48iyg67JaK6z5/vqidUMtjLlo1+CkR+0/1uHW4zLbwbbV +cr49TyN4T0h4f04wH7b26enLO/RCjfEyDe8jLSCbpHxBUe0b7Kic8MOfbxCc +uJpV9ZzbwEblwr3nMtmwaX+ZxA31AehYuqB/g08rRPpZmNJew5sVW8Y/jqgj +Vy75GaV5uhvEqsL2J6xoAU+ZwkzRP68hrlRe4OmoItgibHKE3j9Re9OgFyoa +YybIes42vEw7i3ZPDiYuW7hohSCRWj7eifZH5KxV06yq6sk/GSdXnHraDUPM +c843VK40v6SuT5XPNd2+HJsJx6dXnEp5lQW8427EnnfoJZ9J9nnMezTEek7A +T7Zk4AE1/c2uGOV1i3OY464PGiZt7vxC1dv8VVrWRqawnpOUcP78N5/23dvy +gGvj30DGkBD/Mmr/nG4Z6qthHkOevG8VWjmhFLQkLKVpx2SYCK6mHZNDUVy+ +k8K4CXT/+uLvK2YJ1H6e1/YlVK0hn/V8tWWM4XAqNf8qHw3nJ6WxTDs+RA6G +jbeoo6YXrvk8KWf0AHPePkBeWpm7nmqfYV+Osv0miX4YHlkPpOvRNF96erH+ +euXfU9nvhZ1Xnv+ArvNNHXv05Xz2e2Gbq6Mm0/PJ/XrE6vEy9nth45IS99ZS +9cXTSgeOabHfC7NtOva2iaob5+xRe7CB/V7YvXdJj3qp+vjLrzN++rPfC4ub +Ol5hDPW7tkc/bE5+xH4v7EnnYpmFVF3kvcqryd5VkEm2hx9szAS4ZHa64eEg +mbB4+uO2+ez3JsxPSnTKUNPnGIzZMS6gBg4xz1l9FZz/YS5Vn5xVGrZKvJT1 +/J9zq0Y91b+A5fuwm08msd+HmqOgFkivh6inezsKFNjvN237XXOVrp/pX5es +rcx+X2lywxV5un7VcLPzew32+0eV27Rm1VJ1lQHLP/Fr2O8TGb2Q0WynvtdA +JTCiRJf9fpCXSaoVD7Wc45dFeYk8agDzhFnGtGuAriOH/SRuZCytg9nKK++l +u+SyxreJt+Jvrns1Q9ndvFsaF3LAb5K87/KL/eCcvs1uwvpW0IpWja+mji+7 +gqIk2+dvyHmZtjnKM8sh/0RvTe6ZFjg2r//eJ77PpGN8pJqOWxkM+aTvXUKd +d6nv3Ne2KimUzGxxcFK90gT2O2xFi6nzljV9e1a9pdpz2cgiLwUZ9vs1u/xM +Pyg4DkKzb9W7xEVtsDdhyp/mwwlw6GXrb4n+QRilVmb0sa0NptsffhO/NQfy +4yscPIq74VdMxU13ogX8J96yovOEc5n7DuH++6cRH2sgeWb0RdptuadXIGkX +UE3m7OyKMFLrhuYZI/WkkTpIHM7PM7CvhlzfYB4XvipQrRmt9MupBm52Wr2x +66gCq5WLPmzrzgPPWVHWXS69EPBW3O3tsRZYKdGtMPtQJqysMn5VlzMIXN4X +W712tIH5/r0/E3mrgP/ByykrxBtAvrnZ9VhMNazekRVykLcC9gnFVr/orSPP ++jwPnmjfDavnjdRT+mPoOpi7y876cL8GyOUOrQbU+vE+emAbWdwLHsGTF/lM +awWRqJ3fHxyohNBXWlw1g01kkoKtdcOXfhgQX9T8aagUru/O1avf0gpd9h3j +Baj1rDQ977CjZSTr/HQln+oE1QKqnX73214svII1HuX1bJA752Uda5whbvOG +/FvUecKlhmdF/T2JoM+VsIke7xLNvyq73T+M7H1gM7Ru+RtmP+uGM53hqy5T +/XJbr+LB/phY5nnFTtg/xlDFk65rpin+EolkjUsk3xn9wjQgjHy2VGK0rFIa +a1yCvK/yKYv6XiHFwwadwRWs5U4fnV78hDoupNd/rP8yEAT5fM598iGtYKE/ +kPVVIZrsrA61KCnLA/3g5yUN9qzxsRgBu9AWdQVRgjh/Luw01S6i41VM6ty1 +x+390MUr+ZG+jj4UZbNrIDGUPLyqPrRd8CfruaBbhuGZVtT5/P3kJdfkt/+A +0covokqo62KDQ+NbSqj+d+EDYWOfnmLoXRG2mXZYUDsR5Z3fO1NrGMY52Mk5 +uZbC2Umddn5DnaSCxdXJ61t4WOMqEtWV69cGhZFBBz4ob7cSIow692r1DQ+T +vS38s5dS3/sp4WHrDV12zob1gsE4+vz26bUPSR9eCbByMwpfpx+l69opDQcL +WtjvR9ztFfBaT83HN+ZKupUjHys3Q/nUzCx6eoG6SSURC3hZ70e8Xm0rpUtt +36Hl/Z1q0Tys3Ixoq7M+NdT041bML7e34Cb+MOMzir839zRQ9dRLExeIzx1m +jc/cPN44r4uqh/M4ri87ys47kFggUyVIbV9rX4VvktT+j8YNUuqupR14FEZe +naV/d++SdngyXK2UmJYChLtWs7bDADluzd2GOae5CGlNAbu++zGs507Nh8Qe +TdzDTcwq451BuzDFMtq+tAvzcnqJ9G/nQVB6Juu51pZq9xpcnmpVdZGEXkhS +VdoAxGwylVFYWgIZ2k7mXOrt5LPRWTkxW/tY58m/DPm8O342kdq1E9OOL++B +6cncMQf5y1njWGVbynR+2fdAwBPvl2lm2XBrhngCfX64xcm7x/JZB+t82P+j +nOYEan1OnREpYrelA9Tizk2h3YGiea4mu6nr8U2y3m3FnZWgsk3kuC51vuM4 +SjmgO+gjLN72cChUsgS+aV5pbdiYCwW57XtoX+aKvrjMqXcCxBMeOTHalylm +trPhvVtnDIq4iPPTn8rcDOkjl0x794tenpUlAXGwWpC4LNlze7tkF+n9O/em +BLWfb74YOopw5mf2w06yir/Pjd5P5gq+dpEw4yfiVKrHjL3cSm5ysS2kz29f +KcUc3xqPnldvJT8aaj+lpxc8LdxY7s9LLDR5peleVkseGpqfKErN32B7Usjo +QW7W8+0dEC6+gZr+cGzpqzm53MTMeNlz/dGl5NcK10VjqPnHPXLM+KbIxXru +fe6vVlFtavru3U0PFohwEbsFf4t17Eknb3hpWdG/K1YvPevE8wHY1nN5yubE +UMgQGff3+mjF+wOrIjN7oF/v7vulUAoSqe6W5ME20mVMreP5nF5YknJ+ceac +cmhwvfYpV70DQnZsvP9OvQECTF+PpR2T/UtuJ9DuD5dq0pGhNz1A5rbJ0Y6M +5sy+StqReVFVtlb9K3Vdk3zEnfZfjnc5zrAc30l+cesetlHjIcSv59+n/Zdt +Et3vaP/l6r5lDZIf+sB8XZQg7c4cujktmHZn9MLaFC/d64V4EbFp5ZZFrOup +dKuxBaNu8xGLtn4Pot0BdB6hGReZPEyddy3dOPK7euyH31+b00Y2PHL54/e5 +Fz4sGukH0XPQ8vlLNovc6YYpyR3fa+KyYDkzrpjjF/8hRK8WnhzS8t/Qngfn +ShTVS76EwqSldyPCW6qhXv/c+cS5DfDM5dv03bGhIBwnC1YVpfBO8c3DKaua +Yf/qiCmrqPmYE/47BgyLYaevgZ5DdSusn1b22HFnKNTfPyG3PrQYzDXevPEL +aQNS75jUzPhQeK6U4N0UUQiSWTov6xd3gJFL/HmfpFCYkP6nMGhlHmzzjvtT +aNcFm/1syxbGhELkmm1nK57/At/bYZM/tXRAADOe+U7gMveDL79hq3L/kS6q +P3d/d99RmVrOI/O51oVqZoGRpIjecGIPVD5dGVtLhsLBJOkB21U/IEUs5pHM +2H4QOVA0hqckFNwe5U7IivgKItZeEjMv98JBZvxzcWR08KWXaSA3/mLDrNR+ +mMSMfyYI1n44XJQAl6/drVlpMgg3RGc7qlLzMXcdJ6wU/hmuimbO2P9oGGZ8 +evtlNFV/ctd+ZqtHKOj0WjjqSg5BNTNe+mS3nathxwcwO17BPTu1n9wtXbCV +HidcqBZyM5bsg/6jWm80jAdZ46WTQt8UvD3YD4nLMt6uEesnefaPjJeujpqz +f+6xPpgFkcd4L/eSK57L6NN1SauH/qJJvaDw/FpzjVo3qbY9ZQw9XrppXprv +otQeUPHx2LUsqYd0YMZXf/4S8Dhh3Qs6hdbve+26SJ7JpVLJ1PZqNJE5eO58 +D/C2DY0ObukgpRYMdtHTjxt3Q1f6ZzdcUeWzuxDSRkalKDbSda3IDxPzfneB +n7+ketPiDjKeGY81+Z3z4tDFbuDj2xKaXMcej710TnKftEsXzBs9VGe6q4WM +DfqRQNe3G8nO2F3UCWOPj5HLm9tAJkdc6ZtB7Q+/BjwcIss7oP/t47eyq5rJ +tcz4rWzGbl7Hm52woG3y8oxXdWTuoLVYBrX8cXXTTMLcOqCmKtxnunc1ORhx +rrqOmr+6zp9Uj+p2ONx4s0pAoIL0idpaOp2azwSJ8R7LGtpAfNVryxtyVaQp +M94bLK34/JJnO2yPn+9ndbOM1GTGe4+PFyN5fdvAfe6PqmnVhaTlM4fkGno9 +LIzOMmlphRT/zPW1cVmkia3ecXr+C7/MKxDtaIHf0hJb29rzyNvM+PCC+XbS +Q/6t4KZjIrkn4wfpx4wPZ85TC7R51AKrlRZIvtBIJHdM4plIz0co6jHP7KZm +kHZzHdB94EV6OWo/mUbVV56dY/C4rREOukvvXfbsCzmfGU/u4h2X66zdDMZj +fHjXPvACG2Y8mTfg8JjDeo2w/JiU/9JnX2CTxwMpej7vMvM+S3fWg9uWzAe7 +M37A5NdZZ+Sp+lIVgd8pHbUQOWr3/OcaicDPjD9LrPmmMG5zPTTaTep339UD +ncxxN41LvdBcJBOCStplaU/KOGtxJ+1JqRio/Fy1RZCYuX+zj9TKX6z7SK/u +5qx9t28IZsds6x58WQIOMX5LLL92kUKP+OZMdOclJBSCRq28SbWHZsopU6nv +dXL27h1fVQmSGg2a02sKIYUZxyb4Z511W18NN2Z37Non2QW1wTUDc6n24caH +HU5GZ7JBgr8kwyOkD3ao5pygf5eGePnqsRuSQZjPTvOP2jAkOlxQOkPtPxc7 +rSxOnn4B62edcVa+kgmfJ9W30F5Vkd0VU5m91PmY8RjbrdOSoWOJ3JaIggFy ++Z7wmIX3uYjAorV3dh9OgYIZvhM8SobJlg4FcBQQJSYY6u+n/Sl0nc3tebPB +RFeI4LpwI6VcPweuvbnoSftT7w66bg2wFSRaW+9upv0pdH5nP7G83TOPm6ic +/26zRGo7rGPaz+joMLN3cvnAk9m/51PLAJC6Zl7071oYPDjjwNEYeJ4VWrdX +coj8RhhcUaPWw6KcM0Y7P/aDjXWtWqXdEPmDqZ+4uEn7QmU/3HcSDwsWLIE7 +o7xuOk3sJpf4OB+bl8NLBLjKDP1ePEDqMe2V8cfVuwfr++DoimvDNwK7SaOu +j5J0u3Ft8Vs5m54eaHj0pnW7WDv5jmkflnhdVl7P1w2+W3w3f+1tIM88y9MX +pL7Xyvtsw3ixTtjqqPdjf3YF6ckcjwf2NNp/l6bOv9v1ucLMsskdzHF0dtw5 +j7SprTDh4t/9nrX/Wx69dDdCtwk+79iZRJils/bbScdjFTM31YHN0GPn8uhS +WMfsP7dX/Pq0elUVtH4qmxHll8lcFwySUnniPyasEiZcnxhMpP3x4iV7Db8J +1pCuK1/Yq8/shsJPgh35W3NZ/ea65vWz1XVr4PUzvvSoU01gxvSP7mfJleo6 +JWD8jPzmGzhMfnvrohFHnad8uulTuN58ACJsI468reslNZl2u6hGVVavrRfc +lLWdHI07yQlMe9uXsD/efqgbpjkrUO12C5nCtJNjNgRq5Ql3gdxEA4vCAzWs +9i1mcdX+eRIdYHzTr+PulWLyJNMuxf0OvC4p2wYbnl0zXnDuG2nCtCcO8V5x +HdNbYMVQvLSqUiSrHYjx2Hz6zqYGGNeVfON4Ezu36WWwSe0lyVpYMDRW8RN1 +XXPZFJwjhzrhDPzwH/jYCNfPFFWquxdAydbzoZJRPZAwVsbYWqIFfGPMdAds +06CtqXffe5lhiPy2tKu9tQ2exlR9nfgwkfWe3RwV57E1DVzE08AXnrTThPb/ +2ouK01XU+2HHVZ1mB48WuFocZDE4LQpCvGsn6QgVwTqJoDEmsrmwa1vazZp5 +3eTis7xSS3sHWMv9ep1TdiF1PfI1wF5rV1g53LjsXqK2lmqPf2spj/7+jMyr +6d6VKV0O51e4D44mWuD0fe2T1+6Eg9rMaovZmYWwft1x2Wn+FaznWVTNCm0O +UdelEZW3p9OOVfHJr+K0YzVXc5n21LPDYLDg1BeVzBaY23neJWlaDJnxxU73 ++ZNSOOCzdZ8eNf/N3x/9FtF7TyrrPa/UkSkHjTBJc63sCvCc9m2DeUwoOTf+ +qeLjMS2s90E++gQodfiFQd1gWLumyx8Ye0j1bAZ/BXxn7n/5G95SuaZeCVva +iw1OylXBZ+b+14XkxCPuP9jPueaeKnpbE0hdZx1397uT3cB6rwS2VLjVUdfp +X2Qjoso31MGpA4ZOfq/qIFJ/8M1bqv899fzprPBHZazpu8o2Ba73CINN48wP +b9pXDjOTCyYGeFdDAHN/SurqPnXxqRXQsdZnSvqdP/Bgb93XLNdqkndu6euL +Tt0Qu27C41vt+TDW6pMn7V5dvOI09osHP6HUuGnDxlcFsJ5ntt9D/U5I37jV +cpVmE9i9ieVSWpEIlsw4QYzAzUevctrA2/OnxLFDcfBxct+uJK8hWGlgK2lB +XT8unGXgTDtWrOcUxhxeveUSP+HFHNfpI8c1nHDuUM7q/e9xnhW34lM3FOZD +meA5/mVcvbDBPXSOp0oLeOxy5jPMZ+eT7U0fcHHUboNjvXkfJyT+AnEtSdln +OwbgkenS+ISnrZCpO/IcAhqnAtk1JUq3q6Hn6sj49lH9v+PbsFNwXdT3GzVo +fJgUvzQlnb7O0nk24ceFIiFW3sKFWtM6Heq6UurJvQWyw4LMdX0PeZG0+Hu9 +/1NO0XuIEGDlGDRbWGZsoKaXP3WL0G/jItC467UV8RdWU/WSknW3xTXZOTtW +tkfvqFH1cNdfMyts+tj3T0Wnjp5J1RdGl3+eYN3FGnfdoTI8gZ+qfz149VT1 +mDbW+6rLZwjaCVF17gpe1avTK8GdGR+xW961jh5nkNtUYaw3VZD1XvNT+wmd +QNU/NCqXZexmv9d8+Of+BCWq7myw1fP+hR4QUBwlT/toEu1jjSz4a0jFh6ZP +bk3sZh0v573decAjjDRaZRTqZtDMuq5fMWfq8qi5TXBDbdb7wXu18FrLY0OT +dyHkz5PhkirqgAU8b3XacxuhsL0h6knAT5gs7fRo2cNe+LnGISVOuBWu/9zz +/WBBOfza5yzRP1wPEUdATrK8Blwjzv29D9LWOHIf5Ke91d/7ICe92vKbKjLA +flaP9v7uPtDdVX3GPbAV7CTe8E/SrGSNJ6QKmx1NOT7Aej99gnjFitPU8Zg4 +Kby8zf8X635B8xPrv86dkObgooK0KtY4v+eR4sX7qbqdy6K5whep695Lhgn7 +PEpBqA0+zxlqBeEEvxNmntR+pzjujVNqKZzbsm5gJnXe6TosPHuDQT0s0Thk +VtheDkE/Df/MNq8jPyvItfceZvsy6PM/8rRj/iNPO+Y/8rRj/iNPO+Y/8rRj +/iNPO+Y/8rRj/iNPO+Y/8rRj/iNPO+Y/8rRj/iNPO+Y/8rRj/iNPOwblaaN/ +o/WageXAsxwDLAce1cOwHHiWa4blwKN6N5YDj+o3sRx4VL+C5cCz3tvGcuBR +3QLLgUf1JVgOPKo7YDnwqH4Xy4Fn3dfDcuBRHc+BR27aHMwvQOtPBvML0Cfy +C3A3rWBvoMWCJLZfgKaXxvwClo+G+QWoLoT5BSwHDfMLUN0c8wtQnVf4f/0C +VLfE/AKWB4f5Bahuj/kFqD4B8wtQ/Q3mF6D9TgpzN1jeGeZuoDov427gbhr3 +hU4xo1Hs9Yymn465G6hugLkbqI67G6jujLkbLH8NczdQfRbmbqD6J8zdQPXd +mLvByg3F3A1Ur8HcDfS7cS8G1UUxLwbV+zAvBtXlMC8GfS7DvBhUn4B5MaiO +ezGoroh5MSw3DPNiUB33YlD9FebFoDruxaB6HObFsL4X82JQXQHzYtDv3of5 +R6hegPlHqD4J849QHfePUP0D5h+hzwOYf4TqPzH/iPW+LOYfoXoR5h+x+s+4 +//WPUD2Q8Y+CMTetFvOPWI4Q5h+hOs+F//WPWOsH84/Q78M9L1Q/iHleqI57 +XqiegXleqI57Xqieh3leLG8K87xY34t5XqiuiHleLE8J87xQvQXzvFDdAPO8 +UH035nmh+iTM80J1V8zzQsuL+3SoXoj5dKiO+3Sojvt0qL4J8+lQ3Rrz6VDd +APPpUB336ViuGebTofoszKdD9VWYT4fqxzCfDtVzMJ+OdZ6I+XSo3on5dGi5 +kjBvEdVxbxHVTTFvEdW7MW8R1Xdi3iKqn8W8RVT/gnmLqH4B8xZRfTrmLaLP +HMxbRPU4xlv0w9y0C5i3yMpXw7xFlh+HeYus93IwbxF9P+6Hojruh6K6O+aH +spw1zA9F9Y2YH4rqGZgfiuqCmB+K6oGYH4rqMzE/FNUjMD8UfXJjfiiqX8P8 +UFb+HOaHovo3zA9FdQnMD2X1t5h7i+qCmHuL6osY9xZ30x5+218n9o97y/LX +MPcW1UUx9xbVJ2LuLaqfwtxbVA/F3FvW+sPcW/TZi7m3LO8Lc29RXRZzb1nP +z2DuLXLTcK+Z1Q5hXjPLF2O8ZtxNO2m9wi+hj70+0fTNmNeM6rjXjOqVmNeM +6i8wr5nlm2FeM6qfwLxmVG/DvGZUf4p5zSzvC/OaUb0H85pRPRzzmtH/w51x +VMedcVRfijnjqI4746iuiznjqL4Hc8ZR3RRzxlkuG+aMo7of5oyj+mPMGUf1 +dMwZR3ULzBlnLQ/mjLP8NcwZR3+31Y45vm/yKAIb5yHU77UMkXdFCGych1g0 +JXY373hhAhvnIRRem+m+8hEksHEeQu1+nIHffAECG+chVGdNvdGawkdg4zzE +uMuvLHnPoOVnu2nzpxhcHa3CQ2DjPETMW24Zj/siBDbOQ8ROmdQ9mUuYwMZ5 +iBvbzoePThYksHEeYuiBjYEGnyCBjfMQaTsz906LEiCwcR5C91V5+8FmAdZ6 +Rp9zf+mGGvsKErjH9NV1xPPCHbE8Ji8dd8RqGL8M98KWMk4Z7oW9ZLwnPHdr +NeOm4XlxZzF/DdUPMf4anhd3knHcmn7fPhdHFMCt/AalrRN7wbbp7Y0lp/kJ +PC9OC3PiUD2PceJw10wM82hYdcyjQfUmxqNB6x3VhRgHBHevuhjfCnev1jEe +FvpeND3uIqE68q1w98qQ8bBw9+od41vh7lUc42Hh7tVKxrfC3at0xsPC3Svk +W+HuVQrjYeHuFfKtcPfKgvGwcPeqk/GtcPfKgvGwcPdKg/GtcPdKg/GwcPcK ++Xq4u4c8LNwXwN09VBdg3D3c9bvG+HpoP0F1V8ZXwp2sGMtsd6677P2BlYeK +OWhoeiLpRhZvHnu7s37fPseYXFl+Aney/H0bmwXN2NsR1UdrhtpXBbK3F8vb +mpOpKk6ytwuqS3EtDbm+iJ2rjupmLhvMHb17OJyshUxeNO5kqW7fs1WivoPD +yVJn8ntxJ+sMk5OM+4ZdjKuIe1jnGL8Mz4MFxsXDnSwDxjXDnaxdjJeHtiOa +fvjriHeGthea3lIr5HroMWFWLjpaH5uYPGfc85JgHEk8B6/fZMR3wPNUVzAO +FO5zzWH8Pjy30wfLo0b1ZiaPGk2PtsNsJrcZz0tsZTwjVm4h8/cIzDFk5Q1i +jiGqb2QcQ7Qe0fxuYXm/qP6MyfvFcxo1GFcRzQd9fwPmNqK6FeY2oroR4zai ++bDySDFHkvVcOeNIounRfmTAOB1o/mj6JMaXxPMkJRl3DPfRcGcT1ddizibr +PXvG2UTnLaiezrgAmINGIAcNLSeafjmTb4x5nQTyOnGX7S3jcuIuG3LTcJcN ++Vm4s4Y7bmh9N+zOqDzgIETgTplR+HEt8zh2u4fq6ddbwn352O0ea/ynv4JL +ZzW73WONx59YOWeBI7vdY40rz+Tx0TvKbvdQvSUvjlc2kd1esDy1g0M+kwbZ +/Quqy139KRbV3c7hlHEZXKyay9PMkUf9m/FZcKcsC/M30fekMv4mOh5Yx/sB +PjMlvxa2y8PUaxlvDrUD6PtTGbcO1dH31zDOHe6gIV8PTY+25w8mBxtNh+qz +GKcVd9BuM74D7qAhrwF30JDLgDtoyF/AHTRRxlnAHTTkKaDjhXX+yLgJuIMm +zvgIuM/Ixbg5uHdW8IrIlBcSInDvbLTPgFWntgCBe2e3G1ZpPrrBR+DeWb7U +1wPTknkI3Dtr2hTsEMfNTeDemejs9+pSFuznK1B9lPegrHw4O8cbfT7NVdOo +iGc/X7Hu73Zvhf2Yd3ZyZH5wjMmDxZ2yPiZXH3fHEhkHDXfHRBl3CXfHGhkH +Z2T3ZrtjcYzHhJaTlVPOOAKojr4/mvHpcKcMuSG4U4Zy9XGnDPkguFO2e4LH +pYQ57Bx+ND3K4cedsl7GDcGdsgnnjWT9j7Bz+9H0KLcfd8omMp4I7pSNdjVO +KXrKzvlH0wcwOf+4UxbAOCO4U7bLuSlpcRXbBUDTv2dcANwpQ/4I7pQJ3jb6 +sG8y2xFA0yNHAO2fqK7DuCS4U9Zw8YVSzU32/oE+kTuAO2XIK0H/Rn/P6j4D +P8keDo8P+RG4x5dr//TZ1zcdHLnfV5h8Zjzn+TTjVeHeGe5/ofoUxv/CvbP3 +jPeEe2fIVcE98c2M643mj+Yzg3H6cL9MRFRs15QqIQJ3A5UZtxHPh1eRHHHc +UHuO6sixQsuJ/p854wHhDhruvqFPY8Z9wz2yxZh7i9rjg4xrhs6fUD+YyPin +qN9C/dLpB3cq/CprOfK6CcZZw13jl4yTi/pLtFzajGuG9hPUbtkwDhqqs7YD +46axxhMYp+wI49fgrhkw+dtoPaPtmFE84srhXtg+hRGfEffCghgvD/fCSuxO +9I8pYzt6aH/49SIq7ptzG4cXpiBtWCC9rIXDC5snYnu38Gszhwv2VP9VVfj1 +eg4XzHBv3e6+PVUcLli+8vnyiDuVHK7lQcZZwz2OzqUjfhDuhQ0sG3H98Px8 +5W5B94OuyRyOWNYPl2DP1lQOR6yXcdzQdQ7ar/Yxzg7aD9F+lcG4dWg6VHee +s916cHYXKDA5sR1MTmyOY6zf9rnsfhatP0HG70DrGX2aMH4B2q9QvzyV8U1Q +Ha0/ccatY123M3Xk8qDp0XrC/Tt0/L5ifB+0XtB6isX8L1SfyTho6HtR3YLx +a9D0aP+txDwUdLxY/P9OGYGcMjQdOp6Q94TaQ/Z5jlzv48RfrN+P5sc7u/PI +pQ1lHP7ILsZvwl22/3XW2C6bPOOj4S4b7rihv5czjhvumskw/i/uml1lHFU0 +X1TvYXwi3DVDXjDumiFfFXfNkCOMu2bIUcVdM+QL464Z8lJx1wy5w7hrVsK4 +qLhrZsR4xLhrhvxTdH6Opn/LOMWs5WA+5RnnFHfN1Bm/GHfNihjPFHfNnjKe +O+6aIW8Ud6YWMJ477iZEM34i7o3OmTXi7aLti5ZrvWBN5ZChMMu7QftvBOMG +ovYLHacGmOeF2jklzPNC9U7G80Lfizy1gP/fzSSQm4kddwTyDXHPcYntgQl8 +3GWs34vWn8ZO0dJto2pY/S66zgbGkce98hTG3UbtBTofNGY8R9ytGMN4oKh9 +RvMPKV3asUi0jMNFTWAc8F2TJBS7eVthrk3rM9eTqeSFoOhw5/RiDi8shvGX +cacjlvFf0PZA+8Ofj2lzb5j84vCgdzL+Mlr/qP1DXiHujok2iISIEG0c7tgk +22bV09/rWN+Ltls64+jh7th1xiHFffM9jAuPu5lGM/wUz+eVc7iZK17WpQxd +LONwM0M3Prn7/h7rOVjWfnT+e/7xt671HJ4mGVF2dO+tatZ6Rr9bhXHrWMcd +c/4V3ONy7E0/+/kDVHd8eG3s2UdsRwx9BjEeN+v+E1M3O5VB5AB7fAb1pxMw +9wf97kOMp4O2E6tfYJwp3GV7xjjXuMvWw7jVuMu2j3GocZcNudK4y4acaNxl +Q+4zWk5UR44z7uUhfxz1m+jv8nfvznORLmWtN9b9fczxRP1nEON4ou2Nzrtv +LrlWq7KOfb8M/V1S/zkMPa1ktbdofvuD3lQkBHey6mh7TVQKbXTe2A1r/v67 +DPr/7hfV4GlmGTwws5t1PKLPTsx5RPUTmPOI9rt2xnlEy4HWx/us618WKnIT +6N+oPanE/DjUnqxg/DjcL5Zi3B+0/CN5P5WwqfL1cfPdXeC1bsStsGXcij/u +x64rqbLz1tB2yBz97XXu1x54z3gEQYxHEOJL7D7ozF4P6HcftvfcldDWwfqd +6HPct1c/jan9H7VTaHuJ/HgRcHIV+zkNVJ85agu/zn329R5qz34PWn1T5edi +uXJofWxhXDm0HKi+dXdVdv7XYdb6R/uPcg1xPkaEm0B1tP5udu07yzt6mPW7 +0PWXJ+bToemXqxm5Sl4c5PDdJGdwS+vfYY8rovrufTu1ojPZ44qoHvjcp+Tc +WPa4IqqHk0Oii3XY44qofljZ3Pb2Bfa4Iqrffy51/YE+e1wR1ed4XtfMc2SP +K6K6U4/C9clH2fs/ql9POL/uQg37vQZUT1tWreHytZrDdzP+Xq2d1c9+nhPV +951O0pafUcBqV9H/Qy4eavfQ+Hol46+hOhpfn8N4bWi/ZHlbmKvFWv/jPUVO +VjdwOGhuew2j4s+kczhoa/XiVK0T2e8Pou1clRQySn9RH2gPtpXnP88BGVJD +Qd+8H0ZtDjJ30Of0zqp1zFXKrdj3C1A9J2PrxI2v2fcLUP3SdKPrl1rZ98FR +/fgGCz3rhez7BahumhWbtGc/+34Bqp/lMpy3bj77fgFrPfDoqeQeY98vQHX3 +wXeu+y+y+yNUX/jRJbZkOfs9F3S8WDM+sv6W//VGF1a8++ug4Q7ds8EvL1zd +v3K4aaRJyHnxxmLW8qD1h/t6qL6W8fVQnfV+AOOgoTpaf5aYA4jqHxkHENXR +cSaJ+WtofU9knEHcz33I+GWojvYTmc2ihI9oD4ebdul367WuxxWs4w79roWM +14a+F7UHexj3Dc0XtefvGd8czR/Vl2AuW9Lf2SWRtozLhrYf6n+zK9VOH9PM +4fDlawJf8MfW5rPmg3y0ZLdcubD7ZRyu2TLGe8Jds32MG4W7ZvsYBwp3zYQZ +Twp3zbYwLhXumo0bO+JY4a7ZmSUj7hXumgkxrhbumhUyfhbumiGfC3fNXhSP +OFy4a2Zy/6X99PoWDtcMGP8LtcPINUPuGO6aJTtd/OuLVWhYaHdqt8GhIonh +8O0V5A/p+omzXUo5XDPBab0WruIlkM7U0fyW/od35sZ4arh3ds4w58R4Ufb1 +2tDxsL/e2TtL6/DFZ3o4XLMUxmvDXbPzjAeHu2bIlcNds+KxI04c7po5MN4c +7pqpDP/669bhrtkGxrnDXTPk4uGumQvj7uGu2fC6EV8Pd826GL8Pd83MGacP +d80urhxxpnDX7FnY6LrmN/WAu2aH55Nfhk/XAO6ajTP9Nrf5UiWHa2a66M+k +9tPtgLtmh2uvnp8qXsHhmiVv8pofm9XI4ZodZ9yoAcbVEmFcrZdfAk7MMykD +HcY9fDXiHpK1rh8dnK+WcDho5T5nqm2qBji8s31eG0QPAg+Be2ea+e6Zwnzc +BO6dqf9wVPO2GebwzgbcvL40dXVyeGf3jyatPpLER+DemZVZv9wzJ14C984c +FFp1ZxYMcnhnTm7z9JuchAjcO7traL543lpBAvfO7q5vPXLkDA+Be2fjPGL+ +PI8VJnDvLNxPxv1UJT+Be2dejFOGe2c2jEemxaz/WMadHOt4zqDsxh8Ot2vA +dsQd62a2o+DIdoT2//DRkLOG+2hLPox4fLiPFs/4a9yPy88tbWDf3+e7tbf+ +xb4WDjftLuOj4W5aM+OpsdzY6u2yrx3+wOnraTKdaez3KHTDRlzFunOeGmKt +1PFzjavuV34ZXP2Tn+rNVQmqE6SOydd3cjhrQoyPhjtr8xifcYnq/zpryEHD +vbMyxrHCvbNoxr3CvbODjJOFe2cejKuFe2f7GZ8L986Qz4V7ZwcZ5wv3zpAv +hntnPrEjHhlq/5F3xoU5R8g7e804R7h39pPxlXDv7NbSEU8N987yGH8N986s +uw1MCTl+AvfOTmJOE/LOlBinCffOvjDuG+6d8TN+HO6diTB+HO6drWMcOtw7 +O8O4dbh39oFx7nDvDLl4uHd2IXx6ZbRiA+DeWdCH9ZXnBasB984sfStH5bnU +Au6dyedrftab1Q+4d3ZLxfmxZuIfDu+My1t/rQDVL+LeWdDBwwLxB9oA986e +jZu2/FxWOYd3tjPlmoNpxADYMN6ZMuOdzf3tt+pEWy9kMP6XNOOdfWX8L9w7 +K9719IZ+Ky+Be2fJN8UmLrvdxeGdmY8Sk0k4Jkzg3tnV6CN86uOFCNw7Wzz9 +U4EfdT2Fe2d5G/aJ6XkMc3hnF45ecX2iyUfg7hjyzlC71DTincF1xjs7w7hm +fCOuGUQxrhk6XoJGjhfQa2rMeObVDT80sl8vXHIfPE6Iz1vzsQ6yytU+taiy +nycsZHyxVbZdNu7UeUqpnC+3YkI5OEdPPhreVgeW3vfv777WzeGy6TA+2g9m +/U9l/LUYxpvDHTTcE0QO2mzGE0TtA3LQbjEeIu6dfdxr4iL2qJnDO1tgV3em +xp2HwL0z76WCV0GRm8C9M75+reGga8Ms343xzshJjHd2xeR/cx1lXEbyjXEH +bdUe545Tk1s5HLTjalct7C8PcThoFVJD2s0HqzgcNBOJt73ykys4HDT+2/2T +Bg83czholx0vqZyz5CFwB034zs0XCnu5CNxBS9NJv2pYX8/hoHU5eoSMutrG +4Z0tMI0XiV7ZAbh3dsLb5iGxcIDDO7v/4+Eq5wNchPL/5h7HoNxjR/3sU+sf +pkOs16cgrpv95DKNpPxfua2wpPDSASL0J3R4PdJ4VdhL+hlvUHeY1MrhnRGd +4sdptwL3zuIuEuHT/hm/Qt5ZneBDmWQxPgL3zrhbzaIPaLPHr5B3VnXL8w3t +SuDe2T7F+EDJzezxK+Sd8cj039pszx6/Qt6ZUIiQa8Z+9vgV8s6q/ezWvCtt +4fDONr3Z8aI4oprDO6u4+YeL+1I2h3fWMstlzIklbzi8M7WUG+q8X/PBW6jX +jfbOdsXo/O2nXg89OysZ1QttApvMV83LYP2/gXV2R5pHcRHkk7kTG/KKoH+G +dFhBYTtZNWqMjZ5MI4drtjfq62nuhj7AXbNdVye/P9/TA7hr5r5LeVCVrxtw +1yzlh9zb+WKdgLtmUkd1fDKk2wF3zXha0t9kTm3lcM2eN19N+6zbxOGa7VBZ +vS9vUx2Ha6ZYtblad1UVbI2d2r+f6j/UjTP4hhJCyfRXHzMdhMqham3HorWS +VHud9+dBC1V3+cQv53Emm8M146831Fq4IZnDNdt99uzTu9YvwIQrYF7k8WRo +Gb7RV5NJHSfLniop3mM//4x8n8VzN284l93A4YX1Ljla/3VhGocXdjlaKlHw +cQWUENpdl9zZz6uHyQS9HfOcOl9lvC00PurGeFvLmBzm1yM5zKDJ5DArMjmQ +6PvDmRxI3B1zfz7ayvSf8UPkjrU8q1GM/CcHG7ljvb1viukcbNwdE4Qei/cL +2OOHyB07uzH1ooMFe/wQuWNNF2o/jvsn1xq5Y1OTfY0r/sm1Ru7YqLorn6X/ +ybVGvpu0lUqf6ZJ2yI+colWaUsYaF1z2WmT04zRuYtGGaSHP7csg3PKudZRF +C9w6suHJb+q86vupJduuHaiB3WZ3+D/FhkLtsS0Pz8nUc7hgi8abaszuquRw +vsT5rbsbrKM5nK+9B8adaPH/yeF8hU3Um3myp5jD+ZLYPpxsnVQJRlF3nYI6 +yyDRU7vNIbwZ3rWd3j7xVA+sYjy19BFPDUoYTw33v+SzyyeKTxcicP+rpyDu +2KrVggTuf6l7Pr3IbSFA4P5X1ZdX4prO/ATuf1nO3HggPJiPwP2vmVlXN6yP +5yVw/0tmvMlAbikPgftfwX4frosOchO4/yUYKSDtKMVN4P7Xfbub+6MUuQjc +/zJpft2gd32Iw/9y7bzy4uzzAQ7/q6vb97VNUh+H/0W+KTsVk9nD4X+tLJiW +9DSli8OPG63v+9HmWQdMnbh242VN9n3ISwkVNvozyjm8MJV2lZPiKgOAe2Eh +TVE8Nyr7AffCFLNCP+hatXG4hALbpuYM9CZyuGBnbZcesP/5DjZVz5PQodo3 +y9SWrYbUcqZd3+N+KO8NDBvHRV827oR9/dwCBl9DweVK7ffg0M8Q8kI9stKa +/RzjLT2ZxZ7BvCzX5hqUOP326oKk+/qb7hzl5fDFnnPLnNW6VQSbrI4LV79m +5/UFTzkxmkeL/Zwh8hNDeLaJ8m9KguLeKamzwitgZdzmv/2Xuu6OgP7eYeAq +U9mYoJENXTPnpPjPpY6baRlbbrQJEr5VZrF3sisgaOrN1jhqf/h4uOCBw5gW +9nUR44LlrDl2Xa8/iMMFyw8MPuB0NIbDBSvbpTp3I7cw8XR+lgvVr8EQj9Zr +f2r/LJHzVIoU/Ake97x4xqRS5zVuRrCPWm9rqouNJiqmAX/giLuExrPFGHfp +49pZQ9U78kDR/6xU9J4u0P42PDPy1ADsYPyjkevKPghk/KOpYtflVLdHw549 +PZqnTw0DubmbP9SHm8Pzik8s97zg1Qe45yV2wGC0k0Y/4J5XidSUqbVBPYB7 +Xv78nRKzNrCfj0KeV8LwTDXajcU9r5mfrywYs7UbcM8rQsAlU+tTB+Ce16Ky +lldj9rCfj0Ke1+Tyjsch8W2Ae16q7hXP2g+xrxeQ51XbaxKo/72Fw/MKD+sz +W3OSfR2BPC9XiTjTNwGNHJ5X2YMz0l4t7OejkOc1PjmkuC2wlsPzKn2t3765 +kz2egzwvb5MplxTcKjk8r8iHC56pNFRx+FmzEkRPfV9dBheaj/u8o/qX2IGH +yTLU8b7G1WbMnC/lHN6fcoeDSsbUVIi8y1MYrMF6Toqw61vx87aMKIHyIdOD +ElohZhha5qkkr6oSIYKzQyoUNlXCrqbo+MnU/Eu/pVhvUPoD5iFrvz051QT7 +bEum5lDnLXMnPdq5VacEFg0s3RtEtVfo/stDxYL6lrFF0LLAqd+QOv47D1it +pf2RtQYzFQe6sjg8Td/1kjtzRNjP8yD/6+DnhXq3dYWJjfbOkkGBlazzFu65 +t2zCVnXBT9vUx4KzqsDqnozeaIVauObbeVQ0tBtw/8vK2XuxPnW9j/tfxuaH +7lkNdQPuf0U9SuNPEe4C3P+6PDdHVkaiA3D/q8dCeqmAbBuH/1XGN1jSM72F +w/9y4jEO997UwOGmfSr7vfWMbg3IVG3QK2lnP78hsWl7nht0c/hfd2IvNTV9 +/826H+2xTpf2wsD24YgXpmdqHPBoTz4cra3d9vtAL1kWKLxKdVcL3Nwxko8a +2X+WzkclbzD5qD4rR3I1J8z/m6tJTmdyNd2Y/NVcJlfZlslf/T7QbXkutxKc +HiQP3/ZqhF2Pr03Ppc53xzKe4FHmfl0m4wmKb1rukvS7kNX/6Mjne+xc0g99 +p0d8t7GM77ZfRmXySp1SyNqwtN1XtZJ1n1D5iPyop1S794XxxUJGfDEAxhcb +OX1j+1wbP7lpf0+rgrWMwzU04nDBQcbhCjK2c5Y8UQierZIZU7M6oDyVl99z +Zz+H53XrpPTluFFFHI7SlWMikz/aFcH7SQ+f39uVyOqnUiuepQk3cxFjX8Wk +BF9IgOLUxNPPBgfhl7TCzjZBbiJ1tnLOOZ6fYCfzekjp8SB4Dzec7V0gTOD+ +190LE6HdsRROMX4Zz4hfBk8Zvwx3wfISpw7RebO4C6ajWvVdZliQGB557oTl +ggXIH0uj82ZxF+z+PUuRY47s96eQCxYy8ech2pfBXbBV56u9t/yTT4tcsMPT +J1aL/ZNPi1ywx3YPqktt2M+LIxcsITfs3Ph/8mmRC6YdmvOufAz7+b3fx6Ra +flDLefzFq6ySDahdZXttYwMNFZ77/2I9j2TYPdY5i5reOfta332DZg4vLELG ++POF6ZUcftxl9TDBKDKWwxE7LWnatnEq+30l5IhlrxSIoR0W3BE7MFF+QYU/ ++30i5IitlR89QLsquCM2baFSL+2n4I5YfceE3rR/8nWRI6a8ULHK8wL7fRzk +o6VMGh5/ZksH7Phfn4tEPtcczxsNkfLZsNZgqLVg+gD5VRPu5bm3whTGHUPj ++pqMOyZS86uKzgl/4f/qsWRUD3nLcfk2Oie8O1Lqa/2VUuA+oJG49nEreb6o +TIP/WD1s1TAsvVhdCjav9NQMvFshounZaC3TXihepU6Km/yEvTvafx2xGyS/ +zMqVtVFsg81nmt1uJWayriOn/cibMlqXnVelpZjLvU+umdySE1OYkVbLaheM +ZO3P/aHWW/q8NZ93hpWDTMpI3q/FjpG831vmcmW6Yd2w1+v3sUuh5eBxcPYd ++22N0PHSViu4uhsSbbilTajzWJ70S/kvY0LJxHwX2b1NOTBjUv8nNeo8LXjA +x8+fqq/WGh+wVy4fpj0aaX/WqY34hr49a//mP+sGrfnbXqHrV8Ora8+R/TWQ ++lZV/dOyP5B4XNZMNqoSXjV6f1Ao7wQhIPwX78+CJpMtCln7esnz2d5ifrXU ++jSc/aLgYznMy5h95E5zAyk8g/+dOLXfHzA4TOR8q4QN5BSBE6WN5Knhz2c8 +VtVAz64RBydMdcTBeT//zr62/dWgMj8zJTsiAypyFjnzBg6RhwN1dql+aIMl +Hy30E7kq4FpRsgQ/bz1Ihmk1ZDh0w4f0iQJu08uhd9Vyr8nP2klb6auLFzXX +g0iZdpC8RwX0vNhXP1ukjfQYU6F40rMOOq5uc7h9tRyCudRvJ99vBJ9pZdyC +vd1UezZmv8anHLD5k/rsbXc3iHiq2io7D0LerhfWmyPYzxFDXZnaeLce+MZ4 +Ouj4+854Orgvllk6Z35X8ScOX2xSaeoJu75a6BYy/ut21ZWU024XbA92/ut2 +4e7Ytjvnkgwyi0HFmev+gdWZsIpXOFykZxAOFT66WnxKmFi30exybXcKtEfd +Oet6eQCWV94+P/o0F4E7Yk/Xn/9aoR0Py2+M+EHCI34QEIwf5PeiZcyfkHxW +PyhYv3dH2gB13WIaMbDxww+otzQtmF3XBwF6gjy05zsuotJAeSAfBk1cfvye +1wsbfUc3xF3hJ7qWT7genBnDfh/KMjN59S5uDo9M9HLpdim3fsA9su4jjXHX +r7PzT5BHllgXlR3/j/+OPLINThf/fKeOF9wjU04vXkh7kbhHtmMw9hpXRCfg +HpmC7oRu2pHEPTL997e+yZHtgHtkxPq5QTH/ePHII1smekPB/h8vHnlkF1fq +KSQ9qufwyArSf3TUP6jmyM9/vja8V/xsBYdntyX5240W2QxwmTIE34kKKClM +F9yV1Qbtemc2Jh7iIkIZtyuXuS7bxLhd45sV/vrX5L2//jVYdI/413ELwlpj +LvwBLfHeXtEFrWDPJfzhgcYQ7CCMS/So682lZ7OWLafOG0/ND1muUfSHwxfL +U9L8GWzDfj5KSeJ9pB61/gfW725WOVzE4dSreebxXbT5yeH6RUxfn3orNpPV +D15Vq0kcn1oJ05TWvuH73Qk6xivd+EorYcLl04U5OdXw9JuY7YuKLnjZpHf9 +ZxHbH/StSdBOSeXmcMr2GdeoVq/sA9wpex9/eHjxph7AnbL0ecUfaWcTd8pe +VizxemOKnt9mO2U3Z826RvubuFMWedZXTMWiA3CnbNZlI03a5cSdMvV114+b +WbUB7pRF3ym6R3uduFNWFAySj6xbOJwyR1F3e/mOBg4/Lr3yVtfy9hoOP65p +nO5BiYAasJ/kukdDuARs7d3a+ZXagd9pjtDobX0wjfFl0HnfoMeIL/OIcc12 +jbhmMLBsxDXzixhxKufvHnEqA0X91Bv9e+HF1cNSRVtzYWP90cMx1Pn3mkvF +y3+8EyCEc17K7bHLYY3bT+/pjvLaJUio/TnFtfhZGejW2jVqlXWAZ8Tu9aZ8 +PATu2VmfesE1/WUeTO+2cq/WLWM957/IIOBxnUQvaH5/lxt2tRKu7cyT13je +BIr+sW+22fXDgoGPLf9X15nH1ZT2Abx9kbQMMpbKTmOUIi14TspOUpNCtheV +mLEWSSqhmeJ9VZKiJkT2VsNw1U2WkqWStKjbcmmhaLnptr73ne7vPJ/3dz79 +dT6+nXvuub+eHr/nd8/z+z5LaiBWsau9l2ZdI9+VcxZZB9cRg5O517zO1ZL1 +0rpowrmKtwbyXzj+sr97TE2mCz6R3UEfdDWtv5IR/LXayyTXSXnbEpe3u4bj +Lxtr83TwIE2uX+z1LB+vI+13OX4x8b+H7k9bmsPxi5309lr/4Fkxxy+2ao/9 +iVafPI5frHDDjstpjz9w/GJTosw3rrtYzfGLmY99xb/XVsfxiyXqTHyVmiAk +4xU+qvg/ryaJKb8XmF6tI66aFRqrpn8nT3zS5D2yKshj26ZZ4QbfyeWFsW5d +tfIM9pE9iNrZnZiqzGAf2bT8epV1S1UY7CNbsCyoI2uHMoN9ZA/rHf+6V6jE +YB9Z/sj3v1mIFBnsIzMeP6PoxkklBvvIel4yJk23FBnsI2uWW/+zyjBFBvvI +kpztpvw4U4HBPjLbGJddES8VGOwjy9k73dblszyDfWTexr2Pje3lGewje/Fg +gnjaLjkG+8i2ve4x11KVZ7CPLDdOd/bRiXIM9pENXb/E2DtYlsE+ssyzNjot +l2UY7COTLB1cVjGyDPaRGejdslNfI8NgH5lZ1Nattzz7OD4yrdBDPV0Xejg+ +MkHR+fyW8l6Ojywhbi8/Tq6H4yO7NWNq2a6HXRwf2e1hz88Mey3m+MhWvM3a +e2VMF8dHNvGCzuibkjwF+8h+9Te2K877zvGR5R4KjDqQLuL4yLoXBYRYTuF6 +D8fmy53jq4s43sOIM9mVQ0JbCfaLWUQuUXs0v5njF4sIzjPvedfC8YV92RYo +mFRQSxQcHn/bt66SDLW9EVzh1UK+15TZ8QrpvvcO56OXnHtbyXBvq+hIJ9oH +z6OyNNhnsYjUJ+cL/FK6iDArUWNThIDc3vD8wVN+O/GwdzMcEirPYK/Q5Fqv +Sfa/lHO8Qssr7/jmry5n85yNf5rHOvn1Eo8lq3cLLWTZfon30vzVBof2EJ9f +G/P3j1Rl9I71+8gsk//xkZGNbv0+Mq0gb9EHxRryp7S+7TL3+2TB4W/kSfay +d1t1PxHVzki1h5J5cn90uI9pfCPHR+YwOST3dkAVx0d2oOjoyXlhKuz9KAee +ME0z6yRmi8zsZSV5EPaUievUr5z+W4XjIwuTU9CbVKbMYB+Z1blLwWWjlRjs +I7OMnhAy3EWBwT6y1KXPM3+LlGOwj+xVylLD7y9lGOwj2xp7dJNDcw/HR1ZR +GG/5+6ROjo8se/OfZla67Rwf2fHVw0aW3m4m47aMeehVVU80LRUV5STcNfr6 +IPP99RxvneLsu2vGhBWR0Qne0/VDXpAFpkpTb9f0ER3R1/u/KKsxQ5rGKtmv +/EjUpL+XAJM317VPNBGRQ6lt7r4mMkz6/+DUlOKKN6uEHB/WOvG9I/MefuB4 +/UqEnidHzn7K8Zp52RhYpE1RZbDXbJ3J1RjrbiUGe83ch9woqZijyGCvmWXU +YIVNh+QZ7DX7mm+zeHqqLIO9ZtGGVt/eZ/dxvGYeNrFrgrS6OV4zq9GuCzyn +dXA8brpP/pWbLWolizuPb2fkakiP22b9O+X15OmqdPdVTt9J5mf1FVVHssk0 +x3OlHco9GWEbxxlFBrYQjWd98S8OFBHimnLVObArI8qhLXnRkmaS629xcHlS +GZlpbWYVYy/KcIgoXj5/XhPxiv60Qjmikti/d/wc19tMfB4lJPPPiskco35/ +meOGf/xl5OzBfn8ZzBvxPXYx+3Y2EaOUiyZbp3ZwPGiRj7YXOTlWsT6sB/0+ +rAzwYe2W+rNgnZcp9WclJYsi3BUr2e9bkn/I2ZTT+JlYuF9ZuEaG+o5NRvpY +zhnTwPGjvTAqvNYxgfarAm+4/su80Xv9isnUEYuntR9uJ6cjJxc4ScZbfEWq +yzrnJNYP7tbvBydVUj/4qdwT7+K+tZEt0u8B5y9KHxuy7zFZPIHn/rNGK8nc +5RhlLMnbL4UPfxqRSfsp+OnXBOyRvG93m4/Y4ksp3aetbZecKbm+D9m20XVd +HhmdNnlLZEILGeXEV/kquZ81t2MP5Hx4S1x3uPc0m7Sx36NdWWtxxmhNDgmv +CJM7JU994p8vFETqbm4lXoKAYt8dArautaR0+MNsnybystn/TeuxavLV4oe2 +OTq1hLi1unx+0k525lfzRlnWEN6Xi7PUuj+SoSXCsY9nthO9//faZ+RLvfbf +pJ76fKm/XlvqqRcmXi3ZZfKezA0d5Sn3U1eGGWPMr9RvJm0N/XUqG99/6lQZ +Zu79XqoJ87SX9v3xkRzIMw0PvdOUcSiv7aggpI6knux/TgOejzVU6veRXfh/ +T1/GPamnT1ovYH1kfkOr6t6pdxPsI6szNvq0cmgXwT6yn2Lfdxbpiwn2kRWP +bziz26qVYB9ZTFCh8ILk7wjqveAjy8orXFMY28TxkdU5j3qSe6mB4yNb7zpD +W/cc3W9sxhtl/a//rR/1LU7bbaX7XR/MHHdno4RfIZNuzgkScvxlGfaPEldq +VXL8ZRW/fhBfHUn7I4G/LHxi3c7K5fR7d/CXvUn9OH/wpS9EBfnLZmi9ZASS +/GGtbf/zfvBc8ZfCfo+z5wWruRN3VxM7h8QRH8obSbCYJ16p2kGmST2MJ/o9 +jBkHpB7GR6NLdWSthCRKfYjZ53HNGYEJPx5ZKazneMQ2rdUKIkNTOB6x8bXp +Om8rMzk+snQ1UeaW+y/Yv9/XEwTdFyR/d47tfONFJkWkYmZhlm9dFdE7ZlUZ +Nb8t41hNxoj0X76Q4Gf3rW7Opf7EGKd3m+oKG8jChNV78/yqSd2KmX4T7jSS +8/sGOxr1SvI9q34f2cnX/T6ytHL1mQVH6sgV17cJ7vI1RF0ts/aOWML9xky+ +F0V9T3AsMTvT3lenivtX8w28h6ULA1Vw/2r+ylNqF+PHK+P+1fyjq4Yb/pSj +iPtX8xeLC6pjPBVw/2p+Ue/BezsN5HH/an6MQ/URt3q6nxd4pUYBrzhNBvev +5r+dUj9xuV4fx1OWV/Bjal1nN8dTFj75fHyYYhfHU2Y9LyHMYqmY4ymb8PCG +0u/vvnM8ZXEk+tqwu7TPNfAwX38DgYjuW4O4zirdel/NlsYZjlv4E72FArrP +F3iVvtJv0Z7UywD8+SZlGZEGjTNwtRM1pDmR+gKAlxSFHX27mu6fYu9nm+k2 +okTjDPziD9dSk/xpv1DguhFVohIN2t+evf7fOytdMjs5/rKIPwRl1bEdHH/Z +sexfFEvSaF971kf2utfuqraI4y9rlSmyGPOilY0zcM0QsU9gI/39QfzO5c++ +LX6uwp4HfIfl16ToVTTOcKw4Vzh3TAV9HhV4d5uqn+5vdD818D+/rd+zXY7G +GXiefUeu8gW6H4H1o8nfX7Z2DvUyAL+r05h+4AXtZwFcWGG0ZLsx9X+w/pnd +C3uP36P9AYDvG+S4I2BLO8dfpvnr4KSn1m0cf1llh2HlXo8Wjr9M4UjSwetN +9Dkc9vwFTkdXvGP7erH+sknKnrXjnGmcgZvYBcvElCqxrwc+0mtdyuCNNM5w +zK59pFv9UZ6NM3AtrWseSbvoc7/Ae8YY9lr20Od+gW92E9Xq6VHPCPATPyl1 +zbWjz8+z82qg95nGULreZO//zra6cQ20Xwdwm3kz9t/e3MbxmmkIwn7OVqT+ +BuCzZLsPxxV+5XjNTKaRw4wz9bkAVz9lY0aqWU8f6zXTWRo0N71PmY0z6wmx +umu7/jCNM/CXgoVpEzoV2Ouy88S4tBVrvGmc4fjCUPWv1Z2ybJyBB6gG2ET5 +0jgDX/JUc/15ZerNAe6jdn5P4SjqzWG9acRzY7IF3e/A8o0vb/q6izhes+x7 +Q0L7brZwvGYWfj3f7DVpP1jgzuFy3y7bfeZ4zWqaolbwp9RyvGbOgs4rh7Wp +jw8+98O2DX75GTTOwKeWxR8ZbkbjDLz7zQhlYRKNM/D4lvDMtQY0zqx37GZZ +6NV4GmfWX6Z8JV9en8YZuK5lr+d/zOlz7MDFJcXiD6a0zwbwdMfFz9zMaX9s +9vzg8EcB1rQ/OfCG8hiNQWuaaX8KKV8yKO/xa9lGjtcs6cSDoDenazles1oL +gXfnWeqNAM5z9V2gMrac4zUbdEj0+/goGmfgkwT6T/4eQuMMXLNgj3DvMRpn +4P4z89ydOuXYOAO3HSLzZu9uGmfg20X5g2686uN4zVyvtoZOfdjNxhn45ZvH +XROu0/0CwHcsHqkbEkX3G7Lnv9LvORzSyvGamWpssrroT/sbA/8a6bDepp32 +QQJelrO/yrpPyPGalfje9//LrYLjNdMI0Kh9n/UW5XV8XpbR4Cyjk8oor+Pz +4pa71FfIKKG8js/zdb+lccpTAeV1fN66Y92zLBvkUF7H55n970IbZFFex+cZ +HDRXNEygcQb+KbFkVchpGmf2fmq9Y2u9aZyBr9Ub+dl6SzvK6/i8oU4PZsct +b0V5HZ/35t9rJXeK/bN8nvYp0cXkeQ0or+PzgiQfy0NLiPI6Pk/8/su1Bdll +KK/j8/rXA685/jg8noHj8Qwcj2fgeDwDx+MZOB7PwLei8czu10TjGY4eaDyz +/efQeGb7A6DxDLwRjWfgpWg8s/3A0XgGroLGM9wXnp+B4/kZOJ6f2f12aH4G +judn4Hh+Bo7nZ+B4fgb+CM3PbJ0bzc/A69D8zPY1R/Mz8NtofgZeg+Zn4Klo +fob3x/kG6wdD+QZwnG+w6wCUbwDH+QZwnG8Ax/kGcJxvADdF+QbLUb4Bx+co +3wBujvIN4I4o3wBegfIN4A4o34D3wfkzcJw/A8f5M3CcPwPH+TPwbpQ/A9+E +8mfgOH8Gfh7lz8CNUf4M3Brlz3BUR/kzex2UPwM3QvkzcFWUP8P18HoQOF4P +AsfrQeB4PQg8Fq0HgeP1IPBAtB4EnorWg8Br0HoQ+B9oPcj65tB6EPgQtB6E +YzlaDwKXQ+tB4GVoPch64lB9AziubwCvRPUN4M9QfQM4rm+w3jZU3wA+E9U3 +gMeh+gbw0ai+wV4f1TeAh6P6BvBAVN8AXovqG3D8huobwNVRfQN+PkC9jhmg +XscMUK9jBqjXMQPU65gB6nXMAPU6ZoB6HTNAvY4ZoF7HDFCvYwao1zED1OuY +Aep1DNTrsE/t4II9tvE11GMF/MbR49oyUdQjA3yL2spbjTnUHwp80eoZvlP2 +tLHPqcNzdpk/zCqPPFjE8dClSzn7e5Ly6WfPe/nG5nF8SZaPshWSvT4Q7N/B +9w/8Orp/OG6W3j/24GjqXLtxbnE7wR6cvcLE3JpZqtibw4fz4fXweY3R/cN4 +8Vj08/ze6Hec/q4ths9S7GqK8fsy8L7wb3jdAmmcsb/gVrSQP9ZVle0DDPy9 +x9gf89aKCO7zfwOdD0c4Hz4nvM6jvGDPZr4qp793tqfLsq+j2jl9uevHm6au +/A+9f3idbsWMpdtMRPh8Pj4ffg7nw3lwnQHuh4H7+S9nwTqf + "], {{{ + RGBColor[0.880722, 0.611041, 0.142051], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxNmwf819Max7/nfIuiVFQobS2lkKJCy5Wi0pCVpLKiJPPSzpa9d5GZvV2z +kD1z6eKaWRkZl0i4n3fP5/f693r1vM75ne8Zz3nO5xnnOf9ajD162KRcFMXo +akVRqvwiFcWzonqqbyziG+0t/HsTE20aUjQQVRetJ2rocn3RKM0xR3Sn6t1V +vqeyhuhY1SeI3lD9CJUbqtxctET1L0W1VN9Ii7YR1Va9vtdhjc31/UOV/xU1 +Fz2n3y+IGhUxD2ObieoWwf9yUTtRN1FL8818W5pv+G3tclPRzprrY5UfiTqK +thA1EW2n9lL0gertzS9r1hGP7USNVW+KfFTvpHJ6in47iLqIWnnNbcx3C9NL +6retv9c3T+01xyaizqpv73HwOFl9q4k+hR/vh3Evqu1rr3ewaKhomOgYtQ0W +DRLtpN9bF8HbnkX83tlEW2fz1kDr9lK5t8p+ot6q9xB1sDw6qm1XUR/V+3pv +8DhOa4wVdVX9kBT73k30iurf+Pcu66yzu2hHcCHaQ9TTPE1R30NFb6k+wN9Z +f5B5ZY7BLuFziEv43MtlH8vgdc3zJjgTfZ+Cn31E/b3+/mobKFqq+lKVu7vP +t6yfQobPq/zK+NrX4+BrtPlg/QO8B+Q6yuUg876VZbe/aKD7HeRx8DvGJfwe +6HHM+4kxBnYXiapJ5suRsc92OHLmnEQjRYe6ZH8zREeDF9HTKfg+THSj6uel +GLdY5Xrom+oPqFyffap+kuhw0RGif7qcILpMdLroDNHJbjtStEDjzk+x/ilu +O0o0TTRRNEk03SU8TfV3vtVCv0XzNX6m+T1GNMvlFNHZXo+554iOFR0nmuu5 +WOdUtx0vOs3lCaIzvR/2cY7nYMwV/naW6HLvid+XeC7mmC36d4r1OovH3UTn +qX6Rv8HLXH3Pav+PygvNN98u9nfm6qTv/xCdq/pTontE98KfxhwvGiD6Q3Sz +2h4U/az6+6KrVP+fyv+Krlb99iLKa4qYa0/N2UjUVt9riP5t3n7Fzorm+ze8 +3OCS/XXRmOaiBcbOSvU9TrS92lqIblLbd0Xs53pR1xzygj94+g0bKLrNv+Fp +lX5/JLpF9W9F3xQhqw3UtlLltWBH9dnooeoPeT76j9T8zUTzVH9EdGsRcyMn +2uZbXvO9j9Wa4xPRA6o/7DkYc7/oxiL2tS32WHSl6k+K7vZ8s1Ls6S7RGNX7 +4ntEjxfho2jvjP8R/az6L25/TLSP5muZY66p+n5KijOBjz+xyaJOKfb8A+NU +XpEC0895z/Bb8ZHY+SVuY98N1Xcj0buq/+E1XxI9a1ww/mW3w+8Tor/U/7MU +e9xBvG2Zw+/hsP+2D3/Ofvx3zk70aBF+Gz+IL69uXvA9ddT3T+O0mtvo9555 +xqdPVJ+jUvjzLUXN7cfx5/jyzYrww9hL7BdrNy/CJ+OnW/g3/hvfulERPPO9 +qccRA2B38at17VvhA3/HePww9rGtecc/tiqqfPmWnht/1cH7aOXx8ISfbOcS +247//MhjiQFYj9gD3w5P+Ed8J77hG/sT+MBvb2PCB+GT8Ocv26fDB74RH/mp +66yBb2cMvrCjffpnfFdZPUXMQvzQzXziQ/AlO3o/Pfy7lefezvzhP3t6XnjB +X+J3iQ3ww53cRr/eRfj6DqLhOfw6fhPfjt+kjj/vW1T59zdV9vMa+LGBnmtP +/4Y//GN/8zfAv/HnxAT/KMIPL7WfhZdBHo9Pw1fjeyt+fXBR5deHeF/EV8RH +lTiA8fjqGjnmGGg/PqKoigMYj63HD+BLnilCbx/0HvDN+xVV/ht/fhM2PYX/ +Y40D/Q0+8N+jiyr/fZD3f4DnYs2D/Q2exvr3APtvfDe2Fz88vqjy34d4T6O9 +3tP2q/j0m1W/IIVvPt42e5zq96XwwfjxW1RelMI336ry4hT++DaVl6Twu7er +vDSF/12o8rIUvvle+398J2vgN08U3aX2K1P440dU3p3CL9+h8vIUPr3is2cW +VXED4yu+Hx8NH6dY/vAx1b+Za7bHT/B3xjPvDI+f7Ln5PdHzTTXO9rH88NNz +PFeDFH7obe8B/16JXfD3l5m/M4uqeOZsYwSezvHvSjxxqteb62/43U726SNy +xAfneQ/4zQuK8MHwcpH3c5bXg8eL3X66eblU9LVomcakHOtd4n6MucJ8b5HD +t+HX8ME/pyofTMxAvEB8QMzwS4o18Jvziqo4gN/EC/j464rwvdvZ/+K3K/EF +eruv5Ytf7eKYgfXwz/hcfDgxAzEC9VWOAY6zzNgr8QTxBvFFJY5h/ErXr/Fc +xA/EFmf4zNbGofp9oOhHZJ5Cvhd4Xfzhg94bvv3uoipW4Dd8POx++KsWKWw7 +az3ib7+K1hdf1XP40TUp/Crj8YH41RXGEeeL3/+pCB+Kv1/tOIR4gVjhX0XE +C/jnx8wTPrlVjnjhEe8dvolhiPuQLbHLfaIm+l0zRYzUOodPf9Vz4fuJB1gP ++7XYeyO2IEb4PEU88EoRfn7JOvtc4n4b63vdFPtpo7J1invWNSoPE33hebln +ENM86LlZ72D93iPFXel67ApYdbzwqmW1j36PtJ+4WuV40eeqt1PZMkVs8yQy +9j7RL2wOsfpV+l3PfdYUUb4o2sW+Hj+4mep/q1wmaq/6esTeRfh9YhTOl9zC ++yo3EOUUcQYxBvEAde7yrVLELTXd9qHbixTzEOe0cEzAnCNUH54iL0D8AD/E +ObQNcz/iHGKuL9yGv8fX4zupcy9Gt7kvoOut7ee7GWM7qr17jnjgc/c/R/X6 +/r3INh5/cH4RfbfJcYfl3PCt/xO9Y3yeYR0n3u2VQo7LjWP0/Fzj+lu3XeP2 +a11+6zr2jHnQuy1S8Mr6M1P4dfgnbv3D50W+Z5QxXOa4t6Jno6wjdyBT45A4 +eZrKPtYr9OcX4x36w23gmfj1eddXG9PvuJ39gp2Gxg+Y4j4LrsAa9g5bh56X +5qd2inKR5/vN8z/qOrqziTHJXeAny5fvXVPUadvOegAe+qeITYlLt02B+zXG +Jtgi93Vdiri5ojt/FaE/zVLU/7S84RmZ905xfsSFu6Xo95pljXywCXXcztgO +KeLJNsgOHU5xzweDtIOrLinyaNm6VZr/bVLIE7numELf9G+tnhXWtW5qaJpC +fqdbj5Et9py7z8IidL++7QBnTTtYetdYqfBOnfPdwfzXsbw3cXsr6zL3CzDC +Ggt9LrXcp4GxxPxbp7Bx4LqW5+HsGnreCr74Bg6blHH/Oz4H3ht4nsYp/A3y +z5YVduIZlY+JvsrBe0PPOauI/jMtg02N7bquM+dOnqeO6rtahk9bx1Za/+jf +wPw/lcJWslZt9wevLcrQQ3SQu39j84mvbGK9W2FdZR7u3HPc3jOFTLF72O8J +PvfrjUnk/HCKe0hr4xccv1BEXo429H2vFGuTcwDf7ax34KW9MQPWwOJnrnc0 +9qobz9iivd1On5Ze7wXzvvU659jZ5/W7Mfq85dzJeKthfi4wlrfzvg5y/QPr +IHdW7Hlr7xEezlLZI4VukhNAt9FrcAE+wAbYBKPoHX27u/9K45I4hj2hq+j+ +Lt4jdc68i88d2fc0pj9xv0of8IEfwu+Qg8anLHcffN9E8/m65Yx+4gu57+AD +sP8npsgR43/6pchvLDSPfb0vZLmn5dnX/dgre8S+YIPOTmHL4O1olZNS3KlO +dcndhViA+wx3GfIi3Zwb4X5D+zifRX/Ln/gBXrmXDUkxnrEnuD7Caw30XtAR +YjNw30Nlzxx5bMZw1/suhT8eblkxZ021b5CjDZ/dxnzyjbhlaArsglvGIKfW +lttw92/rPo0tsz6WIfZsvxQ27TuvBS/8JubhXnxSihhoV9V35o6aIwe/n9vp +S7mv+4B9dAD/frLKf6bIobBn7Cz24QCf71LbLvwoMea1KWJjzhFfPCPFHXuU +29F3sI8OJON6jM8aGR/sOfdwHfmjn9z5tzeujvZ593V7P2NmjLFE2zi3swfi +Peagbbz3O959ulp3R6fQ30nmlzwAseehPnfkgF0ifvvC32hnD9gs9Jr9He49 +NnGdOwLfkB8x2gT3f8PnjF5UfOBkn/Uk75H5WZ+13rIOcmdA1w4x/ulD20S3 +93C9u2U0yXvp7rHYGWLMVuaBM+Qs2RN5J/I76DX4ANvgBR6ws928D/Cwoe3V +FPOG7TjWc6Jj5G/fTqFz5AVoO811zpTyBNcPND7u8Lmf4HH0R7ePsx6gD8OM +WTANvsHyTsbzZPdpYzkf6/OC35Ndn+D6EcYm+yUXRVzFXehRy3aG22mb6vZp +rmNXKacZb9Pdv5tt2jT3eSgFb5uLzkzh84hJbve8t/l8Zxpzc9wHPaI/sfIs +/6YkDzx7nbYZHsu63AuJs7jvcA/BBhMedZCvOJ9cf4o8BnmYIz3P6eaHuO4M +12d5XeLzmu7zvc/rNJ/Fqa6P8LgzPXa268xBzog3HfJIa+8GbmNt8j/kWsjn +kDsiN8NbxYY53i64P/TKEUvw7ULzTgx1bop4hPHkjsi7ECMQK6CL5GfI/0y2 +jl5jfPKbvDc5IXw697p3bQeIC7EJ5IUu8xz13f658YldQ5e565DXYk/MMS9F +DHekeQD/8EQui/nYRx/vBXncYJnMt35U3pr29XsTcrrRskI2N1k+5ILbqk+9 +HO9ij6a4SyCD2y0HeL9jHRncaTnAy0Lzg+xvs/zAwq3GA7K5y/LhfemHFLkr +YnRi9S9tE8A0b7fYN2JOMMKdnfgMe3BPipwdd2jyLfe4Tq6OPB15NWKox1Oc +JzESdyF8H/M94zlpe9LtvAlyzzysqPoG3p5xn5r+/rT70PaUx5Irop180THm +Y4rbFvkcwdctxtiT5oH4lu+Lvff1XGd+7tLcqdGzFkW8H1T+HoF3Dd43eCfg +vYCcPXnr10R75Mj1k4cnH79C9GpynjxH/p48Pvkm8k7k08g7b6pv/XPkE8lR +f2/srDSWmLeL12FvnB1nSF7wR3Au+kn0Toq8JfOSoyNXR26uicYPcOxSw/EM +ebqmqg/MkT8jt0W+j9whOcTKOxzveh+msE2/q/w4Rd6IHBS5KHJJ5JTIt5F/ +IpdFTos8znL3RRbIEdnwJgDGB+WQ63OWLXL8ynIl50ROidwSOVf29aNl+bLl +SQ4WOVVkWl/zDfYbAvJ807JYZtkw5jWfCTr5tmWLHNkzciWfzzkMyYHx+1Pc +6cn/kj9Jll1NyxLZ8R6KLPnGWjMsv18tww983pwJckSGyJVcKWcy1PlNZLja +5/CH5Yms11j2n1qmyBP5Ip/HfWZgaZXxCjYr+AWwtJHjq+YcxGZu527N+dDO +nKuK+E6ugviXOJi2mUXYbex35RvtYJN4fLxtO/KhL/jajDcRx8TICnvCetzR +WJ83oa1ynBnjsY+cyQ/G990+Z/DCufU19tEB8s27q+9eObCDTm5sPUAfphn7 +vMPSD31Cr/Y2lpH9hcbyXcb4ast1geWEvO43HnkHxC6/ZgzBAzhDn8EdOGYv +X9se1DaW/zKOOaMhlslb1m2wC0/sAd1kT+AAfQQXz/os2Ru5d873CmN5uvH4 +jnVjurED72Cm8Bkv83mu8vnDK3EiMQ9x41KfH3skLmzkc+YMGxnjYH2wsUSe +kfdS2jjbHvZrnN8NPv8ZxgtyYD7+JoocNLlo8tvoJO9SvFP1KeLvfIZbdvDV +3vjhfjPMZ03u/irjjRiT+IS8IX/bwBsIeWfy1a0tO/IZV1sm5JHJW/PWyN8V +9S5iX9zLhhtTFV7QYXKTjJ9nrPCOAcaaF7F/9BhebnUf7p78HQF75J3+bp87 +e33FZ4HMyF9hb+Z7D/xNB3lX9oE+kV9pav2G38XG4aIivqGntPE7O4Yil1vP +2OSdlrdJ3ih5z+b9mHdkcs+824Jh3rR5++UNmP1gN8EwWKxvDO9oWfE+yzsy +uGOvvGlgF7Gr6CJY5D1oC/sVMMz71EBjGD3s7j3CJ284vDfw3sSbDW83vCuh +n+gpb1680/Bew7tUbWOIv8sjh85e+Lu8Rra371ofunqeZt5Xe/POPuGf/bDH +wZYRexxkOTX1OGSEbJBZQ+8RXLBPdHaI98a+hnpv8DDQuN7B2GZv8M9eeXNj +X8iI+xX3LO4y7I29b2+5EDtuY+ruNvbWyXtd++ZtXeub457B/Z3fw3LV3Z87 +CPek3u5Hn8rdaWfjhRi1l2XNee3l+XZyf3wkuOxsvUK/sDHYPeSxq3UVncUP +48t4v+Mdb4W/85aPz0IvWhpD6F0H47SuzwFbzfzsc4392F3GFOeK/Diz+sYk +vO5u3ocac5wJZ9PfmORc63l+7CTY281y2syygu+O3gf2H95Hmgf43cfnie4+ +Yb1Bf5gTf8Te97ZcKnKqYAXsrMXpOpiq6F8L4/pyY3ArY7Op9zHX+AWPzY1Z +vvc3jpAHe9/UGK1gk5J9sYdu3lMTy+kc74E9YZ/QZfT1SuMUvF5mLM817noZ +g3ONHTAEvnpafiONNdrADOfHuB+NBTDxq88fHMBPP91Pl+SIpSp3S/xOJa/H +HXO1vn+b416/l/q/mONOMgHMlpH3mA2+y8jtvsS5l3HPe1b1iTlyuctVjsnx +dxGfqzw4x99CfKFybPbfQuTwE8TFyBB/g1+upvnm5bjDfaxyVI6/q/hE5YE5 +/gbjU5Wjc/yNxJcqx+XIOx6gsf/Jccf7jPVz/C3FFHSrjLcA5Ix/wc8MVdvz +Oe55v6jcL0fuB3zhi3qLjmKdMnKY7zKf5zkvx52f+/4y9leGj36Gdcu4sxJ3 +7V+Gn/sgh13gvCq5ZXJy16JTZeRcL0FXyshTnq36QzlynE9hD8rI132n+qk5 +cpID1XZRjnwu67MePGyi+vvZb7vot+c/S/UfcuSXx5dxn6TPBWrbuoxc7XPs +vYy/K/mQM8rxtzEfcQ45/r6ljb5/g/6k0MNtrZfYnhW2Vdh2/l6HvznCxoDN +d2wPltlvYgOwBYwhnuN+xVhsFPfwr6zfjPvJmJ5XBMbRJ/Rqje0l35dZL7g7 +H2Pbhm/nvNEFxhIbYFvI3/Duhl0ilgJ/2H7yBytsH4iPiYnwZWChl3WfuyIx +FHamsf0kdgtePrY9+922GSwhG/a5nuR2Q458w/qq35jjToxd4r5xk20R2EQ3 +aqrPTTlyCRuqfkuOHEN11efnyGEchsxzvEceqfJfOd7vsNPEbcTg4O6QMnwS +Nod1FtiuImP2UEPfF+TIVfS3LrJPbDky4Dy+V/30HHlcbBEyRnb4X+SKTAdo +njk53mawmayPrePcket59nvoPfyBU7AIDtGJlTn04i+V/KcE8qWN1X59jpzU +sTn0EB0kj/6EdWqc+rzss5+s8p4cb3DN1F6vDD16JMf7GWc8tozf1KeBhxz5 +2o7YszLqzP2B5380hy3ADpCzWJoj9zG8jN/kVJDxW9kxguon5chv1VF9YY6c +SKn6/jne9vdW/Y0cORpsALqKnp4JfnLkmI/je/b7r/r8lsM+XJrDLmOTz1CZ +ynjTOpl9lPF+8bDq72XHHGprZRs+QuUdOfJCD+aqd9BjVH8gR/5tmNoalmHP +m6q8N8fb9Qk5xtCfvluU0f9E75n9sr9GZezx0Bznx9lhO6f47Nqr3qCMfXFW +b/q87suxHmvNVL1tGXlHsLBxGXioXwavrIts2nseeGznsbNy2Cls1PQcvgo/ +hU1tZjwcAfZy5M9+zrE39vWYytZl6BH69Jh1ame1LcpxLyYm4i6HjXgtBw7A +wOs5zpUzBY97lIHJQSr3LCN/18a/qa/KcWac1wZquzlHrvGVHH4Fe35hDluP +ncfHDvO5HJ7DT+OjX8jhz/BlG6m8PUeu8esc+2fvP6mcmiOnCN47GufX5cAl +57VVGeux1i6qL86RW6yt+m058p34w33tE2upvDVHTrRuGefNWeMD78zhBznb +kWWc75YqT8vxDvl/2vQJwA== + "]], + Polygon3DBox[CompressedData[" +1:eJwtlXusz3Ucxr+f95eE5JIItXVcW80tFEpznRmjmuI4buecImtLG1taGt2U +W4qcXAvnHLmEolKx6eLWVmluW83S/TZ0UClFvZ6e88ez3/N83p/v5/L+vN/P +r6Bk8p0PRJZlM0ANcGWeZXMZ6J2yrCZYAP8N7Cc2AH018TPoa+CnGWuJnoGu +Db+WsUfgk0F7zQW/widqDeLd0E/AT4KN6A7ojO+3ol+CJ/AXfDE4QKgn+kn4 +fNAv+Zs/4FvASvSr6CF8/zS6K3p78tyzoG7yN39rbTAX/j3zC+GzQS90AQi+ +fxBdRaxB8l1/Bi2T79yO+KPhu7UGfdH70W/Af8p898fA9ck5mBfOge5ewNze +YDf6W2I3MDYC/QL6DvgRxq5DzwyvrRxUweeArzKfUW9xGrTL/CYjmb8MPQ5+ +jLE/4YvA7clrNiH+Ivqu5D0vwJeAEehC8Av8fnA085ucgD8ePltb9HL4M+Hc +zwYdWO859ED4nOSzrAxznak58YfQjZNznNBTw7WjN2mPfid8Vq3RBn0K3Sn5 +DAvDb/r/WzJWBP8SFKJHgZfDb6S3ma814bXA8/BK3Qm+nTl9wDz0e/xeojPD +14Ju8EvBQvgr4EZ4DfAsvBzcCq8PlsI3g57wesqh6gvcAr8cLIFvAl3gNcEC +eAWYzn6fgh3JPfEFvETxzGc6FH5zvfUu4oPhHzM2FP6WalqcsbeTz7APPUw5 +S66xp1RbuXPTEXyGHo5uBN+Z3GsHwlw9N4FYae61mzHeA34ZKNNeoDu8LlgM +36A7MqdB7txqzf7w1rn3OsuZHyZ+WP0Emif3XuPcva8e3Iy+An0QvUJnVC4Z +K4IfYmwT/CrGVqGXgW3opuiGyWM3wWuDRfB1yd9eBD9kXkO1Lo+QN6jmb4bX +UQ/B14My4ufDtTs8uRfOgRbJPTGKubvCZxmW3BvyBHmBemQW/F8wNrkmp4V7 +Rr2imlbv/ANGJvfQaPjxcG0WgYPhnCvXfcHnoBi9Wr0KHwDfw+9W9I/Mb5Q7 +Z8qV7tgK/XvYi+R5A9EfhnMlD/oAfi94Hf6a9ic+CT2VuVMy104vsCW5hu4h +dlvuuZrzUfUZtPebjBWjv5N/oMcL8ibdP/OY3mZK+O31RmPhX4PR6DHy+Nw1 +oVpQjsfIq8K50Jxx8G/Cc7VmiXId3qsYlOptw7wEdNLZwrwU3I0elPu/QZ78 +CbH7wmd/F+wNe7C8d5t6PFzTqmXVRGW4RlQbqqmKcI2ptuQB5WFPkBfIQ46G +c6pcVskjqntGvaIeUe3LY+Qt6oEjumvut61X/Tb9cp9Fb7Qm7FHyJnnQ6rDn +yGvkGe+H99ReerMNYQ+S98hj1oc9R14jD1ItKUfKjWqqc+4zaO816D65PUle +pBpbFZ6jmDxuXdjT5GXygIa5e0a9ov+Y/wAuqvr/ + "]]}, + Annotation[#, "Charting`Private`Tag$87749#1"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxVm3n811P2x9Pnfe8VErIOso5thjF2QqJhGGMsM9YsWYZsRbJkrRAhWUpF +IUVKthZFGmUbhRa7NiRbQkb29DvPXq/P49vvj/M4530/933f59577jmve+79 +bHZqhyPPb9yoUaMnUqNGteAlN2q0ctDkeL48Cs4JOjeoS9DZfj4tfjs96P2Q +3w3+VNAlIV/huufBo+zfQbtVjRqdEfyCKLs6aI2Qe0fZwUHrhnxQ8POj/LKg +9v7GNTXVvzBofNR5L0meG3X/FnRI0HXxfHFN370+aFzUeSboBreFvj1r6gN6 +3egynpdFvfWij51Cvsm/Xxn0uyj/e7R9aNBhlfTtFdQj6FK3e6v7gY6Dg+4I +upN3o70qqA+DGHyDoK4h3x7ULah70LVBtaz6fa03bQ+wrjf5+dnQ467g/Wrq +D7r3N6fe2fH74aHfP4LOS9JpYFDbkPcI2jPKH7Be6HNvUO+g24LuM0evIf69 +rymHbkODD/P30GtCtDfL32gTv/856MGQNw6+U9BDIT+NLSSNySnBTw66O+Td +k/R6JOj10GkEthA0qib9+P6THkeeHw0aZH0fM0ff0a6LbmNr+j7ffaomO30h +6MWQx/j3Ma5LvSeC7vc35lIvaBx2HHyfoL2DXgo6qpKedwT/Z9BIxi/4vyrp +9VzQ425vsvWmH5NcxvMzUff2oL2Cnvfv6P6COXq9ZB3R/WVz9Pmv+Xj6HPrc +EvRVtNM36NigZ6P8pCjbL2hfbD2evw/eMn47Iei4oIlRtkmUnVhJ361Yp9Zl +u5DPqjROm4d8SiXdtwz51Ep96hP8mKAJIR9RyfbvCdqGtVypH/8JeY7ndafg +HaJ8n6AdQz6/Uj8ODfnDkF8J+dfgvwR1DLogqG3Qa1E+NfjwoNOCdoj651Ya +j5eCDws6ibaCHg5qF/THqHN2pfFj3V/n9TSDeQs6M+gd5ironKA7o/6k4F2D +3g96jLXCmonyD4JfHnR4yFXQlSEfGfz54N2COgfNiLY/CGqGzcTztUEXBk3D +joIuCnl68HnoE/LM4B8GXRLyG8E/Cro05DeDzw/qEvLbwRcEXYGuwT8Juirk +d4N/GnRZyG8F/zjot/jumKDRQd2jfFaUfRHUA98XNDvkRUFzrE8nfCRzid24 +DN2+Nqcv35ij52Jz9PzWHD03iTW9c9D/Qt40+C5B34U8Mtr9JWhq0OAkfb8P ++sG6fxb0o/nnQT+Zo/PP5guxh6AvrfuW0faaQatEf36rSW/03TzKVgtahl7x +rdeCGkWd+cGnBa1USb+WUWfVoJqf0bNHkl5VlKWqQUd0WxC/vRpUKj2j48qV +ODr+Ptpaizaj7OhKPog1tVWWfqtVinXjHO/WjOfGlb6Pfp9G+etBzfyMnmuY +U2/tqkGvDYKaVOr7X6L9NYIyMbESR8f1zNHx82j3jaDfhfxFki4bBm1USW4a +1CJo9Urf38Sc798Y9dcKvmnQxq5Lvc0qlTcPOjC+3zxonZC3rMTR5ffm6LK5 +69KPrYO+jXbftk5fBn8zaNtKz+i23Qo6/sGc7//RHH23N0ffm5J0/FPQjtYX +Hf9szve3CFoU9d5K0nMbdCYmhdzT+uIfvmYdoFM8jwxqXwlfEMOJ5eCMLn4G +01zuZ/DLFX4GmyCDZ9rjP5MwyzfMRyVsA8YB31xVE2YhBtbxAbiF2AgOAG+A +Cz6J5xlJcwCOARtcVGvAMfi1LyphEDAJHFxwpfVC7mm9wQY9rPeNfgZbgV1u +qSlmE5eJ4eCRlYxJ8N3EdHz51a7Xy33u6bbQC4wAVsDPgiXAOmAcsEIffxuc +wjOYZaJxC22AHcAQP1XCKrtXwisD3AfeBwuBm9aK926rFHPAM/dYHzALGGBQ +rQG73Gs9iOfEdXABsZVYS7wHw2xkjPWA6/VxPZ73z8Iu4IedjHORwU3glRH+ +HjEfDACWGeb+gG32CB0fdp+Hut06PgOvgSGIj89jJ8YWj7juGOuKTuCFJ6zT +KD+jfx2/1PENz/dHG78G/ZTUZ94Di4AXwD51XPODsU0dP9EHMHEP2xbYBJzz +dE2xCZ//Rq0Bo9QxC3yyvwGO+I+/OcnP6Pei36njmJdqDTiG5xOSYjZxfax/ +f9H9nOy2wDHUB/PsZywDZgCHgHmm1oR/wDavhjwv+MmV8M3RSTgG7HJsEtYB +oxyThGnAPQsr4Zkp8e5xSTgGDHR8Eh4CT/wtCX+AXR5NwjFgl78n4Zi98dHB +myRhiUbBFwTvFPRzJYwG/plQCQvtSx8qYRhwy6uVMAw4561KWAVfNKsSVgGT +TKuEhcDGMyvhZPDMb5VwE5gJXAoWBZu9a5+2HOdUilXgw6bEhSQMU4JnY5th +2DhrPeTrK+EYcAMYBpwApgG3gAfAMbWo2zgJI4GFwA9gHXAO+AFsNLESpmoV +tLSmeE78BsOAI8A9m9qP48/BLGAAcMyFxjTgA/APOAg8dE0lLAEemuM2wQp1 +HEP7dRxTfyYu8/25fuad0cZBYJE61uGdOtbh+YAsfANmuC7qTgn6OeigKNsz +aElNWKGOa+o4po5rfnI5+GMT4yV0Bd/8Yj2W+rlpFqYBz4APPkoN+ABsA665 +IQlPgCXALGAEsAK4AczzcdI3ai4DL2xhzIAe4ARksAuYCiwDLvjEsaaOdagH +7tjSuOv6pDYZB8YerMT3eRcstJXbIXZvaJ2I/82rBnzTzDqt6WdwxNbGEnVM +gww++Nx4oZHfW71qwDrrWjew0fr+jVgJrgIzg53B0OgBFgIHgavBy+BmvgEW +WDsLHyxMwgt1PATOAO+AJTatGvDNchxRCct8af22dVnfeD4zqFfINwQtYR6S ++r+526pjnW2rBqyzXdWAb8A7PZNk9HgwCevsUDXgG9bJull4ZueQ30nCOTtV +DZiJdsE4O1vnr4P+WgmH9Iq67YKOpAw7dqz6NmhxpZzA98xzlB8YfC/6Wsnn +7ol/cJ0TQ26VtIfld/wfPvm74Isq+bpEHAq+X6U8EPmg/UP+KOj4Sj5wpSi7 +r5J/aM2Y+VtN3R/GaXiUrxw02HPdwr/dUgl7gbvmBL856C+VMBKYjpwTWIg6 +4CJyTYxDx5owFTki8i2rR/mQkNsE3VrpN7BWN9ejzqpR54GQD4DoRxLmAiOe +VRNmJO+0ZpR3rgkvga/AexslyWAV/PdrlXw4mId5IAdCe+AeMA/8cJcP8DPy +xkltHeG5goOBwA3EazAJ40pMJA4ylpSTA6jjDOryTO6CGEHsJ16AYSZYJkaA +C4gX/P6s5Ymuc4zbbJk018f4nWPd5o/W/2biBdjW/VzD64Mxoa3j/B6c3AT7 +/bsqxTH0Hx18QKWY+ItthnKwBbEdvPFk8H6V8gCjgvpXiqdgB2L+JNc92fXH +MJYe/52TbJF4zHePsw7jg99bKeaCRcACyzFM8IGV4vKx1gfsMZZ5qBSLwS9n ++71xwQdVir/gF7ADmGd28Cf8XZ7P9Xt8A2wCrkJvci/0lfHo6L4TX4iR7JEZ +G+LudMdB4jXxjTEgZq+Yg5jn+Ej9+t6eWE6sYzyI2fVcBjK/0yfqEOvpN1hw +xZwF8Zv+EcuJ44wZfraem0DGF69kjEDs5h3q8/s1Ub6k0m/1fAcxPhmPEN+7 +sv+o9IyfoA6+Hb9yVfX/8yPEpSeTctT4i25Bz1XCM/iOa6qGHAoyMft04zVy +1N1DnlzpeVXjI3DItSG/UOkZH9Dd9YnvyMzJUUl+hPwPvuQ6v7uUvlbKaTE/ +4KrXPYc9PI+Lk/bIxI2hlTj7ZuLHYpcTf/Dp+PPPgm7yc0/L+Hp8Hz7wLPs8 +/CM58z5Je9FeXisXWgfs51WvL2zudK+bw6L+skrYFT/PfuBp+xjkEV7rfW2T +x1lmLXdJ8m/4OXwJeHSk/Q3yBL/bp2rwN3dWDX7gLrcJ1r3bNnmxZewQzNzf +tj3a36FO/6Rc4WnuXz/XWWD5da8j2meN0+8BXjudLc/wWunvcvwbek61/0NP +/CHY+x7rc4ll1kUTxwhsA9x+r9fC2KQcHTYIJh/k9dLFdbDnibbvt23L99tW +GzuGvuN1M8htNgfv2F7waSOsT3fbKLbHPmKgdSPn/JDn7lKXo0OLpLjCvnrt +JNt60PaLHZM/XM3xkTYvDfnlSvsW/O3DHqsnXcaYXwZO9m/EQ+IicXUVry9i +aPG6bh10RchvVNrz4GNHWrcNo/zxSjkK2uYb+PmxrvuGfeyjHpMro/7bfp/8 +Bu9yfnRVlL/negP9Ddrv5zbR+RG3e6bnf5T7hX2Ntl0d5naJXw+7Tjvbzmjb +zwjPxxm2i7HWc6S/2962PMbzdXXo9mylPdJ4c2yA2ECMAEddHnWme45Zf894 +Hm9Lyl2DqW5Pyksztr0cc/ewfY13mw/5XTDbMPvG/f3Nia6DjD6tbGvjPLb3 +uQ7lTe0P23iMe68wRy97TOr9Oc/jTjvEwbuScvfM4x1JOXPa6ZeUx29nu3nV +489cvOLyYZanefyneF7+lXSeQbxsk4TPOJ/bNQmHf+qxm+kxZ/yneY4on+55 +vzvpnOBMz91My9jMW5675XZn+Z6kvGG9/K0V5vpt93dg0nkDMuXv2vYYk/c8 +PoOSzh7qYzXLYz7I9c/xPM5ynXWS8O6ZNeH0r43VN/BaA3+SZwBnYEesPcrB +srcmnWswj+B1chhgE7AMWGiqbQ8ZfM65zHzLxDBiGX50lyTf+rrX0QLPKfP5 +SaU4uKvHfqtKfgqZWIZ/wc8Qu3azz9mFMUzK8YFtyaGS3wS3swchR0N+BqyJ +vBx/Vtp70I+Xk87CeKbOItffyRiVfrE3+crl6yftizrUlKNFZn/U17ESua11 +AWPz++euTxwEWxMT8bVgBXwjc/K954VvfudvfWWZtVwz5mFP9JckrAxOBt+B +cYl9YGfKyYUis08A/x+YJFN+vOvva/6r5fmWO3pOyEMxL8ssE9M52wKTtXLZ +Ms8da5zyd4yviD37mdcsL3EfwGyX+zfq35t0RkYdzsuSZdpBJpaB4bJl9nTI +rV1WLBMTivHfqOAj2O8kxVAw3Xs14TNi7fsef+QDzFexTJxZxdiOM7tVXY4N +EjuxSfDcap67IZbbmDe1jJ9raizYzBiPcuojEx9f9G9tXNbMOBC/yJ6HePHP +JJl4hE1h5+zfWtqWsOcBSeff+CXiDj5qhrEc5wlX2g6xXfax6yWVg/EuTnpG +bm9510rrHr/AXncjx3p8NWuLewz1OwwbufwIy+xVwQQbW094C9fBz+Jv2ZuQ +a90saX/FfotcK3sX+Bapoe6mSfswMCZ5V3Amex3ysWBP+NZJv7PfIgfLfoi6 +v09qm7Jtk95jj0Vuln0W/A9J77GXIp/Mfgq+fVJd9l7kb9lvwf+UVBf/Ry4X +Hwj/c1Jd9ob4jqley8j7mPNb3Ufu7DqstV28vrbNoVPWnQF8Gz4OjN6BtlPD ++QGc/Th5lT1c1sEyPmf5HY2kfMvyvIvrcJ6PT8R24C/b74FVwax1/9fSupE3 +J+c/z/qA8/C3PP+YGvLq3BvAp5Fv5xm/+l8/I9+clPOh/kmWqd/a9ZE7Jt07 +IZ+BXbd2Ob+3ts7YHL+T6yBOH2A75F1k/CG8jWVwDHkqzlP+GOO6fda9jEOS +clh72EfiH8kzXODy4TXhoENchxzVoe7Lw0m5e8qoe7Drf2D/2Mq+EBk/h2/D +r+1nf4aMj3qc/hX5KPaecPabz9vv4HPwPcjd7B/YK+I38Af4BfZlzHVbzzv+ +oa3nHbzHHgzMxnif6PEk1oADbnY588E8ESc4iyJvNMzyw+anWG5nmbqMVzvL +lLXzWJGrIzeOv2WfjMx+l/OB01zeyTJ+uJW/j21wp4J9NdjyCscVYkTnKLso +6RwUvAP2BScy5td4nJnbP3h+mRfmkrkHQ4HjwUdgXvbqXT0vXT0X5OLJU5Oj +Zvyv9ZhTvkO0uVmWbXa0XeEDwRn4SXK3nNFeZT2ROzoWn72CTXa0bfM77+xm +30w7+Odebot2KGvv9tezTF3OD7gjwXkC+JF9C9hwaNIZPDnnGyvt/ckBMP7c +8+C8gnhIXCQWchZBHmV5vjsph0BOnL0254nk+37z++Q78BvEGfATuBh8xneI +OewxwML0q7PnCJzOfg/czVlMJ881+2z2+cv33pX2b+Df7q73vu3lQtvMaX6X +MjA++0Pw+0X+FuN8hm2Ds3HGlzEn78ndK+xhlSzf2SE1+EZkfCi5a7Aj64Y5 +3tHnMtxBWZp0J4WcD/dRyBXhAx5L8v2MJ2uYdcs6RgaHYOfkkVjL8Cct4wM5 +Z2U9gje5g4UPAReBgfAPX/k3sN+Xlvf2Ouvl9YVfQmb9sd8Cl+NzwD+9rQP7 +s9u8jsAz7PHwJ2AS9k7gjZWtJ+sRW1niOR1uW1nZ/RvhNsEN59puOc/nHJ1Y +PyTpbKnmPhIXfrWdn+s5Yvypz70A1icxDn9M2fmel90tU2eUxw0dwHjoNNi+ +5SH3i3s4DySdJbF2h1iHEa6Pzvw+2HU4DxnqNdLbc1afr2Fuk3EbtsLcPeTx +wUfd7Llj3wRWx48SP/fyfHFuwH6KXBpnYpxpcXbIORv3gqYnnbE1i37vkXUm +t3rw3X1HgDuxnLVzxj8p+Oykc/4U5ftk5cJYl+TjOYvfNcr2zcrZcV+Ie0Pc +BeFOCHcwOJPnbJ5zBu5nrB91G2fd4eAeBfcpuJ+xYdY3GF9yTax3/MUY9521 +N9oy5yJfuY/8PtblK1umDfK0/w35gyT/wRknZ36cQ+4W32mV5XvwQR8GvRHz +8GGW/8puA5yPfvQBfTm/4qyKM6t/RN3uRb7vspC7Fe2n7+J+bNH+uV/IP2X5 +/r7Bf8zyl9zHZXy488vYjPP4cCaHH8QHcm+Fcdrb88QdMObtuaRxY34Y3/c9 +3rzDmSNnj5xbfhZ8ZtLZHeeDnBNyjsh5ImennDVy5rjM/hd/jl8nNt1pO6zf +S3vdY8R4fmzdO/n7vMMY0savXnf4PPBak9C5ddaYMXbogr7cz8EOFlo/9J3k +PnG/hD5jD4zB3m5znvv2pftKfxb5fc536dfntglsEBthbbAWvrPdMyasA/rz +qfvO+vjCY8IaIsYQXziXJR4t9jgu9Lhi+/V8MGfs2NcrSWuA/r5oPTawXpxp +s7b2y7LBBbZD/Ar+5QiXoRflc70GWVd7ZY0H67JF1pqb47H4wWMz2zbRz+sJ +O+1n7MR7/a0jus73fHLnkDXwmfuU7COwB3wGMYa4Q/zhLs6vnlPiAL5mitc6 +ax67ZQ3+5jXLO7+4DfwFeqNzf9Z3Uc4IbIWNgX9YJ+SYyBFxfwAd0IX5ZPyY +F8YOfzXN83Gj5web3MX3G57y3KMT88bvzMFRxhLgBjjzhvy17YN3GEfslH3P +UuuOv+ZuEvfAuUuFv+Fc9mLbP/feuKuPTtwJ4I4A/WQ/NNB+hjLO//Gn3Bni +DhHzBsbkGZzHHVTuaPzo+WSck+1/kOeEM2POk7nvxd30Bz23tIeOrAPO/3ey +zXL2Qp6KOeI+FHpn+3/uUNTvWKB3/R7ANvYJ6Lu61xPn/fxGTKY9cg+NvXa5 +s8bY7+C7JdgIuIL4hA+jPfT40WXj7WPAMuBGMM5BxjncecMnbOB7ctyX434g +9wi5T9jNfo54z7hzJ437efQNH8F48xvzxHyxHrBv7Jz7MIwL9w24d4BtcUel +qddTC8c01ksTxzLulHC3hDst3Avhfgh3XFjHxEru1XCvhDsc3IFhrbJmaWMz +jwl95H4G9zSYm+usc71/3DWkjL7R70Ye0w3t85n7Fo653PWjz9w53MNrgfXM +GT/jw/88mJOV3AY+gTt/3P9DB+68ruM1vpX7gs1he/h0+rmW+01/6PuWHrvV +HSvpczP7Mfq0jfsFrgXfsvdkb7ad1xG4Cpm9z7aOA/yO3i0d09gb8e72rre9 +3/tTVrvDjUEmuz/4We4gcRcJf869IO4HMS6sC9YHvpo7Oc1zg50xJ/hA+ruJ +62W/x/0q7ASbYI3wLveU8Q+sdfLSPG9tf4kejO8kf3+6/ffW/jZ12rjtif4m +32acsYsptn/WDv5rit/n21t4rrZwzG5im2LcsK/i5xa2D+wWe93V5awt1tSO +tqHGtgfmbzfPJ/O3u+cTnfCd2MKGrku7zFUTzxdrCTva32PHHNAf7DJZD2IM +sWpSaphL5pa8LOcl5GY5V+GMhHMQzj047+TsAx2IS+AK8tbkr9mDckYBnuJs +gvNYcovkFYkfnDdwjsC5B2cenHFwxwhszR08/Ax4BD++o+1gpOMe8123a3jd +rhevYJtw+rmm10N9fcCX2ifjP5bZ3hmng2zL9Hu4/TPjwbiwn6Zf7FmwCXxU +G9vTGrnhXjzP2BO2y/zPtM0scaxAf+L3Mscl2nrOax9sjY/EH4DLOtlmwBPE +H3wO94PvdN/B/a857hF3frD+xB/2RuvkhjvyU6wHNst3iTkPekxWqxru4q1q +zMN4EmOIjYzPOY5t+Aza46wfX4W+6MpapD3uDrO2W9rOsEn2BrO8vlgj63ht +NPdaIV5zjxG7p01iSW+PP2uieG3/5rWODsQD1hhjVb8nhQ/u5liEn8Y3E19o +F9tZ6nXAeM92vOX7+FfWF2P6mmM3OAC9WX/oPsHrDFtnzbP+GJv5jlO8x7zS +7/85PrP+mJP6Hgs+1/4EW6Bel5CvL8JPS0K+vyi3cVPI52bl6s8OPr7ozKV9 +yOOK8jnPBp9QlEdckLUPZT86NeRnis52zsfGXH58yE8VrbO3gjctut93JLoV +5b/eDD62aA9FTuO5orxGk6Lv8S3K/uPya4r2TqzzS0O+JPsMIXjrojvLmwbv +mnUeeErI/8y6F3NO8N8V5RjPDH50Vr7stJD/lZVfmx38iKI7XKODz83ar3fL +apc2Pwy+f1Eu9RbaL8rpshdc2315O/j8LP8yJuQji+5XDo2yF4pyJ58Ef77o +bvWJrJOivP9X+MWiPEsjfi/yfzsHn5h1ZrAMGyvykY3J4RT5thlR/kjRfZaV +gj9W5AtPx5aKckCPhTylKI+4XvCPs+LnFyF/WuQ7Vi3SD92aBf+86A7rt1Fv +YJGfZs/6pPet2MLMrL1JLeQnivzxb1E2oijH8zNrtigP+gs+oSgPOi9rrBnn +Y7PGi7FaHPyYrPzIr8GHFZ1Hsj8eWrRHZn88pGiPvDTk4UW5pe9DHlyU5/su +5PuK8nD/C/neojzfDyE/UJTPY58xynuNE4Ofl5WfOrnIprHne0K+KCs+dQ75 +0KycYNeivf3yfT22kJVbnE950Z36C7DNrDzglcxPVg7x3eCHFd3Bh//dMuO9 +gce8EzEo62zqcXx/0Vka62yBdXsn+KFF9/0/Dn540f8MPgp+YNF9Aez64Czb +Zv4fzbKBWSE/nXV2NTfkF7LOkN4PeVzWORa2OSHLPucxflnnSXNCnpx1FvU1 +Npt1Xn4c6zsr5/dNyNsV3dm/IvilWTF4s5Cvyrrz8VXI92ad5X7AXGWdS50X +8iFZOdkc8oZFObO/Bj+o6L8O9Ptv7vu2wbcp+v/Bw1m+DD+2qMi/sPZvxraz +7oj1Z2yKxnYYa6voHBr/d3TRuxcFvzgLf7wX8t1ZZ4Csp9W8pljTD2at674h +bxX0Q8gdg3fOwjGnhtwhK7/5VlYf0H9ykb/D150d/MKsXOfwrP7Ql8GMfVGe +9e2QDyn6P8dC1lBWHvOokK/IOjfj94Nd5zrsIessYc+Q/5p1DvBKyEdlnSWc +kTUfzMWtRT4a/3xjyEdknVucE/KWRXcd/h38gqz87JtZdoaNzQ7+XNaZ5ftZ +togdotcxRbpx7vRZFua5Icouz8JnV2fZDTZzZcjHFt9nCvn4Iru9Nsun4E8Y +y9OLxvO6kL/JyoPSp5OK+jUnKwbg/3uE/HlWXvn64AuzclfEh3auQ1/bFvUX +HU8o0pP5v7jIBoh1exfFu95ZcZQY+kpWvCRWPhF8r6IzkO5Zvgm/hA/oVOQH +emX5JvwS8eeMohh0a5bfx+cT0/YrimvY0YVFtvReln/Bt9yW5evx8yOzfDT+ ++Uvmp+hciPnvUWQDd2b5PvzegCy/jE/Gv95pH0vM71PUl4eybBp7Zu1eVbR+ +l/u5Il+HP7u6yKf1yYoB+P87suITsen2LL+MTyZudymK3UPwqUVYnnXZr2ht +LsZPFOX+x4Tcq+h+3BdZcZeY+1LwQVnnEAOz4goxBf/du8iHY189i2yM+b+p +yAY+zfIFy++KhjygyH7wtf3tE+7Pij2MySLWZdHdB2zntiL7IQ5cUhQL8FUd +ivzVDVlzwPjPYH6K7+bVdPbDffnmUTazKHc0LfjqRf+HeBKfWnRf4d3g6xdh +VvAFmAmMgS/81v7w31k+FP95Qpbvxm+fkuWj8c8nZ61P1iZx7PyiWDYqa0wZ +z8+i7PUif3Jqlq/Hz5+W5ZfxydOzMBD4hzkZnTUvZ2bFAPx/u6xYQhz5KKtv +9KsU4Qni2j1Z/hRfCvac4fF5JCtmEC8Yj+l+d50iHAmGbJsVt4hZ1xbhWjDt +zVkxnvi+RhGmAc9gI1OL7AT/em6Rj+2ZNa/MKf7srCKfhk/9zOMATmxfhBVv +zLJLbPKWLBwGBgNXEmOIL+sGf6foDIexGWS7PSkLw4Hf/g/h51HF + "]], + Polygon3DBox[CompressedData[" +1:eJwtlnnwl1MYxb+j932uCTOqIWuUpaQUYyuKoSK7tP/ad6QiWpUWikpaSXva +aP/VKEtJpX2RSpslFI1lGssYy0z4HKc/zsw597nvcp/nuefe8u26N+h2WqFQ +WAwyUDMVClujULgBUTYvFG5Hb0RfA78XVEb3QPcg/g9oiN6GrkPs/sxz24Fq +uZ+pRfxzdG94A+Kb4e3BtejqYC3xZejS8EXgbvhycAH8B+Y/SHwdujK6ObgT +/QV6CPw54hvgbUFVdBVQh/hx9ET4aOJN0SPR9eHLwEPJz2huEfgIfiNjj2V+ +x63wNxn7E10XPR09IPzshehG6JXocvCxjG2C38RY18xrXgRfzNi/6Ady/3sb +cHXuNewJr0H//jB6J7o2ur7WDurD32fscngT8J5yyVgb5l+mHMPXMlYJ3gy8 +C28RjlUAbxF/BMxnfs3Mc1uDq3I/s4rYOWCe6kN8R7hGqk293N9uCa7I/Q8f +wq8n3inzO1TrW9CjSrjmU9Qb6PLwI8xZja6Obpf5HcpVFfTLJZyzVegicCn8 +ErAhuSfUC0vAevUeY10y52xvuKaqZUP0Xclr1lobqyfRa9BXwpuCesnf0Lsb +gS3wmxnrlrnnBqFvQ9+j3GZ+thWomPsdH8CvI94h89gd8I8Zu0+5BxPRNZJ7 +U3vkHfUeumXmNRXDB4Gp+netAb4ivDfU0zuSa6TazEIfhwcYBv+dHJWEr9cc +9SJzvuTZc9Gz0cPBxfAjYZ4RPw99dvKzNRj/Df4tqEW8JPp8+E+aw9xSYA+8 +NDhJ/A3wK/wXMCf3PzThmR/RL+YeO3bqnXpXNVAqeQ3697/Amaof+Jp3L0XP +Y84m9Ayth7HBqoU8QL0BhsNfZ+wQfKD6P7nGqq326FD0a+j98AGM9US/gt6G +7ovujR6L3onuh+6PHo/eje6vHoJvZWyw8pO7dh3C/6YaHoWfTnwufKQ8BD4x +XKtnc+eqmf45c866q3fRm+F9cj+7F7yU+x3K5cHk3P+fU3jf5H/ZxTPz9f/q +CfRXyhG8D5icew3rkmuuWs9U/vRu+QP8MGMrVAswPXfOdsFTci1Vo7nwF5Jz +eYCxhfDWYIy8Fb0c/jyYljuns+VnyWv9RJ4oDqbkzuFZ8P3JuZFHTNZeVs7l +BcQXqNe1JvQa9Hj44+A7eT+YAX8iOVeb0NO0F1TT3J44RV6rmsl70Yt1noBJ +uXM8C/5Mcm23o5fAn1bP5O6BInjZ5F5cQM+PhbcHQ+W1xEfKq8A4eYlyCn8y +uXe2oMfBOysn8h70HPVKcq/ty+xt28PeL49rrlqEvUJn2ED0hHDulLMRqmW4 +VqrRMK0lXAvlvInyg66R2ZPljZ+GvUseKW/fF/Yqeby8ZGrYS+Upu9EXgarw +EcwZAn81/K/ymF6qdThXypG8+kDYC+XZ/ZSLcC+q57qhR4Vro5rIK7SntZfl +GfLeg+GzRR6ss+1w+KzUGScv3RW+C8hTtffPSPZuecBq+O6wV8rDyqEXoP8m +VgtUQA8Je0FtnWnoReG7RAudGegT4b1wIrMX7w+fhfJkndWHwncBndkH0GWS +vUwe+Rmx4vDdpRd4itjocO3VY2O0F8J7UT28Hb007BXyrIryXp3pme8AjZPP +SJ2NGpsNnw/+kDfQH5PkneifM985Nspbwt6nPa+z7+3w3UFnYFvt1/Be0h2m +hXo3vJe05weGc6ZcFYNW6tXwXpandUQPD/e2ev5R+UV4L6mnKykX4dwp5zPC +OVeuj2a+u3WKUxx0CZ8pOkvKgA7wYeG9pD2/Et1U97PMnidv/Cbci/JInaW6 +w+juojO1Lrpn+G6kO10X+Vd4r2lP6izoGF6bzoSF8M7gGPwk6Ep8RNhL5BEz +wz2i3tCcCck1UO6/Vw+jZ4W5atAgeU1ai/75P5qSb6Q= + "]]}, + Annotation[#, "Charting`Private`Tag$87749#2"]& ]], + Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`]}, { + "Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxNm3n8VtP2x79Kdc7exzxkLEVJXWNCpkpIoUGEDCGFm0uD3FCmzKVBKn4y +ZrpmLtcsGTKLa+oau+Z5LBrI/bxbn+f37Y/12uvss5991l577bU+e+39tDjm +5ANOalBXV3d/o7q6hirvTnV1V4kuLurqCtGiJnV1i0VNxP/WJJ6P1vvOopVV +10i0UHW/isoi2i4Rba33f6jMqquK4JeJNizq61IRbZeKGhfRB99YpYi2f4r2 +UD/HpOCPL+vqXte710RrihoWIcNaoi5qs6donSL6Qt6mHgNyres6ni9Wu+tF +deLX83tkWT+FbBuINrKMyLK2x0m/XdVmYIr6bUQtRC1Fm1oO2jYXrSZaXbSG +6NIU7W5UOSFFe9rtLX4zlW0sx/qiVkWMAXlbu2Qcm7uk3RaWEV3upT6OTSFv +R79rK9p2Bbm2FDWzXFuLNrHcvJuk326n8lWVj4nai9/B30Ouv4g29u9v0fvH +RduL72D5aHeJ6maKVhW/XQoZdhLtI35wCnkO0dztKHqfubJ8fLez9cjzrv4e +8u4u2sry7uG2yLanaF/1ub/oOFFP0V6q68vc+H1Xt0XOTu6Db3RQ20dFl4s2 +TCFjN9F+4k9Iob8eop1Fu/Adl8jV0zLRX2/LzTh6ua6z9b+Px97H75H9AJfI +daBlROaDXO4t6ucSeV6XnoaIDhH/fBly9Hfff5WcL6tuiah7EW1uFf9vlfuL +bhf/luW9V/x7luUB8R9ZT3eKf8ey3y3+Px7ToUX02cM2hH1hV/9Umw88DvTR +zvN0muq/8O8eFf+Zx7GlZHxVz6eIvtTzU5Z/fz23F73B2FXuIHpX/MMqP7E+ +eonfXvQ231PZQTRP/IMq/2v9Ifc7HuNhqt9J9KH4o1XuLPqY9yr3ES0W/6bK +v4p+Fv+Wyr1EC8SPV3mS6DfxH6jsIVoq/jvRANFJoq9Eh4uGiL4RHSE6UfSt +6EjR30Tfi44SnSz6ATlEQ0U/io4RDRP9IjpWNEI0Ud9ZqHKQaLDoDOnrdNFP +4geKhotmqk2daBH6VrmS6ATxp2MDlucMl8hzKjah8njRaNch2xiXjOVMl8h5 +lkvk/Ie+/YTobPHL1M+B+FuVf2AzostE80XP6f0pzL34xqKRzLXKJqJTxRcq +/67yAtGFRfCjioglp1n2S1wiO7FmhugK8XeonCYaj+wq+4kuRXaVh+A3i5Bv +jvipoqRvlaJzVLeIORS9IP5XleepvEx0PmNU24NY835GtqkryHiX49108feo +HKfyyiLW0m5FrPmhqu8v+r8iYs5p4keJSlET/J6+OaMIeZHzapcTRavoXSWa +JL5xCrmuF90smlbEd+fSt2gK815Eibw3ukTeEXp/uOgW5iCFjLcyd5YX2W4X +XVWELCurTcMUsvyk788WrS66zW1pt5+etxa9xFyIrrNsr/E70Q3i7y2iRK41 +y2hzl+g+1yHj/diW2g+wfKeqPEL0ryKekfPBFeR9yCWyPOwS2Zuq/3VFd6BD +lduKXhG/fhnffFz0hL+PvPdgY/rOkSnkvE/ltSnGyphXEx0p6oj9FoFZuhi3 +/GrMQVz/zfiGZ/ANGIHnxcY0PINTwAg8b5WCB7eAa8AJ4IZlxi413ABu6eq4 +CN64xDY9TOXBKXAMOGEl2xWYBrxQwzQ8L8clRT1OoWxqWcEJa1vWdf2MHPjt +GoYBq+zl+DzOshDP8d/tLOtG/k3hvte1XOCFZpYJvABuAL+AG2oYBvzCM1im +m/FMDa+ADzZIgSNqY2jjd/weXAQm4tvEmxp2Ac+AHfj2lpaVbxPHt7Is2/gZ +XEBsJda+kgKjbO/+t3W7Td2OZ/DLvm6DHGAdsAyxG6wCFuB7xHxi3bYp2rSx +fLQjvoMvwE43p3qs1so65XdgCGIBPvYot+9qWZEJvNDJMnXxMzLV8Au4oIZx +lmOpIrDB1v4dfgnsc4HxD3jmQtFFKXTEe/wXMQgfT0wC4/Qyzqnhmx7+Phih +d63fIvwf3+nl585+36uoxzT8poZdDrLcff2OcRzo5xrW4Rns0s9jAcMc7LGB +O8AR4JkTVP9mEZjm8zLwDZjmizLwDbEfXHSo5f+yDEwDjvm6DNwDXvmmDOwC +7vm2DAwEhviqDNwDNvquDGzxifXFuPcTvVQGLgHT7J4Cy4DJehvDgE/+XQZW +AwOdXQYeAuv0NYYBt/QzhgHnDDBWwRfNLQMzfc64jYXAxocbJ4NnzlX5N9HX +tqce1tMx9mngnPOJd8Y2g1XuIvpV/KUqxxnbvItujIUuUnmh8c/vReAb8AR4 +BswAvgH/gBnAN2AbMAN4CPwD3gAPHWus9WkRMZN4Du4Aw4B3wD2j9X6Uffip +xjBggjpjFTADOAhMBDb6sAxstMwygRNOs1yj/Y0apuF5egrcML6ox0P85s8i +cNPIoh738Jsa7uEZvPOgMc9DKv+ZAkvMN7YZWwS2AdOcbznAMRcVMQaww3Is +kQI/nV3U45uLLcs4P+PrT0z1+ABsA64BH4BtThIt1nd+FG1VBha403gAjEM7 ++p9aBu55vgiZwAZTinpMwzNYAEwFliHGg1uIN2CNu4xzwFtgHvAXuAnMNBmd +Mo4UeI5+hhrzwBOvid/gHXAMOABcA75AvivKwDovFoEd7jV+qGEaeDDBCGOE +Gk6aUdRjHdohJ9jopiL0xXvGAX4GFw+0HGAhcBB7fuIQ8RIcMDIFLkA+MAJY +ARx0e1GPi1YzxkAm8MI19KG6c1WeJXqgCCwDjnkRXOl1jXzgHrAGuAk8dGcR +4wHrPFDUYx2ea/gGvAOugUeOa8rAOi8XgXHAN4+JPyoFnpllucE6jxf1mIl+ +r0uBc54Uv2EZJfJcIL6N6GnxO+r9HPC5aIKorejZImI6mIO8xMq2I2z+Z3wh +/kp0ueiPIrD+J+L3FGXR6cbX2Mkalh0dbuD1jfzTxU9z+xmiq0Rr4afwu6JG +ZdjTbR7Tp3o+w22usm5us4yvW84xeneOxjNXfLMy3oGX8NPEB3z1rqpvXsa+ +cjeVm9g/g6PA6eSraPum2xPP3nIfx6ntxqJXxf/gNQie313Uwj68k8qW9uHE +NmJLHxMxhLjYKkWOAx/eWeWm5ruo3Mz+vKvK1vbbxMWP3N8eqmvluECM/K/f +EzM/cd1Yvd/c/pb4+ZnfEwOJP8TNs/T+xDL23OgD336YaBfJtrPolTL8KvX4 +S/SET19xf4uvZdzEA2LBG+jfMai278UHt7UPP64I3RAziBeMm5hR2z/D43fR +AXhoxX0yuIQxsbZZ1+gAvAJWQU/EkmOK+r30MOuBWEe8WFtjOtPPFzimsad+ +3/bMXn4dtdnb71gfC/1bbBye/ez1qr9EtAV2Y564ebLKbua/V3mD2xBXiC/E +rwmOq+y7m+pb3f2Mjr4r6nMIv3suWDdN7X82rbQeytiX0Sd5AGLXc5YP2UY6 +HjKuSeZpiyy0JX9APCK2jrJcxFdkW2KeOWJt0wY56/SdsaIGer4ff5fCHyxE +T6IpZTwTE3m/r5/PLWKvzTomPp7HPkZjaFiGbMTNU6yXJh4TJftvYsvfy4in +vF8pRXv26sQy6olj+CNiHvFuovlJLpN5/BY8bafa31APEZP43ZNl8Ne4bhXz +08zTdpb9Guu9SLH+4Rul+D1xgvlZwzz2h00Sh57S84055m41t2FO6YO4cG0R +sQEeX361/Rx1Y1Lsl4k525RRsocm9oxxPX0RM/CJ65XBP+K6puYX2k7AT5O9 +jka4Db8h3jxXht6xBWIXMYN4MULlRmU8g2nxBfgBsCvrn7V/bRkYbgO3oz3x +ZjXmvQzMim0392/xofhSzgPAh6ztgfYZ9Hmk1zHrnHUN7sVfDLCfgMc/dHLf +1IOfW/q3YOPN3OYH+xR8BXi4tfv8yb6D74K3W7kNOBo5WYPXlXGWQDzB523i +8f5if4R/GOy1zvqaaf44r6m2XkcL7VNYm2Dttm6DLW9Zs/My8nesTbBVbU0Q +Xzp4XNjI1rYZ5N3DY7nK9djMKvptnzL2FcS79tb5TWXM5XZl+JuW1huYYlv/ +lvgMT4y+UeVw292q6vNAy7Gb+0YPlep7+hvsLdpYJ8wJ816LcTt6Lq70WmB9 +Ee92ss7XIA/kZ8bU0eNq7jEg/5pqc5TfrSV+YBn7iq4umcd1VX9xGXub9v4t +sX57y/2253A3y49ddLEMyIw9vWvddLJ+HrOOHrdt7u656GCeuM/4Onu8HT2G ++bbTzh77Tv4W8X2OZcRmamP42PbY1WPZKEX+GZy2cYocNdiMPRqxY04RY+zp +cbGP6+Y2zVLkqGmzg/0yPhkb2c/20yJFnh394LNp87z77G2dt0yRZ6f/1cX3 +91zeZZ1gM5umyL/Ps577WrfsH4mnz7i+j9u0cJt51uGB1jl8P+u2pXnqN0tx +BvCu56635SHOst4Wee4O9Xzhj8nr4WuZ38Otc+Tub751ivOAWv3hK8zREZ47 +5vEoz8vmKfKD891mgG2mlXnq26Q4V/jYvz3GNtza/Mc1n1EGNkM3g6yf5baw +gj0caxu43vXs08G2pxnf3lKGX2pQhG+CB+/eXAZOXSC/ukWKswy+9bvKpWXk +JcB8YD/2KU+U4e8O81r7m+3hLynOO/guJfgGbINNDS0DL2FHw2xLT5fhK/5Z +hL+AJzbha/A5xIRnzc+2PORJyOmQlzjTds7ZRp8UeiAekQuoYRb44+1XiVP/ +f47gNuy/yKuAc8m3E6/Zg5BXYO/winni1KNFxKrRrkdnY6w3cinnWA/kP8BV +gxwXznU9+52pXi/4vPMsP+dHY63zzc3jD8Gd55mnPN/tF/gb9H+m62tnTxe4 +TRvztGG/dqFthvIi83ubr51VXeK528I8sQa8Os489nax27R1PX6DtuM919Rd +6vpu5n+zPYz3bzk7m+A2bc3X4h35GTDeMvPIT95mkusbmyfOEU/BJeAlzpDg +wSe/lPEMDw6FB4ty1jTFPH4NXHp7CoxzudsnzxH4DRzEXhosBAac5vpVzJOL +oJxunnryFMQpyivNc1YAzsO34EuJu5yJrGUef0g5w/XE0qtd/6l57O0c2xJ7 +pe28PsBcxAv82Puei+utZ7D5TM/dYNdvYQLfs17A+PD4Q9Yf8Zv1yP6VvCh7 +WNYfOGC2bR5/AQ7Df+BTXnfbf5SxDya/elsZ+2FyqeRU2ROTPyWP2svlXWW8 +Z49LvrS3295Rxvepu6eM35Fzva+Mtuxrybse4PL+MvbMH7gd+2b2uORj+7r8 +Vxm/Y79LPvZAlw+V0Zb9LvnYg1w+UkZb9rXkUdkTUz5WRlt8xuNl7I1Z4094 +XsizgfvB+ewLiCvkoWabxx7A9rNrfBH5n/5uwzswP3jnKbfBT5I7Yn6YC3wi +WLmT6to5F9PHJXOKz8MP1nzecoxeRD6evHYPf/N5f5eS50Nd/6J5/BwY/VGP +l3rkJddCzoV9ZO8UZ/Hs/cmzk38n9748F5Di/ct+jw7x37THhxNn8H34vV1T +5BF491oZ+Wty1+iXHDj5h7Fuj68D4+Dv8HUXmF9g/4PPwueAffA1+JkJ5hd7 +jbztdUHemr0r/mexn+HJWcHPcd275ldye87Ku7ue33G+/57bzDNPG8r3zRMH +P3Cb98wvtZ/Dx+HfJplfZp+Gz8JfLTTPXhj9k0cea38437+d73fMSyPztGGd +sich7pNvIw4Rg6aax7cR6/A1+JmrzeOf8H+fleED8RPgJ3zFTPP4EnJa7EuJ +6WuaJz/aNsU76nt7/bP2ibHP5Mj3sVdhL8MefTketz0M0vshOfwq+3By6bel +8PXcIRhm/Zyf4h5BgxR7fnLNtHvI+XbkIJ/MuTN78CbOLWfzk80n552pox3r +N7k/ztQ/8hwQP8hpL7Jum6fgX7Btg1GG+Jl29N/AeXDaN7TM5DaIOcQq4s4C +9897YtK/UsQodFlY5l8t02TrsLScPVKcDXJGSG6BHPTV/n4Dj4Fn8tQz7Mfw +a6yvAc4VkBNn7e3iPN75jpvIR6xlb8m9jNvdD/kD9E3/Yy0bz+RbkDFbTmRp +5Jw4ui1djy9slOrlWtl9ci+kzrmjxu6T/rkzQj3vJ7vNcM/LH9Ybegev4iuW +ei7wM0tcDw82B3ODq8HsYHRwOBgffA+2Zw9KvpV4yvkjZ6DHpzgDbZ/ivPSR +FHe9tk+Bx/eqAlPRjnNSfgeuZ8+JXePryCfWfBd5wwX2UeT1FnttrpdiPfJ7 +vocvZR9DToT9Cnsm9tXse9hjsW9nn8Q+g70uewj2KOyN2XOQM2YPxn6FeAEW +RE4wM/lA/Axn6B1TnEGDD2kz0vOVvS5esc3gw2m7rdvjt7e0LTX2OmK9dLfe +9/FcLPG84A+IkdjtLPOcSf3hO52/q9wmBc9dA/Am+wrwDOfkfHfHIvag5BHY +dzIn23leuGO5jX/LnLTzePku/ohvsbYe9voiZtJmF/se9j/4H76/k+VZp4y8 +2Vm2b9YC+UZiMrGZ95y3XSGanSI/xT0Q7oNwP4N7GtyL4ByJ8yTuhHAmd6Xo +qRTnYJyBcZ6H7rhTdGiK+wITRc+nuFNwWYoze84bOHcgH8ZcMa+1cXTyeJHv +IMtbu/PEOSHzwhk9Z/XcgbjJ3+BuB/cruGfBfY4bROM9t8xxzTfs6rkmJu+W +Ys3he/BBg1Kcfw5R2TfF/YFZohdsZ2AU7I5zJ86hOI/ijiz64R4uuuli/XA2 +hm/CLyETukPGOnKiVaxhMDXYGry0oeovzjGHG6g8I8f644yOMzvO7jjP41yP +80nOLDm7RDfk/w9IITc+jz0DPoZz1CdFL6K3FPphrMwZ98SYw2Otp+dSxJjh +Kg+z3JxFHuG5H2hb4Jwd3XMPhNwGeZB59hv4GfzJsyl8OXMOhmIN4bvYy7Pf +BIPT76n+DmNDn4y1t39zsO0IezrPvr2364d4nobaLqZ5nNhTZ9sX56PEhTEe +z0iPD59BPGA+z/IawP5rGBS/gW2e5v6QFR7ZORtG/yNs76d4LrDLYZ4L7H64 +5R7ub8IP8hy0sl4Z93TrdZzttZvtmDboET9c0+sU0csp7q9Qz11d/NkutmfO +yVm7L3ndoDv0dqvnirXIXZnLbNPEH2ISMWisn7EZ6sAnw73OWG/72N6x+7tt +79j9ql7z2CE+oIPnnLlnHeBHWAvEYM5BwAwQsZk6voPdDrON0zf6ek/8GlXE +HvJk5MLIg5HzIzf3ttfi8rOeMu4rE8t2tKwdV/ARO9uX8x3sZZjnsHbOz9rA +7/Wz7vBp6JK7E4yL8bFGuHe1kW0K22L+sAvsAzt5wXPU0zaHTd1kX8s8gD06 +26bQy4VeKx1cMrfEZGyPc9mG1jP35Ljbj53wfZ65B8Vd9Fc8r4wX+fCt3CXi +bhE2QwzmmbFxn+BS2wnnPxPsw2vnSIyVM2bOn/FbnNXfb11xZs8ZPne5uAff +3vO8p2XB9umb33OHj7t8nKVzt4F7Dtzf5A4B9yZvsG+kvwdsV9xHmGV9Mu65 +Xqe1/T06R5baHQRK9pL4CeL6y8Z7DY2lsDXsC3yKnje0LlgX4HWw+nivOe76 +sT5uta0cBg6yLTFe7rBxZ497eNzH484hZ36c/YHxZnlNYfvg9ge9fmjLvUDa +45vwUdyxQS/cNURPxC3iVzuvoztsd+jqWuuFeyrcV+GeDPdTuP/BHRvO+NEz +/9VAd9x54O7DU7Zh/CP3+riPyN2P2bZz7vYw7nEeO+3m+Hdd3Bb74x2yPedx +kmti3GCYR22rjBmbf8F64nvoqp39DnGfe0iM/Q5/+0qvM8bAHZu7vMbu8RjR +EXKyLidbt9gad4bQw93WzX3WD3iauXjIeqdkHqYYJ7EXeTqFj2BOH/FaYxzc +n0QPMz2v6OpG/+YB9/GMf89v2eOAu+gX28bHYkusQ9Yj/h3cwH2nqSvIhIwz +vSaaed5Wsi3c5/ljLA9Y11M8Jn7XwOOgju//w98YYr2AW561ftHjaPf1mu3o +ANvkE7Zj1u/NnpuJtj3mb5bnk1jJmuWOErGMe1bctyJ+cTf0FtvEeNvPXLcf +bpme8Phf9fe6eS6ftP3T9jC37297J24+57WAryVfQf5invV/ehVzcJXtBltg +z8relTwBeVrOisiTkNPgHIgcBTmBTVLkAcgzc7b0tO1x9Aq2RlmzzTNXWBOU +6HqG7Q/7fMLjRK+3Wn87e61sbNufYHtay2sFW9vRawUd83yZ7ZvnO61r7Ikc +KWdUb9g2m3ktDvc8zLWtdbO9PWhZsDPi7rO2iVv8fpB/N9zfwC9x95c7wszx +SM8HNkk8r7N/AEMP9Jzs43lhjeP7t7P84AliDrbKWdo51u2JnlN0y76in+Xk +/dnWM7HnEOsWLEUsZl3X7tSP8/dXtZ/g/XSvF95zzr6v9YceWTvsh5ADndfi +ajfr61Xb7yDrB11Pse553tfvu1t3rGn81GzbBD5jiudypNcHa4x1jq30ddtD +PGbaEoN7+j3jXj5m2fL4HPe9+f097u952xPxfLz1zRzcaznRC+Mg3rZ3TOln +Xc/yd5iPie6DOXvZOkCO5vrm6Bz7ePIS4BFwybt6t0oVe++X9P6AHPm3/VXX +Mse5x37iP0pxHvae6trmWFsfq+6OHHc7PlY5MUcOYITa35njzi972ME59nZ9 +xG+TY088QWX3KvbDDXP8nt82QMYc+9wvVE7JkZ8YoLYb58jNjxQ/Lcf+7TKV +M3Ksr5+wqxx3iO7KkYMj/7a32l+S438JXcQfnSNncLPKnONM7yjV75DjDGAb +8fuKf0b8fSq3z5FHXFf1R+bIcdytcrsc5ySDVL9njlz8DypvzXFe+LPKzXKc +F26oNj1z5IZbq7wtR76NO0735NgL9hC/kcd7tPidcpwlIHu3KuQ/mW9Vcb5N +XSfXj0UHVezJzhW/QxV4uY/4DlXcUxuDDqrI3/RX2bmKXAN2sWUVtsEedLcq +9qEXid+1ipzTUJUHVfG/iQtVv0sV+acLxO9cRf7pfPEdq8g/nSd+pyrw++Hi +d68ifv2m73Wt4myJPe5fqtjn9sihd3R+qfijcuRCPsS/VXHH4Uj6qyKngV2g +L3SFzvYyv3UOO8PGzhS/dRU5qunie1dxV33THPaNbZ8lftsq4sM5zHUV8YS5 +al/FfJ3NXFdx3riJ+J5V5HTor5f7fBA95DgTehi95Tj7OVbv98hxfnOQyrk5 +7uk3Y03liE+L8M++K4VtfpLCPt8QXWVf0VLtF6eIDZuI/zlFPFu1ipwC+YQk +/s8UOcFlqvs9xd5pifilKfbqv4pfkmIf1UDt/0iRK2wsflmKHOKa4lfKkUva +Q/x/U9j816r7JUWsPUn1l+fwuS+ofD7Hff/eOZ7hyZEf5zz5X9X+lRz/V3hK +5ewc+TN0/JzXxfcqF6SI31vk+D154hPUZk6OM5Vf9e79HHEf3X2YI76j11et +2y9SzAH6/9xzw7wcr36ezfHfhW9Uzk+Ru/wyh51hY0PU5u0c/424XeXmOc7P +j8OOcpyfDRffIsd9glPEd89xlvZBDvmQjfMv5pU5bag281LkMV9krefYm/yU +Y22wLgayHnOcBR6DTeU4L2St0BfrZTA2mONsb33xrexb5ufwm/jMP1W+kyLf +ulT82ynyrb+JfytFvvVg8W/k+J/HWyrfzPG/kENyPMP/R+W8HP//OFHfeifH +f0ReZ65y/KekX45nePr7t/s8LMfv+W0T/fY/KfK5q1Wxt2dff5ret60i15ur +iEPEoLXEv58i1/wLsqXIk34q/oMUeedRVfhBfCDnzfhxfDjjW5xjjCeq3KCK +/B/roK6KtTAKu64ir0ycaVqF3tbK4b/wXdjsJ7bb1XL4Vvwq5znrVRFTVhd/ +ao58dv8cOkI/p4tvV0U++2TxG1URj4hLPMOvqfLvOfLizM8fOeZojRx+E5+5 +dg5ZkbNJDl+GH7sam6kiX3yN+COqyB9jp0Ntq/Tdpor+r83hN5fngXP4a3x1 +sxwxlXhKjMKesCV8QFGFH8Bn/J7Db/Stwvfh9/ANa1fhH/AfK1fhQ05Q/TpV +nBPiM4iX+I0Rqt+sCmw7THyLKnD6VjneUY8uN69CnyPFt67ifID5X5jDBk5R +2aqK3Dk+bFEOP8baalTF+mqXw6fjz1kHK1WxFtDNxlXop2mOGEb8WjXH9/jW +ejnmj7lbJUccJYZiv2UVNoxtNq/CPqfq/cwcdoj/Jpaz3osc42SMX6eIAfj/ +b1JgheU4IYXvwG/sn8PH4d++SuEL8AMr54jZxOsyh37RbaMcMYl4hA/7Locf +2zIH9gJ3fZnCj+BDfkzhs/BX12O3juOUQ82zx7oixz5rvxy+Ej9JLmVhitzK +lYzLtse4R3kN3oA9V/H/P86F2bux/yJGfZYjTn2fAreB2b5L4U/xpdgy/dIn +fpHv4RurHPPNXBPTqiriGvHn2xwxCH/weQ6fAAYkdwMO/DQFngPLrZvD1+Bn +iJ8LcsTQz1JgLPDVoTn8Pj4f3DEgB/Zg3P2qGDtx6cccsYmYDI4nLh+YI7YR +18DIX+XAyUfkiCvElONVXpcjd7B+DlwFpmqcA3OAN75N4d/x7ZNUNznH+c3/ +ACVRoes= + "]], + Polygon3DBox[CompressedData[" +1:eJwtlmeMVVUUha8M5d27H2WkCUNx6L3KKCBFhBFkAKWXgApqLBRJTBRNbL80 +doOCRkVNDNIREQFBFFQQsQAqKjZ6GaoNFSzfyvLHyltr733PO/ecs9e5xZNn +DJ9eIUmS+aAi2BBJUgY+TpPkQC5JPoF3A6+hD4LR+SQ5jf4VXgAmwb8FAb8g +S5Le5G9Cr8lcUxt9En0b/ErQBt6I2IXk70ZPQxehP9f4/F/9vGPi7am5Hv4T +6KBn0cXkT2gM+CBim+FDwGepx+issUED8vegt5AbBrbDd4ARejewmfH3oofD +t4LZqWPz4e3BfeiN6DaMVQUUMt4EYoPhc8j3Rt+K7gdfB36kdhX6a/jl4C34 +8dS8nNrVqWPteL46qEnsOvRl5I9mfvZNcCm5aqAVsWvRveDng9boKehB1L8L +DvF/69Gt4Ccz81lgYHgPtXfr0FfAj2fmb4MPwzFxrVkp/B2wj/q16AHwY5n5 +GvBBOCauM9Efvh7syfmdBsM3aTz0+9oDeHewBH44NT/IeEtTx3qgV4FdOcd6 +wQ+TXwF/HXwRjokf1XrAV4NvqF+Ovgi+Te8HfxE0YG1WhPk2atqiQ2vGmJOI +NYTvDp+1O0FPdAZakp+InkLue1AJ3ljnF74W7M55Tn3gR4ivhL8BvgrHxMvB +rvAeau+OgU/hF4NF8EOp+QGeX5w6dolqwZc5x9Rb+8kvSN1jzZhbE1BM7H50 +if4L7Mi5pge5yqAF+fHovlp7vUPOc+yps5F5rZbpzIdj4ke0HvCVYCH8ZtBV +a62e4PnnU+/t+PC7aI8XwqeGe/F2Ynfw3y+j65NrDQ5q7UCpep2aI/DKOmPo +GeoBeC7cq3XJ/wmvDq5GV0Wfp15Aj0FXR/8NLwQj0dXQM8m/Ev6vLuj2qge1 +4LdQ8xu5qmAoPE9sX3hPtZcf8UwGfxVsgQ+WR/HsMvRc+FaNCT9D7bOpY53R +S8O5OfIH6juiH4LXoa4bukN4b3Zqf9F/oZtmfqd28FPwqfB7QXHYU+QlijWm +vm3Ym/QOldC1w3tZA52i64bPpjynKrpe2At0pgvRRWEvkIcMQj+lM8f4ndGP +w/vl7cX9qWmCLst7L6aDR3Re0fXJ1+OZUfBHidXLvKdz4bOIzUZvysyngW6Z +Yy+Rn45+IGePnwh/Ibw3XcGT8HngXBXOuuaQ9x5o7UvQk9Wr4doi8EzYU+Wl +vbR/YCC6e+Y5zib/dPhZ/ae876qwl8sDH4Y/Ef6vjmA7KNUe8XuWOVyjtUV3 +yvyOugtOZP4v3Qnj8p6T5vJg5ndVTFzv3IncCHS7zGfgPZ1FcBd8Q2rvWxT2 +FnlgC2rPhM/2sNR3w7iwV+iOUK+ODXubelZeMybcm/KcxfDTmb2sMLU3Twjf +JfJoeUGjcO/KE07B0/DdqjuxD/+/g98s5zXQ3awzrbOsO1reMzJ8l8uDtNaP +hc+O1lzePCrsXfLo5fC9mefyHOhA/f5wrw+QH6OPohtm7vmO6PJwrw9M3XsF +4bOoHuxC/hD6htSeEfCfwUx4mfyR/D/oZpk9oBX637A3jEI3R/8S7vUhqe+G +0eG7RnfEjfA98jx0W32DqDZcK09tzfMFeffa2NS1E8O9rWdqqDfCd7Pu4Lx6 +KXyX6M5YEr5zddfqG2GYvDjsjfomaIk+G/au4cQWhL9h9O0yj/k1D8fE9c4l +1P+ObpLZw3LoOuFvDXm89nLn/72qPa0o7wvPvTnxA/CK4b3QN0/fvHtCvaAz +/134m0ffOrrjupOvkPez8twfwneAvL8m+ENzD59dzekcvEb4XeRxx+BVwnur +PR/KWE3D3qIeSXT3hvdKe1gL3Tjs1fqGqYveGO4dfdP9B2xASRY= + "]]}, + Annotation[#, "Charting`Private`Tag$87749#3"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 6], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[ + Polygon3DBox[CompressedData[" +1:eJxNmHf8lWMYh08i5LxGhAaVEkpKQ1pEQsqKRCSSSFMlK3tFtmgJkVUqKVJp +GkmSUalfJUK7SKSs3Nfnvd7P6Y/78/ze517X/bznnOdblTr2bN1jj1wuN6lY +Llc81u/yudyWsM1hj4fdGXZX2Cthz4QNCnss7A59T4bdHXaP/vvC7g97Ouxe +n0eZ92zYE9Yj5ynziLsxyeVuDbs27Iqw/rE3MOzRfPr3Hdag9gNhL8hHvREy +8dwrcjuEXRn2on4YX7X/c2EvywfvS/qf0k/tB41jfShssOuAsJHGkj98N8bX +zCH2/bA3wt4Mm+jZcQZjzHk+7HVjh4S95R5zjHM22CfYD96x+vGN1w/7264j +7Tc0bFjYaFf6vWMNOCbJwnm86wr7VHNgfM89GKe5B+MUexA3XSZ4Z8oEy99h +G8M2hX1gHnEzjCVulrETnPtR399s9+Cd48r58Zn8Imxh2Dw54P3YGeD9zD14 +P7f3dHNm2nO+fnwL9M+w9gzj5oZN9h1+6kq/L60B41euMC41Dq5FYR/JtSTs +E+st0/+Z/klyF7kH1wq54fra2h+GfeNK3nJjiVtpLOyrnBPGH+Sjxu9hP4X9 +HPa9fnxr5Ps2bLWx9FnrHjP96B4zrXeGIt/tcnk/9P0wzzrziNtgLHGbjIX3 +H583y7RYji2+Y+b4Qx+MW50Hxhvi+3xVknJt17/WWivN/9M9WHbKDcsv1uYM +fnWl7g5jifvL2I2ewVzf67/2gLFl9G8U1jjs8LB9wvYNKx62zfPeZT/67Jmk +e8xUIkm5YSRnpz33SlI/vr2T1A8XtXc4Ry5J63EeHePvq8N+i79LJmkNvnP7 +JenKGZeKv/eQa/+w/+Q6IElX6h2sH8YyzkG9Q9yD69Ak5YYrn6S1OY8kSVfq +ljaWuMOMhf2asGJhB4aVtTaMNcKOCDsyrEKSMhFT3h6J/kT2Yz1rGCuFHZSk +81V2BniruMJytCvsVV0Ps9/+9jvGPeoeZ20Y6+uj5wm7MVYPKyfj8a4wVjOv +nLafM9QKqyhvPZlgOdG9o8LqOAPsdV2Jq60f30nmwXSyXPByX/Gbzx1wUTw3 +CzsjrInnC3tD+WA/NaymXKfJUducujI21Y/vdP11rF3HuEbW4wwau9KvuTXg +PdOVs2xlHFwtwhrIdY4r9TrJd17YxTJR73z34bpQbrjOsjbncbYrdS8wlrjW +xsLexnpwXeJKjeyO585vJxPf77b6qX2pK+zoFO59zv4y98jpEdbZWdE16A10 +SPsk1TGP5FPtwv3GPXenfp77uzfQ79IWfzvutg+1GvjOeZeZFoEbHYQeQsM8 +4Bw83+depr+elhs9RO4A+6Mj0BPwoROGysJ9PFy+ET4PdG+YTC+aP8z8gfYY +6ecSPvQD2oL7n/t2mozsjcoXNMqb9hmbL+gg1jHuTTcf9tetO1z/aGdF17zs +7y2/A/wuDLLPK7KOsx756IVM+7BOMh+9gf5Au3HvTzZvhhxjnGOq3FOM4zzG +G5tpsvGexwSfR5s3RaaJ9iNupj3QF9zRC52Ze36+sdy1c6w1yxy4P9IHK3fW +J/ZBV8xzvo+NyzTNXDnm+QzjbOtm2mu2s863FvMvkCnTTAuMRT98JdNCfZl2 ++Tpf0Exfysedv9jeaIZv7YNeKJJ1kflz9S+Rd5k5o5x/onxF+ob6bt4wH72A +fkAXcLdulwMNsEoO9MZP9ljjM7XQBevkQhdskGWtcUv1r3W+H6xbZOx651+t +Dx20yVqcEZplZb6gSzKdwrrFs1xlHH12OAM6aOtudbeaDzdaItN9rNvssdne +azwD4vjN4U7kroUXLYHe4J7nHuM+W+/eDpnI+dcZ/jYH3l36NpmPD52SkxUW +vp9ojs89i+VyE7NLVvxoF/jQFZkWKe13e7P9//Es0Btoj0yXwA0TegNNk2mj +kklBAzEzZ1DC2miVA2Rd4HmtyBd0GD04A+rt4wz8xmQ6ixVd0j1J/x3byRw0 +Bvqja5K+MzQb9z93bC3PF91Q1rqHm8MM5fXBig45wj5og0pJQSeVl72CcQfp +r+j8Zaxb0j5lZK9srUw/VdZfzfsGDnRHVfOP9Rmm6saRX9t5Mm1UXQ40SI2k +oMmqJAVNdrTsNcyp6HnUlKOOdTNtxHOmLZrLwr1f31r1jKtqXD2Z0AJN5a6v +j9kamE8/NMYpztNQX6ZvGsnYxOfq7jX0HI+TpZZ9Mr2CFjnfnmfJDR/appl8 +zX3ONFamuU6XO9M35POZ4v9FOsnXQh8saJZz5Gvlc6axWviOSvnOT5ULrVXC +98H76W7t85KCTmojF/qytRxt9VEXDYQ+6hl2fZJqnUwztbV/O+M6+3dLZ77Y +us3twzM6ghpoiT7WRUPx3eF3hN8QNAz/tzPE33W+U/wGdjOmmHNc6ztlr6P7 +fEf4nvNvjS5JWgstNNi6Q6xDTM6z6mSdVs4Af++w63y+zefLk5SFf6PyHe9s +TDvPhfNB67V3Lvb6Jun/VXUxt6sz9rNmD/m7WhOubs5yk5+J7sZ0k5nPDVqZ +z9/N9ro9n36mWutjr4/7t1rnXPv1dq4usnEut/j3w/l07evf6Eo0ExrnRpnO +tf7NztzL/A7W7udZ9fbsOKP/AeQf2Vc= + "]], + Annotation[#, "Charting`Private`Tag$87749#4"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}, {}, {}, {}}, {{ + GrayLevel[0], + Line3DBox[{312, 1, 297, 217, 16, 30, 45, 59, 74, 89, 733}], + Line3DBox[{3, 2, 255, 312}], + Line3DBox[{3, 4, 5, 6, 7, 256, 8, 393, 667}], + Line3DBox[{315, 9, 298, 747}], + Line3DBox[{377, 10, 219, 315}], + Line3DBox[{12, 11, 377}], + Line3DBox[{12, 454, 13, 526, 14, 258, 307, 15, 316, 222, 29, 44, 58, + 73, 88, 103, 262, 442, 717}], + Line3DBox[{422, 104, 119, 134, 149, 163, 178, 247, 324, 192, 310, + 269, 193, 194, 195, 196, 197, 198, 250, 199, 350, 767}], + Line3DBox[{133, 118, 263, 441, 847}], + Line3DBox[{133, 148, 162, 177, 191, 271, 311, 206, 326, 254, 205, + 549, 204, 485, 203, 202, 201, 252, 305, 200, 325, 654}], + Line3DBox[{422, 704}]}, { + GrayLevel[0], + Line3DBox[{1301, 871, 1270, 1094, 886, 900, 915, 929, 944, 959, 1119, + 1313, 1838}], + Line3DBox[{873, 872, 1164, 1301}], + Line3DBox[{873, 874, 875, 876, 877, 1165, 878, 1398, 1755}], + Line3DBox[{1304, 879, 1271, 1830}], + Line3DBox[{1396, 880, 1096, 1304}], + Line3DBox[{882, 881, 1396}], + Line3DBox[{882, 1465, 883, 1535, 884, 1167, 1297, 885, 1305, 1099, + 899, 914, 928, 943, 958, 1115, 973, 1137, 1277, 1707}], + Line3DBox[{1332, 974, 1158, 989, 1004, 1019, 1033, 1048, 1161, 1333, + 1062, 1299, 1189, 1063, 1064, 1065, 1066, 1067, 1068, 1069, 1820}], + + Line3DBox[{1159, 988, 1363, 1156, 1254, 1828}], + Line3DBox[{1018, 1003, 1159}], + Line3DBox[{1018, 1032, 1047, 1061, 1190, 1300, 1076, 1334, 1163, + 1075, 1558, 1074, 1495, 1073, 1072, 1071, 1070, 1626}], + Line3DBox[{1358, 1139, 1332}], + Line3DBox[{1358, 1745}]}, { + GrayLevel[0], + Line3DBox[{2470, 2036, 2429, 2255, 2051, 2065, 2080, 2094, 2109, + 2124, 2260, 2474, 2996}], + Line3DBox[{2038, 2037, 2333, 2470}], + Line3DBox[{2038, 2039, 2040, 2041, 2042, 2043, 2769}], + Line3DBox[{2045, 2044, 3156}], + Line3DBox[{2045, 2046, 2047, 2626, 2048, 2697, 2049, 2334, 2464, + 2050, 2471, 2257, 2064, 2079, 2093, 2108, 2123, 2138, 2280, 2431, + 2860}], + Line3DBox[{2494, 2139, 2300, 2154, 2169, 2184, 2198, 2213, 2325, + 2499, 2227, 2468, 2352, 2228, 2229, 2230, 2231, 2232, 2233, 2328, + 2234, 2533, 3020}], + Line3DBox[{2347, 2153, 2524, 2299, 2416, 2984}], + Line3DBox[{2183, 2168, 2347}], + Line3DBox[{2183, 2197, 2212, 2226, 2354, 2469, 2241, 2501, 2332, + 2240, 2720, 2239, 2656, 2238, 2237, 2236, 2330, 2463, 2235, 2500, + 2890}], + Line3DBox[{2515, 2282, 2494}], + Line3DBox[{2515, 2897}]}, { + GrayLevel[0], + Line3DBox[{3447, 3195, 3443, 3421, 3210, 3225, 3240, 3255, 3270, + 3285, 3300, 3315, 3330, 3345, 3360, 3375, 3390, 3429, 3449, 3405, + 3445, 3437, 3406, 3407, 3408, 3409, 3410, 3411, 3412, 3413, 3414, + 3415, 3416, 3417, 3418, 3431, 3450, 3419, 3446, 3438, 3404, 3389, + 3374, 3359, 3344, 3329, 3426, 3314, 3434, 3299, 3284, 3269, 3254, + 3239, 3224, 3423, 3448, 3209, 3444, 3433, 3208, 3207, 3206, 3205, + 3204, 3203, 3202, 3201, 3200, 3199, 3198, 3197, 3196, 3432, + 3447}]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}}}, VertexNormals -> CompressedData[" +1:eJx0unk01d37Pk5KJRWVqDQghYpEkukukURJgxIya5AKyViRMpQhMs9JkopE +hpQdSSLzfI7hnNc5h3MOIZJS8tuvnnfrt9bzeb5/tdbutfa593Vf+7qvay8S +NhcP28/i4eHxWsjDw4f//Vla+ps72A922z+V9Dzvgm1fhLXRHgLWZVUxFFz7 +wfz0xkWTxlToEi76baVNgEDvSbVrdBbM8TbKeCXRA4tflp/l20XALine0xQF +FrDnjFCTNvSB4f0fsds0COhK6Pqde5QJrvc2m1Tl06DwenGtjQoBhz0XPsnR +ZkBA/95F3hN08Dy8avZSeQI6ambErw3QQcN37pvPpgxQtvWQ2ixFQEpYuu6R +TTQYWvUqxqeHCWrqQj0vlhOwds+4Au1HF/TIV2j6bqKCWNbT3A39HHh6zEZ4 +jlwn2Jfk7LxR1A2bV258Gj3IgZoSkZZHQu2A5k7eD3HvBfX3c0p9GRxoX/zd +JOZCC5ion9hdo0YDI0aXbUQDB8KW/rwhwd8Iyj/FDLX06dCofKaq9CUHDm20 +rCxw+gD0RZFvh3UJ0JI3TyhJ5EBQavLGY/KvgPto9eASfgZYK/U6vbzFgcR5 +m2Sdnw+AucrBUZu8dqAevVK8Ro8A24VJp8yMBsCzpPxjgmon8Iif0jm/l4Dk +DMcd8l394BNsph8+2gUd3q5dRToE8OhATKxeP0xNrds+SadCoPzsA2a7CfA7 +qKcXGMGCio1hxvWivSC72XaDtToBYmGBk/aPmSA9cmLhuBENAmhBZwMVCeg7 +9kiVx4sBi+tlTm94T4edc05NJUsSoGDN92A/QQe94LiEfGcGlOrZxrUtIsBA +UeFlBtEFZ3/Q034mU2B9Y9G9CCEuXHYYWRKq3AnahS4pt451Q/5vuSKB2Vxw +CJ1v+3OwDb4vfKezKxbXc2hk6RidA4GcO4mrYprhcE/LqhtJNFgkMvRYtYQD +ljQFKYHRWqD53RSTHKJD3mD8jpZIDlD4JsSjl78Fq9i5dfQpArZfDL0d58KB +vGtfhVY6sKEp8qOMg30LpOSZxIkYEBAUeG3l51VsuOtX/lW7phV+KV57dBGv +IxPTrVYVA5Bz6JS1hGk7fGg3LufH67Oor8S9TQbg98FD+W3LOiHHkuiQ1idA +6OSRZNnqfuh78KDJfwsFVO/O49PA+Hc8ETfbJtIPUocquTWR3dA+sPOkmhoB +br79Z7dvZMHNvJ9NXKc+2LhNOjB+I+btJ+HeO50MKHnpfUbiCh1iS9MGPs0j +YCAPHp3vo4N2ZfOJzykMEBbSe3eLRgddl+OpQRZUyGxL8Q/60QFBGg9z4o5w +gbgiPzocTAGnX3dvXTfoglWFuSoP1bgwVrdsRvFnJxiWCrkymqkgOskbcew7 +B1ZlXZiIYreBxOPYHjepPrgTYd39upgDVfuGzFYta4LrvRtkqg7TYa6kxdVn +/hxwL8iiLYmuBOF6OfqJXgJcFd2sRo5wIJby0T2WjwOMghKRrIoGqIoJ/2li +RECL6wBPdyMbdrLpXTsFm2BR2iZfeWMCpqyJaxmRbAgxL0m6a9UMU6zWG9WH +CfBvelBjr8GG7ZudNtiJtML629Zo/hECPj7mu13CGoBvXbKiT7LagLA3XieA +v89Ztic06vwAiM1a7n6+qAOizRoOn8X92mEW0Mjb2A/98/fHam6lgF9YxNXL +OwkY56g1f51kwUE5uyM/jvWA6dB7U+piArbUznN0uscE9vhY3mY2DS6MI17+ +MjpEP8rOLhHrgYt7rrtX3W4FRTGq1rYYLsgv7Y8qrusGIaXqCr28Dth04/C7 +XbxcmDloFTl3JQW6hsIhdpAKd8QqXV5lc0CQ+PUy+VAbLJhzNjJ+Jw3WmL2b +vHGJA808gVfD+mrB+0qzwdyruN9J1Qq/N3Hg9fVbN3uxHujYWCrbaVaDXa7F +mXCMQ0rNrh+WDhy4sT5Y/rdwDYjnntiz+jgBaa7LVDIB69baiTP+Gz/Binfe +N/ebEVCqFf+FthjfA/mx+QJB9XA9zOzbV0sCTN2kgiTb2KCnip5+SmmE62Ck +dtWOgEHdpjcLwthg9PTLcnOZZtghUyzBcSCg9gHPuXx1NliWOIuPM1pg8pKv +laM1AZ+nDL769Q+Ag5uj+kBXG3x+vUWN1P9vrm8/Kz8cAC37XTcSzTshtSn1 +TGANHSpsp7WYB/shwVcr4ZYJDZo0/EY1VtGg4/PD1No8GtSrOedfnfcBnkYe +fR2VywULnY6FSVU0MFNxTKXxNcOL8rLj7CIOaKwI9fvC7YXYtMO/uModcHvn +/dFnvhzw1tWVyI6lwMe0GOfO091gPu/rLaEzHOBr7bPUJFqguXG+t9ZSOjwP +fRHbi3F2sp33/QOeA0aVYxsVLN5CnmvrWwWMZ+rat4m0Ng6MdzyWbE4pB3kL +vhcO5gTkr977/ONbDjzP16ESC95BaFp3laYtAVGfCu9YZnLAOWeRmWxWJQzU +0iuOnSfg+0ejBZ64j+ZxrK+bXKog5Uz+tgAPArRBpz7dggNMHb3OENNq+PaY +M1YdhPvoBqcCFTlwocfcJ066BobvlVW9SiYgcDr/ot0iDtAvzms9srEWBFSs +zecWEkDlYa1VleAA53L6lDSjGmaq9FevbyCgfO0K7WvLOZB5p0mmKOAJHIyh +h26vYcCibePDGlQmBKfGhaVpFADf13JvWSk29ElpurRtYsDQrgsGhi8+gJKn +zmvrz2yISd9aql1OhyiN1lPzBxrha5vA6l4tPO/cZxEm/DTQqbZcyKlsg+pL +YgLWHhyIua0Qz0yiwNnJfnruaSrYqywXffoU68Mj/xYvSS6kigjt7fd5DjGW +Pj2PTAlo+yE1k7CSC3rLm/wr3+WB8vzhclErAh5FXXUAPDfiKi02O23Ph8o7 +P0Z+nCFgQVeovdEsLqz4srQnp7kALpoet850w3yr2nBx2QgH2vosf3ZFFMIK +Xs3ayxjP0kapyfoWDtA2mhknGxaDfMLz5PyHBIguK9TreIL1quUNhxNRAvM3 +DSyhtBEgGzPEc98Jn2PkwfhP9RIoUBfyMMC4bNjxwPDCFBt2ab2tvj5TABFS +X7P1Whnw7oLvofeY/6c+qIcmR2RDuFlQn5kKCxI3+yacx/r/5qXyPL6BZyC2 +qCVuu8gAaIwECpqHMmHtLE7EUdUSOODlYj7rCBtWUPTcMs4yYMfO3Lo1yytg +zVb+o0XzOPDL7G1aJ/ZZLS8mK847VON7nbQkN4wDoY9bfHdcooGS9EnFpsFG +WM97V911DReWXY5uInEWrXU5N+DzHH2xlOj+D5zRX5xnBWjakTgvadcxvrA9 +H619aDNM4ly1SM6BxDnm9Kt7GGeUvqPqD85L9jb+wXlOeFMexhldlyj8g/Py +4IhxEmdPni8VKYbFiHpNPPE/cEZ/cc6vespL4szv/fIRxhklr77/B+eAb8Z/ +cPa4vn4U44xq0/P/4Nz2hPMH59nMaUZSRDYKLmf9wdmrqPQPzl+ubX06a+AZ +St0vHE/iTBuZFiBxPhiffPiYagnqk0s7SeKc5SvpSuI8S7dZYe3yCrTg3W5j +EucWv73JJM6CluJaTg7VKD0dLSRx7nTyCiRxNn+9q71xsBEdDpbYS+J8Okjy +G6kbh8PFL2HdQCrnfdB/6Ab6f+gG+qsbXW9v3SZ1Izr3yzWsG2jpC/4/umHo +kiBI6sawmWgT1g3UVZSuROqG+vTjBlI36OKhBVg30P7FI+OkbtyYs9uM1A3z +48XvsG6g6xpBlaRuPHrQ4ELqRlZkWAjWDaRhmX+K1A1epS1/dGNTRKngBkY1 +ElN+K07qxsMF6/eQulG9Uy7lZcATtHh9Qdh/6Ab6qxuR5Wn2lK34/5Ul29Pv +fUD2z4bFTAbZYLBzbhGpG91OT+5h3UClI2tFSd0IXd/RR+rGSCVLCusGKq55 +yE/qRodLcgGpGzcoK+ywbiCvwBBFUje+rt0fSM7BvvUvPttqVqMdfifPkXPw +buuOX+QcHCrfwZ4WrkEl5T665BzsnaWzk5yDMVYiUngOorv5nwL+Yw6iv3MQ ++qeDyTkYphuXiOcg4s/MUf+POYj+zsFFis/syTn47d4jTTwHkbibqgU5Bx/+ +nPxCzkH10RADPAeR71kHVXIOSvZp9ZNzUEGemYvnILo7/cOGnIOMh3P0yTl4 +pvL0LTwHkfwNNEnOwfQ9e9PIOXi0OyUez0EU13P0DTkHv7anC5Nz8FPZokt4 +DqJ1mnctyDnYwmdzhZyDL41eKA0qd6BDrHMD5BzcEf9ClZyDAuFRC/AcRMOs +Y0nkHJS0UD1DzsFdL+adxXMQbdy1J52cgy0nci6T/m3f8R5j7N/QtL7+D9K/ +1TFip6nYv9WUPJ7E/g2dnvPq6n/4N/TXvym+FnS2xv4tOiB12k2kFd3m/ZQk +gPs1vXw6kPRvNx6YSWP/hlgd79aQ/q1LV/QO6d+eAesm9m8oZc9qY9K/cW70 +1ZL+7a5/Rx72b+jcDoon6d+m3+6uI/1bY63ZeezfUJtc7rH/8G/or3+LFbv3 +kPRvbcs/xWD/hpR+KqmR/k1nhXcS6d9a4m8kYv+GSoflakj/VtVudZf0b9f9 +H+3D/g0dkK67RPq32js2iPRvMzJvrmL/hk4ETc3yx/7t8ewma9K/xWv5XcL+ +DSXLViwn/Ztv8dwFZO6oqTQ7jnMHeuXJukfmjkFG2moyd3yP6+zBuQNVCfY9 +/o/cgf7mjijZO5aixwdgocBBy4NLOtEFxlcvJZw7Ar4qpJK5Q2xougrnDnSi +IGA2mTvkJuEImTvUPO4vrY3sRgtiXx/5j9yB/uaO3IlhKpk7kCv3PM4diFqf +yyJzh/OGVQ/J3JF18pU5zh1owEaynMwdEasM0snccWjDB1ecO5Chik8emTuY +a5S+kblj4ecoB5w70A7bdA0yd4w+SeXZhnPHh6Q8R5w7kMmVpEgyd9g0DI+T +ucOs4goT5w4kw02hkLmj/cNxUzJ3mPy6Io9zB2qxuuFJ5o5fFlO9ZO7o+7WI +iXMHupZue4rMHZ/EI6XIvCzlFytim9eOWl+vLyDz8oMXT8zIvBy1lr8b52U0 +oS2kTeblu1m7FMm8fH3Pz/M4LyMD3lut/5GX0f8jL6O/eTnn0PyvZF7WbVUS +wXkZuVxxcyDzstGR/UpkXu6zlnTBeRk9ibCcIPNyc9rFVDIv24do3sd5Gd1J +qYoi8/Kqz2+KyLycSRyMwnkZRYoYxJB5OZ7tKULm5VcbIRLnZcQj219C5uVB +6TprMi9fEIvZj/Myan3juYTMy2sK5sSSeTlgVc0GnJfRirWPH5B5ebx4ljSZ +l/l3TYjgvIy+a+vuJPNy9NmylWReFtPoaMJ5GU0oLwwk83LIjVW/yHeeUf81 +H3ued6GK/VNAvvOkxN/oJ995shpUZ74ZU5GN2SiPNda3OfG/5cl3HuubCr2v +JHrQ6Ox9VuQ7DzEmZEe+83zR7+IkbehDsRou0eQ7Dze09Sf5zhP3/JN5VT4N +zZvh+0i+85w+//MR+c7zjNdvmfcEHVmc2s5LvvNc3Te8gnzn+SVaXfHZlIGC +M83X/cc7D/r7zrM0fbcs+c6jzp9o4buJivaK8zwm33lObvktSL7znDtpc/BG +UTcyBudH5DuPInWikXznudT040mIey+KeBRYTL7zVB38eZR855mtIrW3Ro2G +itepWJPvPO0s3+vkO09yqNIxLX06evml5S35zmMwylNKvvNYNT9pGNYlUHn7 +mrvkO8/U1oNryHeeK8uuTS7hZ6D60ho78p0n3P8Wp+1zHyx9vDCjazELNIoO +3esRIIDvaSRtLqsLnI8u3Kv+jQIPrjxx0v6B80Cdhp6pNgvK+cIW9XrR4J1o +tOGlY3Twlm6tDw7uhuZj2rHFQY2w9NdF8D4/CApx7nT1jwTEKpob6cMbNIFm +llo//D/7oL/71PudaST34be6chvvg3Qjvu4i96neUjhE1pnUangf14k0tq2J +JuvstNvaS9YZoBtmjOtErw7rOZJ1DhukBdavGoD44mSbkJlOMIll2HHx/Qpk +NPS8x/fx4ge13zvVOiG/Y1PdSV0CxCpLDlkz6WBncyI60o4BSmI8ir0rCWCc +qibWinXBxeu7GuuGqNAedyLRjsuB/PmRHd2mVDC9Y1XAreoE/Y3pJZ3ruXDF +ZDiVrVoJph9PZoYkEsDqG1z3PpgD32UjT7D7X8O1r8vLfHkZ4Jc/a73FVcx/ +pk+jHJ0OOvqpv138GZC6cFZe5S86fK6/25n8igZipb/Fz4UxYY1JWl/5MB0G +S8VUxxZQ4M77sqh7Sygw23hM9YosF1ImdjbvWM+E7YF3tZXU6HDrhYCeB/7+ +MFfaS6KNDqkGd9uKmxgwOrlV7vYLOty7p8jDfEcFGZ2ffI9i2kHRQw4JBXLB +yV3lSZotA7L078164oJ9uXdXW8dtOrDUFK6wLnZD7+StL8oF5XD2kZ/j4OEh +qFnCu3jvJQLcCaooZWEZoGfZm4axDiiefzufXN/g4+XTvbAM7dlksJ5cFzj1 +weiJEQcW3VVLThNoQjEe0W+L0uhQpsUo0bo2ACoOiTXeDymo7Wj/sheydNhe +2ZiO0vpBKNOzs8+fivSn97ys+YbxObh+9MHafvgV9uXt7rIe5LjuaWdPPh1e +nQnWyb/UB3Zf1Hw6XjYj7y9SX5x3c0G2cd40A593RH3Bcnxe5FUu/Zo87w1J +3zoSt8PiHoYYN9SW3Kb9H7ihv7jtdYhNa2+ggtMiqZjlTu2oj2W64m0IFyzy +guvJPrJTdsxy9Wegqo4FuWQfTV8qtpM80eC6lGKeoERL42KSJ7JHPQzU6DT4 +MsaO7DZjopV8pqrbZhNwWdBrJ9lfdae6UNxfNKR4TI3s77/4jP4ffEb/Dz6j +v3zWjfG6/vY3DbTnXvFUUWGi9evnJdYvwX7gwGJzBVE6uO4/N2ovxkSvXL/7 +8awmIOlYS43ymk7wkaKesLzbjWwrhWgS+H5tZcwwyXuh2V7xHt8L5Po8PZm8 +F//iP/rL/wcbXlvNvlwBsb/l5ayeE2jttiObf4dzYItvo8WhF/0w84orP+FN +AYnufF45rPNBbDFLsh7ZVcNcXA+Ux2y9RdZTX3kucyyLAr5RXjv62F0QURI9 +ukOQCxFZWZbk/io/9Tfj/UE2ok2O3F/8GoM7L5cCoRatWXGnumCTaUNf4mYu +OO7ZEVmzgQGNkrrHdTFPQ9wj1LIb/k9/4W9/eRJdf+a9o0PTCf/2mQsVAOJF +tC4VLjQHz5sg10eMpoR4L1age75aHeT60sV6+gdLeoGvOvAOq6ERzXEZr75T +zYWZX+5mQie7Ye7E/C1N0q3IP/LU44zu/1MP+lvPMlNvCqkDN+syVmAdQPWb +cuikDvC9l2ST51pj1VuIz4UeLhPvIc918PlmWxLPq9EPhTCeyGSSj5/E069U +u8F3XhekmievD3lFRRcoBQ4PfnIgpVb0FKlLNCOnIqxLaNFFugypS9Teroek +DixubBbEOoBQ6kwjqQOS9ZHpJP4reIL3Y/yRq1nrEIm/puy15qW+DGidOCx+ +5jaBTJY6pw8a06EkzqFj6yMKJPjNlNk97UJHV6fwpa7iQnrsgwbye65fngT+ +Hmq3slPJ720LJpP30JjwNYhoSSigofDjr7M/R9FhQXhRxhFaFwyIamu6N2B/ +ksCjehn7ENlNP4Km9jBAS9abSHIi0L2TuVOd+J5y1ngPOvINAGPsXUXeyS44 +3dMTa4Dvi2u+nCJ/5Ft4vXdk3oVOAn5v2ZGzIxDnuq5ygpxT95ZdK9oHb8Al +oUKEnFOnGiJdSd1LiO3V2V5QjqaZA2dI3atcPuRk8ZYFF7/69lvr0pDBm23P +j3JpoGTVp9c2QgVfZmmMsXsbmt0e6D6riPvvetDfeqhZUvJkPXWGjotxPei1 +TOhjsh7xzs8V0a8oYJcMV89pUEBR2aiwbIzzb92Av7qxyj34Lfn9L9u+IPw9 +ynn5K5/8/jp1T+mG4S6Qe1j0zXgZFSqNGa0bRnD+15A/pfecAvdmB5a0i1Lg +wvYE28TfnH/zE/7yU03B1tGikgr2LfJ6ziItEDW1YwNLeRBM1FNqFwb3wsrb +Gxqb+WuR83rtbbGGgzBRMFFM/m5aTznv4WVU5LYsupn83Yk4pZ5NUgPQH2r2 +UJLVCduPeLsmYRyWlA66SZ2mQPmHtpYVdRQYmXXs6Brsf9wap+jnu+kgf+DH +koF8BrT8Tvt++hMdLvL43iH7HqaR1IP7DnOjeKfJvguKeXa1BjMho2dHt0I4 +HaU7x5ocXk//9z7o7z7MhIEZx2NUKIvaKRRyoRM1Zy52eIfzQhKRcMl/CQ0s +x7Y0GU0w0S371td7hAlIi2xfeOB2F7SdXqCieYeKTm/WN09ic/7Nc/jLc/7o +ZN+6+wguembMkekl4IOsVXrGbQ4E/BA1IHnSf2q7P+YJ0C2SvEiebIg8udy9 +gQa3dxcSC12ZSH/2EF/gFB0Ur306WtnQDweLt3qKilDQsNG+K174XmtV9pes +8S4FjzIHkR98DNTk7x9Y78eBiybSh8nv52Q7BuHvoSFc5jL5/b/0H/7qf8kJ +aRfyvOvl/erxeWG8ObyMPC9FSkiIPO8z06ub8Hmh8evtU+R5VZMy35K/K+PX +KYh/F+J2fQglf5d6+OYysv4TP8dYuH6QEZ3gJesvjwiWZk1gffcJcEu/1glq +kyXmL4y4sJl558iADxXeHNNxGD3VAabjh53XXeBCno982aL7VMhbLFcGqh0Q +/GB4t5oTF37FsUXeTBKQZTr6MtWHQBUpJ0sWTdBhyendOG7Q4VqPPO/FcAa6 +wdrspz9Kh7He49Xj++iwa7VH5/HVTGS50NbmF/bxTosCKSQPz9dde4l5iI50 +nXImefij2cWZ5GFzsTwH8xAlu48ZkTwMvSp9nuyjg3+oOO4jWsvbFUH2cVWO +12+SP6se5Yli/sAb9zw7kj8L517n0QwlQPzhwye88h9gw1676AFH7Htazm64 +/KMfFjyI0Iyzz4ZtN2Por1X6wfOdc1HVOAHtFwpzNgSXwMpagYfcaA4sfvba +WeRNP7AMFmdV214HC8bxzif+/WCdO+NXlUSF8U9vto9UdSDzY4WcsIPcf/sr ++OuvLs63m+ObNAiLQpTfsc9VwqXVJVkbXvTCqyeeZbxebJA3vyROcy9Cum6U +ctXTTPhddO+H5KVu0Bpvb3HaU4sUOGIbz3YOwtVZlcaQQIUddD5fc98G5HRb +b+/DKrx+d7EY2Zcwq7d5uC+gpGFXSvZF4bGKL9kXx2efZ+O+gLbFuutkXzZ5 +2X8i++IXC024L6A/Hu1A9sXiyAafL/cI2F46sFd4KwNeXHVZegrX/3m3JCL9 +IUdPPQf7Q3BzLxUj/eFNx85LpA6PRarTsA7DzHOPF6QO3xs/9EVgHwteT6kf +yTpIh0+lkdse4rwSoPS5idQH1TjFQawPYDLf4BCpD7Pu+sWIbMD+R8hxke2l +ApDgn33IgsWFHRMtucfW9sI60S9KT1qcwWDQ4H6z+hBkdU3Lknx+PP3FAvMZ +9XxcYk3y2Wlo9mGSzz4vCy5gPqMRfupFks8rVgfMFTjaB9p1XjOdu1kozDU4 +O3UpAXZRWQqJs6ngPvqLfyueU5J9BlUvRLkw7Xg15cVROhwQJcaF5jKRe1uD +ZjTGk1mSPL4onwnG+1CR3IE4cDtnOqNnx4ZndXcekj7Zqa/1I/bJoDl2oYj0 +yfZmv8ZInzzpI5SPfTIoPR+jkD65zWxzIjlnlYIoXXjOghDdOoucs9sv0rVI +/zx8BtKwf8a6cm6I9M91hY8MST8zaBnngv0MnFdm1ZJ+JkdFq4bU//vh6lys +/3D1wlxFUv+Phm8p2VJBhQOS5yWuXME+OdW09XgY9kuQ+ZH0k6/zL5/CfhLy +b33qJf3kdKZlO+lPjtjfmoX9CcRTl18g/UmUnGMWOfcz1mluwnMfxK1L1Mm5 +nzp1JerTKA2CuoXLm/SYUKeGcrcI4lx/OU7D7joNeC7/IranM+EbL7/uh0UE +5v33TK4gHYTyj4yPi9aDmEuQtykfF9Yxzm8V7CFxrT8rYlkFkvPvntv9Fefu +2338tgsZoON28+OkGwGSPmKJE9hPM8yOWAdR2GA25o2CV3XAKhcB/0M3aXBq +r65t+q4e+FR/YPfl682gcchr0wcuF/wkVIx6F3aBt4Bexs92KlQL2NNe47ns +81K3I7SECW7r+FxrVF+D2MXzX8TXsUFKYaz0fAELTsWsqyrblA+9Ql3EdrsB +SGwWfx+9tB94zs59vmrOU1i2c4/G0RUDIN2/+M1lVwKE7182OS/AgK+iW13z +uXTY816lNUx5ANS7aFJpXd3g3JejNCuLBjt3JQ4tkeuA9BWVlSHhPUCdf39g +H4cDd/e0KLPXdcKrl/syHTO7oXrF7AMXcJ1tsTIHTdMZECWTL01Pp6McuTdX +Q8Uwb3vV+CfbCAhvUSyKDCZQkdZcN+UFBLj4fIt2YhGY55c3GPoTKG265qAH +LwEHeQu5832pED2vZjDVvhOW7vru8EKRC5dk22qUDXogaJWzyZmeNshc57Tp +qA72w19au/SVMN+qTa3j/FrA8ecE7PfkQg9FgEPuM0m59hXvgzptrO3JfYz8 +f4++eE+F5V4Rm4zUOpDv9ufmcrZc+Bi7+vcDPSrkMHYYXRnoQOc66EVWFly4 +fy3/3mAXA5orWfpWqyvA//GPkOJcNlyjlrFv1TNBe6lV34TWK5gr1/Ryajkb +OJrhYZf0umGRzfbbD1LbkKRhM/tdLP5dMc0PZP0eMmXncP1ouYSyDFm/yEzq +V8PL3fBK4cp6zs12xLrX7zdp9n90AP7qwL/0HP7qOR3i16nF4Dwzls3Ld4wB +20Ym19q60eG5hxwvqeeTp3rUOOcq0Y4S/gxSz5VWD64mv1+SdZMff4+Wu7qu +Jr+3rGw/KmjKhFtHnvPkbMoFXy1xTUoKG6YYygkVjgxYGWX6xibmJVQ/94lf +sJ8D9VprZ2bkueA12L2lQeo+utOSqHzBAutyvJGTpwwX5r6uzu/yTUff5v22 +c7AnYOUJLyeLtVgvPUt/b5ufgdrKq+6X4Fx1m49tvnEJF5zZcEWp+CH6NfPo +mI8fAacXCbxfiv3mqlCPvK1uj5B3zJuYoEQC1Fdkxb/r4cAR8+arrWNZyIBF +YzlVEXCJ1vtqHPtxbQ2/tld2j9G4/Q7ZBmEGKPgWZh/W5ICVzvHSU5KP0NmG +2zt0UhggKr7UIfkCG6ZX9dlKSt9HOT0PThx6wIRrBao3DBYNQPsz/ySB2kRU ++5gz5bG5H+SXqpuSfphvf10T9sPoxcyHU6Qfnifds3gP1pejjOpem7t0GM4t +Cs52xj7TTvs7OR/tJx2H8XyE6aR6aXI+Rq7Mek36lrYLKVXYt6A+Lc9dpG9x +cNbYli9IhVOq4V7dkV3walo6tXwuF5YN7S++v48CJp8FtUxcKPD29/fq9bO4 +UGk13DrRTIH7Iaorit92odAKJ8J2ARee+r/Y/SSIBS7Wi+4G+GbAYZWbV96l +D0DrkSNVg0wmrGIEi8nkPQb22wca8xXYQNjGHbPtZcDFM7c+lru8gKm0W9mu +U2wQVRIqPvGNAGfHgcKt+0tASjtDfTqKA82Xu0N+b+ICWn0k9een+2hNwfRz +EWsCxm1/cqPxPdu7R39X7800xF3imGt0koD5X94dMl7PhYdDp3gfwgM0/+rm +4NvnsG88YZF/egXWe2v63BfdGcj7kfkXTQ/cd4P92jvnc2HeWRGJsdhM5LJ7 +5NRMCAEJ57L9vuJ8UCpj03lFJwvJXYrfLJdDQKVmyBDrPQfWLgvvkbB5jHIn +pvTC+wnszzxO6Hpx4KyewZKe0iy0ukbhVZ8hA7wOatlsG2CDPWMkvMwjA3U2 +RkoJLsLzkj9T+mj9AAgNHG2NaUlClws3y7tYsGC6oH8XiedoIt+ZIN8M1H4j +w43E0+Q7XyJ5LyCoDvC9QKHHbyeQ90LIZO0rEreV9yBNYX8Jaj3nqEXituGZ +U+ClYQKCJJMrnJuegG/XaEHcG8zj9Ppgcv2Bn8AGp6YnaKZtczG5XmyZ8SjA +hYDBTJ05Br3PkbCKueuPxdj3Xm7PJNcDFUef4XWw27/ThVx36dr6aPF7NgTk +SFdXvaNg3M/Svzn2wjTF8oPWFBVOcIVdjp5shQml7PDOQS5ojOe+r9PphyNh +m/vktqWhUS0P7/0T/eDB2az7WY6AtWq891+zXqC8/I1rQzW44OblrEeui86+ +MvaK9QLerb4gSa7P5uf7SO5vmO19Gu+Pqu9oRpD7V0TaTvIHMSD07FHP+AwC +Pd6yseT5Zvq/5yD6OweP3fqhvONGN3weC/jqFtGMAl82/o5ZOQh5R9c+ZQp0 +w+YztOui3Cb0IqMqIuXYIKDjfNnGQIPspgATBtECEtyDkQGFHNB12V2ucAP7 +uc7p1UF+n6Bj3TIurYkDwb9lqp0e0OFn027+oNXV8MPV/n4Wvke/Hot4Ld/U +DU/DctQ3BLWg38PXsn/NGQSfkwPZBlsH4EilGPvR805IT8mIq9LFPNfb1SqC +5+b4RTeW/f1OaGyVY4rvJSCP+XttxrwmiM7bnyDKQ4fjLK7YxGs8x20txntf +tkCVxKiE13YaUA9J1dhgvlrqvVdfsnsAvmw196083wkHLsiu09Ej4F1OaNxd +hQ7QmOzybOH2QM2JQduGOg6cphud/3J5AAK/shZoRHfArqMtPWUGBHjsVRBN +jRiAefGFGWdXdoAlz3Su0EEC0mvKJgZSqCD5pWPrILML1mzZXd36iQPrPy6d +LZw6AHXzixW5fe04hx+jrTAigLnyTnNSzwD8Xr99ybsPbTDaxB63P0JAxdeb +Z5N52KC1WYSZJdsGXWv543/j9W8mU189nWkwmrDy0q43LbBIaJFNZzIHnp3e +ENC/iw0y91We839uAfclt6XFThAQew7C5wyzobbU8Nl2aIQb+e5pMng9XDbE +aD2dgBfRh7Jc3T/C5vVZFDsBXOfdnTYWA0yo1r+mW3uiEI7dP2GiJMyGeZVD ++8l1Xn7+IryOFNHIGXK9e1ezH/m77+1PNOHfRfpDeyTJ3931uVWKdyEbircs +CxPltiIJxcGE38ewD6ldHEHW80xFKgnXg+acrbtP1nNLsUeHm8eFr6wVxu5v +HqOTwXpzb0fSYX7YY4I8r5uJazw+L7Io7bT/c14FPX4STwkkJ4XxRLccBAgS +T5r5oRVkX3ISq2NwX9B204w8si/PWhQ7SJxT+eu+VHxoQ1rrvSdJnG+sMWWQ +/boR+2YF7hdqy/rRTPaL1qt7gez7hxzTGfXoDqTfd7KP7LtM/LVokie88ZOB +mCdIvN3fiuRJU0eKFsmrquXsEMwrdEj3hBjJK6mKvU0kby3oKZOYt0hCrIVO +8pbXQuEbyU+3QRkFzE9kY72vnORnvmjJc5L/0wKPKzH/0epAtWSS//XmwbNJ +nrvMpKRgnqP4/viVJM/Xybh9cNw0AE/PBNuoVHZCgtNxdBx/Hz34er9VTzPs +Cbz22tGTBnXKYesaKjjglDU732qkDS559R5g0Xrhe2qM5pFaDlzeILVie24X +bPvo9nZ3FRWG+OQE8ho44Hn1wXTZiwHYXnQgRCW4HU6VVNWHHCKANc4n+Gaw +B+RWH1eXsMN+O3Bx2tNyDgi/MW1uucaGJIWdBwVymyHs+bpNHqYE1LJE9OOH +ORCbb7T1RH4FHK198VROhoCY6shgs9V0GEkUuHWC2QQf1D40Ct7kwJdfwkd2 +4pwQLhlUmB5eCm+S98es3cGGtK4v2xZIsMDQMWHue9Xn6N6eszK2YwOw7qWt +yM8tbGBWSecl7W9FH0zVXM8fJ8B246ihYDgbkkXXe9450YwSVS/tS8T1zPDd +Pjo/YQDETg7f7p1oRwTH6lUR5omhNR/P9TcDMJI9XWZo2o5CjkZrHTQmoC6H +YZE8NACzH/Qp3rjRhspDeLT1jxJw9qg+b2lGL8SKp21uTmlHtfE9A6ZFHFAQ +VT6VcmYA5qdpyqt87ECb2ludX+4n4IzQfqMbOC/req8TCj/fgbqEa5hBhgTk +cM9svvuxExYKHjDUjepGlDcitvEY/+9HT13n1RiAkh8njc39OhHB+1i8CfOn +banjEY19AyB7s7zZ16gTWTJ/Kvdjvu0rWriV8aIV/PdqmEVW9CE4tCR6ezUH +gJ/BzVIcAKvAwcWbnnQiSZuIXBbmSfZ5jgn/yybQFVQ74dtIQ9bnAp0kEQcM +vcZONcoMwEP1zBUZ9Z0wnLrFTRx/D8030/s34n0uKJboN+NcYi9bOBevyz+a +PX5YhQMJye2nZX5+QqvmuCy5Sd4v45B9ZN+jHy3Txn1HC9wP/+l7uVqCLbm/ +80a5ZXh/pBUq5Uzu/7MmoYrks/uA3HXMZ/QzoLiQ5LP0gopU8nd3prA/4t9F +PhU/88nfLTv1wqh7/QCYcztjz/Z2glHL57wKnf9/3eyfdfR3/Sy97U+dMQmu +JrhOsF8psJSs89xp3d2k/vglhr30ePMYzj1/IUDqj/jpPqIDBqHCeq54pfRj +dNMKVgriXD6nTcdMiz0I624rDi7wawOeTputhpXtEPwpbSfJT4Nt/WcrVJ8D +dV+CLMnPRxbn9Pers4DxrVfWuTYTgjaGS+7vH8B6HzqxI/cTJE5n/O4ppMPZ +UxXl2dkcaJVbIXa7swncvWNNDKk0+HjgltlwHsaxsuxi+2grvF86pan4sQ+U +1A7EPCzhQMFH7ex3m9vhmp6xeTmrF/pRrEcp1ge/lk43/pNsqJTWcsqMb4Fv +0q4puw4Q8PZBuqK8IRtYMRKZm1tbQOOgvg0T62fB7tfXn+2jgu4hAb7VdhRo +YQbE337HgSWuRxZky7EhUedrsb9FKyx3qEgKM8G544xEbuzMABjssBQY39kG +Mf66F1KxPrCNBaTu4/WlcV2Ox060QefV0d7XmJ/8Sm6TV1eyoTXz11zrbe1g +cPL6ZSuCDk3L0i5rV/XDj5CsBIHiPsx3hczy7j5Ybh+RSe6vvClQAe+PUstK +/uw/XKE9n6wn5bVDNa4HnVVVTCTrCVMLmlirxoaL+U8lcta0on7ZzKlruL/r +HBzfvBdlQxGHz9TySSt6MD537gOsA34fy3Zf52cDZUmo/ObpVnQt5tznJXid +/VFhP4kDR/qYLMYBubSzkkkcKIKPXEg82XUiARhPtPK2YBKJ5z2rzfIkntrf +X7/FeKJai2eWJJ53eatzyL58CojVw31BFX3tV8m+/KuP6G8fy0JYImTfHzzh +Ncd9R7w1pifIvl9d/2GU5EkI13hObyEdLTzi84bkSQFEiCnT62Fu1H05Rw86 +JO79WF/4lAOPzwrJZnHbYH1GGYe2vA8MPxwJW4F/N7iqdq+SUzNcmIA5089p +sC3zwnPjfA5o1d3wSDnCBmeb0eH+ghbQfR1//zLWw3UZ4NvS3gWCOubntjVQ +oS72taEtxiFMuOxyiBQbGMYq+728WsG1TsSzB+vtQ/psjeH5bBhWLu4L4bZC +1dqsDCbG83rvRt5ds3uBurb386BlB/TFDqy4XsoBL4vQ5ou4vxFhSKvtcBvS +Lj1uFadPwKOM/olLS9igPuwgfW64DT2bfzVyySwCnB6eicjF87HMS5fPfXMv +On9+rK1yGQ02hlS4npVnQ8REZPTBg62oITVzUxv2G/GGoi1Oq3vh9rtt43za +HWjCnxLCfcWB2uQa900WbBC86eEjE9KCZNxcXz3FOhy854KWIsbBll43WFDY +guSUXR2DMQ5vk29pCO9jwwuB1T0HWS0ozy46Mx/zUIpw2fogtR0W1od+dAzr +RR8jfETqcY4IsLqMykca4adPo9CilXTU4fP1XlcuB/Qa63/+lmSD9Y9fZU8T +2tHB2t/EPHzvba3mXPTGeOq77ji3Qa4TzdugZ3tTgQ4FPL94Z/D3c7Mqs/H3 +UHFnLv0/voe/3/8LH/iLj6zBb1W1xWxwV585cnB3F8TFHTOY6qfBzN6Ab7zd +AxClw53cSqFA7dPtqnIRNPhc3+hM3sefcs8y8X1EFrm708n72PI92OzwSxbU +rLDb+VyLDnuCj+1umeiD2jmhEuK2/XCAu5sld5WGNps0cr1z+mBv2PIt5Pq3 +se1UvA5nbq3pI9f/dR/h731kLeTVIe8jTX7LGnwf4bzy+hHyPka1JG0k9eSH +kpkB1hMUJ3qe+A89QX/15KTyfRth7J+vOO6Mybdqgy2/D7mQf8c1GhhaOmcd +Gzzf1laNBLWiDopW2BXsP0VmrZFywn52V3tA1XQVXh+Jey2Hc/S6EaX8Z7PZ +kFPH83vvvDbE698duxd/v2mco+DAy4bGDk3R4xJtsMhCesgC822q+E7DWbw+ +rfdQX1miDTX9eqpsi9eH1vwM+zLWDqsum/ZeO9ALnR+/3w4r44BGjK1F7uke +sFSVXxC7vBN+PTUMjcTrkSOtewJw/WVbFXq0TreBxILPxkraBKTdnDC4uYYN +tw612EmHt6LOzF/aBbie6zMvZxP43nUAzaUW++30R8GNBMbNy1PwXt9qNkhl +b7j/6Fg7dBSPzDQ006G47fbxLwJsyHp9S+ISqxUW3hH7Mgef98tTndOqc9gQ +pL/rkFdEG2IHbTh6V4EA5XNRmkYYZ3dP3ZNZaa3wTeV2iTHe/4vH1E3LvV0Q +8SzKr+VoN7LN+rGxEfvMhLeSz5yL28DcVyQsQ70PFW9bKJaM77vn1uFIqwMs +OHZD2V5hUTy43Rh/XIV9+ZZfQcEnsM/3HTmWffEdE/Z/9bK9OEEH2tXFnn4e +BFxg9u+U92DAjQXq7zqc6LAw2ih6VIYLEgfHrbZSMsBolbTLThsCAmi/5xau +48IVrXvsoLBMcLUa9h1wxPnirNh7IREuBA+qwnf3LPC2/iU/5kmA+y2lgm4+ +nO/r9jvfC8kGFzXHu3rh2If0pr1ZwuGAzTxPLfb9pzDwsDUiKI8Ay/Lt/WlY +R6fO6j+LVM2B6l12VkuGCBgRLFEuceJA4hF/q+sLckAqOdOQdowBFmiOmxeV +DR57GHZVrY8h9MpqbbvlTPA/tdPmYzv2+TUSdjb56TBz8snVZ4dYkHuG58zC +bUxIiZw/08H/EpUuOPu2PAfnurLdXppKDKi8FRih+O45Yr5/1BDlz4Ed8wc8 +SHy8NiupYXzQVIHQH3wM7keofnOlgXa9gLx1BRNpamgXaH+lQ4Pehnfd1gTo +Bl2eWKibAxKR5278WsuFT6wprSltJui1qG7M2ZaPPK3vOnVksmFpzPS30Lw+ +OLyxO6pShgWeb0706M0joGufjlzPChpIK2mu0/rGRN+sNTTS5xPAof8s/GZB +hXmcjeWDbzrBv22R/oA09lVzogl3rFvyo2PSm78y4HFBwbrkbDrsGrhZLphP +hR0B024nqOVATYj3nOs7BMI3A+jiB5nw4uMmFnyiI6OK2EU+m+mQWRfhbI/9 +43PPy8dU4hmIbtRAe5tEhy9yUhrHmqigotYRP8unHe2ogmGlYC6spP1Tz27u +n3rQi//Vs3r4rVXTfCrwLp663rmiCxmv1rlP4PX5kU9KcgupUNI41FO6sR1M +/DgJXfe58Iy6nxu0G+N5OrjwK4eJCJ+vr/ZgPM3Swx4fiKSB5ey9l9kFTCRY +RBixBugQOvPJmyLOgJKA81qx3wk4dMYsZZs+HXT7D8teTGOArqaM4afbeM7d +23HgEz7XnWePGp4606His7yeo2cL3NIoVLg8w4YRls8ffO748LpjfFDhqYg/ ++HT4esXVlDNhwxttxo9AjM8u4Sj6AA34wvOqFnVSYc+CT3PYom3I+ZsJbGrk +gr2ll9L0WwoY+SUySzZSYN11etehbxy4Hu2YLlhOgZCDdx7vVqWgWFmFcxJj +HPgoduMSRYkCaa+q78VVUeDkiDW74QsHVp1TPj63lgKW8T5u74gu8HerSpqe +zYWHK/wjK45RwIf35iufDxToEOSz+83mQLIMz4WBy3TIzb+6VXMFExoOZm77 +VE4HtkncCndvOtwU0w6VEWKiktfntiS9p0OypYpDgg4dqtW8l/auY6KHPeoV +qmw6MOy3RXjYUOFWaY08Q6kTyYzQW8Z0uCAlu7RuS1QfnLky8/HEZhbq8Mh/ ++VWIgAVvn//BwWa6lsQBBuSP/8FB1KZ55tc97Cv7LtyT3cKCIwGmB0Tw94n6 +d2ZSvGgQml3+wxgxoVzphtnzL3QwfDbUK3ubBrpxX1MvFjJhelQ8NfMzHb6/ +Os7QjqaC9jslxTc7O2CX78vvUxe5ICZ1bgdlmAnfdji+LM2nI4VSQ31/PxrQ +vKeFhZfR4Ylyxq9JVSYKDs3tj/yJ+fBdT1D7IgVY0/6pneUUtNMrfc0EgwNP +d+7mqz9KgWz1NNO2jxQURis+eB/j+WiX5aEnllRQXJ0aJrG9E4aG8iztdLlQ +XqAQeTmNCqNI88b6mg4Ubq/0rceQC1s63he+DKeCjnqn88enHegJT9G5vuNc +2DGyQibJjgrLJoXvPhWpRepGsnmc1UNw5NKuVDL/H77WlzBPrBHZClFcBXMH +wVicw2eD53a6JC3mCNaBhaPrFygKEHDzf+cy/OdcYBD2z7nyPD6UlNgTsFX6 +Soz0EQY8XdF26Aa+743SAz+PtjLhxLV+Yzs3Ohg5hb05yKTBdg+e/jDTblDh +Si2p73NH7hvTrPWfD0HRreTfjYJUaGHHlngbd8HOx466uaJcMP9Ur8Pw7oOM +C2Oeb7eyYESqVsh2OQGVx1v51t+ngqVkvoRgZQdM7HodLHSQC3Vt/+Cg+A8O +sID3HxzS3w+etU4jYGb24hwartN176aSBkc60P+3XvPPOjr3v3XnxGJ76ygm +RPW1X+c7ng689DS5Y15sWPuJ4hf7iAEi2VNlPleyYb3D48GP2zhgn62Sd0CR +C18Gvu6y3RmLvh0w4/c8hef1vKj7n+W4oJrdPq2/OB7t9c96M+ZAwGlWoQVF +gguUsIeL01YkItux8yKrXAngkRXUtVrGhVLplWs4+sload8z+oFbBKxIaXAw +mOGARaH0NNcxFb2vKnb9eZ8A/ZtQJNfNgTeO+R/y3dJQgdxanqkmPK9jT+co +JHNA+u7Uu29b0lCK79bFMRsZ8Kze6br+eg6Mf7823b8zET08/5Nf7gMDyt69 +TVisyQbqRCblZlYE2lD+3TOeYMIil7k69p39kPaEcjmnIBRp2X9OFj7dD0nJ +a3/ISzDgR8OOyohxArntv3iVi3UvWU21dvgdBVTztnn8oHWhbxkVddpzudBo +InpvywkqZAS8feCnWQt+Ej2eQWuGYOB/90v9n/uF9P53vx74yMj259PhQkhS +sMokAyXzV4y8fUyHmG/3ur8JU8EiP+Tmh7AuCLfX/GqL9/9se/M9zxQF6kzV +xVzCu6D6WMZV54VcOPPYJzaQoEBT4GW9PbFdqDIreSJGGM/BKwOXq6upYO0n +oEU3bEeX2k0qLKO5oC18O0AL6/wFmQWx9flMpDPG2rqTQ4dswURhK7yec5Nw +ZOQz4Sm1cOksvK51/ehnCicCPNWRjfpHFto+f5tWxIUBmDk/UyHP0w/LYiU7 +R9poqECENnvnbBq83vK2ZPdJfB9vVJVuzO6Et5u1597exIWhT+IeDgV9OKeo +iO+RZaHjq9IlXfkJ2PFNU1/+RR8MTOSWjMqwkKSXa1LdXAIG/ld/te+f+iH4 +f/VvTW241fKJBXLbggbdV9DhkqGM5cAsGuh4zZ60xnOhOed8ac52CtzrmdM+ +jvVfev/Kq85GDMj8EjDPI7QBPQuwjDTTYcOBD3daUrdxsQ8QfmLkG4MildyO +N5oT8KB2UVq6HgsKE14/CKu5j5rnMxaE9Q2ATdPKMeMzDNhy7c1UfdMzNCEV +d37IkgO8iuW7VtdQ4OXSl9nCcymIKlnvJPeLAxPXByUXpNFBKP6Dxl0eJhhx +f4bOwf1GxuPLOXUEdKY/ruRLy4Fva7wLVZs5kDKUP9yF19tbXosmJOQgbX3p +Tfvx+t1z517TsM9Ryxh94bg7B3W6qw9NY5/Duii0Of0BAS4GNWvUfj9H0eX3 +2clDHBBKDDp8Fa8v6zoz5syTB8f9aNEv8HrLlX/wkX36Bx8k2fcPPntOdsYK +mmM8zoqH7v3VDeMrj51cXNAD+jmevy3jB4H2M/wq/VAdGFf4zzcnusFbovQV +6zABIc+KaakfciFf/NvhfOxfky0mss/gObXDfdEPbmwruiV+ej6bzYVae2Nh +9RIGeOTtu7buJoEYhnYPgkXp8Ewvan3PCQbAWxFRzyYCfXG4+EBCEfuq//mr +xH/8FfL9n786ZJX3lGLTD4ISfsOrD9Eg75mC0dQczNcLcdyDi7vhOFrCc7+v +CWmHW49vMxmE6kOhV20XcsDppfPqRybt4FhjHbfVmwaS9n7C5SdYECRg4/N9 +y33okPyWlN84AIUzApy6ESZMygoV9/c8RQmqwqZzcV6dP+MtssycCuvfqo+e +/NCJbnUIlMmu58JVNbPzhW8H4abmz7pex0pghOfF7JbvBeX31BXqviy48X7U +LiTuARy7YrV3+xOcS3edSxtd1YLuNV+KilrJRZr11KLL+D6ca2EnxX+mQkyR +6FPK2kbQFI+s5M0YhFunLxRG0llgscjpiJUkHTY0p0k3lPTBF8uv09+3c4EZ +lh/VNhYIK5Y/veCH8877S+cMRDGfv3vwqdx6HwibVP2+L7IiIPVanEsCvn9m +x1ztg/OCYeJsNlPiLNZPu9QcVUnsdzZl0j+234Egs/YfWlfwffzNSpmN9TnI +59FnK5kw8KinpCzG/k6Ksfuy3jQHTiw8v39G9S5ke7jte/iYgDfpS5+bt3Pg +cNzMpY6FEbBca9WlbX0ErB3zmCgJ44Bby+lN7zvvwrhcjkczMGCNrrDCMz4O +LDppbMjfEQIPfJsNno8zoLX1ku2GWWzQsz28PL3hJnyt3RvquJEFK/x3Wl+J +7Ien8al9jJmbsFiSukAypx/meL5YcLKWCmNJUfFVki1I+ntob+XWQdAcfqPp +/hr7QoODW3J2U1DAQYWuz6McODa2cU1JTR/kMfd6h0qxkNJnsWBjPgJaWaN3 +eK5RQPthkZxGCQV6KSPvzxIcyMk4EGM8RgP7Q5WvrT2YcLPFTz2qhQ7bvmhl +vP9Og81XT/k9dGaix4mHZTa10eEdf86oEvQBsTAucPQAC62v9PzgQP5d0KX5 +qTGyNHjKSbyrMslE6/y6v56bosPe89saK/dgHz7uUK85gP3vpBvvaZwTf80Y +O7S+pEJz7Mt3P452gJKJme1lay5oGsaflKFjnuT2Wc8Ka0NFzIaTewu5APvk +QyMe0eDggrsh8Aj7sdN1RaMMOqxrKflxP5wCZ5H/74WRFPQx5LnW1AAHFFoH +lpI4hK+wIXGAcsq1UBIH9ni9Hfm7/pV8n/DvIrNurjX5u/c8nIgXXAqIRNQd +VS94j3zMFmka3hoC55Mbbi05Q4WnzMWp6083IHcjZYv21kGIP7nhQuLePuDs +t+ZKG7BgaM2WA1cxDo+0i4K982nAmxEwXpXGhMijficMaXTYMbnJ23M1AS8q +Gjc8y2UAV585NhRGh4LjLxPvBTAhKEheRQjjZRm6/8fKYhoIl3mtFPnEAMOI +ILMt1wl4Mue+6pK5dHh01bvnFT6vqv5mpRPjr2BPQXz9qsEhqDksvFNgvBeu +rnXYLefAQluG7/bcWUKAxeroIwfk8Jw6LFaZbtQF52WFrnoIcaHvtIr5H5wP +rT2BcYbUfDNzEufg5BIHss743GBlXCfq/h7/naxT6Fb4ZYVDBPBnPa91jca+ +6cxmTrQ7HSISMy8Pb2TC+Uzl8FONsUB7tnF/Vwcbfubmabw5zIDmNlONaYc0 +ODkj8SvEhwNBstfKjuB7fcQqvmddQQBKS9+TH2BGgGloYIvkVi7kb9nffMMz +CHnrPDb/aENAdzDXrYn8O5mp398ivW4jYW2fb7OdCDhb5sVctoYL2x+oNZnm +h6A9+YU5s30IiO4TvxGM/YJSFG/1loXh6NqpTx5L7uH8Gc1Q8MJzoOh5mkti +8l20/Jr0yN1iAj4s7kjne8eBcNGydcrbI1DRuTS72z8IsGdXBDw8y4GXnTu3 +2FjdRcLvVQreX2JA/yeJpdxSNlTKU6pWbbqNlu6U8UgyZEJxZVeaTugAOD99 +2tJp64+WC/wMM3nMgsiHjxfJRhHwQ7s24JMNA4X6PEjWO4P7npAVQPK5UCci +HPMZrpacfkXymW6/rYzkIWU64QrmIXRvmNlD8pAnWmfG+BgV+E+XvmvKaoCQ +jtFlnzAPnVMdcqj1mJ8ZO1aeL29HPaYfzRZ4c+HDu7xX5HrOKrvFeB3O3CZO +kutI9FXN3k908Mrlj9MYZIDavKnUdyl0kFKPVSB5whh17cU8Qf3vBXxJnli+ +73/ks5QKWjHNo9mhXcj62A4XHezTUPHIVfcFDHC7sihHeSED3KWf5RXq0sGn +b1yQPO9YUMgNfF5gTm7NIM/7L/6gv/xx1RAJq+nGPKQ9lCiY1Y7eVCkLxaRi +fe9YsGpagwaT3j8ZBUNMVPUt2m4z1o3o43aR58WosEpXIenArS5w4anqnDeP +C05rLuWbXaHBYhvhjMAPTPhomHhwxRAdtq7L6yLvy4JZprdNx1+hLHXPGvK+ +DPWEGyfkYD16mT7xopuOsgZv1Khk0sCzf+MRUleD1nXLYF2F1oaaVlJXG+bV +XKe96QPhE8ImzA0sOGla0bV4DgGZ73qk42/huSmy7NKNfZ1onL8sc0aFCwWF +hZcemfRBQhrxIWQvC5nIB238KkhA1Lwv7NyrFPgaoqIuWEgB9tovI4dwfux3 +3m78cZACK00CMwOYXSB8vogmiv2V97akc7SFVPg2bMsfFdcF/ZOzcxbwc4Ha +PLbKDfuQjXMUDQfPt4PGxpCvAbe5UKy18WlhChX+P46uO57K9w1npNKwSlkl +qyQlssetKISWIpUoZGRklBTJVvYmW0jIHhl5bJI9zrDPOdbhHJGGFH7v9/fv +9Xk+z/s897ju63rPOeTu6a4+uYBHCuoRS/suLsAbbbWKc89HwC/N3CalegRd +cpmkX8Cee/y4h6VSxwjETHwoSZIagcimuE5ZrE+Kt2lvyviOgkrQD48blwiw +7Pgs+az8AlDbOm8Gp4zCLcFm+y94POQpjba8ubQABNvFSE7fcZhkjN17+kQH ++pN7+Uda/SJE98zJVl6bBaeXlnvZ/waC+rmWJ4X0WeC5mHVKcXMaeN0P/l7h +jYLAROE3HKLzIG4ZT3nNMA0pz7OkzFjewofDKdrnfs0DP1koJfgUBaSYz07X +0zKAJBek2BdHBZmCvn8HMb92J8fZY9ufILSRK2R6H9ORaMtIXgbza792/sth +ZwhGama4e4yPyLBdyDFRXHAB7vELO3BphqKIOCXX7e5k4ORZTcNh9d4bJMre +XhSOijzP7jENI0Nh19DXvWtUyEr7+Ok0QyRq5zvg+rmYDKKW6e1Hu6nQNXL7 +H0NjJLJk39mbvUgG/PWvgoqeVLj0wS+jXCUS1UaMDFAMMT/dmV9cR5oHB+XW +oqyAELQr4RBpXWAaXO2CXhl8mYMrbMcOvc3wQ0fy2wMwUwkDf0UTGjhnYY3y +J7TnaBAy3aORd/nEHJgbba4cGKdA2PMVv12v3qJ9f214JLmo4O48ElIeOAmz +ufuRgfwM5ue6On13kUGdaWaPDdaXssPXWZPUp8H58LVpn2YSxCu1CQWzUuCL +dlnQtXuZUH+2zORmCRVqNvbKtNdj+vzBAYOC+9lImiLm92qWCmcbmI3SsfVj +vvv3b7+RiTaNgxj0sfVf7twUtbMcBcvqPbk+JQRk8TtPjiy2ALoXUnG12D5t +Qctwxy4b3IyFqV7YPpsJHKFrT0bBSuKPmlB1L3o2UKyT8HURcq6mcLW2jYBI +6VmvhydHkP72lwPZq1SgSZx/Jps3Cq/WjF9Ri/Hgn75NeusK5kNfvGH8714P +xtz2YPdC2meXF/+712vBE7f+W/+jNi8AW4/kdZgV/1t/ROsGvu06FZg/7lC9 +LTcCnpYFRW57xsHbmn3EcALTVzuXQjk8h+AD07Pwl7QFeCJ+tC4Pw8d6HQJZ +jg3B1FXimfR/mA5JU1LHYfV8nnlOco90IJrh2yedjNWz85N8qp0qGbJi6qXv +huWhImOtWi/VBXCce2T04xUZXHK7y9fL30MMfjix6z9e7W9N/Ifh61tBJw8V +vkc7tBm2/sMrjXWrP2J+6pbEgoce0zS8vTaXr1tEAs2xW/avRkch+faHhTCh +IbRe+aLi4uYC2Ege8/mPh40Q7QPGw+hCfOz/efj3vcAtiTuYH9nhOaGBJyN6 +k/TZU8dJsP2A7yNrQxIoPUm8ICE/jYLiNXtKP5PA8kwC2TxxFP7GLwLL8X4E +cWM+9yIXISmkrL4J87nh/NrmvT0ESHly3+Uzpqezbm3J+GF9d2BM+IjVgREU +qO7uljVPhD+7H1VFsM9D7H6vYUpSD+L7uzu49T0FTk39vvryzAxsb5yqVtOL +gMfdhnaP1+bga/fPxV8b0/Dz5zPvsM9RqCP2/tGTGA8ETAeNvnmA3ZdJeHQB +EeDAwBFfZcyPDI5a4f/Dr32+s4zhaLz9lNd/eD8H6cfgygiYeyUzxw8QUW/n +DrWNTSq4HTiWmfZzEYSsdrKoOjTCwuKt5CjyOCR73L7bjvWXdvTWObEDQdDK +9JRVB+uvoIaaZlf8DIRLi9WrsZMQw2qoqM+/SdhY4+Jl156DfQ33vtclTgKz +RZnpvxcTUHQ3Zh7iR8F4R7gv04l+yI90N0/A4nYvo872s/AsiOzJyeXATYGh +Fh9fTPYkjHks6FCTZiH9T2xp9cMpbPQnXqcqTcJp+/7Hkpok2JzyE/Xs6oPS +6+Z8dolUkJcOOuO7NQVubbtHmPr6YbvYZKFvEhV2CrvLvCmYgjkvHQlW+gDs +z+bTWk2lwmqSMs+W1hTc0SzfzyIyBJpG324ZZlGhINi9hZg8CV9XHWWuuwxD +8LOPr20LqBBpPnC6330Cahwrq0VxOBioqRacqqLCyyr8/TaRcQDKsJqrJgFm +7I6s9rdRYWQkJpAxcxT2Kf3r4qgkwr3UfodyPBWIzfcUredH4bjVU71rTrPw +gLs+z303GQ6UFXClm+EgQOOep/PPObAcYtdLxuZmudMfZkJkLzBbJgadUKZC +uSCvSf8OMrztyvmZ1NEAIx5sHaVcC6B9MrRnhR3Tb5qHNzhJvvCdK9/rs9kC +fLy9dEgY06nNxXyhZmfrkEu4+aFn/AtgNKOxRD5OhhsunEtRVl3oKO/rjpJb +VKj7RBRwkCbD/k1ii0ANpr/mfBaeVHcDfuhvkWssFe7+y9Ma9CbBZ49eC9aP +vfDJ4vsSwuaLfszzmn/KJFBsmk/avtQHjcc4Tz3C8mJ6RGwqcnoKvv8x2Xop +OgBOXjpJhlj8Naw//C7HdIjtnRHU4jEIlTkpbwZyqMDzNeTx1MgkZIbsYIlY +GoL8H3sy35VTIebF4tUdIRMgfvd0rJA9Dg7/7bAN/UKFi5+irK/tGofVHfDg +OBkPO2xds51nqODwPECO6TURbhdX7a9TnIP3k0sF75ZI4PCTGe/CPwAnZepu +KczMw4HXjdx6qyTYoKlKcXA0g9Zb59PLjAuwcdqrkcBMhki5rjxbVw8oumw1 +52OO+ew9j2IdeLB4no91apxrQGrTPx/FbluA7XqeP5JOkMH3LWHua3AfctFq +1Vj8Mw/co5kn6uXI0PvVVVFSnAwqf1q/uHh+AYNfz2l5EVSors9R+7NBgvXU +kfE2w68QxpN2OwfDf8pHyLq3k0D1isdbXftuEJ0rf1AcSYUwk4a4Oz7YnIqv +4Hrf1Av/bnb9rojB6vZ31ilxIRI0yMjzn9HqB2/npeNjWP0/8Bc2Yc+aAr5J +0jOF3gGISv2ya+UDlscn9buPrk/CG/P3tXFOQzDv+i+LvYUKYgKFx2xuTUBr ++Fml8m04uPTbUHYHputyzn3UV0gbA0OzxNUjp/Eg8UczWlsCi8fTtQKLrHEo +Tywp6uCdBVcajwZqIQHFYkBa8vAwCOie/CZqOQ8euhL8dX0kGLnw0LqV3Aon +s949laJSof9EmGHeLxJcuvGd+8asIUjeNM02wuKcdHLQk4kXm8tJh/pdCC3I +NFJH9T2mI6Y/eZ75dAbTD4NOwvbvB5HANf2BqPvzsDH0QdkTMD3jdVjyQAjm +L5dyDx/83QKTPGORjsFUYD+YieN5TAbNiM5Wtfg2UIjcmeD3mgqf/81Y7dUl +Q6f7rWfxrzpAwt9B4dd/v8816chWxnyhGqN2IfNWJ2SpHGA8HYTVWxBrhQt2 +j+qXV5hUXnWDiYnSOc43VNC9z/268CEJbvNGVWg+6APe8fN6mtFUmCrenPBr +m4ITm2EGxEsD8PH+QU2HfCqc3NH87ULuJFyshEZx/SEgdrqVuk5jeX/uq/9N +aBz0/H5XBqcOA+Hg5SHPu5h/E7kUKT9PAMN1uayreXPg7ipmzhlNgtbbrPkq +N79Az42A+69rqUA1m/T7+o0EbAc18LtveqPaHTW80cYLkM7cgqqOYT43kbpL +N7wTGazmMhLsqODhyfZt4jwZrrDsMuscw6Pmusz0GLM5CP51IC75Mhl+7q50 +DJ0iwxkt3K/UAw3w9q2nqVQAFX7c97bbPUiGb0dR2GH7RvBMi+Xj9KEC+ULp +fd8GMpyXXnDi3tMMOkczOCQxnZew1bVank2GF4GjO+f2tAJr2iXJDDcqvHfb +INhifvSbks5j+/h24A80OnjIGau3SzWVvApkaMj2pRjMd0I8F7d1lQMVFN4f +IpZhc1ji/gn/CONe8HYXC8G7UIGVNcx9sWsKtL26KqMKB+DrwJdX6hhfPZy9 +wSNpOg57f4c0vLHAgbyo7Puz2Fzmyh2/OFs1BHpLdicizw7AathmudYUDVp2 +ta4wWI+B+lI2RYw4C3nbx3LrDEjwJDVWXIynB/qqd8Sl61IBvU/9+PcQGYYM +RLeML8ajpZtPX71VWgAF/A/6iWuYTm7WqctL6UffBv/sj82bhzY+n5vOmE9n +CMe7J34YR/47daWfx8zAfEmn+KgFGeIzyu84HqWARpG6d+BABVyJ1ezM8aZC +5tOxzChBCtzwLyqIbqiCQ4Y3WB++oELKorWG/BEKHJPUcIoQrgH1t1lkdiwO +Brw6F8L4KSBvx2SLl/oMVKaa1g4rKgzXudv6cFNg0lYUl5XRAB9J1s8uYXxf +yHozMn0HBZ4Kaf8w92oG+4dcmU3nqXDeYNnuBIkMVdTavzm97eC6wdf8QATT +mc8zQjaekUGPdVzzE7kH/hx7f/oF5jvw4tkJNbokmKXsEFjhwAFbXtLOjrB5 +OHSp78aTmnEICrB192XD8m+ievEebgZwT3M4hQ5OwdWqvet3tafhXXTGyw89 +ZLDFf6rNVhqGQt0yHmrTHGjqRpygpJJh0xl3mJU7CzH4vfbJZMB8yQL+l/db +Mkj8WGYSHSCg7zumakpos3BqJcz9eDgZUjbUS1m+ktEFrpKfzYJkeCQyIp7h +RYZS0Q+STy5RAJ8XUHyePQc+9uRohr7E9ID204A71yng0S7tt8GdCxH7R/fW +PqXCM122cTsTCojdbshqyswDYY2d0u2PqEDYf43lqj2G40oLGn9/hKehW+b0 +O1Qw+dKmWuJHAfbGVJnH2iXQpWLxar8mxvMV7TQypu8u39xhvFBQDpZrjeYv +D1Ohu/kZfw7mU27fuqLryl0DfvcTlj5PzoPFvQyjztPTYPB150W9okZwCkqP +++wwDypR/vqaH6fhR+Cz8nslX6DK59pHvog5SIckYVnbGXB9txj7CuOZkb/l +y7+/z4B5DUHmzegMmKqepd3LxMMtnxNM+09Mw7N9UdaHBUiwtvmp6IoBBRLi +jQ3vUslgJpNpd/VTCZq5+XQ19iPmzwJO1Tz+TQbBnQ1nhlkpqEey9uafJBK8 +m3PIUcZ8C3uQP2++2xy6Oqb49m88DhS/fJ8Kisd0y7u5ufc7iaDIOP9zqyoJ +qQxZeO9+TIfg6GKVkt1EOFS7snFjNAUpmPfcm3Kgg15q0INHbEQwbjzj3H4q +HTWwr8U+sqfDhYvSFhz7iSDnEL/h8TEDSUZFzEU+ogMjTwhujQfT0Xm3syJe +vkNvX+k3iNvQId92cWfmUSKUad7V1mrKRq25xbrLlnSwm+imdEoQofoPMby5 +MBdpUAXdXO/ToeZWS46ZIhHozgoWHHkFCFT6y2i36ZCBY2H7okMER/O3S3S9 +EtTx9iBx4yod+qdOM73RIsJ1Y+NyvYBKtO9EwaELGnQIy2FKqBIiwESl/TGN +qAZ0SrS8IucWHXSzOXRt+fHwLNxRQWbbJ6Qx0EoJKKZDwoDScbV0AvS8Ovhd +QboVSa97aSfuo8NhCYHvh1aHILZJOdBmsx+xTbuGck/QoNR67fAhhxLYCI9p +yCgdQ5sGsj6bfjQYzXT6MkkkQGKX4T1v73y0t3VyyASL88gHjPmGCaCbXG6S +FPcR0f4elrrsSIdvFja3HvUSQGj/u3ZPxmLEoa1KY8DiLxcuX+zXToBmezrP +kHMJCvKqNX9oRwe3/k88b+sIMEZiSDp0qgy9C0oPf2BLh1Rq+NexAgKc0wn3 +9rhcgaAz7duwFR1mffnMBmIIcPVrSIXkvyqk+i1bONWCDto5Z+d22RPgKF9e +6z63WnQ1ueVdtRkdkDpbUJYwAfie2RmWcjSgVhfRXPpdOrBdFTgeFYLVa9dU +kItiM4pX2uo/Z0KHOFcHwVo7HBC2Rpn8vreh90/pcd3Yed7wMzw+oD0MRwwZ +eLz6O1H9drJxM3Z+f97tdBa+QZBo6Tks79iPHvI+b5a7QIcb0hGR/eydMK54 +UVWPFY9YlncpuQjRQVqOO/sL4RX82yO0Wn1xFC3E7+N3/k6DnYJXJm6GESDB +y0ZI3bQcid4qkZnA4gzrD9V2vySAmzg+wmKiAqUm6mj9xuLMfVp7/KENAQ4d +uHJK9m0VSrsuHTCDxVny5tXN0ssEEBXyVzycWY28LvQ8S8fqXGaAw0xHggAn +R85obLLWoe4/9r2C2PkN58XY59fxIPDYI8ZppR6FinLds8Tu2yT/NfxRJR5+ +0nKO3VFrRC6CXvY+1nQ4/f1j+NNreBDczHln97gZqVziPNTxkA7GgQWTbZU4 +KP6r1L9fsg1lBklIs2P4dlP/wpttGN8a0woy33xBaxO5dwhYHhmvTETbmg5B +IowyuUd0o4b4hQ0c1nfH83T69W4MAIOWxNUkjX5kwyapaYzhi+UG1yQmu2HH +6cTyctshZLK35xkVyzvn9+FPR082wamc4erDUXhk73JYdRR7bv8xtFKv5g1/ +r7Exs0US0MuhOapgCB3Ocn8bMRQnQMTT7TovymuQ6sBvI28nrB4SM7epsmLx +kaEuLcTVobC+lfhOLP4aIkK3LCh4+F5/0VizoR71LNxO/ovFv7tKPYKehwfx +K2/D29oaUJbz42ERDD/hzmIs7owHTUs/+7QDTahH16CFD8vLhMpC8EcBPLTo +qrqqdjcjwsFXvkexvBzJFLK3yMeByNILy1hcK/L+EUzTx/ISLsVx5+5eHEwV +qnWqanQg97Wf6ctYHHZaqaucOT0MQlfU14jCX9GrL9x1Qdh6+w6Gf6+VB+Cv +mq3hAZl+VBigXZuM3YvdPMTfN6oXdtQ5GAaYDyJWnUNFDE/osOzAwNv6pgNU +phP9M98PI/7a2Yt8L+gQfZHxZPHYZ7hqrOz7yxKPRg3chduwuO3tP2KfO5EG +3ISWmwGpeMQoSXjqUk2H6oDn/QVFeBCd1txBM2hAnLtuFCo60+G59frQMS88 +1PNxfLJ3akTVYc8YKrHzTMYcfH9VEw8FBOeLt4qb0MzuxRRxDDeZtR4J3MDB +Px2NIzrsLchHkPoyDot/PJuyVUMKDsbEVwdUPrciRYXcAZ7H//X7XAmHGA5q +9wTJO6W0o4DHk39qsPhnrHwsXnk9DPubZbXl2r+gu+IvOHIxHH1K0qurHQLB +JekVTc0uVNE0x3EE2yfFj8tH7MMgLNsfme7m7UXy1s4J9th52v1szPOUBuCD +DEmzXKQfRVxdW8W70EFMeFy69XofbER0pbycGkAqPAJVwW50SBNSwfcnfYU9 +mctCg3lD6OIBT14uTzo8k8vgvsrfCgdHxNJVr+DQdZT9wiSADsPLXGvS0TVw +/hx1t4ozHrlaH5eajqPDqrqDh/eNLHg7mmr8HuHR6+k6OIHx+YWO6773hPGQ +/fsah4lIMyr7NJm5icW5+HnurotkHJy82J5VeqcFVfyIl/uA4TyXm84IR+Ng +f13kbPYnrK4qfxobY3hsrKzE8hkcOOl/oK2rtyPfPaXuhzD88vuvynrVw/Dw +go3I5noHGjxw+sAvLA4yQq59rELDcINvVoqH3oloH1O0WLH1P086K5Y9GML6 +vZxvgb8bMYV+tXmG4fajc1qsjoPwJDilIyO0FxnpHStyxOJ2+ErOMmt+H7yM +TqZWRQwgMyLMjWFx6839SDxm2w0e37ulD7MPofkTNh8IWB0KUm8txb3uAEnK +Gdp9v2F0hOG5Sqo3to9d0tn0gibQtBF78qEVhy6srbmyvKGD6THDcWGuTxBt +rvPJ4h3GA7hIhYJYOjgrq9aeiswCkWvyUxrbCKih109g2zs6VNwTFWAOxsHP +Tn/n1tpWFLrz5rsm7Jxf8+yGhxVwkPWTWZljZzv6Z5YhHY/haQM2D87hhiFv +4EzYrmcdSCorL/w5hltL8FUeNB2Gnof5zaNsnUibIqTmhuGBGSzT/7qHwLQ7 +lyt68CtSeSiclIzh315K7hbhx3zB2pe9Pm3dKNn08JltrnQo6RKmcZ4bhNqz +iTsvLPSiyz6HuusxPPHwl6jX0gMgKqp/LPVwP4qVuiTyD+tfhav0sqrpPvi5 +vXzl1N0B9JmNyYOExVNw7O8nzrge+Gdidlc8ZxDJSRpXJD+nA3F1Som/vBMC +Ol58Yvg2hBqNjU6bv6SDltzPc1ncbaB25/ky+SgO2W1+73XxpQOvi8m+Y+0N +8KT9bnq6MB6llkgqrL/G5rJvLF8puQLze1crbxPx6HbUraTsSOy+2/geDLq/ +g0HRh3Esshjf8nXitiXS4ZEnzaU3eBQO2iuXZgYQoUZFM/8u5stDnoc8sCGN +gFI0YfrK11m419KS5LZJgtLf3wa+y44Brjzmh5Y9DkIvPD1a7bQAVirTp9SP +jsJx5kOPUnSGYeZ4vTLPzwWYr5Ux2cydgu17+M4Rb82AoqaOAe9eEmQ2Cde/ +VZmEWK2JYpPMWeBJOXOfwWQKjLbu33XcRQI9pALd0pgujru+sc5HAUtNE435 +1Xmo9dE+oB9VB5Wv5PLeVFKgYjJW9Pf0JJixsxx630CBQXnZMaUXFDCZDB10 +ekFBXUXPunhIU5DKfFue7xcZRl14ra71EiGCRD9RcSkLPSo7eVHrHDav69v7 +8RYjgBqCSsYEipHi06OmXAfoIKBgdSwJ843w6319RngfmtUOW3zbS4MploBR ++bpR2EwZDzJef48uyKqW9XXR4K477V1X+Ahc+C6pqDxej9Ii+VztR2kwISBf +XrCKg293Y+xjt/qQBInOzPKOBozn5bmPPCCBykXOETXDPrC99XhZJ4EKah9f +c896kcAgdLdYU1kvTE31ngiJx3z32dlTAgLjcHOs8+zZQwRQHTH9YDxIBd/v +4r+faBMh317nG6vCHMjN0rgydpBhLclWQ6dsAiK1hsn3smbg8NHDfbYUEuAK ++DyaZdpRGeqplCrCfMthg3LJ02QQDb+k+SuuB3E/bqZmnMKeV3ak6thZMpxi +MF1PJo+BEd6ZO/MtHtYfhVUnbVsAiRvtotncYyAnxdMTJUuAM/67jw7tXwC1 +DvqEcBkeGC8lBBMb56DvZ5RH2DgJRJC7iPfaOMwreRP1e4ZB/5RBkCP3Avy5 +6HCJc2MMto7FfPI5jwMGnWaRVs0FcMkWeP5jehSoWdYjuq2zYL59YdwqkwRa +3y/LKHKOgc3v+w7Z7sNQsW920v/jAnTT99m91SZA0KqMgM/9OYjXsxDDi5PB +R2lD/4BUA/AcduasGqPCfvMmpnErMsTac0WVD7ajQRFZNwNnKgx9WnTWcCPD +T5bgx+3EUZSUd8Ly4JFZbH5Qy52ekMHIztmB624n1N9yGzLeSYVeXXF/2T4y +dBLazVKpA0hcgJ2R6eQ8zF1MOn27igzXSuO3npHJKJBdPlZwiQS6qp5muxLJ +0Mxq5h+yYwR5bvY/f3drFth0ODiliGS46fA9sENoBpV7rO+rezMBJjpGXfEh +ZJBk3Bf/uHEe1cb0JHAa98Idlzs8IWVkuG6wKFJkTIERvbknXw7FwxezX1dW +3Klwimx4bYabCHlj+abVPSFI1FZd3xKbs7Suut1/b1DAsaGZdkYwDs5TXK7V +eFKBKWyO0GdJgU19UYqwRSJwuK3Oij+mgu32tUY3fiKkZGTYUoTCkdw6hyob +ppc+VA4byLtRgLjtnAP3rWRo28VbzvWACo/vtXG/FCZCl73xjzvfI9AKi3jm +PUz/cESd22CPxPyyMlPZxIl0EItyCP+jR4WOuQ8fQ08SYbcMXuRzUhRitA30 +OoXpW9kz972YqingepXT+MeudxDmfJFvSoIKLFbqhvEKRNjFGzT7MjcGHXxu +OXQe06u3rpFdb/2hwNhjU/OYl++B81N+sdjPeVBGf/OUMB/3qPfXtUbNeERV +0ZeVMadD16V0XIzFNMyvD54pXymEgqd23XGx85Df3ccYcZ8I39RG5uwa36JJ +nz4xuf98B0OXTuXBGbjqa5LxbqoCdq+e2Jc8Pwd7L4itmwQRwZ9t3e14fxry +kxJ0DjLA9MkRGr+12CxEagep1kchICQMOhs2zkLBRunppbV6tKq357n4dSq4 +tgnXbjtFgZnW7f8kPecQW2tKrUvLMHhJBXob9pJB4fZFJX19Ksp8v7yfdLsD +zOzfWq6mkoF+/JLkzx8EuJVDfHrSIxt1JcVvZWP5DfehxQZiftmm3iaT0BqM +2sH2/C8Mz8KH+5Vh61UtwlQ+S79HTIfXt1theewM62CVwvCvwmsuZPkPqMz4 ++gsilq/ztF13FVYJ8Ps5iql4l4+OhtfLkbC8MN7d/d56hQD5R1+2rCQWoqxF +0+EbmO84UC2ntkAnQLEoS9hx8RI0/9tv7Rem/9t/V7AWzBLgzbSaB0tsGdp3 +1mfSCfN9iU2xTnGYP93Y0rvkMlOJttcOyLljvlud+jVZe88IbP3e7ZR0Nxft +fjl7JluKDisfLjp7ZWF+2eSgHVd9LUpfses7eAPT//VXc0/mjsChykfcYyo1 +6Gzzq4d88zToxRtn7MF8E0TE65CfNaLhzfq/aZgf5zbtuXQ/ehRcfksbpfWU +AbvRptTtVhq8ucTzOc8LBzN2dclyt1sQX0fNjVJ/rK6KTNke7B2Feznx/fYH +KtGg25+kF5gfV9mt/derkQgGBhXnpeZakWrbuf6T7TR4Kdbrlzo9CLLErj8d +rf3oaFbA/efcdPjcS9s0FWqBYzpS6kpJo2jvzrPnvOxpoGNiPKSj3go6MNrQ +7U5EfPmVcVRs/7CwkvcsPwnw+mGnMOFTFjLasDE4henhZGZTzmStVPi2cX/1 +gO4Y0hn70stcTAOJa6uz9ypwkHmFf5jM1Yp+RBu9Usf0DKuQiMlrAg6qnj55 +//lpCxoSjzl+H8MZyCH86d7F4PZpFxdlHY+eTQ6vDSXQQa1ZYORSXhHcdh5U +fslJQBMswVq+mE4jsetddxYmQVx+Uquobj9YidD/3XhLhSXa8JcY6zGotnrA +JL5BgL5z3QwKvVT4dfPol9CCMfj5JsdZUmsWDMp9jqPvJGCY+xRibd+KnKrP +XvjQQYXF60qj65JkkOjlUuByHgWP93Lofs0s6LjarZ3A5oWXDxOXL88U8Jdc +Ost4ZQbsbfVPo3QS7JzPKe/XHwcO0UbIlZ+FCx8Dmd+1kCD4durml8dpqJi0 +njAnuABRA8IyNc5kCCgd5ztROYQa+ML9fDbn4B3VMSQR4/n+izfa44s/IMXr +jg+Ux6nwcndItngbGerHT6cdcZpAmS21ly/vnwGfaWcev/dkiPY/qBD5ewa9 +ytVSje4ZBYn1C87xuWSYOD94mYeVCG0hh5POomQ0kHCM6Plf360obLjuJYLL +SRH5vWxpSC7E6J0U1ncOC+e0kzmIwNzaePvGTDoSeYN7HYr13Y+kJh4cxtub +pyq/sL/JROTSwL0uWN9Npg6yBAsQ4Wpkd4l1OKZbsh/2FGC89/K307iRGBG8 +1V465h9+jxgVIl9NY/y28nRfDJ80EWa29L0nX+Whyz9Cxn3v0cEzTyPA9xwR +ks8sRO7TLUJPWszuehrSYUqkKk/rCsZjPkZPvjwvQ5byqmM3L9FB7mq55Tns +/EfHvjqmM9YiQcXJkynqdGgd4hllnx0Gftvc3T37G5H6xdDtr5rpYK7TQi7H +/PW1re1fF0O/op/VUpaxv2mgqHD+0ydaD+idfOdVHoNHuoqktc1qGuyL00tv +MMeBHI3xUZVJGyoyt0/Ix+pTjVRDf8GTBbfjdZm9+Qlop6RTS1wKplfJHI2M +IyS4cdOByZ8+DfTMgoRO4ylY3VPLGchDBJST2zFEC0XA0zbS/N/7lronXi1H +iFAv+fc6n1IE8nteJ6uJ+fpzFrLBn44RQUZkO29cXSSSsZV6/d97DLNtaauH +sbhZ7OLd/iI6Gv1IXz09jPFbgjUn7xl1IpQdJVMmpmIR81bNF2tLbL21KqvI +DSIU7Pt89+lkAqroik30x/jthepC7hNnIvjQVU6uMqWgU84Z4czGdOB08dxD +yCbCB+vhVaXaDFSYVv9hrx4dfinL4/cqT4DFk/Mf9EZmYL6o+8/2YRKwtSoZ +vJMah/KArk2WzmmoaJBUdXlKgcmhBdc0TiIIJ23bxbEVi9oLosaOYvVWHMrq +E3iQCC8OPGW83BuPPlyX+VaL3ffS9TM6FVj9KBptBH79lYhUlc/9+IndN/jv +T+c8Uaxu426H345KRp4NjeK5NnSQF6+inpUigki1fbRhTxqK4426FPUQ422+ +88qlakQQr3xWDOsZKOFBWormAzrcvpG/K9mACGeKHzwybM9CkoHH1Rbv0KGR +M+pjigs2f88c0ji2kIvajAgCbdcwn7j7clzJ7VGQFQjRL8kaAo2idY0MlkVo +lL17tjp8EiIOCto/OjwLW4+vvteem4Lk2syQl/rT6I5Eo+sZq0mQXNb3TOOn +wK06F4W7OEyffAxjHt8bjYh2IqmyF+iw+CaUd+k1Vs/nrOKMv+cjMYmImNNY +PeME5YLHfozDny+42PKpatScaHi98CANmrX/BSZ5TYDTnEDf2snn8NI74M/w +URqI1C1rXZUeAxMYO39EOgNxO1RV/SjHdPv2CrMriaPgZC1FuTWUhzovDz8q +HKABlW7FX+A1CnmajeevcpahD+IeoXsxX/C14GIn3B2F/BMWWiKBn1HbZ39d +0RIafDp1W9wG0z/HDkXNvlzoQvoLNyo7/GiwP6Ttly8fERzJ+FP8pp4ICocF +2bH8LpztOhR9mAjWYm9UDV+/RK6OcjctsDpX/uC3uk2ICEuHbbsudHuh2Nxt +b99heW9gP/t7GdMD3eMPP+aPx6GjXK92uGPrcy5LOU5geU/dxhgkE/8KaSuG +S3Ri/PNid+1p9RNEEHOd34q55Y3OGPvbD/73fk9pjODASwTWB0VlqbgENPNm +iWUOW19kdDVY/TQRWhKYp1wlfdCULqNHNcZXG5bDPdtkidA5QVHg5/FFtY8b +J12xuuo9r2drd5QIt34S7VpkkpCN7hldCrae69jBlAJlInx0eVLTcsQPDf69 +0PkX47cV4ZNkTw0i7C86k9d/0R/hewJPncPq0HSzOD8YO+crw08eKYdSUQX7 +cIUy1qfv0p7tatEjwmW7CXXL2ABkPJHLK4PpkHtHSoOWjIhgVdmqe/NAELKK +x1/8dB/j28Gr1Tg5Iuw0XZ8jTqSjQ34042Rs/S/348nplkRI6NHujRh6jb41 +nwnMx/jTsPEh29BTInwqULl8Yj4Y2QswFgxiuiWg6/M1Qcx/ccp76DJrvEN9 +L5TP25vSQVOnaJU/lAjqn+ZidJzDkNPov5DBm3Sw4Bu7qphPhKcv6Y+o+Ajk +2uFSteMKHbIPxKj2YfrTiKzLZJCSgxiXvYNeGmE66rvCvqCrXSixtVJuKnQe +cBV6p7vPU2Ap50Tf8nUSRAgK7fKK6oOtnU+nZjD/SI5tMc6lfUEhUdFGYn7Y +nH0jVv1NigxpgTtvMt+mwL991L78lACIamTYVviCCsoMK5QAnhHQF1qQPmgf +hyLm3YZLZekQv+2yKafWHNQUk4RutrfA1anViwU3ZyB0MOpl/ech9ARyrUai +54DBMurR739kKHleJLFUOY+ei9a9ciR3Q+XbzjCvOTK0/Dl68WoDFfHslsxO +Fa+DeNcoMVoeGfY71hFfsxOBOzcvUv1MLKq9kqxQjdX5edFDeS19/VBn1OPs +5o5HlQOKp8lWNCDM7PUnp+Gg43VZV61NK3p1YftvX2xecJyn3FXnyAPRh6sh +THwEVLhhr62aSIfTjxXmIXIcJFolbv2lz8CONTa3LiYyHCfztbiojoF4wbPi +pSgCnMvaedz5BxWoPCPhHRwj8GhsG3/WtVkIkletXh4ng3G78JHbh2ZAM/+j +BsvMGFDVbG3Y1CiwWHjKmI1rEOYNFQ78Js8B2J+cnd9FgfcMF7b0F6Yhz7Bf +WW1tDFZvMRguWFOAtpBjvd9+FFo+pDQeSp6FQwc3xY22k+GMHfXeoWPjEOaU +mko+OAs8a56shL8kEEaK2atuEzBQepiZzDMLVTdsCYGPSOAccGq9OmcKSCfT +AruFZ4D6T2E36SoJrIJHaMUcY6A4ZzjcPDkDqqosqg75ZLgsaWXp+XAKDtwu +fiJeSIHLinq/mCUpsMF3wfJx+AjEJZ6nWWQmIxXbOy1VPHTQOhxgfMqSBPw7 +ijzva/dBTOW64iOsrs7eaP0VKDAOt/RujGvsmYXRXWXXV/aSgYdVbsDREYtL +ldWZggkcaFw+JvVNZwEmDv7xdHo7Bl7SLZP+q8Mg6ND64eLjBfgW17t2dGYW +AnKtPXfyDULM6LUcL7lpkPRqCsVLUdD49bLZECMSFPhdqJDGY/pNu+xf1OFZ +tH3gZuNK+QhcLLW6sYNEhqbUmSbeYSpKZuUefTT+CXbIbg0upmPxzJA9wuNO +RZd3PM9NOdEMZcfHZ/layKAteNy67RARRDkaZZ/oeqDlSFj8gNWbgmBPVuEB +Iky2SGi0a4WgWKuygiIMr1ZOJJplEUFX0bjN6GgxOhCbSvoNGC9tHPy6WE0E +NYjNOBVehmy3XnOOSdMBH7cStU92BGLU+G+zhuSjbbLdfz6KYHwS6PVDxm8U +njpq5d7nykHM6df+NYzSgNPobuhKGMYbOR/Ea7qqkcptwWezx+mwc6Fs9/0S +PDC+XEksS2pCUU5cbWfv0uH5kdQLSoIjYPJH6qyKUjOSfMB11LaPBvNH1HaY +sfXDfi087zXfMnRoyRs/Vr8E7y9FJ6onEUFwchfTBGMzSpRyGnqxTIPL6fuu +TXWPAJ7m2WehXoNc1th/35ykgeVwkYvoMwI08jG1ySd8QbiBkvuA+RFnNZlr +nz4Pw2//xzeuf+lHd29EF3Y10ODDbLDOQ8zHEbm2G2vPdyLtW0pkoSoa7OQL +Ov2Vqwuu2Cj87RUiIudf7fOXYmiwsPeSnQ9xANYrOiynfw6jQt+5+Og3NIid +iHyzzj8Go6xaHUsesyCUr8v1Yp4ENqyD3vW/OlBgxmPPxWgqOCOuZzoYjz2t +KDtS5z0Jv6ICkez7GeD6dbrygj8JSvM36X1uOAh60VBavbsNnbTAD1Ri/DBD +qL+z2fUOCLk1FxTECYilW+yHdBKmx4Yfz0mdJUFslrvyvt39wKKf8YGQSAXG +L3z5B2+NwYw3c5t/H3a/v5t7Xk1QweyqJ3Nk/CjsOLGPMz8dm4eXxvq7J6lQ +xd/wzyVjBD6fa41+NjwLrpVDT413kaFxu5Xm+pNutMnVJzKgSYXmF1+HpWXI +cIJN9EScxBhcc/mtkGdDAP2f7pvMTAvQp/X30gSmb/gjo62D3Wdgp4jUUEwH +CcJERCO1cojQsUyRUbk2B3NbOjO+rSQYvfvc6xN5DFwqkhxNrWeBg/bM8kIZ +CU7gYwzSJybAXYI7wbx2BiagizW9nARHOVZwSqYUKDH/+s9LMgF+Orb3uT+h +wsNkxgpbDCc+uzr6IisQVJd/2Pq5UaG+9NNKuhEFXjA1KMqKBIDS39Otfp6Y +T+Ls3iq1p0DejG3f5Za38OMda0mnDRUyyyPnHmO4SN8a6yHuN4ALK9wqsKMC +O/7t7l4fChxo64vbLZkKIkKGOlm3qMARbpDX4Y3xEKvSNYsLofBklvHg+F0q +5GZNmLZnUkAddzTu95MMMDvMYWamRoUhBbZ153QKeLC+Wy0ciIDxV2q+/8WV +WUDirfwwBbrDxTLjtmVD3s58bv79VNiUslmo6KOAc1qMm9quGIi53MD85DAV +VO6sGTMenwYU+0A0vioPkI2GuEbXPBAWbnzjFpwGvWWKc6tQIhD3MNVNjc/D ++u/YBIGyaaBkabxA50qx+rz8kaQ7D6odW4U9OdOwc8lSUW4mHUoCcjhwj+bB +nkd/MjNmBs4/Gr3aaV4Dt6znNF5ZzkGic+Brn4AZSF1kNK6SzoUXeCZxlYz/ +/t5Z4vy3+lmICri95ePYBPsEBRL37JwFJ0u307oNs/Bih0JVmEQJfPme/d37 +4Sw0FLwTnW9vhYYblwte76ZCWijfdvJxCghE33fUValEL2231nYGU+GLsVve +BicFTBwNJqLYiJAWop+/qy8GnafnHt3C+C0yF91eqcAB4UWXZCVrK9JYDFEJ +/e/zlJ2HQ9yjPkBLK37AR4yA/H+pbBrE02FCeKm7+ekQPN4IuVQeOw+6CXF+ +X+tJ8M9/cn/uzAjwXvQWuaQ6B8Yq1xjfW5OgTzr3rYDAJPxl8Lzy6MQsnK2c +WfffQ4IvHaH/RrB5FZX7OeDbXgrgcs6ZJW2jALTf8HS0qgYLmd/6kelUKIv6 +xMg1S4YOaxVFAcw3qXU2/Px3ZQzWDiX7lhZQwWmB+VrK8xKQKvmgfaKbAokH +lzRmWKkww/Ix7ZMyBZ63+y57vJyAC8SnJu5B00C4cNE0lWcKVNuf1s9WUsCA +dkRgwoIC/ul/iT4EMlgcv34ufWAK9JPcf/tkUWDsBcdDhqQpkBnhGzZLpQCz +9rQGlQ3rH87XG2NPxyG+7cDTiFwchM7f2UXcswBGh0o7ZVvHgGg3yGb0CA/L +uxS223EtwE3pPxIGpmNQorBxZasYD6yTNTVxRxbgJ2GvPa/aGLDihTqEHuLB +PGFB2lpxAU7vOr5vWW4MDvs5TKrNDcPWkdMSnqELsK9g+3Tff75MXqjI2gIP +CwPE0bmNBaAJSJJ3/yHAC38B4TfFQxD0S9D2UdwijLzdRuqi42GPTe7nU3oD +UMS8OTuhTIMXSkyW0l4jkPZsprL7wRDM6rueeKGzCKqR4p1n+WfhIzkyuofz +I1QPNjG1sc3Bxz4ZLa2aOSjdoeQRMNoKow/33A1rnoZV16mHM9Nz4DfSVNl0 +uAjGmvBftKRnwAT/3tUH86H/plzl9L68QFURKTPLWL3pXx5RblogAhztGcHv +zUFfSfdUvynSIT3DmFU1dgQYm3lmyobKUPPfyGLCNjooqphxMWrT0OZJFkW+ +yM/IQFS2NZZ5HG44TEhnqI/A8scYUxe1JpQgHpKlPUiDyU0lHeeBaihbiRwI +9xtDX6/T7Pe70UCUT7+64/04DCXkuJ1cn4EME4fjqYskSPp+LrDXkgI1Cmo2 +DzuDQKY2MyjGGePphGq5dMxnP01cuPsiIhjq7s+WhFhSwcJfyNo9nALm7+KY +lzTD4WRur+1/73FlavVKayooMC+ekEA7HwUrUnYl/2So8Ib3xTH9VQroJHRG +sl+IA8XEB1+DGTH+0aarv7o9DW8GetkzJpNhyHn5kdDHeYg5tWM9d9cMHKGN +CKXyZ4GyukCSzf55SM1jJv5YGQPRpGpeq5xZMPfZZNI2IcEv2TY96t5J2Fc0 +6fBJF+N5l2dZ8mJkGA57XVBeic013c3ezn1kEL+UXvM8kQJBDm33KjcnIPnf +CbE39UNAzBDJlmNYAHPT/af4+cfBeID+uTZ6GP7GnGOKN1uAYqEfRtz3xqAq +ny/b/9Uw1NzZs8SasAAZjRXsVRE4KLI2bnI614FSGWreHDSgQ/58fZDFOAFm +xerO8Zsg1DvcS3LC8svwjNM+9PQIUAuF5H5eqkV230jPqrcwH53B1H/Pdwj+ +Pap++PYhxpv31wSbMN2rJFwvTRrFQ8bZ3y8m0ueA01G86R2GtzyhhOSeG4Ej +psfr0rZm4eW+aNL4LxI4lM0myuqNQfRwVrZvOQFO1ko8dJ6nglWU4v2S76Pg +8YXE+1UC01nMp1t3TlOhQi24apfmOPBrhy9FvsDBFrG5cFIE06t8vZHXHAYh +nvDgWArWHwOdXZLDTxbhiVLnr9gUAnBorEsr287BJvcblWEGMhx1Y2Yje/XD +dbOBKNpBKnxNPnzHZpAEc+ZJBMeVAeDJMPFnmZyH6q8uS8Ut2Pw9qSEihMdB +ftCGao/IPFx7W9R0JJ0EbmciSh12jsN5w7RmuWUc3EsfKRPjX4BHHStlMc9w +8N5s/IvSJRx8VGWt3d+3CAYSBWVeHcOw+pGeqavejShXy64tn8b8776X1xRj +8PBkg7wx2NSGAuvc7MRk6OCqvHcBLzMIQ6EWX9XfzcNSRe7+Qsx3iN6qq4nA +8lp77maW3Ml5qOmrWsnbRgb5kbNtcsqj0LPku1bEOQKEAumujlEq9PLVjUl/ +HYXR6KDfIDYMXa3U3x/7FsDucUjkNgEiHNI4nqK04olyVxpy6v77Xlncs9dT +wkR4EUWx+aXyCkW7jKkq2dOhHje5nHeSCHJmu6PNGryR0VirvO4jOhzIN2SQ +UyCCgZnxxeYEX9Sqx5iOMF8/ekfSgqZFhC5Olqfv5v0R+66j9AuWmL+T3wq1 +uYfp9mVNp+XFICQpoSOoZUaHI3tDTGS8iVDnXeHiwReKUtZm0l7dogO9LUz1 +Yz0RTvvF6f4gRqJ0pRiFlEt0iFsadNHQHYGShq7jV/8koK3I+xbbT9DhYpb2 +tTD7MTjH3Yx/5VOEIuMslI6/pcExKU5ZT/IUfNo313zdvhCuPWv+0yCwCM5X +eQ5bY/FxfUAbj1XNQR5NL01COmnw+ddJBfvno3DHdDag40oVchsSzuvD9HPE +9pjScn48mDy9/IRzsAVxvhW+z/yADg+ed1ssPxkGWjbj+vFHnejgldo1BVsM +v1wiqiw6BNv+aQQfE+hBVkE9l5bt6GAi/+uta9cgBMulPtAZ7kFLEzjzA4/p +kJ2ydOSd4gDwVj13bBTsRwMnhsuiXelwTPXszYeyA0BUmbPkP9yP0t+xdKc8 +oUN0dWl4d2fff5+HZE+7DKA2qdtp/31vIcJ1dqcoEID2UbvuUOksqF4/1avB +gumN4rbKg+uzoBgr1X4/lgglYk4M0cpkGH23e7G2ZhS6v58/ckRxGHoL5TPl ++heAV8hLBb9KBBuWGZ/YoBg0F4EyHNXo4Lh6heOKwxTWBxMltjwdiDe3tsm4 +cwFKi15nxv0Zg7ReJQfVbTEovMiKLTmABusQv22PP+ajQ78fvz+F5cUpLOXB +AA1eK9/Y9J4egfGnJ/e/aGtGWtfnmo6n0MCRYll26M4oiJiKCOaVlSDlHhyz +OoEG6a8DrI0OTgDv3Vx2x68zcFdKzEoa45MjWr8kJBtGQWq3h31EyCzIhffa +/F0jgeaAAuLjJUI9KwNv8oAHGpEQ4jP9771cRI+kqiARHL/9lZ065oXePG/r +YcHqH9930nHjGBF+HIvb+e7nKxTyKK/5OpavlLKTJizSRPAuaR89k+6D/LaO +7BLA8ptinnHGDojQ89k4DV/oh+Y/N3w4ZkWH8kz/3fuvE8Fiw3LZ5XIgIu7K +Pb/dnA7CPQktFfZEeF5+ZIZ74A3aAysF45hPrNW1u/H9LREqxEqf7v8Zjh7F +S1ZVXKdDYofqmsDKCPyw6v3uKZGBDtQG7y1moMNB+eWDKdVL4NRncep4QgUY +9lQK7t/bDw5oFKesj4O72um9Z/kXoe3JdpnKPEyH6TtQ0wRwIPPpTD887kDM +Vgy4sId0KKQKmhgID8MdZ985Dbev6A1qNB+ywXSjbkNyRdoQvHr2nO12cxcK +Wr1oaIzxAJkg7HHLsx/WA+rubR/uR3znZ8bvPaVDxmaDl/ybfui10U5IbutH +J8+qPs7E8GStXK4srH8133UTzDvz0RnXB2ydWP2MF2afcuQeA05W22OtLL6Y +fvAUeo31176jLWaBNnNATv2QEPRKDlJIrmwefTPgERkUnG45BEl/6T49Y82o +uHqYm51Gh8n3LJTS7V3gJvl5U+lWO6LWnNyyKliCDvrYzqCXU2AdZZ2SLzMD +0SvLPvPmJLjAnbpkUYDFwdphKTu0DS1ol6e5Y3mpCpimOtydAw7HGkXenDJY +LP9uwI35MEG/TXuVvjm4GjB6TIKvAq4Y+boayc2A7NvgVL33ndATX0hCTET0 +dUD/yHgxDex3zCwd9cRD47bk+Vu2CYjL8v3jwUY6BJIWzcQdhuB3SOhd1r9F +UJwxyOtzfgn6NhO1BCJbQW7r0dyaYyFiE7d7ecrjG/i1WGrd88BBuktRwqnT +rYjzXFvLDw862D6wTwx5jINXOw/hqlUbkbxuga9ULh0M43cPZhdj8/5+7tqG +UB36Z2hZbjdLB7Y9D/5pO5Kg3cjwWLJQHzgVXD8cEE+F4Er+lEEnEmwWirzQ +5emDSrHXZ85j+M9Mh/AP09nwfHFR8fHtBbiU+MqjiYcM/BKph9jvfYCk0Nwv +2XcWoEiP8voJFxnuupuu3XcnQaJ4lULlv16wlCrwNYijwlORYNyCfxE4PfWw +U7y1AFHZB3KbMF2D/+Ft+DmIBP6nz45dzOuFqRybK0pRVLDlCns9iOFhykFK +tZ294NvCkpMTToXhcAtyf2El1Cjx/4o9twB56c/LznOS4XW5xl+OQBIouH4M +/7nQC4Fnjt28FUYFSUsN8u/HJBjJ0jfg9OmD6evu3UKBmP9lM9lpf4kE5ngz +vRNK/RDsty1rxYcKj1+FniewtkCC2WnFJ3gqEJrfGKlJk4EuprNyT5AEZWEp +LmknB0DIn6VKFfPdp9gSE8b/TUI4lx5NVQYPjutN03tPUmGlNSzzse8g1H6T +OFZ4ah44PVtOqYSQ4d4IMR6H6czzkrXn+nOmwFHsgZs2nQyP+Xa6rcTjIfh+ +2x036Sa0ZLPjrRM2H5UmqFtc/niYOi13W/NeE3ofqiTlj/GJXgcajcrFQ96D +0Jap203IPXipNRCbmyt28bw7NnCQF53K1WzVihTeOCmE3qfDuv5CxF6nfjj6 +d6+LoewAuk7+d/S/9/mc3fTYbRp4eHzkpdKsaDPideQ/UIbx2y8j+5nv8niQ +3L5zh+KlZpRYVyf7EOv3sYQLZvft8VBbseQ7n96Eno93cGZg+2xOa//zPtoF +HJ6vuWxShlD909d0f2zuOLadTE0VwMNxBtNnTpnNSO8gi/I3jFdVp86l7Ipp +h+UM0XNcLcMouXpvh4sPHXCiV5rZyDig0PhnSx1bUK9J2QGcEx0uu0n82urF +wRilrHS5sAVVcr30jnGmg9Vun77P/i2wtaiuv2qPQ6J/xZZPBdLhJOJOte/E +wZ7aoW7fphZk3/lNsQtbn1do//C8VhMsXDOo1Z3GIRN0yZkjiA4vn0Rmtz0i +wc5GZ9GU0//9P+Lam2NY/TvQkiVUzuTC1YoXpv5Yne8VD+M/d4AMjJ4k78St +Avhn7ZJ2B+sLDUvhmik2MvhfbfCe5yyDgxbez89fWYD4XMrvPRierF5oFOxD +AtO1JI0b3H1AaWIy0Quhgvz1vRzstXWgq+r25Y8wtv+2btkWXjLYunVIPeib +gn3VxVciCwbhrqAv32lzKqwXs+V+ZiVCoijjsgdWjx+5NBSbfswBzVXj+WQk +Hg6vB37ihSZEfvF+VgLjc0+tyzwj7/Eg9KhhvFS4CY2+jNLox/SJwEOfkR9q +eEi9PdgsJNOMlI9oV/zE8p6zIH/ojjEezl7690dpogltUeJKTmC67r4om2ji +Ezy0h4ZQJoOaUNLm3a5lTNe1ytZHKZX1AtOMRSfNYxAleUXypmL5zYv/mMLI +gYf6zLi8291YXdk6mSZjc3b8wu5lghgeItTZ1C75NqO0hO8Bttj6lU52MxWB +L/Cjpc18h/UwIvhaWTF6Yc8t07CTHsXBGyNv45LAFuQrFawuiOWx5V7WXatF +HPwZrZcVutKCau0Nw//7XnEnt76XvkkruNLtX5qq41D+cmE0BGC+dezRK5cu +zOevF9KsaluQ62lr4U/YPn1DR5fL8U2QHKK+9qMNhzi8WprZsXqwIXvGdtiQ +oLF8pmiffB+wuX+b2ZWA+UHyazI7ht9wYBdGin3A4LDjKw+GJz208tw40gEQ +PfFLPwbjhQIB7cFzZJBZr9q3UY+D6sBm586FFrTc06ql5EIHjSa7e7ubcdC9 +mcr2aqwF3ShZmuPCcL30PW0hn3Ew/+gV4/i3FrRNTLRSC8OHZu8xvH1IAoYw +AWtmjT4YEym+cBl77vOjp/qKP2H7V7ZYMjK0oju30x66YuvbP9w/LBc6Dr5X ++Lqlj89AgauDqCCNDF8e53MyeU9A07FzpuFMI4B0nf5H151HU/m18eOPUqFE +iZCI5lKGUgqXKUlJkkIohSRDhpBMRYYG8xSZp0wZMxS2MXOmOI6Z43AOjpRo +kPrd+/M8n7W+6/t7vv15r7M45773vvZ1ifdLIPELDZz/fn4nptwJ1N1Tm+t2 +UuH2e6MNB60mYeZbisqlzA5Een3H82nLDGTNfF9QWu4Hg83SoPiKBFa+k1UX +CmuQbpNS4ZPrDAirEOlS0CGBL/mNQcz6OvTkd+65FOL6xfydb3/MVIHUt67e +03to4O7Lt/Q8aAJEW8nmF917oVuixfq4RAPSVOb/Y2TCAM4fTxZrbvdCe3iF +xkxRHcqrCkk9TzzH09uaRW6NpqA2ynSdrc40THgFZJ4QGYc/YfeGKi+GopyL +FMWX16fBtDOai7admJv5tq659dgCOpvijn69NQ1+Qjn6m4nza0T36zXWoadw +vMNhaQZfvxNK+sw7DouXr+4I3zUOzy7SjJx6muDHx8jL5sQ58vtKRe5zwXEw +vZu8K12zGYqlNajRz+jwbU3z7deP8yCv73vDALHfT91J9ji9bRwCzhsqN/0Z +A9WtqsK71rbCQZ35FklvOgiEpM9f20/UmbQ++YbsTuCpHyvPekKHE6VOMDk2 +CvRBpR9pAV3ASDB+LP+CDkxx9OANlUNQ9OpsbhVRz3K+RB7Z/oUOiD9NzOlg +NxwttnNId+mC07+y3xrzMeC+7kG1UAcSWLo3fXldWoMkeQQKFIjzYi83z/zj +NBIMPxB+cpK9Gq3jmqwJIeq50Z1JnYeZJFjY6yQW9bEKnXi13+obsR8dmNfX +b4kjQU9FVbS1TTX6e8LpdxRRB94XC+6Jf06CMI2sxLkNNWimfzhhH1H/FTeK +879Vb4H5e9d8V0Y/odcRRvUKzgw4l2gv1/GGBBrXDF8+vleFvvju9rlN7FPe +kiGTmzkkmCZV8j4Ir0Jji/G3TYl5h18nQOt8TD3oeS+HHD7Wi+SEab/9njDA +csdFBSaTOjgy+M1w3LYXfY0JCqUSdd5Ueh1roFc1RPxNHS9d6kVxYC8y9YwB +JrXpYpdby+F83haX0gck9Ov2tmDuFwygaF7oV3VPREcPc17k15uGT98CHroK +j4Ma2VZ40NMHnFDJ0DoT4jmeitLcQzzH3Xuyrj5NDEBOw7nMH29MQ3n1pkMC +xLoS1Xxr/nLnOBzSDi4YYmsGG7tnIqLE87rU4L+e6vIaQpekWTmIc2EloXxm +FbGucs/G05sXxuABh2+F4/NW6LzKXJJE9BsbGQJ579PGYE/9j7vRUe3g7eEg +PudOB2eXfZfytN7BFWdR7l8HpqGV1ZB2UWgcPlR0ydy7TYJHr6x/0dhqkXPa +8NNgos63nrRbd46bBPLoXWxXWR36lJ/F10Tso2A5BfaYnz1wvSC9g2eqEakI +xXRsIdaD1dwKVypxLpCC3jw7tVyF4l773p0l1oOZCTI6/vMj9IV/iE+s7EY7 +UL/wBuK5JG8Tu8mVSwKm5iMhdeZVaONEnk888Ryf2nxXFCOerw2flt/Ox1Wo +LSv52TTx+parbOOkbKL+W/vucU2sQje/bOrhJq4bG5ap1Gz6AGCckRwt2Iv+ +ZNBehXozIOWVqO/3gio4KW3HdZCfhIZZSn48fc4AlV4n5y1Gg3C3WmzYN5UE +k7Y2qj4i02ATN3PI/H0fcKwVeMxT2Afi29KP6H2cBjbP1ijS5W5QuyE1X6H3 +CdYZf84VrJmFrTlCR1NXk+DJh69zyl59sMC9qHXz5Awo3BxQ2HqsB4R2ibF5 +RZEg3We7WmrzDNBYbmxM6euFE+t6Mn3K65F1S1tDNXE/x7Q2vxiR7Yam1Uy/ +lcs74Lfm0axqPQaQ9x/eHjDWA2Cz4nr/WBPquKcvfYu4z3Xj12eq+sdA7YxG +QmlyG2w3PGCi4UmHjPmG9S1BY+D7M+RU7oEOkG29WaTuQYfRKzybdU1IIKyj +42knWIsOO3K8sSaer+Nac+WHP3vhdIJUW4xEPfpQVldUQLwfX8NKXtfWUcht ++Vh0ta0LXM6W3J0k+uT8bMEy+yQSvPx2U6tBvhp1K1/4+pg431l9BZX8XpLA +8f3uqvlX1WhZzv5NBzG33kbQu82fBNfjvO857qtBSdmu7B+J873uZJXZt/Ye +qKRdoQpZNyHf7ra7McTnUi0/X1ytNwbMn8bDXZg74aHvxL3RR0R/Qg8+0O5B +gs90No4Myxp0Q3BPMTP+/aufYikjR8KAhyTmf4Kot7L33IdvEfviznj+PM9E +CfwtuKowcGwaitq6FTcQddaWdGH21vtR0JGwXENf6YLcYo4MEWIuiOSQkqxK +JEHEovqrX6rV6NYB2bX6xOfSKj+i847of+5PWDmso1Sj4dHk++VEXeKyDTKd +kR8CfiPh2os7SfDU73AEF/M0FF9YrSKUPQZ8SgnPH5i3Q9S9zh90Yt8Z3cpd +y0P0w9JlPZFNPbWoUK6z3JTow71vH6vkGyPOfTXpl5PX20Dg0N2QGuI5JmjQ +jkpMN0JjLl+Xn2sPii3Rbv7tRpxTKkX8x/fWQ0Rd7U+J872o6r3kiD1xfm2c +ue9a0d8DzYc1/lida0Irict5D4j7uZUWOvHr6wBIRozrCw73QeHTKK2CJToM +VOps1moeAJ3zwdYk/h7gJlXG7u2eBkWjEKYIQTKwxdUcT77/AD09K56WQ9Tt +V6JK+iG7yDB8U/qswsuH6K7wcbF9xL6+G1s05SFGhkOzogrHxd1RLW/HrWNE +PS+Z0nynIEOGXwb9HNbpnihpmvl+MvG82C/zz8mdJcOeVWB/PPExih6wfLKT +uA+fLYw3779BBjnlqDOaEk/QTIii9lZi7ghUSHYo9yLDdlsZ7W3Vfoj5GMdD +KV0GtAec9NtUS4bJbiYX8esBqO7MtvK16gyojXp7+czVfpgT2ZzwTTUc9Yas +X8O+jwGNEZW/npIGoTys3KjrYBZivr962wbvWdh4MFBqt8EYpFSliB0Oy4B9 +YRLLQT3ToJ0uWzUyNwAXxRp/N1GTEIueyAX9ulnwsRV5ttQ0AOn0qalmWiHy +kL2fxSiZBfFbC6x1Jp/gTp94SM+7NiT7ujRSnvi8AtsVjmyz7QLt0sQgTVIH +crhaS/VzJOaCPH/qZ/ZuyK2z15XsbEdTmk8+cxF9KVXyy5iqUCeIsZMPK2/r +Qom7WoU+PyC+jmFhpIEBBQZL56xCTPzhVDCvSPkDOiRvLfjtaEGBxxtnqVKb +nkNygpdWpzUdep8ELf91p8BH/mgRzueBEFBE0+kxosOwMv3R0TgK+OlKFvNJ +hoBx9/l8bVU6xL8Wt41op8BVJk5VlfpwOCcmeWt5Bx12OBrdP7dzAgJ5Ortf +eMaAFs0jU3WQBhwWi5JK2RNQv4E7LjolCaiZN3csmNJg6GHDT61gKhx/c0V0 +b3cm3Lm+TdM3bAr2xFpqk5omgd1XLNWKWgAX016YyVydBD7fw9b06inYdZk9 +BGyLIa3gOzdNgQr7Dz2rvvCWmE8i0q9v9yDmEKkNf/cRn3+tVnIE6146CpD9 +/HTLlRYgOY53BgYR5+l3owzPfjq6U+vkdEm0BObWMkR0ksahXmCPN+eGLpAM +kLlSpNiJDqdZpTQS998yci5v44MB+L0rS5n8mgxz1XNHJ6h06NRfNZlzfBBy +eCX56D69IHljDU/H3Wm4EKxyV85vDI4/ltloRnzueJMM/UqmMTjBefUFb9Mw +JBpr0TNeUUGq2vGtIWUMSi5Udbv8IsN3MyafofvBSKAsUtBRjgE7Ni52FCqM +gcmjt4Lmz+pQvn1O0heHaVAt82e9QdSTIff6q12vg9CCzvKf0PuzwKLzaunh +TxqaKdr83nChFXYV8faR08bhi+MtmVd5A8Djc5j2clcWcne9aNfaOgtnbXYt +t5YOwEaNHIujLNXotXiQQqfPLCQLR21sVxyFsge3qAHHqECd9y2yjx6Do2t5 +FVL4ybD1lX+NkqszivA2L9Yi5qmGuWL9MWEyeAtMz3S4uaCPd/xZl4j93m9A +/lO5jwynzOlMRiRXZJrIsRGIOvn1peKqeUkylCVvjR3J9kAOK3oiLET9p20D +tmAFMnA0lTFdiXiEXK+2r2Ul6tK7wTXawdpkuDbLUhra6YVYx9i4Bon50ezq +BaEmGzJss9N/NvfRB3EuhQ4nGBD9m0Dyw0NxZDBIa5aTP/wMBbs+u3nhEgPC +LQwKY5TGwaUvsD8vegKCksKXnTRH4dakLa20ZRhY5Z6MCqdTwW7NVlpAD9Ef +q7+3e3+dAr+KGULRJ8fgU6XUkdLqcchhmomZ9h2Ak11r426kfgKPaF5z5uVp +eDrk/c57zQBYzU7MbFzuBoW7+vDj1Ay4DF4X/RY7jmZc0lPnusfgTY7ZxltL +4+AQkn9iOn0SGf9qfWQk3g/cC6nn9t0dB79vS/49XWT4feOvHXAFosIK2sAj +VaKvdt6tXkEZAr/1JcNTlgWIVPlwIU9qFvhHrXlzakZgQrWSb+rPPYhU7bdZ +3TgDOktt2V/9BsE7KbrzFHqFPHuDTbkTZyGm+e/ss+oBaHjbPLZ/dRoKu2Ux +x9c2C9zJTRsMMwbgYZTCuCLtDZKaeTxS2TwLpyupm2veD0CJmeJl7pIS1HKy +1KgldxbCbHWrJWj9kL50d2pMowHJB9xYeW1LrKsjDeUhDcOwi51tzd54KnTX +Rs4wE+eWZ+yhW8sCxHnBMa35PtoZucW37FpPrB9fH7cyFiEyHFyXWcMZ+oCo +wwdbjIhzxMbs1bb7IsR6Kyv+ejXRBSW0rL4aT6yroixxxqU9ZAh9p/4mo+4h +unTnVFEDsa5OfDBPyDlABts1MYaMNW5oc9uqqE/E+fJh9nJe+hHiHNlL27Pa +xB29+3nmQSWx3oTu6+y6dowMR/XBy5bqgebicp95EOd10q48ASZZMsQGpV85 +2eKJSsBpOztRn68bh+wrVSZDsOWxip/vHyHtGBYVfaIvSjzxpnzqPBl8q0dr +Aj8+Rr+eH/qhQ/RFRSdWOKeukmFtV4LNYRZvFH7IK2famAF6ge6fr5uS4Sqj +lW/A+gniptnt+GpEzK0x65JkHcnA43R6dQufL/Jdr6h1/BoDXoisu7XyjAxr +Dj/S/7HDH900bRi4eYUB6azjZTIZZFhXyDbKkvkMBba1BQxqEn2ID/+eMj0K +mEZksa9jPIZ9B7ileV3pcOBp6X7mq0RddDu2tPaMH/zsfyw87EYHrTnzb0e2 +9EN52lNfSY4QRNtG/jp8nAHF81IB+zgGYMeWWNaWy7FoneVXY43fszCWuKCs +d4SG1rBX6wmLd8HCpjOMrtFxOMPhbXQvlo7czb+5Je6rgs7zQUaf0TjcYOIz +9oofgqPG65em6VRwSY6uG2ceh7vdJ1fH21Hh/pSRn5YUCZpO7FnLVDYB1m03 +lGqzB+F7jGfEriOTQGmPeXiFcxyCKfzrSyOHwLlXn9P4CxXc4hwurloZA82/ +QvXOXv1g231k0+jzCHR/f/a1RkEG9Ha8Y3Yq6QcNCwtdaZ4otHmL09VwLgYE +ZPpybvg8CH5cR0ujtk2CS9Fduedc41D5uCTLXm0QTK/OhW4SJPpQhqHzR9Vp +qNhrY/tMexAu1CpsPB3bC4xXazxCiPn+2lPm3VXEufTZwUptW14vcLnHCnFP +UUDA7b3zSTIdCZ07bqimVwy3FVeJL6SPg7FxOKkvg442ebRe+2hSA91pu2Wq +X4zD0Ebzw3J8ZJgeqR8dLHVCReGHaxOIfUEKYCUZMAbgkOm2vNW/k9C8tEl4 +BtFXtPWsOnHYegAWLmaJfMhOQJQX1NzYiVnguSQpb200CiufVULzjlKhI/cc +fdJzDBw4vKZfXh+AS7ce5FZMkOHTU+bM0iE66BjqZZ39OQDXZPd3qpf0gX5+ +14LSHzqwMbv7fGQbBMEl2Hzcsg8u1tpfOM0+DV9Ji0nPPUaAvzT1+V4bKigJ +Hdif2jwGV0oNHjoLjMChKR3RlEAqRBmwZZu3j0HkSnzAScMRKL6+Ucw0kgrm +xzKDWDLGgLJWslnvJgXUU19rfiwOgOoZE6YOBzrIrknnTSeu77caN3FBfiCm +mSi8Qlx/0a1+M8eWArvNPdvu/QkCJ+0Nl/rN6SAhrdDx7h4FCrIdMlJknsHu +8h8yPBZ02KvlsX+nHwXcZswtTouEwoY7TmEnr9KB+iZqYcWbAtyCv5/U2QaA +5mDWygV9OiCbywcuZ1JgU8PXA+JCEUC+uU5NUJbol7iV4oySKSB38NuRXRbB +INs1MmKvRIdrnuprm0Yp0C3m/afwRTR0lqs0n+SkQy0LjxGtiwKJ/vN8CxFh +0CIh4fVqOx16uD/sP3ZqAnyotosD5ATw+ZKcql5PgxLFKe9K4QkIW5bdoxz4 +Eq5qu92TG6LBmOqvgPRPE7AtNHDbhcU0OG7Vk98CNBAz9hHwTZkAkw1PBkS+ +JUCI3RBbmRUN7owZWv1pIZ73p63RTL55sOE5lax7ZQpin+++9teDCuJd8lIa +rK9hZo2ig3b6FFA8MmK/rZuCrGaNQ694S2Bhy7cViXWTsLpW1z6odBIi/Zd4 +hfblQ9qn6Ae3rCfhYHLja22i/0nZMqczlUsG7a8Gv7km6CBQQ+H/LTsIx76X +nOssJgE7Sh0M2jsNm2s2eBtrEddfsS+rR5Oggrxm0HPfNIRFXTrjtW8QKjyt +Vr8g5tTOmHPibiHTMDhfOFEcTQbn5tSZdQHdcN9VMEY7bQbGftCWxfZNgtGz +rZazW/Ngy9rw3t2rpqDTKrFlsHcKfnI83pH84h2MMh2s0OahQpj+wr7l1Cnw +dRO+GmibAp5NLkPiT6jgaW7TL8JLhkv8WiHh8U7I4iNv+5Z7DNh2bbe1qGw9 +PP0RVxEjOohmCnYeEIBZ0LxfMyAzPQQx+Z/2NE1R4dHwFq0nk2MQ+ODM/jpi +fbbJ5g6xpz6FW+BwrZFYn8ENyxpv7SngnMx8+nT2C0j6bdCbdJsO43VD3pPP +KUDhKXn8aSQIzKhKagvadMg22sn7pZACQX8f9Us2hULzl6DubcfoUKrmSN2/ +QAGJWy+aF1WigFtelCzOTIdv3kObAg0n4KyqkH9GWTz4fvGUKc+ggYi8xU0q +FxXevcqOdlNJg412KU0X2GkgbJFAfnuF6E9+2NQ4zJAh2m+AyWSYDmV3jWhr +ZgfAeN2buhXtHrAfbdLZgqbh5amtMzNEnynM29DPE1IAwhJXz70iT0P0RtNW +j8ufQEuymTVwsRVxb5s7pedEzGukQTup0m6YXP9TYar1I5KsUUxc50Cc43y1 +9jsTaJDN+ijrijkFSejoRpyMbEKr/h//ClTr3pn5dEHxqke9l8c70FCls26s +LQPWHNRdib7cCbuC8h+JrnQiiwpKqzrRh0eZ1YqELY+DNMugMyxOAJdS5ivO +pSG4eW0pbOjeKLxUHM/4yduOQjbEbHW/PA1mlmKCjQeGwemA2vq9dVQIaGO8 +G1kag7DfFrSe7iFgztKbiRmlwurT8ZrRP8agmTOIOf9qD7jvFduqFt4Jde+K +gwcHZuHJyLMBUsUAHB0IS9T7lIZuDw7eu0b0S5HT9LCTaweBKv39yvyNPhCQ +MfDdtYk4F7LeMC4ZDsLWk/ejngvGosqhhJWOrFkofr3GrI3otwtSzr2eUsxD +D5NsKpXqZyFdvqeyZbgfmvWmHDNkm5DPVmYDB71ZGKkeYlLNI+akT2e+aRh1 +otDCmsCRO+Pwta+0473CKPhVF310laQC/0sP7l3xxJyQlzu7Zd0IJPmfeiwp ++wB2zIwwl/6eAXQ6zseubwDUu4oHolXKUGBCkIdf8iwMdspvViPOncU71M1c +HM5oZbOOQSxx7nyJKQvm3U7MOc9PlUYvOiODGp75VcT1P8K//6YT/VjYxJTP +bdaHqHzn5G/889uEQsur7AeJPrxvYM7H3Q0tZRdlVBJ9l5zjesPvRH81uOf1 +ga6Tnij/52L0NaK/ismckC5VIYPmLBgMcj9GrK2UISGij+pZb2f2XI8MfJbX +aDlO3qjICsaeEv1SSXD/3+0PyJBV0aeyttQX7VBZXxqoz4Bf9GtBX9+QIUis +v/hw8nMU6iTR+/wCA76vnARZkX54fYj/ufTWUCR+UtZL9ygDLkWmBxWlD8Eg +t+a+tcS+7p5x2syKnYKvaU2JA2S4db3m/LhUEDrrJB/2QIUBnu2FTpeHh2FV +79KbU6bFiMzfw3dmYgast74qOUz0q2dWnnttXXiAXHNj3l8m+lVx3zzfaKIv +/flaozDzmCvKYzYqKyb60vPehqXC4mRQ/5DR+ITmjoL/fjBPIvpPhYFzZR+I +PtNGJenGH4FHSLM3v22ImHd8cnJXHbhABk/WO29spbyQ1YFgvw1EPzmaVLzo +c5sMMn/mNOcXniDZh6jXgegbE2h/sr8FEn2g+GjZ1jF/dNXh9dGHOgw4Fs3y +LFKpB/TXjfpedW9Bim8iPzTcYoAgf+ybgQfdYNFlqn++vB3J5a9L9SLe/zOL +j6SRyE5Q5/EOFqjqROeusZ8KwzlCSlel608T9ZbL8chiTCTKvc3/xXaBCkXh +L/mDrelAI4vqkt5VIeENt7tvfx+H6jfk/DCjKSjc93tnvv1bUPh9QXohnwof +t+bEkLqnYN/puYOR429B8M5ZyZ1HqND3zVztnHEn2N7pIkt/6kSdM1FSKS4M ++DucIWh8oAu4U+hbPGU6kd5LL3NtewZoW51u9HLsBj/2pao1azvQYM+QXiax +roT9Gmtu1fRAVHh5x1hhE5KmiR2+TKyrv3+Cx3O2d6HyI3FJqScmoeihV9i7 +g8T7+Svul97UC2I9UWsDvRuQx/K9s4VaxP2ft+76/LAHyAaevel+TUjZsuBb +HHEfnqs/iydzT4Htgt3L9XsnYfNnqfdKixFo/sh6e279Tuj6EyrhQutE5RMc +HEnODHh9gFJ1s/YT7Hms5x+4rhVNZEpkm9kx4EmgBNMf8gwEuI6q/mTrQLEa +Pi9FhQdATM4/tp44F6/ZKvVTnJrQ8s+pkjrieR2eV+Lh5f4Ez+03pHz9044+ +Js7qrb/IgHrzw3NyKmPgEzj56H3+BPRUs7++TtRxhmZNfbJMD+Qcb46h6rWi +YXc9cX1dYk756wFvmzuhvszTpNSnE/HpHDH0J+oqswLFKux9N0Q1jT1M42pH +weXfty4Q62Gb1ybnr8JTYP+ZcaY4rRscxDlW0dopINTOE/3lZDcyHtacGMuY +grvP4k0aVSlQbTet6/piEoWuJLp5PeiDu1eCWTiEKBCNqsQX1o/DxS5FE7GB +MWg/4deb60YBw/XNM/QEGroTeK3oMstHWIzvHni7igLnA4INn7TSUd+mO2h+ +oBiCTSgf2UrGwVJLO2Z1eQ+M6zgu8852o1f58j7zZrNwOVzxNrfXBByQfHv0 +3fYB8BNtuiT/cAJEr2l1VBsMgQbny49tS1QYvrkqx5NjHNoK9ky17ByE5p6J +aw9+98JO9T89GrrTUCh4UDOV6B8eOYluj9jTBL82Fyhrx09AxD65oNyiKdA1 +HLv3OqcFrvOFRbTqTcDx5uJCqSw6EjuY0BjX/x7O2q2Tq2oah3JLum92xwBE +PdndElrQBxM17uYqbNNwMenO5CfGCDyVbrhz4RIV7qSKLYqWj4HoY9UVPkMK +sGqml3076gnmo1FHUh7QYUi39gm3LgVOW203ebriDkd+zwc/JOa1RvVbq7ZY +UCCVEqHv0vgINP/oduTb0MFxy8mL710p4H+nLu/yoBe8Gxqtv2hMB98P33+n +PqbA8BuNM19dveGlRGFhuQEdWjfH80VFUcDOyioxJ9sHZCK/jOSco8Np37f3 +UhMpULJU6c0T5gsWCodJ0Sp0EJVd+4a5jgK3JfOmLpc/Bc31k6OB+4n+OcZJ +qZFtAqKam6l+vkEQOWF2b3CeBqtvnRL2ejwBgo5aJie6w2FyX894+Qsa2FxQ +nLQ7T4XA1vIhl7E4om+aHqYOTgG5ye1uxINJeBMrvm3TqTSoXPVu0Ld8Em4k +FNULPh8A/vocDTxPv/At3lvxjQ7SfLrWzMoDoHDWzh8RfU4Vi62pF4WYC6bn ++/TWD8Iga8Zqp0kSrL0yFjV6YBq8XwRrymwfhIfbKWxqbiTgKM28qCM3DXc6 +/E21lwfgcfztuut5PaCxaHTD6fU0iIpsv+RbRoYuz/16Z8O7oPb85fM/m2ZA +zPHg+vUO/bD7SIWq+oFuUGv9khzoPQOWX8+IzG8k3q/E2V8XdyfDC5u/nHV7 +pyBI9F7RAaJeMDusZ140TgFWDwophGMKEp4yDLOGp2DoNEtsJlc6ZOh0GQQq +UyHfP1uqp24MdGfSyOsN68HsHNOI6eZpmAkwiNqgPQwSeVayeu+pMHJ4q0rY +/Bhw50rqygSOwlblynM72Kig8uq1/g2fMZDcfWVQ05QCugbmIZGvPUH/1frW +6/Z0yNTw62q9T4FA67s6qZ6PYbNz+r4CMzq4vks7e8OJAqLr126aVfcC6Yfz +IfamdKj3ZCMJBFAgt8EuQ2reG2x3FtaNEX1sMNsjbtcgCoiEbYzUoDwBUl6L +8F8tOvzmtLp4j+hvHzlIyp8y94POY8NX86WJebOnkf9wCQW20e4Jtwf7Q9bF +e1sKpOhwMO/Vwu3PxL5PTW+OSXwBsxdElNavo0Po9qvPAxYp0NMkerZAPBCm +r196wEz0w5y+s5/J2hMw1sdP27UjFHZI7/NbLqLBkwUz164/E8D4+Wxvins0 +bC4TOf5KhAbLa0nb330cgPpPA+eVDvWA1/DKmbCPxDzyc0Y3WKYbVJGLzRX+ +DjRXmRVKI+aCmq1K9UXl46CT//Nzmf0E6CmPqPBPj4DnyZ09DWsG4YCl1RHR +1X0gt5+5SmX3NBRNzqbQpUfhh1+v9F7iPNsYuDIqlj0GSokbX1VwDEJQqf2e +Bxt6QfHQQyGboGnQLGvrOUXM/cUNEgI2VybgmbGD/uzFUXC+92I6RXQEBrRq +N34h5hZZlh+cQaQxeF6R0ki9MAD9RXL91NOf4AT/aYknAjOwZVxtZqhyADZu +jD1axdYDPGX1LqpE376pduixAPUTPG7gLh3V74A7+TT1ih0MGGj0SU5sJkO6 +6amvp4r80Py3imf5agxwvD3YNvGZDM8nvi5O7nqG0mPtHmorEH242KLrFFE/ +g7q0JT8kZiB3sQD367dmYepBmPftV6Mw4eqTHRT2HrkrjxgyiRDnWX2BauWZ +cbg+KWGdapAJiw13+h9LT4PxRNj35PBRiI5vjWFJiAGpjxd6nPRnIHPoeuhC +5hCYSrGqQrgnsqrre6GnPwumJ5p7jNgG4TRtXlNw3Stk2dx06H7VLKSwXNkV +PTYIClHTKusGglD9IZkdki9mYY6ky1gzMAB57o9KC3gT0E+Kru1w8yxMLCh5 +1xYNQBlnNPh4pSBF9t1Bap2zcJjPyqe7eQDMpHbrcC3moJrtEel5tcT3ZX4f +LvJ2AKY8M4D+Kw09ORZ9SKd9FqIOZ8bSyANwwSle0EwiHyHL+qKt72dhNNxW +RWxkAEoetBj8WipFnD4qA4tJs1ArlJ661NkHsU/3WyuptaPZvM2r4+7Nwq7Y +0/FmxNd/vaRo4i+G0KkzOhqlYbPgapmzvFOQDEUNXmZb9jqgvNcc5F7i/N31 +7Fj5LgEyFDKd27gn3h7VI6cJFaIPt9A/VSuygwwiak5ix80dEDffV8N44vUu +abfWGwqToW5qybF8yQFFz70W2EVcz+1b83dFlAwseyfmHUn30ROUeewa0bdL +7uR+67qTDNeq5VcG4T4qi3cboxLX/T58CVXaTcwFAy9eWO52RGJcqt+5iesS +/uGevPvIkJdco1bd6YiK1m9b5Uz0tw5Z+5bRITJs2vjotsWoE1rFopB2n+j/ +77bO7vHdT4ahr9R5pT1OyPzT9hv7iNcL5m2JuXWYDKFv18ZZyjkjlcqoHH7i +9SyST6u4JclwXDIvdZLtAdLN9M/UIPrkrrEe9lMnyFA28o2j9YIL+vIEvnzH +/1/WyCX8Q4oM181qEzfbPED8Y8ytE0Qf2Bh/ZeHuSTIEhgQlBte7IMF9J/66 +Ea9vXxdgZgJkoF8XWJBofIgiillO3iH6bU0t5xNdZ8hQ4L3z+aipG/qQ4m4c +akrMFwWxiYuKZECeJc2rVF3Rar53sv1EP2np6/pgSJ0MW7QOP7NadkNpJ3Xu +4ZzShjOB30a0iK+frSDzTdkDDeb0dhkT/dt9Fp3iTUZk8Gf+1NeS74lq33vU +lNwgnqOBsOMzHTKMbvhteILmgQ6tKU4Ku8kA2oezQ0E3ybB2rq3ZZ8sj1PXH +SPr9dQaYHX7qIGpFBrfz86uCvj5CER+4Qu8YMuDA9k6k7kmGd3ESLzTsvVDt +0LYVST0GjDTNHmyzI8OGudqVUrPHKPRGLN9BA2Ke+vHiYbIvGVwfZz/RYvJG +vz+YS4VdJZ5vUqS/x0syaO+eDthx8Ql6spGuk6jNgKHeIF3tcjKkWCyd16vw +RSxHjFIo5xhwvOyMnF0yGfaE5147xeKDqkTIRZZE/0z+fuB5NzHntgpzb5hU +T0YibdzWe4h9J3VBXFJYdhjayYlprZXEPK7VKc5FzOPftLJcjWcHQKhs9bWr +On1QVftAo3HbNKTnloQnRY/Ar4+JO4xuU8FaQ7OQuXEMau3ueDir9MPmv1Jb +dhgEoaqDBzK2iDGgJZYedWNtP3H+iU1tin2OHGN2B8qfIvrnFyfyVMUHQWck +Nrwo7CV6JfT4dXXJLHxK+aiYWzsAGbvUnMvLs5Aps0BVcsMsrGFq3HXuej8k +Ns6W2Cw3omt3zmfMuMzConaXfVTiELhFNBXfJ+bHo6tLSWtYxqHskr2s4uMB +EDAYtZeyIUOrnPdI+hfi3Nzcu9NYZwjeBfBG1v2kwi/VsuGJjeOw9+OfXX+n +h8CY9XCs9ScqeGx4rtu4MgZ79wvLnBAdBuFLH3/f+kCFXYe+Fuh8J/pD3r5E +QZNRMF+qf+rNTYXSVwshWklj8Gxrkf1qtWFgPGNzEn5qgG48q/NnlpgFyZd3 +TTgnB+Bnfqz7hfPF6LzynQNbM2fB2ZqsL89Pht+Kdn0bTe1R6gP3WEeinrAk +Hk+p5SPDauXS3GQVe1R8YEEgmLhuot7vZ+o5Aky96VmaVlT4c6fUwa11DISm +pP5GbSfDVd7aa4urHVB5/A5b/Ptar1I51LSIOmO9paH/45v7KIY6HeRJ1A3p +u71RowfJkCPOzeryxgmJaN3nTCP2+/k3nBZbjpOBmYdfI3KzC9q1M3bPCWL/ +jlFdzU6okiE6LtPpwDY3pDGknTtL7EfSckRoyTUyDPvc2yfv7onunWvgP2XM +gAWfj/t9Xcmwud9TwXq/F/KlmZ1ep8+AN3Vz8sfeksHsoP9+VkVfVPPme/0D +DQYEkHrt6yT6IdXzYYTOw0D02viqlqEEA4SuHhc5V0XMCxnRQZlDVDivURqs +smYcPDjmjUgTY3BNtpB5E8ckyBR93r/sOgQyw+8C2KhkoLQcZc+2fopEKnMO +1SsxgPPFMxr/4AhkS9+AM/LFSKfEXYErdgZoZwS8HLaRQWgiP4g0Z4e8XtDu +kIn77OB1Ub9WiNh3fytc8jockHG5+eXTxP3ce+35Je29xH4//K77Sooj4kjT +d0ki6ud1zbdO3BJkkLIjWRV2O6PvEaWnnxB1snHuw2VWeTIkHJmzNfJ6iB47 +7X9fRNQ3w9otKQua2DGRfUKddkdDZw5rtRF16XVQ3gZpCzKw/dCzSHv7CImm +FXFyGDFgj7O6tWMYGXYKrzvEveCNfkyKllReZkBo93I9cvwEbkzTvxlqbUh/ +SsdRmXg/ttJcepKkLuiJHZgweNyBFjXVpW4Tc656y5P4V3pd8Knryrm2VZ1o +0nT3WnkH4n2G/OAfuNMJclZfK+YonSjRZsfuv8QcemN53dCi6QCMfApXfpdO +BivRQXmZGTrMGNl3SIkMwtefjlpXrXshqWu9bbXjNFi/sap6QRqEn6yd7EIv ++1BF6BFP50Y6HPN7sJVz6yA4sP/V14ghwYWAjYZeJ6ZBfMf7wtqNU5BVKLZ8 +js8CvWCW5dKSmIS6+32MG8ScYbcpuENkNgxFx7Y7nHs8CZb37dLyS8fg5Xnt +D22h9aiicF95L+80jLzZ2f9geRSUea7TWDsmQOTMhOMqkzHQb5V+WfpnFPgW +rLnW9U7Am7CpxVS9MXDV2fWZ7SMNXohSw9TnG5AQEyvVX5MCoZOzu+DpFJxE +lseioiKQQUgA9XgmFT68y7zPeXkKmJ7+1G7gzYTjyn3jwyQquAU+UdBM6IeU +yL0cwlJhyCpY6EsiLwPmfh95/8CyHzr4ga2/OBhJfgp6TRJlwCrb09u+UPsh ++mjt3qU1EUhw3T3N0+uIfbc0FJaeNQXrh46whQxnw7tR/W7V+1Q4WNR2w3pg +CkrZyYHJ5jkQmpERZQRU6IlHnWA+CCGL5YrMl5JRFyl46FzaLKjc7i9QIfqZ +s73bl9gex6NNESE7932aBYUT01ZRsgNw2bfn2qjuS2RtKdhl8HUWXn3+O/Dx +KDFXnjjKsiN2Ejr8ipjMfpGA5W/NrGPlMHz7vkVJMZ4K78SfNbUR++1cbOkZ +Ca9uUDjmxS76qB1d92romCf68zebsi6wCXTByobymG8nOtFKDvlk3X0GbPlz +e0vQYicMSH2YSDXsRDzuHd2CxLq6qa27RaFvGC4I7mfpi6CCGeuNl0OUMSDN +3FJmWdcL9leZ9JtRI1pmeKmlEOe7SwRp9PHxLticXMUmLtKJbn9eFVxArNvx +F6vYH2h1wZqwGvWU9Z1odn+2/g3i+uahY/M1IZ3gsa/NwLuyExnqa/WHEd93 +cmQH10BlJ3yftGtOD+9EbWbtZ/nw3x9Z/AwpkO+BeevTQZv3taDnbqRmd6Lu +DZSW7anv7oHH2hubcm82oXmz6/rexP4Nj13xcNMn5rjrkyWv0z1g2KKZlvyQ +Dm/fKmbN47yFwcm7ZkGekL51nObkRAcbkelkPmsKfD/CqvBV8TFoUA+qv7Sk +Q1Z/ophHFwWSff39HXiew4+/EqacO+jA/u5T12+RCSCxZ9iVxwfDvWEJ591D +NDBnEyrrz5oAU/YyTSiMBAXrzRz+FjRQW+G9qxBIhWOVuW9sfyTAkS8+hYHx +U3DuYJL4ubZJmJfJVfTnfA0VvlPWuWaTcD2SW6a0mZh348oy+2xT4MarpMpn +BlQQNBJlNTWjQMFMctcdo0cQJbtzztuODnLrRC9qGE1A4T1uuWAIg5uFFV92 +ZdMgxjSNYsBJhcpDI2uTpF9B3Jed9Z2baeBfUbyleKERbSuii88btcFz1eNy +w15zsPh5ekO5xRRoRE5LfXbJgi+xp6bJFcT3dds9mHeyB8wTi7KkD7YgZXY3 +X1aifi6J+zg/i+kGlf3nFpTU25G82Je8F8R6u65yqH5PVRd8fLvPSyGkA+l4 +bDIm2zNgQtlijUpED4wPKDx+JNSMAhx3CPkRfWaTkLfW0kA3bI+OOrXv7UdU +GNIgF0LU+ebYuPUVvl0g2LWPU6m1A92l3zAKJNaPnuyQiHHNGFgGLxlpek5A +aHvpt8ZfozDF4wp2inR0WMnERsm0HtYPm+xJpY3DwO0fa9hG6Cj6z5igZGch +Ma/efHwlaxyO2VtqixbQ0dedxm5tW9/DhxFO29q6cchWNQvqvfwJlAc3XHgY +1IYS4qQEsohzWUT11K4020+g9rzrUvqZNmTwJCYb/10ts6lkx7x4J3QVjg99 +2tUBG45eaA5A/788bfh/5GnDv3nawbUT/+RpF5KYPFmdG0HC/mIQztM+4CJQ +gvO0eTzupQ9sagaWbd6A87T71ziN4zzt/vdILrS7BVILGFE4T5vCobgB52l3 +/GR8efShDSqX8iVxnravnd4cztN2vKjXqTLdDkFDDzpwnjZ74O4InKc9nHL6 +T+wO4nMcfb8f52lbz7O9xXnasY8OTxw2IOrHuUU3/HepLse7inGeNhfTuzv7 +07rhcahyIc7T1m6kyuE87biedylMnz+BxFy2JM7T1mcKkMN52sdlFjkpO3sB +RjmbcZ52mXLmRpynTdrTmJYgSgJJma/SOE97pbtWGOdp+27SCNUnk8DPWzfp +f+Rpw7952s9lvYNxDny/mO6Qwa5asA6R/CcHPp5lqwDOgd/8QkCz4FodlK6m +/5MDb5okJ4Nz4Hl4b/KmldaD0SPVKzgHXnPoqTTOgW+tZJ35pdAA20nJTjgH +fob55D858MHzc0f//GqE6zl3uHEOvMOK2gzOgd+hbrKdj9EMnGd+KuMceGkn +rpM4B3587V326e1tkJ6ab4Fz4B80vnfFOfCZlLn2xBftQCd/TcU58JLcq/7J +gd9Q+vBLSVAXLC7xTeIc+ODat0z7LNqgo50ku4PzE/z4dTQV58BXzgvP4hz4 +kwKOy8bePcDE0i6Dc+AZn9hkcQ783gaHZxn1vfBB2vgezoG32LyzFOfAC8oc +bzFJJoHQitIxnAPPPMV5GOfA63w5lqe8qg+MJ+L24hz4npPf//ELdjK+f53R +roI7nJ//8QuGqY0z2C8ILldKtLKthtbPtStviftQn3jkNfYLhOsEdujm1UCE +pUY89gt8XpdOd/zuBa5zPFZVm+tA03FIM56oD+9H3jlgv8Cy9mCFbEU9eLdx +dWK/oAkGK7FfUE1LO2Yb2wC0PN/v2C9gMVmbiv0C3oeZItINTZDyJ3Mr9gtm +tBv1sF8g1Mz7WUWlFfzPFG/CfoGic4oZ9gukLOjLbfztoFfqEIP/zmj/ATtj +7BdIS7QZFO3qBGGOlnnsF9zVvMiL/QLvjWsS3Ee7IPBryDvsF6RL+VOwX2Dx +yg37BRD8vY8P+wVUXpI89gvSspfi5DR74Z7EFhfsF1zPKBzFfoF4z/wRWTsS +JJ3U24/9Aut88nPPyymgfPvX3XREghc73spiv+CYwoEq7G6Ebw+YfFj0Dk4d +OHkNuxubF1/8lWXrg7SfmZdnIsqhY218BHY3/poO38HuxsucMB2VqkowU+6M +wu6Gi76X5lwmCZiyiQnrQxXs2J4ptfv/cDcU/uNuwL/uBrtLYwp2N0Yktj6V +a6uFh+kFbtjdKGDkWWN34yqPu1R4bz040oLmsLtRqXReAbsbl4/SJuWUG0GU +6pGC3Q3yz5f7sLuRf15vmSzaAnGP7RB2N/pd2FifnuqCEWfla1ulOsGpOKAU +uxuVQhNy2N1QFnHW9rnVDbmLxkXY3eBsZ2fH7sam7VKvk9J7IMRdWxG7GyXB +xcO5gxVwVHPBYMmU+BxVpw9hdwPOr/6TORwPZ/nsVXziSHB1JOoBdjfcuF2p +2IsR63TPhutFIPHG+R8vxkZeWhV7MTItp3VMht8Ca7W+KvZicg8lT2EvZoyl +1u1odAkszin948WE9Vj/xV7MqerfdYJJZXB6534X7MUEpnBexl5Mm78b+x+2 +cuhzLOvCXsyhbw+5sBfTzHgqbPulEk54vL2OvZg5W+0A7MVE5JoZX5OvBs1t +OXf/hxcD/3oxF5gUyNiLWWMo0sUt9gHaThtJYS9ma5JXFvZiErz5ziU9bYLc +YR9j7MWYSyyEYS9G7jgTzTmoDbwdXP5iL4ZL2XYcezF0VQ+dGOVOom8rVcA5 +q78v6l/EXkwik5hnkcUn2Kn84xH+OcyTDZzvsRfzYPXpTUIhJBj/STuIvRhx +s7su2Is58Mt746bgPrDt+jaFvZi8lgsl2D+SEpVw8nyUBSaBz8j/wz+Cf/0j +R3ZhPewfCdFvXHJjzoOC+a0M7B+J+GakYv/I3rl4tNsuHzz4Xc2wf6Tjc2oP +9o+ykcbLbYcLYSl99QvsH6V4sCPsHwmb23m5XngLRS9OfsX+UVZ4vhX2j3x/ +TciL/S6BOxyXRLB/FDFjPIf9o4tvrlpxOL2Hw6uC//GP7q1PD8P+UYH/ep0C +riqo3hSTiv2jcIe3e7F/ZJdyMtJephaSy9z+8Y9qJ1KOYP+Ii7XnndfXD+Ba +HhGJ/aO3emJXsH/EfEykyb2zGWoU+W9h/yiHh7Me+0eOV8p3H7fpBBOJ743Y +Pwpb/C7UxdkM365HrD/PRoKaze6y2D/KEpXga+zzhF/HN+eWqQ7Aab/dh7B/ +tEfcfg57XjzOq3b8KYmB2nwbT+x5CbxYK4c9r3BJi73aA7FgYCl1HXte63bT +L2LPi8W+m95wOAHiah1fYs+r8XPbBex5Rf88t9U1JxFeHsmaxZ4Xexx/M/a8 +bO5sTwtyT4YYlm812PPq26O/FXteVKqp6pmaVIims57FnlfFw4Z57HmdqxRK +rnnzGq4bCN/HnldQgXAO9rxUNpvt48rMBkdyTgH2vKRDIgWw57VjqL+dcT4f +WD0ze7Hn5eNpwIo9r/N/Lxee9ykGCkOPF3teZ3XNT2HPa00n67RSSBVMqNCb +sedVFzG1C3teZ84pNxxfVQoy2x0HsecV+GnTC+x57akOPHtSsh6EV7uIYs+L +vKNuDnteDrq5XeZ/OiHri2Qm9rxIJ9RzeK3zoVr/c2hiwSDIm/kEYM/r//Lp +0L8+XVw1/2Ps0xXHXCz/zfMaNSdOcmGfrslCaRD7dIy/N0/WJWWiFc1l8f/h +06F/fbqGnP0XsE+nE5H/wUYtH+W8pjpgn67h76Fl7NNZZBXyzGQXocsVG69g +n+7rESVB7NPZjffR7Hneob9hYZ//h0+H/vXpzPbzqmOfzp3iU2KU34Q6mIXy +sE9X//uZIPbpjlzaEe2p3oUuRlUuYp+uYyFFAPt0nLG8q68nkVBFYj4P9uns +uUlnsE8X8DZhRlObgjYVVEljn+6S9LQ89uk+Dxlgnw7pDy7/49NZ1cYfxz5d +d+5P3Z8xY0hq0iIW+3S6fpLbsU/3Q/pb2HJkL9pyyeYfn05bgeMfb3Gjp/+k +b9dbFFRl1oS9RV7n5jjsLWoXzqmHVpWgoS8fObC3mMB7+Dj2Fqc+5g8Hib5D +vXe3TGNv0TJBRB57i/mxXPdI4hVo05G/zdhb5NBwv4O9xcaZX+tSE6uQ/loB +p//hLaJ/vUXBOd872FsUzjwxmdbegOw4v3z4H94i+tdbLDn6MAl7i8Z+SRu/ +cPWib1WiLNhbHL7JqYm9xRnRiKdem8bRm+k/MthbrLibwYu9RalVlYsGahMo +WfHPP95i2s3IfuwtflQdwN4iIo0H7cTeolBt1hPsLXa77fBKYppGaolRi9hb +dMo49o+36AFypfmzk0iNc5Mb9hbVGuoKsbfoKjL7rVZ4HLGJcf3jLX4drLXG +fiifBvf++K1VyGeXtBH2Q2smjGyxH8r5x+D5DqtqtNZ72zbsh676EH4D+6H0 +4Npkng21yODuDk7shxJDygz2QyN8cuWnNtSjpMZmceyHHr/u1YH90IUbRfet +IhvQcMERQeyHqmx5mor90L/ReZ+1ac3I40CUPfZDXZ7mtWE/1J7U3x2k1450 +drAHYD+0bmK3J/ZD9e1sYkPedKGdTTyPsB9KZl4Sw35ofK5++VOTXmRhppmE +/dCCs/svYz+0RutdatDRLvRWz6cB+6Fp9UrfsR+qjcxG9pAnUdPDY9n/ww9F +//qh879MzfVVI9HglUn36JPTiEeMcx77oWEpJu+xH+pStoo/PJOGjhr/uoD9 +UHaqvRv2Q003hUq4hFHRtnGxf/zQo1SOQ9i9zZjbr877vQ5R15oFYffW/fy3 +j9i91ZBUvC8f+QFJNK1Lwu5tmIryPezeVimlfYn0bER+CfsPYvc2tEXj6/HN +xHMZl1s++bcZcZ3YwHbYj7g/MRk52L2Nuf5s5JRnG8r99k3t/3Rvjf7j3qJ/ +3dtP8gbj2L39bXfhAJnY72plcmexezvL9JuB3VvqoE3Lfo1PaDlxdT52bzVC +uY5h9zbG0aH9WVwPmlpg7cXuLUN0JAO7t2n0nLiLmVPo588JY+zeVv/Xve34 +j3uLpv7r3h5aVL/PqvMI1a1vwe4tGnrf/o97G7Y7fh12b3sOv/lDsqQjDtn2 +b9i9/eF1/CZ2bwVy6uLCbkyhIuuaSOze2ryyPYG9ZobNkVl7tyZ0RIBjBnvN +50LIathrZqvJ6/1wpQUNnJzVxl6zD7lIGnvNinlhzues2hAF6Zlgr9mS74lK +wOMx+HwgZdOT6nZ06c/ZxowwOuRzHt+FvWZRJ39xiTOdyAIeHsJes0z4yG3s +NfOxPjc50d6F5iNerP0/veYX//Ga0b9es2FD8gHsNbvQJA4UrepFP0KHj2Ov +eXSv6mHsNf/RX/wpdISEWgPsorHXzOexOh57zQKK/gWN/JNosffmaew1S8h8 +FcFeM+fMnS+7TWlI8ehHQew1k/7rNYv9x2tG7f/1mnnf7rp7ZvIKlEsZY68Z +jTp8+sdrTlu53Yy95vL1lYrpbXSkPpd2EHvNS2OL0thrZsy6toUY09CoGEkW +e82VItqN2BmXu3x/tWNZG+pfqc3CzngNB+UcdsarVVtc2XKIZ3j36DR2xseV +LcqwMx6ytTWDZa4DKWS5HcLOuJ8bfQg74xby/fweu7uQ/1ZqJHbGab+fsL11 +HIUvIx0lda7daPwqqyd2xhMnBKyxM34l6e6WoLlPiCuPOwE742v6mOSwM37B +2eOliFUvWhVUaYOd8dP/dcaX/uOMo7X/dcat/uuMG/zHGUdp/3XG2ZT8prAz +Hqhfc+UElYZ62y5vxc64vvoWTeyMh8m7H55nnka19J4q7IzrK3MkY2d8ZVvj +9GPiflKN3YOwM2572dwHO+N3LplgZxxpRvH+44wPRDVQsTPew+YoP/OThj5S +bkpiZ5x+i24jpjIGMr02Em6tHchRg53fkrg/xyX9JLz+joLTB/b+1R2diGXP +yBsvYr3ltt4/+jR7FHLao4TYGF0oZCxebYG4bxdFzgr8PTMK5HXRKyy7PqEI +5oMGV1LoEOCpV0N+NQL6TD3yl+x7UEjygq9FNh02vWeS7HwwDIGJbm929/ai +/KpgkdESOrTc4TL5sGsInve3Sjmo9KF2Dd7Fzg90qLzJ+Zw5aQA0FS6WcBWT +0XAbs30RiQ5jIjtlzWkDkBB6UF3LdhLJd/pkP2Afh8H2i1wJN3ohm1/Pw25x +Ct1/eED9Fcs4FNn+XNMX3A5rTF/6HThFR0XC/Iad68YhZNMcI6axClp37/xY +sGUapd+Q+/CFcxxIca2/No95gVTqjkcVN6bRrGUnj6jgOOxbCvW5cbQc3dC3 +FHDePo0Gnm6aHt83DuSkkemQ261ox8ZTzfm6dMTY1yZgLTkOM+W+3tjzyt8z +ax7+twOUWw5twp6XzJHtl3BeephkV5hOQx061nLnAs5LZxLws8J+2aETTONn +Q8rRhT0mvtgve/7hwSR2ytwqV2fxjY0iLZ98ReyUbb9bEYy9J+tvasxbiHOq +IObqVuw9rQ137cVuWs6GZ68NkyZR5ybef9w0S/KjC9hf+/tL/2Ds2R40y3td +Aftrp+VjdbG/5lCwoELWpSJRvm+XsL9GNXWhYMet63gguxqxzjeWi23Djlvb +y5pSi+whKMkLH2xfoqIzeWqXuxhjcNYz4Sp24q6tHiMn+ZCRWB9LBnbiHr1h +VsJOXEhG7KxmyyQS+LolDjtx5xrcZrFHsy3LiZmypR7WIXk37NFYxStfwR7N +Xs+qkgrHOki2PbofezSJbWctsUdThXZuohDzq8/TuX88mpAn46yufCkg0ubJ +8Wh7H7gdUa/BDgiT5vhV7FtldDNvqPj4HL6OJp7DvpXAwA8J7GE9Ojhr2bQt +Eond5FDFHpaMwq1X2EWye2u1vbv+GfAcMlTELpJjbUIT9q08L+xl0EQCIcBh +8ynsW/1fHhb618PipPX+dBMlw62fURuufQ2CE5HOr7Fv5aIvroE9LNb3x+L5 +dF+hxKILpdjDuuK47R32rfqj9olWxIRAJBp2xb7V0t2wRexh2QSWzA4dSEBd +m4bCsYd1Pp/HBvtWAbHN4+6vw4A7Y3M79q2WyHucsYfVpevZ8pU1GRV93y6C +PaxIb8Es7FtdPvvbrEolEoJcHf7xrSL5FG2xh+Wd/oo5zD0ddT2YK8Qe1jbX +vazYt+JgHV++Wx0NhnHpu7FvZVy4fxh7WCcNVRsLv7xBvwfzGrCHFXDp1loj +PzJ8KVSa3tcZDycUrtpg34qkJ6aBPazk71lxyaNvUe5NGXbsYflNlOtjXy+8 ++Pjtt+opUL6lQg37etvZpndgD+tRuFpoZQhC77TW2WAPy/oVpRS7ez7HLfcN +CebBvXx0C7t7Q5kZc9jd28CSkJYQ2AEzOtwM7O7pRiW1Y1+Pj1ddV3aoEqQU +FEyxr+ciPVKOfSX3gff+MjEDcErV8h72lca7zv7adIoC7Vs9pM3E8tG+9Lhd +4a500DWZ+sdBc+3fpiMuHIG8NmT/46BFrr26ZgooYDQhYGXWU4Bs3O/LyzvQ +YZ2QZ46fKgU8DTl2zn0uQs/5z65NMSf6nKHzjs6aFFi/du37wbISJOJXFr6O +6POFox14qfoUgKwbe0YT36NLBR0lNkAHBSO1QY3bFJg/rzUngKrQh/S+1ZZ8 +dECs/mdkiXmtPZ5HLsGrHlmWGu682U+Dk1pgeESHAs5TYbefLbShiPzCNvEb +NIjuPzyB86LNeXSUvGxqkH/hwWicFx1lKe9nxEqBECs/3Z/+vej3SGnHDqEp +eGOdoofzezmQ0E+fgXrUa1Qjj/N7vaZSI3FO8sU3l/+4ug+j7/n913FO8s2W +0ATsKr4pJy+mVVFQrI53K3YVT1cbRDB+VKInB2uc9l+io90b1tdgv8z26RVO +7OKdOSrUr7eejs77jv7j4rG12f/ArlmEu02pfV0P+shL88GumV3fak3s5cXK +VK5bfYiGhE7WHMJeXljJqVPYOxtYbBcY029EP45V3MLeGZuhidp+GWJes62N +j3POQ6zjN2zGPOgwYiJsgvOcvdeu1E8WU9CTfDsunOfsT3t4ATuSewSrNdok +KegA785l7EjKGWh2YN+h8shuthStSXTzEF8p9h0W1GiHXuZlIDONON1TQ3Tk +07kvHztQ53lUl7DfJ0NaSRWeG0OObA162O/7v/Ko0b951EM8MZKvXPJhQyuX +1IE2CurIE9bFedRbHDQXcG6zhfHHcHMTEjK5Xz+Ec5s5smX/8Yz+P7buO57q +//8ff0ULpWQktCikkpDtXkRISSoyUigtyo7K3iRZmdmzZCsZj8zsvY7Ncc5x +rCINlfo9H71erz++78/v38fF5emM++PxuN276H5lNlZc5TU3iVJPh8Riz2iF +k+qFHUM9JS0u92s0JHlBdx92DPON8q9hx7BYg7L9zRAd2XyPXR4yn4CVuc/P +sWN4q+WAk441HX3TumKJHUMevm41PO83jTYh6V/RjeKVAzPwvN/e4Bf8eN7v ++uDPqDS0B/12fbcWz/tdXmskj11F1sk6+1THHsTc1jWIXcXpNo0d2G1cYYwY +PNPagxwj2v2x26jkEs+O3cbvHrQmd6VedNfeQxS7jd7xV5yx2xj0e23f6Voq +QrbRY9htXHiKfmJH8umcJmtSdB9ibmp6hx3J2M/Agx3JLXeU20Mk+1FlzFV+ +7Egq5JQ/x07HTNrBuvmQfmS349th7HTsNfNow77ky2WWIFIlDYWX3nHGviTL ++eFa7I75Cly2O3SKinJvOuzH7tiFMREu7GweZjjSonipHfl79i9gZ3OD1y82 +7GwWiaewVhW0odTI5cPY2dybMaSLnU2zS4siEtv7kXzyZDx2Ni1t32RgF+CN +6UCHV3s/Yt7VzoRdgMuGUR+wg7Z85fxm4ZV+ZL6t9o9UGx1Ua1Jb8XzjL5Lv +b0bfmEI75Ck78XzjeIuwJex1DnbeWWCSpiEbIQ427HV67BG5hV1Ov+1eb47k +0NFvqe6/Luf/uGnoPzetmf9GPPazXpkG+7wxqgPjE4rPsZ8Fn1r+Om7SuWnS +zmz9kBIvqoYdt7mUivOcZ8nQw1HC+31tOrr/ksNyyYnIscFfNt3SJe6LfHPm +IbVM5FD3clWZFXFvuqTuSyT202rS+cFDh1+hWD/fmTgzOjD8/kHvI+478/f6 +xUYbcpF1+oFPqtp0ENC5P2YbRga1yVn29835SJ0b2fmI00HM0mMNHZHhVZn4 +5rdMb9CQj8F2AwbivD1Jcry7ZhIWqE0budkrkPL5zWZbcqeAs+7nSLn5JFgk +nf4zJlqLsqIizRm2TYFjgNldBUYKWKhmjx7a1IbWfLnFRfTZwFPrH19ZTYHY +ZokOgd5uNNJQ8DGe+DmlEXkp7LOEOx84/G2ChqxeX23DPgu8NgzC/malSMrN +ZD0quuLgKYD9zfdB6zyxv6m52Whbmf8IorKubsP+JneDOVP3jg7wUHS4ONY8 +hVY7vRU6qDMBR7a11H+4H4/usGdgbw4JH/SXwN7cmMy7zditq+qzEF+jRUHy +vkoS2K078K9z5/KPc4f+c+6UxWV0sK/XWF9esu90B0o20/qNfb2np5X48Rxs +7c77ziMJNJSVyVyD52A7SmWdxk6rDecGauJhOhLZ6FGKnVbbucst2Hdg7SiI +djsUiczP5fVh3+Ft+e21BcT9EuJGbTpbE41E371/hb2G1N+6bNhlCMxN2Lfp +0AvkZJ2jjF0G9rZVN7G/YMwuVv/VLhGZL57Wx/5CC89kInYWqE0scRGrUpFV +b+gW7Cz8j6eA/vMUNE0uhmM3YYpB+Aw6kY/2h77IxW6CkLpnP/YRhnIyvBpN +36ETYnLq2EdgCzqUgN2cN2O1FYrfh9C25pgA7OY4hacryhP1OUBRdFiXl4j6 +RHI7VB8Q9XnRXOygKRmMBqpeGbolowxGvpMjFnQY6ZKb1bMlg0a/e7z4UCpq +KNGP7LhCh40j6c3DT8jAK/fRdmZbJuo3EdwvqkaHon0RC7xFZNimpa6pVJuN +nnn1u3kJ0OHG2op4789kWCNZCSlh+UhFuXBRlD4FhjZDZUcvT8JNpxX95d63 +KNG8KFbZdQpgFC3w/56E8ym89/RbKpGMLD18qYwGqXkPNP96Z/Rfynkp3Uj2 +/SM97J1pnFhriufBiswVGonwFKHnNb9d8DxYj+FNTniuPq/XlFTtzhy0Rzww +F8/V5+bqf4odNJXH71iPmo+iLxflZbGDltUW/dddurqf5929iRY06inrh92l +i3++82IH51H04ELcgWqUqilFwQ7Ox57dSthjOjx8UyReuAydCpoXwh7TNFXu +PnYE9M/43ffP7UY+nDfssCOw9K9Pd+Mfnw7R/vXpZLtnCrEbEiO9j8klxQfd +Xen964aIrjoeiOfqn+ExlzJt9EWbtNd54bn6+1N2TmAfJNTshTwPpz/q2J3C +kH2XDn1e1ok5hmSwObYspBuQhCw7hSjeNnSYbi05gufw37E1CnIODkCJM6eK +8Rz+L5HkXOyGiCmbnzZTeYLKRb5txW7Iw6tuIp9vk+HoSvAbx6gUFDd8X2+r ++f+Z24/+m9tvKHx7AnsiErWDf153BiOmlahw7Ik0SBze0OxCnJNVRt+3XkxH +vishRUUX/s+cf/TfnH/PYMFF7IzwrC+2VtwYhnY+SP1tu5MOImd/3z4bT4Zh +N7ChHn6JpHWUNjtJ04HxmeF27AK8k33FwqoSgTrK6/uwCyB1Wf6vP5KuWihT +tzcK3cubLMX+CL//kmUM8XzLPaHidW65aHeOa1EbkStYM6JOYkeg215lU+Jo +LBLqp9/EjkCGy9mX2CWJit4cd4ySgBg+u7JjlyRU/euqncTzBc4VubScKkIv +SsHSq+z/uAPoP3fgg/ebv16JyfrCH8VHM9DnF9J/vZLO51XLHEmTQH7adF/e +rxw95fNInzk0BfUZHxuwH+HV4/mxlS0b6Vl4//Uj/I3ikgTuUUDMrEmQ7lqL +tGnzpUz7aODgn5qE5zOfVSbX73c/hgZsS+oftlNgX6OdKvaqfm129RB+TUak +yxFr1h4ig2DuTW/sf9nGiySU3qqF8IL679j/ykYqitj/2iS/7gkDTz+Y7vT6 +6389Ld7213s67xv27NHpR5CRIPjXezqudE8Muyr7Tcdln4rkoauebB+xq9Ju +/bBCumwQdoqxbNP5kQ4xrctu2PUO3+ExfpPo4zbEO59ynm4GVpaT7djp+yRf +nht/ngxLVEsv/7kEJFr40Pw00V/saXiyH7uNiuKau9c3TiLx8X0HsNuoEN/e +4nOuGZmO0A+MPZlCK++UTmLHTajc9K9j5Vz24tjd4bfoQkxjJ3asWv71gPj+ +8YDQ+n89oOMNDT3YfXvbQ/7hHNKOFKS+jmD3jcO73RC7bxvGBi/u96Qj7i71 +Uuy+yWwqdzEOHYT9ryRb4lsLiLxREofdW2BcYsKu2WXNWdd1lCHkVfvkJnbN +kros07F/Gjy299xZdgpiJLuwY/+08zNLGZt5CxrO/dTwZGUK8azmHNkcMQHd +TuNN2FmTHhs1+jlHQSp30UPsrO3vmDzoWkmC4LwMGVFaLUwXVXdiJzeo52cM +ds1e2Aesn+CmooDHvH9dMxE5dhPsoG3t/RkzwUVFGgLWLNhBy9WNMsZuWplw +FtoeS0XhzyZEsZtWsMfyDPZr9uyzVCxmqgVPrquK2K95/Y6LjOdv/16Id92R +VoCaX5/Qx/O3oxkU7LErJ9fr4Ovg2AfRkeNHsStnYzexgH3G8dy0TH6fcihr +iDuJfcbHZxi0sZcncInBLjXOGy0n3WLAXl49RXEO30fhhfIklagIdDExUY9O +rN8RLrr4/hMFDsxQu7WeNaD7487p5kRdrRp3zK+1IvrdhRNdec4taO2XqPSA +cAp82pjBb72OBn623dbqr6oRb/Y1+8mXFEiUiFRzGaSCh563U5hfO1on3LKF +uX0STr/PvGSvTIM1/L0VjLadiKFlOWrnAhnm1X7aPNkyBYGt54+puNWgy8UO +4nV2xP3ksGMQO2sPpmzebuDpQuO6jO+ws7Yp4twf2odauHVnU4wfM9HHaZns +xH7Q0Oj9eOz6zUgd1RoIpSEGue+u2PXzPVOwu82gHRQPd46KCxP3jJFXwUOi +7kctlR8KcQ6h8u3RDKY+FLRjM4PxPVbiPL1W9wg7bhqO378G6o6j7OjIN9hx +u3nxWxN2dmQ27bmU0DmGHgru+IydnXpLxJm3dQg2ro5rrB6loHM6/TLYrbs2 +4b74jWkMxP7Mhnz4PYgY19cGJpFpcLhhpw+eY+xlwvz90e5xFMCxWx7PMda6 +eD8a+x1bmd3mY10GkO/sbxnsd9T90poSgH5Yde565fZ8KkpWcejCfsFWb8c7 +2DdZPif0ysu1B+2n36Zh3+Qlmd8Eu3XJ6xSZvD/3oCaPhxnYrbvkriGFXR5t +R7ZxRVoPSts9swu7PIwiQwvYv5v7ISDyaqQXcX1dEsL+3cnqq2ew7+MS+LB1 +740+JOG0Xhb7PlVaAlLY/0pgOmKUdasf3XOyW8T+l9+qPg/soInYNbXMP6Ki +a+JrWLGDFrGVVo39mrvqr7Ffg/r41whgv6b6Xw9lzz8eCnr8r4cS4OW/Evx8 +EN4UkcRfJpDQCwW9JuyUfUxk+4GdMsP+n+EPeqio15rRDjtlKQnHfLH3FK/L +Qnff3w+8j98uY+9p2KpLt4qrH95zaJrGhFDRjROD+39JkSFOjC1xo3cfrP7u +l3JpmYpYHMfH6qaJvOHssGBpXgJRJ3n0niXQ0ajy1Dc26gQ8vGkwhZ21uh3h +opuZO9BO499Z2Fn7Hx8N/eej3Qiq+4gdNyPjSMcS5jpg/XWwBztu7+wrHbHj +5mtooiQt3A8OlpV/Hbdkzxgh7P/qCvPNdc4+gXlt2V7s//Yvlv51VN1cs4d2 +GT+GRyca/jqq78VanbBPpCi945lOw0Pw1jo6iX2iK7eRPfaCUezqCzyywRBs +GimFvWDpUgYy9lVNLizaKra4gINtWhz2VVW9reywI/zrWydvRNkzOLO57wn+ ++5btXxP/OqoJz7WzI/XcoHrtzb+O6v/4wvCfLxzf95qGvVSNOUtJXm4PEIqw +HMDz1V3uHV+N3WGunSTayFg4jFdsbsPusHHeQg92UTee3iHcrOoFIaw3xbCL +alacwIk94q/5Tvr2o5FgUTQdgT3iG6u0HmH/tHL31zMXOXzhpaaHOvZPxdh7 +/jrFnSO+iZ8Z4sCDye+vU3xWVXQjdk7Dt56VFZkKgCaZM9nYOf0fvxj+84vp +4TQN7JkaPCI/p/UFw74uxhLsmT46yR6HPfcLrE9+RRtmQEqo1FHsuedfZ5vE +3ui4/GV1TosIyDwV99cbXWF5/wd77io1e5qH5N9BYFGNFvbcbxgZ9mE/sXPs +puy1bWlQVPGcoXJwFs7PSBtgb9fmyIFHZ9gKwPJ5nxf2dr+36OwNP0fs7+o/ +PvtCE4jzEI2wOdMh5+x1OewGsnwYy5VMpyBl8f5S7Ab+PCtOxp4XY6KPWXBG +L0pyjmfHnpe4gNoK9rxmTRNZdO/0oW2ZP7/d2TYNE1cCDmDPy2LRVfdPbh/6 +xXS7BHteSsufr2A3M8jD9t41tXZ09v4TaexmCsbyLmA3U+YY24QyCxXl5xzR +wm7m//iG6D/fUMZxzwR2VdK9Z6OuhZPQ8ds5AyFyE6Cf9Vjx1J1eJP/zzeFR +Jxp6/qHVZ03iBLzsecalcbwW1m/w+tPiSIJQgWYv7MinyS/vwO729puPsgvD ++uB4+qYf2N3eqbF2J/YcJ5wmFHQaOkBxeV8Y9hwP6RrrYA9UjpK73iwpFly5 +M+uxB+prdCMpy6UXri20lR3TrwFh0Xt6+V5zcGjvgRTsgL+8fcuhlb0SUG4j +M3bAr4azupzq7YTHbUk5Kp5F0NHQcrbJfh4COvMbsb/MN+qtVjRWApst+hSx +v8xY3+WI/Zfic4a029z14MKW4IL9lxPa95hMNg1CdYWGkCVHMZhe2x77kHhf +K7kx1dhf/lOQ6nehOwsKfkroYX+Zn7nmC/YKoYRDSlLAG9Gcd1Zhr1DlQsOH +wzZUODctmMu9uxLVM8dHkq9TQSKHX/mlKw2O7I/l94qvRZMeyruCNlDgWA5/ +rYZ8MYqZWr1uYwAdPT+wLxY7et6dCR+xQyqYd2LtYuEASj9acBo7pE7ssSew +C9+xJ5AvtHUQya2e/OvCd4kfadwSTUXSL3vPLTwiIY3gYprluwl4++Xog3Mq +RP4bMyq5faIT6d+REtd/T/Tvvs9MFbdMoTqd7hC3si50nd0hIjNlAt53nvYL +fDSFHn+911GZ3YG685PX18VMwAY4vRNto6MN8vZOqXebUE7ltXRP4vdWXFq0 +x27duIZcx9UXZETpOCSD3bo/WYfL9NO6IOVl6Cnbg2PoGDNMr2klcuMt0tuO +M8Mwm5xyPEOKinaK5q5OrhkHLsNNAtjjtryjcO8O8b6jRoReYY97i53ZpeTg +cVDW9TVtcqagI++YGF71jkKJndwKdn92P84R2yXTg5S+j0Rh94fv//V0kOS/ +nk7Q1ZJK7Ez9ZuHYnMs2gKqYFz5gZ+pSSM5G7FzrDu4LPe/nDPp8LnrYuf6h +pvbXrUaBDwZEn7tC+KmXf91q/+RvEdihvltMWm9zyB04GCIcsUPd0fcuGLvS +Uj+6KFW7PCG0b1ULdqUNemI+VWuSIC7wII95uDckfZjZhZ3ofA25v+7zFhmr +5aBuP9jnfeqv+zwuHTyHHeecb1kv1ayDoEzqWhB2nDs2BB7F/njZbxWxwU2h +4MhWEY/9cYMn/ivhZ9tgy5sEJ9PIKeQi8CHDmbgf/f91PBv+cTzR5L+OZ+ne +W+bY8SQtjVkZ36SizOrbd7Hj6fJx6xblh0NQXSkjPU3vQxGWqqMrTNOw8+zH +XI4HNBQz1MM3q9aLTs06FLW+JurKaGvtrHgP9Cy41ysFTqKCavup07uo8C5p +QsN+phb6Cir0uZd60Iuv/hmrg+Zgo31K53JEI6hOXOQVJvK+h7zZZj79GRBa +qa/GzqPpJbszheFTiGvnIw/sPG4wyd+Jncfe7J17NBRoqDeXieH/x3lE/zmP +PIHG4X0CI3Bywzr7yE1UxOfSsWPpBf57iOmU4uBeEBY6IGh9oh6YnI9HYz9O +N//VaezHiasWkXcaIbjE4UrGfpxLRoFncgUJpubWFZs0voSgxllR7P6s8Cuy +dsp2QvBxoAw3TyD+E3c/DctPwdBJ7VidN2Ngkr1ti+eubvR1a7e8hBEd1C4n +mmRwjIIV54TigFIfeq3XKuF2n7gXnp/agl0Dw9p7Sk8ZBpBfRw4/dg1+xDlT +eLl6YVTqQeB+IvcuiEl/Wts3Dkl9pq8OePbD2bHcktXVNHStVL5lNmwc4OFA +xBvXEaBuaV7/+FgvOhe5b7mwnw6hYV5dmwqHQSxCNKD3Yy9KPBKe3jxD3Asl +xV9no4dB80vJQevWXjStZ8556QcdfLP8eLEr984rLHSWi45aSaWXsCu3rSBE +Jm+2F36LUl7fYp1CtWzfbugUj4P3gOanMot+sOXVuTf9kobWpHasFJWOQ+ZC +Ld/viAGI5K9TmhOjoeWnObMN4ePw/GHxIvbpjIerXNeNTqFWn09z2Kcr07vW +bcbdA4l3bMe6HaaQcdHGDQ5vx6H/M8OwowkZ7LT7PA+L+6Iab/s/gnZ0WEz1 +7Wy3IkNxSWpwR7M/ur17vErtFh0UIsrvqPiS4bLq4QcRskEofT3ZrlmXDq0f +7l5xzCLDxh3CS5Fuz9DIiyGpKXk6GPu8O0YfI8MTY/lZZs5w9F3lVb3FVjqI +r+ui6cpNwkfJI4+rxqLRntUliic/TEEdzfS0QM8kVNjmKYnfSELuTgmByspT +YKKQYJvUSgH5+eE7vU+y0L7JwalDRB94XEWu5eBWGuy8NmF3wC4fXfeU6VjH +SgW+J+N2tFkaROnpTCQpFqI6jut8RtxEn9ilpHzJmQqZk5zUYwc60KHF9l/h +7BQwLGkwSJGgo5di/TyMVz+gp5MuzGLdE+C6/QoJu3iccvdYju/vQcCbtYRd +PHOH1N3YX/NR+3CjcncHOOf+KsT+Wp37mULstdn+DnNW72mFrw7ICHtt2a8N +FrCrtcxfmgr36+FgW+1fV8szJWJfQxwNTr54sJUxsRBx5u76qHWfAm0FU19W +v6Aht7Knig4+3Uiqfd8A158JWDumqeSfTEd/BK5uPyP/Hl2LpBh4F0+AweP9 +9Er9cei5xn1n3zoK6qo00qZVjgG7NblUInsYNo7NG96eoaCjRq/Z7hJ9t72f +5Z9oQzKMG2un+/P5oKwK0vUcRzqIJu7ktb1FhpMXvs6uv+OHZjyydavv0WHd +zZ/6cw/JkH78/c8yk0DU9i70uMU1OpxdbRnj/JwMlvy/a16KB6OrzV+sRk7T +oSm1gH6jigw3XM7+TOAORcP61hFUYTqYq9soyW6YBE4pvka12OdolEngwGNi +Pw5XbB3d5TwJez42CXUIx6PEfO3+8aApkONDMxUnKWBP1rRwZE5Dt7VjcsNG +aMAsoMIfakGF1mlOtx95OciB+a2KSDkVxovensA+8hcV1xempRR0/nnRXx9Z +L3PTSGzJPDzZeJxZObIIHZ6KTty2qQNUzCN4spwpoFFhcvLusQEUpHZxDfk9 +GeKHmi+tVptF2UFMM5eelUPVScG+MMZhePrGTAf7etubfj/k3dkBscXbG7Gv +Z31YyRb7eks/ddInbTqBFkxPwv+Pid9jQyp20Hy4jA3W9nRA5K+L/dhBu9E6 +aoEdwO32EflCdxrBmJ3zJ3YAXbgvc2EHUK1bIVOQrxVGpPROYwdwX6yQKfbX +Ao+4Lik7NMFDo+lr2F/L8dv31xmUmI3xYOuqgRMCz69iZ/CZ2zM69suKjZJq +Up/UgVDr6yTsl+U/an2893U/tCqrL2072Yl6tLsHsrfNwgztpsWkPQ3es/GH +U/K6UWb4vrhpfjJkG3pbYa8N+ZUkxNZ1ANMVDivstQnZ1Zdh9+2nV9Re/epm +uC7oooXdtyvfdchX8/qIfUNbKoipggTlF43YN+fr2j2GXbYC/g5q61A1DMmq +MmKX7T73J668tc2guKdrv4LeB3C13P3XZfv+wujyuaNDwM97ZnHv0USQpMrm +LRXOwiWbhYVolxG4fkmF789BJyTkxL23d88sLBzkyZ1aTwcfq12PUmLbUSPJ +Ky11F3FvlrKlYe8p7ZlbmUdVDZiVCv71nhq39DKsau8FPa6gz59e10BPzp+H +2I169cffDDtQZaQ7Tacne6GSongPO1Dxo3wcFV414I3MhT9b9ELGhx+fsSdV +rmIQj10q69qO6fx7NSCv9ZAXu1RNL3fSsGM1v7H/1LaaHnh9YU81dqxkd+lk +YffKRDfwiVVSNehdrZTC7tWJsh4qdrV+/CzoltaoBoqLlxR2tTIS+M+572kG +w4HUPbfiukGkawsV+1l+NzIisM+19eOp3dR91XD/wQZO7HMJc5NkscMl/7nv +zlRCFYgUHOHBDtcn1bIrRx/1wRuOH6J1XlVwN/fgzwoiL6m/s03E/tcxnZdW +l4i6llvzfhfuT6d+7XfG7tixHnFFh6NVsBRYEYXdsf/xxeA/X6yzUyK0n9oN +0l1WWkiwGWRiInIkiHoe457eh705Ucf9qb/2lkGUcEM/9uZeZnq4Ye/M4VKU +akfaGHry0tAfe2dRlMsfsac2rrA2IP5gJzK7tL8Qe2rhhXmiHtrjoKZ7+USr +aAcid17bPuFCB96nv32ws7bwe5aiIN6Hjux3m8HOmtX/67Wh/7y23ZGvlrEH +92VIv/TLdBuKjuk5jz24ZsG1YdiVe7wnemNpYxtiy0lLwq7cUM2tRezEHX+w +ZMrm3o5GbRHCTlz+3r0p2JvL53X+EX5iGv2RvPgae3MZurbG2K0LyVbpUc1q +QzaO7erYrbPc849zZ/+Pc4f+c+66K+U3mDiOw5T9ze6iX21I4+crV+ziWRhv +f4rdPQsno8zT3O3ovGqnOHb3pE6Yf8S+3q8vPNjXQ8wT7n99vSl07Sf2+1Rn +f0nE7m1H2vYDvNjvk5wfD8ROn0nOVbn7+tNI5quZE3b60j3ZNbAzdUOtY9Fl +qAb6ffjnsDPF8T57d3xbNax4GBp+Cu0Fjvv2+98SdX4otcgyyaoOrCVTn5cy +9sK0VzlDnCdxf/HUbRdd1wimAShC/3APjB94z938aA5kTMuzBrX74IKZ/e4v +X6pgtLNCuuDOHJhdHAy8Tm+F+UurjoejLsiLOnRujrgfZ6bYOEpS++CRpb3H ++r1V8I3j/U0t4rzSlK/6jt2o65M66jEbaiAho+8kdqPcRrr7T9/uhJV7eYFF +qh1whm23lh1Rz3ynyzY/ud8LH48rjpYoVIJC4H4L7B7uXmYx5pEYhxvCwp+Y +GjqQRf+BDg/ivlPUNDwxSNTDYub2HdnDxOd/IOpxH1EPw7oh6jtdxqGvUFGz +7mA70vXoE98RQAdu2QfxxkQunnrmZsBQ0I7WckWcYvaiw2i5/Km672Uw9txg +sJZvGmVolTEc2jsBdxLaDFe8x2HQZM+2e6/a0M5DlzOVQulQItqRf8VvHC5e ++z5zN6cNSV4cjrr+jA4JiYbXDMrzIOXNj21GOtPI8kTcHXeiTvS81tQm24+D +etu9G8vr21HU0qW8PKJOvl0qCeh7NA4xF0s5JSltaO30yuemcDrwnOn6c28k +CywUe+6YE3WyNch4VerWCaBWLy9LEfXcre1ncWhXO1Jf/bHUgqiTIMlry/uK +0kC658ShRaJOWmp5LjFu/z9OGfznlL1+9v2vR+ZrkUQe+lgDOUWX3mCP7PRL +Q8nBc+NwVLfb+OMmMhLmddfB/vvXb3Ii2B07+WtXz1EhClossebC7hhpkrsc ++2hjW84snAkj9unhDA3so/3nrL3/x1lD/zlrdHPHXOzxXTDUY48TbUcuzQza +2OMLXzGnYH8tKuGXLJJpRxH31Guxv1ZxZN8Yr3sL1DcpqD0XpKNXMwKrNfUn +QKbfoBj7aHsLRfTXrK6FLek772IfTV2u9lfUjXHYFTdzi1G5HZWY+ahhT+1B +WGp6WNoQyDqKyqXyD6Ne2/y78QlTMPPB+6+P9mOOi7FmDwW90DffgX20xr0a +Vnq+XUDKvmJdsXsSld1u+SA/ToWrSE8V+2j1w4bJZwuqwCVy1V8fTTJVjB37 +jCpOruzV5rXQHZsug33GG6oL17CDlmW98FhK7AO8Mcj+66Atsieuwo5V6o2e +hLeOfWBtz+GPHauvvttmgzwqwZM1cfTt1154z8ArgN0reZcHXNjJat1323TC +iugzzmuEYSeL1YnkgF2t6Oj55MOSvdD66ts37GpReT0lsc+1WnIkx/3+e2hn ++PLX57p331cG+1w24cLzD8Lfw5x6ixX2uXyVNz/Gzlfdxv67K2PdMNysW4Od +r83N1X99sbDGDbdlmSuBQaaiGs+n9Vh4cAl7ZDZPMosz3lbBLdGYPOyRMbp6 +sWDnyFnQzMyarxr6AjVzsXOUHr5dCTtHrnIc32PEaoHvGVcBdo7q7TP5sa+U +EFFmbCfZANrXff76Sn+coxawp5axvFn8w6sO1PZEvQJ7ajfZtVSxv9Yce7SW +f10zEhXia8f+2k6RDpDaMgFJD8K+yvI2IQf/gcPZxDlvQHs+gZ2myUOTaW+T +WxBnWc+t/x+nCf3nNBleivTE7huvuVvdoNY06qjSd8Pu2+JnWyHsx5k+4tBz +6GlAaajvDPbjTF61F2E/7sd6p93pWo0otUdpHPtxj/516KT/cejQfw7dGFdS +vqH7behMLD66SKyzSzobYbfufmGT2ftzoYg3IR87d2jyquNf5y7z/uJj7OJF +i4jWWV2cRuvTzmZgF+9XTPOO+fIKaKRo2gmf74NbVUrrcf1ILAqJ8FyuhRy9 +77OGSkSdoDaBLd5zYCQ4ZrOXqQpufl7ZbjbaC4ysw0NGRF0NBhUpSBN1Ighi +u/+4EnWSremxSNTDWZ0Up43BDaDOutSjdqEHJPzimu8Q90K3Oef2L8l9YBBg +3+J/sBIcyGslx4jcsil5/nTjsz6gku4/d52ohCY/DtMKIoe4Vif70HtbIeTd +Sak7jV2QfWR1kzbx/NozbEbJH8egdmvI1dPXO5HOg+rZBOJzO3jkxXqvdiL/ +R2zYyrnQg+ZXJR4dbKOD6TcDW+x/BZx2Hii/3I10Bakl2P8qM0uOL2KYgN59 +tz+t+tCEXEtvMjERdbKZcnTkYsk7YHWQ/8YiPI2Gbx3nfkfkyTt97quo+ybA +QkGWjbm8AQX3vL7FQOQEmuCBUJM9EyA4UeYYs7kR9ep9Ztj0hA73fb52/d4x +AW51GlFHHBtRmn1AW6k/He6uqt+ldvYZKMadUIkgvscD7xWlo4nv1916ZAfX +9Sh0gUdT8ZbRNNLzucIptXMC0sa+uWPv7ObUxiGf1D40v7j1JPbOhN6eO4m9 +M46ALDnOgn4k7v1QFntnzGdEjbFrto558J2yRz8y5g+/gF2zEicpsr1IF1xp +TVNNd+pEo/clGrAPuDacf8vRhjEQnj3s0NDbicrX6/idD6bDKtvjadgZ/OX2 +O+t9Yy9qWCg8gJ3BZi0562d6XaDfHraSNNiOZAolThSfI/oRZp5V2Ed7tZn8 +zrusFqroyQ3YR5s8J7Ife3OeE/dyOWn1cGG/Wgv25pSVREexJ/j27YyT5b1K +kDW5/h17glQhthPYE/yz7ZvZPEsVBKW3xGFPcFvooCz2EH8clvqRFtSJmH3Y +vLCH6JWp0BZg3AdGI7FVKTLV4B/ypFSeODeEG6s2GMyNw6HjPXJWfc1oaG/c +rkk3OjzTz9/q/mEcrt26XW1o3orY3ZUd9Yn9e7+GefaD2zgwlW/6dOpmO7oV +Fl78gVgvOlvmhr2zPYx8tbssG2Bzuv9N7J0t8nYcimnvAR6GyvHDaQ1gKpx+ +yop4v3G7vRveu/RBlXR45GaLKni2MSxm9c05EBDjyvxzeRzCPPm/h6/uQLeK +hG8NEa/nF3sw583rdaCeyFg2z9wL8ZviXpI85iCkKz5wmaEVhr9rDJdv6QYH +fUZbZqJPyZC++qPMoA+GHCpJYVrV4JjBeW078X6tLA4SZTMOppe8WRyWmxED +Nz9POPF8w0zRrQ/SxiHr0oGdC9FtyDZvTQL2BMNVE+wt53ph9VONd07Xa+EQ +LEYVEK9f+7FDBWtoHzRuO5IS31cJFRoLk1Ti86cGdOaExPfByzpRMQvjSmBc +anpBJr6v5hkXXqfbqcDZY3mIZDiNWH8LrOvknACNefvHo/IeILf5oMQ2M2I9 +9CDTeeI8rLiis/JjQyfwygkr+Gt1QHSR00ZZoo8WsJRLT/naCTuDT+TR7rbD +l+fDsgbEfrchbREusOyCkbgjzQ8OtoPjH6bGPKIfKZB5Ql82IcO143zFFaGe +yKLjusOyLR06/Lsl7KzJQIk5ouhT540y5R5/2HiLDnufDzPs8SPDDc8IL7tC +PyQudHabjS7x+Ue+HC18SYax+NoT5MonqKJ5k+wVeTroXwzTb54gwyHN13Ef +5p8hXxW2lIAtdFjcZ5/loDgJWs5fwrWGItDz8Xmmktop8DGoLgoYmIT0+wO9 +lzXjUeap64uBx6dgTeivq8f7KMDksry6OTQNveI/fkZLjwba8qF/SnloQN1b +fOiIcQ6qKRdcHcRChbZzAWzZUzSIH5JZ1mDPQ1Yczn8uCFOgTH6Hc0gtFXjr ++Eh5ji2oWSi531mBAt9vpXYf7+1AXXHZYmc2TCFBiYhPMYJkuPNFp7rEmo6S +T01u8JypRqkMDVFH30+AWMpyr3LjIDzdrEU2YepBgcysQjd6p2Eq3kSl/fMg +fLzmrLBntB8tGeuny36lA5n795O3zN2gERF3QMiiFexWkR7tx/8PvXraSYmD +BN05TBLcbi4g/FgwyZD4vswresxMeEiwLpTzRP9WN/jmu614zb05SLXuOyvA +T4Jntxa2CSS7w8ngibzTRB7wlHp49vYhEhy7OcizPsgTLup9YVtL1BUl1ovp +ghyJ6FOWsoQ/eoPn2VOjc8S+YzNWSjihRYI2Nunj59f6w6lvTqaPiH7hYN27 +jGE8j5GaWmioHAQfNbxc4g3noCrKUGldMgkKS/1DqNdDIF0oV/g5cV6lUhK2 +NXANQMD87zcc66PgyBFd4aeSc3CApL/yCg2CW/YXKdbTL8FCrbVvfcMsBD88 +Ye3+bRCC9Mepn0+kQnqMxO2Y97MQZn30t6nmIOTb3Pu++kYx7DTg3vKydRbq +NwFbGb0ffoWT1mnfbgPTfAshtluz4NprmqlVMgjrAiIDok6RkOYgd1P2LB02 +bH8wvCWdBiafGPL83PIQ3V2NQ8yKAoK/uAf0rk6hV6X67EVRHWj+zHTNldoJ +CCqqWgOVdDSxYMCYnFSK3DruJje8moCegMS43SrJoNAb93C1LQWdF7YaDCqm +wZahP240pQlQPn6ZVTp6Eul5MOeXao3B2qwMhXaFIYjR++TmpteHpqp673vJ +T8OKb9JpXcYhODW+myXsWD+6fp2P0ZN7GiKWJldvMiKDiNB8CFeyB3JPlLLy +Ifopg/5E7bW3ydAYubv0S6wXmhZa3RJ4jw4M0UHlmY/I8ME/fcN2fl8UKCr9 +Ze81Ip8zq5u5RZIByH6WG4ICkKP/vU9Wp+mQ6Ef+SKkmw1m38CYpxWAUOu50 +WFaYDioCBgHxTJNQVlJcmMAehpbkxvUufZqCL3lnsuTcJyHt0P1zIW7RqF/3 +VWFH4BScWqWT8fY0BZLd/9iYoCTEMv7H79AgDT7VC2T5O1BhmtyedWYmC0Uw +SK96VEKFXOUIvvcyY1CZKhDOIUZBJ3c4lpxIJ/rwi9uTRHgGIZ3b338rYzfi +oQxsz5GYAVFfdeHsRhqcN578M8eXh3TtTi1Oa1BAuF7gzINxGlw8YZdW4/gK +ia5iihmQocCZKqWarowJdEO285f5+gk0fOKrZNa7Cfg6/4xlb/MU2n/eel7R +rhn5cFvZLM5PgG25Xb29Hx1ZbntZVaVdiVB+/NXnjROgzZ3CsdxAR0d0nja0 +z79FnBsWeb7kTMDcTBrp2zsSfHo6f3shrwtRH8wG20bOQDoPx6RS6wg8fZvy +4mQaBd3oZs9y6xmH1wyfWwWMyXDMOLmgJ90DCZcztn90oAM6sI1kfp0M26cj +tuqHeaJra/Ne7LKhg9otnY3ku2RQSOEIiXjhhZa8n943tKDD8YfpZWN2ZFgM +Waf4p8EbWScPCN65QQfvdT9Ya13JYBHBZFi91xep+bRJ/TQi8k95qNauIDKI +BkxOVeb7odkUke+ROkQe/uI1nfKCDL8/mrBG+gYgNSnPzBxVOowYXHIxKCAD +69lyDZ/3T5C4wdWq68fo8NHMwN+/hQyjM+PrBmSCkfnRppyUPXSwkQh/wPOR +DAwxbSccZp6h+LP1UL2ODhpKBnpuOybBW8jqyeUtYcgo9evDAPIUnOM6scij +MwnB4guvnUkRiFR2YKW5cAqKbT1W+OImoU1lZJOjazSSTon1V7afgiMPAl7J +rxB1aHl9x2X1eGRy8Tl70N4puDmv16PiQAHGowvtG4uTkMH4ahuWQhqkWYRt +/c5Eha0Dlc9O2qahuwlaq+MFaZCn/nzXOWUaqHgVHig4nwzCwZdm3nyiQIDd +Uu5ubhJwC0imx9U7gGzh6uQ04vx85w9WtWwkyI37ue6grjOsO/hBlE6ct95G +OglmOVQQVh2uvfYqC119K/57rTsVugrC7y1VUIGeJMbCm9WLtneK6wYS9yJL +tqyzxeFB+K48VnpsVQN83C3v3qo+CxZ7HtQaf++GGS2jrfQZGsrwT2tkfjwB +jl5MBlZcZDCa/RnvZzOOfO6UrRXuI/JuTYAk1WsUiqyFudnuUlDZ5qIjgU3j +YG7pvLVz7yhkIKb4LU8oaFi7ZvZc2zi0PTt+RY9zDGzj3AeLLuWhx39+qVaH +zgCtsvXRSOowBHCffvyRSkGxx3nZqUQuf3FqwPTL/UHwV59tOsFYDqWNOt7q +r2ehNthSBM/3Rsz7b7efpyCfxuQITiK3DYjMO7sHDMMhnqQCnyUKYvei2Rwk ++r2Eoz3ZQVo0qLjvwFL28zXaJ3xxWqOXAn8SevjcJfvAxDxq9+viTtC0Xcwg +nZuFzJCATL/1g3B19m6N/mwllPivM7uTMQtxEWIdvZfJMOITwnS+1x15c8qU +rX5Eh/ZBylsPXRoIq1XbFae2ooZmo3uqbpPg+qigYZM4DTK4y9iKVzpQ5Y+A +0U27JsFolasWr/AQaJrWe38e70EGbBL+EDIN/V92DqhqDMHHxQd0Br4+1KIB +Z3RUp+HbuWrBadow3PJ7y+NKoyDH91pdPbRxOG4qUuZmPAjcf7K5qWQSatbO +W/NlmA4Zdal5y7wkuNRUZqLG7AEvHH7YRVoS/Zf0jivr95IgoCHxYvuAM2w+ +iJTTiPvXb5vaiX7iXtZ6ocEik+EJNUlPcliJ9Rjn2PJ1wiRQ/dqzMT7bFWIe +vYnnJe79W1yuN5MPkoBX5BDL8DNvkO698YeLuK/JWZ2SbWIkeEfvok2LuBN1 +qmZ26PYcHCqODj4kTYKE3yf8U6Z9oWfsBqMbkYfFHOfTjiiQYFzuxYNVPz3g +6fVzO7KI+/2Ng0MO7RQJIoTUvkX2BEDlpeY3X4lcWrDZNfqqJgnOP1/9YumY +N3j5Dv/RJNavx5was7hCAptGycXh5Kcwc7a/YMR4DmT4QjZHXiPB6QfC45u2 ++cHs5lv7won17dfyhHTciNdz5mdrv00IRNqmmMzpzoFxkm+wKrEeeWyzacVc +IIQbvj7lokf8/NUkYzlEgqRslVHp4AgILDWaz1afg/W/qxT2FpPAVF1i3Trt +Z4B6PRaeac4BqcdNzvzsAGjn3lFRl4oHtR8L0CY4Bzu2zLG27R2A4nXKfAxB +xHPyzytFic9BvmfZBZfgIagIETQPup8Pq76njjEGzELap6pttu6D8Ias9/aT +SAp49Mg4Bg/PwqbfMieluwbh1tCRP+tO5wPfwc8ffpXMQkmK3Zit+DDo8iYs +pDFQ0fYw4Ygo1glIeJfwc+vsEDzPXi/gzk1FrPz3G+O3TkBouLSaT8wAhEjG +uH54mAAxhZribRxz4BRTuPQmdxSi9HpZqeQS0BRuT+2JnQGkf79vZ/wYbF0e +M+aqaYK3Ao1dk9bT8OGoB1cx8XoMep9Fqpi+Ao8Mlmt7q2fhc0vlB887g7BB +sOv3ObkceKP1M0+ENAtBjY6banTJsORsybupyx2dj42rC3tMB+bPX+puJg6B +32FjlVBEQwaaTgV3F0Zhe1JS+/vJcXCU684avUBBFh6yx1HAKIRcXK+8czsJ +RlYU/iiauMLd6D3ipThnVpnq/95JgpJBif397W4g2CDqd4yo/4TS7joKnt8r +kPp1zt8D8ue+HVYk6tmzGNk0i5NAU2r3nrEsL2C5w2IdTfQ76XtadA1OkuCH +zfT4LiNfaAgKUpoh+g4xlvXnKg1J0C4qlfftcwCo8Dpvdrg6B6us7SzUPUnQ +2757p2lQMJhpCy8HE3W1Zv0VNuZ2EjyY8JHt+R4GYy9/GauqzsESZ8EOxpZq +cHjFf4NxfyfSaBeL6VObh6j530Kz6RTg9OI0mGToQq13LtTvCqJAie7v3uCZ +QWjNk90xf74HJXyarzNH00CXdSg6+6cDSpwDy8pOdcDzkbJSksMchL/RrBM8 +2QmrT+/1U9vWAesVBs7TbOfgZ02mRfDbLuiGLiHgboPLCogdz4vmvPgxgrmq +B8C14IhnWT3w6eWEp9jMwdugioU3xLkeXLVWJLVqEm0Uzym1Juqg5TlD5OML +o/BRnUHdIpqC9tuFc4lljsMlhx95x0SHYIYDOFjO96I0d+dLqo7TMDiUdGeV +3BSUxoc88mJuAZ7O6KqIKDLEvpeY3Hx+HHj0wvqSayZRxBntc2k846Bw9fCF +fvsuEFjerD0x3Y5+eL174krsO5esc/ute+loPpYq++rzG7SfWm/XnzwB3osb +r/orjkHJnhfBKkR+87njVR+fNA4CT1ge0iSGgCJ3+7OVby8auivwQ+buNBy+ ++fNCGEM1lFAXe76wjsP6k1wz2WnTwGuaXhkX1QUcW5KVVkijcO3Arhu13+iQ +HpLb3uQ0CFX6ZbczQ0nISbUNZU3TIfcuL/Plh0RfIDc/65xOQg1iP4+8oNDh +h0iXpGTyMPzpFQ6vm6KgZya37CvXTMDn6gPMNkl0FJ7WkHzk3HtkmXFw96fi +CYi86L2yvH4IBFSvq7eb9KPnkgsLcpunYay32OWePhlSK3K1+GU9kNwVhT1+ +D+mQZNFzgkrkN9dfVdb6XJ5I//slKV0iv+mderJpoyUZTqxwisUd8kbsG1g4 +bO/SQazXqinUnQzx8YGJsxO+iGvbSEWAIR02fgrzD0okw8CyOe+JyEBUErVY +c/kkHTL33HE17SRDxjEbHu/1z9AWTQHmXD46yP26btC1dxLEu1nqs4zC0W+2 +vaoBQ1NwqPJSsffLSbA/QHt9pSQW+TaLLNvfmoKOmafl54n61VggD6UHpyCl +7Oz7T+JokLpXdCq/kQpsLJ8N40Sykd8FVS4lUypE8X9k5e6lQfmLr79KKHko +JubZgSA5CtRdFmJu56Wj9VYHb8y6NqDnz4Pb2z5MwLN31h8rbtBgOGuG3yYv +F8UfPBc2VkIBmfGp6AvVNAh7yvD8QVkmqjyrTmYxpsAFW9fQz5upSMCBD245 +DKLw6eKdp7KJXG2upK17gwz39DIUDmz1Ql6zjwpMrOlQ1WjhoO1AhkQr78gr +93xQjMnnQ6eu02HB+vOyeTAZDDT6FX6E+6PMmrdFddpELrUKEed6Q4asleeV +05ueotG9MebXxOnAUr9n5M4XMvzIlTYb+xiCMhg9nfxX06GjVoCZ48ok+ORz +71MJiERvrZI7L7+cgoQ3nQFdrBQYTTuyQX97IgoWI/Hob50CSRZaif8+KjS+ +ELzZUpCB2Ei6e+jMNFgc/cfn2v6PzwXi//pchz5YOL6+0AF0m9tbfL91wCGb +VOpe7AYGmedgd+xRd/VlzbI2aOBbSMHu2Pf8Gp3XlzrhqwcSO/unHdhjDHdO +E+fGfT3eSoUf3fBTi7XbblMzfJ8P6T5P3OMapZVF7/wHIfTZbuuOxG60Ilo3 ++/3HNLRenZK5e60D3le8zt7Q1QFLTYfWtzjNgcdBrlR2gw7QE9y0JEHrgHeX +G8uzH8xBNasmlaufOH8Mf3y48LIRJih9Ou4X5kBh+FhpBA8N2tatVTvLbQzT +UbJZX/ZS4cjDm7M3v/XA2p8xRsZnOlDsK6mC8vpZ0LjuxLyyvh8o2zSt+DI6 +kNYuseLrRK673qn1dmPcEHSIWOgdz4oDfdqvnO6YWWh6J+uwsmUEuBuTN784 +7gnJ8cIqp2AW5OwdA5j39sKW/JRvdmoNoN7y66CG/hxIjQYca9DohjnzK3X9 +Xi1QNDIxspXI4dW5j50kLFuApUEs3nENHe1Q1ZN7FzQBlKfzrGxZXWBSKGDG +zd4OM27ljAeIHLKVlRISsacXxneFaD683Agbfk6Y6J+eA6N1czMxqt2w4/01 +9qyuZjhs5HKo4yGR30IjB85I9sDOaKdf9eaN0D5rprMLz69O/Xktd3cHvDZm +vaiwtRNmNZ5otRKf89lwJ8Er33rh/LYUsQebWtEru7ZQ76lZWK3xIQvNdIBY +ecvE4uN2cNbor3/5fA440geu5u3qgo+fPAquzbfBatBpoDrOwdpZluinpH5I +YzuZb5vXgXyDB9iD98yC4WXOUBLDENwWjzi+b7YPsW8VItcfmAYFECaH3SFy +juaGPUeMu5CNYnamzuMZ8Bb+OIQ9ndP5r7cseFHQ6RDTbdjT4b7YqKNcMwgL +9b2XWnzLQCho9SfB2Fl4SbIWZ56jo8LomB9nHfOQ2h3UppQ4ARwofRq7XTXN +sjfOEvl/ctb3G3a7mPJPvqxvGwM+K/ojas0HtPllZY4RkaullsnhG9KHQdXR +T0mdQkHZhyH27toJKJq+/ybVdxASWaXkSw1ISKTGzaZkiQ4zch+G28YGgdp4 +qzCnNB8mO2LjgopmQWH6/DPsBy2etBNyZOlF5ycpe7AfZLbhWYTb/iGoFhMs +LfzRi+Ysbwdb6k6Djg3X7a2lg9DcKLM2mtqPsnqqHyQzTMPrwXUKTzpGYNZG +emxTFAUdr1hzn4PIN9EvviZ4Hx+ELL9dxz7NkdDFaO9rL8h0ONBIVkzfQYLP +mXKWeyVtobrSY8sVIuco7bviyEjkH47l8YNfrGxgncebpY/E+rmupvfYfz+T +5axW0GQH1uw+hmuJfb34Y3dRpRAJ9s9qHX//zgHMbKbLzhH5J+ztYOMmERLA +J48wp1MPoCnkjXgHkefflf888OUoCTgTc/NqWJ1g7F7Llh1Enq/hLFv5KUkC +F4v5p91VTqCvW/rUishLMjbxnhHHSRBH/7Pv26dHMGE5v4GfyPPaE/2fInRI +MLNUPp531hV0OfxNV0zmoNx0lKfxHtF3VATEj9S4Q7j/2K1WwzkIavKN3/eC +eH6d9QyPsTdcvaVPDT4/B+bCgpHHf5DAf//FTMf+QOgXk904pzAHxSd/i55n +GYSMEZf8b5cjQXm1qtTEyiwcWXXc5nPuIMDuOLlE+zTIKqiaq2ifBcG8j/eU +G8Yg/OaTzfumJ5HCht3bbtiNw+G9o5rY7VqzMn1pJxMFwc8FXex27RT6k5Jk +MgxmnabfB75R0En270PdTBOgELto9117HK57RdLpryZR9eYNfdekx2Eyd//d +IO8BmJUfP7bneQicp/ZEfeCbgxUh+7f1W0fgXsHA07nS13AnweNY/eFZOGhy +LG7mwjgMFV7J9BavBEbt9oy+J9OwuVjY4lLjIKi7s/dMSydCxOk1UYqtRH6u +XJh3KB+EXWfuhbUMJcECGcy1ifcV/eyTR7prF6w9mn1h5yk6UnLqOcC7fhy6 +j1BVz2iOwyqVL1OPjKiIR+6IZeX3YaAETnu+5hiEPQ7xchwSA0gvOYtbnOgf +uUB3pIDIz7wrN0ddA23BbcN2BleifuZWfZD5sY8EZlwsN2a07YFB2kJijqif +M/ZPR6P2k8D91s3bxdIO8K5Q7kw9sZ7vyjR9XpQEV/ecDWK6+wAs6myGqET9 +ZG+JduU/QgLJDsTjZeUIFzROvS8m1mUUBCxfypGgrpdpXeH6hxA+UuotTdwv +u5wyu2vliRxu/iVDQ+QRGJgezfpG1NUv1SXGF0Q/OCp48bTGKWdYdlF960P0 +g43n5AoPniXqiulemEicC7z9/VnjILH++EZi06HrJBAwNt0nfdoNOud1XggR +5/BZuwLO7wEkiNl8wddDxxOiJeMs4y8Rv7fykPfFLhKsE7hw2UnND043by+s +IHJ77hmHRe9BEhyuVc7fX+YPXF8uiQyenIOh4G4ziV+DcPecg7vVqx6UFpgy +uyFzGgT+9WVM/vFl0ON/fZnKZxVt2DVT+LRqusRmEs0VP5HDrlm7w+LaQeLe ++D2VqCihQ9TV4WWzHTpj0HFUmHXk7Ag00x6WNJZREEWrhxz5aRwO0bUvZIuP +wMB6u89GlRQkO2Pw0f3rOJTEvlXecnAMGosit2yTI+pWV3upLX0ckFSTD+uj +Sdixb5whR56E5ieefzrBTQH+kzdlH2gNglBJeveKRDc6amy53nfnDLyOVeAa +JvrILQdghHaN2C/enkZ3WsYgUyX69bY5GpGjPwvz1b5EJ7hvnS48RAFJu+L1 +UhU0iOldeZUp8gqVkveqZV2jwMPUHSM7Zmig/jnAVcI5E+13+0xuPEqBT3+E +BcbMaJAXdSr8sMET9PxbxohCNwXqfxa5VFtRQUc/cnht4AdkVJ36RnUjFWTS +twVe4B1HvYfZXy0xklFArEPooDQZdNU+1py/MIU8TETdNuS2o3rB/fK9G8kQ +sb2pquMRHTn2PzbabVyJUtfS4r8MTMA7neKpm0tTSAeSrc6UNiByo26+1fcJ +yHlz4+2LODri81jT+WuuHK3YuJ32bJuAL5aCZeEf6GjyrmjhB9M3aFd3iKJ0 +6QQ8em4YYTxNR484Reifk/NQl/fFRb0U4jkHV1vc66GjTTSr1nz2IpQeOM21 +vWAC9kc8WdGsyIPTU7GMdqPd6J4sww85kXn4DcpHqd6joHJqwZv5NgU9cLo+ +6N8yDmqrbl3YaEKGRwFsQYonXZGz6+OgCTs6qChcnVp3hQwNLgvkLHcXNOrh +Fbv0gA55I+pqO83IMLpJ75yrpyvaJ/GVW8OWDsIaaWLkm2RwC3txHjtWa67G +3ki8T4cdW2KcOa3I8NSQqe/yiht6tUfTX+c2HRT1vtdeuUOGag6q4KKRG+L+ +s5q/xJIOhcaSZ9htydDr5ba57Jw7OtbsX7L2Jh1OvNt29rcT8XslOr4ZbvJA +IiK1qrkmdBDlPtC51YcMky6RWRYqnujsosJRvct0sCbbtcQ7k2HuolpGy10P +tM6Qh3XCmA4kFQdn7wAy1Jyf3SVS5InGXryTIF+kw0+7JysL4WS433HPqLrQ +Cx0V9H1af4YOv6/b+dlnkKHz/TOHN9d9kPhSgeI5oEOCjWyJYwwZunKMxCWk +vFGkW0DhA3U6uLAop5nnkOFA4bmRQ0y+aA154fKwDB3ShhWDmhAZkkZWR7Z5 ++KEhg5ITnw/SQZ3mnuA2TIb5lCcHyNyB6JWY6VcDDjoMV1dqRNaT4bpW0gGz +U/5IPJhn9co+Org6tH1tnCKDVjhsGuR8gkLfDntcZKGDz7nv6z8wTILMzceZ +xjefopdiRotxX6fA9XbzFk/JSfBUFud16nyGVvS7XFlbp+DCvQK2W2yT0CbA +opJ+Phh5VE38qJyegqe7OEoT1CZB4nXWnFdyCDKOXXqmUUH8vObDpwH2k1Cx +q2PmW3QYig1g1fzxfApeGr2LsGqahLkSBuZdJyMRi8rRIA+tKVgbY5Yd8HQS +8pnruDe9DkenxOIkh9yngOuO4Z6xmUmQ1hp4eOxVFFLnUziuLD4FXaz7B6uk +KXBRTkT/E2McMnzzeej3PA0uMDbKNLynwJE89h/nHBOR41Ard6wV/nfvlsBa +Yt+H2MVW97e+QDXT97M6G2gw2XWl+fcCBdwc0a1a/yT0YmbEpUKJBm+2Hxu9 +a0wF7cEaT5hIQT3sxyQC+6iw+PzuavpaGgRsjbGusclAFy8qPt18kArKuXE6 +DuFU0IsX1t3FlIa+i0ourUukQk1CknQlhY7KPLMvpF/JRwOzJhaL6ROwMc9m +XrV9EGrjlRQcRHtQxMtysYCWadDu6tCQshsDSyeBx1ZsFNRyvryKFDYORq9P +jpQTue7GF0mD4A+9SIok9/+19uXRVH9f/9Gs3CiVKVMllZSUTNlKqYgGKYlK +GZLImDQgEpIhJeqTmZShRBPSQSHDNVzTvYbrXhfXHEU0/97vcx9rfZ7v6vk9 +/zz9Y/Vae+2zzz77vc/rtdfiUDxO9YPJvV0frqd3wO+4Kx27LLuR/CXbOloZ +G0pHgmc/U6iHiG2tmWrinRCh9n2X2b1e6D91VGfBxw6wGSz7Vv+wFh4PzN2r +cK0f9P+ovO/d2wq9x48uZTUzEPPF1jUd3X1goZbN0HzaDiMucf5JXUQ8G1O2 +wnSC9waKrSffI6tr3DTTqrQb3ZCYzCDfI2tbfm+HrDoXnGfJxDfceoJ0XAKG +5Ma7Iev8r+yl97mw3onvjfj1dCRzSNXcLbgbINfn4u93fciYlfJs6ds3SFln +s6Z0YSecFR6h7DDngNtGySSVRd4o4MBvZ8NLfcBafsHUr7IVUoxCvPhy6IjB +0ZsfPK8fGCsaTY4c40COkG7UWKMXcrA29uC/3AcTrbSVoyeJvpHoFPxd1gfV +CXUr5V7og1LHonz/8xxoDxK8vo52DRVyTg8H2PdBVUnfz4LrHFBp1RGyFbiO +Vlq7j6881ge54UpbWMkc0Eq4fTtvYQBqm2mSIL29DwSjI5WzmjmwuvnMo6zo +YET9Mf3MH7E+oH57t/Xl2i4oeS71Wsf2NrK8ZdIr2UTUs1rOwNu8Lqiw1egR +DI5Ce/2b1o9a9ILakd2VlY+6wfOgsURIbzzyKv+TO+cmF9wUGwK7ensgzG+Z +JrMxFY1drOrP0e+BH0+ZWjI9XGiNe0UP181AL67e/Ny1qRvuO/r+em7dh37e +T5izdrQYURX9K8fZnVCyPfv4IaN2OLZcHJb97EaSSaEHewQ74dAVhauzfbkQ +c9/thgwlHVHMgsc2pHQD56RrHieZC5qjYtPmpMag0LbIwF83uyHFb6WIJp0N +M6K6U73US0DNTUJhbFY/zJ5UOOqYzUW5pSPcj031qGyyRipYhANvDTja7aYc +8NBy4a7Z5IXsvryexr3SB/SI2BORthzYgD4c+zrog1Le3nyU4EzcF4n3w5Z6 +cmCu+qrq9y2+6K2o6jwFqz7IeNfFL3yHA9GRbj1Njv6IeX3Mfdb+PlDaiQK2 +5nPgkAfd55xkENqz3Pdj8IY+KHpjMLn1JwdSnxSw5rwPRRnL1aJyfvaCLX3z +uld2XWDaXzI5l3IXCS8KNEKJvRB42kfebXk3zDrPdNi49CF6cWfVfjH+XtB9 +MzkTthN9QKX3wcC2ZERLrB4NHuuBhAM3Jgw4VVBWGHKcOVBD8NUnHblyw4Tu +WaVmv54GemZrPwutrIM7rJhTAe7ku955wY+ZdZDWnxZb7FEHViPmagUEnk3b +pLXRrx6SKzvWy16rIfSVyEfyHStPTr70sqetMOTMFcrubEB5f4JFznT3Q2AS +R4t8vyzrofwpw3+aETWHs598vww1JK+aPM2AmaaVFA93GhKrPBXB7RyA0gu2 +M4pruECdnLAIs38JdOaiG7Gbu0HnfuZE2HgdZF5fNZxiUQcMm8dN5HtY/FuN +gHw/q/78UPaYGqHL19PUyfez4t/tHjMzbABn/2LlgwlU2PacVdjjQOzLN2CJ +PbcButdTdPwXVUFFV/XkPkKv6T838Uyq6oFxfe0S95d34G1wupmYSw+8kpK5 +tXZLO8z6Z0b2676bkK16dpLhMQiX/WwmSoVSwbdg2xpTtz7kKqgxjA4TfCJZ +ex35PrgDQ99lXSsbDUcMVJHvg4vIa0Z/De2B8wfjHPjCmtCzXsmTg885wNQQ +rS7p7oA/Oiz3J8tD0db4d7OnFwyAaay0lcwEE3Torc2vDDzQ+PGSuav5BsEu +eb7jrhdcoJRnZM16UYnuvC7Qzj/aBXGz7jq0nuaCkUZswKolH1HsDHXXxl9d +QPFPo/y+x4XbPiX7BhNrUWXy7KY94xwwLU0vrjWpA656XdyMr3Wg4gG6Kh5D +MLZgzuaqDBpsyxLd8CGzFpT6VpgLuA7BN+dRpU2t7uiX/ZIQLVMOuignKOx3 +tQ+c+hpSWIBA+KQzI2pvLzL8pNtX6NoFyoffBJQL1MMtxtI1LN1acIza0EP+ +/ojvw8KJsn1NEG7pZe5dWwbW4XI/9KyHQJC7WUVooA7Y8tGzBM/VQX/VhuJ7 +xDnunPaPIfku1Vsh+t5r0hUgp5AqQr5L5aVyn7kspQEkgzUPK9VVgbl4/opQ +4hxH/rkWS75H9mmGyZuFCpWQGe5SSr5H9h/v9MHUO33cxYdVDcUYIGjTGLmQ +6gplo69GyPdr9nz6prZYkgHUEuPI2DtucBNV/KEQuHez7KUMOQb0VJVxvbdd +gDbHXfMTyb+H4BOombeDAbqN01wza68ClVM+qGlD6KynyVEhRxnQ7eBoIsny +ATvtsyufWRLxeJgbSXgyIP1S9Z2aUD9IyHuwushsCCxD63S7njJgF7Vtj0ds +AKTQ6kOajYbg2jE5tVbZFnCO+fNz2DcMAlv91IY2DcF3w5IRrZeEnnUdbwq4 +HgfaO9H+1Q2DMFImnnMkvgUOvfr4hk/pLhwTSumOXzoEs6yVJINqmSB9hFKd +PJ4NRT7jsjs+D0C285uzG6QZwLK6zRdr5Q59B7xmnyZ0q+HnTKUAW0L3mZU5 +Vor5whufB3Wxx4cgpkdN4FMYA6IMR+INjvhDWJcO65XJELzobtCD/U2w087+ +UG51GdzvTDDeRZwvy8pxGvmO87zlr03ZZrUo61GhAfmO88Ki1q79nXR4I+P3 +S0CKhuQaZjUdpAxCoUDhQfIdRoVZ9ixz31pI0R/cRL7DOG1SIkpbvAEeH3pT +s3BDNdgfXfr7AZF/yYrHD++OtYBovY10ZGIJyAv7ulP9BqHkx86ntW2t0BMX +bzJ//kvoeRPbJJk1CFmLW4Y6c1tB7cs6judQGiQKUsc+VAwCuqM/V8ysDXbO +MKps6IuC19aps+oyB2HMweLp12310Bg/zSdBqBbU+r3K24i+1y9bu5pBrQdR +Y10BSnc1dP4s4dQSeaPaffBQy6bDUO0jw7U/6pChom1tkNQgHCiycdjc0whs +ZWMlX4Vy+FRvOqZK6PEOL/XPtSWNQGc7rtMMLYck95xR8veMdqalPq7bRXxh +/bZzR7uocM0ppF3wej+InZ/gFxdhgZ29lJ1tdA1scqC1kXh8bsTBxMwOOBVo +3Zf1thYEwg4xSPzV0+Nn9kl0gOJsA62O0jrQYlQ2krhTkV+kgT0TRgvFpblD +NOj6YNpC4m0KFNEvke1wmtt1gn9zA8ypNO0g8ZeBopLut9tAzcSoeU1cI8x/ +9JtJ4r72BV1GB1ohcpmkqK9SMySvFG8gcdOLqRaNJQxo8dTbrM+hg2V9Hfa/ ++tBxOeG2ZhBatj1ha14LvLVdjOM38aR9cfRqBK9TXTOl0togX6gC7/cErcR2 +RRQNfG4HecbGM4HbpI39yLeIHM9YUw3tXE5WCbBg/+dlrSRukD452tdfAgk/ +np5WorDhasw7nAfmb895zLW5MKp9/tSzRDb8UKVhe7MHG7b5pbNAe+sTwQit +CigdPYHXtdhVk3zLlwXs0N18X6orQSGkGePrWWoGoQdYcCdQo9A/jArDct+w +n6TW+bbnlrBg5PnFLZ7+NWC9SaYe+68cjs192AHLGJu7b7bVQo6dFfajGHGj +e98AE3p3LZtkiNFgEzrUROJ3x8+FJVOYMNJ+s/mVdz0MssywvfXm1V9Mv7WB +RLn9o1WLGkFx4CHO29769vLI+60QH5JF30FvggA/SbxfA2Zoy2QzAzpMtRmu +tXQwDt+L7RcUDjlSopohyeDrfI2JFhjdvRDnM+9ktFziiwbYEr+yY/3WdmBn +auHz/UFVOmu4gLh/6x7NcbnWAYNXvPF+Z+5XVFOVL4d2yyEd7VIWnD6wE+M/ +a2eqHNhUAKJrmHNQEBsOfbbB8dw8OGtHzkw2rIw0E3Y0LoV5VWxePYSJ3NDn +smB1gMW2ttwyENwni9e10adfe1DMgn9mlCYP7C2HpapGOP67SQ4ExWNB8v4l +7skixLl4n2/GdSta/+TRcRY056UklopTgTEvANtrc+odUsRYwGy/ki9mXwMX +2EEsEn8nISFud70DFrIkQ2lz66Do6Dec//qHM2khSUxI1jItMIygwZNDAjh+ +Xye5JDGvdkjnkygoOtJA8DhXOonXbnofd/9bK9xDQRr6p5ogScgRn9fCFfkM +0VGiz6e3uSi9osMKL14d/pDlfjBSaQbVzCobTcNWSPJ7ivNWcqa36qx/PZjP +1c0fEWCCy5gXtj+k8CA83ooKxW6hhtaHWWBQMID3pRbvetvcogjuOwnJ7LZk +Q3hZGbZf8cetsseYDdEWp2KslYpBczsTxzkhkda/F9iQv2X+yz6L98Af9gfn +ucHm2j0deTboVEc8Zr38ACO1O/H3XmAdWnB2Nht+i8hlO2uXwniGJrZnnFt9 +bojFAouelIcDfB/h8E4rHA//oW0z5bJY8FBZMchOsAJiq9/jdcu6XUDZmQVh +nYofE5yrQADlYlxu6ZMZ56RYEHTl6I163Rr4eJqG60HuBVPf83gHWKeXROza +VwfLPqvSSFxl+/A0tiITJE5sUa3cXw89mRS8bkR+dLOYdxt0TI5HHn7dCK9X +cDFeyjois2lJC9hJ7TX5E0oHCxlDjG9zKhyNvNcEtcu1J5xqWuHPPDG8Ln+U +ovKP0Dqo2Cha8EujA35krsf2rrRPE3LHSuCZjuVkuBgbvMJ9cZ7jwryW5d5h +w22XL/0CafkgntOPz/FhzsnIqAA2GO5cJ594owDOxH/F/lWXJcxBF9lAeZLp +ovMIAetnNLb3UhQVMbZhA33MhK92XhFs93uM81PSIqwlvo9N1LExa/JCMZz7 +sgXjn32bOQbKbGiMlrXVl/0AgW8bML4xoj5QS4ANW0WPxVVIlEKBQyk+r6dZ +4RXURkKnJ6w8nHz1I3yXY+J1T694P8MhhAVVX+acemtDfEfLfXGcidf/2a4h +z4K2jsisZdNrwH2DN8YpmfIbFhH3iFll8+XdZXUwIDyOcRVTu5fBO9ph/ca9 +/BppDTA9UQXXf0HdaYPAgy2QtdG4Wd+IDjtiudi+fPhEtsvVRgj6J125lejz +wgkpGO9VXLpW8GYleFSYtxcHscBbay3G91v1V8x5z4YjISoz+JKyQUfkBY6/ +UGCGnXsBG/wu6wneGcgBlV8m+LxeOC7/df8VUefRC6NVrF7C2jheflKeHL0m +8JQNMprzIkVFX0OIzS78veuZvGldk8QGzYJdExuX5ILUCmdc/1LnFh5dFMmG +Y/zqT2gu+aBLCcfrhjTumXnSl8h/WoCJmv47ODDEwnHOE/WxZpxhA3uFeNnx +zkLQkgnF9renyw5V7WDDnUTZxHbKexhasArjOYkz9HMXsEErLeFnenMJRARQ +cZzj9E72uQIW7B6Jfn/TrxwuR7/G/j+khVvu3kz0vXiJC07Xq+FG3QjGMxd3 +vk/2JfrVwEvmuo802DxtG/ZfOzm/501JC3ifu2ehVNMMo/8swfYX3c5cmPed +BlKGKgO5p5lwMjsb561/4Bt1JYsNUWD1KaQoEWJnzcPx2FJWBecyCTwkJHxY +KBmoeaLY/4n9nzdMtrHhm2dxV2BECljKb8R5e5jNJ1/SwgajpT2K/gdTwfDC +LdyfPWuHLnxtZsOETteQvuUTENgdiuPpiRvea9jAhmr+u9MDGtMhPd8Tx/Py +8spQ2xo2WDh5rLtU8xRunqvDvMVA+oFWykc27Ln0y1UPnsOeYjquN53DvaNf +3rGhzbm1PyMyB9wax/C6lhnyG82z2JB9cF34wZRXcHuOLl43Z+nT0c/RbNj/ +dP24NC0PensdMF6s/GUBvxMbDA7tFPc9WwjDhRfwfjdfGjQWlCbOV+/RMzOR +EuhZG4jth+26TSyJe6eFUnVVdRkVZstNYjxuYVNj/EQrqFvP6Cm0aoJc6St4 +XxZqq6S/97FhGu+fT+T4Bmz/0EFK8t94TNFWbF+gpC31b/yPdTW2d6h1kP03 +fts8FZ+X5pwH4v/G41ftaP//rft/jfP+r//uf7M31nNZRuKmCqZEfjXe8X72 +A/qv/f7C+9R49+u/9puxURLjr491Y5z3sx+OWTMx/lLhFF6X95Pgnw3Xq8l6 +FpJ7uetWUSKyXMTA+Yk97IzreSig8O2QUDI69eUGXvdypckWsp7fntnBJuoZ +Fajw+lXa+fSVZD3b0SOn3TiYirhm8/9Wz2iqnnVpAbiel4wtaibqGY00s7D/ +hXW/r5P1nKQesYmoZ7T9+TDGz0ea4Xoe/1r2mKhnlDnzEj4v/y0Hhsh6Vjor +MUTUM2InT2v9Sz2j/6Ge0VQ9h0VfwfXsnX90E1HPSNquuOUv9Yym6nlW55ZD +ZD3nHcyMIeoZWWrU4fvOQvQxrmdlm6vDRD0j0b3vsD0zwqeG7M8FExR+oj+j +i7d5deiU4HyG7M/nDLIvEP0ZnZW/jOO3ti/E/XnZBFIi+jO6FIewf8rdL55k +f3aTvriB6M/o6/O7uP5FZvDh/uykanxSZUku0gu2wPfar4v6pmR/PrJIeGG9 +Sz5a7cc79//oz2iqP+vWrDlL9uf701RKiP6MLorepv+lP6Op/pw0Jw7352t6 +nE6iP6OzVwpwnHu6lXF/vmOwoJ3oz8jBKI7xl/6MpvpzadpYMdmfZ3380EX0 +Z5SY5oJxltBiLtmf/fVYR4j+jNQVJfG6Rjc83cn+bJ9lMkL0Z0ShW2H8a7i0 +HMk3lvxD5RJ8Axnv66H/hW+gKb5RlrViAck35uWkORB8A/HL2OC6rRkRXEzy +jWlx2tSaeUXom4A0ts99Jr6V5BvfXa0zCL6B9j+iMv7CN9AU3xje/SmC5Bsm +nEIfgm+gW3kd2P78PM1ykm9Q87WCCL6B1OZ+4NXPTsU/5wi+kRe504vgG+ji +JUV8vt4Hb+0i+UZH55FMgm+grKBcHKeNk7kSyTey+xcFEnwDrXN1xH6cldxy +SL7hf1yRQvANFBTlgPPDX669j+Qbix/dbyL4BkrbuAzv64Xw9TSSb8ztl1Uj ++AZ6LOPF43uS2vIk35gjKtVK8A1kvrUT+xFunlNH8ue3zSwHgj8jLfPtOJ7t +Q6/7SP5MOX66k+DP6IFGMP5Oy9qkYkj+PFBklkLwZyRTJo/9DPhXfSD5s3tH +cwvBn1Gqtwsv//HT7Un+PCRhX07wZ2See6/l3/w5kcef0RR/5vbe1iD5M2NE +pZLgz+iP7i3sn/7xxEySP7sYBjoR/Bn9GPyN8fiyKnWSP+t4fPQh+DNKGN+I +/esoR80l+bNmRoc2wZ/RysMzsH8lQXojyZ9P0dTjCf6M6Ck8HXfnZIAUyZ+l +H2w4QfBntOanG/ZzuCfgC8mfi6Ubhwj+jKa94PHkdarfVEj+XP7tdyHBn5HK +WAS2/36c7zvJn4dPao0R/Bk1UkSw/ZQeXM3Tg2hKD57/tNaf1INje1StCT2I +wm1eYHsNk04fUg+G8rl8JPQg8l5Sju0t1wxHkXowhBa0l9CDSOOOCJ4/TOnB +Np4eRFN6MPDy03OkHjSOPMEk9CDqfPII9xNN4ZuSpB4Un868QuhBtNJtJq63 +KT2YytODaEoPTnfySib14Gz19y8IPYgWHMnAOBRdSSP1ILXDV43Qg0jJbjbO +5x7DXXRSD57dXXyJ0INo+Nx2nP8zala5pB4cs17vROhB5JH8kccz469+IPWg +zeaot4QeRCuU0/F+FRY7hJJ60CLv535CD6IlG3k8nNodH0zqwbovt6QIPYho +pfzYT9+SmXrkfOPwuQaBCK0KNPesH29+Yj6aRM43vq4plvpSXYlclrvi/Ox6 +uU+fnG/khvi1+4dR0U9d3vcyu/LwCXK+IaOjIOPpX4NUjgbh/b4+N5FFzjek +j6waudlWi/ZSeLzaPCaJS843dhh39jHEaKjv7Qq831/UpcnkfKPoHqp/5V2P +PBZuxPjRmJxf5HyDXuOcvGpRIwrZL8O71y4+f0vON6o2aPTuoDehARNlvG5r +vxydnG8kl5/qca2lo64rtRi/arHzFDnfyC2xXKwx0YL8f/DuKcpDdVVyvhF4 +pIm9fms7yq18gu2X1FJdyPmGhND52S7XOpCThCe2F3r0chU535AE2R3apSzk +7K3G46vjY5vI+UbivdWzUBAbLfNVwHlebSmSSs7rDvoFa452UdG1mJ88fsgt +n07O65rHtuy3ja5B926sw/X2H/M69D/M69DUvC6/82QUOa/7lsi3iDtEQ50Z +k3jd6lKpJeS8LiyywZ5/cwP6U/MQ9yW9HFFxcl736ft8zpq4RsSIXI7xW91N +veS8TitlIZ+vUjPaRxPB+d/8JsacnNfJtfdo6HPoiGZXiONZ3WcoQ87r9mze +lLE1rwWJr67AeE5Wwwg5rwtYU7FYiuirM815Olr/zfMz5LwuXNnBLTaeidYZ +hfH4VaaXOTmvm51wNKcEWChj6A1vTvXf53Voal7XuVpAgJzXUea9s3qWyEZm +b42wf7eYNyf9rFiQVFLeWtldBf6MKFy39RqLtHMuscCHIplMEauCW9uNsJ+d +wtuuy8YWg15XMfvSXjbsM57Dm3O6ds30E8iH4JDU/PtRbPgqm4r7s5zgp3UH +1Al+KO/lb5X9HjTi0nD8F7xOYbzRwzKOwFGiFm9esa3mka1bAgs+hdabfEqo +QLJSVhi/v/W1Hf/GVshv29ukbNyM2rcV/rf4k3nxo6n4n+7YpE7GP2YnkUrE +jwzt5Nr+Ej+air/o/d7zZ48XwQHdyp1biO89OiMM71fAzMBnznoiD6qNAody +q+GY+jG8r2vdek6k/eN57rqEPRQHCvL06Sj3DBn/unzH1UT8kCTLm+ecySnE +/FzP0sxKgKP7zkJxOba3r0y30xHvgAVbzijlfqxDqum8++4/1kVT63as/DXs +S+T5e0z7KyLPKGVAGdsXdVc3/jFhwdn0GQz5M1QwtVzK6/8Oexhywggq848L +D10h+NodHWx/KnF2BWn/80XYolVnqChNVb/93/ZVPHs0ZW+UaFPrbcmCbquO +20v5qHD/GY+3PJ9WHfOB7x1cbvbuP3idDQIXnbC9U4f05qeaLBC4PDDSZFiN +8mKuYVzjYuyqDwvz4E/B8gKnGDbyeFeJ8zxLJ1CFtJdN+i7XbFgNE+Vc7P+y +1wCFtH84fTiPsAeT18l/iwdNxTPXXfwhGc/4UtogEQ/yif6E/f8/OsNrsA== + + "]], {}}, Axes -> True, AxesLabel -> { + FormBox["\"Re(\[Lambda])\"", TraditionalForm], + FormBox["\"Im(\[Lambda])\"", TraditionalForm], None}, + AxesOrigin -> {Automatic, Automatic, Automatic}, AxesStyle -> + Directive[16], BoxRatios -> {1, 1, 1}, DisplayFunction -> Identity, + FaceGrids -> None, FaceGridsStyle -> Automatic, + ImageSize -> {360., 381.3618074056228}, + Method -> {"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "RotationControl" -> "Globe"}, + PlotRange -> {{-2, 2}, {-2, 2}, {0., 5.802316951265804}}, + PlotRangePadding -> { + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, SphericalRegion -> True, + Ticks -> {Automatic, Automatic, Automatic}, ViewAngle -> + 0.5011114127587017, + ViewPoint -> {0.3238927033719261, -3.3486732981607807`, + 0.36260261842336333`}, + ViewVertical -> {-0.01031655144691719, 0.10666112573620945`, + 0.9942419087037762}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "SwatchLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.880722, 0.611041, 0.142051], + Lighting -> {{"Ambient", + RGBColor[ + 0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.368417, 0.506779, 0.709798], + Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, + 0.33320940200000004`]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, + 0.33320940200000004`]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #2}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.560181, 0.691569, 0.194885], + Lighting -> {{"Ambient", + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.14004525, 0.17289224999999997`, + 0.048721249999999994`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #3}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 6], + RGBColor[0.922526, 0.385626, 0.209179], + Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, { + "Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, { + "Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.3}}, "Rows" -> {{0.5}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"SwatchLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.20067051333333336`, 0.14943112333333333`, + 0.06032302333333334], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.30100577`", ",", "0.22414668499999998`", ",", + "0.090484535`"}], "]"}], 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.30100577, 0.22414668499999998`, 0.090484535]; + 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.30100577, 0.22414668499999998`, 0.090484535], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.13133225533333337`, 0.16813654733333336`, + 0.22213960133333338`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.19699838300000003`", ",", "0.252204821`", ",", + "0.33320940200000004`"}], "]"}], 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.19699838300000003`, 0.252204821, + 0.33320940200000004`]; + 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.19699838300000003`, 0.252204821, 0.33320940200000004`], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.12202865833333335`, 0.14283175833333334`, 0.064190125], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.1830429875`", ",", "0.21424763749999998`", ",", + "0.0962851875`"}], "]"}], 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.1830429875, 0.21424763749999998`, + 0.0962851875]; + 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.1830429875, 0.21424763749999998`, 0.0962851875], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, + 0.048721249999999994`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "6"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.30756835, 0.18676585, 0.147065275], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.20504556666666668`, 0.12451056666666668`, + 0.09804351666666666], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.30756835`", ",", "0.18676585`", ",", + "0.147065275`"}], "]"}], 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.30756835, 0.18676585, 0.147065275]; + 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.30756835, 0.18676585, 0.147065275], Editable -> + False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.2306315, 0.0964065, 0.05229475], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.15375433333333333`, 0.06427100000000001, + 0.03486316666666667], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2306315`", ",", "0.0964065`", ",", + "0.05229475`"}], "]"}], 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.2306315, 0.0964065, 0.05229475]; + 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.2306315, 0.0964065, 0.05229475], Editable -> + False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[0.3], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.2], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "0.3`", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[0.3]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[0.3], Editable -> False, Selectable -> False], + ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.2306315, 0.0964065, 0.05229475], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.15375433333333333`, 0.06427100000000001, + 0.03486316666666667], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2306315`", ",", "0.0964065`", ",", + "0.05229475`"}], "]"}], 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.2306315, 0.0964065, 0.05229475]; + 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.2306315, 0.0964065, 0.05229475], Editable -> + False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, ImagePadding -> + 0]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}], ",", + RowBox[{"LegendMarkerSize", "\[Rule]", "12"}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.8003378913384247`*^9, 3.800337929996578*^9, + 3.8003397788488503`*^9}, + CellLabel-> + "Out[189]=",ExpressionUUID->"602a29d0-0e2e-4208-88d0-48290282265a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "5"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"NRJ", " ", "=", + RowBox[{"\[Epsilon]", "/.", " ", + RowBox[{"{", + RowBox[{"ToRules", "[", + RowBox[{"Roots", "[", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", "\[Epsilon]"}], "]"}], "]"}], "}"}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Plot3D", "[", + RowBox[{ + RowBox[{"Evaluate", "@", + RowBox[{"Re", "[", + RowBox[{"NRJ", "/.", + RowBox[{"\[Lambda]", "\[Rule]", " ", + RowBox[{"\[Lambda]x", "+", + RowBox[{"\[ImaginaryI]", " ", "\[Lambda]y"}]}]}]}], "]"}]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]x", ",", + RowBox[{"-", "1"}], ",", "3"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]y", ",", + RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], + ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", "16", "]"}]}], ",", + RowBox[{"BoxRatios", "\[Rule]", + RowBox[{"{", + RowBox[{"1", ",", " ", "1", ",", " ", "1"}], "}"}]}], ",", + RowBox[{"Exclusions", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", + RowBox[{"Offset", "\[Rule]", " ", "0.05"}]}], "}"}]}], ",", + RowBox[{"Mesh", "\[Rule]", "None"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"Opacity", "[", "0.7", "]"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]}], "Input", + CellChangeTimes->{{3.800339910960108*^9, 3.800339911795102*^9}, { + 3.800339991368039*^9, 3.800339994698779*^9}, {3.800340202477195*^9, + 3.800340205209553*^9}, {3.800347220686782*^9, 3.800347253851025*^9}}, + CellLabel->"In[28]:=",ExpressionUUID->"b1650a8b-406f-4152-a295-09148849643c"], + +Cell[BoxData[ + TemplateBox[{ + Graphics3DBox[{ + GraphicsComplex3DBox[CompressedData[" +1:eJx0nXk8VV0Xxw2lpEEqlEihVFKkeVg3UaQBDRo0EhooEiGlSTRKVIQMEUXJ +mAwbSWUoM9c8T5mHNBje271nn3O7z3vff3ye77Pfffb+7bXWXmvvc+4z+9gZ +3eN8PDw8bhN4ePgZfze+f2o0MtKJZldsi/z7d0bDwAB/6wBkNR9ZalrWSPJG +6Qsn13X1QYjiVp4Y0zKSqzS5K87/0Q2WYmFLZTRTSZ6qrFB56Ec7nFRc7yGn +mQqY+9bP+HxisAlk309dGmtaRvKemVNMeAdr4JbixyzGc0k+q2GctEU2HXh5 +/v6vi+SdA5IjcmMKIdHEe7qmax/JnZzXS79amgM2uauXusr+Ijl/kJ3t+Ffp +sGx1ydaymCGSH+n1/HXnUxxcYLbnpZE8z/uQj7o5FN0QTI4x5Se5k/bcBacW +BiAVZj+jSX793WKdIohCDzqC6CMjY0iu5r2KZ2ZrEsI6G1mGe8SYfkfPthvf +6WXTGfP4zMcT3LspnTFPnpxzQOwnpTPmk/tN9SL/UDpjLnX9cHkYXzOpM+bL +rB6tU+OpJXXGPN/aPTAxh9IZ87zt5XwlIpTOmAvfjP3qAZTOmM++XXNgdyKl +M+YOXVM0dWsonTGngcCo6Ww6Y264VGH5BjadMZe+rlvxmk1nzJ9E6nT2t1A6 +vxSa4vBXV6tnP5TKv1M6b87cvafkUSN625aSMLqX0hm3n/5YzX/xb0pnzH9/ +KG8W4+sgdcZ8U9Ev1aNClM6Yq9Vd7NgyhtJZ7+WA2tKKRpSz4KCaZRGlM27v +pNlueVOW0hnzUaVZglXbKZ0x3xF85LdwHqUz5tLvdSt2DFI6Y35k2dL42o2U +zphXX/4mIcCmM+bv7ismWbPpjLlKi2xDOpvOHf7njWQ1a1H8c9q6yDZKZ8xv +qpeHqPZROmM+42L1s72DlM6x6wauJh2tReFnjK5rCFI64/Zr7UQs9olROmMu +Z/lZpX9KLakn5qKO9Wg8jdIT85e9Fg+yjlJ6kuPxLhE630zpiTlP4Zm3SmLv +ST1JXnro8/INlJ6Ylxz85h68gNITc8NXljnz2PTEfPyXoNa7bHoeZ9pzGQq2 +X+xzup3SE/M9Cw5pnO2n9MR8yoYXo02GKT0x33fMRH/9ZEpPzK877X/YP5fS +E3M3CddJUosoPTGXuxsbY3mS0hNzxU2HhQOsKT0x3zYr9Xn2cDqpG+a+pvkq +i9ZQumFeP1ZY5+d8Sjeyvb1V5Nv1lG6Y/zzQ5Lj1P3aYh5Ja5OYMtnPaYR4K +/Xx0z9EfnHaYh4Yl1X1keXpI3TB3HfNH+LI4px3mIbOyuvSwlZx2mIeW7+w+ +4HKI0w7z0O8cs3yD55x2mIfEeJ7ZuNzltMM8VLlbL+6EyCcOe8tDPMp0iR0K +5pA8LCTnc4Cf5Lx/VCH4sj+HveWhJXvjvMat57S3PNQlv6VE8D+6pSLl1nty +eh2cuqWiTfqJcUP/0S0VKdb23dXm5dQtFVkddlP9IMmpWyoatUm/O2Izp26p +SNto19oRLypOYn5L+KuLf3YZh56p6KCLzdiyck49U1GeYOnMCz6ceqYil1e7 +VcZLc+qZiniWnOpVGM3pv6lIXj4qwXoOp/+mIrUUDYdt6zj1TGXsgxoNBc3/ +0RO46Alc9AQuegIXPYGLnsBFT+CiJ3DRE7joCVz0BC56Ahc9gYue8P/1zAMu +fg1c/Bq4+DVw8Wvg4tfAxa+Bi18DF78GLn4N2K87CL9uJ/iHwf/r18DFr4HT +r4k4CVz2EeCyjwCXfQS47CPAZR8BLvsIcNlHgMs+Alz2EeCyjwCXfQS47CPw +//eRWuCSzwCXfAY485l3rHwGuOQzwCWfAS75DHDJZ4BLPgNc8hngks8Al3wG +uOQzwCWfAc58hsgbgUseDuH/Pw8HLnk4cMnDgUseDjgP58i3gUu+DVzybeCS +bwOXfBu45NvAJd8GLvk2cObbRL0DXOpH4FI/Apf6EbjUj8ClfgQu9SNwqR+B +S/0IXOpH4FI/Apf6EbjUj8ClfgQu9SNw1o9E/Q5czkOAy3kIcDkPAS7nIcDl +PAS4nIcAl/MQ4HIeAlzOQ4DLeQhwOQ8BLuchwOU8BLichwA+D9n0+Fgjcz2Y +vAo1jlV9/C28GDBn2X8RGn+MZ5Hqz2IoZj73D8nvxGoF35ucCq7M/kdIztN1 +9k29rwfZnhWXItBaj+3pv2VSOTlgzvFc4PJc4PJcwM/lmBfgeTnpDG/9e06R +Jn95bllMO4pT2vYq0vQHYHvD/Md5UcGLDHs75gYPTcsEaJjnWM+NrnGLI/XE +/HPpjSFBhp5fP86L/Bt/sZ61FseeNwpXkuPHPGhWu5gUH6UDrqf6bI41zRuX +CrgfrGd5i2FUtUYlOS9W+0yUfv7CMrMzJaQOmEv39Lbyentw9J+JlpgZBVpK +cuqfis5mNI7YzU7l7Ae49AP/v588MNRPcxIR/8/44f+Pvwwm3vqqYfC1mHwu +Xq8jQnLXlgZ4AIeegPXkWEfgso7AZR0BryPm2C+SS+p9+xgc94/PD59EytNl +Gf1ztEe4PZ4Xru+e/jabWbSYWhfML3RFp8575sHBGXm789gdLz09OPQvg5wX +Evkr/D2AYzyAx8Nhh4DtkENnhHXmWC+E14tjPAiPh8NOANtJc+3Dfa6yLTA2 +uWa8qywd3Wl6ON9iFJ3kW/XUejVcC9ClvdM9X9Eoju35dLG6cYUUHQSqzwpo +ug4S6/sNnXR/vXXlegSNo7PppQy/6rnaeNq0rAN9MJ2sX7RwAGw3nIuJMR1D +w3xmPi9cggTEYT8I2w+Hngjrachcx2HyuRZOvpdDZf1JzhpnOmR8cOT9LuNP +jj+VqXMFBCTmP5tfTa0va7710CXWVHfuuQfn+IHL+IFz/Dh/6zIUP97GGD/W +B+vsIunkO1MekePEOhfpBVgfk/Mn2xMcdpkcLJ+ggjjtELAdcvQDuB/MiefC +OF8twyEGx/6F9d9cuYeXxvAvDn0Q1kdGomNzwbVBWDZLypY27RM60HZ/e/N1 +xKkzwjpz2ANge+BYL8DrxWGHgO0Q64z99OLWNZtvMnTG64L9aECgdNCNsS7Y +j/C67NpQtXYKw4842iMu7RFuj+MVtjfDSnmfeTKVoGD7AzQZ9oHXMc8mX2he +RylwtAfO9tjeXldfKBlmtOfQH7D+HPMFPN/DUV/vyGr2kH4xs+1PuXFdHpm3 +YC5fMerXzJ2F8FxL6dzfOILXcWbhw+bCB0XwYqG/jawmHw3v10s2vTTpnPkA +cexrwGVfA7yv4X5w+2SNexdC+B4gnOeQvGXs07z15nBEdoywpisPDWlMlHaV +rYGz13RnH+m9S+4jhN8hhc5HhbvvUnkLPtct+LrwvJhXMWknRD9ofPabkbwv +JYD1wXGpttumVHx0PkedUoSq1aX3D96g9MHrqLX993HH8CKQkDwdZFr2g2xv +7XxOe8LoLI76pQgZqNSqzRX8BMFMHX6T/ptwVFyt0iWN1Ae3D59zX1WSn9KH +zK8URnRtl1H64PH4tk2JWtV5lxwPXq/HbwoN9y3K4qhPI6DYsXF0jAw1HtZ6 +xcNuz8eF7n5pnPkG4HyDY78DvN9xxH/A8Z9jvYDLegFeLw77R9j+cf/Ybpe7 +xOi8yy8h54vznOhnxqEPpbI4zjEyUeGyVx0KM6j54vh/er8J+vM4jeQ4Lok+ +9Rsb6J3GkX+mI559b0qDZqVy+gXCfsExHuAyHuAcD9538HM5xgl4nP/63TfY +v/a16/cZqZxxBnCc4dh/Ae+/HH4B2C84dAasM7Y3HJe6hAtuhnXfJfcXzHNE +XDYifyp/w35apL9ch5+nkuTYT8WfxCg7C1BxD/tpv99tKaPOUlJnrJv2e50r +00dTfoE5T2uc2npJyi+wnsIzg/3fVd3liLeZoBpV6ypxpIrk038NiazoyYWZ +MR3z6NGVpL/j8XwuuKg/z7aIc18GvC9jjnXYf1tA88sMxPlcxOW5CD+Xw38R +F/9FXPwXYf/liEvAJS4Bl7gEOC5xxEngEieBS5wEHCfDH9/fonGoB+xFs1a8 +K6yCK9b2NfzZ/9mPgMt+BHg/4rAr4GJXgO2KI64Cl7gKXOIq4LiK+8HP5Qnf +M/0B2/5F8oDVR76pUv1IDpWHxpjWgQvvrP33++5y2HMZ8Jxr2ZvD6Mflktme +shhe0r9oBrnrzhrbkPs4ziuei0d3hffmwZL9xptcZbvJ/ei2I9/X36sLOO0W +sN1i/0o55jQ65UABanyVZbbleynZHq/7ve1TXayKijj9EbA/4nnh9l3Txfpf +fb/LEQ9TIefY8sFJgtS8sD8mbz1aY3afmheOD04Hboz68ymPtDccH7Yqv/JL +L6Dmi/0xwi9xWtWUAs68AuG8gkNnxKkz1q26O/aj98n/jAfweLB9Yl46OU82 +eQlln3h9l9Vp3VtgUkSeF2F/F0sbOrh9eRlnHEM4jnHohjh1w37Nk+uxtznp +P/YAnPaA7WeloX2ozNwCjnXJg+QqW8k4fqp/vI7VTa3ekmdtUGgzfeRvO5xv +SBlNvVO6toE8H5vmL3D2fmkRWqkqxqepWgtnJ++by8NTTdrhxJWCu8e8rgbc +D/brrm3B46VkqH4wr1g1eswWKaofPH4hH/HtA0+rOcZfCzxTRNY8ZltHrP+R +xtxLOoac+mRC0sK2RTVz8znsKg8ejRy85S+aT+qGdZg9JifbXaeA0w6B0w7x +c1+u29S6b9R/dEZYZ+wv2C/C9UVKPpbdJfcLPJ4g/fVix1Yh0u/wczfY10nc +ZPhdf01rh8fcWpix/cPLrVNa0PC7lIeGcys561CE61COehDhepBDH4T14eEJ +j3VSuLYe7y+2jUm2+srfyXXE/DjqLF9o0cARbyPQPIH6n7fmV3PoFoG0I+KW +1K3Nh9HM8Ywi8yWnHm9Dh6ww8hwG858ZnTThh9Q5DM5XLW1fefhZ/ABhhw/T +/8YFzDPNDouJX+wF5YOTs2UYumP+SdQ4e+hmF+e8gMu8gMu8AM/r33w1Ai7p +X5p9LLeEc17AZV6A53WrJ/akWe8IJCi4xGq+bIdL7uuPbVgXzll3I1x3Y3vA +8U1G++aV1Qx7wBz76XRnu19b2ks56q945OBkiDrmpMI4hcixIW6DsFfthcty +w0yoj3lyYc1KRLbH9j+11v5H19RUzv4B94/zQxx/TGfPzB3VRdUFeN/sOcmD +ntRQeT72a4N9t4M2JRVzzgvwvGJapwePqhkGQ6L/cVuuvJk/3p+0c3JfXtB4 +xdPPg3M8CI/n33OGIsh7YxsTKcd5zlOEMMf943p/a9V80d8/33CcZzaiGdFT +lL3+VHCcq9QiznMbHAewX//rF6lo6rQHQfIq+Rz3khGoNN7NUm4r571kBHp/ +YaHi/re1nHaIsB3+ey8ZgTRvnblPC8jhuE+MQPpzN00anMF5nxiBDA9qBIz9 +z/sAESjt/KGHH5uT0L/3sBHQYeGjM3egD/69t40Aca0rV806BjjuZyOg1iav +/dl/3q9g+GNDv+WyWZz3sxHARQfAOvz7fkUEmPsdFL0tU84ZfwDHHw59AOvD +sS6A14VDN+CiG3DRDbBuHPYDnPaDz22wvXHEf4TjP8d8EZ7vtN3nq7ppXdBO +PJf/8MZPw36FnHkI4DzkX3+vBwvtIrcJ3SnkPRTmVvMMjKsE35P+hfe7Ywab +aDvjSzjOh2uBlqpDD/uVQto/zhsr9TIDrMcjsv/pVg6DNzRrYPWOjoKqmf/p +H+H+cXzG+9SYbYUTMg40cLznkIn89ndpzrlM5Q+4rv8hJeF893c12T8ep8Q0 +T1pJSgnY5u3c2c3fDA19CfONKmoho2fSSPI26lwaz7fxrcy1G0NJHH5dC16r +xktNGI048xzEJc9BnHkOzmP3eeerdbpUc8TPFqRY9TP7mi3nfVwjuv65y/rB +Vepcy+7tq1VlMQ3owzw919NvS8AsXm/rPftaJI3ff/79aKna9V4IJvxRc2xc +/8sx7ajcjgYnB7ohePGuL6N0isj3mafs5LEYntMNg6Hb1m57U0PGQwf1rWMV +VSrgUWDjLt7RfYD7l3gfFJ/7OQdirvf4PkvoJd83nhJTqzVrdi7p7xKu+x5/ +3dCEmn7NS3Ti7YDbGgkHel0Q+X7v1n0B6T4e7SCzJdBc2bGXnO/bjNJIw5O5 +hL+MoU0/HCTeF9GCnm/fK1PfkoT0/NvFw8dQ78faqcUoyBq8R4sCnwQ5Togj +/UjZTSZu/JgWkArTWSGfRtUXhte3XB3QzgMlwq/3GX46vjC2Ft06tGLXYohC +/M7TB/rdqfdI+Tet1gsPjEQ4Xu3e7hzuvLcG8WsuH3N/RjO0ibp3f4ACcj9a +4+7Wnn6jHuSz6D837BlF1iPbdl7a5hPwCs3SbJ9zaU03uV+UySW6LFAvIOMP +/zGJmtHC+Shhh/nOM/IBaN8bPh3j91S9YNL9pv7EBg9kNZWXyduJOLZxliuT +yxF2OImVt4NSeWxjmXot1BPjxPvsemKcHZmscWK+W4c1ThNivrtY8wVeYr7y +/+oMywidRf/VGU4ROk/4V09YRuh59197AGwPiwh7CCb4C8IelhLrpeeS/ne9 +wI5YL91/7QGOEPaA7fAOyw6hhbBDDvsHEcL+wwh7Nia4JGHP2A6332LaIQQS +doj9S4PlX1BG+Jc54Y9ziDivTvijJ+FHmIsRfrRj+6l9/hm9UHivdt/BZW0I +JWyJ2SOcC1/ytJaYWfaCj5/hCY1fTWhcsfz38gu5cOjgMbN7p8bQJil67dEe +1YxUhJZILlmWgPRyxwce//oKbfr2cVPC2QYUZdUZE6jQBheumzusEegFpZt+ +I0qFdcjVMTDjCm8ejHqeNmud/2iazjev5CMWtYjmyn/3V2UkkjrWtOLUVQFa +cXxfyDa1BuSxc7bIqv5YlEac5+xlneegE8R5jtOpqIFVX0fRZryBjjXCVcjx +nJuHJ284ujghOma+0Cha9m4+1DpQgnoU35b7Ngaj1jfqd2PofDQNXbdBuZZ0 +FG33oUf6xlPUIxu0x8SDj3ZjRfTyY9tiYbjqNvrU+ggFrJSdEHi0GJ4vfecY +ZkyHCA/J6QHX6iBmKq+J5IQkONWR7ZxbXQM/xs+sfP+sGbaKjuqZZdMD70fq +ni64VQ3yExd0OYfmwfXaRcmDRqNp93qltxmH1EBo9q+myxkRaIvrkYUWCy4i +rQa0X8qqHqbyfXm8a/F3WNNe57dXpxfmu+wba+/ZAP0Zi5ykXubCnBiLnXr2 +OSjrhObCG49bYJKWw7ruJV3gHVJi+6gmGR33WCR2eGwTFPxe6Sb9qR0K5jif +Nn/VCxcVvdoqHVthlVVJWNLyXDhX0yZfdKAaCV9olboa1gEV3b8e/szrAYfJ +s2YcdS9B4fFr8jNl2kBqW1bI1CvdoLozs+3nYC8EfrJzfHOyE6z8hCIy8nJA +QX+TRIoXo94+d29/yJECNLa0Q8ipvhrWEvw3iwMPwa+KO40rM+qBSN0jejGS +1Wjjr0dH8lPzgNYu+FLkNh8tVaQXXd0VCo72u+ZOSXJHTmq5v1ZFd8Pe7xOC +VPlL0BPjaQMf/PJBf9LZOfE23RCUsvuV59pCNHlZT4pQbz58Olo7eNSrm8y3 +39u4FWin5gPH+iK8vjPCWfbwRZtpD6BymWUP8wvLNVQZ64rrZRfXBNu4pVXA +wdFdgrsR4xFJZY4HrHNdXb525YMnMf6VrPFDRefRY3K++fDs33FCIzHO/uau +m7sseqD/nGDis7AqsKq83PUpNg80Ji8N4h3pxvET1WUVuj7dmA+yRS+HHij2 +wBUVHU173wpkGXll1JWx+TAjvCatvbMbik8VCWrGl6KxDytz7fXyYfW/doWw +Xd0m/HQ2y0/hCuGnOv8+F8qI5x4i8lgUyTd5Y3wFiMlFR138ngdb3WcNxwn2 +wO2IibG32xj1Wq/TVcnl+eBN+JEvy4/QIt2DakJOdRD8ZlppVMVXiN7VeKLU +tRKMlhYZdU9phNfrc+bonOiCQO+YbpOODxBt8Ghz7+FCeHc8+ErapG64WCxr +8HR+DnzvkWjaerEApP7d18Bm4jv1po0F8PzxKW2Ho91wtHxN1WnxAujrfvty +eFIBBBD9BLL6Qby9rH6OEM896cV8LppqyHru6hWTzo7f0QVj01cG9YxPQQeE +x9GnXC0EnpIlmvX7qPfVz56YWqhhWQi2Z4eEXrtQ9zXTpvXsvaf+CHH0A7if +dRH/9AOH3Fn9eNnxjGfrByTUFuz7248/oVsUSzeEdcN1R/FUVK21o50R+2if +wlfnwP5jPbOS1ajvuSYvWXPt7IMc2PXw++oTPP1kfqV9RGHOt4vfwO7Iy4/v +eJpRCJHn/HxhcENLtx9Uifrr1bW2/uvxzWjiKMOUi9+p+mvXnAu2L6zqUccG +m8U6f7oB7+MpK/18skyr4eDNFLdwSarOul0QMz0kuwKcnEpETsox6hain52s +fqCT6IfjuYCfyzEvECbmRdZfLB0A66D373xhOzHf52KLyx139MHlj1LFF8K/ +I1prddnxGznQVCJ4Xr27DwZO1+jx+3UidyunSc4+32Ds70KhH4y4esi29G5y +ShMy/zR46df6XFhnPF+i/msBFEsGyUknVqKFfi7PhnTqoXl4n6fdYDWqEvul +7L2yAXafPnO+ZVwv+Go15hpYFaJwiUk9P9PrIL7DOWkbfzdIPlzfEGzRjtY+ +S0kWn9MM/CtdIqaKDUCA6dW7X5f1wRYb9wlrJ3+HU7VlSl7+ORB123ejtHYV +KB78Mfv7oQqU/urnLSiuJs8T4uvLdM9Vl6PMnfc3HJak7i8SWBw+EzzkxxL7 ++ZfrgBYYZxAfUA7PVzd+8TlbDvrZE7v+TGwAORUJn6UKlWir1rgAq72lYEe0 +F2G1R7VE+wsH1DdnizaQ96rXLUKOxxqWwticHfJOY3IhO8dps9LhKpBrUAtR +uNsAqwnd6CzdQJHQLVGMNa8lMsx5gdetr2G0kmq4+W3EOvhqNYSdLClQZtQJ +w8P5I40bGXWO961GZ98uaJ7uy7M1Mw3EV++UPy9VCJ9qWFxggd9fjkxbdJlc +cGZc5SjbLshUfvBd+GgySqgtmhOvXcjY782zdt6i/NpO67JN15pCaJdgtV+1 +lNkeqoj2Rv+2h49Eezzfr6z5IjxfDvtH2P5P/usv6BDhL/ctbj95+fs1xKwU +GVs4UA37/MwkduS0kOcJh37uGZEpq0Rmtpfn2TXlgcH2+TPcaBngfm+KZNK4 +aqi9rhgum9cIhx3kmXxbOJOjSUEsHnUi7blRWB7sszENcxGtQpbn3ryO52+A +rAXDD1897ILgIY+LKvs/oIDHBtdvLC6EL5c338n90QsyHybdjLzTgt76y639 +1ZIDfuZ7po/seQd5h3YcmZxYDa7vjl6qmN4Cq+4syUxw6AL5sg3DQwtT0MK+ +s97yGoXwfXvdW90JWfDlqr7lttYqtKt3HM+am41wRSd01atrXXAt7UpW5LUU +2L/Rr/GUWiEE/lm2OkEtEUYtO6Bf6FWN+Ke9lhKMbgbVwT+rNbp7YSTyc0HQ +yRbYKqbG/6QrB7SXTN9oYtoHF8cITa050QZJ7kJWfQY5YOokMs3ocRdMmXE4 +svfjBwjWUg5yXVAI9jE3Dq+sqyTjoU3UFtcAhr2dOP448o5cA1FnfUerj6as +nBFRCn6q9rKSbjzkd6nVd+OLtSPuwv2snF1uMjxknegko59SPP4x6K6y7bnW +Rp23fIw7aWt1vhRWDt20/rMav/9chjatGOebvDkBWjJXSu/9QJ3v+TRk9V82 +TCLfT36yrndupFsIyrLz2bJooI+Mn6JJIqffMrijx2XfMN4eUE67HC3LiIfj +dSOXCbiGgMLm6HO05znwLeaf/kFhQzaz/7enJ25yftkAtw7MzlbwLANz+VEO +s4/TYduTCKu/48TnsalKgQF/x3mImBd/AKvOekPMq10pj10HGDtNlanDyX/1 +BKznB+t/9ATpr5FMPY3OBRis1K0j47bV0Vs8Ss/LwEdo157eifh9nk5IHtuy +5ulDa2iD2iR7jSHoN/GKNt9Sjr5plV/hFUqABClz94jKQSjy4n0/rzYfFYWL +SG5tTYTHvxNKbzzlodGLJ6hf402AnHv3zny4dAcGStatKYj9DX3WSxykVUJg +OY9JpunbD7D6XaRSVEkTrJ9+k7dSKxfRtnxOPaxQCjvLHaXCtEYgl+eTm25U +NVzSPHZqooQvoPEywq5SzeQ6OqxVtE7spIOgbGZct/4w9b2h16alBueeg/L+ +tBCVKdR7m7XxVh8lZvmR53j7MyvOHtiaDMLXKxsXeXrAC4/lOXk/h8l4ddVv +S/tWT6q9Jqs9Er7Gai+tcVi+u74Z1suFlXXVl6B7gtHiR+XoIB/zdGCBRTM4 +L9j6oKYqH/2cNVJh+5wOJ5wsrmvcb4bMt8c/u84rRGI8T59cuUyHO4IDOktf +DYLPhsizBUo5KCbqa3hgbhI8zoheWzhxBOTcT9m8lKxEbpVKqsHL/eDq6Qsr +RVYPw+N1ShquttlIxMG49c20QDB6wGv5atYwJI3M4D/e9gFufe431HMJhPcO +1eZy84dBd//90feefwHVUW2yFoaBsLJm+YHWlGY4u6Bc9tr0SoiKvXzBeQId +4ibvOn+6agTO2Xbfizavh+BrvubHCzzhiKe9PTyizuePmB3fdtskAKx/TWje +60C9D+lmV2U1RcsHeD9seyMhPASd0y586l9Rgrw+jw+JFEyEuzRT9SaLYVD9 +MU/4JZ1hPyVtVhITnoPI2uTpK68NQ8+YjY2RqoXI1WH6UbmUANitd2LmwZpB +eGuy85N0Xz48OdF+9WFlIhzbeuvc2NpBGPddbh1NvhB+X7ZXqyxJhAyZf+wB +Dj1j2YPUsmcNKReHoXjaje2+OwpB0WKD3I6qADi/d4ylWeIw1K7Q1XI5QgeX +E87Ww2/9QcX6pPi9d8MQemOFWH5lCXweI54W/tkfXAjdTObNkV+6qwI1B6+5 +O12EDnKE/qHDTP1RAaG/+hmW/tK+TP1R2h6W/umO5e9UXgzCLNVnLdqh32Cm +wJ4ZkXVJIKE5s99eaxicq28fWTOcA5bn+iaEpj2HPmLd9YC57tBjz1p3vkhf +G6XGZmjvLGjrOUYHkTG+yzJn0UE6ITOnOK4BhnhjvaW3liI4/NVDQIsOtPKC +h4axDeCq8SBFYW4JUhs3ol2ykQ6b+osu/HnQAAGRS0Slyyph2ejjzq/v0SF3 ++vzzJQv4aC4LX48aCn4DR6adC375/S46sVVHfbwzD+1TL8vfXVKn5O5Vug+C +4d5ysbOayficlTvzY4sqHX40/QrOM2oGda2UzREfq5G08iIUOJ8OU2ZGndsr +9wN2LTvl178kBDQOKfcGpWaD8q6+08YPBsCywNgwVDkEdh91uVLwNAM0iLih +xIobsJmIG5KEf02LYPoXqBH+1TiTd1fEAyqPcrqwIqT/Dh1W3MpQX6rARxvY +/Pkyb80bRPuw2ltO8h56SMSx+6w4hrrcWHFMjdDNhKUb9AmydJNL3+Izam8z +JAYe2VZoXwNDk6wO1S6kg/Yjd6U/ls1wfs6kO+lZ1eDzqWLLrTl0OLLMUC5L +gHr/SrlIiD5T3w++Cxq4mIfWwf5fNUc7NzYgEZq59A6ZcnhyKKryxIIG6F9t +esb/bA1KPtrwNF66FPalsfyrbgrTv2A4leVfAaKnPvyN2zfjb4Uy4jY0O+wz ++xu3N49uEvp9eQjg3Cmlda5VMHpmzNWlIvFQd+Nz++qjdfCgr3tinXc2+u7r +Mm9FcQXIa6fzKs/9AZFW967eWx+C/vgLpqYkZxPfufyCDD7RH7FPQxCv+47Z +e2U/gb6s56t1f+pgtLyQ9dq4OvCaz3s07T1j3zNUUzNe2gAqXUppZo3V8GPo +wtyEKaVw8v2hD4GLeWkiylEmB39HIB5x87WBO08Bf47eznsidfA5S6Z1jnAe +uiDpc3CecwVYPrmtkG45SMZnw2knZF5/oe7fr+ebS5YN1cI6d7vgx52loH3Y +Ry1xSi1sPjc3TR1aUHn/z81LoRJGdYiMj7fmobkrmi4WWNiKxNMu5aa2usCV +7WOH17aPwMGB2q9CgfUodJvMm5s7PeHuNlacudHOjDMowpYVZw7XzTfZnRKE +Dhq/Wye6JAQ9G4KAeRJtsMAuT2FK7VdQccueeJDBHVbdu8ioMaFwBR99YUU1 +TFnAWzhLKQS985J7VttZDVK9xUfGPuyGBdP3i9LkQ9CPvUcE54oUQOKpjJO3 +V4yiSdy6Izd2bQg6G/5K3dzuJYraGFoW4yBAM+RXdCxdF4L0O2+Pd/4eiy4t +sV8uz9+KNqk/iNOHENg3uHv/hKF+WN4tSN9XWY2m332kdHFdCMgvXzUzUaAX +Lu2tHyfV9BUdagpMsWHwxr3lteundMFIYGx2emgQ3FC2djVk8JjzWVmNWq1g +fdXzQiYj3/dp6uuZxOCWh5ZIz3lUD4q7hlcLRdVBw5Y/aUvXhkCW7723Ab8r +IWMjT9yR4jZQXHcze8m2EBBVd9yf0VoMX/7sDljfPopmmuK6e4FSCIyiCXoo +3Q9H60S7Fc2Wj6EtHrdp4Y3FjDgQ3GVdsSYe6VWck9eMH4bZija1pYZ09Npv +wnK+BH9oqttq+iByGHInbW49+60EKRYZ3+ir8geLyytvTT8xCAbEfXoKb/O1 +H8OIOJ//A+2pJ3JOMuy2wt6FbiKbCiUE7zn65djnxyFwRCh04C/3atqgGmY2 +SN7fqVo4znRoRvB4qn1H3BGSg2XosbCnIskQv35K5qXaZliRs1goYGEZOplw +cChmMh329Dl3L2LEZ0HiPYErwQZT1jLiQMRJlZsNac1kHNjiI7F0z0Q6jD71 +D0dzCa4i3qoREUy9b3/1oVJLU3kSVBD943t2IPqffiXM8KEC9Z2OrZHFi/Gh +vuC9csd3xdYa8hwj/O3T+5/PVcK+RTed56ry4DwQ8UiFf2i69QocdZe98b03 +Qv2+jaFUm/vPt6AfnR6ykKcVtDdEe2TLhqBomsmlxHw6rJ3x5VL/yBjapwkH +PVu9Q1DOhiu3XZuTkNvC3MUfGf3Wvnja8vJZCBjavvY43DEAfev2OooP98Cl +dGux/etD4Oa1JFVLszy48K+/gx7h7wLpLinLwsjxw+I3CZNN0yqhzlKLfZzQ +ewx9/zvOhtc6NbkZtSApNtz8yLMRLDs2nVq8owI6lEamvPVoJu/7biwTjt0h +RocgvTXJk782k+efA6FBFboadNj4L4dFYSx+bvWmletvk/2AZWXz4x1SdMgU ++2e9kK47a71wvLJgxSu0hohXPs5mzfUuA/DEPi20YHUIWvdn14o+rwzyPSW1 +xwdkx9eFwFnbBp6nyg9QRodKr/GXOvL+92TraVfhoTKwJeLzwQ96zrYMe17y +Qnj33/h8h7hf9j65e+2sqK+QUSip+KS3FOLNWfF/XRYz/oNREiv+35/bITbK +cgS+lyY8l0+sQcEzV10YTvSBsMB1HRc2DZPPvRS4R9bsWSw85C2b6L1gGEQ9 +Pnj8kq0HSzUtly/T3wGtpduh5tIw+On/0jKe0ggrM9aE6j6PgV2r7ivsDmyC +Rp3DG3cvqocS8WsGd6zpYF81SUPBZQg0NM9Uvp5bDYazilVXZrwHtxy95TeH +msDGwjn4R1stKnLMaQ/UpoMh0U81qx+UQ/Rz8aSXf4hiA3lvK2+8WPnujFKo +V5hWZRJD6oaMO6tCnETL4YJRg3m9bROonStQH1Vbj2aqTd388BYdDPg+/B6b +yEfbZZYT/G5aEBx5oZBevcIDqQj+nHQ/bJi892yoV169qTga1kmdUo6pp34P +Z97dZGVrnTiQ+lmV4FM6BKMbTH8ckatFe1rnRafZx0FRsvsCr098tM8Cp0rM +7F6hEvGpkz4LeSK1ST2ZS/jqGHXSrUOT/XLBpVHUdk5UBTwdx+I1X5kcubSw ++Me+kkuPuhl5RcqNwUex9bCkLFmwf4EnBE/WVlvwvh6ihvTtHge0oXUxIb7r +W0pBLIF2SqhzCN43NX+8k1CLZgR0oyNz4mCxrbj8tmweWrXYPf1V6u3ga76n +YeTADRD1saJPqm4Gu3U9185fLIPgHdtHjITp0DHYXb4/YRh+G6VOE1Chw9ah +RXtGYvzBSrTUOdSOj+Z3t4CmZxoI1d8m3D2Q6oYypg9906SPwJb3+2znbq9H +tDFbFH0mPIW3kmiS3XhemrpN2Ae3oE4krRT/rlfrAnSb7OlTr20A5WB7f/vw +FjR6x64Zk3RLQfGZm89BxniQiNHbloNlyH7LUQtFRrw195J9eeviCHzkK+O7 +87sG9bmXKl0x84GmfbqOKoo8NDm/ebcPP+yE0NTQ2OD6UIj1F9N8LTcC/j3z +l6mfrULN21ubF2b5woGLpTfKHg7Dxms2whMcG8HLtdjSb3MMFArN8RgpHgL3 +gSdGl2bUws/ffuraznEwPXx+ofXdBhBf6Lx7dUAlihx5bOXoRofzB8WP671s +AIXUbd+rxpWji1W5x98a0UFdL7xGhsFnelie3zmqHIIWWZc1MrijVjCcVOyC +5sLXjxYWBaOanpTwkLhC2LqifMUM2Wo4tVzdoXl8O5KvtJlSblgNdhsuZ3Wa +NIC57PGiNwrVqDSAvlnpC8P+zbTFst1rQQ89e3VNuAldH1i1Ybl7BbyQWLzr +JVRD3gqVdSUHOuDn2OX2ZTrVoKQ9c46vRTVc2RKT3XyqDdaf8xWyUqoG/Tbr +bbc/1cJhuf7TMlGNkB7ZMOn0zgoQuXvwyzKhGvKcR0WgtClVqxLWX3wx8Qrj +n38r+l93fBiCrpdLXtZkxHnPw6zzB/x+Qtop1vnD+MaNEYo/GfagVLstNKkd +tc06GeEgHw5zOmqk+Plakb5s4DIbRr60eGqfzuvBfvihe+fPoYpqtPZGm1Mz +I7+6OkZ3+BQjn/mxNM5Rue4remPycX4rg8uqzVndIdIFv2unr3uwuwHyFy45 +lb6mEGn5C9lNSKLDLqLO2sOqs5CnBavOOn2rpS5wcJCM/yesk4ONjyaCarz3 +AhWVIbhktWa3iUkpmrjgpluGcQJE+v/THsZOZLV/b3aeWefuObH8b50LF0PT +mXXu8eORhvxKw8Q+lYn69MY2FEIgWP7LwYjgO6SXPPMLG4HaE54XX40kg3bs +mdbIp17ke3HPjISCZN6mwo9Pmqcfy/iDbMqepN8RDeR7iVN3umQE76CD0In3 +9xdtpr6jtFrtmhJa8hxmVdFXbJNk+45SCGofPA0E9yn1O9nqJtgTephZN+WG +N2wxqOAl71O0Te3/tLpfJd+rX2Zg8PSyVyw4PJiZyNd5FsZaHGDWR0sP7/tb +H6E6ETNmfTQo9M95DmQT5zljifOTk6zzExCQZp2fPBILHznK8Je9tz8apfqU +I79jWbpKJnTg/Xf8SGECa/zWdv1nd1jx0MbyZ97SXpSIzn57sWDqgAvsJ3SY +TeRRW1exdDh9f4recUZ9Jz0cFHXFoBRe1cSUlmynQ8i/eoKQLkvP8jVxLq9H +huEr/fbCfWYV0JW34JimvR9oTG1RejN/CO7I5xkc2lkKdpWmQo7uCTCm2iFo +udMQmSfY8BcLnml/T3zHwUebf9PvVb7Oa/Q512PTlXkPEMd+jfB+rb/2obZ+ +XwOk7J3qSl+TjYJj1VqPe5eRvz/wRiVKMGR+NKKlRMSmtJ4F/x/e7nseNpH7 +dTBdMGcjoy7mdVjtI3pyEG5ZGpRpvklA1X5jow78RrC44NXhtxvqYdbL2IST +6nXwZg3/dkX9MhCYnZjk1zgMPai8uES6GRnvOnF6WlkUWI4XsDRICYLfOg56 +Egy/a5+lljiNUS/g9zcUs7JRtFsIEkz3/H5+Vgeg7Qduqs4uBMPUQouzjPan +7r29bOheD57z1k2SjmbUfRkGpdsY/n64b732i1+V8KPb3cB2pAe2nrY+8l0h +BF2oWStSczoPHH1VPo5j1BEvl53rE2bkSybeGdvhXjgyK25zkGfUEUfrVcW+ +M3h4ieuyJ6vjUUPTz3E7S9pQi6toxTFG/ZJ830t6W/MPUHhvsLsjsg79rBTO +tWPwSj/Hee7dveBuo/z6nVQhmts2OdKWwXk2z9oweqgLysz776WEBiGfi2uj +TzD4/J/uzbtmtMHq6H3tPxu/guhZD2sZBlebdOlz185GcJx9OXZNZTVsX1c2 +4RijPpr4x09Ti1H3dWfrl2uOaoUO0ySn4c0hoCSY1ohy6JB4mbUuQVbMdQHf +ANa6RDhvvLKbUQ+etqPNK1kaAi6Swecv2LxEqrpFPOaMerCU98PlGOUQoJnt +rVNtjUUukgNLWtMGoXzeicm1dblwjj9K0flQEnjOqrmiU95Ivt/4RLFk0qgi +OnzxDzxstZ2HNs3lTsf6Q80QXpDmldT2ED5vSlcTXzwC1iGZGsuyW+Cj2IYv +Q56RsCWAf6tdSD0MbwqMEQlrg9c6Le9Lu0vhqLdPt1zpLzC++bpx/KoQNDP3 +o/2WRx9h6pqnV8daMvptU5B8ZlOAcvZYG2o+ocOZyVV3Kj0byHgrOSlg0M6Q +DnyEfa6yHNKTUXiPVA0DPHoZOoQ2iNxSevcbNm68YtrP6N/zWVCiX/gHEJnM +a/FUZhBmuVqEDTH0OT1bfNL4J8kw/t/+YZjof4/Me3HRk83ke4+vOg37DsvR +IZmveUbqwQaY+q5BslmkGoxlXqxVK6GT39F8jXWxqZqYAEtMXjyZWnIXBM+1 +GHxhxOfMqMv3t/CkoFB9HQ+apxdMSD/Qo8oYz1bVTy9uMMYpbmP4NIsxnlfn +CL+bzJwX6Huy5hUjLbEwKLMZbDU9da5cLUL+A14LVRjxp8pVeYua+yB8gdjg +AJtMpJE4Iu24DIFqRviwX2UzTLj7sC8osgwWWNrfsJjEsB9bi0un7ajvzcXL +sivONATAR49/zm9RB3F+K9WRUjKakefMQmJCPluKkGXDgLKjdQBk/JY771pJ +fZ9u2H2unNaSCA6EXdVLXo03ep0HKkp2s/L0k0DDA01UuEB9n64q7dng1RcA +D4j+BZKZ/UNJLav/VzO3+i152AwNogJ/vM2q0GeZmJMSknR4SdTRsqw6GqyI +Onoboc/Gr7df71MpBtnZ19Q71eggT5x/fmadf6IpxPknPt8WYZ3TwsQQ1jnt +a+9vheVHmyGJqAtmLNIUPj6fDtKEfWq2M+0Tsgj7xOe9EqxzcnSHOCcXHMc6 +t/dQZZ7bw+8I1rl9KHEvkMG6F4DtxL3AWeI8n+7GPM+Hr8R5/t62zzuy7zVD +2Yk7h2q3VMNsp847Y2bQwanta2O8SRWoV985VzGrE02yXp+qFFYN47sPyr5V +GYF7iQtSqztbUGPPik0brkbCVIfZlx11eGhmr9Wbr19pRs3gLuwR+RD4ifqr +nFV/IelMVv2F70nnhRrpZDPic+TQca1Otve37/EsqJ/rHoJWf8u+9yuqFmoj +pR3+lLbBorropfelQ9CWSasknZuL4fdF15K/92JtxfOeyvsx7Fzgqh48zwHV +j0Vyb035aZa9BrqdTxlx+8VO5ZniAcgtw/5Pbsxomp/Otxo77xA0fs4F+Zy1 +UeT76horbwg5+ITArgf26uz3cZmxx9OvMHiXgPGjMLb30iNDXlrYM3jaOaWE +82zvpU+8mVVznMHTl+vHdbDNK1hZcMd4Br8Ukio9EEW9lz42zfHbCu8Q6DCZ +5vlUqRzObHWSFXDrBtrVBRZNjPi8sUQi5adwAWwgfifhvRTzdxLg+XfidxJE +Fsr+nW/TjdrzGxl1d6jC4gkSjPleTKv48Xe+ZlrH5se4h0C58iKhv/MNuiJi +8/ecBBoXL9z8l7tNOfP3nIS8n/KeZcgn3gBdV9UN7j73gGtHnKMdrzSAwV2R +iR+SW+Hn0KbESddKIUWKR3fDeR7aj4lriqdOaoXg6pObesUfwPtWbY9dfPWw +Mv7h9HMPO0BFalmMmUYZOMdMvr53Ii9tw4s/u+7kd4LD0VcrEpOtQZrY98VZ ++z5KJ/Z9xQceXfM66+G0mOzEaEa9c0BrUkuqeSnIKbP8tyc9Izpcoxqpday2 +/ylGJ+NYeTbTT9EYwk+3E1yYFd+gkohvEk3T2jScmkG35pt6jEEV5PQtCn04 +hxHHiDjjwNq/0FU+1v5l3nGFPY9CwpZ5zDyKNyDieM/wMNwV8riSe6YCWSbG +3Ix18AMV6z9pp6YPkfnbeMPECt6qBMiID4mY7jUMlQnrN0zbXwx9KmIbtLYF +wBHiXiZpI/NeBuWPIe5liO9zXxTkfFr1KAQ0wpYJ7FXMgr7l/duLNPrh1DEz +6/PzQ8DUe/JFn9ff4KRAhdJbs59Q6zYxdqVKCIxpcl88IeozrKgyGi45PETm +1da3bvTM9Y+HkTesc6oHosxzKjTcxjqn2v7sZu2Dzf3QVb55fcK6EOR3u1rH +4u03mEGM5+6hY6d+eYUg+Yb263qM8Uzg/eY19cxPmAaKRmcY+Y9YXqaYcuRn +eCIdoypjUwdvrwut0VjQAEE0TcMJJuUwjVhfW9b6IgtifbFfLDoTavCHEQcu +qPAuC2D4xTztW8Y3FLqgjrZ4ba5oCLgVam9oiC8E79UlgrcZ+7595FSDeEYe +oj+t9KCp+0fg38HKV88tZearsDScla+OdrBuHzVYC0uclnm27MuFjbtUsrq/ +VIBZpKfh0tB6EJTy/XroQgEE8TX21KaUggrxPYLLBub3CGiRNut7hLbPcC77 +yQjU3RdvOR1TCxq0JVcGjbzB+t3GXeuaqd97mbo05J38VU+wWME618r5zjzX +gsFLK5nnWr4fdn1c1zwE+xR6Kh1ta+Humfwt8zfEgVRoyqPlyrzEe9oRKNln +5+X+nBNw6Gt3xf2aJvK7g5LwVyv36tNB4KBCb1JVPRx0E6ZVnWHUzdeeP8h3 +LIXCZUVPchl5xfEsUYG049VI8UjLxRZGXuH4b36OIoj83Orf/tFnov+ZRP9G +rP4Rjejf+9jshjErGsCx4EK2cl41Ojv1zfaXE0shubWQeR8nTrxXQJPkZd7H +3VMzZd7XtD2e/fe+BrWYr2Pe12T+2sl8HwDX6bT1Hcz3AbwP/lj1W2MEHC/r +2YyOrUZBZRtPB83zhbjpAhXjHPloF6+ZHrnYH4o0PjlZ8Ji7o53/noPB7Tus +czDHctb9TsBX5v0OyI5j3e9MvMiyh3u3mfaAzPax7GHBMZUmIZ4u8KrpaZ7v +EIJ0y7xbXnUXQi2R/5y8w8x/UMk5Vv4zWdy77EhyPfhcVhNZZ9eGZgV9nDWh +sRRqvg1JqEfy0J5YL/isrd2Gqk2Vux3nOZP3+4d9mfEWhV9jxVtL5Dwts2YY +ml3SNA4KNENAl8xks64oSKpnfe+GvwuQOs763q3ogHlqzB8+mvvoxumaukGQ +80u1nzfbGw3KvvSN2TMMk1VFN8sqN4Cv1Qa7cXtiIZG4b5Jm3TeBlxbrvom2 +lxW3B82ZcRtJnWTF7cr3LPt8JMO0TxTvzrLPamJeD1nzAmEz1rwuZLgUSVc3 +k++ZyJiFheUI0wH+/JPXIdNOVl5323BU3oVX1HdzOcoptr4XKkBM7+2uonjq +94W0k32HjeP8IX26h1rXTT5aj5rp+dPtgeDL/27umvvuaDbfynmKFSNQdrKQ +Zn2mHgl/kevY2eIJrwNY+47LFea+g3jqwpn7zvV/9zWE9zWRTNb48fs8eaas +8a/t/ud9A/T5M+t9g6T5rPsL/H5++QHW/YXe89fs9yBIWtyUeQ+ywRVdbvnM +R5tREdQQmxMEXeItrxeIeqJLh2LOT/Yjz3Uhanr4+eHxMbCEOL/9Uc88v4Wt +xPmtn4RLcUpoAzlOs+iVabZH6RAsN48+ENAACUtuXWlJKwfZ83+6L5nToYC4 +z526hnmfCxbEfe6TkqubD0l2wYvKerkPa0NQj3ZJ3OKvheD3cu2zyGnV5Hs7 +Jjv2tTw9XQ2ja1nfF8uwvi+GDuL74hzi3DuZqGvCjVjn3nA8P/PFR+q7tiYn +c+mk3RWw6+QCC021ahhjx+NoGtWGVs8atCjbUQ0Jw5nV9kYNxDlJFdKgCTZL +ZtHBpnPewdnetdDqfYpn0mAj2vnwmsr92xUQJfjlg21IAwy+CVP7WcZYr8c6 +HoeN6aBhOnH0TK8GEPCz/qA9Uo54AuUaBy7Swch89abFHg2gGx408Em3EtXv +MzfKvEaHS1qLnRsWVkPU3J4gje8d0BfoJfrgUDXY5LPG+eQNc5zwhv6HOc6r +QYtWBaXXwg6TqbtakhrhXUG03X1Gvs/D+h0AhP8+ODDbvu/sd2DkgDF/7Rtz +46GE4NohRr4Sw/wXJG9XuLj19O1GcJPVdGX+zhrBC4rutybPqAcXFief0/Mh +JFz0dQ2UsvoheZxAqUzi/Upg4UaSC+esDxzbXgwjzP91krz2/ospolmfgNk9 +I68m53H0w8+JH3cijb9Y9hfJTR3zbQtGf0an/3bP2B8x99Db5viwrZhoz0vD +nO/VeIdxrTWINU5+khvVbau/WtFE9DOa5O96DA6OyW0n5j+W5AeVT4gcqO0m +dWHp9x2lqU2aLHqG0hnzQx6Bx1T+UDpjnv4zedeDm5TOmN961HDUbBqlM+Zj +Dc5tLnxB6Yy5I1xasv4mpTPmS6Yv+PqhhdIZ89ZT/fHvoyidMXd40zNq9dvD +pM6YV5xKExUVp3TGvIafP3Okh9IZc3vLXFBvo3TGvKcqTmJqFaUz5q4Pta3m +5VE6Y27Z4d6exqbzO0LX0Lxt59RNKZ1Phguf//vf6SjWrOfd9ZPSGbd3k9w/ ++9g1SmfMZ/HnZAtNonTG/GxFf77sM0pnzFvX/vi10obSmS5sEO/Y1ogynlkb +L66ndMbtw+Xm5Bs+oHTG3OGJg5mfrTGpM+YJ/b/fflGgdMZ8++LKybG/KJ0x +9+869si2g9IZ8xtVxhIPqymdMd+5XMZ8aT6lM+Yt+yMfyNVROrN0qkVDJnP6 +H5+idMZ816OY3tJ+SmfM3x5IM558mdJ5d9TNR3//Ox2yeWtnVoyhdMbtD3m9 ++Lr4IaUz5nPUZU93HK4k9cR84+PA6Qb7KT0xTx5/+LayzVlST8ydNgZnyW2k +9MR83uVe82M8JaSemF9fZD7lfhelJ+Zqo4JudtZQemKeoO92dXYBpSfmNU5q +wzZselYROh3ykH8rd5LSE3ORst2mDr2UnphL3pOJ6rWl9MRc18llRstIHakn +5gMjtyofXaP0xDzpeP3L4EWUnpgbj/pw9OloSk/MeZ6e/jqx+zypJ+YBTaWD +1vs+k7phXl9TXH+0h9IN89oGvyixOko3zKPHZKQ0semGueO5Ii3Eptsj5sDy +kJyk9ZgxJyjdMLeZvb3cp5vSDXNb28yDdtaUbphvuDBQGfKT0g3zV9bhzjXm +lG6YK++zmpObUUHqhnmpSpJ22oN0UjfMj8QFj51oYUfqhnlFXFufsCmlG+ZT +Tb5o5/TWIMM3P+T//p4/5idTbN/0RlG6YV47xULAvpDSDfPDaFp9D5tunsS8 +LfsE1uiYULphrqQaf9qoi9INcxdVg3Gy5yndMNfp3frCqJfSDXNUp3i68hil +G+aDr588Gd5WQcZJzJP9bCbptheSemLufW1bV4U0pSfmPFMsfs2NuUzqifmb +cR0JkbaUnpirPNky+L6PskPMU8svj3Wup/TEfGRVQhmdTU/MR8v7vBepp/S8 +Rcz7tvqcwsseFaSemLueHW6u6igl9cRcQ7tFdr1aCakn5kdshI08PApJPTFP +2Oe2ubMjj9QT8zx1kYRVajmknpivvRPyO1s5k9QT8+6X+1+frvxI6on5ZrnZ +M4VuJQPWE3NruwF5K5MYwHpi7mSVsXDTPE/AemKeMy9k/apTL0k9MY/5bvh1 +5ZlkUk/MFcf46w5BBqnnPZbdQsvLak0HNj0xLzBa97iaTU/MTTalrQU2PTHP +0E3a95RNT8w3j+k40sumJ+aWXw90qTH0xLphfiPOJs6STTfMx7WoPY1zpnTD +3HMjz/3zbLphToueqSTP4wleL1l+fZfgJ1fP2LdteQipG24vLKvvvu0spRup +Q/fxuzU0SrdiYh5O0jsErrDphrlp6aKwGjbdMHcROdNDY9MN84nIXMuHTTfM +px3zl/zFphvmNJ8LwzpsumEuanmm1o5NN8zf9E+zvMOmG+ZtDpM+27HpRo7z +7geFgK8epL1hLpy6uDnblrI3zMfH+M3cYUHpRnL1KT/1VSndWPOrhSCD8XxX +2XTDfPucYzPq2HTDXKJ03pyNDN3cCd32sPIZWD3rzoAfm264/c+DFpdH2HTD +XPTJrJ6DbLphfnttndh1Nt0w77lVcN+WTTfMNwRZejgxdMP5DOYxozZNkb34 +gtQT865BqafprpSemPtunHPO9w6lJ+ZJNb/HLTpP6Ym5qkRahJEapWcUEYf2 +ROQqX2PoSebTrDwcTH6qRtSz6YnbrxbVClRns0PMlUe7ZAay6Yn5kkOv80Z3 +UnpiPvlxYpcxm56Yz9PO7b3DpifmusZHXKzY9MS8dWqH4xM2PTG/0xT2/g6b +npj7qr8ZvL2D0hPz6pqhcEF/Sk/M1SbX7Uu8QOmJeYfWJM/2TZSeJcz+vsPE +s5fvXmezT8wVNp0Ja2TTE3PbJUp7Ndj0xFyzZWp6CJuemC+PfPtOiE1PzJvS +/kicZdtfMLcse7k/aim1v2D+zCqsw51NZ8wfZoX1XWDTGfMJV3bdDWbTGfOt +1RKh2Ww6Yy49pPvk4VhKZ8xNDO0fJMVROmP+9cPT6NyLlM6YB2XVLyvTpHQm +/oLs2vFjHNl0xlw4JTSsmU1nzC8LOUtqsemMedf82S/C2HTGvGR12MTJbDpj +Htf1It+KTWfMA+esjE1h0xnzzFZpHx82nTE30tj7x55NZ8yXPBUSj2XTGXMF +cWm5H2w6Yy7OP11zRsoT4DgPgZ/JtKnBeS85z0NA+tXhw+uvUDpjvmlMsYDY +tgzkSsQLPiavRs/qqubvFy4HzN8z512Eiv506liUlBHP/QP+zH8fgfyMNzR/ +kctDD5j/zEfD/OriFYvd2urJ/q+yOLhZnvntVZFN9POd5JeSKxzW3vxMPLeH +5BsNrr4OWvaB0P8HyS82LYzZkRRPjgfzJ0e7PfxF3gIeD+Y8P2Y+Mbp4C+H2 +Eax5gd64q4rDjPbDrIUk+buBMBXnveHkuYkZU9d2NPHYPsFNy1vJcyvMW/Xr +3o86+50YpwAN864VkxteHu8i9cc8N2zTgEttN8I6YP1L9MJDZAJySf3Juuzp +ubDZw2WkbnhdSsOU3NMP5JI61DH/ZqJ3iiYqLnPyyPniPNlE8prWPdk8hOeL +208r09uo87uCPM/C62ghqG5rqtBK6oD1FPFRbl2sVk7qgNv7KPXdn8OoX4jx +k1zOTnZrXUQTyXE/fupvxO570OEhURfh9vrXG6vsVBpIjttbzqRVf+8oIp7r +koDbe+3QELnyqpbkuP1UqUXX1dQKCHvII+02z16oX2J0Nclx+0/yPR/cPCj9 +cftrj7TSDb/SSfvEnMfcO+ysTDRpn5hLVH8vlLWKI+sgzPdG35I9dOkzkmHG +h1Gkv0ia06/KV7SSHI/H6evw1J1CsQjbFW4v86Qg46JxF8lx+9L2+IJIvY/k +Ouaz1hccNoZpLmFbL9x+deDl2L/1EV4X3H75us+v2NcFc+v+9rI2Nv0xNw1x +PrOJTWfMJ/0Kt/Vg0xPzBWtU9JMZcUDmnGj139+XcyDG81yjKlH64UfSznH7 +tSs+jTrq9JmMq3j8kgeW6C5lq48wt24Q3G3NiKt4XXA/MjoDOTPZ4gbm6cLH +xn9miwOYdzUrvBhjFE7GW9y/g5+3kenZl+R64fZ7ee9ajh4fS/o7bn+v+ppl +GqOewuuF29/xU5l4cO9Hcr/DXNdtlsDfOguPk6xfftIdahnjxP2T439ptUuf +UXfg8Q8y/1TBSpudxnWbqDjG2h/awU1/zY3lbPaAeafa1M03PCrIOIb5VtpH +jf3HP5Ljx/uIW5TsKnVjyt5wf+1fzNYbrGgFjvZo4Ljm3tOMeIjHieMSf/zG +Mfv+VJC6YTtfetkhcwajrifP2Yl9u+Pwiol/7RnbLeY1m9/uYLdbzGdUlAK7 +3WJO07xCU2ezW8yHvt3yesRmt5hv/TWn+BXb/kXW9fnbXNoZ+xe2N8wNNt93 +X8Vmb5inSWVEvmWzN8y7hGu9E06GA7YrzHnqbL2M2eIA5v6jhN17GP6O+8H1 +1O/5efKy2tS64/WK/elpsIJc97Hk+t5pVas5q5VB7kd435GSH8h8ciOXzLuw +Paf5XUlgPz/B/Mye1PJ1bHkX5juFymqfsOVdmNfHN8h3sNVfmB/vktm1nC3v +Ivfx4MTkAOVMwHkO5i9lTn8bNEtGW5gL1oIymf/HeGgN2Nt90wPnc9UkP2VR +GNLYUQIVxP6HuUnk4WhVtSLC3yIAc+lbC0d5euQT4ykiuVfB2JNNHTlEXKon +eWQOT7qyUxYRl0bTMD/dLNLc2hePRgj/xHzwWtTm8Uu/Ee1bSK6yYXOqQsUX +km9l/qUjy7RA0+arBfi55Pjz/e3vr1ArJeq7IpKPCwuf6e5RTJxvRpC865jo +/M6OAqATcQRzqcYZzqpqeYRfCJDjv6qb/u5mXSqZ97DsogOdXXp9fnB+KzCx +6Rga5gtfLJjPI9uNsD54/FN/NhiXjJSSfoT93dY344nptRzA/ePnLhDf3VLc +UQ7RzH6H4TXzbzooWl3nXXogmvQvMu6J7rmtNIXyrznE8y/krm1yUg4n+2et +Zwfo6JXuqGT0j8ePeVbwqls76J/I80k8TuXd6Q5h9U1kfoX9Tlp0T58423Nx +PR5q4XK7fy3260GQZv4tgLTuxMx9OaFkexzna3V4/eoPh5Pzxe35ikefvLot +muRqLD3BdZymiJNaNBnPsf5zepI8LzLyUjxf7C+00tiyv3oym8X0k+v+PNEv +ffWJJJKTeVSE2rNtDM4a5gDZXs3sW+2BKXGEnfwmucgsof4HiZEkx/20bnGa +f5/BWfPlJ+3Kawn/GL3ZEQjrj3m1kyi0ZH4iOe6nMSBlRQ6DYz1/Mvv7BjGJ +2zz4GHpifTB3cjkeJrc7mlxfMn/fM7+jVoayTwtmgwr0LOn3uB/DpaTfYf42 +VmSC3IsC0t7wOCUyFgiHMOI51hnH29eFmbF/7QrHW2xXc6ulp6luzUAc7dHZ +Wz8jFxS0ku3xOg55Fq61YtQLOA5jO7yX+D+67jwei+cPALgoilRKopQuHSoq +RTq+o4juSEm6E12SdKAkQgdFCqmESuoh95Fc4yb3fd/3GSqUHL9nPDur5vn1 +l1ef5rXP7uzs7Ozs7Oe9Tm36H+8FcHz/qmg9q6uj7wVwPCD1YeiP7tH3Aji+ +xkzLSPfY6HsBHH8TfGH2LvHR9wL0eH6igofpswJ6PIbjXdEWq95dN6OfQ3F8 +2EfEsLtg9DhxvblfqIxH408cx/XDvVfDE41DiPMFTtxeXLmmNJl+rsTPL8pq +Rld2x5bS92uz/prlyD0xM/x80+pCGX3d4evF6VOgjA+zneDnRNxvxISEl0ke +taHfU+D4XAu+1SUBz6nj5ZBXHvn/GsDhPWlQyMuT7scWUf1xn57Cc/ukHDqO +3zNefP5OuuBTDt2udrK2A49JrMkyiMqny+Pjun10+das+mw6jt8fbbA3V1da +mAOqqPEzrucdzhzGD8IT6OsUXy/VySKbTzCvU3zd4bje7OnGsczrDrc3fF6W +v9s+v5w5XsXjajzO3K7yDqD5c3xd4+tLzKdsrifzusbXBY73qzT+yGdeF/h4 +8XOuxI33rvZB9P0LqHz/NRBzOB+WNPMfjeMso8svYfV78Ipe3luoNFoeP/+W +D39+FM4xWh7HgwrKUyzP5tP9QDTrfgEbDxTd2zcWz28OgbGTBFQXBDCvj+PO +73OZcXxc+P6y/Kq90Ys/jgvHQ++7LI1kHhduD+dZ/QMQXrAvfHKEJ92f47iH +L7eGy05/un3idvJ6x4EmqXmj8y24nVTvqN3lP7OcPl7cTuapvxO4y+yXcLvF +7UTQ00pJpL2ebrc4vq5JKuXgjxqI9xPXg8VG4bIWo2p63gaPw7MdjvlpM7fD +un7HyLex2gNM51wk4qpfR5fH7eHEhVar9FRr+ndxfN3cOLUywRd0/eB621W3 +fvrwV0/6ORqXj0lOV7uzJp6O4/HtBkGxBd+Zcfy7OG62qvdIop811V9w0u22 +6/DZ60WP3SEeh+P5nPQt7dHNURH0cyKOF6kUBBj+0Z7xfXZbs3tdEH3/4pTH +5WPsSm4FTRjtH3B8SatAWFrzaP+A+5nlM/wzGameANcnroeY631JVneM6e3j +8QnHpzqe7NjR7eO4Gd91t9LLo9tnjdfqQMKRGLFxzp50/4zP+3L/UjFby0J6 ++3h84n7p8fX+lTb0+cXtM8aixqdprRHV336n72sFgzaD/lWx9O/i+pmYZer4 +vnj0POLrLkasSNp1XCg9L4rjXSGZ2XaZSQA/b+Dr+tvge6DvkE5vB++/dZPU +pdhbIfR2cPylqnOi0IHR7Ywd6U+yYeHRL6oCIJ2+H+F25Xb3Xmjlgxj6uHD9 +z/kstvk487hw/eBxl8rKHY2RTdZ0/eDjjSme0/yp3Yi+rvFx7bfizJPqq6Cf +v3D/fCBrR1Xrzwr6usP7KV2UHnXqj+sOb8dfzPHhirZ6Oo63Yyoz575/2+j1 +iLejHLj3a9el0esRjzM5+H6cDXw0en5xOzFbusX5qqYhXW94HC6eMtNmQ/Vo +/ePf7dI9mroWhgDj6QxLlDfV7VfvfZQ39eGx+giHybF0edyfb6vnCXF+GErH +8fOj7/aD1id3hoKRakAODvW7mnHHYrIGY+jyuP+JLLjYEascQrc3HHeJ32sy +27iavi5wv2Sw0FC68o/+DfcP9U8vlq397knf9/H51YhYtk6Sed/3v/y4EK1H +LVm3rQ15N6ufn+7/b305fX5x/wxiOgKbO0bPLz5eTsumXW3fKujxPz6PQ8Un +o71Ec6Hdba/mz3YDgN/hhqdXQxJcWH1n3JBAAT1uwf3GzL2Oyu0VGXT/j8cb +bi+uhk2pHJ1nwHGHMYnGPfdT6PK4f/jyKqF+GbN8dUuyAfJf9iSaViP/5ezP +AqOEmS/o+sfX9Td/h33W1gl0HNdnB3+FXfChGDqOxwnRfC4/Ltsk0NcRjg8L +KlwqZl5HuB+mn9N1JTu/PXOH6QHck5ALs0LQZa3s6TTwdYs6X1zCR/p+iq+v +IsvSg130/bSermfX0Ou5Icz73bHrsh/ROvZiqh9T15vLYbQ4hD5fuL8V5do0 +/tp+f3o8gNthZXKjxt5nePzQBSJG4t6ge1Ha+dcyifQ4AZ8XX+mP0su3h9D1 +gMdXUyZJmWjuiaF/F49bD2WaTDGqrqDPL36/Omg556W9+Gi7wvf38urpp292 +jbYrvJ9hdkpxy3pG2xW+HvcZrYlvEMul52fwfi7nUzVKZbYHHMf9/ELjjNy6 +P9oJ7h9e7tqhLlY52t7w+00lGBUhw4wTxwVi8p8ee/HuOdg89NUb5euWnFbU +abX/I+DduFh72VYn+vkL90uvdOVmMIQK6Psyblcn9pf8Nj/bSMdxfdbetlj0 +lBnH5x3Xz9w3mionmecdnxfcb/xcdVq4daiUrh/c/h8vOndAk/ncjd+j4fip +BXGPjpm8p/sBfL8zmbz4Zx+zH8Dt4TerPUDXogVqS+bH0+0T19uug8bHlZnb +x9vB4//TOTHS63I+0r9783XAp7vba8CPZ0+HxtHv71qoeaY6uFhZwKctbXS+ +Ed/X9DgOnb05q5p+/sLxXP047aAHeD1bFV3PliWWVY+Pl9P7g/t5IbeaHxeZ ++4PjeP+nbulX35/zkf5dfH1FuccsFNs/+rs4LvXT8t6OnZX07+Lxp+OmbZK+ +qyvo9obn2564VlsfLhl93sHt/2stt5tqzujzzqWRemqAh92OZKQXMO+rfhtS +kF+Ar6OzP7a2+OY20c+zRv4r1nvzdMBoExeBtvuNwD/a+cU41UJ6Pvh8qeZO +q+IGcJXHexbyRPB2ZBZW9nryVIJss28ayEHA8QR7yG/R4AiMWvzeIX8Bb+f5 +Jv1rfmbu9PNyduD+LOSJuE7oTX8xuR4EPvsyvvcxpJ+/axwlZDXr68BQpccN +5Efg+EypW1GN1z3o5/eyn5fvIk/k0VjXWy3M5/c5Q4uXIT8C1w+v+brGX25d +0KPM96El/2dq3roW/r7qkCPRWwO0JN//h5wLRyqeWWuoPTk3gJ7/XGA0Jg95 +Ii0/nOby5XfAOemzx/Y6jq53Hdcu+/uRaQfEz/tDDuZlyBNJ47Ku6berASVz +9R8ip6OSqu/s/GthtrzVQLb7B8cW9bH0Os+pxn4ONaAV4nYiFT/JEzl9Axq9 +VtID+DmdS77DtmU8z5Q8GPhSS7yprgl+qpiwD7kh+D5+//qzOMbURhhGxfH9 +un3y9yVNr13gA0PTRSivux3VTs2nPROz0UsAxO+CALEV13cqZoNGav/xfWGc +KNeFQyo5oOhcrDfKY19Ixf2PvY6/aR0P1lLHhcv777T4UjUxhKwf4LjORmro +ay5IpM4Lvo4s7kjxmGnmgSvUebGj4ifcbTgtPOLAOqr+cfkJTi2bfLMgtKHa +D71+pnz97c7zBWCQaj9BVPy7lrP8irhY+vwe8OBA5xc0cfDn3LkWAydR7QeX +99+i4xc0OwnidpvFardAbYPXQs/nBeAtdb3g9RXCTnrVl62KwB2q/eO4oPbB +c8F3Yul2eyFjpN2CPg+3l3BbKsTX4yKZkesRXDjso7JdsZi8fsElmUeg7kMJ +yPr7ugOhzq4nd0rGgp06+44hfyTkuc9r5I8YFTj4dxW4ApvBgrXIH1H7/Owd +8keuTJJfYcHvCV5pDd5H/oi5Z7UH8kcYS6pScuZ1w9MptufOZ3rDM7DSEPkj +25+0nfq9vQ78OLb5PnINEia9kFxdUAefzbVJf2vtC66sB2uQP3JXZ924kwa1 +cHaO8AUD1w4osf/2XuSPAJMd35E/0ta96vCOhk4Y+ahWBfkjoSsy7iB/5GeQ +8s2jfiFAN7Zz/PrMsfKVc6z1Nk6pgi1iikp6hm2wQNoqAfkjnXGTZdv6iqGM +UM+GSJMW2PXS/CnyJhp/M3IWtSTBScOdCWVajVC7Yo6Px8kiMGuHUgJyRqIs +37SfKcsGpkNZi5Ar8WBeSxVyJXbdqwDN4gnAxCxQbRZ/NBi3ZEMI8kdOq1he +LlmWB3wWH+sNqsgEbn0GwchTaHDhVFs6Nhf4V6wSQO6G6Odm09DZ1SCgxUBU +TSAeKE1t9UcuieITP2HkklwQjl2Wtz4argkq0XGWMIF6l5Y9RC6JmWCRb+z+ +fPDGztYL+RGSwUUbkUsiy+COzx6OBU23Pwpq3MqGlyNsziKXxKX/1ME270KQ +NGtKwbOaGJhpe2cPckm+LN1QqHe7AHjXzbiMXJKjqt8XV91tBTG8l/mjnGLB +rp4lrsglmfQ96QxySaZslPcJn1AC7I0mdyGX5KLSVqH0Be2gZ8g0eVppEbgo +6NKFXJLtaRPSkUtSPimCnyEbC/p+PE6JcakCb+NL7yOX5OH0mBfxjeXAQiaK +Hzkg8QrW24/s/gQv/D5vOiGqAWbGHxJCrgceX5W/njnrlG8Z4HNhna+xrPMF +Ss/mPzpy2R1qbktciJyIzq3HxM99jQeDRbfd/bUSwV3q+egm6/kIzE8MORb+ +OgH8HBu1A/kOuH/jOutUE3Etkd4fP9b+gOaX4q+TFztDzvKDHm8ZnPK/czy5 +NKyjwU6G0kxz7RcwUejREPJEVB+oVSIPpU8yy9NPIBKcp9rJOVY7gfveXXHb +LRsNFjcajznl0k0/j4QXjF8FB5jlqf3fpDSy/1B21gGj04IJYGb5orPfKrtA +PTXeEEzrCWpvjQWiRqx+GNdPz/tTtdoKMaCaalcqrHYFbXlXrBXSDAFfqP4W +30eWRoI4392fgZ3iAq4nkszywVOskVfSfKamq9D0E1C4fiUVeSX/acbtRF6J +enO9Z2bZZ8BTFTlSb/R67wU1qZOPJtDn9xXr/IKde6/1LlfJArE2GpeRr2HZ +05iOfA3bxRXhz+4kggwqfpoVhyVt9b9l7RPAlE/yI77Gbeo5hSfb+ArHsBNc +TtX/k6yR+ofbNk/Un9/UAKfGb429yyyfOeHgFMXlgfBTSPjWoXcNUOXSqZHr +znbCVXTdQeGvtVmZgdX0/INj8vDCXXs74Dxlfs0NXzTh+OWPJZBbgccbEksh +WKVnBV5bLVBGPgUen2SvtZojs+YpPK5Z7PeZo5keb+id4bdVUm6hywU79IpY +RTTDDNGd/GP12ujxUqty/FPkcWRrK/iJmTfS8/zOUeHeyONIVMtvGmDe16jy +YKey/kLkcZg9XiVygHk/PfKutgnldcf3r/KzXAel96dT49cy2MLaPvglbr1f +kdn/E/sDomonxKL1pfh48f1lQ/ntI611MXT9GLPqB2SrLOa++SCGrAdwufvW +N54JMeD998JG5HSoT1wqYuzfBl+LM+T4B8zBeE5hc+R0iCrfeIucDukXcjp+ +yY9h8oDgdOR0CIdrJCGn42jZibq8m6/BrYELh5E3MclBbxZyOnScWtQlflWB +J/sZ2vd4csDgDP9zyKfIalmiZZ+SA96My45ezBz3zVG+urTsRzU4r6Z7YFtB +OlCdNiRlMlANE3I+HUCuh3GeQabduhKQrnS8+vT1AugYM1HgV1Id+PQm466N +dhFYKCvtzDDogHNzY1uR62ExPcTlZ2k50DgxzRm5HhMzv+5Broesj4WIRk8M +cDbSeiSmUgWinp1dg1yPWU6WW32V6fU54J1enwZyPZYa2Gs0cZWDldX+y5DH +cdOg4CryOGZumSTZdb0MjHEzXIk8Dvzeaj6PLN8nx1Jw5qd6M3Ix5nC/k0Ze +RoKVVe2BBYkANnVkIM8C91czhLbwqm1KBGbBrPLOvW9Refj00/12rTHxQJAq +j6/TnZXb7F3PxQNfav8ha/+B1FHOcA+dLGC+argKORrWx3ZNFTgZA45tSjzx +USUROFPxtaw49Fmd+eXnp3gQ4Mo6L9M2jZwXuOP9wum5t0afU8C2kXYLHxx/ +dY5/UyXZzuG+zQ/6Sh7WgEWxWblv+33BOFOnOcjR6DidGAuD8uh5p9oN/8kv +LKuE5xnquUomoeCqghMD5QnE7TCxKlMq+VkmSIjoE0GOxvuG6SO+Rtkt59pt +mrngyZWhkbihw0gcevTyd7dx1YATi37sQ75GlNGGCORriIUt8DHYWg02WVs4 +Il8jySXgA/I1yo4WO2dtigehy/ydka8xaKKdh3yNtUB8+M70Z0Ajyu/Bb/Uw +sPxnvSHyNSpfWLeKn8wDTpEm6cjX0FVfJT60LBYqvGnjDnkWDxIkZx1EvkZk +dqYJ8jV8j67aP1xfDewZ2hfCFaNAkKLoWeRoPN7pEbIhvQa4LftPATkaP/gf +87w/3wKaJtx9sXVrLPBT5N6NHI3TbSGqyNHwLhJyMA2OAXr1pULI0bhq8bkR +ORryr5PNeCQTAe9FvVT9O11Av/1YHefxWKB6vGSBr1IiUFrQJ4Z8DdxP3HXi +9sn7UAF0BZa8QB4E7g+z++TShFeUAs0gsWXIg8Dx5MFhyUNXqyHnt/RDyJXA +z00qSz0kdnhUQq+3rP4KP+/cvu9z4HVuKUiUO7uyb/0gPa8iajlPe05iITzT +7z8P+Rf4vjZD0N77kUMBjK0rT75XXU/PE+6qCt1SopkOxrQsmo/K4/i3SbPt +Vrd5A62wDJ/VXg1ATTpC6LxHGThjtnOuXkMaSHAwuIm8DDwPo2tWkPYkigFW +VrH2H4//B8T3rnNo8wEXqXqgx+dLjxiISKeDI1Q94LiuwOe5EWs8wb1JH7eg +vJS4fd7NnXE8XCEDePYzjqE8GDhefXPZbFfPl0B8eaqOc9kA2Fijnp6blgcl +HnAvt8stgK+d9tShvPH+tquT74yJBP5TV7RXqXsCv8vGmi9mN4A3fKYmoXdr +QPmXda0PZdNB7fofXtqczaC1szHbmaMOfH2eLXn3XioQ9mhxQ/nB7G2XhM5f +Hg693Pu9eAPz4fhWi3KuymoQc/XsdQU5BpgyzkbFJCAT9CtPfNowphX8yrlb +Ey3NAMtCRRQ/HP4Ccspi7qK8/Vd/zmj+/cEPrBS/0d4gfQce6esYfLx9CATB +pLd7O7JhxB356DP3S2DH7mUhi0vaYdzjd+pxMgw401bnraltK/iyAJxzDK6D +zntrdVF84tLFv/WmNwODD5zaKD5OIsmWGQe3gjY/tuUqBY2bpqzknlsAf9Vd +80HlOU/3CX1/1gCaBGqUUfzj09V7UHnBZuUvbRpFwCGv9KxRpCe8VbWwa+Ia +BtxsyPN5iUAdkGuZUPcuwBOe388vfZ15vHFzj/5c5psPOGUHLso0ZYIJ4jqf +FmxkwFrN1JhA/WowRfPSg5yaTFB5ftfXQ6sY4NSthEdfuHKB31rvC1oV1UAy +900nYG7fretZsFZlKciXPCT86Gk3eNzxxCpnHQOq3j1mlrExEsw6F/ksRLwX +RA+/Xp3M3P+jkku/5ksF0u9tS/MzRUOfMaDCW0d7jtspsHq669o7smPlE6r5 +lC7IMWDYsuRmqe4WeMXw9BozM275GeZBBc7M353+PGeOQW0n7LcxSXzDjH8U +CP3Zuo4Bzi6eJRCVE0/P15TovlqX+4IBrn++HIje4+s+7ZBF3kHJkIwA8g62 +r1RO13JLBaBAYwlyUqIk3hchJ0V0QFP3zu4gYH+j5AVyT/B9ZMXMX6F6jmX0 +vKh6stw95JhY2R7ms/pdQa2b4pHfPe/YncfODKjcHblMtL4bOlPbob93iymL +bbwQTM9nKrC2A3zv7U2xueAPGn8VaCMPwt2L1f6dJz6UW+P0HkyRTFuK8qFN +H/lbDH+GfdBsKcwH151Z18uw90h5eONga/x6+2ooNWOGa6oRh/yKwrkKbuOi +YOO7lDuistVwA3g1kncdz4cry6eHhYf6gBV37qch50ItbWYXci6KX02XyrEo +BfvVW0a8hpnAtBM5Fw35KYNWdqXAfuneHwmcrSB/S+Q3kfUMuHLMj6r82bng +qbHO4A77PnDZpibiKvN8yd+MT7E+FQMLSyouHJbhkd+UqGj5hBnXED0akFTR +Bdc+H5wxOId5Hc06vcG7JR6oSnb/9+FRGPgQEGSAvI+aozeSkbdyKtnv+5xj +YcDqsZEJclW8SnhfI1dlX4502mHoD5LMl28NusglH37jiILwSwb875LxOa/6 +Jrg++pIZyteH56V3CEqCE1dDwQy1jq8o/wkeTx7iMbDk0QoE9hoO4shJUZCw +nT/vRx5I5Xeslz3uDS5fn3AV+QUChzdsRU5K+B5R51VHvMH8zZ8jkJOC+2GX +N1H1Itc+geTuCZ3ISRmzeW0wclI2xVvtimoIBUMXfl1DTkqQY3MqclKC7jge +DkwMAe2mfjOQk+IbnM6LnJSN/hwypWWj68de22nsc2K2K4b8fBWORaPr5+Ud +S6tdmO28q9eg3u2PdT7z7cPmb3rGAK6zFhX+uZ5qg0PXhjcor9ovneYD56Kp +4+8He/yNm92Y26lJiOSwjQqi17dsfagUh+LfpHjHJ6Ulw7Q+tQiU1+vI1l8e +qh+zwLHwABcNvY+gL6T8F8oDPNfo6zvkrWzpOqXVHvcJbIwdlEHeyvQ9DziQ +t2J7bmks59QwkPVkMH0kz/OSeQyU53n56nqLPJtSYPrb7SDKE8hQXG2CXJib +5ZVuFhIFQNnNbMQjSKXeEykE+L35ZOeD3y/DNX56zzcy+5MpD3zO8HQ1g47j +vHxKnK0wxd7wNeo/BTVurpZNbQFZWoqmlcgn1nZd6cVsJ3yLL1ldutoIdups +iQ6qqIZ8B49YovK9D3rUpqk00fOueeMWxDDrE2ZaXz8Y3F0HZl9e4WVVnwlX +P0+RQuV9bkmpX8kezUuQmPRrkiKz/Jm+vqo3R2vAro5Fw5M/eYIXuUMLY5nl +N+Rpr9FTrKXHjfavDvAfYZa/IemxfPKcCvBSqb7joFgBEI0VD73J7A+jVjfe +PrG4in6f3h1zOcWRWf6blLm17oMC4H7O4mt9cB1InRuzRYl5fUW7D0qvtSkG +Kq6OfBuZzzVm99bs3+/CrB+bB63Jj8zgQkubB45D38AyFV1/uQ0MKAnPx8c3 +e9PzezcGN/q1MrevxRC93VPQAd8p2iXP7hgrz1/yLSFYllmftouM1L+0wZxQ +niSU9/5kWesW5J6sGG6JMVEuBQ0epiHIVelhlIv0yhaDJdMf5Jyx8gJaM7ln +oTxaeFzEu2z/988LCsGth7PckGujM3nuVeTaLAl6KqAeXgBU7rL67SE+WdRv +QyGFbf/9jiwA1ftqpFHeYzxeuibwJkvaGH8P3gc0svc+9WC229nXzs4/9cf6 +IsbRvsC9zgwwdvkbizHzA+HKmDd7UX5m/DwiFGLy053ZDnVD+dpQ/uRdF42T +kD911pkPZjLbobHhwTvIx+nROt6G/CkJjgzuzTMLwIzXrP5qiftIfwV5uVsz +q9aWQCuTnCXIqcHvd0QndOetvR0MBF8rmCCn5sw9u+fIqXl2lKPwm34ZUAnU +zUF5jWqS7N2QU5PdsbbENaQUROx4xJl4fIx8oXf+EpWBEJgVpd3laFsLlys6 +8nVfGwI7JHdEyP7Mg3d/lmxd3F8CV8Zb/ofygy1yD+VbMCUXLnwv7y60aDT/ +SKlJwvPelwxQJdsS/Od66WypSxb3mf3Dennt7D/XS29cNOVKD7O8qcDu9D/X +S+/QllvYyYxnz5zb1/HHeulbthXiRcx49GetsLXM53cL11Q1p+VdYGqOMl89 +NwMI7Ug7EOM9+j3a8dfJHJVODFBocSp4wx/fTaw5eFroFnM7GbePO6H1MGuk ++VYgzwLfTzUHjk9RO+RDfwexIUXWZybz/OqafE0OMRj97uypZK/FNuZ2IvOG +pb7rxcDt98atRK5N1wmlfuTaHOExfyqiWA4mawlNQ67N3kc1F5Fr4xIQfXXF +smqoKjGRb1PHMMifc1dk4rt6aFEEDCZFVUCfsVMUUT43td+dESif27WXj4XS +hcrh1/Y3c1Ge89qSrZtRnvMf+zfaguBCWPK7atPg73pwwUmRz3FJPrg2fx5/ +zY50kFNxaMynwGbwfVG7OMfWChCqOGGZ/dxUMPNk8MCJX03gXX1TrJhLDbhy +we43fJhKP3d7CUeujGQeV6HUgnUv6Pf134CI9pKF2Y4MMEsmw77ij+/U7m2X +Kbdmlt/jf7ZdLToCcC2cskW7Ygz93vOdWPDThPw6iN8vd6aFvA1lXkduhT2N +mx+Ovmcff7Qk2IHZTkosX75o++M9+0nRhERJZnn/4dvCXq/d6fdhgoztCqi9 +PbDnr5f64/uImRo82Sj+qFp00p/fR4ybnXYZxa/2lGX9+V2VjsijA9+Z8QIl +H60/v5/K2BG0o92BARS3N+ij76Twdwquc1YuvsTcT4f6Hi+NP75TSDetEDvH +3M7GvFdbGQcTYfHKt5+FjbuA9IHADwwd5n1wv6nEjP2JwMJt2heUR3dmwpHD +yKO5ofh1wsTOfMD7ReEb8mLodSOGDy4nF42ukxQz3rBbjdme2yRitXnupQCT +0sV6KH8aXi/hmyUi1lkYBLyp8Riu/wmxKtqrXuTT62csTG7kjq9jALOEVcqz +91rT5+Wbxi07E+Z4AK6r37BiO/P5t9trB3JS8PpGgev7Y3XOfAR7JxXeQQ4O +7t9kH6Q+T2OOX04HNeUgvwafn21DPdcrD5cDackKe5T/DY+jF463X96/rgoO +LL8RiVwYXD6z30A9JbocKlPX43Oqn/gZMtmTMyMf4vvU7Aux518x6/lAlY/Q +y9VpIP/k9lKUDw3Xg7y8wJOhiekgoH/ZB+TR4OfKSN71KRvkMoFku93I7+K4 +y7moCfLJr4C0YPctVQ1O+ZCrhamczz3AFOcnLte22UJfm0dvy/0HQHHP1LGB +VllwpqASZ492AeQ0MuBHTg1+j7wysv2k9KUC8PrsoQTk0eB56c0F63h5KvPp +9syYfOni2OcMmLNwwooXZxshfn/ve2LpQeTOnFir8XLPUCk4USRpgBylHd6K +X5Gj9KP8auuHZ6Vww/W5bWj7QdT40/N8bpfhlFRwP9e9F/kveHvlSbHyWys9 +gGoSFEb+y/Aj32Tkvwj3Pj0te+IdmJPQ8wjlH+aycnFC/otEgPnUtUVvQWFH +9ryxJe3gmL1RdyXzvmyzTjPlvVsGWGAxNQ35ZefOhM412FEObugvr3Q2ZQBr +Xa1JyC+Tm39oM/LLHsusfN1y8wNQfX+8byOz/S/xVrnicI4B++47a114FQ8i +TeEe5Mh8PNI3x29RNTBdecTt1MoPgH+/lwRyZHjTSgqRI6Mdcepq1v5CcLhD +xtvcvwkceHBaAi6uh0eurXrfFVMILDZzvED59PD7eoXpZ7cPB5WCgZqbtcjf +weuaHhe+//TrZBngfZVxCjky2SdsbiBHpjI7cXYnbxGYtr9LBHkxdB6tZ15n +V90shU6Cu9eiPJl4XKHbeSnWxLAY5qgdCkTOy+uAPReR81IpnPhUSqQM3Pzl +p3r3Pqf8ay1x0S6x90Bjne5E1RZHaJj2n6xRajPwCOp0CYgrAUk+cqoeU1NB +0texj5ELY7xDRPPZp3pQeqTlU90lf5D+wtLbCNaDcB+zlEceuaD6kKbVQr10 +oPNJYynyYm6Zy8ciL8YpOjt0e0QpCNsz6xzyYiQa9gYjL8Z+xZXhQPtiKPV1 +0krkxfip6HxAXsxYoxnfTfa+AT4azjPrK5vB86pr9uo+ZaCU7055IncqcJif +U4m8GFtRl4PIi9kZd+VWWGoIaLs1pRC5MCftvIyQC8P5cZ6c84MK+HqYt/3g +T+bzRe2RbQkOFfDrHUVhZ+UyeKiBezryYrqDIkuQF5PrYVFt4l0DM4evVyEv +xvVrWDnyYhQmPD1zYHUJ8K044IK8GMPJbd+QFzPV4fa3W9/zQfwxa3/kxchH +5S5FXkzULmvB7S/L4b4Pz2V5S4dASXbglx2CZbBz647Zu/tLYdRQvB1yZAan +lxYiR8Z9cH3JZmUnIDbxhg3yYgyOvJdDXsx4eD7o2LW34EX7p7fIi/k87rA3 +8mIi410Tb9R4AhnpRdKWP2rBlWyOnp9N9UB/t23AOuZzxvD07DXvGA1g7Jh5 +T2b0lIH8Zt7FcQ1p4LnAnOPIkdE9e60JOTLREguKXS1LwSHh5zJPbjCP1/rq +mo+m1WB6vfvqXWPSgcKB69xaLxrAMetTliHHKuHF1PgwrbulYGy7+SzkyLy3 +W5qKHJlrlkXTtbZVAO459zmRF+PlNb4FeTGeFlEqM4bLQL9t13955VUgUnWe +zfXHXwFwfp5RtSkL2Exaxo28GLcreUItF9rBVPPukIiuTFBTZO5t0VsLhNNn +11+91gic3KtzpxtnkOtJwJZIhScC6zLJ+WFoGxU4z212JTkvB3cs1ZRKcywH +PAtEE5EXoxP24gPyYg5OOpgTkVkBP+/TMbvB7De2pUwKNdpRDqfCc6HPmwqh +8N3OxnPM8TZ+zt17br9BwvVUoHtMv2K7dDP9HO1f/HvS0PlUsPrhOwXkxXxq +dglCXsyiTXY3xb6U0vsxJrgu+gTz/hWwzPjpzLNt9LpKG7PTDg5akfD81r3b +txhXwyk3M2XurWkATas2Tv3vTTaYp73FLmNpOv0cdB4Ien/enQWE4qddE6Dz +HvDIP+Uq8H/DHIeEV/RmhINUeCFosyryVujvZJfG6rwQPUDnMRgKj+g2dfkE +Yh4H+PuvfgHuu+tv2a7fAB5VbTAXl2OAsh0Sd59wp4Mfhrn3KpWa4cy+Ehc0 +/+YUaTOpSqMMjOk8rLl3ayW8frZkSZM0AyQ7n5XS8C0Glw5mzW3uTYZ766x4 +UPm+L3PmPecqBJN3q76MkfkMunehvwxQp2Br06mRB/xKxgbefFYMDuV/NT3C +/F3Rp9xj5vtmg+gTT45OPjJOXuI759zkdQzQrxr60S0nCnb4seY5hTtG5jlB +vnVMlJCNDyhynAKRt4LHJ6JDpeOymM81l+bVZYU4fIXx+73f9jHvF7+Ma3UX +c7cB1/aijyF6PwHja/Lx28znR35Bvc3dBQn0evV7tQPqH5jPg1ZVR0UWGX2m +x1FbfA5MS2XGg4o+Gpie6aLX98peLXE4YBcE1ba9+xCgXweBc8WBoAJmuz+W +uXOCGwMYKN3tWfcgCTxIKmtE7g+en/nG//bD7GovcEp09Yj7s/zh6mnI/dkf +V/if5LRPwOdgjLde6S9Q8a2g/w5zPw+pP6mauDQddmlt2NnwqR+4z7w4b+Va +BlyTmHduo0o2NL46zc1owQDguCTTupxZzwpjfs/zy/cFPG+Pe6N5Wvcmznfo +vNzp2zhbyrccTDg4fwyat9xUyfElihnXVX41ZKMTBdavLng4I6wf8AxP2LCf +Wf8n53E5Pw0PBBrcT26ufMcjLyyY56TBjCd5j5Xr+JwCxwIebeQQ5bPeX4P6 +A+ZfktaHgf6T+hynmP2PS1yxPfJ39ht5CfBalIJ9j7YttErhkj95Q3aC2ToG +PFpmLxSY3Qx9YbvgDOb2q/6TiFvGPK5ChRTJgovd8Ct13i+YBXLs9IsE2RWF +d2czz7tiU0MAco5exlYfQs5RgMi9bTArAODvShomjnxXAnZ0Se48ejQEvGt8 +aofac4F55jE0j/E2xrdEc18LPc7rv9PSieZVxBsbJ2stbwUK99/1v1CohJ5c +Qe/D1jOg6uTPJnuLGunxfE/eMi1UvjpvzvzswCZQNtbcq4nZ/oPvz/+Btl+0 +XOD+BvV6qnwu5J18NhaVP7Q5a4oa8zrnUFY/kcC8LuaN/GXAqf7F7UuTaujx +/4epnhWAWX5Fz8LZgt61YKN8v4KkUzFI1ktIWsRsD3P+awxu5q+knwvW1Nxu +VnJlwGDHpXqmXNWg8KiVmv+lBgBSayYcY5bXXnOigut7If08pT3NkNOQuX2e +qzxJc2NKgPHRo9WF5d/BE1uFmoUbGJBjlnZotaMD/ZzVlsQ7WesVA9o6xokV +iYYAr2Nr+DoPj5PnC9iSH8nc/p7Fi7nMWtrp7/HP8nNNTHjJgL02vDdXVLTC +7HHu65C7hNf/V/iU7lF6GgZ+aqqb1U3lkpfI8IytYF6nlRNl+wJ+NsJbJk0j +LtLAz8wRF2lIzNRCZpIXuHtolRPyoazz9a8iH0qp/emvnXkF4Ix8w9H/tlaC +GQuCZy5j7g+vyRGfrvnloOPsxZt5yj3g1a7q0LdyDKi/2/LSJfc3cFrOi3e3 +mP2DX85ZVRlm+39iOXDxplQFEHjEMTDI7B/se1T3jWX2S7xLfy/ZMyUMFN/N +eHFQdqz8j+FfbTPWMMBKy898noNB8K7WLXvkQ+Hnkf8m5/iCok/Acf7gY+TI +4PF2pnvxsMrbUnDtP9b1Ukut9wiTKejt3V4C4fPym8iDrppdnXq6PR6+3b6/ +S3xOCfxaItYwcKkBDnqFOKF2tf/6pVWuj5rBR+V7X2yeFcM7D3+WuzCPqzK4 ++YKKQCN4zu26m2/NZxgy8pcBN5/VcvR/WAek1VtlWnqTwVDD3jLI3I5l9C2+ +uu/VoN3646IUAW7564fKxwUyy3/YdW2lQdxXWDsv0wl5VZOv5Pggr0rnTdKu +J67B9P2IR91AGTlTTqdzlmxMLgSSX15tR3n7fww3hyBnakO5TdWUpCIg0Bk2 +Mm+M56/6p+RkTgsvob8jEP7vkcPOylB4uEZ3WvuPGnjMtKkSHe/2zG+nR977 +eO/ZXc0ct3TrR84sdCyGmqsy5iWtZoAFsSb5wqVFQGeiZp6h3Ge4eeQvA2zr +NXYLkCoA6lU6Do3M4zXOU5+byNyOs+4k0G6ZCzhSzwp/V6gE5wferdRglt9V +esXncTDzvBnee6q8rQccPQPWnmJu/47ahTbzCxCYTw/LWoScgumaERzM8mPm +ala4xwSDix9ktiPXw7pr+8LN05NBv49kpuQ0H3Bn/W2L98z+rS3v5Pw1zHZi +Uvci7rKSP8zrjFn8nlnPCyL31uUw+890A7ngcT2x8Kjd6TTkZLW+DRcomdsM +D/62y2jnL6Pzrx4tcXZqTKyGpUtfmJpxFsO2qHGrkHPBseGUMXKa+B7+Ti+o +8wb/qe9uiQppAOoBjedfXysFhdeX2n6sTANmy/z1kd+E33se6mneNoc5fjjd +yn0a+U2Bjw1EAPKbXoY1nh7wAstrQ/cgv+lSI9c15DdxO7w6r/zaHdTuO70S ++U0pXd0DyG8SWpL18sbNdLBz+lUBpeA6AOLXL9vErB9FrTdXgiZkgKkDXjEL +h7+Bn9lX/1Ni1meUjV6E6Mk48POopeYY+z6QpMjVOolZ/rn6yRQjoXBw2B8s +2vm0G3wc91uL2Q6B6oL2Ux94E0Bci1zvSWa/1L9vIihkjjfWts968v5YLFgg +Vr2lmNlvjNlXNfU68/wmhNyy+q3pAbMUwchzN37+rdRxKS95WQos1QfOIq+n +iVNUDHlSuofjhB9LF4Dz1H1ka9zIfQTOe+mbViteAZ2s53GiefX8xpWaqB3q +XDRxXVlaBtKOu0ei+fOM+bsMUTy6RtDETqoEjJkq9xPNk4eVVqWNjJfG745t +sywErStyX/J+8gS8qxmF8agd1nzRVyjNA+mckzlD5hYAkewb2jzM412dH5dt +KJUDJglmdyzvGCsf11Y8kLWWAXKrK4SchcOh7qzGa+tkeOTNn2xU6Ga2H+v5 +EWMtK5Lo726ax3CUVE6KBIri+jEWvZ4g479ii4KQLrDqyKSmLub2r4v9ev+R +PxGYGb43Qv6RoM9rke+nSqDc6UahVaX5IC48cNtO5vN1ytLz4e+Yvzupb84q +tcBkkGz+dRNyiJ5wVdxEDpHE+5n7XA4Hg2dTOb5qM8cbpx7p/j7I7LfPzhVY +GfM7D0pVxhuXSHDK63WcLGr/4Ad/fDcSbHtVD1u1HhsiRwB/b6Jjc9Bil643 ++Ea15+WTVnojHypHMnxyI7M9n+OUEEA+FC5ftcTtBtfvUGApenPEh9qbNrP/ +1Y5C8NhL3cDQIhS8Ewx/iXyZE3cc97nqVcGipaUvD18rAKFXpTOQ34Sfx9VT +JccGxReA7Oi1Ix6TepvSIeQxVdasPxN++CO4Tb2X2Wiw4Tjym9yF/H8KMPuT +dRPOrUQejVe9mCvytiZyp7o9L88HZZN3+SF3qStTJBy5S069t7x5rSpAzeG9 +a5C7dFamQLCmswXGrVw/7W1hGfQZK3IPuUtf739bb2XeDLnTz0w7b18F86h5 +D1XLkXkPqHduTVgtZylM2d6bhByB9aET5E6K18Luec8uGB0thktOlI+MJ/H9 +ZVlr7Ru9RYVw95rH5ug9II57eZ2c6rCrFC7zZ42jGKYj4ygY4f3SuiEgHw6f +XqcTqdQMgm29GHmyDJB/31LZ9FgqKJp2qQu9F/BOLU9DrmLAh2m2v7am0u9z +LyyHpVzCDWDJuc56kZX+YL2S0SvkMsxaELkHeUMR7iYplwfTQDLHKnXkDRU/ +vduDvKGBA+arfPZ9AJ6SD28it8L4hMYp5A0lHZhsOFSeDvb9dLVB7sO09B+W +yBtyjtg0Tyj6JYjeO3UP8oaWha/oQt5QvVu1dq54Gag/q6ut4jcArGY9H9Oy +JRuOib79M/hkAXwpz2oPJUtCCpE3xG91f7fJjQIgS53H1F6nLOQNdel4cJU3 +5AOeeWNSkfuDv2Pa0ylpMlbTC7xZt+Izcn+Ki2QDkfvDJ3DCkV8zFLgfc6qW +COOUl5uQrQFu+MPIbwrZ/RMbqe+POOWlCtTCjjf7wdlpy5qftdfDSPkm/3aH +AXqd58Xl+TU2cwpg9RLeYuviWvC4rf9p+NNGuPeImmBEeRkwkORuQs7O11WT +VyFnR+j9pDU3c0qB3b1bpsivedb1UPhiaC0QC5t3wqMvACRMnamJ/Bo8zxbX +b5KR5ewPDpRnjvg1zRzCXsivGbdgSAq+CASp+VapyAfpmi3cifyabN6dLyIc +R7+jbwjsa6hyYcB3Jrw6RibZQEPazgs5Sng+0/lEyDvzAx+AnE8hZ8nxQfq9 +z+p99yxDBJjPkYoymfF5X8HRi7WSR58woN5H0FpSkgIqPlw49pLZL2lEFG16 +yhz/SxZOcDp/OQ7M+xXx7MryLuCbPcVk1fcPUDzKI/7azERgu+TqI+TgfOrU +X4McnPV5GYMDrqVg+xKbe8jBwfNpy78kB+xrKQRvxdRzkIODv/c5yPf7iZlJ +IThWnd2AHJyV+s0GyME5nTdlfURxKTgg512JHJzVM4XbkYMjGxVvdMe/FJzj +PuGGvJv1xdyuyLtZO1FtZ9C2MnKdD3yb+F4BBtTAhbdZ3zM+BiPfM4Ibci/t +tb9lgJvUfB2eNzANOrtQ0tMTXLmfkof8mvDpskHIr5kY7bwlbFIZ4D2pMYic +GtFmucXvg8pgnJ+Gwtmf+SB+sQFETk3eofkHkVMzUGqsPyWoFHC1nxNHnosO +V918VZV2qLD+W2xPQjW9fkNzwch1CncNqVnv6aiAPYdyRZFTs6m9Vxs5Ncvd +ujYWT3gDeKSdJGQDOeVP3Oia2XvpPZAPCXIbDHoJH5kFcwdqcsr3nn66c/fK +ADgu4kfk8pkNcJGpl9T2iCFw8fLdg2WnS2DU6hkTT3mXQoM46Xe3nBro51yd +5745uV1pQCrE8A1ybermqx1Crk2xbKfTwyce4Gp1+Zz83GYgrKh7ReV6CXgs +sepRHH8qcFnKeg9lITbyHgrEfbx88/sdf3DT/FZsY149KB73siVILA+cn784 +buOpdPCe6k9usPoTGDpWQqTdpww4pLHaeaTgSDuHxiFpnFpmxTC8jVVvPax6 +A6d1151REvIA/CuuQOTa4HnXias7jEu/l4H890PBDMdmsMo038JmI3PcMFX4 +sOqqVKBke7UAuTP51PvA3qsbyvm4U8Gxy6HqyMHB/QlPkr+sUEYImJVnIIy8 +m82i4zYh72b++sph26cVsPH5kM4e/mGQJT2Y4TKzEsY9LX7z+VYZxP3hVFZ/ +CPsXJnZu9q+BxqtZ/S0QGelv4YamofTZQcxxSM2TfLQ/1dR7zp1fE+V3/sgH ++jtY60DwvHF+0GbxHI9y+GJdqw/6rhOvGz9R4+4jN7EMEu9HwJJ9cnsm5DkA +m64CM+Td4O9frO1qHGJl34Ig6j61nXWfAl2nfK7JF3gCbz33ECu3BvBk8a7d +3cXl4Nq931k+bWmgfKVvAXJw8PrAqBUPLuhYlZLrFcGm0G88fnezQGxg1jtV +vjp6HKs812hZj24GeN6RmlLg0ACmtV2TniZaCX13NcjoPigFpnsaDiD/5WSX +ZRZyan5xWzOAbAVotri3YJVzA7jc05ZhF18NQkr8zvEw2+cNF67tyKn50bBq +A3JqBvMz7yj9LgPbFc+NvE/B/Z7pluTCNVKpINLpVcxzz3oQMW1NUMzOOuAV +PN+P41Y6OH3/dgxybW52Jeog1ybpnf7du8zjej/FlRO5NlYfG34h1wY0nbC/ +db+UHD8AfUnXD5HHs8Btav9PsfYfBF5dExPPlwWUo+dkPR2uBfwX//uvP6AR +rL4k6ZFxJYPNr/lHvlb4j3yt8B/5WuE/8rXCf+Rrhf/I1wr/ka8V/iNfK/xH +vlb4j3yt8B/5WuE/8rXCf+Rrhf/I1wpxvlb8bzxvNJHIP0x/X0DkH8ZxIyL/ +MI7vIPIP4ziZfxjH64j8w/T2ifzDOP6WyD+M405E/mEcHzb7O/8wjm8h8g/j ++BQi/zCOfyDyD9PuD5F/GMfJ/MO4Hz5I5c0m/RodIm82Li9H5M3G8VVE3mwc +J/Nm4/h0Km82rueBqSy/5vCh89pv/6hnXH45kU8bx3cT+bRxPJvIp43jlUQ+ +bdrBIfJp43g7kU8bxzcS+bTp7RP5tPF9gcz3juO7iXzvOI7zvZN+zToi3zsu +T+Z7x3ERIt87jpsR+d5xvJ/I947jZL53HO/i+jvfO47r//473zuOn1D8O987 +7eYQ+d5xfBGR7x3f10h3AMf1CHcAx20JdwDH+Ql3AMdJdwDHtxDuAI6vJ9wB +HPck3AEcHyDcARzvevi3O4DjU+L/dgdw/EfI3+4AjnMT7gCeJ2wmnAscJ50L +HCedCxz/QjgXOE46FzhOOhc4/oRwLnC8sPlv5wLH3xPOBY7HBLOcC9Kvefro +b+cCx+cTzgWOFxPOBV6/TXorOG5PeCs4TnorOE56K3R+GMJbwfEcwlvBcXnC +W8HxIsJbwfG2hX97K7RTQ3gr9H5e+9tbwfEPhLeC44GEt4Lj6whvBa+7Iz0g +HCc9IBwnPSAcJz0gHCc9IBzvJzwg2rshPCAcb7jztwdE59ed8bcHhONBhAeE +46sJDwjHYwgPCMdJDwjHSQ8Iv09fRLhUOE66VDhOulQ4TrpUOE66VDguSbhU +ON5BuFQ4Xh31t0uF42WES4Xj2KUi/Zrh4L9dKjq/KOFS4TjpUuHvmEgHDcdJ +Bw3HSQcNx1UJBw3HSQcNx+MIBw3HbxAOGo6fcPnbQcPx54SDhuOkg4bjpIOG +46GEg4bjpIOG51tIjw/HSY8Px7HHR/o1pMeHy5MeH46LEx4fjgPC48PxasLj +w/F7hMeH44sIjw/H7xIeH46THh+ORxEeH70/hMeHn7uxI0n6NaQjicuTjiSO +k44kjpOOJI53Uo4krk8c9yW8SByXJ7xIHI8gvEgc30t4kThOepE4bkl4kThO +epE4TnqReJ0n6Z/iOOmf4jjpn+L4A8I/xXEewj/F8duEf4rjpH+K46R/iuNm +/n/7pzheQvinOF5L+Kc4bkL4pzhO+qc4TvqntL9D+KfUX/APzxf8w/MF//B8 +wT88X/APzxf8w/MF//B8wT88X/APzxf8w/MF//B8wT88X/APzxf8w/MF2PMl +8+9dIzwXHN9GeS6kX3Oa8GJw3P3Hn17MqFOzncpPPnJYfzg1hgZ/OyA4Pp1y +QEin5g3h5uA46ebQ67UofwfH8XzgDcrrIZ0a0nfA8a+E74DjGpTvgOsZx63/ +cgF+0++1pan86jiOn6f2EvnPcR6zO385GqNOjT7lbpBOTSrlI5AeDXZnSI8G +OzX4eHF5OcI3ofNaU+4MjuPtYKeG9GiwO0N6NIcpp4b1u6MezTTKncFxXB47 +NaRHg90Z0qPBTg0+77j8C8pRwnFc3vofTo3y6b8dJTp/OOUokU6NPuWnkE4N +9mhIpwb7Nbhd4fKFlEeD47g89mtIp+awvk0J/4rR84jLk64QLt82aV4bT3AT +m1Njkb/4fo3M6HnBcZ3s1G2hAbVsTs1FKv8e7ifx78pRec5xPePye6h846Rf +M9GFlX+b9GvOU3m8cb+Kt68CWfnS8XnB5dUGP9/W0RjtN3A88i/XaTSPN/YI +SI/mmrPA8bLyVjaPBrsq+Lzg8vvjtk7SOjM6j4/j0faSra+Y9Y+3g+PlgxYn +x9WPOlZ0XmXKpcL1hsfJY13+dqxwP1ZAuVekU0N6WzhOels4jr0tHMf3C+zO +kE4N9lCI8hC7NmReX919LJeB9GsEKbcF1w/toFHuD+nX9PfNkfdi9le4PeO4 +dcHu8H1BTWx+jeqsWx5n1o62Zxwfmsxt/dWnls2vqY/as0180mi/QZef6ibp +Jz7qbuD4DVfVuiyvbLp/wPGCC9c13M+PtkMcx44Y6dScWzt4mu+PfgDHlTw/ +z7hyhq3+AXaCcL3h8/i3jzaaB/U+5R+RHg3pIOA46SDgOOkg4DjpIND3a8pB +IJ0pdcrzIj0a7B3g+r/C8giALeURkPlaRSlnh/RrGgQLhq7Z4rxPo36NZOiZ +lhmCTWx+jfmaH4rTHerZ/JrOF86OF3hq2fyaSV84c9Z8xM81o66H6891J7Y9 +j4OkX/O6+ZC68aF2SHofGtu/NIedymTLB7sjmuVxsPq9UafGc5qmRbxqM5tT +0+h05YxAQQObUxPaImg2T6WOzamxqh2MuBNaTe3/qKezb5XDK6MPZWx+Te7M +opva+zohzkeK348bUp4O6dqQLgyOZ1MuDJkXOoXytsi8vkISLI8J57PF9XOK +cklIB0eG8hBJB+dur277pdRWNqcM+31UPdPrYYwJxwTHvSjHhHRwSMcHxyUo +x4d0cLrcWQ4a6VgNh7M8L9we8PcROyh3A9cDzgPvSbk2dL9M1TN2QHSo9a6B +rPWu0Jxa70r6DprXWB4Qbp84/7Ap5dHg/gTH27/87bbQ+asT7oUdYtYzrk9c +//a7NQWMB4rYnKaSl28WfV+fR8fpcUuatLr/vDw2Z0fv1pvQF3reEMfpcez7 +qctm3/SGpI8T1+vpmHuihc3HMSv5tDRRvJvNxylvuFySIj56X8bze2spNwTv +J17feJnyNfB28HnA3grpZXh2sr5rwPWDr6OaPpbrhON4PFBDOB04Hkg5HaSb +Qzo4uB1iB4d0c0hnB7cfScrZId2cRMIvw3HSL6M9HcIvw3HSL8NxHcIvo51H +yi/D40AcF6IcQ9LN+UC5Zvg48Xlf6HxRQIYej426Odh7Is4jwM4Rvr/j5+J+ +wsXA8V+Ei4Gv01uEi4HLT3H428XAcRXCxcD9wH0hlouB9wc/D9pTPiPeHxy/ +SLgzuP988ZHlzuA47gdar/zttuD4DcptId2cAWWWO4nbLb6OSnbteT05v4jN +zeEM65SoZl6PuL3h83K/N/XijD/Gw3g9ZA/hAeF5zrOEB4Tzih+lPCAcx+Pk +FZSbQ/ovZjp/Oyw4Plfsb4cF10N9DcthIf2X6pUsV4X0X+SnXjDnKTBmc1v2 +NbOcDhzH/b93IctxIL2Y6ZRTQ3ou2J3B4yVcb96Ej4PrreovH2fU12h+qfi+ +oN6Tfk9He6aEg4O/AzKnHBx8vPg8Yu8GbwfH9SlvgnV9jTop5QrZgqs3vqW/ +Z8dxnPcetyt8fjcSjg8e31Yv/dsfwccVkzTepF5u1IvB442uYJZXheN4vDH3 +4t/OC77u5FMizqs6GbE5KRw3fjm/ybtFHxeun0VyezIVb7+l32/i8s13lv3e +xXzejKbyGxsMsvLlJnU/ly7UaoTJVP7kJ6z8yUCNyp+M5xtxe64SL65SWpNM +uyS4fgZST6nV7BrNs4Hbg1qF2JeD/aO+DI6f7DPv6DMa3Q7Oh/+AW8YxVz+D +juPxT1zBSQfb2aPbx+1qlm+T9aLkUa8Eb2e/iuAVkQuj7gm+f1VS3g2O4/H8 +R8I9wb97rrtZxnLxqKeDrzsPR5ZXQvomHKf49B9IvWDzStQ3s9b34usCr0Mu +phwQ0jE5S7mHuDzun4Uof4R0pYUoVwKP33D/v4/yCvHx0i5PCstvIv1ZDspJ +IR1G7KqQXkn+PsbFa3EVkHQfuPlYviGuT3x99f3DK8mazHI6cHvG8fbMsJwO +8dHrFMdJhwLvfzHlj+B+GJ/fin94IhYlLD8C7z+uTzPKEyHdEOxr4POC32tt +oTwOHMfXuyHlwpCeSPRlli9JeuJvKC+GdF1XUT4IPr+4/zlP+Tj4/OL22U85 +XKSf/pvybkgnK5DyjEhXXZ3wknB9YveEdDNLKCcF1wN+n9VLuCp4nIMdFtJN +VqH8FNIxKXy+JazkWQOd7wVfd3MCWD6OmBnL8QmxH3F8gEMNy/HB7QeXH3vk +T3ds9D1C2AWWg4O3j+Ock1ieDj4ufB7dKJ/lcmXxlRkcTaPPlbLc7cJz0ujx +JO6HuSjni3QwX1IOC+lbYU8Kt9vfrHYLtZayHBzcznG/J0F5JaRbKldkcHKp +YAH9HI1/167704XU9tHnIPy7S7I4pMbPzmfzW2spj4/0T7GfRTqeP7c7nGri +LKN/F7cTbQXN1nOJzP2c3KDUzdUMlHt2a+pU1ILSsuP5rTsL6d/F9eYirv/c +i2v0d/H+LBS9ZlHTj9vPMBAdOd4EoN373S77djk9fsD7gz0vvB3aIVWtV2X8 +qoB4Xg63f0O54fFn1ldT/dKoZ+Gy4trOQ1yVoCTEYSTPOb9H+Uie86e9Kb++ +5JazOSl6lLNAOinnKZeBdFJEKPeBdFJwXgvSScFeA+mkzKWcCNJJOUB5E6ST +spJyLkgnpYNyLvD4GTspk96xvAnSSeminAvSSbGiPA7SSTGmPA7SSXk4huVo +kE7KRkeW00E6KdgBIZ0UHsoZ6SHy3r+mnBHST+HYxXJGSD8liHJM/Az/zre/ +l3JPyqhxF3ZVzrQ/Lzl+yYvNVblE+Smkq/KI8lZIV+XD+Z5NP+Vj2PyULMp/ +IZ2UiZT/QjopmZQjQzop/ZRfo0OdFxw/nylRVZYYwOakbKOcGtJJqaacHdJJ +2Uo5O6STItjDcnBIJ+WHGcvZIZ0UF8r3IZ2Us5QrRDopJRtZThBut9hJeUL5 +PqSTcpByi0gnBTtHpJOSSPlEpJMCZFQmHzOIZXNSDAPjMpoLY9mclP1etkJL +05LZnJT47iyh6Un5bE7KxJBlX64cjGNzUubOnlWeLBrD5qS03JR5P7smHgZT +4/xIykmZGvtI4cSseDYnhc8wZ2L3jM/Qk/IsHlOehcukgfzn1fGA9FPmOdUq +it4NZPNTdHRYHgfpp3BpBnalSlWxOSncpa/lrFJr2JwUr63p3YGh1eDd6p0/ +xYy/Me9rkrES1tWgSO1ZjadnMJuTMqwm/MZibAebk/IjRnK+Ym0t8KScFGnK +SXGwq98qaPOBzUnpVcqfrTq5gc1J2SHFc+JCXx2bkzL32uTYhvTXbE6KHA+/ +cDFoYnNSkiuXNP9a1MjmpPhdiZl7fM4zNg/FkfJH7lAeCr7/TnnD8lBI92Rg +JssNId2TlScXyXRNi2VzT6JOV4/4HaR7oks5LKR7UiXPcjcSJMYseT/EKV9A +3a+HEnTsP8c3wrk8Y2z3G3wDlesfj3f3qQJukxZq2lUEg66/2zOIHHtK+LG+ +L7hFOSnWlKfj6cFyUqKpdqjJaofgkeG304uFI0Ev1Z/jfs8gnOWY4PFwOPc1 +VYWICuBWNb5/g24ouCXpzRU+4Rvgesv4adNeBubunDierzGMzaNRprwSI6re +PChP8w3lxZA+y5hili9D+iYO/3BMZux7nnbGswGSfsoGB5Y7Q3ooxpSTQron +8b4sd4Z0T6qv+LXvG3KCeN4A+yY5lN9B+iYbKe+D9E30KdeD9E34jVbH6CmO +fseFfZNIyhMhfRPsj+D76SmWYwLNKceEdE8OUB4E6Z7ozpU0/bS+ks03yaX8 +FGJ/QDrlrZC+yfASlueC6wf7JhzbWP4L6ZvkUc4L6Zt0y1SUaBTFsPsm8zZe +8p8ZA0jfZG77Msn5TrGAa63uiG+SasjyTRbaJJwy2ZDD5ptsOxfGHXSnms0x ++X3heoiDVhObY3LARjXJMKiBzTHhyU6+aRHdyuaYvPuw/pTmIms2B2QC4ZgY +sxwTIEM5Jjspx+QxyzEB/IRjgudPRP7hmPBo3xtxSUjH5EYpyyUhHZOpBSz3 +hHRJkil/BPsvC1n+C1Sj/BfSZ5lP+Sakh9JL+Smkb6JIuSekV5JEuTykVzLG +KeKrsFItm0uC885563DMDlZIBXsyGIeceauh3HprdX7NXDav5IavBjzFXQNE +nO7G7eTLBOoX48coR1RB+bUSkben5bK5JI/0tQ+eXp3I5pJ4Td26I+e/WDaX +5Jzjw0LVnzVsLsl7tf16QdsS2fwRg9TuB+LSeWz+yOSndb9Xdz9j80ekHl76 +/bFKn90fWe1zQGV5PJs/sid8w4W7dvFs/gj+npf0R6ZT7gbpj0yZynI3SH/k +fu3uEb/D8ZeyCfI+8PfOnN7dycj7yM5juSF4PL/SgOWGrKT8EXyftZrG8keK +qe+RsVe4SJL1PfJ3yjHB9yMHyjG5MHI9DALT3JH8PKCGys9DOiNXk9+OOCmk +M5JFeSukM5JOeSukM4LzGZLOCM4/cCLoQRLKg9rLnbLUYEc55BVT/47yoM5f +G+QSWDkAJgrl8C6pzYPRPD4TP1zwBqtMONehfOOzheaP5BtfPrh+xIkgXZLP ++1jOwtx03tk5n/pB2Cut/zqkGdDX6dWYdRGBoPSLn8eysH7AaxwU5ijHAFm1 +uuO/qWRD0hP5FaHyqvlVPZsbUrpPeC7KR0e6IemDt+yRD0K6ISvWjOlHngjp +hhTlZCYiH4R0Q3IXyM1Engjphgz07Dc+5pvP5obMjm0683NKHZsbcrelpuw0 +Vy6bG9K2+fon4cvVbG7IOb+S9pKATEA6LJvyx/N9rWD3RI50vuA4zJvA5omU +zuBys9aJot/HYU9E7qPBSJ5w0hMx21qxXHA4iM0T+cg34dmSnHg2T2TuGp4J +6bWdbJ4In1qXA8pXmS7/+a/8XSYeLPeBdEPUYv/2PrAbspHyPljhUTckNeV6 +OspX+Sa59EMfaAC8Ta9Ly5YUgGM5sx6cyC4FOlR+nnutI/l5oG49Kz8P6YAM +dC8fcXNIB0QFah6r9/0A5Kl8R7tY+Y7AYyrfUbYZK68RY8xIXiNo5c3Ka1Qe +w3IcXHeNOA7Q+zzLcbguFKSow9kKpJSi9BJkGXBD73HRo4e/sDkgXk1ajenT +wwHpgCjeHhadWZkEG6i8iN6svIhgnDErL6IulXdIiZV3CCRQeYdI72M85yxH +QwMvNm9FgXJbblEewUzvEY8ATpnB8ghgx9KRPJNewgtRnkm4dXv/SJ7JDwz5 +VesshsCWnGSp4C0FMJrz7ezqL6GAzEfXze9zJtA6DFhTXsnpY6z8/69SWF6J +OeVWtFPzsZ/9WW4F6XQoBvxwU0ltpecnt2ZCEfuXDHDv8R39fTPy2PyOSXoL +X+0w84brCc+lBbLyh7PmZ0b9DolSzsOp4t1wdRnLNZj4ZMQ1ABrnWK6BzXGW +a1B+c8Q1AIrzWa7BIsp/mcfyX8ClApb/Qs330u7GeKvGEUeAdDcev57+GuUH +I92NxMXCzuj7aNLdyE+3HckbRrobXydvHXEHSHfDSc4lAuUTI92NQOdJIx4B +6W587/A4iPKMke5GSovkiFNAuhtHL2iFe0nlsLkb39f3T0P5zEl349HUJVHq +EzLY3A2NlaW/d1jHANLdaFuSwJVwcnQ+ELsbvhOfrUBOAeluBN4VqZkuHE6/ +D7Lyij3txzy/eXVaKYsSRtcDYOdiqmfE54YTLfCVz9yR/JADM41Qfkiw+YnX +SH7IaLME0d9Xm4HZgx+BSenV4MS8O8903xeweRMfRGYKTpF7Ak6v0B7J/xOu +OBbl/wF7zVRG8v9oWg8Nx2qOkX/zrnlY7GMISN49UcXBvBY+L1z3iyOQg37v +vN+T7+TjtGqo3PNpwxnpBmAaX9Ou11gNqv4rqZ8ZWArIfPLtlO9AuhV+jq66 +PH+sq8Ruxfx356af/2NdJXYrrCVU9YL/WFeJ3Yreov5Fb4+OrqvEbkWz+mQ3 +gTmj35niPPYKxucT9R8UsHkWySGXJ+eLsHsWZq8PZg/bm9Hr07BPsfuUWFTQ +H9+NYp9Cq3SGKfJWSJ8i0yjrlc5gBptPYcR/U37l4g+A9CkGGKy8QMJU/kM9 +Vv5DqGTIyn+4n8ovtIWVXwh6UvmF6qj8ZnGs/GYwhMpvNsOQ5R/NOzLiH8Gl +O1n+kRKVn+fR6pH8PEDiCSs/T08uK5+PCCufD4iSY+XzIfMjzWl8fbkzMwSI +U/nzu7xY+fMHe+RzHnSPrt/AnoWGjL9qnujo9yzYs3h/R8lC3OgzJD0LMysd +7wvCB+j3sNizWHTbfZHk9hg2z+LbiniHN6Kj72GxZ3E35MJylP+f9CxcPjlP +0/pjvTT2LBLtO5Zk//G9BvYs3j/aK6b2x3cZ2LPgXhOpIPjH9xfYs4i5Jr/9 +FtfoemnsfWhy9quIx5SwOReSnz+YrPhjnTN2Lr68kRvJz0w6FxyPVvvMdo2n +38Nit8IyPbjnqkk2IB0K/ZwzfS/b6yHpVqhvYjli+P2m+Rrd7PPM3x06Y6uI +vKrfKSwvA6/H06e8jI2UT4Gfo3f8w6eI3Mlr6j09k82nwPmXSJ/CSP0+L3Ii +SEcmMkdfC3lzmVtYbs6PZSNuDuDsYbk5pEPhPijXrnSznM2hgE+8R/wLj52r +xpf31YIVmk2/BSwbweOx1jLl6WVsPoWAjVXTeMEGeIbyJvB7NzvKm5D5mLP0 +P5vRfEq/7RN4Yu8UsDkUYxV1DLxfu8MZlPeB1+EYU94HbufYB+HOTpy+5WEC +CGpgOQt4ncPDfJaz0GOtqdHU1whEN1ZKePRXwvWK2gOl89PYnJ0kwvV4wcpz +C9ypPLeNlAN1m+VAATXKgfqWysqzd79zBsqzB9frsfLskW5F5tMtX00Ck9kc +imqZmNx2tUSQJGww78C7JuDyXenSgRX1YMo2w/u/sgpB/WWlY851A8Bm9yqV +lcsKwHUntW3mjQXwIjVOsxMdGaeBzG2svMG6lNOU68py5Zopp6n4a9hfjtsJ +Kh9v6Pp5Wx9JD4E+6RlypicygN9TKXdplRIoT+VHfYrzbL9g5UclfYqx/ieU +bwy+AbsIn8KLynenN+3vPHh67Sy3QpraDn5PtMmZ5VzYUfnE9Km8l0e0WPnE +VKj8b+O4R/K/wQ1U/rcvlH8RwPIvAIfI//cvOqPTOjfZN8DY0leu3xKY9SCi +KH4cloDlxRqdigml8NqBaYn8h4eBjsYTM9X5NeDVG/U9ilvLYerl4wvO/BgG +0f6X105JrAeS8Gb7/awKKGst9MK8vhY4ffGevnNiA9xhvb3fziKDzcUYXLDi +HLycDj5RLsZSysWYslbYcux1T1DtUexnrtoAMn59t+eaVwDfzK6dPk4kHZBe +RsH+mkGZ8TXwQIxR0eTqZvBMxivxmkkZ8Fi+b0z+j3zQqHGdV6hxCMhl3quU +qykD1sne3vNFymAzkTfy7ElL2/K6ckg6Gq5pN410S/2BpNjHz3LRzSCTv65s +M18FTGnQsSsRSQUZg60u7r4DIKzt+te0E1lg9//qOvOwGtM+ADdkGaSGxPh8 +FUWkkbFMaSaPMbLOMMYy+UhUSCpNzVgaa5FxLJk0YYYUUdHktEjGyaOM0KZ9 +O+2biBRqRtv3nXOe5/f2ze+tv1zX7Vyvc906vc/7nPf93TprXWZsyBP1Ndyu +ZhRlqZ0nuK/RkVNno/YglZR7Hv7raHIncX+7f7htUCUpdfxp/SDjQmrzx6VZ +e1d0kQW3Dbe36dSSGcmlQ91OF9GHvLvhwLsb5LKdrPz7aBIZlKZ1tKqeLJ62 +cZmusZxavL484rJ6CsHdjWtHPWf7Z5VRj13FHXdPdZCGgXZrbpxLIWXqGYee +Ds+jX40fuSxyvOK6NWDJSSu3curTp9axrSWGpByel6LpW0Mm5dWcdbeupm/M +2sLuSNJIJO+0hrJOKy3mndZzIZELYy7UEu0zmcP/+LGMxAX7rg47VEwmd15Q +zX/btKpOOf+NxDay+W9Z991kkj9qySeP/By20RKqM2DEq+fyVKJRUjn4Qngt +ybf/OXgllRPXvtGhqYfFPQ7PwdLDEt0noh7HuDzLjQej0om784WXkns1pPPY +/u/+Kqmiey1czpe4pBHjJQVnBmg9JfmJ494a9ymn4x7Orn6knSrqd2jP2XHO +dHOpqN9hVHCsvEqxbqyLzx5zpqOK3Kue4nf1ch0Z1Nb114UUuajfMdOwrPXq +gDJRvyOZ951xvwO6urjfoX/QM3R74zli6C/b+syku68X5750QpxrirCOLbpT +p+xl0DEPWS9jHe96wD7GZ7zrAf8edDreprqpOqpwnwl0OmTTBg3d3HpV2MeA +7obkIx9V/xR3CvT5fF3c0dAYFFCg7A7gjsbHhnpFkoI6UUcjyMr8lLIjgDsa +7SumaRonV4o6GjbmV97s0ygTdTQ+2+OimfvsBQ3n/crvWb+SGr5m/Urcy2hq +sHtyzLRU1MuYGN7S3KoV370u5b0M36iwl8rOGp6f79Rnl8Omgj+FdRp0NOY9 +oXOVPbLlN+T/mGPc4cm6GK6V9aquXEVSlqorJ4nKfqdfGk5wd+NA4sa9r9U8 +Ce5umO+eqDUh7xEx4PP24T7JpWtYn+JD3k0+zbvJ9D7rieBexoZBSUHKrrF2 +m9W98X2ek1S7lUvuzQwnJ5YsdfLRzRZ1ND59MLQ+wzRa6JVM5b2SeZR1mXFH +46bXGotWl2aKuxjWJYGLF1tJRV2MlTYTTQ7cfkRn8o7tataxJUd4x/Yh76HA ++lOd91DW8x4BrMfGB7MewUcOrF8A66uPh7B+Ae5leD7O0FL2X3AvY4D9YFXn +DvcyNltWHh8VWSjqZRzZ/aGqf4d7GV/t2jdK2Yvx459P6GWMHJfPuniolyFZ +auuo7MjA9QX0MuYkB6t6ebiXMeyk/aVvIjNFvQxJit53yue+cS9j4suQ5Ib+ +aaJexoGzlmbK/iDuZURrPu3UXd99fzL0MizTh2xXdglxL2NMjHfF0cwEUS8j +0+C3MGW/T5f3OuF6oTWW9TpxLyPk+KaQO2tDaNKhn57tKn5Hwsau0C2fHk4L +3ypO/zSWPObdDXjuoJB3N3AX4y6xbDnlTAnuYoTqT5w/qn+DqBNkcLxpyI7X ++aIuhqfVEePEpmeibsUdbb1lyo4D7lbUzFIPsy4uEHUrLm3TVttvmifqVlx5 +Uaah7Djg3ofPNqv3p8Y+EfUsdJf7bT/dkijqIi18G32U5nY/X9DJu0h/tnS0 +P3tbSTfx+dIG/DrifT5fGs9RvyhnPRrcsxjlPTd7/vRfCe5ZBFZRU2W/A/cs +zMZ+5a/9QZ2oZ/F01equiuPVop5FrZ+lpbLfgXsWU0Y1b9xqUEIyluV67plf +TyzNU9VzFPyTyLsRZFCuqHPh6DHhUHz4JYq7FcZJk1wHZ9WLuhW6C86uG5PU +SNP4PPaP2Dx2cpvPY8c9C58Lt0/MfxMsXC+f/CvZ7pHic/SNS1m1suOsjfoU +52rajlRXFYj6FFqz+iy7dLCc4j5FhlX9DvJITnGfgu4pXbU6q1jUoch10ru8 +tfS6qEOR5N9UornxHsUdiq49QcSWyEQdirCUvaVOYf6iDsXV6z73/f+uo7gr +sWUU6xPhroRP9rCpyl4z7koMy/FWdZlxVyKm2Xetsr+MuxJ6Ixq/VHaWcVci +WTK53+sJ5aJOx7q9lhnJxwpFvYn4/fKSvY8bRL0J63itT86VNlHb2ZbDdZzq ++c97JXl3ZPys3+LzyJ9N9VpJNorzi3fll/XDKki8tm4zvVgs6lCc2u0uXeCW +ROrObF8075cO8rq5yvXy7lS63C7WpDExgvjyDqku65ASR94hbRvI5vZ3sbn9 +5NstbG4/7lYENCYe7ghMJ0c3sDnqAWyOOtkmZXPUcZ9izvWs7UYzvCj06AN5 +j77oZHnnlxsraFvfWA/nH7ufk3W+mNLQ9CKOhPPeOqxbfh/Geuvm/2Z9ioQ0 +VZ+CFoSyPsXkobq//GbQQaxyjx/tVPx+vh9RXDc4N5JM8do+4gsFl53+4dBh +xf9LvGPpwM3tOdSN90qGs14J2cl7JWpTUic119STjo+UfxYSzdth/3mWnyt8 +f3SS9cTJMd4TH9seZJV+sp6cSk08WLW4giytWfrL3gN5om4FzJ3G3YqurLFR +k48EEdyt8I/OrtmffI3gbsWh31mv87pXgnlSbC15HnxsjZ1/Cb09SePGovJU +Eh9soer87g/WT9I7X0kDXfNVnd9ZlTeP/X8vyXx8RR+rxlRiqTPh4hjFee38 ++55/Ks5ThOYZz91klEZ3N7DucHO+qjtMTJaz7jB8/2hpyPoUi/jce9yn0Eln +89Jxn+LBMlKfalhBcZ8ins+Tx32Kdj6PHb6n2FjXpyZ2eRXZeS/dZkNXMWnn +P7ebWTeEOPJuiJHa2eqFP9UTuYvHr3H25eR8l7zwpXce8eU9lATW96EtvO9z +d84pVX8Bnkd4sUOq6i8EjV3t+rqri/zqkdiVtb2Umj1tcrgTHEt28H69bL6q +X0+DeL8edyvM4/rvW+B8XtStOKATFX3FWUKtR94yNdhdTXzmLvJYaFxLTI30 +k/ZK5ESd955mqT1T9p6IB+89OfOuwU3WNSCNCaxroHs71H56RA2ZULSndv2u +XLJOs3C0pKOYdH3MeiVRfF0aGsJ6JXB/RW1A1C2fRZV085nTXf32hJKE8z/X +z1mg+PnPrAi4ofgctY4xqJ66PkXUrbC2vO2l7BHjDsUOu4iQ1ZJkUYfCrl9L +5iuNB6IOxamLCUXPrj8gswocDBtynwrPZdy55u33w4l8UmRT8o+un0kN67DU +jmX3Xeyeq7rvgnR0bDl3vDiPfpA/TXXfxXRZs1bZkixi5FRjqey8j+9fo+q8 +w76cs1ugqvO+s+XrnRHW9cQ2cYzDoBE5JOlWxH9HWuaReSMCTKr21RK/4ILI +3MY8Mmjy3RP9bxaL+neBtmdDs9XlNJNf9y1k133EPT21YP2JIuHz8gX7vp54 +nVw7+HB7KfVYNVvVr/+Zr3+jjw5U9esv8+upbH5fqIkZ65cFV5c8PFJRI1xf +f1IeN7foP2miXkbFj5P/HXj1N4J7GbZ+Dm2zLUqIHu+5j2Y9d6LFe+4aN4ao ++uNvvn6j6o+7vNcR++GaGFEXo/yUl6mea5qoixG/hfUdcBfDkPdr/Hgn4ibr +RJAfeCcCehmzeS8jaL2Tlud7cop7GR3G5FNJZy11djOLUPYU4LmDPj/pq+0y +uklwRyMo1zXKYLYvLeX9mp2sX0NeJbB+zZJp8qnK749Gvz9+ldyhSPF5MdVU +9jXS+7IO+9QOVYedTDzHOuyEfy9Wzb4XI9/wbvtM3o3dybqx1Jp3Y3Ev4wHv +7+BexpSZrAsTyXvu51nPnUp4zx13NLxnsf6ITwXrUAjzPHmH4gXvQMH5dDrv +QOHuxroc/WslIenEkHel4bwQw7vSqbxbAfdllfJuxXe8cwH7zCW8c4G7GxM+ +z1fTfCwlbzN1tjlH1ZN/jQ73vflFKX1v2brXy8emkBPOCZOMHtYQ+9TPbgx9 +mk3fWX+sc31rGknn3e2VrLtNXHh3G3c6BvJuEe50zI9gXaS6hWx/W+cW62Vc +0WNdp0R+Pt3Azqfkc96Bwv2OYybuhwbYR5PPeH8Enn/p4v0R3O+AvvnuCRWR +yg4R9DpfWfiXKDtEra0TVd12OL/E9B2h6rbvSrwVPO1aLVHTcNRxCpHTCh1r +I9faVDLlh4Dv2hXXp682PD+oLy8jrSsWfmF7tJgERjtnbVWcJ9Qf/nzxklsl +yXg5syhQ8Xtp8YBPo2OK6si4cXWSSfEVdKeG5yivGami3odPQP/fc8JKSSbv +aMPzyDN4RzsAdUB02yszt92Xk+y/q1vvhtcSG5vNXh+0KC4VdxXrxyje5x41 +1kHWWe+h7CATe3PWQXaKO34lXLHe+GDiSm2HIaVkhvuKNf166IbE8O4G7oNM +9s0Kt/g9vdf923VXqp56v6gRnpO65tj32+kr08i8pWzf1fsU23d1fcD2XTOm +75rRr7GKjJwqe/lLSw0N3lL3ss++dFEfBPpiuA8CfRMd3gcZyPsgK9fOXWzy +uPu+bmF/tWF5vO5h0TxMWuTbWegrnodJp8wIf6e2QzQPkx4sXDnavbEaz8Ok +eXvUPq3eLJqHSb+Za30r7G73/QbA2yQ3/pbcKBSeKwd+Kae/hUtQjqgP4mcu +aw0cly7qg1Q9dtptr35f1AfZEjft72VpUaI+SKTZweHmB73xPEy6Rn1454WI +OFEfRN5U/KPk++45jcBP25q8e+D3RNQHwZ6BY8/AsWfg2DNw7Bk49izs2yHP +wnxH5Bk49gwcewaOPQPHnoFjz8CxZ+DYM5wvsGfg2DNw7Bk49gwcewaOPQPH +noFjz8CxZ+DYM3DsGTj2DBx7Bo49A8ee4byDPQPHnoFjz8CxZ+DYM3DsubsD +8k/PwLFn4NgzcOwZOPYMHHsGjj0Dx56BY8+wbsSegWPPwLFn4NgzcOwZOPYM +HHsGjj0Dx56BY8/AsWfg2DNw7Bk49gwce4brFOwZOPYMHHsGjj0Dx56BY89C +Hxl5Bo49C10S5Bk49gwcewaOPQPHnoFjz0LHBHmG+8OxZ+DYM3DsGTj2DBx7 +Bo49C/M0kGfg2DNw7Bk49gwcewaOPQPHnoFjz8CxZ/anVNbzuk4q63ldJ5X1 +vK6Tynpe10llPa/rpLKe13VSWc/rOqms53WdVNbzuk4q63ldJ5X1vK6Tynpe +10llPa/rpLKe13VSGfYM94lhz8CxZ+DYM3DsWZj7ijwDx56FebbIM3DsGTj2 +DBx7Bo49A8eegWPPwLFn4Ngz7INhz8CxZ6HzgjwDx56BY8/AsWfg2DNw7Bk4 +9iz0X5Bn4NgzcOwZOPYsdGqQZ+DYs9BPQZ6BY8/AsWfg2DNw7Bk49gwcewaO +PQPHnoV9J+QZOPYMHHsGjj0Dx56BY89CnwV5FuYsIc/AsWfg2DNw7Bk49izM +CUGegWPPwLFn4NgzcOwZOPYMHHsGjj0Dx55hXwh7Bo49A8eegWPPwLFn4Ngz +cOxZ6Msgz8CxZ+DYM3DsWejjIM/AsWfg2DNw7BnuD8eehTktyDNw7Bk49gwc +ewaOPQPHnoFjz0JHBnkWOjXIM3DsGTj2DBx7Bo49A+95Xdck8gy8l/06kWfg +vezXiTwD72W/TuQZeC/7dSLPwHvZrxN5Bt7Lfp3IM/Be9usEz7jbIk0IXfjt +5929A+Dgn3no7raYhXlbhHmnCMcHjo8P8y/x8YHj4wOH4wOH9w8c9xTg+Oj1 +tJfXo/fTPf8f3j+ex/5rrvIH5bloHntt38IPzQanUzzPHL8eOLwe3h8cBzzA +6+Hv8fHh/cPx4f3D8fH7h+Pg18O/iz93cJxe3o/w/v8HdJ5q7w== + "], {{{ + RGBColor[0.880722, 0.611041, 0.142051], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxNm3kclkP3xu+ZeYisJd4i7cqWpZSQVKQskZAlXmXPTpG0SEWUJVv8rNn3 +nawv2bNv2aJQ1uyvfe09X9f1fPr9cT4z9/3MPXPmzDnnOnNmntb7Hz3wqFxV +VW2pqipRvhrEc6Og5kHLB60QtHpQw6Dlglap1LYW1Djo21RV3wW1C/ooqG3Q +mv5uxaAmbhtDVGsHNQ1qFvSvoAZBywR9lfTcPujXoDeCXg/aOJhpEbR6/D4w +aI2gZ+J9q6CVzWdrl/DSJuj7aPNT0I9BTbP6bWc+Vg1q6znUn+Fr6aA9ou0B +QctG/Qf4yeJtU/O9TlDXoA5+hoe9o81GUe4Z5YZRtqw091/j+2bx7v+iXDee +uzEX8wqP6wWtYRmfEe3GBvWM+qJo/0VQ56hvVulb2q7vtmuaj2Zek07R9vAo +TwzaJqiLeeSbP+O35tHvllHfoBJ/v7E2Wf1tVYl3+Orh33nubBkhsyei/eVB +g6N+QNBuQbuzTvFu6ygHBG0b/Z0ez5ODRiXxvW3QX1FvmfXcL2jzoC2QWdCO +Qf2DdqjEH+NvH9Tdz2vHtx2CnkW2/o2268a7dZLm2txyqctyPctrg/i9Y9Bz +Uc/MNYkfFLtVVn0v9wcfewRt5zGYW1/z298y6ul2Pfy8MPpbELRT1J+K8sqg +f0d9V9Y3+h8fz+9GfWDQEOaNTIJ2Qf7WhT7MK97tEbRf1B+P8rIk2ezvvpB1 +1+hvQFCP+G1kPB8aNCxobjwPCDos6s9GeVXS+lyatCbw807QzkH7Uo/3VwTt +E/XhQQcGHRR0fNDBQYcEjfA7np+JtjOSeDnBvzN2S+sJ+vRz/L56lj5j89ju +JoyHHkR5WtCxyCboxaiPCzqGd0Fjg47285igTbOeByODoJOiPj7oOPM7Nd4d +F232CZpgXuH9nKBTKr0bHm0ODno56legC9F2+aB1glYOuoX5JY13RtAUjw0v +U13CYzvsPmha1M82H4xxVtDJ/+95uPloG22XCpoU9YnmC5mNi7HGBnVBRyr1 +d67HbR/tG6CPSbxchM5FvTU+NOrnB60dv/fGh/ibqZbpWth00KFBl8bzTUE3 +V6pfFnS1v7/AxDeT0avoe2jQK+h0lFsFHRn12ywvePws3r0f9F7QoUl8XRd0 +WNSHBf0d9RuCLq7E14rBw3JZz72iXCPohCTcwD6xS3ADX4XPeq0SxuC7H660 +JrcGrR/fNQl6kLlGuULQVVG/q1LJnJ4KujfoPpfXmre7/fs1/o131wd9E/RJ +0MygJ4Pu8XfI4cMoT0V/on5EJX3dGZtm/lF/NOj2oDuQe/CyX9CdUX/E/CKz +x80f48+q9PtdnlPHaN8oaKHX54GgVeJ5pSz5gW34cvARfAJrwKsGfl6tEi6B +T03MxxkBujOi3CsLb7DFnYtkCy6DXbsbv+q42KoS3oJXHbwG6/i55r7BQvAb +3ARDwf/G7mMF88lagqnYPPYOXq9lPukDrGhbLcFgxsYfgL+/JK3HTK/P4qCP +K8nmWq8JawMugVn4dPw4uIGvBGPBqDpW4XN+TxoPrOoU9GYlTAD70L9NPP72 +xtJ27g88/MtxBDFF70q+DMwBe7on+eu5lfzmjtG+v7G9h9vBx1Z+hp+efu5i +HsDFMfHNYUG9or6b8f2ULLlvWi2JI7r6O3Czj+e7XhLOzfYYYE8dJynrOEkJ +bm1m/MHvg3vgHdgDJm+YhVPw1999gYHZOAiW7W58PzkJM/Zxv+DioEq4DR6C +i3wDpqMky2b5ymnmZU9/wxjgWB1j9/JvfA++gmsLjHXwRNzQ33LEn+LL8a/4 +/vGVfO6oGOddfFfQS0E3JOEgOAlGDXW/B/j5ufj96iScA7fATnzy8/Hu2iSM +mx3lNUmY93KUNxpP+e148/IqMrSPQC+2sG58gA8JuhAdiHKjoBei/nqUNyVh +2RtR3pyEcYd4fPo9yH3XcXi45/oidpLE7wtRXpf03QBjP/NdOgtvwBrGALPA +MPxW/6DRUe+d5N/nVYpFhlTShw8q4dRGWWOeYvnC3zj3tUX81j0Lw/kN/DvL +bc/xMxj9UiVM2cpYj3y2i++Oz/KpzHOi1xJMBndPr5ZgLXgG/o1xHcwHp0Z5 +vRnzzEqxHnqNTRHLdIlvNgmaAn9RHmuM75CFYeAnmDo96i2S8A8+6Zs6uNjI +MQF+Gt0F967weGDoJZUwrb1xDf7AOuoHGMvPdVtwF/8OzoBP93kM8AjcAkev +9tjDjKn4PHAVn3idv/+38Zx4YUySn2c88AKMvTzq+0Z5iDH/4Cysb1XJH+Gf +Vs3C0QerJdgJJoFdw4xfYAhYcrvnDI6BZw9Vwl9w67pqCcbC+93VElx72G3x +12DqE273lJ/pF+z8T1Dzmvq/0mMQgxGTrZW0V2Qft1o8bxD0mMcAU2eZ76Hx +fkjWt4947FuS2sBT86h/W6mf7yvF3EMq2eh3lez03qjvZ7z/otJ+Aj16q5J/ +xV9f4vY83xr13yvtHXaNekvr+l1R7hM0P+qL/Ds2BTaC5S2Clonff6kU43zu +9+D7A9hx0FeV4q8hQedVimkXWJc2AaeS4uT7ovyrEs/091mlmOnoeN81KX5b +OsqlkmLdlf17I+vFvtaNO+L3vYLei/qXUe4QNAcdiLJJ0NuVcPMty2FTP4NJ +P1SSLfI6JtoOcvsto2zoPsEJ8AKc/MNyYQ26+3f2NX8ydqWYapt4v1qSH9o6 +yuUtz15R/reSvzqcfUAWf8jvDcu2t9uyL8B/7eJ+pkdZ82/3RLmi1xrZMCb+ +EHvBtvEp2HsHYxe2hE+73PP4wrpBXEJ8cmPQ134mfrvJdd5vbJ6P9JwXWR/w +A59WsoeZfsaWqqT3PF+YFGsil8ei/LmS/qEnDbym/awv+MyVk2ImeGmU1Bex +7YNRLmsbWM86zB7zfvfD92v7d+KclZJyK59bX9Cr7HWmHWvd17qHjjW2PjMk +c328aI0YB57nWmY/Wk+ams/7PQZjsYavWY9f9RwWW47DrcOs0UNJOs3cm3mO +T7vvn9z/T9bLZ90f9kZT9ibJPp91KEn2iV7nJLv+xmuA/O+yzmDXq1gmK1kO +y9ovHZGEJcj/xKR4kZgSvSSuQ09/sYyQ453W53nWvRWsf+SuTs6KNX/1GjDW +vdbVFy0n+EDXm3us3h53ZNK3DbP2fWDLtCSMBSu3iXd9gibaHrAvYoN/RXlE +vD/StrSq7RcZNLMuLvaafez3jSzzxdY51hFemlsmyKNN0v6U+Gd+Esa2dAnO +XlrkH9AN5NvS75O/nW7ZHp6E02e5BA+/ifLrpFzCUUn5H+RAubbr5ADbeS1q +Mbc2WXHQt5Ydbdp47RirWxLewD9xQ8qy8Z5Rds4ap53H3MS6xXi0IY8EFhCX +U/7mOr6SuISYhLiH+BA/QOzNN7QhfscmscfZfq5/t67ffxLltkk+/Tvb8GyP +tYF1+IKkeJ44d57bkk8grwJekPcj1sM/4hvJBZITJI7d2u/RSeLTjc0n/G7k +OvEA/c1gbkk4hE7Sdyf3P5q+zQf1jp7jc57zQPPQy2MRJ4MB+H/myf6knpPa +zO/B6M0tB/RlS+vMlv52rttu7vb4n17m+bYoN03Csu7+9j3bbjevNe2ZLzH5 +OMsNzP1P0p6Q/eCEKE9Jyq1hS1tZhke6foTH7JmWvOvpNtj61p4vz3unJTmv +va3zjAPmsv+8Own/sFHsvo/l3NU6gL+l7Os63+3oOb7t+g7Wa7DhdNvmQOst +680+gT0C2PhJ0VinJu0LiLO7ZbXhd+Kl5ZKwi/62S8ILfBZ7idEuwamjon58 +0nO9PsL9gmG04buHk+In9GI78/mRfcBuST6CtSTniS6wN93M+1P2n+xDiSl6 +W7ZgOvHLnv4OuQ62bN/zb7znd+rPV4rRBnuN5vuZ+gDbHvqGr2R/w1rhSzcP +HnYI+jgpzoGPdpYtukT8SA6TfBHlfl67c/0eG/nQ7WjD+IyL/2Nu7HX/2Xsn +6S5r+mZSfExsjNwP8ZqyV6IODp6W9MxaEBPub90Y6jpjsa863N9SHuH6pKR2 +tDkwad9CnNnK7ck54pPBTnJ62Dc5CPb35Emod7OOgUNgEPsW9i/sD/hmmN+d +neTH+W2Y+5zu98NcZy7oIvwuME/net4Hm+c1rVfoGBg63HI42PXRnvvRlgN+ +Gh/exfj6R9J5ERiwVZQ97N8p8fcjPRfshXxzzdhBvmik37e2DFtZR9CPUZbt +QZYbeRViaPCUc5Ajk7AA+zjedjHCdeZC3+RF4Y+xyIeRK+3queCXwOy+Wfv7 +Ju6/l+fLWg6xXp5sG2GfOM7f4pdP8tpR4qP7WM/JExMjnE/bpL1lR7fhO/Ks +5JmvqhRHbJ2X2Ad18gHgKbryUaXcHOdanCMdl7SOrCd+lLOPkpVz4HlIJfzi +eaDbTPB7fC5tu1oOzAUcgs+xnlcX12dU2u9Ptc5M8zP1ev5oJ5eLk86j0JnT +vGZnJp0bDM9qc7rbj7LckNWZ8dtJQa8lxVbbZ+Uz+GZEVh+nus/Rtjue8av9 +Xef9Ge6ftZvqsRfYbrCRi6olcc9029DZacnvZ/s9fgWMx7fcnrQHQ99mWu70 ++WjS+SJ2+khSLpg8ML9f5LUZa5mO8fqfb9mSI+N8Z2ilHBS5MvJSnDc0dJyJ +flzgtSOvxhkT3+2Mz87a92G/7FuwU2LOmeYN/4TPwi/OSjqXwueT8+Oci5wg +sdiOjsfQac6nBhsLOHOk7XjzQPwD5rLfw6+DORfavtiLEHcSMxDn3m5ZgYnk +9IiJwEVyhrwjv0aejXfgBvtksANfQO6OfBg5QPKE5N/A63s9l7/si/E/7IeI ++4kBaEe+jr6RI3lF+iCXtrnzaeQu3krKX4AP7EPACLCa+AC8rvk9c9zP477o +ce8xD2BsqilOJL84J+lMDR8Prlzp+b3kOSLXJyxbzipneS3YS7GHJHZmv/iQ +15F5v+C5X5wUMxEvsa8C45/zXF/0fNGDJ5PWkHk/77mDqdgRPhQ/N9S619m6 +zbx+sx6jw0Oso+dZN5+2fhIvPGWe0dPZ1lX08Rnr5DGWxbHWncetP+R22GN/ +Z1141/oAv++YZ3K27CN2de4SH0Dsd3pW3pmcM7HwXOsPOvKG9aSB9R8MR+/x +Fey7Pk/aI5EfZp9EHpAcIH296v4Z5xXX0c2X3T/nDTvbvsi/8S1nW58m7Rnm +ub/3/Z6xOLer78fme6wXQq8uyfIFDUJfLs/K232KTyuKoeb723p/n5ln9mHs +xzjj4a4HZ0OcEXFGtX98Pyir7eduv0s8D8ySLbyfAI7Yh6ID+LF55h9/j/8l +1iLm4izpa4/1tZ85u2nr99SJobkXwVnPBx4X3he6j91dLkxLYq6F1nnOX8CF +npVy0m2Ns5wXcA7CeQhnQpwNcdZBvED8AK7z3eioT8jaPxJrgPnED3Xfz50G +zq04vyJvTF4XP0/Onlh7I+MoeEo8xtkVZ1jMhbM3ztQ4WyMX1c65KfomP068 +wXjJ4+PXiJmJnUnecBbDuQo5LPJa5MIPzIoxmhqnweuOlfKvl7ktZ4zImfM7 +9hXkB5ExuVvysau531Yeh/h5R++fuxrnsU1yXOSoOdtEP7gLhL6QYyeXXM+P +k1smN904q39y0MwZvUIG5Nf4nRz2xo6VOBfb1mvXq9J80LtJWWecnJlyT4cx +yOfXx2zicRljPY9J3pn5M/dFni9xOGvDmQhrhf3jB4hDwUtwsLfXA9myPqx/ +Z+vAjEqxEzEU693e60+8Rdw1xOMssmwPyjoXZC58A28zvM7tvdbk+leyDjH/ +FpbH8p4D/F/mtVzH7RiT77izMA4ds34TT060jhLrorOcQTHfth6H9bve61O/ +R8CYjE1Miw0w356mHrYLzi6JaYljR9h/1qzjYB0xJN9jR/RHvHBi0GlZPp5c +FvKd6Pf4DPACrGRfhZ10t92ga62tb/y2vdviU/pl+Rh+J0agDWvGurCGxFH0 +2d1rspbXBf1aw/McnHWWhPzYH3ezPrDeyBObBDfwcYfbFxbbLme6k7N8zJ/2 +BfiQydHg9yxMwm7wh/j184NeLcKkKVFemrWHauu1OsFzGGA765Sll+hke+vZ +GfZb+K9drYPoEfPtYB2B92Q9xXbxzf3MP/qHP0Mf8SVv2xfjU4hdeabc1rqK +vPpYr5eyDo20P6BvYjv8BP4CnpA3cmetkHt934yvQjZ9bcvt7YfQkbqu4avY +Y3Cugj/FbyFTbB6/1tR6U49n8a/wwpoRr2brwSDjwGa2h8FeX/wu9wY62X9w +X2J/625930YbzvXbVMIE9sPcLWOPCa+9K8kDuUyyLsPLEOsm8z7R/qx+boCt +449mWGf5nbXge2ymj+35Zts37ybZDvCXj9qfdbb9tbc86/t14gj2L8QszAu5 +LmNdpB34hp6Otq5ihyNtlwNsW0/bjpHBmraPDvZDrAt3GlmPv5MwDBl29DqB +M/gQzgY5fwQH6ndJsBdkyTN9sLac6YBRJxjfsUfky14Z2XMnsmcl3z/Z2I19 +1e9C4hPYQ7KnxOdzNsnY2Di+5zT7Y85uOUfFLtg31u+FUXKueFWls9Ep1m1i +cPbinDty74dzSM6YuXvGnpMzI87XOAdHVsSO7BvABfYxHSy3kZ5bPQeBzqAn +8MXeirNeznwvsf2eb16ICTlDZz+KT2N+7IGW8fjTrAOMQ7+DrL9N7auw+wmW +7YFeP+TJHZrWlWwe2yeW4gyDs4w5tmH8MP6YO0LYBfeJOE/k/IyzM84ZuXfE +/SPkw/nsY9bP/SwveN/OvoZ7X/Sxh/mDH+wYXlpV4gdeB9tGOasgduYM41LL +6BL7skMsc/K+rSKW5dIyPO1rHlkzYm/26/hafBNzot0xWd/hX8fbF+zjNeU7 +xhzhcYf7N94jI/AambFnGmm7QV6cUSI/bACbwrbAeeQ5xnaIPeJ30WXWAJsh +FhlmebFuu1s2U/weP8F5EZiJr+lrPo+1Thxv2SL3qV4HsIl9CvgEHnHXCBtl +nUd7reH7RM8DWaMrE+xXB5kHZMaeY2fb+GT3N9EyRZ7MZ5Tnx3zGen7EM1PM +P3vT14v2p2AB+z9ign6WCfMgfsH+sNtRltMulgv61Nht8WvYBLLBPu70mrP2 +6APj48/wD8imnr9h3vgOfkNfWH9yr4M974lewznWqRFec3TgAOsudnCi543c +0H1sAN3d0LbQynqN/LC1yZZ9J+sa4/S1TpELIieELIl3iAewIeY0K+i0kNlv +WftLYjP8FncFwRTmhBzBLvCJPQO6g68nFgan8I/4e2Iy7B9+/lnbrH0bcqvH +j+gpecZetpsFlfhD1+ARX4NdkNPhN3Spl/3x/u6PsfFh4NuNXgt04m9jUT+v +63HW40nW2brPGGl9JCdxQsx9/aK7iUvHenUsuo8wIMr+RffQRkX5ddb+fmDU +L8y6V/ZP3sv3IJ+OslNRfnqXKC/IupNGrr1R0X2UkVF+lZWHGhz1m7LOMZAn +a85ajo7332bx9n7UP8zKQxwd9TlZ2DMm6t9l5SpOivo3WbmWmVFfvijHMDbK +77NyFVOj3rjo7sr4KH/MyrWcEvWfsnIq6NtO1g9sFL9P/DnGdrzIut3J/ol1 +5N0c69sUY8Uw2xD2iB8BW/ErLUMOyxb/7yHqOxXdOW1YJEfyiJOi/DUrXzIx +6r9k5ScmRP3nrNwS/mi81/XkeP9DVu5nVtRXKrLbt6J8Neu88dCo35J17jQu +6v/NyuW8H+UbRXdt0GlianT8DvS2KLf3KG2L7gdchCyL8oAPI/uinNmfUf8j +KzdGHmGLor3tCjHHRVl50jbxrnVRniNH2b0o/3U39ll0V2Vj/FZR/LhafPtr +UX5jI2yzKN58LNpvWpT7mR31fYvyjndhD0V3YYZG+UJWHHVT1A8oOoduGn0O +KbKrQVE+kHVH4fKoP5SVY1s52vxp3t6Jcs2i89pro2xSdMZ5v/mAhyeiPKTo +PA857WlZ3RzlQUVnuvfgWz3Hs6P+l+Xzh/01cjsH31V0Z3vdIjmSA1oHXS06 +z2yGPhedSa4Y3/1UdNd7pZr6pc/22EXRf4HIWf1QlPdZPtqsV7SnWYhsaspV +r40+FJ2PtajJVsljslalpvVqG/WeRfmuz6K8P+tMAlv8ssgeefdF0ftWUW5Z +lFtk/RcX6cCqXHquqZ87sY2iHCS52R5F+VnWfJHXfZVo+7PbrFV055P80xdZ +8kJWM9H9ovzpV0VzJtfVruiZOnm4r4tycejLc1k6c3bUb8+658I5OLk58nLY +xJG2C+zmoiLb4Rzgkyz9/KXIHzH3j4t0FP08C9lnnYuyUb24KL+9ON6dV3Qm +fiu6VpQDfjvqFxSdPyfk5Dbkpc8vyk1fFmXXohz0lVFeUZQLfjfK+Vnnu29F +eXjROfeCqDcvykkz78+y5s59g+FFZzunF9nzdM9pY9vd9ehm0Rk5etrZunps +lMcUnYFhW2sU2deysUZXZeV6r8NnFp1VPY0fLLqLcwc2V3S+Dg5sX4QFD2bZ +HnZ3b9RrRbn2z6O8LwtHsBt8BLaD/JLlg+95JMv/LBc8zLI9TiuSOzLHH+xm +n8BZwVNZ5xjY65NZNnsJ/qPoftNrUc7Iuod3XNTfzDovOzPql2Xdr5xTpHPo +G2v7d9ZY+JXnjdnXZK03fH7DvIvin9uydA59e7Po3AQfSx/nmmd04Z0sfXim +aM0Yl3w6eVVyqsj1mSzZsuaHed2PKPJN5MPR2Zvt80+N+spF9zLWClmtUdOd +TvLy3AXhXB7b6mW7WyrKW4rudIDtdxXhO+cR/YrOJF7P8nH4t7OifmfR//ga +MNeicxt04XbrA/nvZ4ty4EtHeWvRWqBH3axLrP+N1gHWamm3IR7ZoCgmYR6P +ey455vFE0T7w8Sy+4ZlY5p6ieAY7u8G2Ni3a3F30/4Zl4tvrbFMvZ+EEGIHd +zLftrF4UfxB7YNPziuz6yqg/V3T/Fl/bocjfYjcv23bAiheL8OKKaD+76F4u +dvCKbQG9e8m6B96+aX14JQu/we7pUX+76NxiXpbNY+/g0oIibGoYc5nrdZmb +hRngBfEOvpWYB9w4Nws73svy+/h83n1Q9L5FlAuLzlrAW3wQPg3Zf2r5YwfP +WCffQ9+KzoeezVp71r1L0ZkHa12ryZ6x5e2K9A/d+zLLd+A3wAF8PX5+B+Rp +DMJPtPc9ZmyIvQR2tG1RLEUcxbveRXtN4g6wEH8FnjSuCVPQ2dY1yeeNaNe2 +pn3p1vG+TU17kU2KYl/mSGxCHEAMAI41qgnL4KuFedu8CIPBX7BxVeMasQn+ +CF+0WVEMBPatUjQ3vm1XEx/HGIebGYvx8eglOkkcjeyQG7w3NP/YKLERdvo/ +vbPVVw== + "]], + Polygon3DBox[CompressedData[" +1:eJwtlldskFUcxb97LyPEgjEKCkZQChjxAcOI6IMPChjUGIZAcSQKaoyRIQ7c +A2ccEcUiS3ZZtpSpQFtAhoBly6jspVhAECigUNTfyenDyXfO/d99/+O7qd+g +HgNjlmUFoBbomLIsB9KWxhtClq1BfwKmYpufudOn6HnQKWAJ/SagS+ibwGz0 +GPQ5bFWgEP4xGIktB2zA3gp9EN4CnIGfBEXwB8B27M+gTzP2cXAAvRu9Clsf +sBb+GZiNrQxMh0ewGNtZdA78AKhAr9Se2G9u8l73oG+GnwK5wXvoBL+OPtfC +B7BWc3FwDXoQeiX2j8As9C9gNPwDcIb5ysFS+Htgus4GlsDf1nraKyiDDwPT +4OtBCfwd3Sf8Z7AM/j6YAd8IvoR/DvJkZ/4Z8HFgPvoyeh17+kLnRzcE6+Ad +kt9mBbiMfXjy2GLsK+AfgpnwraAU/i4ogJeDZvAjoDu8G/ib8QfRvwbv6QT6 +FXRf5huHXgAfmsx/BAvhr4JvtRY4Sv+X0E/CvwFH0EOS33KY/ENz09ZV9y+f +QrcHt8NvAXPhLyfzJuAH+OtgQrAP6G1fA+OD3/h3+BawPfMc+5n7eb0Btl5g +OXobegm8bvDeDtHWP3iPndFNeO8HaRsavbfnaDuReY/z4JW0XY9uDeagu4CG +8DrgPPxGsJS+/6DPwnfSvwv6N9CYucuT72IIWAx/A0yE/wTqw98EkxRr4FT0 +nrQXnXkL36boXfC2YCZ6JHo93+Os1wD+FpgsX5DP0J6P/j7Yp++Gt2APg2lX +oO/Tl7am2B6SP6P3RvNmGo+tsc4Avx/sh++Ojk21HU72GfmK9rQPfrXuP/hO +N9O3An0bvA2oSp5Tc90HrmIvd6BHB9/ZXt1/cmzL589Ex5BiR2dqA78A7pJ/ +ap+KNb7HOPslcBG+irZtwTGay/xPy5+Cz/yCzg/2ojvojWpiWrGsmBgVnQMU ++43Q56NjWrGsmD0XHcOKXcXMs8lj1LcTqGYPjyp+a97jKfk+aIetPTieHAPy +fZ1BsbUcbAqOsUXYeum8jI3Bb9sPDERPxlYVHbOKVeWMK5VLadscPMdOzRV9 +12rT2CeSc7fmWJR8h7q71bQdgzdPzoX52Ack+4DevqdyaHSOUm5SDsuDl9FW +G14n+KyPJJ9VZy6Ar+HbIDhHqe9qUD94zCX5YnIufowxf0XvSXtRDPwLvxPk +ZI4xxaLGqK9iciE4ig7qS9sk9AiwDD1GMQR/WOfJvOaf0TlKuUk5Sb6yOLo2 +yWdK4X30vipltE2Cl0Rz1aiV8L7KUdivQH+F7p38Njtom4VeEW1TjarWWuh6 +wTVItWNtdG5WDTkZnSOVG5Wzxup+ks+imqpYbAn2B8ekalNrcDK4Rm2GFzPm +fOYzf4eeCjoGrzkCviPaF+dpTdaPtZzre9I+im+LzPnqj5rckR/8futr7mJP +9NvrTjait0b7bmdwa/Kcmkv/BFvRc6Jz3UVQL3kNza01lHsOR+c65aB26NqM +r4utkc6MbRqohFeA8dir0YXB/xCno3OkcqNyYgW6GH1vcE5VbCknKhcqxjRX +UfS/huasxF4QXVvkM/2T/zn0r9ESHEJPia7dylHynfnRcSwfmhj95npr1RT5 +wtzoXCOfGJx8Bu1dNaYIPS35rhQD+TUxrNhV/OXz7a78Bs8DF6Jrvmq9/hlU +y3uCwcE1XbW2R3Jf1dyLyTVNtaw3+Brejbbemed8Mbnmq9bv1ptq7uizykda +cfddaSvFVpQ51xyPjh3lnF2qLdG5uUwxr1oWHeuqmRvQhdH/Vvqn+w89PLoW +KodvQi+I/jfRGyn33pP876Qc/D/au3qk + "]]}, + Annotation[#, "Charting`Private`Tag$3144#1"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxNm3f819MXx7/4vO99W9lb/LJbhFQK0VIipaGlkjYaKFRGZFY2LZXslRJ+ +hOyyCdnZe++9fq/n97y+D78/zuPez/t73/eee+4553XuOe9vnYGjDhu5elVV +Va2iqmoNtbukqqqrRLeK+ujZn5Wqqj9E2+l3e9F+6m/p9hBRa9GeosaiA0S7 +i/YQdRS1EO0j2ltUW+9sIzpFdL6okZ79JqoraiY6SNTc77T3M947Db5Ep6p/ +htq1RJPUn6S2FJ0OP2ovVDtHdLSor+gIUQfRtlpre9GB6jf1vH+J+oiGi8aK +NtTfT1B7qKilaH/zUk9UXzRA1EV0mGhzjd1M1LsSMkJWQ9X/oIgx/UX9PFdn +0RDR4aKeleDh9BS/4a+Txw0W9fC4QaLu/r2zxh4i6qp+HfYg2s0ygq8Gli9t +Q+YWD0l0WiXOZ9dKjO/sPXE+ozRHJ9EbReynnvoHew3Oso3ofNEE0UTRExp3 +otqzRC+of4todZ/B8ZWQG2dwnH+fJBrhc1hWRJ/3X1V/uegf9Z9Xe4zak9mH +1j40hYxHiY4UDazEHsZ4Xs5+tH/D00iPbav3jhC9q/578K5+P9Gz6r8lWiU6 +1mcywPvaWGufp7aVz5MzY+8dUsh7V1HnFO81UvtiEf1TU5xJO9FGKXRmrPc8 +2Oe8hcZeoPZK9ET9aWpniy5X/wjRZPUnF2FrZ6p/ptp1RGcgX7XrFSHn8fCl ++W82r+N9Hpvq91S1s0R7FrEX9nS22g099gTzMtS63RCdSSHHQeYVOR7l3x8W +IR/O42yfFWf4lJ4/KbpUlPV+Eg1SfwPR+kWMHai2oahBEXqzUwo5ouvYMPZ3 +FfLVsz1Fd6l/g+hG0Z2i6/37H70/T+2tnInGNRbdov5i0bWi60TXwLOeX6H2 +ZssYe79d7y4SbS+63eN45zH9vlf0ayV80gG2gcbW8Rq/1dq6sI3GXlIJPpaJ ++mitfURLiphzkehu9f8rmo8tiB4RPSqaqWd1RJep/1/v7ybRjno23fzcK+ql ++ZqLLk7x7grRc6IHRQ+JlrOG6B63PTVub3ytqEWKcdehY6L6ootSrPeYaKl+ +P6D2GeajLzpStInGrC1aKwVPsy27evrbzqIZPoOZ1quLc8hqD+9jlt/ppveb +peCrt9r9sQ31n/Te7hN9VsQZLqmEj59gP4/fxw/jz2t8Fj7sA9FLopWcgd7d +tQi7/UL0ZiXs9/1KrPOSW+z7ANHn6r/hca+JnjAv+IM29gmf+m+viz4Rverf +t+nvZ6f4vaPajimwbAe1B6XQW/w7mASOLdCzfVOscVERY8GPrTgDtXOtR/gR +fMpHopdFr3AeGvO0aLH9bSuP5W/fSdaPmz94f8o6ir+uwSJacALcwqbAkNNS ++CN80R/W570qId8OHofvBwP2dQt2bOd9guPsGxw/2GNaeK/sGXtGN9+xfJ+2 +Xq1yi3/9vRL4Daa21jwtU+hyXfPRzOe6zHoNBu9g2db3es2tNws4k/9b402f +52s+M7BquGUOHtYzXuHTwS4wpIt/48vwP5wjsQyxAFg0wrIDY/Hjp9tPHe53 +8PH4QLAXv4h/HG98v060VwrfhF/6FJ+t/uwUeIifPqcSvhO/eJbXGOy55mnc +paJh5g3fXBMXDPG4g6xzvbxPdLKu6IYinnM2D9kfgx1gIFgILoBXjYxZ4NXJ +3gtzgwdgFNhzrMYck4In8GCM1z7ev8FYsPaUSmDc+cYmsG6S56qy7z/Jekkc +09d62s+/PynCh59gng41rrLeaV7jKK8/2uszf00ccbrH4XfwWfghfNbN/j3L +z/BbY7TWaNF/RCPBatG2oq9FX4pqi7qDT+AYcYeon2izIuwXDCF2HCz+pqew +U2QKroKnWxdh39j5dPWPE+1QRMwJT+A9vuso+69Jlhdy20j2/XQObO4haita +U3QxOJrCl+xSBK7jf3upPQifXUQswf6JIYgl2DPYT3w0yuffU88PFK0r6irq +IPq+Ejj1i20KvMK+wOEmKbCY3zMtPzAYHACjwCrwppv9/KwisG27IrAMHAR/ +wadrNWZaCowFIxf6TMAjcP5pYyLrjrcszxUdpmftRd+h/2rbidY2hi8UXV0J +XsB+8LxpinVvN7/MXRM70N5RCT+KP3258m/cg64S9wxwnAZ+gFl9jB+9jV9g +F74Xf4OP72U//3kRfou9gp2MwVeBw4cbi+EJ3KYPJk8TLa0EthMfrPDfWhrD +0WvuLOj2wWr3sk4u8NzwMke/p6C/6l+mdy4X/e25znLsAM7jg/GX4DzYj4/G +1670Xu8wHw9XIj6YnCJe2EJ0o8Z/VQl9BWtXWXbg1od+H2yuwV5a4ut2ere/ +6GPLDNzCR7M2PrsGj5mzBp9pP+NZEXjMO8RVxDbwi54tN+/we2GKmIo7X1GE +L2L/yAP/CW5fYuzev4z9LjcfzF+D8+dqzDkpZM2dCJ/TEb8kqoj+LsKX4cda +F3EnBGN6q9+oCGz7Se19ov3BH9Ewx5PNbWeXmDd8O2d1G2cp+lbPOqvd23oO +RjIfmHiJ7Z/1wG7u120rgeVgBvgDVsEXePKReQTDuhXBK3co4sgeKXTm6CL4 +BpMHFKFL2H4br8H8uxfRJ04Yxzt6dwSy1vM7RD/o2Si1LUQ/VsJe8VvYbCe1 +TW2n+Dfu4OjyIWqb2Ked6jPjvLqo3U+0kWW8mjHjVrV7FHF/xD+u4/m+qcS9 +gjEQ9wswlPe+8bPv1b9HVFc0VTTYPm6Y9jCUu4V+Py66zPI5VG0z+8aPzQO8 +fCV6q4i7Fjhay7xgg8iziTG+uzEfmyb2x+b6q79vEXcNdIA7w8WV0AVwBn3g +zMEM8GJcirsf2DvM7+HfsHt8es1dbnP7evYAtuBjORdw7FL1r8X3ivYpAsc6 +WofBii6Wcw+fBXjR3b5lqs8UbORuMlvtWMsQv4x/5i7DmdfxWsyxhecB38A5 +MBL+eM4z4kPufc+rf0ARv4kVwTHwbEolfDi4wt2tZRF98IX4Hr+Dz5llXuAB +Hw/G8F4/2+kUz9nYewFjdyvi/c29R/jknMHymhwQfTC7sWXFu+jjjpbtrp4H +PzVD7fGinUQnFpHzwlawV/xAXdtyB591F8t9unWsvc+aexl+Ahwc7bO6zDJu +4f6x7iPnntZPeJ5QxF0aWYKJ2NoFln1Tj3m3iLsu+vejaITXQ67Id4bP+gqf +N7mXN4vwJavUjpYuHieaWIQciVnW8t2QewdxzX6WD3d/7Ag/0cvzT/f57Oc+ +69bz+W7lvSAH8H1v98F2fMSaPquDfV5t3Qf78C0Heo+Mbee9M0dny5zcEX4P +/8x7bT1PE8/P+A4e/5314VDzgM428RhipOaecxv3sdmtzTPPf1Z7stc70Pyt +bT1qY11q7/nX9fl0Mv/k1a5OcV95TzS0CP2+UDSkiDt7O58x/LA+POE/OLPR +1pMOfg4/+A5yR/iqpn53bcuzu2V4VRHYgN9r4+fwCf89zRs41bcIHEUHR3kt +dLmXz7Sl+8SfpxSBKbtUAlfo/2YcwUb+sJx7Wg6n+nkTn0sPn3tb9zmvc4qw +bez6CvMA1qwnmdVKgV34ddrb7FuwC/zLue6/XYn8BvJcaowiLwVOnVeEbn+p +/q9FYPavxg7OArzAp2KHl9oeR5oHsH6Ex+NvP88R94LT4HUfy+Boy6SF5/nR +/op7BT65sfdInxwUfh+fP97n+5P6G6eI8WruV+f7fJHfiZYhOIBNXmHfRR8/ +f0IR/oozauk+tt/aegu/P6g9qYgY73i/g3+rzp0Xgd3VeeIicLs6j15ErIQd +YMPfWd+2tK7CQxfrCXsaVwSecSYTfC69rTeNfA4TfRbsm/3vYx1BV4h7VhhL +wJHvisAmZF6dH7VskCV6w32NfCe5TmKT6hihiDiB+cdYtgOtK+ATsf9Ax//w +g37sZllzj8a2HlH7cBE4/7JbsP7KImI15Elsjw1jv4zn90Lb5WTPV53HLSKe +GeLxS607F1l/thYvW/ne195yxkdd6DkZj48bk8Jf40fIAZCz53zxg9g4unmt +5Tm3CPvn+fVF4FB9z3ed+cTu5xVh+8QR11rOPJvj55d5rn88hnsf/oH2Go8n +dptfRPxGzEiMgh194/4P1g30Hju61/2rPT+4cqn5vsbzL9LerkxxV/9Zv+9U +e7lxk7XnW4fB6RnGWfYJ9oGFt1sP7y/iXe6Q3OHJN3OnXyiakYJfYnNidHI1 +i/wua/GcfPvuppNSPGPORR6zvfvs5VmvQ8xCTDXL8kF/Z7s/08/nW38esW5h +o1dar56xHJHhLL8LXpRa/6Yi7ml/FJED6mi9wveR111iveV8p7lPnPpcEXKH +T8ZxP+R+BnFP5M54n8fw7sOei3dfKcIGlppvcgdXec5na8ZZLgst7/stH87j +Ps/JHW6y73Hckbkvc49/yL+52xPr7pEifufex32V+zx3FnL0e/nc8XGbmN/7 +rFfkLogLiZ1Xqn2piBzct0XcBU50jgP+wRHiH2pP2NaT1kNim9eL+E3/cY+h +/1oR8dOJ9hOMmWxZPeI9EksNTzE39wnqZGd5ztf8G51/3HOSk+H+8ov5utu8 +3eP+fMu/+j5fCT24x88f8LnznBoIcgMXlnv+f4wh5AfxRegN+oP/v8F6VF2v +LCJfif4jM3KF5GY481c8/1LrAD6wJp9ILnFFEfW/1Yt/fSXjl1g3sIVbPOZk +91f6XF5yn+c1v1mXezK2dmSK/MAaKe7w3M2LFPe1hZ4ffQbnqUOB9aupvUB0 +Zgpf8bTt6EXPz1p/FVHfgn/yOaunyBVgc9jeYs/9nOf/vYj6B7WP9XyunCk5 +0+NT6EC1HqW4P3PW5FTRjz+LqAGTS37COoD+jPS4cZb/20X4UXwFMSLnjB96 +13aE/FaY/3vNGzJeM8V+nreOVJ+Xxz7v8fD2qvW8QRn3XmSIz3vH586dH57g +5yu1z+S41zLHX5YVdZyqFLUcdPB76y1359+KuNNWx0pF2CN4BH7j97Br7JD4 +hZiUeBrsQub4eDAC+6ykGMc8xF41/uMnz4n+/mAdRmcWmP+V1uEaHbvVOgmG +1PYab/s54xdbN/BjxFDkcImjhnpfdf33Z6w/7Jt6JHtHX8gxoTOc/zjrALmv +tXxvIt7DFxHTEseuL7q/EvEsY8jFoMucB2exaYpxjKGOgB6TY8QGTk5hE4zZ +5P9i4lqeB9mv65wCeAvubusz4WzW8/6/tpzfLwI/wI5f/Ly2beJP6yrrYxvw +QOy9jtck74Qdknt6ixx2jtiL+hR1Pep7G+jZkznWJV4hbuHOSc15ruj6FLV8 +6jXUbYgziMeIy3o5d0WudYj6g1LcxagTUC8gvz0lRZ2KehW1HGo61EeIiaiP +UHcA48F66rYPGGvI0VKDJJ/T3LY7U3RDitw+tRJqJuDXUGMQNSRqSeTX8f3Y +CLYyKUWuu5n9Pfvj75wVvojaODXvrsYucr3kOMjP3uT3m3nP5C+RwSDzy365 +B4y1XKhbEhOTO2YPz3pP+xtLyeMONd8/23fiC+HjFst8vM+Bez+8IjtqfjU1 +QFq+CblZ/TnWaXwmMsEnd7JceZ9cPrUAagL4dzCcOAHboI7QxHzBX2/zC9/7 ++R1yvMwxz3vmrNgDz8kB8y0N+WhsnHdaeo7m1o8lXvNwr0tuh7oSdTjitC7e +/1uWO3VIcvh9U9RVWaOP14RX9OHWyr/fMFH35Gzmpzgr8n3k/agzEadvadnR +8ptaKbH7Vn5ey3aKnYOvm1k/eYYNY+Pw0ct8Ue+kBkotdD2PqeX1DvP6O1uf +unmv7Jlc1tpeizm5P1KfQ2/A9i28Pt8rUWffxvxubZ63sKwZMzVFPRJdpB58 +nmii50IXN7YOYcPUUo7y2YPD2B/1yw62Qe4nfbw/9rnEZ/uYdQedQJfREWxv +VgpbxLaWGSPhAz8BX+gg9okeYt/UF9HFQywPfAln+4rlil/h2ZG2n6+9B74B +IB+JLVGvoK7xivV/gveMP3vKPo19UX/l7G5M4XewG3wEfmiC94OedLM+Ypfo +5A6aY6sy8LOr+puW8f1EN/W3LiPvjB8+P4cvHql28zJq/Hupv2UZvvZOzblZ +GXXsnjniIWolS/X8P2XUZx5Qv04ZdZUetg/0eWuNP0bPr9Cz26iFpcind9Oz +bcrAsyPV9siBOV1tB9hldz2rXUbO6dEU8RRxFfaPH8EfEOvi3/Enr9s3cnb4 +aWJE6u7oAuOJPfDHi425nGN13d5+ouY7DuyV2thztsGab17QX/SLbwj4ngif +2tZnzfcT+NmG1teh9oFg5gLvizWJ/alNnuF50dlbrc98h8jcdS1DxoJDnCl3 +E3jCD1Pv4hsSsIF4G59LW3PvQRbDLRtiQORC3AdmHG39ph3u/g62f/RsnG0B +H9zXPneU5wGniDfBIuTKnqmj4wvmWj7YOXMhf3QfHcWXExcwN/EVOAFGVPyb +PjgBbhFr8E3DLbb1sSkwGDw61zLFv66wLLAnfO14/50YYqzHE29wv15kHeE+ +NNy2gs1Qr8fe8DXYH3EgdfaFlivxIncZ5ucMifWopVFTAxeQKbK6wXv61jEm +tT2+43nVZ8sZEyNMtH3z7Qx1N76T4XuZHW3X+BTOhFgZXvE7+J/NPAffhfD9 +DN/8UGfsa9nzTQN1Ic6U2Hm5Y1Pqs/DLHZbaLPXWzc3/PMuAuit1a3imLvmx +x57l8fA7wTy38rpnWxfQCWSAb5rrMwMviEmILS702nd6nclei7vLHOvYbNsC +/DNfdQxbxJ7hcap1h/HEkfMsD/bBmqzN78t9Jif5DMFzcB0ZI2u+r+Fcp/s5 +mFqNrZXQjxnWs9qO19Eh8uXoP77jRp9fS2PCXPPBHtAB9oRds3dwGkxd4DNi +3iuth4O8Frz0tyxvsw7NtDwbWJbXWfbEtazLb775aeA1Gcu6fHeG38IvXGrZ +IItJ3h9n0sP6hhymeB+dfFb8vbv3ia9k33O8J2TOuXGGd3kc5zXNutDKe7zS ++0RuxN981wjft1mn+ntPDXxm7GMX/z7bsmjlsbxzjtfpbt2YYdkN8dyswffa +p3tP7S2jKT4rYhDiBXIP4D7+u+bbSVp8PX4M342famB+4A1/RwyB/wPbwXhi +H+4TK1PcKW5U/+UUud7H1X8pRW74JvVfS5EP5vuaV1PUAR5V//kUee6H1X82 +RW77Qb7DSZHzPtJ+k3h/T+HeZynyuMs05oUUedxOxi18Br6VOIB7Cd+TgD3E +LHzXiD/ju2xiHGIdvitZaJwgbgIHwSRwlr/181jiP/w4Ppy5BnjuVj4jYpV7 +xc97KXKcH/ls23mONp4HLCF2qf6uLgVeIktil4k+I+Ig/Hdbz9vX6xAjgoVg +CXiAzwcfODtwmhhulHjYoozvuvjG5rEUcddSYqcU9f7r1b8ix7cas9U+kQJr +uNehu9jnq9wTU9zTsZ2/ve/OmvuiHN8qkqsgZiJeOixHHoZ8zD0af0IO7LtZ +7fY58hnYCjZzoe2v2g5T+A3m5pwmex/Enz/miKWIo7jTH57j25Hv1d6fIj96 +WBkxFvEV8kOO4BY+jBiF2A+fAMYSx3YpQ0bIh7jp8+LfvBRtzXeCn/p+jV8E +/4iN8P3gK7WPH3LEfK9bZsgOXNtW8x+fI48LbvDsE9spuMtc+Bbmhr8hxI85 +vq+daR6JJb7KEXcScyLXrv7GF7+HDjeyryAWGGqcaejfDyKDMr4L4o6CH+NO +0kLPRuT4ju0h0fZlfOdzu57tn6P+tVJt2xz5ll+xjRzfc/ym/qIc9Zo7cvym +v0ztwR7zeQr7x/Y/Uf+6HHWM17GDHDnhj9W/1vMQ896QI+7dTbx8lyJf/kUK +f4GvQDcPyaGfi9W2yFG/I3f1d4qc3BL0MUeN4iW1DXPUZt9XOz1HHu03tQ1y +5F5qaa0FOWqNf6rdJkcd5WW1VTnqZNTrf06R62Ifn6bYy4vYco766Z1qZ+Wo +0/2udrccOTTyc1+myNH10Fq/eJ511P8hRR6Lu8KkHPnT/np+YBm5qTuw+zK+ +OR6jv7cvIx4kBuxQRty8GB7KuAvvqTHtyshjNlG/YxlxzwFq9yjj7tm7jHcY +30v9lmV8Rz9Y4/cqI3/UTG2TMmKKPmpbl5EHbK8xp+boDyhjXubkvSE53uU+ +9HCKO1Ej9b9Oof93oxcpcsBrlaFP6Ak8fpuDz8PL2AP891S/cY5c10BsKMcd +elAZ9k9ub48cMkI+o9VvVcb9kTvzKTn2+HaO8yM/OSgHZoAXt6hfP0csc5Xa +XbK/ZcyBQ2DQCvaUo5aZ1D6Qo85a5PCh+M83cvyN5+9gyzn+tyPnwC0waxXz +5agvonefWvd49oifv6m2zFHfXTMH/oF9PHvIz+uq/TjHdwHw9Zh5q+ADc9SD +qQfumEMOyPvZHDJfH9+e/X8qOfAYLH4hx994jp7el0NXd5GcnsvxrdYG3I9z +1FNfz7EeazXV86E5cppviF7MUeetpXZ5jtrqujmwGVyuxznnqJ0i748s8504 +8xzfPsxTu3OO7w7m59gz+71GbaMc3zus0lodc9RJl6u/d45697vYd446ytU5 +1mOtX9U2z5FTfUbjD8jx3cWcHPdn7s7PoUc5vnlYoX7r7O9ac/gpfNTV+v1a +jhrq+tp7nxy1wNXUnpsjrsbuv7Dtg71f58AXfNLn9kvs70PvEf/0mX0U+/vS +e8Smx1qHv1G7JEW94Z8Uvgm/tLHG9M1RP4avbc3bjnreO0feGl0YbX2Ym0PW +yHlYjlw3eSxqA+SOqWcdp+eHOOewSQ49QAfG57DPD+yr+pXhrzqrv1EZddHT +1O9bRm4aftctg2dssbd91ON6flCOb2bwJX3sW/CvJ+fwjexp5zL2dbr6R5RR +2+Dv+FDGDFfbNEetg32cmcMXnZHDh+I/wd5OZfifiTn8Hb4OrDg0B14MyJFn +Yb8noQ9l1BDqleFnyQ9zzjuVcda36/cmZfy/Xq8cfrni+TYsY06wa/cy8OtA +fEAZ+fvvU/h9fD64ukYZ2LpZDhvDvsC0X3LgGjr7s/WWHBIxHPFPffXXtv9H +T1crQ1c/ABdy1G2QcVmGnHmWy3iO7v9j/ceG1izDjvZW+0eOmg0ya2S5gef4 +a3z1hBx+GZ9cOwdegpXY30+2QWyoqgw7Io74O0cs8bZ4+yv7+9EceoPOjMsR +h2EjddlTirrUOXo+tIxYbB+1d6Woq4O3q5eBuT+lwG+w+2hspYy6E/rLuXKm +g8vIr5Fb649tlVGLOy9HvEWsRTxSKSMmIa6cmiO2HKFnk3PEhdvlWIP5sS3q +QdgXuHRwGdg0Tf1RxiZ4f9SxZL8ce4D/4TliL+KuY9UeVca32rw3yO8eozH7 +lVH7Zd+7+l3+L4E7G9/VgP/1rQNH5dB7dB75rVeGDE/MERMTD9fJMS9zDtOz +rmXkM2kbut8sh11hU9jTAOP7ETnsAVtANiPLkM+UHHv4wPEz8kJWx+bAYPLX +ZyO3MnIP5FCHea3/AdMhp6c= + "]], + Polygon3DBox[CompressedData[" +1:eJwtlnnQV1Mcxn+9/e793tSb0or2kjFNGZXCKIRK1gxmzKiUUokMUyFmhBaE +0fKGaaGYQskgSTWGJkXRnrRqeVNvadGuVD6P5/fHM/d5zvnee773nO9yGvZ6 +8t6BRblcbhbIg0ZZLncscrn1iFKwB74kzeX+hndOcrnq6O3ge/jroBP2R9Eb +mV8GGqOfQW+Cl4G9vPsb+n1sHwKT4BPBCeZKwMXwumAKc+PBSuw3o1+CXwCW +ozeiX4Sn4Fd4NxCM90bPgO+DV4FXBQfhV+LDo/Ce4Hf0VmxGynewGr0F/TK8 +ErgZ2yL0c/ATIMnso3xbhG0D+DZwI3PTQRPmu6Mz5j6WPzw3oYfBs8T/WgIm +J/7nM/By4Fn4UVAfvgEUwaeCj+DlwVD4cdZswfcboT9JvMZu+CqeFdEdQQ+w +QGfAWDvtKfZD0bvg/4JL4GtBA/gEcCnzPdAVsF+J/gO8gy5Fj2K9kzyvwOYU +44+BO+CPhM+yInPfgMsYS3ieK6w9P7y2fFgI6mfe6+W8UyHznmmvmoEN+kb4 +rC7S+cJrgjHwsfIHXhuMSxxTZdhXRg+HdwM/FHzQ2rtBV+Z28ryK5/Wst465 +u+D/MHYhWItehX4FXjnxtxVjii2tcR3+PYGug93b2h/4OlBN+5L4LL7VtxOf +SVudHchhX4ZuBz8FjrL2wcS+3J63L/KpNt8fwrM7+h5QE30gzG8CNdCvFXxv +Dhqij4T3TjlTC90S3QHeFbTPHHOKtRmgvf4V1IcfAj/j1w7FSOKY+gleNbwX +I0A9eHXe/yBxjjXW/oXjYDZYz/urw7bKoWbwTuAkvC64AX4aNIEfBo/zrbmF +eJ7Au4vBeO0Zvi5VvsPPMDYwsY/1sB+n/GfuPPo0c1+g8/qWYhb9VTj2n0Ln +4F+DxvAhhXzcnjjedqaO3W2JY1cxnDE/M+zrEdUgxqajE50laMN873AslYCT +4RxRbhzD/iz2c9BN0YME+N28M4jxKcx/jp4dri2HVAMz74n2Io9NS3SvcK4s +ZP5d+LzCu3UUp8xvSZ0Lqknl0R9i0yVxzB1j7nzqf+2X+CybhHNVZ1oR+08V +L1qTbxYrXrDvK1vwWfgbere/agx8ls4vbxudzTXh2NUZ9eL9Palr8Tl0PvMe +6N9rJM6ltowVp84p7UUbxvYk3pMliq1wbilH++r7mfdW7ywAfRirpKf+Gd6a ++YcTjz0WzkHlXlXVMPi1mWujap5qQ//wnGpEa9X+cG0rBYOVS9i3wPd2oAt8 +GGNnE9e4EfCejO1FT0QPyPzP+teS1L700z+k9mlFFHyGv6Eaxfyh8N4OBrei +X0C3yjsndRbKG52FzuQBMAq8lXrNgdiPVj1WbQKvwvtkzhXlzHD0m6r/6H3o ++QWf5etM7O/H9ulwrqjmKHc286yXOIcWKdbCvVE9rBS+gvkK8lU1VLU+3IvU +Q/+Er2G+GN4JfIeOcC9Vz1oMLw73QtXMhcqdcO6o564J56xytRY4jp4Mbkt8 +J9gF/4X5QN+iGoz/x1PHonpKWTjHldvqSf/nr/JG9ZzntMR9UHpr6tyWze6C +zUH4WOVv3jW1I9+fk7o2quc1RzcM18YzqlnopalrgXzskPnOorvKaFAH/WPq +XC6Hngu/OtxbBjCWZq7xqu2qgYfDZ6SzUQ4ot2qEY0U51hT7WuFeNgnMg+9P +fddoBd4L1wTVgjHY/wXfmDrXVAN2pK5xOwv9fJl6UbhX6s6yP9yj1JtUg1Ub +D6S+B6hGam/0D/Jde3Q2vKdbC/un2JEPWlsx1I21ng/nknJme6HG6q6jO08R +fFr4rqeYORHuOeo16nmq/SPDuaR4vhz7XfD7EveYcuip4VjTnSWn3hO+uyhG +q6GrZN4r3bnuZO7BcC3VnfAcfEo4ltQjzqt3hGNbMRa82zl8V9Oa6jVfhmu5 +es5/IXtqwg== + "]]}, + Annotation[#, "Charting`Private`Tag$3144#2"]& ]], + Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`]}, { + "Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxNm3X8VsUSxn+A8Z7dtbu7W+xubBTjYl8FCxQpA4O2Ca8oEkqoqFio2Khg +IyEmYgF2Byg2eufL87wf/GM+u2ffPbuzszPzzM6ed53TzmvRrnFDQ8M3izQ0 +NIlyTGpouKrW0HBl0LVBlwRdGvRgtD8TdFHU96oaGjpE2T2oR9DR0X5MUM+o +dwzqFHRcPHcLuiLqvYM6B50f1Mu/83x1UJegi4MG+Df69vGclwVtFmPcxvxB +E6L+SNADUb89eNg3aJ+g/vHczfxc9y++bgy6vCYerq+JP+b4X9CxMc7xQf8N +utxztIyya9CFUb/JMkAWo4IGuu1E1pk09kNRDouyn3k+KZ67Bw217Gi7w+8N +qonPh+P34VGeEny/HeUn5u+Cmua9v6bfRwStGH0HR3mn37/KMhsSdI3nuKum +PkNMp8Y7vYJODuptXj6I8o2gMVG/ryaemePeoFv8fEL83iNJNlOCt4OCXor6 +tCiPCHol6isn7cMzQU+ZV8YcVYnHh4P+qcTTI0Gnsf9JzxODngwaF/RE0D2e +/7Gg0UF3Bz0d1Dr6n5k09+Pue3o8X+m5b4zxuwY1r7R/J5jnGfH8TtBY1hvl ++0E7BJ0dv79XiZ+XPR58vBD0qOc/A51P6jM1+h5aqe84y4t1Mu7t1oXX4vcW +QZOi/mqUh1da38woPwyaEPV5UX4TdEDQc+xbjP+133nKa30j6Hnz8npN/Z43 +f/d67kvinRMq9X09yqODJte0H+M81qox9nh4D/oY+QdNYfwoj63U3jLK/wS9 +ip5G+RZ9g96M+nGV5t81xtkFPYnni5Br0KqVdPE6282tNdkS9vp70DdB3wb9 +6PHQ5/PinXODZkd9zxijddTfRc5RvhflF0HbII8ofw06K9o/iPKroCbR3jjo +h2j7NeiXoLuDtk6a67egX4K+dP/zo71j0OLRZ/mgRYMWC1o9qb5c0Nzo92nQ +Z0Etov3IoM+jPsf88ttSSWPOC2pficefa/JV+Ax8xw9BH3mdwxg/aJGgFP3/ +jLa/gmqV5PKH5dMvfm8X9FPU+0R5btC1QecF/RNty0T/xkFNgk5Fh83n35Yp +PLaN9lmW87Luu4jfuy7GGZE0H79/Zz6+N7/zXTLW80njlkpz94/n9kHPBT0e +lKM9sx7kE/Ul3a+hkn+8oSa/h+/ubbng9/Gl+NuZUT4ZtFb0X8+yZ0/WDlq6 +0lpfsLxWDlqlUp15NwtajX0LWiLo+ujXyTp4ofWw/ht8bRG0RtCaQZtW+p33 +e1k30dH/xvN07+9pUZ9R075fHONdELRitHUyLxsFrW9+V/B4NybZwQ1BlwRt +XMlXgxHgW7Ogw5L0Ez6WKKFH6KrXvE4lzBxj3MTH8z6Y1NQyYs6rgs4P2qBa +iGFgBRiLXGnbuxLugnMfxnidk2Taw3bJO2OTMAk8Ym3YBPq4VaU9gadtg9b1 +3E9k4Qn4C86DJ+AKmEw7eAO+gmNgMZjcx/2QNfvCPiG/J9LCvV3FMsVvgCmn +JK0HzBlmHSI2AEvBWPBxoOcb5GdwCR94j+cDx+q4RwnmgaUjPC4YA+6BOew9 +fmpkTRgClrxYk7/H1+JjV0jqg66g2z0dC8AHPh5fD36eagwd7DnuNH93uB94 +8rLn6Of11TH1Pq8BerK2EPeeMF/gGbHH6Y5rpjm2aW28fjtpjHF+H57AoYdY +X/w2MslvwV93Yz64B949WxNuPeX3h/uZ8ZDZmNpC/H7a/cDdO5KewXgw9yxj +49nGx3crYe32lfB2vPkB9x+2fPZP8vv4+7Mr+Wn8++NRHx10sjERzHnN/IFn +E83HJD/Dx2Q/D4l3+gftVgljwTTmBufuJMZI2tc3PO7a+CFkG31vDrom6LBK +GD0rqFnQQfH7obbfW4KurRRXDEPng44MGh7UN+iooKeDngo6M2hc0JNBrdDz +oH5BxwQNifEmGb/AfzB/mvdvonUFTJtTCf/AOvAP7CEmBFvAZnwX2ESMCC7g +w/BlI/H5QSdWwlX8GX4N/wZugB+zvU7WCNaBf/wGVoEl4Oin+KagNkHtKsUE +YBu4DY6ANzyDHWAJfP3oZzB0j0qYBl+MX8fSOe63XyVdxUaI7x6z/aFDxITE +XGAtWAaO7Rn0GHGf8RIewU94qWMpfIBtYC24tKTxgPnAtTrWzXe/xWOcxYIa +VcI8MA4MJH4AP5vYz4Mfm5jw8/h94hLiCGII4ot+jjHgo2bfCj6BofCA33vO +GAp/PFeV/ORmngMcnR59niUeqMQ/bacVYVt9Pav7PeYHi+pxDeVy5ps4ADwF +c8CeNcwTuEZMtJXXie21d8yBzO6LPp0r4R5Y/aLxGsyvkvCrscde2gRurOW2 +dfwMH2AIWHKpMXJj8wuO1bF0ffe7wzoxyuX+1o9vo7y4Upz8YlCHSrq1Jr6o +UgxP3+3d/zJ8dNCW5umpqI8LuiXo5qA/kUUSBtd5pb6VeQX/tgk6itjCcw0K +6hW0ayVsBp+IdbBJZIiebm2dwGYfi36PBh0Y9H3Qd0E7BXUxv/jeP9DLoF2C +egbtXCn2XSXGudrrAfOb/ktGTc0f/ok+2O+dHhf5gP3EAMQDY6O8rVJccFEl +nAaj/4ry50r2RBtn5L414fY+rt9A30r+EJ/E+QW/9FGUD3tdjH1hpfmwyZeT +xkTPiL02DypJNtaxks/hPc4XA9CJoIMr4SJnyRft+w79V9shbkef5/1L1n1j +zOFJ+o/MiflvYt2V/DBnL86lrxgfOBOBEU9E2aOSH94JHUk6/4AHnHHAGvat +pfkczH4HHe9nzkdTjSEn+L1P7Ivxc6wJP/mmfSN1/CKyxHfXz1TUeY9zKu++ +bT+JH8cPd6tUx5+Pj/KKSv783qDrK8mTteLT3/G6wBnOUOjSGa6jU6dbr1g3 +eDDD6wIj8OHPuj/nmb1CHjskYTL6CY69X5Pun+X6Z8YScAVbAh9m1sQX5yLO +RJ9V4vsc835utfB8Qv07l+e5/lwlPtpb3m09JraHvYMj+HvaGaN3JR6JGWrB +7xeWSVu/z1yjrWPsBb4Mn7ZSJd+DXWFT9wdd4OfzXW9quXa3rDinY1/P2rbQ +eeLu5yvlmC7yXnXzXpzkedlrzl0dkvwlORJyAdgT8cZl7nOK6+gAMUZX14eb +B8Yc5vGnW9e6uk4M3cnrutJ1zinEHT2rhWfqntYBYpNe3sezXEeGxE69XX/G +MpzpPWL/OKePdB3ZTqyEE8xJbNPDsnrFMuW8gj32c/sWxKCVfBa2f43Xjp+5 +1uslb9PH6xpYKaZi7a09PmvBD/c3n+96vAn2w6wHLBuU9A6+m71oZx1gHuY7 +zPPDx8HeqwHmh/abXT8ixmkedGCS7Aean8s8DjzDL3w3N7/0OdLrZv1HmUfW +jq8+3OdBzoXYH3Z4vOU92LJlfUO8xt6u72ZduMnypA+y2NXrPLTIVtjPp9ze +1bxNt/0O8pjgAb57L4853Hyyt+zxieZ/hOfq6z7v2MZvrWSnPdznGOvmMK/9 +MssQOb9VyQ7r8r/FcuvqOnIDw8kPcjbAlrApcGiy612jfZJ5bl9TPE/+Cr/+ +gd9/2L53tPf0nkp4NDGJV3wL/u3lSr6GNmz6oUp4/HYlfd6wkk5Tx5bQY/QZ +3zDd9e2C1i3CwWbma6x5A0PIjYEjxCQPVsJx7A+bxB+3ch19Bh+RKT4TbAR7 +wJmWru/o8jHXWd/jXiPyf8LjEB89UikG+MTt7Av5sQeCPqxpznHm4UzrCX5g +QiVfzb6jh9g/OtnGdfzAV5Wwp6P1hP74BPbnee8RbYyFzz8g6YyH3F+qFLeh +n+jpS/V6pTwyWI9cX7Fskf1E7wU8cqZCn8Fw8qrgODJHJ/DF6yfp5PXWF/SG +mIaYhVwtMQW/v+x9x+7Qc2yNsytnQ86yGyed+Tnvg/Efei84y+Jr8DOcZ2e4 +TixA/nSqYwHypMQD6OMH1qv7rFudvXfYw8nWI/TpAo/FXJxV3/e76HMbzvZJ +sSNnRErOicsmxcTUG0W9Iek8P79SuSCXbJ7RvUY+8zMmPFEHyzh7/u2xt/e6 +iJ/Hep2c2Q+Od7+shK+cI8j5Ef/va8zlGTsgLmzmcrbrjP2N5+JcSS4UXZrp +Psh2vOeaYH6+tQ5/63enWTYz3X+W6xO8xlmuw8uX1k/Kr1zP5rOR5UeOHbn+ +bXl9bV7gG/sjf0OeghzFfK8B/vHZ2BJ5gLlBvwXtXimO5pzW4DZ+w9ZmRf/J +SfH97/6N9tnRNtV5B87/5yTlA5q4L/a4p8dlTHIAv/jd1Xy+4JxHXEs8QSzB +GYZzF+c9bKOFf0d+88w/Y/zqccA0njmndHEfZM660SX0hL1q6/2aaz54Fx7/ +MJ/vuT/ndUrep05M2NbnrfWSzhusifiNnDi68LXl/1xtoe7C595Jc9VjvUXM +A/M2sczYx++tG+sk8cMZal2f7+62vjeyXfAOOZQvzWcjr7Gx5V6PhRq7ju/E +h+Kn7026L5li/0ZcO9v6hm4tyIEnnY3RsZrPO9SXcR3fTlnzOWhpn11uT3p3 +CZ+rv/D7vMt42XX6k8Ob53GKx8Qfr2/8AO/W8/mL5+K5FvP4jLOE56POeLcl +5QiRC3nCc7yOJc0P2Lhhks/43Dxh+6P8Lnxtl5SbIC/RNElH0U/2fK8iPWav +lkvaL9Y8yu8y9poef9Oku0zsbqOkvDM5Z3LY3F+QY2Bfd0zaZ2yIc81aljGy +Xsx+Ef8IHv7o39EN4i8wu5nb1nb7n9abNtZr9Als3MB9Trfuo5fYC2d86ujn +IUn+EV94T5KuTHHMtnPS+eRXv8P5lHMVORdi1N2j3CQpv7xb0lmUc+jmSffZ +5H1HWS7IhHvVzd2+bdLdGGOTx9g+KX8BVpOzA7uJj7gLnGz7XdR2xVmEszPn +EfZqW48DrzuYN/wZ+8qeckfW1HtKXoI4/mrLY2vLBL45R0/1GvfzOlnXPraf +m6K8PykHspN/ox283d1yIG7ibpHYiTML+WFimz5FMtnDsj7YtkKsTdxJzEmc +QbzBe+hU2yIcXj4J18H0u7xP7BH8rmqe4QmchUdyvcTm+HniROIYxuYscJDb +kf2BXnst9PSnLEzHv4ITxFvcaXDHwP3CgjmDZtjesB3sd4htjriU/Og1SXd/ +I6zzlfuN9HtgVz0W4G6EHBR3ReS0yb2Tg+eegPsCsJuc34Codwl6NCmvyJ3i +cOsA9kJOlLwf+T9iIfL5YDK5V3Kw5GPR9XbW4fq3C+SKWCP3BNwtcTfCHQk8 +3WZ7hHf2nD3l3nik21gvdwjcY6yU5KPhHyxAHvhrfNIo87iM+V3Cz/h4dBr8 +HWz5cbblbgf85u6H+zdkw/cSrANc4rfLbUPwylqJ+3jmzEx+kjzl+0GvJ9nz +fdbHXSw7MJkcKXkn8r3kfbnL4g6Se0DuOvnWhW9cyIGRhyQfyTmdvDFzkDu+ +xO/R71i/x33h08glKX9O/pE4mXtlvmE43nPc6HfJY5DLvdi6gfzglf1mXvYf +/zU6ST7kXeGX3C95ae7lyHnjY9ETfDu5ae7sWM/4pPs3dI1cD+dMeOKujr1H +t7lLQ+717zO4C+ttWznCdsId1TtJd1bMgW53Nh/wD1/w0d98MRd3Ep/ZJpDF +T45bGBMb5B4LXby5pjs59I+7r6PcnzGwpWv87glFZ+9mXveFXjv8Me7XjpGa +e3zy7495v7EX8Ar8Zc/J7y9u20LGS3n/V7H84IU7Qvi5zmuuvPfoGbqAfo7x +fi9h/e7gfUNvGLe314dcO1pO6B12/qjtnrML9oovu9wywPbfS7J5dPYK7w/v +sO5seTNf5fnf9X6z1wcUYSWY+XP4tgOzYqHP47d9izDgomhrVmTXS0a9S3aO +o8jmaT8/2v6Xhdntov2wIt+Jb97f/vnC+H2fonj9gqjvXXROY7wDzMNNUV6a +5f8vy8JWMLZr1A8uwolLon5QEXa1Kjpnoq/YOPJARudE24FF/v7YKHtnYVV/ +68Lf3l9kjK/j+c0k/4hNc4/ewfaKz+MZO+ZOiHsN9Jv7SO5L+c4LH9nXdoM+ +kpfCPvBPQ70X3OGsajtGp7iTx6fyPRbjwBv+pv69AyXv4EvxkUvZHzAGfBAn +cV/D/T+81b+hwI+xbvAD/7yUdbq9189a4QGfgp7hb/A711vHwC/wE18yNMmf +PGA/zp0wsRl+GZ+8o5+p40NfS/Kp+FB0A5zFj+PfiQfxtR/X+9bEaxvLCt0f +7bnwIXzfB1ag+/i7FrZx/AU5v0G2ffYI39rTPmSufcoM8wMm94v9P7zo3on4 +iLMJMRJzX21e2Au+IeDbCe5W+HZirO0W++XbhL72DcRU3DVx57Tge4qkMyBn +PvxAY+8PciLmJPbkewi+i+AekLWxRvwqd1d8K8O91armeYafmYPf3/S+cZ/K +vSL3idxpcn/JPeZ8xxXT7QtOtI3Xv6OAf749ecDrYS3QePsDYjK+N+C7A75L +wh8uuJesKbfGnQ9zMzb+hlwb7eTriW0HhmxftS6ik/jLLb3f6AM6jnzBE3Bq +qvWLb0vgi+9JkT3fhSB/dIR3iR/xBYxNbIi8HrFudPFc3FuCO3wj0SpJLsgE +OXH3Tuw12Gvq4zW9a1lcaf/5ptfXyvvytvl+zes4xeN/YLlM91gDPf9My5vx +kPls68NQ7+UU7y06hW6xztfcxvidLbsBfmeqdWm69bmP18CYs7yXXby3r1pG +m3j/kBH7OdnvDLVOzLGOsFf03d26g7zQn2HWeXh73Xwh/2nWj02858ivg3V2 +S8c971j2zP2G5dXK6xjqvUbviHu6eg2TzB/v1r9zedIyre9tF8sEPosxFxvC +161kP44NwD8yvtMyfcn7/ZMxEmwgXgYXwVRi3nHeN2x4vH0fcTFxKT6XWBN/ +19r84cvwV/i2c73/yJOYFT+Ljyucg5Pyt5+Fz/krKXfzUdR/S8qDcladZBkc +Ef2XzzrDfRNl46wz1ndRLpqVY54UZZOsHOR51lV0Fn+64F40yW+C/cRo4Dx4 +P8JrQMbYAHE9mAfeDbXs8e3kbsjhEGfPtc+iDR/JeQA/yfdq7BvfRBMDnuo5 +iVmIXU72fp9iHSB+xS/jk4kzsDVsjjgOvLzZeENsCf58Eev7OymfRVxDfFP/ +/ooYC3/2VfRpyMoNT4lysaxcbLusHMJGXge+dkEeKdoWycqvk7fcJyvv1xAy +fyYrT5Gjfk3Wd2ZPZt3zc16YGPWns+6k50S5VlbO/fzo/13StwNLR/3bpDvw +ZP+Ob1+AoTWdN7AX8jXkav6KMX5Jwsr94t0fk7596BT1a7Owacmof5P0PcW0 +aNs9K6fCuhb1Hu0Qfe7LsscBUT836/vLWVH+mnSX/knU/0jKi4+xzbGHu0b/ +G7LO+ktFvVNWTrFj1B/P+iaRHE/HrO9O2Ldutlv0Dv0jRsK3gHnoMj6qwbqJ +TwPb77H9goHY1xu2I+Ic7BJ58A77dp6/O5zi9+6yb2BszodXxO+XZ8Xz3MFx +98Q91ybRNjPrXmFX9qgoH/xG1M/OssG3ojwz6x5kw/h9SFYeLUe5YlHuaFns +LysHQwzbpiiuOSrqFxblQsi93JGVfyEmvTMrj3JsVoxLHmKLKNfPur9rHeUa +RfkZ9vysrH2fEeUqWfmPL6P9/ixfip6+Yl19NcrVsu6TTqNedGfXij0puutZ +McsG0P9Nom2NrBzevlE2KrrbPD3qaxbd9Zwc9ZWK7pJWyPIp+JM+UZ5V9P1T +X9ZUlFsmdjvH8XPPon706VXUjz7do35q0bei/Yv0hlzSdVlxObHwx/jdou9o +9siK3Ynbu0TbkVm5ruMYr+je5+t4vtVz/SdLvsj2qvi9ddEenRptqxblgg6P ++idJ34E2Z6+L/yeRZavY6aCody7KP3TDXoq+fWgZ7csU5QbnxXMb7931WWcY +zi83Zdknttk96rdn5emY84yieQegw0U5tkFRdijKdWFn7Yts7dIi/uDthZhj +TfuTjaN8P+vO7DXONVnx0fLsVVZ+coWoH5KVt2Ts0VnjvxPl+Kw7OGQ8MEvO +6OycJL0lL5ucm928CJ+wi52K5IJMJsNn1j3z5llYteC7HMqsO7RDivaVPf0T +35x1n/t21v6xd5tm+SD8z+9gQda98PykPWO/Pozy5azvmH6NcrOse7t/knQd +PWettaL1NsrSe3SevrPdf/Es/Ua394uycdGd8wtRPyDrHvtFfEbW/Tb7cIz9 +Hnt1dNZ+vZllG9jFbkX3XvhzeF+5iP9fsnwNfoZ1r1L8f5MoP8i642SvFi/a +r/WLzrecbUuU72b9b2O5rPWzdvb8Pe87Mq6K5LxllBtm5SOfy1ob63o+yv2z +/N+ErLMx5+Jns2wee8f/7ZblA7+P8h58StJ7TYrenZflm/BLnPUXKzrv47em +W/+R3yJFMkR+ixbJEGwcaR3rUWTb1PGpFxT51S2zsAfc2S4Ls8FrMHN32yN5 +2geycrXgD74VDAIHmhZhwcrodda9x0nRtnFRrpUz/Ub2S1vF759mffv1e9Yz +9e9jvD2KvknbIto+zvoW58RouyorXwXecibEro/IsgdsgTPGjs5BX501N/N+ +Gs/bFX33TbywfVHMcGMRHoPFP4BrRd8TbpsV0xDP/JbFBzwcg78pypmTI+mQ +5Wewv52LbBC82qAIs5DrepbtXtE+P+uOET39O+uuphcyLsqXH4VfLDo/0ca9 +Be09smLNu+x75tj/EBP9kxUXgbHkzsDZ46JsWZQTbxFlz6z8/jZFeRxyONcW ++Rfuf8Dbze1bVs/CJPBo66w4mBh4mSjbZt3PfxRjbVv0H0D2eevi792KdBe9 +3SzqmxbdHeGbwVf08w9klvV9AFj6QxaeMvZWReNvlGVL2BF9P3d/4rXdbOPN +o2yadXfySJRDjV/k9ckfsu/o6Q1FurpDVoxOfD4mK/Yi7no46kOK4qUbszAA +//xn1HfM+lbgwaxzF2euh7LyXJzZxkZ9cNE3wf2KZIo8782SBXLg977uMxfd +y/oW4Ywo1ym6v4LHi8wnv3/tPuz/yUX3KJ2z1ska986aj7nuztJ7zpHEfayH +tbTIwmkwGtn0t3yQ2ZeW23JFOAqGjsiKCYgHbsuKFYgTiJuuKIqdhmdhMPiL +PJj7VcdTVxbFVPgY/Au+BbztXYS5O2WdizgTDY3y4qI7rVH4pKI7M+I4YgXi +hJvxu0V3WsQUxDHEFf2j3rUon8X+fOs9GoZfte3fkoXZ4PX/AZNjTWU= + "]], + Polygon3DBox[CompressedData[" +1:eJwtlnuQT2Ucxo/7nvOewtpYLLXKkpS7tdb9Flp3IqSm5NKkpoZGtnRD0QUZ +le6TWdVQpGlqEiMRxp3uU02jTagpte7XPs88vz+eOc/zft/Led/zfZ/vyb/j +vuH3Vo6iqAxUBRdDFD0JeidRdCiOomM8fwd94X3AT8Sagy3wr8BVaRT1RJ+H +X02/zvATYCy6HLQgPhrdmFgBqI5ugl5H7E6wAR7ALHgtnv+AmaCYvqtpS+jf +DV0BPw6qoSuhR8GfB0fhHcHN8P1gO/wKMBo+BlQwTw/0GfjPWVF0BH0UVEWf +RO8jVge8g+4HdsFHgPr06YDOZb1N6Gfgg0Bv9OXoV+HX06ey3h10SfwO9Yh/ +gV4AHwhO034SvRNeAs6jT6N3w4eCs+hT6F3wwSCCnwV74SNBdfg5cAA+Dkxl +/pogH56tM2H8seC9FoIOxF5Cr2BvL4M6ic+4JtiD7qr3B3Xo2wR0hy8L5m3A +APgk0JRxd2lNnQ99Outb0/YteiOYg+4CioidSMwXaj7lAuiqvYMFqXNEubES +nZ96Ts2lNW7V96Ltbr0Puob60rYePRmMh+ek5vnE28FD6r3NBzPhSzUHseag +PXqwzp/YMu0XHqU+h7+Z4yLPMzoL+HDQjVgt0AjeErSFr9b+GDsDTEAXow/r +ezL2MuV26twv4fkXuhO4JfY3ehi+lPZr6dsNfIBejN4Gv5/4++hF6D2J+7wC +/4i264jlgUnot9ClWd5DPfgqsD1zfiuDz1RcbU+jb0OXwAeAOfDXaasLb5F4 +rflgTZbX1LtoTo3XO/2re544l5XzU4gvD84t3ZHZ6NvBesavIB7DaxAfT2xR +bG/Yjf4wtkfE8DywFv4QyCG+JMvnOYj2uYx/Q/ulvSUYBi8L5rlgMBhHnwa0 +rWH8U/A34T1on4p+Ef4AbQ8y31yQldpz5DXKoUfQa4PPXmuM1F0FbeENwSj4 +a6AdPA/8CYpTc92JHGJD0Pvg78a+28PRvRLf8SfkD+iDsdvmyIvQreB9wB/y +gdS8o/Yjnto7dScnwh8L/jZltBUod2jrh96k/epsU3/L/sqZ4DbxNmCM/BT0 +TTzmUWI3oRczdqLuL3w6be0Te6b6zkZ3TzymNboAXANfRXxP8L3oBMbCpwV/ +s0GZO9BKfcFW4m+DKbTPAIWJ73gXeBviR2LfkSro/4K9WB48LfWZ6Cz0DZul +XlNrac33lDvyi8R3+AflbrDXlYJGypXUtUM51TDYo+XNyrmmxPYGe1URaJ7a +8+X1yp++6Ozgs16hGoWuHbwXnUF99JfoZ9FDQAP0ZvRz8GGx785QdL3Ed+hz +5UNwrm5AN5IXBN8F1bwLwR4o71PNWafzoO9O+u4ADem/Jbh2jQDT0QuD75bW +0F3TGPXVndNYram1NEdl4ucSv6tq0iHldrCXqWZUJX4p8dzaQ+3UHirvlIdX +QV9IvDftuUIx8Cl8AvhFuQkGxK5Zl+TV4BN4f1AObx1cu+ShPZmvWXDuKkcq +oc8krpWqgb/qbgfXPtW4g/AbgmudauBh5WpwrdOd+1Fem/FK/WMMTJ3jym3l +cFP4d+Ae9MbY77Y/uPbpHbWXA8G1V3uqBv8++F9CHq1amJ24FqomXhn8D6Da +/7E8JHVNUi1SjmejdwTXtmLQOPU7aG15oLx3HvrGxB4s75qf8S55mP51vg7O +Tf3zqLZ9EzyXatww+j8e7DXylLrKP55J8D9RL3Ru8F3VHcvO1PNamXgp8SXB +3iZPK0R/hl6eZf/bnNnXrMyck4mXJ66NqhF56CLaf4v9T7U12MPl3fonOkWf +bfKY2Dkxi/4vBHuRPLVz6n8q/UvJAzXX8eB/O835Px5ZRUQ= + "]]}, + Annotation[#, "Charting`Private`Tag$3144#3"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 6], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[ + Polygon3DBox[CompressedData[" +1:eJxNmHnYTmUQh9/SJu9TQhIJRSTSLiJKKhUh2aVIKkWL9o2kUGnhz0pK2rVR +Kjslpe2jVRFpX0SLpNTc17nPdfpjrnHOzDNzz3Pec56fr8GgEd2Hb18qlR7b +rlSqFH5zuVTaOZVKO4XNiH8/EDYl7Pa4nhR2c9gNYffHvafCnjH+YNiz+qlh +L4Q9HDYtbFbYI2HTw54z/lDY83ryni5nNem32PUztWmuX+QaYnPsz7rZYY+F +PR42IdhGhd0UNtc4c8zTw7tQDmq9FPao6+cbZ44FevJelJ28JTIx02t64p+E +LQt7M2xt2PthFV6/EvZq2Ovm0vMt7zHH2+WMdZ7rFjrrcuPE3jEO47t6GJda +jz14Q/+yvRe5lyv0sH8qE/0/lIkaH+mpscr4chmfdK8/8x68q2WCZaW12Y8P +9NT93Fzy1pj7XljteDa7hlUJ+8J7zL13XFc29m1cf+y+rrcHtb/Sw/6dcWb6 +Xg/7T/aGcYO96fODceb4UU/e19ZjD/5x/c/aatf/7Rpiv8vBuk1h68K+DPtV +Dy/v0TflbI4/9fBulYNaG8vZb4X1W4wzx1968n6RnbxtMjHTv3rie8R+bRe2 +fcr6r3C/KqWM6bewUspy6blDyu4xB+/6ZhnZ979k5P3/wzl2SVkcRp7PFhnp +udE9oPcm94DnutU9K6fMs6/VZIRr95TNAFfVlHnqVTcOI/tS4Tx7xvWOfpf2 +Shk3XClltdmb3VLmqVvTXPJqmVvZudf7/Or4G4RxaFivsN5h9WViX+vag9r7 +6mE/KuyAsMZhDcxlvoZhNVLG20hf09yasjfWw1XPevTbzxrsQRPjvBNNU/bO +wNvCNTA2C9tHxuZ6GA8xDtehemofKRMsB1mP9YeH7S/7EXryDrQ/vfkG8C3g +W9bSGWBsZR6MbeU4OKy19+hzjB7eo13HmmPNZab2csN7fNhhcnXQw3WCnjna +WI9+Hb3HMzlRD+NJenp2khWuU/Rwnaqn3mn6tnLt61539h683eWD62RrU/f0 +sHbO0S3sOPO6uK6de81vjd/TGdZgpjOdAfa+8sHVyxno01vPHP2Mw9tfD+PZ +YV3tP0hW+gwwDstZenj7WI9+l7j+HK2b60d7f0TY+XKwbojcPcPO08N7gXHm +uFAP78Vy0P/csB6uH2acOS7SkzdYdvIulYmZLtMTzzUEZ3RP94/9ulIm3unL +zaXnVd5jjmtkhXFc2BgZrzZO7FrjMF6nh3Gk9diDK/T0uzFl2oh3BS2D9uDc +RN+8IGuuk9AZU2XnGo0z07we/i74TaB7ZhlDf3DWoyHQSTPsMcV6XE83zho0 +zWzXoIf4NxqJ8xbtsFC+Ob7bue6ZXy4001y/k7y/vM/PuW6B8yzyOtdDS8qF +FlnqPIvNm2l8sbzz7YFW4Pz9QPbXrZXriZXlQve8Iy865C353vZ6gbO9K9P7 +Xi+xxgrnZN2bMlWYl+ukCr9xxJeVC230odfoDXQJOoLzmXM6P/s3yYKm+Mwa +n7oG7tXGYOJMX2NP1q+Te415MK01r8L4WtlXWXe5fVY533pr5TppfbnQOj/I +gcb4tlxopu9k+sm8ebLmGu9nY3CgHza4F1/b42PrfSP7BtfAutE1fPea+Rta +5z5tlO+3/+0d2gANQC10xx/lQj9tLhfaaItMnPt/2wP98K9zbjUPjm3m5Zpp +mzNvsS73OH9z7YDn+/yjtbdq6AT0EUzoCrQIdcnlm55rI3QGM6Ff0DG5BmI9 +c3KPOelNLvoEVmqznn1hD5gHHcFZvL/7gsZAJ+TaomEq9BMzwFXTOD2quYYe +exmjB2d6Lbl5NnXkrmUeLLXNq2K8tvNUt+6O9qnhftW1Vq6T6qZC9zSSAx1S +3/X7eZ3rIfL4TvG+8f7D0sQYv7Pf/a0wZz17VLVePfn4PuWa5UDX8z0em7Lv +MWs419EMfN85A/jec4Zztp7kXqM3DrNuC9fk2uhwWdEYR9qnlTUaee8IuVua +18R4S3kPsW6u25qlQqsRyzVT61RooFwT4Y+TCV3RNhXaqEMqdE+ug/Ad7dHG +us1d10bejq5vas9WWif3JddJ6AR0BOdz/1RoKfLQN2iKLqnQUqfKipboKh9n +ene5OLPPdKbu5sHRw7yOxnvI29m6x9qns7P2slauk3qlQusMkAON0TcVmqmf +TGibgT6PdtaG4xxjcKAfBjlnH3ucYr0+sg9yDaznuoZn2d66zDHEWK6ZhsiH +7si1D36YdfmNokX42wt/dxmdCg2UayI82o0zlzOe//vTA41yuTMQH5EKTXaB +8w/zerC5l6VC04w0hgbiPUE3oZ+ulOlqr3NtRB79R8kwxvvMgx7iPURr3Goe +OuQ869FvfMreU/Lu9PpG966Fe3m2e8Dzmhx2R9j1Ket1i/16yzfU+C3G73If +b7PueHvd47/vK2e/m6E+m4kp+1sSvHdba5zrR7ufo30uA32GY5z3Xtc+Uc56 +0nu49yZ6f5w1x+jvdpbxzg8P2g59g94ZL+tYmSa4j5Oca7hst8s1QY5R1p/s +XvwH9BSx6g== + "]], + Annotation[#, "Charting`Private`Tag$3144#4"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}, {}, {}, {}}, {{ + GrayLevel[0], + Line3DBox[{274, 1, 264, 209, 16, 601, 31, 46, 60, 73, 86, 845}], + Line3DBox[{495, 2, 231, 274}], + Line3DBox[{4, 3, 495}], + Line3DBox[{4, 5, 6, 653}], + Line3DBox[{8, 7, 846}], + Line3DBox[{8, 499, 9, 599, 10, 11, 444, 778}], + Line3DBox[{13, 12, 1013}], + Line3DBox[{13, 14, 232, 271, 15, 275, 211, 30, 504, 45, 59, 72, 85, + 99, 455, 781}], + Line3DBox[{457, 100, 114, 127, 140, 154, 606, 168, 228, 280, 183, + 272, 237, 184, 533, 185, 186, 187, 188, 1051}], + Line3DBox[{126, 113, 468, 964}], + Line3DBox[{126, 139, 153, 167, 531, 182, 238, 273, 197, 281, 230, + 196, 195, 194, 671}], + Line3DBox[{670, 189, 190, 534, 191, 609, 192, 193, 470, 1042}], + Line3DBox[{457, 782}]}, { + GrayLevel[0], + Line3DBox[{1405, 1064, 1387, 1274, 1079, 1663, 1094, 1109, 1123, + 1136, 1149, 1285, 1942}], + Line3DBox[{1565, 1065, 1328, 1405}], + Line3DBox[{1067, 1066, 1565}], + Line3DBox[{1067, 1068, 1069, 1713}], + Line3DBox[{1071, 1070, 1936}], + Line3DBox[{1071, 1569, 1072, 1661, 1073, 1074, 1530, 1874}], + Line3DBox[{1076, 1075, 2111}], + Line3DBox[{1076, 1077, 1329, 1399, 1078, 1406, 1276, 1093, 1574, + 1108, 1122, 1135, 1148, 1162, 1331, 1759}], + Line3DBox[{1415, 1163, 1320, 1177, 1190, 1203, 1217, 1669, 1231, + 1325, 1416, 1246, 1403, 1345, 1247, 1605, 1248, 1249, 1250, 1251, + 2147}], + Line3DBox[{1322, 1176, 1432, 1318, 1946}], + Line3DBox[{1202, 1189, 1322}], + Line3DBox[{1202, 1216, 1230, 1603, 1245, 1346, 1404, 1260, 1417, + 1327, 1259, 1258, 1257, 1728}], + Line3DBox[{1727, 1252, 1253, 1606, 1254, 1672, 1255, 1256, 1539, + 2142}], + Line3DBox[{1754, 1303, 1415}]}, { + GrayLevel[0], + Line3DBox[{2506, 2160, 2483, 2369, 2175, 2739, 2190, 2205, 2219, + 2232, 2245, 2379, 3005}], + Line3DBox[{2644, 2161, 2423, 2506}], + Line3DBox[{2163, 2162, 2644}], + Line3DBox[{2163, 2164, 2165, 2785}], + Line3DBox[{2167, 2166, 3000}], + Line3DBox[{2167, 2648, 2168, 2737, 2169, 2170, 2599, 2926}], + Line3DBox[{2172, 2171, 3169}], + Line3DBox[{2172, 2173, 2424, 2499, 2174, 2507, 2371, 2189, 2653, + 2204, 2218, 2231, 2244, 2258, 2427, 2828}], + Line3DBox[{2516, 2259, 2414, 2273, 2286, 2299, 2313, 2745, 2327, + 2420, 2517, 2342, 2504, 2439, 2343, 2684, 2344, 2345, 2346, 2347, + 3213}], + Line3DBox[{2415, 2272, 2533, 2412, 3007}], + Line3DBox[{2298, 2285, 2415}], + Line3DBox[{2298, 2312, 2326, 2682, 2341, 2440, 2505, 2356, 2518, + 2422, 2355, 2354, 2353, 2799}], + Line3DBox[{2798, 2348, 2349, 2685, 2350, 2748, 2351, 2352, 2613, + 3206}], + Line3DBox[{2824, 2398, 2516}]}, { + GrayLevel[0], + Line3DBox[{3473, 3228, 3469, 3454, 3243, 3258, 3273, 3288, 3303, + 3318, 3333, 3348, 3363, 3378, 3393, 3408, 3423, 3458, 3475, 3438, + 3471, 3463, 3439, 3440, 3441, 3442, 3443, 3444, 3445, 3446, 3447, + 3448, 3449, 3450, 3451, 3460, 3476, 3452, 3472, 3464, 3437, 3422, + 3407, 3392, 3377, 3362, 3347, 3332, 3317, 3302, 3287, 3272, 3257, + 3456, 3474, 3242, 3470, 3462, 3241, 3240, 3239, 3238, 3237, 3236, + 3235, 3234, 3233, 3232, 3231, 3230, 3229, 3461, + 3473}]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}}}, VertexNormals -> CompressedData[" +1:eJx0XHk4ldvbJkMyT4WQVDI2GEvKEyJJmSpFmYdE5iEhGQqRqVTKEJJIFJVC +VihJYZuKTG0ybdnSHMW33nef/jnf+Z1/znXd17qe9ax7PcP9rP1K2sHL3HkR +ExPTRR4mJhb8/14kfP6tPxXuhL2+Ob2wH/ndihh43EaDg0Cxdwqgwmq1U5v5 +emxQtqsQ62GMS3GPhp0PokKnpUCsUKAzOhxpWjjdSoMvlecWpMOooPQkL8R2 +mwfa7Gb5Sf81Da7p6cVrxFLheNgFXu5lXkhSQ/gA63MaDFQLDRheooL1UvGs +0WpH1MNkcbG9igZVhiktkRIU0Nhb9bPsiBmq36FwX/EnHVRVE6+tBgpckOI3 +z1H1Rot9j3SnfaHDU7WvAfVHKaDfkC7b8dAHJbSdfShMp4NeloN5WQQF5LZe +it9z1wOpKMd6N9HocL9TjqM0gQI8Gy/vW8vijDLdEgoPTtDBkFNN52ZQHZh9 +FL95wu+ptnK3sZNR0TSk8XW752H8wY/QZyutB2sUGh+fIvCwA2oP3mH8lXGl +w9V9UzU3Xrw4aYjxqzXFSOREHVyU4ty7KGGqJqRBRscA422iESwhflTYvtVg +U9ir/aiF/cWjjHYaCLG/eH0E43s+T/Ab/7JFsh7B6+5g/OZUGnM1vpdgmfcF +j5ErGmnsjKvH/L9+et5k5Ukq7Fd+IcO/zgdZm2QNqrXQ4EJGZrw65nmgn633 +ZUQASikwDvn6jAYmq+PR6mwqBL2TVJvQ8kKc9DmNzw/wvm6vbJxprTDw4V6k +VMJhlE93G4M/dJCl/f7jrIp58/faI8RxAh1QzjTl+kYHUfvb+ce8KGC068XB +D28CUWtU/3qZKTpI5KduEI2nAH3j9BmXBG+kanspJhrz6bhdfbfQRQpsrBm9 +Rfd2QeuylNZajdNBMYHpahjmDccI87n0Lm2emNzB3ZifxT9P/vTFeNZOyRP0 +pSM14rWtusYYP7wojdaCcf9FKcXTP7/U1DE/Hyd4/ulWLLIG85ylP8Dht+dz +zZGgj836GOeFyXVsvlRoD3M7drF8Hwoa4lqe3EGDRyX7P/Z6U8E7mndncIkt +sq7Ovre3kwYnrE37f2H8TZh/ov0WN1QRG8ClhvHNfA7PJjD/t95upx808EeO +fV8yUjD/2T5Bb+TOUOFTrrFeATUM2Zaqu3Q00EDad1j4/G0q+C/1uNB27yRq +37LrxdU7NFgs+FCW62orpGypQDJ3/ZCpzRJzk0XTYFrBqpKuSIEeWYsuo6BI +NHjz1Kl+zPNVvz8uX05hPu9LvKuhhaI6rpe+Czhuu7q28X6+QoFnF3ioZY6+ +iHvWXyp/DN/XQHeOQiYF7mv19jj+cUEzFreNpTG+461JizbmzWKk8+6no+Pa +/RAnvxfz8yz3V+pqjOvsnKXlK07XTBRekTXBuMXdtb6NGL8glRq30uV3DbM3 +t8wujDsYe9K3Yp6dQ27ySoZ9r2mQExrdgfG1XQ8nEjBvN3jFcoYSzNFirQMr +z2DeUo0fyvh4UqH5YGBwxc0jCD4cOULtokHGxnVPrDyoEC9tWv9bwQ1Vzobe +UXtLAztaESvHcSrs7TjN9ig5EH3/uZyz6A0NNOeuS5iEUIGHI+N1vG404gxT +HudspoGcYavChUoqZKzfogXScajgfLqoWB4NhloipWI3UaB85a4XR0YSkBn7 +ebMWXB/4c0fM6zIo8MVOny3cNwJVTDTyT4zSYeFWofKl2xSgbdi/P0vdD7Ge +KxhdOUKHDsE7K6IKKPBTYfD8mIILmj6QG/QE42l+ay/0BNaBmtrWZv/WWW2d +0A89ZpiHoPoLuy9jfKbJLyXSY7ZmfT/s2EfkexZP/VvM50ZKLdWexopEbT+k +EXGrUrJl4zHM55L+2KgTL2drNq0vAD2MJwXXLFP2osIitkXn/M7uRZP6wSWu +mLfUo3w8E+5UWHK7v4G+6xA68HHIKAbztmY/rULXlQpMX6WLeRpdkOjKpRnR +72iw5EHjkjF7Ksyd94xSrg1Efxa9nRrsx3a+PggFZyoY1C9W8NWMQ4eWyZxf +0UsDXb+rPbcwn7LL727fWZ+OVBzb+ouu04BW2+VKOU2B1YK5r4IvpqFJ7vfd +QjivQ88dVil/TYEbVeOFujxRSCfraLjNe8ybWGN/Ry0FRO6nIU9ZXzRfsF1P +eogOT0oFnmthfhz2mfmbafDB81+G6ZYED7vPdJ0LqAMluYC7ea5c6O6LSS4b +jO9SGc1Swvy0aESWP6jnRRMfQsKIvNY6bFFUjnFJ3aCXVm5/ajTsulO2Y/zs +tXe/hXG8qSZtThF5rY9Urx54thLHT99mw8FKN9zX5t4OVKaYo2LVhbbP3ZgH +kZkdgQ5U2HHGxqwr3h71Kh0WuIH5aaoW2V21nwoKcgoidHk/5Dd4if/FCA2K +rETObNKhgtX+6yKX78Wh6cUcn3Z/pkFIbMroB3MqjLrG7oxkL0BIyGrLO2zn +7Yl17wa3tcHcekm0SuIqCvij+826hQ42NjpHPi5pg5qDoX2K6hEoQGIwk6ub +Dj1qrs2K3RQ4vvGDs8SsB9quKDazYpAOhX9Wuz7D/BwWamUC8TVQpmg2ZY3P +a2Iv+FXOrw6QNHvM/aOrEHcYaPtjPCss4KVccB0c0dLbZxYkjB4Lq+3einGX +HidOEYxL0r/t36E5V3Oq3/wzgT8rNF9nhfOOKt998le1BnIZrgm9inkbUq7+ +sO0oFXb+uFE9VaGHSiGMZbKHBr+c7pb8tKHCgqFr6ugmC2TWL/hnYpAG4+uT +/et3U4F3zWX1hwYuaLTSSErvIw0mRJYtdxCnQv0Hhyu506fRlUKDXy2ck+C8 +UXPwidd7mPsu2i4ZkYc+a26t7zk+CdvT1r5Ve/QGhLyeUj78qUALaQ8FBuqn +QMaE53aCWjvYKvz2nBpNRRR1iY1SxXRYZnxCaXh7G7A+lMmI/+KPpNf0JF+m +0EF3T+tupQkKLGiLBtK17dC1m9XGXX102CZ/P6vvZB1kb9vbESyrCY+eTYIS +5oHlfFeiq38dmFJOP0v+posGOPT3HsX46YHtK9hDcL5nHI+9qSaIGoMFhhUw +vvFg7d0gzOdV/16HtFUzNfdntT00/z+f8JfP9zlVJJ+5lkmXOB7pQbx9KMln +unEpyaelgPWir5ss4LyiAMmnZkUqyefm7LiTpQYuIFC897/4hL98PoizJvmM +ND/nhPkE+YQAkk+B2Lpugs8Kk1l+zCekG7YLEXyuuctaTPCZauozTR1NheH5 +amWCT5HOWZLPe5F/FDZ88YeD+nUpBJ/zvZUknxkbVQu2gB00WV4m+exOLyH5 +NOjhiYlT0ESN24ZIPlvyKSSfi+anLQO/64Jk9laST5vDDD63BzQ/69oiCK1X ++Uk+L+5g8PkmIiX8mMqMtkgPg8+uLb1kXgunilb9fqUPIUmWZF6nyu8k89pW +z3R3Y4o5uKb8+a+8hv+R1/A/8hr+5rXY1VAyr92N5MJwXkN5piaZ1wL1b8i8 +nklrrZKQuApPA32+E3ktJqVG5nUe792n69UjIFL6BZnXkuxeZF4vUXVb4Jr1 +AIFwWTKvzbPWkHnd86KxNEpsDTIEczKvOabW75PHeb1x3LRMznUV9B59uoXI +a75HjLxelHF+cbe/MIycYOQ1Tx0jrx8VUZTW6M9pn3jAyOt/9RH420ek3vGT +fYR9hYQ1ddchqJAZIfvIo6oxso98L0cOwo0ucEBSgOwjgxINZB85JrtLWbU2 +EHyYOsg+kqh6l+wjVbbdTH6acaCtJkH2kUnhGrKPPBmwZjaoT4dVY+wDRB8Z +2H6M7CPFV05nn7qYBgv3lpF9RF5zJdlHOrbteryXJwq0636dIvqIw1wL2UcG +JzW+HZX1hdgDe8g+MhUkSPaR1IHKEp6VfGilmRHZR7bURJN9ZJbT+oxfMBf0 +d9HIPsJ6ndFHRsaPbLSs4AWOnFCyj+Q4MfqIl7BzhLPzH+0MT0Yf+Zeegf+h +Z+Cvnpk3VSD1jNlasWAWRTeIPH+C1DPBlmaLCD0TvM/x0MPkQGjdWMD1H3oG +/uoZ76L3pJ5xOsFRvVU6DkSLy0k94+d5ntQzDx3oFodHEoBlTw6pZ/KYaaSe +0b8ryHvKNwL2cbeRemadZBmpZ3ZUwYXL6n7wQa2C1DOPGx6Qemaw0vNYq4IL +KISWkXqm+wBDz5xadzXPeGC25pcRQ88UUBh6pnOa1STNeVa7+QtDz2ydZ+iZ +ml1BTxLesULZohFSz0i8Y+iZQ4dVVz8sm9U+HczQM//S4fBXh+vsOUTq8B7n +Bl+bElvI35P/Xzoc/urwIDsnUof3eSroWBr4Q5P7D1KH70v3JnW4qKN4RhE1 +DHZpKpI6PCd6lNTh63guj7feOwn6A3tIHS75i53U2+X6pw5hvQ2yvyJJvT1V +sMyV0Nse0sEW92ihoLXrJ0Nv/1Yk9XZO47qeWkdf8Kux+C+9DX/19sAwQ2+f +NVs4pG08XhO8n6G3f15l6O2BhGvHT2tOaydkMPT2UApDb4fv7bX+6f9bu1WL +obeRLkNva19ImeOO+q69XZSht5nfhZPzYxDnhevnXu2HRonn5Pxor/KcnB+X +b9x28tAvW9DPDPyv+RH+x/wIf+dHT6Hr5PzIlfF4fWNEALQcMyXnxyp6Ajk/ +jtY69I9oeYHHzXlyfgxLaCLnxzCJQw6rEw5DkChjfozymSPnx7nspfrCHCcg +x/4qOT8a+yeT8+P+z14Pvr8JhISeInJ+PFh1hpwfBbmWp/smeMMG7VPk/JjM +vImcH7U5rnVOeLtA2vAGcn4cP8WYHzWvD9VLrnxTY+LNmB/1vjLmx61rPpd2 +SI1o36xkzI/7uRnz48pVWR6LPn/R7hVkzI9FRxnz48NybmvvvZ+1pQIY8+O/ +3kPg73tI6aJ28j3kgklHK3OPDUxKLPuv9xD4H+8h8Pc9JIZLn3wP4RP//oBj +mRfo0JeR7yH9VwXJ9xDPVRe/TVQ7AruhGfkesv17Evke8ku5y6LhiBmsrpQl +30NeKyeR7yEPPP2trqt6A7+l7X+9h8D/eA+Bv+8hj08z3kMen6PulmVxhqev +48n3kN3sjPeQUuev7dv1a2us2hjvIecEGO8hT+NG9Az2DGqfecV4DxEPZ7yH +3NHnM3dfPKW9i6eRfA/Rf8R4D0mPcpAbujylfb2K8R4iPmL76IhlK5yiLOW5 +9u4i2u62c/0Q6zSsajDx+SxIgT3GTM+Y791ABiE806c/0yGmPZz+8SkFAsLz +e9PyXdFGia+DxrgvvDeS4VmG7V8P/P30rcRSKN1kaELYN/D7Y1PeSQElj+9x +b2sM0A6DpbL5uP9e5WW2JXDP2FrFbTUG8GtYnMQXuOu9iX2vqCb6s9y7ARIJ +81PEvluO55D7rq04vKCd7wpXeFXeE/uqX2DsG27l3DQothSVlTP2/de54O+5 +qIscGjbguHK/5tafZWyFVrjxi67Feeq9wSRqHcafCvHVTc3vR6bnB2LlMG57 ++WzMb8znb09O/5KTMzXnn6+Gndh+u5DFfQm8b/7B1LvuQZ9qosWGBYl9H587 +uWg31xDYcdVPbdochZIyho/88aDBWABL3+A9XP/rdEZvfXdHlJ/sneYf6PBm +Y+K5M48pIC7hPMq6+Rjqm6m8tnuYDseOfH16LX0IDm8t/WQ+n4fuBbp4H1pE +g9BI1pSWDe3A8lXZd3tqEYr+Lan6LBfHiZ4mTQTrwBJjQy0tuhQs9IQnq2J/ +aoQFtcKbKRDbKCwrtcgObWisz83A/f0AepE/2UYBFynnwVzVA4inITmfFeN1 +W9RJO/FejjUibCtR2KcTpJ1nulKkHYeWVbMfme3Ak6mPtNPPYmX58AUFuLqm +8wy3OIFatUCII5UOL24LkP4nzXyx3T+fB7QgeS/Cf6Hk/mNp/q3w+zqH+O32 +TLAOWjuoyjwNw0nHE9Mwz7etvuUEGC1G2UJpC0Q88+pEkHyCWcldjc1RIOgz +RfJpyepM3mMtpyFXtLEVxC5e+l/3CH/vUTqFcY+FBkp8OeEz2j2VjHvMeaLy +bA7j86Kto52P6NpC3w0MCPxVAn/3H2zn5me10RoOK1S62Y/zOq4zTg2M9Xys +SvULt+g1Ymw7yfVlKT9+D9EokM0/rujeXYja7xYue9lGB96GtZmtOE5UHv/Q +/yIhDi/WG58DvL7HaVHcPNbhmmzO1yYTpRC3vD9FGuOjQqeNqrB9Y0NuR8Wz +fKiuiC171//3B/76M7icEYeWnZ71IT6ftK/KMOLw8oZL7gTPAy5XvhW0Z6JC +nz6S59HwveR91ff72LtvcUL88b9PEvc14MVE+tPKy2V3M0MKulu8SX8qIl6S +ceJ8zulCkuoBaGC6SMaJK1tYgHNnM6xl+bo+uzwPxfnZ8KiJTsNhRdmGoqoW +OF7vk/aV/S5SbzuztnWBDhePU/zOsLWAscMlkbdHCxFnldbb5QLTYHjVOdC/ +ngJdh59o+Y/bINauC5tmsT9VEguasfi8v3bcy21jPohCVGwFpvB5NTN0ernw +ed2tDzuZr/pUM756xV3ivLzPGfFz5JE6X7zuYnjpyYifm7bhJJ9Hg3jbvqXz +wf0AVpJPitaUXzXW7WsmEwP0a4Xhm8j9cQ1Crz4P+fAax//jpArNHdHCqFJ4 +6S9inmIe5Vi7TLoFtsn+6lVtuAw+/V/kz4vgPjX5a1ECtv9h4+iBE6t+1fz0 +Zj9E9MHoJ39I/zNo+VyDzAfhzbIjpP8XbzL8/9l78vQxsU/aheoM/9+OMR87 +h+0ks/iNPhZlRuw5r10JO9xX4u89eEQBA3Ohqmk/ZzSWou7ujuvD4jOpulPY +jrdOVYyYvSCcq5YN0ib0zI6J4341FLDVPux9+YUDhBmOLL+J62ToPjkyDg0P +uzWo84ujhp69ZByGbbhA2iksHNzDd0gQPXkvR9oJdH2Y7oJx1o+lUvfVedGr +vcfsCD05USz+MAqfK771ndshtgNoVK/K8xM+17/4QX/5oTKd3pD3igIlr0Im +5JYcQg475+cHcPyI1DF4TjzzYdgxWhge8DF4XqAeIuMh1PUSlTJuAxXbTpHx +8G7oI3lf217/cZ17JozCwsvJ+1orQgkk4lBalIOaUZ4Hn0cQLxGHq8oUozix +/68sXedoZvSaPInb1QTPoQkbHD9g/0/dDW3o/2gJ1Azh5few/3cOxHwTw+vz +PnG9KpCd1rZIilL6j/Xo7/oFE8b6u5cO58eoTtcMRjHWt75ZW6OsPwQ7aKpn +A/tS0BUWi8OLdtCg8mt2tdq9IeClP7x9THoPOD34oC7+awI2ii0j14dl6x0M +6kuB6M9byPVu7RJpgVuH4Ak6eCthryZ6Hp7Af3k3nn+nJUj+r6z/wGTMdgBG +VJ6Q/J8oZJxXLPv5iqf2dO1GHsZ5P/k5aNZj/dwUJWjvuekcoq5ttuXDOrnr +brVIuimeiwt5PVZ+SEFDujUf+T7RYUTEYcNqSQqwFuy7n9p/CdHeNT2dw7qR +27n5mK9SHVhR+jNkNjkj/eZ+i7lirEM+LfQSfU081TT77nd3mPFnIvsat1Yc +2deopekh/JuPQW3jPbKv8V7sje3Ec+LPH25J1wTe1vB+3HyEmLu3+ztYpeB5 +58SeH3GqOqzI4rlfCDHvNL7zSpHBeXF6z2P90HAW5KhyR5jQ7Qny4wIsea2g +MOygzaVyBlUWWixzwPWtJKo5lyOgFT6y9Ik3uZ5HklvsjIdZcH51QNTunBbY +fHmNvrdAInqVtHz7Ulx/enMVRl9+okD0tks5RR3nEfdY7bWxd3RYqWJPb2zF +fTNz6KhnzRXE8TLO+00/HRxdctcb2lDg+PrU2OYVmWiddRav1Ec6fGErLn/X +SwHLYI/0XP8TKHhfieSZATr8OmesZ4z7pkVqmMCDYm8UGFryIA3H/4/0ZV4q +OC94Os+zLZU5hoyft70awTjd0Gkg3A/zI2MmUML/Q5vtxkYxH0IP8+ucGca8 +GYLSIdoDUVglt6TVCuN5G3M+LsX89J4tVzI5JAz92Xb5BD+Xz67eIyzcBptU +Xi3OU7WCxBS1VfQ3mP8r75qmpyggovFt6HelKXRKnzZS7qNDr+nHRZcGKMDp +f+ltyd59cP2+RqkR9n/rl+OphN7I7T8cuC21COzfnFIn9Eb7URrZ737X5Bvh +fgcXK1LIfvcWLX1B1P9PM3QxXP+hODBQlqj/YomIvK/DM34r+FTOQHW/Inlf +hvHz5H2d+p1R0eB6Hg6nJJP3FS0mScb/pbjvGs57NWH3KCP+zzWPSYJ9Cyw5 +vNo1qyEV1X+cnT8tPA1pJj0XzeYp8Ong8+GGZz5I/ehYdn8PHWx5sibvUynQ +YWdXorfZFbE2xR0n7hGtPWak3UGBvfX1XfXVzmhr5pk+CtafiiIXCvp7KGA1 +Xqez9KAdulN4hW0K81C9o/74KI6H479r367Ss0ZHWV/wGuH7+rpy3I3IizO6 +pnZnNZ1hRHWvOZEXBmIlpD/hliZnJ5/5wPTXK6Q/Hk0MfxbNRz3V2ewKd1bH +k/50zqSR+4qprsnnPGgHWz9kkvuGjHuQfn4R75CsrnYGveJzpJ+HX79ceNpE +AXfngWYXDQfoMD1Nm8X+hD5h1BlP5z/yPtJ7UM5RRp0RflDpS/Tfn2kn4ruP +FoKapcQbov8KDCqQeTHA0v/YRyAR4vaykXkhu9d3BcFzctd49NWGVMjMil0g +eD7y2VVNAMfbl9V68wUruFGz1o52It4uflyaTswjx8IyO0/KcyEu8SOhRP8V +u3jny9tmKtBzdktnF3uikYRvWuOXaPCTr9jbbpQKj3llD7NbBCEdFmF5i7M0 +ONpoiFyYh6DgUfecq7oiWFW0uij602Bzmqiyrnsd6D4UCDF1k0Q2y1q7n2D7 +PgWBU7dw3dhv7xsmGb8RHYnJS7TAeNy4ok0q7i/K31fyD6cpoMy3PIIbMJ64 +ON+rwuA97NNpvh0VWQu5m0/Np6lOwopOwaRp6yE4odnTlfykCr6/54otnp2A +grQSagMLBWrMf2hne6egyFM78mRn6cD8/TzZl7X6Dvwa93MG7RlNsi9Pqrpq +nC3Dc3fFk4PGAa5woeOF2HZcD7PlVngT+16ZFU/B+yK4ZbhA7Lv3cMB5Yl/f +gW15KU+q0MHXdWeIfR9Vy5L5G/pHNiRU1Qq5KG0l8xfxtpP5u/XTPYsTVaZo +b6o3mb/DcSNk/ppYCg4u7N2HpvYokPm7ZfAVWZc8nXk6Ev1PQEj+OFmXaiyB +rEu5XxSka4u9wWHLJbIutR4XIeuSZO1pESGZY0Ax6iDr0oBrClkn+YNnMjM7 +zsO5pWEZ/1En4W+dTBW5vIGok0t1zls8X5EJ0Vke/ESdDD6oqBV0Deu94wGP +KPNxUFog4/5glA4+kc/JfiSw9OAnqQ8pMDvXQvajt4WuZD+auuQdiPsRPEjs +IvvR241Pybha98FKK7TYE14fFNhKxNURpftkXOVzLHJktgiCVRwrybiKPMeo +q1dnZ1jEJr7XpAgrk3X1tOt2sq6Krlcxelclim6wcZB1lbk7l6yrd9l3cW3f +KYyoAY5kXa0MRp2NON7Kq5hGVsRfqCk4aRhojnHh6ApzQbzeXn6OzWR+pma9 +VmwjsX7z8zMW2zFe0rvy8DfruZrUblVx4j3qKa3I46t/HZjb3fvlKDdWU9nq +HuOI8TUFK/2asT9bv9xwP/mRCe0I4Mgm+qO9fA79EKJApVxOl1JhAmKqKm+s +wLromWiE6Cqs5yV5Em0UIlNR2OMOLXF8X/+KW/gbtw58F5XOaQyD+5r3ohfc +ChHL2MfHgecmwO0ss2gXrj/jwu7l5aY5sLpXjEkE3++RAAMyH38JN5vobVFE +Entek/mY8aSzzB6fK97yhGGXoySyyrj8nnjn+VjgaJJ6uA5qVosaFCVtRhxR +29YZ3MZ1fk2tbol3Haxk3RMy5LkFrf11SyUer9+mv7c04hgFDrBXm0eJRiMp +6YxDZ6bo0Cxs4rA4jAJ1fcvWW6rEoIIPRh8naXRIykuZoXlQ4Pb3iBDJxAS0 +eIfs10YcV/Qkhq6YDs6K2Kj5Vnv2A0NXVD9g8GyQXKbGf3NM+4U/g+dZab8l +THj9p14xEZnj3HBc/vByAn++7DTpT/gBdCtYNBqe/f5F+rPcM+iH0ToKmBkK +H1BaHgP59txcfjgOK7uKLswutELv0of64ifOgffPvlUKc3R4/LNWvlalA7r9 +PrwOKKtDyYl3mdIU6FCxXJKsY7x771Rx75QEl743ZB2riz5G8rYFzZc9i98M +Kw7tInl7oy/6VB7zHBh/TDPi3R7or+nnJuLnj/x+Mh4Oum74oVGYALOXZcl4 +2Fj2LUMphQJKrb0sv9OSQe7+wuJCrPdGOlYvvMX8X9/e7/t5EQe643OoJw7b +8V9dd68F50XevoSRMRUx9OPH6CZPIp43yk5b2FJBrGw08XV/Gtr/IN4wqJ8G +2/Yud/6YQYWu827d25bnokl3TprlPRowfeEeef+bCj23jn78+uw6ip7zsaP7 +0GBV03PzkTgqqOf/vrBVJQnOfhPd2VNHgxZp2xh/RIURFHvbfTgFFoRCeZdl +08Bfy0Ko6RPW295rV17kvwi5FJBICKPBTa1PvC4479Y88bma+7uuJn3jU74D +2M+DWSuDqjEuedJX/yd1oqbz5rUJIh8f8j6PWevcBgNlfw65HIgDGW9p4a9N +dNgb2eOipNAGIkpbLt76mABGPbR09g46TK9OHJjlbYOvhZl1za4XYKpfqGkF +rrciYupkHLKFzp21VomBScXlZBweKtp8+dMBCvwyWvzLfFEsfK5MeDo9TYdw +JwbPmbz93IuFOMC+7CDJc+ZXpXuHQ+tA3anU73uzIip49uDgCuIerccH+Wop +cPFwRv4aFXuw7ahzId61SkxsKkemqNC6nTNU+PMaJNpdccQ1ggZjevZ7r92l +gtdMRMOIsCv68niJhUcRDfo2zZJzqLh1p8Kxnz+1d39hzKHyyoPkPBh5XFrn +0QsHxFrWTs6DAePGsQQ/6zTQdfMDcejapMBSgp95eRcRNjUqJO7TGN2c6YhW +G2lYBM3RIHX1qOeHhvewxD4kM+d5JDKcWLE7CCbBcPUihzTlfmAOW0/9/j4f +Ba/bfOS2z0cQND1df6C6Dc7xdjle2O6Pctd/7eZFuL+8XFhGC8dxGHHSYCZ5 +FTIqKlv3p3AatB59P7gf92su9Qo3NqHPNSu4qQeUsf8CLWVJA8eo0LtoWcLb +7+sg3+Du6k3dNOAc83qGHKngzc30tiRZC9SuB5p19tGgqaCg69Z+Kght3H+/ +wWoPOJ7dvWNqhPbvc8Hfc419ppLnknX3Dcp9HgkrxUXJc1ESy8lzmdXpPv/2 +Ph/ucI6Q5/qxILt5VL0TDobYX5nA/WjFfFp/gRUdjL4yzhXw7UyWb/IqWPjM +OBf1G+NcslIPpM4Oz2jXBzDOtV23f3I5ztPSoeaIVSKOcHitoUXdOB2cCx+Q +c/fhP0zrg3fzwhcON3LudspcY128fAgEuzmLZtVV4NIPtH7UgQYp5yx3vJAe +hm1RujeLug+Bu+N77qybE7DYf+3qWKwbh4w71KaHTFGMrKFxM9aNLi2OAytw +v2BvOfTgSqE1sMj5pIXgutFjNfnE/RkF/D/vUy3mdIGrzTtudWJ8Ztke0v5g +a9xm5p5DaIVdO2nf4ED95zlaM4R8NqhKC8kCHc2rjlZi03D4JXu7bnkrbLq3 +TOBLWQ60+F2srMH1UO+gbrKRVStsqwt+yPL1CnQtfJKdwTrf25BxrtAfu3K2 +aqigZyGMc/XM7ni8CvMg4PZAaOMZLnTTmuMd8buAXFm7zHsc5/eHbu8Q0hVE +Q2NPDYj37Z68AtKfmtXJmy6FZKExzzDSn+92mpQcbKcsiT0k7Tk/2qKSskmH ++D0iejOJs6KAou8UfmB+lETi0413KqSTsM5ne8IWUGuP9qSlvmYnvktk3WLw +vJoKyWMqccrWzmjb0YVflrk0aFiziHy3GSqdt7PmZoaIJc3ku82plYNkXg/x +sQbqq9ijyy33yLxe2qPr/P5KG8QfUfo9NhGJTjfmyHyop4Ns5ZCcEh8Vknzj +0f51vsh98beZp4KTUH1/vihI5j3Uvj7s9GBPGpoef3SuMGsStq5W1STisP/i +p0Pv8ZyeryY7SMTh0o/7Ms+YtQGrt9mhNk4XdLdaZehACx1ymaK0JWLrwOem +gv2i/SbohLReQimOz9Tq2ztGQ+rg7UX516sesKHkitSHq4h3+6Mr/S8F10Ft +rrN81pahmkXvVuzZjPFYLd7UblcqCEuVLc5lU4NEd2aOde9oEBX63lH+OBWO +dSVYJM+thfwlQjsr39Dgg0BcNosNFaRTUuaGbuvheE3LiXtPA5WBd9cGDKmg +0OfXWSVnCY296ckydNq/eYD/wQP85cG6m/Mz2/Bb6ClEHYKRN+EN9eHtUwVT +sDomgKw/gv4JQte2+4N5KJWsP1cyTUl+rscVj/bhOL8spEjyM3ho1om4l6L2 +nI/fJiLBZslq8l6OvvEgeZPYavrIz9IErulKkrxNsxeTvP3wl1nQLWSDrxoX +SN5+ujB4s9D38r6gPaTd8JbBWzJokfHz0XFCbb21MxTpMM8S8fNZ4h4Zb4ac +Np5utfbw+NUVMt42TjLqP315mrPHpzUw9+QRWf9jnb6S52UxeSUiEHkT9bV1 +FxPnvZfodaXcrR38+FXaq39EAss7lXqDfDzPDh/ZSOgQP/uifP+yOvgoKMRF +6BCWmCxZ0TwKBG9jn3fROQ5UA9thE6zDq+/d1NDCTfeFogm1+YUL1J64I+SH +8dS0HokHgq1QvCvdNY4vGnQ9Ix/Gc05DyYGK9yZFeF7O0624NeMBuctebrMc +ocPOn2fSFIspsOJ0vKlF+1FwGFlStBzjLi8jmv8UUmAi/Fhz6HtnSFKdX3EU +47ocw6T9ILbdXrF80ShwIJ60H2w94tjMQwV/v+tdxSNpaCTmZmq4wCSoG2ct +jn//Hjb3ZMxnr72Frp+XYNopMwnlUxePCChToTLX9Fm4aDlaMy+wbM8QDS5X +XMyZ7msB/nsRb2JdY+Hxci6R+zzTMM80tjP0TQtUrZK2tHgYBQmnvD6b8E7D +2Caz2eF8Cli0XK1+ftkNWq/tfvoZ+4l6JTuZsf8+4o0OdQZuQHEtCY/BeEZY +Balzspv4t2urJCH5NSz/pXPQX50zO3hIW7uPCiv1t58P3xuH7mudY0tKoEFe +7liWzmwrsFSMpMs8CkKfJHbqiP3G93i8tEeqrRUW3zY6Rd0Xjs4mPb6cN491 +iFNzYKJHK1h6UPZJcoWi9bNnRMTY8NxttefMqkAqBExwendLOKAVGf1xAxQa +LJJw8OoIoELpVPPiGWZX9G1v507eNhosr5CbvI1xvys+j1VOHkNfWBtb1mCc +6X/8N+0twRntRIHJO0PrUiZ90CbW5Y436JiHD6JX+VzxnLL8VtK250Fo79dI +PW2MB1lk/QnG9r+ayR5rZfVHyQdEwtWwfT95bXoYxp0UTU3WTvoj/T6VDRsw +/jYmKPiULwUe2wwK5iWFo5e3y19mYp2vp6SSrYjrdt/xO7/3dH2peRhyI4bo +Cyo6R3KI3zePmfGZ3v35q2Zf+2pd4v1zQ7z/FqYgKkQJe4l+vhaJ7mbyfP7Y +SgMWt+YC8bN4rmQ+Y2tMO4P0jb1uPMN5t6bBL6kT13ObTVKlwWtY0ZVbr8uJ +/oLi1EReYnxt6IPT22TZkKdE0wrid4Qo+xU/Z7D9OP+Bz0tcz6DbDdvE12P7 +AAoK2ZE4Ds9w8mdFX0TPrr+cedFAAzEpjnVtWK9u2lzt4XlXECVSuGUJvSrd +pmgrt6kNhC+diKA3p6JZy3crcih0eKH3I+4x1ucmHHsmRIyk0W4v+iyhz5cb +buCZsa6DsIfDPNwdGigp1IjTGM8LGZFZvz9hvPL94NLYTg1Y0jdI4vQELVK3 +ux5qOI51OzC1bCV1e6hVryzh55Ylsjczoy9CpLndF8LPHzzneAk/wyDI626p +ILgclZcj/DRRlCPPO5P8Q5/D9QzYvDYmzxvzvWUrwbN3vY0I5hmydM98Inhu +kvaqJ3heXOG3ey/tDAhq3bpO8GxUdugP8d2FovXzra+l2WDyapUUwee/4gH+ +xsNNc4dwIh5K2gWIeABffVojEQ8s4/0lxH2VdoV5JkiygmtjQRlxX0NmjHio +bTH2aJz+pU2jM+JBkePXAhGHDe6L3HAcgvHPxDAiDg3vypDxv1r94XHNk8fg +vU09Gf8Sj79lE/E8FZt9eevzILj8rUaXiOcuMUYcvvX/KKc49EVb4jAjDv+V +X/A3v/6Vj/A3H9u19qwg8khlbTrzpUkfOMruYEfkUcnWEnVjFwoIXHwU3H89 +EE3diL5sjXF+dd+1P/D8GyuAFX5FGEr87Cdnj+fTp/nvTkpjf/qRZJHF2h81 +G110Rgl/vgYEqtzA/izdtNyuL/sE8o2dKlmC/ek9eB/x4LlGrTOhIy0tCjmp +F/MJTdJhk+J8aTPm81yy+PX2p6zIim3iC8En2yGj/WzYvsEtnUzfU/M1/Ss7 +PxJ8frZT1ibec37r2/B3zccheZWoY8R7TiTHtilLbOdrp8wNxXAeVOdmrr2H ++L5OeYOTAY4rXrZfKTsVl6HnazXVie/H/LnRZn/XOtDxpKe+tlVGTl/OrqNi +vGTmVeWMQh2UexoVKGjowQEjrT6+O9MwUi/83u8cFST7s8f1GtPhlsxAW9RT +HM+rF5scwXHYyvlhz+qnUTAXZw95OA7reg3vv7hIgQ2JHuu4B2JhAqVwFOG5 +eH9/48wD7CcWHk8nETuYLHdoI+Jw+J5OZz/mLUb3qYHTsxAwzxSivsX3FXWy +Uet7AAWOePdd4dGOAG5lupo4jkOjBItHMXh9y4siQ68TXnD+7udZDcxzyrqG +sRCMGxcsO7Yp2h+E3rXXKGM86lOmtuJRCrhfELRQXhcMKQd11IjvQ7YOn1+6 +gNdvvpLPl7/UCeS3OKh/xfvunqwfrsb4d9G8SPOeo3CnmM9MHNvZ9A4Ks3H8 +OC0PPMuR7AtjG3ZpZGM7cR3tM4caqKDJeWf3RPVtJLmvtDTqPA34Z1t+Enhd +Gl0A48CRp32bwDeF5Dzbmk6BC6zUzzk5cUjDLGicHfPT7Gq18tjZWjD6HF9D +9zCDiHKh/J6yaei2rN39aYACYu9qnzs+SUYB32NPS/bTIWF1nNY4axvsS1YI +uU1LQWPtqVnVb+mQufhl570pCgi+M7qYr5OCEh92SrL34nm5gXG/IpsTU1U0 +9BDXwhbyflPmVcP8cDy4xfrIVR5RBmsXazUiHooaH3joqAyBc+kS+zfyj2Bx +Gpfm2rW4Xml2uRO44tasIYyjSmrjJgLvtWmUJfzxRUf9imkpIHdYLofwR1Kf +z5zw3/a9qIfLk2TY4WkaTvgfvOSjMuFn6Bczjxs6KXDq9j41wk8r9/emPzMp +0DQ8Sfv4Ig5qdgVKO+A4L5p9ukSrigKiPGNqEeqJ6HuZlNQGrPP1ip3L87FO +ULUKbdktlICWeDTllX6gwyP17Sdz8FzAuuuzVfBwIspsUdtpgOespbnV6kRc +sQahQAHtCLSsNF2diKuJsr5XRJ4mZqv2XkyLAk8REV4iT02dW39twfuOXg1/ +Fq6eCIqLbaWJfdW4fyqcxnrM43RzTuS5eJAMqRhMx/tOv1XhnH5IARuJ53E1 +j8/DitvhMa/wel/xsn4ij2ZyOPfvaExHlh77Oog86mo4nvc5hAqx4xdCG+QT +YTNFUZ7rNQ3KXg7UWjG1Q0Ga/eG7BSkQ+1HHkvk+HQY+WenfsG8Dg70HLxbx +XIArNdvdrjfRYQsnXwzR13xO34iZak6FJANPMaKvpUixRS8XaQP/Uds74Wap +MHWRxV++iw5w/NEawk7ua62q6zwX0IZaey/CzpjVxt3EvlpcF8ovF6Qg9loV +D2Jfyat2lrUy7SA5ll8ttjEZXXE/GFteguvhmIH+1NJ2YO7Zo845mIxmxq8t +/nyXDgKFdM+NX2ohIVNq+K3fLiTx5ak4d+k05CQ1HCDstKdRpVZtTIbbsxYx +hJ2ExHuTk9hO2PmkYO7BZAj0UN9C2NnDL/dgA7Zz2M5iqilgFyj3a60i7Kx6 +WplF8HZUcfFpzBvSiNiqRPA2sMjRbtCdAn5C8XveXfZHHRKPf+Xhuv09kZnr +LK7nMhfc1x5QCUKwP/TkWYz/KjNbNYTX95VVLC6J8EGdLs0atzE+r/ehStyH +ChHOTNUL7DYovuhpqUwnDfZXfTa/7kuF9FkOw6X6+5GNQu8yxQ7cd5yaWvM9 +qeCYkf681NsNSamObqzoosFm1bZoCX8qMF9U3bwQehZUl1QtZOF6ci6g9oYA +1qvbtn1YPGSaBqo1Wn4Ps2hwi+9MJ2EnVc+Qp9DbDd4tf7eOsPOvfeHvvmyZ +XzmJc/FJyvbYqATB86+O5LlqMyqtCB6W2LgsGbrsD3HPnWYJHvKzLZmJ87KM +l/TeiPCBQ0hXizjvhS0yDxyxnZM8QrXprYHIKVB+QwLGv8bFH+3C6+WWZ2uU +f/BBETqJrMUYV76u25bhTQG2FxHXz+SHIT7fXqcRnEdO/FKBQylUUCruMzNs +SkHM3Y35ek+wbvkWs+uEFxWCtVmzPus4g19w+1IVfK4t1kqrpvA865tBqX9i +7AnS4RFiCniezeeeo63H52XZ9v3i6yxLqEqas/LH560UmdlQjf30W6G27F1N +EKwLfJAdhv3ZtUxxVd0EFSxU1/Lqmaeh1KJHs7yRNDh24Pu1sQ1D8DNqoK50 +MAEFm39fsduCBqPhl/II3GNpxtIHgwngt3WfGIGfyb7T+mnXEJjxHXy590kY +GHEtnvumQ4Px88NXnFSHIOoXpJTzHQPbxAGbdjManB5ayCfWZ9vIKck/CUPH +BR+Lfsfr+4M3N1dsGYK0+6vOZTocB8EK9avVxjRYorEPoqKoUKaZcOv2YCLW +Qw3iPC/wfHrN4wTBW97OZ1WYN3jco3qD4G3i8wAHca7+knxmA/M06BHU5OLD +59qhmpgszDQE+3ctrCpTuQiG4CSyxo8G0TSBGBhvAw2FXfFLWFLg0GqFxKwK +fF+TpvnbMb5+ip13MUsKco5qciLwCfWsMS3Jdhj9YCnvXHYe3dApXSGN8+5g +6+e+PPZ26JbLGJp7noQ8RSJXWZTTITopZxexntaTYOBddh6aQizUifWxGuXD +xPqjPF47558nQduTw9LE+vGd1uR5LXbatRcNJqKQ8DbyvDlNd8j432BW14fj +H1VsW0HG/2YxpRgiX5qu0zRwviCfJyrzRL5M5vjrNOD4kWLJy9DYGgk85fvL +buB8LN4w/edwDp5/qU8vCo6fQ3xbHT/14zlR+d59f76TVAiVGfii534OFLov +Jp1ppoH+zRIST9ig07TD/Rx6diGexIWueNFY8Vy5dJ2OtaRfMrpg875sdz0N +2sbXKzb+wnyWdBd/d05Gl43+2K55QAc/x5k4Nk8KRNdWqGZon0RLqbGtu3Ac +yvC8cdLEdSNIJbEiYyQKjLx+J1zHcTt/K2PfhFA79KZbrIxKT0SmnRsqfe/R +Ibtda7wP17F5d94jJs7x6Nmr0g+GuI4F7voi/46vHd4tfl7y5mcibNFWvMdW +RofU3qBgwHkxXyqfMjcSjV7SBD9NtNOgvuaZiyL259dkROvTkyfhuZ70nB72 +x3LR0wpRnC+cx93OmzYGQOrr3uXpGBczqlpy52sbPCsJpqpeSoaUbUlC/fhc +m1PP7zhwmQodr85fGnt8BJXUcZ1cU0UDE6YdqVtHW+HTS1f1mdU66OR222Mx +f+hg8y3hcAzWdZFsf/Lrhwa0rc4nRhPvcurOyiLOGBc7J5PizTGj3Vay8xnx +u1VUVl7sqykqXMuiPw1SNYN+y4pHQRE0eBOhcGL8Aa5j2TGsIz6u6P0LfeZX +wziulruK30AU2JrKLOAqY4/Epo1rw3A/5ciy6Wt2xfXh0NyOow7KqN0igknt +HQ0EdwvUoyNUyNh6/aaRhg76bPAo7cF7Guy9zK+f5dAGH2vu95mXm8PJEoNv +X1/RoYPpBlvCUwpkr5X03f7EDt6MnIq1wfZpKq5vfzsOQcLthO9/7tgj47vv +ZuY24DmF/f3IBtzf97ZrV+pou0C4R7FWHfaz859zZXRPEudCN/85l8deBg/R +60rFssVmaq6dY/BwPLH+KsHn/ErO7d6S28Gk9bovwefWKQaf9esmdhiLDdbs +Oc3gc2TPzxZBcQoszVHa++XgemRStKbi8E86rONkmyO+Wx4JauGJF3xWs6z5 +7BHie4Azv/u7nMuwDrepXxzxwBX5v6g33IH1yS3ldzFaNRQwO7aubATZI4Nv +O4xK8HljIxTB/1QdJHJ45v3qV0QBSczNnMRcoP8681IfBe5Nu0koxS2F4Hf9 +KqkDdKDo07hjbNrgxt2OHb8oD5HSxjazwiI6vLt7f7AS+2Nl1L5t2zJWlH4o +PI/Q+RlFTNeHbCgwEHNgPkuqFFXdaZp9NUgHR5U38WrBdfA6pVb5hrYQbFi4 +3q9F/E6nlzkaFlIHN09kah58KIxyqMLRazH+hdXtXmdoHchz7rss2CaF4jZ8 +WxDDeORb3VMpeD2txfxx0EPsp8yn1zLE32sEnOquxOtbZpfFWP5cAQNj2TPL +MX5f6/MJoeRm8Fwl2Su1LR/xBAq07RCfBhEZN9OzW1phRHZt3g25e2h3sGmh +/zc6hDxx3lwx0wz2IrUW3mMliLbrbroZD77HVrH9nHUU0F/tdvt6uC3KNz2n +qkj8rtTuo9+BebALbQ1aSOIAZb1cRMx3o077mr7h8yYM9Dw8c04QLgjXtalh +vLZrgL//ZB3kjym8ZLYVQJ9KYhyI7/SaDT+tP4Xxli8NJ4M3CSKbMptu4vuK +xZ0TQwasLcC0W7+EtzoNjns4nCgSm4bYtk7rq3jf71Y9izzWztXYPpXqIOJh +za87p+/gudJYRz+6PowPKexObyL+Dkit6I9EBl4/UffQkTuDCXU7F9YR63fL +qv5ir8TxU7hRKO6GE1Lbv2CqjeP8/L0/evzYf6mlv44sFhOANZGXN27D61Oa +vrl8xPYjQu/6KPXww1Ehu3Di+8YND/88EMHx5lDw5MfmVnsw27NOohzz861+ +jW3sEwps3rKd236fA1jbd29pwDhdlREPfrlkPCDpf+Lhd+OTWsJ+7Qtu3b2v ++ZGbj2AoYf/1WZmy4xivvDz0XIydB1Wd1VtB/I5zOeFRRyTxvWXVi8e6J3gR +m/33g7oYN18hteshtRl2msQd9xJPR763DQIk8L1r7QImARw/B4vMtvKaC8DG +DSlhxN/rsRoz+L8f00zwDzr/8N91OSWqH9/7pYwn+31LjwCf3OgCL/ZfLt2v +PRr7b/ltWj1ikRDa83zvJ+JdutiZce+vDGeIe0cJ/9w7/8rT/k7XmuGdVXn2 +jG0umN6p9nKXmAaT7zeq5+OG4CTL958N7KdB+7Bwe7cwDa4wJVzzfjEEt9fa +7ls/fg74rnWPrBufAKerHGe2YT1zwDgrUibeC7FduLnk9j4aXNq4QcbJug6+ +eoXsNIrxQf6Lage23Z4GvSec63fifKdva1rmEyuPGnRW+HNjf9ZFvv+tOdsC +u9gXvJcrxyIPExX+D1zTcOL2Ui8r1xYwW6ibs0pNRG6zN7uvCU9D0oYxWybZ +Nnj5uvvhwTdr4ZHqrzumnXRI117zRGZxGwRGf08UqtoEs26BdpXduE7+UzcS +y8i6AWv/qRuSdYz8Uhci8wsK/smv5QKhXqoSIxClxPTjpIg/rAqeGvblHgdU +EeuvaVsHMlcalNp9fGF5ErumKD7Xg4uFL2+F1YFC68i7znQ1cKzMURTE5xpn +ZvB2J82G4A3JXGXwpjl67MZASgsUcQ2+PDoUB+/3FlzdITgNqosj56OPtkDD +Wy/Oy6WJMAt2TTH4vEwhty26ie/YD8vJXW7kRD2rDiYTeb1u0P8EvKZCiK+X ++MygHfravZ+V/QoNgtbSBQ79psLV115yXKssodH+G7oSRIOW1+ENrDi/Diau +WWDLdQLJ5b1ZRH4ZHVd2TC/H9VZjQ85+Vxd4Yv3ynjiu22+1Tlan3MV6I23n +9TcUZyjiS6VFY9xv/LSsZn8/7rOhFoXdbShTivn2x14aZG75fWd2bRukLRd/ +VxSzFoWdnDthhu8lazZZaYFOgU/itXdHo43Rvcspdtx9dBhqm1KrekOFHKTR +67nOCVq6RPJ+J9Pg5/Xzdss4hkC6eL6hxNMWud8rj8dSCeLp5gaiOF9+fZfP +1X+sAVGhGsuJfBGcOLvjd9UQCDZwur/hq0OzjuPiP+InwI7V8UNjMwXK5+8l +Drabo8bpI/uI76ASm7jOLtCoEFO98Ran/irIf39S5UgUDXzYVe5cL6XCiF7h +zjPFdujJAy1Lkds0WPVJ8Fok5p99/nTsU8Eh7f0RU3eJ/rhoWfDXJIxLzKXH +rIn9qX3t0lY1Ah/+p86sP6lD1Bl05J86E/9Cv+THZiq8uO6SeeKPI4oPaunf ++xPPKWyvs4N63kPk3HTewcQQJGcaFrVebRKa2EvczUUHIJ8tqdZuZTYavaaS +Eqb5EeKvhaiLY13dJ8XVluh8Gp3nfrgn/hEdRKeirzFH10HHvAmroaEqEuGT +f/umEPt5pLq7AdeTd5I7NDgffqp5LCutug77qTeUycp6jIp1U9/RvStl4WSE +28yzbhp8WXh2TNqBCmJXDsiKJarDIZ4lKe/7abDa0GKcxxzPiZzByU9O7gR3 +5tsC28dp0JX6mv2OPBWu777PdczRDnR18tn5FmH/u/vfnLr6Hp613GQxu3oa +eujfmcqsJmH/I8FFnHd7QWBno6iyXBbIF8Hyhq6P8Dz9xJWgJx1w8mzseCVL +Amz9dmT1Sy869Fwo+KYdju99YNE5YwMJ6Eq57MVCfB++JXVsDT5XRGGVpnAQ +TXvHQzVx4u9ZdrF7BBD1OU1SfsqCkweU2E6uJOpz8unFG6MwfsJuV778IV54 +9fjqfqI+r7Q3st3SSoF6t4OUsxdN0Um7MFtHHCe25nnPTbsoYLUpY/lGWz3k +kv3ybRLWD+GdctJmGK95HfiH30YPYjdbvyLwpz+Pdx6iUKCaJZcduHXRcedp +9m3YjnO8dfQFjI89HZxR4tWFOrndSuoYVyzem3X+VjOo1k1vz7K6js6JTV+r +x3U4gf3qnoWyZohedmGrSVkeUhTZd1Bt+TSMNV2svIj7r1Gf/XFXlsuAZhVH +j+H+u+c1Az/+h8TRjX9ww4GoXSr12J/IYyoSp2wg9VavMQuhY1kY9jNPkfZB +6h/7rr3dDcTfU7yNPvLnqxEb+tTDdo3QUXskik3C8qiAXK8vlqUcQabCekrS +5TQYSKQ4mydR4G6x7wnlRQ4IJXKuYpqgQz3roQ8PL1IggNbVlrjeESlLerka +jNMhbfzLrmHdLujR3HZxTX0qGnDa07BrHR0cEnXjh3CfWl3wk4dJ067GR/r1 +WXW8r62YK4+KBxUe7JFeps1cWtPEozNs9ZYGZfMxOWHX2+DPzFSyQ9ZxYF7V +Txevx3Xsn3xv3vGAyHdo+ifff2TC3s3Y/9GzonEuRoehNG6pkgn2/1FtOJXw +U21UK+vRJkc4US7lQPipfK1c+mcdFb55RNjZ1TmCrdSA3SY8Jx6Puf++WLcF +uMvt3D6kpiA/SoNo/LJpEB93Z45pagYXZj0NRCtE5wf5Wbfiuu1GZ+Drt5E4 +zA0wcJvgtIMR0AKCBq9ZPINSQHOHncVTbKemj3Ffv7eHEPeF6v+5L/t/6lVA +4HqiXqH6f+pVyxLOi7K439GfNxusvL8J6ZklSRH9ruOYEFPuojoY/e1l78jv +jXZd2LrFu2QaoKWkh4VChU1+zyI+XNoH+pcr06LSaBDGHdBA1OfpPo6C2Uhj +2H0+ZTdRn4X562uUtNqBS3rqGfuuWjAJod3daUOHmi+M+q/pQ9Z/uLaSUf83 +KFVP3sbxs+qaWfHJuEVQPbxsA6HrvOVgmDMXz1Prx0TqQp3haWZhxMlRXIeh +xv0bxmmq12TZ6c6Q6HQ2xwrj5zZRVQ9lUUBzIJxJaNQZ2k8ZuP/CuNWKFKNc +yVZI7Ri4VvstAp7eXlCYWYL7rIHVmOYdCkj+SHuZmOAKm9XSNvzAfeqnwgJF +Zq4FmpZuX2lbHoGKM796iHNPwydJhh1LCmkHvfjHjvjHzT3szEOgg7uUNY8j +eC1o9zv74zk6ooLrUysVukIzRNnDzdFv3V3bUjBvGrxtz7dYtsI+D5n4ssv+ +aAOv0I049mnYSGNX9mqvhZrApn3KUi4QYlX5Tukurldb+1QlMylw41TfNp9O +J5TG1pi7Zgyfa/Icm1MBBZ763RfNfOKMXKlC32tH6FB6ev3RUIzfurzutumA +M3Kqf5lWg/EUusSUlxbW1SFWFuJOAUhkrf9962Ks926sO/Oybgj2uMttC+ut +BZnnV77rx01AaQ4DL/8jS+Bo9WsGnm41yJaK7+tdnl5YsMvPGqdlMyuJ/sVe +mJNk96sV+rbffKu/AEing9Kx+zcd+E2XFpbkUSCwM3UH4nBB8x/nsnTwvXhF +1ey6hO04rFHmjdJsr7lAN/xF3Hux5WePhpZmMN5ydcXLpkxYpjKXooF1rzB6 +vted+Pe7xLlgwoYHmRrFqhH1uTOv3Hzd2VoYaIg9G+Poi0JW5V17UTYNb7ft +L72C7Vd4v+imZM1pu8VVDxH2J++d9sjG+MmhucqfEk3aQUKcNwicXZjH6H1t +K3wxd2SXV7NB0ace+/Qs0MFzeLrAC/tT0D69aS48C101Kennw/4MVFaNEPPI +2MFh87MazJDPb1FF2HmeMnT/Dq5v2qzZia/L7EHh9KKlX3F9iOHfe6ua+Hec +nA73CS6wgaVxQypRJz3z7w/L4/s1HKs3YldxhrZ710tW4fstFLDeHY/vkVu5 +wlV3zBkEIt6fr8b32BSn0e1zYBi+FYWvn1cqRrlTIrqeXhOgZ92a+Wb/EBSP +Vdxf7xYApx8+ZHmpSYMbWu/zHx0agmMso7uuR9ija8/ePF2/iQZ11PMX9om3 +Q8f2daFHv0SjtyPhoX136dA2OyzenI31YcVYkc6UExIVORqX8IAG/nFFdY5i +Q2DM1OXCrOQJKqJ2Pg8dcd/f8Si3s5oKJ16PT63rd0CaEq3XTXJp8FW+1YDz +GhWO+watVr3iAGaym8bvPaJBqGpdT2kuFdb7irVPitqD6ljghQJcVykxxrYG +T6ig1VN1n+OrHfDyHJNny/3f3xtcuT/3cuVxKjw+23uufPlKRCmpp6I3uJ6s +uf9VWJwCz655jqf46ID59KcNxPvDyBbr7UtSKfCHs8zLXM0Bfbj/ZDIX34uR +6pf0H25UsPJQq1W/sBbFOd1feI31THm7cw0P1jMeHbW2Xsrq6NLil8ZTWM9c +7xik082okH2k0tJw5050Y+Em6z6sZ7ge597b5TsM0Vf1/bYwXwd33p7yeqcJ +EDK22pZNzNGUt+F2ggKwx//nr0343o+Y8V8Yeoz1nt6DW05Sjujumd+bd2Bd +/cdg9fLB+xRI5qwKW2bthDh+HxGewfhHjXkHYn1v04clq6UcoUuqAIj1qQ9V +utZg+wrNN09WtP4fXdcdj+X3hsssmRmlSLKTVRKKu4xC9t6ylZFQSQMNI7Ii +ERllRiIr1fOaRdaLjBR5hXitUsgov3O+///+vT7ncz/nXOeeZz3sJK6YXF/8 +3kjnKV8peZTnOL0Luf4ljh3CjBKiDuJz5swegRgPpn/9WSiGnaT8ti8C4xvc +g3e2X6uHiN0HGu3sd5EuDv7iwfc9x1QsV01R/tzQOf3+1lZOUg/zHRpxhKf6 +3D2bmzoKczypTQOb4uC11klg3UIFFSLhZwvqT0SEvQ/nNg6Q4zb0xPfyaF2N +Ux+j7zaFXQtiecRKOpfAXCiN8O+d67plCqMg2pH/9JR3EIk74zSrowEVPM5T +W+JD68GIjWfmbac1KVrkyDcqykvtuM7JlSE8JOMRab75KGnOg2o1g/DQ2G8+ +xy93gLrn6h2VtQiS0/fwkgXOeeCT9qXxu9cBwneHn6w7VAHv11zDP/Mo740X +7GGcawfb+EMh+4bKgHankcgG/TwMWlZmamiNQk5s80fO7yGwt0/uErM6FUi5 +ltoZqP8wlzEtkc8KSXcKnuD+S8Rtm/6E6rjuXflCO+vEYLIk0I8dn1soahD+ +gNeLVOT+rO/nILF99T6LeSCpu5y1uTwKVj3X7byjI0kh7NEiSYJUaBQVpcV8 +Bu1LEWjdFEcaTIm+i/ms1/O/ie+HTu7e1Dj1fgspTJpchvfZdRz73uyuIEM5 +87WSj14uYARtvZNIH6S4DDcAxbVme2swjHGFzUORXTiufVwM+ccvUg+Hb+4x +yHzpC8oNlizyxch//pgjPKhkKHst99EsoYF0fvjZubrAOXhRwOO4JaUbKuir +Lp0Q/ECqGEjpYqDOghpTtYzZrXq4WPk8rkn6KFg7crAMIf4/aqZczd/WCU/M +VTUmf1wGrrehloDqcelY63LNVjLs8/MX2XdJn+RTJKk/i/Irx9srL4xHKPDk +8W2fV8FqYJUskxh3lwpimXln01LJYL5dky7vqgvpTNXIUhDyhxHpeiKRqF5Y +Wrvqtcn2DCnQgH9ABNUL3raHRm20kD/htzjdom9Ien3KrSpoDvkBFhHy0Ucj +kPg5wrm9L4QUnNSzcgzVEYE3D2n/Tv0MJifaakdjMkn7/vC20w7OIPn8snwp +XXBneO/re5zupPoNgyWZxjnQUCwOrrlRD2+Y2r4FhnKQzqhGnNqC+Ne4fPQt +D9KHucZsowDBMeLM/JUMXEec4aT1SPWkwN1ddLpjTEIQ84hL+y3KPzkWHVI4 +XClQTHf3e5miHLze+qZiBeU/Yu5Wsg6W+N6Kkf6z0RNgo6utJD1GBd6CPfpD +yqhuOvGa9cS6OfAJKGXwL1Phg+eFJa6vI7BfqbSxnhQAtUaTT1plp6Fux4mx +rcbDwCvb7vlsTwr82+lGCpecgZvC7lShY73Quujt//BkIkiszB44Kj0HtHbh +PCfRvJy053MPuKgPYwJDx/G82L46dE0a1YNXbTmyXviJwdhHDrVeNL9Pyp2a +mtB4eTLNY75r/FCllZNSwfXgtHhK1LlaMvw8H+b9K+AM7Lt0WckZ5Z8fHqQe +iXLuhA36wfZtR88BV3xeWTe2L7lYN7xuTBN9bl3AfYZYkBH/b934mR17eHky +GXT3haZ+nHQGTs7Dil/xe4kmCi9z/nbCrMTdwYn3u4Fm/NY9epRX1L7f6lc/ +ToaiZ2U/p301SJ/Z1TsMh+Yg569YV2VGO4Q/2poWnV1KenKdQSSJZR5ubjhd +V1geBYcem7Mc21Pg19CRO/wNU9BgNnjgPtbPEtaM95TTJKn2wJlRxIOvQePe +PV/IcP+3/0P23BMk34dDFtnDczDESx5b7SCDYudBj0iNY/BZQHfGC7U/8YU4 +guWfbAt9smN7Cmmp7U8llv/XyEQ71qUDZvj685x2RsFXY2OJNZTPZ6/mTwXw +jMJw+tEDw3M+pDsFPDrVrlTYtVaha4P0TcqJIvilcD9Jj1eyahvi597u3brs +yD9PSXgaVpjtAjkFkiT2zw6aoUl/UX+kIpRlM4yOkZJZnGJwf8KYHyTicS1q +2j4+RjkNBk9dh/G4HB88Mj/0sB3sLxS9FNv8jDRUyKZkiOoI7ZK+QyFNZOh6 +2XBCV8CGVFD0lbacMgcsxcuCBa/a4Xr97EDJ/nRo02onZaB6c2ArbehW5N90 ++RTD9xaww0Zmw3m8vjoYl+tYhfwV364nHy382AAY3Hzw+q1w+eKWDwiXtJYS +0GRlh6sfjtfi++b9yhU2dG/JcPe+kbTpNieIV5zSGkD6cyvlr34SiQxewnd5 +++kc4aoh9WMwwgMtz+sw4Xfe+jhPr4azk4KGznvg7z56zmiO5Y8VlZW95GIn +hWT5vsXyX3bzX/i1rQO6M7al9xYkkHYNHo57ierc1kzWUzPPkZ7cVbp2kSkD +NmmuVHeicS3orLBmB7dD8df7ISdG8qHKMto8GrXv+TS38TmhHTjHrdYSRJ6Q +WI9e4b+E2k+nlFSmDrTDqAPvxBaGhzAhIi7wFeWH8aaDMYuOHcBUfUPKceEu +ibX74XcRbqTnQ5nxWD/rztZZRWWXQiAUSWL9HF2obLz2qx0OFudmRTA/IFXt +idTKQPW1m6u8UGk9GcbvqLdfaLeH1fjjJC7Eg4JdsXBcTDtYrbvxfD79FKRe +DX9bR9899WPt0l+8nj/6JyNig5G08yf1MH6P4jlH2sde+Q4YrR+57hMUB638 +l3sjdswD81M9FcNUCujURR6FzWdIeb3iwtKvqEDPsZxxFdmjzcez42NfnEmT +v+m+TSB7zFb0+ort90HoT7f0q9Oq6Qp1wdh+I4YZnj9G9den9fre0EOupBaF +wLgfKM83EPCLXGamQKfTzn9rb86SIs6/bJTlmobTE99DqnaOwMlO/9275GJI +pV9L9QTypuHU7efujLk9YKaxdOPXuwjSLs1Jz1r/OejeFJZzw7QL8t2LLm+X +dCBtfxv7cb59Duz0JAiaxHrwPGfy+6+LHmkzKYjrOPJX7EIbJE5kL2JltOz1 +PhvEybm/LNhepo4rCL53R3WZDa1Rh8ABGONUdFUcpEKvef+eT3YUSCrNlZ98 +dhSab7ob54xQ4e30XXVbFF+O1hlNTpkagrrw5kAcX465XBRcQeP6uRjs4fHu +LATr9dTIoHHFf7b7R0LjmjaIL7E8GgM+E34FvGhco99yx2a2DsBzsQz3IskM +SM+5SeF6Ogt2Tg/zXyx2gZ+f4r5dQRdgNnfnWF3lHBg3dIbXvScD27ekE90X +LUBRJMHGDdlj3eFbfxnReG+wzBXnnNEDkvTlb4DGm8ZiFIzHS77lfZjFZEM1 +75o1Ox7vL/+WfWnIXsoory9W/fykyt3DvROv8+dKyZPvoXnsM471TfFaJnqo +R7XwPD5c0NzL/rETBAXzNUs/60DUj/L50n9z0EP1/ReF2s/r3PUWohknVEqN +/rtPFLp/hGWDjQyZF6k2gQOyJD6Pl5/aVubgQhXzebzfdxO8w1sbGomfI5lO +uD7q/fUgHcd94yslxRs31Ei3dp3MwnF/SietzPkHBSz1TryaUTMhxc2fnasI +psL+xyXf1w53gFFe6RPn6DgSX8jt5ACkt0U3Nl3Bdjol12GrMpJP0p9NMMF2 ++sDuuAH2by3XWcqRfwNb5+D//Nv6Vn42cfoO+NrJZP3yaQIsJ04Z8CP72k6f +GozjF3yRjPwRcIZU58d7FMevWBNPweMojxK0u1BlH+NKEr4+3obzKHrVuwY4 +H2O+O1AuXLYFSi2LynE+xvtBkiBVkoHxxIWoM1tcwPbUH+0XKB/TS6cvy8fv +sBntHDi5i40Um3l9GfvDF6rBm/c1kOG58zdeOn17UlWsegw93pcRk69/wN0F +5/drSc/7G8NNugH6mr450KUdtjdW6YJUGxfqp3dWwKctyCnXNQffbY86c6+Q +YS+vl/7jIB14ar6TXDA4B00hbIyOL8iwfzKF0e2oK8httE5Eof5/q1zh9ydR +4IfjyMhFY0cSsV9sOT6TClcCjr4LQPK/PP/Z+HHUitSUFapyAMlf1BrZhPuz +socSkRBoTNrWOiOA+3NIVKeLFX1XqFdI1/e6Dmnix/GqQvTd52sBivmtFLAa +bv9FTrWGjB/rJ7wfovoogycXz+8TZlfpk+omwNjbs4Tnt8IlxmYz0wB8Gtgv +W7wvgzSUd2MnJ7KLoMZ3wo9Cu4ES+eOHgsBViKoXWxjMmoMWsiAXgeI+O02K +1y8PDZD+/tDdCMV9u1Ozd3C+mir7qU9N8APIl+RW43z1E4tnQXU1qn9fscmN +ldVDof0LaYbwKVCLPKgcsXkMBNxyDCuVb5Hiz8cflF2ZBJk2iaufCsjAz6kk +ebTelSTCu2eXN6q7F9rWOHOQPhvfb6Sb2byJdE6U8TzWZ0t92ldxCD//+0vC +d4sVopqHXQrbxVpdoUw5wktzPOIOMdKQNP6uUnC9r8tiH9mZi/Qtmex1pd4V +nCcv/u5F8t+yySi036mHvYtcIQMWxyC2ZHKuCdn1Xm8W78MDHZBucePEifvB +oPfvcYAl6zzwR4gO+09T4IxF+1G1Hn3SLTbOQJZbVEj3bWpeZR2FiltqzLmR +XmCdWkrz6RwVzhY1GeD8/JygzUmUn5O8VlRtcH7+lonhP/lvDGwPqt8PJv2O +Sf5PvpZsyzcsf/dfDY2Wj/pgHCEWgOW7TTWJpjKMguapuw68J12BwSjzZ7Iv +FaiL2Qa/0zvgixqLp1f0bVDU+03zjmMebJ/f3lwxSIHSi6mLh1ONSH7eA6vm +MVSw7WeqzsPvvwn2MDVsbVTV/ZNtjvmsevC0ohXhtkfzDh0WpQNeUxcGzBuw +SfOZx9aB8r753aYtMiSRxsvvo8rmITZRskAjjwwrwS78aq9cwenx74PvEJ9O +U2pnOg9+g4OeXEsFdSTYfnJFLEtnCmS1DldhfdhQeFuK9IH05ljJHqwP9+uM +G6SSu2Ht4ynfTwevk9L/xu6JfTwH6UfaYvJR/sO8XYKC8h9S1N6kZpz/PD3F +nlu/0gkWN5OnFNZFSBJjSTWaKC81e8z/KBG/Nyhqdvffn0HVazkrW7A+PNep ++Ir9bXjo/i37lJdVlXqencL4X56kP22o3mFKkvYsu+0CfGnCngEozvr39FfJ +I7+h3c2RXMmxDZxN9h7E57fpIxlqpbPrIa/NKNE8zBMOdxlXluTPo/px78b1 +TDIkKmc82OHjCqYqtAslKP7+fqrBifXzjbzj+fr+P0SZOt8h/N2pYkFu7Lcp +g3oD4QOy8D6wfgD77b0l73KwflbZ9Z+8jvSfzjLjB9ZPIa/SMDwuCWEGCZHo +QeKVXvXW//T826Jv6Mt2yFrbIRrB9xgOb90m34j4iZMiH8N53Z43D9SMtzmR +Asd59XBex6hMarz3lgJ6ZCnf112OpBv0O5l6s6jw++BCgS8a7xHnNgfrcywk +2bS7NP+9VynZWWL2pBYqTgg5XmuxhhaBruVrNfOQQJ9xAPcnlnQpPTtzRTWd +a5D5v3VIoZAIHHcm5h7k7tBuVPXxeOn4n51KR4vhuFZw6BhD6mcd0mSx6n9x +bWnfbgHc/93Bz05H8z0mvfebOYL7XyzVerwYydlY/B7xqWkTWHFX78Nylqa3 +LIbEkiFHfhPvS25HeBr8yXN1cg7gu//QV/wOWNwfeeluesjqPaaD91u3bJI3 +y7GrBxM/+926oUFwwKP5L9uzecjsnz23NZ0Mws3f7bnWXeBca5msGJp3yb6Y +xKdIn4XGZyZ7G11B6Mc3lVeI/xC1ezMzDqNwtFcmYCn7Noyu7y+1OkgFA7cI +uSnNUZA8ND/5QTqEdJx3+UmVBhXMOGVb1lZR/WivUzB/wJHEmKJJcyuQChcO +a3OSI7rBwPDM/MOuqyTXLMu4usw56Hj6W+fnQwp0COTLXFW3gTMOKfd5aqig +PN3/NewFBcgy9eV7485ALNX51Y1CKqiETj533jQKDF3HmPf3OpF+935k6Q2g +wulTymJv0fzm/bFaZx46A+lnq3dWovl1uGz4gsikwKoQpLD7OZEK7zPPz5VT +QS52PJd55yiI1Swb3nPwBQPGqaePXaggRPIZyH6D8oR7s0IyG44kjgSK04Vs +lCdcn7693WIUBJKyvX3pb4HvaElppiIVgo7H+JxQG4UDLi3+cPEG9Ie2mpw+ +RQUac6aUrVKj8P5gw6HV4UC4nLCgyWWO+knelnjiEYpH+6o7/3XYwa25S82x +1VQoePukDPeT0ijzEPUTHhTemsX9FLgxf/YKQYFNCv/mVfkcAZQmbiqicXXS +6EVExZGhdvEwX4mhFTASxv0DSB/M59h5+mPIUHHq8C2pWkeYrd7cxj41B1HK +rBMyEWTwz+zfubvCA36Zk6jzCHerZdWgu0yGTVvVNPM0fEGx34z90Mwc/P1c +VjNiSgZOdxEvj7kL8OmqSVnFjzlIXk8TOSdBhuCILu+I927wQkry4KWlOXhB +/3j9Msrnn8ptAqkyPSi74VO9A+XzhUXeI6dj0bgS1do1Fz1hg2Pkk1MtFfLy +tgp1hlLAoXzm4pFcH7j4Svv84RYqxL5vM6y8QoFLGl55s70e8N6r5OrtDqQP +obq2Epco8CGkOvuDtBP4/4nYOkhG8lP+ta0HUODjWQYl3p9WEH6KnsDv0ZVd +7D0yiPDgF7H+xknGkFR99301wq0opvv3XKQAp/Mvdhrm08Bt9FP/HsK9k6SJ +UIRvE6tbH+bQgB/ifMO6XfgeqDV9RSIZdgXoXA/ntII/iT7sOojnvHzGDcYk +Mli4vb6u5eoEE2mMm48hPNQ62LYVzUsWo2hcjJkn6Fv6tL5D+PN3W19LhZBB +bGsM+69mf/B8QKu9QJ2DXaQiOQLxLHfh5iGu7kB4HrjlSB7iOWyDp4bEQoZ0 +EN2xwOYHXY2JnjSrc2BSoSDGnkcBGS7xtYxzluD5529P0wsqjJqzLDLfp4DG ++gWjrtcBkHlIiHvwLRVed9xNfRxMAadtJD/Rd/4QaCJG8/ADFRLVSoSyEJ8s +N5QHnQu9YCCjZeQm4jPkpPkY4U+BB5ycO+bdnEHHlanOsxvVZddTmE0RrlTp +dfKwkjX85X3BVYHw4e5ZdhLCeXXfWYruMIZao637LiA86upiwBnE/19mfwnx +bG34JrU4vAXh/y7oO2xCPNdt1r6llKcG2Q+2i2Yhnrty2KskU8hA/4/LNo9s +AUXUtj8vkF+67FPf8yKNDC+b8sxmFZ1gTu3oJ3mEOwUQoxoI783iKNdi8Iao +9/k7j+L9Kesb0dsR/8e7agL0LS6DqWOeczPivyC97dmIHRnaJkcFElVCodPo +zzG9+TkQ3iOedry9E3wUPvIE/b4B/DaPS8aQf+b9+qaw5CXyPy+oB/rf+kLp +Pjom83wqNDoduHcliQL0QU374oeCwXOgUZPnDRVqTQN23wmiQL4v57Vyjitw +48oxzcF2KtyQa0ni9EN1nKnQct3IefBfOfThYg8VVB/MZzf4UkD/UWByQb8z +HF/Y1m3zkQoRRw4VXr1Aga/HWkIi3axgceDbzUnU3rVjb9RDJOdL2L2slnFD +qNx0eVYW4R4N4XNPEP/qA+NDflanwO1obPEtxHO+jB0Vv8+WN3fIM/7FcUjl +VDi2gHieEDFyKED+/7J3ylNjczPgP2+2woN469Jstt3+lAwvjq94dTI7Qseu +p1ZHUBzfYqCrY19IhqdlEyJeP7zgFYubnhmKC9+3mLDx5CP9jA2qqfl1BfYP +7aYPQ3isXNr56qtkYGCMfzhhFQ5tOnyVPNPIL126Fu3v1QlP8uX+tSjdg8o/ +AgoX6OaB3HxnyTWeAou26aUmvyMgUr/1qxlBhQZ6TYbXiB9mGv5uLeMbMLx4 +TFEY8RNQlQZznhQQUuJ9N13oCwH6dw/69VOB4BZosPKmAMOt6RFlDmfgVz+9 +L7GPCnsLuGTjziO7jhPc5CVlAYx5TFfEe6nAm7wgF4h4LuaJTonp0QN6+eo3 +M4hPmS0mpAXEs8jX5DRXUQ3YuujGt4z4DKmJVt6O+BR8PTInYHMMiOPeBscQ +7i3kuIWcRYb2Yae5xHtGkFuclhuBeCPL8Rm2PSOD5UWO0cHtdsB80INDGvEj +X3MqbewVGVZND9mGSZ2Ddu6VJnyuScnx8fO5FjLkE78s/ASDoLh6MPfHyBxM +c+15lECQwZrH+JHGejRk3LdbbEf1OMeiw4aMUydsvSeZzr2WDhWBW51MaebB +czf71f3If+5v03/VWJ4ApmlO7tpIDy8wrzP/OEOBu3lLwvWPQ+Cx9fUNk2Fk +v7HkE/EuFGhSL7d4G30e9qR8PaP8hQpbmlKS3iA+P7APXCuwNwFh0v11S8Tn +h+W2MX80LxM1R5rqlLRAqvO7/gM0L7H+AWCJeNM8yRNYz3YctkQGv7NBfP4Q +NgksRfp5iaVvb4GBAjydZrK9inhzZ1UoOZRDBkVK7fvH7Nqgty/nIhfijbfQ +X9C/jAw9Te18bRZmIMa0l9BG9aN8R8ejkGYyyBxvvnNQ1AVyrp1g0UI8XNlc +/WZwjgwCfey9p/5chFPlLdSFz3PA5nLyjKxkFzTRhhZUONyDCyyNqZ+75yCn +MuyK6BgZDFgo+hfcC0Gvm9n4GMJDCG2l28rIHxqUZRX0P4C9tS0vZ39TYbyg +50+GLqojej20yxVvQFLFzbagaTQuRvFTgnYUuH1r5gKP0lnIcp2/yk6hwtZ/ +x4nDXhQ4lLmz7unGacgJ0Uu0QPq5bBIWeQ/podLjrW0GDifAeXeW5QGkh1lT +Eu++Ij2UOO1o7++iAIcWR08WIt7GtuV4uSPeOp9te/a+Qxq8bC+mPUO8yfBp +ifqgPO3W4AsvWRFl6F+9u70Z33M3d5hdryTDVFgJ13D+SWg+t/NvMdKr/r1i +sXt6yHDwBUvgXjZzqJjqGRr8iuLIl5exdCxdcID1nvHtkLPAdOmX90j/HIh/ +u1lumNYF36/4S9eeuAWdO350ODXMwZ9GibZtl3sAHv7a8ysnB7pGYyaUA+bg +0Wle/sv7h2G31pXhwvRK0Oov2ZTKNQNXjj/98ndyBB6Mv//9riYOuNtm6K5I +TEN3/rVLXIjnU8cc3ms/9AMaQoAIW0Z5+N9zuectKLBV5rwQg6ktOHptsmoa +Q35Vhfm2LLJ3NUGP7ad9VIDu7MN3mweoEPPsYv9uxOffEK5Uxno5uGnzOugS +4rNCmJ71PuIzqmlC7S6NGFTuPq35BfHJzlIwooj41FnyDHO7LADaU/U/WxCf +5C8H3C1R/l+U1DzkJ5dF7JXrGsf5/12bvAAnhJumBA+b1xQQ2aEb4Rg31R2j +80N4bv7Sc478cuLfDtISPpd1Xj5jTzTCd/TYZR1oqidUuUVpMb4zasmRQLid +aHjxmuFHQvcFvTRehwkdPa526Eo9jBobTNkIzxEL7izT+Bxv3zeqqkVQPUSS +eU66tXKRhi6Hq+N3WgLLbc9XetSDt4qGm+7PCSKZ519UL8Kl9Vx4C1F7mZT+ +/oeOnHBaSEQV7w/eKHonwIJwrd1sxkKyL1R1qRoreJ/o9WPjL4NFZGCTe3iw ++JAeaKvlCzDjdwOoYYcmnpDBx/ZA2tEYWZLeLcU5fF6iPWdUUQfF5epEh/n2 +x4JwfZebaAmKFy4alRIrKC+iUdwez8W0Fx6fzPVXR3H2q7iDlgVep4psjBW4 +/4K42ab5A/PWvcx68QzCa+kyFj61VRPHaHJTMX5BvELY5796s6qYVNhA8DVT +d2F89N5yND7/tukE6R6HWRdxuG+PCebzrcXg01yE72KWb5LJpxAfXyRsw++l +XE0YYf2EcAYh39g25SVCOGpWHq/DR7f7uyUE1MNYfL3G/Uv9RJhmAq873vdJ +K9PA570zHwQU/KjaBtFxm9vxvKxktsR5onkxWNnmtwYvCIX2kCH8/xEm9hi6 +3Yi3J55vRjbFG0NJ1dsrIoi3IQGps3vwOZPB7N1/tgL8ix3OtUW8SYtoS6gg +3vTcmnx1OuRBbMGGjPOZ2p0ekcmINyuGxh23uWXhUsrWYEPEW/+c1mUz1B8V +obkIxo0qwkxVeTN+599gY8rbDuHDdOH/wiLqiE+7JisxP33XSjw98P8sJiz4 +1s1aCVodE0OMb0oTTb6MzxMa97UU0PcTLpNv6zFvjLHBXZEI/5jDXt1zdZyQ +Ck3ZiXFRwZeTGE+zj1JgFl4iOrULdmA8Vv1bS9WlemilHrjTWjJItNFpcuP3 +DEOWR/7h++zmQ8Wyrz79Uf1dTaj+977Bo9PZZIT/k+H9dSW6i1jyKbqF+ed5 +w1KthPzVwzcZCfVgAXJeaQLtiDebS6INahlkGOSe8q5X1oG4VTouCuItwODb +wxMPyXCNvuxTXeZxcDzy8Vw34u3eS9+10ftk8F6e+rZ9+ggs/ZHL8kC8HTgu +rW2CvttuHJT5mJUgJt4lcGPezL8r3bBCuPqLL9TqsSZC1+fpZ8zPZf+0R44I +V4g/7HTuMpm4umMyFuNt7o3H8H8rSjZF3E48M0icfmv7338rGPpVT59HeAR7 +6KZkgwnC+6woO8bfMmdYYL/x+eC5sPPbfhFOl05PYHynoqa/D6rH1RK16Zxa +hogirs3e+D4L6ygx+gfhVuvExl2WEdV7Lw454v2RPtZnMS5IDlfTUEgEwyDR +WuIQgOX8HI7+zYH3rdx3u5gbrRPhlRyXMc/0gzZONijfeB0pYvSJ1wYyCoQy +HuDzaUsCXwsekYElJ7xv93tD0DAMOmeLePtbL78p7gEZiGR1y9s/NeHlFSZ3 +ZsRb7fbLH74kkCH1mVfCbyYA5h/U51EIn2Fs9TBE3322uCOfobqOkBTzlMV8 +NmzdGoz1c3boTel8YzOR4/dzE8YT1pvuWOP3n5NSfzZKdxORa4zduP9KXgfB +HuE/ynX4LkR+JjaUNEr+ez+qdZMDbr9ZqvGGme44obzo2YPxAB3+GhWEdx9d +ifdUmSdUyZXDWP5OB/4RfF/GdYzPM07uK2GbNfTffZlhl3H+3whPTtqc9q/c +k1gqrL6H+VzmK3sjguSs/L7mz332C7HdJIfA61cCe576fUPt9zv07V0ifhIy +xw5K4HUSv4S/ynqIt3CDDBUdPzu4kad7ww3xxlrxS3EpmQyst3ar/FA2AbvS +HKPPCC9lpJ8MRPZ7pyHrwl4mHaDjGVszQbwt+Y62JMWjuHyK9qVitBpwLod4 +VCG8IkeiRA/1x983UYQnqoGw6/mkjcfV9yi2HfPM0n7SOJ+nlXDUJw5gXPrM +QjHW54/fa8jJ693EffFxDozbTz2/jHEfqQKWBavPRBjLMCfG9zNGHDqNcOOR +4H+yod8If/1Njhj/27VRLovPrXE/nx+4O0Vs2aFqiXmIWa6lbCAeutPnBFvm +p4gS/28CmDfZ5PbLeB0pdqjzRFz3MLHnt6s+5sdo1+NyzPOFVAWBLzfaiC8W +ShG4vQ1b5hv8DsOb35PnH78ZJJYqTk1h/fzAe8etD7WvjO0xiVweJz4/38j+ +j2fLQJaoJPze5s6EUF17+DP2VOYA4ufoNs3PpxGfcvWJWcdKTIFhgGnNEuEh +Pxxj5ZF+HtWRdHKc04UXSaFZWQjf+nFIWBjVd9Fio5Q3PzTg6L+9/ZMIt2q5 +9VAH9ccjvbk7TqGJcEoscsM8bL/wJUMXv4/Req66U6iNEHd8a4LxwL4nanhe +EjnbmijQQ8zcbdfD+OflW1VYzr1br6+PaAwSLmsRrhh39GUsPI5wTqdm37JA +CuEkbNmA8cbrs2MS2J8IDq8+kB8n2rN7kzHPWk/kXm1BuDsRyfT75RjBRHJp +x/yciaN8XED8CNMo2m1IDxH2uS9TMJ+0R4wnl/D7yeMPVRWDewh9uSJ/jDNT +n/Qu43cwngj8sbzVT7z5TOeJ8b8L+S2Y558cY6/87n4mWiXcMzDPyu+btrsg +fvh6dHIV5uxgWrV05xDiZ1ik7Fw3ws9JdrGq6JrB0h4qLxnhgTFkRmosGZg2 +3Tx+q0YftN6L8P9AuGp4Y0J6DBmucso5eT0/CZ4O+pz8+H9/H3RUy93aYdA+ +PXprShhw8WYV+wvPg3tOh6ftnRZgvN94RpctH67KbDzSMp4HBXJPmpA9BdbW +tf2EY9SBa0RoOWCECu93ZhceQvXFqkwBmTwsCq0xNI9eovriT5llNj3KW8QV +fnTYhywQh9/wAb4H9JTV9QxbCMorcrcEWp2SJznufPRmrQDlOcYLLEYIV3NV +N2yZlIezLCumKwgfHnb+79yX/jLdirPGjOqhlen/zn3J0cUKhyC8uz1No2OZ +QpD07N7j+0pD5lsztreiei23/ZuNqRvoaTfy/3cuxffUNkGUD0zkJjsMf1km +1l7/TcTn3IZNcn7ql5DhCOOav3WlNQha+RlXoDrFucZ+NBLp7fj0uOm6mj3E +XlY1v4/4JMeJ299H+Il3k2a7DKyg8l+tFMZtG5208HpIl7M8eTHlJMy+dqfD +6yEnW9dbjiPcfEde8WtvdbCBfOnLCB8L+fA+7i0FXHk0l3dR4mG4adegZSYV +mpcUvjGOtoLrpxHZ34eSYCl4TO+K0jxwCkiITaSguq+UPzvlYxYE6/a733lJ +hbfO0gdTUD14YHXs7M37NtBSnjIyiOpBZmXF/TscKBDNFPcxfJcJuBmo6vd9 +pYLQr319PzwoUGgvHX6wRBeC7c9fv/SJCg8LuXL/PSfD4+7YjTRFOTj4IXul +HvFgayx+CuctNKOLvm/eJxK+u42rsZ//3fKQmTafDGn84mas3vsh61/KvnKU +D4icGz/4tJEMC4lfnLPzAei8Dz/C7/4xMDT8O4vz7dWkc3vlMwkr8ewT/+WN +F5NOaM2ToSt7xyubHkOwUlVgpPkyB0Guf4tu4PZXomRXy58RF90yQnA+s+PW +fhp6U1TvuKtpHnR0A/aVn6T1duTPP95Of4r97TxjypU7rwmGqLA9OJ+MGjNW +to3rhq7k4q4injtQvJxja5MxB19+uW9Zwe/zD6UlxNzuIux+PWTC9+yeWe1x +Ft0yAEWHov2l3udC6PBHvpaMWYiTVH7uz0YBWrZElaSffiBvfPJd/PZpSD5W +NcqnTYHWlt4MOQ4LKHTITfs7S4UTuW/v9ZqhOtG7LsFKVg8inI9cJI8je0nT +5nTA/8PSm459ncwHoakCN/H97ic8YY9LU8kwlzfZyGhKJTY7WX+/geKU4vTm +2HOoHj8y8ljYjJETOHxZJAxRHeTyuEZxK4prz0geAaHRHODaffTxOmr/8Cqf +gS0a198znbvTvZ8TfLR2dZjnX3pyjTjPGexkfdjMEU+85PUexbh7sycPzj/t +3ty/UUaqIrpzzptg3Ez7XkUQwmm/dh0gtjYStsJPc/7LM9OjM1IR3rNbNePD +qR7i7u33VzHP2/uSGPsR3hhgAFIfJ4iMgF+ncN5oald7BZDdXdWY2OfNREvy +j6oMxPVRQ2zSjPbxejiff5ebjqoFrw1DT50uQvmV+ZcTBShfrfa58Ob8032k +lBjbZJyv0gyylfBeq4et65yfrcO2wU0/9r69CC8v029XR37gST9Rzv+hQDW4 +8t0qrrO2trGP1aDvJtZMXhxLWVE1ne/+g89P6qh8aBhHuPKvFGP524vEwOF0 +D3zvY09+zVe2cjKobfTm3/Y3hm0K9V7bkf6bH535Jo7yisW8dsd9XtqkMwkp +yj6I5xFztxhqGhneHT913Uh8P+Qdc/U8iHB9rywlNhQf/UZrNm6vsQHt+NHQ +48g/pG3jU/qK8rdtv1mPDh+TBP79JxVoEK5cnLeK66y6O4ecLG0KiPLFpinM +v+H2/JwQ1M+03yVqxPdl4q5o/E5cvyQESW7vRnG2TYeSFcknDm3zeUVaSM5+ +fqtuNWSPL05NyLw8cQY2Tr7Vz8PrCQpuZ3F83Cu28XtL5nsisMZFF8e7yEsW +h3A8zRbyvdpzppHou1NmgXEi1CBcAcUXrTCxnzS3tYEzIkNiAsn3cau+dArF +l0TTSMNcIx1okMkSxu8KDp1+/Y8TtT+9UlxyfdEO4kgqXd9R+5SyOG99vD7M +veSWrXIKdB9J8/sgv2cwrhWjj/zPzfhxPpc0dTjq53tkBPkfiUKdtQOorp+t +NzrE8IQNDlQ6lHWhul7nlvMo1mdXJgf/N++fEkTkv9eYnzLJGg3sTyiHz+me +Fn5BMFme0/ovn9/qKXEdv9smcezimtlrgi+oNgbr7bqS+dtMhM/IRBoZ9X8g +Zm3K1LDe7i/T1J5GOM8mn3zmlBFC4sD4XewHXpnItD1D/HeOtIQeHtwg1Mye +3MHnrgtEPJITUXsR7W3KGXyyJD6fkidYzsph4FNEelgguhHncnBZVTa93R2f +iza9XvoGEB4x/nd2KO8HIbO5YC/GjWuUF/kryKDN0xgfdU4HIpinEue+zcGb +TW/kdiO9uh9+bO8jKhscfrXNRB/pVZYcg/FfpD9JhTY83F2CwJhx8NA/hHf4 +X9y9/IwMDg9csrSn7cBjrG+HOJp3nxfkPJxPto0fuSKn30x4BDfb4vnVYKk6 +4oTmkS3g2LDWmCZ0nIp+R4PmsWW1SXGligL6zcVZDMkpsGb8STI4mwoNm6U3 +OSM5W9TOTm4ophJK9lM3Mc8efi/o/PE96EcFF9gZc4gdvZ6zmOf9jlf9Y/B6 +S0Vjy3G+l4RKg/Ms5se1uMWyCeF59Hb3v/E0EVIfGGaxf5DofD5sjHheERFZ +ueM5QiQL0zUqF+J3y48fqbhaD3RfovWi45hJjznsQ4QR/ifhlf4eVI+Hscne +OsDFDm8efmarQDw0zIV9cEDyxYKrApo5soiOoqFM3E+DYrl+fC+P+0bxjzWz +Z8SuKIIf41n1OjvvIFwn9tEba9VqQkGrUgP3/wHVkq0U4Zr0qQ9O0LUQWskO +hXg9IVw7yIEH9bOSwbvnihSFoHWu/oPzB+ZHJh9s0PyymOb+3MJPT2K3tduF +/c/m6zyahsifB0+eHt/w5ITFmxIrUaifPh19OfjetEPxa1FewZ+E6rj2L3ye +6m7CelgvGu+1h/I/XqvtIynYCOoLIdyE1erW7WUKRLmM5L8hMkHg0lWa5Iso +rwhI2HBF/RwtsON0yckhHp+bd8PjKmrxnMHrBr9/RnWcny8lsnc+JeFxmZJy +jJMRHsMvWMS4WkvY2T1IxfPi/3JsGfvtlPcfSsKJHkJd6gjgeQk0jbi9E9Xv +7Lr+Lu/e7YJSMYlDA6j/NcNBK9dQfWTyiiVkPcMGqmfr/uH66FOwhK4Gsven +TTfU609pgmxfUGcAsvfV2kf1GZtaYO6EyAHZI8akVpePbXJOKN/OvCqrIzkC +exX2l8TeSYRfx1I03R9Nw7sfWuW4rjxM3xmgV5ZGjMpZkPG4lntFwvA9/Qd6 +Z9lKrxvBNYHrW/H9heBGmfK7qH0fg7JsvcBvwitUnR2P9+N8Odknkwx1JGbW +2/OOkPDhkUI5qq//LBn3YbvYMu9m6uT8jjgWyWOD7YLOcFnIAdmFWm9ds95W +LWhwjeOhRXbhdVy58o8Piu/52+s7pgXBfJrZ4R5en1zPZu/A62N6TacpOkuE +V0bEI8wb212jKfunZEhQZldxBEeIkdoyfwB9d8U1u0cbzXtBWx35zAsa0jXL +XTtxHEzmOXCJq4wMhhuVyvTfzeHadf0T5iju5AlOyxWieLQ4IXkzQ94WspX8 +qtfQeAdqmb9PviBDzNrGue0SZyDre8Dja6i9U0LQdBSal3IRPtGn5lZw5fHZ +q5VoXugkWkcxnxRLgw9ezPeJLaI5HZjPzkfETBdeV/xjO9V7jwZa+M61/ve/ +pDULkhDSw3f1T34kBKyp5p4P7ZTA/PwelFJF7bUtJ889KqKofrU7IYP9WBsv +mVEJ4W8nn/XrN/YRMnLmDhg/H9z+xADh/9oN29x5yETNDojGdrHer6k4iPwb +zfkXuaYZQqRkS51svA94SUXh918UN5vTOWmkPXhBM/n8lb2o/1vC+d7TI7/H +8PlI2ddJdojKl/IRQLhRny1XI/6/8HmBGoZXNCSt5s/ZOL5/iLC0rqsig0Zx +OchrWMCMFS8Rj3i7aqL93R3pJyU/7uadJE3IYK1Mt0P66dAuHC0g1AYucqWp +F5iOk2pXcy9mHJmHS4nj3z7MUsDfzTA57Wgi2H+ePBEVTIUcpTV+FzSun7RP +h5XnpojnIXTtsui77w1bmLFeyWTbjVZmvyMc3c47Yb1a7lDn34T0ahfJuLhO +/ySM+jmNsyG90k1zAmcUN5+1c99ii7ABtuCaBlzfZWS+VXZE/bxgISTE26gO +VfkezE6on3bvv32QqyaD10/FbZ83H4Huiy+TbqNxmVbrBjP2keGssbpk6H1U +dwyJt136Ogd7jCvoG7hRnuydbRYaYg17v/z2KutDeuKi0ZVe2wUPqQJlz7MC +wOahcP95Yg4uvJhc5dH6CHYuPl+OuSYDh2Pp2TsWc3Dvc5Uzu/EQzJ6Z5rC+ +mwNMLueFE87OgMSioKiJPAUYJp1SXIqcIW2F85bmGhUeZZCMgi9QgPFm/Pmv +kjtg1aVIcArlq7XdMjk4/zSr/SZuUZNCxF2K+Yb1MG+GNRTzJsTcNfTmfSPx +xOagPebNWlmgbAHVrT2iI583ndOCw/6LyRyIN6VSNYej+j2QJDPmm+PUAJ4d +nEdUBObgw2q41FfzDzBw5VeJXnwtVPzuzDzONA81O6efUvD68OHaZ8bHNpPu +l6aP4fjO/K7AcQz5ByWPr3sOZpvAfTX5bfnITu3+Sm+3RvYr9vfqju2WVlDC +uN4mg3ALq/2KUQgvMtCvfVxiBxbCNkfEEW48ZGivUkaBM6Jl7q8P3oQuoiT8 +bz4V9j2N1zZ5heqFALOi60qRsBlYwmaeUOGX8xTfg0HkT3JffZrOi4S3Q2GT +ufeoYB3e/+3e6Ahc5xHY/jooD+S95h6nC09D3tYOOx0jCvzbUNSZCM6FxYVP +E6aojnO/z7vj6tAIHJNqk36x/ya4kgQCI+SmYd/S93fWSD91PxSbrvJ+Uq3I +OSGM7U75yZ+AGhSPKrjbQ8klYiTrDa/n15HdXRP5oMiA7M4q3US0lnEniP/j +rDiB9NBX7NGOOmRf5rzHxWp941VNmneQsH2VistKPkF4lM1Co+GRCcLT/Wwf +zoteD0vGvkQ4V3PTUNX4EnF1XlcF4wskr5DTYxQomD35c2AjFnR17Kaeh1Hh +bl3aaPhiIzhf/2vyXrIEhNMLLRhvzsOxqm33NnVQ4MNclzPh8Qyc9v05XxNB +BT525ueaXU3w/V1LrLDyGVLO4f3iuyPmQcvqw7VKZKcrAq4TzzJzoFDnL/PL +QCqktX4r+epGga8KctHqKrqgGxp4p30Q1dcNm9t+ITyP7mqdgdVJsPlzpK8W +4dm+7nJLqP/u1+vKLkVRiLum5p14vaKTtnKZC/H52dIycDnoF3EmaqEE779s +mP01+pJHBrO0dy53km3gsFKqUSXKu4ylNG6LFJKBJ4Fxv/lpB9Bmi4t2Q/ht +b9q/gosdwJaedoO99wL89jtYWMU8D5Y9ZdaPLDqg98ZkBjdcBfvX4h3GPChv +Yc0Y1yxoh5GPB1ScS+VIxYMPkukE50GtvJT/pTcFTn6hPxVXdBwaZGViz/RR +Iep38mqGJwWsFvnKmtM1wTykVvRVPxqXko8WzzkKaNAHtlxY0ICG7oyMavze +QtOsqAuSw2d3+HlOpgIMLf+iwfvswauibEe9KPBnYaAy0+cQTD/xmzNFcjS3 +Edv8isjQrRDv/6DhJPDcf5eK39/W5z4qHFRMhltHUhoqAw2h3HvMZQnFo82X +J0asUJyq7f+asP+BPojQhR25j/Bu78a8SlTfNVfQ5RW+EgTWwLFduL7TKNwV +dR/ZaXhnq2TFFln4spZRjPMTj9lGaXkUBxujFB6rrmtB5dmj6qxITvq1EutR +hPPrCo7YhmmTmI4yvVhC/nA44VHLNyTn9Q7d9fePf6qON/WQsb0/8vCR5EXz +yz56sv+v2DviZUnWMM7fTk8yLJ9GOPfoM1YfwSni0qQfHY7LdU9XWZpzyJCW +NFOuvqQPYf5WwpuQvd+afcv2tYAMcs/Ic80zplCy7qnih3gwfHRDch7Ne4fV +16RCdiuQ43Z/p4vwxb1xhSGIn8OSH5ofHTWAkJpvGYuo/z56rVy8KA46Sr62 +9S02h7efVSN0kT3uY7aLNnpMhreFhTp/LtuC85/u2X/ou6T4yFH+LDJkVjnn +fNVzgMQqge/p+H31NcuDCmYjUMQfX/RkoBbe7rQQTkV+oKHjLbvuEzIM9wfV ++Dwzgks7cq6ZofbsAlNl0wjvrzAaH3E2A5qIHA9A+P1OPpcdqL5WmTG/L75r +H9hdZ/mO6+vFP4vk+6j/YtTPPs7i5lBvbMq0gPq/d5N0/qgpBfY9bokp4rgL +A0f+DjwZp4J016w0qwMF7B7YugpHJEEg173nFUNUOEBXz+VtTYHB895XTgo8 +BsPW+/RPhqlw/8fb+3LSFIiu/iz62i8MWhTnpTP+UWGbxr4FZnYK7F5kO2zv +mwSWfAz6B9inoWm38UcSPwWSW0NSamgzoXZ7+a9xumlwqX1l7IfmUf26kbKN +8HZY8RJIx/WyyGcVOy+Eb+oLTywU3wsHe2a6MC5wapd6IqqXZS1u3cnz1YGs +1MCJDDRf/lzH77Ch+W2Ztx/NlTeC2bMerTEIj6r/lt2O7MiJ90mQxk5zsAx5 +MQXIjgoWF7a3nEX+5+r9XrFAYzhXZJI5hfDzFd7VL1F7ixDpMzsidYHOxoPF +GOFv5nqnM1E+eYObp+eQtg44XNHOaEL55F6e7wP8CKcv2XLZr1QTeu6l0u1G +9lg7Vyy2iOzxCl1MjVWXJjQEGRR/Rrjiqe+vbyA92Z5XfNbOwAy419JPr6J5 +PHCjfmc8wtnvF297Xm8JEddWpJcRvpbGFxNziwKB1zbHlMmkAGdkrNWBJiow +DUyEfj1BgSNDpMd8ZyPhWaFb3thPKmzmeiKjLkOBnUW7T0N9HHCZBroq/UX4 +AYPVcRTfr5Cj+0PfhUGhyGDpNhTfAxzr/x10pUCf9winwlIE3Cguid//mQqf +dgnt9XKiQFNpFmMMfxwsGKtuBH2hQnFdpdp9PgoI31bbKc4SCmzOr14zM03D +l/Vxt0+Iz0XJ0pSqueOQYmuqM4J4O838LWkL8m9HD9OGPT2mADGmh1p3I/xP +cXa+KvIzf/gn+69p6sARJWHhZKSfrs6Xnt9B877s2EnuXaUh7d5nM4XrrF8h +z3jknncCA72AgmH1ObhsUt7PuXkezn7fdaDuPAUSO0PjV8j2EFLsVc2A5kXu +kzhVBvnJpHQB+7hMG1jhsQ4rQ/xHf+wb6nehwI+U3zVSHi7AyxjtswONS9zf +kDB0pAAEGLsqZZiCO7RXuyI9j5Tof4jXDe6qfNm1Z3gzqa+x8iX2by5KjKlq +CE/de/oHobJGOInzluL850KjyCePy/Ww+drTJD+OVeKmmkAW3n+s0ngjg/9v +vly+Q/in6G8i35Pxv/+bt4hGqNeh9lf923OXfL4SmwuPe+D9tYx/eoEdvvXw +pe2cvp69GjCx+w3h/wex3mpJK1wfgeagzCuCmrdAinRShHnPNLAevBx2Csnf +8/GNsrqnIcTkjfvhPG3PQsG7ruv1YMfysidnfA9s+vWiAd9T9qNnuOiM8u2Z +L3HxTJ+cSZHWVWqpyA//Kx+Zn8D3uFMLFCKHNpO+Hgu0w+tsZ+nrpAywPab4 +io0K/iG6lCwncL1fvr5XKIW2Ha73LT70tzlCes30V61p/zx+P04o+znK/3On +lVe6zoB8bMviBzS/Bdscf5Yiv6TRsI2d0cUWjN15X84g3Pti8mWHRQr8fE55 +oUNNgVqyxivJKyjPv3aK7Y4l4s15iI4ocoL1yWFnt2fzcLLP68JnVH+93k4X +Z2VvDzpcnPVKSI7IW0fenF8jYMrlmbmt5hrcMtrvSxGaBmd/9o84P3fOrkyu +emMPomodFbiOoPlzJCjbsRNk7gvxjbz1gPt6U90L9PPwhja64DKy6/eCdTXW +oXYQMKR9YAjplYKy/9NfSJ9f0V3apiBuBZHFf/1CUJwtuvDrYwyyl5OrvNPP +fB1BRINDNRH5z12Ln4PGUNy8/MRhLYtgIj1VyvA3QrzZ3vIvlEbz/kd9lLR1 +Ew2paXSAhP/nJZAuUiGD181usXYKuS8T1revOGI9afPe6bkH4QfZw/e/vviT +0IBRGryfxb/3mcBbJMfwiMSXC5v6CMWWsRisP4+28PuH8nQBt3XDtlBuPdLB +4catqaiOyKWNmZ5xpoCks5CforM1eF+7zlGO9N+MZLj/MBqviktzQ5OkNKqf +66yZkb30v8udF0J4A2tTX72cMOxWGU3cgXCu1m66IbEO8JnVo5PMlCQFiyUX +nOWdB1Kwgogy8p/2x1g8m7RtIMLd3f0xsvfLkiYkvB/aGvTsLtPFOaLA8ZMF +HpdYwPVmvL95PINGL//KEhH+4Uw43l9j6rW5HYv3r69r167L/SPoLx/5hu1u +JmF8Uh7l256TVI/crcEwEbir96X0NCSG2j4zx+d/Kj8HM2b+JLgTpxex/h9W +tkjD+7YFE/1WS+4rxIyA03Zsp9tOr+hLITze/XZ50+g/4mhcw2Xcn43BLfSc +LSjvVRPe/1csFDhT5vS7U5D/tPdPuo3qrytBRZ9EBx/Cm8ibR5jfzEG+c6b+ ++UPd0MPJPSCs+gzSftYZPcmagzMsugwM4l1gYms/urejAmb7Ba01KubgTyyt +gXggfsegXO666CLxMC06F3/3pUcQ9zGES0z1b+01XSbyfVZmcT+Vg6zyAvRQ +3lKxp2uALgF+NjvJXvwxB2qDiZH+Op2w6s2V79CTCJKrfRsvkd66sUzqyjzo +ACNu5IYS7sHyt42NVg5kv+uH7YKeUqBe5qt8kmsAVLA8XLYvo4KXQ3zwRiHy +/++ch8JmgoBnhidzuZgK+hYUqY0aCrgs0ZDtGAJhIJw93BnVQZ8Y+tjuRZOB +ReZ6xY5PLnA4e8XIDtV3XBQ/lkv3yLAutUPx89VzULPs3KWEcBM9/fDvCL/z +IfbRsyAfuDla91MU4f/vfQ9OcSFuWRTvgq7o7yFv+ADH0ANd/WYqGFKKvpje +xHq7t8UwIQCi9C2XOhE+2Df/xRrVm1MsjsnHmS+D5MIFcTp83n587IsWwhdL +m63iuQMhFew98LqQuH6metwNCkgd+1K/xfIq7JR/NiPVSgX7zPmz5AAKNHrs +Pte9cgL+MQy71OL9vnwll/0IL9cz0JyVVIcv7666HOimQpVsJ8EdSQbr0Skr +s/N3IDHKTswFyZ80PvBveyAFDh8wFxCluwVXyjPtD3dSoUv6cAaNPwVypJr5 +nK9rADWgonEGyclmKd014keBioVvP93va0DTheYjtCgu0/R+8565Q4bwjh2a +CvkRYHFEZrIAy8+JXFV0IsNNMf9Y8+fJIBRS/bJ+Bvm91zNLWii+C0jLhlj5 +aQDdzgf/tn2kwlAms7zJFsQP12rRxOpT8Ncwaiv5NQeRdnXuZShu8nd5Llxt +PgEXNmk6cCH/VkIM/9yF7H2fYxXdvhh5EDHbMOFH9k73auCvEfK32zzWE6ed +llQbxuTYDZG/3aCPOG6N/7dIk5pLx70NFqNYuxyQ3jr57tvyHOlzqSxHyaHu +JUKq9OY7vB6ry9f4D9u1kZsC9VDUD+KK0dQwtuu2tz/2CiM/cHL1TZ/t5t+q +gaJO+/B/M6tUS6X3onybbsjtOKumJpyVdzykh/JtrZo1owBs7zOSvqEWE8QN +OxUKXj+syg1xwueFeAxdrRMCxwiNFH027Aceq8R7lCD5az89vxADA6pMU19Z +8b0eNl/R2c4HZMjIOZrZcO4kkKyet9OiOjrVy98cn5+5KOTuIu3wheij83yO +5Vi3LNFT8P1WicnUVdl0wkp4AvC+v44bWdARyekNTjL56ngSpkypz7YjOYzc +e79WJ5CB9ozLFh09TZCOvaoVh/DmkHEZvD8bT6fzzzDpMyFxSPwVlm+hrkBr +inDHEoOp3bS9xBfuFlbsB1LMMgrn0Hdpd6mqUMw6iDjTxFrsJ8PleS+/jCPD +z++ffa7xaYAlz+WiXiSf1mJHoFEg/p+pifqOAz3EKmeYKJaT9ttJEu8rmZ2r +sM50JhO0S7n6GO+MiLZZxO/0zmaTHu34SIzU7buJ5Rf8sF1OQnbnw7P1VW6i +P1wPsnHIR3a3dMeN80wI8vM1wvStr6/A9k2VjvQfqGBRnRN/AdnL4+C7h3e/ +VIOnbS92/EN2JL5nuaEa+YGsuws3r1tfg/u37I9sQfqcqnSKkeMqBdRv5tjE +r4WA0QPBXot2VOdqnhKYRXax6RjlyZ0oDXDhsK5dRfaymbpcXIvsyGHyiPi/ +enUQfw9i+L7DHqXbjXRI/11NM7kuPwgDl5q5Ivyutfk+zYYFhK/FX1DVatQA +Hd34hHSEb9ldS9vtSwETrTWLp3/UgUHgg6UVshepISO3s0j/D7kcU2/4rgj2 +Yl8NqMguyLtPhzzC51Qrr2lSRhaIUUqIP9bbhw/l/ORRfN/VaFbbE0gLC0uy +w/g/Jrwsu0IvoPbJsuAbpDpOMLGFrWH9nN66ZyEU4Tk0RY/PRU0T4WGsThjn +lnCRCcbn08p1lT4vTqia2vSS8b22GtoVvkvJZLhoPTv56vxJaPTlCZnF5xiX +yDz4/4D9tJH9s7QUIvEHx3/7CPvu3d2O3/+8vxIsfYVUrKrH5X0f6yfLxJkw +vF9Js8rlxpnWT1xZ2TT3X/uemQ9YD3neqF5mY/5CvD4e+hLj1RHTp2eQnKPn +CwOe8bQSB2XL+rA++B2v6tVH7RWbfmqHR3QRjxn5AOuPg89EhTHCf7o84QoQ ++UgETc/vwrhKlOUEju/lb6u0ZlN7iG9xHmFYTs5hsj8btQOCi/6cfiD1AlZJ +7zLT1lEcoar6NaK8fWJLpHybiCRcNha7b4b8z6+sByHjxa1gc1u/qO3ZG9AO +p//rsHUe7N98y2UqIoOlkIB/oJ8YCBft3iaB6r7PZ5hDZb3qgcOb9eTLBQHQ +DBaTrkDfba26qHguoB58uKS8NO5wgHYJU6wHwr3PZz8vPYvib4OB6ptaQdCO +Gndtw/2fe1XE8YEMlZuvJ0R9PEwS9v+xsYMyB+nhLJEur8jApZz7btKZn6T2 +7IWsDcqf24LsJMtQvRy7EWp77PA98Gcw7XpBoUIEz9m9u/RRHeT0sInJLBYs +Lara8qaokJq5l7PDjAI3NVvky/fFQFjyTeHmMSrcDuqVSFkdAdWTAXz07rFw +4YaEdTbK8z14flmzozraOpA9JzQ2DuLHvP92bJkGgdvTo24qqA6iTT1seCMO +tvcPTKn8pkLz9gLVOnwe++Qt1lKNMMgMF3Tdj/Rf/cK1p7fdUHzv8jwbp3sX +onfMux4dRPovHcZqhurWdrJ89I1zEaASXHMlAfG/5/SWKDdUN60yCNpkTdyF +LxK6DPGoTswDEbE0lG87yJpqJm2PgXeV147zonz70JGK7e+QPhz4H13nHY/1 +9/9/QlZlREZKdjQoJOs62aNEZlZI9ohsISOphOwoM1sZlZHqekVm1oUWpVxm +LnuFiN85V+/374/P7f315/N23V5er3Oer+c4r3Me9yt58hdCN/HbmbvG0XcW +u1KHrAsOMH46pj1eVBMAQg7Xgoah/ZSSeHjc7BBgwvk7cP68B3Qq2IwMhaeA +NrE7XWiUAET8nwXkZClj/nIUVncGYd31S/vGHPSTqr6BkJeBJ4CYUlKSLLzP +vhppgxxoFzqUtzi4+xCwj1hxdoX2zSmO6wn+sI4Sle89YhsPzFz8NT6RYD0m +c3WgFcaxp36cbx70egJvx5KCgTbYd1ixM8dBO4v4ZbM0Nm+gdHsXzW9o/9hm +P9AO7SeT7FuvnHUHu5Ma1X9AO1PY/L65hwSgshnE7qlmA66+yHfTRfsYi37d +vQDf3/HHFl+d/C+CNYqvIfPQrs8YUmL1mABGzNt4ipTdQDLPiJI67Pel6ev8 +AlC/+Sl1tFplHK+wdrISxYfFQ7V6aF9HU+Hnnu9+K/iMG1LFyH7A5sllXmhf +IXwWfCe5imek71xH9WQEm5cMyl91oU3V3xx78GyGseT9n/gTr0/qojpzSxa4 +P23AG7TWyqP39PBGfDjaF7eRSDF8laYTn3Ou+hF6Tz2u+NujvLB9IGctSagH +P6/2Joy8zzM0vQjti1Nz+roYY9WHP/K52BXZh7+PvE6H4+Mts109ifcCxLQD +tktwfD4oC4R2Q7tR3QNHqlV3IHPK+9A3aM+s5bSQuEEEdfV8NHvLAsDdcPq1 +dphHBqtcWmmlCKAZ2/sjNDEJrEZHN9nBuuWXznIM2l80P+nfyy0wgw999jwM +jYNz9KGOA+g7js+Km7jXBj7PM54O9Uem41p96DvaTfW1rxaRXfiT81LdaByK +p3hK0T5kutQz1nfxffjMRWPyPuRdC50FaF/o2FNbJyfRRnye4eHjaHxe6p0s +WYDPy+Yfp3ojsh0fdD8tjzwOYQ1JYbJdQAJ/4EDx7wegJpHd8yP7HGA9v/27 ++FoHeO2XHcvGFg/zN2XH4ok50HqrKsqzpR2ciuQKF88OA0+6vX09FebAl1c5 +V+KPd4CKApJEU7wnlm7U+nb8FIw/h3rqjrk3AH/ncpeRWkFAXWxXkAv/r/y6 +y0salwbA27kj2OeqGAjb8ZPqLeofZc+dzdkB6+dfRl/Pno0FEq8SUp9yTYFf +GlQTb9eGQGuaDRWt2z1Q4crqs8U7BX5MWTxC569botYE4yfW8J7dr6nQOPDU +P7KIhe8ppZ2+y7KSBKiZ6FMYgvZ7SyoX4xeGwFTwot7T53fBaqAy3wPBKTAf +nr9b0oYAeFPqe38T4gE2/+0kcWYWGAeGKOjCPmV9uks5sOcB6GfSOfebGtaH +YfKf78UTwJljdrpUY3fAkRAue0ZYt4x7qFH7wPvp/0pz5fPoMD6tCBtA83st +4OIGC6xX0+NTN4FtFNg3XDbW/+H/1glMm+DxC4LXGdJruXbUZRJvnHwqGV1H +yKHow2AIAZwN4DbGrsF4e3wlUhPGgYsbq00TugRwMqTbWJoiEfiQUpY352bB +nMb4nsnNIfCNR32hUT0GtDLRVBkdmAJvuq9X7ob+/D5Z9XTNS19w4zQDuzr0 +2+9ig1ToO/5pV659BidG8VfEOVvJ+yt+jZ8PXx4CsU4HJi56RQOrwlszVfxT +oC5+qFg6gAC0rwi8PJgcB8o22M1X4f04sGy2OcG4odSFS4jfcxtkiWsMmCIO +1wWGWZSXV40D3ZL9G/FLj9oIyA+/U3meQHn2tvK9TDdOAv4toCTvxxYzIO6i +d2sAQaUpMutvhEHE3qPaT6Fdcyb3cBjMd/XXGx/Z8x4D5kJjh7qgnWrm292j +wgSQr/GoSpffBrQnHNo1/msWiFfdPfSqkAjm+J5c6+5SALcsTLVMKkggoObT +hh6sx57LlRcG9VmAkM7zjtWwHpt+qk+jBPOOt6R73Rj+EmDxGFLcDeero9lT +KuJwF/BYmMyrvG+IBTiozFtyzQHHHRGKOAciUOOKolNadQR+luPxkTAf0dzI +eisD806q/4unGuesgLidgU74NxLQfPt27QccZ4k/qxeFWndi8bQ7ltH3gvAb +ZhJo/dBkauUVpQk1Fv5tfAatH84Ze9qi8y/urEcid+yhwF570j9Efl4plCBT +C+2j0e8zrXIosGeXdBxQnxJAf41yGsbzvWNy9w5/tQHvmnLDUTyfGKXpoYa/ +by5Q403lmsKnpH5cQHGmyaQyLDaZAAru/TikUGYNjCTE58SgPwtbHJNiQvVe +ZVNvzOQ43unK5H30+2b7CJwFrNt/h4xGfTG+BAIIzxm/w98/7f21dNaOCLiE +627JV1sD4bDPnV0wz/pxxmjeLicAzm2aBt7naiAoPOcP4oiVnHpSdRJeP9j2 +29Nf1mv47UvX1FD8X+8W21UN/SGmq1ZMZ3QWv572g4DWhT7Tv3KcsiICOvEs +y3ZWTbBtf/Dg+R+wnqestEL6jedXWr+oJ33Ep1U0eaLvhoZXXoLaG7AO7O6a +tTomiOWdy9jaKp4Dm1ZjRJ5qArDdm77DtNQTXI53TKuF9c9YLvEspSMRFP88 +K5/EZwDiBoIZWeA8Wmd5OxbCOu3uy8MFhsyMoCudYWYv0qe99LPL6y0B1MUE +xF37xQU6K3NM7IfhOARW5jvA53IKEak9SfLHm36NNkHzZSVDu/5mnAAuHV2U +69I9BpqpgvDHYT1gURVSj/LjUuoViwNKt/CurNLkfY/fvCePD+B6QJf3n641 +YzVgLGUbukmYBXIRV0Qy0PmON0e2KgJS8b7BYldQPV8TZt9+X6sXUAg27GPN +sAeyVFfdXEpgPXnsjv8E+t49+2AtN68C/+XYrTLkbwYKrzW4Xn4CWQbe4xzZ +N0HBLiOej5MzYPRmdwMXJRGc2NPRTJnmAYr37+3N2D8FVsqrDDFl2B/Fxg9f +nRMA+lkdq2yLJKA06XErANaBxUvTm7I/NIETXwD9rnESeHE2em4axj0JRR+P +sakZ3EqpzotZ+B49FHEz4YX9kcuw16fbrqO4pXs17GGwrnve3zxZA+OGnGGN +fabBCC4q/+6xMei3ifZXHdB5nDscNx8ckojBO6YHfEPjyaidgLOCfpKlwXvT +g+4g9lPQZBWtVwfn5D7mLSKAwW+0JzNv2YA7JCrzUjhfd9YciERYN0aVFN3J +l1QHLfcMvTvg/D5zKOtQhfPu/Wq6nXBEFcy8Xo8Y7ycBV4fVzT0wPuzokrP/ +Os4AJsyfS4/B+HB3dNfEU1g/Z8qlRw7uOQcYfn0O0IP+47gVyPzsBQHkPpRt +WT+tDVzmDx7/A+1hbrnaxysIYNYjq3/XFTVAd1IxBfHs1hRKF/woh4HEfbbe +wztzwctg04MbbiSg/vPFg3dORKCpUqIgPSYLzjV7Jcx+IYES87X77tAucX4j +hP2tPFgtb60Qgvf5UkSzITuwAdAfZM2+eoaEvxrZkYL2qx++PjSTxvweYFwc +vMKOEZg/g6nThsEcyOjkJUpeagX50QbaWob3sSdCh2IPOs0BiVb5QEmbH2D/ +q30sjbqRQO88+3nZkSlw1P/FcQ8dImDtl482/yMFKKoCq09PwfdaXfVCKZzH +jPTtqCfM0zi6+CVGYTiPybN8ByxewzjM9L3pFkkPpIuUSyzB98K8qjZQu44A +DMqk2kou6IP7uBs1cnB8uk47SW3mEED8ksMLnnUboMA49TIE1pOvvtSuzcN+ +1rdoyXlvyEGQ2EPrmAD7WR6J5fd6z2E/fptTItXKCoxtNuWLwvFkXht+XpVH +AMM3iz7hJC6DE9kcVYfgdXYldqUZwfjQl40/4M1PjR35JlCC1v8Tdl78fhJ9 +n61imS2bocKUqS1m0XfY/psdFTerCODR0onvv3nNAG3Z2dzv8D5bhsoFmaF9 +j1TjgFmHJejduRU3A+1eYp4xIpXQb18yn9obZg2c7UPXveD9xM8ZF5Kg/VK5 +Cdc3bmugQKL+YArtTzq0VWYsiUBcEn/Bq/AMUDGjlH4wRALDFikfYuE8HlNo +mx7V/IHfXyaHQ+cLrCbjZlEd2G/NFagcG4lvuiBD3k+VVNAzpHC9AeiSss4H +dS/ghs/OjiKd20LDXEN0DvT6WN50tnED/oSlpyraj1Ea/EWBLoUA+JWOgVEB +KnDJNJAb7WsKCQ8yaIXjUJb82bZ0cAdW4Sd9HcVP4+2wAJ8aAjDp/3L9jsVF +MPZBueMhfF7JUyUL2bUEEFo9ljNcfBEcXmOR8YJ2/ujo/CMhHYApb+rLm2IP +jK1iTOzKyTmg1OF/0n2VCBLMwcIPo2Sg720y3u5PAlt54RQR8D6DCobXNIWn +8VfSHj9Bz2sRO/bTB15fs8Sc5lCSJLDPM3e4Dq9/WmWHzwQczyMC25f1xSjB +qZJV70twPLvmdpc9+UQALT97dyzJqYACqs/O1j/g+7X4bYoT9r9BWt34Y0x7 +wL3Vl3yo/+218N3ziqMHOI0r7Z94YAxwUoes3T7NgqC8WR+ZDTg+v1i+7d9z +EBjtaLS1GpgF0/joRzOtPeDbBO1mb64ncN1H+VHlzSy49qbNlMenB/QMt+ko +JpwEeyJmnlxsg/VG3Yulae8P4MysRWrdRiJYFau0StebBZtOWgfS9/aB7fEd +WLSzDshKEWPLjIZ9t3IRfUHZIDBNaGJclkwCH+I66oZNpoGS3+snt0b6wfH4 +US/edFewpH2CokNlBnhYPVbZPkkE7NLz/XTd1sBliuXQoU1Yb7R9k5raTwQX +g7wDFeUNwSODJyfbGabAgcqMrUBYz/w2Zr1O/WIvqN19enEKvqfO07TamAcR +pHjQfWCKWsGViL7ZsIPxeU1zPz4j7AMIbcM1atztBSZuy3RG36bBLjmNO0vQ +DztbtuNNl3dgLIExiiiPHHfo4P/YAfujGyvPJ57eBGfDM6KFU2EftD07lzJC +BLKS4qX8u+6CQ0ksQ/ejSOBK/c6tczxE4HB7uqdr3wsQ0/PePX+aBFhsxHeb +BRGB+welIuGZElCiy8ysg5FAHFeSFNr/dod+MpzNsBunISbfgfa/zb4qOG+R +TgDnB+lOBx8TxfKjY/Tvwnxxy6+ofP9WHrhDbSixNOCCPQt4Ysm8Pgdk3xfl +OtcSAUU8UHrs9hRsCUSIUSbD+/TJVGWaJQJK06jX7OdLwL5Sl2ty3rBfrmad +mYL5wr9B6fS96XPg5mJwdBPMF2GOn32kSwmggy7L5n2rFUiyasSUYH6h0+fS +bdvugn12qG3rWVugV+TExrNrDvBtYPJC7ztBLM1V7eVMc+xh/PI5Rt45cOS7 +RF+RCxHweKUMFIyLA/Y8S+LzzzC+ue1YvwnjvPnU/WCbShMwNUrfxAbjvDfX +tY3t7WZwI5DSinWyCcTqmIS83J4Feu4irGi/tND8L6ak+WT8x0wl8n7paPc7 +J9F+6Qu4ohvsH3LwcYvYFKorHHxcttF+6fxnDirZWhV4ujqtn6h+kA8PGEHr +Hh7X5uWT1+rx88yPv6N1D/bWUTMzxKU64KJHdfAbvvG3UAiKn8fee6/XCTcA +PsV24SF1K+DlKEgt+RT2R9LXb0QENQDLnPCqfUfpAIvU13UetA4slGSkB+fR +KZkiiDmlEPdOsTESxSXudtoiU2i3UfxaOc24ged3vXcc2beY9dUqYF0aThDl +sKrSwm5ETCqgunR8yPUdcxqM/76S7nq8jADwPSdWw3m3MuuRvv2iG1Q/Pxt9 +X9UWrK5Jl1ZSzIEYYY40AsxTM3fxAodFLcDpVgFuBuj/i95NvXhYn9iOrKfY +7rYC5aSWY3Qwv0jfE2OQcyMCxjJfvnsbliDTPfpC6ScS2N4zGxoK/UH9+fvd +WZY2QP1AdPhOWN9i0peH0fpqWRbXY7MiGszMNuYqGs9w97jdtxAf3JLukAGe +AtPXDbuP1kVjrZbVEY8gue2AisXDP3hW+tCDyG76Yf0EDxwHnPhgN8PQHN54 +9oYr2vclSae2X+hmAxhooXI63CwJCsS67iB9Y58pt3218Pc1o7ZM/IY/ceM5 +66+RvnFhbLW6uysRXLmqlmEnLAqGVmoxSehXBzxLjiOOG7+ldndmugFIXtTT +Qfvbr2rrykqGNID70X9+LCpzgusD8ad2o+8ObPzMh98QQOlbNiV9Ow9Mej1e +twXmcetfdFfQuusM882Vb1g8XiRdtQb521nw4zA6B21WwBwkWPAQLyjCdQbZ +Paw9aW5AO4+3v7fHk0L8yJBdMPLDr68ng/PR710V/Nn8a/A0Zy7uQ+NWQK0n +sQntGdwCFb6TnfhcDcEZpJe7/1bKjBx83/lamNKeec7hubsdvsTCederzBFg +hHVjbWDvcsS73SCy6YUFOpfE+rzN4Jd6A+hIqS14tmIFHv2u0WJ4MgdeZvm9 +1Nwmgj1z0YaEdw/BlFNmxaonCdBGN8wWbhJBHpu8k3FdNlD0Tvuy/xqsA58W +jmARsI+o0Omq5pfEFnuscP1w/D9ThtxiLCaA+pRicasJG8CgPWUSDeOAyqdP +g4GwT+kbbLnz9iUORO09qZEK+5Tkn1kUDoOwHpgFbUQub9CRahVv/n0WrFyK +rp5ZHAKJj/aW0u/0AY7lW1IeglOAuqt1Ce039h3IOTV1iQrLbCpPR3m5aGh2 +XG2RCL4fJl04kZAIPuKUvHODSIDa8ObVsxQE8OeuffHnkzZA3JTvOGFjFiwz +bGrr+xDBQJmxOaOYFagXMHru0EMCWVdCDWJgfXuIrQ6Xn2ANNBsrx2NgfVvB +YFPhYU0E008UDT4F6wKto1veq99J4ETw3cb98L1upGJ4dmgnPZbbXteA9mux +p4iS0HdhA4FDFfHMFNjHd1g26uMGtyVlRKCdEq/v1L6LhM/36KlA9ms7wp82 +Qv/vj0sLUro2jn/NZKOJ+rviyrcWPSI9oOVh5M/7ko7AudtcUOzDLOgXFrE/ +APvo45kfT7RfNAXGqd9mk2AfPWpPXcs3SQTnF5sDh6ZjgGJJfH98BAnEbNNn +p/6C9QbTKw0ibQGItfEVvAjnMb78SrACrCe9lnd9S/XmAQmXGQto4XttP+Fb +dl+uCyQu7fIoDeMHxPR0MQ3OOTA2iafldiYCHQ5uwrG75sDAm/Xoc1iHKzVV +XNaG98/xJT4XY2LEps26XiMuvCPb070kaJ+/fcJYbXMV/8ZUbQqtY6ztd9mP +1j1e7z5GWjy2ji8L1P2C7HVf+8PROVySMn/8hwvL+M9fRnPQ947vCvZStxyG +QKn0HNPtCkvwO6eD8DRgCpgkRj5LQ+fgfOhNDL5RYF12QjfR+3ImwvKDP/ou +JkrJ73GNEku/O1yN3i+R20HijkNDQLIxrORNUDBgS3vX80V8CrALBl9H5/EL +1emUFrQ38YWpQ+Tz+HE2K0t9MI93hOzH1YEQsFkiedQW5vFPcTWtVi1EoOVB +e/ddWwjw/3MwcOdD6G8p6eo5pZ0A16paZp9jj9E8dAr7cmgO2C65xSZOdIHa +p+0/DLWNwPmBJZvc3TBfXN0rbIMnAuvg3WkJsZ6AbU/xTpkcEhj/evxwO6xD +EuyYuv4s2wDbynvKF2EdUvm5rw7tFy0Vl5zfrLgM+Ad61WPgfHl7f9/76Esz +mOt5xX+qvAl4eAxK7aOeA9e/7iqclekB186ceLAdfgLcPTkZudwzC84nMpNQ +nxiwHdhmwEeLhRnyLqM+EZeRx26VTQBzT/uPXqa5DIwZkjWqYb+QqXeCDp1P +Oc8qm/a9hwY7+CqYfK5w4w99f0keERjPVLU0z8mBffvDiJbPSOCU9sNgtL/u +i/Dva5qrl4EW+wHKtzCP7Ok3vL+eSACcU8/0tViswJ087LMNyl/YH+1r8H4E +dH51Wt3cgdWv9Gqi+7E2GfvABevbpK/js7JXrYFGY8igD6xvXZ0d+Y7DPHVc +5WCaGukSUAqNV7CH12cvqPkRDuM84+/yEc9BS+Acw6vGD+N8zEsm62veRKBb +6WGEdzADRT7vXv6G7/sb1ndjfk+JwJ7O6GpxjSkwqtg5HfWEBFrvOAk1rhOB +TObBmpTJNBAbm+oq4QvryRYp10U4/kcvejR3ql4C5SLBoZJw/HV+qUZaw7ol +Tv9QE/cjC2BkXM/8A/7fZcOvjTXwuUJvE/dSlHzGE8S/vUXv9T16qq0PKA/W +CqUa/VjC54SzViA/fzHH4LYLrWN7CnvWJv3BC/UUlKD1pd/mt915oH3869Wn +O+2X8BNNDuzI/mKKUQr1QUFPL2xHaq/hd9Z//4Dyy/euw6Ryv3bA/Fqadis/ +AGse/cW2fWYOPNmtf1IM/v5dpP0HbettfMa5jiQUf3bck70hTkMAjtPCuYZ/ +msC9PXVnTYJhv8Zvea+FEfZ9Fhajs8ccgc8LDzPd37OAjbGTR8emG7xWGFj5 +89kOdFWH2v2mgfdTtAmQXsRA6ljJh4VxvAbN0Xfo+uDmchKKe64hblQSR37i +cykdnyL7PkLOMhe0/876ZGXqvIj3/hh5FD3X/7UO/H/9kczFdk2nEwFf8fGL +Y6U4rCUskbqjlgT7dBspDzjvpETRypYQK2AV1PwOzfvQ06XzL2E9ueX2IvD5 +og14yNnjMQfj2EXa3wtoX1akbMTv6xus2MyjzE10n87NbTu64Xy97BARCEpY +w787/mkCzRe/bLiWsek70PnqOQvP4mPsZldrcsLDObCYcqOIp4gAYrNEGaWj ++IGSb9uLCpgHjaav4Z8iTk3In+TuQDngO3j39Sb8v49T+P6g8xH1HcLdaQy7 +sVSdb0Pk/dIs5w51QLv69dRQjlFWLJXm4hP03q1SmE+xovVJNZ62Used4KzY +5A50vvUkhxP/Uj4ByFa0ah9pswRfNqVrV1Ed3jNqoV9CAJkVAkoZqZqgXUN0 +wBbaOatSvkrA+uczIwWFJraBb7jKaoTOGfW77mNG31NKsi64o3PK2jrbSciv +6BRieND3hYpaIXpD/3S8Zd89OmRXVsBZIt0bCZYhrp3bhfiwlkEeFG/5TkcX +1UE7BdtAtpjLS7zhzzY9tB4bOpHtKA3z+OjWcmZxci9+zzzdZ7TOML85+D0H +1rHSOe8dnQ/sAHUGIvaPYd3yfib7QCms64xrlGLPxSzjafnpTqH1HPPbnjUT +aW2g7gqXG6VeIlYqu62weXEOGB2c3uKCz0thZr2U3SwAhBWVGFzh89anqzLz +6RPBTwr6zN9iGmDn49P1kj9J4LzuuaE0TSJ4GZlSF39GD+DZpub1Z0lgvopy +xQGd+753pNShmAFwfmH5egHWye/AEiYE44zVibg57OMR0HvjQM9l9L674y73 +X24AQ1JNWM2lK1iUUcYNGrS/ceL7CB18Xuvoobz1VGpMsOmIL6rf2n9MebdX +E8A1lQp6414LwCT08lMl7Oszwnlc71wkgoe1ygcuvVUCbVE9m6yjJHDyT/TV +5+ZIh/ACpWcYDnzawW9AN0yCeTvCoR6Oj9T++bcrHMP49I0tO1T3Uv3+NGAO +x790evzcxoto/C7J9CY0X+d+aJ+jgfN+jnSv9GvQLG7lyu8pxNP81huQ6Ih4 +QwzWNV939uD3bbs8Rn3ll6zLu0qgv13osOk07tsJrgORN0egvxlJBRpovCaA +vXLNW2KMxkDwQOrJFVgPF/aWdN7tbQe9H7n7cEdvYr/uXcDq5OfAdscrLhcY +t6VMo/R66TnAlRt+zCowbmNlExxIJ7B4LQpnwUELKI1bKNdg3RWff/sg4vUY +WdJTG579hX9hSFuA5r3Y/xJnAxy3G/rlChfFtIDDrGdfFRy33cb7I5vqCIAt +1zkhTlwHuDs+iRFD65BCuVUKVQRwew9r2eLGURDacHfvFLSrXXy2U6Ac+ttE +mr+2yGEgycbBjUfnJtL0Mp0IBCA+HHdUekQeRDmX75AfmgUuy5weK40E8Cuw +nk9T9hR41bD4oo04C7RczOJk6HtAxbHqaJZaXSBus9fS48ssmGJmfMU/TwAN +Ho+Diks0AKmsNGf06yzIlxB2m3zUA+6dDOFsueMAiEo11nnvZoESnsGI0aQH +HDvYzFvzwApMjpwYS+yE77XmxFXTqj5Q9Rw3weF9B5z1vdei6Anr/CCJ2K6s +XrA3t/1FzO9gsJAnEaaQMQv8vt09V499BdNS+2gVvbIB+/iLCVzPNEhTVY7p +P/YFiP64YNAZnAUaHsefqHg0A1z6b/F1ixLB/QvDRRQx1uC61W6ldcopsOag +XNG4C/bdBmG5R2RdwJqdoJEu2xRoy7hheNiTCCoZTScoGVnAM4prlXywPjko +1vLIDNYth63UGLJ3sYHC7nznQmifr9m7vgz7phLKu2UF8/rAt1Qo9BX0k3vs +HE0esE5wlWWr4CzgBpujMpVj0B+Mgj6EV0G/XXNbnciopsK0Xl8LRXHj8dmh +Gg0iETTjlIIztSJBc8B7Pds7JHDvdcHkrNFH4LPMdF3xSRLQ13S6lCE6C851 +tXUJyRNB8rnG+2HrxmCvTMbZuV8k0CkRxoLypvIJroMmdXfwVFfUP6H3YsZC +phD13aFSeS2n8ltx09n15L6b6gI+fhvGpWXmBPthF3ZsnN61OwXGpbmFNU1b +6G/5ZjImA58uAufAY6dPIb9SbCyx/dMM6L6W6b8sycQWty6G7vKbA67zRuun +Yb8cx1pWP6qlDwQfGUyehv1yyvmBUHM7IjAsFrULCDsL70Ngdxu0b/QFR4y+ +gu/XVjmDYtgJsPt4qj81vP47R5ZbnrBvUn/alaT3SAnQy45tecG+6cGC8JVW +2C9IvvlKwR5oBJ7KTVFLwn6Bb0BZ2GCjB+Y3H9fK957gU/S6yGzVLJgVKVd+ +D+fxCueei+fo9wA73XuOtTC+KR98Y5bzhACYh0fSOdxtgJuj+AcmGD/rWC53 +aR+Ede+np86aAvUAyzs4+6mSBOIutr66aTIElBNt/L75twD5Y6VXRIkkcPrg +gmiOAxFk0M1rHR4yBj2mXNnnB2CcfGzfvgb7iO+iu5yEH5wE21PK7MIwD1Ls +0WBC56kdwpk5688m4llZnl0lf9d7yB3qC+1cAfoas85Z+DcXpjtQflGiYmRP +hvbrIqIsWh5P8f5ioeWo/r81L6v+AX0HlOW7vvP3W/wfquc2KG9mKFxhRd8T +pw5blyUsfcM/abKdQ98TDYkyV/PQOsCLBgOBxnWcKOH1AcRzVztqvo7Oz/qI +JmaqjtTgRSX47iB/iKtix6NzuCNzuNM3hCiw0L56UXTedvjtjjb7BwTAIqje +pp96EnswtiuzE/rJ556RI77QHsk8+P3BHVoQEbXvcTu01/KMpGTD8Rc4Vq0Y ++8QGrId9Ku+E488d7BZ1FOaXbS89UqH/ZXD4COXBizC/CIq+OXgf3n994gN2 +A31qbCf2NQrdf/hr3wq0b0Tuovu4oT81pn2q/BeqWxKdIr8swbol3U3pY/75 +Bfxj4WP3UZ+VLnqIbRH6s+k+7tbPHjaA/rd8VSLSAd42i0TfGcUzuD8wSZPw +Vb/8O1C9Gud2Lnk3WuccU2fYwzWJH/SgzUZ1Wl/k0cOIVy7BlMtGnF/At498 +6Ufr1WYb+nfUQxvApZPvNI5Y84HQUuEupCPE3JlljH6vmdr2PSyvH2dOOk3m +m6fqGsq/vd0ATj+VUB4UUAcDmmV0JfD3jfmXEkuDGwBz9ZNbJi3MwI5Vg8zX +vpRB7dCQRAChXa231sMuY1yCPmpqMB99jXh4N5OtE4z+dpJ38vLCZAKNtcpF +58BLtp94uTUi8BPOVH649hTwBtz1cHEigZD8+0n10D+fN4zZLu1VAYfumGWj +fVOUHCHMSMdA+6Xj3YUnsfjYn/mFyA8V3jyucIV2hvKnozu3U/Evs64fRna2 +4ipjpK/Y+PJY/BX1fPywDTeZL2xlUHMK7Zu124sTjkmuwtNWzTeiOGYWpP+G +Fc6jDO+XkYHTnfgR3wJuVA/s3vGbQzidACSc+nQFy+Zx7p9q8uLhvFz3OWPv +lEIAH9iXFizzaME2224WtB/VSCX27FeYv8Z2b8wIJqqBF2m+bXkwf+UaTj+Y +vdoABn8K5G/stQX5B0+k3UP1Bk8irolyGHyJlr6TCbLBsJSO8Iw7fE/dw+5c +heNvSv8jElCrYfqkJ3RP4fi3KDMtDpQSAD6aMkDqlg2Id1WKFoNxoHSt5eCm +FRH8Llowf8B/GiTvk+tR+UECJO9XHeuI22tkUmdoKgg84wPF+2F/ZOFBmFKF +z3tD1vTddjY1NlbUo4bqvSN9pqMB0H6A0ebUbWNqjPubuQk6F+bUH8TID/N7 +0z3Rq9ciLIF6vFBqK4x7Empvnp1/QQCv6vZeL/h6CfgH9XvTwuc9yMhYFbFA +BP0ESbrd+DhQFhLk2hhMAl1l57rujBKByKUel99Lt8BPL4lu7igSsCx62YjB +/7stb1E0G0KFNdrvbUfrSGkRVEIUK0Sg+npf+TF8AiCQXoTMBZIAfbCD/8c/ +RBCBj/tzeLYAfBM7mFHoCvPIodO+JB4CKL18rFzL9zLg7syd41qbBboVycWF +sJ4Ry3aKyhKB43bRcp4fvtf2F6sMluD7LvU2JieE8RIw2vALTUPrrj8q53Rg +3lz8oPeYQv0y+DRb6lEM86bi1xMZurDfLHvgLTNffRlMuraspcPxTJCpXjgG +/VbjauyZPWbWIHiKsiEF+u3gsy8PFGB/kRqN47rtaAYiv71hVekngajmYGk5 +GyLQfqEFDEla4KXUlxCf7yRQlHdgXRe+X4wn3ohIEpmxu48ORLCjOjxnVhDp ++33gCNt31oMFw1YnxFC/817oB3YniwDoPW88Ct99GWhwGiz3jkP/TFuK3YnW +u3iu5spnTuH5qxKJKD6o/7zU4YL2vSTJp8XR2wC1B2nPSNCfi3Ta7Fjh780V +XZVbNsbxpzX3e6Hfay7u54+4D+OSbMv5JfNL4LRg6Qekw+9Df0pI+0YXMP9p +zMO1ogq+Jl96y8Y2B0o55cLkrxBBSwXFZoyOGTh1VOBU2Dc4XwGOWkemYL8v +EThsfeQeSIn8KqEXTgKf/DQfxOwYBhpuBb6v9+cDx4eN8ivOsK7Wm/bsQXlH +NvHOZVpqrPZS9XWUL3adli1We04AvwWt90bVWIEGmUDmI9DfQq+GU5CQnvN3 +gxrNen6AW/Q4pQjnhZbjUgs6p0Z1n3hqc00AHD8cK1CNzgl+9qmWsoV5VsSx +YIndBPTfrWE5OkgCqpu2h7fOd4OnY99uZt60BUKRqyMCtHMgorDpzFuOLhB3 +O5y7YNsYu5A7pmnDPQc+5igXCOURgFbeAvdN0cugy+3xQSk4/vs1Sm5GZBNA +c9B2p/b+y0CzR8iwEtq/84tXHSoggIiRH5ZhbJfBtyFN4hx8f7kkUqTRfCnu +HulkiNzEPzQuG0XjL7RYzqtxcAhEtnyMqGGIAd8X76SsPJ6CeX3ghBb8/cP9 +a+7neCixknO+Xmh9TE8F+KN+kIb75PY7uR3YTw4iNYqHriEkSZGSIeAv9NN1 +RcgPaPVUWRhemAJD+V4fZoeHgLPqZctb/kHAS9oi6ezxKZDC/3Ou8ccQKBC0 +q8GVBgPOSAtzRYkpQLqg0aCn1wnofWm/KM17YEsyUyynhOfAUhln2/n3RCBt +cCpK4po36Ngrrng6jQSGgx72GPYSQcf3r9Q9i4Ggm9/Brz6RBMprzBKKZbpA +pV758D4ffeyC9YeVa5xzoORUrbZCVCe4JZlrnavmhJmVF+6nEID9rFBxsebj +LtBDna+fq2QI3h49tHOQZQ6sHeN/TelDBE7Xc76+VjUDB177eGX0kMAFCtw+ +tD7T6VYgMVkxiy/IKOJE4xkZEUyih/YbhAW2qZ1/8BGK7A3IrnBh4MvKajM4 +rcP4xP5pMzho1BKvujoLTPMM2flgnNn3rLDbpPEBeO5RGXLMmwQePO688jCP +CI5ZxG/HpfMBwy+PNB2fwTgQ1nqqzIsI9OUZWXrlLEAsH/YzAPZNDSHn+xhh +PPn+uFDNmMEKbBTzCX6C8SR+Rq0b8YsxT5W1j3rz+FscjfEov9OtcpiIEQng +0ANnYgJXMBbWb6n4ahDWJ1ovzuhBf04Iow2hExcCwanZu3KgP99ZjpY5Cuu3 +KUEanPKkObjv5qJRCOs37a9PtZHe49M3Fr5qP2kxW7olR+QnV0czKdA+dm1S +7Dst3C88w4EV8j52qs9r6bnQXmZpWZHzgBarYOiKROc4Mp+xul6C/qwv4HpX +bd9lcFr3liFah/yU0+uGOFwdt8svyDTRY6FN6r9RPo2T7/S4ngn7d8/01DjV +4xjNhWZ3r2oSEAKGoSnw/vE0cY84YPwkvtJbQPuHMwZSjVxg/TBre3agUM8a +rHD8Oa4P44xIncbiK4tuwKJCrZuUdQV8uGzBq7ZzDgTdDlxrgvfpKMdYEfuZ +Cdt1+aI8GjfPjZtM6P4lHztfV3pAjS32Ukej+3/zuMZZq5IAWr/2RGTaWYMn +ngw+V2HcEJOJEsiF/W9GebbsrIQVEI8428IN+x2K5MLNORciUCLwPF7sswQH +KCWyw2C9x6nclrXoTQQ+Wc2m0efNwLAzg0Yh9LfazGLGnBIiUEnkFK+vVwdB +Q5wTLmUkwP+kPnMZ+o+mvd3DzftpYI8B5bKrFwnc39jdfRr2WWVmpdcbRa0A +Te73KBo4DknOJt5LcB7TNjoxcYIFiGizaRWC85jLUSuO1i09/cSAYFQfXvb+ +uWb0vOsxaW3N0P4WO+lnX7mI72R4LIXshrVm2ag+jEz41V2r+Qfvs8s7C/m5 +F08jHsX5PiHPx8qTlFj7yaSryF54Xaaz8UQ7CJp9rzb+4jbGpjmz00oV1kWZ +kZzoXO0CMaPzbcQYvsBukXyu1kCEbg3pJEsnEA52ZC7gK6hYAbpOcru08fy1 +DrBscyMvd1cIFh2RzDZ0cg5sSYZc/kpHADsv2TNQ6dgBO+eLes9+z4II+5sc +O+B1sJRy8YS1TXyBMRcjqocvi5x6eftyN/hl90xE5cMVoHpsSGCCZg68ol5n +rUXnOlmlY0ZYt/HBAa1v0POG9P1sR/w4r5cvvlxc+YU/Hv6oAt2PeV9gr5R7 +Oxjv8Y7dxt/ClPcbr4kqzQHjxmAamY12UP+Tke+yWDhGGdhKe0d2DvolxRMB +pJNA6WhpazuO3xMz3oOet/AYx25k730z582+bxJvHFn+Gdn3E92jONE6W6TQ +t47OBTyD2WdZ9H/l2v/qtbLPt4g4TDTi0lP/6rV2X/2r15rj2xdz5WwHbuvS +X73WQ//otZI6jPZ8VunDGf+j16qy/lev9dg19jwK2QFcx5+/eq31V//qtW6l +sLE/DSTidAX+6rXShf7Va60v7dldeHwMV1HwV6/1SO5fvdb0raOU09WjOP43 +f/Vav8b91WttljlSsHxyEBeQ/1evNUP6r15rYJ3+5d1xfbjJ43/1WiMn/+q1 +5phrJp69/Rn3ceCvXuu7hb96raZDyfMmSV9xFSJ/9VrnJF6T9VrtmOYHImct +MXrzLLJea3lQGVmv9UA6KdbhnBGmoz1C1msV3e4h67Wah/KMGNadx6z8DpP1 +WvnnGsh6rR91K2Yry9SxSLuzZL1WpomiLDRuMW+1N0qevcOVhzprk8+Jg+4m +tM8cz89WFNLyHrdavPMYsldme2ai86oMN3hvmrD14dg/+JDPq3JqXr2B7AMV +zkh/GLezOpmsP1yoTSuIdHj0us5VyweP4FK375P1hytZghzQedsEs3MR7xIm +cfm+LOZonEU1hzeR/nA4tc+elyuTuF9nxg+i8RnIJ1Qh/WHX5Efgfu93XI2a +wDk0PjszKt6hfcVTUVR3zcs6cB1Pn5DP51q95ItE+sMn5Bc22ksHcLse6Eyh ++eIVjTyPxvn061cH8mbGcLylPx6j69Sk40bvJhPA6nD1vifnLmEHZPilkf6w +LbcKWX84jfVjt0G5IdYuS0vWH34mR5mO9Ie5uYU/esyew+ik2bKR/rDFHn9+ +pD/svcJk7Deviu0W9SXrD7vaR3ug8fwUTfv+a0s97lg3P1k3e/Mf3ezBnNeH +aN604mi9/upmHwZqvmg9p2vTQa7uZC/ueMkDsm62cXmlODo3YRfVinSzcbqT +H8jnJjbLMA30+0qnRAG982O4mt+q5O8mhMuXepButqhrUbOexhxOqH5wEF1f +YYWYRIDjgD8m6/82YBYn7KXWj8bBOP7PCNLT1kwQC84+8gN32P8lWU/bi28P +QOMsWJO/w7fXA5cpF3EPjbMZVfo99H1k8hHzCBXLN5yUvP1bMg/uXN3rETKX +rSFrf+UCLmYrRBhdPz4+4TLS017/8ej+c09L7IUqbwDS0xazJukjPe3JDduR +dTkDTHfn4fNIT1tfQHsd6Wmvvvwh1kevjXHgUteRnvbzFo52pKd9WbV57Wu0 +Mta/aUbW0w4aclNCfih1nTHuWjAe18Tzlaz3fvTIS3e0v5TP322f4JsmnCCv +NHl/6fNei8fou8B1jrrbd10IOK36rP/Se8f9q/fe+4/eOweTnsUjnXFcm/Nf +vfdjtlZWSIcqrXX9mhXLEq6XmYqs985eMHwG6b0fPbyj58TXQVyw5Gd39B1w +/fXirnVoL/Qsbs2nGsKfHSq2QuN5gd6uBem9R8wkdbTO9uOKtM6TdRLY90rl +Ib13qw7LNj6dTRxl8nYA8mcxwfdqSO+9VGcPvpPLHLOV38ol670zJ3cjvXdX +6yH39GY9jM071xXpveeGfWZAeu9a8tTsw/Nq2GnjPDuk9/4okXsa6b37Nt3S +uMAIsAgWhxKk9652//ZV5J/OUoIOJ+dqcLtSwsncgU9bf7kDISf1KtWz63EM +/3AHNt8et0C6r3KWRzeE1dtxPr9HyNwBZ0X7OHTugPfJK7Ok3Z9xO8DOd2g9 +ISTmL3dAvsaAou3GGC465C93wDXEax7Zf7ReRNwBXMSCNZk7oPjE2ajWtwEM +C5xJkJ4YwH3EiTMjnZ/OHsVAlE8nRScdDLbX8IApSQWNj90MUw7iDigf/DS2 +atmDI6zWkLkD0VGWrog74DdwO+zOGRPM+EuxKOIOJL+4mYu4A1/uh5xvltPG +JgQdORF34DinfyniDjzmmNjPlHMGO8Vm4Ii4Ax9Er64g7kD/1nTUKEkGc39O +kYu4A4v/cC5k7DvctCMqcHn/cC4Y1v5yLuisqMvFn9biHv3DuVD5h3Px/l4I +DsXhzpa/nIutXt9gtA4T67UnlsWoB/foVjmZc5Fj+pdz4TBM2Q9yiTjWF//J +ucD9y7mQea5In+gN4zMlWxqVzmeckEbeXsS5qCj+NVAKf88ofnlAq5kRq92Q +GED1Z651dD/iXJh8vanEhivD8eb2D6B1jERLoynuJwTAnpfJez5eH2OS4ApG +nIsBP8ZLiHOhGqnsskkDsGhB9yLEuSiKqGFFnAvahItd/l1SWKesbR/iXEwn +nwhHnAtFhzM1xfsksKiBLTLngiP9qS96j3Ijy40OLmbjDoafIfNWDP+MuyLe +ClNPscmO68W4mH6N2+T1q394K5x01wjjNS9wH//hraT9w1t5Qz/IrPymAXfr +v3kruH95K8kjf3kr3Y/vq9nwz+I6nP7yVsKkRDnRPlu5ekw5ooMNXBBaIO+z +VZC8FVvl2AD6O8Y3gg+N49ZmRZMQb+WMpRo14q2o2vSqfnm0F1OWJ5J5K4pG +99Z3Qfup9lq3c17P8d1txb/Rvi+a0ZYZxFt5xFeU/0ZWB2O6tsCDeCv85TyU +iLeSmbHD0DZGApSRqFYQb2XVZUIK8VZupUa+r8ngw6oT58i8Fddzf3krhzq6 +ilboD2EpRn95K2/0/vKAArgnb7EIyWEXLaL/iweE/csD4lQwSUE8IN7+Kxgn +kzHG8HDg23/wgLB/eUB0xZmvEA8o149w7K1SBNZSNtWJeEADmfHdiAfkk7Oi +sJSfj31RnB1DPKAd78TWfcW+g9GKQabSjGrsM38NPeIBFdaP3UY8oB09VmGl +dfex/JdaiogHhJObvYF4QC7LBcLdqdewPYlOLxEP6LrnsyLEA/KlElKcMrDA +ZLTiTBAPSIVVKBLxgMqXCvmm3RWxE64/mhAPaH/0Xx5QycDdq/wNJ7A40b88 +IClfzV2IB0QjmjqF7RDBKFhc1REP6Ox8EZkHFKr3ikfRnxdjfvOXBzTywLka +cakMj48O3WDWwoY1y7wRl4p96xqZS3Xd9MfHPhMjbKL94H9xqbB/uVQbXXVk +LpWNttGE2poPRuzuInOphDZ0yFwqc4HVZy+sYrDFpz1kLlVZTK074lJVBw65 +ezqUYGb2rgaIS2Xk8ssScalGqHS+P/2cgtGEej1EXCpuy7QviEv1pHxv36PT +IdjIeA4RcamiHsyRuVTKyRP6tLJO2NHSIDKXakNssQ5xqVQbS9Ox7bNYmZtn +CuJSnfp07zbiUtEkXUNcKixNVsUUcammJNwaEZdqqHTzZOyVU9jjDipNxKV6 +fVvGHXGpykQj2BY6j2Mjfh4PEZfKpuIvB+2nVr1UTMwFLOp5BpmD9sOLi8xB +k5eb273IaomdPGBL5qB9stYic9DKWbpuhB9zxlT5N8kctOoPzoWIgxat06Pu +zReIub/rKkQctG5PJjIH7UyW0R31zXvYuyRlMgeN6nwHjwTsg4DLfTu2jQxM +18jfGnHQZPzV7iIOWpZuyOOmFwnYhxu6loiDVlZpR484aCF2lypfZ4ZifOdp +dhh+J4HPrz1UEQfNy4Lzdv29q5ijq4gV4qCJDN9IQhy0WgmL4OJLBhhNt/af +/+CgYf+fg7aWjEMcNKsb3MPdTGewW3VMLYiDdrFPn8xBk7fsaPquewpTcP/L +QTMU1CXz+JbZfvY4GRthy88vkHl89U7vyTy+soduz1t22WBybEVkHt+FRV0y +j+9qRarrlXlXTKbD9b94fNi/PL4XhEIyj8+edb541DQKs+U4Sebx6SZ/uYl4 +fJGfJc8SZGMwhT4FMo9vscZyBfH4gjWsNAyWb2OBfxKHEI9PTj2DFvH4OGeI +Kef0Q7AzAudkEI/vdsw7FcTjGzd3FZko8cA+LIyIIx6fmng9mcf3SJA+VoHF +FpMgDPH9B48P+5fHF1Q0LIl4fGWHmV2L+3Sw7g6vV4jHdx7njUff2a9M/L4a +KqyK7cr6RebxDXLzKiAe36S8oRbJTAEbOed4HvH4/ocjif3LkeRUXR9AHEn6 +ce2HY6cvYyLZGl/+gyOJ/cuR1KlTi0QcSZ35P7Z6Jn7Y8vG0K4gjSSCZZCCO +5GL50qEkxTDsQCMRhziSC9fnKxFH0qPMiCZoOQQL2H2iDHEkDZST7yFeZN8I +x3r84A2s5IygOuJF9j+9zIN4kVNOuLVKlgCs2qdEFfEi914TTEO8yHNaScbv +h65izvIbLYgXSdWc+BjxIh2kzePyPtti8vN5PYgXWdZ5rhTxIp1H9yNeJEb3 +7iiZFykSzxKDeJGrW/XZbWN62JsxyWnEiyxqVJlHvEiJ+0fUQ001MN0MtyeI +F7ml0v4T8SJdqj4hXiT2sVBeEfEiV1NMyPzTjqY4u4K9pljHK0cy//St024y +//SHxqOj0naXsWRjVjL/9MlIuS3in2a5xwinG7lgVCFu7xH/FNB/fI74p5px +N/gXWr0whuItMv9UJwAIIP7p+Oqaw55efyzeZYcs4p+27xm/i/inFDVvF34x +XcPUKws8Ef9UkkmGzD+l+MSU/8j5IqYbukXmn9pG7SHzT/sTbl4nvPLG1nYI +kfmnPZKxZP6pZk7jnECzF8Z16yiZf7rzxDNhxD9V8NjhZ17iip0J//Yd8U9f +8bGOIP7p6dZI5xl7W4zh5ncy/9R65tluxD89VPVSTVrWDOOgXN+L+KdevOMs +iH+6ZmiK+KdYboMDH9ID4eF85ov4p1WfzDDuXC1MIefD4H/wT7F/+adOq3pk +ni/H8tGA23qm2D1eMzLPN7J6D5nnu8nlpyj91gabSfrTjni++HR6Ms/3TPnd +CuEqR+xCZTWZ54tvZyXzfKfzMYfHqh5YxVXL/+L5Yv/yfAX9ssk8X6rQnrch +LfZY1+cTZJ5vzIMMMs8XM4p+KPdMB6Ppd/svni/2L8+XrYWOzPMVCw/hly1w +x77aaJJ5vt78nWSeb0vOGmH6oyMmvfafPF/sX57vVZNtMs/XyDDrJuuCKcbq +spPM802M/ETm+Qq7v2BQS9bHNM3ukXm+LiF/eb7qni8DmHadxfa/nP8vni/2 +L89X7QK3E+K5yEj9LPs6uIq7vhAfj/Q8t6QpKHTLCWDttuLU62ozbM+wqx7i +uTD/6MXfgHXdNt/zze+HhnEKB/e2o++/ac354YgXI2KiWpdqaI+JHPLhQ7yY +zv2177WODAGX6QAv28gkjCrT5Q7SJ3eOOvsOcUDS1lUPLixew05hJ6oQByS5 +3Z+IOCChlgzuB1hMMEcuvwzEATnR+TYdcXMOPbE+ciRWBbOsClxD3Jyt2Rwy +N+eYnd8RhR/CmOf5v9wcbXdejUuRbWB1oS5Ti6kIW/jxMxLxd8LYaW2e23eC +Edo8Voa0WxitXnEd4vVMfMy3QetCOjqvpq99bsGZMD0l8x38fhuxofU3gWbj +zCKPRlzrcN9F8noFMc8H8R126rbwcd/UwqqkN48gvsMp/8hTiAvQQ20oMD2i +hpnovSRzAYo1ZmyRvnqvushb58PLuGMhEntRfb536Z0a0j+fTuN6zGv7C3fZ +/0EauX9JuNmNOBqTrpHWjV76WN2LSXfE0Qi5/sV6FM4XdfvDW8lxK7hH7bE+ +SA8wwPI0QHwEuk23qvnsedyNewpCaD/Dx4qf51HfesOxGXFncJ3v6Mncmf/h +1GD/cmr+h2+C+5dvwnYlYidaH1ArXpr39srG2RNMydyZ/+HUYP9yav6HO4P7 +lzvjL+kohzg16hQ5HrZ9etgHcIIOcWoS9lPHIu7Mn8pIxJ3BXVHg4EX9ncPa +ETKn5kLlTZfjNvZY1f1lMqfmf7gzuH+5M//DqcH+5dQ4b5jWI47S0I+j74wj +FnG/FTcUkS5x1CvLSMSpiZgZIRxvKcAsjn9iQ5waflbVJsRRulNy9ONwoxR2 +FMs/j/Y/lOquhyGO0smHRo4ritN4o9/dpajfOXmA1w3xU7bWH0Z6lRTjpxo0 +t1DflPL4uhvi0ST+yWISlSLhRjvnZxCPZm6XNwvi11x0MjyV8IAH407Si0D8 +Gm0bfxnEo8miikg2jGDBMEtHMo8msMA8BvFruipshIxo92K+ew+JIX6NZNWC +3EfYT7m9+FMW/VsTm/O0P7Ab1jm2Gh17EVeoOtPAcI+bGOYRncOHuEIduEIw +hBFAxZqiwcl0Y8w3dedZ/+FZ0PDTV/bdMAGUqn3k97zogD3Uj7pUOQj7pkEj +gyjRHtDwfW2FRz8YuxdQNI3vg31NpXks0t8bNgkdEB54gE3fu30a6e91ZuyJ +QTrnj0QqlMzv5mNUn75zIp1zsUD9cqQ3/snmjUHB5XdY/xIvH9IbJ7wzCkP6 +23ka8o8+ioVj4MsTKaS/HbJUMol0vPstLNbwgYVYveBcKtLxrqlq34f00k3L +cOW4J7bYGv/qPaSXPqu786KnHhFEejw6qH3kKiZL/Ub09CQJ+H1QP4K4TuJ8 +TdXXE80x45usY4jr1BKkVIV4BMTx55xy03yYhlIZmUdg9xDX9xh9d/vyo9yS +QhpzPydb5QfnJav2L1dFpObUTtMcJsy+4y9X5Xj01NsEOC9c5vvOZXMcxd5S +uK9Kw3mJmjNIuV4A+527Z4wGVVSwa82KMT/h+Csz7PE/h+rervYAjSsiWMvs +xWNv4HUOKN+RR1wqX+ol/4cfcrD3fsdNEZfKl+a4Ed1wO7BvvGk6IpmMxXBd +0UYcK4yD2Iq4V/waz9v3E+Ox1BDFfsS9Et1tSuZtJcTVVoqpXMKkiZJk3laG ++CtdxNt6V/Iz8oSuKcZnWCqO7Lu7X6uj/MvxbX/PSpo6Fm4XSIPyb6ZFPJk7 +Mz5wOzlKUQPzyxYnc2fy/+GhLD8/9FNdvRXX/A8PZS6xhsy1KRCLlW26oI19 +Kcgic21UE6/8QFwGB8r93H4TxhjfJKUk4jIkWAYJIW7LL+6J5BeO2tiqPlcl +4rbQ8snJIO4PC0fyvnEKZuwadSyZ+0Pdyht7BMar4dtjYaKUShiJYZfSD8R3 ++BEo090A63naO3YKe3Wx1alrUXuhP1969prSgUQAtyo5pg8ZW2MDO8P5S2Cc +uYB9LKBT6QE4o/e7+pV9sI0Tpq1ahFlApGvTr5HrBTKSPHH+uonYxQ/LQYKl +s8BCNNCccfQTMH2WtKbjXovJFerup6+bAVd4gk4teQ+BvbfU2aomcrHKneFx +Qi4wr+15f3oH7EOd87jF/4jZYx5E/hHuaRI47PjpMOKIMWWe/BjFbYCZUQvo +Io6YyyFGgQDob+6/FN7kXzqKWTL73kqE/sZ0Mag+4Bo6N+phfJnEj/nL1imp +Q7+Ssagjc4J4FcadIlcsMQMKBTInSFDxLx+tp/DAjU9uKhiNXSGZj6a4pfIa +8Y9s9isJk7BV3EAcngOta/0PBwH7l4Ow3X/9FuIgbK9Gi4UlqmPVfMfbEQdB +8Vr0VgN7D4gaEdl1J9QMOyO54PYfHATsXw5CbXIDJYfmBzAVOp6pYJeKUQk/ +cEQcBKHfNXcRz0uAozJEV0IHE3sm5od4XidL/vIOHOhneL2PcGCqPn95By9j +7bQQj+C3ZfuSTvxbbBzHmoF4BL/uvcUhzo7g9iCeOjUNk9tncBhxdrJu3qfu +h/4Wb2Y3wJ2iiO3wyH+gCP3k+B58wUNYn5RE4aul1s9izpn7GomwPhnI7tfP ++0MAkWEZvxW2LmG3A8P27ByYBeuNlnxdfj2A60Gyc9wv6CfTsQ8/t86Ci998 +aJ/T9oFB/pOX9qelYD/VLAVto2fBA1trVc4LRJBxQDabbdIMe9xh7/n1Jwlw +4g6epoDPdaaby3pEWgD7aRKGycP5fR9LeYZkRgR0Mj9ybjy6gFHMFDLcGSYB +vbxLgeh83B6savdE7Q7wOlggC+1rOhLwnPv8GwK4+Izhdj+1KuaSGXe4D/q5 +XmdpzqcfBHBu+gXxtb4hVnji4/eD32eBjFp2ePuRHnDmLQeXBI8Tpqj75PlD +GLdVgk4LTm/1gG/pbofvHYrEHCnfZNBWzYLshFn2aIuP4DDfMuuKdzE2cjTh +ph+Mz04++DlK6IeEt+YpxRa82IpllEQSnJdbIofJPJ3lfRS+L/HZWN54LjXi +6ayu/uXCMLOthHTKN+OW7v7lwvyq5uVGXBg+h8ZVJnpNzOD7KAfS//zzgXUd +8bbMGPIGs5SssS3VOC3E23LwFP75q5QA9oOFPuspS2xE5c1BxGMy3WH3+20N +jGPsjsMLyiZYac6FdsQlmTdwjNsN83WCktALT5wUaKh+0ol4iHPs+3dtlhDA +HM+BqSPep7DRqG9eOvA6CnrLHxC/L0PUEidbfg6LPiwZgvh9nprKNw8IdIBs +nilRPP0Z4HbsVwLimOy0bCIijgmXd9l8unwSNvi2WAVxTHofBJE5PswPXzDO +ZJljAcJNZI6PFL5JB3F8VPee8izUUMPYu652IY5PuOrjNcRBA0dt96i4a4Ga +o1UyiINmIHYyCfG8fnFo98k/UsHoFTMkEc9L4fvz2+hcickQ7rSZGiVgxPLG +UJ2j/MNztBjWh7WpafNU0hZYU9OHBsS1iWHRMUPj73d6liLhcyNunOmRFRp/ +GaoTe0VgfVK62OaUensd94i3bydaj722otpAU0cAh3lkrnKEXMBErJYEEA9o +OsTQG/Fo2FqsfW0CP+PoR63NyRwuB9YyW2ivkuXKEbxJwh0a5+xB5wuUlPTY +1OF8tbV1pUiyH8fsC3LuqMBxTtpzoGCubgCojDOwFNY8xy7RS6gFr02DtqQU +5dWQH4Bh0XAPw0wBxkvzwHi8ZwpEzTQP3hL9AZR53HdM0mRh7XG24tRzU0Dq +lKFauxIRSBX25nr/tMN8NXkdixZJYIyrTpftDBH81B55q/jeEvP5FX66eYkE +hOol0xoQX56R873WkAhW3MVxjAHm96Jb6V8+orh6TN/YfIYLC606ZIXOTScb +7ceh89RKRC5xDkMWLEPgF80eaLdIu2aDuCF03CWs4zcKsPDg8lHEDdmt8zke +8TUsF/SqGxxLsWkXLUfE19jvd5DMW5nInG/kddbEXu1cJvNWzrc9jgh+Ceed +5PNn/so5TEK8ldIEjjPvYl3LQ4o28O7j8BrjaX1gSby6jbhOzas7J1R7msDk +GGZ1Us4aUDngJRCnQ+0opRfidOTsZ2x5mp2PvTjLzoo4He8Nr5A5OMstxXso +bptju6ve/BcHB/uXgyN+4S9nZ8P56FtiQjNur8Nfzs7w82/ciLPjF6C99PK8 +OoY/WkXm7BD+4ZflPrIcMK5Lw134b34Z7l9+mTxe/jo6j5+VFkdiP/oc98p5 +P5lfVnOB/gLilzFIxyB+Gc5UQJfML9stcnUc8cuKs7fXIl2GcKZtr96h8/hV +PFTBiF+WSAJpGgm7wA2v3mB0vlvsZ9ApxDHMfTD4szSVEUt57jOAzu36qn47 +jrhmE0ba/MX8zNjor0NsiGv2RKuzvLGQAPCh9tq4V5LYoxMKQa+hf8qLMQ8i +3lM0LtLtkbEpJl1vGox4Txpx2v+vvTuPxur7H0CfORkzNSoyVRQiEc42ZAgZ +o8isUihjZCpkKJmnzGMDQqZCyY4MlfCUKCSeDPGYM2W+Zz8+37V+39+937vu +965171/9Za29zjrPsc8e3vucfd4vsnPUO9vZpxOvAitmK8jOUS9L/zhyMTgf +83Dv6J+pEaUJbUP9MfaFiRdyMVw7VcxlzzZgE1tre9A6+mYXhaUWXt43HR/G +wjmKaa2nb0HvWRRss/80PSIAFUG7sJI/2vB3AJsQcjHSxMZckIsR/W3qvNj4 +WXjNQ1AMuRipBrQayMXAqsrWg1mMIe2ewDrkYuTw3nZ5hZ9fSV0s0tNrqWYl +L2sWzRfjtxOtkDvT4Nv6bKErqaZm26VqVK40Z8eG3BkjVk5ezn3D2JkXul+R +L1PyM9UfuS1v12UP6iURsT83r35E66MtjZN3kduSyq6jpOU6i13+sVqGxg1q +8LUDuZNUt95+ZhlUh3QjaerInXSY2MIX9bYbrEq18vBS5UGVKYnvwbQTwDRG +d/k56o/KO3RXZ/bDHN3bl9nw/ugLsBlxPB5ecJ3Zca1gByR9fuveisfDg6P9 +JsgDOmv5uqbqWADUXKAPRR6Qx+PXssgDyg5a7PORuQdXArQikQfkuWq0E3lA +qx0l38ee3IOdOUljyAP6yiIdgtwcEffZQ90bkZA3ongQuTliy6eKkcNSVePK +WNagCqlGvAKRw3LMT2fJs5AApKypdq156sKgxjt2yGH5+tDUEjksivqzyRzx +2lBLY1YdOSxv/S+5IFcFqI687lxXh5euz8sgV8X0wTf9S/h4SKsvdaBJ6Cx0 +jcmplsfPP1UxVoKcjgtbGkyqXYLhpEz+HuR0SDwRikKOA8ukq/cBJn+oNDcV +ihyHqqd5e5FTY+Wo8D2gQAH6HOkhOzUTpzfdmfH6afGFTCnYK73pzjRzGBYc +mG8FfutKIrs7nKGco2gG8nGmDRQ0k8+1AhnOw9G7gDdcWsn7gXycXDOJ3DvP +CICbx84ma0Yfityqy0F5zIguzavIwbkeVHR3IE0FMrnpCSAHR9mkSxM5OFUl +bplhv0/Bxq7LacjB+V/eDfyXd1M48JPsTcR+3GcO5aTgPOemNxH56ckp64NE +fNxttdFwdIV+S0kiHyjHQHGvrjDKe7+zVcBxRfgoLMzbTc577yiyoIEcn63r +zD32peKgxOpDJnJ8YgwJVsgfkVnbVdHlpAFLRfV/In/k8pmPDkF4/bdmKpzW +5NCBO6nfsZ3Ey3d4e1gjr+rYZ4qRjSwDOBXJQ/aqBv9knUPOy5mBCvGkp3pQ +lJXDFTkvPNunDIPwddzR3OZjSzoGsMO1Z/cwfp4XXnG2MUpEEGptEup3xxN+ +k71/gwKfjw7zx3VMHSOC7cFaT58n+kLOs09VJvH1aR0to4Ih3v4fnH9xe1Tu +JBy7L8ymh7f/0wGb+Y0/+7NO/fklDQ+n/CDnN066VwhR/mSr5zOBNxKC4Y5d +h4pR/mTvagOeHffwdauDRIrsTASkruLjvvSWBDSGJ7m+ZOHtn/mqZyZ9BFyV +KuoWxdePKotuUTv9iUC5OrXgh60/7CB8b7F5TwLEIK+1zjgi8ODT+ioyfQem +dbqLGVWTwC2Szi6tHCLgyJaE5e+DYZuXAMgvJQFBG2lzBXx9mlr3zPVMRSw8 +fUDgNkclCajXHKKg8sbrgSrRvYk7EBYVnlPDWkigZ0ky0TyECBIkV1OjGgLh +w9mL3w80kEDjHaZq5N1cGQYuJdtD4bMjA83Iu/moF7WI3BOaDagjuXAXinC5 +JiD3hG+1tFnCjQg+rkZn+TSHwbEjfeai+Djc0moqB/D+6Lf/nPCYsgaMklBl +RV6J15eH15Xw+8599EvlDUsNKB7JYo3ikP0avWxo305iyCjwvT2Jxdd8qEf7 +dlK/UjxE+xVtImloukTnMG3w4R05n4NG8V3kHoYZVbx0nrKCldeNFJB7aPx6 +VxvyR7g/Cn6w/k4B/lypLkHz2g1Tn2DkSpiPfpGLbNgGaq2PkV2Ji6cmQpFX +KJRXfvjOM0pwgr12Nxr/ua1ehaF9HVz8jKsSL3ghNi9Dj/Z1/C8nBf7LSQlQ +u3EUuSrazhkZVJ/MIe/5ny+Qq2L7srPyFV4/Ows9L4nfsYRC9iVC7/H6ESMQ +qUbx+tHeMiLmcMgSXp+zTEa+4W6VuWDklVxJcKWbP3UHpuhNSCKv5NqlDq7H +s/3g2wvanS+qfeCj9ejGfr4xcMTbRb+Ynwgahry6nart4Or7pWviNGOA3nfT +odCx9A9JOsYPPZuJZIfizJLaiRSqFmBwXyrQwvwE0KBe50P+iMHHbD/kibQr +N/VpkJLg1TKuMuSJbIj65CE/Iu9E7tIc3W14iyBNXX50DHT3FD5Enohh90vh +dnNz6Emz9RXyRIp4N32Nd41WFanTHdhI86avUVsmpY6++75xK4ddyHcGc38u +RE3epz2kwIVcGEJTjGo1toIpTg8/R3HOXr0+P+RLfhj6Mm4HrGAOHfsa8iU5 +V5uoruLnH3j0cZWKYRkbvhudgfYv+d3VdUI+yBIL1e6WdQrwzWyxFvkgTnua +XND3aMyCA7IC85TgcMDdMfQ9V1i+h1YC/rtDirdzJRjF4J0UYixqJ/zBGkTk +3dgb+DOIXLkIp7bpOSDvZjT5IwnlW+CZvshheloD0pnPkj2jLx0mGchLsmo1 +NhHbaQQn6jfGkJfkw6uag9wTaWmLFeGDxtDB/a0rck/Sk58WIifFgHej6aK/ +Gey3TzqEnBSJ8M+MyFVh456Pm3l9BS6MNnQhV0Xh7Hayw9L+xnKguNocRqa0 +kR0WLjvDTuSnZFYVyOU7WcFCrSPyyE+pao5OSsPbZ7DnUuD4Wx6ocprQcR2/ +75cuWF5DPo7XXn6/KSslmC34guzjmFxcWDCwQs/zv79aCjsLO5N/PLb5QQKu +YknOyB3b+Kai2hh0Grwn/SlA7pjkpKQXcnDGzMKY7nbZgIhjZYrIwVntmLNG +eZLpqHf0mpjoQpEPFcIo/vQYkOdCPgsL94xFqNMitmFxyhb135WyJ9KDaP+e +wMty34QNrFi1jRftx5t1Xd6LnC+7Gbmu7G9vYNuVCzLI+SrQvTeBHBaByBN9 +KjYmkLtenBU5LHEGU13Ik6qZ9XV3KVGBpycnqZAndTSr1ODOeXwdlPrZTbLU +Gt4Tf+6EHJyAvBEq5JVMz7uMrQj5w8e81TrIK1FLD1jOwcc3l3iJ5ZOclnCW +VUEkAR/fJBvaqveJorwHu/JF7pZCBqrZl/vx8fBnT4ZCYARybW45bY8uhq0f +cyWvFJCAheKHcuTxEVgf25jLa8HartMByOPj6a3fjvys+ZtrXvw39WGF2M4s +5Ge9kvs91GRLBM3sjw1y9xvA0fZkBSn8+LA2zxP2n/D1jqhFjVxXIHSmf/lr +exwJpNr8fJPwmQh+d1/5rdLnB+uN5KTc8eBbfYZQqImf52PCCReWYl2YuWwv +HIKf537FR/tEfN0qzvPsrYucOmQP8tlRjPJ6UWeAJPx4i2wzoZ0FajDi6L5Q +Q/x4ASWNCuR5mdu3zdHf04KXjQSZkeeVoHK73gi//ms08WVF7rrwYL0IlyR+ +HovHGeXxLQSgTD1Uzrc3CY68XBRj/TEJHhkXKCFH42UChc7w8kN4QLjgA3I0 +/LID01Eee52Hjh0JR4rh5NpaKspjz76w6SyoKlNPd+gQsKA/m87CjHSnJXIZ +Mo86FuG9AHPaYSFE/i5GYH4M7ausvXH17DBXB3ZwVzYLKv9P+SuucPglobzc +36RF9owvtWPij/tvo/2NlKtM6ciJYN0dkv/0aitmmEJfi8qVfzw6gd7LvJBa +ipBN68Hau/rI72XmheYuof2upGeq8sz23zGSfncheT+YNudCP34efeEyau22 +NMzayEsBted+s4Ag5E34qNxJHdl7ClpcCcxH3sRjtUdjyLmg32VZq3dGBcLo +FlXkXMxaUbig/Zw+JdLrYV6DmOTIa2ayaz940Qd5HLtkck1En32rAZOCZI/D +Pj55K3I0HGPShwSsVGFa7tln6LvFoyfEKQh4OdU0GL5spwohC2Uzcjr6X206 +IOcb24TCDIYxGctNB8T5GA1XFNr3ONMuKx42jWmospKdEeGUtOPIGTGpcObv +pJqrOSmdxYuckXQT7YPIGVm8mxHurqICL12SlkTOCJXLpmOSsb7NTOrTAvan +bNMxiQ9y3XnhRh3YcYo+IJuXAYYwib1H7kmd/LqzXTYBJPBJvbM8pQDfuqZ2 +ueHjvLKg1WV9fH755uMtfpxzoUbqBxsl8lMoa37OIm8lr+gF1YEISfhLvFgf +eSut2yIbUD5/hqeaV8/dioKS54JXUD7/LfYVFDLW+HrtvfG2c0UPoEtUYSny +XwT/3X+B//JfonmnNx2Z0Egjydy78JeMKtmRmQyPrUB+zXGVLj0jxyDI46Bx +EPk1qb+fU7DfJALHX9K1/NR34PA+a1Pk11w6Gr0HOTUWA877zsSeghenT5Cd +mu387q3I2Ul91nE6lvMm3Pdb1Q49Z+N+d1sBOTud6TP1W897w0M9zyeRs2Oq +nJyKHJyTN++FOPmegllPLjciB4dqV+8l5OxQPrV0+SysDGNoHWyQs1M0P072 +faS0J4KUGD1gb7QD2fd5lP3jJnKFPv2qOlfmdR0Ks+bNIlfoiFdVD3KCYEIy +coLgEbtFshPk8trsCvJ9/Ko/IN8HDqcMXEK+T2WiDC1yi3awSc7+9LaDGaNn +PyO3qGiyi+wc9e7Z4GbsuggbJ7boI+fo23N/FuQTiRpXDLdvXIe9VIq6yCe6 +X+bFMo3yb8Of9DFXCdgO2pgy1O/OasTnon3aCQ+5Xn998hIjxGgLoX50iI3r +Tnc0AXi5SfFSfTsFmWb19hTh7XmQM7cU7cN8LiehlBTah+XPVwah/lJ47A4d ++o7mc7ycWeel5pqlgGby90TG8i93P8b7xVq5C/1bW1UoO+NhR4+ez+fGzlHH +EUBb5zM16q8qsHN/aLUNXs5xbNbHE+XXWn4qOE0/UvNZcY0GxRvXYmLtu5MI +IDG7vjSYRxX2VJfqpODtv0nrWT+KG3/sPN7j/nW15t0p0jYUN2Ij7wM+phGA +iJR7WI3WKVi3MlTAjh8/cGUmD3kcN04L1vS4CkGJwyXbkMdR7njh3Vs1Arid +bdZ+qjkN6tjEZ01OTgJD+aak3hB8XDVeAUZvgqF10IXOW3g9W/RF3kNegzAW +aChsEw1nc1JVkNcQFLsiexJvP72nl2Ilk4JgRHj2jDzeTrQHXV4V4O2z+FXF +wyOFp2ByyGQmP94+NTbWL07i91GyPZnSf+k2/GWkK8KJn98+Mrvvqi8RyFGN +uFIM+ELFQ87YAN4+Xe320Grg7c1R6luXFrcLvHzsfDg76i/HqBr18HI/pu0x +VBkeMMby+0PUzh/UCWQt4OudBIGsseIPN+DM/bVSeny9oxk4wLeA/25V/5u+ +U/tsISGD5+EZ/Pjh70piFcjD8izvfJTsAJOHzh8Xxct/tvhfEsTbVdpov40l +sxM08ZXVN8DblWL3TDLyRxgDonfSdRwHBzqNKXcS8bj61h/SYGEzaPStlm95 +Wg3t2ZWpLOnxdTd8hyE3RCL3/Z/ttpGQ5MCthdwQOdELwsiF7PHqEDhVFwUN +xJ1tkQv5JP6MLPI7ztc35yex4es79QcSyO9Q+7TpsMRslSRSCApDNZFNh0WX +QtsPuRu1XRK56V7i0FJjPBa5GyOnGSpr8XFMRvhrHkehHPRczycW43Egg6XT +DkknIvC8XJ7bYBsM7yu2Nx7GxyVroj7Z/aFPcvoWseIHBW5IkN2fiM9nhZGT +EhCxk2KbYSRsmocNyEm5N8iwF7kqcpkXluWPh8OIzD09yFWpHBrLQ44Jl0W+ +YaxWKPyeIWuNvscv53lvyupABKRz7Nd3z4XA+onK6gb8OjW//IqexuMED4E8 +ywN996CS3uQhI3zej60y3Ifydr58B7qb7qxitEyZQ+g54VKrkyXyYma5uF8Y +hW6HdsLx4ciLOTSuMijugMfb17QXx+l54P4USV7ky9SU6sUhx2RHS/z+jV9h +UHC3myZyTMYfdP8swOttf1WGnn+AALw4zD90EblavHYsZVfrQMHN9u4jL3nh +kuwOY+TOcHm91EROSkT9FUo1DT4o1u55GzkpQelMp5E7Y3ok1W7egRsIKp2X +Qe6MeYym6spXAhC8NVu/OGYIUth+S4n3TYKGEjcbFCek6XqINbB/wt5f7SL7 +HWy7d9qh76ocSJ+Q94HpPk9OQ+XCAZuuh0x/imuZXjsm17Xpelxe9E1ALhWj +7G5Ns74mjA3a06P4hP3Ypiey+8Be7qS0OmzgH0/kf/kj2L/8kb1PXoijPO22 +Xo3uXZ7zWGa3YT6arwfojpM9iJWrKarUQ/egoR0T2YOojDMyRn5E15jJrPen +RPiVQkAD+REBFf5kP6VHAbPJVLoGH0+Okv2UvQ6LZG/F+JEVr/XN8/Do9e9k +b6XSzHM78lwYzHn4kzjc4KN4fmrkudzvK/+K/Je9T4IfJ3x2hpQKN3O7/8/O +C/yX8xLV1cOK8mMoPp+0rqBtxRTtgh+QvcJ+JRNUb4HHOzzj1j9jIquBjqj8 +6KvK/cN4ebtTUeUXWI5RLmuxovF/1Nr7HMrnKTv/2ajmxTTmlWjkheoh6MCu +vcjRiAp+8mmZEA33q8+KIUdDTsYwaQjl2Tt7kiLC9QpUNxt/m4H/v/LXIoZD +HhHAlid8eqEOzrDn/eyuBXy8rctdqslPJAD5OQXgJHIBdkzKJtbi9WCynJLt +g/9fXfvjc30j3KDiMe006g8kYOAbnIMck5AN3szc5UQouqzuhByTdIfUG8gx +OX+CgYuDIxoeYStoR46Jp2zK3etNzYBfQTpKJdMfsvzWzUSOid6Zk9TIMXkz +NJheHu0MAhTMG5FjwljPcRC5JBFy+5xuaEbAbe0N+cglkfh6aBy5JD/aqKV4 +roVB2rFjTsgloVV2FhW5XgdSv2MfX5Tww7HDH8uRe+KmQ8pE/sibwCbmrLJQ +mPMob+4B/xj4rsr8C63HJRvcrp9wWsGc9imuo3XZ4pfXz9D35n3mAe4RI3+w +uGk6sm/yuNDNnNa+DjTFx7yeO3cYerWtrEG8vPmApl4U3u98s/jctiuIwdSN +J4eRe2K3ddPlqR+pu1uiMoz1LWy6PIszRZh0BgGst1zVebwSCFu9KiWch/+z +b2gokmqLXBI9d1lXEftR7J5KE9kl6W0+Q0IuiVeGkgF0iYBKwmx3kEty6YLd +I1/8eEEmSt4wnjGsrUE0FB3v5l0/GISPP0zhB+8GlgvBPWw3mEvR9T9N9pzA +2xu1W6xi3Nd6zFmyrBm1w9/fvtflJBPAXJF9S+BwMIw9foRiCeVhCKVlPICP +PxQbX+LC64/AV8us8Z/w40V0rzKgfJiP7PSLOGmGsIhF7xqyN5SpRkOBtx+J +odCFXxPusFPFLP8M3n5ubPRGlOPlBZKZngndLpDLw4lrCO8varecZGPW+8EG +rWjMu4RweBjotavsHQOmBygdleb7gZtw5Xh21n1YsHx18uSBMdDmLEqD8v7l +Z7YeOFAxhP3xfVKK7qNj/6a70XpS40cL7xhWGbXpbtSyFQUgd2MqMuhkXL4l +/HWEdgblN+aYaqZEfoeyymqWb6cVnDITDEJ+h0EArwzKE9V/SCnN5eg6tgE0 +76B4nsUM+3HDsw68F0ym15+iAh82pnzQvoXJPGVD+otEoDKvmP5d2gxO0D2b +zsTX6T7Xx/JituLzL/PbucFt3oBvb+gwndoU2Jd4PosTn1/eJOXneo1YQem6 +hKBH+HwUkXHd3hhfh261VDuywWgNGQSb7oTg61CDexrUyElp2PPuaGOjOUw4 +qCGHnBRbxhk+5K3wNu2QH9wmC5PpfLWRtxLdykH2VhRVPaced5nCqzX8tshb +id0v+30imQj6/UYzcy4KAy1bSYbmShI4tZAvvYHHvS6Lfr0OGibQfheJIwOP +e+2o/kyGo+9SY8teRomuYyTWjRm0PlL6cpPnHF4PDkOfpyv5qIEWy1AKei8W +WyL4Zhxf70RlZDD676cAHH4s3iZ4ufRjjkN78f8r/IuARqnRMShgpS3zHP+/ +LI4Zi6C8cIzXX2yrK2/CYjxFn6D3toWHXqmHXyAC+7phWW46NhixbZcM708S +6PPs3DuBz9delWHqXW37YdqkuCMRnx+zM8rrUT461mXq3FIGR+xy45VG1H+f +smeRfZB8n9RkyuGb2HW3MLIPIn5KdgJ5IhbD81qBy7vgBdFAA+SJuIl5kX2Q +z8wuIT+lgrFkuU0fRPzPFG3NMAHw1CdNPrhwBDoa3atGngjbtSxB5IOUi76O +ofV7gCkki5N9kBF+8VPfsU9gvvbSUI6+CiRpLh5HnsiWwQveyAd5wJnTdiun +GDvyxZ7sg9yZj6YIPv0ZZDvXc91Puwyrczu2XsufBMV9BSbIWym0/x3pndCB +2QfOkb2VcDGFrdJVnaA1vzcpLyUQPojidW8bnQCWfUvqs3fqwLV0vm1jAsrw +wxaqnV/z8PY29PY4g3cdsJKibPRlq60ZfNtejvLytb+RuYDyhBvcI5Z+j3tS +kxAYSc4TvtWmQ1oNHwdgkXNz2JU94NbP6qPheL8omXvzB7khOcVVb3+bDtRI +Ud0VRm5IPc8+c+SMvLx16dJPq8Ga+QSz7cgZ8RotMOHKI4Bpk5/DXd6CcMZk +gz4Sn3fS7m66D1BSBLkPMLhw032wudkgWoS8D5+DFRzMWpBOmsEJeR/2VYql +U+UEUNJ8IafHVxOqyUk3zSEPgurMbTO8Xzuw6g4YiDPA8ENNFFLoOcCK8opg +z1tQYWmhk9cTBjgOj1dTpk6BvgHOo6V4fYaMa0aFm1KB6Iip0+g9Y5NspwJy +czhrG/kPPlOBO19/W0fvm2ju+VxpKSaAhYVn9xw/qsAdyhIcgXj5w59i/eVb +fgIdBYXjWuIZsOq8vQyDEwnwLGrcUM3Hr+fcE/kHo5bQrq7CyQr/f1uObzoO +SwEDyHGAUv84Dte9WiWQm6NZTk18dJQfJA0wbCA3R0W4LNAXvy+HBs8yJVS3 +1wgx/uxD+5n1oZQeeu6RtpxYHbswXLO8JC7EjvLYqGxbojqDzy+u2F3Keggo +/pxaMSqeBBfPFV93+k0E5UUaH1O9YyBn3qP8Ch8SwDqem5Tg9TZ6dVko7Plp +MD9QvAONhzYOf34gt+WJhemfUglV6Ej6dQO5LTv3KzIhj2CbV5qSGA0VOOzF +poTaLfM5fyYV/D7ytUJt/WNm8JKQcvgw/n+5C9m5b8PLg3LsjlytM4MiRNpz +aB+dgOfNfReqCeBCaWmrzYguLAeeBsgrEanc9EqmvUWRVwJF//FKNLM33QpN +SqZFdcFx7NY/bsX6rlvRZk8JQH2l1z3rOC/0CrC9ooDXM89l7q5Spj5wlum9 +q1x9NLw2fdP78dIY4DYuYQoFRAB+hDBqnteDJANdB945fD0Y0kXOH85Nx8rl +XolBTF6KnD98ZsDCoxVvz0/uCpg711FB85WSoyx4exazZc5j6SGCLD3rP2ks +z+Dn68PtJG8S2HDfdA3epZNdA8iYv+kaJNVs+i87q84i/wUAwU3/pd5u0xH4 +vdMhkzQZjy3+4whkpm3di/KDeRF7X+rzX8buSpwk5wf7uUWb7AtsMeMVON2R +hR3jriP7AjrfX3ShvGHaWyk5Xhc4YSGnVwXJ35ubcWxBfm7Zjjuel9WLsaRo +ZbI7YOT7Jg99xxp1RajwkJ431mfOro/OcyTem+wR7D/rsKawWItlrWWTPYL0 +59s/oudaxpzLcuUX72Fbum5BNA+ahd8xR05B2eS1Gua93zFaMWqyU+DnZmXI +gZd3t9KwbASlY3suNTKg/GPPt7ycQPnMH0gX7K2mpgfRR07Won0Rg+JeKYGo +nQtf9KC6+w7zUytNQ/dXccJEDrkGLUoPYoqPbIU0h7RXkWvw4Hg2E4dfHRDa +YRhTxikA1RS+5qD9VBk7P71GTsHbR7p3m7gZoOqa60/kFPyu4z+wDx/HRGio +K7awrGHC/EovYvByU16fE/kN3UD6qGLmImUKPK8mb1/ANAHSr91ZLHEkAstJ +wWRWBTaozDZDzYmvTxPuhGTt7SWCHTnvh++xBUO6ILMYoTASeFSxHmc7QATK +Zy7v0RYIheCJotIz5G4ALfgulwDGlWNXFGf04KfpyZOJePtsyH/IGlXdCqLG +RJ+EONvCqk952qqsU8D4u+0OlKdF5NXCjICcKBzY76MW/JUETFS4H7jj8ybT +9qmcd5ZScO2r/x0v9Pw8SH8jxLcF3L1J0oFV1iDgrTPxAR8+njdt+g47VY+W +jjOsYIr/+A5jpiSy8/LYi6otOV4CmsifIzsvfgrMqoWd+LzmMXPgsYwy5GM9 +bIQ8lx1sVEJVOz6BjMdf7z1INoLb3prmILflN8k3FvkspdqdOXsfOsOw8gvt +yGcx+nns3Ve3L+CQzno431osHN/t+SJNdxJ8YhW5V3uoFzQedlflxrLh98TI +i/Lu46DqvUOL15d+kHr2mXfgC08oc7pmUvPEGEh38Xy6fowIfJUDwZMWS/h9 +Y9QfeSstcvIbyCdi9EpMy/HZB+MNPtognyhl8sAW9F1VnpTMIMdzdtjWeHIG +eSsqZSolKG+ShVVXRNuFSUzoICU7igNN3a+27cLnr30HNFsqNSwhRZj27gW8 +PYzmtrC4ZaL5fRUz2G4NpQax62V43Luc5RZnj58n7XoAfdYuGsB5xfYY2V+w +HqgyxuNnD58eg8ujdMA5vv0IyktfXbe9lOBeB7SUfgZZdlMCQbFIEX0Ub1Nv ++kd+R+cmiiaogP4//pGqX4HhFTyeOcMlr9XIYAa3PthWhfyI4oVBEzm8Hf54 +F+E322EOX9G7UpuhPOTEW8YCJXg7f0plIO1nCYO5+VTd8Plojl7h0wheniQr +VX6IzxJaDx1jMcHLmZ90y3MxEoFY5d6mvdpOMOp8jWQFxxiI2n5/1E2dCD51 +hWrqFBpATcPgHXaTJED18JACyvPc368TYtNkBgO7sspRnmdxOeGQyd/94GR7 +60kP2hvQ6NvFEkd8PcU34+YezkcE4lPZKh9zLeAfKZ3g3zRjgP2072URtF/i +8alqhpJdkLdo6242PE47sVoscATlxb09KvtL5wjMt26tqMav88HJsQ2GBgLo +c5Iw7p07Cak7GuMbifh8FLJ1j8U0AcTl01WsFWrB/h3FHN97JsGbkWev+s59 +Au+iT/K93mMDnygu7XdrmQTpPL8PL+d8Brmu84rijAHQlLro8e3USXDr4fLL +tOPfgNlsJPZYNgcWUvs/2JY0AZpKaoyMnYhAKu9Sv53eThh7u0A+F4+rw7uk +T6L8zINpgfVBoqzw6ouDZ/XxdjW8U+TD1f5+oC6fvveMjy+0LX715avoGDjC +Oa+H7cbbc+zTQvqwaHg/P1uw79EY0NIxSpG+RgQep36kmx45AB8uXr1ajNfD +0sFNR2wxp11mpxIJow7cdMSy2k5fQV4VtQLjfYlcBVgtzMaNvKrG0E0vI4yG +7GVA13+8jAf/+BTpzmSfAn7+x6dIL7EtFsTbLWSn7+BmJ2Gul189R+ujkD1u +HCivCN1Jve6XsV2YpbHmU/R8+AnrphOxNfQatbHBMMYqsOlEPDis9AR5c/US +NGKV/eoQ8MvPMQyTwNF/3BwG2mjk5sC+f9yclIPJBXwUeHxo/p4xUtcSPlF9 +UF2+Mgl8FdX1kH/RX+v+81ayJbwYpT6A/Au66KWFkZNtYCE/qduE9TJUlp5c +ubR1CuxNFoP2eL0tchBnTnnug8aVqlKR6PnhP97E0B6yNwFV//EmmJjY72WN +EsFx85hEz9fhUFU7pAO7QwLz+ym4KPG48W7amfiikKvgfdNXbga8vTHufU/2 +PlqGROXGzKlAQ92m9zH+o/I5cluWOA2/gAcGsElwVB3t6yuhpOBHzsJt94GN +r9Xn4IXPVItZTPg6yEeoeRWvN4N9dXoG2yjBxeprcmQP/R/XY7CL7HpA7X9c +D1/ulae/x/pB8opQcfkEhKSG5V6nXhIwO73pQHU1kx0oOOSw6UCprIbkT+L9 +0f4NhcH9SitYZnriC3puE82luh6EX+cAnH5un30BHE92keLDf7elW1x/QLUO +MFBV09T8toBcibNLyGEp1x1s9Gwigt8tUx+vJt6CST+Pb8wnk0Cm7ejHyUtE +ML7S/THtiAWcTqDcuNRDAsc/PKgXxeNAD3DvfkSkFlz/U+EN8PIaeTY5X7x8 +8pDHesY7Hdi95ch2Jry8lp6joPoKEeTMCHwQkz0Lv9Bkmz3A2wNn+FvNA/g6 +l7lLjFv9ngFknzwYkIXHkzpUa/ZVeHm7utgB0RFFyLmDblEBL//R8fYV8gsy +fyi4L0vNYifP3ipFz8EspJtyUR6wys6M4x78a5j/vAA5D5jNt0234hov2a2A +z7o23YrOiAVB5FzIDlJ7L/+xgowqBQrIubCey21EDsJa/jYKQvwapuRt/QSd +583loaE3eHnTnaRSvXO0IJSBhQvFOVZ2m/4F0y+yfwFXHDf9iy83un1j8d89 +taXotLvgXtga12x7A/9d6+zsp974fC3bgVGUnzOBGx+med3w+VpI63b8WbR/ +5oF3EOeAGVxmX92D8m3KMCuVNOHj/HcvCoOABXOoqDTtRImP84+uhoaj+cvr +vcu3sROzmGunKge6ztfy94u24eU95xJXt3uOYMeu7HmFymntoRx6nhNxJJCl +/9ESFrJW24Laod/OopIb5PjQEcxtpQcjd7+0o3jv7i0xi3a8P3oOVF10HTaB +NS+b2azx/qgYPYa1LhHB8mCqc7hOErz+o6lD250E4LqIxDM8PiEKvFOrOWsK +a111OArweWotcRbex8d5u8oHHJEt5vBDSlRdG/I4DLZtOZxNALVLh6TrKK0h +7ZFHoTfx+ZTmxjRVGHrO3NwjUFVIAVoudZ5HHpPs1QDlPTZE4C8aDiikjCEt +QYBVDu8XJyo7fzDHEIAzw/2VWS9z6DZ4qyEHX6ecXJ51R3nS9lwwO9exdQIb +13lfhuqB5iJBwgGvZ01RR9o9Ldaws2v5/F28nu17E59vxdvDnb7StbytNjC0 +wexXB94eGE8zyz57SAC3aJOt3GSt4RvuxHBe/DrfXyDVXcGvM9Qkw3aPHw0Y +7XiYhd5/2WV9HZe8QQQ3se/BW7PNoWdr/h+vTyQgnnWQd96KCKb2SWJtxYYw +r7Xy8Ap+/Y5zV+vo8fXvmniQlO6oFfQpqo5FbpGmqb0Tur9l4QLC+6fnMCtM +n+xuNGmo7UTPtQQoz88IZM1jKZJ9JWjcZrxtf5DPpQFw/Og/7xH/ArbkGx9t +sZ8CunkG/L5Z9SChus3+t+kr4MSmxm50aQr0CnT+vC7RD8K/zDun3xqDF405 +mKMHS2EPb03nqGQzkOm+2kAd7APY1+UvpZzC2/OnGB00XwhHhsvo9P7ColtP +VaHfnSoXmkGOxlOxWx2Xvk9jLTV5ZEej4GGY9B68HOuJkDFrWcCcQ5/yoPLU +k3F6J0ZGAX2phIRa5AuoPHbq3M6Yn0A10qqTYi8BbPHwPnyD+RLMbtl6T+rP +JGgLGrv0gZIAToe6hA7W2MDCizf5fPD5gpcl9KuAaRtgweotRS5aQ91KM0pd +2v/e7+jZOveeE+13clf+4JQ1hOmdczdA11lsQLVahtqh/LtSmrBeTDdPeBDN +d9e9WDyQx5H1hKv0cvIfTJU9aQCNPztsO0aRl+FTJdWeOMAG6Ok2HqL10apx +vzPKj6173Gl1Y4kNJMrPL6J66y+YaUbfq9LGpIyWwhCsrI6f/L1qW5P4nn48 +/pmQE/P63aAC+6dIPCivcqBV+PRh1B+PFZeGiNDCZwpb6drx/oiPb5Iovy7p +HbCSIZ2GDDVqt1F+Xa9fjkXIHWBrXkHuABT5cYcDuQOuyu9MLxMIgJNfk3e8 +SxYqpGq6IV9gsUTsLnIErCzv8FBW6kCuqO3myBHoCmC6jLyA6fuWV+A9W2h7 +sNYKeQGd2UVFic/bQcn37/H8PvegYRS2X8J5EsT/sXVC+fn5ttJamjJvh7av +tDJQfv4n2waC0qvw9b7U1MWHtCbQcXY5FT23sY5U3IXyodV4Ht2gfn0X82Rc +70D10HyQZ/I8Hv/kx2kN9+U11UR89j+O1ilBtqLPy/DyupkMmiMMgzX98j+H +kDexUVyfekAfH28rukopj6pB//pPtcdGSODpqGPZNjyeTw58w7DDaSuc7mZy +QN+lHu7XpqfH53de4b2n45OoQYhSqxtah958O3OrFL+eL5JOhvtaqUC0cEIq +Gud5/ojkl+Hz7IuA40ImpUaw6QBvIwU+DnglC5H88vuBrpJRMvdhDyhWURzL +rTcGxg79skM+RX/9zhdntxlBiy3RosinOLhlzBp5IlLzj1kK/OewxFP+Eiiu +E6YV9a4tIIDKW04W774LwJJ+eytWfBxgeiCxfiGsD8h/2Emsj4iB9EPhU1s6 +x8BzQJnGo0wEkVqBUe2v9WHD63mGjhkSuHnW5dc+vD3spVqb+/xCDZ7oL1UP +wduDuexPIZR/Yw9fXNyL3XTQXdl6EeXfcJqww1DeeP3Uy3r6GccAx724YpQ3 +/rSCsThyN7ZLiLZJfKWFK7nilcjdIDXMxVIEfACT29N2PXGIBH10+soOZ6aA +hybrlcGk92C73/jMQd1YkFJxyBp5KFoK20uQR+ChfW3qTX462BEgeQt5BLT7 +i92QX/BL/cmvoc7z0HccHEN+gcHwDlGU561yOHzY9XMUFjLZG4vaQytLnhHa +d9SmEWJ+pjQMo7tWS3buJhaZRNB7manX1RG5FcmYF98qHfk5CS81F/ruu2ed +mcBwJwFbOPCe7N8NLNQ4oHxlpvuMvl7oe4LR7jhD9mIYyt78Rt99P8zQ1oL5 +OZiAAcctVL4rTrMYOTLhWzKRI4PpR/qTHZn4TkZ15OVlnjFtjrtQhnlR6ewk +5/WK7LdEvkxI9iFWGP4Z29DUI/syQlI0gSv48VytefOk+ncYfbXDLGpvJMnY +W8jB8dWuqWitXsH2snucRw7O02emV3ag/P8UbqUL8SRsxf1EEvp+YfwgfUGB +bx0wOzdSKdXHCvcF0PCivPRf3I11au7g88XzM/t3CR+Dsx3XdJCLFxfc2I1c +G5Hu4suSzJTwTmg52bVRMpl8ppdMAOw5/T86V6cxpkHi+/t4+dLhod3D6h+B +yLmCLY+9boNBpedT8sfxeCC08FR9HAH4Gpc+Z/K3BmGsv2lQ3nt7n2xKPeTj +sGumNSuXYW+uut1G/VTJP/0Pcjd0vZoZL03rw7Q0QHY37ErlM3Pw//d5o+BG +btdSzdnY0wLIO/jxmEd7dz7e/ssP1+Y18EHzytgNe7z977k/W+nwpgdI2NS0 +Ld7IhOKaRewcn8aB/PZjvLN4XPRnJdpghpcTjpkRnpLwcUbNgW4HchxuJ9FE +OzDGYuerrpIdB7b+JCfkOJRR+LYo5Wdgm3+ngPbpUBrkOMw/fYYcB8y6h7X4 +/8JxwP7lOLwYHeRF+2arv/YUxsx+x6qY2ifRvtmh5dgXN/B+lBmhdlfqJh0U +WuwsRc7CrVPfAPIff/yUS6gXOAQHp4/Wo/W7taiT2AoeB6qcm2muEJOAL7sI +Qfx4HMiSee8jyi9NKyVjIu7iBr3O9p1E+aVpDqY0o+/3967PjBwXWsAcGJnz +0LiROfhMeR9eb3kjje8iRNXhHHfDkB1eb41Oz0KR30GReQD5HbD8dZoH8jue +FyfKufcSgJEqjWt/oiLs4ZcxQX5HaJTtMSj0CXSFxtyi8DWE1jI9mpJfJoEi +B9125HfEpiyfev7BGY7rMwojv6P2EmO9rWEHONYfcvxMURw0/vpttPzQJChi +0GSutvsBXlzUrkqKS4RC97XvrfGPA3GuvJ+HZInAjGr29OVpI1h7x7d0fIEE +mj6qKSOXB9h/iz5OswMqR3vOK+Hx4eP07ULIBzmQBfedZWaGk8t+XsgHsd0a +V3P6dit40MxT+Hv+FHT6ktmI8rGfN31rgvJLc2RPPP3NNY3drqdKQPP1Nd/z +c/fxens5N7iH9nMXVmDAZYyeH75LUS7wrSaCjtdTQOTKZcgiGdMcnI3HY6on +rxDx31X67X3cY4c5rLA5zf8I/90XzZqrcchjYpm8+0bcCuouN7GI4uXT+wQE +VnOIYFZ8oYxTkxPO7fYI+VSK38f2eV/PPUSg3SvNfEHuEoy/KljCyDAG0vfe +Mj11hggsfBw5+RI0oSEpZP/ZMRJwmc7vs1ruB5SddBnnGp3hueKgu4T9Y6Bd +vmmh6RARzNPJ8i3fs4QKWf2ENYoxkNZi8hz5NbOfcqwLH+2GBplOr5BfUxYh +OFj7ggCGZa9EGh46DacvR3Yjn0jnbabe6xICqNftL/q2eAg2BjfsuYjHFfc8 +Q3XfvScAG3/KQmgiDTW30M/wEifBWrja2YBlAni786LZmRINuCshMNmjexLs +nTlgz+X6CRypG+jKeWwN4xN6A1PfT4IFumBfAYZ2EN5nwnS3NQA+4IdrsWGT +4Lc9343Exi5QI6p66mpbJvTrSDS6ojIB+KKcKFEeqrD9H2Ksb7DBpS0edVfw +/ntzhUI3F6/nT6yFrmzvtkLFk483hPB6thhoU+cdxNeVSx58jRwhMJB4Ldgi +BF9H+LyT49/fArjfdnxcsXABFQFNBRyHpgD7qZQn0z/7QQovYVDZzQfKtC3d +0Tg6BuSfRh+ixtvDQobW1f41CnBBMl0LfS8mTf+t6d46EUyMFAp7mSTDs6Er +2zpdSOBMnXsaytt/xoKl+PWeR9CbQukEytuvonHkl5BlP/D/dWb0iEEQPGPW +YB3jOwZcGcSpUB71dPqxU+frE+HpgrFQlEfdhKNV/gcej1GkC2u0JDjAHUCa +GbkS6m73d8ddJYKuL4Y3ls1PQvF6bnMmfF38PNLgJid+H8e3rdUsepjBD7vU +znzAj9/hIBzeVEYAVnUBhi7nLeCu1rPJu/D7WHOynV2nnACmvGRs33WbQ8fF +aVvkU+RZX5NGPleFXLHQDrufmKvHC1sUL6mUmNSsWBCBDWWElbSANDyfcY/l +VB/ebnOHnyKvhCnmD0van0KofvyaN/JKfvTbuWzD60EhtuDlcZksqPCndXH/ +dbweDkeKzOLHe71rY9h+NQ4ef70S9NuDBF4xNbGbjBGBgPjdykjGMHjfoS75 +WAAJ3KfczDvt4/F98oz9MBYTspl3ui8Jm3+O91/exudaxq9GsXHul59Q/9V7 +8HbjJT5/da7erLa5agX7R9b3of2E+/rX01tQHuYzcXa71OewEffuORSHV/nr +nED5V4OKz1Y4S1ECENvpi+L56qkYSpRH12qb7dAXz2XMj9/3Bzq+wGZPkzp+ +vF0uuxTzEB1gxDg80L6j2CAzxbvnieA2jYj6cL0iZFw1fM0+SAKGLr+E+q8Q +wZbh51u4r1vB8A8CKT74/XK4fv0rynvfay2UZrzNAp50ceFFee/dGM/To3zp +Te9txWprVeHMUNYIypdeRRd7uBxv582eL+MGHc3gI9EvCnvxdv6/8smDf+WT +PxdYlI7ysfcIeJvc1zaB62515HzskDB0glu4FUjVJmpROgkDuxtPT5zYNQX+ ++BfdR25ICpF/QWDyMXw4lx6D3BDRIpesqN/4+HNYh4WiPBKWtWevM/uSwLVP +I5ci8XnN4ODXVi8danBfNSkCzWtSdhQMyF+o2MoVeoCDAlzhJbqR80iHCdgh +p6lg4vR1dicrqJy5SkBO02qf4hh6H53Au+v18EkqoH7YwAE9N7t2qJPo+ZkA +Wr72U1M8uAIsgyW8RvsmwVtp81ruVgL4VMAJ/E2vw/23TDR88PVIjx3h61mq +NjCZP+BsU2sOXxtwZgwxTIHyEfoE5D0xGrN++n6zCcolVroj74ntWOrI3GIj +CM8j1V0ubITp3j9SkGuwvFPLYWPyNRCnsmkyjroLNuZM3KSapsDr4xGpyCvp +MKh6FXjFBJKmjViRV5Jg1C6H2qfixFWRPGwDY9Sv6UDt0yb/QhnySkiX34RI +97ECq+S8IOSVTGHpwRfwuOvxk6vVUd7i4Dob78R3PO7C5mSZ7tvg8QOokt5l +fhFMRLoxbaDnLZ+cT7c41oGcXZ4DDuw2MEWysy0cL2cP0Js7ulYLCMlqBZN5 +JvDelafgWdEUONuDHcz9TAQma9lRMhle8OtHn6HQWBI4xFVJdlgEb5Pu0ZlY +ws5marLD0paSy9RziQiG1w++2clsDsfzXu9x7SGBXvddI6J5ePvkKlH+zV8B +j5waHNuLj58ick2f6JuJgDc1cRiulUHio5ui1V4kkP3rGlNnFxEEVqSohL0u +gY4N263E8H7tGMhH06zeANR/xRvO62QDOs+b/tl3p8CVRLb0MPRe+NJrpyRT +NdjyZzWHCv/dcRFOHVH8Op+MzJJyqgzhAdOHTxLx61y+RCEtgfcjHq9eS5Nw +RchwjJvuNxr3lJgkTXqIgDC0/8rlIH/o6X6wLywcHz+1EpeRX9bgX5FKOK0P +c8SDR5Bf1p/YUIbi8+t3Vx7YpW8DIYpFOig+T34vYXQ2igD29J7wpdI1h1Mi +sXv78HjVWP8L08+iNhBmTIz/yWcDnw15CjBTTIFBIdof32bfAm4TZQ37pLfw +2uK+PMaT+DplqWr/mVwCaI4cOmexYAX3lt1YeojeI48GbUfPGz9K8RS56I9i +vJQdD9E4k86WFYJ8B+4bWi+adC2h2g2pg8h3OHp3uQn5NQ3fHQv9mKwhxT75 +WeTXpPYx3UZOhN+b4ELeF9awLpf7N3IiVL5IJ0bhcUhrvOJh+XIrmOgkuf0b +Pj68131b1I0fv6QUMJ/VtRtefJYqoobyWLodn3hfRAAn3FsHiGuWsG665lYD +Pv5bluRULnQTwMnfNiKlXpeh7p+Uljo83tvOHB6A/BqeWu+RO2dMIDyicRz5 +NfqX3Y8iX8MwRCZDZfQCXNupcwb5GoE+1a/58N/1fBRtU/vUHHY/Vk+uwn/3 +vg5HdQMev01UPjx2k9MCLkoWFlLhcYiWfgUten7VcPhre+/6LMbPK7oL1Y/5 +nlEr5DJY+t7trdryC1t2BGR/p9bt1yjKA1+r2uenmr6KLSs6/ULl3WDYFuUH +fqnlN3HZkB6EWH7bQPF50z/+yJFNfwTa/+OPuB0wDUUORcBJP7a1qCTIr1RP +cc2VBAh/Im1U8HGpinEpVKqYGpyTd1VE67IHjGX26DlVjiXdnvPJMxinR88+ +9LuPLeLF8vH5otB8UXXUixForzZh6LsS/3ITslvB87DwFwfBFCr1XCa7FZPu +uR+Rc2G0y8u3/pAFfLT/2j3kXJim3mp/n0kAFtb20bVC1jDsU8LXJ/h9f/aJ +yr0QP//OF29vPtGnBGYvqnjQ+XstPI6h9+l/dvYJnGigB0tlTmS3iyqm1Y8d +v1/9Cn8aFpKM4VO/aLUU/H4p9hYxI7fIaUin6OMFc9g0pE3ON7hNq6MEOTup +x2tVpDLHsLdHtfvR/0XXGZ6KXKfGc9YTC3h7mwdHltBzZk+h5HHkQH3QePZw +i6o1TAoockEOFMXDpONMjwhgcS59e8AxazgqTz2G8ui6Bf9SRP7I7lxPnzsP +qEFe6dF76Prr3j5oU75BBFMKzKElcWbwYHBkrDM+T+n2UpUjh6hhD7PFMuc5 +OK6oyY4comVRyTvf8ggA+xDSqd9uBVXPxL5xxPtXXxnwQc/lhHOlWW/yUIEX +bguG6Pq/z3uNHX/5EYwNny+ebPYCziY0NZ1Hp8CeSN43lO0tQPl7ak7+5Yvg +1+SjT7f3TYGb7FltQ/h1njXtj04QXMOyPlGyo3m/bXCXvCAfvv4dNoq+/8YK +ej4cTdPA54uQ3+fPtD1rAYrersN95pdBaN7ByUSeKfBL7qty6/k20GdmkkYI +tITPIg7vDqGdAmEvzrKgfOZmuyODr/VSgkADNTV0ndOsUVqvQ5oBjZBU8zue +YLAYa/L1PZgChrvXjjRt+QicqF4OhU75A5mr3KayMvh8QXOCHs07Gk0zG0o0 +o1j963ayu3FrwMADtU/u+DV3R+sZjP66I7l9usSVdjPj5eL32VlK91EC/3pi +LCrfe7ieF7k/ZbZBecvTf7Cd593eo3Kflqj6n2hf8fvorpT6LUA45JwoqocI +g24F1E9hBk90Re8s9nyEdQf5PLWSZF+MhEloGbpbQy69VLIvxvKg4SryTazh +9bBZrUuQa9ZZB/km38zv772u3wZyTuyf8XG1gppXzqVN4PUj8q5S4z3rp389 +l/WbcHeLu/QVX1+oRir/z3LHXS7xqPz/6+Pj6fjV/mf5UfXZuP+782ytElT5 +t/NUy5DPo5/+89/OzxRzmVwuWzL8b8cfPLqfXH5LwOrffrejnUQ+f42+lur/ +LN++fzv5eO0m5387zw0TUXI5Qe7+vx3PbL/1/5d6+1vPf+v5bz3/ree/9fy3 +nv/W8996/lvPf+v5bz3/ree/9fy3nv/W8996/lvPf+v5bz3/P6/n/7Z+DjGf +UP+f5SlyLXH/f5z/P5X/p/P/t8f/t9dfLOj8b8f30jL+vzr+P9XDf3v+//b6 +/9t+95+u5/8A4n5d5w== + "]], {}}, Axes -> True, AxesLabel -> { + FormBox["\"Re(\[Lambda])\"", TraditionalForm], + FormBox["\"Im(\[Lambda])\"", TraditionalForm], None}, + AxesOrigin -> {Automatic, Automatic, Automatic}, AxesStyle -> + Directive[16], BoxRatios -> {1, 1, 1}, DisplayFunction -> Identity, + FaceGrids -> None, FaceGridsStyle -> Automatic, + ImageSize -> {576., 598.9288918489954}, + Method -> {"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "RotationControl" -> "Globe"}, + PlotRange -> {{-1, 3}, {-1, 1}, {-1.1181909283178173`, + 1.4957108590940091`}}, PlotRangePadding -> { + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, SphericalRegion -> True, + Ticks -> {Automatic, Automatic, Automatic}, ViewAngle -> + 0.5011114127587017, + ViewPoint -> {0.05831781582142124, -3.3792150045348204`, + 0.16584627063809235`}, + ViewVertical -> {-0.0008457144052505187, 0.049004764110589946`, + 0.9987981867532653}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "SwatchLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.880722, 0.611041, 0.142051], + Lighting -> {{"Ambient", + RGBColor[ + 0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.368417, 0.506779, 0.709798], + Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, + 0.33320940200000004`]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, + 0.33320940200000004`]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #2}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.560181, 0.691569, 0.194885], + Lighting -> {{"Ambient", + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #3}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 6], + RGBColor[0.922526, 0.385626, 0.209179], + Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, { + "Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, { + "Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.3}}, "Rows" -> {{0.5}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"SwatchLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.20067051333333336`, 0.14943112333333333`, + 0.06032302333333334], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.30100577`", ",", "0.22414668499999998`", ",", + "0.090484535`"}], "]"}], 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.30100577, 0.22414668499999998`, 0.090484535]; + 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.30100577, 0.22414668499999998`, 0.090484535], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.13133225533333337`, 0.16813654733333336`, + 0.22213960133333338`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.19699838300000003`", ",", "0.252204821`", ",", + "0.33320940200000004`"}], "]"}], 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.19699838300000003`, 0.252204821, + 0.33320940200000004`]; + 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.19699838300000003`, 0.252204821, 0.33320940200000004`], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.12202865833333335`, 0.14283175833333334`, 0.064190125], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.1830429875`", ",", "0.21424763749999998`", ",", + "0.0962851875`"}], "]"}], 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.1830429875, 0.21424763749999998`, + 0.0962851875]; + 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.1830429875, 0.21424763749999998`, 0.0962851875], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "6"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.30756835, 0.18676585, 0.147065275], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.20504556666666668`, 0.12451056666666668`, + 0.09804351666666666], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.30756835`", ",", "0.18676585`", ",", + "0.147065275`"}], "]"}], 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.30756835, 0.18676585, 0.147065275]; + 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.30756835, 0.18676585, 0.147065275], Editable -> + False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.2306315, 0.0964065, 0.05229475], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.15375433333333333`, 0.06427100000000001, + 0.03486316666666667], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2306315`", ",", "0.0964065`", ",", + "0.05229475`"}], "]"}], 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.2306315, 0.0964065, 0.05229475]; + 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.2306315, 0.0964065, 0.05229475], Editable -> + False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[0.3], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.2], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "0.3`", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[0.3]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[0.3], Editable -> False, Selectable -> False], + ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.2306315, 0.0964065, 0.05229475], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.15375433333333333`, 0.06427100000000001, + 0.03486316666666667], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2306315`", ",", "0.0964065`", ",", + "0.05229475`"}], "]"}], 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.2306315, 0.0964065, 0.05229475]; + 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.2306315, 0.0964065, 0.05229475], Editable -> + False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, ImagePadding -> + 0]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}], ",", + RowBox[{"LegendMarkerSize", "\[Rule]", "12"}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.800339914592054*^9, 3.800340014670586*^9, + 3.800340211888435*^9, 3.8003472677605867`*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"52c1128b-4a6c-4506-aaea-9ac6e983aaa2"] +}, Open ]] +}, Closed]] +}, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Archetypes", "Section", + CellChangeTimes->{{3.8003507012615557`*^9, + 3.800350705391283*^9}},ExpressionUUID->"59823bf3-0206-4a75-bf96-\ +0b1d632d400c"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.800350720891529*^9, + 3.800350721372995*^9}},ExpressionUUID->"c76fd690-4dfa-4319-a555-\ +3596b82a35e7"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"rH\[Lambda]", "[", + RowBox[{"1", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.800351561760757*^9, 3.800351587477044*^9}}, + CellLabel->"In[50]:=",ExpressionUUID->"8bb941d9-e032-4bc9-bcc2-4dc7ec2bd917"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["1", "R"], "0", "0", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}, + {"0", + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0"}, + {"0", + FractionBox["1", + RowBox[{"3", " ", "R"}]], + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], "0"}, + { + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0", "0", + FractionBox[ + RowBox[{"50", "+", + RowBox[{"29", " ", "R"}]}], + RowBox[{"25", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{{3.800351575187879*^9, 3.800351589379211*^9}}, + CellLabel-> + "Out[50]//MatrixForm=",ExpressionUUID->"f9762a34-954d-4245-ab9a-\ +3ce085a18dda"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"rH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.8003514243875523`*^9, 3.800351459357768*^9}}, + CellLabel->"In[48]:=",ExpressionUUID->"13e29727-2f9c-4348-a8dc-a50537d40d25"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{"2", "-", "\[Lambda]"}], "R"], "0", "0", + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]]}, + {"0", + FractionBox[ + RowBox[{"3", "+", + RowBox[{"8", " ", "R"}], "-", + RowBox[{"5", " ", "R", " ", "\[Lambda]"}]}], + RowBox[{"3", " ", + SuperscriptBox["R", "2"]}]], + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]], "0"}, + {"0", + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]], + FractionBox[ + RowBox[{"3", "+", + RowBox[{"8", " ", "R"}], "-", + RowBox[{"5", " ", "R", " ", "\[Lambda]"}]}], + RowBox[{"3", " ", + SuperscriptBox["R", "2"]}]], "0"}, + { + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]], "0", "0", + FractionBox[ + RowBox[{"150", "+", + RowBox[{"250", " ", "R"}], "-", + RowBox[{"163", " ", "R", " ", "\[Lambda]"}]}], + RowBox[{"75", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.800351459798152*^9}, + CellLabel-> + "Out[48]//MatrixForm=",ExpressionUUID->"8ec44973-3399-49a8-a558-\ +9af354264350"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + FractionBox["29", "25"], "+", + FractionBox["163", "75"]}], "\[Equal]", + FractionBox["250", "75"]}]], "Input", + CellChangeTimes->{{3.8003518689175797`*^9, 3.800351871571878*^9}, { + 3.800351901579871*^9, 3.800351929662875*^9}}, + CellLabel->"In[53]:=",ExpressionUUID->"0bc60b54-bb45-4263-a752-83a294c462e6"], + +Cell[BoxData["True"], "Output", + CellChangeTimes->{ + 3.800351875640552*^9, {3.80035191753452*^9, 3.8003519303375797`*^9}}, + CellLabel->"Out[53]=",ExpressionUUID->"c22639b8-5fe8-4ea4-9f75-85162efc62d3"] +}, Open ]], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"\[Gamma]", "=", + FractionBox["163", + RowBox[{"75", "R"}]]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"\[Delta]", "=", + FractionBox["1", + RowBox[{"3", "R"}]]}], ";"}]}], "Input", + CellChangeTimes->{{3.800351935033564*^9, 3.800351950725281*^9}, { + 3.800351981526742*^9, 3.800352003718802*^9}}, + CellLabel->"In[54]:=",ExpressionUUID->"4e6e5662-9064-45a5-ab12-0cd860a459b8"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Gamma]", "//", "N"}], ",", + RowBox[{"\[Delta]", "//", "N"}]}], "}"}]], "Input", + CellChangeTimes->{{3.800352030071599*^9, 3.800352051368526*^9}}, + CellLabel->"In[57]:=",ExpressionUUID->"0ffb6086-5540-46f3-b60e-7ab8283006ed"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + FractionBox["2.1733333333333333`", "R"], ",", + FractionBox["0.3333333333333333`", "R"]}], "}"}]], "Output", + CellChangeTimes->{{3.80035203402886*^9, 3.800352051961257*^9}}, + CellLabel->"Out[57]=",ExpressionUUID->"45a01882-55b5-4884-821e-a19409cab185"] +}, Open ]], + +Cell["\<\ +Abs[\[Gamma]] > Abs[\[Delta]] but not Abs[\[Gamma]] >> Abs[\[Delta]]: this is \ +a symetric ripple archetype, this agree with the Plot of the coefficients \ +part.\ +\>", "Text", + CellChangeTimes->{{3.800352055095591*^9, + 3.8003521550249233`*^9}},ExpressionUUID->"93b865e9-a921-4b90-bd9c-\ +19b5c5e8f975"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.800352169843026*^9, + 3.80035217133442*^9}},ExpressionUUID->"875612af-fea9-475f-917d-\ +3d926b1629f2"], + +Cell[BoxData[ + RowBox[{"Clear", "[", + RowBox[{"\[Gamma]", ",", "\[Delta]"}], "]"}]], "Input", + CellChangeTimes->{{3.8003522482913017`*^9, 3.8003522617324963`*^9}}, + CellLabel->"In[62]:=",ExpressionUUID->"4282ffbc-f897-4182-8f0c-bdec158908a7"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"1", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.800352185397801*^9, 3.800352185791136*^9}}, + CellLabel->"In[59]:=",ExpressionUUID->"8f5c2fe3-94cf-48d1-98a9-b7eaaa519048"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{ + RowBox[{"-", "225"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"59", " ", "R"}]}], ")"}]}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], "0", "0", + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + { + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{{3.800352181073542*^9, 3.8003521865121202`*^9}}, + CellLabel-> + "Out[59]//MatrixForm=",ExpressionUUID->"426660d9-e9a1-4552-b3c9-\ +a127749fc87d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"uH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.800352201390511*^9, 3.800352201698962*^9}}, + CellLabel->"In[60]:=",ExpressionUUID->"71f64d67-0982-4c21-a781-e915b01a7af0"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{ + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "-", + RowBox[{"59", " ", "R", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "2"}], "+", "\[Lambda]"}], ")"}]}]}], ")"}]}], "-", + RowBox[{"225", " ", "\[Lambda]"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], "0", "0", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"-", "60"}], " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "2"}], "+", "\[Lambda]"}], ")"}]}], "+", + RowBox[{"45", " ", "\[Lambda]"}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]]}], + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"-", "60"}], " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "2"}], "+", "\[Lambda]"}], ")"}]}], "+", + RowBox[{"45", " ", "\[Lambda]"}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]]}], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + { + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + RowBox[{"16875", " ", "\[Lambda]"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"1875", "+", + RowBox[{"8550", " ", "R"}], "+", + RowBox[{"900", " ", "\[Lambda]"}], "-", + RowBox[{"7039", " ", "R", " ", "\[Lambda]"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.800352202376692*^9}, + CellLabel-> + "Out[60]//MatrixForm=",ExpressionUUID->"5a2e8a73-5d78-4d3b-9487-\ +9fd4fab9c91e"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"\[Beta]", "=", + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]}]], "Input", + CellChangeTimes->{{3.800352232832694*^9, 3.800352245340536*^9}, { + 3.800352343460321*^9, 3.800352343738543*^9}}, + CellLabel->"In[63]:=",ExpressionUUID->"bc9e12a2-4bf5-459c-8b02-103dd4ed5b19"], + +Cell[BoxData[ + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]], "Output", + CellChangeTimes->{3.800352348927875*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"1d728b97-9eed-40e5-8812-9f2494f8e682"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"16875", " ", "\[Lambda]"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"1875", "+", + RowBox[{"8550", " ", "R"}], "+", + RowBox[{"900", " ", "\[Lambda]"}], "-", + RowBox[{"7039", " ", "R", " ", "\[Lambda]"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]], "//", "Expand"}]], "Input", + CellChangeTimes->{{3.80035253192638*^9, 3.80035257801448*^9}}, + CellLabel->"In[66]:=",ExpressionUUID->"08a80101-b01d-47b5-b3d0-e8c691604134"], + +Cell[BoxData[ + RowBox[{ + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"14", " ", "R"}]], "+", + FractionBox[ + RowBox[{"225", " ", "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox[ + RowBox[{"3", " ", "\[Lambda]"}], + RowBox[{"7", " ", + SuperscriptBox["R", "2"]}]], "-", + FractionBox[ + RowBox[{"7039", " ", "\[Lambda]"}], + RowBox[{"2100", " ", "R"}]]}]], "Output", + CellChangeTimes->{{3.800352536180687*^9, 3.800352578346717*^9}}, + CellLabel->"Out[66]=",ExpressionUUID->"592b6f93-bf51-43e2-837b-69eff1bc45e5"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Beta]", "+", "\[Gamma]", "-", + RowBox[{"\[Lambda]", " ", "\[Gamma]"}]}], "=", + RowBox[{ + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"14", " ", "R"}]], "+", + FractionBox[ + RowBox[{"225", " ", "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox[ + RowBox[{"3", " ", "\[Lambda]"}], + RowBox[{"7", " ", + SuperscriptBox["R", "2"]}]], "-", + FractionBox[ + RowBox[{"7039", " ", "\[Lambda]"}], + RowBox[{"2100", " ", "R"}]]}]}]], "Input", + CellChangeTimes->{{3.800352309626172*^9, 3.800352319837036*^9}, + 3.8003526160573893`*^9},ExpressionUUID->"485e6698-0874-458c-be2c-\ +b684804f00ab"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"14", " ", "R"}]], "-", + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]}], "//", "FullSimplify"}], "//", + "Expand"}]], "Input", + CellChangeTimes->{{3.80035265705797*^9, 3.80035267180803*^9}}, + CellLabel->"In[68]:=",ExpressionUUID->"7b329505-d845-4fe4-935b-edaae7501a25"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Gamma]", "[", "R_", "]"}], ":=", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "-", + FractionBox["3", + RowBox[{"7", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["7039", + RowBox[{"2100", " ", "R"}]]}]}]], "Input", + CellChangeTimes->{{3.8003526852670193`*^9, 3.800352688516603*^9}, { + 3.8003528206689377`*^9, 3.800352827232439*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"6ff45040-3f77-4ba2-8daf-5928e0161c88"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "//", "Expand"}]], "Input", + CellChangeTimes->{{3.8003527211884327`*^9, 3.800352722968658*^9}}, + CellLabel->"In[69]:=",ExpressionUUID->"6784c224-d7e8-4585-98c7-26400ab199d4"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "-", + FractionBox["3", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1", + RowBox[{"28", " ", "R"}]]}]], "Output", + CellChangeTimes->{3.800352723348968*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"1cb766fe-bf56-4437-97e8-20b651f95239"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Delta]", "[", "R_", "]"}], ":=", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "-", + FractionBox["3", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1", + RowBox[{"28", " ", "R"}]]}]}]], "Input", + CellChangeTimes->{{3.800352698524639*^9, 3.800352737123376*^9}, { + 3.800352830417364*^9, 3.800352835662073*^9}}, + CellLabel->"In[73]:=",ExpressionUUID->"e8bff279-0c1a-456d-8a37-145123dca0bb"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Gamma]", "[", "R", "]"}], ",", + RowBox[{"\[Delta]", "[", "R", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotLegends", "\[Rule]", "\"\\""}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8003528119460382`*^9, 3.800352880012958*^9}, { + 3.8003529333689137`*^9, 3.800352934201359*^9}}, + CellLabel->"In[75]:=",ExpressionUUID->"2029250c-8fdc-451c-8889-f050acc3b510"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBwQE+/iFib1JlAgAAABsAAAACAAAAkWLpMVFPzr/x9YZuCengv1h8vQan +I86/CN3ZnJ6C4L9AJJyM3JnNv2BX8aN4ht6/DnRZmEeGzL+AEwgf8qbZv6oT +1K8dX8q/MErRJEZc0L+eZ8NyOBrKvwAGQBwUe86/kbuyNVPVyb+A6PE/N0LM +v3hjkbuIS8m/oEJXHTDex79Hs07H8zfIv4AKVNQmmL6/5FLJ3skQxr8AMwlD +0W+APx2Svg12wsG/EPlsQ/Gazj8U4IvtuXfBv6j7RHI4PNA/Ci5Zzf0swb/Q +QCPoyCjRP/fJ84yFl8C/GAfpEWz70j+hA1IYKtm+v4Aluu4rh9Y/COMmFWgt +ur9AAX5Q/zvdP/V+wdTvl7m/eB5xAqQJ3j/iGlyUdwK5vwg2gWdX1d4/u1KR +E4fXt78wA0xxfDPgP27C+xGmgbW/bO7+rMW54T/VodAO5NWwv9Qud8p/muQ/ +wj1rzmtAsL9IOvMSnPLkP12zCxznVa+/oPjneNtJ5T8QI3YaBgCtv2BjgiTK +9eU/dwJLF0RUqL8AhA8MlEPnP4iC6SGA+Z2/hL8BaTm46T/MPFqWWg6Vv1SE +huOfweo/vT/iUg== + "]], + LineBox[CompressedData[" +1:eJwBoQNe/CFib1JlAgAAADkAAAACAAAA5sGsVUnt9D9UhIbjn8HqP/oBZlAG +rvY/SZtMMo1F6D9k0VcTFf74P5+P88QxTOU/ZoNLjD0m+z85d32E9sziP1Jl +Tx4dff0/enZumVVi4D/VKVVmFqz/P2cwa61gxdw/IY+1Y+MEAUBvz3kK+/PY +P9zcw/83LgJA9/opx4es1T/jG9N2mUMDQIr8CG1r/dI/33JqelZwBEBUbL13 +dnHQPye7AlkgiQVA0bYCYDi8zD/zVh6jZpwGQKH6lBBWKsk/swrCeQjHB0Cq +PqDQ+8jFP7+vZiu33QhA2IF1hWIJwz/AbJNpwQsKQPqNtvXAccA/RX1DE0g0 +C0BD5ClZHXu8PxZ/9JfbSAxAoTC51oXmuD/cmC2pynQNQE+r0+yfhbU/7qNn +lcaMDkAGMsz+CciyP4QCJe0+nw9Ayx51tMFusD+HPLVoiWQQQCNu79Kfbaw/ +cnBYyHnvEEAwVtPwM9SoP1ewP+4XhhFAAZxEZVxwpT/iaKeBvBISQC7+9f0e +saI/L8vQSp+cEkAJDw/BFlegP3Y5PtovMhNAz+RUQZE+nD9jICzXxr0TQGA+ +VYYMppg/SxNemgtVFEBBff49OESVP/WvUZOO6RRAG62vAsJlkj9FxcX5F3QV +QMa7QRgsEpA/j+Z9Jk8KFkDoqLHLQMKLP3+AtsCMlhZAL4pGHyc1iD8xxLCQ +CCAXQD35aV3eKoU/3hPvJjK1F0BnB2+Xk0yCPzHcrSpiQBhAHEwxAMXyfz/u +D8Sqz0IYQIaylmlo338/rEPaKj1FGEBGy+aNF8x/PyarBisYShhAs8fi6pil +fz8cel8rzlMYQMHCezAnWX8/CBgRLDpnGEAoTrTJa8J+P95TdC0SjhhApDVW +DGWdfT+ch4qtf5AYQCjwNWJyi30/WbugLe2SGEAJWNyXinl9P9QizS3IlxhA +8qgqiNtVfT/K8SUufqEYQLIaasX+Dn0/tY/XLuq0GEDBukoERYN8P3LD7a5X +txhAAxgXSf1xfD8w9wMvxbkYQKjAKAbAYHw/ql4wL6C+GED/r8PPZD58P6At +iS9WyBhAz2VE8Cr6ez9eYZ+vw8oYQH6FjEY26Xs/G5W1LzHNGEC1msziS9h7 +P5b84S8M0hhA8QJW1JW2ez9UMPivedQYQKtqOR3KpXs/EWQOMOfWGEDN7EiT +CJV7P86XJLBU2RhAf+9aMFGEez+MyzowwtsYQDKTSe6jc3s/tHWdlQ== + "]]}, + Annotation[#, "Charting`Private`Tag$25304#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwVlnc8lt8bx59FGpL9JF8hCllpGeU6yAiV7PE8dyWUSJJKoaSyQvaKUNIg +JETUMZNKGYUou+y9R/ye31/n9X5d9znX/flc17leR8z2grE9hUQiOZBJpP+v +PxVJTbJW72Bixs9l7UAnPu//vPgMoxwW/PI36a/twB8838/8e1oOlyuLshQb +27Goa6NC1FQ57CX/l+ye1I6/W/57XBpUAWldDye5d7djVZnjwZuLKsFUoIES +bvsbc9TOMz7zV8PgSUXlzQ1tOI1Hb0X+22fwzRvlNBhrwSvsTOUqoS8wXWzg +/6aiBVsuXXSzcfgCMu0a2y7EteD1vQ/++v/7AvV7S0reabZgt/yxr507vwIR +ouD5KaEZi2Z+Pnb4UB383vVSZK9lEx49ekl0KaUBLA1NGrjZvuPg3aOf+D80 +wNqCsrKE7kYsTXe8rDjUAFHLa9iI0kZs10V8st/bCNtLApbDvRrxz0v67nU1 +jbA+uWvtk7kGXBkn9vHJ5HfY/aQnSGK+Hid0f7tgdKgZBPyfvN8kWoeVq/WF +nBybQcXxdpsirQ7/yKiqvBvaDAYcdF1S/Te86XLx5uKWZvil9H7Y7PQ3fHfN +0wrJ8y2g6ZEjZBz8FbvK3hBciv4JXvfEP64Z+4J1rsjiJ31t4HLJOPrcVA3m +vLaGTXPdL0i/RjtkVVODv3t267fL/oL+APUTQck12PZWXJOA2y844tunnGtY +g72DaaP+y7/gSoeLLOeLjzjv0S/hc9ztYDsgXR7rWo3Dz+gcjP2vE8INrahM +mSo83b/75B/5TtB4aXesdU0Vtjwndns36oRQykGR0D+VWOT88sdvtp0Q/Mxo +JDa1Eme65ZpyPOuEA4QH507hSvzRW8T5mlIX2GcKD7NvqcCrkbMJNrrdIFp6 +YtHpYBnujsm8stW6G4KZJ6uKRcpwZbytcY9zNwTIp0siUhkOSv661imiG8h7 +c+BPRSnmy0j3uP67G+Tok/KxR0qxTLm5efylHujt+yec9P09Nh8v4G5O7oWR +BXucEFKMVaacRxJyeyF8OmqbEKMYC8+K1xBVvQD2ly+OyhTjrqVQn7+DvaBa +qxoQWfMWO685Mzaz9w9cuKq1tnTdW+wrIljL9+UPaCfpZUglFuIsw6sBxvN/ +Qco3wiFhLh+nE793Na/tg8LuUypmDfk4yVWrzWZLH/jEXWkyeJmPg6O45O3V ++6Bx3fOpwdP5+Nyvp41X7/SBzLtyj7+NeXi7c4tI0qZ+qPsS6u/7/jVOuqeS +3yc1AIuXynMHi1/hqKRkwlmVxXtagi8mvcLB2WwcEwYDMDtZaSt98xW+3lhv +vegyAMYLqp9ltF5hyy3nSJz5A6DaqCrtXJvD8ivBQEljEH505s8e/ZGNgz8t +dXlZDUE7F0elQHAmLuEWMn5+bgi25/DVathk4mFL5fIfnkNQp/vgX5FMJjbo +c38k/3AI1rlozdz/lIHX0UZtO7uHIDaLeriKMwMHHOzs0XIehrfBGjLjqc/x +nZzKP+tujoDrkyRZtJKO8+a6zfaHjYCRNv/snqZ03KtO/nA6dQT0/r5UdsxK +x1q1B9NLKkZg2OT1w9AT6ZgyWODgwjEKQ1efaJdXPsE+25731YePgnjc7WfX +EtKwZ0zIQFzaGESateVmuD7CMifcedTejEGG7L83vEce4dYdNmq/a8ZgPEtD +oUj6EVYukgoRGxuDme0bm972pOLFkVP0H8LjIOVW3RxinYoLNv0rZp4Zh63B +py9tMUnB8ua7qReWxyHMX/nJtdZE7Pc2XbCUbQLauQWfyKUm4t8iQrLcXBPg +8HhIUPtsIg7uI5m9FpuAOVm1wgdzD/Cgx9f0OZ0J2PDVqvaH0AOc/sBR3yd8 +AmQarETH3eLx1q7k8PDtk2DKrWYWZB+DSUeGNmgpTMKhV6/tQ1VjcHfhvoDp +/ZNA9Bjfb+GKwelhtTcsDk+CGu+s+8HiaCyPlpz+c56ElawdKQf5o7F6srnO +81eTcCVZ2vTtj0jMYHIulR6YgmcaLQG/74Zj9RrLK27aU5B28oFVm204Ft2b +NrHt6BTYKSjk8qBw3LtBrd/vxBQclXgQJrsUhp1Kzv4w9J2C5QpVVap7GL6+ +pTK7pXoKXpkevdfREYrjfl63GzeehlaybMyi8D2s6idTwmBMg+4zHV79jiDc +ptTKW2M/DUJVGm4cj4KwSLBKRarHNAjaVnd+lQrCaerzYiYPpyHaMp7HRS0Q +5zy+3JE/MA1Gjq2nzN39cc15V2tPnxnYEukowq14B58TEs3tC5yB5mzf6t6V +23hD9be1ppEzsNHldj/319vYSFShSDZ9BjQ43eSvnL+NmxpGBNs/z4CuIZue +eY4v7t7v9AMJzoKhLaVzSvsWXiQ7GLFnzUJa09uCZCtvrFxz8Z7Om1noV2xx +/bPBG18O8/7gVzoLeRNGugWlXnhcJPrAmsZZULI4nToj7YX71CqlOOZngUND +s7qe4om/XxYnr9OcgwOvPVJVaz1w9kD7K86mOXDQOx4z9t4dD+cMDh/pmIN9 +5Cczo7fcsYzH7I7Q/jlQzAgbJLTdcTr7xocbl+bAtiQ0KaT2Ek7cdjCIS3Qe +6D9uP+XuccNBzAe23OfmoXE6QJlP/CK2q7fg5V+Zh+mVgfc3mpywbIpafj77 +Avhq7kxz8nLC0y5bLcy5FkDJcdPqrLgTvrOhLyFWdAFyvNNk/1w8h9N0r4gL +aS2Azq9AG5qgI+59F7Vra8ACFCroBFz3dsD2L+qPSfMsQu7LzbPTeaew/LX8 +iRqhRTCy9ufucz6FZ3XjI89tW4SWsdc8NpKnsN+fk80ZexZBtZAcWhV7EqeL +jhPyFosgHL9GT5jtBP4bs9Fld+IifCwbM77Zbo0dbhsEH9y+BGl9+yW7wASP +RkSui1dYghQNh/gnFcb4yqO2gGnlJZjvOrXHTs8Y3y1zupthsATCxdbCNabH +cdrqvRubLy6Bx+UbVPbJo7jL84vrTPES1OVYakW36eKz9/jGjKqWwFKMf6GF +pIvHExjnM78usfwMPvt7hw4mvR12PN21BHrXpw4Lex7CIvMbTtezL8PZa0c5 +RPZpYIb7EbOXx5dh07sf2Zpze3Hv7ehGDptl8Dn5nUP46h7sHPn7uJ3dMrhe +RiubF5WwZ+75o1uuLkPdid/N59cq4oTxEN3AxGVIOXJ1sjheAjc7f1Wx71sG +UoQ1V+qbHnVj+2Mi/3n/A59bfuw0xh6w87pA/Xn3H5TeWgzgcdkLVyLv90eF +/oOT3/ZvHfXeBwll33I3pPyDsD6XWaFYZej+z0h3ufwfKKoUb83OPgCXmoxc +2zhWQG/e75eDuib4jbiaxXKzWDrB93mBJsTRwlVNhFbAiLf5+KicFpQo1dM+ +71wBKT+T2TubDwHt/vH4t0dXQPlaezjvH22I0jUuj49agbPrlbIEjx2GdMLt +qVnSCuSktg6pFR6GwssRwdzpKyAqKGTjKaoPvx43mAe+WYE6re7i46P6IEEy +GfJoZZ2/1f323ZuGkFdowmcpugqF/o8SD187Bj+kzRwEMlcha++C0aCjMaTf ++rkjJH8VFCUEAn9EGYPHT+YAFa/CAT/9ThNsDMKBDs4T9avQ6jJM5eQ1Adv+ +q25f5lYh0Ufvhl++CXiYHIEyMRIqtL+0eKDPFE7d5Erx2k5Consu6+StNwP9 +jHqS8k4S4nm66vVJwQyEqeblWXtIqN/T7GLTFTPAuYR2oi4Jsev6v7hJMgd2 +HleDq+dJyFRlQPElxQLGDiplKrmRkPCdkm12YhbQ4ji9YfQKK26kmVAJFvCi +zOOrnQ8JMYrqw+94WsCRi7eOG0eS0J0rgUPcYxYQVRdhIVdEQtOtf3v7P1iC +97JpYf87Elqs2tTi02kJDlKCm9PKSegAEfH984Il7Pd50Cr0hYTMIzZKee+0 +glaFNCZHBwnRdkcWMu5Zgdj9/NM9NDIy+tThFHDQGiw/ShYErCWjgsbiTkVj +awglx3DIbyQjidcM21gHa1i+dOWlhyAZ9RdauKeEWkOL5f45Thky+vjYkZzT +Zg1h4kVBysfIyLTlR8rOczZQbSP9+7cJGWlyz3kPX7eBlah4hduWZCRUKpvt +ds8GnNdc/157iox+HTOpqsuwAd1hVZHT7mQU9i4nsWOA9X1+yauQeDJCVckB +aTYM2DsmS9v9kIzeZmvlDJ9lgLNUknnLIzIatbxRSLrCgNYE7yXxTDLSOSU0 +G3KfAQU31bUL35ORlMnhet1SBowUZsUyK1h6LVNeLnxmgMSkyCDlIxkJxES5 +Xm9mQITdauiRejLi8zsuNjjCgPOHS1u6e8jIb7O/YTCdCWm+ijsD+slonCPW +B4szobU4xVtuhIxeFFpcq5Rlgp78LXGPWTKq5A8S1kZMkODVdOZcS0HKQnrl +MvZM+PWrYnW/PAUVKvi6NKQzoWVzyt0QJQqy++x+9vNLJnw391rfs4+CdosV +vEvJY8KXuj2CoUBB7tXz3l1lTHhX+US+14iCDI26rcpbmfCW7JunYkZBi+8D +9j7pZEKBOqF634qCNoTWOzr8ZUJWoYCOqi0FqfP4N96ZYMLDTH9m2CUKCtzV +aKnMTkDCwOmeP1dZ+x2jn/OtJyBmO3JU86KgZa3E/fVcBISmzLv/vUNBJWH5 +s0N0AoJ+f19UC6SgkXjvRP3/CPATeuUTHkJB/WGzZ4PECLgZ5Rh8IIaVT97V +JkuaAK96bZ6IBAoKitKdipAjwGOjeFzfQwqi3boRbbWLANeA1scRTynIw6K1 +JUSZgJNeBsX9hRSktjbaIU6bAEbRDg31dxSUOy1zIlKPAMtZanVkGQUldH2j +uxkQYORa0qD+iYIKGnaltRkRYPgyzjLqKwX9jQ7rcDAhQG/QvX2ggYJsf2tm +N5kRoGEnNxjVRkE6oYZtdtYEqKeudR3soKDxOy8e3mYQoNr+ZwZ6Wfrp5yr9 +CQL2bSn3jO6nIBMuzZsXTxKgZPmQPDRMQaUacWQNWwLko6/7owlW/i2+3rOn +Cda7zJwzZoaCBASqJCLsCRA35NqsscLSc7njrddZAkQChx7GUKio9ETB+i+O +BAh9qJYYZqeiyrN/DShOBAhQ015orKeiP+6ZGVudCeBBPoqxXFREOzpvLXGe +gI3ejIJhXiriFjofuMmFgHVvlQ9o0qlope6UQy+L2ef4ymOFqWhvbpdoygUC +KHsmdEdEqei/osw+LVcCVlxrazUlqYiXW3ngG4sXXz43iZOmouSALJNDFwmY +Hbz7c0SOiki0CdNUFk/usD2hpURFy6MxQn0sHrVT/xO3j4r4skbr+d0IGEwV +chpVpaLRjStP5Vj8t312XAuoaF+hb408i3u2NF6J16Ki1LhJ280sVr/Wdc5Q +j4petaORftZ5CU1jxKohFcUr0s48/H/+3SvGucepKC7wyxpVFhuHb9C1N6ci +Ho0a9hLW/2aNCqnRbahoPKMmQYLF6wylFT6foKLhkoOLl1h6HZ7v33bDjooa +Hu+zecHyo5xdR3CXIxU9cjozVc3yT8TOdH3veSqqjZWc/8Ly93qZ7WqMGxWZ +lzo+LGL53yRycerwVZb/snVCoedY9fa62bfsydLvEp+qz6pX6M+QtmwfVj2W +XjiMnWHp35f4zfYuFZ0vvZ/k5UDAo4nCNx9DqUgy/aDccVY/rBytzvCMpKI8 +C+ZQ3CkCrDN/JMvHUVFw6MqfmhOs+p6Z9I9KpaLyxRcW/TYEuFSSvHTTqehF +97FdTVYEfBLjcl18QUWxTS82ZFkQ4Ptrp+XJPCryjFwTJMzq73YVVUPeIio6 +YTB/7zWr/1Vj9dCHd1R0as2NY3uPsup33F5KtpqK9mwKa15g3Z9T1Q/n535S +0bnib6v3DhJQIvFy+EU7FUX4v5a4oUoA3be4k9lDRR/qLnsy9hNQd6DlY8Uw +FcXwfXJtVyQA5XLH31+lIl9+gcPL4gQkcomGaNJoyOzAjVrTrQTMO8vfmuGg +oaMfTToTthCQs8PA0YaHhh6GD1mN8xIgmnRHZYckDbWs3yZdRWXNh8UIuVZp +GlrbY50dusqahxapYiHyNPR3SxOn7hITwnjer53aT0McTKmpO5NMIAXM/Xyv +T0OTvp2ZKqx51+F27rq5Kw0lJDicfVbIin/vTS1yp6G2i55xn14zQXzviRrh +azSUJ+XR05HFBLs5E3rPLRoSVvVQ701jQr/nwYILkTQkyqMiaxHGhIk7myYD +Cmgo6fURxxU7JlBjCxyLl2moN++hAic7a57PK4aLkNlQOPXV8+pVBuhYZRTe +YmND7gMXgzwWGBCwJWWN3kY29DfsePu7YQZsSAl88n0rK+4vbvOzgQH8zxld +I5psSE/gnd+ZJAbsKKZYiQayIeX12cNXZRkQI73T7XwIG6K2X+o7KskA9jiT +e2/D2ZCi/XflrSIM6HVPe2eawIZ6NA7tyORiQIq8jnhgBhuiNRttuzZpA0KP +AocmatnQKyeB4tECG+AM3HSjgocdBc9uyilWs4Epc5HHDons6AdvkauosjW8 +Xld+jaN6DSo1VdVr67IAnO2w881vDpT4TOWj5HMzKHWOdCxbvw7x9VntkjQ2 +AW1vLV69PevRh8TrauZSx0Hg5nRsm94GBE6bGc5RR+FXnNzzT+6c6KrZQrB6 +tz6MPj4T/SF4IzrcpjJBqdKFOxTJEfVkLnRjobMgiE0b/A/knw2024TaHl+l +pTE0wc3V8uO1sU2ouuhSB0kagUUOjAr6cSPOoM23zggdgO6zT2+V8PCgaMms +M6qPlUHhc51+ciIP2r9/D1PxMeu9q6LeqqDEiwLkN6ZXVCvBaVHZ5g/veNE9 +/v7rMxcVwYCXSFhvxof4w8vYL1+VhZns45GhA3yobed0xkiOFGhXVS0IuvMj +g6+TnepJknD/r/f2Y+sE0KLJfA5fnjjc9CkoDY4RQL4JBlXi5qKwqzInjENU +EJXJLfs/eiAM7bxj25XyBZFus4Tmrgo67Pr1UsYW0ZGyFVnp1GN+GOWqfPFN +k442PvlsaxPDD5larTIHtemoiFJvzQzkh+0Z7Dvp+nSkaaQT6nGBH4Svn9j5 +1YSOzGO8b68/wA8cdG5Z1TOs/YkpeclNfNBu4i7HE0pHfEzKNltuPkj0D3p5 +M4yObEaVwg3Z+MCqOEVuJIKOAoORivoCL3wXr5X7GEtHQ49GJPd38cKnCUn5 +G6l0JF07sXjjFS/k32+WH8yjI67IxL+2JrzgVjGSZfGGjgSeL8+/1+UFxTmq +QlURHY1cVKOIH+CFF4SiQsp7Osov7u9fluCFFLlABfOPdCRXFxrFNscDxKnk +7IpPdPQv4eRQ3BAPbInOV9hVS0f6Epfpuzt5IGa5S2FDAx39Tj/0x7OGB0wV +57OvfWf5cXPaS+Y9D3DbbVTsa6Kj6sa61o5cHvgaK5Fj+pOOIht+Lj54ygPB +n1UVy9voSGyW+yeRyAP/A0qAiqc= + "]]}, + Annotation[#, "Charting`Private`Tag$25304#2"]& ]}}, {}}, { + DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {None, None}, + DisplayFunction -> Identity, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "ClippingRange" -> {{{-0.6931470395853477, + 6.214607957447594}, {-11.081898426642045`, + 1.4494697535923777`}}, {{-0.6931470395853477, + 6.214607957447594}, {-0.5284468802198586, 0.8361358112198425}}}}, + DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> NCache[{{-0.6931471805599453, + Log[500]}, {-0.5284468802198586, + 0.8361358112198425}}, {{-0.6931471805599453, + 6.214608098422191}, {-0.5284468802198586, 0.8361358112198425}}], + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + RowBox[{"\[Gamma]", "(", "R", ")"}], + RowBox[{"\[Delta]", "(", "R", ")"}]}, "LineLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.80035288101691*^9, 3.80035293534479*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"4eb170f5-d433-4288-9b07-40aafc5a2875"] +}, Open ]] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["RMP2 vs UMP2", "Section", + CellChangeTimes->{{3.801298380918355*^9, + 3.801298386731122*^9}},ExpressionUUID->"61d15e14-b615-4a5e-a7aa-\ +404c7a205325"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", + "Normal"}], ",", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", + "Normal"}]}], "}"}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1"}]}], "//", "N"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8012987196471*^9, 3.801298761927176*^9}, { + 3.801298797453186*^9, 3.801298816216124*^9}, {3.8012988591058817`*^9, + 3.8012989022162857`*^9}, {3.801298948984644*^9, 3.80129896620984*^9}}, + CellLabel->"In[46]:=",ExpressionUUID->"0632fbf3-63f8-4f59-b1c2-cc8175161631"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"0.9666666666666667`", ",", "0.7196501647534014`"}], + "}"}]], "Output", + CellChangeTimes->{{3.801298733652265*^9, 3.8012987630749187`*^9}, { + 3.8012988030235767`*^9, 3.801298816857155*^9}, {3.801298860249403*^9, + 3.801298902503824*^9}, 3.8012989668939447`*^9}, + CellLabel->"Out[46]=",ExpressionUUID->"bcdc10a9-e507-43a5-b844-de88de15ef94"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", "=", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ",", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ",", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}]}], "}"}]}], "]"}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1"}]}], "//", "N"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{ + "0.1", ",", "0.2", ",", "0.5", ",", "1", ",", "2", ",", "3", ",", "4", + ",", "5", ",", "10", ",", "20", ",", "50", ",", "100", ",", "1000"}], + "}"}]}], "}"}]}], "]"}], "//", "TableForm"}]], "Input", + CellChangeTimes->{{3.80129897831118*^9, 3.801299046859041*^9}, { + 3.801299106332135*^9, 3.801299114371539*^9}, {3.8012992319514713`*^9, + 3.8012992980147123`*^9}, {3.8012997645870533`*^9, 3.8012998212488203`*^9}, { + 3.8012999384597692`*^9, 3.801299947384201*^9}, {3.801300928878345*^9, + 3.801300935626519*^9}, {3.801300968361435*^9, 3.801300969250929*^9}}, + CellLabel->"In[81]:=",ExpressionUUID->"a40aea77-09bf-4f3d-8423-e1fbee28c678"], + +Cell[BoxData[ + TagBox[GridBox[{ + {"0.1`", "9.947916666666666`", "1.8573291695641391`*^9", + "9.783873673369605`"}, + {"0.2`", "4.950980392156862`", "8624.770843960783`", "4.794237153970371`"}, + {"0.5`", "1.9583333333333341`", "82.98013605442179`", + "1.8206007678316867`"}, + {"1.`", "0.9666666666666667`", "0.7196501647534014`", + "0.8527810650564627`"}, + {"2.`", "0.47619047619047616`", "0.48426362121997235`", + "0.39195879564793706`"}, + {"3.`", "0.3148148148148148`", "0.307839737457483`", + "0.24789752605668114`"}, + {"4.`", "0.23484848484848486`", "0.22083401517803167`", + "0.17921030845840952`"}, + {"5.`", "0.18717948717948718`", "0.17082161458333334`", + "0.13947082623844892`"}, + {"10.`", "0.0927536231884058`", "0.07848446053225978`", + "0.06452512332066093`"}, + {"20.`", "0.04612403100775194`", "0.03725205918396411`", + "0.030271992056942764`"}, + {"50.`", "0.01838187702265372`", "0.014391086302880527`", + "0.011363693524354176`"}, + {"100.`", "0.009178981937602627`", "0.007107942498862338`", + "0.005487412426784082`"}, + {"1000.`", "0.0009167914794474954`", "0.0007027977070304175`", + "0.0005156862475241831`"} + }, + GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[2.0999999999999996`]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], + Function[BoxForm`e$, + TableForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{{3.801298979109148*^9, 3.80129904792072*^9}, { + 3.801299108636004*^9, 3.801299114977067*^9}, 3.801299234609192*^9, { + 3.8012992913305683`*^9, 3.801299298440815*^9}, 3.801299785612088*^9, + 3.8012998222389307`*^9, {3.801299939929058*^9, 3.801299948787512*^9}, + 3.801300938036461*^9, 3.801300971087762*^9}, + CellLabel-> + "Out[81]//TableForm=",ExpressionUUID->"f925ac81-a3d5-4607-88a5-\ +0cd301f4683b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", "=", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ")"}], "-", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}], ",", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ")"}], "-", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}]}], "}"}]}], "]"}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1"}]}], "//", "N"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{ + "0.1", ",", "0.2", ",", "0.5", ",", "1", ",", "2", ",", "3", ",", "4", + ",", "5", ",", "10", ",", "20", ",", "50", ",", "100", ",", "1000"}], + "}"}]}], "}"}]}], "]"}], "//", "TableForm"}]], "Input", + CellChangeTimes->{{3.8013000192792587`*^9, 3.801300119049024*^9}, { + 3.801300995912702*^9, 3.801301015710926*^9}}, + CellLabel->"In[82]:=",ExpressionUUID->"4cf7877f-11f3-41fd-a130-dbea82457812"], + +Cell[BoxData[ + TagBox[GridBox[{ + {"0.1`", "0.16404299329706143`", "1.8573291597802656`*^9"}, + {"0.2`", "0.15674323818649033`", "8619.976606806813`"}, + {"0.5`", "0.13773256550164728`", "81.15953528659011`"}, + {"1.`", "0.113885601610204`", + RowBox[{"-", "0.1331309003030613`"}]}, + {"2.`", "0.08423168054253913`", "0.0923048255720353`"}, + {"3.`", "0.06691728875813367`", "0.059942211400801845`"}, + {"4.`", "0.05563817639007534`", "0.04162370671962215`"}, + {"5.`", "0.04770866094103827`", "0.031350788344884424`"}, + {"10.`", "0.028228499867744866`", "0.013959337211598848`"}, + {"20.`", "0.015852038950809173`", "0.006980067127021349`"}, + {"50.`", "0.007018183498299546`", "0.0030273927785263513`"}, + {"100.`", "0.0036915695108185455`", "0.0016205300720782561`"}, + {"1000.`", "0.0004011052319233123`", "0.0001871114595062344`"} + }, + GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[2.0999999999999996`]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], + Function[BoxForm`e$, + TableForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{{3.801300043124114*^9, 3.801300120603881*^9}, + 3.801301017997078*^9}, + CellLabel-> + "Out[82]//TableForm=",ExpressionUUID->"16b61230-bb39-4a13-824d-\ +1eb4ab314813"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", "=", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}], ",", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}]}], "}"}]}], "]"}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1"}]}], "//", "N"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{ + "0.1", ",", "0.2", ",", "0.5", ",", "1", ",", "2", ",", "3", ",", "4", + ",", "5", ",", "10", ",", "20", ",", "50", ",", "100", ",", "1000"}], + "}"}]}], "}"}]}], "]"}], "//", "TableForm"}]], "Input", + CellChangeTimes->{{3.801300169363579*^9, 3.801300172532477*^9}, { + 3.801301000656721*^9, 3.801301001526135*^9}, 3.801301032947589*^9}, + CellLabel->"In[83]:=",ExpressionUUID->"918f4460-f93f-4d2b-a390-b503d533efbf"], + +Cell[BoxData[ + TagBox[GridBox[{ + {"0.1`", "1.0167666712361143`", "1.8983576766935787`*^8"}, + {"0.2`", "1.0326940935862305`", "1798.9871103514636`"}, + {"0.5`", "1.0756522615695066`", "45.57843626159189`"}, + {"1.`", "1.1335461190178555`", "0.8438861910070122`"}, + {"2.`", "1.2148993248213702`", "1.2354962475569622`"}, + {"3.`", "1.2699393165498278`", "1.2418023784033092`"}, + {"4.`", "1.31046303568518`", "1.2322617882736473`"}, + {"5.`", "1.342069106692408`", "1.2247838432625684`"}, + {"10.`", "1.4374807581143532`", "1.2163395665627357`"}, + {"20.`", "1.5236536439686852`", "1.2305783879003265`"}, + {"50.`", "1.6175970412488228`", "1.2664092244337788`"}, + {"100.`", "1.6727341092132932`", "1.2953177100683089`"}, + {"1000.`", "1.777808665344527`", "1.3628397313377254`"} + }, + GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[2.0999999999999996`]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], + Function[BoxForm`e$, + TableForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.801300174934111*^9, 3.801301035067793*^9}, + CellLabel-> + "Out[83]//TableForm=",ExpressionUUID->"f4eeca3e-e5eb-4563-97bf-\ +4998dc8f13dc"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", "=", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ")"}], "-", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}], ",", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"Series", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], + "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], ")"}], "-", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}], ")"}], "/", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]Exa", "[", "R", "]"}], "//", "Sort"}], "//", + "First"}], ")"}]}]}], "}"}]}], "]"}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1"}]}], "//", "N"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{ + "0.1", ",", "0.2", ",", "0.5", ",", "1", ",", "2", ",", "3", ",", "4", + ",", "5", ",", "10", ",", "20", ",", "50", ",", "100", ",", "1000"}], + "}"}]}], "}"}]}], "]"}], "//", "TableForm"}]], "Input", + CellChangeTimes->{{3.801300370838561*^9, 3.801300410876075*^9}, { + 3.8013010043619757`*^9, 3.801301004803896*^9}, 3.801301058195932*^9}, + CellLabel->"In[84]:=",ExpressionUUID->"f08e6844-e706-404f-ab6f-2c01558c9a38"], + +Cell[BoxData[ + TagBox[GridBox[{ + {"0.1`", "0.01676667123611423`", "1.8983576666935787`*^8"}, + {"0.2`", "0.032694093586230426`", "1797.9871103514636`"}, + {"0.5`", "0.07565226156950658`", "44.5784362615919`"}, + {"1.`", "0.13354611901785557`", + RowBox[{"-", "0.1561138089929878`"}]}, + {"2.`", "0.2148993248213703`", "0.2354962475569621`"}, + {"3.`", "0.2699393165498279`", "0.24180237840330931`"}, + {"4.`", "0.3104630356851802`", "0.23226178827364738`"}, + {"5.`", "0.3420691066924079`", "0.22478384326256848`"}, + {"10.`", "0.43748075811435305`", "0.21633956656273562`"}, + {"20.`", "0.5236536439686852`", "0.2305783879003264`"}, + {"50.`", "0.6175970412488228`", "0.2664092244337789`"}, + {"100.`", "0.6727341092132934`", "0.2953177100683088`"}, + {"1000.`", "0.7778086653445271`", "0.36283973133772546`"} + }, + GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[2.0999999999999996`]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], + Function[BoxForm`e$, + TableForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.8013004126222258`*^9, 3.801301061749943*^9}, + CellLabel-> + "Out[84]//TableForm=",ExpressionUUID->"80353c03-1457-4ac5-a68b-\ +24caed61dc7c"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Complete basis", "Section", + CellChangeTimes->{{3.801298400104567*^9, + 3.8012984037339478`*^9}},ExpressionUUID->"566e0bb1-44f3-4fd6-93fd-\ +55680abf1c6e"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.8013011928001127`*^9, + 3.801301193151882*^9}},ExpressionUUID->"93f596ca-102d-43a3-8d75-\ +118c93bdc137"], + +Cell["\<\ +We can restrict the basis to the CSF/Legendre polynomia for the RHF case.\ +\>", "Text", + CellChangeTimes->{{3.801388789039886*^9, + 3.801388842117548*^9}},ExpressionUUID->"5fa7476b-b686-4068-b6d6-\ +52d0dc6a6b2d"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"HRMPn", "[", + RowBox[{"R_", ",", "n_"}], "]"}], ":=", + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"l", + RowBox[{"(", + RowBox[{"l", "+", "1"}], ")"}]}], + SuperscriptBox["R", "2"]], "+", + RowBox[{"2", + RowBox[{"(", + RowBox[{ + FractionBox["2", "R"], "-", + FractionBox["1", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", " ", "l"}], "+", "1"}], ")"}], "R"}]]}], ")"}]}]}], + ",", + RowBox[{"{", + RowBox[{"l", ",", "0", ",", + RowBox[{"n", "-", "1"}]}], "}"}]}], "]"}], + "]"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"rHn", "[", + RowBox[{"R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Table", "[", " ", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"KroneckerDelta", "[", + RowBox[{"i", ",", "j"}], "]"}], + FractionBox[ + RowBox[{"i", + RowBox[{"(", + RowBox[{"i", "+", "1"}], ")"}]}], + SuperscriptBox["R", "2"]]}], "+", + RowBox[{"TEIr", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", "R"}], "]"}]}], ",", + RowBox[{"{", + RowBox[{"i", ",", "0", ",", + RowBox[{"n", "-", "1"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0", ",", + RowBox[{"n", "-", "1"}]}], "}"}]}], "]"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"rHn\[Lambda]", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{ + RowBox[{"HRMPn", "[", + RowBox[{"R", ",", "n"}], "]"}], "+", + RowBox[{"\[Lambda]", + RowBox[{"(", + RowBox[{ + RowBox[{"rHn", "[", + RowBox[{"R", ",", "n"}], "]"}], "-", + RowBox[{"HRMPn", "[", + RowBox[{"R", ",", "n"}], "]"}]}], ")"}]}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMPn", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Eigenvalues", "[", + RowBox[{"rHn\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R", ",", "n"}], "]"}], "]"}]}], + ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.801388844170588*^9, 3.801388877652143*^9}, { + 3.801389261690991*^9, 3.8013892768587112`*^9}, {3.803116056875842*^9, + 3.803116073867989*^9}, {3.803182832686949*^9, 3.803182855221147*^9}, { + 3.803183910251527*^9, 3.8031839298858337`*^9}, {3.8038756326824627`*^9, + 3.8038756331854973`*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"0a685f80-721a-4011-a569-ced015f9b3ad"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"R", "=", "10"}], ",", + RowBox[{"n", "=", "5"}]}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"\[Epsilon]RMPn", "[", + RowBox[{"\[Lambda]", ",", "R", ",", "n"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801392690483585*^9, 3.801392703171526*^9}, { + 3.8013927610358543`*^9, 3.801392761431881*^9}, {3.801393215166847*^9, + 3.801393223053501*^9}, {3.8013933337020397`*^9, 3.801393334826684*^9}, { + 3.80139394143071*^9, 3.801393941793914*^9}, {3.8031161240728197`*^9, + 3.8031161245472107`*^9}}, + CellLabel->"In[44]:=",ExpressionUUID->"044116cc-b052-42c0-88bd-54b853590352"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 44, 1, + 22576300929827622511, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801392703778575*^9, 3.801392761730618*^9, 3.801392824665118*^9, { + 3.801393216265276*^9, 3.801393223417552*^9}, 3.8013933356525373`*^9, + 3.8013939421144753`*^9, 3.8031161248822727`*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"7940c05a-b7b4-40ed-9913-e903c53d53dc"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 44, 2, + 22576300929827622511, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801392703778575*^9, 3.801392761730618*^9, 3.801392824665118*^9, { + 3.801393216265276*^9, 3.801393223417552*^9}, 3.8013933356525373`*^9, + 3.8013939421144753`*^9, 3.8031161253443832`*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"bd5f7b18-4aa2-461d-bda6-016edacd5c79"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"1\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 44, 3, + 22576300929827622511, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801392703778575*^9, 3.801392761730618*^9, 3.801392824665118*^9, { + 3.801393216265276*^9, 3.801393223417552*^9}, 3.8013933356525373`*^9, + 3.8013939421144753`*^9, 3.803116125850185*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"4dc2a87a-d8a9-40b7-9df6-f8f3ae29c494"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"phy\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 44, 4, 22576300929827622511, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801392703778575*^9, 3.801392761730618*^9, 3.801392824665118*^9, { + 3.801393216265276*^9, 3.801393223417552*^9}, 3.8013933356525373`*^9, + 3.8013939421144753`*^9, 3.8031161264275513`*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"87fce9c0-e979-40a7-835f-74ad4a38d182"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8ARtgEkznTdPxT7GiY7 +/AfAhtxyOV1y3T/ERqVcdvgHwB/l3Ujsb90/Jt65yezwB8BY95pVCmvdP+oM +46PZ4QfAdXaCJkZh3T9wajVYs8MHwMmVj6S8Td0/fiXawGaHB8ClL8gFpSbd +P5qbI5LNDgfAhuTX+2LY3D+f34hvUQkGwPhsJ7VaLtw/FtBTTykVBcDuqK3N +II/bP8hQU0TLJQTAIRY5FY/y2j9IKSV0IyIDwOXWY9UnSNo/Oq5cps8vAsC1 +/vxQjajZP/qKZhMyKQHAzY5Wo+j62D/196SVXicAwEmWn7+vT9g/xCKSNL5t +/r+V5Nr0Pq/XPzsFf7MrZPy/+ie63GcA1z+UQDc3QX36v99z3IpLXNY/Y5xY +5eqf+L+zqFFhgLrVP8+nHgkBmva/+6N8f9UJ1T8eDLAxv7b0vxqhLLLUY9Q/ +CiDmz+mq8r+tXGETfq7TP2xUhZioqPC/uKuqmOb60j9gw9/LHpLtv/Y+JRja +UdI/Ij3+UcWB6b/qPg9emZjRP6los+G7tuW/t6L2wbDp0D9q87Fci5rhv3nq +YiW1KdA/Ln4FWQYj27/1FNlyztTOPxN51AuWm9O/mHoEDyNqzT/XZGwqr+PG +v25p6BHD2cs/d3oqjsmVrr+TA/bjMVzKP6qPOECkMK0/zK8Zaq7dyD+OaYHW +YILHP2mO2K+cM8c/DfRMO6xR0z/vFr/DmZnFP+B0xjR2hNs/+etWkbbMwz/u +uU3Cd8jhPzoc7hBN88E/poehYGSJ5T/a8PfdhCHAPyX2qxN4m+k/fJODRkIJ +vD/esh+9O2jtP9dtyPG5uLc/VZfgiOuQ8D9h/+4U4f2yP56ljL1MlvI/xoaJ +aacwqj8EW23tBXn0P2eyYESSK5s/zmCpp1KE9j9qBUl+N1hov7UNGl33bPg/ +lq0hU+CFoL8mmiHoB0z6P6peNXhPwK+/+naE/atT/D8s66iyIFO4v+v6Gw6o +OP4/GHULRv8qwL+gZ4fUGyMAQPr7V/pcj8S/kEHMjBklAUCPJF6g1OnIvw5v +q0LDFQJA87UaqVABzb++RLi9thoDQBaC5kE9vNC//W1fNlYOBEApvWMi6tTS +vwEH0pkr/QRAyrCmd5jl1L82SHLCSgAGQCkOQTvHJde/+tys6BXyBkBGLlQr +p0HZv0RsyJBN9gZAlWO8ahZL2b+N++M4hfoGQJ7RZtGFVNm/IBobifQCB0Du +VksUZWfZv0dXiSnTEwdAuu/TbiWN2b+U0WVqkDUHQGgNB2ut2Nm/LsYe7Ap5 +B0DX0s0i2m/av3hVOpRCfQdA6WV6ME552r/B5FU8eoEHQBpKwWPCgtq/VAON +jOmJB0BZKus6q5Xav3tA+yzImgdAUtVMqn672r/IutdthbwHQDc+TYIsB9u/ +EkrzFb3AB0CQe7jjohDbv1zZDr70xAdApvn1aRka27/v90UOZM0HQNO1tuQG +Ldu/FjW0rkLeB0CstPmR41Lbv2DEz1Z64gdATkqhGFtc27+pU+v+seYHQKXX +ucPSZdu/PHIiTyHvB0AWug2Hwnjbv4YBPvdY8wdAOBExnzqC27/QkFmfkPcH +QM1klduyi9u/GiB1R8j7B0Cnxi48K5Xbv2OvkO///wdAR1HxwKOe2781z36B + + "]]}, Annotation[#, "Charting`Private`Tag$6390#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8B7aYs910rtPxT7GiY7 +/AfAf5uVEixI7T/ERqVcdvgHwF4k9+SARe0/Jt65yezwB8DaM7uBKkDtP+oM +46PZ4QfAf6Yjm3017T9wajVYs8MHwFhXV0wjIO0/fiXawGaHB8AaMC+fbPXs +P5qbI5LNDgfAWiZYu/af7D+f34hvUQkGwB5buVOA5us/FtBTTykVBcDXkKNP +GjnrP8hQU0TLJQTAo3TDR92O6j9IKSV0IyIDwMMlfYzj1ek/Oq5cps8vAsBm +RktJ7SjpP/qKZhMyKQHA083AlhFt6D/196SVXicAwKywBpQmtOc/xCKSNL5t +/r8tTBh1KAfnPzsFf7MrZPy/PuKVPe9K5j+UQDc3QX36vzkzIp2FmuU/Y5xY +5eqf+L9oA2Tj0ezkP8+nHgkBmva/aIYcqFsv5D8eDLAxv7b0v6IhiGl7feM/ +CiDmz+mq8r9VJNCkRLviP2xUhZioqPC/o+l+qu764T9gw9/LHpLtv53XAI3M +ReE/Ij3+UcWB6b8X3awOFn/gP6los+G7tuW/lI+tdkmG3z9q87Fci5rhv5ya +VVW66N0/Ln4FWQYj27/T4P3takvcPxN51AuWm9O/uCQTDnzC2j/XZGwqr+PG +vzumQLeWD9k/d3oqjsmVrr+XvKgMlHDXP6qPOECkMK0/MP2ghPbQ1T+OaYHW +YILHP7634ClABNQ/DfRMO6xR0z9pPtxtdU3SP+B0xjR2hNs/NnrkBylp0D/u +uU3Cd8jhP1/64oTMDM0/poehYGSJ5T+rc5WhRH/JPyX2qxN4m+k/cLP0Huyh +xT/esh+9O2jtP//G0Z9lDcI/VZfgiOuQ8D+RLYy/fT69P56ljL1MlvI/6eVU +TzEatj8EW23tBXn0P307xn8Naa8/zmCpp1KE9j9XjbMPWZShP7UNGl33bPg/ +RjYtXWqOgD8mmiHoB0z6Pzpyi/60fJO/+naE/atT/D9BhTeqEYSpv+v6Gw6o +OP4/5OelihhftL+gZ4fUGyMAQIgDxdNA0by/kEHMjBklAUCPGBnjFqDCvw5v +q0LDFQJAaWvU1P6axr++RLi9thoDQP8D9tLY9cq//W1fNlYOBECRrKi5Pw7P +vwEH0pkr/QRAsYVyi/SL0b82SHLCSgAGQGTPk892v9O/+tys6BXyBkAY9dQ2 +hc/Vv0RsyJBN9gZActQugr/Y1b+N++M4hfoGQBY7cfL54dW/IBobifQCB0B0 +pFNBb/TVv0dXiSnTEwdAJ+kOllsZ1r+U0WVqkDUHQEaTlwc7Y9a/LsYe7Ap5 +B0AEzRtwFPfWv3hVOpRCfQdAnpY4LVMA17/B5FU8eoEHQLzTfQySCde/VAON +jOmJB0DMvC0xEBzXv3tA+yzImgdAi0bbEA5B17/IutdthbwHQIhoXBcQi9e/ +EkrzFb3AB0Bjl0ntUJTXv1zZDr70xAdANzAW5JGd17/v90UOZM0HQIdL/TMU +sNe/FjW0rkLeB0C+0tNaGtXXv2DEz1Z64gdAGJyMNVze17+pU+v+seYHQDyF +hTCe59e/PHIiTyHvB0CaFOmGIvrXv4YBPvdY8wdAfYgs4mQD2L/QkFmfkPcH +QMe3YV2nDNi/GiB1R8j7B0AiK3X46RXYv2OvkO///wdAlXVTsywf2L/com3C + + "]]}, Annotation[#, "Charting`Private`Tag$6390#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8ADc3YYK6PyPxT7GiY7 +/AfAWXfPUkih8j/ERqVcdvgHwEvbMY1ln/I/Jt65yezwB8CyOhMCoJvyP+oM +46PZ4QfAHuZL7BSU8j9wajVYs8MHwCXMsML+hPI/fiXawGaHB8C/XC140mby +P5qbI5LNDgfA/ENsDXoq8j+f34hvUQkGwBlRtWijp/E/FtBTTykVBcCoVRpW +ei3xP8hQU0TLJQTAyLqHW7m18D9IKSV0IyIDwNSkpwzWM/A/Oq5cps8vAsCd +RsbARXXvP/qKZhMyKQHAIXepsaJu7j/196SVXicAwJYV8eLcbO0/xCKSNL5t +/r+0rIvTf3zsPzsFf7MrZPy/s9ORofl36z+UQDc3QX36v5CJSbDlhOo/Y5xY +5eqf+L9IBToEwpbpP8+nHgkBmva/cObVFpeU6D8eDLAxv7b0vwkMfmXxo+c/ +CiDmz+mq8r9BkgwCap/mP2xUhZioqPC/W3tUAAug5T9gw9/LHpLtv65190lM +suQ/Ij3+UcWB6b8diNCl97DjP6los+G7tuW/K585J1jB4j9q87Fci5rhv0EC +gw9fvuE/Ln4FWQYj27+2lqK31MDgPxN51AuWm9O/7obH6Nqp3z/XZGwqr+PG +v0k2z12Aq90/d3oqjsmVrr+mjCllx8/bP6qPOECkMK0/T9Jc5qf92T+OaYHW +YILHPx/J5kudA9g/DfRMO6xR0z9KJ5JRZyrWP+B0xjR2hNs/N0Tts+gn1D/u +uU3Cd8jhPwI6D+TyLNI/poehYGSJ5T/ifRygs1LQPyX2qxN4m+k//+aQG6uf +zD/esh+9O2jtP8W1jrmj4Mg/VZfgiOuQ8D+vbeZjdjvFP56ljL1MlvI/MAj7 +QLZWwT8EW23tBXn0P8OI5DFFmrs/zmCpp1KE9j/JMDfUJza0P7UNGl33bPg/ +sYSm6ugdqz8mmiHoB0z6P91rgAQTk5w/+naE/atT/D8Gy+GONqs5P+v6Gw6o +OP4/YtRrQ+7Kmr+gZ4fUGyMAQNhs7mSdt6y/kEHMjBklAUA4kSfUPiO2vw5v +q0LDFQJAA/P5x6mQvb++RLi9thoDQOnk1dFk38K//W1fNlYOBEA0L4sV1rrG +vwEH0pkr/QRAKVRFwaiIyr82SHLCSgAGQD09BrQJrc6/+tys6BXyBkADY7+b +NUbRv0RsyJBN9gZA5o4vItxO0b+N++M4hfoGQEbxnK+CV9G/IBobifQCB0B6 +yNfez2jRv0dXiSnTEwdA8Um3imqL0b+U0WVqkDUHQOchP/ig0NG/LsYe7Ap5 +B0D+j004EVvSv3hVOpRCfQdAjjutWbhj0r/B5FU8eoEHQJ7oxH1fbNK/VAON +jOmJB0Cg76LNrX3Sv3tA+yzImgdAWgvUiEqg0r/IutdthbwHQO4Li1OE5dK/ +EkrzFb3AB0CQcqCSK+7Sv1zZDr70xAdAZ1ig0tL20r/v90UOZM0HQDc481Qh +CNO/FjW0rkLeB0AWFPlfvirTv2DEz1Z64gdADON0o2Uz07+pU+v+seYHQDVK +B+cMPNO/PHIiTyHvB0BxdAluW03Tv4YBPvdY8wdAVHZGsQJW07/QkFmfkPcH +QACNNPSpXtO/GiB1R8j7B0Cuyro2UWfTv2OvkO///wdAkG/AePhv078WFXaV + + "]]}, Annotation[#, "Charting`Private`Tag$6390#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8BzqBoDpd/0PxT7GiY7 +/AfADhlp9Y3d9D/ERqVcdvgHwCBR3Oh22/Q/Jt65yezwB8CitDLTSNf0P+oM +46PZ4QfA2HirtezO9D9wajVYs8MHwEwmLrI0vvQ/fiXawGaHB8CrYY2MxZz0 +P5qbI5LNDgfAtJgM4OpZ9D+f34hvUQkGwJZrNO0HyfM/FtBTTykVBcCWlMCV +1kHzP8hQU0TLJQTAuXD+tGS98j9IKSV0IyIDwMQEfJjXLfI/Oq5cps8vAsCz +HNfb/qfxP/qKZhMyKQHApxr8XhgX8T/196SVXicAwExbDqsCifA/xCKSNL5t +/r91JtQgpgTwPzsFf7MrZPy/ogqR9avq7j+UQDc3QX36v48tIqWL3+0/Y5xY +5eqf+L8+FopAKNrsP8+nHgkBmva/3+Iz/Sm/6z8eDLAxv7b0v4fpbaDDt+o/ +CiDmz+mq8r/pF86nEZvpP2xUhZioqPC/pld7g4iE6D9gw9/LHpLtv8oTaAu/ +gec/Ij3+UcWB6b89ee4GSmrmP6los+G7tuW/U+a+gcNm5T9q87Fci5rhv2h2 +1VYuT+Q/Ln4FWQYj279Xf/ykjT7jPxN51AuWm9O/MPnAchFC4j/XZGwqr+PG +v2jnvDqCMuE/d3oqjsmVrr93KiPuGzfgP6qPOECkMK0/mD+pYUqF3j+OaYHW +YILHP2xogrkCd9w/DfRMO6xR0z8QQWbCHI/aP+B0xjR2hNs/VtFT0r+A2D/u +uU3Cd8jhPwfjzwcsfdY/poehYGSJ5T8phuhHSpzUPyX2qxN4m+k/HGv1khyS +0j/esh+9O2jtP5IubK4IqtA/VZfgiOuQ8D/p4tyWdpfNP56ljL1MlvI/LDRt +32iNyT8EW23tBXn0P31xaG2s0cU/zmCpp1KE9j/6VEKJGdjBP7UNGl33bPg/ +6MKKTa97vD8mmiHoB0z6P/cXsq1strU/+naE/atT/D9TJlgp5Y+tP+v6Gw6o +OP4/N4pj3yRzoT+gZ4fUGyMAQGFyJtPqf4Q/kEHMjBklAUDdak6NF3WJvw5v +q0LDFQJAgo5KE/e3oL++RLi9thoDQNtpgIaetKu//W1fNlYOBEDFs/kEJ+uy +vwEH0pkr/QRAWJsa1UHbt782SHLCSgAGQCjc67AkNL2/+tys6BXyBkDEGF13 +HRnBv0RsyJBN9gZAu3sQVUUkwb+N++M4hfoGQEToEU1tL8G/IBobifQCB0Bb +juOMvUXBv0dXiSnTEwdAZSHjUV9ywb+U0WVqkDUHQPMoiyCoy8G/LsYe7Ap5 +B0BbZ4QuUH7Cv3hVOpRCfQdAMmGJunuJwr/B5FU8eoEHQLaE/2anlMK/VAON +jOmJB0DU+OIh/6rCv3tA+yzImgdAQornI7DXwr/IutdthbwHQIcfg3oYMcO/ +EkrzFb3AB0ApY+IfRjzDv1zZDr70xAdAzowP6HNHw7/v90UOZM0HQHpFXOHP +XcO/FjW0rkLeB0CfOWZ7iYrDv2DEz1Z64gdAM2reOriVw7+pU+v+seYHQHHK +Kx7noMO/PHIiTyHvB0D+gcJQRbfDv4YBPvdY8wdAAiBJoHTCw7/QkFmfkPcH +QLd8HxSkzcO/GiB1R8j7B0CdUWOs09jDv2OvkO///wdA5PsxaQPkw79fkXKF + + "]]}, Annotation[#, "Charting`Private`Tag$6390#4"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwtlGs01GkcgF3GvLqYtqS2URMjStdtIyJ+b6V0RMWkRlk5uVu2slKIklvT +Tsw6qKgtoSTLNoNt1PT/5xZHmhkVSbmTcRsGMyLa9pw+POf5+Hx7DE+cdPHR +UFNTc/rG//Yq4sm/fkVkwV2PBIcxJSyepptYf0FkpNXXzYtHlVC5J9c9bBKR +9Un2bR+HlWDSKqwdHEFk8FGp7el+JfTP78pu7kCkMK1p4fUOJZwKNGcLKhBp +78XQ7hUrIdr4PembiEjN5JXbYguUkJFplFJPQyR3iaq23EcJt9sun3SeQyUT +rEIqfn85AUskrAOmelpkV0zV+d9sJqDmIMuuzphCxsdJFOxH47DX1DjUiKlJ +Lu+5XM1dNg5Whe73xJs0yATt+q553DGYuuKr+7OpOtnwJOtUt0IBE6qcNI/V +aiRVgleS7gqoZKaYPQueJSYZ+2L7JaNgrXVBsM77C+ESZLKHu20UUrGFxY6o +KYI4cn9VbMEIeN1k9/TfniRUvdEaV5gjIL7PmKOeoSQ+EeknfOlyYMz/ZzNR +Ok7cnQmhRFCGYa5Br1iWryAWJjkmrn83CEGH4q/n5Y0QkRccmOH8AfCsaKtj +pAwRH3+91lyS1Q9Mm1nnqhgZkX2xpcAlUgYP/AUdT0p7iMUHGAtWBfZB4Ngj +9z8yOohoqfLPDXafYGO0lhvVqIUQF5lLtU16QTf8zbz0zNeElvt+jnBFDzR5 +B60t6qomxtyOiTM1uuFsxNqk2rRCQsQur1wz2wn5yZY456e/IaIX6Js0OyEp +IKbR89ILsGdMbH482Q46447WBc6vwb9dfX4YtR3aQ6vNwuJaoLFGHPV5QSsM +C53Kz9Z0QGjO57qqjR/gXmKWpzenB1qaye7BC+/BWPlQ91ymDBJ/kCx3ff4O +WvkrRdb+QxCMOs2MzJrA9Vr75QHeCLAM5O6fybfwVy5X5JiugFcB8Zy2HW+A +cix4SCt8HEz69ufLhhrgleeD+y5xSnAWecRtTZZCiQ79F1XQJDANyy8dPiIB +kwzDPuQ4Ba2G0uh9vq9gKixu5iHrC6SI7/hxtV/CwJQ+Lc9yFrKmczbcGKiF +O36Jb/SN1LBewLBVg/AF8Ha85C4zVsdbskMO9edVAe3kw50Vehr4/GxSsqq+ +Ap7ZPRaV0jUxJSHA1ubjc5gJPr71MI2CE8I86rVXkKCOGm6sm6FgKWlQkN7z +FLbuDSl3UKPi0JHRxG1eQpj6UNCnp6Bifw2bVOctpWAXVMNzUlLxOcMGxS7j +Urg63WUZP0XFRzdkN1gsLQUDuj5nXANhNvyou2q6BOyPcExf6yKcu90qllZR +AqlSn0CeOcL5lyourmWVwMZqxuDccISdjE5TIkKL4ZyrVerOKISPJcety/Qt +hufdrtsjYhCe4+cjErGL4ZDmVa6Mg3ChbSMD2RRDJJ5eX5OB8PDsmap8rWKo +KWsKjn+KsMGCsrnm1wSwyGFMT0QiLLBMuxrEEYB7M+3ZeOW3/tvzp3IjBSBX +7aZ51yMsk9ax9D0FsMS8uHBnK8JttxRRS00F4FkpPhzRifAuHeGwm74AHrAG +Zh/1Iqx7c2/ZLR0BbA9hHjCUI5y1ZvVxUwUfEtRtVewxhOnyNRanu/kg4bnd +5qkQdvF18ytr5APd4Ix9zTTC//IXySm1fPj+Lxy8u6j+4BM+/Ad92GG8 + "]]}, + Annotation[#, "Charting`Private`Tag$6390#5"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.03519887363604365], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld +AKjmAn0= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJfIGYCYgOtlcIXnqg4OE9oFkr7peggMfUKZ0aTqkM4 +p1i7sbySwxkQ4FFzeOAa7zjLUMkhISRIfcFKBD8exO/UgPO9T7Dbzp6q6XBH +U3bN/2BFON99zdHlDDPk4fzUNCBwk3EA2++i4SC/a8G+VD0piH06aqh8HgT/ +19vXBywfq8L5HvtrZS2Wq0LMt5BymDGBv8qsW9VhR7BVxP/jkg6nDjutzdyn +6tAX0e3PGCDp8KZ4q+jv06oOVfd/3DLWloSYx6zmYAwCmyUcfC9OjPnnrObw +HwTkJRz+fit9MCdQzeFNW2630W9xhwtXw97oV6tB3NUjDqHPaDq0iNeyZrrx +OtT/tio490LTwQRsHo+DP8g8Zi0HmY1i85kUeKDmQvkLuCF8ey2H7V4bLOb8 +5HLYoJe3mDFGy8H/iecl02Auhy3mPw6ldGk5HOze12SSzOnwB+TeZG2HmWAA +5IPcNxHBB9t3GMFfr/qked5b3HyZeXGapwV04ebD+BD/cTtMaW+Nulyj47D8 +1vLHhoe5If4y1oHSPA4tLEf7Db9rO7yofZx9PofXQXb5Cw+9++pQ8yQdzGz2 +Bk17qOEgUjmp5OwTSYi9kZoO6p9UXs7ylIK4/6Omw3ohHb50OWkHc7B6LQcD +kPHFMnD/hry9/HGGoxycfxqcThTgfHD8v1CEh+/Kby8rzjxQgqYXdTgf4m8E +H+w+R1VI/F/G5IPT5xIVOB+cfrhx8/fk17yd2aoINx/GTwel9zAliDpnJYcP +i9YrnPVQcuCPDbhvJK7sUAlKj9ZKDmtB4aCnDMlPggg+2NkrFeB8iD8F4fyS +5SUb/vXzwM2DpCduuH2w+NsLck+qIjx+YXxY/IP5pUoOTaD03MYJNw+WXsD5 +jV0Fzk+JvePG/APBf5Gl/W36XFW4fhbOLvnkdWpw82F8mP1SoPR2QRXuvo2g +9P9HBe5+WPkE8x+MD/M/evkFAFuQG5I= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlFFIU2EUx6/Okos5yJDlfHBdGmXW3b3djYoovopKJAqKsh4SSs3sIaEm +lKwokx4s2Eth0pDIh8ti5oRCemhUIhhuWWggo3JQxCQGITUWZbbvjv/5oAPf +w49xz/mf/zlna053HG61SZJUlH9H8684/447Rt9Jdi9b4lGzkoH9pj/6N7iC +rb47I58t9rLRhujW0K8y1nLywz7bPYOZSfOzPlbG1mXKY1qtweI8bgt+eSvW +7W2W2WK2MxUaMVi348qy9psy5eu3QmZPtuRetXQJtn5fENwwUbrj/l4ffZ8+ +V5ftS/goPxj1/U8rf082+UiftiG86u0PoX891zcv+gOjf7BVPuwift4RyPRX +KpTv8lwuaWxXqN73h8OuRL1CetrO5OOY4HB2/lI8pbBkdeDUZrePGTymFeoX +DD/AsxULu6aWCw4e8a/tmzLY/si4Kc0q5Dfyg1Ef84I++A/9mDf6A6N/sJXv +q7PQz0eDRSo22ts+OQu+RwzW4yp1x2ec7PXY7qH2g4LNdL26pOvEg3Mxe2ha +I64eaKqdfKBRPgfXd0GjemDoAUPvCa7vqkb9lB8avtOa1qjf6yXjQb1RJz/A +8Mua32ON/B1Rzw8WBQRbem2CU9wQl4f4j7XfKs2jxxKwifKDUT+X+fZi2x6V +9F3jehwe0l8i99Y0qx7qD4z+wdhXMPYZ+bDvqId7gB7cCxj3dIDfW6dK94Z8 +uEf4AYZf4IvczzcafQ+/kR+M+pgX9GGe0I95oz8w+gd3cf/qqgr7FNXYEN+n +nVXs57Nk7+J7wdhHMPYV7P5yYyDxSDDuDYx7QL3//z//AckFQOg= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnbpg7uK05upxhhoTDTBCQtHCouv/j +lvFqCYfiraK/T8dZOBiDwGYJh+tCnxzPH0Pw/34rfTCn0BLO/w8C6y3h5s0A +mXfT0kG4clLJWRcJhw16eYsZ31g6rBXS4UuPE3f4siEge9Z3S4cY1QiZczai +DmdAwMYKzvc5wW4729QKbh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/S0sIbSntcKRtefipR5YO6WlA8EwK7j+we+dIwf1vAgqPYCmHJ4kL +r5nkWzq4g9xrIQUJv2sWcP6Xnbe6/pYi+J9A7lG3gJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzgPCllCD63S0cwjnF2o3llSDmnEfwwfFpZ4kqvx8af8xK +Dh9A+tmh4XlP0aEErN4KIn9YEeJeVysH5WuPghnWIPjg8HVE8Pfm17ydKaoA +8e80TD7YvVqKDhJTr3BmLLKC+J9DycG+6dHxGbuh9l1Wcthi/uNQihc0vu4o +OdyQrkk0YrVyWPntZcWZB0oOy1946P1faAnnT5/AX2W22gKunstNtZTJygJu +nsZb3n0GL83h/AnBJSrT1yP4MQqOH5NzcPPB+iXN4PbB+OD0EKbkkBJ7x425 +w8zhw6L1Cmc9lBxWgNz30cyhEpSfrJUcXmRpf5v+1wwaHgg+ON+tVIDzwfEi +Lwjnlywv2fCvnwdu3navDRZzfnLD7Vt+a/ljw8PccPdA0i+Cf7B7X5NJMqdD +j9crFpOFZg5N4rWsmW2ccPPA9s/khIRXljmcD46fRwj+LVD4m1rA9T8HuW+v +Bdx8GB9mPzi9+VnA3XegVtYi/Yk53P2w9AzzH4wP8z96+QQAjSwZ1w== + "]]}, { + + Thickness[0.03519887363604365]}, StripOnInput -> False]}, { + ImageSize -> {42.61373349937733, 24.508064757160646`}, + ImageSize -> {28.409155666251557`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {29., 17.}, PlotRange -> {{0., 28.41}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-0.4315575966077358, 1.434397244340441}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["5", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #5}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.285821, 0.56, 0.450773], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.19054733333333335`, 0.3733333333333334, + 0.30051533333333336`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.285821`", ",", "0.56`", ",", "0.450773`"}], + "]"}], 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.285821, 0.56, 0.450773]; + 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.285821, 0.56, 0.450773], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm], ",", + TagBox[#5, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.801392711440703*^9, 3.801392763036476*^9, 3.801392825892982*^9, { + 3.8013932176407757`*^9, 3.801393224653185*^9}, 3.801393337558785*^9, + 3.801393944356008*^9, 3.803116130927299*^9}, + CellLabel->"Out[44]=",ExpressionUUID->"7d983109-7364-405f-92e5-1b8ccd1bf9ee"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{ + RowBox[{"rHn\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "20", ",", "5"}], "]"}], "//", "N"}], ",", + "\[Epsilon]"}], "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.8013932659639072`*^9, 3.801393283928433*^9}, { + 3.801393899430642*^9, 3.801393914820016*^9}, {3.801393958857519*^9, + 3.801393979345606*^9}, {3.803115670423841*^9, 3.8031156708449507`*^9}, { + 3.803118965586927*^9, 3.803118980847437*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"de60fc66-4d0e-4b01-8e5c-8d41c70264c7"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 49, 13, + 22576737602214712238, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801393292211431*^9, {3.801393900318907*^9, 3.8013939152297697`*^9}, { + 3.801393961018279*^9, 3.801393979652046*^9}, 3.803115551464966*^9, + 3.803115676157612*^9, {3.803118966378538*^9, 3.803118981273139*^9}, + 3.803183003076955*^9}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"b0ea24e1-def0-47cf-b838-b7a0fc7e00b6"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 49, 14, + 22576737602214712238, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801393292211431*^9, {3.801393900318907*^9, 3.8013939152297697`*^9}, { + 3.801393961018279*^9, 3.801393979652046*^9}, 3.803115551464966*^9, + 3.803115676157612*^9, {3.803118966378538*^9, 3.803118981273139*^9}, + 3.803183003522256*^9}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"596bf8cc-7717-4778-9008-12d681ebd026"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"1\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 49, 15, + 22576737602214712238, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801393292211431*^9, {3.801393900318907*^9, 3.8013939152297697`*^9}, { + 3.801393961018279*^9, 3.801393979652046*^9}, 3.803115551464966*^9, + 3.803115676157612*^9, {3.803118966378538*^9, 3.803118981273139*^9}, + 3.803183004081748*^9}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"6a8d687b-6bd6-4b6b-b307-c7e540e81b09"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"phy\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 49, 16, 22576737602214712238, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801393292211431*^9, {3.801393900318907*^9, 3.8013939152297697`*^9}, { + 3.801393961018279*^9, 3.801393979652046*^9}, 3.803115551464966*^9, + 3.803115676157612*^9, {3.803118966378538*^9, 3.803118981273139*^9}, + 3.8031830044995728`*^9}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"bc8ace42-d1af-4e54-9707-85f5b1f8a17b"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.00017250251984126988`\\\", \\\"\[VeryThinSpace]\ +\\\"}], \\\"-\\\", RowBox[{\\\"0.005136306679894181`\\\", \\\" \\\", \\\"\ +\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"0.059282272486772494`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.3338215608465609`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"0.9212698412698413`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"5\\\"]}], \\\"-\\\", RowBox[{\\\"0.0005001552299166868`\\\", \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"0.011970620184012196`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\ +\\\"0.10391239360703208`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"0.39069507387224245`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"0.5394890842931176`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"], \\\" \\\", \\\"\[Lambda]\ +\\\"}], \\\"+\\\", RowBox[{\\\"0.0005687696448465091`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.010267880591148637`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\ +\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.05962375561124792`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"0.1123091077194997`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.00031560994595962065`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.0038248197135020996`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.011151760407902802`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"0.00008485273234601809`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.0005186237680972388`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"8.741516042573934`*^-6\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"5\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"0.005136306679894181`\\\"}], \\\"+\\\", \ +RowBox[{\\\"0.11856454497354499`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"1.0014646825396827`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"14\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\"}], \\\"-\ +\\\", RowBox[{\\\"0.022303520815805604`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.0005186237680972388`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"4\\\"]}]}]}], \\\"}\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 51, 17, + 22576737602214712238, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.801393292211431*^9, {3.801393900318907*^9, 3.8013939152297697`*^9}, { + 3.801393961018279*^9, 3.801393979652046*^9}, 3.803115551464966*^9, + 3.803115676157612*^9, {3.803118966378538*^9, 3.803118981273139*^9}, + 3.803183004911385*^9}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"9c0d067a-3b9d-4c85-b599-0e5b39b03ef1"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], CompressedData[" +1:eJxTTMoPSmVmYGAQAWJGIGYC4st3f+xKOfPb/mTDy4Wzlvzdj8a3r/eff8r9 ++Gf7eguTizuif+xH49sH3jc0lzr72V5ewq2sxPPTfjS+fdWj6JwrCt/sl4sW +SRRdvrEfjW/PHlFhZhH8xv7ltSDF9vIv+9H49ntMV7PLsX2x/7D7X73dt8v7 +0fj2an6973lmfrT/7nPFvND/3H40vr2OnkQz07LL9pwKGyUcAh/uR+Pbq+0r +27EqpNz+6N6fqlFcL/aj8e3LTiXv8ZQ9ZC94U25BxKwn+9H49gDAEqNY + "]]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.8013932939579983`*^9, {3.801393901874902*^9, 3.801393916504356*^9}, { + 3.801393962306031*^9, 3.801393980910924*^9}, 3.803115553895935*^9, + 3.803115678531164*^9, {3.803118968871187*^9, 3.803118983532702*^9}, + 3.803183005841505*^9}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"132345e5-b8de-44f3-8827-dc7b1a649e34"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"PlotRcv", "[", "n_", "]"}], ":=", + RowBox[{"Module", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"HMP", ",", "H"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"HMP", "[", "R_", "]"}], ":=", " ", + RowBox[{"HRMPn", "[", + RowBox[{"R", ",", "n"}], "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"H", "[", "R_", "]"}], ":=", + RowBox[{"rHn", "[", + RowBox[{"R", ",", "n"}], "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"H\[Lambda]", "[", + RowBox[{"R_", ",", "\[Lambda]_"}], "]"}], ":=", + RowBox[{ + RowBox[{"HMP", "[", "R", "]"}], "+", + RowBox[{"\[Lambda]", + RowBox[{"(", + RowBox[{ + RowBox[{"H", "[", "R", "]"}], "-", + RowBox[{"HMP", "[", "R", "]"}]}], ")"}]}]}]}], ";", + "\[IndentingNewLine]", + RowBox[{"ListR", "=", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"Rcv", "[", + RowBox[{"H\[Lambda]", ",", "R"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"logspace", "[", + RowBox[{"0", ",", "3", ",", "100"}], "]"}]}], "}"}]}], "]"}]}], + ";", "\[IndentingNewLine]", + RowBox[{"ListLogLinearPlot", "[", "ListR", "]"}]}]}], + "\[IndentingNewLine]", "]"}]}]], "Input", + CellChangeTimes->{{3.80318301278955*^9, 3.8031830151190987`*^9}, { + 3.803186451793786*^9, 3.8031864663897467`*^9}, {3.8031865388666*^9, + 3.803186571583144*^9}, {3.803186604106305*^9, 3.803186606545961*^9}, { + 3.803186644036261*^9, 3.8031868002170763`*^9}, 3.803187192946789*^9, { + 3.803187544648868*^9, 3.803187577967966*^9}, {3.803187638963188*^9, + 3.803187642109646*^9}, {3.803187701319284*^9, 3.803187707372258*^9}, + 3.803187784218337*^9, {3.803187825841313*^9, 3.803187828909544*^9}, + 3.803187903428293*^9, {3.803187948047488*^9, 3.803188018671924*^9}, { + 3.8031880766353607`*^9, 3.803188083526642*^9}, {3.803189377932851*^9, + 3.803189431637781*^9}, {3.803189466628723*^9, 3.8031894671156473`*^9}, { + 3.803189502544142*^9, 3.803189519753605*^9}}, + CellLabel->"In[45]:=",ExpressionUUID->"6d7a4316-2c80-4771-8862-68b30d4db3da"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"logspace", "[", + RowBox[{"a_", ",", "b_", ",", "n_"}], "]"}], ":=", + RowBox[{"10.0", "^", + RowBox[{"Range", "[", + RowBox[{"a", ",", "b", ",", + RowBox[{ + RowBox[{"(", + RowBox[{"b", "-", "a"}], ")"}], "/", + RowBox[{"(", + RowBox[{"n", "-", "1"}], ")"}]}]}], "]"}]}]}]], "Input", + CellLabel->"In[40]:=",ExpressionUUID->"3e443d05-9a6c-4216-a9c1-f5f84c47a28b"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"H_", ",", "R_"}], "]"}], ":=", + RowBox[{"Module", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "\[Epsilon]", ",", "\[Lambda]EP"}], "}"}], ",", + "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{ + RowBox[{"H", "[", + RowBox[{"R", ",", "\[Lambda]"}], "]"}], "//", "N"}], ",", + "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}], ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], ";", + "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], ";", + "\[IndentingNewLine]", + RowBox[{"Return", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Lambda]EP", "//", "Abs"}], "//", "Sort"}], "//", "First"}], + "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", + CellChangeTimes->{{3.803187834494131*^9, 3.803187932850692*^9}, { + 3.803188025280284*^9, 3.803188035686943*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"12425906-d272-4c01-8978-5fa95816e4d7"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"PlotRcv", "[", "2", "]"}]], "Input", + CellChangeTimes->{{3.80318943766405*^9, 3.8031894450509*^9}, { + 3.803197310183666*^9, 3.80319731093556*^9}, {3.803197422743416*^9, + 3.8031974485278378`*^9}}, + CellLabel->"In[49]:=",ExpressionUUID->"c270935e-bf41-4889-92b0-890cbeb91ffb"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 49, 41, + 22576772428179912543, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.803197448906414*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"0d0c57e7-d224-4f62-8cbe-26fd1f219bf6"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", RowBox[{\\\"-\\\", \ +\\\"1\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 49, 42, + 22576772428179912543, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.8031974493395767`*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"1d06285b-ef7f-497d-b871-df258f4b080c"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "phy", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"1\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not physical.\"", 2, 49, 43, + 22576772428179912543, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.803197449835347*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"1a3a04e5-c8d8-4a98-8958-77cb2fe3d7e9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"phy\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 49, 44, 22576772428179912543, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.803197450283433*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"3105f5d9-c9e6-4409-b594-d4b752a32bd3"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"10.666666666666668`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"7.333333333333334`\\\", \\\ +\" \\\", \\\"\[Epsilon]$160221\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\ +\", SuperscriptBox[\\\"\[Epsilon]$160221\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"9.680000000000001`\\\", \\\" \\\", \\\"\[Lambda]$160221\\\"}], \\\ +\"+\\\", RowBox[{\\\"3.173333333333334`\\\", \\\" \\\", \\\"\[Epsilon]$160221\ +\\\", \\\" \\\", \\\"\[Lambda]$160221\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.0622222222222226`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]$160221\\\", \\\"2\\\"]}]}], \\\",\\\", \ +RowBox[{RowBox[{\\\"-\\\", \\\"7.333333333333334`\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.`\\\", \\\" \\\", \\\"\[Epsilon]$160221\\\"}], \\\"+\\\", \ +RowBox[{\\\"3.173333333333334`\\\", \\\" \\\", \ +\\\"\[Lambda]$160221\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 49, 45, 22576772428179912543, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.803197450702577*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"74ddf5be-6561-47fc-8806-899e1173baf5"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"9.042850007277302`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"6.713382521946072`\\\", \\\ +\" \\\", \\\"\[Epsilon]$160318\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\ +\", SuperscriptBox[\\\"\[Epsilon]$160318\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"8.30193400168395`\\\", \\\" \\\", \\\"\[Lambda]$160318\\\"}], \ +\\\"+\\\", RowBox[{\\\"2.959461287442751`\\\", \\\" \\\", \ +\\\"\[Epsilon]$160318\\\", \\\" \\\", \\\"\[Lambda]$160318\\\"}], \\\"+\\\", \ +RowBox[{\\\"1.7936157209540065`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]$160318\\\", \\\"2\\\"]}]}], \\\",\\\", \ +RowBox[{RowBox[{\\\"-\\\", \\\"6.713382521946072`\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.`\\\", \\\" \\\", \\\"\[Epsilon]$160318\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.959461287442751`\\\", \\\" \\\", \ +\\\"\[Lambda]$160318\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 49, 46, 22576772428179912543, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.803197451084194*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"3818b43e-06ea-45c9-b17e-b9fcc60b36eb"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"7.6748217489944635`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"6.151588002404102`\\\", \\\ +\" \\\", \\\"\[Epsilon]$160405\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\ +\", SuperscriptBox[\\\"\[Epsilon]$160405\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"7.1255048049346845`\\\", \\\" \\\", \\\"\[Lambda]$160405\\\"}], \ +\\\"+\\\", RowBox[{\\\"2.760003501640432`\\\", \\\" \\\", \ +\\\"\[Epsilon]$160405\\\", \\\" \\\", \\\"\[Lambda]$160405\\\"}], \\\"+\\\", \ +RowBox[{\\\"1.5599954843793231`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]$160405\\\", \\\"2\\\"]}]}], \\\",\\\", \ +RowBox[{RowBox[{\\\"-\\\", \\\"6.151588002404102`\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.`\\\", \\\" \\\", \\\"\[Epsilon]$160405\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.760003501640432`\\\", \\\" \\\", \ +\\\"\[Lambda]$160405\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 49, 47, 22576772428179912543, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.803197451598008*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"09d26c5f-a751-471a-aa1f-d470df8184a5"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 49, 48, 22576772428179912543, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.803189446110682*^9, 3.803189472352929*^9}, + 3.803189523181827*^9, 3.803197311808399*^9, {3.8031974235197897`*^9, + 3.803197452050694*^9}}, + CellLabel-> + "During evaluation of \ +In[49]:=",ExpressionUUID->"b9021d77-882f-4879-a669-ca24b904c179"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], + AbsoluteThickness[1.6], PointBox[CompressedData[" +1:eJw1kwk0lWkYx69ry+5e173XUklaxUnaF89zLLk03FJNxZzsRRtOi4a0hzRi +SMh0GnXbRIjKlizTEDNKZUnFUZIM3u9esi9j9M53zne+857vXZ7n9/+9s7wC +XHzZLBbLZ/L97/v/4zZ4QvFOmTz612d6VL/PhrQ5lxYJ+9noPTUuhaiuuOJN +K9gYX6rMsaiugvgr4e93nZOj/2tBXpyY+XMLC0er360c31wPkfsDtxTasuj8 +JvDruvSgzm8CFj22/Opt3QK8NZlX7riNg9fU+lbocq0pueYxBua1z/7yEbaB +uEU8+/SRUfi+XzvEB6u8Nf1tBCr/lEoSYzogL1d885eXw3Bpav9OWC85K7nF +HQb3oulhVUrdECwfoRXtOQRmU+cRcHYJ5nkXDcJooyRtvJiB2HSvclfjQXq+ +FG4Ijmnkxg3A89cF/KRhGYxPl9QVqg/QevogxIjHqY7ph4Sal6ctln8Dv3b+ +gJ1BP4xM1dcPhoVVVin3v4Hn8/aeqqABKP8y7G/j8A0qpuodBJW75oYlnX1g +/seoq0/GEHwY1Q9Lieuj9Q9D9OsHN3djHwwXcyvGOkbg5oEZguLeXvCY6mcM +kjlkNaT3QkX+fMtEk3EwSiP//OrfS3lOQGzdmJK3aS84uF4TCxez8Ow9D3lf +qYz2y0JnDcM4caEMsralKX52ksMkUmHTEimj/cth39LQpXU7ZMDf+rAwey8b +b6Hnk34zGVRO8WAjOZZkqqEog1CXkqDj5+XxrmQ89HOzlPJRwLCKBIONhVJo +FVfP23BbAbfkLUk3uiKlvBQxTbrwb7NQKYic6j8Inini4d6iLxt3Sik/JdSr +lI372kjhvmNrfNtHJbyaXXZ6w0Ip5amMj9WWz/3IlQJP1OWQzZqGp5Z65amP +MZTvNFz2hs3K6mAgxG5gImyGCvrMjEx+UMdQ3ioYXnagYbScgVZr9iPHtaqY +OpYvOZrDUP6qKDLa68+RMGCPGvsErmr4E+cNk5PA0DzU8GmzZJNzJAMZ64TG +bcHqmHr0csOLUIbmo4GXn17umR/IgM6a2Y1ZCRoY0+OmtcGXoXlp4oK59hnz +3SbrW2l+MSxHEyH8xJyHmxjqpxY2li7ObBMx0LJsla1jrRaejXr7QzoyNE9t +PHQysVhuFQM39IzDLgRrY0Gs++F3FgzNVxvNXnMjFpsy8GPSvMYgJQ4WqHre +GDRhaN4c7O/ao7JoJgMqAjPL7QkcjLIRHC/XY+D7/eWgWZOmTR6PgaKEJRet +TLiYMrxZU0GboT5wsWFkDztVjYEA3sqvJjlcPGqgevu8MkP94GLTOfuPefIM +GMevs1Wz1kGxyjrZAhZDfdHBq1qWNVlDBOo4NtekL3Uw5pTFmpO9hPrDw0CD +hwcLuglExoqGG9x5OGg31257B6E+8bD1tuGQyycCa7Wctxb38LAknOUkaSbU +L10cvbh2z/omAiR6c5YkTBfPiPqbLesJ9U0X7U1sE3e/InBdfYfaBXU+utxr +rH9fQ6h/fLTt1LeMqSaw9cLOXUEpfOx8IokOqSTURz4emWWklfKMwDRVn9Jt +CwUIgjDj7jJC/RSg9vKQwP0lBAoj/Q2t8gXobhvyTlhMqK9C5OemhnYVEtiv +HBBsIhJiwpwVKZ/zCfVXiLr7rHPk8ggYhR96pdogRK9mXz+rR4T6rIfBSj0R +ybmT/BRCzKS+ehigwFPk5BDqtx5+WR3Qfz2bQMSZE5ENfXrYw4uPd8oi1Hd9 +rOyqW6KVSWA1+9ynJ2f00dHJyr49g1D/J8eD8Ttr0wl0n4yyknANUOIQN/PF +PULvgwEefLRK1JxG4PeJmOSoVAN02WiVPnaXwL+M6gs6 + "]]}, { + {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], + AbsoluteThickness[1.6]}, {}}, { + {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.009166666666666668], + AbsoluteThickness[1.6]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{-0.29082129429742515`, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, { + Charting`ScaledTicks[{Log, Exp}], + Charting`ScaledFrameTicks[{Log, Exp}]}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-0.29082129429742515`, 6.907755278982137}, { + 0, 2.4700470380476367`}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.05]}}, + Ticks->FrontEndValueCache[{ + Charting`ScaledTicks[{Log, Exp}], Automatic}, {{{0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {6.214608098422191, + FormBox["500", TraditionalForm], {0.01, 0.}}, {6.907755278982137, + FormBox["1000", TraditionalForm], {0.01, 0.}}, {-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.551080335043404, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.684611727667927, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.802394763324311, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 7.600902459542082, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.006367567650246, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.294049640102028, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.517193191416238, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.699514748210191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 8.85366542803745, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}, + Automatic}]]], "Output", + CellChangeTimes->{{3.803189449581337*^9, 3.8031894757897778`*^9}, + 3.8031895266426764`*^9, 3.8031973214761066`*^9, {3.8031974369838257`*^9, + 3.8031974524785433`*^9}}, + CellLabel->"Out[49]=",ExpressionUUID->"2b80e58f-428c-4563-b503-1558690ae93e"] +}, Open ]] +}, Closed]], + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.803875792099679*^9, + 3.803875792360742*^9}},ExpressionUUID->"bccf1217-df55-4d3f-a67f-\ +f220fd9b7c14"] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["\[OpenCurlyDoubleQuote]Final\[CloseCurlyDoubleQuote] results", "Section", + CellChangeTimes->{{3.801210099461481*^9, + 3.8012101123251123`*^9}},ExpressionUUID->"173cbd31-c127-462a-9060-\ +7967130c2bb1"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.801210454651154*^9, + 3.8012104550781*^9}},ExpressionUUID->"e3f42931-0815-408b-ac8f-320ff914f89c"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801211576232717*^9, 3.801211576653942*^9}}, + CellLabel-> + "In[139]:=",ExpressionUUID->"009622ee-4830-442a-b200-65a7f8cf4413"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{}, {}, + TagBox[{ + RGBColor[0.9, 0.36, 0.054], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8BCyrWfqqoMQBT7GiY7 +/AfAYqe8bieoDEDERqVcdvgHwIKEwz2kpQxAJt65yezwB8DEPtHbnaAMQOoM +46PZ4QfARrPsF5GWDEBwajVYs8MHwEqcI5B3ggxAfiXawGaHB8BUbpGARFoM +QJqbI5LNDgfAZhJtYd4JDECf34hvUQkGwBWVsJ+LWwtAFtBTTykVBcC5iuI0 +xrgKQMhQU0TLJQTAheCMLTIZCkBIKSV0IyIDwNpww6IXbAlAOq5cps8vAsAm +dOhuisoIQPqKZhMyKQHA/LGZt3YbCED196SVXicAwPhPw2OUbwdAxCKSNL5t +/r/sYNtmP88GQDsFf7MrZPy/aax/5mMhBkCUQDc3QX36v9xqEr0VfwVAY5xY +5eqf+L92iR33+N8EQM+nHgkBmva/muK0rVUzBEAeDLAxv7b0v7SuOrs/kgNA +CiDmz+mq8r9YtUxFo+MCQGxUhZioqPC/JBzXMjg4AkBgw9/LHpLtv+X1T3da +mAFAIj3+UcWB6b8wClU49uoAQKlos+G7tuW/cZFIUB9JAEBq87Fci5rhv3im +kMmDM/8/Ln4FWQYj279d6oC5K9v9PxN51AuWm9O/LRROV+6Z/D/XZGwqr+PG +vxGzM+6jPfs/d3oqjsmVrr/iN/YydPj5P6qPOECkMK0/AX2pPqe5+D+OaYHW +YILHPzQ3dUPNX/c/DfRMO6xR0z9S1x32DR32P+B0xjR2hNs/hezeoUG/9D/u +uU3Cd8jhPwbCkBTYZ/M/poehYGSJ5T9zfR81iSfyPyX2qxN4m+k/9K3GTi3M +8D/esh+9O2jtP8GIlSzYD+8/VZfgiOuQ8D85Nn9JG5TsP56ljL1MlvI/2M2Z +WETi6T8EW23tBXn0P1AxbsOiXuc/zmCpp1KE9j/tfnMg56TkP7UNGl33bPg/ +ZJgy2WAZ4j8mmiHoB0z6P/Bkpj9ANd8/+naE/atT/D9lbUmxisvZP+v6Gw6o +OP4/jQ1g2j++1D+gZ4fUGyMAQAAEsc+Bic4/kEHMjBklAUBV7ycimsnDPw5v +q0LDFQJAKhQMxw+Fsz++RLi9thoDQFUpgyUpz4G//W1fNlYOBEDAf54yL4e2 +vwEH0pkr/QRAtUrAaCY3xb82SHLCSgAGQHXWtreOAdC/+tys6BXyBkDg75mD +HwvVv0RsyJBN9gZAwJbXrp0h1b+N++M4hfoGQJo9FdobONW/IBobifQCB0BV +i5AwGGXVv0dXiSnTEwdA0CaH3RC/1b+U0WVqkDUHQMBddDcCc9a/LsYe7Ap5 +B0Cgy07r5NrXv3hVOpRCfQdAgHKMFmPx17/B5FU8eoEHQFoZykHhB9i/VAON +jOmJB0AVZ0WY3TTYv3tA+yzImgdAkAI8RdaO2L/IutdthbwHQIA5KZ/HQtm/ +EkrzFb3AB0Bg4GbKRVnZv1zZDr70xAdAQIek9cNv2b/v90UOZM0HQPrUH0zA +nNm/FjW0rkLeB0B1cBb5uPbZv2DEz1Z64gdAVRdUJDcN2r+pU+v+seYHQDC+ +kU+1I9q/PHIiTyHvB0DqCw2msVDav4YBPvdY8wdAyrJK0S9n2r/QkFmfkPcH +QKpZiPytfdq/GiB1R8j7B0CKAMYnLJTav2OvkO///wdAZacDU6qq2r91Nlis + + "]]}, Annotation[#, "Charting`Private`Tag$96245#1"]& ], + TagBox[{ + RGBColor[0.365248, 0.427802, 0.758297], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8AGrR1NVVUSQBT7GiY7 +/AfA39Ji6HJTEkDERqVcdvgHwLf4p4OQURJAJt65yezwB8BoRDK6y00SQOoM +46PZ4QfAyttGJ0JGEkBwajVYs8MHwI0KcAEvNxJAfiXawGaHB8AUaMK1CBkS +QJqbI5LNDgfAIiNnHrzcEUCf34hvUQkGwCTFGQ3+WRFAFtBTTykVBcBgPf/8 +6d8QQMhQU0TLJQTAuf1+9zpoEEBIKSV0IyIDwPLTzx7OzA9AOq5cps8vAsDl +WAdRetoOQPqKZhMyKQHApTURvtzTDUD196SVXicAwKCiT0AJ0gxAxCKSNL5t +/r8NvPPEieELQDsFf7MrZPy/SC1qhMDcCkCUQDc3QX36v/VKRkZL6QlAY5xY +5eqf+L/c+FYdoPoIQM+nHgkBmva/kv45L6v3B0AeDLAxv7b0v7mwgkMKBgdA +CiDmz+mq8r+wup2SHwAGQGxUhZioqPC/4FTt9v7+BEBgw9/LHpLtv4Kbol0y +DwRAIj3+UcWB6b/zOSr/GwsDQKlos+G7tuW/1YQXo1kYAkBq87Fci5rhv4Un +14FNEQFALn4FWQYj279wWst1Cw8AQBN51AuWm9O/mnNK2Do8/j/XZGwqr+PG +v/DhojrLMfw/d3oqjsmVrr8pqcahA0r6P6qPOECkMK0/2JBTM9Br+D+OaYHW +YILHPyQohToJZfY/DfRMO6xR0z9SGIJG6oD0P+B0xjR2hNs/HbgjyDd08j/u +uU3Cd8jhP154LnQZcfA/poehYGSJ5T8FIwlKRiHtPyX2qxN4m+k/hbT+ljIP +6T/esh+9O2jtP833iu1uQuU/VZfgiOuQ8D8AfOmY04jhP56ljL1MlvI/3b4i +XyL82j8EW23tBXn0P0Xpn589cdM/zmCpp1KE9j9ApF9tFYjGP7UNGl33bPg/ +APRoB78LrT8mmiHoB0z6PwCaiFlS1q6/+naE/atT/D8qDXlBtfLHv+v6Gw6o +OP4/VZYa40qN07+gZ4fUGyMAQKrn5U6Jw9u/kEHMjBklAUCVW4aIu+nhvw5v +q0LDFQJAjREDYGKs5b++RLi9thoDQE1oNkwwwOm//W1fNlYOBEBKDdMuro7t +vwEH0pkr/QRArbhO3gGl8L82SHLCSgAGQBU7jy9Aq/K/+tys6BXyBkCgZAR8 +1o70v0RsyJBN9gZAMoM7zEWX9L+N++M4hfoGQMWhchy1n/S/IBobifQCB0Dq +3uC8k7D0v0dXiSnTEwdAOFm9/VDS9L+U0WVqkDUHQNJNdn/LFfW/LsYe7Ap5 +B0AFN+iCwJz1v3hVOpRCfQdAmlUf0y+l9b/B5FU8eoEHQC10ViOfrfW/VAON +jOmJB0BSscTDfb71v3tA+yzImgdAoCuhBDvg9b/IutdthbwHQDogWoa1I/a/ +EkrzFb3AB0DQPpHWJCz2v1zZDr70xAdAYl3IJpQ09r/v90UOZM0HQIiaNsdy +Rfa/FjW0rkLeB0DVFBMIMGf2v2DEz1Z64gdAajNKWJ9v9r+pU+v+seYHQP1R +gagOePa/PHIiTyHvB0Aij+9I7Yj2v4YBPvdY8wdAta0mmVyR9r/QkFmfkPcH +QErMXenLmfa/GiB1R8j7B0Dg6pQ5O6L2v2OvkO///wdAcAnMiaqq9r+HaFrD + + "]]}, Annotation[#, "Charting`Private`Tag$96245#2"]& ], + TagBox[{ + RGBColor[0.945109, 0.593901, 0.], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8CCa6+O4lUDQBT7GiY7 +/AfAnQ2J8yRUA0DERqVcdvgHwC3vOFdnUgNAJt65yezwB8BVBxob7E4DQOoM +46PZ4QfAXaLXlPVHA0BwajVYs8MHwFvA8E8IOgNAfiXawGaHB8BP8RTiLB4D +QJqbI5LNDgfAYJ57YXLmAkCf34hvUQkGwJeKrtSLbQJAFtBTTykVBcCogFso +kfwBQMhQU0TLJQTAL4DXO7aNAUBIKSV0IyIDwAjrTjZZFQFAOq5cps8vAsDn +m/MF56QAQPqKZhMyKQHAvD3nh+cqAED196SVXicAwD5Gkrj0Zf8/xCKSNL5t +/r+Cx+DP64X+PzsFf7MrZPy/QQodWJ+S/T+UQDc3QX36v9sl61gcr/w/Y5xY +5eqf+L8acQQKrs/7P8+nHgkBmva/inodWsPc+j8eDLAxv7b0v8aDM2WV+fk/ +CiDmz+mq8r86Dm9hsQL5P2xUhZioqPC/6nF/h5YP+D9gw9/LHpLtv48remEg +LPc/Ij3+UcWB6b8+N2+cfzT2P6los+G7tuW/BzA0cGBM9T9q87Fci5rhv2Nm +zdmaT/Q/Ln4FWQYj27+JXVs+9lXzPxN51AuWm9O/jfI/GYdr8j/XZGwqr+PG +v5E6VNtea/E/d3oqjsmVrr8SZLupAHrwP6qPOECkMK0/BD3SytMV7z+OaYHW +YILHP9T/Yat1CO0/DfRMO6xR0z9KBWe6rhbrP+B0xjR2hNs/poHS3ijx6D/u +uU3Cd8jhPy6SDQQpyeY/poehYGSJ5T9GHzCUd7jkPyX2qxN4m+k/Ht0wGGVo +4j/esh+9O2jtPzzJH6X+KeA/VZfgiOuQ8D9lYXp1/LvbP56ljL1MlvI/NN/P +3p981j8EW23tBXn0P1HPTIkSTdE/zmCpp1KE9j/u3f/TIqTGP7UNGl33bPg/ +QV0frq59tT8mmiHoB0z6P8DAuCzDyIm/+naE/atT/D+5tq/vF4a/v+v6Gw6o +OP4/Ete4kF2bzb+gZ4fUGyMAQORhf/xIm9a/kEHMjBklAUB/EDOx24Xevw5v +q0LDFQJAPyDnbhAM47++RLi9thoDQDDJb3MAPOe//W1fNlYOBEBjc77myTTr +vwEH0pkr/QRAQO7Chb8l7782SHLCSgAGQIwLouK+u/G/+tys6BXyBkBe6qj0 +5cPzv0RsyJBN9gZAf+j6rgDN87+N++M4hfoGQEQWNawb1vO/IBobifQCB0Ak +94NuUujzv0dXiSnTEwdAm6GFDMMM9L+U0WVqkDUHQBgamn6wVfS/LsYe7Ap5 +B0Bs0/fJuuf0v3hVOpRCfQdAvTu7ed3w9L/B5FU8eoEHQGzl22UA+vS/VAON +jOmJB0D363DyRgz1v3tA+yzImgdACduX19Yw9b/IutdthbwHQC4D5qcBevW/ +EkrzFb3AB0DYUuYGKIP1v1zZDr70xAdAnB9Jn06M9b/v90UOZM0HQJLWfXuc +nvW/FjW0rkLeB0BAH6PcOsP1v2DEz1Z64gdAdH21AWPM9b+pU+v+seYHQEEy +vl6L1fW/PHIiTyHvB0A81v+/3Of1v4YBPvdY8wdAy83fwwXx9b/QkFmfkPcH +QFUsBP8u+vW/GiB1R8j7B0BN4kBxWAP2v2OvkO///wdAHAtqGoIM9r99wW2X + + "]]}, Annotation[#, "Charting`Private`Tag$96245#3"]& ], + TagBox[{ + RGBColor[0.645957, 0.253192, 0.685109], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8BZ/uzG9gkWQBT7GiY7 +/AfAZd2zLtgHFkDERqVcdvgHwLecD5e5BRZAJt65yezwB8DXcIZpfAEWQOoM +46PZ4QfAvGN2FQL5FUBwajVYs8MHwItVh4kN6BVAfiXawGaHB8CyPrDjJMYV +QJqbI5LNDgfAZ+tyalWCFUCf34hvUQkGwLDLqdlW7xRAFtBTTykVBcCwU5GU +IWYUQMhQU0TLJQTABTrRIKnfE0BIKSV0IyIDwJi6d1XZTRNAOq5cps8vAsDO +RHVb08USQPqKZhMyKQHAbqYvpHsyEkD196SVXicAwFfJ8nTnoRFAxCKSNL5t +/r9G6wAmHhsRQDsFf7MrZPy/vey3Vg2JEECUQDc3QX36v6IkOGXJABBAY5xY +5eqf+L9d58rxmfYOQM+nHgkBmva/KEZugS7VDUAeDLAxv7b0v1h+bitjxwxA +CiDmz+mq8r+3laQUQqMLQGxUhZioqPC/mwZwy9WECkBgw9/LHpLtv82lIaAV +eglAIj3+UcWB6b/Iux78OVkIQKlos+G7tuW/fTSPAxxMB0Bq87Fci5rhvzcu +3ncgKQZALn4FWQYj27+tjTLRLQwFQBN51AuWm9O/ffc25x4DBEDXZGwqr+PG +v5knbMG75AJAd3oqjsmVrr9BQFMNctoBQKqPOECkMK0/k9YWBZ7WAECOaYHW +YILHP2nyq7TKfP8/DfRMO6xR0z/sSKa3inX9P+B0xjR2hNs/mKN+n8hH+z/u +uU3Cd8jhP2zA7kt2Kvk/poehYGSJ5T+N0aGyeTj3PyX2qxN4m+k/5wn3Dswl +9T/esh+9O2jtP7Pdi1ZFQfM/VZfgiOuQ8D8TAMlevnLxP56ljL1MlvI/qGwh +jlkb7z8EW23tBXn0PyuFip1It+s/zmCpp1KE9j8cBftwLjjoP7UNGl33bPg/ +3YVuc+Ai5T8mmiHoB0z6P/bhGwN+SeI/+naE/atT/D/UBHABP8TeP+v6Gw6o +OP4/QWZtpV6q2T+gZ4fUGyMAQIg+Ym9pcNQ/kEHMjBklAUAhAMybbyDPPw5v +q0LDFQJAsBpYxlhnxj++RLi9thoDQGfrtEzWjLo//W1fNlYOBEDDqan8KgOk +PwEH0pkr/QRA7OGPiXZUl782SHLCSgAGQClcI8akq7a/+tys6BXyBkApeAnl +7g7Dv0RsyJBN9gZAavPH9Ckxw7+N++M4hfoGQGrxRO1iU8O/IBobifQCB0DX +wmqfzpfDv0dXiSnTEwdA+h+XOI0gxL+U0WVqkDUHQMa9ZrqoMcW/LsYe7Ap5 +B0B4tl+EZFLHv3hVOpRCfQdAMOCS6F90x7/B5FU8eoEHQMP+22lZlse/VAON +jOmJB0DbotDJRtrHv3tA+yzImgdAI9vSKQtiyL/IutdthbwHQLL71Lk7ccm/ +EkrzFb3AB0Ck6iCkGZPJv1zZDr70xAdAyvBYw/W0yb/v90UOZM0HQGoRUKao ++Mm/FjW0rkLeB0DbfF8m+X/Kv2DEz1Z64gdAePca4Mihyr+pU+v+seYHQD69 +I9qWw8q/PHIiTyHvB0DRdbOULQfLv4YBPvdY8wdAlyUCWPYoy7/QkFmfkPcH +QHidLWG9Ssu/GiB1R8j7B0D2WZaxgmzLv2OvkO///wdAsn+bSkaOy7/O8lpf + + "]]}, Annotation[#, "Charting`Private`Tag$96245#4"]& ]}, {}}, + AspectRatio -> 1, Axes -> {False, False}, AxesLabel -> {None, None}, + AxesOrigin -> {0, 0}, DisplayFunction -> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.03519887363604365], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {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}, { + 1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {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}, {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}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + + FilledCurveBox[{{{1, 4, 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}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJfIGYCYgOtlcIXnqg4OE9oFkr7peggMfUKZ0aTqkM4 +p1i7sbySwxkQ4FFzeOAa7zjLUMkhISRIfcFKBD8exO/UgPO9T7Dbzp6q6XBH +U3bN/2BFON99zdHlDDPk4fzUNCBwk3EA2++i4SC/a8G+VD0piH06aqh8HgT/ +19vXBywfq8L5HvtrZS2Wq0LMt5BymDGBv8qsW9VhR7BVxP/jkg6nDjutzdyn +6tAX0e3PGCDp8KZ4q+jv06oOVfd/3DLWloSYx6zmYAwCmyUcfC9OjPnnrObw +HwTkJRz+fit9MCdQzeFNW2630W9xhwtXw97oV6tB3NUjDqHPaDq0iNeyZrrx +OtT/tio490LTwQRsHo+DP8g8Zi0HmY1i85kUeKDmQvkLuCF8ey2H7V4bLOb8 +5HLYoJe3mDFGy8H/iecl02Auhy3mPw6ldGk5HOze12SSzOnwB+TeZG2HmWAA +5IPcNxHBB9t3GMFfr/qked5b3HyZeXGapwV04ebD+BD/cTtMaW+Nulyj47D8 +1vLHhoe5If4y1oHSPA4tLEf7Db9rO7yofZx9PofXQXb5Cw+9++pQ8yQdzGz2 +Bk17qOEgUjmp5OwTSYi9kZoO6p9UXs7ylIK4/6Omw3ohHb50OWkHc7B6LQcD +kPHFMnD/hry9/HGGoxycfxqcThTgfHD8v1CEh+/Kby8rzjxQgqYXdTgf4m8E +H+w+R1VI/F/G5IPT5xIVOB+cfrhx8/fk17yd2aoINx/GTwel9zAliDpnJYcP +i9YrnPVQcuCPDbhvJK7sUAlKj9ZKDmtB4aCnDMlPggg+2NkrFeB8iD8F4fyS +5SUb/vXzwM2DpCduuH2w+NsLck+qIjx+YXxY/IP5pUoOTaD03MYJNw+WXsD5 +jV0Fzk+JvePG/APBf5Gl/W36XFW4fhbOLvnkdWpw82F8mP1SoPR2QRXuvo2g +9P9HBe5+WPkE8x+MD/M/evkFAFuQG5I= + "]], + FilledCurveBox[{{{1, 4, 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}, {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}, {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, 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}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxdlFFIU2EUx6/Okos5yJDlfHBdGmXW3b3djYoovopKJAqKsh4SSs3sIaEm +lKwokx4s2Eth0pDIh8ti5oRCemhUIhhuWWggo3JQxCQGITUWZbbvjv/5oAPf +w49xz/mf/zlna053HG61SZJUlH9H8684/447Rt9Jdi9b4lGzkoH9pj/6N7iC +rb47I58t9rLRhujW0K8y1nLywz7bPYOZSfOzPlbG1mXKY1qtweI8bgt+eSvW +7W2W2WK2MxUaMVi348qy9psy5eu3QmZPtuRetXQJtn5fENwwUbrj/l4ffZ8+ +V5ftS/goPxj1/U8rf082+UiftiG86u0PoX891zcv+gOjf7BVPuwift4RyPRX +KpTv8lwuaWxXqN73h8OuRL1CetrO5OOY4HB2/lI8pbBkdeDUZrePGTymFeoX +DD/AsxULu6aWCw4e8a/tmzLY/si4Kc0q5Dfyg1Ef84I++A/9mDf6A6N/sJXv +q7PQz0eDRSo22ts+OQu+RwzW4yp1x2ec7PXY7qH2g4LNdL26pOvEg3Mxe2ha +I64eaKqdfKBRPgfXd0GjemDoAUPvCa7vqkb9lB8avtOa1qjf6yXjQb1RJz/A +8Mua32ON/B1Rzw8WBQRbem2CU9wQl4f4j7XfKs2jxxKwifKDUT+X+fZi2x6V +9F3jehwe0l8i99Y0qx7qD4z+wdhXMPYZ+bDvqId7gB7cCxj3dIDfW6dK94Z8 +uEf4AYZf4IvczzcafQ+/kR+M+pgX9GGe0I95oz8w+gd3cf/qqgr7FNXYEN+n +nVXs57Nk7+J7wdhHMPYV7P5yYyDxSDDuDYx7QL3//z//AckFQOg= + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {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, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {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}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnbpg7uK05upxhhoTDTBCQtHCouv/j +lvFqCYfiraK/T8dZOBiDwGYJh+tCnxzPH0Pw/34rfTCn0BLO/w8C6y3h5s0A +mXfT0kG4clLJWRcJhw16eYsZ31g6rBXS4UuPE3f4siEge9Z3S4cY1QiZczai +DmdAwMYKzvc5wW4729QKbh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/S0sIbSntcKRtefipR5YO6WlA8EwK7j+we+dIwf1vAgqPYCmHJ4kL +r5nkWzq4g9xrIQUJv2sWcP6Xnbe6/pYi+J9A7lG3gJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzgPCllCD63S0cwjnF2o3llSDmnEfwwfFpZ4kqvx8af8xK +Dh9A+tmh4XlP0aEErN4KIn9YEeJeVysH5WuPghnWIPjg8HVE8Pfm17ydKaoA +8e80TD7YvVqKDhJTr3BmLLKC+J9DycG+6dHxGbuh9l1Wcthi/uNQihc0vu4o +OdyQrkk0YrVyWPntZcWZB0oOy1946P1faAnnT5/AX2W22gKunstNtZTJygJu +nsZb3n0GL83h/AnBJSrT1yP4MQqOH5NzcPPB+iXN4PbB+OD0EKbkkBJ7x425 +w8zhw6L1Cmc9lBxWgNz30cyhEpSfrJUcXmRpf5v+1wwaHgg+ON+tVIDzwfEi +Lwjnlywv2fCvnwdu3navDRZzfnLD7Vt+a/ljw8PccPdA0i+Cf7B7X5NJMqdD +j9crFpOFZg5N4rWsmW2ccPPA9s/khIRXljmcD46fRwj+LVD4m1rA9T8HuW+v +Bdx8GB9mPzi9+VnA3XegVtYi/Yk53P2w9AzzH4wP8z96+QQAjSwZ1w== + "]]}, {{ + + Thickness[0.03519887363604365]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {42.61373349937733, 24.508064757160646`}, + ImageSize -> {28.409155666251557`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {29., 17.}, PlotRange -> {{0., 28.41}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, { + 0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, {{ + Thickness[0.10504201680672269`]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImagePadding -> All, + LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-1.4166665442176871`, 5.5097304422521}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}], + FormBox[ + FormBox[ + TemplateBox[{ + RowBox[{ + "Singly", " ", "excited", " ", "state", " ", "singlet", " ", + "antisymmetric"}], + RowBox[{ + "Singly", " ", "excited", " ", "state", " ", "triplet", " ", + "antisymmetric"}], + RowBox[{"Ground", " ", "state", " ", "singlet", " ", "symmetric"}], + RowBox[{ + "Doubly", " ", "excited", " ", "state", " ", "singlet", " ", + "symmetric"}]}, "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.801211645970536*^9}, + CellLabel-> + "Out[140]=",ExpressionUUID->"87967132-abd8-45b4-8f0f-ab2ec6c465a7"] +}, Open ]], + +Cell[BoxData[ + RowBox[{"Manipulate", "[", + RowBox[{ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "a"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"a", ",", "0.1", ",", "5"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.801210483962216*^9, 3.8012104932455072`*^9}, { + 3.801211026991571*^9, 3.801211027427289*^9}}, + CellLabel-> + "In[124]:=",ExpressionUUID->"742eca25-68e9-4ce6-96e0-a12b7d8f3b28"], + +Cell[BoxData[ + TagBox[ + StyleBox[ + DynamicModuleBox[{$CellContext`a$$ = 0.1, Typeset`show$$ = True, + Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", + Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = + "\"untitled\"", Typeset`specs$$ = {{ + Hold[$CellContext`a$$], 0.1, 5}}, Typeset`size$$ = {377., {157., 161.}}, + Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, + DynamicBox[Manipulate`ManipulateBoxes[ + 1, StandardForm, "Variables" :> {$CellContext`a$$ = 0.1}, + "ControllerVariables" :> {}, + "OtherVariables" :> { + Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, + Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, + Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$, + Typeset`skipInitDone$$}, "Body" :> + With[{$CellContext`R = $CellContext`a$$}, + Plot[ + Evaluate[ + $CellContext`\[Epsilon]RMP[$CellContext`\[Lambda], \ +$CellContext`R]], {$CellContext`\[Lambda], -3, 3}, FrameStyle -> + Directive[Thick, 18], PlotTheme -> "Scientific", PlotLegends -> + Automatic, FrameLabel -> { + MaTeX`MaTeX["\\lambda", Magnification -> 1.5], + MaTeX`MaTeX["E_\\text{RHF}", Magnification -> 1.5]}, AspectRatio -> + 1]], "Specifications" :> {{$CellContext`a$$, 0.1, 5}}, + "Options" :> {}, "DefaultOptions" :> {}], + ImageSizeCache->{419., {207.021484375, 211.978515625}}, + SingleEvaluation->True], + Deinitialization:>None, + DynamicModuleValues:>{}, + SynchronousInitialization->True, + UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$}, + UnsavedVariables:>{Typeset`initDone$$}, + UntrackedVariables:>{Typeset`size$$}], "Manipulate", + Deployed->True, + StripOnInput->False], + Manipulate`InterpretManipulate[1]]], "Input", + CellChangeTimes->{{3.8012111387497787`*^9, 3.801211207571199*^9}}, + CellLabel-> + "In[126]:=",ExpressionUUID->"83860d6a-5544-4b4b-b21c-6de5cb50c0a8"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"rH\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], + "]"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}], "\[IndentingNewLine]"}], "Input", + CellChangeTimes->{ + 3.800075353492262*^9, {3.800075384742434*^9, 3.8000753928634853`*^9}, { + 3.800075477990193*^9, 3.800075488034968*^9}, {3.80007553412252*^9, + 3.80007557313133*^9}, 3.800075630282379*^9, {3.8000785359721327`*^9, + 3.800078550363659*^9}, {3.800079878860845*^9, 3.800079879068116*^9}, { + 3.800079913573428*^9, 3.800079932229224*^9}, 3.800080497085393*^9, { + 3.800080577175806*^9, 3.800080592742565*^9}, {3.8001120586218023`*^9, + 3.80011205888498*^9}, {3.80011214840434*^9, 3.800112172686603*^9}, + 3.800157110714922*^9, 3.800157352192288*^9, {3.800159556196183*^9, + 3.800159556698868*^9}, {3.801211548346614*^9, 3.8012115629489822`*^9}, { + 3.8012119434146748`*^9, 3.8012119437605457`*^9}}, + CellLabel-> + "In[141]:=",ExpressionUUID->"f5f79e48-2029-49bb-aa63-97469a79ad25"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "1.5833333333333333333333333335335840699986123421940041218778`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "1.5833333333333333333333333335335840699986123421940041218778`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.4166666666666666666666666726589269223261691071005704937612`28.\ +774759733332708", "-", + RowBox[{ + "0.4308202184276645645698423057201801098487085208884055529663`28.\ +76102696707218", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "1.74999999999999999999999999085792893533`28.784762272906125", "+", + RowBox[{ + "0.6462303276414968468547634584671512897886638628086842989379`28.\ +742603532773224", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.4166666666666666666666666726589269223261691071005704937612`28.\ +774759733332708", "-", + RowBox[{ + "0.4308202184276645645698423057201801098487085208884055529663`28.\ +76102696707218", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "1.74999999999999999999999999085792893533`28.784762272906125", "+", + RowBox[{ + "0.6462303276414968468547634584671512897886638628086842989379`28.\ +742603532773224", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.4166666666666666666666666726589269223261691071005704937612`28.\ +774759733332708", "+", + RowBox[{ + "0.4308202184276645645698423057201801098487085208884055529663`28.\ +76102696707218", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "1.74999999999999999999999999085792893533`28.784762272906125", "-", + RowBox[{ + "0.6462303276414968468547634584671512897886638628086842989379`28.\ +742603532773224", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.4166666666666666666666666726589269223261691071005704937612`28.\ +774759733332708", "+", + RowBox[{ + "0.4308202184276645645698423057201801098487085208884055529663`28.\ +76102696707218", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "1.74999999999999999999999999085792893533`28.784762272906125", "-", + RowBox[{ + "0.6462303276414968468547634584671512897886638628086842989379`28.\ +742603532773224", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.3907002472992320708056748666031395400356262695589836123778`29.\ +222232409482263", "-", + RowBox[{ + "0.6776324352466484446179877651584253408083219996955954634667`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "1.5033190160093713393205778992372467453500220198851677249959`29.\ +397940008672037", "+", + RowBox[{ + "0.8541585318235064427957828972373437195313618307852516094028`29.\ +218913175720193", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "0.3907002472992320708056748666031395400356262695589836123778`29.\ +222232409482263", "+", + RowBox[{ + "0.6776324352466484446179877651584253408083219996955954634667`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "1.5033190160093713393205778992372467453500220198851677249959`29.\ +397940008672037", "-", + RowBox[{ + "0.8541585318235064427957828972373437195313618307852516094028`29.\ +218913175720193", " ", "\[ImaginaryI]"}]}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "0.1795217666049233347744686569633052750660580662597706409634`29.\ +397940008672037"}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "1.4038115667284099985588646763690435024501776767108728354592`29.\ +397940008672037"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "0.1795217666049233347744686569633052750660580662597706409634`29.\ +397940008672037"}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "1.4038115667284099985588646763690435024501776767108728354592`29.\ +397940008672037"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "1.8253550999382566681078019902946684892122151308568822134202`29.\ +397940008672037"}]}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "3.408688433271590001441135323628001823663926460750634125739`29.\ +397940008672037"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "1.8253550999382566681078019902946684892122151308568822134202`29.\ +397940008672037"}]}], ",", + RowBox[{ + "\[Lambda]", "\[Rule]", + "3.408688433271590001441135323628001823663926460750634125739`29.\ +397940008672037"}]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{ + 3.800157111485978*^9, 3.800159557622061*^9, {3.8012115573209352`*^9, + 3.801211563576037*^9}, 3.8012119465090513`*^9}, + CellLabel-> + "Out[143]=",ExpressionUUID->"d40f3b9f-7718-4422-abfb-1dfad4cda647"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{0., 0.}}, {{0., + 0.}}, {{1.75, 0.6462303276414968}}, {{1.75, 0.6462303276414968}}, {{ + 1.75, -0.6462303276414968}}, {{1.75, -0.6462303276414968}}, {{ + 1.5033190160093712`, 0.8541585318235064}}, {{ + 1.5033190160093712`, -0.8541585318235064}}, {{1.40381156672841, 0.}}, {{ + 1.40381156672841, 0.}}, {{3.40868843327159, 0.}}, {{3.40868843327159, + 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.8000799242414637`*^9, 3.800079932735375*^9}, + 3.800080497627037*^9, {3.800080578049032*^9, 3.800080593176303*^9}, + 3.8001120600105143`*^9, {3.800112149697216*^9, 3.800112173030253*^9}, + 3.800157112282282*^9, 3.8001595578133802`*^9, {3.801211558982279*^9, + 3.801211564228888*^9}, 3.801211948338863*^9}, + CellLabel-> + "During evaluation of \ +In[141]:=",ExpressionUUID->"2963daed-1d26-459e-8eef-fd5129978aa8"] +}, Open ]], + +Cell["\<\ +There are 12 singularities as expected, but we can\[CloseCurlyQuote]t give \ +them a physical signification for the moment. Let\[CloseCurlyQuote]s try to \ +do this for this simple case\ +\>", "Text", + CellChangeTimes->{{3.8001585199504757`*^9, + 3.800158580192855*^9}},ExpressionUUID->"8ffbe039-ac2d-4132-a285-\ +44b8607294f9"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158278610743*^9, 3.800158290872142*^9}, + 3.800158341741818*^9, {3.800158433517392*^9, 3.8001584377174377`*^9}}, + CellLabel->"In[57]:=",ExpressionUUID->"0fdcd118-4a43-49bd-af81-abcef7338c6f"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.5033190160093715`", "\[VeryThinSpace]", "-", + RowBox[{"0.8541585318235065`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.5033190160093715`", "\[VeryThinSpace]", "+", + RowBox[{"0.8541585318235065`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.8001582338106213`*^9, 3.8001582919267*^9, + 3.8001583424528513`*^9, 3.800158439888423*^9}, + CellLabel->"Out[57]=",ExpressionUUID->"78bc2235-21da-41e0-b1d1-6794aef9930e"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "1d24276f-1f84-4c87-b75f-2c313e449a83"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]],ExpressionUUID-> + "a2fa7471-0bb1-4059-a0b5-06c5a4d68603"] +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, + 3.800158635398328*^9}},ExpressionUUID->"5cf747c9-154e-4de0-ba9f-\ +92dc5a3b5d61"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8001584637379913`*^9, 3.800158464134795*^9}}, + CellLabel->"In[59]:=",ExpressionUUID->"5be0e74b-5200-495d-87c4-8c0c909fd56a"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "3.4086884332715903`"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "1.40381156672841`"}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.8001584644905357`*^9}, + CellLabel->"Out[59]=",ExpressionUUID->"e3925dfe-9a82-498f-918d-9774446931b1"] +}, Open ]], + +Cell[TextData[{ + "There are 2 CI between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "3dd36ecf-29e6-41e7-8aff-5ae10fc6c662"], + "and the ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]],ExpressionUUID-> + "d74ce85f-39c0-4bc9-b709-f1329abc955d"], + " triplet (x2 degen)" +}], "Text", + CellChangeTimes->{{3.800158662872758*^9, 3.800158703136058*^9}, { + 3.800158955325688*^9, 3.8001589561925917`*^9}, {3.800159692397304*^9, + 3.800159701502852*^9}, + 3.8001597753064337`*^9},ExpressionUUID->"f50d593e-2775-4983-87b0-\ +e971be4244f0"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "1"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158369960648*^9, 3.800158370393867*^9}, { + 3.800158408929471*^9, 3.800158409337016*^9}, {3.800158446099082*^9, + 3.80015845077838*^9}, {3.8012114754822483`*^9, 3.801211475852717*^9}}, + CellLabel-> + "In[127]:=",ExpressionUUID->"0456c932-e80f-4a41-b367-8f73a952075c"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800158371081614*^9, 3.800158409644907*^9, + 3.8001584513624277`*^9, 3.801211478913052*^9}, + CellLabel-> + "Out[127]=",ExpressionUUID->"27e7db5d-752f-455b-a620-71987a7da8ba"] +}, Open ]], + +Cell[TextData[{ + "The ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]],ExpressionUUID-> + "f75a4262-8f09-470c-bff1-caabf7140b82"], + " singlet is never degenerate with the ground state" +}], "Text", + CellChangeTimes->{{3.80015883203883*^9, 3.800158852480497*^9}, { + 3.800158963935526*^9, 3.800158964785277*^9}, {3.8001597693529873`*^9, + 3.800159771491109*^9}},ExpressionUUID->"8a160cc4-6695-4197-8963-\ +95c5f328042c"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.80015887242031*^9, 3.8001588727346163`*^9}}, + CellLabel->"In[60]:=",ExpressionUUID->"9c39bbdc-5856-4cf6-85e7-a5993f2e190b"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.75`", "\[VeryThinSpace]", "-", + RowBox[{"0.6462303276414967`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"1.75`", "\[VeryThinSpace]", "+", + RowBox[{"0.6462303276414967`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.800158873572803*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"45ae0504-7e6c-4a2a-85bb-458db9c7c39c"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]],ExpressionUUID-> + "b4420d49-5a73-436a-8908-88d0c50f1629"], + " and ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]],ExpressionUUID-> + "bc5ea049-af43-4bd5-93d8-0006b9bf469e"], + " singlet (x2 degen)" +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, 3.800158635398328*^9}, { + 3.800159734007469*^9, 3.8001597393953323`*^9}, {3.800159781544524*^9, + 3.800159796125751*^9}, {3.8012115008133373`*^9, + 3.80121151150954*^9}},ExpressionUUID->"3c3f1e40-312a-41df-988e-\ +17cd32481248"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158879878248*^9, 3.80015888237202*^9}}, + CellLabel->"In[61]:=",ExpressionUUID->"e1c85c2f-0fde-4663-9816-5b814acea2dc"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800158882705681*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"060a47a4-b836-4aa4-8f54-c396dc1bb879"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158986206258*^9, 3.800158995955509*^9}}, + CellLabel->"In[63]:=",ExpressionUUID->"60d2b83f-887d-4838-9bbf-f94bbb2c8d29"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "0.`"}], "}"}], "}"}]], "Output", + CellChangeTimes->{{3.800158989306931*^9, 3.8001589970199614`*^9}}, + CellLabel->"Out[63]=",ExpressionUUID->"3670b37e-e7eb-452c-b850-3078959b7b3c"] +}, Open ]], + +Cell[TextData[{ + "This is the avoided crossing between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "dbeb0ff0-ea2d-46bb-97c4-ad4c8491eec1"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]],ExpressionUUID-> + "61514107-d59e-4ef9-a5a6-4f1f0e24df82"], + " which dictates the convergence properties for the RHF reference." +}], "Text", + CellChangeTimes->{{3.801211965076249*^9, + 3.801212004220677*^9}},ExpressionUUID->"796e0419-001c-4efc-a560-\ +d5e6aa37e8da"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Solve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]RMP", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]], "Input", + CellChangeTimes->{{3.800161479443656*^9, 3.800161509105171*^9}}, + CellLabel-> + "In[153]:=",ExpressionUUID->"7f020f91-e91a-41f7-bdb8-0d7780d79000"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"88", "+", + FractionBox["132", "R"], "-", + FractionBox[ + RowBox[{"25", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "-", + RowBox[{"12", " ", "R"}], "-", + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]}]]}], "R"]}], ")"}]}], "2561"]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"88", "+", + FractionBox["132", "R"], "+", + FractionBox[ + RowBox[{"25", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "-", + RowBox[{"12", " ", "R"}], "-", + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]}]]}], "R"]}], ")"}]}], "2561"]}], + "}"}]}], "}"}]], "Output", + CellChangeTimes->{{3.80016147340481*^9, 3.8001614904991503`*^9}, + 3.800161598810849*^9}, + CellLabel-> + "Out[153]=",ExpressionUUID->"a42d465f-7a69-49e2-a8f2-459ad2f72d97"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Abs", "[", + FractionBox[ + RowBox[{"25", " ", + RowBox[{"(", + RowBox[{"88", "+", + FractionBox["132", "R"], "+", + FractionBox[ + RowBox[{"25", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "-", + RowBox[{"12", " ", "R"}], "-", + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]}]]}], "R"]}], ")"}]}], "2561"], + "]"}], ",", "1"}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "1", ",", "1000"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{"0.96", ",", "1.06"}], "}"}]}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], ",", + + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800161877836241*^9, 3.800161888048267*^9}, { + 3.801212218374299*^9, 3.801212226162795*^9}, {3.801212295159203*^9, + 3.801212326126049*^9}, {3.8012123983542356`*^9, 3.801212438033284*^9}}, + CellLabel-> + "In[149]:=",ExpressionUUID->"69cfd6a7-8b65-437b-8a0a-5079e060b8b4"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{}, {}, + TagBox[{ + RGBColor[0.9, 0.36, 0.054], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJwVznlQDFAcB/BElDa7djfVPkIm1TYNHTSbqfdTkVyp2Eols2QrR4cwmqyl +Jmz2oGNFNIYaqlGSXFNjy7GuCk3lGFam6fbe5FgyhueP73znM99/vvNl6VHJ +lhYWFj4s/7txoHAwxt8afrgnaFu/UyyrPrVU3GENrhOtcQITxVsmeQQM/LaB +oRFP6cO7FFeFGxyvC20hQ3jok7qc4qz+9zKzGwfsDb7Lrh+l2KdMKSmLsgOZ +osNyXRrFQUGuI2GpM6Bvb7PmuJRi/DvSI0rPhUdzcyNoCMV9VkdSR5N4wEPb +c8R+FD8teOO5dJgH2y793bXVjeJawf5GL+VMiD3hUxGNKPZzKqr25PCB1IRl +6mZSrDBmdstL+CByobf8bChuyys2RooFEHvxQXLkJIqv3fJ3D74pADKFv+DN +d4KLzM7rTWuEkKHY96RjiGDn+oJP+b1CaA68IOGZCN7Jr6+Wy+yhdeM3w+0e +ghuUcwJ+mu2htkyZ866D4Aq5rb82bxY0nQ8U5D4h+NjmwInXIge4MnurjaKN +YG/z4q/SOgdYsSJdmNpC8BFOZZxJ4ghCO7pp9V2Cn3klFjh0OsLVg940pYng +e49L5m1KcIJ0n5cBoTcI3m2ro539ThC84Zy8qJ5gUXx7wUSOCHDcFL3NNbYv +UKvEUxEs7xoenaghWBxzafoZawSll7kJ48yDqjsqK1sExc+TO4eYZeP9KhMX +wRd1mbGXOdYQVFjqhKDL4/GPJubQJFpo6YVgmj4vLJt59rlo9dtoBFknPSrH +qwl+255qt0qKwH1tfuMws95Sqb4ZiwCH1hn7mPlptWpdIoLtvml/XzFbS6w0 +K+UIfhpdqm4wf+1u0jTkIAjbJerex1w//cWMeYcQhMicvfcw7wn6rFEfRnC7 +4YFuB/NgJVebks/+uI8lxjB/yE7ROmsQCBYmLZIwl19RcE/qELRVutV5M8e9 +L9b+Oo1gcEmur5i5K8Sg7dIjOHa0JRwxnz7Qww0+i6DmftU7AXNEzZi2rhyB +ns/L4jBzPk7mzalAENxs5lgxP+WLdKqLCKTT4mv/XCX4H1gxdKo= + "]]}, + Annotation[#, "Charting`Private`Tag$101282#1"]& ], + TagBox[{ + RGBColor[0.365248, 0.427802, 0.758297], + AbsoluteThickness[1.6], + Opacity[1.], + CapForm["Butt"], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQXfO1eM3N1012DGDwwT4250EBS/RGexh/2kUlJ+bo +g3D+jcMs/PdFL8H5Liv/hyy+dwvOz5zaVb1070M4n2nb1rr0zGdw/unZT97G +HH0F56c9NO4/UPcezu+08njPJfgJzv+e9sPnvNUXON/v8I7DXpO/wfm2TNUf +7h/+AeebvnD+kvvyF5wv9k9GcLPtXzi//9v3x4JZ/+H8yv6Pzyc/YnCA8fXL +szxnczHB+YYBT1rXyzHD+eqOz/zkvVjg/Ezll59mJ7LC+QtkS5RLJrDB+dHZ +TftP7GSH85NWTTTTOs8B58cxalo9/80J5y/zPCixUYQbzi96eifpuzoPnG80 +s8FyZhAvnG9np/raPZMPzrf/HagZNJ0fzn/E2pj5Jl4Azj/VdlPb7BWCv0a4 +bItugyCcbyI5eZU2jxCcX3ei8Fr6VAT/cPOUE4FawnD+uu3mGk5bEfzJ3+X8 +HniLwPlyG9oettxA8LOFNqxKTxKF8zc1yFr9+I7gz0/nNu9vFoPz26Nsf12W +EkfEx3eDz2HrEfxGnqWRDywl4PzTurFt4hcQ/N3HpyqExkjC+bncEz5ceIrg +S0Wfa/tVJYWQV+7t0mKThvNlZgf33gpG8E8JSU3oWojgAwBO2feB + "]]}, + Annotation[#, "Charting`Private`Tag$101282#2"]& ]}, {}}, AspectRatio -> + 1, Axes -> {False, False}, AxesLabel -> {None, None}, + AxesOrigin -> {0., 0.96}, + CoordinatesToolOptions :> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction -> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.0419639110365086], + StyleBox[{ + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxllG1IU2EUx6dOU9uc3W3XzW3urjm3u4WZikFvHgmzDFLMDysss5qjQCUy +SDMKX5KakZjkC2L5QksqtA+SC7Uiqg9qFIKEfVDSsIVipsggbe25z/UZ1IGH +8Xvuztv/nHt1p0tybEECgSDAdw77TqDvfBZ/oW0pwSAMu6U9U2yGUWR14bBz +z1DOvQIzrAwv9dsnRNAXX9wVkGeGl47hyuQZMTTVS8pTLH5urK05Pj7IEm7r +1LvW7Cx0TzpndlSJIcHcI/3YbQLTr1h3a5gY+gyzVe0LRlA/o+8HTgeDEd2z +KmhBdkwI0+n5aa2faBClRWQ2s0J876L55wIc5yYNKs7fkyoraygdO0vDzBH3 +qXWtJ5V58WDYFiGHC87Svj8SAczfKHIkquR8f0JITkImh32laVdH8kIIFyJ7 +GEqY+1mOhI14d6yOrIAEinAts8kwmkvBRn6rwar+sCYh9XH1nxND7sL4UnMH +zecXwWukU1AUYU7nVT9LuXgKsHH1iHAd4wq4jfL/FMEr5N+lxHmrKehFehaZ +CDcjncpMOM8bCuR1mT+EKya+HwpSuPmycGXKM5m0WQrZk6qKggYW542Vknly +fRyS4rpEZihH/38sA3X7SXYkwQxPqW0R9nY5zJ23rDbtNYPr6C6rd44mrOV0 +UhFe9/osVQPfCjomkrNYwvMX++W/HUbC3P5kGHC8WiXO36bHc7krI8ztQxlF +eGMeeE/0kPHkrVMwwOtYqOHnGg15aE5qFdjR9TsNmedQScVCyyWGzF9yInsq +0elnLq7bz6hc76KfB5F/ug7vUZwcz8GlI/EXO3uZsdCt//EBVKeVxvrLdFCD ++mik+feA4feDhp5V9+VRhsF9eRR4r69Ewf76KqowXM/veTREoroz9LjPChU8 +Qn71vH5JGphF+m+P5eNoeTbgegYYiHF+Pxh/LY4w57dsJMz17WX5vY+BanFW +b6PBgvVRKuE5VH59r7Dw+7YF6xxiwfXt9jMXJj+SsADZ9WDi/+/36S/Q2/hm + + "]], + + FilledCurveBox[{{{0, 2, 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}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJlIGYC4oz8D60nRfQd7Esca0/f4XOYOoG/yuy1noP/ +E89LppP5HdaqPmmed1bXwcQYCDbzOLBwdskn9+k4MICAA7fD8V07etkMtOH8 +V8VbRX+vVofzjUD6glUd+iO6/RkDhOD8qvs/bhlnS8L5/LEB943YFRzMbPYG +TUtUd3Ce0CyUZqXksEUvbzFjjRac/x8E7HXg/IBb0jWJQnoOD1zjHWc1KsL5 +5Ye3uc48qwDnH+je12TCLO9gCjJ/IYKfmgYEy/Qc3NccXc6QoeCw1aHp0fEd +eg5rhXT40vkUHWbMBIKfeg7hnGLtxvZKDhLz4jRPF+hC3LEf6h55HQfla4+C +Gf4oOTxJXHjN5LwWnP88S/vbdFtNOP/UYae1mfvUHapB/p+t5FD726rgXIca +xP/PFR1qPm0IyK5Scei28dyVtknBYW9+zduZqcoOb9pyu41my8L5UaoRMuf2 +SMD590H+/yjgILf8hYeevZqDHSg+Y9jh4Qfjn78a9kb/tzac73OC3XZ2qK5D +GjgcOBxEe7xesUzRg8cfevoAAEy/3FA= + "]], + + 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}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJjIGYC4uKtor9Pxxk5GIOAspIDjF9+eJvrzLVKDtLz +4jRPJxg6/AeB+Zj8DXp5ixl1EPzrQp8cz38zwMn/8630wZyP+nDzYXyY/RtB +5vkYOOzNr3k7U1TJIVrB8WNyjYGD8rVHwQw8Sg6L7+/jmzPZwKHbxnNX2iNF +h78g/RsNHNzXHF3OEKHosAQkn2zkkJ4GBGxCDtMn8FeZrTZy8H/iecl0Mh/E +PceMHM6eAQIeHgf1t7z7DF4aOYCUp6lxOICEz8QYw/n1v60KznUYO8hsFJvP +tIDH4UCtrEX6EmOIf/7zORSu6b6d8cHY4WD3viaTZCGHFS889P43mjp8WLRe +4ewJBYdGlqP9httNIe49pOggAwq/C6YQ93IoOZSAwvufKdy/fhcnxvxzNoOH +B4wPCy+1J83zznqZwsOzx+sVi4miKWp8vDFxEK6cVHJ2iZKDBsh/K00cZoLA +SiWHF1na36bPRfDB/ixD8MHhGWgCtw/Gh7kHrO6kCdy9MaD4+WPisOLby4oz +AkoOW8x/HEqRMoXHD4xfCjJvLoIfzinWbpyv6GACMlfY1GGtkA5fup6ig9cJ +dtvZrKYQe14qODxJXHjNJB4avocFHHj9109JnWHokApyd5uiw9edt7r+TjWE +hPcMRWj6MITE/zIE/z1IfgeCvxLk3g+KDv3BJSrT1xvC3f8cFD53DeH+Q88f +AP2Ve/k= + "]]}, {{ + Thickness[0.0419639110365086]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {35.75016687422167, 24.508064757160646`}, + ImageSize -> {23.833444582814447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, + PlotRange -> {{0., 23.830000000000002`}, {0., 16.34}}, AspectRatio -> + Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09523809523809523], + StyleBox[{ + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}}}, CompressedData[" +1:eJxllG1IU2EUx6dOU9uc3W3XzW3urjm3u4WZikFvHgmzDFLMDysss5qjQCUy +SDMKX5KakZjkC2L5QksqtA+SC7Uiqg9qFIKEfVDSsIVipsggbe25z/UZ1IGH +8Xvuztv/nHt1p0tybEECgSDAdw77TqDvfBZ/oW0pwSAMu6U9U2yGUWR14bBz +z1DOvQIzrAwv9dsnRNAXX9wVkGeGl47hyuQZMTTVS8pTLH5urK05Pj7IEm7r +1LvW7Cx0TzpndlSJIcHcI/3YbQLTr1h3a5gY+gyzVe0LRlA/o+8HTgeDEd2z +KmhBdkwI0+n5aa2faBClRWQ2s0J876L55wIc5yYNKs7fkyoraygdO0vDzBH3 +qXWtJ5V58WDYFiGHC87Svj8SAczfKHIkquR8f0JITkImh32laVdH8kIIFyJ7 +GEqY+1mOhI14d6yOrIAEinAts8kwmkvBRn6rwar+sCYh9XH1nxND7sL4UnMH +zecXwWukU1AUYU7nVT9LuXgKsHH1iHAd4wq4jfL/FMEr5N+lxHmrKehFehaZ +CDcjncpMOM8bCuR1mT+EKya+HwpSuPmycGXKM5m0WQrZk6qKggYW542Vknly +fRyS4rpEZihH/38sA3X7SXYkwQxPqW0R9nY5zJ23rDbtNYPr6C6rd44mrOV0 +UhFe9/osVQPfCjomkrNYwvMX++W/HUbC3P5kGHC8WiXO36bHc7krI8ztQxlF +eGMeeE/0kPHkrVMwwOtYqOHnGg15aE5qFdjR9TsNmedQScVCyyWGzF9yInsq +0elnLq7bz6hc76KfB5F/ug7vUZwcz8GlI/EXO3uZsdCt//EBVKeVxvrLdFCD ++mik+feA4feDhp5V9+VRhsF9eRR4r69Ewf76KqowXM/veTREoroz9LjPChU8 +Qn71vH5JGphF+m+P5eNoeTbgegYYiHF+Pxh/LY4w57dsJMz17WX5vY+BanFW +b6PBgvVRKuE5VH59r7Dw+7YF6xxiwfXt9jMXJj+SsADZ9WDi/+/36S/Q2/hm + + "]]}, {{ + Thickness[0.09523809523809523]}, StripOnInput -> False}, + StripOnInput -> False]}, { + ImageSize -> {15.756732254047321`, 24.508064757160646`}, + ImageSize -> {10.504488169364882`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 10.5}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImagePadding -> All, + LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange -> {{0., 6.9077551380075395`}, {0.96, 1.06}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, {0, 0}}, Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + FormBox[ + FormBox[ + TemplateBox[{ + RowBox[{"Radius", " ", "of", " ", "convergence", " ", "RHF"}], "1"}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> 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]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.801212476353136*^9}, + CellLabel-> + "Out[150]=",ExpressionUUID->"811160a3-d85f-4f0c-b484-e072bfa2a624"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.801212563990121*^9, + 3.801212564197338*^9}},ExpressionUUID->"1ea37c31-d94a-4415-aefe-\ +7732066d4f30"], + +Cell[TextData[{ + "For ", + Cell[BoxData[ + FormBox[ + RowBox[{"R", ">", + FractionBox["3", "2"]}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "043d0840-f71c-406f-a82c-b79288fb01ea"], + " a broken symmetry solution is possible. By allowing the singly excited \ +triplet state to mix with the ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]],ExpressionUUID-> + "0afa2d61-5355-4cd5-a854-5757641f3c61"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]],ExpressionUUID-> + "379915ed-ca68-4d21-aa4b-0302132d600a"], + " states one can get a solution with a lower energy than in the RHF \ +formalism." +}], "Text", + CellChangeTimes->{{3.801212689223534*^9, 3.801212790150127*^9}, { + 3.8012128316539593`*^9, + 3.8012128782196817`*^9}},ExpressionUUID->"0a285b6f-a9b7-4fcd-b386-\ +eb36fcd898d1"], + +Cell[TextData[{ + "This is the sharp avoided crossing between ", + Cell[BoxData[ + FormBox[ + RowBox[{ + SuperscriptBox["s", "2"], " "}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "a28bde3e-b153-4d04-8f01-3263839f9409"], + "and ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "8a59b559-7114-4c2f-b3a8-48a568d3654a"], + " that dictates the convergence properties. Just after ", + Cell[BoxData[ + FormBox[ + RowBox[{"R", "=", + FractionBox["3", "2"]}], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "8c81b35e-a1a3-4399-b9dd-4d3b3fddc166"], + " the CI become a sharp avoided crossing which try to model the symmetry \ +breaking of the real E(\[Lambda]) function." +}], "Text", + CellChangeTimes->{{3.801213888212162*^9, 3.801213934887389*^9}, { + 3.801213982149816*^9, 3.80121398721357*^9}, {3.8012140178470497`*^9, + 3.801214076311545*^9}},ExpressionUUID->"9b99270a-56e8-498e-851b-\ +963722ee6767"] +}, Closed]] +}, Closed]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["RHF vs UHF: the Epstein-Nesbet expansion", "Title", + CellChangeTimes->{{3.8001047496796093`*^9, + 3.8001047661192636`*^9}},ExpressionUUID->"543a2e05-43c1-430d-b0d2-\ +6caad7fe4ca3"], + +Cell[CellGroupData[{ + +Cell["Energies on the real axis", "Section", + CellChangeTimes->{{3.800104788782443*^9, 3.800104789856779*^9}, + 3.800105549376504*^9},ExpressionUUID->"4133c8fd-f5a2-42de-a1e6-\ +56f435fecf5e"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.8000051404799757`*^9, + 3.8000051434665403`*^9}},ExpressionUUID->"d0af0821-37d8-4bba-80f1-\ +8624d4c75f06"], + +Cell["We define the adiabatic connection Hamiltonian as", "Text", + CellChangeTimes->{{3.800005777443572*^9, + 3.800005825433264*^9}},ExpressionUUID->"579f66a3-0e96-4244-8bdb-\ +04cddec8356c"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"HREN\[Lambda]", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{"rH", "[", "R", "]"}], "]"}], "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"rH", "[", "R", "]"}], "-", + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{"rH", "[", "R", "]"}], "]"}], "]"}]}], ")"}]}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{"Eigenvalues", "[", + RowBox[{"HREN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}]}], ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800005845720145*^9, 3.800005863070434*^9}, { + 3.800008325211321*^9, 3.8000083292042847`*^9}, {3.800075430687092*^9, + 3.800075439968359*^9}, {3.8001048544791183`*^9, 3.80010486881457*^9}, { + 3.80010493098575*^9, 3.800104944780465*^9}, {3.800105127304884*^9, + 3.800105140236706*^9}, {3.800182218307827*^9, 3.8001822408646717`*^9}, { + 3.800182438330201*^9, 3.8001824597607393`*^9}}, + CellLabel->"In[34]:=",ExpressionUUID->"1cd8adee-e904-4d7e-9c8d-53799ac4602e"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "5"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800005924706459*^9, 3.800005929948352*^9}, { + 3.800005982530142*^9, 3.800005983014323*^9}, {3.800006131382762*^9, + 3.800006149454649*^9}, {3.800006192806897*^9, 3.800006196955217*^9}, { + 3.8000067027873077`*^9, 3.800006706963251*^9}, {3.800105152145863*^9, + 3.800105154124999*^9}, {3.8011966685166693`*^9, 3.8011966688081303`*^9}}, + CellLabel->"In[58]:=",ExpressionUUID->"3abcdc6a-4612-47b2-b219-22fd5de22f39"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAY6+Q7///B8Bvdcu59SjcPxT7GiY7 +/AfAiVk3LPMm3D/ERqVcdvgHwKM9o57wJNw/Jt65yezwB8DYBXuD6yDcP+oM +46PZ4QfAQJYqTeEY3D9wajVYs8MHwBC3ieDMCNw/fiXawGaHB8Cy+EcHpOjb +P5qbI5LNDgfA83vEVFKo2z+f34hvUQkGwBh++uzcHNs/FtBTTykVBcACqVVk +pZraP8hQU0TLJQTApe3dxPsa2j9IKSV0IyIDwOktoyKAkNk/Oq5cps8vAsDz +lo1fQg/ZP/qKZhMyKQHAnfu0mTKD2D/196SVXicAwAF6Cb2w+dc/xCKSNL5t +/r8qIYO/bHnXPzsFf7MrZPy/9MM5v1bu1j+UQDc3QX36v4SPFZ5+bNY/Y5xY +5eqf+L/MdB5mNO3VP8+nHgkBmva/tlVkKxhj1T8eDLAxv7b0v2Vfz8854tQ/ +CiDmz+mq8r+0ZHdxiVbUP2xUhZioqPC/voNM/GbN0z9gw9/LHpLtv4vLRmaC +TdM/Ij3+UcWB6b/6Dn7Ny8LSP6los+G7tuW/LnvaE1NB0j9q87Fci5rhvwTj +c1cItdE/Ln4FWQYj27+TZDqESyvRPxN51AuWm9O/5w4mkMyq0D/XZGwqr+PG +v9u0Tpl7H9A/d3oqjsmVrr8qBzkD0TrPP6qPOECkMK0/ENgupsY7zj+OaYHW +YILHPzegnkMYJ80/DfRMO6xR0z/quVif5STMP+B0xjR2hNs/38qM9Q4Nyz/u +uU3Cd8jhP0YPGx5U+sk/poehYGSJ5T83pfMEFfrIPyX2qxN4m+k/ajJG5jHk +xz/esh+9O2jtPygR44XK4MY/VZfgiOuQ8D9YI9r3fuLFP56ljL1MlvI/yyxL +ZI/OxD8EW23tBXn0P8iHBo8bzcM/zmCpp1KE9j8G2ju0A7bCP7UNGl33bPg/ +0H27l2exwT8mmiHoB0z6PwtVlU3nscA/+naE/atT/D8SR9L7hTm/P+v6Gw6o +OP4/IYcO2TQ0vT+gZ4fUGyMAQLW1PqubA7s/kEHMjBklAUAtSyMiOt24Pw5v +q0LDFQJAuYOcFdDbtj++RLi9thoDQMqqCf4dr7Q//W1fNlYOBEDvdAtjY6ey +PwEH0pkr/QRA+KXBbOCpsD82SHLCSgAGQAuL19YqAq0/+tys6BXyBkBSEFXN +g/qoP0RsyJBN9gZAN/FWRIXoqD+N++M4hfoGQCPSWLuG1qg/IBobifQCB0Dz +k1ypibKoP0dXiSnTEwdAkBdkhY9qqD+U0WVqkDUHQNEecz2b2qc/LsYe7Ap5 +B0BPLZGtsrqmP3hVOpRCfQdANw6TJLSopj/B5FU8eoEHQCPvlJu1lqY/VAON +jOmJB0DzsJiJuHKmP3tA+yzImgdAkDSgZb4qpj/IutdthbwHQNE7rx3KmqU/ +EkrzFb3AB0C5HLGUy4ilP1zZDr70xAdAnf2yC812pT/v90UOZM0HQG6/tvnP +UqU/FjW0rkLeB0ALQ77V1QqlP2DEz1Z64gdA8yPATNf4pD+pU+v+seYHQN4E +wsPY5qQ/PHIiTyHvB0CuxsWx28KkP4YBPvdY8wdAk6fHKN2wpD/QkFmfkPcH +QHuIyZ/enqQ/GiB1R8j7B0BjacsW4IykP2OvkO///wdAS0rNjeF6pD/evWXQ + + "]]}, Annotation[#, "Charting`Private`Tag$10196#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwtlGs0lHkcgGcw84+Y3SW2ZrYRotRW7LptU35/1saRtoTSSXFEF0aqdY/K +rlZqtHOEalT2Mu6WVONEeN+YmJLruMQ7O7JWJ7lkmYydQduesx+e83x+vjwW +odF7w3VoNNquD/znI5XCt+/fI3Knd1vmcJIYVmjZNrwFRJ61Pal5d1kM0h0F +QXHziKxY9tExgzwx2Chrnk5MI3J5yx785SMxvDEc+W1gGJHPvu6ZSdOK4VSE +Y+D9JkR6baf2r08ugHPWg+TRdES62o1ZRKcUgijPKquNhUg7M0b1wvliyB+6 +FO2rzyQRI0BVRJWDWaffbltTBkn11X92L+4uyPb4ebRa65G7pbdEgbH3wMvW +OsbKUpd0bUq38sx/AFsrggo7tuiQK82VW1zF1aC5fNTkC1s6eVKAPVN6HsI7 +tTjn8DoaqcyaqknT1ILUMsuhIWqJ4M2hu9naOuAxzt/fGLZAfBy5qWpiHQHZ +2NnZLUVDRHCHRIXXSThyK3D0Tf48MeDXZsDLfQwdRVx9umiOYGS5XfiutBG4 +hnftiWoVUXwu0tmuvAkM1rzqGCudIfRjOCphkxT4/hdvFBdPE3OOp5W9vU8g +pGmolZs1SRwsTDbI720Gy+1Lvk9Sx4gUc9Y2w/EWKDl+f/hR9SixwjOgcnFS +BhGzVUFXRMPEiXjL9deYz2DzOcYBphVF+MTktBuyW8EksWd5bp6cEJs3VBtw +nkN/GH9D5UgzUSfni8vt2yA+acPVpzkVhJdTl7zbsR1Kf3LBYrvfITScsvvD +oQOunkjtC/m+BW63S54+WdsJRiofXrmvHKSPX3CGCjrhZUyzQ1waBd41Daee +2XfBVM2uxnjZMJhdj1ese9QFhem/hIRljMJqn+UnPHndYD1XZpKQNwZpjNB5 +l+ZuUN4zr+cdnwTr3GvFE55yCLj+8tK4cBoMjW5EG7fI4U6BoN4ndwb8LwV/ +ZeDbA3oHoyYZiSroHaSvlXb1QHtISdHetDmQ2B/7ZM+hXpAYsQ+p+fPQFVxk +fmeoF2xEFq+RjwYcYmo9Dgf3gSYubbHMbwFUAiF/eqwPxjUcVrHLEvyd7Cbx +iOyHn4+l93CsaNjntIQWqe4HodtzwSprOp7auRCqm/oCWNFl7k2mOrh1cfWr +Q/QBaPB4WF/N1sXMBzr8y4IBWIwKdtrH0sMpbo3GiaxBoKPumxsX9TBP4t85 +kDkITl5nGr1pTBy4qVRouJICjaL8tekME1cmD56m36TAgy8T7ppj4iyscXfL +oyBTO+JyUcPEsXrsFam3KVjD5mSodBDmCQ5U036lwHN/hq3cBOHmvBea96UU +ZHeFRwgdEVbW9v2wVEfB5mbuhEEiwqx/unO0LylICNia7Z6C8GzdzFHeCAWP +/wrYlpSKcM8FY5ezoxT462YKxjIQFi3bO6gZo+As1n4uEyFss7KLq5mhQFbb +H3WxDmFX546ieT0FGHvPmtaTCFtppxJckAKCBlgNKinCTILlnaCvgLfqb1hh +bQg/3/HthNpIAWaODyrclQgH7muzU5spIETasS/pzw897Em68yoFlPiNL1W9 +QpirNJTHcRSw7Yzlbou3CI+E+8TOmSvgR7qrOnD2Q68tf4eTpQI6hQfyhWqE +SyavfBq3VgHsNbGeMi3Cgqqy1xIbBfz/Lxwd21rzbr0C/gU8tVyj + "]]}, + Annotation[#, "Charting`Private`Tag$10196#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw113k0Vd0bB/Cb6RalqIQKJUMiJdOb8lwi9JKMqYRSiZDKLETmmcwNVKaL +zEOEfY2dk0ypZB6KXuJVma/Sb//W+v3+OOuszz9n7XP2832effZcvml4lYVC +oUzj679368KY2T9/qAyJw9F8Xa9yYNuqoLjKLyqD+rx/Sbc1B5pOZpq7LmOH +decRfTkgPlRFTn+nMlxNXMPRSg5Mbfz8vHeUyjhZeU4iT4kOTnYKZqWNVEbC +cwrDo5QOPmJ9jGvBVEZMf/H4XG4upD4UjWvjpjIcPTddPpuSD2nDITcNNnAw +/CvehqtZFwFfp5H+/u3sDLa6Q7EBxiVAnDHSaBVjY9xzF/dnPVoG2vvFnEX3 +sjI4eK6VCJysgKMF5lkdsiyMU5RFd3fpl8AMu7ZVbv86hpFI/8Bu5WpYWMpI +sJCgMLJkCnWlFWugaW+cfJ3DGqrWE5ev21QHKuy+pQeu/EJZ+Rc/9bEyIJ6m +pKTmzUQvrYraN84wwPqR2fhU2jJaHvH7YNZeDx3ZQhvWpS6i87r3Ei7WNYDQ +xqLDqGIefd2lMmmQ0gicIhMdk7k/EUPbgUG51wT2xoHJOTnfkWQR15lD55vB +qnG4VShuBrV4qsiE7GqBvcfXDJr9JpHXgY7bM2MtQL9eOvqqYhwRmWk2LyJf +g91csXl46ihini922nmEgBTFHyo2YaOonTvEylWBAMLj0M4TnqOo6nt1a4cS +AWKUwl7muVEkNHh4s88xAkY25pvaCYyiSV8ZCUKTABPxrDM6ySNIvmjUl8eM +AL8S+VBu6WFU2qE/dNOLgCHlUq0WrmEkyHWqIcmbgGPoMIfPtyH07FXccq0v +AYutB+/P5A6hu3FdpuwBBNiPS3q/3T+EXieqlftGEGDGv/tWmMQg6ojvebfn +MQEHfdjPcYj2o0W7qb95awkQrO5M+oetH2lX27wcqSOAffHhxzcTfWgpQijs +BYOAAQc54+jcPiTG+GKm3kRA2EVLfX65PqQ/EBxo1krA12NVmlJqvUhq15Sk +Yi8B6av2cqcte1Am9wxn4RwBEUrKtw6p9aA+p31U7QUC3O6wFvGK9qBvmntO +Di8ScPpbikzPxEdknrA/ZD2TgN99LZJWjh8R6VC9pkkh4Xy1iPBt7w/o4YoM +eWMjCVs93nMlPuxGZfzF9y+IkrD8Z4Vn1rMbpRVK63/aR8JQkDC/9vlu1Dqw +/R9DcRJy4u32Mfm70eg1Xm+1/SSoFlGOWyS+Q3dqebewyZJg+1XaUTy2C+kc +sGXsPkrCaUdDZ1+nLvTY7XCrqwoJ8gtunp/0u5DHzKXotmMkrLE0BoVxd6Hi +HBFwBhLihc6l/RveiZZjLQWzNEjwyeN86rCpA+mOOlWkniZBp8rkhfDbdnRp +FhHt+iRse51e1RXWjjL9n/tRDEigjym+U1jfjvisMsbMjUh4L2DNusbShmLy +tNRXzpIgFfLqatTyG/Tknsh9ZEVCzxV7qcLPLWhgbaDG04mEusEzShVZLeiG +d4mx4S0SskwVNGptW5BrcEajxG0SnLXXLrbONiMXzmnRt3dI2CIdE/t1tQnx +VTT0Ml3x+uZKl4W3NaII+yrv2bskHLJPZpfoaUCmOw3lMrxJ4B+/y3swtQFN +1vwqMfUhYeKjpvQxkQZ0rorCV+5Lgn91j6WZdD2SV3AxOOtPggvrUuSe0DpU +B5ECh4NJ0FhA2bKb69AfdSmtBmzeryH1xxNqUdeFaCWDEBIK3ggunHtag1ga +0i2uh+Lnx6qax1VVo7CzHyq9wkkou091TYdqFJCROsPE9nfpjC5orkK3PZXH +3CJIED53ufFN10skaH6A40YkCWYiQVKsUxXosf5jacVoEsR59TV4nCoQ/xVC +9zn2PCu/hfBiOXp374IkdwwJsV/psSos5eietOSWQew3BW3LdwRLUatSd5Jl +HAnJ6Ym8/uklqPdgTkg19rU4S+kY8RKUXbx0eOsDElhdf1jmyxWjTs3K/Fps +N0+pKDKhANEd2Y8uxeN6+vf7x8KsF2hp8aiPagJez+VK4cTKfDQbfjr6PvYH +HY3iy725KIG6bQc1kYT8Wk6m9hQdef/SjdTEDjjcpS67moOKd93u8MM+ImDx +fnVXNur9nlExh80ZuW/3mEwWcizSubA/iYQxyrerhGomulW2vtUcO/Yft6V4 +q+eojSHAVYt93VyV5nXrGVL7zts/iU3rZAu95P8UrZQ6u2xLxvm5Kapgrp2G +jMI+rrfGjjxb1CJp9xjtXolcF4x9DI6bLYQ/RM3lu5pysL+Jv5msf5GCzgZY +nyGwU7nPekV1JKFyOc2scWydxc8bL/xIQLtSspopKTivg05PJLbGo8xUxwIB +7Ozm37Lz8nGoUizI6hC26YuweoZpDHKX/9Svgc0pJZsl+CMCibYZiJzFvr6i +TZbKh6JrLGMyNtgtxOVpXfdAVD7nweaCLZp8d/PEKz8U1LYx4x42S4f01bU1 +LxRLRm8Mw651sMo7FOSMOGSZx2Oxf/BLfm4WtEO5hprKidid+ULDxoamiCXJ +fjUZm+3S3yIhJ1Thsr1DcAo2/eAzt43Vl2H1jNZAEnaK++OF7g9O0NO5uvIA +e7DXtvDpaXcYCYwaicTeq6Joe/O1LzTsYI8JxD5y2i9WKP0+vFexWe+F/cHH +xjHQPBiYZXU6jthuhXp/T/OHg73RDmNLbMGRI5JGH6Igbt5H4jS2xfpIlkHt +WCj0Z286il0oQrm1ReIBZMzX7BfDpvx1Z/gEewKk6FWZbcI2MJjQc/ucCM8e +bTGYw/vxzPZcTW59Mpz71cfbg62RCik8Po9AJPrIXBJ2QkkJVdP8CYxI/+Jx +wb4zzqtybHc6PCzMZ+pjN/0OpN9cfQpb089I/cH1Mx2KrEKnnsFWRtStbuzt +fCs7nvc+h+OSp+5nYl87aB/0sTITCny/cJzAjqrOPP49Kws0jYQ8uLErTw7P +b0jMBnbF8IoeXM/rLQ2tjzvToYP/zQNr7NxoZVrGoRfweu/IoBXOC1tTWg1V +vgCsNms+3YZtuczx1w2lQuDy5mtvxnkLK5riF0grgocypldFsFUFqnhGMksg +ql8jvgLn90bpdEesRClwhy7mm/w333oiUSfopTC1gVPuZywJP/2CObPzyyDd +ke2+KHbWlAmrY2kFXFF6rGuD+0d3QGi9sEIlnBJ++v5HFP7ewrW+XRWVMPYo ++60H9nmjfb/kq18CNa2O2x/3o801P+dXGdWgZlk+eQf3L/fI6InQ9jqQPCzp +PhhEQqZEY4bKGQRrm8fVAPtd/eLlmS4EI/bvA54EksC3WnAzx44Bphdn3E0C +SHCS5ZvmcqwHqtY6mUw/EsSSv3x559wIvwMPXXnrhfN5da0xr7wRBg9xbufA +NpTjfx6w2AgrbUWnjnuScO/t35cU3ZvAty5VK8OdhD5K6WCKVzO8e9n9xNgF +74+t30cr/9fQwHPBDxxJCGldV/6l7jW8ZjZ8vOSA+6+M/4Prq68hllzg9rfH +9frD/4yTMwFs8g1SNXYkWHkEvPG9hufGr1tiO2xIOBwaXPfkVCtofqL3XLfE +8y0nMmuAtwO4Tmiv3MPzsZ2TO9BKvwNMv35SvqRHAmEfZf0lvANs9L67gC6u +92StLa4snVCof2F6QYcEI3PtNm+vTqiwnv98ShO/7xcdrUiHLhjJ4+lMwPN6 +07yuSr5BN4iFp12owPN/S5+ctdvtbvi540DpUTE8fxn84eoPuuH26vS7Gnx+ +EIz40vfpfTcIUbSdqkVIkNx315Pd7D20yTNPPhQkQd04r8rC4gM0LVEi5jeR +4Fq2QZnnRg/YeU30cOPzzYhzi7xrQD84zQerylbi8xLBLpiT0Q+bBRWf/lVO +wKddmn96m/pBk5NVQb2UgM6mRvI4+wC0vVNb0CskgLGt3oI9aAAiH+j81s8m +IK3sVUh88CAkF7Ya/kkkwGK+aKAkbBgojhMntrkQ8G+VXoMbMQq7FvwZltIE +ZAU/tboSOg4ZR2ty1RJeg9hi3lb3h5PAnL2fLj/UAkMlwrUq12fAeOsjZ3Jf +C5gkjYR8i/kOy3Q3rvVXmuFJZkStbuJP6P15WehbSBOwXXCYYfeYhza7FMXP +ZY3QbkXPNgxYhDXbqXxdogHKNwleXLJfBn+FS9YyE/UgnrrnH6ouEwLbvlfe +YqsHpmvA7zyjX7Cp/5JLOxcDvjF3cucor0GItA3vfbU6SLcJfr9TlEKrl9me +FKNaAzFqbyMExNbR3MqzE2m0auC+mafeuJ2FlkqEbom3egl1Gi9rKwRZaXLs +f0S4TCrgt4Oloik3G2393SPmHrZlsI76LuXAbzZarEC9j2ZgCShq3244ReGg +GVVr6eW7FAFzIP+f7T85aB/9c/rmuF+Ahj0Ro7fIQcv14x4r+J0PkauflQOZ +HLQWzqt02+l8EBHcGTrPQqU5hFx1HyLzQets6P7urVRa1q5jO5sD8iG+66pd +jAKVxuX3V0wQMw8OtghNc3pQaULm67b2j+eCu8nReHVvKk01r9Uk6n0u1H8x +OebpR6XZaDmYqzXmgjFrZMRkKJXWtfqiPCs9F7xoq9JEKpVWfODaQ8cLuUBU +9zgE1lBpHzw89OY66cB7am57LYNKm9WK73+G6GDey10330SljXGZyxoW0GF2 +SZP7ShuVNqh7VbIonA58CmUF6kNUGorxsbY9SQerpg5TzzEqTdZhz94dCnSg +G31bK56g0q7zmGQ3idLh2O29+ntmqbQ9tGF24XV0CFqnumQ2R6UJjDsMt87m +QGfMubSYJSptMui3r/tQDgiKuGgRq1TaBo7cr/vacuB//6u0//+v/gf42mxw + + "]]}, Annotation[#, "Charting`Private`Tag$10196#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw113k0VWsbAHCZTrkl8yfJnClSknINz86QIalIpYSIEFHJGF0yk5BKKUPl +GCOZoniPUIYydLbZEZkylWSe+t671vf9sddev7X/eZ+93mcSt3UztWdmYmKa +xM+/b7v82J9//lBodFfu2+IvGcC3IiStvkqhPfw6yq6cw4Caw+mWnosUWuk3 +x1jtLAZI95XVT05TaIYRHkV26QwY3zz4vGuAQuPcsUhQnzLA3Xn/mcJqCi0E +Bl0VYhgQsLOb5hBGoYUKKsppujHgcZJk/GdOCi3rRVqZ+14GpHwNdzuxiZ12 +WnpauzGnFwRazI7J8bPRvKQeBvoq9ULdcTPdxp2stM5ii1qhkh4wkNvpISnB +QitpNlTj39cDf+dZUpuVmGlD9PQw/7JuWI504FWW20AbjMrdnaDaDXMLL+5b +yTDRYsJL47lKu6BGIl6l0nUdhdO6BBUOdYE6263CXRdX0Qv/IrW8952QQBw4 +cMh/GSVJRmnxm3SC3ZMzw+Mpi8jPTkLdjdEBzRkimzY8nkeNipI9LvYdILL5 +1V5UMouCa/UKZhbagUNspHksewYl5ufqJQW3g8vJkMTMzGk06Mfwv/2fdrCp +/tooEj+F7j/Qu3u6pA0kNNdP1AaOob8r/SalzNogy7Fw4G3JMOIL5J2pWSPB ++XeBZdTjAeRHjZzakkPCI9Vf6pciB1CcccqN/iwS6nz2bNfxHUBJPWy0wkwS +djLldy1bDCBHe6NkSyoJ/ZtzTzlvG0AsCcbxpWkkmEtTjxsm9qM+v5nh+EQS +Al+rRHAqfEUiLm9LBkNJ6DtYqP/hr6/I2aSypjmEBA20lz1gog/JzD/KehdM +wnzj7ttT2X2oLNJ3OTGIBJdhWf9Pcn0oIVy78VwACWcEd1yNlGGg2Aivdxye +JOwOYLNgl+xB/iI/bvE4kCBU3vLwO2sPonvmG+6yJ4FtPqm9YaQb3dxC9ute +JKHXVfnk3exuNPzb3cfXloTI89bHBJW7UYu9qN1PKxJGNcr05A91oW96V+KY +zpCQuuKibGLdgdI/uYjVGJEQfeDg1T2HOlDk9hPPFgxJ8LrO8opHsgMxF3xh +VsA2mXik2DHSjowimi481CdhrfuDrM2VdsS7I5TqrUvC2XIx0Wv+bUj+tHGV +vRYJvD7kXw+S6Cj5I8fQlDIJi3+WuH/60pHsqnGAEnZfqKigwVk6irfv3Htt +LwmZCc5Sy4J0FCZ2dnRZiQStV0yaVg++IK25rqfbFElwGlW4Ih3Xiswq82qj +ZfB5rph63HJvRXKJRkS/NAkqc16+ncdakfp55T4V7HXm6tBIzlaU8sc0dECK +hAQRi5QfUS1oNbIw0UCChIAcjjTXLc3IdDDbyGQHCYZl5i9FPzUhfcvbh4qE +SeD7mFrWGtmE0uO57bdjZ31T/bJ/YxOakoxTmRIigdxmx7LO/BntCUCsKYIk +yIe/tY9ZbECZvGZD6nwkdFx0kc8f/IAiSQ99q80kVDKOHyihfkDa/JF+M3+R +QD21X7fC6QPS5OKuCcP2MFg/3/izFlWYTN0r5iCBSyE2bnSlBk0tblAT2YTP +97twUZSvGhU8ZR+VZCdhj0sim0zHe2R8uDy6no0EweGbPLsfv0e35y4au2OP +tOspaIi9R0cWvglVsZIQVN5hfUahCp0vk11zYyHhBsvCHfGISiRYJLyNZQMJ +unMoQ2lrJfJWNgkqZyKBZzS8SvN+BdpK3c5xHTuvQWjOIu0dmp+J9xz9Q4eR +OC3L+LJypJy5WM9Yp0PRbYpnKpSj4g0CSsnYQTda7ubVlqFKgY9F1tiiFrbV +Da1v0ET6Z4mRNTqcEQuVZxkvQXK5CXeZsKV5julyu5egCfFbf+pX6TDLImgl +Ol+MYu4VxyVgx41mxakzF6NSzeYditgNeZ8XrwsVIp43S12XV+iQmPqAJyj1 +NYrSuHtBC9sh3lohVvo1kvIb3cyDzeL5yzpXuQBxFYQ1v1umg5evfEz9/Tz0 +/En/RjFskx/T7fnUl+hmZ63D6hI+j22p6IPSXMTEqdHXhd1mqFtg25WNFI9b +CCVi51ZwLBuMZ6GyNo2v3tjBe1u1lVYyUYqefOVZ7H3brMgV4QwU1RPbII7N +cUdqxzdFKqL5aS2yY39jmrCv00pHaMmKmFrE8X33WkiweY7irp8Sq8B2tNQi +/K4+Qx09Fm+o2EQLa8SFoDS0siR7OQ67z01yv6VBCmri9BZ3xr5z+tUHWeen +yOm08M4z2BqgeWYuKgnxL5E6+tgT0g1jVS8foU9xBf4HsB9znvaLaX6InpbT +vshiG84Pbj736z5ypnDpbMdeZLgny/AmoHT23CZO7IzaNaVZlXgkfCj1Bgv2 +qZeRVbRTseid2sKBpQUcn7wSVehXNHJwLeefxnZcMqgvVIlANaYznN+xP9TZ +Thp7h6AdZ6mSA9iSiTe3jrwNRCpTvWY92MzNCvbr635IyS0ppR27wtUmZ0+o +B7qhMcJOx/4lKDtYK+SMnmXTIlqwW3JFvp40PYW8NirKNmOzXjgiFq6jBR+e +Knxrws7a/cxrc7kt+Oag0n+/P/J+Okdvc4foy8OZrdiMLqf8NBNvoHA/KSax +JdRVndw+3gKBun5GJ/Y+k8A4kdTbsKUkX7wPuy3g0pUQyzDwW2IJHML2yj96 +ZFIwCg5ld6xMYAv175M1a4uB/C7J+Flsq413mBkGcZAa36+zjp0vxnSVS+Ye +ULtYuTfh/8ekdv2rDtt92PUydIkP+8SJkaNegw+AynZuTRz7mZPFu+yqRGhs +uyG8B1v3MTziDngCjtGGucew779+TdGzTIZwzWHhC9jXh3nUNXakgvxqdOZ1 +7Jq1kCy3lTT4wfKW6wn2ZASyiRh/Bj9+b58qwOYXWPrP867n0AVaQ3XYDrtd +QttL00Gc76rEMnZMebrmNJUK5vInnfjwfS09/HV204MMmHvztEEJe6O1qZ2m +RxbE6q/3OGFn3z1IvNjzEhK0f6tOYLPWpLyjqOSB/ifCnBvnl/Uiu9rlA/lw +jb+z8iB25KtxwW0pr0Be8+D1KGytbWXc/emvYc8I7RyB8/Vy4WRznEwhuG91 +bHb/N7+PisXoZBUCy7G+6GfYM4FhHBm5RZApfGFoE64H1HFzliuFJaD3JuHP +KDY9OKJKdH8pmNbEv5XA9YVJtOJWa0kphIbcRVbYZ82kVlXK34AHa3ByN/bW +dzOzK7RyOP1iY8EArlfed+6ORDRVgp1685gCro/pMtUv1I8jWGycZr2J/aVq +3naqFUH4Dh+7T9gCK3lumc40ME53GXNnJsFdSWDyrytV4PHKdms9rrc7E4eG +vnhUwxJX4/ViXL817Nerc4qrIULdKkmQQoKpsuDz4PlqWJmMZPLH/ufTkQuq +3jXwZpY/yHAjCd1MhYxHfrUQ4+Vz6hfuBzFOge02QR9BoHH/sN8WEsIbNxQP +VX6EhPbA8nHsIMWge44rH0HJzTH5LCfu57+Cjrt71MG8WlCs5lYSbHyCG245 +1MOEuTwvFzcJeyPCKpONGqHtEuffo7h/kZl3qL08zXBNGeTO4f7YxMEZYnOs +GYz7PTdNYNe5xNgNRTWDruLEuJ8ICVaJ+lyezC0gllucnypKgpmlwWd/vxYQ +lhjbNy+O4x0y1L/j2gqUgO6KFtyft8waq+eeoIN9DK83gfs/V7eyndc1Oqx/ +PGq8js1HE4zSvkcHaHfRqMDzglD0UHcnSYcxM+SqpUKCrNRNXzY8x8SpOTCb +HCBB+2ROmZVVGwh0frNO0yTBs2jTQe7LHaAjMK3GdwTPcx4fVDyDe4BmkcLO +6oTnpTo2ocwXPTB92KBtHbtTWO9PV00PtDVdiFp2JqGlprpek60X4py1c2Zd +SKDxVVmxhfbC3kitjN/uJKQUvQ1PCGPArpv+q9t9cPyzr3pfR36FReHp29yR +JPwoO/req24AnLvSai/n4X4flmZzMWIYqKohLctL+D7M5/B6J43B8rk080Dz +Nuh7LVqh7jgFJkb3J1Rft4H5w/7widhpWA2QSX3I0w7J6dEVxg9mIKq7QED6 +n3ZgPec6xeYzC/HJDzjkx9uhySYrwzR4HhZFrhy7YdMBxVuEzi+4LMKBMuXZ +4NYOkH4s/p1ivAwqU+P1ttqdsOwZvJZjtgpXHZQvF1V2wsTyds7Mg+vQFm44 +8LdKF6ReCiO3SzIRYRtF/lko6oLYQ5+it+3cQDx2UPsnSqUbON1ytKv5mYnW +AVqaZ243VOq+qSgRYiGy458zzij1wJqrteopTlZizqPdRDO7BzZQvjzatcZK +JGzZd9hIshdUDa69N2JiJ+zs4+L3ZPTCcm/ud/4ZduKpTox8hQQDdF3qYo/O +sxPvb6fVD0sx4M7K4MGQZXYi5XWJO6cMA8SEtkfMMlOIsWft7da7GKB/OkKO +zkshbFv8mFlUGJDQau8cu59CdEj20o30GLD7g8gkhw+F8JC9rdN/iQHe5n8n +aPtTiLt9cj2bnBlQNWSu4RtIIThyzH33uTDgJMud6LEICuGfoNgc6s4AP2JF +oe4xhQiM8fyi6MOAuvIO15B3FOKdlIqGfyQDeIx+81fQKMRyg7tRRjQDLLs4 +K2drKMTNLwvWrXif+7mgx3nxM4U4l92euvMeAwT2F+Vp91GI/sDrPk1JDLCp +aT7l+41CmEqnVC3ifTDLbGK9YIRCNBQsckmmMkDjmsQx8Z8U4vdlmVqvFwwI +3aC1cOY3hTj5cE7uGZUBLbEWKbELFELo+eD9T5kMEBK7oV+3QiFUeX9sXMhm +wP/2VeL/++p/AQbCmz8= + "]]}, + Annotation[#, "Charting`Private`Tag$10196#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.03519887363604365], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIIaxWZDYzATYDFA+A4VqSNVLqpmkupNUe4nRS4ld +AKjmAn0= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJfIGYCYgOtlcIXnqg4OE9oFkr7peggMfUKZ0aTqkM4 +p1i7sbySwxkQ4FFzeOAa7zjLUMkhISRIfcFKBD8exO/UgPO9T7Dbzp6q6XBH +U3bN/2BFON99zdHlDDPk4fzUNCBwk3EA2++i4SC/a8G+VD0piH06aqh8HgT/ +19vXBywfq8L5HvtrZS2Wq0LMt5BymDGBv8qsW9VhR7BVxP/jkg6nDjutzdyn +6tAX0e3PGCDp8KZ4q+jv06oOVfd/3DLWloSYx6zmYAwCmyUcfC9OjPnnrObw +HwTkJRz+fit9MCdQzeFNW2630W9xhwtXw97oV6tB3NUjDqHPaDq0iNeyZrrx +OtT/tio490LTwQRsHo+DP8g8Zi0HmY1i85kUeKDmQvkLuCF8ey2H7V4bLOb8 +5HLYoJe3mDFGy8H/iecl02Auhy3mPw6ldGk5HOze12SSzOnwB+TeZG2HmWAA +5IPcNxHBB9t3GMFfr/qked5b3HyZeXGapwV04ebD+BD/cTtMaW+Nulyj47D8 +1vLHhoe5If4y1oHSPA4tLEf7Db9rO7yofZx9PofXQXb5Cw+9++pQ8yQdzGz2 +Bk17qOEgUjmp5OwTSYi9kZoO6p9UXs7ylIK4/6Omw3ohHb50OWkHc7B6LQcD +kPHFMnD/hry9/HGGoxycfxqcThTgfHD8v1CEh+/Kby8rzjxQgqYXdTgf4m8E +H+w+R1VI/F/G5IPT5xIVOB+cfrhx8/fk17yd2aoINx/GTwel9zAliDpnJYcP +i9YrnPVQcuCPDbhvJK7sUAlKj9ZKDmtB4aCnDMlPggg+2NkrFeB8iD8F4fyS +5SUb/vXzwM2DpCduuH2w+NsLck+qIjx+YXxY/IP5pUoOTaD03MYJNw+WXsD5 +jV0Fzk+JvePG/APBf5Gl/W36XFW4fhbOLvnkdWpw82F8mP1SoPR2QRXuvo2g +9P9HBe5+WPkE8x+MD/M/evkFAFuQG5I= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlFFIU2EUx6/Okos5yJDlfHBdGmXW3b3djYoovopKJAqKsh4SSs3sIaEm +lKwokx4s2Eth0pDIh8ti5oRCemhUIhhuWWggo3JQxCQGITUWZbbvjv/5oAPf +w49xz/mf/zlna053HG61SZJUlH9H8684/447Rt9Jdi9b4lGzkoH9pj/6N7iC +rb47I58t9rLRhujW0K8y1nLywz7bPYOZSfOzPlbG1mXKY1qtweI8bgt+eSvW +7W2W2WK2MxUaMVi348qy9psy5eu3QmZPtuRetXQJtn5fENwwUbrj/l4ffZ8+ +V5ftS/goPxj1/U8rf082+UiftiG86u0PoX891zcv+gOjf7BVPuwift4RyPRX +KpTv8lwuaWxXqN73h8OuRL1CetrO5OOY4HB2/lI8pbBkdeDUZrePGTymFeoX +DD/AsxULu6aWCw4e8a/tmzLY/si4Kc0q5Dfyg1Ef84I++A/9mDf6A6N/sJXv +q7PQz0eDRSo22ts+OQu+RwzW4yp1x2ec7PXY7qH2g4LNdL26pOvEg3Mxe2ha +I64eaKqdfKBRPgfXd0GjemDoAUPvCa7vqkb9lB8avtOa1qjf6yXjQb1RJz/A +8Mua32ON/B1Rzw8WBQRbem2CU9wQl4f4j7XfKs2jxxKwifKDUT+X+fZi2x6V +9F3jehwe0l8i99Y0qx7qD4z+wdhXMPYZ+bDvqId7gB7cCxj3dIDfW6dK94Z8 +uEf4AYZf4IvczzcafQ+/kR+M+pgX9GGe0I95oz8w+gd3cf/qqgr7FNXYEN+n +nVXs57Nk7+J7wdhHMPYV7P5yYyDxSDDuDYx7QL3//z//AckFQOg= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnbpg7uK05upxhhoTDTBCQtHCouv/j +lvFqCYfiraK/T8dZOBiDwGYJh+tCnxzPH0Pw/34rfTCn0BLO/w8C6y3h5s0A +mXfT0kG4clLJWRcJhw16eYsZ31g6rBXS4UuPE3f4siEge9Z3S4cY1QiZczai +DmdAwMYKzvc5wW4729QKbh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/S0sIbSntcKRtefipR5YO6WlA8EwK7j+we+dIwf1vAgqPYCmHJ4kL +r5nkWzq4g9xrIQUJv2sWcP6Xnbe6/pYi+J9A7lG3gJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzgPCllCD63S0cwjnF2o3llSDmnEfwwfFpZ4kqvx8af8xK +Dh9A+tmh4XlP0aEErN4KIn9YEeJeVysH5WuPghnWIPjg8HVE8Pfm17ydKaoA +8e80TD7YvVqKDhJTr3BmLLKC+J9DycG+6dHxGbuh9l1Wcthi/uNQihc0vu4o +OdyQrkk0YrVyWPntZcWZB0oOy1946P1faAnnT5/AX2W22gKunstNtZTJygJu +nsZb3n0GL83h/AnBJSrT1yP4MQqOH5NzcPPB+iXN4PbB+OD0EKbkkBJ7x425 +w8zhw6L1Cmc9lBxWgNz30cyhEpSfrJUcXmRpf5v+1wwaHgg+ON+tVIDzwfEi +Lwjnlywv2fCvnwdu3navDRZzfnLD7Vt+a/ljw8PccPdA0i+Cf7B7X5NJMqdD +j9crFpOFZg5N4rWsmW2ccPPA9s/khIRXljmcD46fRwj+LVD4m1rA9T8HuW+v +Bdx8GB9mPzi9+VnA3XegVtYi/Yk53P2w9AzzH4wP8z96+QQAjSwZ1w== + "]]}, { + + Thickness[0.03519887363604365]}, StripOnInput -> False]}, { + ImageSize -> {42.61373349937733, 24.508064757160646`}, + ImageSize -> {28.409155666251557`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {29., 17.}, PlotRange -> {{0., 28.41}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {0., 0.46369207191102396`}}, PlotRangeClipping -> + True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.800005950325206*^9, 3.800005985011455*^9, {3.80000612800945*^9, + 3.8000061523615637`*^9}, {3.800006198247397*^9, 3.8000062013184023`*^9}, + 3.8000063003046427`*^9, 3.800105162005806*^9, 3.800182353061603*^9, { + 3.800182443795586*^9, 3.800182463182864*^9}, 3.801196669941258*^9}, + CellLabel->"Out[58]=",ExpressionUUID->"5b8155f3-d509-488d-91a7-6e266e7a429c"] +}, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.8000051404799757`*^9, 3.8000051434665403`*^9}, { + 3.80010518466262*^9, + 3.800105185109056*^9}},ExpressionUUID->"fcede236-1735-45e3-b270-\ +28ffe0fb3e4a"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}]], "Input", + CellChangeTimes->{{3.800953772734395*^9, 3.8009537747109213`*^9}}, + CellLabel-> + "In[399]:=",ExpressionUUID->"92a26b6e-bf59-4a18-af5e-f498abf70a4d"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "225"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"59", " ", "R"}]}], ")"}]}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], ",", "0", ",", "0", ",", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.800953775017927*^9}, + CellLabel-> + "Out[399]=",ExpressionUUID->"5677527c-a7af-4b6f-8f73-0a43e7c31df2"] +}, Open ]], + +Cell["We define the adiabatic connection Hamiltonian as", "Text", + CellChangeTimes->{{3.800005777443572*^9, + 3.800005825433264*^9}},ExpressionUUID->"397ba0ba-91e4-4f5a-8f0d-\ +0257e5c848ce"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{"uH", "[", "R", "]"}], "]"}], "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"uH", "[", "R", "]"}], "-", + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{"uH", "[", "R", "]"}], "]"}], "]"}]}], ")"}]}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]_", ",", "R_"}], "]"}], ":=", + RowBox[{"Eigenvalues", "[", + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}]}], ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.800005845720145*^9, 3.800005863070434*^9}, { + 3.800008325211321*^9, 3.8000083292042847`*^9}, {3.800075430687092*^9, + 3.800075439968359*^9}, {3.8001048544791183`*^9, 3.80010486881457*^9}, { + 3.80010493098575*^9, 3.800104944780465*^9}, {3.800105127304884*^9, + 3.800105140236706*^9}, {3.800105188661474*^9, 3.8001052010845547`*^9}, { + 3.800105297296947*^9, 3.8001052977026653`*^9}, {3.800182251458778*^9, + 3.800182276321644*^9}, {3.800253732251046*^9, 3.800253733977017*^9}}, + CellLabel->"In[36]:=",ExpressionUUID->"2d0a6b71-a35b-4eee-a7ef-a569c933f14a"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "10"}], "}"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"Evaluate", "[", + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\lambda\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800005924706459*^9, 3.800005929948352*^9}, { + 3.800005982530142*^9, 3.800005983014323*^9}, {3.800006131382762*^9, + 3.800006149454649*^9}, {3.800006192806897*^9, 3.800006196955217*^9}, { + 3.8000067027873077`*^9, 3.800006706963251*^9}, {3.800105152145863*^9, + 3.800105154124999*^9}, {3.800105208150182*^9, 3.800105208804578*^9}, { + 3.800105279412592*^9, 3.800105311489644*^9}, {3.8001070014826927`*^9, + 3.800107116313456*^9}, {3.8001092382339067`*^9, 3.800109317034787*^9}, { + 3.800165904582329*^9, 3.800165905386918*^9}, {3.8009537031612577`*^9, + 3.800953728384329*^9}, {3.800953908086216*^9, 3.800953919343266*^9}, { + 3.801202030124833*^9, 3.801202075259122*^9}, {3.801202107592867*^9, + 3.801202181134972*^9}, {3.801202276991171*^9, 3.801202277661742*^9}}, + CellLabel-> + "In[106]:=",ExpressionUUID->"a7e12bcd-a521-4201-8574-d9deecc0896c"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwt1Hs0lHkcBnC3md/JZrYSp8ZZYRqZZpeN0oXd748jWpncculEzdao1o50 +dBGVNie5Z9am7OikXcqttG6ltvG+83vFdFuJE2qbQtKQWIRGse+es3885zmf +P59/HtsdsUFRRgYGBhI2//XOa4rh2VlESzpcVCUbGFg4zbd3+4holYJ3NJN1 +o/eliENTiHb01a2LZW2vvXn37QiiP1ddqHdlPTC3t6irG9Gtv8+pvePDwL7o +VeE1DKJD9r4o7/VmIEn4lN6ViuhITmb+kvUMKAsEuQ95iN7r0rP/nAcDhS/S +YgPncOkt+TbzhtcyYPko2F9kwaEXhjfmaZwZ0AQEe90XmtDeYaeMm8QMbBAJ +DwjsjGnP7Z2h4qUMrKuMuNziZETzSM4vC75gQJ+xy9xZZEgXfdVR970FA+8n +i/O2LTOgqzrd6XYzdo9d7sqGmBkqR4tq73IZcOMcrxHLPlKuQzuy7WcJnMGr +V3sc01NXQwUBnCkCO8+H9w0UTlHnZw2n0T8EWkqs5xgqJ6jNVfsy43QErOf+ +sYK6Pk49V3lxtvcQMLV53aIrH6Uc20plNU8JyDen5JeWjlBTy8RXxG0EpMyL ++9a5Q1Rux4LnwgcE7L6ZCbxzQke9z8kYS20kULanpvvP632UQ9HusR9VBKLH +qiIyld2UPdXeeaOOgGMSZwtX8IxS8qWXl1USME9o/+xsQRulfRQQubiEQIdM +vvxabxP1Nqf1Q1whgfjE5afv5lVS98puHN+UT6A8Zw0u/voq2BrfHpL8TOD0 +DyeeSJObAUcFeNSlEzAb93O7EtgGTna+SReSCbw80LTy0MlnoOtvuzicSODd +TQmJ13QDf+hIhWw/gcupv0ll6X3Al6QXbpUTEE5UmB8u0EFfnX3CLRkBbfUS +ldueIUhKELkXRBIIOfcybVAxAoqjvv2FoQQuXMpS+Z0dBXnadPxcfwImW2OG +OAnjsGh4/qjeh8Bf0rKSoJMTkL2tPjAQE6gz40dOyqfgsUOjUrSWgL3S9g3y +08Np53f3hc4E9IdOfqoI/giW60t70pcTGNRb8UrXzIC8urknVkDg4u7UdiuB +Ac50iNeorAgoPB5kLRYa4qVar7NOCwnwYis8GQsjnPkuXiIwI9DgVa+6zjfG +DchtIIlD4FPMdtdQngluOLJzX8SMGgzR41/Fn0zwaqdybeSkGlw3xBFfAy5O +HPzJuXlYDfq/r7yxGOXiLCNVbPUbNXjJNQrJBBePvIpqzWWdPd27JkXPxUHN +PJf9rG34VunjRggvypJOuLD2CUsXtZkjXGxhcqyuXw1nWqOiFasQvu2wMaP+ +tRocm6zfmiYgPLipq7jhlRoOh6w743kMYf8VydxC1upXIe6JJxCuMhfvOc56 +s3F2li4d4fjOo2LM+gie/lKjRNh4h021ulcNmlsdMSm3EbY6uJtq7FHDAt8x +CxWNcFLYPNtLrCO6eA3jjQh3r72ZnMJ6eHI9T/YQ4ZIZU29v1parais9tQi7 +pFU+aO5Wg7SxJTSxB+G86DDHUtZlwYMzVa8R/uBnoEhj7R5n5287jDA1Pyj4 +O9anDL+dDB9D2HZcXyti/UixpVAxiXDKkyJLU9Z8m4M+mmmE++v9Dg+8VMP/ +/4U3Frzvusf6XxYYZG4= + "]]}, + Annotation[#, "Charting`Private`Tag$18528#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwt2Xc8lt//B3D7FiVUQp8kKiMlZZXxvitZIVlRkrTLqoxSFNkyQ6hk732J +Uhwis+ydbLfNTVYZfc/9e/z+uh/Px/nnXOe8z7ner+vea2Gjd4OBjo4uk56O +jvZ7LTto9t8/UqmgGe/6mbBY2L7Kf0BhjVTK8mC6kO1NLFSoJpo6rJBKoxx7 +9BpiYuFA76eaKSqpdMCyWdQ4IxYmNg/Fdw2QSot/x+nfLo8F27syxkQ5qdTQ +eSTCbS4WXPZ3l970IpUOcnU9j9aOg6g3wiE/OEil6ooT8bbM8fC+z9vm/CaW +UlMm+6CtIQnA06h/TmwHc+nK7ZJdpfRJUK2rr1K3n6l0XSWNyeZWMqiL7bcT +FmIsPbn5yo+R0RQ4kWWa1CDJUOqmx/ZyVjMN/vre3HZUjL609Or2PeuV6bC4 +nBBmJkJXekkpbOmtbCZUCIVIl1htIGat034tXlmgwPyMOHh9DclEq9NLzWRD +KFlO7qTzX8Q8nv7yfFQOXHtrPDLxfgXx3b1C91UmFxqSBTbRRy0hnh8qwN2Z +CwKbc6RQwQKapHhsfL+VB2yClIbxtHlk6sAy8WI5D3restb1x82jjLqqoPA/ +eZDJd7CyI2oe2Xe4bSSv5oHuNtsv33zxeMMJ4ap/eRDO8jcl9u48Yvpbo7RE +IkBoeoubifg80mn4vLidlwCFIhnpmtQ5pPyxX0hRjoDNcsaSpbFzKEPrntze +4wT0Ek7ihZFzyJ+uI4ZJgQC3TCSY6DOHtGf5r1YqE1Ado7HF9c4cmt1t/5+M +KgEGXpcp8mJziK493OOzAQGWBh4RKSlUFD+98ErTloDYjaJj4rFUdMnPtLX1 +PgHtKdT69EgqenGFuuvyQwLI65eYs32p6Kygcs4tBwK2Jx198MGSigJKfZ9c +f0pA8XLf2a9HqOiMbYvAHy8C5mN3jJ4Wo6Kn74uoV30IENE66/ZtLxX5ckz6 +VvsSEBxT8LGam4pOyaFNgf4E1IXwn40en0WLUTENdK8I+E/WfqPw/ixq+B2R +aveOAE/ffunPFrNoMpX74cdoAqi9Z++V6M+iC322LX/eE1DhJdRZITOLEswj +ztnHEWDV1ZDb9GcGHe/q/6uTTEDJU/Ebk64zKMcnKM0vhwDz8r46gZBpFDmv +k7G/jAA1pZUbv1ynUZJQxZfDXwk4XMhJ9/b+NNKoujguXU7AWtpJab7z0+hW +WHOM/DcCIkLi327jnEbLjy507q4hoPHqLSvWgCkk+4HdzqKRgMKfz0hVzlNo +MGGjVrmJgGjDiFgPqyl0ypDzMW8zXn+NmjYG7SlEr3NtpryFAFapg8rr7FNI +4lV3/Wo7ASfpZjnmfSaReM8YLPQQIOpESs15PIm4xvSCUn4RwLmw57TNnUkU +eLgn+GIvrodRXccp9UmkyrulrLCPAKeGvD4KaRLdjux1uTBIQF60Q85Pjwmk +F+SwLjVKQCRvoGaU/QTK2dugW4H9PCR52PjGBIrypXwyGCNAx7OTt11lAslK +KlFsxgmYsDrh2sg4gbJ7jA2CJnG9Km2c/+Y6ju4HTf9wmcXPz6UkEflgHLGq +sDlPY7tQnrBYXRtHWz5+bblIJaA78E/R9jPjSFOf21dqjoBXgwvC11nHke8u +nvCGeQKYvCcXGQLHUOymqJGmRTxfU/HG9mdjKFrv/vZDS3i/pO6kpdmOoWUJ +yiEv7C/dFDM9vTGU8KROUn6ZAPtDg1WxO/D45u52/xUCKM2dkeS3o4hhruQb +2yoBock77bb7jyL4M3bWCPvUUyOdMedR5MM48DsGO3p/K0PQlVH0Jcvuw7E1 +Ai48arjXJzSKBKyM9c6t4/O0u1LJJZWC2Bcy71z9R4DDPBOvXhQFvflqcCMG +e1/V6fn9fhRkwDue1Yv93LYs6YclBc0sesiY0OWDfPmXrbuPUNCuILKeKn0+ +pN4mBj4XjKAZp+tFDIz50Grxfs/ZpBG0xUqaTRGb7rLf5e6wEfQucjTXDtvo +/LWuFbsR9DEmjHsYm+HEtiaZYyMoYunwxc9M+XCR/WFpdvYwEnjxe1KbJR88 +mK9sKL8fRudLHlQ6Y+f801SsDxhGNaWMuzKxWRaEPk5ZDaOAvsLjbKR8yOtp +zhaTGEYukaeflWCzZR19H58yhNRbKLGcm/JBJkXg19GIIXQnUmBSHts8jm3X +V68h1CkeUW2OXRA+GN5/cwjRKy6fyca2eBYSsHv/EJKyzLJVY8uHIt1559ex +g8hcWy/pBns+3P2da+oXNYDsZXpDrm7Jh0jZOYVbvgPI3+aFnAt29eMju047 +DaDd34rDo7D302V3/TUZQJQOEe9m7P7NGUZ3+QaQEEusFnDkg+GBJF2NiH5E +/ipEv2VrPrjfGZHc792P+GJNU/dj52Xs20r/qB/5KRXuVMbmPBb/4+OFflQ8 +ZKhhjV0HMZqiO/vR57bbXN+xXfOkfTgk+pDJxX2Fzpz50CtPqFWy96FA8fes +r7AVkRSLy2QvmnA1EUvBXqo7/GI6rRcpqgd0N2Fbjog6fxfrRbueRW8S5soH +Y97d931FfqGtRcv0xdiHXZhNWIR/oikBZ7Vm7nzgL2p8Pcb0E/GUbagNYDMv +vWmvpXSjb7M2YlTsHqujBoFp3Sjw5aGgLdvywffylXO8R7sRxy9YUMUeVfx0 +RvxkF/p544l2PnbzI3f3zcJdyMm1xqkMuyT/XPkMUxeidvW+rMcOl6CQiepO +JFiiYD6GrfLfNkVF3U4k9SGmhn97PsSsWh7VudKB7mnxtDphv5STv3/kZAdi +sLt00xPb8SFjDrdwB9LoDuoPxtaZjDzUQWlHvXvd/FOw17srRc2t25FUh3F9 +K/bFIsE9D5zb0BnBP5xiO/Jh2+NW9vA3LSiiXSCtDHvl3x+uWacWpF3voFaH +3eu5h1f9Ygu6HSVc34qdEnp331/eFqT5jy9iFFs5h07JLLwZndHPE9rMkw93 +RiWsDwQ3oYLbX4+ex9ax1rN7ZtuEvGQWHUywpRcdnTrPNaGnbCjpKvYGQ7mn +L0cTWq6NqLmPHSpg8n7GrxG9+9y6JxjbJZ0t1mpLA3pzOEH0O7bGJ8PMPd/r +UWNWiHQL9vaqmE9NvvVIqHHmUDd26qBsswxrPTpXZDw+it3Kd41xg+EHYnpc +7MGwMx/EvT/fCFipRTHvWO9KYy+GsTwgF9YiWe3bxiewS+PPu8zb1yLmkjwZ +MrYhGg03+l2Dai+aFp/Ffr60rVpgphptvDrJaIHdcd1SPHuoEsULWzj5YZf8 +0pUrSKpEiUIkjiDsJCMZleI7lShNs+lVKLad+sblutlvSLmT3eEdNqdEUPDo +agWazwwIz8LW+E2s7NlejgaX2vXqsY9YRjCLdHxFNtodHM3YvCNPuQ9HfUVh +774Wt2FT2s9IKAp+RSFPPRZ6sN2KOq4YS5Sh2k2DlRPY9ozL/nt9SlDY4bck +Jl5cX4soWXJrCVqLZF1mweYe9S5TCitGobf+dm3CzqrlXzSJ/YLCVAOdtmJT +gpVNQz4VIQaXyyL82PkvSA4xUIQa7NqI/7Dd7BsDs759Qm2iXNJ7sPeYWJTX +Nn1EnyWoW/dhGwt6ijNOFKAiPXbZQ9gHuM+pcNkWoBvj5lclsRcYec32LH1A +LTrZz6Wwg0dTgxUYPqDYazpvZLBrs36sPOQn0H46mZNK2BEx4dxuMXnontHc +ZsC+GXJFIuhAHjoU3/ydjM3oMHcl42gu+vd+p5gKtqOTeEBNWBZykZAw0MTW +maG2ZydlIgtht6KztPlYFO4JL8xApZJhO7Sx2zRUci260hDnPF3aOeyMYra/ +6hOpyCbQfEgX212q6ZTkagrK4/Lj0sM+xmfWuvpfMpJV0dYywGbz37d78FAS +UhybMDbEHqSbvFGtnIiCjK9cNKI935jjcqh5POo83qFgjH3bVJn85H4cks3s +22WCTW5k8rnqFovy56qpNPfaCMuYqr9HKE318SVs/ws5laJ336HIo30SptiK +oGS86PcG3cozb6N58kDteFlmJNoY//7gMnYUx4UnAQ2v0ZTTfmYzbI2loc2X +5sJQ8Pi9lzSv/LKNFtkWiqrexrJewU7+ti65IB2CWn5VPabZKNO3rNQoCD3p +7OujmU1cMol/7iUyfTNxwpw2/z/qNYS0DwrcOe5Lc2W1xZTWIw+ksLengWbh +iKdbKZ9d0QPrik1XsRkaJG5sbDxBeRFx8jQXW5mnH/G0Q3O7HE1pnuMVHfrG +fxfpXDhlT3NjhkCfgZ4RavdjekEz09Wzgt6nlUG4t9iD5tTDcY6biyygwNDa +mebIR+8WW9psQaxnx12af3XdyY7VeQQByvlnaRZSkL1jU/UMrCU0hGg+puMa +LBDzAlzkW6dp821zuWXtYeoFLJ0GWTQ7ZmufneL1A5Frtddo5u8/JqrfFgCj +26U5aDZj9Wf4pR4M62zBmbT1yRaku88p8goEVftP0kx3/GHfaeYw8EgVrKOt +9/nzFG3HoXBwWtXVoDnujsmXtLIIcB62+ULbL5UoiORyeQt8/g9dafsZlpdH +OmMaDRXshi20/X84wq2guDsG0t4L8NNcse6RarMaC0dOWXjS6mXKB5n7TMSB +yb7OdFp97eD5szO+Kx6OlB+qvEA7L4ctPdsLE0ElwrqLVp8BRYlK1KQkePHB +oJlWv4WqfQubwpPhhylnqT426xW9a0p2qVDdsPb4PHZaoDw54Ugm9F7Xv6VF +24+K919I0llw4eR/Y7TzdWWF5fg9uWz4Th93SQPbN2eCl+99DpyJaeRXxVbm ++8TVn5gHcodE/yhj3yOmGoJFCLAVUdv6f+dbWzDgdCrOLa+Xdypgz7t6sSVn +4HMw/5tODjtpwpDRmigAckHckcPYLe4+ZXtkCuFxTnj3Qdp67yl+1lRQCHK9 +Iw5i2Bf1961JF30EuzuOnrT7aOuX+YXV0iK4ftObjnafPfIPpPjUl8ALh1Zj +BuxEkfIEBV0EGsov9/3D92dz2ZLFdBMC93jOwVVsntUsm5S7pfBhr+HRRWxb +SZ4pdusyENn95sAo9v6I4eFmu3IoHqToV2Mr3tgoT/9QDiNHOeUqsPWO8sa7 +L5WDVrAqeyntffL97FXZRxXAcT3esxC7m474FfnkG4imBlYlYgfccW03d6sC +1yG2G8+wvevoPwyXVMHAG/NUJ9p9f8jt1e3VKvgp39Nnj+0456Zra1cNI6Gb +hS2xzR+71z67WQOMAZ/pjLGlfLxKojXrYFDjH/shbIlJ0jshrzpgn828J4J9 +QNv7SVJ5HZyb9PmyF5ufy0c+S/E7tH5wl+LBZoj0zSs+/AOU94bd3KC9X1P8 +k3q4G0Du4vBUHXY9G4eH+bkGCN3RafQNu9oy4NqwXwNEBtbmlGCbRahxOjA0 +gv/4BelcbH1T9R/OTxrB4+5nxzBsxWENNX+rJmgoYem5iL1lQUsh43wLaN7T +sOnE/QZn99Frjg9aINv02Uw99vZSXr9Tr1ogiE/6wjds/pfD3Z2tLUBn9mw4 +F1t031MnZuNW4K9Sm/DBPmWQ/snMrA1Ut+q4yGCfORE8IPasDV6zabqJY6sL +Om5afN8G5dZ7rPZgn5s6ZeI30AYbW6KWWLFN3btXCq+3g3+xZ0s37qcc8jfJ +c93rgI7zy96PsR9HzV7p8euA/g9SQ5bYT5+3eSVndMCRSPa95tgvtGI7lGY6 +IH2hUFUVO2hY3vHu/U7gfvP8GBd2+vbbBeWOXfDK5bNpLO4H++0qpR3cfwKJ +qsmVSus/q5n5UxJ+gnoZZEdgd/535l9XxU/ov3tTzBu7saK8Rom5BywW6XNv +YpduLzNj9uyB4IpTTELY7/M/e4d6/YKDoRVWwbj/jWJdtapM/gUlPpJJLtjh +pif0V6rwOHHwwz3sAKZPu01Ze6E7VMXwDLaLQUGesE8v3LJPDlnC/bXZQk5P +nm8fPFzbiNPFvqhOLRtO64OW38bcCtiGbyWTeer6IMjk/Pn92AeEOuSLmfuB +Iiuu+Af39wK1hox7Vfvh9IZdYTQ2B79+xFhlP4xykOv7cJ6Y+aT91bF6AGAn +s4UsLX9sqrJ70jEA5xL83+/CNjUmizyjDMCV2/vi6LBrl46+9GQahCdiTAs1 +m/F5PsZrFEYeBL2M6o8m2KaZg+N5HweBhav9iBXOP6/WLr0tqBqETm5XWx3s +2rNtOkXtg5DyU+euJLb8RBVRtjAISctkHyrOT9tEMp0bjwzBq97bZjbYtTGO +XDMpQ6As/SbdDOcteiq1fK5wCFTk7Q4qYMvDXYfFyiFoftl+YSd20i/Tn2vD +QzAqYJFXz4rzDf+pRPa9w/C5YV3vOLZ86ObjYpHDMKzzwmQd58Mkr1jz6z4j +cH3LTgt5nC/Nc62yMyJHQGMT4wkmbP6fxzcWUkfATdDPrQHn0YDDzW88akeA +ka748nVshzaGjiR2Cuyd3MHsxZAPqsLXtcf9KZAQFEHOwnmYTvvIW6loCjRE +NovbYhc5rE08zqLAxtyha1LYh2tDvdkaKCCz0zE/F+dpnvvfyg9yjsIleteQ +1A2c70sOnLAOGYXPiTDyEOf1mLF574K4UXAZfOMghn2RG3Vs5I2CILOmeC/O +9/U3LtgHtoxCbL30lAp2wWbvnJztY6BBWXlO+kuA58XxA7/Dx+CR/uD65WUC +yO4f7BWSx2B4/oEoE/bfTNeKF4VjoPzUQTl1iQBren6L7Z1jELn2dDd1kQCj +FM13MnzjwGFjfdx2gYD9S+nbHr0ZhxNBT3Vl5wjg/XZeKD1tHBz+xrxupBLA +Frp8pPfTOFRKNRB3sKlSp3VUOsfhsso904hZAr5YdXtz7pgAAbpaptFpAgxG +WDdSAiZgMMdSU3WCALX8rM097ybAy1J2+/dxAk68MNi1NXMC1pKP2eliC+6N +kbevm4DTcvIU2vecSVO5hydZJ4Fpt+duLQoBbq03xrpcJ0H/zZoIdYAA+3j2 +5c3Bk+CXIXj5MvbtB7nM5JhJqPJbHK7uJ0CHc10oqWQS6hkrfkb1EcCnFXr5 +weokpCfuo4r9IiCn/Gszm/0U5PuI8cx1EBAfcntAyX0KJiR53U9ih1/loNq+ +mgJL1eeMQe0EPP1nsqUjdwqY/VJERNrw8yjMqcXPTIGgfEW0UjMBvXl7ihVu +T8OvFbIa63cCfsg/EBdynAbdLHdVxTq8PiUVr1k9p2GvQqacdS0Bb2rvPGiL +n4aBwI8jddUEGA8SIjZ907BTvVPS+hsBTVzqIXFGM3B6O/1XrRICSl9H/fO+ +MQOPFt4NmxXj+e+etrSxmwE237Wf1l8ICBALUVMMmYGzzyTPeBcRoHmyZ63t +xwwkPU+eiikgoMLW9tamM7Nw7+enU3eyCCCWvrbO6s+Ca5Woo3EmAXFPd5xq +t5iFKd2LzmcyCHD1Lvov/vks5BaP0fOlEaAcw9Ss+GUW0ulsmZMSCei5pSXw +kY8K1DD2bSZvCTB83e89GUSFq3HKL4944/moEVvoI6lwzoG6udSTgOpljxCe +WCr4aV1S0/bA+2988O3JXCooN31ZMXcjQIDPIft1ExV61uY+Wz0lYCyKvf00 +9xwk3mcxFLQlwClaVvjtqzkQ8fx0iWREQHTiy2Kt8HnoPsD1rvw/AuxEteI6 +3s2DO9V9ln4XARrp7F4WifPQFZQoCHwELOT46j7KnwcG23nRgh0EnP3iPRTf +PA98AVd5XnMQsNLsvmmV4zd0sdY+PEBHwHk6Z8NUr98gyX7hiu9gHjBdsppm +frwAXQ9Ydv9IyIN689RkPfcl2MeaLr2LJw8+bOG/vGy5Ainy0Up93rlwIGrv +GEnrL4QflzvUtpIDfx3c19P11+CzII9n4oUcmPy7iyNFfgOEL5vV1ThlQ8wt +r9ZdwnRk3TuvK933Z0HQye8v+fbTkyOqZ344N2bgc5p+qnwHA/n8nJtKtX86 +lKh8LC7gZyQXJG1z9jqYButWV2SNOJjII3eYzBR+pQA9qTny4DoTudyGeBgY +kgyy6g++atKxkG8++WDVL5oEf3syxnbMs5Dbihe5qK0JoGJZHaS9xELmkCuX +X69PAP/VIXmPvyzk1CMfZNhqEkCQf5fPAgOJvCB/IU+4OAHULviItWwjkbmG +Kj4aJCZAaNONu0EyJPJX12T2bPsEOFwpMMX2mERWl9ykd4YnAR4Zngg95Uwi +f9n/4po2ZwKUDRsqOrmSyFa5AdqGbAlgwOj/ctyHRBZlS0y/vhEPT8irEtVR +JLJOVVuwKyUeqos6rDy+kMizMrjbKYgHbs3fO4pLSeR9zMGfPuXEg2kXR8lC +BYmsp+Yii9LiYXb5DMf1HyTyYEt5cU10PPDI5Ged6iWRBR7MMP7yjAfzigYj +p0ESecr3u8PA83hI1Z/cyKWQyN3Gs+UjTvGg+EDo3N5ZEnntpsb0tHU8eNIr +Lxv/JpHLP8TXzN2Oh8Ygk/dBy3i83fv5okU88Avaq1WvkshH5Ni4/5jGw/// +f0W+IX/cZc0oHv4HSGhCUQ== + "]]}, + Annotation[#, "Charting`Private`Tag$18528#2"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwt2nk0VV8bB3CzTFFJphLKmEhIGfYJoYRSRJkiEQolRBmKMiVJpvxKQtJA +Ofdm3teYEhmTMkYq8zxdw/u01vsP67OOe9yz7f3s53s3cQcPMycmBgYGefjy +77tjbuz42ho7bZjlVpOfEon46cJSGsvstKIQ/ulr4Cr9TGufBXbarKrQ5gCw +VHfhx5EJdlpb8o3TN8BD3P3POvrYaZcpxUMhYE9XVcv8SnaaiL+VeBQ4cOd3 +2vk77DSZizF//wOnPJKMq1/PTpvfkbpUBX7SE+5xnIONdjkQe4nvIZFA4wlT +2c2stE8dO9RvgWuPndCr28lC22ZPuk2ADWV3ektKMNPCQq6XXVMmkTX72I7T +25hp9yU7hwLAnr+obbHCzLSIjEeCgeDEp4b7Vjcy00K/Ir+b4EEh96VvzMw0 +ERc9wyhwKGd+cMwvJtq9j0G7/gOXDxN3F7OZaHSXPXwV4ANvrLO+KDLRVKIm +H/PtJdHrNj4lijwT7YRb3PlN4O0rVYUp0ky0DYlHlQTAbEcV6p3EmGizVQKf +RMDNf1em6euZaFsXDbdIg113PjkoM8ZIOx3lJKwNTknt6wx+xUjL9rb+ehG8 +FHl+k7IsIy2NPvKpFfwm1KNabicjDR07IvYN7BDo5yspzkjz9HXx+QH+5BX5 +g1+IkWZNzO76+e9+lm+eza9jpDltIovHwful5vaW/mGgtY/MOHCpkMivPOyk +YTYDTZ9Rc1oPPDuf8dBWmoG2nv8wewX4dPj7xFRJBprVDpmBajBN8FPydzEG +2vNMm6qP4Oj94/9ZCDLQ3C92xTSBJQL2Z5lwMNBONb082gdOW3508cbXNXyj +zd+DUZVEpzjGcrVs1/DCHq0remAJuU1kocUaPucwWWkIHjuiXqBquoZ7WxME +jcGh0TdpCsQatpasqzcHv+Pd0rRVYg17LF12cQavFyCmVn6t4pyyV45R4CqJ +OJWyi6v43ZNTj76CTb7eHUp0WsXOih7dP8DfIiLSvGxW8aA4j3QfeGQimHun +8SoObl6tHQZvwh4DUbtW8b383GOMajC+Z4zjrYZX8IHvqr4KYIb4dTMzLivY +rIU4FwmONGDJabBfwWwfTF1j1f6tlzW7bMsVXCwj5psAlnGYrztjuIK/iuzK +TAebKg0+q5BewUFntE8Wgx9/rjwRO7iMAyMerBsDa7AG5cufW8bTOnRxq33w ++sG7HLHWy3h/tuhTO7DAh1S7mZPLWEguTPo8eCK8iKv0EDjhzJEr4CzuOUcT +6WW8uN/7713wRv6L/F5DdKz8wiapCvxH4sxVqicdHxtR2qKuTqKvzK51whfo ++Hd8RBICVw74iQedpWMl1CthAH6clVBvYEbHZF2NmQX4hFzzzo69dLzKryF+ +FVy25/BX+twSFn1jfIcExxP79h28sYTF5ktnDuwnEXPNeFfd1SXcyCUYpQu+ +bJQdanFpCfecP7TrKPi4hVCzm90SPp1w4Z4NeL073T3h4BJmbeT9EQwOT8Tp +w6xL+J6baspH8PUxg/UJMYvY+myb+bkDJBq+wkDZfmcRL7DNe14Cn14sOPMy +aBH3Gjck+4H3s8i9oHkuYo5Kjs13wXNC3HrDZov4b8h7kgr2PNR4jdiyiPki +pt9ya5DIMdXy19CTBazMTw+oAseSv7VaEhfw/JfkmCZw2WefhOJ7C5i+lZ3a +DRZeiTeIDlrAl79z6y2CG22aXijYLWDZITEHRU0SaYsdueS5bQGzHpFqeQIW +SteYn02dx2shCnwPtEikX/TJtDt+Hofd7d/xDOzdbJVdEz2PXx1PMc8HNzL5 +WSVeBzNJcLeCbzuSxerW81jx5JU2AW0SzexQCA4Qmcd6hhPC6eAvz7dxMKbM +YdUtBylNiET2ozRG77g5bMgtETEAnlJ2XBqMnMNi5a8C58H8Zc+HPwfM4dSp +zY1bCRJZtio1JNnMYW2m5s3u4J8Mug+UxOewyUzIDd6DJLqi/yvqmdAc7mX1 +S9gBZom+EyqwEe7nO/91P1h6y+ery0xz+BKjWuM5sLuCuWXtwCz2e+KbWwKe +s3Leap89i9+FLN/y1iHRnSccAi1ps1jpyIvD0WDBXy/X6yfPYiHjLdoZYA3P +iTX5yFlsHq1JaQUH3772c95tFrseUx3ep0sizvyo5/cUZ3HRZa0Jdj0SbePO +24OpM5gT16Q2HyLRpQGZzntvZrDhl6XJaXBZydPb9lkzuK2s5uFmfRLZXHzw +gzFhBtf7ydRbgVMbfML0rs7g+cssgoNgoftaHR/3zmAhSuomXkMSuVyg3kqR +n8HuJnotquCCg4q73SRnsC5/8LQ12HJq+y3uTTPYXP/b6VfghBMsCqZT0/gq +o9KQ6WEYb4G64Na8aZzRP6b/8giJzo3pymdmT2OWQ9cp38BkTUnb1bRp3Pyi +5BGbEaw33zdyW2Knsdz0bJsjOO7b/VYrj2ncUC69Z8dREvE+spTpUYD7K+8R +KjMmke2VpubcndPYc9j92zT4jdGRG8Fbp7HCB1kFOROoh8sazeI807jROu9J +EjjaRuz6uZEp7Hzl8eB1UxjP7YNf/uZM4Wrtm+xOx0nUmbqurjd9CvtE5zBn +gF8Lyde0p0xhMeZGsh98bJNnSXXkFK4fcSWczOB52Zayn7pO4cnd/gZeJ6C+ +j/LctJKbwr9qQ6NyzWG+XlC6cUxiChsNLEvQwdWDZn4GwlM4UuDmfwYWML69 +iZdUOaewy2CeYT/4TYv4mQ1Dk7jl+1rrTkuYD0WqKh9fTOIZt3Nt30+TiHuf +pSLt6ST2N804oHaGRN35/nLvkyexEfdacRz45mu8PTNiEn9KapAwtYb+Ie0w +T8iFSdzY+mqyzYZEJ+/YDKrLTuIifFhT7Cz0MyzBfYrikzh3/fLxGPB8cHqn +lNAk1im5+GEVnOL/u5mfYxLvMMvo73cgUe9FLzzxZwLrfjE6i8/BfD8ZlpSd +PYFdotuCsAuJnq4W7ZV7OoHLZevvaV2Aeps90fAyeQIvRk9vKAUTK2dYcyMn +sJvoaADNFeZHlvJlivsEnpbFph3uJCqd7zGqUJrAxiNxuy28YP0+3fxbV3YC +N8ps3zoKlj5qdLNafAJnOpHvwy6T6H4ataB24wSuEdm4WnyFRHVxwkaP/45j +YVkVGS0fEomqXV197zWOQzfIXY8PgHoS2atS7DCO+1Js7xtch/2k28it7MQ4 +Li2vC1wGV92R+FalOo6vcRFDboEkutjx5W3T4hhOG1tSORsC6+m6nNNwyBjm +6ioqz7oD9aayp25b3Cg2DSRE0x6SyEBrwakrZBTrPnDfnJFAot3v+RhSvUax +wgU1jZxEEi3nHFQROj6KJ3NnGEqTSZQU9yx1E98oTomSFVr+D+rfWeeL62JG +sCVFm6cri0QHGcbXT0UMY8mc3xNsRTC/tFaPV4f8xdEKs+2PBkj0wiW/r5j6 +C0sI6RULH6Ag1+m31lEpffhqqBFLRBwFJatNajhH9mE/l3OxDQ8oqPaakoiu +fx9WWc95fNNDCtrJkNuxZNWHTynWuqYkUlAv9ysLV6E+nO1s1fk4lYLMpbKO +HU7qxcaMbBlBWRQU8k4lYv2uHtzzp+99UiEFdavnG9Rw9eADb9XuVBRRkCbe +wxY43I1Fl2rPDxdT0Fzd7lujOd2YBxebHSijIPdfMjc+y3ZjLbWfFZ8rKMhS +cKtXpHQXzhOoVq6so6DdgaxWbJI/8EstS8mJTgoSLmpM/MPyAz/QnHL600VB +rHOPvn4a/I5/9D3HPd0U1HlR+eS9nO+YPvibUtdLQZE2dqaCyt9xBvet1KQB +CvqtWXhI7mAHvsvZWMc6QkFpdHdlE7t2bJPET8ouUVD0PnUvpYPtuBbLFTDT +Kcj3CnPeRsl2/PngsfJOsMlwskL74Ffc/aS6N2qFgla+18jYX/qK15Ee+t0M +VHS6aLvY5Rtt+MfrvcQJdiradK2VK+FRC/6+h4n030RFC2uLG8b9W3CRYi67 +Hj8Vdd8WEzQ83YK/RWtIcm+moux41x1Lgi14b+ZAbpIAFWnnMWjZJjTj8Vtm +G54JUdGF37suSd1vwvumWm5fF6Mik0tm3kGeTdhdmGGr8nYqUpn19f9m2oTv +hB+9MgheZaq8Hbm+CTvK+9saSVBR/DarJ2NRjVgk47ME204qCnzJ+fQizxfc +0FPAjOSo6HCh+Wuxzw1YuneTSy+Y/0NaYVNkAyYkWsKC5anoxU+1ZtV1DfiU ++tRwyS4qahVyZF5lqsd9N/ktpRSpSC682Clm4RNe5N5rW7yXitrPucvl9tdg +uczUD8MaVFTWdWwfNasGP3d9Wn5Gk4qyLFT1Si/UYJz38eEnsLfhqk3deDXe +2vm8LkOLivh2xd7/Ta/C0QOFzkYI3t90/oIYfyW2/e+RylkdKlJyT2KVbq/A ++VU3CsrAgr+ub9ydUoHpz502iehS0eDXQ7s0t1dgD55k40bwzaJ2O8td5Tiu +aKFh1yEquso8f1c8ogxb2J3pf21ARXqz+LkibxmeLPpYtQDe+Du8XOthKeZC +Xf46hlT05pPwrNXTEtzlc/VcM3jwvrZ1XGERll4Ukxs4TEXkLXafNFSEtSqc +X+88Ar/vauO9N9WFeNzMjeU8WMzKofJTUwEO244U+sGW22/LMQ9RcZyot/MX +IyqS2miqt8GTii9kjIexH6WiGWZBW7E5Ctb84u6rDb7/+8V9DSYKPrAs2pIN +/vSmfuGKcD6OjT3p5mFMRUlpCRtvpr3DK53tYo/B5+PsdsVKvcNLrU1ZdWBm +n0m7V8pvsciRKXlJEyry9ZeL+fjwDW7jitxQBTYZm/iam/Uai3sNPPkDlnJ4 +L5bw/hXmsN/CzW1KRW2H9d46dOTg6ad/bpiCX5VyLhkOvcDxkddueYBD9zTp +KNKzcb507fkY8F4h21a66HNssi2qphbMeXfH1p8KWbjfd15nAPyTYdipVjsT +r93e8N8q+P4f3/l4+2d4SlV/SPEYFblYaxMBXumYpm3bpQ8mGlkizt58ipcb +tr2xBnd7SKpaGz7BYpWP/oSC757Kq5Fx/Q9zzJ02SwRrIi3L2ahHWNakNjkb +PCz16W/562T8sm+wrACcsv5UQMyXRFx2paj8A/jwXD/3mcmH+OwVg/Q28EKX +52PpTfF4mB5n/xP8vHpFcUYlDse3pi+Pgi1eR5bTLGJxrecNnwUwp5xilvBk +NJ4ck21gPA7vf9HwY75KBP4hlMfMCa6pdRg56heGk5wFt2wASyZd5x0sDsGy +S27rtoCZvuxyWl0NwKKPyXYRcOlF+5dKt71xbt1yqBh4UlCmv1rYFZdkmvJJ +gBtfbes5aWaBt9ILrkmCWc4abQ/X1UaleofK//nF7nRf7iIH2FcZf//7+WS/ +/2Zb2jxR4Sh9aDu4q+NC7lMTP3QkXqd+K1hCQ+2Cx4cgpFU6cFcIvNck5P62 +tFuoWHVqFz+4LdD5Upj1HTTgHZDDA/bNNTYaEYxCHqn32djAwr17ZU60xaA1 +H/2DKzAetuvuMnUZ3kfUa69OT4NztzN48Uk/QPIVX83+gBn2X+nRZX2IJAU7 +ZDvBx48PGvv2JyCWkQ89DeD0C1YlOeVJqPpUgTcNrJeCkjcEpiKWF7MaaeCH +796xH7J+jMx4PC/FgK/82qihuTUNrbIZBAeAq1bCXnjQnyKDaXcdM/BIBLaP +GEpHaVljUxrgzQKLW551PENTHsq3doDP73a//fV9Jnq55K47BfMxpihTayIr +Cy0VPLrSDn6v3zPDkfAcDd9evlUMXmdn5qjl/QIRfnWHgsE599SJDKXXqESK +9fgyrB+Wqicl7CpvEO+Fqx5tYLsFtv1u+3IRPdFG8zU4Mm9IUOhJHtrfbvjT +EqwtVLihN/Mden4r3TEN1qtb/siX+9L5qOxB/9Klf+vbeHuM7ot8ZDwqpKMJ +ngq5w/n8FYlqONX6mqEeZA2ZM1/KpyIvBU6XCagnLaER5WKq71F4cn0oCWYQ +Kw1qor5HGsc1T/iCT5/YsaxSVIAGj7GzLUI94i2ZmqHTipDBgbmPI1DP/O7e +G4xoKEPG96SYE6AeZkpXZmgcw2gHH6flIXBz+ZzDaBNGvw6+cpjWpyIB+huP +bFcaukiaphiBPRUFRrgulSPSc9+jET0q2pk0MNDsXYkeBvpKTx6E9em0WvmS +Uomq48SXo8BmyoLPQucqke19v6id4ODPRmfV/KqQs/7tHycJKvrOkN+VHFCN +VteVHcnQhr/PhZCv9jc/IGWKDoUN9pfwOkbKQNkHtLl99NbDA1B/FW4+cKF/ +QAybDmtKgn0nbx7z9K5FG+rM3DT2U5H9tdBPQec/IrvQnDrbfVS0J+JO2eMj +dahKVb7HC/av1uy7WZ0bv6BTtzJwHeyHDZzrw+xNvyBRO1t3dXCte4zjQNQX +9N2Za32GLMz3JAM+H6ZG9FurcY+fDBWdsDasvxHQiLalibHxS8HzDhw2uHux +CdlJvdAUFqcinpmjGq+Ot6Dx7TzfHGG/5/uu7Oh7uQUpb/RqSoN+gJ8mGKXz +oAU5Gho+7YR+QTh64Pu31hZ0tiu/5hj0EzI7rvuzWrYikTbn/fJ8VKRz8mWh +rW0bMlZyMnzBQUU+JIf6Brd25Kj2JboB+pde7xoVn9Af6FxWXv0A9FOdtazC +2Rk/0CnbS8F9Pyjom+ihtY6qH+jB6zNE13cKaqyq/KjF2okyCleHmr5REI2/ +3Jb1didKUdBmymuloCdkcXj8nS6UrhQ8jT5TkO1MXue7yB70vP/zKgn931ih +cYVvbR/a487ZIgv9Zdadp/bnIn4hx2H9XmVD6DfnXm7ye/QX7Y+0ePR8AvJv +9XGJlzl/EX/GjwTncchj8fNK3YV/kYVzioDMGPTne3RN9L79RQWkeH7OMIlK +Ln4P59s8hJr3pbVSByHP/Fq3mh0zhOppQt5jnZB/Wp3+dIQMI/NLPmpLH0l0 +9RnXPPf9YWRxb4NkSy3krctvWYm0YXSKOiL++gPkQ74ViayyYeQ2WOxyrhry +79F4m8v0YcTT5ZXSSyNRXmVFM+fVEVQyn+m/qQDy1juxUg2XUVS6ci8n+DmJ +6tUvy0n4jiJ/twvyEdCvl5RVJa67PYoUPGcUH2SS6NGnC5fbno2i1lbzLy+f +QV7+mS/t0TOKsgxH88afkKhpg2FcusUY2vPbYa0yiUS0xJS1cKcxtO9byY9f +kBfyto66e3iPoerCnzYc4BjZOAPNuDF0lTXF0hzyxpGDnctt9fB6vKLHGAf5 +xdPTmePQOEpIOxr5IopE+XMVreMnxpFgw7z4YCSJ0q9v1vnqMI6OX9dy3gEO +CS8SfRY8ji4e6l/IDCeRdhpLs2bJOBKt3iJdGgZ52PnotgKhCSR7Oq3lQDCJ +zBN7w4djJ9DleI1dLpCvYgzyeRiTJ5CADU9l3VXIm/NhcQJPJ9Bnr8BNe8AH +LOVTD76dQM2p+i0M3iTaJuSTm9g0ga60r14gIc/9SeH6qrtxEjFU8L51uUgi +caPu01bCk2gkOVV2EPLgaXpezyWJSSTcXC7mBP58xuJvsvIkmk0QuersRqK3 +ok+Xx80mkWLuR/MbkC/9H6tJpj6YROH5n4OGnOD5TTiy3z6aRDzia0s3wCOr +P3Z9eDaJ9DrPUjaCbe1C1KbyJxH7n4RvCPKs7vbPhw1bJ9G1xm2e2ZB3udPP +es7wT6HeHh8y145Eh8xUZjm2TqEffNtdzcGBTOz+YjunkGhlyM5lW5ivDq9u +HVGdQvPh29KOgtsk5xPSzKfQvkK3w4uQxx9nRpceTZhC62+7vgmEPO8tczS9 +/b8pxMvRZagOPvyS645D5hQ6oH0udcqKRDN5kcf8yCn0ainT6QLYqCS8/1nz +FNJqE9O1syTRQnMoB339NDI7VHzM1YJEDeZ6Y2EC0+jvwVb/3eBn35hb+LZN +o90GnzWnzWG+d99MlVKYRgLGf4MDwRl/gxXNjKaRbZpA+6OTJDrOcMP8xZ1p +pF5opT5hRiKpW5oHVO7B9ZrzPKXgZdblbThhGikdULaLBGdzBfxpzZxG4WrL +l6XAqwLXAhiqptGrEEL53HES5ShcfXqKYQa9flj8dcaURCxnLo6yXptBYgJ7 +e84ak0jEyGL73pAZZLt+S7g6WFkDnbCPmEFSj5biecH2IhsKi5JnUK5pbVvZ +URKV/iBDPYpm0KQ/tUkc7GO9LNJBn0EiKfR3C0dIdPfoLxM2llnUsjrO2wbO +0GwI2cs9i+R9lsregltE037fFZ1FtBkHXnewUpduvo7WLPITqLIdOEyivzZR +R14FziK+p0yjPw1JxGDifaPj9izq4Q1drgQLatvksd2bRa+v/DHNBOtvUxQ4 ++2QWOQ/txy7g9O7mvs20WSTypzBnyoBE1nbC14IY59BD0debNoIb7F88Nwud +Q65lzk/8D0G9kgw6MBs1h5gr1104B1YdPFmf+GAOdfQLW5uAU90YpjvT51CT +xViJBNjN55S2c/kcejkoaluvR6J10axtAatz6KTgXK0sWOf9WaZMv3l0a0t0 +w7IOieau7XtoEDyPFJgYNwyDX2jyyAzdmUfc4WNeHWC+igJjxcR51JOxOYYK +7vnMm1xImUdy5KT0ZfD1n6WKDVPzKLDI7vnYQRJReIRt5t0XUPuVASk6QaJB +ef0nV7wXUISnJcsoWPDI5b7xgAU05v51vht8/fYnpz+RC6goUmV7JVhvzf9S +R/YCoq16eUWDmyd+BBUPLKCCOb1xCfBYy3/pQdaLqPD62H5bRKLtUx8H6I6L +aO8BndtmYDO+OSk/t0XUcz+pXx9MOWry0tN/EVH4ahoVwderV/PPJsH1X2Fe +TGDO93bVuq2LiOfYu7wcbZjPKeJ/2I8uoYH8nRZs4OSdvn5SJ5fQ8XiFfLoW +rPe3n9cdsl5CnX7DYpPg6Q++sjfdlxCVi0umE0ybrXddjl5COWq+4+/AZ477 +j07ULyH++EnCERy7rmWqw5SOvue93NWgSSLmeJlbC6foqFelxbAa7CMWuGmL +PR0x8x72KgHbqMmqnPSkI53oysEcsNy5oKsNsXTUreh/NhxcjeUXKpro6MlC +481D4CWf0JWXJ5ZR1Wa3wQ8a8HxtNaPozDJq7LrYT/v3+fxeju4Wh2Vky7n0 +pxC8f/xuGd1rGT1J9+F5BfZzTgwyil1G6QVBRbHguVM5jMOfl1EBr1TyGfCU +eiOrnP4KKrMf4Js/QCKmxI1zpcYrsD+wsk2CN86eHDxuvoLemUkyDYP3vO2o +uXZuBXGT8rw9/84XZPvvfLy5gqS7dAM+gMeE5jgu4BV0wyo8Lvnf+cWSyPps +9VUkYC16TQesWXPnaDexivoa7D9pgmPuT0fyH15FO0o8JPaBlWTq2EOsVtFf +xopBebCPuT/jaf9VRP/FizeDGfK+zXCVrKKYtROZQ/tJJOD08IcHWkM+s69Z +ksHOSozCWQZriP/qhEg8uIDubtlpuobco+vU74HPxOm1GdqvIV4WuVth4DQ8 +3SAesoZqpJ9aXQbLC5tVtFSsoetbvNmM/113vtMqIslAcNk8kGMDrwtwqZOU +ZiDa3r1ZZAR7xhyukJdnIG6uGNSvqJMIUbjyNPYyEFbuP0Jmwd1MsVFndBmI +GMYOsV9g0cdJOo8cGQi6+ahsNTip9UWecAYDMfUnyiQcHHvwc7TQTkbieNmn +AiGwftmzvZ0yjIT58Ei+AHj5QMD3x7sYiedRnW83gV1U5GR2qDASJhMCVB4w +IR1euVuXkdjwO7WHETzBrbeke5aRMA6XIIf2kcj0W7Hzpf8YCXe9d8Zl4PUe +L3UqNzMRdeP9me5gp/REvnYhJmJynzmHK7ik7Vb30FYmItfhoIcz+IKmtf9G +KSZigRqo4wCu4uB5d1aNiZjP02SzBPtnXBJnOMVEvMYmDHrgwY49DFpJTMRH +qaGXW8FlegWlVGFmwkzU0qJdjUSOfSkaYduYidkCVec28LrAG4UnJJiJXHvy +WgvY7L0OZUKWmTijEfPsC3hQtv6V3H5mgu3abc5a8Hren48en2ImVr9K7CgE +23Zw+d+OZya+yegGpIJXLtqpWaxnISTfsF9w/nfeqT4atWEjC/Gg0azbCVzD +FND3eTMLYVPVfvIcOCYxIVp3KwuxJzny0FnwtvL6n0q7WIiqB96qZ8Da/Jr3 +uI6wELqrDiam4KAiwT+0MBZCbZ2ajTqYkb05WX6Fhbg1sELlAbOFewuoM7IS +MxWCp7jBnBxbHuixshJi1acXOP+dp3JZR9vwsBLvek211/07T+UdDLy3lZU4 +cKW3nQlssmXJcVqLlbgnm0ssqML+IC2xuziQlej5MNDXD1YzvFxxhIGNOH/g +jkIZOEKZa3wDCxvBNlEqUQruFM0Q6WBnIzaalwuWgG9Otnk787IRlXfl2YvA +DSn7pUO3sREuNwNGKWDnUYboUk02gr54ree16r/Pq++ZK11jI4xLE08+Bi91 +vvqzeYqNUH3zwCEErOdeG2s8x0ZkjKa6B4Pv0vvVw5bYCLsZH98g8HZhkYgZ +JnbiV1jKvRtgg1MRsi2b2AkW6eiP18DxTU6usarshLl5kONl8O6abSOc19iJ +GJZluXNgP/MD8To32InCkgZjR3D5gLmmfwg7kbfFxssBfJL5bvTfCHYiiMgp +sgcHEPRdtSnsxJejs+Y24Nqi9othJexEy98PbyzAG49Mby6lsRO2Ttxd/87b +rTvWl81UsRMii0zc/zw+f2j9uXq4nyiL+wmwgCr5Rqebnfhkra9yDGxf9cXC +/yc7gZ5wuZiCX5wYXn07yE6c9QxMNQFrXpYwFR9nJ/TDXNn/ne/fZtSet5xm +Jxpe/9Q6Cm6MtXoSO89O+O5mu2oEFt5+1aCWzk7IB7S+OgL+//+nEAfXGf86 +DP4fJAMhpg== + "]]}, Annotation[#, "Charting`Private`Tag$18528#3"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwt13k0lP37B3DZplTK1mPJWpZKyNKCum7SQ7TYl7J9ZYmUsiQVpZQtQvbK +8lgispY1PuOewQxliRIJZSelrFH8Ps75/THnPq9z5twznzPXfb3fI+ngYezE +ysLCsoRfa9dzhVE/VlcpVN2bWsmrCQzgXxaW0fhDofqiMZHn8Qyg/5tlfXWR +Qr0zcTrLNI4BMn2VzG/TFOr/GG6tuTEMmNg0mNH9hUL9p1Q+0DSCAZfd1CxL +aRRqj0O5Td4dBgRI91CdgylU2YuzPHYXGZD8eEfMW24KNU7QWLpfmwGp/SEe +Rhs4qeOmdjH7RhthW5vJ6V0CHNSzkWWcGjGNwDA00WmWZqeudv7UeQyNoLdL +2nuHFBs1IIw7vmOkAdQLrLNbFVmp+u1X/PpiG2ApzJlPedc6asEut95dhxtg +biEzzlaWhRqkMX/Ycqwe6FIxqrUXV5C0++KZ8OR60OC4VbrH8Q8yPdA08F63 +HmKJAwe0/JfQu+zMAtc/dDj3xHJ4InURtRSc5HR7SYfWZ2Ib1iXPI0F9ZmXb +eTqIbSrah8pmUXlvtDunNB24JEZax5//Qu/QFofN/TRwN72XmJMzje6HuIcG +pdDAntbfLBYzhW7ZSAXkO9NA6vCKUX3gOMpYYfmdqkiD3POlX6rLhtFZFq1o +dVYadDqkihtkD6ODauyMu+towGITbtMTN4z+9T124y0LDcyNznUveg8j+pyx +pcMqCazqfO1qKsOIg51nNvoPCWc2elELC4fQ/IWhqfULJHAVKKdm5AyiOqtl +psU3EtRyxD4rJw6ioe1L/MWTJNj/xyVCBg+ichv2YS7ssviv8QPOgyhK4KQA +dZwEh1sxkaLSg2jrq921SqMkVBn+8k9I/4r27PzivucrCW4zxdbhyV+QjxGf +SMhHEpL2/9RwCfuClvgDjs51kcDwUxI5ev0Lmhm3mHXAlmYp7F6y+oKEfCym +4QMJA5vyzd2EviDeB36WLJ0kmMlkGx5PHECtc0USj1tJCCxRDeWW70cCdnZ6 +6o0k9B0s1W3Y2I9cnOoWKxpI0ET7OAMm+1DTqOOhg9jzzQp3p573oaONju4H +60lwH5bzf7OrDyVUTacCjQRLQdErYbKfkb+WpKcrIkEhgMOKc8cnlLez5Jx8 +BQnCVW0JY+yf0OFovWV6OQkc848/NI30ID/H7m222L0XlU0fPu9BvZszeqLL +SAizsTstqNyD7HU/J62+JGFUs/LYbq1upDhVJTZbTELasrvyKbsudIHjoZ92 +PgkPDhy8oqTVhbY9vjc6mUeCrxdbEe+OLsTj+KcvDvvUZNLerpEPKC+c58Lk +cxL+9jTI2V/6gDxEHP48ycW/b5WEuKf/e6Q8aCQr/IwEPr/OjfGPO9DtRJFS +//9IWFz9zfPjegcqFZbtVMbuuy8uqHemA8neTXwylk5CTqzbziXBDhRc67jT +HPtIEcth2/h3SDUpif9QGgmuo/KXZKLbkT8iUsRS8Pe5ZOx963I7mtNK1e97 +SoLqnO/1j6fb0W1RqfQU7BVW2v0w7nbU6qR+UhI7Vswq9Xt4G9otvSdb4QkJ +AXlc6Rc3t6IZtRp/12QSjleavRB/04LKPWX6VbD5G9Mq28NaEGutzNRKEgm5 +X/e/U1vfgiYPBGxJwO4UOse2wvoWWTzzvNKaSEKqbMGWoro3aCnwtkYqtpva +bxGH22+QoitR6oG9avhQteFvM3qVYpPPi707pNopcrEJCVS8YNgnkDAXx+lJ +lDchb6vvbPuxqRlGAb98mtDd1pGpjdhmaDTefIaJlPJvtFTGk3B7no8h9p2B +nP+E1Itidzm67y4cbEC6v/MyOeNIqP1seKAsuwHFBaAfY7EkZJur6dS4NiDJ +woLOZmxvvRWb5h/16Iukl/sj7K3yUdGjy3R0wKjp/S7shUzvlO+1dPRm+8zP +rdh9olZ5c4F0ZBEUn7P4iIT8LVL1bOvpaKN5wjAT+/hM6aI4Pw0JRFxL88JW +ck/kkO0iUeUrjxg7bMHhm7wKySSKv3tJ/AT2yIdj8poSJApXonPJYr89vfvQ +0cE6dHJc3VUA+yWD+1/97DoUuLTowI59p6rLzlK+DpHFwXJDMXgeVF672/2g +Itlhn9lObMP8ND/nEiryDh8524AtluL6yPsgFTmLBv99js2l8IRYmEco9Ni7 +AynYH8WdznD4I+Rl9WFzDLYP20KEZGgtqg/VjLiBrTOHniluqUWtEeX7r2Dz +jobUHY6rQdEnRG+6YA98NPpkIFKDHAP8bGyxC5qE56zSXyOHqK4eM+ybrwe5 +z8u+RsaZ2rMnsfUL8uWuvqhGKVH1uf9iC6b5aAepVCP2AbdlwB6JPmIdU1mF +3rdrjh/CfnmXcjUNqtADq2Neqth3fNoeFtRXojaxyCTFtfO6JOW+NqhEfv4S +1nuwxa0caE3tFUjjHke1LPZ3/T2fP1pUoPbfx8p2Yr/WnJ0f+VyO6o0nTkph +hynUbJ07V47sq5cCJbAtJe7vZpsoQ7G8t4zFsWV4T+vwXC5D3yYCkBj2LJug +rfj8K+Qdto65ZnJuwHfvzVeofmKzx9r7o0dzozVYX6GyiufFa/ez7/bMOx7y +EsWY9kWtfZ5Cs0a9BfdL9Km9YJM09p/X7P1OsaXo6IKktBx2U8HbRS/hUpRx +5HDP2nkS0+J576SVoNFODnklbOcYO/komRIkmnxbWA1bNUju35T8YnRKsiRL +HZvt6k+7fOViZFqU8pbAbnep8quqKELbCf0YXexUq7uPGEeKkOPNiplT2L7X +d0cy4wpQuuzEAzvsU9+nPxRmv0AyY92x59fO71AuHl+ej0S6A1Q8sd8f1yl2 +6H6OCNVp1WDs/BquJb2JXNTZjxLW5idoX7u24nIOKj5iEL02XypCtp3L25+h +M8GJehVr8xexU/Tr3mwk7nuWc20+v7JMOjGOZCFWmd4za/MbPea7EGufgcSq +BRi/sPs8dqhZ66WioHnj0v14/iMsihrk3J6iUsoPmePYmnDYci78MTINg33W +2MncFjciWxNQyPTMhiBs8xdhdVTzKFTy17S5B5trt2K28M8HiGagNfsT+/xv +PWapaiiqHGko3YCf7x2JN7eMVAciZ7nweXXstnyxflNjc/TYxDEsE5v9fwYS +IUePAOEd6kLFzlX4z3dTlQP4zAt/6sX+3O1amH7qGgifd7n3D94/voUnDb4J +hoPkg87hR9jCAypyJu8jIVQ1wucltu36CNbPetHQlO31+D02yyGv/qMccRDo +lJUrhPeZTjIk8QQ8gUqniJYc7LiSEsox6xRod3jG3YLtNcyroSmaBtlcqUMz +2PS/93I9ltPhusSSkRbel84K7vc/lGeBaD7fvkHs5w8PEplKLyAzM3ZOG+9v +dnrqa4pqAVBpuSE+2HaLnIcuHCiEy9d3NudghxVNCAqlFkHk2JIND86DI0KV +PANZJVDPMV4xgZ09YcZ2qbQMuO3vKdXiPOkICq0TVysH57OfCpexWcRrbrWX +lcPufxQ+H8L5c8Zk5x/VqgpIVzinVYG95fWv2WVqFZjM7dpbg/PsWsTDkdCW +Wri5/7ffKM67LFlapoYhgmzC5o0izsN3dfMOU+0IkjKWm65hb1su8Mhxo4L0 ++gtvNuE8vay47dvGS3WgMpLcq5mB+0zi0NA7bxqoXHYQqMkiIdI18IP9nUb4 +Uc3xUxPneUjzuldDtY3wySVaOxb7zt47j84vN0IAv7LMt7X8/3nH8LI3A8I1 +92Y8xf3A3i+o6ZYzE27pnrlMKSBhX2hwbYp+M2h2Wx6aL8J5mBOR3cvbCls1 +LoQC7iMtXNz37E+3QkKIRHcONsM98txQeCscHrAu48V9xjZRd+tV1jY4udQs +OIZtYq331v9GGwx8k/JLqsLzPXRcN+JiO3DqCQVtqyVh8+wJjXyjDtC/F/z0 +Gu5PW3uUz/l6dkCHe9GTv9j8VMFw7UcdoHNiQOMu7lvCD4Z6PnZ2gGH0Zaso +3M/kdt68zmHZCRH0DRtLmCRom+ZV2tq+B62q/QJ8LSRcfbnhIM+FLnDK5JLW +x31wwLtB9WrQJ/BR31MYgPtnL4NDOCfzEzSbPSuRwX314/Zjq930T6BR6anV +it1GpzEPc/TC+70rq5LfcX7z19ly3O+FsXC+pbfTeP+8rA6JDf4MrP9Z58E8 +Pv9sUW9JWD9s5PPQC8F9+nvlSdKX8QUqj/j5pQnRIDs43d4xdBi2ZNJXMgxo +ID2fx3ft8Thcf+7eFh5Cg74S8RqN81PQtugW9r6BBmYJAyGTUdPw1GxuWW89 +HVKyHtSciP8FryJp6cEmdGA/e3GKw28W1qmfapV6SocW+9xnxkHzgPZUswlN +0+HVZmGbBfdFuHvJ11OMqAeZZMkxyokl0NMZKE6Pqoelq0F/80z+gObm2OzZ +8XqYXBLhzjm4Au98Tr/4eaQB0lyCO0V2sBCKmtuUHj1pgCitNw+EpNcRYivm +Vt2/G4DbI0+bJsBKvNX/FTFu1Ai1OhU1ZcJsxN+ptqbzJY3w96LdfnNudkLv +Nv9R880MWEd5l7TnLzuxa9o5R96FAfv1PEl9Fk5iI2dzjzmTAUu9+WMCvziJ +q5mLQvelmaDjzog6Oc9JbKInjEvJMiFiefDgvSVOYtTuGA3JMUFCWCR0lpVC +GBhWxv7ewwRdi9BdHXwUIic8sPCiMhNi253cotQoROWhEKoFMEGhQewblx+F +iDDMUFKxYsI1M/VYbX8KcS1W+VD7GSbUDZlpXg+kEPnpYOBhzQRTtogH46EU +wrCkLjzPjgk3iGV5RjKFMPH65r8TPzeMqq6L915TCJ554R2CXkzg1Z8RqKFS +iO1Sd+rKvJlg3c1dO0unEKeypFzNrjLhx8Ixbse3FKJ0cqUjxo8J29ReFmj3 +UYgryYX/cN9mgj291fz6VwrxX5T7an4gE3JNJleKRyiESozWtMFdJmh6Sp2W +/EEhPGHHVOh9Jtxfd2TBcoZC/PNK9rdcCBPaoqxSoxYoBH+TCjcjlAnCEj66 +jGUKoet6VN4lnAn//3+c2Hzb2IQzggn/B0ONBVw= + "]]}, + Annotation[#, "Charting`Private`Tag$18528#4"]& ]}}, {}}, { + DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, + AxesOrigin -> {0, 0.03434199060955856}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0.03434199060955856}, + DisplayFunction :> Identity, Frame -> {{True, True}, {True, True}}, + FrameLabel -> {{ + FormBox[ + GraphicsBox[{ + Thickness[0.034013605442176874`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJdIAaxQYAJSjNCxZiR+Ax42MSox6UGWZxUc4jRS6r5 +pOqlxO+0UEOM+0n1CwDTMQKN + "], CompressedData[" +1:eJxdVH1IU1EU33J92Pza5t6b7s0tl+mmiKSVkeCx0swCTSOkpDTTIZL1h5iK ++8evSEWlJD8alhmYkGikiVFaSBhoGgliCpk5QikjKyQqtN13bnfggcvjd+97 +v3PO7/3O3XH+UnKWi0QikTrWKcfa5Fi9CT2RtiJPWCdR5w/zsediWk6oGf5S +ebF69y2O4UrD1oAxbw00k7jmD93KEA/LWV+4Mvw4ttnqD2kBqcK4TQtHHrzs +kBT6g3fR9fzX5QIcri9TZlcZISLcESkC7vca4efgSp+lQANjJGxG5G1Ww/3V +pcKxeiOkLE+uNM0rGBbz+XltwEq4cbXi9GSUCV5UD5ZGHFLCq+GDXTmtJjhD +6klTgj2jbSpiwoR5apTYz7oJiuZ+zYSPeuO+m5n2z0HSjLYkQ2mGeNLHNA/9 +UPpxRGMGFanbrmG4kZT7Tsuw/smdwaxxHeyLepZ8c95Ez3WQle2IShPqecAP +4oesukhLIEhIpOsZRr300B1gL2tdDsL3Z/UgdCzGh+rN0En6DjOAhfBtCWbf +i7qqgmGO1L+io/UEo76cE+O5wHAJ6T/XiUXeOC3jM5B+atVUH5rPoGb561Kr +E6VJSobFfFMKhj+QfAovhi935Pes1bkzTNKEP9rG8rnFeCQ05chYPcJD7vYm +gwxkrlX6zDwzlPHWzTlxrqhvhpnyyaEnNK9dmmaG6PwY66jNDRrrPYv3Bjtx +A/HHUxPDtrvGgb8WE/o1yg3CzJ2qN/eC0BdDDj5R/0CYdp/lsgpcsL5JHhLt +R9/uUblgn6sc9v9NCieJT9s46Bfn6U90MdH1GAfxfYkjmZW/o0UdPdSwaF3I +nQiR4n/Vqll/RI7sXWoI/L5zqcV1O+YLV+Pzh5zhFuKn/Rr4z4f6OXGXOI8+ +DIv11fuyfM/JfBgFlq+CzHOvjvGLPv2kQ1985pBvTYfP9zzzr+iH4z4QQOrt +9EPedi393g91nBPofaBjGOeBzr/Ml/pXoHwa6k8t3gMDPL5n90WeEp6e+9D3 +eXp/cFBL+vTicf4XVAyL8/hVwTDeJ15UDx5qyH6YHPNccGJRlwYnFusEDZSL +/pMjT5sG/1+6nPL7wMb79B9NsDS/ + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWaBsBiifAY3NCJVnRmMTo55Uc0g1nxbuIcZ8 +AJ0vAkM= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJzIGYC4hkzgeCnjgOImrlSwQHGf+Aa7zhLUMlBZl6c +5mkBXYfK+z9uGVsrOehrrRS+8ETX4cOi9QpnPZQcju/a0cu2Qc8hPQ0IwhD8 +ld9eVpx5oOQwdQJ/ldlpHQdjELiMyW/h9V8/pRXBb2A52m9ojpvPwtkln5yn +BTcfxofZD3a/pTbcfWtVnzTP49WBu18X5H4VhP9gfJj/YfwdwVYR/4+Loqrf +KOAwHeT+11oOMhvF5jMt4HFYDzLfVwPOf1O8VfT3aVU4H+z+7SoOZ0DARwDO +1/ik8nLWSxE4H2Y/jL83v+btTFGo/86pwN0vMfUKZ8YiVbj/GECgQQ3ufxgf +Fj5PEhdeM9FXhYdfQkiQ+oKTKnA+2N6bynB+t43nrrRPSnD+bU3ZNf+blRzc +1xxdznBDyYE/NuC+kbki3HwYH2a/cOWkkrMiSnD3gc1/qQR3P1gfgzLcfzA+ +zP8wvgjInBYROL9dgV31zBZBiLuClR36I7r9GQv4HX69fX3AklkFHt4b9PIW +M+5RcXhR+zj7/BpOqLyaA7cjn9cMTQ4HKVB6vqAO54PjZY0mnA+LX5j+81fD +3ujv1naIUY2QOfeHx0G0x+sVyxQdiP0GAvD8Avb3EyE4HxQcac/EHNDzFwCY +s2h3 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWaBsBiifAY3NCJVnRmMTo54YcXraNZjdRk+7 +cIkDALmJAos= + "], CompressedData[" +1:eJxdlF9IU2EYxo+ukmEOUmQ5L5qHBplh55vHFUbxFVTiRUFR2UWCpaldpNSC +klW0pIsW2UUxpSGRF4fFzAmFdNGgRCrctNBA1h+lIuaFEFLDMLOdbzzvB73w +XfwY532f5/2zspPth5otiqLkZN6RzMvNvHr78DvFVs1XzNiwjoO9hjf6t3st +X39vytqaW82H66LbQ7/zedOJj/ssPTo3ksZXNpLPN80XxLRyncfNuCX5RSDm +109Z+XL6wmxoSOd+++XVbTeslK9XhJU/2bb4sqlTsvh9QXLd67yd9/d66PvU +mYp0MOGh/GDU9z4tXhpr8JA+bXO46O1PqV/om5P+wPAPFuXDTuLn7b753mKV +8l2aWUxW7VCp3o+Hg85ErUp6Wk5n4qjkcHruYnxW5clSX6Pb5eFVZkyq5BeM +foCnCxd2T6yRfPuwd2NwQuf7I6OGMq1Sv5EfjPqYF/Sh/9CPecMfGP7BIt93 +R9bPJ51HCrfYWj47sn2P6LzLmeeKTzn4m5E9A20HJBup2soV5ibun4nZQpOM +uLSvoXzsAaN8dlPfOUb1wNADht7jpr4rjPwUHBy825xi5PfaqtFudsxN/QCj +X2J+jxn1d6jybH+OT7LQa5HcEQl8aL2jEV9dqukYr9doHl1CwFbKD0b9P+Y9 +lGmkj/u/vOoJaKRf6Atq5A8M/2DsKxj7jHzYd9TDPUAP7gWMe3J9u96XqNHo +3pAP94h+gNEv8Hmzn+OMvke/kR+M+pgX9GGe0I95wx8Y/sGdZv8qSrL7FGV8 +wNynXSX817PkzeX3krGPYOwrWPh/JBn3BsY9oN7//5//AFqbSus= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIIaxWZDYzFDMAOUz4GEjqydGLy71uPSSqp5Ut1Fi +JjHitLALAM7SAnU= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4rrfVgXnblg4uK05upxhhoTDTBCQtHSouv/j +lvFqCYfiraK/T8dZOhiDwGYJh+tCnxzPH0Pw/3wrfTCn0ArO/w8C663g5s0A +mXfTykG4clLJWRcJhw16eYsZ31g5rBXS4UuPE3f4siEge9Z3K4cY1QiZczai +DmdAwMYazvc5wW4729Qabh4uPtg8O0k4/4FrvOOsi5h8mPlgOkcWbj+MD3Mf +mN8jDXH/SysIbSntcKRtefipR1YO6WlA8EwK7j+we+dIwf1vAgqPYCmH54kL +r5nkWzm4g9xrIQUJv2uWcP6Xnbe6/pYi+J9A7lG3hJhjL+UAix+YeTC+84Rm +obRfig6nDjutzZSzhPCllCD63S0dwjnF2o3llSDmnEfwS0DxaWeFKr8fGn/M +Sg4fQPrZoeF5TxGq3hoif1gR4l5Xawfla4+CGdYg+ODwdUTw9+bXvJ0pqgDx +7zRMPti9WooOElOvcGYssob4n0PJwb7p0fEZu6H2XVZy2GL+41CKFzS+7ig5 +3JCuSTRitXZY+e1lxZkHSg7LX3jo/V9oBedPn8BfZbbaEq6ey021lMnKEm6e ++lvefQYvLeD8/uASlenrEfxoBcePyTm4+Rog/ZLmcPtgfHB6CFNySIm948bc +Ye7wYdF6hbMeSg4rQO77aO5QCcpP1koOL7K0v03/aw4NDwQfnO9WKsD54HiR +F4TzS5aXbPjXzwM3b7vXBos5P7nh9i2/tfyx4WFuuHsg6RfBP9i9r8kkmdOh +x+sVi8lCc4cm8VrWzDZOuHlg+2dyQsIrywLOFwfFzyME/xYo/E0t4fqfg9y3 +1xJuPowPsx9cfvhZwt23v1bWIv2JBdz9sPQM8x+MD/M/evkEAD5pGh8= + "]]}, { + + Thickness[0.034013605442176874`]}, StripOnInput -> False]}, { + ImageSize -> {44.0931407222914, 24.508064757160646`}, + ImageSize -> {29.39542714819427, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {30., 17.}, PlotRange -> {{0., 29.4}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.10504201680672269`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4q1eGyzmVP6wZwCBBSIO6WlA8Oy3vcKuBftS ++UQd/J94XjKd/M++6v6PW8beog4vax9nn1/D6HAGBNZA5S9zOPwHgfsyDrYl +jrWnZXgd7rvGO85aqOCg8Unl5SxOEQcDrZXCF1pUHEQqJ5WcbRF3eNOW220k +LQaRXynuADO/L6Lbn9FAAqLuiIiDMQh8RvDBtIoUnB+hGiFz7o60wwOQfRdF +IbShggPYPw6SDl/2fdya/k3eIQakTkbKwX3N0eUMO+Qg7veByofJOswEgUgJ +qH4Zh7VCOnzp98Qd+kHuuSAN568H0fMQfHlQOOUh+DuCrSL+P5dyAAVj2jEJ +SHi2SUHNl3RQB/nXUwpiTp0URP85Saj7ZCDu2Sbm8ChCfPvFBDUHD5B7K0Qd +GliO9htu14S4+4ywQ/1vq4JzGdoQ900QhIj3aEPscxOA0Gza0PjhcWDh7JJP +ztNy2A6K751cDtsdmh4dl9CC6C/gckgFu1MTEo/2PA4y8+I0T2/QhMYnv0PN +pw0B2b80HcDp5SeCPxvkL0tBOB8cvhVCDh77a2UtnmtA0sFHIYcWXv/1U1rV +HYLfXv4446CwwwbVJ83zfFUh9qbxO1SC4n+3Ejy9gcOzTtJhwYnJS7KXfbGH +pTf09AoAk4wt2w== + "]]}, { + Thickness[0.10504201680672269`]}, StripOnInput -> False]}, { + ImageSize -> {14.286246575342465`, 24.508064757160646`}, + ImageSize -> {9.524164383561644, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {10., 17.}, PlotRange -> {{0., 9.52}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, FrameStyle -> + Directive[ + Thickness[Large], 18], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {0.03434199060955856, 0.19961623257131614`}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "LineLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.800005950325206*^9, 3.800005985011455*^9, {3.80000612800945*^9, + 3.8000061523615637`*^9}, {3.800006198247397*^9, 3.8000062013184023`*^9}, + 3.8000063003046427`*^9, 3.800105162005806*^9, 3.800105210526244*^9, { + 3.8001052818794193`*^9, 3.8001053119483843`*^9}, {3.8001070030463953`*^9, + 3.8001071045302563`*^9}, 3.800107152659997*^9, {3.80010923870466*^9, + 3.800109317606167*^9}, 3.80016591957825*^9, {3.800953705163644*^9, + 3.800953729155587*^9}, {3.800953909150161*^9, 3.800953919915872*^9}, { + 3.8012020342343693`*^9, 3.8012020757686853`*^9}, {3.801202108618804*^9, + 3.801202181595736*^9}, 3.801202278332419*^9}, + CellLabel-> + "Out[106]=",ExpressionUUID->"83b31b03-439c-425e-b046-7a05a10f6ee1"] +}, Open ]] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Plot of the coefficients", "Section", + CellChangeTimes->{3.800104775691227*^9, + 3.800105559312166*^9},ExpressionUUID->"3b0990ee-511f-416b-a4bc-\ +f5c7f6117606"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.8001656744442244`*^9, + 3.800165675003849*^9}},ExpressionUUID->"e2347259-0079-4fdc-aefc-\ +303816be8d61"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "5", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8001656844883623`*^9, 3.800165702550962*^9}, + 3.800253484115035*^9}, + CellLabel->"In[86]:=",ExpressionUUID->"9ae18ff2-6556-4c15-a8c2-953a34805b2d"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0.9996937375613348, 0.0030626243866518892`}, {1., 0.}, { + 1.033340954122847, -0.0018375746319911337`}}], + LineBox[{{2.9666590458771527`, -0.0018375746319911337`}, {3., 0.}, { + 4., 0.000015067576246282989`}, {5., 0.}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0.9984686878066741, 0.0030626243866518892`}, {1., 0.}, { + 1.034399397110874, -0.0018375746319911337`}}], + LineBox[{{2.965600602889126, -0.0018375746319911337`}, {3., 0.}, {4., + 0.0003429769902279765}, {5., 0.}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{0.9969373756133482, 0.0030626243866518892`}, {1., 0.}, { + 1.0357224508459075`, -0.0018375746319911337`}}], + LineBox[{{2.9642775491540925`, -0.0018375746319911337`}, {3., 0.}, { + 4., 0.0012250497546607557`}, {5., 0.}}]}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 10.}}, {{1., 0.}}, {{ + 2., -0.055114638447971785`}}, {{3., 0.}}, {{4., + 0.000015067576246282989`}}, {{5., 0.}}}]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 2.}}, {{1., 0.}}, {{ + 2., -0.05341880341880342}}, {{3., 0.}}, {{4., + 0.0003429769902279765}}, {{5., 0.}}}]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 1.}}, {{1., 0.}}, {{2., -0.051440329218107}}, {{ + 3., 0.}}, {{4., 0.0012250497546607557`}}, {{5., 0.}}}]}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 5.}, {-0.0018375746319911337`, + 0.0030626243866518892`}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.1`", "0.5`", "1"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800165689257024*^9, 3.8001657030714273`*^9}, + 3.8002534850066013`*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"2fa60550-77eb-4d31-917f-f9b5e323d219"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "10", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800165730918439*^9, 3.800165745926483*^9}}, + CellLabel-> + "In[258]:=",ExpressionUUID->"4467579c-c5e0-4a28-9f8d-ac1535784066"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0.9731202037610477, 0.013439898119476167`}, {1., 0.}, { + 1.24751203935541, -0.011854024873343397`}}], + LineBox[{{2.75248796064459, -0.011854024873343397`}, {3., 0.}, {4., + 0.003954676997168831}, {5., 0.}, {6., -0.0006531042735448591}, {7., + 0.}, {8., 0.00013482301855117484`}, {9., 0.}, { + 10., -0.00003117192264031655}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0.9596803056415715, 0.013439898119476167`}, {1., 0.}, { + 1.2645818351730247`, -0.011854024873343397`}}], + LineBox[{{2.7354181648269753`, -0.011854024873343397`}, {3., 0.}, {4., + 0.0072845452951860925`}, {5., 0.}, {6., -0.0023688037510360602`}, { + 7., 0.}, {8., 0.0009628657286664527}, {9., 0.}, { + 10., -0.00043834938219726644`}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{0.9462404075220954, 0.013439898119476167`}, {1., 0.}, { + 1.281651630990639, -0.011854024873343397`}}], + LineBox[{{2.718348369009361, -0.011854024873343397`}, {3., 0.}, {4., + 0.010735522418003797`}, {5., 0.}, {6., -0.005476748504236199}, {7., + 0.}, {8., 0.003492467926892791}, {9., 0.}, { + 10., -0.0024943654206968204`}}]}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 0.5}}, {{1., 0.}}, {{ + 2., -0.04789272030651341}}, {{3., 0.}}, {{4., + 0.003954676997168831}}, {{5., 0.}}, {{ + 6., -0.0006531042735448591}}, {{7., 0.}}, {{8., + 0.00013482301855117484`}}, {{9., 0.}}, {{ + 10., -0.00003117192264031655}}}]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 0.3333333333333333}}, {{1., 0.}}, {{ + 2., -0.044802867383512544`}}, {{3., 0.}}, {{4., + 0.0072845452951860925`}}, {{5., 0.}}, {{ + 6., -0.0023688037510360602`}}, {{7., 0.}}, {{8., + 0.0009628657286664527}}, {{9., 0.}}, {{ + 10., -0.00043834938219726644`}}}]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], {{{0., 0.25}}, {{1., 0.}}, {{ + 2., -0.04208754208754209}}, {{3., 0.}}, {{4., + 0.010735522418003797`}}, {{5., 0.}}, {{ + 6., -0.005476748504236199}}, {{7., 0.}}, {{8., + 0.003492467926892791}}, {{9., 0.}}, {{ + 10., -0.0024943654206968204`}}}]}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 10.}, {-0.011854024873343397`, 0.013439898119476167`}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"2", "3", "4"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.012833333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800165739142585*^9, 3.800165746634913*^9}}, + CellLabel-> + "Out[258]=",ExpressionUUID->"0847812c-dff6-46c2-ac72-fcc62e819bb1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "3", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"5", ",", "25", ",", "100"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800165816804508*^9, 3.8001658447079144`*^9}}, + CellLabel-> + "In[260]:=",ExpressionUUID->"8bc26deb-518f-483b-b041-62d70e373525"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQfUdL99ti7qf2bKGBK3+2bbRnAIMPUBoOHERcA4Fo +yX4Il8MBVVrA4ezbAPas0z1QfSJo8hIOTzwX/21Mb4Hql0GTV3CYGWHw6IpQ +E1S/Epq8ioOSuk2YzLtGqH41NHkNhzeSFts+8jVD9Wuhyes4/NSoE39u0QrV +r4cmb+DgvXv5x//5HVD9hmjyRg4LLUL2Nt3pgeo3RpM3cfB6cqrWPWmiPQDf +WTmz + "]]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.04}, {1., 0.}, {2., -0.018518518518518517`}, {3., + 0.}, {4., 0.03572245084590764}, {5., 0.}, { + 5.418373127927832, -0.05765938849402236}}], + LineBox[{{6.581626872072168, -0.05765938849402236}, {7., 0.}, { + 7.103013104684269, 0.06846580871327398}}], + LineBox[{{8.896986895315731, 0.06846580871327398}, {9., 0.}, { + 9.016061855991717, -0.05765938849402236}}], + LineBox[{{10.983938144008283`, -0.05765938849402236}, {11., 0.}, { + 11.003295665882616`, 0.06846580871327398}}], + LineBox[{{12.996704334117384`, 0.06846580871327398}, {13., 0.}, { + 13.000457804247743`, -0.05765938849402236}}], + LineBox[{{14.999542195752257`, -0.05765938849402236}, {15., 0.}, { + 15.00008670919615, 0.06846580871327398}}], + LineBox[{{16.99991329080385, 0.06846580871327398}, {17., 0.}, { + 17.000011356583475`, -0.05765938849402236}}], + LineBox[{{18.999988643416525`, -0.05765938849402236}, {19., 0.}, { + 19.000002056068045`, 0.06846580871327398}}]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{0., 0.01}, {1., 0.}, {2., -0.006172839506172839}, {3., + 0.}, {4., 0.02116885976053786}, {5., 0.}, { + 5.397127617525246, -0.05765938849402236}}], + LineBox[{{6.602872382474754, -0.05765938849402236}, {7., 0.}, { + 7.055002358384887, 0.06846580871327398}}], + LineBox[{{8.944997641615114, 0.06846580871327398}, {9., 0.}, { + 9.004823997672805, -0.05765938849402236}}], + LineBox[{{10.995176002327195`, -0.05765938849402236}, {11., 0.}, { + 11.000556771587474`, 0.06846580871327398}}], + LineBox[{{12.999443228412526`, 0.06846580871327398}, {13., 0.}, { + 13.000043504705529`, -0.05765938849402236}}], + LineBox[{{14.999956495294471`, -0.05765938849402236}, {15., 0.}, { + 15.000004634939847`, 0.06846580871327398}}], + LineBox[{{16.99999536506015, 0.06846580871327398}, {17., 0.}, { + 17.000000341467334`, -0.05765938849402236}}], + LineBox[{{18.999999658532666`, -0.05765938849402236}, {19., 0.}, { + 19.000000034774548`, 0.06846580871327398}}]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQIBZM0HgpD2E98GeARU4iLgGAtGS/RAuhwOq +tIDD2bcB7Fmne6D6RNDkJRyeeC7+25jeAtUvgyav4DAzwuDRFaEmqH4lNHkV +ByV1mzCZd41Q/Wpo8hoObyQttn3ka4bq10KT13H4qVEn/tyiFapfD03ewMF7 +9/KP//M7oPoN0eSNHBZahOxtutMD1W+MJm/i4PXkVK170kR7ANUuNpU= + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQIBqkXXuD6uW2EN4H+wZUIFDhv7CvS3fJu2H +cDkcUKUFHC6UWfeYeS2C6hNBk5dwiHeZ8I91yUGofhk0eQWHgzdMkle5PIXq +V0KTV3EIYyiZ92s7zwEIXw1NXsNBSfLoNNdjJlBxLTR5HQe7Yq+/y2riofr1 +0OQNHGYf+6l9aU0HVNwQTd7IYcOE3HTdq5uh+o3R5E0cBKK/5+U4PXAAAH00 +Nvc= + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQIBqkXXuD6ta7CG8D/YMqMDhwctrfzZ4VO6H +cDkcUKUFHNQelSp6rZ0K1SeCJi/h8PBcg9D8qYeg+mXQ5BUcDjZFv5776jNU +vxKavIrDui5Wo73P1Q9A+Gpo8hoOuw77PefYFwcV10KT13H49a2quGDrFKh+ +PTR5A4fD+7d8unrzDFTcEE3eyMHOedG0s3NYDkL4xmjyJg5OEu5hF7jsHAEM +rDrT + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 20.}, {-0.05765938849402236, 0.06846580871327398}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"5", "25", "100"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800165830257352*^9, 3.800165845681493*^9}}, + CellLabel-> + "Out[260]=",ExpressionUUID->"a28c4daf-3f54-4f9a-97d8-2b1e8d1e699c"] +}, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.800165669367613*^9, + 3.800165670359085*^9}},ExpressionUUID->"48603b7f-3465-4809-a221-\ +f1026896d00c"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "20", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"0.1", ",", "0.5", ",", "1"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8001094907543383`*^9, 3.800109526125827*^9}, { + 3.800109579514345*^9, 3.800109579986498*^9}, 3.800253496652095*^9}, + CellLabel->"In[90]:=",ExpressionUUID->"c4ae8476-8ff5-4521-9b44-cde2c45daedb"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0., -566.6666666666622}, {1., -679.999999999581}, {2., + 1356.6565170833087`}, {3., -339.7970804500349}, { + 4., -33896.27098462859}, {5., -3.5184175427242536`*^6}, { + 6., -3.50943423095894*^8}, {7., -3.4992501764816315`*^10}, { + 8., -3.489229431055671*^12}, {9., -3.4794267944377856`*^14}, { + 9.015193793187864, -8.698566986094468*^14}}]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQDQNzn1fOe175zh7C+2C/Pff2ttzbYg5QaQcGFMCB +xhdA44ug8SXQ+DJofAU0vhIaXwWNr4bG10Dja6HxddD4emh8AzS+IRrfCI1v +jMY3gfMBpzsTvw== + "]]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGAQBWIQDQOvK+c9r5z31h7C+2Cf2CX1cwbLLhuotMO5Dhuf +r/XH9kO4HA7PZjvNVhA+sQfCF3AwVgxr233yDFS/iMME09xcphnnoHwJh8RL +S+T90rdD9cs4lF508I/XvgvlKzgIljpo3Dp7HspXcriqcVv6fPljqH4Vh9hN +CU5cKR+gfDUHppN77x5dexGqXsOh3oyhUf8m0wEIX8tBoOL0r197fkLldRy6 +74j/Z8vgcYDw9Ry8fUSmLc6RhvINHOpjPV2fqX2Dqjd00PPa7pm+0wBqnpFD +zhnrV4GrNKF8Y4cC85LNXtJWUP0mDm1nyhaeLPR2AAAbtV2s + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQAC9UCDY2ngAwvtgP+vj////7VuhfAYHvxXM +bguMpjpAuBwOT4Xyrh+wKYXKCzhs+PJ8NUfvAyhfxIHlb/nRF9e9DkL4Eg5N +PRL7f7zaAuXLOHxZyJmR561wCMJXcIir5bA3Su6E8pUcNKd8r7E+/hnKV3F4 +0sJ4sPFi3GEIX82BUSrxMgfzCShfw+E7q1rpqq1GRyB8LYeQf65pZRpzoXwd +hzYTjscXd7AdhfrWYf8ut+kyWwuhfAMH3Z4ysdMzb0P5hg41zX91eJtdj0H4 +Rg6m4p61GUc2QPnGDv+/WlVtVpY6DuGbOMwuEE4PS2g5DgC/3GG6 + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQIC5zyvnPa98Zw/hfbDfnnt7W+5tMQeotAMD +CuBA4wug8UXQ+BJofBk0vgIaXwmNr4LGV0Pja6DxtdD4Omh8PTS+ARrfEI1v +hMY3RuObwPkAsPcTwQ== + "]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGAQBWJGIGZiQIDXlfOeV857aw/hfbBP7JL6OYNllw1U2uFc +h43P1/pj+yFcDodns51mKwif2APhCzgYK4a17T55BqpfxGGCaW4u04xzUL6E +Q+KlJfJ+6duh+mUcSi86+Mdr34XyFRwESx00bp09D+UrOVzVuC19vvwxVL+K +Q+ymBCeulA9QvpoD08m9d4+uvQhVr+FQb8bQqH+T6QCEr+UgUHH61689P6Hy +Og7dd8T/s2XwOED4eg7ePiLTFudIQ/kGDvWxnq7P1L5B1Rs66Hlt90zfaQA1 +z8gh54z1q8BVmlC+sUOBeclmL2krqH4Th7YzZQtPFno7AAAlcV2u + "]]}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.011000000000000001`], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 20.}, {-8.698566986094468*^14, 1356.6565170833087`}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"0.1`", "0.5`", "1"}, "PointLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800109494994781*^9, 3.800109528189102*^9}, + 3.80010958226656*^9, {3.800253718955738*^9, 3.800253741442696*^9}}, + CellLabel->"Out[90]=",ExpressionUUID->"1c6e8190-7223-40f3-8949-ab439c131a22"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "40", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800109556825058*^9, 3.80010956071819*^9}, { + 3.800109591699143*^9, 3.8001096437725487`*^9}, {3.800164857983986*^9, + 3.800164858234408*^9}, 3.8002537535705338`*^9}, + CellLabel->"In[91]:=",ExpressionUUID->"01d01b7c-1d1b-4a07-a039-89526629b6fb"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0.9985374746638144, 0.0007176603119155075}, {1., 0.}, { + 1.0583131722448809`, -0.001110650994099218}}], + LineBox[{{2.941686827755118, -0.001110650994099218}, {3., + 2.3292585176397447`*^-17}, { + 3.145085932961596, -0.001110650994099218}}], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGBQAmIQ/XH1vT6txfIOi/Nn5WQYBe1nAAMFh9vbwg3brQKh +fCWHCZY6zTl67lC+igP/BplVaw4ZQvlqDhf++EzbqSgL5Ws4fGMtkTLU57CH +8LUcbpcxlEjelIHydRyKD1R88dJShPL1HOxMTLtyDGF8A4ejBkJti+1h6g0d +ojUE2w3XikL5Rg6eJntW2O3lgfKNHWzOmfQkyDFA+SYO63K+FIlKvbSD8E0d +uq/cuSwRv3sfhG/m8L5WvfdW3BMo39wh6W721ao1b6B8C4eGaq6aGrF3UL6l +Q5bLknstPK+hfCsHi61rZ3ZPfwrlWztcvptkbZV3D8q3cbg9K+bDO5tLUL6t +w4MPP73E5+yH8u0cMmbdv6/5Kw7Kt3d4lxacm8W4BepeBwe2s+niSR/2QfgN +Dg4qW/OvnxQ5CJV3dKg5Z7eV4+V+qLyjQ+lE0xhv/11QeSeH+BnP1/cbb4bK +Ozm077rqVfZnOVTe2cFE79/Dqa3ToPLODv6HDLJVOlOg8i4OFRsz5eti2vYB +AEqHmtI= + "]]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0.9976739498572004, 0.0007176603119155075}, {1., + 1.3292466145172292`*^-16}, { + 1.27542381828411, -0.001110650994099218}}], + LineBox[{{2.7245761817158787`, -0.001110650994099218}, {3., + 1.9631154590505834`*^-16}, { + 3.3670605291512636`, -0.001110650994099218}}], + LineBox[{{4.715621858494706, -0.001110650994099218}, { + 5., -0.0003495983185812037}, { + 5.417473738613991, -0.001110650994099218}}], + LineBox[{{6.637601709830037, -0.001110650994099218}, { + 7., -0.0005070669760737973}, { + 7.616304275054442, -0.001110650994099218}}], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGBQBGIQzZSx9OKXYwoOi/Nn5WQYBe1nAAMlhyQV2Xd/WByh +fBUH+X2Nv3wz/KF8NQem020nv16ygfI1HCTrFty7vMgJytdyWPzTt1ppvwmU +r+MQNXnJsTorYyhfz8HaOMH8apUGlG/gsP/dZ8GSRTJQvqGD7o7Y+Rd7hKF8 +I4dO0QcmwrWX7SB8Y4e3h/80eqY8gPJNHDbMue/8MFTQHsI3dWDI0D/9yZoP +yjdzaJljqXduhTiUb+6g8Eqt590MESjfwsFzUljhsRKYvKXD7BR1ldoQmLyV +A7+totPkRGEo39rhvcXjk115AlC+jUNBxu3TRlzcUL6tw10F9Xe/drBC+XYO +5399YHRZ9RfqXnuHHJM5S1eu/ALlOzh4vOXtVbsO9U+Dg4PSwjOPuEJ2QOUd +HQw8+Bl2pN7dB5F3dGBc8Pqd0PrnED6Dk4Nr3i6L7w8+QOWdHOKdTnH9//wJ +Ku/ssMCdRbN68heovLNDzdfINI9OKJ/BxUFjo8ZFiXmf9wEA5viYfA== + "]]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJxTTMoPSmViYGDQBGIQHVtlcC/56Xt7A6/7J7Rb3O0ZwOADlIYDB+54t7Wp +hX77IVwOhzOcdtmKYm42EL6AQ/8VjilhPN5QeRGHWP4VPK/XskL5Eg7qiSIy +X2a6Q/kyDvOeX4prZheG8hUcVsdIaL80dYHylRzKNDnZZXokoHwVh40nXFcv +/uYA5as5pN7YLn6sSxrK13Aonn/L4sktayhfy+GMxZUIVm8ZKF/HIa9mh/UK +XzMoX89BZEFrf7I2TL+Bw+81dby3Qw2hfEMHrpNTK6Omw+w3cpAN2WZn8UMT +yjd2OOXEd8f0nwiUb+Kg9qKNh7NVCco3ddicI6IdcVoAyjdz6BGvOasBN8/c +4V+m8E2nAxxQvoVDZ/nSfQc/8UD5lg5xD+drKckzQPlWDhcmfltrL/prH4Rv +7fD27zPurLwPUL6NQ+ahy2ZBRw9A+bYOx8z5rms3HoPy7Rwm5HkoFnx/awfh +2zuUi2it+O/5AMp3cPjwTCZEWeEXhN/g4HBVIHrLcesPUHlHh9KUdwsvqzNA +0kWDo0P13LOLllR8hco7OeT/er3jiT0jVN7JoeGg+vW/fD+g8s4OVquqD144 +A9Pv7JC4myk5IRQm7+Lw8tqZG1El/+wARXm2Dw== + "]]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGDQBGJGIGZiQIC6ec8r56Xft4fwPtgzoAKHTv+ahgcNk/dD +uBwOSf6Mvw7eqrKB8AUcJu1g5fkdVQ+VF3G4xtgftt4pGcqXcPCpVjcw+5QO +5cs4mJn+8D70IhrKV3C4vS3csN0qEMpXcphgqdOco+cO5as48G+QWbXmkCGU +r+Zw4Y/PtJ2KslC+hsM31hIpQ30OqLu1HG6XMZRI3pSB8nUcig9UfPHSUoTy +9RzsTEy7cgxhfAOHowZCbYvtYeoNHaI1BNsN14pC+UYOniZ7Vtjt5YHyjR1s +zpn0JMgxQPkmDutyvhSJSr20g/BNHbqv3LksEb97H4Rv5vC+Vr33VtwTKN/c +Ielu9tWqNW+gfAuHhmqumhqxd1C+pUOWy5J7LTyvoXwrB4uta2d2T38K5Vs7 +XL6bZG2Vdw/Kt3G4PSvmwzubS1C+rcODDz+9xOfsh/LtHDJm3b+v+SsOyrd3 +eJcWnJvFuAXqXgcHtrPp4kkf9kH4DQ4OKlvzr58UOQiVd3SoOWe3lePlfqi8 +o0PpRNMYb/9dUHknh/gZz9f3G2+Gyjs5tO+66lX2ZzlU3tnBRO/fw6mt06Dy +zg7+hwyyVTpToPIuDhUbM+XrYtr2AQA9LbKw + "]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGDQBGJGIGZiQADWP/ve/9532R7C+2AfcXTqO16NxTZQaQel +WcX+aS0F+yFcDodbHwQU53mtgcoLOPiv3f6s72QGVF7EYfKukAjPl2ZQvoRD +oahTqNOZRChfxmFLnwLXtLkOUL6CQ/f1NNf2qAgoX8khSUX23R8WRyhfxUF+ +X+Mv3wx/KF/Ngel028mvl2ygfA0HyboF9y4vcoLytRwW//StVtpvAuXrOERN +XnKszsoYytdzsDZOML9apQHlGzjsf/dZsGSRDJRv6KC7I3b+xR5hKN/IoVP0 +gYlw7WU7CN/Y4e3hP42eKQ+gfBOHDXPuOz8MFYSGn6kDQ4b+6U/WfFC+mUPL +HEu9cyvEoXxzB4VXaj3vZohA+RYOnpPCCo+VwOQtHWanqKvUhsDkrRz4bRWd +JicKQ/nWDu8tHp/syhOA8m0cCjJunzbi4obybR3uKqi/+7WDFcq3czj/6wOj +y6q/UPfaO+SYzFm6cuUXKN/BweMtb6/adah/GhwclBaeecQVsgMq7+hg4MHP +sCP17j6IvKMD44LX74TWP4fwGZwcXPN2WXx/8AEq7+QQ73SK6//nT1B5Z4cF +7iya1ZO/QOWdHWq+RqZ5dEL5DC4OGhs1LkrM+7wPALsyuOw= + "]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxTTMoPSmVmYGDQBGJGIGZiQICaec8r57mfsYfwPtgzoAIH7ni3tamFfvsh +XA6HM5x22YpibjYQvoBD/xWOKWE83lB5EYdY/hU8r9eyQvkSDuqJIjJfZrpD ++TIO855fimtmF4byFRxWx0hovzR1gfKVHMo0OdlleiSgfBWHjSdcVy/+5gDl +qzmk3tgufqxLGsrXcCief8viyS1rKF/L4YzFlQhWbxkoX8chr2aH9QpfMyhf +z0FkQWt/sjZMv4HD7zV1vLdDDaF8Qweuk1Mro6bD7DdykA3ZZmfxQxPKN3Y4 +5cR3x/SfCJRv4qD2oo2Hs1UJyjd12Jwjoh1xWgDKN3PoEa85qwE3z9zhX6bw +TacDHFC+hUNn+dJ9Bz/xQPmWDnEP52spyTNA+VYOFyZ+W2sv+msfhG/t8Pbv +M+6svA9Qvo1D5qHLZkFHD0D5tg7HzPmuazceg/LtHCbkeSgWfH9rB+HbO5SL +aK347/kAyndw+PBMJkRZ4ReE3+DgcFUgestx6w9QeUeH0pR3Cy+rM0DSRYOj +Q/Xcs4uWVHyFyjs55P96veOJPSNU3smh4aD69b98P6Dyzg5Wq6oPXjgD0+/s +kLibKTkhFCbv4vDy2pkbUSX/7ADwirLK + "]]}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.009166666666666668], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 40.}, {-0.001110650994099218, 0.0007176603119155075}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"2", "3", "4"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.8001096024771748`*^9, 3.8001096511498632`*^9}, + 3.800164861572789*^9, 3.800253756112166*^9}, + CellLabel->"Out[91]=",ExpressionUUID->"07f695c0-468b-4448-aaf8-8e1182a053ff"] +}, Open ]], + +Cell[BoxData[ + RowBox[{"5", ",", "25", ",", "100"}]], "Input",ExpressionUUID->"6f2ef4a6-63a9-4073-833d-ea7294b487dc"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "100", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{"5", ",", "10", ",", "25"}], "}"}]}], "}"}]}], "]"}], + "\[IndentingNewLine]", ",", + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", + RowBox[{"5", ",", "10", ",", "25"}], "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.800336666340765*^9, 3.800336674819626*^9}, { + 3.800353570953055*^9, 3.800353611264518*^9}}, + CellLabel->"In[82]:=",ExpressionUUID->"023e28d8-3d5a-4abd-b059-fab3ba26fb57"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJw90glQlHUYx/GVwmAwNILikiuhVVAEOYSQ/XEvCy7swsKSYGqSSbKIyiEk +LYjCME1IUESDICzhKDggoGaJrDBCupFxK2fKcpgoV8gVQ9k+2zvzzjvPfP7f +d//7vq/pgRh+pAqDwYj893x1XV3mfOk/M8my/vREZvpNWxbjv2OKrv8fOMpM +fXtn6nsNilENttEJja2j7i6KeQP23LLayq4zI9fGoPk6FcuM5tuKWRf9ZjUP +N/aZkhsi7/l4QkdWF7kJuGEGLavzJuRm6GEeP58nHSTfhAftjXrvv6l0C6gb +JsVURw2TM8HLFSbEORmRb8F8Za5O2dAouRU0uotPf8szJN8GK8vlI523npJv +x49JnT8UfaJPboP9FvHqx1QmyG0h2VNm6fa5LvkOmHqY7VlT+5zcDqvhwz4z +37xDbo+Fs61VFh0vyB2QWZex8OS6NrkjVA69tiH68CT5TiR7h8lXHmuRO2H6 +Q66neorSnbF2x3bzEb23yD9AxUCyz/f6SndB/VE3+eM7muS7cG/Mfu+4r/L3 +XXFoJNlx7zENcha8nmYvS95V7h9IDQvLb2arKVwMuC7Kzpife0buBuMVg6n1 +bFVyN6T7Os1vkyqfnzsk1aVzxcdUyN3BX++8q7pujNwDNdPymdK8VcUs9sDd +lm6D7KQRck8kxRpnz15YIvdECSOCddxI+X690PSXqGNA4yW5F/qvTL2RX/kH +uTdMW57v39g9Te6Nk6WxS877+8l9oG+wtUBvlf6P2AdGvI64vqgecjaSRRHr +j2jSfsRsXMq5qM3Maif3hceZwPtfXRkg94XO6pO1klIZOQdXWQFLsnJaL+Zg +ssi5ZPZCI7kffoodm7JevEPuhwJzXeuDIXXk/ojwb2jUNkgn90dt2uHR1uav +yXeja1gWmTN901Xhu2E4Ee742TqJYmZwoaJVYYZHv5BzkS6aaA6yu04egIDC +pmcl7m3kAWBaXtWyKZWSB+KUr6qzjVaXYkYgRNYui+6Cu7Q+EL0TGkZtkz2K +WRqISdFsscjmHvU8XDtYxPti6hH1PORURXOTdv5KPQ+m9Xyn+M191PNwTi1j +IDfmN+r58Eork8xUkYOP+lZe/sLgA+r5qNQtObvynbLnw0H9Y6GM/Tv1QVDV +mmA4L/ZSH4Tq4SxrAYdcHIR90UFdN+S0P2kQYoNTEoXzdH9GMDiqg1n3RQ+p +D0a5WmEC+z7tTxyMfD8X7silbupfrc8sYBm3Ui+APLy/LPliJ/UCFMxxK26r +yagXwJBTPjea0E69AOPlabOSAnpfjBA07SsbCtxC+0UIVO1vnGyXK59/CNrt +/PI9C+h+0hCsMcmWDv3dSH0o1JjnHV50N1MfisbL8uqcsQbqQ9FwgFVotYnW +S0PBHVB9/aNr9D0xhHgZpV11c/PP1AvRm+jZxjpdS70QcW6Jf4aeqKFeCJ3j +8a6nBi5THwZZeqdmSlaZ6z/bWfVx + "]]}, { + Hue[0.9060679774997897, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[{{0.9963601687517281, 0.00028571592015824964`}, {1., 0.}, { + 1.807275459850174, -0.00031163425191261976`}}], + LineBox[{{2.192724540149824, -0.00031163425191261976`}, {3., + 4.054306705992559*^-18}, { + 3.798942768233984, -0.00031163425191261976`}}], + LineBox[{{4.19545471867846, -0.00031163425191261976`}, {5., + 0.000011180628960647007`}, { + 5.836512132152809, -0.00031163425191261976`}}], + LineBox[{{6.159038857397481, -0.00031163425191261976`}, {7., + 0.000021976097128404706`}, { + 7.920844403198603, -0.00031163425191261976`}}], + LineBox[CompressedData[" +1:eJw1lAlMVFcYhV8BoejQYFhGhJR1GCpi0LJT4bDDDMsswIxFGqOhqUSgJiCE +adOHVBTBAdHUpom0YtgaJLVjXBCGETNgDa0sgYxiUjEOUgsMS6ESti7vn5e8 +vNx899x7z/n/+zyPFsnyLBiGyf33/e9rfdsYeUnogRnllT8/PhHUy/z/eOGl +Z+vqAp+J5sY+WK3NiWmYP0DcF6sF15P69BbE/fCbd7JcVBJAfA8aZLdy3dfM +fC9e58Zc1vN8iO9DffsxS9WX5vUDca1ryjF2xZH4fgh0Kl7TxkoUNz6Aw3Nb +09qbf2i58Yd47noy0ZZ9STwIZZq29O4PbGi9YLROKcRfbBlofggmZ+4UiQKc +iYci7cI70n67ZeJhiDyjGxMOuxIPx2l9XcBFCUPnicCi91C/c6Yb8UioRyMs +oj+1JP4ROixU6k7fXcQPYvgTgWDawcyjsFSdUq9NsScejZz6mu/djm7S/oB8 +oshQePct54cFdpZl97gcnyceAw+/UdvguQVuzMYgY3CwOV/URf5jMftqfGhx +dQe3HxuLqrpufyftX8TjMLxxoXFtnPJl4zAf4hU2oDHXJx62KlGlx1s+8XgE +TokfPxS8SzwBdvc0JaFGZ+IJqNBP/v5TgS3xRBjylMaoX3cST0RCS2Hn8Ow2 +4kmwdngQ2mRLebBJ+KFRk3uud43Ol4xL9/NDgub6yH8yNCtvPk/5e4R4CvLm +tNuvdtB6bAq8Xzze+PqEuX4ijGpmnKqLHYiLYEgwRlRZ2VD+YoT6t03FG6k+ +rBj8yLatizx74qm44WITmuS0m3gqWs6eFnqayA+Thveauu6FNVL/sGk4WPko +we+MWZ+OcP2uuq8e2BFPh+rc9Nmnxeb9M3Cyo0zVvG4ifxn4Wazc36Ay11eC +tO9at12voX6DBMVd9+NGzlP9WAkM0oAFjDlwXCfB6LqoqfMpj/KVovZuTvdY +nRvppZCfOhLXtOBE55HCKnJHeIfCg/RSxCzNb/e3Jr+MDMyTRcWcqzvpZZg5 +MuCvL3MhvQwdK6jZ+pH6QyfDHt6o0P0Z5c3I8dlajjikxJr0ctze6Lt5SG5J +ejmkd5YflZYvcH50ckTJX7SfCpol/5mYcDVcOa525OYjE+X9aqvS5+Z+ysRh +/g1NYrAnx3WZ2AobqmBS36d8s8Abce989Y2A9FlQtUtWTL7epM/C6qydKT/X +l/RZeJZW2LA8SZzJhrSs/NtKG2/SZ6PKV25x6xfKi83Gsfmemlo1n/TZaPYq +kJauUz0YBfg5+a/XH05z/qDA2NLVlmv+A3RfFdhkB7VCId0/nQLMcn1ghZDq +wygx02USnHcQUH5K7GvteRNk8KH8lHhSnWhUy+j/qlOiwKvHfjNrL+kPYaJy +3LS7PLD3H7OFt2g= + "]]}, { + Hue[0.1421359549995791, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + LineBox[{{0.9903084569159696, 0.00028571592015824964`}, {1., 0.}, { + 1.326083729336946, -0.00031163425191261976`}}], + LineBox[{{2.6739162706630517`, -0.00031163425191261976`}, {3., + 3.121567360498637*^-18}, { + 3.691376629053754, -0.00031163425191261976`}}], + LineBox[CompressedData[" +1:eJw1kntIU3EYhteWzhRMc86mHdPUoZa6Nm+ZutfpvGx2mQnaQqgwjDDNtPBC +sbIowwIVWUHSH5I6KkukzJTENCzRMsXEkkBSSaZpzqGTxbrs24HD4eE93/N7 +P87xPVmYcYrNYrEi/97/nhu94rvzjCsWsrV6dX54D+v/xQOntujKyIyD1Mrb +sTjx3Mhu8yTegRgnXZ5aNR9vZR+8SBCVT6j8KN+Fi4qn4etaO/L5w2uqqKxF +7k4shEI2MnuZGX1t5UBsmmXae6d5lAcjL4vpveHDJd8evL01v2ou4xGHYmdm +bF9HwCTNi+A1WNNVMGp7fy82h3ksvFdtIZ8Ysdypl4zS5pdgSCj6ndi4Sv3D +oZtmxKZLRvJFoMs1mOM96Ui+SPhfMJScHXAjjkKzwa4mop5DvmgEdcu+CrTP +aH4fHqTMLH3UOlIeA31BRHxpwTbi/egaEZxwMTmTLxbLY3XqTrGR+sSh+NGH +h1KVbZ94nFkOdG77vJVYCnVu04rEhU8+oLZivHHYnfpogMHv9+rHD1uoTwJW +s/imQ7sdKE+A0OvIitaVIZ8M05Y5buUSfW+NDMcN3iLl0ifqkwhuy7cNJ4HZ +yppEVL/zGzr3xZfOT4JO2dp2p5321STBPudgVTWfTX45zIWmDjfFmLWPRo6j +DfnyxVx/ypPh0ePZ/mTAns5Phv0bpeb+um2/FBStDenWmn/RfAp+hLAzFnMC +KE/FK58KQVT9GuWp6O5vCFLE2fxpmCgNaGqqY5E/DT/N/f3ZY7b/VYEDwrq5 +vqt6mldAPnwsOjAzlPxKlHHC1iWVLNpPCdX14tbbVQzl6eBZegyyEBfp4/Iq +yej5dISdLrl5rVMs/QOWXfg8 + "]], + LineBox[{{57.084251887973565`, 0.00028571592015824964`}, {58., + 6.259461439580674*^-6}, {59., 0.00004052672957553674}, { + 60., -0.0001171424139238942}, { + 60.73117841677291, -0.00031163425191261976`}}], + LineBox[{{61.163147499884865`, -0.00031163425191261976`}, {62., + 0.000055149971378114226`}, {63., 0.00006909938210024871}, {64., + 0.00016709863727960725`}, {64.4496408543024, + 0.00028571592015824964`}}], + LineBox[{{65.2446529206316, 0.00028571592015824964`}, { + 66., -0.0001625384628632251}, {67., -0.00021477388657191755`}, { + 68., -0.00019168113747794406`}, { + 68.49117953143129, -0.00031163425191261976`}}], + LineBox[{{71.45168339084724, 0.00028571592015824964`}, {72., + 0.00016285702073374356`}, {72.56938657322297, + 0.00028571592015824964`}}], + LineBox[{{75.48790177583287, -0.00031163425191261976`}, { + 76., -0.000045471887266415245`}, {77., -0.00024334401266638513`}, { + 77.52578251964206, 0.00028571592015824964`}}], + LineBox[{{79.47067899916952, 0.00028571592015824964`}, { + 80., -0.00019932204504325581`}, {81., 0.00002439736642619432}, { + 81.33138820734185, -0.00031163425191261976`}}], + LineBox[{{84.9409865206198, 0.00028571592015824964`}, {85., + 0.0002655419217942526}, {85.02295073120746, + 0.00028571592015824964`}}], + LineBox[{{94.77817757849795, 0.00028571592015824964`}, {95., + 0.0001227487345523969}, { + 95.14470817168518, -0.00031163425191261976`}}], + LineBox[{{97.83319409742595, -0.00031163425191261976`}, { + 98., -0.00017768552301513854`}, {98.69070124352909, + 0.00028571592015824964`}}], + LineBox[{{69.16413344402102, -0.00031163425191261976`}, { + 69.9531574814358, 0.00028571592015824964`}}], + LineBox[{{73.10255846446596, 0.00028571592015824964`}, { + 73.76190470904115, -0.00031163425191261976`}}], + LineBox[{{83.34605128475691, -0.00031163425191261976`}, { + 83.7711040819075, 0.00028571592015824964`}}], + LineBox[{{87.24037758832016, 0.00028571592015824964`}, { + 87.54555728306983, -0.00031163425191261976`}}], + LineBox[{{91.09148264034602, -0.00031163425191261976`}, { + 91.32880248919469, 0.00028571592015824964`}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxV0nlQlHUcx/EFw2AwMILikishFBRR7pD9cC+HC7tcS4CJSY4ki0AcQtKC +KA5/iIRFNAjCEo6iAwpqlsgKAyQbGbcCCwnLYYJcIYIxpLPfnabfzPPHd16/ +9/P89nnW+GA8N2YDg8GIeX0pvL4UGf+tUcmb1cKUTXNMxv8XjplnveeQ9WGj +bFTG7rjUpo4JN2fZvBkRdy13sOpNyDUxbLpJ0SK39Z5s1saQyY1HWwaNyfVx +fmYqtTuvl9wI7HC9tvVlI3IT9JsnXTgvGibfioddTTofvSN3M6jop8fXxo6R +m4NTyEtNdjQg347lq4ValSMT5JZQ7Ss7+R1Hn3wnLC1eHe25+5R8F35K7/mx +9HNdcmtEm6WoJCpOk++GMKLSwvUrbfI9MHY3iVComyG3wXrkmPfCt++T2+Ll +6Y4as+7n5HY4U5/7cvSWJrk9FA9v2Bx3ZJbcARle4dK1Jxrkjpj/hO2hkil3 +J2zcs8t0XOdd8o9RLcnw/kFX7s5oOOYqfXJfjXwvHkza7p/ykT/fBYfHM+z3 +J6qSM+H5NP+V8AP5+YGs8PCiVpayzAWAy4r4lOm5Z+SuMFzTm1NnKZG7IsfH +cXmnSP7+3CCsrVgqS1QkdwNX3Wlvbf0kuTtuzEsXKs6vy2aBO1ra+vTy08fJ +PZCeYJi/eHGV3APljChmkoH8+3qi+W9+t0T1Bbknhq7NvV109U9yLxi3zURv +6Zsn98LxioRVp+ghcm/o6u0o1lmn3yPwhgGnO3kwtp+chQx+lPpRNTqPgIXL +BZc0zfO6yH3gfiqw/ew1CbkPtNZHNworxOS+uM4MWBVX0X6BL2ZLncoXLzaR +++HnhMk5q5X75H4oNtW2OhRaT+6PKP/GJk29HHJ/1GUfmeho/YZ8H3rHxDEF +83dcZL4P+tOR9l9sEspmBhuKGtUmePwrORs5/OnWIJtb5AEIKGl+Vu7WSR4A +c4vrGtYVIvJAnPBRcrLW6JXNCATfynnFLaSF9gdiYFrVoHO2XzaLAjHLXyzj +Wz+gnoObh0o5X889pp6Dgpo4drrDb9RzYNzAdUzZNkg9B+eUcyWF8b9Tz4Vn +dqVwoYYcXDR0cIpeDj+knour2uWn176X91zYqXzGE7P+oD4IShrTDKeVAeqD +UDuWZxXiSy4IwoG4oN7bUjqfKAgJwZlpvGW6PyMYvkrDee38R9QHo0q5JJXV +TucTBKPIz5k9frmP+jf7zxQzDTuoD4E0cqgy41IP9SEoXmJX31MWUx8Cfd+q +pYnULupDMFWVvSgspu/FCEXzgcqRwO10XoRCyfb28S6p/P2HosvGr8ijmO4n +CoWCUb5o5J8m6sOgbH7B7nlfK/VhaLoirS2YbKQ+DI0HmSWWW2m/KAxsidJb +n96k/xODhxexmjV3tv1CPQ8DaR6dzJN11POQ7Jr2V9iXN6jnQSspxeWE5Ar1 +4RDn9Khl5lW6/AuGk/Mt + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxVlHlMVFcUxp8sIgINlmVASFkHUMQghWEVPnYYGGBmgMEgjUtoCimgBoQw +Nh2gomwD0qY2TaUVw9YgqQ6tiiwjBrCGVpZARjEpGAeoYaeghK0m70yavuT9 +cfK7373n+859z+5Mjihdm2GY9PfvnvevFvPfc+m0Relpi/YgtloKYv7/wLT4 +gqAi1reHLfeBF9qmLb0rCmBrY5y7rvMDp0bDTfHhZNly1YWZQLa2QEZGgEQl +9yFujZpynvqQwVvitvDQ/VWvUMAjbo9Xdk0byxyG+nDERmVqcO2SB3EnbGTd +iuzt0yLugj8dosT8PDfih1Erak+z2dTwI5hJC/6mz9CR+FHUtJzVln6h2d8d +NzumTUPWTYkfA1cpNazfXqf+PHByYXe2+87f3Wz9MV5anY/Ql70i7okCRXNc +5yE92s8LTdOSmEu7KlrPw9TcvRy+mzlxbwiq9gj7jdaI+8D/snLMediKuC+K ++6rdriUw1I8fVhyG+s0TrYn7Qz7qpxX0qTbxALRqSeVtThbEj2P4Ey531kTD +A7FaFl3THW1MPAipNRU/Wp/ZofMB8USOKvv+O9aPDDhQkNxlmbFEPBi2LqP6 +XgvLbC0LRvzgYEMmv4P8h2D+9fjQyoYBe54sBKXVna5m3f8QD8XwdlXd5jjl +KwvFEs/eZ0ChmU8Y9KX8Ett3HOJhcJ+OefqYu494OIweKPK81ebEw1HUN/XX +L1n6xCOgSk9RB/5xgHgEwhuz24bndYlHYq/JI+96fcpDFomf6hRpV3s2qb8o +fP0wk+e50Ev+o6BYf3Mu+u0I8WikL3Tvv9FK+8mi4TD5dPurzzXz42NUMWdW +lmtCnA9VuNqvVEeP8o+Bt2vzdJia5iOLAce/efeaoTHxWNy21POONDtIPBaN +V4qd7RbJDyPAB/UdD3zq6P7IBDhe8iTc5bJGHwffPovqLx8ZEY+D9Orslee5 +mvPjcb61QNqwtUj+4nE3JuVYrVQz3wQIvm/SvVVB9w0JyO14GDpSTvOTJUAl +dFvGmAnLlQkY3eLXtz03pHyFqLyf2jlWbU16IcQXT4XWL5tRP0Lo+Bv4tkps +SS9E8OrSfte95JcRgXm2IlmwsiG9CHOnBlz7CixJL0LrOip2f6b7oRThsOGo +s80LypsR47PN1Bhe3l7Si/Hbdu+dE2Jt0oshvLf2JL9wmfWjFCNQPNly0XOe +/Cdiwkp1PUNuyq5HIgr75Tr5LzX3KREnObcVEV52LFcmYtdnqIiJ/YjyTYLh +iE3b62+5pE+CtCVhfdHJgfRJ2Jg3WsxMcyJ9El4IsmvXpogzyRAWFH5XoudA ++mSUOom12n+nvGTJOLvUVVEp55A+GQ32WcL8LZoHIwEnNXNm6/Es6w8SjK3e +aLzpOkDfqwQ7ssFuZ2f6/pQSMGs17kXONB8mBXMdi9xyEy7ll4KjTV1vPFWO +lF8KnpVFqOUi+r8qU5Bl32W8k3SE9CcwUTK+eLDQvedfVO7OQQ== + "]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxVkn1Q03UcxyeLh4SIJ0GE4RCYgPIMArKx94YD3ED2BBt4XGTQtDOQLNNQ +nHocSVABLZIDKTlQMg3ijBITEAojRBSUNM8kBSJF0EECwZF3++y6fne/P973 ++X1er/f3u7lvy5FnMRkMRtbzd9nz14Tx32Npp4gUBB7nG9IUn/H/Bzs7/Bfv +S5PaDNEC5ZqqxoqeBK4h22DX+4NsXhGP5g5gluUe6n9gQZyVmBg6N2PStIqy +KzZaNmjSZOPRhszGt4LA94ZkHjRfgz3ir0NnK0yJ5wmXO7n7TolWUOZALOwf +yWddv2jI3lg2wmruGHaguS80KlZHIduceOvxY9H49MI+B8r+WK3kdrZ43aL9 +QLj0lLZmXzd+H4QXApwe/Sx7kXjB4Jrf+Y4lMfJD0MsJXIypnab+oWgYZgXP +HZghXhhabX2ZbreWE28DPN/Rv/1mtz3lcJzUm5aG6ZjEi4DPBeFvzhWNtB+J +mrgHk1crltN8Ix5mh0XvzbajHIXWfudXbeasicfF1EB52vfBM9SHh92n++r4 +MuN5ovHGlLd1082XKfORlln/NMTGkXhAWd6N2isrqI8W6Ll/THdDukR9BJhW +Oc4lrbOguQAcF8XTClsW8YQYXho1PzJJv7dWiAy9W6Bk8hr1iYH5qbvzls4L +hqyNQfFlj95dt93JvwkNkrNNHzbTebWbYJa+5WixownxRVjImWuxFw8Y+mhF +SK3eKZrI9KR5LJzaVjWf6TYjfyzMLkm0VbPG88Uh91lvw7OTT2g/Dn/6mcgn +0r1oHo/z7DzncN0zmsfjQle1j5hn5G/G0F6v+vpyBvE34/FCV5d6wPh/FSOR +Uz7aefgh7YshurI1wlvpT3wJ9jEDZkOOMOh8EsgKdp8tOcqieQIcltr0Qj8b +4icgrF7hfm97KPET8bGq9ZSl4DbdXyKk70YNaPimNN+Coqg7ask5N+JvQU/j +1Woz10jiJ4GxsOPTVX9ZET8JH5Skq/1ZdrQvxXVZavroqJchQ4qCz5zG0nhc ++l6KELNLnX8k0n21S5Hzk6C2mrOe+DKM6P/Obl/tY8iQgVdz2p5VyqU+Mvx6 +oiMo3yrMwGuXgdmisd+/NZL8cjCzHq0tVxv9crwembAnoz+C/HKETNb9/mWc +gPxy/LOh/d6OAiH5FQjOFnPWDJmTX4HiET1HNBJAfgViH+ft/2QpnvwKvDbP +Xnc5P478Spg/yVR6sH1pX4nCQR+Bm26O7lsJi8rG4xc3SMmvhKv14PYuLzH5 +k2FS4zcbOhZD/ZOx54ev7r6kCaL+yYixzBqsapeTPxll4YX8093Uh5GC+7UW +B+fPKMifgpLKgIPXwmOofwryGNygyjo5+VNwabxP2NdB98FQYezAztkI/wzy +qyCb5dW+Ep9AfhWWf/R5vm4l5XYVFn+5e6zTkU1+NTTf8N/q1mnIrwavINt3 +my2dV6vGYeZmUw/xWvKrUXWz1+qQD2g/FQ5fCM6fYOfw/wWuo8As + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}, { + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}, {}, {}, {}, {}, {}, {}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 100.}, {-0.00031163425191261976`, + 0.00028571592015824964`}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"5", "10", "25"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}, { + DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.560181, 0.691569, 0.194885], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{-1, -1}, {1, -1}, {1, 1}, {-1, 1}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + PolygonBox[{{0, 1}, {1, 0}, {0, -1}, {-1, 0}}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}]}], "}"}]}], + ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", + RowBox[{"True", ",", "True", ",", "True"}], "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{ + 3.8003366789859247`*^9, {3.800353598477137*^9, 3.800353623329397*^9}}, + CellLabel->"Out[82]=",ExpressionUUID->"b9511137-4c18-472b-a1eb-141f33a303fe"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"ListPlot", "[", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"n", ",", + RowBox[{"N", "[", + RowBox[{ + RowBox[{"SeriesCoefficient", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", + "2", "\[RightDoubleBracket]"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", "0.", ",", "n"}], "}"}]}], "]"}], "//", + "Normal"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"n", ",", "0", ",", "500", ",", "1"}], "}"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", "2", "}"}]}], "}"}]}], "]"}], "\[IndentingNewLine]", ",", + + RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Small"}], "}"}]}], ",", + RowBox[{"PlotRange", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", + + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"{", "2", "}"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8003364982498627`*^9, 3.800336534217531*^9}, { + 3.800336588980377*^9, 3.800336589450761*^9}, {3.800336716886891*^9, + 3.800336718591433*^9}}, + CellLabel->"In[86]:=",ExpressionUUID->"dbe23c91-059c-4b34-a730-981ae080f005"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{}, {{{}, {}, { + Hue[0.67, 0.6, 0.6], + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[{{0.9999999999999999, 7.514748073736528*^-17}, {1., 0.}, { + 1.000000000000005, -9.830101724741988*^-17}}], + LineBox[{{2.999999999999994, -9.830101724741988*^-17}, {3., + 2.3292585176397447`*^-17}, { + 3.000000000000016, -9.830101724741988*^-17}}], + LineBox[{{157.207370910211, -9.830101724741988*^-17}, {158., + 5.2454438444928065`*^-17}, {158.17566808849583`, + 7.514748073736528*^-17}}], + LineBox[CompressedData[" +1:eJw11Hlczfkex/FjG2TLnv00dpVKWrTwHobKVhKy5Wi0aTv72jmdlMwInSmi +GcaRLcsoKSpbhzTZo9HCREipaDEqS3Hd+/3c/unxevzO7/v5PL/n8TimfhFe +/l05HI5nFw7nv/8tBV5elcc3YaTdh8LatD3OnP/+5W/C9we15nNsYllXbcKI +M7q0V+d4l/7XHH/s7vd7k9p4K2uuP8bk9c8MidvFGv6wwLC/2ww61jx/nB1T +YWobm8Ba6w9pQnZUmM121np/lJl99eg0i2Gd7w9Oq+fwMYky1lX++Nlu+vEo ++000PwC3bJrGzpk7he3HDcCAmb2SF/3DY40AhHmZT91xNZg1LwBff7hdOfRt +KGttAMbFWwbsPxTCWh+AmMrsS1sXB5I/AEV7byTbeW8kfwAGJTie7FmxgjUn +EMpJ+7c965hH8wMx+vH5O2E275zY/EDsnvjh48e/HMkfiLyKqlkZufPJH4hN +RwftOdDVnfyBWGlY19Xa1Y38gRAOHNs5/fqP5A/EPvOCPXzeHPIHYS+KV++b +M5PuPwjzqpdvtdg9nu4/CDvqLprIE1ousvlB8CvskPr3Hkr+IDzzCbhwzet7 +8gdhVFhnlsfxieQPwoktnyorfKmrgmB3xfjfIb/Q5znBEC4/c69CMJr8wfCX +b/9Td30Q3X8wODbH900z6kb3HwwPF++xC/RP2P1og7F7yK38vPnNbD99MKTx +5zpcn31hnR+MmcfOWt663pX8wbh8w9L8Zik1ZzPexVSWJyZyyL8ZOydtvP+u ++CN7H5vxr/PdLg/9/u/fjKOmMTlJQS9YazfD060yqDzNQPM3Y1+RxZWOQ0Vs +v/zNsGxtcTJurWBdtRlPfa1iJs6vYs0JQVjr+f1b9NTcEIR+St5he7qSvv8Q +JAVeetEqKmPNC8GC8+0y3qhi8odg4Pz3zs/PG1jrQ+BgGethsuMIzQ/BSfvT +ut0DUtl+VSG40dfpatz1bNacUDgkNQve2F9izQ2FT2OR0Y+8y+QPxdrXcfHb +9uaRPxTLUvVhJ7zofW0oklaN+lBY+if5Q2FlszDx4Sc93X8o8v8ec257WhzN +D8WbvcP36W0V5A+DuV1T/U2LRPKHgeNbnDNato/8YbhwauFIfXsK+cNgFHIg +pLZiL/nD0Fr2EIMDksgfhrRFRffcU+PJHwb3N9mCRw5auv8w9HWZMevu+CCa +H44rT4tcdVM9yR+O0FsXV052CCd/OAz9K6Y8niEhfzgCOrOWZLRJyR+Om9ui +bzsG0XN9OOpju892SROQPxy9dv1uGJscTP5w5Jot6Tz62pfuPwJ2GTZPfEe7 +0/wIHPhitej8WlPyR0D3urK/X6sb+SNwhvNHy8HVXuSPwMvGHR1/eniTPwKp +Z7OcRs1aTv4IGEpUNd8N8SR/BG5vGZzjk+5Kfj7md+naXLLBhbUxH8MLVx0a +fmoqfR98uOYWFvQYVp33v7biY95fbTahwgl0P3w8Tw+PluRasvbkw0meOrqt +zZruiw+BcNWeuB+p+Xy01JQu6bLQgu6Pj95yh9p5DRNZ6/j43X3MILsno+g+ ++ahxLNu1sLo36ww+0ttSgu/4F7B98vkYvWrV3CtJHLZvMR/Xo+79vHVDH/Ly +sZhXJ1p0YwDrZj6GCIf9iJ7UHAF8B33iHjhjRH4Bfpqq02507U5+ASRZD1Mf +rf/kyPwChJmu9j5eXscaAtRsLVrvfC6PtacAv98Tuy2Nfcz24wlwMebrh590 +taz5Avzw8rdlyUPesNYKsPOZpVVnVQNrnQDrtF92m3q8Zq0XIML9c+xPhhes +MwRonVso+lBXTn4B+uScEjXsucm6WIC1hp8DzXocYV0lwPa4Rxv7/p3F9msW +4KNN01quYwFrjhB/R9o6Lr1bxNpYCG5Ql5aefW+y5gqxZOLqRv3EQvILYXx1 +/4MpqwzkF6KvSVWze/QF8guxwS5gRfjkE6x5Qvw5Pvdo3JpfWPOFWPhrkUVW +fQL5hXBNcem/Yckh8guROWbE2PcvjpJfiFEdPHtl1DHyC+H4Jdq8ypx8+UIc +LBMIcr/Tk1+INNWKRZ8nJJNfCHEfVbku+WfWzULsnJLUK2BXGGuOCCndRfnR +ewPJL0JB1mtOhUJNfhEWfMoXnV8YQ34RJjw/t22XTSz5RbCLjl7hwttCfhGi +0iPD4/bT+zwRus7fX/rPIzH5RVhiN/fqsAaap/12fpy5+EKAJ2udCAPCRXcK +1CC/CDOuac7c/ORDfhFWDDm5bPpnHvlFyDCYvxSb+pFfBHmd99TfLtLzKhHM +XspnW/isJb8IK9Pemwp3Lye/GJuUd++Gm7myNhajZFr81Rt/WLPmitGytl01 +t3YI+cWYr+y/sKy3LfnF6Ot4rseychfyi7HV6K/ulvNAfjH2lSRf2S2dTX4x +tIfNG1xdZpFfjDrtpQ9dNs4gvxh/eNu4vl03ibVejGW66a+1UYNYZ4hx8VSN +xNT7VS7zixGbc6K2as9A8ovxW2rYqmbzkeQX4/7SMr9Xk8aQX4y2F37a3jmj +yC/ByldFyha34eSX4G72fvPDTnQeV4Iho40OfI7pQb9/EjzpNm/R6WH/svmQ +oP6X7Rm+FvpZzC/BlGNOS9vGvWXNk2D21qUuqbVtrPkSJJvwn5qO+sRa++38 +JIdpf9p+ZK2T4J3s5DGlvJW1XoLvR+WVLZjQzDpDAhOTE9o5R6pZ50uQEPnA +2IhfwrpYgpQViqkbmnazrpKg/+gRV5xL/2L7Nktwdd2aYs/OEtYcKZ45LeBf +W1PG2liKxp1tndb1pay5UrSlv9/pf5M+byVFvEWJY7TtPfJLcV5sbXQx/zpr +Tyl6ZGskJ/acY82TYu2Dfc0xiXGs+VL4m60JLbA/TH4p3laWlNhsOkt+KeYO +qn+84WkW+aW4suKp4X4xdYYUGxYcub1xVib5pcie+uLwby6nyS+FbdnKRbVP +UskvxapteR2TdUmsm6VwPb4y13kRnzVHhpMvSwuMN2rIL0NOScomt8m7yC9D +39qeTb4HE8kvw87Zt61mvqKGDKcCC2vcCnXkl+Efs0nnrXjbyS9DguHW2lvt +0eT/1gMGttcGiFhrZehjcSbYyt+btU6Gnwbf+fef9avIL0O/pY+S3vTcTH4Z +nJRrbMv20v75MvhVbE2WjBeQ/9t5IYun2P0TTn4ZMr5fPVi7P4j8Mpis2Znd +e9hG8sth3FW7cDZ3OWtjORyexKk6s+1Zc+Uor8+Lrl9gTX455j/vnnVu3QLy +y5FxOiLuU+wS8svBOyxT9Tf2IL8cN53/3fJh/WLyy3F6TPjszBZ6XyvHiFtW +Oz7ag/xyNDw42ivFMIO1Xg7z4/r7KT4jWWfIv/0+N+7I6dKL/HKMT93lrB4x +nvxyHEvkO3Ntp5Ffjgk67W3fcebklyOw+o8bfv3pOUeB0A6ux0vfieRXwIub +7rn88ljyKyDzuzxQ7zGItZUCHh3j1MmbOhyYX4HSxTYe/e9V5jC/AqtTZxxW +2HDIrwC3NJ6XaN+T/ApsuNP4XWd4b/IrMCYwsN2pnp7rFHjQEL9r0stu5FfA +UOQdWjW0k52foUCrV1ah570W1vkK1MZbt/3aSPOLFbB0r59cvOg0269KgTeX +rz/pNvcJ62YFGpNOFe2PrWbNUUL6sdIu4WMNa2Mltvt4XIppfMWaq8SJJzKr +7eoXrK2UGFHc1/BKSedBiS0luv1Df3jA2lOJirB3l1N6XWXNU+LQ5LPpxdWu +bD++EpGr7yfUZZ5nrVWiYdtj88VDr7HWKeEWFjrcJq+AtV6JxBdLZoabUGco +kW7Zd/lICwP5lTD50Nht/dtc8ishN+/q8vhkBusqJcosHTw11w6yblbih0yF +tN3LnzVHBcsIH63VyUTyqzAzZfsPmYUHya/Cu7q384WnU8mvQnU5ZwbPnxoq +lGoG3i18Tp/3VGHYnC1LP4ftI78KF1c7GUb317Hmq3A9ZFtmv6Fa1loVzE44 +P73g4c1ap8IRUVtTp004+b+dP7bnT2YPVeRXQT/v/X37O1ryq2DQ7MlveEhd +rEL3C7lWrxPU5Feh4MuAqc6dUvKr4NO1qe1DBZ3PicT4m+/Mb0/ksTaORP64 +zPg/gpxZcyPhJ3Q3vd/gSv5IpLXXxOfN9SF/JByfR73aaeZL/kicfZz7IuUy +NS8StusupF/2W0v+SFif4DZs/n0F+SPxZU6PDTsTl5A/Ek17lo+9ZQLW+kgc +6VH59cyvpqwzIuHVzd16i//35I+ER/fMZ30H2JI/Et7Lfi7w7+NE/kgk5B34 ++24/8jRH4pmdvJ/UZxb51UjbNjT7pNtM8qvR2TtnSDd3c/KrUdXrdHbQq3Gs +rdRobHcQtnt3Zw01Bm20Te038rM986sxvUfng9PTB5FfjRo/Xv0ZaxPyq6F8 +X+e7JXEE+dXoZthdtChiOPnVeBCocOzsPpj8aoxCjH3DVyPyq5Ez7lTF7Iiv +bF6+GjGbYg2PdDWsi9XotcOs5pD+4QXmV2NwN4/e5TZNrJvVWDZivvXRfa2s +ORpMqr0wz8itnbWxBjtDhkTFHaXnXA2+lq6PdytuYW2lgXbaxMGhuXWsoUF5 +lts159KnrD016JWxamr9iiLWPA3qo6odf4k8xvbja5BefcbjYNIt1loNdvzV +Ud3hWMJap0Gghu/bPu0Ra70G90cb3qs+0vMMDcIHbOm27mQx+TWY3NvIx0NW +RH4N+jx+kJbKvcK6SoPhC5tmdT13gnWzBhPqpnx9sFJE/igccg43/hJxjPxR +mJTaMqt88FnyR2H204q1wxzOkT8KGybZ3tEFZ5I/CgHvo7++nph+4T/tw8cH + + "]], + LineBox[{{11.706670919267742`, -9.830101724741988*^-17}, { + 11.706670919268845`, 7.514748073736528*^-17}}], + LineBox[{{20.880047848190326`, 7.514748073736528*^-17}, { + 20.88004784820308, -9.830101724741988*^-17}}], + LineBox[{{30.023622714768678`, -9.830101724741988*^-17}, { + 30.0236227149107, 7.514748073736528*^-17}}], + LineBox[{{39.186720694878176`, 7.514748073736528*^-17}, { + 39.186720695724865`, -9.830101724741988*^-17}}], + LineBox[{{48.327381331956964`, -9.830101724741988*^-17}, { + 48.32738133665666, 7.514748073736528*^-17}}], + LineBox[{{57.455175198158756`, 7.514748073736528*^-17}, { + 57.45517522302706, -9.830101724741988*^-17}}], + LineBox[{{66.57430350325161, -9.830101724741988*^-17}, { + 66.57430363046944, 7.514748073736528*^-17}}], + LineBox[{{75.68708081553525, 7.514748073736528*^-17}, { + 75.68708145027725, -9.830101724741988*^-17}}], + LineBox[{{84.79495971184843, -9.830101724741988*^-17}, { + 84.79496281887111, 7.514748073736528*^-17}}], + LineBox[{{93.89894690606395, 7.514748073736528*^-17}, { + 93.89896188823539, -9.830101724741988*^-17}}], + LineBox[{{102.99977161694585`, -9.830101724741988*^-17}, { + 102.99984299845765`, 7.514748073736528*^-17}}], + LineBox[{{112.13612938260889`, 7.514748073736528*^-17}, { + 112.1365972413406, -9.830101724741988*^-17}}], + LineBox[{{121.26396531844671`, -9.830101724741988*^-17}, { + 121.266115153064, 7.514748073736528*^-17}}], + LineBox[{{130.3832412949857, 7.514748073736528*^-17}, { + 130.3930626097888, -9.830101724741988*^-17}}], + LineBox[{{139.47894573494008`, -9.830101724741988*^-17}, { + 139.52359453793892`, 7.514748073736528*^-17}}], + LineBox[{{148.52868018834246`, 7.514748073736528*^-17}, { + 148.73082030261767`, -9.830101724741988*^-17}}]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Offset[7]], CompressedData[" +1:eJxV13k01H3Yx/EpLZJKu4qiXQiJJOmTkpDIHmLsO8PYxzBSVBSR9kXSJkWi +0EaLaFWKJCXJWpK7qO7U03m+132e8zj98z7fuX7f6/Wbjk7yLoHm7mIcDufb +IA7n7x/OYM7//cQcbYs86vl2BaueFZz//4PtptGiJlH6TZbicDEd9LP8VZQO +aymkFQ+V/Nculs4noHZQinWeniu1NNYJ5qlq9npSy0BT47vxrXZ7ajk0XLZR +S9TeQD0TqUuV4v0WGlDPxph8mZzcW2rUc1H9a93eEnlZ6vnoGxoyVU1FnPZe +gIYwTsiUehlqJfDLIr4aLZCnXgjdxRo7/NT+a1XcVR2XcGLFf59Xg/38sYlq +5ydSL4Lh4mtndK9LUqtD5/HiZO50DvViXPD7Gjxxaocuaw0kPX9dI+109QZr +TXwWztv5yrGFeglcGn1fROV+pNaCSCARHT2pm3opfFZnv9ki2UWtDa2i8weS +9n2gXoaaRpdl2gFvqHXQcNChp1vnGfVyNPX8MJp8+Ca1LrwOvn2r8NORegW6 +PSz8fQYV0r7AsEeek116brAWAbOLAuuqJpTT+UpEP9YtEu+4SecrEbpbw8HY +tJTO9eC0vy0vRf0SneshsfSFUdiv03S+CosX/n6XsXUvna+C6S1V39nb3eh8 +NSIues+IcUhg+4lW497nouOmQ9JpX33Uymm/lGrOoHN9mAzrub9gBDVnDY4X +VSSuqtpN52twcVvj+sTsHXRuAM2AxmFT1OLo3ADSTmMEAfOD6Hwtthyessut +15DO16J8rI9o+2k72s8QRn2WalMXetP+hrAQNkl3TA2gcyP8jnPKEuT607kR +rs0SPtY6Tp/nGCOjaJLeoqOudG4Mj+1j1bOH/vf8dQiy7Bp5ap0xna/DLLG9 +trr6inRugp8+juNnmKvSfiY4OqjQ6Un4Stp/PbYlX6y8VaBP5+vhnrj1VFUL +NccUDlESNl1rVtG5KeZbBLYaTtKlczN0Ljr3eGHQYtYwg/+7N+By59LnzbC4 +ZlY+t02CdZkZIqy3jln0RYz224BhXs+T7f5Is8YGHLs26dCM+XLk2QDh6/Ub +U85Tl22A3sXfrhltsjRvjirZGVJ55ZNp3hxPp5iJwmKlaN4cscelbIbdGEzz +5jAWF/zT/KhjOZu3gJriB/excXXX2bwFRsfcMr6n18taZIEDZpbWrVnfWZdZ +QOOrybTdQ36y5lgi6dRwO/Nr/TRvCanXB12qlP6heUvkTxw8uEupi+YtcXtl +5ukf7W9p3gov9wQEXHavpHkrfFHjr85WPMv2E1mhzKC6zlziAesyKySlfV1a +JVtD+1tjw77H5l1nn7OGNSpnDzo1R5nORdY4GDSsaHH0E5q3xqbmhbzkaxU0 +b4O72u2bT8ZdpXkbGOhbWBU3n6J5G+S0j6tz3hNC+9ugwF0v8KlSNu1vi11q +Ocfqx1yg/W0xbujAm7fZ+eS3xf2x7o8m+uXRvC1+P9pzY5V6Ds1vxHib8TIN +eidofiNWN4TmD+3dR/MbsWnw+5npjltpfiMk1581qeSX0b8fdnh8n3/npEoM +7W+HiY6nml+8TaT97aBt/HV3o0wS+e1ww+zX5hbxHeS3x5KzCt7REgk0b48r +5U9v2gtENG8P+aiDZVWDQ2neHm+XaZ6RbnWleQeUfBv5uYWvRPMOOF1/eF5f +ojXt74C0NLPS9imutL8DLnTLyl4x8CD/Jgy6oT3qyR138m9CBs/ghFqRC81v +gtdVp7JCngPNb0Jhr+fUybvMad4RrWVCbmysHs07Ylp58aH8SdI074jeqHsP +PuWp0v6OuDg92PtjiS7t74SV6U/eJPP0aH8naAhXKFy2phY5QafyzbOBgRU0 +74Ti/M3Dthdq0TwXQQ8SWxQi6flyXIy8F2ckUJan53Fhozf/Yd3T3+z74nLB +r7BwPWIvTvtxcWbH6Lb1D2nfTC6aF5g+XV4wnbxczFPT2Tli8gzWTVwo+cXv +FkuYRn5nVHs4tBplTGQt54xk+I+Y6jyK3ocz+ous6grf/bnG7nfGz4Fd3Q3Z +71iLnCEdyll3xfYd2y/TGT11D7LDJb+yLnNGmXp+mlrOD9ZNzugeE/hYU/iT +/v65QKV2n+bCR/2s5Vxw5svzV0t7e1nDBXvzh0QmGneS3wVBRW61FWmNrEUu +GCS9MlJ91G263wWy++K5w0qvsP3KXFCd+9VXQrOadZMLXBTOpTtte8Ga44oh +0+e2IqeWtZwrVu/YKK2Q+5w1XDEjJ//opwKa57ri/ZHhWhmH7pHfFeIW2ROy +/K6yznRFbInxlAf1J+j+v5/37jzdrrOL/K54ZyJ5QFk5h/xuUE7Rbn8oU0B+ +N/z2fDdLLOwS+d3QU1V/0G4onXPd0PXS5lTJ9vPkd0PfmIpEDZwkvxv++Bx8 +p+J/gN6/G2YeEymtUN9C97thyoXUMx8uccnvjj2jDn0WSm0lvztkS0cX+Cbs +Ir87lDHpeV95KvndcVG2Xl5jSwr53RGWUhTrr76D/O6oU/xjOqAYT353cL6Z +TZZNC6f3745tmgtPxy5xo/s9cF/98/QVevPJ74Exi8X3Gr/mkt8D/uZKCsk3 +vcnvgT8rHzRO/ORHfg/MSFLxOHzcl/weiG8surZ1nSf5PVC57+5eTUtn8ntg +XIp2zvB6K3r/noiaezjx7a9VdL8nZF5dfuiv3ruM3e+JPXO+//hxT5v8niit +b1qaX6JPfk+4nRyXcWSwIfk9YV3uMFjNYC35PRE8dvrAwturye+J/Up3Mnjc +FeT3wj5Ub9y/YjG9fy+sarHYqrxnFr1/LyR3XJWOSPlyld3vBZeKX2HuIyaS +3wtvbT2u3DKfSX4vTPMfKDQ9PYf8Xji7+WdjvSN1kxc0b0j9M2E7fZ7jjWCL +C4/rg2TI7w33iB3nU2+Po/fvDY766f0LJMTo/XvDdLnl9DWZDez9iLyxZ8L9 +slL9HrZfpjfCki79Mnj7m3WZNxafuqhy//Zg8nvj+l0Vpapaao4PeuMbX6al +ccjvg51znZ/0Vv9g8/DBPzqPBj1z+c/vg5Py8cXpXs2sRT4wW9vo9fJMOd3v +g/2Vyjd+Ha9k+5X5QOXbl2VS3+pZN/ngjaNq/Bz9JtYcX/h/u3x4cya1nC/8 +fu5N1shtpO/fF+me15q/8etYc32x5nJ/OHdaNfl9MVb/q867y+WsM32hpbLF +VDo5m+73Rc6S3NQ9Y7LYfk2+uCu57GbC7SLWHD9opfcEfVxyjbWcH2y7KyVW +c6+T3w/27QlJiftKye+HDVmZ/mfNaV7kh3Sbad8ras+T3w+q6kZpz35m0vv3 +Q9lz2Us7ziTQ/X74uG/y/kyNSPL7Q0nzc2eVchr5/cFxrC6WCd9Pfn9cOWc0 +NbP/APn9IeF7xLetfh/5/fGt7hnGe6ST3x9njCsfG2Ylkd8fhh+Lgl5oiej9 ++0Ny+aKlj2Z50f0BuPGm0iBVwYz8AfC7f9V6nlYA+QNQPrp+/qtFoeQPgMdA +oUl+Xxj5A1CVGPdA24vOMwPQuWWI7vIzQeQPgPiuQ+XT93qTPwAliiYDJ9sd +6f0HQjNfvcFRxpDuD8SR36rGl+3lyR+I1PbG0S7f1pI/EBc4R78c22hO/kC8 +707+dd7UkvyByLpYuGzaUgvyB6K8RtA6bIIZ+QPxYPP4Yts8A/LzoD9ocE+N +03LWUjxMrrA5PvmcAn0fPBiUVNwZOqml9H9blYdV9/rU/YJn0/vh4V1eQFxo +iQprMx6WRWTJ9PWp0fviISjYJiNhNTWPhy+ttSaDjJTp/fEwIkKrbVXXHNap +PBwylB2n2TCN3icPrdp1u4xaRrDO5yGv74D3Q/c7bJ8yHmRsbPRupHPYvtU8 +3I59vG2r00jy8rCO28E3vjuGdQ8PE4InrcZwak4QHMf9lDtyQYL8QXBVSBU5 +GwwhfxBCC59lvdj0U5v5g+Avv9Hy9MsO1ghC69bKTTqXSlmbBeHQ45C167e8 +Yvtxg3A1/s9319Q21rwgrHx/cMPeCR9Zi4Kw862K6kBTF+vUIDiIfu+RN21n +nRmEQMN/t7iWN7POD8I3vQr+946X5A/CyOJz/K6MKtbVQbAv3+apODSbdVMQ +diS8cJZ8Xsj26wnCD/XP9nLad1hzgvE8WkN7/aNK1lLBkPMa9GW4ZBVruWCY +zNnYnTmngvzBkLp5+Ol8m3LyB0NSuqnHMO4K+YPhpOlhFTDvLGtuMM7PKjmZ +YLedNS8YRrsrlQs7U8gfDIMDy0c7mRwnfzAKZKdM/9p8kvzBmPaLuyQq9hT5 +g6H9O06pSYl8ZcE4VhcUVDIsk/zBOCOwMv539l7yByNkpOBl6t5trHuCsXN+ +urjHLn/WHD4ODOGXxe3zJD8fdwrbOfWRQvLzseZnGf+yUTz5+Zj97lLiLvUt +5OdDMy7Oajl3M/n5iM2LDkg4TPNcPgbrH659/SKE/HyYaOrdnNRF94n+Pj9B +KeSKhxnrVD7GBPAf3hGC/HwsuhVzoeqnLfn5sJqQs2Hhv1zy85FfrvQ+RN6F +/HxEdFgqHLxK5018KL6P0FW2tSc/H9ZnvsoH77Egfwjcoh49ClA0YC0VgpoF +STfvHlVjLReCL/b9Ar22CeQPgX7UaKO6ERrkD4Gk9qWhG14uJ38ItkrcG6Ky +CuQPwf6avTf2hOmSPwSiE0pdBsuXkj8EHaJr3wc5LyJ/CI5aqht8cpjLOjME +G1IXtotix7HOD8HVc62h8pYfSpg/BFuKz7Y1ZYwlfwgOZvnb9ChNJX8Inqyv +c/kwV5b8IehrdhGNKJ5G/lBYf6iM+rJ2MvlD8ajosNKJZfQ8uVBMkJE48m/8 +UPr9F4oGsVXGuZP+YfcjFJ3bd+Q7KmcuZf5QzD+1bH3fjE+suaHQ3bp+eVZb +H2teKPZK897IT/vJWvT3+elaC85r/GCdGore8JxTURHfWGeGYua00ro1s3tY +54dCWvqsaEV2C+uyUKREP5WS4NWwrg7FAatIBafPe1g3hWK0zJQbOrX32L49 +objpYFdtNlDDmhP29//Da3i37OpYS4Whe2ffgFpnLWu5MPTlfd3pXkWfVw1D +knKNdpzGY/KH4XKImsTVstuszcIwtCgm9GzGJdbcMNg/3d8Tn5bAmhcGd0U7 +vztLTpA/DJ8aa2rU3S6SPwx64zpfOb0pJH8Ybli9KX9STZ0fBqc12Q+clxaQ +PwxFCs0nDi7PJX8YNOqsjdsassgfBpvE0l/zUtNZ94TB4LR1iY4xjzUnHDnv +a+9IOceQPxzFNQfc1s7bRf5wSLYN/+x4LI384dip+0B18QdqhOOcZ0Xr2opU +8ofjteLcy6rcHeQPR0r5ffv7/XHk/9tjxva3efBZi8IxUvmCt6q7JevUcLiO +f/jP60025A/HqPUv0j8O9yF/OJZF2WnU7aP9y8LhUr91b+isIPL/fZ7vuvma +rwPIH478mRvHiw57kT8c0nY7i0ZMciZ/BKQGi4x05SxYS0VAqyFBMFC0hLVc +BF52lsZ1rlEjfwT03w0pvOSwhvwRyM8NTPi5xYT8EeCeCBeMljIlfwSqdP7Z +/H3TOvJHIFc2QLfgC82LIjDlvmryjyUgfwS6np4UP1C+iHVmBJROZz45YDuV +dX7E39/P3cnFg8TJH4FZWbt0hFNmkT8Cp9J4OnIaC8gfgdmpogeOM5TIHwHP +lqN3XUbTOScSfr/kTN87ziF/JMzl8swsrk8nfyTCXa6PzTQdx1o1Eqa/Zgj3 +uv3SYv5I1K5TNx39uLGY+SOxMWvRiUh1DvkjIVebxE1bMpz8kXB62D1sIGAE ++SMh6+nZv6yTzlMj8bQradfc92Lkj0R5paVf08QB9vz8SHwzL6wwe/yFdVkk +2pLU+nZ30/3VkVAx7JxXbZzL9muKxMfrtxvE9BpY90SiO/1c5eEtLaw5UQj7 +0aiZ8qOVtVQUdtiaXovv/sBaLgpnG8JVdwibWatGYUq1ZPmHKHoeorC5JvXw +xJVPWZtFod6/9/oB8ZusuVE4Pu9iXnWLAduPF4XojU9SOgousxZFoSvxldK6 +ibdYp0Zhrb/fZPXSO6wzo5DWbLI4QJo6Pwp5KpIWU5XLyR8F6e/dYps+lZA/ +ChFKg5e/ysln3RSFOhUts5hbx1j3RGFlQWRYv7k7a44AKoG2ItWcNPILsPjA +jpUFFcfIL0Bvxyf94Nws8gvQ8pKziOtODQFqY8Y+qnhHnzcTYNKKzev/9d9P +fgGublxWLjM6lTVPgNu+iQWjJopYiwRQPKvz5oqpJetUAbL5fZ8H1API//f5 +04e7Kj4TkF+AzFVfnyx5KCK/AOUxGWVdz6irBRhypUS1PUVIfgHu/B6joDMQ +Rn4BbAd/7vteT8/nRGNWVa/Sgzlc1lLRKJtRkHTUS4e1XDRcgg3ln3QZkD8a +Z/pbk0r1bMkfDe13sR92KjqSPxoXX5U0H7hOzY2GhsOVvOsu9uSPhtpZuS6f +Q1bkj8bvFUOddqaZkD8anzMspt+XBuvMaGQPbfxzYbc86/xomIsZqm12n0n+ +aJgOKXgrOUaD/NGw3LDtjvvIZeSPRkrpkeePRpGnJxpvNSNGhdkuJb8QZxIn +FuWsXUx+IQZGFE8QM1QivxBN4rlFXh9msFYVortfK7jfcghrCDHOWSNr1NR/ +lzC/EAuHDjzNXTiO/EK0unA7L6hJk1+IqK8djpvTppBfCLHyPZXGgZPJL8RT +z0jtgSHjyS/ENMQv6fojQX4himecq9cN/MPuKxMi3m1L+YvUVtbVQognK7Ye +z3x2hfmFGC9mOuKl+mfWPUJsmKKvdnL/N9acGMxtu7JKYm0/a6kY7PSdEJtw +ks7lYvCndlPS2uovrFVjIFowZ7xfSQdrxOBl4dpbOrVvWJvFQDzfRqHTqpI1 +NwadsS3a26NPsf14MchruWB6LP0+a1EMku/9avmlXcM6NQaeMTzH/gUvWGfG +4IlM+VfBDzrPj0HAmM1iDjnV5I/BvBEStqbhleSPwchXT89kyd1g3RSDyUaf +lw6+dJZ1Twxmd8z/89SaT/5YHNcJkPodeIr8sZib9WXpy/EXyR8L3Tf19pO0 +LpE/Fk5zNR6meheQPxYeX+P+tM/Ju/I/ggLXwg== + "]]}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}, {{ + Directive[ + PointSize[0.007333333333333334], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}, {}}}, {{}, {}}}, { + DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], ImageSize -> Large, + Method -> { + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange -> {{0, 500.}, {-9.830101724741988*^-17, + 7.514748073736528*^-17}}, PlotRangeClipping -> True, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{"2"}, "PointLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 7}, {20, 7}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + InsetBox[ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}, {DefaultBaseStyle -> {"Graphics", { + AbsolutePointSize[6]}, + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]]}}], + NCache[ + Scaled[{ + Rational[1, 2], + Rational[1, 2]}], + Scaled[{0.5, 0.5}]], Automatic, + Scaled[1]]}}}, AspectRatio -> Full, ImageSize -> {20, 7}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[-0.032857142857142835`] -> + Baseline)], #}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"PointLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"PointSize", "[", "0.007333333333333334`", "]"}], + ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + "}"}], ",", + RowBox[{"{", #, "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"{", + RowBox[{ + GraphicsBox[{ + EdgeForm[], + DiskBox[{0, 0}]}], ",", + RowBox[{"Offset", "[", "7", "]"}]}], "}"}], "}"}]}], ",", + RowBox[{"Joined", "\[Rule]", + RowBox[{"{", "True", "}"}]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{{3.800336507890066*^9, 3.800336548230723*^9}, + 3.8003366285958357`*^9, 3.800336857854382*^9}, + CellLabel->"Out[86]=",ExpressionUUID->"8c62cd7a-0ba8-4628-bbbb-a653fec768a2"] +}, Open ]] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Singularity structure", "Section", + CellChangeTimes->{{3.80010478295885*^9, 3.800104783979518*^9}, + 3.800105568715931*^9},ExpressionUUID->"d7144ed8-b75e-4584-98e3-\ +2404ccf2c65e"], + +Cell[CellGroupData[{ + +Cell["\<\ +Can we give a physical signification to all the singularities ?\ +\>", "Subsection", + CellChangeTimes->{{3.8001634725245132`*^9, + 3.800163498432653*^9}},ExpressionUUID->"99cd382b-a84a-4c98-a1ee-\ +a804808bdb4b"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsubsection", + CellChangeTimes->{{3.800158223312038*^9, + 3.800158224232153*^9}},ExpressionUUID->"f81b48d4-6ca9-4e93-880f-\ +1d0c41620c11"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HREN\[Lambda]", "/.", + RowBox[{"R", "\[Rule]", "2"}]}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], + "]"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}], "\[IndentingNewLine]"}], "Input", + CellChangeTimes->{ + 3.800075353492262*^9, {3.800075384742434*^9, 3.8000753928634853`*^9}, { + 3.800075477990193*^9, 3.800075488034968*^9}, {3.80007553412252*^9, + 3.80007557313133*^9}, 3.800075630282379*^9, {3.8000785359721327`*^9, + 3.800078550363659*^9}, {3.800079878860845*^9, 3.800079879068116*^9}, { + 3.800079913573428*^9, 3.800079932229224*^9}, 3.800080497085393*^9, { + 3.800080577175806*^9, 3.800080592742565*^9}, {3.8001120586218023`*^9, + 3.80011205888498*^9}, {3.80011214840434*^9, 3.800112172686603*^9}, + 3.800157110714922*^9, 3.800157352192288*^9, {3.800159556196183*^9, + 3.800159556698868*^9}, {3.800164918210774*^9, 3.800164920321939*^9}}, + CellLabel-> + "In[202]:=",ExpressionUUID->"56c7956a-d243-4c5a-869d-eeb02e265b74"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.2812500000000000000000000000000000000001380745116524112027`28.\ +795880017344075"}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", "6.1875`28.795880017344075"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.2812500000000000000000000000000000000001380745116524112027`28.\ +795880017344075"}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", "6.1875`28.795880017344075"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.2812499999999999999999999999999999999999077566895359840683`29.\ +397940008672037"}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "6.1875`29.397940008672037"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", + RowBox[{ + "-", "0.2812499999999999999999999999999999999999077566895359840683`29.\ +397940008672037"}]}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "6.1875`29.397940008672037"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "0.7899999999999999999999999999999999999999688616567097786021`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + RowBox[{ + "-", "1.7400000000000000000000000000000000000006835376524439376593`29.\ +397940008672037"}], " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{ + "\[Epsilon]", "\[Rule]", + "0.7899999999999999999999999999999999999999688616567097786021`29.\ +397940008672037"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{ + "1.7400000000000000000000000000000000000006835376524439376593`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", "0.75`26.255772306334006"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"\[Epsilon]", "\[Rule]", "0.75`26.255772306334006"}], ",", + RowBox[{"\[Lambda]", "\[Rule]", "0"}]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.800157111485978*^9, 3.800159557622061*^9, + 3.800164922098898*^9}, + CellLabel-> + "Out[204]=",ExpressionUUID->"d6b8c97a-ba7a-406c-b3c1-3d0c8463e707"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{-6.1875, + 0.}}, {{-6.1875, 0.}}, {{6.1875, 0.}}, {{6.1875, 0.}}, {{0., -1.74}}, {{ + 0., 1.74}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.8000799242414637`*^9, 3.800079932735375*^9}, + 3.800080497627037*^9, {3.800080578049032*^9, 3.800080593176303*^9}, + 3.8001120600105143`*^9, {3.800112149697216*^9, 3.800112173030253*^9}, + 3.800157112282282*^9, 3.8001595578133802`*^9, 3.800164922521927*^9}, + CellLabel-> + "During evaluation of \ +In[202]:=",ExpressionUUID->"64027337-cddd-47e5-bb13-318061d95be7"] +}, Open ]], + +Cell["\<\ +There are only 8 singularities, but we can\[CloseCurlyQuote]t give them a \ +physical signification for the moment. Let\[CloseCurlyQuote]s try to do this \ +for this simple case\ +\>", "Text", + CellChangeTimes->{{3.8001585199504757`*^9, 3.800158580192855*^9}, { + 3.800164966311759*^9, + 3.800164979872712*^9}},ExpressionUUID->"a4feeab0-8d6c-47ea-80b7-\ +f6f56248271a"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158278610743*^9, 3.800158290872142*^9}, + 3.800158341741818*^9, {3.800158433517392*^9, 3.8001584377174377`*^9}, { + 3.8001649945443163`*^9, 3.80016499866991*^9}}, + CellLabel-> + "In[207]:=",ExpressionUUID->"01047b6f-9a55-438e-91a4-8daad1515403"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"0.`", "\[VeryThinSpace]", "-", + RowBox[{"1.74`", " ", "\[ImaginaryI]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"0.`", "\[VeryThinSpace]", "+", + RowBox[{"1.74`", " ", "\[ImaginaryI]"}]}]}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.8001582338106213`*^9, 3.8001582919267*^9, + 3.8001583424528513`*^9, 3.800158439888423*^9, 3.800165000297373*^9}, + CellLabel-> + "Out[207]=",ExpressionUUID->"2e541eb4-5707-453f-8376-3d00dd22491f"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "e3e5831b-6afd-4462-a219-412b5462cd22"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "7a94a366-a945-4313-a3dc-ad19cee5063a"] +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, + 3.800158635398328*^9}},ExpressionUUID->"1a526bd8-e92b-4103-90e0-\ +8bff5aa01299"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8001584637379913`*^9, 3.800158464134795*^9}, { + 3.8001650170119867`*^9, 3.800165021248691*^9}}, + CellLabel-> + "In[208]:=",ExpressionUUID->"b4d6a8d7-ec2c-446a-aa6e-ae310f6d8126"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", "6.1875`"}]}], "}"}], "}"}]], "Output", + CellChangeTimes->{3.8001584644905357`*^9, 3.800165022454939*^9}, + CellLabel-> + "Out[208]=",ExpressionUUID->"14d635c8-d511-4f8f-ae7e-6c2d05775fee"] +}, Open ]], + +Cell[TextData[{ + "There is 1 CI between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "2a618ad5-8daf-4e79-8c8c-02a0569bd197"], + "and the ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "15be7f6b-d251-4b67-8751-dd47d5a28ef0"], + " triplet " +}], "Text", + CellChangeTimes->{{3.800158662872758*^9, 3.800158703136058*^9}, { + 3.800158955325688*^9, 3.8001589561925917`*^9}, {3.800159692397304*^9, + 3.800159701502852*^9}, 3.8001597753064337`*^9, {3.800165043826941*^9, + 3.800165047640038*^9}, {3.800165124910136*^9, + 3.800165126453781*^9}},ExpressionUUID->"f1b935df-0761-4fbc-a20b-\ +a88f4391b42a"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158369960648*^9, 3.800158370393867*^9}, { + 3.800158408929471*^9, 3.800158409337016*^9}, {3.800158446099082*^9, + 3.80015845077838*^9}, {3.800165053974371*^9, 3.800165057900592*^9}}, + CellLabel-> + "In[209]:=",ExpressionUUID->"ecf076fb-eee6-4aa0-9428-b9eefbc60f2e"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "6.1875`"}], "}"}], "}"}]], "Output", + CellChangeTimes->{3.800158371081614*^9, 3.800158409644907*^9, + 3.8001584513624277`*^9, 3.800165058662621*^9}, + CellLabel-> + "Out[209]=",ExpressionUUID->"9fd5b233-6547-48b1-8de9-66f3c84c6988"] +}, Open ]], + +Cell[TextData[{ + "The ", + Cell[BoxData[ + FormBox[ + SubscriptBox["sp", "z"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "f24a026c-bc43-4a59-a614-f27c1942a7e1"], + " singlet is never degenerate with the ground state" +}], "Text", + CellChangeTimes->{{3.80015883203883*^9, 3.800158852480497*^9}, { + 3.800158963935526*^9, 3.800158964785277*^9}, {3.8001597693529873`*^9, + 3.800159771491109*^9}},ExpressionUUID->"e2965313-bf9a-4d58-870d-\ +802893aeef01"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8001584637379913`*^9, 3.800158464134795*^9}, { + 3.8001650170119867`*^9, 3.800165021248691*^9}, {3.800165154197007*^9, + 3.8001651545160427`*^9}}, + CellLabel-> + "In[210]:=",ExpressionUUID->"b9e3a9ea-a8be-4740-b8ec-993e5e41a7bd"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.8001584644905357`*^9, 3.800165022454939*^9, + 3.800165155253106*^9}, + CellLabel-> + "Out[210]=",ExpressionUUID->"188bc341-2d9c-44b1-9cf8-f3d087c4e9b0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Solve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]], "Input", + CellLabel-> + "In[235]:=",ExpressionUUID->"8991f457-97ad-4bc5-8018-21c1d5a6e921"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"4", " ", "R"}]}], ")"}]}], + RowBox[{"4", " ", + SuperscriptBox["R", "2"]}]]}]}], "}"}], "}"}]], "Output", + CellChangeTimes->{3.800165371707858*^9}, + CellLabel-> + "Out[235]=",ExpressionUUID->"b73d09fe-d126-41f4-91a9-067a5d689713"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158369960648*^9, 3.800158370393867*^9}, { + 3.800158408929471*^9, 3.800158409337016*^9}, {3.800158446099082*^9, + 3.80015845077838*^9}, {3.800165053974371*^9, 3.800165057900592*^9}, { + 3.8001651584125853`*^9, 3.8001651627284737`*^9}}, + CellLabel-> + "In[211]:=",ExpressionUUID->"9d3c5b74-d114-4ef1-af76-aa0587aa6642"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800158371081614*^9, 3.800158409644907*^9, + 3.8001584513624277`*^9, 3.800165058662621*^9, 3.80016516351539*^9}, + CellLabel-> + "Out[211]=",ExpressionUUID->"3eb7a652-bb30-4c3e-ba15-68a29919b5ae"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]REN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158986206258*^9, 3.800158995955509*^9}, { + 3.800165213338801*^9, 3.8001652174732857`*^9}}, + CellLabel-> + "In[212]:=",ExpressionUUID->"2f059305-4b19-49a5-8ea0-9d942b559ba1"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "0.`"}], "}"}], "}"}]], "Output", + CellChangeTimes->{{3.800158989306931*^9, 3.8001589970199614`*^9}, + 3.800165218626136*^9}, + CellLabel-> + "Out[212]=",ExpressionUUID->"a74a908a-6404-4b89-a689-77d51af41ff3"] +}, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsubsection", + CellChangeTimes->{{3.800160005317541*^9, + 3.800160006948435*^9}},ExpressionUUID->"a2a91e79-cf2e-4d60-9f15-\ +3349f1c10a38"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "/.", + RowBox[{"R", "\[Rule]", "2"}]}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Sort", "[", "\[Lambda]EP", "]"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "4"}], ",", "4"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800157386799263*^9, 3.800157392222747*^9}, { + 3.800157471442925*^9, 3.800157480658167*^9}, {3.800159847972131*^9, + 3.800159857930311*^9}, {3.800159912370352*^9, 3.80015993354918*^9}, + 3.800160687275172*^9, {3.800160790277131*^9, 3.800160826481682*^9}, { + 3.8001626669660482`*^9, 3.800162679309074*^9}, {3.800165453485237*^9, + 3.800165455422124*^9}}, + CellLabel-> + "In[236]:=",ExpressionUUID->"335a7aa7-ff2b-4e95-a126-e6619f67c02a"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{ + "-", "2.53634028311375719209254805354981916951`28.795880017344075"}], ",", + + RowBox[{ + "-", "2.53634028311375719209254805354981916951`28.795880017344075"}], ",", + + RowBox[{ + RowBox[{ + "-", "1.3291977515622091955940951829232073886321744681037804421883`29.\ +397940008672037"}], "-", + RowBox[{ + "0.8533321755758888318051099186209447249304587458782203817481`29.\ +269698943435223", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + RowBox[{ + "-", "1.3291977515622091955940951829232073886321744681037804421883`29.\ +397940008672037"}], "+", + RowBox[{ + "0.8533321755758888318051099186209447249304587458782203817481`29.\ +269698943435223", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "-", "0.4618007402798848957828512725891591857929890152146157351851`29.\ +397940008672037"}], ",", + RowBox[{ + "-", "0.4618007402798848957828512725891591857929890152146157351851`29.\ +397940008672037"}], ",", + RowBox[{ + RowBox[{ + "-", "0.0383517963910580600283703735404185994473053180255845826881`29.\ +389061210396395"}], "-", + RowBox[{ + "0.2180850079349081959287852688286415818529345140102973307698`29.\ +69897000433602", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + RowBox[{ + "-", "0.0383517963910580600283703735404185994473053180255845826881`29.\ +389061210396395"}], "+", + RowBox[{ + "0.2180850079349081959287852688286415818529345140102973307698`29.\ +69897000433602", " ", "\[ImaginaryI]"}]}], ",", "0", ",", "0", ",", + RowBox[{ + "1.1038528949817135252977706839461968515351682332116808075616`29.\ +38474561709586", "-", + RowBox[{ + "0.3963459279469220150185823781280581431593647388255634133203`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + "1.1038528949817135252977706839461968515351682332116808075616`29.\ +38474561709586", "+", + RowBox[{ + "0.3963459279469220150185823781280581431593647388255634133203`29.\ +397940008672037", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output", + CellChangeTimes->{{3.8001608065981483`*^9, 3.800160827149747*^9}, { + 3.800162670475374*^9, 3.800162679855598*^9}, 3.80016545648258*^9}, + CellLabel-> + "Out[240]=",ExpressionUUID->"04014854-6bf2-47b6-bd77-8eae538c3e93"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 1.1038528949817135`, -0.396345927946922}}, {{1.1038528949817135`, + 0.396345927946922}}, {{-2.5363402831137574`, + 0.}}, {{-2.5363402831137574`, + 0.}}, {{-0.03835179639105806, -0.2180850079349082}}, \ +{{-0.03835179639105806, 0.2180850079349082}}, {{0., 0.}}, {{0., + 0.}}, {{-1.329197751562209, -0.8533321755758888}}, {{-1.329197751562209, + 0.8533321755758888}}, {{-0.4618007402798849, + 0.}}, {{-0.4618007402798849, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-4, 4}, {-4, 4}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.800157393308854*^9, {3.800157472990631*^9, 3.800157481345057*^9}, + 3.800159861088769*^9, {3.8001599139430513`*^9, 3.800159934501748*^9}, + 3.800160688193177*^9, {3.800160803367661*^9, 3.800160827460278*^9}, { + 3.800162670675768*^9, 3.8001626800603456`*^9}, 3.8001654566921787`*^9}, + CellLabel-> + "During evaluation of \ +In[236]:=",ExpressionUUID->"461698f0-d264-40e1-9390-5b8125edb3bd"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800158278610743*^9, 3.800158290872142*^9}, + 3.800158341741818*^9, {3.800158433517392*^9, 3.8001584377174377`*^9}, { + 3.800160208824222*^9, 3.8001602117761087`*^9}, {3.8001602500627193`*^9, + 3.800160250493102*^9}, {3.800160302859713*^9, 3.80016030318882*^9}, { + 3.8001654660686483`*^9, 3.800165470137615*^9}}, + CellLabel-> + "In[242]:=",ExpressionUUID->"8c22c7f5-d97d-4ca7-b08b-aedf5c6f2e05"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.8001582338106213`*^9, 3.8001582919267*^9, + 3.8001583424528513`*^9, 3.800158439888423*^9, 3.800160212646006*^9, + 3.800160252346768*^9, 3.800160304106626*^9, 3.800165470918271*^9}, + CellLabel-> + "Out[242]=",ExpressionUUID->"0afb0921-243d-4bda-9c56-aacc15c6180c"] +}, Open ]], + +Cell[TextData[{ + "There is a pair of complex conjugate branch point between ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["s", "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "f18b9396-fa36-49f8-8d9e-569cd1a8a026"], + "and ", + Cell[BoxData[ + FormBox[ + SuperscriptBox[ + SubscriptBox["p", "z"], "2"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "ee76a7c3-de7f-4577-b83f-728cf9c78a67"] +}], "Text", + CellChangeTimes->{{3.800158583613742*^9, + 3.800158635398328*^9}},ExpressionUUID->"53847370-0e8f-43b1-b8f9-\ +e9f320b5557d"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160349800825*^9, 3.800160355551343*^9}, { + 3.800165478414103*^9, 3.800165482667574*^9}}, + CellLabel-> + "In[243]:=",ExpressionUUID->"28276ba2-412e-4137-b3ab-4cf197031cf1"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800160355933103*^9, 3.80016548344136*^9}, + CellLabel-> + "Out[243]=",ExpressionUUID->"ba210443-fa98-4637-b3c8-4f6f8da67639"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "1", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160362984331*^9, 3.800160363411745*^9}, { + 3.8001654894343367`*^9, 3.8001654946493*^9}}, + CellLabel-> + "In[244]:=",ExpressionUUID->"334ddd4a-ba7f-4861-a414-4e5458f7eeb6"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", "2.536340283113757`"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", + RowBox[{"-", "0.46180074027988494`"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", "\[Rule]", "0.`"}], "}"}]}], "}"}]], "Output", + CellChangeTimes->{3.800160363880258*^9, 3.8001654953621597`*^9}, + CellLabel-> + "Out[244]=",ExpressionUUID->"5ca1f910-ed3d-498a-a58b-431916b5735a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160405795185*^9, 3.8001604064545193`*^9}, { + 3.8001655054187593`*^9, 3.8001655114658003`*^9}}, + CellLabel-> + "In[245]:=",ExpressionUUID->"e1590da7-9c25-4b5e-94cf-55ad6b6b246d"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "infsolns", + "\"Infinite solution set has dimension at least \ +\\!\\(\\*RowBox[{\\\"1\\\"}]\\). Returning intersection of solutions with \\!\ +\\(\\*RowBox[{\\\"-\\\", FractionBox[RowBox[{\\\"142291\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"110500\\\"]}]\\) == 1.\"", 2, 245, 10, + 22556906998464431640, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8001604074336033`*^9, 3.800165512170055*^9}, + CellLabel-> + "During evaluation of \ +In[245]:=",ExpressionUUID->"0971d34a-2dfc-4805-b321-a21a97370aa6"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800160407568763*^9, 3.800165512336027*^9}, + CellLabel-> + "Out[245]=",ExpressionUUID->"bc571d62-5b5a-4a36-bb47-06a2fb1c7cf2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "2", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160415162305*^9, 3.8001604193690567`*^9}, { + 3.800165517037389*^9, 3.800165522284693*^9}}, + CellLabel-> + "In[246]:=",ExpressionUUID->"2c552210-b526-436b-be2c-640ab5421247"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "infsolns", + "\"Infinite solution set has dimension at least \ +\\!\\(\\*RowBox[{\\\"1\\\"}]\\). Returning intersection of solutions with \\!\ +\\(\\*RowBox[{\\\"-\\\", FractionBox[RowBox[{\\\"142291\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"110500\\\"]}]\\) == 1.\"", 2, 246, 11, + 22556906998464431640, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8001604197705917`*^9, 3.800165522996707*^9}, + CellLabel-> + "During evaluation of \ +In[246]:=",ExpressionUUID->"98c730f5-574c-4031-a56c-7b10d55feda9"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{3.800160419931347*^9, 3.8001655231618633`*^9}, + CellLabel-> + "Out[246]=",ExpressionUUID->"a6aecd0f-40f1-4007-8843-3e2c6541da31"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"With", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"R", "=", "2"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "3", + "\[RightDoubleBracket]"}], "\[Equal]", + RowBox[{ + RowBox[{"\[Epsilon]UEN", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "\[LeftDoubleBracket]", "4", + "\[RightDoubleBracket]"}]}], ",", "\[Lambda]"}], "]"}]}], + "]"}]], "Input", + CellChangeTimes->{{3.800160439337159*^9, 3.800160442524119*^9}, { + 3.800165527149547*^9, 3.800165534654707*^9}}, + CellLabel-> + "In[248]:=",ExpressionUUID->"bac6391f-5c90-40bf-b31b-96513a511b89"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "infsolns", + "\"Infinite solution set has dimension at least \ +\\!\\(\\*RowBox[{\\\"1\\\"}]\\). Returning intersection of solutions with \\!\ +\\(\\*RowBox[{\\\"-\\\", FractionBox[RowBox[{\\\"142291\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"110500\\\"]}]\\) == 1.\"", 2, 248, 12, + 22556906998464431640, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.800165535378358*^9}, + CellLabel-> + "During evaluation of \ +In[248]:=",ExpressionUUID->"9ebe4adc-d996-4d7c-a94c-9e7721f377cf"], + +Cell[BoxData[ + RowBox[{"{", "}"}]], "Output", + CellChangeTimes->{ + 3.800160443296672*^9, {3.800165530473472*^9, 3.800165535589816*^9}}, + CellLabel-> + "Out[248]=",ExpressionUUID->"5f48d0fc-f833-44be-b084-34eb830dc39f"] +}, Open ]] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["R dependance", "Subsection", + CellChangeTimes->{{3.80033634818381*^9, + 3.8003363496428843`*^9}},ExpressionUUID->"3500dfdb-3b29-467e-aaf5-\ +c3676fcd873b"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsubsection", + CellChangeTimes->{{3.800354176597981*^9, + 3.800354176948998*^9}},ExpressionUUID->"73101e70-d86c-456b-b379-\ +a8ad4c1c9c2f"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HREN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "1"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800354198267839*^9, 3.800354200726965*^9}}, + CellLabel->"In[94]:=",ExpressionUUID->"c90c31b6-dc92-4440-8c74-2e256971a963"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{-21.75, + 0.}}, {{-21.75, 0.}}, {{21.75, 0.}}, {{21.75, 0.}}, {{0., -3.24}}, {{0., + 3.24}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.800354201220645*^9}, + CellLabel-> + "During evaluation of \ +In[94]:=",ExpressionUUID->"89ab21a7-1c1c-428c-a9f7-966aa488341b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HREN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800354209528364*^9, 3.800354210447617*^9}}, + CellLabel->"In[99]:=",ExpressionUUID->"18489723-5a5f-4c79-af88-2b55464378e9"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{-6.1875, + 0.}}, {{-6.1875, 0.}}, {{6.1875, 0.}}, {{6.1875, 0.}}, {{0., -1.74}}, {{ + 0., 1.74}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.8003542147736473`*^9}, + CellLabel-> + "During evaluation of \ +In[99]:=",ExpressionUUID->"16f245ff-f49f-4824-849c-000293008195"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HREN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "5"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.8003542192889967`*^9, 3.800354219668283*^9}}, + CellLabel-> + "In[104]:=",ExpressionUUID->"6beab092-00b7-47e5-8a3c-2d0a642e0727"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{1.35, 0.}}, {{ + 1.35, 0.}}, {{-1.35, 0.}}, {{-1.35, 0.}}, {{0., -0.84}}, {{0., + 0.84}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.8003542200418787`*^9}, + CellLabel-> + "During evaluation of \ +In[104]:=",ExpressionUUID->"b756acc6-6234-477f-99b3-e938f8a698ce"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsubsection", + CellChangeTimes->{{3.800354172388342*^9, + 3.800354172679351*^9}},ExpressionUUID->"363c9830-99d2-4619-9537-\ +99741119596b"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "1.8"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "5"}], ",", "5"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "5"}], ",", "5"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800354185375927*^9, 3.800354185972952*^9}, { + 3.8009538097190027`*^9, 3.8009538652994537`*^9}}, + CellLabel-> + "In[435]:=",ExpressionUUID->"25453783-8cf2-4af9-9b1e-f65c10f6b3f8"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.5387991385275491`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"2.615218075562611`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", \ +RowBox[{\\\"4.6216754224742775`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"3.545679012345679`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.05919287712987095`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\ +\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"0.15926491954835478`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"0.10148033026272539`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.004845900787897357`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.008795334167616839`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\ +\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.00026885241668859366`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"2.615218075562611`\\\"}], \\\"+\\\", RowBox[{\\\"9.243350844948555`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"10.637037037037036`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"4.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"0.15926491954835478`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.20296066052545078`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.008795334167616839`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 437, 222, + 22562004893941124449, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.800953810437016*^9, 3.800953865714594*^9}}, + CellLabel-> + "During evaluation of \ +In[435]:=",ExpressionUUID->"843cb4ce-0c40-4249-a1f1-7312f9c950bb"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 1.1660061204857697`, -0.48625503153729893`}}, {{1.1660061204857697`, + 0.48625503153729893`}}, {{-0.09409055243166958, -0.4074360169510847}}, \ +{{-0.09409055243166958, + 0.4074360169510847}}, {{-1.3128653254485876`, -1.2426885658908096`}}, \ +{{-1.3128653254485876`, 1.2426885658908096`}}, {{-5.114391901521238*^-13, + 0.}}, {{-5.114391901521238*^-13, + 0.}}, {{-1.1858493300915622`, -1.0401382122216216`}}, \ +{{-1.1858493300915622`, -1.0401382122216216`}}, {{-1.1858493300915622`, + 1.0401382122216216`}}, {{-1.1858493300915622`, + 1.0401382122216216`}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-5, 5}, {-5, 5}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{ + 3.8003541869639*^9, {3.8009538107451477`*^9, 3.800953866036664*^9}}, + CellLabel-> + "During evaluation of \ +In[435]:=",ExpressionUUID->"73da1e44-87ba-477d-b879-40016bb86635"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800336423651945*^9, 3.8003364248114967`*^9}}, + CellLabel->"In[61]:=",ExpressionUUID->"bfce9265-826f-414f-8fbd-e56e2b3ab796"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 1.1038528949817135`, -0.396345927946922}}, {{1.1038528949817135`, + 0.396345927946922}}, {{-2.5363402831137574`, + 0.}}, {{-2.5363402831137574`, + 0.}}, {{-0.03835179639105806, -0.2180850079349082}}, \ +{{-0.03835179639105806, 0.2180850079349082}}, {{0., 0.}}, {{0., + 0.}}, {{-1.329197751562209, -0.8533321755758888}}, {{-1.329197751562209, + 0.8533321755758888}}, {{-0.4618007402798849, + 0.}}, {{-0.4618007402798849, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.8003364252562647`*^9}, + CellLabel-> + "During evaluation of \ +In[61]:=",ExpressionUUID->"a61703d4-ad7b-4373-844c-c4ddbe2db387"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "5"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Abs", "[", "\[Lambda]EP", "]"}], "//", + "Sort"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800336433215836*^9, 3.800336434231812*^9}, { + 3.800353720212675*^9, 3.800353729891651*^9}}, + CellLabel->"In[83]:=",ExpressionUUID->"598c186e-8111-4bfb-9b4f-f392b819386c"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + "0", ",", "0", ",", + "0.0849214280099457528302524073706923152750272910734420976398`29.\ +397940008672037", ",", + "0.0849214280099457528302524073706923152750272910734420976398`29.\ +397940008672037", ",", + "0.6221185822618983358275572245085467595661799735908052052726`29.\ +69648799651301", ",", + "0.6221185822618983358275572245085467595661799735908052052726`29.\ +69648799651301", ",", + "1.008640373279809118526595755800531307034388511834954202057`29.\ +39044812541311", ",", + "1.008640373279809118526595755800531307034388511834954202057`29.\ +39044812541311", ",", + "1.0279584253479690985754893388497697258877171561056173823763`29.\ +389973385026487", ",", + "1.0279584253479690985754893388497697258877171561056173823763`29.\ +389973385026487", ",", + "53.20984412436121353266946024476013251753`28.795880017344075", ",", + "53.20984412436121353266946024476013251753`28.795880017344075"}], + "}"}]], "Output", + CellChangeTimes->{3.800353730724934*^9}, + CellLabel->"Out[87]=",ExpressionUUID->"2d7ee757-bc61-405e-946f-2caee431254a"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[ + 10]], {{{-53.20984412436121, 0.}}, {{-53.20984412436121, 0.}}, {{ + 1.006281413927322, -0.06894286471029856}}, {{1.006281413927322, + 0.06894286471029856}}, {{-1.0253873767014734`, -0.07265846093296364}}, \ +{{-1.0253873767014734`, 0.07265846093296364}}, {{ + 0.010595463860775556`, -0.6220283486635713}}, {{0.010595463860775556`, + 0.6220283486635713}}, {{0.08492142800994576, 0.}}, {{ + 0.08492142800994576, 0.}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.8003364346714697`*^9, 3.800353731074266*^9}, + CellLabel-> + "During evaluation of \ +In[83]:=",ExpressionUUID->"31945ad0-dc58-4036-8f12-5af4e6f68a1a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "8"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800336468405972*^9, 3.800336469191469*^9}}, + CellLabel->"In[76]:=",ExpressionUUID->"54327045-010b-4b65-a7d2-4b759cf46ced"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 56.01676976934701, 0.}}, {{56.01676976934701, 0.}}, {{ + 0.9830712410396364, -0.11235315703378738`}}, {{0.9830712410396364, + 0.11235315703378738`}}, {{-0.02115882962055272, -0.9940092594137607}}, \ +{{-0.02115882962055272, + 0.9940092594137607}}, {{-0.9667494885764667, -0.10694686858490804`}}, \ +{{-0.9667494885764667, 0.10694686858490804`}}, {{0., 0.}}, {{0., + 0.}}, {{-0.16970999984372148`, 0.}}, {{-0.16970999984372148`, + 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.800336469634529*^9}, + CellLabel-> + "During evaluation of \ +In[76]:=",ExpressionUUID->"620d824c-4b41-41a3-819a-262ec7d642c1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "10"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.8001056678563128`*^9, 3.800105691251951*^9}, { + 3.800105857724594*^9, 3.800105858146487*^9}, {3.800157369877255*^9, + 3.800157370678123*^9}, {3.80016562734538*^9, 3.800165627892129*^9}, { + 3.800336358000441*^9, 3.80033641561724*^9}}, + CellLabel->"In[56]:=",ExpressionUUID->"b8d545c6-81a7-4d3b-b47c-8fc881c530c8"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 36.02673310208241, 0.}}, {{36.02673310208241, + 0.}}, {{-0.04362165491327114, -1.1744813538364811`}}, \ +{{-0.04362165491327114, 1.1744813538364811`}}, {{ + 0.9560664465647548, -0.21827785355828083`}}, {{0.9560664465647548, + 0.21827785355828083`}}, {{-0.9349033773009706, -0.20277081458770213`}}, \ +{{-0.9349033773009706, 0.20277081458770213`}}, {{0., 0.}}, {{0., + 0.}}, {{-0.3516252155981427, 0.}}, {{-0.3516252155981427, 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{{3.80010567877378*^9, 3.80010569179675*^9}, + 3.800105859360517*^9, 3.800157373990309*^9, 3.800165628501564*^9, { + 3.800336407687612*^9, 3.800336416238803*^9}}, + CellLabel-> + "During evaluation of \ +In[56]:=",ExpressionUUID->"c1fc9231-8e0e-46c8-84ca-dbe411513be0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "20"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], ",", + RowBox[{"\[Epsilon]EP", "=", + RowBox[{"\[Epsilon]", "/.", "EP"}]}]}], "}"}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Print", "[", + RowBox[{"ListPlot", "[", + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Re", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}], ",", + RowBox[{"Im", "[", + RowBox[{ + "\[Lambda]EP", "\[LeftDoubleBracket]", "k", + "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "\[Lambda]EP", "]"}]}], "}"}]}], "]"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "}"}]}], ",", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", + RowBox[{"Green", ",", + RowBox[{"Opacity", "[", "0.5", "]"}], ",", + RowBox[{"Disk", "[", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], "]"}]}], "}"}]}], ",", + RowBox[{"PlotMarkers", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", "Medium"}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"GridLines", "\[Rule]", "Automatic"}], ",", + RowBox[{"BaseStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "18"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], + "}"}]}]}], "]"}], "]"}], ";"}]}], "Input", + CellChangeTimes->{{3.800336450019923*^9, 3.800336450405957*^9}}, + CellLabel->"In[71]:=",ExpressionUUID->"23a66bc0-8a2c-424c-816c-2703166f5df4"], + +Cell[BoxData[ + GraphicsBox[{{}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"], GeometricTransformationBox[InsetBox[ + FormBox[ + StyleBox[ + GraphicsBox[ + {EdgeForm[None], DiskBox[{0, 0}]}], + StripOnInput->False, + GraphicsBoxOptions->{DefaultBaseStyle->Directive[ + PointSize[0.012833333333333334`], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6], + Thickness[Large]]}], + TraditionalForm], {0., 0.}, Automatic, Offset[10]], {{{ + 22.13035022852543, 0.}}, {{22.13035022852543, + 0.}}, {{-0.1383806956429578, -1.7246000341922734`}}, \ +{{-0.1383806956429578, 1.7246000341922734`}}, {{-1.1422804027780795`, + 0.}}, {{-1.1422804027780795`, 0.}}, {{ + 0.7301924068592255, -0.5959876668908876}}, {{0.7301924068592255, + 0.5959876668908876}}, {{-0.7473990011385327, -0.5527658559981459}}, \ +{{-0.7473990011385327, 0.5527658559981459}}, {{0., 0.}}, {{0., 0.}}}]}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}, { + {RGBColor[0.9, 0.36, 0.054], PointSize[0.012833333333333334`], Thickness[ + Large], CapForm["Butt"]}, {}}}, {{}, {}}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + BaseStyle->Directive[ + Thickness[Large], 18], + DisplayFunction->Identity, + Epilog->{ + RGBColor[0, 1, 0], + Opacity[0.5], + DiskBox[{0, 0}]}, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox["\"Im[\[Lambda]]\"", TraditionalForm], None}, { + FormBox["\"Re[\[Lambda]]\"", TraditionalForm], None}}, + FrameStyle->Automatic, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{Automatic, Automatic}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + Identity[ + Part[#, 1]], + Identity[ + Part[#, 2]]}& )}}, + PlotRange->{{-2, 2}, {-2, 2}}, + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Automatic, Automatic}]], "Print", + CellChangeTimes->{3.800336450833742*^9}, + CellLabel-> + "During evaluation of \ +In[71]:=",ExpressionUUID->"8afa458b-6e51-430e-b48f-bb41132ea304"] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Riemann surfaces", "Subsubsection", + CellChangeTimes->{{3.800338173104447*^9, 3.8003381794532557`*^9}, { + 3.8003397372737637`*^9, + 3.8003397409852657`*^9}},ExpressionUUID->"72e295f6-49e6-4488-9f13-\ +f591f507b640"], + +Cell[CellGroupData[{ + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], "=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "2"}], "]"}], ",", "\[Epsilon]"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"NRJ", " ", "=", + RowBox[{"\[Epsilon]", "/.", " ", + RowBox[{"{", + RowBox[{"ToRules", "[", + RowBox[{"Roots", "[", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", "0"}], + ",", "\[Epsilon]"}], "]"}], "]"}], "}"}]}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{"Plot3D", "[", + RowBox[{ + RowBox[{"Evaluate", "@", + RowBox[{"Abs", "[", + RowBox[{"NRJ", "/.", + RowBox[{"\[Lambda]", "\[Rule]", " ", + RowBox[{"\[Lambda]x", "+", + RowBox[{"\[ImaginaryI]", " ", "\[Lambda]y"}]}]}]}], "]"}]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]x", ",", + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]y", ",", + RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", + RowBox[{"PlotLegends", "\[Rule]", "Automatic"}], ",", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}], + ",", + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", "16", "]"}]}], ",", + RowBox[{"BoxRatios", "\[Rule]", + RowBox[{"{", + RowBox[{"1", ",", " ", "1", ",", " ", "1"}], "}"}]}], ",", + RowBox[{"Exclusions", "\[Rule]", + RowBox[{"{", + RowBox[{"Automatic", ",", + RowBox[{"Offset", "\[Rule]", " ", "0.05"}]}], "}"}]}], ",", + RowBox[{"Mesh", "\[Rule]", "None"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"Opacity", "[", "0.7", "]"}]}]}], "]"}]}], "Input", + CellChangeTimes->{{3.800337857557605*^9, 3.800337883825984*^9}, { + 3.800337923599936*^9, 3.800337925887891*^9}}, + CellLabel-> + "In[117]:=",ExpressionUUID->"4b94524e-d2b4-433b-b4b4-67276a56ea98"], + +Cell[BoxData[ + TemplateBox[{ + Graphics3DBox[{ + GraphicsComplex3DBox[CompressedData[" +1:eJx0XXc81d//j4aSQhKlVAotZTZEr8yIiFSSpqRNi4qKVNIyoqmhIqtNixyk +UhEpIyPXnpe7bX439573+9f78739cx89Ha/3Oc/z2ue8r6lb3e1dxQcNGhSr +MGjQYP7n1PIVL/v7+xH+HDqr7JbyrC7YfujZjVd7uwk8/H3F0sX5HdB6//D2 +6ZYsAncJ3JzTsqQSXAfGNxO4TcUM5qSRlcLxVQTu2lF8FP7QhHg+gQfx3mXq +vqXBIOE/jH9/EB6x9BYxHjCenSfVMsUf41UEzh50xf6SOw3Ph8Bz2n706W/C +41kEvmnh+dAPK2kQN1LOd28pj8Dlszc4en3nYB4I/EiC8/T7P7n4/wT+o2zT +xy+/yd/H/P1KTXqw6UEnwSf+XO/80M3atAM/l8Ctzdd0xtbzCJ4xLimbnLBX +h+QZ44dnKMt3cwgeCDx3hlmt/AeSZ4yPNzGNt75N8ozx7ODST92+JM8Yr5iu +q/NpN8kzxsPTND8NciZ5xvjmk5pSOnw+FYIVuvYascBNiL+RWN+hvpdN8IzH +x89pXlrjSfKM8SuPUIXvSZJnjGuw9/z5eY7kGfP3R6wjK20eyTPGPW7acvd9 +bSd4xp+yq+4f+LmdB8zIgyWW61gEftLda1vbCC7BJ8YbMteMWxhB8olx5kOP +MaePkHxi/Ens0/UKm0k+Ma6yZuh6I1uST4yfL86efNmU5BPjbnOd5o8GUm8x +Xh43afMuFZJPjBveKTYz0iD5xHjbugMTTywk+cS4wW/TS9amJJ9Y79rF0ofO +yesg+MS4nRitKsWV5BPj49LkCo/0cAn9xPjkfbM54zTYBJ8YP8ZbWHf0E5Pg +E+O6m0IvRluSfGK873P0TbeFJJ8YP2pWsqN7DsknxisNvVh56iRvGN/an7Nn +WS3BI4FPPuuhWsxkE7xh3FHJY1N+H4fgDeNAv3LWVYrkDa/bqbgpfPUZkjeM +P85QTpRUIHljNRpEtI5qRncj/xzqj+YScvF49/NZfVKGHIJP/Jn9aGdoZh6L +4BPjfiOiKm+6kHxiPLWmFGXVtxG8YdyaZvRFTqmN4A3jHzZWvHK/zSD0EOPD +ncduyY9jEnxivOPgpB8XX5N8YrwpR3tVdCbJ55Pxjl88JPjyefSOqT9IPvH4 +jdfmfJlZyaXoYRXy2LNF6YUtVQ+rkL3N0Pd5f3gUPaxCRaqqN//sI/nEuPv7 +sFvt/WyKflahz9/a4utCSD6Nlun4VpVUoiLvCG7mVKp+ViFdrtW9eevbKHpY +hfxbNeZ4N7dS9LAKXV2dPNXOn+QT47+Tjzo/uMSk6GcV8lLcsSHpOlU/q1BU +vulpyyiqflah0N9Rp6xeUvWzCqm9VPf0zaDymY9Mo2d+PTqPymc+mvZE+f3M +91Q+85GKTPKhXisqn/nowOuQyf5lVD7zUbzWUosEd3I9GJ/X8PLW72FUPvOR ++NM7J/2Aymc+ut/Hhos9VD7zUU1k7LscbwaFt3zUsXhvlXsAlbd8lNCy/c3Q +K1Te8lFqys7IgntU3vKR9XNNLf1n/+ENRPAGIngDEbyBCN5ABG8ggjcQwRuI +4A1E8AYieAMRvIEI3uB/81YFIuwXRNgviLBfEGG/QLVfY4H9QuH/tl8QYb8g +wn5BhP2CCPsFEfYLIuwXRNgvUO0XP19EfAER8QXu/e/4AiLiC4iILyAivoCI ++AIi4guIiC8gIr6AiPgC1PjyWBBfQER8gf8dX1ggIs8BEXkOiMhzQESeAyLy +HBCR54CIPAdE5DkgIs8BEXkOiMhzQESeA9Q8B8sTkW+DiHwbROTbICLfBhH5 +NojIt0FEvg0i8m0QkW+DiHwbROTbICLfBhH5NlDzbfx7IupEEFEngog6EUTU +iSCiTgQRdSKIqBNBRJ0IIupEEFEnAq4TDUP+qROh63/XiSCiTgQRdSJQ60T8 +cxH9DRDR3wAR/Q0Q0d8AEf0NENHfABH9DRDR3wAR/Q0Q0d8AEf0NENHfABH9 +DcD9jSkD/2+DzBkn1Upf9SIjQ5XIODsaWK81ZVuEcgh8pdqmvsxJHOFz69Dw +tEqp0OmdyH6B3ubdX2gELvw9lDZjmOeZROz3Swn80jxXlZcexHj8HKT83VPv +iB6NmA/GNYfYpQzzIeUIf44Opys3nStlEHIwXnM8Lb9vIZM6HkSMBzyeMn8Q +MX8QMX8QMX/A86fwBpg3Cv8ggn/A/OP9wJ9vfLq2Ws3vJOwC4+FL5PfsrukE +vE8YVxsZWTS2rJ3gF/+el9ezrQecKgke8fhA1g0Vz4kkjsef1Bp8z2Z6JcED +Hv+xNcHy3UZSnzGuNaZoC3stuV4sp/7NV6vSteR6Mb7gpGTIUmsOnj8hZ3ye +WInTdC4xHq9v317NfO9vbGI8liOdkDWVvpJL8Ijl3JkzZnT6bNJ+MC6ZVHD+ +41Oy7sXyVd/0dCTWEvMn9Pma98a5FxQIuyDmc6hYJrfFitQT7O/3SVyvAiPS +rvH4kJCNlenmbPi57vj7SWPS0UwbVeUduznI1vRiYKQDHp9B7FuFjOGzGWYk +jufVHSd/7d4kzH8pMd6CtWv2JH3S/2D82e1z4d3zSf4xnrRz1aXcADaxX1j+ +coujM8abk3Uaxq3YZ7c1quJ6JANhfbfKS1I2UG4l5olx7SVlVw830Il5YnzB +jsGT0oeRcrD9mbpY1lk9pxNyMN72xZFztYDAEf6cdeKQgbo++VyMl7LpCvfN +W6njQcR4oI7H8xUxH8DzwfPD+9/LW+RXf4ZB4Ng+oqaqMKcm/Ic3EMEbYN4o ++w7UfcfjMZ+YXzx+geyM2MXmZF2A8Vlf557pCyb9IdbToRrXO18fZcHhwqKA +aL5+lsooPlV8y/dvKqetTdf+Rz/hX/2sIuYZ86Q4e+gLBlU/Aesn1j+Me8X9 +0un3JuydyBtzwKM9MYlLtUfA9kj0xYT4Ec817367sgm9Jea5LSndbivBG+Gf +b6d4L9Lj50vYPjH+PHfMq80OZD6M8U89BRX+D3lU/wnYf2Ke8fj7svW67s/J +uInHh0XGJRs20Kj+BLA/IeorIW77dMln+jIa1R8C9oeYd5wXiCU8YC7iy6HE +ERARR0BEHAEcRzCO/SjrhtYYb3Uy78Ljg4+5jXy1qJIad4AadzCO4wslXoCI +eAEi4gXgeEHx/4D9P/4/lqP7/fvuq2sInIh3lglTfn073kldL8LrxfqAf2/e +nhfbFDTbqTwgzANeL85bI6Ymz8sbU0nkdXg8b+S0LN49wi8Tea6jgdKQnyw2 +df4Izx/Lx/O6WXGHTXfgUPUHYf05dXBCvnt9GrZ3tOzaM8ebQKP4QxZSPup1 +SFyb9DMYP1FrcO/4TDKu4X1eZDN8XpMYqYd4/NgtXpojNrEofrUZTTro8GCZ +ZyshH+Mzl/qUtciT+RvG927V5NhOZ1LlgAg5gOX4CtfbJpyviPWCiPUCXi+F +Z/iX51ICf0yvO3fzHI267/DvvtcReIDxonPbSv6TJwDOEyj6CVg/KXoIWA8p +eRHgvIiS/wDOfyh+A2G/gesdvI6xm77Mv6DyHz+PsJ+njAc8npJfwb/5VQVk +DMyHjvzmF57a64Lj4wuELEZPCeXvt+I6ZlqhJo0Yt2CC5arpll0ATeXnO3oI +HMK/K9AsQntQ6OGCscZEXl1D/N6OKxOMHzUxhPw0EnKcpb5vuVZBA+HzMI5W +PVs0boRyJYH/dj32qb+/HU2KXV2zP4dDPBePH1EsW91hSYOaS+kpnO6vSO7x +Xa8WTSa6Pvzi3HCiL0SsC+F1Cfj5hvA8DWvbXHZuboMwaQUx20/PgKO1zRMZ +8OVot6V8nE3IIdZlf/a6jpr8f3DAeNph+QE5oVYDcuC7jkDOxCeb9FNL6VAi +WBecbx02Xc+Y4AGE64Uhidf9rjFZwDpVt2dvaR/Cn7dnZ4v1Pe3E4wg8/UWN ++7X4dpjUW5bwai8b4X0ZJT3RMNO8Essh5H3QGHI86BQPjyf49La9+Ng/gk3o +CZan2m9//pomqT/Yz7hsUXbcMYMGCY1iD9GP54hmceVQlHwjajdY9sYugA6l +Wr1zGIEv0ZzvMmFHehogt58bNPcaneDR+3n8otJXXKArxmyXKmdDcv9hs+G3 +6YRdt2+//WJuJ5vKA4jgAag8YHz185Cub8v/wwNgHrB/wPa9pruOsyaRRs1n +EM5nxKLHu6Mb+YQdP3R4MCJkPKFXxH4e0zt1Jlj1P3UK4DoFj8PziWFdPe5t +9x8cYRzvF95fhZlB38d9YhP2hfmw3KavtDaHRs3TEM7ThONByD9KW7555Dd9 +8rkYl728+2PZ9//UI4DrEcF6CrEdAZv27eMKNwb2AwjPt8Q8O3qqIYvKM2Ce +sRw8fkcz+9ZJZ0LfCD1Z44gSRp79T50F/9ZZNZgH8HnsfSj/BY0a3wHHdwqf +gPkk8g8h/yWfxOHFsC6qXiGsV5hfjE+aOOTcmnWEHyPkTb55xMmSX2/i9eDx +Kyx2Xas/TOYhGB+09/DnUF0O1Q8jih8m6ujgCbPYQVzSP2N94BRlZVv8188g +7Gcoeov+1dtCAu/r3+yQO/U//hOw//TsuH8/mFcIG7QXhFvG0kG2oeZh1ts2 +qhzAcijxCHA8ovh/wP6fEi8AxwtKXAAcFyj+ELA/pOwX4P3CvOD96soNk9iX +307YJ8ZvhOsZzLj+H/8J2H/i/cPx/yd39cfyn2R+gOVFw66h2zN51PFIxHiE +x1P8J8L+s8viivPOEMJ/Itf3LAePdjaR52D9MVu3r8rJia/nPa6SfTteoG1C +P2FlLeP7IxXXv/mEve7Mt3oQ39NK6An2N+P3LYnh+lLr/Sq0YllDxb0SOiXf +q0Kb1e7JXSD6CS8I+05wnV730JgOIY/sfk5yf4l4peMc/V5VILXytuijw6j9 +h3yItVTY/yeFKj8fLG3FdeQ7SflY77LlYkYtWEHgCOPGAcV6ir9aqPMHEfMH +PP/9UvEzxT+9AJ8h8fE1kTUw1sn5WpMDKR/nQSOnJNF26f+HTxDBJ2A+KfEX +RMRfwPGX4q8A+yvsF7DfO6D/QDImvJ3Qc2wXepcjjB9uIetujPsZqX/WH9lO +tQvAdoHti+i3j5I8HmH9H78H2O9R6i/A9RfFHwL2hxjHcoJff1B0uMSh2iNg +e6T0GRDuM1D6Awj3ByjxAuF4geeP+eDGa99NqSDjF87DcZ+H0s9BuJ9DiWvo +37hG9P0A9/0ocRlwXKb0SZCIPgnCfRLsF7C9+0/YD3P38ah1E/q3biLiLMJx +Fusxnj/bm/N44jyST8wD7mthOdhPXxxuZ3pj5X9wwDhFPmD5lHoWcD1LWRfg +dVH0EGE9xONxnVUX1VDdEsyj6hXCeoXjL+bneEQ0O/sRmSdgPblSc3LmA082 +1d4RtndKHAccxyn2iETYIxJhjwjbI/YnOI6tsjjbUbKEjNeYDw9Lde5vHRLH ++tk8gqUvQdQ1hF9FIvwqovhV7D/Rv/6T8LcI+9sr//pzUP/HnxP+H7D///f8 +ug7GDY7/8OBqG5FvYPtIXJA4+qA4ieP+w3ebpZMU5rVR+QER/ADmB+sr1otV +1656si+R+Qb2W5flIzXaEjjUeAo4nv72SVBvffQM0Wb1jdg5tBRmvclrGJHb +QuGtDjalLZ50cgupJ/gTnwtQ+jyA+zyU/Bxwfk7RWxCht4D1Fusb9sNuXxJL +es60U/N2hPN2jGM+iiTPnKsbQvah8KeIfjLC/WRKPxZR+rGEXeD+DKVvgHDf +AK+L6LNFXNOaGMimngsgEecCCJ8LUPpdgPtdlD4G4D4G5TwORJzHAT6Po/RJ +APdJKPqGsL5R9B+J0H+E9R/bEV5fl/iK/YtMyHMfzNObnVN6xLTJvB2v7xXn +JW/DGzJ/wzitQq0jnm/vWN+wHG/aKt8xz0h9wPuiWXTYefQnso7D+SmuBzGO +579Ie9Qng8UMQg+xnB/R57flTWwn+mKYz/3nc5cWnOsg8lfM5+oxtHQx6Q5C +DzDua+F22OBNO8EL1rclWe321e/J8wii//Yy+XrBEzIO4udoTNlxXPkZGY/w +/l+SnGKnO4VF4MT9K+bRtrlaLGLf8eeS71/cW9vJugs/9wGv6uyVJe0U/SxF +VwJHrhu/jkHoA8ZdrK6oyiwm9QHP9/6yXL/lZ1upckCEHKDKwX5R6uXXj+e8 +Wgl/gtdncfvHCJY9m8Cxf7qqUHAgYDfpZ/Dn177Wn+rzyfNivD+z+v0fLC0g +/RTG9cL+RNisJPM9zFOA27DtqJuwa2J9c4Nf6vpxqPfoStHpef6toU1kXo31 +7myath5jN9mvxvNKYeao/llDPdfjgXTalF3z+PUj1gMcx6NsbdQ5a0g9xPoZ +4V16foN2BzF//HNryW3iTVM4xHzwfrW2qZhO2ETm+fj3Mlviol8Cke8RdvBn +15Ehk7o5hB/H8uUqHXI9ooh+OJGX3W7ZObOii6y78XPH3vc20PEg7xni58xW +VT/7ayVZX+Dn2DSAq9MKsi99VEYdqm7Tocpo4fXicf/JkwHnyVg/sBzp5qpf +SrqE/hB5o/3WaJOYCdR4UYc6Iy5rq+VT87E6tOHZ6jWP57ApdleKpGc1DrYZ +QcZBjGtXStiZjiXjAvZzn2ymSESuYVB4y0AHXk0fai5G+nmMV6hrx1Z1MSh5 +aQYqLNqhKdfPpNhFBjq+LzLu4nBS/zE+JjHCSVWevHeC8Y7gew1fphHnaMS5 ++YklVU869pLngBh3mG7JKO8meSPOq9f6NlldIOyWwH/Y11+wmcQmeMR4x+DV +oUsTmVR+QAQ/gPnZcHzUg29ddeAi/PnsHYorDgxhUvcF8L7g+eOfL7G8z3p1 +hkfVB8D6QOlnAu5n4vwV+4ex02HpGFVyPH7Ob8TI6S+kUfUQYT3E/hDHqfl6 +k499HknGKczfqK9p8cm+RD+TWN9ZPRnfIC6pDzjuvBPbOPWYDY2aNyKcN2Je +8M/HfS9IC5xCxmWcn/ybx2YQcXNoR/ng8mXkvQWMR8zus+zj0anjAY+n5P+A +83/KfADPB68L+6W3mTcmSV7k11+qa1UPKjEJvY5dVxPgJI75vC/cl3rI7r5y +WXo8nbAjLP/U+QbdUWZkPoHtIKon23BJGZuKI4xT5CAsh1LfAa7vcF6E/aH/ +nY2h75fRqThg/F87YqGsS/p2phZcQm+x3fguf+0RvJS8h4/xxJ1R4RDIJXiY +P+Cfm9B0K9Q1yYJO5AdEfnrQV+/zafL+9m3LxEirRaVIqs7ugMNlst+O9/NB +v6SErwv1Hn4GKg902mU2nvTnGI/x3PNotg/1Hn4GOlNoNEPJh3oPPwMterJy +/Cp/6v3nDDQ1tlD3/GXq/ecMlP/l7gejCOr95wz029lp9ON4LuV+eAas7rmT +mplIfW8uAyy6Lx/e/f/O9wm9ztD1WWtCfa8hAxxvlYpV/qS+15ABo7q3XG5y +o74PkgHH7sTvXTqYep88AzCfLW7ZNWcjnxN9RaPXCcOVv7VQeQbMM2UfAe8j +Je4AjjsU/QGsP5R4B5R4h/UQsB7qFn+W7/RpRlkTP/it4vvDDo5cQksZ2d8m ++h/aatNSJIj79uS5kzRz2fybTMLP4Hr0ga258eq6VopdvEA0ZBkzeVordTyI +GA+U8QTun+hnuCi1lTpPwPOk1MUI18UUf4KwPzHfv/Kr2/NfaHa4wjK/8wxk +6cczerqVATdol/SjFBogHSWmXYhlwtNnO1ws3ZmEHKE9ArbHddLDOWJ72Gjl +yfgCuMJBidGV6vYqJG84b8/yH33tReJ/7BRGCe2U4gcA+wFKvYBwvUDZF0TZ +F4IPzBueB/afbrleE/6MJvtgOD6+m++3J3sOqVcYL5H2Dkn7RfBM6CeuE4k+ +pjCffLzqlqHcqEpY+/lkpfRFBvIw8rAa+74TydFnK9uMqYShLapPHj5OI/oA +s2fm26brkHUujguXDejec81p1PkjEfNHIuaP/vf8vyG/25t7VzygU57bCFbD +0tom1DIJnjG+ucU8sT+SCVgP8OepqOSQ56epeUszotZxOM5i+RjHv3fqq3lU +pTgLwgbygBaIuVXSYxHKgOOBt9ZPrWcCc6B+4Of7e+U1S191wjmtlWrqy0h+ +sJ8bY/L6Y40SCw6n7vr++0kL1B1XzA6NYaJ9mtNjrXnEvUHi9wrcdevHzmVS +7DEf+UtaHJmzk7Aj4Txz0db4SzMm69KJ9eN4PQPtO3XAh4jrRD+HXvBZu6aS +jHcY9228av1hLtlnxp9NuqfzRjK5lDy5Cmp2apv3jyH5xPnUHCOpQNNCkk+8 +vqdyVwfrlDNh+rovtqnOiOjrPonKCFWMocEizwCHk9vThOdW3aheTyngySUa +fB7k9HBRVxqRd5lkuo3Yt5tGxCPmbtmXa93pKDHuQaLtjHbhPPtRyBSTDzIF +DJS9YWnJ5jcdsHOimcpeww5hXtGMZC69M9NQ5IGKMN713RwSef42A5nXKYTd +6OHCmMua106+xu9ZNCP9JVufB1VzoND3qvKMJa+Ic7GQk5LnVxjTIUEYZw9c +Tx7hf7IGxfu52NMS2JB6vn9+7Eby/R6pCCirW8GGgn/lAJZDGQ94PJ4/toNR +wvnj+C7vX/z3uVBeI3guhR8QwQ9gfoQ49Ap4AFMhD5+E/McKn2Ms5F9fuF84 +j8D7NU24v5OF8h4L91fiz+p9NPk0pK7p/eiARy9KHdm49tUNGpzX3QOf09KQ +YeigHWfZHehJg7LDVB8afH2cd15zbi+aW8/wjmttRWJ0sX0Kae1QfnjfprEm +fUA3dje6VN+Klu/+WjLxAj+vyz5acn8hD7RUYp6/vVyNKlc/80v2Z8MtnkXp +ivIO8LtjWs3dWY/Sly2/5KHBAfXcpZabhrej7XQHiZ9yzdB7YnG2YRIXio6a +Bg1r7EU8/Q+VMbfa4EV1xPFysQ7IcXt9LO1lGtoVsO78krWdcOH6ni+TjtPg +bigjTKkPoY6ffZ2TBvXBo+2HC1QjaKAcsXt8eUUyqh7kz3vHrEc/7HMfmP+m +Q9COSV19kW9Rv+1bs23Ha+HyqqO97HA6tKwqK88ySUMeiu+Wxy9lwMPemNUm +s/h8KskmyFa/R9LzwpNyrzWh2cv3/FKY2kqVD/lC+eabZQbGv1AYGA9lSwXj +u4fv/bBhXyqhP9eC1AOXLmyFrn9xFC7Ep8y8LlbISEDgfvz3rdwi0Lo/7SQ9 +pgWGfVIy9W5/jZpCgxROlFVDXXLxZK09dAj+d13oonBdlPGoQTh+nFC+iUA+ +0hTK36lqN/9+yzsi/m7wVrKJfceP7yOHbr6Q9IboZ9Yv9pe8eZwOcle+azjc +ZoPZmYCngUYVaGhVXeZ5GgvuZ7mV1rzsQnXfjMY5VbaAoqyCVk0DD4KD957K +K0wh6i8901Zgd9CpOGD89oaGgrCyVLT3R7Di3uktaGdAO/KwbiXwfQIc3IT4 +DKPmovcTnhDnKSalmjvfJ7RQ5wl4nnG5DtEBsTy0pUenrmlEM9jJ11abXeNS +eUCYh4S7dWJWOekgtC+UprDC81QQX09iu48NNUklv1fEUmqj3hEanKEXjJp+ +9g3h78f7jzY54ESD6DzHrUeWVBJ+7FjBL88LHQzCD2joTXFZWF2D0pZ6L9D/ +xvdHy6O2fKD3En5MR87T/e4ysi7QHv7Dz3pLKTpSsGhbXQ6P8DM77UOyEg1p +SFvhgM9xC7IuuJbTs3HHm2J0dpd3iIkjWRfYyGrCCOffiHv48jr9Jjbhf9UV +fvU7G5cjevagN/NPk+8bc0Pk7COky9GrlnnTFvsyCH/4tWc4S2cLP6/M0589 +KZwNgR9psXYvuEQ8bb/2On6cLVkHyd47JuHv+QetOtr+dcpjsh/Ku0FzrV6W +g5DDFJXsMyww36OzVUOsAWaWz9d9+jIfPmStFTdXJvPJhpiB8ZAyZuKsdWdZ +1OcC99/nYt4A8yaMR2iHgDfQovB2VcAbBPxv3oAj5A3f/5gl4A0YFN44At4A +8xbF65en1f0mfn7I622NZHYbwWd/xwCfMFPIJ4U3wLwxhHrSJpSD9QTzntTV +bN5cWwtDPR/lzDpP1r+3xvct8ZerhcOuV+07ua2EHs4V6CFgPTz6rz6DglCf +p/6r/xAr1P9Eob1gedheDmStnDomIg3kMqe5H2/hxyPLMI9nZ2jgYV77YtLE +FOiffCqVE9+J+vcWWVXspcFgGGcXblCEOhkfS8syatAXNTPTdyoMCFm1+73p +3H4Y3nVBx7ykGkWkun1fwrffH/6eL9mn+tAt2qUcxTt/0CXTydsis9shZsI4 +5Qv3O1DZH78/N11/oyHxehuiGrgQofHVdHAdG0XmfK64m1KMDMc46nnu4oDp +D/ub6dlt6KnzOzd9iVIUPaVm3+h5bHCZmJJ17UED+h0uPntk3x809p7SwY3j +WeB+Rs96ty8PSpOb9TSSfqKu9LlfbU6yYVfeyuZ1fp1QpM2ZfK3rN9K+kt0y +aAEHkve2dQZt6QHzZ+1R+7fQ0Fnr9L399RwwP9dWZW/Wixx5rY+KdMrhXaiX +oc/2dhgR0GZx80wn2uJ4NDa88TfIntiQl6zFg28rTBcnL+eiPTefHaVfKIbj +XyxoNiUcWHZYNiRcnYEurhuWsim3BLabGr9xMWbz9z9luZc0jficK3an87MJ +A0zuuq7pamiHNUyE1p4shPStFYd2F7DhpsyhGfbx7yDR+uZ9lbMdoG79pmLd +NhqMZ6UZ+TmmQWxoQ/qnI72g+GX8QqYfDTJPros0iX4FTw72mo3Yz0WpnkvX +7rSlwUj9U83BUolw+ZPGYXogG+2cvzvMFWigyTlml+jxEXVt+nXMLqoerV9T +EdO5pxVWrrtvnF77EYwWKb8Oy6hHF2Xi/7yc3gpH057NS/ItgEQtuW8tNdXo +pk/3lHN2bSD+r55AllBPKPIBy6fIgVtCOfcWCeYZIJgn4Hme6K6+93ddrG9D +zPnrAoscwbp+fLUseGfxgvAHsi1DJujp/QcHjG87s+d2YsNjol58Yzbx4rkp +/8EB449srI56OcaD7oy3i48sb0XTT582CFD8Dw7ThPjlMCupI+9ewYg3LhMl +4hrR+hNGh5VCyXtTlUM5f+0dhYDA3hd/+OZzoOQrxArjnWV25CTazlYw+SjA +cT6wS4hnL4oc2JfNzEl/9wW+98YN7EvSAS+782bZRP4Qf1I57ivxvRb5KE7g +fxD2P5/+HY+eCMdn7Wl0Nu3MQ9cZ1t7HderAIOjH1+I1bdAl1FfhJ3rdcfLG +dX6+tm2CzJD/5z+R+0nDT5dyyL751yZb49PJlShr786G8V1tIHVdZ+b6LyWQ +qbvgCY9XiTa+eujtWt8GhvK0kclH4oj66U3n9Vlp8jSI7c+5vceZCcmznwSc +n5ODqkLL4sxWskB5sviBJgU2OG4L8FCc+B2VXEZF0kksmP+tp/RJUC34sv3t +FhUWw60xNI95peR7c/oFXS724g3IcsfLP/N1yP7zOknPs/a7GtCEGDnxjSw6 +SGR/HVJ1OoWol5tdnl0b/Y7sSy8WyIHl/1sOYDkLJ/6zLpQkXBdlnuimcJ7Y +j5UJ/Bh0C/3YObvm6zp+Iag6aOk88ZJGuOrmUbV/NB3OJH1UHGabgi6/lF34 +27sBDF92hp6rp8NpIR4kwJG+EP8x75p9z+J+2D7dZ//F5mrkfGh6b9RNLvh3 +73afk14HFhEZ3GHav+D6h0VrHLsZ8PpIoL1MZip6OkJHL3VtA0R5tmRI9tHB +clPzvvJkfv6/bmrfKcsGtOZO0IWGYa2wQ5Z1v/8Zi4jny0sVV56xJc87ZBJ7 +vDTTu1Drg8bFK7QqiXh99avYish5PHQqYdVk8VA2/BljepqznY2+uw3VTL7Z +jOJ839ocukbeK7AorzU70MxElR/aw078v/cH7fXSF6T2MNFSleT1L1RpcPhy +SWOXdySR71mL07vvvWghvwdgwUOvIcfjUPUKu9w1L8j+AL1MUUnLJw6NrCmk +Fy0l8w29HRsdurzjUMfKAz7bf5D5BveMv8Yu/vifju4S6a5k3/uF+rBAu6hY +OAfhjoc820AiumH2ZosqiM2L2xqy4wWsynSzd/NhwIm++sqCyY2wvrA+4kJW +PiwJyZ60z5AJ6/6dPywXzh/zky3gB+KF/EgU6bFhDQsdOX2t1WJ7G0RL9O/8 +4cIB6/xIxcm6bKIfm+hoOPRyGQfy5BIaWtBPApcM3Gu83or8XoJzR99vP3yv +BfZIxRT2Tyf6IGj/dv3EemDDq98H6WsrmCAumcOa/4GJQu0nL5oZy0RxzEyL +uxs4YHLQIH5Ydh4YSK3wMpvTgqrzXl0L47TC2e7OoPbuOtgftE0je14pMqW1 +y+8dwoTcsIe6/kFM2FH6ViN2XgFasOmF2JRNLGgysF2nc4AOKqa8ntppzyC7 +pPpNaSITDt183J9xrx06i+3YT+NiYAit89qFd2xQLJUab6TTA1KFF5ttn8cA +Gm/oeCeLAwmHnc30Pj1A4aWTx6RLVcLaqXVxlo9boKTq1Y4pxi1o/6+g6wv3 +82AP84LmordsGDI+cNvQjTXo7soRYr15XIja+OXT5ls0eBIkIff6LQtFBSjT +p/V2gZZfklbqwkowsZr2OMqhHR1gvzv4/UA/OFkm70q41A6sH7t73sRx0Faz +d4NVpDrRH0vdjx87uZCsIqPWk12PflYZm8uM5CINic9F4nUs6K4rT87i0mGR +80UvjUv8fTvdYIu0WeB1OupHw+4idCEu1urgICaa/CPWs+UBAySP665Tb6uB +Cr1xdBUeAyH9F/vXSzJh99z8VUap5ehrQ7KpWh8btL9Nfzp1Hw1SDJfsau5q +AOPUuX2Bp9jgsH3k74J5NLBjwcBzq7cY/n0unDqYP/DcQbLp+w6ObQPn9+fl +pYdz4cqe9exdbizI0FrV1pHDQSduMoYbb+6EBevvRJaO4oHn5cKk150MqDhn +u3za+x4YbCBncNWaBl4Huo/sWsNBN0Zl3XvL6kVj5szJtV9dCZveiEnNim9D +u/IDaD02nej8RqXGEUMrgXFqGzsznomKJ0HJiW4W+v5r9ubYgxw4/4QnW7O3 +FVJmzDc4vb4DMYeZ+iiY0KCkjpeXBGT/78GoQUOuSPL11Dh86M6fScjv4ZTl +YTFf0FUV/VOqe+nwmiWfP+77SyT8BCXdIbojJ7eC3zi9UJvXt+Csnf3xp5fy +YMYQG42r4+iEnxk0iLuyeiUDNpYhf6MkBtWPAfZj4JkYOi+BQ7y/9vFZhWZn +D1dYx7bB3MN2SyMedcHIZRrPey1o4GDXP8DPdxX9hJ5jvdCxdc2gLIdKmDi9 +w/jICg5xT0Px3MTF4Xx8nN9ar4JjXIT7eW9N9z0/4VoJta69MtZTOUSfz0/R +S3KaDgfkcrv/vxx04q1ADs6HAtV2q2hebUcZ+tt9i3ZyICXAO+xodSvBp2+D +iZsD+X0CyNxH/XfxCDoK3XHt7vsbrfD92OPF1tNL+XXgtDPa11vRzWlVzdsm +k/cQ5JQjjK/xGpDfJnH10UpMGDQ39bVZaKyQv1L0eIF0fL88HdzKVGV8Pl4h +8pnTqq9DWouI++3AKfOLct7bBAePyER5DWqFX8LnBgueC7eEz4VjGh0/RmSg +dB37qek7GDDxt/zWC3PIc2GDZLuAsSo8sN06UnlmKHEPCiU16kkHunfC/Bku +ESuGV8LY8VyPQm+e8Jy9F5ofTZw3Zmw7jCpqv6ZfTr6vecooaD83gAG3nfWv +Vku0oRHCfX+9zemxXj8NFvZIujGMymH+jXvZVfJtiCWfGTXLiAGLKg2/5GQy +kV1frPviex1I0Wa4+UtpLuy22ZDtb5+DBtW4fJq9hYkKekeg5MU0KB52Y3Xq +qhhQmjpvN5vPv/bcIysjxtCgXM1dSen7KzDrqLA1UKOj+c+W0tmyNFitJ8AP +8QZwkBPiQb1/fDf5MyB+gpV6zsZ2uDtTL7otgwUp/k6OtjbtSFw774nbkX6U +U/UrLexiO6R3ZzHuM9ko9o7v5uPKPejAn1Xm21ZUEvdtcss+lLVfZCKTKJn5 +tSrkfUidt0dy3vnxkKxl3+34ZzSY+HYmXX1YFoQV3fuRGtyKvBz8P32SJ98v +My7c5bVjBxO8Aiy8xS349nz7UuAMW/KcXZ+bOcSNXx/VZl4cwO9MFOhzwwcB +LjlTbpRpLROUZHWvL9XvQ5Jv9u8sX8HX2yMzZr1nsyDTPnursVQvKv7SMajk +JRsCJkyVamI1optvSj79vN6OmGue1tZ+p4FSUpXx7tAmoL9ceXirIhedUNxu +/m4BOU87wTzRMeE8N+Uan72ly4DSWV4/f0TzkITeed/mKBbEJ723GIl+EPdD +bn8qLdNSYkB3WbdK359qZKwvJu/8mV+v8g4tnj2bBaOWm9XmX64n7uuyFvU5 ++L2hwdb3R3qW2RSjp8EfRg2SZUPVusBINycanDmwYVTT9Up0wj1v8vYmDqi2 +mhcX+tNA7M70SUGHWuCWw4+fH1148FtqzsZKAxoon9S/XxBA3je40B/jPMif +B0kPDhm+4vPTq+5raynVCzc+v+4s5vOz5LKFi9ckLvFemOxPFGC5uRK23zpU +dqSMfE+oOWf1nkFSHHgu8Wuwxhc6CjJ6s+5VSgfSfbfr8Hw2Dcq+ZauqDWkF +67Cf5k6/25FVq1zvLSMazBp+MtfuNwM8okcoLLXqQNzFcyZDLQseL7A+81c/ +vzi8mc3XT9R52OfRX/0sN4p9rjunECpMlqMlm+gIqiIm37nbBo3rBfbytHbA +XqBOaC9NwvFVgvFgJBxPownsrqt3wO6Au0Jgd8Wrdh38as5EytL0/ma1Lpi/ +ddtYn8mV8Dnqg/1KLhvZ0XLGmij1wKq62V1hfP23vv8PPzD2l4AfD+ncRff8 +2pF9mSAfNk8fbPLhcTuk2m5hrTvdQvRzhlo3mcUS97p5aMy7J6FOcX2Iu94h ++b1tO/Q1W21SKuDnRxJNtsc2d6Hd7pPDko3YMG7z7lIvmY8wcejBlMrkJjTz +pGR58pxW+HjpjPVK1wSYqGb0YHPXH3T1hBrTfSodnIX5zw1B/oNWC/MftQeS +7Zv1HyGtydvUX2v9QUErol/aPmoBD0ktm1XN0XDPZE3k/CvFMHz6tsZl/Lrj +S27SzL7lV9HsDR8vy8+sA5m403l+P1rA5JP/wHwuN+/5Ox9QQyMH5kPxD4D9 +g/QpJ5VeaR66Krx3dPBVtqJRLg96SwV6Lhk4oOfouVDPKfYI2B4pcRbhOMur +qfnztz+TWif9xCSpCz1ZOZuT7MSDQKG9nBTYC5ojtJcVN2RCjn+ohVizsNuv +vrLQR5dZNlNn0+BH0YHxDcVlSFbyzDDHVibaf3+XwXA1JhUHjF/QGTUgR23c +1b9yIHmfQM6od5cWOA4mzklhwpPNjsslWLD1zaLw3VZcZCOX3H4lsQtWLs4w +L3UizyWn5A75NCS1G+VKHNn74iYPUoX8awj4R39iBfzHPP/HHqEqX2CPFJ4R +5nl8mkaZZuN9YDl1+y2P/oXy97/QeD6CDokjO3ZLNkbDzLw9nwyDi9F9TsNX +E/6+hy0cMaAn3d0uf/UEmKYCPTkq3XMtdtgT4FVys9/uoMG7mbn7l86kwzKJ +jFeDHVnIa2WJpvFjfl799uzkh0O4ILbh3I2JdUy06LZW2kouBxayIxyUkzgw +LCrE4vITJrzd6Dpu8Y4ueOKn8fjyIjYcDjIf8Ksfdh3861dhQpHArxZ/E/jP +AuMB/4lecwT+c9K5jbd1ItnIW22W5UZ/LjJeoKr9zZJLzUMA5yHZFwMH5rNv +r+bf+aArWrcH5jPT3lOJd7UZnPsDtNIK2+C0fMPh0A/EOTWKOj0nZ2XQD3SD +ce7mJ35+gqSyBvLeq5Ib/+a9aM5pQd6L820TQb6NVgnzbYPsS2eKQtjIZs/D +VS6jmWhte9vYDxUc6BlaP0LhPQ1lVdS+8XwTgz5/nae3LIsBs/98dXDdUgCy +sxTdtb7GIH9Vd7dl7m3Qopt9oPVXNUQt0462zY9BM6ZL/3kbzYC6s3P2+3a2 +QPaWZRVff8YgnSJDe5tH/Lpyl39l7Wg26JhoXJxUEoNeTwufLPGUBfQLUjlz +I9vh/d3h+/8Ux6Bfmz6JR/HrKf80z7th/HrK8JD30ZF8OR+22854wa+nQrXW +tzB1elDpu23phbkxoDCqaedQJg+u/nw/Lj6yHalx3kjE5MXAshu2NWYnuaDo +Ud64VZqNUu3WSjfy8ROvxyhsl+aAbt6NbO2uFrRsVc/uK3w87cW2qY33WVA4 +H427U1CNcq0zGzr48p+vexmYzq+LB988EiyztQApetDYU/i4s9dKpZHlbfBx +yN37zik06Jq0DX19FQMPGblbv9szYLp/9brFIzgoX/eibw29FRT2rTm4ro4D +084K6qnJgnoKdIX11CBFQd031W6g7kPRwrovdapWootKJQqsvoZOl7HAbc+q +XdoxTBh95ebG4jcsdO2BlpXJ8A6kUpOg7bMM61shipOYjZ5VM5Cz/00V8asM +OKfryi5ybSDyxjbJNQ3bt/P3ZUpwuH5MIsQL86b3o854OLuTdcc4QX8Dlgj7 +GyuE54KMN9brHX4ygD1I7/ucPgZkRI5RnsdlCO9x9EBvUkaaNl8P/bLZg+Ud +SmHLaG/j/fUMJKY0NDdSmQYtr18f2nKwjLjf8j1g+FK7KTTqfADPx/dfOTBM +KKdMKCdVeM8nB8sZoikpdp68h7lDl2kTfIIFpkmBY6LmvUdHo3tkRjq1ILWU +cycHLW2F+kQBflqAA8YLnzWMGifbhvIjP9pX2bfD4U2bwvcu4UCZL28JI5iH +Ql7ecnMU60ObvV8V0qa1w/FgQZ1edHagTkcgrNOzM0726LixUcNHuZIE527U +GOa8pMOkErz9BPKPvx2Qj0auF8j/5jXu0SxER/M8wu8ntfFQhcunhrBBHBDT +PphXv+MsAvbdva1fG6DbzrptbkMLhCgsqh1RWAmgazbh0iIGhNxbPmrII/L7 +tdTfPz3Y9ZODXDfLXQhO5tfRHtuKPe4S+QDqznzXf3cJ+X6ip6Dfgl4L+y1K +RgYnJR3J71HcL2vac/8ei6ijcq9HlmVc569vzarXXq400Erem7FMjLy/yvsZ +19w6m7y/esW1dvRKhT441//0amo1GyYK8TvffrrmMXvRhJwkmR80NkydYizP +iSHeq0AcdbfUjw4sMODKsYaIk/dataWPJw2Zw4R9vqrvt9bmo0vxX/LGqrBQ +2vjaC7ctyO+jEC8b6OPBT2EfD8//q2D+UCucP2W9gNcrn9wQ4BTbBr7GG3M1 +qrgw7dCMyJvEeR8LTdcIGrc3vQsWFLSI2WhVgo8wnk4WxFPA8TR08wG1RcPz +0Qz0KFZfhgGqWkfeuqgw4LGwfzVM0L+COmH/qqtq/JMJyxnQe9Lw461p3dA+ +rPp5riUNPGLPhvby9bDv/MixVmJ9YCJrIV7N18NpGlyVvLZn/Phc22pzqAqc +kXLrZ0M6PBz8rLBKrR4lBGX+epHEQ99GMX0uJtLggRB/IsDhqxC/ZLh73uIj +DKJ/uSQlrXbJcvL70FI0Ntz5yc+79y+a2fNjGD//mWHUuXfiPdSW73he6VAT ++haxcFfKUjroNFQaxvs2g4m94aqDXsWo5My0tozTTOizV1WzP9JE7MPQUSUW +cjuZkM+LkXhokQ8xnGvvPt6NRRG3sp9UqLbBwtPnDyb298Onb1v15GJi0cVT +MquXxXHh/sRWh2d/vw+L91zlT0wsfD5Rc7h9egcoBw02qFtTR/izyqDFkz06 +yf7AQaZ4B/1FGfyZUBeYJsYE/8WjDlWz2EQdFKwkdez8GS5VDsJyKHUNwnWN +5oGGrPZuBtppcG/SzRkdqL5yx++2jxzwDCobVrDyC+qfqntBbkkr2vV9veYC +4zZwTVlnvyu5GIIjfJpDExiouoAjs3kSDb52tXfFHMlCLJbDoOPvYtA4V62R +DR9aYc/p8PjVX2PwJwq4XD+1bHIrjFq7Oeh90BVQ1JTbue4JQn71EcHVhXRo +XswMidF4A0s8Qis9cmLQMatUN65hKyx5etnxhXcWapk8a8+XnBjYcA+9GJbZ +Cozz538N1nkDo2ZYvVr9LgZ4Oc13ZJe0gk2x64Ww+1cgK1c27kEsgmNeak2D +i+gQ8/Cr/fMjWcA8oufY/zYG2lfc01R+2Ao7hOsVUxlYL+z53+sFvN7irUMb +Wi3ZyMi3xuWHGRumf9Os0O3k52uxYfeCrNlI3E71bfllNlzzNtELHcSFjflT +LsxvZ6CFZW7r12t0QOHHjQ+l+Txfv86pUKvhx9VxYcN2L+XjjW8eDalnwZOC +Me1Pb8aivto5cCikFBm4SMzSjG6BNbLjxnnVJRL3xnc+eLu9is8bBQeMW4Sf +ypYLjEU+bZKFLotL4YpYZqviwxboFtppj8BOUYfQTrcI/fNagX9GQUL/XCH0 +54YCf45k7QX+fNBH2x/u1mygbZYSVynuRWtSNS5sKmKDuNe9tyvP18POvl8p +g32YqPNzutmgDeS9CA2Ny+U+6/tBsoimtdqWBrqbVmx9dolfv07xfH0wuR9W +nEjY6szHEzp799NdOXDqpIT2w5/9aGd0i+F7ftwx9fhzTuUsC3Kka4PFPvSj +GubhSH/+eBmJ2+4jH/9ENz4zbnU6MtAk+/OoyJJ8P24pe+zUsyoMJH8/MHba +TAYUdg+q8kvB55sVSAykGHvU6bBl2sqB+d/8lfB3/tCW8Wpg/srCe869OS2Z +i2P4+13G8SqczoWLAbSlfYGNkBVkhsrm1EBWnsy3meuZuP8JCgmFE6Is2uCs +jdQExRS+P6l4b/VwMHkP2cJM67QfP1+6VPzF9vvjRhgrETTRIJCGkk4d+jJ4 +LRO44UsOpCc0QYG9Snr83BZobxny8us1JkiNttj143QjrIyKW3mOVYPU9Vc9 +vO/MBOuYW1P9vLOgcr+5+QO+HW2r1KnQ4ev5m74zjd5PWmDzRpsP5fx897Bk +RcEiHhO8zjTWGa3koGF78u+p97bD76sBcC2NC1or9NznKjXhT9R8cLxG8gni +Pi3qsZ35tx+I6sq3DvQDfSyClcYmMRB3/Deb6N+dSKmTJuUgT37fF21j0FyN +8V1oq0xqk+akSjhwNO7p0GCijwoLfFwsg/nxbrJ2cWN0GR3ONqnF1I7pgIQa +/YOHjWlgYWQXnfuwGQatbt90UYmB/FLHTR79mb/eYI5NTXwVLJ0z/0CmAgum +/vn2cqcaDTKjXKJuKnGQznt2jhI/L9qYMbF/9R0udd8B7/sRjd8hynYcZKxe +tyRmaAeKrLiV8imdCxa1E+bLK3PQk+MGhpG27WhannnlD76cCap3vqprBMMV +ty+bvthkorNBg3Z6RNKhqlh5l/yIJuJ+ssO6Fd/GHWUC5/5vWRnlJvA8+o4h +vqcJLJ1s7pv5MiHaal7NdOUWmFz+vcspmwGzaGNq55Xx47/6tLeTN7RBMNJZ +k9jeCXrauyefXkaDjmyfl/T0ekJ/vOZekL9jwQTVy9J+Ok71UMlLuOnT0gzq +pyJdmnWZkPv1don+p3BAGkO4x9W+o3lmJq3LVejw69ouXcdHjXCo+tYjnY31 +YHFHP/CHGxOe1nPROPN6on8/OynZNFyTSa0XEK4XQk6svrNMkofOpl3+Pkuz +GTnZtKCQ7Vz41HekdEYRF3UE2hXHmDSDWqd42cK1XMiad2zosIdMcJbZ/2Xn +mt8ooNBNrHc7CyKrLyxePhahckfm8EmBLfDEfYPj3LWtsCzmugmPL/9G4o9B +NSub0aOFJXM+ufHrpoapXqrFXPRM7LXL/C3NMDljptQ+R1K+k0A+YPkOj4+/ +Na9vhW3Lnxk97CuCbJkFC97U8euLuy/qC7JfoSlS1+m8B22o4+1H/VnTaRAq +GRZMO5WKbko5mRXNZqA90uITZGbSIPGcHXR/fopOLHue7HOxAHSdjuS8e9kC +zVukpA1s2UimtNqmlp9nut6vUbMW58LZmBORXtJNYMXLp498WAbuEbe8NDby +nys7yvPnoUZ4phMesrC6CgJV9iqHrOb7GdOJTmoRjeAzMf3+gsV1KPvJTcu+ +rUw4FvLs/XTnNORUPX1z3YMWNLLpXM/wXa2gNaxvWrp+PbiqHFRvftAEn9mV +d2bz80w13VFPJp5phGCjcNdvUZXITHr/sGgHJiQFe+hMWdsEL3dlnWZ9aUJK +u3qbjM4x4b7EuW1nbjXCMSl+aRObj7pvZW7UsGJCgr/AvoK0B+wLWQntq/TE +sEWjj78i7gPQxIeW7b9Ih5pLEv8fh5yRAlzbXRBHPl2alqB3ohEdHPFheh6v +BWwP7d94eH8DSMVr9aU3/YJBo0sSamcxwW9NjEREfAM4PpU+pOxbgJbFvw2M +02LC+sv+a8fMboXnlzJH6nXloWwd77mQwwS5h55RjLJI6GVVOzSOpkPCA4NU +WTkaTExxGcDL/ar+4sg0QoDrKLwZ7G3BgjiZE1KMk7FQMH3O7F4/FrwZuszz +NmoEP52A+bOs8lGphf7CUbZMMFH1a/Ic24SCPbPqrB+2w6orI9bNzaPB1tbX +P+1KnoHf/nOS0YZViIPGa+42oMOyiBZlus5P5PrBpt5JhwUM6+1b3/Pj7JcL +u7OW8/1BZu7GqG+b+mCiq0LYRn78uvP1dqgqvw6puLdETD2oF5S7gi2MbPg8 +79A2uetXh7R5C/QUIzlwue/5Bf8YFngXnJqy/vczWJh8vtvBsQqOHUmXS+Y/ +d6ujxKHTD17AFM09TvOhFil8ezy3dQ0/v92xNtz610u0KX196sKwZni96u7c +o3l0aChNOWUk1whPC7tLGpWYiDV51NvBZ5kA7/657wHbhPc9Aj8K7vNczx64 +zwPsk///Pg/x3iLg9xa5NlsSDeSeI5dAvbOayaVonlHO6JdFLdT3TBF+z9Ra +/9DzW/w8+V73sqv7jsWhecfaXHn8PHm8zSqa700m8R7fNok7S+M2cuBOWJfi +G50eNG3Q6/03k2KQzPAEdxaDB00O0d0HI9vRcLUzypf5eMqdkGydk/x43e+p +M0uajd72h6RY8fENE6yvr/rbb4n0mZLR2YIOSHiciuLjwWP3yRbdZ8H5hIBO +zYJqpNiu1mf2KgbZ2FTSnxkywdF+Asufrz8NITN+tfH1J2nwDa1+vv6cdljq ++62EB49OLX38wSMOPqqfsZ9wiQ2RJ9eCyd5uMF14vGXEkTi4IYl2/LrJgWqT +7qp7/HoBDVNtM/SOg5oRr+rM+PWConC9dGHehNdLOd9E+HwT30/4oFWcEFjc +hpKvjk0UG8+vEwNuqI280UzEbfqIi+PuZDJhyPO84BPBdfgTzYICuXeSTOJ8 +uUxwvgx5wvNlt6PHB8Yzbse4O/PrMMXWd6NOSjFhzOaRo89nhxL7r7Hlymuf +FH78FpMdbV7Aj09Hn9t/ZbRD9BBj0yH8OL5eeK69U3CuDReE59oGF9YuKprC +ROsdbJN6TDsQWrFNa8EvDgxNGyHxflobhH0f7PIytBMNP6HW5WNOg1cXhquO +HvYN/epjPX51oRW9DVGIctndBpKWUYN/5rSgxNX1Rf6HOkDDIjCso5Gft9sI +zpHtpwycI6PfwnPksoBa8cijbKI+GkarnqttVgl2Oelquyr/wEtrLf8Fe5jo +rB0w5VRo4Ksh8GPo4oAfg9GSAj+WZTHj5b7HL5CLMO/78unXztPpdOJ8/7rg +fB/khOf7mK/rNMk/np/oaMfByJTNfL+U7cgKkeLXncA4MXB+J5HMNIldQYNv +HeNqt89tIuvazvwXNno02Lh12vA53+lgS5M0GL2VjQoDj50eNYcFQUpGcUXR +NKI/IFbl+yjHmwbbR9h5H7DiIonZRrMLzfuR3tueHflbye/Ni5uls6vPtg8V +moQr5jhWQuqnW0/uNrHRxHtXcu+e7kFn9oczIlZUwveNgvNcfL6Q+7/PcwGf +5+J86+x+89XNd9tgSFhJwbE9DGjzjk57vpyFuOfOdNu1dMAw14zTnku54K8j +yCd7hgzkk7C/XZBPGnikjjjiQuwX0POOl1ebkPOPEcwfioXz79q5eEpr0QtQ +U108bnxxC5glOQe1yZDvZ6X4ra3bkdQO543H5pgZ0eD8r+VOvlLk944y5Vet +CdjWDoH/4gjjR4X3ZO4I7smgrcJ7Msr3td4myH8j3jub7cKy+3GxFXyNPg/c +W1tnAX/vraEkpvvAvbUizm7ahr1R6Emnz3PbXxUoVrqm1ukR+f1CkxIH+upw +sk3QV1+sdT0/FO4Rdq8/q3BN0yg69fwC8PlF6hiL9YcVo4j3xV+v+l4TJEmH +ow+LHxeb3iLep4hkmV8+n9ECSleTEu0PV8KZiPBLiyuYUDYhbX0nPy9KKr+0 +/7EqD/3o6lRQEuuFpVOWjg+r5oG1rOBcD9+voAvP9UYcrVl/ZjlxHx8FGNlN +GfmEBa81p54Ovd0Mm5//MTOJ4oJ47oOxI/RpIKctuD+TK7g/g9YJ789MGsag +qe5qRB6XH9rKhnGR7N3gMCMd8u9Mqb2Wuy+jwsfDb9nvD+T7vTH6Kl561eDb +v6lmkhkL+R8ZffW2OtlP2/KyzsnkKRNFJ4VuahrMhCW/LauP5v4h7n2lqD6V +jeDnYxP+fS7ICZ+L+zPy3YnvVg9lw9OuxP74OTTwnnLMQt3uLmIdfHvvsUk1 +Snm06kr16xY4JfxeQV/B9woiReH3Cs76l38ULOQf2+kwgZ0CttPE1e9vjX/G +BudZw05I3uiD3IyqqO89bOAyNL8d5nKRclCozZNVPSj96rmOSPT3Xvy3qh35 +TMIPzLyyfL17FAfW2p1VLQ9gwj3ZHyt+13aCnMu2klJ1Nuw8JvDzLREDfh60 +hX5e8V85CMs5tkXGIGoNC81I6lALjOfXAeseRo8cwoX3Qn2LF/b7sb7h94Uj +Pw7U0WhXqaCOvtP2SOLvfaT3Ny2birVzkKxackHZAjpo7JbLvZDORhcmV61/ +xq8DSodOSFTdQp4j1DPjz0zLZqHSb1+P6q+mUfUNsL6d2bzyiEsrA7bUrVs4 +wbkHOI9G3n5lRYPvlwT3su7J0Q7vc+tB9EaT+Lf/7++PKAv2Fz0X7i9+b8pA +UNejAGFdPzpy+U9X+3r4bHh01aYfzWjamqWPwnWY8O7wrQVGWwqQ0/EHpapv +Y1DZj5g8Vhl5b7CgtLRswvE4ZMWwcIsTZ8LDVY2GjGQavOZknjP+GYOm/6z/ +kmHPAHaX/cyNtEZYca1oaEBBDPp++bayJT8vNTDeNGnJKSZYjMtW+VIWg9T0 +IwMVVvPzEg7iKvP1aEzdshgWKxfZhU9bbcSvi3Jn0ELOjOXBgfXOn3r542dv +9Tx0exMbvszN2C/2qAuGJmb1PiyMQduvKEd27eHA20mRt90W9UNGy7Ukcf58 +rPKf62v4cMHgDSts56J+VBix7duH/Bh4VXvRRaauHTiJAV5HH3Wh3R9HPZLJ +iwGX5jv3bhzkQdD18gnz5HmIN9P8Vzofv/y+I2Mzvz4qD3aUrjvFRB2nJAOq ++fjVrWaqu66w4WDmHTWDykb02fXWQS8+zmS07U+dwYKasa0mj1No6OuZJLm8 +3BiQcp4fuyCLASeDo59Xqiehuc0WIF+eDWpOb9cv0qHD8JB3ru82F0CJh3rX +05QY4M4surXQvQ3GXd+X6TqGDhN9nBMj+gtgU2GK3O5nTNA8aBtxI5+FGsdu +Gxrp2wIPHEsPPPfgEH5js8BvAPYbe/cJ9DNHZUA/YZaEQD/x/k4T+CUYI/RL +u7wP1S1ZWIsufjDRKRzBQ7YTo4PW36fB0X/jNRIXxusx//ol9E7ol/C9mWT/ +PRbKVjzk8qBX/HwYC4YYegWtudMM20enIOt7XLRjxtglnEX/yR8A5w9YrsUz +Q8+Y5g6kZGFk3wJc+HOrgJ3Pz6OWz8mt4OdR6Ljx6oE8SsHmYfzRcH48GPvy +s0FxJ4ofs7hx8Cw2iHPkD9qNaYBvnOVpSl9akZJnXUfxGiY4xLoYp7GTYHG/ +S8iSpw2oLD8tY9IZOpyoW2WQ9r4a1shczVzxjgHua5cWR9QwIEwYXxIE8QVp +C+MLzpf0SgfuuaFmL8E9t9XCekdVUO/AZGG986r4wOhj+z4R32Ncbb49fWVP +K1wS3rM6JrhnBZeF96wisgX5XqUg34MAYb63tSAuz+0FAxUL37sf82p45vJ4 +DkhXeZspzo5Ggybz5trcbkUbNabSDCbRYJnqfOOZh5jC7yXoQs9HP9yUpVIJ +CmWrAyb++IF+X21TfDSYge76K05kTGTA011GA/nJhoKB/AQ9fSXIT3Cfd+Hs +gfuEsG2L4D4h5uFwodjfvBFeWgryRpzf+wjuKwIS3lccJ7ynh+83MoT39Jxt +Zz84vpSN4pqHttIWdiMZ0yHMDUaVYDr2oOu4Ca2Ik9IqOVixHVkN9fmSPoYD +X3grFs+pPIe0/0Qoayo3wkJ2WqIsqwU+/Tykm1YXjCxevPJ7sLUeVhRaLIgq +aQGOasXosMpSWB+RkXFTgglKa+c7B0ymgVnhP/cDYafwfiDuI9xsNcuUX9yO +NIzfzlb7RIPyIV/2WUTWoRdOjd7rn3LQIIvncwr4/vzKjYMXaw+3gNzR58PW +rOWhS6qjnzwzoMHPxQW3rnxhQKCMeeVqmQ70UbpWv62cBVKq5+jhyq1w//cf +H9sRHcjCeJCtFr8eeSE8v74sOL9G+Pwax2OZc3fNdgzmoAPzldNeWrNgtfD+ +cJ7g/jDSFd4fPiT8fmxnwfdjIznK92NLh3A8x/swgHXEfJb9RH69T1d4MntQ +LVw9/jDjHp0B2rPaEzkjmTC+QJDPM6IH8nlQDRPk81ddrt3W+8T/FN5X6Vhi +0HLoHhvGqq5svfyKDV1OB2eHh/ahTPX1F1J62ZBZJ+jPu49hLQ8L70Ulzxad +XZRP3s9/ue3dpZ6RHchvfd3T1jIajLRQ7VeQboOiSMecFEkusttNC2JvZ8Gb +0f/ch0dDhffhFwj77ZGCfjtME/bbm4R/r2Gs4O81QIjw7zUsd2GkZLwtIb4n +JIUzN2jtVhp13wHvu8e/fhJshH5yuPB++FHB/XAYLrwfbi20u4XC7+18LLS7 +TUxBXvTy8kBeBD+FeVHxIbl9+8eR3zcbGu48c/eS/6Pry+Oh/r7/Q2ghEtpJ +WQqpEC1yVVpUopVKUSqVRKVIpSKFSEq7EkmWlDUVeVmiRMi+zzC2Gfu+5zeZ +Ofe+P30fP/+8HvN05i7Pe86559577mt60Z2vF/ddj8Q8o1rBLpns511IrNhw +jM/PvF1/+USKAxw+18eXhxxmx6N+p64vWnpviPq81q+/wR2/xxvtCesLf/6i +j3rkp/C1U4e8V61R+xGfAc8ANfppV/JMXvLeKm3OOQUS555TWPpx1hFwnlB7 +hLOOEDJxbmLKdFACad4No9MHkSxVlME7txp5cM9DT3DXR1rc81CIvx1kGHGZ +Nn9Q/aK3e1Q296GPBtMf1y/4ijK1fXcdEmMhW4n0+LdpLcgh0PaKw7cIJO28 +fJHXjBpqSpyAy5bVLYjH9d2jxVPfUtLb7MeVza2kRpWL+Na8av53fCkYX9hf +es/ZX0Kwv6SgeqnDYUEPjBcldDLtxLZ1vWja/+Z5Uv3cPE/IE1jOyZtFIty8 +2dC94ejK9R7KZ2aUn5HmELIr2pmCHHpRjjLnfDmSc75M7eeeL8M6K4KzzkKh +3HXWhkWfxZSSa3D7z+VfcjHp7UD6/3tPhIJ7Ipsec9ZHc16MrY+oKu76qI7G +mdeEhMfmNcp1L2deg/Hd+iQuuNozhLL2upZ86WIbyj0f1XNpcw2iL5p99E9I +CJXmVfbDge0n/LKcric9aELdSx6WjqpmUxmaOXtF2XHefsv8E+PYerB4ql2e +dFgI5fIn1EHtMpvPTFFRv82dqJC/SnltdAglqvZxnIBTJ1p6q3yguawXXW+2 +Gd4VFUIVN87RkfbsQle3XhU5wNYP2RMqccvZ5cisnFdd9Iz8TpLd2oDSvUEh +qHtFX4/hf+4BOS0P+S73NgS5/LjV+/s/94DElx06cYCNf3l14ZHZf+4Bmdg+ +amhhlxOsWVIff4y8x6nK+VWzDhsPmG2yOYQd95rEjAy93pyH9ifYb7Z6EILS +NOa4V8vB7+g0ocFjkrGhb0rQh9yrVyg2DwY7H18wiWSikusm63560NEa60ja +WaMOJBjF2deC5xbuvhbEVbbLRRMvLmChEOaj43rMboS44y4F7w3mjnsp95xX +m3POS8lxz3lhvf3IYeweEHWOew8I1gvWnPN6qpJ7Xu8fJDSVHkTeu7nA4m2F +6+5OZG/sfjeNHYcubNNTSDzTgxa/vJx/064TnVjD0ee948b0merI5Ojz+Knx +GX/jEHh/zsTQnuS/ccjUbveXYnZtCOwo3TAqxnwzO870Ov/f+IdS2cOJf8TO +7V5ufrYMKW3u23i1rp0KuhBZniZF3p8sz5mnqG7uPAX7Nk6cfRsK9m0GufP7 +fs78Tklz5/eA95ldGUeyqT2PFSYt+xJMOenPeN8l2YbWqv/PPiElzN0nhM82 +p76FhAeGICk1++xM+1ZkEjFfPNY0m2JpHdwikR2MmMKW2ylJ/N48ZFgx4/NT +jxDklnHT5LplK9q3/HwjKzkYPTD/FJGVGIz49/vPq5RuRQ3e+infD2ejZUsv +PBRg4/4qV9va6a1c/cyk2g/dD49/0opWLJvdHmzbhqb+Lz8omMvPgbyVM3Ok +Oyix+KK4qcb9yKHW2WVWUTfq0+PEG1K8Y/EGkhDjxBv5RUUHqf4unMe73e+s +8OXt1eht6LIEGYVu9GjJwGsf9ro+UGt51Xq5bqTIekr3poVQGz2m/758uIza +KsOrXulPfr9Aw+C0m8vdEKpk+Zmt5Wx++Jcfyzn8+xHeHzqoTR/2mNj67/0d +Cu7v7H50vt7TNIaKdogsvXHkJxLUCRgnsqMFyayqP27ZGkS9nXA6O7q6AjVK +aT9XfNmM47Oku6GVzzwHKdauYKGozeReoRTnvg9lxr3v88/9FArup/wTH1IQ +H17dFlaTJUB+B+nLj+OC3dvpyJP7vq8Mzvu+qPfc933B/tT6kyffpHiz17cz +j/e+XERHFflJR8Kd69Gbo3Eq5ww7kM2G+pXlWv8nfkMQv/2zb4Bg3+DphKL1 +x9070bUbGcuuDYyifbc2mbYY0FFtIWfeHzGY/DfPAWnUc/IcYN5/yZn3URx3 +3i+1aBELFO9Gx86t0RfbN0qtGU1+FTi/G9E/23ZnnML3jyjvmb0/7deT90sc +Uh7Li6BEuHkR2VWHimyGC6jj9rKTTf3aqWrzBudLp9qR1//mZVGQlzV07sv+ +JaahKPlu7/eZMRWU50SbZ3kzWlAiNw+5g5OHTEEessL/vp8EwftJrihy8qN+ +cvKj0LjnnPyoYtsD9K3+XdTXlYsFNjr3ICcVJcVcvR6k8jJx+tl5Taj/j03w +vPGt6NVrDz618A4k4hTasXhKJwX5ZTV6J39EFXSj4gs66cJnnlI3LefQPq5i +UdNlM+3DFFv+1WcE+myutahL7xILzwPtLyYsoe52INUwzVfnTLNR6KnsKOPM +YGpp5+ikQjpZH02sC7R/GhRCeXyaN+0C2z8wzMVRvXEzjr+yJ1IDofUd/95D +RHAPEeaL09vk91cn9aPyEx7B41g96PDbWzPmH+2mvkms8JdX6UeXTQvsWZk9 +7LiXc/4u3xn9pL2VRd3wGNRpYce/S+sl/dGqbsR/et7h3rejyLmTT+bssm7k +vvjLatunISjsye3rU2zKUeqinL7Zki3oLHcc8zjjiNy44/jP/QsK7l/wtZp1 +/jJLo3YUvxjeFttOFQy+bhhZSkdaf5asMdVsRVv3uPEY1vajqz97NUZ06f/y +QAEP1p0aIce2MrA+MkbCt31SoKOu02lGpzS6KafLQ4oygX3owfstGSofev69 +T4HgPsX3pcO7upgsJFf3kz5drQXFN1WNaL0m8+/FrWN8UhSXz2oBqgTJdFPW +Ej1hvXf7qN/eTovdgtj69b95bhTkubmeD3AX5fXG/lt78Ae6tLIFHdrKyVeB +Zzg3XyXV4sl/z79QfeOdsfOvj3qcfJIV+8bySVAgxckn4eWeNz3knDehidzz +Ju3pjG8e7PkB1gtDPne6jrH9Ibz/zTf426nEtQPI0zrU+eMGOhLY4rvwP/ca +qMhHIXv/3mvw32fVtMGnAWWUycbz/mlGvYvoUvI6HSg+XT1/C90Px4lTVsgs +sBJqQas2rR67d3mpdcffe5dU9wzOvcs3wpz8n8bAsfwfNIub/3NooOTeIhOc +R41k09wi9I51IAGxB/eaBRvRt6JfAdfzW9FKlsjakj0d6MH5CFOz5r/n/tO+ +pLK/p7nwzE6h8+x16NI62R8JTBzXOJ9axHpzogOZLXu37fjuVuStXNrtyiqm +DoyvWiBcxNaf9fL6F7a0o4OV9IP2D/JQ92O1p9+ndSLT177F7u9ZyHLDtwM1 +ys3UhyPhkX2PO1Duwtbnf/dP7g/eXbT9BTs+Kpg8tn+CpDn7542c/XOUzN0/ +L+LmpYAfWMLNS5nAvd99gXO/m4L73W7bBbw2B0RSvoYjBtqiedQfqnNlV2Yz +UihsCqm2akf8Zb7GSz6WUuGGhpEZ8zrRqv+9d4Dg3oFnaFPZk9uh1PB1m+dm +ymXosExndEhgMyptOd+Z+eE9FTbvW+1c6SJKad6mM6veN6Ml3P3DJs7+IRXA +3T8E/T9wLEB101IWlSdzTjGUSfAvnDxVBHmqIu85eWWbT47llVEZBZy8sgvL +i115T3fh/fzso9MZq+b3oOLnly8xSpnIWW5WmcnDKiqg27D5yz5yf/w45/44 +gvvjk6ZOO/933PmsI4LY404du3R0999xPzxczBubkEzZHPrSWGLeTknNv/d6 +tTId8WncW799sJsST1/aF6vYQk2q/7KlXKYH57HrxnHy2OO5eeyj+jfNG4bq +EevwAfqVZeVoU2PYztPjOzD/Ahz+EfA/0ncsOefSF/x+5gkND+4+l6ejTu77 +0M5w3odGxXDfh1bG5T+Uwz8C/v/Jw6QgD9Myqv2a71Wcx4u2nvSY+e5kB/Js +33WnfmMCdcSrvP0FaqaiMrYcd1NvRZKxXr6ndiVRB0ZVhB4HNKP664+HV59s +RcW5tbdmujNxHOR7VfXK873s+U648b/2Qtkkcuwl8k3IhHEXcb9QVHVb+zN2 +v2x2PWdEOb+izl+Sez27oAZV7xCufhvbjA7VcvKg1PaP5UFRudw8KHlufldT +x9j8gly588s/7aGgPfNXceZNWIeFc+dNSeaJPje+evTV0ih2ovkP9CHeq/Il +ox3dntB57PSULiQR7dE2GhyMpNckVrPed6Kfk/mjad/a0InuXx+ctuRRy46F +F84Z7kB2PsFj923fDY/dt0Uy6pz7tv/k8yPI59/P3QfW4uwDo2HuPjC8f/63 +mp3mxJAWyma6oo/IdPa4r+HsS/CtHduXoGzFOfsS7tx9ifmcfQkkwt2X2MIb +opnPcKW8ZywY7JVhUg9WWlWZdzaj+F7bsXgjlCX9N95A5j2ceONu/s9Fvux2 +OC5+tuSRdSE1Eu4oIqHagepqHqldrulEZU43M97GhaBVJ9P5OgM7Ub/SeMG4 +ayz0MFlO+rBkLqW4W3D6C/OO/28eUdut5Mjyz43op+1PndCwfHRHwyHKil3+ +4vKk+e93d6HPmpUT0mkjlELcaG5OaRdyc3xhHVnRgaZ6fPQSPjdI+W9TaQzR +7UKtv4TH7uE2HKr9ew8XmSzl3MN993qSvG95BB732GDNoGdaLWi2E+d+wXzO +/QL0lXu/YPn/xtsI4m2JF0XDE4obkFtu+ocYpWK0ZIbtwKdZHchQ8Jd6qF8H +2tgs2mBn+wdFv64qlWPHpZFS52vWzevA946vBVmPvGeX436q7c8Hy4/o7RHp +rbaDjeja1QQZyr0Fndt/zPVbfDwq8rsqa9THpOJvSp1e+aXl331dBPu6X/63 +Xwj6xVWTJHhaVn5cp1VRjSrYxvx3vwLw4yKrcofDqpGPrN79v/Mu4BPrDXK/ +K/ci2ph8E8aZ7r+tLtLZ67Ex+RqMXyuekun3tAs9G8PzME53M6Ge7evkticp +AXCn0eFzGvM7kDtHHrf3olFE/OumNnSXUz7GTZU0P3e+Z8fVnPZgfOv2ndSc +R03oHqf9GEdXOp+nhDJRzF/x8l6Ml2RJTFHvb0AlHB4wbvs6Y06Jez181gH8 +RZ/U6E7rOiwH/Nm+XHVavp3wCU9++djwCV+q0SdOvRh3FDguEWVPeAb8a6e7 +82/PHswz4DJvOg21NAnPgLuz6p39azsxz4BbXjeylmLHCcAz4NsXsNT3G7Zj +ngF/jiZWK8u1Yp4B9xU60fowuQnzDLi20NrarqtM1N1pNO3M2k6MR19POHLp +RAPmGfAeq6lK3jfrMM+Aj/yKvPK6iYF5BlxC+urJm6FkvIG/Ib28G/mipH2A +X7fZrPakkPAMz4ZCi3TxG9WohJXM1NvXiXHhr9OzZ2ypw3wCTheyeM3aRPgE +/Oi7jdq+Le2YT8AlTJckUUvaMJ+A+z1h6Ad6N2M+AVc7zC84WYCF9RPw9q/S +NTKb6zBvgAsaqR1cpsrAvAG+W7mlYNKxaswb4PHSugIOTBrmDfSrR2lXjM0G +whvgJ85XSR8VIe0DvDdNtdrVtxrrIeCDevafjQrrMW+A3+c56S4lwsS8Aa67 +THLDAzPCG+CuKL/8+kAL5g1whe0/1tBXNWHeAOe/qlWV7NqIeQP8xnTJ9B9m +DMwb4LRSqQVOwtWYN8DfHs6mywhUYd4ALykzLvn4vgzzBv2mPRzePteb8Ab4 +QQFfntSbhLdFh+cHtAo3UQv5VLcP7iDtBnnZW3tcdNVqMZ/wXBdBSRl5Ej4B +Pyt46+7qqEbMJ+AyN119JXNZmDfATb88c5jHT8e8AW5QyHgSzkvH9gt4QJ3V +03NutZhPwAtY4gKCVDXmE3DbVIZzzrYqzKdmiq/sWcEmatd+jcCZ7qWYT5Df +tltY7OaPQswn9O/D+mrJ7bWET8ADajSVD85hYD4BP9Q68NrDl4H5BLz/auqf +c2WET8CnLxSes9avHj3kfi4UNThTU1ZNXZbboeB4i/AJ8tILU7+/cyd8Ap49 +8Gv8+xga5hPwOUJ7ZXL8aJhPwFeqvLFa+oaB+QTcf2KwRfwZOuYT8OWFO+NV +Z5RjPgHf111+1XhqEeYTcId7n6QXOP7GfEI/Psx9S4nNZ2A+Ac8dvZwlfpPw +Cbiv6syK68tqMZ+Am+RXvmrQq8N8Ar5hz8b5jslEPwFvG7/j7BFrwic8g36+ +stm2ivAJuGKW1oaDloRPwKVi7ISfLqJh3gAX9fQNVF9WiXkDPOz0Qb3x70ow +b4B3+/7YGnEnH/MGuHmPQYpBZBbmDdo191ra+O2RhZg3wK/30BRi2kswb4C3 +dn2dEfC8HPMG+D6dg4e22VZi3gDX4n0rvse9CvMG+PSHzncNZWi43YBH2l4T +LT9Fw7zBM+yXYfSp/EbMG+ASFulOyxfWY94An3mU7+rUfcR+Af+uHVl64wcd +8wb4yNfAGNeb+HesdAD3Ci5a+nIPxpOg/tmHZn4+I1KMeQP8/WUJuTTzMswb +4ImpsX/ma1Zi3gAvKNE+L5tYhXkDXMXWRajTkIZ5y+PYL8pcijQmPyC8gfzr +Hxf5g78Q3gAXZMmYLTVn4s/wvLloWlyYRz22X8A/n/90Zs4HooeAvx2hD9/Q +IPYLuNGtwsqmM4RPwIM2LzLyNSN8Aq5waNGUzRsIn1C/UdxqTbHlpZhPwGOV +Qo+GUxUo7n/nF1S4T1+wSo+O+QR5R/EJdkJWdMwn4Lqq6VXXlOmYT8A1chLS +xs+mYz4BF6vd/lBsGplHAF+7csuson0N+DM8zx2yTc2fQse8AX5YO2ecjArh +DXBG9ZrlIRsIbys48wiKjOexqSX86ID85NxUhbnLCW9Qz1qHiS5LmeWYN8Ap +KY8evts0rIeA68866mvOJPEM4IemuLw8/JDwA/jTtdrzvI4SfgB/2Gprmq7R +hOMZwPk+jZww20fiGcB1RC5lJl4i6xfAQ8dfW3A9sx1/huf94+7Bj9UIb4Br +3vDbGbGS8Aa4yGf50M0ahDfAYxNH5gkrEt6gvNh5axb96K3CvAEuPHXDkxF1 +Ej8DfsOgolFQiYH5AbyJlRKdFU7iPcCNrVLd6L8IP4Bv86rdu4RJ+AG8k2dg +myhPO+YH8MQw1cMRQh1YbwDffzeg6cN0whfgp0duhVzQIrzBMy8+Qq58BeEN +cLXvd/tElhHeAA97UiZsIkt4g++p3LxSMl6GrO8Av/bbPPzXFxIHAj7ev2uu +hQuZZwG3mqN9asXFeqyHgAt/l1AYd6UR8wy4gHHdnK+uLMwz4FTHHyPPR82Y +Z8BX3/n5cHdgK+YZcG/ZtB1/f+8SeAZ8S3tGkqwZ4Rlw/3kPPh+06ETfeh53 +39bqxLiSxERd342EZ8D9hLyU4rUIz/B8Oc7szH95Blzv9jjdmPmEZ/i/kIL7 +fOuqmn/3JXQqr6X69hrVouz9G+/lx/RifOdivT9Dk+v/3a/QSb9pec8sreHf +/QqdjTIPBDLeMP/dr9Cpfj371mefpn/3K3S+n1nezLjTgnkG/OHOk7yCrm3/ +7lfo8PXrdf5Mbf93v0IntUi4oOZbx7/7FToydkkN4t87/92v0HlAc3q++WfX +v/sVOs7eXimf19H/3a/QafQtqulQIzzDk0c15Rm1gI6+jJVTT225/7eiAerX +sSkbIrW7MC7/t/r73ZRkwHmNaO1GxBgrvxzj/YddzyzY1YFx3rHi26mlto8X +jzQxkdNY+1MQ4G3Rq7WTpjSjKE75GJ97vORA4Qw6CuDIU1De/XqbZZWXm3A5 +gDdVPFM8+YSGkBLz6d/7brVcfNWWKlfaFhoaHv3714blD0fv5j/dXI3Lh/L6 +Cm6vL7CgYTyfI49KjEedop7ScL2Aq/vPnLOLbXey3HoB/4W2P4+j1+J6Ab83 +5ec0N3Z8C+2A/x+hzV02VZOOywfcf22+YJZaK+YH8J/jI14JutbjcZnP4R+5 +qatMb3tKx+UDfnZL2eKNp1i4HMB9JMIjxtt04HIBf3ZSauppDaIPGzn6gD4X +3I2bJcjE8qf//vvjCLpwVamodXoX/j7gvxLNI9+z5+sznM8UPEf3lKnfy8L7 +EkmAH9HduW+gthqB/gH+S8e9YMnDagR6Bt8rmzenJbygF+sNyFvktWzfvawH +4yDf26yjynOrB7cP5E9YfJHzeVSL7QJw6SLp09aTa3F74MmKWG5iGkDmQcAb +rl2clnSZxA+AUz+GL2o2deH2QD9cLW2fp/+pw+UD/vTaRKvFyaS/GC9e/0BN +vxrrCeCLembNTlJrwTj4ufPiSn++P2nG+gfyq9afXinnQeYLaFfHfXWTmhEW +9mOA3625vz/xYgu2C9ALvcaiF7IJJD4GeVXjbxlPJem4XpCX9CkOXF1K7Ahw +4whzBaV6Ynfgd99mh5p7+DZh/wnyv1XunLtEI+tEwK/dPbzLpYjYO+AJW7IK +F7jWYLuA56dcect7liQ+AdyhwJ+lf4KF2w+49CXnVBcH0n5or9oFiZwSC7Le +B3l+ny36964wcHtAPvmOQpzkqUqsf4CHxGyIbzVjYBzq4ZFmDFvzF2N7AXnz +k3eU/FQZWH8Ad1xxaG9fM8GhHPvPg5300VKsByBfJFmh9zq7FuMgL2apVrpw +awUeV5A33BikdX4K8dcgL7HJsnh6XiXmHeRVTZkxxT4NGAf5sIqBQNdPVZgv +kDeLGb+CdyUT8wVPCY87z/KiWFgeypkqMBRurkbGBZ5z5r4bqctl4nGEcuR7 ++Vc+Z8sDDvK1h0cXOR9owH4S5G0G882VP1RhHOTvlokavs4jfh5wLRF346r7 +NdgfQjmzWZlXFVAZxkE+0cz1u6pONQI/C/Lt3WbWBx0KMQ7y4pE3d774RMd+ +DOR3MK/4nFTOxTjIT9t+T/TceeKHod8uOw5vftNF9ArkbzTeDcw2KsT6A/Jh +b/N4pv4pw3oC+LGUQbX12pUo5ePhor+/P5JdXn/j7++PNP1eMG7JmSo87iAv +mSt1QE2WrNOh3ol6HzbSd5P5EeRfdr7ced2OjC/4A9HAgUpBNWKn8OQN0y0I +iiDjCPKfdS/8qCysxfyD/O6sFSsbX9Ixz4DvyXc7hm6ReAnq32VhMa9hP+Ef +65H1sbtVpiReBfzm7PW7s3WLcPuhXdEr79wZUiH+E+RpUst97LaT/QfAm2bx +qHlpE/8G5QRVuiaLi5J2gnzga0e7AX0SD4B86eUp58OaCM9QT3jHvT3BkiTu +AnlxgTgD91ZiL4Df/+3Qe3xHI8ahnFtt860tkhvxZ5CfhcqXpHTSsF5BPzSK +DVM/itGxXgHeLVinm/qJ+HfA7xz2DHAxJOtxwBeFn+8IXEviFoiX31150N9k +T0doR87tILFkytO5um7G524U202lnH/djAqfepglPc3DvCZoZBlZbif2DPqy +9jg/8gsl518gPz1QwGpnfQPmAeQv/bnitca8HcvBU23Fqct+8nTMA8gbdbVL +brYj8z7gq+6t9MoLZWAc4v1v6hLdV1bVYj8M8imr/HoDaGSfB/AL12etk2f7 +DZDH+weLN0zR6yX7GCD/qLt97tBlMp+BfbSczLD5Pq8JlwN2IKQ5orBTlKxP +Qf56YIHEWXEWHheQjwh5venKRBKXgrx6UpN06SeyDgJ8VV699qU1nZhfwLt0 +ZALktemYX1j3xHfI/RFv6sR+D7fTOOHTu3hybgj4+NiONZIj1bgcsKfAM2nI +azOJbwF/tapUNV2P+A0o52iAl5LUSuIf4Dl4xquxQpHgUI7tAxGLycrEP0O7 +Fu75NbvzG4mHAbfQseB57k3iT/heNiN8eLwdOS8GPOneJPnAMhIPw7r57UPf +DvGa7n/bk5QZpOkh0VmH5aGed7+H1NIs63G9oI8p/Ql1Lu7VWP+h/tjiNZlz +6WQex+dH535+cK8mfg3wjKGB8cW8dKwPgPPpj25YKEDOp0CP7k+wG03mq8X+ +HfuzPazcMA8yX4Beb814u2vYgcw70C7/4Ojhz3wsPB6AB53INjdt+InHBeph +HWDQ+g8V43EBfFaPxjGng2R+xPvkBb0sv9ckjgL84IYLveemkfkRx7mzmzex +qklcBPjluX0fEvSJHwZ8kQV/auGVBqyfgE/oD119eIjoJ+DyxfJ7fwYQPQT8 +RyfzlIElWYeCnzt4MXa7aDEL2wXgTb9uG93vIHE7jA/rXe/dFyJ0XC6MZ7dj +3Le5iWS/HfAbp4zO19URvYJ6FvPF2gqvq0aKez+WWDckYX+ukNvxbdikGbcT +8PlKh9bUnmwl620uzruze+SobjsuH3hylPi92PQ/6wLwh051c/I+JLLweIE/ +yc7xFvSyI3Es4PpTFi6e6MTE9QHfQ41iz06u/T92rSO1u999+0MGlgN87nSf +sMuryTwO49O8+Lpjz3wyP0I/dCSd73oakvUgPm+/vKNQ/isZF9B314Sck6I6 +JD8DvqdW2dK+7iE5z8JxyhF6+EJtYs+Al4XXrBiUI+dZgKc+fB5TvYecZwEe +JJVV/3QcaQ/oRVd+GEP5MjmXAXlr/5NGX1+S8yy8rrWKcNgvTuIiwI8a9/QZ ++JNzVcCDG6/YLf5GzrkAV1yzISGtleyPAX5lpG7ZPW86SpYok5DX70TzdhiH +URvY6z8nfmubM8QvQf1ax5b0z2P7SRgXqP/Jaec5egsZeB0N+nwuvM++QKYF +8wbjf3KOUkRjfwPKHMMz0cKx8mqpqso9P0t/0ZDc2OdhCv5vOhrJv6CvGPGM +ld+Pcbt7NQK/M8tQ5djnLozXPFaoP15dgc6N6VMLxot2lwbPXlaF6wNcs6B0 +eKC1CrcHng+G6LphB5iof6w/NIzfWZ6yvDilHumO9YeJcVqbbru8ai3aNIZ3 +YLzs6KItGYPVyHKsPT0Yl0/4zPdjmI68xngcxHjsmw3WB3zZ/I/hURSU10pZ +DlyNbsb9gu/1mseXtkc3IGtO+dQDDk69U4vhN7Woxjjw98Nd7ojMiWrUxKmP +gvLQxtM3rM40YTxxbPyLKJ3dbRa2RSzcvvFj5dCpV1epytg3NHSK830E8rdH +rhjq/qzB5cD3Tjo2Xwo5QUPzOPxjXgtiM6/1x9bhct5zykHujnXleYwqdI7D +A/6/yvKV988/aEE1QzdWG6RHoJzx3i8prQ50PGLpTpGEFvSZeVjRu7cIHX3R +Fa0X0oIOxYTWerxn4nKBz4UzeJjj6ttwe6B8/kjZh+eb6tFWjhw1MtbOPlSz +LTt4s1g1xoH/s5WGW5+G1aNtHH3AuODSbcd+fW3E8jAuHirLlFrFejAO45Lz +5dH3C9Jk3x5wg937Dko/qsPjCM/6IZVdG05VY3sBnqZZKugPfSlGUB/gtjOn +N8WvKMV2BLh8l1BPvmcZlofxChF5OzD/YimuF+T5frmMuMWUY7sDXFxI0Gd6 +aAWWx+Pu9as3q70c9xfkGYV2bkHWlVifAU9WVZ1bMLEKy0M5DSd/TzjlV4l5 +Bvl1o+eEZ10jdg34u20/pBWLqrA8lLMxdVmj3csqrJ/wbKi6Y+ruwcL6DeV4 +Ttgxs16chnEo58rOcQORC4lfAHmRh0oVmbJE3wBfZnXXJaqzAes94GGPO5pV +I+uxPJSXI3Y66Qh7fQH6icfrbc3jcus67H8A31/VmBHLXh+BPJRjfeTRrsKL +xL5APv9YXm3vPAa2B2xnmY52lzVrsDyU0zO1znbJaA0q5Yw7ln/8c1Pbh7vE +vwFupSG15OG8aiwP5fAlMwOT9lQjsCuQ/2rL56paSvwh4Iq5NhHbg+lYHsqp +evpWLPgbnRsHDmP5s8fKFaxvEhzkH3kekFC7Ssf8wNOirrNDerQOfwZeh3ur +s9Zb1GN9Bp4cZE7yJmnXYBz693rJbbnF2TXYLgDf27uSvpsdt7vVHLqRWN6C ++6Fma6/6zaYT8w/48WuRk3h16Nw8hz8UPHMC+0dCCqqx/QIuU5qrPnKzGnHC +uj/4e9O2RCp4jpB9TojvMt6cP7pnTTWe3+H/E1Z86PTobUAFB7faJf6OpGxK +v7m8kWBSiR+C4n/vb8bxMJSz7IaBl3whA9cH89XbjCRf+jYGng8ANwq/FIF8 +mBiH8TIz9wzqR8QewB7V6XWN2rY03C8o56NmkGGq+i+Mw/fUbUM/mZ0gvMG4 +n1VeqC1nROwQnh9Q4s1nsizMP8Rl547eNc6MJ3mkIG86x6DK0ISsy4Qj0wet +KouQ78DgsqM9VZhH4NVNhlJc701Dr8bF7fz7nq6g8a8qav1r0ZOarE/PPzeh +9WKxvV1u0dR98ccm9sPs+K/Au+wkDx2NT9YeDZfIJPk4+SlOqfUsbI+gp/f8 +VWuMmml4PGB8lui+s/K7Q8d+Fezy9qIb63uK6Uho2cJJE1+0UNHcOHHTFvms +2zUkfwb0sP3bn7kx8tWYT+A7RUhpe8ePGsw/PJ2n8DUeVyD7UTh/2PTd1q29 +nZgfqEc9RkBz92aihxC3b+FP8rTuqsLxM8TFIQ0vbkxLpmH7gnF7dvDl0j5f +Bi4H4l/XKV5y6H4HHl9op4nlW9t6my48L4A9vZsU3ezIxiFexftPU1/z9cmQ +eBXmpQVi63abvWpCmrdfv/j7PopUoaNdf993Gqrkcnc1e/1ikX1knJR1NPX8 +4aXAGx9plG72nPCN05qx/oEd/E7cESLnQdbpsJ5j6inMfuNJ7ALmB1/Zp63r +FjRhHOaTqoUGPKesyXk96IPV5AN2nSp0XB/o0Z85KlnMBXQ8b4K/Wvpsk7aT +IxlH4DNzGm/dg2eNuByQj4mYaJqbTeZN0Ley5UmbYiaSdTSsF0q+J80pVSH1 +gr4JSyxM2mvExOt6WK8M2wTeSWWvK6E+8OtHd6e5H99I9p9BT7PtAi7tpVdj +PQF816abxVeMerEeAv5jze+RRe96sT/HefhvLL8asuNnsCOIj/hujNc4fbwb +47AvskLmwJnva7txOVC/YdHH66LW1Xj8QH/mqJ4ZnKLDIvEAtzxHxVN5WUJk +ngJ8XEH7ZOEpdKyHoL/+slnrlfpJXA286rc+t+qMJ/oD/jP5cLRwgAUN+1nA +A2m70uXWssi6gPs9fbMg9az9ZD0L8nlVKdqiV1kYB3mxm3KfKo/QsN8AfIJk +ZKTr7CKMwzrUV45uyFxWhPUK+vdsQtmZxYaknSAvu/+a/CQz0i+Qv3b3XLl4 +KAvjIG9rMS+fuZ+F7R/knUOd+HLM6RgH+dybn7X9jtOxv4XxiV1wNNDpAVnv +gJ22hhp+lNpE2gn/P3hgwPGCFNlfgriiVFV2vZNZE9YTkI9wapSaGFiN2wd+ +K2qX8/66QpK/BPhX47dFUw+1YXmwM69x4j5uCa243VD+xy49uQUGJJ7E57S8 +okZMDXJ+BOU3rg3d11NO4h+w6xNRa2wemDOwHgOufily3Gxesj4Cv7F9ldL2 +hknVuB0Q36WKv5Uf59OJ4xmwY2r3chHe/8QzgK/bcOdrRXgdLh/atSVl67hd +AXW4/WAvMpLWjTyixI7AXvYUJ1ILOmjYHsBefiutFjil2Yznffi/auTp6N02 +PzHPUN7kRxvWzNhE5mXgzb8xa+ZzBeKvoL87bdef6llL4hOox9f6U9u+FeS+ +D/Q7nfFp39YF/0c+ae+uksjsXBKfwP8/i6eXTf5K/AXwM+Ne55mtKez16dXQ +oZPeLXhe3uK44NwpngbsJ+FZIhwa26lQjfejwF9uv7px1kdtsh8C8gcWfVon +505wvH594lo5osZEBypPf+Q/GYX3w1fbLBMRP0XiScAXbdazN5RhYD5hvL4P +2Cb+dmPgeAjw2Fy6s/06osewD1fHSLtYPo2sX2Be0p2i/8k/leTvAq7n4jxh +txvZTwN/tv1rRCK/dAUeV7DvCz9DV0atqcT7iiD/KoPnQdELBl6Pg/48Yyw4 +q+yMxzcJ8K+d6vRcDXIfAcr58MCrL3NHLbYLkJfKp79UlCX5k3i/s9ya9cK8 +Do8HyOcqB44ozyX3F7C8jVHA/ExiJyD/ZvtEm91nyL0GkN//si5y7fFGPK+A +vH4YX+D3oQbsl0B+pfSJ7ql7yLoY5CWXXWj/O4+AXoE8b62Jt/RoFdYfkBd6 +8LDroxjJMwH5rdUG7zTUqrA/BfnGWdL1D02riN/k4mln75zZ+7ICx4VQzv0P +guOFBorxuhXkm1eqe8t2k/sUOI8l55bkqoo8bM8gzy/y88oH3gJyngT9DqlY +vORqIZbD87MvoikWk34Bzt/b/2NVIeEH55fxNbQkM9sxP+BXdCOll4Y8Ijjo +b/7L6J2jt8k5LNTDs2q4bMJcMq/B856+jN6iOWRdAzhvZZax2HQSX4FfClqV +rrbAqgbzDH6ohYUkj7qR/EzYz/9eYLfUC9Exz1DOxDk9Uta6BIdyeFJjlutu +pP/r/3WMc2ec6lQg5/sQdxlptYWebezAegv44x0J9lMedGK9BXuKjI9OnJra +ieNbWD8dmpd8KDuZnHeAnZX11k8o62nA5+kPOOfp1O3Q4sfGFW043gY/+eaO +P9r+uh3HM2CXMiuWXfAubcfjCv2YM/Pzr3GnKpAZd73gyVkvoDMdG3gFw2lY +z4Gn7CSxTVdSO7BfBp4TF793TlKox+Xi9df1SGP9Zx3Y38G8sDJ8+PT6Xx34 +vAn6e7Tmk/zbtW2oiz5ZyIIvk5r8S3R9xbIOKldOfG7zzzayjub6D4fUppdx +Ls3YP0Kc23L+BsvQmeybgb7IRhzdHbiNjv0V6Jd0rJ/rk+vkPhiMi0lmzfdv +JY24HJj/H24W7ra9wsT9Bbyy8FjobgEWtiucl1u0IX33dHKPA773xiws2dac +xM9Qj9H5fS97HUj8BPJoys5a1QRyno7j3gkvk3euLcTjDnHfgOKx2zM24vun +OuAfPl079dTfmNgd2PFdp+8tNldJvTD+tW1XRbWEiTzg6szfuQv4SZwD/uGg +fU3Q3rkdOC4CfNI0M/77ZkR/QK8UedWiFDsYyFZSOcl7cjuJ0wwcUVwJyUMA +u1Q5uObJx00krwPfm7Y8+eDKM7JPBfNhe/0ly7zb5Bwf8F2KMQ2f7EjcCP+/ +5KgW8aOqjpzjctv7R0lBVKCqCa+nQI/UYk/JBlWxMA76/Hu2jZukJ4nTwB9M +m2itbSBM4grAV9w0l/iYTeIQ0Guz2+or50lX4X1y8OvX5iDp3xkMHCcDLqMv +cpTpU4v7BbhiRdbsvvg6HMcAnmgrd31kSQPWP8CHDutqrM5sxP0CnHF9y4xI +RPQWz5u/tqz2z6rC7Qf83VDyk21RlVgPAC/aOf3xNv5yvP8IeMMlRZXh+0V4 +vQ34xsHFpzP3/sbjAusguyOvAnQlyXkY6POG2pvWF7tIPjzgczYP/F71gYVx +6Mcy6RZLYx6yjwH627ze3zGolayzQP+tJPfZ64+nYxzGsym2pXTfVHIuD/p7 +w2HF7vJPbZhP4GNLisHiIBFy/wj0/5q3mHLXejr+Pjy9lsffj1pB7nkBbn8S ++WRo0vH8CPZl7z99qdgqUg7Mky9WPw+bsJqsF/A4NH+OTF1D9klAz4+yGtxy +A0k8BvplKuoxsPo42Z8BfTxrsPzyfakO7C+AJ+8pbR+N/Ui8BHr3Zf763zpC +1XgehPP8qot79o6vIfcj8D2zOqv3Zp5kPw3so2J6RGHyly7sN+F7C/zbm5/7 +Eb8N8amka/zd6CQm9idwXrwxavOVg1XkPhHg2xgO4+0KiN0Bb5GRGSL2PLXY +78H82M6cxpsmRu7jAZ6Twmu94WEnthfQ93FThzVPUuT+LbR/QsdkT/4wsk8C +/T712tsuV5fk+cB4rt8YLaC2qx3PQzh//wKDwbpA4nYYx4gIh6rXU0leFvg9 +qw9PvB5crsM4+DeLZyWru1+S80soR+zBlZiNVWT+Az5MDysGb8gk+8bAx7tt +aRMOsten8H0oD30bDPW8QfQZ+iXcPzhrkTrRTxj3FuW75yaIkvx/aOekLKZ4 +cAhZv0O/H6XqTR1aUYeOOGu1GC5lIqlAMWGzrXlUTo6hMDO3CvcTxuvcaS23 +pTOJn4Q4pGnkyxXrbUyMQ/3rkmXdQ4/859yBK7/YJfSd1kEWxmEcNUUHrS8u +J/ED/N9QvMKpVZX4W9BfqYRJW+cZ0fB8Bzy8EOUv3epB5jV4CkWO3PFvJt8H ++7ob/1Z5/JNOjOP3kyw9Iia/phP3C8o/fH5KidnxTlw+vpdkVHeFOlWH1y1g +T2uW3pkl+Lgdvf9V4bdyMImCe7RbBz7w0Je3Y30GeyoS5eFPtiHxKuj/rAW/ +6gN0aRiHeG2qfK6cVT6ZX6C9zZHCNwufV2F+oF/ZfBeSs92qcTmg1xtyHfSd +VhA/Cf51R9/5bU80iZ+E5/Vs3aQmDXLeAXrlI3L9UMMxkrcP+AO9cUmfcuuw +nYI/mSV2Rtj+QzvGwT9fV4iM779F1lngz+/MzNz8LI7ca4NyXkp42i5V78Dy +4JdO0wI6dCvbsb2DXnvqM3xzpKqxfYG/ubT75bXMCrLPAHEmajL1dXYk+UuA +589pbVyjQPKXAJ/Hoxb/RozkLwH+J3NoddBmkr8E+K+NURt1+qtwOwCXHNC/ +iwxI/hLgm46aHhL3IvlLgG+bmPfnmwjJHwL8Rg0rVzOE7LcArh4pMD69jOQv +Aa5ruEdDe4DkLwH+ccl85oKHZB0B5Z34IbfELIuca0N5G/Wm8U9aQ+ZrGJfo +d9tmM7Xp/9630tE9wsP0qiT30MBOi0Y+G/59zw/oJ+CvD4T7r3vcgMsBe1kp +cN3B7j4Dx0/gTxQMUiKs+Mh5ENjLVd9JswXCyT4IxCkWU8rjnD1oeJ6F9rsw +XST4NzZiHOzd58dGqtSH2CF+3wDLxW70KbkHBHbDn5d+OK6O+EOwm/SioAuj +tizcL6j3QXlq+KNbtf/cpxtGoolxdwR5urAdgX9qE383dfAeiT9AH/Unnel1 +Myb7O9CP6FNx3TW/mjC/wFPp0UWBgm1FOE4AfJZ64u60RnLfB/Cs3C/7Li8n ++aiAe8o03P+eTO7vAB6W/n6Y7z3JRwVcpTzDL0iZ5NkCTt17/L7qPbl3A/j5 +DQ2FsTvJvjrgDeOfVLX/5x4N4H6vJ4X+CiT7PoCnz7124/oOcl8G8EJ+1XGh +iSSvFXCv1azhNxfo+DPY5aa3cn6yDwnPEA9qjc74sYuPjuNhsI/9K3LTPowj +/hDsKbsiIaFYg+wvgT9Ml/RRFGHHt9f2Ow3znO6iXE7XzNZ50E0duK7r/VCl +GrcH/M0Go/O+vRQNhQ5FbLoxvRHdUC7TfRXSgUIN9NPmBNdj3kB/pJgfdEvn +ETvdxxNp+Pf9lhs0SsOS7tcg0XlTCmzrIvD5qay33+W+BDJfAE/7LLb4vNtM +R0z0nPfo/GqKJTmv7O/vdHwNe+N86xhZp4AeHnrtrnF2iIYcZDjl432ACccE +fs9vwjyAnz6qYvXU3LLx3/z5pJE+0Ti/jEast6B37+KCVc7XkfgW8Mk7jz+M +m8JAeWPtCeDeE2RRrTI8/OJBzeidd9nY+0hnit220hbNQ6+ORFnfcyT7gzCe +IVMWqRWWknU68Oq46MWTy7KVuF7A91TOV78bXIVok98uGLjSRKX8kPy6i23v +q+Q2uQ5/Iv4N5vOnA4lvR9j6CXoD9dqL7Mud2kzyGHH8L/x5ou/GZtwvvrFy +Gqn12XPPr/ZpxvE86OdzxSwenyWkHGhndpS8vWkLOW+AePW0sZqNVCAdlwPr +OL9WZ9N5wbW4Xo5dsOM8pqSVhiAdWcX/0f2xhIkyMpT+WGzLQ7P9vu9rV6zl +6k0HmjPW7wLkpbhRXH8nOc8C/ymNHjLMFGrJfMfFdz6oyXlbTPJCIS5I1/SZ +US1E7qdAXDfNZ/mjBwndaNmLcgVRj3bqyG2rU+JfB6igp8YhDwvIPS6of7am +6PGzPExcDvT3UWuX+qUlDWgFt5x9nHLQjjfTFq7MrsffB78ycCwi+se1TszP +0Fg7G1DOfGfvmD4S98J86+98paJqZSOK5I6H+OWPTsxNxdS0yJjb7fNJfIjf +6yO16ZfITLIugnmmNd7Ru2WkAusP4Izl3ze8X1mF9Rbsd2PX7RUNJrVYbwFv +vLA459sakicJ8YJG6y7nwD9kXwziF9kV5scHpSHe6MTjO2V6zQI50WrMJ7RL +prOk3DiRrI9w3twXmT6HVNhXZKHjY/VXor25VhuHTQhvYBd3zbIntbqT88pp +HN5Qld2bQ7JVZL8I55VFmbrKskh+DnzPedHWCwv+kw8D9pK0cWXw95XE74G/ +Yr7ypAuVVGI7gnr6Vii/ED7Ziox8tn0KDE/CeGCCavHgcCsCPQB+bmlW3xFy +JutN4Mm6bmTVwDXIq2tG8WPVtlKbG78Ot4WQfoG/FB2QCi8LoiNOHlIrt7wB +dE9LsLcqtBPXq8ypl7pwbo2g0VAVahI7wPuupgFF3rBe/X1WEaV++JGbpjAN +lw9xyN7Ob9196xswDvqwdwqlfKSX5NmCfO66XScd0uFeBuRBDaH7DbP555iS +8zKwl1yFDMsPZxtwP6H9AnNKos4bNGBeAJeRjU7wFSLv3wAepqQVHheyIOsX +0CvlbrGVt72JfwBcRnqiQ8hbmAfhXtsgMj460+X71AZszzDu9lOU20QWF+M4 +GHC5J9rv+5NK8fwNdufzaRbP1XNlOE7D+mX0+t2thWSdCPx9z48dt1ewHaWP +fT+dsuH4S6q79YjkxYfkPQv4HqWTmvqqzWR9B/FJ+FWX+LdHyHkQxK3rXrZn +J8SX4/sFMP9kKSxOy/RoxfoM7cxID17v005waGfcwL1dqaGtmH98PpWpJXpr +MhPzD/pQYjKONmNd4z/3DYfRo9TGdJ8U8j5P8McDF1dbfXtM2g9+/kbX6g+P +b5B7STAPPrqWa6I4rwzjEBepvDvpIn27BK9PgIfLogejEmeUYnng00PlfLPC +XvL+GcAnFDVc/LCbtAf80Fx/4bYXB0h7gH8t4333ZC1Jni3ISz47HaR0mI5M +DrdoJppQ+LwmYdmerfFvOxBPo8OWa8eTuPwPUUvL59IYNe3kfWjT9RqMrFuo +9uIze3ksybnJ4wUHWKKF7dRcgUN91w7WIAEdixSrNf0UnTs+LzLdIp7tIe+L ++XRuIN/9RTvlYb9xrm1tCbJQjUq/FjeEQL42c1u0y/lSlKlVaLBQ+yN+r8L4 +obZFdZObMT/bzU/ud75WSymt1xuXVlWO2iYv2R1yqAfzn745dro6rQKlcMsB +ftYvEhLfyva3TK484NMmhFxvP05HLYjTfpj/Mwr4J/x2oyHIswyhnfpbL6qc +YWSxkq3n+P1mV8f4QZtsgqZ9P1CJ+XnI4Qfxu0unLhAu/5cHtOAwX/10FToK +5+7nxHLruekRVZXX2ozHBb+XyUaw+M6nFnTgf8dRR+JzTaHc+1a0duqso3SJ +JIpvoL3hnM0IRaMy0MvlHUhTyW3F96QkavaD5he3uvqppXrjlAJvtKOk6j/p +S1VGqFChe1Ghra3U9XitBsfTNShQtOqV+Po/yOdh5FPPhlYqaJ14hQerBH2a +fkXg9Ype5J4r2PX5LoOqlfU/cm5tBWq2DnhmOqGPOhtFm5Y/rQnNN71gbqBF +RxeVPpUKMEcolumIQsjzNvQpVuPn+xkVyII/62xSdBK1REP9l7bRAOopy1vt +ZdyCuljTrsz+Q1E7krU3S437gzaVCW26oN2KvtIdtlbS4qnM/X+WxXc0ULsP +3i+TFWhGs7fP37X7RRfqCFgs476WhqxueTHVztPRqlnKSqP+n6nct+/tjl6t +QwG/+Ibu0mlok/jjBXXRgxTf8Kyt+6ub0ZwWew96fiUqsYwOy1ifRM2IyzMJ +02lHXYLd+V/UmpFA6dOCqYyvVFHwmY6cxywq4PK7TZRQM/p59NJYe3Tcx9qD +btmNn1XfT0PjuPI5HHn0RLPPOGoSHTEsbzcfPJPIHccmdFQ+w5VfhL1eU148 +1k6Fn2PtpKK0ntjW8DejVR22dpf74qgnOc2bHCsY1A2X0vptgs2ojltOFdde +fsyP9YwRaUabay6MyVtHjsmjiWG7KvRzaWgal595r8f4oX4+qCo4plOFJCU5 +/M9WH+Ofcl4kr914j+wT1nWvrasXr6Y2unUtX21bieaVfB6cEBxO1V2WTIj9 +VEz5qdz4slGuGaVN/LTwq0s4FRi7V2M0oRgFr3NxTvSiIcOkqIjcogRuHMKk +FBgZCosnNKMtXBzinJ32/McLeelokYb9qE9FIqU7IGpmJdtMBZ34ni80rRnN +5+KrOThKfG/uki/GjtPkuiwCmr/g9YiuzLy0ZWze3Lg4+E/tOvOgZvb6ooQb +R7UfWpl1N6KK2qGRsy3OvAoNUeJxu+hJ1OjjmouT5nRSDtMcE4Y02v7lAc15 +fe3wrXN0FOadPjCF1Y1uPqA3PHlaTclHI9841Uo0W0bXK6YlieJPC7l/37aT +0nMUn+W4rQ2d4Mrz+4zJo587Vie3sf3z2u59U7ZX9qMfITbKvScbKJNLZ1J2 +BJShNVw8lYMjukavnxzb/wdc2TBxukM/nhfCXXi0v+yho5kzOPb4PWfMHtH7 +u8rTVY7SkfmJQvtwtz60y75BtdWxDhUc/DBJ2oSOJjFMF2/9lYz9k0XNPpsR +L7Z/EjH9yb8+EfuzQOEU+9Snbei20Ok9src+cc+LeymJcbcyphq0It5e/wE7 +7Wrsny3dbvPvSGlEJg2WL2j1pdgPy3S4hg6HkXPzN3w7v61g1FJzKsv9Pn7M +Q2/f1N5MbRkh7wk+dCDg57183I79U5cnbDtcTnmH/Dh+zZDkX3kLxAzGrKFT +mWsMDkl1knX3E935p098KqEaS68ckhwh79c93u22cKJJKfVl2se8DKk6PN/M +TI4oNVlXSfXHO0t1vqvH88HrQ/LTfUUqKZHLSbtXn6Ghh+FS33ZE9eB1UIjx +gaH9DaXc+HwIpZU9D3S+WEXNM74cG7yykNzjvRV+nbHpFzV1a5o8I7UCyXhz +yoH1yztVF7e9NWQeOcDpLzK6UfBZJwS/fzhpluBYf9HVp6nBv2KK8Pszn3L6 +ixp5fQxslCtwf09w+ot+JR2tqeuqROAvZnP6ix6v7K5w4aGhIu54Qb9z3zA+ +PVJvxPPsym7rA+qHC1DUuweyxl/J/m06p79o9/tiW9/TbP3kjqMnt5zyAfeu +kB3k/QyrpLO1murqUFPKOdlEBg25cfsv0lmq4jytDulfzLSOfMb8V0+QhqTt +8vc6dMTD1UNoV9Kbl2s0X7Si8XwcvYV23bHqu1V/te1fPdfZmOMi6ML266ds +WreI+SahtmUBH682j1ALR86n+qi2I75lsX/mzklAP8ydhrrDBqjSZRW5ZlPb +kKLGsOpDrWLqYHhATUVKLaU65eCVI5NZ6GXr0KCuyijyWSpyY2MZg/qx9oiO +QVseYvV783Q7/aFylMsUZ76solY9Xj9t9wwGSnp7yvBOQD8VL3Sr/9mxUqoo +5+3vz2kM1BQcbc5X30V1LO8q9ksoofTzVVaeiapFAlf1EpOz2ihGxDjjVYLl +VJvEdIOAkjp0a6p66ePXjZTjH6l5k/9UUVey9VoqlBvQjjNSlyyv9yL5+Wvc +FsfmU65tX0XNV5aiioTtc/bfGECuQml3Hw+WUmbHknWjnxahIIEzS+8dHkZD +Nzc3nj1Mpw4J6QzZXShAhQqKX0+bdCAt82eX3ZV/Ibowo4JZXo3Opdcr7Now +QlGT3ncWq1WigvIzGV9Pl6A/FxO22LHnMXh6l1qd+zWrAUmtqjm/M+wLMvKe +WTX/Vj+iXKSeLmppRWf261veME5CikeKJ3y3H0Huz64sT2xtQ5crWUp/74Em +XHT3o7Q6qJO7Ai9ZzGhBX9q8mO+96lD7lyKdlUUlVGV6Wp7HGhpK4OJMDo6u +KneYmG+oQ5qrFtetD/qIpj1ztZ94todaO9H87PyeFsSsMFDxFopBR+ervGlx +66L+eMs5TvdsQcd+p0yL3xyF7aZw1cXjC/VaUPYjT5HYxnCy/vNcmubGaEZK +ZY6l0TZp1OzyYNcdbxoo5cO7IvrvN6HKU5aSsdcLUeKm/QXNtQzK9dOU1+7s +OFPhtHRlUl0aej16L4O93qBWNRrc2tRCzl/mcvSfeuPsZPcrmx2Xyv42PFv2 +E68vOu6P15zAthfgd7zd2JOKHr/wSbAnDZ055fiKNb2LHe80Rs2Yk00tpRu4 +JcpXoD1DHD08ozGmh8hhqUD45MBixDvrj/szlwGq67FgwUNmKbqu6uncGVSG +1F5y9PNqvctf/UQWsw87isuUo9Z3u67Gb+mhPiicsG+5U4LGmW5K0P9Sgexo +HL2dK9r9V2/R9rMxRUrbK9HyrRz9/HlW+q9+oisJ8hsCl5P3/+Qee9UZE56N +Ls7IqHxgWoMMuHo7m6O3yPx8wJWJKXRU92Bx1GBjH9ry1fua8bUipB8k0jsU +QkdlXH124ugzcu85WTTgwl43cfW5iKPPKGaNlo6+2X/yxEzH/DmSvxf99f6+ +epSr0Zh48SYDFXDXfYcW3brl3FqHVvyvvaPjx/TvqRbS0GHuuMtwxh1paLTd +ce2joU7uuCdxxh05XdQ+UsbLRMmVHH2z5ugb6tx3PmSdGHve/F/9RDULn0kM +m7Vifn5z+KG8GaZ8cwcq8b7ZvPdWfUHhpchn+OfL3bQyJMtdP4uzAgffPytB +Ym1nNRynVOK4pc9yhkLwo1wkOCjmpzCBnDsYW1WXaSiWIiO9TmdDTzoykufo +G8QVEV/yLik4sdDXXI5dwDwW/lp8rV91Czl3cxmb15DDzCtDac7VyOAVx16G +uP3oXOWSWu7dgmaaWlsdWp2LeO+cCXQvqKNO6wtdu1tMQxoX3n0fZq8v9/qp +NBxx+IUaQ+dEMyfXoActN4xHa7rRt/vuKVsFfiOjN9nLvw2x551vT94cSq9B +J/qEeJVOVCCX/IbMgsX16GPWSoadcRhSMc+6Yb+lFfldYmVkXGxBonzxQtYF +rejgHkcj/toctCO7rvHIG/b69CTHXizlxuwF/ahaff/z3mrU5qfno9TbhexG +twWYROYgoxMia54pAW8daPFpD9U3m3+hD13B83laq9Eerl0HcuwazYw54to9 +wEJaWyd+tfvyEUm5Oi4QDGVSS4T/TDnBQ0chLhz8mvMYjkyrzR7X9jWh69xz +iqNWtxx3nmpEw26GoYmGTeiX3ckTtJsJON/HX66Mjx7ZhIy5fM7k8ImOqbeI +BQ8x0W+u39bl+G1K+Y3jT4PVlWgVl+ftHJ6p72iqTPfFSmTxg8PbJQ5v1Fqn +mF0uKc3IbgfHLmB/KXHZ5uwcExqS5vI/rneMf8o0NC3wygkamsDl+TCHZyql +w4Hv2+IqZMHdV5SY6PypTSmH6n+Z3SKyrgoxTp61c92QhePzsvzs6Ket5N6c +OidOoOKi1ploBbJQygmO/GeuPxR7deTOiDzJt77+8LSru1gZJW1g5Ga+jYb3 +5xU540Ut1zKPHjxYiZ68n2Ufbx+K9zvvOizku27VgqbmcnDYNxrPE7RvNK4Z +n6/597Ud2snbSC1+qJMjkUbO3S51juHItcXrTOQgOU+cbz02jlRHbhIV1k1D +J+054wjnULx7eVxLh2norrz08NIb3lR//fcVvGVMVCcguDVoPP1f+6W0smxO ++7aX4X3gS7Y8B2UCs5FH9vQ75euqUQnXT6px/CTVuyNW5PlQMd6vGODEb9T+ +ODm/c00lqPibpmqZfSw+/5m752np8pQW9Cu8Z4aAQQLV1zllRenlRhQV8PzM +mz805OvWO4Yfrx/Dqe08e6aIsNehAt+few6vHkUPVufHezQxKP5nLVeNWXlI +tjlmm8i3RGpYWks30agRGW9yLLEfoaGdIcMfquLZ4YNGRJOTXiOFaHc0PjY1 +oU1KQa8TdgWjlMsW1/7+Xtg0anvryKEW9C09+VmcWSd64iS9sXHKKGU7pB74 +SJ6JeKILvNUSyO8f7YurSNl5lYnn76pcuUdLkwcpA6cjUZr2Pfgc53xBdamI +WB/1oD/2aV1IA/ouIcpwWE3erzNR8HJTyJZ6tMEyXuzv73pDeY6XF1BTp1fj ++PnpQL6p/5JealzWlYr7xxqQ0/acu93Hu6juaZHL4581Ue1dRdXCTgz0nKvP +Ha1xS881dVCPVyxZ/GpvO8qS9v7z914w/n0T1aVy3wTY89Xv3HFbLrEw/kPZ +clZRQS0yTWe9HLzsj9dZU3/M+Gpo24wM9jdY/f19N8BzJGd93b2+Fq19+Mlo +59YmpCmaSM3rz6YGTtTt83Yi70Wv9vBtrnsZwl6XrDcNdiD5J7tVBA9O8AtB +DuMDHA4tIPknXW1PbKaxcU3Ka5cZe/60O3mGkc1u3/XmSr2nPiFIvDuY98hG +kn+ivuqiViO7/AFxgS/5vST/xNnjvXU0G7+y72yA3nYa0mzPWcHcnIfWqK/g ++/u73re+1nnu9CD5J4PThJO3sOs9cHSWP49IPSrijuOTOr+FoWx86XbVzc9D +2X7KcPzANPZ8tOZX+9vI+yFo0p3fSjerSP7JY/O6+fPZ8u/N3PqE2PNI/+lh +42D2OuHP11W1Xux66T8rlb49pCP33xyeof7dZ3NGhtnxG/CMf+9o4vj+N69p +yGuPy4xWKh+fKw269qswJpH3vqpMjUj55tKM6ONWP56+iYX5Cfw5RDWgLmT8 +LP8z4ywdRXWp+v/9XciZe9YOvLreTPntpGYNFDKQ1dRc2QkfWGiLyeT7x5Sb +qZfe64OfVtSi2/tcY2rUhim1bWlOaanB1MSDrz9cYK/7ZX/eoT3176PyIvT2 +f2PjxdYrjy7WqEXXjnaFaIp0UTdbnVVeJgVTGQ7Py+5p1KGNC2lmUwebqceS +042C04KppLS9q1d51qOK7Cb9rYUMyiivuzGGLZ+3tLWxeU4jOvj569f8w4XU +CqY8fwG7/KsXW6zWRDDRhBmXMztMs9HebyZHD2YEU6aPj8++uJeGVL9XTx9N +oKPMZL1xN9jlmPibJlwXpCFGbfU5k2om2r/K/GUkuxyPhxJPmevZehJmMbnA +qQNVSS2pEP0ZTPFF3ezbf6ACJU4LTtGR6EXPhiOuFrLls9TbF3h4liD3bax5 +Vm8H0ewtVoaa7HoDsm6/n3w3H+klx3TkrBxFWUUWGTzpwZSkeda6g1pZSEp0 +5s+MGSzUUHt8j/PGXFRcLjEc2sRA8xwDutTTX1MRw1PWJwtVo0+f7bfuimPP +d34XC+eta6buDxR9XnG2F0324jk7qYCObpy9lcx/qJZa+11LeiS3B41LTT4x +TYCJ5lwbPfCE6qQMTeKmru8bRLPO0uts59ejOB9n8c+h3VT8RrV984UGKHX6 +0tjW3dXI1dPTZiirgRLZZ8kjOrmHWlnumCAh2Yh0yi7OmWjVjlL175+8/7kU +/XxMz9M1pKHKbd0j7Wsr0UBMQmuNRBs6zcvcbsFoRJvz7ML+/n7riefmk2/k +tyKeBT18WePrkUTh+/a1iZXUU551pvJ/utCKSXdXWU9lIVmzm24/2OshzUu7 +Ty727EI3H30K6F1GR7V+B5+dF29Diy+ZG4lM6EHOynYRSZp01HCLv7v/Vzcl +kPt4xjqzAbTs7bE29cxaFCPyJPjU3m6KJh7J/Nw5Qo3a0WecuNyL5OxEXBXD +2qj4ojn8I9sHKLXu9YqS3t3o/p1vb5e868Z5TQtunPois6ca+dvfj1Dz76JC +Z95/csi5h0o9t2vTgGY16hxfN2t1JTk361uve+K6JB2Fq9i+dLxXj6I5T4o3 +xDVeuYSG0rXD+3zcyPvFddaGDAWU01CH/n55z4FYSn/+MW+nhxmUxbfVna/1 +m5BHzfHt+nQ/bK/3A1w7PU80obR1Tw9dTnuA45O7bmuOTG8m83vNujUfTKxY +KN4miU/RsQlR3PYEvFuXYyLfgKKXr79h9qgODZ6lK/793U8oZ0OzobJYI7kX +Fttiuo9h2I4GGJH0W0Mkv0gpe91SS/4uJO3rFrrnQAfep/LhzDvIbuD/cfXd +8VS/7//1Fm2yoqQtlZEVFbnKSEhEMjMbRiklGiQpWS0aEkmyKqNEg9wkq0T2 +PoNzjGOdYc/vi3Oc8/t9/vLoftzdr/u8Xtd9Xc/ruq/ndT2dVvpDgMhjabpH +NnHqOnZ/UE7foE8AqWL5S1cNBtn5qC+GThk2XuTUGxdeQ1eWezaCNtqGW90N +49QLXv5Gv7VhaR+aDok1y6D2wHjN36wjW5vh0v0NCQoR/UiuUfuRBD+B/bvY +9Upl/lth+YCE+aXmSrPvc17fmz1VVlpwC8/O+yp4rMBdhen/gFVmhXt7OHlf +U1s2DIxi4zeDEva0kDh5X6sNvkXyz+r5NdIJlfKcvC/fCfSMFxuP/NApxoU4 +eV/mgQ1cs+ukXMnR3vuBY3esukt/+j5JRjrG27tmervZdfYDn5++XY3Nz2ke +0r4lxfm+LhD/7UVoMvDprOT+ntQNVSz/cNeD1mcPQ5Lh16raZbuOcb5X1rfL +le5BybDWQ1NuaTUnHyzR5Hx8DbZPs0XTb/4kcvLB+h/vWeuFjW8xYDw8d5zj +l03rKJ+qw54bffmw3VfEyQdT0Fpm7/sAs6eDZ6YWexLYcj7//Pt6CrGpj8lg +WvxsV9VSDJfu89yZ70SFg9Wj/oXrOPxcvoKOdqHNw8ClfeqkrSoBUMrjqS0y +PaDqduyHq0EFBIvajUnFtkPFC7zbbL9gEjXo88mnOIgaP7Rg5AweeGMZE7Nx +gEGbFYu0MscR17sGylM7IuzVSKt/sLQf1r+mtPEo16Gnd5fu3v+5DRKyrdZH +n+2AW5dKx0xqiTC51ePTZTUyoMoigzy5PjhhOeGpUlEL1dlOZbh/GD4RDjzW +6PQF9k+V15IE+mDn00dW5Iw+qJs63q0oXQe+cYwAdds+0KtYHmpb2A0Z/4wK +//6iodPq0t6qr0dhCelbkedGIlxcq5052w/dKWr7tt5t4+AefLs5Nhz7Tqz5 +55nz0bsiiyiZcTLERVLtG77SkdQ1UQ/NJaPohEf2uy5HMhSsXOP6nTqJdmV+ +M9n4Kwm4Ozz4Rq7Uw8tdpg1PE8dRa+cqx9nxhhn3zsdjDXB//52D7jajyOz5 +ssHZ8V2Jl+/EmjZBMMHEW1F4GHnG04x0ipNA/vE6/ME7zVB9LrOEt4yBNge/ +vKGPja9QXLqZ93YLcBfXunD509D1j679W7F1fuPLL4QatkJc0tXTIZf7UeOV +K0m62HzNXbF0ErUV8i7e7QwldqNk+zvqMT+T4Na154Pbz+GAkplYNnaUjAq8 +VePUsfli+n2LJEtwsJ3MLdCWQ0BvhxUXbcfWN/J8fbl8GR6qZwJ7La+WwNLz +M06NOUlwQuuCitzRbhB+23xtgX0tiE6Gq+Fzk8Aiq+nt2S1dcN1A3jj5Lg7o +n9dlhaMkuNSd6LSN1AHPbfeJvcTwi3m64EMn7Llv6ZpdsW/IkHEy7sOWs11A +nLlpbZudBIt5BMRxriT4kqm8S268F772PVR7is032hn0sdCgHRr/moltKqKC +fvaYyxZsn96eeafjrNuAO2e3gQIfA1z6w05+yU+CcVxJo3EyEYz5w6tdzIeg +insNYTc2v9E6KLtNnghexetVkmJHQGGP6xIjbP2fAmoTl0kEeB9gfP06ZQz2 +hOZK8PxIApCqcBNOJ8Cg+tGLxYqTIMLFHyWAvU8b4dNxksEE2LDSbp1Xx2c2 +HzDSpoIx6IqHd5VMOX+WV7JzKKcNPBRVLcP1yPC2Q5GnVZWBpDfoHNikzIAV ++j90lQVJ0K8nata+n4GKNxfYBkczYFd53FrZbSSQ9HsfxzhMBXx/gKX91hF4 +q9l0w0idAOFHtp0fkRlBZ9NGOrf6zaAvY7KrTK5z6u2sWvzU38mJhrS723mj +NhNg4bCpSNveGaTRLvZF5GcSsrxy6sj+Q+1wvOP9wgHvaUT31Wn+ieEx95j/ +7B+ZtoPglMSBJaYNKOlR845ZPLm8KyW771I3pE5Pxspj42fy7/7Zgb3Ps3J/ +76/Yi/np71O+SMo8Aokm9aDSo7+QOm3ZyLELeOiQVrqz0GcanstfFDEvSUK4 +tgVCytzlMC1lRyR4T8N/AjuvpOYlwYcXBpq4cwR4/eWg7qKCJPbfKYuiG3/2 +UOCjgLb7j4fhsGfRwRKLVATo326PN88okPdg9FOUKA1GQ06b3qFgOG96LP/a +GyIIq9q/v7qqEBQ+StYSsynQbhkWUIHZ90OVwSe3p9BRl8/YgyWTI0Br/2HU +KMPhQ8mZG+R99xtGf9JfkAt76FB3v7Dh/ItkdLxN5+XLC5jdU93O9ycKD1yt +Ih4z6gzYKL6uLzB/CvBmg+JqugSomfCssa6gge4qrpJjp6bhTGCSsT6Gp9Ke +S7vN9mU2mrrRVx0xgpI8wxRLbzPY/ovNcAuKPzyAjt1LPLaZnwy2Rkz8+XRm +Dn+iCiQXbXu6F7NDylsoBxLR60zVdgsFHPJZtSL679FesNvy6ZF0YgJs/3N7 +49WIBpRwTOZBSBgeXEfok+qPE8Bmo8bj0FcNYFCGz5261QPPuANxyTypIP/W +bvCbE6b32xlVfyJ6gKy7su74uQ+gJvOcMj2JAymjM+u7wnqgAHMwV6BKdl4T +w05L4q4sAUT1nlydxrUjh6xz8tbFDDjuWD/U70sAWcWhuOoHnew6ITa5yssl +LnbB+7xzIYePNqD1DrrbFvBj/s6+f5rnIihwLUTBiRJBRGlPo/eeoQxCy4lW +xc2h3fC+ksvUnIsTX7xYVOS6QJoAl9OmjB9i/q7gFfNlRY7DcPr6/mhPWTps +q1+xqFl+iF3/x9g8qeJS0zBcZOUNql3N3MudO4H6blqsPX6WCI/H9WxkSvuQ +77mjl7NyRpHnJuNdTSqDcOyXxZx9+ckzPGtfkKJUZFzNCgI8NmDi7QQm3sbw +u1TAkAAB8pY4zMlbuc+cvKHclTekEhcR2HrgFVMPoM6PU4aPMT9x216LEnxh +EoRvtL4ohvlZiFwvE3MWD78WMeWctnhOztFZbW9ZjXN4kFJZaaIl+xWcPQ/7 +7CtLQgeLtqaEncaDCZ1LquVaCVJyeRewDjvXBmNu8RJGFLBNXWx2264c8bnu +VBbD9JvugsadNzH/y1XLUfIgOYPNP73sy6359gkFEmSQwePODA5/5NXTzWbY +fr5l5IyXYXqjJNA5ya4oCST3fSOVVdaCmV6xiOGXl4BLK3uddv8fXGsxLHxk +2QN1ZUw9IIub0wOQL/ChekM5Bfrqet7eNv6LdE4c/yllTwP1c3+DHEMwuV9S +d+yM8RDS2z20m9bXCytXKRe6NBHhNzMPDQRFXB+M9fXDJdxmmWcf+9nxvd1d ++08dr6ZCy3vdu6MXO8FOqcn38EJOfRtpHh4hrnWdwH9vScS6Dhp601G1/tjQ +IOjTt3dNLSfCBoWHSpMWI+x8J6MK1xklbyIIsOYnM+cjg4m/M8fEyNCqJ7XU +5E8nOx6oruuJX4vhXtKvVIspvWfo+cjKMuEdHcjvzxrfwje9cDSdGEqfmYGe +dc3U3THJiK6/ZobX+jfUe08s807thW8+/COtiTRoy6uOK9iOrVNyWa3ibQ9w +LfWXCxWjQmfJIQeNDQTYEZqjaHmnlx23WyD2zfKSCqePcqv67e0nXKcROWx7 +zCdPItuOVDDtCFrR98+5aAuRna+Wvv4xeSSUhqhSmsnCM13g81fC/v0KCjsO +2VF5587djyQ4yT9QNfiVw7cbeyfi4CdCAsd8qZQF2DnMGP44eut1MgrNPnq5 +v4HTl3Cyq1nbAMPVXrfujhjHt8Ou8f030zC8pCrBnV2O2ZG48Z5Bl+ucuigB +Ou61O7H5G+Mph+mWJLDSEuc7g+GlvtEe3z/Y/BANvd83hTl1Ubru4vM3YPM1 +x21/DbuQwedXwzJlDC9F5e9dEoPZrzPPnngQeMjw77xWEwXzj2LGVke9eJWM +7jwYsuj72wESFz5lN2J4Sa7Lji8Wm0/W7kpbeYxTFyVJ9b9hPWx9eZpaM59j +F5x68ma9jiEZeVGtX6Rg8ymbs97oNnXCGo3rim8PV0Gxyvvvhdj3DZN0l5Y7 +iocli2auSt0ogeDfn9yOYOf0qajYyxprjn9HsHd17wpPRgVl4Xsu0XDw8HGm +n2UADoTurhx9W5qEhI+EZP5ZM5+X0gMHHjUsDcLmU0eUt0euxEGcuMC28Vm8 +FFLUP/E3CWnRMtf7XcRBwNitThkMF0k+Mjz+HXtvcrTLx96UcuqiaAqE8/Fj +v0swfZe3YUE93BHU/XYFw0UwarQ5FZs/aMUfXH+oEZ6cZVx9fn4C9nnm4t5g +v8suXl6gIbEKHj05qlaF4aKvf6M/i2G/q+Rs+HT7mRqQzWfKfwpT/iG3c4vO +dTIe6LuT3rY/6GafV8k/Vg2NJXi2HPJtmJNDWDaV4KjsS4VlV1bsHn7WA38O +2ifk1Q3AV69LJ/nXE9j2UZBpH8HFlKKwYR0BPptkm77l4tQzyVz/Q+ngauy8 +vGHal3znOfuCRAoin/j3UIEWN7qz9mAiOpKen3lRAQeaR6vdLRLxYCT2L8A1 +jAL0DW4JDqJDYHRy22ITEg0uvDWfqCwZRFtvUZ8Z35qCgOEIv9EFHXDohoSu +l9ggClmpF7b0wBR4budf/FmpA7QevvkhzzOE7m8q5vm1cxrudawJDlnXAd4s +u5bJtGuoNbXgQBudBh9JTH3IZT6nD5GFPt1/ti8kbhsz7q3NjHujpT49u99/ +7IW365h+0LnJOT8ISd46eeGiRi+U/LH61NXQgk7E3F9n3k+DJe0ZUu3GBGhh +jZsxx5Fl0/upjAGOn1twtEi0C9MPbwfddjxTocFLx9A1JzUb2Pnhv4ecX9w+ +zeHJ7mTqW3SN4ib3QJzA9uMCmX4cuq6+JNHjKZ6NP7M/rBHp+9SC5J3DhGLN +OP3Zta6Et0lEJYNowf5O3/21YMvSM+x6Avwq9EJPPJwoZ+ql+XuuwE91sQcX +YjhlUUudTwEZ7P+VpGf9psPNAK3NWnto4C18o9f0XBc7n2uZkdu9Fw9o8Drc ++nlxIoOVDzwEIWU1gVKnSHBQZj3XtRYGu96Fw96BkBwMv514Qtw/xTeMJJn5 +wEgwPgNOnyPCDSWmPM/zoc1mogYkXEgA1y/t21TUC5fP3KWt3FWB/s0UJbSe +xIEs1Us/lzKGOsSdAmfjrltcNhRAQzv4qpprWJsPIe76pqBZfaVfMrz38zsS +KDnhTKWLqMiT8W66GJtvKSlCvNhABg9XUHtytgspT7S5fsDmPwkULLln1Alc +Dw9lnQnAocnGSskKbL6Fv5WfU08X/OD9eCDleAPY8kQ4VGPntPJA1Jdbe/BQ ++N7iqIghGbR6jBdG/05CAZchaV82Dhp8r5i1XO4HH1KJiQq2fhgt/nzT3VY4 +FStWgelV2NAUkXEaGz/+8Hxhw4cmMJkgvXGxGYUTGanbBDF9ZRpp/id3Sx0s +u2DrnEmdhPvNjtWmGM6/J7ny0EjrP9Cl2jg/SKVB0noJC1WncQhYuq1uti/w +Ghe51y+VqPCC6/3qqoRhqC+R309WI4CWFRNPVqbM4UkkL5V7e7CpC6h9zDgh +u3/f3R/qeaUkaND5+WroIAMdXfjvrokRDd1BuTE7VxIhUo85zrPt2orKUSpy +s1BRHVlMhLAvbqd1pvtANbdug34YA91LXh0i9JYMDleY9lcHf3vW/iIX11Cq +xVYybF4jPOY3Q0Mi3c//fj83AIVcaycCvhJA76PEtbuRNPZ9UIAY15PwchLE +m2lY3XxLQ7Ea9/F5Y9j4kk8jyu0kuKnHPfK4jIZWXTgalCU8iAo37/FZO02C +KA3hTMt6GpogKraWulNRdLxE7aGrJHacauNRu/UBm6nIYXzMn7KgByR9ov+u +PtTJvneaWlkUlsVDgGMgo9YqQgPF1f0mrxbVoLzYGPIBTM853bHyb6cz2Dg8 +oD956YoAEgxNbi8KkRti5wm3lW2zFn7dASmvJFXachlAurvJSiN4Gvn3u1aq +zN7X0eUsJLy6oCbgrMn5XwzkdWFlc59aJxCtsw8p6JVAj3t7WI5vP1oAFVaN +bj2wmrrEpNu1Hn2SX+NweQENlHRs7EUPECDgEjNOjorm4uSos8Q9rdyLDq+k +mf5IaeycP4LuiEtZpaXj4cJ/DrslznwApQKhlrRxHAqS7V7gkYyH5Vdi5vh9 +JybFZ/l9oOzlvFYa82MGXvH9lsLwisnHruG+YDqqGBL/uTGWUx/g2/3e0vR2 +KsqmdHMHBVFAUZTpv8/HOz8E4j0k2zl1TX0eRaR2JzWAm+YSnRRRPPw8xMjf +l/SZrecGULirVCWn75VWwbODuZM0WPo82r+jmAqwsm74oNEg2vZzL05yagR0 +N02Jy7wlgdm50ZRbRCqbVzupLoxeKzLAbeC0sfDxZuDTuGDq3klFPy11nNru +dMP+WyJJDpdb2HyXQJ8azT7nbtDVYe5n3n+taU5U/tGF4RAqcx2y5tw6cC87 +/lOaAhVe3Wauw66Tf9w5fFqbCt/wuTE7rLvYv1tP7f5LW+EO8Mv0VVwYzOGB +dm4ePbZqHwHuhXttOcZLY8cpi5zXD6zWJLDkkoH8ln+VU0sahDW+G4891CJB +pwXpWsKuH+iPR4Hccste9OK0XW3gpl6IlMpRXVZHBC/vQ1L391JBKGMko16k +C27W3b1tFNwJH4rGUrm8aTAk6xOxvqADLlAC1R3JVUhccW+n0GY6Iuylipo5 +UUEv+35csy8FslGK64KwRohsHt87sRUPC+tPDQSnUuD9M8/iNuleeNAiSRrm +w+xjs8Tt1fwDqMS35Eqb8QgcMu44pE3n1E+jUhI1bCZrweHYx5J7FTjgYe0f +z9w/vHYLrP4tSIALQtuPF8YNoywll3/+/VPoTYGWCo8HEcr6npl/+UZHb/s2 +CG+dGkerfWuXtb8eAhzrub+Zz0Ub/+nrW/zogLb/rGSlUB+q8dlXkzkwjCyP +rIs8Od4BE6z3o898Pyg0sveapSgBuJSZ/s68PKQGrs46s5EA416464qWnfDk +g4sIrZ+CKq4cPhyK+aHFO721/g2kQ2HBf+sMPdogXYAksiWhB9Zuk8mOxPBM +3qMDG9dh7+FIZMCWh49IbHlSN991ebx6EMmUwbTYYU4/rFjmfSXKTjd5KyTV +DR+MYtcsN+9g1X0aRIwdxV+NbLqgV6+j8/ZTBjtu0CEdyPhk287mtQW2Peb6 +5EGFY9IBiu/utrPzGY6Yvnc2EpmGNzyMt+cxu5zDks/5eP+YzxYLrbWcPNKM +vrn7dPCmZnk1S/ewcU7fwdb2nxEMONASpBehh/m5rH3Ox90/TFy9zP0cWz90 +X45l8gAsf/qCT7ZtCIqn3B68xOTcKkti5ylMT1AyW6/yxzciK2mnrFUF7fCs +9G7k3iVVKK+O+mPfKio0CNju8NtFAF3XsmTS+zZQ9LsX8EuEDmEVAo2hNVTQ +qhisXKtHhfDOq0ujtkxAWv7dDrthOrv+58PS0608GC769cSl/rsIp545QTHp +jMOTZLgYLf1vnxiFld81ifgOfj5oho0HCh7hl/gy3/dwFP08YNgrj43ftjJZ +1BXUxD6PkQ1plNXY+i9CGndGJnD6p9ByTpkIY+MBBAEd48WcPguPbl0QWoWN +p3/X3f24BsfWn0677iedx9bHha/V6FXHs/10tUG/1bux8XD7z1a/NnLwnEpz +J34Dtg5h9eNQgXROX5WqOBXBt+HJ0KMuc9RRlcOfXbqQz80aG18bIrp8pWob +W+/sl7MJxfwmqE2VPdC3mciu3zTuvkfRGXvu/r4rW8WTOXUFn9ob7xx7ib23 +rGKnVMwuVGzUU23f1olkhd4OfsrE8N2CvNCNU3TwY33HEuZ3RF8KDevJPD1Q +ypovzZwPwZE+NzVudwGF+XuRpwOf6gS2fm67C6XDAv+/egMFL5LR/F7exvJb +x5EzYeaWJrZPr+V6h2qVGln3X0PIN/Jz3Oz7X+V4zSY3nVNPIetqsMcmbP7K +iqAt0ec4fTE29pNWCGLzh7QsGlb74Dh1cgoeuh/H5i/UFQp4JYhn81G1HJO8 +RbDxSzoH8e+onWw8L9KYv1MSWyfuSr6M9wUyOLP2z/M5LXQPNr5vg9fwzi2c +81g1YtYph42f/37k1eYwIkyzeGRiUsM4/ln5Ic+MhDdx+jKcbPdom8bezwWV +QsGeO5x+di7NxZlH/cdRaMWncrsFXex7vfFPNibVpX3Izt/5UagMEeIFqD8v +rHuN8tf4x4p5UNCis5MzaWm90KzPjG/M/y0IlBwb20iEtQY3j8WfoKN9Oe+9 +gt4PgxdvsrfQJiLYJ2bU1BqVohO2p9ME1fsRzfajmGc4Zq9zSzcPv2uAldPb +ZdPTqdB9Mnh9wxIqvHH8zTM6QUUJspYakdtH4VEKwcx3FRGW8Z7Lqb3HqR9e +7nXQ6vYpIrxizU9hzkf7whIdi1U7gHulZrdLdgNcfhc8GfaBiqz4rRc9a+T0 +j2t9NtNJw97PDtGph4sc8HCMtU8j5j5har//qaaNnD5NvMx4Plx7ADGK1A7Y +s6hkahsJ85sfWOu7HhgFTS+Lnt4DnPoJn++JlBLzRtGa6jLRdmMiSAiteBBq +xOH1m67pOL3YgAiNYs56wusH0aKXix7HGo6gpPS1f5t1iHD7KtOOLGHaERhS +tPp3LIcMQ9W+6Tek6eB2gmz3uKsOyk3PqTL6CNA7vD9rzWQHaJcqNPGmNQOv +9X+rDhNJcOzCmYgOpwAUPvoztf93FwpY/jxZ6Xcv7CW3MB5YD6EHg8dkooe6 +wY6/HLqDCNDPfT/iRc0QuhehUV+zsQfG3yZuPIEngKWX3xwe2PB8ZBYPoGGN +mYgbWzj1Xmy+tMv4WM2AesX5rQ9zGFB2+9SD9Pt0KIglcXlkz0D0hx7Fn9UM +dhypN+TS4Teb+sFuVXah0wfM77ha0v3Cj44uJsoW5nzqAw+hyMxd2HhgxAaV +6BU0tj3B1W17Mlvveubq9t/E81Sor/rzaVdWIxq0iHA5G0eE56WLnz87NoQE +z+v4luWOA/8jnqv5Q5i/maV9nhTJYNddkUyOhxZuIriGKw7VLOPUE6CeGHa4 +O8Sp6xX/SmBb0IUxVOnmlhwTOwgyOM8xwUzMT7z4UiOhcQxZid6o2UsaZOuN +DZJjR2TWjCMNUftSrpVDEB8YHr/7UDOsWpbw6U9kP6zq6Aqs2NQNv8eZ66y6 +P7cOyJ8ydrz6k4MnRJnrgNqkvFBMTAesJ+UOcj/qZ+O9iDhrwdMRdAhfWrAv +saUPBEQCOsgCo1AiXnpI6BIdqEeY311kbO67g/bqo0Wvp/GQw/LfHZn+O6ry +erYsJrUTiu84Pjqjz+HlxMn5St/Y3wXWLHsqw7SnyO9taYLDSUwPs+Tt2tuk +FhvpZtT+JdTV8jAeRlnyeZ0pn0iiZHPRIQscrH/EeJ4iMYxqpsqPii2cAlXa +Kvr1I2T2vUB+U7TWgbwJzEVvJ7qKkGE4nenfhbHkK7f7eONLMgG2HmT6a27t +c/4a7LhjV0coJsBqCT/DQCc6Uklo/n6GewwdyFP/mFhMhqwrepSZwW7I8vkm +HsbbCsNhIb+TjuNhwwmHmdhfnfDPf0eso149JJ9Z/F4kAvP7WH6iJNNPBNGw +AbvIhUQQOuI0FqrJ6TtTx/fZpWwNCTZ9LVh4ZsUg2nq20qgvnAJke1kb/8cE +uHmv4s+YdxfYt4+MBL6pgQhc+fGbNiRoiTvr81eDweY7F9S28XladwDPw1Gx +J4sYKB3XFtlYNwFGNu90hg92sO9HvJn3I5Cpy0PIP9EJeSHxMx9XpqEldfur +mnbWoTrtC6Q7a7FzHVBhqLNsGAULms/slOtBW4p5Fjza3gbqz56DnhBCPmkP ++cSDemH5n53kcSECfBMnDA1h87l1dNeTjHqQWzcPrmNDG9y9u+ZffVkW8l4S +LDMSN4DkpytTlxn2g5GE9cDYKBU0fjlqZ/pPIZfnX4Jpo13QWppnpGmThkz8 +NgeacdfCUMwNutg9zF9zNbVaqEyFmlOiXWtuTSA1y2f7Jay64G/G5YzyzkGk +JXuDW79jCraMJByJFuyAzHOnBom3c1EOTcW4XoqKeK6YZlxI6Yef3L1fFlgx +UFT269dHuWlwIC39a2pcO9Q+OPi4xWMYdeDzY5r9pqDlQPLL46ZkONcguEnC +Og+dOH3dvSOuFzklC2TnLu0Fg++/cvmdByGgvEDInzyD+Jb/+jL9e7Zuf3jv +WcwOLVot2utdNoIez/B5NXp1gOjzEarTNipsKXEpv5VWCT2iwzz39rUB98tt +EUGqAxBh+eynSt4/OP6nSeBjYBuMZhQ78fpksXHWIo+9hd/6e8D+JXOd5V/m +1kHWcftulm7AwVQkc52XzHUQl/aLOPJOHDxMZa4zjzs0vj7j7pnCQ7YL81yP +SAW0777ZjSw/CpyLqOgFrwF6ZX9LLMRtyLfq5u1Dn3SPXXGu6oV7bnX6XkIU +JPftM5fB2xHgGVM1F5/sBHvcyrFjTekQ9PPX7oT9bcjZIfdeHsKDa8zIlz7F +arTby/A/K0U6rBgun6GL9sC1oTHpyOwK+HkKfy6Y1oNQ4AkRwyWYH3rhh7ZV +Yzr2+6S3m5q3wSB9r7tifA+UXfVKifHrQL1Zf81FMb3J/UljRUoEAQQiLaPv +xH0CxTN7HioDGRmduyQi24QHZeEDZiKHekCJUPzmrHQ9qq75aGEc1A7VaR/q +TUN7oC6QcWo8pg4co+ojjKg4ODhQo3O0JgO1Exvpe570wJKoX6uLeAkwQF0Y +bj7FiavUWBe/MDPuYNdNnf8uISd/h6MkCjvPbD4fefLogZuuOynsf/Mx+xAh +rohrvik+7RB1csFvw0D2vdWBUB8d6m3MLudH+n7ZrU1n81ZMVyXLxDoTYF9f +YFztdfZ+8nx/EI0+iYywn1uU+isrqGEA1SdqWJS9pYC8guPKm5tn654Y/uyS +xfz6vy8VZ/36U8IBZodq+2CBo2jIb+oILD8dG8B3gc6uw9D/pC3Z6GEliAUp +Je/0wbPrObw3O7qrLboPxN3+aAks7YMqYcIy5+pMZLXrm0ijwl84vGRx68Mr +HB6QzhLx+grlSvg3qPKxybgNelh5hquYeYbIvON81XszItitjdzXcYLDyxRM +j+V9eZjMth8GvWX3k3pGUdHk06SoCjJ4yfNcqt+I6fPTm1ontUZRRNclKy75 +Dta9FTtegRoTPmrI7iKCNKuvUwyzrxOKEXLweVqDBx7nv0tm9x/3ROr1k6RS +0GuJS+1xx8PpgbA/23lKQPt+Ci0Xs5M+C/4z5LnRz85LnP+b9rC4tTCQzMbn +mZvJBx39qXB5Y+rw4oYB+MxrtvO6KQMdoSXV3n03idprX/9Q5B5m4w9TnEC6 +7ZNkdMHq6I01ct3gy7qHpTDvYRGYGxZm38Cz88SW7HGrzHibjLiXq2fJt1fA +0PqNTiXXqOzv/9bT8Xb5Uk4dBmPX12aTmJ9F7vS5/NCaAG46zPNuzzzvQGsa +8cn7D5MHmQBh95RPbN66tXJgbNtKAsRNuy9dXPYPSnUbY7Sle+FDSbxS+lUK +1FHyu3Ut6Ow45PbI5Y36mzn9nXWZ3wtEf4i9S9hJhIr20YiGBAK77qVOsTP5 +yi8a3DHJGNQOS2a/j1C1wEP7o/CwxPJvYPTLN0CqcNCMiKpB8ac9Dx8NwHD1 +2F5iLNcbyHa8WB4RVANc5MZDzp49sE546OCjF8kQk7DA5felZiBNjqu9C+iB +LNZz5+MD9/Z9O6P1rRtA23jHWVkKO1/vZafwqruVNCDXvdi67BkNtq3sDxdo +noJS6rcFD64wwNZI/yIV6NByvIdRlIPhigO/0nR0CLC3IGPvg6NDqP8ujvJd +cwYd2BuWQKdy+hapH7bPmDacRns3VasYvBiG+s2+2qTFA+z82JsC4vzfLg+y +5X8+HiN3YOPYQ+w90MaYeXrv5eby9BB1i8yHJzwkWL6mfTCoLIztfww4bnxe +ex4PRiuN9d/Zl6NWy5S42rwktHTBU+VnWzh9fxSfKuoffJ6Mbi3YV/LnMgVc +d8lFS/7LQFLMvzDtn60QdxYPuFbS3PrzeVC53lT9kx8p0Nd6p0zZh4H+Gij/ +jbjUA+4Lwj2rIglgHnrntcDxKpjhyeeyJw5Ak+SFp6u0B2CYFTcgbO+y6okZ +gNf+76wUgrtAR0RGJ+9HO1iOuTcZfKfC5tjUtwuTO4G/5jKv9AIyVJQp1rzu +o4JafWUpxawTelfb9jhV0djf0fKEt1EdDxHWsfxETaafiJ6aeEXdOUCGRo+J +MwtNO+GZht8v9eYelBPp3ZmJ2Zc81rn9wMzjRdnGH/Wl8Xj4Wzbdue1YDBpZ +G1SaotmOKP3iaz1v9cIyW+FlDVov2X1nvDNDrgU+7J2PS6BbDn9NpbH3+V/a +GbVUg3Z2nGfDaHDZv1fJqFbgkPe/M3jIrBdXW/6CU3/OyvtU4YP1/0/fovW3 +9ziVj0C7/J5RF2c6rHbmu3prxch8HzdkvlguefQqERxVeBsXSzDQu1KFzZG6 +k0gtuUr0OmUItrPy2J8y89hR/l3Vxg3qneB+hFHpQsSBNEp8onKOhh49XTz9 +ZGM3uKlOTMzykspjimZ5ScgTWg4HFfXCEuKZx7JiFOBj/kXbR+j3VpVi/ov9 +6evX3nbDr/ID8p2+BCR0UtDMZAuJnfe7lqQtY4/psaHk+EyRs+2g+1CFODYz +g4LXwsaV2PuRjcm+G6jSzs4Hxh+z0NyHzSf2bxd5OtTOPi+/tqPnm7DxSQmJ +Rrt6EjvedcXE//A6bB0BKf9sy/Wc/u/W17++3IrND9s3aZopyMkL9++LkVXF +xuuC1AxnnnSy42A33xes34Ktk8igKoRNdELD9edb+P97zI4D1X0t6Ym8wskT +NlCvvvoiIRkJC/q6c2N+fRnL7heofFw3jX1fBpfnUJsFnp0/fJYa+TIuMRm5 +mDuJue3k3I/XG+mbCGLP/fU+1FCIn3OvWlG0yD4/ORlF2e23o0fg2PIhv3n5 +fZvwZOT8sO227q5WOMyKpw3u3FpYF5OMuoqhuexJC1t/UdpBNAebvwwfba20 +gFOn6N5ujXJrbP+hUltFO3Xm6xWMA/f38ZlSbP9qXT9/akxUg3GOy65NJc/Y +8jvDPbXe2IECUieZ8j8fZzJ+eGXHyzo8vINCro/+3ZD9kua8U5EEx5ymLNYU +YHrjcqqS8RUi7Cm74aiKp0HMkfBOkVQqiAkaFIVF98Dan899NeOHYCrd/3vl +MjrobAnW3ubSjagCdy7wPxlCotr0hrziTrYe5MrujF61eQhdU3Dd9F2QDkvj +p0/dqMCx+TjiGkPXgywJoP3/rwN+2wu3HskigCyLH/GcyY9APqTxcaELHP// +1LOFdpppNJRMi9+2UIgCN/uZ91zrFObuuVBBGJe28Q0KOBm5xPLy/EHBniV1 +WSH9aNpnW9AKH04fiI875vQbOr+xXXOBMAEiq5l6bOXfOT2GUuI/m832F9NZ +eMU93aqDLY8JuIuB4z+w//8zOyb/bgc7/tfX1LvvnSceull+sREzDoOMuV+n +njDAwxXzphL7ymdsvLbwlMxiXmc8W44jSreMqszKufs3bUtVCmR4MeV8Hrfe +QLpy51R6oGc819qutxtidgTv/mXdBQQ/m899Y5w6eC8EJFN+PqbDqtxlsQ4C +NNhUUN/WM94FLuuf8AbfZoBWVpUI92sa1OJ5G0LyGejUInOX9GXDoEcQ01F2 +xeRlaVL6Dg8ai281DhdjMjxb7nWw+cPJ26POtSuMw+dHZ1NDarDnVH/5tSad +AT7HHv9d9mIaxLMz33/VJUC57/W+K0NDqOht+dtUk0n0KkbjRZ8LEZYvY8rh +QJ4C/iyNhKZ35+WbXiFB8PEfBcGJ42jRqZgTfwuSEMPf1csxF9M/5VkPLIWH +UeHd0co4zD7iOjo179wmseMGjx7ffCiOvTdfx0Hqnmck6DyBOzh6m4bCq9zQ +bN6sfPvlpsFYMvB9G/33lNiNOld/l9cvTEIPqr5rya7qZPtXA/uPbtuIrbPd +8ou4slwnXEy9VF2WQ0A7Cqbvz66jtXWr79rkLnjE+/xHgX0tvNtx6/lgSRK6 +ut0pelyTE+/NLgnOEsPO+zHuZMtgdTzcmbiC061th7NqsutuYvvvO3O4PaIe +Byeohu1NY73wjuc2lz42bnpsulLlbyvbviy96p8w/iwZGYl+9TN83wp3orwd +5PkYAPduq/IVJaHbMRfE+rWb2fkWakrN+v9h+5d4eU8ndKIJjGR5ym/FjoBv +9ynbF9j6dyIcbWRodZC65l1FoeIkUBImj/3C3oPoBqEvCrmVkN212qzDvJd9 +D7DPp7euSYIARr0Fu1vv0eDu7+T4RvIYyBQv9D+iRYCmUUuNbAUKnLSL+ty3 +7x8iJ0Tu4Y3HQSaLV5XJ5FWBX+Ry9cwCEhBTvn8OodDY8bePL4e5zE+TQO7g +P7PZ/NJ5HLrL87CxogcZmll5ej+YeXroDr5T2R/z66tY+Fyaic9BK9YoOwg7 +n2cW7WwkxNPQUV6X6NIXNPT1go1bwUcSiItXjszikHl7Vap+wGGXABniq5ny +rzxqNiv/yOiNLrVIjci+Z9k143xlSxkdWUxcMGwupoLWxMk5/Dm/js+G3ID+ +5Z2gztKf3X/m9CdayLj5fGVSF/SvYuIlpeE5vITc/lvl+mQdAYZGf83J/9W2 +OT2MXP5IpF0+QwI9ZeJx/4c0+NzadS95Vy3ydSWQQBsHi1h2PJtpx0Ej76qd +vh8efHBMuz//9375bdIQNwFqeKsaTxt3gt6N8qu2lT1gm5npZNlIBpoLkz/7 +mKWH9X4ft3/e2w4vWHzbeb/gLu5htO9+AvBrCay2KaACZdyXJiQ/CSbcZQ/v +SjBAJmn5QrxNDzt/cEf6y2zxCA7vxkVpPMWUm4EW4bm32bt3su1ySMhom2dR +H7q/830euZJzP3jPcO9JTJ/DujUatI8GBLYdYXyfsyOQO5x709ClGxbL6jSq +7yEjvAH/4bqlw6ic76q0SAwdLP4IOFX/7UW8S6r+u+MxipIFyZX/lg7CKaPq +g2fHcOz8kIhlLseXY36EsfLa1GUp1eii1mDAmDkVHU/KxW9qwfC2k4KQmFQC +8mvMOXo0uh8FJVx6n5rXB4HS+xpWl2eg+b9hSp+2jUVQ4BQrjqHHjGPA5IYP +J64W9cB/y5n6DZ8/p98gUSiPd+Qvni03KkFz9wIQtv/iDsXvJHgluU3N6dN8 +f+ERYBiWWcUsI4LngbamL2OYBxNZE7blxySkv3wYYqLGAG9WHFVpei6Oisoj +C28EnScCzn6/ex4jE14vO/RXPa0L2Qq43EzB7MLaP0x7ccVizl4g8x7D0qUJ +JLC+Z73hxq1+trxvzf980yykDVYozZy64VbErver8vKH82pxAnjrM3HpGSYu +BWm/v7elzlPBOYDZn9eS2Z8XeMc2ZSordsBrFn8wickfBJsia64gKxL0Bruk +PCE2g8bJ+JrIxTR4pabRpqNGhV4uJq9wHk8NHvHie2/SBZVcgctvbBli1+8N +4F4e33uSCF+NmDxfdl6qx7sIWR8qO17UwIwXoX3Z+jVFHu2whxVf2sWML8EV +P73iHxM4OGhhMfce5vX3Z70VsXp4HFtus+rn5BaI0UcvWIr3w3AFkw8+nxdZ +Lyd9PGi2n6zpH0X3jT2wcb+F8KZF/bCO97WlrwiHJ8nP5PcBI2T1P55JAhxj +2dkw1u/aaHrwlcfOIUhj5QmUM/ME0M3MoHvh+Xhw7m1skyybQFeeL1eZ5Qft +ae+2OazWAJWr5SRdzKeQHIsPNbB0dVCqTD3Uvrd/qs03gZpZfKjUo7j94V8a +QK6ox5jLfwytLXvfI4mNF526pDr0oRG+13kU4/aOIJ/tp/lnxz+fU9xIojdB +7vHXizcVjSIbFn/qpMPEoY1iTfDKST1J2GcY3WLxp5b2RyevNG6Gsr0dwrHU +QSStJDSuh43ngtUbo6UtQC5F17wT6ejdqx+7j2Dj/Wbbnd73t4BcuJ4KTXEQ +7WTxraTj6nWfmbdA08DzixmYvbjN4lv1LL6u7ifbCoW2AvLuNlR0z+jQf7P8 +I5/HerF28a0gFGLv+nFnL7rPbSrx+mcSVK2p1atTwEG1gvoSI80BNj/r7NaN +GnvrW6HzX1RVWToFWXf7P08qSIIbtkvd/pjjQK9n3ZH1EZ2o6cL1f4DNf6Vo ++yEtGgdfuOxf1XK3o84TQo57sHEaNK0w6sXB8IIi3h/rO1ARi8+lMsa3rPYb +DtxB85ZGKBElsvhc8p6ufyMXYDits0tMiNSCpou+brTFJ4FmrJu+wVY8kD+V +lH0t/wc/sh+MUnKTwNrta43ojy641izjd0u9EBaz+F8iplx+qje7QTkzkupU +UA1BBdwK2/KSILjeXdTNsgueKpXsHac3Qp/yGZFT2Py0ssfJI3c6Ife/b5ae +oUTolHr0/jS2zymJ1zK/NTrgmLNa0MquFhhk8cV8sofFxcQ7QYQ39mUVdzuY +sfhiX25K0HWbySBKSd64e30HSPFdz0fYPl9cpXPJcZNh056sPbXpFHhycu2Y +LPZ7/UX8F91taAeNN9YmLZh9aGTxy2L+/mdjFkuCey19axx29kI6i1+mkBmP +a/dpB0Z2cbmp5gAcXcLLn4CNtw7EXdEobwPSrtxFdyg0OJ6heFkFe+7Ffa9b +G8eJ4PKrTAaTB1Bl8dFMxyWa5fzbAM/wTo1OpIOQregrCez7xu8WTDnxiwjF +Kfp/6IqDcKM1d8IHW1/2StRB3rNEsF1kxjfpPQwH1nMrCWHrOBhxHd+ymAh7 +BbNyv1EHIZ/FX9vkbCTkrIn5Swk5voV7R2Ani7+2P9jlzOgAAeqTh30WFI2C +pGptLh/2XS72Nf2iFxPgSPGvteJ8E2Bj5sHHj71nm+5XTvkvCSAlJ2av5j8G +kiy+m/5S67srvxIgKOvBfdmyCSgwvkQwxvb//ouchfgjAhxMtH131HwK8gre +f0vH1v/dWncm9ToBlFh8T1Em3xNE90SETFZy+rxPDszxiCFAj1hgLEqAN7VR +9SvvD7P5yD1urajrEhGeXLhoE9hJZ9+zk8gnn1/KGYLfNO3U1Wv7UdnUeyku +0REkuGD9z5u9nPivO5M3jdR+evdvWMO5NydckC54eqQbaZwq9n87gof3CVlZ +LzG9bbtn28JHOOzcPXst/kMXD3SJI1Q6oxG5sHht1ofTmnYq4EH84rVe39gZ +cDqSl3EIO9c5ERBqa0eAzeIKmk7C00DnZ/LXvkr8Vn7mjuGjO881IxNzwQFF +OfRg8m+05EKc1r9uCLYw26Y6yEBFG4O5SAX9YJjsfltcoB3eTEgbuigPouuf +InduejsCLSY7Iv57welnLJ08FCqsOoL0I0cze8wZ4GBT9OdwbAeq/rcu0ipt +EO0dH6+qMuoCm+l26gc3Isp45F0j+h8DPW+cxOWacfKVPc6+0HTiGkT7luRa +lH/pAsa7SCnp8j4QqrjhzevAAM1zPU7K8gR2nZHl4YGRk8tH0UOzR9BTwoCt +Idb7ikPwqHzhpwKFM3QU0l28qP1dNyzqst/5eLgOdF4xMnST+9DMyXVXelZy ++mIXHZzjxSPd+/bhOVyY/MT61JqLdYEp74sHxfh+NFixdt8A5v96vCja3/c6 +Gc3jsgdD8tE7oBf7DuLbbuekwBjLb9Y0sf9dF94D51g4yoOJo2DJ6O8qIyUC +pITWpw1N/Eav1h653ytHg93Z5wQSk3tA48eYe+G3Jvb9ae6N1YkPLDm8l83M +9wy3Fn48v21TF1x5xMR7gr5zeA/O5W1UU23ugges+gwrmPUZgO+X/PjteAKM +jtGbSx7Q2fkvZNMMR/fDBMj74JpfTqbDXpMn6vJrp+BDzaPGAmzc02hzmf2T +IVR18D8fuUcTiP/sOVOd00RQ1uhUfQwUNj7d+OndioyWdiBs967JrfjH5nN9 +4P7Tb2OMh7Ho9/271QqRv+OSDK6iJBAbjXH6YouHZddtzJSEp5HFlVcDUtj8 +UN0nL8IS6yD9uJrK/Wc/oMKoomjpIgp4rLSTz/nO6ccnwMw3hqfVUfWP5Ahw +jXUvPx8/2TlcEK3ZTYU3+I+Gqlep7PqKSUsfG27nYcC6CsW/Qj7TyIj13Ckx +XMNV6zpQ6Na8XK34FexY56JtwUK94tFueCG4TbxBcRLZsnBF2tiY8eRwPUw/ +OzPwIHYEebLwgPmOX5q3cpogmH+EYcPHQNksO+4W8WX/1dIWcB48fpk21ouM +Gy7fTMb01W5egchb63Cw2OW6aEQtx24m8x/ZI0nAAe/FSaUk+1rkaBUpLD6L +K1Se+YAWHi6fepKk5lAO2mEjA/LYub7cb/8oitYFfzY9UknNIUA7y35tc1r+ +dfpGB4ytaum5TOyGMJbdyU3p/NqwnAQ2n7qdJf1pMKjdvzwe07eXT8p4hYi1 +Qb6WqrCB8DAcZOn5n4ZpJBAmgiA3Ov45cRyM9tTVGmHP/fQrsfPZGwKI0I94 +k/bOQGuOvedF7HdliTWPJZ8iwAZ7WStGNwU+3vXqE1Hsg5e3Fh44IEQAXrPl +HbQPTex66U6Wum2pW2iQM+gXdfJ8PLpk+nrasAb7nYZ2e8gpeFDI+SbqSUlA +dlFf9m9d0gqw48BE3Rs8HGDxN7+x/KzIa40/hfkZ4Cd8XkW8shJ53czam8hF +RZnJtc37V/SA80LLtHdln2A/9cOLD929SGzHb8vj53rZ8VVFJq8WlIoGT1qG +dEH4/uW+8ddL2HIbeC74aZ01Hr7YProVFTuDquGVcmNhEsCopbHVnVq4/IFZ +H6CCb64+ADpR3Htm+2gbpFD9AjMoY0iAhSdf28iceuzWCKUUB29/8yGkysKB +Ow6YXL/R3AxBCgKim4qo6BoLvx3hGhmQDWyFbKH2DOLZLtTMwl0CNxf/HgzF +gc/DtbX7AnDowa8zfzdg830/J8MvMTz0Dtwy33miAfpZOKf18yKH/T86Iaes +4LufIRkUWPgk2fDNsKcaGS5vGHh193I/G1dMrvM8LDLeBruNPyutLGPAXRYe +MNzmnkL3JoJrl8yfxzajsIFlx1fmeNpdqMTsuE93Zy11Er6w7K/SifvRNMwv +H9Tfyied38b+7scXON5eJNQN1zxctX8vo0H4Z6adPdrmkrV+WTeUPKAFHTs8 +AOTfUnecb42hvqGj/Ee+dsIum9fp317SwbYoieiSMoPePv8t+tW2G3YMMeXn +JlN+0C3TXQUfLXqBqsPUz/NxyOUGtThnTK6u/RqXnK2vUhFwaFuP9l/U/VKN +LHCvB5YcYe6ziaWHu5Wt9A96EuCBR7YtI5mG5uP3odSHngsYJIjISN4ZIMVA +jZIrNU1D6Oj4v9UWT0Q594ZOByNVK7z6ER8t8sNTCRL8Gvk5JcNLZ/N9lHJe +S6hi5+usz/ScXzmfZ1VW7G6g+Q3z05o9qA7uTXDP6sxRHzIVdg09FPSSoEJL +zXllQkI/O14+RXSvWqlMgKQvt98UXhgADZVR9Vy3IVie80J1y14CWOeQFTaf +GkTFoR9o22RHYZH/Ka2BRBLcYN07hzLvnaGBeuXCS0EijPGuMPK+NYScKT9/ +mKlMoM/28nU8p4jwhuWPz+fpSetQ23eZdkB1I3Ofy5n7RDwJYVSThG6236h/ +4szVNd5UBJ+aNaqEKTAZxPRzfZl+LrL3iuVbfRX7jn3c39G7XJTy6JqhMqZP +JDZo5uEcMXlmxYF/J18szo7A8IlE4u5bWwgYbmfGn+fju4yWtgmtC2Q4ouST +n+KP6b/Uas1LRjT44r66KOO/TnhOOCgUuYIGR7xOa2wWGQNyS86qYQ0CmLw8 +lxteSoWho1kSJ1aNwjNic97dAwTIkmghbZIchE2PHw8/OTQDYjotlHRdAriw +eCvzcZ4YEYN4Ywz3ZrDi3vNx9MOOHrW/1nL6rSifncN7EC94NeZSJhn8WXyZ +eX9561rdVv1KMhSx5GS+n4xPV2pFsixnHas3c/w10BcbEb8+QIJ3B5j1f9j6 +TIXUKPmhF4ZxXemo4xFK++zwOc6hE73bYae1J5PT52jQySS10aAXPj61tD96 +kgiJ5EPn2i0x+/K5tPmz1gBY8pCMfhD6IYcV/5zPv9uUqLmJpEEGMXWp2HiR +LnjxFJWHYOdjSKPGqG8rASr6vIea6AkosbbJt5OnFdG8o4ZeYc+Zx3unmHgP ++iLP6ToHENhxFkN+l9m4IiSKXrokmEOB7sb0JX956JDJypu+x/WCXy+OAcUS +99zOBNPhfHu2r+/YDFz5u1F9TwMDfLSq3udpM6DUwDi6EjcFJ+1zF57Bvtet +754+XvaDKOmBWGKl3CiSKUmVe36UCIdXVObKJgyizGrXt5dj+sDKUWFlya02 ++MyqbybErG8G52zu6I9HEYBLV2ShlT0dHdpqon+4sw82fDFdcPM9AYRZ+W/z ++k3dZjyZbwsRZOq3GCw60Qnrbus+cpVjwKWuKPIDVxo7jqwQ57cl5G8zoinu +n6ykc+I7Va2ls7wepL1wciJlmggVrDjP/L0DtfcCJaCTBP0rmHnIGmvn8pBB +8oTy3qHFnH49Tcy6gkAy/qwhfrgDZC7azeF8vqNRszgf1XWY3FFYTgT8CpPQ +1SmcPqHRuCUdH16TIL5wWiL9EKc/rPYmCXQam/8t/ZpRjDQDXVxvunjlEjrK +to1S0MD0xvzv/ykdNsubQK5e1aluPJx+sgQd3ofr9YeRY1HtwEfpDlh2znU/ +r9sLtPa88vIv+yjIkSd/5O33Xlj+1PWb12MavHZAQ/WStUDOkel4YUSE62cX +4Td2UUAk1MBdW74PvdYre5jXx8nPfxs99z6BB29d9KMbD7dZ+bHzfVK+lg2+ +zP2Hh6t/U//BvkE4fmfdh+HEGdi97uBXWT0CSJyJIsGmQTS1blne8IMRZBsh +vCLqMBGaHuP3ft9LB/+vfqIia+rhHHny27YOAriz6va4Mev2oDGhA0nVokMg +HLVM3lujCUqdun5ePdIPQbdWJu8+0A3vdpT72ar0g0SPKBiRRuFboIDTSkyO +E14EfNhJDEQ43Go9ufXdsM/wxdP+BZjcEpjn9zPz/AKPSVyTGI1zn7WPeZ+F +Lv4YZGQNdrL9TUkmzwtdquDRP3WpC0pZ+hAx9SGyXm60/98mAtx9FbJq4/lO +KOlq3nt4dwOSHdbReCOJZ/EX6NDppoXuWzYjmY/QscIfD62s9xDMfA8oq1PK +YJUVDoIQWWWP3ghyXLhzT9PlGTjusD6s8C0Z7po6rHj3bBCdpa1PnPCaAvHY +bHOyQAeIH3CKPWg3hJYs3em/WGEGyvpwT17rd0AuK499HreXNciGnBAgw+vI +q7cuU4YQNegf/0ebSdieXfRNT4EMQf4SDhKpNDSYk6R+OJYGyqR/+Y9bCBD9 +eAqp4emIkY7yAx6Oor0918pfXSbDoR1M/2VeHh4SLMQvAJ6dH27DzNcFxR0x +b+zwJODjvdNACsTO79/FHXcdGkAn5d0PnQ+Y3WTxKOOYPEpQ4+O58YlKgPss +nDDvx22IUXSYHObkvZ+OSlvjuYUCtyY6g/48JAD9m21ZuV0hqnB5ImSQSUXU +lGJ5A40BsFq/fi6/Yj4+ajcjcNZ/Axk2eTB56N805njo6NzubV9pa8hQ+fF8 +zuz90fw504z88+pkLubHcZ2vaKjrZvcFO7iw4uM7DMcGnsk98mPLACywLXyT +ETYGTztz5Z+k01n2pR90RUcTcw+OgQhpKrnjDSYH5QYvItS6gKtTxuz68lpk +lxh2PH8KB5sOMPM3TlfN5W9AyY1aJ9vjHZDJipPMf8dVo5uGLeU7QN6jzWv2 +PuKVImXc32MUmg537Jny64QjL2/O5RHN3/P/OZzsUb+lE25fZdbl42HW5YPU +gjuOhMWc/lZvmPnnEPLML5ky0QG9I3Euc/cUeaa6R6P7QfP0K7c21AuGVaPJ +p44xUO65DrNtWjSQXC1ob/KpHXxYeTK9zDwZEOtfvSntNx6+RQlKi/INQPH1 +QN4fy4bQhZ9dS5UoZIjN/Kc0mISdX9b3VN0guvliHRnOsfpO3mf2nQT+/4Jl +ug+Q2N99JnxqkY4cBb3wi5T82t0G71n9E7cz+yeimDfW8ny0HjhTlN2xqHIY +qWge9Ig/Pg3JDeSDeR5kOLWEyePLOzDH44Pvz3e5XT9NhpSqmwaZOfnorEEv +rcGRilYk3HlW090PxiMZ0kfHB9EeFL8+a2cf+vCfoOvQMSKbL6lIZOLPaRZf +chf5wGDVte/s+8eRqS+bP3j3Q9m9u+/QABVemcgXiBVPIv2ro5/533TB59p7 +3LFyaWjPhvFPe3bVwaXolMIPwXjYfOicUeehHJQoRZmJhl70mnzT/5RkL2hv +txFxMclDDXdrx5+96YW1xZe+pAsTYMY88f12QwZIvWHif7/TguJEDE9U85jE +yuzm9HHyMlGfXGTSxb7XlqGPMsLvU2DH1tBjKR8JcD38sl2bYA/8nU7vSlvV +j67blC/XnyGBRo36sFrbILvf1h/ehpMGizuAwOqbs5bZNweFiHC9iizsB88j +jBtcnt/Z52iHtLaEj1UvvNaoyLEyZ6Al6wN2qvDRIM/iZW1cQjtMhd1/8Mn/ +NRr/Fl4mVtMGdZ1RHqVFeLBkxQ/nnysbXycTbU2GPaw884vMPHNUs31tFp9w +L9jsk1z724XTr1MpOa3erKEL1rY49x1rpIJc1nerA/qjyFG4uurmyw6I+Mc3 +SiB2grVL8ccv6+sgNqRP69F9EowvyKeqfeoF8z0uvbUWFaARuIX4eE87LD7D +vP/iZ95/QY9kwC9JSg+br0el3KQ1v0pGlx9Ht+64087ul63e035oYUwyygi0 +u+SJ+S/sfpMXyvGzeQXEc1OFPW4dbPz2fDI+uBBbp0PS2kE4rPt/82aRUuYM +hldwMH9f9Vxf8dMANj/k2YEFU7/b2fhSNyMplx97rv7Vwvi2HDLbf3vgFJeP +w+anJdtonfrdBROsfNEXrPhQ28CqSisxHDt/VPBKj9iV172oeOCx5KtlhP/l +jcI+B5+nStEEdj7wGTGZPUuT+9Abh4IV7vv6wGIBM26QxIwbQJ230nD2wz7Y +lskXe/1XOiQMbzr+ULQNaFfeaDbF9sA2c2b8ypkZv0JT3CZFl/4jQJzqg6zK +9kAkotEqO7KpG6WHOMOl373wJCxmDv94U/bO4h/IPv5j2UceAlBY+naiY07f +AmEdw+qtO4nNg2PVJ4fsU3k83wbb2Hnb0oETGx5i761oaeCvY5hdnvcz8ydq +EvSw8YJSB6GCngY2D/HGb8KSfdh33BNP2bp58182rhg1dl+yAhv32O2+m//3 +fB7XCAwu2H98EzY+1HKWeCOkjh1P/Hg410gJG9+s4uOUfbQSlPTXzNUTC4q7 +O1tPDBImNUMbFnbB+3u39aOa09n32DlLb5M25+FhRS+TN52hMMebBgNbhbyj +G3vAeFNQbmtGP6ha+RUNaP1DOwz8W+hyOMBJhc3l8e5WLJ3N40XNirm2y5YS +ICQucHO6axbUCaVd9RjvAhUtrtGynh7YbVj19LA0FQLp448Y2ZWIbrXxa9wG +HAjfZu5nHjeZ1p9MX/u2B2xYcexKZhwbZuBJzepIAvCTGrpzirMhTHuPwh9K +N7rwZJou8R+BfW7n/66QDN58AdfG1l/z462+BVHDZpx6QfPjRXdcH9kVcvoz +zo8f2hTOUxrPqZc9P06MEwv49oQTF50fL3bb3dse0seW5/nxp8bO/y0OHGCf +i/lxrlFd+u8CTh/5+fGCupU1bb9o7Dz//yPry+Opfr7/K9EmQrSJaKFoQYmU +obSohDYqirTJ0o5KKVKISmhVCmVLWYssLxJS9n2/97qufd+J/O67e8/M59vv +r9fD07nzmnnOmTNn5nXmDOBStimNszN78H4r4F40x5c7fvbiOAnAnTwffovf +TO7fAbzJt7SuWwnzpgH4RMVvL6jFhE/gb9Ud+/LJUgzMJzwdCszCc76Se5QA +n/y2d+FpZ8Iz4GfE1c+q2DRgngEXzBSVmWBPzo8DPt2QJZ7k0oJ5Bjyp+4+B +x5M2zDPg6vd/+uwP7MA8A+65JF1/3iHCM+C7u7JSlpgQngH3X+QVb3y6B+V0 +G4hYa/ZgfEN1nurjbeS+RcDf8j+US9hIeAb8zQQTa0EFwjPgO+9N0IqRJjwD +f9GLNi3/MUDyrgMuILT12dhaBuYZni661U1T5JionBs/D7gMN34e+AS8s+Vb +dHY4uf8d8CNWaa70nFbMJ+C7H9YfXN3cjvnE5Uwc3v1fPiKc35yLU2GKphH8 +hE/AjR74t36aQ/QWcOuxuyFXNhI+AS9MiFhapUL4BHxt5oPB/+UT8PBnlTON +lhA+Qe9Mrk1zXtNM8o8Bnizh3s9zj4bLBXzX/BO+Zs0MrJ+AGws4vzb1IfE/ +gD/RVF/08ATJMwC4d8flYxnKhE/AJ8aNnTE5RPgEXFPw6q/kq52YT8BDJzss +vvWrC/MGuNcpt+CnSoQ3wFVu++2NUCW8AS4Yvyx0hzLhDfDY5LFFM1cQ3qDd +h7+orRdeV4F5AzxZLvREOFVN4qtMpf07ZrZSpYd0ptRqk30PkL85e6otvxX5 +bgjPLYoZtQ7yhE/A1+Ulpk9eQPgEXLh+j4+wCB3zBriILuc8FPAGuIbqzvml +hxqxHgJ+6ejltCIBci4YcFP1vAlSqwifgNczNq0L2Ur4XP/Nd8mFKa1UVMLE +8/VbCZ8gz5+fJrNwHeET2id+dF68tWAZ5hPwj9dFl6abVWI+AafSYv9Ir6/B +fAJeVq5+aUlyLa4fPt9x2Zm/R4+GfLh/l8zSta6rZFA/1yDlGV7knhSQD/ph +wxv8ldwnBfi0FimTNWbk3gLA7ywX+RLm3oD5BDzhUpy1+Cca5hPwd2P00dvK +hE/ADe6W1LRaEz4Bf79juYGvCeETcJmjywV2EJ5ToB2SDumT90SWYD4Bv91P +k4npIvdTAN7ZmzTX/yW5nwLwwxrGR3dfrsF8Aq46KWj2ATdyPwXgoj5OD/Sk +CJ/wjLzsMKvqLOET8A85etFni8j9FLic0xmO62QbMG+AzzvBc0PoELmHAvBM +9ciK2z8Ib4CPJQXGuNwhvAH+MLh0zesDhDeoV8TCIEpYmol5Azx//Hr27Dsk +7yLgvorzqm8pkHkccKOimjeN2izMG+BbD2yTvplKzh0B3jlZ/8Lxc03kPngu +/u7nm/O7N5BzjvCUy9641diC5EXE957F2M58vpzoG+CCHr6BaxVqMG+Ah1ka +a0/+UI55A7zP98euiPtFmDfAj/frftONzMa8wfs/bWGI7aknfgPg/nXr5Y3F +CW+AG3cMB7j7kvPqgA/dSPtzsbIe8wb4XNmZ4pp+hLdCzvhFN5bqy9y8S3gD +eUnZtMwPboQ3wLOHcyZ/jCG8wXM+/0GpPD8aHr+Ab1j1zmrNO/L9HvDX04JP +J1iT8Qu4csneBMW5VZhPwA37qm4YCpViPgG3exQnufhmAeYT22Of0T0LPQmf +gJvy+U5Mu1OH76nkzi9oBY/inhF9Mi+C/JK7B5y1lAifgGtGUBIGHoRPwM9P +uftALYrwCbjUHRdfsXwyjwCuU8J8Fs5eX8Df8AxgWT2/6FqPeQO8sGU23xSK +jF98j1Aa0ylvdy3mTYUzj6CDh5UD57nh+zo1QF57/0zhOz9KMG/wnnG5fTHn +txLeAD91qVbyhCDxwwDvT1dkuPgSfwbwYW27eIMSwg/gDyeau0kIEv8Q8C0K +Ylu9TLqwPwO4CyqqujVM/BnAF+35sYm+gegZ4JNvbKxNdWnCf8Pz9hyxjB8m +TMwb4LUVEosdZzIwb4AHmubSpfhqMW+AF1caln/+WIl5g/JGtAtvF80ivAF+ +6/wOpWclxK8GvL3kdMbs28R/xn4B/+mAlu3EXgNu+mGbum874Qdw0WOrU6jV +ZN0HeOAzpk6gZxvmB/A1prxTZvC1IHluHDvgctw4dmgn4F1JknVSO1j4b3hO +MVAyVlBkYt4A3y/fXjz9JAPzBvgXSS2+a80kDyf87tLrDZbLusi6D3CeZbHh +U78S3gC35zslGmVHvr8Dntjj5lTg0Y/1EHDpdz16G9f3YZ4Bd21pcHpbT3gG +3PKWwTmJp92YZ8B3L25Ze1iPnFsG/CWaxpBf2oF5BvwZ/5kOn1QyngFX49es +773RjPkCvN9KSM7zDgv/Dc/RnEj7gFZ8v7AG4CKSN8zvhJL1PPzfoubz5o3V +jH/3JTROCW7IHw1j/LsvoTGtQTc/U37g330JjWa3Aisbet+/+xIaDmUCv/ye +9/67L6FBdzWiXhzqwbwB7jg+elFZuvvffQkNG4OIhIDWzn/3JTSOya2P7/nY +/u++hMauPXsp8Set/+5LaCD7npffQpv/3ZfQKM8WFVg71PjvvoTG5YAs8XK3 +hn/3JTReDUqM7z3HwvuZEBdqc0OutGNOL47DADw32Szy41ay3wjnRBOLH3yZ +P4XcQwPfB+6tXTWn8zkd318I+LmdlSu3nW3B3/0B9xYNj5h8vhvXB/AX5hJC +lsqkHNjPP0lbqCC0nsQ9Ap6iWTQlW6kDlw94zuSIN1NcyD07UF6R4bhj1HNy +nhTwdW/nie9zaUFIrvn5r5EGHB/4De15+YVO7pcBeU+BnyKubP8KyofyZrvf +f1EYRdoL+MWRIjP5T7X4HCjgXX0m54yvleBy4Lveo4bzCjXXW7Ec4E3VL1aY +P6OhJdx6Aq66s9aFtpPkeQDcNHo/r2UbA9cb/q94+enKsdZmXD7gtGg19RSB +Nlx/wBeeKj9SMpfoA+jLbP9LytHqTbh8wIdMXawX7+vG8tDu7JMCWyPVe7Ge +wZPfMDHuQwIZ74DzxnZvEhtj4H4FfOb6MZm9s5pwPQHvbhaZlC5M/AnA879N +OrfVpwe3B94TaJ2OHu4g+g/4mw0Vihns9TjUG8o56f9QTkKV3BcJ46JfQ8p/ +mTqRh3IWzvEOu65G7hWCckasHzZVk30DDcDbVt662S9Nx+XCc3vUDnvjWuKf +AL6HeW2ybTET2zfALcTlIpqGyHdGGF+pG/wG/Gkkfhvk16a0SlbEdWMc548X +eLgUPe7GdgnkR5uEX5hrknpC+Qa9XWI7bBl4PMNzxyPVh4WhTDTgtyh5oXAq +5akyc+cZiz7q+brTjM7nbVgPQV7zFC/yC+3AONj1hXJHN9Wbd2D9Bnm7P/YP +N5mR/TTALXka21Obu7A8lMOzt2/shFYX7keQ91yX8DhKhcSxAH/rVM5e91tG +9lUAt5hxxLZnFfn+guXDB+2KpdrxuIZxMMj7Rdetg6xzGRmc/DCvBo/YntvS +idsL8q9U79//vYr4gVD+vEA+q70Njbhd+F6wgmsDp/Sb8HvxfkLjq9siqeS9 +IP/n5pfvC5PJfgXgt84aXGKxyPgHPLjGJXX2LGKf4fm65/XeW7ZkXQ94m7bM +gnceNFxPwHnCtIrfR5Dzg1Bf8YUfxlj5zXj8gnzH/IlKD9WJfQP5jYJuhrWP +6/C4AnyiJHP0HG8ZxuE9ITFbEzpMsL+RAvJOTQ8Ccw1KsD7j+2bjR3ro4xUY +h3JuqBw9ONhG8iSAvLCFUoXsrmqMg3ypWLV2QC7JOwfyotstyuYU1mAc5PW3 +vd94SYDkTwD5sOrhQJe4WoyDvOKx5pgy70bMF8gL8f0ON1Mi8xQ8B4vvbSk+ +TcPyUM7xmMkqk1TJvABPhSuieeWnST/iedV0fLnTEaKHIL90gFf1pRLJqwDy +Dypn6QUUkvkU5FPvy3wRO0vu0Qb5RBOXTEUNBsZBfn7LrxsyiORVAPnZkXf2 +vooj9hb3y55Hsy5eIjiUo9ds720un4/1BNrhatEuFruc6AnIm5nfl/NTJHkz +QL7NanXF8xdEHwDv87Kp0barR98+m5b6yHRRuVUNt4/lVaIR4ZB40WIW7keQ +n89j4iD4uBGPI3jvm+Do0XieFtxfIP8lf5nFIwvSXzC+dbKC9o1eI/0Fz8VX +ndKcr5F+AfkdvCke53prMc+4PvPicyacrcY8A35VQL5TcGUZnr/g/e/P5Jod +a/yJeQb5y6Lm1Msl5Lsd4NJBsw1OT2Hi+kO9dkSYycg1kH0YkA80CUu9bEb2 +YQDn9d6p88ieifUKyknamV2y2IX431h/c8c8sq7kYT5BfsnbrraXfs0Yh/fM +dUl4EJ1C8ovieNim0ldLEkk9ABfxLgtUqyD1BPzxVNvxVJ56Mo9y63tr+bNN +KWJk3gI8492lEwc2kfuzAD+6KPVobirJy4Hz2Pyqy/xe3kTmA+68XT7QMLWy +n+gVyHc9XmtUN9aC5y/A39Y9Ppxs046Qft699+z52sOJwZob34fuhpY9Nazu +RCXP3U1SnhdivlOCozQWvSJxaaBHalssVZe6k3zvOJ/Kbd2Hy0qYmBeQn6zy +qcd9oBHzA/gLh2lWK1OJXwF4YNkWLyUdgsM6CYk5PfDQI34jyN+1uPwy4w/Z +dwU8WiiAZ1CK8IPLv/8W7QnowvoA4+DQxs7QC03duJ6AN0esMzrmT9b1gLMc +bERSrpP6wPg4Xdi+Z79CP+5HkH+in2gn4NWD+xHk6TYHDk6uI/4z4OMHKtc+ +ysb7EimAm2rtPTRcz8D1BDxbw614tQ/hDfAPeWuF2+4MYHkYN6c1Tk986UnW +1yCf8mj6ssDKflwOyFcuEm8PLyb3nwI+0KahOPFuP7YPmIfTX5d6P6nHf4P8 +r/fr3UV7WLi90D6J/UNue3yYuHzYDyjI85zy0LYRr5fhdz+Kbdc8RMRvB/k/ +5wPvp2nS/31vymUvwdMz5Mn5brw/vXKrgPYA2c8EntQKG9SvbiLfZYGPm6IF +K4+x7c/yg5/LzzWm4O+b0vnd30eN2rBfDfJXzZF31nrif+J9oMwU8Qq2nwn2 +B/S37sPAg1eCdDzuAHftlD53OpWsjwDfdHL10CI2n1B/0K8FqGr1tx7iH4K+ +Xzv+xl9LjMwvMD6EAodrpiiRuAKo13TtT9vo+/E+mAbg+06fXtR4mI77A96z +a4vrsfFdZD4F/Ib2LIX6XDKf4u8ss9dvSf5E/CjAc2xvCRuOkvkUcCkB7ZBe +L+IX4fdmx2+Ypt+MeQNcLXh5UJIeDesJ4C4S23ME51XheRBw2dbyTynSpVh/ +AP8ZUza7vzMf8wbzmM91/ZJlScSPBbyemW5TJUK+0+DztavuX7xKI/Mg4Ncf +mO5zLiXzO/Tnr9/Dk8sm0bEewnvk07YyL6Uz0AquHoLe8a3cGhahSfYLAI8o +2/RrIb0ZlwN8pA4lspzdiB2DcRZS8Fsp3aIB8ww4/Vakoc6LbiwP+1XvfHy7 +Z9f14f7C30NYVh9NPHr/He8asgdyFvR8J3YV+M5lho9OtiX7sYBLlkpanptB +/EwS97L0z+xWMt6gvO9rRfvsN9Tj/gJ7bGITu2dWGcnXB/reXxTGlL9Ow+Vi +Py1rolfpK/I9C/BPXg8Hf+mT74B4PFWda3llRuYjjJ838Jf+Rb4vAH74NStS +8xRZ32H9TMwzn6XRivUH5DdInukTOkD0B3CeeiNPyfFarDeAazN0Pygr1WI9 +wH5yUkQyryS57wxwr09TJvMPl+F9SMCpvLtiG6oLcT2xH3Tx5yc3BvGHAOfR +Gd8qy0fizOH9ijF86/fvYOD6Q38qGX7Pei5G4iJgXCb/GLVZ39qL82rBeZ0Z +T7Zumru9hRv3PErB/xuCJNxeXSLxooBL3Xms4CBYj8+DAP75emnVyeksHEcK +uEfIluP8J0keMcB/yD13//inEdcHngey9e7+PEPy0QE+vT4kQ16OhuMhAfcS +6Pxs6FeLz4kAfulnqGrUphp8jwPgq04tZq2wrcD3OAB+b8OF7tIrxbj+8P9J +tycrW57qw/mpgKcJQqPrzakefN4KeIqLzBK0m1iP4y2BJyO7uvcHF3bjvHXw +nlnrVB9f8mon5+k47aAWz53YPKGhEwlzz7lrcM+5J8WE1rt/bMb5Z45y8s9Q +Qtz8M62c9lAQt9t+6XaLnhPhEeJtt9bfOWfT24zbBfIPbrKqCpm1uBz4XWPt +/WNu7uReNmjHjJydam+za3G/AN4wX7LB51gtlodyVLyM7vj11KIxbtwpyDde +XbFq9HEp7hfAeQV/2n+aVIzloZy6G+pi/XxlJK6Vqy+Glw69HrhG7sUAXl3H +7PW0ftbh9oO+PN0xs++yfTNuL/zOYJvlbSvr1v//XP/FUwtlf3bi+oH8mfTW +11+c23B9AJ9Q3DVjpgAd6z+cHzne0uiaH9iEeQd8kYrCFc+KLpwfAPiomRNR +kvq1F+sHxFlfqdHb9TyM5M8HPWTszg3eIczA9QD5tNlByyZ4E72Fp03UpvNe +Zkx0g9ved5z2UqrcPAbAD+jt+SPDN//LEwjjAfjwZS6+IO/ExO8D3EEcSRZk +EXsCuEQR/fWKJfVYHvr36JbNU7Z+YeJ6gryUjuCJZm8yrgDPlw8ck1/IwvJQ +Dn964Y/fDvWYH5BfUZ29YDCB2CvA3+2Zdn6/NeETypl7c9kVk3AW7heQT768 +9NbYapK3E3CdMJ7AzN8kzx62u6trr9nJN2I+4Wlxs+1qCNvu4XtVuOX8NtVS +VvvVhHEo51HhC7UJZU14PIC8mMKVruzDJC8f4PW3ds6NRMSuAs7v5dP7WZjI +Q3kPTwwvX6ZPxhHIh/1OfbY7qgbbW8C/XbhvffB1NZbH/XhvreoiyVp8nwvI +l+yd83Q3bxW2z4C3qa71XNJXjuWhnKajNyerB1bhuHSQ3zay0vLXwQKMg/yh +gQUhFkUFeDzCc2fHS6ueBHLODuzWvrJkanE3DcU3c+ztiVd/7S2aeJSTVwR4 +g/bdWXG2MJufjnkDPhYpWo8IaLRgPQTcPVhhr+Q1BsahfQdKP9+adY6crwS8 +ZGZobI8MA+sh2L/sr08yr0gS/QT74L5KQa5DuB/f6wTPNH65Pd0/6vC5AMCd +BXiaTsnQMc8w/vZf3nK2X5P4G+Cf9k5haaXF1WEeoL5bIyXXhDzpwjj4cSWv +o/eO3+tCxca7bJMLIqnzFd+d34k2U2r3+1xLJ9JxP+F7xPY5HWaVkPhqwNMN +g0qFjnZieRhPHtw89tAfIB/QlD3vpQxZz4LffSBbRbXpNR23P4qjP9R0schI +lwWl2A4DfszM4/0Qe7wADvpmGH41AnmTeQ7G760HF6tmh7ZgnqEcpcuhcSZn +yP1Q8Lsv69/rpa3NwfWB9o316YUd1iD5meGZaho90/80WT8CrhBpGb3//E/s +L87k5O1HkLf/DTef/HtOPnn0jJtPHniDcSAy7Zy67kyybwD+5LkrTGbLFRbm +AX63xjn0w0Zjss4FfLggw/QLqwXbVRjf4o96rHd9a0D8CrLTp71qp+Be6VuL +hBPe/GnAegN6vnv/IWPJJyzMD/CXFzg0FlLMwPMI4Isq8teO3SHjCPB92++U +2RsMYP7hKbIzUsZjjNw3B+uSHJFJLK8X5H4onEfR0klcW5aJ2wv/9+nrWvj7 +OvHbcfy71pUfNSX1ZH+f66cH5oaaufu24nqCffgYca02QIjsZ+K4oGMfdu0a +6MH2Bfgwtgi63HC+F49fmIdP7E93O7WNjscJ8OTS7CzKu60Jrwug/lduzd+8 +LI6O7SDYp7wU4e32aeQ8O+DX385ZI7yBjk7nHp8gcS6aeulzNfD2Zxpl3r11 +0pRwMq+Avrxa8rxj82KSTxzWbe059wwed5PvYrDOvlb8tkXnTAsuB+xrfrJ+ +yFJ3Uj7Ym+u+0xfwsd+bKlopukynBy3SNwyjtlYh9x28m17b0nC9wU6GKsXw +HjvNwPM16FtEQnSyUBo59wI8v9+QobTYqg7zAP9vb0FiJ1x78fwF8tPE+yXO +aRH7A/hq403PPm+n43EB9nbILKGiK5rc7w77PYUyWRafLjTi90I/nnGInD5J +g47bBXoUsvre0pW5ddjugD3soSyGb0S3YRyfO87PpH971oYkzG6p6WZEoGMS +nq+pjd0UT9CavYKJZP4G+ZcTZnu7JnYQ/4Fb36+92ksX6zaRdQEXnxy5xOdS +K8nfAeUETJpl0KzciOsD/SDvi2grysi8DPhJVk+35DgL2yvwgyIXnwh09CL6 +AOVFoOQ7L5a0YLsMuI7J+7X/+UXYj+X+LpC2L2OpJtnHAHnhO0vjao6T74Mg +X1D7TX3WjRbcr4C/z0rxpe9mYhzW+3bbPG+t2MHE4wF4fcl7tUclkqw7QD7F +nq9uiinRf5BfR2c1qV8m7QV5qUdq385a0rBdA3mXXScFD+7LxTjIW/V5LDZ/ +m0Py+XP7U1NAJ+5tWh3GYTwigb31iol1aItw7ECvazT1ePZTI7vRJlSoU9Ql +pEPiE8B+pPu7KV/4TeZNGPfppe+vjF8mfhGMm97fq/ZtPUv8IhiPOW5Lj0ud +IfvwgD8dTg4a02dgPYByVMJHLbfkdGMcxp/YFbX1u8O6cTnAR8amgrHlH8i8 +AOPaMH/u2R62/wDjB+qleDVywoJJDNxesK8vFZdscTQh9h/03/bwkFSrKtF/ +kB8bYGRvOd2AeQY9f/xWsc6gjczv2A8R163VMyL+EpRHqznwsyKHhusJPGz7 +tmvCPn8WxmEesbmpFPGjlsyn8J6D+8ojc/PJPiHw8XV2RuWMpPp/5VN8z8V1 +HlJhos6PK0NmXe9FDwrtk5NY45TxGM/4i59duBz4XSYz7tCuxcTuAZ8ey29v +6S/7L69U6G9zz3Y8/z5t2akgX0fO0YCdvO0pLN+7hY7nTXgeGFCl7+epR0dq +LD/zmkfh/f/ns7/0VM0k3wsAn7RhtHLqQnKfBfQLo/PGrI0zyfcLwBWaC/IX +8xJ58Cc7Q/U+S2wn3zFB7x46Zrafv0HDdhvw9PXecxn8pF1gV4Kb7G1Xfmdg +ebAHFSeW78waITjMkxdPPDD8lUDiPPF9KTXtXZt9yrEfAPojYiGj8/sr/h6d +gu3b1NepezVL8H4slBN9nB4uq16F5xtsp3v5+4s8KrGfBvLV4XUqI0trcL+A +/Gz+Kd5zQqsx7yD/zedlDONALdYHkE9VVFxYPI2ciwH59xLZDc8n0PA4Afnw +3T8kV5SS8+Agf+6tuUHSa7IuBvlZPnLVv5aQeB6Q97aKuHZ4NsnrBPJhT7vb +FCPJPizInzDsH9R9y8T2DuQP1zZlxW4g+WoAt/h10/b6ehKHDeWs2LQ1Mb2D +jv0HkLdSlljts4jEpYO8/RhL4ZEnHe+Pgfzy/PMRe4LJeRxod66vmO5HOSau +D/Bkt/+1w6/qGvx7sCcZcmp8Z9e3ocmp6uPhor9wu6uE1yz9zkfGBcir3DET +/ZzLxHziuL8b2+Z/Vif38IJ/emh53OalbgSHcTDxmUvNmBLJJwDvkd2hbacn +xcTjDp6SyIdpIlOP5QDX8arLCyqrxzyAHcu19b96kE6+8+L4bQtzL/sXZB0B ++wcdDVctCu8x/vm+M4r2rYhpjLMl8mDnqP3rBCf9z7oDcMlYP5dnt/6/+UVj +89b7SdXhLGxHoF4s86zzmYvI+TfA7wQWi16Y3YL1H94vICqbctCgGfcv1Fdb +W4R3+iYSjwp+l7uph7+zHsFhHIfYew212pE8XdCOuIhpx/JzW5AJ18/34Pj5 +SDNXPHybSBuuJ+ivZPjqj/QlPbieoO/mjLvPJ/v14Pbi7z8s8cJPyS3YPmJ/ +dl3K9phpLbh8qP+K8EvdgZp0LA/zm0zEif2Bu4mdh//PFy+tEkkj/h6sIzT2 +d56+XNqCxx3oy8S0mHVa24jfjvO/qb0Mm6pG9kmA/5i2+Mi0TeTcKPgXt6+p +7K+K68TrFuBT55vuyveCXRjH539V8tM/TehCH7w8BGObwrGfPOnBjAONnkTv +wV566khpLxcn4xHw8epsQ+E5dDwegW+axDpv2z3EDwF+SmJ/OQzFsrh4G9L7 +y2cFNftXaXHoHBrGbf6WX0PtTNqj8+kk8c/BfiwLqntadY6F9+cBT7rM46JY +QewS+K2JPWvp+crEH8bx4WdL8le+aSbxDeDHKhSleIUQewT2Q9vZaep+V2If +wB5/H76cXMDGQR7wiHy6k91mkrcH/DVVvlvXbB+TfWYo74F96FGl18T/BH25 +u2pU8fceBtL5Wy6D+32tH71c+2nS5KZuFPSk5cXxFHIP4924X7rpcoPYH8Pn +3zfI7fnvPl9s77jjZsrA0I8NJWR/BvR3QIh1efV4HfaHgOfL8+a0JqhU4PoD +zpPjPOYaQ+71BryuxNb1/TlyrzfgmuMXZ853IPd6A/5gqv68htlkfxhwRasH +zlE9jbiegBedLKwfWETu7wb86c/tnZ8eMPA+LeAXTlbJnLtDxhGsO2oOtOSH +uZPvVtDvfjeomth35JwC4JuCyyfMCiU43tdy57XQKSB6C/V652RfXavahDj7 +UB1Yz1U0w+KtHUkcAtgDq0/PHnpdZ+HxD9/Tp19zCtl0l+wnwHhf9WK7uuNN +8t0H+kHFd8iSfoTst0D/0ju1upYpkv0o+M4fGhKw3Z5tDwEHv09XQHblNMdm +3I+gFzxrdp/MSWrC7YR5RGnytNWFiMQnQ3lV1wUuhbWSeFfw1z52PzoQLEbO +lQAPsv3zF6QotWMc5vFLs+X+ZD5rw34qlN+45e3N9x3EDkN9rcUO2elMJv2O +853Kycziq23F+gbtWBN7dsn7WhIvB+89/aJcre81+d4G86GQl33Mtlqy7wDP +VVofrPzuk3UE9Mtz49drBn2JPYH5x/MSzXXpDxrWExj3PTKjo11pJB4G2vvY +UWnthh1kHoFywm44JwQdJ/MItsPLvYJ6z5B4KrBLGU630l65kvvjwE7c6kjN +H7Qk6zuor1DSqymtOWTfBPTBqX7gy1BmMy4Hx1n1lFcZJpN1LvAREHXMZUkL +HR132tiut6YZSQQKzzTZVUiZFm4byFpRT/bDufPOH/FV2c2Lif8A/fv49JcP +Uex1E4w7+L+HSe70DjcWxkHvzqdWS//xZeHxDv04X3jzfpM3rRgH/lJO/Ooq +VyZ5S+F56avU4LU0Ou4vfE/ZcpmFq4NIXAqM38M87uZ1kQxsV8E+HbLz30J/ +z/gn3nIUSfC6DXo9JeeGYJyK+VfeUZvehnF4T1r9Y4eAh2R9CO+ZP+GTBaOg +Bdcf5hnJgqFO80E6nn9B304Y7DDk8yfzAuDv/WPFTSKIPw16KLZFTTd5FR3z +CHrxQe3tC80FBMfnmKOs66aJkXU66MO0wHazrK9EPwEf29+3nD2n4rgv4OlD +Q9/a7nXkfDeOA3TaNOHsBrLeATu6ICfReCHbvwJewF+mlRQFLH1L+gX6azQO +/fgWwMDlwP8PSkmW/eePQX2A/22Cz2TXradj/wTk+fVfNQmr0v+Nz0zROj6x ++WFNA7YPMF5O/Vi62iSb5DcAf2b1wBP3jYEkrgnwL/wrXP0OkbgmwG+oXT7W +YE7imgCfOMgv5pFD4poA15BeZ37fjJwrB5yXtcLduasZ20/ACzbmaSnokrgm +wO/GSIle7SVxTYC7p2hbS4uQuCbABTp6p+bWVeF+BPzTI7122V8krgnwU+Xy +q498KsS8QXn3dZi+eRLEjwL9dJeiVmzxJOttsA8nBKq+OP3PPj+Mm1pZ3Yln +z7VieZgfZHS/RVjxtJH9NW4/h02Pbrt5vhfjoIfab3qFxW6Rc+Kgh7Efdi9o +VifxojAu86sTE8uUuwj/3PERH/MmWFSK2D0YH0o192UyFck5MmhH2WNmlKov +OecI+EPPjnJ13RLcjzAuh7TynlZ1tmC7B/Nerehm7fgjJB4D9Kg1tr3ikBCJ +g4V2q43P/bGPh8SXwntZvY+EFE+R+FLAfe7X2x7oI/GlgMce0ji4sJTMp4Cb ++Ryt6hYm53Fwe89LeI38z7kbwFMHz1FXFEjcLOCHYuqX0Y6TuE3AS7btVsmU +I/4Y4Ac+aWRT68m5GMCLE9vS9KdV4rhTwPe/1y090JeH/4bxsdXgku8ARfxb +0IuMBeddxTxI3D7en5v9QWjkUTPuX/zdv/mTVsUiOnLg5gt15uQLpfi4+UJB +HvSqTTP0UP//6AeM+81BS/2W+LQiCW7+bW9O/m3Ux82/PWuRQPFlVgT+XrZr +ykm+AulW7P/j8+PvLJL0TjPQNSmOPPTDmkd+1wcTid07NDFSryirHQ3XaT9y +X0nmO+hPh+Wvnl1fUoPtG+D7a6TXPgiuRYV/6+3PPU/XQj1qErNSnkJHH7h5 +UOdx8qCiV9w8qDB/A9+shJue7WPV+L3A04cvwasusci5TsBn7D3l80WAiWgz +ghYP27dS336IJe1jj3chXjHB8KxerCfQ/yVj8Xr/nbsHPQE84Ej4281PG/89 +36oxNjjri19WE+YT5os3HU7HFgWTuFnAEywvT55f2oPtFM4f0+JsO/6c7A8C +bxFRy+yOtdMwbzx/f9dEHVzs5BkzSOZx4Kd2XebWj6q1uBzg4Td//DTfbW3o ++vrXa89EFlNeOg9Nbrt1Uffit/S+YM93UD5Hz1vQZumJvLPfk/zwsP644hPe +pZNG8p+Af6E5ffv4/KX1yCrhj9aP1c0oK0vuz+ndheiuuCNzLB/yT3Yj8b/8 +FaOmM8kNR6aTe4FBD4+usnpuZtFE7Bp3vRYnvaVAg5/oG9inbb33VBqN6kke +Ny7eeGVl3vdNJL4L5mHljn1OgX/qsX0Gfvi6Z3jwhpHvgNDeswGetvlaZD8X +7+Oe/dJXl9OKDLx3xwWGp2B/0lmxcl/85jZil7j2X2b9rFMXJpI4eeyHz7fu +3DCT+EuwXyvive6JV2IfUnlVJTPLvYs6dM/q7OykYfT+uWGIT3Ef1kNox9Sh +UDXT32S9APPMe4HlSiUV5DsC4FcED+ULtdFRJLf9s69/dmzeXkbRbN8dXcJe +B4E+cO6zZdvl3IWX1LzbcPk4zr/tzpQwFYhn7sH9a2I0qNq/hJzHhPdPz26e +HRxC1iPQz/yRY/ffttUj0D/IU+1ldzc4lkbyF0H/Xrbc6LpmXiNeF4D+75ld +7dihSM7liXDahUQjY+51SRP/Ad47rCL/aqZ5BzrI7UccX5GoWDYy2oHrCe32 +TtMW+q3CwjyAnVyw06ld3IfknYP3H9qwefocJxJ/CPqzZuirc0ISEwG/wNul +i5umGPyuxe+F8bHV3MlhN3s+BV4SOOsVqqGtdmbIf/lvueXIc8qhnNcz7vOz +39sqfGTSh7pGFHn7nFrm/FJK+P2uoj0e5Ls7+BcqUkesMzX7cLkc/RxG9ql1 +nQsd+nA/An7wepzi0dA+7JdCPZs1xc5LBJDvmsDnhb26KY2LSV4JwBkTn9U1 +std3UA8cf1XkehLdJesCwAdt1Ky+PyXrAtDnMfqxZMtkso4G/uctzmnw1yLr +bpjH+ZflL7UqIvHeYI9v96p9enqbvBfGq8Qz9Y9DKRVYHuzSltdduYkJ5DwL +9ldXXWqTOUjWFzBfbzA89GiJBVlfwHvfHQ4bpN8g8lB/b4d8oxWLKnF9AP+p +tUGQ+aoa1wfGQcJxwwHp5TW4HGjvkg/mzpL3yvF7Qd75/JU56e6VyMi0fX2y +EYXXNaLxdSVLP3agiU3XdjqcSuGu435TDuenlN2Pa0dhOdV+qiMpeH/S2T2q +trCjjeQlm6PdaHCunVqn/14k80gN3td9uvhIy6ySLmqem2Ta4plViE/j9Der +TUMUnatHScW8UwtcyXftuIvDRW6vuqjFpjwNc9jr09OKURkOX34jkE821c6J +2EJHvzaW6Mqqf8bn9DWW88/elUrDvO0xMz/s5FBPxUndae08QUedM1bvDzlK +zguKTA251XWKjr5xywHeJv/uXM6a0YaaufKA/9oRO2ctrRq1I079YZ30+pdr +xIsDdQji1UJoZ/97L6oScPb/WUzyf5bd+MsPyi+0PjjRguTr8OHwg6T5jg46 +GNf9ywPysNu28HJ9OQrn8h/LfY/JVeurd9jrDugvmE9XVy2kMeu60JH/278a +XxUO7EoI6kaaQvNP0EVTKJ7hrsaL58co5y3Kbr9lO5CsnKtKZkoKNc+r7dXd +3iEqvkX5vOCedpTC+JOxZtUYFcr/KCq0o4PS+hmsft2qGgXOqn0ze8sftv8Z ++dyjsYPa+KSc9yF7XR83x54vQGUAueVP6Y1/wKT0JVL4ZNn8t53zf3Fs6iB1 +IYomUiTSitaVDjPTdeqQjVxcBV/zGNVybEwm5GUnCn4laJrP5vM0b/aFlOgU +arXy2hx1g2EUbpM8Vf5ZF+ptEbFf8Iei9FPVd0hM+IOU3420GB7oRkn0a7tq +aAnUr8N/FBK6GynLK5PnNwzR0II90vv2v+pF3f4rpdw0aejzjdUTeLbXog3z +5eXG38ZT+UEfbU/cYKHaLc8u1/G2oe2zny5mRY9QPKPzdx1msOc/YTHvItM6 +xFfxvFiImUSVBlt35z1toezWDxpGTacjEW75iwL+lk9Z9Ie8TLhARx/lV/4t +X+bn3/KpgVye3w/oNLSh+7Lt9cEv1LO8tu03q5nUmg/7qnXyaejniat/66/h +9rf+KMv8ceUSvjY0gfvePM570eXrH7ZT/G2IZXGvzdg6mXsvVSt1clmWC68g +He2ou/K3/HORf8tHN25UNOye0obtIatPk9Uwm0EtDHAwvXuRjhaVx49MDQ6n +WNfFEmPjyihrh0Tax4c0lD4tTjbJOZwKjD2oPJ5Yhi5My3jeurQN6aVEReSX +JnL9n2ZKwY73VMkkOlqubDfuXZ1MaQ3PMrFa0kY9+WjmXCRMR0xuPcu54yVW +OtYjRpBdH668GkceWZ3JLOIXaUMPlvae9m/7iv1hSZbZ+za2P+zKxcEeykgt +Sldg99dObn1gnp3BzJJZObUNlXPz/M/l5PlH57h5/uFe+K6jqtkPImqpV1ER +C32v0P/lB2m59q5Tu1yDwjwzhgVa+tAdL3rjs+cMKk9fLbWTbc/PcHFe7784 +ehONfL8o1iDNvkMCe2qG0I+Q8/ID5o0UQ3nAb+l+OtrExdM4ODp61fqbvn8l +8rffOm3OtSFs5+frvlMZrKhE8+ZyxlFm3t9xhCIyvq5xVK9GZmdK7MJdB9E+ +u0bFjpssFEdt/Jh6vAp1dE30MhzD35VS8o0ynxvsbUDTmcdW7spJxfZGK895 +ijObD17BYz95tyRj+1RvNXi34UYnusdveWDJ3Tjud+kBKu3d603rX3WgSQNv +h23VGdje8n7M7HL1pSGjRotXtIYKbFfr3zHjnqxtwnbsHc/e7yrMekpZ7PK6 +jxp0FPSu/k5a+xiWrxx26w3Rp+N6HBZal7jblO0P3C6O1wjB+QlTPPliRmI2 +0SnnRdVvpFJLsf//TEva8kxcOdUwyVv3vHw19sdO9bnKTjOqoHJSTtSxemvw +/DEvNaLCaHMN9VS1r9p5ItkHCzi6bI6vYA218FF00uNDDcgnXOK7flQ/9reV +1ji7HqwDf/s3Sq98GehkU0vt/1h22deS+NuT7obfYm7Poezn2f9Od2IgKU9O +OeA/V9gc+X24keQ3PsJpL/IM+XHKQY/kzZg/5W97Uai8U9eEPpKX8jmnvaip +wv6o2Bjxk89w2ou+inwuzJJg2zNuexdw2ouGE5wkej40oFJuf+F8nt0uoaNh +ZN5U7Tt3ZK1pMdL6stTvYivJX5rBaS+SMrweG6xagvy5/ejBLYd+9Ij/z0dF +mK8NkrkbW1ls/YzabLQxsAW5ctsv2FOxykmEhT44Odrm5NL+1RMkXlPl9/lz +IZrI1UOo1/wJd7OEdDvQZB6O3kK9Zgh8s0t73vmvnmucrjt0fuxhFzp7vmOn +sG8K6lTw/3yjbYw68FVkR/yULsSjEPtnoXgi+mHm+LsvbJhaldy+LG1FJ1qh +PKros7GMMg73r6v+Vk+dOanzSLGEhl53/B7RWjWOvNcI3t5WyaRWnkmZfWIr +HbUMeU7sc/xD5clXrpj3upY6lvX4hfSHMpQSdFbvvv8QlcB/d+jFyQpKt7pY +9LB0FWoNjjbjaeilutf1lvklllMpp6+4xB2tQXw3tJNTszspZsQEww1Tqiif +D5bH5wfUortCayueBjRRN/9ILJrxp5aSab1AmW+mIX1riasWtwbQMulNritj +i6hNNrv7j6azx1HiHvHDt4eRC3/6g6cjFdT9fvPSYWc6es9nveaR6Sj6fWdH +0wVTOrXQr3FA/ygdlcisSLI06kYbzV5cd5PPQXLvbv7UVatBFzMaZPZtHaOo +6R97ypRq0J/jPPoSMkz0xyZxpy17noFnzGTZZ8EeNCSxoe7S3rCvyMBzXq30 +3SH0UWJsqUduB7I+rGNx2zAFrTheNjXTbgxtVDGxYcp0oa+dD5s/PmShrq+l +Gqql5ZS9fLeR2VYWSuTizRwc1WakF7pvoqEdtBa5/+KQn9u4+VEbu9GufYFX +T89tR+s3rGRtef8ZibxwsZt2oZ9iyr4QHTXpQM3Vuqs8+WPQCelV79pde6nW +Q5dCNgt3oJMF30QSdkThcfMpYLamH6MdyVXerIg+n04tqAp20X/XSC1R7rzv +MkhDMpaSNSmsdBQw/ijL+1sjNT3muEvfcAuqOWshFnurBCVvP1zcVs+k7tqo +H6+cRPbbF3L0nNpv8+tc5Itm1LykQO9C5U+8Xsj8WnhVxrEF8zjZ9u+Telhh +dTFnfiOyPnvzTcucXraf0hQ1VzyXEog9E7pdj4EO/Obom7XyX31DHhoNPLeE +mGjS/D9uL5yHqd6nU4p9miuQxKhrRc0TJlJ6zdHDGw3O/+khun5cRUU6kYk6 +Puy7kbCzn/okc8au/X45Euk9XjRsWo9saRz9XDir7z/9RFOeT7024XM9WreL +o4c/L0j+p4eIGtlSelapEe/n5J980xMTnou8mMd4Fg7XIF2ufi7g6Cf66cnz +k0ezArG8VkaNNA2inUmeDoYOpahbP1bw5e8yVMnVW0eO3qJTJ1O1op+Xohiu +3pZy9BYd/1WwKsC6mMSxHPtrt5HY9ZT9atY0lK/clGxzh4mKueu4jA0zecaM +aEjl/45rpCRgbH98Rgsy5fa7FKffkYTpvoihx62oh9u/KZz+RXfjBALc2OsL +3TecOJzf3HZreqxJd2W2YR4KODxQNnOzaryO1eH9q0UfrQbfh1cgDWumtW8g +k3v/Th81uyVw5OOLcrT3YpKOhWs99kMGLebKBD/JR2rZ5y19u0i+JkMrRqXy +igoUf2KN/aLWUmSwjKNX4D90Pp68fiqT7BOOOf+dj5DIrvRlzLRqNO/YOauj +avlo0n3rQLdiFnVxbbtw8O9mpHzlQ+Yoe91w0G9V4/FrOegnEpLqs6lBXu23 +Dcfr+tD3x27fdvEVoC7J4f6Md5Xo9A9Vpq1hGLpqln3bbmcHZX21JSvLph2V +f3/27mhGHTozyD9J7kw1Mg9ND7Q/w/a7sznyqzjy6IVTzD7nb21oFk8C/7ni +DmR84KYBb30eorqv8XxfWYv4zDn6b7H0r/4jS+M1W4PmVqNOP21vuYFeZDu+ +298oMg/dWjhr0n6zKrRx17Qk26+fkYTLzcVTQpspG6bJ0/rBVnSAO34DOeMX +bWzSvbud7U+GOHPkHZz+yqPv/H8Ezkyko1vc7w4nrO7e3Hu2CV3MT6HC+mgo +x9b8DO1OIo7L8Ng/0aVilMSTSJ/7K091u+qFJuu1InM7jjx8Z5m6pJKHHtmK +DLn8z+Pwjy7r8Ds8KKOhAq4d1uLYYYo+k1ndXMVAG7j9sofTL1RjqHh08wxy +3mSFpbviux05VGRvsPTEDgZXT7rRSg6OlDeaRY8Y1yBbfc64gH2VGv1LtsUd +LCTJ7a8JA3/7i/pc1PireGUDmsrtF1NOv1D7c1lNx9+x12XcfUzuPUQU3EOU +WsOxt+c49haNeC69OcejHU36v/YZaU0zuyDd346S8jl2GPS0eoPNKVntduw/ +rOX4D1Tjt4tLktn6/O3MBVuXrdnce58bqF9FudHPO0jczi0fSxc34Uoqt2bO +Uf+nLPTs43y7BLtQvO+6gOf9ofEvbUgon4PDfpXUdVmeW1Yk3+Dbwc6jeyc1 +UR/bH1pHjrD9w2WSo2tue1JDDZkqkyqb0Q6+6h2uGW2Iac6pD95v9zt+f2wZ +2Te+2vO3HDTkrZEnmt7677impo4I+8lMZeB9xauXJxpLBeYinzzjVSfLq1A5 +104qcewkpfNecOB3CB3vMwxz/DQq9IPXEsMkOsoJ75/Lp5tIDfYIqFRcb0KT +ph4QEGSv+3xdB/7ipxr+4tTI25fW7/7QEF/mS49RtXHkpVaU4N7KpFzftmqM +a9HRkraY3YLfk6lRyY1ayQZNqOlrQM753la0N2T0U20C2x1Qjmh11G6ilHn5 +DSeN0dB2ufcBifuC0bfrpx16p7WjqTdb14VFtqH2bxNy9c16SZ5Ow/s8CurN +yNd4wk9dl0G8TnG/sb3LMZGFTnLvv1vDuf+OCuPefyeRXGgqQSf3+Pz5mFzu +ubYBCXaumej8hJzHepgr9O1yVS+e14UO/5C3Sh2hipS9tFfuaEBbLRKEJdeS +7/XiP/ebPm1jYj/5+XDRsberB6gbwz5/1v6iI8c9eQ/6TvVSfSKR6xJetFIH +RMN6JX3p6CVXP7s7vqy52NpNPe/6bFsl34pe5uVP2Hm1BZdXtkZ+vys/HR3L +aHk9cv0tXjcZX8gbG/1vHjncaDXPjdzvFD9t8tC7ABrS9Ikz2LurFa2flUwt +GsqlPhULS19+TuIKGO6+bazXIajJ/er8ve9IXMH+VVOMp/qFoPp5xuu6D5O4 +gt7OZ+dF2PgHhdH6/rMsZGtuzcxl1+9WW432c+8QdFHz+o6e/4krWLvBZmMT +u/y96nLqs/4nrsDJ/eO5aDZ+O5B6M6m9Ga3vylNp3lGINq1V4bHyCkEHKV/r +VXvIempEZGbqTvZ7tX949V3qrsX3HD9j+cmGsvEGI0cFv5m1iKk3eViEPf43 +5XQFRT4OQVPyRn1Ly0lcwVMzlrQ0W17rV9z4gbQyNGQ5ahjM9vv/JG2of8h+ +7yrze0ZJQYXIrYDDM7yflTk3Se9yG+YZ8AKx+Un7t9Sje3rOczuoIvydov5y +6LNVN0ge71VCEd++O7ehIwPHnJdMp6MM0VnMa2pduF48U663huz8/++77GAZ +P72Y2I+iuPcIz+PcI0yd494jvHP8wt/7yxy0K/7eX/bsx7u1EXYtqKr0RKfb +xxZU+cQms46NP6iWqR9g+4X3DrnE1CmNUkq70x3T04KpxPX1s/sHytCSn/dp +z98OUoUR2oe/s3GBT8UHryVWIocTvSHrBXupOx1Oq16nBFO3BbU77mRVo22y +NBOhkTbqqdgcg+D0YOoVtdXqhngtqs5t1dlVwqQMCvuaYtjykx4mScjRa5Fx +fFJSkWkJpdK8jLeYXb7u9MM0dS0amjr3+q/uY7no4HejE8ZZwdT6VxUZad1N +SDGTMWc8kY5+pWpPuM0uZ96X/vbG6w2IWc+4aMRoRoc3mL2OZJdzUSj6de2M +evQi7PSMYsduVCuxunrWz2DqmenGloAFdShZJPibhugAejEacaOELV/0SuOD +pigDue1uWWQVNIIW7LTSW89+b/Radc2X/nSknRrTnac6jrJLT2dNzAimtNUD +skJP0JHErHk/s+a2oMb6UwectuWjmNBXl2KCatGim/69azMCqIhRgS2p/Aw0 +g1rz6tjJNnSyhXMP3UIlzj10dNWuuQZnupCkn03Jos1t1OPh0niVCwMo01mt +QlK9EWW3PzH8Et9D+bVLii4ZG0GzHUqmM9/0o6c6Ao/jdQepV700bcdT4+jh +wcFHE+wZyMXD4/zv7EZK8JDFxFkz+imh7wojju/oaM0+abcf7Pkw+WKA+UqP +XuqWxFf/AQU6utkxdV+zRRklrjjv+KUJ3dTa7UdN52rQkUaljfg0qy6UpvPY +/HF8BQoLjbRpD2CgHYW2YW1TmtCZl2Yzbhd1oKvqm1JDRemo8S5v31BOH8WX +/3TuZpNhtL/BqjDMgIHyWTbDIrFd1Hy7l5vfVwxTgWf2mtl9a0BK7t+DVn/o +w/Ew+yOT1FOy6tHJ0Z7GWETy9lkaHX1RtJmO3to9jlB620uFznv87KhTP2WU +YcTjeqQe9UxmzVerId85g3bbCobta0Lhqy6/vvmoAUVznlT4w8yadBcWylAP +H/R2JXEiD3Yqvv3oyULdOoeXeQzHUjrSJz0dfbIouvET/sIL5Hvf5/hLBRdc +Q5BCoYlRyzMSP/Nnu/KJUvcQlHYCDZRvL0Hudaf26ND9SJ5PGeW1E27RUPpm +zv3pON6be386+HV1mzd9MrJqQV7upl6JPHREcevv/2FzntGyRhSzN3KXPI2G +anb3jXVp1qDhmMSOOtFOlLRN7m6/MB2NXKCv+JFI4kEerZzEf/gB+R4tevyk +4lqpLpQcFReUPaEVeYparV9YUEBZ3fysGsTThUJDSqo28bciempZXetIE5ou +6S3g5tiLlr94p3d7YiPe1/LmzF+IJ9u++vFJkt/y4AmjJ7Ok+1GF+8NFX0V6 +0IGXOrX73Mj5x48hKe9kU7pRVzun34G/vntnv0odYI8PwW2nTIL6qHuiPPLf +344hnV3N47tdSH7CqyqS/93DS81zvvP3Hl7ARef1KK95Mkh13RfL5xulo7Nz +MkOX1MD31WHKPULVUfptD4ou4DlgyNOO56sLGRkWE+RJnNIM/1015dPaqaEd +jLS9cwmfOL9+m568cBONvX42XPtf/+Lz4rLlPR5nSB7zNE9F3kL2/LVCtn3i +nNMkrmlssWTnEBsXlBoQ9e4ncU1iOvEvhNjzTjuPZv6xMhLX5PCbeiLAxi/9 +lvkcI0L01dClnOe/cobOeO0a9yb5MI80Z31z8A6hfr2LYO1gz4+QH9/l6UnH +IrZ89D7zB/PXkHins+hd/HO23grxWmXwHKehQu46dvWDmicP74eg8ynrkcUK +Eu8UtM/qXTG7Pi8VXpzUX03inTo8VebbsvH5+gXGGyeQeCdFremmDg9C0JFY +Y15RZh4ed6Cfmpohv/2ryPgSmOLjdOZMN9rWzBTwlWb3yz/327ZZ11BNFxlo +mUBVZ+TOHmrPQutD+m1DFI+k0njaChLXx3tvThYjZYjq3Xh+udJXEu80i1M+ +de0B8lPqakBUuOfY4pWtSM1aP8lCJw/JX+8+knivFtnoFWmeHq7F8/Xz6Wf3 +z4gn83ps+7FDTL0upPbNvkNyHh3lPadZMyuaUX2Xa4yxTy1K27rygzdfPUqc +XF16I42FzPJ/RHz+2UPduqslraXCnoeWcfzYrRw/ljKl9nSMHW1HgeIu+hVn +viDL0dySeuF26rDPoyOs6HbEz3OgWUm+FEm/772rfqyd+po7w/1YejNS3fyp +7MG0DiTxpqWOT7mUWqDy7P5oQS16emzDgpclTGQYIfLwTGYwmmdjc9q7rBZF +Gwd8WHy6CTHGbxodSwhG8eZSO7zO1yLbTIn1wW8HkaKKxVQ9tryyo1UCX3cp +Cru799q1lmGk4p68lC8pGMnqZs3ROF2M3icckXh1ugHdupg1vK+EgRzUpwZd +9qEhqiBDJ2VNOzp4+LfN+rwSlPO17ZTsUB368etIVFN5NXXQz0PcsKMbGVeG +jUV3NiONmtZAx705lJDB/m9ypt2od2eP03/3LYqMPyoUz/2MxOjhJzcua0cJ +rzffO7qzDa0+4m33p5ZJlYRbKhhl9qJ1csmOfZVNKCzF8v6OPeWUxHHtZROE +epHP9xfeTq1d6ML8rbE/t3VT1r6yy9qWjVBWbo5Vb70aED1fLz3nezf1VF3e +Xu3NEDW1Pj7DZhEDRdZz6sNj+Lc+lJ9FjqvZ/VaUNnOexdeuUWp1bPy+Rd+D +UeOrrELza0z0cvWBcp+gEaqmcZbZf7hGifpv02Qm8th0R/PC0SHK4On0vv/w +TNlUpr1oPXKj77NXEh2gbN51621n8/xtzPHTfcd6VGQZ+0Mgu5eSdnt5fRcb +95EdudfMx0K8mSVneZzY+hpp0bGEXc72ptrQ7rcsFBBsd/L+pQ6q4sqVYG22 +/ATXuZ/m6TeglPPOje6MZirE9I6637dgtHwZrWj1rEbUEhuUPbyHRaXZqwWo +s+XXSRzSNqhsRLIsXuG6RDoVOKA0WZZdvuq92eliIU2oaNyl7bDdDzTNavxM +RWIw+p0nuavUiIZEA6uuTjAtQXNHvTbSkoNRt1SB6+gWGrqmo7A3xLkW9cSI +f/aigtFV2+jHufNo6Eus8uo1I20orv3hRh/2e28rlBvI59SgihyDBVIZXWhX +wvDZxez3shiOL0LYfiNv4jodRcFedLbjsfGX1GCU0Bmq3bK1Cu0V8io6a9iP +Cnnn0dex5XXEpu+t21aB+tT3nM9UGkVzeIR8hdntXaZ0L3RVcgGSnGkibtsQ +Q/IYuNAuyzBbUGgBR2+fpPxY0Z9Yh+ojx3Q92eug0rH9f8eXQ8Df8YWSpF4E +FLPXU4ENSnw1ar2UvOR2DSnlXjTfcp2rA1tPOnbONWBu6qUypdOOub3qRdPa +880zFjNQNFevTnL0CgVkHPJdOcJC57l6eIajh2h4tkZw0VwS5xEh4ckadO+m ++Mbemyk7dKG8TaZhdrPSkUeETAkjoYU6e/jx3TydVnT8yqWNeYGtaDvNcY37 +gi7qSua245sl6WjiwIE5darj1Gbmgi9zvgVTli9VpycWlLD9r7CJnfZ/qB6H +7VXf2H7yuNC8R4+NSpHI2FKNqQfKqeBHVcv/8/Md/jSvmqlKQx//jL5VYOOn +Up1/LWfznKRocrjlYjPbfw7/IrPyEVpaqe6atec7RQl/KJLMbUEN8mvvTLzx +Bz1VOD/H8EcwJcxv97rako7+yJkw6PZ/0CThFVc+pgSjoSjd1Gu8uejNF03t +yWnB+Fm5XVLV7zQNRQpvvZD00AupTNb8cegjhc5stV+12ZKtb2ocHhQj//KA +LAWuywVNpqNtBW7GsuE9VNON4QdTRweRcrTN3OOnSF7ZNYY6KV9vD1AKGX3G +h+83oVKP9HKr5yHU/rrtL1+eq0LdZcskdVAbWqXUH1D0oBGfD/W5WvFNlG0/ +kgUsE0vukfjVYlvNI44nGGiq3zbjUL9ulB9vv8ru8h/qjqRrS69TL/J3v7hz +wrReZHzJI3Z8YJRiSPUyF++go09P5f/eT603dv2/+6mpqJeb/t5Prbsg/67F +4xY0IGn9/vjcfkrXeNmUffXdiDdN/s3LtV0oKvSjWOH7AepkicIm1kb2ul6P +s47wGf+7jqBy4+127ftCY8/fyotbNIKoN7FqzEOKtdTs7IEFh4JoyGRx1CP5 +oPdI9pfjIrtn5ZTsxcOP9W61IovBnlF1z/fo6KLNnu6vy5Fw4/bkN49p6Amv +S20I30ekEGjSF3+GjnwXyh35FEFDLO2ZpfstP6CNK5+2/BmtRUYs2c/2ITR0 +TmfWzXCdfsozqvP23qgR1D8nqD3NhIFKeV3Xf+3qhXPG1A2Fog5HbTryHNl5 +dGVWO+VguefS58Qh6pM2Hz31YCMSv7DRu+ZMO6r6uVlkYsUgdbbdMEnFtAdl +3Ln09z56x5mRf++j35YU8FxUk45evt7mesypCxnwS2vkHB2kfv5oO1eoTkeK +49kffX5EUVHn17c+2ttJrewXd/f1aEPZnHhLpCtm8WC4vYOyqJVe+SSyA+/j +rWjadGJ/URdVGabtPHS+EdV//3hobOcT6ungzGzR5Q0U1bh4+zUWDduN1xy7 +QV1SUjvstZOFlqke+kFLD0Zei4zOL2Cvc08ZNm7LUGlB3ydz9Ll7yl99phj5 +6y77P2lBcutn7tNaFYfMbXbc2JDNXm8K+xR0DzWjfT08ctVXf1Brz4beFWeP +3xeqAaJlbHt77OMUA0eTXErQYoXyArb9zEscnuq/uAVZaJnJaLKi8bnI+6eH +PA3Y4+j9SkrHszEax7c/MDP5HuDdguKjE0ey2fbhh4t5sElGMKqfVBupvo2J +DHZmztH98hLVfsp+88kjH20y1E1PuM62h9mc8b6q9u94R5u7pw/qnyN5VBI8 +2rIimF0osaWZ19W1BQ0/L91Wqg/58AeRxu1mjUU6DKS26+28GYYNlBTXT9wi +lxmnd7QJXR+tKFg5gU4tCDbg26rThxjMDV+9ArpR5HqBiilLe6mBLEXpF9qj +yDikcO61ln40feVO4WzdfnweJ/HYAoklzAEkfG/qM/GGbiqkoVBCv7+P0u+R +bRqbwUC8qj/1x6lGdLVtwGtPYDu1T0gsULmHhfZEMNx7xsdRq3hV1zq/EErJ +VzbzoREdCXHL8eeUg/b+zhnXX8BCleOTDMszu1Fb+svYz4Yj1FFh7cODWnRs +//M49p9amRswf9WyenQjZ6lpGH8L3oe/E1X6VnMiHRkLdRb2xTXjeDxNofU9 +6TY0ZJYqFz6B7V9GD0QO3XoTQmWdDGc51zKQPlq5sWZON1IS69j3enIxtaQ2 +RjX5DcmzMdpUtVWH7ec3XOnf/e5aOVo9sunmJ7Z/oraUNyGXbc/NNAZc/lwp +I/cDbb9QsoItT4/fqn9kcRU6orVQ8BTbP2kfanX4xZbPbswKCTpA8mk0OdNS +JdnyPMOH/I0Fa9CN7+XTldn+iW+q6lQ/9jxSeidvytjtapRvpVXZwl4P+g2L ++T5/HUI131zHMtlWi5aei0qoYPsna5pMBN+y5bWFlNUru2rwOjFYbdLATnb5 +Yp1tTwoHatEJb3+J7bosyrbL6Hn4f/s5Hmv5pX7UonmbrykF7ihEmevDvqaz ++6vo7lbZo+5NaOrkcTu56z+Q288o693scfTQ1D1g+h7in9NNLS40eYVQG4QP +j0wQbEAPPWNvH75bi2Y7zxwKzAqmLPgqGwXqGxDECWk8Kp/mypavfFLn4RvK +RAELhZeN/Ocn38/o+J0TTKkXBqu/t6hHd4dvNa5k+y0yj3T3f2XzFpjFqH5t +RPJpbBH2EhRit6sJ2V4V+E1Hd0S046+w/RY0pCf9kS0fTRMXZCgwkPfpXrun +7Hllg01yrT+7XXuuMAK/+9DRI+89GwvZ/nZczquYBex2Cc/fy5wZQUcpD4ai +fOd2o6H7Jw/caSlCamnPHrDka9GqVI69CufYK+T9a55Dun8b6lkXHMh80Ezy +8/zx7Vx6luSlFZT8628gfvktIaLj7HX+Ff51A09a0S9N0/cppZ2IZ92yuO55 +LLyPKjJQTb3b0Yl23AvSlxZioZh9CQcCeUi+C+fKg/aRg/XI2JuxaUyQ5KkQ +eheNTloy0HJ/jn+eav7XP6dy1fO3WD5rQd0BQytKNIOo3RGpsecVa1Fc+AfB +n3vakKnd6zu84vXcdV8/svKeeop1luRzuDaJPijSyLYLhsczFRx7kP19xTMt +zxhUrM8r1VMtfVTVwRolafdm9JO77jjEWXdQ/MxoOeZeOnJ5Jrn+FX83Xh8n +Z/e9TM6nIQEuD7kcHqg424vGQhJ05HpRqb94OslvEL+9cb6uGB2vg1w46yBq +fMnlqEsbWXi9mfBh3pz2qGrKdsHgwmud9Sg97NCeObospNW6d+Krn8FUy9Kk +JC+2/L7f9f5njw6hg9Efl4mw9TNt8ULNiwUkX4HWFa+6pb4hyDl+QcG99Ux0 +jGtPoD8HQuccvz2nHh3M5dgf+G7oW3DnjnNkPTo6tVT/1N5+aue6/nXd7W3I +aeqtJao3GeiNl9HTzKBezPPy/1fXl8dD9f3/V6KiSJFSCqUFiQhpeYlSUUik +UJY2aZWlVSoSrZJKSpISlT1KlkNKSJbs6wwGY8YyY9/id5m5936+83u8/7oP +T2fO3Hnec1/n9Xqd12KyzMpsfT0UvPtz8HxaL9LSG9x9+ccYiBqikhHZfrii +xllX+HNY8duyojKbAnD5vJZMVhs4HbvFnrWmAGm8CXCLVG0EJdYFgzTGIGqW +svce9xuHf09LuXOmEtw37Nex2t+L+MurfMblCdW9bMvd6mpQs68zU8xiIdfu +D6O/sPF9rPJgBe9acD4JG/2P05H6cMPJT9h462z61qF7dcD3UC/xmFcdwraT +FQXY+JqnJgaZCymQKhyrHWlaAdYCAXbF2HsUfc7Kzim1BSrcXcxrnDrAjZa9 +VwOb52PslCH+oQY4ErKwAJNvsKQqIP4ohl9rXqHLvFoPgmetTySwRuB+9eFi +M0y/tf3wcFa3O5Ww6204dj0UXngqGBzVAgpc/+o3jn8VGB7TBzzeNsHNA3MV +54t0gvVLb+FUwV7YWU+focbA1gHXni3i2LNI/XB5bwc2fyTXT4X7H0boontV +nZug/Oqw4NWoNkhyE+2vfc+GW5QWdQ+zJqBlc+wCvhke43YBnLa+xzqwrAkq +tn9/1bulGxlOLry115iNmH4GAwqpjRCoz8EFll+aWTTAQgpWhxf3xDSC7ALx +wRtjbCTR+uzPt1Od8MPb1lzPjAb6sXKXbgWyifOsrFbTyhdNVHhnrmN57S0b +hejcp6QPdqFNIgJX4lhUuKbP3/8oj41mnzX0SRTvQSJ+nTaBk+vhpY54gkU5 +Gw3Xq9bmOLKQpqdNGfUXmf91Ns8yftRoFH1k2w7772uGFW5Bf+bptRDnXNsk +d9YaFDWBvaelR2NXN6G3B0nsfmeiWw+Wtn1VXwZZMOdyut/SVEwPf+J3d+/G +btjfpXxA7gIdSryO7z39oxuNLLY9tt2fDV7nvTL4D9EQytq45F9hL4r+nmE/ +V6AVXily9OGckAl9GOU2dP/9HcCEs1Ps1skd+wRqmWI10UN1qHKoSLvfjwln +Oo+aiJtWg4jOWTPHFhY6kfwuLnotCzZdlwi3c6oh8i0ETE88Ht3GIvSoJI4e +hT44Ke0Rw/TYFEpa8CorOuH/M9h4/4W1eDPs3N6doRX+mbBvUtDjkwpFTFCd +z7FziT5yhwq6e06S/jo334Co1vAKkMj5Nxw5Wg/f9TjzEP6wmvfqqXQK5HL1 +5LkSE3oy5PJtD5TaxITpLM7vatKd+F2wwnK7fYMnxs9Nzu/C4wJWuZXotp9o +hSTu/ePfP+i29MBWSSrYqFW575hM5idGes9LPCZNBaWVZ/9KpZN9bdKWrNXc +5dcHfOqc8US9EH4BMb5FLdDAldcphlnz6ZjdHdJzZtVTDTax72/NfLolbYQN +lwoEDI6cp3PXTTe6IfRVeWN4D1SGxeooramHgxdu3DS+0wJSz/qj+K6yoV9n +LODKUioMK6RsECyrB4Oregr317NQR1x/fLkEHfST74dWuzMgGUWenORXCX9F +36QP/myEpzm3AtdP/4vSy1ipWrNZEP/TqLxJgAmTyznnax8552vQydykXVhD +g50n8yJoHxtA9cZtrx8SXeD9NifM7iCd2EdZjPc6h0ZK4c7U1brf8hugplru +5jzRTpTtnu3SYNIPSwoNDA6kNkMdF8/l4GirSbPeti4qNEyxVFJA7ajETask +obMP7VqSrmxEo0LLAdqlsDWp6LdzprKQRRt6d8a7OHcuFYYu1F1WtWgB/08O +EuwOBlqtZlm4J6UJfslf3VrYGQM/M6csMnJuAJcEn9uPMygguXx1cuDCHpTu +qy29CLufnBt1zlHbyTqxm/evcRoq7kFadm5P1IKo0C64eYFjcBuhh94NiM7w +1uoi9MD3ucOYlt6NDgYWJzU6UuGTMcdekOPKg+jhi078z6jEPt2xpbbxe0A3 +ghof/QB9BoxdXJlbf5oF5X9/x61JrERrTdD2f0YUaNNvbrn5pJvIG9KXb5z0 +cypZF8u74RFfnDML2I7FUWcE6uEcZ/9Dmy4mrOdPG4b2awckTY+T8RJaG9G5 +tpJ/qCv/RgIds+tNTxeq9YR3EHJLhPrBQlidCmf/77ke8rZem24ozYQcaf0N +jctbkKLY2564hD5YMSn9nvS/LrBMlJM/gtlPjITai6LvKpGq4NSNTXIU+GqV +9XtHSDMKKVoUaBndA5lDQ3//GtPhnNhK05+hfShBzaHQo+MfhGRu1RBwrifq +Ij7MOVorgOkJeyo92ZG7ybrNVNXwY3b+EeB8MbW84BiFGw82gkS2fN5ijuGG +KWPv5D3xeOAB9F3bqE0Fw4ePFLpfkKMR71FgRTRjHjY/+1OHvsVisl49O+XI +XnEM33Y++D7zDNlfw/f6WbHZGC4tWKbnN9xCyD37NffDT2Pz+2fKRc/1ayXk +z8aeG/PWYfjLrHMaDQfI+vAa1S2UJdg8gRE+HWKiZN+Nv6Eac98+joBX6nKd +uy3JvhszJoucscLw3KfZnZn+ZB7TJmXMesBw6WFGSzKzgqhfN+SoqXoC+951 +zfF9G4eLiTppT2xN5AdfRICDSlP2Stk/UMB9jkqc54g8A92u6dykA4Nz/8jV +TmTDMDb+6Q1xK6sNZH8KicoM+RXY/VOKr6vMya2DUa6dvFChr04UwzOLz0Vc +u1vGKweQ3Z7Y7NsFdVy7bAidoI5d18XuU/sqYv3LbeSeN/Ui98DPoeP8y6YK +OGs+JfsLJF684yyDjb9pdvB4YwrZL0C6gzZzLjZ+2uxv09WVW8g6/5kPHU2x +8W/R34DDuXQi73Hr4fCrEhg+zZ7vmM9mCpzg3qfA5+h7muPf27toi8nHWuJ9 ++dtv3qKM4ZNDfEV8h6uIOksHG50bRjF+pMaaDdMMi2BbvqEbzYcFeP7Xb5Ft +d2UFu8GBu78T+V8dETNmepH1sobiDu0tzmlHTrT+j+l+DfBuDuv72UWvUcYC +j5CFzgz0xEx9fe80KhzSWiGZ60DmU6tFRJebV9Ch2oBjv+NXI+uV3oFzaSC5 ++9qed/u6kFbKxws+H/vAd++Fl57aTSCfliPb96ECFEZXKsXEsFDDwTuLK6az +YM/7+JJS4xxkbH00eu7mDphuE7vQ9TETZpy+6pW4uxcd2bx3/u7MISRU0vvj +6wANvseuyFHvZ6E71BF3y9UDSPly6Rf92fWw7N1quVolFuTGlH19bDyEZj7o +na1e3wW23Pn3ceZHczZ7HKmSJs8ra5+OtbAxPhfEhQoWODHgAfc+Z3HuE7xt +1Azn17bC7BOp1kxKMVooejA+9igLPnbWwt7xfkmHcwUGhlkoTMlCJ3DlAKj7 +vT/8a0Mz3LzI2Remc/YFyHPZsePeVCoEcvfHC5z9ER4Gtl2ymE+FX56HfY8Z +kPkBan2ZQbqtLLDi7nerOfsdelwwp/JeCQssuPvvEs7+iw7mugUszmwGAe4+ +ReHsUxB51KbUW6YNOl6J5Cpg61M/lt7XfqcLCnqlvkuHtAKffLVf0N56lJSg +fexHTxe4X7Lwf23VClNLu4Y8bFhQWn+ZunbWMPrp0KlQONgFbX2bEheMNMO2 +nLVVwtHVYMz/OmrfbgrsOXssoNneCz0e+B7VkUtHXyUMs16PUmDnmduB8ovw +fnGjiH7iXtrM8G7oLXaPuaLYBWf2Ndk8opeBbLZslt6BOqjTZnyfo90Dyf3m +r3Iix9Dyj00yK/Wp8HKdZJRgZDHS3drjNbifhfgGcv8aq5F9imUMbRZ7ybLQ +k+KX5b7KVFjfVNP9wKoXPejZszqotxV6Ph1QqX7aAB389wOel/Si2wE65SXY +vvK1qf+asDSZL9929/yONzIdoKvvMjobk9tbL2a3Pr/Rhc69V/qZEtcOZypW +Xfg9hQaG3P0LP791XTtf9lxZE2xJ3HaaFthN1A+p15JbpmVF9ussiUIZSjLD +oBzFltyygw6xXu8/rjTqJs572WfnStVj+pIPatLQ1O9HhyfLa1Y5jSFTu8V+ +PzE7yJJ7noufkyu9K1sdZNUEjtr2IVtselH8dHmPaWvH0MP2Ov/XBs0QGnjx +uhOjF3X7FIrGHhpBcslZSfprm4j9+ntV0Fbt9GFU0dhYf1KiiTi/PmRX5h4X +0oHsC8v4Xi1qhXfej9+t06uG2YJhcb8DO+CWl7O8gigVcoc4cSmz70/EpYDZ +sisl62k9hPycv2Jw1+oFQ6A73zaHb1YvDHCf+2XOc0e/zU5t6G6nAoO7ri69 +Da85pFiN1FYFv7Gh0IC1i7OuJAYn1hXcnPUsQi23DfpiOPaUH9e+i1/I5/84 +nwbLtnDsozONE/YRBITJlepdpEGiiz5jrKcVEt2SpPyEa2GX18vhSwONIP9L +5fzF3T0En78fXlzwW7cZluyzGwv50QKFHqtCDuuXg3bAaVNZzC4O5NplKzh2 +GSTJarpJjtJAbJf94D1dst/HpkNDESJL60Hma+bkYzN70LLjRcbtjxmQn/2z +cPmaRrh2u+D34FU62Db293u/KYEbCy0fLe2rA0M9K/3oz3WgtFTpnblFJyrM +ePklOJ5O+P+vcvz/4CpjsqZKowfS774bi50VjaaXbfpbJY/pBb9Maa/vUGC9 +V4HRdsE+dGfu/jF5ZSb6t2+tglMmFZKkqL29GM6/fedimjETdUtlCEzKp8Lm +p89AXwwht+iHIlI+bcC/SjJRRLwNcg1PNktP7QEdR5ffFkJjkHPG7udMdzp8 +OHWkp/5mGkpha5iUK7DQiLVRxah2G9gEHTqrtOgrMjF3EFDJ7UQvXrafzHJo +A3W2Zy2/KhuWpND9l/QPgMWmF96HMD28NifdWPdQNNp7Q9bbnL8U8j3Dtqth +3/udv+3LJMtu9DL59WtDfjZomFS0/5lZD6cq5srIWaWjfUcvOzaHtqGpSZrJ +SeJUmP+sn2W/nAVLsx3yr0cXQVKY1rWcJXXA/2J5gM+GTgiwePpdI70QJm97 +HtokXwcD8b/shd0SCT2I8u0pP/MfBR5GcXB8nx9zXv8zqYMJti848wt9mZgf +PZToE7it1QD/Ajnzv+DMj/b/rpoT690AyQ6cdduv4NW47lorCqjsd0ufQoUL +nV1FHTUhELokw7JVuB3lVv8KqtFrB2lR3/DXT7tg/czuQwcGx1BeCLWeWdUN +t8+UGVwQYyDlpM98u9/2w7SfCguW+3SDbd2swT1VMeDz/ce6sE0NSCPk3uDR +UCZQ5NWML6j3Iv0ZoWukCsbQYMvJ3PkPmuH22dRtlpUx2O9QXGm2vwEGb82+ +8y6dAle/LJbIk+6Cig3O016NjcJkQWnRHM1WYEdkFkbfYsGaL29OhtweAYfT +n5a8i6ND2vbrNy4JscDMjDWsuWkYCpOb7xUZ0WFOoEWQZ2gcqB7TfKgOTaht +yad9F7OYoC6ubS6hxwQ16q83xxXLkcsN/V+pw3VQHP2p3OweE8q8u48MBZeB +VrJBSZZzI2zpLNluWBKPGusruzT9mXCic8ZxZNMG+RZ6vsWf+4g45D2rd44O +CzXDo9MWu/8FkXHL4vsXrH21ohWG0b8//xPPnL5K+nuMQDqLqL+EP/dvy/J0 +FQbG42AZ71ytu8Hpnlbowp//UMBY39GOHWQ9Qzx/3Plb4GVpfrJeqwinPwt6 +OTikcqS3DjIC3b+s29ZF5LOYvM/WGLmP582lp3w0N1zTENQOcVKGEVbryTqb +Hf4NEcYPi+CakdAMlSayT2Fa2UCDa1Y7ygkyPGsh1QF/xamCJ4oTkOWaJInK +tX9Awa4P7t0m+3Fsny5VXqBeBGoJY5g+V0fYfbeN1h/UjWaD9ZeDyyeLMWD7 +Ew+xpA89SEFP9YDszEEkGSi0OSGTBjaSgVrN+5oJf4CStvTgw5cU2C6xent6 +aiNYDDpW7f6G6UVTZp/0X0SFOXwpu1KXdkKGb9abeL9BpPUlTcU/pot7zkL4 +DdBCd+k9D7fS4KKZQ4iwwG+09FR2WeLdDlSSOq9KfCkVFLl9bYI5fW1QcEPe +1xdJTBA48Wf6+O8N9Vd47R+eAyplcWUtRkwiLhG/TorwTlasIOs+Jcg2bTns +wYI/3VNjgiQY4Liru8ihvg4U0Xt/jVNspHXjz00FzO6t5voDUzn+QNSYXhya +uZK0l83q5sRY+0cgw9Nuh9wVKODOPe9jcM770KUao5++Fkxi/56ueaYo/m0E ++mYhZzHNlfA/a5ucfG0+gtlNzD/uk2otcyF0lBNXnMOJK4ZX3mnWgjMwvcVq +mYhiRgOxjziN2N2cKtYKZYyM1p0Hugh/nVCqRP58/SZCb9nZlnc/nDkAmSNP +wl8WNMGgyGlBXWk2EU+nMauj3Gp/N+jUHlx1XIlB2AFeGyRm3ypiw2epFwqK ++e2Q8OTKVWG7bhR0kmmvrkIFz73xPdv8Igg+lgxKPP/gxYTpFn+8g168AVqB +nW7AyxJ0ZL6H4QcnJuwZXF8fwvcGkg+fyw/wKQGDmddEpbwosEi8d4vv8wgI +DpvkkHu+GvYmx20wwtbVtqV3ti13aEWsOZ5nRf17QWJbV0X6rxaQuyDiLf+x +EyWXLeL/ZziIFH54HqZOa4FyWfdttGmdRLzr9VURzuVLW8DYii761bQdfKEl +UlRlAC29/Wvf4yOY3sny+71SIBsG7kWy03w7kM2kKUYCVzogsNhJWHFSE8z6 +o1ryup2FnMuLchjmLfAnb7Rl+Z5g1C/pkxOp24hkO+bJROdSQNBaXLBi6wui +v4n+Q5dVL8ooxPuC+2PEYkKEX+xoAvYgJ57to/JEPBva2aU3qf8YBYQWNPb4 +5PkR9sdKd5bBwVgGGM8yMfhgm49qLSJDS9PD0aSNf62u7iP7lag+UTXY8iwC +sXRP6U61o8DJNcpBKwrjkQLnCqZ69zJGAxhQV0ubmB+XH4zD0s9KT1PgzHbO +fmTL2Y/gcMycUwEFbXC0k8PPtvsT/ED9PZZ+qwsTTnPjmRdy4pkh049vm8kV +BiT4c+RGAkduwHqqckKHKRk3qOEzETcIc4vz5jeaYHZZaRRrS1otejxZx3r5 +aDe40YaGxM6ywWRGeMwqZzY3/n8IlphteeUs3wt/hc3lL5t1I0V2eOmtDyPQ +Uvo6VZW/D8QevUlVEehFh5b+EvghPwpLp8o5zk7sg0Vce1OXY28iJ+GIq2Iy +ZF+PrC0T8cCIcjadT/4aEw4J/608atICHZfzL1oXMdHVhAR7i8omSOfKkU+c +OGEUu073hs3TJiIO47rdHzNFjP99z82ckyTIPnxLBu7kFb6KQKM5q5fpLGRA +2zxrpv1fNhGvy+cbaL9mThM8sBG5eH1mP3H+zhJQjhi4WA8rufHqTzjx6kj4 +4WRHwRIq1G7eOVG3H/fbs6Z8v5nZzIAU+jzz5v1knVQtt7ayKjkqnNkwPDye +95QfnDWe94TsJ00zCMPsTbe6Y4+UsPu6zbmiB/k3ab3Y/jXF9ujlS29b4Ue+ +tkqLOxXppV+0MbhBAX31elOPh5g8qKXfjlhTiqq/b5vkbVxPyBFJ2rbVtpg8 +vP2uPVudWQY7H2rUD46NoTuSII2p5ojvWJqox6ZSIl6XsueArhY2XijfcHYl +rZJYJz9WomcyGF516VlovkoN4R9z2euxYxE2z4ZbTTUBYTWEH9/q8tcXy7Dx +GipvyiahWsJf6tEerLQBw235NxdrfKoj/GbXPmYuXorNU7OxOci3pA4qLj9b +KjrlEeFnckY7lU9pkPvs7s3FF5+HRSB3tGhmVngrEfeSqRG7aBR7vhv3yr39 +Jd1K2EfHWYEvQt9HoLtXRbas3dNC+NnKjQ32zsW+93zoqiVzYsg43YKsqbYZ +ERGoqSaVPb2YrDunIit0/9DjCGTE7D6T/74BdnD9bz3yy36WBUcgtWklX2ds +IPsxMBphfgo2vrVGaelZ03oifv72Op18K+z+r3lct0hEeH2DIeD/NjSWg93/ +Zw0Lj0URVDBJcVgjk/2UWL+PTnUsFz5Bgd7F0vbZl8h8Glrn7CLLhXWgcJAj +93A/3NWEu5e8H7bBB/jJF+vRCskv2CfkVWmwM1ou2ukYDeqcotRMXOpBM+/K +4Q0UNjR2XXs2K5wO7r7dzyLl+pDqaL7hwsn/IC/w5xWf0/VwZfNDtZEDRH6Z +Nr3g5Jja1XrYJsbveEufRdRRYH14UHFhExWqz3LOm0SzJ86bIDzbMTr/Qhds +/7/7CLqx8ueyXYlUQi7zJbcEzZbtRal9adeMHFqJvModOhN6ETo7X4cdu5us +o7s29MbSu3+qkSfFKiu1lQJfy6U2Cj1nEuvx4NUjPx8sphLn+4c45/volBlj +7RJML9o+2cUxxpL04x6vbRjeerYJYr8nB2fcaib8hTsOO5f+kGyCVq79a8zx +q6BZVlNm76ingcv+qmzboqeEnrj+UV/cDjsGsY4DcpYOaGDr7dIyk4DmAxTw +HHap21naCMc3Ki26hu0jZ/+6oS9vmsBYSSD/ekg/uLcesX6O4W0r5rIu0qgQ +f4HzXuB6ccXXbGagCwWYQ2lWNm2tELzqzrofVnRQKjfKmRFGg/Zazzx1t270 +Z7f6n4DzTPjjfTnU3LURSinCFXczutGRqfsdYgT74FboTlbWxno4oNT7TXKk +AfmU2RywOdgLcLtZ8ti6LjB6oDERb6Aj9mI83gCOr/ih3dDFBr1XxQn0s72o +7kPaGRvZMVgTcmVYtA/TdwQ5660zfS3lOJuGHoulC/f/ocAd09TMO++H0NQj +wfv+jOdbJbzKCxisAP38xAcW4n3o562BolDs96YkwtnVntWE38P30bWHUhhv +dVtm9aTEVEPLvrotAzfZ6PHfM2g8nrPt5MnSh0a1IJI0UPikvhW1zPumYvAz +HLlXRt1beaqOsA87Nxkul8bmOZqE5s9zq4NzUeeL81KoaFXm6P3xeda4bjhd +IEgBX+FnqZm2pfBh1fVnPdnhaOXPJ6uMlpL+4eTsO4kLx9/3p6sefGK1wD6W +UWPVIPaeCdzkM8Duf2Nxi3LVbrKe+YyLHmFDTyPQFKsvJQpLG8Hz5VU7FZFu +jN+bG0SywlFHhG3vnoh6on7ORrVqgynYfSaXVvQs9auHqAUfCn6qjgAjbGTP +D+x3NS6IfrriDlnnNrp4ZpYZfzcIrihfbetI1vF7PmdF5PdHXXAntac7sacF +LpzdP6FP4vIpORR5dQi1QNWAhU7yWgYctHn5uV2rEJVR9l59SGuEBO57hMs/ +bbG5xz2WNEF95LfPdxlswm/2qyo76GAaFY5Nla+kvmMjQ2GHoJznbCRgbft2 +bjUVpKSK+sf3WcKffSd4T5lAPSyymPqlKL4Lmd6IS5zBN4ykPngL5sk3E+cm +a8ZOuCzN60IB886fn5vCgM1cedX6e0JeoTu7HrdIRLGgYzbH3lHrm7B30Mo3 +UW8nR7RA78CPiXV4sWFC7qEFJ/8dWJBJganc/TSZs5+C2MG55nuX0oj9F7++ +7++6PTuHBiVcPUT/yoQeAoN7vwV6TacC24GT9/qI69c6f2UpEpUgz+U3zj+S +eOb4CPKumxpdtK4bTPwjXCjSPaimt0rAx6Yf+Rr5zs14ROZrOKgNRWLPEdUH +0p6bWpJ9g4JmT+RLorxJG55JbGfAL1sly+5WBhzxutAuodqOXl2frK0tRoUn +RyL9pI7/RcEpMz6bD7JBSkj0pq0Fi7A7qgrlnipnDIHhTbs4jYu9EFv28obR +jk5gLt/n7XB9EMqiCibt/toC05S2V27WbEKU3aI7ymb0oZ4C6Y0bqukQ3zgQ +UBFGJZ6jj1bSsa1JrbDs3eiRKwV1RLyEtE7vZR8Lsi/M6Hbhh4sN+tCdytU2 +lA1U6Nq7q2jfKyYUyaLhXa970Yj0yO1gwS448HuOffGfNiQ8/e8UT+cBVBcM +m//daIF1nk5HTO+zYYHWkKsddRCZupnsU99KhTf2a8UWKoShG5UphoZBHai9 +RfJcA2qDSIbTRL6eoMfx8Xw9tKe8jy9vajPU2W5yTO9OgNeCen82R9OR0HKv +HysYTPBW1KqYlx+P8GvHsyzl0OMUOML1k+hz/CRw4tR5CaUqCkwR4sg3SsaE +fIPMdekZZi402H/P8/Uc078wJpDBZ1vfCZVV55etessAyd8c+exyYEI+o7qb +hz63D1LA6rbVkivXO4j17q01M0SfUgd6XPt3Lcf+hadPpo36Y/pMMlefxPc9 +2fe6MjSdJlC9zelHn8bpRw+RCrcebJClgmgJx24qyJuwmyD63Wfz8b7hr1Ys +32gfxyLiV1W2sxrXmDVDn/OQacESNspI+M4W3T+A/HYrdPXNxfQDQUcphgwb +yQxsnDFp/hBq1Rrp9HrdDDPVxo5cOZNF1K2VSHXcrZvEhHnmQs3sT1UIl2fH +LXY2RC1lw2tuPmM4J58Rvp/fu31Qox5OTLaI/pAXB5tYn55/am1DuVfV+pIf +thN+DUdO/hFqaoyleg23EP6oCo4/Ctm9LA8wZtWBhHDIi7/8jWDOzQO6PKP+ +w72mOpjPiJBet7gZFEQuZ6C0cIiWmf6rIqIOZDQTNUtjGOB/UHJQ6Uc4FHtH +rTu6sg503ljtrQlogUpu3lBGaqiInlcdaIaluP9c3w/y3LwhWSb1Rq51OZRH +9LlNyhqAFRtK00TSw+FRcejuxbGlsOvXD0kpkWE4ZO4sIorCwWl90bdw8WJQ +UF5ou9FjEFZw84wiSjST39eUgCbX/7aG43+DopLYAyY+jbDlwIGJdYLvP+/S +E66Z320g9OHE8gm/E+iv/ZjehMmnPm6+PK7vGK4+KVlWQgNps9+qjtJMkN50 +QFxmagccn+wYkj5Ig0vc8yw8/uqrsrvilU102KXmlhHp0QyDUcW6543ZYCtk +vKlQhuyr0lgZqmvP1wMrj6ED+V/oxDo2EnUYl9tg+O+sUfUvFphz7cen3HPd +s8HxrjW3m+EGNx/zAicfEz2zc/k33jchmhuPkc+Jx0BRc2gSS8OYcKKtsmFF +3jByeSakMZ6/M2q8WkM9sBGK5imvcNj/Dylz85VSeq+xF53D9JyPtk+2iQyj +am6+kktU09kZsY2gnMU04fMYRJJ5H5krMNzu1nfv/S2N8K3M+Vfd+n7ktvKo +6DgewrAolN1JgzTT19NksgbQIW5+0+CLdt1bU2nwyn5zuLhbH7rOzW8avL2r +3P00DfLWN4uHsHqQoprYkD6G9yalO/zJoEFTDrp09X0X+vAqdd0uDLd0NNP4 +tqcJlB/ra7BVe5A8Nx8q6NW85wntNKjqfHYuHttnb3LzoWCXijHdswl+Ws9R +cTzEQreN9aaM5xNZr/pbtL6/CcTu2p6MlW9D9/nN5F5/D4ehbaGCjKhmKF67 +ebqxbieRP3UgO/ZJgnIztBS+/JsXw0BWrR7PwjPDwXduiaJdezPoMxftWhzQ +gqrOXi4EbLxClX3lVucW+MJn+6qUvxG17BM7rInhOpNPm77eQoe+SVnCqYub +URY338q633whI6EFHEH3us69evSem2+1LUT8nIsnHaRb6AvFaDVoNOurtDUl +HG5fbqrPEWmFprjsvK/5hZCa/GCAgb2nMgJbDI1NKHCpevWN65t/wjRufpbh +i40en60poJ4QyLLPLAafTP61y7H3TltzT+XNnRR4opa9fqirEtrVj0kcwcar +ZRn22qpQIG1KkoXrvXpoUfD9eBS7T8E/n2btHqmDPSc2+syi10APN59r5C5k +ZshS4HZN+wI7+TaI4eZzmXsefSvEqoXu5F/5ZrqdYDhdWDQMw2cdKTvZfqAW +aGvSpnoy2GAar+qkgd2/+ckT7+Pn14DDj7zV2POCDdz8Lyf68E37SbVA6b4a +FfS+C8Ss57+Sw/iPPn9eSt+/Gn5FGvzuUu2BK7Vpw27Y/JpO6Fbc3iqwnmou +MnK1D7QX86uJYfO4K785dHxZBayfm5iWxOqBDG6+mK9a6ua28ErwSXxwXylv +GDJNzlNNsPlzJNetsND8C1veW38w3P8P0jM/JsVgvLlvFBTZaVcIatz8yvmc +/Ep4emvGuk2fGwg7SpSTdwxS1o8tb/k1Qy57W9Q8yQ6U9++jAt/8fmQR2zno +TSf1UupZxcwnu1rRQ7GLwecTmuBjWGLiC1SMrDWXT/atCwfntLMvcwtboUtu +F6uruxI5cPOwcjy/Ncobt4LUuUtt7iFjYL8rPV4PW89FZkmpj7V/g6zUWl17 +8VHoEuXkW+02XX+8ejQfdDyf6Qa+TwM79NKOiT13Zu+ZO5TDFHgzrGjkoN6D +LscFysu87YcZR55kntCvJ+wCxYjee+Ib+tH1ybGnl8vQwe4QJx6puHAiHgnx +afuXzAukAt0162eTC7YeZkVv2WfehwS0NkvWr+6CT36n0h7nsGC5YaLcvtkD +KKi+Ov2WNhWEXYKnHJGtR/tHpKo8a7qQ6oUTkor2pPx0Pv58XH6itsBTO094 +YXoo1//2nON/QxqCD7TOipJ9l/7W5ozHN6JrCcLbI+dTiPuX5dw/7AwcSGDu +74ZcP47+tun6hP4GycsuKkoEd8F1bp2EaZw6CaBZfS1FfB4dNK9fbnfp7UX7 +3+a/jdo7Aq+DdZ63O9RDAZ+30JWlvYTf7z6/0Lu2g/UwWdCVmv6li+sfGkHv +JnU6i+6gwoCsZrnQvm6YtMfYcGvKP6S0LEStF8NfvJXRaEjrhj73FZY6d0bR +Iq0zb87vpIKphJXG57ndwNjwLqfC6h/SiCvyqcHG43WwhR57B44IDSDRZdTE ++agFPLlxxTacuGL05nb4ghwNKnzl1hvB9c/bPgNKjYJMcH6etan9dQTC/eH/ +SpVpmeN1NXdILb+ZEgmDXD/QrN2ldSciKYSfSpWTTwd5Mc+bfjK7wLdB2Pjq +9V40mPoz1VxjGPgfqJQJHCH7wyqu3PfhzIxBFManYBqnQwV1nZYNj4BB+OEP +Uw9InQUKUFdeLUkrKCTymxZpaEqjaQwYDPrYsW7jT+RxeHo8XxamP9jufax3 +hAGClw+Zq4mPogMurzoVsPHvXx56/+hQI7ReeX+ZvjQVWpi2hw7NYYBZyeqi +8fNKq5SmtbJHetCve5/Yy5UGwNhU5N9PQzJe0dZiIl4RrubB6MIddCJOsWbz +zZX7To5Ck9/K4DhXzC4rUP0j5jaKjLnfOzuLknPPrBHWtuo6Fat+BRvu+7Xt +ffNF36MUeD53uVSF6giy5u7LtvpXS1wfNMLo02OdD0L6kSt3P/0U2mO8Rp0G +d0T7uw+JdKNk7j6oleS9zEsd0697TJ3Yg23IpMLpWgQmr+yOTnOF+80wzeHy +/IBSct8Jknp9ibKIDsLnRtTCbUvRYctAcSls/r1Bvu3aMa3gdMQ/fKNdPmzz +6+9UweTDvJdZCef3UeC3jK9GVAoVGrny/6Tu4sJb0ygwOLuG6VTfCn5cPdBl +puSvZt06OBTXemKFBxt6tnUIvcP2hajVy9KWWNZAxtYN4rvF+2ALVw5/UUxo +d79fAXP5kenn90NgrFlWaox97/LzqY6f7xeDRNeuq7T1Y1CbYut6DvtdZjbv +aldszIMlXDsu9taEHQcnQmZInsf2/aOpg44/k6qIfk9JV+a9f2DBgJSeGy8P +nn6Hzpu9HjUqocANszWZsQfaYG1K0nxXRhiyefll07LptbBn3auFP3a3gTY3 +3zOJ+5yt0tSF5M7RQYarB67k6IFosfBrC3cJKjzeJOT+7nI2sQ5vr6DtkDXG +vjcv89sNoyZYy9WfnZ0bI9ck18FJ+urfjw4NwBKu3pu8rqLiwdIy+GLte/1l +yBgqhlfqlT/D4aFrkd/hzY1w54D58g093ShL+g4fLbMD1D4ae64VqgenT5w8 ++gKRiTx6JPnFPq+usA4iWTe84xmDaA5XT4tubtfZUtEIOQy7qx77e9EGrn5l +aB0x6eMHGvisnTNfJouFLnH1ojVo/SrniiZIFmuMrz9OR9VcfcYziH7isnEL +uD2ULNXyqkMPfhz7swQbvyek2/IUkw5tndf3y++rgA6u/uCo7jJ2UZMCTks6 +X91y6iD2/dzXhvNYt2phnclntVl53XCLu1+vWaKfOimyCna5tbaUskbgC3ef +7VhaMfq7thB6DDjnhrgfvV3d0mCLKxV8qzh+Odkx83G/HHpSv3C7+kkarOrl +PPdrnOeOLhrZaDZh8oq1nSPHcP+k3l7b3LLHTLj0Y2jFeF2XAi+95cxtf5CM +6fy4IBcyTr6OY4+DbVZpZ6xiM7R1mc89s6WLqPsafT3F7pJ9CzxwTrbujmAT +97k4WNVupI8KAfER8l4K3ahyxSxds7td6Kj/p/Likf+pl7slcEPBhQ7UQb3e +nhhHhR/93/+tFu4i8m4u06MKIpSaoLjSmWXnWAVClscM3ZpYSLD34dwLcmSf +1kzOuTA6Lx3VN62iE0Z8HCL966vB/eC7ksBpbOS/Uadh+0YWlBtzzqkfuk6c +U0O923KfmW5MYHLr8whz6vMgpfdHO9V+0+BB4o9bjvN6ER5nquy/6MAq7L1z +LhfXHbeLiT7D03SsggXrCd4CIqarei0bQnPXye+/W9wFx91GJ+xfPC54yovU +E/OkqFDSrHeq0SIfpnzOqf68tRPZC9CMU6kdsKqd/xv6kIYifS8ZqWNy4MM5 +SZ3z1xiYXsrxP+N+u9C6c95DqRSoqObwc5vDD1S/82PtDWuFxS6/f6Skl6Cl +ox4bP3mxQO9V/vXJ6Qy4oiJwvlyaje4dlakd2ToAz+nnLflUmkF1wybFOVnd +6NIfW5e3jBEIniI485pSHxScNQgoCuhBzXo9Gn6P/sGfSrMxJrbvxXP93vg5 +CbOqTeuDK1m3RP34hF4HjYd/ebztp4AHN28FtzcnCWf5JQpQoY/7eepKuiUz +uBMcpBt1J4lToe0O5znqcJ4jKFwIEZl3sRUquHWNcL77dLfaX59H9jHU4vgz +0aw0wRC7OWQexApOHgSa9izIoxmzN3O4divi2K3Iw3FeVvyUFhjaxOnrFMDp +64Q2rZRrEApvhiOrvcQdI+OIOuoV/Yv/zbZvI85zRzon6uTAvIch5vEsJjTB +iwm9jj5Pelyvg/SP7zy8jpL15s5ZJghv3tANXo5PwUu+FeTvWmn9uktB2ZPj +Mtce64Lbrb+mNn5ohSKrg+01a1hgfyPMffKlIXSoPCJfj9YFWdz3Be+3o5Ly +Wm6DeD3Bv+WbiTw7yLf3Ewsxp8AHbU6dJXyfz/LZZCfRRoG+OnoMavZF0Z/t +PofatSCrvaFVC9kUeN/EWZ/bOOsTrmzyeG41iwnFTmuLsjdS0SaRwWSaUw8I +fWruFIplQ0H71d6qrjD0vrTKvUWgFi1Z9Fni7xsKuBrL5tn696LiLVPclH2H +Qez4KbPtR+shJjqiQHlOD6ye9kPIy3IMLRFoLhbXx/Rb1e9fFfWI+OT0z3te +DEbpk/W9/RMbV7th49cUnF72MKUbxLlxevg+WCry2SFvAQ1+bXBQdxwpQQMy +hXLWwSwkLKsU0KBJhRvc/JRsTn4KqppjverGGip0zOTES+tITsRLQ9DxkbHo +aLIfU4/93qhKbL90GcxeOu9HPeyYWZSmFNaDEopPvnUKboc6q26V6rX18Jlb +d06MU3cOQkyQ5GBpI/DtlJhsaduF9JbtNdjR0g7VSUsp5vNoEMeN04jnxGmA +ovpn14fBTbD6nM3EPihi+HJ8H0R/p566KTWnESgz996bF0n207TKvfG66C8V +3v0clYvRI/ulXuhZEiLzuRGSYi4ZByt2o3OLzabNmt6FRB9Q+phNjUTex3dF +v/G8DyS6zkv1w61GEDx1cpPwmedI8rS60BctBnLTThWMxd5ToScnky48YsNr +O9RbvqIUyllxtw7okPkFb4MmztegR3XTSFEXFW5y80nxfi5NZcv9x/spH53O +ydf4rj2Rr4GSnq05c/loE0hzzxNL/k2cJyJN9uyuy7uaIJ1bd4KIh69Qurtv +ThM4GdRHy4myYEnl8YZRjSFkFCEy81dFF8TVW+fl2/xEMsf9xXYnYM99O79a +HpsJmS8EVa7qVMGwPf37xV0dKOD6rIh12q0g/pKD53BwEJvx6PeU2VRuHkQX +tJzZiu5bVCPnfBupvpNUqH1EWf9tfRfc+XpjvsSCcnSiaSRpeTMVqri4BweH +zy0Ku2db1sGtV3dnS59ugWx69fod6ypQxa43k7U/0yDsudcn+XpvVFc3T195 +cSsmv0/Gm+e2wXUq5338zHkf4eUqm62aCW3g4yFnJxfFRj0p4Zt3hLBBLyzx +6NwoGuit4tgROM//kj7MjK9pBHrDkTCHfT3owxYaM6nrH/Jy++a03aQZyrjx +GMqceAykF2Kc7IPtK48MOHUGKmsn6gyglZdL7a1Nm4n48EOcOF6gfbl30mIH +BUSEPSto3i2w6M+05lt2FdApoln1fiUFwv5e252QkoGO7G5jVxxmgUiY59OS +1g5gJXGey2+HiecCTZG/VHbrYHKFmy8ZysmXhBfT4/rVG2lwn6tX4HFTPqyH +rpO6yXyHoy+jF7guZcDpQXpNZlsDFMWeThk/b8L3hXcBl8fMj9LAle90QUVZ +K9HH6flN2Q86U8m879hVE/sOSvL4YLn2Dh0ONn+fqCOnbV86XkcONV/oNjze +SIe9quGiTlE1XDupA82XHNbO6KJDS/7u5wEb6cDXstr8slApaljUbfnWkQYq +zg0Xxs8pXqkyhjycB2B9q35x4Ywe2PXi2kS8E37Of2x0kWgSJkdvXuTERwlw +4qPApEdXft4jsg/Um1dzxuu8QeGZMxHBIT3Q1h/qMHGukW620zCoA/Z1BnyK +Sm8Ho78DEUf2dKO0U83my7eyYQHF+m+9cD24ceOg2jhxUMDokJJ0xeTTKW4/ +xPucfohgcX3roydKZPzP2ON/U7crMxBf/tbk84+p8JHbN3Alp28gem0Xd9b3 +GgUiuc/9OOe5I3ex9vgy6TYw6Y9XNBzqQZro3eJE+XZEXRgTxb+2ASJfrZiw +95tvyYzb++DRcbJIw5wOVG7fEElO3xDUP62n+JtqG2jpZ/f8vfSNOE/kC2l7 +amPZBvNqTkzURVFM/DZeFwWOixf/vfaiGT6X3uYPUY5GmkuG4jTXlIFyitC2 +zgVtIKt3yrhFLwW9V2CMBUEbmqwR6C83lwqWfo3CoNsNSz4OCE47j+k5J6Rt +ewZbYNvKQxIOe9NRxa3Soadv2iBzm/GmdYJtxLnz6q6B7sf3GfDs8yLqlD0N +4Lqr+wqf6zdiHfJLT7L1utoBr3UKUiz3d6Ppi73kNUTYsEdMJK1vZj3887v/ +IM7jNRpKepy3sAT7fD//0arLbaDJjd8+x4nfRsq/5ZuGxDC9ulBkgFrfAlYO +v2K/LC6DyZ39mx1mUWBoUgZrY1wb7Nd0aCs9UABtbJk+F9s6kPM3qe0ojwOD +yc0rFlS0wWnGzOerHdpg2jHOOZco55wLYmY7XIscpMAwN27kOTcP47Xr4Zv5 +MxqI/DgW4xq7eryuxYK7Eiu/lBP9WTczG/UmB0egsXNqKkyfKiIPbsnZfMr4 +ufz75c/N90yrI/z/z0be3fmJzbPUa++c9s0U3nhXVNijEVtl0kD0cXxmoBrX +iY2XSCk8UqFWScRL7YwPTxPFvtfA5d3r4FO1hJ3zwD40ow4bb1I63Sd4Lhmv +e2zhas0ZEe3ow7Xd790xfW35/o0a95+mwgnjgqwZUxno8kwblZRvTFieIBJy ++UcMhPXJmD6c3wC/5xrxe6VRIHTDg8SiRm8koVOr1C/Tilxnr1g1eTIV/P2C +J/bNq4z14/sm1KSn97/91gYMrnwYbp6QD2D73s80418dKDFV/7d+svaJGS/9 +l91rhclSObPG4zxPcuNPQ64IHGZMaoW+BqNXkR6YfNwy2O36cwyKZw7/eeTS +CqN8kW9mIRacKp/x+0//CPhtMZ2dmk8H9eyHH1euZnHjmofBwWbBwph9dCJP +jVs/HAZe5beLYPv4oc8n9NZHsEE2LK2CcW0UmbSE3Gn36oajKytjZb26YPXI +WerkzDG0KPFpVcLfbiLeWtF7eMlDjP9pH+/F2m2gAW6/ZQyXhOlj+FqDLGDK +1hP5g1dyqdO1sPVw2fqeZ5Q9qbcPmDhOn4nhs274z7h6tgnwc8eeSZtMZTA8 +65DPFf8qKpE3F7sjzVgNw71WXtdmelJBzWDBRF0pn9Bb43WlYHuKr2rOzW74 +ePumwcvqGELvXlB+MEbyLRNMZHzSauM7YIPljazOrYUo3FrOa2l0A9wP9ZaN +OZkI5WLRF52H6HAhKfmr9QgF1hn9fbJDkQXeXUO+3clFSK9krHeGRgP0jqzM +uqtM9v1pyFtuJf66GcRvcr4Xtz8+z7hJk02ngCitojXlVzL4bdNc+5vRipz3 +01Uic5nQd6b42w/LLoieuuiq55Yx+PnYREFbpxWmrbIOE37OgoV6DVONMkew +93Z2zdEsOlzq9Zp/C9N/Tj1HO1x2DENORE/VWhOi7086fr3t/YzmsKOJqJOD +49JxNk6D85sJ/x6OM50lzWUYzYSdjuODAwLf/ia3EH5XHJ+1xbdy7D6d4BfH +m60PxL+0aSXyuXB8K59cBrYnEu8jjkcqvUwfEWAS8Qw4fp/91jOqiknwSOAq +F/I/RbURcfs4HkcbVWTfJOtE4HjiqWP1LuYdRF0aHA9wrPu1TpHsh4rji7Z3 +yzydxCLeTxwvWomeyZ8k8HSiz+mAsLTQbJJn/GpzRXUsrqGJ9KNycUmf7aX5 +CSTPOH45otHRxIfkGcc3mOrrqR4kecZxkyV3Ze1VSJ5x/J5Q7yidn+QZx6O9 +DAuiqhgEzzg+NazmYHw0yTOOJ4rHKbI9SZ5xnC9sjtVhC5JnHI+fOejPr0zy +jOOHTUb7ivlJnnE8R3LGjN/VnQTPxPjAZWXd+0mecf7OqSd8pVJoxOdxPPVL +iJzVZ5Jn/Fr4JHmpvA/JM4Ef3N245RDJM46/DlqY/UKV5BnH4zulNFRmkDzj +eIVr/OmRulaCZxxPTzC2GfhM8ozjW58sCpa+S/KM412DBuBoS/KM40nfDLOb +NUiecfzGv7nLrgmTPBP97VcUP1Jr6iB4xvHEb7TAaSkkzzjuyQ7zvLyT5Bnn +SWdqfvuyryTPOF4m4Ci+8gHJM45nR59Stj1C8oxfNY/LO+RqkTzj+KefQSmH +REmecTxkd8ufBXSy7j2OW6x+XNKfRvJM5Hdm89/ofULyjOPyhmMMkdMkzzi+ +ztzm5tatJM84rj75zpRHC0mecfzInorj3V3tBM/E/C5FzSdySZ5x3PN1Eq0r +hOQZx01K313M2kjyjPMB4gF3pz8necbxg4oHd+ucI3km+PPrbwncTvKM45mb +r/8TXkLyjF9dc9LCX/SR9ahxXHt2gf3mfJJnHO8yTp/d+47kGcefZ+/+lupG +8ozjvdbTkp+akTzjeNmw/Ytrq0mecbwi46qIMz/JM46fon9judSSPOP4XneG +pkcCyTOOz3Yq/hd4n+QZx1N6/qjXrSV5xn+38vTB/LibJM9EP/fjKjF/LEie +iToca+LP9a0lecbx2tBFdxSESJ5xnLlGMfJkI8kzfr288eDXhGSSZxwXPGId +M92f5BnHM21Hkw6fInnG8fULFcSztpI8E/ej0jp/jRTJM457BHatedXbRvCM +435a7aVz8kmecVzz/Lwn98JInnH8h5vhVCF3kmccz5+f1JClQPKM/77Kr4au +2i4kzzh+4Y0XatxN8ozj6TNbvO4sJ3nG8brQryfUxpoJnnG8tkFvbn05yTOO +sxIuafnGkDzjVx/F1uAtPiTPOL6uymhmry3JM46H7tlu9EGL5BnHwyRhs+1c +kmccj5R/E7+gjeSZyF9/LfOg+AfJM46/uisV8yCI5BnH9y9ZPqbvSvKM43+O +Zqt4riB5xn/HzEzlmZnnaDx6XXpKg36/gP/OJh69DtuX/qZOPirLq9elpzyw +8BxZN9zMo9elpxwZn6ikhUevS0/Z4CDaVf6JzqPXpafM7ipvC79F8oxfWy69 +arl0iMGj16WnYHfToK/Bq9elpzz2UahdOJtXr0tPOYF9bRu9jUevS0/Rfo79 +sox2Hr0uPUVcxv3Pg8AOHr0uPaUtfFu2tRPJM47bzveynb+c5JnoF8mznnGc +dz3jOO96xnHe9YzjvOsZx3nXM47zrmcc513P+JV3PeM473rGcd71jOO86xnH +edczjvOuZxznXc/4ffHKZxznlc84ziufcZxXPuM4r3zGcV75jOO88hnHeeUz +jvPKZ+J+eOQzjvPKZxznlc84ziufcZxXPuM4r3zGv59X38BxKx59g9CPePQN +HOfVN3CcV9/AcV59A8d59Q0c59U3cJxX38BxXn0Dv/LqGzjOq2/gOK++geO8 ++gaO8+ob+Pfw6s84zqs/4ziv/ozjvPozjvPqzzjOqz/jOK/+jOO8+jOO8+rP +OM6rP+M4r/6MX3n1Z2J+Hv0Zx3n1Zxzn1Z/x+XjtQRzntQdxnNcexPECHnsQ +x3ntQRzntQdxnNcexHFeexDHee1BHOe1B3Gc1x7EcV57EL/y2oM4zmsP4jiv +PYh/jte/geO8/g0c5/Vv4PglHv8GjvP6N3Cc17+B47z+DSIuhce/geO8/g0c +5/Vv4DivfwPHef0bOM7r38CvvP4NYjyPfwP//3/467T/w1+n/R/+Ou3/8Ndp +/4e/Tvs//HXa/+Gv0/4Pf532f/jrtP/DX6f9H/467f/w12n/h79O+z/8ddq4 +vw7Pd8avkd9PwsDjJoJ/HDfKDVPXVGgi6j/geKjWxUgDRXJ+HNdf1jrnqy05 +P/453vlxnHd+/IrPj/+Nf0/sSLdp7Tpyfny+f8YhbUExTbzj0/9jvDY+Hv8b +/xx+/3i9RPx6/p9KZs5pIl+e+D9b5r7tJwNyPP5/3vH4FR+P3x/+udS4VKtH +68nx+P9Dv8zT9DAm58fvV3ewXdX9Knn/+Oc+/HnzyvLY/zc+nXc8/n98PD4O +n+c/7kcbv5//B57wwAM= + "], {{{ + RGBColor[0.880722, 0.611041, 0.142051], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxNnHXcV1XWxW/+TFBQCRMEFTBAFAxEMVDs7u4cuztHRx2dcWwdFfM1x+4A +u0Ydu0UdFdtR7HrX17Wej/6xOeee37nnnthnr10P/bfZY53dq6IozuwURa3y +BRHPM4p6qXK76CDVXxE1opkgtal7MYtos7Io5hW9pPquKh9ROUB0l/o8k359 +RFOLphG9LnpNNK3oe/VvVc4sekvUTTS7aAu1v6vyHdFXGqOXJjaV6nOJZsjc +ZlD7I+r3sOh40Z9F/1X7vKLe+eaCantfZV/RPaXny9ym6N3eGrOX6ner/p/K +vx2rPoNFD/Ku2gaKJql+vtr2Eb1Hu2jOzGVA5fkOEc2fuc8hml7t96r/Q6rf +qvoton78pm/+rPrGqn8oGigaLvpU9EnmvphocMZ8lnFES6q++B++s5/GXlj0 +mOqfpf9I0W7qu6toVGFirguJxuZ3xh4nWqLwmN9ojCdFE0UnMp4O+OP0m6hx +nuPboqX0vIroMPXpKXpW9Vm1lu/12waqryYaLVpa1F1trehn9fubylNF26g+ +XrSU3llQ9JX6LStaE35Q+0cq5xGtWvhbozPnF/TuCqlvoPf6is5W2/J6Xls0 +m55/1POG7L3qP6m+EWtX+aDoedHneh5R+J05a891E9EB+u7+rF/1Xxiz9nxG +q/6raC49f6eyv8p11b4H+1D5u0eJ9hbtI9pTbUuLNqVN5TKizblDem+caAvV +1xGVqvcT7c+3RFsxB9Yn2lr1vVR+y30S/VX1I0Xfqz633umI9oTfVE4t2kv1 +H0U7i/ZPOZ3a5xXNI5q29tzm1BhziHZSfV/RDqId4R+1LSfakjunvuuIdoP/ +K6/rSNHhrLnwd/mtu/rMJzpU9T+Jdod/9TxN7XfO0rvHVJ7bbCpnFa0O/6mc +T/S16r+Keqj/aFGpvT9Az8eJHuMuiw5Wvad+myHf6RXZc7zoPfUfqvYZRS+p +/XHRyWo/JfPlTGr1qURHq/6XwuMdInqw9Bini/rpvRNUniFaQ/Uj2G/RmYXb +ee/JyuWJonNEJxX+1mSN0xGdpvr1Kg8VTS2aXjRd6bm0Kv+u8gK+r3o30dOF +57RPzmE6jf+F2v+j+owqZxCdq/plmcdZos9Lz/ES0aWZL7+dm7kw5ytEZ2eO +Vb7PPqwQnh+Zebys7/1bdNMfxutVun6j6DrRYO3rzKKt1W8T/baMaITqi4oG +Ix/1PDP3WH1XKy3HH2D++q1P6bnck7H+JbpW9Ip+e0p0c77J+qao782iZTkr +/VaKri8si5HzUyKLwQ5k8/LqN3fpMfqXXsNE0YuFsQo8QJ4h11bKmsdmD+4U +XS26pjA+gRtgG7gDjoFn4BJYAWbMVxrneoruUP357A94B0aBVa+lP1i2qPqs +XFqW9VB5lcrbC2MIeDZbYbwBX+6pjCEP63loYbk/ROudvzYOgEdfBzfAqrkL +Y9tcmfc63M1gHJjybWnZjoxmvcjsn9T2omhyYSwGYxbO2sAWZOxIfWdx0djI +/scLy+3VVV9R9ERhbLivMv4MztjsK/izeJ7BZvCuW86AeYKLM5Xe8ztET5TG +tkdFb5SW9eDcEsEo5g+OfRZ+HZFzQ1aDexOCfeDT6Oxbd9X/mTM9ChkjOlD1 +L1SeKTq6cl/kPHjyP9EYrXfZ2pi0Wta7W7Bt5cKYQ18w7lDaKsvKi9hjvTeq +Ns79UBn3wBhwB8w5pzImrVUYd9bO/MEk8BGMAu/BJvAf7EEHAIsOVLmiaNvC +MnNKYRwBa8AhsAPZOW9lXLhQNEjvzRSsWrs2dr0QvGPvwBjwC8z5S2V8+kb1 +g+ATsLgwppXBtYPVtpJoO9UPUTlOtH1h+b1J9nGV2viyS+F3+gYbDxd9Vxhf +wBxk2z6haYJFYAXyvHtwAvwaGDybqja+gRlgHPgG5oA9hxXGrx9U7lcYW2jn +PXCoWzALfOO74BpYCAZOX1sPGhdeRl4+URk3wAPkOvL9p8JymfeZG7LzSNF1 +pfHp2MI4vGpljH0fuaixh4kOU9sqlb+7T8bh/TvVdgUYUxlfwKmPRP+rjJHH +BtPAmuMzj8eCfWtWlutg0lOl8Qz9ZCOVi6Gcl5Yv3DHuF7iE7AcDwAbk66V5 +Rh5fnrWfm35866z0BQdPzxxOSNsZIcYAG2aIXOfdRfT94bXxb/bS8u42zjnY +9de8h5zuwhlK5OcO6tO3NE6AMfAwOAE2gE1gxcv67U5Rv9LyBNmO3NtUzwNL +P4Olbe4/emj3yBowCmwCd9ZQOS46Krh1Xe7NAqrPXxmvLhadVhrTzgrWgYcv +RBYNKozPYPDFhXH+GeRBYVwAhyYUxq/nVN4r+qCwnEPOgmlgIfOZpTa23l14 +LrRTHx79HZn3RmEsxSbqpnd/iVx+nD6lbSowcGL2dEhpGwV8eRfcKX1PNtS7 +tai3npfOHrA/S0UHYd8eUn33rOfpyhh9V3gK3roq74Cd8Njk6DjsYaPyqcJ6 +xs+FeRO+3wOcKr0XNwCwol85J5Xni6ZVfS34PnM6QuXhwdevVd4fXNxYfU5S +fZhoq2DHoqJXC+MyV+D50nbam6q/XRhnp+fMgt3g+rOqHyV6WfV5SmM/03qV +Pnk+RuWepfd+WOVxZs8ZgPHg+7rogcHTVzKPJmeNXTlfYduSep+UH4QH5i+N +kd0yx7dTB69uD2ZR3pH6PTlrcP9Cta1Zek3zVObLSYXHwy7GxtyyNB9Myrzf +Sfu+pefA3H6MvvCbrqNxFihtw8Jz8PnI8N3rf1j361nT+uo7tLQ9eFVlOwpc +W68yj36RdYLn6BX0xY5bRDQe/AE7S+s0Q6LjXFKZ7xlrU9U7okVK35tPMx56 +EnoLetNW4QW+cbnaJ5W2kd4qjWlg5RWl7STk8/DKtiXYiG5GfUzheTAmOteR +pWUK+uMFpfdxcs7vtaz9ErV9qXINzq3098Dmi9lPfeM9sL/yM+1zqX557uCl +pd/H3hmUOX+ds/ihtE/gPpW7pH6t+lwjOq8yHv2cO0XJ8zGFbdWfU+ced4sM +vAb5V9qu+pPKJURgBPcUe+BUPS5WGsuws97SNz5B3yiNkQvXxszF9fw6eFb6 +27x7FDyhtmkqyxfa6ozJva/Tl4s1VcafmrNTfcnSOIGeAm5geyC3L8i3qP+t +cNkt9aHwSWVZc2DWcGrmQh2Zg+yZPnVwB7kC9mynclRpG+y4yr+BR+wHmDWi +tgwEL84vjEPgEfjI++DcOSmxx/5P9dGlMe5K1W8q/RvtG5fGjfGqz5k+yE3G +7pnxkb3IU2Qp8m/GzBO5C05dVBgbqGP7IBN59+q0zZL2r+DD0tjEOWPzc15X +ZA3M//D8Ds6Cab3zbk99t0fluY8p3f/Wwt9grujPO6qcTTRradmNDAfLWNPs +WTuYOVve3Snt4P7ppZ/nyB7MmXbwqX/ms1zp+sTCegEYxu+bl7a1sLNeKy2X +8SGeWdr3h+w8o7RvEfnNewMyDnoA+gDy/G3980ZkCPJ5UMbcSG1rlZZ3+PGQ +k2AlffguOIK/kP7Ixn+W9vHR/1/q/2ZjOYWMxD5BH/gwcgR7au3SvkVkxbql +25Et/1daHnFO6JT4K7jDe5Wew6yF7b1Fa/d/s7RdhIxDJvJNZDO+OOQpshRM +4VvI88cyH/psonmuV3rt6AKDs8a3UgcTd86+sX/IAGQBOu1XkY/LqvygtF47 +svR95H7ivzg1/bnXfy99H+AH7hL66BK5T9wrZNHHKj8qfQ+30NxOKS0Hbijt +K+mSCbyH/+SQvHt+1jhvZHCPfIu7s4S+tZJoQ+ZV+T6gq51Tem34Bs4urV/C +49iwI7Iu+A7+m1BYJ1w6Y+K7WCFnh+2+Yvoj+1bK2sG+sTnTVUvrk7z758p6 +DM8zZUzu0+wdkXjm08q+XvyuXfYw9QUKv7NGxhmRuWJrwwvr51vofdio2KfM +kbmCzyumP/MEJ8HFT8Lva4bnGWNk7Pr1whvLRBbxXWTM2rkX/bl3mu8GpfGd ++8a9Q4c4L/XukZ+cdZG92Sj7w1ngI0I3RjYjr5HN+FPBKnCKeaybdZ1bGnMZ +ivvMvUYH405smXsBHtOH+815Y+9w/i82lhes8af0n8T8NYfJ2A45z7VzpuzN +1qXvFDg3qTLugRHbhz/BEJ7Bi89Eb+r3D0T/QB9u/B54ult49cbw2C2q3x3e +uz8yAT8LusqY9EHO4uNCtiJXHyjdB7mxW8ZlI8Bz9urJ3Gl8+siZ20vr0/cV +1tHBjIuyV8gR7vqrmufG8E1t/XXP8AnrZv3ozOAI744vrGvgO0Lf2EHv3tqY +95bIfFgjeiH+KXws6I/okehlJ5c+V870ttIyHzmPTwR/Pj4S5AnlmMI4fmjm +DKYRM+COP126/R+FMR/fKLiPDEAWPB0Z8jfReYVthcPCt/DFkeEf9PqjS+v2 +2G7g3w2FbQnqN0bG06/O3qDrTxe5iO0wfeTeyVkXOjJ4ABbw+3Gl7Qvk7gml +Ze/BrfhCa/t3YR6EFyfnm0dkDhNK2wucI/IbOf5xzv2U7DMxFtqR7cdlPpwp +WHBS2tGnkL/IXmTK28G47Sp/i7WCw/8oLZPZH+7YwPDmOeHPzSrHW1arzZtn +h4c/Kb13N2T+1NEhiNF83vgcwUIwEb7Ah4auu3rOeXzOGjmBvHg3e4I+zV3m +3A7KuaMToz/iw0FHvrJ021SVdWV0453QD1vrzd+l304ZH52ge75/WWl9G/0I +XQc9h/gC76GrH1F5fN7fWfX/ltabHqj8LmOAzWA09sIFlTGbNnRo+qJffaP2 +PrXXu3z2dO6cD+fHGbGfyAX0SPDthvA2d5c7jC7FvFgXtsSh6Ucf9GTq6LrY +vffn3uEXR19DzwS/7gg//3bnSutaM6QPOuAtpd+hP33vDG8gSyaED7n72BvY +lawD+TUgfe8q7W+ZBf9JFb+zyv6VfR/YOQ/EzkGe3VpaF8ROpS9yj3fxWc+c +dUzMWvjmvfnuXfnehMJt/IYswk9Lf/CO31/O/NFdWRfykxgl4w4r7A8n5tuv +8Bwez/jEU54p7c/CvqcfvqO58g79wU380YtGpuIHGV/4vQfz7peV7Tv4/Tm1 +PSrqofreOsN/ldadHs0caEeuI9/xz6ArYqfjL8dv8GL2H93/PzkjbCb8eqeG +H5CJz2Ttd2R/+uC/qTwn9oAzJlby79L++mHZsyezb8gPfCLItCfT7/HMhTlM +iszEJ4I8pO2FzI01XZd1cd7YGmB6r9Tx4fWtrJ+zXux7fPjwP22vpZ0+xOPZ +e/R4fgPf8R19GD7/JO/iK+AOY1Njv2PPYyNvlt/fyPjDUue9GzX2O6X73dnY +Jp+S92hHhqBb8j38VJ+W9oshZ4gXLlc7fsj9RiZw34lBLl373qOj8ztYwDff +zBxoez/tlB+kfnLq6MybV/YHr1F7rcwBOb9FbOHTsuc/5SwWg7+yzyflW6wV +3Rn8A/vY+8+z/+g36CboO+i+6MCcD3Lu06wR+Y1M5/fLskdTIk+m5B5xr78I +n++Y9mVzzl9lPszri9QpeSZG+VLuFXcKn0GP+A3Ic8Cnwd2/TfXvSsel4MNv +wquXpp07+LesER3seLXvUrn/qKwffez+vAuPE28jVofPje/gQ5kpcubrjE/7 +95kD5Q/pQ7yM/sgZcGan4AR3ccfK9xH/CTgBX4Al+G2xyzeJbwr9mbjRArVl +wj3pg428AQZo9AFyHtDd6Y/fk3awmzHajAOfgnnwKjY6flq+ye/d04exq4zP +OtjfhyIzqbPG9Sv737jj8PUy4W0wFl8NOIvtOUfq+KaIo+yUtjnTXudbzOE3 +LKpso6FTvxu9+sO0T52x8Qf9Unit3TJn+AT5e3pkKXV4hrjVIpVjV2DpmOAp +tjm+yP6FfZ/4QInzXxG59+fCuRHkSJCfgN8ePwY8TNkz9Zvy3OULwa+PjwIc +I15LDBncwk+3eu4C73a9N2Pe7Z3vEweh72zpT8kz94g4GPEw5BVyDnmH3EMO +/dpalnE/+A28YX84U2y5R9JOf/abfX8u8rNvZCb+vz6R+V3ntGPm1id7Mmvm +xhzo1ztzJj63en6HT2YJjq+o/V6h/t0nSp1YZr/g++nBCPzLYNbY2u8MD/bT +h1gQZb/U4R34CZlDzKhf5kCeFOMg35DjnDk5MAtX9q2TJ0UffDGzZcy5Mwf0 +iflzppzJ/DlHygXSjpzHl7pZ+GpQ7hG+amxk7D78Ftjw2Kf4w8mTGhL+nDtr +gh95H13xt5yH3PdBaWd8fJC0gyM9MocZcweGpJ28COoXZYxFM87CWSdrnCd1 +9nZA9oF50XdE3h2S+uD8vnD1uw9nWOroCUP/8P2heRf7btHUscXBlYsLnx+5 +TJwna1oo6x2Y8QeEh8hZgq+JMZPrhHLAmS2TfSAuTnycmDhympg98Xpk6ELZ +f/Rs+AGexT5dMDzQtWb2H2xZPHMjNk5O1kOV50w7mEXcmtg58QXmsXLtedGf +nCti67zzYeU2cgq5423u+2/6a9pmTp34/cq5R+j6xHCJX/O8SuZMzJvYN/Fu +iNg3761X2weAr3zD2vFv3sWG3qq1vQi2gDHUkWHEdYjrEuslfkvsd+/0QYZj +F6IXone9mDr2I9iyavAFnw2+my8inzeMrEDWrp928gWI2TN3cAYcwl48Od/E +742PBznbP2OCZ8hq8Ig6tiQymD7YecRi8KN+XNlWXL227ch318u77M2h2R98 +WfjBsM3RodaMHjVvx7kla9XWHbaqjAXvc/8qy0vs4C0rYw119CR0pA9TXzI6 +xC7hN/wz21Q+D2L55I0Q20fHeT9j4rP5rLKvBx/J9pVtas72kJwveELeG5gC +f1XhsQvV/0+VcxQZl7wQeB9e2yP8hj9qHMxWmh93D0+iE6L/oQcumXeZH7Gp +PXPPyO8j52+rwvkIu2Z87tleuWtjKucOcv/I0SAvhJwQMB4sQc8HH/+vcl7B +lamDC+S7kDtH/gt+IWwYeAk/z92tfT3kV5A/Qe4EuX5tcie4B4fnLhBDI9eB +u0IuBHkKvHd15RyX5QrHVk6pfo+9ENsgrkHewnFdvFc4H4Z9Y33nVtbxOb91 +a/vYtg0fw8PcmzNzd7bJ+vkdDPvtbhfOj1whe8h8T6rsJwAbz/jDPjDOroX1 +EOJp4CTznbrjObMWYpln546yJ105GWdlvadX1k3hwTuy38RnsRvwF2A7XF85 +TkA8Ex8n8U5iAOi6l1XWd/nO1dm3R/Jbv8LzuiZzI5ZELgL+jJsq2znEOYkF +XJV3z8k4Z+fMr8h6e6feK7/Rf/nIeWTv4Mg/8lSQeejnt2YOl+db4OolWQux +B8a/OWvGH0YcGh8zMf2vW+u6rO22jIP84Tfaecb3jc2N/x6/Ob5u1nddZX/N +gumzUMpbU6e8LXvOPRuTu3aNyr6N5cUlqvdqnCNAPhE5POTykItEbvB6heXY +xpGn6JzoRuhg5DrBQ/APOYbk/JETRw4RY5B7Q44GeRDkovwaXtsyWLBRbR8x +vnpsYHx7+F75FjKT3D3Gw7Ylv2nbYAs5TfD0tpE5jEfeLTYUua/EZMiF4ZvE +RskpQ0YgH8ifYgxkF/Fzxubb5JStFFlCzhW/I5O500eH//tnP7bOvVsv88dW +QI9Hh2dNlLQjs/FTEg8g3oKvf2Tl2Cnz+nvkPL4CfAbYf8ydZ/YaXGHvwQF+ +v6Oxbxi9A98XspZ171s5j2y1yutnveTSdeXKUW4QGXVw7jR7zNjsM2dHnih/ +C8Cek1PAMxiKHcU80HPRd9GDyNdjvPUL59+Rh8f3yMtmLstWzsVDD9o4vER+ +29j05xzQf+hDSY4gujZ8hY+QuDb5S8S/kL+PRI4xBvl45OWR40SODfFW4hBg +FHiBrPoi/d+pbMtj0z/R+pl6z45lCzKGHDHyt9C7V8wcyf0kp43cNvLl0JHQ +r8j9I5b37+r3XMmXMxfyepgPuT/kWpCbyj6Sp4/vC/wg75P8T+JWyJg7I2e4 +v+Rk3lv9nidNPtkd6YPcIGeX3F3OZWR0KNY9Ie+Pyt6wR8yT+T6YOT9c2fbE +lsV/83Dq+D4+CN+iX5FTRy4gz9irXb+/mT4rhZ9mzb3h/pCHQr4hGEiO4XtZ +70uxlbBZsA+YL3eDO8NZfZbzYk1Thd/G5gzuz/7RNjB7zF6z5+gT7OWrOf87 +cw7IDX57Nd/Gv8pc0EPQwfD1o3egf5AD2ju8Tl40Zw+PwQvY08g2+B4/ADY9 +d3ui6g+09nE8qPqDreMM2+tO7tA4rkQ5sXV9AdXvbx1b2Eb1O1v/3camql/X +Wk8/jXvdOt6wtdpvbx2TvFftE1rHcu5W/b7WscAbVb838ZKbkYeNdbIuuYOv +bNn4BJg/sgcZRPySeAWyA7mxid67trXfaFh8HYyBT29o1rxb6zjGEZFNyCBk +1Xy6O6Nb67GjYvsij9BN+RaybkeN/1DrWM+aqt+k+onqf75+f6y1v2amju8k +93FX9Xm8tT9pF9Ufba2Tv1D7N9qHqP+TrfWcDdR2dWt/4c8q/9LYP7S7yvMa +6xV7qHyqtR7zrcZ5urVuPkbtz7TWTfdT/YXWusOWqt/aWl7crPLG1vrmVmq/ +rXUsdPPGv9G+meo3tNaXtxDd0lp32lv1Z1vrEi+rfKl1vt56av8Pc1Z9/8a/ +0b6T6g+3jqMRmyUWDE5wTtgLq6WN/ADwghzd7sFX+JKzWy5nwPmOCl6BW8h7 +8nanCy4iX8mPXjU4B06QR90li8mjxr5dPvcWHOLMR4cv8H/BG8SPFwuewWcL +hO+Q/eNiAxwcvOmW8dDBGZO86rXzvHLwgHxvcpoGBReZK1g+fXiXGPxv8fTa +Mge8Jt91cDAenQXdpWfwExzlfXK20VG2Kn63T7CDv2gsK7rsk/Wjb4ClzH3l +YCn7tkruA3vM/bit8V0Ai7lvw3J3kBncuz7BbfCbfUGH+ray3rBa7iFnC54i +Fzk3Sp675OWKOQf0FPQV8rp5H/2D/HB0E3QU8sC3KawPzZ09Za/Z420L60wD +sn/oWOhX+CTQw9iPlaKXcJ7w1/D697+xoU6O2bTBjsnBwseDjchsZDd/j0jO +w1W5+xOJ89fWB2YVX/9c2ydyv9q3q60PbKz2c2vnykzgLGrrKHPrju9d2368 +T+1b19YznlB95cb5h/3UZ0e116xZ49SNbZj+qleN7dHZVf+lti3I+a8T3QHe +GR5M4WyxyfA/wEf4rcgfvldj3N1Yt+GeYc+Ra7++xny4dtx6DtV/rW1f9lO9 +bMw7c6JfN9Z/4GV8WtflTNCb1syZYAdiEyHPsLGRaReo/mzjfIutgxNgxGXq +/3yT3Bj1eaN2bOyG2vvOvTizNU6AETtjT9TOLSpV7944LjZZ5UG149pvq/5A +7Xg/+uiVjfngF5XdGsf+3myda4qedEDtHA9yO9ZU+6yxHb5VOVPj2Cu/z9k4 +5vCGyh9r5zl8ovrBtWMjq7bOO+kvWhHZH555Ts+rNfapvINMTm7Kptzhxjkq +6KtgOzY4Mq3r7/O4H/ydAHsKlj5VG0/B2Gtq7+H2rTEVPH1d4/1QO69jQ7VP +qRPzEF8tGDy9HDldW54voPrOtf9+4QvVT2hsm9WqH1U7zvhOa5mOPJ9H9U5j +H8kAMKex7T1e5TWN7+grYE7tfCV8CfgUtiMYo/rhtf0Tg1SfprEvobvmNltj +vw/4P39jHeB61T+qHd8dpvr1tePS26l+UW3f7a6qf1A7PjMv2NvY5zSf6lM3 +tmUHqt429h0gz/C94INBdo2NPgbOd+WkIL/h5bsa6x3odrwD/uOrIkcJfMC/ +g72JbOYO8beHyELGQ89D5hNfvDDyhrwZnicw39pxZOQlusb4yFfOH1thfrC9 +sZ+jv775YOO7OkTt0zb2Sw5V++WNfY2/Ru9DFuyr54cazwlcI85DrBIsZd08 +g6V886LgCX44eG4/1R9u/Hean7fOacTOv0v1W2rnxWyOf6i2zwycBgPBbfAM +3gXfkOlTR8YjZ9gj+oIrtzfGGexpbDP+VhtZzH4hm++KzJol8h35j7wHD7gP +4MO+wQhsWLBo4+wdNgE+YXzDXwb/To2Oj08QuxZ5j9y/KrozOjT9wFrkGtiL +jn9qdG38Pfh9Xox+zR6Pjs7fFcudHD2VccHNjcJn4NZUwTHsauQ1OAdmc2Zg +OPYStlHX323z3GXz4LvEBiJnDLtrYPgVPoN/sSGwJbCfwPg3smbsHOb8UebL +vLHzsC3HBi+wAyeGV8Eb+Ai8QE9Cb0FvQp9Cd0KnQi8BZ9FTuC9gOviO3oVe +gG2LvcGZYn+g96CDoQdhR2GPYFeB8djMYD62FvY2the6C/gNdqO3YYuNCybj +o8ZXvT5Y3PpvnbFpsG0OSh/wm3WTd/Fqbb3+G/V/pXZc8iP06tzbv6p8qrH/ +8mOVTzf2q/3YGjPQHcAlcjfBJuQNue7InF7qs3RjnXkh1cc19muOUv2U2n51 +cOC62nJ+Ejp/49yztdXntto+/h8bywLkwD1qf692bsevar+4cc4JtsVaje2L +K5Abjf3041vnFJEL8JbKI2vnwi2v9jMbyyh+B0fBUN5bNe/+T+VLtWP+2ElP +1raVpmuNzcRW4H/ioNwp7NBrcy+xVbmjPGPrw5/8HS18h7+FGAE2NfvNfcMW +5s6hB+Ar/V/uEroVPtpO+HdA4efXs/fE5I7IeT4aPuXvR/k7Us4dGwAdfAZs +mtpx8kr1U2vnaU7LuhrnBnyn8pLaeQv4DfAxIyP6goONcQrbd2Rj+/eJ8Bp/ +Jwc/bpH7jhxCr8EXsFrr/O8BsXuujO2DLYE8xbZ4WuWHjXPe/wReNc6Z2Yw7 +1Thvcl+9N0vr2P5yrW1XzmIfcK2xnoOd+mXtXI331Pbfxnl+H6hPz9a+1ZNq +22/Ybieo3q11Dt6HyM/WcuwHlX1a+4d/UvtfG8fn0GV6t9Zn3gP3G/uj59Hh +9GmMDZ/U3mv2uT/73jgv+IjWuWrkSWyicsPG8Rl8sbsFH8mvO7uxLbxwx7l+ +5Pwdoj4/Nc6N2kLjD2uc7/oscqBxTtAmtW1I7Ef2+7PG+YWHgjWN8+Cwg/ds +bAu/jL7TOD+P+/dOdK0BHd9/7v4yrW1s7OuH1Ofdxv8XyHpqf6R2zO1C9qd0 +LvtPreUIPH2t2j9tnIvMd6bkW38H3xuf4yfqf3xj/zXxq7rjeBP+uapjG3wO +zraxn2hZ9OvG8aHX9e5rrWMGGyGTGsciNtf4Tcd/czxHx34BfAKMTS4B4/P7 +L637HKn33m0dfzhM9UmtffaHq/52a532RNW/bB1D+FblV619cVzK71rHrM7R +d//Z+F5Pp7LsOG4DTzXhK3z8U1r7879XuU9tfzIxkXMax0VYNz4I1n5ga/8C +voXTkZetcxS/UXlS41jC7qqv0jifbjPV368dnzkSXbS2n28N1Qc2jvMt0jEv +woedjufKPKfteE7MZ9aO5TvyZR/4qHGcZK6O7wb3Av2X9aADf1b7e3zr89p7 +yn6yl8Ry2E/yXvesndf6fO1n9KqN1Gfh1jl+3JWRre8LceDFWsd/0a9HtNax +11E5OPyMHTOisS0D/lzbOG6KrbN7bXsHeT+8scwHK7asjRfYcHu0tuNuQi9t +7aObXHtP2U98rvhe8c2uq7ZFW+cqn4iMah1f3kDl8Na5UlurXKT135EcW1vn +Rt/epbb9cCR6gfZw4ca52WAs8ZgNYzOt3Npu4k6v0vpeX6L6krV9QGeJ5m4c +U8begkfhT/oulf7Y39hU2FP4z8a2+VvCjjEPvJte7y3YOje+B7Ktdb56T77V +2i8BPs/TGKN7daz74Ts9UO1DW+cegxVLNsaLN9S2Quu/l8Cvhm8FvwpyYs/W +sgK5js6BbEcmcZacIzEo7ElsSWyXpRrbL3x/rdZzmK/xGbD/f6lth3N2d6m+ +WOMceuQoshW5iozcprWcHKr6HbXtqxdr4zqYvmVr/ym2HrIWfR1dHX8tPAE/ +oIPAi+ghj9aWfaxlL5Xbtv7uQo3PnnO/v7bPFH/pkMb8DW/fo/bRjfO2scvB +LTCLue+VcVj3oa3XfnhrXzM4e5jqO7Z+d6DOYqfWfw8yHl5ubA9Oqo0TYATf +OSz98RMc1NpXMFzv7tD6jhyg8rrGcoAz3K/1OV6g/vu3tj+Q0/sGcwc15nX4 +HBl2cOQYOX6jGuf5vaW2QxrHJFkzOcToKweq7aLK8c6zGsddiLmgG+JXRT/E +hpuxk3i16j1iP4K9ywR/kf3TdCz/WTf2MGvfS/ULG8fG4dMx4T2wFP9yV6xn ++sR7+iL3OpZp+NqPbe1vP4B5NonFax9uaJwfgsw4po2eqbalOl5vH5X/aO1n +fq42ZoPXKyKvW9t3N6o+quPz+lfj+8/dn0Xlaa3/j43r1b5Yx7ntnAkymnPh ++4t3PAdkG+fH2Z2i+mmN7R7eG5F3wZCZO8aRcxt/g/FPRU401hOf0zf3bZw3 +gE6HDwK97hjN/9zW+SRrN/bXo0vj/8CvjQ9kDZWXtv5/L/BDnNd6/8Gf8yMz ++f5ZreeArrduY30PnfqfrfVqcODs1lhwhcp1Gucc4Pu5sLX/B3/MUa19Mqs3 +1uPR4S9X+8Wt/7aMM5+z43Pfrfb+srecIVjFOaI79O5Yf7igsU6APtC7ccyb +eDexAs6ScyQGflHaz9CYr7bO4b+0dmwGPkH3BiPBR7Cxb3gJOb1kx7KamAy+ +JGQL/NutYx7GBjqisR0ENuI7wG8ATw0KX5HHQZwDf+BnrfUkdKSrGstxYiyL +NOYt+Ar+GhgeQ7/7b5u8DdU/bv030OhH5GmgIx3dWCdGH2b/psoeXqH2+Tv2 +66Dbvt9av/2m9t6xb8ep/LB1jswxqk9une9wcGMMWDPy4KbIBHSchTrWK7h/ ++BO5g/8PKdJP/w== + "]], + Polygon3DBox[CompressedData[" +1:eJwtmHkcjlUWx5/nfe7zWpuRmZYpJkwl2ca+pIWsNUINUqgsWSoSskb2rZC1 +bEXWYioTjZqGCSlCtkY0ZM0SDWbQjOj7m9/7x/m853fPufe5y1nf4u26P9gt +E0VRtTiKAr+N0iiqA00E3wF1gu+bRNEsZP3ADcB3Qy/BV4WehP84sawpC90I +/oSFWqH/CPQBeA7UDHldaDV8JeRbkPUFd2Du38EPR57zKfKPoGeRFQA/Cv9r +5C1YezN4oNaCnkPeFboafhxrnEe2H/wd/CDGOqG/DTwb/AC4Hfg0OM1GURvG +aqFfk7HS4Lms3wbcLPG37kA/T+xvXobvzvidkedUQd6FsVeQLwFPQudpxtrz +25/x16HX0K+E/I/QneCd4LnwrdEZCr4ErgHfFboOfBC8CflnrPcheBU0AdnE +jL/9MeuXj7yHNcieZmwifH/mNEL2mu6M3yaMXcV5xusMkb/RHllB8Bfg59Ev +D17N/AGx37QxeDfyhxhrz1hN8JvgxuCzyB9krC18BfjF/O6B5kCr0HkH2QG9 +P7QVfjI6pRhvCf4P+FPw1exnutYH14OmMXckNAS+JDQM3XfAT8BXRj8vuAz6 +Hdj7TnBHZIv0xuBB0JfgZVBr9KdqTWQ7gu/6X+g/gexv4ObwLaBXkbeCPmf8 +HnBFZB1T391WcLnYZ1ycO+Mqfv+KvAN6T/K9isj2wb/A+OfIm8IvQH4Bfizy +/4I/QzYGvTXQBPg+UAf4gtA/kF8nf0D39+CH4Bcz/0fmv5Tx2aUjme7gOPwe +qDP8FOh6+LvQXwp/hTnt0F8dfLaW0EZkfaDOrDVf30PeF/yh9gluD14TrCsf +24PsXb05smI6O7KF4IuR77gC/AHmbES2gbH1yHuDu8E/AyXgceg8j25daDL8 +DMaGwPeVDvxmxvIxPy9v3wBcH+qD7A/o5IGfgHwgfEOoIPx51r+C/gh0toNH +oLME2UjwYfl6MD+VsXPyJehx+DPMmYj8Nug+8AtQfr0b8q7o3w8uLFsEX0D3 +ou4H/BU0C9ls6BX421Prvpjx3kpCjTLe4wbW68r8F1lvPLQCWSloYew7uwF5 +bXBN8GPoT4IvDTXO+E50F+Wg/LHv5Cf0Byb2jZ7gL4K/obULSCfY5mXrOtNM +5g4Db4t85sPIX08crycoBsG/xVhTflvEtq3m4JcztrEM/FjGeoPvVbzJOoYr +dp8GlwOvRScw/yn0y4JHIe+J7B4ob/Ad6251J0oSo3Py2tA18NfIvrQ2a76V ++k51l9pDjGwMuBd8Hegi3+ke/JbXQ6ekn3juJKiSbBfcO7a/zZc9KB+gO0bz +4WszX0mrVsaxcTT6RyLHyMvw9zLWA9ndemP0pzNWRvkJKgs+DN4SOybuVD4J +9mX5dFW9N2OLI+eQ5fAPBH9bOWYdfK/EvvA09BT8w3o/5COgrHjmDIBvkPHd +jEBnR+Q7Oqe3Sfw2i9hDnPUamtsEKiR70J3AN4euKF7KB3LvkQ/9HnrvyHdw +c3AMV+xWjlNs3x8c2xTjdRc75KMZ30ke5vdUzsh4jV7Bd6CzSyePYnni2FMU +ukqxKXWuLYHOUb0NYzMVi2PbztvBtiMbKsT6U8DTMvaBAuA+4DqRv3mT7hbc +MLH9tIRfmtp3xrPe9NQ5UrlxFNQFvang4Rn74GBw+Vxs3hT5nroGx/4u/H4H +zVO+jp2jL4H3gzcov8qmWGtX4liZh7mtU59D/jU0sa3+NvXeZLN1mV8idazr +k7HtF039FvIBxcLiqX1LMVG+Viy1rcvnFjK/KndwH2u3TOxbN+XW13y9bZHU +tqo3/ilxDaXa6S5wDfjfQFVin/d91iscnJtTxufD12D9Jsz7AP5QIgHxm5/N +yiGpY6xiq2LwVvhfaM96L+Uv9K9NXZutZew51Ras0x1Z28i+d0PqvcgHO+n+ +sz5Lkji2FkI+JeMYWx3Zu5of2+ZT2bvyLfL6yhfoT4ImIy8S2xZKZP0t2cQW +6FhwbSUd2VL+rO1LNrVOtR1j+7Q35C9DzzBnOHiT8i7y6rHro42JffkbflfE +9mm9xS+zzkV6kx8T15CqHa8oz6oG5Lca8kfkU/C/gtbGrg9Uq10JrlVUsylX +Xg72DeXMU6qVE9vWQcUY+KPyl8g1dVPWOhIcu1Vj5gMfU3xQLYtOZ3Amde2g +GvmI7lk2GuVqLOZms44Vgxk7ieyE9g1eBg1QLAQvUD2gfBRc86rWVU04DnwB ++Wjw+9Bw8PnU/GLZMPM7Kz/BH+J7A5CfRv4n8Dz5ZHDMVqzWmGwlyjoWy2ZG +qf5QjpJtozNQ/pd6bivwYPDB1LlXOfENfvurdoXvJ7tGdgZazvifoWPwY4P5 +hdBRxYfgXK4zyrd1Zp1VPq7YHqMzIXKMv5G9XQIvgz+Ucawqw1iay3dfJ+4R +1BtI52TiN9Fb7AUPUX2hGBi5pj2RuEZVbaoaSufUGfrlzjBRtpi49yikeppv +lcy69ldNrbN9n9g2dMaz8AXk/+DvoTPg/KlrgRPQ0uCcrHijHmUBuBS4nerd +4ByhGNglFwOX8Ps7+SfyBqx1G/wP/B4Gd0FvBfKiwbn/a81J/E19SzaqWHJL +1rWmYsqgxDlJ31FMWQv+Frxb8TJ2rrs1dS2nnLcd2avolI3d81VHtkM9A/wx +1YfgT8CDY9f4ZdFvy9g61frK8doT+L2Ma8Itqu2Da2XlTNXew4JtQTlrV3BP +oV6iTezaTm+gu1eNVwW8D7w+tg9VBS9KXAs0Q14NvF5xWbaj/km5MHFsVE1x +DtwtuLaVzzwre0x8FtX8K+EfS733HuC98LsZWww/h7FZ4G8T5x75+Erw6cS+ +dSrOvWVwr6c33Qy/KbiXq616E91vgmOzeuKKqWO8Yrtsshv8tNS9tGy+Cut1 +RH915BhcOriHVu+sHnVG6pw3NFdTqrcpF1xrqcdRP7s8sa762rfR/Shx76ie +//9vlTj26s1Oo9M6cS07S/2Kcg9jP0TO+eplj6vHid3TzlPOAtcHN4qt+wL0 +ZsZz6iJ/FHnhyP70F/h/BvfGvcCVU4+JL8lYheCYr1ivmK/e8kCwbarHDLId +3Q/r18u4Vt+Lznuxa3bxF4J7V431Q357cO+jmK9eoljWuU49hWKtaljVroq5 +iiXFs64FFVN6QIuC/0tQT14rdUxRLLkV2gUeGRyrVUMpN11UDxE7R6n2VU+p +XlI1cH/lKPBK+E6xe9nKsXtZ9bTytTHQ6Ng+dyg4Biv2yqZl+/9jbG5kH3iD ++Y3B42L3pNuQnwyOzdLpjrxk8N1qzSLw13K+A+ieUk2j+BW8F+1Zuf2W1LWu +cnw9xZ/Ud91Pc8DbE59dPbtqsy8Zuz92jaZe6ix4cMY91fHUOUm5SD1gAD/O +nLUZ25D4rxL3tho7pPye2tcU45S71SOqN1QO19vfnLr2kA3MTOxj8i3VVDPA +CxPbou5Ve1sAbhh7j7PBRbI+u/7TqZarOTblag7lSuUY5RblzOGpa1TVarJx +9fKqeVTrqKf/d3APoNpfMeJnSWeJ8A== + "]], + Polygon3DBox[{{126, 643, 726, 127, 712}, {1056, 1355, 1057, 1238, + 18}, {1429, 1167, 127, 753, 644}, {1058, 1356, 1059, 413, + 300}}]}, Annotation[#, "Charting`Private`Tag$66030#1"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxNnXW4JDUWxR/WXdq4Lg7DwsLgroP74O4+wOCwuMsODou7u7O4M7i7uzss +7rDn9855H/tHvkqlU6kkdXPvuZL0VJvusOr2o/b19X1T9PWNpusJ3b6+w5Sf +StcDlW5Qer/T1/eUrncqnaP807repXSu8s/oerfSecovVfb1/ZjfllT+uzyz +jPJ/6HqP0mdp8z3V31rXK3le+e30zquUv035cQqXX6/88K7LH1L+AbVzh9Kn +ul9a11/y7mfT9vmqs4TKv1b+DqUncz1b5bvoumDV17eD0jXKb6/rP5WO0LtO +0v10Spt2fN1E11N0nVFpb+U/1nXX9PPgpq/vCuUP0XV3veskXW/T/VtdXw9X +nTd1vV3pZOWP0PVmpV+UX1X1R1O6UfcH6b1zKt2k/MG6zqV0i/KvK92qtL7q +/6qyX5Qu1/126uv8StepvFDZimrnAcac8TP2e5JflO/R9bfhu/AN+H4L/N+8 +zKu0vNo7UOlF5ijlzBXtUrac0oVKzytdpPJD9c51lO7V/TpKz/G7ykcmv2Tm +4InMw315dmml+5VeUFqW+VUba2Xez0nfoCvoBtpaSGl8/X5dvvvyyl/P88rv +13X+xY6/3wddf8+dlK5Wekzlu3f97PMd0wfzsIjStWrnGqVru6YHnntcdc7N +e6FnxjEy43qn67FeoPzmul4G7UJL6v9HXbfznPL/CT1voPzfSbqfXmll9W9N +pc1UNr7SySrbSqlhXTA/6st8SoXuj9f1OKUOYyj8XsqXKDzXJTRbuM+t0iml ++1Mrna78h7puw73qDNX9g13T7SNKPaV1VbasfhtX+R2VxlR6uOO5HCvzeb9+ +X0BpbN1vpPpjKe2p/BgqW6H0N/xR+R+ULlX+DJW92vX431bZ5LquoHb+pusk +zLnyT6h8FaWJdf9O4XoTsV50vVnpcOUnVZoMmlL9q9TmlUrr6X7tjn+j/FSV +fc48dc0/GAd8ab2O38t64Z28e0jH9bhfSfmN9ey4Sofq/t9537Iq31PfZj2l +mQdoP+uiVt0p8+xXXa/HaZRGqL/zFM6vres/dN2nYz4xjdpZW+k15adQWlHl +U+l+NaWNlZ9NZbN3zROGKU2t/Na67lWY58JvBzPXqt9RWkTlg/jmqrO67tdQ +2q7jsmlTvn7aYQ4WVJ8XUJqq9HxMkTk5Ke/mvaOlDyOUnyHvI79u5blgHvbR +e2f5v3FRtnfylB/R8fpmnc+ktG/rZ05V/kO9e9HC7ULLs+p6FP2sPD88e4rS +HCo/VddpVOcM5efkuxReA3Mp/6+O+0W/j1HZ0WlrQV1H6Dpe13T3eNYdvGr3 +yvzsd+XPzHhpl/Z5Z0/PrqT+PUTfdb1V6VylTZXe6Hpt0q/Tu+ZdoyfPs8cW +7sdpaW/0lLPGXoLmodHMwcC8nZJ8V30apXL7qxemy5VCq+SHKv+hyj8IP9xT +178VptNvu+aP8OQt1MYsSpcoP6Z+v7jrPNetVL6r0tgqv0T3l/JNu+bd8O21 +Sssjvv8BqnemUqO60xWm+bNU5z3lv+iaFv9VGAOQh75ODK1+lTx0tZ9+n1bp +LN2vkrVDP39W2bZqf77KPO5qpWuUNqFdle2m9GvXsgo51VeY3yI7kGvIHuTO +qIXlB7ID/gPvQXb81DVPh59v2vU4GeOLqjO10lpdf2u+81ClNaCvyv1Ys2s5 +SX8WV521u+bt3xfmr/D8Yaw7pQ275qUP5vtu1PXcXqY681Sec+Z5AV3nVbq5 +Y8wCpgG3XKM5nxFMo/ytSpcrXQFdq/xf8Dh4W+l+3RH5gmy5F7nW9fVJpddV +5zWlx5V2YN13Pa+v6v4mZAi0kf7Rt59V/gX8v2PcBH4CU41U2ayF37W0rksV +lkOjFaYTxt4/H5mTP5Nnvg7S9WClT5QfqvqHKP+Z8hMWLn+1Y1wzaunfdtJ1 +ycgI5AnPv6I6+6cMDPNNx/jyW+R1Yd5M+18oHan85x1joqO6vieR/7VjzHSY +0lfKv91x/i1dP05faQfMdUTqb11YVv6nY7n5cOZ6eeVHD50tp/wooUUwy32h +K+ReN/THWn8w6w4Z24Y+jlT+sLT7cte0B23sK7o4Uel9eEppGQzPGrewXAZP +jqf8o13jnJX1+wS5f0Xpsa7xDHxrrNA0uK/KOmGOjsi3YA7+lXnYQ79PAs/S +/T913U1pn65l/t5dy33k5wFdy1Dk/75dY4B3C8vpY7vGVJQ/Gn51XNcynTUF +vgRb7qzxbaq0OvWRdcg85X/oGleB635O/XMH1mDo6rfkaQeZDj3Az8Ek4Dzw +3vPwrmCs5zrGduC6r6Gnrulov4yF+hPoerTSwh3LCeTFTx3PL8+yLt7PMx90 +jDOZ7z0Ym96zsNJuys+WOdtL6WqwVun8roUxEX24HoxaeL1OoN9/D7ZcIWWs +35UKr5nxdT9x4b7RR77NROkn9PBRa5r4DRyh/FZqb7JasqCxnnObyjdpTac3 +K79Oax0IfeGI0hgF+oMO19d1Uj1bNuaXfcpvrPrbgA+Un6wxrf+udtZX+TAw +g8qrxrwZebFQzzLj0tL0fbH6+TfVmaSxjjed8mM25tmDlU5XW/9mDal8c7W5 +rfLTKD954zV2JdhTdf6AT6h8mOoMV/4o+Anv1/V2/b5F63U5peo0jeXDIOWn +aLwOJ9dvx0ETYB+Vt41lxWjKD9ez24G/lZ+y8Tq5E9zUet2MqXS80jvwXJVv +3Xp9M8ZLsobhy/BneDX8e0TKZirM1+BfH+u5qfO91mr9PfgWD+u939Wmj9vS +zois3R11XRlaV/1BrfndarreVFlv/kD5iVt/xzVZY+hIuh7CmgG7wmP1TSZU +nZl0/7SuV+jZxcKHdigt75ZX+Q2V9eBp1ZdeY/n5sMq3VH51lS+l/FRK96jN +bVrPHfO2vfKjK7+98jsrP0btdm9Rexu01uOnUNmkjfX5bVvPL3P7qPIXMw9q +c6vW88vcbtb6u/JN79V1ytZ8eBdd767M2zZqTd/Q9nqt38e79mM+lF8W2af8 +XZX5LnO2Rut5+xXew9iU/6eundpzzTgPUFpD79pH11Nbr8X9lW8q0zg2h724 +aiyPqOxZjeuMwnN/oNIyevZUlZ+mtB98AdmMjFH+K7U3vtLflP+ZsSq/eWl9 +fefSOvsE6ktHbf63axn3ZuTceSobW8+MXlmf3ru0rrezvu9yre0Ki6avYLZC +5Y81XidP6plXlb8g6442RgO7F7ZNYJdgHfIOft87vAzetZfafrgx5oSPvRFe +BiY7qDJGu1/P3hd+96vqT9dY75lQv9dKc4FZdP9a9ETW42TBFtvqfpbiL12Z +PN96VvV/I7VzF3qY5mS5xjacsVS+bGu9bqmeeQF4GXo/uPRcP6/f39Azu5ae +d8pZEwfnO5Dn94Vb13lL+QVb67xjKv+p0nvKt7pOqPe+rXyj/JDWutr7yi/S +2r4zlvJLtpbXHyq/KDwKOaV2x6msM7Gejym9vj9RnWVay4m1S3839CJsA/Tl +2uSxF2BnQLYv0LOsObfy9xmz8npdsfWanVBtTtTYhnWjyldpbUsbBfqjH8gR +1Zm4sX3tOOWXZk2prd1po/V4P669zlnjkyhfqP73yBzlu8p/07W82iX9/EXv +Wln1t9D9vsgQpW317HTQuNJkqnt15XlhTsBwK0IP8H3l51cbx3es1y3VtX6E +LQXbBdj+DOrrejqyV89so3koC2Mt8Cc4/6rCNAMd/Zk5Hh6ZzRUZjo0DjA12 +wt7TVxkr0Y/tYh/jd+qxFnYqnKf+/JH1rPd5lV+m6/6ib+ylZzevYjPrWr9A +dx6i64kd6wB76/ddKmM89K6h6Xu/rtWJHa5rvQZbFzaMZfP8wrqe0Imtq2tb +3Gm6PwPeio2oMN5eomsdFtm7eNd67GLpS7+Nqmv7GG0t2PXcb1ZZp0GXQDdA +R7gj8wOGA79dl3WJXoGugM6AzsJz6Gtbdm2b4npXx2PauvI3niX4med/KiwL +kYPoEVul/j8K091myKDgMGxBKxfGPROGPuaBZnOdL/kdCtu2du7a9oNeB/b+ +b+n+v9Sxjrlx17oqcvqirnEOtizG+0jHfHDMrCt0G/SlgfmgHrh3mcL5R1K+ +Q/JgenToLbG/FP529GFgXmiH902s3ydQekN92KBrHYz5RAccpvQScxL9EX2R +39AFsPMNU/7ajnVCMPMclekFTAwG3iz6K/rXpq2xFDhqy9aYCbw0tPVaZZ2e +1Vr2bB69Av0CXH9Qa8wH3vtOv39ZW5ffUOV/gnvAd3rXEa3tXF9V5oPwwJd0 +HVXr5gn14SX9PkdrW+CarbEpuHTV1nIXmbtuaxwJhnwT+0ttfaLfRhy59obq +vFrb7rsPvKS17exa1X9QaV+960H9/k1tG8r1KptcdY7sWAauFTm4UmueCD/c +U/m5W+spD+i58RrbXR9T/u/hVz+im7e226wqfvMefVPZ67rO09p+tYvKf6u9 +Rh7XdXrmXeUTqHxS5XdQ+Zng+PAwbOBbNR4bc7geuL9j+8cqoc8XVL6J0qq6 +36SyjoR+tFFlHQn9CHzJFWwJvUAr4MNnwHalbX3U2RBsUZknoXehQ4GHNhyg +la719gG7xtqhMewZ64QvXRWdDf7A++gLZY9rfE/Vll3/LC3nsW1uprHP0tqG +PVHP9jJsZS+pH/9orWc9oedmaL3OnlH+/srr6DCV/aj7PzrWefdoTJfXlx4b +4zpSdQa3ljHgxX5MqutEhX0k+EegzZlCn9gWKH8NPKC2Z23NG19Q/rXKNvAv +dZ29teyYu7K9jDXN3M1aeS4ZO/rp7JUxNLbSCUvLQfQ39D70H7An9in04HlK +26xnLJ1fMTwBOxd8D5vGT+GH2LyOrfwb6ZfUwRbyY+qQsJ8jp35IOd9qprQD +Blu4iC1X+ZGqN29pvj1f6fxTKeMeHXPO0rgMW+v+ud+v47IflT5W6lOaX+nP +wuOm/W1U5x7dz6H83cGtw9X/Uyrfz17ads2VOht1/Px86cN8aZM+lHpmPKW5 +05e50x/ePWFw42yl26Id5ubXzM/8GQttH6j0R2EawEeEbRS76MfoyIV5wnHJ +YxPmym+scXx37xf2332QZ7GTT5vy7TPn32f+aZd6PNcrrR+iG46VPDp+X7AX +uGuUzCN0eE1o5tq0/UHaZ4xvK1WVbfvYVeG9+Dreih1g24wdHYG+/BAagA5/ +K4wVdwldkqeMPPSJ34r7lzumxxlDn6Nm/l5X+YW6fqI0d9c2Bn5HFh8bmqYM +Wy992yDtUA5tc303+XXTP3gIvAFdE/8HNpJF4X+howVDq7fpt5mVX6Xj6yxK +K4MD+W6aj6PgH/wOZqzMU8iPoWcHl36G+huW9qP1dV02OG22ug5K+QNqc9rS +dqAnC5fvqfzthd9LXwbW7YA/ZMas38U6bnPRjnUX7LDgJdqYLu236cNeHfsh +wF/4JfDt4kNBHuEfwGcA1mU8R2Z8zxfWM/BlgM+mQx9Xeqpw+/QXTDgDun9l +uyK2ffDls/pthtK4dDxdp08f2uSb0tjz5eCKt3T/bekx0cd/oINX1uvGCg3D +9xkjPP/G0jrrFHrP1APfrvQ35XtCV9DZwslzxS6G/XbR1CP/Ucf1sbmiDy4S +/knZkJQPCZ1Qf3FdR6hfJ1TWh9F18EWjhyDP8VGjn6DT4wfGboVNBVs/Nt0h +aYdx8M2w/3wXfsKa271jXr5HvunkqYNeOlm+L2OeRPkdO6bjifj2KZs45Tfn +2VkzP7OGtvEXTVNab5gwcwb/xNY3RfgDvGGK8MM7S9stoVFocsrQdlU6D2Zg +7qdO+9ixe+E/fOc2331Q8tA2uPP30jj0FV0fUjq64+uTyYMdniotZ7nifzxH +aTKlT3V/Y8d2ZOgH/eUsld1S2j5Bmy8rPTjQ79I2Vq7EXWCDxe92d2m8STnj +fDfjvSv5h3U9GxtO5eduTzn9oX/IlidK+zSww19eet6Zc3x9J4U+Z6qsH52n ++/NLX9GZwP/Y69AB4CG35rsgI2kTmfmYro8qPazy/5S+J/9o8o8Uln2PlNZn +mUP6PbLwe+g77384de7O9dHUvyB9oj/YMu7IGM/U9d7SvnHsldjV0C/R1cHL +6G7o9uB3dEBwIvgdvzM+anzV2K2xmYL30R/hQ/08sWu7LToB+jI2OLD8Eqmz +QWgGuyc2PHRWbMdgc3RS7Lbgd3RbfJ4bpM2/F9YV+vV0Xe8p/Z3BgUdoDk6q +HMOAH7NX2T50f77X5clfFhp5IHRyRvLMDfXxP6F/Ue++5OnDpunzsmr3rMq0 +NzJ1aJ+4CergP11Lv58cOwz69Qml9TTs0yeWtlGfXJp+0CnQ72iLtY++PD26 +w//RE9+a9XZh6fV3l+7HgKYL+7GQqcjTVUrL/teCf0ZNnutoyUNLndLY5sm0 +g/3kwZT/CUYqvf7x/0Kv3dI2CHQIYg5+D7YpSseBLJpnhoRvkIeHTJl2yE/c +c32w1o3ByvS9Spu86/jKc8e8ja2ycUr7RH7s+J78J8nDt58PL8LfwtyPn2/E +/IyecVE2Xsppb9zQLbwKGbVncB08EX54aOib94ybPpCfWv1atLK/n+txyfN9 +WGOMD78uOg/6DrZ+bMn45+4NrQ7Q2hmhPfzb+1f2ccMnLv0/2rgp9IHvEt6H +/5J3XRd6wF5EPA02I2we+AvhUfgNLi5NL8hn+A7f8HClc0rricfqenZp+wO2 +Jvx52Jvw+xO/gr8ffwZ2bvyMt0g3ura0nAI7M9a5s54uD/1D39hEsEXcUDo+ +hjJsJKtiR6tcRp562Hkvy/o6MmOHX76stq4obZ9BhuKfBg+g46GbIS/gdeTh +l6ytG/Iu5gvcAE/mOfqMb+TatEP/PwELqeyCxnaev6s/i1emBXAT9ICMeijz +fHph+xXr8q1gKeIqWP+DK/ODGSvHjhA3cmZhGxq46ezCdjnwzmWF7Yro5uAy +sFo//RS2Q4KjWGdgYtbaieDxYONLoKWubZKnFrZhgtcG6Z3LKR0Dpipsq2JM +6FZghJ06xpdgUtY7/gJ8Bfhr8Dcs2bE+u7rSErnHH3ts8DjrF0zAeidWBfse +dr41CtMKOi8xPdjRwO3EAh3e2C4BdgI3IS+IEyFuingmYqXoA3FNU6rvQ5RW +7Rjzgn3BwOcWjok5JViIsaAnghf5RidFfiJHoXmeX6Rye4wVnIluMzi8B/6E +DkYb8J9XCuvf2AmJFSIOhhiYv+n5SSvHLKA7Y0vDVoFNl1gFbL3YeL8sHb+A +Te3+jmMb0BPRqdFLB+yb8HNiMLHzYuOFbsEV2BfA02Bg6OQl3R/Q8XfEb4C/ +AJ8CY90jNImvAeyIf+2wjvP8hpwAn0OfOyu9r3o/lNatPyqtVx8QWuD36cMP +m5Sfr2cXyxoA/0M/6ADIIGhs3cKxZ+soHQ3/Lu0Dxa+xa8e+JmyoC4cG8L8j +B+DnU1T+Losrf0Rjuwm8/+mOsQ/zdlN0zc/Cn8cOv0U2INMoB5uDq8HsxBEQ +T0C8BPoleia6J3ru1dE9pwg/B+viV4LXwGeQEw90/A2Ju8TPjq1+ucLxA9gD +seMSy4AtFxmK/YB+EPNKbAdxH6wNxsqYiat8tjT+JC4Anz2xIl+VHh/0gQ2E +8dIWugN6A/jqu47r49/H7sw8spYuKi3r4eGf5/1vdBzXwPziF0Mmott8nOtK +mueFlD5kbvTs16VjLcALxJ98kTbezLw/0/F3eCP9ejpj/qW0PXsX5bdQ2pI+ +05fyL78icYHEWaFfbBM6RL4MxCZDZ5vneWwO2DWwdfD9wSivhR43Sz3wAmuU +tcqaRUdkHWObQHdCb6Ld1TrmVWAWsAv4B32IduAR6IFDK8dPg+HBwhvnHfiq +18r4n874kanobMQFYUcBS4ApViwcp4GNmviLF/ONmMtnQ0fMC7xsnfQfeofu +iTPDBntmxr9W6jFn63bML8FZ4DCwFnFqxK4Rq0YsGzY19Cz0TXRNsPfI9HnA +ngZOgfcRU7xH5TjbZfIe3jd5+DI0OsBz4bfL5/30g3cOyz18f43MLe/HJsp3 +XSJlzDvYb6Hw/LUyts3zzi1zv27GuVXH32yjfEdkCHJow45tqLxrqXyTzUMH +8JJ+X2nHtodB+cZgFmgLOzmyHx2ROFPsWO+H5jYLPUED0Oi75V80+17olvhm +dARwBLr0P0PDP4QPQrOP5LtAN88UjpXE/n9TcAX4gncgX/fLOw/IPbS4R+Zt +87S3U+YP3yT0Cy0i76aK3B4c2f1dYXwA3XxbWN6DFaYs7HtCrm9aOA4SWz3Y +BB0E3fXbyFnoBGwIRgSfwf+PSj/pF7IEucH74PeDgrPBseBu4meJCybGFlsl +dkpk5iSV5QhjXLMwvWJ7/yH0CR8jPgr7B7rbBoWxAnbv3fNOZBZyDRmGH7zf +P55vBW0xN/CHLwtjJnDGz+GT6IBfFcYE4KTPCmMgMNk3wUhgo68LYyfw0n8L +4ypw1OfBcGCyTwvjJPDTF4WxGvgMv8JtwXXQ8S75fpsXjq0HzxMjQ3wk9nmw +7D6Vse02heP2wKvYPIhtwu7xQmm/G3YMYjjxL+HvwBaG/43YTGyW2C6x8SKL +4CvIpoUr8/MfOpaJ6CvoPvB5+D7lyEny8P99I7fgU/gE0TmWjSxCxiCP8LeA +ZfC/4M/DzwKufiD8DL6GDrp9ZCXxfsRl4oMGO08a/Px4YV8k/hTiC0YEYxO7 +ulmwDzGkzNUt8IHKviHKiAcmDhF7Dj51YhWxOaD/ECeIHYDYYOw++Jjw/+AD +wTeFDwr/CL4pYj7xe2BPQPYid4mvA0uAD9jDckB4N3PAXp7Hw8/h8W9nzOAF +YkOw17Hfhr02uwR3IHfBHr8FUyBbDgx+AZuAR5AdzD+xqehJ2DqQwcggvhUy +GHmKTGYPDXGPyGRwDL/TJrodNi1k0TelZff3HeMX8AeyEr6PnKZfj0XvwS5E +rD17N+CLxLJj60WnQJ9Grwa3g1l+zXiwvaD3YjfmezMPxGE+VFj/Rx7dwRoK +5kfmvJl3k75IO2CTgZhW4nPAUsSKoHPfFfkxbTDR1+kP8gPZgW0eeyZ2TeJ9 +Zi8cl7JC6ATfJLHfxC9gNyNeAt/+9Vk3+K9vyvdCzoNZoGtoD/80cz00WIh5 +ZB2xnvrlSnAuvAd8C86FH80Qewt8CkwONkf2gV3BsMPVx0N0PSy8cM7wQ/ZA +MO/wUeQMsg+5QvzRk9EfP9B12so4G1oAR7wYuXFgx7/DN7AzossUlf3v+OF5 +hmeP7RgHrRoZgn2LGCRw+G1Za5+V1lFuyT38it9+Kh0TRF2wOz6zCyr70NBF +0EkmqoxXBkcurRY5hT4FX14tMutzsH/lOG/kCfrYYZEt2ESwkYD11oiMXjo6 +DnXAMOhW6FjIGfZZsH8BPe3bjA2ZjewGPzCX70WGo48Rx8B3Z56INX88/JVy +eCzXN5PnyrvoK22jf9D+oOg6zOcS0XegBezNL+ZZ4ibg39wvFd0KukBvR+ai +7xMfSpzosXnPm+kjtPX30NqolX/HxoIONlfoZsnoVtAdczokczxldCXmnn4P +jAM74oWR1dDVgN8SOtvt/+ZoYM6uzzcdv/Javj24izXJ2gSfEPNLnA0Ycjxi +Lhr72fr3nBWOqaBsppQjYy+ObH0wWA5s94V+n76xffT9xjEZPMs77wgPIX7t +uMYxbPi7+A2cz/uJSybu6ybeRbxX1/FxbyaODnl+UeT41MI0H9WWs2Cly4OR +itqxVcQQ4ee8Jvwa3n5NxrKunt1P9c4KxuJ5vifvPLnxe8FclwZLgDPAG9gf +Vsxv2F7AFBcEh3xS2ccPziEW8qTss+S58wrbL+g3z5yatc6aB29eqLoL17ZD +3RU9hu/COIilJ06MtTwQU4a94cHI6neDZ8HL0Db4Gn3p18gZeB72Bb4/dADP +gUfyG7Y7eBI4kfgj/LrwAfgYvGHfwnGa0CxxmdgSwEG7ZJ3OlvfBf7CzY+ue +O98aGsN/jm8H3gefxK7BPfiTMWLHOE3tztA43vCNynGQxEDOSaxNE/ucvtfG +jf030Ay+VWhugF+Bz9lzcWvhvRYLRm6/nLX8evjpZOFVr2edwoO4R56AucBe +zBsYCb48ds/7E7GrEmO7T+042yfCo/FrLZ55x58JjzsnPA8/DHj89Mic7zPn +M1emKdbQkKxv1jv4kNiPufPcWXkW+yh20qprXnV++BXzDR84Od+HuMxRw4/g +29Az8hKbMvJzlvAxyojhIh7v3PBy3k+ft4tcxT41fXjhIZGBA3am5fJ+5MOI +8Pqpw7/xKR8euQrPOziyl3G/FLlKe/38M+NjLpDh2EXg5+AX9gpiM8T2j20K +mz02J/bvEftELAyxiOzR2LGybRReNDhya4A3cz09soh+NuGftMf80R/sbSdk +jNgRuSeeEjwKFgV3gEfBoowLGxg2MbAJ2B8cy1zRBr+hP/Ee+k0c4rtdzylY +kjnAloRdEOyPXGdvNPONXRCbMX505hH8QmwdGIbxMc7DI094P/GHzDm2SuzM +xGKeEdo6LzICnxd0cUFoA3kCjoHm1gidDgqO7t8L1zGNHRPexF4xvgly9cKs +cdqEpqAjfBTEDuBXoN8nhl8d3ZiWoWloDjrfuPOXXZYr6+bY0NOg0A7jYQ7A +JmAU4pexq+PbpU9cXyn/8h2/kt/fDB54NXKbNY/cfinPHp319WL6A1Zg3Y9M +my+l/fPybt4LL4QnEpuJzst8UA9+DR+Ef7+ed02W36kHDmwrx8YTa7dl1jQx +XQdGP2GvELgHuxt9+DxtIOPR27C3DdiY4NdfhyfBm9AJsDUjA8B2tPdc2kTm +I/vBTfflHcwJMTy3FN6z/Hzq7x9M80JwDr7u51P+XPL4pPgN/EEfsb/B9/l+ +xE3VkR/EMoBH+cbIDPbTsheY/n2R/iIDqI9MgO7BteypAZuCS7Glk75IGWNm +vMwB32D0yCfaRT7xHnRr+DA4+ZPSbYKTxwzNn5vnxs6z7FunHnXAy8gt4vZ/ +jHyCTpg3bLXYA+nfuOnva/lGzANjRnYyB+NmbVHnqMhOaJf4sR/TJvOHvKEN +vu0v+b4v5b3QzdGRlzyHvYb2r8t6GyV0CU1/Glm2Ys963/X5Ht/l+yCTqEed +N7QO/1Ubq72g/AHKn1N4D8TVwULwDGIBBmIHuBJPAC99MOsCnjZDdEn46kNZ +d/gA2F+CTwD+xh5/5C6xUcQTER8FfyCOintkEDFDrAX4HjGIyF3kHe+kXfwl +YJAB/wnXgb25XPHDEPMOb2b/NP5SbAXw6EmEGf6tMd4bGwy2GGIs8Ydunfzr +rX1SxOjN3DoGl1iCLWi7cCwBMgi7IHr0OvmNcmJXsQFh/2HfNu/n3cQ/IR8Y +G7Fi8GPGzL5h4iIZJzFExBIx18gy5gwbG/IduxE+0E/YP1HZR4HcBL9gF8Dm +xHvBpcRdYPvD7oe9CgyLLetD9o7Uljf0c+PU/3drTAweni7P4oN7h716Kt9F +9zMqv0ht7EYsPPMGriZGtz++X314X3Uuqx0LuKxob5rG+5TYv0wdbC+Lqfzt +2vs9Xs43YB/N2a315eHRYeGV6LnYX4nVYK7BIU+Fh2DDZi8LdmxkEHFjlwZH +MR/Yu9D9KSNOnbU+ZugGmQuO2zQ4B5sWdiNw2UBsEfiBmFpsSOiefAfk6K7V +X3vTkYkD8c7YnGiDZ/5oHJ+NPZTY451rxxgSC80ebOLnia06oLBeRWws3x86 +GCv8BpyM/YezVL7smF+MkTVGDCl2pU875nXwUmwKQ1OOrelNYttrf2PslycX +tgljHz6lsI0Y2zQxScSTrKE5XqcxjiROg/MKiEflDJkjC8eTYtulfn/8beGz +XX5DRrfed0Y8O/WxvRMzMKnaPLl2PCNl/Ibt/T3Vn7W2b2cE++Nq24HYS3FI +4X2kv6n8EpW/Xjhee4vGNDBZ2sL+yxolrn2UrB/4BesJ3/Ghhf3HM6kPazeO +DzhE7bxcO+b/yPSHfv6p8sUax0GcoPzQ2v49bMBgeezG/ecfFPb5Xt54PwC+ +v9sb7zFgf8HzmTfiW4rMI/b0HQvvAYFW+f3fmVt8BXsXbpsYeeiDfe6DQifY +M4mlJaaWWOJhoSHKX1Y/x6mt+5yuPnxb2dd3NXvaGp9J0t/vwpgT+/xxee/P +jfdzEkcJX2CcYNN3VX5UbTsFz51W2O79vco3rc3j4A2bhD/wG7QF1oTWOUcC +GkF/GRGZAeacOfkf1c7FtWULdHRMaO+HxjHu/f71nveqvZ/2jk2db4m1V/n6 +hffzHRq+SQwjscj4v9gLzp5w4jSIq3kxPAff/auF219GbVza+OyZx9hnWXs/ +IvvCnq0dt8834lsS4zpE11/ZN9J13Ovz+b7UI+aVeKH3Gu//hI89yb7b2ntx +Pm68f4C9Az9Bg41tx9PlWWyqXJ9O/m09e2rjM6Iu0XVpPbtY4fce2rg/2PY+ +CLbEpo5tnfbBkmAXfAar67lrG8dczB2sAB1yVg1n1rDPHVsK80I8A3o2fjN0 +bejrpdDhq6mDvQU+/XJ4/uHq58q1edhTeZZ52Cxzjuxbhb2qtf2kp6n+jOrP +aoX3IJ7SeC1A//jMmNu7G++TOTXf67q8F3l0RWFZ9kfwG/S5rcZ0WG1bD3u4 +2F/H/A9X+eG17TLE7YJhsNVvrPKHasvX9ZSfS/mpGJPee1Bt+wt7Tw+pba9Z +R3X2qr0G1mZfY20eunfrM0S+0v2Dqn9k43gr/Mt3ZR7GJNapcYwS+xePr72H +cTuVz1v7bBGwDvIf/DMme3Fqy4OnlL+vduws+g46E7aguXvWmdCdwA5gCGKI +2LsAtsa+8TbvrG3nelbtDKu9Jmbveb8K/gxi4sdX+ZfK/8geqMZ77AfiTLDr +oreyHw19D8x1XvDs3MHnYNpfGu93JQbyOLWzXO29IGO1jtvA54G9hv1v7H3r +P5escNwFZzftXJhnztd6/yo03tezDYk9vtTdMc++WNnmP1ueIY6NPY9fsC+5 +9l7nA5Q/BztR4diz9RN/dp+ePT97h2mDfa37BCuBgcA/7KkF42BTwqeCb4V4 +Engr/IT6/X6twr4t9lGdwb6q/MYcEy9CrDH7oHcPv98h4z1K9X+ofG4Osolz +cJbr2AeCL4T4AfYrk8cnwt4FeBrf6r/q99p613q6/0z5c2rzC3RtdFDwwFxq +/8rGPr8PGq891t0vYLbGZwqsVloO41u5T2Vz1MYCxBVgn8U2i8/xsfCQF1Xn +zMbnGD3eeD8bfJi9b9QB7z3ReD8bMuVQ9i3V9vfjDwdf4xvijBTO3qI/9+Y3 +Yoyh23vy3k/VzkWN6+PLRf/Axzql6GHNxvGCzDnzjazHTvlM9Johwbj9+1Br +835spAsqfzaYQfmPdH2ytr1xlp5j3YmrJr4SeyHxwOwDZn8d+OId1Z+/duww +MdGPZH1Ai6fFDoltkXmjTa4PJX+p+vZF7Xiba1R3VeVXLeyfZmzYj/CJ48si +lgC9H9sJOjb757CvYLe6v/aZCOzlugN81LMPbHHOhOg5HgG+/ntrrLEo5xa0 +lk3Lq3yJ2jGh7LVlXwd+vucrxz4SX3ynfu+kTc5aGKNnPxtx09jmiX2dT2Xd +nuNlBjXeq88+/SGN38e7iL/jnA5iUV5GD+05VvydyrgKTDVUdcfvOS5jJeVX +boy7uLIXkfw4ui7f2LeJ/ECfgcYGzh/Ez76S6szTc/zp6SnHljgQu499Y1jP +fAQeAs4APyJz2UvX9Kzffc1+eeX3LK3z9J9Ho2e/UZ22ZxvI7Jk3YhdXVb8m +6TlmlzXN92ddE9tOzCJY6BFop+d1RmwFcfDEV2BDJe6BmIch6DHRyU9R/a0b +r0nanjjtn1QbN1POuTH4ofFBT6eyQT2f1zIz/KDxnvt1G/9GOXx9qp55++N5 +9r3MIb4G7KLLNLZZY6++M33DRgpdbNA4LpYYCuLpFwmfhl/DG+vaeBoszb5J +1hLraGZdB/fM/xg78SXQMXsCvs/Y2RPwTebknNQhz56CuXqOd/6ZPcGNvy/j +m6X2GIf2LP+QffT5u7QJb4ZHs+bRXabtWX9BpvV6lmtLKn9a6Rhlzvvg/Cxi +CW4Gn/QcR8N+/TWzZ3+TxufDsC93NeWHN46tu0n1d+g51oZ9nzv1vPfzPyrf +vuf4kb0a77llv+2ejc+8wL/zXGXZj9x/qjJ2Abc8UxmvgFWIcWjTN84yWaLn +uKdFdF245z6s0vM9+dV7joUijol54uwF5go9jDHQ/+95b2NdEv1p8ejRd6n+ +/FnXx6C7gC0ql82X8s/wmzW2i2FHGhK6nZa1H/7zZ219Hl3+ctXboXF/GAtx +G+jJyzAfteOIsRtiiyTu4mDV36vn80f21XN79nyG00WVdQDw/7fI6sZn0+yh +si16zv9R+xnqc04N9Ake4JyeYVn7u+m6Sc/n+9H2pmkfXZyzP9DHwSTEw4FF +H0sePrB04/M7OLuDfmBr4LwrbB7YPuAhuze2S7B/BBsjmA+8d294F7ji0cp+ +ROwv7E35KWtq78b9o287NaY/zo1gH/TPqcO498h4r6n8DPWvQ3/tOe6J9bp1 +L7HzKt+g53ilhypjVvDqw5WxLDj28crYF9x7DfKw51gn4pK2jo1pv9jsOBuG +mH7mAFlGDBdn5BHHBX/Bxws+IXYRusZHio1/3uBVzqlBj0VXrZBHjeURsreb +euB68D37ytljTh5eyrmL9zTWt+esjVfAKuuxF7uxDsieGGQ7ex8453Wv2Nqw +zyG3scVhH7mltr0ETINNF58K8gBcgl7A+TmcnTNwhhVnOizU8T32FOJ5OFuU ++M6Bc8XIs08cWwt1eM+1yOjWMWLsW0L/RPekbLSUX42tonU8Gs+tlGf5bn82 +/nZX1l6T7HHtIs9bx7LxXF+e5buN2vrbjUT3bGzrHl77nvxsyj/UODYffeWR +xrGiO6n889rx+k9Xtv9i+11Lbb5YW6fmu4GjsVNhGyNWC7sWeBPciQ+EOAVs +2ti256mNF8GK+FexDWEXeqKyfoVu9Vhl+zLYjjPusG0R13RD4Tw2LuKleZb4 +I2wZ6KvoqvNrrLM0toMcrPxPtXH4mcrP3NjGhT2BuH9sUxvq9xtVvpHub9P1 +9co6AzGGUwWLfYesaxx7OF3OVMCmxNmUYHRiYKG1dWJz+Lm1XkE8G3tM2Vc5 +RXDcpMFy2Jx4FmzPGWjMPXHfp+vZ66O/MybwIPYZYpvYE0EcMHrDaI33Em1S +2+aCveWjyjoA+J/xc7YhtiBwBPFc8GT22aN7sc+a35dOnfPUzteN9cxX1c73 +tWM6nq2sK6InYjfE/gE+5PxP7A1gLc4RwYYBz+SMENokfm/enu1E6OAL1MbK +rDewFLYSdPnzVf5NY912/dpzzTyzXwgZhY4zvcrHanwOJedy7dh6X98MYJjG +svDW8Byw5dm19QR0BL7Jt+EDnJ2AHZGYt5vVxunRy9ZEx218lu2HzGHtuFzi +HrHtIaOJb1w8PAGdhjyYExvkxOED2Jrwu3L+FLZv9BtiVCZHPjfeN8XeAWwh +T4ZPrhl6gDbIwzPhe2O35n0ThtcQuw+uB4uDwzkbkPOgsSuyvx//A/vu0RsZ +B7ZH7ND4BZAFyIExWsuC62vzC3gFNsV18i0Y8zp5FpxStMYqB4UHopc1Kqtb +x8beoHaq1rGxV2Jbbv46s4ErMSf/4ZyMyvamGwufXfuzylfoGb+CXfEZs7cH +fY32yrTJmLDbMq7xVH/FxvvKbqzdD/qwfW2bCPYQMFfbGneB13qtMRs8eNnw +YdpbJHMFltm1MZ7hLJMle/axguNWCXZCznO+NrIe2f5B5D/xE8hCYnXxW+M3 +wo89IGM4g3fBjJmzF/Hn4VcgPm4htf9963l4uvb5I8QIX1L5/DjOArlK+Qcq +xzjjW0SnQp8Cbz7RWldbsrZdkjVJrBN2I+xgm6ru5o1juKBF7J/QJjYhMBN+ +dXQhzjomHhsZjg8JzH9Y7KX4VnaLjfyKyGt8b+zvx1e1f8bKM6cFAzBP22eu +8FPvGn2VmAd8Wvj4ic3Ax8KZS5TNknL0Cs6H2SRzt3va5/3zpw+8G18gfRlZ +GUOzNkfWtoX17yFHT2rNE6ZW/sHW5w5yfuTdrfcBc3bjXa31Fs4Pu7O1nsBZ +ife33jc8vvK3tKYbzly8r/U+ZuySxJpxfgLxRNjW0SvwU73YGt+Oq/IbW/MA +zpi8t/V+Zc4LvKf1fmXOgxzZen8zMg3ZRvwu5/fc1NqHOIHyt7a2PaHHg6eR +H/je8cEThzxbz7o0ejSxcs+11sn5/abUIWaZPPgEW9TNsY/clHbAL28jc1vv +aeLctTta66UXqP5trc/y4dy421vb3/DDPNTaF4PshGcTqwbNPtOabreAr7a2 +zRGfNCL2fdbPicHJ4DLwGGtmxWBL4lv6z4GqHPdNTPassXdgZyRPPC+8GJ8u +583gU+uP4+nYZ0k7rE9sk9goiRMnLgZa2i50iT0FOiUmBb8gMfPEu9DHDXI/ +LL9Df6yh3bJm1s4aIta9P/6pY9qdPX1gDbH2hmfcjJ+4G3yU8Dnmf8+0QRzS +znnu3PAJ+AWYiTj6OdL+gVkTzBljgwcx1jlTjznjfER8+/AK1gr7c1kv7OHH +H0/80v7hWbQF7yPWCQxJPBDnUtBP4o2Ilzo+63irzBl2ZOzJ2JrxrR+bvtIG +be2Y77Ftvg/fbKd8Q8bN+NkrA26lPu/lnSPyXmKdiA8gxopxgB974ZvD865T +w7PgPf3/J1D91Veepe/0j9ifGdMXYrjpDzFT8Kgd0o+V0y/mne+4c+aIOAbm +DPsDdMUYiPWBX20RGoWOiB/v34NX+Qxs5ubIzA9xg/jdeSe6H2Pnu/O94bd8 +f+THqvmWrIc9sj7wL+PDHoipop/EWBF3jt+aGDhiFOCt/fF4XeM+7P2ci8D+ +cPYLjCN6uLY1Tse3cF1rOcGZspe33oddK39Zaz2Es28vbX3+09jKX9PaDjKG +8he0xm9gsatb4zHOSDu3dewHmI1zhNnzOAr4vTXGXLa23R/cyTmsV7Y+i5Uz +a69o3VfO0L2q9Tm68N2TwnvBuZwVC9blDNELW9vRwGicoQZmwT43e21cydlp +6IT4hjiHnDOF0ffnrj1Oxoh9frz0c3SVnd/aT4ktlrNB0WFPqI1dwC2cH3xJ +a52cMyMvam2f4izJi1vbrRjr8Rnv16393Pi4H8270EGwA53Y2haEjeHk1ph5 +xdryhvEOaxwPQSwENpWle7arrBn7CLaR+VS+XM/7Y7ZpbHPBvk1879DYvtCh +se2iR2MnWym2UOJLWP/IVzA035BYk+1VZ7Wez3vFNoPNCPsMcRY7N8YFPFul +PjEN2G2wQWGbXCF2yP9W9sdjS124sV8BnwLnzp7SWo8ta9uDkJXsxWFPDrEX +14V+wPzL16Yh5nPR2s+jf29c+5vxvXgW2Y7dgPNxz2h9PgLn4+7U+ozc3Rrb +j8Ao6LKcl4c+u1ptXyPyvK+x3oXOtUFtuYvM/bxyrAk8/O7aZ92iz2H7I6YT +OwznqnLeKLYe4tlfbW3vwIf5Stof3DhOCDz7Wu1zADkDED31rda6GucCvpby +wbX9u/h2Z20cW4PPibNJWK/YK+ZsfFYyeg/7sdiXxdkInJ89V2Nb1ztq593W +PjZ0X+I80H+/qFyPtbGN6nzS2odEvANnHRLzwHmeo4WHjEye86/YUwUOWi7l +o6TOvGr/89Z7uPFpf9NaJyTmh/1US6Sf4B32js3e2KeI3XUx9L7WeJl4im9b +613zYOdozRsXbIybwcy/qM4PoQfOhhkjbTJuzqRm7LM1jh1B38PXxDl66GP4 +549pre9wJk2RsayXOaQdzk4+sLVdivdAf7xrvtr8FF56T8bFfjfOkty/tS1n +xtq4E7r8R20eCv+8JHQOrWInxLeNLZGzpXdtbW/Glo5ND1nPmdC7tT4XmlgD +zgokjgDcBIanjS2xxba2w3G2DTybPZLslfwleeLXrm/tTxui/A2t/f/U+S2Y +gVitcaOzYvfg3FWwHGfxYVfFrnh+6tPm7amDv4N5+CPfF5sB5x5iN8AnNkb0 +fc6WxhYDD/wfU+EMeQ== + "]], + Polygon3DBox[CompressedData[" +1:eJwtmXn8VeMWxrdufmfvs/c+kiGhSSUa3GZRxtKcUhokTZTQTKkk5SpSEmlS +Es1zmgyhUjQoCnGV4Sqay40Qrtzv83l+f6zPWc9a6333O653rXVKde3TsneB +IAjGnRUEBfndFgXB1jAIpsZB0DMvCGonQfDfNAhuRDYY3XRoGnQkEwSN0N3P +7wHoXOyfAJfEdjb8v7FfSfvLwbfz2xpakA2Czdj0Q/8sbS7GZhX4DPLp4LvA +fcHPQvcgGwKVov0c7PegW08fNcELwftC93FvLghqYf8MYyqObDr8adpNQ1ca +nMX2M/Bu8CaoFu0f0vc1R/Ak7MdBG+AzUGv0l6D/Db4+fd4BLgb+A9wAPABc +AVyI9s3B/cBXglPwreBe4HLgLLgZ+DZwUfAp2t8C7gIuBT4LfWPwD4ztBb4/ +EL601gB9CfRn4BsiawYuAj4Jrgcehu1X4IrgifDPQZXAhelvBevTJuc5a65R +6LmNhUZGnuNe+qsEbouuC7Jf+X4b7NuBJ6Pfim4xsuvBozRHdAuRFULXBPwj +/MnYZ6EAsrbwy7B/hG+3R381/Q/AZmrWY1wOvx/+dnStoeLoF9HmEPwY2jSA +n4tNQWxvRvYatrcguwn+QOS9nJdYpz0tn3pMGstu2pcBv6n11FpDtcHjwMvR +L8f+J/AZ8DlaT2QTwV9k3bYR+AVws9h8e9o3hl/A9yLtF7JurGej2Hw/9D9j +/x7tt9G+sfTg0ugLwjdB/z/a/gEeCn8BfdyHviw4g74pskbg+bS/lfbH0K9H +dz1txuv8QqvRj4Suw74mdEr3CtwJ3WDsZ8E/Dt0PLoc+ZXzfg7+FH43+S/qu +Sn9Po/8KnENfHfxmxrJ76O809kN0VmlzBP4AtA99FroB29/Ba/M8pl+xfxL8 +KPwDyLrQ31hw69h73gA8SHdSPoBvL4AfBjXC/jLtAfxw3RH4stBvtHsKXBD9 +Gdq/D98f6hP5Dn0APxDqG/mOLYN/MPVdy4FP0/536Fr4XnxzN7rRmj/fLqw7 +q7sCfizyGaoa23/Jj+nMNma818K/xbfHRfZdG7P2XfJhw/k9h9/9Omu6E+Bu +4L5aa2SHsD0I3Qn+p+4Y/dVBf4XOksYY+07qLmpN6/Ht3cjijPs8hu5TcEds +A/D3We+Z9qoE1A7da9q/PH/jMfgAqoFuJL+bsP0o9Vneis1Y7I8ie5b+Foee +2/HUe6s5HoM/Co2N7CPnYrtFPhm+Afp6jL8HbYZHll0OvxP9zfBP0ceV4M/k +M8EHGUM58Ce64+hmwZeGtqb27+qjLfh56AS2peh7Mrol4CPom9PmZ76/D7oN +fjw2f6FrxRxayV9i8zq4duyz3R2aAs6AF2fs494Bt4eW8q0hyOrwjSX097B8 +H7IV6AZg/3zoNfuW7zcB1wc/AM3XWLC/Q3sDXgR+Qf4S/lxkMxK/QXp7tKfP +0X4H+iTjPt7X+wReAT8QWVX0z4CXqH/wYvkqcB3w+Rmvxfng4xmvyUW6u+Ah +6Csz3pXor479VlXXHHX35K90/qEvwQl4b8ZrVFF7F9uXlsz4rLwC/jT0mVmf ++IzqbA5F1gP7MujPhu+p+w++DFxA4wX3BF8ODnWfIvvinXoPIvvkOeAp4M3o +/6b/x7CvGftu36c7Dv6a7+X0dmTsOxvGXlv50GLoZ4J3gcuDV4EngDeCH6H9 ++MR3QGdfczwA3pO1b9AbdDv2F2P/C7ru2LcAXwT+CdwN3A58qXyaYgHwCPA1 +sX2NfMhD4PKxfYd8TF/wFbqP4N7gzuCS4CC0T+0ALg7+k/566M6kfuP0tg0D +x5y3JxnjFvSTwTvQH2a8dcFroabgC+Vz4O+JfPd6gh8NfQdP0PZA1muhN3dD +4jdPb51sKmH/EvYfw3dAVhh+NjbVwIdpcwp9HfnoPJ+xXtp72pfR+KAt6F5M +fLf0xpxE9zlUReuNrELOb47emteh88Az1QabStjshF+C/oh8Cfa7dNfkY8B1 +9J7BV4kduw2CSjOeq8AXwregv33gKrS5SOcx/+4ep+/zQt9h3f1lyFuG9gEt +0S8FF81YVgv8Erh5xnNSbLhdcWDoGLEG+mm6YxnLLtX7gGyM9pf5Xsl81oEv +0VsKVUbfEdwp9B59Sttl4GPg68Gvar1T71UXZJ+hX64xw9+IfjW4Q+zYVH18 +C14D/ln+KuNYtR80LOuYtWjqmE6xnN7cYvKB2L+PfavIc3td8WDoOZZDf03i +t6iC/C3tp6PfHtrnbEO3N3asNlExKvYL6f9u5loU2TfoV+s+KP5Afwn6Uch+ +RD9bMQD8Kr2JiifQ76H/U7SfkLFP+gh9dfQlFbuBvwDfCe6Q74/KYX8rspfp +q5h8Gvjd2N++WG8s3+uq+JXvXYp+L/xKnX/4hopH9BaCfwTX1/rT/he+Pwn+ +64z38jX0J0Lv6RT6nArVTxwf/U++nDZ3x4653tT6QJ2x76gzH3tPtZcvgf+h +WAXZ9NB7GCueAE8IvUZ6G3Ykjj31RjwRe4wa2yy9AdivZHyz4TOM42zFEtjM +CD3Gkbqb6OeEtolSy8RrjUfFXgPNXTZ/wz+MbGLoO6Wzqj3VXurMFqD9I8he +DH0mh8S+g7p7U0PPZVvWc9OclLtsR/9onnMYtd2qfCd0H9U0PvSTQ+/p0Nh3 +WHdXNhrLZq1/6DENin0GtPeSaa12op8bes3+JX3Wa/MqFKaWidced4dfS/uH +aN8f/HZimXi9CdOwvyv2XikmbB/7zdPZ0hnrE/tN1Vs6XD4b/AG4CPwe5tgC +3Du2rik0jv4eUOwZOv8Qv05vVMayTuA1iXM5nZG3dFZi3+3dod/+LuBuoWOA +x2OfeY3nFWTDY/sA3f2XQ+/9h1nzOgN59DcC2czQZ1r8jqzbStY1dgyj2EXf +OKH8BNw/4xjyOvke7HtqbZHfgP4t+ZDQaxiAB2MzJbTPFb8l67MgWRH0G5CV +Yi0rRubf03scWbYxdoyh2EKySfLNigEi+yDxHfneO5FlN+l9VZ+h833FcsrZ +lasrpqscO8dSbiWffnXOPl++XjH4evWXOhZQzroBvmvq2EI57mbalwBPpa+6 +imfANVLHRp3VRu819B9wHjRIOTE2D+q9SX33l2Z89+UDlHsoT1XuoRxEsb/O +hWJ/5QCKra9CVi7jGPtF8MO6b8rZ5JPQVU/9lg6V/0NfIXWu1ZE+P9f7Bq4I +7oJ+oXKv1Lm6YoTrlL9h87XuDvr54DtT5+qKGeYpXkhdK1BM8rnmlp+bDIic +q0axeeWsH8MPlo+IHHN9EzuHVe6qmHuOcp/UtQPFPHPhW6WuTSgmege+ZerY +SDWG2Yp3U9cKFIO8Lf+dOlZSDUG52rWpY2HlbPtiz0lzqc3eHgTXTZ373I1s +iWxT1zIUIy6SL06d6yqGXAffPnWspBrJJvjeqWMr1UCWwvdJXRtRzLVR8W/q +WFM58VrlGqlzG52BxfD3ps6VFbO+p7mljl2VY78L3yZ1rKcazV/y7alz8UL5 +56dy4vOjc9Qjds6gXEE5Sz1weea5RncjMq+YQbGCZG0Sx0iKjRZGviuVwe9G +vjNNwFeB39BbDiU5x4SKBZXj3abYRzGVxp9xLP8d+/9c5Ji+ZuKcUbniGOgD +dNmcxyKf3gl9FfC+PH9zBPho7Nz6Fb1zOb/xetvnQCXgWyXmv6NNWXBr8ILI +OVJn+KrItjOWdcrxEreR7VzFu4ljEMUey8E3g4vnrNOYq8NXy7nteqhGzjLx +G6BmiWNIxY4zwE3BhXNeG/lw5abn56xTjrpN/hybEfCtlY8kzuGUuymGGAjf +Nue7N5K2D+pugCfAj4Z6KXYEF8qPITrkbCNdX2g//ddHlsnaZj3UAhzye5hv +3Kf1Uc4Ivwrqn/ib+tYoaGDimqJqiR/qXUv8DfX9TNa1rFsSxymqaTVOXBNV +LVQ10QuwbZ44FlXM9BX2DRVfR/bxim0a5Mc2inF2549RY1NOpLl2ztlXas5D +4LvnnHtMzZ9LrZxzfc3p3thvrt5anfky8s8513I0R52FkjmfZZ0J1WZjaFHk +Gm211Dmnck3VmFRr/TVxLquaayXa/gn+JvSZXxC7xqXalmpOf9H2xsS+O0S/ +C3weVCRyTi5+U+y3SrKz6e9tvVGRawx5mmvi2FGyzalrTqo1qUZ0Fvo/8tdW +d2KuYkvVSxRrQin2TyGbFzomfzJ2zKtYVzHMYcWr4LvynHPPQ386ca6vPi5I +HdMqllXOoNrkmcS1YdUoFQsuRnY4P96T7/89cS1Ob4Bq0aphqHahmnRdxnu/ +Yl76ugKbN9AXov/V8GdCj3UXfc4PPeY16I4njoX1Zp2EfzW271BOr9xZNVfF +OsqhlRscSlz7UY6gWv3SrN9u1ewn6W1LnOup5tkO/rKcfbn2XLnlUeX4oXPM +l2PXpFSLkky5/sHEb6Fy/pn091vitd6BbEzsHEi5z0Jko2PnIMo9NCe99S3B +syK/+aqVjFfMF7pmsgL9jNi1BMUcOfDT4AWhc6KyqWMExQYjVd8AH4pd+1cf +qtX8kDg2VM1GtZf9if9rUA1Gtd/vE49VNWD1/UnWY9U3/g9WuU7v + "]], + + Polygon3DBox[{{3054, 3451, 3055, 2183, 1939}, {1721, 2439, 2552, + 1722, 2539}}]}, + Annotation[#, "Charting`Private`Tag$66030#2"]& ]], + Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`]}, { + "Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 3], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[{ + Polygon3DBox[CompressedData[" +1:eJxdnXeYF0XWhUcxo9O5xYQYMawYcA2YFVfFABIMYA4gYhbRBYmCIqgroCiY +RTEAKogZUVFWzLqCOec1gHnVNXz3nXPmWZ/vj3qqfjXV1dXVVfeee+6tnnWO +ObXrKUs3NDS8u0JDQ4vI07qh4aykoWGTtKHh4Lyh4exIwxsbGg6J/JxIl0a5 +VeSbRRoW5bej7fGRJkR5ZqQpkW6KdFqi8l2R7oi+ZkQ6M+ouyhoaRkc6PMrj +428jIp0X6eD4PSTyiyOtFn23i/SPKB8W9RdEPjHSuZnuSf0t0d/r8bcdIvWI ++qFRd0mkHvH73MjHRDo0yodEGhnlWR7XzZE2j77XiDQ7yvfQV6RbI42LPneO +9tdE+d+RT4r0ZpTfifpJkY6L33tFvkKkkVFeK1ISKY20ZqRG/94n/r5ipAui +fGKka6OP6fQT5RMiTfY4eKYrIh0b478t8vsidYtym0itIl0VfbwX7XeNdEqk +kyNdH23axt/6Rfm6KJeZ5oMxX5Cpz5v8TFdGmhTp5KivIu0Y19wefd4W6dgo +HxPp6Ehjo83gmI+jI/0rykMj/2fkCyPNj3Svx3Z6tL0z8ocjfRblSyItivKQ +yAdHejLK/4m+h0X5lShfm+naJxrVH33cTznq52ea+3PjXkdFeinKA+La8bz3 +SAvj7y9HOjPqzmC9RDo00rxod3ej3t3PtI97veq11zqu2yLSI1531LWNv68a +qVWk7nH9f+Oay6L8e+QTI3892sxt1HNxzV1R3z/VHvgy8vMif7FRa4y1yRo9 +JeqPivoj/T7GNWotM9cXeu0dHuMYEem5KC+J9ucnesYVou549lSkhujzyqh/ +I+p/iDYXJZrz76I8JsovR/mbKI9O9F5WiWtWZB9G3eeR/h1pRPzt2KibEOmp +aNMu6j6Juj0jDYq6I3KNf+34nUXKI90UbZ5hPiIdGuUk0oQobxV5GmmfKB8W +eRbp8ihP55pIH0U/p0Z/10b6NMrtI28baVnWZ+RXR/ok6ovIf4h86ag/OPpo +jDQuyp0jbxlpLGs38hsj/yDadYp52C/KH0a5a9SvHOni+P145EMi3cpcR55H +uiLKW0f7QVG+Icp/jbyI1CnKZ8Z9T4v0I2sjft8T6WfkT+TfRd7A/eLaG6PN +6ZHe997i3f8a6atIi1kL0d9JUb97pOcZS6SXkV2RvxT5C5Guin629pimxe+H +o79pkU7M1M9/Iz0T5acjfRHlZeNvo1LV3x/t70t0zyrqy0gtI/0n6u6O9A1j +iPy2SJ9F+frI3/fYfkI2Rfqce0Tf20f6MsrXRZuTct2b35Oi3C/SAtZepAfj +73MirRSp9p44P/7eP9Iu8fd/xu9ukTbyXlmNZ4++N458W+Y50V7i7/tF+5Ui +XRjlAdHmyEi92NPx+4lIy3udLZNobTwZqYq0vu+9ddxzE2RwlFex3OySqbx6 +pBWivHykuYnuTx1tN861plowd5Eei7RcpKciLYhURNrO12wS6aBE+oA9+Wzk +60XaIpGMXipRX09HWjfS5h5Hg//GO7uC9xlpZKQTcs35I27DWLd0nzzXgTHe +JNLSMS+bJtIH6Id3M8kDdNL3mfTcRVHeOvINPafkF0T/Z0XagLmOfNNILaKv +RYn628RzQL9/j36eS7Sn+fsrfm7k3mtx3cBIfaLNOpFvmUvn3GL5hB7bKZG+ +udB16In5lq3IVfTPbolkNToRHTYtyptE/V259PjdUT8r0tmJ5CB6Bz2NTkZn +X26dhB5fPZf+QVdd3SidM8lycgoy0PpohOUo8hS9TRlssGEqXd7Be3WudRDy ++hH/bpb7yPyDLEMuZU4i38KyAr04y216Wi4h93aNvFUqebjmn+b7Ga9d3vEU +X3eX52jNXDgC/Xyax4VeYg4fa5T+Rt8xz6el0nVgDHDHWsYeG6XS67skege8 +o6nUZ9Lx6Htww9hof1GuOQY38BxgKPQ94zok8g0j9Umkc4633kH3zrf+/QU5 +FKl74Lt9Muke8M3fYwyjEum5h6M8NNLVUd4qk45EPx2Yay0xzyMyra1nGnUP +1trhxg3o8cHW5eidc617jsyliwZGX5dGPi6XLgcTsMY6GVOBlxZG/nHk50bq +z96Otk97P2zt/bG/8RXyp5t1CvoCXAHmeLxRmAiMCpbkPfzTc8HaQmeDnaan +wmR9E2HY673+wGtg3UMj3Z8K6/wj0p6Z9DS452+ZsA74Y+9Muhg8sZcxBnp5 +y0wYBbyxRyZdjl7fLRO2ABN0sSxFJ3bMpPvBAbtnwg3o/tRrm/lGRiC3kRnI +6Y0sQ65JJKMm5tIP6In/ROobvy93HbroJ+uO7VPpoc5cl0pf3hvp9Ux6C72C +zkJPIc+vTSQLrwSvGRugi8EB1+XCBehzdBS66hjr5cmJ9NJk66ZtrDPR14cb +b4Ax0FXoMHTXmCjfHKlLIv2xUS6s0WAZjezFDsE2wS7BLgD7YwO0dDv0/elR +39OybFCkcyI9FPVDos0xufAV65m1hjzZNsqzE+GFrvH3brmwzI+J9PLDpXRD +4nGAL8A/2xvvtLBOQS+DA36Jug8jfzH+PiVSY6Rb4u/fI0cS6f/Fxh2/GjNs +yzzGnEyNv8+P/AlspyjfEPUzc2GxNSyf0HNj4+/PJ9IHq/hv6Mv2xnVguZ6W +ndhBY9FHmXTIG4nsJ2Q1+vZRr6lGy0H6OtJ6eFX3yz1XqqVv0T/o+czl1p6b +tXz9k9gRubDBwZEOsg0C1gCLgAl2RJfFOJ9NdY9mfVhj16Rqv3aUW2eyzZ5K +pfvnJdL/udcI16BT2yfCHc3jAmfuG/mSRr2b1GMEc4Jpv476Abn0b3vf/6/u +6y+5dPFWUe6dSE4jI9C52/3pHVAGIz2X6Vr2JDoDfADe6Br1q2XSu+AQsAaY +41+J8Ec76uLvn8RYN0/1fsCZm/nvtFsn0lKsbfZR/P2sSIdl2iOfJsL72Fyn +pnqvzfY1ehTb/AHG4b1M3aGu7+Aya+Oc6K93pHVZH1HXMZFN9xOyjvXMc4HT +PKfXR3m5VPdeP/JvE+3r68Bvqa7/JMozo/whzxD5zYnW5FTkZaq1uX4me75X +lI9IhB/Oj/vOiPojIn2QaDw7xrPvlAu3gOvAD2el4iqw175KJEPebZQ9MSWR +TdGMj9lnJ0fbVxNdf3Oq3+DEBut/3tvFmcaAvh3pOQSHvJYIvzXbgZQHR35j +tL/c189MJFPZz89E3dORHo/fvyfC16z5d9AjkR8Q6UfKmeZlv8j3jfR9IiwA +bgMzvA+WSaWnXsxkt2OzH+b5AndtnAk3nJoIb4HZwF8bZMInNxp3cS38A/vx +WD/LJP+N+sm+L3Wsj+O9js6P9qMinYI8i7G8lYgPGetreRdgIO4FRgITYiPD +b0z0b8qLE9kz7yG/U9lg8ApTM8nrM6L8ZqL2PNeFmZ6B9dzfdtkMy03sOOTo +GvH3CV6TO0VeRTqQ+6RaA6wF8NPFufAUexhsBQagv37uE7sPbEsb9vop3u+n +G6fd4TJzzPXgA7AZeOHDVM+BHvk4xrNn/H43UTrRfb6Xan+C09CHzbJ/YrR/ +wBi1DXZ0qvXOfh6aiN/o7z3Afjw31Z6HZ5kb5SWJsC5cDNgEDmGL6PPT+Nu9 +rMtU+xEMA/aaYSzGnkQnPtgo/qCXOYSXU+lLdOX9lX5/5LbU04Yy7cFzM20H +POT6ge5zbc//OI8JXIPO5XnG+/nyXJzGs40aD33Rz5qRf5kI4y3xc8IVzI/x +HF1JF6xehLyqNJ+PR35MpNsbhUXBTeBQ7gfmom6N6OOLRDiTe66Ui0tpnWpd +giHXSiVHwGNgV3DxC43q63zXIdeG+F3w91Fus3pc+3kibnCw2/BOePbBLoND +n/TvpjWcSDd9nUgfIa/ax7ubYxy+WioZOyDK+0f9eankA3prVIz/5FzXXZ/r +N9juctusYMFbcmFDxnVVpLcaNZ/cF5yGnQu2Q0aC7W7N9Zt+uI6/z4t7fpcI +yyGrwCBwQXCj2BDwVyRshSY+zWuZ9zUiytsZw6yUCVuBz8COd8a9bov0Gu8s +8ssi1cZI4Clw4R3x+6pIH6XaY2C18cbUrKPzwPyuh3u6nedFb2caN9wRWKpL +1B2Qi1OBW4EjYj5u95xQD3cEluVZ+Q22fQrc7j5GppLbPMPd3KcWhm1vvcac +wBWhr9HpN8W107zfkaO9LU8+jfrjo/6n+L1cpn7BneBI+Cpw5Sz2RKQdU/Ea +4C0wDTocngU9DocCjoJTGR3tfkvEv9AvePX3RsnFWV5jF0S5QyouCH3+UCI+ +aJfoZ1+wWiq9BeYHi4KrGAscS9M6y7XuLot2dSp74XZjkYej/BmyOur/SKTr +wHnoOzAl2HI19wVuW9bPQ5nnmx7X/i2Vrn89Fa5dKhVeQjejl3eN+3fI1ebo +TFwMmBfcONf3OQr7y7/neAwrJtK/2PJlor4ow9v8zPvNNG9PWVcznp1TYaYV +IrXMtHa5X18/O/iTeXrA7wKdjz3F/P3ie3NfsB7PAA68JBVXs8jPRD04ECwC +JoEj6pjKJm3Ww5TBALx/eK42ibA2eL+1n+MZP9fCRHhxc+cLvQ439T3Bq4Pi +OQZGajSH9Lz7Ya75DeYE14B14Kn+cF/gz+6+F/OHrMNmf7tR+g09B0cEnwon +AhZ4IRVXjj4HBz3lub3Itgd2B+NY4Oe6z3O4guf1PpfR8TM9tztH+92NP64w +1r2sUXbM6+7zNI8BzINOft/j2SOVv6oZ11C+IcrvpvLx0OcM6230NX4S5uFi +Yy36B5dOTrWXufaNVO8Vrq5tpGVTvTt0LrwBMv8g62jkLTob3f1Ks+xPJCfZ +r/C/7NmHStmc2JvwVOgG9AL77wzvwUVRPziVn+rjVPIR3gRstdj36mR997Zx +BH6BBZZ7n7t+T9cznlnW8+jfodZlyMZjU40NXvoJy8BvPeafPE44Zt7Rb43K +73IZOYo8hce+ORNWBz8xf8d7Djt63sC3L2V6T8uk4hC4Fjn8QNTfYN2HnYEP +Alnf23KUeUMuMzZs/1f+pCeb7LxE8hn+gevRFd2s98Gi+C765Kq/B27APEeT +3eA2XYwNsC/Qk5OsK7Fdf/ce3MxYi/f+WuSvWi6Pi/Hv7T3TJpVtzniuiPpD +UnGRYKcPPf/sa/pEfiJzsHmRnStm4seRcY9E/mwpfNDOOIH3C5+JfFnXe5c9 +TPkky2b2MlgIDu2daP8gnF6qPpHHv3qfbuj3wH65Mtps6XGvG2l6PPt5ubAT +XCvrDZmH7EOnXBbtD0zFzXXIxC+h28AjVxiTNPln/Fz7G+8xnsujfQ/3u5b7 +eM+YEK6M+Z+MbZiKh1ovFaf0iTEnc8l+WcCasb0KB0zOXpsUdb1ScU/jsbk8 +FxOifIDv8UyMcV6k/pn2x1DvEd4vuA4MeA08j/XBs5nsQHjk41LZIKxJ7JFV +XeZ5mC9wJmNkrGBjdGYrv6+50cdforxHIs68NmcCZh9v3M74mAuwMXO2pufk +BI+F+WzpuQPHsuaQ1+BS1shqXies5bU8t4f6fU+wzN/A4wG/r+35zPzuwWXM +OfsFDMfeauP1zJp4LFe7mZl8fmM95i4eZ+53BgZMvB/g4XkfcATwA3CHcArw +CaxBxgZXgf3a1jIWmwwOHbtsXuyDjVP57Da2nMGm+8JrnXXFvqdP5EmLGOPS +uZ4TGdDaaxiZx1whG1kTXHuBx7mlxwbWa+8yOHcLr6tbM/lQqeed8+6xQ3m3 +u3o+6ae956p53yKDm9fo3onmZ2s/Oxwg+BmuAN0Ib4tOLFNhOWQsGBG+FMxY ++b6sN+QQ65W1elsmX2kn97+N9wtroIvfEXPVyc/b4DGj88EgyOi+Xj/InAF+ +L3t4zUw1fnugUfuD+yID0Yvox0XWM+289tCru6XCGMj+jn6nd2SKsWCtMv/7 +ep3flcnveKHr9/c7/dKy40KvsQP+tOY7+T1S3tvPdWem+AzKYEN8n+A0bMHP +M9mDj0Ua5r3JPurmPcJ8dvdzzcrkq2Yvs68P8vqhjOzCHr8vk9+adQ4W4Fps +cPbR7FwylLXXzf3MzuQvH2d91fNP+6KX9x144SD3f28mP/3l7vMI3wvZcoiv +xT7Bfrrb+gx7C/2GnEB2gWPRU/0ivVZq3fb2+rndeqGl5TTyBdkyJJNsgnOH +o0VG4ddD3jMvPAs2AddzLTocXT7Z+/oY70EwxXG+15upuLhBjRpbX98Lbo56 +MPLbqfDk6EbpqL4eP/iS+iPd/9G+F/0wZuyUezLFOkzw/DC3yDTwI5wMGHKb +mJc3Ir2aOwYkFa94RireBzlDHX+bYVkx1GuVOIXhqexNOCXaIIuQUVx7snP6 +Av9s4v7ph7UxMBV3c3em2AbeL9gOjIeNfX+me/BcS2e6L9iM9Xmg1w+6gRga +uJeXUsXRPBSpL5g58h1yvecxftfEK9yXK37hpGjTL1OMAvgNPIdNA57CPgXv +LR9tl8tlL8FH4tfENsH/yBzC0WFjci1yadlMWBZ8ONv93OG+aYcdukomW+8v +iWwQytgh+NOJtyDWAnsau/pFZFemMnYNNu+FqfBVB/fJfef7b9h0yAP0EDIB ++Y/cQwYWmeTS9lE+MxOnAJ8Ah4jNvMR2Df5veNTTMsUP0W5k5J+l4h3gw/Ex +IP+ZZ/yr+EZ5/3d5DayeqR/so7Uyxd/AF4OBsSXgGrFXiPfCZmEtv+B1DucH +H4gMZ61i82DrwJvDn6MTsSeuSaVHVjXnQD/wu9gw2C/7GT/DhWLDMYbSfcDF +j8KmyMR33Ojx0aa75/55zz9+zt9S+TfZlzd7z77j68De2HlTUtl02Exw+9hN +6JHpXjOsH8roFDhX7C5sLjjaO10m3uBOzyG20nV+L7em6nMH981vfAfIImIJ +wEtw1cQ64H+Hm8S2AVcPj/ph8C/mXB9KpXPhNe9JxW0+mMrvi6x+NJU+QCa/ +Bq6oxZMQV/CAr8UnAW/Lu8KPMzfW+/BE/vQ5lg/75PJfwONu4eu5dorvMc6y +5GG3f8BtwBfEQc3z3u+cyU90r/umPTzhzublr7JshMsAw++QqTzPexn77QDn +813eJtNv9vh2rp/hOSPOAyzKfC30mn8lyjvHs3TKZaNg/3SzDHzc45znMvIQ +TuVpj4e2z7n9v1Ldg/7XzPS30vJhgeUP2OaCSn6u79wvtiRy6wHLLvyi19s3 +yhwiH5mT5W0rrexn4X7Yt7v4WZ5ulHyck0tewq9iN9InObY2cV1/y8U9wTvx +/Fx7rmXt0pXkLf2+7DWGzYdORcayR9Btr1pHocPwiyCzXrWMgneAf8Cf8nAm +fw/7op/7+c06Cv8BemrTTFzonEbFEXyViof+IvK5Mc5Hc/kRWSd7JZJJyCvk +EhzBRx7/Fl5LrNVLo3yc5TrcC/wXXOMw+xGYK+75ke/bxDe4TF/8Dd8HHDlj +gicntmRxKn4cbre3uV64eWIb4NTJv051HTw9MRJw9etaxjJ+rpvra9EP8IPo +C+Q3/Mv2vu7bVH0Tl/FTKq6FWIxfU/HFxG78mMoPwW9iM5D5B2RaK6wTbGDW +zFz//ZdUvopLfD1c/njfA3sQzps4GXhv7J47bPu8FX20iPQxeyrqdou0jLle +OF/22lyvUXjLod6/x7m/P1LFk6D7idWBXydfKtM9kcnowpc93hU9frjKlSP9 +0ah4NPg15DDcJRwm3DtziN6F+yPe5PtUc3+Rf+MzgZPjWrhG4iJWcp/kLV1O +M92jjd8FOhV+E3w4OFO8V2vn6FDkPesL+V8bQ4Ib0fNZJp/3IPeJ3ifnHsTU +4feAA4LTAV+Dk8BI4HRwM/IT3g9fITFRrGvWN3ISHYGPGR2EHb9ZpvcOP0/c +FLoSuf94rlha1jJ7DO4Q+78dtk2UH8vka9zX+hNdjrzCF9Xaz9j8zDwXOh/d +z9/x/RMD0BznTXwYsU/Ee1OP34q8lds0xQJk2pvoE8rs6U/9XNT3ROfk8icR +49LTfZIf6jJYilgPeF3eCbEyxEbBAf/d7xedgu+fPYcPGfsZXApO5TfYFbxK +PXV/yTQ/7H30M3oaHb6xy+hrriGGDR/rBp7nwz1Pa3t+2vp+3Kuf21NGz6/n +eV7FZfAV8oAxNukgy2vWA/4mYoLRlU0Yp3mdZIo5Af+wz9jn+CFOdj32C3kP +l7Fx4KqwF/CHEQOF/wv9iR5Fj7FH0bXI7N1dRueiv4hlQYexR9gzd1jPol/R +p9zrYI+Hv2+XCRdv5/bsKfbcQL+XKW6/o+U/OBtf0iWZYhSI/1snU7wm62eQ +54F90cr1rIE2breb3zVziFzlnWzg9Y9exWf2mddhV/fJ3jzQe5D4KuaK2Adw +MHj4Mq/rbl67rKPO3nes4c5/utchXgNt3P52y6gDvd+JfeDdgVHHeh6a5QBy +gblB94JF0EfEqhzv9UCcCGcEHrDu6O16bBpsG2KxfncZGwfZc/Kf1sDJnmf2 +01PeU8Q2E2ODDYtf6UiXe7mM3wm/1RG+L3GKlxjjcR2xTwtytSfOmngocAx1 +xLgRI9bPY+MMCLEV7H1iLU7NpAvgxuACsFvhrrBvsZ2JK4MDwt5BJxHPNtS+ +9IWRFuXyMfM3fM7IdM53DLEduL/twhMy5WADYhEYE2t/lOcOPyD5iS4P99zy +fvv4eq4lNpTfDxvbgyWwD9eN+3TO1Y5EPDJ19/qZkYVn+9n5jV/vmEz6Clk1 +2O+IMyA9Pc+cAeJvrEf8vyP9rku3/4dlxUiPjfw8l6dl4iZ4D8h1OF7k/mGu +5/329jrmGalnHTS/8wFuQwzW6Fx6gXExPmQuNscov7v+bgOXjM7BznzVsneQ +1zbPPcrvnXd+vueCPk/3897iMvv3cN+LesbDugRHEBeGjcq+7OJ5xDf6oNu0 +NJYb7udCjwxzubfr2UsjPFdguj7+/bDneYTnkHEO9TMy30P8jkZ5/NTT1zDv +08pteD/fe5/jlyEGr2nPJ/LR8BtOhthmfIT48oiFG+u5Ah+McXmg69FhcGb4 +UeB1mCfmizgi+Dl8CXBy2IXI0x2NEYgrAidwPX2iH+EF8QfAL8I14g+AUxzt +9sgu+Gx8G/Au+AQv9jixzS9yG+Qy9cQ9cd8XK9ni8E/4UeCAkeuMh3rilYlb +Jk4b3zp+Bbgr+NqrM+15YgHedDwAOolYXmI0iB+7MFdcBvY39juxCvCC+Ejg +BeGk8XnAI8JHcnal6dxKKgyE/Ec+U0a/MIdTvcbgdKd6PuGx8XHACcDR4tOC +W308U8xfR+trfC7o7qa4tUzyAN1EnNMNnrNLPG/ITmQothWy83nLT2L/8PXv +mYvPg//CroSDh2eHYyfWnnMLzB885YNe54x5usdPPTwk8QnM5dGWofCjcILI +VbhVuFR4VDhUeFt4VLhneGe4ZfhjuGN44+Zzg9wbmTHN/WOPw19jv2OL8l6I +22X/MTZsC94zcepczzw95rmCL5mXCUvD8cwpxW/gB4C7h7NiDY72uh3tOWSt +ja91LuO5XJzumbXs/TNi3c3J5INgHh7yGD6I8pOZztbx3s6qxW1/HeUlmdYQ +OOiJTFiI97tHrrbzPX7mnPhPfJD4BK72OmAN/JopBhq99lumNYrPBN8gcSf4 +B4kxJ9YcnyA6+Q23fz9TjCNxhfiC3vS1m6aKJcU/Cj9NDA1+32Vy+XKIPXkh +05klYnHhldep5Q8hRpd64paxweAttnO8ywv5/3idvaO8l+vJiYshnpe43m0S ++U+5D/6xtzPVE+sLTuR52JfMITzax9bRH2XS08flinH63O+P98Y5Dji/Vb0H +L/H7ZV9gt+6aiWc7z1h3mmUnchL5CRaCy8Cm51wb9wMPcLaNmPMPfH9iz1/K +xbERm0h8wyt+TuJ+GO9bHjPnld7z/MMXwevB6XF2hLFjg9/l+3GvMb6G9i8h +5yrFgMCl7+O9jM/qX5n8Vtzra68xuA+4ZOJn4Ja/zYQ7wCZwFn29Pp72/NIW +/pn2J3qNgVWWuE/Gj99+tn0d8FSLMz0nMcz75Vp/O/g365Hn4mwMfh/WGXIU +3xwxMJzXIr53WfPeoyxfuR8xYeD67zJh+y8z9cX8MC72AOuCZ1renDmYAT2N +jsbviP+xlddUC/siz3Q72nzuPs/x/P2l1hxSx/2YI/bEH5niJtkrv3m/tK80 +BvYUMZZZrrOnw40PKa9knDgsV6wNzwnG41mX9Tw3zbefnWf53e/o35n2HmN/ +LO51XKVYDsZMf6z3Jv97KTkH9gSDwu0QN0qsAzY3Zzg4y8EZc87cEEvLb84V +cd7lEWPbhcawnDGiD7gj/Fr4t5Db/Y2zweS3+f0jw/HnoEvQI8RHNseDEOtH +bApxgAuMy8F6h0V5bTi0RsVRomM5O8MZJjgt4jzZW/DQxNUR/3ud7VdsB7A2 +OBAemzp8QfiT3rAu4wwIsSacl+V5OY/E9ZyX4ple9JxwFo6/cdaHM0/E+MF5 +EheET4X3yDkveCFyYjEpL3Td654rdCSymvMNnGOgr0VeA7SBN902VWwPGIOY +wEdL+TuJUT7J80Y72oBnWZ+sU/Qbsn3/RONk7jmHAe8FDwYfNsHYF96FWBrO ++RADQD7J5fmRP5FL3nGOiBhM4j+JA2WervFvYn5O9ZjoizESs8q5JHzBV3t+ +wT/cG3nAWOgbOUr/+MnRPzznrfn/fMjIjCWWIcRa4KMmTgJumedjjuCDiXni +HSBnkAFcQ0wLfmb856/nWhfw49iRrAUwO7Yg75B7g3HAPaxL7A/mkjmC48S/ +wtluuG3e85OprmHcY7xXF/ndIcO5H/dCn3XyvTlDyDlDzicS97p+pJVzyRFk +K/bferk4yQnWAfRDf8RhY69ho3FWDPlLXCpnZzh/y/kZ4k45i0dsEmfS8S12 +9voGs4ErODPI3k09pt08Rs6kcWaK81yc6eN8DXGYB3isjLNHrrNXnIvumAsj +IUPQyeho9CnnPVt7n+Kn48wDsoN11svrju8H4HNBDzEOzjAyrlc9RnTUlq7n +ublf90gbRvp7LV2Jziw9R7t4jnf2M+3gZz/Hdu6W7gd984rbzU7lG8JHBD7n +fBf6lLN6xOG97X3GWiZ279r/t/bJWdPIK86X8Tf4cLhh1spN3pesS+QkNgTn +HIkVYv0OMJZG/rDukKucEX7eMoezqsgI5DNy4gnLPeKirzImZ/2yXnmGHf1M +fbzP2ANwJcg9+EjWSluvHXAm62FXzzfvgTlHb7EO0bvwqet5HTK/e/n9jvAY +kWvk/D7c6x4chX7hPfO+2atTc+0b9jlyhT39rttyDfNF3Bl7lD1PW655JJdu +ZH0853lknzOv7HnkHjKgU+zFxZV8XHtG+d+V7Lk9ovxpJfumY5Q/q2SP/i3K +n1eyvV4pQk5U4uX3ifqvKtl2r0X915U44v2J+axk37we9d9Umhuw+QrG5/tG +m+8q+TnfizbfV+Ji94v6Hyr5DA+I8n8q2Q2jo823lfbPXlH/RSW78OOo/6nS +OYNDo/6MUrE8h0TeopaN1CXK/61k93SL8u+V4gwOjPKvlWyjllFevpYdsHeU +v6xkX14a/S9XyyZgDRxWyt7Anvi5kk3ROep+qcRpT47yVaVsop6RL1srJuij +mPdfc3FFP0efy9TiJbtGm98q+faH1ML14Psq6tevZef0jvJqtfy7Z8a1q9eK +Yz0m6staNgZ54fLRUZ/XiiMg5qNVLf99x8h7leKyjic+ppZ9eWyUq1oc8C1R +vjeXH3GXKH9YiUvYNcofVeISdovyx5X4gy5xXV0r1rVv1K9Vy9e3VJRb1uJX +eO5Vaj37ylGf1Iqf3T+eZcNacW8bFLJxmm2dE0vZO+Tr2vbpF+UNasX1nIQ/ +slQcyyqRZ+6Tura16neuZQthEx1V6ntAcP9rR966VgzA7lH/SSV+ZfUob1Qr +bnHzQu1oc1opvApuXWLMhF3SPer/qOTD6RHlhlq2OLFr6LiHLHeQj5xhwb8A +lgJHYd9i5+JnQCYhm+BcOdsFDgNvIfOQfejwb6yniXcCQ9xueYqMABOw/9HJ +6Ga4WWQcMpJ+wYTUo3u5x1OWg8gOcAO4A18R3CG6m3NVnIVCFlE3z/VgE+QO +1yHrwQqcy/nReG6aZS0yt6//xrO/bZmFrMd3Co8A3gKLtDB+5Xsn4N7z/Ryc +DQfngfF41mv9vF9Y9t1imY3sBitxfo4zSLwfdAgyj3MeB8d7WboWFwJ+4dnB +tmcar8Bn4mOea5mLjmHt40sn5oj5H2BsBK562fPCO2Ge0Ftcy7PhXz/D8zHN +vyk/mAsDgX8O4tx1LZ5mUqyxzUrZGrOMt7BtwUq0Z07BcOA/YlGRTyuVklGM +e7Sfg9i72W4L3oVbA/9iK7NW6fsl/6aMvhlmXcL7QK9MNI7kulle38wp88m9 +p7t/1sEEr5dlKulC5CF2yp1ep7zXmX7Pj3h+mVvWOz411jxt+7g9fYBjwFyD +a8lZ9CyYC4wz19gL3QYm6RVt2pSyVZGFz5eSh61jPP/J5Y8+v1DMAvFhy0b9 +J7l8fGdE/XOl4lV+jrpXHNPVrdY5JriYk6N8ZSmb9oXI+5TinFpEPy+VOuu5 +MfKqVNwXfNkLbtO/khxEBq4X/WxYiOOZEPm7pc5xJoVivYjreijaLyoVb0fc +b+dC87M5srCUXH0r2tzv9XNUlC8opDc3jHJZiEs/FZ1WSAfR9walYi3aRD8H +FdL/H5e6Bz7NNaL9eYV8zstF+bNc/PZv8fdzC8U7pJyXLHVG8/VSc8p8IuPP +LvSMK0b5p0I8PXpyXCFdeVCUB5TiSNADS5fSBYdW1ouMsxKeAEvcGG2GF4oR +PB17v5Dv5KRa8ehwC3tH/Y+FfJ+NUT+7UNxJu1oyGvl8X6UzMG3R+dynVDxL +HvX/LBRLsWqUnykU+3VDXPtcoRiFBdF230L65Z0ojy8Ui3ZIJWwBrng18l6F +YkoWRv3lhfy0DVHOCvkY20f+VqmzOsgw7EjO418Z9R+W+m7Z7nHfwaW4wrWj +PisVo9Wvlu8DbmWD6HPFUv7la6N+bKEYt22jvHUpjvXZaHNRIZ71kShfXIin +7xlt/lGK5+hSCZ+BzdpEec9CPtCxUW5VilfFTsUXB4/wftRtWij2cKto07aQ +b/eC6LNnId5+9ah/oVAMx/VR/3Sh2JSto365Uv7lLTnDWigmbLMo3xjl+5Cx +UT68UMw0MgzfEr6nTaL++kKxa9uBKwvxgcQR3VuIg98/7nVeKV7vtFryDrmF +XO9v/L4W+7QQP7pPpbN6+MrXjPbTCsVj9YnypaU4r5crccJwvmClawrhpTfj +7yuUiml8ohJuA7Mdzjovxam9AW4sFbs4KOp/yfVtib+CQQrFh42K8vhS/MI5 +4NZCsdp7RXmTQmObG+Xphc7Zg/VuKYT3non6iYU4deQxXCWcJTqHGKnXbH81 +nYttFO7g/cABod/wC/Y3vwGPDycIviAmERuzyb5o1NmfJpuiUX2h66njN7oF +38tRtiHgnOgLGQ4v1Xx+grz53Cr5t7Y/iG+Aq0KHEE9EX+AROCp4LvQCvD9x +F3AtcGC0Q0fBwa1k3QX/2/wNEnLmAnzS9K24zN8tS3Q/bMRtvCbAMsQTn2Md +u6/7gnug7xWb9XyqdnBQcIrP2eZijhkHeIDYOtot9HW0e826Cq6Nb7Zge/Nt +lR/jnZ9TiGu/OJ5vSKHYaHzb2LfzbWuCR7A3wXzgQzAg5/Hh1ODT4DySXN9a +weeNfYttC757w8/It4rgyLB7+T4RHB/2MN9k4/pmLqCHx4f9if2MPcr8YH8u +sI3K82Oj8s0j7Gpsap4HHoNvycAFwEfDDfDNGji+cba9j/J1j9sOH+yx8ryM +necdmv/v+0U84yEeK/di7HAnYDueGdwMngRHM8+HecyMZdVc37Tp4bnhdzNv +CKcIVr7NGIPvVPEdCuwy5nSs5xhukvHzfVC+r8R3luBs4WD43hd7BD5nW4+p +u+eT+zG+RpdZC/BHzZwTXAoxAsSotcz/9422rh7zVrEWPip1brPR75f+WU+Z +1x557j5XdHkFP3ftfhKPhznDLoBn+cRz0e1Pc9PD75/7Mw7GA6fGt7/g2Ar3 +CScDb1V5LYO5a/dR+96UmUvmdA3PVzvPHxwWewFOi2/GwInx7ZmVPYcHeBzd +3Q/cGd9EgkubYz6u+ft68HLwavDpvBe+1Xph7KMHC8m+raxf+ebNYnNP8E6M +hfg1YiewG5BD6LYvzadg8ywuhQXBgZxRS0rF7nIfriMuowYLlPI5Mk/4Svku +WnfvIeYITghOCp8vz8FZcL7Z09nvbRW/B+aba+DnUv9tfffB3MBFEXPNXsbu +r0vZ/muH/F+zVDzkmKifUyhGtoz6BYViOleO8qOFYkYvwl9aKA4yifonCsWJ +jsWuLRSf+m30N79UTPJZlex/bP8Da33rA66wMzgq15mmgfATxqVnV+IX4BYu +rXR+Cr/pM6U4BfiEHyJfo1RcNLjiNK+rZn8kNjm8GmcmmS/4VOwSeDM4SfQ2 +8gW+Fu5tg1x8G3YCPCi2DHIcGd7Wa4d2TefpU7Vjnon5wHZgLzbHB2ET4gPA +RgRPg6uxz7AzsT2xO+GmsZmxl7GlsUuxSbf0nqZf+Fq+occ3+J72WLfKpQOQ +Ucgq9Az8H+OEI4RbhSfEdwdmwX+3tftu/lYiOeua9cCzwk/ubtnC9e2835BL +a3jvNsu12d6T9Mn+YR+xFx+1btrWaw3O9q/en+t7zbPH6HfjUt9JaTo7nUvn +Yf/+jp1q/DaVNVjqbMGdUf5vrnO4M6LcoVSs9WeRf1pq/NcV+k35sEp8H1wf +Nsq9leyUdpF/WeqswtXx9+tKfWv57aj/vhQuGg3HVUrHE0f/TSmc06LQWmed +70J8eCGf/02F+qVPxg4GZfz4Ey8v5VN8Lcqfl4pBPTSuvbiUn3W3Wu3wOQ4r +ZAthB90U9VtU+qbglChvXunbeLcVwrtg3Q94vkqY9o1K/B1Y7vuo37PSN/a6 +FuJJ4Uhvhoer9C3Dj3lPpc7XYM/BLWLTfRP1gyvF3GAjsifZj+tEeWSluIpu +hbhaeNq1Ix9U6bzIDvAfpfAzMf6/5YrzH1joN3hmUCH7Ftt2SqH3zVwtVUi+ +IFt+gocsxYkNLmQrYiceXOt7XvjSJoCBS+Gk96JueqnzOPvU4gvgCu4pFPvP +GQBstaUqnRlg3f1a6uzBmoWegfH3jWuvKOUbhife2Fzx2KjrUct/TN7d5a6R +X1DKn3yjbVHs0BML8dpw2otjbFMqxVSNLGQPYwu/GOU1K/nazqhlSyCPsMW7 +mOccUEtWIieJ5ehq3/Vo8whwCEfX2uf45vHRH1OrPCHaHFfrWx3YBEfVsgs+ +ZM9Wirmj7dFuz7xiE2IPIo+PqCWT9ytkw2C/nFhrjpgf/OYTS/nOc9ZhqXht +9mhaaJ/+lfkrFOf7LXZYpW9A7hH57pW++/hdod+U+fuubsP67eg1/Eahvuhn +XNx/l0rflXw/6jethMnXKmTXYdPBl29VijP/Ghu60nciexTyJeBHoG4n1y+O ++h0qfT9yuUI6D323UiH7E9sT38IqhfwLyxay87HxL43x7FjpW5UrFLL5sfff +YZ+WiuOl7w7u/8tCvlv8qv+Ia7ev9G1L1lTbSjGYvLdj/e6+R2ZWij9rA49S +KZYL271TpXhibDvsT+y7PdgXhWIZ/xbl3wvFla4M35Urtuz9XHqX93t95DsU +OoMKn31gJU57zyjvXynOlP3d1Xt8RuTf5YqTG8p+zRUnB+/1ey7u64GoX5Ir +dm0cci9X3BscycbmSW6O+q9zxSD+FHljoTPFt1WSQcif0VHuUSnGe2aluWAe +zovyD7li0+Dhulfi4uDvD6rE4cMzdavENY2oJL+QXXncvyp0hgsfyPWl7Gju +f3ilMbB+j6i0hrHLe1ayzfcqxCvBKSHbelWSb/BGM0rF+T0adZt7L8AHHFkp +3ol4xuMrxS7iQ8A/gR8BDmNT8xgj8VGUOjuVRt63kk4EM55QCTfC35xYicOB +LzmpEmcypNL6YG1cGeXtC8XhvRnlbQvF2G0Z+Yal4vCxg/tUsoXhP06pxIFc +Fvl2heL2Lo/yF7niO2+oJMuQY5PQobliPeEmNyrETx4c+fqlzsM9HG12LnTO +hLZXVWp/fCFfFH4oxji50jg7RPnaSudOexfy/eD3Oa6QTwh/EHzSDqU4JfQD +vhN0xBGF8CXYslUh3gfOZ41a/i3wLXwbfh04t+6FfH74+/5biAeEA+xbyNeC +n2U2/RWKobyV918o9hG/zd6FfDdgduIFwe13cc9CcZDTkWOF4iPZWzdW2l8n +FPID4QNiXq+oNLdHF/Id4jdkr0yotF9uqYV9wb28w/GV3uNOcG6V4kt5VxMr +va95kU8uFKN6TZS/yhV3e3Wl+WVub0LuFToLdBSysVRcKth/PeN/OLNLPIfw +cGAguJ57Ij+/0vul7+sq9d+nkL8TX+exhfyd+DoXFeJe4V2PKeTnw8fXsRAn +CB+4bql9zh7n/mMqjQHu6uJK/BU86EWVuNCz0OmlYjY5t8E5Fs5uwNUdUIuv +G1AonpM28G2TSsVhbg2/VcqGGl6L1wMfE291bq14iRGRn14rphjZANeGfLgG +jqWWz/TaUrEOxDmAHwfWwpDcB98z98L/eXYtH+jwUj5Xrv0jl32FbYXeHu4x +YB9MLWUjnAleq+XfGBjlYbXiPvG3wI3yLm4sNdam2OfIz68V13Vr5LeV8tU1 +FLLHms4Ksp9qxYpeHeWhteJC2KNTK+3TZQrxR3BHPN8AY487wYmsuSgvX4iH +hYPFfzujlh/rrmgzvdZ5s5lg6lrxn7wr3gfv4uZSY+W7CiNL9Uufm5S6nmvp +4zL3A6a7rhauO7XUuBnzLK6tFUt6N9fWii1FBk+tJYeXFNLN6OWvCula9OwP +hXAwGBgbpaXtlDtK7Tf2WstCfgJ8BOhq5pT5/LAQFgeHr1iI04fP/6gQXger +vxJzOaYQZ75NqfhOYjtXLcSxwq+eVsj3j98f/Tmtkg7tV8i/i28XHXtnJT2L +nrylkq48tZCvET/jKYViFIhPwFdDrAP+mk6FfBX4KZBDd1SSRacXilcgVgF/ +IDGI+ARPLuQvxFeInLu9kqwbWihWgzgN+MUxpThGZPw9lgPIkgcryZOTCsV5 +EONB/O0mfqfI0TmVZCkyclYlOYkOv7uSHh9RKF6EWBH8RTuVwsk3F4rVIE5j ++1J2FDYU+OL1Shhji1LfuOTM4IXRfrtSZ/HBX/+shMHalfreJeen8F2gj/Ff +XFVIbiIzF0W+oNK12A34PPB3vBD5c5Xiy9+J/KlKtidr7clK6w1b6l+V7Cmw +MDgADADXjm2JXXlZIV8OfhzGuMj3Qma/6jHcGuUdS8XFI5s/qCSfmY/3K80J +f3+vUpv1C/nt4Bi+KYSPwcbb1PI34GtAZ75bSW928DMw/mmlcAAxAksX4nTg +c5YptT/Zm/0jb1/rf8ucW8qfhC8JX9yQUv64El1aK6Z/5UK2AXHo7+TyoyCT +waF718KikyO/0vKhfSlZhhwbWip2BJn591J6Dh3XohQeBYsSQ3tqrTja3wph +XPoE2+5VC99uVsgvgk8ErLdfLbyHLOlgeUJ8DbYiduJZpfxe+LyuYP3U+j7C +xFqxHcR1IPuR48jwmdFmi1rnGrGBrqhlBxEXP9HtkUlXWy7hU8I2xi5Gbl1l +2TWslPyiDTIDfxtyA9k52fND20luf3a03b7Wdxv+D7LlVks= + "]], + Polygon3DBox[CompressedData[" +1:eJwtmXm4jWUXxjdOIZz97vO871YpkQaiElKahEIlSfNgjEiiUCIKpa+klDFT +iTJ+RIYiokgoFPUVmYeQsUiG5Pvd133+WNde97PWM7zPsKZdtmXHxh0KplKp +NwukUjn8Dg2p1P+SVOqrTCo1LkqlzoLfT1st8KvpVOod+OrZVGoxeBTyx5AP +oG0k/M3IHwbfCS4PrgneAv4Vmob+fNr+gl8PfQ4/FzqDsUqh/wS6Z4DfjlOp +R2ibCj5MnxLoHkReB74fbUuQfwTNzGNOqAjynsi70fdl5K3p2x35OvRrQMWQ +H0BeG/415E2QjYZWgVdDXdDfwThzclOp98CXoPsa8l3wjzNmP/g98K/z2x58 +At2i9GlE27mMVxW+CrQW/CN0MXy5rPuWhK6CLwNdA3+n9o9xHgX3ZL4j6A8D +twXPQH4a3Bf8KrQV/g10iiC7gDUNoG9hdBLwVeAN4NrgruAR6M9G92nwRtbX +B7yZ/j1yPVcOeEDGc26Dr0z/X+g/Cf3rkD9L21D4vsi/hn8QeQ3wXej8AF9O +d4L+OdA17Od08Crka5E3A/eiz0Zk5cElGa8a8m3wddH5HlkJnRnyjrRt1t2g +zzPwFWnLwI+j7VN0e9GWCz4EvgVZf3AV+laFBiOfA34C+QTwfL7zOXC34Dk0 +did0DiK/EHyabymuM2Q9p9FpD/+vzgj+p2BZMegPdGNoCnwjrQlZWneAsb4G +90RWizFOMN56dH5GVoY5CiKPwHXAF0OtwH+jvxb+AuTF4YsifwD+WdraIR+t +74UvS1tG30fbv/BjoE/Ad4OfY77bmW8D+CdoDfqlkf/J/GeCr0S+BNwY/kbm +mKm9RKcFfUfR9jG4I7gpeAS4Nb/H2asF9OtC+27kH0HDtDZkL9Bek/muAx9n +jsvhf6btJmRFGP9N3QfaloIPoJPQdzvjXAU/GPk28DsicD10nsn6m/WtOrMs +/GH064H7oH82+Ai4Pngo+BzwDnAV8LvgNcz3B/hW8Fvg/eAPwZ8x1jzoR/Bf +4NuQD0cetDfguuCB4N/gGwTbjuoaA/2HWdOfOuuM7/JDWX+L7vQN4ByoO2Pv +pn/v4Dk0dk/a+sM/gP5+dOvStp35hkADwbchPwk/GPoYXB/8YvA3aO0asx2y +8cFr1xtuylhNsn77/dnvmciKBc/1k+xp1mvWWo9DBcHTGePTjM+0Pvil2G+9 +FW0n6HsSagnfQjYW3T7gF5F/Bi6E/qzEvO7IAdleqHdknTaMVQqdz5G3AQf4 +czQea/2etiGxbaps6T/Q/fTNIr8beYL+VvACaBayXuCf+e1Gn07In+f3PGQf +8juNO1gI2Wb4C+k/DvkY9A8jXwi9q/2BmiIvznxvo7sVvCr2G9PbegxcDdlT +mjPtN/uu7DJtZyMryBwdJM+aLwRtRW8DOiHYPw2IbRNkC3Qnluq9QFfSvx7y +g8hfCf6WL6Fc8A1Zf9cE6BV070N+NbJJ4E/AT4ObRT6jaeAO4Edlr8B59K2g +82fs62i7CHle8NsdDr4D+ULmGAu/SWtCvg55KfgvoV3gudBQ+BfQKYpu88R7 +NSrXvuM89Lum7UNaINsgG4T+TbQ1Br8HnhlZZwv9BwXvfQPwaeHYd20JeCN8 +MWgM+FbwWPq3Rb9xZBv1Hvhx8F3gGeAR4FZ6c+Dp4Hngl4LXOlM2lzN4lLZK +upustxf8PXrvyCfSdh7rXxZ5f9oyb0XoC3S+pW0xbZPh2+vNgmejPx7cLth2 +6c7t1rkyxpKMbdga5I2gc+GnMN9Q+JbBb1VvNDD+k7S9DJ7C+PXoeyr4LenO +NQc3y9pXHwWn0C8g/wLfASqA7L+Jz/YR+fTEOpJ1lT7yiYnX+qDeK2NXoK2D +vktvJGubK1urGKWw7Cv6OfLFzFkQ3FB7mPGce+GnJrblulMv0b8iFGts9nYf +shnQyIzvYAP4QrHX8pjeLPPfoTeWto1YiqxecKx1KZTDWFfQNjnXPuWZ2D5A +tr8Sv5v5vRW9ZsH7WSLrOTS2YibFCrfL5mUcM5ygf3fwc/A/QOWDz1hnqzMe +SN/mwb5CMaFip/fBsyLHUPr2GfLpkfdgOf2qgDfStw5tDbUO2lby7RVkb3TW +tLWRPQDvUewEvkJ9Wd/v4M/Au5D1Rqd9Yp8qXzpL8QvyXL1v5L/AH4auQL4c +2QrFQMhaxraFism0l4ohFDtoT+tkbXcVD/5N++M6e363RF5ThcQxj2IdvYG9 +jNUL3CM/3lEs9ILeb+SY6D/I22UdC/6m8wOX1ntSbIHOEGRdYseanfW99J8k ++5nxG2kDPwr9afCd6bNLsSx7VSbPe9xausgny9fIX4I/kE/L+I0rVuoRO9ZR +zNQE2fW0P0R7UdkHfi+hrRZ8Wdk/+R/0d8h3y6fE3hPthfZks95H4lhHMdO3 +wTGBYoFTkW2qbOvz+T5jLvIiwbI9sqm6q4ltx87Itu3ixLZPNm5WsA2T7dIZ +6qzPRL4i12d+S+IxNZZijprgxeC/IscY4gtBRyO3LQmOQRV7qu2r4BxEuccR ++QRwwWD+sOwWfGHkvzDf3six8THdl7Rj5BsT95GuYtpJig3Yn/GcxxLoU9mW +2G/5Mtoro/8d+v9GjolGxs5RlJsoxr8U+aZgX7UbnZeRdco6Nq/FGP2Q14ca +ZhyDHpUueFHabSuDYzDFXqfpXxd+FW2pjGMq+X7ZCNkGxQCdkS+LncvI558A +94C+iO0zL2Hu9vLvuc750uDm4Msix/yLgnMw5V5/aozEMbtidfU5lnaMqthU +Maq+vWjw2rQHspuyn5Ui28+R9G+NvCF4ELiEzo7vLpdnn9lTsbHi08hvojf4 +XnC1yDZyjuI58LXgPtCr8seyuWm33Y/sG8Vfuc7ZfoM/N99210FnIfICwd/y +B3RD4jbxylHnB+ekykX3y0ez9k9krzLOkY7k2xjZFvm4bujuoc/1yL6iT2m9 +HeRr0r5DKxLnHMo1yih+BB/Nz0XLgo+BJwbn1lUV84IvB6/U2hSP6K6jf0/a +bYrlD4FX5zmmL4f+etlodOO0Y7NJ0KLIMdoUfWvsXFB+eir9B2Vt25WDVeR3 +O7J57Fcj2ZXYNkq2KYexd8nXJ7a11zJHRfhtwbG0bLS+vVpiX6896Au+SGdA +/88Z62ZkXyv+ixzjiz9Dbyxy2+TgmE2xmtasXH13xvujnH0C8gN6X2nXHMbD +T2J9c1n7PKgy/HHaRuba58yGrxHbV+iO75GPVYzBmCeRL9BbgQ7BH5TPTtwm +XjWGL4JrJqqVSKeG4m3a9kWuoYg/nee7obYeuu/oHIhcw/g9OMdWbn0j+hPl +m1njIvoshMaGfB+Sds68V3cZ/Z3gmuiPBu9EXhs8HXnHrGNixcI5UNvENlu2 +WvdZsaHuuHjFiPckHlNjyYbK95wPzY7sg9Yh/yi4dqOYdEywz5WvlY58xYm0 +fYV8RqXgO6m7qDvWH7xa9pw+w9C9N3HOplxNOe4AxX6xawfyB8vAv2oNykVo ++wb8ejA/VvEYeHueY+lNkWsfm8BbMq6BVIv9hvR2VNM6rXwkcWx6n2xcYp8m +X6YY6JR8S+LYVjamu2wvY0yN7FNXIRuG/kR9K2O+Ab8+duymGkon2UW9j4xj +unHKJ8B181wTke3Xmeos5QPq0r9pcC1Hd1Dfqjept6hvngD/ZHAsqZy9FH2f +p61m5Df9FrJfY9faRig+yrqGpNqR9mAOul00BrJTafuqN5Dvy9hn7QAPT2xL +FcO3Sjymxvog17lT9di5k3IoxRJvB9f+FFMcQr9y7FxDMXccnDPJrytGuDr2 +nmmvdOYDg3MM5RajGaM6eFNsfpfsDbpPBcfWwxVTw69D3i/yN1yoWDc41iuJ +fLhqZ1pj2jZWvkA+sVa+TxgSnPMo1/mAPg2yzrmUa8nmq9byfXBuqprLcsbf +Grv20xj6R/FS4tzmjsi1Tq1Bc6vmqVixZHCtVDHjItpL038+v530LqHR0OCM +c6btsWtwqr0pBruW+buCH0n7Tg0GDw5e61zlGIltrGyrbOzTiWtMqi2dVD0l +to+Wb9ac2axjZsXKuoO/K5dIvJfKuVRrXYF8QcY11/vybbRss2pmytVVY1Vt +VTn7OORPBL8VxYiyRa9nHevIJtVGvjzYNqrGU56+PZHfnOc7/5b2M8+1jlro +7JdvTFyrUg79JvyxPNsL3WnVJs8O1lWNckVwzUm1pn9om8X4Ueza33f89ld+ +FHxWqlkNArcIrsWoJjVMuUrw2alm8z64TXCtTWeitRcOHlvfoFxnZ55zHeU8 +58f20fLNnfmuo/AvJs5dFWOcpdhH7znjnPlvxbaJawOKOfbFrjGptqQa1rLg +mpVqVScUfzDmbfLv8E0ixx6dg2sdikGG6T1nnYueyjhWO0sxSMYx2+rgGppq +Z2rT/bsl+C7oHi6Wb4SWKVZizJX5beLlEzV3cdm/yGu4krG+AR+PXOPLxr5z +umuqEf0ArhpcV1HOsjb2G9bbVU6zNLimK/8kHy1f+1rWubZ8bofEMb1iefms +2xP7WO39vRnHPh8HxzaKgbSWM4P3SmtS7ts1cS1FOXAZ9PsmjuX0n8EO8PBg +26Wc8f/JM7Hq + "]], + + Polygon3DBox[{{3832, 4554, 4658, 3833, 4645}, {5158, 5559, 5159, + 4319, 4060}}]}, + Annotation[#, "Charting`Private`Tag$66030#3"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + ImageScaled[{2, 0, 2}]}}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + Opacity[0.7], + EdgeForm[None], + Specularity[ + GrayLevel[1], 6], + StyleBox[ + GraphicsGroup3DBox[ + TagBox[ + Polygon3DBox[CompressedData[" +1:eJxFmHm4VlMUh79MJbmkfDtRbuY0kaFEiExJKQlXigy5NCgRCVGUeUjJ0GDO +n0jmpEyZVRIRlQYZihLXvN7nvOc5f6xn3XPW2mu9a5/znf2rZv2H9By8RalU +mlGrVNoy/HapVNo1rHHYvHKp9FzYzLDpcT0j7P6we8OejXtvhL1p/Pmwt/Sz +wt4NezHspbD3wl4OeyXsbeMvhL2jJ29uOatJvyWun6+95PrPXUPsU/uz7sOw +18Jmh00Ltolh94UtMM4cC/XwLpaDWh+Ever6RcaZ4zM9ee/LTt4XMjHTl3ri +P4Z9FfZ12Oaw1WFrwr4J+zjsk7Cl5tLzW+8xx4pyxgrjKnvDuNw4sZXGYfxO +/5k9P3APvtZ/ZP/F7tkaPfv6c9gyudY5A1w/6Km33njOOMe93uA9uDbKBMta +a7M33+up+6uzkbfJXOZrE89m97DKsN+8B2/ruG5q7J+4/kneGuvC+6ce3n+N +w/ufHsYtUtYbxq1S1ps+pZTFfwmrlTJP3l/W4xnulLL1W2obZa+fsjXE6qaM +g3W14+/fw/8RVidlHt568fff5WyO7Z0H3h1TxkGtbVL2rrC+ImVx5tghZZ68 +rd0j8hrIxEwN9cT3CSuHJfuvdb8apYxp27CdzaXnLt5jjt1Sxrq9+07vHf0G +bGesifEKn0+FeWXr1bZ3bftVWoM9a6ZnX/c1D669nAGuvfXU28/4Lu7rGufZ +328SXC3lhmsPa7M3e+qp28Jc8lqZ29S5a3yPDpAVxlFhA8MGhR0iE/va1h7U +PkgP+8lhh4cdEXaoucx3WFjzlPF20Lcwt4XsR+jhOth69GtnDfago3F+E0el +7DcDb2fXwNgp7EAZj9HDeJxxuI7XU7uLTLAcbT3WnxjWXvaT9OQdaX96z/Fb +wLesqzPA2M08GHvKcWxYd+/R51Q9vKe4jjWnmctMp8sN7xlhJ8h1ph6us/TM +0cN69KvyHs/kbD2MffT07CsrXP30cJ2rp955+p5yHeRe9/cevAPkg+sca1P3 +grBeznFRWG/zznddL/ead4336WJrMNMlzgD7EPngGugM9BmkZ47LjMM7VA/j +FWEX2n+ErPQZZhyWy/XwDrYe/W5y/ZXaRa6f5P2xYdfKwbqRcl8ado0e3uuM +M8f1enhvlIP+V4dVu360cea4QU/eVbKTd7NMzDROTzzXEJzRl7p/7NdtMvGb +Hm8uPW/3HnPcKSuMU8Imy3iHcWJ3GYfxbj2Mt1iPPbhVT78JKdNG/FbQMnM9 +N9E378qa6yR0xizZuUbjzDev2veCdwLd856xVz3r0RDopHn2mGk9rl8xzho0 +zYeuQQ/x92zPv+WezfB96m871z2LyoVmWuB3kt8vv2d4F5vHPJ97neuhL+yH +jljqPEvMm298ibyL7JHrj3WyL7XWl977vlzonpXywv+tfCu8hmmVeTCt9jrX +JWv9fqFtlpULbbRaprVe51rqK+1H+ViD3kCXoCM4nzmn87Of8w+WX91j+qx3 +DdwbjcHEmb7Jnqz/Xe5N5sG02bw1xjc78wbrLrfPBuersVauk2rKhdaBFQ40 +xj/lQjP9KxO6hryFsq6QA71BDA70A5qDvfjLHj9Z72/ZibMGVrQBa/judfId +Yg72iRh8nMd15EMzoCtgQmOgOaiLBkGL5Fqqnkyc+/XtgX5omAotUpajgXm5 +ZmqQCo1V4T3O3z1lKlsLFrTB7q7nm93M3mgKtAXs6JRGsjYxluukJqnQJXs4 +ZyP5drB201TopEqfQX37oyk4uw+Ri2t0Qq4tDkuFftpLphbG6bGva2BqaYx+ +nOmt7MmzOUDWVubB1ca8SuNtZN/Puo3t09zZ2lor10ltU6F7OrimnfM0l719 +KvQQeZ/4fvO7gaWjMXrz7TnSOQ+2x97uDde8i3V9Jq3NZT1nF2fYcNdwrqMZ ++L5zBvC95wznbO0jE3rjBOt2dk2ujU6UFY3RxT7drNHBeyfJ3dW8jsa7ynuc +dXPd1ikVWo1Yrpm6p0ID5ZoI31smdEXPVGijM1Ohe3IdhK+yRw/rHuO6HvJW +uf4oe3bT+rovuU5CJ6AjOJ+HpkJLkYe+QVOcnwotda6saIkL5eNMHyAXZ/Yl +zjTAPDiqzasyXi1vf+ueZp/+zjrQWrlOGpgKrTNMDjTGkFRopstk4v0Y7vPo +ZW04rjQGB/phhHMOtkc/6w2WfYRrYL3aNTzL063LHCON5ZpppHzojlz74Edb +l3cULcL/vfD/LpNSoYFyTYRHu3Fmccbzb396oFHGOwPxsanQZNc5/2ivrzJ3 +XCo0zS3G0ED8TtBN6KfbZLrD61wbkUf/iTJM9j7zoIfQRWiNh8xDh1xjPfpN +DXswZXmPej3BvevsXj7sHjDL02GPhN3jGtaiuQbJBy8MD8jxuPv4sHWnuu5J +/36mnL03o3w2j6Xs/5LgfcJeU+zPsxjuc5vsjI/Yi+unXPt6OetJ7zHee8z7 +U1wzWf+Es0x1fnjmqm/QO1NlfVCmae7jDOca42zTZZwmx0TrPy3f//Mi1Go= + + "]], Annotation[#, "Charting`Private`Tag$66030#4"]& ]], + Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}, {}, {}, {}}, {{ + GrayLevel[0], + Line3DBox[{410, 1, 384, 214, 15, 30, 44, 703, 57, 71, 762, 85, + 1212}], + Line3DBox[{293, 2, 292, 410}], + Line3DBox[{218, 3, 466, 216, 1224}], + Line3DBox[{5, 4, 218}], + Line3DBox[{5, 6, 699, 7, 755, 8, 9, 10, 221, 387, 11, 858}], + Line3DBox[{225, 12, 468, 222, 1477}], + Line3DBox[{299, 13, 225}], + Line3DBox[{411, 14, 406, 299}], + Line3DBox[{43, 29, 227, 411}], + Line3DBox[{43, 56, 705, 70, 759, 84, 97, 631, 1092}], + Line3DBox[{633, 98, 775, 111, 125, 715, 139, 152, 166, 281, 434, 181, + 408, 320, 182, 283, 438, 1273}], + Line3DBox[{124, 110, 1222}], + Line3DBox[{124, 786, 138, 716, 151, 165, 180, 323, 409, 194, 444, + 291, 193, 322, 192, 443, 288, 917}], + Line3DBox[{439, 183, 286, 184, 185, 186, 719, 187, 789, 188, 189, + 190, 287, 440, 191, 1473}], + Line3DBox[{916, 285, 439}], + Line3DBox[{293, 405, 976}], + Line3DBox[{633, 1093}]}, { + GrayLevel[0], + Line3DBox[{2180, 1597, 2128, 1815, 1611, 1626, 1639, 2530, 1652, + 1666, 2599, 1680, 1849, 2199, 3279}], + Line3DBox[{1934, 1598, 1933, 2180}], + Line3DBox[{1819, 1599, 2253, 1817, 3208}], + Line3DBox[{1601, 1600, 1819}], + Line3DBox[{1601, 1602, 2527, 1603, 2591, 1604, 1605, 1606, 1607, + 2727}], + Line3DBox[{1609, 1608, 2433, 3667}], + Line3DBox[{1609, 1938, 2169, 1610, 2181, 1821, 1625, 1638, 1651, + 2532, 1665, 2596, 1679, 1692, 1949, 2174, 2925}], + Line3DBox[{2219, 1693, 1888, 2609, 1706, 1720, 2542, 1733, 1746, + 1759, 1927, 2228, 1774, 2178, 1974, 1775, 3206}], + Line3DBox[{1893, 1705, 2263, 1886, 2089, 3231}], + Line3DBox[{2619, 1719, 1893}], + Line3DBox[{2543, 1732, 2619}], + Line3DBox[{1758, 1745, 2543}], + Line3DBox[{1758, 1773, 1976, 2179, 1788, 2233, 1932, 1787, 1975, + 1786, 2232, 1929, 2802}], + Line3DBox[{2387, 1777, 1778, 1779, 1780, 2546, 1781, 2622, 1782, + 1783, 1784, 1928, 2229, 1785, 3573}], + Line3DBox[{2261, 1874, 2219}], + Line3DBox[{1934, 2168, 2921}], + Line3DBox[{2261, 2979}], + Line3DBox[{2387, 3017}]}, { + GrayLevel[0], + Line3DBox[{4315, 3707, 4261, 3926, 3721, 3736, 3750, 4636, 3763, + 3777, 4703, 3791, 3973, 4334, 5385}], + Line3DBox[{4829, 3708, 4055, 4315}], + Line3DBox[{3710, 3709, 4495, 5803}], + Line3DBox[{3710, 3711, 3712, 4632, 3713, 4695, 3714, 3715, 3716, + 3930, 4262, 3717, 4832}], + Line3DBox[{3934, 3718, 4388, 3931, 5689}], + Line3DBox[{4059, 3719, 3934}], + Line3DBox[{4317, 3720, 4303, 4059}], + Line3DBox[{3749, 3735, 3936, 4317}], + Line3DBox[{3749, 3762, 4638, 3776, 4700, 3790, 3803, 4073, 4309, + 5043}], + Line3DBox[{4354, 3804, 4010, 4713, 3817, 3831, 4648, 3844, 3857, + 3870, 4046, 4365, 3884, 4313, 4097, 3885, 4049, 4369, 5409}], + Line3DBox[{4015, 3816, 4405, 4008, 4225, 5333}], + Line3DBox[{4723, 3830, 4015}], + Line3DBox[{4649, 3843, 4723}], + Line3DBox[{3869, 3856, 4649}], + Line3DBox[{3869, 3883, 4099, 4314, 3897, 4371, 4054, 3896, 3895, + 4559, 5213}], + Line3DBox[{4370, 3886, 4052, 3887, 3888, 3889, 4652, 3890, 4726, + 3891, 3892, 3893, 3894, 5784}], + Line3DBox[{4403, 3996, 4354}], + Line3DBox[{4413, 4051, 4370}], + Line3DBox[{4403, 5093}]}, { + GrayLevel[0], + Line3DBox[{6054, 5809, 6050, 6035, 5824, 5839, 5854, 5869, 5884, + 5899, 5914, 5929, 5944, 5959, 5974, 5989, 6004, 6039, 6056, 6019, + 6052, 6044, 6020, 6021, 6022, 6023, 6024, 6025, 6026, 6027, 6028, + 6029, 6030, 6031, 6032, 6041, 6057, 6033, 6053, 6045, 6018, 6003, + 5988, 5973, 5958, 5943, 5928, 5913, 5898, 5883, 5868, 5853, 5838, + 6037, 6055, 5823, 6051, 6043, 5822, 5821, 5820, 5819, 5818, 5817, + 5816, 5815, 5814, 5813, 5812, 5811, 5810, 6042, + 6054}]}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}}}, VertexNormals -> CompressedData[" +1:eJx0vHk0lt0XN65BShKVKQpRZAiRqWFTKA0SRTMqKkrmMfOYKXOmZMiQeYqM +J4TKrXLfUobQIFPcmVKZfue63uW31tv3ef961trrrH3t8zl7789n71uP4JU7 +OsbLGRgYnnAxMKzA//1tkRrsM98KqrfLNzIsVkPEMam5HqcxUH95X5/S1gpZ +9ua5NyIQlIlOpjhge9sPy8taLx7AdECK4+VXFhA6t9qqfJ4O6zeuHsg7FgXC +HdwJlHQ3iNjr1zqL7ZJiktMO38NAqHNhXfIvL1jZeWzgwgIddm937+zZFgwz +9ufMB3b4gNzAm2+V2B4zX9mzx94PhPJL9ZONvKFikMmJdZEO19beoPWNeULN +QNQHjZueUGsum3IK29dJFl2dW+kGXb/XZNtrusFZk4ZcX2x3TTi6MsHLCfLX +7h1RKXQA5he7p3Kx3bBIymZ9oAPkfmI7PN5oCY27nWMbsb025sjAsZpmlHPz +60d7rhKo9rU7YihEB6ee1PqcjmZUyW86n3i4GO4Jfm7/ju0JRbOSjVPNKPnF +w4937hXBdRaN/dLCdDDZn9H78ywVch+ahlZsrYDDlqvX+TiPgYXDSoNdylRI +/+iQdde3EsT582hS2N6vQpHfzkUFcBhpY+KuhiftB/ojMM7eEns8Cl0fwvGe +aws9VxxgH6U932aODn3Bwm8YnsbAn6o+eZ0yP/CVM3vHhnG+v++B/4tlEeBQ +o63GtTMI8gabbrzD9qdf43i+ewXBWwPtpMXFQJhkKsuzwDh/+hXeWWjoA+t5 +jsuo1t6DJOvk7wPYnto2xi/z0w2a8//EuEX6guLCSIMKxmd44PvjC1n20H7G +XGFzjie05hu2+WB7TtRukzgpK1AKjdwazHAXbCW26FRg+8zWDRK6vBTEo9oE +y6sKAbFevv8V4+bwJyp1WJCCKLTz9A6JQlhwiDzSgHGL48m6EixHQUn0bYdf ++BaAmXgvM/92OtxTeTI3coSCFlSuxud+zIdHPUhNCds/G02qBmRSgc4uYMiz +phR8j/q5nr07BlJNGwQDwqmQqcz7xlqpDD65RYdLYLvB99OJd52o8LRGzvBc +0DN45HuoNxfjnypjQU3Xp0LQmlNDbacrICbR0WsO4x9/1jMp83c4hNw2GTU/ +FQmp+mz8sxj/jMUNHdR794Bb+8FXc81wcPP/6sSKcRvIu7zTpMwDlF+P3l/7 +8T70WKksFmO74uLO8x+67KE8RYP9pGkghCx+9xTA+GRc+iUYGWMGCZG1fR2B +vsApJbvCFtsfjqrGVt04C35XRJzTBN0h8HfqwypsF0pM48owpqD+q79NQ3Ry +obI70YJ9Bx1KJ6/IhtymoG8xr2OK9XPg61HOE77YLtB5lE/DmYIuBs+4bbqZ +DbFbfutHYLu69M3WVUEUpHU6jF3JIwvC140nm2B7dp4Px/5hKhgl/BUrbCoE +C6v6GT2XMSgMXez81kkFE57NRd1lRbB7Z+gBB2z/sHlDhmozFQx1NY9I1xRD +p2O0znFsH7A36TUtpMJy9bnCP/KloBswL2uP8fQt/pG7Gb+X5WfdEcn+MpgV +eOfxxm4MGLfo3R3Q9oTc8qL5z/ejgW3gGEM+ztuUvaYmPpUOYPzeXSgtIxys +O6oqXDCeez3y3Vq4zWFUeedXb41QWBU1Qh/E9hY/8bzZ8oPAJrJqdYl4ELTt +3aOihHGj8b3iePQA41YUGrb2eTqMj9pol4jS4cOQQ69vIs7P7vPD99TS4Tl/ +G08mtltdZ4nIyqGgw3Lvys+XpcE7prbne7GdD1quJFVT0ET0CpnrfGmQ3l4p +nyOC+4ayQWUaHw3uv9H+8qUlC4yMZb3uuI5B0Ikjv7jYaVB3tGrYeXsOMOyj +v1vtNgYPLvZnOzDRQHDZRs40/lzoMwm5n4jtdb9Wnfg7R4U3nO9r1o7nAWNp +Qocdtr+49yWwdp4KRVH89cvkCuD56hWXqBjnjCqz8SHsX2nqrEekSCEIPGl4 +9cBhDH67yJXryNLg91j/Nf/hImg4Kv1T/M4YtEw/io0RakHD0StPec8kQmPU +wxxWXEcph6Tyal9T0IFnRxY6OhJBw/J8BIjRgZLFOLzpMQUhYWaH0J5HkBlz +j1dRAuPPzqC4kEpBinHtx4pVksBw4IThemxvqsweMiyhoOGVdu93qScB1yaz +Pl5x3G+PM7w1xP5zCqZj+dIewWH1jwobsP9E2OSd1UNBDC4+6mq2j+DXBbcV +ExjnQw9d3tsADY6wv6V5DSbDlRXZg84YhyFOIfEmORq8GKm50VyVAg95zstm +u4/BwaGVrw6J0kBt7Zu0EPdUWPVceYOo5xhI58bcs+WlQUCegsoWlscwEKvi +99YLv4vVsU4WThp82n57H7A9BvWj2RZp3mOgwlST9Bb7vxruq3XdJQVMr6kH +v8P+u8UG7GMaaPBt9HGEcUQqrAjNNf1zYwyG/W6u2ybbglLU+pPZnN2h3tkE +ynE+yDX3cuVYUZC50oESP4dAKFns0r+4G/dbe9vv6Tco6IFD7t56sXC4JZlh +dgnbH/FFnZLH9Xi15QayUY8ESsn03+XSOJ+fTN4IKKYgk/ezy06vjoKT+Rs4 +kyVxH26ZkM95j3EeZXS12BwFklRP9nSM89UO/Ug0TkF8n2JqNamRYB+sQGXH +OO8zKvlor0uDl2LCcVXDYXDxXBv/IXwvQ0roL/phGnBn+l5ckR8OPt2Teb89 +xkAtPC1JVYEG6eHLVnEdiYD297/0PTE+XnsScwa30KD3lmXkF/0IoBYFmzn5 +j8FMgsPpxWkqxBd9YhqvDgP/tecqfoaMwWvB2kOtNVTYmBP2tb7AG65NxaYe +ixkDkYtF58J4aNB/nhatbhuJ2FvDX/3BfrTktZ7Hr2tGPw6HZnaERqO9/XyT +A2p02BOxtWivQTNyvf3x7fe9h2AXi/sa94N0yNRdM1t3hYKahakVDKOe0D11 +peeJLB1W50+Hf86gIGMbygp1B294vuavQIYU7pPTJye/fMD2FqZF0Q5v6I7l +GunBefuQ94NU6V8KCv5m5iBQ4g1+5y9mdmHcTh6aIHGrPaBfUz4chrpXyAv8 +B25oCbcPGZUkbq2Zk+ycRyJQ8CDPWQK3sHUXSdz0fv2x6NePQLOrhUncltlq +k7iJimf8nKgOQx90uUnchrU+krgZUZLZnhd4o1UvEYnbkafpJG7rm4bZNGwj +QU/ancSNKXwviRvThcjtnaHRsP8cE4mba5QAiVt3fcfRzL2HkJe+J4nbgSIe +Erd+i5SmhR+eSGLShsQt4iZPBIHbOMf4FlUHbzQ5IiBI4HZN7QqJm+bmwywi +Hd7I5qr4f+GGlnD7p37R/6N+0VL90rqzXxL1++exd+x991Qk/jOHnajf/jON +ZP3Knj3byMfyGAn43CPrt924jaxfrgsNb/azPUbL1X0t/6N+0VL9smzncCDq +Nzd412Zcv2jr4SmyfgUkHMj63TNlmc/q7I7mNtuR9as810TWr+ayExn3HAJR +y9dasn73D0eS9Xv6ya6DdWLhqP3pK7J+Pbstyfo98+ntM1v1SCS/++1/1S/6 +f9QvWqrfaflksn4LfCXeHqZGovuBvmT9jkj1VxD88lUg9v3Xliy0LsfC8z/4 +BS3xC5+2Eckvrd3qa9L5c1FmfUXIf/ALWuKXHmHbIIJfbhulaWJ+QWvMxkh+ +SXRhmiD4Rblw+WrML+iif81rgl8us3WVEfxyboFZ/95wEaLXsYwR/GLlFRxD +8MtexWzJezOJyBAcsgl+Udv9J5fgl8wGw5nOjkS0dYSf5JcT72xIfqGerPMJ +6XmEjMKW8xH88qwkRIHgl6/Pf6mVqCShRh+qwX/wC/p/8Ata4pdNf7u9CH5Z +Rgs9oG77CM0WHyL55R+dg5Z0jpblLVLnyMkA36eyIuStkrKf0Dl367vTCJ2T +aWvJJ1NTjF4kJ2n/h85BSzonv/s+qXPWfJUQ2NVfhiL9FUmd07W935nQOUP3 +2i9+vx+NomN8F/OwzunaEErqnFa5XFpqRjjqp4z+l85BSzqHpUWP1DlZLddf +5okHoTExt//SOWhJ56w4kdtD6BwP/QHpQLV0FGL5i5vQOUxcr8MJnRPekrXj +QlkaCv4TSOoc5TevjQidUydt+e0GXxqSK0jdQ+gcccbag4TeXpWz+jP3mlI0 +cviD23/obbSkt6WfVD8k9HazYGMJ1tsoZPXRHkJv6xdYTnNdp4Lf+lb1feoV ++H23hfU4/I/eRkt6u1sx5COht2v0au5Ya4ajKNn9pN72zFIi9TbzSFHd+o/3 +0d+Y+QVCb9uwlZN6+2LO8Q2qpoFo/ad0L0Jvl95U3kbobScvrs/UQF/UzuFJ +6u2+/Buk3ha+4bHrkaA7Wv+yndTbYkZO3ITe1hmQNAnWyUWe+/0tCb39PDKD +1Nt859pVsd5Gnq5GpN426GrgJfT2ZukhSY6b2Ugk04TU2yf9xKiE3r7UHc+i +6JGF6hlfpBB62+yqRB8xJ8ZMMR3FcyKazOgn58QVYkfJOdHUQMcPz4nIMHtb +GzEnNj27vIeYEx+nmXqv5q5GgvPtX4g58U4+Fzknhvducxm64oD8WkvJOfF6 +Hw85J/o1GRvplvkhW6NL5Jz40c6EnBMru2e4t+wMQudbbck58bCgDjknGvpy +2DIyBCEFY2NyTrRZl0POiTmiHRoHau8hRYYmck6UuSkkQMyJQWtCx5wifVF4 +tkAjMSdOr5gh58TTsbu+cOV4okl7O3JOdByXJOfEoYJP1vcZ7qKGZRzknOh4 +1HvTNA8FHdrwLHFNVSH65fN1/wyeE2+1spBzYrtSkUKnRCFCKXOHiTnx0cOv +RsScSA0tKMZzIvJaXEHOiTK6N8k5ccK+6SueE5G0kyM5JwbIXAsh9hs/ZALK +FxeqEXyynSf2G67pXnrEfsMj0GX7zQiErneIJhP7jW0DV8n9hujnKYfrryxQ +Ad8vS2K/sW7l5Hdiv7E20iG+Ld0N1cRcJ/cb66NEyP3GqMfIupRfXuhZryq5 +3zi48Qa537Au2jU2tMMHZTqUkPsN+tpccr9RlRSnn2rkjY77TzoS+w3J2Cvk +fsNMPPDD4ZueyENZjNxvPMr3/j/7jZK8LC9NN+TuGE3uNzqqTcj9xqC+5cie +Qge0ruw0ud84Wa1C7jd610kdHmi0RFvMwsj9Rp2x0ndiv8Huk3PagasE7RfW +OEzsN1qCr/yf/cZbQ75Hh4tRJk8Mud/IrlLeRew3kGFq+Z17RUhMPYjcb5xa +scZW75otCH0d7SvitYMDmlEdL7B/9WneHt7BZqS8fLwhgbkYnrWq7c/Dfs6s +OZSi0hwNjnaLzz85hUJAWELRIM7Pp8sqWlKsqMDJV8Wc+7scrivuNdmB+8Dg +mksT00xBoD/id/HS9Wioyh/1Vsc4G3apugrFqcHP45xul+t9oO6EocQ9/N36 +Y6uaJ7woiDtOICvILAsmTny6Rcf1NXdm3HDfdypIH0/ZzR3wFJK9v+0/aIN5 +c1ZqdhHzCM+PkvZcuVRov9m8YLLzf86jpfMlZ2r8y5/i+To2sjAiPBWJba77 +IojPP4tZTcb/yDn4Bo4fnZflNCbi/7Mhjozf/3nymwvXo5GcvqzPf8SPluJ/ +byT9moj/2nZeSrBZFnJKmDQj4i8I20viNn/fZEOPUyhq4wwncRuZZyHxr3CL +KC/gtUPD++JJ/Nf6Mn4i8O+P0Dv2kLkY+Qqy7iPwfzAvclSflwph57llXr+r +AmEDCdEVuJ+MyK/YFSpBBa1YMysGziqYtnYNk8B2r088YmLTrWClY57AYlwD +Us+lF32IfWCZ16YEzRiw9g7av/zZZfDVNT1L8NdNxpI53XcxEF699UblPlco +O2C+ygDbA/IN/7iVR8N65vMT66YdoP8DPboN222yuSwPv3eAw+l8Hhl6rvB8 ++dPRRzh+OdfG61oVdhBYZf1r5xEnEJFeHVhC3EtIMshmjyMYpCfKyyjYQlzh +uR1Ef855lbsloqAZfcmsMov1KwGtxgThxW14Hp85e3LdQjMqdxvjyVYvgp9s +2tzHcN7+ej59qFCNgl7csWxfMZUPlPw3Jedxf9j3tOL7YjPWz/V1B9blFsNn +0V2hORi317xNFFEOCopaWB4xGlYITYtfZuKxn/fZve8HBCho7b2ufIn9heCw +7VFrPrbHFx560FcRB/tFGz5ncIZA11z4jA5+ryjl9UpZflS4YtZx8ozKMxBY +eUAtGeO54e9fWneHORho/3EN6/SAFZ9pd5LxvVaUOG48++MKsHBkb7kX5gWB +zig7DtvddjdFtwP+rrd18ynNAtAS7Oyaw9+tprOUDqz2hGKN9Yo7u8Lh4ZMS +zmO4z7gKfkkJaHSAl51atuuEQoG6iyr/HtuvTVC+dVy4AzcXdCv41MKBwjA4 +lYLtxily1hcTzIDTl3/SOzcQHqkKhcrh775b3RtRt9sQlBdLmL+uuQesr2R3 +GmC70a2OETEfCvpU6zO7NecJ8AjZPHTBOuG30LsfvSkUpKFFiXf3S4WiChO9 +A1iPbav8uSCF6yuIs1xJ50kpLPes2bvcEuvw4wa64XFYx+rvq5pXK4A6o06F +tmtY5z++OMUZ0oIcj/8QlOWJhjLP7edyBOig8KbjkMkABaVWllrIzUeCYLTO +8cfY/+tQHhWNuTYo/KajIaEYAcM7ejVClcZgdh+/9mHLN8jAtlLb57ofevBy +/d+rm+jAbCLb2MFDAYX3H2tqllUj0YinfuuX00Hpdt/fpPoXaPbln68MfgXI +zRi5S3jSwZl+u4E4v0eAfQ6fB578Ll/i/D7pUvI8Te/8imV+BWB0wo087127 +jIwnImaNoqRiBFrdXUXGs3BrExmPsLqepu91P8ipWUnGI6j+QOD8aRr4L+5Q +CanPRuIXglmacf+J7LzCayxEgwsxMzZmXwpR7waxMxLYPih64hSBm/VfpmuL +agVoxPqxHIGbReIAidvui7UVUjzR6NLnMhI3yNP7Trx736nCSna1cBT0zPEX +8e7DT4TUCDyX8xx03T0fiX4rpZB4fqNonw3socKoUeq81udidC0o8NYvxzHo +uJ/AcPoLFaxNylpWJJUg8wcGJsb2OJ+7dH9+yKHC1533uEwXS9E7jtKfH3A/ +jKzYmlxm5QlRi8nynKnhyGrVQf+T+Luly06kEvkp9ePRrjVCoWib3EUFIj8p +gsmpy5spiCuMHnYyNRVlhHFzf8J5VTiyn8xPfV12CZyfKHTlLjI/q96/0wyN +p0L2LR1NqdZS1L4t4gwT1p+qSrqdObepUDOwTHFKvRyFF2T4Ae5vh22ukPV4 +Y7hbANcj6hpsJOvRK3ILj4sLFa5y3wuUYS9HDFJvO/3xfZ9s6cw1CfOFsIkZ +3lr/SLSrSnuiE/ex1YHLlh9TDoV29aJsnaxQJP+S2vUF2xlXGCZNnKNCgY6k +yXK+ClS51zPyOv5uQ8CJld1HqWDWumqrW1cFWql4238DtlsLTJL9c/ylfl/a +PleUFYvI/ql61UTJCSKgo6KI82V/KKo7FfXlDrbveyxwp6kkEj4L7BU6M+2D +3q6bTyXi2RzTS/YTnkqz3MhOD3TcqYzsJ55F1bdmLG7CYIC7cAPdBTUpu/VW +E7zJ2HOQ6If73E5vYJzKR4NOccVEP2S+ucpu6JUFNL3bNGQ2Y4dqlUtNW/D5 +XZoGmgSPjOTphGMeQcWenTsIHhk66S5J8Ei68JFizCNo3WBKKMEjVm1pJI8s +f/X0AuYRxK+1lcEX41y+tyBKsKYVZmJ63X7KP0cro9qzZLD9qnP3ptsqcVBY +yiQ30WeNTl8dZpLH9zpz0JPkndV6v/YxP7uMtG7cIHknakaL5JczLZXjHNMO +SP57O8kv+1nESb740hQnv1vBFiFmfZIvikcnSL4I/0E5jvkClfsMk3whONtD +8oX9590fstSL0C7RfpIvrtn7kv3/ksW1Etz/0fzJeLL/q3sIiRwZaEa3C9z3 +RX4vQq1vqgfYsd39x8LF3qFWCH+3WoLnRQ0c1Mx/V4jvtbLKJZq4723ebzr4 +vnAyUiGHuK8kVz//QG8rtJ7xbcxWQdChw2Mjie3ilS9JHBpyLnyb7bOGdTpU +EocqmZLfq0zjYaNQK2tyjyfIG948XIb5RRqUhL5NYB5U2FOckVYEporT35hw +PIHrV/Q9wbp677Hn3Ik+heDP6Vtih+3iu1N3EPHfHbF0wvFDQcIuMv5PNecH +N+pQYdO9CM6QrxVwZCNvSh/O/yzZj2T+cPTN7K2iu0BvaBKZP+VcLnMVLi6g +910tZ7diJLzcuLJeGtfvuYXM1VprbMCjNLXril4YcCv9OlaB7WoB885vzK+A +yklph5rgEFB79+QYO/ajFS5nsRXrH4VpGaYI5izoERxXOoHr/Qq8VpuIoaCj ++fc6a3+nQ4XIchV7PJ9avBK3q5KngeSbK3l66iVwsmeyXNhsDEy2rDGonKCg +gpUvQ5TiEuFWSWX2AvbjXT3oOVlAQQbnnl84eOERPDxmsSZBnA6m2/QdCD/p +s+mHzqiXINsNV6sJP7NytMuEn4W5N37KcYnoUr4H6YedrWL2Bb6vLC8fn6xi +JIoKbKkj7hvAeJS876212/de1wtDu8Muk/dtCCog7/vT/Y5CU3AI6hAXJu/7 +D85oCWch6U2sDX9C4GwCXcrYPAL94k62i8bv/i6xmnx3rdhj3x71eKJWAxvy +3VPpFrp1LVGwKnBYb3dpALrslr3FCp9XyTnzgNAJXo2ud7FOQCx77LsJneBQ +4Ezm54N3fDdwfqKPC2/fEvnZrMRK5uHlIh+RHBWEPGeyrIg8PLlvntRFsZJv ++LEuQp/zHUhddKnicjuhfwZtOW5j/YOE34pTCf2TY7+J7BvI8HPElRk7qGRs +JfuG5LmZRI5UK+BdoSWi7xkBhVxX025jfLrrxB4Tff6hL2usVmoqfHHJJft8 +8Kr6ZOK8qHJTtoJnBArMk8oizoujFaS+op6W/J3DGYIy7TVIfcWj+Oy64icK +cktIY94fmAyOStsM1+M8uf2t14StyB4SAy0zN/+NQMMc3i9PYD9sjS9/bDSI +hzdTxfJWx/3Rwqj2cjfsZ9tMzyapBmswlNbpb213AFtJ5eW1OH61Nel2Us8p +yJH1+H3HiGRIOvZH8RnW/xlV2xwLGWJA/8HvxDdGQeiLmrj+L+zHXC1w7dS5 +RNh9yk3tCs0DtBbTt3Bhu8h+gTaf/VToO+7u7fmsEriK9AL+Enwa90dU0fw2 +HPzyLcFH0glWfStPaSLmqWDefX9nXODQhcEymeQoUP+ZPj2J33evcyl5r3iW +FFa+vxFwVuI4ea9sQ76HCyw0ENFQ/itk/xQCAhbTb5vjflsv575H2AY4+SPi +smzDYdz2e2cYPm+XGXGVNec26H/eOp3NGgGZp5WZ/LD9yFmmA4Q9K8X5XeX6 +CPT8eXWPL7bbLto7J2M/YWduqqTYhqO5CeYuwg93OXel/9HLMCXsdVmi1Rld +ep66joLj77lGUfbToSC5Tp9CmwP5yJ6j5rUm5pedoT/qjrNQ4cD7iIRdZtVA +Y7kh+BPnm9lUye/GN62wSWTXzulOBMnLVm+VxvYGn5vdCloJMP/i4UkbS3Po +9eUVfYfx9F17I4yVkYLkW5N+L2Mrgg6v195XcR5aclqs6ZagIM1PId6qIwWQ +erHxUSm2t/1dr2BYaQj3TqwboHcHglC7pR+xN0ve32TNGa8PEoLP+mysgmHl +yttM27H9R73s27VXaVDUJSC8cUsxZFdkafNdH4P72kqnOUxo8HH99w/Vk0Uo +/ptmGxO2Z74bF7l8nQoekQ3qgcsqUEEOyFfh973H4HtP9gwVesxzAoVxvbOx +0HtuYntv7p16AofzeTKXMQ6oz1l923/ggJZwCPxleoDjVCw8iSxQ3aZkiqyL +EhVs5v8HB7SEw7auzvmmKw/g+Wau4v7wSChmPBqzB+O2/l0yqWeE75quq/eP +hLERBlLP9LIOhcmfvAmLTy9XeO4PQx1fadUU/L5tcvkNDxTvACxs043F/e1g +4F7BF9j+oMWDnFPsnE6V+YV5oS+SLeScEt1w/UDfgh00nsuWGXlhjeRtPvsQ ++4dyzmukXXExTm30hTXInO4m7eMKdc5S883o4mBPrItTEZRGJX3uxH2GtUd6 +zbxJLHDeTLdkGQsDfml2RiUcf+O+V6RO67mUIol1GrBtHu4idNr7Ku+VX/m1 +Yf23kbi6V55AHxiuTMf+Px6Uey5tS0GG7wed7QazgSN3825nPF/vjNZbJOaR +dtlT86eeYL0admUfMY903BFsOcVMg5VRQ7+tVUtQrq5KxU6rMXigeHSdXxAV +kke9f5vOPEPRstM+kVj3Zj+8SOL8efhC/1B4JEq6+PABgfM0lapZwOAHj6au +/dhdHI3mz2qedsA4u/FeyFa4Hwodt7sEBxOi0NUB3nub5/9nzkJLc5akbn56 +LFcUyJi5qoiEh6OHfuFcw3P/w+9oid//wRMt4anzSFr/AgcVRETHo8+wVIPS ++q+WK7FOy9G6ReaVeF7/LgElUzhqnETm1efbTcuO+McCY5PQzvpLBjARd1TE +AtuLeI1PC1McIGxk6EyjszUY2dl+IPrkTqHI9dtozUhpmFFaILIYHExaHXzw +d23YFSfWtTQjJ5ncmV2vi8F8EqXrChH3Yh0l+nDR+gc+Zsf9gW9PCtmHy+qB +yaIyAbqGnBmj0gLBvXq5IBO2L6RbzlzlNQLfVfOD5jnOQA9ZEdr8v30GlvoM ++0INmbfi/c+6YrAOKX52jMzb3OcRR/O+XIOjP7xs7JxCYe4Ze/IQtruV/o4n ++udWef98YfuniP2xZBrRP6+PfxDby92CduoUP3aKT0KXoiIthbH/0Vw30k/Q +4Pmr9k6h6OHviSTCT31RrQnBR3OVoXMHApMRjwC3AcFH//R/tNT/39wsIfni +8kiEySWaB/K/QCX5In//1p0ELyzsjbJwlHRCpuWfSV74px+ipX4omPOafK8P +vk3hRZcMkHS2Fvlej7+yHxEqaoVZT36Od3eeQ/RU1N3VuJ9cf2sWtXasGQV4 +Wg0FlhWBm5Kg7zacPwIuO8n+uf+KVhbun+i8rgPZP3PXL+Z/mmwFO2mOal3D +GtSkPfr6Ffbz93h0p/5aCmL/69Yx+rUQtd2QqjPH57duqyHP39q6rQufh+lN +buT5ma+buojzd7SVYvF5qJutJM8/alIXJfrn5JgOD+6fsLrsNdk/C68uS5G8 +VQADO0LLKg+3w5OUk1tDR0fh0fsuWQYxClojRCuU4CoE5YUtG92xn4zGNW/y +VWgQ9XD80f1zJRBw+TDDxZtjkDe8bEZaqQUpnzTaOBsTCeKDiUd/4nc89EdO +IOpkC9qsd1BtyCYOOLis9Lxxfp6gKVq28LcBgkz/AI0MoJ7pYg7RHwP6sNRu +kd8tiFmoq6O20hOGFY7DOC8dlpkF3Yv+9Aaxt3WUcv6xhHcbfc/uYqWD1K0X +fAzZbcDxtX7XPeU0SNxpOZmsOob549rMnqb3ED4qKL3/VBbk3PlyKn7tGDhc +3NOwbxLr3ong67KMWaBDd0jtxPP7hMh2gd7T75DK+AkdsYIEOHX2s4796BhY +LrhnfC5uh5sbtnJ6FYSirS/+WGweHgVew14y/seKWlvuaWSgdqv2tUT8VsI2 +ZPyxDms2VlR6orw1EWT8Rct3fT8i+gY5UMoPDbCEoR/NZ1YoctPh1QtlelgH +DZzZFpl+2+chqLRLQxfH4EY8/ReBZ4boj/sYTyR+LZDE8+ZOTX4Cz2VifwXG +bOJQfLj9GQLP8D+CJP8e5qkzH+0ORDUQSfJvsFIIyb9MgicEnKyCUVYlP8m/ +A+vlzhL96mSb4Gbcr1D9hRhrol99pgpNq+6kwoaPloHWmlWoq/H7+R84rw6H +xE1OMFLhp0hqWmZdNfrQbTgZhO3zVu6HxmZb4YUt28D3XTVo6/204UvY/k9d +oKW6EKqfqVLhiQE7f77NoQk3kMQZqaeFuI60rQzIvieW03vmlbM1Yhc1J/se +s48LOX8tuneE4fkLXTiq2k/MXwXFzGQ/HKpStsD9EPnGKJD9MKQjafFOWTOK +uT3x+4VWCerMlvHeje1ca3IjiXq8vMFAI6isCA15Hfch6rH/GAu5ZxA827ta +JysUDs8OkHsG385b5H5AJfRoQ1N/KLxlSyL3A//wBSzxBa3ha9vUNVwvu64x +JEfmwrL+UP5P2/9nzwNLex7Va3/pxD7nqoP5cdPFUgjjFSb3OSsO9pG85ivI +7oV5DZ4xXSR57Z+9H1ra+xUr+ZO8XHhKu6f2lSei0MZJXraU9H1E7EkCFM93 +LOergLrr3BH/sSeBpT1JFDvdq16UCsNNR4O8r1WBVcFO3zj8XkXpAeTcpH2E +jfmKeQSIWfLaE3OTb48OybMGc9zumGfh6vxakmc/RnpxDVwF2FWuucA16Q8F +h3m2XcPx/N7xdVH3CxUOOb/WWJlUAkl2csbEXsu04c0VSgMVamZb44ael8IO +1n6eGtv/saMl+7tzxqT/FyKJdpsn/dGw3V9Bwv9eTW9ynv241eBw3e901D/6 +FIh59ipFyZu41w/K4+v4Xmjj1gzyXkH7Zsk8tC4J2RyQcAM+jcuSefi01zDl +wToqSB8527HVuxpcBuWKL+PzbqNcZF51urfJN2iVgEPHAy8irw63WvzMvUFB +9n9CFqeoOcCw18HwItY/W3R4oqzPUFBccl3Iyew8iORhcy/E+aCbcpmsd9PE +u80z9nlw7EEuWe//8Dha4vHszVFTRD0OGRS14nqEIJg5R9SjwWpdsh7bhk42 +4XqEC0MDE0Q9bvudrEbUY32dmSGuR2iVD/1B1KN6ysOR92etYaOjZ7bTXDBM +zwpQmDBuE9GnfqWW3AK+J9cKI2VC4Gnusd3rib/vFdnSV+1zA3hGM4VrQ++D +UdMl13nMv8HNAmRfvcy+mIH7KjJN8SH7qvR0KNlXjboujuxmzEJat7rIvpon ++IDsn6w+n3Z4FoRCEp3TkuifnlqyZL+9Ri9o31mQgFyF58h+q3b4N9nP7yZO +PPVXTkPnN1aT/byB4kb2/yJx53t8fyxRmZEj2f/1ju+yX3SlATAxxFq75yIp +w4DxC7cwDiKCUt+u0GBX9tuH9JBCJPs3u+eL6RjwJikyn1OgwaukqyWfQ4oR +Y/vg8yF8/sxYE4kPg/f+ZXZzwciRbkLiI9SSReLjdusSb4hMCPq7JZ/Ep3l6 +LLXYmgrrM6w23ZEsR5k5/RcyCL4eLpU+guuuqHEmnNmuAvlXHs06SuydCgrl +CD4VnHiggvkUBdgxbyL4dKhrZPGD7XtocdV8RHmWhNTKung5BcdgamprwosY +GlAsvlTnyBeilXVHeJmvYl7bGkn+LrB6pdxF/pwnaM5clPxd4J89D1ra8/yj +z9GSPg8/OUfmrcqmnFM4b1HBLnYjIm+Xt1MjibzN9vH5jPMW1T6scyPyNuFU +4FDlcCu89admarTWoCRZNZGL+F4plnQWQrfP8SmJmc08g3luQ1K3l0XaecY0 +Yh5Zo+J9p/MpvBjIjlLF/c2p/9sRYp9cP2zdLtVaCtFxbKeJfXL5RFkHsU9+ +s843aEq9HIy70n2JfbKGvTC5j214cyf29LQP2Pxa/piYp6QO2JH7GZ6kjFqZ +0gCIPVJM7mfMtdaTe4PHBVJW74yCgGLATu4N4u92v9t4kIKiM19xCgsWQESN +94IUvtftW/rk7wLM9onlIfXZ0F8rSv4ukB9kvpn4XQCdoYjd+lIIEzppusTv +Av/su9DSvuujzw1yjxF0umWtU0QymkksJfcYQu6byN/jWF81RmbquaIzowXk +73Hlib3k73HQVC3Df8QJJYaKk7/HKSU3k3uS7UzJf7raHdCbz5vJPck/+QZL ++fZ2fMiOyP85pqMbbNxzgbWUn8z/m4YjZP6XXrNYhfMf9NSHeon8P1cZ9ks2 +7y1ymx500S13QdTvg5LfGehgX9YoHtFtAhfOFU+82RCMStMMPYTxdw+nGZoL +19HgYdDxzQWKWUg7vjHH79oYRDbyDD5op8H17CeSeSI5KLS7v83eYAzGznf3 +F4VQ0HdrvU15gZlo9c+TVztxHqoUSu1QehoJjc0VwuymITDvK001w+81/esm +hZgHf7LQLW1US0BucnM5MQ9OCGT8ljtOg6FKTbuiiwWwovLGTVE8P74OnRAY +UKLCYIbZSuYHlSD5XiFxAeMwVcluP7KaCrkpL445RlWjbcyZFhRsX8P4NneU +mwq9aZqTxpNVSIR/PqcL2yVOTznGr8f5eUX2U+C5avQrSu95KbZv3m0E7aah +cPBllMBnXX9oCQ9zuIz73h/2u333HEPht9hu9TT7IFCVPD22HduFFgK+yVeF +gVPknynd8RBIKX+zqh3fSyNKcJ9FOAUVxU+VPM2NRWlnD7zO3EWHNPMnU++T +KGjPOqvB1duS0Pku56cnJOhw5P6dDdOPKajU9ML8mlfJ6Pcz81kx4u+vXArp +FwSo8Cv8pY5cfhV8RgGzdThOndkFh1eHacAU2j+puhAGzix5ujyemMc1hFV3 +9dHAL6679mjuPXD5kf7qEH53llzXtkCZNhBe5uhUd+4hLOPSPz93bgzMTg6T +ftayfR04uBCGvuoF/5cftOSHP1R+x3szrLe/MQ+qnfUAu74NNQ66Y/CCrvzW +KJ2C7DgpBljrIDr9u8I2rE9eCBfrN8dSUF3sQVNb73Qkf+l9AcK8fOdQxYsd +9ymI+4Oe2ssDmUiwjesXMcdd7+IsP4HnTX6/vazHmvMgdN/Z5wjXqXTAwb6x +oxQ0Uv2e4eXFfAg7GF0Xi+17GL4Obj9PQSfqtjIL8ucBCnk5PI3tytt2Cnht +wf1t5HIhj4cc/H2p7fZTAc+ze168/lhFQV3CjOkFPXeR5MJdR+Jd2lNVrs99 +pCCP8C13Kz9Go3Xrt13YgfF/W558J+CUPTivTvc7/9YXNW2/Tb+A6+Lvlg8q +ljlWUD+1euehLfeQQuVO7+OLxN7P6/HLb63wevIq3+vFGrQoKbHbDb+XsnHp +rMJiK7Rzvi1sm61GKQNIPxvbZwNErznLUtBJ+ySrwegCuFJ7TokFxz9+0slk +JKoFHX3IVOYquhtlijCB+DasZ8aLTad2mUG1a2NTIfc9NHRUeV4Pf7fm+zZO +OuaXnWEnLPk/FoDGV6W/s5hfRlJpHqJ7KUjGdFrmjkYBoO7sVxrY/+7yxM+T +eRT0WVzk44cLPrAqLj98jxQdrOksbQaFFNSx8lmfquwNKNQIDHPBdlHZ7t15 +a6xhw/5VZtscvJFIUEiMO/5u1rmkHP4SK2BYUfvBu8oXWbIvfLuB7XniSZm2 +DXeAyyF0t094BLKYm+OzxPWCkhpohE7muMxxMSUyF8kx6G8ldLI2Ux3rc10K +0i15mdUzmYdiBhOcPbE9QmPZlpR+KvBdbFqxubwQZh2YiqVcx0Bvu9/bwE00 +eHx5asZ0+ROofmhxS9ljDCYlnzqHZVKQlaS36vXwONCupf+QlaRDyUYtu796 +FJR8Z8NrI+tAUFrT0EeXpYOXpJzYo0gKevs984qNTQjEh7+wBWl8r6Heazxv +W8HxRMJ0XJMTGsouq1SrGoOrbuKqZk2v0F0zbr/vnS7ozti1YyP6dOD52RTK +bdSM/hwTHTZougBdjtqKVw/SofT5e9EkHgpyt7Vld/O2gKDd1XxcinTorax7 +8MyNgrjmt1xCadZw/yT3fQ3i72C5NR99RRTk63Ls+OHHNqCvO1AZhfNzXdjx +4NQRCuJjexEp0mADjTc5Z9fhvsF3yKB6VIcG8czivm4nPNFExNmhUxiHuwfP +2cir0eBtuGl6+F9PpFrP/TPRawyoxa41JRI0ULh1V+SwphfqfLNG9aTfGLSd +ZlTjXkED93NavUWm2E9SXcXH4DFYv/LN68O5VMhS/qaH/JyQQwzbh73xY//i +A/8PfGAJHz0Kb8YUpRn9yFl1NTHXHb2c1NER30cHEQN58l3c7ZWrr1oHogh6 +FvkuzYXoCxqnws54SZu2tgKkEf/pmy5+93/yAS3lwz/7TLS0z/xaps8YrI51 +cleEl+DRSogsLdh7Btcdj4yi5KbKGOiM/1S0o+0+vEvxH0+c+588hKU8PHmo +af3ydZjvRrRYpdtKIDxff8VuizF4WXRHcfUAFSZWLK+jbiiFiESNqTjMX4aC +qU5n8DsWoq6uOzGp6M6CiXUo7m/fVB5sVZe1hsdrbfbEB9ih2o3Bsq+IfvJ/ +60ZY0o1HJnZ8Zxe9BJPZl3Wj14fCjYD5p39xHZ04cmI1oWN/R21Z9jWkGMo+ +91QTOja4gX+9mQkNjMTvuiieKgK3VpYI/xtj8GPfr5onN1uQzUqh1+La8SC5 +q/BusyDuw70NbMT5vYbTWgqnihDfnZQo4rzqqd2k/n+hSb2GQu+jY9ccSf3v +HH6JjKd0a55t5PpQ5HZXqZSIp9rp6Jc4rDObPJNcpYVyEC/32AkVrCfT9p/u +dD1FQcbh9ickoACtVm90JH4P5TGSOfrBjgZTubWTf5KKUDuT99AO4zHgXP4t +Khb3nxXHVQsueKWh3QZtO7gwbqbe9kV9X5qRy9lEEUUoRicm+zvs8XzEFvu4 +kLBbo/RAbIdY878fCfs/fmDJz/52z2RivmO7H3uQ37saHWWtKSTmu1e19deu +HH+DePXTRfc1+8PqviC3CE46MO58S9oZ2Gal9jb7o8sRMaTdVSZRo6GeCi7a +zzrzj5XA2R3xTYtYx7ayZ6+y46dBZt6YtPpcBgQ8r/fUd8fzWui5iy95aCBZ +RU0q9syEyiSrc8Tfz8+73C25eIgG5/pLm8bvlsAU+5R/KMZ/7my8NoMcBaUr +xAyx3faHx5vTuTbK0+F7c8Ystz0FCeixC3zgCAb2wl96K3HfCIUXjMov38F4 +Vq6egUgSklAVOr71E87Pbq6YTO6XKIo5IFI0MhoFeHiJepjRQeZZlpN+3Wv0 +dev9R6+sdVGuHYvs7FE6HIpcK/gY16n6WLZOs7QpmNwSZruF63S1z2SxFK6L +W2HMDQ9draAl7YsyVY4ONr6/WQRSKciGYpaud8IG2MYPbzyA+yezprNc7gcK +SpBu0rvdaAPqo8a9e3Afdgx34Iudo6D7dd9bHmbbAGNfh8wGzLP1b48unMN6 +r7lOgpE9yxPtGN/WfRbrkIxVNN/TZ2mww68kvXrYA8nX77N1wrj99cotnlCi +QVNHkjjs8UKygq+nlH2wzjHYnbSDF+siQ57fGdxeaMFztw17AJ5/0w/+qe+j +QukirY5OcUcGxqtslCLGQFFBPPXwBSocarq7MzjTGCllfE5tzMD9ZLCYxPOJ +xNlIjCecl2Uk8WQr0WgDjY/whJVzaIVyCvBUn4tTjx4FUXEmEucaU9ENOyOj +gan6NonzP++Ilt7xH95B/z/vNOwn84eqe0NYYy4DVZpxkPnzD9+hJb77Jw/R +Uh6a1ZhdMlSKh9h3vwxkVoShsvkL4n9m6XD52iUe2RwqyC1oIErfU1CdiJDZ +j88fHyqqXMC6fU6BD8m2xqCTpyu+MWHeXwkXK8y3UcAxLPHAO9UUJD593ksH +5xtlcejuiHYpqsjqFq+vyEcFP520l7fSQfVDHHn+W/987VvVFLhzKYk8n7mg +RJ7/4WK680VFPowvcz9JnB8P5hw1rXmBZubEsyrvR8N9n/UahWFYz3jnknFO +tZkH4zgRfz3nbiJO4b438cRcrC155S+ei+F4FGUzMRffl/DRJPqJmGPhrb9J +RfB1i/0g0U86y8U9U79RoYmXrmH4qhTa7x9l6cN9O4eVSb8Mz3GJ3C+SovrS +UMnVStWveE7Z935bPVGPYz6JeoN3S9C1Y5uSiHrsUVVN7sM8mKBSmzDZWwqd +VoiX1XEMGs6439TFesNBt9H/eVUyCrn8xoIB53PZylqyTkXamSXfcwQj8TMb +9Ik6LW8SJPuA6o2QzSWemYgpkIfsA//MC7A0L/zzLrD0Lg9nhUncZIamxDFu +iOK0ncTN8+tyqexknFcdayVST6Yh14c1EtvxHBqXvbVk60X87r8OreTgrEAj +AZM7RfF87ahiepx6mgoRduJiCo4VSPLpM9MR3A8r5h6Rc+Lz+x0PT5a7gGLn +L3JOXP340LPrEwmwPqAyQ/CSD2i5cNQdxrx5gGvDdZXDicCY6Nqx+ak3RN+f +aVjE+aas/V39rIMjjClbrex8EQkqThfWiWK+gOTH6gJR10GXJfVEWb8TkuOm +cr3GPKiy5wgZfz7PcFnKyTR4z8os+R/xw1L8N8+sPEHE/1ymrkPesQKyBp6Z +EfHv0/k+VMvejBb1hT6w9tagL92TELCGDlG7NwVfi6OgA/fpZk/TE9CB5SLn +Q3BfejQEjMXxFFTsOUBlPZmAAvyvSt/HdoMP7/gupFCQtI/DqSOjD1EWx+tC +isT/zHGwNMf94x+W/DsbrpT5jee7vC4RfonAVCQ/JLdvC56PJu42lxinYV3H +aPx60PIxunlUY8AT39fWvbtsYOAmFMbfFJ9mc0TtH3UPvMH4WLE9b1HGceol +7PeY25QBJVmUDhXMa2ysXREHn1CQfrVBwDuZdHDaRosj+C5k8pRX/lMKipAS +4xRLSkZictljx/B3Xb+suPHy1DtUrmA/buZbiOaOS4Xo4P42zr58sjm2FT37 +2NDGdrUGBUauYu/B+tD29FOOTQ8oaJPdwyJF3TiU5OG47yDOz+2fNQLU8qkg +EjjFeCjsKYSsPRiVgeuUteHUpF0aFZ6Yv9twS6IUXlyfczDF9tMVHax/A6hQ +PjY8klVSBr3eMx8/4Hd85K2onOFAQZ/oq7kGLCNQQX918UEZrA9v6Qrc9qCg +hhOb4wJWRqMVLKMsZwh++R0NeXh+dLJUD7bQjEUvuBKK+nE8y9+GJ1Br74E1 +uwRfwzdvuP5y8/wP4v970JPdZ6LjD7cKBmSdhwNg6uL8TCm2Jwt9Ca375Q0t +N1bsimAIg+P07BXEnLKqop3t7SoaVJzukzOTzQPpH7WvcrDOXO40feHXLBVC +hPce3GpSAJs3hhbkuYzB4xUeJpOraeDzduPaCL5cuODKdcPEDeuBxmV7vZsp +aKGnX6lNKBWslfaPC+N3MVYokPn+Gs99az8wOrAkwZevHAM/8Ls71EyJ9Em0 +AdcV+Xs6KU+gXivV0xnP107Ze8O18Tu6xh6pS6x9AMvVHarW4Lxa596RKZJB +QSW3fq8/8yUSCr80V13CODxbGbCZ8JNtKrAB+0Gr9h7yIfz4PQwlz0+KPlmu +/yUSdYTdJc+XLh4g42+2yvHG8aM75bnXifjzLM+6EN+d4rKvelT7AKVeuFtN +fPenBC87gU/KYZ1KU9k8NJ8k9ZrAhzabR+JjWzTtjPFB9Z1bSXzeUoKPEjjQ +33xopQqlojdeciQOBm2fQ59j/D0EO0YjGcJQ03UfEv+778f7ruP3yjeKs7Ea +DkDrRk1+E++VuCE2gYbfd1nfKb66b97IeL8k+b5G/AN/RQTvgZmK2I9Ebqzf +KLSJd9h+auVF4y1vfWFW5dbw7YIQeLus0yoc2+ciO89Z4Xln/UaTH5P8+aBb +aCOqjuMvSpC5lE3BfF3R5xM3ngw8ivICr3GcZzP273ufT0EGU73UycBoqFU8 +MB2BcXj9JJt1rpaCGPKEW5WuxQOTQCpjKO7/JxacDjUw0aCm4nZWCncumk8o +PhGL8fSSC/B7towG3rqfuZYF5iNR7/cr+PB3fa87+Zzh8oPYRmaOK5tCUGss +h2MMjnMN+0g0x4l7cOpzfBX/BT+UUncg7AO279oY2PLOnQZ9ktu+7s8uBJ5p +etxHzHcffuQ9LEA0+DQ0fWKfXD66ylqpp2g4BjYiWYoOY7bgddnKKbEmEu0p +cA2SxX74o14999aggWB8/NPgj8VQOswX++LmGIyaUd8Q/tV+847vyy5EuTvH +Egj/nv17c4jzLZl7F/0/FqMFm+xM4jxnQI/IsT00iJrsyI7wKUFS185UF5mO +AdO6XcyE/W6E/GykTwmUH7xbQ9hjBP5oGlxpB6MJlim96HhUs+uYr/nMKPDk +5rC0j9Nw/jgvf2ySgyjN2xYbz4/BdW+OMOJeUq5rbinL5UPXpdLzxL3+OQ9L +5+cXr97kam2H+L7xE8fG42B3+4X0nC+jUMjIcHB/PNbnrf57nOsK0NTFsq8Z +WD9o/fhW2NeJeflz8pBCci565Otmc+nSGKT/Hle0xX3G0L2fL/lUGOyvTNRS +x/1H+nOO0zv8vly7TfZ8+5SLxs/kfvqI33HG/PyGSGMatMXw93E9KYIUxgah +99dx/OeLNhL2zS3iY5xPitD7bX3bCfvkJVfzTztoMPSr9s9V7qdA7/umft1s +DIYe8ZYR9nV7b1GNuJ+ihdMWKoQ9tOem3WxNO6SZNmT3qTyAM9N7t37/Pgrc +m9mUiDhPxtsKJZ0KQy4piIzz209TGW4cZ+9vO2MJsVz0MPlSUCrOw64VHaoE +DlGCzboYB9g34ETi8DUx3Ch5qw94WdAbbQK84F5q80oZzDv+2js90IwnmLBW +917w84fD32KTiN9BlJifCxpoukG+UuO+33ohwHn6YG43zisJtJPrGtAgbua4 +sh1PKnyYZ/NtwPg8/7RByG+Ugh5NSrf1tT2A0goOj0bc9wbPvJSs6qeg2G4t +oZy/keBXIGRWjXlKk+VupboKDeDIg5hlKxOgq+DEBWOse9/mLwyJq9Pg75pk +W7vWR6AkI5lTgO/FwVLxoUqWBieqfrAP74wDDR1BwZdeYxCe/YdxJ9bVQ5M7 +T+RIxYNp8uv6V75jsHZr5HNfVhqcfvD8PlduIow89Ku+7491o1j/7QZuCkpi +zS6KkHCBejbtywsKdKD/YavYj3m2S046ibXXF3qZMs0dsB7bbL6Vty6GggIC +Xc44KntDVfinaj+Mf4nWWuDHc5C01PHDOm5h4H4ixoMf64SA91mWSRfwXGyk +n8Y85wJd2lp9snie8mMoVr3zuhmJVE95fmGyR4Y+/G42eP7a+rqMPC8W01Oz +as4FaYZfJM8nsUiT31X39bhir+yNlF//JL/7D25oCbeePULDBG6stF4P29ZH +yHXRhMSteXMCidtqmS+MIzvj0KbqcQECt21Z3KsI3J6V8p/LlopHJnxzJG4e +Ln5FBG5pdX99uHMTUdu0EyJwm6lR1iZwe7XxSMt9CRd0+t0aQwK3z4qK7y4h +CjJhC7q147w3gpuF7lqYd441qqQReNKuzUSw9fqiJsn6OwSe/+CGlnDLFt6w +i8gTjfiP0ll/I9HBY9ZkngRSjJsfhtCwLpDfrfYgGxVylRim4Xqxa5SoiN7X +gt7vyFwjzR2K2oLiGK8T/870/85DtJSHzVFygrdxPj9QYbKY1gtBh1jlyXym +LWiQ+W9cnfNa388f5U03k/nPkxBrlITrxdpuqNE2wAtF3qaQ9YL86u3K1b0h +vH/NBs9cH9i/5V29ELYrKv0+Ht/uASGKc7TbRQFYrwqrLGD/sWfsef1daTD4 +KPfwF9VMOEVP+8JmOQYX7EQ+dQ9TUF2R0dSTp9HA8eZYkRC+783svbJH1Gig +/mE8rsAiEZ6NpKbvwnOEdn5GWCqei7kU+UK5IuKgLVItqh7P0Ql+y225RGjw +1qdtJ7dLHGgbtzUU4Xl5eHB4dnEjDT7rvKgTa0yAze9L74rjd7w6pdnWwkaD +j63z4mOsSbC6eyf9PdaBYYKb+82wjg0s2i7YzuQL23fm/3qJ3+tqpmmrXBMF +HT/jIDFXHAxHzjoVXMH86BX3WO7OJwqS3/+B4zc1HCTdZ4IIfrTh6HZZi+cs +a/eFh8NGD1HRRChzKo7/rsHpVI59NIh12d/gTo9DwkZaOcdx/DkNvzdbS9Kg +0iiJhUUyDh1XP+zzwhvrVZnpMRYO3M87NGEyIgElr3U+uA7Hr6jNtbZAh4Ii +xbzD9pi4IeO93+QKcL1cHfTZZlBKQZxv3HS/3L2H2BpiSqJxHsp7Ne6RYvCA +eh4ew3KxIJTcznxlnPj/3vCqfnJa7w3iTtVBayV8UeJLX2fi3zvzXDXff6jy +LnAoiRbc5AyFPYO/wl/h84Xtt9/nzTmARcNm5vyDYXAy892qfGz3fSvoYexL +g64sJpUHRQXw1Oq713bc/1/CzafBVi1o/tz32seND8BY/viLBUE6yIqFHXFb +14K6ty9LFLsVAN8V2JNdcX62heaTeUI7LfXms2omulszT+aJh98R0v9Ccq0g +9o9+Vm3zJvzbWF4h/bDcXeW161YAqtncm0T4efhXtD0Ix9kpsc7m2cEwFNs2 +zUjEKalatu8EvteMok2wGWcomlqMJu/1M/hD8g1DO9CeFXtkNBUGSKtMKxHb +o1KSSPtI7fc3V6fCkP7LG6SddmSVfbmrJZhxFP0ypofD7v6eY8TfOVs4vnIl +7KspPitW0cOR1wLbecJe8XvH/Nnzd+Cbqqu6uFgEKHhmn/LAdr3268vOYXvP +IytNVrEINPB4uR5h1/5YdEzMogVtKhc8zvgmAViqk3k3YtwCWF2MiHpfV+DE +KMMdCokfc5mJer9bIaQhdLMFye5eXL+BLwqiOEzFVxN/b9/n/oiwP+DzlWfh +i0KTZwRFCPv76o8LQfhdmjvudDQ0PkDK+Q0viXcRljgeef4+DRTe2FimPctD +fsb2Lb43xmDHa2Yq0X9uJQRk4f4DvWF7DIj+c/TQsgLiPHODsTQ+D1ud1F4R +56OdoVMplAY580+M3ENyEN08fsoV66I9prvJvO0RtXshaeIGwVzL9xB5Ozr3 +epTon5Y7u66JnPeGP6snXYn+qencqyeSSkHdC0+1pCmeYJp+13oe12PY2I2g +uTwKUrOSyok39YKYoKvXNLGdfXB40yoJc1B6tm9kjVIEGr9soeSO8UzfZ8wq +dISCtEyrOcs+3wU5mR2rdffQ4cG5XwZ1ZhSUcMjTUOOBG5je6cs7KEsHsWce +IcKjzShMR9HcYpMLYt6gPWOhTAdP3vy7wW64L20OqqRoF8LvvWaJ3SZjsFe6 +yuqoTQvitNt0U7M4Fjw20uI8MZ6CE283TVu2IDW1V4mWr+PB/hHl725sZ74o +1EH4MQ/NCX+tXYgSvnpFEn4a10Q6EH5WLwq/21kciyQ2MiQTfp51pcePbTOH +xYeWHsGKEXCoqfA0ca8DPelknJmPbZ5d2+QC4QmOZJynzkmSfUxhRGFXG5Mv +GuN4Qfaxn16jf++cp0GVIV3l9YYSNNDs8H0Z/m7h7fBkfRsayJyVbJnbUoSy +5x7/eoXt08/VKIRd7uTBD7NbimDD/c0ThH3isOfDdSNYN9YODHm+jAbNRG5z +Yt7v2RRjydTYjNjZBjYZx9shWX//2yWY3we8BS6N2NNgw6HzK499LkQX/gwK +N2E/qnvsvTQcaWCxnn/j0VeFcI0x8DNhD7/9babOywEsY76UfLayhEA3+g3i +71dPFqTtU69JhOPOOtvvFzjCrptRBtvn6MDYdMf3xHUqvJGesz/HV4HnclHm +q45j8HNtBL1mmgrQsj0i3DYXXPK32bPifmt+4ZzD0GMPkPNQCOPUjIb20mar +2nlcL38buPP+KsGKKH2HxutBYOw+zStP/B2RmvWRqkNt4LCRnVvGLgs4pg+W +TWthnZ/gekr6KK6XP5cm7k35wJ/bE/rB2H/Di/+PrO+O5/L9/qe3EkmSRCor +FCrKVp2GrUSZ2YSM7D1KSEZl772ys7dcssfLelGSaEkDr1daWup33erzz+/7 +73ncj3Of63nOdc7znPu+r7tMZ5v0OFz3Mu/LLg2FAlH/pjBcj/yeDgSYseO+ +SUYwSvt+KNAVe8QVRVBwvA+NZUyQwYxRn21XZQgwFv9s+xhPgXgv7dcLb0eA +fOuiG9k7DuiXt1DGf1Jg843PX+2eDKCt6gE/CjuOo5KLpp7VqrgeXUx4pSU5 +iI41FusHTDsjWvqUlAYFKux3Wc6pVJqA4+yaR2esStBow46AG9j+9k7rgGsY +H/WJ7x033cvRoIqkNvF8XP9w9r6gEjIU5VWJHbaqQqPnw5kYcd25/fzlbwVs +J6nbeeG7ai2yrLws7eNLgeMOmoIn+YKh735hEotwElrX4T4YifFcpYaYbRfB +/CTzcH73wWzEpzwfcnovFUCL4459Ohl2kBaFeNMakcqnu+Hanpi/1Tu9v9dF +BrXdrLu48qthXtHDazvmdc6i86k3xYbQ5057gXnObNB5n1P5C+cx/QQ7Q5Qy +iD6wiu75sN0PggsFWHcCFZ7JnXEydSMhgc3a7nQeN4BvkDYu4zAVJHi3qZGl +Seijtu7SWQ83tKR5JchIigpf50R5f+H8w2aRaPcw0Bs1n1vgD8f5J22TcDoH +jvOv6vyektHeaLRuJ+0mzNMUjfqzLRMm4Hu13H3a2iIUOlJZVH6KAgrW9znb +jMjAG7KFTsOpGS0LRRY9xXHIFHzKnik9HjoeSl9gOJ2Izh7e4m6D43aanYEr +UCgTzvPOna377oU2MYrHa2C5W54q37aeMXjnFJF7Rqod6ZmZPCPmsR+ti+YH +NMmQePP01cKnzfBCPsJWGOMve/iu+i03Mlyz5Gqb2dYM63YkCt31osAwB8tt +s2gS2nkrZc+ZDcXgpvtJxkyIChcbPCz158mweWqKlr2/Hrju9OzOcKbAleu+ +kTbtJKTTZnQmMCIfntv7t8zh648XGTu2Kd+GnUVBv8yDk9DvmfpCGuxfuq8C +1voHxdEvvyR3la4biO0Lhy9xLsGS/UEn4r7Bheyh+L4oL0ZXjrhv4g3ZttAY +EvLmkY0SZS5FfA6D3ekCVPh+mDHzuwQZppq2N0rQtCJajxw/ebwuyfme/BJJ +d2AUzC7Ycd4DkQtHtxBzVPWNO94PMafCjL1hj0iTFVB3LAdqEd+vyd4Q9f6c +Ds9LHlQcKA6DV6RTurwYz8+Jdc89U8lwoXk4fLW9HrTOcFRa+FOAi07wRc28 +JawcTS9Dj3zhrr79APH90QaK5s6KkyREPbM1cZ1OJZyVvx7fj+P2UddX6cWH +ozDVGJO+TaIHZcQGb68wocBVpsu5bM1dcODLGbem7laI/pl0RMUU53lT31yJ +s30oQX14an8zgm2ugh0lxPlg6mSuoockdOeipb3LYh7qmzLavRXjY9/zN4/N +/M1jqP1fHuOuPfuoWoEMoty+pZwnW9B783snEon3k+sm7d4bOcLs0/MOW4S9 +kFHILPMogY+ePbUwOQ0M7p657Wp3Gf2Wb/31C+OQ+WBQy6I0FfJ8VxguX7FH +R9R0nopi3FJ7W7jUtJKh5VaZyvzd80iK/ZMUcY5i7M62YaeKQaSnbfdaOqAW +XdZmrBDG++7Pk7969th8JvSA2D89OibDzt9UyWAok3TniX4L+P+m9Hpi+xnr +SSdNR23AzLJWpKPeF54/UQ0n/NhI3R6utm8cehqEDD+srwPIeT5nhnlF8+qy +y8cvuL4HpmaEseSAnwC96RzmORuOyh9viSIhZ4uha0MB6cC7Z4ZDAu/TjBWV +OevDo8h6lJu/eiUQ/RmgS6H/QoHawO30/TnjcLloxYn2YhUS/92zX9GcAq0/ +O5TfWQ0hfc8NOnq96ciTYWdVBa6zv//dN/f62n2R57/7fkmprLnW7gMybu07 +LQbj0XxfD7sgrr9KaVpdigEkVHbwBrqXVoZ2+whZWeB4Zm6VCTXZlgH7jw79 ++HD4Bup2q2Q4hfH315B6yzo7BjPHTWQP6iDUvztlejf24xwS4QMcD61ZWuEL +kAcPdfIKg3E8yFw285N3SgdRN8a92q630Km51xQmrGdZPIud6yWOn0EBfcGH +OVATd+1bOr5+/5cN56yOk2E5QvjJ6ngLVA1PvHPH+DtemAP5HwGw1WZPSqVE +IvxkXFdCvGdoHsBw84PMFfjT7rP1qUQcSJrXtBD887dZVGJghgPIsHygE9oc +BzJ1CdJhWP7jdc6aXM6dQsjRpX/y83IBZ6RNSEjb1z9BuvAe8s2WfymJcbCU +km8a7h4DnSz6N57S7dD97d4Skcf2GHEbu3SnQ0blAZvhb/aw7TEPmfguNaxX +zzGkQgdMrL0Gl7nvwG8fMyUu4jvKE9Xae0yT4P1NQXZFajz8jk5WFsLXk/cf +6XIOtYezbzvDBF1jITUq7kUWtuel/ftxixrcX5t1l90bLkBvPth69mF8qIwu +n+JfDqIbd4LTVBVr0GzIFrYrOJ6r1v2Vy+WvyYH7xl/5DpsTW44KeMKKhI3D +yAE3YHLqNSTiNr4+ntuCjoSm3zmffNBfDVa9ivF1fFSYpwb23fFIBXemNMPg +llgwv37//txP3L/Hvu8jPQZwP0fbKrh6HVrmHk3dw3pC1gUVjlZh/mkrTGob +LgDW3hOxz7Cdvb+NE0psSeh3ENvTl45lEJ86tVyM4/CSWvwtwc9kqDet4Xl3 +sR5JJIkEtTlRIPT4aufvCDJsmJyfYdRrQpF3je3jPYnnxWx9fOeT4dVIufCr +LfHIYZNmz26MW9YBX0G92zdhfuwPa5JOEiqLH2vUJs4fSL5pIOwWDSr1GTJd +8onITPUqdR2WLxzwpN5OvADfyh4XF05dQ6PrWTkRtl90806xASYyeLA+ylSM +uo8mgn690sLxfOPYrdfnMD4ez9RsM/ur0a2lAUo9xmfygZtRiWkKDFNS/R++ +NoYXIiEJxPv//9Hu6btLHkTOG8QuR3bWgP8zdJMN44/SNCM216RD1W1BC+eT +t+GA+rrdHzGeT24xkzf5mkEyB9uFuDA/GKi4bEbk7eqoip9qZiTkcySf9lFn +BVzS/2PxA+uZfx+7Fp+xkkcTcXxCRaHsWnwWj2zp+bphCP2hZ1utM8mBw9c8 +WlqwvEAw5uRuvF9upn0+XCeRiPnF3WJiv7gsSNYT1/c1Rx9oNMlBvSr7165v +nZ5VilYngwFLVZPe7Rbiu2Q3f28KLDxU3+6fmglN+SllHU+vo10OUXbE92jv +gCllgS4DVBxXvP8IOaCUL4/PF2N57OBffC45ruGDnv3D591BhUnrjjHIt79Q +vgfawSQzrPMM3kenxAJDa4R14d0P8fvsVgEokjFwWx/GYeOuG/8lTePr7RbP +ZjUgmH5nUPMK2+P8O02VcoSEeNT/CDCsq4J3MhC/B9e14g0PNdTNhhBjI2f/ +nw/p0M5x9dkPnA+rVT7kSFmNoHy5XvMj9hYwOF6len89FU7/4z/ctWv8B278 +4z/zOQY3qr9OQAVP1/bPFwtgy/ngM8ESFHjpl/3D5tYo+vCto9/CMBreM8pc +0H6LecuU8Q+HjnF4/qL0g2ZOJfqVcH4wyRjXO6m/9pg9ZifsQVnsf+3RK/6b +Hyot1vID+l9+MHT7tcnv9xjoR/qFvJJtQ1HqTAxkjA/Nlr9xfvLZWpxD6b84 +76O9oC+3BLBY6OihsXodXRTkeUzsR/5/dfblnrU6C/+rs5y0VQc1RcjAmfBm +sGGqFVYGgn8EYjx5/+0XSvXafgHzf/slrOWy/LWh1eO2XaQxclQYCLw5J2qL +9dd+DttnXUUGLlLrs9JzDRAhRiMujnka6Z+8cHBNjm7+k1+oiZ0S5dmBqN/7 +Yi84haHjrTcb7bCeXQLG3DuzSKjGjHpvaHsh+vpOTp+eeP/q1Ne7SthOM/hi +s3WqFVmJGDwNwXYemg/1ttlKBqlEnhe32+6DxX7h2fdYPvP0L/5Hn6/hD5f/ +4T/Z+VZCEO/HXTLBtPP3a1DzkQIGou77/sO54y/OEP4P57cDmbuOs4yhhVaD +yb7GPMSl0P15/xgFfrVz3LyG/f7q0IH946bRqKJxMkET+33A44fi+c8TYDO0 ++j3JqwDF7jQLeozjZPsOp3TBX8OIXFXbPnTzKvJRaeHgYcL7dwOfdMUNMtC+ +0/ju8aMRKV1q/h6P7Q8L2tg3FILrXeVQ1v3aRuTztSEuFdujLK0jPSBBQu+X +X9fsFKxCmh0ytJ3Yfta5t6SnHiTUKeBlWzVWhixHI34T/PPV0b/5E56u5U9o ++pc/77SZvjmZT4a8bCG9ExMNMEIvCanYL6oB98JHfUkow0otZvFqOpq+uP2D +Fe6vbWmWb3sHkGHBPT7ij1cjHPj2J8jPjwJewQzpHWUkJLhrveO6glz0YMv7 +TGnMA6U3Ki6kCj0GqRNsU5e2tKLpvs/XxxyW4Fm6xsPvX9zAYFqzo9/GAxT9 ++j2IukOu3bvGt8P+8m34H9/2/D4Zyf4I901OO+Zb6qphmW1drPxVCiQdCVn1 +7hyDTyxXxHQtnBFUJvmxtFGgrp9xz4vZPnRPjO98gdkNlCzInWZvietguPv8 +592DaPvEjX1P4jhRizetF7MSFbYIyjAqrg4im2Tddbq3LIBc05LSLIvj4WBO +1ydnEhrj+6xQUn0ZxPf+FD5wBPM6CeEauQYS+uXzjPPsmB3Un915RADjc69m +2/5D8yTkpQV35U3s4VWPWYIj7qcQ3VgO8/lxODbJmpUY5Y32vnSNKMB93/f3 +D6JZTo3Dgxfn3vCc80FDMvf3C4dQQIn/l2iz0Di8esfCYHPBB/V8NW7SwP2p +QwNnXP9XMrALnBXeseqJvAK+mn6LogA1YqLTNYwMPvcuDaBBa7T/A7X5ezYF +TormVimJjkGUslhIXEEkrD4/ZzNMpgB8FUoyQP3I44RQbC2XJ7w4HcHhpE8F +L5OCrVEvydByPMxlPLYKtZ/QP7zuGgX2RXXy6uF+6k2DiENbfz1aFrHXS8P9 +lEHo377P/2/fB2f+9X0v1OM5fO+SgcE34LpjRCMy9Xtzn8aDAmU02843K5Fh +p2OLS4R0C/Cbb4i2w/lne7/HRf3XZNDsUnG92V0Pp57xBo5g/SHQmKOMeY7B +o9ZkL6Y86PLhpU/ZT4W84EOzl/OG0JOeeotJ2STomvRwOsKN66bKg7X5RknK +2nwD/W++8WUg9ND1ByS04f1d/xyDfIQsKu98xjykSMI83PSbK/xQIZsGKHgi +u1HHECIOu+s0HP5IGQFrhmL/fYFoSJqy4PuGedeodznv1o0XId1/6z0tchR0 +icoeoiH6kaC/9pAW1+xB5H/2jHzRXNNT7rmmB6X908Pf81fPm7Y1Paj9n54P +/F91F3Bfv3VUJaX+YynSUb6VEIJ5EZhl63sqjwOD+yOxkKFauGRzzmKLDQXk +6vysNE6Og88lLprV3FrUnJOw4n+ZAgLDZ9NfncX5tvku14p6C1LZ+dqB4KXb +KDKPNV6NAa1ExsvpBASBwtQTGjjPeBbuKQ04lglXEkqqjoR6gWbsrWY17Md4 +kawXfqczQTWisDDrrTO08PsyXMTyMpu0h3lYv+vTH4+1z7ZAEacm1zasX3aa +RqFEBcenxSNHF/sWqLO/z2GN5aTOx/K+1uPQx3dGfmBnDfKMcvuWYE2BFw4F +RXkjJNR0MKez4F0eqntr9MMe+6VLQ38TnysZzj5nZ3vP2wxJ6w0fl+G81L0x +Tanohi6E2TzpV4oNAHqF7cbE3OyZ5t95y5e/8xbQ/jdvya4/T/bzJUPU0bIn +Jr1N0JVYHJaB9RQe6vfWdY4A4XUKnmF8SaDsrP1GFte1c7O216qaSKib2/vm +bqECZCWo/WsW22PEzC5/+t0gGq+sTA93qEEGTPztpZjv6foMuH19PYgeWAhz +D1+qgdC3WQYULF/cSftH9SoJOXLWLJSalkCkgIfeGayH62T/gW+NJHTV0tc/ +RbQA8urOfXiN5cMrskEBHkHw48zHcO3BRLh5ql0wD9szrPV3jrfOY22Oh6b+ +zfFExP/a775+zX70P/s3xjG/uYrXy3Ar5VpzdxM6djMmKxev943mdDMvzudO +k+TgAdMydPlCHF8vrgtZ7kkb5dsygbz+6E+bSh8k+DrUgpg3Gr3/W09nE9bq +Kere97eeGh2JdM3EeYC7zhA0HtQj1Y3ON4rxPh0//Hd+pda3Nr9Cn979nV/p +rj8+VGPgDD6tamymDzzROeOEJeI9qKE7bNXmz8fA4ZCDvlI4QucVGc5+wPr3 +PXOUrfMYRhuLd33NcbuFHGLEhKe3YX7oHNpb1JUEeh5THtGUeKBTVqxkI/73 +cemv/J3LmhzR/5M/iWJ6JFLrDOpSqTdVUjxgZ9lVmzF8X8rtrPx6pnGYnF4s +vr69CnZxNcRG4/gMfZT18zbOw3K+z2kPpNTiPn3rz0t4H/XaJqWLSZPQnM7O +IK7Qm/AfXdzWD5JUOHxkqFJbjIRYlyVL9lJugubcfjUNKZz3pq9o/hDpRYqW +DcUTDREoYcdowQcvKkiNGyS64L77fm+R2i59B0h0duKJFKFCKIdbnqTuOOwS +/KIVbeKNKh6xd68GUkDM9IDteksch3UcfI+Vo9GzokS2j4epMFu4PmrKmIQe +3VERiPkdjlQzJpeycD1SEphrfmZPBiYd2/5y8yZUNp3Bsh/XZdZ/ejL/6oHn +//S4sfztay7vWOtrQOFfXxP6cB299VEynIpqZC542gJpNgEDORgfOcfGUmaM +2+3qiDn9iTrYTt3yI/wK5oeatKy3kDksepAEwojvr5uun3mN89udetu37m0D +8OGx+fGzoqVoRlXGyxKokC54X7FOqRolbr7PytpUikp3cPgyPcN++TqaI1na +gMyVzqsxCzShyYBzczx1VCh/1jZKJ9KItOVPMGxwKkWylrWuSSNUePpn0PMC +1i//y2Hn3iOl8KHi1VlTrP+de0u79L5GtPqqX8nKthS0KnVH8vH1BuyJ1juw +fsddwxdD+ZtgUvEepyDWH2dz8ima60R7nY489zTPBk+vOiGpZCokcZ67O7Zp +HIJmy2w1xuvQ+SyV4ES83tMaf9cb+3e96H/rPcNWYtFQi/lz4mRgSVQduhc7 +Do8w/n2ecp1VjWTI0s1+WihRj+Ta9+8ww3hu2EvW33aMDFfLEqtM51rQ4zrn +eHssv2Iy/Hu/Fa5TRYGSOkMVyNR6+91ivI923oyVUHV5CDWdlNTR1Dz45Cw/ +u4+HAp/os4+GXekD5RnDDu2CXiRVs3fbgykK2NYsNrNa9YFXd9+HwrA+GP6v +8TDrCAV8v1kNR1x4CE/o2ybPbMtDvzLfJfcIUOBS44yBlp4zFC5p33jQ6QmU +pdIFYp/q2v3Nz5Vya/kZJv7lZ2WyIDuyGIeLUaafNm6tAYay2T4lXI945Vel +mF8NIq7pJY4MrRrYsk75vjK23/YKi7d7OQn995+pJC/LXUiTGelaxnp06rmj +Hvh5wUDA2TnHRy4oIM+igPieIsSZhttZ0xuyF07vfJzqgvIX/rtH5Pkb8XK7 +f3UNIqW9Ed4d2rVglELXZo7z7ctU1uE2bW/QXW7bNp/jApQp8xji+raGwBSa +acxbPHM3/6FrgH0t7/+UuGA+75co8HGODAH6zKOspHrIKXLpGsR5TFHQ9d6v +d8MowO8W7WSuJ5TsVBs12kyFhO0O1YT9+ReLwvhY7qLq68HthP13haxv96eQ +4QxPSoF6cgPqyXA0pGA/xrEX2txPICEHe9v2i1rx6NnV3ssemB+q0dV28LXg +/j39TUWXZy7SZqw6ew3zmQXmsvQHRST0m/u0x4uKHPS6i8uBFucHmiVW1a1+ +JCSW8PVaPuUObGa5Sy0XpwLdkMaAJ65TC7da57IDs9Fd9L6oCvPtvRUkkaOY +h5sPftu380kCbNL0inlLvGcYssc4EMd51nk4qmqVjfQl3pYScc4ddfi9ZR62 +J7j8bOdqAQp6NTQbi/usli9hPbu1yTA2fSK6OqgZGZcFJ70m3su9X7ZJlExC +AQ1luREMGTAr+czpJL7vzcxsLVerDAguTHll8CgUpr50HSXmMEK/Y57HRmaC +yhGTx2bHQoDb7db5zz+pwK57U0exPhOM4nqvz1wKAs3f96k/sbzkdNZ8E9jA +i9Dc5wcGfZCMft834py0sujPYrejraDeuIabe7cfOht9uJ/gaUdPlqb+V0BC +AncULD775QN/qO7ydYynnh+jL72eNLhOL9gzm95CSf4zWQQPZGlC5tXOZNj4 +5dvEOVwfTaovfeHG/lIX+Ov3k3fW/I6a//ndr19TkQ3jcD+C51pCTjPoPT+u +5Ydx+FAtUnQF66G8vHeuuLsJ5E/JiO7HepYHctffEO5FG7bkPY292IsaF3km +ni7i6xtGq5ZxP5t5XMk+Z0864mxPGzbEflESeSxvj/HXtuR82maQiXQbL0/n +4n6B15h0rziThIbvMO37mJuPkszmE7rxuupf7G5L1rKHlT8h69wbvdH2gaW9 +xD6dm3B98wbz5NzbMVXDjTlIXSvrkD72i43GscjFNBIq5PC7TXcmG634ztIF +Yv0PN4iUeuqMooy2wTPDHg+Q/c+p3VdzcB+37+bVkCgcP9km6qxtKajPY0lu +9CDmveFcq7sqsT3tHxh9TbLgjuOVmEIcn8L/+oXrf/sFGPrXL3Tsa/UechmF +8t69dFMJFPC5fmtg6kwH+vDG8lL19nFw7JL8xGFbhrYOvyVvxX3cz4SqSwrX +SahjfpLfUTICBnVpbyfjOP84tqV94ug4vE1J5DDKqUVcKaFFUrYU0PjFdmfL +ySTw13jCr/yJip6enHLr2VQCosmSJAm+cYDhrdFc1RVIVYClkzg/f+mf/uXF +Nf2I9E8/p4fEsb1cJJQTxVBwRywS+X1k0NCRxvkW6g9sdHMDsVxGqxPB8VC8 +b1/EaZznfwqcnDbFfKLa7uL0JoN4uL840aGA5dmRH8OLPkyCtMvbaz+dA5EO +KlCmKV+CcMv3En0dZKjbNC/boFQPXCFmSpmYj6Wn3TSq0yYhXoUDul1TEehn +hrcUpwTuUyROmd93IKE7uvsntyfEIn+njkOsuF7zqwDzTBIJlVQ07jrKkwSX +1CxZp7Bf+KW1sj8fGAfE+ZC2aboWpK7WV3+wo0B5yj1FZR+8rp5gm/BXGejW +wfnFfTj/6Dfyo4/2JKT44N7yU+9oqBsZSbXF+kt1xUUiq0jo0qWT4kJRmVDI +6brajf3LrPqSoSd7EKV3fLZT1PcEcze2xu7jON/mv1DZGygNb71SE7qNb4Hb +YkbV2nPklhPnfgQOoQfCAW+fC6fB2YWGXFcenE9408bGAoaQUlp8qN6DFES+ +Pn2RiuUs3nSPwkzGIcx3azcvfS3EzukW+FhRwNjOq4zbehCdnmjzI9u5oQ+r +6tX0p6gQ06qV1pwwiIw4Nr7fe88H5sEwWQ/X/YClUzSZJ0jo0NHLV3gZfYDn +5F6VIczTdLhaLY12O0LYz6EPFlZx6PRF5UQf7C9Ztj3lkXsdYV3E9Svc1nFQ +mbjsSsgf3TSXZdy1ACZvQ/yfPnJCuRk+N5xoXkD3ZDqayRlE5VSf02d/u8AW +7YmrDzAO+Wd67t29mgoXDgtWxg7Fovdz9yWf4zxWrMq/vv/cMGpyDXOSZAgH +8YJYA0N2KvQk0lTLRAfBERWlcx/eJiL+9PzX6Zi3f77rdUD5tQfE5tf0uvS4 +ofw5yWSiDl50bf3mt88DPrVxzuqpuCMfbbpzRN7z8eKs34r7o4Iyp9SfbM1I +uOF13jSOq0gPIZFZfN+3UYnqbEPh6NgP0c2a+L7bGD0V3cuGUHmP2iPS7gTY ++USqkQH3p7WvtAZPwTg0vTKlKhXWohmFLrEuzHtfpMm8/K+UhIp2Z9o+sSgA +SfbuoDvE991qcTw/XYbQMerlzesH09DHa5euEu978OYvTPG5DqFm94O08q/T +0dEdkW8I/4Y+Fj+iazuEAiftYpzE0tDPImfjSXw9HFTZOnzrIbgHdFwdTM6B +IDf7MwG7KPCuLjV16tkgmnjZ6N0ffh0y97/VZZenwq5Tc/ubDMYhPfhU8fCy +LfBa5bBEYp784OjxhvlmMjiHXs04tbUOeOLuNSn4U4Dz+eDZTZrjkLh7hO3j +ZlsY/VRsyhZEAXcHjae3jo/Dib51uimTtrj+PGGfDKHAudXC8P94x6G44NxM +wbQtRDQc4fcLx/zfaYzh1RvMH+hUyZMaNsB0MItkFksBKeqf8ivGZBCrrTu2 ++aQ29GQlnfQtpMBxtytsLBoklGiSWBWTYoBWlx+9OYTj0EnjdfCtHBKabR95 +/1vZGFWey5V1EKPCuuPcU2GTJEQt/t59hdEEedKrb9LEdWFJUWsX1yrm+U65 +OkULxkh612tPPuI7u9uvS4j1/pSZtMXrRU8f8rUS6/1kL8L/XjsZZD15Xo+3 +ngOz9/nzxDnAv2b0jBekbcB0Lpy1JCgGOPWVPxDnvMWF7biph/mG4Tvag6a3 +88DLPg7e4/qSedOV1RTzlj1tibmINQmK85h4aHDeUPSnIuN7ZDjN7NASMFOH +rl5TbF0m/ruh9J7eKJWE+N6s6kZsTgYnv6bomzgvxeZpcYkv1KJ1JkJzfrk9 +4LxeN5HFkgqSK4vM20vMoJj9TEB0uB+qP8GrQDzXkF7ed8aeLxMWh7heFrqH +oVPzHTyzeB/ZCQstV0hhnpYtrs+2vhXYLvPveIvr7BaHgwbz9LZwRya+YLjL +G+/z4ZkRrId7peRj4ioZXKpTFPxF6mEpTbVq1JEC4H99dbImHY6YM75v54hC +oYUDex9h/Wqxcx5Sx9LArzPzD7XKArxM2pzYiOfFT3tkRw5kQuxdawGPc86g +XHDK2gzzGbuk6sQb9tpgLSK0b5EmCvbcFdxM/J+CVfLs66Fz46BJlhKp46lF +B95wT97GfNhs8fnPUrFxUNBYvcL6Xx1iH3lSz47z80u65myUkQoSyR01qpcs +UL9lmwhxjrFA4/hi+Ig9oN2BoSrRseDe+l0pDfvLkqdMTGvZHb5a8f2YvegG +n02uiRK8yK5/23RFvyg6VDqZt+FZELjt7XhPnB+1aHXhmWAsCX3Wm9Xz6CmC ++WQdSR/MV3nH2fdJq0fDLVW5Qzq5SWgp6ExvL3EOf92DDymcKfB2YxAnVfk8 +qOk/TgzD9qTcrPTtO5QK0TIeIb+rTaGl3VdGgzj/0FSK3TsyHaK+CPU+SbkM +c/lX4gg90xvn6nZMZ4BkRZIadS4c9ul0tzzFOG9dvHbbcQ7z/8fFIr1zucjJ +q93giSAVjlNr/NOmSEjELi1LxTAP2Que4DqM7fQ2cVfjP0QG01HuLeGKraid +PzVwJ+ZdmnuS1/ikVNU6Ocwn0bq62DU++dZunvcZfyb0fmcbKXnvjFLHA/3M +sT0b+PbPEvbv2jqQs1RtiiDebs1+KzPeIeFv9sA1hPSV2OPQ1vDRK8T5rooF +z2fXV5pAjgO9iMBLP1Sz07yZOEfxRzS1fVf3GPSlx7xf3NWOjJiGuBixPcsz +RWvyLeu4f2A5KA9eWJOj5yUiCZq47+PZu1NSoAWWaQ/qiBPncGrcY3GXH0Is +Qeu0/1zNglb9yJVQ4vw30UPlqqrjUHdkg8cT/VoYldTeRovzcLjgajZr3gRs +c1bvjOsphPv3qnV2nMR6cg78x2D9BB6cUr09kl8Ah7r889L2LIF8MPsx4Qtk +xMybJvF1tAqoKS36qsR7Vi7NU5zRYyjvlY2o5bZ8cFG0fPq5jQIFwpfBbGkU +ffXJFvczSAKenXXVLE8oIP1Ohj5mdBzYrRzfPvpegQ6cYZIvNaLAiv5m3fJR +RVjkp9LtOHsbXX+Y9HIf8XzKa+HawPsxmOyzPP3saRuK7+1kFcE4WI+gkJGy +MZgIVrGeDWtHEpwCvl+I85yLqMXkSyTksVNTi7+3HDL2CS3fI77Trz9Uvqp0 +HH5p28XWNwQi+7j7b5qw/nZJNVUOaTJwy1wJ6R9ugcr2RussrP/VzsdKiSY4 +Ti799Deraoav+1/yVWC+d+2YdzuvWCxsXPdcPlwpCex3Zp1OwvHwqfLMfuvR +/aBzIOrQyYxI4OBV0TyJ9TMNH2jfh/v3F6NkcQeWRhhKCBS94k4BbZeNR1Tz +yeDTxBisHdaI1HiLDI09KPC6Zq8lcd8H4nln8H2RdpMyN3FfhagvHnSDCugC +dbIjoeYmGo79weuG9ff+ST6csDoO4clfv2/vKIeto1edI/UocPbU+0+Cb4ZQ +zd70zS63YmHT4S4DKhfm2zflbKMx/voeizD5vQJK+b20CfxnSaXRxD5lyzu0 +bkH5PJrpWVjbp6UTOcdIw4MojNlK7mh/DUrhDBE6huNKhOfnL/L3MWg/n5js +r9YGhWYPfwLG7eTYE8WMKDJ8dAjloClsQEHjReVncT4PodEfZRXD+5F9k4AF +pRJ1diO163upcM2sfS3Pl7/R0IzcnIw4hiPX8rzhkxQTQk+FfaoC1gPd2YbF +hJ67H/mMyJfI8DhtD13BeBMIXGWrbfb9P/GG/hdvtWZh/e/jcR+RVNmy+0QD +FH6yCG3BeuobRznyzB9DDcMrz80zPcjN1Sk/hn4JjINFuM18yfDs5pydZUkj +fMqrE9fC1987R7uyUHIDuBNZJr9fTILN59qYbDE+ruXXSoh4GwvyzePrLUdC +At1r8Zb5znp/iI8rNGhdVupvdEcchyImiDqyfNDN6MVtVxh+uWmXTZY7MI/S +vCHkpaIP1/z7WV5vJaXmJuS09q35d472pfg3op6KJ6oV/syFeEd6Lnncf1nw +3RNRwH2TazHLQPPGbAjd/rvXC9fx9XI5zwYtRqFteUWTY+w6GmnTN8yhUMDg +UHal8xEyHGGuPblpVgGyj3gk3i/H+aR24EXogQEkX3+t+KLuBdR8dNuhx+ep +kEF6IyuYMoiKyR5XtVzOgoKjUYYm5sOB7do04vIkdPrQTeYWYX2QbdcpOylF +Ba1Hlg8P0uI+KEnC1dfEF4R7HzoayuI+GnlE/sB13+0GNIkqGwK/6Qlfdtwf +9S4/iO4dISFJcXrOdYJG8KryqmQn5ifZlNGHCSuYn3RepXPcaQTas69oPfC6 +XvUd01ivPw6bNW/cvhJ4GfV6HTYdwzytcYDNk1Z9HKof5JYIe9uijGitTc8x +H1On7M4yksL7Yqv1idYddqj75Dd63lAKPF5kCN7FOg4ZPD+/xkTbovOfFR6N +RFKgboPXXedeMlgrlgis0Fihe7yvqeZJFOBtIM8Jro6Bevj18Ai1I3Do4R3x +tjoKSMoyaWdfeQwDe17odRf0wbHP4dwFS4vwJc656cJAL6r1ohHnD/eB1fQk +J04XKvTXvRcd4CchqVfOUZWBwSgw8U+2BO4H+aLOhz5bIQPHpo38H9ZXIkkp +7W17cJ9bYPwxj8gbh4wH7HHeQBKbucWIvGH6MmzVFMfnaJPIaRyf6LDQOWki +PisieU4I4Lz0w/yLRKhSEgppL1vLS4/dH9pJxmJezplaslU8EY6fVvpzEstX +dXWLJHG93mpmQtRraL0YsFavo0+91SDyUg9P/jWcl+DjUSc9Ii9trRQ3sL1C +Qjrlg0mHacvhjuZDs0Uc50PCn/bw8B2DkM9BM2rNgVDxyf4RkVfFf/55QvCH +25Gc3zc+C0JNPGVr/KH+y+sBIVx/DZXo2q8otuL10MsR9bdliSfgMeZRpwfZ +SF0cUcCU6bLGo4xmq7JkxUk4/7xMK3xZCdU1JdsjcN4w5jGuniLOI4p6wkW5 +lQsVJzbS/8Q88+qTLjrS1SG0ebnK+cCpNHjwX0P6Hdwv/PL345JuJ6GzDlU9 +g/P5aG+CyN4SzAdmw3wdiPpSsPnzy9mnbRDzTGAHUV+ek1YYhvSHkLyhv6Hr +9ky4svIiV5CPChUcAsxC40NIkVO+5fmGeLQ+p//pm124vihYhgdtGofdvqkh +hx7VoYK9bDmpVyiw99OKfpeIPbTffeeeLh2LGr3LYoowH8hyUUnywHzvWNEe +m3c0UYht/sIa3+ucHenRkCND34PLH9rnWtB+6XOiE7iubdYfM/UzdQGN4IL4 +DQLxIOnqp6pH/N+hPqTWtSoT3uruCq7oDAQ7riKHTdiPpRWfP/m/JsP95aGQ +06ge9POf3XnqTIEFWlIu4w97eP1aqesRexxcSMvVJfjJJ5nnv/PYx2H82E7t +e6l1KPHlMl+oA66nxx/P3xi1h43Mo5u4omPRC6+GMwRvZKJXb+wFMkT7rG4P +r2tBfZx5s/ewna49rVmKT8egszq5ps8Kgaucz07iPT2N5d85os6ZwKUwGF0q +7go9pcczzmA7Ld7YrgwpkoHlbKXMlZst4ERev+qI9TAzOzqcx/s9w19Z9MRo +DbrpdLt8A+a9cdNyHZeuj8Nspv7R76bVSHn2nAzbJVwXwvz7zXkNYWG4n6LB +GY2mo82p34n38WijVuXHSUj4ws11ZeV5aLF10wsj7Pe0W3TzvIMp0PmhMyDc +Jw6Y1nuILOB4u/7fju5vjmTQYBuW6NvfDC/DZFSYcP29Z5/sqOOvAcniUcUn +ea/BorJqaAcxl7h+TU1Qi4SkP225++VKBcwkd20+iPeFbvA+yGEwh9nsR1XS +m/yAPu1hO8GrI7Y0yB5IJMMxncdp3cuNoGTdlnvQE+MmkJXr6k+G5+riFsWt +TUCR33HVA/fdFxsZB2+X3ALLO4+TPtQnQZTNCwbi/WG+U94Cp9YNIYehFwUV +eTkw2Hli1zS+b2RT9uZqAUvYICxBc/BFNHJZf0d7BuOg77abu7wJ520ObZko +yQJ0bftG+4cYBz1hUijB54V5VL649xShjD/1cgSfb7gT8rP6xyC6pL8nwCOp +GjpkThQ34bp/WdZxJnJkELnDtmTUWQMPKVFWJ7DcSyhW1vT1IDp7Nerl6sEa +2KW+d78/lj9ZZu0XbkwDjU3LUWLrY4BHPaZ8BuPcN7G16PFVEtpy9Dcfi3Qp +ZCZEL0Zg3u7JwfczbiUIfCcs2FK+JkL/7fEi4lzZvW1NNcS8/Trlydc/dA3I +ZonzOzFvP7D8Odnb1R88JX2svv1JQAby/xm9w9fThByN22weDsPRLV3j1UnI +MahP7sDq//E7+p/fVzQN7KRwnryoGTG5TTwRpcY3/ybyZFI+8je+TIZvZrSG +UibN6C2U7tYj5n7Pqngc8b67e+GtblVnIPr4tuoKse++z7R/JHiR8mGWVMyL +UEyc1irBi3afHs56wk8GeYdFTaGsVhS87YaCL5Ybb8rlt8I43/6vpJY1rRo9 +OvTGqo54745FN5jA01KH/jnGE7mJMwgQeOYhAyURBjIsFDGIllffhyMa2dbE +87X9lYbdIxHGUCbUIZ/wyQ8sWYI7iP7iEvPTooQTJKSY1GmralAJCV47o0dx +/hRrY9WNfkGGsZ+TV689q0dhm8f6dmA8G97cqvDCfYS54Kn2Tdey0EPZ9W1E +HzHLv2vhY3EmlKs8Cz95Kgit7i/lpcHrfdPB+0Yk2xnat8alOS55oOxNR8uI +96jN/O6frx4aA7LBNN23BYRSmJcvbMV2Zmxx+PjAcgi9Jh1t2tOUgbac/OSY +xEuFC/Zsas8Nh5HcRb63snph0EI7bV24nQr7Ns4xTjA+BPuxJtsv4gVwVDJk +N484BeQ9Ddf8ay/P8ZFcnQQrwdQ1/3Iwlr8g5ksTdOfPT1sUoNhLB9bmS+8W +D2ae3EuGVzMPX+intsJFjrhVf2yPgvD+awqCyRAeq15aciMe2o+b22zD66pO +ik2SsE2CrWMDW4fOJCDmTIM/27E8d9059SUWMkiIhEXbWN5HJhuD184BZtog +E7ZVZRh9UrlQl2UQAR+v7TjTwU6F/RJSqUSfJWZxpAv3WShrYkqX6LOC/utY +/BJGhs1sOwMsDJvgyfOdkg9xHgj7cXYpDJFBaflTdGh+LUg9cfre4E+BTlEP +vQDcH/0x93PedvY2fNUeXuuPtnayyBJ1refNrW5c18Ay0ouPqGsal59n9IqM +QL6ddxE59Rb64KWtemcjFTY+4jSrujmATLgsOY0fnEaem5z2cWlQQSeYLNL6 +fhCZml+YGT/oBRLl7wQK5ahwsYdlB8f9QSSSurHOrF0L7pTovzt/jAqHn/p4 +b9cgoXkF92snhwxgoXflDjGPKu6so43MIaFB/RihTR5G0CGWFkjMo3LvN+uF +T5KQ6Ry/5wteY1Cb2StPzKOC/mMipZ0dB9HT07RsonbIycxzuyfxXaqXx6dc +uXGIpZQsbnxvhyh0WQzuNyjgP8CZS7NzHIoKZ1t+lNuh9vtTZ+Ii8H6UiqP7 +9ZgMuYZxogvcNuhVe3V7Oe5PK5dcdRgw75Wj1eqc2amADPeRP5Iw7xXaJj4r +UdeDYi/G8nF8CwJvHa4rNQG4DgrTBVvxkdAp5W1JDSI30PLXcB1pzNMULslt +/4nX+7a//6uVxB2kxFN8Xl4C83wjtbW5lvN5Slo7axI6Nfacm5hr1bYe9FnZ +MA7uVNvdYx1lqFBo+xAj5qupBwJGCb8/26JSjf2OpOPrZQi/R05Ek0PvYV73 +5fvl4ft1cGlsjl2J+M5CccNq0K4hJPN+eqEQZYMx/THWMbx/DegfpNpwk9Bx +937uFwo3YFuRlrU5tvPot8714yEkxELJ28UWXoK6TS9d68d5dZQaejDDh4SK +ZUSahbpLUXO0FOtFLD/7K8OOiOcP1ty3cDwD39kP99biuS9wmuAhMiLXuzEP +AQaFif0ED3lSGxDb6usAL86icQNGb7A85ilB9C8KbluDCP5zhnngAeY/EFQX +vsZ/esYZKwNSTED1E7d/9PlokJYOnSe+n731xXdzPa5TffOHiToF89mRa3VK +c25lbW6zQ06UX8UwD1TDwtfmNiJCI/1auL7LXioa0eTEerz3rdX3b5SXTKWz +JPgp4nVh6kc8KtpwSpQ4n1P5TIkvMScMSC6+65fbg57q704m5oS7Y16u7z3T +DWf1XOzusd4FzaLXz5hDqWDXvDmRC+uhCJ46zrMlAfYrC2wRwXouBqxOfY5r +R98+96mU+qdBqovo1Q2NVDg2KxOYOV2Ouo+GzvmGFwHfw2i5nLeY9/bWjIfK +dqM8Pp27sdYRICrlxvbmNhXub3pk1feLDPrnu+ncDtYj4WR6pbeOFNhzdbaC +wGd9X/qbmPPRqGhabw0fBq6hkT4JMtRdM1g6srMVxbbu2/IK4290e/tXAcw3 +vr8w08d8A1G+zrISfINt7Budjm86tLbs1+adskHW675+HcT5ah+XurRn+yB6 +MuqcY763Fg0VcTHy4Hx+fevBdzMZD4Hl62XLt0s50Hdph9RRTgqcvi4uY6be +DZ/T3kP7nwL0u+rjSRECn0/mNMHZuUhLNlC0r7YWic+rLjY8wzzn6nBbjXUz +xJhFOW2hb0RJB5gNv1ZQgTKmufrDZwLGZeee6emPQpQ3+QTH4SU48Hjj9Mnt +D2Ezo61q7X8F6NWVoC7HQxSgeZPJWXnrCpw2Lb1Wo+oFpcofPIg6Enil73tM +PwllDfWu15HKh1ix/UbxOB7uS23X444aB92NVjWV76tA7Xhz6ooF3td7umsI +frhOuTXoP7NqEFLp4yX44clfwVkvRzyh79A64WvnXeFw1LmrxPOO2OCwN/Ul +JMS0gT1BTvcu7gP3ib7F+k12HC8z/cKL3uRzsLMeiUCcYdUm2vh6pWzb08R3 +B2ByRHnrWAF6endshfh/VrK0dh7B3340IFrM35BO4clrBH+708W8NjfItJOw ++34xCa0/QF6bG1AUWPWUvb3BfSVi3MPGBdX0f8sn3ivot5LTEnuG8+2qa0CC +YQ3yrvYytsb+MhX8JkbUfc7hYXdc99Emt3uXibq/3MjHdqJtELH82DX8n0Qt +xB5oY96Br+eh8Z0uqMD8bVts/aWoWqDv2tqxgvsXlgVK4/MYLzh6QvCy8RMX +WLlzx5B4HqSR7hzpQSaDi19E+1PFBji0D7HIuFJALuaG4+tXZDgvUnc9ZrAe +ntZu+f4V9xGheevU08tH0GSd7APOc+fRLv7R60K0OA8o6l9IGh9GUZaJb7xC +/CE5/2F+OTMVEoquWAT2PYINrh/L7FYTkUKjuzr/6yVg2AtP6GAcBro5dsiU +4f1qsjeq/TLu3/ultCpCyMCU1jd8nrcR6TGjTC/c54Y/e7kkVkxC68T3pfl8 +y0GtbbnXxoSp8GU9Xa6XNxke1QdsyptpBMqnlMLPGJ8TU6tpmafGQWi+NdEp +uhZuKsSs88X6Fd/SrsXz7dcT9jieIeB2wQIRzxrjmsHTBSR0zfvL1uWuLBT3 +pSV8rygVXjoNnhPH+5rFMelNs1cEalLs73mH9/X86RT9gwntKAd3TqFJaaiP +acn+awMVDly0fdeQR0LMTMtLMgYFKKTrgQ8N7k+PBSkF1x8jg4GtBnPijRY0 +TqF7Spz3e9GwJJ50mgxOW4+wrDvZgtSsZ9masDyx68dCyjkyGKtw2Kg2NaNb +H/UTJ7DcpeJBnmo5CT16qPc6Iz4TzIVjNP/Ddiqx7qs60zCIjp1mX6Qxq0XN +PYyu9Dge7o6T2svWjSJd1+PezEau0DRhHOj8kwK3ImjX/Dj/Keg677nzwMUy +subH/rA79x41Z4Ket8IBu/zrYHYzJYMW55OC1uJQzRVv4K1tKVQISgBtVamL +jDhfndDSELR9ZQXmhep7xkx80bMnHJuJfidpjn8NByobq4WsQQFQxD3XcNgc +sdwtWyQIJXQP9waGRSJJnofOp4j4D1exu36RDLvJ3S+yZZrR56ahMSper+Ov +L3HT+0ZQZX990y93R0R3cVXiOgOuX2xWMa1FJFT5guF7gmYOGtRUkJHGefvC +969reI5eOf6O9iSuXydNthN49op1bCQbkqH+0t6gJNzf7bVGZOL/Xythn19u +tyPDS13OrY2+TbBDIaZ4J443DxqlDS+nR5DawtMj52gGEYMVRzCOLtDgcCj5 +g3nOl/evhlIyMtDLp1krcxj/2U9Za8+/rpZskTS5nYcedwmdIJ5/XZl5IcKB +5fY7arW2NOWhZabdRmQsP1LBaPCe3hZsph3fTnV5o5RdRWvPm8xu0oa1+jnA +5BfQt9nsjcqUrYQJ+eFbESpzgTbQFWjbvqzug8TdvEwJ+dccmiyRdBJCz7cu +d+wuhEJB31BRzHv9fn6jp+B8teHUFRF6hhz06RxZcxLvl7O8743bjciIFGh8 +IruvCv0acqhYjKUASyn3z5gCMnrsuiCrldaC0PDJoVw7CmTvnz6fHkhC7GcE +LbfbJaDYozQzfpjX+cxRrG9VktAFdhMns+g81KLeFemE1/Vz9JfZb3zfDspy +TUhCLjJ8V0v6hOVfxayNOlJI6PJDecq7sVRUWyrz9g/mgZ/+U089Gk1C+qiy +SsY+GVFiecYZMI8a8npSuiJLQkeZVfLEXEJBuo0pZwLzzAbmoDul8iRkQV8c +zTdxHXW9PZ6+gOWTAV1S+oV4vUwqFvYB2TDkoiXRhuPBY52ayW1TF6DjLYhj +EohHKy0WKsT8hIGJWkjMz2fJL4Ctoxy5DD81IebnqgZF06oVuK+/m4wmbLLQ +8RFXwyqsp235z2XB12RgoZHLqp6oAk7GiqB1Vymwa58cz82NT4Alnuv298Pp +yOT2cbtjMktgKObYIqdHQs8+BltJz4TD5oCW97SYNzJeZiBLT5BhZOBgJbNA +DZq9vI7NJYACVbvSzgaWPoSsuoprL0JykIOyZdCGHRSwMOeRVuKZhKhNBbfi +jOMgaWrbm3cTS0CauuZLzA+tT/0m5ofAP7FvOzE/9P/trtaC+eeJqp1lPmNl +8E633WAD5p/Lp6m0cZ/IwKxsJHLQqxKVDP6ZnMT2j1WfTeXD/NC5ITlo/kQ8 +sOdFtOwUp8KvbsevMYm47ril8ansa0CtMZHJnXhfMO/QvJN2nIRmZ9t841Yj +oKmsYlwP4/9fFnOnnxEJkdJvLLwsuYF0Iq+Vvz1CBYfanuOE3/eHV1Gx36Fi +z8I7wu8RqbE1zUueMNrZqfr0UAJ0Jood2UOc86aiZsH4jQwBdsLNoYyVIH4X +OjfjdcUozU72eJBQgYHcTzhUhsQG188dxjzW7uRzc7etJGQdpXJXzz8YLTS/ +/3xUhvr/44/+h/+WZjEzapk7MPKjlmMD8TAxsn2dJL5v4UmzHcw8niDVPxYj +j3kgy+nDU8R5/h/duIQJ/FeVotbHG8ehrv2h7wj833H+btcvJsPRjTLOrlvq +oTqTMUwQ8/b2YE2jcVESuklb6hqYfhMFRR8dDZGigiVVsPwR/zj0f/FUTlGt +g4PptFv07Skg/o5G/PrucdiXZGTUdqUO3d711mkZy39kLO24dImEWoSeLon5 +xKBYHZvJ2sMYt+vF/sR+OZhMV4P3CxyIJU8Q+6W3SMHmNV6XMLVNkWYgHnnn +iTAR6/oW5l/nyzwBf55voQv+U4bYPXV4r+pQ4PkRVzoa7nEo3rYu5dPlOkh2 +se/vwPdtCP1ymagviR2mX9PiM5HZegdtor50P97EQdhTwWXw+ZBPDIjcDluz +Rzp/bw5RNyX82Xd86MqCbWqKYUTdrKWf/yxiOYj0mz59no81Q4N5ZmMKp6hg +PynEd8CUhHztjv0MvGyAjD0k1aSxX+L985ozxUnoPzrfvK9C18Epb/Z3EMZN +cYJOuHvIAe43ChyQU49DDP/FoKvEOY2M1YLF9mSgL9BRe6TejD4K5ojs8KZA +28SvrX1Xh5DckZf1+afSUEq6ZxsxBxYegrvSbE5gdc92e3pDHBj8F8fpQPh9 +fWPxK8shxHypirmtMQMWEu6HJfBSYXmcPPHMcBgFBHn8ktYLQyUmXI7EXCKp +5U/6L71xoGNiQarjNRB/UeUykw0Fdj+sUa7BfGP4u7h/XHQt6tIINfTEfEOh +hNfTcHEQnW9aKTb4EQCvL8wOe+P+miFL9tQtQxJ6E7jh3JThRWQefnrGHuPA +MKXv92sW87qiHRbNGl5Q4fOqTEOeCnLRl+W24D5UYcM53ZwUA5Qee+gz0XfL +NdzVn5oZREvfE4uHQn1RWHNhnja+XqOXEpCF9cyYPvE4YFoDLTHrblphPqAY +HODVL0BCPctR/TkKVXBuebRJH/eVVqcuhdzxS4W9Fn3+1gGxyFeJO3zxJ+Yz +kUdspbWG0QXm1fcztuHgx8y/5wQ71r9L6t7S8SDQe7K8oXYqER2QuxCZi/nt +fZ9FqznMt4s8vY4EnndFV7hV1vh2YPZ+p0/Lg+jjM+fbu0quocYa8R18GAfW +B0zbeqQ84RuNOcNBJjdU6hDot/Y+ksOmWNsNHkC2ftX4mtkdraRXyhJzrcBx +NwMtnyGU9HnnSt1kGvK+6hPdjv0b7hdRf9h6CPEpn2sWT8iA29sv7fHDfhQd +dVqb677W2r+hb38z+nNucG2uW3X5xtq6TAot90zahqNNNF5r6/J+dHVjUnoc +vGlV/yHwxxcJi5j1axH96dmAV0rXE4HDn1foVIgLKtmjr/IRr3dLwDnpk45j +UNOhs6m14AFssqxR/4n175F5YtcsMgZWjR28Bg86QP5+OM8j3BfYmFekfZwa +BYuvCnfy1nXBy1059L6eFDCQmt1j7jYKix65RhaO3XBo1x9Leg/c90kOXLn6 +cgT2GBloLdD3gn4Ha0CBGwXYB6UlPycOQ7VcufnGsT7Yl7jntzvm7d18Vc+P +fiABy+fFbp7+Adjm/nkhwYUC9yWqv1g+GgAure9639+RgF5X7LQclrvORK4f +EesDG3veTXn8I9CsXnAxFcvHdbT+27PYBVIi1XJt5aPwcIXrdzvWL9Sa7enz +ux3cwNmNvmEMOCNnxBzdKTBIZ/FO+1Ej+It1+PEnk6FH8EKVPF6XrzC9ieI3 +nGczuIVes4aiMb8PZsMYN+U3Y8sxpqmwM8HokkFrIOLc7K5KfAdalfDgB4tM +JjzwQ3H6maaIcVthrR3mn/KnTaeTKWOwQ5t1lmW2DWQPyH1LxH3xzEDNhFjb +GATXq9G4u7VD8DaG4H0Y/1zFsckH18dAYdNNk5icB8B/7OgJXWwPa8TqmU1H +xkB29ln0GE0nLCY9jtXH9j/WESf7D4xCMGX/uHRiF1iirEZPvN7+k9tMumAU +aisDpxite2BJjoF/DPdB3QLzl0O3jICC8LepJY8+yFsovuDkRIEwTZfpPv4h +4LodZMzYOwA9H4s8s3G/v29m47G3GwagdgPNYzvzIXjBvyFbF/s3g9X6Kr9S +L0yM0bDEPB+BzwI17aNY/6GfTBYe/J3wCb1gszk0BgMD08zXsd+H6aSW5tVb +Qee/dcp3VMhg8lLFRBKvq8vqQkodXQKY6Ei1PuaMRXrVL51/Y9w2OkUe1jHP +goCON5nZM9EoMpPBlRHva/FfvNtVe/NhgpladkDLG037xZzn+k4Fx2eUzfR3 +h1DF0W1qq/ktMLW04ekXKgXcHoS1WO4hw6u7f4Lezt+HfcG02qb4vm8Kv7up +L4zh/v3md1nZdnD4+sEsyI0436bXaCULy0maYgGtD8A/YNcMDY4r7VdJ1GeS +YyBTW7Rn87VO2JQvy/0F4xN3SOjtt/xRiJAWfd4a3Q2o2HS224ECHWbB5xe1 +hkBm2r+//MkAvHpxW60H81IePf0LwowDkJP87k7a4yHoquGlX7hCAZ0kNk/f +zm7Y7Vq4csF2FMJ5f79Ix37U8Dmg4WDeDksboWdsEMdFZrhML7bfuNCkJscw +GpYkst5zqKUjV133J+MYH9lf5mFXurIhgaSQXrszF/Foc3/y/UqFFWX6jfu5 +q2D60JlImn2JaDFrr3zrAhWSq+ue1rKNIJR67JqBcCnc02eWpvymwI5kPj7j +jCEkup7368PiEqDc1l48g/PMrouFjGcwvzq6Mjp5iq8ZXv3nESaK7Qx7/ILp +w2UyCC9P/lT51ApWrz8LPcP4pEx3/wjbTYahXCUNu63twOzwk8EKr9dW8+x9 +1D4Gcu6znx5+eAB5Hx6InMf4sCteOyckMwr0GhBSW9ALnmm9LnUWFHjwuLdw +j8wQvDTaFGnNMgjTfzbWGdhSgHFznEQJtQ8u6jC5pAYMgw/tB2s/bA/NzO38 +rdqdUHRioH3x5yiwlVt1D+H99X18l0eNsgXwexupTRvnoiX+s+vqflDh4Vvt +imHdG/CIun6Hr1ol2lV859wnyv+j67rjqf6/f0S0iEohUmYqRaLpSNqFJlGS +rGQTQoTIyt5ly8jIJuvYe91rVEhDsu/Vh1JEv9f9/v+7f57H6/G6r/d5nfM8 +z+f7/RqE//vu3hB+IQuMK/wLokwb8LIHfS7Bmg4TfdT5ujQKehR90BCNeoXW +RnWceqU0mGEXcCgcb8erYd3tA8+c4DrT65Cf2+hwbCq3cG1fG+5v4rv8pDka +HA22bPYmukaGN0uibbkN5a76xnqaJsC66C/iewk/PKwrsTQYqQeiCyMmZWbB +cKLZJuwVY3/NZENK1+Wr+KnmsoXu+2AI8gZtxvdNQ5GJ4BtvqZBv3X53CwvC +7KjlWktNGnzrWIIMLirYjimxsz+vhfYYpSkHFRpwRV1++eRSFzi6Rh4yNGqE +tbOiBRTi57aVySKy5W3w69aapGMZLaR+2LCrMPL0pKlJ0rlGmMotSjrK3Qkc +O3e4/yb8v00p1OeCURAu6HJN9lDi0alNc1iP+PP9isdT/JsScIneuX59UxZG +u3MrBE7T4eOP3x1dkkVoKVBZ+li/BKfX75boKKODbfWK4CeHGvDkL67Wp7U5 +2Lfx9McaSzo8/9sktvisGe3Gf/RMrAjENg0HvduadEjeqv2ULbIFeZk5KbI9 +zyCCfyI+8yIdZKET2d0Jr7vJNuV2+AU0VoxYyhGeaXcpSSLBxRJMVqdxbbsV +DMtVf5DhN8W9J0J5Bh6AYYLeqLR7FBT91ftqRPB8RqlizIi7B2YaR7//4cyC +KgPPhcZrNGi66vBFRLwXYia+cn9cg/Dq0Kk1PrPTkEl379Z2o0BP3RraAaFa +WPqwNqaD8KuJVwqDBVu6wDJa8rXXlnr4pxWTv9aDBkN6Gv/eubfBcr/0A+2Y +ZvAbli7j8qLBSvZcc8vgOFTWpP0Z5ArBEcUM/jfEn6rmtZt/H8xE9YavQw+3 +x2Lj82dyTDN02GplKyWsU4Kfi5OmDh9KwrOXNvYt9NBhvRbTrOqWGly32O5o +Jh+Lhi95nXe9poPnMeGexLUNGMj/cSCEyRMH/ivo4vOgg/N5pVynmUa0Dbh0 +9pWmG0xnnioSMCd6vz/7gkVZMyoxX6jkXZkKW7Wo4ipqhFdrv5rPuuIGkkWN +wTbTXnD20b7CDYTnHDkQqvx8byg0l7GJZ9PCYTpDpoqxT1b2fOMW7ZEGSHUK +6L0+UQ/0L5/iGefwRxcoumFdF+TmpJkaPyyB7AyHxAWSR+KTFlrwkNRpO+48 +9w0l4C7T2x+TRIP52pqXJ6UIPnM67Xr6uxIu7KlEaijx8/SvocTMRuQbzuJV +f5qOOiLO/peMyDwupk+xVdZhmfnxa4N3X6PdP5vpXC/C0+zz524mEtjT7Ir9 +ZpOBSR8ef71eSPTj1ZC4J1/yUY7/q8XmpRTUzY/h+jNEeJTLiXtCJ1JwQstw +bkolFpmYC2+/nmPgw7tEcaUI5FRmLv6JwfhcKuWiO3le9x8xrL5h7rgkvVaD +X8wbg5w6F5mIfwSvyumXrKeC7GkT1xPf0tFYrXJRN40GI08uO1n3UeCUWEFx +SFQElp0+4y74ltRZf5ZsV5Yq0OmtKV0/Wg1DK3Y0WZjRYcPaWxK5WYmgPuGe +9d0wGYRW3YhjJ+P5e1O4zP5fBKi+smwQ3e4Hn/I7YIGMx/mnytDt6iBg+y2z ++FrTDvYr30xIJPF/POnZsPuzRlRYOWXH4liC5s+cF2VV6MDXNXXZqLEei3t1 +vzmnlOLkcMB6HS06rNWK1d6dj6h1YdlNSqIKj7kJu0w408Hq8aTzSak0lIqy +n6/oKMH9LSXflbpIHRdV2rdTPQxzXDhO9Uln4NcojE79j/AlpmteHfefYfYV +LabY2DhcZUR570/qV/RsJ/fmdxa4+TIOeNiFoVF2q94OMk4Jz00tRURvxri+ +vmF7JRf7d1fb3Ca4pL/JfLhpigqR2nurYpzfoEXqnjXGrjSIW72YMbwQgLN6 +Bl77FxNxZDbHSZvwBCt/zpIalgxcU6y4TvaBLxidtyz9MEv4w2BIpsyzW3ia +U9go8FAMrOnc1JRC/GZ642m+xVMPyAqW2f/zmj/wrvaWTyHjeW2m1mn+0wuS +WP5IfmhyBrXKTat2kfkN0EpW8/NoxA23LjhcpVbh4q2LXLJEV053bdyk+bEJ +d6odVm2QqsHdAxG7gJMOd6IeJasxdaB/w3+bg/3bsa/wWCBFntT35SY1M/5M +uCrjmdhyrgxHs3WYRuvocK751JOiEm8o+Wi44wclAzfzORxVJONPls64Fj9k +CQPCrsmtDxJQ4TxPwV7iz/hipy0qEkZwJfB2ZrxvJLLEPVdj7LNwNVrY5fyG +CtsD/nVQq0rxasIgqyThLS4eR3n9lJ7i7aTVlTybAlD4tOxwKnne/PhzN3Id +n+OLdPeCGx6XUJ+3gsq4f/n25YptSqZWWL9afOGzjDu8/RIR70/sY/sufre1 +soJuvUgh/Xg3uPrs41IIY//aULqlwNITuDmvktSvZw+bpSpSgol92ezTPjO+ +Rsw0/mJrjrVIm3G+VEx0q0Ncnv/cqRa8+PfGLeE9teiUHfxLcJYGwdkDQ4nr +u1CpZ1XbPqzCl9EGbeq5hM/nJU1eC4kBI28ux/7nCXhx+97k2nk6HNSRYfpm +4A+qAYmFsd4vMbhj4PQE8c8FSdtbkcLtOGEQsBhR9xqvKMgcNRCgQycrT9AS +Szt2h7z7rkVLR4vYd9Ij2+kwSXW40Dnchl93Bu0TyUzD6x0bP73fSQdWT867 +zKVtaNGfyslVlYrMzwt4FkVJ3VFZ2GTAZ4FZl4BPgPsBPniVrf6NPG/YyD9d +esVZtE3+YhabqgPms2Zci8QuZ1tSOrHfFORkvXcXOpiDgHj2gWFib/lx82ez +uCPk2vlGWheaQPrT6+z1xO53ZuR+O60eLVxyvm1Irse5vXMgQOLKTWXlkZjZ +JnzxwdRgYXUd3t5jua93keCnjX/xc+42LHt7cmziaTXyGrAKeYzTYO5H7poL +m9uRvnXajP14ARpxfvpiRPq55HRiMaKqDcczDWrbMA+bb3E85N5Kh++/ix5L +Rbeh4+k9Yafic5E5eGfiOOE5xt+40/LcGes8DX0/pObgQ9/FLepE5zL95Sz3 +tGzDeLlAAcf8NzgkuujISXT98lBvQJBBG7Jevj59zSgbO1Qelv0huj6v+vaf +6Q9qEMTmsJ1Gt8Cpia2/phj3hnAF9k836MITF5f4ozOX8Lzbi5g/jP1B+5bd +PnBawSlejbh/zpegLrayZoLYZyuP+zVzO0CEqeTHrr/qEGt+7WQ3Y52qwmCw +w506pDiscHjP2Yhmp8x+IXlelsnrZk3cjVhDG7l47Xw9Op4s0K1lJfr9chbl +ikUzVuvtVA0VqcVrDmynAghPZsvNEB5na8V6s68sf8qq8HOa78lL/2ggkFc+ +HPG2FWP2J0p176/A4zev9DWtooPYxLbTmaOt6E49Urq0uhQf9voJPyD/23V4 +5q0AvRUfZChZMHcUY5uKitBuwreVNbofH51txcrQantXQcKb/PkcJvjo4KNW +x5P2uxUTnjdw9dQUoOiqsQFNQTpk3Tj4Pme5FWUKefVpifm4h5lqzNh/JO17 +6nPWKjLvG1xbKnLzcFlh7HoHiduci8W1dsvmkCDOn31qnSVOOmq8+8g470t3 +bGvFHSuovH4wYwvoopN6SN4IsaeWUzb/zLMF40f2E88lzyKn7OLhT8TeHyd6 +z8rFEXI4JyssGthhm4lkBeN76APi3L91NfhQc6PkKukmzDPfVivJTfjMQ8H+ +xyfqcXvemI/v0wb8pjw0kLGODiv+n1/XGR2/Z/QmVNz09rBmcQ3+aOC+e3I1 +yQuedCbh2WbUpk69uv+tCudvCo7nk36S86TdYr1bMGJNA+7Nr8QySL4XyEWH +FMkd2r+/tKCIfVBelnw5Ohw5uPIo8bNV/4OFCf5WVFNZXqDKlyIwSxziIX7e +fvmIfMrpVhROT2dKDC7B7iPrfm4n+BD9JPzLolErDvxK/sclXYz68zeSHAg+ +vF0RFfDOsxW1LYcyo1cWYfhST4HiDjrQ9LYpUhJbMbI6qfXScgFSpHy3ehL/ +b5t0WmM/Yw/7spfW7lxtiPon63sZfvvA7zq6/NcBnD4YutE7NPFXoUoG47uJ +zdbkT6yVj6Hu9Ke1KU8u4qAn5+T/zv3QEaB9InqW805e6qHHCNzFnNxWdjS4 +sjVS/eFoOyqdHZBT9c+F48ozTrbEb7te5lLab1BhMk+rKkCwHBqjPgi+taFB +Qyjr2BWpdjwkHFT9beUr6Hr/Z2YfGX9qw7vm3alUOD5qa/hlpBT6nA6I0ki9 +OJMu0S5ZaIxnbzxhVrz1HNb/entd4B/j3p/NqUVjHRhS/lm87mQ85ED9HVXy +v4e2Kw4VTJgA05+T+l0GzwGp9A4+xj4dVE5q2+MBPSYpH+7LJELpffXvuoT3 +fqLsrlaK6gNtg28mxWov8PG0gtD+6Wlw/Xhq4VXYQ7zqnS2iscYOT4zm5zPu +F+64o/AjXtYYC4v5FFJ++uPt+eAEVsZ382UvDp7Gbrhw2GezhFIOGmkoYdJt +Gvip+LC6VlHhy44frppzcajENbnvEuGT78sm+l69eo1HqsMG3ya9xcqPNaUp +rUSXjfNxDE25gMAanfVeiS8wcbbKqo7wBObg6oGx7e0okt781wOTsfLNz7qD +ZH6zrssn1ghTgRNOI3N/FfapOT/O1qdB86LxiBRbBORNd6+z74jCZHlmvauk +Ht14uno5a1873tzzhWPcPAcnKhN5+kh8FrbOfdwZ2Iarxn7EZ58k/GXjeXfG +fY7c5/J1Pt2/gvz2NlZt1Y8wa3q1XC95Xv0p/ZChuDaMUrmikxpfgpHrOH19 +if/bb+l5fuhuxeNian94RvMx/V1yTxoZ5/vx0+eV1j+EK7KVW9dJmmB/pvjY +O9LPxMXQgcRb4TA68Mfd1McZjdkzQyiEP3xgVpTo1wgF5eS+3CPHXfHHXaPk +LYQnRMSFN4+8j4IMnVKLhEtmeNyu/uF10p6pqWqbqC8FzlnGdF0XqYa/4lRu +xnmVGqK8Jz1CKSAu1LmXtqkaZj6dyUwmOt1z3EHyhQoFxifUX+/eVwNi9uyz +FsS+19p5PsIEYT68emPcEgX2rLp9gvchDWL3P1w4ZFsKSTcuHXtqQwWOByu1 +9hJ+uPKewVDQgXg4nlXeXNn6BDekqh+JI37WFx/gXLRIgKDyt3WXpx+gI4dS +qgyxK/fS7V8zU2Fre8SDD/crwT+4atKG/K+3YxSbmXAn1upcmgpuKYDLJq68 +K2g0sPwo8Pnyi1fQHup3fndtKF7qn1diIXwjJ+Q3qztbBjgUf2bv+2gMDWdU +r3oRfv7EQvzyhY8UOMN+ZMzldxUYPTdxWWdOA54vM0MrT1NByrbgT+yTStDp +10AuMxr8Vc+9ZkN00HEfs/TZthrwtGBSHiN5pyxn0pwm1I5cRj2lk6WvIDY+ +ZrULydMHdnF91xup8GjtpmN7Td/CFncb/7WmNFBJ+yq1Uqsd3zoEdyu1vQT3 +IHfeq2TeTwX4OYlnKWNXOs3Fe2cgfPu4/egi474hD/vPrr/uwjtvK8E9B0Ph +TsWvQF1if/AvNOj+kD7Ybi2lJDwKhk3x63YnEfv47ic6H5va8XyS2t1mahTA +Lm9pG8IHxgJ7VGi/DWH53kIVy+dgiDxgU8K4twi4uFfuXJbCjceUi1oPhgM9 +rCuCm9gdLDYHni3thq2xLu5FeuXAsy1p5OdRGnzZutNkzbkWDB3aKSi5Ohy2 +tdxssFclekTgWPq1qVbM2/p2RNIuHoTl1x3RkqNDxr2kw1tuugG/YO+aw4sh +MPB917NtpP+NwtcjkkwewlmKiGMIux1Y+bGLM9ZFLx9xsHsV0A0uGZJjRRmu +EKx4JCmd4OfUyNbKuuEyCKqdU39hmwXjy7X6YdVEX3uqsRTsScWvnJciC9y8 +cIOc1QXGvO8eZF0rcY/UMwux9z/fRuHiNoEjfC4Ex+6139TxTcCNwqbB5m7u +uPPxZhkKwbfH201bNNzy8drH09sNDgYRcTR3j2WUDr52XwozH9Wgqkbb2NHy +aCw3PLBKP5XolNx7MtpNFchvfYjvqnkQrt2YZ7G3kQ4NgUe/sT8pRUODaMWn +ClHY1NfV6UShw3mlC/Oy7rXYVmYQIlD3FO/z6Bn2xBH9eCAkvcY6B2XkZJmN +/gXjNlGp1anTxA/vEqwWjjdge9PXSxGn5DHkF0fmHXc6WArs3TVtkYhCTVe+ +3bHywt7sgUpeMv4MaltwpH0D7utfd0rPLRDk9W7Y5JLnnWQZvaMvi+iVYaAg +ylMJFfQZ1yJvUu/sjsdu3x+MTcJZ1s8uuuA2MVG6HZkX7xnN11jWAaUVX6J4 +pPKwYeKyxHrCV1uDdnBu0Q6GLNZ6CZF/riCreijuNmlvPsXmFyhHgWChoqxo +jxBku9BQF9VFg+t5oQYDNq/A03rlAUgJg4q6g26/f5H6cqpJ41VGF3Ce2mh/ +UFsCinp+FMiN0OCkBm+3xYYWyMhiKZuoTgY1OdMIp0t0KFt9YlKtqg3aFSfm +9LKzoT5PfmUA41y14QCVt+JFYCCoEeu6KxnWcKzt+NpP/H8sN/zEOVJ/y71U +NDemwcM7PHqCDTS4YD5+6Uh9ErAfqlytnOILCnt/pIsQHTquve9yqjipv6Ln +NCe+Z4DbqpO9LYk08GfNS2Dxi4Cf0vKKrw7bkHojOFJG8PPZ6897WIIaUPvr +W0HlLflYentWxc2IDlJ6JbcnqxvRqtikhnFOxZvw9dtXmdPhurpG9onOGuQw +zTOwESvEYfM9yVU+dFBbMinbPleMPlHeZkc7C9BTip7VU0XqS+/tTFX3dCxL +frbzhlIm+mki85VxOrQaKnuXq0Xh0aJfj96Mx2NQzAaZVWT8ZUPnDXVjPdFv +h1dK204HlI/kM7hO8ijefrWd7AUvNBaeM9lxKAx32xtte03Gn0lNfiG4SIVP +4duY0+j5WCN+d0aH4LZd8lb9Oj8qWMvybja+n45TZ0SlOsJowP/47uh4DgUW +5XaGfrRzRi+9fdrBVTTgYHF7OsBhjTggbjS5Iw88aTxsNybpoGgcf8epJBA4 +DTdrhN+JgpT7ukZ6pC7fV6n4Wfs6BOw3yvSvYDGGCI5tkVYkfo6tHXslLB4I +CVnDrf8CPEA0IbGLcX+HvARl06GwRtS6LrXiam8ePhbY9n3PbcIrRuYkvqp0 +Q5DDf8ni1floaLVpOsuIBoXrb6VoPaPCb7ZZqkRWMga7vOCSjqZB39di7TUH +z+OUSQP/O8lsjA4xH679QQdPEfn9NXWRuEfNr+z5Hj8M3GEy0U3GeT3W6Rqn +mj+sCVjV+1jzMTTuHL3/jXEvSUPO1OTTO3jXlr+dduYl/t6fIjZI2tv+Ule1 +qTSGjqSZruSul1hoWXCziNgLuhNlRDNOw0bnGN+81lBcW7JtWYX048oku2Vq +kgo1LAWrOzcUon7n+ph8wve26rvds3hLhZEE+5IGn7cYvjPIuo3UndKOxYXy +jc+RSTFVr/dzOB6bUeXZscQ4V3++PG25DffsSP+TllmL2UmfOTY10kDvfpHd +U9UeTKhcbP3dmo+8pqePpysQHvWf4KzO/QBg2ybX9waS8FW69XMFEj82NQvn ++YnfrR2U1nVIx+ODkiwTK1J/n3FfeXiyOxQO51Eu3GKLxyfu2QLnCc4UdTn8 +cyO6+3e2Didf6hu8pDqp6Ufqy/A3+zSDhTbkl+CUrxV5hYt7LkftIPqxYMOO ++sHGNkxTExvB1iyc8SyNWST5q1Ugq/JVicyXgF/o9VBE2wm7VhFjGsgPLz2J +SSc6d5uuR79WJv7I3FLJRfTpn1/Tt6ZVn+Atl9D3zL7OaMaru9udxPm/uA9N +SnWteLDWS/SUVw1+OtOt6fSNBrpmYRYnjnTisavVw8sL5Xg8suaMBJUGv29+ +z3kq3Y5WOjFVYeR/5RTamzpHaSD07uz2ruAkkLTaXrY+JQLjFkXlukkd4Ukz +XhsnFgvzllfS7fij8eihrWVNxG+fbZP9TdQSQFqM7bS0fyButw86o0D8885C +dgWNuR2Xbw+KjHLmYF6oafMxol+EqgvuFlm34Qn5quWqI0WYRhFSuLyRDn4v +pWOMrFtww13p53drq1C+w3AlBxupj7/s7xR5t+FWue9KNy8Uo6dmy2M6Bx1e +bapdVtzQiliFOkfnK/DR+fbe3euJbu27YwZH2zDlgrnpy5u5+HX71NFZwisq ++plrNhC7yEnm1a/mc3Dg4UJXO/Hn8+O51g07jKDrJM+e9VRDXGM6zk5j8P8E +gU9/17ahuJMa68jpPNyv8DLchbTPSBM5NTBch7a1Zbt3URqwuGldiSj53x2f +7Z9dDqzFz3JBjh5pjbgvyDN2ZAPhn7c0DGZDW3HXvZTZcKdC7Jf0Ovwf4UUb +eDrmYhzsIaFDdfs3ZlO8FJyvz1jvF2gqyRqjaAc0wd3Z6pe00Xp4PLaf2FmS +VzQ3VjhAKl96mPv28zg4kJNEJfZX9ubTs9ecQO3dA2Gvt1dxuSFTlXFug7pe +93YFoTAI1NJe7bjTDgsXTu0XYux340gSzgyPgF2PN3p/M9HDg/eV/raRPHL6 +bpCp1RENlNNHx18YqOFjbzOl/cRuoeLnP/aG1JEPtZ41gVVgbr7j63HCk3WW +rmwJf0eBUXXZJoEPCF6jgRw0wktt+nucLwZVgAO9Up1Higq5Dy+tUCe4Sr+0 +8vlkVzt+WjTJbhF4C7J/s6WZftHA9XnrV/XBdLgUtSJXkckTM4r4/nD9pMPX +yzbPDX9Q4P2ZAa/Vs1Uw+Ktw8gzhmbu90eQ/uXY8yBxX2ZSUAO1jWssNZH5V +ee7lrYVrcNqB2/puTDC4sh4bZPDAoyW9/N7ONqjpw7S+8UwwsAYV+EYw9rXx +Jdx74tINphtVp7q2lUB6RvfHK9do8Ohw+96gBw6Q57yZg3YzEIqtrv1tIu1b +RH+4jshbQbXeX6xP9oB9rm+EbYmfB8MTue+N12FTqLTlUHIyePBNrdznS4c1 +3cKF0qeo8OyG8v61djlwQc/4mWEUDSgCn7dsMG1AkTj3K2op6SgirrD9nS0d +eDtbHdd41+CHbgHWVcoZuN7ORXkshuBziDPzSOJbfCU1uYbO9RpFLb4MCrfR +IaX+qaL63yzU2PDJNpAtCZVKNvQrT5FxcmjqaZ6JR7NpIfvlpghskzub8ork +6ZZDkV2lbwNwhcfe10mS/li2e3sXIx7ShRcPeY5ToLp5nce7fwn4cDU/7418 +Gmy+rbB2hWAGoEaM5mbNfDgdeTGS7SMdlngf9BWdiIHI+1HMK05HQH3PyWlv +ku/K1ZtteYn+cveZnb/f5AoPjgqt2Ej677jxXKA0ohuKrDlehS7kYEPz2MXy +e0RHGCjf7+JJwRX7wg4uXIxFVYUH+5qIHhnvXHVk+xMj4AjnafN5EYasck1Z +wqQf+uy9u5qc3TCHtaq3Ugow+uzHOTULGlzaaSUo8h8VqnL/jDwwKsTq1VlV +jVakXryNFh+PoOA5dtUSyR81eLOBbdrbgAbUbaUuI5ztyFsQ/KbW9DVaqA7I +vBOkA/Vqq2Trrza87jZg3nw+HXMPqt8EkqdTqiyTKh1t6DsW67IgloZGguF/ +XAieK3rL/9bsaMcRdYs1Zweq0ENPhd+kl8R566zsMVIXIrnqbt8xzkfzMw9b +TTfRQenp46Of7VuxqphLzfEA4jf7O/z+zHTQFYvX+PChFS0z9Xy+PypDrd2f +oo6vJXGVPuv0fEYfbs0cPnc/1RLN5H//Y7yn1V8pXft0fR3WXTvwIFinEQuv +tDaqcpJ5Kdgiz015BLk/7nALtd9FtTIVPca5mk5nFw+uDHWCzMPXB/3uKiD7 +lZpSBj5MrT1478blV1A8IaYyNakHF/ILw4Z+k7hyH9t27q4h+MQlvGiUDwLB +bvHFDuJ/4/jLmTvzOlEr4mD/kZACGDFXzHcnfNU09MDAf4l1yKZZ8SvqYDTe +eW6+sC2YDqnFlKS2ccQ1WnzpRrHRuDo/Mk6lgg53nY0n2GULMdexhZbkGY60 +VfHCH7+QfHT5dX7TRBpGFVda5DT5Y+quL8baBAd8XwZ3zHlGo4+7R3q8vjse +HSjZ+pXwCpeLgwHShlZYyDH9aDW/J05O9KVbkOeaKynzM6jqAiG9haF/8/EY +V81vWfmRBhEy6qdW7KHA0Oju4YofT3HBb7R8TzcNtLKNPTgXO4Cvr8fx8+Ug +aDoVrnmI+N+41zishacGNiWWj9zofg0Kree3PkgkenCcS7H8XiZ8ahrsuLIy +Eizu8q8XITzqX1jQkYsvY8B4k+wbUZ0nQBUs+KXK+M7VtzvkITUThz/VfGUP +LQGj0Y2H+NsJP2+Vq8oopMKZaqEzdItyTB5aPMmjT3Rlte4C7qLgh1pK0fby +txik5nvmQxoNRHp3N01ItqPz3ydn57RfYXDSApsoQ19vPXzn9+s2dFgxyeFy +tRS7N248dnUliRODZ91qa4zBaBfH2pNHg6Gk5uwSY9+0/HVTb4OIeizLl7+t +/TAJJf2CHF48pcP2KZX5ymPVuHDKZGDX5WSsbju2cSib4IOr0/44zWL8WHI2 +RexIIrKNqV6Of0/qJuXY9tX+GTjyM7XFNisKx5gmr/gRP8R2B2TP9MZgX8L1 +o/zbAlHkhP2SK+FRaB9x67A6BTp1XgQurclGdcdf2qOVNGAvfByv7EMB2nR1 +t8jJcOTrdQ66WkeD5lgWHbG2Ljgklv6W2/EJ4bN7r3h/psGgshVzhkEj0BrS +Xk7tL4TwP4P/rt+kA5Oj/tiJoiyo7BvsWVeUApILx4QFJ+jAzNIa5xwVCyYs +Q7KyBc9hS+GXWodFBo/V9fLkb8eobez0puFUNPBtQjkhOnDAyAtVoTaUXvw3 +59xZjk4ZJw+Ykjy9Khi8z0w3HgJTfNebX9uP7Obm/e2kn3+8TgbuV5Kg3bIq +e5v5FYy6cqVMguDh8LPtcy+ECM4MzvWpvkqCa8zFt7+SOmWgrZFWTCc4o/h7 +qVU/FT6U1n8UJrzC8+zZqCfulhD2aIHNLS0QGuNbVBn3EcsXxIXw/CK6bOv9 +t0uJibiu2DfsmQ8NDL+dru4ScME8R7GLi3OuOKq0aciKxL/l+rYA/m9UyJj3 +W1G0kEr0vbV1uDcNZNTuXzuj4w1UlqBlD95i/HRl461Zgufau6Pcbx5vx32n +dfq82hNRkyIeWELiymNyKw87dzsmal99XuqXip19zGvZiP3hwiBlyysqyF6X +bf6iU4o7E95rcZnTQOyW0UG9cYKTGlJTOw6mYGfctz86BCePbHbo+vmQCivP +eL7X31mJn7STX14kOiVNmO1z0J0EWHnsyOkP1c/w9O+mnWXEbxV9uuIHB1rR +IGR0zoET0X7Z5G3iEg1Y38coeB4h/Lnpwwn3iVJkz7KprCT8kB6sK2PDTAWV +kGPyKpKVQKfbhz8i/MStUKxFlvjfQEEigiJdDil2mxsmftJgRIyfbYrwc1Ot +Tym8iRXAwpGbVvofDcwu2R7MrU8FBQvWv25cBpj/MPLNTsJ7N42qVUT61eP7 +BdXXpye8UUF1zN6I6NbgONN6lYha3LPlSXrgAx8849DL0RJLB675n6dElKtR +bPOuTzuTfLBAojrJtIDwk9XnXy0n1eK9v0Pd5X9Jvb67dul1JMEr473y+29X +YObCaq/MMW9MNlK0OdVMh0+NzdybuUrQcL9bS/CnZ2hcNr0kMUDi03uXxN2l +ciya/e/87Psk3HNaO5a/ng4ll8r5B7jzsSeeVjBQ9RRLWnet7xwjOFaf7v7p +XhZ+v/m3mGe/Kz64KrVe9j/Cz/OVFZd25eFcLdNlLp04NN8ir+IySvindsqT +DVtTcEOcCuuPaEc8/0KvT4rUBa46to0ZUvHops769PzEQ6z5Kni8hcT/Obb0 +k/tckjFqndoV2wehaOh63bWd+K19mumQ0GQj+sVXVK7ckw/L7zUCz2nQwZHP +y8fpfTjuKTVLrXlqiXfsj3R/JTzz5UyR4ac/oTjYn7dNKNMbs2a0/3fOdkCT +n31KXQf8FGGfrQiOxsV6R+v5dXRIU/6uEFhBcF7g8ZRIqQ9ue8MXxPWVBl2a +ckNq6yjwlSMm05LyGJ1lQ8Va3tFgSeRgzx9nClB8NmxxiktAD0tFs+81JB7K +PWd+Yxf88Pop/XbpHh77t8rXgvQTFpY9xpfYCXtnn60+2W4Jb+6n3+piInmR +ANp8GhQwuHlrUfL8U5R5e+LzqnYa3OvZd+Li91bYu+L6oQb356DIZdu/6wjx +51PV8sz2elC7HM7+Y38kKLGOSP70oMNH9eMCJ793QHyES+7ugmTQDqJ4UFbR +wWdlht3lVxWwbmvZg/OEpyueuaGX10B0TevjKDaufLhJsW+tWgqAntTEDgUy +v3SppGKq/Vt4Pn0srVg3H/onja0KkQ5unY+WNt1JhyHmO7z1X9xg0Jp+I5zU +08DF8lxV9kQoY9a7EcRiCwWG16PaSN4FKz81P3s3GWZD+fKUXKJAJmWrwvwv +OogmR3j9MXoBvIpS8l2uxjCkcCOYlczL73Ond0rdiYR2rrC937e5gcQZ8WEt +Yp/98M7rMU83HORwsuX2yEO+Rse2LKLr9+wQ3/j1KxUCeLn2zeWVILP+9u69 +DwiOlfGc8/hMwTcfmkaYuyowtfLRugEXGtQpP1WSGevEnQcjVNNeVuIwD19z +bhUNpI6wdWwx7MIPufanLuuVoPNv9isUovc3MRe2xu9rw7V/WE8dJnpzk6HL +Yx0xEj83mPxdgrWhliu8rb/OBmVfZd/7QnCy7/KLlJnBUDjOuaf2d6MT7j4X +PLqV4G391EACh2AUiJnCFkfmOygw9+CkB3muR0u25gk85VAy1K77V40KG9nc +bIqIrpF7/ZC5vK4SgivMopXWBYFdieCUfS0dqrjdLdW+d8HLMqXVkmvqIfK/ +7r+p92kwzJLvFmbYjiI9mocvdcZCp+XwCj6CqyExH/zEEijwcMrQd3awFg6l +y+U0a9EgiV0lOiY1GfX8/dZIMtsi6wpVLznC51MDqlfVV9ch8wvuCfnNz8FQ +qS2hjPAuPQc5jVzC7zOrgs+9LzRBHfndUYz7lFP/8fUkL9+Dz7XfznxUfAK7 +ZV0Li4l991FvpUIHKlitDLgT8iwW4lIaCs/E0cBd/eH705vD4WZK/hmneB14 +mmz7k8Hna649OrPI14hZuu4a8tJJGD98xjPEmuB8PpuF874GOO47qJUQ8Aat +4s8FSNvQoZXH0zmZowXOW53oTqyrgi9dF6ZvkPz9aFMhdEI6FNYeyP6pUaYJ +8uN25vqk/0Gr/4LnrHzhQInReEhqLn7RoZ2umSS4Yb9HfMd0Kuoblo59FmzC +nhMa/wT16GDkcfrZjeBu6PnvxtWGzFzMTL8rzEL0xUS65p6d8zpQKlq2ykk9 +FKVKMJPxnvbap5saOSQOxYWhoWy+CMVtXgglEh1xtKre0/pRJIrZVMqFu0ej +qNuaF+MkL3wXjxfEBiWDT2mdw4qNGbi97OqziWk6VIs/0vsvKB48swtk0TkM +H1DF+UfJvIS9oeZ9FoqHSwXD3RYBwXhcUPt5OOmnuLRQwuhSIlSqzXM2HHbD +QwsjgRbE7uP5iVm8uxZ/7Ew88oexTifBy3qY8Pljgd0Rjjed4HGQNdukygW8 +OaW0hvF+4E7KiYr30lTQWrd9xfb2cnj6I2BHsR0NBMRnPNLe5IHyoUU9Dntb +SDz0eecqwn98TJLOvHv4AjrsfC6XCiVCWpau+QTBZ8X2mq1b7dRxVOZzolpd +MN4P6o2LYezn8pmOr5OhoqIN8xO2tlxkVaxJkyS6Fc7G+380bsNfZTnHlVjf +oJrHAUUhUt99w2/+4CtrxQuFkX+lbQtw5pE2SwThObVPXq7L4aXCNNafjEmo +gFbbQyw77Glgr6hkW+LUge8s9HfmFueB5MFrmemkvncUL+QL6FNh2Shk5rxT +BRQGVA3pmdLARnEh+5/JfaRfN5wy1/KBlNSD8meJHxzuHriRwtSJnzm+/nzx +OxQO6fPNK6whddD87gGHXXeJbpX/r/+wN0wO1V66Rdpb2D4MP2nzGFlBnVqW +EYSO7785BTG++6gLTId87oGOHdv4tmbk4tzNI+byu2nQ81HH+YZYDxQns+c/ +8stGzpwuDhY1GmzZzTrXbfcIKAphxxPZIrEziWsmjODDWGTy68wcG/hLpzqs +V4rGe8cikg4Qu1RP0NtLB0Lg7iHfmZDMF3jlHrtUEKmbihOvtz670Y4HR2x7 +vdULsaehTSKWndQ1nsrpWsLz0fxY6qnkLAzPcyi5w0fq46ZH9xaIvZFfo5sZ +8lBqUHjfxo104Nkklzl+1gIV1Tk19hg54qSJvkMVY11Tp27a5bE2fM7V70G9 +W4RbfeGOGMm7lSWbflj+sYD5v65R5T7GeHPd78WvpP0qiyMHaruswHlfyyav +V+ZokOV5mPHe6QlngrbJ3xB4Yrcroc7FGe09BO/IEb+VF53p2hdDgToOze32 +g1XQ8O2NuxbhXbIzjhe0X1NgsWxvL3tsFRwW+TkWQewBBhdb6ARf5CjzP+1M +2UFv58IrLaKP/jttPZw+RYGtHNHjpWIIRvIsK0pInOx5fCtfcD0VdF9jof1Y +BTBlWp4YJ/b5KOaWuaNvQPJQU17SUXtspQqcj5ohPFwrKD5QgQrDQ2eL0jYi +VL+oLxk0ocG1b4sXc5Z3g/irpuWk2CCQoDY+Yty7zcrfKXMkWA8lTznUtv8N +hJy0mJb3xG4WYD+p2G4AG/w31djFB0P3E+nhlwz7uXP/SfynhqHpI53BH6NA +g2W+8i6Z39Pvls5J8xiAYt1u3o8OBhDZpOI4Q/x2XJB9OUsDsaMpY+N5nySg +Lp94pV5Oh6BDn27f5HPFs370QL4wI2T9W2WaRdp3lm17IRGej+7mcnuexb2B +VV5dopeIztLJui+zV8cWRfsduEfPGKILq+Tx96R97jhbCo9QI0YLnTal5Hij +6tXukz72dHBVGbzWLNCIYjtTH99NjUL7jsnBN7YEBxRO7z0Z6YuBv4dj/lvh +gY29Gle6Ge/zL70SCfd4gn8/y08eVbfHfwvJb8NJ/5ND9F+PSP6a9luWvBuo +wjsxEl5ihjS4UCIWWa3WCikd0/IxPyrQgdcw+e1qoo/qmOYDr4bC4IecmzvX +28HfaL7QE6R/nqKH+3oNwuBGuVyKlYgFeByrjWfsB1wKXWI+dfslbqkTTjYv +y0ANu77gbjKPzs0ZU9rCgVghvGC3yTkfTRQ94mUIL93XTuWd7bIEC27Jqxu+ +haPD/Fnez4z8ijqvwSXRDewK+q661oU4G7RX4ZAxDcpaDHefL+rDz96+3q4/ +atDe8qy4gs80qFIc8sqZ2nEXa+rnxLcpeG9rPD8Dr17ksMjw/GrD1y9L66et +UnCV8fpJO6LLDrxOs43d1I47NAIDeqySMXEf823Ge/iz+p6cfh5UkJ85Nshn +VY5nzy5dNSfxlmRukyEhSwX9g8kfx89VYUnOcIsw0Tuut/xH6ntJvtQK9lBX +1qDGksdeXwMaJP8sOXYysh1z7H8dVZSpQvND9zhvDNHAy+p99UYlUneuFTaG +fwpE05DYPnvCw494NlhrlyRC19t2TX9OPzQKiauuInXnWq+/sZlwGyauEtuV +npSLQveaKl6RcVp+drHe8jsCtM0EZp4IaaBRO10Ilxj8WeOo1vEy0BSfC6Pp +UUHR/J1HC+Ezql/WJJyJ6ECDvUkHGkJL4PSXfrm4SRo43nnkLH7EEk0s1i98 +UA4EC016FeN70A4j6R1pO40w0fG82wtKKDSv4zQ7xbgffOHfSmVKO4pXSe0R +IzzxhfqTewrbiE6XqUwTCqXChYq9myIr4kE64p1vejQNVtaFHzt5qhskds1t +6HuTh35rO46PEn9GbeyXMjV7iGsvzC9ZH3LDLQkHLgQyvnfw5gS2yZiApKH6 +Z3N9M/xXFSfMWA/25ae2c9aDWuxeZd8k3tKI9JRIl9INJN7y5SWixR/DIeZo +afljp3FE/aweY3/cxuFHgUY6oSDxyPeqx5lH6Pxjrv0QGf+f+L+pfPFvQW9w +BdexZ1TgtOTTk2Hcy8ZvVlZ8tgPvv8iqDR4pBPrgUYr7bxrUtv1z9Rz4gEIm +/IUHHpF4ZNFfORE9CfVllm/im7IA2qTu6Yv5gqVlh4DRDzro7jf2S5dl7OtJ +6Dw0UAtNCu1XDAkf3iUalikURQHlib939unXgJ1MQHMZsStzCgoOfKDA8jmh +QH/TauAuFfhhTOxhHPq/vZTaMd7z963k3HiovXJOP5bEcx7Lzjz1ICr0RtRb +KWtVA32O8jmQ1K+peOVdguLdMHcejqSGV4CEOOUJsyoN3ouc5zUV6AbTtnnT +iM4yWOmmGqysTvSUwaYaGYNeeM3tePGIZx4MhQv8K+KigTgn39WuxR74t2L9 +mn8/Y2GDgs6ArDwNUpYFRiPX9MCZp6vtR37EQwk+sDtxhwZ23Cr/upga4E9R +3Ll7ibmwnXozUsmK1J1v2WwsoVWQ3SIUN2BZBk3sY/66vnQQU39hO38pG2Xe +vGQ3fP8cd/HJH64j+HBSaPBk7JoMFI3ezDO81xHPMtdU684RHDOqxcCFBNzy +IExU46U1Kp0Zje4n/Er/3MEHrE9LkP/OEUW2c8EY1wAvV38g8+5a6ry8vghD +inVPhNa5Iv3gWNXRL3RQb6elD+lWY/LiPv59Us/xUkGS4PF8opcNduu/WluF +SwsetJL1T7Bi3w83IaKzmJ4t/Y4UrccbCs2jTxVt8eDnV7YqAXS4vpPezbeX +8HPNBd4NLBZI+/LfgGcUydP1r7T5KhuQnlgwdH/JDurHzQPdHxM+c14yZdXZ +Bty2JbglTPcGnIhNhSk3Oih5rkj6ZuIJugEeOjk7HMHNnaLEOEdlXP2RSepO +V6gMeV3WwHMfcDVrTSaxV9AubHkn9BJ6W6lS2pk+cE0lslCOca/36ieR1taR +wGyZdHxMyxZqBc93+hAc6Lcv0n8xlgM2Tjs8BiwSIVL7wkgT0ZWnlxU03ZOy +4Mmiqd1tmefw6Y9ItSmJ25tqXPu23K8BUYGczCDleBCwoHAmp9ChUnlHdpVy +F8S+XQotrkwH2YwHf2TGaMB/UU0xKagDNjcuSUn8fAHSNymZnYTfeoko1v8g +8cyxR3Pj7N80qJia31+UQ4NfsYE3mDIo8Cbvpqi5SyTYegrFyCPBgVPBildL +GjHttPwK6rEkFNJb53XYhOSR1a2yYhVFYF0x4xTCFIJBfxMfhZP81fPxEq8T +C8S9pa2/T4jHIHfChck0wrvq+sUTg160YXvyqXaR+gwUqlM/ZkR47NGAXC/f +gjY0Oeznx8L8Gj+a8rM5M/htn3psa20bXo8JujVLT0WN21unT4nS4UJM0h2b +N3440e2o7N/qhuuf98x+YOgL7/J7Avfd0W/j3RcGKp7Y633ekLEuvebtvrBC +3ieYVSLHWfDRB4MvfixbQ+zTu0KEJnfV4qCE7LdsWiNeDDD468lYFzrNbzn6 +ohVL+u6wmB0rxBTbjHwgef1Sd+Rr4ehDcC/o/SEmpo/RpyxZBxjvvVWmbzRv +sYNj+V9Xb7hxH8dFM5N6iP0m8y6W0yn2kHVEMLdo5j7+ks51Y6zbPNlQShtl +fwxNz6pqR1vVMDZX/yADD5dn3tm35lNAkmO1hs98FRyrPGooQurCzsQH/75T +KCD/o3+19bUquHjPmucqwUPKOmF/OxYqhPGf3LyypBK4ji7wzRN7lmTHBtv5 +dhQde/mRIyEBTo/u2Ki+hQ6ekWOvj+3twFthp4p3RryGmiwtpqL1dJioF9Zh +E6LCnNdZUONFOEW5e/O6JcG3gry6AiUqVE3MzXreqwCuKePC/6yI3nl/Yjz6 +IRWs7YJc3oqVgc3R2vIwaxp0/+I5oXCCCkfi1rWda6mBo1e3wnqCb9zDy6yq +fGrYuPm21B27QNzhH9tDJ/Nl+eLxf/cc25C70Kh9/ZdM5IiwnzhO5jfBRdVA +4mgznpQAl9SBGtyv5n2Pi4UOQylVFy6yUSG182yxmQBCUJ6M6IwNed64Dsum +w1RoOcXeBKsr4KKPpnQS8dvdeKUDcm5UGOl4TVsXUQYrKLqzW4jefB+gvetd +GhX0XCV/vm16C/3ZPuPPiD2y7/SN/d+pkBwTNHNKswS4Zn89aCI4bxbaFnxh +/SOMbWRjNtX1w2aKtTpD1/v4Nd/XqPKEL28WaPp2LzFVbte6ayTfV9pepbI8 +pgBFpWqCW68azDU2jBwmPHxHGIV524N29Ld+8195XBLQFC3GngoSfaRww/ru +vXac61l7v9Y9FSxm3l06Q+r1s4six6aU29FWRcWn8H0qXJEeZqUK0CG+9yLb +hRltlOyhsyVyBQCvnMc0I57Xs4/tFX7sAeOxS9mdWdGgO9Qcz1iPWtu4fidX +/EO4WShxXS8jFrK6h6YPMvYjS3eoc3j0wInDQ/K0FY54+c1pzhtkvv6lc8TK +NDXiJVetzf9avVFOM+dWvgUdNL5rDenJPMfys/cDZy2dUGI24CLj3kbvlPkt ++b3BsOuXg+vrFCsYPbz8iHEu678jl3xPBT3D39GLHGJhaSjWp3Ob+RcdBLmZ +vU71BaDH4cob9cIB+NIctm8g7WOTFc1Yir2wyzbtxC2fYNwpfdaJk9hzHo5s +mEpuw5PWc3/8/dOxWlYVa0mc/I2oGnSJbcOepHIxx1vp+GRms/AFMTrcl959 +PEWoAztV64Z/XKtEyaFlTjvC60KblWN7eduQZVC0cME/F/OuxYveITgzMPX9 +u3OfLSiHOLjdzjBBy8A1AYzv+28/vGCKL3oJjeztRy6b2OJeb8UfqcRvpX4K +U7rfX8BGTu4EqRojfB/138dJYr96z1zi2r2XcPxxv0KalDrKvK//+I7Y19+M +WEjqaUf2TQbnRNxKgfZ6Lb/wDxqYsig/ZMmiwI2vZ0yH31fDs55P77nNiH3c +uWNfB9FxHBm8libV4FGm3SlJ9LiAtIXcNxL/a89apD9zqYKvzznnpwhPK19V +Uegk0wOfMo8opxoUQpZvXawYEJ6witrl9a4bWvZWr96F+VBxueNq1hUSz9E9 +urUVueCUa5Jw0ysXbgkszbCSujzCHhV5wzoXC/hjnDO4nyDveBHkTtHhQ/xD +iU8byzCYe9JefsQVZda7Xi2j0IGSsvkDVa0G3zkGAwfJj8/Fn7x9M+jwe+RP +/XvPenwk9yuec1YdB4WFNVUJr3jSwi7+5lgDKvEW7xcJtoUbl47yqLjTwfRB +fiSl3R/EGzaYRYeZQ3aa+N6VxP8a9cGCA6OJ0HN/XSH1iStsY2HaLUB4hZZX +krL7m2Lg4yzV2tUfAWq6JTsS+ung5GaWSLFqBod/58Oj78fDpzNMpyU16FCg +eEeatb0LtDnG90S3REJY2u3rsiQeDpS3buPbSwXRlVY+NY+iQUfD7nJ3Bg2m +Ky+F2w9RYXQVk1EeJQs/qTxTVfOgAVZ5Vxle6wbhhyIF3jdz8F+B/Lmv5kTv +DOc3LhV1w5hPaHmufA6GWMb2qevQgFNi7N8um26Y+qpupnQ4DwfrNm4IJLoj +9J4XcLArY0G6VsaVmgiUX3i3upXwgXXmhp+/hmvA91UuNTezwjH+4Ykri8Qu +vKc4/JqQEbRsluFdmA5Ht8aV3IxzYrWncyx6Stqw3HPl16nVWZhkNPYjcAcd ++Fu3D5o2tGFx6jbF6/6v8V3XAdd/OxnnWE7NV716AMu+Os2O/Za41ffRzs+M +fTTdqZEJEfJY81fq8FGjm0i5lqO+ROz7Nw3XRr27jFKffh6rUjVHKf5lczrj +fKe59722q1jRfPxlwrUaG/xywWEDg/+XHGjzfXFEA87/HNUF53to8oa1fp7x +nlNt+zjrKx2I/SCuflfQBMMjdl9m9MPtuOG1Y0c7UlnDEqO8sqH6Jj27nfH+ +bbFk+kRnO9qPZ7+49zIF/Ha3CHnx0OH5nL7DYREqdHFEjuufrgQDvU1FbAT/ +D8Sm1DvypoCbxUP28M4kKJ3Tijj8Hx3a9O0sLMffwbPul5+/s+ZB3QmxE9TI +abiQ/vJfzDUKOP19tsfscA0oKaXsl7WjQeXV2QJqAgV6+qaWm1iqoVjl9elz +xJ6uVnbEqYcCuY5Oaon8VVB3m/8K4xyMu63TJ/ihDY+0bPSZnooEOZf1J/wP +EL3zuuTjnu42tDG4crSAPR6U2RVMbXYR/5vNPHEwakamiA+GhaG16P9B81jY +Ag0aOnzLnNJasMbrzwqmqzUYxfX7+MZfNAh56RfxbrQV57OetYruqsYHx9hZ +xBnnGOgFmDJVt6Ja2MapNd8KsFXxO/d2Mu+ExBqptbSiuZnpyn6dApQNvLr6 +F7EXHIg7sXa6FZmnZt49VMvHbRGtt8tIPJzzsbbqb2rDnCTD86YDL2HuncRM +ryTRcWzcqaM87fiUOjZ+9mcc/Ej4ZOBH8FahV6xNvaINObFmxVfl13heXIy7 +jujcN5/edBo6dKHGz433P9hHA1dL+cVFwj+5u0QDfRIKQML3Yty04EtIi67Y +feIrHe4JW4+MruoC6b8fU+51NUKkf7iUhCHRd1wfV7G0dcH4ZEBB6mI9NP5k +TYzVpUH2XvoCnzEF8ksT7C6I1EH4R2aHFpJfTZ8OmnC5meI73p8yfoEFuO3C +4LT9CB22hEi0Bx+Mgi0lWs4m6Xn4SHVuQ/EoHSSjBfJTKWkQb+9jRrmWhzV+ +xnVqRHd0XVQLNKnVQ5bEzO/jETb4aM3amiGGzr2WEQdvKVA3r6Uu8qYK5C+3 +n/1A+NWJsfL5XJkufPZ9v2V7XhbQlR7vXjVKcGDXv9e/hLuQb/eJT/te5sNL +ylehawRnDOSqPyR+jINeP+Ne5VMpcNX9qdtpopv6OiY/ytKasU9o6kNcczUO +skXXzhGe8/S1u0QFdztmb9lT1f04AXo7/CMXSJ36ddi1dcUpwge+fl9Zb5AM +M/JiTSeF6LDG+2Bd1Op2/BPFZb91TRJwlb6MjCbtexP/q2soasNHWQN7V4jG +gsV1w7Lg3QTPP3qz0v4Egq1drmaDdBxkM925zk34+bIB1+WQ2x5w5lHZtpVN +cVB/u9DzBbHPCmt/tw6IgzXd7NE8Ntb49c26tSykrh3r2PIn/G8Xxjt1xvxZ +SIX3MX+7BrpoUJN42Xg3CwWyz2Zt/O5VCzFzJfv9CB/7rMZ7X+Q2BZo3jNhk +n6+BkQzXdRrEfnGA6eX2aApEN8/l/lKpBk+c9GsmdoUse5tFo04czjdMPHO1 +CP6ZydVdGaEBc7A4yx8DCuzdp218zqgGcktV3LoJL2X9Wm/3sIECM9Uvr2xh +qoYbV+jqW4jdueLQO5HVVDAVcZR4n4SgNHNU9gmxn7u29iuLJBXE+73kT9XW +glbI07GkszRoe9NT0vWFCm/9/jhExdXAQovdAe5DNDDZ+W7FfyY90JRrdFi+ +rAY0OfwmHX5Ng2bEE89LUTEQLbwgH7HWHB+qjqY9Jf4pltQQm1W2x5erzgqq +qurAb80PbIx9NDUOX45dfGCAtM7qVxuq9+JJx9wtvxnnsd/mWjqaooPHuUTP +RRzSxauZuxx/EXvaTG7kn4ud2Gu7dcfuFbkg82/kfdIcDbZp7/Y609aJWwWE +eeq586DMSO/9lgkaKNLsdlEJLo0/W2u952gespyPOZlF4mRf+fe1qxxIXciv +fXngaA7ys57RbCH40Ot9xPHa8zasiRL77y93Nsatu/54M8nruYXx+pljbThk +b/d2ri4XI733u46R9nJMl2wPaLUh+9HOQ56suXhPTuzcILFfKba9v0czF7jq +aCcftwVDQZzey4ZJojdFO1PXXykD8yjzS99W1kPh7p/ehncJn6fO2RjE1uFk +0q/HRbt8sHzXZ2X1UPK865lfDC8hCg3Inl5j6oN/umfZtxK9bzrw66eoWyHe +UooKHL3viYKBS9y+BE8s6TLaHAHpqNE2b/79qzN2f2RPf/6TDh1jX9q/3HyB +/ZkcC5L+1vif7LtPi2Re4mXoXKX3nuH598+O/9Y1RnZrnpsmxM+9EnvMJU90 +Qeda8auWGsG4WfBV4ar/aLDrqY3Klt9dcL33bvPW8zb46fDKxrx+GvSdtd7c +tK4DvLIbbv61d4OvZ1ZdK+SjQ+YK44WMozUgHpekwqwVBTInYjun0umQteJO +qMbnbDD4u2f5Y6UXVP6zrXk8Q4dXS0yW10keel/rO3TunwVcjlV/K0TGGZLv +YmckTcHr9n6rRjILsSxD3/tKAeO8Pusb8+9VQerWLuPLzTa4R06GibE+jSXj +z98h0TuwffWt8lpNS9QMGdYdZ5yz3cd8+eyhJnzY19QjllOLamvyzhax08H+ +uXtsXlkL9O5UaNDa3A4ujRrN24gOmqH56+Y2N0JbXd3ZO46dIGKwNWsN0YNH +MnQSvF7W44j+wsDtx7X4e854yZbUtT1/P2+ts6bgj43Dw//H0XXHY/X98Yyi +QQNpyshMRYRCn1BJGYWMIjNkKxlJ9sge2WVmb7LHsUc8xkN25FvJyPOUzEi/ +8/z+Pa/7Ovfcz3h/3u977/mce88SgEjVUO/cRoJMDaHUHwJ6wD34rrfuSyic +s5n8/RfzeUaliAcMMQ5APvDTOFW8ES39p6ZoVUYGPRfRL7JMBPSb826+bG8F +krm6lm+8kwwqYtRWb9cwbnjLimX+rIcD6yh2Ddffu1pLDXrWBDS0FL7TCOXA +uo+oIu1RzM9DbsVR43n0xggfG+zTwMrhkmg3judwGg1NHS6si4/evGD8LB2a +9bv6fXHcvolg28Wl342eOcQYftZrQCkWZ/I5cJ2dEFRp6v3ZhfRjxKzgSCnK +mIhbp+xT3lH8Men8GSJcy2d/sLKAIJrRjFsO8/D/un8kVx4noLZrjIMxuSkw +3vLR6z7G4ev7Cw5uyRHQH6vLoot1SUDMtGxdxfV3kF6Rk82wDdm3FTQP1L1C +WedOHWXzIEO0kZj6A6cmNPbvibdnQgA6q8nyIwzHj3ztBM2e99Uo/Zbk2Z2M +r1DHuR3LxUSsU1L2nq/pKkIHTSoiX2x6ouwDP2T+LZJB/dmnuWt/UlGJxhSX +ZLwTOsAXvu8S5s/Vk02jRu0R6N8vGhfGKBtk055cG0r5zzPd97tZSRcM0dBS +ndJ4h05YhFQqUvqHq8n9fbjZB7eapM/VHvRGHm+v+/4axXyJ1qhWWb8Pql9L +y9g0yALfueQn8thub186cAWf6oTMI5oDXeKvoX36wPYuPTKc3bkqtbetApC2 +oW4ezWvw/h5zkm6cDMqQwnZNNB0y/PwqI5pfAO1gBlXrOs6LfbJyVbax0Mbk +7/nxP2P4VGbdQvkv5XqLhEzbpwEYdHZLmGUvQkflXr8Vu0+C+05SJzl2PgSN +XKokR60oZN1a3SVK2R/E+i369Gg3qvt3Zl/Doyw0+GwpvIByDvuf/AjriW70 +rviPpihVBnrUDnw3MM/5NRl9e7pr/cpqJpN941lnNJ8uo0/57qOqGnxCjjMX +nB9cHRBW84Etyf+O7MV1XLPpiM90qh7oyNfnFZ4OhydU3GeH8H1vXBM+ZVnf +D655364qOjShL52+xJxHmA84W+RV+hii6+mlD2c+BsADL7HYG3j+DTf/99Ks +w6gGfr0uuvYebfwc8cusXQQ3U0ub58f7oCifxTfoZxHaZSrX34jrYHKygKrQ +hD3QWOxo3rllg3Qngvsp753o5EsND+C8SB8XKLcvygVViZNbF49Q+P+uwJB+ +Ezidm6NkUxYBdLVn++Mo36G0R4cmzvWhLInHwTPfI+GH7K7xc7i+/FBr+E/s +dxdQ0e7ylqbthqWAf/dTsT4tEtMUv5TWBmJ5r/7NsveBy8tDUpQ66/L0svDq +QBTqJArMZs1VIqaJeXkYxjzn9XxUWFY+4t5KOXr/QDOa/f6vojKaDEeXqXxT +9AmoL0kh/fm5ZIgTeCvAhvORdfXEtHOSPnKZn/5x9ZMPYjrYI+CNnyuw0H3i +rlQMGPIOWX3gaQBDDvhmXEsG81q3FXGBNjTmWjTWON+EAjybL33lIwPbY64f +5ieaUDbX23vhW+2IaSBhcRnjc3L2fEbUCQLaTFec4/pdiXYy6f6UpcLrefBc +4/C9NDDuZsyQNDWC6uuHEzlxvvS+Eb15vTkXDrjHvjfJIMBOX8nibmaMnzlD +YcshBJSRXTwjap0A8ix8hZR9YfO/VcxIPgREl1M8lGL1BvJapCyn8LheqtWl +8Z5a1MSnmN7iSkTRxz8cksG4ofyOekZD/B40fxE4LtwdicQOycg6UM6psfzj +tlu4BHgWf623mL5HCfve1fNh3X3hP7OHC/4fkK+8pZvu0SZ0/Zir1pcNEnzx ++zk0RGUCV+e8Em/RvUZ/W3OvmuJ5AhR1HYTe9MNN3lrR7VEzUPnzu6+umQTP +NX4eZrFshf3LC2pKiR1wtp3B6+YvzKv3jMfESxFhuUZj62FDIxxtX5xt0iYB +9zWfhIsaRPjU6Olzf7EBJEM6z9rqkkA8SuVXO1cFUm/a/Z/dixg0NtKlrDRB +Bp2RmjtEjNvhfwqe8GbUw75y0dUTziQgmq4JBu8gQqzhkMIdrnookz964RMe +fz8s/701jAjBJaqmH2pq0EbSn/L7ViSIeDNa4EjbjUpTDrq3fa1DV5+yBc/8 +I0Hr+AMWJa5u5LEu85aJWIdM+75W2Gxj/nNyi+GNZDfynDn/MruzCDm68L/h +xzgsfXmYgx/nqbG8jsqNgkg0WPW90gnbx37Evnrkfj/ENAgPX3nZDF/ml0Xr +HmMcW/myr/BGOHCnk36iwDQwt1aImMC4tCBefKrmcS9MpYoaLT6pBwu1NSPn +ThKoXFWqs/7UB6SZmxmJtm1QnN4rNIFxKeoci0tIOAGSD7C7SDP3gw7n9/Dm +n4vw9DK/iY9KO0q65p5EXG5BX1bPPA7bRYbFxM/vG7U7UJHKtZKQxWbUfEq/ +JwnrgnNXVCOmf3Si4bpb2iJBTSiWevrOzF+MA598i67uKgWrAYFAfuUaCKT+ +pfWimgyeu+9UmA0VwwuDNPrDDM2QFvBqKDGMDCKSa//pPUmH18PyfAfbUpCk +0Oilyd9kMP7R8nhTKBdYafIGXlenIzrDw1r7cB15qUk+tLPVAN29biCo/CML +NSsc/n1tlQwzFZLhohJEEDFsXXdkiUNL3xP9nXJIcMQjrVdClQjUerTtJQnh +SDxF0/ZbJgmK66YkLkxmgrNAmzXrehyyqrPrscf4aVyu1C5M7YK0v+rFl/6s +R8+PHvrd0oz5kkHR2mW7ZGiYln9ZAa1I6m/ipX0BZNCNmWO5Uj0A/xarM3RC +W2HlMdWJrZVFaL8qFjidToQjX17QujpVA41yghOlb+FyW47HcgERLpwtNDCa +roKvolrs12wwXh0+/OjwZj9IVaxcuxfjhNy2ztz8Wob1fjNS29ffDyP7uy8I +7GiG1rme8yk4zifqo8yFWYlgL1f/pWWjEczyaZkAj3c4dcwxP8iFkxvBJ174 +5KHaUW/LUKw3fbnjV2yEulHSvYyCV6cwf6Ye8j6A41DASbtKfEcsPBU5/a8i +Jh3i+unDn2F7NtWoy9dfi4SdFT+G8vA40XEyWnaNDHcUi6UMaz6gQT/Prh01 +DegEK/1FFxpcdzjmVTXku1CiQXesBW8DekgePNW4A9fHwy0rnI4fkOW7mXBV ++Ub0Kz2iQp2aDKadG28kYj8g8pDSozLFRlT7w7FCD18f4sjVbJLRjXpEiQ8D +NWrQWJ3OycN43OPJVTVd7W4knqq3wyulFo0/9hQewXnnrCqVXqvYjbqq1SuY +L9QhMb16s2c473ptuNZWgmNh6MCtR99oMpHETlUPHczDBd+2aN2/mgLvtzOf +Ld5LR7c+DQdfxn5nyPk1GZmQDhq3hn82UWegyQ32g6d+keHA19j01qwuZKLB +e2eKDSEW28ZUcbye82sCOhnH+iGp74ngT74GeFqo17EVToILU9rJmQb9MF5+ +wXy/bQPs69v/KNaHBA9v+PNc3tMPO2bSVMz1EAgcumZzKRbj1ZLgsWJDIjCZ +HNre+awWGow2duVT+joGsVnyhRBBQ+hKjM+Harh6n/k6Bx6P/MQVfyOJCAo9 +uU8k5ashl1F7jzLmyb8uJf4X1xWG/L53PmFQDYbu1xZkRownKt9pmATVo9E/ +znVmxYspoNQ+J2u5QYbi173TtHREKLEtbbot1ASZmxmCSTh+cmvt97nvIsJ6 +j3xrJG8DcBFGi5jx/C6Rr7MNbxLhUYLdyTdf64B5hG2YA49LaInN+TkSwaxy +OeyGaC3w+k7UOuB45vPxf7fV9wHx7A4073+HkDNb48Vfu8nwPEs5wYK9C/Wy +8vGmmyKkNKTAF4dxJiKy+oHh7w/oO7XgdybRBnTjmvOvRYwzJ64esawhvIJf +PaepbuS8g5jGEK88jHt3zbg5Rk8+QXtKYx45/EiHjbq4bVM8nrI8fT7uZB+A +gaiQSXEbUE3sTZqknMek0LpQWNsHoW9NEhe6moGUVdVX94IE9uH9nVdF+yHP +tPjoi6lGUK5mqDjphv1y+dn+2AkDYLLuz2TLD4ESj6v1lO8sB/V4ClHfM1Q5 +/Dnjh3o4jHdxDZdhO2/tnhru/OyL9mt47L3cEgOnlWPO38T8MPD96YRjDi/g +ufS9UrEHURDWzyyxk7LPVznBpTz0KnC+kp6tqHsNhB8dLyl9cfM9DF58F+wD +gcRlq1DVNnD+0ftJwh7HlcnyAtPfPrBpSNF3Hm2GeqPFDXlKX9Bt1iZT7Uio +ZNkvJvYvH+3xXo9wwDouyv6D3yxdAAirKFxYTEtCxvF7+a02Mc+ntaTarEuB +Oi4l45WuWrRdxyfM2E7pT8I+O53WAheZGfRSgvvgNfXSE7HnuA5qr0UX3uoG +I2OF0/7Hu4C+lkW0wYEE8dd3jO8904MGbufmCM9FA/uRHLYTrGSwltxsmdfs +BzWio8utiy3w8lFUY6EhCZJ4SEOht4iwkZbxiGmyCby52xc+K5LAkicgNfkq +IKE4/SAWpgiUcefP3ipK/7fm7Z32kQHIPuBh6fpoMtwOWuaYouy31YnS2vm2 +C4Uo+aj+mW1DUzOfqCMrSKCgcKo7858d0r0jqh63EQ3rF6oGx7H9g5j3UfF5 +daJLdJl30940oSNXghhaqCn9zW5Mqau2o/MPpFi41ptQyvDY4ATmY3V3I3WG +Me/nJVqcPrNhBwe0pY5UUvremIGubVY3yhXrM97BXoK0vlSeXMLXa1hb857/ +1YWOjHZ8vzFQjsQrW579xfyWY0/hnVc7u1DH6p9Ap101yO9J2K0APN4Rve/7 +fyl9YLTKu+6w2QL3A3axVmA/3jvZwRxq0Q9nZ7kj8+43QQAf8BRiHpsh9COk +ZTIUWEcF5FymM5BfY3wqEeNz/z+3l/Or7XBSdrj75nAPZOuo+t7FvKXrZdcZ +n+p+6DnfWLIV0AyxxxRvWzwggbmJurhkIAFVsnS/YrzZjRLszP5FqJLg5J2A +nbO6HSjtKFy2vd+EDhwp3PzNRIZn/OX5N5W6EefLf7LSNe/R0zvf7TOwnh1d +lTBhs+tCsUIvf3rJVCHqvwvrcfi5YmM85FaMCUjeimmuJ/8tqG/J/vPD/Llg +Ndqxy/wdKtq89aAWFUA8k4FD4TzOd2PJ7LUXV6FueHnXi7JIxMtaL+OC/d67 +Ks/VP9mJXvDH7PxvVzM69DHj/Bbmk8euJIzLCBAQ83QTb5RhJvqyNi5Ri3ns +9c1dLJrXCcg2jX3H3elkGGldcL+P9ax48b6cyxOacGuO40tyxGuknuj1UgPP +v9eWVzz05SNQFi6cq2KPQtUNlVqX8bh/4YL8s1wzkPj8Vk3zUhSScfbdFKHg +p2ykc2sCAbF12Cj0GcdjHRnNtQvfd0d27vUfQwTkHiSx1ugeCytmu3ZMH8f6 +9OqJX/9dISCVjUKFd5Ep0Hira0ILr2fo6qndmeo0SCjGNnxjKQIl2DDOxOL5 +L1lyCZ84Mgg3pOdOWLE2w2OSFP1ZKhKwmTmK6mEeSH21ZKgutgk4SlXzOnA8 +VL2cNSghE2GkesY5IKoJ4ovfqyiIYf1rkO/3muYrUizS62AjNaHe+sdfT3vP +goOCd1fC4DD8YTrv1hI/ghrrx0JW6RYgvPh3H7M6AT1kPMc1/iwJHC6tlx+m +/K8reJiL8bQ+MC4HxMtOvUZ27zakblK+h/5TPSN9mYA8stl+xwilgn8B+dU1 +fH3ExvS8j7kF+CptBR6Vj0JUTXcdzuPrqasMt686ExAj97iDMf8baNAK5S9k +x3Xc56Nz07s7cHc109ZA8jVajS8LpPzvHcUqPilgMQgfqxw5rhs0w81Pc8fO +YV7qH7mDlfcVEZ6njNwE9Rqg+2lV8gfXFyOPBU2eiSiUmGDdX+CVDmb6Qnrf +cF7A7WibR2lEeDnKZ/gpA+dRbhGjswwJPowVOni6ECHwzmz76eEacGWd4BHB +9evQdgP145xw9Jkpffq0Qho0f5B6tIbryH8jRqz0XH1AdyNmLXugDYz0xN2C +KHUtd1K7bFMVZi2PkutHgmHh2+epUxgfLs7vO/N0VAK8wlmFyRxhUFk+GUHp +V8MruGPYh/4lepPAHFAwEA//nJu617YwH541OXU7RB/19TQdO1YQCQThP3oU +/n+YRqqY63YvfL4myWL3uR28q1x1d2N8uBxrMdkS1QfN525Q1yi3AnOR+UID +rmt0DA1/9rv3gzan/V52xSYIHEzLu4Wf64LRteaV8Q/o8c/xRHWhYPg3yJbd +fJMMv6/p5RQFPgXFc/r+Xs9ew7HEXR6U//TUR76kB818AGEdFWXzgC74ceq7 +d6E35iETkfH0L3pARSy5zv1qO6T5Mgh89sPzu2t8R5xZiGfhWKp9SQYK2iuX +PEgiQwLNpZQyjSikXf3MhIE9Ca3Tvn9kg3E70q/QVe9IJaKv/XA7NTQXqYZ4 +DpX24vo4+Y/N8WgzOvmZLvh0TzqS1Wmpan1Dhm/qxauX/2tH3qR39R4loWjC +OEyOwwZfX8FfPmjhCbusmG1EmuJB8bPU30lsT7/VVNWR+32QnKSgV51TDabS +AZnfGklQMPJb0iyxD3QabinTODeBjVHOLb4QjKufL5pEc7RBd3bVue/iCKqk +6FMCbpDBzUyeTX4xHTKPfX2cvJgLKheXB278IIP8pH6cz75W1LaRVjMzV4qo +Qz6HqDjien2T5uBMYDsaai2oMNtZjn51PP2udA/ny6U//CGPEVI/6iM0Jl+K +4m+U+WTkkOHP2p8co81idLtDWjdfuwgxFOVm/RsjQ0agph29TjKyOd01OcWb +iUZFqqWtsQ5SeOJuGDhLBN8vVC/HBovQj6WxZ42Yn9Q7/3rdlZYEp1Qsjpso +pMPLV1/9d2B+K/R36UiBeTAw6D2+XHExDNLdhkYp+7sPt1+rJev4g8K+R258 +o96wvZBF2sbjhGOP2J3uaaDZc3QXtkxj0GCUEMcYrpsdjyrL5Y4PgNqDEt7T +10vRfNePpwcx/jwqYnJNFPcFQ/Uh/c+zrvD2T2e+Io7/t3UCuT/Cu9E2B8eb +rpvF6OhqnSIvGxlGpPZ2Gq10oY3hO2mavmXonmK5hcMJzEPs7u5nvdCFlF/Q +n+UyqEK37/zrysL4OXm66VvZoT44xvNKXbq5DdT4GL464/vqGJpQn/5F6Qut +Zi4i2gKp9MeGxXD850ytV+tifX1wYvm3l2cc0ProCmeIkMHb6vJ6wbNuuNS8 +9vnMSCcoxlUKdmMe/mxAtv0h9xuElH++3lWbghqEjzVuYV0ztnTIn7unBB1A +b/6Bbw4qCFiyHpokQxxJZXKkvgFpa3x2ULmcjT6Z6nSEFJLhhqJaAN1KK+rl +9jmRMvsWmSdb/tnphfN9zjFoYqgDqX+be3/zlQsaNOXSYjHGeOLMSpXa2QfK +1w8EpIZVg9z9YOM7pSTguEToXD7ZD6/z+lNbTiAQttXq8I8mwdefbMcChPtA +QqDmv90XWuC2oI+ceiAJFt15hFQi20BFm56PMFYBvsybAg8fkEH0d1ycnH4b +8ki6rzVq/h69zRzfd9+UDMPoFS17HRGkbPp/yzflIl59z0GjIBKUPR6+LfOw +G9Hc6X2mMVmCrt3RU7E6iflPwg7j5ZQu5PY6qKJOsQK93xKupsL++nlhy/iR +LxHi/cdkdffUwrKQgG2vFQlo7p294pUcBLGR89PPVFOA3/qitSfO9/xTD4Z2 +2BAh//ObH+s349FxHvnDdKlYny5ku/q09kOABc/W0xuNkPzAzbMT4yp7w5tq +11NEoHlQcyIxH8GB61+P7sLjirGGMxpaRPjyKO12SEUdPCnZPWeBdbRgFe8r +3hoiNKSnPfOnqwZRTiaq/yxJsEftEyMNrr9UX6+ODq69hRThQ3sbuciQ9/QE +i4O6DfjbWi16K0VCc7M23Qsc/xd/N/cczzcBhl9+LK8jImDuDmE7kbIfpH+3 +c/M9CwhqtT8u3R8BygVmIpT+YFKaXetR8aYgmvDPQyIgAnIcbrxKovQl86w8 +SbPoAmr3aH9/NYiBd27ctnk4j7LpqpK3P3UCy7XdcNamHky7c2UzcJw76zMz +e9G2I+oO8YYHVGVocPujrv5DMlRA6aWf/M3ov2e8eS2FpejjhJUDRyCum9e4 +3alPNKHOB0TO1bhS5C7IOaAURYbvx4d4PzdXo8H+pZq92SXok/6LNaE6nNdJ +DEFbEeUookKlYKOpGI1pph253o3jVsckdrEmFsn0aqkKB71Dl/jOnqbG8S8j +GCuSxEkA6ou/XJRESkDDM+NgHuaBR5o61Xn0UmBq/OKDcI5MeFfARTe/hPEk +z6o7siMW0hMaVlBlMtCm2MVfxrryig6MXU6NgDPqoh3ZhTGwoOAe/JTSd/o+ +6UMxXSDwb9wpTJIMhJ0mpt8p7/krq6b+PE8mwpm/YuFK7hloO/neTtYoEigX +ybozhBEBzTUF/5NIQ9+O+D0hxpGgpLKvY2eyBdr39nbAgyNxaPc0s9hLbOfD +e1/pZbopQXxR+xcj2yg0f6PD8f/87fGuiAS6AYgY0p5RMC5BOar2oncdSSB1 +59M7tm84/v/b/EPPmodWk9q3Ke9FWXfxfQyt7EZBBg2iFgOFyPjmJeVxjGON +MvE1D3PLgPkQpE4NVYF81bn4N5W43jmTOTaqmtDoAUXNHZmliDHIbcs8lAxK +RsbXzKMr0Y8b4TLvpEqQyre3M+KtZHAP4julXFkI9sP00q9Xi4EcP6FJP0GG +Q8G5TFWVkdBSVN26FRwH9Ml9TYtYr92/1zMqfH4A/tLffpEo8x5FNC1c0cNx +ruLx7rLLdjd6JdTuOvI2G4Ufc1jwx/yKv43r72GHRqgQ2mZ2jasEQ/kzijzB +ZIhvyzz4lI+A3j6dVoo7lY5IReGyzzA/L+O9Vv7b5jFUylyyKU+LgFe+iVbx +2G41zYdL+Vg7oT7OyZXzUTm4ej5J3iuD47klOsjgeR5oKY3R03QWwXfjyZrs +aVwv5rq/HI8ngqKbkYusZDoi09SHrWEcYzD8oZgsQUCja79E+p+lIeoPL4/H +4vsq2x2ZvybWCx12uzNSqvMhs+bEqiPl/5NQha7AmmoQvJ9gl366As4NJH12 +KcZ15GTdUZesUgAqBnEzufdgZ/9bgb4H83m9u7ZbDe1Q+dRww/paBWiKeKwK +q5BBbCX6WL3IACyfYE66l/4eiYvseppgTgK3mk/VmX0mcKhwg2Z1LgKEzykf +peR17W2W4LpzAzD67dygpWQZMtvg5e54TILzVFoLiaIDsPsLw7eZb+/ReqVe +ZDse/9Z0dlgBz2+nOtlkwFeGmj3vBV/H4/0qB5fvcw/AsKRd2+/qUvSlxqZL +CeOYznx8e8/dRtg0369aZFcPkxmPNjedsc69pHORpqUOFIU1+Lcl64D88Jri +8wjMB6wfS4xOEiE4uUTIPLkSdsIDoT3Y71MiP0TXU3zg9MqADRe8hZ2uuuYi +OL9Mg14dUUrygnd6NC2DhQlQ6dmwI4VyLvwf9LNVoxgCaaOc+c5XQLg3vHzS +RYYTej3vj5zOgmn+KLKoUQ7Y+xca/l3A+tocTdcsf60f/W29IXUlGt3bZXH+ +ILaP29dIt5mabhQRnhV/mOkNyJvQfm86Q4Zu3bEbtowENN6zdLNG/S0csxa9 +WsSD+f+p2Ff7fvqDnenqO/neJADrOi1bHM9TDkFmF843wJZGzuL47zro/85t +4OdDBppArz3PMG7bc7mSBL+nomutP4woceLsySL9YZ4IF5nz5/t5KuFozoBj +mQUJkp+TrZASAZ1uvVW750IimOygu0Xp/2Ow+rxMo0gdPEbP9IueiELx9Ftp +V/H6Nf2Fh84Zm4AKh9zDyqwIyCvO2KCcs3BFf4O1zcEEFhk/CGb2RACTjKAe +5b9x7j46/pxRIyj3qWUM+x2J7kh21FtQ4uTWe53LOT0gwKVWnzpRA4Q5vQCV +Kay7g8ybmFsqIF2/VrOUsxxi7+4r7cE47OzS0vP2dD9QGVSMCWHdEXeh3FQU +18HHWUff3VvoA0ve9yEhldVQ9O2vMncBCTZe3Qo4T+4Hwo55a7fkBli8cO+K +PY6fo+VDyxpvHwC38vPTlhWvUVJfOUGF0peSx2qlVQfrTbqTB284JoJx9P5F +IrZb7gX+3dS63XDxYuWLsuVOUNPxulSJ+U/isODJ6HRtoNJsOSw3+BpZi3D6 +38bzHLUzv6mgSUA3MwY7GR8kgngLTbQgtqenj86raFkCMjGhqrH0SUWntgv3 +UM7zYvZxXSfKdMJmhhGH80oPOAoKChaYkGDAtbfhwN4OUJg8q/RVvheO9zAd +4ME8TTzu6YT1Wj84nBkRfO5aDxsfWYZ6nEkwuaVDi4J7wbV7p8knwQ4IdmzP +WcN5ysw81Vs0TwA9teMMtPKd0B9dZHAY4/Y3/Sv3B/iLYX6NqpkoHwV7u7uf +duG4rXUwW+Sm60Gz/xjLWz3fA9Pz3u3bO8iQc0TeXezuAJJqMTjdvbMKSXAy +qrdrkWBI1bf4UzQRomx4QzYnq6B2tYl9C/NM9sqW4UELExgU8khrM4kAJ75U +d8r5JrZOHVWKmG/Q9fzzUDtdDyevfePI1sU8bUouUp+7B/1gGO5by4uC47Sj +HXmsZLj9x0GNf2IArhNrl8505QEpoyNtBV+voHXmVZRCLry4KnQrniMbko3z +aZ3myfCBNVCf620LaurO1mC74ovi1DZ8Xr8mA/v55Cc+OxqQt2awab29L9q/ +sCohhXDccvoHOoSVoYHuMx1d+7xQkHOosd9/ZECI6bdsQTaSMG7i8Lv6HPnv +ExL3wboA/AZzJT0TkPIFCf2QNFuk+YZM3MD4YHPcccjllR8y7hJgErU3QQyD +9olWmM+/0Rzo3eTugw2NCIVG41B0/pSJ29IKCXx5PYUzFvvAel++6aGLdmie +dFmdf4IEDUdK/hz/TAAT8dPsqhFuQM1oY+KK+SSVFH3JYZkm+OkTvdhoFwUa +xzrGnmId9LV3q5D1fiG45xSu7mT1gS0RQ3bhn2RYuX/4ko9HEtzIe9KesmEJ +VKOitIfwOov1rnW2ucgg+77IWkNiOGK5ZbK/CfuFgd/W/ZiMPyLbTvP20qei +i0l9TpqYf467LfMnixEQzcjBMpeoXCTMwy8egXnXnvrO1/RlRODuX3UJ46hC +xLFDvCNYL9sXcfzqexIGZ2qrJK85JyBPG23jbYxXTO0xmWMiA0jW5JSBC08s +yg0NzT2LdfH0BeWD1N5EKGfkXDbNQxBsp7Pnux4JvFbFDNZZ8lBhN6AYJVeU +O76YaI913NXtZOdTqBxN3aqe19f3RAOC3OrXpsjQNFLwQFO/AUkdty1ZI71E +vjLnD9vVYl40o8L+1rgFuepk8yfFmSPzzIeld2PIcPzUr2cZqm1ox6zJv7+C +xsCwweho40mG0UW+sKTLLWj8nMj5/c6RUKmr1hCEr48qzl9sXPCE5Yb3qlIn +LWArOZQ6Afs33DOn4iZHPAR9WbaeqHGGp49Fys5gHvWrSdjSYKgQ/q2s8E+r +hYMrSbZ2Hev6hgvDC34mzfA69+uWn1IKjIhqDiZhnW7h9+31zqUe0NqOiBje +ToC86dJvH3eT4V5Dmbxyfj9Irg+oMVyOB6oXx9771eP8urV8kCqQCHOrUUov +TOKBn6thou0tCU5PXtxHR+oDqxCXKq2uVyC96xryHMc6/RN9oqP2dVTDP3Ix +qzoMDd/hyPuO/S4RqT90mzsJHhffCUpTikLc839TKO8ZJB6MEWqsCOjoqa4v +NE9K0bFbhWmX95FBY4Z5ZfeJLuTbbO/9tKoBLXndblXYJkGAZ3DmvFsqWG5T +Kz0SkAOpR9vSGXgeOW7LFuqfBJTMMcUm7VECyWNzS3W7yLDBfLfGtrUEpfpQ +kX7fakR8DtcD0xLJ8HqGPs3DmggVj7+7H1mvRbInxo6vYH00q9IjwO1MBPd9 +DiHW0g3oaGCeEM9DEggwKy4bqROQy3fTb639hWhsf8S1NhYyfOMRLlfK0kcX +P3t/eqbvhuhednPUY3+pzTnJFGXfRDrrs++ms54jIsPWJmVfwG07jfGIzx8Q +Vxix7M7TRuS24l/OtkkC/4j2qqG8fthe/1Hv7dYAEd+KPK4/J8F/5YLXi/72 +Q48b//cv9+qh66ZdnjvGYcluDkPX9BRAv/ZLWcNV9CqooIMDx78KSdF1z3YW +UO/d9ro85Ah8ifDiyCoZOF8M37+dyYkW77/8G2QRBpK8dzWXKH0bRsYeaZw1 +QqdWfM2gOw58aY4l6uO4MnnDRifhZozelHAY7FWKAYaEj1aU9wxeJzN12H+3 +oNt8gx+8H7bDf0JXxUk78Tz/0ucDUgbh6xW3cdsflei1p8XHMA4SRH64qKaU +rAUD1hb0+o6RKOlqY5Ynvu/l4zKBdMwDkFypH+m/rxzZ6XJfzsI8IbvtXIrl +GhHS8iYfzRdWINqssd8ilPFN13aO66/QZpO+y94/MejN5d+alD6iJxme0s0c +JYKTvbxT4BxCN2NvF3zGetNn/8ETYwnd6InxDuvU9SzkHGhZ3oR5Ts9kZaye +y1tYejsXOHAWzxM7xuSB40cti9aM28EJbBxn+O0WrdB2ysMESr81Q33Tj3RV +/XDjDP2Tb2oNYNeYAevY/t86q9X1ZQio+XK+Duqsgg2jC8z3t0hgle0363WU +gP6tDcyqmabCXzuGFsbT2J60l3wuuqtD3ab93/hv4cBkMkVfj+3wxin7CrPN +AGwP/vtm9LccPh56E0U5byund6fdzG5jYMsctY366Q0Ru5KPBeH1/B09Z+Zq +0Ib4WY0MXL74oIat9I9qHljPVpUyNzk2oU8J0mcs3vqil8/K+TuysV5WyrS/ +WVeNdrMdG7t7ywdFb3g11xPJkBI2rnxyoghlOR5XT+NyR6ZFJ+pWFsmQNtBX +b8Cchji3Pguxk+zR4+GvayLYPlH75z8HZDch1TOC86suCXCkJSXleToZHN8f +dFH9GoH01PbadkyZo9ruhHaKTrzhyHUhm6ULrPZ9Ky6zSEHvr4gfyMR6JPbR +XNZBch8Y3pkbrDnsgQqzTVfqMW4c5kerz+/2Ad0enwnTfTIQv3f/nNQvEowG +/zRKWumAkLTd5zx4w+HEnsdnIw0wPne2PH6/vxI+655CgzvC4a3g/Ym4MTJ4 +X+j3dnmRDl3HEp9EejrBfvV966nrZLjTcM3889tY+KUJroc/GEDCq4VNyvk1 +qwt+dor7BmCa+o9WeGEZCku75DGHcWB319SDBX0CstVRr1ExykL1wpFGDbge +dXxszZz6yw4NWwf7hXKdEJ153tIoJa+Zs8I1Nfrg1J4CxvSWKOi5yTxRQCLB +ca/X6xqqtuj2JqNl049MpOfI5LpFOUfv/N4jIlzJoHBIbHOGLA4hhTsWKfqR +IVZl6sBXIujsyB9fX3qHMlJf5xMDSeA3pCssuGsAdv35W2LIkoN0E7OyIjxJ +QNqfSeDTjYAQ8Qfnr/CUo9IzXCIruE7tXYpPHZMkoKDzezc2dXGdfVKYfBDz +w9My+hHWmUTg/TN+5nZ2NRr9UyNahZ9X99bMCT6JFFg/uZEr0eONqNHDB7+w +36vYlrfUpruQ7JTgyA5GhC6cuB515y8J+Ja0N+nqu1GcxL2WHYx1YFFloOu0 +TgKuq359M4vdqNXiSzP1TB2sf/mk6LREgve9GlkpxFZ0JYTukYuHF6LRMkGF +fpjnJOWtxSw2oxt17x4YG3kh/tqThbUJ+L7ZlcYp2Y3oTe3V53t4vBCHGovf +dawr02XVmUmS9WinW5X/WT1PVH+wa59GG9YpW4Lhh5YqkVWqXY5ltzuqlPMd +rh3BeBi6xTX/pRRFZCUd7Djiik7kn9Sl+06G6ty5j5mEAqRc9G9/4gEnpPxS +aJ72F+Y/bQ+uE2Qz0XDFy/iMW0+R+nSJytM1MkQzKszan0pBWR4syoVB1ugD +t5SKDvbXc/NXgYUPYlGknfga+a4Z+kwWv59O6VPd7hPRlUMAttPJ1rTk1+ha ++J1FgVM4DhdcLO+F9YGAv16tdpsPItezr5rOkqDATimEn7YfslBbg6fvc2Rn +tK26OkKCS4kyCoSePpDSUvmdIGeOBsRN+M0+k+AD6OmG/u4Fp25PjZ3q96B0 +j4BsDsafLv1OnfZX3aAeZrZp5uAON84+LPIVJgPb965zCuNt8NDn22H0NRjO +PXdffeKCeZeLzZeyBQRT4gKd7VKhYMjz9M5xzFeTjpG+pBe8B6dPQ6OM8r4Q +suPLldqvOD4jLlhuy+fCSgBPiMjIczhRQl95fpkMIld7WLU50+BWqjLLMV0b +WLcUeieO42fGIps4WvEGjA82PmLqMYSVGxWRjZgfJnI8/a05bousNUybfsg5 +INsgdxnK/tYMnnG5IrYBeByG6jv2FaOmFa3gAQcShGZLLbwK6UM0U2HbmcIV +aN+R1iHpNozzJY2BvdJ9qPPeMW67rkq0tiTrtKObBMI+XLVNplrg8pjl8pXb +Dih3D80byr6MjatenYSpWEhLvNF/ilMNfS4RbojE/pI7GJwZ06uP8lMLLlE/ +DgDdvDoRpX+U/3UPBDypSUNhLjFT6dE2SC/cW39sgwzJhNzg3y/T0fe4kbsR +a44o9WbNMgVn8i5vNGUut6Dfs7fjhUv8ILiVkTAXRoaavyEpt+6GoVOStPOE +ASNUWjAYSdnHKpxaOXDkuAG0d5tI8tm6winjMjnKeUzpPpe/+4UTgZZtXxnH +QiJM1/76XZ1AAj1/M8LW12hInQoLSLLXhBbrjORflHOHn7xVbO5sBhV9u58u +AtmouCdc8mUkGYQWB7aaB1pg9FXq6w8lNWjvIf0CFkMylHunvmqg6QJ6YT59 +HbdmoEI/v6V/IwH3X38qBlyXLfMy1WK5y9Fz2digh7j+pmjz6N15lgrmT78f +oL3riYijut1a2L8JJJvTFy4QoWsvR6x3TC247Dle9dSJBBNuH3MOhSyAIQx9 +2NrfgU4fPqR3QmoSsvxVsy4T7GGRdtQjzM8WHZ2e/Uw5R2mWhXfmXXMXmme6 +4srJ/h6xS0Sl/MV4dbSyksvwBBHOPr5FDLpUB6nJep6KuP5evvzKR4CTiPWk +wJlup0ZwCCV439EnwYrZWm5rUw9iOeQdKeYSCcPaaR8eMZLhfpi5yfKlCeQe +NnOOpa4N3u1gDW3m+QF5vlOuNd0GwCv5rjnk9yu4bWmXp0qp+9L7jLxqB6F/ +9njf/sgi5LvE2jAngutC5Lm5WZZBOHvI4f2v5ALUL6J9KFuVBEd0r1Tlig0C +WCu+9AzLR0QpuW/XlUnQNuJc6N/kBHqrKSefaMSgb6vly5XYX/RO3l2dPhi3 +qwtnWzPj0dOgZq7/MJ7c8Nc2obMhoBtp1YRywXKUqTT4eZCWDPxSZPbjV7Cu +z3XqdN/OQ7tvsJmNHiWD/Zkd59UuEpCWTINGIWsJ0nSZyBo4RAZZun8vBRht +kPw2jXbsLg+E2EueZVH6L6Xmi4RpdaOq88WuVDn5qPdZurErZd9roNE7j3TM +c6jPTZlkNID9bY0TNJh/TsoamnTfTYTat/u660sOoAyeaz5mOH/tlw4mqjAQ +4dJ6I8GwrA7EQiW+ZmO/vNiYbtHiMAB63mx4vRoOvPtflFfiOM+63y/q8k8e +PObZRVJehIO3pFgyAY9/46+0IC+YgL/kv9NGqRHQo13rQ+nb43/oyOO8Xllk +H7j8nKMmARoPBHpQzvPNj44ZsSvQhzPJO96UL+iDDznnLGWf4LWJlwfyJA3h +myDbw4VHlvBA31CU0g982SkrbeqmJeyKVtd76GMK47E/xyjneZUzS2wbJlej +oIqkdEbBFDD++UmV3IN1gYDWsux5L3RcfepM6JQ+sk+yeZWEr98tzExUtMpA +6M6Ls+uGJbB2sOnzCtbvy/RHD4uSbNHc8fd7FcVMUeiqaw5lP2MjDTv/c812 +9J9YTd6zSS+0cFhTGxwwf1A/GKjZNgAWd52q30MTKvr2xuskKwnMDmu9ESL1 +AkfnzKVfjO3oS6CJdtATPG7Adi2bnYC20orjwkqzkFGwcYH8KUrfxbyxEtNR +ZM8hbVCm14SogvpszagXwVuCS1OAiYDOz7RcWvqUhi7TCDj6cZHhwaWubWpu +IlwHvj1JeQ3ou/pBnv2mOJ7HFWrnP/XDs8lLpxPLGlH08O9bEmYYVxW2FUuu +pgN5reypZ3AYangQIjuJ62BxfqFExItYaKxa3UP00kQu4rN8GRT8cYwx6Nzu +QWoHHlZqK1WC38sgmf0zJEglSqteynqK6G1PONBKhkEAScvkM/bvIA3tGg8i +IN3t56zP62MhYunJDpmTuD5ajikLhBEhMEXiZOBAPHQllmzNvCGBFnNceCLP +E7Q+3sVi/NoTsdfsPB5F6ZsRWSugmeeEjjDUEv14vdG1pveP7PG4zRHU1arX +jRxzbLMeuReg9aZvypT+D/lXPfbMb8SBdMa7ze352+jIYpyuDl5/5tFj1Jak +PFAJT3an9wuA7cfdtJR9oMRhna49c/1wJe3AOT2BRpC7vedzBMbDj7zOtPJ/ +MD5zuXDqeNXAy2Pv/3zSJYFEz98NybQB+Ch1Imb//RRQGr1x/YsNCSzUarSu +07SB97iDYErfOygzA2Byw3mtHF5PHitA9iIoqPyjB3LTmy3q/onrgpViazB7 +DpK89+c+vc5z5GfeI8G3QgYlVxLfcmAlktJIe0xK9UFdMpzeXaOY54fxKPA/ +KkPL/RfKfQke6KNyUTzdFzIsjTtwVIlinbmTy2iD0wOdJOXm65SRIUL/rUy0 +PkIzRx6IHt/jgeSuzpYsNZJBa6npdcbXFnTW8x7Tfo7H6HHW9ABrBBlK3aWj +M2eb0Tf3MDmB0idIcoX7pfgbzHu9qE0H7rWhQhW2FItDtmAkOukj44nj5IhA +50mBNlTPLp2yu+w6XAv8JgneZGB2yuR8U+sHBQx3kkfCbMFQe3bTgHK+20dy +bephN/A6LcasVm8G7GGzu6op/azMSY5FhYkgyvuV1tzRHY6fT1BlxDjwqsf7 +9L7zMdBpwKR5q8IebB8qvaXsg+bsWix69KMEngTePFgcGQ2D2bU2MZjvPUn4 +/WPkZB5cL5HJussaAOn09X/XsX8TbmVdNfdoBJ2DySwGzknA+jm6g62QDCyi +/4UfPtEHtvc5fhYwJAP9QkD4wWUSwDse96B9PUD98Acz44tE0EpksVVnJcOX +qOWhF7/6gc+1UUKuJglEgmXrtEtJYBu38tcU46qyZ5nch8Q4iNp1e/gDIkHm +LY3I6OG7oLI/pdaeKRLxa5YPUr5rhKkJoqMyr9BaxZciA/+3aP8TNbZ1XBee +UilOVzZ2I2oh+aw+mUxUIV3uMovjuX/Y4GQUrTs63n2Tr93bD22VZ4ZdxHaz +Pnh3fm+7G3pclnz0gOErpDfV1k3574Xz2GXm3YFuaCsyatAxNBAN8FV+p+yX +/1PyMkzHiQhcNDucNCqr4YaEyp1ie6xn2fczSkb2QKl4dV/ebAs8CDQ/55ZC +AoOWUoGMl91o56FHTMHOeShn9wVfK7weBYaPK95SncjYlOMG3ecmNDBfxPqR +BtfTC4PL0smdSPpDWqdLVBNSE2Za96fC618xaTx1uBOVhVG3+2g1o9POrHZc +eLw19ak3myoRZlc9eGgcaoGGliuND6+nlcAwF1JMBPmarenG21VA6DX/N2iL +8WFvSPDkEhHCF5o/BP+tAF/llzKr5hjHkjY7ns4SoXIk7Pizy5Wwj8li5yDO +30jPlqLQA/7gCpvT29cTEH3tZ2E/Sv8NBuLeczcJ6K3XzDOlPdmwZnpzvugE +GQ6U+B88YEoE9dZ/JSTzGrCREYocxOvRL+oWPixOQFVD6o40IZmwvEPh1xgb +GW4dCprRvaOLOpReKFX8CIZfXLZNJyj7gm/6Js9Jm0EF+3U6pz9J4FArvLSG +/XugNFn6HI7jLkmiYf3RNECXQtWEMb9qU0rTny5tR7Jpzju2yD6oIvdH6bAd +GXSTZT3jOFyRWz/B8tbvDHTh+tR6COW8DxFpxjxjH/Qi8srJPqpIZJenJnsa +x1Ucs1VSfmI30nZluftxMgupj+3qz8d1P8CP9PxdXDcqdNOsC8/PRmx7NZnv +4HGnkUpy+vkedNds/NbGVh0inuoy/zpJgjMpfS+PJjgA+ynB4UR7K8QXt+JO +ea9V90K1otTlDZTbUS39d14NMYLtCcp5NBfo9SU8kgZAxVPr+92AUoivVJBQ +1SHBl49L20EaBaAa3+w2V1kIZ5nq1oamyTDkH5qrcagEcZJPzcfu9kD1CkP6 +8gtYF3x0+mraWYN2HbrYffaHB2rV91i72Us57ymsgxjbhPoTOWdLfjkgfy9n +p6UsMoR4rkZ9zWnFukxVe/bNdXRgaeBq2ysyOI5OWRCOt6GZp9kHPBJfAvFi +6IF0jEuP7I0f9oSGQcNyfER7uh2cqeC/NIbtFrhbkkZe+h3cYzdxlE72hg8h +L4zOYf7/xs7d18OwCjRoNBnPv0yAVzmV0VmDZHixM2SS+uwHyPxv/FmAdjJU +TcaRE5TJ8MH1t0745z5wpVqNXqqIA6kOOSHtcRKwXSI63TlNhHmhrOZTa28g +57DVjbA8EtAkSloJc1pAthFj0zjnE8QYrvCTcj5mcNq1g3HS0sCSeOHTnUYH +VMrVaEUZL+wa5aHOJ6C1Xz9Hso0L4fTnerbfB8gwsaim287ZhcZJI/2R0Y0o +rtTmm9wqCeRKS/bQ0JYCYVS7ZiM5HqImNRViZsgw/0p0/qXUewjYiJIijCaB +zthAsRHmOQIhlk9pNPuA9ZcDWTqsDc6mxRU14jyyK4o72JTRDyJ333wIFGyG +EePMs/sNSVCToUpSuVAIzxjFz3V6FaEBg6aNgilcL1jFA+XC+tAmjTFTulQR +yJ+QNOofJsGyBvUJ1nt9iHfGlu3LoVK4eTb/gNgoCbobOxfnDvWhK00M6I9f +GUT8UX1mje2mo5QaMiTQj3Qzume592QAUVmaY6YL677qP6/jjhLQp7rQjotT +6SB7lEOml4MMgpYRD0s1nyFGrvdZRlwRYPZIxIPy3fxkjAzV2mgN8N978/n+ +VAewGUu437hAhq9sxvdTVAiIU4Y3j+pxPTp89oVl1TwJQubDgwROdCC5z8kl +Vz41oye19D036bHfxVUFAlvbIYvXR2fVphfeV2ud37QjQWx8Ps/23z6o0za9 +fm+sBSKjVjLNMb+6cDAiMuo9EVQFYjM0nlWDdv3Cx8eWJFBIKC99yukOkuMF +9c0TccivsGqR8p7z6Uz3l4/8RCBEa9Fr9NfC67HLh0exzooVPM6WKHYfgiwr +5KrvhUHOExsnynvd/PPdYivz+uDWv8zocSkUZkkjLXQ4Ti6JiIiUUAfDz7ci +AnoMCSgxaT70Ls7TsbIwLs6HBHQs6uoisOXC+hRNVybWF9R2x+YeshGQ95Wn +vEo2GVCgP6HBge1pqvt9QZyzEjULvFfbW9kOUyG7e7YVyVBRy7w1JBSPFMrZ +jnjdqUf0V39kZjeTQapCN7JbewB2eLF5KTGUopmee99qsR0GguT+s6joRgOX +x6XhRSY6vJZYpI7xZ2/mRpKBZTd6IX1UiYq7Ackk/fqq85ME8rvneB7Nd6Hz +fDmDe1hKkf/P53NPMb89/KX0Tos4EeZ6YwcMyhB8ETv44zqOzyO0F6/48RDh +T+o3wvrFBth1oCZ/GNeFC4H3m1r1jMGwdmstOyICftWd9E+m7AuQZu67P96N +YlyXt391pKO+71/yXHFdK7wXsm7V141ieURFdthmoJY+wlwWHs8Z+uEXdpwI +znaEt/HPGlHNOOP8YwMSpHFYDj2jowV5I9/YEWZXlFndzNWF7S/uR+ieZDKB +72w8zAx/7FHV8Mj0BB7vbHlFc/dhL9p3W8ArO6IGbW5IxNJ/JIFaecMiHy8B +7WYTltq/ngIpWYeCvfDzFsc9C/kpRQSehmNh5TUI9S5usD3Cz0VLyq2xLeuH +cFkn1Uj/JlTAHc5804QE5xIPud+IIkLVmRpnm9kqUB7pPXmMsh+heihxieAA +Pz/cuvtkLR8lCbfqDf7C/OEmV47ZWw+kyq+2OCoXgmqtBx5T9FqZ4KbJinsy +/AfX87iTQhHh0IMjLbhODVW2KA/+joCXF2MvlgpVoLt3JDdmJ8gweVKiy/ze +Y7CTFzXts4xC7yOX/hPA82gwzEok1cZDoWSvyni/AgqlbnooiuPcZf7aReff +/WAbXbx/w70ezjrUn9HAOjRB/nCuThQBBYedC8uTrwLBT+G9ezZI4GWSTFwo +ISDj60KdFgcqgf/w4ifuTRJET5y76ilyEYn95FJkGAmF07IxutTYzirOpffO +s+ojXW53nb93AiGO1dhEhtL/iu3CA013R8SQX+avPBUB1LMj8s54naxUR2Uv +dA0AA4NF0uqTIiQXIysUiuvXfMht94ub3ahT+9qVygCEbl36U82/gPFB6LSM +wgcCEjk3IfG1oxiSw/Tmi/eQ4Wb6SVMqPwKiOzTdf0gjD47+szHiOUyGEoaW +Gs0GAvJ1H0hKGSiCkzfrlawYMA/0iCJ0LA4gw3f0d99ezEF0EZ0Tj7G+mPww +HRjXQ0QhNcmq+QsFaASs3+X4kmDT5RAdD8sz4Fdz0yrKs0ELC9yBlP28Glq7 +7pj6WCOVhNtl6TmBIKfMwnSB8ryJ+x6kihFQaLhc/SZXDpK6K8PZj3mOq7LQ +QVtVAmK4/fi2skMh2vxhOHwVr5M95v5FjY0oeJRHX7R3PA791NK64455y3sZ +L5ljc6eARmHP/W+WzohDtfo1pU/Fn4dyr+n2D4D9DkWnlzttYULiG/FaEAlc +Ccypn9ycobwntV9jOQaJXQm3j6P0L/LjvdFc3o24JrfHd3hmoh+H1vbfxzjA +/tNl4fhWF6qjPVi6sFWMSiUmrQ/gvIsuWD/MyN6OzKTYnw4O+6D/ngryVDnh +uG20ffbqbitksKC0gckcxCuSgziwHqlZ/8/PO7AVKezyDWXc6Yt894onpwVg +ffE8j9PhWiNKGeYclk/yRcon9za9eU8G1XO7HXhOVqKcPSwfam96o2JPxluC +42TIVbLeY+6dj3Fyb9f+y65odJk7WADriPABLzni9WQkrehs+vjdE1TZ0v+h +DdtHNHSF2vR+CAquHiqTMzdDf+hZtQ5Q+iP1t02JmPVA1ZVHSmwd0ejK3rpa +Mya8/tvdPSSqfiAUWr0L1HFGeX+eL97EdXD4eMnhXa69kNhz33UxxhrIZwe9 +hGnJkDZa3plU0Qr5UWalYo6v4di7zuBwP6z7VHqaL2iXgoWTcTitWCCc11/d +HMY6qMPqURbvlVR4iGWdTOsTKDxwRqsc5+/zpZZbGeLREGo8+F5BUwemRvYK +U/qnyQDdqo0wEcLmKvw4kmsh4C2jLuX8XH8D+mFHXBdmhORbnw6nwyity2Qg +rgvvWh85NT0mIPV5XgX6s2Xo536D+2Q6Msj197FMi3kg75aXzdbzxkghQoW5 +ENthMNzq/NRbItyduleUHJmGNpILk91icF4PeXw6H92Moi4oZwfa+aKJpI9q +u5LIUCB+9Z+GUR1Sdf87tEHti7hksip0O8nQTqybSuIsRVaqDzfPpnig1Iv7 +tdtncXxuv3+9KJqB2gcY99x+7ogC0kLo+NbJIO0QeHPvZjRimG1l5uyyQjnT +935P4zh8XHX5jUFeH6x6/nYz6PdFwJPtE/2VBMV/muVXSvsg8qvlJ7kefbSo +aT1wCI/vf+z9YqusC8RaBfdJsr2C4z+v+7NKYz+e796/Pl4HxhITWZF/I0GY +dybAqw3r3PseVY712RC+FNpVcdQdTKadzA2xrp+qWVsdfpcAT7acbHvjTGDT +7X0Rpd+IoUHDx+OK3dDxQYfX7W0XHGZfdntoQwLPNCoOUnILTL2VLdkl8AZU +xTW028LJsLtjf5fNPcr/RbKenwyS4dPo2Pk87JfUWzOjdtcLQIn1VCP3VCjI +R/Nv5v0kg5vml7dszOngqaB/MXCPP+IP1Hjkiu3DIHbmVCv2L/X5UyViK2nw +3PE+UxcnGeQbzPknprvRgp3+fs3kdGRyc4fbJZyP/Cvnyj6yp0Bg+ucyKlc/ +pCSPeD9TzqfQtll6E5AI1yxL5Jp2i0Ny0cj0ffxcFvKa58sOERB2WKu7VC1U +qJT3hmBe2pbwxSb5FhGeLTkNxn+uh8kQaY5PuI5fb3Zx/urrgCxEuHs4e41Q +1Y45Hkqf870ppkXHJZ+ALK9WwXpBNLKsUUucxX6c/NGw72RTP6j3JBwYU2xC +ChILo8W4Dm7VmeUaFejDU39hdrozz9DMxRfpFP68MfDoxGGuNJDK8Tu6PGcA +ipO7w2Tw+vesb0aAShqkmXxbQMoWwHJBWY+dct7unf9S0svegfWYTvr5Lxag +nYpiAOuCI3uFd8d/wjr6f3RdeThV3/dGSZQImadKpeGjUKRkUaTMs5ApMqYM +IYoyVco8U+YpU5lntnm+hitCNCmVuFfmud++3/9/98/1nOecfdZe613ve+7e +aztNruWW1KAjNgzJmZgPaPFyeAnRVoG9rgk/7VsC1tdF921XSdC+T79lUG4Q +ZrgTaDJOJKKP+ua+X5+QYIXT+am9PwEpZWocLG1/Dc9mfXK+CpBB1XtNIq/j +HarXu3NKnHsQIbbTlbtxffR953Rg9NgA2rR1UHD4RkRiy2EVv2/MglzdVFtZ ++i30YUeRnnFQIEi619/Sp/yvkdjPQ5fVjXhcal4Kl5ciaePbzVyYV5zTWLc7 +ldyNXC24c9/1lSIjWYYdktjuU8XJkq5QBAExvK0nHIsR6SrRimaEDM9Xfjjl +PC2B50V98Z2tZchbQZzZpIsMT3sH7ddpRsFNfEi9LT4Wxbsb0B91noUq1UjN +XsIHYHD6fZnPpRDd2Tk6tTdtFpRM5yLXrbtQ3czR1mS+JpQh9f6jF67j88fM +9JL31sIZk6/aEWKZwH6Vq+l1OxlmZvV4jW8QoeDSdCJPYwNkO7s/yTTB/sx9 +ENS3NgBVF3nF+M7Vg+nXEb1o7J8wmtpGCQYitLITXQQm68Ds/oL5HQ8SGBVk +ZzXsJELbx2vlmvvq4cx+BulwSt/7mzfiGh8TwTzmRtBFg1rE+mcru8CBBP/d +f8BOd7QHwSkq4kuOerRU9dbn4hYJ/lWWUH3Z6EZHIgauj73Fdg3qcRVs98gR +Mn0p1YNeeK3S/eksRLfuxtMoCpFhy5B316fd2L4mw+RpWIiKkj4/XjiGeeCL +nIOmbWZAy1RBbR8SiabLj/N7YRzm4beu+WI+AJv0ggd1s5vhcFg7zQFrEvy0 +miPP1gyALcvBkssBTdAjLqvsdpsE4zTJ4/6tA7A9Xl02NNkID1X07bgxP2z8 +4Vr5gyYUXskZx8pUpEOcmcniBs73r1m1L8Sa2gFJr6uzyvSDeOAe1WdmJFCa +UVt09exAGROvJAsVm5GItt1EGD0ZuD5v5gsQOtGfye/JJ4ua0HSw28qJbcwz +u+U1dwvnwM/k8IbTlSlozw/hazWYT94olSO6iBbAwd625LKr2ejFsL7HmWlc +3z9FDYek9SCW+T/37fTrQZLwe0xgCesC5pj3CVSk+tF3VzamJXPQP13GqH3L +ZGhxe85NbUfpby8TVMLyEmlyHS4ZzSCBbeG/QyaG2RAzvVEhQh+LbIq8hKww +ruZwzjdEWfejQcn1i3mTFagr5YCUTicJnA9IO/bkF8HHj2+sf7N1IOHanKhe +AzJ8LLtxghfHj46+4K/mYwZoa4PupHY5Cfy/V12ivtGFrCdfiNe9aEST5MQL +ydRYNzFdfvWqqAtJS8n0Gak0IhLn+3Laf7guBBmovCjuQe9TAuZZhqtRV7qN +O+W71vl5D83I1QFEfznJWzQpCWzr/2uNKyZB94by12dskzA7Mv6aN/83pBwt +3flvKxG46o0EVcbtgDlL4tzH3Gh0+uRfUQFKX9NXO8M9NsiIj7FdNscsBV1R +9NFWd/NFBJp/XkwDRDAh+rys9quE9DOMNwLvksDMpoNe6X4XnJLi3vn9IQFG +ptPSRnA8f7jJcFyYWhrd4zl99cXHZ0iFbcXHiXL+svWl27NJ3XD56ZJdy60e +sOHs41zF13vFfHo0fakTlR8jaPudbkaVxhP25VRkWIyu+sRdT4Q0xV3Hdeyr +QHqEfcELP3f/hk+5w/oAEqCxOnShrBANnpLg/JtOgsAVZVGp6x0oOGTw9GGr +ZnRTcvBID+bJA21Lg0NHCUhaS02sRCoNhJXfXrmF8Wc+3f38xr828JSVPtu4 +1QeFhOubF51JUPD6J6dHBQHCuyXJJxW7gL50qyEX6+jpeyqxV+S7ITjke4pR +ezms7yG9L8f1S2e/JdnYoB+MTh2QtG+PgZPCmptcJBLkERl+HBMZhD8yIBKx +WIoOX81WycD5Erq/+oDKgSo49O/q/tMYNwgvdZiUUsjAatX3aIb/DfiX7010 +2c6A4z9zW6hxPWW6rfz4yUkrSDo+TJPVHwHXj8Reo6xP7n7lZaV3h4DcLd2i +HF4lAa+1GemTINaDawpPX88RYXLaRrBusgKcc6P8U3G9u9XnXDxzioAuK1U1 +p+VWoCvKtTLamO/t5bVOei5gBOf86uXdP4UB2W/fS8r/KRdaKk6cxDqxjDji +tBaL9cJDCbIeHxlePdC/1LJ5G678ion7KRcBE3viDuTh6913Rh36/XkQXMON +D/GwFaLbS/6KqwYk2NJ8F6VaHgO2X1tFbt+ORzriaV/cMI+dFj7FncRqCRtU +UmaV5hFA5JLrzMb3Waf9fdm8nAiyWSFMin5aKNhgsWhnAsbDiOyKvp1h0PjW +ZOQjTxlqL9zcxTVJBu+zRk19RBtYmdI+FXAqGn2u6Ng8h+9D9f/8gnbvWszf +NQjbevdvCqeUof4imsfLOK7a62q7XvQQwb3ALmxsugL9GOYIPuREgr1v7Ryv +VhPBTNE8/Y/oM6R8IGjmSxwJ1LN9W3aytaOr1q+WWedbkGyUSq4rxjF7dfN5 +ZazbvRIKgixONsA72uF5UScykO/t25iPHgADc7eKzfkGsDjQfCIZ1wXNxYei +/wKI8Da2U6ZIqhZGpPWWTuO8+JZ0gpxEZwWvrNNFbavuo/2oOWIC59HZxczl +Mq0e1Pej++5P9A5RP1STasH4v3Ok6p7XoVuo5lBYeZG/P+oxzXwVjq+XC76y +qxYIaFXt9vAWUzoSWXdQvYP5m3zW9ZNi5taoROS/iTknH/TEdcE0D19vW39V +4FlnL5wa1UzMdy0FTgP5UZ9FEpxRkRbZ6ZwKlwXfCj/nNALqvhe2F/E80gzl +3/tzdhA+c5ypZGgoQFcPKbpOupPgV3D5T0nbHtT8MSv0REs9DC03tCDMx94x +vJGdXelBJIOs7L8va+FZgCbjFrbzt4aztxNyIHjwdTjrHX+IGH0WIoLxVto3 +WM2V2xx2C3+sbWOMgJPKL90o/RZoeN9smJ6wQeJMyU4Bf7yRZgCLQA0ev49G +X+njIwQU0+byLpcnHSW/Ku8n4TxdUbgc9OToIEQ28LpIZZUh1dy9cj9tScBY +dE9O/W8P+ruteO3IZgZ605OhT/EnWwHL9MKHAUhc/fZoRy6C4xxhORl4vjRE +J/j9k1qRRzrrQscfD1AcFqEWwrpPQKxVX45eDY6ep9IeE/ADsTM33qbj8ejS +m049NCdCUewxKqqhSFhmHy5VyCRBrqrz5bOne0FXT0ohOa8a7kV35LNjvb9c +mi6bdy0KPnWvJDl0aIHzc9sjFpT154LCj1LuWYIznw7RviASLZ9/Kk3py8Sj +ZVnj+s8G3jVEHZ0Kj0Im3z/tp+wL6I+r/+bYT4Th8RvG/j8qUWC22XXKOUol +akzPX/5LB3LZwOL70wHoF6+KsTrmmbxt4ifDTqXCreteHDcOPUGmN4YaD+H5 +vZMhZiqIxy9wUpJ92LQGfMy7f3x1xX7b6C7+LnsDCh4+4w0ZCoLXL5qH/8Pv +6yBSKj94UBuk/55eKuR7Bl6/AtcfYHvYU+4XW0eGgbax+l29Ugk6OsQ7sTYz +Cy93Hvh1qfo9LOyY4qZ6UoBsPm0wsZ8ngVqBRtewIQG9kXKQDMI4n3c45XoF +1rOF3dcStgJ70JDyqjb1XC7KyTnocgTr+omAM1NCH7qRv5RYnXxhCYoquCFI +i3H+YuLIX+O9TuBXNNTGzuSMxnhjXEb/991MZLwsewA06Q+W12U1wDK/kctb +PL/NbHM5O6oG4OXEyAq1cQPIHtPKzcX2gCzaL1MsRLgvTmd/LaUOvOM9No5h ++680k6LyTnX0fGs1+CtbMlRcma86j/XIcGyrap/fIDxMC82bb08C/cfzl7ax +33QXnVg//lEAjvYxpiSyK0ic7L5POYcudIF34phFA9KxMyx7MxcDHDds3fyq +8Ty6JNWY/i5CNs/+FuwUzoL2om8CF7/jvNYTNLH5Y41Y89Y5ay1tkODVC82z +lPOGDFRUaoVbQVNL5nqVQhs6F9R9KJSZDFXZDeMLYZUQWiihte9AE/LQONOR +jXX9gzdcB7TpCIgrkubsjv0Z6HVAyQMOHP/+8kXUjoZEyFLNi6/Tqkdds/oe +5biOvOcc7GFjIgKNw/IEebAB/b4/c3LVhgRxxrW9DisDwMIqMXVVuxEZVJQV +UGG7YVSx2keTbNh3ne0bl0IEstv9beUY5l3Z9zu2Tb8QkGlqJnfNtxrIzVnt +icbxXyl5kk+w3xVdououlywJB2n1vX8p59WqxF36dS37Pjpm5JXN4hkL+i9o +uOopumx3zuGrwr3Ifr/rTZf0KPgj8pu6gIMMxV6ebA0zGAeO8Wo8ehoDnx4e +OvOXmwwbA4I80zUZqORfyMOKgbuofP7L8Hkc/4dbx2fypK0gHR0PPB9hCsdX +NMwXKes0zATFZlg90AKtoX9v9DPk6UKTTFnHFfyAs1dItweN36r/xxr2Dk31 +dDgMYL99Tpn+KWkRDz6lHJuCBSqoXS4p3BOP8+i1a3YHvwzAlOS7tmETBNqc +mrNvcPw874tUsvpAQAKpNDGhQeUQPJ7O5I95flHQ380FRiKETHcsJwY1QNsj +8ePR2P8jrO9mJOwIiNGIJrxLMxk0OATfDeC6TzinIb82i/WLf889C+NaeGOT +uDf7JsbbuM38uMRBQCyF3CF7MiGDlvGZO653n+V2b+k0ZKPg+tVIHREnNNRS +OcCzQoZ3Ax5ODxjT0PyBu8Nf3e1Rd3LFuXGsTyWCp99zlpWg3VFycy9H3NGM +khhN8E8yJFIz2j+IqUOcTVI/+ekfoM4WjsilDjIE3ljNO7urAbFGjRiH3HFD +E60tdQ4I87HZIP09Cs2Ic73VQoZ0B32S6P4XnUYGsQRdf+6/rYjGr6jkh8cB +NHSq93vdU+z/oUu0Py60Ib3XnCpX+9RhU2cp0ccP63T1231hkleg60NVxnPe +J9D41aCesk6e7XhfOW+AG3heEwwwdzUDaUtqFsr38BtCkoIuCj5QOtV94VOq +OVyK2AorxPYIbvu1qYZIuB9S+SpI0A7uhNFz3sPx9mjNMEe6Lg6SEjhz37rf +A0uNb9ZBeB7VaqR5A1azQT30Xilf92No1jHhasXx/OHApepIznp4/DPnNBt7 +FPwbu7eQ0EoGuqay2qNPmkD2+g3D/KwY8DTPsF7MxnUh+5xqxaUeqGKqNztz +NRp8Znkt1c9iP4Ax2wPlAXhlr3mukj0cnn7sZaTvJQGVWoF1SMEAuDF0PK05 +Ew7O5cq97A0kkFB2MODlxfFRWzChd7EUFR54+54ukwwW/+5vNw5ogNil7Oq4 +yAhUNS3ZTtnHxHVHXrod8wMF2R+jzhJJaHuvRBEtxiuJsOv0vY09aIZ65AYP +SzYirRHqGCjruHzkHz7x6EFs0a0eh73zkWTixczSI2SIPZ1dW/uHgG5159Nf +3iiBT4pPpnR3kOHhxI5wRl0iOO1zJp2vqAH2TEYndzcSxHxVEmZ1DwSJSj5r +KacEZPPhrW8afm46dfCZ/eUJkLhpvIdoGIueC8kXsuG646PFyz7rQAT6ABMX +R/oaeKBfFXfMlbJumaf4ohIBNXZOOK5L5wDfn2YGW14yMG4v9CuIEZDZP8Oo +4IpsKDjuXbBDgAzf3wfuVT9EQPpfZZRd72SA5sn1tmuYD3QYlqaqu10EmV3X +op5Wh4GHp8ECZV+J6dhYh1X6DSScQGvN3hYEmxdr00RwnDD3K6nSLd9B3AcP +803pvYLuqXx1OhwPDMJqggQvWwg88NDzxJNU0LisZ3kKj7/+pnG74rgP8P4V +ZPVwSwc60SynFowzTEfe1F3zVIY1oz0H90lZwbeJ/peU9WZv6bzj+QXrEdFn +K9Z16BWU55Va7G7B/Byu3GU++x7En0XuTazrRqqBmzszQ2ehfNPQP3rKH10Y +92Ft+BeFLr2SaRrF46H6GNrw5G0PWmoPuzfN+gYlxzUaW+J5/MeW0Jse14M6 +D1g9d9POQXUr4pFvsD1t+rS6OE8vuhoiQSIp1mGd8qp/7BsJVJaai7UJ3Wgu +RamLzhIhVtF+iwMYl2huvs0SONaDqDdy1GktitBJ87NN1JTznW+QlX103aA5 +ZJx3UeMeSibyP6GcO1935MPb8PXXMHf5miHjzsNI8tkJhko879kHWyuDAgfB +Y2o1KaGsBGR+KurfMcU6/ajJ7vjeQrSQ5PRHVdYVObrpSkqSyPBzVi9eCqpR +tBWj0SPNB+hmBZX8u/cYt8/SHkfMNaiPk97s6dYDtN/253nyABnC/S38F+Ya +0ftdJ8jtg04oMS9kZe87Mhj9a7zbpNqKOLaJMm6NOojJ78JsTTAZXKIy/K0e +taL64B1vhyo0EE/ub/eml2Sw/LfRdPNiGxLZ+NH0/aod8Ms133LG+LNGnIOU +7CBYKa+eL3hpCWLjYfynKOs8mxd9VzlDITdzo+wQnt9dhcw+u7D90ROC1uKX +VPi2dudpDbMbhG+3hn3DuCpOdTm2RKUcrsQa0rxkCwF76qvWa5/JoF5ZOb2+ +oxJIU0xdI4VhwLU8Otg+Robjty97t5t0gJ1a5qlbD2Pg2x1LHiEbMixHN4wd +s+4Ess2pK1SfY0DM+KHfiiEZxtpYX/XE9UNejSvv9Z3hsJHRfjpqCuOJ1IHB ++ENEqHK8pM31JhwurHMzrrwlQfJJyXhhbxdU6nbuwIy2P7q1y/rvEzx+zm6W +wC/vbMEPhN4n5bogRyo1f4oeCd3Tn0ITmwEHeLmiZfVyYC00bI8OmQz5idPT +WbndSFFmTIA414D0eX3KnmId0U89dvva5AD6ue+CpkTPa9hluvvCkXKsv/Y/ +ek3PMQDlb87+8VpqAWYXbYU6CxKoris809TGPFyP10DsagsQLcju6bfwffQc +3/x3sAtxs8TmvR9qRDsIXRwj1GTYDJXdpts/gKZXy481XykA9YSfZu6dJLhQ +oXT/aUAfCs8WM9m0qwDT2Xvb8l9I8OLBjWL73CxQHZDfsfOLB8hHwsleXAel +psi6yi+J0Om6W2tTthoM1yZPOrqQwHz+rO+F1H4YG/jdurTZCtbk6XNOmOek +CBf0z34dAHURD6oV80ZQ0RuKycR6f9I7YlbbRgMdIwo6/d0ZApFF3pl8/yj7 +xWi5R2IHITlL7IyTajHwKLR5Z5iRQGpLbFzqeB0ciAkqTeTvg003r0NSgyS4 +U0tflsLghiy5Ot4kLmegE4rhu3ZgPNlVr1WjL+aHmLU4ka1cBCo8nh5G6XN1 +2advID6XCPyspP5fQnXokoXTTwFLzKvllc97HR9AbldEzD4ulyIRuSI/6wo8 +fqfLCvnhGrCcxbXC/N0dpfdty1LOk0p4/uKb82Y3kg6N7ld9V4y6kISdNebV +1qnqP54W9kHqEme2744OCPqTpNCI3/e/xyKTs1oD0JYUw9iOmmFHvMgrKeyf +kzRZXNKDRHjja/iPzFsFt//deAx3MN/u4lJPcw+AgHYuXY6teGRkNHvhN8aH +M0ENK9q3CSjvuVhBaU0R8i0MujOIeSy7RtAP0hUieF966zJyqhb4fu5bN8B6 +U/ZRaYseL9bpgcvqJ/TrYNjV13j8AQnM7EL53+L7dPzHb53enAtrVEzn/Lkw +3pafrdEVIqD52TaJZzZZYEG1608P5lEiAUndx/8QoW9oVkNqsgJE5lI4HuFx +apWU77315zH6NCeuOfi6AmScIvjej5MhQPHbP4gYhC//SfE1zRSh9SmWD044 +Pl33fbifuuyPFC+o8m0pvEYQqhbsjN9rf8QJTaNv3WiH9M5HVXUNyIbFpebw +AgnsVwmsw0spsFznHpGSEYhEgupiKLxLzXLvvmNz3WisbuIJga4E0cmxlMph +/w9qhJ1omnkFPNeWg6RmzqADo3u2FvD9be/v9tL3uQ1219I0C79GwIv0yxei +cDwcjgnZEP5vEG52vc5NK6oCmuauU7KYH/4ZoNplLzQIkh3fanYK5aBs299K +ad4kGFp7uVNG0wmWvkqOjgrHoG9jf47Q4PtkCgnF8PX3oEmhiH12t7NQpBqX +SBnmAymt35541Q7AHW33q62vmtD42RaTABxv3mcLeHbH9aIxmb5lNv1a9GD/ +YljxJxJsUeUYm433oJoF4auE1kykyM5e7Yjv8158f+KkMhGOflSM5NyB0M5T +hmKCmPeejt6MTrJJgf84urY0rqqDa9HZrk5KP4ELQv/5xBGhgnD7PytSFTSe +t0x75oxxTE3L0f8FEQYGhVxDz75A27HNhdvJJOhzpovP6wiFcCdDvU2pQvSd +9tNkIK4vermCJoUX/YFlwEL/w41q9KIh4wsnri9Ob+SLn5wlIO0v52pWfNJQ +gy1rmR3mDxzSC709fL7oTtF1BzuTMLTmqrORiv1TlyrWbCjjjX5lmwbdnH6B +Tszble2n5Duj41+GjBSwaHOUMZ4MRvTN8TGU89aLnmdcu0JLBJeutyuW9PWg +uhJ/g/J/gUK6z6RNpAmYRfpvcl0Ih5WB1RDKOa0Kl7ldtWZbUPK+3B3z2T5o +OTeO7BZOhhNpvEHBAm2IRbbwQZCbD9p1gXmPrT/mG7kbnM7KLagk0cA3t8UH +JTPZX2GOI4PmgrPZoQ9N6LOgtvPqqg/SNeUPuZ9FBoGSPKsfdg0Irqm+bJrD +9/mR9W9nLebhfzz9eTiaUKybEGcHrS9ybbMfdikgg/C1fimtkwjJ+qnta+zy +QSJVslN1TZiHyMevMsfVoC7pJYW/x32QjpDd/Y0+MkzeOdycYVqOaFe2Kot3 +PEb+JJE99l/IQHNsWVhosgp5R7zZtbPyCVpXvttdM0SGpTs/ko2aS1H41c9N +1aleqMdvYKQb69/N41/lmiKKEDX3fX145InSJE5w+cyQIUk31/3l51wUY3kn +jSbfFVncfEuKXSTDPUO/9o/ChcipJYT6JfkB8h6dbPbFdcrGyln+id8bFPTE +ws1U9D76+PXfHR/M56nP3BRu2ZOB3K4P9rJrOaFhmnS5TIy3Pz1uySQwJyIp +NvNPwgH2yG2pVopyDlfw0oGAqkNpKErMWbGE1RGtS2z1d+P5pWmRo3u+GY/O +sL5L4IqxRQkiWze1ME9rrrcr4jgahSKj1NL6z1uhwI4Z+Vt4ftt3HPxwZqAP +GA/161TKBKFPU49nWbdJ4OXA7+9j0wNsckblzMpxyCeqv1xHFOspAas/djf7 +Yfl68ZRzzFPU4TwfQ+l7r9PXaG34pR9yE9kXtRa80MrdPbbvJ0hQK6wU8n21 +H8yYheT1o+6h2JyPrKljJFh0ft8bs94PF9yFPkdPPEA6Vb4OqtguKj9d9Plz +Pwx8TxqW2LRChR48iB3n79BVG5ZNt35Y8f11+0usKLrwykdUYYYE0lbz5qfd +emGxqS8z4cN9sNaI4nrOhsd5ML0kQrgfzrzpHTKc0IZtsVmO+GUSnGO2em0s +S4BXy2wP56e9oD7Mcnob89LtjbUayT+dMCQ/+p8/YyCYneUNyNMlg5vjSJuP +WTO8Z99LSl4OAzIye+eSQoYvDA0sp1faobTl5UeAYGh5cYXj2l18/Wf3XM4j +jZCV9etIMDEM8ugsEpjLyBD5W705oKcKQjvMb4TUBEHyJynaRzjePqz9PdhY +Vwhnp5ScObR9oTv3QsshjA9Xpy3nkq3KYbc975VC3UB4wqtXPI952pJawH6j +GwXwyL82yWbWGwpL3tSqzJNBcXPvSm1FFhCXMGrddoV0xpylAcwrWAXqgow9 +U+CR9d7u8GO2UDf4s7oC41h2evK5Fa0MWNDkN6dZcoJfJ7p+uuF4Y/5PNdL8 +UBLIz1h36xjdhudXZ+Lu4HjzcdQRfewTD0ic4/bmWxN4ZMWQ70TZN7FDU596 +Oww0vxru1vaqRJVyNowqo3g8hhoeS0fvwem623AoLRq5yb5u56Wsx2ipXr7y +JQHEOTQvy7LLI6uPK8L/4fuYtgqe91wcgG33P5xMifWwq6IzH1H2KbfY+Del +ERCv/QF9useVcHvWvr5pHeN8rIW6M5Ms6u4VqcpPDYWkiLNxtJT9Mh5L7R/s +3dDkq2+/b6VEwa6Lv1kl8XO1bmVOcWUFIoGZkiO/HG8hwYx6CT3KPpp7FvNn +s8IR26frMU4NlujWL72GRny96vkMe9OJKFjS6Gl0fawN0vIjByl9S1TKn8uY +tMbCMQbmd+K3DOHspsCRDjz+11LfWTfjOyGnnUvxP/4U9FjiIKO2HhmG281i +bViGkNYDlRaN12nIkWn4j48oCazZffUB9aCrx7Ui3T8j1BU2lq06i/kYnfnf +pdNEONub7G9UUwtHxqUUL2NecZGP38joIwHdP7WtaFVeBAeV0jsofQ9E99jJ +3n1GQLXcUQ/Lv+XDmZlnD5MOkOFcwTfXsXoC0iuwsOeVKwSiNYNS7T5cx91s +GR2YbqFx0os60fXHSNf94jZln8J5rgVxWszPv28uvDr8Xx34yO8MzMTPdboa +fsLfjoB+PPzzr4Q1D9hW2GqWOMkwkXDZBymaQcK5FGquiXDQ8xSuqsX+ac1O +GWEasAZ/81FX5/oIMHA0bY3F9mdmHezHJp2RqcWXzIisYGBU15lixM/tb9XW +2n2lH3VH3ynsUg2D0e8RHPvnSdDg1qB57sJ7OGnI/CtrvQBFhw4HXVUlgYC8 +TJHnmUcg4353yF87DpHTPR5Q+nGZJDFYXBEkoKpPrHe3r71BluyJvqlYjztn +FLaekCWgr7Kyj5V6C1CMq+8SZfxpyruWLQwISEb9H3VdRjm6e16Ao2kn1jUD +/06+dSQgaX7G9f3ZJcjhVpj68z0Yt40v5u9/EAfR73SYdjbFoUzfX8tXcB6Z +QYpUbbUznJyItKz2dEL0ho3rw/i95grtHJ3rXOAEt8aL+M+OKMWhc3QI269y +5p4SUkuC64YpGkLqZ0H0uJmSLc4v03fnfAiXB4E4mvvdSTcEVneOcSn4kSDn +ckyrhlMAuiYgl9jmYY62X59SfI7vs/Hl1VluJU9ET1eneXSvGeLWedXej+2F +eu8CZ1Pb0MPiAK4Fe1wHPZ+0JXtjnDllZFN8cBDetT/7uPapDDE0t93ahfnz +7pSZh/xinnD0wj7VyyuxKO+875sY7M/nV0lG1OU9yJ53y2YpPxsVpdiXyGOc +HC84JH+WsQet367N/iJajDQeXFVKxvyQQdzZN+xHG+qwK0YbNj5Im6ffL/wh +GTIuLZtWxLZD4uLz/TONaWhu7V34XoyT91gPORHkWtHIo8JT83E+aEB6Q2gO +62KBqYnmvokGdD1h9eW3LR8keruDU7aSDLcNo5tSFCvQE35Xty/lj5HF3KfC +vgkypLqnhDhczEd3/rte3ObrhjhOmKfbLmCefKKlm2MsCR33DA4ezL6DVLUv +8lzEfpZrKmdcYgtCVfofmJVmbyGlXCRD2W+y3OQ6xnW8D3ouzg1aCIShGBoj +qSe7MZ5LOisLUg1AevahWuB2RrsH0/kSR0kg8kiUgWV3H9Qffa0VK+sITtf8 +M4NwnGi70Gwlv2oBk4oQPdWiMIiq9VOliyID3cPyOgaGYph6zU5juc8f6KhI +B2T+4Hz5bapabpgKzxd4hhIi7IHkI8IKOK5+HZcQZ3gZDevbBKHbLLrwlucF +jwjlfyj/XfeV+J8gJf+UioyIIBSWbUCirJf2H9D+UfSQCKndPqzkzGoQyH1o +4XifBFP6+sykAlFkIV4gkAdhSN1549sKZf2qdnVLR/QVZGgs7BQbHoIWqs5Q +sWM/5N3ivxB9lgiftHXzlDJq4X2SkecvrHeanK0mBnF+NUlm/D3ZngmVFw8t +uRwkgyC9zY3kJSK86B36HVxbAW33dO7pYP4sHcsRN3ePgLpKjyz5dZciJRdr +03jsz19Bz4LXfLyRQmk/v8xNM8QXFZvZSPm+zcV5+2R0Oyof1+9vdPJB3+NO +HXJzIcOdyVMLuq5EMNUsObC6lYLColNOi2BebVZs6FIs3YxoRWVaK2d9UJVK +uVR6Ghn8Hl3cwxtYi/4aS2Q6mPggrmD231k9uN7Bl58q5sWIfaJuRVr3Icps ++7acP00G/sDNE1+PZaKUawo93xmc0eB2ZMLMKs6j1INN315FI9ZJ5cm0ZStE +ZdnfRNmH0nsCMZ3r7IffbBeDCqKfoMPi3iMkrOuT2z+nJsf3Q4xC0KTDFQ3k +/ickNe0nCQrKtEcafnTBzhejT3+4PgUDMa+p6GsYb3dHyqDxGmDx/HY12z4E +RoQXdRx6yfCivUbkseQbkJ+KyzUMcYfH1TTCxZgfGii8roiJSIBcMq9IfJEZ +HEz+aS+F81SuVNnMKpmAqCVWCQvKb0FcnTdqlIUMhyQ2ZQ4LdMHousqUcQoB +qJ6vFl1wJMFCZHFMoRQBdC3tHS51dwGI8YsecCDBY4fBpILDHcATMfZE5nQf +SOxg3ennRALNz5cUvE/3IV++G5fXx8LgQk1RGBWeR3cjGQNzcSO4wbOVkv49 +FAy0BQmU/q6yB0nDUa+JKIOF6vLZY5Q+YG/Ex5dngTe2RW/yVDhoH9mtsLcg +AdHaxAnvx/l4IU7M6410P/INfjsQ5F0KW/53YrtGSHDQJGf3Hf1CkG86/6Ol +IBLGuetH2mbJsFd2T2GUGxF9oC456i7rAz+OvKCyTieBvut/r27FZkLfoYmK +0dGXKGh9XmtxhZJfN4/ZCROQ/fRFBpWcdKi0a1qk6KnLKlW161970I0jpSPX +IzORdnBKmyzWg5qbXwUCzDXQFLGSnqXoERqw4HxCWfde+PjJfqM9J1F3ixHx +tYMneruqqEpZn5x0P4wrSbMHPeMJkT2h34BOe0Rfkp0jwQmrI6IN+1Mh23b6 +fuLSU8QeGWBMwvzcf61yh/zfJCikep4cyyUFP8PURS9jP7BmH98owuPUDfh2 +sDi3Bo60F3tprZBgXYePS/giEY5Mh2jLqyLgmLoh53KHBIOq7tPqN4mgzJTV +Yvq3Dri6zYbI2H710mpAvwgRdCIs0lJ7EZBExhTEsd3oNBAGup2RIH0K4dZx +U3TO/ZTgFB7/53iNnooVF2AeVl/k6Y1B1If6yJ9wXKVXMu55en4Qnh5re10S +XIykV1zvytwjQTZH660NwgD00NZw02J9thatuH/NCuv6Y4JCoy9vw+ulNOb8 +5ftIbNVekfK9zk0tbvKgtykokXc5Vg25ohdXl7UpfQxqvY8Km9u4w/F3L7Zy +6O+ilxYMbyj9E5DzU/bD/JlwiLt+7O+2CzBNB90m4XxUSptHi8yDUNhqONQn +mIW6K+nGdviT4J5FRZvnHBF2PLv/ZyO7Ckn29x/4cRvzpTzdPaHlRBgJbuxm +TKtFM1JrhAuWJJi72KFa+roX2bPeSf7wtwqmlSePvJ8iQaOkPTfhCxGo696H +iNmnoLup35i5QknQ/dblaUcGAS2v+xQtcCVA7JW9b4L4yUCY95IIjiMg9z21 +m2V/E6BQPmeRE/ONRPlbHtc9RlHrn1jfXzi+LkxyXJe5PwPX2a5MM7ATUEGE +FltCcjoaZTam9sd1k8aZ+6xxwABUcKu9Ts1vhpBJP8Y2cxI8TxFq/CJvgXjY +LGTK3z2Hd6uxw5R9pt/3bAvaLPYhgbXhoa+hoZCnbDDzeoME8XcOOwq2RMIF +NRt7iZsJaJW2WLgJ1xGtU9kyqqIERMtPvz+eNR+lVDUZOvGQYbSXtakIdSNJ +1Z0qOtdK0cvTf9IJOC8qVNoa6DO70Y/iSGm7mVKU6aVTGYPtTYE/rkvwuULD +41/3NxUcEY0yMZrS98C1dZ/hB+p0ePstdEu72xqMzVVDNHGcL+jedWAXG0Em +VJLttfWZaJGVmmlX3CwoOaELLypKQelEfxY7VKNzOm1LA1UYr/4p2xsvFYPo +WbY2xr8lKM7G1/BlP9YXpf+sj7kUgEeHWzF3RDBED0isR/3Fft5/JepTcg9q +F4je+3TmDbr+M/dmOOYnb67Z8H3nHYeob1ESXlO26Leej6oamoHPzBbj3RxD +oLDjYHGobRG6GFehdPYQCdrEck1bm7vQt6Dfqk9bG1FKdPpc4xoJhJuPhVG9 +tIJd1SxU6F8k8rstx2SD8a20+1pasHk3qjo3Lbdi2YBiPvy+rLRFApuh1+9O +ziLQqDKvHzfLhWu/o2XZsO7zmBbU3FIcQDdYBh1QUA7Iqzgm8rSSwF7tE5Pd +yVLQjDvyLIY5CbhUR5a3vmGduOH+RtevCFpPBXU3b8WA55AvQx2uU72cWw23 +9lUAn8OjTrmmNMhUAs/TWGfxpAJb9WIv0I1UqIzt7oQvGY7H8m1JoHWvL8fD +goAI5pyXzfelgI7Q9/c7cL2uInXTvhPsgA76XXcKjLtAR+N+t2g11t3hZ7Iv +OxLhdVcwi55TA2Sc9/3aYIxxptGf9e1cC3rhTr4x96MM1RV9NBLDdbkn0lqL +fqAZldzZu33WvQbpFthXGzuQwaG8UTpkxR1MzcTl2qcckNKFVsFeHCe0cldf +R/xNB6szioHMhHugKSQaU4n15qPjve9+ceTC+yoUeMK/Dx4QDyX1r5Jgy/mJ +ghQdEVhulYYordZBBHOoxwusB2u7xt6lPSdCVry9uCt3LQqmFm6VxvXLkjvV +tFW2B6UrfJP+EFqI/hTZhlDOH+RT//pxJsACiPwmplsZkWg+dj83pe993um9 +RvORJuB1zK/PyygSea9/SQjA9tCsm5KzEQNwNyr9byhqAn39p2oi2J/JU3Ex +j4gDIPzZn/dpfiNs7TY6cwHzZ5Vk+WXhH6bo6oqOz83eFzB43cjsGn5fDneq +fYcbQuDjUhPvjsYM4KvSbdfHODa7VpPZvjECdb+FBuZaOiDf79qDUMIM8Azw +/GtuIcD9uGtHdJcHIGf9KevdnlmwmKI+VmjTjt5dvDuuXNCCBEQv0Jnj+itd +ZmlBrd+J/rqQ2dNbm9COI44fKOciuT7j30Wt2IFE7HVP5TU1oynxlp9ydNj/ +/rUaUf860ZssqgBzlyb0Z8/NuhEct3pBpolCpp3Iij5D4zF1M9r6oTzfSYX5 +YZYpr4d2ARQJeu1Je5CGRNqf5Z7D9Vf6NKm8zacHzTSHN0WzIuAkT17lWiTB +95/HvOO37SGrxv05Q14uMtj1du/QIhnomXqithuIIB6U0OBU9wqtLiiLykWT +oFNOTa3TiwiPXw9ncgeHo4njIz03U0lw/6nwev6VXLjPI537JRfj2IVvJXfn +se4OTbheZJQDDLoDwVkbscglUlO1GPN86QhH7j/8pVBOnZ8p/GAAbevwJoa/ +xfxhPTLWoIUITD7EdfOxSlj3LPS1wvWr/e+Mfc78ADD7ZPfuvtIEzLr80yRT +EpSJ58+8WhuA7R35BNVTTRBiKM3fhO3ROQx7yusKQVvE2kstPR/5JEV+eP2V +DAlnj67Jyykg5RKvxaKNbHQgtjqAGvMNTr8TAf7iWDe1H9E5868Q3Up/2HEC +x2FjvvHzVqkedKh3pm2hoxAt1qv0KGA7z+g/0x+7Y0HjkGL2B40sCG6U/nkY +8z3vFhG5PyZd6AhNSML5yEZU0ZKhs4jnxdOl4b3S5y50Mtnl88t9jSidW1O8 +eJsEdx8ruJxf7UE8k8dcqZarUBVNbct+Ksp5jm7zq0k9KL/jFnHXWg1yO7bI +KIuvf/iLwdTTvwdt3Srtq/etRZ6M0cP9OB76bjFoxjv2oF2b4xGTH2rRsGPw +WhW2s6KgbplzBJT//f2PNLEMRCrbk6CF8eRP7kprAD0RTcRyXTIZL0J930V2 +CmB+zqcZPML7SAHy937guc0Ygaj/E0mnnLMTurr3iNRaH3w2+Zh97mM72OaL +amxYk0Do9W7PSpF+2DcsWRho1g7xQfu01LE9z50tweZpH0oV5l3p8a5GXx6t +DcoNk2Av7Zkx569EZCYwHkyr1INKGXedFkKzcNUiOvL96HvkYXA48fS+d9C+ +edeLQ5QE8lV8gg84OpDfetfSb94WtC7z9/c8LcYfGL7+Wb8D8TUkZD+bakYk +i8Y3/3biuCq2ZDMhEOHR2KJMXFolZP++Xl1xF9fZKzsX9ZgJ4ManHkszEwXm +yf+RFITJkDshkjt2aC+o13XvMWH2REZPPwZS9L7QnNyG/AgRCnYbZd40rQSe +kIeFXzBeyRNFRxsKuoDpUJrR1+MEWAk0NMnC8fkj4L9mi2EDxIKeOZK3n6MD +iaJnKHX/tN+rmjPSBMRyYKZkSTYNhL/xZ/JR6nWy5KM8EwcIlFhe1bCMRmqb +fh+F/7deNx0l5nWAx/U8MfWBXnCvMP5ZgPn/P+FCD6OhblCJHaCKPdgDfC9L +N7PwexHWLyv21HUgjajmeOf4EbTC/vsuy+QMyL2RP2GsRISWk3rbDTsaIUDc +ns3JhARyPrpadAKdyEdUYM4Q44ZaRUvAPuy3PnLmit4AzvcpR5uU55XwXSDL +5y6+v8FTbvfDxwkobJqutqs8E5V87/hJQ9lvteed4GcZIvpEHyTlw1GEvlpI +0q3FkSBMr4wxT1cOHhr80Q35GI4Wr9zvbMDvNeK9Yerl2YGyiI4PlDubUdN+ +Whp3/FwjPd87ZEkCahzwUGMJTIPnrokLYtg/D/jPnTBEbXDaXfCKCkc/FKd7 +qjA6k2D48DT9f1cJMKcW4JXS3wU1HzjO0GOe/E45Mq8a61/O2d2r1677Iw0B +6uaDBbi+BC5UVN7uhymxRmsjkVQYPaht0PWbBDfOK+TRKwzCzF6VBMaQUiTI +WmXFb0OCyv55fybBPBRpUvOWkcEFxQbrHLTBeEhaEa64wVKOxoglV4TGHqCV +kan/bmA86YsU8k043IJo2S+OStlYIYc5ZoG5eDIceXyg+suLFnSFm9mjrd0f +ZGi539+KxrzoYeuSnloxzNVVfadRrIPEhod0Qphv9L0VyHJ/VIT47L/V9z12 +Q/OhdUr1M2TQjTaKLrjWhI7T7lRfe+aEDl3sZP6TR4Yf3+YaTh1tQ+YMPEs9 +DI6QGRFXauRPBjr2Tzx/7pWA+Av6IImZRhA+PzxjG4v5Q+vWK3WiJYT7lRQ8 +k4yA9/w1+gV4Xiztuy5sH46FEYLv6q3j8chqfJj1Huafi3vu2rctE2GSPVnu +VWQFaKT+Hcy0JwFb0ERQlgIB3ZxoLAr4l4p4eef8ynA8HCdeCnn/axAMx3Xt +Wr68Q6zZzl6EGyQIjHH7pGBrDaHnBjsOjURAf7eECuV/RumOPZav3AjorB+H +QeN8IhxJ//H0jiAZcvLiy5wYrUBWMFZ/189I9OypidwdfH1s1vhEJSPmD4iz +zCTQHbVpuHacLCGBk8azyRGafjjx2+T38SdZ8IvWeUx7gQSMzc3anwTegoHp +uXW9cH+wCzBftcT809HqXLW9by+I9iX9/i8+EkoYPz+6gXV3V0FcR1oAEbYC +NULe20aD1vPRf6EYD0W5ze0YRdLBm5mucjD7AUytmGxxYZ7c+PGYRGtXP+TY +WF9rMQuHq4pHato+k+BMwu62RHEiPPhAd4g9NAJC078yaOSTYPf0xdF9cgS0 +pZKdyPOkAtHFxxzPxHWfR2NE8auZCagy0x4OOhoOnyO1LlLO4X0quy9Y7igB +OaSaltI55KKdFxvFA/kwzxR3T/3ytBC+lbFbTZ6tgOGydwm8BDJc2+AvuP4e +6zgdJxlDnQgQ1ZUNoayHrDQ6/CJRZhAsm4W1z/SUooIthjIPHOfzrxV6cw2K +YSbuQvS5GgQRlwuXY3BcHRn56Pr52yC8oboULcdQiPbV/TcfZkCC18e7wnZ2 +xIDlmuO1fvd4NPR3hpnSp93ce9pdTNkaotiCP0Z+joBpsXvXIyl9OGtH2jZb +mtDTiTDRXaIdwH2usekE9vMvusRxL7lWpKV74vxL/zboYvb7nLcX8y72mJBn +5A4UmtA1a1DRBGTqQYsr9GQwkftEfXihE2nLqSTZfm8AuxXj3yX4+oxiUd+k +wC4Uy9CG/iuphxrIsAjbT4Z/PAvGq1+7UMilmcYCyVr4ufKP5iI7GXQSeDan +ebqRwV0+c6JkNcQbcFxg5ybD6x3p57KudiNag55XaRGVoJ90cUEA+5mhc/Lr +hk03Gvrc9mW/aAU0VbxN98Q6McXsVNiHp91Ivmf/vYQd5bCc/bBMFsd/pUIo +DKR1o+MJXvRq26VQLTrD8RTjWOzxxwwP5h4ARxbtXn56a3gi1DFE+d6rvO78 +c3vTE45tfvGBPkOoWryUR9HRG0w5n2nrvYDxWtDeq09U4PMntj/tFPtkbaqn +aQs64ajlO8LUDkxq95YQExlYmu/d6WBpR6faH77QUWoFr6SjZs24PuZXcY5r +OXaiXWN9alFCzeA05CMfivlD6tqE12+6btSiTM+2VtMA3Kr8Mqr/cF04ePp7 +bFU38uf4xTB4pg6+2RCHO3Zh/0z5K+b/7EZEp3LpLfpqOPOU74g9fm4BhB7k +J3ejaPERe5reCnhC94L7JPZzr/FVoYsL3YjJQaPFh78c+viUvaexn8d29a9m +r3ajHZ/+SrxvKoWNFPEJQ6zHqW7eMC/c7kbf482DSWkl8KmS24mMccDMR/9Z +wa4eRKj1ItQVFQPd0FfDXuzPMUGGhMW5e6AYSr9mu8sJItY0/1K+V9zN0Xpc +b+oMu2KV82jgFmRzvS6m9EPL2ks8sFTsBtq7/4v2P3ENhjM2pCj7LnW0Tlg4 +PX4IfjfreHc17EYuJ0XqKPPi1rz2lkBqRREnd0vuz2iFiCJNKT78vnFkw1OJ +Cx2YB5vTbtC3AFGx9PgQ1u9c1s0ewSxYv4RLTE/7N4JWnOvhAFxf3JIDzw/o +pcO9P13ne8efwxMLzd4grJs2KjfTlQ4QULlXkuLuS6WwT/raLxt8f4FYveLY +hh60J6PcoAcVw0MOeU8WTjKELJ99JJLQg3YayN24mlIEzwq8U37zYvystXhT +7NeDqM/tMBvNLoStLm1Ofcq6lKc5tU+depC41cQ9z5J3IHYh/RHl/Pfb7Ted +wq16EKN+7oKuzVtY6xatXcM89jaH8trGqAbw7BkIWCY7wl0l2uUZig46uyn7 +q+0WXOI+c2GWrAqM5umJa5T941zUfqNMzvCjaps2y1sVCXU0N1H62hkMnw/q +YvGEo6uVbsOb+uiNoMYVyneGd5bHahy429Gm7ecn91AztNwM0Ko4QIb6kzdi +FxW60C8y083Dp5pBY0tgmR/jtj6dymwaYz+SVg+bP40aYGFErFO/iATHrLns +dSITgWuHIs14cCqo7r6f3ox5e9eZKJpPViGw7W9ulRj4GhibfBSnKf+TsvfI +xB0mILUlffG4llxwrq+XtsJ53V/tsrS1k4BcslmnTUk5IPEyS/gHzuvspS+u +fZM9KCRXeu5o/huwXL83NoLj7c4lI2+a6h7UXSD0cH9DNoypFrNtHCGDu9o6 +mxW3I8pWBW4+Fnuwz3yr/52yfs/1YMx63TVk/q+f1JJtho6YGu7fwHaBX7+Z +ps44AM0X0ZNTnvfQqXO+4pPY3vXXYKnz2EPIdX8Z51J2B+X46+6m9OEso/e6 +HhTQjloNTthrExuAzfAIy9lTZHgYsj1nMNGB0NZ7/TaRJvgbt/sk4Pj55Bj2 +RoO6FxHv3u0NDyHAz3XDqAFJXAflTn914MmHUPfcr13Xa2DRY5rqZwsZ3jNJ ++5RVBoKincatuYE8+Kv1n7Qs1mUZ6fU6KZ+cwLsu0bLbPhX0OaRK/8P+3Hmf +h0NL2AZufZI5lfoyDh6wOGtQ+hgfaDhW8GyYCPxfyOFP7leC5K/Otq+YJwvy +H93n/Y4IbvvLicSGalDyOcBwAvO0RRp+rqDL/oidt7aOiy0UpvNoJyn7ueZT +zksUPwxGh0t/lF4NUAV2wSLiEeyHXVyXy2UdnFG62/raDzE/dJnPPiUE2yW4 +N5kfODvDC/s3ghYpvijBbXYrkrIO/1ykE9/WEyiN3k77ZfkAFXhHZEVgu4fU +zm9+z9pREOuzQ7QPK6GG7eHaWTWsg67uuW7T3oqE28u+e2dVg/zDv4xmRmRI +Xn3hdrIEofb8A5dEhBuAY4vKZ9ob40mQlOIVkTfoKbcRXX1vJZhHFk1d7ieD +qcy+e4f0oxF511fLYdE82DMen5CN9W81SWt3r+0zNMJzxicpKRmo8ypGQrA/ +j/85wsr8wREpawy8CnCPBm7SF8uD2A8SOhZd5XyD4HealttNqwiON8i4GruR +YCxxdLJjhgg2IsP0id7vQODWCIOdDwkGIrJPfV0PRRfZvZ+f2UiD+fGRRyYY +Z87kH61s2pmHWsO4GcXsX6LelKDqUTy/jXUK+WLPbiKF8dyf4ecT0TvJuvas +TTJICnmWOPoHAMmS68yyTgia+uwhmYXHE3jnfN+9pedgnpN54muHN9q/skR7 +nIKTduz9afntiKZz7rWefw7Q/o4JVbXBdVBX8xddfQsCae8D4+a5YC/9Ybbo +ORmULh9mMExDqGzHFu+P+3mgtrfmqy7mvXlsOeFPvpYg0aedYQe2siDJJmf/ +2icynMz8QXNQLgvVC0Qs/lFLAjZvX+NczMPP9z36Jnw5Fn1WbJdYRhGwaGCg +4ofHf1q3gPZltB+6MSRyg+toIPCk/tqgxuMc0uW+TeGNjL+i6uW+50BuR8jG +rTckSGq2e+QyPACfEvc2RcTHwmCHsx9/Fbafnu702dkAjIz7ghh/NqKfIj87 +HO+SIfy9i3BRQRo0DpU5TFlnoLsV3sm78Xg2DQ7XPPgXC+qZTm1HBILQ55Je +WMfj8V5S+2TcGA50q2IbuYbu6Iy8QWoa5RyW5MzTThHJSMCvfG1ifyT0zkbx +vMN80mRu4sDquXx0Zx+YugokwbHQTAnKvs7fC9Mih80q0aV6fdL58+lQ55w3 +vP4e46rL3Lw6RxOC24brdyWT4OKuTa/juZg/q7K9T9vThoK/CLyPpn4KDPHJ +/dwBZLAbc2l4NNeOOKccVDIMfdFEdXQZ3z1cT3eWGTrWdCK9I9V1XDuy0ehF +xmNqGmQ4xxW7UqDlCxt6mRFus8+RYjB7GaV/SJvWY//g/6Igguqv1VtSDKo+ +xNdA6atwbPXhYZMfbWD5+DqN3nQrOlFhlDRFRYaPojn+qKUfmAwSH9m5VqKj +S8up69Uk6Pnx0hxcB0AhLbzBj7kSGdJ0jiamk0BmoCjhisgA2D6sr/RfrUfs +B1vqiFEkmOHvfqFsE44i6WxOvh9IAb4oNGmJ/fbfdeMZHrZUdL/RRZWxowD2 +nf9wKWyWDL4fL37vP1GOHsn/4PS+XQmRvL1He2swPnzbTHpyvg2NmpnRBzQX +AtFSZLzJiQynHtRwbDzrRP7bukPTVGEQYy9z29gQ4yGniT9dXBfiomEaOPv+ +GYrlmU7Jp/Sbcqzs3Y3r76Ol9Lu+Uq9Q7/pRJ4nTlP+tqI7HP3aCwF25mrw3 +I9DgfpoGyvlBRDP9KPaP9qCu7Wct6heP2h56f7PB+BmlF7Rsw/IeQvQU36wx +FSCmcI/Vdh2ssxyOzgodGwI7oU7mCQaE7A1kdr9YmIWUeMERE98BKLd9sCku +2Izu5fa/6rUmwZtA84lSrJMT6/2Hn3O0IsfYoKI9ASTQ6PLb/ODXA/n/FPea +JHYiZRm9hv3PSbA2yOtaongLDj+4qfTROA1mD6vSlGF/sh0p3jGgFwBX4o0/ +eCgVgm32ivoCCeMwQ8+FGOUCOPeHRIx3aIPzMg4LqS5kmB4mrrS8GUAB5aM3 +jsRngotNC5Mlnt/xjU/Py34TUESv0+8Pzx6hNPmhiCXMW1ptE8r2DPeg0gPv +CE86E1DZ1hZb4An83K/NDD3bPSj6u4jhM4dUdJtb4vh/R3FcmZpmzmlqI+K0 +muOtkQgUUHbBhOLPkx/Dw/WqiDBlqL/CsROh251X6CnnF0xz94nl7SfC+0+E +c7uDm5HtS4sZTzUS6PHYpT9R7Yft7K3PVjbtSMjGrWLgFglC/lYKnq3tAaGm +UwvSeV3IZV5lpxrGW6NScY/06+1AZBz7eoGlD9lXT4SsepHgPDNJLMMoDAi2 +Dz05lV7DmtHFsUGM570x85ccWlKg9IGXZSl3Gtiv3l7wXMb5vvPi7uMCRdDZ +8vfm9rEYUGELuFj7hwxN27n1pWx96GLZ9VDDE3lo4Sf1eRLm51x3WwONEwno +SfgEx1BOLhoP+jmlgnk1r2E2g0oMES6v9H+4fKgaTe5wfX7KmQTdHmYH5myI +YPx26PK1hVq0h+rO8c93SfDfkuzUcz4iWHkWnbPb34Der40w3sZ1OYrKqBU1 +DMBYBScammtE0kefndKyI0FRZIXusfP9YLKa7Fea2Y6aPq07lmH/zF1ZeMV/ +ngC/moenbjN3ox9LX+oNbElQP555PpfcAaeFU9vjvXqRtqiu00M8nolNtdf7 +dZrBvlS6a2ajH/01tmkhPMC6o5PIVbozGgq+8KUPc0WAR76DE6Wv8u7Rg+K6 +5smwpSHI+noiDNR/pzkzYH+OCP9VVWrPgBzb/6PryuOpfL5/iWSttPhQSSVJ +oYSEOllDskaEkF2yryXZZUn2fV+TJfvO2Il7cS8lLSotZLlXFKL0nfv7//fv +eT2veWbOnPM+7/czz8zYcYhoecHyUofWAVzX5mwCs8x5yHBCgDF05lsrumVw +UN8Ez5e4GKf01TkSSOgQTkhdaEdNH7utA1wpIIKsb61mkYBHv/6dT0sHOvhk +7sMWZwpw9jpPfxAngRavug7bwy7kuazA8wv77c4V619r+SOQXX1hR2t0D+Lz +f/GmB/OW21kpZow8I2Dp5vUq779+ZJv+Wy3clALFUYyG81pE+OekwF3+ZgBd +cUtQ7MX+JF/lNBNkHoCZrJkraa+JmEgg5jns/18Mxi73unrgp/69w9dtR5DY +5MC7dOy3N3wPlezN2mHq5ng/aZCEhMvtJPvwuLT06TMV1+JBaE/En88cIVD7 +Ycl0CONG3P4wmViTVDD7KdR0vcUP2KsjVOiwfZvaiyu7JDOBdTvbJeNMExA/ +O1Jjh/0sLW/yNplCgkPXOSZ3TbahC0JSa4neFLjO7jp1po0Eq/XPd7m5tiP+ +Q/f9BPB8sZ8aedXhTwJ3sdHYmJwOVPDB55Ie7o8F+ZItyzkSVLc7R5G2dKGB +pOUofTcKBFg/K/IZGAFyFv34+cRuNMao0+aBx9V8IPJGN4zA6SnDdmarXhQv +t+s4yYkCEn8H9oTsHAbtnVzEBfd+NHiw1cDRkYJ1llpw/zEiJJFuGTD3DSD7 +NWafbDwv+8zoA44p9QGvJVtP9Mdh1FTh0DOC21F8XKTvfqwLRviuHbIWISE+ +YWZ2fzzvSz2HJr5dbYF9Oa/vRCmTEdmD1UAc9/+0UNiOpPQ46DuTsc777x68 +2eH8QgvjifUfp89K/olw0CueXzXIGfLSlZSXsD/HtrdKyDqQIMld6mRLQQdi +v1GtuoH9wyP5xq7pFAksGzqPGHR0IunWMN5XnhTg+MSetjQxAqUTf0ry6LoR +y5rv9nu093KLHjZzHYFp6ZfXbjv0IKp9qgWjOwVsqk3tfKeGwS1kW9ocYx/y +ChjxLsD9/1HUJvkzcQi6H9/5bwcJ++dizlZ37E/Cz+sfZRYJsItRjMj7YgDl +3IubS8DxvNToumT+agBybvxO/v2dgKTVA0AK2wO7rzIOn+kH598607nHhpHu ++mujVGyP1tmk45nvBpkbly61lY0gPcG8v+24/VKihrP3ZjvMcUvVMdaTUFyu +3gkHPL/KyqT5668aIEFi0uRYMhnJPgqrlcbjIhpZhEyMDmIc0fy9f7oaisfz +x55i3bTnjtxrLTZ3eKqx7cdxQXvo2pyepp3PZjlvGUdb/01Q1zYtym6AZNad +ERFMVJCfn/56ijEJJNQ/mt0bSgFt6h4LHYwDp697k8pEiGj0gM3l744VYGky +/t8rjIe7HlyaPBpNQNt7tS6Xy5dAm0NqYADWZRzcnqZUW2000bi95GOHN5gF +94rTvuczjWawzsw/hBPSw5FhuWnQKqPk0o3zYjNR+O3MYSI6lOvyKwTlg1yM +frc47n+dl1hx5zEyOO+sbaN70w4ad718yi0xPji9XiwVs0MsErsvFf6KAgm+ +sBza/6u6b26z7+8bBdmA/nMCchWYTzKiPGMKlO/7mJkwSIbtPbX1yUKZ0GtV +p8oWRwHL17V1BQXPkPjvTyxNeY3w6qpiU+EgFSYMXU0sxRD69d7P+Pj+NuTM +7ONfF0aFtU2j3rduBdBaxVx9qTABBfCxBKzh+nL4QnKirAoJmI4uRdzc8xQp +jH835+mlwMe/zKN1M0NI1MNppks+G2kwCRprYD+/eCU6WTNrD4zqIpYkq8dI +kPfTEDfuf34wVezJuWB4/LK48g4pB0n3TsikYD6wVbOhTy7lFezu6LpTr5kG +1yvoDp9ZWAD980MZ2sJE5Gj7w/frtgLUzjv6U+QIFSJtvEmninBdVmOI/fK1 +CQm1vPyPgvEz5LsYUbDWDhl/jqcDo8fIOK9fl7a/qZPlT5b7NBHRP/Qr1Yiq +RJ8Phnt64H7WaLB8JOqRIf1v7pMnPC1IwN/iUCOOQzlF8p8PGOdDrksaSD5A +SMdPcLcLzrsaet0rbz93owa7qSkBUi/o1F1rPs6G64vPtgCt6C504sK+c8FP ++2Cz50zu111UYC0hldi4DqC15o14s652ePnbiI6dtt767ozm1o5B9Dvj4yDz +lxrwzv+w9zAel4jxOxvNgUE0dpTQPmFaAxutv5lWsP3gcT/L5fhBJDhgrpnk +UwvPDsVLLmF7wuD4z4x7XjDm6nz4Fd1dsJZvtyTi8cqfOsWQcdkT1s/am+hc +uwUBM7OZtPPE/r04Fv3iiA1c0RALYyBbQ3bX/A7aPQLiw/vPc5C8IcTWiOMo +0Qz8M69Z0PZLhtFVvutvvQfVdh0OQodVIb6oMo92HvJ8wIb4tngf2DQzzrlv +dgk84zqbaPdJXeS+sf++zQtURHIurI3vAjXZC6IJ6zivp+WzfZ4OIEdnv6At +Op2QkMyssGcF45LHEY21ZwQUunsw6KFOEwy8cpLW2YZ1xPV9JiOxebDRbsvD +XpgEpVHz4qOruB5xDO0DaQJyXOpTTjeohNI6OdllnEeV/fYD7+0IqHE8MVKW +4TmovLp3kZePCol7P/8JW7SEn9Y8Kp5FzjDb8PYf7fvJjer7SK57EGkPjh9X +fNQJcww3DH2+UOCZUKGFrNQwsuJCe/6tt0B99PAVATIFus2aFw1nCYiznFX2 +7L9y4Ld+mTuMeWZcukrPuz4CelH4tQYNloG86beMjcO4P5KUtsEVApp0ed/T +r1oMiEVBC/B8TbSNN2cUE9DFLZNTbwxLYa3NpGn3MRzPJlnvY9IIiNe+0Jav +pwT2xihdsMH9r+bjn1UfIiDFT597NvifwpOFgrWH2D7MdF/+dOJ5ZLy5rWSn +jQF8UGq98RePy8j5pPF3DT/ULndo4me4L3w42XAqkPbf1L//fr3w9IYF6S1t +2YzJ8MLPezEB150HZBOpOUEiyugsi1u/VQDJzmt/+GjfmeP2XzR+pgQaj50G +qwfjYWfqj7/quH6tUue1WTYIaG/ECOHDoQKonN9bdRD3Z+KIy6Mp9VE49VRJ +6nBHNZzZMrhcZoN52mCe4ZQcGfqvawzpxiMgEQL7+TBvmVPL+zo3R4YtOscK +h3fVwnfizrxqnHf/BUVynvG8gZ5vlhzV7o6FW5+TszLweysvJpbf3DkKxrFB +FYaFNfC6w3NWE9flbWsanHxLZLBdWKG3t6kF71/OHX24vrQ82FrR2Z2MYlcE +m5+cjoQ2qfOztPO6naPHV8SvPkKMhu9Kj0gmwEzR1YPPsB/c+m4kKro9QJeE +dcjNJTGwx+e9Twztnvof6je6I8kQUEZKt7Uthjrr7DNDCRSgY+xMQ81DkP/b +JnW/cBXU35I8ybaB+3Mh6xazuCqaIaRJjwuWQ1yg1ueuH7hO2UuNOu0aAGnW +IJ/ZjnxEtxif5HMN64t3DCwC5r3oixP/61+NKbBx8JAU90MqFJgb0NecLkI/ +r2UmVwc8glAn36v0OP7tdU7pzXX0IS7q50COthS4WeN+eDvW101bX6JS7050 +y7xaULolFb6nbzJYFlHhWmnMpH5ANVLdhzKtxGMg7myVOf00Fag2szuY/JqQ +gBf5YdClFOjhVB32IWH8idcRvdXfiqiNV1N0HGPgzqdsJ6E+Ksi4hRV3ulag +gJgP/jb/YsFT+gBTEda/IVsUV8UCu5BR3a1onu4gsFoysB7LosLj3GMqC065 +aKv0gy+3XB7Bbe+XbbT1LKXkHJf1i73orKgcqU7xPFxLZy81CaRCeLTw5OEz +sUhmm5truNpD0NPZRfXE/h8eurJekOCOoqKq+G4we0JAf1017X9g60JFt2Sv +XiTl1KVoERCNjnZUuVdiv3moWSTl2LvDnUrJ+092eKLsO1wnOvHzBIepoGgJ +EgzN3ShPDY4DzfKenpQRCsw83buT81Ys/Hye9JT/nz+KIR/JMsbvnVfs1y8o +GYGdinu8xG8JoLqxHzUSXynw1TvufffnZjh+auZ8mkcZunfc1TKhgwpvgs0O +NZ6og9MJ5Zn+J/NRQ3Hc0NQbnL9OLh802wlAnEvRtiwvR+5vw7Y9wfiw90uc +h1QPxjflOSb5wghU/PZrMR/WHfTzo0b0kUnwWQwuF1xwQ8oJp7424/js+3tH +q+gEGTSPH/j4/VsJEtEufjmQS4FDN5prxZxy0ITZPtUvjTlwLFNJTRfXa9u9 +rw1MI3LQn6XB2LsBgSD7W0CUhP3/Qlsy89h6BdKUdchTYSsFK+0Kq9xPVHjm +cXobPxWh4vIPp24rl4Nz/WH6J5VUyLl1OvxnRQ/KTXRwXPXNAr/puxcTgqlg +fIZL0PhxP6o5z+hmvd0YOIXenv9gTYV3ibkc5t+7UX/8WefJ/HwUzD2/TSQC +8zFlnhRmlQEkTPI+KMiUiFRe/e3y0qBCB+e4/8x5F9it+w368oORvXPyMQ88 +X+fUmi5wGgSA1+m/zJIbcSjxtVYobX9QU8hfxnH3NKhOf0tq5M1FFNTgOIvz +4vuG2aVLsmSQGrxKUBnoRO8lfYFNA+svzhHTQm4SOPuk8C0KtKPe1o2+PzEU +0D+s0nhWkQzZopcsWTwr0IslgxDrFAqcOREnTsD8WTiEA1W1dKLMdTYfffz8 +vcbJHZdyUtBHVlYbjetpEFPnigKxP4d6J6KLJi1B46bE9cfesejag3GhPNp/ +CFylQnwPgiFqHjmMlKUi/eNJ2TQeyHH9sVPBk1H48jH0XX2JP2r5dS2/GPMK +ypGYJ8pNo7D30AVUZ9GCBvRef/kljXldYrFUiO8wDCTe+FGs2IMmpS4mxEZR +4Oc7vXMHgIAWHj3eOz+fjL7eOSUXdY5W95/mnR4loAcTrkOVO7JRxsRrZ7eT +VCj5uOUkvSERbdOPqFAkpKNthIPMOrhumhts/+S4YgYlT14anxGPR2p8utG0 +fX+aWRx2fg9HYe3EkxOkgw1o6hj7O+3rFBiOvbzybvYpMDRx797C9ByW1UVP +SmA8ubz2mdTc3Qaa0gPpsqwxqPLHn3mvLipEbKouu68S0V7DxoM7c3LQnEzP +3hucVHDs5Nx28A4R/RKx8GjJykPffJpmgnioIPHDulFGaAhl3K6dP5r0DKkG +qm2pw/zqEVv+t6e8RBTKuSA+31SAqq/GMj7EderISZKBXh8ZmDaa84TuNqLP +w2+9WLD+/Zp0w5qRlwxBe/ae0ORCSPNKlb4u1iO5T5c5Wj3IEBNiaTR2sBWp ++UfdOYl548GEO55u7iS4UhrWukzoREQ1uDSD7S7T557x55Dg/oWoa8vvutCF +i/fLXxhSQP1yia3mtxHYEul8WpC5B/1ztPxTZEsBvl/dO7TTCuDmMse0YFc8 +jIXMy9FweyzaYiyAsQQK+PT4Jt7bobBUD51HP6nw4ZNjr55WASTMmnntmbdA +XTMGCZNrVOAOKt3ngHXU/kSfA3EDNSh7/PB/WygUaHDPt27wGUJuqdSjlfVV +iGlVsqz4L9ZfX8rJNbjOZiuu/Agxb0Wv3xhUL+E6WH/IrXKwmgR830Muh6+2 +o/CgURM+rAfvnhAoeHIuG7Zc8/jdNOgHm2zJ0llYByHH3Z/XnXLgd6L8bfeF +O5BvJl0kiu0CR63kg+NJ8Dih8hBlbwdq1ySW5mN9esJ3z79vJBIstc4fdL3e +jizr3+3TwXptSpGFPfM6CRTfKB9wuNCJhKYviojhOG+vcXuba5QIi8EZht6Y +nyi89I0jYXxTbhWZmdCPB3oxrnC46A8hBOV8ThyHYorJL76+ToGAF6EqWdcc +gNW/z10XP5/g2ND+vZ8E1ysjBV7ubUdXiM1p7d4UGAwuOVaamIT9dyOcbG8B +779c+0PAzzupR0bNPCfBromukM7oduToeGTqIn5+a3/7weMRJFBxzhjR5etA +f06QOdywfZc2/ck0dRLcdN74eUqkE9mtuS3SzoWuO+A4n2SPwLr/+4/MvySU +tTNciQv7UyF1NFgtphUUnrbx7xcmo0aBAMYb2M7hH9IexNaNctMUe2JN+4BP +5FmXxk4qzCTDmY9eg8jjTazivXMIYk1EeKPoaPsNP0/VTrvDQHfc5VP8lkC0 +d2CgnXuwd2j8ttNvJziwrZ1CCLeDc8SFjSlsN6PcW1i+7gMBfhvHxBp14F5D +owaNh8dLWTyx08yBVZUqDrGoaMgPUVG+hPFq9N6prl2YP08On76Tv1oBLEWy +ZCLmn+qHwoIMh4io67KKvvLbdpgUOrXLnnY+v1GI39edRNSbuJnVefcZXNte +d24c52lj7nBX9rgW6soYlHmn4QilzZ8cqfi9J5oPlc4pO6H1c6/HJWzuQ9Tt +i/faafv4zO7KLD+0gTHxl4ORaQmwzTeu7BieXxvnPHWnRjJc+3y0uTe8EQa3 +t3kQHDAeZqyikloyCBCPW1KdWkBXOkF+P9bF1Xbz6617HiO/yoYvYx8ToUZR +fz/t/ojeKwfyvSZxO1vacqtIZTDZd+qaZjAFSsn5aTwbZPiQeJDuKbUaOk+Y +LZrieeG/oDFtlhmC60dQIfHoPTDcOGilS9t/J1An3v0sDihWt9782WaH9O/t +S3bB/VRo1GKI4ClALhrln00UkkG3+n1xI66z0xT6Dz8bq9DYR63Vqe4c8HcR ++sL9FeumLfPo08M2pJUS719olAtZYbv89NtxPY0YUi817cY4S1HatxAPp0g+ +6y8SqHDeZ4zxm0gfmlH4ePH8sA7ot5FuenhRQVL/yCnr0H7U8iXnB92vRNQj +QGXZa4Xn3aO2vPFeJEwrcCevMkaj2rUdImK0dR+63dzNtsMQzB1lvuDShoxf +aFl4v6DAngOUizuBBF2EGKn6ffVIM4959Wo5Bfyzh58NuZCgg3TO6XVVEzqR +IS8qnUaBHQzooKKZNWynU347cD4GDbxrWh/C7duvyHWKWr0EanGMsFRIFere +ZvKvbjcFOseH1Y7+tgajWrOtWz/Gojc9bxpo9z2p/t7x139TGHlmbooTxRNR +ZtbjJA6ave1V5QG4DmtE2WWTjFh0Qcv5Ha1ubunUjmYTboC8EZtZs1OlYPZc +L+X7EBV+ZUbvlAggQ3hZjRFbUjMK2CK7yon5/1RGTbr1DxIk0ekrMS23I22R +vrkrGLfFPQcydd8Vwyr9iRGZrSHwbpB7Y/cvKrRIs+ycHyEioqb6pcFDjWgp +fIfAVqxDfXP9bqoxkuHYXyEzh0MI/ekx51vEesRYsHZ/4jgJpAhi7DwTCJUZ +BrJRMA606SzXkHFdePVqfrOfvgPVqz9TUqHtg2NYPHyJNwHOYBlgf9QTJPWc +z/DiccX+nWYwGkqFdsHfwflWmtBUflPuDI7bIIOldUmPJkj9EC4Z5EZG+x7G +GQph/CyK+9L5h4WACvxitb4oVcHM2uuUhzhPv1XolgadJaJvwiJbkrCeimRZ +6xqepkAMiU20KWkUePd7dMSvV8CwkaFKizkFhKenn4hYuyAlmUVvpgMhEBX0 +ttiJhicyjz1Wr5Wj3Pm9O2xeP4YTMgIXuhcxT1MRv8MQ1IAOmEhdZlSJhaxe +SGeaoEJp0Urx5O0O1HE575Cw8GNoZKjiuViN4/Zo/vfk4z1oQf7iTNBlD8i+ +q+qp/oQKy0++3OVu60XitsKTtn890VwDehL4AOOSJd2To1XDKG/86LpUXA36 +7E2oCcS82qF/6ehX+xAo22tjWn3kPtJs6ZC7jvu54/xlznHedFixKBY2KQ1H +6hvhtRKYR3kID+imzVTAzQN7Ct5inVH29ObX/hmcF8tFrKStveCnqqZinluJ +VNl7kuRccJ4OHKtuVxgBP12F6vq2YtRaVrwmOoPxn+m/nh8TuE4Jijku/3mK +iteqztRVYPzpOFS2LEFEEVd6xEh5Och4f9+3Xtr5uqlVB8J83RCvNimy/0os +8mt7EEHbv0wPkcZFz6tgtLzlzWEvD6QiYXl8+yyua4pzD1ZLFdAase1hxNFo +RL3ySWqDts/d9tOdZ3RkUBWhrL+2bUN7VJyobjiutn0WEpRXHIV/PEp3xnB7 +q5e7FaZxPNutffr6pawY8eXPLchYxMPNwH+yuzB/uGY197mnoxat6PTTcVmn +QYScZrndByr8V877h2TRjni5LHveDyeDheVg5IEmKmh/03JS6epGmxuzA1Ks +j0AtkNONGkuFj15f/Mnb+5DzcPC1NYIdOmD6YYvGPYzzihWJ3Bq+kGW2MP1h +1h8VXLulTePnB8+aH78pFw+ql42UvCqi0Ou0F1tp5wp6Zcoz+HAVQuouVpvE +4Tx0vPRnIu2eweLBm4z08e3wofAb8a1zM1JgUI66jXXB0Dk5+tH8YbjgW61j +n1yD+G9lCmh+o8A1O+H48EASxInJe8VPV6KXn+5oOVVRINKNNFU8TwL4WCna +zI9QBs+PzXrsN5/jonIsC4No5mByrLtmNUTbO95qxvM185I5cXx6EO3bcXLz ++MkOyE4yojtBxbyIvUBtPp+A0pC3YFRUMWyohbd0HafCLZ5tpjoXiShISvd2 +EjEXYmuzPjdgnsnEdEbe4jsBkWKa/I+JF8KblpVVUz7s5/V3JM4CMry4Jvbi +k2kTqOS8NtztSAFbuci71CkSnE5MVWDZ7ICToUc2yBaYd23vi73K5o1IjX/9 +796OhNRG+xs7sT9Vsmcbra+PwrfH3F5hBhUQNN6jOoXb+VLRQVY2DQNDvcDN +YK562Ou6xWj5PeYzirFXeOf6UEH3ysNtp6sRu51YtIo+FQQb/S+9nc4Fl710 +tWQ/f3TuGEXwEK77R6t8uQPzyuDfqU8rt0Qfo4MXVDvu/qDCWmTeB7rODFio ++nvjQFISUuYW8zbGz2tP3j/NQByByGhpvrSBZJSr9EpXbJICJabV+ltLSCD8 +6sltx4fJKPFFT/p5RIFe7z3bri+OgMgbUVXEWoUeOSfXNvZi/CkyO8KZ7Q4B +tYovzUsyUYL8woI4zl/3/pq4/StkyOiw8fmbmwsvn5UlhIZTYH7B/6SZORFN +UpQKuwKLUMgjBu0rB6lgpOhNTsH8f/a7wZJ6QR7qNhT2ncLzu8hD2cKWS4bL +1+47bPxrREax6ZyvcF3o3/c1/cI3MqTqNWUK3WxA18u2q/TdwXx14vw54VgL +JNviJD/0JxqZmMcPvMb5uHLGeek+5j+bxGMjqY/KUV6JYzER8zSv+dA3qe5k +8Dic8aWRvxmxCyW2JrhSgOWfwA2fMRJw7+CSyT3Qjj5yZanT1mU8Y/ayir8d +RKxhrz/f24mAab9Ucy7m566OkveiTXKgqcRC6W1HKCzGuh5rpt2/YD+v5nCM +gNyCOQWL8yqBpdYFFWCc32CeS5NLJiKHiFjBy6LtMD6bxKWH/S99u/Ecz3Ei +OpZJWk7iKAa1z/cXGjAfY1If3ydEcgbVa/+Nsn9JhI2HrFwfcT4eErr/J4O5 +BO1dV97/Weg+0NludtzGuLF7XDFYz7USMX3WfPiMww9CRb9D5TwVClPbfTfZ +6lByl7FcXLc/nGL80S79iQqPnw1wDr+pQNxe4sb73JOheNdl8ak5rMu4HAQ+ +7GlGDsuunpJf/cFMzEunmYTbsTlhWcDSjky23J9vZPMDNZXvAbyICqtRqbGF +Cs1IK/H51Hh/GjAt3y01wvWd7hzXBFmzE93OmFRgZfMGePM1LKKECrpHqaPc +Qt2I7uY61y56J6B8WnobkoLjv3Nc7PDLToS27gvX5IyDQ/zaEzYFVOj4vtrz +OqQH8ZanWR1evgHHpXlvamCcedXc2L1duRfZ203NPL6thzqUNC7NB1DBuZfb +0pO/FzUoDRreveUCDiwF+jpBVDhAUuwYOvQQRS9zqv396Q+N+5gnXWjn9K56 +7Xgu04u6pMvP8sV6oHD9eE71QCpo+Yfaa97tQ/XyTMMxKhEoIOdV2ZQbrgvP +PO2LjvrDk7qM5oH9tmjl29bOUtxOgMOT/0aJUWBxYeZueoIjCkhkF6LdU+nM +EK7v6poMT9r9Ls4aeqCH7ZrD4XgeIzK10hyCwmHJYJl84kQIyv+V9vAljlv2 +eYbjgc/rYU93adrJNzh/XZiP5ryhQruKGhenbSek1F+fj1HIRn+v39+VX4jz +OqzMpau1Egz0DXIMHlWinWsTiwy4vpvspqaRXF5AUc517TTbbPReallREOMJ +UVf+cl7MECRE7L4r8CsNmQt1lw7jvGBXl/A8WzAA4r+mXU9ca0LGqcp853mp +IK/depBbiAzpWqwMXd6paJTBRGu0hAI/2ug0Tw6SgNlvcdVLpxqRuvoflOdT +IFvG+ceZJU0kssXzSfz7FFTmk9ZmhsdbWXjvyLOjNsjIa0gumRSPYofiHRTx +eEUvXD8jLWcCdSN6IU9/xKDwY99PNWF7MLeAfMW/U8C7s2QzPzMG5dXneb/A +dm7B1Z7oS2QQt5NJKdqDUN5mXf07XE8zxrTPWx6qh6crIhpqU49BL8IqqRjj +6vkpqbSf0s9B1vDTyxRpL4j0s1VNwbxo9+9QUkZ/GWSmDB+4zR+BTHSLeG0w +fq6/VDopjnHpzH65YdLZFqR0rRLN/qKAya04NTdc36NHPc6pC7ahCJXiWG+s +K4d/zGzyj3ahFKWEurXgPvjO+8P7M/ZnyRGVHB8DH+ixYsraUL8K7MaXmGnr +ON6dGdEEUXtwcKO8CLZ0gKDF8GO0/40tbOs8gzTGUGbbxuDaYDVw3VW6WHyJ +AqRvP9Uiaggoc4bRiIHuGTTyfWDyxXVq/UKP32AXAY1VfTRephaB/U0ChXZf +sE2Ei4JCsBm8Uf1zf7tSPChj3mKK/cbr2R/aspWIYsruW2Q3FgLfx/nDSRhv +3QRXJvatEJBfrdmneZdCSHYYWfTEeBWWWq9iwT4Ks8a2pHNMdaBUEs8Qj/18 +9xyHyB0HdzRS0hViLxkAyVseXI2mnYtucWR1gt0VaVydD507UoWU3cjb9TCe +lOnJp+7n7UOmZvIewxVhYKLvqRCOdZA7+2H9KsEodCLRTeVNrT0U3eBOodVN +ykmD1e6ObhSte2Zact9jdLTTJLcZ85n7gRKb3lxkuPBy8ek41rMey+mh/NYU +SO71eK20LxHYZJaueGWbIu0Gr197aOeTc6kq1N4jA/2VZxNxoZnI7KFF7ZUs +CjzW7aNPtchDp+I6Kyd0o4H8upd972/MS9u3qJ7dbwXH885yjd+zQpn/tO8v +4v44dvQW8caT4RtLuWlyazbapjYaUZxKAV41/YC/WOc+Pcmwr1A0FIJjvVjn +kymwwnvDMebSbSDF/Edgmo5BW7yuKNHiee9/xgM+omMgSyQcK7KqRc+nytP4 +gQLMYUrD1vdG0M7j4YrvvVKR3dnVqxuYx75sPVuUwkRE+ptafpzMecia+Wtq +Kp73uELRm9v2EJHTS58DyC0PBbCyChLwfFV0DJfWKw8hBXb17tivtegokYcc +uEaBD3wylqOdRCRe9r4uLK8eGV//sea3QQHHyA7T+XUC4siRq+PKbUWtFIm8 +piUKiB66W7j4Lh78tb65s/b7gKfD1en/cP8bpady2HlS4OtJ51kDOhNY++Mq +H4zzmreV/q1IBgnOb91+zetdOxrXi/IzxHlhtMvbIWd/C5yZZbP7o0lGL4od +XOuwTif8leAM1SMis1Uv+/AbtaBjKH8icwcV+KwjRNpPktDPA7uovC2NoOpM +JzPxlHa+5TFVCh0R7Wh/zDy9swIkAq/3yHBjnvZbaOJ7BQnsJAQS33v6wk5J +KdPYdgoMbtOXe99PRJxrVYpEcgoq13sk6ob5BuPLtOjwnBpgeVB1a5YnHZVv +up6WncJ5l50y+PosGUQb2cd4iC3I2oCDtx7X/ZWwopfczYOIySD171mPGjgU +8I2Bli/aNomPO0ZcwCC74ElkgSNM8YRcoK3DRhf7jsnheXkzs1YmN1wPE69I +5RYMVFiwFo/I4s8Ej/cXij0PpILWofWmfhxvfKUaY+b3CYg5eyOY/VMpHN8e +OncR56+RgwLLs20MaBfrf/K2nW4g9FFhFw0ffrqwbr/KrYmUHl10MPWMBolp +9zEqnpeAYeWFuI9jcKpm3x/OkkqYE/R2PH+KApMqKmEj+wvRmQSK+2+1TEgM +DxDpxzzh9Fnxhuvzg8iIMF8o6JmNQhluXDCUwHoqy/Gc10kziG8AlzcXwlA5 +DF4zwu9liRPInRc0AfU3yRptn58g5PFq+S9N1we5SAf/HYPwyMEbhbU9SG5X +Rxtv6wJ0y/hscbidDWqrSWyO18/AyuPQN8QNXMefktI86cngtPei9LaGNjQt +ZPjfKtbFk88ieOZOdqGvWScFn1P6oE//4O+Q3VTo03rsNJ02iDQKJOQcZGrh +awFzNWD/7ztb8b6P0xO2FS+vsOnZgixLVR7tXA7/qhPufq884E/Ath7lEntw +rPnvCW1du6RYfkCDl4Ay9v5W9R1uAZcc7nN36ajwcIsFyaqQgOyJ+4Ij9Jqh +nGHbwf1bqJDIZMUQGnsLgvXDCZPdbqB1L9ecdn7+uyM5l0VnhlHQUxvC0/Q2 +8HZQ7qvE8eamyDEQfICINAUnq3s/F4GRfyZBAtfNz/zrW28LElH/NieNm9kF +cOTn9Id/2K54ff08MwcR3fFKnmmKLILXKp9mt2M9wjErq5ixl4i2oWdJBJd8 +aA3b7UZbR9Y4UMYXGYxxTF22mdulBX6GXNZyxDjcOQEvfmEee317xKrl0Ta4 +LyOXoWaDdVNIfp6AGBmI4rtYZlXaob8qbOAYtkd/z61n1LgM0sMpfxK2xsEP +J1lv2j0vCwfu3XuwfxS+H64gcwRXwbv2t8QyN8z/+ZvkFI3T0ZTuYpdjcwn8 +qSmNHcV1U6Je1MlXpBdaDM4eynnyHN6nhzw5i3nRj453xgbc/sgl5F00b4IN +nDBtuVuG/faDf+pvmT5CLkRWHdXwPESKOlBwo4UKqnV3RIVMPZDPoj/H5yvW +4EY5ffE1fv7Pi8wmgcRqFD1geCc06zkaVFc4fu01FaoSbZozivLR2VcPmAXp +PKAw48IjCZxHdkdOBoeK5KPgd/N6VxeCAaXoSZ3E9tqa32vjLrjutHkv7JjK +Qg/nI8d1nKkwkTPRHHG6C51qTq/YeroSSTfVsM5EU2E7N8vYs01zuPNu6sr7 +y37I1+1BbT3uT1v3jzmXS5Zgovxs9MMpD3Q/KOb/8p38wPbVgwkS+KTKDOf9 +V4fqO+KNuNMosN00oZ9ThgxBvIfUSw6Vo8dOTRNPMygQ/3m7zsjGGFhFEAP+ +/cpEN/IU3oqdp0DcJIMWe/AY3Cn+qTO/BfP5q6679DQo4OWzcMDaiogO+hh3 +ebVnogML+sG0/2QuCn8p0xyygnVO8cHI2ljE1Ss0nEJbR4s4/tzoGBHVL9+z +tHQvQFuSxwZD8PO1a0HJ1T1FQNETm3y02wqurRDLjq5S4djwQ6tA7TwI2fqZ +ZclBG4zd9ZsFsH6RH96ZtUc3D8o7538rW5ujlvSqrKPY7ssq6Nd/gQx1PB0p +wNSKREW/iuRhPKfztc1fv0WGsoefxZYfNaOcfMO4bGznEV6DW89IcMqQ69eO +zHZk8CrsexKuC3rb2inTOx7A0RC27uZBTUj3vCM+gP25++KY6h65fLAofL0Y +/yEapHkExr3WqJBUPmLEJjAKbvcqz7u71sI2m9liSdo5DOVFkeyOZGCenFRm +FEEgcMJx9yFLCgQryOydmsL6Pc88ebmqAYI7348JYZ1YERAe6uydjKJ4Lc4n +BKbCEchJ+47HVR3Qxit7Nh6sZPavaDbfRF3x3o6W2J97ti2OXWK2g6ejzYMX +pWORZc/+Tdq+SL5Mh+dXkoaQq5IstSe+Aa1GjkhkzVHgt1ojY/4YEQ3ejHLl +C2hCh7IruI79oMCOjbBoG9N4+Caz+/qDK95wVoJ9SBK3Y85bWcud3QiuHOiA +TCgZmR9WvS2K8fCtc6ZP2Z0u1LzLjV5goA92iw36NO36/+8bOlErKpB24gFs +eCedPS+jBP+qFCxo/mzvsrFYiskGt5OHfiDfBIz7Ow5M47zw/i0rb5k6BPXs +ltySDAS0W+v8zlxFClS937rWXnAHPB+kjjm9cQbXzZijH3E7v2sWDvxnPYJK +w+sKNS0aoNUqS4XUh3X3fq7idh4b8DjyquFkSDys7GnLpv0Pmf600cT1eSQS +vRykEDUYAO2fp5YnsD21MS9U5dUTlB7dqtd17Al0zvIc3oXtZky1d5nqHyEW +IZcOo/BYWPy2ep92j+eeprDTJsei0TtNLpu9vtXAupGXLTpNhX9S1yIUY0LR +WuoGO3/CU+B/ZWpMt4L9uSZb13esHt3dOWPm4pMES69MNK69w3H+Ri1hYH8n +MNG95Lsx+gzFGO3/704uFXI2y+lKrPogxSHkwfyZWqSlI7xFz4AK+/ccSctn +H4CU0tXq3O529G7Xm3k9Viq8SHj+YSm3G0k4J66kiKfC7/LL6wcxL93Ju7Mx +ObIHPU0UKlecDYOBgWPeNuGYj4nzZ4r29yG7HUXZfwbDYO7esFG1ExViJX7n +Eb4j9MJtcNY6MxW+rKMs9VYqGI/3XOZT6EC67BofjuaFg5IhJe9uDRUWE3cV +7BCrRdH7/crzQxLhb6EE33us3/+wjB7et7sBOejGD8Z8CAXhK+S/Am+pcCU4 ++tne2adoO8cep8r+KJiTC7W79YsKKcsZgR/My9DqR43z/53xx/l0hE1siQrh +J53Uf4WkoiYn9+Jsy0BwMsj8b+oPFQgcu/aUCGejc6VvghRm3eGYusjFAdr+ +7obmSKv2EeC1WJ/8t5oNWR0HnNveU0AqUyi0sHsIbg/JLrXGpsIp+niXVey3 +jJTjl7acJsGths0R9CMI5thHW0+PUmDkpsSkJisJptgzSp1JD8BXLJ5/YJwC +huV2wTs3hoD71dj9j1oxqF8x8aYkC+2eHcVV7txhYFUdEACiM5IV7DYc2Yp5 +qcfTgVJiD2TIc4YvnklGHIG3BH8FY1663mzfYl4KU46sGtrbklFoDQsbH9Z3 +CWqhKYy7q6GHoERAf5+gzaiqoUszWO9vC5dSS8+ANXOO5/ymfihvsWRFA/uh +cOhNuMaOXNh5wFUvht4D2V+/k0I7V9k6jGzaMZKNbgrJa338FwnzExqqnbR7 +aaOjO9m0m2E2B8K/bOtBT26zhlqbUeGJQ2aNAomIEq8/KjpukoyuvGUwuIR5 +qbCwfYDVISvgek90/J0Qi16OiHzNxPHv9Srq66PxUZDscfwugKrRT+Y2zTJt +CkwnZwYVi5FA4c23Jcm3XciWw1PbGuNboKZYDG8K9ufPxIsilp3IJI801Izt +e3KKz73Fdappq6Jb1N0OtOP7MsUO29nGXpTciCHDxVvpugqGHejD4MupaE0K +nL0klZmK61dvmD+XSXsH8hmc/tZpgPmG2YSTuB7G+cS62psL7Wh1MFLUyZgC +Dlfqb9n/iYPswPtqzQ994dF+ORMJ3H/103fzs+vSYcvSx2Ylew/wuHvhB+0c +Y/W7nxNvf0uDYtZAW8NOG1iOnHo/RztXfMn+7XXzdOCRF2osFb4BktoZ78ex +XfKBjyvnWhLw3rKlJPPqw48rc7yI9r+6hw6Z/gEJSOrtsxwWHchRf9fXC7i+ +BJqHgeHFZpBUDfKgWJDR4buh4QO4HjFGhBypdyWgHuN45g6pOuBZoT+ntYcK +g7ECcnVhBLTC8OSMwdV6+KRX8ZDKjuf9M1uv1gwBcVH2OZHN6iBBt9uYH8ez +bqeU4vYJDTBwfidh+MINZkmcW2n/H8o+Ul66bfsEbCgTuhWQBwqOjI8vYbx1 +lkK/ZEfj4dPq4lUjxmz4823+kCqOk5ZVxeouGj88arBbMb8MJMgeLSZY17T8 +YtEr3DqMOIy5KOlr8SiSsrRyiZkKzS9sHZblyHDw6uXSGI8WZMfnHXYX1wtK +6JkVXwEyDAQcOJ2g14qsn70O2Yn1S+U3OjOZzwRkt05wNrGrhoDN6v67e3H/ +P8coreP3bi7SRdNBFcjvdTu7B/uhfs+w6sEnwVC8/SLr0NlsoCzn2rvgfK+d +e2lzqz0EGo/ssrLyTIce7wGW63heBA6pKs4ElyKZ0DJlf9YScG30YCZjfJbU +sE2ppxJQErVDhmBZhN6luE0ewzxW96E4vVKhFxiUqVTmLtrCWZuOANq+9emw ++og0KX1QTU8Wsfc1BzrL2W7afSWyr098ZygwhRmdhFJ1Hnt4vCmtRVuPDh+o +Fx9rIKDumu8180xlkMzo/Ssa8xx7z3/Zd3sJaPtZenndqGdgm5YW9A/rhZHt +YcZ8EwTkVGEd0Gr5FHR7ZZPKcX+EctgrnAWI6JzdNfPkwwUgNP/5hjtuh/1a +l/kh20B0u9wxzVI9BBwrdK1p+0kF8qbjm7j8UA0rlb3ufTgkiKY2M2P7Eedb +ZYahmIe8liYLlOUD4VbkrrOpFLBRyMk48IUMzlFE6br1Isj9weucGEaBIo6l +Bm0DW0h9c7tDNK0KFm5VBV+dxfpI+Liv5LNINNqyIshtWA58su6sLzDfrvcO +XlxDI5D6nxx7619zuFFCH+E0RQFNFf+/e02KwfljPVf3pwCUOrmml4hxfk6w +5kP0eg66ZBN+XD/dFby0X6a+wfH2UO2orMz3HrS75fKOv29SUKF1yqhDEBX0 +uBjZdQdIEHE1dacGWwPy6/cVsU2iQKHfwY/JzGNAzmVY+vojGwVFaXjJmlBA +ZSZzH8+JUXi13ttTmNiK3kVXBdNhvvr4uN+K/aFReO73ITppuBl9kVFNUrhB +gfWr8bmP0nuQa7ZWufGDLmB9xP/P4yR+b4UdK8NsLzh5+l+Jf1wB7IH6pIt2 +VBBfOGP+dLgIBIvDzyeLW6Piwq/u3JivynNlu3ZokmG86lWt79YWlBKZL8CG +43++Iy1zKIYEq42OJ/70t6NnYy3LJfdxPQrpdb3VkAuDjcSbUTsjwSYuq6Od +to/+yt8TnfzRiMFD1Fv2RAYsqxTPPcVxnqo1cUr+2xDMBn+pOFWTj/yFvweR +tmP+n2PZo57UhZ5l3ymMuRMOyvH97AOZVFhRy5c7Y9yKZMutgspnwmDi+B9X +xRdUWFp9fuAtRzV6cdyh+n17EHwT2Mc2jOtLde699l3/FSJnVjuGxdT7cHdJ ++pUw5rdthjGqPq8TkUSnZlF3kDM8CJAdncL49vkxp1J06wiUiRfM8TWFwxnx +I9G78bzn3ZaRVfs2CKW/oy/1BD5G73mC3pyUooJHXbunVkEr8MVWzqskJiGj +sLsWVb1UcJXYIvvbJg3Wt2acJ/jboSNfbWIZcPt0knJCqXfuwbdPc2xUg2gU +xbz/Tz/Gbec4xZSAQGfYHOLY4f80GpGjpjXGsV3w2KRdfostCJf0Wk7zRiO/ +D2N+P2jr4MFzuY7sVjDXpPrA9m8MmmX3b6nBdo2RtLevb5Jo57uLg28X+j3g +cLrVlgLK0e4endZ56Dg6dxrtqIIt3JEK6Cuu1yqbM9PbR2D3p3Api5E+5Kvw +hV/AGvN51scfGe6kwsF3WZXmJeYglX55HnD/k9R6G1XPxcHwC4f8pNI0aI0t +F4rB88goyZ0fdvEJXJur2lbomA0B7GFbR2nrX3/T3fkJI1C857+BXff9UGvF +NY2wj7gOfpZgl901iHL/+gtLr7ZCZFv9y1NsVDhuneUxMTGIVgP4LL95N8Md +95rki5iH7FlcqgqRIqD9Z0NJgbNN4PDtS20bIxVCDwTKPmyyguUJ4u5lm7tQ +YjFhSzvf4AI/38J0kAma5BZ5TLmC65t6Lf87jJ+1Gd0aXm12kGd3TTt7JB0Y +pWtu1tHqo0a95tX3JHhy/v6/h2vtSDe0zJfVEeedbAM7vRIZVHdUu2f5taGI +u9J1ux0o8JL39OXtOxQQU1LgnFZnEryd2WAaxP6x5Cn7OJWoDz0JHzpvlCVC +zOF07Q1sP/vxkSZ9GQmiPjt2fH7dgXamHX7Lgdt5cyhoTmSIBJdShL452Xcg +4cxVguBdCnxQcWKlx36TdL/9s2ijBy1TjDMzb1PA1/rOL247ErytOHHuKl83 +UsjNezBgSoHwP33nMmPywX87UZJuTwnEKZ0OmV2gQnR3TVG3KBkR4mMathMq +YRSiiwVTKBCxHHnc3DsdNWU+I+a8yYUvvKpHlXC+l67c4hl8lofiCxcv/j1T +CPRGPYyXMV8NcnO5njwYjcp/2rhwaD9GTeF6VHYcb7qSSROnrycirUchY2ri +OciM3lTOHuf77pO7L4ooFCFSq+Yv7qEStHnLKs1xDvPnsRv3Z5kJqPW8oqv2 +2RxYqWljuyxGhXGBlcHFR8Poif3Sl/0RwVAl2iLAuA3zvYBJn/IjJMQ0KRtF +d+Y6uj9LNWJ9iXlF0eBei4sEdHdPscg/40ZgqqG+IGCecFi+86ipSwHEs50R +2N2bAxt3yi9MLlOhpjjiz9nJIlD/7dZ7cC0Fni48Irr9xHVHptvV/TEJ+Awv +sq5bmqEfp8az3vdg3fo7qSS/wg3+cSttsMilAiFnPe8cnscGz/WhlzPXYIvT +Hn72m6mwXVQlWRnbv9VLx4hJkuHc7Z41z30psDSd+cjrGeZpSpd1XNIwf0g4 +Zbv7Qw4U7LSV+p5MgcOkmNxDlmQoP6GgoeLTiv61Vk/T7vGUll8TP/qXBGLh +kyvO4e2oXqin+DiOk58DzQUbZ0rA7WDi17imArhwM1ifFc9vUUDEQo57PorT +KI8w1CyF56+YZL7PU+HayWv2TFeSIVT1D6cQjxdoyL4/EYX76UtPqRNWx/qH +8UpbZ58n9HEoRwlge+FB8xOyZ9MgiXSgNOuOC9QKeEvR7kGjY3ty7+2NQWQd +3/ZR+nwzsO1uNzHFvKWSEuLyaX4QacvSMx5+2QCvOlgGaXzmnueDphcSmCe0 +vHEd4G6AW4wdzqK7sa45m8569G8BnOQ+vb2kJh4Unx/63oX1I4O4+pn8wwlI +KqW4ojy4EAzrHXV1sD2xcSLRVDcDPbeviWB9XQjyRk/238Pzde69s2pSWio6 +kPN4znOXBZJYvZQhjvv51CCc34A3D3XbvlZUtPaFZZ0wa3baOcAKtSyHLpYi +pd0PyM0PQ6A2fp6HCcfDsTAOqT+VOfBdeF340MFMAM4rhCc4/vUVLvGXFeSD +QHrqvZ5X6RC350LUPtyfx/eV1A8dd4YuAa7fygLKoMfwiZ12L+dKogXp5gN7 +mD6qVLc5YgjZxMSrtPULZqJODudHC0g/PO179JQpnLA9c+AXtk91cPs5syeD +TPuJobRWJ/jVIlZRQrt/sHtLu+XhFDCyHLfgWnSFg56V0460cTm4FpePOkDP +e6mSzCwLKMj09Kfh20Rb4DOWW25wOfeHZ0GbHuTcNWSj8eHAo3ajAY+cgdj4 +81hQjz7sH60xpz2/+xWdlrJkP3J/1T/GX9EFmsxVynU7qFActRBuc5aEtrC2 +dn8urYVXXFLh2jUUEHymQOf9ohyFzv8X8qXzARx+0YZ+YV6k4sOVmB/WgF7L +aGsr7Q4ALoMeqZUJKryv0l/ZfaED1X3qtlee84EYdWc5tVoqqKpMfvOc60Zp +c4Yfr16wAsmTW3tIMVTgVH6b8NWsF+kMGIl//GiLrnLmybT5U2H9SpX9fWon +OnZa/um2jCTkoXv8dXEeFT4ZrzNOJoXC25jvW1HjHXTcpI9sg8clvfv8iR/W +mcD1IN/XrvQ+uhhmevscxvOfCqzk0/VVEBnxw/nE+1gkEcSt8xzzgZvspp+Y +dvZC/UHhy/9RsxE/V8XElB8VdIT1jtLxj8DTxlXTrs0UpLNT8o34Twq8tXYW +dP6JdZ8AMfykdAoK6TvAexf7R/H2rO3pm5UQrUSf7EmIRZXWFzJ6Mb7JvKq5 +dGShCCXVmv37yNMPv4ZFNnkscFy9Pc+z/sUY7cp35XnUFAb3NX/S3cD9Z/tv ++IEe/xjIdpfk34ssh8cWv9josR40VCo6LxBAQuQzv6S9PephNv+kWn4eBbr8 +0lkruMiwhHrkM3Ja0aCHJP0RLwr435D7MF5EQOJ5Bcvf7Bth8lTC1wDMo6QO +0f2dPG4CbjHmLeimMzy/PH/7O37vsmq5u8M7AqpZ3Ol8bmshcHyIFlQ6ToUI +ezW2HVtcgSUi9baCQzIEVgr7xOM41Fs8yxSk4APM3xbDsqtToHZ+zIh2Lnrk +NifrLalFEH/pklRaQAi6Y7bxbhDnS9z97AX+qyR4fZ6Jo0s7Ge1U1D/3noDr +5laLfT+0yJDacaqSqtCGNlxPnBbHuPeMUPlyVwIZPugs7IzMbkY7Hfz59mP7 +/sbBJGVeG2CrSeNaW0gEI18bju/4vaPp3/ZVMtyCjaevDrvoJ8DL2kAC7b/N +0X2sTUwlRcjU6FudV5QXSD4zvPkfzutHvTszZ8uq0cvXZenru/3h3iKnljfW +Tew3J1jyMlpR3oHnRjsk/cHmWVJqTT/mqwJhdgzqXWhL+uTz9Uo36O1PiT+T +i/FT9/gpnz+YV09wi2Wl8oKfWgsdhFDhTK9vgmt7D7ruMn3g9/kA1LDCyB78 +CNdHirSokqEH/OBQ/rppZY22xp4Ro31vF2QuKTodGQcVFwgyXaEuKKK61oJ2 +bl5TX55IB6EVtnToNHiNpaNsP2EW5h4qvM2REHunTgDLT4Fd3h6ZyOlr7FnH +s7h9H5Lpsj4Zij4frxCTSkcMui7F0/kUyLdaClrINYH9P9fty/hi0PhJRyHa +OXWseu4cXxjJwP74ycfQh+2o4mfw+jztvrZX5tYip8iQrFKY9msOIZnc3tPy +9rT/cDZLs4NvI/2r6Na3l+Hoj5VCshJt/+ySuNK1omEUS68wcO9sEyCXgW/C +uC5nq0zt6H1JgswO6S7ytk5gKloViLCiwJG/xHO970chslDSdIa3AlhVFbIl +blIg4fVe6q/35iiedM/b6WEYSrueoUrLC1ZL+Wfs5Ldo+S7/xDnWbFg22n19 +J3EeOAIO2FNDM+EaE4dxvcsOpGq0q9AQ53vWfMc1nojrqJyF7YZPymP4fdFF +/RhuR/mOf8vZuR5IfyukG6IYiupuml7ywPMl9Yzr13nBXlRPXvjeMdsJZvRi +F74IYP78PmXF7mAn0uYYM4r50wfNep/mf3JTYT/vjlFhOivw3SObpcAYDx+D +TWStsT9n/Pyk6T6RUSCLHSnRvApV+ZuI6zygQHVR3nOH9yNAf2c5INOpF/Gb +3xB7h8d731Xq7MpoAnpBFpx5+r0B9rybvQLjVHgVP5sQ/bQMHf+Tw3VzVxfM +TP+rb0jEeFi9VUeBkwx2d9+zhKW0okyRBsd0nO/hm/rRVc0DoOZ6FhnuI6Kf +WREDB50oIGTyr6nyRR/YiTMHmNwfRr5b9hQwO1Ngx9NmqQt5vbA0+PXtDO8I +2n8v9zKnCwVyrXhU5h4NIIfTGXeNuTrhi/WVm59/UyB2TiDqynECokepUhKu +lVC674bYGtbvGfxNkyYORLR3ITTpNnqGis+PqNJzUYEv3/ub+nldKFS/YniG +EAdre03laPeYO31p+LVYYAK+HTlaouVxoOzB0kw7F1pz7bRVVAwRrjgcfHxx +LwktTWZHdy0uwGkNavTPKCJyUVG1E3NIQ78Z5Z7T9nkJZ1+Nqwu/D/ummh8J +LSZDFMt8zO2/tP/Mg32yTIlom0DorRDhbMSrckWe5wjOxw5lwbzoWhRxXnPo +t/QIHHXRpV/B8flr0X63misZpcr9nf53zBFygqj3juF80f687W6afhYAi5cM +Q2gheh4fqnkB841QuuKLY/YdcLzzm3kSIxF5/RtakXhHATMBj2qJ5UEQkZAn +X6QnoKytEga5mKctinTfd/4+Dn+TA85PM1ShVXXmS+TkBfD7Y2MVrNGHLoqZ +JJF/dsNvsp9tNMZn7bhE1GHQj/x+DuJS3AXnnp4ZyqKngtsRrsJP8y+Q8xe7 +rHORnfCDJHnt218KnPKOFXjTT0Bv5/tJ9m/T0T/3Rz9fCmJ8SFrsnt5PRJZ0 +yOXKryxUHuxvGYnxXMrc03dDnoj2ePX2zbVmIb47jkMrR6nwn/8ivfEhIgrf +KC3vZXsK2W92zKxjP1OnIvh6o8mgfO7YnsHmZqhuFym5iXHYIDQlje6XDnDF +7/tb1haDnm16hnfheTR63axJXiVB/Hq5y4nCNsRaJ7Zy0JsCD5QLz22j3X9H +yfONOdiGzj33PaKB7fuML7Fs4SkBpJ9xc9/NaqSUrJbM+B7ryqcqrloySXCz +m/vxAH87ku3V+WLRQgUiUXOvYlcJvHUseGRVSEQsz3fUEPbS+p83LKlNBjoT ++r6qtBg4n3PD6WsRBTrJpPXJYCJi73ASuHU3Hb33fmn5EY/Lmas35juZAJxm +/Tms1zuRBiHJf+EVBWI2tuze30eA+LPhBkNv+xDLnKTSZCoFSv4LX60UHUGX +dP68I1aVIRGdg6e2T1PgK1fO78Q/IyiJ00Fxbb0IfXr+i/R2hAJNrDtUA8NH +ob7n0Ss+0xTEEaF0UNCDAj2a0ClGeYGiTOn3Zr/ogPsn/kfZd8dj/b3/l5EU +Jb1FZiErFcmI6kqRkobIlj1LlJ2skIzsnczsvbdjj7iNm+yMNCjuu0gR6Xvu +3/+fP37+PA+P1+uc61znOV73Odf53fITz+/4+wBa0kYYODmX6HSI4/naaXCX +GftohUONwUVXwuE/9o/fUVA6enhKJmJqHePtXlaBDxlEsPnru/+pSy2yKZM0 +pdTZKEyuiP5ZiNud7ftN5mpQi3k/hwL2raLHjxX/4htAD7PkBMUTy9Ao2xqn ++jQJYj0tg/ewp6JsYQveb9I1SGrEtSV0iAzrbQ9VZjJ7UNvaLRkSsQxsH9rd +0sf5Q++t580oOYDSnb49T45pgA6vpXTJehLIysbXSO2IgwjFrXvVsRlo5r/1 +MEfM+3BHYuO73CDiILxnEA1IQLe+rnwM6CPBRZMbLJWPiXBeDKQVTjUAT6s2 +jyfml78WH24d2hyETW82PbVYFxCNULn+sQLzAnV+SqgmHhfviNLPwz4Q0lX/ +4i+eX6Es42ZuRsx3oQ1lLgsNyHraDBYxHh4WEw3VoyICYVnVKf9qIzqjlh9P +g/NtJFD2eATmu8Qjxa/27GlEcooe96VxO6fUsvBV2n701vpQkItrEtp/v7mH +AethEa9r+xs+96NXMlOnD9zLQIR4l7dHfpHgtcqKwbj1APq7mRzXsC8TOerl +ZVB/xuOyTjF4Wh0G+y1YtGIM4lGmlbGlKeYjNCGmVkMIgPpXBs2KuW/QyL4h +n3w8j4PhOqfevIuD5/LVC0MOBUjw5scgGqyrY7I+b9KIEGG5unRFobUVQcvj +L+lXSXD+dUzhwBwRNBJ6zeKTW5C32AdJZhkSPEh8cXSc6zHa4aVi7riUgRz7 +rv6zwM8vN20NyjIahDKNqrj9dk3o6x0b8zg/EnCFiizT4Djs8vy1V0WsBSVa +nBVK1icBG5ScT5syAs/NnizughDEOSTbSNkPVvr7+yyHE9Z7JpYSUrrROBWP +ydDi9e5GxTKQLu0NzS+jIv4pvUaqPz4r6+Hxzr1sgXiuATD+UnzSvKQDvael +eT2NeWfc+oaSBeMg8BwR7Xh4px0FaAgzMBqR4Fus173vnwaBtvjh2uOaVnTo +1IkeETU8j4s3vxXVD0C+YHX5t55W1E73ob/hKc63nNaxndMDELGf6b4eakM3 +QxX30VK+n9zVuB1A24NqumtzXXbVwb17IsqBbGRgmfggeepHD+L7cHyv0lAl +qNC8dPiL28NoXrywy+5FGZfufNpxpBRKbu1nX8H8LiRrZCbk042EJxwhPbEF +Yi4y07dRYV7uzp9Rv9OJ2hY6dvGtt8Akr8m7Kfz/Q5fXE2hf96Dt3x2/NhY6 +YHzKijqyigTNWbl6o61PwUhYL4Zn4xGquKnBVk2pt8l5zXDW0R5EP1DfZa3z +RvoiIXXxuJ3G80/G7YuAPnyM6T14MAL6OmQZKPXb6wUf/Hvz7xESrNmlnrAR +g5rCw4cnMd+xcXx+5hIZiIT56CQ2xlPQo1eOR2ewz13o/Y+f4Xgf4vgYHSex +GIMeeM4e5mTFut0ylRCqTATfirrTB6dbUHatMHlWhQTPtf48+9OQCl7K+S1r +PfVAvnRYbF8nGUY9/0581RyEe9NDXsqSbUjLWKaxyJgE6+K7+c20I6Gx0d5Z +8l8BeFEfiHLCeXu6Y55ukS4QPsdeg6X0ZFg6JS9sQ6kHlT46P5feBofyNkJS +Xw4gYljSA6knJEj/LfXcsWMQ6F69PMe6sxldHYrToOiQyL+qSwf/DoDa5PVb +ruOtyJM/+o+SPdZRfuuBX0QH4OrDcf3QOx3o7WTilIwDCRyyKzfEQnoQW8nt +994N1dAn940jC8+v0cNIdhr9XqTl57Xpql4OXE93eg5gfRITmhMYVN6FAjKY +UPK1FnhiWvv9OhMZTJNuvtD66QqJafvIoQ7OqMeY0acMz4vGLgsl/90eKNt5 +mb5oKAE9UEjr/Y3zvDnwSsnQzjxoGuGzbPveBtYtp+cOYD35X32B86GvL+G/ +7ocVt7LfQFgzg4sDXo93rp6VNNAZhNiZfSUNcS2I6kNmQRce7zupvmrlFwPA +X1Tylu9aO6IzfB4yjMcb1KeSwv1eE76MfTILiYgCH6o73pR7n6ntHylwsg2D +SPMXdhvWVpS/zEJ7YicJSmyHQzteEZCq0XGPMdMEtEp948AuzHfCziNh722j +YfJgx4uWnSXAsFnjz75Ehv0BvnKaHmZwrMn7ftGRaAgYjdeRxc+PFk243GP9 +Bp1ZsNatR4XIXeqZU9FXMnzaXZ/z5elF0HzrccWzIhJcgi7Iu1F8xKdDywKa +1Ihz1UV1YyUCOAZYP8dR7vs4uemxakpArIGqKTUFrxHL0T08L7AeO93S4K6h +SEB2KRd6tOZS0O+OaD8drEPWUruvSuZZgl//zgGbs9Fwk+fvbwn8nH+ruklL +IwRE3pDzQ15xqCJEbHOWgwxmXcWaAlPRqMWMSbXIJwMlPpu494nyHSlYprM4 +7j1wlSjXac93wS4jaf+kwm9wkUpw2pPhA+ptnF3MvvkOWD7dOGh3cgFSAw8J +7OM3hEwe4yPcM1GQl7F06Srle+buiskD9+/DWnOGzzWlaLA/MGtzilLf+8SH +uPkLBGT97E1tZWQqeuX3oksL939/2r5fsrIEVDPbKNYglobqWLWiFXC7mfwT +e6mM2yBoVlhkIRcFH2pyAin7W2wOlXSCKwHJh1jpWQsnIt3pRNmiI9h3hFZW +/6dOQMoXqQZbHZMRc/e1xkP4OTvfXjwZ3YD98kwxbc7JGqQU6Kykh/n9zhP1 +B/vUs9AumwHBsZJitG/Xa0n6z2T4GCJnXEomwjw71/3A6BaULn329jUpElxX +GKGyyg1H/+69TeW/lo7YVUzMfuP8TA/lfGSWTgSDpvro95ktqG7ImcFVngQi +oY8O9W/egfgfO8ho7CW6I9w3w0PZbznxQnI33wAYlW9/yhnqQPEZe58G4/6c +Ij1Z9DAcgG3NUBkzpQ5E/5RWfQTrxpd1Xjx+tYMwM8eSsRXYijjV39y4r0uC +sw6CCX3fB+Bw3+mFgF3taFRw0UnHkvQ/99voEH4ysZ7uQecCaSN5jWqAbscM +IRvng0KOWa3JWg86uGs6XPN5BaydqnngxIl1+5hA/lJ4L3rdR8fec7UEdIIH +bghykyHF0uIRQcYXnV76tPreOAlWNMxOb2O80lSLVg9aIIKDtLjnxHAxyMfs +cGn2xLx5mc89Sfo5jH1lMJpYcEdXLWcLVHAc/mao15P1XgB/6TNPgXFfNNra +QKLcy3Zil2ucH0M7qnxhdPXLYhk8Xvd7ecuZDA9n+vZ8DupEz71nGCxpK8Ez +Imnxxl0y9Nln8IRYIZS5lfFjXKkMKkycn2fm4ny4JBpqslmCLubI2hRoF0NP +Znf2vwnMs1/g0W69FMQQFMY9K5gFDruDzz9cxXpS8QCVWwoRXN9pHLrhlQmW +KbE0rNEkUOM6yq20nAFvdgXnpCznoc9J9UNXMA68vFLoU2D9Eh5U2chWSYah +QwdnxinnK4U7+P4ecmqGKrHt/9zjq5Gx0nEVgZdk6J/3uDimMwCyRS/5a3Nr +0cA1lPupmQRJIjNfEG824unhT7cvzYSAqd8pwyQcBx8powqNaDQZff0z45Fk +MI5NNrPFPGUyohhpwFaNiuLm6NND84DomPiurJ8Mw5xPDjgfbkVTM0Yv+fsy +wGjkSm17IhkCVut/yX7oRBK35Vq9SkNhrij58lFbMnDWxOcWBNlDyKTLbh/H +KLTDjNebcq6ByPe+6u63ATjyqSA3pLoW+X36cP1YIQn8LHdKWSYNQI7hO6B2 +bUGV8rQqQiEkePj2a/zup31wXtyk1+si1v8SpsKz/iRIGDZn/VzXi37vigg6 +fDARuRroLrUcJwNPgrRL/9378CXlOAcMRiCC2EEJyvnckWKL1ODPb4GR60u+ +dWAPygwd8CzyJYFF8fGP+70GoZxaWeOISgva/MRcoIx9OqMR3UBb9AAER8ow +1N1sR+r7fyw1Ueq/XWst4LveD/Tt5fcezXYisQ1OHXrMCxupR7/HYL6LH/FM +NCmsggN0RqnLOP99kuZPr0r1olkzPSpnchnc5Jqe/Yfzv2Rvb/dm8n10tPtl +oA5bPLzIvSVFub/VUunIc5+l53DlP79W+p3eyJRXX/0MZb/o9UhmH5pOFNrX +EKi3swI6xLt1De+RYbZnTxIVZwtaeXlR9Vd8GSynJg7eiCZDwuFJz62ISvR5 +l5LBRksJ0IQ7HVbsJcMRUoMiss5Gje3ayR8r8iCoZCwtG/OIoChd3HJdHHLv +GjpwOvgN3OQv5aP6TYbdBQ5FAgapoPJmJCH8aBb6frtt19cVvE5nq8/KpkUA +98Kxq7lFsQg2PV/aY/6V2hkhW0IXBBeVhItS5YJQzlu1L6E4/mHJaYl9qs1Q +QnZ/XPyoEbk8Md7adCXDrw9esxS8js7UfFhRkg6+V1Y/sa+RoYVjlIt62Q1y +F49LfDSKRUYvr9rl4/iMri2l7hcdBEvj2zUPH7eiQZMXdON4vuZFbyd6igzA +34FWc6lnHehw3llDbczjLR/0u3bYEuHZ5Q379asJkNztxkaXRoJy9olGr5Rg +mMviSHO8k4rCWt0ePsP5f5Gupc7sORHQibhi3T31CKibLPsxTg4L9eaEVvei +J4stR62HiuBCM1F1EuNVv95sC/enXgSmfwx3s+aDAzHq7wzm94uHe0XctnuR +3c6RP+Ovc0AnW+jbC8wj+a9pDZI9b8CboFpea7toWH1f70Th0zeRJRyNEkOg +qdG2qJ5RDpoz7Q6vrLEfzEDJr+iGYKJIl1rZtBQs8+hPqzqTgIdt7/hljiHI +vU805Fcsg+KkDZsDeLz3uy+Pi58aAtLU35Ek+XJgYWC6YIB9XPnIe+YjmKcm +Hx+RU2rJw3n/m2gSjMeV9vxfUF0tVAkFhmXwV6H0s9EzbiVkmLn1b4/BsUQk +z9XIQlufCg5TM81bvyn39L2g3WNbjBIyry/VPcsBy8b7lxc+kuGQHC/5WF8p +Oi8pj+B5LlhNnXk4Mk2GZ6kTkQaHGlCEX27CBao8yD050u+MyPDtzs7pscYm +RO/vf+a2bA607OjqDCnCOiTXwn1qpAvxxrJ3KwS4gcssWYvFFOs6+YS6e3kV +8B8zpM2MYJ6tOZmQWI3z+eHS7rTuAdC3JlinhdWiC85fTG6XkeDYoG3/a/5B ++E39xVNstA6t6C1YnsHzLqpi3/mTaxDMVk6XtnEilM/8sOtFDAkSNYyPBooP +QD8xI5P+dBv6qLVHUT2IBGEsByvf3X8GbMe5T0m0JKC8PfJ/p3Gev+m8Wv4n +1Q/7KqFTx+A1UjwzZUX5XeOyUFKIvlwvott+ufXsWTyyl2Q+kymB16P5mVYq +rE/uh758/f73a/SG1oKxmY8MZbI6LI/VbeFclkuB741I9FbNgu4pzgcunlYR +kToiXOm5dd+brhbx/3UvmcPzuIegKZHMS4Da3KmEGxKliDRmdCD/IBm2XBT+ +o39QgsYHFTZrN3Kg8DoVle0HMngmMXmcMkHIbt6iquJcLogF/JDVriKDToeX +nmxuH3BsRRLSpurQeQbRwFszJGB4L3Z2SXAQ1Pf/Vss924hqDj8WKY3Dftb0 +y6Z2ggWcY4tsORMYgbgr/gYkU+67KX7rGnO0A76H56l8kUbI509pcuAVMkDi +jzqdY0OwYMus+LO2DLY3/hBvYB3yrUiGlbqtAQ64u2ptyzUgaTs6lScRZJC2 +64q6qNsPzGJFhR+s6lC6I/vnnnckKMyuvfhahoD09eNTFhzTwcc2WTYO61UB +xkdsN5N9wDyB0Xe46BXiC2zbkYrj//SWpdbINBFY3Hn4DFKq0c8CpY49OG70 +PBfEOjRKIM01W1voVBUKOMrs8biHDI2VcS+333dD4cSbeydsG1FH+MnLmRi3 +G3RfqmZQE6C4I8jU4Us9ijjdNrXxkwROneduGYsMgdRq5q5N6Qowu2nu743X +aYPHwz7WAnMQz/r8X3xEBHr49NA2Zb9iN3z9fCvRHMp9A67f+xqBxMQZT1H4 +iP1yw/SCsTls/1mMWcuOQJ1Fr39Q6jBPdG6taDqZg45TY9WFAdz+KYKPch7B +9XfW7KszQ/DfGpvg5qdyML6aMtJpRYLvH0XWFDBuqFOJV78TqoCDnEv7FXF7 +x4czlYu2VmD4JYdUmx6B/rRvP0jAzwlxzuW9FdkB8fEaX3snqtDTY3dE7+mS +4XvYxzIh1m44J2RzhNesEglMP07dK4/9QuiY3VZTJ4S6Xa17qFCFOE0lfovf +wn7t/G+L06eaYP6vidzUagN6q0Bt6O+HfbHeCS/GMCJsuMy+/SeTDjXfTR4T +40kg37f1gyOBCI9WW//Jy2XAlbxvIb/xuqv4krOuINUPKzNCGam1Baiv5vSa +8x+sb2ul5ENrB+BgWsAXpZFY9J5heefnWRJckf3Z6c5DBCcuGdOkAoSKBRsP +7cJ5Ndn3VNuvfRA6ApCUw5Vm1MFc5teN2wdPR7VpaBEhKVeX8LKqAfHI7/9+ +/yEJZrae8ync1UA+Efbi/yxi4bRywZEJzC+7E5zm6n5+bFzauekCF2IgZGrz +5AHKuUufJFUNLyKo07faxomnwB+UtL36mgRH5o4pE74S4f2KiPioQDW635ax +XH6fBDVb1OUP8XrnYtCTPfAlDc5f3jlMyVsnntqKO8XqEFYnFX6GMxr+ytK9 +uYifD0yl9b+NCWh86cPQmGwyGr9uvKaA/5/o9tHEbh8B1X8aqWhQf42M57+f +LxYgA3eyZge6QUAetYUSe08noZnOSgVK3QavYCGem9VF4DC6+3zUrxJETpjS +3D1FhvKZ+3+vn+4BJmeWqJLZBiQVmteeuZcM9p6xTpFdcRAp/6CiqToFhdJy +J8huYH1upUHqSU+GwDg9DvNrGWjscd+LHZiXDw/b2HbqEZDCb622e85JqF+3 +foCI+7nwmofmyytd8HKoSg6qioLm4OWuW3hcaaIjiTYzz+HuZea0o1NeqHu7 +gFcK6xm7M6PlJC0Cmo0Gn5MmSUjO9VnnAdz/z3snvaomteB6Bg/TrtkoEBbT +bb9G2febyBK7+zsRrOstlo79qkKyZvYpHvf/tx85LBXzt1unAy2I6Ip9CmmH +wQKjesp+aZuYJ5y7aDC/uI5SnRFsA/k2hhuuuzA+N7B941x9i97s8fiQwdcM +nVbiIR+3cB6uPxwZTO9BT4Kjfv/9Vg5iztwiObifcHfxrUpwD2IUrzsBwU1Q +ZHB99PUGCS6mvrZUPTmITGPuvKqfLIcFzZo4mioS0H6qjjNwew370xeDhk7E +QkLcxEFvrDcap5X0H/8rB5NP/xlv7mmDx0UN7v88yFCXyKCbJkVA3omXGzf5 +cuGKqjzvINaNBkwCdD1iPkgodNh01T4MRs6JSETj+JgxP98VsHoOKTp+Vp58 +Gw5sF5MkKN//NY7ZebHLv0BrlnOC/bvT4GzygIsmfm/hmxoJVtUByLgkY/Ca +KgbR/Phx7S6ZBF/mZA8szBaiK4fvroeruIKBuIAP6TsZHlcWn6gNrEYc3wTF +qko8gJGJrpoe+x2eskArRfFmpHlB4eGFCBd4uOdBRlIFGQbofXRuz7ahmfBp +zqg5Y+DjT2ZRxjgfQ5XipH6rA7FuXd8ZKmCO+CeetEY+wzzCxaKb79eC5HY3 +On1RiUKFtDsJAtlkYHkn5d9L9Id1bHa+xlugpPQ1cyvK/S9LP/xaJ5IgpdHI +JiTBGdHZRf/gx/ivr0YTzs9YBldGln0OHAhDymKs/YoLOM699f41TB2gsXNW +5VVhIrIlnntwGL+3sMWo2YhnAPZ4t4dJ88QgEUnq4KE1EnRXXlXKWx8EJhH9 +0DiHaPTt/JHw5+UkUPe6Ly9zvA+1PNgu0rePRj4sXw/rsZLB94+TmvDUEAyX +1q8c78lHVFld6Wv6JDgoXbUiHkqECvubw+pQi8oF19rfY53WYCApxYxMwTYz +ROGddgRKHUpzp5yjSc6ydFhbIICTyeeURetuFH77a56aIwm0+C/Mx/4YhLf/ +WHMuVDeiyXc7fze6kuDq2N3hh+fKoV18xbJhXzWs3pMv/tdMBnc9xSs2RCL8 +puGUultaDf0cbv71WMdWXuHLtXztjR5yqy2PXw6BhodDVgRK/f+jLCE/tdrR +7qsNSbNcQcATJM4VGEyGZb5IjdbVJsQe8o/ug0MQZLx9rMOG9cPygUzhW5ZV +6GTEgdKLnf5w7ZMm+9H3ZHggSN3RaZKPdIhN5XsLvOB22Oo6D/a/RwUmmGL3 +JqN5eToJ/WOOwPDHguoIpb6NsFPebv1gNMfxK3mM6wEUSPP4ilDOkYWJkr/w +9IMMMx07fUkMhE9Mr1C+/4sKmQx93RoA9THFsWyvJ6ByfGl1bRzzYO0O1V6u +fnjJ2S6UGu6G0tu6S5n2kOGCklP+la42yH/GL2eeGI/2MiskloeRIUeVCXw4 +S0FRMI7GNDQYFS6KJ+djHxTqGVe63yIV7FdWlLwz7VGh10V20U0yLOq8q3js +GA36q8M1i/c00S/FPRriOG4x4Rr3GL5mQN4PbUM/qizUU++tI4nXywnr33nt +LX3I7JBvpJRbJGrVTn9rto8M4mcuXCVGE6EXGd4lfK1BdYYP6rZwPigJCDT4 +UPWh3anNW1XvKpDE9/43axh/Dn9TkHRdHQRSXMn+Da9GtNep8bjGExKYhjkS +JOfjYN0/5Md5FnUoHzL+EYH5i7vi8+s9VNhP9p39kXE4DoKZDWyv4f7Le/JX +qmYbIv6XG57Ohp5Q/a/1aCOOs7DF8TrWB15AGhfzTTqZAMY7g7/vw885a8he +RNM/CvTuz9IKbYqhx24saSJ1GTJpnjWuX7NHSWYC4+/HQtBT5o+jf3Ac1BgT +bvFupoApQad/Wvsa2p1inu6O36sxFjq2Jt2LSu4y21+IbYRFUeqblzC/T35X +0+/k7UEzX8cGI2OaIbLM9tPlX3i8iq9O5RLNQDX/+UXJkw6Qb0Zmp9wvZtd1 +8c7VlD6UtUS60vi2HgSp+F18pkgwdXMu7q4iEQ70iz/YE9gICk37uHdhfg/p +ajOyZB+C9zdM3N4zlUN3WY3BMewTv3zzf6TCMARy1H+0wosqIDz9rPciXhc+ +alyeURHW6AD/u79LdzxArifLow6/9/e83n9UtNnQdojz84KoD+I1C/uR9IsM +ZFX/yiTlQZAbKv1zoiAKMalR9ycQSKBhdYWDi8oUxvIb1J6SfZGs27ZIMGWf +A4M8mS0e83uY9UHegATkq32dS5CHsi9FbOadsgVIaaVFP6yIQGGN866Uc4sp +gzsPT7LdR6RfO8VCkqNRsILkAuX7T96xAyPTLcrgfrDO6oZcOOpzfaFN2Tcy +4JJz4T/bIfAd+vfJ5G8lGmROjKbc32EX85q1gouAav3unhDckYlcP+6Ie4L5 +er7I0rD/AAG5GzNcJzJkIPaRQ5XDmNesh9mzhbcHYJzvfFfxRBsKi5rNMrQk +wS4ny+VjdH3o5M79le3PyhHHk/7t6zvIwEFjW2ipQoS2fkJOyd56dPvbQn+I +Ewm+Lk5VCOkRAb7UiCaE1CGad7Sr65T6/G+PGrtnpAIWaOcewkUIDC7sOorz +xC5MteBp9yCsqC/7ZO9tQszHNwLXMb5J/vsadpK5F/F5FUweZ2yE253+nT7b +JLj0kfmXcGwK0K2mGdxfCIHXpTfaWzGvmRPlPVqketFOo/tM6oPF0Mj31cSA +nwzpjP88RPbZouUCau24Xd7QcqTUMRvPy62DC6w/DtiBsXCQkPHraOAw+5pA +qb8qveLeeVQxANG/M3Tb+ycW4mVXNSn192S+X9SVTBkGO8N++hOL1UD9N5Z1 +5CgJtOtV3oq0ZqEAOdd6mg8OoCZw4xMT9ssTZAGfo5VlqP4Ac4MOlTvcywnS +ouxrWsiJMK6JbkD5e/t/PbjoDoLSh99/7sLx5zNU+3O5FTHW9Xv6xT4C3S2h +fQlpZHA4uFJfTG5HLmlEQ82THLCtP5lMeE4GIweeFLKbP7oe8i2mLdUW3pRt +uZlT7vO6qB8rndCOooJjdSPBE/kY3iJCIPatyzWbpYFOwLiqe577iwlyM7rJ +SDm3e7qqas/3zkgIbD6nff+lLVpl/shlheNA+yc9mP1II1if4j5b6ByHbt4u +JNS04ffSUZkZnO0Fg0qDHtb5eFRyu0G4CPvci+MNJVZGRNhD3v+v7F8s2psa +VB3whgReydx0Mp6miLX0qNHeG7GI8dU7G4reHk4NzortN0S/AgvPUlkFIoP8 +BokblLrHeQvfUkYT4IO818fqeVl4YNktdgr/f0ZjroOiTyo0Ct1oezn8DIQb +mASnKPvYn5beYTLpRYVuXAuSak3gtK950AjrmX5lnxjOlkHwq5WpGFZpAd+B +Tu5ScxLGuxl5wr488Cdya5az5qCj+5kmSjD+p1OnH3yvSUB+X10LOjlz0UFT +0d4P7GRQVXwumDsqixyeV029WwlF65n2qTtwP7v+PfWvShiCYjHJmlDf18j+ +pk5xCsZz5yO654SyetF/s5+NIxRz4PxpK8vpY5hnbY99+6FAQKHWm+767mlQ +9KHbyAmvx8WthLQJOQLyWt2zsamfBhWPilIoenhcfnDUJosIXOtnwpRzaqHl +oKNaDcarSZU8Qm1mMBR68JMPfamCLHk+W8tJMkxKcKRb9KfCXouaLudtJyST +W9ZAOc8b/m2u0mc6D/L1ZuvKeH2Q9foh8MS8vO697VETPwBLrjlWp65For9h +r5l4PpPguqaJcGfYINiyNCi1BUQiY5V/N6Za8bq+/Txl8bwlfDuqSOfyJxk5 +1ouv/Mbr90eS0m0J7O+E6VeFoT4VqBYsN09g3+eX/YTeTpeA2kuozjwyzkbH +D7lOH8Q6tgzdmQgpIcJBHXSn5XoNur0qteMdxucgGVWF1EUiMJ1W090lU40M +9Sa/5mOd/7xwVICqgIDYJjfGckyL0OPfjdyrTJjXKjzC9FyIIL9zh4tGdS1a +k751u8SBBO7cMJk914NecvY9VGVEYMRSFHLzL9bhXVFiJ06mgp5r05O0HX7w +NVQu9yeOzw9BkmrOEQI6+4vue3hZNgzTPM9Xwvhs7TC259t6DjLOpg25MvAI +nBJDBA2xD1r4OMny7m0xuiqup8ex1xEumywWA4kMssZyEWtXK5BcHZv8wXPO +MErb0uQ1T4ZT67Y5Fy7UIq4Bs8gnOs7Qfs/VpGKYDCUVNLoblxHaYTzhKNfv +ALuVvtiFt2B+aWKXZl5pRle+ze+Mm7YF6qfnJ3YVkWHH4Ijr1dlWdP+5k1+O +jgmwmBtuvkrEOpaUnltwqx1Jzt0/xLX3CrBomdzPfonX9fqM22fhDlTt8OjB +bm11JCps5H7RF+u3xwqJA9CB8sQvVktL26ETDiMGsj5kaGXWvBPo5QGCHYdr +oroN0bDkw8eUOuQGV3emTEQEQynt2c+Lv0zRb52zVCdwe0qyeZ/legz4np76 ++MTLBrEVvi6hnNMJ1BYkFZ6pBCaut+cumoYi66WF80KzZGgKr3nNcKcZep3K +i/smo9Ev/RWq9lKMw0b0jL76XZBVuTmddCYWPSiv4mC2JMNbzfiXN8cIEKqs ++Cb8YxTqXae9S6lbcvoui2r7USK4sxAvK9tFo7vHmS48LcT8IiT72eZoNaJ9 +1l87QOhExtue3evXyTBNxWaV338J0QX+fHK07hVqZgryptyXdDomt0PoqBEc +ibuPYn6Fo/NrcpXVlO9vqSznbuUXgtvwNIn2ZBgSUKbavoR1XTwbO9UDUj5c +80jx2u0fiHZY99JQ6v69/6m9SdfYixrP323bsa8Bnaox0ndZJ4F9sxC3KQ0R +NBipvbX3N6L9TwvGEjCvGe9Umatu7kU5p5SyB+SzoOZ8pdsCxgdN53/6DTuG +YMrvVfaJl5VQUPazUAKv97meehHNfBe0dLqe6C/oC5days0ccPxfHziVf0S/ +E7X8vNtokuoLZppV5j8dMc7TodmArQ5U7JP9OnAiEKxz75tzPCHDfSPhyHvs +YUgoeu9NVjpbIBRtpy7/v9+vF/bF/mtDKVd/GZ7y9EHqutZe6VgnCw7srHHD +PlHAR86FJaYT6B8aph00JMEThcesl5pj4PfI3Eigigmasjij/hPPu/K4JV+J +KxH2qs9b0HyJQ2fv282Wp5DAgDv0P/p8Q6w3c8ZMFg2RfoeAGOU8Y9TAQuha +nTbMX9F21hO3Q/PiVrso+/bjzdNoMrgsYI9R0tuAogj07CibM+X7lYHr8mLO +Wi/KP/zx1ImYBsT1rGiP9CoJ/JtVdWrCCOioQX/D7/0VEFw193OZlgznJYYP +NZQuIeL0gK6cSRs8ZP517qT1BAR3cqk8OEmEjS8PCMEf6lEt74nuBWcS6ITY +riQGJgEN38HLLfTSKKZ4bI5yH9/BBTLDcHMPetqXrLGPrxyElDL/UO6BjeZx +cXp8zh5+LaHJOH070K3g4qXsH37rE7VjBuP5xReqLSbPqkCIWs1ziZoM9PKR +h7559KKHK1q6l13zgTeofMwKz/tNAtf6R0M5MKBds7u43xl22J6InsbP4YM9 +Sc7aimjx2Jhkdm0YjN4+mv8Fx2F6NUzYML0PCu4+Z5GYbkM/rx/RI+M4K19P +XcyvG4ajl9+KBMYXQ3aWjfqOMyRo4mWZTB0wgtg65RCttQD0SZsp8g5+vng5 +n5S2oTZ8Cros0X8nDLGvk6lW8fPn+DY3MhcN4VkS/0CCbCgq+q1dTkepJ6N3 +OrSZLwWef9inL39WGmW/kclaxvh/hsbD+VCkE+zMDPdRj7GB5RU3F0qdmaed +0iqBpb1In6i4yjxSCw7bFs58O8mwBip78s71IvHEoPCc50Xww2ks9oIA5sGz +/0kMXTSEY7m6+l9FHCFYWWSaov9b7myVLUpowwWtTP2Cg06g8DVoH6WdeneD +U4AYAXny0v58wZUBl/4cMf17BOtAGT5NkYNY3/7XfnblfTrwUIs4++P5mpXp +2aY6hvMThPYk5zfBlvoBgf0WJBh+ejcyZlQVAjhT6x0ORoKgZuUw5TtthcDk +5WLuIXAORY1dDCXQvKb1cgjr23rVRWLF21Z4uF/PN/JEDiywBSg8jsT+dIFV +PiejA4r2Mi/dwfrw3d6MuouaWN/uDV9wDeuEj/l9JdCaAz90N6ltrMgw0kVD +fs/kgchbw1nsu4xhWIDahnKPQ9nz2+4KPk1ISVFBZUkyHkU1lHXtqcG6tO7p +6sCyHQpXuhJhOmgNB86XjVPqY3usRo1+fpyJNjyZGab0i1HsQ7l3WpRzx0cb +bagH0pHh1etTjz8/gDXljxIDG2S4DJ6fL/IYgq+jdoPDB29UzLa8nkepdxpq +lf3lviZUn1J6fdjWDSmcvjXYh9sJbKda3Q4TEAmtFsY8y0R/EowC9LBuSSxh +OWt0Kx3yUmpehR21Rgm6mVeOYj71WW6r02wioC9/hpNTh4rRM+nGGzaMOM/d +LU4c0CeC6YXTE47mdejcyliLOY7nLaOJDYmBQbAYLyOR3BASt9hX5+dGAqtz +x17lZQ3CfIs7vVhsE8qtfJAljf1vO+2FiKTyDFhzal/XYw2HoFdwzgPr7cbX +1S62fkQoqI5q3SOPgJy1LPzAiATMUUJ/C2mj4Y7jU+YUyzsoVUW5VAHP7ye3 +uWemv/pQa7nf98Na1ci7cIPRAeuf570lTv8tW4OOoZDud+bHMC96Up5S94Ou +tDmo//wA6lJlP/aopxr+W73ksqOXBPL7z+/LN/VDNkEXuAZ2RoJ9vtolfsrv +nmJvzNjkXZFYbfXK+13ZsP/9ybxB7B8/nfp4KexSC1iV0ry6PpiE7on9FHTO +JoObKK18gVc3nPLw2BHu0Ya4VMd3z2EdK0iunhNPaEPFKlVVomxhwO+twiES +hXXpJm8gY107OlhXPe++HIh1+dSk3gsy3BBl6Uj4g5BIJTE+mzMMun7fiOpv +JIOLJo1+XXgzSv68f/+J+CCY4NLUrSwhwwX/nhz0ogI5JDH4d/AHQdDTVLsL +H8jgp6csY9Nejd5mXTlXdysA4jkLT5HGyEAaaeVISs1BjrQpBbcSngFTMfW0 +CdZFlYIfDUwCC5GntMHEZNEzOBwre4v5Bxl4/1s+v9v+FRLdyksqd3UG1b5j +Pyj1DRTOLTsY/0xBgl9ee1zecgbOnUvT+hhPjkZ40xifHIAdzjN7lvbGwCCt +CNMHjPPL6z6X5RcJEJ6XZeglnwrtDO6BFmxk+Ms7pi79YwD8f3lvlU88gQzv +J55hkyQwc2lktWccBCmBHVdtcT8buZKWvUdJQJfrXf7lOwHYhdJ59g36IpkR +q5rrWFdMf5PxurveDwl/3ESSDAyRgsuDTa0tEihykiZ16jqA9Z5nBVdgDIp+ +SwptdSPDgx8b0X1nisBPWebkhslL9NXyQtESGeufu480n5qVg+/J02tCxRHI +IHFnd8xHMsSMfd5MMU+GhfHdGxHHHdDs6L9bDDgO4+oFhZ3f0+BHWKuIPd8T +FPofufcspY59v+hxlr/VoOOjP8yxswv9+T3OMHyFDKt7aX4LIALa9ecJ65PG +OMS68niHPBcZ8mkNZbyTh2AwQOuLamAZIldfk7mjRwLCqF7PnsVBkH/DdNJA +pBnJXt8zG4F19QHXWNtBWiKYbYz0HWZsQXoFFm85DUig2far5aQo1le1hPdh +rs1IbaTo5tt7JKgJvyzzSIsIyYUc1982N6HJU8yPEnH7Wf87VWVuieB/befK +h1NqwAB2nJR7iP4B+QjHBQKyyXfp9trOhz5Fbsvxw2SoF9MszZGYQnXNdOUv +OzvQwwveef2CS8B7biS74hIRRPNCFwQS6hH9wY+uPxxJwFOhSYgSIYIOvRuB +s6Ee7fx5bTc91lGdx3ecUpMkIN9LTRpFrKVw220qe4iZDDQubcWhTC9ACTbn +thVfAX39rLg/7s9GU++Jpj01SFRp4gfrm1og+jUq0+STwWnKiCuaxguNDl8V +6vT1h63KrDBJvN5lnH71+MR4IlNq6mLn0CCQdbKppdQvdR/RFxfdNQSTm39L +jVlyQT8pOzviGY6PMKd1vegQWAuvfhw/nwJypj9A34cEiz/4hUNfDYCGRjIj +3y01GI+OSjP4QgLX0A+XVZSz4YHtEYX2Wi9ETfs01Avjg0TDbeFVuzT0Onjh +eEmBHbyNkxx/jfOBdWRb60fFELyP/RztQExDTToSFn/xPHIIudIo/SHCcz43 +Xj2fOvSYvfzPe308v6W54b4VvRBW0ixUd74IuFd6F5KxrxH/8OCXtl8WOOkE +8/al26Cnos5CKhg//1fdgGeaouiwfAAyqJ4vNnrxGvY/VuNex+v0dvxarirr +AGh/PubkuisVbd3fMj3+kwTfnjFa5au1optZxD+dz4PA12yIoJ6K+VF44iRv +cT16ouY/V6cYCKevrJZU95CBsTuoPdqtFPlsMJ44oOsLv7ZsJKSxH+/LpO86 +qJSBOLhohI3Sn8DWyxuzaJ0MHf9t7b7cHo1uuy28Pf/XDrStWVYo9S0TR2zI +n1oHQNUwfNdXwRcwcPinn+Yc1quSO9SoD/QAC53fhS/cEci99eL8I0Ws31r+ +dGTtrocDd6i/nuOJQRVvBfT6e8kwWub1ZF96Aii+C5UTXrBAoW/974tTzoFq +qTXMGg0CW+sZ3rtZrahjlxMVC9YPZT/cdTliBoBN/W76Je0ORORekWo2I0FI +0+k69cF+0FrxkrhN34XOS/IuqlliPa/n29PtFwEtnUUL7VkJ4BjcyvcBx3Pt +0K3z7zcG4GfKo1lL0XbUv5M6/jF+jve+X7Ip5wbB2+pG/pF7bYjsdubGe1MS +sCV59LulDkIFb0yoPG8ruixL/CFrQoKO+65Lq5WDqL6R/2Z+UCmYMrnfDMgh +wabDsEAMJxE5r71Uz3YvhoYGkSqjZBKc/nS16d7gIBKvnGK3DwtGNxv2dyrX +kUDAvEzz3dEcGBIymSitTYE8y6SxRoznPdtfF94VZoPZh3urn98kwAt4Ule6 +ivOh0ECuij8b7h09kb2fLQYuVSZq/PlJhpoDPjunFvPg+jv1AqmkTABOgfy+ +b2QwkdyUdknpQrXhtvos6q3AY/tA6wwdGX6thL/9VkEEmk/m5isp9WDYV8Wu +hcf7Mp2V3C+bATvqgkTM7R3Qsc8W8hM4H04c8Tp9tasHnb2p9OTT2TJYXevR +3Il1tQDbiaE9Xr2okAbFaUjgdWrCyqolSIYqrQlCnQ0BjR/umad+XAY3lIvS +ZRnIgHgU2F6wDUPLN9+bERmFkKE3Li15hwRF9IuDJVLDYB88r1cdWgCMFRKZ +ijdJcOb8fwM6k73IIfTn9o+uDBj4Mp/vjt87rx6ybjPQi94Ln5HYYZcJhAHC +YjZuf7pdMaxp5gHpxCYN8v14uC36Y5ZSt8FpZMk/jIMIa+6E1wmOzaA6ue+r +FdYtEhX6kb3aQxC0weVzg7EMIgbufqrH+XOee+uH5qQdmjnI6Lek4ASu2dUX +KHVjmvxpD6jffQc7Gq1JcdG54F/+4H47DwneMem3tBuYwpHxzd85ERGIqZHr +RQqlTqYGC01DFhFuscUFa++tQ3ELBTRqD0gwMV92u02aCEpdcUNGFQh9ljqw +pIhxho5a8oK/ABF2p34irEs2IWCqKxi1JsFu52QDc7+H6Hh73d3R+iB0qn0f +qzjuzxnPsrunWA2RqLyX3t/bQSiO1dRcHrf7/9x81NU9CLuzVz2IB5tQyfap +jGyM5+YT1+q/vh+E5emz/EkVzZAzuqosg8f7uPTFASYLIsh3/islWdchbXmx +yGEHEgQxW5Z9GhsEIaOm808JzSj6cdwaC/7/JLFwS6fAXIj0cpeecvZCev8e +BVbjPFQ6e7SzIN0Y/Tt47ZlucAA64DVhTDnPeOWVY8j3c0R4hdjDKusQRC9v +cJvhcbEbaTEn7BuC3otqMg+u2aHLIyGad4Ox/u8YPJfGTUDn85k0m0cyUJ06 +71wA1sPbPwvKdvkSQUGGu0o/H6GmHgWvz5hPZaiSp3zbB+HAdG3Fu/lmFKCi +ac2On1+YZHNq5jUR7o3cLU6JTAf65KIUz1gSOMZRubcmYj/b2dK+YFCDXnr7 +6ymvk+Cknn8hp0sKPPKL8KhuDQW7qJ8mHZgXuF0t7qa9Sobkoz4aDscjwNrV +xrAPt9sr3st/N28J9iWitjYPouGVVZ7Kcco+2D3i9AnvieDxZH4jt6wOBC33 +JGfgfNNwmn0REqAL4Y2fF+5ZhqOBLOIW5ffB4WRlvmulbyDilqBCFtcDZGRS +FS6PfcT8ni2bf0KxcI5lsSDFLR4mk6M/UvSb8shpEUHzXtRFPTJbYFoIPCKe +etQ4/9cqjv4YeBwGd3tr5BRcX4GHrbYpZX8v7xzhofpGNHzljvF9+CUePLZP +91N+Pxq/KXbA7g4BXVK2un7TqQh+LxmPXjyE13VW5rRRUylqP+E5ZXmjGfwu +B+5NSCJDaHABpyN1PezScYq2l8lAj8Ydjtd0kkGxxiqxz70KxtQl3dOfpCJ2 +gacib7COHeczNu9VTYJ+PobexlImKBBQ8LPEOuGdlZJG6F8HeO4UTzfEYAtK +O6fMKPfeMrC5K8Vu3EEr4ys6eStPoeYbowylrmAAcu0/eoKAzJjXv7s75UJg +l/9edqzHIoDul604EaLnqvyPptSjV6/36VPuVzIJ8S0ucXaCV9/cWl7sKgQ1 +R3PhToyrMhwbVMGjBPQgrmCIu6oEve8Zb9m3hwypBxdkkusT4JLcwK3JwWsQ +QtVy7wzGjTa2RN1XjW9Q/XTKHumqx6C8JkIvhucldU4uO1PeHGZZMzJ7eEyQ +QkBm0Arup2OEsCMtXx6Kk72ZvcnqDM4365Z08LoI3nftKcPBSqT1o1Rd5LgH +XLDg/3B5jgylkhUacbRN6O5qdR+XohsE7gv0MkFk6H9T8MyZtw19VzPJN5G9 +DynpRUu/47FPHLPqkDnbgbJ9O8qvn1BDyZ8O7onywX7nEVeYjk8bOjRQl5T6 +6wWSevIzwSsa54nyoUvb17xhVco9Q1DHDM3ovDlWiPvpJJKt79sRByet8w0J +++3RzyuL93zweMc9tlaiThVCMlUG167ZF8iJZQfXMRw3B/Y6hiTvFgjcv534 +6eUrxKve8m45E8+jxYidnUcf0NT5OzW1xqK1mKq1qQNkMLizP4xS76V2VNdK +910UYv4X6piASHAutI02C/vHSSql8fub8ciEuPtgQRIJtLrNXFqsCGjgt+C1 +3ScqIGq/kQ4Z85SR57qV4loD+iU2+NCqLQWNVY4yKreSgdlOW2RQKh1o4lT1 +XSfd0ZAU0zYVXo+hBk8DQ7sH4GzYEQsHtmhk+PdUjN4MCSor2m8Or0aAqUyc +ZJlYFfDdlttYmCLD8/L8rDb3EtT3ZKpR/oYbXDmu5Ji/RIbCjo6rXkx1aKg4 +MWDD1AMWYezC+0Gcb4KhziVKLYg/gj9S94ojcMzXbX3NI8PLG2vVbG7tKEvb +UUdKQx1M+2iPDQSR4dyDg3p8fB2IxzL3xLSqPTJbi3zq5It1ckWNWh9vKPA8 +yay+8MkafbJdVqXC86K+9bnnGWM1CM4qapGvRKHxN/SzxybI4BUARzxMuuEr +Z/sXhfFXqOnGddVjOhgPYwN/GUoQgSq1g6nteQxS3jX3rzCPBP3dN/teMfSi +2x46XRcVSuHmv2ujT/mw3xxrGPe9RUAmUXrpzI8aobnzP71XX0kwdkUoDbWM +oAKPQJ/5XcWQOJ3ABaPL4H9j/97Y/RYQRLsmyMAWBe735D+YYLxKKhk5Zr7Q +AabTn2LPzvUjudZRDmnsIzSJr8iGTwbQsfr9jnU3q+APy2/jhC4SpCf7p3Jl +96G3nfA17k4del4V8vwe1o0DTdbCU3O9aMLBcL9mSgboXd3heRbjWO6F4zzt +GP8v0/CUSq2lo/+cdQ728JJh7333EVWrtyjRkRNOc7ZAkZLnsssmCe47qj8t +ZU8F0a9Totau/mAo9jFhHueDyARozfL3oikvoUPSjiVQuLonaAPHId7G9IWN +6GN4LBsSfSMvBo4fEzCn1FWIsFIplSwoQSu5jbJTi7no6vdxdTa8TmMfS736 +do0IVw9mxtB+akQJK9IGnzFfDwcPcvzhJyDnZ7FRS96Z6HEnz5/iIxivrmqe +qmAmoB2P7rR7natHCbcq+0N+kYDz4mldTS9n1NBa8eLmTATa/jKm5Irj6f9W +9OIzCUl0eoZPhXEsFAlcitWn5MPnrg4egeJe9HzzTujiYexjorieKAmQwTZA +8EprZS9S+7w9ueNZFrQw/96vg9u5SJIVdhWDECU8IR35ogWu5PkdumpOgvjz +02/+HicgzTmO9GctqcgomumDNo4Dd1UYH+89Arr35uIycOehsRnqnizsHwkm +aapV9wmofCbpzBuhfPSfjkrCMisZWoccArJ39KKFIP4Tlesl4HT2eu0YPxmO +jV6QmJV/AhYr+jJgm45Ytx8/X8Y4yejYeeG1nBFs5KoRhOIigeGSuTHl/BTv +5PNem6oeVGU8Qm9tVw7d3C1RE3h+uxVH02Sru+CcX4u1GuMgOvRn52yzNNbJ +RhFGS/tc4Fpy64dwNxuQc+S4QPlu5qwVW/pA7CnkP7fU8lWLA5P6FhfKPv/r +x1uMQ2+5ApHQmXjKPw7eqRmeo7SfDOif2hpuRj0qnD+TCwdA07s4hD6CBDZa +vh4u3bWg4VLI1urXD/0yrVrK70hQzs27O0qeiFrajB7VXHVGNz5obHjh9VUh +VltfPk1Eu59qfxBfew5F9ofblCOxXxB/1P9cZABSy+hGciU6UdhfDzI11iEx +M0oWPOQhxDjvO2InlwsFidyJotg/SjHcWN027oXjm3KKTQU96Or1ASEuG+xn +j7SqKUMXSHpHdnrN9KGM+MpDMnh9XdzvZKXJ3IlyVL/xPlxqg1qB5rAOeswv +v8qr/tzvQnJns6XJya0Q/HFMm7gL621qJblfOl2oxTDuQ9HrVnh2+Bo7wrh6 +WvGIhdvZbnQoep7Zg6MVlAOH1it2kgFmtvJ5CN1I/OPH5OMlLfD5pdNvkW0S +/PIo5hl3JsLBOnnNAvF6eF/4mMHBlgS85x9Vnmy8Aw1eAYcHbcIR6yrfCOV+ +t5sEnRapPUSweWQuzDPfgFo//zN+gPWnfHFWZhMNEev1q5Wq+xoRiWnPuXDc +brP2TJD/Uh3oncy+dP9HD6rUqFIrwrx8/Pvv7/S9RAhQf/6KUSAGtk61cpVF +kcBBiUP8ti8BcfuUfo3vTEQaOrdvzmPffblKPOJj2AD6+pz9Ren5YnTtwnhw +zSgJtqL1G+guDSJ5SVGnJ6MZSKuM40kvxqXsHzJ/1h8MgQXDEZKgZwyK9vqY +aY/9+LTs/gXmxG6UYHiCj/5SC5yWdj8yToN9K8/Bk/la4fDrJf/t07oZKE/O +I68E+/pdB64wLa33IwX+Qfum2xVILMbqyMo0Cf6N0sVeTyoAye6bodw0IUhO +OPiROebTRtej1zcticj14DnyY/1m+PWPXJGuQYJHnYzi/6nGQdzk+UxXvSy0 +p/7QjOAaGSQTs84KGxDhjXhTdL9JA1yXZh3PeUiC1Jujr28xEkFjKvGtcUUD +Kva+8TEHx5NOZXbaplodrfuSv9U5vYDetuJSSr2gs61Wz/ZGf0RTz16sBLou +II8NlSjNjDR0hTymIMJIBpdb6XJJmrUoNaF3PvhvD0R9fDGtd4yAok7+K/5K +nYa+tI69jsW4YXYh5OSEeicktHh+pS7vR9V3LeZo7Ekgxv/uylMpAtpOZSn7 +lJ8J4+7iokF4Xn6cOXcnWpSADtRfuZH8OAOmDAh+2xgnOXK/t9cz9YI6HSrm +zexBR+JWnW4/xuvlsqpZxyQRpa9+yc1ySEHrph+jJ0JJUNLW9NX3SxlM360U +arycjC7/ftV+b54Mk9xLusvcNqBgU5AakxQNc74TyjyUe58TaBrOtNXAyYeg +xl3WgELs1Up7sY59RrtxO78d68g+66S5jCx0zsZ7hh7zvpjAu4rrLuZQIrvz +hWZ/BGp0P6VA2R++S3K5m/bkEIxyxgcJfSqHcs7EQ8MUX7ZXw3U7rQckK96M +pR+qQj70f5WjOMng5j5GUkkbAKp14DJfDEfhrgEDop9IsG2nbJM5aAy3Uh6M +2bVEQvS80V97yv3gTS/GOy8SENcr49D7r9Kg9QkHezr2Ow+9C8Qi0nvQQxKn +1q2P5SAqfkO9GeNkjJYRzW1uIjxuusNQdqkBBZRd257BulcvhL7Z+/sQLCkc +Wl5JLoKRr4U1fZokEOJa4W3i7kLb/Eos07OtUChlHEK9G+Owb+c7u8/3YMY8 +3YblVDjqtJX+NYz7U3SqcyU6uRtaps88tN7qQ5yX8o7dxf7lYv7glasmPRAG +aEi7theN1An6S2A/S9q9vZp8qBfez7DXc//sQZxNVLN+GMfm9Tbt0jSGoGRf +FB+DfClsWZb1nsa8OSoqwfTV2weYPrTKrZcWAT3/YfdFMvaPW9IM4uVE2Dru +3zLUmgw7pQb1zsWQ4BWXgNDsaQL6bRqpftw7FXmtc6Sx8v3v+uT/v3+MszNX +uMnmIKfinJebEYGCDUTpEyn3VDJF7Huy7gDlXVd+BF6xA6eJ22tDlPqxJt6H +Iw6ZwomuXS8dsd+3a6FqpPj9XfzXtSsfPweaq3Bi60cJJJ9tHtP5RoY+DT3d +t0fHIT34x/qSeReKSWL/dvPtEgifFWvO+U2EfUW6PS2BVYggst7zGsdn/9Gu +kcET79D65etimVul6EN/ztwLdhIELPnZe5whIDdtLp1f3mnAdi921BrnQwij +xaGYVCK6LuWiIPOsGynskX6p+GMZdP151jRuloLxibXT1EoNaPdNvV38FWS4 +VLN/WU6ZgOz4aB//OZeDxFeV6axw3r5wvxiamduDZDduihK/N0Hq+9O1z3+S +AOmY5U9330JndiS+/PBfMrIvKKmRwT7O+fNvEp/lbTRlFu1Pxvim9TI1gwvH +503H2TRfiV6keXYoRexfMTSfONUhgnUCb/XeFNpH/Wj+acZVgYxaGMga2sGB +8Vn9Y2cNd7c9GKqdcWdqioFwFDc/h/n6Y1YIO0/KEOxV2vRgfV4Cq7aTDfw4 +DwdLQvSVhrsRT9Oh1iraAZR5XZtuRYUEhq++1j444IAG6RaWz9yNQ7esBzNj +KN8V3URu79Mlgi8X4RD9dgP66q7hRMJ5WyZddZ5roBfR0uxLsTLLBOpgP4kK +rD+rVZZ7FHc8QlcdijKpjvqAdNguhwg8ru9a5+fk5iJQi5G6VCaPOWSaec1E +4nlXOvL0leHkCHgeF6aT9G2CFwb2VkYJy3Cy8VqiS1wcyJgWfhG010fddsVR +ybg/TLpWSX9TiTD07mjnP7dYNCfhHT+XQIKP4Ul5d4fNoFr/1HlT9Qj0f619 +eThVXxt2MjYYQoNShpSpKJqIniSlJFGZUqYyJFNkTsg8ZB4zz3PmY17mMnOo +kDQgCudQJAnfts/Xdb3ve/1+31/fv/e1rmWtZz3rfu77sc/egXmt/uvPLRPs +jGUNEjqR6fmcEz8U8tFWfaOIQVYyyMecsaqu6UQgOtFMf6gafbhooJg8TQIb +2Ypjp4w70B2fyXihplr0pZajDmH6U2fSlD1/oB19+6A4wp9fDBAc4jyP5U/e +5g0xKz4dyJ49toRqNhtuyhAfHsD0JJMQH6MPsx5acHOsOfr7CWzJFl6txOJQ +mbf0e7myH7rPufGnuOQBiFwYmMd0mpZGY33xzjfQNpp56J1kMYSGnghrIc/A +gO0X5oZIFcj+7jmev8UL2R4rH7HH5rm3e8Jg1wV12HJMjXhl0B+F3W5KWH/u +RaDhYEf1VCdy+vQiT2a5GE3ucf5ykxq771dkftq7dyB1Vh8t5FYNB8PDh3pW +SGB2jfb1r/gOJOj8pY9uqQroK5OYz2K6hc2rMn7n1Q5UeS0wNJCjAMwUdu8N +xvKwVM7N7ilW1wglu14m70mBjCOicSQsDpoNtsOmi70w6yz448L1eviscSpn +gxEJju+bfHPeSQ4EiS3P7zGGgL3V7pT191Q8d7Ffrem9BuUtBpUxoSGwR5DU +krb++yOHWKOpY31wQnJ5YXMdFp9WfptRWxK4b/f287ykjyzVhTVElTDdXvup +3hHTD6M7kFa1QDNEX4zdUyHXAnrN+/kCWTBdPXBknuHYUzR7wdHHmU4XHH+t +XUhY///1+8D2ADcbtEJFX9mtrANGlx8ID2O4Uf4BbgkWF3T9Sa3Rj3gC0jzD +udyB+dwTvU/Y2qfkoNl4gDmB/AilcrZar39fpoT5oFakRSfivU571TUsHsWx +McgnYnV5991la/VyItx+7iT0/Egl2viSP7MRuy/kDQtbLmA87BJUERxAyEAs +zpuzqbH6Lq+gt2VwMAk0vAoGoh7oII3jck0blslgEifBZHs6GS7YOmiMZ2F5 +tDvC9hXmy97UlOyfMSWCI01FksWmKnTwPF0EP6ZvaX9/l5elJcLT3zv77m6q +RaIJ+zTW9SF7DP2HH297Ybk58TR1NkIyPNK5qRiuuXbzd219L6jzbODOFK9D +cWPPhlswnDU1oyntUipEvDcuXhrzgG18aYwcmB+xmR11Md/WB47nqUY9H5ZB +kYYwaRyr4+dcu3ujs4mwj43UM8lXA9L6lhNcd0lw7/M+STfOPjAIaeS+7V4G +5a+TtOexfMg5cXzIk/slYhH9oSq07Aob46uLhta/L5aerERt0QycEkp+bQLp +sHuxUcgV8/slrrL6nh7d6HD1xsnl+wR0Kml6g9xHEjzdqH/ipH401BEY65tz +rwBHZEvw+vdPvZffCeofjQfluYtn2s6Gwc/tXq9eY3Gzll3oZpsigjjV8+Wi +QQJwDBoaxGHn0hyyJ/qQsxWytGenmbnuDobt1+dcsPNdnuCrpD55D1RmU734 +W0PBU2inteV6f9I3tkpV7Cli3WUFhjIh8GCNPnj9PRv7/UdKEjbboFvkU97x +P1OBwYeKjhqLm3opu3LX5VegVdj6cvhhG6K69OzachkJvqQLvVjTbUGHEh/6 +pFK5wUw/0nnkivE/YfvI5daXSMpenD6FyQ1OseTY/7Egg/2+txcl7BrQh+We +JPkoN9ieFpQ7k0UG1zu9gi+rK9EHBU0zAxdXqIh5ZDROJAOHCNM+Kc5ydMjp +zin0wgXG81Vsrr0jwyGtwWiXoQIkfFhVO9rfAbo02GSYSGRwMb1Pit6Wgo7c +6JXol7CEPTnetuvfK1/alSeiLJuIMuW63x0uNYPsJgembiw/qYJZHFmO9QPt +aMquuJp22G++c2Na4Az8uGNs80qoHeov7txH+zsWxNu95jecI4NMsXPRaesu +oIuva1gihYCh9y3/9ff5e2+tt8ia7QE29izd21ecQJU3tTv+HQmUeDhDhal7 +gXY14IDxJ2s4tXmxUGiQBLFEhT8S13sgiudt9bZVacTHW0e3cY4EuRrpFgq/ +XwFp4+qzIwf8EceF7f0VumTYVpCjJVbZDJt1F+y0OoOQXVhRw5oXGST5viUd +oS8H5d0X2ty++6FdXvwD27D4LN/VbKyxSoML0ouL2letUTnV54SSX2QYQaIX +0clk2LSWP6nEaI5ezg7M12Hx8ZLbU3/KXAEI7Q48dBIG6PklM//158devrAy +nDIvBiXamOwT0/WosYFuyjiSDEI0yo51050o6+PKSyfPCPSi573g3Pp7Auf3 +sw1E9kHQ8PARS8Ui1Nzy8UmqDglmsu81zHzqhfZPK0yLuvXIYMQ4Kg27dyRT +omX99HNwfZbEWjp9BC4dEF/5gekK9ojlC03cUbDKObWqcO0KPNN5u1SO3Yt8 +2cCn8Y+vAUvPzoGGAlsYOSw4vP5d+xOI0O56kQjCxo2zVruqUT3TNW5OjG/Z +498UbCuLgats79m7NSMh8nVxATt27iM8GXQ37nWis00K4SVVhbA555NJH8a3 +bzujleJsPYD0J01q10o02K3+kPyKrWd46ipr/mwTit6URjM3XgonNTdrilmR +YZMOt9g0mz2apdV07wr3AgerjQnrz1cP+9YqEeYdULFxh+LDQm9QFn+2XxLD +Pb2fbfY81Qcse6MXiwOKYDkk1/QM5qNTqX2K5ln6QPaDanoXdzo8eLU8TO1O +goGlXZtvdhKh3uKh1IHLcXCGfLF3LYQEu88b3zTdWwcmRYdzoyRLYCy+hmot +FfPLivFSJeKu6LMAIXtFUhc+/1jSLcT+bkTCxIpDew9c+tBUm7asCye+Cjd+ +wvhnE0nF3eB2DvCS0h/7sjsh64YoIY55MuyrudCdeFIWnkVU83lzuiAOpdu1 +679nWRK33Sh4uA8OMxVnJRdWoKehZcJntbA4TzYcfs/UjzIzTPaw7SgG2Scs +9bIKJAj1aRkxyk4HkTyQ2/LRHn3cJXi4C6t3bRaWDKrXiEA/e/k01WAV4nSN +fVVoQwKqnM4yWw0iXJVofLI/GqsLYcbhkuvPg9FZHUvN7YX3qyMqgUF16OaE +L6kc43lznuT55J/uKEwN9q7IxULj4JmAh9h5fTEQ+32U1IiYlWLOr/S5wmBg +kFLzc8xHHwnmipeuReqmoxFH011hQGXksGoLGXr7Imtk9GvQvddHE3fscYON +HFWPPFrJ8EvyD135l2JEfbTQeuS1Ezxxu6pMNYHxIW9GTJZ8Bsp8x8tjZ2wF +9U/a68ywfakkMfgOHU1Htzc5Nuy8aQXBl8TPH8funY+G9t7PulFIcKuH3unn +RsB1iHo+BctnSQWSloJfDzCXbDlFe9QdBMQPjh74itVBvWZCbH4P3NQ781Zn +HFuPTFeX1RgJ4pLotVmdOmDndoY7dSGuaD99loWcGOZzS7fFXq1qB5Piylsj +L9xRq1DuzzUpMvype8+SMY1A+toaE7NJECoIoC9dqcXqlGbxqv/rGjC1Kf/o +ahiEBK1Hd3K9JENUraz2i+ZYGJ9IorYJ1EetTrtoarF4vt/dXTOjgt1fl+OP +XqJGlOdyJVYCq4N18lTbZ0J6Ya+8VFcgakDiUkM3RIxJwOfT5C2Z1AMjf0SH +F/40ox1R1Mcs13XUmyBRzW294Kg+a1DC5IfeN8okhL7BxjdFh2d97wWnP58H +GWQbEP9F31GSNpafLKzuZTUF0NEu66yYkgtDEQ5vYz+RMf7c6K1zKg8Mp+o+ +NuUlA+8R0yjRGTKIjxWeeXcnA5ySLwjtlAsBJmHlX/w/sXs609uYwNeO3Haf +/mqHMH2e5uMeh+nGWmlbe8WjnejkrfJz0Wy5cL+dV81yDxk2U5VNddZ3oLWJ +3Zp7WDPgFskVbcb08LMJ9UV2ZiJsdFitIffVAasO4eAvbF/vq2Kqm9zdkemZ +CQ6rE/GwL/xsIS0Wt61KTpVRcX3grWLe/WxLGtrAr+9ua0aC/rPMckszREju +69+uf7saxfZ3M2Zg92iU0Doe0/8IZQTXmDfUBKMPVQfMM7C6fPxmNc3jXwXQ +WzZj470Qhmi/3Ag9N43VwYrSHQd+taOMsxFxle1FIGxU+k4H88WGuwI/n/3Z +gfQsqhKobBEsbTe43TRFgk+tPXmfkjvQQVHzypq8TNh9OpoxEtuX87jSU58m +IiTaX52Y068AozGdz1GYf9fb+ttKYZ8LUlWJJqSG+MP3KGXSd2w9T4O0HwZh +/mVcs5RBNbMCvfOXjmJ9SAKN/CCv+xuIMPjJc6+hSC1qbdG6X4bd09qSL5EF +Ep0w+U31pnR7G5pdviO2HZufbcdzg3xMf5pPyTKxZhSD9a9RBe8tZEjb+G7g +jWYn0n1Gr+RfWgC5CcHyBKzOfv52/yCHrQ/MC4t4gGUMHHm3zzUZi7NCqdIM +B+M5OJ+5IKE0ZQfNmWsj688Ju58RmHtp34E411bSLtjkQv2VM3UEzN+p28+R +T/7qQJkPF3g3/KwAjp8Onds2kCHerFf+QZgxFISoGC7FWsFn646q9+s+JT3U +C453ojMmCw+yxFLB7eUrXxUeMkA3g0yjLBHkrIoIj7zq4AMPm1iFPgkk+EM+ +fz/fB6kH38mMBJSAxSTRjRfLkyupt/R+ThqisQ/qew/qGcGZRLqX689jj2bt +Pxvgqgs6jvk2lmdCEIsFlXo+FucPbzKQv08f8Amci48pLUZXLouoPsDuhfYG +YhSXBxGC6Y74TJ+rRuAaWCqKxbOo6BBNxBd3pP0Ecy9rmG78StMwiPHM3OHg +kRen3YGrbtzmrXolZDrLfNzVT4aqBrGVH4xE6B7e+jXOvw41aCUJhptgPFPm +Kn7boxdk360QknIb0cctjltbMN+dWJkiR8wyQT00x1sqMrzR43aebevf62T5 +daRVNUUdjRn1XN7V4o9suFKTRTD8iOPb6UIBzMcV0Zwsyq5C+dTgrLJIgl1e +PwTK/iQCfeom5jPIE657bV1bXv8O4MpUmtpCO2LxeDB9pb8Wq1P2Pjuwe7pE +uO1qgs0TNXfs5tmsFGRl+mVive/BofRjrNCRCIUDXHLktEokmTasZ2FNgofZ +LNKyrzKgVyhWsLXKGXl/mL08g/FAR6pe6nO5TuTvpSuZs5YEL/PUWMuwc6yT +juh/c5QIrQfU9gjuroNLobt82TB9ctxlbcfEcjAwrRz8Tf+5AGIIbGpfsHtX +6r383sE3EYaOXeXJULZG/uU+TgmYrvC3UeU+ei0dlNMSN9VLOaFT+nFptBj/ +f84x5xRPL4S505PMspleSIVx49jCFBm4G/VEqohZcPvTsVKnLBd0buWYjeIC +GQI0b5gXavWApeXnU6EqwWjrxsJ2PxIJRLvY/VIP9EKe4beMvX5B6HxgzOrd +Pow/K/lm5z73wj5nwd2iE0HImXU7r1E5CeT/ZIsdNeuFWou9fvQOQSiK/pCd +RCsJ1CeTGkTSiODA92npU5orCI+N3b0RSwLxeYO5+3x98M5q9DwNXxa8P+h1 +NdmZBH3hJQOn+4jQd/uFyhxnBcq1ovEAzHc8MXfTcKwkAmNnadZG/Vr0J07E +rRvjsez0vRvXFIjgw+MgnLihHnHfeCF69Q4JDjHFkpZKeqHGvr+SSqQBKVbe +PdGE1Ysrg4s/Gca1EYf5e9PbXb4o6KOqjvz684HMkd8HazvRsO7rH3tkCtDF +nI8q1UxkKNP9rK/gR4RbbBLX/pytRPSJbYIWViSwLM/2vd7ZjoinDTPo7yL4 +JhBnsB3LnxXGw7M5CvYglOnaHvc+EqjWpDTisXtx92xUc8H7PojouinzmqcA +BqYeCJ3SJEEHlIp2J+Qhs4qiDKNIKzh4Si5V5DsZtm9G3891ZSIGqmkLsWOW +MBr3ouYqllfmyqV28uwFiM7bmCM63xpKX6k8KidjdfaFn3LKUhE6vlfnO1Oh +DWwfoxlX/UqGpIPUDerVBOTPU314VtMOTMLeHgzGfDqhKtVS5lEJYjg4tP2K +hS0QL3HczB4ng/LBXfdXNCpQoeZ1VTlTO0g9Trsa/pYMn4Q65MdbqtGv+oDk +S+m2sDMwe2K2nQzNGx7Fbu6rQwcfCoXFKVnDE4dHUn3lZLhQJlkagJ1Tue7n +jK9vbaDV88Gf781kYLAIiOZ7Vo8ktbdfPVD/EOImYiRcisgQKb1BRuBnA5rL +ujens2gKZ644hwWmYbpF1u+cckYTmtQi+F85qQu8Z0pqk8PI0PhRpzM3sBH9 +yJI2EKe7D3ELjH5VCWS4L6JSMbqjGXkl/5Kmy9WAT3SXChmCsHqqdPGGRHcz +2uT2R8xw8RTI7jQcPO6N6Td+7qUIpRYkUzsnyemnhQYdqrXD3cjAb1xBd5Sx +Ba0qnZD6XSiCQhpeyrh7kGGv2XMLn8st6HJr04e7z++hVwby99uw8XrXqFOL ++ptRTLVal0DRI1RgNu/zDvNNwb3mi68SPbC8KMxsEtZD+3Xej3ms/3+kyfm7 +nqoD/OLsXcsT1UHSSlcDeta/t1VylTuX1Rf6ClUua0boI75kna3X1n833XIv +nOFmCHxMdn7HPWiI7lmr06zXa/2D+1OmK2NhluHV5+Mhlgidl+UsxuqUF++x +mivy4aA6JqbXQLiP9tI5DK2/X9HuDP3NGs8SQGvT3KnVfmhWMfzzyNj6d8x/ +GN7YUg2q/mvULA9D0KH+aCqtTownpd7mvpxpgoNfI4+fy4hAxCLdN+WBZND9 +doZ3nrcO3hmXkRXvhKGDxgdEN9aQgUg+zHTjyEuQ+KXw/EcpNt5rXMXAhgxN +IXQxanrtIDtn3c50MBxxmw5M+Z4lg6/qgPOrmm5I31Sye2FDCHJkdg7rXcXu +e8eNXTP0nSATx37z0tYwJMBgJDYpQAZa27MP32N1hHbHamy6RjDiSTUtYiki +gdiuI0NaN4igd2CCP708BCnPe6kYZ5AgS2F+9CrGG67XRhsU/dLh5njvwb3B +JHDnmD/gbNyJIhivmr45X4loKhYitH6RwJf9zSmftwnQKWERPBEQDD1veT3W ++yGtd2vfOcxiOsQ4s205owLyWZdYx++R4Dbh2/N91xpRJ+P7T/lb/dGPV8si +Fklk2EO1OyrxZjMqsDuUMyDxGNVcVTUXC8D0wHtl0I4hwvdre2Sr6COQ6L0K +PSWMD8td6EQrzIjQtLZnbuF5KIrS+zGmnILV33sXupjbHoLJE8YaVmlt5Mvk +yvUFywdh4uTbyv4U4Ge/wxeoZoqeBhp+7FgiQ7ZV3J27Gp0o+DLtjerUMpgd +mGJtoCHDqrNMEP2rCJjJDdDoso0GsY4WFgusjvBdczaVN+tAfry/dn92yIN7 +bXFGpphuUegIG+Vx1oZHORZNla8fwYO079fXf8cUck3vaPdQAIwlC436VsSA +UfixOtV1H31Fcpa7KRS0+54Qj2nFQJrTd4EGbP6rAfw/5xQ60fxUhUCf0ws4 +onlMJHYH5k8f3XW5zRCFNKYP3EuOqAMButHEFIw3KjS3zC2IEqH50Lb8W1XV +iO5G9oVzdiSIvOY/TsL0z+eVPKuBQ9VoYYLptwbmu58f1XS7OtGJRPadq7SO +LEIMbOe4mOmx+6L6Qjn4dyxc1tp3ZTPtfmDeDJvLsXXyk9Va4o0S4dSeXdGZ +F5QQ8trR1oqtM7Ltsb119UPgjrWgGRG2BEKJe9JbbL9Svry0OqPWkNbwsGQX +vwVQcZ17sP49bp6U/l1iYANPnEIL+bjM4UrTR1Lvuh9P84kQPGUNR3i33uYO +sQApDri0/rxZjsTzZ5u4O9EkW1rsr8ZyKPTRU0mnIkPMvMmHJsVzSHRrlKS5 +lSNQ95wLXecBE7nAASFMhxgOuOnmtmXD06N6tpx7yWAtNj6ldPMK4tonlPfF +IACCtel38GPj/aV1NHTFb0HjzCmepLFAlCwi37n+nkzr3knJA1JEuPLUPtFC +pxo9mn611oTFjT6z4dbFuXjo/8Dd684hgT43uhw5t95/oHk6bCZ1D5xPdPx+ +XmYN5SJ6+9fP/S1rvmPCqgk8+TZDvyUnG9yMzmx9jfl3M5FIQaOEeqTeefjy +2KlQBOI2TN4FZKA24E71dixDnHEBZSfTk9HYSt/Q6BAZ8rnFtlfVpiNo//L0 +MrsFuKYHWg9iftZD6dW4lq0hfPxi8ZH5XQhSzXzWt/7/js1zOq+16VKAkf5a +32qgIZoM2c+ghN3Hg1yfxjmGOpHLyLeuDKoiRGhqHzu9iQxXmOKfnyBHw3XW +uYtTNZfgNLV9+h2s/lpIxP7wzU1DtosRYZJkM+DIreCLxvTSds3wtXs+pqDy +Y6eyY/sdtEdmJYuE7TdDQ9/06pVcFPzAixaWHsLQyr0x/R9kaEPWI5LDZYhO +zYfT9YQdiG18uoHnAxlenhW45W5UhxKqlnYrsz0C1lSTfsVqjJ9rampp7zah +91xhqgdC9MG5t31OK5IMrx9kCttebEEGzk4ENdObKITNtP47Vkd6wsxVWzc2 +oS9tQ+1DDl7IpoZua2UMGZjTEyXqVZ7CZZqUo1q+uuh+8qe3cevrFEk7cDYs +BjQ1yQNslyzQ+ZSawUPYfoUvHVcbhgJwrL4woBXngXSb9y7TYjqhs+yz5EpW +IxS2bjKpVYtAvF9D3r+MJYNawRcvc65u2BQv9/2RHcb/7YMZLxkwf0cakb76 +qhfCjdS+zFYGoeunBSsUqklwzfx+o3wQEcKvWvtrq4Qja99j9xbjSKB8NHP5 +mzkR7n+aOMRgVYe+aKc7o9skeLXddVTobCdKE3DdebkrDxbEDswv7CID0yjt +DWfRbsToFNL5aygIVef+DNyA/V1dJWlV9vlu9PtobTy9XyAyUOBMTl4mgaNW +1BNb3U5k5qBXOOlXCkzXD3YaYvf9l5xt49UzzmjvH35/3W++QE1/s3Tb+nt0 +X/jyrbRVouNrX0qGwxMQMKqe2NlNhtuvWF5pJqRCB/WsYPlre7QnZ8J4/XlL +naUDByR+9UBD6BvZgowgZCA3wpE1SILk7+wj7KPJSF2K/nh9rAmEcKqX6WB5 +6Hph5a7wDIJQ5ZGzwzrZqOyz0Dn2UjIc09t25/p8GDC87Dm07UEplHzkHvf7 +hOkH/pxh9iNFaFBJmX3fSRvYas2WfBjT502jTvtcPlWhjPdZrQZLtuDYziXP +g61z/0AVbX5sAyqsqBCtobMA0qstZz5kkqH8s65pbVozOtH8xsFs00XIP+PZ +uOpDhuuBUTfjaVpQdIhLrc2xh4ho/0u4G9MtKld6vLIGg8BjJ69pm7cBsjS/ +tXcYu1+7ioK1Jz9VwA7n0Lps2WAUbcVsPoT5Na2k+8rHddrA6/hvFtqScJSq +bDeudBVbjyhQc50nwkWbjfovr4SgJKqepfEsEpw0HlQdOxQMZnEinZvyYqCj +eUlgG8YnE+9/z4rv6UKm56+RyBdroLptvmHoMxZPuyXW+LyjKGdvnXY2BMEf +F/bRRWw9dTZ1yscl+0FYk2Uy/XcehAe+8b+gSAITvi3GKZ6GiI7WwTbxsSu4 +h1qMZGPne+6++3zFfBfEifMGDDG0IhO6Awdz13X+nxSzRzFtwKS+S0X1Qieq +NV+0XzMjAX/WjprCW1mgE+ofkL4cCbC0cGX99w7b3l26WvKrB4VHdGs7RJaC +nlsU0QLLc73928m0sUXAtPnwC6b9RfDrRv3gi9dkuMGcc68ktgvd1Rk4PTBX +gSx0bvH2fyEBd7j80O9PHYh2zP3tpdA0UHz5reksVk/FErm1leY6ULPVx80H +/qRCZAG7ahMfGdJcd+3XGe5Av9RH7nQ0p0HYFs5aC2x8a0oh6zXeTqRPvHTd +8UEqmpcsKJbHfOjIE1md9PvtaK/nUL7q4XpoKuE9vOEnCdR834w1vGpDViu6 +rKy19XD6F69C/RJ2LmJVW98sJIJNsN9EUqoPJB4riFh/z8bnk1e/XhXoQG5G +eiuB6oUgrOD1gx5bz8VQH4ZdypawdltWq00gAvjypwU2YufyVf65/dYdnYjf +HXVFJaTA/m+D357ux/hET+GUYVUmmjutwNgvm4lCCtRTT82Q4cOItCL1zwdo +JMtLa1L1OcoIO660/p27vmc7+QVOE0HnloXyeUWEfgZdAivM3y2JZzQr83ei +UL8XO4zq0pFUnrG1DjcZsp4epZ9Z7EAcXcLW3/2qUZF1FeMKtt/pVyF9za97 +YZZXo+JrBUJG6TNHSuxJ8OAstSdNZy+8M3ef7KSqQx8S1TxeYrjaqAd352Nj ++Jpe8lvQJQkNH469u/4+qEWL0ZeDJjaozPSHsV5iGGo584vtJLbfaC5OMX8x +G3RvvFuR8UAIenpDYi4Sw6de70pWsjkNI8Mp7E8xPuTw7/qx/jvuqrMy93tE +iCA87eub1IVQIoPe5fXnVR79qrwz8IUNqp9FnTa+H4T0byS7rPe1bLf2ubvk +d6A8F3P5KbZMaKLz1bl7EIunU8/JrTUdSJhD5MPayQzwukr/+tg6Tn3GYhnb +17WQbcdpdzbAr8/XmZYMSLBplpTIm9QLy1keNKPvGkBwIDuKHsP5Uk1HPTHd +lexsSb55LwktVGpVlPBgfBgr5dN1pBN1aW3mfEubgvSOpOSrYHmVcn9CwNqt +E7HHv0/RM8tF21xY1W9iOi3nCMueoMhOxHshqpgzKQ8ZnwlrWmAjw+6byiHu +9zuR5rsx3mK2HJQgVFy6zucdD1gEk3k6EA/dhWGuZ4WgLRZrPIvlySbJGUG9 +yDTYoyVi8H7QD54JbL0+j9X9kNj4kSa3x+Dlw15uTJWC/nAXHuXD8lOvuiOQ +dfgWXI/8zFFxNhTyntjL+q6/n0rkiOL3sDsgkpWm6HsrFJjY66I8MJytwL33 +YxwRrnqdX9oiU4WmqjpH1/t+aTSHHvvoE2HlXNhZXeUqtEXuXlH5IxL4ALVa +Zpos2kFz3eVD0DPITwjavAPjEz73NfkDV+OBvlJtqFzpGGpS3XPZGOOx3Y1n +rOI8bOHaaZW9XxXM4Kjvazb8+86fXjhGW9tBi1+cSMxrU6DZrVXWsf77a2sl +y9XidnQ+6FDRYFAJmNGtMJVhcQ68x2y3atCDWnqkTNSWCMD/9MIQXysJYmiH +lnPineHxYEFAS2wU9LuneRpi96X6PduoYq49CJZrVEp/i4QUyZnWGAw37hfb +Iq3didbGBfyNFRMRlTkj437sfL9XiFP9eNMFn8WZH+n5N0HdlR3nBJJIcL/H +e3ok4CUYuv8eYA1OR2rJrBFUD8gQMbUtYI27D+2okGN40ZAAfzwGde95kMDD +V8BrPJqIAn+72mVxXoajXkQ7rfj171uRfbkzeyAmd+L5qkAL4lr0XXiC+aBj +MXGRRqyvkXW8LvO12GTQ+ik57XqUBFbZOpXs0vnQ9t5wx2/aNEh6qOn/8hvG +A6PWkXm8RCTDUHt+8HAh2M4wWyxiPojuxy9pcY1eVMxHPXCRowRWH4tepikm +wQaGg78DZoiIJcNScj8xF/Y2X908+5QEBsmtHY83G4B2SkNjxEQoSMvNHVr/ +vlv0I55XBU418DXxfaoibTeq8jSuD+0jQWiF094xzmFgu69hq/PFGGakIxSv +omko5dze8K7tHSy1EOrYvsZA6jThC1fPNDgPaKl+UHuFttQ9M/D60ghxnSh7 +DfNTej/2XOFZeoUyWO6duKnRCDZGoX3BG8lA/s4mH7bWik6q5x3XtWqANx8b +6wZWSDBAFjLoPdiB5iTL7y/qF4JYzPVtNBjftt3OCMrj6URXusuXu6QygPuj +EIsGxnvfD5epJnsT4bBPsp/17mrYyML/WgrLZ7m16SHFPeqwz6XcSDIoGCn3 +L5xuxfb7y1HJJ4CvHqktdanJJNchTePHebssyDC5mus0uTMbvvFUKQm5d6OV +J6tJPZjP5W92X2hs6oTNN92lb/7sRYK69ixmHTNA0A1N0rchguLJywmhfsHw +Rut6qEMyCb6W524osulE/UQXWp9vcYj31E0hU2yd0xYL/IFRWB6eXhprmYtB +lXzmfbu4MB2VtnDacFsv6gnnNV+KzUOVHyZH2LE8X/h9yLXzXB/wKBIGHt58 +hholOzjksHP8rpAZuiLeinKGs90t3zTAqekJ+SQszr2rVSWHedoQX5pETv/r +ekjQEdg5gPmmZ1pex6butCHN/Z4pp0Lr4Xbi2o35DWQ47M8mnZn2FFbnbL1v +BKeggF3ql1IwXWercnTeei4ATpcY+Youp6I056xtZzD9X8XTwnynkwgSz5xa +YpLL0fBwdxEB0wnaF4SlNZqI8HVhO53eUDkqCXEMMjDH4rBd2TrevAfFlA+Y +pUoUo8kfjG+U1r+TO3LeN1OqB6Wv+vX4O5cgjSOE8LYBEhxUULv0K4aI7nF3 +z95V7IDVhpEFhrYZGHPbfUV+tBdNyG4ii3fEotMn1M4cKCOBq/H90BzzPqze +uhAkZ2OQYNgKE5cDCbTiSzZZaBIh4Xcmd41KLdRtpHUoMyHBzdayMBZMb5f7 +jZ8/dL0G/GkY7d2wunP44qRs3SMi9Fy/oStOXQN3J3qKCzH89jfq6XJGIiRO +73+v6WML30wetAhj9+uXLblMlZMIty/9EBdSq0HRnL+1hzHffcALLX9hJULl +QaUA+cQadO/t25/8WD1lLtroLLCNCFvb9h78nlODvpZ5NUlh+GzzYCI/MxH8 +eDWjFGpqUOBD/X1yGD4yJiHKP0WEEOdC9cujBCRRs/WyE7aem6LEiICpYnCQ +SLUeOhqLyvubh7eMkUH9K9f2CwJd6CjB6O7DlDBUMPVjY95OjP9jLex302cD +L2d4bOiQO3pR0PR8GfOhLP3+NBvlS0FzwErI0aUXzs7xLUM2CSZ+XNi7egzz +S4TDhgs0HnD56stv6+/xa07ZKSTP14m0dixlfAxIh+4bjdVFWD4zbj9T1Xdu +CG3aK2uNPApAovSk+PCeGTjuoJLZPvcSHudGaR7S7Ea9cVqvT1qSYHfGUGvD +gU50sjWsvvZcOjy5cTmbiM3j4fTuMq9gJ9r+hnZTX1kafG8N+bER4+dtce9/ +HbrQCQ96z9Un9rQhlTW9w5uwOERbOrexT/eioB+++1QHI9F2xlSD6VISpFOf +i6/pMIElOp4zztzhMFNM53Ucu+/v1+Yix9++gvQlpudHCrpQcpbkVg8LEiwW +K7n9Pt6JtCVzJLhSkhHtqY0vz2J1h97PscynJRicFsTjZwPeAMvko/v75maA +3FAjITNABM7Jm/tctcuRE8m55yPGMxW+Kwf2ppUAVcyW1VWhePRei0egDvMv +jyKD5ajOdiG3PTtJ+SxhiGdInv8GphNEH6aPmc4+gI+bRD6VK4QDgwqb5mFs +nX+i2XPzDoZBi6xYE2SkoaKorZLbsbo/JZOrEKaVA0ThmENIqBA5zq8N9WHz +q580P7JxEeO95IwPDC8ISE0i4NJFLM8fZ0TnPX58D1bSxCODP4WgV891ZcKw ++WuW0o4dE+2Cg2s6/Ak5lShiJ33+jilM711ekdru34yOHHnsrcTvBo082m+b +fMnQMCDzrf18PSLFWdzXTHWDBka9i40lZKAu3rmV1TUP7fuudnI3sx2M8Jz9 +dOY7ppMftJLWbjxD1ecYjjAfuAsS45dT2LD8+ToZwuXV2gUsC4HOuY9K0PRM +0KDrPAnYI5tvVkU0Il4vx81VT9zgSL5Gq2ACGdbOxUjs5ClGV3b/DL/H8hhy +HSs3jE2Sof2gcrDAYgSK8260/BRmBJf629kmsPq+NUzvqBZ0ooAHRmVZu1Og +vuOWvgmWP4yX/JhSefqA6b1s3akPpeC5HE2mv0+Cb3v6j5wRvAN2U0NvaFiC +0fdwLYXB9feWv87e+SpcHy4H62n3pYYC3Y6+HevfhQxZKIsz0+9EPPKNEY5M +iejDGxEzmvXnwMd+JIwzRML4U3Wvt9fS0RWvixP7f5Jh2DuCJ3j1JVQLnwoI +v9SNtA3vUWdi+Z/E31nLz9oGr710z0XndKLrXNHV0lgeJjHWLvnxvwKHENY3 +b4S70UX0tswHG89HOGRSX9AGgRXbvgVj96Zk059rtRiv8mg8Zfo82A4i9GIv +BPZ2oOcvis+mYzyc9tVU2uRXPpwb8n4RFl6M/B+EtX8fIMOAJq+d+Mt21Cty +6IguZwm8UwgPXX/vpZL1m8rk7HbUdedWuFRrCVy+a2+Stv68pe+HeEHXbtj1 +YetLlSfG6C2b8sfv1GR4aLuPMflaMbRHzizR23gib+uML/zYubB9zficLR4B +6jE821b11FDVecXPLOvP3zI7H1cr7cH0u94hZ/VbUFAq6DE2SsL06ZM3xsVZ +mP9IW0LhDkh3RXTpyQIZsgfYhMbjnsP9F9vHTDL10PbZl1VrmJ4MInP5lAkQ +wU5+J+HpcjU6ZGU7qo/xbUZ5te6Hz32wEq0sJbO5ADieHv8ZpIHpQ5Jfj3JM +N5w+pb5hj0IekvzekOWL5dv3bz63ez7fg/ya0OGOCcyPHz2ybb1vFs55pM66 +oQu2Kews3vKiDHFZluXXkkiQYDhQIrvhFeIVLvd7/aMRXmfuXq1kIAOXls+l +Qp07cN7w52f/g8FIF86fXn8facJ3wS0tB/qA6tSh0MWKUrDeu6zQgflr81ud +0u/dXgEWDj//yS50YvRzsix2vio8izMbRtug1fHCxrKlDpSzvas6Cjvfki9a +5C8r7SAnJeOiuNyOhvlZ6ryx85WKTlYvzStDV2l6dYOVYkBod2A823sy5EoU +b7mFypCfc9BWUIuGKCorHA+i3ld/sLsMiUhT98yZR4FGagSODynnPlV7X4Z0 +VRyObYqKhMambhxPvirXyfutDFm35Wzd3hUBQr+X49bx0noWnZKFMjT9h3Ol +lyUCxvU3Jazjxs8nncU3EBDLMq3rPu1wyImm4H4huZ51mwhoVsDSYpkQBpq2 +tvj8fB8Qhy0rAVWOini67w6DVmsZHN9lJrXPfDcBpb7fk0TyCIX6kS4cL+9R +ra7hIaB7lY2X3JZCQEr8Mj6/gwujySMBAjrgNPYjxjoElETT8fEf7kweSRMh +oH2eTDLpP4OhdqkTxz3Ns87fOkZAn2pvye57EgyiDSE4HjHr6psiQUBGb63A +lzEYbmf64HiD+nMZIywON54UmJW0RoAeYwJlnv7YkqbFMvTI/sobLVI4FNG6 +4PiLsYz8YmoC4v90WuwJbzhQp9njuOhbmwYDJgK6nqDYF3Q3DIJ7Jijzd3h+ +pN9FQMsh6iunikMhjKsJx0sF9H9VcBOQ4KGvTvKMoaDbrovjV65I28Rg+x11 +n9pQahkCUHQLx30PWMY3iBJQ7GPegOAP2H5fN+L4nZ+9tvInCEj0bFoMo2ow +yBgcwXGZ4X2z0lIENLmD+Na0PwieOfrieNjRxhvFMgSUUnbMfKtmEGTZDuB4 +xtGs1rILBDQVXCyW2REIzrGKOF4ZYf/sugIB/QxY7nGZewasXOz4ubTaf1gJ +UyKgxz5Mai94nkGo3gd8fBcfP+npdQKyLzX20dQKgCJiHY57n2hXlOcioD6U +OS0lGApqTWU4Xs9vx9CF7XcHjU9OhmkIfNzjgOOb8zdzKxwlIFLn4vdkFAxM +I044zhp7TmrsFAGdMhqQatsbDGVaqTje+s2QuxwIyKKa6te4ZxDMX3fE8d2f +PHQ+yhFQzj6pkq4fgTD1cC+Oi3xWO/gQ2xd72vbuhqln0CBIycNYXXotl2sE +dDYyB6jnA0Bp+xZ8vza5Zwt23ySg7YpHFbm2BMBtKcrfPRbpfPyqBgGh1j/h +HaL+8LuzCMc/G1jGH7xNQAs+U97fdPwgT8Cfkue64tN5OgTEXdD72yLOFwzG +LuK4VmnovWl9AloM8Zu0H/MBOmMijrOwX+H+ZkBAe55w94od94GKu3E4fnaQ +83yeMQHJp5498fGZN6gGf6TMk3m+KQHbl7nw4Ljw6DO4wVyM47PKRm8GlQnI +Lu8cr1tBAEzsT8bxinnvyrtqBNTJtCPELswfLu29g+Op8oId6loEtDvH1irX +3w9YDldS8tO14GMbtv5eWb4MpkhfSOkJx3HdkRzOjrsElDV9qa2r0AcuCPFS +8qqy9d59IwI63HrXQuedN+jviMXx7n2SpkUmBHRJ/o/2HVZv2PasDcdpRA4Z +5Zth+z1751nwTS+wyBfB41++/0qOoSUBGW4y5vuW4gn9XAr4+NeWwnNjVgT0 +IEZf1PqPBwxK1+P43ZzJhMM2BMT7UGP45h0PYHsojON5plJ5F+wImD5rTOh6 +5Q4OPynnOBRLm3bcAcvziIfqoqfdgX2Okm+zQkeDVh0JiGtgPn+k5Cn40lvi +eNWtSfFubJ3z+x+231b0guTXiHLvMmhEtR8S0BcNgqiFvif87qXgf1xlNvg+ +IqDLBnx3Nvl5QO9jaxz3otaqvY2tx39I7O7lBncQ6aLwW61cY8MXbD2xhXWM +gfTuIHr+Ko4/DZpKFnlMQOk5GmMWGk+B6jxlPYeFYuulnxBQ+8aus6VlbmCw +nxaPW3pEX/geVwIa2f5O+eI+N6D6M42PF3s+OtjpRkAXz4vyHA90BXuFRRyn +lraf0HDH1n9HNCaDwRWe8nng+HK26vNGD+wcey97TPq4gO+2GRx/dttfjdmL +gPiyW5LkWV0g9HQmjqu/tdx21puAqhJe7jM99wRWjSn8yWzs7afuQ0Ad+w83 +qj1whiaLChy/zrAp5JYvAZXxoON6SY9BbfI2jls954u9js2zt5KgmCX+BApz +KfNr5ecvzmDzZCUw3x1ffAw7t8bjOONgiqGmHwHp73x+cme/E2yaf0rBk0vM +EvwJ6Pkbney4ZkcQ3kmZ53liVWRDAHaOLf4S4m0OsNA8hOMCwdOEV88IKLvG +YW3qgz2kKgrh+DnHT+ylgQT0LeT64HZae3CUpvDt251q7b5BBNR6Q/j2mVN2 +wJjAhcdf6l3wI8VgAjq9+SD9JjtbOOIWjI8XDgwNXcXwuPvCdPqNNmC4Wovj +177QuiWGENDWX4uPZThs4LUgJR+eZQtPHAsloIQPEzov7R4BcwXlnnJ+3Lu5 +BsP5uDsieD5Zw3mFMBxXzbJ1kQwjoNLM4YkoZWvYcecujkdRS2/Mx/AT/MN/ +QlutoK94FMenE0G+PRLjpdN7+4XkzYF/Ko/CA71mhWJRBLREdc2RebMZ+Ko8 +xnGbDh+VZxj+bVebo9zYA0i60ECpawz+pz5i+OVaucEt/SYwVUjRJ9uYTtkJ +RhNQwUmDDYff3ofTzJT1fBu2OGKC4Wa0bkefTxkDkUzhmazp+4Hp67iUi2wm +szE8723H8aKFz8eGMXyS+eJIr4wR/Ezkx+O8qX8PF2MMAWn0/XSqcTEEh3AS +JQ49HPkSGD7vEql8o90AqKYpfOgepa6rh+Hnd2/y8OI2AKsoVxxfe1jm74Xh +xx4Wsls8uQfv+tNwfGA5tSILw+88eDdybuIuvGel8GccF7NCK4bfWl4sOat2 +FyL4KLxEUx507QuGk6aZLrR16QN/8Xkcl9rB+3sploD+788eXZSDKefLzDcy +/584zWFKfazVj6X+/R/4NntKHX+3Zfvqf473G46h1NPpmU3/OV6ylqLHCKD6 +7T/HG999/f8c//9rnn8b//Ff1t/4L/tl+5f4/Nvf/Z98Rn/zeZz5AZ7Psj9I +NmybzZB1NEW/XbTyx/NZakzIRWbsAbryrhnHF6c98XzOTnDvYes3QUwdD/4p +n9HffO51NMPzWW6Y53DClDEyrSDgeLiEKZ7PPyU+XkxlNkbV0xS90WE8Qcnn +KrqJVhkjdCz1MJ7PBTkceD6L8kTa1bsYolc5U/j4LZN78Hx2YF28ea3dAJ1E +lDiYe9/A83lQ7LJTILcBusPp9E/5jP4ln9HffPaUYcTzWaAvquC82l10MkGe +cl7sAXg+H3h5TZrYpY/OtAHlvisL4fy8kY2klCH+BCUYFeC4z9EsnJ/p3g/q +Tiw+RmbxFD+iHhyP8/PJoXvHOfqdUFkXZZ2Pyytwfs6JDc993uyIHi7l/xM/ +o7/8rLl9FOfnwRbWZfIHe/TOnqLrFJUGcH7WuTTdz0Frj0Te7KfcxyVtnJ/P +UYXoSp6yQ+2Jwnic0Xd3nJ8V3/tvYLazRU+YKHUqVy8Q5+fE2F/U9xpt0LwG +pU6ND1Dh/Gxyr9lRlsMG+b1IxPGUGFGcn0dO79ZvtnuEArdQ8uFRCQ/Oz0aX +V6O4PlkjYbtoHN933ALnZ94Cu9FYZWtkrKD5T/yM/vLz/+gN9FdvSIo7yqzr +jRsPCo6Y63uiudywf9Ib6F/0BvqrN0xSSnC9UWHusSWY3h2BkSSOyzmP4XpD +75HUqKXGU6SRa4jjAVQpuN7IHvgmU1LmhnTvM+Hx7DkxhOsNvbBFlQv73JDR +4gI+nmg1i+sNx2TD/eKBrsishAEfv7Fp6OW63jhzQy46k8EVweIgPt6+XAvX +G1mPDDwnfFyQ4/mFf9Ib6K/eMNr3ANcbmRDMaX7uCTLMtqPU/bduuN6wFVqs +03jgjOBL4T/pDfRXb/zVzzYU/Yz+6uc3tZa4fubjk5V1LQhAb2leUOJpdz91 +XT+ziVxb189o0zeKDqnw4Mb1s/YHO5U8fz/ULEHJ57LFclw/B2nyvmKM9EV6 +GkmUeV6k4Pp5n/2VrO5CH/SLZieOT/ZkHFzXzyk65KI777yRiYoJHjcTu0u4 +frb5M5+kxeqNZCwo/issQRzXz5rcmi+CbnqhlM5T/6WfH1D0M/qrn9/ZiOH6 +uS7tzjWrPx5I/WXbf+lnfop+Rn/1M2GbLK6fb4jV1nW+ckfuv/P+Sz8vU/Qz ++l/9vJ+in9Ff/fzXD76l+EH01w/OvDPD/eCCWQVNpmkIilU2pcStjAr3g9P1 +AldSUDAK8bfA8b9+8DTFD6K/flDGXxv3g1PR4spfPIOQ1ztzHPfPf4T7wdf7 +aTl6fgSiJjl6HP/rBzkofhD99YMRLWu31v3g9MNt3zE/iFQLNvyXH9xN8YPo +rx9UfGBL8YON+vKdov6ITJuF4yp37HA/2MHq/uarjh+azqT4JvnJJz3rfjD2 +4rj2wzhfVOXnieNfFGNwP8gO+09gfhDBvXc4rpEhh/vBoGM+T8WP+yCVNMp9 +19UWxP3gHg+z3pFn3qg0dg7H//Y31Cj9DfS3v3Hezxfvb7Bqz9y/TQpHNzMM +cNyOJQHvb9z44e/0hDcc1ZhQ4v+3v6FK6W+g/+1vrFD6G+h/+xvClP4G+tvf +sPM7jvc3vnicUSi1DEGa9Mo43pdgjPc3FkcevQ3+EIx0nlD49m9/Q4zS30D/ +29/4RulvoL/9jfa1Hry/scrsP7RFMwi90aXUzb/9DTKlv4H+9je860Px/ob4 +5xvOznPP0NFvJ/HzdVn6hfc3FlgMaPJ4nqEr0htxXLVsN97feN1SW3RLKwBZ +v6XwQPq1aLxfp2zgkhSsFIM2MbtR9JtMNt6v25N59gqoRaNgS0qcndS24/26 +jxwlzN/No9AfT8r6/6dfh/72675uOY736zi/Mftv74pAdbfH8X7dfQ9uvF/3 +p5/wuJclAqWd5/qnfh36l34d+tuvU7QoxPt1dfERtB67wxCz52FKPXooi/fr +nqYa6pI8QpG1P6VftMv+Lt6vm07QbHNdCkH3qW/j84sP0eH9uhbVaPHn1iGI +cxOlX/E//Tr0t1+n2xmL9+saPVsa9j0JRoeNKTo8Le4R3q+7y/Gh1pcxGP1C +FD63H+yyJPeXocIrb8e+7ooCkQ9vKflWL7VhpaMMJXJzmPMHRcFwKUUnJO09 +EvHqPAE58RBIcmxB4PuWco8co0y1GC4S0PhWv7vFNYFwU4YS/7vbBvD5h2ch +EZsfpVSP/df8yZT50d/5ndKl8PmPxz2+h82PcqgovnjJqd5o60lMz2i6t8XK +BaNjByl9jw8aQxUvy8qQhPQxE+HeaLhzqOmfxsO/jEd/xxM1PfH1X92TCoU1 +gSj5QC6Ot2R8PzVaX4bMGQSdmsSiQesbRVdrpPbJn8X48I+Dk7FRcBDsC6T4 +I93JZXz803FOSWw8QiMZ/zV+hTIe/R3PeTzxfGhNGeK62UXTaBEN8r8p/tqE +epnuFsbDNLfkygwEg6Fc8gtFr6q2sigVlaHazYZe7cwxqNuT0sf+2N7T9/As +AUUp0U4/tAlCd2a8/2k8/B1fYtmEj/94XdDCyiYIaDZQ8uG7CDq2vp6CE5t9 +sPWg918j/mk96O96/g8VxQfQ + "]], {}}, Axes -> True, AxesLabel -> { + FormBox["\"Re(\[Lambda])\"", TraditionalForm], + FormBox["\"Im(\[Lambda])\"", TraditionalForm], None}, + AxesOrigin -> {Automatic, Automatic, Automatic}, AxesStyle -> + Directive[16], BoxRatios -> {1, 1, 1}, DisplayFunction -> Identity, + FaceGrids -> None, FaceGridsStyle -> Automatic, + ImageSize -> {360., 372.1954668539864}, + Method -> {"DefaultBoundaryStyle" -> Directive[ + GrayLevel[0.3]], + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "RotationControl" -> "Globe"}, + PlotRange -> {{-2, 2}, {-2, 2}, {0.2059284450948405, + 1.6352830971032983`}}, PlotRangePadding -> { + Scaled[0.02], + Scaled[0.02], + Scaled[0.02]}, SphericalRegion -> True, + Ticks -> {Automatic, Automatic, Automatic}, ViewAngle -> + 0.5011114127587019, + ViewPoint -> {-0.5085437027736799, -3.290506879253052, 0.603280846668917}, + ViewVertical -> {0.02723056263852125, 0.17619400889103468`, + 0.9839787435149683}], + FormBox[ + FormBox[ + TemplateBox[{ + TagBox[ + FrameBox[ + StyleBox["1", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["2", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["3", Smaller, StripOnInput -> False]], "Placeholder"], + TagBox[ + FrameBox[ + StyleBox["4", Smaller, StripOnInput -> False]], "Placeholder"]}, + "SwatchLegend", DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.880722, 0.611041, 0.142051], + Lighting -> {{"Ambient", + RGBColor[ + 0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.30100577, 0.22414668499999998`, 0.090484535]}, { + "Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.368417, 0.506779, 0.709798], + Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, + 0.33320940200000004`]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.19699838300000003`, 0.252204821, + 0.33320940200000004`]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #2}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 3], + RGBColor[0.560181, 0.691569, 0.194885], + Lighting -> {{"Ambient", + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[0.14004525, 0.17289224999999997`, + 0.048721249999999994`], + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875]}, { + "Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{0, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #3}, { + GraphicsBox[ + InsetBox[ + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, + ImagePadding -> 0, {DefaultBaseStyle -> {"Graphics3D", + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + AbsoluteThickness[1.6], + Specularity[ + GrayLevel[1], 6], + RGBColor[0.922526, 0.385626, 0.209179], + Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, { + "Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}, + Opacity[0.7]]}, Lighting -> {{"Ambient", + RGBColor[0.30756835, 0.18676585, 0.147065275]}, { + "Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{0, 2, 2}]}, {"Directional", + GrayLevel[0.3], + ImageScaled[{2, 2, 2}]}, {"Directional", + RGBColor[0.2306315, 0.0964065, 0.05229475], + ImageScaled[{2, 0, 2}]}}, ImageSize -> {12, 12}, BoxStyle -> + Directive[ + Opacity[0.3], + GrayLevel[0]]}], Center, Center, + ImageScaled[{1, 1}]], AspectRatio -> Full, + ImageSize -> {12, 12}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.16666666666666669`] -> + Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.3}}, "Rows" -> {{0.5}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"SwatchLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.30100577, 0.22414668499999998`, 0.090484535], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.20067051333333336`, 0.14943112333333333`, + 0.06032302333333334], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.30100577`", ",", "0.22414668499999998`", ",", + "0.090484535`"}], "]"}], 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.30100577, 0.22414668499999998`, 0.090484535]; + 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.30100577, 0.22414668499999998`, 0.090484535], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.2642166, 0.18331229999999998`, 0.04261530000000001], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.17614440000000003`, 0.12220819999999999`, + 0.028410200000000007`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2642166`", ",", "0.18331229999999998`", ",", + "0.04261530000000001`"}], "]"}], 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.2642166, 0.18331229999999998`, + 0.04261530000000001]; + 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.2642166, 0.18331229999999998`, 0.04261530000000001], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.19699838300000003`, 0.252204821, 0.33320940200000004`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.13133225533333337`, 0.16813654733333336`, + 0.22213960133333338`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.19699838300000003`", ",", "0.252204821`", ",", + "0.33320940200000004`"}], "]"}], 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.19699838300000003`, 0.252204821, + 0.33320940200000004`]; + 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.19699838300000003`, 0.252204821, 0.33320940200000004`], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.10315676000000001`, 0.14189812000000002`, + 0.19874344000000005`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.15473514000000002`", ",", + "0.21284718000000002`", ",", "0.29811516000000005`"}], + "]"}], 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`]; + 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.15473514000000002`, 0.21284718000000002`, + 0.29811516000000005`], Editable -> False, Selectable -> + False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "3"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.560181, 0.691569, 0.194885], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.37345400000000006`, 0.461046, 0.12992333333333334`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.560181, 0.691569, 0.194885]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.560181, 0.691569, 0.194885], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.1830429875, 0.21424763749999998`, 0.0962851875], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.12202865833333335`, 0.14283175833333334`, 0.064190125], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.1830429875`", ",", "0.21424763749999998`", ",", + "0.0962851875`"}], "]"}], 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.1830429875, 0.21424763749999998`, + 0.0962851875]; + 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.1830429875, 0.21424763749999998`, 0.0962851875], + Editable -> False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.14004525, 0.17289224999999997`, 0.048721249999999994`], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.09336350000000002, 0.11526149999999999`, + 0.032480833333333334`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.14004525`", ",", "0.17289224999999997`", ",", + "0.048721249999999994`"}], "]"}], 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.14004525, 0.17289224999999997`, + 0.048721249999999994`]; + 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.14004525, 0.17289224999999997`, 0.048721249999999994`], + Editable -> False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Specularity", "[", + RowBox[{ + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.6666666666666667], FrameTicks -> + None, PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "1", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[1]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[1], Editable -> False, Selectable -> False], + ",", "6"}], "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.922526, 0.385626, 0.209179], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.6150173333333333, 0.25708400000000003`, + 0.13945266666666667`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], + "]"}], 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.922526, 0.385626, 0.209179]; + 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.922526, 0.385626, 0.209179], Editable -> False, + Selectable -> False], ",", + RowBox[{"Lighting", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"\"Ambient\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.30756835, 0.18676585, 0.147065275], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.20504556666666668`, 0.12451056666666668`, + 0.09804351666666666], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.30756835`", ",", "0.18676585`", ",", + "0.147065275`"}], "]"}], 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.30756835, 0.18676585, 0.147065275]; + 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.30756835, 0.18676585, 0.147065275], Editable -> + False, Selectable -> False]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.2306315, 0.0964065, 0.05229475], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.15375433333333333`, 0.06427100000000001, + 0.03486316666666667], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2306315`", ",", "0.0964065`", ",", + "0.05229475`"}], "]"}], 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.2306315, 0.0964065, 0.05229475]; + 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.2306315, 0.0964065, 0.05229475], Editable -> + False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"0", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + GrayLevel[0.3], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> GrayLevel[0.2], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"GrayLevel", "[", "0.3`", "]"}], NumberMarks -> + False]], Appearance -> None, BaseStyle -> {}, + BaselinePosition -> Baseline, DefaultBaseStyle -> {}, + ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + GrayLevel[0.3]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["GrayLevelColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + GrayLevel[0.3], Editable -> False, Selectable -> False], + ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "2", ",", "2"}], "}"}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"\"Directional\"", ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.2306315, 0.0964065, 0.05229475], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[ + 0.15375433333333333`, 0.06427100000000001, + 0.03486316666666667], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{"0.2306315`", ",", "0.0964065`", ",", + "0.05229475`"}], "]"}], 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.2306315, 0.0964065, 0.05229475]; + 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.2306315, 0.0964065, 0.05229475], Editable -> + False, Selectable -> False], ",", + RowBox[{"ImageScaled", "[", + RowBox[{"{", + RowBox[{"2", ",", "0", ",", "2"}], "}"}], "]"}]}], + "}"}]}], "}"}]}], ",", + RowBox[{"Opacity", "[", "0.7`", "]"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm], ",", + TagBox[#3, HoldForm], ",", + TagBox[#4, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", + Graphics3DBox[ + SphereBox[{0, 0, 0}], ViewPoint -> {0, 0, + DirectedInfinity[1]}, + PlotRange -> {{-0.7, 0.7}, {-0.7, 0.7}, All}, ImagePadding -> + 0]}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}], ",", + RowBox[{"LegendMarkerSize", "\[Rule]", "12"}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.8003378913384247`*^9, 3.800337929996578*^9}, + CellLabel-> + "Out[119]=",ExpressionUUID->"e9944856-87ad-44f0-bbbb-be64f5621e0d"] +}, Open ]] +}, Closed]] +}, Open ]] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["Archetypes", "Section", + CellChangeTimes->{{3.8003507012615557`*^9, + 3.800350705391283*^9}},ExpressionUUID->"1028af87-e00a-485f-a964-\ +e2195d7f72bb"], + +Cell[CellGroupData[{ + +Cell["RHF", "Subsection", + CellChangeTimes->{{3.800350720891529*^9, + 3.800350721372995*^9}},ExpressionUUID->"0f8b992b-493a-44cb-a5fd-\ +40fcffae4540"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"HREN\[Lambda]", "[", + RowBox[{"1", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.800351561760757*^9, 3.800351587477044*^9}, { + 3.8003532945490923`*^9, 3.800353296616446*^9}}, + CellLabel->"In[76]:=",ExpressionUUID->"cb1d231b-9c09-4092-8bc1-d377a5db8147"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["1", "R"], "0", "0", + FractionBox["1", + RowBox[{"3", " ", "R"}]]}, + {"0", + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0"}, + {"0", + FractionBox["1", + RowBox[{"3", " ", "R"}]], + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], "0"}, + { + FractionBox["1", + RowBox[{"3", " ", "R"}]], "0", "0", + FractionBox[ + RowBox[{"50", "+", + RowBox[{"29", " ", "R"}]}], + RowBox[{"25", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{{3.800351575187879*^9, 3.800351589379211*^9}, + 3.800353298123711*^9}, + CellLabel-> + "Out[76]//MatrixForm=",ExpressionUUID->"521a0cfc-7149-403d-8e83-\ +74257f630e0d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"HREN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.8003514243875523`*^9, 3.800351459357768*^9}, { + 3.800353309269043*^9, 3.800353312310116*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"8045d5c4-afe7-4fe9-8260-f1a06e8a7a3f"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["1", "R"], "0", "0", + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]]}, + {"0", + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]], "0"}, + {"0", + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]], + FractionBox[ + RowBox[{"1", "+", "R"}], + SuperscriptBox["R", "2"]], "0"}, + { + FractionBox["\[Lambda]", + RowBox[{"3", " ", "R"}]], "0", "0", + FractionBox[ + RowBox[{"50", "+", + RowBox[{"29", " ", "R"}]}], + RowBox[{"25", " ", + SuperscriptBox["R", "2"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.800351459798152*^9, 3.8003533143918257`*^9}, + CellLabel-> + "Out[77]//MatrixForm=",ExpressionUUID->"c8f4b82f-05a3-47ef-98c5-\ +1afb30ebcbf3"] +}, Open ]], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"\[Gamma]", "=", "0"}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"\[Delta]", "=", + FractionBox["1", + RowBox[{"3", "R"}]]}], ";"}]}], "Input", + CellChangeTimes->{{3.800351935033564*^9, 3.800351950725281*^9}, { + 3.800351981526742*^9, 3.800352003718802*^9}, + 3.800353389049596*^9},ExpressionUUID->"834eca02-582f-4ce3-bb96-\ +1b571a228597"], + +Cell["\<\ +Abs[\[Delta]] >> Abs[\[Gamma]] : this is a symetric zigzag archetype, this \ +agree with the Plot of the coefficients part.\ +\>", "Text", + CellChangeTimes->{{3.800352055095591*^9, 3.8003521550249233`*^9}, { + 3.8003534528158693`*^9, + 3.800353486555942*^9}},ExpressionUUID->"94c34547-b059-4293-aea0-\ +5471bfea483e"] +}, Closed]], + +Cell[CellGroupData[{ + +Cell["UHF", "Subsection", + CellChangeTimes->{{3.800352169843026*^9, + 3.80035217133442*^9}},ExpressionUUID->"0fd431af-23ba-4723-ad15-\ +7a48a0b7639e"], + +Cell[BoxData[ + RowBox[{"Clear", "[", + RowBox[{"\[Gamma]", ",", "\[Delta]"}], "]"}]], "Input", + CellChangeTimes->{{3.8003522482913017`*^9, 3.8003522617324963`*^9}}, + CellLabel->"In[78]:=",ExpressionUUID->"6cd46e1a-4338-4c46-ac1f-92df2f102ad0"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"1", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.800352185397801*^9, 3.800352185791136*^9}, { + 3.800353493956765*^9, 3.8003534967676373`*^9}}, + CellLabel->"In[79]:=",ExpressionUUID->"a9a22488-55d8-4a9e-bc82-97944583d0c0"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{ + RowBox[{"-", "225"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"59", " ", "R"}]}], ")"}]}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], "0", "0", + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + { + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]]}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{{3.800352181073542*^9, 3.8003521865121202`*^9}, + 3.8003534976580772`*^9}, + CellLabel-> + "Out[79]//MatrixForm=",ExpressionUUID->"7477b4c9-ec9a-4a36-8210-\ +6e64d98e7dd7"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"HUEN\[Lambda]", "[", + RowBox[{"\[Lambda]", ",", "R"}], "]"}], "//", "FullSimplify"}], "//", + "MatrixForm"}]], "Input", + CellChangeTimes->{{3.800352201390511*^9, 3.800352201698962*^9}, { + 3.8003535019331903`*^9, 3.800353504345255*^9}}, + CellLabel->"In[80]:=",ExpressionUUID->"d5c56810-e234-4468-a1fe-c75b8dec17c1"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{ + RowBox[{"-", "225"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"59", " ", "R"}]}], ")"}]}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], "0", "0", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "45"}], "+", + RowBox[{"60", " ", "R"}], "+", + RowBox[{"92", " ", + SuperscriptBox["R", "2"]}]}], ")"}]}], + RowBox[{"336", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]]}, + { + FractionBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], " ", + "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", "\[Lambda]"}], + RowBox[{"280", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Output", + CellChangeTimes->{3.800352202376692*^9, 3.800353505117051*^9}, + CellLabel-> + "Out[80]//MatrixForm=",ExpressionUUID->"36e713fd-6180-422c-aa06-\ +fc75a1d2448d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"\[Beta]", "=", + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]}]], "Input", + CellChangeTimes->{{3.800352232832694*^9, 3.800352245340536*^9}, { + 3.800352343460321*^9, 3.800352343738543*^9}}, + CellLabel->"In[63]:=",ExpressionUUID->"7fd9376d-cc64-47b3-a329-bfb72c76f804"], + +Cell[BoxData[ + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]], "Output", + CellChangeTimes->{3.800352348927875*^9}, + CellLabel->"Out[63]=",ExpressionUUID->"ffd163fc-1924-4599-8769-aaf637a07fe9"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"16875", " ", "\[Lambda]"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"1875", "+", + RowBox[{"8550", " ", "R"}], "+", + RowBox[{"900", " ", "\[Lambda]"}], "-", + RowBox[{"7039", " ", "R", " ", "\[Lambda]"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]], "//", "Expand"}]], "Input", + CellChangeTimes->{{3.80035253192638*^9, 3.80035257801448*^9}}, + CellLabel->"In[66]:=",ExpressionUUID->"9ce5eaf2-115b-4b61-86b6-90650d80f6ac"], + +Cell[BoxData[ + RowBox[{ + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"14", " ", "R"}]], "+", + FractionBox[ + RowBox[{"225", " ", "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox[ + RowBox[{"3", " ", "\[Lambda]"}], + RowBox[{"7", " ", + SuperscriptBox["R", "2"]}]], "-", + FractionBox[ + RowBox[{"7039", " ", "\[Lambda]"}], + RowBox[{"2100", " ", "R"}]]}]], "Output", + CellChangeTimes->{{3.800352536180687*^9, 3.800352578346717*^9}}, + CellLabel->"Out[66]=",ExpressionUUID->"1081430d-515a-472d-9c71-c51a1eb9901d"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Beta]", "+", "\[Gamma]", "-", + RowBox[{"\[Lambda]", " ", "\[Gamma]"}]}], "=", + RowBox[{ + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"14", " ", "R"}]], "+", + FractionBox[ + RowBox[{"225", " ", "\[Lambda]"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox[ + RowBox[{"3", " ", "\[Lambda]"}], + RowBox[{"7", " ", + SuperscriptBox["R", "2"]}]], "-", + FractionBox[ + RowBox[{"7039", " ", "\[Lambda]"}], + RowBox[{"2100", " ", "R"}]]}]}]], "Input", + CellChangeTimes->{{3.800352309626172*^9, 3.800352319837036*^9}, + 3.8003526160573893`*^9},ExpressionUUID->"a6315198-1693-4dba-a7a9-\ +7d086adc8bf6"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"14", " ", "R"}]], "-", + FractionBox[ + RowBox[{"16875", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"2775", "+", + RowBox[{"1511", " ", "R"}]}], ")"}]}]}], + RowBox[{"8400", " ", + SuperscriptBox["R", "3"]}]]}], "//", "FullSimplify"}], "//", + "Expand"}]], "Input", + CellChangeTimes->{{3.80035265705797*^9, 3.80035267180803*^9}}, + CellLabel->"In[68]:=",ExpressionUUID->"8715de4c-64e4-4333-89dd-e717ee5903cb"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Gamma]", "[", "R_", "]"}], ":=", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "-", + FractionBox["3", + RowBox[{"7", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["7039", + RowBox[{"2100", " ", "R"}]]}]}]], "Input", + CellChangeTimes->{{3.8003526852670193`*^9, 3.800352688516603*^9}, { + 3.8003528206689377`*^9, 3.800352827232439*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"e04607f5-a828-4356-a612-c66d2fe3204b"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"4", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", "R"}], ")"}], " ", "R"}]}], ")"}], + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "//", "Expand"}]], "Input", + CellChangeTimes->{{3.8003527211884327`*^9, 3.800352722968658*^9}}, + CellLabel->"In[69]:=",ExpressionUUID->"4a49486c-8597-4978-9a89-a6621e300c52"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "-", + FractionBox["3", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1", + RowBox[{"28", " ", "R"}]]}]], "Output", + CellChangeTimes->{3.800352723348968*^9}, + CellLabel->"Out[69]=",ExpressionUUID->"883091c1-e039-48c9-b0ff-e95bc361ea98"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{"\[Delta]", "[", "R_", "]"}], ":=", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "-", + FractionBox["3", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1", + RowBox[{"28", " ", "R"}]]}]}]], "Input", + CellChangeTimes->{{3.800352698524639*^9, 3.800352737123376*^9}, { + 3.800352830417364*^9, 3.800352835662073*^9}}, + CellLabel->"In[73]:=",ExpressionUUID->"ee43965f-298f-45d1-a648-e6c96be60017"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[Gamma]", "[", "R", "]"}], ",", + RowBox[{"\[Delta]", "[", "R", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotLegends", "\[Rule]", "\"\\""}]}], + "]"}]], "Input", + CellChangeTimes->{{3.8003528119460382`*^9, 3.800352880012958*^9}, { + 3.8003529333689137`*^9, 3.800352934201359*^9}}, + CellLabel->"In[75]:=",ExpressionUUID->"08913359-9bbb-43bb-b9ff-d738ea1d4a49"], + +Cell[BoxData[ + TemplateBox[{ + GraphicsBox[{{{{}, {}, + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwBwQE+/iFib1JlAgAAABsAAAACAAAAkWLpMVFPzr/x9YZuCengv1h8vQan +I86/CN3ZnJ6C4L9AJJyM3JnNv2BX8aN4ht6/DnRZmEeGzL+AEwgf8qbZv6oT +1K8dX8q/MErRJEZc0L+eZ8NyOBrKvwAGQBwUe86/kbuyNVPVyb+A6PE/N0LM +v3hjkbuIS8m/oEJXHTDex79Hs07H8zfIv4AKVNQmmL6/5FLJ3skQxr8AMwlD +0W+APx2Svg12wsG/EPlsQ/Gazj8U4IvtuXfBv6j7RHI4PNA/Ci5Zzf0swb/Q +QCPoyCjRP/fJ84yFl8C/GAfpEWz70j+hA1IYKtm+v4Aluu4rh9Y/COMmFWgt +ur9AAX5Q/zvdP/V+wdTvl7m/eB5xAqQJ3j/iGlyUdwK5vwg2gWdX1d4/u1KR +E4fXt78wA0xxfDPgP27C+xGmgbW/bO7+rMW54T/VodAO5NWwv9Qud8p/muQ/ +wj1rzmtAsL9IOvMSnPLkP12zCxznVa+/oPjneNtJ5T8QI3YaBgCtv2BjgiTK +9eU/dwJLF0RUqL8AhA8MlEPnP4iC6SGA+Z2/hL8BaTm46T/MPFqWWg6Vv1SE +huOfweo/vT/iUg== + "]], + LineBox[CompressedData[" +1:eJwBoQNe/CFib1JlAgAAADkAAAACAAAA5sGsVUnt9D9UhIbjn8HqP/oBZlAG +rvY/SZtMMo1F6D9k0VcTFf74P5+P88QxTOU/ZoNLjD0m+z85d32E9sziP1Jl +Tx4dff0/enZumVVi4D/VKVVmFqz/P2cwa61gxdw/IY+1Y+MEAUBvz3kK+/PY +P9zcw/83LgJA9/opx4es1T/jG9N2mUMDQIr8CG1r/dI/33JqelZwBEBUbL13 +dnHQPye7AlkgiQVA0bYCYDi8zD/zVh6jZpwGQKH6lBBWKsk/swrCeQjHB0Cq +PqDQ+8jFP7+vZiu33QhA2IF1hWIJwz/AbJNpwQsKQPqNtvXAccA/RX1DE0g0 +C0BD5ClZHXu8PxZ/9JfbSAxAoTC51oXmuD/cmC2pynQNQE+r0+yfhbU/7qNn +lcaMDkAGMsz+CciyP4QCJe0+nw9Ayx51tMFusD+HPLVoiWQQQCNu79Kfbaw/ +cnBYyHnvEEAwVtPwM9SoP1ewP+4XhhFAAZxEZVxwpT/iaKeBvBISQC7+9f0e +saI/L8vQSp+cEkAJDw/BFlegP3Y5PtovMhNAz+RUQZE+nD9jICzXxr0TQGA+ +VYYMppg/SxNemgtVFEBBff49OESVP/WvUZOO6RRAG62vAsJlkj9FxcX5F3QV +QMa7QRgsEpA/j+Z9Jk8KFkDoqLHLQMKLP3+AtsCMlhZAL4pGHyc1iD8xxLCQ +CCAXQD35aV3eKoU/3hPvJjK1F0BnB2+Xk0yCPzHcrSpiQBhAHEwxAMXyfz/u +D8Sqz0IYQIaylmlo338/rEPaKj1FGEBGy+aNF8x/PyarBisYShhAs8fi6pil +fz8cel8rzlMYQMHCezAnWX8/CBgRLDpnGEAoTrTJa8J+P95TdC0SjhhApDVW +DGWdfT+ch4qtf5AYQCjwNWJyi30/WbugLe2SGEAJWNyXinl9P9QizS3IlxhA +8qgqiNtVfT/K8SUufqEYQLIaasX+Dn0/tY/XLuq0GEDBukoERYN8P3LD7a5X +txhAAxgXSf1xfD8w9wMvxbkYQKjAKAbAYHw/ql4wL6C+GED/r8PPZD58P6At +iS9WyBhAz2VE8Cr6ez9eYZ+vw8oYQH6FjEY26Xs/G5W1LzHNGEC1msziS9h7 +P5b84S8M0hhA8QJW1JW2ez9UMPivedQYQKtqOR3KpXs/EWQOMOfWGEDN7EiT +CJV7P86XJLBU2RhAf+9aMFGEez+MyzowwtsYQDKTSe6jc3s/tHWdlQ== + "]]}, + Annotation[#, "Charting`Private`Tag$25304#1"]& ], + TagBox[{ + Directive[ + Opacity[1.], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], + LineBox[CompressedData[" +1:eJwVlnc8lt8bx59FGpL9JF8hCllpGeU6yAiV7PE8dyWUSJJKoaSyQvaKUNIg +JETUMZNKGYUou+y9R/ye31/n9X5d9znX/flc17leR8z2grE9hUQiOZBJpP+v +PxVJTbJW72Bixs9l7UAnPu//vPgMoxwW/PI36a/twB8838/8e1oOlyuLshQb +27Goa6NC1FQ57CX/l+ye1I6/W/57XBpUAWldDye5d7djVZnjwZuLKsFUoIES +bvsbc9TOMz7zV8PgSUXlzQ1tOI1Hb0X+22fwzRvlNBhrwSvsTOUqoS8wXWzg +/6aiBVsuXXSzcfgCMu0a2y7EteD1vQ/++v/7AvV7S0reabZgt/yxr507vwIR +ouD5KaEZi2Z+Pnb4UB383vVSZK9lEx49ekl0KaUBLA1NGrjZvuPg3aOf+D80 +wNqCsrKE7kYsTXe8rDjUAFHLa9iI0kZs10V8st/bCNtLApbDvRrxz0v67nU1 +jbA+uWvtk7kGXBkn9vHJ5HfY/aQnSGK+Hid0f7tgdKgZBPyfvN8kWoeVq/WF +nBybQcXxdpsirQ7/yKiqvBvaDAYcdF1S/Te86XLx5uKWZvil9H7Y7PQ3fHfN +0wrJ8y2g6ZEjZBz8FbvK3hBciv4JXvfEP64Z+4J1rsjiJ31t4HLJOPrcVA3m +vLaGTXPdL0i/RjtkVVODv3t267fL/oL+APUTQck12PZWXJOA2y844tunnGtY +g72DaaP+y7/gSoeLLOeLjzjv0S/hc9ztYDsgXR7rWo3Dz+gcjP2vE8INrahM +mSo83b/75B/5TtB4aXesdU0Vtjwndns36oRQykGR0D+VWOT88sdvtp0Q/Mxo +JDa1Eme65ZpyPOuEA4QH507hSvzRW8T5mlIX2GcKD7NvqcCrkbMJNrrdIFp6 +YtHpYBnujsm8stW6G4KZJ6uKRcpwZbytcY9zNwTIp0siUhkOSv661imiG8h7 +c+BPRSnmy0j3uP67G+Tok/KxR0qxTLm5efylHujt+yec9P09Nh8v4G5O7oWR +BXucEFKMVaacRxJyeyF8OmqbEKMYC8+K1xBVvQD2ly+OyhTjrqVQn7+DvaBa +qxoQWfMWO685Mzaz9w9cuKq1tnTdW+wrIljL9+UPaCfpZUglFuIsw6sBxvN/ +Qco3wiFhLh+nE793Na/tg8LuUypmDfk4yVWrzWZLH/jEXWkyeJmPg6O45O3V ++6Bx3fOpwdP5+Nyvp41X7/SBzLtyj7+NeXi7c4tI0qZ+qPsS6u/7/jVOuqeS +3yc1AIuXynMHi1/hqKRkwlmVxXtagi8mvcLB2WwcEwYDMDtZaSt98xW+3lhv +vegyAMYLqp9ltF5hyy3nSJz5A6DaqCrtXJvD8ivBQEljEH505s8e/ZGNgz8t +dXlZDUE7F0elQHAmLuEWMn5+bgi25/DVathk4mFL5fIfnkNQp/vgX5FMJjbo +c38k/3AI1rlozdz/lIHX0UZtO7uHIDaLeriKMwMHHOzs0XIehrfBGjLjqc/x +nZzKP+tujoDrkyRZtJKO8+a6zfaHjYCRNv/snqZ03KtO/nA6dQT0/r5UdsxK +x1q1B9NLKkZg2OT1w9AT6ZgyWODgwjEKQ1efaJdXPsE+25731YePgnjc7WfX +EtKwZ0zIQFzaGESateVmuD7CMifcedTejEGG7L83vEce4dYdNmq/a8ZgPEtD +oUj6EVYukgoRGxuDme0bm972pOLFkVP0H8LjIOVW3RxinYoLNv0rZp4Zh63B +py9tMUnB8ua7qReWxyHMX/nJtdZE7Pc2XbCUbQLauQWfyKUm4t8iQrLcXBPg +8HhIUPtsIg7uI5m9FpuAOVm1wgdzD/Cgx9f0OZ0J2PDVqvaH0AOc/sBR3yd8 +AmQarETH3eLx1q7k8PDtk2DKrWYWZB+DSUeGNmgpTMKhV6/tQ1VjcHfhvoDp +/ZNA9Bjfb+GKwelhtTcsDk+CGu+s+8HiaCyPlpz+c56ElawdKQf5o7F6srnO +81eTcCVZ2vTtj0jMYHIulR6YgmcaLQG/74Zj9RrLK27aU5B28oFVm204Ft2b +NrHt6BTYKSjk8qBw3LtBrd/vxBQclXgQJrsUhp1Kzv4w9J2C5QpVVap7GL6+ +pTK7pXoKXpkevdfREYrjfl63GzeehlaybMyi8D2s6idTwmBMg+4zHV79jiDc +ptTKW2M/DUJVGm4cj4KwSLBKRarHNAjaVnd+lQrCaerzYiYPpyHaMp7HRS0Q +5zy+3JE/MA1Gjq2nzN39cc15V2tPnxnYEukowq14B58TEs3tC5yB5mzf6t6V +23hD9be1ppEzsNHldj/319vYSFShSDZ9BjQ43eSvnL+NmxpGBNs/z4CuIZue +eY4v7t7v9AMJzoKhLaVzSvsWXiQ7GLFnzUJa09uCZCtvrFxz8Z7Om1noV2xx +/bPBG18O8/7gVzoLeRNGugWlXnhcJPrAmsZZULI4nToj7YX71CqlOOZngUND +s7qe4om/XxYnr9OcgwOvPVJVaz1w9kD7K86mOXDQOx4z9t4dD+cMDh/pmIN9 +5Cczo7fcsYzH7I7Q/jlQzAgbJLTdcTr7xocbl+bAtiQ0KaT2Ek7cdjCIS3Qe +6D9uP+XuccNBzAe23OfmoXE6QJlP/CK2q7fg5V+Zh+mVgfc3mpywbIpafj77 +Avhq7kxz8nLC0y5bLcy5FkDJcdPqrLgTvrOhLyFWdAFyvNNk/1w8h9N0r4gL +aS2Azq9AG5qgI+59F7Vra8ACFCroBFz3dsD2L+qPSfMsQu7LzbPTeaew/LX8 +iRqhRTCy9ufucz6FZ3XjI89tW4SWsdc8NpKnsN+fk80ZexZBtZAcWhV7EqeL +jhPyFosgHL9GT5jtBP4bs9Fld+IifCwbM77Zbo0dbhsEH9y+BGl9+yW7wASP +RkSui1dYghQNh/gnFcb4yqO2gGnlJZjvOrXHTs8Y3y1zupthsATCxdbCNabH +cdrqvRubLy6Bx+UbVPbJo7jL84vrTPES1OVYakW36eKz9/jGjKqWwFKMf6GF +pIvHExjnM78usfwMPvt7hw4mvR12PN21BHrXpw4Lex7CIvMbTtezL8PZa0c5 +RPZpYIb7EbOXx5dh07sf2Zpze3Hv7ehGDptl8Dn5nUP46h7sHPn7uJ3dMrhe +RiubF5WwZ+75o1uuLkPdid/N59cq4oTxEN3AxGVIOXJ1sjheAjc7f1Wx71sG +UoQ1V+qbHnVj+2Mi/3n/A59bfuw0xh6w87pA/Xn3H5TeWgzgcdkLVyLv90eF +/oOT3/ZvHfXeBwll33I3pPyDsD6XWaFYZej+z0h3ufwfKKoUb83OPgCXmoxc +2zhWQG/e75eDuib4jbiaxXKzWDrB93mBJsTRwlVNhFbAiLf5+KicFpQo1dM+ +71wBKT+T2TubDwHt/vH4t0dXQPlaezjvH22I0jUuj49agbPrlbIEjx2GdMLt +qVnSCuSktg6pFR6GwssRwdzpKyAqKGTjKaoPvx43mAe+WYE6re7i46P6IEEy +GfJoZZ2/1f323ZuGkFdowmcpugqF/o8SD187Bj+kzRwEMlcha++C0aCjMaTf ++rkjJH8VFCUEAn9EGYPHT+YAFa/CAT/9ThNsDMKBDs4T9avQ6jJM5eQ1Adv+ +q25f5lYh0Ufvhl++CXiYHIEyMRIqtL+0eKDPFE7d5Erx2k5Consu6+StNwP9 +jHqS8k4S4nm66vVJwQyEqeblWXtIqN/T7GLTFTPAuYR2oi4Jsev6v7hJMgd2 +HleDq+dJyFRlQPElxQLGDiplKrmRkPCdkm12YhbQ4ji9YfQKK26kmVAJFvCi +zOOrnQ8JMYrqw+94WsCRi7eOG0eS0J0rgUPcYxYQVRdhIVdEQtOtf3v7P1iC +97JpYf87Elqs2tTi02kJDlKCm9PKSegAEfH984Il7Pd50Cr0hYTMIzZKee+0 +glaFNCZHBwnRdkcWMu5Zgdj9/NM9NDIy+tThFHDQGiw/ShYErCWjgsbiTkVj +awglx3DIbyQjidcM21gHa1i+dOWlhyAZ9RdauKeEWkOL5f45Thky+vjYkZzT +Zg1h4kVBysfIyLTlR8rOczZQbSP9+7cJGWlyz3kPX7eBlah4hduWZCRUKpvt +ds8GnNdc/157iox+HTOpqsuwAd1hVZHT7mQU9i4nsWOA9X1+yauQeDJCVckB +aTYM2DsmS9v9kIzeZmvlDJ9lgLNUknnLIzIatbxRSLrCgNYE7yXxTDLSOSU0 +G3KfAQU31bUL35ORlMnhet1SBowUZsUyK1h6LVNeLnxmgMSkyCDlIxkJxES5 +Xm9mQITdauiRejLi8zsuNjjCgPOHS1u6e8jIb7O/YTCdCWm+ijsD+slonCPW +B4szobU4xVtuhIxeFFpcq5Rlgp78LXGPWTKq5A8S1kZMkODVdOZcS0HKQnrl +MvZM+PWrYnW/PAUVKvi6NKQzoWVzyt0QJQqy++x+9vNLJnw391rfs4+CdosV +vEvJY8KXuj2CoUBB7tXz3l1lTHhX+US+14iCDI26rcpbmfCW7JunYkZBi+8D +9j7pZEKBOqF634qCNoTWOzr8ZUJWoYCOqi0FqfP4N96ZYMLDTH9m2CUKCtzV +aKnMTkDCwOmeP1dZ+x2jn/OtJyBmO3JU86KgZa3E/fVcBISmzLv/vUNBJWH5 +s0N0AoJ+f19UC6SgkXjvRP3/CPATeuUTHkJB/WGzZ4PECLgZ5Rh8IIaVT97V +JkuaAK96bZ6IBAoKitKdipAjwGOjeFzfQwqi3boRbbWLANeA1scRTynIw6K1 +JUSZgJNeBsX9hRSktjbaIU6bAEbRDg31dxSUOy1zIlKPAMtZanVkGQUldH2j +uxkQYORa0qD+iYIKGnaltRkRYPgyzjLqKwX9jQ7rcDAhQG/QvX2ggYJsf2tm +N5kRoGEnNxjVRkE6oYZtdtYEqKeudR3soKDxOy8e3mYQoNr+ZwZ6Wfrp5yr9 +CQL2bSn3jO6nIBMuzZsXTxKgZPmQPDRMQaUacWQNWwLko6/7owlW/i2+3rOn +Cda7zJwzZoaCBASqJCLsCRA35NqsscLSc7njrddZAkQChx7GUKio9ETB+i+O +BAh9qJYYZqeiyrN/DShOBAhQ015orKeiP+6ZGVudCeBBPoqxXFREOzpvLXGe +gI3ejIJhXiriFjofuMmFgHVvlQ9o0qlope6UQy+L2ef4ymOFqWhvbpdoygUC +KHsmdEdEqei/osw+LVcCVlxrazUlqYiXW3ngG4sXXz43iZOmouSALJNDFwmY +Hbz7c0SOiki0CdNUFk/usD2hpURFy6MxQn0sHrVT/xO3j4r4skbr+d0IGEwV +chpVpaLRjStP5Vj8t312XAuoaF+hb408i3u2NF6J16Ki1LhJ280sVr/Wdc5Q +j4petaORftZ5CU1jxKohFcUr0s48/H/+3SvGucepKC7wyxpVFhuHb9C1N6ci +Ho0a9hLW/2aNCqnRbahoPKMmQYLF6wylFT6foKLhkoOLl1h6HZ7v33bDjooa +Hu+zecHyo5xdR3CXIxU9cjozVc3yT8TOdH3veSqqjZWc/8Ly93qZ7WqMGxWZ +lzo+LGL53yRycerwVZb/snVCoedY9fa62bfsydLvEp+qz6pX6M+QtmwfVj2W +XjiMnWHp35f4zfYuFZ0vvZ/k5UDAo4nCNx9DqUgy/aDccVY/rBytzvCMpKI8 +C+ZQ3CkCrDN/JMvHUVFw6MqfmhOs+p6Z9I9KpaLyxRcW/TYEuFSSvHTTqehF +97FdTVYEfBLjcl18QUWxTS82ZFkQ4Ptrp+XJPCryjFwTJMzq73YVVUPeIio6 +YTB/7zWr/1Vj9dCHd1R0as2NY3uPsup33F5KtpqK9mwKa15g3Z9T1Q/n535S +0bnib6v3DhJQIvFy+EU7FUX4v5a4oUoA3be4k9lDRR/qLnsy9hNQd6DlY8Uw +FcXwfXJtVyQA5XLH31+lIl9+gcPL4gQkcomGaNJoyOzAjVrTrQTMO8vfmuGg +oaMfTToTthCQs8PA0YaHhh6GD1mN8xIgmnRHZYckDbWs3yZdRWXNh8UIuVZp +GlrbY50dusqahxapYiHyNPR3SxOn7hITwnjer53aT0McTKmpO5NMIAXM/Xyv +T0OTvp2ZKqx51+F27rq5Kw0lJDicfVbIin/vTS1yp6G2i55xn14zQXzviRrh +azSUJ+XR05HFBLs5E3rPLRoSVvVQ701jQr/nwYILkTQkyqMiaxHGhIk7myYD +Cmgo6fURxxU7JlBjCxyLl2moN++hAic7a57PK4aLkNlQOPXV8+pVBuhYZRTe +YmND7gMXgzwWGBCwJWWN3kY29DfsePu7YQZsSAl88n0rK+4vbvOzgQH8zxld +I5psSE/gnd+ZJAbsKKZYiQayIeX12cNXZRkQI73T7XwIG6K2X+o7KskA9jiT +e2/D2ZCi/XflrSIM6HVPe2eawIZ6NA7tyORiQIq8jnhgBhuiNRttuzZpA0KP +AocmatnQKyeB4tECG+AM3HSjgocdBc9uyilWs4Epc5HHDons6AdvkauosjW8 +Xld+jaN6DSo1VdVr67IAnO2w881vDpT4TOWj5HMzKHWOdCxbvw7x9VntkjQ2 +AW1vLV69PevRh8TrauZSx0Hg5nRsm94GBE6bGc5RR+FXnNzzT+6c6KrZQrB6 +tz6MPj4T/SF4IzrcpjJBqdKFOxTJEfVkLnRjobMgiE0b/A/knw2024TaHl+l +pTE0wc3V8uO1sU2ouuhSB0kagUUOjAr6cSPOoM23zggdgO6zT2+V8PCgaMms +M6qPlUHhc51+ciIP2r9/D1PxMeu9q6LeqqDEiwLkN6ZXVCvBaVHZ5g/veNE9 +/v7rMxcVwYCXSFhvxof4w8vYL1+VhZns45GhA3yobed0xkiOFGhXVS0IuvMj +g6+TnepJknD/r/f2Y+sE0KLJfA5fnjjc9CkoDY4RQL4JBlXi5qKwqzInjENU +EJXJLfs/eiAM7bxj25XyBZFus4Tmrgo67Pr1UsYW0ZGyFVnp1GN+GOWqfPFN +k442PvlsaxPDD5larTIHtemoiFJvzQzkh+0Z7Dvp+nSkaaQT6nGBH4Svn9j5 +1YSOzGO8b68/wA8cdG5Z1TOs/YkpeclNfNBu4i7HE0pHfEzKNltuPkj0D3p5 +M4yObEaVwg3Z+MCqOEVuJIKOAoORivoCL3wXr5X7GEtHQ49GJPd38cKnCUn5 +G6l0JF07sXjjFS/k32+WH8yjI67IxL+2JrzgVjGSZfGGjgSeL8+/1+UFxTmq +QlURHY1cVKOIH+CFF4SiQsp7Osov7u9fluCFFLlABfOPdCRXFxrFNscDxKnk +7IpPdPQv4eRQ3BAPbInOV9hVS0f6Epfpuzt5IGa5S2FDAx39Tj/0x7OGB0wV +57OvfWf5cXPaS+Y9D3DbbVTsa6Kj6sa61o5cHvgaK5Fj+pOOIht+Lj54ygPB +n1UVy9voSGyW+yeRyAP/A0qAiqc= + "]]}, + Annotation[#, "Charting`Private`Tag$25304#2"]& ]}}, {}}, { + DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {None, None}, + DisplayFunction -> Identity, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "ClippingRange" -> {{{-0.6931470395853477, + 6.214607957447594}, {-11.081898426642045`, + 1.4494697535923777`}}, {{-0.6931470395853477, + 6.214607957447594}, {-0.5284468802198586, 0.8361358112198425}}}}, + DisplayFunction -> Identity, AspectRatio -> + NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> NCache[{{-0.6931471805599453, + Log[500]}, {-0.5284468802198586, + 0.8361358112198425}}, {{-0.6931471805599453, + 6.214608098422191}, {-0.5284468802198586, 0.8361358112198425}}], + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + FormBox[ + FormBox[ + TemplateBox[{ + RowBox[{"\[Gamma]", "(", "R", ")"}], + RowBox[{"\[Delta]", "(", "R", ")"}]}, "LineLegend", + DisplayFunction -> (FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.368417, 0.506779, 0.709798], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.880722, 0.611041, 0.142051], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + InterpretationFunction :> (RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.368417, 0.506779, 0.709798], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.24561133333333335`, 0.3378526666666667, + 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> + None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.368417, 0.506779, 0.709798]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.368417, 0.506779, 0.709798], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.880722, 0.611041, 0.142051], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.587148, 0.40736066666666665`, 0.09470066666666668], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.880722, 0.611041, 0.142051]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.880722, 0.611041, 0.142051], Editable -> False, + Selectable -> False], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{ + TagBox[#, HoldForm], ",", + TagBox[#2, HoldForm]}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), + Editable -> True], TraditionalForm], TraditionalForm]}, + "Legended", + DisplayFunction->(GridBox[{{ + TagBox[ + ItemBox[ + PaneBox[ + TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline}, + BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"], + "SkipImageSizeLevel"], + ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}}, + GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}}, + AutoDelete -> False, GridBoxItemSize -> Automatic, + BaselinePosition -> {1, 1}]& ), + Editable->True, + InterpretationFunction->(RowBox[{"Legended", "[", + RowBox[{#, ",", + RowBox[{"Placed", "[", + RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", + CellChangeTimes->{3.80035288101691*^9, 3.80035293534479*^9}, + CellLabel->"Out[75]=",ExpressionUUID->"38bab27b-9172-4867-a690-cffcf270d3a1"] +}, Open ]] +}, Closed]] +}, Closed]] +}, Open ]] +}, +WindowSize->{1200., 636.75}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, +TaggingRules->{"TryRealOnly" -> False}, +Magnification:>0.9 Inherited, +FrontEndVersion->"12.1 for Linux x86 (64-bit) (March 18, 2020)", +StyleDefinitions->"Default.nb", +ExpressionUUID->"258ac4d8-b0ae-4397-904e-d65bf4609214" +] +(* End of Notebook Content *) + +(* Internal cache information *) +(*CellTagsOutline +CellTagsIndex->{} +*) +(*CellTagsIndex +CellTagsIndex->{} +*) +(*NotebookFileOutline +Notebook[{ +Cell[CellGroupData[{ +Cell[580, 22, 157, 3, 89, "Title",ExpressionUUID->"16dce8c1-32b6-49d8-81b0-4ab61451eb68"], +Cell[740, 27, 416, 11, 42, "Input",ExpressionUUID->"80ad60af-86a2-4fda-8827-489ce9a5dc31", + InitializationCell->True], +Cell[1159, 40, 358, 9, 42, "Input",ExpressionUUID->"e3c918f7-5418-4fe0-a7f0-83630d2402d3", + InitializationCell->True], +Cell[1520, 51, 726, 16, 82, "Input",ExpressionUUID->"4b3fa302-b0b1-4b48-afcc-dd7d3cb6f69e", + InitializationCell->True] +}, Open ]], +Cell[CellGroupData[{ +Cell[2283, 72, 169, 3, 89, "Title",ExpressionUUID->"d67f97ba-1e03-42ba-af26-2ba27f192a75"], +Cell[CellGroupData[{ +Cell[2477, 79, 224, 4, 60, "Section",ExpressionUUID->"3c74c21e-9502-4bc9-a659-650e70b4ea0c"], +Cell[CellGroupData[{ +Cell[2726, 87, 418, 9, 45, "Input",ExpressionUUID->"d885c70d-1710-499c-a414-e4316bd418c4"], +Cell[3147, 98, 1155, 30, 70, "Output",ExpressionUUID->"d5fead00-b3a6-4446-b4ca-0ce7b6b6d160"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4339, 133, 790, 17, 82, "Input",ExpressionUUID->"a18716d3-6a39-495f-8f4e-6a966becdb15"], +Cell[5132, 152, 2238, 60, 70, "Output",ExpressionUUID->"692af3ef-045e-4764-8352-7f7255bd65ac"] +}, Open ]], +Cell[CellGroupData[{ +Cell[7407, 217, 534, 12, 63, "Input",ExpressionUUID->"e45051e9-76b7-4644-ab40-79b851ee4e1f"], +Cell[7944, 231, 1318, 38, 70, "Output",ExpressionUUID->"5d5c64b4-8720-404c-aa67-eaa2ad14bff5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[9299, 274, 487, 10, 63, "Input",ExpressionUUID->"82d466d4-7d32-479e-93a7-5759e9c1f0d8"], +Cell[9789, 286, 831, 24, 70, "Output",ExpressionUUID->"2218a806-c790-41d1-8dbd-4d365289cad3"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[10669, 316, 167, 3, 48, "Section",ExpressionUUID->"844fe8d0-f3cb-4eb1-9e94-a26f5035c4ce"], +Cell[CellGroupData[{ +Cell[10861, 323, 6204, 190, 175, "Input",ExpressionUUID->"c9b257fd-5638-4f66-ba9e-a268c80376cb"], +Cell[17068, 515, 395, 10, 23, "Message",ExpressionUUID->"d364e640-37f9-4f76-9665-427d6edb053b"], +Cell[17466, 527, 1058, 29, 46, "Output",ExpressionUUID->"7cfbeb1e-1755-4c48-a5c2-f45e30e03619"] +}, Open ]], +Cell[18539, 559, 4857, 150, 134, "Input",ExpressionUUID->"f3e4fc84-acd8-47e3-a94c-8b95c14b97ab"], +Cell[23399, 711, 2289, 73, 88, "Input",ExpressionUUID->"28efe04f-fdbf-4afb-ad7d-2abba99fee3c", + InitializationCell->True], +Cell[25691, 786, 657, 20, 31, "Text",ExpressionUUID->"13696ba3-1f41-49ff-b5aa-247dca623925"], +Cell[26351, 808, 2128, 68, 88, "Input",ExpressionUUID->"8fd7199b-136d-46ea-b887-2f3fba74f761", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[28504, 880, 232, 4, 40, "Subsubsection",ExpressionUUID->"df63035a-1fc6-43ef-a84d-d3f08d517f21"], +Cell[CellGroupData[{ +Cell[28761, 888, 525, 14, 26, "Input",ExpressionUUID->"63b49f2e-34fe-45b8-9472-e38d5bfd391d"], +Cell[29289, 904, 420, 12, 70, "Output",ExpressionUUID->"0b91233b-d1f4-4af1-baad-4f1c5b2f4926"] +}, Open ]], +Cell[CellGroupData[{ +Cell[29746, 921, 2033, 55, 176, "Input",ExpressionUUID->"846899ea-4557-4a5d-a656-61004b83f6f6"], +Cell[31782, 978, 1397, 48, 70, "Output",ExpressionUUID->"3eb3b03a-f6fe-4027-a3f8-f07757fef3b7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[33216, 1031, 882, 23, 45, "Input",ExpressionUUID->"6d0f8a35-4401-473a-9174-b9f5cd75aa52"], +Cell[34101, 1056, 667, 13, 70, "Message",ExpressionUUID->"e4c9d9c7-11a8-48da-9c56-31ede496dfe7"], +Cell[34771, 1071, 667, 13, 70, "Message",ExpressionUUID->"7669b32b-557b-431a-8e5d-657ac4d4e959"], +Cell[35441, 1086, 648, 13, 70, "Message",ExpressionUUID->"8f727b4f-ae13-4277-9660-4019ee9fb558"], +Cell[36092, 1101, 458, 10, 70, "Message",ExpressionUUID->"2e17d0f1-44b7-417a-a615-3cd938948c77"], +Cell[36553, 1113, 1445, 49, 70, "Output",ExpressionUUID->"157d73c1-19c0-47cb-872c-82cc90436f66"] +}, Open ]], +Cell[CellGroupData[{ +Cell[38035, 1167, 2198, 58, 176, "Input",ExpressionUUID->"39a76bda-9b84-47c4-aaac-115b2fa0ab3c"], +Cell[40236, 1227, 180, 2, 70, "Output",ExpressionUUID->"096b7e94-d759-42a6-85de-99710d182c3a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[40453, 1234, 907, 24, 45, "Input",ExpressionUUID->"55ebc313-238e-4414-bd29-e68cc73a5644"], +Cell[41363, 1260, 1607, 55, 77, "Output",ExpressionUUID->"8d3a171f-015b-4cd5-af3a-e0cf8295d1fd"] +}, Open ]] +}, Closed]] +}, Closed]], +Cell[CellGroupData[{ +Cell[43031, 1322, 276, 4, 48, "Section",ExpressionUUID->"0f3a9cca-e608-42dd-8cc4-19f13235aa5c"], +Cell[43310, 1328, 412, 10, 26, "Input",ExpressionUUID->"b8072621-4f64-4c90-aec6-7e04d8ad9729"], +Cell[43725, 1340, 172, 3, 31, "Text",ExpressionUUID->"a72092fd-cf0d-407e-823f-afea1402ca86"], +Cell[43900, 1345, 1015, 28, 99, "Input",ExpressionUUID->"934d15a4-507b-4f5d-8a24-2d5e42913e70"], +Cell[44918, 1375, 185, 3, 31, "Text",ExpressionUUID->"5e1f8c76-898e-44d1-a6a6-d54937a3c5db"], +Cell[45106, 1380, 1033, 31, 96, "Input",ExpressionUUID->"f7215fc1-fb84-4352-96f0-625f766b6f63"], +Cell[46142, 1413, 199, 3, 31, "Text",ExpressionUUID->"0b76a565-f848-4a42-9110-3696e691a3b8"], +Cell[46344, 1418, 1415, 39, 63, "Input",ExpressionUUID->"dab43983-d755-4b03-bafb-790ad3657b6e"], +Cell[47762, 1459, 197, 3, 31, "Text",ExpressionUUID->"5faddd9f-47a6-44e1-a54e-f2d4e1fe5b45"], +Cell[47962, 1464, 1531, 45, 74, "Input",ExpressionUUID->"1972c041-98b1-4941-94dc-257513a35524"], +Cell[49496, 1511, 356, 9, 31, "Text",ExpressionUUID->"75e70534-a77f-4fbc-bbfe-3f61c923d1bd"], +Cell[49855, 1522, 327, 5, 31, "Text",ExpressionUUID->"54fc6b45-7f4e-4fb8-acaf-5b00791f14c0"], +Cell[50185, 1529, 1148, 28, 116, "Text",ExpressionUUID->"2d67f35a-a8f7-4395-9db6-aada87889d6d"] +}, Closed]], +Cell[CellGroupData[{ +Cell[51370, 1562, 179, 3, 48, "Section",ExpressionUUID->"88d1b6b5-5bea-4e44-ac1d-422fac666e30"], +Cell[51552, 1567, 1815, 53, 86, "Input",ExpressionUUID->"a5619f0a-81c8-47b4-bc04-0f01cf0e4e32"], +Cell[53370, 1622, 162, 3, 31, "Text",ExpressionUUID->"4a723b0a-595b-40e7-a718-b8dceda3c167"], +Cell[CellGroupData[{ +Cell[53557, 1629, 2758, 85, 94, "Input",ExpressionUUID->"2c510fb9-7815-465e-8275-3af213e72b3e"], +Cell[56318, 1716, 648, 13, 23, "Message",ExpressionUUID->"188c0920-3ba6-4be8-bd1e-c12e32ee6c39"], +Cell[56969, 1731, 646, 13, 23, "Message",ExpressionUUID->"63c996d4-5549-48a1-8127-af639bec2f9d"], +Cell[57618, 1746, 648, 13, 23, "Message",ExpressionUUID->"6e3e76eb-b38b-4b08-9424-4c2ad8375465"], +Cell[58269, 1761, 456, 10, 23, "Message",ExpressionUUID->"ebb5ac60-e8d3-4550-8ff9-48d3268fa57b"], +Cell[58728, 1773, 842, 24, 48, "Output",ExpressionUUID->"92a2088f-cc7b-4037-b9c7-d3578f2988b6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[59607, 1802, 329, 9, 28, "Input",ExpressionUUID->"85af60a7-84f1-4bf3-84e4-8b303f58a7aa"], +Cell[59939, 1813, 5989, 170, 161, "Output",ExpressionUUID->"d566a9d5-cc70-4ca9-bd59-bb86b782151a"] +}, Open ]], +Cell[65943, 1986, 156, 3, 31, "Text",ExpressionUUID->"d228c982-60f2-4308-8c3d-a729ff0d9551"], +Cell[66102, 1991, 453, 16, 50, "Input",ExpressionUUID->"24b1c0ba-b8f6-48b0-a919-960805693e6b"], +Cell[CellGroupData[{ +Cell[66580, 2011, 253, 4, 26, "Input",ExpressionUUID->"cde28f95-f4aa-4c06-835d-e9e835badcd3"], +Cell[66836, 2017, 217, 4, 30, "Output",ExpressionUUID->"5f2482cb-270b-44d8-9815-1058327d746c"] +}, Open ]], +Cell[67068, 2024, 169, 3, 31, "Text",ExpressionUUID->"be4eec09-b8a2-40a9-ae71-21c1e084172c"], +Cell[67240, 2029, 479, 17, 50, "Input",ExpressionUUID->"0865ccf0-0456-46d0-84af-873c05ba40ab"], +Cell[CellGroupData[{ +Cell[67744, 2050, 795, 25, 50, "Input",ExpressionUUID->"792b115f-d62c-41d3-9ed4-386e1cd85623"], +Cell[68542, 2077, 435, 13, 45, "Output",ExpressionUUID->"817db579-e47e-4f92-8513-a370faf9484d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[69014, 2095, 594, 18, 42, "Input",ExpressionUUID->"eb2c39a5-344c-448f-bb74-25006d1b2338"], +Cell[69611, 2115, 12245, 221, 215, "Output",ExpressionUUID->"fefbb2f5-4364-4785-bfa2-3d6ca23cbbe5"] +}, Open ]], +Cell[81871, 2339, 155, 3, 26, "Input",ExpressionUUID->"92edf535-0da5-498d-afe4-d2067a4b8960"], +Cell[CellGroupData[{ +Cell[82051, 2346, 2700, 82, 74, "Input",ExpressionUUID->"a9a2e93a-6c8c-4f78-b9eb-90631ab6c195"], +Cell[84754, 2430, 646, 13, 23, "Message",ExpressionUUID->"b82e6414-4cc7-4061-bd95-51c7d6e87268"], +Cell[85403, 2445, 646, 13, 23, "Message",ExpressionUUID->"13e5a827-ec4b-4d07-a14d-e39dba52c8d6"], +Cell[86052, 2460, 648, 13, 23, "Message",ExpressionUUID->"429a7d6c-b98e-4229-b19a-c97f3162d499"], +Cell[86703, 2475, 456, 10, 23, "Message",ExpressionUUID->"d5addb50-6cd3-42e6-ae7d-f79e03c0a258"], +Cell[87162, 2487, 822, 24, 48, "Output",ExpressionUUID->"ff6af3de-9a55-4901-9fcc-62b34e79b63f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[88021, 2516, 396, 10, 28, "Input",ExpressionUUID->"cb14f184-1c90-4d30-bc32-15d0e8145bc0"], +Cell[88420, 2528, 5989, 170, 161, "Output",ExpressionUUID->"032f6e8d-dc9d-4ec5-bc63-565b049cbfc8"] +}, Open ]] +}, Closed]] +}, Open ]], +Cell[CellGroupData[{ +Cell[94470, 2705, 323, 6, 145, "Title",ExpressionUUID->"0a52074e-c7dc-42d7-ba34-e36f8a07c424"], +Cell[CellGroupData[{ +Cell[94818, 2715, 181, 3, 60, "Section",ExpressionUUID->"df11dec1-6a95-483e-b301-63ee055cae1b"], +Cell[CellGroupData[{ +Cell[95024, 2722, 203, 4, 49, "Subsection",ExpressionUUID->"db909c0e-e94d-4e53-98ff-1fcd1e9db327"], +Cell[CellGroupData[{ +Cell[95252, 2730, 527, 15, 41, "Input",ExpressionUUID->"4180999f-b578-4334-b501-0e64761602e7", + InitializationCell->True], +Cell[95782, 2747, 1977, 35, 70, "Output",ExpressionUUID->"bba80de9-d61a-4ad2-87be-f452ba11863d"] +}, Open ]], +Cell[97774, 2785, 551, 18, 26, "Input",ExpressionUUID->"d33afd0a-5117-4ecf-ab34-88219e7c735c"], +Cell[98328, 2805, 1165, 34, 42, "Input",ExpressionUUID->"8435f84e-9b1a-4d78-9a8d-7f4fad49a8c3"], +Cell[99496, 2841, 824, 23, 62, "Input",ExpressionUUID->"dc095120-7d46-4759-83f1-b544ce0a97f3", + InitializationCell->True], +Cell[100323, 2866, 843, 24, 26, "Input",ExpressionUUID->"738d43b2-6207-4158-86ee-ca90203397ca"], +Cell[101169, 2892, 1303, 32, 49, "Input",ExpressionUUID->"369acc51-3a0a-4316-8ce9-1efe4c9ba39f"], +Cell[102475, 2926, 191, 4, 26, "Input",ExpressionUUID->"996e578e-5a50-408d-bc5e-b69971106628"], +Cell[102669, 2932, 1000, 28, 70, "Input",ExpressionUUID->"ded60f15-55a7-42b7-af7e-242d53d444e8", + InitializationCell->True] +}, Closed]], +Cell[CellGroupData[{ +Cell[103706, 2965, 177, 3, 35, "Subsection",ExpressionUUID->"f3499336-7c71-4263-9391-c088a34f380a"], +Cell[103886, 2970, 1676, 50, 83, "Input",ExpressionUUID->"03828073-977c-4344-a85a-bd2de2c1a82b"], +Cell[105565, 3022, 217, 5, 31, "Text",ExpressionUUID->"b3250612-8996-4f80-ab8a-2c01684cec36"], +Cell[105785, 3029, 4419, 130, 201, "Input",ExpressionUUID->"c4d8ac54-6336-4dfa-a72c-5eafe69d8908", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[110229, 3163, 858, 26, 50, "Input",ExpressionUUID->"0b371f85-d103-432e-a0cb-c7cd280964d4"], +Cell[111090, 3191, 565, 18, 51, "Output",ExpressionUUID->"22385a75-1d06-4a72-b2b8-c66dc0d09c2c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[111692, 3214, 352, 7, 26, "Input",ExpressionUUID->"2edc62d2-b563-403a-83f1-4e61580dcf3e"], +Cell[112047, 3223, 530, 17, 51, "Output",ExpressionUUID->"f2624ecc-0d6d-4c95-8d36-0a08b2b11662"] +}, Open ]], +Cell[CellGroupData[{ +Cell[112614, 3245, 348, 7, 26, "Input",ExpressionUUID->"83b07df0-48e0-4362-8d9a-18b81ddb4da5"], +Cell[112965, 3254, 532, 17, 51, "Output",ExpressionUUID->"c859d2ac-076e-4256-9c74-adfeed7f053d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[113534, 3276, 354, 7, 26, "Input",ExpressionUUID->"1030fbac-32a2-4c96-80de-d441dea46703"], +Cell[113891, 3285, 591, 20, 51, "Output",ExpressionUUID->"c0badb89-13f0-40b2-9706-9b8b6d9e829f"] +}, Open ]], +Cell[114497, 3308, 1845, 54, 67, "Input",ExpressionUUID->"bc2a4e01-4a42-4c88-842a-a0e75c77df17"], +Cell[CellGroupData[{ +Cell[116367, 3366, 920, 25, 26, "Input",ExpressionUUID->"5d1ea56f-13fa-48f8-a048-b7acb1c3f360"], +Cell[117290, 3393, 667, 13, 23, "Message",ExpressionUUID->"ae4b385c-0321-432a-bd4d-5b745499e98e"], +Cell[117960, 3408, 668, 13, 23, "Message",ExpressionUUID->"3cfba2f0-e481-4fb9-9f91-90def4ea69c2"], +Cell[118631, 3423, 649, 13, 23, "Message",ExpressionUUID->"e3b3dd00-60fc-4500-a76b-516e3630df6f"], +Cell[119283, 3438, 457, 10, 23, "Message",ExpressionUUID->"b417f738-2820-47da-b6ba-5c0b9d3438c1"] +}, Open ]], +Cell[119755, 3451, 3835, 99, 94, "Input",ExpressionUUID->"0d545a38-c01e-4db9-95e4-f88c5af2dbb5"], +Cell[123593, 3552, 1229, 39, 50, "Input",ExpressionUUID->"fa0248f0-3f7d-4f6e-9993-42a1e4ec4f8c"], +Cell[CellGroupData[{ +Cell[124847, 3595, 1352, 45, 46, "Input",ExpressionUUID->"94cc5c4c-414d-4dd3-9335-d32a6920c12f"], +Cell[126202, 3642, 1309, 45, 48, "Output",ExpressionUUID->"316756b9-0356-4dfb-8d5b-9a6a362c3e84"] +}, Open ]], +Cell[127526, 3690, 1478, 48, 50, "Input",ExpressionUUID->"f6e5065a-29ee-4b4f-a77a-07f55b26ed28"], +Cell[CellGroupData[{ +Cell[129029, 3742, 2123, 60, 70, "Input",ExpressionUUID->"42ec6d28-d8db-46df-a550-a32767af2be3", + InitializationCell->True], +Cell[131155, 3804, 1791, 49, 70, "Output",ExpressionUUID->"a293ff27-c086-40b9-99a1-30c24f86810b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[132983, 3858, 635, 19, 42, "Input",ExpressionUUID->"8a81f1a5-de33-4fb1-a7c8-ef7e5c069523"], +Cell[133621, 3879, 17576, 313, 220, "Output",ExpressionUUID->"e347d9a3-a698-43bb-8bf2-2715ea5cfe7f"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[151246, 4198, 171, 3, 35, "Subsection",ExpressionUUID->"2e29f87d-b002-4387-9dcd-1e29397736f3"], +Cell[CellGroupData[{ +Cell[151442, 4205, 1867, 48, 85, "Input",ExpressionUUID->"dc9b02f9-e10a-4196-842d-f4415b6e4ec4"], +Cell[153312, 4255, 60977, 1158, 358, "Output",ExpressionUUID->"e586e923-c09d-48d5-bf34-97e29d2fa68b"] +}, Open ]], +Cell[214304, 5416, 612, 19, 34, "Text",ExpressionUUID->"4eaa2d7b-45fa-4318-b7e7-ea808455e59f"] +}, Closed]] +}, Open ]], +Cell[CellGroupData[{ +Cell[214965, 5441, 203, 3, 60, "Section",ExpressionUUID->"6c64cb96-3334-4292-9b6e-dd886d2af85c"], +Cell[CellGroupData[{ +Cell[215193, 5448, 151, 3, 49, "Subsection",ExpressionUUID->"9e6aaa81-06ba-42d2-a090-49e3f5a0e79b"], +Cell[215347, 5453, 152, 3, 26, "Input",ExpressionUUID->"bfe01521-4810-445b-a5d5-dd0be413fbd7"], +Cell[215502, 5458, 1073, 30, 26, "Input",ExpressionUUID->"31834666-ac95-48bb-888c-5e3473c0b895"], +Cell[216578, 5490, 3558, 99, 132, "Input",ExpressionUUID->"10bae95d-3a3b-49d5-b6c0-da421cf9f00d"], +Cell[220139, 5591, 3708, 87, 71, "Input",ExpressionUUID->"b5faa348-1eb1-474f-a5a4-d3ed39d023d0"], +Cell[223850, 5680, 2405, 69, 118, "Input",ExpressionUUID->"6e4f6e6d-5616-448d-9ef8-04d79a2d1823", + InitializationCell->True], +Cell[226258, 5751, 1061, 29, 52, "Text",ExpressionUUID->"575d1f25-9a6b-417d-865f-0934d7769291"] +}, Closed]], +Cell[CellGroupData[{ +Cell[227356, 5785, 152, 3, 35, "Subsection",ExpressionUUID->"1ff36fea-f6e0-4927-b494-83381e142e8e"], +Cell[227511, 5790, 1313, 36, 26, "Input",ExpressionUUID->"0cfd58b0-264c-4a32-a787-6dc97e0bede3"], +Cell[228827, 5828, 3776, 87, 71, "Input",ExpressionUUID->"9884ee06-2438-48e5-a706-7ed7a2d33d4e"], +Cell[232606, 5917, 5957, 174, 129, "Input",ExpressionUUID->"3f786932-48d4-4f24-b3f3-24e1289acc74", + InitializationCell->True], +Cell[238566, 6093, 1338, 37, 72, "Text",ExpressionUUID->"3cada83f-24c3-49fe-a339-0566f14382ec"], +Cell[CellGroupData[{ +Cell[239929, 6134, 644, 20, 46, "Input",ExpressionUUID->"cb4026f0-35a4-4d45-8b9a-35314725a5e7"], +Cell[240576, 6156, 5651, 111, 209, "Output",ExpressionUUID->"c26e2d6c-ee16-4853-861c-a39115a14019"] +}, Open ]], +Cell[CellGroupData[{ +Cell[246264, 6272, 985, 31, 58, "Input",ExpressionUUID->"d094781c-d1c5-425c-b3e5-23f0293bed05"], +Cell[247252, 6305, 484, 15, 47, "Output",ExpressionUUID->"ff995faa-4bba-4da9-b77f-ee24c7ff147e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[247773, 6325, 778, 23, 44, "Input",ExpressionUUID->"853ec222-1da3-4b95-8cda-b665d0e9c2e8"], +Cell[248554, 6350, 6233, 123, 213, "Output",ExpressionUUID->"1cebf0ca-1a6a-48a8-bb81-e24f7a7d6bb2"] +}, Open ]] +}, Closed]] +}, Open ]], +Cell[CellGroupData[{ +Cell[254848, 6480, 163, 3, 60, "Section",ExpressionUUID->"100bae6f-3872-495a-ab0c-896ce0c0e84e"], +Cell[255014, 6485, 217, 4, 26, "Input",ExpressionUUID->"d6e67f73-194b-41c7-9739-d78c807ca3d6"], +Cell[255234, 6491, 1307, 45, 70, "Input",ExpressionUUID->"eec71e21-c0ee-45fe-8701-eb10d240bef1"], +Cell[CellGroupData[{ +Cell[256566, 6540, 691, 22, 50, "Input",ExpressionUUID->"12dbfe5c-372a-4f2b-beef-914402780641"], +Cell[257260, 6564, 315, 5, 30, "Output",ExpressionUUID->"22d286a5-afa0-408f-9bb0-e903a4edff97"] +}, Open ]], +Cell[CellGroupData[{ +Cell[257612, 6574, 242, 4, 26, "Input",ExpressionUUID->"498cd2d2-cabf-4c0a-b8cf-ff6444abbefd"], +Cell[257857, 6580, 1205, 43, 71, "Output",ExpressionUUID->"c29eeae9-169d-40b3-b8ae-3606dee56b0a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[259099, 6628, 1972, 58, 70, "Input",ExpressionUUID->"cf48f2e3-669e-4a29-858e-1a9fc6957703"], +Cell[261074, 6688, 36589, 609, 145, "Output",ExpressionUUID->"a6383fdd-4e4f-4ff7-84bd-bd68d5465477"] +}, Open ]], +Cell[CellGroupData[{ +Cell[297700, 7302, 1974, 58, 70, "Input",ExpressionUUID->"eebf3ccb-1559-4da7-bdeb-234ad307674a"], +Cell[299677, 7362, 36380, 607, 137, "Output",ExpressionUUID->"669e99bd-436b-4846-a43e-5d860e77ffb0"] +}, Open ]], +Cell[336072, 7972, 7074, 199, 169, "Input",ExpressionUUID->"ecd4cdf8-af5f-4cab-859d-aba1c354768f"], +Cell[343149, 8173, 93167, 1557, 157, 22199, 393, "CachedBoxData", "BoxData", "Input",ExpressionUUID->"5c38a6a2-82a4-43d6-8233-ba811ff2d35f"], +Cell[CellGroupData[{ +Cell[436341, 9734, 6946, 197, 169, "Input",ExpressionUUID->"940d9eff-6030-437b-8335-864a85272893"], +Cell[443290, 9933, 21074, 375, 144, "Output",ExpressionUUID->"7b764416-c238-4186-9012-f9b34d9d7185"] +}, Open ]] +}, Closed]] +}, Open ]], +Cell[CellGroupData[{ +Cell[464425, 10315, 159, 3, 89, "Title",ExpressionUUID->"9bbe0ea0-6528-4545-9c4f-868b32b20dcb"], +Cell[464587, 10320, 2347, 80, 107, "Input",ExpressionUUID->"4ff6a594-012a-42c1-9e1e-0ce854cee633", + InitializationCell->True], +Cell[466937, 10402, 522, 16, 61, "Input",ExpressionUUID->"5be72a3b-c8f8-4b96-9265-4e9c94871b49", + InitializationCell->True], +Cell[467462, 10420, 776, 23, 57, "Input",ExpressionUUID->"140d9680-5488-4cd6-9e93-90da85bb14ac", + InitializationCell->True], +Cell[468241, 10445, 331, 7, 41, "Input",ExpressionUUID->"729d0ca0-7b17-493f-bf05-6177ed58c74b", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[468597, 10456, 438, 9, 26, "Input",ExpressionUUID->"e1945473-5c00-42db-99a4-83a13b93fd62"], +Cell[469038, 10467, 1189, 20, 70, "Output",ExpressionUUID->"4093005d-2040-49d0-a908-cdc1c80d3aed"] +}, Open ]], +Cell[CellGroupData[{ +Cell[470264, 10492, 1105, 21, 104, "Input",ExpressionUUID->"29e6def1-058c-4787-8a36-da20af8eb94a"], +Cell[471372, 10515, 826, 15, 52, "Output",ExpressionUUID->"0fb21a07-f74b-416f-9ea7-5f7d559d1b1c"] +}, Open ]], +Cell[472213, 10533, 275, 5, 26, "Input",ExpressionUUID->"27c016bb-5a31-44dc-840b-1501bd3a1b35"], +Cell[472491, 10540, 918, 24, 28, "Input",ExpressionUUID->"40d902eb-88de-426a-a413-db609c284d32"], +Cell[CellGroupData[{ +Cell[473434, 10568, 329, 6, 26, "Input",ExpressionUUID->"8871427b-e128-4795-a3f4-cc84bc1de9ec"], +Cell[473766, 10576, 5308, 159, 210, "Output",ExpressionUUID->"021ab0aa-c0dc-4a5f-86ad-5a65e04cba03"] +}, Open ]], +Cell[479089, 10738, 1115, 24, 43, "Input",ExpressionUUID->"f6128365-6e64-4c25-825d-64c6722e0685", + InitializationCell->True], +Cell[480207, 10764, 283, 6, 26, "Input",ExpressionUUID->"558e7195-ec20-4ae1-a25e-3c80a0b9b80b"], +Cell[CellGroupData[{ +Cell[480515, 10774, 233, 5, 38, "Input",ExpressionUUID->"f622e75f-0f5b-4118-a203-1d6f94cc0e12"], +Cell[480751, 10781, 234, 5, 42, "Output",ExpressionUUID->"29635d95-93d7-453f-84ae-15597df23491"] +}, Open ]], +Cell[CellGroupData[{ +Cell[481022, 10791, 312, 6, 26, "Input",ExpressionUUID->"bcb22def-eda0-45df-849f-608a0687b97f"], +Cell[481337, 10799, 207, 3, 30, "Output",ExpressionUUID->"f3e95ef0-60a8-415c-a5eb-83f467b75947"] +}, Open ]], +Cell[CellGroupData[{ +Cell[481581, 10807, 1163, 32, 28, "Input",ExpressionUUID->"b8433c3f-b91a-4f84-ab67-731c9d1c1b2f"], +Cell[482747, 10841, 66614, 1102, 237, "Output",ExpressionUUID->"731d0591-4abb-4ae7-8a8f-a252ef0c284a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[549398, 11948, 1032, 30, 28, "Input",ExpressionUUID->"9670fa52-71fd-44c7-a4a4-05a591e73124"], +Cell[550433, 11980, 35895, 600, 211, "Output",ExpressionUUID->"a2a5b14e-ccbd-48b5-8e14-35ea7371ffa1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[586365, 12585, 1218, 33, 28, "Input",ExpressionUUID->"3145c817-fba8-4253-8ac9-2df1a740717a"], +Cell[587586, 12620, 89844, 1472, 227, "Output",ExpressionUUID->"c05f908b-f690-4f4e-b09a-fb4b83f06b3b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[677467, 14097, 1137, 31, 28, "Input",ExpressionUUID->"6ba4c5f1-b775-4e04-99c6-67ea67b1e47b"], +Cell[678607, 14130, 71684, 1175, 120, "Output",ExpressionUUID->"30b2dd54-18f5-45ee-8d6e-9696a32d99dd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[750328, 15310, 1207, 32, 28, "Input",ExpressionUUID->"ec08b2f4-8c07-4bfb-82b2-045c5a32553f"], +Cell[751538, 15344, 49864, 832, 270, "Output",ExpressionUUID->"7f6e0222-0c66-4741-a2ef-0a7907009d3d"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[801451, 16182, 196, 3, 66, "Title",ExpressionUUID->"f8469860-fa97-4a60-9e16-c7b467058037"], +Cell[CellGroupData[{ +Cell[801672, 16189, 169, 3, 60, "Section",ExpressionUUID->"256f249a-892f-4165-8448-4758153da25e"], +Cell[801844, 16194, 1005, 29, 26, "Input",ExpressionUUID->"c903323c-20ea-4825-b68d-ed54a1640c47"], +Cell[802852, 16225, 3760, 106, 114, "Input",ExpressionUUID->"d4535ec7-8743-4bd9-8dc9-a48c2508f7ff"], +Cell[806615, 16333, 5407, 124, 71, "Input",ExpressionUUID->"93a4438e-3901-4102-a0ed-49f488288f8f"], +Cell[812025, 16459, 2888, 83, 118, "Input",ExpressionUUID->"421b263c-0954-47e7-9e6d-3e92847ba093", + InitializationCell->True], +Cell[814916, 16544, 694, 17, 60, "Input",ExpressionUUID->"5bbd100d-b730-4596-b1f5-29dc4abf48e2", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[815635, 16565, 1233, 30, 48, "Input",ExpressionUUID->"cacfdf0d-2f8b-44f2-b8fe-35d081abf0aa"], +Cell[816871, 16597, 34565, 686, 340, "Output",ExpressionUUID->"1303c429-d8a4-4db5-af15-805751f0aed4"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[851485, 17289, 169, 3, 48, "Section",ExpressionUUID->"199c3e6a-3658-459b-a32b-de545b86b670"], +Cell[CellGroupData[{ +Cell[851679, 17296, 1534, 39, 88, "Input",ExpressionUUID->"322c1b80-08e6-45ae-9fd3-61c806283984"], +Cell[853216, 17337, 25761, 542, 317, "Output",ExpressionUUID->"a53c8364-c0e6-4893-876b-6076df4fde18"] +}, Open ]], +Cell[CellGroupData[{ +Cell[879014, 17884, 1597, 39, 82, "Input",ExpressionUUID->"3548fd3b-492c-4629-9c62-ecefcf188899"], +Cell[880614, 17925, 33344, 709, 324, "Output",ExpressionUUID->"e9bbbe02-9afe-415d-92f8-31790c8d6ec0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[913995, 18639, 1555, 39, 82, "Input",ExpressionUUID->"d859a61c-05f5-423c-aeec-df9b4ecd1493"], +Cell[915553, 18680, 32574, 698, 319, "Output",ExpressionUUID->"8ba9d687-92c8-4daf-adba-5aa60f67d78e"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[948176, 19384, 144, 3, 48, "Section",ExpressionUUID->"0d9de29c-52d5-49a5-99ce-c99cd55b7634"], +Cell[CellGroupData[{ +Cell[948345, 19391, 219, 5, 48, "Subsection",ExpressionUUID->"60a1c53c-e29b-478a-ab95-abe0c1c7fcd4"], +Cell[CellGroupData[{ +Cell[948589, 19400, 3224, 93, 138, "Input",ExpressionUUID->"bcdacb72-a592-4dfb-8fea-6c60b17ad205"], +Cell[951816, 19495, 5792, 163, 327, "Output",ExpressionUUID->"5351795f-c7d2-4cc5-9a31-8e02d5330852"], +Cell[957611, 19660, 2547, 65, 230, "Print",ExpressionUUID->"6e4da88d-aece-4c54-b324-d3caaf423e10"] +}, Open ]], +Cell[CellGroupData[{ +Cell[960195, 19730, 848, 21, 45, "Input",ExpressionUUID->"bf8846fc-cc5e-42d6-b529-b0bb9ad6ef59"], +Cell[961046, 19753, 666, 17, 29, "Output",ExpressionUUID->"1a933c9c-541d-4321-a1bd-2625af36f5d5"] +}, Open ]], +Cell[961727, 19773, 514, 15, 31, "Text",ExpressionUUID->"7b0f9a8e-40ae-4f81-a85a-0b4e16541d98"], +Cell[CellGroupData[{ +Cell[962266, 19792, 779, 20, 45, "Input",ExpressionUUID->"bcecc14b-884d-4557-babf-8ec30e3d3eb4"], +Cell[963048, 19814, 595, 16, 29, "Output",ExpressionUUID->"3ef05d4e-e8af-41c0-b0af-748113dab88a"] +}, Open ]], +Cell[963658, 19833, 743, 18, 31, "Text",ExpressionUUID->"6c283925-cd31-4f0e-9613-89b9bb45a247"], +Cell[CellGroupData[{ +Cell[964426, 19855, 868, 21, 45, "Input",ExpressionUUID->"44af6aed-b238-4a93-89e8-1340e433a148"], +Cell[965297, 19878, 328, 8, 29, "Output",ExpressionUUID->"5b5beadd-cd77-4464-a293-83098e0e5d37"] +}, Open ]], +Cell[965640, 19889, 612, 17, 31, "Text",ExpressionUUID->"82eff177-42be-4dd7-9453-a54f54529238"], +Cell[CellGroupData[{ +Cell[966277, 19910, 778, 20, 45, "Input",ExpressionUUID->"8ea8f494-540f-46b9-add5-8510ec0c1ba8"], +Cell[967058, 19932, 296, 7, 29, "Output",ExpressionUUID->"355298db-6a2f-4e31-b53c-ce707c2ed739"] +}, Open ]], +Cell[967369, 19942, 698, 21, 31, "Text",ExpressionUUID->"afb9d0d5-37ff-48e1-8f85-39ad49f0fc79"], +Cell[CellGroupData[{ +Cell[968092, 19967, 774, 20, 45, "Input",ExpressionUUID->"4222a322-77a9-47ac-9cd7-b96c801433e8"], +Cell[968869, 19989, 194, 4, 29, "Output",ExpressionUUID->"a79d8ce1-ea68-4a85-bc5a-b69846a2058b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[969100, 19998, 777, 20, 45, "Input",ExpressionUUID->"09b7b442-f051-408e-be5b-ac401dacdf6a"], +Cell[969880, 20020, 290, 7, 29, "Output",ExpressionUUID->"2d869042-8314-4786-b0c8-e39167a5e138"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[970219, 20033, 159, 3, 34, "Subsection",ExpressionUUID->"f911d4c6-5cfc-49b9-9ae3-8e185e5e9327"], +Cell[CellGroupData[{ +Cell[970403, 20040, 3232, 94, 138, "Input",ExpressionUUID->"8af7f735-ca14-4a98-8c03-1fd2345b57a9"], +Cell[973638, 20136, 2548, 65, 230, "Print",ExpressionUUID->"b1d5ba64-9c3b-4954-ab9e-30b07e59bdfa"] +}, Open ]], +Cell[CellGroupData[{ +Cell[976223, 20206, 3256, 94, 138, "Input",ExpressionUUID->"f3b52bee-17e8-4410-a817-4eea81fadeff"], +Cell[979482, 20302, 2590, 65, 230, "Print",ExpressionUUID->"2932b857-d006-42b0-96f1-bfa322b4f49c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[982109, 20372, 571, 13, 26, "Input",ExpressionUUID->"ad74092e-deab-4815-8c86-07eef5c8d8ab"], +Cell[982683, 20387, 685, 22, 49, "Output",ExpressionUUID->"8be537fb-e64e-4b3f-9c0f-8b49b03be012"] +}, Open ]], +Cell[CellGroupData[{ +Cell[983405, 20414, 729, 20, 46, "Input",ExpressionUUID->"0c773149-d703-4bb6-94a6-7b5cc0ce8fae"], +Cell[984137, 20436, 11998, 269, 226, "Output",ExpressionUUID->"0e5afb43-03a8-4921-a0b0-171f8b1c2ecd"] +}, Open ]] +}, Closed]] +}, Closed]] +}, Open ]], +Cell[CellGroupData[{ +Cell[996208, 20713, 242, 4, 89, "Title",ExpressionUUID->"12d80845-73eb-493a-bcea-3b0b87d21f3e"], +Cell[CellGroupData[{ +Cell[996475, 20721, 169, 3, 60, "Section",ExpressionUUID->"1e6ffb79-24e9-4397-b007-32df81174525"], +Cell[CellGroupData[{ +Cell[996669, 20728, 155, 3, 49, "Subsection",ExpressionUUID->"7a35c830-d09c-4c2a-ad54-c9c15f347871"], +Cell[996827, 20733, 1185, 27, 26, "Input",ExpressionUUID->"40be5691-8587-4301-ab69-4bfeda29a864"], +Cell[998015, 20762, 1356, 40, 118, "Input",ExpressionUUID->"30f17efb-d41d-4259-b874-cacd3b56ce75", + InitializationCell->True], +Cell[999374, 20804, 191, 3, 31, "Text",ExpressionUUID->"8924de9c-9efe-45a3-a9ad-408e2b2b698d"], +Cell[999568, 20809, 1252, 34, 79, "Input",ExpressionUUID->"19c3a2e6-282e-4147-9930-7ff961395f5b", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[1000845, 20847, 4473, 92, 146, "Input",ExpressionUUID->"b19cd367-957b-4cf0-b4ae-1fec45bd95df"], +Cell[1005321, 20941, 79223, 1479, 525, "Output",ExpressionUUID->"e9ba8c85-bc48-415d-b020-e4d2f6d02579"] +}, Open ]], +Cell[1084559, 22423, 36497, 708, 336, "Input",ExpressionUUID->"0cd992a0-f8d4-431c-a159-0894032808d8"] +}, Closed]], +Cell[CellGroupData[{ +Cell[1121093, 23136, 151, 3, 35, "Subsection",ExpressionUUID->"950a0b1f-8163-47aa-bf65-f1d765efe46f"], +Cell[1121247, 23141, 1243, 27, 26, "Input",ExpressionUUID->"bb01d8e1-d6ab-461f-be8b-c75f50ab8739"], +Cell[1122493, 23170, 1889, 56, 118, "Input",ExpressionUUID->"7a60d268-132a-4489-a887-307f3a80c51c", + InitializationCell->True], +Cell[1124385, 23228, 1129, 27, 60, "Input",ExpressionUUID->"ddcd4a88-334b-4e04-ae2f-810ac917a7dd", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[1125539, 23259, 2952, 54, 48, "Input",ExpressionUUID->"1975b756-0495-4b7e-aa86-45f0529e0f3c"], +Cell[1128494, 23315, 43988, 853, 340, "Output",ExpressionUUID->"975e5da1-423d-4c59-8ad0-8991cde1a8a3"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1172519, 24173, 5510, 125, 206, "Input",ExpressionUUID->"434e3915-a94f-4412-bf3b-733524d65036"], +Cell[1178032, 24300, 235782, 4232, 541, "Output",ExpressionUUID->"ce0b1897-2fee-4372-b7c0-1b8c3414355b"] +}, Open ]], +Cell[1413829, 28535, 171, 3, 46, "Input",ExpressionUUID->"b10f85e1-de1a-45b5-b961-43ea9978a88b"], +Cell[CellGroupData[{ +Cell[1414025, 28542, 5359, 130, 187, "Input",ExpressionUUID->"38f39947-d817-4c98-9bbd-6cf292924898"], +Cell[1419387, 28674, 77651, 1369, 541, "Output",ExpressionUUID->"cb0f567a-0435-412b-8586-3e71be14dc1c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1497075, 30048, 1383, 36, 48, "Input",ExpressionUUID->"d4c31428-ffb0-4bd2-981e-56ef0e5ea0ac"], +Cell[1498461, 30086, 9499, 190, 186, "Output",ExpressionUUID->"f8e01c31-b094-4485-baca-56687bdb1b84"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1507997, 30281, 1302, 33, 48, "Input",ExpressionUUID->"cd81a8fd-8f90-40d4-8f31-2c745a5956fc"], +Cell[1509302, 30316, 37280, 736, 341, "Output",ExpressionUUID->"f0d5c1e3-c323-4923-96ed-5265df42efba"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1546619, 31057, 2369, 56, 68, "Input",ExpressionUUID->"2cacca77-bb0e-4b9d-b70e-3dcdf52e7857"], +Cell[1548991, 31115, 9641, 192, 514, "Output",ExpressionUUID->"49f79181-58d5-4c98-b66a-b45b7b27753c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1558669, 31312, 2987, 72, 146, "Input",ExpressionUUID->"4844e83d-444c-4b0f-b5eb-e25af1479e1e"], +Cell[1561659, 31386, 75249, 1418, 514, "Output",ExpressionUUID->"39a83dfe-a7f6-41d1-a1b3-17af8c0ec4bf"] +}, Open ]], +Cell[1636923, 32807, 336, 8, 72, "Text",ExpressionUUID->"71c5c746-2cdb-40a2-8429-b19419caa149"], +Cell[CellGroupData[{ +Cell[1637284, 32819, 325, 6, 26, "Input",ExpressionUUID->"5aa6764c-4086-4c7f-97d0-832290cfb9d2"], +Cell[1637612, 32827, 7622, 243, 132, "Output",ExpressionUUID->"7095227c-2d87-4ca2-985a-dce33d61d518"] +}, Open ]], +Cell[1645249, 33073, 1275, 31, 48, "Input",ExpressionUUID->"121c8817-adb5-45f9-a185-17e726b281d0"], +Cell[1646527, 33106, 61414, 1131, 99, "Input",ExpressionUUID->"5ebf123a-9b73-45fd-9416-c8c20d2241b5"], +Cell[1707944, 34239, 444, 8, 31, "Text",ExpressionUUID->"81f281b2-7a45-44ac-a7f5-5824ef59d144"], +Cell[CellGroupData[{ +Cell[1708413, 34251, 380, 9, 26, "Input",ExpressionUUID->"4205314e-d4a3-4d2b-a2e0-34baba0f0950"], +Cell[1708796, 34262, 1054, 27, 50, "Output",ExpressionUUID->"ea9352d9-1a5d-49c3-8319-1e5f14ad9553"] +}, Open ]] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[1709911, 34296, 171, 3, 60, "Section",ExpressionUUID->"38ecd62b-d033-488a-9f8c-2e379ccb4dce"], +Cell[CellGroupData[{ +Cell[1710107, 34303, 155, 3, 49, "Subsection",ExpressionUUID->"0705a04a-bd50-4ebc-b528-bbdc589f6dd6"], +Cell[CellGroupData[{ +Cell[1710287, 34310, 1686, 41, 88, "Input",ExpressionUUID->"de2ffbbf-c99a-4d93-b812-2f447550d662"], +Cell[1711976, 34353, 25149, 532, 329, "Output",ExpressionUUID->"4403f607-c3b4-44e5-a15d-7283ecde4f9f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1737162, 34890, 1597, 39, 88, "Input",ExpressionUUID->"ecff5721-ebe6-4815-971f-c4d672c96905"], +Cell[1738762, 34931, 35244, 750, 317, "Output",ExpressionUUID->"2a70e00b-94e9-401e-a18e-53300a7c35ff"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1774043, 35686, 1600, 39, 88, "Input",ExpressionUUID->"7c651ed0-b6e6-48f6-be9e-cd2e24b5c91f"], +Cell[1775646, 35727, 41517, 853, 318, "Output",ExpressionUUID->"cf49b5e5-2504-4041-8500-14815d97eac6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1817200, 36585, 1539, 39, 88, "Input",ExpressionUUID->"130e809d-7d20-4f5c-9d02-13bea2e20883"], +Cell[1818742, 36626, 31688, 651, 317, "Output",ExpressionUUID->"0d332ed5-967b-4586-bb01-b421b9550e00"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1850467, 37282, 1510, 38, 88, "Input",ExpressionUUID->"005b1227-a5fb-4b5d-a72b-43e663de0b72"], +Cell[1851980, 37322, 24239, 514, 344, "Output",ExpressionUUID->"b81d2a18-78dd-44fe-87c6-b7126c75f3d6"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1876256, 37841, 1455, 37, 88, "Input",ExpressionUUID->"f34dda2d-ccc2-4e95-8433-501f85dab860"], +Cell[1877714, 37880, 18689, 365, 317, "Output",ExpressionUUID->"4e9683de-cadd-4c17-9a2f-9cf80bb6ed6e"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[1896452, 38251, 151, 3, 35, "Subsection",ExpressionUUID->"28c03220-4253-4ac2-af1b-7e79584e73c8"], +Cell[CellGroupData[{ +Cell[1896628, 38258, 1769, 42, 88, "Input",ExpressionUUID->"4770d01e-d16d-45c6-bc42-c53413d65f4f"], +Cell[1898400, 38302, 26504, 559, 318, "Output",ExpressionUUID->"1e2e5b00-6444-4d24-8ef1-8d2f252d7f82"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1924941, 38866, 1771, 42, 88, "Input",ExpressionUUID->"6684712f-a153-4f02-b620-d9a25829205d"], +Cell[1926715, 38910, 30668, 633, 326, "Output",ExpressionUUID->"56618b1d-b8fa-44f5-b244-54ee774307a4"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1957420, 39548, 1555, 39, 88, "Input",ExpressionUUID->"e4ba48bd-b679-4118-8c22-a27665e21944"], +Cell[1958978, 39589, 39923, 825, 315, "Output",ExpressionUUID->"b3095197-d30c-4feb-ae34-4d45eea6cb69"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1998938, 40419, 1553, 39, 83, "Input",ExpressionUUID->"a374304b-756b-4003-b1a7-83d5cac5402e"], +Cell[2000494, 40460, 17164, 341, 316, "Output",ExpressionUUID->"4648b6d9-1be8-494e-a38c-33cbcbe73981"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2017695, 40806, 1539, 39, 83, "Input",ExpressionUUID->"1189d55b-e3f1-4fa8-817c-47da353f8e75"], +Cell[2019237, 40847, 30429, 627, 316, "Output",ExpressionUUID->"4fc7ede1-6329-49b2-9e92-4f2af7c23afa"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2049703, 41479, 1431, 37, 83, "Input",ExpressionUUID->"e96e85fe-afe5-4fe1-b645-8c01f0c18fd7"], +Cell[2051137, 41518, 12578, 266, 313, "Output",ExpressionUUID->"880d6549-cd45-454c-9d4f-d1e60f311942"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2063752, 41789, 1484, 38, 83, "Input",ExpressionUUID->"8f2b59b3-2fa6-40e1-8907-0b0f99d32b21"], +Cell[2065239, 41829, 16692, 335, 316, "Output",ExpressionUUID->"09b932d0-8ecb-4518-ab9b-eb823d96f63c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2081968, 42169, 175, 3, 40, "Subsubsection",ExpressionUUID->"c6c546bc-5576-410f-9743-59804a99096a"], +Cell[CellGroupData[{ +Cell[2082168, 42176, 1801, 46, 82, "Input",ExpressionUUID->"69ee8234-1d63-42c1-bf74-c4bfb11a7643"], +Cell[2083972, 42224, 23175, 511, 343, "Output",ExpressionUUID->"4e82a56b-509f-4b7f-a295-4617e86524a0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2107184, 42740, 1599, 41, 82, "Input",ExpressionUUID->"8e5e3748-242c-4089-b15b-bf679b76b788"], +Cell[2108786, 42783, 211, 4, 29, "Output",ExpressionUUID->"986928d9-4338-4727-bd90-a11f28de9bf9"] +}, Open ]] +}, Closed]] +}, Closed]] +}, Closed]], +Cell[CellGroupData[{ +Cell[2109070, 42795, 170, 3, 48, "Section",ExpressionUUID->"3cf320d3-6c13-4692-b242-d4cad7fed598"], +Cell[CellGroupData[{ +Cell[2109265, 42802, 221, 5, 49, "Subsection",ExpressionUUID->"c40bb50c-519d-4650-b7f0-37c61810c51e"], +Cell[CellGroupData[{ +Cell[2109511, 42811, 154, 3, 40, "Subsubsection",ExpressionUUID->"bc4855cb-d055-4c5b-a5e0-792e82ed43f9"], +Cell[CellGroupData[{ +Cell[2109690, 42818, 3857, 102, 157, "Input",ExpressionUUID->"8cde43e0-6c22-45c1-be31-fa4bfe9e9cfb"], +Cell[2113550, 42922, 5580, 153, 328, "Output",ExpressionUUID->"a500d884-be05-426a-92ad-6b010dd051f9"], +Cell[2119133, 43077, 2822, 69, 230, "Print",ExpressionUUID->"3f0cc588-78b3-4d5c-8d6c-8105081254f5"] +}, Open ]], +Cell[2121970, 43149, 335, 7, 31, "Text",ExpressionUUID->"b6c5864e-998f-4f55-a2b5-3bcaed605691"], +Cell[CellGroupData[{ +Cell[2122330, 43160, 796, 19, 46, "Input",ExpressionUUID->"26ff945b-30aa-447b-a7da-681164976c41"], +Cell[2123129, 43181, 636, 14, 30, "Output",ExpressionUUID->"83e94ffa-c2ad-4d89-b8d2-cc901505493b"] +}, Open ]], +Cell[2123780, 43198, 514, 15, 31, "Text",ExpressionUUID->"22f026d8-1f14-4085-b8a9-1103ac77f479"], +Cell[CellGroupData[{ +Cell[2124319, 43217, 724, 18, 46, "Input",ExpressionUUID->"78c83c8e-3dec-4b9a-9c7c-9e35dd60a379"], +Cell[2125046, 43237, 359, 9, 30, "Output",ExpressionUUID->"58320fa1-bce5-4901-93f8-d49d6c245680"] +}, Open ]], +Cell[2125420, 43249, 675, 19, 31, "Text",ExpressionUUID->"fdd982d9-401c-4207-8eec-b15a5550f82b"], +Cell[CellGroupData[{ +Cell[2126120, 43272, 871, 21, 46, "Input",ExpressionUUID->"4dc967ab-5ddd-4a4a-8dbf-19317ee21c74"], +Cell[2126994, 43295, 241, 5, 30, "Output",ExpressionUUID->"2f717f13-fdf2-4e9f-ace7-b5cabc606e87"] +}, Open ]], +Cell[2127250, 43303, 477, 12, 31, "Text",ExpressionUUID->"625ce02e-78f9-4a40-a1e8-3b4ec0b96e06"], +Cell[CellGroupData[{ +Cell[2127752, 43319, 723, 18, 46, "Input",ExpressionUUID->"a14a0eaa-ac66-448a-b70b-0d2b2cc0e34c"], +Cell[2128478, 43339, 537, 13, 30, "Output",ExpressionUUID->"373adab4-8b54-4869-89cf-c956d96b6e56"] +}, Open ]], +Cell[2129030, 43355, 685, 18, 31, "Text",ExpressionUUID->"84597ffa-eafe-4f3c-9d4e-7c888242eaa3"], +Cell[CellGroupData[{ +Cell[2129740, 43377, 721, 18, 46, "Input",ExpressionUUID->"ecda13b7-567a-4553-abc4-f7b0df23882e"], +Cell[2130464, 43397, 166, 3, 30, "Output",ExpressionUUID->"732bc038-a50a-4fde-9440-76810f331904"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2130667, 43405, 722, 18, 46, "Input",ExpressionUUID->"a6d1004b-a7be-4819-87a2-62ffbe643df9"], +Cell[2131392, 43425, 260, 5, 30, "Output",ExpressionUUID->"9fb6b259-f8db-4801-86a5-1df5bf0977b1"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[2131701, 43436, 154, 3, 33, "Subsubsection",ExpressionUUID->"e8cefca3-48aa-4fe8-a42f-a07a6d0d53ff"], +Cell[CellGroupData[{ +Cell[2131880, 43443, 3588, 99, 157, "Input",ExpressionUUID->"86296c81-aa67-48e3-9459-a607c4dcb5fe"], +Cell[2135471, 43544, 2571, 62, 123, "Output",ExpressionUUID->"bed7d171-990f-4d4e-800a-ab6c67336ddf"], +Cell[2138045, 43608, 2955, 71, 230, "Print",ExpressionUUID->"0677df06-4be7-4bd3-80e0-e0306a28d5e2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2141037, 43684, 945, 21, 46, "Input",ExpressionUUID->"fa626888-9aa9-4ce4-a267-7560eb5953f5"], +Cell[2141985, 43707, 705, 15, 30, "Output",ExpressionUUID->"c1f4f9e8-4ed4-458a-afd7-21b721d6a2d6"] +}, Open ]], +Cell[2142705, 43725, 580, 17, 31, "Text",ExpressionUUID->"46b6972c-5f54-4408-a21a-716067159692"], +Cell[CellGroupData[{ +Cell[2143310, 43746, 722, 18, 46, "Input",ExpressionUUID->"7ac6dc4b-1be2-4222-ba5c-5417e4b23a35"], +Cell[2144035, 43766, 166, 3, 30, "Output",ExpressionUUID->"8f315252-fbc8-4570-9ccf-adf1bc0395f9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2144238, 43774, 722, 18, 46, "Input",ExpressionUUID->"ed30fc9b-d583-4306-b0c4-1c9db9bb097a"], +Cell[2144963, 43794, 234, 5, 30, "Output",ExpressionUUID->"5d3a5b06-fa07-4994-866d-f2521b346836"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2145234, 43804, 724, 18, 46, "Input",ExpressionUUID->"b6aab6e2-ecab-4643-bd19-e1c96b86c0f0"], +Cell[2145961, 43824, 547, 12, 35, "Message",ExpressionUUID->"89cf3103-e73d-48df-86db-ec7b26a06bb5"], +Cell[2146511, 43838, 166, 3, 30, "Output",ExpressionUUID->"a0260599-8186-4a58-87ab-1debb7498190"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2146714, 43846, 724, 18, 46, "Input",ExpressionUUID->"c04c95d3-3228-4354-89b7-6c0a9bdc3525"], +Cell[2147441, 43866, 547, 12, 35, "Message",ExpressionUUID->"2843fbbd-4d9f-4276-aa7a-fa585db89e52"], +Cell[2147991, 43880, 166, 3, 30, "Output",ExpressionUUID->"b38c806d-706b-4d67-a8fc-8f46b49edac0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2148194, 43888, 722, 18, 46, "Input",ExpressionUUID->"182aad29-97d7-4575-8885-0a013b62cd47"], +Cell[2148919, 43908, 545, 12, 35, "Message",ExpressionUUID->"1f6e816a-7efe-44e3-ada9-cce2c848449d"], +Cell[2149467, 43922, 166, 3, 30, "Output",ExpressionUUID->"5330f810-cf31-475c-a470-af6ad3fbb687"] +}, Open ]] +}, Closed]] +}, Open ]], +Cell[CellGroupData[{ +Cell[2149694, 43932, 162, 3, 49, "Subsection",ExpressionUUID->"28754d59-75ad-4a9b-b825-ac7c07b5aaf1"], +Cell[CellGroupData[{ +Cell[2149881, 43939, 153, 3, 40, "Subsubsection",ExpressionUUID->"9e25552a-74a8-4b5d-9071-0790e0d767dd"], +Cell[CellGroupData[{ +Cell[2150059, 43946, 3306, 95, 124, "Input",ExpressionUUID->"8f6f46ef-b8d9-47f5-be7d-ce0b91081075"], +Cell[2153368, 44043, 2574, 65, 231, "Print",ExpressionUUID->"a1b609a5-51a7-4130-bf01-714db2e18059"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2155979, 44113, 3254, 94, 124, "Input",ExpressionUUID->"85d2d939-bb10-4182-addf-ccf25f02abf0"], +Cell[2159236, 44209, 2570, 65, 231, "Print",ExpressionUUID->"835ee8f3-caeb-46b0-92de-39e21e53b73d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2161843, 44279, 3278, 95, 124, "Input",ExpressionUUID->"704445d2-c8f7-4e6e-83e5-ccd083bb0be7"], +Cell[2165124, 44376, 2623, 66, 231, "Print",ExpressionUUID->"24bb5ac5-97cd-4066-b62a-0868f66da1e8"] +}, Open ]], +Cell[2167762, 44445, 593, 18, 31, "Text",ExpressionUUID->"03e9208e-7955-4063-b8cd-08c799624961"], +Cell[CellGroupData[{ +Cell[2168380, 44467, 575, 14, 26, "Input",ExpressionUUID->"cb729408-fa91-45df-acdb-30bdd1a725e8"], +Cell[2168958, 44483, 1207, 38, 57, "Output",ExpressionUUID->"75542468-48ec-4ff8-a22f-6c34054f28fb"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2170202, 44526, 2270, 56, 105, "Input",ExpressionUUID->"9a5ccd83-eb3c-4c36-b3af-ee05e38ca73c"], +Cell[2172475, 44584, 20955, 474, 531, "Output",ExpressionUUID->"65bcc5c5-0688-44c1-957f-cbc413daffec"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2193467, 45063, 969, 28, 55, "Input",ExpressionUUID->"0fca1f7d-de5c-4612-a519-21ba9c1fc6d4"], +Cell[2194439, 45093, 16663, 347, 226, "Output",ExpressionUUID->"0d5f8cbc-2c70-4ffb-819e-65593a755c77"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2211139, 45445, 1490, 39, 88, "Input",ExpressionUUID->"6459bbbb-2219-4d3b-abae-46f30f338dd6"], +Cell[2212632, 45486, 22326, 462, 317, "Output",ExpressionUUID->"55a47366-3c86-4fbf-89d1-56ca8b6051d8"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2234995, 45953, 1492, 39, 88, "Input",ExpressionUUID->"172ade52-bf8f-452c-a049-b4bf067dea13"], +Cell[2236490, 45994, 40671, 762, 317, "Output",ExpressionUUID->"1b28833d-960f-4f1e-bd91-35c66e2df63f"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[2277210, 46762, 156, 3, 33, "Subsubsection",ExpressionUUID->"795da5c1-b4d6-459c-98d3-232c1d1c121e"], +Cell[CellGroupData[{ +Cell[2277391, 46769, 3905, 103, 143, "Input",ExpressionUUID->"f7ea65c6-0702-443d-917a-3271c2330626"], +Cell[2281299, 46874, 2230, 51, 87, "Output",ExpressionUUID->"2c0dc553-4bda-42b8-a192-6443430e9f60"], +Cell[2283532, 46927, 3158, 74, 224, "Print",ExpressionUUID->"ba214c55-e592-407c-873f-1d6ac2dcedfa"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2286727, 47006, 1370, 33, 48, "Input",ExpressionUUID->"a059c68c-55ee-4f41-843f-0e4beea3d83d"], +Cell[2288100, 47041, 38859, 759, 358, "Output",ExpressionUUID->"e792ed8c-e828-4f34-9203-2a647a04c235"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2326996, 47805, 3492, 97, 143, "Input",ExpressionUUID->"7b41ef67-6714-425a-b787-737d0e979814"], +Cell[2330491, 47904, 3246, 50, 63, "Message",ExpressionUUID->"58b1743b-726c-4519-9132-62a0d005f519"], +Cell[2333740, 47956, 1956, 42, 87, "Output",ExpressionUUID->"81b1d857-2115-44d1-a112-0c1196e98d5f"], +Cell[2335699, 48000, 2801, 68, 231, "Print",ExpressionUUID->"fb76247e-c69e-482f-914a-a6bbdd901b0f"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2338537, 48073, 3512, 99, 143, "Input",ExpressionUUID->"c16f29f6-13d0-4952-8989-a6da0e4c9f2a"], +Cell[2342052, 48174, 4021, 61, 46, "Message",ExpressionUUID->"6e12b5bf-75a6-41b9-ab18-4d6e8ce0ff09"], +Cell[2346076, 48237, 2692, 64, 127, "Output",ExpressionUUID->"0e4ab51f-91fc-48dc-b11e-74c81bf0bbe9"], +Cell[2348771, 48303, 2807, 69, 231, "Print",ExpressionUUID->"0bc56279-8d57-45ca-ae17-fc2b034c080d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2351615, 48377, 3385, 97, 124, "Input",ExpressionUUID->"fc527673-fba1-416c-8d9f-891a47b30e07"], +Cell[2355003, 48476, 3282, 52, 63, "Message",ExpressionUUID->"43ac5757-0975-4d44-958b-526a85138610"], +Cell[2358288, 48530, 2880, 70, 231, "Print",ExpressionUUID->"a24c7cac-cc33-473e-b7ed-09df82cdca90"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2361205, 48605, 3400, 97, 143, "Input",ExpressionUUID->"e3b16e5d-ae18-42ed-afea-82863f45eb0a"], +Cell[2364608, 48704, 2718, 68, 214, "Print",ExpressionUUID->"52c694be-b5de-4671-9227-12a698e31511"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2367363, 48777, 3401, 95, 143, "Input",ExpressionUUID->"c2d60e3d-4d64-439d-b5f1-b8a8639ae541"], +Cell[2370767, 48874, 2003, 49, 87, "Output",ExpressionUUID->"178553f4-c694-427b-9a3e-86aaf01b5315"], +Cell[2372773, 48925, 2735, 69, 223, "Print",ExpressionUUID->"5d54fc1c-415a-45e2-8793-875d3395ce53"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2375545, 48999, 3339, 96, 143, "Input",ExpressionUUID->"90b1403f-09f2-43dc-ab86-39c6e34ac1ba"], +Cell[2378887, 49097, 2654, 67, 231, "Print",ExpressionUUID->"448954c3-4b8c-4ae9-900e-87b9b9ce36df"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2381578, 49169, 3380, 96, 143, "Input",ExpressionUUID->"c5867d15-affb-4f83-a970-58502ae71ab6"], +Cell[2384961, 49267, 2034, 50, 87, "Output",ExpressionUUID->"9a4fb0ec-cd66-456e-835e-6d436cbd7d05"], +Cell[2386998, 49319, 2679, 67, 231, "Print",ExpressionUUID->"f2944c76-6125-42de-9c7a-945ab662159a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2389714, 49391, 3613, 91, 406, "Input",ExpressionUUID->"141bf38d-c2c5-48bb-9032-5605f04bb986"], +Cell[2393330, 49484, 1714, 54, 68, "Output",ExpressionUUID->"2c1a6f30-deb3-42d6-8950-af7181d63d56"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2395081, 49543, 1795, 56, 207, "Input",ExpressionUUID->"882c4064-a2bb-45f0-ba21-eed2b7dfee7d"], +Cell[2396879, 49601, 1831, 45, 218, "Output",ExpressionUUID->"c34f4831-99f5-4642-b2dd-3e6e7cf55f49"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2398747, 49651, 5168, 131, 184, "Input",ExpressionUUID->"3c69d6bc-455b-4e7c-8ee6-355abc159580"], +Cell[2403918, 49784, 3243, 50, 63, "Message",ExpressionUUID->"62be9c73-e32f-4d98-89db-e9be32def3bc"], +Cell[CellGroupData[{ +Cell[2407186, 49838, 2247, 48, 72, "Print",ExpressionUUID->"37856ad8-140c-458d-abea-3eb9ff8417ec"], +Cell[2409436, 49888, 34512, 688, 339, "Print",ExpressionUUID->"baf9d57d-027c-4ffb-b08d-723e5a8a508b"], +Cell[2443951, 50578, 2946, 71, 231, "Print",ExpressionUUID->"c105aa19-e7d4-42b0-a9dc-ad6aac351ca6"] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[2446946, 50655, 296, 6, 26, "Input",ExpressionUUID->"1993fadf-9490-4358-a574-f28745037061"], +Cell[2447245, 50663, 1550, 37, 50, "Output",ExpressionUUID->"4abe87d7-27ca-46b1-a538-bd1bd5a81df1"] +}, Open ]], +Cell[2448810, 50703, 151, 3, 26, "Input",ExpressionUUID->"7fad1c66-1cd6-4763-a597-5196829fd2a5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2448998, 50711, 222, 4, 33, "Subsubsection",ExpressionUUID->"a46bc08d-2a3e-4fc6-b5e6-d8563708aeff"], +Cell[CellGroupData[{ +Cell[2449245, 50719, 2125, 57, 82, "Input",ExpressionUUID->"de2fcd2f-38d0-473f-be89-2d15deffcdd7"], +Cell[2451373, 50778, 282196, 4889, 360, "Output",ExpressionUUID->"602a29d0-0e2e-4208-88d0-48290282265a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[2733606, 55672, 2216, 57, 101, "Input",ExpressionUUID->"b1650a8b-406f-4152-a295-09148849643c"], +Cell[2735825, 55731, 274284, 4762, 576, "Output",ExpressionUUID->"52c1128b-4a6c-4506-aaea-9ac6e983aaa2"] +}, Open ]] +}, Closed]] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[3010182, 60501, 157, 3, 60, "Section",ExpressionUUID->"59823bf3-0206-4a75-bf96-0b1d632d400c"], +Cell[CellGroupData[{ +Cell[3010364, 60508, 151, 3, 48, "Subsection",ExpressionUUID->"c76fd690-4dfa-4319-a555-3596b82a35e7"], +Cell[CellGroupData[{ +Cell[3010540, 60515, 306, 7, 26, "Input",ExpressionUUID->"8bb941d9-e032-4bc9-bcc2-4dc7ec2bd917"], +Cell[3010849, 60524, 1262, 41, 117, "Output",ExpressionUUID->"f9762a34-954d-4245-ab9a-3ce085a18dda"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3012148, 60570, 316, 7, 26, "Input",ExpressionUUID->"13e29727-2f9c-4348-a8dc-a50537d40d25"], +Cell[3012467, 60579, 1597, 49, 117, "Output",ExpressionUUID->"8ec44973-3399-49a8-a558-9af354264350"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3014101, 60633, 348, 8, 41, "Input",ExpressionUUID->"0bc60b54-bb45-4263-a752-83a294c462e6"], +Cell[3014452, 60643, 202, 3, 29, "Output",ExpressionUUID->"c22639b8-5fe8-4ea4-9f75-85162efc62d3"] +}, Open ]], +Cell[3014669, 60649, 432, 11, 74, "Input",ExpressionUUID->"4e6e5662-9064-45a5-ab12-0cd860a459b8"], +Cell[CellGroupData[{ +Cell[3015126, 60664, 281, 6, 26, "Input",ExpressionUUID->"0ffb6086-5540-46f3-b60e-7ab8283006ed"], +Cell[3015410, 60672, 297, 6, 43, "Output",ExpressionUUID->"45a01882-55b5-4884-821e-a19409cab185"] +}, Open ]], +Cell[3015722, 60681, 313, 7, 31, "Text",ExpressionUUID->"93b865e9-a921-4b90-bd9c-19b5c5e8f975"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3016072, 60693, 150, 3, 48, "Subsection",ExpressionUUID->"875612af-fea9-475f-917d-3d926b1629f2"], +Cell[3016225, 60698, 244, 4, 26, "Input",ExpressionUUID->"4282ffbc-f897-4182-8f0c-bdec158908a7"], +Cell[CellGroupData[{ +Cell[3016494, 60706, 306, 7, 26, "Input",ExpressionUUID->"8f5c2fe3-94cf-48d1-98a9-b7eaaa519048"], +Cell[3016803, 60715, 4521, 150, 132, "Output",ExpressionUUID->"426660d9-e9a1-4552-b3c9-a127749fc87d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3021361, 60870, 314, 7, 26, "Input",ExpressionUUID->"71f64d67-0982-4c21-a781-e915b01a7af0"], +Cell[3021678, 60879, 5567, 178, 132, "Output",ExpressionUUID->"5a2e8a73-5d78-4d3b-9487-9fd4fab9c91e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3027282, 61062, 473, 12, 42, "Input",ExpressionUUID->"bc9e12a2-4bf5-459c-8b02-103dd4ed5b19"], +Cell[3027758, 61076, 365, 10, 45, "Output",ExpressionUUID->"1d728b97-9eed-40e5-8812-9f2494f8e682"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3028160, 61091, 562, 14, 42, "Input",ExpressionUUID->"08a80101-b01d-47b5-b3d0-e8c691604134"], +Cell[3028725, 61107, 638, 19, 45, "Output",ExpressionUUID->"592b6f93-bf51-43e2-837b-69eff1bc45e5"] +}, Open ]], +Cell[3029378, 61129, 767, 23, 42, "Input",ExpressionUUID->"485e6698-0874-458c-be2c-b684804f00ab"], +Cell[3030148, 61154, 640, 19, 42, "Input",ExpressionUUID->"7b329505-d845-4fe4-935b-edaae7501a25"], +Cell[3030791, 61175, 544, 15, 41, InheritFromParent,ExpressionUUID->"6ff45040-3f77-4ba2-8daf-5928e0161c88"], +Cell[CellGroupData[{ +Cell[3031360, 61194, 461, 13, 41, "Input",ExpressionUUID->"6784c224-d7e8-4585-98c7-26400ab199d4"], +Cell[3031824, 61209, 394, 12, 45, "Output",ExpressionUUID->"1cb766fe-bf56-4437-97e8-20b651f95239"] +}, Open ]], +Cell[3032233, 61224, 535, 15, 42, "Input",ExpressionUUID->"e8bff279-0c1a-456d-8a37-145123dca0bb"], +Cell[CellGroupData[{ +Cell[3032793, 61243, 546, 13, 26, "Input",ExpressionUUID->"2029250c-8fdc-451c-8889-f050acc3b510"], +Cell[3033342, 61258, 23425, 454, 233, "Output",ExpressionUUID->"4eb170f5-d433-4288-9b07-40aafc5a2875"] +}, Open ]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3056828, 61719, 157, 3, 48, "Section",ExpressionUUID->"61d15e14-b615-4a5e-a7aa-404c7a205325"], +Cell[CellGroupData[{ +Cell[3057010, 61726, 1303, 33, 28, "Input",ExpressionUUID->"0632fbf3-63f8-4f59-b1c2-cc8175161631"], +Cell[3058316, 61761, 385, 7, 30, "Output",ExpressionUUID->"bcdc10a9-e507-43a5-b844-de88de15ef94"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3058738, 61773, 2040, 49, 48, "Input",ExpressionUUID->"a40aea77-09bf-4f3d-8423-e1fbee28c678"], +Cell[3060781, 61824, 2010, 45, 230, "Output",ExpressionUUID->"f925ac81-a3d5-4607-88a5-0cd301f4683b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3062828, 61874, 2164, 56, 68, "Input",ExpressionUUID->"4cf7877f-11f3-41fd-a130-dbea82457812"], +Cell[3064995, 61932, 1424, 31, 230, "Output",ExpressionUUID->"16b61230-bb39-4a13-824d-1eb4ab314813"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3066456, 61968, 2185, 56, 68, "Input",ExpressionUUID->"918f4460-f93f-4d2b-a390-b503d533efbf"], +Cell[3068644, 62026, 1336, 29, 230, "Output",ExpressionUUID->"f4eeca3e-e5eb-4563-97bf-4998dc8f13dc"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3070017, 62060, 2729, 70, 88, "Input",ExpressionUUID->"f08e6844-e706-404f-ab6f-2c01558c9a38"], +Cell[3072749, 62132, 1373, 30, 230, "Output",ExpressionUUID->"80353c03-1457-4ac5-a68b-24caed61dc7c"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3074171, 62168, 161, 3, 48, "Section",ExpressionUUID->"566e0bb1-44f3-4fd6-93fd-55680abf1c6e"], +Cell[CellGroupData[{ +Cell[3074357, 62175, 153, 3, 49, "Subsection",ExpressionUUID->"93f596ca-102d-43a3-8d75-118c93bdc137"], +Cell[3074513, 62180, 223, 5, 31, "Text",ExpressionUUID->"5fa7476b-b686-4068-b6d6-52d0dc6a6b2d"], +Cell[3074739, 62187, 2819, 86, 136, "Input",ExpressionUUID->"0a685f80-721a-4011-a569-ced015f9b3ad", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[3077583, 62277, 1548, 36, 48, "Input",ExpressionUUID->"044116cc-b052-42c0-88bd-54b853590352"], +Cell[3079134, 62315, 840, 16, 23, "Message",ExpressionUUID->"7940c05a-b7b4-40ed-9913-e903c53d53dc"], +Cell[3079977, 62333, 840, 16, 23, "Message",ExpressionUUID->"bd5f7b18-4aa2-461d-bda6-016edacd5c79"], +Cell[3080820, 62351, 817, 16, 23, "Message",ExpressionUUID->"4dc2a87a-d8a9-40b7-9df6-f8f3ae29c494"], +Cell[3081640, 62369, 629, 13, 23, "Message",ExpressionUUID->"87fce9c0-e979-40a7-835f-74ad4a38d182"], +Cell[3082272, 62384, 40514, 805, 331, "Output",ExpressionUUID->"7d983109-7364-405f-92e5-1b8ccd1bf9ee"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3122823, 63194, 3494, 97, 124, "Input",ExpressionUUID->"de60fc66-4d0e-4b01-8e5c-8d41c70264c7"], +Cell[3126320, 63293, 889, 17, 23, "Message",ExpressionUUID->"b0ea24e1-def0-47cf-b838-b7a0fc7e00b6"], +Cell[3127212, 63312, 889, 17, 23, "Message",ExpressionUUID->"596bf8cc-7717-4778-9008-12d681ebd026"], +Cell[3128104, 63331, 868, 17, 23, "Message",ExpressionUUID->"6a8d687b-6bd6-4b6b-b307-c7e540e81b09"], +Cell[3128975, 63350, 680, 14, 23, "Message",ExpressionUUID->"bc8ace42-d1af-4e54-9707-85f5b1f8a17b"], +Cell[3129658, 63366, 4008, 62, 80, "Message",ExpressionUUID->"9c0d067a-3b9d-4c85-b599-0e5b39b03ef1"], +Cell[3133669, 63430, 2725, 69, 231, "Print",ExpressionUUID->"132345e5-b8de-44f3-8827-dc7b1a649e34"] +}, Open ]], +Cell[3136409, 63502, 2274, 52, 143, "Input",ExpressionUUID->"6d7a4316-2c80-4771-8862-68b30d4db3da"], +Cell[3138686, 63556, 431, 12, 26, "Input",ExpressionUUID->"3e443d05-9a6c-4216-a9c1-f5f84c47a28b"], +Cell[3139120, 63570, 2172, 58, 144, "Input",ExpressionUUID->"12425906-d272-4c01-8978-5fa95816e4d7"], +Cell[CellGroupData[{ +Cell[3141317, 63632, 301, 5, 26, "Input",ExpressionUUID->"c270935e-bf41-4889-92b0-890cbeb91ffb"], +Cell[3141621, 63639, 792, 15, 23, "Message",ExpressionUUID->"0d0c57e7-d224-4f62-8cbe-26fd1f219bf6"], +Cell[3142416, 63656, 794, 15, 23, "Message",ExpressionUUID->"1d06285b-ef7f-497d-b871-df258f4b080c"], +Cell[3143213, 63673, 771, 15, 23, "Message",ExpressionUUID->"1a3a04e5-c8d8-4a98-8958-77cb2fe3d7e9"], +Cell[3143987, 63690, 581, 12, 23, "Message",ExpressionUUID->"3105f5d9-c9e6-4409-b594-d4b752a32bd3"], +Cell[3144571, 63704, 1420, 25, 42, "Message",ExpressionUUID->"74ddf5be-6561-47fc-8806-899e1173baf5"], +Cell[3145994, 63731, 1418, 25, 42, "Message",ExpressionUUID->"3818b43e-06ea-45c9-b17e-b9fcc60b36eb"], +Cell[3147415, 63758, 1421, 25, 42, "Message",ExpressionUUID->"09d26c5f-a751-471a-aa1f-d470df8184a5"], +Cell[3148839, 63785, 576, 12, 23, "Message",ExpressionUUID->"b9021d77-882f-4879-a669-ca24b904c179"], +Cell[3149418, 63799, 7996, 180, 216, "Output",ExpressionUUID->"2b80e58f-428c-4563-b503-1558690ae93e"] +}, Open ]] +}, Closed]], +Cell[3157441, 63983, 151, 3, 35, "Subsection",ExpressionUUID->"bccf1217-df55-4d3f-a67f-f220fd9b7c14"] +}, Closed]], +Cell[CellGroupData[{ +Cell[3157629, 63991, 207, 3, 48, "Section",ExpressionUUID->"173cbd31-c127-462a-9060-7967130c2bb1"], +Cell[CellGroupData[{ +Cell[3157861, 63998, 147, 2, 49, "Subsection",ExpressionUUID->"e3f42931-0815-408b-ac8f-320ff914f89c"], +Cell[CellGroupData[{ +Cell[3158033, 64004, 1239, 31, 48, "Input",ExpressionUUID->"009622ee-4830-442a-b200-65a7f8cf4413"], +Cell[3159275, 64037, 35707, 693, 340, "Output",ExpressionUUID->"87967132-abd8-45b4-8f0f-ab2ec6c465a7"] +}, Open ]], +Cell[3194997, 64733, 1466, 36, 48, "Input",ExpressionUUID->"742eca25-68e9-4ce6-96e0-a12b7d8f3b28"], +Cell[3196466, 64771, 2036, 41, 432, "Input",ExpressionUUID->"83860d6a-5544-4b4b-b21c-6de5cb50c0a8"], +Cell[CellGroupData[{ +Cell[3198527, 64816, 3911, 103, 143, "Input",ExpressionUUID->"f5f79e48-2029-49bb-aa63-97469a79ad25"], +Cell[3202441, 64921, 5731, 153, 181, "Output",ExpressionUUID->"d40f3b9f-7718-4422-abfb-1dfad4cda647"], +Cell[3208175, 65076, 2854, 69, 231, "Print",ExpressionUUID->"2963daed-1d26-459e-8eef-fd5129978aa8"] +}, Open ]], +Cell[3211044, 65148, 335, 7, 31, "Text",ExpressionUUID->"8ffbe039-ac2d-4132-a285-44b8607294f9"], +Cell[CellGroupData[{ +Cell[3211404, 65159, 796, 19, 46, "Input",ExpressionUUID->"0fdcd118-4a43-49bd-af81-abcef7338c6f"], +Cell[3212203, 65180, 636, 14, 30, "Output",ExpressionUUID->"78bc2235-21da-41e0-b1d1-6794aef9930e"] +}, Open ]], +Cell[3212854, 65197, 514, 15, 31, "Text",ExpressionUUID->"5cf747c9-154e-4de0-ba9f-92dc5a3b5d61"], +Cell[CellGroupData[{ +Cell[3213393, 65216, 724, 18, 46, "Input",ExpressionUUID->"5be0e74b-5200-495d-87c4-8c0c909fd56a"], +Cell[3214120, 65236, 359, 9, 30, "Output",ExpressionUUID->"e3925dfe-9a82-498f-918d-9774446931b1"] +}, Open ]], +Cell[3214494, 65248, 609, 17, 31, "Text",ExpressionUUID->"f50d593e-2775-4983-87b0-e971be4244f0"], +Cell[CellGroupData[{ +Cell[3215128, 65269, 871, 21, 46, "Input",ExpressionUUID->"0456c932-e80f-4a41-b367-8f73a952075c"], +Cell[3216002, 65292, 241, 5, 30, "Output",ExpressionUUID->"27e7db5d-752f-455b-a620-71987a7da8ba"] +}, Open ]], +Cell[3216258, 65300, 444, 11, 31, "Text",ExpressionUUID->"8a160cc4-6695-4197-8963-95c5f328042c"], +Cell[CellGroupData[{ +Cell[3216727, 65315, 723, 18, 46, "Input",ExpressionUUID->"9c39bbdc-5856-4cf6-85e7-a5993f2e190b"], +Cell[3217453, 65335, 537, 13, 30, "Output",ExpressionUUID->"45ae0504-7e6c-4a2a-85bb-458db9c7c39c"] +}, Open ]], +Cell[3218005, 65351, 685, 18, 31, "Text",ExpressionUUID->"3c3f1e40-312a-41df-988e-17cd32481248"], +Cell[CellGroupData[{ +Cell[3218715, 65373, 721, 18, 46, "Input",ExpressionUUID->"e1c85c2f-0fde-4663-9816-5b814acea2dc"], +Cell[3219439, 65393, 166, 3, 30, "Output",ExpressionUUID->"060a47a4-b836-4aa4-8f54-c396dc1bb879"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3219642, 65401, 722, 18, 46, "Input",ExpressionUUID->"60d2b83f-887d-4838-9bbf-f94bbb2c8d29"], +Cell[3220367, 65421, 260, 5, 30, "Output",ExpressionUUID->"3670b37e-e7eb-452c-b850-3078959b7b3c"] +}, Open ]], +Cell[3220642, 65429, 563, 16, 31, "Text",ExpressionUUID->"796e0419-001c-4efc-a560-d5e6aa37e8da"], +Cell[CellGroupData[{ +Cell[3221230, 65449, 575, 14, 26, "Input",ExpressionUUID->"7f020f91-e91a-41f7-bdb8-0d7780d79000"], +Cell[3221808, 65465, 1207, 38, 57, "Output",ExpressionUUID->"a42d465f-7a69-49e2-a8f2-459ad2f72d97"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3223052, 65508, 1714, 45, 81, "Input",ExpressionUUID->"69cfd6a7-8b65-437b-8a0a-5079e060b8b4"], +Cell[3224769, 65555, 20355, 405, 329, "Output",ExpressionUUID->"811160a3-d85f-4f0c-b484-e072bfa2a624"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3245173, 65966, 151, 3, 35, "Subsection",ExpressionUUID->"1ea37c31-d94a-4415-aefe-7732066d4f30"], +Cell[3245327, 65971, 894, 26, 34, "Text",ExpressionUUID->"0a285b6f-a9b7-4fcd-b386-eb36fcd898d1"], +Cell[3246224, 65999, 1025, 27, 55, "Text",ExpressionUUID->"9b99270a-56e8-498e-851b-963722ee6767"] +}, Closed]] +}, Closed]] +}, Open ]], +Cell[CellGroupData[{ +Cell[3247310, 66033, 187, 3, 89, "Title",ExpressionUUID->"543a2e05-43c1-430d-b0d2-6caad7fe4ca3"], +Cell[CellGroupData[{ +Cell[3247522, 66040, 193, 3, 60, "Section",ExpressionUUID->"4133c8fd-f5a2-42de-a1e6-56f435fecf5e"], +Cell[CellGroupData[{ +Cell[3247740, 66047, 155, 3, 49, "Subsection",ExpressionUUID->"d0af0821-37d8-4bba-80f1-8624d4c75f06"], +Cell[3247898, 66052, 191, 3, 31, "Text",ExpressionUUID->"579f66a3-0e96-4244-8bdb-04cddec8356c"], +Cell[3248092, 66057, 1305, 31, 61, "Input",ExpressionUUID->"1cd8adee-e904-4d7e-9c8d-53799ac4602e", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[3249422, 66092, 1529, 34, 48, "Input",ExpressionUUID->"3abcdc6a-4612-47b2-b219-22fd5de22f39"], +Cell[3250954, 66128, 41071, 794, 339, "Output",ExpressionUUID->"5b8155f3-d509-488d-91a7-6e266e7a429c"] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[3292074, 66928, 203, 4, 49, "Subsection",ExpressionUUID->"fcede236-1735-45e3-b270-28ffe0fb3e4a"], +Cell[CellGroupData[{ +Cell[3292302, 66936, 248, 5, 26, "Input",ExpressionUUID->"92a26b6e-bf59-4a18-af5e-f498abf70a4d"], +Cell[3292553, 66943, 4570, 154, 129, "Output",ExpressionUUID->"5677527c-a7af-4b6f-8f73-0a43e7c31df2"] +}, Open ]], +Cell[3297138, 67100, 191, 3, 31, "Text",ExpressionUUID->"397ba0ba-91e4-4f5a-8f0d-0257e5c848ce"], +Cell[3297332, 67105, 1400, 32, 61, "Input",ExpressionUUID->"2d0a6b71-a35b-4eee-a7ef-a569c933f14a", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[3298757, 67141, 1968, 41, 48, "Input",ExpressionUUID->"a7e12bcd-a521-4201-8574-d9deecc0896c"], +Cell[3300728, 67184, 54360, 1013, 331, "Output",ExpressionUUID->"83b31b03-439c-425e-b046-7a05a10f6ee1"] +}, Open ]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3355149, 68204, 167, 3, 48, "Section",ExpressionUUID->"3b0990ee-511f-416b-a4bc-f5c7f6117606"], +Cell[CellGroupData[{ +Cell[3355341, 68211, 153, 3, 49, "Subsection",ExpressionUUID->"e2347259-0079-4fdc-aefc-303816be8d61"], +Cell[CellGroupData[{ +Cell[3355519, 68218, 1533, 39, 88, "Input",ExpressionUUID->"9ae18ff2-6556-4c15-a8c2-953a34805b2d"], +Cell[3357055, 68259, 22698, 492, 324, "Output",ExpressionUUID->"2fa60550-77eb-4d31-917f-f9b5e323d219"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3379790, 68756, 1501, 39, 88, "Input",ExpressionUUID->"4467579c-c5e0-4a28-9f8d-ac1535784066"], +Cell[3381294, 68797, 23509, 506, 324, "Output",ExpressionUUID->"0847812c-dff6-46c2-ac72-fcc62e819bb1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3404840, 69308, 1509, 39, 88, "Input",ExpressionUUID->"8bc26deb-518f-483b-b041-62d70e373525"], +Cell[3406352, 69349, 24777, 532, 327, "Output",ExpressionUUID->"a28c4daf-3f54-4f9a-97d8-2b1e8d1e699c"] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[3431178, 69887, 151, 3, 49, "Subsection",ExpressionUUID->"48603b7f-3465-4809-a221-f1026896d00c"], +Cell[CellGroupData[{ +Cell[3431354, 69894, 1580, 39, 88, "Input",ExpressionUUID->"c4ae8476-8ff5-4521-9b44-cde2c45daedb"], +Cell[3432937, 69935, 23505, 511, 319, "Output",ExpressionUUID->"1c6e8190-7223-40f3-8949-ab439c131a22"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3456479, 70451, 1623, 40, 88, "Input",ExpressionUUID->"01d01b7c-1d1b-4a07-a039-89526629b6fb"], +Cell[3458105, 70493, 26393, 562, 320, "Output",ExpressionUUID->"07f695c0-468b-4448-aaf8-8e1182a053ff"] +}, Open ]], +Cell[3484513, 71058, 117, 1, 26, "Input",ExpressionUUID->"6f2ef4a6-63a9-4073-833d-ea7294b487dc"], +Cell[CellGroupData[{ +Cell[3484655, 71063, 1552, 39, 88, "Input",ExpressionUUID->"023e28d8-3d5a-4abd-b059-fab3ba26fb57"], +Cell[3486210, 71104, 33370, 678, 320, "Output",ExpressionUUID->"b9511137-4c18-472b-a1eb-141f33a303fe"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3519617, 71787, 1524, 38, 88, "Input",ExpressionUUID->"dbe23c91-059c-4b34-a730-981ae080f005"], +Cell[3521144, 71827, 24247, 458, 314, "Output",ExpressionUUID->"8c62cd7a-0ba8-4628-bbbb-a653fec768a2"] +}, Open ]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3545452, 72292, 188, 3, 48, "Section",ExpressionUUID->"d7144ed8-b75e-4584-98e3-2404ccf2c65e"], +Cell[CellGroupData[{ +Cell[3545665, 72299, 221, 5, 49, "Subsection",ExpressionUUID->"99cd382b-a84a-4c98-a1ee-a804808bdb4b"], +Cell[CellGroupData[{ +Cell[3545911, 72308, 154, 3, 40, "Subsubsection",ExpressionUUID->"f81b48d4-6ca9-4e93-880f-1d0c41620c11"], +Cell[CellGroupData[{ +Cell[3546090, 72315, 3851, 102, 156, "Input",ExpressionUUID->"56c7956a-d243-4c5a-869d-eeb02e265b74"], +Cell[3549944, 72419, 2435, 67, 142, "Output",ExpressionUUID->"d6b8c97a-ba7a-406c-b3c1-3d0c8463e707"], +Cell[3552382, 72488, 2554, 64, 230, "Print",ExpressionUUID->"64027337-cddd-47e5-bb13-318061d95be7"] +}, Open ]], +Cell[3554951, 72555, 376, 8, 31, "Text",ExpressionUUID->"a4feeab0-8d6c-47ea-80b7-f6f56248271a"], +Cell[CellGroupData[{ +Cell[3555352, 72567, 851, 21, 45, "Input",ExpressionUUID->"01047b6f-9a55-438e-91a4-8daad1515403"], +Cell[3556206, 72590, 599, 14, 29, "Output",ExpressionUUID->"2e541eb4-5707-453f-8376-3d00dd22491f"] +}, Open ]], +Cell[3556820, 72607, 580, 17, 31, "Text",ExpressionUUID->"1a526bd8-e92b-4103-90e0-8bff5aa01299"], +Cell[CellGroupData[{ +Cell[3557425, 72628, 779, 20, 45, "Input",ExpressionUUID->"b4d6a8d7-ec2c-446a-aa6e-ae310f6d8126"], +Cell[3558207, 72650, 286, 7, 29, "Output",ExpressionUUID->"14d635c8-d511-4f8f-ae7e-6c2d05775fee"] +}, Open ]], +Cell[3558508, 72660, 760, 20, 31, "Text",ExpressionUUID->"f1b935df-0761-4fbc-a20b-a88f4391b42a"], +Cell[CellGroupData[{ +Cell[3559293, 72684, 869, 21, 45, "Input",ExpressionUUID->"ecf076fb-eee6-4aa0-9428-b9eefbc60f2e"], +Cell[3560165, 72707, 313, 7, 29, "Output",ExpressionUUID->"9fd5b233-6547-48b1-8de9-66f3c84c6988"] +}, Open ]], +Cell[3560493, 72717, 477, 12, 31, "Text",ExpressionUUID->"e2965313-bf9a-4d58-870d-802893aeef01"], +Cell[CellGroupData[{ +Cell[3560995, 72733, 830, 21, 45, "Input",ExpressionUUID->"b9e3a9ea-a8be-4740-b8ec-993e5e41a7bd"], +Cell[3561828, 72756, 219, 5, 29, "Output",ExpressionUUID->"188bc341-2d9c-44b1-9cf8-f3d087c4e9b0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3562084, 72766, 509, 13, 26, "Input",ExpressionUUID->"8991f457-97ad-4bc5-8018-21c1d5a6e921"], +Cell[3562596, 72781, 451, 14, 44, "Output",ExpressionUUID->"b73d09fe-d126-41f4-91a9-067a5d689713"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3563084, 72800, 922, 22, 45, "Input",ExpressionUUID->"9d3c5b74-d114-4ef1-af76-aa0587aa6642"], +Cell[3564009, 72824, 262, 5, 29, "Output",ExpressionUUID->"3eb7a652-bb30-4c3e-ba15-68a29919b5ae"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3564308, 72834, 777, 20, 45, "Input",ExpressionUUID->"2f059305-4b19-49a5-8ea0-9d942b559ba1"], +Cell[3565088, 72856, 290, 7, 29, "Output",ExpressionUUID->"a74a908a-6404-4b89-a689-77d51af41ff3"] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[3565427, 72869, 154, 3, 40, "Subsubsection",ExpressionUUID->"a2a91e79-cf2e-4d60-9f15-3349f1c10a38"], +Cell[CellGroupData[{ +Cell[3565606, 72876, 3640, 100, 156, "Input",ExpressionUUID->"335a7aa7-ff2b-4e95-a126-e6619f67c02a"], +Cell[3569249, 72978, 2231, 58, 105, "Output",ExpressionUUID->"04014854-6bf2-47b6-bd77-8eae538c3e93"], +Cell[3571483, 73038, 2912, 71, 230, "Print",ExpressionUUID->"461698f0-d264-40e1-9390-5b8125edb3bd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3574432, 73114, 1001, 23, 45, "Input",ExpressionUUID->"8c22c7f5-d97d-4ca7-b08b-aedf5c6f2e05"], +Cell[3575436, 73139, 332, 6, 29, "Output",ExpressionUUID->"0afb0921-243d-4bda-9c56-aacc15c6180c"] +}, Open ]], +Cell[3575783, 73148, 580, 17, 31, "Text",ExpressionUUID->"53847370-0e8f-43b1-b8f9-e9f320b5557d"], +Cell[CellGroupData[{ +Cell[3576388, 73169, 775, 20, 45, "Input",ExpressionUUID->"28276ba2-412e-4137-b3ab-4cf197031cf1"], +Cell[3577166, 73191, 191, 4, 29, "Output",ExpressionUUID->"ba210443-fa98-4637-b3c8-4f6f8da67639"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3577394, 73200, 775, 20, 45, "Input",ExpressionUUID->"334ddd4a-ba7f-4861-a414-4e5458f7eeb6"], +Cell[3578172, 73222, 501, 13, 29, "Output",ExpressionUUID->"5ca1f910-ed3d-498a-a58b-431916b5735a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3578710, 73240, 781, 20, 45, "Input",ExpressionUUID->"e1590da7-9c25-4b5e-94cf-55ad6b6b246d"], +Cell[3579494, 73262, 572, 12, 35, "Message",ExpressionUUID->"0971d34a-2dfc-4805-b321-a21a97370aa6"], +Cell[3580069, 73276, 192, 4, 29, "Output",ExpressionUUID->"bc571d62-5b5a-4a36-bb47-06a2fb1c7cf2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3580298, 73285, 777, 20, 45, "Input",ExpressionUUID->"2c552210-b526-436b-be2c-640ab5421247"], +Cell[3581078, 73307, 572, 12, 35, "Message",ExpressionUUID->"98c730f5-574c-4031-a56c-7b10d55feda9"], +Cell[3581653, 73321, 194, 4, 29, "Output",ExpressionUUID->"a6aecd0f-40f1-4007-8843-3e2c6541da31"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3581884, 73330, 775, 20, 45, "Input",ExpressionUUID->"bac6391f-5c90-40bf-b31b-96513a511b89"], +Cell[3582662, 73352, 548, 12, 35, "Message",ExpressionUUID->"9ebe4adc-d996-4d7c-a94c-9e7721f377cf"], +Cell[3583213, 73366, 219, 5, 29, "Output",ExpressionUUID->"5f48d0fc-f833-44be-b084-34eb830dc39f"] +}, Open ]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3583493, 73378, 161, 3, 35, "Subsection",ExpressionUUID->"3500dfdb-3b29-467e-aaf5-c3676fcd873b"], +Cell[CellGroupData[{ +Cell[3583679, 73385, 154, 3, 40, "Subsubsection",ExpressionUUID->"73101e70-d86c-456b-b379-a8ad4c1c9c2f"], +Cell[CellGroupData[{ +Cell[3583858, 73392, 3255, 93, 124, "Input",ExpressionUUID->"c90c31b6-dc92-4440-8c74-2e256971a963"], +Cell[3587116, 73487, 2305, 61, 231, "Print",ExpressionUUID->"89ab21a7-1c1c-428c-a9f7-966aa488341b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3589458, 73553, 3255, 93, 124, "Input",ExpressionUUID->"18489723-5a5f-4c79-af88-2b55464378e9"], +Cell[3592716, 73648, 2311, 61, 231, "Print",ExpressionUUID->"16f245ff-f49f-4824-849c-000293008195"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3595064, 73714, 3261, 94, 124, "Input",ExpressionUUID->"6beab092-00b7-47e5-8a3c-2d0a642e0727"], +Cell[3598328, 73810, 2304, 61, 231, "Print",ExpressionUUID->"b756acc6-6234-477f-99b3-e938f8a698ce"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3600681, 73877, 154, 3, 33, "Subsubsection",ExpressionUUID->"363c9830-99d2-4619-9537-99741119596b"], +Cell[CellGroupData[{ +Cell[3600860, 73884, 3314, 95, 124, "Input",ExpressionUUID->"25453783-8cf2-4af9-9b1e-f65c10f6b3f8"], +Cell[3604177, 73981, 2483, 39, 63, "Message",ExpressionUUID->"843cb4ce-0c40-4249-a1f1-7312f9c950bb"], +Cell[3606663, 74022, 2820, 70, 224, "Print",ExpressionUUID->"73da1e44-87ba-477d-b879-40016bb86635"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3609520, 74097, 3257, 93, 124, "Input",ExpressionUUID->"bfce9265-826f-414f-8fbd-e56e2b3ab796"], +Cell[3612780, 74192, 2642, 67, 230, "Print",ExpressionUUID->"a61703d4-ad7b-4373-844c-c4ddbe2db387"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3615459, 74264, 3401, 97, 157, "Input",ExpressionUUID->"598c186e-8111-4bfb-9b4f-f392b819386c"], +Cell[3618863, 74363, 1092, 24, 68, "Output",ExpressionUUID->"2d7ee757-bc61-405e-946f-2caee431254a"], +Cell[3619958, 74389, 2662, 66, 230, "Print",ExpressionUUID->"31945ad0-dc58-4036-8f12-5af4e6f68a1a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3622657, 74460, 3255, 93, 138, "Input",ExpressionUUID->"54327045-010b-4b65-a7d2-4b759cf46ced"], +Cell[3625915, 74555, 2643, 67, 230, "Print",ExpressionUUID->"620d824c-4b41-41a3-819a-262ec7d642c1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3628595, 74627, 3449, 96, 138, "Input",ExpressionUUID->"b8d545c6-81a7-4d3b-b47c-8fc881c530c8"], +Cell[3632047, 74725, 2776, 68, 230, "Print",ExpressionUUID->"c1fc9231-8e0e-46c8-84ca-dbe411513be0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[3634860, 74798, 3256, 93, 138, "Input",ExpressionUUID->"23a66bc0-8a2c-424c-816c-2703166f5df4"], +Cell[3638119, 74893, 2626, 66, 230, "Print",ExpressionUUID->"8afa458b-6e51-430e-b48f-bb41132ea304"] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[3640794, 74965, 222, 4, 33, "Subsubsection",ExpressionUUID->"72e295f6-49e6-4488-9f13-f591f507b640"], +Cell[CellGroupData[{ +Cell[3641041, 74973, 2076, 56, 82, "Input",ExpressionUUID->"4b94524e-d2b4-433b-b4b4-67276a56ea98"], +Cell[3643120, 75031, 454834, 7740, 352, "Output",ExpressionUUID->"e9944856-87ad-44f0-bbbb-be64f5621e0d"] +}, Open ]] +}, Closed]] +}, Open ]] +}, Closed]], +Cell[CellGroupData[{ +Cell[4098027, 82779, 157, 3, 48, "Section",ExpressionUUID->"1028af87-e00a-485f-a964-e2195d7f72bb"], +Cell[CellGroupData[{ +Cell[4098209, 82786, 151, 3, 49, "Subsection",ExpressionUUID->"0f8b992b-493a-44cb-a5fd-40fcffae4540"], +Cell[CellGroupData[{ +Cell[4098385, 82793, 359, 8, 26, "Input",ExpressionUUID->"cb1d231b-9c09-4092-8bc1-d377a5db8147"], +Cell[4098747, 82803, 1288, 42, 118, "Output",ExpressionUUID->"521a0cfc-7149-403d-8e83-74257f630e0d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4100072, 82850, 367, 8, 26, "Input",ExpressionUUID->"8045d5c4-afe7-4fe9-8260-f1a06e8a7a3f"], +Cell[4100442, 82860, 1294, 41, 118, "Output",ExpressionUUID->"c8f4b82f-05a3-47ef-98c5-1afb30ebcbf3"] +}, Open ]], +Cell[4101751, 82904, 392, 10, 60, "Input",ExpressionUUID->"834eca02-582f-4ce3-bb96-1b571a228597"], +Cell[4102146, 82916, 325, 7, 31, "Text",ExpressionUUID->"94c34547-b059-4293-aea0-5471bfea483e"] +}, Closed]], +Cell[CellGroupData[{ +Cell[4102508, 82928, 150, 3, 35, "Subsection",ExpressionUUID->"0fd431af-23ba-4723-ad15-7a48a0b7639e"], +Cell[4102661, 82933, 244, 4, 26, "Input",ExpressionUUID->"6cd46e1a-4338-4c46-ac1f-92df2f102ad0"], +Cell[CellGroupData[{ +Cell[4102930, 82941, 359, 8, 26, "Input",ExpressionUUID->"a9a22488-55d8-4a9e-bc82-97944583d0c0"], +Cell[4103292, 82951, 4549, 151, 127, "Output",ExpressionUUID->"7477b4c9-ec9a-4a36-8210-6e64d98e7dd7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4107878, 83107, 367, 8, 26, "Input",ExpressionUUID->"d5c56810-e234-4468-a1fe-c75b8dec17c1"], +Cell[4108248, 83117, 4933, 162, 127, "Output",ExpressionUUID->"36e713fd-6180-422c-aa06-fc75a1d2448d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4113218, 83284, 473, 12, 42, "Input",ExpressionUUID->"7fd9376d-cc64-47b3-a329-bfb72c76f804"], +Cell[4113694, 83298, 365, 10, 45, "Output",ExpressionUUID->"ffd163fc-1924-4599-8769-aaf637a07fe9"] +}, Open ]], +Cell[CellGroupData[{ +Cell[4114096, 83313, 562, 14, 42, "Input",ExpressionUUID->"9ce5eaf2-115b-4b61-86b6-90650d80f6ac"], +Cell[4114661, 83329, 638, 19, 45, "Output",ExpressionUUID->"1081430d-515a-472d-9c71-c51a1eb9901d"] +}, Open ]], +Cell[4115314, 83351, 767, 23, 42, "Input",ExpressionUUID->"a6315198-1693-4dba-a7a9-7d086adc8bf6"], +Cell[4116084, 83376, 640, 19, 42, "Input",ExpressionUUID->"8715de4c-64e4-4333-89dd-e717ee5903cb"], +Cell[4116727, 83397, 544, 15, 42, "Input",ExpressionUUID->"e04607f5-a828-4356-a612-c66d2fe3204b"], +Cell[CellGroupData[{ +Cell[4117296, 83416, 461, 13, 42, "Input",ExpressionUUID->"4a49486c-8597-4978-9a89-a6621e300c52"], +Cell[4117760, 83431, 394, 12, 45, "Output",ExpressionUUID->"883091c1-e039-48c9-b0ff-e95bc361ea98"] +}, Open ]], +Cell[4118169, 83446, 535, 15, 42, "Input",ExpressionUUID->"ee43965f-298f-45d1-a648-e6c96be60017"], +Cell[CellGroupData[{ +Cell[4118729, 83465, 546, 13, 28, "Input",ExpressionUUID->"08913359-9bbb-43bb-b9ff-d738ea1d4a49"], +Cell[4119278, 83480, 23425, 454, 212, "Output",ExpressionUUID->"38bab27b-9172-4867-a690-cffcf270d3a1"] +}, Open ]] +}, Closed]] +}, Closed]] +}, Open ]] +} +] +*) + diff --git a/Notebooks/RadiusConv.nb b/Notebooks/RadiusConv.nb new file mode 100644 index 0000000..afc153b --- /dev/null +++ b/Notebooks/RadiusConv.nb @@ -0,0 +1,24194 @@ +(* Content-type: application/vnd.wolfram.mathematica *) + +(*** Wolfram Notebook File ***) +(* http://www.wolfram.com/nb *) + +(* CreatedBy='Mathematica 12.1' *) + +(*CacheID: 234*) +(* Internal cache information: +NotebookFileLineBreakTest +NotebookFileLineBreakTest +NotebookDataPosition[ 158, 7] +NotebookDataLength[ 1243138, 24186] +NotebookOptionsPosition[ 1231749, 24023] +NotebookOutlinePosition[ 1232183, 24040] +CellTagsIndexPosition[ 1232140, 24037] +WindowFrame->Normal*) + +(* Beginning of Notebook Content *) +Notebook[{ + +Cell[CellGroupData[{ +Cell["Initialisation", "Title", + CellChangeTimes->{{3.799388789459779*^9, + 3.799388801761128*^9}},ExpressionUUID->"6dba7327-84eb-42a4-9d52-\ +a17e6ddb1f50"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["Y", + RowBox[{"\[ScriptL]_", ",", "m_"}]], "[", + RowBox[{"\[Theta]_", ",", "\[Phi]_"}], "]"}], "=", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"\[ScriptL]", ",", "m", ",", "\[Theta]", ",", "\[Phi]"}], "]"}]}], + ";"}]], "Input", + InitializationCell->True, + CellLabel->"In[56]:=",ExpressionUUID->"74052da7-e177-462b-aedd-63ebc6d138ac"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["Y", "\[ScriptL]_"], "[", "\[Theta]_", "]"}], "=", + RowBox[{"SphericalHarmonicY", "[", + RowBox[{"\[ScriptL]", ",", "0", ",", "\[Theta]", ",", "\[Phi]"}], "]"}]}], + ";"}]], "Input", + InitializationCell->True, + CellLabel->"In[57]:=",ExpressionUUID->"ad475565-c84e-4d51-a257-4c3ed8f0037c"], + +Cell[BoxData[{ + RowBox[{"Needs", "[", "\"\\"", "]"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"SetOptions", "[", + RowBox[{"MaTeX", ",", + RowBox[{"\"\\"", "\[Rule]", + RowBox[{"{", + RowBox[{ + "\"\<\\\\usepackage{amssymb,amsmath,latexsym,amsfonts,amsthm,xcolor,bm,\ +mhchem}\>\"", ",", "\"\<\\\\definecolor{darkgreen}{RGB}{0, 180, 0}\>\"", ",", + "\"\<\\\\definecolor{darkcyan}{RGB}{0, 180, 180}\>\"", ",", + "\"\<\\\\definecolor{darkmagenta}{RGB}{180,0, 180}\>\""}], "}"}]}]}], + "]"}], ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{ + 3.804247120805704*^9, {3.804408258597108*^9, 3.804408258938525*^9}}, + CellLabel->"In[58]:=",ExpressionUUID->"c5807b5d-14b9-4d19-84e3-327d44a92896"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Radius of convergence", "Title", + CellChangeTimes->{{3.804408397046262*^9, + 3.804408400696928*^9}},ExpressionUUID->"1127f5a4-e9d6-44ee-bafc-\ +74d0b6d991e1"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "i_"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + SubscriptBox["Y", "i"], "[", "\[Theta]", "]"}]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.804391528664617*^9, 3.80439154038262*^9}, + 3.8044085193288927`*^9}, + CellLabel->"In[60]:=",ExpressionUUID->"17a9a8c0-5a36-4358-a4f3-f51b18bf8a93"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Phi]", "i_"], "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]", "i"], "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[Psi]", "i"], "[", "\[Theta]2", "]"}]}]}], ";"}]], "Input",\ + + InitializationCell->True, + CellChangeTimes->{{3.80439155213902*^9, 3.804391614169881*^9}, + 3.804408523174728*^9}, + CellLabel->"In[61]:=",ExpressionUUID->"7a475b23-a007-4768-85bd-82ac8c3db795"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["P", "l_"], "[", "\[Theta]_", "]"}], "=", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}]], + RowBox[{"4", " ", "\[Pi]", " "}]], " ", + RowBox[{"LegendreP", "[", + RowBox[{"l", ",", + RowBox[{"Cos", "[", "\[Theta]", "]"}]}], "]"}]}]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8044085288064938`*^9, 3.80440853251235*^9}}, + CellLabel->"In[62]:=",ExpressionUUID->"8dbeba3a-5485-4cfd-ab87-e1d4b4e11eae"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Epsilon]", "l_"], "=", + RowBox[{ + FractionBox[ + RowBox[{"l", " ", + RowBox[{"(", + RowBox[{"l", "+", "1"}], ")"}]}], + RowBox[{"2", " ", + SuperscriptBox["R", "2"]}]], " ", "+", + FractionBox["2", "R"], "-", + FractionBox["1", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}], "R"}]]}]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.804393356833346*^9, 3.804393368422826*^9}, + 3.8044090673964977`*^9}, + CellLabel->"In[63]:=",ExpressionUUID->"60d881a4-2790-41d4-96cd-3452d9f66da5"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"2", + SubscriptBox["\[Epsilon]", "l"]}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0", ",", "8"}], "}"}]}], "]"}], "]"}], + ";"}]], "Input", + CellChangeTimes->{{3.8043935598362103`*^9, 3.804393630077115*^9}, { + 3.804394209587961*^9, 3.804394220468192*^9}, 3.804396474143365*^9, { + 3.804409049316626*^9, 3.804409065533618*^9}, 3.804409102228443*^9}, + CellLabel->"In[12]:=",ExpressionUUID->"23acc056-7dd6-45b3-93ee-de0c19f80c01"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"HnRMP", "[", "R_", "]"}], "=", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox["2", "R"], "0", "0", "0", "0", "0", "0", "0", "0"}, + {"0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["5", + RowBox[{"3", " ", "R"}]]}], ")"}]}], "0", "0", "0", "0", "0", "0", + "0"}, + {"0", "0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["3", + SuperscriptBox["R", "2"]], "+", + FractionBox["9", + RowBox[{"5", " ", "R"}]]}], ")"}]}], "0", "0", "0", "0", "0", "0"}, + {"0", "0", "0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["6", + SuperscriptBox["R", "2"]], "+", + FractionBox["13", + RowBox[{"7", " ", "R"}]]}], ")"}]}], "0", "0", "0", "0", "0"}, + {"0", "0", "0", "0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["10", + SuperscriptBox["R", "2"]], "+", + FractionBox["17", + RowBox[{"9", " ", "R"}]]}], ")"}]}], "0", "0", "0", "0"}, + {"0", "0", "0", "0", "0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["15", + SuperscriptBox["R", "2"]], "+", + FractionBox["21", + RowBox[{"11", " ", "R"}]]}], ")"}]}], "0", "0", "0"}, + {"0", "0", "0", "0", "0", "0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["21", + SuperscriptBox["R", "2"]], "+", + FractionBox["25", + RowBox[{"13", " ", "R"}]]}], ")"}]}], "0", "0"}, + {"0", "0", "0", "0", "0", "0", "0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["28", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"15", " ", "R"}]]}], ")"}]}], "0"}, + {"0", "0", "0", "0", "0", "0", "0", "0", + RowBox[{"2", " ", + RowBox[{"(", + RowBox[{ + FractionBox["36", + SuperscriptBox["R", "2"]], "+", + FractionBox["33", + RowBox[{"17", " ", "R"}]]}], ")"}]}]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.804396491920699*^9, 3.804396491924327*^9}, + 3.8044092629748297`*^9}, + CellLabel->"In[64]:=",ExpressionUUID->"8b33ed16-8049-49bc-b98d-06f7b7f951f6"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"T", "[", "R_", "]"}], "=", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + RowBox[{"KroneckerDelta", "[", + RowBox[{"i", ",", "j"}], "]"}], "i", + RowBox[{"(", + RowBox[{"i", "+", "1"}], ")"}]}], ",", + RowBox[{"{", + RowBox[{"i", ",", "0", ",", "8"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0", ",", "8"}], "}"}]}], "]"}]}]}], ";"}]], "Input",\ + + InitializationCell->True, + CellChangeTimes->{{3.804395897385292*^9, 3.804395904901969*^9}, + 3.804408601413072*^9, {3.8044091120917797`*^9, 3.804409113809857*^9}, { + 3.804410032030712*^9, 3.8044100339715977`*^9}, {3.8044107645203648`*^9, + 3.804410790171336*^9}}, + CellLabel->"In[65]:=",ExpressionUUID->"022ec2a6-f437-4f30-a1ef-1856225f22ba"], + +Cell[BoxData[ + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + {"0", "0", "0", "0", "0", "0", "0", "0", "0"}, + {"0", + FractionBox["2", + SuperscriptBox["R", "2"]], "0", "0", "0", "0", "0", "0", "0"}, + {"0", "0", + FractionBox["6", + SuperscriptBox["R", "2"]], "0", "0", "0", "0", "0", "0"}, + {"0", "0", "0", + FractionBox["12", + SuperscriptBox["R", "2"]], "0", "0", "0", "0", "0"}, + {"0", "0", "0", "0", + FractionBox["20", + SuperscriptBox["R", "2"]], "0", "0", "0", "0"}, + {"0", "0", "0", "0", "0", + FractionBox["30", + SuperscriptBox["R", "2"]], "0", "0", "0"}, + {"0", "0", "0", "0", "0", "0", + FractionBox["42", + SuperscriptBox["R", "2"]], "0", "0"}, + {"0", "0", "0", "0", "0", "0", "0", + FractionBox["56", + SuperscriptBox["R", "2"]], "0"}, + {"0", "0", "0", "0", "0", "0", "0", "0", + FractionBox["72", + SuperscriptBox["R", "2"]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]], "Input",ExpressionUUID->"9b77b2d2-5bd1-4df8-\ +9b69-0f30339dcb70"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"vsh", "[", + RowBox[{"i_", ",", "j_", ",", "n_"}], "]"}], ":=", + RowBox[{ + FractionBox["1", "R"], " ", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"l", "=", "0"}], + RowBox[{"2", "n"}]], + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0"}], "}"}]}], "]"}], "4"]}]}]}]}]], "Input", + CellChangeTimes->{{3.804409574827076*^9, 3.804409594265134*^9}, { + 3.8044096480979433`*^9, 3.804409681869124*^9}}, + CellLabel->"In[11]:=",ExpressionUUID->"fc80a633-b236-4b5e-8093-837528eba331"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"vsh", "[", + RowBox[{"i", ",", "j", ",", + RowBox[{"i", "+", "j"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"i", ",", "0", ",", "8"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0", ",", "8"}], "}"}]}], "]"}], "//", "N"}]], "Input",\ + + CellChangeTimes->{{3.8044097784569817`*^9, 3.8044097977558203`*^9}}, + CellLabel->"In[14]:=",ExpressionUUID->"fdc1111b-5988-4550-b785-dc186734e360"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"Vsh", "[", "R_", "]"}], "=", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", + FractionBox["0.3333333333333333`", "R"], ",", + FractionBox["0.2`", "R"], ",", + FractionBox["0.14285714285714285`", "R"], ",", + FractionBox["0.1111111111111111`", "R"], ",", + FractionBox["0.09090909090909091`", "R"], ",", + FractionBox["0.07692307692307693`", "R"], ",", + FractionBox["0.06666666666666667`", "R"], ",", + FractionBox["0.058823529411764705`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.3333333333333333`", "R"], ",", + FractionBox["1.16`", "R"], ",", + FractionBox["0.3768707482993197`", "R"], ",", + FractionBox["0.23894179894179896`", "R"], ",", + FractionBox["0.17771406083094396`", "R"], ",", + FractionBox["0.14227083457852688`", "R"], ",", + FractionBox["0.11891502436956983`", "R"], ",", + FractionBox["0.10227882311991975`", "R"], ",", + FractionBox["0.08979197219053826`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.2`", "R"], ",", + FractionBox["0.3768707482993197`", "R"], ",", + FractionBox["1.163265306122449`", "R"], ",", + FractionBox["0.3735274826183917`", "R"], ",", + FractionBox["0.2394342476260558`", "R"], ",", + FractionBox["0.18040103974169908`", "R"], ",", + FractionBox["0.146121949770896`", "R"], ",", + FractionBox["0.12336704694085163`", "R"], ",", + FractionBox["0.10701846146841107`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.14285714285714285`", "R"], ",", + FractionBox["0.23894179894179896`", "R"], ",", + FractionBox["0.3735274826183917`", "R"], ",", + FractionBox["1.1585046810221635`", "R"], ",", + FractionBox["0.36821375982215143`", "R"], ",", + FractionBox["0.23639936203151535`", "R"], ",", + FractionBox["0.1789388409525929`", "R"], ",", + FractionBox["0.1457035485478321`", "R"], ",", + FractionBox["0.123649435931834`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.1111111111111111`", "R"], ",", + FractionBox["0.17771406083094396`", "R"], ",", + FractionBox["0.2394342476260558`", "R"], ",", + FractionBox["0.36821375982215143`", "R"], ",", + FractionBox["1.1538451523898603`", "R"], ",", + FractionBox["0.36372465712226587`", "R"], ",", + FractionBox["0.23326087447106705`", "R"], ",", + FractionBox["0.17682041129967005`", "R"], ",", + FractionBox["0.14432821252077524`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.09090909090909091`", "R"], ",", + FractionBox["0.14227083457852688`", "R"], ",", + FractionBox["0.18040103974169908`", "R"], ",", + FractionBox["0.23639936203151535`", "R"], ",", + FractionBox["0.36372465712226587`", "R"], ",", + FractionBox["1.150007604086675`", "R"], ",", + FractionBox["0.36012786983290884`", "R"], ",", + FractionBox["0.230517596686319`", "R"], ",", + FractionBox["0.17475900884511636`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.07692307692307693`", "R"], ",", + FractionBox["0.11891502436956983`", "R"], ",", + FractionBox["0.146121949770896`", "R"], ",", + FractionBox["0.1789388409525929`", "R"], ",", + FractionBox["0.23326087447106705`", "R"], ",", + FractionBox["0.36012786983290884`", "R"], ",", + FractionBox["1.1469018642211581`", "R"], ",", + FractionBox["0.35723120605820047`", "R"], ",", + FractionBox["0.2281924994972908`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.06666666666666667`", "R"], ",", + FractionBox["0.10227882311991975`", "R"], ",", + FractionBox["0.12336704694085163`", "R"], ",", + FractionBox["0.1457035485478321`", "R"], ",", + FractionBox["0.17682041129967005`", "R"], ",", + FractionBox["0.230517596686319`", "R"], ",", + FractionBox["0.35723120605820047`", "R"], ",", + FractionBox["1.1443650135634595`", "R"], ",", + FractionBox["0.35486187367716066`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.058823529411764705`", "R"], ",", + FractionBox["0.08979197219053826`", "R"], ",", + FractionBox["0.10701846146841107`", "R"], ",", + FractionBox["0.123649435931834`", "R"], ",", + FractionBox["0.14432821252077524`", "R"], ",", + FractionBox["0.17475900884511636`", "R"], ",", + FractionBox["0.2281924994972908`", "R"], ",", + FractionBox["0.35486187367716066`", "R"], ",", + FractionBox["1.1422625061276128`", "R"]}], "}"}]}], "}"}]}], + ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.804409806833152*^9, 3.804409818080093*^9}}, + CellLabel->"In[66]:=",ExpressionUUID->"fd53c6d1-f2cf-48f2-b4ff-64901727752a"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{ + FractionBox[ + RowBox[{"8", + SuperscriptBox["\[Pi]", "2"]}], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{ + SubscriptBox["P", "l"], "[", "\[Theta]", "]"}], + FractionBox["1", + RowBox[{"2", + RowBox[{"Sin", "[", + RowBox[{"\[Theta]", "/", "2"}], "]"}]}]], + RowBox[{ + SubscriptBox["P", "m"], "[", "\[Theta]", "]"}], + RowBox[{"Sin", "[", "\[Theta]", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]"}]}]}]}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0", ",", "8"}], "}"}], ",", + RowBox[{"{", + RowBox[{"m", ",", "0", ",", "8"}], "}"}]}], "]"}], "//", "N"}]], "Input",\ + + CellChangeTimes->{{3.804409900830428*^9, + 3.8044099016034107`*^9}},ExpressionUUID->"8c748381-428e-4587-ab77-\ +589a7aee771a"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"Vcsf", "[", "R_", "]"}], "=", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", + FractionBox["0.5773502691896258`", "R"], ",", + FractionBox["0.4472135954999579`", "R"], ",", + FractionBox["0.3779644730092272`", "R"], ",", + FractionBox["0.3333333333333333`", "R"], ",", + FractionBox["0.30151134457776363`", "R"], ",", + FractionBox["0.2773500981126146`", "R"], ",", + FractionBox["0.2581988897471611`", "R"], ",", + FractionBox["0.24253562503633297`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.5773502691896258`", "R"], ",", + FractionBox["1.4`", "R"], ",", + FractionBox["0.848367780597815`", "R"], ",", + FractionBox["0.6837493894061095`", "R"], ",", + FractionBox["0.592346380077668`", "R"], ",", + FractionBox["0.5311600271468729`", "R"], ",", + FractionBox["0.48620730337181`", "R"], ",", + FractionBox["0.45126077735968606`", "R"], ",", + FractionBox["0.4230319832800408`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.4472135954999579`", "R"], ",", + FractionBox["0.848367780597815`", "R"], ",", + FractionBox["1.5714285714285714`", "R"], ",", + FractionBox["0.9885743706824466`", "R"], ",", + FractionBox["0.8114774831432803`", "R"], ",", + FractionBox["0.7117377302633934`", "R"], ",", + FractionBox["0.6440520175728418`", "R"], ",", + FractionBox["0.5936999228322687`", "R"], ",", + FractionBox["0.5541199346189097`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.3779644730092272`", "R"], ",", + FractionBox["0.6837493894061095`", "R"], ",", + FractionBox["0.9885743706824466`", "R"], ",", + FractionBox["1.6815850815850817`", "R"], ",", + FractionBox["1.0845553992409294`", "R"], ",", + FractionBox["0.900512006141845`", "R"], ",", + FractionBox["0.7959982094351871`", "R"], ",", + FractionBox["0.7245684949157892`", "R"], ",", + FractionBox["0.6710809207892108`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.3333333333333333`", "R"], ",", + FractionBox["0.592346380077668`", "R"], ",", + FractionBox["0.8114774831432803`", "R"], ",", + FractionBox["1.0845553992409294`", "R"], ",", + FractionBox["1.7630017041781747`", "R"], ",", + FractionBox["1.1578091708471627`", "R"], ",", + FractionBox["0.9692291776523858`", "R"], ",", + FractionBox["0.8615000962930917`", "R"], ",", + FractionBox["0.787532983589977`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.30151134457776363`", "R"], ",", + FractionBox["0.5311600271468729`", "R"], ",", + FractionBox["0.7117377302633934`", "R"], ",", + FractionBox["0.900512006141845`", "R"], ",", + FractionBox["1.1578091708471627`", "R"], ",", + FractionBox["1.82765737874097`", "R"], ",", + FractionBox["1.2171341675960432`", "R"], ",", + FractionBox["1.0253250611469975`", "R"], ",", + FractionBox["0.9152400219292804`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.2773500981126146`", "R"], ",", + FractionBox["0.48620730337181`", "R"], ",", + FractionBox["0.6440520175728418`", "R"], ",", + FractionBox["0.7959982094351871`", "R"], ",", + FractionBox["0.9692291776523858`", "R"], ",", + FractionBox["1.2171341675960432`", "R"], ",", + FractionBox["1.8813088755369007`", "R"], ",", + FractionBox["1.2670212868739044`", "R"], ",", + FractionBox["1.072783723443656`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.2581988897471611`", "R"], ",", + FractionBox["0.45126077735968606`", "R"], ",", + FractionBox["0.5936999228322687`", "R"], ",", + FractionBox["0.7245684949157892`", "R"], ",", + FractionBox["0.8615000962930917`", "R"], ",", + FractionBox["1.0253250611469975`", "R"], ",", + FractionBox["1.2670212868739044`", "R"], ",", + FractionBox["1.9271727209854121`", "R"], ",", + FractionBox["1.3100807176325626`", "R"]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox["0.24253562503633297`", "R"], ",", + FractionBox["0.4230319832800408`", "R"], ",", + FractionBox["0.5541199346189097`", "R"], ",", + FractionBox["0.6710809207892108`", "R"], ",", + FractionBox["0.787532983589977`", "R"], ",", + FractionBox["0.9152400219292804`", "R"], ",", + FractionBox["1.072783723443656`", "R"], ",", + FractionBox["1.3100807176325626`", "R"], ",", + FractionBox["1.9672311134494134`", "R"]}], "}"}]}], "}"}]}], + ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8044098825052233`*^9, 3.804409891609704*^9}}, + CellLabel->"In[67]:=",ExpressionUUID->"cee6101f-dde7-4083-9781-24562e050470"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"HMPsh", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{ + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"HnRMP", "[", "R", "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"T", " ", "[", "R", "]"}], "+", " ", + RowBox[{"Vsh", "[", "R", "]"}], "-", + RowBox[{"HnRMP", "[", "R", "]"}]}], ")"}]}]}], ",", "n", ",", "n"}], + "]"}], "//", "N"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"HMPcsf", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{ + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"HnRMP", "[", "R", "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"Vcsf", "[", "R", "]"}], "-", + RowBox[{"HnRMP", "[", "R", "]"}]}], ")"}]}]}], ",", "n", ",", "n"}], + "]"}], "//", "N"}]}], ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.80440992911344*^9, 3.804409987843972*^9}, { + 3.8044100510116796`*^9, 3.804410092365405*^9}, {3.804410154292541*^9, + 3.804410156907837*^9}, {3.804410236276599*^9, 3.804410239473043*^9}, { + 3.804410609272957*^9, 3.804410616666676*^9}, {3.8044106495953197`*^9, + 3.80441065356222*^9}, {3.804410820160397*^9, 3.8044108344577837`*^9}}, + CellLabel->"In[68]:=",ExpressionUUID->"d5f4a381-9302-4181-9b7c-30defacf3510"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"HWCEsh", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"T", " ", "[", "R", "]"}], "+", " ", + RowBox[{"\[Lambda]", " ", + RowBox[{"Vsh", "[", "R", "]"}]}]}], ",", "n", ",", "n"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"HWCEcsf", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"Vcsf", "[", "R", "]"}]}]}], ",", "n", ",", "n"}], "]"}]}], + ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.804410252874078*^9, 3.804410303352818*^9}}, + CellLabel->"In[70]:=",ExpressionUUID->"5c8f3365-cc2c-404c-9ffa-cf0230be3731"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"HSCEsh", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Lambda]", " ", + RowBox[{"T", "[", "R", "]"}]}], "+", + RowBox[{"Vsh", "[", "R", "]"}]}], ",", "n", ",", "n"}], "]"}]}], + ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"HSCEcsf", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"\[Lambda]", " ", + RowBox[{"T", "[", "R", "]"}]}], "+", + RowBox[{"Vcsf", "[", "R", "]"}]}], ",", "n", ",", "n"}], "]"}]}], + ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8044102928995867`*^9, 3.804410318930587*^9}}, + CellLabel->"In[72]:=",ExpressionUUID->"f6ba07cb-f7c0-4c47-b909-a492963d4cd1"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{ + RowBox[{"HENsh", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"Vsh", "[", "R", "]"}]}], "]"}], "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"Vsh", "[", "R", "]"}], "-", + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"Vsh", "[", "R", "]"}]}], "]"}], "]"}]}], ")"}]}]}], ",", + "n", ",", "n"}], "]"}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"HENcsf", "[", + RowBox[{"\[Lambda]_", ",", "R_", ",", "n_"}], "]"}], ":=", + RowBox[{"Take", "[", + RowBox[{ + RowBox[{ + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"Vcsf", "[", "R", "]"}]}], "]"}], "]"}], "+", + RowBox[{"\[Lambda]", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"Vcsf", "[", "R", "]"}], "-", + RowBox[{"DiagonalMatrix", "[", + RowBox[{"Diagonal", "[", + RowBox[{ + RowBox[{"T", "[", "R", "]"}], "+", + RowBox[{"Vcsf", "[", "R", "]"}]}], "]"}], "]"}]}], ")"}]}]}], ",", + "n", ",", "n"}], "]"}]}], ";"}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.804410366354959*^9, 3.804410379079319*^9}, { + 3.8044104128414717`*^9, 3.804410443932218*^9}}, + CellLabel->"In[74]:=",ExpressionUUID->"98e09b3a-1cb8-46a6-ab74-27973ed7a6a9"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R_", ",", "H_", ",", "n_"}], "]"}], ":=", + RowBox[{"Module", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"P", ",", "dPd\[Epsilon]", ",", "EP", ",", "\[Lambda]EP"}], + "}"}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], ":=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"H", "[", + RowBox[{"\[Lambda]", ",", "R", ",", "n"}], "]"}], ",", + "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], ":=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}], ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], ";", + "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], "}"}], ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"Abs", "[", "\[Lambda]EP", "]"}], "//", "Sort"}], "//", + "First"}]}]}], "]"}]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8044101757417593`*^9, 3.8044101873381977`*^9}, { + 3.8044105203537493`*^9, 3.8044105261836853`*^9}}, + CellLabel->"In[76]:=",ExpressionUUID->"68497eca-5b08-4de6-a371-85920d09fc51"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"DomSing", "[", + RowBox[{"R_", ",", "H_", ",", "n_"}], "]"}], ":=", + RowBox[{"Module", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"P", ",", "dPd\[Epsilon]", ",", "EP", ",", "\[Lambda]EP"}], + "}"}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], ":=", + RowBox[{"CharacteristicPolynomial", "[", + RowBox[{ + RowBox[{"H", "[", + RowBox[{"\[Lambda]", ",", "R", ",", "n"}], "]"}], ",", + "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]_", ",", "\[Epsilon]_"}], "]"}], ":=", + RowBox[{"D", "[", + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], ",", "\[Epsilon]"}], + "]"}]}], ";", "\[IndentingNewLine]", + RowBox[{"EP", "=", + RowBox[{"NSolve", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"P", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}], ",", + RowBox[{ + RowBox[{"dPd\[Epsilon]", "[", + RowBox[{"\[Lambda]", ",", "\[Epsilon]"}], "]"}], "\[Equal]", + "0"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Epsilon]", ",", "\[Lambda]"}], "}"}], ",", + RowBox[{"WorkingPrecision", "\[Rule]", "30"}]}], "]"}]}], ";", + "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{"\[Lambda]EP", "=", + RowBox[{"\[Lambda]", "/.", "EP"}]}], "}"}], ";", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"SortBy", "[", + RowBox[{"\[Lambda]EP", ",", "Abs", ",", "NumericalOrder"}], "]"}], "//", + "First"}]}]}], "]"}]}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.804565634992112*^9, 3.804565651828086*^9}, { + 3.804566947738736*^9, 3.804566961156354*^9}}, + CellLabel->"In[77]:=",ExpressionUUID->"f54b0f77-159c-4fe7-b395-a8606b42a8bd"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPsh", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEsh", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HSCEsh", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENsh", ",", "2"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "100"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "6.25"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{SCE}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{EN}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Top", ",", "Center"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804410469917729*^9, 3.804410492306613*^9}, { + 3.804410532658753*^9, 3.804410542590094*^9}, {3.804411218996923*^9, + 3.804411236999837*^9}, {3.804411267274376*^9, 3.804411267688603*^9}, { + 3.8045795258037558`*^9, 3.804579531883322*^9}}, + CellLabel->"In[71]:=",ExpressionUUID->"1cdee34d-e9f1-48cc-9cc8-f50d2f3333e6"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"58.650505578070764`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"18.6637805951158`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"46.708156099866635`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"6.345979759334122`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"8.247103411273724`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"18.6637805951158`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \\\", \\\"\ +\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"6.345979759334122`\\\", \\\" \\\", \ +\\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 71, 5, 22585821416286832394, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804410502374645*^9, 3.804410564035343*^9, 3.804410868429847*^9, { + 3.804411220030517*^9, 3.8044112379636497`*^9}, 3.804411740712563*^9, + 3.804579532956501*^9}, + CellLabel-> + "During evaluation of \ +In[71]:=",ExpressionUUID->"4746b1ad-fccb-4e32-9035-a4a17218fb00"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\ +\", RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"15.994805464778288`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"4.319532441227426`\\\", \\\" \\\", \\\ +\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"4.194647424699564`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"7.9982683945542545`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"4.319532441227426`\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 71, 6, 22585821416286832394, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804410502374645*^9, 3.804410564035343*^9, 3.804410868429847*^9, { + 3.804411220030517*^9, 3.8044112379636497`*^9}, 3.804411740712563*^9, + 3.8045795331132812`*^9}, + CellLabel-> + "During evaluation of \ +In[71]:=",ExpressionUUID->"d8304a83-4f1e-4903-b77d-b58010d072f9"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"4.194647424699564`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"4.319532441227426`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"15.994805464778288`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}]}], \\\",\\\", \ +RowBox[{RowBox[{\\\"-\\\", \\\"4.319532441227426`\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", \ +RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \\\"\[Lambda]\\\"}]}]}], \ +\\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 71, 7, 22585821416286832394, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804410502374645*^9, 3.804410564035343*^9, 3.804410868429847*^9, { + 3.804411220030517*^9, 3.8044112379636497`*^9}, 3.804411740712563*^9, + 3.8045795332358723`*^9}, + CellLabel-> + "During evaluation of \ +In[71]:=",ExpressionUUID->"94127d7d-7040-49ff-bb27-5dd4e2107bf4"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 71, 8, 22585821416286832394, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804410502374645*^9, 3.804410564035343*^9, 3.804410868429847*^9, { + 3.804411220030517*^9, 3.8044112379636497`*^9}, 3.804411740712563*^9, + 3.804579533357185*^9}, + CellLabel-> + "During evaluation of \ +In[71]:=",ExpressionUUID->"b62d1725-581c-40da-944c-add60cb08977"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{InsetBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0X841AccB/DrjpMfd+e+yoYnQ6tjWSrs1sTn4zpmhH4hHlpTS6j0Y+fH +o9gK1UmtnMJCbck9RVg27ZG+4fJjzEa1nAm1XBL63jl3VM6+++PzvJ/XP+/n +eT8fx9ikzV8zGQxGMH3/Z77NhEK0UkXusohNUZbwkHmGTWkcVCQvixAb8nl4 +gOlg95OViqyJPO0ikPJww6vNB1mzI2TtYs6n2ck8ZDfeXqJoGSFPfNjkfiiU +h6k7spL9IkdIGenhymXycHuFnXNA1nMyrGsgRZTARRfPwNzg/mekW1xroq8/ +Bz0v/Vwec3SQPMizzVQbzPBIdD1Heu8xGXVLsva8tSmK/nQ0Ob2sh+RsAiu3 +OBM8mjZsnKxrIeWhv/tNNhujRuHSWBp1nfx+ySrtbKwRRuZwpWvKqmFQ71w1 +aMHCxNCcngKnVph5e3OoYngBelMxFX51PXCwvNTLZYSBnLuynfmqPkgyj29v +GJ6HtLnn/imlQ0CMu020+xvA435cl8j2X1iUGzUvG3gHodwV30xVqoAs3Zcg +TX8Lay3T3ZKYY1D2crbt8ZY30LaoKF5WNgF5986ViT1mwdzh2L4XBRS0D8Ss +7hPOgC1hcEvw1kC+r6I9epce0o2f1jYt1EJPRZQ27oIO1odJGzN+mQa8zu6f +fDkN268Vn7TM0UMQ05sTIZoGpXTTa9eQWTgVXT4cWK2Fhs7uoZv6N5DGb2la +4qGF15xbZ43vv4MKYVyj6M4USCtjOpoOG6CyI6N4NGIKREkRoUYcBuaMTU/7 +zmtg9OQtG0LDwJorAUXDcg00/6WR97YtwMDa5YEnd2jAr2jk4tFqJg57TsvW +2Gog9caNhxPnWbhnTuGVOqCGoVdb/7aMM8Lzaxs6muRqeF1ZK7QPNkb/nFeH +4pPV4H5JHTO4lI0ntha6+G5Qg+CRUe9OHRsdXFeqGQI1KM50lj/oN8H4u8Xm +NUw1yJIlPrrqhbg1r3tE/JwC7lDvJ6yLpuihKVx2s5WCBomVtnm/Ga7wLtk/ +WkXB++GC+c9F5hh0w5plUkiBff1kfL3AAqvk3X2/HqNgm39RkXLOAseXfpfz +5AAFXuF6Z9UIB90m6oqzvqSgu9qZfbuDi/KQtt+CNlJQIPSWryvlYd6Cq5tz +11PAusx8FCayRLuUgC+chBSEeW27raqyxLFz0fZ3XSnITL8oinqPj0bDutGz +SymYS69513yKj37P7JNKbOk+Ky+bbC0fB/v0Zh9YUWCmq+j8SsfHvvwPtswT +FHzbtyjDZ4aPE/+YXB+ivbdk8pn+LR8TrxqOX6YtFvxYmcAi8ELz/RdOtDWf +meJGgsB2dceej/gUbIx9vNtuFYH9qV2OYh4FrWKxzcxqAlVVeo/ltNcJajsf +uhO4eIoTvpC2YFy66oyQQPeup01dXAoMEp83DCBQ4XkIwmlXnSrPUwUTKCz4 +oSuRQ4HTXgJbQgn8QyppCKFdGJKpKdtEoHLnw/rVtLOsIiMiwwjMuGSi1FtQ +EF1i4dgVTeCRHtmdLNq9mWkP5NsJlKSorPfQDohVZWfvINDaODcjiLa74N6Y +zy56j2WdhKAtN/24xG43gdfWuBrrzOl/jheFzsQR2Hp88IqStqybzXwUT2Ds +E0VQI22z2sN1tYkERtspmVdo/weoOUe4 + "]]}, + Annotation[#, "Charting`Private`Tag$36704#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVjnk01AkcwDUYQ47xcyXl0W47ohJTedH4fk1YG5MOR1o6tJuUo+QqKytH +obTbUKs1R8kOpaaJduyz/MqRZ3QwuduoMLlpskMltv3j8z5/fd77WIdG7/yR +oqamxvnC/+aaj9ez1yrIm3b9LbsDzJCSS51SWinIoQ5qVrGPGR6jWFkUGSlI +G9Pg71RsM/QZ3Xlc/cMgefjF2xdF9mZIra5cXl83SN5m1Znba5th4v70eI+g +QbIktj5do9oU94osbLzSB0iNZSRPwDDFVRu25nB63pCdK2dYLJoJbii8VxyS +3Eue2eLVxZAR+FOwVC/7QScpk5hwzwzTkf3MWuv8ylZy/mcHt8FUfUw++Uoz +XlVHrjFo/UfsuRiV9auq+XtukkQA3WHkVxoGZepnOwrEsFqs2545pYlHfTNb +81c8gryX1UYF19SRNRUi8qhohQCNsYVf7i1CvZq8g1xFFwRfFiTHXFuAk58H +PBP4feDF9svIODUH6xvCHrOX9oPd/n3FXMkH8NW3i31fpgDHNxS3mx9VsIme +ZB9NGYGm2UAUVkxDo3FBeJ5gHFxtmWHc00pYbHUm8m3+FPztvdVDemEKlhLz +9kdYSli7MdW4v2cckjRfSx7SpkGyfCh8yd0R2OKfXX36/r8gX6/NtNQegr1/ +XD1Hz5wBmbVoxZ64QejO3jG5etsH+H5C568Ex36oan7ad2fmI0TMJMhyOa9h +Uq/8ombDHLQ473h/bLQXsstCmh6emIdLz1gRu9pfADs60FdDTw1jIeN+gEU3 +DJ0rNyeUahgT6X7L+UQH1LYoS+SNi/Dl4QEv4aY28CgYvJIspuD5V9/kdRvI +IfHWrbbxS+rYYOLY17GqBfpG/TroYRqYI6PVhqx8ApNlEidLjib6lfp1X9aV +AbPwXUjvV1TM5lY41MQ2AqNdQ35QRUXLibIiG9sGqM9tLn7eo4UFy2zueE/U +Ql58nKtKTMNSzbJzPgYPQb9PvlH9ijaKB/Bd1akaqIozmq6N0sGL+7ylF6Oq +YEkAY+Fb9mJMi3awjq+uBEvpRLiUoYvpiZ9sXCz/hN2eBQXdn3VxQF3EXDpW +Di4BMzaKQT1cw1nQbWiSwFOxDbWySR/lLrLiqjYx5DuxSjbzDTA1l++cIykD +dSGl3Z9Nx1HOtKy7qBT8XXZXKm7T8REttNDPRAQpSVfYe8wM8biztYp4fgM+ +J92dq80yxMrIl9I0wXXIN3Ixz5g2xM4tvV+nNgpBRyVqPqAyxMTALJ9yUgg/ +dxmfdp01RI2aMJNhqRAieBNvZj4ZIq1wPm1fiRDcGdfLjqgTOGKbWpyQJQSl +szZuJwgM5j5O2+UjhO2hnYcs1hE4XGPgHVwqgEfu7uazDgQ+Gb586vpVAWxm +SJrbmF96XnzaZI4AGGPZ63KdCLRdm2bMjxLAfJzrRzUg0CNvrsdnvQBuZxVf +UHAIpEqFThMP+LAigsA6XwJTNotShff48Nu2FKVgB4EtXTUxQTf4kG4UFBjk +T2DIgVpW31k+BPN0rR8HE9gZI7dy9uWDPOXk85K9BEp2GXCs3fjgFarIyNhP +oJuoXsuAyQcm48GI6w8EvooKWzZvyocS7TU8i0Nf/uRwbIHGB8uxAt/ZMALt +Mg55an3iQd5TKqU9nMDGs22/m4zzQEdyokJylEA6Oz3Sto8H/wFInD6L + "]]}, + Annotation[#, "Charting`Private`Tag$36704#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwBoQJe/SFib1JlAgAAACkAAAACAAAAkxntxEIu5r+d94Yba/DFPwKOBvDy +IOa/cRnEaI35xT9wAiAboxPmv9d+hIOzAsY/TOtScQP55b8J9uQnCxXGPwa9 +uB3Ew+W/kbuiWOg5xj94YIR2RVnlv+dKMMBbhMY/XqcbKEiE5L8/6Lr7MRzH +Pyk1SotN2uK/+nVuBPlXyD81nLKlXX3ev2GV82a/P8s/fFy3DYrA178/Ds8b +K0bOP0LPIQeMJdG/91gRTGbI0D99eeAFdvbDv9zUuRhgxdI/8sQpvZ5aqr9f +U+rfo9bUP1mGDooyn68/DV8xUztW1z9rT4bRlSLGP71tnlO0FNo/PfBdp0W0 +0T9/Qca8O+7cPw2+lGOT5tg/Y1CrE9Qv4D95/eRGd57fP46riDR5+uE/NMVn +zEIa4z+3prYhVu3jP08OK3TzrOY/V1EkZ/NH5j85EHsvbwLqPwGDEvlGuug/ +xxSZaZSf7T/pwPmsGq/rPwsggm3nlfA/FLVB7gvu7j8aEv4vaj3yPwSHw0dI +JvE/ewXhscEI9D8GPJFgSy/zP0NVir1+tfU/8utlkD1N9T9eppqIEIb3PwW8 +jlgw3Pc/2YpR7yxO+T8D0iYXr6v6P7vLzt+u9/o//h2nvB6X/T/vDbOPBcX8 +P6SbpFocjwBAiqxdycFz/j//OL+3LWUCQEJvV08EDQBAJQwHU5RkBEDoiLMZ +EvIAQEZQd+ZdzgZAwtDyqNLHAUAKOt7WqFAJQEWZ5Zd9rwJAu0E+HdFYDEB4 +q6vU7ZIDQPvbLdwqrQ9A3+tU1hBnBEDT+2HrFpERQO+ssTceTQVAyrHztban +E0AznPFd3iMGQJyAwPL80xVAJ9UE0mP2BkB2q/5c9TAYQNwHdVIcNwdAAAAA +AAAAGUA9FkF0 + "]]}, + Annotation[#, "Charting`Private`Tag$36704#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVkGs0lAkYgKdhJjLs+MZmcCjaPaOtllhsK973DErJrQzGxhbKta1NihU6 +cilJnZB0YVursaVQ7eYcZ/oal1xL36DoYnIbRS5NGgbDtj+e85zn72MeenDn +PjqNRvP8wv/OMxpv4H8vJ3t9pGF1n7lIz2VOKVbLydaQM4XNY1w8RF9tUsqR +k0vFjVPSfi7uGNv5m4ZqmLTO7mVNP+EiU1xj2lA/TNYORdVG3OBiwp70o27C +YTLcojeOE8jFEJGJpXv6ENkk9kk/9NAQ19ptP+P5coCcds+dG7q4Eu2u3i0L +Tu4j2y3KHNPcDfD47ge62Y9ekDVH8vvsgwjkd5gvz/mWIt1r57MulbExOfEt +46iynlwfEmaXMquLioa14uKgm+RAVvgvLGsdFGbqZduUVMJgB1F/OkkLY7wz +qQKLx7B+Ntm2y4SJTlPBIrf7FHDu+sWJzTRR92F+WJ68ByISA+T2VnRMVA9t +OVYsgw0XjkV6nKfhD40R7XzjQVCdW2W+32URvPXWHflUIYfyq880JQnzsImd +ZHWQPgopmWXdVhYqaDIoisovGQdVcZY2+7USdFanHRgpmILI0n+nDN9MgzGx +aBXtpICfRTZf0zZ+giRGf7VEaxrOibqqDM9/BBdBtjjln88QaRz6l9JmCkJu +XD7FzpwBfobLUiw5Dr3ZvpPrvVTQwV4SGMeOQW3bU9mdmTngGV33jk18D5O6 +984xGhegNPTUpFX+CGRXBLdI4hbhonOo63v1MPAPBnhr6tJQfWWHbFnhELw7 +dc+IUNDwov/9No9Ng1D3TFEubVqGd8P1HCINBsCtaLgwuZKOptGOtPKZt5Bw +61bX+AUNjDHzsz0xLwPZmN9zdoQmjrqphM2BfTBZUe1g5snA62/8fNdIXoPt +1Y/BfWuYONy+ktUa8wp43ZrSMCUT77SctVzn/BIactvKOl8uR4lYwDHj9kL+ +0XhnZaUWRteqD1PmPaAnk9prFGrj4yzHy5ttXkBtPGe67tcVuNAj+VsU9Ry4 +/rylrXwdHNy1QX68phvMHkxEPeCx8FnOZ5dRnW4I3FJU1KtmYbyHMDo8qQsc +/Wcs5cO66GN8ZdPERCc8rbRk1rTooVqyinc7rhMKHJzKNxd/hXack84HWJ2g +8Qe9W8BnYxB7UDwlkoLAMbBGfpuNvd/YCp7skkJqUiE/yFAfhe1nbh7TloI6 +qWqh7rQ+Vpk2ixgSCgo4jkYZ0/o44rc1JjCdghVKUdtepT623mq/FHCSghM9 +BinOs/q4vbXBKSCNgthrEwMz8/rIdbIaDzhBgSvvz4poDQJ9m2SvQo5ToPhJ +G30IAmkjRc1pRyjwCX2x38SawG3eqjDzfRQ8dnU1mt1I4C6OxUqrcAo286rb +umwJlNHUPzqFUcD7kG2d60CgpHWmI2gvBYvxznM0ILD/sIfTlWAKbp8uOyv3 +JHAySvedtT8FFrEE1nsTqMlYyHETUHDJK1VR4ktg6e97S4L8KEjnCAOEAgIH +Ixp1MndSsPsay7x9N4H2efvU/V4USFMTO8tDCPzuRorWnCcF7qHyjIw9BOa+ +TkwlvrQt79GocziBtYZeVa4eFJRrb7hmsp9AilkfFbKdArMPRd6zEQS+/+ib +m7CNgvynTHp3FIFKRotpnvuXn9Vx96tjCOTlKA3vbKXgP7tTRXs= + "]]}, + Annotation[#, "Charting`Private`Tag$36704#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$47822#1"]& ]}, {}}}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, + 9.495310000000002}, {5.387499999999999, 12.6313}, { + 5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, + 9.495310000000002}, {5.387499999999999, 12.6313}, { + 5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, + PlotLabel->None, + PlotRange->NCache[{{-0.6931471805599453, + Log[100]}, {0, 6.25}}, {{-0.6931471805599453, 4.605170185988092}, { + 0, 6.25}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + Scaled[{0.5, 0.5}], Center, Scaled[{1, 1}]], InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.04835589941972921], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}]}, { + Thickness[0.04835589941972921]}, StripOnInput -> False]}, { + ImageSize -> {31.02590286425903, 24.508064757160646`}, + ImageSize -> {20.683935242839354`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {21., 17.}, PlotRange -> {{0., 20.68}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.03321155762205247], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]]}, { + Thickness[0.03321155762205247]}, StripOnInput -> False]}, { + ImageSize -> {45.16974844333748, 24.508064757160646`}, + ImageSize -> {30.113165628891654`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {31., 17.}, + PlotRange -> {{0., 30.110000000000003`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.04012841091492777], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9IU1EUx+ecU7Maul8vXbrfNheUTczC2CmJqCQr/1klJdL8kYVKFmpK +qKnYrLQyfyQWKYigZFBphmaFpWQ/zGVhkEODEmeklDl1s717tzswOnB5fLjv +nXfO93zvlSSkHdS7MxgMN/vaZ19M+zLtPLa99kAA1NXYw7IWnNw8O5E1kC6G +XS29TYwIf9DQUSiBoM7b3fofFAzQES2FnNG5EY1aCAw64mWQnGgPNh9KI3d3 +Jt6RQfCMfKJWxcX7Jhn86Z5+kDTsA/c3zz07flEOD/e0RdRZ2JA707Y/dUQO +E3njqW9bmFBdzskJ91ESts6eMdVVBBO+VlJ0eChSBYXCPI8Uthd8O6GereoK +gU+rPgv0ZzmEUZ1lQsI1KCgY0wnbB01KeGroLggbpxz/V8Bk8SnDpgUK/OuP +ql6Vu7gDCsZeZimgSOypGMhcQ9iM9v/lfFbvldAqF28Maea+YykJR/d5brv5 +IYRwzGBFnC1KTZiqNHonJ6ghdmpoujrfxUcUOtGbOBdj/V38C+lLQRg9L64a +9xclhL7nO1pT6lW4fwsP2ul6KTWe65Av+d6pn5NF9wS3mCYWYTz3ee381GTP +ligV4eS0n0X9RiXhvs6OS+w2BbA2zK94X2bVWuj3G+SOfSbovAUlmrsyXF+D +B/Zbj9ThBy9cZ6kUluh4wgHZ8FgsQySFbLpfgy+co5+TEliH/MWDrrTcqZpK +CRTT8zHysI8zJA4dhMDNvpr5+qvY4QcK6xQeRDgL5RURRr6foxx+FuC5X+fj +vL5+hH8jvTmEv9P+NHvjOQYIsO/BAzpit+qWgik4WRmfEXF6SduD+vYHM/Kz +TTuK8gaCle73vE3Lo+ttdNQXbdOiObmLQU/Xk7j4X3bqv5zROewPIoye5kDC +yEd7+YQv6wwxbuk8wkhHDQ/rqVkkbFx48bH+kJWwc944H8/hH5u21W/96qQv +PKz7DSae7yMhNI40jYe6s7Gug3y4gM7zSnDmQ34X+RHG509I2HlfIb0fU7D8 +PvsLzIYtzQ== + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ikT+KvMuvUc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4LDnEXKO/+4I/hgeW4EX19rpfAFFj0H5wnNQmlZCP5/ELBXcGDh7JJP +PqfrUH3/xy3j1xIOW8x/HErh0nZoVWBXPTNF1KH604aA7F0acP7TxIXXTPjV +4fyV315WnGlQgvLF4XwwfUAJzgfbu0TTYUp7a9TlP2oOf76VPpizUctBtMfr +FcsWDTg/I/9D60kTbTg/NQ0EdB0CbknXJE7ScHgSIb794gNdh1OHndZm/lNx +OAMCb3QdfE6w287eiuD/fPv6gOViFYi4qR6cDws/dD5MP4z/BORPfVVU+ata +cL7/xYkx/5y14XyJqVc4M5K0IeHph+DHhwSpL9BE8P+A7FXWc9BXlP+SE6bt +ILv8hYfef12H7Q5Nj45LaDuIgMLjio5DA8vRfkNzTQdzm71B0w5qQ/zVo+Ug +DjJHSQtu3mZQfGVpwPkbVJ80z+NVgfNng9KBp4LDiyztb9PnqsP5sPiB8Q90 +72syWSztUAOKbykVBxNjEBCBmw/jg90XogPnw/wvAkqfLNIO6OkXAOddMnQ= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOzjJ3uKMpu+b/ZgWHlNg7bswRCP7J +w05rM/nMHdzXHF3O8EPS4aZ0TaLRUTOHVgV21TNTxBz+fCt9MOegCZwvPvUK +Z4aSMZwfreD4MXmOEZyfngYE04wcau7/uGX8GsGPVo2QOVcjAeevFdLhS1+n +5LBBL28x4xpjOF9mXpzm6QsmcL4EyL5PJg4PXOMdZ31UhPPVP6m8nHVS3sHn +BLvtbFNTDH5CSJD6Ak01uHp0/pT21qjLMipw+xhAIEEZ7h4YH+ZedL40SJ+B +JsK/nzYEZP/ShIeHvtZK4QsqWvDwgvF5/NdPSd1hAudrvOXdZ1BpBud/ARoz +67qZg2iP1yuWLxoOXiD/sJo7GIDkW1Qd+ED6PRB8sP6fZhB/X9VysK+MWGFa +a4DBh5nP7aZayrQLwf+681bX36mGcP7jxIXXTOYbOsxZpLzzz3NNOD8V5E82 +BN8YBC5LwPl9Ed3+jALicPNg6QFmH4wPcw863wRsoCgkPhTM4Xz09AsADwgP +hA== + "]]}, { + Thickness[0.04012841091492777]}, StripOnInput -> False]}, { + ImageSize -> {37.372557907845575`, 24.508064757160646`}, + ImageSize -> {24.915038605230386`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {25., 17.}, + PlotRange -> {{0., 24.919999999999998`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.05339028296849973], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4r35NW9nmio63NGUXfN/s4IDAwhsUIDzz4CA +jIKD+5qjyxl+SDq0KrCrnhGRh9BTxBwy0oCATRzOV/+k8nJWpwCcf6B7X5PJ +Yx4438QYCDbzONTc/3HL+DWCH60aIXOuRgLOXyukw5e+TsmhP6Lbn3GDEJx/ +EGSeszicrwGy76S4wwPXeMdZHxXhfLA7Tso7fNn3cWv6NQkMfkJIkPoCTTW4 +enT+lPbWqMsyKnD7wOGSoAx3D4wPcy86X3penOZpA02Efz9tCMj+pQkPD32t +lcIXVLTg4QXjh7y9/HHGQzE4X6RyUsnZJ7JwPtjfcfIOoj1er1i+aDhUg8KR +W8HBACTfouqw4tvLijMTEHyIfnkHnxPstrOvajlINMlMMbj83R6dDzP/gd/L +hL/zf8P5fWD/ssDt3+a1wWLOTxaHOYuUd/55rgnnp4LTAYIP8rbxZQk4H2yO +gDjcPFh6gNkH48Pcg84Hh6OxKCSeHRUcYHz09AsAhrkVoA== + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {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, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGITIGYC4v7gEpXp9oYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg4GDzwl229lXtRyKt4r+Pu2H4Pvfkq5J/KQP53vsr5W1cEfwfS9O +jPnHrAfnt/D6r5+Sqgs3H8aH2V/726rg3Ap9DH4AyB4hTTjfzGZv0LREDTj/ +DAi8kXb49fb1ActkdQi/RwtC66g7bNDLW8x4R8shDQTU1OH2M4DAAjU433lC +s1DaLyUMPsw9jyLEt19kUIHzZ4IBgn/qsNPaTDtVh3SQPWwIfrsCu+oZEyk4 +3xgELkvA+a0g+SlicPvQ+SZgDaIOHxatVzg7Q9mh6v6PW8beog6bwP5SgfPB +4d+uCucHgsLNSA3OB8dDqTqcL9rj9YpFRANuPowPs18K5K8Lqhh8mPthfJj/ +YHx9rZXCF5ZoQuKJUQ1ibgmCP2eR8s4/6ZoOKbF33Jgt1CDhIKcJ0dei76Dx +SeXlrJeiDqYg9Qf1IfHkIArRd1wf7l5Y+oPxwfpFDOB81SfN885KGTiIVE4q +OZsi6gCOPjkDhxjVCJlzNQg+LD3B+LD0BuOj5w8YHwAQsj0Y + "]]}, { + Thickness[0.05339028296849973]}, StripOnInput -> False]}, { + ImageSize -> {28.098381070983805`, 24.508064757160646`}, + ImageSize -> {18.732254047322538`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {19., 17.}, PlotRange -> {{0., 18.73}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> {"Columns" -> {{0.8, 0.5}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{None}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> {"Columns" -> {{0}}, "Rows" -> {{1}}}], + "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[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Row\""}]}], "]"}]& )], + Scaled[{0.5, 1.01}], ImageScaled[{0.5, 0.5}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->False, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->False, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotLabel->None, + PlotRange->Automatic, + PlotRangeClipping->False, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0X841AccB/DrjpMfd+e+yoYnQ6tjWSrs1sTn4zpmhH4hHlpTS6j0Y+fH +o9gK1UmtnMJCbck9RVg27ZG+4fJjzEa1nAm1XBL63jl3VM6+++PzvJ/XP+/n +eT8fx9ikzV8zGQxGMH3/Z77NhEK0UkXusohNUZbwkHmGTWkcVCQvixAb8nl4 +gOlg95OViqyJPO0ikPJww6vNB1mzI2TtYs6n2ck8ZDfeXqJoGSFPfNjkfiiU +h6k7spL9IkdIGenhymXycHuFnXNA1nMyrGsgRZTARRfPwNzg/mekW1xroq8/ +Bz0v/Vwec3SQPMizzVQbzPBIdD1Heu8xGXVLsva8tSmK/nQ0Ob2sh+RsAiu3 +OBM8mjZsnKxrIeWhv/tNNhujRuHSWBp1nfx+ySrtbKwRRuZwpWvKqmFQ71w1 +aMHCxNCcngKnVph5e3OoYngBelMxFX51PXCwvNTLZYSBnLuynfmqPkgyj29v +GJ6HtLnn/imlQ0CMu020+xvA435cl8j2X1iUGzUvG3gHodwV30xVqoAs3Zcg +TX8Lay3T3ZKYY1D2crbt8ZY30LaoKF5WNgF5986ViT1mwdzh2L4XBRS0D8Ss +7hPOgC1hcEvw1kC+r6I9epce0o2f1jYt1EJPRZQ27oIO1odJGzN+mQa8zu6f +fDkN268Vn7TM0UMQ05sTIZoGpXTTa9eQWTgVXT4cWK2Fhs7uoZv6N5DGb2la +4qGF15xbZ43vv4MKYVyj6M4USCtjOpoOG6CyI6N4NGIKREkRoUYcBuaMTU/7 +zmtg9OQtG0LDwJorAUXDcg00/6WR97YtwMDa5YEnd2jAr2jk4tFqJg57TsvW +2Gog9caNhxPnWbhnTuGVOqCGoVdb/7aMM8Lzaxs6muRqeF1ZK7QPNkb/nFeH +4pPV4H5JHTO4lI0ntha6+G5Qg+CRUe9OHRsdXFeqGQI1KM50lj/oN8H4u8Xm +NUw1yJIlPrrqhbg1r3tE/JwC7lDvJ6yLpuihKVx2s5WCBomVtnm/Ga7wLtk/ +WkXB++GC+c9F5hh0w5plUkiBff1kfL3AAqvk3X2/HqNgm39RkXLOAseXfpfz +5AAFXuF6Z9UIB90m6oqzvqSgu9qZfbuDi/KQtt+CNlJQIPSWryvlYd6Cq5tz +11PAusx8FCayRLuUgC+chBSEeW27raqyxLFz0fZ3XSnITL8oinqPj0bDutGz +SymYS69513yKj37P7JNKbOk+Ky+bbC0fB/v0Zh9YUWCmq+j8SsfHvvwPtswT +FHzbtyjDZ4aPE/+YXB+ivbdk8pn+LR8TrxqOX6YtFvxYmcAi8ELz/RdOtDWf +meJGgsB2dceej/gUbIx9vNtuFYH9qV2OYh4FrWKxzcxqAlVVeo/ltNcJajsf +uhO4eIoTvpC2YFy66oyQQPeup01dXAoMEp83DCBQ4XkIwmlXnSrPUwUTKCz4 +oSuRQ4HTXgJbQgn8QyppCKFdGJKpKdtEoHLnw/rVtLOsIiMiwwjMuGSi1FtQ +EF1i4dgVTeCRHtmdLNq9mWkP5NsJlKSorPfQDohVZWfvINDaODcjiLa74N6Y +zy56j2WdhKAtN/24xG43gdfWuBrrzOl/jheFzsQR2Hp88IqStqybzXwUT2Ds +E0VQI22z2sN1tYkERtspmVdo/weoOUe4 + "]]}, + "Charting`Private`Tag$36704#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVjnk01AkcwDUYQ47xcyXl0W47ohJTedH4fk1YG5MOR1o6tJuUo+QqKytH +obTbUKs1R8kOpaaJduyz/MqRZ3QwuduoMLlpskMltv3j8z5/fd77WIdG7/yR +oqamxvnC/+aaj9ez1yrIm3b9LbsDzJCSS51SWinIoQ5qVrGPGR6jWFkUGSlI +G9Pg71RsM/QZ3Xlc/cMgefjF2xdF9mZIra5cXl83SN5m1Znba5th4v70eI+g +QbIktj5do9oU94osbLzSB0iNZSRPwDDFVRu25nB63pCdK2dYLJoJbii8VxyS +3Eue2eLVxZAR+FOwVC/7QScpk5hwzwzTkf3MWuv8ylZy/mcHt8FUfUw++Uoz +XlVHrjFo/UfsuRiV9auq+XtukkQA3WHkVxoGZepnOwrEsFqs2545pYlHfTNb +81c8gryX1UYF19SRNRUi8qhohQCNsYVf7i1CvZq8g1xFFwRfFiTHXFuAk58H +PBP4feDF9svIODUH6xvCHrOX9oPd/n3FXMkH8NW3i31fpgDHNxS3mx9VsIme +ZB9NGYGm2UAUVkxDo3FBeJ5gHFxtmWHc00pYbHUm8m3+FPztvdVDemEKlhLz +9kdYSli7MdW4v2cckjRfSx7SpkGyfCh8yd0R2OKfXX36/r8gX6/NtNQegr1/ +XD1Hz5wBmbVoxZ64QejO3jG5etsH+H5C568Ex36oan7ad2fmI0TMJMhyOa9h +Uq/8ombDHLQ473h/bLQXsstCmh6emIdLz1gRu9pfADs60FdDTw1jIeN+gEU3 +DJ0rNyeUahgT6X7L+UQH1LYoS+SNi/Dl4QEv4aY28CgYvJIspuD5V9/kdRvI +IfHWrbbxS+rYYOLY17GqBfpG/TroYRqYI6PVhqx8ApNlEidLjib6lfp1X9aV +AbPwXUjvV1TM5lY41MQ2AqNdQ35QRUXLibIiG9sGqM9tLn7eo4UFy2zueE/U +Ql58nKtKTMNSzbJzPgYPQb9PvlH9ijaKB/Bd1akaqIozmq6N0sGL+7ylF6Oq +YEkAY+Fb9mJMi3awjq+uBEvpRLiUoYvpiZ9sXCz/hN2eBQXdn3VxQF3EXDpW +Di4BMzaKQT1cw1nQbWiSwFOxDbWySR/lLrLiqjYx5DuxSjbzDTA1l++cIykD +dSGl3Z9Nx1HOtKy7qBT8XXZXKm7T8REttNDPRAQpSVfYe8wM8biztYp4fgM+ +J92dq80yxMrIl9I0wXXIN3Ixz5g2xM4tvV+nNgpBRyVqPqAyxMTALJ9yUgg/ +dxmfdp01RI2aMJNhqRAieBNvZj4ZIq1wPm1fiRDcGdfLjqgTOGKbWpyQJQSl +szZuJwgM5j5O2+UjhO2hnYcs1hE4XGPgHVwqgEfu7uazDgQ+Gb586vpVAWxm +SJrbmF96XnzaZI4AGGPZ63KdCLRdm2bMjxLAfJzrRzUg0CNvrsdnvQBuZxVf +UHAIpEqFThMP+LAigsA6XwJTNotShff48Nu2FKVgB4EtXTUxQTf4kG4UFBjk +T2DIgVpW31k+BPN0rR8HE9gZI7dy9uWDPOXk85K9BEp2GXCs3fjgFarIyNhP +oJuoXsuAyQcm48GI6w8EvooKWzZvyocS7TU8i0Nf/uRwbIHGB8uxAt/ZMALt +Mg55an3iQd5TKqU9nMDGs22/m4zzQEdyokJylEA6Oz3Sto8H/wFInD6L + "]]}, + "Charting`Private`Tag$36704#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwBoQJe/SFib1JlAgAAACkAAAACAAAAkxntxEIu5r+d94Yba/DFPwKOBvDy +IOa/cRnEaI35xT9wAiAboxPmv9d+hIOzAsY/TOtScQP55b8J9uQnCxXGPwa9 +uB3Ew+W/kbuiWOg5xj94YIR2RVnlv+dKMMBbhMY/XqcbKEiE5L8/6Lr7MRzH +Pyk1SotN2uK/+nVuBPlXyD81nLKlXX3ev2GV82a/P8s/fFy3DYrA178/Ds8b +K0bOP0LPIQeMJdG/91gRTGbI0D99eeAFdvbDv9zUuRhgxdI/8sQpvZ5aqr9f +U+rfo9bUP1mGDooyn68/DV8xUztW1z9rT4bRlSLGP71tnlO0FNo/PfBdp0W0 +0T9/Qca8O+7cPw2+lGOT5tg/Y1CrE9Qv4D95/eRGd57fP46riDR5+uE/NMVn +zEIa4z+3prYhVu3jP08OK3TzrOY/V1EkZ/NH5j85EHsvbwLqPwGDEvlGuug/ +xxSZaZSf7T/pwPmsGq/rPwsggm3nlfA/FLVB7gvu7j8aEv4vaj3yPwSHw0dI +JvE/ewXhscEI9D8GPJFgSy/zP0NVir1+tfU/8utlkD1N9T9eppqIEIb3PwW8 +jlgw3Pc/2YpR7yxO+T8D0iYXr6v6P7vLzt+u9/o//h2nvB6X/T/vDbOPBcX8 +P6SbpFocjwBAiqxdycFz/j//OL+3LWUCQEJvV08EDQBAJQwHU5RkBEDoiLMZ +EvIAQEZQd+ZdzgZAwtDyqNLHAUAKOt7WqFAJQEWZ5Zd9rwJAu0E+HdFYDEB4 +q6vU7ZIDQPvbLdwqrQ9A3+tU1hBnBEDT+2HrFpERQO+ssTceTQVAyrHztban +E0AznPFd3iMGQJyAwPL80xVAJ9UE0mP2BkB2q/5c9TAYQNwHdVIcNwdAAAAA +AAAAGUA9FkF0 + "]]}, "Charting`Private`Tag$36704#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVkGs0lAkYgKdhJjLs+MZmcCjaPaOtllhsK973DErJrQzGxhbKta1NihU6 +cilJnZB0YVursaVQ7eYcZ/oal1xL36DoYnIbRS5NGgbDtj+e85zn72MeenDn +PjqNRvP8wv/OMxpv4H8vJ3t9pGF1n7lIz2VOKVbLydaQM4XNY1w8RF9tUsqR +k0vFjVPSfi7uGNv5m4ZqmLTO7mVNP+EiU1xj2lA/TNYORdVG3OBiwp70o27C +YTLcojeOE8jFEJGJpXv6ENkk9kk/9NAQ19ptP+P5coCcds+dG7q4Eu2u3i0L +Tu4j2y3KHNPcDfD47ge62Y9ekDVH8vvsgwjkd5gvz/mWIt1r57MulbExOfEt +46iynlwfEmaXMquLioa14uKgm+RAVvgvLGsdFGbqZduUVMJgB1F/OkkLY7wz +qQKLx7B+Ntm2y4SJTlPBIrf7FHDu+sWJzTRR92F+WJ68ByISA+T2VnRMVA9t +OVYsgw0XjkV6nKfhD40R7XzjQVCdW2W+32URvPXWHflUIYfyq880JQnzsImd +ZHWQPgopmWXdVhYqaDIoisovGQdVcZY2+7USdFanHRgpmILI0n+nDN9MgzGx +aBXtpICfRTZf0zZ+giRGf7VEaxrOibqqDM9/BBdBtjjln88QaRz6l9JmCkJu +XD7FzpwBfobLUiw5Dr3ZvpPrvVTQwV4SGMeOQW3bU9mdmTngGV33jk18D5O6 +984xGhegNPTUpFX+CGRXBLdI4hbhonOo63v1MPAPBnhr6tJQfWWHbFnhELw7 +dc+IUNDwov/9No9Ng1D3TFEubVqGd8P1HCINBsCtaLgwuZKOptGOtPKZt5Bw +61bX+AUNjDHzsz0xLwPZmN9zdoQmjrqphM2BfTBZUe1g5snA62/8fNdIXoPt +1Y/BfWuYONy+ktUa8wp43ZrSMCUT77SctVzn/BIactvKOl8uR4lYwDHj9kL+ +0XhnZaUWRteqD1PmPaAnk9prFGrj4yzHy5ttXkBtPGe67tcVuNAj+VsU9Ry4 +/rylrXwdHNy1QX68phvMHkxEPeCx8FnOZ5dRnW4I3FJU1KtmYbyHMDo8qQsc +/Wcs5cO66GN8ZdPERCc8rbRk1rTooVqyinc7rhMKHJzKNxd/hXack84HWJ2g +8Qe9W8BnYxB7UDwlkoLAMbBGfpuNvd/YCp7skkJqUiE/yFAfhe1nbh7TloI6 +qWqh7rQ+Vpk2ixgSCgo4jkYZ0/o44rc1JjCdghVKUdtepT623mq/FHCSghM9 +BinOs/q4vbXBKSCNgthrEwMz8/rIdbIaDzhBgSvvz4poDQJ9m2SvQo5ToPhJ +G30IAmkjRc1pRyjwCX2x38SawG3eqjDzfRQ8dnU1mt1I4C6OxUqrcAo286rb +umwJlNHUPzqFUcD7kG2d60CgpHWmI2gvBYvxznM0ILD/sIfTlWAKbp8uOyv3 +JHAySvedtT8FFrEE1nsTqMlYyHETUHDJK1VR4ktg6e97S4L8KEjnCAOEAgIH +Ixp1MndSsPsay7x9N4H2efvU/V4USFMTO8tDCPzuRorWnCcF7qHyjIw9BOa+ +TkwlvrQt79GocziBtYZeVa4eFJRrb7hmsp9AilkfFbKdArMPRd6zEQS+/+ib +m7CNgvynTHp3FIFKRotpnvuXn9Vx96tjCOTlKA3vbKXgP7tTRXs= + "]]}, + "Charting`Private`Tag$36704#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$47822#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.029171622213711557`, + 34.27988997917193}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.029171622213711557`, 6.25}}}}, DisplayFunction -> Identity, + AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[100]}, {0, 6.25}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.04835589941972921], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}]}, + Thickness[0.04835589941972921]]}, { + ImageSize -> {31.02590286425903, 24.508064757160646`}, + ImageSize -> {20.683935242839354`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {21., 17.}, PlotRange -> {{0., 20.68}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.03321155762205247], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]]}, + Thickness[0.03321155762205247]]}, { + ImageSize -> {45.16974844333748, 24.508064757160646`}, + ImageSize -> {30.113165628891654`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {31., 17.}, + PlotRange -> {{0., 30.110000000000003`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.04012841091492777], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9IU1EUx+ecU7Maul8vXbrfNheUTczC2CmJqCQr/1klJdL8kYVKFmpK +qKnYrLQyfyQWKYigZFBphmaFpWQ/zGVhkEODEmeklDl1s717tzswOnB5fLjv +nXfO93zvlSSkHdS7MxgMN/vaZ19M+zLtPLa99kAA1NXYw7IWnNw8O5E1kC6G +XS29TYwIf9DQUSiBoM7b3fofFAzQES2FnNG5EY1aCAw64mWQnGgPNh9KI3d3 +Jt6RQfCMfKJWxcX7Jhn86Z5+kDTsA/c3zz07flEOD/e0RdRZ2JA707Y/dUQO +E3njqW9bmFBdzskJ91ESts6eMdVVBBO+VlJ0eChSBYXCPI8Uthd8O6GereoK +gU+rPgv0ZzmEUZ1lQsI1KCgY0wnbB01KeGroLggbpxz/V8Bk8SnDpgUK/OuP +ql6Vu7gDCsZeZimgSOypGMhcQ9iM9v/lfFbvldAqF28Maea+YykJR/d5brv5 +IYRwzGBFnC1KTZiqNHonJ6ghdmpoujrfxUcUOtGbOBdj/V38C+lLQRg9L64a +9xclhL7nO1pT6lW4fwsP2ul6KTWe65Av+d6pn5NF9wS3mCYWYTz3ee381GTP +ligV4eS0n0X9RiXhvs6OS+w2BbA2zK94X2bVWuj3G+SOfSbovAUlmrsyXF+D +B/Zbj9ThBy9cZ6kUluh4wgHZ8FgsQySFbLpfgy+co5+TEliH/MWDrrTcqZpK +CRTT8zHysI8zJA4dhMDNvpr5+qvY4QcK6xQeRDgL5RURRr6foxx+FuC5X+fj +vL5+hH8jvTmEv9P+NHvjOQYIsO/BAzpit+qWgik4WRmfEXF6SduD+vYHM/Kz +TTuK8gaCle73vE3Lo+ttdNQXbdOiObmLQU/Xk7j4X3bqv5zROewPIoye5kDC +yEd7+YQv6wwxbuk8wkhHDQ/rqVkkbFx48bH+kJWwc944H8/hH5u21W/96qQv +PKz7DSae7yMhNI40jYe6s7Gug3y4gM7zSnDmQ34X+RHG509I2HlfIb0fU7D8 +PvsLzIYtzQ== + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ikT+KvMuvUc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4LDnEXKO/+4I/hgeW4EX19rpfAFFj0H5wnNQmlZCP5/ELBXcGDh7JJP +PqfrUH3/xy3j1xIOW8x/HErh0nZoVWBXPTNF1KH604aA7F0acP7TxIXXTPjV +4fyV315WnGlQgvLF4XwwfUAJzgfbu0TTYUp7a9TlP2oOf76VPpizUctBtMfr +FcsWDTg/I/9D60kTbTg/NQ0EdB0CbknXJE7ScHgSIb794gNdh1OHndZm/lNx +OAMCb3QdfE6w287eiuD/fPv6gOViFYi4qR6cDws/dD5MP4z/BORPfVVU+ata +cL7/xYkx/5y14XyJqVc4M5K0IeHph+DHhwSpL9BE8P+A7FXWc9BXlP+SE6bt +ILv8hYfef12H7Q5Nj45LaDuIgMLjio5DA8vRfkNzTQdzm71B0w5qQ/zVo+Ug +DjJHSQtu3mZQfGVpwPkbVJ80z+NVgfNng9KBp4LDiyztb9PnqsP5sPiB8Q90 +72syWSztUAOKbykVBxNjEBCBmw/jg90XogPnw/wvAkqfLNIO6OkXAOddMnQ= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOzjJ3uKMpu+b/ZgWHlNg7bswRCP7J +w05rM/nMHdzXHF3O8EPS4aZ0TaLRUTOHVgV21TNTxBz+fCt9MOegCZwvPvUK +Z4aSMZwfreD4MXmOEZyfngYE04wcau7/uGX8GsGPVo2QOVcjAeevFdLhS1+n +5LBBL28x4xpjOF9mXpzm6QsmcL4EyL5PJg4PXOMdZ31UhPPVP6m8nHVS3sHn +BLvtbFNTDH5CSJD6Ak01uHp0/pT21qjLMipw+xhAIEEZ7h4YH+ZedL40SJ+B +JsK/nzYEZP/ShIeHvtZK4QsqWvDwgvF5/NdPSd1hAudrvOXdZ1BpBud/ARoz +67qZg2iP1yuWLxoOXiD/sJo7GIDkW1Qd+ED6PRB8sP6fZhB/X9VysK+MWGFa +a4DBh5nP7aZayrQLwf+681bX36mGcP7jxIXXTOYbOsxZpLzzz3NNOD8V5E82 +BN8YBC5LwPl9Ed3+jALicPNg6QFmH4wPcw863wRsoCgkPhTM4Xz09AsADwgP +hA== + "]]}, + Thickness[0.04012841091492777]]}, { + ImageSize -> {37.372557907845575`, 24.508064757160646`}, + ImageSize -> {24.915038605230386`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {25., 17.}, + PlotRange -> {{0., 24.919999999999998`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.05339028296849973], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4r35NW9nmio63NGUXfN/s4IDAwhsUIDzz4CA +jIKD+5qjyxl+SDq0KrCrnhGRh9BTxBwy0oCATRzOV/+k8nJWpwCcf6B7X5PJ +Yx4438QYCDbzONTc/3HL+DWCH60aIXOuRgLOXyukw5e+TsmhP6Lbn3GDEJx/ +EGSeszicrwGy76S4wwPXeMdZHxXhfLA7Tso7fNn3cWv6NQkMfkJIkPoCTTW4 +enT+lPbWqMsyKnD7wOGSoAx3D4wPcy86X3penOZpA02Efz9tCMj+pQkPD32t +lcIXVLTg4QXjh7y9/HHGQzE4X6RyUsnZJ7JwPtjfcfIOoj1er1i+aDhUg8KR +W8HBACTfouqw4tvLijMTEHyIfnkHnxPstrOvajlINMlMMbj83R6dDzP/gd/L +hL/zf8P5fWD/ssDt3+a1wWLOTxaHOYuUd/55rgnnp4LTAYIP8rbxZQk4H2yO +gDjcPFh6gNkH48Pcg84Hh6OxKCSeHRUcYHz09AsAhrkVoA== + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {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, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGITIGYC4v7gEpXp9oYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg4GDzwl229lXtRyKt4r+Pu2H4Pvfkq5J/KQP53vsr5W1cEfwfS9O +jPnHrAfnt/D6r5+Sqgs3H8aH2V/726rg3Ap9DH4AyB4hTTjfzGZv0LREDTj/ +DAi8kXb49fb1ActkdQi/RwtC66g7bNDLW8x4R8shDQTU1OH2M4DAAjU433lC +s1DaLyUMPsw9jyLEt19kUIHzZ4IBgn/qsNPaTDtVh3SQPWwIfrsCu+oZEyk4 +3xgELkvA+a0g+SlicPvQ+SZgDaIOHxatVzg7Q9mh6v6PW8beog6bwP5SgfPB +4d+uCucHgsLNSA3OB8dDqTqcL9rj9YpFRANuPowPs18K5K8Lqhh8mPthfJj/ +YHx9rZXCF5ZoQuKJUQ1ibgmCP2eR8s4/6ZoOKbF33Jgt1CDhIKcJ0dei76Dx +SeXlrJeiDqYg9Qf1IfHkIArRd1wf7l5Y+oPxwfpFDOB81SfN885KGTiIVE4q +OZsi6gCOPjkDhxjVCJlzNQg+LD3B+LD0BuOj5w8YHwAQsj0Y + "]]}, + Thickness[0.05339028296849973]]}, { + ImageSize -> {28.098381070983805`, 24.508064757160646`}, + ImageSize -> {18.732254047322538`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {19., 17.}, PlotRange -> {{0., 18.73}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Row"]], { + Top, Center}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{ + 3.8044105049333076`*^9, 3.804410567769915*^9, 3.804410871734455*^9, { + 3.804411225760277*^9, 3.804411248835516*^9}, 3.804411744204216*^9, + 3.8045795367537613`*^9}, + CellLabel->"Out[71]=",ExpressionUUID->"b1dc4a4b-8a09-483e-a373-03c1369ade74"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HSCEcsf", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENcsf", ",", "2"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "50"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "5"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{SCE}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{EN}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Top", ",", "Center"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804415684797526*^9, 3.804415694542822*^9}, { + 3.804420072828274*^9, 3.804420078417081*^9}, 3.8045795606431437`*^9}, + CellLabel->"In[72]:=",ExpressionUUID->"470d92b2-cb80-4095-8134-dfd878482847"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"58.650505578070764`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"18.6637805951158`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"44.78857168517361`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"6.3986147156434034`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"18.6637805951158`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 72, 9, + 22585821416286832394, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804415705635449*^9, 3.804415747290214*^9, + 3.804420089789947*^9, 3.804420136311948*^9, 3.804579561699769*^9}, + CellLabel-> + "During evaluation of \ +In[72]:=",ExpressionUUID->"4b47c086-c950-433b-aba9-19cc1aeb8b04"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\ +\", RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"15.994805464778288`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"4.799480490252695`\\\", \\\" \\\", \\\ +\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"4.265743143762268`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"7.9982683945542545`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"4.799480490252695`\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 72, 10, 22585821416286832394, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804415705635449*^9, 3.804415747290214*^9, + 3.804420089789947*^9, 3.804420136311948*^9, 3.804579561925105*^9}, + CellLabel-> + "During evaluation of \ +In[72]:=",ExpressionUUID->"45b2c23a-2d94-4893-beeb-546c69872b53"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"4.265743143762268`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"4.799480490252695`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"15.994805464778288`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}]}], \\\",\\\", \ +RowBox[{RowBox[{\\\"-\\\", \\\"4.799480490252695`\\\"}], \\\"+\\\", \ +RowBox[{\\\"2.`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", \ +RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \\\"\[Lambda]\\\"}]}]}], \ +\\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 72, 11, 22585821416286832394, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804415705635449*^9, 3.804415747290214*^9, + 3.804420089789947*^9, 3.804420136311948*^9, 3.804579562044364*^9}, + CellLabel-> + "During evaluation of \ +In[72]:=",ExpressionUUID->"374780ea-1e26-434e-acdf-124cd8b37e98"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 72, 12, 22585821416286832394, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804415705635449*^9, 3.804415747290214*^9, + 3.804420089789947*^9, 3.804420136311948*^9, 3.804579562154065*^9}, + CellLabel-> + "During evaluation of \ +In[72]:=",ExpressionUUID->"d7766a34-3cfa-4915-bbb5-5e3518ff67d0"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{InsetBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwVz3s0lAkYBvBpppmkoZlPe2qyWbrsuJQx61Zh3vdMqFMJnaXYzBZhXVrb +lltCF6WmwpYSS2pbl8RKzS6r+HKJFTvl0s05G5HRqm9mDIYY2tk/nvOc3z/P +OY9FcMzOUDqNRvPS5/++xKOaxbYKklkcqr7xgI30DJZaY64g+WmZmeX32PgD +3dz0pomC3NgyM1xbxsbt73ceZHwcIq3touoHrrKRVVezorlpiEy9Ff9cEsvG +hL1pcR4BQ+SP36q/WSBgo6TE1HJL2luSa9q/cnHRIrRy3HrOq3eAvOBw/J/i +nw3RMf9uUVDyazLZSb4p4awBHt1TbSR9+IJMCevJzP6bheInFgvOr+kk17wQ +iI56MDE5sZ8Zp20iderC4hOtDNQ0W9VdCywjPVc5zeWn0zHgtLH0q8JK6A0U +PSzzmYdR3qc7L69sgfi2ccsOoKGbOqjEQ9YJb6QhB6P+mAOj+uyQS4qX0H8r +rSr6ow4SZ996xl/rA953q1ueps2Aw6PwDvHyQZh94J6Y5zIN3sY2h8fKFZBQ +rxiqnp6CDZwkQQx9BO4slVuPU5PQuiQ3IruQgqXrm45ffKeFReYnDgxfVoNq +xyfVKoYWlhNzgkg3DXQKSureiycgifmmqsFgHI6rhJv/TB+HTX7SupTfJ+Dc +gZiOiZExkBTnneGcnoTNETU9N3aOwSupr2rtjo9AUWHR0x0auN8u7/ttchom +XP49xAzSgMroXibzkQ5sHOr4n6lHQVoe1NZwaA6+SGBOvc4eBXHMLu/5RjQM +T78Qs819FN6duccjNDSUyHWuf02oofGpprSrdR5isE83S6YGj9yhnORKOrrb +RK7mHVZDwu3bPdRFBlYEvjOfc1FD3/uvn3PC56OMRUueZet/llc5m3kx0f5u +qkVcvQrs80eDXq9ioah1KqP7oAr4z+Z3hWhZ2Mjv9/rcVgXNGe1F3b0LcEZY +zFv2QQnZcbEibaUBhoCFpEOmBOO+LidGzkK0MpQ9oKcq4X6syXjj94a4ddg/ +c9pXCcv8+Z82ixeh7cn9KxyslWBWrYyo5rORekyriWUoYbdnbu6rWTa6ctoP +MwYpcPGftFQMGeGXx8ryjjRRIK+0ZNW0GeO2/ZO18hIKLju7lbpeW4wNN+Jz +rmdRwLhOf+Yn5qCkytmDe4QCP5fdNYoKDq4RNqWvC6cgNSlHHLiUi8y+RFGy +PwWzSXd0jWe56BtRId3gqd8zceGdGufiMZ3Vxrz1FBhqS9r3abnY0/brT3v1 +PvZySYpoiouyWjWDr3d0gXJgcoaL2y0fr5c5U+DO/6U8kkHgllD+wBMnCjQb +F6IPQWBrN2nJdqTAJ/hFmKkdgflPneyuCilocXfnTQkJDMxa/nif3q78qvYe +ewLvBG1LttGb/0Fql+FM4JUloQLSjoK5WNE0DQgMk9s1DAsoqDhbdEHhRaAZ +bzrLzZaCldEENnkTqEtxqjXQ++qOVE2hL4Ejjixd9zoK0kwCdgX4EdgwKGyL +1HtPAduiYw+BgpNJZ3LXUtCVmthdKiHwbqZJbKjeW4IVp07tJbCA8zZRqLc9 +/+GIaD+BTmHzOtpsKChduK7ANIzAN43OvCt6m33I9Z4KJ3DuZmJKsN7Zchb9 +WQSBg733Z2z1Nqw6JKuKIrDabSxrxpqC/wCqGEwi + "]]}, + Annotation[#, "Charting`Private`Tag$48497#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVzH081AccwPFzOLmc8VPLuTGZXldTEpE8fb+7aBlCzcOJMrWUHtSkMurM +Qy/OkjvnhSmk5FaKi/Aq/HSeMl7KUx7akNwlPRwXh4qt/fF5ff57rw6L3PUz +lUKheH3u/2cy3zZxLOVkQjPdrGQjHanptCmlqZzc36FW1WROxxNUU9Y1Azl5 +3NziiZxJR8/Xu06qL8jIpFeXLtlr0JFWV2Pc1CgjXx6woBGD2ng2NOm0G1dG +Zn2buCkvURv3lrDW7kgaJ8tG+gsWni3DdbY/pHkNjZF2M5OeCblaaHv5bnHI +uWHSuv7RocCVmhgXXM3gN/STN5M0imkfqMh5vFrr9zVdpMzy7/4iYzU8FzOq +eVrVSLakKWJW5i2BsmldXX7QTXKzk8quXvARuBd0+dYFZaBatU2LnT8PR7wv +dGWZtYCDSdSeL7VU4DwVUuJW2QVF3Bd2hc/eA6NetD9TPgABS6EXVfXTELM4 +vv1M/ghwd1da8GYUsLk5vINj9AICeqs9knvfgLeuxan3pXKYjoyLan30Crbq +xW6MpE6CXNMwoNzxJbSuyD0sKngLuxk0HX7DOCw3TTj2MmsK5rcGVNEyx8CI +WNoY4ayE8lM+m6bIUYjVfC55uGwGnCZypljKf2CbH7/u/L1ZuJc44gDzQ7D3 +xh8pehfmgHGStXzaYAAG+b6K9TsXoG+AxzrA74MH7Z0jd+Y+gDdn8xH3iB5Q +MCouaTZ/AtEZ8ehgYBfwS0PaHkYtwVmPyRwzx8fAiQzw1mBQMPTjku+0RQdM +pFQwCSUF2/Kuhz+2agPpE6W4u1UNUbM2rVTSAm65suxzZVRsZhvNebg2wdlb +t3rfCtXR2KvZaNZMCiOvf3yqF66BqoloW2ZQAyhKJVtMvDTxRKpbxXWHOrC5 +PB0y/A0N/WxYh6S+94Hdp9G9X0VDLXdhpYCshqb09uKeIS2cYJZelznfA9Hp +aBdV2TKkuLulHDOvAN2Rbjv1bG1cebvFPZ8pgQfRBjPS43SMJwqP97TeAUN/ +9r/fc5aj2F2onie9BSbV7w5Xs3Ww6tHWG5FdYgjcnps7uKiDhlzr9rKgG+Do +P7dWLmNgCiMx7M/Za9BZtpZW06aLtsYTcbXPrkLWFmexU/4XyC3aZ2nCLAT1 +QmqfH0cPc4p1eCbNl8HPMbBGflsP39cyvq6Q5wIvNpsTtEoft/U+FA6FZMNi +bPknaao+Ck6sqeHJRJBl4MhMntHH4VmvpOEeIdBVJe0/qfTxafCntq/ahRA/ +sOK8y7w+Ntp7mu2TCuHolXdjcx/1cTzGWX2qXAiu7KLSCHUCf03J9OWkC0Hp +oI0+BIFq8QFxJe5C8AnrP8iyItBIpGCGNwqgxdWVOb+JQF61IdP8gQCc2JL2 +XhsC7WqVivG7AmC/4VulbyHQ2FJk/EuRAJaiXT5QgECN1Krt938TwO3U4oty +r8+eJM6V8p0AzI4S2OhNYEWtzuSCvQBydvKUBb4EtnobesxZCSDJgBvA9SNw +j5vEftFUAMFXdFZ3BBMYapIgsFUTQDcvpke897MfET/muZABO8LkycmhBCqz +NzwPn84AG3bDpMsBAkfi6kbFzzNArL3hCusggR1X7YY7BzPA5E2u93w4geuT +0hLmuzJA1Emj9h0m0Npfu2PNXxlAl0RVSo4Q6LNiqcZfmgH/AS8qQLo= + "]]}, + Annotation[#, "Charting`Private`Tag$48497#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwBIQLe/SFib1JlAgAAACEAAAACAAAAkxntxEIu5r8JbSgtZY3TPwKOBvDy +IOa/pPa+FomV0z9wAiAboxPmv66f72OwndM/TOtScQP55b8Cv8QuCa7TPwa9 +uB3Ew+W/Mi/lrePO0z94YIR2RVnlv5yOJ5E9EdQ/XqcbKEiE5L+4AlYEj5jU +Pyk1SotN2uK/XyGYYvux1T81nLKlXX3ev2WGqwTXSNg/fFy3DYrA17/2/FZ2 +AvvaP0LPIQeMJdG/469h+vfp3T99eeAFdvbDv4iHlWOWuuA/8sQpvZ5aqr8Z +ZuCzRZLiP1mGDooyn68/T8h0/kfM5D9rT4bRlSLGPxLW94tUPuc/PfBdp0W0 +0T/uIfL3fcjpPw2+lGOT5tg/FquIAQba7D95/eRGd57fP+etMHzCBfA/NMVn +zEIa4z9RrF+pWcLxP08OK3TzrOY/BgwUn2fb8z85EHsvbwLqP8q9Z3qXCfY/ +xxSZaZSf7T97hWDrFKz4Pwsggm3nlfA/pFB9vJ+Q+z8aEv4vaj3yP8pt3YRO +kf4/ewXhscEI9D8sOEW8+xgBQENVir1+tfU/Lw0ERvj7AkBeppqIEIb3P9cy +njKqQwVA2YpR7yxO+T/yg4dn4sQHQLvLzt+u9/o/SJERVQFfCkDvDbOPBcX8 +P5o8/yzbgw1AiqxdycFz/j8fgMUr22QQQEJvV08EDQBAHrHK1p4sEkAxt+Rg +dc8AQAAAAAAAABRA/gAGqw== + "]]}, + Annotation[#, "Charting`Private`Tag$48497#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0Hs0lAkcxvFpxoxUM8281CaXhs6iG0ptyeX3O0Ml69YFyeUUSaJVSFlJ +tQiFTrHShd1tLbsIzQjb0avJZVtOMtI7dHGdUe5NmkFiZ/94zvd8/n2MAiP2 +BtNpNJqrev/3hu5ovcBcTpq3DR4djeMgPYM1oeDLSVaS6PKxkxw8Sefr3dOW +k6or1pHvj3DQZXjvKca0jFTGnbmjdOUgq7baoP6pjPx80Y7jwufg2UOJMTt8 +ZKTNttjSzgY2BhTqmTklDpAmotvWkTpsXLPF+YprVx85KM41MCcX45Y7Dwr8 +49+R8dZ9q2KWaeE5vyp2Wh1FutGK2MIuFgpajTSvfttGMn3N16b2aWB8bA8z +RvmU/Omt0blAFR0V9Wtq8w7+RRYnbppm+y1An2RO2qb8Mtj1ZjLvzM15CHNP +bss2boTw4OXk465ZsJvwL9whaoPooZxD8owZYD/OCrohl4JKa8a3au8UxH4d +2Hkmrxsa95UX3o5SwuaGkBbByn5QSY1HXFomwZ2zLvpTiRyiNjpuFlp8Amtu +nEUEfQgya+RfDF59hCad3NCs/FEQVCjYmskTsJh/6cRg9gTQ09tHtR6PwUpi +zuK4nQIMyUmT6tYRiGP2VjxZOAkez5gSj7EhcPBMqz1f+RmcR1et2OD7AQL+ +uJXCTVbBNpMFCafaB6Ezbc/4erdpuM3zbHoUJ4dHzc+776tm4GD/PCHxlcE4 +W5jJbJiFCdHmY8UOA5BW4v/sSdQcGOlrGOn59IMgwttdg01D7rBB6kBqH7xP +EeoSChr+XJvz6yzZC+IXiiJJ0wJ8OB5h0r+8F3bkynLiy+io37HvwrnIHjhb +XPxy9DoDlfG9cyH13dA9vP8VN0QDHdof1BVJ3sF4ScVWQ1cmfrJVWLoNvgWr +Ox/9361mYU2WkdN247dg2qEhCVKyUOQgtF8e/QbqM5oL2rs0sZ22jbbn39eQ +FXPaXlm2ECf6Xlw1sH0NnG7Jd4wcLWwJe8horuiCR6e1J8U/LMKL/k3ls3Zd +sMLLdH6XYDG2TqtWCqlOMKwaC60yXYJ8iXkmN7oTDuzMze38ugSNg6yofH4n +2HipzOQyNmYqCgIut0rheZkZq/oZB81MhjcGpEghe6tdkW3eUgz8sbLmiYsU +GL/QOzwFXNw07FFaS0jB0+ZAtbyUi8Vhfw+s6aMgIS5HcPAbHrZ42etDFQVf +48pnxak8nPCUXQtLpyBb20Y3aZKHKat/jww6TsEiZWHzYSUPG5sH1rWGUnBB +qnPefoqH5Yb6a23UDr871qf6wsPKpLFJ7WMUOJr+VnKcQeDND/fq/gmmQLFd +Cz0IAsX8DB04TIFHIHVUz5LASzm72/0PUNDo6Kg7tZHAqVveY23eFNiaVjS/ +tCKwwzHGeafapiNplhlbCSxJD2+w8KJg7rT9DA0IXL/so5i5n4LS1IJ0uSuB +ZhIzca07BcbhBD51J/B6uGXPFrVvuiUo8vcQeFkzzO6+GwWJ2j7ePp4EjtUw +KvNdKfC7u8SoxY9AYWBmdtL3FEgSYtuLAgikKWf+nHemwClQnpR0iEDbnrLZ +WLWtTOuG7I8Q2Cq/6Bexm4IirQ139Y4SyLQJDh1yosBwJNd9KoRAVy9DUbDa +Wc9Z9I5QApfGXLPt3aX+syJKVBFG4AlZHt1f7f8A0glOPw== + "]]}, + Annotation[#, "Charting`Private`Tag$48497#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$59623#1"]& ]}, {}}}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, + 9.495310000000002}, {5.387499999999999, 12.6313}, { + 5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, + 9.495310000000002}, {5.387499999999999, 12.6313}, { + 5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.700480365792417, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.787491742782046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.700480365792417, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.787491742782046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, + PlotLabel->None, + PlotRange->NCache[{{-0.6931471805599453, + Log[50]}, {0, 5}}, {{-0.6931471805599453, 3.912023005428146}, {0, + 5}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + Scaled[{0.5, 0.5}], Center, Scaled[{1, 1}]], InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.04835589941972921], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}]}, { + Thickness[0.04835589941972921]}, StripOnInput -> False]}, { + ImageSize -> {31.02590286425903, 24.508064757160646`}, + ImageSize -> {20.683935242839354`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {21., 17.}, PlotRange -> {{0., 20.68}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.03321155762205247], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]]}, { + Thickness[0.03321155762205247]}, StripOnInput -> False]}, { + ImageSize -> {45.16974844333748, 24.508064757160646`}, + ImageSize -> {30.113165628891654`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {31., 17.}, + PlotRange -> {{0., 30.110000000000003`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.04012841091492777], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9IU1EUx+ecU7Maul8vXbrfNheUTczC2CmJqCQr/1klJdL8kYVKFmpK +qKnYrLQyfyQWKYigZFBphmaFpWQ/zGVhkEODEmeklDl1s717tzswOnB5fLjv +nXfO93zvlSSkHdS7MxgMN/vaZ19M+zLtPLa99kAA1NXYw7IWnNw8O5E1kC6G +XS29TYwIf9DQUSiBoM7b3fofFAzQES2FnNG5EY1aCAw64mWQnGgPNh9KI3d3 +Jt6RQfCMfKJWxcX7Jhn86Z5+kDTsA/c3zz07flEOD/e0RdRZ2JA707Y/dUQO +E3njqW9bmFBdzskJ91ESts6eMdVVBBO+VlJ0eChSBYXCPI8Uthd8O6GereoK +gU+rPgv0ZzmEUZ1lQsI1KCgY0wnbB01KeGroLggbpxz/V8Bk8SnDpgUK/OuP +ql6Vu7gDCsZeZimgSOypGMhcQ9iM9v/lfFbvldAqF28Maea+YykJR/d5brv5 +IYRwzGBFnC1KTZiqNHonJ6ghdmpoujrfxUcUOtGbOBdj/V38C+lLQRg9L64a +9xclhL7nO1pT6lW4fwsP2ul6KTWe65Av+d6pn5NF9wS3mCYWYTz3ee381GTP +ligV4eS0n0X9RiXhvs6OS+w2BbA2zK94X2bVWuj3G+SOfSbovAUlmrsyXF+D +B/Zbj9ThBy9cZ6kUluh4wgHZ8FgsQySFbLpfgy+co5+TEliH/MWDrrTcqZpK +CRTT8zHysI8zJA4dhMDNvpr5+qvY4QcK6xQeRDgL5RURRr6foxx+FuC5X+fj +vL5+hH8jvTmEv9P+NHvjOQYIsO/BAzpit+qWgik4WRmfEXF6SduD+vYHM/Kz +TTuK8gaCle73vE3Lo+ttdNQXbdOiObmLQU/Xk7j4X3bqv5zROewPIoye5kDC +yEd7+YQv6wwxbuk8wkhHDQ/rqVkkbFx48bH+kJWwc944H8/hH5u21W/96qQv +PKz7DSae7yMhNI40jYe6s7Gug3y4gM7zSnDmQ34X+RHG509I2HlfIb0fU7D8 +PvsLzIYtzQ== + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ikT+KvMuvUc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4LDnEXKO/+4I/hgeW4EX19rpfAFFj0H5wnNQmlZCP5/ELBXcGDh7JJP +PqfrUH3/xy3j1xIOW8x/HErh0nZoVWBXPTNF1KH604aA7F0acP7TxIXXTPjV +4fyV315WnGlQgvLF4XwwfUAJzgfbu0TTYUp7a9TlP2oOf76VPpizUctBtMfr +FcsWDTg/I/9D60kTbTg/NQ0EdB0CbknXJE7ScHgSIb794gNdh1OHndZm/lNx +OAMCb3QdfE6w287eiuD/fPv6gOViFYi4qR6cDws/dD5MP4z/BORPfVVU+ata +cL7/xYkx/5y14XyJqVc4M5K0IeHph+DHhwSpL9BE8P+A7FXWc9BXlP+SE6bt +ILv8hYfef12H7Q5Nj45LaDuIgMLjio5DA8vRfkNzTQdzm71B0w5qQ/zVo+Ug +DjJHSQtu3mZQfGVpwPkbVJ80z+NVgfNng9KBp4LDiyztb9PnqsP5sPiB8Q90 +72syWSztUAOKbykVBxNjEBCBmw/jg90XogPnw/wvAkqfLNIO6OkXAOddMnQ= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOzjJ3uKMpu+b/ZgWHlNg7bswRCP7J +w05rM/nMHdzXHF3O8EPS4aZ0TaLRUTOHVgV21TNTxBz+fCt9MOegCZwvPvUK +Z4aSMZwfreD4MXmOEZyfngYE04wcau7/uGX8GsGPVo2QOVcjAeevFdLhS1+n +5LBBL28x4xpjOF9mXpzm6QsmcL4EyL5PJg4PXOMdZ31UhPPVP6m8nHVS3sHn +BLvtbFNTDH5CSJD6Ak01uHp0/pT21qjLMipw+xhAIEEZ7h4YH+ZedL40SJ+B +JsK/nzYEZP/ShIeHvtZK4QsqWvDwgvF5/NdPSd1hAudrvOXdZ1BpBud/ARoz +67qZg2iP1yuWLxoOXiD/sJo7GIDkW1Qd+ED6PRB8sP6fZhB/X9VysK+MWGFa +a4DBh5nP7aZayrQLwf+681bX36mGcP7jxIXXTOYbOsxZpLzzz3NNOD8V5E82 +BN8YBC5LwPl9Ed3+jALicPNg6QFmH4wPcw863wRsoCgkPhTM4Xz09AsADwgP +hA== + "]]}, { + Thickness[0.04012841091492777]}, StripOnInput -> False]}, { + ImageSize -> {37.372557907845575`, 24.508064757160646`}, + ImageSize -> {24.915038605230386`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {25., 17.}, + PlotRange -> {{0., 24.919999999999998`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.05339028296849973], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4r35NW9nmio63NGUXfN/s4IDAwhsUIDzz4CA +jIKD+5qjyxl+SDq0KrCrnhGRh9BTxBwy0oCATRzOV/+k8nJWpwCcf6B7X5PJ +Yx4438QYCDbzONTc/3HL+DWCH60aIXOuRgLOXyukw5e+TsmhP6Lbn3GDEJx/ +EGSeszicrwGy76S4wwPXeMdZHxXhfLA7Tso7fNn3cWv6NQkMfkJIkPoCTTW4 +enT+lPbWqMsyKnD7wOGSoAx3D4wPcy86X3penOZpA02Efz9tCMj+pQkPD32t +lcIXVLTg4QXjh7y9/HHGQzE4X6RyUsnZJ7JwPtjfcfIOoj1er1i+aDhUg8KR +W8HBACTfouqw4tvLijMTEHyIfnkHnxPstrOvajlINMlMMbj83R6dDzP/gd/L +hL/zf8P5fWD/ssDt3+a1wWLOTxaHOYuUd/55rgnnp4LTAYIP8rbxZQk4H2yO +gDjcPFh6gNkH48Pcg84Hh6OxKCSeHRUcYHz09AsAhrkVoA== + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {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, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGITIGYC4v7gEpXp9oYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg4GDzwl229lXtRyKt4r+Pu2H4Pvfkq5J/KQP53vsr5W1cEfwfS9O +jPnHrAfnt/D6r5+Sqgs3H8aH2V/726rg3Ap9DH4AyB4hTTjfzGZv0LREDTj/ +DAi8kXb49fb1ActkdQi/RwtC66g7bNDLW8x4R8shDQTU1OH2M4DAAjU433lC +s1DaLyUMPsw9jyLEt19kUIHzZ4IBgn/qsNPaTDtVh3SQPWwIfrsCu+oZEyk4 +3xgELkvA+a0g+SlicPvQ+SZgDaIOHxatVzg7Q9mh6v6PW8beog6bwP5SgfPB +4d+uCucHgsLNSA3OB8dDqTqcL9rj9YpFRANuPowPs18K5K8Lqhh8mPthfJj/ +YHx9rZXCF5ZoQuKJUQ1ibgmCP2eR8s4/6ZoOKbF33Jgt1CDhIKcJ0dei76Dx +SeXlrJeiDqYg9Qf1IfHkIArRd1wf7l5Y+oPxwfpFDOB81SfN885KGTiIVE4q +OZsi6gCOPjkDhxjVCJlzNQg+LD3B+LD0BuOj5w8YHwAQsj0Y + "]]}, { + Thickness[0.05339028296849973]}, StripOnInput -> False]}, { + ImageSize -> {28.098381070983805`, 24.508064757160646`}, + ImageSize -> {18.732254047322538`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {19., 17.}, PlotRange -> {{0., 18.73}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> {"Columns" -> {{0.8, 0.5}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{None}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> {"Columns" -> {{0}}, "Rows" -> {{1}}}], + "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[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Row\""}]}], "]"}]& )], + Scaled[{0.5, 1.01}], ImageScaled[{0.5, 0.5}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->False, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->False, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotLabel->None, + PlotRange->Automatic, + PlotRangeClipping->False, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVz3s0lAkYBvBpppmkoZlPe2qyWbrsuJQx61Zh3vdMqFMJnaXYzBZhXVrb +lltCF6WmwpYSS2pbl8RKzS6r+HKJFTvl0s05G5HRqm9mDIYY2tk/nvOc3z/P +OY9FcMzOUDqNRvPS5/++xKOaxbYKklkcqr7xgI30DJZaY64g+WmZmeX32PgD +3dz0pomC3NgyM1xbxsbt73ceZHwcIq3touoHrrKRVVezorlpiEy9Ff9cEsvG +hL1pcR4BQ+SP36q/WSBgo6TE1HJL2luSa9q/cnHRIrRy3HrOq3eAvOBw/J/i +nw3RMf9uUVDyazLZSb4p4awBHt1TbSR9+IJMCevJzP6bheInFgvOr+kk17wQ +iI56MDE5sZ8Zp20iderC4hOtDNQ0W9VdCywjPVc5zeWn0zHgtLH0q8JK6A0U +PSzzmYdR3qc7L69sgfi2ccsOoKGbOqjEQ9YJb6QhB6P+mAOj+uyQS4qX0H8r +rSr6ow4SZ996xl/rA953q1ueps2Aw6PwDvHyQZh94J6Y5zIN3sY2h8fKFZBQ +rxiqnp6CDZwkQQx9BO4slVuPU5PQuiQ3IruQgqXrm45ffKeFReYnDgxfVoNq +xyfVKoYWlhNzgkg3DXQKSureiycgifmmqsFgHI6rhJv/TB+HTX7SupTfJ+Dc +gZiOiZExkBTnneGcnoTNETU9N3aOwSupr2rtjo9AUWHR0x0auN8u7/ttchom +XP49xAzSgMroXibzkQ5sHOr4n6lHQVoe1NZwaA6+SGBOvc4eBXHMLu/5RjQM +T78Qs819FN6duccjNDSUyHWuf02oofGpprSrdR5isE83S6YGj9yhnORKOrrb +RK7mHVZDwu3bPdRFBlYEvjOfc1FD3/uvn3PC56OMRUueZet/llc5m3kx0f5u +qkVcvQrs80eDXq9ioah1KqP7oAr4z+Z3hWhZ2Mjv9/rcVgXNGe1F3b0LcEZY +zFv2QQnZcbEibaUBhoCFpEOmBOO+LidGzkK0MpQ9oKcq4X6syXjj94a4ddg/ +c9pXCcv8+Z82ixeh7cn9KxyslWBWrYyo5rORekyriWUoYbdnbu6rWTa6ctoP +MwYpcPGftFQMGeGXx8ryjjRRIK+0ZNW0GeO2/ZO18hIKLju7lbpeW4wNN+Jz +rmdRwLhOf+Yn5qCkytmDe4QCP5fdNYoKDq4RNqWvC6cgNSlHHLiUi8y+RFGy +PwWzSXd0jWe56BtRId3gqd8zceGdGufiMZ3Vxrz1FBhqS9r3abnY0/brT3v1 +PvZySYpoiouyWjWDr3d0gXJgcoaL2y0fr5c5U+DO/6U8kkHgllD+wBMnCjQb +F6IPQWBrN2nJdqTAJ/hFmKkdgflPneyuCilocXfnTQkJDMxa/nif3q78qvYe +ewLvBG1LttGb/0Fql+FM4JUloQLSjoK5WNE0DQgMk9s1DAsoqDhbdEHhRaAZ +bzrLzZaCldEENnkTqEtxqjXQ++qOVE2hL4Ejjixd9zoK0kwCdgX4EdgwKGyL +1HtPAduiYw+BgpNJZ3LXUtCVmthdKiHwbqZJbKjeW4IVp07tJbCA8zZRqLc9 +/+GIaD+BTmHzOtpsKChduK7ANIzAN43OvCt6m33I9Z4KJ3DuZmJKsN7Zchb9 +WQSBg733Z2z1Nqw6JKuKIrDabSxrxpqC/wCqGEwi + "]]}, + "Charting`Private`Tag$48497#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVzH081AccwPFzOLmc8VPLuTGZXldTEpE8fb+7aBlCzcOJMrWUHtSkMurM +Qy/OkjvnhSmk5FaKi/Aq/HSeMl7KUx7akNwlPRwXh4qt/fF5ff57rw6L3PUz +lUKheH3u/2cy3zZxLOVkQjPdrGQjHanptCmlqZzc36FW1WROxxNUU9Y1Azl5 +3NziiZxJR8/Xu06qL8jIpFeXLtlr0JFWV2Pc1CgjXx6woBGD2ng2NOm0G1dG +Zn2buCkvURv3lrDW7kgaJ8tG+gsWni3DdbY/pHkNjZF2M5OeCblaaHv5bnHI +uWHSuv7RocCVmhgXXM3gN/STN5M0imkfqMh5vFrr9zVdpMzy7/4iYzU8FzOq +eVrVSLakKWJW5i2BsmldXX7QTXKzk8quXvARuBd0+dYFZaBatU2LnT8PR7wv +dGWZtYCDSdSeL7VU4DwVUuJW2QVF3Bd2hc/eA6NetD9TPgABS6EXVfXTELM4 +vv1M/ghwd1da8GYUsLk5vINj9AICeqs9knvfgLeuxan3pXKYjoyLan30Crbq +xW6MpE6CXNMwoNzxJbSuyD0sKngLuxk0HX7DOCw3TTj2MmsK5rcGVNEyx8CI +WNoY4ayE8lM+m6bIUYjVfC55uGwGnCZypljKf2CbH7/u/L1ZuJc44gDzQ7D3 +xh8pehfmgHGStXzaYAAG+b6K9TsXoG+AxzrA74MH7Z0jd+Y+gDdn8xH3iB5Q +MCouaTZ/AtEZ8ehgYBfwS0PaHkYtwVmPyRwzx8fAiQzw1mBQMPTjku+0RQdM +pFQwCSUF2/Kuhz+2agPpE6W4u1UNUbM2rVTSAm65suxzZVRsZhvNebg2wdlb +t3rfCtXR2KvZaNZMCiOvf3yqF66BqoloW2ZQAyhKJVtMvDTxRKpbxXWHOrC5 +PB0y/A0N/WxYh6S+94Hdp9G9X0VDLXdhpYCshqb09uKeIS2cYJZelznfA9Hp +aBdV2TKkuLulHDOvAN2Rbjv1bG1cebvFPZ8pgQfRBjPS43SMJwqP97TeAUN/ +9r/fc5aj2F2onie9BSbV7w5Xs3Ww6tHWG5FdYgjcnps7uKiDhlzr9rKgG+Do +P7dWLmNgCiMx7M/Za9BZtpZW06aLtsYTcbXPrkLWFmexU/4XyC3aZ2nCLAT1 +QmqfH0cPc4p1eCbNl8HPMbBGflsP39cyvq6Q5wIvNpsTtEoft/U+FA6FZMNi +bPknaao+Ck6sqeHJRJBl4MhMntHH4VmvpOEeIdBVJe0/qfTxafCntq/ahRA/ +sOK8y7w+Ntp7mu2TCuHolXdjcx/1cTzGWX2qXAiu7KLSCHUCf03J9OWkC0Hp +oI0+BIFq8QFxJe5C8AnrP8iyItBIpGCGNwqgxdWVOb+JQF61IdP8gQCc2JL2 +XhsC7WqVivG7AmC/4VulbyHQ2FJk/EuRAJaiXT5QgECN1Krt938TwO3U4oty +r8+eJM6V8p0AzI4S2OhNYEWtzuSCvQBydvKUBb4EtnobesxZCSDJgBvA9SNw +j5vEftFUAMFXdFZ3BBMYapIgsFUTQDcvpke897MfET/muZABO8LkycmhBCqz +NzwPn84AG3bDpMsBAkfi6kbFzzNArL3hCusggR1X7YY7BzPA5E2u93w4geuT +0hLmuzJA1Emj9h0m0Npfu2PNXxlAl0RVSo4Q6LNiqcZfmgH/AS8qQLo= + "]]}, + "Charting`Private`Tag$48497#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwBIQLe/SFib1JlAgAAACEAAAACAAAAkxntxEIu5r8JbSgtZY3TPwKOBvDy +IOa/pPa+FomV0z9wAiAboxPmv66f72OwndM/TOtScQP55b8Cv8QuCa7TPwa9 +uB3Ew+W/Mi/lrePO0z94YIR2RVnlv5yOJ5E9EdQ/XqcbKEiE5L+4AlYEj5jU +Pyk1SotN2uK/XyGYYvux1T81nLKlXX3ev2WGqwTXSNg/fFy3DYrA17/2/FZ2 +AvvaP0LPIQeMJdG/469h+vfp3T99eeAFdvbDv4iHlWOWuuA/8sQpvZ5aqr8Z +ZuCzRZLiP1mGDooyn68/T8h0/kfM5D9rT4bRlSLGPxLW94tUPuc/PfBdp0W0 +0T/uIfL3fcjpPw2+lGOT5tg/FquIAQba7D95/eRGd57fP+etMHzCBfA/NMVn +zEIa4z9RrF+pWcLxP08OK3TzrOY/BgwUn2fb8z85EHsvbwLqP8q9Z3qXCfY/ +xxSZaZSf7T97hWDrFKz4Pwsggm3nlfA/pFB9vJ+Q+z8aEv4vaj3yP8pt3YRO +kf4/ewXhscEI9D8sOEW8+xgBQENVir1+tfU/Lw0ERvj7AkBeppqIEIb3P9cy +njKqQwVA2YpR7yxO+T/yg4dn4sQHQLvLzt+u9/o/SJERVQFfCkDvDbOPBcX8 +P5o8/yzbgw1AiqxdycFz/j8fgMUr22QQQEJvV08EDQBAHrHK1p4sEkAxt+Rg +dc8AQAAAAAAAABRA/gAGqw== + "]]}, "Charting`Private`Tag$48497#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0Hs0lAkcxvFpxoxUM8281CaXhs6iG0ptyeX3O0Ml69YFyeUUSaJVSFlJ +tQiFTrHShd1tLbsIzQjb0avJZVtOMtI7dHGdUe5NmkFiZ/94zvd8/n2MAiP2 +BtNpNJqrev/3hu5ovcBcTpq3DR4djeMgPYM1oeDLSVaS6PKxkxw8Sefr3dOW +k6or1pHvj3DQZXjvKca0jFTGnbmjdOUgq7baoP6pjPx80Y7jwufg2UOJMTt8 +ZKTNttjSzgY2BhTqmTklDpAmotvWkTpsXLPF+YprVx85KM41MCcX45Y7Dwr8 +49+R8dZ9q2KWaeE5vyp2Wh1FutGK2MIuFgpajTSvfttGMn3N16b2aWB8bA8z +RvmU/Omt0blAFR0V9Wtq8w7+RRYnbppm+y1An2RO2qb8Mtj1ZjLvzM15CHNP +bss2boTw4OXk465ZsJvwL9whaoPooZxD8owZYD/OCrohl4JKa8a3au8UxH4d +2Hkmrxsa95UX3o5SwuaGkBbByn5QSY1HXFomwZ2zLvpTiRyiNjpuFlp8Amtu +nEUEfQgya+RfDF59hCad3NCs/FEQVCjYmskTsJh/6cRg9gTQ09tHtR6PwUpi +zuK4nQIMyUmT6tYRiGP2VjxZOAkez5gSj7EhcPBMqz1f+RmcR1et2OD7AQL+ +uJXCTVbBNpMFCafaB6Ezbc/4erdpuM3zbHoUJ4dHzc+776tm4GD/PCHxlcE4 +W5jJbJiFCdHmY8UOA5BW4v/sSdQcGOlrGOn59IMgwttdg01D7rBB6kBqH7xP +EeoSChr+XJvz6yzZC+IXiiJJ0wJ8OB5h0r+8F3bkynLiy+io37HvwrnIHjhb +XPxy9DoDlfG9cyH13dA9vP8VN0QDHdof1BVJ3sF4ScVWQ1cmfrJVWLoNvgWr +Ox/9361mYU2WkdN247dg2qEhCVKyUOQgtF8e/QbqM5oL2rs0sZ22jbbn39eQ +FXPaXlm2ECf6Xlw1sH0NnG7Jd4wcLWwJe8horuiCR6e1J8U/LMKL/k3ls3Zd +sMLLdH6XYDG2TqtWCqlOMKwaC60yXYJ8iXkmN7oTDuzMze38ugSNg6yofH4n +2HipzOQyNmYqCgIut0rheZkZq/oZB81MhjcGpEghe6tdkW3eUgz8sbLmiYsU +GL/QOzwFXNw07FFaS0jB0+ZAtbyUi8Vhfw+s6aMgIS5HcPAbHrZ42etDFQVf +48pnxak8nPCUXQtLpyBb20Y3aZKHKat/jww6TsEiZWHzYSUPG5sH1rWGUnBB +qnPefoqH5Yb6a23UDr871qf6wsPKpLFJ7WMUOJr+VnKcQeDND/fq/gmmQLFd +Cz0IAsX8DB04TIFHIHVUz5LASzm72/0PUNDo6Kg7tZHAqVveY23eFNiaVjS/ +tCKwwzHGeafapiNplhlbCSxJD2+w8KJg7rT9DA0IXL/so5i5n4LS1IJ0uSuB +ZhIzca07BcbhBD51J/B6uGXPFrVvuiUo8vcQeFkzzO6+GwWJ2j7ePp4EjtUw +KvNdKfC7u8SoxY9AYWBmdtL3FEgSYtuLAgikKWf+nHemwClQnpR0iEDbnrLZ +WLWtTOuG7I8Q2Cq/6Bexm4IirQ139Y4SyLQJDh1yosBwJNd9KoRAVy9DUbDa +Wc9Z9I5QApfGXLPt3aX+syJKVBFG4AlZHt1f7f8A0glOPw== + "]]}, + "Charting`Private`Tag$48497#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$59623#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.016366343537374484`, + 61.101002659291716`}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.016366343537374484`, 5.}}}}, DisplayFunction -> Identity, + AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[50]}, {0, 5}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.04835589941972921], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}]}, + Thickness[0.04835589941972921]]}, { + ImageSize -> {31.02590286425903, 24.508064757160646`}, + ImageSize -> {20.683935242839354`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {21., 17.}, PlotRange -> {{0., 20.68}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.03321155762205247], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]]}, + Thickness[0.03321155762205247]]}, { + ImageSize -> {45.16974844333748, 24.508064757160646`}, + ImageSize -> {30.113165628891654`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {31., 17.}, + PlotRange -> {{0., 30.110000000000003`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.04012841091492777], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9IU1EUx+ecU7Maul8vXbrfNheUTczC2CmJqCQr/1klJdL8kYVKFmpK +qKnYrLQyfyQWKYigZFBphmaFpWQ/zGVhkEODEmeklDl1s717tzswOnB5fLjv +nXfO93zvlSSkHdS7MxgMN/vaZ19M+zLtPLa99kAA1NXYw7IWnNw8O5E1kC6G +XS29TYwIf9DQUSiBoM7b3fofFAzQES2FnNG5EY1aCAw64mWQnGgPNh9KI3d3 +Jt6RQfCMfKJWxcX7Jhn86Z5+kDTsA/c3zz07flEOD/e0RdRZ2JA707Y/dUQO +E3njqW9bmFBdzskJ91ESts6eMdVVBBO+VlJ0eChSBYXCPI8Uthd8O6GereoK +gU+rPgv0ZzmEUZ1lQsI1KCgY0wnbB01KeGroLggbpxz/V8Bk8SnDpgUK/OuP +ql6Vu7gDCsZeZimgSOypGMhcQ9iM9v/lfFbvldAqF28Maea+YykJR/d5brv5 +IYRwzGBFnC1KTZiqNHonJ6ghdmpoujrfxUcUOtGbOBdj/V38C+lLQRg9L64a +9xclhL7nO1pT6lW4fwsP2ul6KTWe65Av+d6pn5NF9wS3mCYWYTz3ee381GTP +ligV4eS0n0X9RiXhvs6OS+w2BbA2zK94X2bVWuj3G+SOfSbovAUlmrsyXF+D +B/Zbj9ThBy9cZ6kUluh4wgHZ8FgsQySFbLpfgy+co5+TEliH/MWDrrTcqZpK +CRTT8zHysI8zJA4dhMDNvpr5+qvY4QcK6xQeRDgL5RURRr6foxx+FuC5X+fj +vL5+hH8jvTmEv9P+NHvjOQYIsO/BAzpit+qWgik4WRmfEXF6SduD+vYHM/Kz +TTuK8gaCle73vE3Lo+ttdNQXbdOiObmLQU/Xk7j4X3bqv5zROewPIoye5kDC +yEd7+YQv6wwxbuk8wkhHDQ/rqVkkbFx48bH+kJWwc944H8/hH5u21W/96qQv +PKz7DSae7yMhNI40jYe6s7Gug3y4gM7zSnDmQ34X+RHG509I2HlfIb0fU7D8 +PvsLzIYtzQ== + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ikT+KvMuvUc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4LDnEXKO/+4I/hgeW4EX19rpfAFFj0H5wnNQmlZCP5/ELBXcGDh7JJP +PqfrUH3/xy3j1xIOW8x/HErh0nZoVWBXPTNF1KH604aA7F0acP7TxIXXTPjV +4fyV315WnGlQgvLF4XwwfUAJzgfbu0TTYUp7a9TlP2oOf76VPpizUctBtMfr +FcsWDTg/I/9D60kTbTg/NQ0EdB0CbknXJE7ScHgSIb794gNdh1OHndZm/lNx +OAMCb3QdfE6w287eiuD/fPv6gOViFYi4qR6cDws/dD5MP4z/BORPfVVU+ata +cL7/xYkx/5y14XyJqVc4M5K0IeHph+DHhwSpL9BE8P+A7FXWc9BXlP+SE6bt +ILv8hYfef12H7Q5Nj45LaDuIgMLjio5DA8vRfkNzTQdzm71B0w5qQ/zVo+Ug +DjJHSQtu3mZQfGVpwPkbVJ80z+NVgfNng9KBp4LDiyztb9PnqsP5sPiB8Q90 +72syWSztUAOKbykVBxNjEBCBmw/jg90XogPnw/wvAkqfLNIO6OkXAOddMnQ= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOzjJ3uKMpu+b/ZgWHlNg7bswRCP7J +w05rM/nMHdzXHF3O8EPS4aZ0TaLRUTOHVgV21TNTxBz+fCt9MOegCZwvPvUK +Z4aSMZwfreD4MXmOEZyfngYE04wcau7/uGX8GsGPVo2QOVcjAeevFdLhS1+n +5LBBL28x4xpjOF9mXpzm6QsmcL4EyL5PJg4PXOMdZ31UhPPVP6m8nHVS3sHn +BLvtbFNTDH5CSJD6Ak01uHp0/pT21qjLMipw+xhAIEEZ7h4YH+ZedL40SJ+B +JsK/nzYEZP/ShIeHvtZK4QsqWvDwgvF5/NdPSd1hAudrvOXdZ1BpBud/ARoz +67qZg2iP1yuWLxoOXiD/sJo7GIDkW1Qd+ED6PRB8sP6fZhB/X9VysK+MWGFa +a4DBh5nP7aZayrQLwf+681bX36mGcP7jxIXXTOYbOsxZpLzzz3NNOD8V5E82 +BN8YBC5LwPl9Ed3+jALicPNg6QFmH4wPcw863wRsoCgkPhTM4Xz09AsADwgP +hA== + "]]}, + Thickness[0.04012841091492777]]}, { + ImageSize -> {37.372557907845575`, 24.508064757160646`}, + ImageSize -> {24.915038605230386`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {25., 17.}, + PlotRange -> {{0., 24.919999999999998`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.05339028296849973], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4r35NW9nmio63NGUXfN/s4IDAwhsUIDzz4CA +jIKD+5qjyxl+SDq0KrCrnhGRh9BTxBwy0oCATRzOV/+k8nJWpwCcf6B7X5PJ +Yx4438QYCDbzONTc/3HL+DWCH60aIXOuRgLOXyukw5e+TsmhP6Lbn3GDEJx/ +EGSeszicrwGy76S4wwPXeMdZHxXhfLA7Tso7fNn3cWv6NQkMfkJIkPoCTTW4 +enT+lPbWqMsyKnD7wOGSoAx3D4wPcy86X3penOZpA02Efz9tCMj+pQkPD32t +lcIXVLTg4QXjh7y9/HHGQzE4X6RyUsnZJ7JwPtjfcfIOoj1er1i+aDhUg8KR +W8HBACTfouqw4tvLijMTEHyIfnkHnxPstrOvajlINMlMMbj83R6dDzP/gd/L +hL/zf8P5fWD/ssDt3+a1wWLOTxaHOYuUd/55rgnnp4LTAYIP8rbxZQk4H2yO +gDjcPFh6gNkH48Pcg84Hh6OxKCSeHRUcYHz09AsAhrkVoA== + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {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, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGITIGYC4v7gEpXp9oYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg4GDzwl229lXtRyKt4r+Pu2H4Pvfkq5J/KQP53vsr5W1cEfwfS9O +jPnHrAfnt/D6r5+Sqgs3H8aH2V/726rg3Ap9DH4AyB4hTTjfzGZv0LREDTj/ +DAi8kXb49fb1ActkdQi/RwtC66g7bNDLW8x4R8shDQTU1OH2M4DAAjU433lC +s1DaLyUMPsw9jyLEt19kUIHzZ4IBgn/qsNPaTDtVh3SQPWwIfrsCu+oZEyk4 +3xgELkvA+a0g+SlicPvQ+SZgDaIOHxatVzg7Q9mh6v6PW8beog6bwP5SgfPB +4d+uCucHgsLNSA3OB8dDqTqcL9rj9YpFRANuPowPs18K5K8Lqhh8mPthfJj/ +YHx9rZXCF5ZoQuKJUQ1ibgmCP2eR8s4/6ZoOKbF33Jgt1CDhIKcJ0dei76Dx +SeXlrJeiDqYg9Qf1IfHkIArRd1wf7l5Y+oPxwfpFDOB81SfN885KGTiIVE4q +OZsi6gCOPjkDhxjVCJlzNQg+LD3B+LD0BuOj5w8YHwAQsj0Y + "]]}, + Thickness[0.05339028296849973]]}, { + ImageSize -> {28.098381070983805`, 24.508064757160646`}, + ImageSize -> {18.732254047322538`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {19., 17.}, PlotRange -> {{0., 18.73}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Row"]], { + Top, Center}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.8044157099019537`*^9, 3.804415751673122*^9, + 3.804420094046835*^9, 3.804420140463133*^9, 3.8045795654423103`*^9}, + CellLabel->"Out[72]=",ExpressionUUID->"eb4a6c7b-46c6-436a-bf56-42b9581f1147"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HSCEcsf", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENcsf", ",", "3"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "100"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "5"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{SCE}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{EN}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Top", ",", "Center"}], "}"}]}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}]}], + "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8044117578703737`*^9, 3.8044117655723963`*^9}, { + 3.804476861174815*^9, 3.804476909306168*^9}, {3.804476943732431*^9, + 3.804476947785571*^9}, {3.804476989440765*^9, 3.8044769939674883`*^9}, { + 3.8045014519577713`*^9, 3.8045014807876863`*^9}, {3.804502067642004*^9, + 3.8045020889878407`*^9}, {3.804502162867055*^9, 3.804502165045557*^9}, { + 3.804502200128521*^9, 3.804502226802953*^9}, {3.804579474042548*^9, + 3.804579481841103*^9}}, + CellLabel->"In[70]:=",ExpressionUUID->"85d4f3d6-48e8-4187-94da-cc64f1445091"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"1829.5453911672455`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"640.8489612094226`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"49.8578065141576`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"-\\\", RowBox[{\\\"1635.0635918080238`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"9.922735458022437`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"358.05178073637705`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"13.605377383101205`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"640.8489612094226`\\\"}], \\\"+\\\", \ +RowBox[{\\\"99.7156130283152`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"19.845470916044874`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 70, 1, 22585821416286832394, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804411766895046*^9, 3.804476875116777*^9, 3.8044769102720737`*^9, + 3.804477000212438*^9, 3.8045014837655697`*^9, 3.804502092186098*^9, + 3.8045021663104763`*^9, {3.804502205895762*^9, 3.804502228462434*^9}, + 3.804579490661721*^9}, + CellLabel-> + "During evaluation of \ +In[70]:=",ExpressionUUID->"4feb2285-0132-4739-867a-4b96a567e700"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"191.91689193397647`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\ +\", RowBox[{\\\"31.993073578217018`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"383.79224107793954`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"156.29209911297642`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"7.94199747791815`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\ +\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"146.22239385445826`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"15.670076854636907`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"8.913567780099573`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"191.91689193397647`\\\"}], \\\"+\\\", \ +RowBox[{\\\"63.986147156434036`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\ +\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"156.29209911297642`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"15.8839949558363`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"15.670076854636907`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 70, 2, + 22585821416286832394, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804411766895046*^9, 3.804476875116777*^9, 3.8044769102720737`*^9, + 3.804477000212438*^9, 3.8045014837655697`*^9, 3.804502092186098*^9, + 3.8045021663104763`*^9, {3.804502205895762*^9, 3.804502228462434*^9}, + 3.804579490948678*^9}, + CellLabel-> + "During evaluation of \ +In[70]:=",ExpressionUUID->"b9d8f995-5777-49a8-9910-902cd7ed8b8b"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"8.913567780099573`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"15.670076854636907`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", \ +RowBox[{\\\"7.94199747791815`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\ +\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"146.22239385445826`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"156.29209911297642`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"31.993073578217018`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"383.79224107793954`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"191.91689193397647`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}], \\\",\\\", \ +RowBox[{RowBox[{\\\"-\\\", \\\"15.670076854636907`\\\"}], \\\"+\\\", RowBox[{\ +\\\"15.8839949558363`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", \ +RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"156.29209911297642`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"63.986147156434036`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"191.91689193397647`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 70, 3, + 22585821416286832394, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804411766895046*^9, 3.804476875116777*^9, 3.8044769102720737`*^9, + 3.804477000212438*^9, 3.8045014837655697`*^9, 3.804502092186098*^9, + 3.8045021663104763`*^9, {3.804502205895762*^9, 3.804502228462434*^9}, + 3.804579491077758*^9}, + CellLabel-> + "During evaluation of \ +In[70]:=",ExpressionUUID->"7365d419-5fd3-4964-bbf6-5ce922def7dc"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 70, 4, 22585821416286832394, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{ + 3.804411766895046*^9, 3.804476875116777*^9, 3.8044769102720737`*^9, + 3.804477000212438*^9, 3.8045014837655697`*^9, 3.804502092186098*^9, + 3.8045021663104763`*^9, {3.804502205895762*^9, 3.804502228462434*^9}, + 3.804579491232156*^9}, + CellLabel-> + "During evaluation of \ +In[70]:=",ExpressionUUID->"182980a6-4cf8-43cb-af55-e90dcb7870a8"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{InsetBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0H881HccwPHrjvMjzt3ntEIpla4epSwrj9Ld+71LsQnxGDkhUyrS1ERu +kj3WnZXQ8mN2Fa1W2IikENNXyNevkVMu2lC664f86Oio0LY/Xo/n/y+bkEjv +UCaDwXD/r/9NtxiqF6/WUCKDvGVkPh+ZqexR7SINFbuaWbbxEz4eYi6y+o2v +oaLZ69NCuXzcNuh9mPVOTQUJN9jV6vGRXV2xoL5OTeX0oPLnIYKxwbKYLRI1 +ZTwVPFNIEQzKs1ruKntG9QvcliWGElyx7svT7j1PqThWl6S8nIfrLty4Ghjf +S3kcvJ5W48/FYwHlpkk1KgqknP57+zkobrcxSLbtoGYpCboYmWC8tF8/RldH +ubGAmzjfCLX1K6pz/P+g9leZejcVsFGSyElae7EYVOAheeqhhwc8EzsyFzeA +fDA5XCRionA0MG/LzQ7w3Rtut1rOQNM7GbvTNY/Ado50xebSaZBOP9t6NKcP +ssaikuHVe/js3r5WseUA1C/57nFzzCR4clYeGSvUQHOFgW/ZHB1s4MatiWS+ +goGNbrm5FuNAmyvCMi4OgbQB8LSdFmYv+uHg88xRuBGY8cI/YRQsycyacKEW +Rlvquy7ZD0Oc/pOSu4bjUDH8e9jLo4Ow2Sep+vitt3DlbZnw7NqXEJR77iQ3 +cQLmVrI5lz9qoDvJa2SVxztYunmgKpSvhqqWtr6iifdgdOmQWhI7ACOmpWf0 +701BbPuQ/U8vn0BSYWDT3agZsF48kKO40A/iyB2eeqYMdNKJrPYM98KLk6UW +RMvAAtv586ZK/4ba+9p8JT0L37GNVD6qHtiiUGfFFzPx8Zq7yWrDbogtKHgw +lMbCiJ5Gg54oFfQNftXF3aeHqTvjVAtsumCksMTR2l0ftzoZYK/qAThceBPY +u4SNLqLPVWn1nSB4qKfcrWOj08IMvcsdSqhPbbna2WOAI+ekwXx1B2TERIt0 +xYa4ZFeFv2BhB3D6lOtZWUY4pqGNO4PuQ1U0f7z2G2NsqA3nP49rh3m+go8u +4tlIy5ot3+xqA+vy4bBygQmazd3Qnuz2F/htVSi6p00wpInrJ9zTCk6+E8s1 +alPsq04zPXuiBdqKl7MrmjjYXTR95sc7zZDpKMzflGOGipRZ6SkWzcD6lfnQ +R8zF86leXK60CXyc/Co017h4wsxH9qe2ERLissT+c3mYTleKLI81wnTc9ana +Uzx0tS7zlRs2QibfyUI+zsPKkWyvO3k0GOvyWr7W8XBX5Pqapbk0fP/I/Lho +kocLTWqHTl+hISJ7+OnEBx4K+91lAZdocBZcLgxnEXxcmZDJPk+DdqMRbicE +HaZ4H+JTadgeotprZU/wVn/K4YloGhqcnS0mPyW4M73BPPoIDZsEJS0PHAgm +JlpGjH1Lg+B1kn2qI8GpZ3XrtJE0zESL3jOAoLj1zcrJMBqunbqaonEn2Dr4 +3N82iIbFEQTrPAkeDbw9ryiAhl88ErQXvQiuMo+RO+6kQcaX7JD4EBy/HR6+ +zY+GgGwTm9YAgg1m/pLj3jQoE6Sd+UEEzYQ5chMvGlxDNHJ5MMGZZc5B5z1p +cBDUvBLtIVjlF8Wv2kZDvpFdttVegkVmASNubjRYv1Z4Tu4juMk1NOafL2jI +aGMzH4YR5K+C/EjX/36WRN0sOUDQW6mQMV1o+Bf1pjsH + "]]}, + Annotation[#, "Charting`Private`Tag$7910#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0vs3lAkYwPExk0limFdbyebSbVRbaZHVxfOcCdspQhlROKJYyVqrsWTR +5j4u7whZcinlUibTbMQmvWHiWFKGSnaXkOGMhEkuhbb94Xu+/8DHyDvoyGk6 +jUaz/9L/z9Adk3K3yyk8yE64v0UN6WnMCaWhnIon1WcrDNXwJ7qh3nUdOVWr +kGeVrlRDu9EjwYy5IWou2NWpmK6GzLqatdLGIWpWpfKyrGcphnnFhtq4DVG2 +4449yuSl6FmqZ3wg9g3V6RTpbTXJxM3mB5PtewaoS7v4N280q6J53h/FHpG9 +lMENrSeb+Az81b1aU/DoJUUdGvcNiFFB7lOjpSkbO6jevecDE7I/Q2T4a9XQ +6Uaq4b0FTWE1D0rp5rqC47eo1yEdD2KC58AtniX4tlAMvNynJiY10xDgEN+R +ta4JtpuzROg8BfsmPEptKjuAdOxILjyqBM2HmT4Z8m64U5EnLfGagPCFN7a/ +FPRBW3vXWknkGJg99mvjrhmEqGIrtt8VBTiwtp57L5LDeTNxXkvrMFhqR+wI +oivg0gl9ihU8BM0rcvwzC8dA48SkYGDTICw3vBg4nDUBW4zZf7pv6Ic1xOKO +M/uUIG629MlS9EKEar+kXm0KHtyTrpwt+hv28wR1UVUf4ESup6xnsBs8S3IT +teNnYC/HUlD03Qt4JXAa/+bwHETTds1t7e+E2tb2voqZj2DfRNdjjnbAuOZd +UvXxPHxqSpH505+BQOTRUh+yCFxJXEmhrA24QccclmjSUPQVOSD73AIjiXd1 +CSUNN4yYRyZBMzQ8U5bJmlVwNjn5jHhSCjY5Q9mRYjrWM8Y0LSsbIKy8vGvs +EgNFi+qnxx88gr5R5xfafkvwiamPUd72hzAukljo26siGYOJJXP3wTRv0qN3 +PRMbNiXFmx2sAc7zJTKfaSbyV5c/lCqqQJrWWtz5xU3BaFxCRu5dyAzlW02L +1fCcvIybeksCrD7ZLkb2MkwUBk5+LRRDLV9nquFHdZz3T601+0EEq104n7/n +Lsf6NvbclYKboF/9zr+ao4GrqodDYodLwNU2J+fVggbW3Qrr9Lt2A/a4zBjL +hzRR5beohpKAImgXGzNrWlj4j11nlVnEVciy2Fe2t0AL7ToupJXfywfGVfpz +HlcbbUxH7ExSc4G3x7VGflsbu4wvXvcdzoboiGzu8VVsHO3vT7kszIKFiDvz +DUlsrC83LFg8kAFZOnt046bYqNxWecHMKx3Up0tbT06z0cVnrMjANR0udK+I +sppl45V13gksx3Q4m/9uYOYTG/kKmnAG0sGaUyQ6wyCwpvFo0LRBOih3L0NH +gsDDKR8Gil8LwdH7pa+eCYEuAda3qVNCaLK21p3dSWBT2MlGAw/hFzeS1i5T +ArM/Op+O4QmB81ZgkmZBIH8bx5ZnK4RFvtVHGhBYMRFuv95YCLeTilPl9gT6 +v/xLvb2bhHVnCWx0IHDhhePmxRYSfj8crSx0InCg9uet5rUkxOq4HXPjEXhI +dP9JdT4J7vkaRm3uBE7eUdmp5UOCLDq8s8yTwKNjdJ1QZxIOeMvj4rwIXJXJ +oQZtSDDlPFJYnSKwfmq3f6cxCWXLtuXr+RJYtf9fL94aEvTf5jjM+hE4slF9 +Ze9yEjLbmfTn/gRasArjAhfSQF0SUikJIPDam/Mixnga/AdqaUzO + "]]}, + Annotation[#, "Charting`Private`Tag$7910#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwBcQOO/CFib1JlAgAAADYAAAACAAAAkxntxEIu5r9BsrLvdKKhPwKOBvDy +IOa/EWVsdMypoT9wAiAboxPmv5yipwcnsaE/TOtScQP55b9baLpe5b+hPwa9 +uB3Ew+W/tHkU84bdoT94YIR2RVnlv3WrddReGaI/XqcbKEiE5L/KbA6VapOi +Pyk1SotN2uK/JgaQtDyRoz81nLKlXX3ev2BjK6sU56U/fFy3DYrA179RMU+s +jlWoP0LPIQeMJdG/v8F4ZNz6qj99eeAFdvbDv3nSLTEWLa4/8sQpvZ5aqr9M +Cqnl9r+wP1mGDooyn68/L7cW3BDCsj9rT4bRlSLGP4JX0/m19rQ/PfBdp0W0 +0T97+L2DGkG3Pw2+lGOT5tg/MTIbrpYFuj95/eRGd57fP81b/izn5rw/NMVn +zEIa4z8XEJyPbwTAP08OK3TzrOY/yWegpNDowT85EHsvbwLqP7H4aAJB4MM/ +xxSZaZSf7T+WXEO2lkDGPwsggm3nlfA/nqeESX/cyD8aEv4vaj3yP8hs/D/J +kcs/ewXhscEI9D/QE2SFXNfOP0NVir1+tfU/cxVhg0sf0T9eppqIEIb3Pz6J +RXe9LdM/2YpR7yxO+T/gWOtREXDVP7vLzt+u9/o/IHqcptrI1z/vDbOPBcX8 +Py5cTIfDnto/iqxdycFz/j/YvfEAcZLdP0JvV08EDQBAA094Z0hk4D/oiLMZ +EvIAQBk6Jq3bVOI/wtDyqNLHAUA6Z4R0IVnkP0WZ5Zd9rwJAzfNVzQDJ5j94 +q6vU7ZIDQHPndZMeduk/3+tU1hBnBEA7bSsUfT3sP++ssTceTQVALDXEUfKY +7z8znPFd3iMGQPOXOceai/E/J9UE0mP2BkAm8UWq4HHzP8SOy6XT2gdA4Xs8 +dES99T+UdnU+9q8IQHhU8KSnH/g/Dt/SNgOXCUA/dWI2MwH7P7t1E/TCbgpA +LcZ+KTkB/j8YVif/R0ILQLu6IV97ogBAHrfuabcnDEA8gQz2TZsCQFhGmZnZ +/QxAh9kdzU+oBEA7Vvco5uUNQErcMiPFIgdAzq8oBrjJDkC7KGmYqdsJQJU3 +Pag8ng9AW4OWJXuvDEADoALVVUIQQNZaA6oCDRBAVTtYuOatEEBlavpXINQR +QH97l0JaFxFAzhhTVTHDE0Aii+dG/CIRQAAAAAAAABRAiTiaRQ== + "]]}, + Annotation[#, "Charting`Private`Tag$7910#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0Hk41AkYwPExrgYzzG9qSxYju0YrIklR3rfJ1SFHjhS2JB5H2yHXMizJ +U1PRE6op0dOuXKPZUUpbmp87kTKlpF06mG0xYmjc2t0/vs/n/69J6GGfg1QK +heLxX/+bqy9v5FrJJDArocjNdZGarTGqYMskc9V1DC1DXTxCZRv8ypJJ3qZf +0V7F1MUdQz5HVacHJMdar7amTjNQo7bGsLFhQCK2uGj44xMGJu7LjHcJHJB4 +bJ4Jph1iYEiJgbl7Zr/EKUnNRllNx5V228549HyQ8Ni5/g1+OmhXUFUczOuV +lBe4PFh6kYYpQffofPK1pOK3skdP3TWR+8xE8+z3nZIbX+yLjVEdeUnv1OOV +DZIpp53M286qqGhcWVu4p1ziMhqwLvuqCgZmMfhrikSwwG/+x3LuK0R7ZnXm +r2iGZ9MXE2hm87BpNLjE5U4nJASZRbs3zQD9Ud6BXFk33M+QZW44PgVJ8/2u +CYV9YFERFmV0QglrmyLaucs/QrF2okp42wR4MiyOjwtlwB9z2b/WaBw26CWv +PkwdBMuM4Zbv7o5By2JBZF6RHG5d/mPQJ2AUtNkZh/7OH4XtkZRci045LCcW +VkdtUkCsT9+SIMchSFZ/L65bNAHej92sfO9+gi1+/NrU6i/w8BaTJRLIIOTm +lVN6WZPQfig+SnqmH97wvT+v2jkNnBT2waHaD/CgraPv1uQMLB6bTT/v8B4+ +02/nqDfNQYxdpSA8ow/4wuDWutgF+Paj8biI9hdwDwd4qtEpuN7a+Cy9pwc+ +nbqtTygoyGa12GjVdEP9c0WptEUFRyzsPUxHXoGLYOAST0TFwmH78hDrLkis +qHgpv6CKBVme1OulL6BvyPeVXoQaPv4ovK+5TwqfhWJ7Iw913LbE4FytcSfY +FowF95pqYGJn/LQD6zlwutSkB5QaWF0kHz+2vQMas9uKX/RoYu+k3H4guR3y +4uOclKJFGMpSqdk8+QQYfdJ1qpdo2EVeFvantMKDONZE/U9auBDGJnvhMSzz +53x142qjKL33ShmnBYzujUTe4+ig9P0Rk7PfNMNuV4HgzbwO7k232yy2aQJH +/0lz2QAdb5a77eHsaoQOkblGTSsDrXCVRmtOA+TbbyrdWKiLb2x2hekO14Pq +dWqXH1cPpY9KNct21IOf4+4aWaUeXnDyLjBrqYO05EvcPUuZeBfVLvzgXQfz +yb/P1Z9mosHRVILTS0I+y1H/5AQTT1RX+j7lkaClLGnbr2Tiet/oJLsUEn7p +XpzqNMVEK9+svYU/kxBzbeTD5CwTRwri/I8lkODMuSGMUiWwub3c0PQoCQoH +GnoRBOaIecUlYSR4hb4ON7AmMGEuaIvDDhKanZ31p2wIfPayI+b+NhI2csRt +L20JnEged9+wlQTOMN86255A1nKtZY6uJCzEOc1QgEBL7YhFbkhC5eniczIP +Alt41oNpa0lYEUNggyeBT0K8lmnZknB5Z5qiyJtAolZzIs+GhExWYECgH4Fl +PrNVQisSgq7pmLQHEXievsa135wEaVrSi9IQAqtstnbHckhwD5WdPLmPQC/H +xCVqZiTYcshBpzACR/98l2NmSkIpzfKaQTiBW51T2mtMSDAaFnhORRAYYDFe +tZ1NQl6HBrUrksDwt0pun9F/P8Wxd8TRBD6sWZ8Sa0jCv8tfOa4= + "]]}, + Annotation[#, "Charting`Private`Tag$7910#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$35976#1"]& ]}, {}}}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, + 9.495310000000002}, {5.387499999999999, 12.6313}, { + 5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, + 9.495310000000002}, {5.387499999999999, 12.6313}, { + 5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, + PlotLabel->None, + PlotRange->NCache[{{-0.6931471805599453, + Log[100]}, {0, 5}}, {{-0.6931471805599453, 4.605170185988092}, {0, + 5}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + Scaled[{0.5, 0.5}], Center, Scaled[{1, 1}]], InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.04835589941972921], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}]}, { + Thickness[0.04835589941972921]}, StripOnInput -> False]}, { + ImageSize -> {31.02590286425903, 24.508064757160646`}, + ImageSize -> {20.683935242839354`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {21., 17.}, PlotRange -> {{0., 20.68}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.03321155762205247], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]]}, { + Thickness[0.03321155762205247]}, StripOnInput -> False]}, { + ImageSize -> {45.16974844333748, 24.508064757160646`}, + ImageSize -> {30.113165628891654`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {31., 17.}, + PlotRange -> {{0., 30.110000000000003`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.04012841091492777], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9IU1EUx+ecU7Maul8vXbrfNheUTczC2CmJqCQr/1klJdL8kYVKFmpK +qKnYrLQyfyQWKYigZFBphmaFpWQ/zGVhkEODEmeklDl1s717tzswOnB5fLjv +nXfO93zvlSSkHdS7MxgMN/vaZ19M+zLtPLa99kAA1NXYw7IWnNw8O5E1kC6G +XS29TYwIf9DQUSiBoM7b3fofFAzQES2FnNG5EY1aCAw64mWQnGgPNh9KI3d3 +Jt6RQfCMfKJWxcX7Jhn86Z5+kDTsA/c3zz07flEOD/e0RdRZ2JA707Y/dUQO +E3njqW9bmFBdzskJ91ESts6eMdVVBBO+VlJ0eChSBYXCPI8Uthd8O6GereoK +gU+rPgv0ZzmEUZ1lQsI1KCgY0wnbB01KeGroLggbpxz/V8Bk8SnDpgUK/OuP +ql6Vu7gDCsZeZimgSOypGMhcQ9iM9v/lfFbvldAqF28Maea+YykJR/d5brv5 +IYRwzGBFnC1KTZiqNHonJ6ghdmpoujrfxUcUOtGbOBdj/V38C+lLQRg9L64a +9xclhL7nO1pT6lW4fwsP2ul6KTWe65Av+d6pn5NF9wS3mCYWYTz3ee381GTP +ligV4eS0n0X9RiXhvs6OS+w2BbA2zK94X2bVWuj3G+SOfSbovAUlmrsyXF+D +B/Zbj9ThBy9cZ6kUluh4wgHZ8FgsQySFbLpfgy+co5+TEliH/MWDrrTcqZpK +CRTT8zHysI8zJA4dhMDNvpr5+qvY4QcK6xQeRDgL5RURRr6foxx+FuC5X+fj +vL5+hH8jvTmEv9P+NHvjOQYIsO/BAzpit+qWgik4WRmfEXF6SduD+vYHM/Kz +TTuK8gaCle73vE3Lo+ttdNQXbdOiObmLQU/Xk7j4X3bqv5zROewPIoye5kDC +yEd7+YQv6wwxbuk8wkhHDQ/rqVkkbFx48bH+kJWwc944H8/hH5u21W/96qQv +PKz7DSae7yMhNI40jYe6s7Gug3y4gM7zSnDmQ34X+RHG509I2HlfIb0fU7D8 +PvsLzIYtzQ== + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ikT+KvMuvUc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4LDnEXKO/+4I/hgeW4EX19rpfAFFj0H5wnNQmlZCP5/ELBXcGDh7JJP +PqfrUH3/xy3j1xIOW8x/HErh0nZoVWBXPTNF1KH604aA7F0acP7TxIXXTPjV +4fyV315WnGlQgvLF4XwwfUAJzgfbu0TTYUp7a9TlP2oOf76VPpizUctBtMfr +FcsWDTg/I/9D60kTbTg/NQ0EdB0CbknXJE7ScHgSIb794gNdh1OHndZm/lNx +OAMCb3QdfE6w287eiuD/fPv6gOViFYi4qR6cDws/dD5MP4z/BORPfVVU+ata +cL7/xYkx/5y14XyJqVc4M5K0IeHph+DHhwSpL9BE8P+A7FXWc9BXlP+SE6bt +ILv8hYfef12H7Q5Nj45LaDuIgMLjio5DA8vRfkNzTQdzm71B0w5qQ/zVo+Ug +DjJHSQtu3mZQfGVpwPkbVJ80z+NVgfNng9KBp4LDiyztb9PnqsP5sPiB8Q90 +72syWSztUAOKbykVBxNjEBCBmw/jg90XogPnw/wvAkqfLNIO6OkXAOddMnQ= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOzjJ3uKMpu+b/ZgWHlNg7bswRCP7J +w05rM/nMHdzXHF3O8EPS4aZ0TaLRUTOHVgV21TNTxBz+fCt9MOegCZwvPvUK +Z4aSMZwfreD4MXmOEZyfngYE04wcau7/uGX8GsGPVo2QOVcjAeevFdLhS1+n +5LBBL28x4xpjOF9mXpzm6QsmcL4EyL5PJg4PXOMdZ31UhPPVP6m8nHVS3sHn +BLvtbFNTDH5CSJD6Ak01uHp0/pT21qjLMipw+xhAIEEZ7h4YH+ZedL40SJ+B +JsK/nzYEZP/ShIeHvtZK4QsqWvDwgvF5/NdPSd1hAudrvOXdZ1BpBud/ARoz +67qZg2iP1yuWLxoOXiD/sJo7GIDkW1Qd+ED6PRB8sP6fZhB/X9VysK+MWGFa +a4DBh5nP7aZayrQLwf+681bX36mGcP7jxIXXTOYbOsxZpLzzz3NNOD8V5E82 +BN8YBC5LwPl9Ed3+jALicPNg6QFmH4wPcw863wRsoCgkPhTM4Xz09AsADwgP +hA== + "]]}, { + Thickness[0.04012841091492777]}, StripOnInput -> False]}, { + ImageSize -> {37.372557907845575`, 24.508064757160646`}, + ImageSize -> {24.915038605230386`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {25., 17.}, + PlotRange -> {{0., 24.919999999999998`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.05339028296849973], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4r35NW9nmio63NGUXfN/s4IDAwhsUIDzz4CA +jIKD+5qjyxl+SDq0KrCrnhGRh9BTxBwy0oCATRzOV/+k8nJWpwCcf6B7X5PJ +Yx4438QYCDbzONTc/3HL+DWCH60aIXOuRgLOXyukw5e+TsmhP6Lbn3GDEJx/ +EGSeszicrwGy76S4wwPXeMdZHxXhfLA7Tso7fNn3cWv6NQkMfkJIkPoCTTW4 +enT+lPbWqMsyKnD7wOGSoAx3D4wPcy86X3penOZpA02Efz9tCMj+pQkPD32t +lcIXVLTg4QXjh7y9/HHGQzE4X6RyUsnZJ7JwPtjfcfIOoj1er1i+aDhUg8KR +W8HBACTfouqw4tvLijMTEHyIfnkHnxPstrOvajlINMlMMbj83R6dDzP/gd/L +hL/zf8P5fWD/ssDt3+a1wWLOTxaHOYuUd/55rgnnp4LTAYIP8rbxZQk4H2yO +gDjcPFh6gNkH48Pcg84Hh6OxKCSeHRUcYHz09AsAhrkVoA== + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {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, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGITIGYC4v7gEpXp9oYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg4GDzwl229lXtRyKt4r+Pu2H4Pvfkq5J/KQP53vsr5W1cEfwfS9O +jPnHrAfnt/D6r5+Sqgs3H8aH2V/726rg3Ap9DH4AyB4hTTjfzGZv0LREDTj/ +DAi8kXb49fb1ActkdQi/RwtC66g7bNDLW8x4R8shDQTU1OH2M4DAAjU433lC +s1DaLyUMPsw9jyLEt19kUIHzZ4IBgn/qsNPaTDtVh3SQPWwIfrsCu+oZEyk4 +3xgELkvA+a0g+SlicPvQ+SZgDaIOHxatVzg7Q9mh6v6PW8beog6bwP5SgfPB +4d+uCucHgsLNSA3OB8dDqTqcL9rj9YpFRANuPowPs18K5K8Lqhh8mPthfJj/ +YHx9rZXCF5ZoQuKJUQ1ibgmCP2eR8s4/6ZoOKbF33Jgt1CDhIKcJ0dei76Dx +SeXlrJeiDqYg9Qf1IfHkIArRd1wf7l5Y+oPxwfpFDOB81SfN885KGTiIVE4q +OZsi6gCOPjkDhxjVCJlzNQg+LD3B+LD0BuOj5w8YHwAQsj0Y + "]]}, { + Thickness[0.05339028296849973]}, StripOnInput -> False]}, { + ImageSize -> {28.098381070983805`, 24.508064757160646`}, + ImageSize -> {18.732254047322538`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {19., 17.}, PlotRange -> {{0., 18.73}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3, + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> {"Columns" -> {{0.8, 0.5}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{None}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> {"Columns" -> {{0}}, "Rows" -> {{1}}}], + "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[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Row\""}]}], "]"}]& )], + Scaled[{0.5, 1.01}], ImageScaled[{0.5, 0.5}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->False, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->False, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotLabel->None, + PlotRange->Automatic, + PlotRangeClipping->False, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0H881HccwPHrjvMjzt3ntEIpla4epSwrj9Ld+71LsQnxGDkhUyrS1ERu +kj3WnZXQ8mN2Fa1W2IikENNXyNevkVMu2lC664f86Oio0LY/Xo/n/y+bkEjv +UCaDwXD/r/9NtxiqF6/WUCKDvGVkPh+ZqexR7SINFbuaWbbxEz4eYi6y+o2v +oaLZ69NCuXzcNuh9mPVOTQUJN9jV6vGRXV2xoL5OTeX0oPLnIYKxwbKYLRI1 +ZTwVPFNIEQzKs1ruKntG9QvcliWGElyx7svT7j1PqThWl6S8nIfrLty4Ghjf +S3kcvJ5W48/FYwHlpkk1KgqknP57+zkobrcxSLbtoGYpCboYmWC8tF8/RldH +ubGAmzjfCLX1K6pz/P+g9leZejcVsFGSyElae7EYVOAheeqhhwc8EzsyFzeA +fDA5XCRionA0MG/LzQ7w3Rtut1rOQNM7GbvTNY/Ado50xebSaZBOP9t6NKcP +ssaikuHVe/js3r5WseUA1C/57nFzzCR4clYeGSvUQHOFgW/ZHB1s4MatiWS+ +goGNbrm5FuNAmyvCMi4OgbQB8LSdFmYv+uHg88xRuBGY8cI/YRQsycyacKEW +Rlvquy7ZD0Oc/pOSu4bjUDH8e9jLo4Ow2Sep+vitt3DlbZnw7NqXEJR77iQ3 +cQLmVrI5lz9qoDvJa2SVxztYunmgKpSvhqqWtr6iifdgdOmQWhI7ACOmpWf0 +701BbPuQ/U8vn0BSYWDT3agZsF48kKO40A/iyB2eeqYMdNKJrPYM98KLk6UW +RMvAAtv586ZK/4ba+9p8JT0L37GNVD6qHtiiUGfFFzPx8Zq7yWrDbogtKHgw +lMbCiJ5Gg54oFfQNftXF3aeHqTvjVAtsumCksMTR2l0ftzoZYK/qAThceBPY +u4SNLqLPVWn1nSB4qKfcrWOj08IMvcsdSqhPbbna2WOAI+ekwXx1B2TERIt0 +xYa4ZFeFv2BhB3D6lOtZWUY4pqGNO4PuQ1U0f7z2G2NsqA3nP49rh3m+go8u +4tlIy5ot3+xqA+vy4bBygQmazd3Qnuz2F/htVSi6p00wpInrJ9zTCk6+E8s1 +alPsq04zPXuiBdqKl7MrmjjYXTR95sc7zZDpKMzflGOGipRZ6SkWzcD6lfnQ +R8zF86leXK60CXyc/Co017h4wsxH9qe2ERLissT+c3mYTleKLI81wnTc9ana +Uzx0tS7zlRs2QibfyUI+zsPKkWyvO3k0GOvyWr7W8XBX5Pqapbk0fP/I/Lho +kocLTWqHTl+hISJ7+OnEBx4K+91lAZdocBZcLgxnEXxcmZDJPk+DdqMRbicE +HaZ4H+JTadgeotprZU/wVn/K4YloGhqcnS0mPyW4M73BPPoIDZsEJS0PHAgm +JlpGjH1Lg+B1kn2qI8GpZ3XrtJE0zESL3jOAoLj1zcrJMBqunbqaonEn2Dr4 +3N82iIbFEQTrPAkeDbw9ryiAhl88ErQXvQiuMo+RO+6kQcaX7JD4EBy/HR6+ +zY+GgGwTm9YAgg1m/pLj3jQoE6Sd+UEEzYQ5chMvGlxDNHJ5MMGZZc5B5z1p +cBDUvBLtIVjlF8Wv2kZDvpFdttVegkVmASNubjRYv1Z4Tu4juMk1NOafL2jI +aGMzH4YR5K+C/EjX/36WRN0sOUDQW6mQMV1o+Bf1pjsH + "]]}, + "Charting`Private`Tag$7910#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0vs3lAkYwPExk0limFdbyebSbVRbaZHVxfOcCdspQhlROKJYyVqrsWTR +5j4u7whZcinlUibTbMQmvWHiWFKGSnaXkOGMhEkuhbb94Xu+/8DHyDvoyGk6 +jUaz/9L/z9Adk3K3yyk8yE64v0UN6WnMCaWhnIon1WcrDNXwJ7qh3nUdOVWr +kGeVrlRDu9EjwYy5IWou2NWpmK6GzLqatdLGIWpWpfKyrGcphnnFhtq4DVG2 +4449yuSl6FmqZ3wg9g3V6RTpbTXJxM3mB5PtewaoS7v4N280q6J53h/FHpG9 +lMENrSeb+Az81b1aU/DoJUUdGvcNiFFB7lOjpSkbO6jevecDE7I/Q2T4a9XQ +6Uaq4b0FTWE1D0rp5rqC47eo1yEdD2KC58AtniX4tlAMvNynJiY10xDgEN+R +ta4JtpuzROg8BfsmPEptKjuAdOxILjyqBM2HmT4Z8m64U5EnLfGagPCFN7a/ +FPRBW3vXWknkGJg99mvjrhmEqGIrtt8VBTiwtp57L5LDeTNxXkvrMFhqR+wI +oivg0gl9ihU8BM0rcvwzC8dA48SkYGDTICw3vBg4nDUBW4zZf7pv6Ic1xOKO +M/uUIG629MlS9EKEar+kXm0KHtyTrpwt+hv28wR1UVUf4ESup6xnsBs8S3IT +teNnYC/HUlD03Qt4JXAa/+bwHETTds1t7e+E2tb2voqZj2DfRNdjjnbAuOZd +UvXxPHxqSpH505+BQOTRUh+yCFxJXEmhrA24QccclmjSUPQVOSD73AIjiXd1 +CSUNN4yYRyZBMzQ8U5bJmlVwNjn5jHhSCjY5Q9mRYjrWM8Y0LSsbIKy8vGvs +EgNFi+qnxx88gr5R5xfafkvwiamPUd72hzAukljo26siGYOJJXP3wTRv0qN3 +PRMbNiXFmx2sAc7zJTKfaSbyV5c/lCqqQJrWWtz5xU3BaFxCRu5dyAzlW02L +1fCcvIybeksCrD7ZLkb2MkwUBk5+LRRDLV9nquFHdZz3T601+0EEq104n7/n +Lsf6NvbclYKboF/9zr+ao4GrqodDYodLwNU2J+fVggbW3Qrr9Lt2A/a4zBjL +hzRR5beohpKAImgXGzNrWlj4j11nlVnEVciy2Fe2t0AL7ToupJXfywfGVfpz +HlcbbUxH7ExSc4G3x7VGflsbu4wvXvcdzoboiGzu8VVsHO3vT7kszIKFiDvz +DUlsrC83LFg8kAFZOnt046bYqNxWecHMKx3Up0tbT06z0cVnrMjANR0udK+I +sppl45V13gksx3Q4m/9uYOYTG/kKmnAG0sGaUyQ6wyCwpvFo0LRBOih3L0NH +gsDDKR8Gil8LwdH7pa+eCYEuAda3qVNCaLK21p3dSWBT2MlGAw/hFzeS1i5T +ArM/Op+O4QmB81ZgkmZBIH8bx5ZnK4RFvtVHGhBYMRFuv95YCLeTilPl9gT6 +v/xLvb2bhHVnCWx0IHDhhePmxRYSfj8crSx0InCg9uet5rUkxOq4HXPjEXhI +dP9JdT4J7vkaRm3uBE7eUdmp5UOCLDq8s8yTwKNjdJ1QZxIOeMvj4rwIXJXJ +oQZtSDDlPFJYnSKwfmq3f6cxCWXLtuXr+RJYtf9fL94aEvTf5jjM+hE4slF9 +Ze9yEjLbmfTn/gRasArjAhfSQF0SUikJIPDam/Mixnga/AdqaUzO + "]]}, + "Charting`Private`Tag$7910#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwBcQOO/CFib1JlAgAAADYAAAACAAAAkxntxEIu5r9BsrLvdKKhPwKOBvDy +IOa/EWVsdMypoT9wAiAboxPmv5yipwcnsaE/TOtScQP55b9baLpe5b+hPwa9 +uB3Ew+W/tHkU84bdoT94YIR2RVnlv3WrddReGaI/XqcbKEiE5L/KbA6VapOi +Pyk1SotN2uK/JgaQtDyRoz81nLKlXX3ev2BjK6sU56U/fFy3DYrA179RMU+s +jlWoP0LPIQeMJdG/v8F4ZNz6qj99eeAFdvbDv3nSLTEWLa4/8sQpvZ5aqr9M +Cqnl9r+wP1mGDooyn68/L7cW3BDCsj9rT4bRlSLGP4JX0/m19rQ/PfBdp0W0 +0T97+L2DGkG3Pw2+lGOT5tg/MTIbrpYFuj95/eRGd57fP81b/izn5rw/NMVn +zEIa4z8XEJyPbwTAP08OK3TzrOY/yWegpNDowT85EHsvbwLqP7H4aAJB4MM/ +xxSZaZSf7T+WXEO2lkDGPwsggm3nlfA/nqeESX/cyD8aEv4vaj3yP8hs/D/J +kcs/ewXhscEI9D/QE2SFXNfOP0NVir1+tfU/cxVhg0sf0T9eppqIEIb3Pz6J +RXe9LdM/2YpR7yxO+T/gWOtREXDVP7vLzt+u9/o/IHqcptrI1z/vDbOPBcX8 +Py5cTIfDnto/iqxdycFz/j/YvfEAcZLdP0JvV08EDQBAA094Z0hk4D/oiLMZ +EvIAQBk6Jq3bVOI/wtDyqNLHAUA6Z4R0IVnkP0WZ5Zd9rwJAzfNVzQDJ5j94 +q6vU7ZIDQHPndZMeduk/3+tU1hBnBEA7bSsUfT3sP++ssTceTQVALDXEUfKY +7z8znPFd3iMGQPOXOceai/E/J9UE0mP2BkAm8UWq4HHzP8SOy6XT2gdA4Xs8 +dES99T+UdnU+9q8IQHhU8KSnH/g/Dt/SNgOXCUA/dWI2MwH7P7t1E/TCbgpA +LcZ+KTkB/j8YVif/R0ILQLu6IV97ogBAHrfuabcnDEA8gQz2TZsCQFhGmZnZ +/QxAh9kdzU+oBEA7Vvco5uUNQErcMiPFIgdAzq8oBrjJDkC7KGmYqdsJQJU3 +Pag8ng9AW4OWJXuvDEADoALVVUIQQNZaA6oCDRBAVTtYuOatEEBlavpXINQR +QH97l0JaFxFAzhhTVTHDE0Aii+dG/CIRQAAAAAAAABRAiTiaRQ== + "]]}, + "Charting`Private`Tag$7910#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0Hk41AkYwPExrgYzzG9qSxYju0YrIklR3rfJ1SFHjhS2JB5H2yHXMizJ +U1PRE6op0dOuXKPZUUpbmp87kTKlpF06mG0xYmjc2t0/vs/n/69J6GGfg1QK +heLxX/+bqy9v5FrJJDArocjNdZGarTGqYMskc9V1DC1DXTxCZRv8ypJJ3qZf +0V7F1MUdQz5HVacHJMdar7amTjNQo7bGsLFhQCK2uGj44xMGJu7LjHcJHJB4 +bJ4Jph1iYEiJgbl7Zr/EKUnNRllNx5V228549HyQ8Ni5/g1+OmhXUFUczOuV +lBe4PFh6kYYpQffofPK1pOK3skdP3TWR+8xE8+z3nZIbX+yLjVEdeUnv1OOV +DZIpp53M286qqGhcWVu4p1ziMhqwLvuqCgZmMfhrikSwwG/+x3LuK0R7ZnXm +r2iGZ9MXE2hm87BpNLjE5U4nJASZRbs3zQD9Ud6BXFk33M+QZW44PgVJ8/2u +CYV9YFERFmV0QglrmyLaucs/QrF2okp42wR4MiyOjwtlwB9z2b/WaBw26CWv +PkwdBMuM4Zbv7o5By2JBZF6RHG5d/mPQJ2AUtNkZh/7OH4XtkZRci045LCcW +VkdtUkCsT9+SIMchSFZ/L65bNAHej92sfO9+gi1+/NrU6i/w8BaTJRLIIOTm +lVN6WZPQfig+SnqmH97wvT+v2jkNnBT2waHaD/CgraPv1uQMLB6bTT/v8B4+ +02/nqDfNQYxdpSA8ow/4wuDWutgF+Paj8biI9hdwDwd4qtEpuN7a+Cy9pwc+ +nbqtTygoyGa12GjVdEP9c0WptEUFRyzsPUxHXoGLYOAST0TFwmH78hDrLkis +qHgpv6CKBVme1OulL6BvyPeVXoQaPv4ovK+5TwqfhWJ7Iw913LbE4FytcSfY +FowF95pqYGJn/LQD6zlwutSkB5QaWF0kHz+2vQMas9uKX/RoYu+k3H4guR3y +4uOclKJFGMpSqdk8+QQYfdJ1qpdo2EVeFvantMKDONZE/U9auBDGJnvhMSzz +53x142qjKL33ShmnBYzujUTe4+ig9P0Rk7PfNMNuV4HgzbwO7k232yy2aQJH +/0lz2QAdb5a77eHsaoQOkblGTSsDrXCVRmtOA+TbbyrdWKiLb2x2hekO14Pq +dWqXH1cPpY9KNct21IOf4+4aWaUeXnDyLjBrqYO05EvcPUuZeBfVLvzgXQfz +yb/P1Z9mosHRVILTS0I+y1H/5AQTT1RX+j7lkaClLGnbr2Tiet/oJLsUEn7p +XpzqNMVEK9+svYU/kxBzbeTD5CwTRwri/I8lkODMuSGMUiWwub3c0PQoCQoH +GnoRBOaIecUlYSR4hb4ON7AmMGEuaIvDDhKanZ31p2wIfPayI+b+NhI2csRt +L20JnEged9+wlQTOMN86255A1nKtZY6uJCzEOc1QgEBL7YhFbkhC5eniczIP +Alt41oNpa0lYEUNggyeBT0K8lmnZknB5Z5qiyJtAolZzIs+GhExWYECgH4Fl +PrNVQisSgq7pmLQHEXievsa135wEaVrSi9IQAqtstnbHckhwD5WdPLmPQC/H +xCVqZiTYcshBpzACR/98l2NmSkIpzfKaQTiBW51T2mtMSDAaFnhORRAYYDFe +tZ1NQl6HBrUrksDwt0pun9F/P8Wxd8TRBD6sWZ8Sa0jCv8tfOa4= + "]]}, + "Charting`Private`Tag$7910#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$35976#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.015104321194814143`, + 6.888512887901373}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.015104321194814143`, 5.}}}}, DisplayFunction -> Identity, + AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[100]}, {0, 5}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.04835589941972921], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}]}, + Thickness[0.04835589941972921]]}, { + ImageSize -> {31.02590286425903, 24.508064757160646`}, + ImageSize -> {20.683935242839354`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {21., 17.}, PlotRange -> {{0., 20.68}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.03321155762205247], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]]}, + Thickness[0.03321155762205247]]}, { + ImageSize -> {45.16974844333748, 24.508064757160646`}, + ImageSize -> {30.113165628891654`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {31., 17.}, + PlotRange -> {{0., 30.110000000000003`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.04012841091492777], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9IU1EUx+ecU7Maul8vXbrfNheUTczC2CmJqCQr/1klJdL8kYVKFmpK +qKnYrLQyfyQWKYigZFBphmaFpWQ/zGVhkEODEmeklDl1s717tzswOnB5fLjv +nXfO93zvlSSkHdS7MxgMN/vaZ19M+zLtPLa99kAA1NXYw7IWnNw8O5E1kC6G +XS29TYwIf9DQUSiBoM7b3fofFAzQES2FnNG5EY1aCAw64mWQnGgPNh9KI3d3 +Jt6RQfCMfKJWxcX7Jhn86Z5+kDTsA/c3zz07flEOD/e0RdRZ2JA707Y/dUQO +E3njqW9bmFBdzskJ91ESts6eMdVVBBO+VlJ0eChSBYXCPI8Uthd8O6GereoK +gU+rPgv0ZzmEUZ1lQsI1KCgY0wnbB01KeGroLggbpxz/V8Bk8SnDpgUK/OuP +ql6Vu7gDCsZeZimgSOypGMhcQ9iM9v/lfFbvldAqF28Maea+YykJR/d5brv5 +IYRwzGBFnC1KTZiqNHonJ6ghdmpoujrfxUcUOtGbOBdj/V38C+lLQRg9L64a +9xclhL7nO1pT6lW4fwsP2ul6KTWe65Av+d6pn5NF9wS3mCYWYTz3ee381GTP +ligV4eS0n0X9RiXhvs6OS+w2BbA2zK94X2bVWuj3G+SOfSbovAUlmrsyXF+D +B/Zbj9ThBy9cZ6kUluh4wgHZ8FgsQySFbLpfgy+co5+TEliH/MWDrrTcqZpK +CRTT8zHysI8zJA4dhMDNvpr5+qvY4QcK6xQeRDgL5RURRr6foxx+FuC5X+fj +vL5+hH8jvTmEv9P+NHvjOQYIsO/BAzpit+qWgik4WRmfEXF6SduD+vYHM/Kz +TTuK8gaCle73vE3Lo+ttdNQXbdOiObmLQU/Xk7j4X3bqv5zROewPIoye5kDC +yEd7+YQv6wwxbuk8wkhHDQ/rqVkkbFx48bH+kJWwc944H8/hH5u21W/96qQv +PKz7DSae7yMhNI40jYe6s7Gug3y4gM7zSnDmQ34X+RHG509I2HlfIb0fU7D8 +PvsLzIYtzQ== + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ikT+KvMuvUc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4LDnEXKO/+4I/hgeW4EX19rpfAFFj0H5wnNQmlZCP5/ELBXcGDh7JJP +PqfrUH3/xy3j1xIOW8x/HErh0nZoVWBXPTNF1KH604aA7F0acP7TxIXXTPjV +4fyV315WnGlQgvLF4XwwfUAJzgfbu0TTYUp7a9TlP2oOf76VPpizUctBtMfr +FcsWDTg/I/9D60kTbTg/NQ0EdB0CbknXJE7ScHgSIb794gNdh1OHndZm/lNx +OAMCb3QdfE6w287eiuD/fPv6gOViFYi4qR6cDws/dD5MP4z/BORPfVVU+ata +cL7/xYkx/5y14XyJqVc4M5K0IeHph+DHhwSpL9BE8P+A7FXWc9BXlP+SE6bt +ILv8hYfef12H7Q5Nj45LaDuIgMLjio5DA8vRfkNzTQdzm71B0w5qQ/zVo+Ug +DjJHSQtu3mZQfGVpwPkbVJ80z+NVgfNng9KBp4LDiyztb9PnqsP5sPiB8Q90 +72syWSztUAOKbykVBxNjEBCBmw/jg90XogPnw/wvAkqfLNIO6OkXAOddMnQ= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOzjJ3uKMpu+b/ZgWHlNg7bswRCP7J +w05rM/nMHdzXHF3O8EPS4aZ0TaLRUTOHVgV21TNTxBz+fCt9MOegCZwvPvUK +Z4aSMZwfreD4MXmOEZyfngYE04wcau7/uGX8GsGPVo2QOVcjAeevFdLhS1+n +5LBBL28x4xpjOF9mXpzm6QsmcL4EyL5PJg4PXOMdZ31UhPPVP6m8nHVS3sHn +BLvtbFNTDH5CSJD6Ak01uHp0/pT21qjLMipw+xhAIEEZ7h4YH+ZedL40SJ+B +JsK/nzYEZP/ShIeHvtZK4QsqWvDwgvF5/NdPSd1hAudrvOXdZ1BpBud/ARoz +67qZg2iP1yuWLxoOXiD/sJo7GIDkW1Qd+ED6PRB8sP6fZhB/X9VysK+MWGFa +a4DBh5nP7aZayrQLwf+681bX36mGcP7jxIXXTOYbOsxZpLzzz3NNOD8V5E82 +BN8YBC5LwPl9Ed3+jALicPNg6QFmH4wPcw863wRsoCgkPhTM4Xz09AsADwgP +hA== + "]]}, + Thickness[0.04012841091492777]]}, { + ImageSize -> {37.372557907845575`, 24.508064757160646`}, + ImageSize -> {24.915038605230386`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {25., 17.}, + PlotRange -> {{0., 24.919999999999998`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.05339028296849973], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4r35NW9nmio63NGUXfN/s4IDAwhsUIDzz4CA +jIKD+5qjyxl+SDq0KrCrnhGRh9BTxBwy0oCATRzOV/+k8nJWpwCcf6B7X5PJ +Yx4438QYCDbzONTc/3HL+DWCH60aIXOuRgLOXyukw5e+TsmhP6Lbn3GDEJx/ +EGSeszicrwGy76S4wwPXeMdZHxXhfLA7Tso7fNn3cWv6NQkMfkJIkPoCTTW4 +enT+lPbWqMsyKnD7wOGSoAx3D4wPcy86X3penOZpA02Efz9tCMj+pQkPD32t +lcIXVLTg4QXjh7y9/HHGQzE4X6RyUsnZJ7JwPtjfcfIOoj1er1i+aDhUg8KR +W8HBACTfouqw4tvLijMTEHyIfnkHnxPstrOvajlINMlMMbj83R6dDzP/gd/L +hL/zf8P5fWD/ssDt3+a1wWLOTxaHOYuUd/55rgnnp4LTAYIP8rbxZQk4H2yO +gDjcPFh6gNkH48Pcg84Hh6OxKCSeHRUcYHz09AsAhrkVoA== + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {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, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGITIGYC4v7gEpXp9oYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg4GDzwl229lXtRyKt4r+Pu2H4Pvfkq5J/KQP53vsr5W1cEfwfS9O +jPnHrAfnt/D6r5+Sqgs3H8aH2V/726rg3Ap9DH4AyB4hTTjfzGZv0LREDTj/ +DAi8kXb49fb1ActkdQi/RwtC66g7bNDLW8x4R8shDQTU1OH2M4DAAjU433lC +s1DaLyUMPsw9jyLEt19kUIHzZ4IBgn/qsNPaTDtVh3SQPWwIfrsCu+oZEyk4 +3xgELkvA+a0g+SlicPvQ+SZgDaIOHxatVzg7Q9mh6v6PW8beog6bwP5SgfPB +4d+uCucHgsLNSA3OB8dDqTqcL9rj9YpFRANuPowPs18K5K8Lqhh8mPthfJj/ +YHx9rZXCF5ZoQuKJUQ1ibgmCP2eR8s4/6ZoOKbF33Jgt1CDhIKcJ0dei76Dx +SeXlrJeiDqYg9Qf1IfHkIArRd1wf7l5Y+oPxwfpFDOB81SfN885KGTiIVE4q +OZsi6gCOPjkDhxjVCJlzNQg+LD3B+LD0BuOj5w8YHwAQsj0Y + "]]}, + Thickness[0.05339028296849973]]}, { + ImageSize -> {28.098381070983805`, 24.508064757160646`}, + ImageSize -> {18.732254047322538`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {19., 17.}, PlotRange -> {{0., 18.73}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Row"]], { + Top, Center}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{ + 3.804411777819518*^9, 3.804476883207548*^9, 3.804476932631817*^9, + 3.804477009721654*^9, 3.80450149188756*^9, 3.8045021005091047`*^9, + 3.804502174730886*^9, {3.8045022143321466`*^9, 3.8045022372566013`*^9}, + 3.804579499591563*^9}, + CellLabel->"Out[70]=",ExpressionUUID->"159737a0-a258-424f-899a-c43544b1c373"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "4"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "6"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "8"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "10"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "5"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804411149571501*^9, 3.804411177234048*^9}, + 3.804411214286077*^9, {3.804411274259746*^9, 3.8044112944129333`*^9}, + 3.804412295929188*^9, {3.804421736108625*^9, 3.8044217476620617`*^9}, + 3.8044218845393057`*^9, {3.804421985118821*^9, 3.804421991968686*^9}, { + 3.804422114063652*^9, 3.804422119169289*^9}, {3.8044223254491367`*^9, + 3.804422326099684*^9}, {3.804477960220017*^9, 3.804477983446786*^9}, { + 3.804593264956546*^9, 3.804593280323661*^9}}, + CellLabel->"In[78]:=",ExpressionUUID->"44e7f84a-c2ef-43a2-979d-6c659182d37b"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"58.650505578070764`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"18.6637805951158`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"44.78857168517361`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"6.3986147156434034`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"18.6637805951158`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 78, 1, + 22585916483268483227, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412291506194*^9, 3.804412327079358*^9, + 3.804421915022108*^9, 3.804421992997724*^9, 3.804422120073182*^9, + 3.804422329832324*^9, 3.8044779884524803`*^9, 3.804593317912225*^9}, + CellLabel-> + "During evaluation of \ +In[78]:=",ExpressionUUID->"84dcf1d1-6d6f-4efc-b321-ad6ab4cd761d"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"1829.5453911672455`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"640.8489612094226`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"49.8578065141576`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"-\\\", RowBox[{\\\"1635.0635918080238`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"9.922735458022437`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"358.05178073637705`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"13.605377383101205`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"640.8489612094226`\\\"}], \\\"+\\\", \ +RowBox[{\\\"99.7156130283152`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"19.845470916044874`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 78, 2, 22585916483268483227, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412291506194*^9, 3.804412327079358*^9, + 3.804421915022108*^9, 3.804421992997724*^9, 3.804422120073182*^9, + 3.804422329832324*^9, 3.8044779884524803`*^9, 3.804593318113634*^9}, + CellLabel-> + "During evaluation of \ +In[78]:=",ExpressionUUID->"161d6dd1-7ed3-4527-9f37-cc65fac18dd5"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"101388.60813123871`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"37343.7143825798`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"3403.8378607206614`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"105.2751843068742`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"98047.96792478973`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"21058.551596143403`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1056.0491772956425`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"13.98769672017702`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"25764.941393080633`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"2896.2900741025637`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"60.50356349324911`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1634.2180214457285`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"68.38965241709113`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"43.620120394027005`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"37343.7143825798`\\\"}], \\\"+\\\", \ +RowBox[{\\\"6807.675721441323`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"315.8255529206226`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"21058.551596143403`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\ +\"}], \\\"+\\\", RowBox[{\\\"41.96309016053106`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"2896.2900741025637`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"121.00712698649822`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"68.38965241709113`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 78, 3, 22585916483268483227, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412291506194*^9, 3.804412327079358*^9, + 3.804421915022108*^9, 3.804421992997724*^9, 3.804422120073182*^9, + 3.804422329832324*^9, 3.8044779884524803`*^9, 3.804593318289926*^9}, + CellLabel-> + "During evaluation of \ +In[78]:=",ExpressionUUID->"ea13e6de-a4d3-4b20-a533-06926738ca4f"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 78, 4, 22585916483268483227, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412291506194*^9, 3.804412327079358*^9, + 3.804421915022108*^9, 3.804421992997724*^9, 3.804422120073182*^9, + 3.804422329832324*^9, 3.8044779884524803`*^9, 3.804593318464901*^9}, + CellLabel-> + "During evaluation of \ +In[78]:=",ExpressionUUID->"83165f37-86f6-49a5-9f65-e8d5a77b00b2"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwVz3s0lAkYBvBpppmkoZlPe2qyWbrsuJQx61Zh3vdMqFMJnaXYzBZhXVrb +lltCF6WmwpYSS2pbl8RKzS6r+HKJFTvl0s05G5HRqm9mDIYY2tk/nvOc3z/P +OY9FcMzOUDqNRvPS5/++xKOaxbYKklkcqr7xgI30DJZaY64g+WmZmeX32PgD +3dz0pomC3NgyM1xbxsbt73ceZHwcIq3touoHrrKRVVezorlpiEy9Ff9cEsvG +hL1pcR4BQ+SP36q/WSBgo6TE1HJL2luSa9q/cnHRIrRy3HrOq3eAvOBw/J/i +nw3RMf9uUVDyazLZSb4p4awBHt1TbSR9+IJMCevJzP6bheInFgvOr+kk17wQ +iI56MDE5sZ8Zp20iderC4hOtDNQ0W9VdCywjPVc5zeWn0zHgtLH0q8JK6A0U +PSzzmYdR3qc7L69sgfi2ccsOoKGbOqjEQ9YJb6QhB6P+mAOj+uyQS4qX0H8r +rSr6ow4SZ996xl/rA953q1ueps2Aw6PwDvHyQZh94J6Y5zIN3sY2h8fKFZBQ +rxiqnp6CDZwkQQx9BO4slVuPU5PQuiQ3IruQgqXrm45ffKeFReYnDgxfVoNq +xyfVKoYWlhNzgkg3DXQKSureiycgifmmqsFgHI6rhJv/TB+HTX7SupTfJ+Dc +gZiOiZExkBTnneGcnoTNETU9N3aOwSupr2rtjo9AUWHR0x0auN8u7/ttchom +XP49xAzSgMroXibzkQ5sHOr4n6lHQVoe1NZwaA6+SGBOvc4eBXHMLu/5RjQM +T78Qs819FN6duccjNDSUyHWuf02oofGpprSrdR5isE83S6YGj9yhnORKOrrb +RK7mHVZDwu3bPdRFBlYEvjOfc1FD3/uvn3PC56OMRUueZet/llc5m3kx0f5u +qkVcvQrs80eDXq9ioah1KqP7oAr4z+Z3hWhZ2Mjv9/rcVgXNGe1F3b0LcEZY +zFv2QQnZcbEibaUBhoCFpEOmBOO+LidGzkK0MpQ9oKcq4X6syXjj94a4ddg/ +c9pXCcv8+Z82ixeh7cn9KxyslWBWrYyo5rORekyriWUoYbdnbu6rWTa6ctoP +MwYpcPGftFQMGeGXx8ryjjRRIK+0ZNW0GeO2/ZO18hIKLju7lbpeW4wNN+Jz +rmdRwLhOf+Yn5qCkytmDe4QCP5fdNYoKDq4RNqWvC6cgNSlHHLiUi8y+RFGy +PwWzSXd0jWe56BtRId3gqd8zceGdGufiMZ3Vxrz1FBhqS9r3abnY0/brT3v1 +PvZySYpoiouyWjWDr3d0gXJgcoaL2y0fr5c5U+DO/6U8kkHgllD+wBMnCjQb +F6IPQWBrN2nJdqTAJ/hFmKkdgflPneyuCilocXfnTQkJDMxa/nif3q78qvYe +ewLvBG1LttGb/0Fql+FM4JUloQLSjoK5WNE0DQgMk9s1DAsoqDhbdEHhRaAZ +bzrLzZaCldEENnkTqEtxqjXQ++qOVE2hL4Ejjixd9zoK0kwCdgX4EdgwKGyL +1HtPAduiYw+BgpNJZ3LXUtCVmthdKiHwbqZJbKjeW4IVp07tJbCA8zZRqLc9 +/+GIaD+BTmHzOtpsKChduK7ANIzAN43OvCt6m33I9Z4KJ3DuZmJKsN7Zchb9 +WQSBg733Z2z1Nqw6JKuKIrDabSxrxpqC/wCqGEwi + "]]}, + Annotation[#, "Charting`Private`Tag$19198#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0H881HccwPHrjvMjzt3ntEIpla4epSwrj9Ld+71LsQnxGDkhUyrS1ERu +kj3WnZXQ8mN2Fa1W2IikENNXyNevkVMu2lC664f86Oio0LY/Xo/n/y+bkEjv +UCaDwXD/r/9NtxiqF6/WUCKDvGVkPh+ZqexR7SINFbuaWbbxEz4eYi6y+o2v +oaLZ69NCuXzcNuh9mPVOTQUJN9jV6vGRXV2xoL5OTeX0oPLnIYKxwbKYLRI1 +ZTwVPFNIEQzKs1ruKntG9QvcliWGElyx7svT7j1PqThWl6S8nIfrLty4Ghjf +S3kcvJ5W48/FYwHlpkk1KgqknP57+zkobrcxSLbtoGYpCboYmWC8tF8/RldH +ubGAmzjfCLX1K6pz/P+g9leZejcVsFGSyElae7EYVOAheeqhhwc8EzsyFzeA +fDA5XCRionA0MG/LzQ7w3Rtut1rOQNM7GbvTNY/Ado50xebSaZBOP9t6NKcP +ssaikuHVe/js3r5WseUA1C/57nFzzCR4clYeGSvUQHOFgW/ZHB1s4MatiWS+ +goGNbrm5FuNAmyvCMi4OgbQB8LSdFmYv+uHg88xRuBGY8cI/YRQsycyacKEW +Rlvquy7ZD0Oc/pOSu4bjUDH8e9jLo4Ow2Sep+vitt3DlbZnw7NqXEJR77iQ3 +cQLmVrI5lz9qoDvJa2SVxztYunmgKpSvhqqWtr6iifdgdOmQWhI7ACOmpWf0 +701BbPuQ/U8vn0BSYWDT3agZsF48kKO40A/iyB2eeqYMdNKJrPYM98KLk6UW +RMvAAtv586ZK/4ba+9p8JT0L37GNVD6qHtiiUGfFFzPx8Zq7yWrDbogtKHgw +lMbCiJ5Gg54oFfQNftXF3aeHqTvjVAtsumCksMTR2l0ftzoZYK/qAThceBPY +u4SNLqLPVWn1nSB4qKfcrWOj08IMvcsdSqhPbbna2WOAI+ekwXx1B2TERIt0 +xYa4ZFeFv2BhB3D6lOtZWUY4pqGNO4PuQ1U0f7z2G2NsqA3nP49rh3m+go8u +4tlIy5ot3+xqA+vy4bBygQmazd3Qnuz2F/htVSi6p00wpInrJ9zTCk6+E8s1 +alPsq04zPXuiBdqKl7MrmjjYXTR95sc7zZDpKMzflGOGipRZ6SkWzcD6lfnQ +R8zF86leXK60CXyc/Co017h4wsxH9qe2ERLissT+c3mYTleKLI81wnTc9ana +Uzx0tS7zlRs2QibfyUI+zsPKkWyvO3k0GOvyWr7W8XBX5Pqapbk0fP/I/Lho +kocLTWqHTl+hISJ7+OnEBx4K+91lAZdocBZcLgxnEXxcmZDJPk+DdqMRbicE +HaZ4H+JTadgeotprZU/wVn/K4YloGhqcnS0mPyW4M73BPPoIDZsEJS0PHAgm +JlpGjH1Lg+B1kn2qI8GpZ3XrtJE0zESL3jOAoLj1zcrJMBqunbqaonEn2Dr4 +3N82iIbFEQTrPAkeDbw9ryiAhl88ErQXvQiuMo+RO+6kQcaX7JD4EBy/HR6+ +zY+GgGwTm9YAgg1m/pLj3jQoE6Sd+UEEzYQ5chMvGlxDNHJ5MMGZZc5B5z1p +cBDUvBLtIVjlF8Wv2kZDvpFdttVegkVmASNubjRYv1Z4Tu4juMk1NOafL2jI +aGMzH4YR5K+C/EjX/36WRN0sOUDQW6mQMV1o+Bf1pjsH + "]]}, + Annotation[#, "Charting`Private`Tag$19198#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVlHk41fkex+3nZ835CeE6obrHMqJUJsrnM6cacm1jFLJkWgal5SaKarqP +ODenMIVElpAtjGy/c0p8j71SsrZ4Rmo4pxnGOsZS0e3+8X5ez+t5Xn+/jQ+c +8DwsJyMjE/Zl/2ey3ngLb72UCHS98yKcaJRLVJqaMZIScmn/+k4ejSfljAzy +tb646mXKbDuNLmOe/5ZflJD743vzJRtoVKoXGbY0S0gJp9s72oDGs0Gxkbt8 +JaTboHpEc5KNgUUGpk6xI+ROosL7sTQ2mm12vuI68BsZbC3PWjeliZszqwoC +Lrwhu2/L+jO4As/7C9UF4pdEnOHa3a6mjrznxqyr67rJc33zJjk9VbwQ9VYx +cq6Z6BvXPLW3VkZ/Y/7TOXEzsTqd0H/eTBntH1skn7nSTMKP8a+JTZRxcdUZ +oyijZsKtceZ4aCtjhEjd/rxzE/lrZv/RpA8UHpu3OxmTLSaGayNfJrRS6JLz +dot8qJgklfcJFhsotHDkL12yEZOOaN+hYBGFPZb52qrXCLHNCgl2KaXwSViX +M1tST3y21fVtukbhg1HzWsOEB+TxRuH6mAAKz9pF8labPCC39EtP6npTuEXQ ++NxIeJ+c/sORV+FBYZWZz+iadyLCSbD8WbqDwrshcavNNwtJ8X8zReHmFIaI +usosnjBk9VS7r+FaCv9J/cPOcj9Dyg1UYx4bUphXVOVlHV9LNFXTD5qxKQya +X3q3gVNLHpq06g+qUMhx3H3CprqGDOR2eCUrUPjrjZRPm5xqyA2/bE2XZRZm +SIfitwxWE266lStrgYU+Wyx0vz5VTQ60Lw6zp1mow4+8s5VVTc5VWNFe71l4 +fZ062bahioTEuvWP9LJQcMhulhd3j8xqr2izLWfhTItZffa+u0TFt6A7N4iF +rcNqZ4WnSkhV0a3BPXtZeFNuamOXoJh0BPYWariwcDsyxbJ1hWRE61RIoi0L +L9fxUg4Z5BMf76SwNg0WOhwSvvASpZHCZxcydRqUMFMx2cadjgATJYsJUyMl +9OVrCDbmVIBlxsW/86YV8Kg7vzvVpA3smCoj3S453D4VULSrphti1S+5r6Jk +Ub0h5WCy9BX0drBqCzKWIWpp5Nsz2UMA+363WiX8CJtag5/y9Ieh785wbYjF +IrhrWJz+q0wKo42hAlbVHGzVPGd1Qm4UTN7qXVmdOwvtK9NDU3LGAWp4771v +z4CqUcyx96lTcOhrHx1maAr06WWrI9tnYP/uT4YaPRNwTvFdZSM1C92G4TuS +PozBjj2C+p9q/4ZGv+MN9rf+gMDCjMua/Hn4nv/k4Vu39/Ba8N3kV26L0P9a +233wKwnUdXQO/TL/AW47P3pm7zQMk+rVSYqtn2DpzUTK3ZPvQFAW8LgxfBmU +k/jWGR1DwDvh7a6gLoPPX2g39rMH4ffL1Xr0jAyuNXoy0RA6AE1dM8U97bIY +ej7n8LjVK9iVLkm7UCGH005z1fmKL+BsaWnf+HV5zHG56dXP6YOhMa8XmsEK +GJZKU2X8Hpgsq7TluCpi8tyBjaMLXWCTOR3wZo0SXs1dGTW59zlw+xV6Ds4p +YQlT7zhNPYOWxI6C3gEWHjSO2D3/6AmkREY4zFVQOBZQmfBM8gg0hnq2yKcp +o+zo5WH2inaoi9CabTqugt/Ue/JdY1th1V7uZ0eeKpbdE5uqcluAI5wIFXLV +UMnYz/abnibw+TY9/fWSGvo7djn41zSC/d55U6lEHY8nTPYrZIuhs8JUSfRY +A8NeqtRVeRJItd1evC17BQaybwUYiupB/rZc/x6eJhq83uoh4T6EPfY+Imm5 +Jub4NGrvfvUALp5L4+3TZWPn0VPTQRX3YencvU9N8WzUj/w+Jz9BBKla9npx +s2z8Qb1kZWmGEFTmijp+mGOjv8VTuvCGEP7zauVPDgts/JVEj+ZdF0JY1sRv +8x/ZuJXHWZMnEMJObl7ZEXkadx2R5DLRQpixU0YPmsbYK6hv6ycEjwMvfzSw +prHDz976Z0MhtO3cqbfw5YcPt0FLi54QtnErO/psaHz4Ikb3o7YQuH8KrBNt +aWwkKQthGkJYjnD4IAM0ciMLEw9/ZqA8viBB6kqjpV+6b8k7BkzCaGx2p7Fz +69WYxUEGbrpdnMn5jsZKc9PAfw0wEKvl6+2750sfZGU+28OAf5aa8VN/GqXx +Y599WxjouRjVWxxIo050ULFQzIDTAWlcXBCNqs7uSzr1DNhwxaMOh2gcj4gv +GahloFjZMsvgRxpTGbfPDlUMcP5Md18IpvGMyaXlO78wkNKpJNcfSmNxvW+h +WikDKpXhNZVHafTU4cxFFDHwPzI7JeU= + "]]}, + Annotation[#, "Charting`Private`Tag$19198#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVk3080wkcx2djTKPtx700ShSNriudSiHfbyNKx/TgqawHFS9JJVFyo1fX +KutOdxdX6yJdMcUsD0WH+4kpIvKc3KultdWJaGkeLpz74/36/Pf+/PW2DT+8 +ZT+VQqH4zfD/XuIMKnhLNaSPaLLn3b9spKbRh7U2GnKJaocoUMfGI1Qbq5tm +GtJxrOqkYpiN373fEksbV5MhF+/DbTUb6VXl8xS1anJly12LtBY2nth9JmF9 +qJrsP9q6WHGTjTulVg4bzrwhl1Rl+/b6sdFxpe8FvxevSfva55an81i48lpx +jkD4kmzPpiRIKkzx+7AyE3F1N2mRm4H1PzOR12Jr+KN9K3n1d/0YaY4xChNf +GSToaskH1NzgsToj1Cocq7K23yGds5hXGc6GGHrWVPztdTm8Y85pOM03wGj+ +2daMBY/AznuCSVtIw7XDAun60lbYeudvhnCzHpr8lb73kuY5hJk/GV1sOQ2J +k2+8j2cpYZ/WqrrX/gusqIts4lmqYK6d8laHeBz4pl8f+1SgAUGXLuGT3iis +YSUtO0ztB2lIt4tENQKPzSVR6dcH4b0i/8bGTi3Msjkd8zZjGJitbrECo49g +SUwtO7BWCwPNrcs5pkOQZNBX9NBoBIQHhla52g6AZ6C4KvneZ7CUZCVHy/+B +nblXz7POjsLg3v3Lfgh4Cz3izUNL/MchIFP/0Li7Gioam5WFoxMQebuSDD+l +giGTkosGdV/A1nONp++zPhAXCBoexk2B+91dc55GvALe4WC+vgkFBQ8JjSP/ +Jbw7X8IhtBR0cuhwMOrrhZpn2ry2x3p4Lp3hlUv2wHqJ+rJQTsXJFY5i1+Bu +OJGf3zH4Kw3b0nxLA107Qfl+WxcrUh97u/JLnOPbYaigyMXazwAXpUSvnqho +BedrHwUvF9LRJzzTdY/vM+B26rft1dFRpy6lexo2gyKtMaf9hSHGOXGkQSGN +kJ4Q76GTG+GIj67EX1UPpsq2VbTLDBwm6ULjlEdQEW82UnPIGI3nKYtZyQqY +E8Sd9uHNwnUGREBmeQ1Yl32IKuMysctufq5oqhpCvCWSnkkm7lBJU9ssSHAL +GnXQqE1QlaaazPSuhGa5A728wRQTAiqjRpoeQIbL2jz3rNlYtwniYh6UAS2b +2hnIY+E6jp1kV8k9CHQLKdfIWGi0/c+GfkoppCRd5m23YGNvFtfn+KlimEy6 ++6UmlY191IQCG0YRZJi5cUQjbDxXu1Ebek0Oxjpp456ZrmR90x6Dv8jh1HPz +ZI8xNlrEPfERnZPDwcwPr0dnOkzlDd2qPSoHL+4fBQdoBIKyiUjcKAetKwMD +CAK9vuok6kYLISC8O8LKiUD65P0bbcGF8MjLizO2nMCncSzOhF8huHOLGjuc +Cdz2hDZ7kVchcAfETmkuBEpwftwFp0KYiveYoACBvbG59RcYhSBLzflJ40eg +f7ZienelDBYcJLCWTyD1pHVMS7EMrvinaK9vJlDqmbOad1sGZ8xCg0MDCaw/ +olSu+E0GYZlM26YwAilbOtz9j8igLSWxPW8ngf2xY3uUETLYEK4RiXYTeKJU +7+kxgQycudX9HvsIVA+FXinwlUEe45tMqwgCN+UOD/ivk4H1gIQ/FjnzNzdG +9NlFBunNdGpn1IwvqCEse6kMjIviSouiCeSZbxXy7WXwH0XiQQ4= + "]]}, + Annotation[#, "Charting`Private`Tag$19198#4"]& ], + TagBox[ + {RGBColor[0.285821, 0.56, 0.450773], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVkmk8lQkbxm3PscQZ51FTIlHTnJpqKsSU4b7nRPU2ZCjFWJLEW0jZ10wN +BkkmW5JOWU+cM8dOIx6hVIx97c3OkeyHLIXG++H6XR/+v+v/6VKzczW9KCYi +IuK0lv93jOJENet7AaV1p28s6T0DxaJo00JVARVxykyePsjAq2KqSqkKAgq2 +uwXe7Gag4ZjpNfGlYarUr3GvWzMDaWUlW6qrhin7a1fqnJ8x0Mc22MvAYpj6 +oj25pz6agTaZSjuPBw9RLgv+E4d1GLjr4IlbRm8HqLKYAVZ4vDwefJCXbh3Y +Qy0P2DLO3adjgFWxXERFB3VGvcvx4zVZZDWoSUbuaKKashI2bQiXwUDfPsJr +voo6wu86V5YthcLqXWUPf82iZjQaot5vlsQXg7I+xW5PqD/qaXre6yXxnti0 +emMEhwr3DayUokuiLhZxREszqDsZywaaopIYVsqKtVdKpXT9NBV4IzTUsy9u +P12SQDlsluN8U0jDB0SMhjHpCbhsKNhmSkPaV35W4SYBoD0UVSNtSMMfInMq +z7+6Ac8aWsxmDWj4OC5hLEkyHIQtIR71h2h4uDVPRaoqBj7KB99LU6NhbPw4 +p/1uHCintFCPlGg4af6tRrpdAmxQdY9gb6BhanfiMZZYEsyuNkukS9Mw1B1/ +KFd9DDkHbzs3zBCYf9o6MF0qBWI1GyL7xgjsO+hXGTmdAvZ1TUfnhgnUWcw3 +tKxIAx7b8vftbwn8b1fjnyxOOjhkhIhDK4Hxf0+074rOgNJ3hZus6wmsSpJR +ZvhkAlOaeh74isDpAOb5xXMc0Pb3WHlUSeAWG/2M3mNP4J9bHrx/nhJ4As6P +vdyXBQdsY5Z0cwhME03yjPuSDaWDBdm7kwm0CKVHqLP5kHvLBHW8CUwyD4py +/SkHpk58S8y7EChzZaHDID8H1MdmhAX2BI7cG7ksjM+FHKl1LDAlMGWyJvpn +m3ww+p7yC9lL4Mb7Ye9WxovgZiHnWfuQBIrOSHvYyZTD+M9H+oLOSKCTcWhT +3LaXEHY4c0eEgTjqTltnGhQ0Abvm5KtoV1GUK4+9ECPohMk2zptrRl/Ad2Xo +qPfDXjjEG6m6YbIMmi8c61ibB+Gu51VmNH8JjOm7PWa5AkiTGW2q2LoAh+T9 +97mKfQAr+6sLzp/noGZ94qVY9gTQ8/JPqY4IYZ3qTZeRuGkY0JK2fLl+BjaT +q/su6wqh7LdupdAtU+BP9Oc+l5qDtyJqIfuZ43DELKLseuFHMO3fJLqbNwo2 +GffD5EMXIPzZ2OcFgxHoijCZ2nNyCWTB6lPHd8NQWlvf+9fCJ+jTbxh46DgI +U3L5d4gXyxD63iyyKqcfIrjWr5+7r4L9orLYqZ/6gOV61lhCTgSnPE567Vjq +hvdh+YqkUASt6CUbk4P+B5WNQk5zjSiKZz01UnPuAoPE4YRAvhiq9Yj+ccCh +A3yys1sn7orjzKN1jq7xbdA7drpd3lECb0Z/p+NS3gJT3FxtFaO1X7mMlwmE +TaDxYMa6ZzsN1Qf8Nkq5NQKzTaL5wjwNE6V9TFJ16qE6qja95a0kPu7/2rY7 +tRZivTz15vlSuOe65+wF79dA723WEk+QRkfNi6veFjVQ6qkwV3lFBi3ZU85K +MS9g0xnml2Osdaj6uzmqiFaDSvHkpWKmLNbe2RYcaVsJ5kcTE7tWZPG2+XT5 +aF8F6JxZ2CkYlsPmETP98NZyqOfvpJW8pmM8o78qqLkU4rR1OT8+/AqTpegh +W42egvgjsTYzljx+sMuWy+4sAjMd8xIBTx5Vrgdc2PqmAIL8E1i/bmSgfUmn +U/JiHqz45yxXhjPwzyHa2Xj1XIhT0FEMmWNgxm4/nyUnPsjMZ9aen2dgUl6i +st05PvzWuf663iIDt6RxIhtN+eCcPDmw8JmByr2BdeWH+KDPTOFeFifxYk/K +jT5JPggPS+MvJIm7XKfPaqX/Bb/YdTgo7SexarjFWnGIBy/19RUXD5D4dNGN +rdXJgx+ZubWtGiR6Fc1YWNTxgDkesT9Km8SsaEkNfgEPVj31PokAibOXEvc/ +COEBLzz9tsCIxJQFORXfnTzY5rzmNiax93NR47gyD+6dDBKyTUjcZ5vbcpHB +g2AFi7MWZiRWjC6+cfzEBatkWbU6KxLvqh3fkV3HheYg3xaOzRrn/L39P8+5 +cNxOEBJiS6JlwKjteCEXNJgVH/TsSXxiyA5hsbnAkd6brOSwto+0dv8YwwWV +8UTjRUcSWe9bb/PCuBBbTxNru0RiTyjx7nIgF2Ry3QtynUgc1myx2uvGhX8B +JfQo1w== + "]]}, + Annotation[#, "Charting`Private`Tag$19198#5"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$406993#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4vbl4aeMchwcvuz7uDXdTNbhDe8+g5leCH6E ++PaLDG4ODqlpICDjcDE/nv2cpYNDOoh7TBKiXsvB4WD3viYTZkmH45pWk07L +Q/VPk3D48630wZyJ9nA+2Bwze1R5Rls43+fixJh/wbYO8rsW7EtdJ+lw4rDT +2kw+O4c3bbndRrtlHJ5naX+bHmvn8B8E7ss6FG8V/X1azMGBPzbgvpG7kgPM +P3c0Zdf8b1aG8x+BPPJAFc4/BTJ3nobDkTagwCF7B5Eer1csJVoOEvPiNE8n +2MH5JSDz/9nA+U8TF14z0bdxSI6948YsoQHnz5jAX2XGrQbni4LUX1Fx8DnB +bjt7K4J/HGTvPgQfZj6MDw5vP1uHJ2BzVOH8wFvSNYmfEPwXoHCYqwYJL2Fb +h7+gcBRUh5sP45sYA8FiBP8MCMxB8MH6J8Pcrw4x/5yNw2bzH4dSVmk4HACF +T5Gtw4+3rw9YHtZ0qP1tVXDOwg7Oj1Fw/JhsYw/nTwWZc9sear4GnA8Lfxh/ +JgjcVIaEj6s9JD2JKTl82BCQPWu6nUM4p1i7cb8CPDzd1hxdzhAhBueD/WUs +6rC/VtYi3cUBzkdPzwA7R0nA + "]]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYCYh7/9VNSKxwc3rTldhtFyzrA+GuFdPjS7yk4 +7LzV9TeV3cEhPQ0Ipik58LipljK9snMoP7zNdeZfJYcl9/fxzfls75ABlld2 +eJK48JqJv4ODaI/XK5YQVTj/xK4dvWwG6nB+wC3pmkQhTQefixNj/i22dxAB +qS/Rctiil7eYscYOzld50jzvrJctnK/xlnefQaaNw38w0IDzJaZe4cxwUofz +WTi75JP91Bw+bAjInnXcxuFFlva36bJqDj4n2G1nf0Xjm9rC+SVbRX+frrN1 +2OHQ9Oh4BYIPcz+Mb2IMBJ/V4frrflsVnPPQcBAHueOTDZwPduZ9BJ8DFH63 +EHyZeXGapy/A3K/hoK+1UviCi62Duc3eoGkPNSHhm2wH5x9oWx5+qgjBB/vv +OoIfIb79IsM8e4dUUHy0Ifgw98P4G0DhvEcNYt8Ue4c0MFB1iFFw/JhsY+/A +AAIJKg4SIPc9sHMAedc4WNlBHRS+lXYOK7+9rDjjoOxwVeiT43k1O4fK+z9u +GVsrO0yZwF9ldtrW4cOi9QpnNZQd6lmO9htOt3XotPHclaYEle+2dTgDAjII +/t78mrcznyrB+WD9K5Qctpj/OJQyC8EHJQOTiwj+c1C8xdrB+WD3JtjD+WD/ +XbGHplcFOB8cPmmycP6OYKuI/+rikPhktXeIUY2QOVcjCom/fDs4H2zfXVs4 +H5wOHts4tCqwq56ZIgZJr102kPy0WxISnm9sIPmpThIev9NnAkGkFJx/3zXe +cZagDJxvADK3GOo+Fluoe+UcnoLyz3obOP8LOIMi+OD4ELOBuG+PLJwPDu83 +0nC+wq4F+1LXiUP0qUHTs7EIPH5hfHD+fGwP58PKB/VPKi9ndUo4oJcfAPoy +yPg= + "]]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQLe/4MflMr4OD+ieVl7M0ZR1g/Ir7P24Zd8s51LMc +7Td8bo/Bl1n+wkNPXgvOD7glXZM4CcH/8630wZyNWg4xCkAD9yD4Phcnxvxb +jOCrPmmed3YWgi8+9QpnRpO9w5xFyjv/pGs5bNDLW8z4xhpuP4wPc++Jw05r +M/nsMfjGIHBZAs7vi+j2ZxQQd+DxXz8llcPeoVWBXfXMFDGHGTOBQNMOzj8D +Am9sMfgmYANFHQ60LQ8/ZWTnUAVyj7coxD/K9nC++lvefQaVCH7JVtHfp88h ++ImHL2unJjrA+VO+scXPaHGAmw/jw+yPEN9+kSENwc9f03074wPC/bDwhvkP +xof5H8ZHj18YHwDMfN7/ + "], {{31.117199999999997`, + 7.635939999999998}, {28.220299999999995`, 7.635939999999998}, { + 31.117199999999997`, 12.1297}, {31.117199999999997`, + 7.635939999999998}}}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{1, 4, 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}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQzeO/fkpqhYPDGRB4I+cA43faeO5KW6TkoK+1UvjC +FXsHM5u9QdMOqjgsub+Pb85iOzjf5+LEmH+TbeH8/uASlen6tg7K1x4FM7xR +cpCZF6d5WsDWYeW3lxVnHBD8vfk1b2c+RfDXqz5pnvdWA2J/h52DOci8h5oO +NpURK0x17eF8kLKzsxD8/bWyFuksDg4nDjutzZyn6ZB4+LJ2qqKDgwdI4rmG +w5ru2xkM/Aj+FvMfh1JW2WPwN4DtV0eVT1d3SIi948Z8w97BxBgIPqs52Dc9 +Oj5D2AHOv5gfz37OEsEHOfdssIMDC2eXfLKfOpz/HwwQ/MntrVGXbTQh+iUd +HER6vF6xlGg58LipljJp2cP5M2YCwUpbOP+q0CfH82I2Do8ixLdfTFCH88Hx +paQE5+8Itor4ry4Oib8WW4j7jEXg4Qvjw+IXRR4Y/2/acruNdks4oKcPAFnp +5a8= + "], CompressedData[" +1:eJxTTMoPSmViYGAQA2IQnZoGBN/sHebMBIKfcg4wfsX9H7eMu2Xg/HQQnSbl +EKPg+DF5j73Dl30ft6ZPk3DIX9N9O6PA3qEKpN5bzEF86hXODCZ7hxjVCJlz +NaIOPP7rp6R22MH5KbF33JhP2ML5YPNybB12BFtF/FeXcOjxesViEgjjSzr4 +nGC3nW1qC7e/nuVov6G4rcObttxuo90ycP77ResVznIowPnVIPe8VnTQ11op +fKHF1sFjf62shbuKw4cNAdmzptvB+b3BJSrT7e3h/ASQ+2bYO+zNr3k7M1UZ +Yv9RqP+nKcHD446m7Jr/mxXhfGMQaFZwQA9PAP4Uj50= + "]}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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, 4, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQAWIQzeO/fkpqhYNDjGqEzDkZWQcYv/zwNteZfxUc3vDu +M5jJ5eDwHwT4lRyuCn1yPK9m7yBSOankrImyQ29wicr0/fYOM0HgprLDk8SF +10z8HRwCb0nXJH5SgfNNjIHgsxqcn5oGBGyaDhHi2y8yzAOa1+P1iqVEy+EG +UJtRqx2cX89ytN8w3BbO13gLdFCmjYOuovyXnG0acP6MCfxVZt1qcP4GvbzF +jHtUHT5sCMie1W7j8Kp4q+jv1yoOtpURK0zv2jhMaW+Nuiyj4lACFD79zwbi +37PKDn++lT6Yw2jrIBAbcN/ouDLE/uu2DsrXHgUzzFFyeApy/3obiH87FSHh +IWbjEPL28scZD+XhfLD/0mTgfLc1R5czRIg7qDxpnnfWyxYSHsYiDktfeOj9 +b7SD8/W1VgpfuGIP58Pi401bbreRtIQDenwBALIeuC0= + "], {{ + 32.12969999999999, 11.462499999999999`}, {32.12969999999999, + 10.7359}, {31.604699999999998`, 10.151600000000002`}, { + 30.914100000000005`, 9.770310000000002}, {29.5313, 10.6766}, { + 29.376599999999993`, 10.782799999999998`}, {28.899999999999995`, + 11.093800000000002`}, {28.899999999999995`, 11.6781}, { + 28.899999999999995`, 12.4516}, {29.709400000000002`, + 12.940600000000002`}, {30.507799999999992`, + 12.940600000000002`}, {31.367199999999997`, + 12.940600000000002`}, {32.12969999999999, 12.3219}, { + 32.12969999999999, 11.462499999999999`}}, {{32.392199999999995`, + 6.8968799999999995`}, {32.392199999999995`, + 5.9906299999999995`}, {31.473399999999994`, 5.371880000000001}, { + 30.52029999999999, 5.371880000000001}, {29.507799999999992`, + 5.371880000000001}, {28.637500000000003`, 6.110939999999999}, { + 28.637500000000003`, 7.099999999999999}, {28.637500000000003`, + 8.02969}, {29.3172, 8.781249999999998}, {30.09059999999999, + 9.139059999999999}, {31.5344, 8.196879999999998}, { + 31.843799999999987`, 7.993750000000002}, {32.392199999999995`, + 7.624999999999999}, {32.392199999999995`, + 6.8968799999999995`}}}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #5}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.285821, 0.56, 0.450773], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.19054733333333335`, 0.3733333333333334, + 0.30051533333333336`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.285821`", ",", "0.56`", ",", "0.450773`"}], + "]"}], 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.285821, 0.56, 0.450773]; + 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.285821, 0.56, 0.450773], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {-2.3025850929940455`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-2.3025850929940455`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[10]}, {0, 5}}, {{-0.6931471805599453, 2.302585092994046}, {0, 5}}], + + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVz3s0lAkYBvBpppmkoZlPe2qyWbrsuJQx61Zh3vdMqFMJnaXYzBZhXVrb +lltCF6WmwpYSS2pbl8RKzS6r+HKJFTvl0s05G5HRqm9mDIYY2tk/nvOc3z/P +OY9FcMzOUDqNRvPS5/++xKOaxbYKklkcqr7xgI30DJZaY64g+WmZmeX32PgD +3dz0pomC3NgyM1xbxsbt73ceZHwcIq3touoHrrKRVVezorlpiEy9Ff9cEsvG +hL1pcR4BQ+SP36q/WSBgo6TE1HJL2luSa9q/cnHRIrRy3HrOq3eAvOBw/J/i +nw3RMf9uUVDyazLZSb4p4awBHt1TbSR9+IJMCevJzP6bheInFgvOr+kk17wQ +iI56MDE5sZ8Zp20iderC4hOtDNQ0W9VdCywjPVc5zeWn0zHgtLH0q8JK6A0U +PSzzmYdR3qc7L69sgfi2ccsOoKGbOqjEQ9YJb6QhB6P+mAOj+uyQS4qX0H8r +rSr6ow4SZ996xl/rA953q1ueps2Aw6PwDvHyQZh94J6Y5zIN3sY2h8fKFZBQ +rxiqnp6CDZwkQQx9BO4slVuPU5PQuiQ3IruQgqXrm45ffKeFReYnDgxfVoNq +xyfVKoYWlhNzgkg3DXQKSureiycgifmmqsFgHI6rhJv/TB+HTX7SupTfJ+Dc +gZiOiZExkBTnneGcnoTNETU9N3aOwSupr2rtjo9AUWHR0x0auN8u7/ttchom +XP49xAzSgMroXibzkQ5sHOr4n6lHQVoe1NZwaA6+SGBOvc4eBXHMLu/5RjQM +T78Qs819FN6duccjNDSUyHWuf02oofGpprSrdR5isE83S6YGj9yhnORKOrrb +RK7mHVZDwu3bPdRFBlYEvjOfc1FD3/uvn3PC56OMRUueZet/llc5m3kx0f5u +qkVcvQrs80eDXq9ioah1KqP7oAr4z+Z3hWhZ2Mjv9/rcVgXNGe1F3b0LcEZY +zFv2QQnZcbEibaUBhoCFpEOmBOO+LidGzkK0MpQ9oKcq4X6syXjj94a4ddg/ +c9pXCcv8+Z82ixeh7cn9KxyslWBWrYyo5rORekyriWUoYbdnbu6rWTa6ctoP +MwYpcPGftFQMGeGXx8ryjjRRIK+0ZNW0GeO2/ZO18hIKLju7lbpeW4wNN+Jz +rmdRwLhOf+Yn5qCkytmDe4QCP5fdNYoKDq4RNqWvC6cgNSlHHLiUi8y+RFGy +PwWzSXd0jWe56BtRId3gqd8zceGdGufiMZ3Vxrz1FBhqS9r3abnY0/brT3v1 +PvZySYpoiouyWjWDr3d0gXJgcoaL2y0fr5c5U+DO/6U8kkHgllD+wBMnCjQb +F6IPQWBrN2nJdqTAJ/hFmKkdgflPneyuCilocXfnTQkJDMxa/nif3q78qvYe +ewLvBG1LttGb/0Fql+FM4JUloQLSjoK5WNE0DQgMk9s1DAsoqDhbdEHhRaAZ +bzrLzZaCldEENnkTqEtxqjXQ++qOVE2hL4Ejjixd9zoK0kwCdgX4EdgwKGyL +1HtPAduiYw+BgpNJZ3LXUtCVmthdKiHwbqZJbKjeW4IVp07tJbCA8zZRqLc9 +/+GIaD+BTmHzOtpsKChduK7ANIzAN43OvCt6m33I9Z4KJ3DuZmJKsN7Zchb9 +WQSBg733Z2z1Nqw6JKuKIrDabSxrxpqC/wCqGEwi + "]]}, + "Charting`Private`Tag$19198#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0H881HccwPHrjvMjzt3ntEIpla4epSwrj9Ld+71LsQnxGDkhUyrS1ERu +kj3WnZXQ8mN2Fa1W2IikENNXyNevkVMu2lC664f86Oio0LY/Xo/n/y+bkEjv +UCaDwXD/r/9NtxiqF6/WUCKDvGVkPh+ZqexR7SINFbuaWbbxEz4eYi6y+o2v +oaLZ69NCuXzcNuh9mPVOTQUJN9jV6vGRXV2xoL5OTeX0oPLnIYKxwbKYLRI1 +ZTwVPFNIEQzKs1ruKntG9QvcliWGElyx7svT7j1PqThWl6S8nIfrLty4Ghjf +S3kcvJ5W48/FYwHlpkk1KgqknP57+zkobrcxSLbtoGYpCboYmWC8tF8/RldH +ubGAmzjfCLX1K6pz/P+g9leZejcVsFGSyElae7EYVOAheeqhhwc8EzsyFzeA +fDA5XCRionA0MG/LzQ7w3Rtut1rOQNM7GbvTNY/Ado50xebSaZBOP9t6NKcP +ssaikuHVe/js3r5WseUA1C/57nFzzCR4clYeGSvUQHOFgW/ZHB1s4MatiWS+ +goGNbrm5FuNAmyvCMi4OgbQB8LSdFmYv+uHg88xRuBGY8cI/YRQsycyacKEW +Rlvquy7ZD0Oc/pOSu4bjUDH8e9jLo4Ow2Sep+vitt3DlbZnw7NqXEJR77iQ3 +cQLmVrI5lz9qoDvJa2SVxztYunmgKpSvhqqWtr6iifdgdOmQWhI7ACOmpWf0 +701BbPuQ/U8vn0BSYWDT3agZsF48kKO40A/iyB2eeqYMdNKJrPYM98KLk6UW +RMvAAtv586ZK/4ba+9p8JT0L37GNVD6qHtiiUGfFFzPx8Zq7yWrDbogtKHgw +lMbCiJ5Gg54oFfQNftXF3aeHqTvjVAtsumCksMTR2l0ftzoZYK/qAThceBPY +u4SNLqLPVWn1nSB4qKfcrWOj08IMvcsdSqhPbbna2WOAI+ekwXx1B2TERIt0 +xYa4ZFeFv2BhB3D6lOtZWUY4pqGNO4PuQ1U0f7z2G2NsqA3nP49rh3m+go8u +4tlIy5ot3+xqA+vy4bBygQmazd3Qnuz2F/htVSi6p00wpInrJ9zTCk6+E8s1 +alPsq04zPXuiBdqKl7MrmjjYXTR95sc7zZDpKMzflGOGipRZ6SkWzcD6lfnQ +R8zF86leXK60CXyc/Co017h4wsxH9qe2ERLissT+c3mYTleKLI81wnTc9ana +Uzx0tS7zlRs2QibfyUI+zsPKkWyvO3k0GOvyWr7W8XBX5Pqapbk0fP/I/Lho +kocLTWqHTl+hISJ7+OnEBx4K+91lAZdocBZcLgxnEXxcmZDJPk+DdqMRbicE +HaZ4H+JTadgeotprZU/wVn/K4YloGhqcnS0mPyW4M73BPPoIDZsEJS0PHAgm +JlpGjH1Lg+B1kn2qI8GpZ3XrtJE0zESL3jOAoLj1zcrJMBqunbqaonEn2Dr4 +3N82iIbFEQTrPAkeDbw9ryiAhl88ErQXvQiuMo+RO+6kQcaX7JD4EBy/HR6+ +zY+GgGwTm9YAgg1m/pLj3jQoE6Sd+UEEzYQ5chMvGlxDNHJ5MMGZZc5B5z1p +cBDUvBLtIVjlF8Wv2kZDvpFdttVegkVmASNubjRYv1Z4Tu4juMk1NOafL2jI +aGMzH4YR5K+C/EjX/36WRN0sOUDQW6mQMV1o+Bf1pjsH + "]]}, + "Charting`Private`Tag$19198#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVlHk41fkex+3nZ835CeE6obrHMqJUJsrnM6cacm1jFLJkWgal5SaKarqP +ODenMIVElpAtjGy/c0p8j71SsrZ4Rmo4pxnGOsZS0e3+8X5ez+t5Xn+/jQ+c +8DwsJyMjE/Zl/2ey3ngLb72UCHS98yKcaJRLVJqaMZIScmn/+k4ejSfljAzy +tb646mXKbDuNLmOe/5ZflJD743vzJRtoVKoXGbY0S0gJp9s72oDGs0Gxkbt8 +JaTboHpEc5KNgUUGpk6xI+ROosL7sTQ2mm12vuI68BsZbC3PWjeliZszqwoC +Lrwhu2/L+jO4As/7C9UF4pdEnOHa3a6mjrznxqyr67rJc33zJjk9VbwQ9VYx +cq6Z6BvXPLW3VkZ/Y/7TOXEzsTqd0H/eTBntH1skn7nSTMKP8a+JTZRxcdUZ +oyijZsKtceZ4aCtjhEjd/rxzE/lrZv/RpA8UHpu3OxmTLSaGayNfJrRS6JLz +dot8qJgklfcJFhsotHDkL12yEZOOaN+hYBGFPZb52qrXCLHNCgl2KaXwSViX +M1tST3y21fVtukbhg1HzWsOEB+TxRuH6mAAKz9pF8labPCC39EtP6npTuEXQ ++NxIeJ+c/sORV+FBYZWZz+iadyLCSbD8WbqDwrshcavNNwtJ8X8zReHmFIaI +usosnjBk9VS7r+FaCv9J/cPOcj9Dyg1UYx4bUphXVOVlHV9LNFXTD5qxKQya +X3q3gVNLHpq06g+qUMhx3H3CprqGDOR2eCUrUPjrjZRPm5xqyA2/bE2XZRZm +SIfitwxWE266lStrgYU+Wyx0vz5VTQ60Lw6zp1mow4+8s5VVTc5VWNFe71l4 +fZ062bahioTEuvWP9LJQcMhulhd3j8xqr2izLWfhTItZffa+u0TFt6A7N4iF +rcNqZ4WnSkhV0a3BPXtZeFNuamOXoJh0BPYWariwcDsyxbJ1hWRE61RIoi0L +L9fxUg4Z5BMf76SwNg0WOhwSvvASpZHCZxcydRqUMFMx2cadjgATJYsJUyMl +9OVrCDbmVIBlxsW/86YV8Kg7vzvVpA3smCoj3S453D4VULSrphti1S+5r6Jk +Ub0h5WCy9BX0drBqCzKWIWpp5Nsz2UMA+363WiX8CJtag5/y9Ieh785wbYjF +IrhrWJz+q0wKo42hAlbVHGzVPGd1Qm4UTN7qXVmdOwvtK9NDU3LGAWp4771v +z4CqUcyx96lTcOhrHx1maAr06WWrI9tnYP/uT4YaPRNwTvFdZSM1C92G4TuS +PozBjj2C+p9q/4ZGv+MN9rf+gMDCjMua/Hn4nv/k4Vu39/Ba8N3kV26L0P9a +233wKwnUdXQO/TL/AW47P3pm7zQMk+rVSYqtn2DpzUTK3ZPvQFAW8LgxfBmU +k/jWGR1DwDvh7a6gLoPPX2g39rMH4ffL1Xr0jAyuNXoy0RA6AE1dM8U97bIY +ej7n8LjVK9iVLkm7UCGH005z1fmKL+BsaWnf+HV5zHG56dXP6YOhMa8XmsEK +GJZKU2X8Hpgsq7TluCpi8tyBjaMLXWCTOR3wZo0SXs1dGTW59zlw+xV6Ds4p +YQlT7zhNPYOWxI6C3gEWHjSO2D3/6AmkREY4zFVQOBZQmfBM8gg0hnq2yKcp +o+zo5WH2inaoi9CabTqugt/Ue/JdY1th1V7uZ0eeKpbdE5uqcluAI5wIFXLV +UMnYz/abnibw+TY9/fWSGvo7djn41zSC/d55U6lEHY8nTPYrZIuhs8JUSfRY +A8NeqtRVeRJItd1evC17BQaybwUYiupB/rZc/x6eJhq83uoh4T6EPfY+Imm5 +Jub4NGrvfvUALp5L4+3TZWPn0VPTQRX3YencvU9N8WzUj/w+Jz9BBKla9npx +s2z8Qb1kZWmGEFTmijp+mGOjv8VTuvCGEP7zauVPDgts/JVEj+ZdF0JY1sRv +8x/ZuJXHWZMnEMJObl7ZEXkadx2R5DLRQpixU0YPmsbYK6hv6ycEjwMvfzSw +prHDz976Z0MhtO3cqbfw5YcPt0FLi54QtnErO/psaHz4Ikb3o7YQuH8KrBNt +aWwkKQthGkJYjnD4IAM0ciMLEw9/ZqA8viBB6kqjpV+6b8k7BkzCaGx2p7Fz +69WYxUEGbrpdnMn5jsZKc9PAfw0wEKvl6+2750sfZGU+28OAf5aa8VN/GqXx +Y599WxjouRjVWxxIo050ULFQzIDTAWlcXBCNqs7uSzr1DNhwxaMOh2gcj4gv +GahloFjZMsvgRxpTGbfPDlUMcP5Md18IpvGMyaXlO78wkNKpJNcfSmNxvW+h +WikDKpXhNZVHafTU4cxFFDHwPzI7JeU= + "]]}, + "Charting`Private`Tag$19198#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVk3080wkcx2djTKPtx700ShSNriudSiHfbyNKx/TgqawHFS9JJVFyo1fX +KutOdxdX6yJdMcUsD0WH+4kpIvKc3KultdWJaGkeLpz74/36/Pf+/PW2DT+8 +ZT+VQqH4zfD/XuIMKnhLNaSPaLLn3b9spKbRh7U2GnKJaocoUMfGI1Qbq5tm +GtJxrOqkYpiN373fEksbV5MhF+/DbTUb6VXl8xS1anJly12LtBY2nth9JmF9 +qJrsP9q6WHGTjTulVg4bzrwhl1Rl+/b6sdFxpe8FvxevSfva55an81i48lpx +jkD4kmzPpiRIKkzx+7AyE3F1N2mRm4H1PzOR12Jr+KN9K3n1d/0YaY4xChNf +GSToaskH1NzgsToj1Cocq7K23yGds5hXGc6GGHrWVPztdTm8Y85pOM03wGj+ +2daMBY/AznuCSVtIw7XDAun60lbYeudvhnCzHpr8lb73kuY5hJk/GV1sOQ2J +k2+8j2cpYZ/WqrrX/gusqIts4lmqYK6d8laHeBz4pl8f+1SgAUGXLuGT3iis +YSUtO0ztB2lIt4tENQKPzSVR6dcH4b0i/8bGTi3Msjkd8zZjGJitbrECo49g +SUwtO7BWCwPNrcs5pkOQZNBX9NBoBIQHhla52g6AZ6C4KvneZ7CUZCVHy/+B +nblXz7POjsLg3v3Lfgh4Cz3izUNL/MchIFP/0Li7Gioam5WFoxMQebuSDD+l +giGTkosGdV/A1nONp++zPhAXCBoexk2B+91dc55GvALe4WC+vgkFBQ8JjSP/ +Jbw7X8IhtBR0cuhwMOrrhZpn2ry2x3p4Lp3hlUv2wHqJ+rJQTsXJFY5i1+Bu +OJGf3zH4Kw3b0nxLA107Qfl+WxcrUh97u/JLnOPbYaigyMXazwAXpUSvnqho +BedrHwUvF9LRJzzTdY/vM+B26rft1dFRpy6lexo2gyKtMaf9hSHGOXGkQSGN +kJ4Q76GTG+GIj67EX1UPpsq2VbTLDBwm6ULjlEdQEW82UnPIGI3nKYtZyQqY +E8Sd9uHNwnUGREBmeQ1Yl32IKuMysctufq5oqhpCvCWSnkkm7lBJU9ssSHAL +GnXQqE1QlaaazPSuhGa5A728wRQTAiqjRpoeQIbL2jz3rNlYtwniYh6UAS2b +2hnIY+E6jp1kV8k9CHQLKdfIWGi0/c+GfkoppCRd5m23YGNvFtfn+KlimEy6 ++6UmlY191IQCG0YRZJi5cUQjbDxXu1Ebek0Oxjpp456ZrmR90x6Dv8jh1HPz +ZI8xNlrEPfERnZPDwcwPr0dnOkzlDd2qPSoHL+4fBQdoBIKyiUjcKAetKwMD +CAK9vuok6kYLISC8O8LKiUD65P0bbcGF8MjLizO2nMCncSzOhF8huHOLGjuc +Cdz2hDZ7kVchcAfETmkuBEpwftwFp0KYiveYoACBvbG59RcYhSBLzflJ40eg +f7ZienelDBYcJLCWTyD1pHVMS7EMrvinaK9vJlDqmbOad1sGZ8xCg0MDCaw/ +olSu+E0GYZlM26YwAilbOtz9j8igLSWxPW8ngf2xY3uUETLYEK4RiXYTeKJU +7+kxgQycudX9HvsIVA+FXinwlUEe45tMqwgCN+UOD/ivk4H1gIQ/FjnzNzdG +9NlFBunNdGpn1IwvqCEse6kMjIviSouiCeSZbxXy7WXwH0XiQQ4= + "]]}, + "Charting`Private`Tag$19198#4"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVkmk8lQkbxm3PscQZ51FTIlHTnJpqKsSU4b7nRPU2ZCjFWJLEW0jZ10wN +BkkmW5JOWU+cM8dOIx6hVIx97c3OkeyHLIXG++H6XR/+v+v/6VKzczW9KCYi +IuK0lv93jOJENet7AaV1p28s6T0DxaJo00JVARVxykyePsjAq2KqSqkKAgq2 +uwXe7Gag4ZjpNfGlYarUr3GvWzMDaWUlW6qrhin7a1fqnJ8x0Mc22MvAYpj6 +oj25pz6agTaZSjuPBw9RLgv+E4d1GLjr4IlbRm8HqLKYAVZ4vDwefJCXbh3Y +Qy0P2DLO3adjgFWxXERFB3VGvcvx4zVZZDWoSUbuaKKashI2bQiXwUDfPsJr +voo6wu86V5YthcLqXWUPf82iZjQaot5vlsQXg7I+xW5PqD/qaXre6yXxnti0 +emMEhwr3DayUokuiLhZxREszqDsZywaaopIYVsqKtVdKpXT9NBV4IzTUsy9u +P12SQDlsluN8U0jDB0SMhjHpCbhsKNhmSkPaV35W4SYBoD0UVSNtSMMfInMq +z7+6Ac8aWsxmDWj4OC5hLEkyHIQtIR71h2h4uDVPRaoqBj7KB99LU6NhbPw4 +p/1uHCintFCPlGg4af6tRrpdAmxQdY9gb6BhanfiMZZYEsyuNkukS9Mw1B1/ +KFd9DDkHbzs3zBCYf9o6MF0qBWI1GyL7xgjsO+hXGTmdAvZ1TUfnhgnUWcw3 +tKxIAx7b8vftbwn8b1fjnyxOOjhkhIhDK4Hxf0+074rOgNJ3hZus6wmsSpJR +ZvhkAlOaeh74isDpAOb5xXMc0Pb3WHlUSeAWG/2M3mNP4J9bHrx/nhJ4As6P +vdyXBQdsY5Z0cwhME03yjPuSDaWDBdm7kwm0CKVHqLP5kHvLBHW8CUwyD4py +/SkHpk58S8y7EChzZaHDID8H1MdmhAX2BI7cG7ksjM+FHKl1LDAlMGWyJvpn +m3ww+p7yC9lL4Mb7Ye9WxovgZiHnWfuQBIrOSHvYyZTD+M9H+oLOSKCTcWhT +3LaXEHY4c0eEgTjqTltnGhQ0Abvm5KtoV1GUK4+9ECPohMk2zptrRl/Ad2Xo +qPfDXjjEG6m6YbIMmi8c61ibB+Gu51VmNH8JjOm7PWa5AkiTGW2q2LoAh+T9 +97mKfQAr+6sLzp/noGZ94qVY9gTQ8/JPqY4IYZ3qTZeRuGkY0JK2fLl+BjaT +q/su6wqh7LdupdAtU+BP9Oc+l5qDtyJqIfuZ43DELKLseuFHMO3fJLqbNwo2 +GffD5EMXIPzZ2OcFgxHoijCZ2nNyCWTB6lPHd8NQWlvf+9fCJ+jTbxh46DgI +U3L5d4gXyxD63iyyKqcfIrjWr5+7r4L9orLYqZ/6gOV61lhCTgSnPE567Vjq +hvdh+YqkUASt6CUbk4P+B5WNQk5zjSiKZz01UnPuAoPE4YRAvhiq9Yj+ccCh +A3yys1sn7orjzKN1jq7xbdA7drpd3lECb0Z/p+NS3gJT3FxtFaO1X7mMlwmE +TaDxYMa6ZzsN1Qf8Nkq5NQKzTaL5wjwNE6V9TFJ16qE6qja95a0kPu7/2rY7 +tRZivTz15vlSuOe65+wF79dA723WEk+QRkfNi6veFjVQ6qkwV3lFBi3ZU85K +MS9g0xnml2Osdaj6uzmqiFaDSvHkpWKmLNbe2RYcaVsJ5kcTE7tWZPG2+XT5 +aF8F6JxZ2CkYlsPmETP98NZyqOfvpJW8pmM8o78qqLkU4rR1OT8+/AqTpegh +W42egvgjsTYzljx+sMuWy+4sAjMd8xIBTx5Vrgdc2PqmAIL8E1i/bmSgfUmn +U/JiHqz45yxXhjPwzyHa2Xj1XIhT0FEMmWNgxm4/nyUnPsjMZ9aen2dgUl6i +st05PvzWuf663iIDt6RxIhtN+eCcPDmw8JmByr2BdeWH+KDPTOFeFifxYk/K +jT5JPggPS+MvJIm7XKfPaqX/Bb/YdTgo7SexarjFWnGIBy/19RUXD5D4dNGN +rdXJgx+ZubWtGiR6Fc1YWNTxgDkesT9Km8SsaEkNfgEPVj31PokAibOXEvc/ +COEBLzz9tsCIxJQFORXfnTzY5rzmNiax93NR47gyD+6dDBKyTUjcZ5vbcpHB +g2AFi7MWZiRWjC6+cfzEBatkWbU6KxLvqh3fkV3HheYg3xaOzRrn/L39P8+5 +cNxOEBJiS6JlwKjteCEXNJgVH/TsSXxiyA5hsbnAkd6brOSwto+0dv8YwwWV +8UTjRUcSWe9bb/PCuBBbTxNru0RiTyjx7nIgF2Ry3QtynUgc1myx2uvGhX8B +JfQo1w== + "]]}, "Charting`Private`Tag$19198#5"]}}, {}}, {{{{}, {}, + + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$406993#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.055558602887325205`, + 4.777412990517233}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.055558602887325205`, 4.777412990517233}}}}, DisplayFunction -> + Identity, AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[10]}, {0, 5}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4vbl4aeMchwcvuz7uDXdTNbhDe8+g5leCH6E ++PaLDG4ODqlpICDjcDE/nv2cpYNDOoh7TBKiXsvB4WD3viYTZkmH45pWk07L +Q/VPk3D48630wZyJ9nA+2Bwze1R5Rls43+fixJh/wbYO8rsW7EtdJ+lw4rDT +2kw+O4c3bbndRrtlHJ5naX+bHmvn8B8E7ss6FG8V/X1azMGBPzbgvpG7kgPM +P3c0Zdf8b1aG8x+BPPJAFc4/BTJ3nobDkTagwCF7B5Eer1csJVoOEvPiNE8n +2MH5JSDz/9nA+U8TF14z0bdxSI6948YsoQHnz5jAX2XGrQbni4LUX1Fx8DnB +bjt7K4J/HGTvPgQfZj6MDw5vP1uHJ2BzVOH8wFvSNYmfEPwXoHCYqwYJL2Fb +h7+gcBRUh5sP45sYA8FiBP8MCMxB8MH6J8Pcrw4x/5yNw2bzH4dSVmk4HACF +T5Gtw4+3rw9YHtZ0qP1tVXDOwg7Oj1Fw/JhsYw/nTwWZc9sear4GnA8Lfxh/ +JgjcVIaEj6s9JD2JKTl82BCQPWu6nUM4p1i7cb8CPDzd1hxdzhAhBueD/WUs +6rC/VtYi3cUBzkdPzwA7R0nA + "]]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYCYh7/9VNSKxwc3rTldhtFyzrA+GuFdPjS7yk4 +7LzV9TeV3cEhPQ0Ipik58LipljK9snMoP7zNdeZfJYcl9/fxzfls75ABlld2 +eJK48JqJv4ODaI/XK5YQVTj/xK4dvWwG6nB+wC3pmkQhTQefixNj/i22dxAB +qS/Rctiil7eYscYOzld50jzvrJctnK/xlnefQaaNw38w0IDzJaZe4cxwUofz +WTi75JP91Bw+bAjInnXcxuFFlva36bJqDj4n2G1nf0Xjm9rC+SVbRX+frrN1 +2OHQ9Oh4BYIPcz+Mb2IMBJ/V4frrflsVnPPQcBAHueOTDZwPduZ9BJ8DFH63 +EHyZeXGapy/A3K/hoK+1UviCi62Duc3eoGkPNSHhm2wH5x9oWx5+qgjBB/vv +OoIfIb79IsM8e4dUUHy0Ifgw98P4G0DhvEcNYt8Ue4c0MFB1iFFw/JhsY+/A +AAIJKg4SIPc9sHMAedc4WNlBHRS+lXYOK7+9rDjjoOxwVeiT43k1O4fK+z9u +GVsrO0yZwF9ldtrW4cOi9QpnNZQd6lmO9htOt3XotPHclaYEle+2dTgDAjII +/t78mrcznyrB+WD9K5Qctpj/OJQyC8EHJQOTiwj+c1C8xdrB+WD3JtjD+WD/ +XbGHplcFOB8cPmmycP6OYKuI/+rikPhktXeIUY2QOVcjCom/fDs4H2zfXVs4 +H5wOHts4tCqwq56ZIgZJr102kPy0WxISnm9sIPmpThIev9NnAkGkFJx/3zXe +cZagDJxvADK3GOo+Fluoe+UcnoLyz3obOP8LOIMi+OD4ELOBuG+PLJwPDu83 +0nC+wq4F+1LXiUP0qUHTs7EIPH5hfHD+fGwP58PKB/VPKi9ndUo4oJcfAPoy +yPg= + "]]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQLe/4MflMr4OD+ieVl7M0ZR1g/Ir7P24Zd8s51LMc +7Td8bo/Bl1n+wkNPXgvOD7glXZM4CcH/8630wZyNWg4xCkAD9yD4Phcnxvxb +jOCrPmmed3YWgi8+9QpnRpO9w5xFyjv/pGs5bNDLW8z4xhpuP4wPc++Jw05r +M/nsMfjGIHBZAs7vi+j2ZxQQd+DxXz8llcPeoVWBXfXMFDGHGTOBQNMOzj8D +Am9sMfgmYANFHQ60LQ8/ZWTnUAVyj7coxD/K9nC++lvefQaVCH7JVtHfp88h ++ImHL2unJjrA+VO+scXPaHGAmw/jw+yPEN9+kSENwc9f03074wPC/bDwhvkP +xof5H8ZHj18YHwDMfN7/ + "], {{31.117199999999997`, + 7.635939999999998}, {28.220299999999995`, 7.635939999999998}, { + 31.117199999999997`, 12.1297}, {31.117199999999997`, + 7.635939999999998}}}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{1, 4, 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}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQzeO/fkpqhYPDGRB4I+cA43faeO5KW6TkoK+1UvjC +FXsHM5u9QdMOqjgsub+Pb85iOzjf5+LEmH+TbeH8/uASlen6tg7K1x4FM7xR +cpCZF6d5WsDWYeW3lxVnHBD8vfk1b2c+RfDXqz5pnvdWA2J/h52DOci8h5oO +NpURK0x17eF8kLKzsxD8/bWyFuksDg4nDjutzZyn6ZB4+LJ2qqKDgwdI4rmG +w5ru2xkM/Aj+FvMfh1JW2WPwN4DtV0eVT1d3SIi948Z8w97BxBgIPqs52Dc9 +Oj5D2AHOv5gfz37OEsEHOfdssIMDC2eXfLKfOpz/HwwQ/MntrVGXbTQh+iUd +HER6vF6xlGg58LipljJp2cP5M2YCwUpbOP+q0CfH82I2Do8ixLdfTFCH88Hx +paQE5+8Itor4ry4Oib8WW4j7jEXg4Qvjw+IXRR4Y/2/acruNdks4oKcPAFnp +5a8= + "], CompressedData[" +1:eJxTTMoPSmViYGAQA2IQnZoGBN/sHebMBIKfcg4wfsX9H7eMu2Xg/HQQnSbl +EKPg+DF5j73Dl30ft6ZPk3DIX9N9O6PA3qEKpN5bzEF86hXODCZ7hxjVCJlz +NaIOPP7rp6R22MH5KbF33JhP2ML5YPNybB12BFtF/FeXcOjxesViEgjjSzr4 +nGC3nW1qC7e/nuVov6G4rcObttxuo90ycP77ResVznIowPnVIPe8VnTQ11op +fKHF1sFjf62shbuKw4cNAdmzptvB+b3BJSrT7e3h/ASQ+2bYO+zNr3k7M1UZ +Yv9RqP+nKcHD446m7Jr/mxXhfGMQaFZwQA9PAP4Uj50= + "]}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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, 4, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQAWIQzeO/fkpqhYNDjGqEzDkZWQcYv/zwNteZfxUc3vDu +M5jJ5eDwHwT4lRyuCn1yPK9m7yBSOankrImyQ29wicr0/fYOM0HgprLDk8SF +10z8HRwCb0nXJH5SgfNNjIHgsxqcn5oGBGyaDhHi2y8yzAOa1+P1iqVEy+EG +UJtRqx2cX89ytN8w3BbO13gLdFCmjYOuovyXnG0acP6MCfxVZt1qcP4GvbzF +jHtUHT5sCMie1W7j8Kp4q+jv1yoOtpURK0zv2jhMaW+Nuiyj4lACFD79zwbi +37PKDn++lT6Yw2jrIBAbcN/ouDLE/uu2DsrXHgUzzFFyeApy/3obiH87FSHh +IWbjEPL28scZD+XhfLD/0mTgfLc1R5czRIg7qDxpnnfWyxYSHsYiDktfeOj9 +b7SD8/W1VgpfuGIP58Pi401bbreRtIQDenwBALIeuC0= + "], {{ + 32.12969999999999, 11.462499999999999`}, {32.12969999999999, + 10.7359}, {31.604699999999998`, 10.151600000000002`}, { + 30.914100000000005`, 9.770310000000002}, {29.5313, 10.6766}, { + 29.376599999999993`, 10.782799999999998`}, {28.899999999999995`, + 11.093800000000002`}, {28.899999999999995`, 11.6781}, { + 28.899999999999995`, 12.4516}, {29.709400000000002`, + 12.940600000000002`}, {30.507799999999992`, + 12.940600000000002`}, {31.367199999999997`, + 12.940600000000002`}, {32.12969999999999, 12.3219}, { + 32.12969999999999, 11.462499999999999`}}, {{32.392199999999995`, + 6.8968799999999995`}, {32.392199999999995`, + 5.9906299999999995`}, {31.473399999999994`, + 5.371880000000001}, {30.52029999999999, 5.371880000000001}, { + 29.507799999999992`, 5.371880000000001}, {28.637500000000003`, + 6.110939999999999}, {28.637500000000003`, 7.099999999999999}, { + 28.637500000000003`, 8.02969}, {29.3172, 8.781249999999998}, { + 30.09059999999999, 9.139059999999999}, {31.5344, + 8.196879999999998}, {31.843799999999987`, 7.993750000000002}, { + 32.392199999999995`, 7.624999999999999}, {32.392199999999995`, + 6.8968799999999995`}}}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.804411210355846*^9, 3.804411332134406*^9, + 3.804412326494021*^9, 3.804412361552855*^9, 3.804421926444778*^9, + 3.804422025757352*^9, 3.804422153519125*^9, 3.8044223639226913`*^9, + 3.80447825702629*^9, 3.804593581152606*^9}, + CellLabel->"Out[78]=",ExpressionUUID->"1aeed3df-dfd2-4395-87a3-9358fff0e6e5"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "4"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "6"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "8"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "10"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "3.4"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8044124093014936`*^9, 3.8044124160573683`*^9}, { + 3.804422204504033*^9, 3.8044222136621*^9}, {3.80442233738172*^9, + 3.8044223446218233`*^9}, {3.804477292545328*^9, 3.804477351045836*^9}, { + 3.804477720917039*^9, 3.804477722394449*^9}, {3.80459328994411*^9, + 3.804593301490787*^9}}, + CellLabel->"In[79]:=",ExpressionUUID->"92c59298-abbe-4495-b886-07d739dec292"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\ +\", RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"15.994805464778288`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"4.799480490252695`\\\", \\\" \\\", \\\ +\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"4.265743143762268`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"7.9982683945542545`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"4.799480490252695`\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 79, 5, 22585916483268483227, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412417248725*^9, 3.804422215442954*^9, + 3.8044223646277018`*^9, 3.80447735861695*^9, 3.804477726768167*^9, + 3.804593584699297*^9}, + CellLabel-> + "During evaluation of \ +In[79]:=",ExpressionUUID->"6ab4bc26-fccc-4b5f-9e97-0229a5bb7b4c"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"191.91689193397647`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\ +\", RowBox[{\\\"31.993073578217018`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"383.79224107793954`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"156.29209911297642`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"7.94199747791815`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\ +\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"146.22239385445826`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"15.670076854636907`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"8.913567780099573`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"191.91689193397647`\\\"}], \\\"+\\\", \ +RowBox[{\\\"63.986147156434036`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\ +\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"156.29209911297642`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"15.8839949558363`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"15.670076854636907`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 79, 6, + 22585916483268483227, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412417248725*^9, 3.804422215442954*^9, + 3.8044223646277018`*^9, 3.80447735861695*^9, 3.804477726768167*^9, + 3.804593584883134*^9}, + CellLabel-> + "During evaluation of \ +In[79]:=",ExpressionUUID->"c91718de-f00b-4724-8c66-c668683092e4"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"9210.01686681965`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"+\\\", RowBox[{\\\"1727.2520274057883`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"79.98268394554255`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"+\\\", \ +RowBox[{\\\"18418.040111332986`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"8529.568488025869`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"645.0119686262573`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"11.304803641154646`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \\\"\[Lambda]\ +\\\"}], \\\"+\\\", RowBox[{\\\"8198.13156381398`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1329.4042681518908`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"36.02825088622227`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"793.1528166052334`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"44.0735851244593`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"18.418965937661717`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"9210.01686681965`\\\"}], \\\"+\\\", \ +RowBox[{\\\"3454.5040548115767`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\ +\", RowBox[{\\\"239.94805183662766`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"8529.568488025869`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"1290.0239372525145`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"33.91441092346393`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"1329.4042681518908`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"72.05650177244453`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"44.0735851244593`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 79, 7, + 22585916483268483227, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412417248725*^9, 3.804422215442954*^9, + 3.8044223646277018`*^9, 3.80447735861695*^9, 3.804477726768167*^9, + 3.80459358511229*^9}, + CellLabel-> + "During evaluation of \ +In[79]:=",ExpressionUUID->"329ce5e1-96cf-4365-98a0-d01f4c0ffba7"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 79, 8, 22585916483268483227, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412417248725*^9, 3.804422215442954*^9, + 3.8044223646277018`*^9, 3.80447735861695*^9, 3.804477726768167*^9, + 3.804593585271764*^9}, + CellLabel-> + "During evaluation of \ +In[79]:=",ExpressionUUID->"b0d8485d-1619-4553-9103-bc2a1bfe2224"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwVzH081AccwPFzOLmc8VPLuTGZXldTEpE8fb+7aBlCzcOJMrWUHtSkMurM +Qy/OkjvnhSmk5FaKi/Aq/HSeMl7KUx7akNwlPRwXh4qt/fF5ff57rw6L3PUz +lUKheH3u/2cy3zZxLOVkQjPdrGQjHanptCmlqZzc36FW1WROxxNUU9Y1Azl5 +3NziiZxJR8/Xu06qL8jIpFeXLtlr0JFWV2Pc1CgjXx6woBGD2ng2NOm0G1dG +Zn2buCkvURv3lrDW7kgaJ8tG+gsWni3DdbY/pHkNjZF2M5OeCblaaHv5bnHI +uWHSuv7RocCVmhgXXM3gN/STN5M0imkfqMh5vFrr9zVdpMzy7/4iYzU8FzOq +eVrVSLakKWJW5i2BsmldXX7QTXKzk8quXvARuBd0+dYFZaBatU2LnT8PR7wv +dGWZtYCDSdSeL7VU4DwVUuJW2QVF3Bd2hc/eA6NetD9TPgABS6EXVfXTELM4 +vv1M/ghwd1da8GYUsLk5vINj9AICeqs9knvfgLeuxan3pXKYjoyLan30Crbq +xW6MpE6CXNMwoNzxJbSuyD0sKngLuxk0HX7DOCw3TTj2MmsK5rcGVNEyx8CI +WNoY4ayE8lM+m6bIUYjVfC55uGwGnCZypljKf2CbH7/u/L1ZuJc44gDzQ7D3 +xh8pehfmgHGStXzaYAAG+b6K9TsXoG+AxzrA74MH7Z0jd+Y+gDdn8xH3iB5Q +MCouaTZ/AtEZ8ehgYBfwS0PaHkYtwVmPyRwzx8fAiQzw1mBQMPTjku+0RQdM +pFQwCSUF2/Kuhz+2agPpE6W4u1UNUbM2rVTSAm65suxzZVRsZhvNebg2wdlb +t3rfCtXR2KvZaNZMCiOvf3yqF66BqoloW2ZQAyhKJVtMvDTxRKpbxXWHOrC5 +PB0y/A0N/WxYh6S+94Hdp9G9X0VDLXdhpYCshqb09uKeIS2cYJZelznfA9Hp +aBdV2TKkuLulHDOvAN2Rbjv1bG1cebvFPZ8pgQfRBjPS43SMJwqP97TeAUN/ +9r/fc5aj2F2onie9BSbV7w5Xs3Ww6tHWG5FdYgjcnps7uKiDhlzr9rKgG+Do +P7dWLmNgCiMx7M/Za9BZtpZW06aLtsYTcbXPrkLWFmexU/4XyC3aZ2nCLAT1 +QmqfH0cPc4p1eCbNl8HPMbBGflsP39cyvq6Q5wIvNpsTtEoft/U+FA6FZMNi +bPknaao+Ck6sqeHJRJBl4MhMntHH4VmvpOEeIdBVJe0/qfTxafCntq/ahRA/ +sOK8y7w+Ntp7mu2TCuHolXdjcx/1cTzGWX2qXAiu7KLSCHUCf03J9OWkC0Hp +oI0+BIFq8QFxJe5C8AnrP8iyItBIpGCGNwqgxdWVOb+JQF61IdP8gQCc2JL2 +XhsC7WqVivG7AmC/4VulbyHQ2FJk/EuRAJaiXT5QgECN1Krt938TwO3U4oty +r8+eJM6V8p0AzI4S2OhNYEWtzuSCvQBydvKUBb4EtnobesxZCSDJgBvA9SNw +j5vEftFUAMFXdFZ3BBMYapIgsFUTQDcvpke897MfET/muZABO8LkycmhBCqz +NzwPn84AG3bDpMsBAkfi6kbFzzNArL3hCusggR1X7YY7BzPA5E2u93w4geuT +0hLmuzJA1Emj9h0m0Npfu2PNXxlAl0RVSo4Q6LNiqcZfmgH/AS8qQLo= + "]]}, + Annotation[#, "Charting`Private`Tag$411220#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0vs3lAkYwPExk0limFdbyebSbVRbaZHVxfOcCdspQhlROKJYyVqrsWTR +5j4u7whZcinlUibTbMQmvWHiWFKGSnaXkOGMhEkuhbb94Xu+/8DHyDvoyGk6 +jUaz/9L/z9Adk3K3yyk8yE64v0UN6WnMCaWhnIon1WcrDNXwJ7qh3nUdOVWr +kGeVrlRDu9EjwYy5IWou2NWpmK6GzLqatdLGIWpWpfKyrGcphnnFhtq4DVG2 +4449yuSl6FmqZ3wg9g3V6RTpbTXJxM3mB5PtewaoS7v4N280q6J53h/FHpG9 +lMENrSeb+Az81b1aU/DoJUUdGvcNiFFB7lOjpSkbO6jevecDE7I/Q2T4a9XQ +6Uaq4b0FTWE1D0rp5rqC47eo1yEdD2KC58AtniX4tlAMvNynJiY10xDgEN+R +ta4JtpuzROg8BfsmPEptKjuAdOxILjyqBM2HmT4Z8m64U5EnLfGagPCFN7a/ +FPRBW3vXWknkGJg99mvjrhmEqGIrtt8VBTiwtp57L5LDeTNxXkvrMFhqR+wI +oivg0gl9ihU8BM0rcvwzC8dA48SkYGDTICw3vBg4nDUBW4zZf7pv6Ic1xOKO +M/uUIG629MlS9EKEar+kXm0KHtyTrpwt+hv28wR1UVUf4ESup6xnsBs8S3IT +teNnYC/HUlD03Qt4JXAa/+bwHETTds1t7e+E2tb2voqZj2DfRNdjjnbAuOZd +UvXxPHxqSpH505+BQOTRUh+yCFxJXEmhrA24QccclmjSUPQVOSD73AIjiXd1 +CSUNN4yYRyZBMzQ8U5bJmlVwNjn5jHhSCjY5Q9mRYjrWM8Y0LSsbIKy8vGvs +EgNFi+qnxx88gr5R5xfafkvwiamPUd72hzAukljo26siGYOJJXP3wTRv0qN3 +PRMbNiXFmx2sAc7zJTKfaSbyV5c/lCqqQJrWWtz5xU3BaFxCRu5dyAzlW02L +1fCcvIybeksCrD7ZLkb2MkwUBk5+LRRDLV9nquFHdZz3T601+0EEq104n7/n +Lsf6NvbclYKboF/9zr+ao4GrqodDYodLwNU2J+fVggbW3Qrr9Lt2A/a4zBjL +hzRR5beohpKAImgXGzNrWlj4j11nlVnEVciy2Fe2t0AL7ToupJXfywfGVfpz +HlcbbUxH7ExSc4G3x7VGflsbu4wvXvcdzoboiGzu8VVsHO3vT7kszIKFiDvz +DUlsrC83LFg8kAFZOnt046bYqNxWecHMKx3Up0tbT06z0cVnrMjANR0udK+I +sppl45V13gksx3Q4m/9uYOYTG/kKmnAG0sGaUyQ6wyCwpvFo0LRBOih3L0NH +gsDDKR8Gil8LwdH7pa+eCYEuAda3qVNCaLK21p3dSWBT2MlGAw/hFzeS1i5T +ArM/Op+O4QmB81ZgkmZBIH8bx5ZnK4RFvtVHGhBYMRFuv95YCLeTilPl9gT6 +v/xLvb2bhHVnCWx0IHDhhePmxRYSfj8crSx0InCg9uet5rUkxOq4HXPjEXhI +dP9JdT4J7vkaRm3uBE7eUdmp5UOCLDq8s8yTwKNjdJ1QZxIOeMvj4rwIXJXJ +oQZtSDDlPFJYnSKwfmq3f6cxCWXLtuXr+RJYtf9fL94aEvTf5jjM+hE4slF9 +Ze9yEjLbmfTn/gRasArjAhfSQF0SUikJIPDam/Mixnga/AdqaUzO + "]]}, + Annotation[#, "Charting`Private`Tag$411220#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVx3k41AkYwHFmMqMcjd/U43ryKFtDh1HjqJT3bUJ2S6NjEosNleRqV6yb +rdiarZ/ZsJpy1ebYXA151JYGjZEdj0KELLJmakU0OaZC2/7xfT7Pd2VAxP5j +FA0NDfcv/W+G8biUa62U8C1Sy6tS6EghaZMqc6VEyrKSj0fT8RTF3PR3plIy +9ZqnXh9Gxz1v9n9P/aCQfKQcj6v1oiOt7u4K6SOFJCE27+3cJjrGHDkX7eKl +kAz39pi7KWnoV2xq6XZuREJvDVvxjEdDK7tvfnHvG5aI9vXan7DWQrucqkLf +xAHJ1vLHmjvGKJjgU6snqH8use8fTeRoayL3yUr6xdXtEjDXYnHvLUBi7JBW +9MwjSUxkwBV2zCdQSa3q8rxvSWYPtN9LeagGrzR9wab8Sji1wfWwp9EMhPDS +2rNWyaDKWm63pek9bJ/0LXa50w6eWZ+aKzregd7DzMAMZQ+cZWtv7u2bgNj5 +Edcf8wYhPNd7hFMxBrZNQa1ck3+gXDZqZzv0L/D0151+X6aEsKamB75fvYIt +jHh2BGUUuqI6Ejh9I9C8TBScmT8Olk2BJywKhkHH/EzYq6xJmK42vNZQOgQm +xAL75HYVvP9LrmQYDEC81ktxg/YUnG+R9acN9cFOvqAuqWYapsT18Q9se8Cv +6Op5RtosCHb7mO3O6YJewb6J9Xs/wJqHdPZefifcl7cNVsx+hPUVNc7Toe0w +oVedrtU0B5DUEHDJ4gkIynxbGiIXgPH1a81ueitwIzx5i/Q0kLUr/7rSrQVe +n682JlQa6IHc79TXZND4VFXS0ayJYRQ676CfFFxEiuzESgqWmVgWFtg0Qkxp +6bPxy1TM8DGdXrerHgbfHOxmBC3CzZ7Na7nedTBRJnYwc9dC+WlZRr/jn8DJ +eec7YEHDs5oJDrz8WmB1LeoInKHhxQfX1/7qUQNSUl7Y2UfHk527w4oY1ZAZ +HeU0U6mNMb+x6VxrMegPdthTsxdj+A6THp2qCrgfxZxqDF+COgUhTzwLSsHo +EOvzLq7Olz9z+9vREjCrfRtcy9LF1m32uX6uRXDYVSTqndfF8LBAwQ7GTXA8 +NGupVOghM7tiUnf0OrRVWtLutujjGg/mPaAXQJbD9pJteUsxiZoQmavIAWoB +pYvPZeCJnx//4N8hAr7j4bvKcgYeGNiQsBmyITk+m+ttaIA3nqoi/1Znwnz8 +7bnGCwb4si0umddwGbKYjsapUwaoIb3pNaUQwpKZYrn/jAEu3VTvaTQghJSe +ZUlOagN8wSmch24hhOa+HZ79ZICn5J+3XJUJwZl1o+wklcDVIaRLXLEQVFsX +owdBYFCeL/tVsBA8Ap4fN7UhsBqk/u3D6SBzdjZWbySQ3cjsmetMh20ssfwZ +h8DpP6xs2U3pwBoT2JAOBCqNuoQlxemwEOX0UQMI/Ky4c2Y8NB3KLxReUroT +2FjQ/FOdmoRVoQQ+4hHodkzazR8l4creZFX+PgIDBkYGpl6QcI7p5enFJ1CW +ZjrnKiHBJ1d3ZasPgXv645iOaSR0JMd2lvgR2L6z6JZ2DAluAcrU1CMELje2 +6e8PJoHDqh91OkogUWNIEbmTULJ4Q67pcQJ9/PmTKUCC2ZiIpw4i0NBFHBqx +kYTMNhqlK5jAtpdmp49akLBEHHlHHEJgqkUG9chyEv4DBJ9BRg== + "]]}, + Annotation[#, "Charting`Private`Tag$411220#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVzn080wkcwPE1NinEjzt5yOXhGlZyduXVie+3hdS1VK+WhxvVVF56chUK +iQrH2KxMrFcSTnRIilaX9QtLeenFISWvk/KwRB5a2jy1e/jj83r/+7HlR+48 +QKVQKJz/+t9sizEF20VJno/Zf0hmpIdUEX1StVxJbtZeGbal6eGv1OVWxaZK +UjhexBfP0XHr6M7jOjNDJMchbWPsMB3p8vvLFI1DZId9jCCugY6n9ybH+AQN +kcX5Yvm6U3QMLbVy9EseJCM3P9tXMEBDpzVbMjg9/aRbYI151VNdXHP1TklI +whsyKXptY7yYimd4MkPB41fkl6S2RmktBdlttnqZ37eTa9mPlRsctJAQ+5YW +o24kmezX5zSqWVApnOTXgv8gzTyjWEm+0xCUaiRwK6gC3kx17erKL3DYP7U9 +x64JqvQfPQg48Bk8J0NKfWra4ZdusSmc+QSGjyRh2cpusAkeTefhBMR+HfQ9 +da0PWCdq/K3tP8KPT8Kfsy0HwLJwQHaP/wH8jZhRnyuUoM7VZ9vVKGGdcfzq +SOoIRJgVyonoQXhqJo2QFIyB2PIAp82nHxYvP3/0fc4kyPPq1wwHvwVLQrv6 +kKcK9rB7uZjYC/G0d9X1C6eA12a6ySW0BzZyBfKztV8g2cD720DyFYTeuJJm +nKqBgRt8swRWF7wW7JhYuW0GntXi6QxNBzxsae27pZmFefeVyhNL22HC8G4W +7ck8xBo+L07PbAVBRUhz/UkttN6msIcSW4AdGeCva0jBsw28Ed/WZzCcdteC +UFGQ6Uzu2enSBA1/qco6ni5Aa9k0J3OuEXykQ7kJVVTc5dPMjeiuh9Pl5S/G +LulgpzO/LmqShL7RXS+Nw3XxZu825+GWOpioqHa34dAwqmnzpaK6B8C6+ink +jT0dS03CEsmVMmB06XaEqemYQczsdftQAwpRS0lnjx6OaN+Xu9bcAUlMtJe6 +aiEuOXWxbqLnNhj1dazVydVH6X7lRZdlt+BhtOlUw7FFqG/dPM2zLIeluxn/ +bGIvxtG4y3Gpx8vARjYeIWMY4JHyFfUBPSUQ6CuVvv5qgGl+kcypW8XgsVvj +qBwyxN7mc8PM7EJorXKk3282wsE5mt/CkwWQ4+5Ztv7aElyVOWEXG3QVdK5T +u7hsY1zGlGtXcKXA9Qi8r6w0xsqxfkVc62VIjM9lB5ub4O+j5VpGtgS+xt+e +b0g3wfexm5KDD16CHFMPi5QpE/yt52YtRSKGRerSln1qE5xkHmvfkimGpG6z +s17TJkgoNlzISxbDkfzxfs2cCR7LO1zkFS0Gb0ZRxSEdAgPe+F6v3S0G1U/6 +uJ0gcIVG4MixFMN2/quDVq4EzopOGLr4ZUGTt7fF9A8EujHeRRauy4L1jOqW +FywClcVFl62YWcD4KHAVuRNYNp7m4GCUBdpor1kKEHj3m+9GUl6IoDK9RKjk +EEjfujQsnS8CuyMENvoTSA1yl4TvEkHetkRVwQ4C7ZnzAVt9RZBsGhQQxCXQ +2t4rw8lZBLx8A9vnPAJZ6rCf3VRC6EiM7SwLJdD8SXid96AQ/PjKlJS9BN5j +KUpDXgqBxXg84rWfwKMO8e+K/hRCmf6qfKuDBOps6HRqqxCCzUep/3T4f3+u +iW8XFAhB0kqndkUQ6OJ1jupxUQiLqk/WVB8m8G/z3sy4C0L4F6WtPp8= + "]]}, + Annotation[#, "Charting`Private`Tag$411220#4"]& ], + TagBox[ + {RGBColor[0.285821, 0.56, 0.450773], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAkxntxEIu5r/hdUFjNOoGQAKOBvDy +IOa/+PWgDq7gBkBwAiAboxPmv4P5gq8r1wZATOtScQP55b9HIjrLMsQGQAa9 +uB3Ew+W/N2CMPHCeBkB4YIR2RVnlv7pctpmmUwZAXqcbKEiE5L85CB759cAF +QCk1SotN2uK/VMfiTcemBEA1nLKlXX3ev0vWviQWcwJAfFy3DYrA17/L0QEh +JJsAQELPIQeMJdG/svSgG4f0/T99eeAFdvbDv92JbedKyPo/8sQpvZ5aqr81 +vGd1DyD4P1mGDooyn68/9exYgNyK9T9rT4bRlSLGPwv6iwqhRvM/PfBdp0W0 +0T/1vuLhjmDxPw2+lGOT5tg/Zlrk3N8O7z95/eRGd57fP+eQsReO9us/NMVn +zEIa4z/VecnrgzrpP08OK3TzrOY/VFg7qy6Q5j85EHsvbwLqP4fTf8StVOQ/ +xxSZaZSf7T/Q9hbu3yjiPwsggm3nlfA/alRAMAJB4D8aEv4vaj3yP+LgztSK +UN0/ewXhscEI9D8Iv3FHbTTaP0NVir1+tfU/evDxXb2Z1z9eppqIEIb3Pz4b +zJTqEdU/2YpR7yxO+T9rCdimgtnSP7vLzt+u9/o/pKVcvGD90D/vDbOPBcX8 +P/esoLcpXM4/iqxdycFz/j+CRv99WVTLP0JvV08EDQBAnoNwK/+myD/oiLMZ +EvIAQNCPk60yC8Y/wtDyqNLHAUB1pp7E59vDP0WZ5Zd9rwJAhNZKMie8wT94 +q6vU7ZIDQK3mRzbhvb8/3+tU1hBnBECRZsSnTp68P++ssTceTQVAYGrzYeGT +uT8znPFd3iMGQO6sEuoMCLc/J9UE0mP2BkBgX76FFci0P8SOy6XT2gdArv6w +gpKWsj+UdnU+9q8IQITKl/o+wLA/Dt/SNgOXCUC7Ygv7fu2tP7t1E/TCbgpA +SbLm+3Hvqj8YVif/R0ILQJ2ZSZvRSqg/HrfuabcnDEAxpFIKvbelP1hGmZnZ +/QxAA3LR68iPoz87Vvco5uUNQO6xdGlXd6E/zq8oBrjJDkC/5xJeO0GfP5U3 +Pag8ng9A/K5z1ZQsnD8DoALVVUIQQPDKJ6wJLZk/VTtYuOatEEAqZw92XaqW +P397l0JaFxFAQ5iBYpNylD/9e7D8wokRQDJiY5w3SZI/lRM7GYX0EUBWB75G +wHmQPwr2p8th9hFAYSMxmBZykD+A2BR+PvgRQLTDBXpwapA/bJ3u4vf7EUCt +8DLoLluQP0QnoqxqAxJAOq9jQNY8kD/yOglAUBISQI0N13DNAJA/UGLXZhsw +EkD+R//+pBaPP8ZERBn4MRJANvFnay8Ijz88J7HL1DMSQMBWbJHA+Y4/J+yK +MI43EkB/58b99tyOP/51PvoAPxJA92WKALSjjj+tiaWN5k0SQIK7QflrMo4/ +ImwSQMNPEkANWTmLYCSOP5hOf/KfURJAFT1upVsWjj+EE1lXWVUSQEs4amZl ++o0/XJ0MIcxcEkCijPLFxsKNP9J/edOoXhJAlAUSRe+0jT9IYuaFhWASQOQa +SDQep40/MyfA6j5kEkCRYv9Wj4uNP6gJLZ0bZhJAVbOHhNF9jT8e7JlP+GcS +QFfcNBYacI0/lM4GAtVpEkB65A0JaWKNPwqxc7SxaxJAfzQbWr5UjT/Cp0x0 + + "]]}, + Annotation[#, "Charting`Private`Tag$411220#5"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$713656#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4vbl4aeMchwcvuz7uDXdTNbhDe8+g5leCH6E ++PaLDG4ODqlpICDjcDE/nv2cpYNDOoh7TBKiXsvB4WD3viYTZkmH45pWk07L +Q/VPk3D48630wZyJ9nA+2Bwze1R5Rls43+fixJh/wbYO8rsW7EtdJ+lw4rDT +2kw+O4c3bbndRrtlHJ5naX+bHmvn8B8E7ss6FG8V/X1azMGBPzbgvpG7kgPM +P3c0Zdf8b1aG8x+BPPJAFc4/BTJ3nobDkTagwCF7B5Eer1csJVoOEvPiNE8n +2MH5JSDz/9nA+U8TF14z0bdxSI6948YsoQHnz5jAX2XGrQbni4LUX1Fx8DnB +bjt7K4J/HGTvPgQfZj6MDw5vP1uHJ2BzVOH8wFvSNYmfEPwXoHCYqwYJL2Fb +h7+gcBRUh5sP45sYA8FiBP8MCMxB8MH6J8Pcrw4x/5yNw2bzH4dSVmk4HACF +T5Gtw4+3rw9YHtZ0qP1tVXDOwg7Oj1Fw/JhsYw/nTwWZc9sear4GnA8Lfxh/ +JgjcVIaEj6s9JD2JKTl82BCQPWu6nUM4p1i7cb8CPDzd1hxdzhAhBueD/WUs +6rC/VtYi3cUBzkdPzwA7R0nA + "]]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYCYh7/9VNSKxwc3rTldhtFyzrA+GuFdPjS7yk4 +7LzV9TeV3cEhPQ0Ipik58LipljK9snMoP7zNdeZfJYcl9/fxzfls75ABlld2 +eJK48JqJv4ODaI/XK5YQVTj/xK4dvWwG6nB+wC3pmkQhTQefixNj/i22dxAB +qS/Rctiil7eYscYOzld50jzvrJctnK/xlnefQaaNw38w0IDzJaZe4cxwUofz +WTi75JP91Bw+bAjInnXcxuFFlva36bJqDj4n2G1nf0Xjm9rC+SVbRX+frrN1 +2OHQ9Oh4BYIPcz+Mb2IMBJ/V4frrflsVnPPQcBAHueOTDZwPduZ9BJ8DFH63 +EHyZeXGapy/A3K/hoK+1UviCi62Duc3eoGkPNSHhm2wH5x9oWx5+qgjBB/vv +OoIfIb79IsM8e4dUUHy0Ifgw98P4G0DhvEcNYt8Ue4c0MFB1iFFw/JhsY+/A +AAIJKg4SIPc9sHMAedc4WNlBHRS+lXYOK7+9rDjjoOxwVeiT43k1O4fK+z9u +GVsrO0yZwF9ldtrW4cOi9QpnNZQd6lmO9htOt3XotPHclaYEle+2dTgDAjII +/t78mrcznyrB+WD9K5Qctpj/OJQyC8EHJQOTiwj+c1C8xdrB+WD3JtjD+WD/ +XbGHplcFOB8cPmmycP6OYKuI/+rikPhktXeIUY2QOVcjCom/fDs4H2zfXVs4 +H5wOHts4tCqwq56ZIgZJr102kPy0WxISnm9sIPmpThIev9NnAkGkFJx/3zXe +cZagDJxvADK3GOo+Fluoe+UcnoLyz3obOP8LOIMi+OD4ELOBuG+PLJwPDu83 +0nC+wq4F+1LXiUP0qUHTs7EIPH5hfHD+fGwP58PKB/VPKi9ndUo4oJcfAPoy +yPg= + "]]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQLe/4MflMr4OD+ieVl7M0ZR1g/Ir7P24Zd8s51LMc +7Td8bo/Bl1n+wkNPXgvOD7glXZM4CcH/8630wZyNWg4xCkAD9yD4Phcnxvxb +jOCrPmmed3YWgi8+9QpnRpO9w5xFyjv/pGs5bNDLW8z4xhpuP4wPc++Jw05r +M/nsMfjGIHBZAs7vi+j2ZxQQd+DxXz8llcPeoVWBXfXMFDGHGTOBQNMOzj8D +Am9sMfgmYANFHQ60LQ8/ZWTnUAVyj7coxD/K9nC++lvefQaVCH7JVtHfp88h ++ImHL2unJjrA+VO+scXPaHGAmw/jw+yPEN9+kSENwc9f03074wPC/bDwhvkP +xof5H8ZHj18YHwDMfN7/ + "], {{31.117199999999997`, + 7.635939999999998}, {28.220299999999995`, 7.635939999999998}, { + 31.117199999999997`, 12.1297}, {31.117199999999997`, + 7.635939999999998}}}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{1, 4, 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}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQzeO/fkpqhYPDGRB4I+cA43faeO5KW6TkoK+1UvjC +FXsHM5u9QdMOqjgsub+Pb85iOzjf5+LEmH+TbeH8/uASlen6tg7K1x4FM7xR +cpCZF6d5WsDWYeW3lxVnHBD8vfk1b2c+RfDXqz5pnvdWA2J/h52DOci8h5oO +NpURK0x17eF8kLKzsxD8/bWyFuksDg4nDjutzZyn6ZB4+LJ2qqKDgwdI4rmG +w5ru2xkM/Aj+FvMfh1JW2WPwN4DtV0eVT1d3SIi948Z8w97BxBgIPqs52Dc9 +Oj5D2AHOv5gfz37OEsEHOfdssIMDC2eXfLKfOpz/HwwQ/MntrVGXbTQh+iUd +HER6vF6xlGg58LipljJp2cP5M2YCwUpbOP+q0CfH82I2Do8ixLdfTFCH88Hx +paQE5+8Itor4ry4Oib8WW4j7jEXg4Qvjw+IXRR4Y/2/acruNdks4oKcPAFnp +5a8= + "], CompressedData[" +1:eJxTTMoPSmViYGAQA2IQnZoGBN/sHebMBIKfcg4wfsX9H7eMu2Xg/HQQnSbl +EKPg+DF5j73Dl30ft6ZPk3DIX9N9O6PA3qEKpN5bzEF86hXODCZ7hxjVCJlz +NaIOPP7rp6R22MH5KbF33JhP2ML5YPNybB12BFtF/FeXcOjxesViEgjjSzr4 +nGC3nW1qC7e/nuVov6G4rcObttxuo90ycP77ResVznIowPnVIPe8VnTQ11op +fKHF1sFjf62shbuKw4cNAdmzptvB+b3BJSrT7e3h/ASQ+2bYO+zNr3k7M1UZ +Yv9RqP+nKcHD446m7Jr/mxXhfGMQaFZwQA9PAP4Uj50= + "]}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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, 4, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQAWIQzeO/fkpqhYNDjGqEzDkZWQcYv/zwNteZfxUc3vDu +M5jJ5eDwHwT4lRyuCn1yPK9m7yBSOankrImyQ29wicr0/fYOM0HgprLDk8SF +10z8HRwCb0nXJH5SgfNNjIHgsxqcn5oGBGyaDhHi2y8yzAOa1+P1iqVEy+EG +UJtRqx2cX89ytN8w3BbO13gLdFCmjYOuovyXnG0acP6MCfxVZt1qcP4GvbzF +jHtUHT5sCMie1W7j8Kp4q+jv1yoOtpURK0zv2jhMaW+Nuiyj4lACFD79zwbi +37PKDn++lT6Yw2jrIBAbcN/ouDLE/uu2DsrXHgUzzFFyeApy/3obiH87FSHh +IWbjEPL28scZD+XhfLD/0mTgfLc1R5czRIg7qDxpnnfWyxYSHsYiDktfeOj9 +b7SD8/W1VgpfuGIP58Pi401bbreRtIQDenwBALIeuC0= + "], {{ + 32.12969999999999, 11.462499999999999`}, {32.12969999999999, + 10.7359}, {31.604699999999998`, 10.151600000000002`}, { + 30.914100000000005`, 9.770310000000002}, {29.5313, 10.6766}, { + 29.376599999999993`, 10.782799999999998`}, {28.899999999999995`, + 11.093800000000002`}, {28.899999999999995`, 11.6781}, { + 28.899999999999995`, 12.4516}, {29.709400000000002`, + 12.940600000000002`}, {30.507799999999992`, + 12.940600000000002`}, {31.367199999999997`, + 12.940600000000002`}, {32.12969999999999, 12.3219}, { + 32.12969999999999, 11.462499999999999`}}, {{32.392199999999995`, + 6.8968799999999995`}, {32.392199999999995`, + 5.9906299999999995`}, {31.473399999999994`, 5.371880000000001}, { + 30.52029999999999, 5.371880000000001}, {29.507799999999992`, + 5.371880000000001}, {28.637500000000003`, 6.110939999999999}, { + 28.637500000000003`, 7.099999999999999}, {28.637500000000003`, + 8.02969}, {29.3172, 8.781249999999998}, {30.09059999999999, + 9.139059999999999}, {31.5344, 8.196879999999998}, { + 31.843799999999987`, 7.993750000000002}, {32.392199999999995`, + 7.624999999999999}, {32.392199999999995`, + 6.8968799999999995`}}}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #5}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.285821, 0.56, 0.450773], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.19054733333333335`, 0.3733333333333334, + 0.30051533333333336`], FrameTicks -> None, + PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.285821`", ",", "0.56`", ",", "0.450773`"}], + "]"}], 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.285821, 0.56, 0.450773]; + 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.285821, 0.56, 0.450773], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {-2.3025850929940455`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-2.3025850929940455`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[10]}, {0, 3.4}}, {{-0.6931471805599453, 2.302585092994046}, { + 0, 3.4}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVzH081AccwPFzOLmc8VPLuTGZXldTEpE8fb+7aBlCzcOJMrWUHtSkMurM +Qy/OkjvnhSmk5FaKi/Aq/HSeMl7KUx7akNwlPRwXh4qt/fF5ff57rw6L3PUz +lUKheH3u/2cy3zZxLOVkQjPdrGQjHanptCmlqZzc36FW1WROxxNUU9Y1Azl5 +3NziiZxJR8/Xu06qL8jIpFeXLtlr0JFWV2Pc1CgjXx6woBGD2ng2NOm0G1dG +Zn2buCkvURv3lrDW7kgaJ8tG+gsWni3DdbY/pHkNjZF2M5OeCblaaHv5bnHI +uWHSuv7RocCVmhgXXM3gN/STN5M0imkfqMh5vFrr9zVdpMzy7/4iYzU8FzOq +eVrVSLakKWJW5i2BsmldXX7QTXKzk8quXvARuBd0+dYFZaBatU2LnT8PR7wv +dGWZtYCDSdSeL7VU4DwVUuJW2QVF3Bd2hc/eA6NetD9TPgABS6EXVfXTELM4 +vv1M/ghwd1da8GYUsLk5vINj9AICeqs9knvfgLeuxan3pXKYjoyLan30Crbq +xW6MpE6CXNMwoNzxJbSuyD0sKngLuxk0HX7DOCw3TTj2MmsK5rcGVNEyx8CI +WNoY4ayE8lM+m6bIUYjVfC55uGwGnCZypljKf2CbH7/u/L1ZuJc44gDzQ7D3 +xh8pehfmgHGStXzaYAAG+b6K9TsXoG+AxzrA74MH7Z0jd+Y+gDdn8xH3iB5Q +MCouaTZ/AtEZ8ehgYBfwS0PaHkYtwVmPyRwzx8fAiQzw1mBQMPTjku+0RQdM +pFQwCSUF2/Kuhz+2agPpE6W4u1UNUbM2rVTSAm65suxzZVRsZhvNebg2wdlb +t3rfCtXR2KvZaNZMCiOvf3yqF66BqoloW2ZQAyhKJVtMvDTxRKpbxXWHOrC5 +PB0y/A0N/WxYh6S+94Hdp9G9X0VDLXdhpYCshqb09uKeIS2cYJZelznfA9Hp +aBdV2TKkuLulHDOvAN2Rbjv1bG1cebvFPZ8pgQfRBjPS43SMJwqP97TeAUN/ +9r/fc5aj2F2onie9BSbV7w5Xs3Ww6tHWG5FdYgjcnps7uKiDhlzr9rKgG+Do +P7dWLmNgCiMx7M/Za9BZtpZW06aLtsYTcbXPrkLWFmexU/4XyC3aZ2nCLAT1 +QmqfH0cPc4p1eCbNl8HPMbBGflsP39cyvq6Q5wIvNpsTtEoft/U+FA6FZMNi +bPknaao+Ck6sqeHJRJBl4MhMntHH4VmvpOEeIdBVJe0/qfTxafCntq/ahRA/ +sOK8y7w+Ntp7mu2TCuHolXdjcx/1cTzGWX2qXAiu7KLSCHUCf03J9OWkC0Hp +oI0+BIFq8QFxJe5C8AnrP8iyItBIpGCGNwqgxdWVOb+JQF61IdP8gQCc2JL2 +XhsC7WqVivG7AmC/4VulbyHQ2FJk/EuRAJaiXT5QgECN1Krt938TwO3U4oty +r8+eJM6V8p0AzI4S2OhNYEWtzuSCvQBydvKUBb4EtnobesxZCSDJgBvA9SNw +j5vEftFUAMFXdFZ3BBMYapIgsFUTQDcvpke897MfET/muZABO8LkycmhBCqz +NzwPn84AG3bDpMsBAkfi6kbFzzNArL3hCusggR1X7YY7BzPA5E2u93w4geuT +0hLmuzJA1Emj9h0m0Npfu2PNXxlAl0RVSo4Q6LNiqcZfmgH/AS8qQLo= + "]]}, + "Charting`Private`Tag$411220#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0vs3lAkYwPExk0limFdbyebSbVRbaZHVxfOcCdspQhlROKJYyVqrsWTR +5j4u7whZcinlUibTbMQmvWHiWFKGSnaXkOGMhEkuhbb94Xu+/8DHyDvoyGk6 +jUaz/9L/z9Adk3K3yyk8yE64v0UN6WnMCaWhnIon1WcrDNXwJ7qh3nUdOVWr +kGeVrlRDu9EjwYy5IWou2NWpmK6GzLqatdLGIWpWpfKyrGcphnnFhtq4DVG2 +4449yuSl6FmqZ3wg9g3V6RTpbTXJxM3mB5PtewaoS7v4N280q6J53h/FHpG9 +lMENrSeb+Az81b1aU/DoJUUdGvcNiFFB7lOjpSkbO6jevecDE7I/Q2T4a9XQ +6Uaq4b0FTWE1D0rp5rqC47eo1yEdD2KC58AtniX4tlAMvNynJiY10xDgEN+R +ta4JtpuzROg8BfsmPEptKjuAdOxILjyqBM2HmT4Z8m64U5EnLfGagPCFN7a/ +FPRBW3vXWknkGJg99mvjrhmEqGIrtt8VBTiwtp57L5LDeTNxXkvrMFhqR+wI +oivg0gl9ihU8BM0rcvwzC8dA48SkYGDTICw3vBg4nDUBW4zZf7pv6Ic1xOKO +M/uUIG629MlS9EKEar+kXm0KHtyTrpwt+hv28wR1UVUf4ESup6xnsBs8S3IT +teNnYC/HUlD03Qt4JXAa/+bwHETTds1t7e+E2tb2voqZj2DfRNdjjnbAuOZd +UvXxPHxqSpH505+BQOTRUh+yCFxJXEmhrA24QccclmjSUPQVOSD73AIjiXd1 +CSUNN4yYRyZBMzQ8U5bJmlVwNjn5jHhSCjY5Q9mRYjrWM8Y0LSsbIKy8vGvs +EgNFi+qnxx88gr5R5xfafkvwiamPUd72hzAukljo26siGYOJJXP3wTRv0qN3 +PRMbNiXFmx2sAc7zJTKfaSbyV5c/lCqqQJrWWtz5xU3BaFxCRu5dyAzlW02L +1fCcvIybeksCrD7ZLkb2MkwUBk5+LRRDLV9nquFHdZz3T601+0EEq104n7/n +Lsf6NvbclYKboF/9zr+ao4GrqodDYodLwNU2J+fVggbW3Qrr9Lt2A/a4zBjL +hzRR5beohpKAImgXGzNrWlj4j11nlVnEVciy2Fe2t0AL7ToupJXfywfGVfpz +HlcbbUxH7ExSc4G3x7VGflsbu4wvXvcdzoboiGzu8VVsHO3vT7kszIKFiDvz +DUlsrC83LFg8kAFZOnt046bYqNxWecHMKx3Up0tbT06z0cVnrMjANR0udK+I +sppl45V13gksx3Q4m/9uYOYTG/kKmnAG0sGaUyQ6wyCwpvFo0LRBOih3L0NH +gsDDKR8Gil8LwdH7pa+eCYEuAda3qVNCaLK21p3dSWBT2MlGAw/hFzeS1i5T +ArM/Op+O4QmB81ZgkmZBIH8bx5ZnK4RFvtVHGhBYMRFuv95YCLeTilPl9gT6 +v/xLvb2bhHVnCWx0IHDhhePmxRYSfj8crSx0InCg9uet5rUkxOq4HXPjEXhI +dP9JdT4J7vkaRm3uBE7eUdmp5UOCLDq8s8yTwKNjdJ1QZxIOeMvj4rwIXJXJ +oQZtSDDlPFJYnSKwfmq3f6cxCWXLtuXr+RJYtf9fL94aEvTf5jjM+hE4slF9 +Ze9yEjLbmfTn/gRasArjAhfSQF0SUikJIPDam/Mixnga/AdqaUzO + "]]}, + "Charting`Private`Tag$411220#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVx3k41AkYwHFmMqMcjd/U43ryKFtDh1HjqJT3bUJ2S6NjEosNleRqV6yb +rdiarZ/ZsJpy1ebYXA151JYGjZEdj0KELLJmakU0OaZC2/7xfT7Pd2VAxP5j +FA0NDfcv/W+G8biUa62U8C1Sy6tS6EghaZMqc6VEyrKSj0fT8RTF3PR3plIy +9ZqnXh9Gxz1v9n9P/aCQfKQcj6v1oiOt7u4K6SOFJCE27+3cJjrGHDkX7eKl +kAz39pi7KWnoV2xq6XZuREJvDVvxjEdDK7tvfnHvG5aI9vXan7DWQrucqkLf +xAHJ1vLHmjvGKJjgU6snqH8use8fTeRoayL3yUr6xdXtEjDXYnHvLUBi7JBW +9MwjSUxkwBV2zCdQSa3q8rxvSWYPtN9LeagGrzR9wab8Sji1wfWwp9EMhPDS +2rNWyaDKWm63pek9bJ/0LXa50w6eWZ+aKzregd7DzMAMZQ+cZWtv7u2bgNj5 +Edcf8wYhPNd7hFMxBrZNQa1ck3+gXDZqZzv0L/D0151+X6aEsKamB75fvYIt +jHh2BGUUuqI6Ejh9I9C8TBScmT8Olk2BJywKhkHH/EzYq6xJmK42vNZQOgQm +xAL75HYVvP9LrmQYDEC81ktxg/YUnG+R9acN9cFOvqAuqWYapsT18Q9se8Cv +6Op5RtosCHb7mO3O6YJewb6J9Xs/wJqHdPZefifcl7cNVsx+hPUVNc7Toe0w +oVedrtU0B5DUEHDJ4gkIynxbGiIXgPH1a81ueitwIzx5i/Q0kLUr/7rSrQVe +n682JlQa6IHc79TXZND4VFXS0ayJYRQ676CfFFxEiuzESgqWmVgWFtg0Qkxp +6bPxy1TM8DGdXrerHgbfHOxmBC3CzZ7Na7nedTBRJnYwc9dC+WlZRr/jn8DJ +eec7YEHDs5oJDrz8WmB1LeoInKHhxQfX1/7qUQNSUl7Y2UfHk527w4oY1ZAZ +HeU0U6mNMb+x6VxrMegPdthTsxdj+A6THp2qCrgfxZxqDF+COgUhTzwLSsHo +EOvzLq7Olz9z+9vREjCrfRtcy9LF1m32uX6uRXDYVSTqndfF8LBAwQ7GTXA8 +NGupVOghM7tiUnf0OrRVWtLutujjGg/mPaAXQJbD9pJteUsxiZoQmavIAWoB +pYvPZeCJnx//4N8hAr7j4bvKcgYeGNiQsBmyITk+m+ttaIA3nqoi/1Znwnz8 +7bnGCwb4si0umddwGbKYjsapUwaoIb3pNaUQwpKZYrn/jAEu3VTvaTQghJSe +ZUlOagN8wSmch24hhOa+HZ79ZICn5J+3XJUJwZl1o+wklcDVIaRLXLEQVFsX +owdBYFCeL/tVsBA8Ap4fN7UhsBqk/u3D6SBzdjZWbySQ3cjsmetMh20ssfwZ +h8DpP6xs2U3pwBoT2JAOBCqNuoQlxemwEOX0UQMI/Ky4c2Y8NB3KLxReUroT +2FjQ/FOdmoRVoQQ+4hHodkzazR8l4creZFX+PgIDBkYGpl6QcI7p5enFJ1CW +ZjrnKiHBJ1d3ZasPgXv645iOaSR0JMd2lvgR2L6z6JZ2DAluAcrU1CMELje2 +6e8PJoHDqh91OkogUWNIEbmTULJ4Q67pcQJ9/PmTKUCC2ZiIpw4i0NBFHBqx +kYTMNhqlK5jAtpdmp49akLBEHHlHHEJgqkUG9chyEv4DBJ9BRg== + "]]}, + "Charting`Private`Tag$411220#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVzn080wkcwPE1NinEjzt5yOXhGlZyduXVie+3hdS1VK+WhxvVVF56chUK +iQrH2KxMrFcSTnRIilaX9QtLeenFISWvk/KwRB5a2jy1e/jj83r/+7HlR+48 +QKVQKJz/+t9sizEF20VJno/Zf0hmpIdUEX1StVxJbtZeGbal6eGv1OVWxaZK +UjhexBfP0XHr6M7jOjNDJMchbWPsMB3p8vvLFI1DZId9jCCugY6n9ybH+AQN +kcX5Yvm6U3QMLbVy9EseJCM3P9tXMEBDpzVbMjg9/aRbYI151VNdXHP1TklI +whsyKXptY7yYimd4MkPB41fkl6S2RmktBdlttnqZ37eTa9mPlRsctJAQ+5YW +o24kmezX5zSqWVApnOTXgv8gzTyjWEm+0xCUaiRwK6gC3kx17erKL3DYP7U9 +x64JqvQfPQg48Bk8J0NKfWra4ZdusSmc+QSGjyRh2cpusAkeTefhBMR+HfQ9 +da0PWCdq/K3tP8KPT8Kfsy0HwLJwQHaP/wH8jZhRnyuUoM7VZ9vVKGGdcfzq +SOoIRJgVyonoQXhqJo2QFIyB2PIAp82nHxYvP3/0fc4kyPPq1wwHvwVLQrv6 +kKcK9rB7uZjYC/G0d9X1C6eA12a6ySW0BzZyBfKztV8g2cD720DyFYTeuJJm +nKqBgRt8swRWF7wW7JhYuW0GntXi6QxNBzxsae27pZmFefeVyhNL22HC8G4W +7ck8xBo+L07PbAVBRUhz/UkttN6msIcSW4AdGeCva0jBsw28Ed/WZzCcdteC +UFGQ6Uzu2enSBA1/qco6ni5Aa9k0J3OuEXykQ7kJVVTc5dPMjeiuh9Pl5S/G +LulgpzO/LmqShL7RXS+Nw3XxZu825+GWOpioqHa34dAwqmnzpaK6B8C6+ink +jT0dS03CEsmVMmB06XaEqemYQczsdftQAwpRS0lnjx6OaN+Xu9bcAUlMtJe6 +aiEuOXWxbqLnNhj1dazVydVH6X7lRZdlt+BhtOlUw7FFqG/dPM2zLIeluxn/ +bGIvxtG4y3Gpx8vARjYeIWMY4JHyFfUBPSUQ6CuVvv5qgGl+kcypW8XgsVvj +qBwyxN7mc8PM7EJorXKk3282wsE5mt/CkwWQ4+5Ztv7aElyVOWEXG3QVdK5T +u7hsY1zGlGtXcKXA9Qi8r6w0xsqxfkVc62VIjM9lB5ub4O+j5VpGtgS+xt+e +b0g3wfexm5KDD16CHFMPi5QpE/yt52YtRSKGRerSln1qE5xkHmvfkimGpG6z +s17TJkgoNlzISxbDkfzxfs2cCR7LO1zkFS0Gb0ZRxSEdAgPe+F6v3S0G1U/6 +uJ0gcIVG4MixFMN2/quDVq4EzopOGLr4ZUGTt7fF9A8EujHeRRauy4L1jOqW +FywClcVFl62YWcD4KHAVuRNYNp7m4GCUBdpor1kKEHj3m+9GUl6IoDK9RKjk +EEjfujQsnS8CuyMENvoTSA1yl4TvEkHetkRVwQ4C7ZnzAVt9RZBsGhQQxCXQ +2t4rw8lZBLx8A9vnPAJZ6rCf3VRC6EiM7SwLJdD8SXid96AQ/PjKlJS9BN5j +KUpDXgqBxXg84rWfwKMO8e+K/hRCmf6qfKuDBOps6HRqqxCCzUep/3T4f3+u +iW8XFAhB0kqndkUQ6OJ1jupxUQiLqk/WVB8m8G/z3sy4C0L4F6WtPp8= + "]]}, + "Charting`Private`Tag$411220#4"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAkxntxEIu5r/hdUFjNOoGQAKOBvDy +IOa/+PWgDq7gBkBwAiAboxPmv4P5gq8r1wZATOtScQP55b9HIjrLMsQGQAa9 +uB3Ew+W/N2CMPHCeBkB4YIR2RVnlv7pctpmmUwZAXqcbKEiE5L85CB759cAF +QCk1SotN2uK/VMfiTcemBEA1nLKlXX3ev0vWviQWcwJAfFy3DYrA17/L0QEh +JJsAQELPIQeMJdG/svSgG4f0/T99eeAFdvbDv92JbedKyPo/8sQpvZ5aqr81 +vGd1DyD4P1mGDooyn68/9exYgNyK9T9rT4bRlSLGPwv6iwqhRvM/PfBdp0W0 +0T/1vuLhjmDxPw2+lGOT5tg/Zlrk3N8O7z95/eRGd57fP+eQsReO9us/NMVn +zEIa4z/VecnrgzrpP08OK3TzrOY/VFg7qy6Q5j85EHsvbwLqP4fTf8StVOQ/ +xxSZaZSf7T/Q9hbu3yjiPwsggm3nlfA/alRAMAJB4D8aEv4vaj3yP+LgztSK +UN0/ewXhscEI9D8Iv3FHbTTaP0NVir1+tfU/evDxXb2Z1z9eppqIEIb3Pz4b +zJTqEdU/2YpR7yxO+T9rCdimgtnSP7vLzt+u9/o/pKVcvGD90D/vDbOPBcX8 +P/esoLcpXM4/iqxdycFz/j+CRv99WVTLP0JvV08EDQBAnoNwK/+myD/oiLMZ +EvIAQNCPk60yC8Y/wtDyqNLHAUB1pp7E59vDP0WZ5Zd9rwJAhNZKMie8wT94 +q6vU7ZIDQK3mRzbhvb8/3+tU1hBnBECRZsSnTp68P++ssTceTQVAYGrzYeGT +uT8znPFd3iMGQO6sEuoMCLc/J9UE0mP2BkBgX76FFci0P8SOy6XT2gdArv6w +gpKWsj+UdnU+9q8IQITKl/o+wLA/Dt/SNgOXCUC7Ygv7fu2tP7t1E/TCbgpA +SbLm+3Hvqj8YVif/R0ILQJ2ZSZvRSqg/HrfuabcnDEAxpFIKvbelP1hGmZnZ +/QxAA3LR68iPoz87Vvco5uUNQO6xdGlXd6E/zq8oBrjJDkC/5xJeO0GfP5U3 +Pag8ng9A/K5z1ZQsnD8DoALVVUIQQPDKJ6wJLZk/VTtYuOatEEAqZw92XaqW +P397l0JaFxFAQ5iBYpNylD/9e7D8wokRQDJiY5w3SZI/lRM7GYX0EUBWB75G +wHmQPwr2p8th9hFAYSMxmBZykD+A2BR+PvgRQLTDBXpwapA/bJ3u4vf7EUCt +8DLoLluQP0QnoqxqAxJAOq9jQNY8kD/yOglAUBISQI0N13DNAJA/UGLXZhsw +EkD+R//+pBaPP8ZERBn4MRJANvFnay8Ijz88J7HL1DMSQMBWbJHA+Y4/J+yK +MI43EkB/58b99tyOP/51PvoAPxJA92WKALSjjj+tiaWN5k0SQIK7QflrMo4/ +ImwSQMNPEkANWTmLYCSOP5hOf/KfURJAFT1upVsWjj+EE1lXWVUSQEs4amZl ++o0/XJ0MIcxcEkCijPLFxsKNP9J/edOoXhJAlAUSRe+0jT9IYuaFhWASQOQa +SDQep40/MyfA6j5kEkCRYv9Wj4uNP6gJLZ0bZhJAVbOHhNF9jT8e7JlP+GcS +QFfcNBYacI0/lM4GAtVpEkB65A0JaWKNPwqxc7SxaxJAfzQbWr5UjT/Cp0x0 + + "]]}, "Charting`Private`Tag$411220#5"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$713656#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.014321791767907264`, + 3.2732679996049123`}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.014321791767907264`, 3.2732679996049123`}}}}, DisplayFunction -> + Identity, AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[10]}, {0, 3.4}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.285821, 0.56, 0.450773], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4vbl4aeMchwcvuz7uDXdTNbhDe8+g5leCH6E ++PaLDG4ODqlpICDjcDE/nv2cpYNDOoh7TBKiXsvB4WD3viYTZkmH45pWk07L +Q/VPk3D48630wZyJ9nA+2Bwze1R5Rls43+fixJh/wbYO8rsW7EtdJ+lw4rDT +2kw+O4c3bbndRrtlHJ5naX+bHmvn8B8E7ss6FG8V/X1azMGBPzbgvpG7kgPM +P3c0Zdf8b1aG8x+BPPJAFc4/BTJ3nobDkTagwCF7B5Eer1csJVoOEvPiNE8n +2MH5JSDz/9nA+U8TF14z0bdxSI6948YsoQHnz5jAX2XGrQbni4LUX1Fx8DnB +bjt7K4J/HGTvPgQfZj6MDw5vP1uHJ2BzVOH8wFvSNYmfEPwXoHCYqwYJL2Fb +h7+gcBRUh5sP45sYA8FiBP8MCMxB8MH6J8Pcrw4x/5yNw2bzH4dSVmk4HACF +T5Gtw4+3rw9YHtZ0qP1tVXDOwg7Oj1Fw/JhsYw/nTwWZc9sear4GnA8Lfxh/ +JgjcVIaEj6s9JD2JKTl82BCQPWu6nUM4p1i7cb8CPDzd1hxdzhAhBueD/WUs +6rC/VtYi3cUBzkdPzwA7R0nA + "]]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYCYh7/9VNSKxwc3rTldhtFyzrA+GuFdPjS7yk4 +7LzV9TeV3cEhPQ0Ipik58LipljK9snMoP7zNdeZfJYcl9/fxzfls75ABlld2 +eJK48JqJv4ODaI/XK5YQVTj/xK4dvWwG6nB+wC3pmkQhTQefixNj/i22dxAB +qS/Rctiil7eYscYOzld50jzvrJctnK/xlnefQaaNw38w0IDzJaZe4cxwUofz +WTi75JP91Bw+bAjInnXcxuFFlva36bJqDj4n2G1nf0Xjm9rC+SVbRX+frrN1 +2OHQ9Oh4BYIPcz+Mb2IMBJ/V4frrflsVnPPQcBAHueOTDZwPduZ9BJ8DFH63 +EHyZeXGapy/A3K/hoK+1UviCi62Duc3eoGkPNSHhm2wH5x9oWx5+qgjBB/vv +OoIfIb79IsM8e4dUUHy0Ifgw98P4G0DhvEcNYt8Ue4c0MFB1iFFw/JhsY+/A +AAIJKg4SIPc9sHMAedc4WNlBHRS+lXYOK7+9rDjjoOxwVeiT43k1O4fK+z9u +GVsrO0yZwF9ldtrW4cOi9QpnNZQd6lmO9htOt3XotPHclaYEle+2dTgDAjII +/t78mrcznyrB+WD9K5Qctpj/OJQyC8EHJQOTiwj+c1C8xdrB+WD3JtjD+WD/ +XbGHplcFOB8cPmmycP6OYKuI/+rikPhktXeIUY2QOVcjCom/fDs4H2zfXVs4 +H5wOHts4tCqwq56ZIgZJr102kPy0WxISnm9sIPmpThIev9NnAkGkFJx/3zXe +cZagDJxvADK3GOo+Fluoe+UcnoLyz3obOP8LOIMi+OD4ELOBuG+PLJwPDu83 +0nC+wq4F+1LXiUP0qUHTs7EIPH5hfHD+fGwP58PKB/VPKi9ndUo4oJcfAPoy +yPg= + "]]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQLe/4MflMr4OD+ieVl7M0ZR1g/Ir7P24Zd8s51LMc +7Td8bo/Bl1n+wkNPXgvOD7glXZM4CcH/8630wZyNWg4xCkAD9yD4Phcnxvxb +jOCrPmmed3YWgi8+9QpnRpO9w5xFyjv/pGs5bNDLW8z4xhpuP4wPc++Jw05r +M/nsMfjGIHBZAs7vi+j2ZxQQd+DxXz8llcPeoVWBXfXMFDGHGTOBQNMOzj8D +Am9sMfgmYANFHQ60LQ8/ZWTnUAVyj7coxD/K9nC++lvefQaVCH7JVtHfp88h ++ImHL2unJjrA+VO+scXPaHGAmw/jw+yPEN9+kSENwc9f03074wPC/bDwhvkP +xof5H8ZHj18YHwDMfN7/ + "], {{31.117199999999997`, + 7.635939999999998}, {28.220299999999995`, 7.635939999999998}, { + 31.117199999999997`, 12.1297}, {31.117199999999997`, + 7.635939999999998}}}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{1, 4, 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}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQzeO/fkpqhYPDGRB4I+cA43faeO5KW6TkoK+1UvjC +FXsHM5u9QdMOqjgsub+Pb85iOzjf5+LEmH+TbeH8/uASlen6tg7K1x4FM7xR +cpCZF6d5WsDWYeW3lxVnHBD8vfk1b2c+RfDXqz5pnvdWA2J/h52DOci8h5oO +NpURK0x17eF8kLKzsxD8/bWyFuksDg4nDjutzZyn6ZB4+LJ2qqKDgwdI4rmG +w5ru2xkM/Aj+FvMfh1JW2WPwN4DtV0eVT1d3SIi948Z8w97BxBgIPqs52Dc9 +Oj5D2AHOv5gfz37OEsEHOfdssIMDC2eXfLKfOpz/HwwQ/MntrVGXbTQh+iUd +HER6vF6xlGg58LipljJp2cP5M2YCwUpbOP+q0CfH82I2Do8ixLdfTFCH88Hx +paQE5+8Itor4ry4Oib8WW4j7jEXg4Qvjw+IXRR4Y/2/acruNdks4oKcPAFnp +5a8= + "], CompressedData[" +1:eJxTTMoPSmViYGAQA2IQnZoGBN/sHebMBIKfcg4wfsX9H7eMu2Xg/HQQnSbl +EKPg+DF5j73Dl30ft6ZPk3DIX9N9O6PA3qEKpN5bzEF86hXODCZ7hxjVCJlz +NaIOPP7rp6R22MH5KbF33JhP2ML5YPNybB12BFtF/FeXcOjxesViEgjjSzr4 +nGC3nW1qC7e/nuVov6G4rcObttxuo90ycP77ResVznIowPnVIPe8VnTQ11op +fKHF1sFjf62shbuKw4cNAdmzptvB+b3BJSrT7e3h/ASQ+2bYO+zNr3k7M1UZ +Yv9RqP+nKcHD446m7Jr/mxXhfGMQaFZwQA9PAP4Uj50= + "]}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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, 4, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQAWIQzeO/fkpqhYNDjGqEzDkZWQcYv/zwNteZfxUc3vDu +M5jJ5eDwHwT4lRyuCn1yPK9m7yBSOankrImyQ29wicr0/fYOM0HgprLDk8SF +10z8HRwCb0nXJH5SgfNNjIHgsxqcn5oGBGyaDhHi2y8yzAOa1+P1iqVEy+EG +UJtRqx2cX89ytN8w3BbO13gLdFCmjYOuovyXnG0acP6MCfxVZt1qcP4GvbzF +jHtUHT5sCMie1W7j8Kp4q+jv1yoOtpURK0zv2jhMaW+Nuiyj4lACFD79zwbi +37PKDn++lT6Yw2jrIBAbcN/ouDLE/uu2DsrXHgUzzFFyeApy/3obiH87FSHh +IWbjEPL28scZD+XhfLD/0mTgfLc1R5czRIg7qDxpnnfWyxYSHsYiDktfeOj9 +b7SD8/W1VgpfuGIP58Pi401bbreRtIQDenwBALIeuC0= + "], {{ + 32.12969999999999, 11.462499999999999`}, {32.12969999999999, + 10.7359}, {31.604699999999998`, 10.151600000000002`}, { + 30.914100000000005`, 9.770310000000002}, {29.5313, 10.6766}, { + 29.376599999999993`, 10.782799999999998`}, {28.899999999999995`, + 11.093800000000002`}, {28.899999999999995`, 11.6781}, { + 28.899999999999995`, 12.4516}, {29.709400000000002`, + 12.940600000000002`}, {30.507799999999992`, + 12.940600000000002`}, {31.367199999999997`, + 12.940600000000002`}, {32.12969999999999, 12.3219}, { + 32.12969999999999, 11.462499999999999`}}, {{32.392199999999995`, + 6.8968799999999995`}, {32.392199999999995`, + 5.9906299999999995`}, {31.473399999999994`, + 5.371880000000001}, {30.52029999999999, 5.371880000000001}, { + 29.507799999999992`, 5.371880000000001}, {28.637500000000003`, + 6.110939999999999}, {28.637500000000003`, 7.099999999999999}, { + 28.637500000000003`, 8.02969}, {29.3172, 8.781249999999998}, { + 30.09059999999999, 9.139059999999999}, {31.5344, + 8.196879999999998}, {31.843799999999987`, 7.993750000000002}, { + 32.392199999999995`, 7.624999999999999}, {32.392199999999995`, + 6.8968799999999995`}}}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.804412439232978*^9, 3.804422238431555*^9, + 3.804422388241411*^9, 3.8044775516636963`*^9, 3.804477923805781*^9, + 3.804593782601119*^9}, + CellLabel->"Out[79]=",ExpressionUUID->"dd3f3285-79c9-4b6e-ba64-b94f50fb689c"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + SqrtBox["R"], " ", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "2"}], "]"}]}], ",", + RowBox[{ + SqrtBox["R"], " ", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "3"}], "]"}]}], ",", + RowBox[{ + SqrtBox["R"], " ", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "4"}], "]"}]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "10"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "5"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8045938577121563`*^9, 3.804593907119954*^9}}, + CellLabel->"In[81]:=",ExpressionUUID->"c134c56c-5719-49bf-818c-5c0ec16aaded"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"58.650505578070764`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"18.6637805951158`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"44.78857168517361`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"6.3986147156434034`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"18.6637805951158`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 81, 13, + 22585916483268483227, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804593868432675*^9, 3.804593908476603*^9}, + CellLabel-> + "During evaluation of \ +In[81]:=",ExpressionUUID->"ef8af98c-88b1-462d-b076-239190ab1a29"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"1829.5453911672455`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"640.8489612094226`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"49.8578065141576`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"-\\\", RowBox[{\\\"1635.0635918080238`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"9.922735458022437`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"358.05178073637705`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"13.605377383101205`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"640.8489612094226`\\\"}], \\\"+\\\", \ +RowBox[{\\\"99.7156130283152`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"19.845470916044874`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 81, 14, 22585916483268483227, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804593868432675*^9, 3.80459390864999*^9}, + CellLabel-> + "During evaluation of \ +In[81]:=",ExpressionUUID->"8f87a303-7d23-4a2d-b471-02d3ed6b2bf4"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"101388.60813123871`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"37343.7143825798`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"3403.8378607206614`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"105.2751843068742`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"98047.96792478973`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"21058.551596143403`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1056.0491772956425`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"13.98769672017702`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"25764.941393080633`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"2896.2900741025637`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"60.50356349324911`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1634.2180214457285`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"68.38965241709113`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"43.620120394027005`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"37343.7143825798`\\\"}], \\\"+\\\", \ +RowBox[{\\\"6807.675721441323`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"315.8255529206226`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"21058.551596143403`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\ +\"}], \\\"+\\\", RowBox[{\\\"41.96309016053106`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"2896.2900741025637`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"121.00712698649822`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"68.38965241709113`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 81, 15, 22585916483268483227, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804593868432675*^9, 3.804593908884354*^9}, + CellLabel-> + "During evaluation of \ +In[81]:=",ExpressionUUID->"a45c0d09-b1c2-4c24-aa3e-d9fd476d21d1"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 81, 16, 22585916483268483227, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804593868432675*^9, 3.804593909050908*^9}, + CellLabel-> + "During evaluation of \ +In[81]:=",ExpressionUUID->"9407f8a1-a721-4105-ab52-46f3378be21d"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwd1wk0lN3/APB5HgwRhpREQssbCqXkVXxvo12WqMj2tr4VSSRJVNY0qWQp +VApFtiiFEo99SzVjN7axDLJTWfq9+F//OWfOnM+5597n3jv3fr/fR/mks/kZ +kkajjeHvwm+Y3HAJU6OXsjnBYQ8dEkTkffrYhFIvFbd5mMk2FUSXSCX5+CW9 +lN6LuYj3xoLo4KC5i8AMn8r7/bL95n5BRM/LWVlSzKdCtNymlHYKIo/j/u67 +j/Gp5snOzfe0BJF9ovz6ff49VN3Iqk3iDEGkuvXAXWNuF0U1jDkmcATQ1qfv +Xtl5t1PbQDh7yVEB5GWbLc4qaKSePc9p6RsjEfO7snDwWg6lFMcRKYkm0bSI +VHGXCIfKd5w/7xBFojdM2s2/h9jU4bK+j1KRJFqR1T7Z+45NpcjFrz0VQaKJ +p096dyI2JbO7W00qBI9XrxY8+uEbxdyb1BYVQCLaYmnRcqUvFGNNrrOdC4m8 +r/GE3CeLKYNYt4okIxLZKgdWTxYUUw9DFl+MOUCi7ZXqYVfvFlO1Nsq8sP0k +mll+VemaUjF1dj5U1Wcvia7kiG/3OlBEOVDmZmcMSeQ0pXfJN6aAuhFs2G2x +nUSfBtQ+rLz3Cbd+ZFeqk8hDz525SuUTRXHFxhrVSKTDKvyulP2RsqZ7cHtV +SfRO1WpgdWcOZbvxMkN4PYmSzwWsUtuaTS1RYs+brSFRdG/HHZ22TMq4UaFb +dCVeb4lqXox1MvVbPvzKMkkSlXYv9sh2TaIm2nhf1CVIFEmObWazXlOn9uhL +MsVJpI+yXhO5CdS21b9tXcRIFJTLDD8tH08dOSGzpEWYRAansxsO5zym6p1r +O7g0Ej0VCtM2lb4CuUU9KXd/Eogu6Wl755AXMFmN9/InCKQbnFF0osIHAttc +bCbGCRQb8XjwifAd2Gl6+aPtGIH06t4pihSHgb387Zs7hgkUeBnp5ivFgmqD +sPr6PgIdC5RgbX6eDqXKYZ/SWwj0xOrmfeedGdD83U1LAFv04lTj7swMSLY2 +DrLkEqgvss9h4tFb+FupsI1sJlDcSHmIkX0maD+sUDzdQCDZ6KDW2aEsSGpe +M2HGIRAxvsjtpGg+DM9WJdSWE+gS3TdP1ysf0vxHjQyx2+X/0CVH8kF2hlGT +WUagz3sGonI5FPzvqIbP41ICbTfh/8OqLgDZxZIO54sJNBlfGtAdVgTz007H +t1EEcjQN5ESolEFT/9J317MJlLH2emKaZRk4LY/UlsT+9T9n79LgMggfUvOI +zyKQ1+tjqr8ny2CcuHTg2wcCBRMbfQ5/KYfuTdPSG98T6E1mrdYSt0pY/F5R +S/ItgSbuVNDVkyqh8MpD3psMAukcz2tltlfC8oRvFqbY1OLEINd9VRA78Ng3 +NJ1A7DOePI7CFzg7/4um8gb3l1UOCSmtBqMPF7zPpOD+I0v/ff2nGsQCUqyk +sD1LRHcUaH4F5xH3ybxkAgm4/OobjfoKvfqvrslhy1SVg+nFb7DPdfZZ82sC +yRtkTwWKsWH3x5c2NxIIZJD0tkt6HRsMxKXsdbCPy6R+jUFsUPOvUxl9RaCX +Ay/is66wISH28M+T2Bses0x7O9igw+OnW7wkkP6YXeLu9xywnKsMPxZHILcv +Ju0SHA4kKKRkL8dOTYClTcMckBXl5jfFEmiFnbKfw181MH9BxtMGe6qyx/5B +dA2EhsbHO74gkMar+gir7Bpgyj3p34T9762yauW6GtjELpeaeU6gOp3Xeu/F +a+G99QcGC/ttvOOy5lu1QG0PK8iKIVD/DVvjuGe1wDDuXeePrWRt7O/4qRYu +1Fi5mGPfZ2hOzP6shbM6oe/Gn+H/33viq8rZOlCol+7Vw46z6hYc8quD+sSV +TpLYXO267R9e1EGZzNamnqcE2jfwIWkvtw781H2sQ7HXWl4LuGBcD4sbDktO +PyGQ7WaHz1sd6mFPJiurFjtc3ObnXGA9iGvn7czAJkt2nHhYUA8eMwzBC9h/ +P98Yad1WD2HVGtuNsC95Kn5f/ace1tgwj6pjd2jR9LO0G8CZuUt3JJpAyxaP +X75p1gAcP815NrZJX2fyPqcGEDIXTX6P/flZ8fKWhAbYwQ9KuYEdJXr717xc +Ixx55m+3EpvNv6peqdMIkSllhsLYIoXnToZaNAJPekR8IopA7lcPsNfcawT9 +tH7jKuw08+3CI0mNkNr2sTgbu2fjBoPsskbIOXFhZQK2RY946n5aE6i1u3gF +YLOouS7plU2wTKvYxx27KHpUrvXvJkgNmnA4hz1zhWf26mgTBG+a32aDrXWI +c/vi5Sbg3uzvN8E+u6Eof1tIEyjUpXkbYscIZ/6mpTVBZLTJpC52Q1f8hqrK +Jug5UGWuiS2eH34qrLcJDM8pha3DFp1X/ulKNMPdyKGtq7BFULqvuUIzuP97 +8PlybLrPDunN25oh+TZ8l8YWLKqMlTJvhjufSkvFsUkBy03jF5phW1m77yLs +ecOeAvbtZvjkyaLTsf/zdzHLiGuGxIwKMwHsP6VzHQ/ymsFxf9QJAnuaHuzs +3NQMmzT/06VhT+6Vmzf52Qzjh8cb5iNxPAlKuK8hwQWzLI/tC+3jldqKEqpc +KLMM/Xeh/4hoYdqwIRc89hhYLYw/ZGSi/9WeC0cjvRgLzx8IbqlOvcYFiQvG +Dxbm1//1nG1wOBcUf2TULcy/V2Jy0DGdC1mQyFtYX4+p33WjKi68f62VubD+ +rhCGmDqfC11njA8u7E8H51m0KK0FUgtnUxb2r1VaXW1gRQsYSDJrNLC5Fjkf +K7e2QHTyCmrbwv7X1zQFObYA+pc1ZIRdt+z4uXOBLaDtoLLREptjOTy1N7YF +9vmZbTmFXd0sLCvc2AJ3FFweeWNXrYhI6B1vAYuy0+N3sStsVHTKFrcC1TQm +/QS7uG3HkQBmK4wP1CXlYhcoVvWctmsFV2uNVV+x8/+xdNvl0Qq/pFbbdGB/ +6nQJE3jTCm2Rnevo+DznqMyrdFe0Al0xLWsF9odTwe+Kuluh5KisuBZ2Bj+B +4yPXBp/ffBG3w36zbsuJE1vaoK5SNscNO/Vs4RgybQOZELrqPezEHy2StIA2 +UHFn2xdgxwwzTG6MtcHUzNYVWvh+PtWIabMTa4elftkzxtjRzupO+uva4ccB +/vOF+x0xvjv4P5t2+EI3QqnYwb89qzzL26FW7SxnC44f12Z79lyN6QBOroGO +I443qYkbbn3P6QCHFrPkcGzeIbePf9V2gKqfQ1s+9ppaYtmQAA9ionJvLcXx +7O5fD4Oe6vJAYkTk8xdsa3a602wsD6oVxYRtcfx0e2XBUk3nge6094WH2Pc9 +pxKOfObBamr5w3LsojXAS2vgwfT+77I6OB6rXvtmbi/WCYosX3kFHL+nlYe3 +UW6dIPdn45wYjvfSUyGHB306ofvJLktj7A3VW1xkH3TC1aQU5wfYx929kp2T +OkHQ0L19Kc4X5VViK5XaO2G41vi9Os4vjy6rkT57u6Bm7UvD6zgfbSk9W81c +0Q1VywOEk9MIZFVDf3BvfTdEWN8eE8X5z7vj1aEmnW44UmuQewG7bKa7wcmi +G8Ineb8343xppXG8MzK4G0SOetOqcD69/thqcmSuG1b+iXBWwfm46Px+pSfd +PeB0PrTFKxffD/f+Lv54DwS9DBL6gy3mf/uVFo0PaIYv5fGZQIdjStXKFPiQ +tWqU455HIH7Nzq3jR3C76sjoDVwviOzQO7C3gg90f+ukj7ieMJVQd/uZ2gvs +28uZzdUEOmqy/NT+T73QzVx17dxXAtnfFzJ/Xt4LbslC7tPYFyV4mkZdvbD7 +DqtwxXd8HiQiBuNk+wDS1744h+udKon5k+a+fRCmsNdHFddDuyRrD7217IeS +TetIxCPQQdMCJHymHwbH+UQ/tsWDNE07137wlbWvCOkk0EnJIPFF9/rBazA8 +qaeLQD6S+pXHi/rhleBQXgQf3x/JRMTY+APOFzZsWTmI8w/juqYzOQCVRitC +Cyfx+EGnSroZA3BXTyUzdArPn3bwmNWqARhdz84/PU0g3zEFv507BuDS8L5H +Yn/wfNn5DUvcB8CW0bbn9CzOfw/JGzk/BiDmh0bOTkES3ZJmVROcQQgX61dL +kyZRuUzU+fDnw3Ar/NnPfZtJ5FZob1GaNgyPUImWmTaJVC6u0Z/MHYZnUjQL +qy0k8ipPZ1g1DcP0qsE9jjok0vIsy5aXGgFXi9nhJ3q4nu74KRTvOwIbmcm7 +1uP6/WKySdzbM6OQf1X38vBhEokp+Tr1RYzBbYPOiQ3XSVQnGewR8HQMukIi +9ay8cH08H+G3On4MGgPeHPT3JtGGjqSofzLG4PF7VXb7TRIdjOGUNlaNgevD +MpxCSXRfQVmxYn4MziiSZ9F9EknLFXx7fX4ciusC5xTj8PuM9Jymg/4EaNez +6DurSXRdqPNtocgvOK3TtyV/swAyPMLKu/HhNwzLJGVYvhBA9gnRQYzAKei6 +uCw+YZ0gamYdGt1gMgPVNSc5iZ8EUe6Xbx1vpv6A/F1pjfsWQmhUPPOBUOl/ +4Op0M352ER2xUu0qCy/PgRkwuq6W0BHT2dJUUJyG1s2elx1mCaP+oEw56Qka +ci3eJ2PjJoKK2BOva3DdXKebNdPwzyK0O4r/2DudRF3kXXXGZVHkkZJSNxwq +gHgs+4NHHomhjsHDDYyzgsjtgH5czMfFaDT17TZFYyG0Oba+sE5MAmk/Hbdr +X01HfLH0vU52kuivesGaU5N09FliyTTfnoFK7n95VcsVRmsz9Hxj1KRQuPsV +g8l0EZSmCXfI31JIoqNGR+DxInS8ujTxRrs0yr2y5FfRRVGUdTeJc6JsCXLx +eKl0NFYU0f7/I4P+D3Jk8C4= + "]]}, + Annotation[#, "Charting`Private`Tag$769532#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV13k8VN0bAPAxy50ZUoylUNreimSJLCnOQ1mSIkWW0kuLSEqlKEVEaZGX +JGQXipItpXRtKZE1RLJkCRUyY52R3/n9NZ/v5zP3PPece57nPGel8ymro1QK +haIrRKH8/zdC5neFocoA6VBYNe5BiAA1lBgbXzFAuh9Im6iiicBp6gq5FIkB +8nbe3ok1QiJg/tPKkzbTT9ruOTjczRcGovjlsoryfnKfSvsj5z/C4P3vtfNG +dv2k2fI1OpEdwuCYLqdgeq2P7JpbfqkgTxgUNc1u7Wr/Tsp8OGr45YgwaD7M +fXTwcif5XFnjfE4lG7Syrfa7OXeSXjfeWARWsEGnbJx1waSTHIoRlrIpY4Pu +oLp7mHgnGd673/lvMRv0N+Wplz/6Rr6x96TZF7DBuCaPVKjtIPPeluvppbLB +VpDfxpX/SpbWLA/JDWCD3SLrWxT6V9L+E/O/JH822K+a2Co61E6OdPH9/rvC +hgOmmolr89rJusILnHMX2eB0r+CYnUk7maRUz9h+hg1uG15w355qIxM1fhCL +nNnge6BQ9GZJK2nkMn/F0pANJkSclHxaK3lX8u34UWAD53nAstxbreRFVRfw +1WdDBm23crtNK+kVJDieqcuG5id95ut/t5BTlU0/JTTYoDIjfvujTAu5Wj4w +TvQfNswkT0U4zjeTofQ7SWqr2FBh/i12vK+ZjLkQe3nfCvz+iRmZss+bSVqN +RXH8UjYEm6BqN+NmMr+xa7+eFBu6It2FRc5+Jt9F6HQnE2x4gqw4CbbYHT02 +TXQ2nB/SltXQ/0xS75em0GlsWKBHW+/A/kz+FMsnXedZ0DowuHF0pImMGA4N +jZtjQXJY7ebAz01kzmE1jUY+C07q5hssLmoig8p9nzJnWaDTF70jM6GJFHe1 +ndObZgEt1G8PCmoiuz+mr/KaZEGt9lG7JrcmskSczJkcZ0F0j5mTi2UTeTG/ +LHf0NwuO3FJz5Ws2kUXLdwwMDbJAVVPa865cE1mWIWfe38uC2U6+92qhJnLo +Ca2vp5MFYervb+ysaSRPZG5+3PmZBQ4dWWFdOY1kfoBsS2cdC9YGhz84G9VI +NlzT2tT9kQVv2g5mxDo3knaEceBACQuG/Hnvf043kD+ta48JPWWBYd1K5u01 +DSSNPSFxOogF0yzx8u+sBrL1m9KJJf4seGZI8dv8q54cFtxYU3aRBbIvOicH +cuvJdkFSmcxpFow/jB0wgHrypnHF/TZ7PF7z+tujBbUk80e4W6waCygLOMLv +V1ST+zpDu9d8Y8Jln27G+clyUq50ZK2JLhPGKxSL4+2fkDn1iyaslhBgF7zw +pnpCNjLOJleM/qHDCYvghshVlShA5cwDZh8N9MYOphvlN6DMUnfloGkqiL69 +dzhi4Atq/ZUhTghTwWeuz/hCfBcaUW6uuKgrBJveudQYyvaiFUVp3oG+FLBY +qHSOmzWAJteWqiX4zKPNYpdUT1GH0dQVqkW28l/0XjLa9V7Cb0QU3V5e0C1A +IisCTv6IHEOZyuvIV3l8JMv5q+qmN46SedIqy3Nm0SVGT04pi4dCcoUX5mbP +oG3WN4uvFEwgL9OGFKXP08gxLeaGWPAU2vgzeprPn0JtN/eMbtg9g8r4snfr +t06h19W1Xc+mZtHS3hy5mIeTaFQ07y7jnQC987qxmC80iW5mHawqPfsXNYQJ +HZoKmECGp/Zb0EUpoC5mFLpFegJldPkHPxCjwK7r8/eCJCfQIssnxRskKTC9 +fnNRPWcCdajNKVnLUUDGO/uQ26IJdGE8mZWmSIE9jlYSmawJlOU1UmpiTIFD +G/5Snfk8JOUbtOmWHwUeFMxpPOrhocEbeTKccQp0fHWJupjDQ6zgMTnXCQpM +pn5sXf2ch9YFKsuXTFNAdv6SSO0zHjp2OX2VxzwFUtd6ma/J4qFez1iljwuE +YHXuKfWuNB7qtA/UC1gnBJ6Uf3z9H/JQ84a9TuMHhMDpmup57xs8VFY/ntH4 +XgjkvtGfbj7MQ32xz/Z5VgvBEdnRy0xnHiJc3ChidULQ4P31WMu/PGQ217N/ +V4sQ5H9w9L/gyEONig3Ehz4hUCgKq6u0w/EDso8UC1FB92ffx2hLHqJruq/I +2EKFCFVmrBjiobUUhRpjRIUdKWwDIX0eMq3uvdBvSAXCZo9gfCsP3XZyqFtl +RoWLXgdz23R5SDLU7EqcLRX2nFwnm6/FQ//8UOgI96ICuSu38qEKDxlF90dd +zqaC0Y9Clt5yHgrN+WIrkkeFoTv9/vvkeailqlom+gUVUPeY0MllPHR8Nic2 +v5gKX5Ts5ZPkcDyHKwk/q6lwrTr0rdQSPJ9li9PtBqnw5NipO2riPOSYbPpC +cyUNLL3rRpXoPJRetOVC+T80+CPd6HyExkNjjSo6exRoQDjEd8RReegqTarI +XZUGT69a90kI8VDqkZ7iFD0aKNjfMVzwl4t+rr34TtyeBvLS9RtUprnIOzPz +8+9wGmhWbduj9ZuLLlrm/qt/nwYJCYdyYn5x0aWJl79Co2lwIT6AN/+Ti66g +SrpaIg2uNOWs/jTMxaWve9OZpzRIVQ/458wgF4XzpSIn39OA99knbaCXi7J2 ++lvPC2igk5Dh7POVi56NBfdYUOgQVbd00Ww7F2VH3jmZSKODZYd53CXs3K6Y +IANhOvhuLHK82sZFr84WFAQupkO6gDwX1cpFlbHDUix1OkgPWPT/buKirp/7 +WsRc6JBimBK97RMX9Tm2izx2o8OSo8NSX2q4aLDhkIGBBx0WN9vHnMQeK3TL +8vSi47oa+jq2mouErvkHNAbS4Zv2Ckf6Ry5avTRL5V4iHYZa1eSY77lI4e7G +IxtS6aAYayWVVclFG6iF0RXpdOhcNi9thb1psJQ+8YwOw+ONaknvuMgov7Xd +upgOEvKHi3dWcJGLOe364nY6HA3apt5YykXu5I032d/oQDtbm3gd+7T6wnGT +Hjrs9LaW1sf2XiJz0HuQDpV7taSflXBRSJ+KRtskHV7uOHA8huSi0P35xz1n +8fpEdovaYod/3BzP/ksHq/vLi6SxY55vZ+syGLBI89naqLdclOlr3xUjwQDJ +zE0WqcVc9Hy0S1JjMQPa+PmKbtj5zkfNqmUZ0BuWK7wR+43p6QL+SgbETDG7 +S99w0SfJ4FsH1Bhwf6Nl6+hrLmq8LlLK02CAd+5IXzF2y2zY5G1tBkSM10/f +xu7sjnUq1mfA04VGGirYo1k52vK7GBBJUxn3LcL7IctMx8eSASa7hcassd2y +enU+72WAc4Rqoyp2X6aU7k17Bsysv7Ft4BUXfXnis3XShQEejJi2g9iRTzh6 +e04woAQVzOhhWz3J1MvyYMB/Q9S/8tg1j7/pO3sxYK30qrzel1xUkmFgUBvA +gLvkcO0F7MsZ7QaKwQxoaZEQO4Stm3HW8FoI9vsdmibY+emPtumGMeCi+kcl +WWzPdP3tkREMeN4qMkfHVklv3T52nwGvE0xzxwq5KCONbZwWxwC908kfPmIf +TUs2FkpiwAvBC8VX2KvStpgcSMXjFRZ4ZGB3PfpsUpiO538tJuoB9sNHJ005 +mQxQ3OmUGoJt94jYcfIZA94LE5GXsKUfJez4kMMAo4prrh7Y/6U2mF15iefj +Qnlrg7071W1n22sG6EZO6JljL0ilmW8i8ffWL0gyxK5KeWh+t4wB/LQtQ5ux +g1M0dw2/Y8AdmSBJdextKbW7jKoYcLz3zmolbEqKy+7EGgb0eVhJr8EuTqZY +8OsYYKVY92s59sXkaAubJrz+1ynpctjayeqWOS0MiBLr3b4Em5dUbbmgnQFb +HM5WSmHnJB3Z4/KNAcyZp0qS2B5Jc3vKuhkwHnv3nAS2UtJ9q2V9DEgZl0z6 +vwcTVfd6/2CAy1vdnP///1Hih71NwwwQr5pLlcZ2TnTapzKC12Pc3lcGe3ni +7L6QPww4vdBCexl2R0KEdR8Pz39Ja/NK7OiEDTZomgFcYmz/OmybhHc2MXwG +BHXcL1bGlkhw3D/xlwEjTz8Qmtj18VP7LakENDwI0NDDvhMfZpvJwH1KZek2 +Y2yzeEU7gk1Ay6lAbUtsZnyZndMCAm59qFjogF0R52D/ZhEB5xQCq45hX43j +2S+WICCt97XLWWz9uDsOZ6QJ6P7Xfcgfm/9w7YFPMgTcYIbvvov98iF5QGEZ +AWb266PisTUe/jnYuZoA2orHjeT/98NQ6VmFdTge8+vxBuxZzfCQM+sJ2Hw7 +qq0Xu6xOvYDYSAC3Kd1MBO/XtKW0astNBHgenjJbgX3Ttak7RpuAUtWqNVrY +VrRzC1T1Cbgf9NPtCLaW5fZVPgYEPNmo0+yLLRsnqVO+nYB+x3mZ+9g9WgWH +9+8kQExoUr0a+7TbZJGfLX6+bm8ywvm3r7CyvsoBr9f7bd2O2Dr0qAGJQwRQ +mhOnr2DPx2lzMo4SsN/g4ctS7NAGb9f6MwR0GXt67cH5f0Z+h5/seQIuX00O +voBtc0Im8ogPAa7iWmfiseUZRSXTfgQUJ/h9GcF+qsNfvPIOATmPr/RE43oT +FlStfCIMxwtNfVeJfa4xdltBBAEvcv+5xsPe6r711I4YHD9YLcwK17eahMuV +nukEnB116luC698wQfEqKyVgw9dM31pcP2v31t9c8I4A+4z1BBvX19zExESb +DwS+N/Fdt2P76BrUDNcSELEhoqQYm+URsFqig4Cml1GPi3D9XtdMbzw8ScAQ +W+TEtzIuWji297+JGQIcui0/KJXjfBFOsbw+R0DYmsdrL2GXgEHdEzoTlryM +GFiKzw/7rMs1fzhMCPl+7Kw7Pl9CAycr/VSZ8N6ov3TLBzy/eKNgcQ0mZM6X +qMVgO7y6Z5SixQS4XZI4g60wql5RqceEl24br72uwvvD/lSpqDkTokfZdjvx ++Te5cfB17HEmeIwZbo2txfljrn1J2Z0JntY6b9l1XFTuEqxLnmJCZIingQ92 +WNw/r76fZ8Iqz1c7Heq5aD3b6YViEBMqtw6eUmrkooPdbc8Lk5hgprllht+M +8yG0+lFTOxOuLLu81rGTiw5rqagpdDIh+NMk6sWmdoYV+fYwwUWjbLNrFxcZ +KNvUrRlkgt2GA7UXurnobXX39IUJJtxXEfJN+I7zgzW5c6kYC/Jl9v9a8gOf +JwErxo8YsSBn9ple/hgX7Vwf6PvKlAXM7Knj1n/w92zoJxaas2CEsdhrCltx +ZaZcoRULzsFvVX0uzg9S04j9Lwu0IwLUWia4KFFg9uApvvcY//ropMbnonvn +vfQns3G8Rd+f3CF4SOuXzZnwPBZMFe8ctWfy0BcnnTSVQhb0+ZFbFfG9YOku +vqjLWxacEOsf/8DmoZTVV7+11rDA94zwJ0lRHsqtv+37aogF4qrzqFOChxrW +pxb5rmbDq0/PDuqs4qGFXY1atCg2lLQ6hosY8pBrz3tN5xg2XJbosGVv46GK +3jebSuPYEO4bwWJt5yGfwTR1v1Q2vPvasppljPvnPxdV+DlsSFtTbCZhxkOv +6KvXcmvYoHnuvrO1FQ8dWX9WqpcqDOVcE6EQ3G+/9pLglXkIg6Df3uY57se3 +vkMs8TPC8KPjRuz3EB56K+m+9JCXMHSYBpRL3eKhkryK7fxLwvBtlPHmyh0e +qvzjFakRIgwffKItHcJx/3ryi1ZqijAo99hyEO73h4/G+QR9EQYYi9uVg+8P +S2zWzZsYioBo+OjpbR08JF844lq4bgEUTpl/VTaZQLbG0dFtcwtArWufsH/R +BNpiM6Uw0C8KYp+ZJ8tMJ1FttgLxsmoh1Kh7/7EemESR2noZW+MXAXWpxuW3 +IVOIlkhttjYUA+qW/4xtd00j6y22LweeisFdYJyqlJpBfpeiDO0XiwMv74Xh +1Z8zaO7Sc0FZiDioJ/zeaf9jFkVKbJEJ4omD6EiHfEU/HwlPplc7TYrDp6W2 +JYeG+cj/i+QV/WlxSMi91S8Y4SP3uJHvU3xxeJgl+2bLNB9tX5ec5UbjgO25 +xsRqYQEa12WDJYcDx6TL/TepCZClc+sxOTUOHH/WcWiDrwBVbt8uM72RA67q +RhPT/gK0dV1O9WcN7N2B0u+DBGjdr5tqodocOPUuZM7lrgD99dKfpSAOeEgy +jr5JFqCnIY/uDOzigONKpc/ZVQK0yp0D5RYceOyw0TiyVoAe7PYbT9jDgSLN +raa+TQJ0TcJuv501B9dLj7nd3wToQNyClTUHONCqkKvB/CNAjX4+TRmOHOjg +mirPTAiQqfNAUNC/eDwx+qtfswKksa5kWP8IB3rap69/oc+hDLZynNwxDiwP +eV1dz55D8r+iLaZdOHD0RH7yx4Vz6F4tQW125YCelYJopcQcEs45m59zggP2 +nQ4i5Uvm0P8A72RjDg== + "]]}, + Annotation[#, "Charting`Private`Tag$769532#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV13s8VNsXAHDPGY+ZOcdIEXleqVyJSiHtRUhUUigl9CZc4SIhKfyEpJAS +elApj7wp5SgKiRChRB5Jc0aERKHfvn/N5/uZmX3WXjN7rbVVDnrtPCIkICCg +LSgg8N9rgtxIjcnKIapELMdL84M4CMUxxsaVh6jNA7aysZ3icEJIWT5Deoia +ZY80jbSLw1Z6p7fwzGfK3cr+SHGzODCeli+pqf5M3Tf7rbv9pTicdAn3N3P4 +TNULLdUpLhAHp3vyyyzCB6nThYVlFufFYflay5ht7/spy0AT4VhDcVibWnhn +f0gPNVqvkMa7KQbBjmXs6KoOqkY085CJihiYvFFhxqq3UCvEhJWsipgwLSZV +3S/WQv1+uv10XAET8kwEQvX5zVT27wNjrQ+ZsLi0Z2qosJk6d3kvyzmHCeOp +14eMoZlSdp5WCr/DBJP2FbGjJU2UdbXhNcGrTBBgcSVqlRuoAxqt3+tCmOAR +Ohb275dX1NgU6b4ymAmd400zKnmvKNcfUhOJp5iQ3xXzNdjwFRVH9Kw8EsAE +53ui9br29ZSkruFOrjcTKk1m/pceU0vlE2paNw4zISTwk6j/VDUlVdLtfHYr +ExxVIl9PVVVTbjOQpGrFBMN6zYSAmGrqTINuUfUWJszIBigHKldTrHyXLLHN +TPArZxsGWz6n9h3b5ZdmzATPnwYnzqZXUTE2KyPG9Ziw9cYnPWG3KupKnd/6 +W2uZoLk5cu7c6irqrGBH6441TGjVypCRvERR0rExTwp1mPDKo9lS6vNT6nOO +8YGwv5nwmLeiZMmFx9TtnbrdW1SZcNLA30RJ9THl1Rk2xVBhgl70szfKZY+o +lAPhUzVKTChcvoen1ldO3b5ueW/TEiY8cI1QWrG2jPL1CKi3kmWCa3lzjuar +UsrR/ReHXMSEpWIKBlrOpVSSyFn9dhkm3L5XaLvqfAkV22BhdFCaCS4/5/p0 +FEuo8T+OC1dwmaC4eYvX6qJialmXUts4yYTuK4mzayyKKbPZIP8nBBNShnrP +630soo7LO85FcpiwR09z0XqfIoqbfWjsDosJCyP9M/WZRZTto025C8SY0Nb+ +TMcwtZD6p8MlOFyYCZfV2dQGnUJqy86Y/T/mGRB92GDSJCKfIo2FEqr5DBiv +Wf40fe8Dyqp+XiOhjgEvBlgny3zuU65aRw4UVDPgqtCYbnN0FmUpc7WruZIB +RlCaJVhxl1Iu8o2QLmFAVIVJ4mH5DKqsxb/m3i0GbDxc9s62PJky/XQ6WzKI +AamiCautuX5oy75vp6mVDHCI5ETr3niIigeSvF9dEwV368iWJNWXSJ0ZuoN1 +TgSMxvbfMytuQU0REg/exwkDuzLxUMJQJzJOV0m+eEUIAucGzQPSe1G+u8Gm +lKeCsObFsdcmiweQS/49S8MpAbDmaP47kTOE6vRy8lb/LQD6ZJC2lxAPJSiF +GMrMzKPaBdfcEm+MoJHo3SELkueQpPJZzy9JY+j3dKFcpN0sWsyd1z5uNI7C +T9ihDvQbBYn2FTwTm0Qt1qmCPct/oU120U9Pl/xAyWoTYtsNZ5DT3ZQoMvIn +apgOX3Fz+zTqirYZ/Xv7DGpr2do9uOcnqmho6s37+QvZ2Zz3LD88hUbZRRdF +X8yi1/Ha9t6eP1B0zv76Z77zKF326v/QlUlk4rXbWoQtAArih1Y5tEyg4agi +Oe64AHjPBYW2S0yg583jWa21ghB6R6lC03kcmV37nBzyUAh27Un0sS36jk5m +Z7eNXBaGd4uMz52Q/Y56adt35DEReBSQ7d6RMIZGcwrWKW4TBfuGoeoocgyt +Tv2+v0eNARvuN2akmIwijXaR1kNTDKjMibBXCfmGauIa7rx9j8/p7PvOLU9H +UKK/38aph2KgrHCP+VZxBHF6W/WEk8Vh4dLx4OEoPqrwk558/o8E7Ino6uBI +8dGGF0hMykcCqqsy5JwJPqpc4KHg7CcBP/vcwvLZfFRVVGP6O0gCiDUPnttL +8NHL735Jq89LwPRGJYkCYT5q9ezUy8yQgDP7DqenTtGIdyQtMKJTAhifct2t +P9JI1l7jz2YTSSisEjVVzqNRqm/rk49mkuDv4rvmeg6NlC+FnPLdIgm/DHef +WpRNo2Wv3/5I3yEJNRMGjAVZNNI3OcP/4SQJMfUZCktu02jvyq6ujCBJ0DNP +X+t1hUbXGTHFf4olgfp1/D73DF7vLz2fpHJJsIjbvbz8NI0yjfu0NZ9Igl1f +zaxTCI1ygtdl21dLgo/8YFr+KRo9GR+4lduC4/PMrT3kR6Pung0X932ThI0X +l+eKu9NIseybW5kGC4SdRQ/u2k2jfQdyxwlNFiTsl/FfZ0+jq5IeQa4rWWBy +3DNfwY5GXJevsXJrWeCr8DaZt5NGouKDD4NMWNBLOq9K3E4j/t6uH2g/C27r +GZ5RNKdRxXx1WN1lFnzZP7iP0KPRdNZZCZUrLFhG6WvIrqXRml3GCYHXWLCk +4/Ei1TU0yrtXmbniJgukdyq76uvS6PaOR7WxuSxQm0t/4beSRtG389g2dSx4 +/ajEQ12DRnvMr13rmmPBhOH59S5yON7Kdw2BgmzY+mC5eLAsjTr0FszLibLh +Y52IzrVFNLLXuHhwL4sNm8q2RXbI0MhWLELzw2I2DG/abH6YSyObVyeedq9j +g8XBnTKVkjSKN8kbDTZkw2Z7rv2oBI2aH9MqSxAblqYkjahg78g+GrnfnA0X +ZZqVY8RotD3W0brHlg2K3Q7JnqI0stxu0dfrzYaap0aUzx8ein4ZIX3Gjw1N +bRZuj+Z5qH5jtZlyIBveNxa7CWJbaG984HKGDb8HUzyTZnnInFzj2xfHBocp +VljjDA+ZtCqJDmSzwYsx1xIyyUOG9j+XDX3G+zOa/93D46Hb8h4n/L6yIeyk +6J+d2GJ9n8pERtgQlRBlVfeVh9rcX5mrTbIh5OZYVekwD/0TlnbYRYgDMa5/ +FDKGeOhmzqab7xU5oFXwNPlRPw8xfMq/uKly4M+Zv3RMsD3WaWnPqHPAJaZH ++nUfD+k/X1i5SIsDymaGJQOfeKi14+sHW0MObLrgf0y1l4dEhOMXvdnNgSMX +/o36+IGHjteJODvt44BI9NLSU9jNFwLvjjhxoEGWqyWHnSZ7aC3rKAfy6uKm +HN7zkN5KvV1b/sXxyEpP8zp5KHXiQUpnAAdikwO8LmMLP1LqPxbEAZ0bnFWG +2M2bxL0jz3LgU1tbbHwHD7k5dMdVx3PATaSi2PIdfl/R5t3ORA7U9eT5zbbj +9QdfLOlP5sC52fbQh9hCXg9zBG5wQDLwkZccdmr42VdGuRx4Ifz+6exbHmp6 +uIxRXs+BYZ9xacFWHhoRLJCVaOQApzzYqKGFh1i2+pqOzRxIiwmPuIJtOb1l +h0AHzsdy0nsVdi24p1gMciD+mFapdzMPDV2eyEn5wgF5x4q3ptiMz0EUn8cB +y/wWQg7b9HzsYPx3DtzOix+oecNDVS25K7vm8fNvX5pZjt2rpmesKUTAVdJP +koE971e5K0SUAJ3Xw4YDTTy0YfGbkyosAhjsuOmb2Ps8dsf4EgRouT8LD8M+ +Vdmb9oJLQMnZWO1D2I8Ojj13kyOArTf5aTl2Z/HJ9goFAqzqEr5wsKcZgsNs +ZQJAoJ31oxHnL1uKXbiUANYVo6IabLu5a0oiKwjoGDm+Jg/7X2tVXXstArax +jduuYhdO6O7+tZqAO5zvXt7YLWYVblvXEdBf1+TujD2WvCk43YAATX/nyO3Y +BK8hbsyIgAu/MqiN2Cs32N4yMSag5vyNRauwt8V1FyWaElCeZxeniu3x6fDL +oc0ELG2rVVuIHas70rneigD3FdMdEtjZ4X509HZsXfqBAPard3Nz3TYEtIbc +Sv35mod4yyJJbTsCfvgo5o5iiwdx1ML2YF842j2Mvazxytq3+whYbBi0YgB7 +s5KShbozAb3SLsk92Ee97+0NOEgAEbBQ7QN2RLW2Z/0RAqK3ZDR2YmfKlIfK +uxFwJVg8uQO7+hhc9vQgoHTJ1tD/3P+oLpPyIiDCzCPyv88LsmzKpHwJqPA9 +kfMeW9mpq/6QP87vW4fvH7FR/oHukkACFOO17PqxnYR435ghBHD6eB1fsENs +fQT3niEgxuNa4Dfs1Lu/pHPOEVAmbWQwhV0xfXbpfCT+/e+2y/3Bfm8pqb8j +mgAhDzdZcZyfmdQEq9sX8PO8ZtYuwJYdlXeajCdgR36sjzL2OuPME+aJBIhY +qTdpYdsn/H3uajIBH2zrLDZgJ60zytqQToCy/trrjtilu00Pv7tFQLrrBsET +2J0BVson7hAgc7KxPBxbodzhakYOAcvmMhQKsTd2utga5RPAK/5R9wrbZfoY +2VFEgM3uLy8HsTPX+0dJVBAQe6myTAH/P1/uCTHNrCTgtMfDBwbYwyfDBTY+ +J2Ag0m7UAVvz0eWT3vUEtGl0e6ZiF+o/dO3sIGDY2RV08Plpcyj9y+cDAVyn +rGcO2FOBTz9J9hKQ4NCUeA5b/3HDHjREQIBM76oP/51Hg2GLu5MEGBfXQwo+ +r/17R0VgmoA3Or02jdgiQVNVXb/x8ztZJYL4/GfuP5saKUhCo2699z/YX9Li +FzwWIyHyedSL3bieTGsljkdKkJDEkHdNwharTG7exSIhu+2XYxv2ip702BGC +hAK3l0b2uB79o5grorKIBPs+m263Nh4KzcvvH5HF309exi3Ejt9YXPV4MQlq +rtEpv7ELnSqCbRVJeDkmkXEZ17cf6fWT/1MnYYI1kNCM6yNDu7HVVoOEgHdf +ndRw/VxINeerLCchyuRxcAD2+t4Oj4q/SdhX9CFfDdfbYKWhwW+rSfgIIrMx +Xbge3xRqtzMhwcv5vHpqNw+dmLooK2JKQvlmMe057J6tSxwLzUg49sbSxfkj +D5XPrBvgbMHxSusbaPTg/ezy/F5rTQL15sLrGtw/OhmdbIP9JJTGT3uvG+Ah +s/1HbIadSNhqavv7AXZh0XjiFRcSEl+P5ygN8tAFF7bCxCESBpcvOs/6jPvl +Y5MVOcdJqOnmqU/i/pbjmWuueJKES3a2M79wf5SrMYh+HUiCaP47iTCahyIX +1zWeCiLB4r6GmRifhw7U9tt2nCZhzMV+zeIRnA8V2UPxESToCH2dsxrloTNt +Z0OFEkho26Jp/mUC1z/DPeVDuSRkbcsYnZ3D52F9WGTsQxJ6jja8zsT93X7t +A1vdApzv7wfqtuF5YI/27FhIMQm7pxnyGQJ4/lO7uVymgoS0FHPtfcI0cpEc +TtlUh/OzMFdBUJxGxz8EhNzsJ6Gb/GD3F55fjnfetDIfJMG8x0ZmDNu9vV6O +/xnHX3tp8slCGnm8kS9d95WE2YQr3L14HvKqpr41jZKws/5P4y15Gv2bzXSZ +myVB4HzG1mOqNAoNSjbZu0gKfj4Tr3y1ikZnekM/q8lJQWX6gl9NOjQ6u8k1 +amSxFDwhcqLb8HwWKanfdEZRCgT7au8P4Pkt7vp7h3vqUuC87XSflD6N0iuW +eE+ulgLzzFqzPGMaVf7OuBG3Qwo6M+7u+7KLRnNB+bPPz0vB6EftKqdgGjne +VRX9J0YKdMIvht7C8+zj5kS23AUpeDUc7P4Zz7v+6oGKXvFSkF5mUX8ijEZj +TcYgnywF3Mqg9KRIGg2ovD3nm4njfbu2ctElGtXX/pD4i5ICXW3frfN3aZQk +bSgXMSkF4ZefXd3zjkYSU/caDkxJwUOlh94ynXi/nQtOb5yWAqKm/eXbLpy/ +tG/9P3/jeAeMh2zxvG+qcTvnuDAXnmTFz7oO0mjcQBx2cLkgvy/qRuc4ngcP +dhyVX8UF9Q+tke9IfJ8wNZWb1uFCwZLmJdVcfB/RKGhoW82FmDtpawoW8JEG +P3pV3DouqB1X7b8ky8f9e+MvAcSFRq4yHFHmo9zzdy4MbePCQucoVdtVfKTq +wYVqay4cVKuu2aPLR1e3h47fsOHC5Lknw05r+Chc2mG3gx0X5sV3lnqt5yPH +NJbKa0cu0Nfj3DMA32dCA99mOeE1/ISVik34yOLgUESEC14vVcvupSkfrdao +4m08zIVHgYqWoxZ8lCWulSZ/lAuVWeriDCs+UuRfs54+xoXZ6cNWitv4KLGJ +IdTuxgUxl1FyvTUfSRT4Fhe4c+GU3JTDLhs++j8RtfNr + "]]}, + Annotation[#, "Charting`Private`Tag$769532#3"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$875318#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4vbl4aeMchwcvuz7uDXdTNbhDe8+g5leCH6E ++PaLDG4ODqlpICDjcDE/nv2cpYNDOoh7TBKiXsvB4WD3viYTZkmH45pWk07L +Q/VPk3D48630wZyJ9nA+2Bwze1R5Rls43+fixJh/wbYO8rsW7EtdJ+lw4rDT +2kw+O4c3bbndRrtlHJ5naX+bHmvn8B8E7ss6FG8V/X1azMGBPzbgvpG7kgPM +P3c0Zdf8b1aG8x+BPPJAFc4/BTJ3nobDkTagwCF7B5Eer1csJVoOEvPiNE8n +2MH5JSDz/9nA+U8TF14z0bdxSI6948YsoQHnz5jAX2XGrQbni4LUX1Fx8DnB +bjt7K4J/HGTvPgQfZj6MDw5vP1uHJ2BzVOH8wFvSNYmfEPwXoHCYqwYJL2Fb +h7+gcBRUh5sP45sYA8FiBP8MCMxB8MH6J8Pcrw4x/5yNw2bzH4dSVmk4HACF +T5Gtw4+3rw9YHtZ0qP1tVXDOwg7Oj1Fw/JhsYw/nTwWZc9sear4GnA8Lfxh/ +JgjcVIaEj6s9JD2JKTl82BCQPWu6nUM4p1i7cb8CPDzd1hxdzhAhBueD/WUs +6rC/VtYi3cUBzkdPzwA7R0nA + "]]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYCYh7/9VNSKxwc3rTldhtFyzrA+GuFdPjS7yk4 +7LzV9TeV3cEhPQ0Ipik58LipljK9snMoP7zNdeZfJYcl9/fxzfls75ABlld2 +eJK48JqJv4ODaI/XK5YQVTj/xK4dvWwG6nB+wC3pmkQhTQefixNj/i22dxAB +qS/Rctiil7eYscYOzld50jzvrJctnK/xlnefQaaNw38w0IDzJaZe4cxwUofz +WTi75JP91Bw+bAjInnXcxuFFlva36bJqDj4n2G1nf0Xjm9rC+SVbRX+frrN1 +2OHQ9Oh4BYIPcz+Mb2IMBJ/V4frrflsVnPPQcBAHueOTDZwPduZ9BJ8DFH63 +EHyZeXGapy/A3K/hoK+1UviCi62Duc3eoGkPNSHhm2wH5x9oWx5+qgjBB/vv +OoIfIb79IsM8e4dUUHy0Ifgw98P4G0DhvEcNYt8Ue4c0MFB1iFFw/JhsY+/A +AAIJKg4SIPc9sHMAedc4WNlBHRS+lXYOK7+9rDjjoOxwVeiT43k1O4fK+z9u +GVsrO0yZwF9ldtrW4cOi9QpnNZQd6lmO9htOt3XotPHclaYEle+2dTgDAjII +/t78mrcznyrB+WD9K5Qctpj/OJQyC8EHJQOTiwj+c1C8xdrB+WD3JtjD+WD/ +XbGHplcFOB8cPmmycP6OYKuI/+rikPhktXeIUY2QOVcjCom/fDs4H2zfXVs4 +H5wOHts4tCqwq56ZIgZJr102kPy0WxISnm9sIPmpThIev9NnAkGkFJx/3zXe +cZagDJxvADK3GOo+Fluoe+UcnoLyz3obOP8LOIMi+OD4ELOBuG+PLJwPDu83 +0nC+wq4F+1LXiUP0qUHTs7EIPH5hfHD+fGwP58PKB/VPKi9ndUo4oJcfAPoy +yPg= + "]]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQLe/4MflMr4OD+ieVl7M0ZR1g/Ir7P24Zd8s51LMc +7Td8bo/Bl1n+wkNPXgvOD7glXZM4CcH/8630wZyNWg4xCkAD9yD4Phcnxvxb +jOCrPmmed3YWgi8+9QpnRpO9w5xFyjv/pGs5bNDLW8z4xhpuP4wPc++Jw05r +M/nsMfjGIHBZAs7vi+j2ZxQQd+DxXz8llcPeoVWBXfXMFDGHGTOBQNMOzj8D +Am9sMfgmYANFHQ60LQ8/ZWTnUAVyj7coxD/K9nC++lvefQaVCH7JVtHfp88h ++ImHL2unJjrA+VO+scXPaHGAmw/jw+yPEN9+kSENwc9f03074wPC/bDwhvkP +xof5H8ZHj18YHwDMfN7/ + "], {{31.117199999999997`, + 7.635939999999998}, {28.220299999999995`, 7.635939999999998}, { + 31.117199999999997`, 12.1297}, {31.117199999999997`, + 7.635939999999998}}}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurveBox[{{{1, 4, 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}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { + 1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQzeO/fkpqhYPDGRB4I+cA43faeO5KW6TkoK+1UvjC +FXsHM5u9QdMOqjgsub+Pb85iOzjf5+LEmH+TbeH8/uASlen6tg7K1x4FM7xR +cpCZF6d5WsDWYeW3lxVnHBD8vfk1b2c+RfDXqz5pnvdWA2J/h52DOci8h5oO +NpURK0x17eF8kLKzsxD8/bWyFuksDg4nDjutzZyn6ZB4+LJ2qqKDgwdI4rmG +w5ru2xkM/Aj+FvMfh1JW2WPwN4DtV0eVT1d3SIi948Z8w97BxBgIPqs52Dc9 +Oj5D2AHOv5gfz37OEsEHOfdssIMDC2eXfLKfOpz/HwwQ/MntrVGXbTQh+iUd +HER6vF6xlGg58LipljJp2cP5M2YCwUpbOP+q0CfH82I2Do8ixLdfTFCH88Hx +paQE5+8Itor4ry4Oib8WW4j7jEXg4Qvjw+IXRR4Y/2/acruNdks4oKcPAFnp +5a8= + "], CompressedData[" +1:eJxTTMoPSmViYGAQA2IQnZoGBN/sHebMBIKfcg4wfsX9H7eMu2Xg/HQQnSbl +EKPg+DF5j73Dl30ft6ZPk3DIX9N9O6PA3qEKpN5bzEF86hXODCZ7hxjVCJlz +NaIOPP7rp6R22MH5KbF33JhP2ML5YPNybB12BFtF/FeXcOjxesViEgjjSzr4 +nGC3nW1qC7e/nuVov6G4rcObttxuo90ycP77ResVznIowPnVIPe8VnTQ11op +fKHF1sFjf62shbuKw4cNAdmzptvB+b3BJSrT7e3h/ASQ+2bYO+zNr3k7M1UZ +Yv9RqP+nKcHD446m7Jr/mxXhfGMQaFZwQA9PAP4Uj50= + "]}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.029061319383900032`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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, 4, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQAWIQzeO/fkpqhYNDjGqEzDkZWQcYv/zwNteZfxUc3vDu +M5jJ5eDwHwT4lRyuCn1yPK9m7yBSOankrImyQ29wicr0/fYOM0HgprLDk8SF +10z8HRwCb0nXJH5SgfNNjIHgsxqcn5oGBGyaDhHi2y8yzAOa1+P1iqVEy+EG +UJtRqx2cX89ytN8w3BbO13gLdFCmjYOuovyXnG0acP6MCfxVZt1qcP4GvbzF +jHtUHT5sCMie1W7j8Kp4q+jv1yoOtpURK0zv2jhMaW+Nuiyj4lACFD79zwbi +37PKDn++lT6Yw2jrIBAbcN/ouDLE/uu2DsrXHgUzzFFyeApy/3obiH87FSHh +IWbjEPL28scZD+XhfLD/0mTgfLc1R5czRIg7qDxpnnfWyxYSHsYiDktfeOj9 +b7SD8/W1VgpfuGIP58Pi401bbreRtIQDenwBALIeuC0= + "], {{ + 32.12969999999999, 11.462499999999999`}, {32.12969999999999, + 10.7359}, {31.604699999999998`, 10.151600000000002`}, { + 30.914100000000005`, 9.770310000000002}, {29.5313, 10.6766}, { + 29.376599999999993`, 10.782799999999998`}, {28.899999999999995`, + 11.093800000000002`}, {28.899999999999995`, 11.6781}, { + 28.899999999999995`, 12.4516}, {29.709400000000002`, + 12.940600000000002`}, {30.507799999999992`, + 12.940600000000002`}, {31.367199999999997`, + 12.940600000000002`}, {32.12969999999999, 12.3219}, { + 32.12969999999999, 11.462499999999999`}}, {{32.392199999999995`, + 6.8968799999999995`}, {32.392199999999995`, + 5.9906299999999995`}, {31.473399999999994`, 5.371880000000001}, { + 30.52029999999999, 5.371880000000001}, {29.507799999999992`, + 5.371880000000001}, {28.637500000000003`, 6.110939999999999}, { + 28.637500000000003`, 7.099999999999999}, {28.637500000000003`, + 8.02969}, {29.3172, 8.781249999999998}, {30.09059999999999, + 9.139059999999999}, {31.5344, 8.196879999999998}, { + 31.843799999999987`, 7.993750000000002}, {32.392199999999995`, + 7.624999999999999}, {32.392199999999995`, + 6.8968799999999995`}}}]}, { + Thickness[0.029061319383900032`]}, StripOnInput -> False]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {-2.3025850929940455`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-2.3025850929940455`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-1.2039728043259361`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.916290731874155, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[10]}, {0, 5}}, {{-0.6931471805599453, 2.302585092994046}, {0, 5}}], + + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwd1wk0lN3/APB5HgwRhpREQssbCqXkVXxvo12WqMj2tr4VSSRJVNY0qWQp +VApFtiiFEo99SzVjN7axDLJTWfq9+F//OWfOnM+5597n3jv3fr/fR/mks/kZ +kkajjeHvwm+Y3HAJU6OXsjnBYQ8dEkTkffrYhFIvFbd5mMk2FUSXSCX5+CW9 +lN6LuYj3xoLo4KC5i8AMn8r7/bL95n5BRM/LWVlSzKdCtNymlHYKIo/j/u67 +j/Gp5snOzfe0BJF9ovz6ff49VN3Iqk3iDEGkuvXAXWNuF0U1jDkmcATQ1qfv +Xtl5t1PbQDh7yVEB5GWbLc4qaKSePc9p6RsjEfO7snDwWg6lFMcRKYkm0bSI +VHGXCIfKd5w/7xBFojdM2s2/h9jU4bK+j1KRJFqR1T7Z+45NpcjFrz0VQaKJ +p096dyI2JbO7W00qBI9XrxY8+uEbxdyb1BYVQCLaYmnRcqUvFGNNrrOdC4m8 +r/GE3CeLKYNYt4okIxLZKgdWTxYUUw9DFl+MOUCi7ZXqYVfvFlO1Nsq8sP0k +mll+VemaUjF1dj5U1Wcvia7kiG/3OlBEOVDmZmcMSeQ0pXfJN6aAuhFs2G2x +nUSfBtQ+rLz3Cbd+ZFeqk8hDz525SuUTRXHFxhrVSKTDKvyulP2RsqZ7cHtV +SfRO1WpgdWcOZbvxMkN4PYmSzwWsUtuaTS1RYs+brSFRdG/HHZ22TMq4UaFb +dCVeb4lqXox1MvVbPvzKMkkSlXYv9sh2TaIm2nhf1CVIFEmObWazXlOn9uhL +MsVJpI+yXhO5CdS21b9tXcRIFJTLDD8tH08dOSGzpEWYRAansxsO5zym6p1r +O7g0Ej0VCtM2lb4CuUU9KXd/Eogu6Wl755AXMFmN9/InCKQbnFF0osIHAttc +bCbGCRQb8XjwifAd2Gl6+aPtGIH06t4pihSHgb387Zs7hgkUeBnp5ivFgmqD +sPr6PgIdC5RgbX6eDqXKYZ/SWwj0xOrmfeedGdD83U1LAFv04lTj7swMSLY2 +DrLkEqgvss9h4tFb+FupsI1sJlDcSHmIkX0maD+sUDzdQCDZ6KDW2aEsSGpe +M2HGIRAxvsjtpGg+DM9WJdSWE+gS3TdP1ysf0vxHjQyx2+X/0CVH8kF2hlGT +WUagz3sGonI5FPzvqIbP41ICbTfh/8OqLgDZxZIO54sJNBlfGtAdVgTz007H +t1EEcjQN5ESolEFT/9J317MJlLH2emKaZRk4LY/UlsT+9T9n79LgMggfUvOI +zyKQ1+tjqr8ny2CcuHTg2wcCBRMbfQ5/KYfuTdPSG98T6E1mrdYSt0pY/F5R +S/ItgSbuVNDVkyqh8MpD3psMAukcz2tltlfC8oRvFqbY1OLEINd9VRA78Ng3 +NJ1A7DOePI7CFzg7/4um8gb3l1UOCSmtBqMPF7zPpOD+I0v/ff2nGsQCUqyk +sD1LRHcUaH4F5xH3ybxkAgm4/OobjfoKvfqvrslhy1SVg+nFb7DPdfZZ82sC +yRtkTwWKsWH3x5c2NxIIZJD0tkt6HRsMxKXsdbCPy6R+jUFsUPOvUxl9RaCX +Ay/is66wISH28M+T2Bses0x7O9igw+OnW7wkkP6YXeLu9xywnKsMPxZHILcv +Ju0SHA4kKKRkL8dOTYClTcMckBXl5jfFEmiFnbKfw181MH9BxtMGe6qyx/5B +dA2EhsbHO74gkMar+gir7Bpgyj3p34T9762yauW6GtjELpeaeU6gOp3Xeu/F +a+G99QcGC/ttvOOy5lu1QG0PK8iKIVD/DVvjuGe1wDDuXeePrWRt7O/4qRYu +1Fi5mGPfZ2hOzP6shbM6oe/Gn+H/33viq8rZOlCol+7Vw46z6hYc8quD+sSV +TpLYXO267R9e1EGZzNamnqcE2jfwIWkvtw781H2sQ7HXWl4LuGBcD4sbDktO +PyGQ7WaHz1sd6mFPJiurFjtc3ObnXGA9iGvn7czAJkt2nHhYUA8eMwzBC9h/ +P98Yad1WD2HVGtuNsC95Kn5f/ace1tgwj6pjd2jR9LO0G8CZuUt3JJpAyxaP +X75p1gAcP815NrZJX2fyPqcGEDIXTX6P/flZ8fKWhAbYwQ9KuYEdJXr717xc +Ixx55m+3EpvNv6peqdMIkSllhsLYIoXnToZaNAJPekR8IopA7lcPsNfcawT9 +tH7jKuw08+3CI0mNkNr2sTgbu2fjBoPsskbIOXFhZQK2RY946n5aE6i1u3gF +YLOouS7plU2wTKvYxx27KHpUrvXvJkgNmnA4hz1zhWf26mgTBG+a32aDrXWI +c/vi5Sbg3uzvN8E+u6Eof1tIEyjUpXkbYscIZ/6mpTVBZLTJpC52Q1f8hqrK +Jug5UGWuiS2eH34qrLcJDM8pha3DFp1X/ulKNMPdyKGtq7BFULqvuUIzuP97 +8PlybLrPDunN25oh+TZ8l8YWLKqMlTJvhjufSkvFsUkBy03jF5phW1m77yLs +ecOeAvbtZvjkyaLTsf/zdzHLiGuGxIwKMwHsP6VzHQ/ymsFxf9QJAnuaHuzs +3NQMmzT/06VhT+6Vmzf52Qzjh8cb5iNxPAlKuK8hwQWzLI/tC+3jldqKEqpc +KLMM/Xeh/4hoYdqwIRc89hhYLYw/ZGSi/9WeC0cjvRgLzx8IbqlOvcYFiQvG +Dxbm1//1nG1wOBcUf2TULcy/V2Jy0DGdC1mQyFtYX4+p33WjKi68f62VubD+ +rhCGmDqfC11njA8u7E8H51m0KK0FUgtnUxb2r1VaXW1gRQsYSDJrNLC5Fjkf +K7e2QHTyCmrbwv7X1zQFObYA+pc1ZIRdt+z4uXOBLaDtoLLREptjOTy1N7YF +9vmZbTmFXd0sLCvc2AJ3FFweeWNXrYhI6B1vAYuy0+N3sStsVHTKFrcC1TQm +/QS7uG3HkQBmK4wP1CXlYhcoVvWctmsFV2uNVV+x8/+xdNvl0Qq/pFbbdGB/ +6nQJE3jTCm2Rnevo+DznqMyrdFe0Al0xLWsF9odTwe+Kuluh5KisuBZ2Bj+B +4yPXBp/ffBG3w36zbsuJE1vaoK5SNscNO/Vs4RgybQOZELrqPezEHy2StIA2 +UHFn2xdgxwwzTG6MtcHUzNYVWvh+PtWIabMTa4elftkzxtjRzupO+uva4ccB +/vOF+x0xvjv4P5t2+EI3QqnYwb89qzzL26FW7SxnC44f12Z79lyN6QBOroGO +I443qYkbbn3P6QCHFrPkcGzeIbePf9V2gKqfQ1s+9ppaYtmQAA9ionJvLcXx +7O5fD4Oe6vJAYkTk8xdsa3a602wsD6oVxYRtcfx0e2XBUk3nge6094WH2Pc9 +pxKOfObBamr5w3LsojXAS2vgwfT+77I6OB6rXvtmbi/WCYosX3kFHL+nlYe3 +UW6dIPdn45wYjvfSUyGHB306ofvJLktj7A3VW1xkH3TC1aQU5wfYx929kp2T +OkHQ0L19Kc4X5VViK5XaO2G41vi9Os4vjy6rkT57u6Bm7UvD6zgfbSk9W81c +0Q1VywOEk9MIZFVDf3BvfTdEWN8eE8X5z7vj1aEmnW44UmuQewG7bKa7wcmi +G8Ineb8343xppXG8MzK4G0SOetOqcD69/thqcmSuG1b+iXBWwfm46Px+pSfd +PeB0PrTFKxffD/f+Lv54DwS9DBL6gy3mf/uVFo0PaIYv5fGZQIdjStXKFPiQ +tWqU455HIH7Nzq3jR3C76sjoDVwviOzQO7C3gg90f+ukj7ieMJVQd/uZ2gvs +28uZzdUEOmqy/NT+T73QzVx17dxXAtnfFzJ/Xt4LbslC7tPYFyV4mkZdvbD7 +DqtwxXd8HiQiBuNk+wDS1744h+udKon5k+a+fRCmsNdHFddDuyRrD7217IeS +TetIxCPQQdMCJHymHwbH+UQ/tsWDNE07137wlbWvCOkk0EnJIPFF9/rBazA8 +qaeLQD6S+pXHi/rhleBQXgQf3x/JRMTY+APOFzZsWTmI8w/juqYzOQCVRitC +Cyfx+EGnSroZA3BXTyUzdArPn3bwmNWqARhdz84/PU0g3zEFv507BuDS8L5H +Yn/wfNn5DUvcB8CW0bbn9CzOfw/JGzk/BiDmh0bOTkES3ZJmVROcQQgX61dL +kyZRuUzU+fDnw3Ar/NnPfZtJ5FZob1GaNgyPUImWmTaJVC6u0Z/MHYZnUjQL +qy0k8ipPZ1g1DcP0qsE9jjok0vIsy5aXGgFXi9nhJ3q4nu74KRTvOwIbmcm7 +1uP6/WKySdzbM6OQf1X38vBhEokp+Tr1RYzBbYPOiQ3XSVQnGewR8HQMukIi +9ay8cH08H+G3On4MGgPeHPT3JtGGjqSofzLG4PF7VXb7TRIdjOGUNlaNgevD +MpxCSXRfQVmxYn4MziiSZ9F9EknLFXx7fX4ciusC5xTj8PuM9Jymg/4EaNez +6DurSXRdqPNtocgvOK3TtyV/swAyPMLKu/HhNwzLJGVYvhBA9gnRQYzAKei6 +uCw+YZ0gamYdGt1gMgPVNSc5iZ8EUe6Xbx1vpv6A/F1pjfsWQmhUPPOBUOl/ +4Op0M352ER2xUu0qCy/PgRkwuq6W0BHT2dJUUJyG1s2elx1mCaP+oEw56Qka +ci3eJ2PjJoKK2BOva3DdXKebNdPwzyK0O4r/2DudRF3kXXXGZVHkkZJSNxwq +gHgs+4NHHomhjsHDDYyzgsjtgH5czMfFaDT17TZFYyG0Oba+sE5MAmk/Hbdr +X01HfLH0vU52kuivesGaU5N09FliyTTfnoFK7n95VcsVRmsz9Hxj1KRQuPsV +g8l0EZSmCXfI31JIoqNGR+DxInS8ujTxRrs0yr2y5FfRRVGUdTeJc6JsCXLx +eKl0NFYU0f7/I4P+D3Jk8C4= + "]]}, "Charting`Private`Tag$769532#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV13k8VN0bAPAxy50ZUoylUNreimSJLCnOQ1mSIkWW0kuLSEqlKEVEaZGX +JGQXipItpXRtKZE1RLJkCRUyY52R3/n9NZ/v5zP3PPece57nPGel8ymro1QK +haIrRKH8/zdC5neFocoA6VBYNe5BiAA1lBgbXzFAuh9Im6iiicBp6gq5FIkB +8nbe3ok1QiJg/tPKkzbTT9ruOTjczRcGovjlsoryfnKfSvsj5z/C4P3vtfNG +dv2k2fI1OpEdwuCYLqdgeq2P7JpbfqkgTxgUNc1u7Wr/Tsp8OGr45YgwaD7M +fXTwcif5XFnjfE4lG7Syrfa7OXeSXjfeWARWsEGnbJx1waSTHIoRlrIpY4Pu +oLp7mHgnGd673/lvMRv0N+Wplz/6Rr6x96TZF7DBuCaPVKjtIPPeluvppbLB +VpDfxpX/SpbWLA/JDWCD3SLrWxT6V9L+E/O/JH822K+a2Co61E6OdPH9/rvC +hgOmmolr89rJusILnHMX2eB0r+CYnUk7maRUz9h+hg1uG15w355qIxM1fhCL +nNnge6BQ9GZJK2nkMn/F0pANJkSclHxaK3lX8u34UWAD53nAstxbreRFVRfw +1WdDBm23crtNK+kVJDieqcuG5id95ut/t5BTlU0/JTTYoDIjfvujTAu5Wj4w +TvQfNswkT0U4zjeTofQ7SWqr2FBh/i12vK+ZjLkQe3nfCvz+iRmZss+bSVqN +RXH8UjYEm6BqN+NmMr+xa7+eFBu6It2FRc5+Jt9F6HQnE2x4gqw4CbbYHT02 +TXQ2nB/SltXQ/0xS75em0GlsWKBHW+/A/kz+FMsnXedZ0DowuHF0pImMGA4N +jZtjQXJY7ebAz01kzmE1jUY+C07q5hssLmoig8p9nzJnWaDTF70jM6GJFHe1 +ndObZgEt1G8PCmoiuz+mr/KaZEGt9lG7JrcmskSczJkcZ0F0j5mTi2UTeTG/ +LHf0NwuO3FJz5Ws2kUXLdwwMDbJAVVPa865cE1mWIWfe38uC2U6+92qhJnLo +Ca2vp5MFYervb+ysaSRPZG5+3PmZBQ4dWWFdOY1kfoBsS2cdC9YGhz84G9VI +NlzT2tT9kQVv2g5mxDo3knaEceBACQuG/Hnvf043kD+ta48JPWWBYd1K5u01 +DSSNPSFxOogF0yzx8u+sBrL1m9KJJf4seGZI8dv8q54cFtxYU3aRBbIvOicH +cuvJdkFSmcxpFow/jB0wgHrypnHF/TZ7PF7z+tujBbUk80e4W6waCygLOMLv +V1ST+zpDu9d8Y8Jln27G+clyUq50ZK2JLhPGKxSL4+2fkDn1iyaslhBgF7zw +pnpCNjLOJleM/qHDCYvghshVlShA5cwDZh8N9MYOphvlN6DMUnfloGkqiL69 +dzhi4Atq/ZUhTghTwWeuz/hCfBcaUW6uuKgrBJveudQYyvaiFUVp3oG+FLBY +qHSOmzWAJteWqiX4zKPNYpdUT1GH0dQVqkW28l/0XjLa9V7Cb0QU3V5e0C1A +IisCTv6IHEOZyuvIV3l8JMv5q+qmN46SedIqy3Nm0SVGT04pi4dCcoUX5mbP +oG3WN4uvFEwgL9OGFKXP08gxLeaGWPAU2vgzeprPn0JtN/eMbtg9g8r4snfr +t06h19W1Xc+mZtHS3hy5mIeTaFQ07y7jnQC987qxmC80iW5mHawqPfsXNYQJ +HZoKmECGp/Zb0EUpoC5mFLpFegJldPkHPxCjwK7r8/eCJCfQIssnxRskKTC9 +fnNRPWcCdajNKVnLUUDGO/uQ26IJdGE8mZWmSIE9jlYSmawJlOU1UmpiTIFD +G/5Snfk8JOUbtOmWHwUeFMxpPOrhocEbeTKccQp0fHWJupjDQ6zgMTnXCQpM +pn5sXf2ch9YFKsuXTFNAdv6SSO0zHjp2OX2VxzwFUtd6ma/J4qFez1iljwuE +YHXuKfWuNB7qtA/UC1gnBJ6Uf3z9H/JQ84a9TuMHhMDpmup57xs8VFY/ntH4 +XgjkvtGfbj7MQ32xz/Z5VgvBEdnRy0xnHiJc3ChidULQ4P31WMu/PGQ217N/ +V4sQ5H9w9L/gyEONig3Ehz4hUCgKq6u0w/EDso8UC1FB92ffx2hLHqJruq/I +2EKFCFVmrBjiobUUhRpjRIUdKWwDIX0eMq3uvdBvSAXCZo9gfCsP3XZyqFtl +RoWLXgdz23R5SDLU7EqcLRX2nFwnm6/FQ//8UOgI96ICuSu38qEKDxlF90dd +zqaC0Y9Clt5yHgrN+WIrkkeFoTv9/vvkeailqlom+gUVUPeY0MllPHR8Nic2 +v5gKX5Ts5ZPkcDyHKwk/q6lwrTr0rdQSPJ9li9PtBqnw5NipO2riPOSYbPpC +cyUNLL3rRpXoPJRetOVC+T80+CPd6HyExkNjjSo6exRoQDjEd8RReegqTarI +XZUGT69a90kI8VDqkZ7iFD0aKNjfMVzwl4t+rr34TtyeBvLS9RtUprnIOzPz +8+9wGmhWbduj9ZuLLlrm/qt/nwYJCYdyYn5x0aWJl79Co2lwIT6AN/+Ti66g +SrpaIg2uNOWs/jTMxaWve9OZpzRIVQ/458wgF4XzpSIn39OA99knbaCXi7J2 ++lvPC2igk5Dh7POVi56NBfdYUOgQVbd00Ww7F2VH3jmZSKODZYd53CXs3K6Y +IANhOvhuLHK82sZFr84WFAQupkO6gDwX1cpFlbHDUix1OkgPWPT/buKirp/7 +WsRc6JBimBK97RMX9Tm2izx2o8OSo8NSX2q4aLDhkIGBBx0WN9vHnMQeK3TL +8vSi47oa+jq2mouErvkHNAbS4Zv2Ckf6Ry5avTRL5V4iHYZa1eSY77lI4e7G +IxtS6aAYayWVVclFG6iF0RXpdOhcNi9thb1psJQ+8YwOw+ONaknvuMgov7Xd +upgOEvKHi3dWcJGLOe364nY6HA3apt5YykXu5I032d/oQDtbm3gd+7T6wnGT +Hjrs9LaW1sf2XiJz0HuQDpV7taSflXBRSJ+KRtskHV7uOHA8huSi0P35xz1n +8fpEdovaYod/3BzP/ksHq/vLi6SxY55vZ+syGLBI89naqLdclOlr3xUjwQDJ +zE0WqcVc9Hy0S1JjMQPa+PmKbtj5zkfNqmUZ0BuWK7wR+43p6QL+SgbETDG7 +S99w0SfJ4FsH1Bhwf6Nl6+hrLmq8LlLK02CAd+5IXzF2y2zY5G1tBkSM10/f +xu7sjnUq1mfA04VGGirYo1k52vK7GBBJUxn3LcL7IctMx8eSASa7hcassd2y +enU+72WAc4Rqoyp2X6aU7k17Bsysv7Ft4BUXfXnis3XShQEejJi2g9iRTzh6 +e04woAQVzOhhWz3J1MvyYMB/Q9S/8tg1j7/pO3sxYK30qrzel1xUkmFgUBvA +gLvkcO0F7MsZ7QaKwQxoaZEQO4Stm3HW8FoI9vsdmibY+emPtumGMeCi+kcl +WWzPdP3tkREMeN4qMkfHVklv3T52nwGvE0xzxwq5KCONbZwWxwC908kfPmIf +TUs2FkpiwAvBC8VX2KvStpgcSMXjFRZ4ZGB3PfpsUpiO538tJuoB9sNHJ005 +mQxQ3OmUGoJt94jYcfIZA94LE5GXsKUfJez4kMMAo4prrh7Y/6U2mF15iefj +Qnlrg7071W1n22sG6EZO6JljL0ilmW8i8ffWL0gyxK5KeWh+t4wB/LQtQ5ux +g1M0dw2/Y8AdmSBJdextKbW7jKoYcLz3zmolbEqKy+7EGgb0eVhJr8EuTqZY +8OsYYKVY92s59sXkaAubJrz+1ynpctjayeqWOS0MiBLr3b4Em5dUbbmgnQFb +HM5WSmHnJB3Z4/KNAcyZp0qS2B5Jc3vKuhkwHnv3nAS2UtJ9q2V9DEgZl0z6 +vwcTVfd6/2CAy1vdnP///1Hih71NwwwQr5pLlcZ2TnTapzKC12Pc3lcGe3ni +7L6QPww4vdBCexl2R0KEdR8Pz39Ja/NK7OiEDTZomgFcYmz/OmybhHc2MXwG +BHXcL1bGlkhw3D/xlwEjTz8Qmtj18VP7LakENDwI0NDDvhMfZpvJwH1KZek2 +Y2yzeEU7gk1Ay6lAbUtsZnyZndMCAm59qFjogF0R52D/ZhEB5xQCq45hX43j +2S+WICCt97XLWWz9uDsOZ6QJ6P7Xfcgfm/9w7YFPMgTcYIbvvov98iF5QGEZ +AWb266PisTUe/jnYuZoA2orHjeT/98NQ6VmFdTge8+vxBuxZzfCQM+sJ2Hw7 +qq0Xu6xOvYDYSAC3Kd1MBO/XtKW0astNBHgenjJbgX3Ttak7RpuAUtWqNVrY +VrRzC1T1Cbgf9NPtCLaW5fZVPgYEPNmo0+yLLRsnqVO+nYB+x3mZ+9g9WgWH +9+8kQExoUr0a+7TbZJGfLX6+bm8ywvm3r7CyvsoBr9f7bd2O2Dr0qAGJQwRQ +mhOnr2DPx2lzMo4SsN/g4ctS7NAGb9f6MwR0GXt67cH5f0Z+h5/seQIuX00O +voBtc0Im8ogPAa7iWmfiseUZRSXTfgQUJ/h9GcF+qsNfvPIOATmPr/RE43oT +FlStfCIMxwtNfVeJfa4xdltBBAEvcv+5xsPe6r711I4YHD9YLcwK17eahMuV +nukEnB116luC698wQfEqKyVgw9dM31pcP2v31t9c8I4A+4z1BBvX19zExESb +DwS+N/Fdt2P76BrUDNcSELEhoqQYm+URsFqig4Cml1GPi3D9XtdMbzw8ScAQ +W+TEtzIuWji297+JGQIcui0/KJXjfBFOsbw+R0DYmsdrL2GXgEHdEzoTlryM +GFiKzw/7rMs1fzhMCPl+7Kw7Pl9CAycr/VSZ8N6ov3TLBzy/eKNgcQ0mZM6X +qMVgO7y6Z5SixQS4XZI4g60wql5RqceEl24br72uwvvD/lSpqDkTokfZdjvx ++Te5cfB17HEmeIwZbo2txfljrn1J2Z0JntY6b9l1XFTuEqxLnmJCZIingQ92 +WNw/r76fZ8Iqz1c7Heq5aD3b6YViEBMqtw6eUmrkooPdbc8Lk5hgprllht+M +8yG0+lFTOxOuLLu81rGTiw5rqagpdDIh+NMk6sWmdoYV+fYwwUWjbLNrFxcZ +KNvUrRlkgt2GA7UXurnobXX39IUJJtxXEfJN+I7zgzW5c6kYC/Jl9v9a8gOf +JwErxo8YsSBn9ple/hgX7Vwf6PvKlAXM7Knj1n/w92zoJxaas2CEsdhrCltx +ZaZcoRULzsFvVX0uzg9S04j9Lwu0IwLUWia4KFFg9uApvvcY//ropMbnonvn +vfQns3G8Rd+f3CF4SOuXzZnwPBZMFe8ctWfy0BcnnTSVQhb0+ZFbFfG9YOku +vqjLWxacEOsf/8DmoZTVV7+11rDA94zwJ0lRHsqtv+37aogF4qrzqFOChxrW +pxb5rmbDq0/PDuqs4qGFXY1atCg2lLQ6hosY8pBrz3tN5xg2XJbosGVv46GK +3jebSuPYEO4bwWJt5yGfwTR1v1Q2vPvasppljPvnPxdV+DlsSFtTbCZhxkOv +6KvXcmvYoHnuvrO1FQ8dWX9WqpcqDOVcE6EQ3G+/9pLglXkIg6Df3uY57se3 +vkMs8TPC8KPjRuz3EB56K+m+9JCXMHSYBpRL3eKhkryK7fxLwvBtlPHmyh0e +qvzjFakRIgwffKItHcJx/3ryi1ZqijAo99hyEO73h4/G+QR9EQYYi9uVg+8P +S2zWzZsYioBo+OjpbR08JF844lq4bgEUTpl/VTaZQLbG0dFtcwtArWufsH/R +BNpiM6Uw0C8KYp+ZJ8tMJ1FttgLxsmoh1Kh7/7EemESR2noZW+MXAXWpxuW3 +IVOIlkhttjYUA+qW/4xtd00j6y22LweeisFdYJyqlJpBfpeiDO0XiwMv74Xh +1Z8zaO7Sc0FZiDioJ/zeaf9jFkVKbJEJ4omD6EiHfEU/HwlPplc7TYrDp6W2 +JYeG+cj/i+QV/WlxSMi91S8Y4SP3uJHvU3xxeJgl+2bLNB9tX5ec5UbjgO25 +xsRqYQEa12WDJYcDx6TL/TepCZClc+sxOTUOHH/WcWiDrwBVbt8uM72RA67q +RhPT/gK0dV1O9WcN7N2B0u+DBGjdr5tqodocOPUuZM7lrgD99dKfpSAOeEgy +jr5JFqCnIY/uDOzigONKpc/ZVQK0yp0D5RYceOyw0TiyVoAe7PYbT9jDgSLN +raa+TQJ0TcJuv501B9dLj7nd3wToQNyClTUHONCqkKvB/CNAjX4+TRmOHOjg +mirPTAiQqfNAUNC/eDwx+qtfswKksa5kWP8IB3rap69/oc+hDLZynNwxDiwP +eV1dz55D8r+iLaZdOHD0RH7yx4Vz6F4tQW125YCelYJopcQcEs45m59zggP2 +nQ4i5Uvm0P8A72RjDg== + "]]}, "Charting`Private`Tag$769532#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV13s8VNsXAHDPGY+ZOcdIEXleqVyJSiHtRUhUUigl9CZc4SIhKfyEpJAS +elApj7wp5SgKiRChRB5Jc0aERKHfvn/N5/uZmX3WXjN7rbVVDnrtPCIkICCg +LSgg8N9rgtxIjcnKIapELMdL84M4CMUxxsaVh6jNA7aysZ3icEJIWT5Deoia +ZY80jbSLw1Z6p7fwzGfK3cr+SHGzODCeli+pqf5M3Tf7rbv9pTicdAn3N3P4 +TNULLdUpLhAHp3vyyyzCB6nThYVlFufFYflay5ht7/spy0AT4VhDcVibWnhn +f0gPNVqvkMa7KQbBjmXs6KoOqkY085CJihiYvFFhxqq3UCvEhJWsipgwLSZV +3S/WQv1+uv10XAET8kwEQvX5zVT27wNjrQ+ZsLi0Z2qosJk6d3kvyzmHCeOp +14eMoZlSdp5WCr/DBJP2FbGjJU2UdbXhNcGrTBBgcSVqlRuoAxqt3+tCmOAR +Ohb275dX1NgU6b4ymAmd400zKnmvKNcfUhOJp5iQ3xXzNdjwFRVH9Kw8EsAE +53ui9br29ZSkruFOrjcTKk1m/pceU0vlE2paNw4zISTwk6j/VDUlVdLtfHYr +ExxVIl9PVVVTbjOQpGrFBMN6zYSAmGrqTINuUfUWJszIBigHKldTrHyXLLHN +TPArZxsGWz6n9h3b5ZdmzATPnwYnzqZXUTE2KyPG9Ziw9cYnPWG3KupKnd/6 +W2uZoLk5cu7c6irqrGBH6441TGjVypCRvERR0rExTwp1mPDKo9lS6vNT6nOO +8YGwv5nwmLeiZMmFx9TtnbrdW1SZcNLA30RJ9THl1Rk2xVBhgl70szfKZY+o +lAPhUzVKTChcvoen1ldO3b5ueW/TEiY8cI1QWrG2jPL1CKi3kmWCa3lzjuar +UsrR/ReHXMSEpWIKBlrOpVSSyFn9dhkm3L5XaLvqfAkV22BhdFCaCS4/5/p0 +FEuo8T+OC1dwmaC4eYvX6qJialmXUts4yYTuK4mzayyKKbPZIP8nBBNShnrP +630soo7LO85FcpiwR09z0XqfIoqbfWjsDosJCyP9M/WZRZTto025C8SY0Nb+ +TMcwtZD6p8MlOFyYCZfV2dQGnUJqy86Y/T/mGRB92GDSJCKfIo2FEqr5DBiv +Wf40fe8Dyqp+XiOhjgEvBlgny3zuU65aRw4UVDPgqtCYbnN0FmUpc7WruZIB +RlCaJVhxl1Iu8o2QLmFAVIVJ4mH5DKqsxb/m3i0GbDxc9s62PJky/XQ6WzKI +AamiCautuX5oy75vp6mVDHCI5ETr3niIigeSvF9dEwV368iWJNWXSJ0ZuoN1 +TgSMxvbfMytuQU0REg/exwkDuzLxUMJQJzJOV0m+eEUIAucGzQPSe1G+u8Gm +lKeCsObFsdcmiweQS/49S8MpAbDmaP47kTOE6vRy8lb/LQD6ZJC2lxAPJSiF +GMrMzKPaBdfcEm+MoJHo3SELkueQpPJZzy9JY+j3dKFcpN0sWsyd1z5uNI7C +T9ihDvQbBYn2FTwTm0Qt1qmCPct/oU120U9Pl/xAyWoTYtsNZ5DT3ZQoMvIn +apgOX3Fz+zTqirYZ/Xv7DGpr2do9uOcnqmho6s37+QvZ2Zz3LD88hUbZRRdF +X8yi1/Ha9t6eP1B0zv76Z77zKF326v/QlUlk4rXbWoQtAArih1Y5tEyg4agi +Oe64AHjPBYW2S0yg583jWa21ghB6R6lC03kcmV37nBzyUAh27Un0sS36jk5m +Z7eNXBaGd4uMz52Q/Y56adt35DEReBSQ7d6RMIZGcwrWKW4TBfuGoeoocgyt +Tv2+v0eNARvuN2akmIwijXaR1kNTDKjMibBXCfmGauIa7rx9j8/p7PvOLU9H +UKK/38aph2KgrHCP+VZxBHF6W/WEk8Vh4dLx4OEoPqrwk558/o8E7Ino6uBI +8dGGF0hMykcCqqsy5JwJPqpc4KHg7CcBP/vcwvLZfFRVVGP6O0gCiDUPnttL +8NHL735Jq89LwPRGJYkCYT5q9ezUy8yQgDP7DqenTtGIdyQtMKJTAhifct2t +P9JI1l7jz2YTSSisEjVVzqNRqm/rk49mkuDv4rvmeg6NlC+FnPLdIgm/DHef +WpRNo2Wv3/5I3yEJNRMGjAVZNNI3OcP/4SQJMfUZCktu02jvyq6ujCBJ0DNP +X+t1hUbXGTHFf4olgfp1/D73DF7vLz2fpHJJsIjbvbz8NI0yjfu0NZ9Igl1f +zaxTCI1ygtdl21dLgo/8YFr+KRo9GR+4lduC4/PMrT3kR6Pung0X932ThI0X +l+eKu9NIseybW5kGC4SdRQ/u2k2jfQdyxwlNFiTsl/FfZ0+jq5IeQa4rWWBy +3DNfwY5GXJevsXJrWeCr8DaZt5NGouKDD4NMWNBLOq9K3E4j/t6uH2g/C27r +GZ5RNKdRxXx1WN1lFnzZP7iP0KPRdNZZCZUrLFhG6WvIrqXRml3GCYHXWLCk +4/Ei1TU0yrtXmbniJgukdyq76uvS6PaOR7WxuSxQm0t/4beSRtG389g2dSx4 +/ajEQ12DRnvMr13rmmPBhOH59S5yON7Kdw2BgmzY+mC5eLAsjTr0FszLibLh +Y52IzrVFNLLXuHhwL4sNm8q2RXbI0MhWLELzw2I2DG/abH6YSyObVyeedq9j +g8XBnTKVkjSKN8kbDTZkw2Z7rv2oBI2aH9MqSxAblqYkjahg78g+GrnfnA0X +ZZqVY8RotD3W0brHlg2K3Q7JnqI0stxu0dfrzYaap0aUzx8ein4ZIX3Gjw1N +bRZuj+Z5qH5jtZlyIBveNxa7CWJbaG984HKGDb8HUzyTZnnInFzj2xfHBocp +VljjDA+ZtCqJDmSzwYsx1xIyyUOG9j+XDX3G+zOa/93D46Hb8h4n/L6yIeyk +6J+d2GJ9n8pERtgQlRBlVfeVh9rcX5mrTbIh5OZYVekwD/0TlnbYRYgDMa5/ +FDKGeOhmzqab7xU5oFXwNPlRPw8xfMq/uKly4M+Zv3RMsD3WaWnPqHPAJaZH ++nUfD+k/X1i5SIsDymaGJQOfeKi14+sHW0MObLrgf0y1l4dEhOMXvdnNgSMX +/o36+IGHjteJODvt44BI9NLSU9jNFwLvjjhxoEGWqyWHnSZ7aC3rKAfy6uKm +HN7zkN5KvV1b/sXxyEpP8zp5KHXiQUpnAAdikwO8LmMLP1LqPxbEAZ0bnFWG +2M2bxL0jz3LgU1tbbHwHD7k5dMdVx3PATaSi2PIdfl/R5t3ORA7U9eT5zbbj +9QdfLOlP5sC52fbQh9hCXg9zBG5wQDLwkZccdmr42VdGuRx4Ifz+6exbHmp6 +uIxRXs+BYZ9xacFWHhoRLJCVaOQApzzYqKGFh1i2+pqOzRxIiwmPuIJtOb1l +h0AHzsdy0nsVdi24p1gMciD+mFapdzMPDV2eyEn5wgF5x4q3ptiMz0EUn8cB +y/wWQg7b9HzsYPx3DtzOix+oecNDVS25K7vm8fNvX5pZjt2rpmesKUTAVdJP +koE971e5K0SUAJ3Xw4YDTTy0YfGbkyosAhjsuOmb2Ps8dsf4EgRouT8LD8M+ +Vdmb9oJLQMnZWO1D2I8Ojj13kyOArTf5aTl2Z/HJ9goFAqzqEr5wsKcZgsNs +ZQJAoJ31oxHnL1uKXbiUANYVo6IabLu5a0oiKwjoGDm+Jg/7X2tVXXstArax +jduuYhdO6O7+tZqAO5zvXt7YLWYVblvXEdBf1+TujD2WvCk43YAATX/nyO3Y +BK8hbsyIgAu/MqiN2Cs32N4yMSag5vyNRauwt8V1FyWaElCeZxeniu3x6fDL +oc0ELG2rVVuIHas70rneigD3FdMdEtjZ4X509HZsXfqBAPard3Nz3TYEtIbc +Sv35mod4yyJJbTsCfvgo5o5iiwdx1ML2YF842j2Mvazxytq3+whYbBi0YgB7 +s5KShbozAb3SLsk92Ee97+0NOEgAEbBQ7QN2RLW2Z/0RAqK3ZDR2YmfKlIfK +uxFwJVg8uQO7+hhc9vQgoHTJ1tD/3P+oLpPyIiDCzCPyv88LsmzKpHwJqPA9 +kfMeW9mpq/6QP87vW4fvH7FR/oHukkACFOO17PqxnYR435ghBHD6eB1fsENs +fQT3niEgxuNa4Dfs1Lu/pHPOEVAmbWQwhV0xfXbpfCT+/e+2y/3Bfm8pqb8j +mgAhDzdZcZyfmdQEq9sX8PO8ZtYuwJYdlXeajCdgR36sjzL2OuPME+aJBIhY +qTdpYdsn/H3uajIBH2zrLDZgJ60zytqQToCy/trrjtilu00Pv7tFQLrrBsET +2J0BVson7hAgc7KxPBxbodzhakYOAcvmMhQKsTd2utga5RPAK/5R9wrbZfoY +2VFEgM3uLy8HsTPX+0dJVBAQe6myTAH/P1/uCTHNrCTgtMfDBwbYwyfDBTY+ +J2Ag0m7UAVvz0eWT3vUEtGl0e6ZiF+o/dO3sIGDY2RV08Plpcyj9y+cDAVyn +rGcO2FOBTz9J9hKQ4NCUeA5b/3HDHjREQIBM76oP/51Hg2GLu5MEGBfXQwo+ +r/17R0VgmoA3Or02jdgiQVNVXb/x8ztZJYL4/GfuP5saKUhCo2699z/YX9Li +FzwWIyHyedSL3bieTGsljkdKkJDEkHdNwharTG7exSIhu+2XYxv2ip702BGC +hAK3l0b2uB79o5grorKIBPs+m263Nh4KzcvvH5HF309exi3Ejt9YXPV4MQlq +rtEpv7ELnSqCbRVJeDkmkXEZ17cf6fWT/1MnYYI1kNCM6yNDu7HVVoOEgHdf +ndRw/VxINeerLCchyuRxcAD2+t4Oj4q/SdhX9CFfDdfbYKWhwW+rSfgIIrMx +Xbge3xRqtzMhwcv5vHpqNw+dmLooK2JKQvlmMe057J6tSxwLzUg49sbSxfkj +D5XPrBvgbMHxSusbaPTg/ezy/F5rTQL15sLrGtw/OhmdbIP9JJTGT3uvG+Ah +s/1HbIadSNhqavv7AXZh0XjiFRcSEl+P5ygN8tAFF7bCxCESBpcvOs/6jPvl +Y5MVOcdJqOnmqU/i/pbjmWuueJKES3a2M79wf5SrMYh+HUiCaP47iTCahyIX +1zWeCiLB4r6GmRifhw7U9tt2nCZhzMV+zeIRnA8V2UPxESToCH2dsxrloTNt +Z0OFEkho26Jp/mUC1z/DPeVDuSRkbcsYnZ3D52F9WGTsQxJ6jja8zsT93X7t +A1vdApzv7wfqtuF5YI/27FhIMQm7pxnyGQJ4/lO7uVymgoS0FHPtfcI0cpEc +TtlUh/OzMFdBUJxGxz8EhNzsJ6Gb/GD3F55fjnfetDIfJMG8x0ZmDNu9vV6O +/xnHX3tp8slCGnm8kS9d95WE2YQr3L14HvKqpr41jZKws/5P4y15Gv2bzXSZ +myVB4HzG1mOqNAoNSjbZu0gKfj4Tr3y1ikZnekM/q8lJQWX6gl9NOjQ6u8k1 +amSxFDwhcqLb8HwWKanfdEZRCgT7au8P4Pkt7vp7h3vqUuC87XSflD6N0iuW +eE+ulgLzzFqzPGMaVf7OuBG3Qwo6M+7u+7KLRnNB+bPPz0vB6EftKqdgGjne +VRX9J0YKdMIvht7C8+zj5kS23AUpeDUc7P4Zz7v+6oGKXvFSkF5mUX8ijEZj +TcYgnywF3Mqg9KRIGg2ovD3nm4njfbu2ctElGtXX/pD4i5ICXW3frfN3aZQk +bSgXMSkF4ZefXd3zjkYSU/caDkxJwUOlh94ynXi/nQtOb5yWAqKm/eXbLpy/ +tG/9P3/jeAeMh2zxvG+qcTvnuDAXnmTFz7oO0mjcQBx2cLkgvy/qRuc4ngcP +dhyVX8UF9Q+tke9IfJ8wNZWb1uFCwZLmJdVcfB/RKGhoW82FmDtpawoW8JEG +P3pV3DouqB1X7b8ky8f9e+MvAcSFRq4yHFHmo9zzdy4MbePCQucoVdtVfKTq +wYVqay4cVKuu2aPLR1e3h47fsOHC5Lknw05r+Chc2mG3gx0X5sV3lnqt5yPH +NJbKa0cu0Nfj3DMA32dCA99mOeE1/ISVik34yOLgUESEC14vVcvupSkfrdao +4m08zIVHgYqWoxZ8lCWulSZ/lAuVWeriDCs+UuRfs54+xoXZ6cNWitv4KLGJ +IdTuxgUxl1FyvTUfSRT4Fhe4c+GU3JTDLhs++j8RtfNr + "]]}, + "Charting`Private`Tag$769532#3"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$875318#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.8375051008487648, + 9.114968599628327}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.8375051008487648, 5.}}}}, DisplayFunction -> Identity, AspectRatio -> + GoldenRatio^(-1), Axes -> {False, False}, AxesLabel -> {None, None}, + AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[10]}, {0, 5}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4vbl4aeMchwcvuz7uDXdTNbhDe8+g5leCH6E ++PaLDG4ODqlpICDjcDE/nv2cpYNDOoh7TBKiXsvB4WD3viYTZkmH45pWk07L +Q/VPk3D48630wZyJ9nA+2Bwze1R5Rls43+fixJh/wbYO8rsW7EtdJ+lw4rDT +2kw+O4c3bbndRrtlHJ5naX+bHmvn8B8E7ss6FG8V/X1azMGBPzbgvpG7kgPM +P3c0Zdf8b1aG8x+BPPJAFc4/BTJ3nobDkTagwCF7B5Eer1csJVoOEvPiNE8n +2MH5JSDz/9nA+U8TF14z0bdxSI6948YsoQHnz5jAX2XGrQbni4LUX1Fx8DnB +bjt7K4J/HGTvPgQfZj6MDw5vP1uHJ2BzVOH8wFvSNYmfEPwXoHCYqwYJL2Fb +h7+gcBRUh5sP45sYA8FiBP8MCMxB8MH6J8Pcrw4x/5yNw2bzH4dSVmk4HACF +T5Gtw4+3rw9YHtZ0qP1tVXDOwg7Oj1Fw/JhsYw/nTwWZc9sear4GnA8Lfxh/ +JgjcVIaEj6s9JD2JKTl82BCQPWu6nUM4p1i7cb8CPDzd1hxdzhAhBueD/WUs +6rC/VtYi3cUBzkdPzwA7R0nA + "]]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYCYh7/9VNSKxwc3rTldhtFyzrA+GuFdPjS7yk4 +7LzV9TeV3cEhPQ0Ipik58LipljK9snMoP7zNdeZfJYcl9/fxzfls75ABlld2 +eJK48JqJv4ODaI/XK5YQVTj/xK4dvWwG6nB+wC3pmkQhTQefixNj/i22dxAB +qS/Rctiil7eYscYOzld50jzvrJctnK/xlnefQaaNw38w0IDzJaZe4cxwUofz +WTi75JP91Bw+bAjInnXcxuFFlva36bJqDj4n2G1nf0Xjm9rC+SVbRX+frrN1 +2OHQ9Oh4BYIPcz+Mb2IMBJ/V4frrflsVnPPQcBAHueOTDZwPduZ9BJ8DFH63 +EHyZeXGapy/A3K/hoK+1UviCi62Duc3eoGkPNSHhm2wH5x9oWx5+qgjBB/vv +OoIfIb79IsM8e4dUUHy0Ifgw98P4G0DhvEcNYt8Ue4c0MFB1iFFw/JhsY+/A +AAIJKg4SIPc9sHMAedc4WNlBHRS+lXYOK7+9rDjjoOxwVeiT43k1O4fK+z9u +GVsrO0yZwF9ldtrW4cOi9QpnNZQd6lmO9htOt3XotPHclaYEle+2dTgDAjII +/t78mrcznyrB+WD9K5Qctpj/OJQyC8EHJQOTiwj+c1C8xdrB+WD3JtjD+WD/ +XbGHplcFOB8cPmmycP6OYKuI/+rikPhktXeIUY2QOVcjCom/fDs4H2zfXVs4 +H5wOHts4tCqwq56ZIgZJr102kPy0WxISnm9sIPmpThIev9NnAkGkFJx/3zXe +cZagDJxvADK3GOo+Fluoe+UcnoLyz3obOP8LOIMi+OD4ELOBuG+PLJwPDu83 +0nC+wq4F+1LXiUP0qUHTs7EIPH5hfHD+fGwP58PKB/VPKi9ndUo4oJcfAPoy +yPg= + "]]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQLe/4MflMr4OD+ieVl7M0ZR1g/Ir7P24Zd8s51LMc +7Td8bo/Bl1n+wkNPXgvOD7glXZM4CcH/8630wZyNWg4xCkAD9yD4Phcnxvxb +jOCrPmmed3YWgi8+9QpnRpO9w5xFyjv/pGs5bNDLW8z4xhpuP4wPc++Jw05r +M/nsMfjGIHBZAs7vi+j2ZxQQd+DxXz8llcPeoVWBXfXMFDGHGTOBQNMOzj8D +Am9sMfgmYANFHQ60LQ8/ZWTnUAVyj7coxD/K9nC++lvefQaVCH7JVtHfp88h ++ImHL2unJjrA+VO+scXPaHGAmw/jw+yPEN9+kSENwc9f03074wPC/bDwhvkP +xof5H8ZHj18YHwDMfN7/ + "], {{31.117199999999997`, + 7.635939999999998}, {28.220299999999995`, 7.635939999999998}, { + 31.117199999999997`, 12.1297}, {31.117199999999997`, + 7.635939999999998}}}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + FilledCurve[{{{1, 4, 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}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQzeO/fkpqhYPDGRB4I+cA43faeO5KW6TkoK+1UvjC +FXsHM5u9QdMOqjgsub+Pb85iOzjf5+LEmH+TbeH8/uASlen6tg7K1x4FM7xR +cpCZF6d5WsDWYeW3lxVnHBD8vfk1b2c+RfDXqz5pnvdWA2J/h52DOci8h5oO +NpURK0x17eF8kLKzsxD8/bWyFuksDg4nDjutzZyn6ZB4+LJ2qqKDgwdI4rmG +w5ru2xkM/Aj+FvMfh1JW2WPwN4DtV0eVT1d3SIi948Z8w97BxBgIPqs52Dc9 +Oj5D2AHOv5gfz37OEsEHOfdssIMDC2eXfLKfOpz/HwwQ/MntrVGXbTQh+iUd +HER6vF6xlGg58LipljJp2cP5M2YCwUpbOP+q0CfH82I2Do8ixLdfTFCH88Hx +paQE5+8Itor4ry4Oib8WW4j7jEXg4Qvjw+IXRR4Y/2/acruNdks4oKcPAFnp +5a8= + "], CompressedData[" +1:eJxTTMoPSmViYGAQA2IQnZoGBN/sHebMBIKfcg4wfsX9H7eMu2Xg/HQQnSbl +EKPg+DF5j73Dl30ft6ZPk3DIX9N9O6PA3qEKpN5bzEF86hXODCZ7hxjVCJlz +NaIOPP7rp6R22MH5KbF33JhP2ML5YPNybB12BFtF/FeXcOjxesViEgjjSzr4 +nGC3nW1qC7e/nuVov6G4rcObttxuo90ycP77ResVznIowPnVIPe8VnTQ11op +fKHF1sFjf62shbuKw4cNAdmzptvB+b3BJSrT7e3h/ASQ+2bYO+zNr3k7M1UZ +Yv9RqP+nKcHD446m7Jr/mxXhfGMQaFZwQA9PAP4Uj50= + "]}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.029061319383900032`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIjIIaxWZDYzFDMAOUzoImTqoYWenGZM9jcMxjcQK3w +IdWdAO3MAwM= + "], CompressedData[" +1:eJxl1Q1MlGUcAPDj6xgbHRx4H3An3Md7B++piJyZFdWf/P4gbsKSGpGpQKwC +G9TCMCgiZ2dxfgJqYsVCN9RLp5kSozEdJpqFsMbYYOBWCGzqyCEu6J7nuef/ +bNyzvbv97u79v+/z//+f5zFvLd1UEKJQKIJ8V5XvCvZd3WSkW2H8i/fcaQYt +cNeawm3dB7XQVlo50RgmfP+7s6abXRZ01BuuwbS/zZAz0fOg4Vu/683wq7v9 +s6UhOrD2DWcr0s0s/hU9rGm92qL4ywC3e18dX/y8BJWDU/3OGwbw2u7WHM+U +oKGRDAP81vny6eJPhOOP58s3PBLU+x3n9/ZC3/jBAAd3177ec0yCyfYHF4o+ +NMK9sguaJ2MSfEziu03gTSn5PqjNzubXZoXq0Kt1S56RYUvOpqQT1yX2faQD +giO+TNxWYgcjiZ/qAPq4Rrv//w5YaE6cfLcv0MaWf9amNAln/bEvb6bTAZn0 +0w76Q3ci3h52QJrTNw4Id12+9JXSJVxA5qO0w8au8BeO9vL7behzZB4DEprm +KUF4XsX+8ps5Voz3QefFVY3fWNDk8c4y4RWemphCR6Dn7V1/L7RcmM83lsa3 +YH5ofSqEWX4tUO+J2rlsgYPVP9IKrn5D5VsxwrRebTJ6emKs49kVMsY3kHje +ZBiQ57fOWi0wRurpTmb1PaxmeVptZs/bq4FUx6nY25LM6vVYw95/UoahVW9m +HFFr8f1o35bHofNsucZbefFo1o+BXkziNwvzfNXlurOCXMJLSX5jhWm/L4+b +Yz3W62t6vw5N43nVaFqvnmg0m28UxvuX5KPvKXTm3XV/Ph0r/LluV1ixMjLA +obTPhfl8O8i6HRHe0VLunclSoVk+YwI8S4eM5vUdnGP+O6unzO4bVLN6p8pg +/FHbFDykxP2iub9lZEmIkuUpWgcuMr+eMNx/aD42zrzEPb5r5J3fW6fRNWR+ +16YCTPvkZw2a1s2pYe9TNY0eemV0y39NT9DLty56MQxm0UkPpdEje4JgJ+mL +DRrWf6+FoBVkVKvQl7Kfy51NikbT+2U14PP8+eFm61WY9Xeg+f7NzedbQfc/ +YdZPajTvn7mm6+yRMH2v93VosvwKr+kgMkO1vqFYxfp6Sg82Mp/rKn/94iCb +nAsZatgcod3trDMxf6qHX8i5UmCF0zELVUX5CXg/7b+aBEi8fKK94IyexTma +wPaF7cKsH4T5+UPzct6I86H74Uphfv5ws/UfaNpXrRo0zzdbH8I/kXqGG9Hs ++fPR7DxKxHqffDT6UbfHhC4iebxoRrP6W9B8f+XxaB7uCNPfHwvz83uueX/8 +D+zIOKo= + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, + 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgAmJ+KN3IcrTfsN3cYeW3lxVnDig5wPgilZNKzpooO5gY +A0Ewgu9zgt12tiqC/x8E5A3g/C3mPw6lvNKH86e0t0ZdrsHk88cG3Dc6rgTn +G4PtUXLQ11opfOEJgg8zH8aH2Q/jM4BAAIIPcz86H91/B7r3NZksloHzK+7/ +uGXcLQv3L4wPsw/Gh7kHxof5F8aH+Qed3xvR7c+4QQbO3xFsFfH/uDTcvzA+ +zHwYH2Y/jA/zL4wPcz86H+Y/AEsPyDI= + "]], + + 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, 4, 3}, {0, + 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQAWIQzeO/fkpqhYNDjGqEzDkZWQcYv/zwNteZfxUc3vDu +M5jJ5eDwHwT4lRyuCn1yPK9m7yBSOankrImyQ29wicr0/fYOM0HgprLDk8SF +10z8HRwCb0nXJH5SgfNNjIHgsxqcn5oGBGyaDhHi2y8yzAOa1+P1iqVEy+EG +UJtRqx2cX89ytN8w3BbO13gLdFCmjYOuovyXnG0acP6MCfxVZt1qcP4GvbzF +jHtUHT5sCMie1W7j8Kp4q+jv1yoOtpURK0zv2jhMaW+Nuiyj4lACFD79zwbi +37PKDn++lT6Yw2jrIBAbcN/ouDLE/uu2DsrXHgUzzFFyeApy/3obiH87FSHh +IWbjEPL28scZD+XhfLD/0mTgfLc1R5czRIg7qDxpnnfWyxYSHsYiDktfeOj9 +b7SD8/W1VgpfuGIP58Pi401bbreRtIQDenwBALIeuC0= + "], {{ + 32.12969999999999, 11.462499999999999`}, {32.12969999999999, + 10.7359}, {31.604699999999998`, 10.151600000000002`}, { + 30.914100000000005`, 9.770310000000002}, {29.5313, 10.6766}, { + 29.376599999999993`, 10.782799999999998`}, {28.899999999999995`, + 11.093800000000002`}, {28.899999999999995`, 11.6781}, { + 28.899999999999995`, 12.4516}, {29.709400000000002`, + 12.940600000000002`}, {30.507799999999992`, + 12.940600000000002`}, {31.367199999999997`, + 12.940600000000002`}, {32.12969999999999, 12.3219}, { + 32.12969999999999, 11.462499999999999`}}, {{32.392199999999995`, + 6.8968799999999995`}, {32.392199999999995`, + 5.9906299999999995`}, {31.473399999999994`, + 5.371880000000001}, {30.52029999999999, 5.371880000000001}, { + 29.507799999999992`, 5.371880000000001}, {28.637500000000003`, + 6.110939999999999}, {28.637500000000003`, 7.099999999999999}, { + 28.637500000000003`, 8.02969}, {29.3172, 8.781249999999998}, { + 30.09059999999999, 9.139059999999999}, {31.5344, + 8.196879999999998}, {31.843799999999987`, 7.993750000000002}, { + 32.392199999999995`, 7.624999999999999}, {32.392199999999995`, + 6.8968799999999995`}}}]}, + Thickness[0.029061319383900032`]]}, { + ImageSize -> {51.61464508094646, 24.508064757160646`}, + ImageSize -> {34.40976338729764, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {35., 17.}, PlotRange -> {{0., 34.41}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.8045938854165163`*^9, 3.804593942251832*^9}, + CellLabel->"Out[81]=",ExpressionUUID->"ff21b187-66af-4888-b476-be441ff52a26"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENcsf", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENcsf", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENcsf", ",", "4"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENcsf", ",", "5"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "100"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "6.25"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<3\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<4\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<5\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804411845217041*^9, 3.804411855779501*^9}, { + 3.8044119618305197`*^9, 3.804411968886217*^9}, 3.8044122399171963`*^9, { + 3.804476777106*^9, 3.8044767962873993`*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"c3167044-0b3a-4d75-b604-360134b7bd26"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"21.59359334096627`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"12.79774888480695`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.7761645821725922`*^-15\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"8.881784197001252`*^-16\\\", \\\" \\\", \\\"\[Epsilon]\ +\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1.3330447324257093`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"12.79774888480695`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", \ +RowBox[{\\\"8.881784197001252`*^-16\\\", \\\" \\\", \\\"\[Lambda]\\\"}]}]}], \ +\\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 22, 1, 22585218013090804769, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.80441185696203*^9, 3.8044119698848333`*^9, + 3.804412268318839*^9, 3.804476807808941*^9}, + CellLabel-> + "During evaluation of \ +In[22]:=",ExpressionUUID->"bc7c93fa-58e9-4e22-a24a-28dcbc3070e0"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"585.9922993304493`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"368.8902278957289`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"39.93507105613517`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"-\\\", RowBox[{\\\"5.778983230033349`*^-14\\\", \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"3.15622906933095`*^-14\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\ +\\\"1.3322676295501878`*^-15\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"50.56772067214138`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"5.011159994139094`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"3.503624054189531`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"368.8902278957289`\\\"}], \\\"+\\\", RowBox[{\\\"79.87014211227034`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"3.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"3.15622906933095`*^-14\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\ +\\\", RowBox[{\\\"2.6645352591003757`*^-15\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"5.011159994139094`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 22, 2, 22585218013090804769, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.80441185696203*^9, 3.8044119698848333`*^9, + 3.804412268318839*^9, 3.804476808065049*^9}, + CellLabel-> + "During evaluation of \ +In[22]:=",ExpressionUUID->"667750b0-e2a9-4cb4-bb3b-eef9f28cebb9"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"30092.120638919012`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"19529.39693628587`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", \ +RowBox[{\\\"2419.6526309479736`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"91.28748758669718`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.4062503963907685`*^-12\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"6.956687116761015`*^-13\\\", \\\" \\\", \\\"\[Epsilon]\ +\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"6.4309519675957994`*^-15\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1.3322676295501878`*^-15\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"2950.040025301748`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"434.06871746637023`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"11.360384029705582`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"291.8857356622491`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"17.734989302371403`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"6.222891589650698`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"19529.39693628587`\\\"}], \\\"+\\\", RowBox[{\\\"4839.305261895947`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"273.86246276009155`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"4.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"+\\\", RowBox[{RowBox[{\\\"\[LeftSkeleton]\\\", \\\"23\\\", \ +\\\"\[RightSkeleton]\\\"}], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{RowBox[{\\\"\[LeftSkeleton]\\\", \\\"24\\\", \ +\\\"\[RightSkeleton]\\\"}], \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\ +\[RightSkeleton]\\\"}], \\\"+\\\", RowBox[{\\\"434.06871746637023`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"22.720768059411164`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"17.734989302371403`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 22, 3, + 22585218013090804769, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.80441185696203*^9, 3.8044119698848333`*^9, + 3.804412268318839*^9, 3.8044768081663713`*^9}, + CellLabel-> + "During evaluation of \ +In[22]:=",ExpressionUUID->"e7f1e7ea-5af6-4788-9de0-f2cd89d15153"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 22, 4, 22585218013090804769, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.80441185696203*^9, 3.8044119698848333`*^9, + 3.804412268318839*^9, 3.8044768082653723`*^9}, + CellLabel-> + "During evaluation of \ +In[22]:=",ExpressionUUID->"1aab8cae-3340-4b03-8c76-6707f232263b"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0Hs0lAkcxvFpxoxUM8281CaXhs6iG0ptyeX3O0Ml69YFyeUUSaJVSFlJ +tQiFTrHShd1tLbsIzQjb0avJZVtOMtI7dHGdUe5NmkFiZ/94zvd8/n2MAiP2 +BtNpNJqrev/3hu5ovcBcTpq3DR4djeMgPYM1oeDLSVaS6PKxkxw8Sefr3dOW +k6or1pHvj3DQZXjvKca0jFTGnbmjdOUgq7baoP6pjPx80Y7jwufg2UOJMTt8 +ZKTNttjSzgY2BhTqmTklDpAmotvWkTpsXLPF+YprVx85KM41MCcX45Y7Dwr8 +49+R8dZ9q2KWaeE5vyp2Wh1FutGK2MIuFgpajTSvfttGMn3N16b2aWB8bA8z +RvmU/Omt0blAFR0V9Wtq8w7+RRYnbppm+y1An2RO2qb8Mtj1ZjLvzM15CHNP +bss2boTw4OXk465ZsJvwL9whaoPooZxD8owZYD/OCrohl4JKa8a3au8UxH4d +2Hkmrxsa95UX3o5SwuaGkBbByn5QSY1HXFomwZ2zLvpTiRyiNjpuFlp8Amtu +nEUEfQgya+RfDF59hCad3NCs/FEQVCjYmskTsJh/6cRg9gTQ09tHtR6PwUpi +zuK4nQIMyUmT6tYRiGP2VjxZOAkez5gSj7EhcPBMqz1f+RmcR1et2OD7AQL+ +uJXCTVbBNpMFCafaB6Ezbc/4erdpuM3zbHoUJ4dHzc+776tm4GD/PCHxlcE4 +W5jJbJiFCdHmY8UOA5BW4v/sSdQcGOlrGOn59IMgwttdg01D7rBB6kBqH7xP +EeoSChr+XJvz6yzZC+IXiiJJ0wJ8OB5h0r+8F3bkynLiy+io37HvwrnIHjhb +XPxy9DoDlfG9cyH13dA9vP8VN0QDHdof1BVJ3sF4ScVWQ1cmfrJVWLoNvgWr +Ox/9361mYU2WkdN247dg2qEhCVKyUOQgtF8e/QbqM5oL2rs0sZ22jbbn39eQ +FXPaXlm2ECf6Xlw1sH0NnG7Jd4wcLWwJe8horuiCR6e1J8U/LMKL/k3ls3Zd +sMLLdH6XYDG2TqtWCqlOMKwaC60yXYJ8iXkmN7oTDuzMze38ugSNg6yofH4n +2HipzOQyNmYqCgIut0rheZkZq/oZB81MhjcGpEghe6tdkW3eUgz8sbLmiYsU +GL/QOzwFXNw07FFaS0jB0+ZAtbyUi8Vhfw+s6aMgIS5HcPAbHrZ42etDFQVf +48pnxak8nPCUXQtLpyBb20Y3aZKHKat/jww6TsEiZWHzYSUPG5sH1rWGUnBB +qnPefoqH5Yb6a23UDr871qf6wsPKpLFJ7WMUOJr+VnKcQeDND/fq/gmmQLFd +Cz0IAsX8DB04TIFHIHVUz5LASzm72/0PUNDo6Kg7tZHAqVveY23eFNiaVjS/ +tCKwwzHGeafapiNplhlbCSxJD2+w8KJg7rT9DA0IXL/so5i5n4LS1IJ0uSuB +ZhIzca07BcbhBD51J/B6uGXPFrVvuiUo8vcQeFkzzO6+GwWJ2j7ePp4EjtUw +KvNdKfC7u8SoxY9AYWBmdtL3FEgSYtuLAgikKWf+nHemwClQnpR0iEDbnrLZ +WLWtTOuG7I8Q2Cq/6Bexm4IirQ139Y4SyLQJDh1yosBwJNd9KoRAVy9DUbDa +Wc9Z9I5QApfGXLPt3aX+syJKVBFG4AlZHt1f7f8A0glOPw== + "]]}, + Annotation[#, "Charting`Private`Tag$6000#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0Hk41AkYwPExrgYzzG9qSxYju0YrIklR3rfJ1SFHjhS2JB5H2yHXMizJ +U1PRE6op0dOuXKPZUUpbmp87kTKlpF06mG0xYmjc2t0/vs/n/69J6GGfg1QK +heLxX/+bqy9v5FrJJDArocjNdZGarTGqYMskc9V1DC1DXTxCZRv8ypJJ3qZf +0V7F1MUdQz5HVacHJMdar7amTjNQo7bGsLFhQCK2uGj44xMGJu7LjHcJHJB4 +bJ4Jph1iYEiJgbl7Zr/EKUnNRllNx5V228549HyQ8Ni5/g1+OmhXUFUczOuV +lBe4PFh6kYYpQffofPK1pOK3skdP3TWR+8xE8+z3nZIbX+yLjVEdeUnv1OOV +DZIpp53M286qqGhcWVu4p1ziMhqwLvuqCgZmMfhrikSwwG/+x3LuK0R7ZnXm +r2iGZ9MXE2hm87BpNLjE5U4nJASZRbs3zQD9Ud6BXFk33M+QZW44PgVJ8/2u +CYV9YFERFmV0QglrmyLaucs/QrF2okp42wR4MiyOjwtlwB9z2b/WaBw26CWv +PkwdBMuM4Zbv7o5By2JBZF6RHG5d/mPQJ2AUtNkZh/7OH4XtkZRci045LCcW +VkdtUkCsT9+SIMchSFZ/L65bNAHej92sfO9+gi1+/NrU6i/w8BaTJRLIIOTm +lVN6WZPQfig+SnqmH97wvT+v2jkNnBT2waHaD/CgraPv1uQMLB6bTT/v8B4+ +02/nqDfNQYxdpSA8ow/4wuDWutgF+Paj8biI9hdwDwd4qtEpuN7a+Cy9pwc+ +nbqtTygoyGa12GjVdEP9c0WptEUFRyzsPUxHXoGLYOAST0TFwmH78hDrLkis +qHgpv6CKBVme1OulL6BvyPeVXoQaPv4ovK+5TwqfhWJ7Iw913LbE4FytcSfY +FowF95pqYGJn/LQD6zlwutSkB5QaWF0kHz+2vQMas9uKX/RoYu+k3H4guR3y +4uOclKJFGMpSqdk8+QQYfdJ1qpdo2EVeFvantMKDONZE/U9auBDGJnvhMSzz +53x142qjKL33ShmnBYzujUTe4+ig9P0Rk7PfNMNuV4HgzbwO7k232yy2aQJH +/0lz2QAdb5a77eHsaoQOkblGTSsDrXCVRmtOA+TbbyrdWKiLb2x2hekO14Pq +dWqXH1cPpY9KNct21IOf4+4aWaUeXnDyLjBrqYO05EvcPUuZeBfVLvzgXQfz +yb/P1Z9mosHRVILTS0I+y1H/5AQTT1RX+j7lkaClLGnbr2Tiet/oJLsUEn7p +XpzqNMVEK9+svYU/kxBzbeTD5CwTRwri/I8lkODMuSGMUiWwub3c0PQoCQoH +GnoRBOaIecUlYSR4hb4ON7AmMGEuaIvDDhKanZ31p2wIfPayI+b+NhI2csRt +L20JnEged9+wlQTOMN86255A1nKtZY6uJCzEOc1QgEBL7YhFbkhC5eniczIP +Alt41oNpa0lYEUNggyeBT0K8lmnZknB5Z5qiyJtAolZzIs+GhExWYECgH4Fl +PrNVQisSgq7pmLQHEXievsa135wEaVrSi9IQAqtstnbHckhwD5WdPLmPQC/H +xCVqZiTYcshBpzACR/98l2NmSkIpzfKaQTiBW51T2mtMSDAaFnhORRAYYDFe +tZ1NQl6HBrUrksDwt0pun9F/P8Wxd8TRBD6sWZ8Sa0jCv8tfOa4= + "]]}, + Annotation[#, "Charting`Private`Tag$6000#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVj3k01AkcwDXDMBjHj/dqck283qQDraQS368ReTZHIeNqS4cjV8eIlUhY +jdJbx0Ml+yoZUUi/oVQjR3LsFLKTekUyY0sThlyhbf/4vM/7/PlZFRKz5zBF +SUnJ/Sf/O5cpb+FYyEQRi/pWrr9qIyWbNq5gyUTkuiCGE2hjLIVlcENPJgJz +BxnHWht3je45Rp2TiuJ+pKfuNtBG2uN6o5ZmqYjNsV93e1QL4/enxTn7S0Ur +fnsTu/OiFu4rM1jjmjYs4vV35Zu9YqC5jVuW+5shUcVyY9fJGE20uXqvNDjp +vchO8jFwm4COp4PqGPxGicjI9gJnuY8qcl6sUr2wuluU6uG9hM4qmJQwqBI3 +3Sw6ejJCUutERUWL+eNrAbdFJs8jDXflL0P/DC3+LyVV8ODiLkdT6Q846pnR +nW/6DOwCqR1RKotgPx5c5ny/G9wC5iYDr84D40newVzZa2iuLht+y5mFhMVh +l1PXBsBRM2vJz20aNrWGdnFWfoT+gtOLT7KmwFNr3cnJShl8P3RdOV6igK06 +iZYxlM9QbnHF0TB8Atr0i8LzSuRw6dapgGbqOGiwUqNG8seh3SaSoZojh5XE +kmWEvQJuW3lR76SMQqLKh5qnalPQr1foxj32CZx8+Y/PkN+g1MFxyGXbCOy7 +dTlTJ2MGosULq/8mpNDP3z223mMObGQG/CSLj9DQKR64OzMPMlY2L7LwA4wx +ai+ptC7A5Rij4581B4FfGdz+9MQSjLZoxPWnvgNOjJ+nMkMJBzWqablb3sK/ +mbVMQqGEIWGHidqF19D0UiHoaVuG3oWsc5uNJOBcJC1IqqKgZnSyS7pbH8RX +VLyS51CxRrA+wCKzFwZGff7RCVXGtqKzjevnu2GsssbW2F0Fnf4o3uAZ9xKs +r04Evzej4d2z33jcEDGw+5R7Dk7TsKOuw9PErAtasjtLe9+oIvfEo2HBRDvk +xfEcpqvUMLrMh2xd+Ry0Bno2UwvomCo5EGvo9QwaeHpTTdHq2HGBdenPFy2w +Yi/7x06OBo7cPDAQm9gMxnVfw+vYmpgfu1V+07IJuC5FRf2LmugTEmsTyHwK +dntn1sikDIzict7GqzeCuGoNrb5dC2VpzPL2LU8g39ZesP2aNkbtNdnsUf4I +qH9R+nw5Ouhn7BUuN2sAXztuveyODoov06vC3j2A5MQCTsByXUwZOl+S+age +FhOrF5rO62Kql1rrlet1kK9nx0yf0sWxtaEZ5kIhqE+XdR6Y1sUbLHt9vCeE +lNf6ZxxmddHb3zWae1cIkcVfh2a+62KYmDyXfUsIO9jXKyOoBM4xKUY6BUJQ +bKOjF0Hg7wlO3mHxQvAKkRwxsPrZxIhV6HYhPNuxgzm7kcC1G5eR5BYhbGfX +dL6yJtBX3jCqYiME9he+VbYtgWN9s1EVG4SwxHOYVwIC6VmfqtRNhHDnfOlF +mTuBxQ/Lk5gUIZhGEtjsSSBvIvpF6hIJhR7JipLdBNYO5rbJ50lI0/P38/cl +MHx+puz5JAlBxZqruoIItKw21c+RktCTnNAr2EfgQ8P+c2pDJLiGyNLT9//8 +0R3PTXlPgjW78bPDIQLNNrnk8CQkCOgbig2OECjYSk9W9JJg/KXIczaUwN5S +G/qxlyTkiWmUvnACDd8xrCa6SFCvOXG/5iiB3xz6FMfbSfgP7B89yw== + "]]}, + Annotation[#, "Charting`Private`Tag$6000#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVkGk41AkcgDXMOHLM/LGRVqm20RM5Msk1v99O6HDFkGiorRC1VCLl2pIJ +lW1lsiq0VLQM6z/EUzFEVEoZydHj6DBKIZPGkbT14X3eb++H12hXhFcQRUFB +we07P3xef6SRs1oqtg67kxrmqYWUdNpH2RKpWD/qGMPHSQsPUJYYFGhLxYuq +Ki462mih63uvg4rTg+L4COcblkZaSKup/rmxYVBcQCmO2zyuiTE7T0Y7+Q2K +w28LTUMyNDGw0MB448k3Yufpz+HOXRq4krX5tFvPK/Eeb36fySF1ZF0mrwXE +94llvkHnBNdVMY5XpZFW1ykupra7LPdQRs4TI+Uzv7SJu6lTxz0dqBh/dIAa +LW8Qb+etZzWvU0RZ48qaXP9/xbbPD/MenpqHfnzNNMu8MhiUZAqHG7/BPg9+ +m2BpEyTWneNFDsyCw8eAQqeKNshI/OkGK3IGNGozd5+XdoFXEkvnoO4UHP36 +xvlIbj/ESoJFK/TlYHUv5BFn4Wvg6/lKqL4T4KG56vCnEilE6dqX6+TJwIYe +axZBGQb2856oA6bj0KyTHZqZNwJJ72zSualjMH/Jid+HBB/h9P24C1yNEVhI +zJmFOcjgPG07oScfhljqy/J6lQmw6pYvYA+/hfU+aTUJlZ+hmfwctNhiCAKv +X0yh8ydhzGC5Z4rvIHSneY6ZuE/DpQUDwnXBr+F2S2t/6eQMjBN2JS73XsKY +huhP6r1ZcClNPg1mA5BWEvCgPnIOrho/zpdW9gInwtdDSUMBk3hWW3R5L+Bt +ikifkClgRkOJCp3RDXefyookzfPw7br6433LO8EpezArvoyCpRukrk1OHRBT +XPxsJEMR28JX9NReaYf+997P6SFKaGaCgjSQwFhJubWhGxV9plfUrRx6Cmsu +jwf0LaOhcYbcr+DME2B2KEl2y2nYfXXRJX/Tx9CY3nKtvUcZTzWxdgzkPoTM +6Ci2vEwFgRu6in3sPmj2S9YqZqliygTHf+GeJrgdpT1xN1wND9mXxxy72gh6 +W5nfNnDm45EBndlKvQYwrBoNrWKqo5ybxG2+UA/bnLOzu7+qowmXf8KcWwd2 +WyeNpYMa2Or6aUxgXgutZca06geaaG/5SXW18h0QWDsU2edqYZna/FbZ2lug +eIXS4cOho01SZHTcoWrwsdtWLRXSccT2FYs+eRMSY7M4/gsYmElOmG0vrISv +sf/N3k1lYHLPu7XCHRUg0LbTT55g4OgmruEjVxGoyQtbfpMzsNhtWS1sFMEf +XToJ7CkGmr74J7JyvQj254y+mvzCQPPDvQaFtiJwZOaXhCkSaPnkunOBsQhk +tqq4hSDwYEybxZySCLbs6gw2MCdwccJwp7WYhCZHR/0pCwKB5s37cIsEe2Z5 +y7M1BBpGlXbl3ySB+SHNPN2awLEiYaVuKQlzUewZBSCwa+bSEJFDgjD12lmp +G4HffPbuDoslYel+Ahs8vvev9H5xOELC3+6JsjxPAm+pqCRoR5JwUtvP18+H +wOgaun1jGAm8HHWjRzwC3W2D+Pb+JEgSj7YXBRLYe9bKe/FWEjbukiYn7yRw +1KJFScmLhDXMumH2HgJd3B+otW8ioUjVNMcgmMC95+IDa5xIMPyQ7TEVQuAk +M/GvG7+SkNlKo3SEEhjYN52f5UCCWnlkRfm+73+MNTNO2ZDwP18KOd8= + "]]}, + Annotation[#, "Charting`Private`Tag$6000#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$70292#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4tdtud1GvyUcvuz7uDXdTNZBYdeCfanvxOF8 +jU8qL2edFHdITQMBGYcdwVYR/9PFHdJB3GOSUPViDge79zWZMEs6uK05upxh +hhhE/zQJBwYQeCAM5xuDQLEQqrwDM5wf8MTzkullVgd5kLnrJCH2LON2eANy +524ZB5mNYvOZFPgc/oPAfVmHvohuf8YAMQf+2ID7Ru5KDjD/3NGUXfO/WRnO +fxQhvv3iA1U4/9Rhp7WZ8zQcRConlZxdIuIg0uP1iqVEy2Gr1waLOZZ8cD63 +I5/XDE1mOP/S72PX50X+tE+OvePGLKEB58+YwF9lxq0G54uC1F9Rgbj3AYMD +jA/2jxojnA8zH8YHh+NiVocniQuvmeirwvmBt6RrEj8h+C+ytL9Nn6sGDS9m +h7/fSh/MEVSHmw/jnwEBHwY4fyYISCL4c09MXpK97D/U/epQ8xkdNpv/OJSy +SgMa/2wOP96+PmB5WBMSPj954PzK+z9uGXcLwfkZIPvZRKHma8D5sPCH8cHu +uKns0A+Kvw1CEHeLKTn0gvgf+B3COcXajfsV4OEJTlcRYnC+CTghiTpEqUbI +nNsj7gDjo6dnAIixRIw= + "]]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYC4mjVCJlzMZIOb9pyu42iZR1g/LVCOnzp9xQc +2hTYVc9cEXVITwOCaUoOwW8vf5zhKOhQfnib68y/Sg47gq0i/qeLOmSA5ZUd +jEFAWMJBtMfrFUuIKpx/YteOXjYDdTg/4JZ0TaKQpoPGJ5WXszRFHERA6ku0 +HHyfeF4yFeaH88Hynaxw/lavDRZzfv6x/w8GGnC+xNQrnBlO6nA+C2eXfLKf +mkN/RLc/YwGjw4ss7W/TZdUcZDaKzWd6wITGZ4HzeRz5vGZosjvscGh6dLwC +wYe5H8Y3Afnjszpcf91vq4JzHhoOzeK1rJnHmOB8sH+NEfwlt5Y/NmRG8LeD +3LuT0QHifg2HmSAQyepgbrM3aNpDTYeC5SUb/vnzwfmqoPA4ieC7rzm6nOGH +AJz/wDXecZagiEMqKD7aEHyY+2H8DXp5ixn3qDmcAYE3wg5pYKDqUHn/xy3j +biEHBhBIUIGkBxlBiD+ClR1iQPw/fA4rv72sOOOgDAmPTB6IPmtliHk9nA4f +Fq1XOKuh7PCi9nH2+TfsDp02nrvSlGDy7BBaBsHfm1/zduZTJTgfrH+FEiQ8 +2TjgfLD9ezjhfHD4K/DB+RD3CsP5EP+JQNOrApwPDp80WTgfnI7VxSHpZYMg +xJ4aUUg8b+aD8yH2ccH5YP0+TA6toHwyRczBH5x+/9uD89NuSYcv+z5uTZ/G +BMlPdZLw+J0OpqXg/PvgeJGB8w1A9hbLQvnMUPfKObwEhecaBji/AZze/tjD ++BJNMlMMLn+3h4STLJwP8ac0nK+wa8G+1HXi0HhngfjTWAQevzA+JH+Kwvmw +8kEdnC8lHNDLDwACiL6P + "]]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQvT3YKuI/u5SD+ieVl7M0ZR1g/Ir7P24Zd8s5fNn3 +cWu6mSgGX2b5Cw89eS04P+CWdE3iJAT/z7fSB3M2ajlUgvWJwPkaYHsQfJHK +SSVnWRD8g937mkwWCzvMWaS880+6lsO8E5OXZKt9tYfZD+PD3GsMApcFHdD5 +EFoCzu+L6PZnFBB3eNOW2220W9ChVYFd9cwUMQcGEGjggfNnzAQBLgy+Cdgg +UQdVkD0neRyqQO7xFoXaKwTnrxXS4UuvE4bz20DmXBGB84VB/l0iAeevAanf +Jwk3H8aH2Q82/6QEnA92f7QonA8Lb5j/YHyY/2F89PiF8QF+Y9cw + "], {{ + 4.517189999999999, 7.635939999999998}, {1.6203099999999997`, + 7.635939999999998}, {4.517189999999999, 12.1297}, { + 4.517189999999999, 7.635939999999998}}}]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzFDMAOUzoInTgk1Pu6jFBgDBVwJ/ + + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4tdtud1GvyUcdgRbRfw/LucA4ztPaBZKs1Jy +0Pik8nKWpqhDI8vRfsPpKhB16gJw/oHufU0mj7ng/L6Ibn/GDWwOa4V0+NL/ +KTvc4L0tlmrG4mAMAsEIvsTUK5wZThoOhctLNvzz53DYoPqked5bdYf0NCBY +xu3gsb9W1uK5uoMJSN9mHjg/WjVC5tweYTi/6v6PW8ba4g7mNnuDpj3UhPMb +QO4x14Lzj+/a0csWoAUxT1jcgYWzSz45Twviv5NiOPlua44uZ5iB4EPME3Pw +OcFuOztUC+LPOmGHH29fH7A8rOnQqsCuesZE0EFmXpzm6Q2aDr2g8PjAD+eD +w2sxJ5zP48jnNUOT1WH6BP4qM20th5kgEMnssEEvbzFjjJbDy9rH2efXMMHt +B4dPGm7+QbD5jBj8hJAg9QWeCP6cRco7/zzXhPPB8XNZCc7fm1/zdmYqgr/y +28uKMw5KDs3itayZx5jgfAYQcGCG82Hu548NuG/kruRwBgR8WBz+g0C/ksM2 +rw0Wc36yObiA0leXMiQ+irkdprS3Rl2WUYHEr4wAnA+xXwjOB9v3QNjhgWu8 +46yPUPc5i0Ds7VSCiAuKOihfexTMMEfRYR0ofuREIe4rUIDz74PVycP5IW8v +f5zhKAvnq4PSQacUNF8IOwhXTio5myLh8AaUP3YLOSjsWrAvdZ0YxF/3BRxi +QO6uEYX4t4cXzl9ya/ljQ2d2OB+c3vkZIfYtFHd4A47ff/ZgeRlph7knJi/J +XvbfXgRkH4s0JL0kMzi4g9LhDykHmY1i85keIPjg8KphgvMh5rNC/FcojcoX +lIXzU8HpRg4ef2D/asrDzYfxIfH3zx7Gv/T72PV5kT8h7t0jB+dDwkEGzoek +JwkHbnD6ZobEs7EIJBz28ML5sPiD8WHlDyScJRzQyycAyAXi0w== + "]]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[100]}, {0, 6.25}}, {{-0.6931471805599453, 4.605170185988092}, { + 0, 6.25}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0Hs0lAkcxvFpxoxUM8281CaXhs6iG0ptyeX3O0Ml69YFyeUUSaJVSFlJ +tQiFTrHShd1tLbsIzQjb0avJZVtOMtI7dHGdUe5NmkFiZ/94zvd8/n2MAiP2 +BtNpNJqrev/3hu5ovcBcTpq3DR4djeMgPYM1oeDLSVaS6PKxkxw8Sefr3dOW +k6or1pHvj3DQZXjvKca0jFTGnbmjdOUgq7baoP6pjPx80Y7jwufg2UOJMTt8 +ZKTNttjSzgY2BhTqmTklDpAmotvWkTpsXLPF+YprVx85KM41MCcX45Y7Dwr8 +49+R8dZ9q2KWaeE5vyp2Wh1FutGK2MIuFgpajTSvfttGMn3N16b2aWB8bA8z +RvmU/Omt0blAFR0V9Wtq8w7+RRYnbppm+y1An2RO2qb8Mtj1ZjLvzM15CHNP +bss2boTw4OXk465ZsJvwL9whaoPooZxD8owZYD/OCrohl4JKa8a3au8UxH4d +2Hkmrxsa95UX3o5SwuaGkBbByn5QSY1HXFomwZ2zLvpTiRyiNjpuFlp8Amtu +nEUEfQgya+RfDF59hCad3NCs/FEQVCjYmskTsJh/6cRg9gTQ09tHtR6PwUpi +zuK4nQIMyUmT6tYRiGP2VjxZOAkez5gSj7EhcPBMqz1f+RmcR1et2OD7AQL+ +uJXCTVbBNpMFCafaB6Ezbc/4erdpuM3zbHoUJ4dHzc+776tm4GD/PCHxlcE4 +W5jJbJiFCdHmY8UOA5BW4v/sSdQcGOlrGOn59IMgwttdg01D7rBB6kBqH7xP +EeoSChr+XJvz6yzZC+IXiiJJ0wJ8OB5h0r+8F3bkynLiy+io37HvwrnIHjhb +XPxy9DoDlfG9cyH13dA9vP8VN0QDHdof1BVJ3sF4ScVWQ1cmfrJVWLoNvgWr +Ox/9361mYU2WkdN247dg2qEhCVKyUOQgtF8e/QbqM5oL2rs0sZ22jbbn39eQ +FXPaXlm2ECf6Xlw1sH0NnG7Jd4wcLWwJe8horuiCR6e1J8U/LMKL/k3ls3Zd +sMLLdH6XYDG2TqtWCqlOMKwaC60yXYJ8iXkmN7oTDuzMze38ugSNg6yofH4n +2HipzOQyNmYqCgIut0rheZkZq/oZB81MhjcGpEghe6tdkW3eUgz8sbLmiYsU +GL/QOzwFXNw07FFaS0jB0+ZAtbyUi8Vhfw+s6aMgIS5HcPAbHrZ42etDFQVf +48pnxak8nPCUXQtLpyBb20Y3aZKHKat/jww6TsEiZWHzYSUPG5sH1rWGUnBB +qnPefoqH5Yb6a23UDr871qf6wsPKpLFJ7WMUOJr+VnKcQeDND/fq/gmmQLFd +Cz0IAsX8DB04TIFHIHVUz5LASzm72/0PUNDo6Kg7tZHAqVveY23eFNiaVjS/ +tCKwwzHGeafapiNplhlbCSxJD2+w8KJg7rT9DA0IXL/so5i5n4LS1IJ0uSuB +ZhIzca07BcbhBD51J/B6uGXPFrVvuiUo8vcQeFkzzO6+GwWJ2j7ePp4EjtUw +KvNdKfC7u8SoxY9AYWBmdtL3FEgSYtuLAgikKWf+nHemwClQnpR0iEDbnrLZ +WLWtTOuG7I8Q2Cq/6Bexm4IirQ139Y4SyLQJDh1yosBwJNd9KoRAVy9DUbDa +Wc9Z9I5QApfGXLPt3aX+syJKVBFG4AlZHt1f7f8A0glOPw== + "]]}, + "Charting`Private`Tag$6000#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0Hk41AkYwPExrgYzzG9qSxYju0YrIklR3rfJ1SFHjhS2JB5H2yHXMizJ +U1PRE6op0dOuXKPZUUpbmp87kTKlpF06mG0xYmjc2t0/vs/n/69J6GGfg1QK +heLxX/+bqy9v5FrJJDArocjNdZGarTGqYMskc9V1DC1DXTxCZRv8ypJJ3qZf +0V7F1MUdQz5HVacHJMdar7amTjNQo7bGsLFhQCK2uGj44xMGJu7LjHcJHJB4 +bJ4Jph1iYEiJgbl7Zr/EKUnNRllNx5V228549HyQ8Ni5/g1+OmhXUFUczOuV +lBe4PFh6kYYpQffofPK1pOK3skdP3TWR+8xE8+z3nZIbX+yLjVEdeUnv1OOV +DZIpp53M286qqGhcWVu4p1ziMhqwLvuqCgZmMfhrikSwwG/+x3LuK0R7ZnXm +r2iGZ9MXE2hm87BpNLjE5U4nJASZRbs3zQD9Ud6BXFk33M+QZW44PgVJ8/2u +CYV9YFERFmV0QglrmyLaucs/QrF2okp42wR4MiyOjwtlwB9z2b/WaBw26CWv +PkwdBMuM4Zbv7o5By2JBZF6RHG5d/mPQJ2AUtNkZh/7OH4XtkZRci045LCcW +VkdtUkCsT9+SIMchSFZ/L65bNAHej92sfO9+gi1+/NrU6i/w8BaTJRLIIOTm +lVN6WZPQfig+SnqmH97wvT+v2jkNnBT2waHaD/CgraPv1uQMLB6bTT/v8B4+ +02/nqDfNQYxdpSA8ow/4wuDWutgF+Paj8biI9hdwDwd4qtEpuN7a+Cy9pwc+ +nbqtTygoyGa12GjVdEP9c0WptEUFRyzsPUxHXoGLYOAST0TFwmH78hDrLkis +qHgpv6CKBVme1OulL6BvyPeVXoQaPv4ovK+5TwqfhWJ7Iw913LbE4FytcSfY +FowF95pqYGJn/LQD6zlwutSkB5QaWF0kHz+2vQMas9uKX/RoYu+k3H4guR3y +4uOclKJFGMpSqdk8+QQYfdJ1qpdo2EVeFvantMKDONZE/U9auBDGJnvhMSzz +53x142qjKL33ShmnBYzujUTe4+ig9P0Rk7PfNMNuV4HgzbwO7k232yy2aQJH +/0lz2QAdb5a77eHsaoQOkblGTSsDrXCVRmtOA+TbbyrdWKiLb2x2hekO14Pq +dWqXH1cPpY9KNct21IOf4+4aWaUeXnDyLjBrqYO05EvcPUuZeBfVLvzgXQfz +yb/P1Z9mosHRVILTS0I+y1H/5AQTT1RX+j7lkaClLGnbr2Tiet/oJLsUEn7p +XpzqNMVEK9+svYU/kxBzbeTD5CwTRwri/I8lkODMuSGMUiWwub3c0PQoCQoH +GnoRBOaIecUlYSR4hb4ON7AmMGEuaIvDDhKanZ31p2wIfPayI+b+NhI2csRt +L20JnEged9+wlQTOMN86255A1nKtZY6uJCzEOc1QgEBL7YhFbkhC5eniczIP +Alt41oNpa0lYEUNggyeBT0K8lmnZknB5Z5qiyJtAolZzIs+GhExWYECgH4Fl +PrNVQisSgq7pmLQHEXievsa135wEaVrSi9IQAqtstnbHckhwD5WdPLmPQC/H +xCVqZiTYcshBpzACR/98l2NmSkIpzfKaQTiBW51T2mtMSDAaFnhORRAYYDFe +tZ1NQl6HBrUrksDwt0pun9F/P8Wxd8TRBD6sWZ8Sa0jCv8tfOa4= + "]]}, + "Charting`Private`Tag$6000#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVj3k01AkcwDXDMBjHj/dqck283qQDraQS368ReTZHIeNqS4cjV8eIlUhY +jdJbx0Ml+yoZUUi/oVQjR3LsFLKTekUyY0sThlyhbf/4vM/7/PlZFRKz5zBF +SUnJ/Sf/O5cpb+FYyEQRi/pWrr9qIyWbNq5gyUTkuiCGE2hjLIVlcENPJgJz +BxnHWht3je45Rp2TiuJ+pKfuNtBG2uN6o5ZmqYjNsV93e1QL4/enxTn7S0Ur +fnsTu/OiFu4rM1jjmjYs4vV35Zu9YqC5jVuW+5shUcVyY9fJGE20uXqvNDjp +vchO8jFwm4COp4PqGPxGicjI9gJnuY8qcl6sUr2wuluU6uG9hM4qmJQwqBI3 +3Sw6ejJCUutERUWL+eNrAbdFJs8jDXflL0P/DC3+LyVV8ODiLkdT6Q846pnR +nW/6DOwCqR1RKotgPx5c5ny/G9wC5iYDr84D40newVzZa2iuLht+y5mFhMVh +l1PXBsBRM2vJz20aNrWGdnFWfoT+gtOLT7KmwFNr3cnJShl8P3RdOV6igK06 +iZYxlM9QbnHF0TB8Atr0i8LzSuRw6dapgGbqOGiwUqNG8seh3SaSoZojh5XE +kmWEvQJuW3lR76SMQqLKh5qnalPQr1foxj32CZx8+Y/PkN+g1MFxyGXbCOy7 +dTlTJ2MGosULq/8mpNDP3z223mMObGQG/CSLj9DQKR64OzMPMlY2L7LwA4wx +ai+ptC7A5Rij4581B4FfGdz+9MQSjLZoxPWnvgNOjJ+nMkMJBzWqablb3sK/ +mbVMQqGEIWGHidqF19D0UiHoaVuG3oWsc5uNJOBcJC1IqqKgZnSyS7pbH8RX +VLyS51CxRrA+wCKzFwZGff7RCVXGtqKzjevnu2GsssbW2F0Fnf4o3uAZ9xKs +r04Evzej4d2z33jcEDGw+5R7Dk7TsKOuw9PErAtasjtLe9+oIvfEo2HBRDvk +xfEcpqvUMLrMh2xd+Ry0Bno2UwvomCo5EGvo9QwaeHpTTdHq2HGBdenPFy2w +Yi/7x06OBo7cPDAQm9gMxnVfw+vYmpgfu1V+07IJuC5FRf2LmugTEmsTyHwK +dntn1sikDIzict7GqzeCuGoNrb5dC2VpzPL2LU8g39ZesP2aNkbtNdnsUf4I +qH9R+nw5Ouhn7BUuN2sAXztuveyODoov06vC3j2A5MQCTsByXUwZOl+S+age +FhOrF5rO62Kql1rrlet1kK9nx0yf0sWxtaEZ5kIhqE+XdR6Y1sUbLHt9vCeE +lNf6ZxxmddHb3zWae1cIkcVfh2a+62KYmDyXfUsIO9jXKyOoBM4xKUY6BUJQ +bKOjF0Hg7wlO3mHxQvAKkRwxsPrZxIhV6HYhPNuxgzm7kcC1G5eR5BYhbGfX +dL6yJtBX3jCqYiME9he+VbYtgWN9s1EVG4SwxHOYVwIC6VmfqtRNhHDnfOlF +mTuBxQ/Lk5gUIZhGEtjsSSBvIvpF6hIJhR7JipLdBNYO5rbJ50lI0/P38/cl +MHx+puz5JAlBxZqruoIItKw21c+RktCTnNAr2EfgQ8P+c2pDJLiGyNLT9//8 +0R3PTXlPgjW78bPDIQLNNrnk8CQkCOgbig2OECjYSk9W9JJg/KXIczaUwN5S +G/qxlyTkiWmUvnACDd8xrCa6SFCvOXG/5iiB3xz6FMfbSfgP7B89yw== + "]]}, + "Charting`Private`Tag$6000#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVkGk41AkcgDXMOHLM/LGRVqm20RM5Msk1v99O6HDFkGiorRC1VCLl2pIJ +lW1lsiq0VLQM6z/EUzFEVEoZydHj6DBKIZPGkbT14X3eb++H12hXhFcQRUFB +we07P3xef6SRs1oqtg67kxrmqYWUdNpH2RKpWD/qGMPHSQsPUJYYFGhLxYuq +Ki462mih63uvg4rTg+L4COcblkZaSKup/rmxYVBcQCmO2zyuiTE7T0Y7+Q2K +w28LTUMyNDGw0MB448k3Yufpz+HOXRq4krX5tFvPK/Eeb36fySF1ZF0mrwXE +94llvkHnBNdVMY5XpZFW1ykupra7LPdQRs4TI+Uzv7SJu6lTxz0dqBh/dIAa +LW8Qb+etZzWvU0RZ48qaXP9/xbbPD/MenpqHfnzNNMu8MhiUZAqHG7/BPg9+ +m2BpEyTWneNFDsyCw8eAQqeKNshI/OkGK3IGNGozd5+XdoFXEkvnoO4UHP36 +xvlIbj/ESoJFK/TlYHUv5BFn4Wvg6/lKqL4T4KG56vCnEilE6dqX6+TJwIYe +axZBGQb2856oA6bj0KyTHZqZNwJJ72zSualjMH/Jid+HBB/h9P24C1yNEVhI +zJmFOcjgPG07oScfhljqy/J6lQmw6pYvYA+/hfU+aTUJlZ+hmfwctNhiCAKv +X0yh8ydhzGC5Z4rvIHSneY6ZuE/DpQUDwnXBr+F2S2t/6eQMjBN2JS73XsKY +huhP6r1ZcClNPg1mA5BWEvCgPnIOrho/zpdW9gInwtdDSUMBk3hWW3R5L+Bt +ikifkClgRkOJCp3RDXefyookzfPw7br6433LO8EpezArvoyCpRukrk1OHRBT +XPxsJEMR28JX9NReaYf+997P6SFKaGaCgjSQwFhJubWhGxV9plfUrRx6Cmsu +jwf0LaOhcYbcr+DME2B2KEl2y2nYfXXRJX/Tx9CY3nKtvUcZTzWxdgzkPoTM +6Ci2vEwFgRu6in3sPmj2S9YqZqliygTHf+GeJrgdpT1xN1wND9mXxxy72gh6 +W5nfNnDm45EBndlKvQYwrBoNrWKqo5ybxG2+UA/bnLOzu7+qowmXf8KcWwd2 +WyeNpYMa2Or6aUxgXgutZca06geaaG/5SXW18h0QWDsU2edqYZna/FbZ2lug +eIXS4cOho01SZHTcoWrwsdtWLRXSccT2FYs+eRMSY7M4/gsYmElOmG0vrISv +sf/N3k1lYHLPu7XCHRUg0LbTT55g4OgmruEjVxGoyQtbfpMzsNhtWS1sFMEf +XToJ7CkGmr74J7JyvQj254y+mvzCQPPDvQaFtiJwZOaXhCkSaPnkunOBsQhk +tqq4hSDwYEybxZySCLbs6gw2MCdwccJwp7WYhCZHR/0pCwKB5s37cIsEe2Z5 +y7M1BBpGlXbl3ySB+SHNPN2awLEiYaVuKQlzUewZBSCwa+bSEJFDgjD12lmp +G4HffPbuDoslYel+Ahs8vvev9H5xOELC3+6JsjxPAm+pqCRoR5JwUtvP18+H +wOgaun1jGAm8HHWjRzwC3W2D+Pb+JEgSj7YXBRLYe9bKe/FWEjbukiYn7yRw +1KJFScmLhDXMumH2HgJd3B+otW8ioUjVNMcgmMC95+IDa5xIMPyQ7TEVQuAk +M/GvG7+SkNlKo3SEEhjYN52f5UCCWnlkRfm+73+MNTNO2ZDwP18KOd8= + "]]}, + "Charting`Private`Tag$6000#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$70292#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.07119033160975688, + 3.9147539864182153`}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.07119033160975688, 3.9147539864182153`}}}}, DisplayFunction -> + Identity, AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[100]}, {0, 6.25}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + + FilledCurve[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4tdtud1GvyUcvuz7uDXdTNZBYdeCfanvxOF8 +jU8qL2edFHdITQMBGYcdwVYR/9PFHdJB3GOSUPViDge79zWZMEs6uK05upxh +hhhE/zQJBwYQeCAM5xuDQLEQqrwDM5wf8MTzkullVgd5kLnrJCH2LON2eANy +524ZB5mNYvOZFPgc/oPAfVmHvohuf8YAMQf+2ID7Ru5KDjD/3NGUXfO/WRnO +fxQhvv3iA1U4/9Rhp7WZ8zQcRConlZxdIuIg0uP1iqVEy2Gr1waLOZZ8cD63 +I5/XDE1mOP/S72PX50X+tE+OvePGLKEB58+YwF9lxq0G54uC1F9Rgbj3AYMD +jA/2jxojnA8zH8YHh+NiVocniQuvmeirwvmBt6RrEj8h+C+ytL9Nn6sGDS9m +h7/fSh/MEVSHmw/jnwEBHwY4fyYISCL4c09MXpK97D/U/epQ8xkdNpv/OJSy +SgMa/2wOP96+PmB5WBMSPj954PzK+z9uGXcLwfkZIPvZRKHma8D5sPCH8cHu +uKns0A+Kvw1CEHeLKTn0gvgf+B3COcXajfsV4OEJTlcRYnC+CTghiTpEqUbI +nNsj7gDjo6dnAIixRIw= + "]]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYC4mjVCJlzMZIOb9pyu42iZR1g/LVCOnzp9xQc +2hTYVc9cEXVITwOCaUoOwW8vf5zhKOhQfnib68y/Sg47gq0i/qeLOmSA5ZUd +jEFAWMJBtMfrFUuIKpx/YteOXjYDdTg/4JZ0TaKQpoPGJ5WXszRFHERA6ku0 +HHyfeF4yFeaH88Hynaxw/lavDRZzfv6x/w8GGnC+xNQrnBlO6nA+C2eXfLKf +mkN/RLc/YwGjw4ss7W/TZdUcZDaKzWd6wITGZ4HzeRz5vGZosjvscGh6dLwC +wYe5H8Y3Afnjszpcf91vq4JzHhoOzeK1rJnHmOB8sH+NEfwlt5Y/NmRG8LeD +3LuT0QHifg2HmSAQyepgbrM3aNpDTYeC5SUb/vnzwfmqoPA4ieC7rzm6nOGH +AJz/wDXecZagiEMqKD7aEHyY+2H8DXp5ixn3qDmcAYE3wg5pYKDqUHn/xy3j +biEHBhBIUIGkBxlBiD+ClR1iQPw/fA4rv72sOOOgDAmPTB6IPmtliHk9nA4f +Fq1XOKuh7PCi9nH2+TfsDp02nrvSlGDy7BBaBsHfm1/zduZTJTgfrH+FEiQ8 +2TjgfLD9ezjhfHD4K/DB+RD3CsP5EP+JQNOrApwPDp80WTgfnI7VxSHpZYMg +xJ4aUUg8b+aD8yH2ccH5YP0+TA6toHwyRczBH5x+/9uD89NuSYcv+z5uTZ/G +BMlPdZLw+J0OpqXg/PvgeJGB8w1A9hbLQvnMUPfKObwEhecaBji/AZze/tjD ++BJNMlMMLn+3h4STLJwP8ac0nK+wa8G+1HXi0HhngfjTWAQevzA+JH+Kwvmw +8kEdnC8lHNDLDwACiL6P + "]]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQvT3YKuI/u5SD+ieVl7M0ZR1g/Ir7P24Zd8s5fNn3 +cWu6mSgGX2b5Cw89eS04P+CWdE3iJAT/z7fSB3M2ajlUgvWJwPkaYHsQfJHK +SSVnWRD8g937mkwWCzvMWaS880+6lsO8E5OXZKt9tYfZD+PD3GsMApcFHdD5 +EFoCzu+L6PZnFBB3eNOW2220W9ChVYFd9cwUMQcGEGjggfNnzAQBLgy+Cdgg +UQdVkD0neRyqQO7xFoXaKwTnrxXS4UuvE4bz20DmXBGB84VB/l0iAeevAanf +Jwk3H8aH2Q82/6QEnA92f7QonA8Lb5j/YHyY/2F89PiF8QF+Y9cw + "], {{ + 4.517189999999999, 7.635939999999998}, {1.6203099999999997`, + 7.635939999999998}, {4.517189999999999, 12.1297}, { + 4.517189999999999, 7.635939999999998}}}]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzFDMAOUzoInTgk1Pu6jFBgDBVwJ/ + + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4tdtud1GvyUcdgRbRfw/LucA4ztPaBZKs1Jy +0Pik8nKWpqhDI8vRfsPpKhB16gJw/oHufU0mj7ng/L6Ibn/GDWwOa4V0+NL/ +KTvc4L0tlmrG4mAMAsEIvsTUK5wZThoOhctLNvzz53DYoPqked5bdYf0NCBY +xu3gsb9W1uK5uoMJSN9mHjg/WjVC5tweYTi/6v6PW8ba4g7mNnuDpj3UhPMb +QO4x14Lzj+/a0csWoAUxT1jcgYWzSz45Twviv5NiOPlua44uZ5iB4EPME3Pw +OcFuOztUC+LPOmGHH29fH7A8rOnQqsCuesZE0EFmXpzm6Q2aDr2g8PjAD+eD +w2sxJ5zP48jnNUOT1WH6BP4qM20th5kgEMnssEEvbzFjjJbDy9rH2efXMMHt +B4dPGm7+QbD5jBj8hJAg9QWeCP6cRco7/zzXhPPB8XNZCc7fm1/zdmYqgr/y +28uKMw5KDs3itayZx5jgfAYQcGCG82Hu548NuG/kruRwBgR8WBz+g0C/ksM2 +rw0Wc36yObiA0leXMiQ+irkdprS3Rl2WUYHEr4wAnA+xXwjOB9v3QNjhgWu8 +46yPUPc5i0Ds7VSCiAuKOihfexTMMEfRYR0ofuREIe4rUIDz74PVycP5IW8v +f5zhKAvnq4PSQacUNF8IOwhXTio5myLh8AaUP3YLOSjsWrAvdZ0YxF/3BRxi +QO6uEYX4t4cXzl9ya/ljQ2d2OB+c3vkZIfYtFHd4A47ff/ZgeRlph7knJi/J +XvbfXgRkH4s0JL0kMzi4g9LhDykHmY1i85keIPjg8KphgvMh5rNC/FcojcoX +lIXzU8HpRg4ef2D/asrDzYfxIfH3zx7Gv/T72PV5kT8h7t0jB+dDwkEGzoek +JwkHbnD6ZobEs7EIJBz28ML5sPiD8WHlDyScJRzQyycAyAXi0w== + "]]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.804411878284999*^9, 3.804411991416195*^9, + 3.804412290853094*^9, 3.8044768290930758`*^9}, + CellLabel->"Out[22]=",ExpressionUUID->"8a4de7f9-fd61-4193-a1cb-fc371ac99b2a"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENsh", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENsh", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENsh", ",", "4"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HENsh", ",", "5"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "100"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "6.25"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<3\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<4\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<5\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804412038345995*^9, 3.8044120506334963`*^9}, { + 3.804412214858325*^9, 3.804412231251258*^9}}, + CellLabel->"In[60]:=",ExpressionUUID->"48628756-3f24-45fc-9f86-cd5ae0f822da"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"20.633801133619755`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"12.317800835781679`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"1.7761645821725922`*^-15\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"8.881784197001252`*^-16\\\", \\\" \\\", \\\"\[Epsilon]\ +\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"0.44434824414190294`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\ +\\\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"12.317800835781679`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"8.881784197001252`*^-16\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 60, 47, + 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412053944757*^9, 3.804412235940866*^9}, + CellLabel-> + "During evaluation of \ +In[60]:=",ExpressionUUID->"5b127e83-e246-47ae-a8e5-fe3b6556bf49"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"543.1040127269591`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"344.8516715377498`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"38.63888482849549`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"6.507707403551328`*^-14\\\", \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"3.609438824812086`*^-14\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\ +\\\"1.7763568394002505`*^-15\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"14.482136482499902`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"1.1723168844155631`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"0.4018649536275355`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"344.8516715377498`\\\"}], \\\"+\\\", \ +RowBox[{\\\"77.27776965699098`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"3.609438824812086`*^-14\\\", \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"3.552713678800501`*^-15\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\ +\\\"1.1723168844155631`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 60, 48, 22584784211283807214, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412053944757*^9, 3.804412236119355*^9}, + CellLabel-> + "During evaluation of \ +In[60]:=",ExpressionUUID->"6c25ef40-2430-4245-b08a-f88ed87e376b"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"27321.59084609166`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"17891.33943643017`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", \ +RowBox[{\\\"2288.6336677944123`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"88.94525378516781`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"+\\\", \ +RowBox[{\\\"3.2737912970512112`*^-12\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"1.8808546865108587`*^-12\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"1.2545645080969817`*^-13\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1.7763568394002505`*^-15\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"774.2399940620189`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"89.78672313421632`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"2.0402254916079636`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"27.843766175949284`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.2925614428762493`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"0.15621806270707905`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\ +\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"17891.33943643017`\\\"}], \\\"+\\\", RowBox[{\\\"4577.267335588825`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"266.83576135550345`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"6\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\ +\\\", RowBox[{\\\"89.78672313421632`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"4.080450983215927`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1.2925614428762493`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 60, 49, + 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412053944757*^9, 3.8044122362644863`*^9}, + CellLabel-> + "During evaluation of \ +In[60]:=",ExpressionUUID->"50051b5b-a480-4633-94a9-97fa45c67275"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 60, 50, 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412053944757*^9, 3.8044122363497562`*^9}, + CellLabel-> + "During evaluation of \ +In[60]:=",ExpressionUUID->"6c2ba2b8-580d-46f7-82ea-e7b511af7b9a"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwVkGs0lAkYgKdhJjLs+MZmcCjaPaOtllhsK973DErJrQzGxhbKta1NihU6 +cilJnZB0YVursaVQ7eYcZ/oal1xL36DoYnIbRS5NGgbDtj+e85zn72MeenDn +PjqNRvP8wv/OMxpv4H8vJ3t9pGF1n7lIz2VOKVbLydaQM4XNY1w8RF9tUsqR +k0vFjVPSfi7uGNv5m4ZqmLTO7mVNP+EiU1xj2lA/TNYORdVG3OBiwp70o27C +YTLcojeOE8jFEJGJpXv6ENkk9kk/9NAQ19ptP+P5coCcds+dG7q4Eu2u3i0L +Tu4j2y3KHNPcDfD47ge62Y9ekDVH8vvsgwjkd5gvz/mWIt1r57MulbExOfEt +46iynlwfEmaXMquLioa14uKgm+RAVvgvLGsdFGbqZduUVMJgB1F/OkkLY7wz +qQKLx7B+Ntm2y4SJTlPBIrf7FHDu+sWJzTRR92F+WJ68ByISA+T2VnRMVA9t +OVYsgw0XjkV6nKfhD40R7XzjQVCdW2W+32URvPXWHflUIYfyq880JQnzsImd +ZHWQPgopmWXdVhYqaDIoisovGQdVcZY2+7USdFanHRgpmILI0n+nDN9MgzGx +aBXtpICfRTZf0zZ+giRGf7VEaxrOibqqDM9/BBdBtjjln88QaRz6l9JmCkJu +XD7FzpwBfobLUiw5Dr3ZvpPrvVTQwV4SGMeOQW3bU9mdmTngGV33jk18D5O6 +984xGhegNPTUpFX+CGRXBLdI4hbhonOo63v1MPAPBnhr6tJQfWWHbFnhELw7 +dc+IUNDwov/9No9Ng1D3TFEubVqGd8P1HCINBsCtaLgwuZKOptGOtPKZt5Bw +61bX+AUNjDHzsz0xLwPZmN9zdoQmjrqphM2BfTBZUe1g5snA62/8fNdIXoPt +1Y/BfWuYONy+ktUa8wp43ZrSMCUT77SctVzn/BIactvKOl8uR4lYwDHj9kL+ +0XhnZaUWRteqD1PmPaAnk9prFGrj4yzHy5ttXkBtPGe67tcVuNAj+VsU9Ry4 +/rylrXwdHNy1QX68phvMHkxEPeCx8FnOZ5dRnW4I3FJU1KtmYbyHMDo8qQsc +/Wcs5cO66GN8ZdPERCc8rbRk1rTooVqyinc7rhMKHJzKNxd/hXack84HWJ2g +8Qe9W8BnYxB7UDwlkoLAMbBGfpuNvd/YCp7skkJqUiE/yFAfhe1nbh7TloI6 +qWqh7rQ+Vpk2ixgSCgo4jkYZ0/o44rc1JjCdghVKUdtepT623mq/FHCSghM9 +BinOs/q4vbXBKSCNgthrEwMz8/rIdbIaDzhBgSvvz4poDQJ9m2SvQo5ToPhJ +G30IAmkjRc1pRyjwCX2x38SawG3eqjDzfRQ8dnU1mt1I4C6OxUqrcAo286rb +umwJlNHUPzqFUcD7kG2d60CgpHWmI2gvBYvxznM0ILD/sIfTlWAKbp8uOyv3 +JHAySvedtT8FFrEE1nsTqMlYyHETUHDJK1VR4ktg6e97S4L8KEjnCAOEAgIH +Ixp1MndSsPsay7x9N4H2efvU/V4USFMTO8tDCPzuRorWnCcF7qHyjIw9BOa+ +TkwlvrQt79GocziBtYZeVa4eFJRrb7hmsp9AilkfFbKdArMPRd6zEQS+/+ib +m7CNgvynTHp3FIFKRotpnvuXn9Vx96tjCOTlKA3vbKXgP7tTRXs= + "]]}, + Annotation[#, "Charting`Private`Tag$565399#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwdzns4lIkeB/B5X5fc17zEwdKyanhaoraQ+P2aLaQku7keHFLkkh4rkltK +HObIRtSxuXR4xBYzQ0q7xbgnl2JEKsvOO4yOEHLLhmPP93m+z/fP70f/xNnv +T5EMBiNso38t2VP8S537qIDx/2ih8W7Hfzm9oQUdWXs+94xr4u786lKfhGEB +V/IjKYjejPHetcqchleCob4nHSdD1ZD9Qn9TxtZegY2AmaJRwMSEC3/IRC82 +C2rHvVT8H3yBcy3GdYVedwVOyztXJ5uU0DNVhbOziAcl76ncK2PyGOqc2ptr +0AZld35LGvTfhDYzPmUHa3ph/JC1Y6adDCrX5wRclwyCzpddEo6VFF5YHbU7 +XzgCHRjR1n+JwG9bg7rY2mIwD4v1urCyDs4q2899rJDAUyup5krpVbBSjdtx +lpyA4+KuG9XpK/BUPS84p2gK7NNKVfu2LIPiV5fPjOfOwKPoR1OaxCJoU2s7 +QmzmQG7lJEnsnYc4GVFVo9w8xGyZpVwT5+A7V05d4oMFeFZRrXhYYRZ87/yc +ppq6BIXCykJP/ACvOS4fvjn6CV5D2Eha8yQ87nw+wl1aAcuQNlF9xQR8UL7/ +k0zrZ1ApSoxpLH4HnAqfZ42RayDsVLNQnpQA+6y7s7QyAz3IiMq+wDF4l3Zf +i5pjoEpqXH7Of8UglzqjE7zAwN+prPhjo2JgJZvoNSwzcH37dLjKiBgCE8oM +wtcZGCqeT732UgziiFvbO5QIlL2RHFopEMOwV7LNZRaBb/YHsQ/dEEP/Nz/4 +z3kTeOT3Yi2pg2KYN74WcMiPwD5jnevrIAZ1Vvep2wEEfpa2l1rbK4bv9e1D +joYQuP+8XwvDXAw9m60j754n0KwUq3V1xdC1ZpByIptAxXCD5JoFGpp65sqF +TwmMfWyJx8ppGL3FPR7RSaCt18Ctr0tokA0KYai+IDByJ7A+FdDguCpydxog +MPlO6LO712kQGvfKto8SeGtBe4vRRRrm5zOqA98R6Gi1MqQUS4NGg4OvzCSB +Jb+WNH08R4OXW8MD9kcC1di+RHsIDeLLvJN1BImCvA4zjtvG39FQVW8ZEvsj +XJhJLjQYabGerMiRODvYwIw5QkMYr1DNUpXE+KqI8HA2DZmxXoIBNRJ/Tm1o +D7OhgX9QIzRKk8SJagrOWG543l5tqtYjUbJFFHfOdMNTdijcxYDEgPxwjDOm +wfJHGe2ZrSQajOnrXjHc8Nk0tmYak/iPninvpi9piJdLiDAxIZGhnfQfoToN +hX2Wul1mJGrIrvpJlGhoKJxvD/mWxOL0nrxVaRqkd4d9VW5N4mGxacSeBRFs +Yxh12QGJsr65Sh5TInDoFJ8fY5OoXSuvkzAmggz/v78wcCTRIeEtp7dfBOqZ +jokFHiTKr6dxSh6KwHDcaCg7ikT1zhLeRIwIDuaN3UzgkVjpNyReWf8DYu7d +ezmVLYUrp0UvCv45DCPvjw+oBkmjGXPifW7+W/hQUWWh5ySD1wQ/sNybBmFX +/qzP8Ney6NpxWsPSewBY/dLCgEVZXD4jYB22fgktmZ2lfW82oe/9HHbLViHk +REfZLvLkMML70y7ZUz2gMiLcI3VTHuOzkln3fLrhcZTafFO4Atp5jroHJHTA +39xY6/ZsRey2p0fMZ5+CXu10cC1LCX2OO7zyP9cKHnZ5ea9XlXBYpsp0s28z +WLstGUnGlHFUu6hB360RnvOMZB89U8FK4dUKdR0B5FrYlO8r/AJLzwT+sqj7 +BKRuk/2ubFWsj1LpSd39K7haezySVKriNOtUeVHbQ7gYd5PtpclEw31ZcgO3 +a2A1jv+5KZ2J2xT662vSqyFXzVorZZ6JfD2LZtMOPigslnX6LzKxXY3U7mji +Q9KgeqLtMhOHulumTz/mQ1jBNL30JxON8J5iVQUfDrCKK0KkKAyrTR0L+YkP +c3vl8RhFYdYbdX6yKx+OnXgVqGNG4aA5dyG+nQdtBw5oLZtTOPXu7vuM33iw +j1XV+XIXhXxXqZiSCh6wJjlmmRYUWkVE249e48FalO0KAyjU+M4jtMaTB5Xp +pVclThTKLMTqZExywSCMwmZnCuu6jeWkR7jw76MX54pcKPyz9ZLX5V4uXFHz +dPd0pfBIuqlh9kMueBco6Xd5b3j3vV1aTeKC8OKFvnJfCndEbasvj+SCwwlJ +SoofhVe4+4WegVzYxWqYsD1J4f0OrcHnh7lQLm9SoBNIYVLdTHO2LRf0JvOc +l4MozLvUNettzoWc57JkfzCFCzZ1viaGXFCoiqypCqUw2Lh/k7QmF/4Hk5Ac +dw== + "]]}, + Annotation[#, "Charting`Private`Tag$565399#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwdk3s41Ikexsf8GJJxzE+dkuqgXTM9pyKXZGW+351soYdJ1pKQibbIZRXF +SKl2rCTZzbVcijPLqdHMULQ8mja3I7eMS9djfrPaaYvWJSnj0rHnfZ7P8/75 +ef95LQ/E7jlIp9Fo4Yv81cYnUriC+GEF7f8xw/WOnhe8nv2mEGsY2zUXVqJj +UbU4OGVI8R/6F11Vhn/Hk0F1zIz7jxUib7qga8IUeT2W+pmf9yqWQPS6zBUk +piRResenmxRbOUfXnPEwwcnm9Y0lgTcU53x1aw0vMnFvmnGGXakUHoYGp1YU +GeIRflpvrlUrGBym3+EbGKDreHDFV7d7odWzwthQpYfMezlhlzVPYLW5f394 +M4FJ8y93nChRQdSzxGGuDh0dWg518lYNg9GVscizR2nIN/5n/DuJBvp98ppD +n8+Ds0myTSz9DXxqWrC4xZ+FtmWFETmlb+GqU8b2qIGPsNTibPSr3HGoKVi3 +mV05DavIBZtI10kQlE8M3+mfgmQ9tfxXgylgVaaXtRm9g+1+GY2n7rwHg4dZ +hFPWBIT8fCXdJO0DjO76wfwHs3F4muEztsF7Bv7r7+Y5VPYWGjq6Vbc+aEHe +75ekFY7AGLPmkl7LHDiXM0xc97+GDElw+6/HFiBYWb1FWPAKeLH+fF0mDe95 +vLbpJjTwR3qNGTlJwy8Zzt9NJbyEB48mK5VtOpgZeH3nls+H4avC3/NTpHSM +HBR49jxVQ5b8ScDSGjr2nROGafvVMNjeYVZYS8eA8Jl97EdqOKyVX73dSMeV +pR2v0lrVkLnvVOlIBx09kzx8g2rUoFyzomLvH3Q8nhSj2H9RDSFl7rWOlgRy +f6m1a+KpoaLe5UTTZwS2uDaVcrhqGFdu2urDIdBUYK285KyGM8Ty+igbAkPU +nefCbNXwr3B1Y7krgYnh9boWa9UwYi1sYQUSmHMkrWd0hgIHiE4rDSawIrbe +IeY9BSf9Q3duFBAovvV6z8Q4BcbpO9rdDxPIQ7u6uVcU2L0mu04fJ7A62tuQ +M0hBsg4jiykkkEnbZlXXS0Gz2Yz31RQCY29bvN3ZRYGfp+pR7fcENhUMFMQ0 +U1ByQPmjWzqBsy/WJ+rep0AjbNmjvECgb3SKflEDBYk3b/a//YlAupuN/aNq +CoS7q0O5eQRab7Tyu3tr0ff+7mhWIYFd78JGr99Y3HtFkagqWvRfdDLSEVNw +Clp1ba8ROPZCs2JzCQWpLzuzU8sJzHS3fBGWT8HZ832re38mcENtl39hNgWi +PsrhaBWBcZGr4ozOUfDT7PLc6TYCrRKUYjcvCiS7Uv0+zRGY13l01aE2FahG +vh40OaSL+dPrra/bDsGYRO601ksPq4Vqvr3Oc7AvmggeWsfAuf068/2+T4A9 +oKsMm2bgEKXrC1MD0JzVIe57po+b2O6TdmV9kHM8gTstNUCtJD/1pLQXjFXK +LUT+EtSOXF7tcbkHGhJMpx7EGGJl6K4hh4OdsPIb9qedvKUoEnMu8PLaYW3d +nxF1bCPUVI4LS561QsCOwsKn80ZYHKRXJP+xGVy++cDR/L74e2bxzezAB9At +5TDuthtji4K/IS7yPuQ6uVZuK/kb5uaTPqKCRiCu0Qf8eCYourncRpBQD34u +AXc1VSYoBf2H5Y/r4HRyPi9wBQvn5E//8XXGHZhPls09OM9CyeqxoCjvGsg1 +dTETTbHQvaJoKj5ODobTFR2CaRaaT03ty4uQQ+qTZae4H1n4OI6b3SCQQ1Tx +n799mGVhmvZMAGuPHNzYZZJIgsQ1s9ft39jJYfKLJbibJPGY0i6J/14Guw88 +/tbclkSHmbM5z0/KoNXNzezjZhIlDOayYwky2MaWd/Tbk9htobI2jpEBezTD +NsuJxO8+437y3i+DhQSulgYk7nNM9pz9UgZV58UXNV4k8q+NtM7py8AqisQm +Pokv6jJvdNJkUOB9erLUh0Rfg5Sl+E4K35vu9d/rR2KPeGBr2aAUgoqNLDuD +SOwVTTj+UiwF5emkvsoQEnUuSVZmX5KC+wGNSBRKYnxTY0/0GSnYs++/4YaT +aKcNq3I9KIXKJRuLzb8l0evf0GXjL4W1o4X8j4dIdG5YqOF4SCGnm0EfiCCR +8I8P4bhIwVB+7Lb8CIkR95zbN22Uwv8A9kDkrw== + "]]}, + Annotation[#, "Charting`Private`Tag$565399#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwdk3s41IkexifzIwnxc8lISrJDVycjiub7ZSmbpNq0w8FWkls4FCUllUsp +andNlozbZtPutDNjtpUtzTRuK7EukRzMLzKEJNdJ0XbO+zzv8/nz/ePzvGaH +I/cFqtBotKDP/R8XMDUnB5b2SWj/DwOtbHde8ejslZRV/rSe0WyEtrmlxX5n +eyQKtlOL3VeGeMa3TCtN+lySXcRNrVqjj85/my28atEs+VhyKjrLncSzcZRq +7HSlJOx1XvnjUzo4XmVVkefzi2RzyI64lD4t9E7RTtuULwBxtDKXM6yBYZ4p +zdxVNWC/kla7do86bhvzu+36ezNMWNYZbjBTQ61HmQE/KDpAzO+YVdIIjJt7 +tf1knhzMK07z125RQVZ10FNn4z5gtCvWfP0zDT21156Y4CvgyHfBTZ+2zsMW +nfiNkSpDEGFsq7xR8gFq9bNDMvPfQF7HrcB65ntYvPJC+AB3DAZTt01UTk6D +MTm/MXTbOORG+pWdNJmCeNWXosfqkxCWXe4t85yAL73SKhLuTcHIwYwLKxve +gf/POZd0UmZArDS0D9g/Bi/S9r5dt/s9JJX7HGDpjsKD+kb5bzOzwJZuPfN3 +7zC81RJfU63+CF/o1/B2SV9DGt+v7vHxeUhkeXT4TAyAc+Q3noQWDaV/uJjf +4ihg8JKYQY7TsOTm7i1fVL0CWdN4SUvtAnT2UW5ZHN4Hrtn9WWcFKsjR6mQl +GvfCqV9/ffbmezoadRnr241QcHpP6UH2DTpmMXPP0AcpiJ+6P5KRTcc3XTcO +NPdRkAA1hHUBHdsceL5R/6UguZViRd+lY37C+QLZEwq+/2DAna6l4yP0T75z +h4LMAhOzHfV0bI06IblaTAHX1fxuViMdf0iuOBRVSMGP16yr7dvoqBJQ1MXO +piDf3H3qdO/n/ZU9N4cuUcB3T/T69JGOjFshsqRgCn4bS3np+dmr1+Qqx4Qj +FAi46eEFdAIbrEwM4g5SUCrPSXbSIPCKOLc3mkNB+fF79y4uJVAeerUr1o2C +P40eOj0zJlBlTonxLhQ8rJA1rDYl0OTbnbTzSIF0YVN/9WoCLSTH06/bUyDj +t0cZWhLoWGbvk8OioHJv99zRtQQm7Ht4rtiagqrpvstlGwh0aYuZE62joObm +kIH6JgKvlXe1SCwp+AvfFXJsCVzSGfypcTUFdf0z6+/YE9hd3WdRbUrBk7T5 +8vcOBI5eIZQMIwqeblTdvhMI7NK8fSJKl4KWyhWxV3cRGKG4Pt36Rg7y4f3t +OkEEHvUTpYiT5PDKv3PxnVACnQp8WOmxchhs/tbJKYLAsK9HifBgOYyVhfKj +YgjUkx4hYJccFiQlXmi5SGBfwiObdfqff2HC35BZQGBT7qiuVXEPBO2ipy7t +JNDQoHkup74b3vJFdqYeqpg11cVqs+oCm9x3fj3masiMF5bacV4As41oCZhW +Q6KOvbyzox2qMuqLWzsXYqavR7J98DPIjI1hTwvUcUlEb+G/fVtAW96ymZ61 +CH3LuRfy/ZvgQYzepCxCAwc0H3i4BzeA0QHmpx3Oi9GsobaGPPUETMtGQ8qY +mhgddoxtyasFzvbs7Bdzmuh8fcV/1B2qweHAjKWiXwufGwX3B4zIoFFgqXa/ +ThvrS8Vz5welwLXbVuKYtwQX7OPVDJ54BPQClTYvZx2MqLHZbsF6AF4OnPuK +uzq49faf53kJ9+FcfJazz1JdlAl6x/WX/wFz8cKPssu6mC8dGrJpFANXz4GR +PKmLhzhuwwMvRaAxfbv+0LQuamsYpNa9EEFih34CW6mL6T12hoJmERzjjfbO +fNBFvXtfqqc8FoELs4gfSidx3X4TlYBCEYxvXYR7SBLH5Btznh8SwZ7Dz48u +syZxxrR7htcvhBoXF4byXyT6vkeP2W4hODJF9c9sSDyMgd4+7UJgjqRZZ9iR +KNrZlW5RK4T5GPYsDUi0OOlmO1gihLuXi9MVHiSuYEC/SbgQVh0jsdKTRFOR +5l/iQCH8uPvceP5eErmbjV13+wshSc/7G28vErNs9YkMTyH48jTNnvqS+Kqf +F2i/SQgt5+JaS/xJdI+k9Q6vEYLbYUVy8kESl2Pz6yJzIdgwpUPsIyQ6prZn +LjMQQsmi9bxlR0m8qOfK6tYSgulItqcyiMR5MOMUqQkhs1FNpS2ERKZbxGzb +vAA0RMd/F4WR+F2h9KuIMQH8A8KSAMc= + "]]}, + Annotation[#, "Charting`Private`Tag$565399#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$654626#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4tdtud1GvyUcvuz7uDXdTNZBYdeCfanvxOF8 +jU8qL2edFHdITQMBGYcdwVYR/9PFHdJB3GOSUPViDge79zWZMEs6uK05upxh +hhhE/zQJBwYQeCAM5xuDQLEQqrwDM5wf8MTzkullVgd5kLnrJCH2LON2eANy +524ZB5mNYvOZFPgc/oPAfVmHvohuf8YAMQf+2ID7Ru5KDjD/3NGUXfO/WRnO +fxQhvv3iA1U4/9Rhp7WZ8zQcRConlZxdIuIg0uP1iqVEy2Gr1waLOZZ8cD63 +I5/XDE1mOP/S72PX50X+tE+OvePGLKEB58+YwF9lxq0G54uC1F9Rgbj3AYMD +jA/2jxojnA8zH8YHh+NiVocniQuvmeirwvmBt6RrEj8h+C+ytL9Nn6sGDS9m +h7/fSh/MEVSHmw/jnwEBHwY4fyYISCL4c09MXpK97D/U/epQ8xkdNpv/OJSy +SgMa/2wOP96+PmB5WBMSPj954PzK+z9uGXcLwfkZIPvZRKHma8D5sPCH8cHu +uKns0A+Kvw1CEHeLKTn0gvgf+B3COcXajfsV4OEJTlcRYnC+CTghiTpEqUbI +nNsj7gDjo6dnAIixRIw= + "]]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYC4mjVCJlzMZIOb9pyu42iZR1g/LVCOnzp9xQc +2hTYVc9cEXVITwOCaUoOwW8vf5zhKOhQfnib68y/Sg47gq0i/qeLOmSA5ZUd +jEFAWMJBtMfrFUuIKpx/YteOXjYDdTg/4JZ0TaKQpoPGJ5WXszRFHERA6ku0 +HHyfeF4yFeaH88Hynaxw/lavDRZzfv6x/w8GGnC+xNQrnBlO6nA+C2eXfLKf +mkN/RLc/YwGjw4ss7W/TZdUcZDaKzWd6wITGZ4HzeRz5vGZosjvscGh6dLwC +wYe5H8Y3Afnjszpcf91vq4JzHhoOzeK1rJnHmOB8sH+NEfwlt5Y/NmRG8LeD +3LuT0QHifg2HmSAQyepgbrM3aNpDTYeC5SUb/vnzwfmqoPA4ieC7rzm6nOGH +AJz/wDXecZagiEMqKD7aEHyY+2H8DXp5ixn3qDmcAYE3wg5pYKDqUHn/xy3j +biEHBhBIUIGkBxlBiD+ClR1iQPw/fA4rv72sOOOgDAmPTB6IPmtliHk9nA4f +Fq1XOKuh7PCi9nH2+TfsDp02nrvSlGDy7BBaBsHfm1/zduZTJTgfrH+FEiQ8 +2TjgfLD9ezjhfHD4K/DB+RD3CsP5EP+JQNOrApwPDp80WTgfnI7VxSHpZYMg +xJ4aUUg8b+aD8yH2ccH5YP0+TA6toHwyRczBH5x+/9uD89NuSYcv+z5uTZ/G +BMlPdZLw+J0OpqXg/PvgeJGB8w1A9hbLQvnMUPfKObwEhecaBji/AZze/tjD ++BJNMlMMLn+3h4STLJwP8ac0nK+wa8G+1HXi0HhngfjTWAQevzA+JH+Kwvmw +8kEdnC8lHNDLDwACiL6P + "]]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQvT3YKuI/u5SD+ieVl7M0ZR1g/Ir7P24Zd8s5fNn3 +cWu6mSgGX2b5Cw89eS04P+CWdE3iJAT/z7fSB3M2ajlUgvWJwPkaYHsQfJHK +SSVnWRD8g937mkwWCzvMWaS880+6lsO8E5OXZKt9tYfZD+PD3GsMApcFHdD5 +EFoCzu+L6PZnFBB3eNOW2220W9ChVYFd9cwUMQcGEGjggfNnzAQBLgy+Cdgg +UQdVkD0neRyqQO7xFoXaKwTnrxXS4UuvE4bz20DmXBGB84VB/l0iAeevAanf +Jwk3H8aH2Q82/6QEnA92f7QonA8Lb5j/YHyY/2F89PiF8QF+Y9cw + "], {{ + 4.517189999999999, 7.635939999999998}, {1.6203099999999997`, + 7.635939999999998}, {4.517189999999999, 12.1297}, { + 4.517189999999999, 7.635939999999998}}}]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.12738853503184713`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzFDMAOUzoInTgk1Pu6jFBgDBVwJ/ + + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4tdtud1GvyUcdgRbRfw/LucA4ztPaBZKs1Jy +0Pik8nKWpqhDI8vRfsPpKhB16gJw/oHufU0mj7ng/L6Ibn/GDWwOa4V0+NL/ +KTvc4L0tlmrG4mAMAsEIvsTUK5wZThoOhctLNvzz53DYoPqked5bdYf0NCBY +xu3gsb9W1uK5uoMJSN9mHjg/WjVC5tweYTi/6v6PW8ba4g7mNnuDpj3UhPMb +QO4x14Lzj+/a0csWoAUxT1jcgYWzSz45Twviv5NiOPlua44uZ5iB4EPME3Pw +OcFuOztUC+LPOmGHH29fH7A8rOnQqsCuesZE0EFmXpzm6Q2aDr2g8PjAD+eD +w2sxJ5zP48jnNUOT1WH6BP4qM20th5kgEMnssEEvbzFjjJbDy9rH2efXMMHt +B4dPGm7+QbD5jBj8hJAg9QWeCP6cRco7/zzXhPPB8XNZCc7fm1/zdmYqgr/y +28uKMw5KDs3itayZx5jgfAYQcGCG82Hu548NuG/kruRwBgR8WBz+g0C/ksM2 +rw0Wc36yObiA0leXMiQ+irkdprS3Rl2WUYHEr4wAnA+xXwjOB9v3QNjhgWu8 +46yPUPc5i0Ds7VSCiAuKOihfexTMMEfRYR0ofuREIe4rUIDz74PVycP5IW8v +f5zhKAvnq4PSQacUNF8IOwhXTio5myLh8AaUP3YLOSjsWrAvdZ0YxF/3BRxi +QO6uEYX4t4cXzl9ya/ljQ2d2OB+c3vkZIfYtFHd4A47ff/ZgeRlph7knJi/J +XvbfXgRkH4s0JL0kMzi4g9LhDykHmY1i85keIPjg8KphgvMh5rNC/FcojcoX +lIXzU8HpRg4ef2D/asrDzYfxIfH3zx7Gv/T72PV5kT8h7t0jB+dDwkEGzoek +JwkHbnD6ZobEs7EIJBz28ML5sPiD8WHlDyScJRzQyycAyAXi0w== + "]]}, { + Thickness[0.12738853503184713`]}, StripOnInput -> False]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[100]}, {0, 6.25}}, {{-0.6931471805599453, 4.605170185988092}, { + 0, 6.25}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVkGs0lAkYgKdhJjLs+MZmcCjaPaOtllhsK973DErJrQzGxhbKta1NihU6 +cilJnZB0YVursaVQ7eYcZ/oal1xL36DoYnIbRS5NGgbDtj+e85zn72MeenDn +PjqNRvP8wv/OMxpv4H8vJ3t9pGF1n7lIz2VOKVbLydaQM4XNY1w8RF9tUsqR +k0vFjVPSfi7uGNv5m4ZqmLTO7mVNP+EiU1xj2lA/TNYORdVG3OBiwp70o27C +YTLcojeOE8jFEJGJpXv6ENkk9kk/9NAQ19ptP+P5coCcds+dG7q4Eu2u3i0L +Tu4j2y3KHNPcDfD47ge62Y9ekDVH8vvsgwjkd5gvz/mWIt1r57MulbExOfEt +46iynlwfEmaXMquLioa14uKgm+RAVvgvLGsdFGbqZduUVMJgB1F/OkkLY7wz +qQKLx7B+Ntm2y4SJTlPBIrf7FHDu+sWJzTRR92F+WJ68ByISA+T2VnRMVA9t +OVYsgw0XjkV6nKfhD40R7XzjQVCdW2W+32URvPXWHflUIYfyq880JQnzsImd +ZHWQPgopmWXdVhYqaDIoisovGQdVcZY2+7USdFanHRgpmILI0n+nDN9MgzGx +aBXtpICfRTZf0zZ+giRGf7VEaxrOibqqDM9/BBdBtjjln88QaRz6l9JmCkJu +XD7FzpwBfobLUiw5Dr3ZvpPrvVTQwV4SGMeOQW3bU9mdmTngGV33jk18D5O6 +984xGhegNPTUpFX+CGRXBLdI4hbhonOo63v1MPAPBnhr6tJQfWWHbFnhELw7 +dc+IUNDwov/9No9Ng1D3TFEubVqGd8P1HCINBsCtaLgwuZKOptGOtPKZt5Bw +61bX+AUNjDHzsz0xLwPZmN9zdoQmjrqphM2BfTBZUe1g5snA62/8fNdIXoPt +1Y/BfWuYONy+ktUa8wp43ZrSMCUT77SctVzn/BIactvKOl8uR4lYwDHj9kL+ +0XhnZaUWRteqD1PmPaAnk9prFGrj4yzHy5ttXkBtPGe67tcVuNAj+VsU9Ry4 +/rylrXwdHNy1QX68phvMHkxEPeCx8FnOZ5dRnW4I3FJU1KtmYbyHMDo8qQsc +/Wcs5cO66GN8ZdPERCc8rbRk1rTooVqyinc7rhMKHJzKNxd/hXack84HWJ2g +8Qe9W8BnYxB7UDwlkoLAMbBGfpuNvd/YCp7skkJqUiE/yFAfhe1nbh7TloI6 +qWqh7rQ+Vpk2ixgSCgo4jkYZ0/o44rc1JjCdghVKUdtepT623mq/FHCSghM9 +BinOs/q4vbXBKSCNgthrEwMz8/rIdbIaDzhBgSvvz4poDQJ9m2SvQo5ToPhJ +G30IAmkjRc1pRyjwCX2x38SawG3eqjDzfRQ8dnU1mt1I4C6OxUqrcAo286rb +umwJlNHUPzqFUcD7kG2d60CgpHWmI2gvBYvxznM0ILD/sIfTlWAKbp8uOyv3 +JHAySvedtT8FFrEE1nsTqMlYyHETUHDJK1VR4ktg6e97S4L8KEjnCAOEAgIH +Ixp1MndSsPsay7x9N4H2efvU/V4USFMTO8tDCPzuRorWnCcF7qHyjIw9BOa+ +TkwlvrQt79GocziBtYZeVa4eFJRrb7hmsp9AilkfFbKdArMPRd6zEQS+/+ib +m7CNgvynTHp3FIFKRotpnvuXn9Vx96tjCOTlKA3vbKXgP7tTRXs= + "]]}, + "Charting`Private`Tag$565399#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwdzns4lIkeB/B5X5fc17zEwdKyanhaoraQ+P2aLaQku7keHFLkkh4rkltK +HObIRtSxuXR4xBYzQ0q7xbgnl2JEKsvOO4yOEHLLhmPP93m+z/fP70f/xNnv +T5EMBiNso38t2VP8S537qIDx/2ih8W7Hfzm9oQUdWXs+94xr4u786lKfhGEB +V/IjKYjejPHetcqchleCob4nHSdD1ZD9Qn9TxtZegY2AmaJRwMSEC3/IRC82 +C2rHvVT8H3yBcy3GdYVedwVOyztXJ5uU0DNVhbOziAcl76ncK2PyGOqc2ptr +0AZld35LGvTfhDYzPmUHa3ph/JC1Y6adDCrX5wRclwyCzpddEo6VFF5YHbU7 +XzgCHRjR1n+JwG9bg7rY2mIwD4v1urCyDs4q2899rJDAUyup5krpVbBSjdtx +lpyA4+KuG9XpK/BUPS84p2gK7NNKVfu2LIPiV5fPjOfOwKPoR1OaxCJoU2s7 +QmzmQG7lJEnsnYc4GVFVo9w8xGyZpVwT5+A7V05d4oMFeFZRrXhYYRZ87/yc +ppq6BIXCykJP/ACvOS4fvjn6CV5D2Eha8yQ87nw+wl1aAcuQNlF9xQR8UL7/ +k0zrZ1ApSoxpLH4HnAqfZ42RayDsVLNQnpQA+6y7s7QyAz3IiMq+wDF4l3Zf +i5pjoEpqXH7Of8UglzqjE7zAwN+prPhjo2JgJZvoNSwzcH37dLjKiBgCE8oM +wtcZGCqeT732UgziiFvbO5QIlL2RHFopEMOwV7LNZRaBb/YHsQ/dEEP/Nz/4 +z3kTeOT3Yi2pg2KYN74WcMiPwD5jnevrIAZ1Vvep2wEEfpa2l1rbK4bv9e1D +joYQuP+8XwvDXAw9m60j754n0KwUq3V1xdC1ZpByIptAxXCD5JoFGpp65sqF +TwmMfWyJx8ppGL3FPR7RSaCt18Ctr0tokA0KYai+IDByJ7A+FdDguCpydxog +MPlO6LO712kQGvfKto8SeGtBe4vRRRrm5zOqA98R6Gi1MqQUS4NGg4OvzCSB +Jb+WNH08R4OXW8MD9kcC1di+RHsIDeLLvJN1BImCvA4zjtvG39FQVW8ZEvsj +XJhJLjQYabGerMiRODvYwIw5QkMYr1DNUpXE+KqI8HA2DZmxXoIBNRJ/Tm1o +D7OhgX9QIzRKk8SJagrOWG543l5tqtYjUbJFFHfOdMNTdijcxYDEgPxwjDOm +wfJHGe2ZrSQajOnrXjHc8Nk0tmYak/iPninvpi9piJdLiDAxIZGhnfQfoToN +hX2Wul1mJGrIrvpJlGhoKJxvD/mWxOL0nrxVaRqkd4d9VW5N4mGxacSeBRFs +Yxh12QGJsr65Sh5TInDoFJ8fY5OoXSuvkzAmggz/v78wcCTRIeEtp7dfBOqZ +jokFHiTKr6dxSh6KwHDcaCg7ikT1zhLeRIwIDuaN3UzgkVjpNyReWf8DYu7d +ezmVLYUrp0UvCv45DCPvjw+oBkmjGXPifW7+W/hQUWWh5ySD1wQ/sNybBmFX +/qzP8Ney6NpxWsPSewBY/dLCgEVZXD4jYB22fgktmZ2lfW82oe/9HHbLViHk +REfZLvLkMML70y7ZUz2gMiLcI3VTHuOzkln3fLrhcZTafFO4Atp5jroHJHTA +39xY6/ZsRey2p0fMZ5+CXu10cC1LCX2OO7zyP9cKHnZ5ea9XlXBYpsp0s28z +WLstGUnGlHFUu6hB360RnvOMZB89U8FK4dUKdR0B5FrYlO8r/AJLzwT+sqj7 +BKRuk/2ubFWsj1LpSd39K7haezySVKriNOtUeVHbQ7gYd5PtpclEw31ZcgO3 +a2A1jv+5KZ2J2xT662vSqyFXzVorZZ6JfD2LZtMOPigslnX6LzKxXY3U7mji +Q9KgeqLtMhOHulumTz/mQ1jBNL30JxON8J5iVQUfDrCKK0KkKAyrTR0L+YkP +c3vl8RhFYdYbdX6yKx+OnXgVqGNG4aA5dyG+nQdtBw5oLZtTOPXu7vuM33iw +j1XV+XIXhXxXqZiSCh6wJjlmmRYUWkVE249e48FalO0KAyjU+M4jtMaTB5Xp +pVclThTKLMTqZExywSCMwmZnCuu6jeWkR7jw76MX54pcKPyz9ZLX5V4uXFHz +dPd0pfBIuqlh9kMueBco6Xd5b3j3vV1aTeKC8OKFvnJfCndEbasvj+SCwwlJ +SoofhVe4+4WegVzYxWqYsD1J4f0OrcHnh7lQLm9SoBNIYVLdTHO2LRf0JvOc +l4MozLvUNettzoWc57JkfzCFCzZ1viaGXFCoiqypCqUw2Lh/k7QmF/4Hk5Ac +dw== + "]]}, "Charting`Private`Tag$565399#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwdk3s41Ikexsf8GJJxzE+dkuqgXTM9pyKXZGW+351soYdJ1pKQibbIZRXF +SKl2rCTZzbVcijPLqdHMULQ8mja3I7eMS9djfrPaaYvWJSnj0rHnfZ7P8/75 +ef95LQ/E7jlIp9Fo4Yv81cYnUriC+GEF7f8xw/WOnhe8nv2mEGsY2zUXVqJj +UbU4OGVI8R/6F11Vhn/Hk0F1zIz7jxUib7qga8IUeT2W+pmf9yqWQPS6zBUk +piRResenmxRbOUfXnPEwwcnm9Y0lgTcU53x1aw0vMnFvmnGGXakUHoYGp1YU +GeIRflpvrlUrGBym3+EbGKDreHDFV7d7odWzwthQpYfMezlhlzVPYLW5f394 +M4FJ8y93nChRQdSzxGGuDh0dWg518lYNg9GVscizR2nIN/5n/DuJBvp98ppD +n8+Ds0myTSz9DXxqWrC4xZ+FtmWFETmlb+GqU8b2qIGPsNTibPSr3HGoKVi3 +mV05DavIBZtI10kQlE8M3+mfgmQ9tfxXgylgVaaXtRm9g+1+GY2n7rwHg4dZ +hFPWBIT8fCXdJO0DjO76wfwHs3F4muEztsF7Bv7r7+Y5VPYWGjq6Vbc+aEHe +75ekFY7AGLPmkl7LHDiXM0xc97+GDElw+6/HFiBYWb1FWPAKeLH+fF0mDe95 +vLbpJjTwR3qNGTlJwy8Zzt9NJbyEB48mK5VtOpgZeH3nls+H4avC3/NTpHSM +HBR49jxVQ5b8ScDSGjr2nROGafvVMNjeYVZYS8eA8Jl97EdqOKyVX73dSMeV +pR2v0lrVkLnvVOlIBx09kzx8g2rUoFyzomLvH3Q8nhSj2H9RDSFl7rWOlgRy +f6m1a+KpoaLe5UTTZwS2uDaVcrhqGFdu2urDIdBUYK285KyGM8Ty+igbAkPU +nefCbNXwr3B1Y7krgYnh9boWa9UwYi1sYQUSmHMkrWd0hgIHiE4rDSawIrbe +IeY9BSf9Q3duFBAovvV6z8Q4BcbpO9rdDxPIQ7u6uVcU2L0mu04fJ7A62tuQ +M0hBsg4jiykkkEnbZlXXS0Gz2Yz31RQCY29bvN3ZRYGfp+pR7fcENhUMFMQ0 +U1ByQPmjWzqBsy/WJ+rep0AjbNmjvECgb3SKflEDBYk3b/a//YlAupuN/aNq +CoS7q0O5eQRab7Tyu3tr0ff+7mhWIYFd78JGr99Y3HtFkagqWvRfdDLSEVNw +Clp1ba8ROPZCs2JzCQWpLzuzU8sJzHS3fBGWT8HZ832re38mcENtl39hNgWi +PsrhaBWBcZGr4ozOUfDT7PLc6TYCrRKUYjcvCiS7Uv0+zRGY13l01aE2FahG +vh40OaSL+dPrra/bDsGYRO601ksPq4Vqvr3Oc7AvmggeWsfAuf068/2+T4A9 +oKsMm2bgEKXrC1MD0JzVIe57po+b2O6TdmV9kHM8gTstNUCtJD/1pLQXjFXK +LUT+EtSOXF7tcbkHGhJMpx7EGGJl6K4hh4OdsPIb9qedvKUoEnMu8PLaYW3d +nxF1bCPUVI4LS561QsCOwsKn80ZYHKRXJP+xGVy++cDR/L74e2bxzezAB9At +5TDuthtji4K/IS7yPuQ6uVZuK/kb5uaTPqKCRiCu0Qf8eCYourncRpBQD34u +AXc1VSYoBf2H5Y/r4HRyPi9wBQvn5E//8XXGHZhPls09OM9CyeqxoCjvGsg1 +dTETTbHQvaJoKj5ODobTFR2CaRaaT03ty4uQQ+qTZae4H1n4OI6b3SCQQ1Tx +n799mGVhmvZMAGuPHNzYZZJIgsQ1s9ft39jJYfKLJbibJPGY0i6J/14Guw88 +/tbclkSHmbM5z0/KoNXNzezjZhIlDOayYwky2MaWd/Tbk9htobI2jpEBezTD +NsuJxO8+437y3i+DhQSulgYk7nNM9pz9UgZV58UXNV4k8q+NtM7py8AqisQm +Pokv6jJvdNJkUOB9erLUh0Rfg5Sl+E4K35vu9d/rR2KPeGBr2aAUgoqNLDuD +SOwVTTj+UiwF5emkvsoQEnUuSVZmX5KC+wGNSBRKYnxTY0/0GSnYs++/4YaT +aKcNq3I9KIXKJRuLzb8l0evf0GXjL4W1o4X8j4dIdG5YqOF4SCGnm0EfiCCR +8I8P4bhIwVB+7Lb8CIkR95zbN22Uwv8A9kDkrw== + "]]}, + "Charting`Private`Tag$565399#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwdk3s41IkexifzIwnxc8lISrJDVycjiub7ZSmbpNq0w8FWkls4FCUllUsp +andNlozbZtPutDNjtpUtzTRuK7EukRzMLzKEJNdJ0XbO+zzv8/nz/ePzvGaH +I/cFqtBotKDP/R8XMDUnB5b2SWj/DwOtbHde8ejslZRV/rSe0WyEtrmlxX5n +eyQKtlOL3VeGeMa3TCtN+lySXcRNrVqjj85/my28atEs+VhyKjrLncSzcZRq +7HSlJOx1XvnjUzo4XmVVkefzi2RzyI64lD4t9E7RTtuULwBxtDKXM6yBYZ4p +zdxVNWC/kla7do86bhvzu+36ezNMWNYZbjBTQ61HmQE/KDpAzO+YVdIIjJt7 +tf1knhzMK07z125RQVZ10FNn4z5gtCvWfP0zDT21156Y4CvgyHfBTZ+2zsMW +nfiNkSpDEGFsq7xR8gFq9bNDMvPfQF7HrcB65ntYvPJC+AB3DAZTt01UTk6D +MTm/MXTbOORG+pWdNJmCeNWXosfqkxCWXe4t85yAL73SKhLuTcHIwYwLKxve +gf/POZd0UmZArDS0D9g/Bi/S9r5dt/s9JJX7HGDpjsKD+kb5bzOzwJZuPfN3 +7zC81RJfU63+CF/o1/B2SV9DGt+v7vHxeUhkeXT4TAyAc+Q3noQWDaV/uJjf +4ihg8JKYQY7TsOTm7i1fVL0CWdN4SUvtAnT2UW5ZHN4Hrtn9WWcFKsjR6mQl +GvfCqV9/ffbmezoadRnr241QcHpP6UH2DTpmMXPP0AcpiJ+6P5KRTcc3XTcO +NPdRkAA1hHUBHdsceL5R/6UguZViRd+lY37C+QLZEwq+/2DAna6l4yP0T75z +h4LMAhOzHfV0bI06IblaTAHX1fxuViMdf0iuOBRVSMGP16yr7dvoqBJQ1MXO +piDf3H3qdO/n/ZU9N4cuUcB3T/T69JGOjFshsqRgCn4bS3np+dmr1+Qqx4Qj +FAi46eEFdAIbrEwM4g5SUCrPSXbSIPCKOLc3mkNB+fF79y4uJVAeerUr1o2C +P40eOj0zJlBlTonxLhQ8rJA1rDYl0OTbnbTzSIF0YVN/9WoCLSTH06/bUyDj +t0cZWhLoWGbvk8OioHJv99zRtQQm7Ht4rtiagqrpvstlGwh0aYuZE62joObm +kIH6JgKvlXe1SCwp+AvfFXJsCVzSGfypcTUFdf0z6+/YE9hd3WdRbUrBk7T5 +8vcOBI5eIZQMIwqeblTdvhMI7NK8fSJKl4KWyhWxV3cRGKG4Pt36Rg7y4f3t +OkEEHvUTpYiT5PDKv3PxnVACnQp8WOmxchhs/tbJKYLAsK9HifBgOYyVhfKj +YgjUkx4hYJccFiQlXmi5SGBfwiObdfqff2HC35BZQGBT7qiuVXEPBO2ipy7t +JNDQoHkup74b3vJFdqYeqpg11cVqs+oCm9x3fj3masiMF5bacV4As41oCZhW +Q6KOvbyzox2qMuqLWzsXYqavR7J98DPIjI1hTwvUcUlEb+G/fVtAW96ymZ61 +CH3LuRfy/ZvgQYzepCxCAwc0H3i4BzeA0QHmpx3Oi9GsobaGPPUETMtGQ8qY +mhgddoxtyasFzvbs7Bdzmuh8fcV/1B2qweHAjKWiXwufGwX3B4zIoFFgqXa/ +ThvrS8Vz5welwLXbVuKYtwQX7OPVDJ54BPQClTYvZx2MqLHZbsF6AF4OnPuK +uzq49faf53kJ9+FcfJazz1JdlAl6x/WX/wFz8cKPssu6mC8dGrJpFANXz4GR +PKmLhzhuwwMvRaAxfbv+0LQuamsYpNa9EEFih34CW6mL6T12hoJmERzjjfbO +fNBFvXtfqqc8FoELs4gfSidx3X4TlYBCEYxvXYR7SBLH5Btznh8SwZ7Dz48u +syZxxrR7htcvhBoXF4byXyT6vkeP2W4hODJF9c9sSDyMgd4+7UJgjqRZZ9iR +KNrZlW5RK4T5GPYsDUi0OOlmO1gihLuXi9MVHiSuYEC/SbgQVh0jsdKTRFOR +5l/iQCH8uPvceP5eErmbjV13+wshSc/7G28vErNs9YkMTyH48jTNnvqS+Kqf +F2i/SQgt5+JaS/xJdI+k9Q6vEYLbYUVy8kESl2Pz6yJzIdgwpUPsIyQ6prZn +LjMQQsmi9bxlR0m8qOfK6tYSgulItqcyiMR5MOMUqQkhs1FNpS2ERKZbxGzb +vAA0RMd/F4WR+F2h9KuIMQH8A8KSAMc= + "]]}, + "Charting`Private`Tag$565399#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$654626#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.0587693461953503, + 6.85453535028866}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.0587693461953503, 6.25}}}}, DisplayFunction -> Identity, + AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[100]}, {0, 6.25}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + + FilledCurve[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, + 1, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4tdtud1GvyUcvuz7uDXdTNZBYdeCfanvxOF8 +jU8qL2edFHdITQMBGYcdwVYR/9PFHdJB3GOSUPViDge79zWZMEs6uK05upxh +hhhE/zQJBwYQeCAM5xuDQLEQqrwDM5wf8MTzkullVgd5kLnrJCH2LON2eANy +524ZB5mNYvOZFPgc/oPAfVmHvohuf8YAMQf+2ID7Ru5KDjD/3NGUXfO/WRnO +fxQhvv3iA1U4/9Rhp7WZ8zQcRConlZxdIuIg0uP1iqVEy2Gr1waLOZZ8cD63 +I5/XDE1mOP/S72PX50X+tE+OvePGLKEB58+YwF9lxq0G54uC1F9Rgbj3AYMD +jA/2jxojnA8zH8YHh+NiVocniQuvmeirwvmBt6RrEj8h+C+ytL9Nn6sGDS9m +h7/fSh/MEVSHmw/jnwEBHwY4fyYISCL4c09MXpK97D/U/epQ8xkdNpv/OJSy +SgMa/2wOP96+PmB5WBMSPj954PzK+z9uGXcLwfkZIPvZRKHma8D5sPCH8cHu +uKns0A+Kvw1CEHeLKTn0gvgf+B3COcXajfsV4OEJTlcRYnC+CTghiTpEqUbI +nNsj7gDjo6dnAIixRIw= + "]]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + + 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}, {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}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJXIGYC4mjVCJlzMZIOb9pyu42iZR1g/LVCOnzp9xQc +2hTYVc9cEXVITwOCaUoOwW8vf5zhKOhQfnib68y/Sg47gq0i/qeLOmSA5ZUd +jEFAWMJBtMfrFUuIKpx/YteOXjYDdTg/4JZ0TaKQpoPGJ5WXszRFHERA6ku0 +HHyfeF4yFeaH88Hynaxw/lavDRZzfv6x/w8GGnC+xNQrnBlO6nA+C2eXfLKf +mkN/RLc/YwGjw4ss7W/TZdUcZDaKzWd6wITGZ4HzeRz5vGZosjvscGh6dLwC +wYe5H8Y3Afnjszpcf91vq4JzHhoOzeK1rJnHmOB8sH+NEfwlt5Y/NmRG8LeD +3LuT0QHifg2HmSAQyepgbrM3aNpDTYeC5SUb/vnzwfmqoPA4ieC7rzm6nOGH +AJz/wDXecZagiEMqKD7aEHyY+2H8DXp5ixn3qDmcAYE3wg5pYKDqUHn/xy3j +biEHBhBIUIGkBxlBiD+ClR1iQPw/fA4rv72sOOOgDAmPTB6IPmtliHk9nA4f +Fq1XOKuh7PCi9nH2+TfsDp02nrvSlGDy7BBaBsHfm1/zduZTJTgfrH+FEiQ8 +2TjgfLD9ezjhfHD4K/DB+RD3CsP5EP+JQNOrApwPDp80WTgfnI7VxSHpZYMg +xJ4aUUg8b+aD8yH2ccH5YP0+TA6toHwyRczBH5x+/9uD89NuSYcv+z5uTZ/G +BMlPdZLw+J0OpqXg/PvgeJGB8w1A9hbLQvnMUPfKObwEhecaBji/AZze/tjD ++BJNMlMMLn+3h4STLJwP8ac0nK+wa8G+1HXi0HhngfjTWAQevzA+JH+Kwvmw +8kEdnC8lHNDLDwACiL6P + "]]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {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}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, + 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQvT3YKuI/u5SD+ieVl7M0ZR1g/Ir7P24Zd8s5fNn3 +cWu6mSgGX2b5Cw89eS04P+CWdE3iJAT/z7fSB3M2ajlUgvWJwPkaYHsQfJHK +SSVnWRD8g937mkwWCzvMWaS880+6lsO8E5OXZKt9tYfZD+PD3GsMApcFHdD5 +EFoCzu+L6PZnFBB3eNOW2220W9ChVYFd9cwUMQcGEGjggfNnzAQBLgy+Cdgg +UQdVkD0neRyqQO7xFoXaKwTnrxXS4UuvE4bz20DmXBGB84VB/l0iAeevAanf +Jwk3H8aH2Q82/6QEnA92f7QonA8Lb5j/YHyY/2F89PiF8QF+Y9cw + "], {{ + 4.517189999999999, 7.635939999999998}, {1.6203099999999997`, + 7.635939999999998}, {4.517189999999999, 12.1297}, { + 4.517189999999999, 7.635939999999998}}}]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.12738853503184713`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIpIIaxWZDYzFDMAOUzoInTgk1Pu6jFBgDBVwJ/ + + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYC4tdtud1GvyUcdgRbRfw/LucA4ztPaBZKs1Jy +0Pik8nKWpqhDI8vRfsPpKhB16gJw/oHufU0mj7ng/L6Ibn/GDWwOa4V0+NL/ +KTvc4L0tlmrG4mAMAsEIvsTUK5wZThoOhctLNvzz53DYoPqked5bdYf0NCBY +xu3gsb9W1uK5uoMJSN9mHjg/WjVC5tweYTi/6v6PW8ba4g7mNnuDpj3UhPMb +QO4x14Lzj+/a0csWoAUxT1jcgYWzSz45Twviv5NiOPlua44uZ5iB4EPME3Pw +OcFuOztUC+LPOmGHH29fH7A8rOnQqsCuesZE0EFmXpzm6Q2aDr2g8PjAD+eD +w2sxJ5zP48jnNUOT1WH6BP4qM20th5kgEMnssEEvbzFjjJbDy9rH2efXMMHt +B4dPGm7+QbD5jBj8hJAg9QWeCP6cRco7/zzXhPPB8XNZCc7fm1/zdmYqgr/y +28uKMw5KDs3itayZx5jgfAYQcGCG82Hu548NuG/kruRwBgR8WBz+g0C/ksM2 +rw0Wc36yObiA0leXMiQ+irkdprS3Rl2WUYHEr4wAnA+xXwjOB9v3QNjhgWu8 +46yPUPc5i0Ds7VSCiAuKOihfexTMMEfRYR0ofuREIe4rUIDz74PVycP5IW8v +f5zhKAvnq4PSQacUNF8IOwhXTio5myLh8AaUP3YLOSjsWrAvdZ0YxF/3BRxi +QO6uEYX4t4cXzl9ya/ljQ2d2OB+c3vkZIfYtFHd4A47ff/ZgeRlph7knJi/J +XvbfXgRkH4s0JL0kMzi4g9LhDykHmY1i85keIPjg8KphgvMh5rNC/FcojcoX +lIXzU8HpRg4ef2D/asrDzYfxIfH3zx7Gv/T72PV5kT8h7t0jB+dDwkEGzoek +JwkHbnD6ZobEs7EIJBz28ML5sPiD8WHlDyScJRzQyycAyAXi0w== + "]]}, + Thickness[0.12738853503184713`]]}, { + ImageSize -> {11.768338729763386`, 24.508064757160646`}, + ImageSize -> {7.845559153175591, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {8., 17.}, PlotRange -> {{0., 7.85}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.804412083898094*^9, 3.804412266491033*^9}, + CellLabel->"Out[60]=",ExpressionUUID->"4b29cfce-4c5c-4b1b-88ae-337caa47a8f2"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPsh", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEsh", ",", "2"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "2"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "100"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "6.25"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP SH}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP CSF}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE SH}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE CSF}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804412515808857*^9, 3.8044125736227427`*^9}}, + CellLabel->"In[66]:=",ExpressionUUID->"0c1990d8-468e-4a9d-8cca-e07c69d7cf23"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"58.650505578070764`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"18.6637805951158`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"46.708156099866635`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"6.345979759334122`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"8.247103411273724`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"18.6637805951158`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \\\", \\\"\ +\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"6.345979759334122`\\\", \\\" \\\", \ +\\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 66, 71, 22584784211283807214, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412540171817*^9, 3.804412577889278*^9}, + CellLabel-> + "During evaluation of \ +In[66]:=",ExpressionUUID->"4a2e8521-8064-4465-8331-3b2061e64770"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"58.650505578070764`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"18.6637805951158`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"44.78857168517361`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"6.3986147156434034`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"18.6637805951158`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"5.86603171030885`\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 66, 72, + 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412540171817*^9, 3.804412578057926*^9}, + CellLabel-> + "During evaluation of \ +In[66]:=",ExpressionUUID->"148355a0-3606-4c01-a037-453f5f0e98f4"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"7.9982683945542545`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\ +\", RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"15.994805464778288`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"4.319532441227426`\\\", \\\" \\\", \\\ +\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"4.194647424699564`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"7.9982683945542545`\\\"}], \\\"+\\\", RowBox[{\\\"2.`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{\\\"4.319532441227426`\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 66, 73, 22584784211283807214, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412540171817*^9, 3.804412578228736*^9}, + CellLabel-> + "During evaluation of \ +In[66]:=",ExpressionUUID->"d567314a-69b2-46c8-a02f-b97231ddc24a"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 66, 74, 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412540171817*^9, 3.804412578378228*^9}, + CellLabel-> + "During evaluation of \ +In[66]:=",ExpressionUUID->"db52e02e-cdbc-4d86-835c-86e648798842"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0X841AccB/DrjpMfd+e+yoYnQ6tjWSrs1sTn4zpmhH4hHlpTS6j0Y+fH +o9gK1UmtnMJCbck9RVg27ZG+4fJjzEa1nAm1XBL63jl3VM6+++PzvJ/XP+/n +eT8fx9ikzV8zGQxGMH3/Z77NhEK0UkXusohNUZbwkHmGTWkcVCQvixAb8nl4 +gOlg95OViqyJPO0ikPJww6vNB1mzI2TtYs6n2ck8ZDfeXqJoGSFPfNjkfiiU +h6k7spL9IkdIGenhymXycHuFnXNA1nMyrGsgRZTARRfPwNzg/mekW1xroq8/ +Bz0v/Vwec3SQPMizzVQbzPBIdD1Heu8xGXVLsva8tSmK/nQ0Ob2sh+RsAiu3 +OBM8mjZsnKxrIeWhv/tNNhujRuHSWBp1nfx+ySrtbKwRRuZwpWvKqmFQ71w1 +aMHCxNCcngKnVph5e3OoYngBelMxFX51PXCwvNTLZYSBnLuynfmqPkgyj29v +GJ6HtLnn/imlQ0CMu020+xvA435cl8j2X1iUGzUvG3gHodwV30xVqoAs3Zcg +TX8Lay3T3ZKYY1D2crbt8ZY30LaoKF5WNgF5986ViT1mwdzh2L4XBRS0D8Ss +7hPOgC1hcEvw1kC+r6I9epce0o2f1jYt1EJPRZQ27oIO1odJGzN+mQa8zu6f +fDkN268Vn7TM0UMQ05sTIZoGpXTTa9eQWTgVXT4cWK2Fhs7uoZv6N5DGb2la +4qGF15xbZ43vv4MKYVyj6M4USCtjOpoOG6CyI6N4NGIKREkRoUYcBuaMTU/7 +zmtg9OQtG0LDwJorAUXDcg00/6WR97YtwMDa5YEnd2jAr2jk4tFqJg57TsvW +2Gog9caNhxPnWbhnTuGVOqCGoVdb/7aMM8Lzaxs6muRqeF1ZK7QPNkb/nFeH +4pPV4H5JHTO4lI0ntha6+G5Qg+CRUe9OHRsdXFeqGQI1KM50lj/oN8H4u8Xm +NUw1yJIlPrrqhbg1r3tE/JwC7lDvJ6yLpuihKVx2s5WCBomVtnm/Ga7wLtk/ +WkXB++GC+c9F5hh0w5plUkiBff1kfL3AAqvk3X2/HqNgm39RkXLOAseXfpfz +5AAFXuF6Z9UIB90m6oqzvqSgu9qZfbuDi/KQtt+CNlJQIPSWryvlYd6Cq5tz +11PAusx8FCayRLuUgC+chBSEeW27raqyxLFz0fZ3XSnITL8oinqPj0bDutGz +SymYS69513yKj37P7JNKbOk+Ky+bbC0fB/v0Zh9YUWCmq+j8SsfHvvwPtswT +FHzbtyjDZ4aPE/+YXB+ivbdk8pn+LR8TrxqOX6YtFvxYmcAi8ELz/RdOtDWf +meJGgsB2dceej/gUbIx9vNtuFYH9qV2OYh4FrWKxzcxqAlVVeo/ltNcJajsf +uhO4eIoTvpC2YFy66oyQQPeup01dXAoMEp83DCBQ4XkIwmlXnSrPUwUTKCz4 +oSuRQ4HTXgJbQgn8QyppCKFdGJKpKdtEoHLnw/rVtLOsIiMiwwjMuGSi1FtQ +EF1i4dgVTeCRHtmdLNq9mWkP5NsJlKSorPfQDohVZWfvINDaODcjiLa74N6Y +zy56j2WdhKAtN/24xG43gdfWuBrrzOl/jheFzsQR2Hp88IqStqybzXwUT2Ds +E0VQI22z2sN1tYkERtspmVdo/weoOUe4 + "]]}, + Annotation[#, "Charting`Private`Tag$1002468#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVz3s0lAkYBvBpppmkoZlPe2qyWbrsuJQx61Zh3vdMqFMJnaXYzBZhXVrb +lltCF6WmwpYSS2pbl8RKzS6r+HKJFTvl0s05G5HRqm9mDIYY2tk/nvOc3z/P +OY9FcMzOUDqNRvPS5/++xKOaxbYKklkcqr7xgI30DJZaY64g+WmZmeX32PgD +3dz0pomC3NgyM1xbxsbt73ceZHwcIq3touoHrrKRVVezorlpiEy9Ff9cEsvG +hL1pcR4BQ+SP36q/WSBgo6TE1HJL2luSa9q/cnHRIrRy3HrOq3eAvOBw/J/i +nw3RMf9uUVDyazLZSb4p4awBHt1TbSR9+IJMCevJzP6bheInFgvOr+kk17wQ +iI56MDE5sZ8Zp20iderC4hOtDNQ0W9VdCywjPVc5zeWn0zHgtLH0q8JK6A0U +PSzzmYdR3qc7L69sgfi2ccsOoKGbOqjEQ9YJb6QhB6P+mAOj+uyQS4qX0H8r +rSr6ow4SZ996xl/rA953q1ueps2Aw6PwDvHyQZh94J6Y5zIN3sY2h8fKFZBQ +rxiqnp6CDZwkQQx9BO4slVuPU5PQuiQ3IruQgqXrm45ffKeFReYnDgxfVoNq +xyfVKoYWlhNzgkg3DXQKSureiycgifmmqsFgHI6rhJv/TB+HTX7SupTfJ+Dc +gZiOiZExkBTnneGcnoTNETU9N3aOwSupr2rtjo9AUWHR0x0auN8u7/ttchom +XP49xAzSgMroXibzkQ5sHOr4n6lHQVoe1NZwaA6+SGBOvc4eBXHMLu/5RjQM +T78Qs819FN6duccjNDSUyHWuf02oofGpprSrdR5isE83S6YGj9yhnORKOrrb +RK7mHVZDwu3bPdRFBlYEvjOfc1FD3/uvn3PC56OMRUueZet/llc5m3kx0f5u +qkVcvQrs80eDXq9ioah1KqP7oAr4z+Z3hWhZ2Mjv9/rcVgXNGe1F3b0LcEZY +zFv2QQnZcbEibaUBhoCFpEOmBOO+LidGzkK0MpQ9oKcq4X6syXjj94a4ddg/ +c9pXCcv8+Z82ixeh7cn9KxyslWBWrYyo5rORekyriWUoYbdnbu6rWTa6ctoP +MwYpcPGftFQMGeGXx8ryjjRRIK+0ZNW0GeO2/ZO18hIKLju7lbpeW4wNN+Jz +rmdRwLhOf+Yn5qCkytmDe4QCP5fdNYoKDq4RNqWvC6cgNSlHHLiUi8y+RFGy +PwWzSXd0jWe56BtRId3gqd8zceGdGufiMZ3Vxrz1FBhqS9r3abnY0/brT3v1 +PvZySYpoiouyWjWDr3d0gXJgcoaL2y0fr5c5U+DO/6U8kkHgllD+wBMnCjQb +F6IPQWBrN2nJdqTAJ/hFmKkdgflPneyuCilocXfnTQkJDMxa/nif3q78qvYe +ewLvBG1LttGb/0Fql+FM4JUloQLSjoK5WNE0DQgMk9s1DAsoqDhbdEHhRaAZ +bzrLzZaCldEENnkTqEtxqjXQ++qOVE2hL4Ejjixd9zoK0kwCdgX4EdgwKGyL +1HtPAduiYw+BgpNJZ3LXUtCVmthdKiHwbqZJbKjeW4IVp07tJbCA8zZRqLc9 +/+GIaD+BTmHzOtpsKChduK7ANIzAN43OvCt6m33I9Z4KJ3DuZmJKsN7Zchb9 +WQSBg733Z2z1Nqw6JKuKIrDabSxrxpqC/wCqGEwi + "]]}, + Annotation[#, "Charting`Private`Tag$1002468#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVjnk01AkcwDUYQ47xcyXl0W47ohJTedH4fk1YG5MOR1o6tJuUo+QqKytH +obTbUKs1R8kOpaaJduyz/MqRZ3QwuduoMLlpskMltv3j8z5/fd77WIdG7/yR +oqamxvnC/+aaj9ez1yrIm3b9LbsDzJCSS51SWinIoQ5qVrGPGR6jWFkUGSlI +G9Pg71RsM/QZ3Xlc/cMgefjF2xdF9mZIra5cXl83SN5m1Znba5th4v70eI+g +QbIktj5do9oU94osbLzSB0iNZSRPwDDFVRu25nB63pCdK2dYLJoJbii8VxyS +3Eue2eLVxZAR+FOwVC/7QScpk5hwzwzTkf3MWuv8ylZy/mcHt8FUfUw++Uoz +XlVHrjFo/UfsuRiV9auq+XtukkQA3WHkVxoGZepnOwrEsFqs2545pYlHfTNb +81c8gryX1UYF19SRNRUi8qhohQCNsYVf7i1CvZq8g1xFFwRfFiTHXFuAk58H +PBP4feDF9svIODUH6xvCHrOX9oPd/n3FXMkH8NW3i31fpgDHNxS3mx9VsIme +ZB9NGYGm2UAUVkxDo3FBeJ5gHFxtmWHc00pYbHUm8m3+FPztvdVDemEKlhLz +9kdYSli7MdW4v2cckjRfSx7SpkGyfCh8yd0R2OKfXX36/r8gX6/NtNQegr1/ +XD1Hz5wBmbVoxZ64QejO3jG5etsH+H5C568Ex36oan7ad2fmI0TMJMhyOa9h +Uq/8ombDHLQ473h/bLQXsstCmh6emIdLz1gRu9pfADs60FdDTw1jIeN+gEU3 +DJ0rNyeUahgT6X7L+UQH1LYoS+SNi/Dl4QEv4aY28CgYvJIspuD5V9/kdRvI +IfHWrbbxS+rYYOLY17GqBfpG/TroYRqYI6PVhqx8ApNlEidLjib6lfp1X9aV +AbPwXUjvV1TM5lY41MQ2AqNdQ35QRUXLibIiG9sGqM9tLn7eo4UFy2zueE/U +Ql58nKtKTMNSzbJzPgYPQb9PvlH9ijaKB/Bd1akaqIozmq6N0sGL+7ylF6Oq +YEkAY+Fb9mJMi3awjq+uBEvpRLiUoYvpiZ9sXCz/hN2eBQXdn3VxQF3EXDpW +Di4BMzaKQT1cw1nQbWiSwFOxDbWySR/lLrLiqjYx5DuxSjbzDTA1l++cIykD +dSGl3Z9Nx1HOtKy7qBT8XXZXKm7T8REttNDPRAQpSVfYe8wM8biztYp4fgM+ +J92dq80yxMrIl9I0wXXIN3Ixz5g2xM4tvV+nNgpBRyVqPqAyxMTALJ9yUgg/ +dxmfdp01RI2aMJNhqRAieBNvZj4ZIq1wPm1fiRDcGdfLjqgTOGKbWpyQJQSl +szZuJwgM5j5O2+UjhO2hnYcs1hE4XGPgHVwqgEfu7uazDgQ+Gb586vpVAWxm +SJrbmF96XnzaZI4AGGPZ63KdCLRdm2bMjxLAfJzrRzUg0CNvrsdnvQBuZxVf +UHAIpEqFThMP+LAigsA6XwJTNotShff48Nu2FKVgB4EtXTUxQTf4kG4UFBjk +T2DIgVpW31k+BPN0rR8HE9gZI7dy9uWDPOXk85K9BEp2GXCs3fjgFarIyNhP +oJuoXsuAyQcm48GI6w8EvooKWzZvyocS7TU8i0Nf/uRwbIHGB8uxAt/ZMALt +Mg55an3iQd5TKqU9nMDGs22/m4zzQEdyokJylEA6Oz3Sto8H/wFInD6L + "]]}, + Annotation[#, "Charting`Private`Tag$1002468#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVzH081AccwPFzOLmc8VPLuTGZXldTEpE8fb+7aBlCzcOJMrWUHtSkMurM +Qy/OkjvnhSmk5FaKi/Aq/HSeMl7KUx7akNwlPRwXh4qt/fF5ff57rw6L3PUz +lUKheH3u/2cy3zZxLOVkQjPdrGQjHanptCmlqZzc36FW1WROxxNUU9Y1Azl5 +3NziiZxJR8/Xu06qL8jIpFeXLtlr0JFWV2Pc1CgjXx6woBGD2ng2NOm0G1dG +Zn2buCkvURv3lrDW7kgaJ8tG+gsWni3DdbY/pHkNjZF2M5OeCblaaHv5bnHI +uWHSuv7RocCVmhgXXM3gN/STN5M0imkfqMh5vFrr9zVdpMzy7/4iYzU8FzOq +eVrVSLakKWJW5i2BsmldXX7QTXKzk8quXvARuBd0+dYFZaBatU2LnT8PR7wv +dGWZtYCDSdSeL7VU4DwVUuJW2QVF3Bd2hc/eA6NetD9TPgABS6EXVfXTELM4 +vv1M/ghwd1da8GYUsLk5vINj9AICeqs9knvfgLeuxan3pXKYjoyLan30Crbq +xW6MpE6CXNMwoNzxJbSuyD0sKngLuxk0HX7DOCw3TTj2MmsK5rcGVNEyx8CI +WNoY4ayE8lM+m6bIUYjVfC55uGwGnCZypljKf2CbH7/u/L1ZuJc44gDzQ7D3 +xh8pehfmgHGStXzaYAAG+b6K9TsXoG+AxzrA74MH7Z0jd+Y+gDdn8xH3iB5Q +MCouaTZ/AtEZ8ehgYBfwS0PaHkYtwVmPyRwzx8fAiQzw1mBQMPTjku+0RQdM +pFQwCSUF2/Kuhz+2agPpE6W4u1UNUbM2rVTSAm65suxzZVRsZhvNebg2wdlb +t3rfCtXR2KvZaNZMCiOvf3yqF66BqoloW2ZQAyhKJVtMvDTxRKpbxXWHOrC5 +PB0y/A0N/WxYh6S+94Hdp9G9X0VDLXdhpYCshqb09uKeIS2cYJZelznfA9Hp +aBdV2TKkuLulHDOvAN2Rbjv1bG1cebvFPZ8pgQfRBjPS43SMJwqP97TeAUN/ +9r/fc5aj2F2onie9BSbV7w5Xs3Ww6tHWG5FdYgjcnps7uKiDhlzr9rKgG+Do +P7dWLmNgCiMx7M/Za9BZtpZW06aLtsYTcbXPrkLWFmexU/4XyC3aZ2nCLAT1 +QmqfH0cPc4p1eCbNl8HPMbBGflsP39cyvq6Q5wIvNpsTtEoft/U+FA6FZMNi +bPknaao+Ck6sqeHJRJBl4MhMntHH4VmvpOEeIdBVJe0/qfTxafCntq/ahRA/ +sOK8y7w+Ntp7mu2TCuHolXdjcx/1cTzGWX2qXAiu7KLSCHUCf03J9OWkC0Hp +oI0+BIFq8QFxJe5C8AnrP8iyItBIpGCGNwqgxdWVOb+JQF61IdP8gQCc2JL2 +XhsC7WqVivG7AmC/4VulbyHQ2FJk/EuRAJaiXT5QgECN1Krt938TwO3U4oty +r8+eJM6V8p0AzI4S2OhNYEWtzuSCvQBydvKUBb4EtnobesxZCSDJgBvA9SNw +j5vEftFUAMFXdFZ3BBMYapIgsFUTQDcvpke897MfET/muZABO8LkycmhBCqz +NzwPn84AG3bDpMsBAkfi6kbFzzNArL3hCusggR1X7YY7BzPA5E2u93w4geuT +0hLmuzJA1Emj9h0m0Npfu2PNXxlAl0RVSo4Q6LNiqcZfmgH/AS8qQLo= + "]]}, + Annotation[#, "Charting`Private`Tag$1002468#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$1013482#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.025081514923501382`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lG1IU1EYx68vZFYY6abD1805Za4P5czuvbuLZ0lGKBr5ITHz3TSjZqFh +NhMtM5NKSzGXCGUQQqIfEpflC4WkaZrlGxY5TAhRSUWGb2U797QzMHrgfPjd +c85znvN//vdIkrUn0uwoirIxj0jzsDWPk26tQ9QFNdTWmGPVCyzcYJrJ7c8S +w3Lz8XP6ADUoUVyXwLiHLilohIN+FBG+0J7vRaenckChSJRCdfnuvJAvKijl +jrWdeSKFiKGKuN8pKjxvlEInWi9g4cXBlTept/0gf53NGshlQLdkPmjCD6aT +Ho8G/6ThIcqz05/wL1OOsbYigPCDkuLYz5wc59Ez8CNTYapuD4RdUU2VabdY +wnydOo7wJopODqZizBc1+oNb1bBjxifu7/kyvH+cA/e6eHlfuZUNUDT1LlcG +Y85LmkGTlfl5kfofLrTvvre/2sr7AhtcPtr7E47ocVA/GgkkHIV0ClUQFqG6 +khWwPUyWY7vGERahuhaszOs/bWVen0EOglG/XBRYn0wOet4ebjxbJ4fE01/D +7MZV0IrqFSnwdycV2W/Rz8LhqM4DDOH3aP0hGtbmZ7uYUDnhDO1Cce+wP+Ge +NsOdbc0yrO8lGlbR+no/7KPvNMQ4upYom6SA2kBFMthvXb5QgPxgYADZsabU +Fzb4vrMgHZ2Kpjx9IU6sWUzZYOHq5MqEclaC/VWvgnatbr6mSgLZLcL1vgEV +GI8kaPQXJfh+8Ry4XLmf/WFajP3wmoPljsWW9BAfwrkoX5kn4aPPu59RKyKo +Qj704KBY7CDrrxTier1VhHk/V7KEC1DfxxiYu3m+LMjDFdevYcAQzcZsBojA +g/cVDV1lHUXB9e54/w0aJlG9e7zx+kIaBKjepz5Yz2s01s1OjP2b8H+26L+V +A5b8ZvS9PoT5e855E85D9w8XEr4bUxZlkyUgzPtJKcD74qzM+01rZUu/cT4B +oN9KX0JDo/Nep/RvAjiF+jdH4/6+dIMdyN+xDO7XkBD71Z0l+Xi/i1WE+f/v +MkfY8l7xer8Swdb37A+nHRS7 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1E8og3EYB/AZGRdJxhg1bIfNCjORsN+2In+KOHDwvxYHiwOHyVIkhVD+ +ZmJKcZGDi1IcWOTvYbOyy2o5yFGSUtg7fZ9f3q3ew6fenuf5vr/nt5zewWZb +rEQiiQk/teFHGn6WPuK71vVWZiwWfnIGT6lkmtvlNFaw6P4sSuIu9XvsRreF +7GjbL7lzWdh822xjTHI6OVLOqyA3BZRjPSlacupc3Wvcu5bqZW11am8KddQP +xjxiK1Z8if0hHfsRfjIra7iSVboedeyr3e75nrGQtyv0vo1O7pZh9dpPIXdk +niMz+blnx29cMFN9GP3rhfcOuNlE6HJdyeeP5FGJ8ql4fljtD7VIBvL+5m9l +Ucb7MOqdObPL+toZ9UsX5rzmHv8qH7p/iTbyTO+1Xhsu2P+8Ndya58mtu0zu +hGrNiDRgIkfmCVaRH1PezA+rVVQfRv/d4GnSppd7QTiAQxPZKcx3bKJ8MPLD +2CcY+4Z62Ef0gzGP2Nh35BkNfgaK6+WUF+4+9+bbMhgZ3wvG94TxvVEfRn+c +F4zzhHHeyAcjP+wQ+p3k0j6Jjfdh1MO+oh/2Gca+i408uC/Ii/sEP4WPzdDB +jfsI477C4v+fX9QS7ug= + "]]}, { + Thickness[0.025081514923501382`]}, StripOnInput -> False]}, { + ImageSize -> {59.79691158156912, 24.508064757160646`}, + ImageSize -> {39.86460772104608, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {40., 17.}, PlotRange -> {{0., 39.87}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.0211954217888936], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ieJC6+ZxNs73HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHp1na36bbIvhgeXkEf4Ne3mJGGXsH5wnNQmlZCP5/ELBXcJCYF6d5 +msHeofr+j1vGryUcSraK/j49z9ahVYFd9cwUUYfrQp8cz5fZwPk9Xq9YTBZa +w/lcbqqlTFGWUL44nL/y28uKMweU4Hx9rZXCF5ZoOiTE3nFjnmHt8Odb6YM5 +G7Ucltzfxzen2AbO97k4MebfZls4/wwY2DkE3JKuSZyk4cABMo/L3uHUYae1 +mf9UIP7gt3fwOcFuO3srgv/z7esDlotVHPbXylqkmyD4sPBD58P0w/hgWl8V +Vf6qFpzvD3KnszacLzH1CmdGkjYkPB0Q/BMgd+oh+FMn8FeZads76CvKf8kJ +03ZQf8u7z0DS3mG7Q9Oj4xLakPBotnNoYDnab2iu6bDF/MehlF+2kHDo0XJQ +fdI876yWLdw8cHz52cD5+Wu6b2coWMH54HCys3B4AUonc9XhfFj8wPgHuvc1 +mSyWhsS3mpWDiTEIiMDNh/HB7nO2g/Nh/hcBpU8WaQf09AsABWw6Sg== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx1/TkiiLcubw1zbnFJ1ENdESpe97ERFFhv4zIkqtqVmmVqLl +JCpMclRairrMKIuwsgwSf4Q/UCTDWYlLyCCHFWEZpYVYYbV7r90LRQfH+364 +u+ee+z7fO01qdqLJXRAEN2ff5uzznH2sc0mt4T1BbY2zfQuEixtmJgpsOWrc +sbzMEB4RGGg7pYFKnNpju0xgo21rMLynxadpJgKBtmQtjv+IzXmiJjgTt7k9 +7ZoWL/zNKWveimzcoWXz40U8iJnt2Vsagi9N2/dbPwHmaefPaAjC3pyqG7wF +VJctPRa9KJTz3Eyeo7Y8jPPFkuIdw3HhWJxwr8IkiHiXqZ+p6ohA22jpnClf +ZnqsmlzCWTrHRYJxo2/LkCMUXUWBa9NryZ/9dWz9FQK/ul3hA2Uyt+Lk+KMC +Ha7ERdqtd2WWxrv+5RMefedXV8m8KqLB+5lHKOet/Z7xl55HcE4YKt/5c4Oe +s7LSvjAjVY+Ykb6sqCaZ1zu3qb4ts6TnDZl1VB8rQRQ9p7ceXlSfDIL+XtK4 +ry4cr1OujkSpCFpovko9fOm6dpGvd+nnYiqT8AScpfmJwPePH7rXbQjnnJH9 +ufixPZRzf3vr2QVNOqbvAeAbnV8fwnxzHTAuXFFiuKdlfhsF81t3MPPDUpHV +7Uww7q88WO9mFqEdGU8SAoKR0jusN90XUTg2O2r4oGH+mk/QkW3+WFOpwaRX +56oaPwLHxt2iNVfD8kkl8D564cjgGzWLW07wtXOqOT1axbmAxrMEcN50p++m +MKtkfgZBsdpTZ6vwYfn2iJwl/YtkPtzs82MgSMTk6SzLGv8VLH870JoUa/wV +pgSVvboQ6LZ0noyq92Pr84Axmu+yIDb/CKCg+V5XsfwPgfnWXc2+e/7PLv3/ +5rDpkAnrYxVnqQ6TQZyP0fNv8eF8zmhJcMtRcJb8ZFAwfVJklu5jpsyuerN4 +Ctym70c+0Lg8ckn6KwWSaf0awOK0+TJ/O8DqNeTD7jNEHk/ye6/M0v07SDi7 +3itJ74dK/P2e/QbkmhNT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMYzrs5GGitFL7QourwJHHhNZPlbg4+ +J9htZ1/Vcphvo3NlVp0zBl8fpF5Fy4Fl8SQrxrkI/p+Y3KP/uFzg/E8bArJn +8bs4zFmkvPPPc004PzUNCNgQfGMQuCwB5/dFdPszCojDzWtVYFc9M0UMbh+M +D3MPOt8EbKAohF7s7FB1/8ctY29RiHlaLnB+7W+rgnMRCL7ehAU/DPsQ/AO1 +shbpIq5wvptqKdMsB1e4+TA+zP5fIPOFEHyYeTA+WF+3i8OOYKuI/+ricP5a +IR2+9HsScH44p1i7cbySQ+Lhy9qpgq5wfh3IvQsQfAYQ2ODqsDe/5u3MqYpw +vvonlZezNOUdZoLARUx+DSigb6nC1aPzwepuKsPt+w8C/Mpw98D4MPei86Xn +xWmeNtCE88Hm/9KEhwcsffR4vWIxuYjgg+2f4ArnV0SsMD2b7YYqP8PNwcxm +b9C0hxoOIp8cz6etRaRf9PQMABZuGmU= + "]]}, { + Thickness[0.0211954217888936]}, StripOnInput -> False]}, { + ImageSize -> {70.77471481942715, 24.508064757160646`}, + ImageSize -> {47.183143212951435`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {48., 17.}, PlotRange -> {{0., 47.18}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.020288090890647186`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx2dKIaVh23T4a+6XY05EnWiJ4fO+LyGRaGR/DIlSa2qGaVRg +ZlSKiY5SS9Et0cogJEWDxB/hGomkOCvThAxyqVHmjDTzR2a1e8/dC0YHx/t+ +uLvnnvs+3ztJWs4hnTOPx3Oy9wR732LvVpN7nSaLgTqDva36gYOblmbyLLkB +0Kx/l8mLY0CDWpEExNT8cYsfAxbU4qXAX6Bepn+kgYdaigwur0XnvrhDQ2nM +/u70ezJ461OQGq7bGLfK8PweCh5HrTw7USaH720HTxlzKChYsP+My0E5XVQ/ +FERBbcXO/MjtgYTXl85b6yqVhG+VFCePxKhgR2Jrle4KBZ+y1Es1PUHQNV62 +rlvmGB3LME8TZs/BZ2BS69UxbA2Ep5f8dmf4Mhv7K/B6MQPe9UdVgxUcd0Lh +5PM8BTTEBI8aQzhmx2P/5asufeVhNRyHBjXxX7kEEo7v37b39psgwonDlUd+ +M2rCoupR18w0NUSN9WVHhHIca9+mVs0xq6eCYwXSx5uBCPacanBD+nymob+X +bjlZr4Kp1LtjEQ00dKB8RWrwQuuiabLeoZ+DkUy8BI7Z+a8Bfs7NmvcwKsKZ +Od+KB0YDCfd3d17f2qbA+toAVtH8Rjn2jZwCratniaZVBhPIb8kU9ptZiv1Q +TuG6lUrhUcjpRqdfFMjGJpN4vlJI7R1R68JouDixMq6ZlWB/FdPQk1MwZ6iW +gM3NFGow0mDdd4wynpHgfCZp4F+4eW5oOgDH9WBg0TTfnhEpJpyH4ul9Ccc1 +9z3grYiwn800FAdsU1iqhDhfmmNW/3WK8Nl24dpgPQW2a9n6cB9PnP9hCjqT +orV/lCJAsteuAZj1psKIRm+8/gfABMrXwx/PXwQQoHzvi3H+C4B96xyAv1P/ +Z4f+m1m5IJ8xDogJs3Ww+RPOR+c/ICR8Q6tPdMoVEGb9pBFgfT5wzN7HLxw7 +6o3jCeAhej+WAVp2BbtnvBdACqqfaqO+XV7Y3ykUrtewEN9nM0XisX5naMLs +/fvKseO9YvV+IoLN79lfuGMTfg== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1D1IQlEUB/BnSSIFWWQGFfQ5aCGVDSEVj/KDPkDJIYfoC0QhzYYgimqr +QaMiDKKiBIeWoBoiwikikBRBNAcbBGlqjIjKil5P/vfiS3jDDx7nnP9951o/ +7R6xFTIMI+KeAe4p4J6QUrsTThvZTs3fT87Ca3WS5oivkp26jbfYbqid0g+/ +3UJ96n10MCYju2n1mkQyBTFfLl5FbE5VL0+VK4krNgafxa9KUq/maFwZblOR +fjDmEbpqNyF1ZFS5uYNGdjgk6Tl4ULHqbf97ey91zD0hiZZRr5+M3nc8GYj5 +eezUfN0+A6kPo/9qVjsXnaSev5Rnw1FqPk/ckJ+PM/LDTcmMhXE25uYv1v8z +3odR7+XcPLNfqif9+LlXqC/UswHR4X8jz3XK821b0Ofn/dQRWxVXMSZK3ZW8 +c3X6qfl5GqmPu1sT+z/9pD6M/uLAjlZUqyP+GnPd/Xio+Txbuvx8nJEfxj7B +2DfUwz6iH4x5hMa+I89S+j2lGZKTvLDvrWhiL0KN84JxnjDOG/Vh9Mf3gvE9 +YXxv5IORH1786xdsIPskNN6HUQ/7in7YZxj7LjTy4L4gL+4TXGI689lkRmLc +Rxj3FRb+//wC/tjGNg== + "]]}, { + Thickness[0.020288090890647186`]}, StripOnInput -> False]}, { + ImageSize -> {73.94074221668743, 24.508064757160646`}, + ImageSize -> {49.29382814445828, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {50., 17.}, + PlotRange -> {{0., 49.290000000000006`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.01766472354707649], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOJrk43HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHZS889P4HIvhgeScEv8frFYuJo4uD84RmobQsBP8/CNgrODg0PTo+ +w9jFofr+j1vGryUc3vDuM5jZ5OzQqsCuemaKqMN8G50rs945wfkVEStMzzYj ++ObXjuaaJDhC+eJw/spvLyvOHFCC8/W1VgpfWKLp8Dhx4TWTeieHP99KH8zZ +qOXAsniSFeNbBP+mdE2iUa8znA/2h6SLQ8AtoMQkDQcLkHkWLg6nDjutzfyn +4mBiDATWLg4+J9htZ29F8H++fX3AcrGKg8gnx/Npvgg+LPzQ+TD9MP4TkDv1 +VVHlr2rB+f4XJ8b8c9aG8yWmXuHMSNKGhGcwgg+mvRD8ut9WBec8XBz0FeW/ +5IRpO5zQtJp02t7FYTtIo4S2AysoPL46OzSwHO03NNd04PFfPyV1g7PDGRDo +0XJwVy1lmuXhDDcPHF+3nOD8bM6fC9IPO8L54iD6koPDiyztb9PnqsP5sPiB +8Q9072syWSwNie9jjpBwNBaBmw/jg9131RnOh/lfBJQ+WaQd0NMvAH2MNnI= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lGtIVEEUx68piZRGuuric9+mK6LupmYKx2TuJZKs/CJi+cj1iS8wMLMi +xUSXTEtRNxHLIgxFg8RHKEuypLhmogkZ6CJCiAopIZpYOXfcuWA0MNz7Y+ac +Oed/zow0vfCazpZhGJuDeflgHjuYllGnNs0bDtpaD8auN1i5a3u11FwkgW79 +t2ymmgMNHpVSkMRs3jRf58CMR5wMnLdipjOVHDB4pMrh3l5k0ScLCzVRF4cz +X8jhq2d5Wugrlqxb5GT/PoJ34TsfMmoVsNV3Jc/Qi6Ac/ywoQLVS2T6Vi6Cl +/lRZ2AkV5f3tW5a2Bj/KT6urkmaj/OFkfG+jzojge656u3kkAIYWavd14Sxl +nFZrCEdZi/NI4GA50X1gxqIC413viKxk7vB8JbFP4cCj/Yb/ZL3Ag1Cx/LFU +CR1RgXOGAoH59fv/8gM70+OQZoGDA7pcPtupKMeN20c/+xJAOX6mIfl3rJqy +uGnOITtdDRHzpnxtkcD4mJY8gXk9dQIrsT5JHMnTRQ2OWJ8zHIyPXejJafeH +lbTn89olFgawI7Ga2JWx1N6qn5WxTEwdosx/nRH82lgznov1p5xd+KNqYk5F +eXx48NHxPiXRNxDBLt7fqSB9k4Eg0cGtWtMrJ/1mQKTfjDLSD9OI1K1GBm+D +CjptoliQzy8nMF4ySBubVeuKWbiztLOgWZOS/jKxMFJYvtHaJIV1x9Hg1gUW +LCglxlAsJfHIOHC5/aRkakVC/F7l4OfoZn9WmC/lUuxP70WZ6za9ZnbEpJ8Z +Dqok9kpzoyuJt4KlzOsfLXBJv+ve5CKC9Yf5+lBPNxJ/I4LBhMjEP35iUr/z +CIz60QptpweIsP1ZBEs43tM+ZL8WgQjH+9KXxB+KyP2zlZC6yv/PVv2Pst+W +YtUw4UuZr8O6D+UynP8lV8p1ifp4myIRZf4cjYjoIxWYv48BAlvrTfyJyPsR +jqDHOdApa1EEqbh+OYf1HXIn/d2BSL1mXMl9Zljqj9erUmD+/gVxlK3vFa/3 +ezEcfc/+AtcKCWg= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMY+r0dDLRWCl9oUXV4krjwmkm6t4PP +CXbb2Ve1HObZ6FyZZeeBwdcHqVfRcmBZPMmKMRbB/x2Te/TfKQT/04aA7Fnn +PRzmLFLe+ee5JpyfmgYEbAi+MQhcloDz+yK6/RkFxOHmtSqwq56ZIga3D8aH +uQedbwI2UBRibrKHQ9X9H7eMvUUh5r1C8Gt/WxWck/CE8/UmLPhh6Ifg76+V +tUi/guC7qJYyzWLwgpsP48Ps/wMy/5InnA8zD8YHa/P2dNgRbBXxX10czl8r +pMOXfk8Czg/nFGs3jldyiD98WTv1IoJfD3Jvghec/x8E8r0c9ubXvJ05VRHO +V/+k8nKWprzDjJlAMBGTXwMK6FuqcPXofJCymTeV4faBxfmV4e6B8WHuRedL +z4vTPG2gCeeDzf+lCQ8PWPro8XrFYjIRwQeb4+8F55dHrDA9q+2NKh/u7WBm +szdo2kMNB4FPjufTchHpFz09AwB1mziC + "]]}, { + Thickness[0.01766472354707649]}, StripOnInput -> False]}, { + ImageSize -> {84.91854545454547, 24.508064757160646`}, + ImageSize -> {56.61236363636364, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {57., 17.}, PlotRange -> {{0., 56.61}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[100]}, {0, 6.25}}, {{-0.6931471805599453, 4.605170185988092}, { + 0, 6.25}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0X841AccB/DrjpMfd+e+yoYnQ6tjWSrs1sTn4zpmhH4hHlpTS6j0Y+fH +o9gK1UmtnMJCbck9RVg27ZG+4fJjzEa1nAm1XBL63jl3VM6+++PzvJ/XP+/n +eT8fx9ikzV8zGQxGMH3/Z77NhEK0UkXusohNUZbwkHmGTWkcVCQvixAb8nl4 +gOlg95OViqyJPO0ikPJww6vNB1mzI2TtYs6n2ck8ZDfeXqJoGSFPfNjkfiiU +h6k7spL9IkdIGenhymXycHuFnXNA1nMyrGsgRZTARRfPwNzg/mekW1xroq8/ +Bz0v/Vwec3SQPMizzVQbzPBIdD1Heu8xGXVLsva8tSmK/nQ0Ob2sh+RsAiu3 +OBM8mjZsnKxrIeWhv/tNNhujRuHSWBp1nfx+ySrtbKwRRuZwpWvKqmFQ71w1 +aMHCxNCcngKnVph5e3OoYngBelMxFX51PXCwvNTLZYSBnLuynfmqPkgyj29v +GJ6HtLnn/imlQ0CMu020+xvA435cl8j2X1iUGzUvG3gHodwV30xVqoAs3Zcg +TX8Lay3T3ZKYY1D2crbt8ZY30LaoKF5WNgF5986ViT1mwdzh2L4XBRS0D8Ss +7hPOgC1hcEvw1kC+r6I9epce0o2f1jYt1EJPRZQ27oIO1odJGzN+mQa8zu6f +fDkN268Vn7TM0UMQ05sTIZoGpXTTa9eQWTgVXT4cWK2Fhs7uoZv6N5DGb2la +4qGF15xbZ43vv4MKYVyj6M4USCtjOpoOG6CyI6N4NGIKREkRoUYcBuaMTU/7 +zmtg9OQtG0LDwJorAUXDcg00/6WR97YtwMDa5YEnd2jAr2jk4tFqJg57TsvW +2Gog9caNhxPnWbhnTuGVOqCGoVdb/7aMM8Lzaxs6muRqeF1ZK7QPNkb/nFeH +4pPV4H5JHTO4lI0ntha6+G5Qg+CRUe9OHRsdXFeqGQI1KM50lj/oN8H4u8Xm +NUw1yJIlPrrqhbg1r3tE/JwC7lDvJ6yLpuihKVx2s5WCBomVtnm/Ga7wLtk/ +WkXB++GC+c9F5hh0w5plUkiBff1kfL3AAqvk3X2/HqNgm39RkXLOAseXfpfz +5AAFXuF6Z9UIB90m6oqzvqSgu9qZfbuDi/KQtt+CNlJQIPSWryvlYd6Cq5tz +11PAusx8FCayRLuUgC+chBSEeW27raqyxLFz0fZ3XSnITL8oinqPj0bDutGz +SymYS69513yKj37P7JNKbOk+Ky+bbC0fB/v0Zh9YUWCmq+j8SsfHvvwPtswT +FHzbtyjDZ4aPE/+YXB+ivbdk8pn+LR8TrxqOX6YtFvxYmcAi8ELz/RdOtDWf +meJGgsB2dceej/gUbIx9vNtuFYH9qV2OYh4FrWKxzcxqAlVVeo/ltNcJajsf +uhO4eIoTvpC2YFy66oyQQPeup01dXAoMEp83DCBQ4XkIwmlXnSrPUwUTKCz4 +oSuRQ4HTXgJbQgn8QyppCKFdGJKpKdtEoHLnw/rVtLOsIiMiwwjMuGSi1FtQ +EF1i4dgVTeCRHtmdLNq9mWkP5NsJlKSorPfQDohVZWfvINDaODcjiLa74N6Y +zy56j2WdhKAtN/24xG43gdfWuBrrzOl/jheFzsQR2Hp88IqStqybzXwUT2Ds +E0VQI22z2sN1tYkERtspmVdo/weoOUe4 + "]]}, + "Charting`Private`Tag$1002468#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVz3s0lAkYBvBpppmkoZlPe2qyWbrsuJQx61Zh3vdMqFMJnaXYzBZhXVrb +lltCF6WmwpYSS2pbl8RKzS6r+HKJFTvl0s05G5HRqm9mDIYY2tk/nvOc3z/P +OY9FcMzOUDqNRvPS5/++xKOaxbYKklkcqr7xgI30DJZaY64g+WmZmeX32PgD +3dz0pomC3NgyM1xbxsbt73ceZHwcIq3touoHrrKRVVezorlpiEy9Ff9cEsvG +hL1pcR4BQ+SP36q/WSBgo6TE1HJL2luSa9q/cnHRIrRy3HrOq3eAvOBw/J/i +nw3RMf9uUVDyazLZSb4p4awBHt1TbSR9+IJMCevJzP6bheInFgvOr+kk17wQ +iI56MDE5sZ8Zp20iderC4hOtDNQ0W9VdCywjPVc5zeWn0zHgtLH0q8JK6A0U +PSzzmYdR3qc7L69sgfi2ccsOoKGbOqjEQ9YJb6QhB6P+mAOj+uyQS4qX0H8r +rSr6ow4SZ996xl/rA953q1ueps2Aw6PwDvHyQZh94J6Y5zIN3sY2h8fKFZBQ +rxiqnp6CDZwkQQx9BO4slVuPU5PQuiQ3IruQgqXrm45ffKeFReYnDgxfVoNq +xyfVKoYWlhNzgkg3DXQKSureiycgifmmqsFgHI6rhJv/TB+HTX7SupTfJ+Dc +gZiOiZExkBTnneGcnoTNETU9N3aOwSupr2rtjo9AUWHR0x0auN8u7/ttchom +XP49xAzSgMroXibzkQ5sHOr4n6lHQVoe1NZwaA6+SGBOvc4eBXHMLu/5RjQM +T78Qs819FN6duccjNDSUyHWuf02oofGpprSrdR5isE83S6YGj9yhnORKOrrb +RK7mHVZDwu3bPdRFBlYEvjOfc1FD3/uvn3PC56OMRUueZet/llc5m3kx0f5u +qkVcvQrs80eDXq9ioah1KqP7oAr4z+Z3hWhZ2Mjv9/rcVgXNGe1F3b0LcEZY +zFv2QQnZcbEibaUBhoCFpEOmBOO+LidGzkK0MpQ9oKcq4X6syXjj94a4ddg/ +c9pXCcv8+Z82ixeh7cn9KxyslWBWrYyo5rORekyriWUoYbdnbu6rWTa6ctoP +MwYpcPGftFQMGeGXx8ryjjRRIK+0ZNW0GeO2/ZO18hIKLju7lbpeW4wNN+Jz +rmdRwLhOf+Yn5qCkytmDe4QCP5fdNYoKDq4RNqWvC6cgNSlHHLiUi8y+RFGy +PwWzSXd0jWe56BtRId3gqd8zceGdGufiMZ3Vxrz1FBhqS9r3abnY0/brT3v1 +PvZySYpoiouyWjWDr3d0gXJgcoaL2y0fr5c5U+DO/6U8kkHgllD+wBMnCjQb +F6IPQWBrN2nJdqTAJ/hFmKkdgflPneyuCilocXfnTQkJDMxa/nif3q78qvYe +ewLvBG1LttGb/0Fql+FM4JUloQLSjoK5WNE0DQgMk9s1DAsoqDhbdEHhRaAZ +bzrLzZaCldEENnkTqEtxqjXQ++qOVE2hL4Ejjixd9zoK0kwCdgX4EdgwKGyL +1HtPAduiYw+BgpNJZ3LXUtCVmthdKiHwbqZJbKjeW4IVp07tJbCA8zZRqLc9 +/+GIaD+BTmHzOtpsKChduK7ANIzAN43OvCt6m33I9Z4KJ3DuZmJKsN7Zchb9 +WQSBg733Z2z1Nqw6JKuKIrDabSxrxpqC/wCqGEwi + "]]}, + "Charting`Private`Tag$1002468#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVjnk01AkcwDUYQ47xcyXl0W47ohJTedH4fk1YG5MOR1o6tJuUo+QqKytH +obTbUKs1R8kOpaaJduyz/MqRZ3QwuduoMLlpskMltv3j8z5/fd77WIdG7/yR +oqamxvnC/+aaj9ez1yrIm3b9LbsDzJCSS51SWinIoQ5qVrGPGR6jWFkUGSlI +G9Pg71RsM/QZ3Xlc/cMgefjF2xdF9mZIra5cXl83SN5m1Znba5th4v70eI+g +QbIktj5do9oU94osbLzSB0iNZSRPwDDFVRu25nB63pCdK2dYLJoJbii8VxyS +3Eue2eLVxZAR+FOwVC/7QScpk5hwzwzTkf3MWuv8ylZy/mcHt8FUfUw++Uoz +XlVHrjFo/UfsuRiV9auq+XtukkQA3WHkVxoGZepnOwrEsFqs2545pYlHfTNb +81c8gryX1UYF19SRNRUi8qhohQCNsYVf7i1CvZq8g1xFFwRfFiTHXFuAk58H +PBP4feDF9svIODUH6xvCHrOX9oPd/n3FXMkH8NW3i31fpgDHNxS3mx9VsIme +ZB9NGYGm2UAUVkxDo3FBeJ5gHFxtmWHc00pYbHUm8m3+FPztvdVDemEKlhLz +9kdYSli7MdW4v2cckjRfSx7SpkGyfCh8yd0R2OKfXX36/r8gX6/NtNQegr1/ +XD1Hz5wBmbVoxZ64QejO3jG5etsH+H5C568Ex36oan7ad2fmI0TMJMhyOa9h +Uq/8ombDHLQ473h/bLQXsstCmh6emIdLz1gRu9pfADs60FdDTw1jIeN+gEU3 +DJ0rNyeUahgT6X7L+UQH1LYoS+SNi/Dl4QEv4aY28CgYvJIspuD5V9/kdRvI +IfHWrbbxS+rYYOLY17GqBfpG/TroYRqYI6PVhqx8ApNlEidLjib6lfp1X9aV +AbPwXUjvV1TM5lY41MQ2AqNdQ35QRUXLibIiG9sGqM9tLn7eo4UFy2zueE/U +Ql58nKtKTMNSzbJzPgYPQb9PvlH9ijaKB/Bd1akaqIozmq6N0sGL+7ylF6Oq +YEkAY+Fb9mJMi3awjq+uBEvpRLiUoYvpiZ9sXCz/hN2eBQXdn3VxQF3EXDpW +Di4BMzaKQT1cw1nQbWiSwFOxDbWySR/lLrLiqjYx5DuxSjbzDTA1l++cIykD +dSGl3Z9Nx1HOtKy7qBT8XXZXKm7T8REttNDPRAQpSVfYe8wM8biztYp4fgM+ +J92dq80yxMrIl9I0wXXIN3Ixz5g2xM4tvV+nNgpBRyVqPqAyxMTALJ9yUgg/ +dxmfdp01RI2aMJNhqRAieBNvZj4ZIq1wPm1fiRDcGdfLjqgTOGKbWpyQJQSl +szZuJwgM5j5O2+UjhO2hnYcs1hE4XGPgHVwqgEfu7uazDgQ+Gb586vpVAWxm +SJrbmF96XnzaZI4AGGPZ63KdCLRdm2bMjxLAfJzrRzUg0CNvrsdnvQBuZxVf +UHAIpEqFThMP+LAigsA6XwJTNotShff48Nu2FKVgB4EtXTUxQTf4kG4UFBjk +T2DIgVpW31k+BPN0rR8HE9gZI7dy9uWDPOXk85K9BEp2GXCs3fjgFarIyNhP +oJuoXsuAyQcm48GI6w8EvooKWzZvyocS7TU8i0Nf/uRwbIHGB8uxAt/ZMALt +Mg55an3iQd5TKqU9nMDGs22/m4zzQEdyokJylEA6Oz3Sto8H/wFInD6L + "]]}, + "Charting`Private`Tag$1002468#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVzH081AccwPFzOLmc8VPLuTGZXldTEpE8fb+7aBlCzcOJMrWUHtSkMurM +Qy/OkjvnhSmk5FaKi/Aq/HSeMl7KUx7akNwlPRwXh4qt/fF5ff57rw6L3PUz +lUKheH3u/2cy3zZxLOVkQjPdrGQjHanptCmlqZzc36FW1WROxxNUU9Y1Azl5 +3NziiZxJR8/Xu06qL8jIpFeXLtlr0JFWV2Pc1CgjXx6woBGD2ng2NOm0G1dG +Zn2buCkvURv3lrDW7kgaJ8tG+gsWni3DdbY/pHkNjZF2M5OeCblaaHv5bnHI +uWHSuv7RocCVmhgXXM3gN/STN5M0imkfqMh5vFrr9zVdpMzy7/4iYzU8FzOq +eVrVSLakKWJW5i2BsmldXX7QTXKzk8quXvARuBd0+dYFZaBatU2LnT8PR7wv +dGWZtYCDSdSeL7VU4DwVUuJW2QVF3Bd2hc/eA6NetD9TPgABS6EXVfXTELM4 +vv1M/ghwd1da8GYUsLk5vINj9AICeqs9knvfgLeuxan3pXKYjoyLan30Crbq +xW6MpE6CXNMwoNzxJbSuyD0sKngLuxk0HX7DOCw3TTj2MmsK5rcGVNEyx8CI +WNoY4ayE8lM+m6bIUYjVfC55uGwGnCZypljKf2CbH7/u/L1ZuJc44gDzQ7D3 +xh8pehfmgHGStXzaYAAG+b6K9TsXoG+AxzrA74MH7Z0jd+Y+gDdn8xH3iB5Q +MCouaTZ/AtEZ8ehgYBfwS0PaHkYtwVmPyRwzx8fAiQzw1mBQMPTjku+0RQdM +pFQwCSUF2/Kuhz+2agPpE6W4u1UNUbM2rVTSAm65suxzZVRsZhvNebg2wdlb +t3rfCtXR2KvZaNZMCiOvf3yqF66BqoloW2ZQAyhKJVtMvDTxRKpbxXWHOrC5 +PB0y/A0N/WxYh6S+94Hdp9G9X0VDLXdhpYCshqb09uKeIS2cYJZelznfA9Hp +aBdV2TKkuLulHDOvAN2Rbjv1bG1cebvFPZ8pgQfRBjPS43SMJwqP97TeAUN/ +9r/fc5aj2F2onie9BSbV7w5Xs3Ww6tHWG5FdYgjcnps7uKiDhlzr9rKgG+Do +P7dWLmNgCiMx7M/Za9BZtpZW06aLtsYTcbXPrkLWFmexU/4XyC3aZ2nCLAT1 +QmqfH0cPc4p1eCbNl8HPMbBGflsP39cyvq6Q5wIvNpsTtEoft/U+FA6FZMNi +bPknaao+Ck6sqeHJRJBl4MhMntHH4VmvpOEeIdBVJe0/qfTxafCntq/ahRA/ +sOK8y7w+Ntp7mu2TCuHolXdjcx/1cTzGWX2qXAiu7KLSCHUCf03J9OWkC0Hp +oI0+BIFq8QFxJe5C8AnrP8iyItBIpGCGNwqgxdWVOb+JQF61IdP8gQCc2JL2 +XhsC7WqVivG7AmC/4VulbyHQ2FJk/EuRAJaiXT5QgECN1Krt938TwO3U4oty +r8+eJM6V8p0AzI4S2OhNYEWtzuSCvQBydvKUBb4EtnobesxZCSDJgBvA9SNw +j5vEftFUAMFXdFZ3BBMYapIgsFUTQDcvpke897MfET/muZABO8LkycmhBCqz +NzwPn84AG3bDpMsBAkfi6kbFzzNArL3hCusggR1X7YY7BzPA5E2u93w4geuT +0hLmuzJA1Emj9h0m0Npfu2PNXxlAl0RVSo4Q6LNiqcZfmgH/AS8qQLo= + "]]}, + "Charting`Private`Tag$1002468#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$1013482#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.016366343537374484`, + 5.83432318102397}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.016366343537374484`, 5.83432318102397}}}}, DisplayFunction -> + Identity, AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[100]}, {0, 6.25}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.025081514923501382`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lG1IU1EYx68vZFYY6abD1805Za4P5czuvbuLZ0lGKBr5ITHz3TSjZqFh +NhMtM5NKSzGXCGUQQqIfEpflC4WkaZrlGxY5TAhRSUWGb2U797QzMHrgfPjd +c85znvN//vdIkrUn0uwoirIxj0jzsDWPk26tQ9QFNdTWmGPVCyzcYJrJ7c8S +w3Lz8XP6ADUoUVyXwLiHLilohIN+FBG+0J7vRaenckChSJRCdfnuvJAvKijl +jrWdeSKFiKGKuN8pKjxvlEInWi9g4cXBlTept/0gf53NGshlQLdkPmjCD6aT +Ho8G/6ThIcqz05/wL1OOsbYigPCDkuLYz5wc59Ez8CNTYapuD4RdUU2VabdY +wnydOo7wJopODqZizBc1+oNb1bBjxifu7/kyvH+cA/e6eHlfuZUNUDT1LlcG +Y85LmkGTlfl5kfofLrTvvre/2sr7AhtcPtr7E47ocVA/GgkkHIV0ClUQFqG6 +khWwPUyWY7vGERahuhaszOs/bWVen0EOglG/XBRYn0wOet4ebjxbJ4fE01/D +7MZV0IrqFSnwdycV2W/Rz8LhqM4DDOH3aP0hGtbmZ7uYUDnhDO1Cce+wP+Ge +NsOdbc0yrO8lGlbR+no/7KPvNMQ4upYom6SA2kBFMthvXb5QgPxgYADZsabU +Fzb4vrMgHZ2Kpjx9IU6sWUzZYOHq5MqEclaC/VWvgnatbr6mSgLZLcL1vgEV +GI8kaPQXJfh+8Ry4XLmf/WFajP3wmoPljsWW9BAfwrkoX5kn4aPPu59RKyKo +Qj704KBY7CDrrxTier1VhHk/V7KEC1DfxxiYu3m+LMjDFdevYcAQzcZsBojA +g/cVDV1lHUXB9e54/w0aJlG9e7zx+kIaBKjepz5Yz2s01s1OjP2b8H+26L+V +A5b8ZvS9PoT5e855E85D9w8XEr4bUxZlkyUgzPtJKcD74qzM+01rZUu/cT4B +oN9KX0JDo/Nep/RvAjiF+jdH4/6+dIMdyN+xDO7XkBD71Z0l+Xi/i1WE+f/v +MkfY8l7xer8Swdb37A+nHRS7 + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1E8og3EYB/AZGRdJxhg1bIfNCjORsN+2In+KOHDwvxYHiwOHyVIkhVD+ +ZmJKcZGDi1IcWOTvYbOyy2o5yFGSUtg7fZ9f3q3ew6fenuf5vr/nt5zewWZb +rEQiiQk/teFHGn6WPuK71vVWZiwWfnIGT6lkmtvlNFaw6P4sSuIu9XvsRreF +7GjbL7lzWdh822xjTHI6OVLOqyA3BZRjPSlacupc3Wvcu5bqZW11am8KddQP +xjxiK1Z8if0hHfsRfjIra7iSVboedeyr3e75nrGQtyv0vo1O7pZh9dpPIXdk +niMz+blnx29cMFN9GP3rhfcOuNlE6HJdyeeP5FGJ8ql4fljtD7VIBvL+5m9l +Ucb7MOqdObPL+toZ9UsX5rzmHv8qH7p/iTbyTO+1Xhsu2P+8Ndya58mtu0zu +hGrNiDRgIkfmCVaRH1PezA+rVVQfRv/d4GnSppd7QTiAQxPZKcx3bKJ8MPLD +2CcY+4Z62Ef0gzGP2Nh35BkNfgaK6+WUF+4+9+bbMhgZ3wvG94TxvVEfRn+c +F4zzhHHeyAcjP+wQ+p3k0j6Jjfdh1MO+oh/2Gca+i408uC/Ii/sEP4WPzdDB +jfsI477C4v+fX9QS7ug= + "]]}, + Thickness[0.025081514923501382`]]}, { + ImageSize -> {59.79691158156912, 24.508064757160646`}, + ImageSize -> {39.86460772104608, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {40., 17.}, PlotRange -> {{0., 39.87}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.0211954217888936], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ieJC6+ZxNs73HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHp1na36bbIvhgeXkEf4Ne3mJGGXsH5wnNQmlZCP5/ELBXcJCYF6d5 +msHeofr+j1vGryUcSraK/j49z9ahVYFd9cwUUYfrQp8cz5fZwPk9Xq9YTBZa +w/lcbqqlTFGWUL44nL/y28uKMweU4Hx9rZXCF5ZoOiTE3nFjnmHt8Odb6YM5 +G7Ucltzfxzen2AbO97k4MebfZls4/wwY2DkE3JKuSZyk4cABMo/L3uHUYae1 +mf9UIP7gt3fwOcFuO3srgv/z7esDlotVHPbXylqkmyD4sPBD58P0w/hgWl8V +Vf6qFpzvD3KnszacLzH1CmdGkjYkPB0Q/BMgd+oh+FMn8FeZads76CvKf8kJ +03ZQf8u7z0DS3mG7Q9Oj4xLakPBotnNoYDnab2iu6bDF/MehlF+2kHDo0XJQ +fdI876yWLdw8cHz52cD5+Wu6b2coWMH54HCys3B4AUonc9XhfFj8wPgHuvc1 +mSyWhsS3mpWDiTEIiMDNh/HB7nO2g/Nh/hcBpU8WaQf09AsABWw6Sg== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx1/TkiiLcubw1zbnFJ1ENdESpe97ERFFhv4zIkqtqVmmVqLl +JCpMclRairrMKIuwsgwSf4Q/UCTDWYlLyCCHFWEZpYVYYbV7r90LRQfH+364 +u+ee+z7fO01qdqLJXRAEN2ff5uzznH2sc0mt4T1BbY2zfQuEixtmJgpsOWrc +sbzMEB4RGGg7pYFKnNpju0xgo21rMLynxadpJgKBtmQtjv+IzXmiJjgTt7k9 +7ZoWL/zNKWveimzcoWXz40U8iJnt2Vsagi9N2/dbPwHmaefPaAjC3pyqG7wF +VJctPRa9KJTz3Eyeo7Y8jPPFkuIdw3HhWJxwr8IkiHiXqZ+p6ohA22jpnClf +ZnqsmlzCWTrHRYJxo2/LkCMUXUWBa9NryZ/9dWz9FQK/ul3hA2Uyt+Lk+KMC +Ha7ERdqtd2WWxrv+5RMefedXV8m8KqLB+5lHKOet/Z7xl55HcE4YKt/5c4Oe +s7LSvjAjVY+Ykb6sqCaZ1zu3qb4ts6TnDZl1VB8rQRQ9p7ceXlSfDIL+XtK4 +ry4cr1OujkSpCFpovko9fOm6dpGvd+nnYiqT8AScpfmJwPePH7rXbQjnnJH9 +ufixPZRzf3vr2QVNOqbvAeAbnV8fwnxzHTAuXFFiuKdlfhsF81t3MPPDUpHV +7Uww7q88WO9mFqEdGU8SAoKR0jusN90XUTg2O2r4oGH+mk/QkW3+WFOpwaRX +56oaPwLHxt2iNVfD8kkl8D564cjgGzWLW07wtXOqOT1axbmAxrMEcN50p++m +MKtkfgZBsdpTZ6vwYfn2iJwl/YtkPtzs82MgSMTk6SzLGv8VLH870JoUa/wV +pgSVvboQ6LZ0noyq92Pr84Axmu+yIDb/CKCg+V5XsfwPgfnWXc2+e/7PLv3/ +5rDpkAnrYxVnqQ6TQZyP0fNv8eF8zmhJcMtRcJb8ZFAwfVJklu5jpsyuerN4 +Ctym70c+0Lg8ckn6KwWSaf0awOK0+TJ/O8DqNeTD7jNEHk/ye6/M0v07SDi7 +3itJ74dK/P2e/QbkmhNT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMYzrs5GGitFL7QourwJHHhNZPlbg4+ +J9htZ1/Vcphvo3NlVp0zBl8fpF5Fy4Fl8SQrxrkI/p+Y3KP/uFzg/E8bArJn +8bs4zFmkvPPPc004PzUNCNgQfGMQuCwB5/dFdPszCojDzWtVYFc9M0UMbh+M +D3MPOt8EbKAohF7s7FB1/8ctY29RiHlaLnB+7W+rgnMRCL7ehAU/DPsQ/AO1 +shbpIq5wvptqKdMsB1e4+TA+zP5fIPOFEHyYeTA+WF+3i8OOYKuI/+ricP5a +IR2+9HsScH44p1i7cbySQ+Lhy9qpgq5wfh3IvQsQfAYQ2ODqsDe/5u3MqYpw +vvonlZezNOUdZoLARUx+DSigb6nC1aPzwepuKsPt+w8C/Mpw98D4MPei86Xn +xWmeNtCE88Hm/9KEhwcsffR4vWIxuYjgg+2f4ArnV0SsMD2b7YYqP8PNwcxm +b9C0hxoOIp8cz6etRaRf9PQMABZuGmU= + "]]}, + Thickness[0.0211954217888936]]}, { + ImageSize -> {70.77471481942715, 24.508064757160646`}, + ImageSize -> {47.183143212951435`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {48., 17.}, PlotRange -> {{0., 47.18}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.020288090890647186`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx2dKIaVh23T4a+6XY05EnWiJ4fO+LyGRaGR/DIlSa2qGaVRg +ZlSKiY5SS9Et0cogJEWDxB/hGomkOCvThAxyqVHmjDTzR2a1e8/dC0YHx/t+ +uLvnnvs+3ztJWs4hnTOPx3Oy9wR732LvVpN7nSaLgTqDva36gYOblmbyLLkB +0Kx/l8mLY0CDWpEExNT8cYsfAxbU4qXAX6Bepn+kgYdaigwur0XnvrhDQ2nM +/u70ezJ461OQGq7bGLfK8PweCh5HrTw7USaH720HTxlzKChYsP+My0E5XVQ/ +FERBbcXO/MjtgYTXl85b6yqVhG+VFCePxKhgR2Jrle4KBZ+y1Es1PUHQNV62 +rlvmGB3LME8TZs/BZ2BS69UxbA2Ep5f8dmf4Mhv7K/B6MQPe9UdVgxUcd0Lh +5PM8BTTEBI8aQzhmx2P/5asufeVhNRyHBjXxX7kEEo7v37b39psgwonDlUd+ +M2rCoupR18w0NUSN9WVHhHIca9+mVs0xq6eCYwXSx5uBCPacanBD+nymob+X +bjlZr4Kp1LtjEQ00dKB8RWrwQuuiabLeoZ+DkUy8BI7Z+a8Bfs7NmvcwKsKZ +Od+KB0YDCfd3d17f2qbA+toAVtH8Rjn2jZwCratniaZVBhPIb8kU9ptZiv1Q +TuG6lUrhUcjpRqdfFMjGJpN4vlJI7R1R68JouDixMq6ZlWB/FdPQk1MwZ6iW +gM3NFGow0mDdd4wynpHgfCZp4F+4eW5oOgDH9WBg0TTfnhEpJpyH4ul9Ccc1 +9z3grYiwn800FAdsU1iqhDhfmmNW/3WK8Nl24dpgPQW2a9n6cB9PnP9hCjqT +orV/lCJAsteuAZj1psKIRm+8/gfABMrXwx/PXwQQoHzvi3H+C4B96xyAv1P/ +Z4f+m1m5IJ8xDogJs3Ww+RPOR+c/ICR8Q6tPdMoVEGb9pBFgfT5wzN7HLxw7 +6o3jCeAhej+WAVp2BbtnvBdACqqfaqO+XV7Y3ykUrtewEN9nM0XisX5naMLs +/fvKseO9YvV+IoLN79lfuGMTfg== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1D1IQlEUB/BnSSIFWWQGFfQ5aCGVDSEVj/KDPkDJIYfoC0QhzYYgimqr +QaMiDKKiBIeWoBoiwikikBRBNAcbBGlqjIjKil5P/vfiS3jDDx7nnP9951o/ +7R6xFTIMI+KeAe4p4J6QUrsTThvZTs3fT87Ca3WS5oivkp26jbfYbqid0g+/ +3UJ96n10MCYju2n1mkQyBTFfLl5FbE5VL0+VK4krNgafxa9KUq/maFwZblOR +fjDmEbpqNyF1ZFS5uYNGdjgk6Tl4ULHqbf97ey91zD0hiZZRr5+M3nc8GYj5 +eezUfN0+A6kPo/9qVjsXnaSev5Rnw1FqPk/ckJ+PM/LDTcmMhXE25uYv1v8z +3odR7+XcPLNfqif9+LlXqC/UswHR4X8jz3XK821b0Ofn/dQRWxVXMSZK3ZW8 +c3X6qfl5GqmPu1sT+z/9pD6M/uLAjlZUqyP+GnPd/Xio+Txbuvx8nJEfxj7B +2DfUwz6iH4x5hMa+I89S+j2lGZKTvLDvrWhiL0KN84JxnjDOG/Vh9Mf3gvE9 +YXxv5IORH1786xdsIPskNN6HUQ/7in7YZxj7LjTy4L4gL+4TXGI689lkRmLc +Rxj3FRb+//wC/tjGNg== + "]]}, + Thickness[0.020288090890647186`]]}, { + ImageSize -> {73.94074221668743, 24.508064757160646`}, + ImageSize -> {49.29382814445828, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {50., 17.}, + PlotRange -> {{0., 49.290000000000006`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.01766472354707649], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOJrk43HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHZS889P4HIvhgeScEv8frFYuJo4uD84RmobQsBP8/CNgrODg0PTo+ +w9jFofr+j1vGryUc3vDuM5jZ5OzQqsCuemaKqMN8G50rs945wfkVEStMzzYj ++ObXjuaaJDhC+eJw/spvLyvOHFCC8/W1VgpfWKLp8Dhx4TWTeieHP99KH8zZ +qOXAsniSFeNbBP+mdE2iUa8znA/2h6SLQ8AtoMQkDQcLkHkWLg6nDjutzfyn +4mBiDATWLg4+J9htZ29F8H++fX3AcrGKg8gnx/Npvgg+LPzQ+TD9MP4TkDv1 +VVHlr2rB+f4XJ8b8c9aG8yWmXuHMSNKGhGcwgg+mvRD8ut9WBec8XBz0FeW/ +5IRpO5zQtJp02t7FYTtIo4S2AysoPL46OzSwHO03NNd04PFfPyV1g7PDGRDo +0XJwVy1lmuXhDDcPHF+3nOD8bM6fC9IPO8L54iD6koPDiyztb9PnqsP5sPiB +8Q9072syWSwNie9jjpBwNBaBmw/jg9131RnOh/lfBJQ+WaQd0NMvAH2MNnI= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lGtIVEEUx68piZRGuuric9+mK6LupmYKx2TuJZKs/CJi+cj1iS8wMLMi +xUSXTEtRNxHLIgxFg8RHKEuypLhmogkZ6CJCiAopIZpYOXfcuWA0MNz7Y+ac +Oed/zow0vfCazpZhGJuDeflgHjuYllGnNs0bDtpaD8auN1i5a3u11FwkgW79 +t2ymmgMNHpVSkMRs3jRf58CMR5wMnLdipjOVHDB4pMrh3l5k0ScLCzVRF4cz +X8jhq2d5Wugrlqxb5GT/PoJ34TsfMmoVsNV3Jc/Qi6Ac/ywoQLVS2T6Vi6Cl +/lRZ2AkV5f3tW5a2Bj/KT6urkmaj/OFkfG+jzojge656u3kkAIYWavd14Sxl +nFZrCEdZi/NI4GA50X1gxqIC413viKxk7vB8JbFP4cCj/Yb/ZL3Ag1Cx/LFU +CR1RgXOGAoH59fv/8gM70+OQZoGDA7pcPtupKMeN20c/+xJAOX6mIfl3rJqy +uGnOITtdDRHzpnxtkcD4mJY8gXk9dQIrsT5JHMnTRQ2OWJ8zHIyPXejJafeH +lbTn89olFgawI7Ga2JWx1N6qn5WxTEwdosx/nRH82lgznov1p5xd+KNqYk5F +eXx48NHxPiXRNxDBLt7fqSB9k4Eg0cGtWtMrJ/1mQKTfjDLSD9OI1K1GBm+D +CjptoliQzy8nMF4ySBubVeuKWbiztLOgWZOS/jKxMFJYvtHaJIV1x9Hg1gUW +LCglxlAsJfHIOHC5/aRkakVC/F7l4OfoZn9WmC/lUuxP70WZ6za9ZnbEpJ8Z +Dqok9kpzoyuJt4KlzOsfLXBJv+ve5CKC9Yf5+lBPNxJ/I4LBhMjEP35iUr/z +CIz60QptpweIsP1ZBEs43tM+ZL8WgQjH+9KXxB+KyP2zlZC6yv/PVv2Pst+W +YtUw4UuZr8O6D+UynP8lV8p1ifp4myIRZf4cjYjoIxWYv48BAlvrTfyJyPsR +jqDHOdApa1EEqbh+OYf1HXIn/d2BSL1mXMl9Zljqj9erUmD+/gVxlK3vFa/3 +ezEcfc/+AtcKCWg= + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMY+r0dDLRWCl9oUXV4krjwmkm6t4PP +CXbb2Ve1HObZ6FyZZeeBwdcHqVfRcmBZPMmKMRbB/x2Te/TfKQT/04aA7Fnn +PRzmLFLe+ee5JpyfmgYEbAi+MQhcloDz+yK6/RkFxOHmtSqwq56ZIga3D8aH +uQedbwI2UBRibrKHQ9X9H7eMvUUh5r1C8Gt/WxWck/CE8/UmLPhh6Ifg76+V +tUi/guC7qJYyzWLwgpsP48Ps/wMy/5InnA8zD8YHa/P2dNgRbBXxX10czl8r +pMOXfk8Czg/nFGs3jldyiD98WTv1IoJfD3Jvghec/x8E8r0c9ubXvJ05VRHO +V/+k8nKWprzDjJlAMBGTXwMK6FuqcPXofJCymTeV4faBxfmV4e6B8WHuRedL +z4vTPG2gCeeDzf+lCQ8PWPro8XrFYjIRwQeb4+8F55dHrDA9q+2NKh/u7WBm +szdo2kMNB4FPjufTchHpFz09AwB1mziC + "]]}, + Thickness[0.01766472354707649]]}, { + ImageSize -> {84.91854545454547, 24.508064757160646`}, + ImageSize -> {56.61236363636364, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {57., 17.}, PlotRange -> {{0., 56.61}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.804412543720742*^9, 3.804412581484972*^9}, + CellLabel->"Out[66]=",ExpressionUUID->"13f9334d-efa6-4196-810d-33ee8d904de1"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPsh", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEsh", ",", "3"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "3"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "100"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "6.25"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP SH}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP CSF}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE SH}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE CSF}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8044125940840187`*^9, 3.804412601154141*^9}}, + CellLabel->"In[67]:=",ExpressionUUID->"1cf27577-f322-4f41-a4a7-b14b06ad987e"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"1829.5453911672455`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"640.8489612094226`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"49.8578065141576`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"-\\\", RowBox[{\\\"1742.8159396416054`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"335.6123321599765`\\\", \\\" \\\", \\\ +\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"11.218921685662114`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"480.24895623142504`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"38.442725603888135`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"37.9546665589785`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"640.8489612094226`\\\"}], \\\"+\\\", \ +RowBox[{\\\"99.7156130283152`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"335.6123321599765`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"22.437843371324227`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"38.442725603888135`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 67, 75, + 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.80441260180606*^9}, + CellLabel-> + "During evaluation of \ +In[67]:=",ExpressionUUID->"6490632e-3399-44d5-b41e-13055ccd37d4"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"1829.5453911672455`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"640.8489612094226`\\\", \\\ +\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"49.8578065141576`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"3\\\"]}], \\\"-\\\", RowBox[{\\\"1635.0635918080238`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"9.922735458022437`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"358.05178073637705`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"13.605377383101205`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"640.8489612094226`\\\"}], \\\"+\\\", \ +RowBox[{\\\"99.7156130283152`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"303.48714558517946`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"19.845470916044874`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"26.51725227734668`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 67, 76, 22584784211283807214, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412601989522*^9}, + CellLabel-> + "During evaluation of \ +In[67]:=",ExpressionUUID->"f178e122-d2f0-4ca0-ad14-b0dc7c914de0"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"191.91689193397647`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\ +\", RowBox[{\\\"31.993073578217018`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"383.79224107793954`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"138.24734715189595`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"6.645811250278477`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"136.57867883119994`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"13.51511556746182`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"8.652821288947234`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\\\"-\\\", \ +\\\"191.91689193397647`\\\"}], \\\"+\\\", \ +RowBox[{\\\"63.986147156434036`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\ +\", RowBox[{\\\"3.`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"138.24734715189595`\\\", \\\" \\\", \\\"\ +\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"13.291622500556954`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"13.51511556746182`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 67, 77, 22584784211283807214, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412602184271*^9}, + CellLabel-> + "During evaluation of \ +In[67]:=",ExpressionUUID->"86c45ed8-07fa-40b0-b612-91fc08d02ab9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 67, 78, 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412602335498*^9}, + CellLabel-> + "During evaluation of \ +In[67]:=",ExpressionUUID->"fbe6fda9-7a73-4fa2-8c04-0c27c2434ec1"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwVk2s8lHkfxscM4zyNm0Raj1gk6YSs7fD7P6I8FWNaZBySQiGLyCqJxDyy +KZvT1iolpyJDQpvsKKSig1PuKaEag2oizdwzcxOP58X1+b64Pt8X14tr+f6o +3SFUCoVyfCH/Z46huM1ptYhP2GmeggAmop6jT02biPgpqh11dj5MFE01Mbqu +K+JPqGlTV/3CRLs+7Y6hKUb53TFNYpP/MBG9+e4Pba2jfOvl7AkzeyZK2JcW +78IZ5VucVq/J0maiveVGK1zThHwN7RTV/uRFyMp+x+9ur9/zQwb8vO29GMi+ +8HZpQNIQP99s9RFlJS10wr9RO7NlgP/u7b/m2AwN5PRiuepZ827+AIef7eqt +hpKOjajEE638fLHDfpubdDTdZtV8xfcmv/FmhtZGZxXE4TIy1xfxwHOS1jA7 +TkMRLG53nukj2P3PivPUv6lo81RAucudbvBMunxHp0kJaf+TeyBHhINdooGs +to2Cjn0XbvvtyjAoqg//5fllHuzaD3Y5Lf0Ae3JYWX+kzQGLYR33rUoEr+4V +jsaafwdHZuKaKOpH8CpJySygzEKH3sWw3CIxmL94pNsmJEHTJDVyLG8KxlaW +ypd9VsBSbG5N+OZpWLmyg1VgpIBElXe1D9Qk4FKzeCqWJYetXpnNJ+ul4BYq +/KW4WAZ7yy5lMLkyMAgoim+UETB1yp5cmyWDnqvrTm2QEpAa8DKCnSsDa90D +hxqmCSjTo7MuLHjz/fue3hUT8CU1ZrEef8EP0nvW8YGApEDX4iVyGRwqzGMz +XhJQaEA0GYfLYcp9W77jDQJWS7JtIEYOpdGqlr1lBLS8sC4KTJBDkfTA6cgS +AoTcoNSrXDlocSSFJUUEWEu7XE2vy+G6Q4PLsnwC7nVf7zcflEPlwdtK604T +IMhkT65yV8A5ODLyOYCAwWRdWY+nAj4Wu2c88iNgJK5/LsFPAX59GX1XOQSM +7+Uw2g8pwOvUHZ89XgQQ64NsAk4r4MclbHrXLgKwN9ERWXcV4Hh9Q2XvRgL0 +X66PteUrwLzYNbrRkQDDdslxQbsCgu0C+/5yIMCEl5Bp3qsACyE7IdR2Yd/p +lBvNYgXI48ItaNYE7LDOHhObkoClFfZzlhLgbrJ7MseKhDWLPUO2GxDAXqwn +c1xLQp/zD+ft9QnwmS+gczeTwDlUz9PFCPCXcBirnEnQaBWX0pgEBE4Y6ffs +IKH+rIa9RJuA0N4ic2MfEpwjHy8bUCcg/HGQTdteEs7K++OeqBIQ2WxmHx5C +gh9+Nfi+CgHRt0c3MQ+T0P3TyCcejYC48nLnhiMkPCvZqVGiREBCYdgu/2Mk +kPlcls+cFBL/sPakppDwW9R7I4pMCie5Yr8KLgllGphd5aQUUhN5B9yzSHBg +3MvnjEuBGx0TIckhwTE62UnznRTOhNjGXrpEwrvDqhtaBFLIZjWmispJKKqQ +frHtlMIVM/61kw9JWFaSkOpULYWmzufD1TISXj09QZ2Jk0Kb/7mfhXMkMHyf +nd0eKYUusVueIX0GOGtf4QUhUhha9GxHmt4MsHdv5W31lgLVs7Oes24Gjswq +Wzx2kILrYMfvyhEzsG/IsyV1RgL9n1scfIdmQO3r4vHb6RKY1K47r9I+C9q5 +KL645BtkVgU8eRA7B2CVebbcbBqcovawlLUp6NW3rpS+nikYz6gzxKYpyNen +3vOW0SQ8fDld0dOx8HPFmEosRQwuF0cLknhUhFWEWL6Rf4SEyso+8QUauhYV +2FdjNwHDnzxfMQ8qowutRsLK+2MwWVXrYOymgmiNFiI6WwS2hV8DhszoKPdZ ++gTHdBQs+5V7DhB0RN4WXnYxEELbuc7S3teqyGqZ8Ql9/Q+QG390C8FTQ1V2 +1VHNW94DY7hnA61AHY13mPE0f30HTUd1JQ9/1UCitJwVY/wRMPC2nN/upIlq +mgyp6RYjYNz4JazRUgspL7V3+m46DD7bLl4UfNdCtLSWG9+shmCjt2yFaFQb +uTlWKoX+9Bae81bQ7z5hoP9WNqj3Bg9CnsPmik1XFqHZnl7ZYN0boF2l9ns5 +MVFp8P3SYdU34LXR567oFhP5Z2TFayS8huTEAiffJTqoON5wp6FCAN8Ta2Yf +ntFBYd+C1FOSBJCnu9EwXaKDmOvZXjr6AtAgyjuDCB00Rwlt8NMTQAqud3KL +XAeFyCKFZZgADl/+8l42o4NutPaVwiIBOFsWV4XTMPT1/NG642oCmP5ZHXlg +GLr/dE+Z/gwOHvsHQo3WYuitfrb3hxEcHjk7G8rXYahrp+mVbcM4bLKs7eyz +xVCyzUTZzbc4WH7OXHvOAUOjigoy7jUOc0e3kBTAUHWP8jWsD4dbZ0qzRG4Y +eqMaeCmmAwfTwxhqZWEolDvxdKQdhz/dk6eL2Bh6VKbZ6NGGQ5ouZw/HC0NL +Uupb1j/Awf+y1vIu/4U+be78/D0cepKP9VbsxVCVb0lO3N84uO4Xpafvw5DX +ZjOPj4042Fq2fNwSjKHAJR7TA3dwqFC3uWwUiqGcMI8BVh0Oxp8vsuQHMaQe +/Dz2cS0Ouc/p1P4wDPnyYjv+XYODRm3sndoIDA2OTXQ3VePwP4u9vJA= + "]]}, + Annotation[#, "Charting`Private`Tag$1014534#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0H881HccwPHrjvMjzt3ntEIpla4epSwrj9Ld+71LsQnxGDkhUyrS1ERu +kj3WnZXQ8mN2Fa1W2IikENNXyNevkVMu2lC664f86Oio0LY/Xo/n/y+bkEjv +UCaDwXD/r/9NtxiqF6/WUCKDvGVkPh+ZqexR7SINFbuaWbbxEz4eYi6y+o2v +oaLZ69NCuXzcNuh9mPVOTQUJN9jV6vGRXV2xoL5OTeX0oPLnIYKxwbKYLRI1 +ZTwVPFNIEQzKs1ruKntG9QvcliWGElyx7svT7j1PqThWl6S8nIfrLty4Ghjf +S3kcvJ5W48/FYwHlpkk1KgqknP57+zkobrcxSLbtoGYpCboYmWC8tF8/RldH +ubGAmzjfCLX1K6pz/P+g9leZejcVsFGSyElae7EYVOAheeqhhwc8EzsyFzeA +fDA5XCRionA0MG/LzQ7w3Rtut1rOQNM7GbvTNY/Ado50xebSaZBOP9t6NKcP +ssaikuHVe/js3r5WseUA1C/57nFzzCR4clYeGSvUQHOFgW/ZHB1s4MatiWS+ +goGNbrm5FuNAmyvCMi4OgbQB8LSdFmYv+uHg88xRuBGY8cI/YRQsycyacKEW +Rlvquy7ZD0Oc/pOSu4bjUDH8e9jLo4Ow2Sep+vitt3DlbZnw7NqXEJR77iQ3 +cQLmVrI5lz9qoDvJa2SVxztYunmgKpSvhqqWtr6iifdgdOmQWhI7ACOmpWf0 +701BbPuQ/U8vn0BSYWDT3agZsF48kKO40A/iyB2eeqYMdNKJrPYM98KLk6UW +RMvAAtv586ZK/4ba+9p8JT0L37GNVD6qHtiiUGfFFzPx8Zq7yWrDbogtKHgw +lMbCiJ5Gg54oFfQNftXF3aeHqTvjVAtsumCksMTR2l0ftzoZYK/qAThceBPY +u4SNLqLPVWn1nSB4qKfcrWOj08IMvcsdSqhPbbna2WOAI+ekwXx1B2TERIt0 +xYa4ZFeFv2BhB3D6lOtZWUY4pqGNO4PuQ1U0f7z2G2NsqA3nP49rh3m+go8u +4tlIy5ot3+xqA+vy4bBygQmazd3Qnuz2F/htVSi6p00wpInrJ9zTCk6+E8s1 +alPsq04zPXuiBdqKl7MrmjjYXTR95sc7zZDpKMzflGOGipRZ6SkWzcD6lfnQ +R8zF86leXK60CXyc/Co017h4wsxH9qe2ERLissT+c3mYTleKLI81wnTc9ana +Uzx0tS7zlRs2QibfyUI+zsPKkWyvO3k0GOvyWr7W8XBX5Pqapbk0fP/I/Lho +kocLTWqHTl+hISJ7+OnEBx4K+91lAZdocBZcLgxnEXxcmZDJPk+DdqMRbicE +HaZ4H+JTadgeotprZU/wVn/K4YloGhqcnS0mPyW4M73BPPoIDZsEJS0PHAgm +JlpGjH1Lg+B1kn2qI8GpZ3XrtJE0zESL3jOAoLj1zcrJMBqunbqaonEn2Dr4 +3N82iIbFEQTrPAkeDbw9ryiAhl88ErQXvQiuMo+RO+6kQcaX7JD4EBy/HR6+ +zY+GgGwTm9YAgg1m/pLj3jQoE6Sd+UEEzYQ5chMvGlxDNHJ5MMGZZc5B5z1p +cBDUvBLtIVjlF8Wv2kZDvpFdttVegkVmASNubjRYv1Z4Tu4juMk1NOafL2jI +aGMzH4YR5K+C/EjX/36WRN0sOUDQW6mQMV1o+Bf1pjsH + "]]}, + Annotation[#, "Charting`Private`Tag$1014534#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVxX041AccAHCdzsuF7n7MJeWhtY6ltIg6L99vpBc5Sl1iRJcyFWqVQlx5 +kLe0DTXWvaTiFrouKvN2HCUP81rIymt3bV6iS+dlYuuPz/Mx44R7HSWpqamx +/vflDKOxOuf1CumGb112B6vRkZSuMaE0VUivcWMrulSGeIpkanxbXyHNtiIY +7mOG6D7idVp9Ri6t6MofwB5D1KgsXVlXK5eusDlf5VNiiBcC4yNcfeTS9l1M +0Y4QQzyUb2y+M/6tdHVF0KhW51doscktldUzKN3S/3DoeZkBbrr58K5/TK9U +8Dw071M8gRf9nuimVHdJb75tDWcWUNG5xUwz7Zs2qUURh5xG08OYyH5yhKpW +6s9ZpXIYpKCyzqKS73tPartsODnMTgt9EvVSNgrE4LhFQSkXkPGEZ2Jb1qpn +IKPORrF81NFxwj/ftaQNPnzcdSro9CLUrco8kqHohjNLB91VlgsQ+fnt9vP8 +Ppjjyqbu0ObA5mlwk/PyIdDyCLg16TUDnnprz34sVMBtU74/JU8FW6jRVuGk +Yahc4LYF/DAJ9QbZIZmCMRidsEo9z1TCEtO40HdZE2DPNVpfs2cClhPzVscd +lXA1UGNw4uQYRJMHJDVak7DwYC+9lTUMLuyUythHn0C7ttkr58E7OJSXk0RN +nAJ25MDkvjVyeJWyd9zSYwai4ioOPx0ZhPLG5r77U7MwXD29qVN3AMZ1i6+R +n85BjNsizYzIXkgp9G+oOTMPG1eomB1hf4FzuLfnYl01DFzrNt1f1Q1/JxUb +EUo1LFlRlnrVtBNkrUpRe/0ifOZQ3LZ6vANcs+U3YsQkvK/cf5H9ZxtcKCh4 +MfaLOnodrLC69boF+kb2d1KDF+NuzhWKVlkTjBdK7ExYZBTbmt8TFTaA9c0P +/r1fa+CBF2/K/UzqgfFycfsRlQb+sdkvwO51HdSlN97t6NFEL/pQUKZIBpkR +55xUYi0MsfjRPrK1GvT62m3Vb2jjurERgxhKFZSf05+UhVFQ//tL08na5bDs +AGNhh/MSnI8YNvbllILJk/chTxg6GCUP16tvegQHt2dnv/qsg+JUJbMitxjs +D0yZK+S6SI9YTXFJkkCz2FyjtEEPr3vUXI8LEEOWnaPIgb8UL3cu0+nfUQjq +QtJLtjMVXYbc94W6/g5s+4OliiIqMu83JXhV5wE3+oazL52G5ZKZo5zEO/A5 ++sGcLJmGx26dTX/vmwtZ+vZGCZM07FpocHicLASKKr/xsIqG3K09ZuQ4IVzq +Noh1mqbhHYU0xztKCCd57wen/qXhZc+grZonhLCNkVt4XJ3A0CsF1j+7C0HJ +1MY9BIFATbL3oAphD6frmPEGAm1apj7JbATwbNs2o+nvCJRbRgTCGgE4MCSN +L6wJNKEbpMroAmCMpmxItyPQlWxm8GaWD/PnnGbVgMAyPSWPU8OHouS7VxUs +Ai19n3cXevJh1UkCaz0JbF1zryVjKx9+9eAqBXsJ/Md2JfuyNR/i9X28fdgE +ulUkLITT+eDH0zFr8iOwtIcd81sfD9q5kR2iQwRuZhVlPG7jwU6OIiEhkMCW +j96m3bU8sGZUDzsFEVifkvvTehEPRNrreMbHCGxodQk7ksMDk9Fsz+lgApdM +Mh/z03iQ2axBehlCYPLytKP9sTygSM6USE4Q2NvkEGl+mgf/ASPxQig= + "]]}, + Annotation[#, "Charting`Private`Tag$1014534#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0vs3lAkYwPExk0limFdbyebSbVRbaZHVxfOcCdspQhlROKJYyVqrsWTR +5j4u7whZcinlUibTbMQmvWHiWFKGSnaXkOGMhEkuhbb94Xu+/8DHyDvoyGk6 +jUaz/9L/z9Adk3K3yyk8yE64v0UN6WnMCaWhnIon1WcrDNXwJ7qh3nUdOVWr +kGeVrlRDu9EjwYy5IWou2NWpmK6GzLqatdLGIWpWpfKyrGcphnnFhtq4DVG2 +4449yuSl6FmqZ3wg9g3V6RTpbTXJxM3mB5PtewaoS7v4N280q6J53h/FHpG9 +lMENrSeb+Az81b1aU/DoJUUdGvcNiFFB7lOjpSkbO6jevecDE7I/Q2T4a9XQ +6Uaq4b0FTWE1D0rp5rqC47eo1yEdD2KC58AtniX4tlAMvNynJiY10xDgEN+R +ta4JtpuzROg8BfsmPEptKjuAdOxILjyqBM2HmT4Z8m64U5EnLfGagPCFN7a/ +FPRBW3vXWknkGJg99mvjrhmEqGIrtt8VBTiwtp57L5LDeTNxXkvrMFhqR+wI +oivg0gl9ihU8BM0rcvwzC8dA48SkYGDTICw3vBg4nDUBW4zZf7pv6Ic1xOKO +M/uUIG629MlS9EKEar+kXm0KHtyTrpwt+hv28wR1UVUf4ESup6xnsBs8S3IT +teNnYC/HUlD03Qt4JXAa/+bwHETTds1t7e+E2tb2voqZj2DfRNdjjnbAuOZd +UvXxPHxqSpH505+BQOTRUh+yCFxJXEmhrA24QccclmjSUPQVOSD73AIjiXd1 +CSUNN4yYRyZBMzQ8U5bJmlVwNjn5jHhSCjY5Q9mRYjrWM8Y0LSsbIKy8vGvs +EgNFi+qnxx88gr5R5xfafkvwiamPUd72hzAukljo26siGYOJJXP3wTRv0qN3 +PRMbNiXFmx2sAc7zJTKfaSbyV5c/lCqqQJrWWtz5xU3BaFxCRu5dyAzlW02L +1fCcvIybeksCrD7ZLkb2MkwUBk5+LRRDLV9nquFHdZz3T601+0EEq104n7/n +Lsf6NvbclYKboF/9zr+ao4GrqodDYodLwNU2J+fVggbW3Qrr9Lt2A/a4zBjL +hzRR5beohpKAImgXGzNrWlj4j11nlVnEVciy2Fe2t0AL7ToupJXfywfGVfpz +HlcbbUxH7ExSc4G3x7VGflsbu4wvXvcdzoboiGzu8VVsHO3vT7kszIKFiDvz +DUlsrC83LFg8kAFZOnt046bYqNxWecHMKx3Up0tbT06z0cVnrMjANR0udK+I +sppl45V13gksx3Q4m/9uYOYTG/kKmnAG0sGaUyQ6wyCwpvFo0LRBOih3L0NH +gsDDKR8Gil8LwdH7pa+eCYEuAda3qVNCaLK21p3dSWBT2MlGAw/hFzeS1i5T +ArM/Op+O4QmB81ZgkmZBIH8bx5ZnK4RFvtVHGhBYMRFuv95YCLeTilPl9gT6 +v/xLvb2bhHVnCWx0IHDhhePmxRYSfj8crSx0InCg9uet5rUkxOq4HXPjEXhI +dP9JdT4J7vkaRm3uBE7eUdmp5UOCLDq8s8yTwKNjdJ1QZxIOeMvj4rwIXJXJ +oQZtSDDlPFJYnSKwfmq3f6cxCWXLtuXr+RJYtf9fL94aEvTf5jjM+hE4slF9 +Ze9yEjLbmfTn/gRasArjAhfSQF0SUikJIPDam/Mixnga/AdqaUzO + "]]}, + Annotation[#, "Charting`Private`Tag$1014534#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$1046758#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.025081514923501382`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lG1IU1EYx68vZFYY6abD1805Za4P5czuvbuLZ0lGKBr5ITHz3TSjZqFh +NhMtM5NKSzGXCGUQQqIfEpflC4WkaZrlGxY5TAhRSUWGb2U797QzMHrgfPjd +c85znvN//vdIkrUn0uwoirIxj0jzsDWPk26tQ9QFNdTWmGPVCyzcYJrJ7c8S +w3Lz8XP6ADUoUVyXwLiHLilohIN+FBG+0J7vRaenckChSJRCdfnuvJAvKijl +jrWdeSKFiKGKuN8pKjxvlEInWi9g4cXBlTept/0gf53NGshlQLdkPmjCD6aT +Ho8G/6ThIcqz05/wL1OOsbYigPCDkuLYz5wc59Ez8CNTYapuD4RdUU2VabdY +wnydOo7wJopODqZizBc1+oNb1bBjxifu7/kyvH+cA/e6eHlfuZUNUDT1LlcG +Y85LmkGTlfl5kfofLrTvvre/2sr7AhtcPtr7E47ocVA/GgkkHIV0ClUQFqG6 +khWwPUyWY7vGERahuhaszOs/bWVen0EOglG/XBRYn0wOet4ebjxbJ4fE01/D +7MZV0IrqFSnwdycV2W/Rz8LhqM4DDOH3aP0hGtbmZ7uYUDnhDO1Cce+wP+Ge +NsOdbc0yrO8lGlbR+no/7KPvNMQ4upYom6SA2kBFMthvXb5QgPxgYADZsabU +Fzb4vrMgHZ2Kpjx9IU6sWUzZYOHq5MqEclaC/VWvgnatbr6mSgLZLcL1vgEV +GI8kaPQXJfh+8Ry4XLmf/WFajP3wmoPljsWW9BAfwrkoX5kn4aPPu59RKyKo +Qj704KBY7CDrrxTier1VhHk/V7KEC1DfxxiYu3m+LMjDFdevYcAQzcZsBojA +g/cVDV1lHUXB9e54/w0aJlG9e7zx+kIaBKjepz5Yz2s01s1OjP2b8H+26L+V +A5b8ZvS9PoT5e855E85D9w8XEr4bUxZlkyUgzPtJKcD74qzM+01rZUu/cT4B +oN9KX0JDo/Nep/RvAjiF+jdH4/6+dIMdyN+xDO7XkBD71Z0l+Xi/i1WE+f/v +MkfY8l7xer8Swdb37A+nHRS7 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1E8og3EYB/AZGRdJxhg1bIfNCjORsN+2In+KOHDwvxYHiwOHyVIkhVD+ +ZmJKcZGDi1IcWOTvYbOyy2o5yFGSUtg7fZ9f3q3ew6fenuf5vr/nt5zewWZb +rEQiiQk/teFHGn6WPuK71vVWZiwWfnIGT6lkmtvlNFaw6P4sSuIu9XvsRreF +7GjbL7lzWdh822xjTHI6OVLOqyA3BZRjPSlacupc3Wvcu5bqZW11am8KddQP +xjxiK1Z8if0hHfsRfjIra7iSVboedeyr3e75nrGQtyv0vo1O7pZh9dpPIXdk +niMz+blnx29cMFN9GP3rhfcOuNlE6HJdyeeP5FGJ8ql4fljtD7VIBvL+5m9l +Ucb7MOqdObPL+toZ9UsX5rzmHv8qH7p/iTbyTO+1Xhsu2P+8Ndya58mtu0zu +hGrNiDRgIkfmCVaRH1PezA+rVVQfRv/d4GnSppd7QTiAQxPZKcx3bKJ8MPLD +2CcY+4Z62Ef0gzGP2Nh35BkNfgaK6+WUF+4+9+bbMhgZ3wvG94TxvVEfRn+c +F4zzhHHeyAcjP+wQ+p3k0j6Jjfdh1MO+oh/2Gca+i408uC/Ii/sEP4WPzdDB +jfsI477C4v+fX9QS7ug= + "]]}, { + Thickness[0.025081514923501382`]}, StripOnInput -> False]}, { + ImageSize -> {59.79691158156912, 24.508064757160646`}, + ImageSize -> {39.86460772104608, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {40., 17.}, PlotRange -> {{0., 39.87}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.0211954217888936], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ieJC6+ZxNs73HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHp1na36bbIvhgeXkEf4Ne3mJGGXsH5wnNQmlZCP5/ELBXcJCYF6d5 +msHeofr+j1vGryUcSraK/j49z9ahVYFd9cwUUYfrQp8cz5fZwPk9Xq9YTBZa +w/lcbqqlTFGWUL44nL/y28uKMweU4Hx9rZXCF5ZoOiTE3nFjnmHt8Odb6YM5 +G7Ucltzfxzen2AbO97k4MebfZls4/wwY2DkE3JKuSZyk4cABMo/L3uHUYae1 +mf9UIP7gt3fwOcFuO3srgv/z7esDlotVHPbXylqkmyD4sPBD58P0w/hgWl8V +Vf6qFpzvD3KnszacLzH1CmdGkjYkPB0Q/BMgd+oh+FMn8FeZads76CvKf8kJ +03ZQf8u7z0DS3mG7Q9Oj4xLakPBotnNoYDnab2iu6bDF/MehlF+2kHDo0XJQ +fdI876yWLdw8cHz52cD5+Wu6b2coWMH54HCys3B4AUonc9XhfFj8wPgHuvc1 +mSyWhsS3mpWDiTEIiMDNh/HB7nO2g/Nh/hcBpU8WaQf09AsABWw6Sg== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx1/TkiiLcubw1zbnFJ1ENdESpe97ERFFhv4zIkqtqVmmVqLl +JCpMclRairrMKIuwsgwSf4Q/UCTDWYlLyCCHFWEZpYVYYbV7r90LRQfH+364 +u+ee+z7fO01qdqLJXRAEN2ff5uzznH2sc0mt4T1BbY2zfQuEixtmJgpsOWrc +sbzMEB4RGGg7pYFKnNpju0xgo21rMLynxadpJgKBtmQtjv+IzXmiJjgTt7k9 +7ZoWL/zNKWveimzcoWXz40U8iJnt2Vsagi9N2/dbPwHmaefPaAjC3pyqG7wF +VJctPRa9KJTz3Eyeo7Y8jPPFkuIdw3HhWJxwr8IkiHiXqZ+p6ohA22jpnClf +ZnqsmlzCWTrHRYJxo2/LkCMUXUWBa9NryZ/9dWz9FQK/ul3hA2Uyt+Lk+KMC +Ha7ERdqtd2WWxrv+5RMefedXV8m8KqLB+5lHKOet/Z7xl55HcE4YKt/5c4Oe +s7LSvjAjVY+Ykb6sqCaZ1zu3qb4ts6TnDZl1VB8rQRQ9p7ceXlSfDIL+XtK4 +ry4cr1OujkSpCFpovko9fOm6dpGvd+nnYiqT8AScpfmJwPePH7rXbQjnnJH9 +ufixPZRzf3vr2QVNOqbvAeAbnV8fwnxzHTAuXFFiuKdlfhsF81t3MPPDUpHV +7Uww7q88WO9mFqEdGU8SAoKR0jusN90XUTg2O2r4oGH+mk/QkW3+WFOpwaRX +56oaPwLHxt2iNVfD8kkl8D564cjgGzWLW07wtXOqOT1axbmAxrMEcN50p++m +MKtkfgZBsdpTZ6vwYfn2iJwl/YtkPtzs82MgSMTk6SzLGv8VLH870JoUa/wV +pgSVvboQ6LZ0noyq92Pr84Axmu+yIDb/CKCg+V5XsfwPgfnWXc2+e/7PLv3/ +5rDpkAnrYxVnqQ6TQZyP0fNv8eF8zmhJcMtRcJb8ZFAwfVJklu5jpsyuerN4 +Ctym70c+0Lg8ckn6KwWSaf0awOK0+TJ/O8DqNeTD7jNEHk/ye6/M0v07SDi7 +3itJ74dK/P2e/QbkmhNT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMYzrs5GGitFL7QourwJHHhNZPlbg4+ +J9htZ1/Vcphvo3NlVp0zBl8fpF5Fy4Fl8SQrxrkI/p+Y3KP/uFzg/E8bArJn +8bs4zFmkvPPPc004PzUNCNgQfGMQuCwB5/dFdPszCojDzWtVYFc9M0UMbh+M +D3MPOt8EbKAohF7s7FB1/8ctY29RiHlaLnB+7W+rgnMRCL7ehAU/DPsQ/AO1 +shbpIq5wvptqKdMsB1e4+TA+zP5fIPOFEHyYeTA+WF+3i8OOYKuI/+ricP5a +IR2+9HsScH44p1i7cbySQ+Lhy9qpgq5wfh3IvQsQfAYQ2ODqsDe/5u3MqYpw +vvonlZezNOUdZoLARUx+DSigb6nC1aPzwepuKsPt+w8C/Mpw98D4MPei86Xn +xWmeNtCE88Hm/9KEhwcsffR4vWIxuYjgg+2f4ArnV0SsMD2b7YYqP8PNwcxm +b9C0hxoOIp8cz6etRaRf9PQMABZuGmU= + "]]}, { + Thickness[0.0211954217888936]}, StripOnInput -> False]}, { + ImageSize -> {70.77471481942715, 24.508064757160646`}, + ImageSize -> {47.183143212951435`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {48., 17.}, PlotRange -> {{0., 47.18}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.020288090890647186`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx2dKIaVh23T4a+6XY05EnWiJ4fO+LyGRaGR/DIlSa2qGaVRg +ZlSKiY5SS9Et0cogJEWDxB/hGomkOCvThAxyqVHmjDTzR2a1e8/dC0YHx/t+ +uLvnnvs+3ztJWs4hnTOPx3Oy9wR732LvVpN7nSaLgTqDva36gYOblmbyLLkB +0Kx/l8mLY0CDWpEExNT8cYsfAxbU4qXAX6Bepn+kgYdaigwur0XnvrhDQ2nM +/u70ezJ461OQGq7bGLfK8PweCh5HrTw7USaH720HTxlzKChYsP+My0E5XVQ/ +FERBbcXO/MjtgYTXl85b6yqVhG+VFCePxKhgR2Jrle4KBZ+y1Es1PUHQNV62 +rlvmGB3LME8TZs/BZ2BS69UxbA2Ep5f8dmf4Mhv7K/B6MQPe9UdVgxUcd0Lh +5PM8BTTEBI8aQzhmx2P/5asufeVhNRyHBjXxX7kEEo7v37b39psgwonDlUd+ +M2rCoupR18w0NUSN9WVHhHIca9+mVs0xq6eCYwXSx5uBCPacanBD+nymob+X +bjlZr4Kp1LtjEQ00dKB8RWrwQuuiabLeoZ+DkUy8BI7Z+a8Bfs7NmvcwKsKZ +Od+KB0YDCfd3d17f2qbA+toAVtH8Rjn2jZwCratniaZVBhPIb8kU9ptZiv1Q +TuG6lUrhUcjpRqdfFMjGJpN4vlJI7R1R68JouDixMq6ZlWB/FdPQk1MwZ6iW +gM3NFGow0mDdd4wynpHgfCZp4F+4eW5oOgDH9WBg0TTfnhEpJpyH4ul9Ccc1 +9z3grYiwn800FAdsU1iqhDhfmmNW/3WK8Nl24dpgPQW2a9n6cB9PnP9hCjqT +orV/lCJAsteuAZj1psKIRm+8/gfABMrXwx/PXwQQoHzvi3H+C4B96xyAv1P/ +Z4f+m1m5IJ8xDogJs3Ww+RPOR+c/ICR8Q6tPdMoVEGb9pBFgfT5wzN7HLxw7 +6o3jCeAhej+WAVp2BbtnvBdACqqfaqO+XV7Y3ykUrtewEN9nM0XisX5naMLs +/fvKseO9YvV+IoLN79lfuGMTfg== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1D1IQlEUB/BnSSIFWWQGFfQ5aCGVDSEVj/KDPkDJIYfoC0QhzYYgimqr +QaMiDKKiBIeWoBoiwikikBRBNAcbBGlqjIjKil5P/vfiS3jDDx7nnP9951o/ +7R6xFTIMI+KeAe4p4J6QUrsTThvZTs3fT87Ca3WS5oivkp26jbfYbqid0g+/ +3UJ96n10MCYju2n1mkQyBTFfLl5FbE5VL0+VK4krNgafxa9KUq/maFwZblOR +fjDmEbpqNyF1ZFS5uYNGdjgk6Tl4ULHqbf97ey91zD0hiZZRr5+M3nc8GYj5 +eezUfN0+A6kPo/9qVjsXnaSev5Rnw1FqPk/ckJ+PM/LDTcmMhXE25uYv1v8z +3odR7+XcPLNfqif9+LlXqC/UswHR4X8jz3XK821b0Ofn/dQRWxVXMSZK3ZW8 +c3X6qfl5GqmPu1sT+z/9pD6M/uLAjlZUqyP+GnPd/Xio+Txbuvx8nJEfxj7B +2DfUwz6iH4x5hMa+I89S+j2lGZKTvLDvrWhiL0KN84JxnjDOG/Vh9Mf3gvE9 +YXxv5IORH1786xdsIPskNN6HUQ/7in7YZxj7LjTy4L4gL+4TXGI689lkRmLc +Rxj3FRb+//wC/tjGNg== + "]]}, { + Thickness[0.020288090890647186`]}, StripOnInput -> False]}, { + ImageSize -> {73.94074221668743, 24.508064757160646`}, + ImageSize -> {49.29382814445828, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {50., 17.}, + PlotRange -> {{0., 49.290000000000006`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.01766472354707649], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOJrk43HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHZS889P4HIvhgeScEv8frFYuJo4uD84RmobQsBP8/CNgrODg0PTo+ +w9jFofr+j1vGryUc3vDuM5jZ5OzQqsCuemaKqMN8G50rs945wfkVEStMzzYj ++ObXjuaaJDhC+eJw/spvLyvOHFCC8/W1VgpfWKLp8Dhx4TWTeieHP99KH8zZ +qOXAsniSFeNbBP+mdE2iUa8znA/2h6SLQ8AtoMQkDQcLkHkWLg6nDjutzfyn +4mBiDATWLg4+J9htZ29F8H++fX3AcrGKg8gnx/Npvgg+LPzQ+TD9MP4TkDv1 +VVHlr2rB+f4XJ8b8c9aG8yWmXuHMSNKGhGcwgg+mvRD8ut9WBec8XBz0FeW/ +5IRpO5zQtJp02t7FYTtIo4S2AysoPL46OzSwHO03NNd04PFfPyV1g7PDGRDo +0XJwVy1lmuXhDDcPHF+3nOD8bM6fC9IPO8L54iD6koPDiyztb9PnqsP5sPiB +8Q9072syWSwNie9jjpBwNBaBmw/jg9131RnOh/lfBJQ+WaQd0NMvAH2MNnI= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lGtIVEEUx68piZRGuuric9+mK6LupmYKx2TuJZKs/CJi+cj1iS8wMLMi +xUSXTEtRNxHLIgxFg8RHKEuypLhmogkZ6CJCiAopIZpYOXfcuWA0MNz7Y+ac +Oed/zow0vfCazpZhGJuDeflgHjuYllGnNs0bDtpaD8auN1i5a3u11FwkgW79 +t2ymmgMNHpVSkMRs3jRf58CMR5wMnLdipjOVHDB4pMrh3l5k0ScLCzVRF4cz +X8jhq2d5Wugrlqxb5GT/PoJ34TsfMmoVsNV3Jc/Qi6Ac/ywoQLVS2T6Vi6Cl +/lRZ2AkV5f3tW5a2Bj/KT6urkmaj/OFkfG+jzojge656u3kkAIYWavd14Sxl +nFZrCEdZi/NI4GA50X1gxqIC413viKxk7vB8JbFP4cCj/Yb/ZL3Ag1Cx/LFU +CR1RgXOGAoH59fv/8gM70+OQZoGDA7pcPtupKMeN20c/+xJAOX6mIfl3rJqy +uGnOITtdDRHzpnxtkcD4mJY8gXk9dQIrsT5JHMnTRQ2OWJ8zHIyPXejJafeH +lbTn89olFgawI7Ga2JWx1N6qn5WxTEwdosx/nRH82lgznov1p5xd+KNqYk5F +eXx48NHxPiXRNxDBLt7fqSB9k4Eg0cGtWtMrJ/1mQKTfjDLSD9OI1K1GBm+D +CjptoliQzy8nMF4ySBubVeuKWbiztLOgWZOS/jKxMFJYvtHaJIV1x9Hg1gUW +LCglxlAsJfHIOHC5/aRkakVC/F7l4OfoZn9WmC/lUuxP70WZ6za9ZnbEpJ8Z +Dqok9kpzoyuJt4KlzOsfLXBJv+ve5CKC9Yf5+lBPNxJ/I4LBhMjEP35iUr/z +CIz60QptpweIsP1ZBEs43tM+ZL8WgQjH+9KXxB+KyP2zlZC6yv/PVv2Pst+W +YtUw4UuZr8O6D+UynP8lV8p1ifp4myIRZf4cjYjoIxWYv48BAlvrTfyJyPsR +jqDHOdApa1EEqbh+OYf1HXIn/d2BSL1mXMl9Zljqj9erUmD+/gVxlK3vFa/3 +ezEcfc/+AtcKCWg= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMY+r0dDLRWCl9oUXV4krjwmkm6t4PP +CXbb2Ve1HObZ6FyZZeeBwdcHqVfRcmBZPMmKMRbB/x2Te/TfKQT/04aA7Fnn +PRzmLFLe+ee5JpyfmgYEbAi+MQhcloDz+yK6/RkFxOHmtSqwq56ZIga3D8aH +uQedbwI2UBRibrKHQ9X9H7eMvUUh5r1C8Gt/WxWck/CE8/UmLPhh6Ifg76+V +tUi/guC7qJYyzWLwgpsP48Ps/wMy/5InnA8zD8YHa/P2dNgRbBXxX10czl8r +pMOXfk8Czg/nFGs3jldyiD98WTv1IoJfD3Jvghec/x8E8r0c9ubXvJ05VRHO +V/+k8nKWprzDjJlAMBGTXwMK6FuqcPXofJCymTeV4faBxfmV4e6B8WHuRedL +z4vTPG2gCeeDzf+lCQ8PWPro8XrFYjIRwQeb4+8F55dHrDA9q+2NKh/u7WBm +szdo2kMNB4FPjufTchHpFz09AwB1mziC + "]]}, { + Thickness[0.01766472354707649]}, StripOnInput -> False]}, { + ImageSize -> {84.91854545454547, 24.508064757160646`}, + ImageSize -> {56.61236363636364, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {57., 17.}, PlotRange -> {{0., 56.61}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[100]}, {0, 6.25}}, {{-0.6931471805599453, 4.605170185988092}, { + 0, 6.25}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVk2s8lHkfxscM4zyNm0Raj1gk6YSs7fD7P6I8FWNaZBySQiGLyCqJxDyy +KZvT1iolpyJDQpvsKKSig1PuKaEag2oizdwzcxOP58X1+b64Pt8X14tr+f6o +3SFUCoVyfCH/Z46huM1ptYhP2GmeggAmop6jT02biPgpqh11dj5MFE01Mbqu +K+JPqGlTV/3CRLs+7Y6hKUb53TFNYpP/MBG9+e4Pba2jfOvl7AkzeyZK2JcW +78IZ5VucVq/J0maiveVGK1zThHwN7RTV/uRFyMp+x+9ur9/zQwb8vO29GMi+ +8HZpQNIQP99s9RFlJS10wr9RO7NlgP/u7b/m2AwN5PRiuepZ827+AIef7eqt +hpKOjajEE638fLHDfpubdDTdZtV8xfcmv/FmhtZGZxXE4TIy1xfxwHOS1jA7 +TkMRLG53nukj2P3PivPUv6lo81RAucudbvBMunxHp0kJaf+TeyBHhINdooGs +to2Cjn0XbvvtyjAoqg//5fllHuzaD3Y5Lf0Ae3JYWX+kzQGLYR33rUoEr+4V +jsaafwdHZuKaKOpH8CpJySygzEKH3sWw3CIxmL94pNsmJEHTJDVyLG8KxlaW +ypd9VsBSbG5N+OZpWLmyg1VgpIBElXe1D9Qk4FKzeCqWJYetXpnNJ+ul4BYq +/KW4WAZ7yy5lMLkyMAgoim+UETB1yp5cmyWDnqvrTm2QEpAa8DKCnSsDa90D +hxqmCSjTo7MuLHjz/fue3hUT8CU1ZrEef8EP0nvW8YGApEDX4iVyGRwqzGMz +XhJQaEA0GYfLYcp9W77jDQJWS7JtIEYOpdGqlr1lBLS8sC4KTJBDkfTA6cgS +AoTcoNSrXDlocSSFJUUEWEu7XE2vy+G6Q4PLsnwC7nVf7zcflEPlwdtK604T +IMhkT65yV8A5ODLyOYCAwWRdWY+nAj4Wu2c88iNgJK5/LsFPAX59GX1XOQSM +7+Uw2g8pwOvUHZ89XgQQ64NsAk4r4MclbHrXLgKwN9ERWXcV4Hh9Q2XvRgL0 +X66PteUrwLzYNbrRkQDDdslxQbsCgu0C+/5yIMCEl5Bp3qsACyE7IdR2Yd/p +lBvNYgXI48ItaNYE7LDOHhObkoClFfZzlhLgbrJ7MseKhDWLPUO2GxDAXqwn +c1xLQp/zD+ft9QnwmS+gczeTwDlUz9PFCPCXcBirnEnQaBWX0pgEBE4Y6ffs +IKH+rIa9RJuA0N4ic2MfEpwjHy8bUCcg/HGQTdteEs7K++OeqBIQ2WxmHx5C +gh9+Nfi+CgHRt0c3MQ+T0P3TyCcejYC48nLnhiMkPCvZqVGiREBCYdgu/2Mk +kPlcls+cFBL/sPakppDwW9R7I4pMCie5Yr8KLgllGphd5aQUUhN5B9yzSHBg +3MvnjEuBGx0TIckhwTE62UnznRTOhNjGXrpEwrvDqhtaBFLIZjWmispJKKqQ +frHtlMIVM/61kw9JWFaSkOpULYWmzufD1TISXj09QZ2Jk0Kb/7mfhXMkMHyf +nd0eKYUusVueIX0GOGtf4QUhUhha9GxHmt4MsHdv5W31lgLVs7Oes24Gjswq +Wzx2kILrYMfvyhEzsG/IsyV1RgL9n1scfIdmQO3r4vHb6RKY1K47r9I+C9q5 +KL645BtkVgU8eRA7B2CVebbcbBqcovawlLUp6NW3rpS+nikYz6gzxKYpyNen +3vOW0SQ8fDld0dOx8HPFmEosRQwuF0cLknhUhFWEWL6Rf4SEyso+8QUauhYV +2FdjNwHDnzxfMQ8qowutRsLK+2MwWVXrYOymgmiNFiI6WwS2hV8DhszoKPdZ ++gTHdBQs+5V7DhB0RN4WXnYxEELbuc7S3teqyGqZ8Ql9/Q+QG390C8FTQ1V2 +1VHNW94DY7hnA61AHY13mPE0f30HTUd1JQ9/1UCitJwVY/wRMPC2nN/upIlq +mgyp6RYjYNz4JazRUgspL7V3+m46DD7bLl4UfNdCtLSWG9+shmCjt2yFaFQb +uTlWKoX+9Bae81bQ7z5hoP9WNqj3Bg9CnsPmik1XFqHZnl7ZYN0boF2l9ns5 +MVFp8P3SYdU34LXR567oFhP5Z2TFayS8huTEAiffJTqoON5wp6FCAN8Ta2Yf +ntFBYd+C1FOSBJCnu9EwXaKDmOvZXjr6AtAgyjuDCB00Rwlt8NMTQAqud3KL +XAeFyCKFZZgADl/+8l42o4NutPaVwiIBOFsWV4XTMPT1/NG642oCmP5ZHXlg +GLr/dE+Z/gwOHvsHQo3WYuitfrb3hxEcHjk7G8rXYahrp+mVbcM4bLKs7eyz +xVCyzUTZzbc4WH7OXHvOAUOjigoy7jUOc0e3kBTAUHWP8jWsD4dbZ0qzRG4Y +eqMaeCmmAwfTwxhqZWEolDvxdKQdhz/dk6eL2Bh6VKbZ6NGGQ5ouZw/HC0NL +Uupb1j/Awf+y1vIu/4U+be78/D0cepKP9VbsxVCVb0lO3N84uO4Xpafvw5DX +ZjOPj4042Fq2fNwSjKHAJR7TA3dwqFC3uWwUiqGcMI8BVh0Oxp8vsuQHMaQe +/Dz2cS0Ouc/p1P4wDPnyYjv+XYODRm3sndoIDA2OTXQ3VePwP4u9vJA= + "]]}, + "Charting`Private`Tag$1014534#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0H881HccwPHrjvMjzt3ntEIpla4epSwrj9Ld+71LsQnxGDkhUyrS1ERu +kj3WnZXQ8mN2Fa1W2IikENNXyNevkVMu2lC664f86Oio0LY/Xo/n/y+bkEjv +UCaDwXD/r/9NtxiqF6/WUCKDvGVkPh+ZqexR7SINFbuaWbbxEz4eYi6y+o2v +oaLZ69NCuXzcNuh9mPVOTQUJN9jV6vGRXV2xoL5OTeX0oPLnIYKxwbKYLRI1 +ZTwVPFNIEQzKs1ruKntG9QvcliWGElyx7svT7j1PqThWl6S8nIfrLty4Ghjf +S3kcvJ5W48/FYwHlpkk1KgqknP57+zkobrcxSLbtoGYpCboYmWC8tF8/RldH +ubGAmzjfCLX1K6pz/P+g9leZejcVsFGSyElae7EYVOAheeqhhwc8EzsyFzeA +fDA5XCRionA0MG/LzQ7w3Rtut1rOQNM7GbvTNY/Ado50xebSaZBOP9t6NKcP +ssaikuHVe/js3r5WseUA1C/57nFzzCR4clYeGSvUQHOFgW/ZHB1s4MatiWS+ +goGNbrm5FuNAmyvCMi4OgbQB8LSdFmYv+uHg88xRuBGY8cI/YRQsycyacKEW +Rlvquy7ZD0Oc/pOSu4bjUDH8e9jLo4Ow2Sep+vitt3DlbZnw7NqXEJR77iQ3 +cQLmVrI5lz9qoDvJa2SVxztYunmgKpSvhqqWtr6iifdgdOmQWhI7ACOmpWf0 +701BbPuQ/U8vn0BSYWDT3agZsF48kKO40A/iyB2eeqYMdNKJrPYM98KLk6UW +RMvAAtv586ZK/4ba+9p8JT0L37GNVD6qHtiiUGfFFzPx8Zq7yWrDbogtKHgw +lMbCiJ5Gg54oFfQNftXF3aeHqTvjVAtsumCksMTR2l0ftzoZYK/qAThceBPY +u4SNLqLPVWn1nSB4qKfcrWOj08IMvcsdSqhPbbna2WOAI+ekwXx1B2TERIt0 +xYa4ZFeFv2BhB3D6lOtZWUY4pqGNO4PuQ1U0f7z2G2NsqA3nP49rh3m+go8u +4tlIy5ot3+xqA+vy4bBygQmazd3Qnuz2F/htVSi6p00wpInrJ9zTCk6+E8s1 +alPsq04zPXuiBdqKl7MrmjjYXTR95sc7zZDpKMzflGOGipRZ6SkWzcD6lfnQ +R8zF86leXK60CXyc/Co017h4wsxH9qe2ERLissT+c3mYTleKLI81wnTc9ana +Uzx0tS7zlRs2QibfyUI+zsPKkWyvO3k0GOvyWr7W8XBX5Pqapbk0fP/I/Lho +kocLTWqHTl+hISJ7+OnEBx4K+91lAZdocBZcLgxnEXxcmZDJPk+DdqMRbicE +HaZ4H+JTadgeotprZU/wVn/K4YloGhqcnS0mPyW4M73BPPoIDZsEJS0PHAgm +JlpGjH1Lg+B1kn2qI8GpZ3XrtJE0zESL3jOAoLj1zcrJMBqunbqaonEn2Dr4 +3N82iIbFEQTrPAkeDbw9ryiAhl88ErQXvQiuMo+RO+6kQcaX7JD4EBy/HR6+ +zY+GgGwTm9YAgg1m/pLj3jQoE6Sd+UEEzYQ5chMvGlxDNHJ5MMGZZc5B5z1p +cBDUvBLtIVjlF8Wv2kZDvpFdttVegkVmASNubjRYv1Z4Tu4juMk1NOafL2jI +aGMzH4YR5K+C/EjX/36WRN0sOUDQW6mQMV1o+Bf1pjsH + "]]}, + "Charting`Private`Tag$1014534#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVxX041AccAHCdzsuF7n7MJeWhtY6ltIg6L99vpBc5Sl1iRJcyFWqVQlx5 +kLe0DTXWvaTiFrouKvN2HCUP81rIymt3bV6iS+dlYuuPz/Mx44R7HSWpqamx +/vflDKOxOuf1CumGb112B6vRkZSuMaE0VUivcWMrulSGeIpkanxbXyHNtiIY +7mOG6D7idVp9Ri6t6MofwB5D1KgsXVlXK5eusDlf5VNiiBcC4yNcfeTS9l1M +0Y4QQzyUb2y+M/6tdHVF0KhW51doscktldUzKN3S/3DoeZkBbrr58K5/TK9U +8Dw071M8gRf9nuimVHdJb75tDWcWUNG5xUwz7Zs2qUURh5xG08OYyH5yhKpW +6s9ZpXIYpKCyzqKS73tPartsODnMTgt9EvVSNgrE4LhFQSkXkPGEZ2Jb1qpn +IKPORrF81NFxwj/ftaQNPnzcdSro9CLUrco8kqHohjNLB91VlgsQ+fnt9vP8 +Ppjjyqbu0ObA5mlwk/PyIdDyCLg16TUDnnprz34sVMBtU74/JU8FW6jRVuGk +Yahc4LYF/DAJ9QbZIZmCMRidsEo9z1TCEtO40HdZE2DPNVpfs2cClhPzVscd +lXA1UGNw4uQYRJMHJDVak7DwYC+9lTUMLuyUythHn0C7ttkr58E7OJSXk0RN +nAJ25MDkvjVyeJWyd9zSYwai4ioOPx0ZhPLG5r77U7MwXD29qVN3AMZ1i6+R +n85BjNsizYzIXkgp9G+oOTMPG1eomB1hf4FzuLfnYl01DFzrNt1f1Q1/JxUb +EUo1LFlRlnrVtBNkrUpRe/0ifOZQ3LZ6vANcs+U3YsQkvK/cf5H9ZxtcKCh4 +MfaLOnodrLC69boF+kb2d1KDF+NuzhWKVlkTjBdK7ExYZBTbmt8TFTaA9c0P +/r1fa+CBF2/K/UzqgfFycfsRlQb+sdkvwO51HdSlN97t6NFEL/pQUKZIBpkR +55xUYi0MsfjRPrK1GvT62m3Vb2jjurERgxhKFZSf05+UhVFQ//tL08na5bDs +AGNhh/MSnI8YNvbllILJk/chTxg6GCUP16tvegQHt2dnv/qsg+JUJbMitxjs +D0yZK+S6SI9YTXFJkkCz2FyjtEEPr3vUXI8LEEOWnaPIgb8UL3cu0+nfUQjq +QtJLtjMVXYbc94W6/g5s+4OliiIqMu83JXhV5wE3+oazL52G5ZKZo5zEO/A5 ++sGcLJmGx26dTX/vmwtZ+vZGCZM07FpocHicLASKKr/xsIqG3K09ZuQ4IVzq +Noh1mqbhHYU0xztKCCd57wen/qXhZc+grZonhLCNkVt4XJ3A0CsF1j+7C0HJ +1MY9BIFATbL3oAphD6frmPEGAm1apj7JbATwbNs2o+nvCJRbRgTCGgE4MCSN +L6wJNKEbpMroAmCMpmxItyPQlWxm8GaWD/PnnGbVgMAyPSWPU8OHouS7VxUs +Ai19n3cXevJh1UkCaz0JbF1zryVjKx9+9eAqBXsJ/Md2JfuyNR/i9X28fdgE +ulUkLITT+eDH0zFr8iOwtIcd81sfD9q5kR2iQwRuZhVlPG7jwU6OIiEhkMCW +j96m3bU8sGZUDzsFEVifkvvTehEPRNrreMbHCGxodQk7ksMDk9Fsz+lgApdM +Mh/z03iQ2axBehlCYPLytKP9sTygSM6USE4Q2NvkEGl+mgf/ASPxQig= + "]]}, + "Charting`Private`Tag$1014534#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0vs3lAkYwPExk0limFdbyebSbVRbaZHVxfOcCdspQhlROKJYyVqrsWTR +5j4u7whZcinlUibTbMQmvWHiWFKGSnaXkOGMhEkuhbb94Xu+/8DHyDvoyGk6 +jUaz/9L/z9Adk3K3yyk8yE64v0UN6WnMCaWhnIon1WcrDNXwJ7qh3nUdOVWr +kGeVrlRDu9EjwYy5IWou2NWpmK6GzLqatdLGIWpWpfKyrGcphnnFhtq4DVG2 +4449yuSl6FmqZ3wg9g3V6RTpbTXJxM3mB5PtewaoS7v4N280q6J53h/FHpG9 +lMENrSeb+Az81b1aU/DoJUUdGvcNiFFB7lOjpSkbO6jevecDE7I/Q2T4a9XQ +6Uaq4b0FTWE1D0rp5rqC47eo1yEdD2KC58AtniX4tlAMvNynJiY10xDgEN+R +ta4JtpuzROg8BfsmPEptKjuAdOxILjyqBM2HmT4Z8m64U5EnLfGagPCFN7a/ +FPRBW3vXWknkGJg99mvjrhmEqGIrtt8VBTiwtp57L5LDeTNxXkvrMFhqR+wI +oivg0gl9ihU8BM0rcvwzC8dA48SkYGDTICw3vBg4nDUBW4zZf7pv6Ic1xOKO +M/uUIG629MlS9EKEar+kXm0KHtyTrpwt+hv28wR1UVUf4ESup6xnsBs8S3IT +teNnYC/HUlD03Qt4JXAa/+bwHETTds1t7e+E2tb2voqZj2DfRNdjjnbAuOZd +UvXxPHxqSpH505+BQOTRUh+yCFxJXEmhrA24QccclmjSUPQVOSD73AIjiXd1 +CSUNN4yYRyZBMzQ8U5bJmlVwNjn5jHhSCjY5Q9mRYjrWM8Y0LSsbIKy8vGvs +EgNFi+qnxx88gr5R5xfafkvwiamPUd72hzAukljo26siGYOJJXP3wTRv0qN3 +PRMbNiXFmx2sAc7zJTKfaSbyV5c/lCqqQJrWWtz5xU3BaFxCRu5dyAzlW02L +1fCcvIybeksCrD7ZLkb2MkwUBk5+LRRDLV9nquFHdZz3T601+0EEq104n7/n +Lsf6NvbclYKboF/9zr+ao4GrqodDYodLwNU2J+fVggbW3Qrr9Lt2A/a4zBjL +hzRR5beohpKAImgXGzNrWlj4j11nlVnEVciy2Fe2t0AL7ToupJXfywfGVfpz +HlcbbUxH7ExSc4G3x7VGflsbu4wvXvcdzoboiGzu8VVsHO3vT7kszIKFiDvz +DUlsrC83LFg8kAFZOnt046bYqNxWecHMKx3Up0tbT06z0cVnrMjANR0udK+I +sppl45V13gksx3Q4m/9uYOYTG/kKmnAG0sGaUyQ6wyCwpvFo0LRBOih3L0NH +gsDDKR8Gil8LwdH7pa+eCYEuAda3qVNCaLK21p3dSWBT2MlGAw/hFzeS1i5T +ArM/Op+O4QmB81ZgkmZBIH8bx5ZnK4RFvtVHGhBYMRFuv95YCLeTilPl9gT6 +v/xLvb2bhHVnCWx0IHDhhePmxRYSfj8crSx0InCg9uet5rUkxOq4HXPjEXhI +dP9JdT4J7vkaRm3uBE7eUdmp5UOCLDq8s8yTwKNjdJ1QZxIOeMvj4rwIXJXJ +oQZtSDDlPFJYnSKwfmq3f6cxCWXLtuXr+RJYtf9fL94aEvTf5jjM+hE4slF9 +Ze9yEjLbmfTn/gRasArjAhfSQF0SUikJIPDam/Mixnga/AdqaUzO + "]]}, + "Charting`Private`Tag$1014534#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$1046758#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.015104321194814143`, + 5.7503940353149545`}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.015104321194814143`, 5.7503940353149545`}}}}, DisplayFunction -> + Identity, AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[100]}, {0, 6.25}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.025081514923501382`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lG1IU1EYx68vZFYY6abD1805Za4P5czuvbuLZ0lGKBr5ITHz3TSjZqFh +NhMtM5NKSzGXCGUQQqIfEpflC4WkaZrlGxY5TAhRSUWGb2U797QzMHrgfPjd +c85znvN//vdIkrUn0uwoirIxj0jzsDWPk26tQ9QFNdTWmGPVCyzcYJrJ7c8S +w3Lz8XP6ADUoUVyXwLiHLilohIN+FBG+0J7vRaenckChSJRCdfnuvJAvKijl +jrWdeSKFiKGKuN8pKjxvlEInWi9g4cXBlTept/0gf53NGshlQLdkPmjCD6aT +Ho8G/6ThIcqz05/wL1OOsbYigPCDkuLYz5wc59Ez8CNTYapuD4RdUU2VabdY +wnydOo7wJopODqZizBc1+oNb1bBjxifu7/kyvH+cA/e6eHlfuZUNUDT1LlcG +Y85LmkGTlfl5kfofLrTvvre/2sr7AhtcPtr7E47ocVA/GgkkHIV0ClUQFqG6 +khWwPUyWY7vGERahuhaszOs/bWVen0EOglG/XBRYn0wOet4ebjxbJ4fE01/D +7MZV0IrqFSnwdycV2W/Rz8LhqM4DDOH3aP0hGtbmZ7uYUDnhDO1Cce+wP+Ge +NsOdbc0yrO8lGlbR+no/7KPvNMQ4upYom6SA2kBFMthvXb5QgPxgYADZsabU +Fzb4vrMgHZ2Kpjx9IU6sWUzZYOHq5MqEclaC/VWvgnatbr6mSgLZLcL1vgEV +GI8kaPQXJfh+8Ry4XLmf/WFajP3wmoPljsWW9BAfwrkoX5kn4aPPu59RKyKo +Qj704KBY7CDrrxTier1VhHk/V7KEC1DfxxiYu3m+LMjDFdevYcAQzcZsBojA +g/cVDV1lHUXB9e54/w0aJlG9e7zx+kIaBKjepz5Yz2s01s1OjP2b8H+26L+V +A5b8ZvS9PoT5e855E85D9w8XEr4bUxZlkyUgzPtJKcD74qzM+01rZUu/cT4B +oN9KX0JDo/Nep/RvAjiF+jdH4/6+dIMdyN+xDO7XkBD71Z0l+Xi/i1WE+f/v +MkfY8l7xer8Swdb37A+nHRS7 + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1E8og3EYB/AZGRdJxhg1bIfNCjORsN+2In+KOHDwvxYHiwOHyVIkhVD+ +ZmJKcZGDi1IcWOTvYbOyy2o5yFGSUtg7fZ9f3q3ew6fenuf5vr/nt5zewWZb +rEQiiQk/teFHGn6WPuK71vVWZiwWfnIGT6lkmtvlNFaw6P4sSuIu9XvsRreF +7GjbL7lzWdh822xjTHI6OVLOqyA3BZRjPSlacupc3Wvcu5bqZW11am8KddQP +xjxiK1Z8if0hHfsRfjIra7iSVboedeyr3e75nrGQtyv0vo1O7pZh9dpPIXdk +niMz+blnx29cMFN9GP3rhfcOuNlE6HJdyeeP5FGJ8ql4fljtD7VIBvL+5m9l +Ucb7MOqdObPL+toZ9UsX5rzmHv8qH7p/iTbyTO+1Xhsu2P+8Ndya58mtu0zu +hGrNiDRgIkfmCVaRH1PezA+rVVQfRv/d4GnSppd7QTiAQxPZKcx3bKJ8MPLD +2CcY+4Z62Ef0gzGP2Nh35BkNfgaK6+WUF+4+9+bbMhgZ3wvG94TxvVEfRn+c +F4zzhHHeyAcjP+wQ+p3k0j6Jjfdh1MO+oh/2Gca+i408uC/Ii/sEP4WPzdDB +jfsI477C4v+fX9QS7ug= + "]]}, + Thickness[0.025081514923501382`]]}, { + ImageSize -> {59.79691158156912, 24.508064757160646`}, + ImageSize -> {39.86460772104608, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {40., 17.}, PlotRange -> {{0., 39.87}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.0211954217888936], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ieJC6+ZxNs73HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHp1na36bbIvhgeXkEf4Ne3mJGGXsH5wnNQmlZCP5/ELBXcJCYF6d5 +msHeofr+j1vGryUcSraK/j49z9ahVYFd9cwUUYfrQp8cz5fZwPk9Xq9YTBZa +w/lcbqqlTFGWUL44nL/y28uKMweU4Hx9rZXCF5ZoOiTE3nFjnmHt8Odb6YM5 +G7Ucltzfxzen2AbO97k4MebfZls4/wwY2DkE3JKuSZyk4cABMo/L3uHUYae1 +mf9UIP7gt3fwOcFuO3srgv/z7esDlotVHPbXylqkmyD4sPBD58P0w/hgWl8V +Vf6qFpzvD3KnszacLzH1CmdGkjYkPB0Q/BMgd+oh+FMn8FeZads76CvKf8kJ +03ZQf8u7z0DS3mG7Q9Oj4xLakPBotnNoYDnab2iu6bDF/MehlF+2kHDo0XJQ +fdI876yWLdw8cHz52cD5+Wu6b2coWMH54HCys3B4AUonc9XhfFj8wPgHuvc1 +mSyWhsS3mpWDiTEIiMDNh/HB7nO2g/Nh/hcBpU8WaQf09AsABWw6Sg== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx1/TkiiLcubw1zbnFJ1ENdESpe97ERFFhv4zIkqtqVmmVqLl +JCpMclRairrMKIuwsgwSf4Q/UCTDWYlLyCCHFWEZpYVYYbV7r90LRQfH+364 +u+ee+z7fO01qdqLJXRAEN2ff5uzznH2sc0mt4T1BbY2zfQuEixtmJgpsOWrc +sbzMEB4RGGg7pYFKnNpju0xgo21rMLynxadpJgKBtmQtjv+IzXmiJjgTt7k9 +7ZoWL/zNKWveimzcoWXz40U8iJnt2Vsagi9N2/dbPwHmaefPaAjC3pyqG7wF +VJctPRa9KJTz3Eyeo7Y8jPPFkuIdw3HhWJxwr8IkiHiXqZ+p6ohA22jpnClf +ZnqsmlzCWTrHRYJxo2/LkCMUXUWBa9NryZ/9dWz9FQK/ul3hA2Uyt+Lk+KMC +Ha7ERdqtd2WWxrv+5RMefedXV8m8KqLB+5lHKOet/Z7xl55HcE4YKt/5c4Oe +s7LSvjAjVY+Ykb6sqCaZ1zu3qb4ts6TnDZl1VB8rQRQ9p7ceXlSfDIL+XtK4 +ry4cr1OujkSpCFpovko9fOm6dpGvd+nnYiqT8AScpfmJwPePH7rXbQjnnJH9 +ufixPZRzf3vr2QVNOqbvAeAbnV8fwnxzHTAuXFFiuKdlfhsF81t3MPPDUpHV +7Uww7q88WO9mFqEdGU8SAoKR0jusN90XUTg2O2r4oGH+mk/QkW3+WFOpwaRX +56oaPwLHxt2iNVfD8kkl8D564cjgGzWLW07wtXOqOT1axbmAxrMEcN50p++m +MKtkfgZBsdpTZ6vwYfn2iJwl/YtkPtzs82MgSMTk6SzLGv8VLH870JoUa/wV +pgSVvboQ6LZ0noyq92Pr84Axmu+yIDb/CKCg+V5XsfwPgfnWXc2+e/7PLv3/ +5rDpkAnrYxVnqQ6TQZyP0fNv8eF8zmhJcMtRcJb8ZFAwfVJklu5jpsyuerN4 +Ctym70c+0Lg8ckn6KwWSaf0awOK0+TJ/O8DqNeTD7jNEHk/ye6/M0v07SDi7 +3itJ74dK/P2e/QbkmhNT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMYzrs5GGitFL7QourwJHHhNZPlbg4+ +J9htZ1/Vcphvo3NlVp0zBl8fpF5Fy4Fl8SQrxrkI/p+Y3KP/uFzg/E8bArJn +8bs4zFmkvPPPc004PzUNCNgQfGMQuCwB5/dFdPszCojDzWtVYFc9M0UMbh+M +D3MPOt8EbKAohF7s7FB1/8ctY29RiHlaLnB+7W+rgnMRCL7ehAU/DPsQ/AO1 +shbpIq5wvptqKdMsB1e4+TA+zP5fIPOFEHyYeTA+WF+3i8OOYKuI/+ricP5a +IR2+9HsScH44p1i7cbySQ+Lhy9qpgq5wfh3IvQsQfAYQ2ODqsDe/5u3MqYpw +vvonlZezNOUdZoLARUx+DSigb6nC1aPzwepuKsPt+w8C/Mpw98D4MPei86Xn +xWmeNtCE88Hm/9KEhwcsffR4vWIxuYjgg+2f4ArnV0SsMD2b7YYqP8PNwcxm +b9C0hxoOIp8cz6etRaRf9PQMABZuGmU= + "]]}, + Thickness[0.0211954217888936]]}, { + ImageSize -> {70.77471481942715, 24.508064757160646`}, + ImageSize -> {47.183143212951435`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {48., 17.}, PlotRange -> {{0., 47.18}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.020288090890647186`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx2dKIaVh23T4a+6XY05EnWiJ4fO+LyGRaGR/DIlSa2qGaVRg +ZlSKiY5SS9Et0cogJEWDxB/hGomkOCvThAxyqVHmjDTzR2a1e8/dC0YHx/t+ +uLvnnvs+3ztJWs4hnTOPx3Oy9wR732LvVpN7nSaLgTqDva36gYOblmbyLLkB +0Kx/l8mLY0CDWpEExNT8cYsfAxbU4qXAX6Bepn+kgYdaigwur0XnvrhDQ2nM +/u70ezJ461OQGq7bGLfK8PweCh5HrTw7USaH720HTxlzKChYsP+My0E5XVQ/ +FERBbcXO/MjtgYTXl85b6yqVhG+VFCePxKhgR2Jrle4KBZ+y1Es1PUHQNV62 +rlvmGB3LME8TZs/BZ2BS69UxbA2Ep5f8dmf4Mhv7K/B6MQPe9UdVgxUcd0Lh +5PM8BTTEBI8aQzhmx2P/5asufeVhNRyHBjXxX7kEEo7v37b39psgwonDlUd+ +M2rCoupR18w0NUSN9WVHhHIca9+mVs0xq6eCYwXSx5uBCPacanBD+nymob+X +bjlZr4Kp1LtjEQ00dKB8RWrwQuuiabLeoZ+DkUy8BI7Z+a8Bfs7NmvcwKsKZ +Od+KB0YDCfd3d17f2qbA+toAVtH8Rjn2jZwCratniaZVBhPIb8kU9ptZiv1Q +TuG6lUrhUcjpRqdfFMjGJpN4vlJI7R1R68JouDixMq6ZlWB/FdPQk1MwZ6iW +gM3NFGow0mDdd4wynpHgfCZp4F+4eW5oOgDH9WBg0TTfnhEpJpyH4ul9Ccc1 +9z3grYiwn800FAdsU1iqhDhfmmNW/3WK8Nl24dpgPQW2a9n6cB9PnP9hCjqT +orV/lCJAsteuAZj1psKIRm+8/gfABMrXwx/PXwQQoHzvi3H+C4B96xyAv1P/ +Z4f+m1m5IJ8xDogJs3Ww+RPOR+c/ICR8Q6tPdMoVEGb9pBFgfT5wzN7HLxw7 +6o3jCeAhej+WAVp2BbtnvBdACqqfaqO+XV7Y3ykUrtewEN9nM0XisX5naMLs +/fvKseO9YvV+IoLN79lfuGMTfg== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1D1IQlEUB/BnSSIFWWQGFfQ5aCGVDSEVj/KDPkDJIYfoC0QhzYYgimqr +QaMiDKKiBIeWoBoiwikikBRBNAcbBGlqjIjKil5P/vfiS3jDDx7nnP9951o/ +7R6xFTIMI+KeAe4p4J6QUrsTThvZTs3fT87Ca3WS5oivkp26jbfYbqid0g+/ +3UJ96n10MCYju2n1mkQyBTFfLl5FbE5VL0+VK4krNgafxa9KUq/maFwZblOR +fjDmEbpqNyF1ZFS5uYNGdjgk6Tl4ULHqbf97ey91zD0hiZZRr5+M3nc8GYj5 +eezUfN0+A6kPo/9qVjsXnaSev5Rnw1FqPk/ckJ+PM/LDTcmMhXE25uYv1v8z +3odR7+XcPLNfqif9+LlXqC/UswHR4X8jz3XK821b0Ofn/dQRWxVXMSZK3ZW8 +c3X6qfl5GqmPu1sT+z/9pD6M/uLAjlZUqyP+GnPd/Xio+Txbuvx8nJEfxj7B +2DfUwz6iH4x5hMa+I89S+j2lGZKTvLDvrWhiL0KN84JxnjDOG/Vh9Mf3gvE9 +YXxv5IORH1786xdsIPskNN6HUQ/7in7YZxj7LjTy4L4gL+4TXGI689lkRmLc +Rxj3FRb+//wC/tjGNg== + "]]}, + Thickness[0.020288090890647186`]]}, { + ImageSize -> {73.94074221668743, 24.508064757160646`}, + ImageSize -> {49.29382814445828, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {50., 17.}, + PlotRange -> {{0., 49.290000000000006`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.01766472354707649], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOJrk43HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHZS889P4HIvhgeScEv8frFYuJo4uD84RmobQsBP8/CNgrODg0PTo+ +w9jFofr+j1vGryUc3vDuM5jZ5OzQqsCuemaKqMN8G50rs945wfkVEStMzzYj ++ObXjuaaJDhC+eJw/spvLyvOHFCC8/W1VgpfWKLp8Dhx4TWTeieHP99KH8zZ +qOXAsniSFeNbBP+mdE2iUa8znA/2h6SLQ8AtoMQkDQcLkHkWLg6nDjutzfyn +4mBiDATWLg4+J9htZ29F8H++fX3AcrGKg8gnx/Npvgg+LPzQ+TD9MP4TkDv1 +VVHlr2rB+f4XJ8b8c9aG8yWmXuHMSNKGhGcwgg+mvRD8ut9WBec8XBz0FeW/ +5IRpO5zQtJp02t7FYTtIo4S2AysoPL46OzSwHO03NNd04PFfPyV1g7PDGRDo +0XJwVy1lmuXhDDcPHF+3nOD8bM6fC9IPO8L54iD6koPDiyztb9PnqsP5sPiB +8Q9072syWSwNie9jjpBwNBaBmw/jg9131RnOh/lfBJQ+WaQd0NMvAH2MNnI= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lGtIVEEUx68piZRGuuric9+mK6LupmYKx2TuJZKs/CJi+cj1iS8wMLMi +xUSXTEtRNxHLIgxFg8RHKEuypLhmogkZ6CJCiAopIZpYOXfcuWA0MNz7Y+ac +Oed/zow0vfCazpZhGJuDeflgHjuYllGnNs0bDtpaD8auN1i5a3u11FwkgW79 +t2ymmgMNHpVSkMRs3jRf58CMR5wMnLdipjOVHDB4pMrh3l5k0ScLCzVRF4cz +X8jhq2d5Wugrlqxb5GT/PoJ34TsfMmoVsNV3Jc/Qi6Ac/ywoQLVS2T6Vi6Cl +/lRZ2AkV5f3tW5a2Bj/KT6urkmaj/OFkfG+jzojge656u3kkAIYWavd14Sxl +nFZrCEdZi/NI4GA50X1gxqIC413viKxk7vB8JbFP4cCj/Yb/ZL3Ag1Cx/LFU +CR1RgXOGAoH59fv/8gM70+OQZoGDA7pcPtupKMeN20c/+xJAOX6mIfl3rJqy +uGnOITtdDRHzpnxtkcD4mJY8gXk9dQIrsT5JHMnTRQ2OWJ8zHIyPXejJafeH +lbTn89olFgawI7Ga2JWx1N6qn5WxTEwdosx/nRH82lgznov1p5xd+KNqYk5F +eXx48NHxPiXRNxDBLt7fqSB9k4Eg0cGtWtMrJ/1mQKTfjDLSD9OI1K1GBm+D +CjptoliQzy8nMF4ySBubVeuKWbiztLOgWZOS/jKxMFJYvtHaJIV1x9Hg1gUW +LCglxlAsJfHIOHC5/aRkakVC/F7l4OfoZn9WmC/lUuxP70WZ6za9ZnbEpJ8Z +Dqok9kpzoyuJt4KlzOsfLXBJv+ve5CKC9Yf5+lBPNxJ/I4LBhMjEP35iUr/z +CIz60QptpweIsP1ZBEs43tM+ZL8WgQjH+9KXxB+KyP2zlZC6yv/PVv2Pst+W +YtUw4UuZr8O6D+UynP8lV8p1ifp4myIRZf4cjYjoIxWYv48BAlvrTfyJyPsR +jqDHOdApa1EEqbh+OYf1HXIn/d2BSL1mXMl9Zljqj9erUmD+/gVxlK3vFa/3 +ezEcfc/+AtcKCWg= + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMY+r0dDLRWCl9oUXV4krjwmkm6t4PP +CXbb2Ve1HObZ6FyZZeeBwdcHqVfRcmBZPMmKMRbB/x2Te/TfKQT/04aA7Fnn +PRzmLFLe+ee5JpyfmgYEbAi+MQhcloDz+yK6/RkFxOHmtSqwq56ZIga3D8aH +uQedbwI2UBRibrKHQ9X9H7eMvUUh5r1C8Gt/WxWck/CE8/UmLPhh6Ifg76+V +tUi/guC7qJYyzWLwgpsP48Ps/wMy/5InnA8zD8YHa/P2dNgRbBXxX10czl8r +pMOXfk8Czg/nFGs3jldyiD98WTv1IoJfD3Jvghec/x8E8r0c9ubXvJ05VRHO +V/+k8nKWprzDjJlAMBGTXwMK6FuqcPXofJCymTeV4faBxfmV4e6B8WHuRedL +z4vTPG2gCeeDzf+lCQ8PWPro8XrFYjIRwQeb4+8F55dHrDA9q+2NKh/u7WBm +szdo2kMNB4FPjufTchHpFz09AwB1mziC + "]]}, + Thickness[0.01766472354707649]]}, { + ImageSize -> {84.91854545454547, 24.508064757160646`}, + ImageSize -> {56.61236363636364, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {57., 17.}, PlotRange -> {{0., 56.61}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.804412611293298*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"81e480e6-3998-4170-89e3-40a02ba638bd"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"LogLinearPlot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPsh", ",", "4"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HMPcsf", ",", "4"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEsh", ",", "4"}], "]"}], ",", + RowBox[{"Rcv", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "4"}], "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "100"}], "}"}], ",", + RowBox[{"PlotRange", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0.5", ",", "100"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "6.25"}], "}"}]}], "}"}]}], ",", + RowBox[{"PlotTheme", "\[Rule]", "\"\\""}], ",", + RowBox[{"FrameStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"FrameLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], + ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP SH}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{MP CSF}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE SH}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{WCE CSF}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Right", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + RowBox[{"LogLinearPlot", "[", + RowBox[{"1", ",", + RowBox[{"{", + RowBox[{"R", ",", "0.5", ",", "500"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Black", ",", "Dotted"}], "}"}]}]}], "]"}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804412661135008*^9, 3.804412669660758*^9}}, + CellLabel->"In[68]:=",ExpressionUUID->"7f72b5b7-1a1e-4f93-8ed0-2baae45deeaa"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"101388.60813123871`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"37343.7143825798`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"3403.8378607206614`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"105.2751843068742`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"105933.11201048711`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"23616.956046156876`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1212.1592432808607`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"16.329930521706398`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"3\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"35423.14043918787`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"4303.769527081284`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"94.91482486300364`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"4485.920905949116`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"227.6825887653793`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"182.32274615251941`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"37343.7143825798`\\\"}], \\\"+\\\", \ +RowBox[{\\\"6807.675721441323`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"315.8255529206226`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"23616.956046156876`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{RowBox[{\\\"\[LeftSkeleton]\\\", \\\"19\\\", \\\"\ +\[RightSkeleton]\\\"}], \\\" \\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"1\\\", \\\"\[RightSkeleton]\\\"}], RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\ +\\\", \\\"\[RightSkeleton]\\\"}], \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"48.98979156511919`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"4303.769527081284`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"189.8296497260073`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"227.6825887653793`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 68, 79, 22584784211283807214, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412671107435*^9}, + CellLabel-> + "During evaluation of \ +In[68]:=",ExpressionUUID->"ab9aa5f4-f1dd-4304-8454-0ebeef0198b4"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"101388.60813123871`\\\", \ +\\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"37343.7143825798`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", RowBox[{\\\"3403.8378607206614`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"105.2751843068742`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"-\\\", \ +RowBox[{\\\"98047.96792478973`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"21058.551596143403`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1056.0491772956425`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"13.98769672017702`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"+\\\", RowBox[{\\\"25764.941393080633`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"2896.2900741025637`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"60.50356349324911`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"1634.2180214457285`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"68.38965241709113`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"43.620120394027005`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"37343.7143825798`\\\"}], \\\"+\\\", \ +RowBox[{\\\"6807.675721441323`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"-\\\", RowBox[{\\\"315.8255529206226`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", \ +RowBox[{\\\"21058.551596143403`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\ +\"}], \\\"+\\\", RowBox[{\\\"41.96309016053106`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"2896.2900741025637`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"121.00712698649822`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"68.38965241709113`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 68, 80, 22584784211283807214, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412671325087*^9}, + CellLabel-> + "During evaluation of \ +In[68]:=",ExpressionUUID->"bbd0d22d-f5ad-4a34-b83a-aab8c6ca9e88"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"9210.01686681965`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \ +\\\"+\\\", RowBox[{\\\"1727.2520274057883`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"79.98268394554255`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"1.`\\\ +\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"4\\\"]}], \\\"+\\\", \ +RowBox[{\\\"18418.040111332986`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"-\\\", RowBox[{\\\"7462.853673042596`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \ +\\\" \\\", \\\"\[Lambda]\\\"}], \\\"+\\\", \ +RowBox[{\\\"531.2974676394866`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \ +\\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"8.962569839625267`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"], \\\" \\\", \\\"\[Lambda]\ +\\\"}], \\\"+\\\", RowBox[{\\\"7427.848258644156`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1092.897054242046`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \\\"+\\\", \ +RowBox[{\\\"28.043947257529613`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"2\\\"]}], \ +\\\"+\\\", RowBox[{\\\"711.4555324050501`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Lambda]\\\", \\\"3\\\"]}], \\\"-\\\", RowBox[{\\\"37.07768063454191`\\\", \ +\\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"3\\\"]}], \\\"+\\\", RowBox[{\\\"17.69449776069247`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"4\\\"]}]}], \\\",\\\", RowBox[{RowBox[{\ +\\\"-\\\", \\\"9210.01686681965`\\\"}], \\\"+\\\", \ +RowBox[{\\\"3454.5040548115767`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\ +\", RowBox[{\\\"239.94805183662766`\\\", \\\" \\\", SuperscriptBox[\\\"\ +\[Epsilon]\\\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"4.`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Epsilon]\\\", \\\"3\\\"]}], \\\"-\\\", \ +RowBox[{\\\"7462.853673042596`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"1062.5949352789733`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"26.887709518875802`\\\", \\\" \\\", SuperscriptBox[\\\"\[Epsilon]\ +\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\\\"}], \\\"-\\\", \ +RowBox[{\\\"1092.897054242046`\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\ +\", \\\"2\\\"]}], \\\"+\\\", RowBox[{\\\"56.087894515059226`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"2\\\"]}], \\\"-\\\", RowBox[{\\\"37.07768063454191`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"3\\\"]}]}]}], \\\"}\\\"}]\\)) is less \ +than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 68, 81, + 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8044126715357323`*^9}, + CellLabel-> + "During evaluation of \ +In[68]:=",ExpressionUUID->"524b18a5-94b5-403a-97dd-138b1a0a445c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 68, 82, 22584784211283807214, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804412671693412*^9}, + CellLabel-> + "During evaluation of \ +In[68]:=",ExpressionUUID->"b15161d2-3228-4553-b279-30d91894d24c"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0.9, 0.36, 0.054], AbsoluteThickness[1.6], Opacity[1.], + CapForm["Butt"], LineBox[CompressedData[" +1:eJwVk3k81Pkfx6dhZkTGzFeXtKJrUFtE2kx6f9Yi9fi5ipTrt6Xo2LBbo0RI +Rppa/SpH2hyRzOYcEZHGXTnGUY6UozBZt5mvcWTmu/3+eD2e/z4fj+fjpXfc +/+BJMolECv6+//Oe1niN5TaxkNZEN/vowUDkGOqURFcsnKKV7hC5MlAAWVc7 +XVMsVMQsHqg+yED/GT34u9L8kJAf8bb+mS0DUctLfqipHhKyPTdN5pgy0KVf +IwOtjw4JV9FYS6nqDOSVqa1vGzkobKq1o4eFaiCDnQdu2nV/EVpTpZNOh+ho +58OCDM8rvcK7cdupY3I1FOJRrM6r6BR210XdxlRVkWWzHu3WplbhKT16Q4+j +CroS1E8JlFULH+/2HDiXTkWSGoPyZLenwn+GO2mGeyjoaBSdtyMlDyp2KUd4 +9ymhsw5RrXHr6yCSWZv0JoeMLKY8M60LWyHfz6BsR+4SpP4q1vueuAvM93d/ +GygioSD5oM3F5D7IYfaNtDYSYFrr22i5ZgAMWY1+814KcKBvuSDNFoNhSrrE +6Nsi7GYEb/cnjwAr0m+xu/UbvF6eeDo2ZRzqWXZjFoIFUNONOPc1bgqMH2FP +oHAe1mCK7WcsJHDhzpytW/8cBFM+CypVcCjw/cu8gjkHv7jwykOLZsDndcsG +4xOz4PXkQTQjahZe6dyeiC2VwQee0+RW+3l4udfws/9GGZQ1iPpyZxdA7wPP +wTRjBibVn92m1C5CllfazXjWDJwpSQyvaFgE9cqg+s5NMzB4PPz34LZFuHfJ +NFNr4wx0Fdsdmu5bhLGNP+1O0Z2BqmPDK3sWFoEtqSwWaM1AfNEPyYVGcvCm +dnyWqs3AHs/obO+HcjBf+/Oy0SkcntP8k3TS5ZA/MngVJnEwLnCJ+fC3HIZr +JLdix3HYTNsQ4FAsBzXzX46jERwYgnITdpscyMUCcsoADgPK0lJMRQEqu9kD +Fztw4GV7vq08r4DJuesB8S9xODhdMOh2WQHznsz1lDIc1pipkPBwBVRsq3e/ +8AKHp8ICs80xCjigP+7j/ByHt220xzy+AnhLZO1r8nFQmReEHupRwElV3teK +dBxaLGgPxgYUwFgfRP4pDYf7ER5F3BEFmFuZpeWl4qC/jDZWPKuAotZ9/qlJ +ONiu8zi6FiNAL0bdPDrhu/8JwYWi1QTwtwg4SvE4dPGp/7NfR8B956umYbE4 +nNohqAvfSkDg7Q/ml+7gcN2aajpkQ8CpzNYTATdxsOe5O4TaEfBKiAonb+Cw +sjn/zCpnApxqrbj+0Tj0alKj8t0IEERndU5G4fDkiPuj/ccIePreMiuAi4Nf +Uv7LL74E+FV2EdPXcDD7QukK9iPg7gV2+/kIHBSb3aXLOQSonRY4zoXgUHc2 +n54bTIDdC/09XhwcYvIphvsiCLjz1Tro9TkcDs+4WfdHE5Dbc4tq6oODOJQS +gsUTsGI2S22VKw7Uu27/BOYTEHCyPV55Nw6ijjxlRjEB8sHBLdHGOMRrU3T/ +LieAW3OIomH4vXdG3uGP9QQUWXDCNmvjYF2iXANDBHQsjvuGyKVg6e/qoKxO +Qv1LmmuqqqTA7wuPus/4/ruLX7o/lkpBw/Fp+dblJMTtH8qZK5DCJyP5Fhdt +Eiq9/sc1i3QpXJSkqTwxIKHBwDcvpNekkM2ZqNxnQ0IjqQZCho0UVoRwTW+G +kdBKXLeQ1CSB4ehnWpiEhMr2kTRdh6ahqkXCb3u9BNEe+4yLXKfAOnEo4Uoe +Ge03svhvau44XMrKej9+VwkFjGaqNdNHoW/UuYPhq4xmXfnzSr3DMJkt2KVj +R0F68SpWD8vFYPJw2rN3AxU938Ve8lI2CKx25TZvGRXxZNUj3icHoCamIeNd +Nw3t7M3jhPV+hthAzl5ZngpaI/cIQgn9QO9rM1NKWIrIoXXO04JeKONo4lV+ +qsh7/4P24YefYPVhFrHPUg1pbq+IG63tBp3iidPFrGWo7ZaN6tBCFxyxSUz8 +IF+GDD5FjJpf7gT24Vl98ZA6yjF5w1+r3AGiPH1qyVs6ym1OGY8tew9xuyz4 +e5I10PoH1zW38d+BUiq53cWSge5G7hyY/asNXNhHSsQ5DLT9TngqlLVCWHCC +pdsqJjpw6OeviXgLyIPzF6tuMFEyq+KqeEcLxGmytbg4E6W8Udvwo14zqMoy +G47JmIi++l2LSLsZwruWh+6dYyJBrPW3P1Y2w29JE19mvzHRFbukyiq1ZrBi +pWWfUcJQ+TpVPEwmAon5UuSIYUhknjbt3ygCx+OdPtpGGGLe3Bqkc1kEdVZW +WnPGGGp3vfOnOkcEe1iChvcmGCqtHltQ+IuANcYzitmFoeuNJp+GT4pAwdm7 +QAIMuUyIHnQ5iSDnRsafYjsMyXcarmYZimD9bxiqdsBQD1eTzd4kgvv2YZIU +Jww9Me7PcNIVQaTmUdejLhg60Nxuz10pAo+kZXqNHhjiTEy10JRE0BYW9I7v +hSHdmNMrtimawPa4mMv9FUOPyo4lHp5vAhNWxcjeExg6aJ/pnjvZBPylPyZp ++2DIcWIgoWekCXTGEh3mfDEUUh+moSFuglgRldx+GkP8whOVlp+bQFVwvlBw +FkPOtsnZlz41wb9lGsvo + "]]}, + Annotation[#, "Charting`Private`Tag$1048344#1"]& ], + TagBox[ + {RGBColor[0.365248, 0.427802, 0.758297], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVlHk41fkex+3nZ835CeE6obrHMqJUJsrnM6cacm1jFLJkWgal5SaKarqP +ODenMIVElpAtjGy/c0p8j71SsrZ4Rmo4pxnGOsZS0e3+8X5ez+t5Xn+/jQ+c +8DwsJyMjE/Zl/2ey3ngLb72UCHS98yKcaJRLVJqaMZIScmn/+k4ejSfljAzy +tb646mXKbDuNLmOe/5ZflJD743vzJRtoVKoXGbY0S0gJp9s72oDGs0Gxkbt8 +JaTboHpEc5KNgUUGpk6xI+ROosL7sTQ2mm12vuI68BsZbC3PWjeliZszqwoC +Lrwhu2/L+jO4As/7C9UF4pdEnOHa3a6mjrznxqyr67rJc33zJjk9VbwQ9VYx +cq6Z6BvXPLW3VkZ/Y/7TOXEzsTqd0H/eTBntH1skn7nSTMKP8a+JTZRxcdUZ +oyijZsKtceZ4aCtjhEjd/rxzE/lrZv/RpA8UHpu3OxmTLSaGayNfJrRS6JLz +dot8qJgklfcJFhsotHDkL12yEZOOaN+hYBGFPZb52qrXCLHNCgl2KaXwSViX +M1tST3y21fVtukbhg1HzWsOEB+TxRuH6mAAKz9pF8labPCC39EtP6npTuEXQ ++NxIeJ+c/sORV+FBYZWZz+iadyLCSbD8WbqDwrshcavNNwtJ8X8zReHmFIaI +usosnjBk9VS7r+FaCv9J/cPOcj9Dyg1UYx4bUphXVOVlHV9LNFXTD5qxKQya +X3q3gVNLHpq06g+qUMhx3H3CprqGDOR2eCUrUPjrjZRPm5xqyA2/bE2XZRZm +SIfitwxWE266lStrgYU+Wyx0vz5VTQ60Lw6zp1mow4+8s5VVTc5VWNFe71l4 +fZ062bahioTEuvWP9LJQcMhulhd3j8xqr2izLWfhTItZffa+u0TFt6A7N4iF +rcNqZ4WnSkhV0a3BPXtZeFNuamOXoJh0BPYWariwcDsyxbJ1hWRE61RIoi0L +L9fxUg4Z5BMf76SwNg0WOhwSvvASpZHCZxcydRqUMFMx2cadjgATJYsJUyMl +9OVrCDbmVIBlxsW/86YV8Kg7vzvVpA3smCoj3S453D4VULSrphti1S+5r6Jk +Ub0h5WCy9BX0drBqCzKWIWpp5Nsz2UMA+363WiX8CJtag5/y9Ieh785wbYjF +IrhrWJz+q0wKo42hAlbVHGzVPGd1Qm4UTN7qXVmdOwvtK9NDU3LGAWp4771v +z4CqUcyx96lTcOhrHx1maAr06WWrI9tnYP/uT4YaPRNwTvFdZSM1C92G4TuS +PozBjj2C+p9q/4ZGv+MN9rf+gMDCjMua/Hn4nv/k4Vu39/Ba8N3kV26L0P9a +233wKwnUdXQO/TL/AW47P3pm7zQMk+rVSYqtn2DpzUTK3ZPvQFAW8LgxfBmU +k/jWGR1DwDvh7a6gLoPPX2g39rMH4ffL1Xr0jAyuNXoy0RA6AE1dM8U97bIY +ej7n8LjVK9iVLkm7UCGH005z1fmKL+BsaWnf+HV5zHG56dXP6YOhMa8XmsEK +GJZKU2X8Hpgsq7TluCpi8tyBjaMLXWCTOR3wZo0SXs1dGTW59zlw+xV6Ds4p +YQlT7zhNPYOWxI6C3gEWHjSO2D3/6AmkREY4zFVQOBZQmfBM8gg0hnq2yKcp +o+zo5WH2inaoi9CabTqugt/Ue/JdY1th1V7uZ0eeKpbdE5uqcluAI5wIFXLV +UMnYz/abnibw+TY9/fWSGvo7djn41zSC/d55U6lEHY8nTPYrZIuhs8JUSfRY +A8NeqtRVeRJItd1evC17BQaybwUYiupB/rZc/x6eJhq83uoh4T6EPfY+Imm5 +Jub4NGrvfvUALp5L4+3TZWPn0VPTQRX3YencvU9N8WzUj/w+Jz9BBKla9npx +s2z8Qb1kZWmGEFTmijp+mGOjv8VTuvCGEP7zauVPDgts/JVEj+ZdF0JY1sRv +8x/ZuJXHWZMnEMJObl7ZEXkadx2R5DLRQpixU0YPmsbYK6hv6ycEjwMvfzSw +prHDz976Z0MhtO3cqbfw5YcPt0FLi54QtnErO/psaHz4Ikb3o7YQuH8KrBNt +aWwkKQthGkJYjnD4IAM0ciMLEw9/ZqA8viBB6kqjpV+6b8k7BkzCaGx2p7Fz +69WYxUEGbrpdnMn5jsZKc9PAfw0wEKvl6+2750sfZGU+28OAf5aa8VN/GqXx +Y599WxjouRjVWxxIo050ULFQzIDTAWlcXBCNqs7uSzr1DNhwxaMOh2gcj4gv +GahloFjZMsvgRxpTGbfPDlUMcP5Md18IpvGMyaXlO78wkNKpJNcfSmNxvW+h +WikDKpXhNZVHafTU4cxFFDHwPzI7JeU= + "]]}, + Annotation[#, "Charting`Private`Tag$1048344#2"]& ], + TagBox[ + {RGBColor[0.945109, 0.593901, 0.], AbsoluteThickness[1.6], Opacity[ + 1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwV0H0w1AkYwHHtIi+tdn/kbXvjrjYVOU7mEs/TUskt0iR0VuLKeSlXorTF +jTCIrhdGmvZlXN6yYY+iVFtsGTGKpShnhV29eNn2tBaL6/74zuf/r01E/L4j +JB0dHd9v/e81q3EJ00EhXlf3cGu4sQWSLukrVWsV4iBJrGX7Egv8nbSW/pep +Qkw9F/zVTWOOrM/7TpBn5OIPKtYNhtwc9R81rJI0y8WByqQIB7E5nglPT9oZ +Ihcb5tSd0ySYY1gZfYN3+ojYknfhQsLgCrRz8bno+3ZInL+qPlQoMUOXm3+X +sM8PiNsDqlza8gg8F1pPyXnyRlyWKyQ71FKR+dJmae66TrHznhHV8BoTPJ88 +qJekbhb7PPWeXj5phCqJ3SPewdviZPf70jmmAYZkmuQ48avhNuP0A+Pbehjr +n9lZYPsc1is8A7MiyOiuZJftrOsESkzFxXvJS5DyOD/ymqIXErEkrsdtEZLn +R3ad5slgkXyqzmCNFn58FtXOtB4GSXzdRsNDM+BvsunUv0IFTPhaOPTWqOEn +KmdLPOkTeA1UztJPTkGLWVF0Pn8cShhpV+w8VWC8Nu3YaIESBtknirKDlWBN +LGyJcVfBIU8zn9mz48DRey96ajAFdCetT+jBT+AZmPMo5e5XqKlN+Xm0cRTC +Sm9kUTOnwefi2IMYRzn05QRMbvabgQJ/e23b1BA0tnXIqqZngcFskmpWvIdJ +Su2fes+00F+wJX9l1gDkCNmtTxMW4LHuEdZHzjtgxgf561J0cJgnGqh60Qsf +smqtCJUOjhoOV9E3vYamV6ryrpZvX6iH15dppLCzSF54vpqErfacBGlPJ5yp +rOwev0rGZj8JvfvzS5B93v+aGqWLd1KirB+2tMOkUOS62lcPnbhj86MNreB8 +8wt74Dt9fJ3c/yXSrgUYPbpdkWp97GMuvNiokIDkUluJ9O1S1IjIqrOiJshP +SvRQVxugNrXkWkrvEzCRdW0lFxqij/DMrU7Lx9CYaDrVdNwImSOk+/HmjWB5 +gLG4m2mM7lZmsrljDbC6fiK6nrEMu+dobvZv7kLwrqKivvllOKJ/f6W1sBbc +DkxvUMgp2MPxNxFcFkFH9Qb9hlYTbN4YJk0+Xg0Fru7l23nLcY9feBk7UAhk +AaknkElFJ9vc3zgBFRDoFtyguENF757nss1tpZDKKWQetKDh/L5J2ebLt2Ce +U6Ntyqbhg7EgWk1kMRSYulllTNHQW14pLboiACN1WdthNQ0zO2Mp8mwB/NFr +luKhoSF7yb1+5zQBxHEnhqbnaAhTHi79JwXgxSgWxpAJXKks5QftF4BqmyHu +JQgMGkr4MG0hgL0Rb47SHQmMDHbsKPHkw3MvLyvNDwTO/IMsugsftjNEbd3O +BFqyKvIK1/OBMZbjeMmVwLvBE763DPmwkOgxqwME7na9Gmfyigd3skvyFL4E +ZtSxom3DeGAbR2CzP4GDTvmlpL08uO6XquIHELgozEv8uIMH6aYhQSGBBKrZ +hx6+WMeDUO4ym/ZQAr8v9rn+bpwLXanJ0vIwAvtUIxSljAveEYqMjHACV/FH +tUZdXHBmPPnk8SuBynm62/57XCg3tOfSjxJYYcdKTyvnwuqxIn9NFIFHit9v +q7/BhfwOfVJPNIGpNrJfVLlcMBIl1IliCQyTeI84p3LhPzz8Sck= + "]]}, + Annotation[#, "Charting`Private`Tag$1048344#3"]& ], + TagBox[ + {RGBColor[0.645957, 0.253192, 0.685109], AbsoluteThickness[1.6], + Opacity[1.], CapForm["Butt"], LineBox[CompressedData[" +1:eJwVx3k41AkYwHFmMqMcjd/U43ryKFtDh1HjqJT3bUJ2S6NjEosNleRqV6yb +rdiarZ/ZsJpy1ebYXA151JYGjZEdj0KELLJmakU0OaZC2/7xfT7Pd2VAxP5j +FA0NDfcv/W+G8biUa62U8C1Sy6tS6EghaZMqc6VEyrKSj0fT8RTF3PR3plIy +9ZqnXh9Gxz1v9n9P/aCQfKQcj6v1oiOt7u4K6SOFJCE27+3cJjrGHDkX7eKl +kAz39pi7KWnoV2xq6XZuREJvDVvxjEdDK7tvfnHvG5aI9vXan7DWQrucqkLf +xAHJ1vLHmjvGKJjgU6snqH8use8fTeRoayL3yUr6xdXtEjDXYnHvLUBi7JBW +9MwjSUxkwBV2zCdQSa3q8rxvSWYPtN9LeagGrzR9wab8Sji1wfWwp9EMhPDS +2rNWyaDKWm63pek9bJ/0LXa50w6eWZ+aKzregd7DzMAMZQ+cZWtv7u2bgNj5 +Edcf8wYhPNd7hFMxBrZNQa1ck3+gXDZqZzv0L/D0151+X6aEsKamB75fvYIt +jHh2BGUUuqI6Ejh9I9C8TBScmT8Olk2BJywKhkHH/EzYq6xJmK42vNZQOgQm +xAL75HYVvP9LrmQYDEC81ktxg/YUnG+R9acN9cFOvqAuqWYapsT18Q9se8Cv +6Op5RtosCHb7mO3O6YJewb6J9Xs/wJqHdPZefifcl7cNVsx+hPUVNc7Toe0w +oVedrtU0B5DUEHDJ4gkIynxbGiIXgPH1a81ueitwIzx5i/Q0kLUr/7rSrQVe +n682JlQa6IHc79TXZND4VFXS0ayJYRQ676CfFFxEiuzESgqWmVgWFtg0Qkxp +6bPxy1TM8DGdXrerHgbfHOxmBC3CzZ7Na7nedTBRJnYwc9dC+WlZRr/jn8DJ +eec7YEHDs5oJDrz8WmB1LeoInKHhxQfX1/7qUQNSUl7Y2UfHk527w4oY1ZAZ +HeU0U6mNMb+x6VxrMegPdthTsxdj+A6THp2qCrgfxZxqDF+COgUhTzwLSsHo +EOvzLq7Olz9z+9vREjCrfRtcy9LF1m32uX6uRXDYVSTqndfF8LBAwQ7GTXA8 +NGupVOghM7tiUnf0OrRVWtLutujjGg/mPaAXQJbD9pJteUsxiZoQmavIAWoB +pYvPZeCJnx//4N8hAr7j4bvKcgYeGNiQsBmyITk+m+ttaIA3nqoi/1Znwnz8 +7bnGCwb4si0umddwGbKYjsapUwaoIb3pNaUQwpKZYrn/jAEu3VTvaTQghJSe +ZUlOagN8wSmch24hhOa+HZ79ZICn5J+3XJUJwZl1o+wklcDVIaRLXLEQVFsX +owdBYFCeL/tVsBA8Ap4fN7UhsBqk/u3D6SBzdjZWbySQ3cjsmetMh20ssfwZ +h8DpP6xs2U3pwBoT2JAOBCqNuoQlxemwEOX0UQMI/Ky4c2Y8NB3KLxReUroT +2FjQ/FOdmoRVoQQ+4hHodkzazR8l4creZFX+PgIDBkYGpl6QcI7p5enFJ1CW +ZjrnKiHBJ1d3ZasPgXv645iOaSR0JMd2lvgR2L6z6JZ2DAluAcrU1CMELje2 +6e8PJoHDqh91OkogUWNIEbmTULJ4Q67pcQJ9/PmTKUCC2ZiIpw4i0NBFHBqx +kYTMNhqlK5jAtpdmp49akLBEHHlHHEJgqkUG9chyEv4DBJ9BRg== + "]]}, + Annotation[#, "Charting`Private`Tag$1048344#4"]& ]}, {}}, {{{}, {}, + TagBox[ + {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], + Dashing[{0, Small}], LineBox[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + Annotation[#, "Charting`Private`Tag$1135185#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.025081514923501382`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lG1IU1EYx68vZFYY6abD1805Za4P5czuvbuLZ0lGKBr5ITHz3TSjZqFh +NhMtM5NKSzGXCGUQQqIfEpflC4WkaZrlGxY5TAhRSUWGb2U797QzMHrgfPjd +c85znvN//vdIkrUn0uwoirIxj0jzsDWPk26tQ9QFNdTWmGPVCyzcYJrJ7c8S +w3Lz8XP6ADUoUVyXwLiHLilohIN+FBG+0J7vRaenckChSJRCdfnuvJAvKijl +jrWdeSKFiKGKuN8pKjxvlEInWi9g4cXBlTept/0gf53NGshlQLdkPmjCD6aT +Ho8G/6ThIcqz05/wL1OOsbYigPCDkuLYz5wc59Ez8CNTYapuD4RdUU2VabdY +wnydOo7wJopODqZizBc1+oNb1bBjxifu7/kyvH+cA/e6eHlfuZUNUDT1LlcG +Y85LmkGTlfl5kfofLrTvvre/2sr7AhtcPtr7E47ocVA/GgkkHIV0ClUQFqG6 +khWwPUyWY7vGERahuhaszOs/bWVen0EOglG/XBRYn0wOet4ebjxbJ4fE01/D +7MZV0IrqFSnwdycV2W/Rz8LhqM4DDOH3aP0hGtbmZ7uYUDnhDO1Cce+wP+Ge +NsOdbc0yrO8lGlbR+no/7KPvNMQ4upYom6SA2kBFMthvXb5QgPxgYADZsabU +Fzb4vrMgHZ2Kpjx9IU6sWUzZYOHq5MqEclaC/VWvgnatbr6mSgLZLcL1vgEV +GI8kaPQXJfh+8Ry4XLmf/WFajP3wmoPljsWW9BAfwrkoX5kn4aPPu59RKyKo +Qj704KBY7CDrrxTier1VhHk/V7KEC1DfxxiYu3m+LMjDFdevYcAQzcZsBojA +g/cVDV1lHUXB9e54/w0aJlG9e7zx+kIaBKjepz5Yz2s01s1OjP2b8H+26L+V +A5b8ZvS9PoT5e855E85D9w8XEr4bUxZlkyUgzPtJKcD74qzM+01rZUu/cT4B +oN9KX0JDo/Nep/RvAjiF+jdH4/6+dIMdyN+xDO7XkBD71Z0l+Xi/i1WE+f/v +MkfY8l7xer8Swdb37A+nHRS7 + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1E8og3EYB/AZGRdJxhg1bIfNCjORsN+2In+KOHDwvxYHiwOHyVIkhVD+ +ZmJKcZGDi1IcWOTvYbOyy2o5yFGSUtg7fZ9f3q3ew6fenuf5vr/nt5zewWZb +rEQiiQk/teFHGn6WPuK71vVWZiwWfnIGT6lkmtvlNFaw6P4sSuIu9XvsRreF +7GjbL7lzWdh822xjTHI6OVLOqyA3BZRjPSlacupc3Wvcu5bqZW11am8KddQP +xjxiK1Z8if0hHfsRfjIra7iSVboedeyr3e75nrGQtyv0vo1O7pZh9dpPIXdk +niMz+blnx29cMFN9GP3rhfcOuNlE6HJdyeeP5FGJ8ql4fljtD7VIBvL+5m9l +Ucb7MOqdObPL+toZ9UsX5rzmHv8qH7p/iTbyTO+1Xhsu2P+8Ndya58mtu0zu +hGrNiDRgIkfmCVaRH1PezA+rVVQfRv/d4GnSppd7QTiAQxPZKcx3bKJ8MPLD +2CcY+4Z62Ef0gzGP2Nh35BkNfgaK6+WUF+4+9+bbMhgZ3wvG94TxvVEfRn+c +F4zzhHHeyAcjP+wQ+p3k0j6Jjfdh1MO+oh/2Gca+i408uC/Ii/sEP4WPzdDB +jfsI477C4v+fX9QS7ug= + "]]}, { + Thickness[0.025081514923501382`]}, StripOnInput -> False]}, { + ImageSize -> {59.79691158156912, 24.508064757160646`}, + ImageSize -> {39.86460772104608, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {40., 17.}, PlotRange -> {{0., 39.87}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.0211954217888936], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, {1, + 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ieJC6+ZxNs73HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHp1na36bbIvhgeXkEf4Ne3mJGGXsH5wnNQmlZCP5/ELBXcJCYF6d5 +msHeofr+j1vGryUcSraK/j49z9ahVYFd9cwUUYfrQp8cz5fZwPk9Xq9YTBZa +w/lcbqqlTFGWUL44nL/y28uKMweU4Hx9rZXCF5ZoOiTE3nFjnmHt8Odb6YM5 +G7Ucltzfxzen2AbO97k4MebfZls4/wwY2DkE3JKuSZyk4cABMo/L3uHUYae1 +mf9UIP7gt3fwOcFuO3srgv/z7esDlotVHPbXylqkmyD4sPBD58P0w/hgWl8V +Vf6qFpzvD3KnszacLzH1CmdGkjYkPB0Q/BMgd+oh+FMn8FeZads76CvKf8kJ +03ZQf8u7z0DS3mG7Q9Oj4xLakPBotnNoYDnab2iu6bDF/MehlF+2kHDo0XJQ +fdI876yWLdw8cHz52cD5+Wu6b2coWMH54HCys3B4AUonc9XhfFj8wPgHuvc1 +mSyWhsS3mpWDiTEIiMDNh/HB7nO2g/Nh/hcBpU8WaQf09AsABWw6Sg== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx1/TkiiLcubw1zbnFJ1ENdESpe97ERFFhv4zIkqtqVmmVqLl +JCpMclRairrMKIuwsgwSf4Q/UCTDWYlLyCCHFWEZpYVYYbV7r90LRQfH+364 +u+ee+z7fO01qdqLJXRAEN2ff5uzznH2sc0mt4T1BbY2zfQuEixtmJgpsOWrc +sbzMEB4RGGg7pYFKnNpju0xgo21rMLynxadpJgKBtmQtjv+IzXmiJjgTt7k9 +7ZoWL/zNKWveimzcoWXz40U8iJnt2Vsagi9N2/dbPwHmaefPaAjC3pyqG7wF +VJctPRa9KJTz3Eyeo7Y8jPPFkuIdw3HhWJxwr8IkiHiXqZ+p6ohA22jpnClf +ZnqsmlzCWTrHRYJxo2/LkCMUXUWBa9NryZ/9dWz9FQK/ul3hA2Uyt+Lk+KMC +Ha7ERdqtd2WWxrv+5RMefedXV8m8KqLB+5lHKOet/Z7xl55HcE4YKt/5c4Oe +s7LSvjAjVY+Ykb6sqCaZ1zu3qb4ts6TnDZl1VB8rQRQ9p7ceXlSfDIL+XtK4 +ry4cr1OujkSpCFpovko9fOm6dpGvd+nnYiqT8AScpfmJwPePH7rXbQjnnJH9 +ufixPZRzf3vr2QVNOqbvAeAbnV8fwnxzHTAuXFFiuKdlfhsF81t3MPPDUpHV +7Uww7q88WO9mFqEdGU8SAoKR0jusN90XUTg2O2r4oGH+mk/QkW3+WFOpwaRX +56oaPwLHxt2iNVfD8kkl8D564cjgGzWLW07wtXOqOT1axbmAxrMEcN50p++m +MKtkfgZBsdpTZ6vwYfn2iJwl/YtkPtzs82MgSMTk6SzLGv8VLH870JoUa/wV +pgSVvboQ6LZ0noyq92Pr84Axmu+yIDb/CKCg+V5XsfwPgfnWXc2+e/7PLv3/ +5rDpkAnrYxVnqQ6TQZyP0fNv8eF8zmhJcMtRcJb8ZFAwfVJklu5jpsyuerN4 +Ctym70c+0Lg8ckn6KwWSaf0awOK0+TJ/O8DqNeTD7jNEHk/ye6/M0v07SDi7 +3itJ74dK/P2e/QbkmhNT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMYzrs5GGitFL7QourwJHHhNZPlbg4+ +J9htZ1/Vcphvo3NlVp0zBl8fpF5Fy4Fl8SQrxrkI/p+Y3KP/uFzg/E8bArJn +8bs4zFmkvPPPc004PzUNCNgQfGMQuCwB5/dFdPszCojDzWtVYFc9M0UMbh+M +D3MPOt8EbKAohF7s7FB1/8ctY29RiHlaLnB+7W+rgnMRCL7ehAU/DPsQ/AO1 +shbpIq5wvptqKdMsB1e4+TA+zP5fIPOFEHyYeTA+WF+3i8OOYKuI/+ricP5a +IR2+9HsScH44p1i7cbySQ+Lhy9qpgq5wfh3IvQsQfAYQ2ODqsDe/5u3MqYpw +vvonlZezNOUdZoLARUx+DSigb6nC1aPzwepuKsPt+w8C/Mpw98D4MPei86Xn +xWmeNtCE88Hm/9KEhwcsffR4vWIxuYjgg+2f4ArnV0SsMD2b7YYqP8PNwcxm +b9C0hxoOIp8cz6etRaRf9PQMABZuGmU= + "]]}, { + Thickness[0.0211954217888936]}, StripOnInput -> False]}, { + ImageSize -> {70.77471481942715, 24.508064757160646`}, + ImageSize -> {47.183143212951435`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {48., 17.}, PlotRange -> {{0., 47.18}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.020288090890647186`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx2dKIaVh23T4a+6XY05EnWiJ4fO+LyGRaGR/DIlSa2qGaVRg +ZlSKiY5SS9Et0cogJEWDxB/hGomkOCvThAxyqVHmjDTzR2a1e8/dC0YHx/t+ +uLvnnvs+3ztJWs4hnTOPx3Oy9wR732LvVpN7nSaLgTqDva36gYOblmbyLLkB +0Kx/l8mLY0CDWpEExNT8cYsfAxbU4qXAX6Bepn+kgYdaigwur0XnvrhDQ2nM +/u70ezJ461OQGq7bGLfK8PweCh5HrTw7USaH720HTxlzKChYsP+My0E5XVQ/ +FERBbcXO/MjtgYTXl85b6yqVhG+VFCePxKhgR2Jrle4KBZ+y1Es1PUHQNV62 +rlvmGB3LME8TZs/BZ2BS69UxbA2Ep5f8dmf4Mhv7K/B6MQPe9UdVgxUcd0Lh +5PM8BTTEBI8aQzhmx2P/5asufeVhNRyHBjXxX7kEEo7v37b39psgwonDlUd+ +M2rCoupR18w0NUSN9WVHhHIca9+mVs0xq6eCYwXSx5uBCPacanBD+nymob+X +bjlZr4Kp1LtjEQ00dKB8RWrwQuuiabLeoZ+DkUy8BI7Z+a8Bfs7NmvcwKsKZ +Od+KB0YDCfd3d17f2qbA+toAVtH8Rjn2jZwCratniaZVBhPIb8kU9ptZiv1Q +TuG6lUrhUcjpRqdfFMjGJpN4vlJI7R1R68JouDixMq6ZlWB/FdPQk1MwZ6iW +gM3NFGow0mDdd4wynpHgfCZp4F+4eW5oOgDH9WBg0TTfnhEpJpyH4ul9Ccc1 +9z3grYiwn800FAdsU1iqhDhfmmNW/3WK8Nl24dpgPQW2a9n6cB9PnP9hCjqT +orV/lCJAsteuAZj1psKIRm+8/gfABMrXwx/PXwQQoHzvi3H+C4B96xyAv1P/ +Z4f+m1m5IJ8xDogJs3Ww+RPOR+c/ICR8Q6tPdMoVEGb9pBFgfT5wzN7HLxw7 +6o3jCeAhej+WAVp2BbtnvBdACqqfaqO+XV7Y3ykUrtewEN9nM0XisX5naMLs +/fvKseO9YvV+IoLN79lfuGMTfg== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1D1IQlEUB/BnSSIFWWQGFfQ5aCGVDSEVj/KDPkDJIYfoC0QhzYYgimqr +QaMiDKKiBIeWoBoiwikikBRBNAcbBGlqjIjKil5P/vfiS3jDDx7nnP9951o/ +7R6xFTIMI+KeAe4p4J6QUrsTThvZTs3fT87Ca3WS5oivkp26jbfYbqid0g+/ +3UJ96n10MCYju2n1mkQyBTFfLl5FbE5VL0+VK4krNgafxa9KUq/maFwZblOR +fjDmEbpqNyF1ZFS5uYNGdjgk6Tl4ULHqbf97ey91zD0hiZZRr5+M3nc8GYj5 +eezUfN0+A6kPo/9qVjsXnaSev5Rnw1FqPk/ckJ+PM/LDTcmMhXE25uYv1v8z +3odR7+XcPLNfqif9+LlXqC/UswHR4X8jz3XK821b0Ofn/dQRWxVXMSZK3ZW8 +c3X6qfl5GqmPu1sT+z/9pD6M/uLAjlZUqyP+GnPd/Xio+Txbuvx8nJEfxj7B +2DfUwz6iH4x5hMa+I89S+j2lGZKTvLDvrWhiL0KN84JxnjDOG/Vh9Mf3gvE9 +YXxv5IORH1786xdsIPskNN6HUQ/7in7YZxj7LjTy4L4gL+4TXGI689lkRmLc +Rxj3FRb+//wC/tjGNg== + "]]}, { + Thickness[0.020288090890647186`]}, StripOnInput -> False]}, { + ImageSize -> {73.94074221668743, 24.508064757160646`}, + ImageSize -> {49.29382814445828, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {50., 17.}, + PlotRange -> {{0., 49.290000000000006`}, {0., 16.34}}, AspectRatio -> + Automatic}], + GraphicsBox[{ + Thickness[0.01766472354707649], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOJrk43HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHZS889P4HIvhgeScEv8frFYuJo4uD84RmobQsBP8/CNgrODg0PTo+ +w9jFofr+j1vGryUc3vDuM5jZ5OzQqsCuemaKqMN8G50rs945wfkVEStMzzYj ++ObXjuaaJDhC+eJw/spvLyvOHFCC8/W1VgpfWKLp8Dhx4TWTeieHP99KH8zZ +qOXAsniSFeNbBP+mdE2iUa8znA/2h6SLQ8AtoMQkDQcLkHkWLg6nDjutzfyn +4mBiDATWLg4+J9htZ29F8H++fX3AcrGKg8gnx/Npvgg+LPzQ+TD9MP4TkDv1 +VVHlr2rB+f4XJ8b8c9aG8yWmXuHMSNKGhGcwgg+mvRD8ut9WBec8XBz0FeW/ +5IRpO5zQtJp02t7FYTtIo4S2AysoPL46OzSwHO03NNd04PFfPyV1g7PDGRDo +0XJwVy1lmuXhDDcPHF+3nOD8bM6fC9IPO8L54iD6koPDiyztb9PnqsP5sPiB +8Q9072syWSwNie9jjpBwNBaBmw/jg9131RnOh/lfBJQ+WaQd0NMvAH2MNnI= + + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lGtIVEEUx68piZRGuuric9+mK6LupmYKx2TuJZKs/CJi+cj1iS8wMLMi +xUSXTEtRNxHLIgxFg8RHKEuypLhmogkZ6CJCiAopIZpYOXfcuWA0MNz7Y+ac +Oed/zow0vfCazpZhGJuDeflgHjuYllGnNs0bDtpaD8auN1i5a3u11FwkgW79 +t2ymmgMNHpVSkMRs3jRf58CMR5wMnLdipjOVHDB4pMrh3l5k0ScLCzVRF4cz +X8jhq2d5Wugrlqxb5GT/PoJ34TsfMmoVsNV3Jc/Qi6Ac/ywoQLVS2T6Vi6Cl +/lRZ2AkV5f3tW5a2Bj/KT6urkmaj/OFkfG+jzojge656u3kkAIYWavd14Sxl +nFZrCEdZi/NI4GA50X1gxqIC413viKxk7vB8JbFP4cCj/Yb/ZL3Ag1Cx/LFU +CR1RgXOGAoH59fv/8gM70+OQZoGDA7pcPtupKMeN20c/+xJAOX6mIfl3rJqy +uGnOITtdDRHzpnxtkcD4mJY8gXk9dQIrsT5JHMnTRQ2OWJ8zHIyPXejJafeH +lbTn89olFgawI7Ga2JWx1N6qn5WxTEwdosx/nRH82lgznov1p5xd+KNqYk5F +eXx48NHxPiXRNxDBLt7fqSB9k4Eg0cGtWtMrJ/1mQKTfjDLSD9OI1K1GBm+D +CjptoliQzy8nMF4ySBubVeuKWbiztLOgWZOS/jKxMFJYvtHaJIV1x9Hg1gUW +LCglxlAsJfHIOHC5/aRkakVC/F7l4OfoZn9WmC/lUuxP70WZ6za9ZnbEpJ8Z +Dqok9kpzoyuJt4KlzOsfLXBJv+ve5CKC9Yf5+lBPNxJ/I4LBhMjEP35iUr/z +CIz60QptpweIsP1ZBEs43tM+ZL8WgQjH+9KXxB+KyP2zlZC6yv/PVv2Pst+W +YtUw4UuZr8O6D+UynP8lV8p1ifp4myIRZf4cjYjoIxWYv48BAlvrTfyJyPsR +jqDHOdApa1EEqbh+OYf1HXIn/d2BSL1mXMl9Zljqj9erUmD+/gVxlK3vFa/3 +ezEcfc/+AtcKCWg= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMY+r0dDLRWCl9oUXV4krjwmkm6t4PP +CXbb2Ve1HObZ6FyZZeeBwdcHqVfRcmBZPMmKMRbB/x2Te/TfKQT/04aA7Fnn +PRzmLFLe+ee5JpyfmgYEbAi+MQhcloDz+yK6/RkFxOHmtSqwq56ZIga3D8aH +uQedbwI2UBRibrKHQ9X9H7eMvUUh5r1C8Gt/WxWck/CE8/UmLPhh6Ifg76+V +tUi/guC7qJYyzWLwgpsP48Ps/wMy/5InnA8zD8YHa/P2dNgRbBXxX10czl8r +pMOXfk8Czg/nFGs3jldyiD98WTv1IoJfD3Jvghec/x8E8r0c9ubXvJ05VRHO +V/+k8nKWprzDjJlAMBGTXwMK6FuqcPXofJCymTeV4faBxfmV4e6B8WHuRedL +z4vTPG2gCeeDzf+lCQ8PWPro8XrFYjIRwQeb4+8F55dHrDA9q+2NKh/u7WBm +szdo2kMNB4FPjufTchHpFz09AwB1mziC + "]]}, { + Thickness[0.01766472354707649]}, StripOnInput -> False]}, { + ImageSize -> {84.91854545454547, 24.508064757160646`}, + ImageSize -> {56.61236363636364, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {57., 17.}, PlotRange -> {{0., 56.61}, {0., 16.34}}, + AspectRatio -> Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #4}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Times"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.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[{"Opacity", "[", "1.`", "]"}], ",", + 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[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.945109, 0.593901, 0.], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0.6300726666666667, 0.395934, 0.], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.945109`", ",", "0.593901`", ",", "0.`"}], + "]"}], NumberMarks -> False]], Appearance -> None, + BaseStyle -> {}, BaselinePosition -> Baseline, + DefaultBaseStyle -> {}, ButtonFunction :> + With[{Typeset`box$ = EvaluationBox[]}, + If[ + Not[ + AbsoluteCurrentValue["Deployed"]], + SelectionMove[Typeset`box$, All, Expression]; + FrontEnd`Private`$ColorSelectorInitialAlpha = 1; + FrontEnd`Private`$ColorSelectorInitialColor = + RGBColor[0.945109, 0.593901, 0.]; + FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; + MathLink`CallFrontEnd[ + FrontEnd`AttachCell[Typeset`box$, + FrontEndResource["RGBColorValueSelector"], { + 0, {Left, Bottom}}, {Left, Top}, + "ClosingActions" -> { + "SelectionDeparture", "ParentChanged", + "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> + Automatic, Method -> "Preemptive"], + RGBColor[0.945109, 0.593901, 0.], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}], + ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.645957, 0.253192, 0.685109], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.430638, 0.16879466666666665`, 0.45673933333333333`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0.645957`", ",", "0.253192`", ",", "0.685109`"}], + "]"}], 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.645957, 0.253192, 0.685109]; + 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.645957, 0.253192, 0.685109], Editable -> False, + Selectable -> False], ",", + RowBox[{"CapForm", "[", "\"Butt\"", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}], + "}"}], ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"FontFamily", "\[Rule]", "\"Times\""}], "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.99, 0.99}], ImageScaled[{1, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{False, False}, + AxesLabel->{None, None}, + AxesOrigin->{-0.6931471805599453, 0}, + CoordinatesToolOptions:>{"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, + DisplayFunction->Identity, + Frame->{{True, True}, {True, True}}, + FrameLabel->{{ + FormBox[ + GraphicsBox[{ + Thickness[0.041911148365465216`], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, { + Thickness[0.041911148365465216`]}, StripOnInput -> False]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}, { + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], None}}, + FrameStyle->Directive[ + Thickness[Large], 16], + FrameTicks->FrontEndValueCache[{{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, {{ + Automatic, Automatic}, {{{-0.6931471805599453, + FormBox[ + TagBox[ + InterpretationBox["\"0.5\"", 0.5, AutoDelete -> True], + NumberForm[#, { + DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, + FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, + FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, + FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, + FormBox["100", TraditionalForm], {0.01, 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}}, {{-0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 0., + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 1.6094379124341003`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 2.302585092994046, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 3.912023005428146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, 0.}}, { + 4.605170185988092, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.01, + 0.}}, {-0.5108256237659907, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.35667494393873245`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.2231435513142097, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, + 0.}}, {-0.10536051565782628`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 0.6931471805599453, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.0986122886681098`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.3862943611198906`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.791759469228055, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 1.9459101490553132`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.0794415416798357`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.1972245773362196`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 2.995732273553991, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.4011973816621555`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 3.6888794541139363`, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.0943445622221, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.248495242049359, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.382026634673881, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 4.499809670330265, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.298317366548036, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.703782474656201, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 5.991464547107982, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.214608098422191, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.309918278226516, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.396929655216146, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, { + 6.476972362889683, + FormBox[ + TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}}}}], + GridLines->{{}, {0}}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + LabelStyle->{FontFamily -> "Times"}, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None}, + PlotRange->NCache[{{-0.6931471805599453, + Log[100]}, {0, 6.25}}, {{-0.6931471805599453, 4.605170185988092}, { + 0, 6.25}}], + PlotRangeClipping->True, + PlotRangePadding->{{0, 0}, {0, 0}}, + Ticks->{Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVk3k81Pkfx6dhZkTGzFeXtKJrUFtE2kx6f9Yi9fi5ipTrt6Xo2LBbo0RI +Rppa/SpH2hyRzOYcEZHGXTnGUY6UozBZt5mvcWTmu/3+eD2e/z4fj+fjpXfc +/+BJMolECv6+//Oe1niN5TaxkNZEN/vowUDkGOqURFcsnKKV7hC5MlAAWVc7 +XVMsVMQsHqg+yED/GT34u9L8kJAf8bb+mS0DUctLfqipHhKyPTdN5pgy0KVf +IwOtjw4JV9FYS6nqDOSVqa1vGzkobKq1o4eFaiCDnQdu2nV/EVpTpZNOh+ho +58OCDM8rvcK7cdupY3I1FOJRrM6r6BR210XdxlRVkWWzHu3WplbhKT16Q4+j +CroS1E8JlFULH+/2HDiXTkWSGoPyZLenwn+GO2mGeyjoaBSdtyMlDyp2KUd4 +9ymhsw5RrXHr6yCSWZv0JoeMLKY8M60LWyHfz6BsR+4SpP4q1vueuAvM93d/ +GygioSD5oM3F5D7IYfaNtDYSYFrr22i5ZgAMWY1+814KcKBvuSDNFoNhSrrE +6Nsi7GYEb/cnjwAr0m+xu/UbvF6eeDo2ZRzqWXZjFoIFUNONOPc1bgqMH2FP +oHAe1mCK7WcsJHDhzpytW/8cBFM+CypVcCjw/cu8gjkHv7jwykOLZsDndcsG +4xOz4PXkQTQjahZe6dyeiC2VwQee0+RW+3l4udfws/9GGZQ1iPpyZxdA7wPP +wTRjBibVn92m1C5CllfazXjWDJwpSQyvaFgE9cqg+s5NMzB4PPz34LZFuHfJ +NFNr4wx0Fdsdmu5bhLGNP+1O0Z2BqmPDK3sWFoEtqSwWaM1AfNEPyYVGcvCm +dnyWqs3AHs/obO+HcjBf+/Oy0SkcntP8k3TS5ZA/MngVJnEwLnCJ+fC3HIZr +JLdix3HYTNsQ4FAsBzXzX46jERwYgnITdpscyMUCcsoADgPK0lJMRQEqu9kD +Fztw4GV7vq08r4DJuesB8S9xODhdMOh2WQHznsz1lDIc1pipkPBwBVRsq3e/ +8AKHp8ICs80xCjigP+7j/ByHt220xzy+AnhLZO1r8nFQmReEHupRwElV3teK +dBxaLGgPxgYUwFgfRP4pDYf7ER5F3BEFmFuZpeWl4qC/jDZWPKuAotZ9/qlJ +ONiu8zi6FiNAL0bdPDrhu/8JwYWi1QTwtwg4SvE4dPGp/7NfR8B956umYbE4 +nNohqAvfSkDg7Q/ml+7gcN2aajpkQ8CpzNYTATdxsOe5O4TaEfBKiAonb+Cw +sjn/zCpnApxqrbj+0Tj0alKj8t0IEERndU5G4fDkiPuj/ccIePreMiuAi4Nf +Uv7LL74E+FV2EdPXcDD7QukK9iPg7gV2+/kIHBSb3aXLOQSonRY4zoXgUHc2 +n54bTIDdC/09XhwcYvIphvsiCLjz1Tro9TkcDs+4WfdHE5Dbc4tq6oODOJQS +gsUTsGI2S22VKw7Uu27/BOYTEHCyPV55Nw6ijjxlRjEB8sHBLdHGOMRrU3T/ +LieAW3OIomH4vXdG3uGP9QQUWXDCNmvjYF2iXANDBHQsjvuGyKVg6e/qoKxO +Qv1LmmuqqqTA7wuPus/4/ruLX7o/lkpBw/Fp+dblJMTtH8qZK5DCJyP5Fhdt +Eiq9/sc1i3QpXJSkqTwxIKHBwDcvpNekkM2ZqNxnQ0IjqQZCho0UVoRwTW+G +kdBKXLeQ1CSB4ehnWpiEhMr2kTRdh6ahqkXCb3u9BNEe+4yLXKfAOnEo4Uoe +Ge03svhvau44XMrKej9+VwkFjGaqNdNHoW/UuYPhq4xmXfnzSr3DMJkt2KVj +R0F68SpWD8vFYPJw2rN3AxU938Ve8lI2CKx25TZvGRXxZNUj3icHoCamIeNd +Nw3t7M3jhPV+hthAzl5ZngpaI/cIQgn9QO9rM1NKWIrIoXXO04JeKONo4lV+ +qsh7/4P24YefYPVhFrHPUg1pbq+IG63tBp3iidPFrGWo7ZaN6tBCFxyxSUz8 +IF+GDD5FjJpf7gT24Vl98ZA6yjF5w1+r3AGiPH1qyVs6ym1OGY8tew9xuyz4 +e5I10PoH1zW38d+BUiq53cWSge5G7hyY/asNXNhHSsQ5DLT9TngqlLVCWHCC +pdsqJjpw6OeviXgLyIPzF6tuMFEyq+KqeEcLxGmytbg4E6W8Udvwo14zqMoy +G47JmIi++l2LSLsZwruWh+6dYyJBrPW3P1Y2w29JE19mvzHRFbukyiq1ZrBi +pWWfUcJQ+TpVPEwmAon5UuSIYUhknjbt3ygCx+OdPtpGGGLe3Bqkc1kEdVZW +WnPGGGp3vfOnOkcEe1iChvcmGCqtHltQ+IuANcYzitmFoeuNJp+GT4pAwdm7 +QAIMuUyIHnQ5iSDnRsafYjsMyXcarmYZimD9bxiqdsBQD1eTzd4kgvv2YZIU +Jww9Me7PcNIVQaTmUdejLhg60Nxuz10pAo+kZXqNHhjiTEy10JRE0BYW9I7v +hSHdmNMrtimawPa4mMv9FUOPyo4lHp5vAhNWxcjeExg6aJ/pnjvZBPylPyZp ++2DIcWIgoWekCXTGEh3mfDEUUh+moSFuglgRldx+GkP8whOVlp+bQFVwvlBw +FkPOtsnZlz41wb9lGsvo + "]]}, "Charting`Private`Tag$1048344#1"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVlHk41fkex+3nZ835CeE6obrHMqJUJsrnM6cacm1jFLJkWgal5SaKarqP +ODenMIVElpAtjGy/c0p8j71SsrZ4Rmo4pxnGOsZS0e3+8X5ez+t5Xn+/jQ+c +8DwsJyMjE/Zl/2ey3ngLb72UCHS98yKcaJRLVJqaMZIScmn/+k4ejSfljAzy +tb646mXKbDuNLmOe/5ZflJD743vzJRtoVKoXGbY0S0gJp9s72oDGs0Gxkbt8 +JaTboHpEc5KNgUUGpk6xI+ROosL7sTQ2mm12vuI68BsZbC3PWjeliZszqwoC +Lrwhu2/L+jO4As/7C9UF4pdEnOHa3a6mjrznxqyr67rJc33zJjk9VbwQ9VYx +cq6Z6BvXPLW3VkZ/Y/7TOXEzsTqd0H/eTBntH1skn7nSTMKP8a+JTZRxcdUZ +oyijZsKtceZ4aCtjhEjd/rxzE/lrZv/RpA8UHpu3OxmTLSaGayNfJrRS6JLz +dot8qJgklfcJFhsotHDkL12yEZOOaN+hYBGFPZb52qrXCLHNCgl2KaXwSViX +M1tST3y21fVtukbhg1HzWsOEB+TxRuH6mAAKz9pF8labPCC39EtP6npTuEXQ ++NxIeJ+c/sORV+FBYZWZz+iadyLCSbD8WbqDwrshcavNNwtJ8X8zReHmFIaI +usosnjBk9VS7r+FaCv9J/cPOcj9Dyg1UYx4bUphXVOVlHV9LNFXTD5qxKQya +X3q3gVNLHpq06g+qUMhx3H3CprqGDOR2eCUrUPjrjZRPm5xqyA2/bE2XZRZm +SIfitwxWE266lStrgYU+Wyx0vz5VTQ60Lw6zp1mow4+8s5VVTc5VWNFe71l4 +fZ062bahioTEuvWP9LJQcMhulhd3j8xqr2izLWfhTItZffa+u0TFt6A7N4iF +rcNqZ4WnSkhV0a3BPXtZeFNuamOXoJh0BPYWariwcDsyxbJ1hWRE61RIoi0L +L9fxUg4Z5BMf76SwNg0WOhwSvvASpZHCZxcydRqUMFMx2cadjgATJYsJUyMl +9OVrCDbmVIBlxsW/86YV8Kg7vzvVpA3smCoj3S453D4VULSrphti1S+5r6Jk +Ub0h5WCy9BX0drBqCzKWIWpp5Nsz2UMA+363WiX8CJtag5/y9Ieh785wbYjF +IrhrWJz+q0wKo42hAlbVHGzVPGd1Qm4UTN7qXVmdOwvtK9NDU3LGAWp4771v +z4CqUcyx96lTcOhrHx1maAr06WWrI9tnYP/uT4YaPRNwTvFdZSM1C92G4TuS +PozBjj2C+p9q/4ZGv+MN9rf+gMDCjMua/Hn4nv/k4Vu39/Ba8N3kV26L0P9a +233wKwnUdXQO/TL/AW47P3pm7zQMk+rVSYqtn2DpzUTK3ZPvQFAW8LgxfBmU +k/jWGR1DwDvh7a6gLoPPX2g39rMH4ffL1Xr0jAyuNXoy0RA6AE1dM8U97bIY +ej7n8LjVK9iVLkm7UCGH005z1fmKL+BsaWnf+HV5zHG56dXP6YOhMa8XmsEK +GJZKU2X8Hpgsq7TluCpi8tyBjaMLXWCTOR3wZo0SXs1dGTW59zlw+xV6Ds4p +YQlT7zhNPYOWxI6C3gEWHjSO2D3/6AmkREY4zFVQOBZQmfBM8gg0hnq2yKcp +o+zo5WH2inaoi9CabTqugt/Ue/JdY1th1V7uZ0eeKpbdE5uqcluAI5wIFXLV +UMnYz/abnibw+TY9/fWSGvo7djn41zSC/d55U6lEHY8nTPYrZIuhs8JUSfRY +A8NeqtRVeRJItd1evC17BQaybwUYiupB/rZc/x6eJhq83uoh4T6EPfY+Imm5 +Jub4NGrvfvUALp5L4+3TZWPn0VPTQRX3YencvU9N8WzUj/w+Jz9BBKla9npx +s2z8Qb1kZWmGEFTmijp+mGOjv8VTuvCGEP7zauVPDgts/JVEj+ZdF0JY1sRv +8x/ZuJXHWZMnEMJObl7ZEXkadx2R5DLRQpixU0YPmsbYK6hv6ycEjwMvfzSw +prHDz976Z0MhtO3cqbfw5YcPt0FLi54QtnErO/psaHz4Ikb3o7YQuH8KrBNt +aWwkKQthGkJYjnD4IAM0ciMLEw9/ZqA8viBB6kqjpV+6b8k7BkzCaGx2p7Fz +69WYxUEGbrpdnMn5jsZKc9PAfw0wEKvl6+2750sfZGU+28OAf5aa8VN/GqXx +Y599WxjouRjVWxxIo050ULFQzIDTAWlcXBCNqs7uSzr1DNhwxaMOh2gcj4gv +GahloFjZMsvgRxpTGbfPDlUMcP5Md18IpvGMyaXlO78wkNKpJNcfSmNxvW+h +WikDKpXhNZVHafTU4cxFFDHwPzI7JeU= + "]]}, + "Charting`Private`Tag$1048344#2"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwV0H0w1AkYwHHtIi+tdn/kbXvjrjYVOU7mEs/TUskt0iR0VuLKeSlXorTF +jTCIrhdGmvZlXN6yYY+iVFtsGTGKpShnhV29eNn2tBaL6/74zuf/r01E/L4j +JB0dHd9v/e81q3EJ00EhXlf3cGu4sQWSLukrVWsV4iBJrGX7Egv8nbSW/pep +Qkw9F/zVTWOOrM/7TpBn5OIPKtYNhtwc9R81rJI0y8WByqQIB7E5nglPT9oZ +Ihcb5tSd0ySYY1gZfYN3+ojYknfhQsLgCrRz8bno+3ZInL+qPlQoMUOXm3+X +sM8PiNsDqlza8gg8F1pPyXnyRlyWKyQ71FKR+dJmae66TrHznhHV8BoTPJ88 +qJekbhb7PPWeXj5phCqJ3SPewdviZPf70jmmAYZkmuQ48avhNuP0A+Pbehjr +n9lZYPsc1is8A7MiyOiuZJftrOsESkzFxXvJS5DyOD/ymqIXErEkrsdtEZLn +R3ad5slgkXyqzmCNFn58FtXOtB4GSXzdRsNDM+BvsunUv0IFTPhaOPTWqOEn +KmdLPOkTeA1UztJPTkGLWVF0Pn8cShhpV+w8VWC8Nu3YaIESBtknirKDlWBN +LGyJcVfBIU8zn9mz48DRey96ajAFdCetT+jBT+AZmPMo5e5XqKlN+Xm0cRTC +Sm9kUTOnwefi2IMYRzn05QRMbvabgQJ/e23b1BA0tnXIqqZngcFskmpWvIdJ +Su2fes+00F+wJX9l1gDkCNmtTxMW4LHuEdZHzjtgxgf561J0cJgnGqh60Qsf +smqtCJUOjhoOV9E3vYamV6ryrpZvX6iH15dppLCzSF54vpqErfacBGlPJ5yp +rOwev0rGZj8JvfvzS5B93v+aGqWLd1KirB+2tMOkUOS62lcPnbhj86MNreB8 +8wt74Dt9fJ3c/yXSrgUYPbpdkWp97GMuvNiokIDkUluJ9O1S1IjIqrOiJshP +SvRQVxugNrXkWkrvEzCRdW0lFxqij/DMrU7Lx9CYaDrVdNwImSOk+/HmjWB5 +gLG4m2mM7lZmsrljDbC6fiK6nrEMu+dobvZv7kLwrqKivvllOKJ/f6W1sBbc +DkxvUMgp2MPxNxFcFkFH9Qb9hlYTbN4YJk0+Xg0Fru7l23nLcY9feBk7UAhk +AaknkElFJ9vc3zgBFRDoFtyguENF757nss1tpZDKKWQetKDh/L5J2ebLt2Ce +U6Ntyqbhg7EgWk1kMRSYulllTNHQW14pLboiACN1WdthNQ0zO2Mp8mwB/NFr +luKhoSF7yb1+5zQBxHEnhqbnaAhTHi79JwXgxSgWxpAJXKks5QftF4BqmyHu +JQgMGkr4MG0hgL0Rb47SHQmMDHbsKPHkw3MvLyvNDwTO/IMsugsftjNEbd3O +BFqyKvIK1/OBMZbjeMmVwLvBE763DPmwkOgxqwME7na9Gmfyigd3skvyFL4E +ZtSxom3DeGAbR2CzP4GDTvmlpL08uO6XquIHELgozEv8uIMH6aYhQSGBBKrZ +hx6+WMeDUO4ym/ZQAr8v9rn+bpwLXanJ0vIwAvtUIxSljAveEYqMjHACV/FH +tUZdXHBmPPnk8SuBynm62/57XCg3tOfSjxJYYcdKTyvnwuqxIn9NFIFHit9v +q7/BhfwOfVJPNIGpNrJfVLlcMBIl1IliCQyTeI84p3LhPzz8Sck= + "]]}, + "Charting`Private`Tag$1048344#3"], + Annotation[{ + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Line[CompressedData[" +1:eJwVx3k41AkYwHFmMqMcjd/U43ryKFtDh1HjqJT3bUJ2S6NjEosNleRqV6yb +rdiarZ/ZsJpy1ebYXA151JYGjZEdj0KELLJmakU0OaZC2/7xfT7Pd2VAxP5j +FA0NDfcv/W+G8biUa62U8C1Sy6tS6EghaZMqc6VEyrKSj0fT8RTF3PR3plIy +9ZqnXh9Gxz1v9n9P/aCQfKQcj6v1oiOt7u4K6SOFJCE27+3cJjrGHDkX7eKl +kAz39pi7KWnoV2xq6XZuREJvDVvxjEdDK7tvfnHvG5aI9vXan7DWQrucqkLf +xAHJ1vLHmjvGKJjgU6snqH8use8fTeRoayL3yUr6xdXtEjDXYnHvLUBi7JBW +9MwjSUxkwBV2zCdQSa3q8rxvSWYPtN9LeagGrzR9wab8Sji1wfWwp9EMhPDS +2rNWyaDKWm63pek9bJ/0LXa50w6eWZ+aKzregd7DzMAMZQ+cZWtv7u2bgNj5 +Edcf8wYhPNd7hFMxBrZNQa1ck3+gXDZqZzv0L/D0151+X6aEsKamB75fvYIt +jHh2BGUUuqI6Ejh9I9C8TBScmT8Olk2BJywKhkHH/EzYq6xJmK42vNZQOgQm +xAL75HYVvP9LrmQYDEC81ktxg/YUnG+R9acN9cFOvqAuqWYapsT18Q9se8Cv +6Op5RtosCHb7mO3O6YJewb6J9Xs/wJqHdPZefifcl7cNVsx+hPUVNc7Toe0w +oVedrtU0B5DUEHDJ4gkIynxbGiIXgPH1a81ueitwIzx5i/Q0kLUr/7rSrQVe +n682JlQa6IHc79TXZND4VFXS0ayJYRQ676CfFFxEiuzESgqWmVgWFtg0Qkxp +6bPxy1TM8DGdXrerHgbfHOxmBC3CzZ7Na7nedTBRJnYwc9dC+WlZRr/jn8DJ +eec7YEHDs5oJDrz8WmB1LeoInKHhxQfX1/7qUQNSUl7Y2UfHk527w4oY1ZAZ +HeU0U6mNMb+x6VxrMegPdthTsxdj+A6THp2qCrgfxZxqDF+COgUhTzwLSsHo +EOvzLq7Olz9z+9vREjCrfRtcy9LF1m32uX6uRXDYVSTqndfF8LBAwQ7GTXA8 +NGupVOghM7tiUnf0OrRVWtLutujjGg/mPaAXQJbD9pJteUsxiZoQmavIAWoB +pYvPZeCJnx//4N8hAr7j4bvKcgYeGNiQsBmyITk+m+ttaIA3nqoi/1Znwnz8 +7bnGCwb4si0umddwGbKYjsapUwaoIb3pNaUQwpKZYrn/jAEu3VTvaTQghJSe +ZUlOagN8wSmch24hhOa+HZ79ZICn5J+3XJUJwZl1o+wklcDVIaRLXLEQVFsX +owdBYFCeL/tVsBA8Ap4fN7UhsBqk/u3D6SBzdjZWbySQ3cjsmetMh20ssfwZ +h8DpP6xs2U3pwBoT2JAOBCqNuoQlxemwEOX0UQMI/Ky4c2Y8NB3KLxReUroT +2FjQ/FOdmoRVoQQ+4hHodkzazR8l4creZFX+PgIDBkYGpl6QcI7p5enFJ1CW +ZjrnKiHBJ1d3ZasPgXv645iOaSR0JMd2lvgR2L6z6JZ2DAluAcrU1CMELje2 +6e8PJoHDqh91OkogUWNIEbmTULJ4Q67pcQJ9/PmTKUCC2ZiIpw4i0NBFHBqx +kYTMNhqlK5jAtpdmp49akLBEHHlHHEJgqkUG9chyEv4DBJ9BRg== + "]]}, + "Charting`Private`Tag$1048344#4"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + GrayLevel[0], + Dashing[{0, Small}]], + Line[CompressedData[" +1:eJxTTMoPSmViYGAwAWIQbXvZa7OT3rP9DGDwwT5F517BI6YncH5Xa6Fe0/WH +cD7HhvfvlrndgvPnnPqy4lHtRThfdtI+3rJDB+F8Xs59d+0n1drD+LntK3en +xxyC89/5FSv8XnAJzncr09m/9PltOP//5G+zot0fwfnrfMo7gn48g/N7Tv1+ +WBP5Gs6vntb7csaS93C+/MP5EyeqfYLzZ9ysSvkQ9AXO/8WYFsC27hucn3Ix +XFj03w84P63Zu8dW7TecH5TqLydb+xfOv6oZmia25j+cr9i/NfkxC6MDjH/n +zuH/5npMcP5j6ctlM52Z4fz7RVlVYQUscL76bqZIhU5WOP9zmNzitDlscP5m +rkOVHMfZ4fz969O0t9/lgPMP5EzOPMjNBee71joLe5hww/li9V+m3/bgQbhv +hu7KUyW8cP67xelTj/XwwfktTKpv7ebzw/ntNlszOlME4PyigogTle8R/PAN +9u/E2wTh/EcZyxv3CAnB+fqnL3jNn4Pgl1na3dI3EobzkxV0rh/bi+B7C8fN +4g4VgfO/rg+c3PcSwXc9evSneIkonN//rFbNn0sMzq9v2HagZxqCb3hkwwQO +BXE4/57wezWjrQi+4Z21WkkOEgj54BJdoT4Ev+e0lcGh2wg+ACBd/nk= + "]]}, + "Charting`Private`Tag$1135185#1"]}}, {}}}, { + ImageSize -> Large, DisplayFunction -> Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, DisplayFunction -> Identity, DisplayFunction -> Identity, + Ticks -> {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , Automatic}, + AxesOrigin -> {-0.6931471805599453, 0}, + FrameTicks -> {{Automatic, Automatic}, {Quiet[ + Charting`ScaledTicks[{Log, Exp}][#, #2, {6, 6}]]& , + Charting`ScaledFrameTicks[{Log, Exp}]}}, GridLines -> {{}, {0}}, + DisplayFunction -> Identity, PlotRangePadding -> {{0, 0}, {0, 0}}, + PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> + Identity, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "ClippingRange" -> {{{-0.6931470724310195, + 4.6051700778591655`}, {0.014689207181065598`, + 5.761109214084205}}, {{-0.6931470724310195, 4.6051700778591655`}, { + 0.014689207181065598`, 5.761109214084205}}}}, DisplayFunction -> + Identity, AspectRatio -> GoldenRatio^(-1), Axes -> {False, False}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + CoordinatesToolOptions -> {"DisplayFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& ), "CopiedValueFunction" -> ({ + Exp[ + Part[#, 1]], + Part[#, 2]}& )}, DisplayFunction :> Identity, + Frame -> {{True, True}, {True, True}}, FrameLabel -> {{ + Graphics[{ + Thickness[0.041911148365465216`], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}], + + 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}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4oSQIPUFnPoOfRHd/owFog4wftDbyx9nHETw +q+7/uGXMLeYwZ5Hyzj/H9eD8DXp5ixnnIPhPEhdeM+nXcwgB6X8o6jBlAn+V +WbcexPwJog5bzH8cSsnSc6gGqV8t4OB/S7omsUjHYcmt5Y8ND/M4/Hj7+oDl +YS04v/63VcG5DE043+/ixJh/yWoO6p9UXs7iFIDz1wrp8KXfk4Dz09OAYJuC +w6MI8e0XHTQdnCc0C6WtUoSbD+Ob2uwNmuaoA+fPmAkEknoOM8FAAaK+Wc/h +TVtut9FuaQf3/bWyFu16EHWV0nD/gf3rKO3gD7L/MIIPCz90Pkw/jN+qwK56 +RkQGzk8Fuf+YIpzvvubocgYOJTh/5beXFWcMlBwy8j+0nryiB+enxN5xY96B +4Iv0eL1i2aLnoHztUTCDjhI8fvhjA+4bfVd0+A8C+3Uh/j+l4LBe9UnzPF1d +hw+L1iuczVB0eAAKPwUduHk1nzYEZM/SgvMbwPGjDudPaW+NurxHxWF/974m +E2d5OB8WPzC+MQgUC0HjS92Bx5HPa8ZKLocTh53WZs7TgvPB/vXUReUD/d8P +Tk+CDujpFwCqbDUh + "]], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {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}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, { + 1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJtIGYCYgOtlcIXVMwchCsnlZwNUXSA8avv/7hlfFvR +YSYIvDR1COcUazc+r+iw4oWH3v9GBH/aBP4qs2gE/0CtrEW6CYJ/Q+iT4/lr +JnC+Y9Oj4zOqTeDmw/go9l9B8L1OsNvOZjWFqP+tAOeXH97mOrMXwT99Bghy +FByW3N/HN4fZ1GHlt5cVZxIUIO7/aeJwR1N2zX9jBYh70owh5rMIOjzP0v42 +fa+hw978mrczpyo4eIPM22rosFZIhy99n4JDj9crFpONUP45NP49BB/mXtvK +iBWmskZw/n8Q8Mfkw/xvDAaG8PD5+630wZyLBnD+flB4TkHwQd48o2MA1w/j +w8y/DvLfMgR/MSg8LiP4/hcnxvz7bODgPKFZKG2XgoP0vDjN0x+MHEqWl2z4 +x8/j0A3yD6OxwxxQuN3kgvAFjR14HPm8Zqzkcvi8ISB7ljqCH6Pg+DHZB8GX +mHqFMyPI2OFF7ePs8zrcDqcPO63NjDOGmw+OXxdTh9ug+HBWgMa/qcMKUHwF +KDps1MtbzPjHFCM9wvgADBsiCw== + "]]}, + Thickness[0.041911148365465216`]]}, { + ImageSize -> {35.79006724782067, 24.508064757160646`}, + ImageSize -> {23.860044831880447`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.86}, {0., 16.34}}, + AspectRatio -> Automatic}], None}, { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, 11.8563}, {8.653129999999999, + 11.2484}, {8.34375, 9.495310000000002}, {5.94688, + 9.495310000000002}, {4.6000000000000005`, 9.495310000000002}, { + 5.387499999999999, 12.6313}, {5.4937499999999995`, + 13.071899999999998`}, {5.54219, 13.095300000000002`}, { + 6.0062500000000005`, 13.095300000000002`}, { + 6.8656299999999995`, 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], None}}, FrameStyle -> Directive[ + Thickness[Large], 16], + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {{0}, {0}}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], LabelStyle -> {FontFamily -> "Times"}, + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None}, PlotRange -> {{-0.6931471805599453, + Log[100]}, {0, 6.25}}, PlotRangeClipping -> True, + PlotRangePadding -> {{Automatic, Automatic}, {Automatic, Automatic}}, + Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + RGBColor[0.9, 0.36, 0.054], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.365248, 0.427802, 0.758297], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.945109, 0.593901, 0.], + CapForm["Butt"], + AbsoluteThickness[1.6]], + Directive[ + Opacity[1.], + RGBColor[0.645957, 0.253192, 0.685109], + CapForm["Butt"], + AbsoluteThickness[1.6]]}, { + Graphics[{ + Thickness[0.025081514923501382`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lG1IU1EYx68vZFYY6abD1805Za4P5czuvbuLZ0lGKBr5ITHz3TSjZqFh +NhMtM5NKSzGXCGUQQqIfEpflC4WkaZrlGxY5TAhRSUWGb2U797QzMHrgfPjd +c85znvN//vdIkrUn0uwoirIxj0jzsDWPk26tQ9QFNdTWmGPVCyzcYJrJ7c8S +w3Lz8XP6ADUoUVyXwLiHLilohIN+FBG+0J7vRaenckChSJRCdfnuvJAvKijl +jrWdeSKFiKGKuN8pKjxvlEInWi9g4cXBlTept/0gf53NGshlQLdkPmjCD6aT +Ho8G/6ThIcqz05/wL1OOsbYigPCDkuLYz5wc59Ez8CNTYapuD4RdUU2VabdY +wnydOo7wJopODqZizBc1+oNb1bBjxifu7/kyvH+cA/e6eHlfuZUNUDT1LlcG +Y85LmkGTlfl5kfofLrTvvre/2sr7AhtcPtr7E47ocVA/GgkkHIV0ClUQFqG6 +khWwPUyWY7vGERahuhaszOs/bWVen0EOglG/XBRYn0wOet4ebjxbJ4fE01/D +7MZV0IrqFSnwdycV2W/Rz8LhqM4DDOH3aP0hGtbmZ7uYUDnhDO1Cce+wP+Ge +NsOdbc0yrO8lGlbR+no/7KPvNMQ4upYom6SA2kBFMthvXb5QgPxgYADZsabU +Fzb4vrMgHZ2Kpjx9IU6sWUzZYOHq5MqEclaC/VWvgnatbr6mSgLZLcL1vgEV +GI8kaPQXJfh+8Ry4XLmf/WFajP3wmoPljsWW9BAfwrkoX5kn4aPPu59RKyKo +Qj704KBY7CDrrxTier1VhHk/V7KEC1DfxxiYu3m+LMjDFdevYcAQzcZsBojA +g/cVDV1lHUXB9e54/w0aJlG9e7zx+kIaBKjepz5Yz2s01s1OjP2b8H+26L+V +A5b8ZvS9PoT5e855E85D9w8XEr4bUxZlkyUgzPtJKcD74qzM+01rZUu/cT4B +oN9KX0JDo/Nep/RvAjiF+jdH4/6+dIMdyN+xDO7XkBD71Z0l+Xi/i1WE+f/v +MkfY8l7xer8Swdb37A+nHRS7 + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1E8og3EYB/AZGRdJxhg1bIfNCjORsN+2In+KOHDwvxYHiwOHyVIkhVD+ +ZmJKcZGDi1IcWOTvYbOyy2o5yFGSUtg7fZ9f3q3ew6fenuf5vr/nt5zewWZb +rEQiiQk/teFHGn6WPuK71vVWZiwWfnIGT6lkmtvlNFaw6P4sSuIu9XvsRreF +7GjbL7lzWdh822xjTHI6OVLOqyA3BZRjPSlacupc3Wvcu5bqZW11am8KddQP +xjxiK1Z8if0hHfsRfjIra7iSVboedeyr3e75nrGQtyv0vo1O7pZh9dpPIXdk +niMz+blnx29cMFN9GP3rhfcOuNlE6HJdyeeP5FGJ8ql4fljtD7VIBvL+5m9l +Ucb7MOqdObPL+toZ9UsX5rzmHv8qH7p/iTbyTO+1Xhsu2P+8Ndya58mtu0zu +hGrNiDRgIkfmCVaRH1PezA+rVVQfRv/d4GnSppd7QTiAQxPZKcx3bKJ8MPLD +2CcY+4Z62Ef0gzGP2Nh35BkNfgaK6+WUF+4+9+bbMhgZ3wvG94TxvVEfRn+c +F4zzhHHeyAcjP+wQ+p3k0j6Jjfdh1MO+oh/2Gca+i408uC/Ii/sEP4WPzdDB +jfsI477C4v+fX9QS7ug= + "]]}, + Thickness[0.025081514923501382`]]}, { + ImageSize -> {59.79691158156912, 24.508064757160646`}, + ImageSize -> {39.86460772104608, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {40., 17.}, PlotRange -> {{0., 39.87}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.0211954217888936], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIVIAaxQYCJAQEYkWhmJDWExHGxiVFPLTOJEaeFv2gd +JshsAKgSAlc= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJHIGYC4hO7dvSyBag5mBiDgKgDjN+qwK56ZoqYg9cJ +dtvZV1Xh/FOHndZmyqnA+W+Kt4r+5lZx6Ivo9mcUEIfzwcZdloDzA25J1yQK +acL5Ij1er1i+aMLNk5kXp3naQAtuH4wPcw86X2LqFc6MR1oOpYe3uc6cqwTn +u685upxBAsF/4BrvOEtQyWGDXt5ixjtaDiu/vaw480DRYc4i5Z1/0rUcolUj +ZM7FSDrI71qwL3WdpEMvyB8feB1YOLvkk/O0HJbeWv7Y0JkXbt6L2sfZ53UQ +/O1eGyzm/OSC89PA4Ic9Oh/mfkg4/4Hzt4H1s8D9xwACDqzw8IHxYeEH48eA +3C0jBefDwhvGh8UPzH50Piy+r/w+dn1e5F/7qvs/bhl7i0L8s5PZAcaHqGeD +8/2feF4yFeaE82U2is1nUuCD88+AgI8APD3B+DD7wfwedgw+zP0wPsx/MD7E +/1oOB7v3NZksRvDB6S4AmO7acruNpMUg/m8Qh5ov6iBSOank7BJxuHvWCenw +pctJoLqvB8EXBquXgJhbIApJF+8kHHYEW0X8Vxdz6Lbx3JXmpASPrw+L1iuc +9cDkw/wD48PyRzooOM2U4P5fC3JPnQKcD7afBZMPc98KUPqdoAAP7xkzgaBS +Cc53ntAslKalDOdXg+jbCL7vxYkx/w6rwvno+R8AL7GK6Q== + "]], + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {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}, {0, 1, 0}, { + 1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQAGIQ7dj06PiM30YOOxyAjAo1Bxi/7rdVwbkTGg6L7+/j +m3PZ0EFi6hXOjEdaDp83BGTPMjeA89PAQAODLzMvTvO0gZbDowjx7RcfIPgp +sXfcmGdowfnbzX8cSlml5SDS4/WK5YsmnB9wS7omUQjBNwaByxJwfl9Etz+j +gDjcvFYFdtUzU8Tg9sH4MPeg803ABoo6zJgJBD81HKru/7hl7C3qsF71SfO8 +t1pw/onDTmsz52nD+T4n2G1nh+rA+VtA7vHSg/OntLdGXb6jBzcfxofZDw6n +JAR/6gT+KrPVOnD+dlA8zNCB+w/Gh/sfyl8rpMOXrqfk8B8E/A3g/NvAYDPa +agjnw+JTChTeAioO6PENAMYO1hQ= + "], {{17.874999999999996`, + 11.2359}, {17.874999999999996`, 10.7359}, {17.874999999999996`, + 9.37656}, {15.9313, 9.37656}, {14.274999999999999`, 9.37656}, { + 14.274999999999999`, 12.618799999999998`}, {14.274999999999999`, + 13.012500000000001`}, {14.298399999999999`, + 13.095300000000002`}, {14.8234, 13.095300000000002`}, { + 15.943800000000003`, 13.095300000000002`}, {17.874999999999996`, + 13.095300000000002`}, {17.874999999999996`, 11.7484}, { + 17.874999999999996`, 11.2359}}}], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4ieJC6+ZxNs73HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHp1na36bbIvhgeXkEf4Ne3mJGGXsH5wnNQmlZCP5/ELBXcJCYF6d5 +msHeofr+j1vGryUcSraK/j49z9ahVYFd9cwUUYfrQp8cz5fZwPk9Xq9YTBZa +w/lcbqqlTFGWUL44nL/y28uKMweU4Hx9rZXCF5ZoOiTE3nFjnmHt8Odb6YM5 +G7Ucltzfxzen2AbO97k4MebfZls4/wwY2DkE3JKuSZyk4cABMo/L3uHUYae1 +mf9UIP7gt3fwOcFuO3srgv/z7esDlotVHPbXylqkmyD4sPBD58P0w/hgWl8V +Vf6qFpzvD3KnszacLzH1CmdGkjYkPB0Q/BMgd+oh+FMn8FeZads76CvKf8kJ +03ZQf8u7z0DS3mG7Q9Oj4xLakPBotnNoYDnab2iu6bDF/MehlF+2kHDo0XJQ +fdI876yWLdw8cHz52cD5+Wu6b2coWMH54HCys3B4AUonc9XhfFj8wPgHuvc1 +mSyWhsS3mpWDiTEIiMDNh/HB7nO2g/Nh/hcBpU8WaQf09AsABWw6Sg== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx1/TkiiLcubw1zbnFJ1ENdESpe97ERFFhv4zIkqtqVmmVqLl +JCpMclRairrMKIuwsgwSf4Q/UCTDWYlLyCCHFWEZpYVYYbV7r90LRQfH+364 +u+ee+z7fO01qdqLJXRAEN2ff5uzznH2sc0mt4T1BbY2zfQuEixtmJgpsOWrc +sbzMEB4RGGg7pYFKnNpju0xgo21rMLynxadpJgKBtmQtjv+IzXmiJjgTt7k9 +7ZoWL/zNKWveimzcoWXz40U8iJnt2Vsagi9N2/dbPwHmaefPaAjC3pyqG7wF +VJctPRa9KJTz3Eyeo7Y8jPPFkuIdw3HhWJxwr8IkiHiXqZ+p6ohA22jpnClf +ZnqsmlzCWTrHRYJxo2/LkCMUXUWBa9NryZ/9dWz9FQK/ul3hA2Uyt+Lk+KMC +Ha7ERdqtd2WWxrv+5RMefedXV8m8KqLB+5lHKOet/Z7xl55HcE4YKt/5c4Oe +s7LSvjAjVY+Ykb6sqCaZ1zu3qb4ts6TnDZl1VB8rQRQ9p7ceXlSfDIL+XtK4 +ry4cr1OujkSpCFpovko9fOm6dpGvd+nnYiqT8AScpfmJwPePH7rXbQjnnJH9 +ufixPZRzf3vr2QVNOqbvAeAbnV8fwnxzHTAuXFFiuKdlfhsF81t3MPPDUpHV +7Uww7q88WO9mFqEdGU8SAoKR0jusN90XUTg2O2r4oGH+mk/QkW3+WFOpwaRX +56oaPwLHxt2iNVfD8kkl8D564cjgGzWLW07wtXOqOT1axbmAxrMEcN50p++m +MKtkfgZBsdpTZ6vwYfn2iJwl/YtkPtzs82MgSMTk6SzLGv8VLH870JoUa/wV +pgSVvboQ6LZ0noyq92Pr84Axmu+yIDb/CKCg+V5XsfwPgfnWXc2+e/7PLv3/ +5rDpkAnrYxVnqQ6TQZyP0fNv8eF8zmhJcMtRcJb8ZFAwfVJklu5jpsyuerN4 +Ctym70c+0Lg8ckn6KwWSaf0awOK0+TJ/O8DqNeTD7jNEHk/ye6/M0v07SDi7 +3itJ74dK/P2e/QbkmhNT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMYzrs5GGitFL7QourwJHHhNZPlbg4+ +J9htZ1/Vcphvo3NlVp0zBl8fpF5Fy4Fl8SQrxrkI/p+Y3KP/uFzg/E8bArJn +8bs4zFmkvPPPc004PzUNCNgQfGMQuCwB5/dFdPszCojDzWtVYFc9M0UMbh+M +D3MPOt8EbKAohF7s7FB1/8ctY29RiHlaLnB+7W+rgnMRCL7ehAU/DPsQ/AO1 +shbpIq5wvptqKdMsB1e4+TA+zP5fIPOFEHyYeTA+WF+3i8OOYKuI/+ricP5a +IR2+9HsScH44p1i7cbySQ+Lhy9qpgq5wfh3IvQsQfAYQ2ODqsDe/5u3MqYpw +vvonlZezNOUdZoLARUx+DSigb6nC1aPzwepuKsPt+w8C/Mpw98D4MPei86Xn +xWmeNtCE88Hm/9KEhwcsffR4vWIxuYjgg+2f4ArnV0SsMD2b7YYqP8PNwcxm +b9C0hxoOIp8cz6etRaRf9PQMABZuGmU= + "]]}, + Thickness[0.0211954217888936]]}, { + ImageSize -> {70.77471481942715, 24.508064757160646`}, + ImageSize -> {47.183143212951435`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {48., 17.}, PlotRange -> {{0., 47.18}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.020288090890647186`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lH9Ik0EYx2dKIaVh23T4a+6XY05EnWiJ4fO+LyGRaGR/DIlSa2qGaVRg +ZlSKiY5SS9Et0cogJEWDxB/hGomkOCvThAxyqVHmjDTzR2a1e8/dC0YHx/t+ +uLvnnvs+3ztJWs4hnTOPx3Oy9wR732LvVpN7nSaLgTqDva36gYOblmbyLLkB +0Kx/l8mLY0CDWpEExNT8cYsfAxbU4qXAX6Bepn+kgYdaigwur0XnvrhDQ2nM +/u70ezJ461OQGq7bGLfK8PweCh5HrTw7USaH720HTxlzKChYsP+My0E5XVQ/ +FERBbcXO/MjtgYTXl85b6yqVhG+VFCePxKhgR2Jrle4KBZ+y1Es1PUHQNV62 +rlvmGB3LME8TZs/BZ2BS69UxbA2Ep5f8dmf4Mhv7K/B6MQPe9UdVgxUcd0Lh +5PM8BTTEBI8aQzhmx2P/5asufeVhNRyHBjXxX7kEEo7v37b39psgwonDlUd+ +M2rCoupR18w0NUSN9WVHhHIca9+mVs0xq6eCYwXSx5uBCPacanBD+nymob+X +bjlZr4Kp1LtjEQ00dKB8RWrwQuuiabLeoZ+DkUy8BI7Z+a8Bfs7NmvcwKsKZ +Od+KB0YDCfd3d17f2qbA+toAVtH8Rjn2jZwCratniaZVBhPIb8kU9ptZiv1Q +TuG6lUrhUcjpRqdfFMjGJpN4vlJI7R1R68JouDixMq6ZlWB/FdPQk1MwZ6iW +gM3NFGow0mDdd4wynpHgfCZp4F+4eW5oOgDH9WBg0TTfnhEpJpyH4ul9Ccc1 +9z3grYiwn800FAdsU1iqhDhfmmNW/3WK8Nl24dpgPQW2a9n6cB9PnP9hCjqT +orV/lCJAsteuAZj1psKIRm+8/gfABMrXwx/PXwQQoHzvi3H+C4B96xyAv1P/ +Z4f+m1m5IJ8xDogJs3Ww+RPOR+c/ICR8Q6tPdMoVEGb9pBFgfT5wzN7HLxw7 +6o3jCeAhej+WAVp2BbtnvBdACqqfaqO+XV7Y3ykUrtewEN9nM0XisX5naMLs +/fvKseO9YvV+IoLN79lfuGMTfg== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1D1IQlEUB/BnSSIFWWQGFfQ5aCGVDSEVj/KDPkDJIYfoC0QhzYYgimqr +QaMiDKKiBIeWoBoiwikikBRBNAcbBGlqjIjKil5P/vfiS3jDDx7nnP9951o/ +7R6xFTIMI+KeAe4p4J6QUrsTThvZTs3fT87Ca3WS5oivkp26jbfYbqid0g+/ +3UJ96n10MCYju2n1mkQyBTFfLl5FbE5VL0+VK4krNgafxa9KUq/maFwZblOR +fjDmEbpqNyF1ZFS5uYNGdjgk6Tl4ULHqbf97ey91zD0hiZZRr5+M3nc8GYj5 +eezUfN0+A6kPo/9qVjsXnaSev5Rnw1FqPk/ckJ+PM/LDTcmMhXE25uYv1v8z +3odR7+XcPLNfqif9+LlXqC/UswHR4X8jz3XK821b0Ofn/dQRWxVXMSZK3ZW8 +c3X6qfl5GqmPu1sT+z/9pD6M/uLAjlZUqyP+GnPd/Xio+Txbuvx8nJEfxj7B +2DfUwz6iH4x5hMa+I89S+j2lGZKTvLDvrWhiL0KN84JxnjDOG/Vh9Mf3gvE9 +YXxv5IORH1786xdsIPskNN6HUQ/7in7YZxj7LjTy4L4gL+4TXGI689lkRmLc +Rxj3FRb+//wC/tjGNg== + "]]}, + Thickness[0.020288090890647186`]]}, { + ImageSize -> {73.94074221668743, 24.508064757160646`}, + ImageSize -> {49.29382814445828, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {50., 17.}, + PlotRange -> {{0., 49.290000000000006`}, {0., 16.34}}, AspectRatio -> + Automatic}], + Graphics[{ + Thickness[0.01766472354707649], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIlIAaxQYAJSjNCxZjR2DA5YtWQqn6o2EtP9wAAlDYC +dw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJvIGYCYmbOLvnkPk0HmXlxmqcNtBxgfImpVzgzHmk5 +eOyvlbVo13DwOcFuO/uqlsP5q2Fv9KsR/CeJC6+Z5KvD+Sd27ehlu6AG56em +AUGbKpwv2uP1iuWLCtx8GB9mf8Nvq4JzGWoO0yfwV5lpaznoKMp/ybmm5jBn +kfLOP+macP561SfN895qwPlPQe44r+Hge3FizL/Dag6nDjutzZyn4ZASe8eN +eYcaxJ4SDQf3NUeXM0goO5wBAR8phy/7Pm5NL5NzMNBaKXxBRdOh5v6PW8bZ +cg4NLEf7Dc01HR64xjvOCpSD2w/jV3/aEJBdheDD3H8aZG6OApwfzinWbvwf +kw/zP0w9LHwg5snC+f0R3f6MH6ThfPldC/al9knB+SKVk0rOLhGH83cEW0X8 +TxeDmw/jw+wH638nAefPBANJB5nlLzz05LUc/oOAvBREfoOmQ7sCu+qZEikH +M5u9QdMSoeFzWgoSXks0HNQ/qbyclSntUAeKtxPqDm6g8J0hAg/fF7WPs8+/ +4YSkAzZNB2MQKOaEpKNoBB8WvjA+LHxhfJh7C5aXbPjnzwfnp4PMTRPA4MP8 +PwPsPz54+IC5kexwfh8ofDewwPncjnxeM14ywvlg+41/2MP4Fkm6dqwOn+1h +5sP4MPtZ9H9xXer5C+eD09c0Brj7tnttsJizk9EhISRIfYGnJiQ+/IQc3rTl +dhtJizpUgsK3W8jhYPe+JpNkEYj4biEHE7A7RCDhrSkM50PUI/jg+D4uDImH +CBFI+mARcVAA2cMnCk9P4Hz9XA3iv8+KcHlw+hNUgutnAAEDJbj5K7+9rDiT +gOCD89MMBB+sfoMS3P3g9H5eCe6/LeY/DqV4qTu8Lt4q+rtbw+EViF6tDk9v +k9tboy7HaMDzP3r5BABanNau + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4trfVgXnKkwc7rvGO85SVHCA8YUrJ5WcTUHw +Z4JAp4JDI8vRfsNwBB8sb4Hg+5xgt51tauLgPKFZKC0Lwf8PAvYKDlvMfxxK +kTJxqL7/45bxawkHHv/1U1J3GDm0KrCrnpki6lCwpvt2xgRDOF/1SfO8s7sM +4Hz3/bWyFs91oHxxOH/lt5cVZw4owfn6WiuFLyzRdPj7rfTBnI0GDn/AtJaD +bWXECtNeQzj/eZb2t+lnjeD89DQgeGbsEHBLuiZxkobDkvv7+OYomzicOuy0 +NvOfCsSfmiYQf21F8H++fX3AcrGKQ4T49osMfgg+LPzQ+TD9MP6TxIXXTPRV +UeWvasH5/hcnxvxz1obzJaZe4cxI0oaEZxSCnxJ7x43ZA8E3AIWDi4mDvqL8 +l5wwbYdDbcvDTxmZOGx3aHp0XEIbEh5zjR0aQPFqrgmxR9jY4QwI9Gg5gIIz +3cUIbh4vKL4yDOF8kR6vVywlenD+8V07etk2aDm8AIXrXHU4HxY/MP6B7n1N +JoulHR6AAqxBz8HEGARE4ObD+GD3xRrD+TD/i4DSJ4u0A3r6BQDbAjkT + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIZIAaxQYAJSjNCxZiR+PjESVVDLTNJtYue5gMAwesC +Iw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYC4gjx7RcZztk43NGUXfN/s4LDlAn8VWbdCP6f +b6UP5jjaOLivObqc4YekA4//+impP6wdWhXYVc9MEXPQ11opfOGLJZzvfYLd +dnaoBZzfF1yiMv28OZw/EwROmjvU3P9xy/g1gh+tGiFzrkYCzl8rpMOXvk7J +4XHiwmsm9y3gfP+LE2P+MVvB+T4g+1StHB64xjvO+qgI56t/Unk566S8Q/1v +q4JzGZj8hJAg9QWaanD16Pwp7a1Rl2VU4PYxgECCMtw9MD7Mveh86XlxmqcN +NBH+/bQhIPuXJjw8wOGmogUPLxjfvunR8RmvLeH8GAXHj8lrrOF8lSfN885y +2TiI9ni9Yvmi4VAL8o+FjYMBSL5FFaK/GsEH69exgfjrqpZD4Zru2xkbTDH4 +MPNtKyNWmL5F8DXe8u4zOGkG50tMvcKZccnMYc4i5Z1/nmvC+alpQMCG4BuD +wGUJOL8votufUUAcbh4sPcDsg/Fh7kHnm4ANFHXwAcVHsA2cj55+AW0nHFI= + + "]], + + 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}, {1, 3, 3}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJdIGYCYtUnzfPOJrk43HeNd5ylqOAA4wtXTio5m4Lg +zwSBTgWHZS889P4HIvhgeScEv8frFYuJo4uD84RmobQsBP8/CNgrODg0PTo+ +w9jFofr+j1vGryUc3vDuM5jZ5OzQqsCuemaKqMN8G50rs945wfkVEStMzzYj ++ObXjuaaJDhC+eJw/spvLyvOHFCC8/W1VgpfWKLp8Dhx4TWTeieHP99KH8zZ +qOXAsniSFeNbBP+mdE2iUa8znA/2h6SLQ8AtoMQkDQcLkHkWLg6nDjutzfyn +4mBiDATWLg4+J9htZ29F8H++fX3AcrGKg8gnx/Npvgg+LPzQ+TD9MP4TkDv1 +VVHlr2rB+f4XJ8b8c9aG8yWmXuHMSNKGhGcwgg+mvRD8ut9WBec8XBz0FeW/ +5IRpO5zQtJp02t7FYTtIo4S2AysoPL46OzSwHO03NNd04PFfPyV1g7PDGRDo +0XJwVy1lmuXhDDcPHF+3nOD8bM6fC9IPO8L54iD6koPDiyztb9PnqsP5sPiB +8Q9072syWSwNie9jjpBwNBaBmw/jg9131RnOh/lfBJQ+WaQd0NMvAH2MNnI= + + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJZIIaxWZDYzFDMAOUzoImTyibGHGrZRS02tdwMABjq +AoU= + "], CompressedData[" +1:eJx1lGtIVEEUx68piZRGuuric9+mK6LupmYKx2TuJZKs/CJi+cj1iS8wMLMi +xUSXTEtRNxHLIgxFg8RHKEuypLhmogkZ6CJCiAopIZpYOXfcuWA0MNz7Y+ac +Oed/zow0vfCazpZhGJuDeflgHjuYllGnNs0bDtpaD8auN1i5a3u11FwkgW79 +t2ymmgMNHpVSkMRs3jRf58CMR5wMnLdipjOVHDB4pMrh3l5k0ScLCzVRF4cz +X8jhq2d5Wugrlqxb5GT/PoJ34TsfMmoVsNV3Jc/Qi6Ac/ywoQLVS2T6Vi6Cl +/lRZ2AkV5f3tW5a2Bj/KT6urkmaj/OFkfG+jzojge656u3kkAIYWavd14Sxl +nFZrCEdZi/NI4GA50X1gxqIC413viKxk7vB8JbFP4cCj/Yb/ZL3Ag1Cx/LFU +CR1RgXOGAoH59fv/8gM70+OQZoGDA7pcPtupKMeN20c/+xJAOX6mIfl3rJqy +uGnOITtdDRHzpnxtkcD4mJY8gXk9dQIrsT5JHMnTRQ2OWJ8zHIyPXejJafeH +lbTn89olFgawI7Ga2JWx1N6qn5WxTEwdosx/nRH82lgznov1p5xd+KNqYk5F +eXx48NHxPiXRNxDBLt7fqSB9k4Eg0cGtWtMrJ/1mQKTfjDLSD9OI1K1GBm+D +CjptoliQzy8nMF4ySBubVeuKWbiztLOgWZOS/jKxMFJYvtHaJIV1x9Hg1gUW +LCglxlAsJfHIOHC5/aRkakVC/F7l4OfoZn9WmC/lUuxP70WZ6za9ZnbEpJ8Z +Dqok9kpzoyuJt4KlzOsfLXBJv+ve5CKC9Yf5+lBPNxJ/I4LBhMjEP35iUr/z +CIz60QptpweIsP1ZBEs43tM+ZL8WgQjH+9KXxB+KyP2zlZC6yv/PVv2Pst+W +YtUw4UuZr8O6D+UynP8lV8p1ifp4myIRZf4cjYjoIxWYv48BAlvrTfyJyPsR +jqDHOdApa1EEqbh+OYf1HXIn/d2BSL1mXMl9Zljqj9erUmD+/gVxlK3vFa/3 +ezEcfc/+AtcKCWg= + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4jXdtzMY+r0dDLRWCl9oUXV4krjwmkm6t4PP +CXbb2Ve1HObZ6FyZZeeBwdcHqVfRcmBZPMmKMRbB/x2Te/TfKQT/04aA7Fnn +PRzmLFLe+ee5JpyfmgYEbAi+MQhcloDz+yK6/RkFxOHmtSqwq56ZIga3D8aH +uQedbwI2UBRibrKHQ9X9H7eMvUUh5r1C8Gt/WxWck/CE8/UmLPhh6Ifg76+V +tUi/guC7qJYyzWLwgpsP48Ps/wMy/5InnA8zD8YHa/P2dNgRbBXxX10czl8r +pMOXfk8Czg/nFGs3jldyiD98WTv1IoJfD3Jvghec/x8E8r0c9ubXvJ05VRHO +V/+k8nKWprzDjJlAMBGTXwMK6FuqcPXofJCymTeV4faBxfmV4e6B8WHuRedL +z4vTPG2gCeeDzf+lCQ8PWPro8XrFYjIRwQeb4+8F55dHrDA9q+2NKh/u7WBm +szdo2kMNB4FPjufTchHpFz09AwB1mziC + "]]}, + Thickness[0.01766472354707649]]}, { + ImageSize -> {84.91854545454547, 24.508064757160646`}, + ImageSize -> {56.61236363636364, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {57., 17.}, PlotRange -> {{0., 56.61}, {0., 16.34}}, + AspectRatio -> Automatic}]}, LegendMarkers -> None, + LabelStyle -> {FontFamily -> "Times"}, LegendLayout -> "Column"]], { + Right, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", + CellChangeTimes->{3.804412698550664*^9}, + CellLabel->"Out[68]=",ExpressionUUID->"a624d5fa-caee-4f11-a8e9-4a360194a3b0"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"N", "[", + RowBox[{ + RowBox[{"DomSing", "[", + RowBox[{"R", ",", "HMPcsf", ",", "8"}], "]"}], ",", "3"}], "]"}], ",", + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{ + "0.1", ",", "1", ",", "2", ",", "3", ",", "5", ",", "10", ",", "100", + ",", "1000"}], "}"}]}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.8045657459811*^9, 3.8045658436727057`*^9}, + 3.804567446059846*^9}, + CellLabel->"In[44]:=",ExpressionUUID->"ab6cff43-058d-4df7-b666-5416632c33d5"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 44, 18, + 22585797423451403335, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804565846624468*^9, 3.804566981301155*^9, + 3.804567458147882*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"0a767b19-fb8b-4cd6-8dd8-22580f7d2652"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"0.`\\\", \\\"\ +\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.45126077735968606`\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}]}], \\\")\\\"}], \\\" \\\", RowBox[{\\\"(\\\", \ +RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"5.019354703372597`*^6\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"37\\\", \ +\\\"\[RightSkeleton]\\\"}], \\\"+\\\", RowBox[{\\\"8294.755333088428`\\\", \\\ +\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"6\\\"]}], \\\"-\\\", \ +RowBox[{\\\"466.1477068100365`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"6\\\"]}], \\\"-\\\", \ +RowBox[{\\\"201.73814152959997`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"7\\\"]}]}], \\\")\\\"}]}], \\\"+\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"+\\\", RowBox[{RowBox[{\\\"(\\\", \ +RowBox[{RowBox[{\\\"59.86666666666667`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\ +\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"-\\\", \ +RowBox[{RowBox[{\\\"\[LeftSkeleton]\\\", \\\"19\\\", \ +\\\"\[RightSkeleton]\\\"}], \\\" \\\", \\\"\[Lambda]\\\"}]}], \\\")\\\"}], \\\ +\" \\\", RowBox[{\\\"(\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\ +\[RightSkeleton]\\\"}], \\\")\\\"}]}]}], \\\",\\\", RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\"}]}], \\\"}\\\"}]\\)) \ +is less than WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 44, + 19, 22585797423451403335, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804565846624468*^9, 3.804566981301155*^9, + 3.80456746025906*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"2e5e9f48-f0ca-48c5-a195-c97dfa2ff351"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"0.`\\\", \\\"\ +\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"0.22563038867984303`\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}]}], \\\")\\\"}], \\\" \\\", RowBox[{\\\"(\\\", \ +RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", \ +RowBox[{\\\"2912.1814252874033`\\\", \\\" \\\", \\\"\[Lambda]\\\"}], \ +\\\"+\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"37\\\", \ +\\\"\[RightSkeleton]\\\"}], \\\"+\\\", RowBox[{\\\"38.186301141420785`\\\", \ +\\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \\\"6\\\"]}], \\\"-\\\", \ +RowBox[{\\\"7.283557918906817`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"6\\\"]}], \\\"-\\\", \ +RowBox[{\\\"1.5760792306999987`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"7\\\"]}]}], \\\")\\\"}]}], \\\"+\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"10\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"+\\\", RowBox[{RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"15.933333333333334`\ +\\\", \\\"\[VeryThinSpace]\\\"}], \\\"-\\\", RowBox[{\\\"1.`\\\", \\\" \\\", \ +\\\"\[Epsilon]\\\"}], \\\"-\\\", RowBox[{RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"19\\\", \\\"\[RightSkeleton]\\\"}], \\\" \\\", \\\"\[Lambda]\\\"}]}], \ +\\\")\\\"}], \\\" \\\", RowBox[{\\\"(\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"1\\\", \\\"\[RightSkeleton]\\\"}], \\\")\\\"}]}]}], \\\",\\\", RowBox[{\\\ +\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\"}]}], \ +\\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 44, 20, 22585797423451403335, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804565846624468*^9, 3.804566981301155*^9, + 3.804567462351288*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"edce2f57-0bd4-4fcc-802f-d4702e3593d9"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 44, 21, 22585797423451403335, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804565846624468*^9, 3.804566981301155*^9, + 3.804567462476474*^9}, + CellLabel-> + "During evaluation of \ +In[44]:=",ExpressionUUID->"f10d704a-6a2b-4c6b-97d1-e0977bbf255c"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"14.0806315102728403949`3.049230748774677", "-", + RowBox[{ + "10.8548273925992453826`2.9362315375480113", " ", "\[ImaginaryI]"}]}], + ",", + RowBox[{"2.3845889681169292747`3.0809578331551646", "-", + RowBox[{ + "1.465255842010602272`2.8694577643190815", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.6731440699147687558`2.812382527333106"}], "-", + RowBox[{ + "1.3027231541069763998`3.0991266353186706", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + RowBox[{"-", "0.4847053962468601055`2.831987279975485"}], "-", + RowBox[{ + "0.8852560122580022239`3.0935783101775582", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + RowBox[{"-", "0.3331914730212704881`2.8628803617867935"}], "-", + RowBox[{ + "0.5536099441955730774`3.083390365814642", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.2162243520027015826`2.911961181565832"}], "-", + RowBox[{ + "0.3057802175934989243`3.0624659626771975", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"0.0258517100723338244`2.818252999224754", "-", + RowBox[{ + "0.0491777069397023306`3.0975319971442734", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{"0.0046491072054217539`2.714109043192663", "-", + RowBox[{ + "0.0118175654615417391`3.1192674990301685", " ", "\[ImaginaryI]"}]}]}], + "}"}]], "Output", + CellChangeTimes->{3.804565860716052*^9, 3.804566995565587*^9, + 3.8045674729026947`*^9}, + CellLabel->"Out[44]=",ExpressionUUID->"b90a9635-6899-443a-80e1-eec01da6bc7d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Table", "[", + RowBox[{ + RowBox[{"N", "[", + RowBox[{ + RowBox[{"DomSing", "[", + RowBox[{"R", ",", "HWCEcsf", ",", "8"}], "]"}], ",", "3"}], "]"}], ",", + + RowBox[{"{", + RowBox[{"R", ",", + RowBox[{"{", + RowBox[{ + "0.1", ",", "1", ",", "2", ",", "3", ",", "5", ",", "10", ",", "100", + ",", "1000"}], "}"}]}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.804567423299889*^9, 3.804567437276922*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"675b4da9-21e7-4a4c-8d2b-d1dfc5607ba9"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \ +\\\"\[RightSkeleton]\\\"}], \\\",\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\ +\\\", \\\"\[RightSkeleton]\\\"}]}], \\\"}\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 43, 14, + 22585797423451403335, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804567441894846*^9}, + CellLabel-> + "During evaluation of \ +In[43]:=",ExpressionUUID->"9b1a2780-c656-4ea1-abb6-d994e88cde09"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"{\\\", \ +RowBox[{RowBox[{RowBox[{RowBox[{\\\"(\\\", RowBox[{RowBox[{\\\"0.`\\\", \\\"\ +\[VeryThinSpace]\\\"}], \\\"+\\\", RowBox[{\\\"1.0253250611469975`\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}]}], \\\")\\\"}], \\\" \\\", RowBox[{\\\"(\\\", \ +RowBox[{RowBox[{\\\"0.`\\\", \\\"\[VeryThinSpace]\\\"}], \\\"+\\\", \ +RowBox[{\\\"124023.31939634083`\\\", \\\" \\\", \\\"\[Epsilon]\\\", \\\" \ +\\\", \\\"\[Lambda]\\\"}], \\\"-\\\", RowBox[{\\\"102171.591693176`\\\", \\\" \ +\\\", SuperscriptBox[\\\"\[Epsilon]\\\", \\\"2\\\"], \\\" \\\", \\\"\[Lambda]\ +\\\"}], \\\"+\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"36\\\", \\\"\ +\[RightSkeleton]\\\"}], \\\"+\\\", RowBox[{\\\"1.5752744571776034`\\\", \\\" \ +\\\", \\\"\[Epsilon]\\\", \\\" \\\", SuperscriptBox[\\\"\[Lambda]\\\", \ +\\\"6\\\"]}], \\\"-\\\", RowBox[{\\\"0.1638939847448867`\\\", \\\" \\\", \ +SuperscriptBox[\\\"\[Lambda]\\\", \\\"7\\\"]}]}], \\\")\\\"}]}], \\\"+\\\", \ +RowBox[{\\\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\"}], \\\"+\ +\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \\\"9\\\", \\\"\[RightSkeleton]\\\"}], \ +\\\"+\\\", RowBox[{RowBox[{\\\"(\\\", RowBox[{\\\"56\\\", \\\"-\\\", RowBox[{\ +\\\"1.`\\\", \\\" \\\", \\\"\[Epsilon]\\\"}], \\\"+\\\", \ +RowBox[{\\\"1.9271727209854121`\\\", \\\" \\\", \\\"\[Lambda]\\\"}]}], \ +\\\")\\\"}], \\\" \\\", RowBox[{\\\"(\\\", RowBox[{\\\"\[LeftSkeleton]\\\", \ +\\\"1\\\", \\\"\[RightSkeleton]\\\"}], \\\")\\\"}]}]}], \\\",\\\", RowBox[{\\\ +\"\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\"}]}], \ +\\\"}\\\"}]\\)) is less than WorkingPrecision \ +(\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 43, 15, 22585797423451403335, + "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8045674440628138`*^9}, + CellLabel-> + "During evaluation of \ +In[43]:=",ExpressionUUID->"26528ecf-a032-48ac-8a58-bea3c2aa544b"], + +Cell[BoxData[ + TemplateBox[{ + "NSolve", "precw", + "\"The precision of the argument function (\\!\\(\\*RowBox[{\\\"\ +\[LeftSkeleton]\\\", \\\"1\\\", \\\"\[RightSkeleton]\\\"}]\\)) is less than \ +WorkingPrecision (\\!\\(\\*RowBox[{\\\"30\\\"}]\\)).\"", 2, 43, 16, + 22585797423451403335, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.80456744616896*^9}, + CellLabel-> + "During evaluation of \ +In[43]:=",ExpressionUUID->"89cb098a-ba07-4ebc-ab7e-547465a6903c"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"NSolve\\\", \\\"::\\\", \ +\\\"precw\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \ +calculation.\"", 2, 43, 17, 22585797423451403335, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.804567446287362*^9}, + CellLabel-> + "During evaluation of \ +In[43]:=",ExpressionUUID->"7eb4729a-7a17-4602-a988-398d323561e1"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"-", "9.5508946075432691412`2.974561742519786"}], "-", + RowBox[{ + "10.672117282032169901`3.022768279102709", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.9550894607543301504`2.9745617425197866"}], "-", + RowBox[{ + "1.0672117282032179285`3.022768279102708", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.477544730377164642`2.9745617425197866"}], "-", + RowBox[{ + "0.5336058641016085711`3.022768279102708", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.318363153584775865`2.9745617425197866"}], "-", + RowBox[{ + "0.3557372427344051331`3.022768279102708", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.1910178921508656675`2.9745617425197866"}], "-", + RowBox[{ + "0.2134423456406433038`3.022768279102708", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.0955089460754330336`2.974561742519787"}], "-", + RowBox[{ + "0.1067211728203215872`3.0227682791027073", " ", "\[ImaginaryI]"}]}], ",", + RowBox[{ + RowBox[{"-", "0.0095508946075432702`2.9745617425197852"}], "-", + RowBox[{ + "0.0106721172820321749`3.022768279102708", " ", "\[ImaginaryI]"}]}], ",", + + RowBox[{ + RowBox[{"-", "0.0009550894607543281`2.9745617425197874"}], "-", + RowBox[{ + "0.0010672117282032145`3.0227682791027086", " ", "\[ImaginaryI]"}]}]}], + "}"}]], "Output", + CellChangeTimes->{3.8045674560426817`*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"f7d98e70-d285-494c-8e8b-ee408a7f14a7"] +}, Open ]] +}, Open ]] +}, +WindowSize->{1200., 636.75}, +WindowMargins->{{0, Automatic}, {0, Automatic}}, +TaggingRules->{"TryRealOnly" -> False}, +FrontEndVersion->"12.1 for Linux x86 (64-bit) (March 18, 2020)", +StyleDefinitions->"Default.nb", +ExpressionUUID->"5e211ade-9e23-40f1-a093-6fa1873c5633" +] +(* End of Notebook Content *) + +(* Internal cache information *) +(*CellTagsOutline +CellTagsIndex->{} +*) +(*CellTagsIndex +CellTagsIndex->{} +*) +(*NotebookFileOutline +Notebook[{ +Cell[CellGroupData[{ +Cell[580, 22, 157, 3, 98, "Title",ExpressionUUID->"6dba7327-84eb-42a4-9d52-a17e6ddb1f50"], +Cell[740, 27, 417, 11, 46, "Input",ExpressionUUID->"74052da7-e177-462b-aedd-63ebc6d138ac", + InitializationCell->True], +Cell[1160, 40, 359, 9, 46, "Input",ExpressionUUID->"ad475565-c84e-4d51-a257-4c3ed8f0037c", + InitializationCell->True], +Cell[1522, 51, 759, 16, 108, "Input",ExpressionUUID->"c5807b5d-14b9-4d19-84e3-327d44a92896", + InitializationCell->True] +}, Open ]], +Cell[CellGroupData[{ +Cell[2318, 72, 164, 3, 98, "Title",ExpressionUUID->"1127f5a4-e9d6-44ee-bafc-74d0b6d991e1"], +Cell[2485, 77, 393, 10, 46, "Input",ExpressionUUID->"17a9a8c0-5a36-4358-a4f3-f51b18bf8a93", + InitializationCell->True], +Cell[2881, 89, 450, 13, 46, "Input",ExpressionUUID->"7a475b23-a007-4768-85bd-82ac8c3db795", + InitializationCell->True], +Cell[3334, 104, 554, 16, 66, "Input",ExpressionUUID->"8dbeba3a-5485-4cfd-ab87-e1d4b4e11eae", + InitializationCell->True], +Cell[3891, 122, 643, 20, 63, "Input",ExpressionUUID->"60d881a4-2790-41d4-96cd-3452d9f66da5", + InitializationCell->True], +Cell[4537, 144, 556, 13, 29, "Input",ExpressionUUID->"23acc056-7dd6-45b3-93ee-de0c19f80c01"], +Cell[5096, 159, 3020, 87, 268, "Input",ExpressionUUID->"8b33ed16-8049-49bc-b98d-06f7b7f951f6", + InitializationCell->True], +Cell[8119, 248, 877, 24, 61, "Input",ExpressionUUID->"022ec2a6-f437-4f30-a1ef-1856225f22ba", + InitializationCell->True], +Cell[8999, 274, 1410, 39, 236, "Input",ExpressionUUID->"9b77b2d2-5bd1-4df8-9b69-0f30339dcb70"], +Cell[10412, 315, 927, 28, 55, "Input",ExpressionUUID->"fc80a633-b236-4b5e-8093-837528eba331"], +Cell[11342, 345, 484, 13, 29, "Input",ExpressionUUID->"fdc1111b-5988-4550-b785-dc186734e360"], +Cell[11829, 360, 5044, 108, 723, "Input",ExpressionUUID->"fd53c6d1-f2cf-48f2-b4ff-64901727752a", + InitializationCell->True], +Cell[16876, 470, 923, 28, 49, "Input",ExpressionUUID->"8c748381-428e-4587-ab77-589a7aee771a"], +Cell[17802, 500, 5024, 108, 723, "Input",ExpressionUUID->"cee6101f-dde7-4083-9781-24562e050470", + InitializationCell->True], +Cell[22829, 610, 1539, 39, 67, "Input",ExpressionUUID->"d5f4a381-9302-4181-9b7c-30defacf3510", + InitializationCell->True], +Cell[24371, 651, 879, 25, 67, "Input",ExpressionUUID->"5c8f3365-cc2c-404c-9ffa-cf0230be3731", + InitializationCell->True], +Cell[25253, 678, 871, 25, 67, "Input",ExpressionUUID->"f6ba07cb-f7c0-4c47-b909-a492963d4cd1", + InitializationCell->True], +Cell[26127, 705, 1844, 50, 67, "Input",ExpressionUUID->"98e09b3a-1cb8-46a6-ab74-27973ed7a6a9", + InitializationCell->True], +Cell[27974, 757, 2033, 53, 149, "Input",ExpressionUUID->"68497eca-5b08-4de6-a371-85920d09fc51", + InitializationCell->True], +Cell[30010, 812, 2053, 53, 149, "Input",ExpressionUUID->"f54b0f77-159c-4fe7-b395-a8606b42a8bd", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[32088, 869, 2890, 70, 133, "Input",ExpressionUUID->"1cdee34d-e9f1-48cc-9cc8-f50d2f3333e6"], +Cell[34981, 941, 1382, 25, 28, "Message",ExpressionUUID->"4746b1ad-fccb-4e32-9035-a4a17218fb00"], +Cell[36366, 968, 1370, 24, 28, "Message",ExpressionUUID->"d8304a83-4f1e-4903-b77d-b58010d072f9"], +Cell[37739, 994, 1279, 24, 28, "Message",ExpressionUUID->"94127d7d-7040-49ff-bb27-5dd4e2107bf4"], +Cell[39021, 1020, 598, 13, 22, "Message",ExpressionUUID->"b62d1725-581c-40da-944c-add60cb08977"], +Cell[39622, 1035, 93093, 1798, 395, "Output",ExpressionUUID->"b1dc4a4b-8a09-483e-a373-03c1369ade74"] +}, Open ]], +Cell[CellGroupData[{ +Cell[132752, 2838, 2769, 68, 133, "Input",ExpressionUUID->"470d92b2-cb80-4095-8134-dfd878482847"], +Cell[135524, 2908, 1324, 23, 28, "Message",ExpressionUUID->"4b47c086-c950-433b-aba9-19cc1aeb8b04"], +Cell[136851, 2933, 1313, 22, 28, "Message",ExpressionUUID->"45b2c23a-2d94-4893-beeb-546c69872b53"], +Cell[138167, 2957, 1222, 22, 28, "Message",ExpressionUUID->"374780ea-1e26-434e-acdf-124cd8b37e98"], +Cell[139392, 2981, 543, 11, 22, "Message",ExpressionUUID->"d7766a34-3cfa-4915-bbb5-5e3518ff67d0"], +Cell[139938, 2994, 91397, 1761, 395, "Output",ExpressionUUID->"eb4a6c7b-46c6-436a-bf56-42b9581f1147"] +}, Open ]], +Cell[CellGroupData[{ +Cell[231372, 4760, 3093, 73, 133, "Input",ExpressionUUID->"85d4f3d6-48e8-4187-94da-cc64f1445091"], +Cell[234468, 4835, 2295, 38, 67, "Message",ExpressionUUID->"4feb2285-0132-4739-867a-4b96a567e700"], +Cell[236766, 4875, 2283, 38, 67, "Message",ExpressionUUID->"b9d8f995-5777-49a8-9910-902cd7ed8b8b"], +Cell[239052, 4915, 2190, 37, 67, "Message",ExpressionUUID->"7365d419-5fd3-4964-bbf6-5ce922def7dc"], +Cell[241245, 4954, 672, 14, 22, "Message",ExpressionUUID->"182980a6-4cf8-43cb-af55-e90dcb7870a8"], +Cell[241920, 4970, 93740, 1808, 395, "Output",ExpressionUUID->"159737a0-a258-424f-899a-c43544b1c373"] +}, Open ]], +Cell[CellGroupData[{ +Cell[335697, 6783, 3308, 78, 133, "Input",ExpressionUUID->"44e7f84a-c2ef-43a2-979d-6c659182d37b"], +Cell[339008, 6863, 1395, 24, 28, "Message",ExpressionUUID->"84dcf1d1-6d6f-4efc-b321-ad6ab4cd761d"], +Cell[340406, 6889, 2236, 36, 67, "Message",ExpressionUUID->"161d6dd1-7ed3-4527-9f37-cc65fac18dd5"], +Cell[342645, 6927, 3385, 53, 69, "Message",ExpressionUUID->"ea13e6de-a4d3-4b20-a533-06926738ca4f"], +Cell[346033, 6982, 613, 12, 22, "Message",ExpressionUUID->"83165f37-86f6-49a5-9f65-e8d5a77b00b2"], +Cell[346649, 6996, 108900, 2067, 403, "Output",ExpressionUUID->"1aeed3df-dfd2-4395-87a3-9358fff0e6e5"] +}, Open ]], +Cell[CellGroupData[{ +Cell[455586, 9068, 3139, 76, 133, "Input",ExpressionUUID->"92c59298-abbe-4495-b886-07d739dec292"], +Cell[458728, 9146, 1338, 23, 28, "Message",ExpressionUUID->"6ab4bc26-fccc-4b5f-9e97-0229a5bb7b4c"], +Cell[460069, 9171, 2179, 36, 67, "Message",ExpressionUUID->"c91718de-f00b-4724-8c66-c668683092e4"], +Cell[462251, 9209, 3348, 54, 69, "Message",ExpressionUUID->"329ce5e1-96cf-4365-98a0-d01f4c0ffba7"], +Cell[465602, 9265, 568, 12, 22, "Message",ExpressionUUID->"b0d8485d-1619-4553-9103-bc2a1bfe2224"], +Cell[466173, 9279, 106329, 2022, 389, "Output",ExpressionUUID->"dd3f3285-79c9-4b6e-ba64-b94f50fb689c"] +}, Open ]], +Cell[CellGroupData[{ +Cell[572539, 11306, 2856, 74, 140, "Input",ExpressionUUID->"c134c56c-5719-49bf-818c-5c0ec16aaded"], +Cell[575398, 11382, 1256, 22, 28, "Message",ExpressionUUID->"ef8af98c-88b1-462d-b076-239190ab1a29"], +Cell[576657, 11406, 2096, 34, 67, "Message",ExpressionUUID->"8f87a303-7d23-4a2d-b471-02d3ed6b2bf4"], +Cell[578756, 11442, 3246, 51, 69, "Message",ExpressionUUID->"a45c0d09-b1c2-4c24-aa3e-d9fd476d21d1"], +Cell[582005, 11495, 474, 10, 22, "Message",ExpressionUUID->"9407f8a1-a721-4105-ab52-46f3378be21d"], +Cell[582482, 11507, 115470, 2127, 403, "Output",ExpressionUUID->"ff21b187-66af-4888-b476-be441ff52a26"] +}, Open ]], +Cell[CellGroupData[{ +Cell[697989, 13639, 2775, 69, 133, "Input",ExpressionUUID->"c3167044-0b3a-4d75-b604-360134b7bd26"], +Cell[700767, 13710, 1324, 24, 28, "Message",ExpressionUUID->"bc7c93fa-58e9-4e22-a24a-28dcbc3070e0"], +Cell[702094, 13736, 2164, 35, 69, "Message",ExpressionUUID->"667750b0-e2a9-4cb4-bb3b-eef9f28cebb9"], +Cell[704261, 13773, 3379, 51, 69, "Message",ExpressionUUID->"e7f1e7ea-5af6-4788-9de0-f2cd89d15153"], +Cell[707643, 13826, 523, 11, 22, "Message",ExpressionUUID->"1aab8cae-3340-4b03-8c76-6707f232263b"], +Cell[708169, 13839, 74300, 1443, 394, "Output",ExpressionUUID->"8a4de7f9-fd61-4193-a1cb-fc371ac99b2a"] +}, Open ]], +Cell[CellGroupData[{ +Cell[782506, 15287, 2697, 68, 339, "Input",ExpressionUUID->"48628756-3f24-45fc-9f86-cd5ae0f822da"], +Cell[785206, 15357, 1279, 22, 86, "Message",ExpressionUUID->"5b127e83-e246-47ae-a8e5-fe3b6556bf49"], +Cell[786488, 15381, 2122, 34, 124, "Message",ExpressionUUID->"6c25ef40-2430-4245-b08a-f88ed87e376b"], +Cell[788613, 15417, 2949, 44, 143, "Message",ExpressionUUID->"50051b5b-a480-4633-94a9-97fa45c67275"], +Cell[791565, 15463, 476, 10, 38, "Message",ExpressionUUID->"6c2ba2b8-580d-46f7-82ea-e7b511af7b9a"], +Cell[792044, 15475, 77486, 1497, 394, "Output",ExpressionUUID->"4b29cfce-4c5c-4b1b-88ae-337caa47a8f2"] +}, Open ]], +Cell[CellGroupData[{ +Cell[869567, 16977, 2712, 67, 360, "Input",ExpressionUUID->"0c1990d8-468e-4a9d-8cca-e07c69d7cf23"], +Cell[872282, 17046, 1258, 22, 85, "Message",ExpressionUUID->"4a2e8521-8064-4465-8331-3b2061e64770"], +Cell[873543, 17070, 1256, 22, 85, "Message",ExpressionUUID->"148355a0-3606-4c01-a037-453f5f0e98f4"], +Cell[874802, 17094, 1244, 21, 85, "Message",ExpressionUUID->"d567314a-69b2-46c8-a02f-b97231ddc24a"], +Cell[876049, 17117, 474, 10, 38, "Message",ExpressionUUID->"db52e02e-cdbc-4d86-835c-86e648798842"], +Cell[876526, 17129, 104949, 2026, 394, "Output",ExpressionUUID->"13f9334d-efa6-4196-810d-33ee8d904de1"] +}, Open ]], +Cell[CellGroupData[{ +Cell[981512, 19160, 2712, 67, 360, "Input",ExpressionUUID->"1cf27577-f322-4f41-a4a7-b14b06ad987e"], +Cell[984227, 19229, 2073, 34, 105, "Message",ExpressionUUID->"6490632e-3399-44d5-b41e-13055ccd37d4"], +Cell[986303, 19265, 2075, 34, 105, "Message",ExpressionUUID->"f178e122-d2f0-4ca0-ad14-b0dc7c914de0"], +Cell[988381, 19301, 2064, 34, 105, "Message",ExpressionUUID->"86c45ed8-07fa-40b0-b612-91fc08d02ab9"], +Cell[990448, 19337, 452, 10, 38, "Message",ExpressionUUID->"fbe6fda9-7a73-4fa2-8c04-0c27c2434ec1"], +Cell[990903, 19349, 106799, 2055, 394, "Output",ExpressionUUID->"81e480e6-3998-4170-89e3-40a02ba638bd"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1097739, 21409, 2710, 67, 360, "Input",ExpressionUUID->"7f72b5b7-1a1e-4f93-8ed0-2baae45deeaa"], +Cell[1100452, 21478, 3410, 53, 145, "Message",ExpressionUUID->"ab9aa5f4-f1dd-4304-8454-0ebeef0198b4"], +Cell[1103865, 21533, 3224, 51, 143, "Message",ExpressionUUID->"bbd0d22d-f5ad-4a34-b83a-aab8c6ca9e88"], +Cell[1107092, 21586, 3233, 50, 143, "Message",ExpressionUUID->"524b18a5-94b5-403a-97dd-138b1a0a445c"], +Cell[1110328, 21638, 452, 10, 38, "Message",ExpressionUUID->"b15161d2-3228-4553-b279-30d91894d24c"], +Cell[1110783, 21650, 108132, 2077, 394, "Output",ExpressionUUID->"a624d5fa-caee-4f11-a8e9-4a360194a3b0"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1218952, 23732, 570, 15, 51, "Input",ExpressionUUID->"ab6cff43-058d-4df7-b666-5416632c33d5"], +Cell[1219525, 23749, 536, 12, 38, "Message",ExpressionUUID->"0a767b19-fb8b-4cd6-8dd8-22580f7d2652"], +Cell[1220064, 23763, 1953, 32, 108, "Message",ExpressionUUID->"2e5e9f48-f0ca-48c5-a195-c97dfa2ff351"], +Cell[1222020, 23797, 1954, 32, 108, "Message",ExpressionUUID->"edce2f57-0bd4-4fcc-802f-d4702e3593d9"], +Cell[1223977, 23831, 499, 11, 38, "Message",ExpressionUUID->"f10d704a-6a2b-4c6b-97d1-e0977bbf255c"], +Cell[1224479, 23844, 1544, 37, 75, "Output",ExpressionUUID->"b90a9635-6899-443a-80e1-eec01da6bc7d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[1226060, 23886, 549, 15, 51, "Input",ExpressionUUID->"675b4da9-21e7-4a4c-8d2b-d1dfc5607ba9"], +Cell[1226612, 23903, 618, 13, 38, "Message",ExpressionUUID->"9b1a2780-c656-4ea1-abb6-d994e88cde09"], +Cell[1227233, 23918, 1954, 31, 92, "Message",ExpressionUUID->"26528ecf-a032-48ac-8a58-bea3c2aa544b"], +Cell[1229190, 23951, 488, 11, 38, "Message",ExpressionUUID->"89cb098a-ba07-4ebc-ab7e-547465a6903c"], +Cell[1229681, 23964, 452, 10, 38, "Message",ExpressionUUID->"7eb4729a-7a17-4602-a988-398d323561e1"], +Cell[1230136, 23976, 1585, 43, 75, "Output",ExpressionUUID->"f7d98e70-d285-494c-8e8b-ee408a7f14a7"] +}, Open ]] +}, Open ]] +} +] +*) + diff --git a/Notebooks/sbHF.nb b/Notebooks/sbHF.nb index 64e027e..d225afd 100644 --- a/Notebooks/sbHF.nb +++ b/Notebooks/sbHF.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] -NotebookDataLength[ 534570, 12030] -NotebookOptionsPosition[ 524980, 11868] -NotebookOutlinePosition[ 525414, 11885] -CellTagsIndexPosition[ 525371, 11882] +NotebookDataLength[ 925375, 21083] +NotebookOptionsPosition[ 907997, 20808] +NotebookOutlinePosition[ 908431, 20825] +CellTagsIndexPosition[ 908388, 20822] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -47,15 +47,19 @@ Cell[BoxData[{ RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", RowBox[{ - "\"\<\\\\usepackage{amssymb,amsmath,latexsym,amsfonts,amsthm,mathpazo,\ -xcolor,bm,mhchem}\>\"", ",", - "\"\<\\\\definecolor{darkgreen}{RGB}{0, 180, 0}\>\""}], "}"}]}]}], + "\"\<\\\\usepackage{amssymb,amsmath,latexsym,amsfonts,amsthm,xcolor,bm,\ +mhchem}\>\"", ",", "\"\<\\\\definecolor{darkgreen}{RGB}{0, 180, 0}\>\"", ",", + "\"\<\\\\definecolor{darkcyan}{RGB}{0, 180, 180}\>\"", ",", + "\"\<\\\\definecolor{darkmagenta}{RGB}{180,0, 180}\>\""}], "}"}]}]}], "]"}], ";"}]}], "Input", InitializationCell->True, CellChangeTimes->{{3.7288240181604652`*^9, 3.728824027007351*^9}, { - 3.733131339213026*^9, 3.733131352923026*^9}, {3.748749840810712*^9, - 3.7487498700068483`*^9}, {3.7487499293939*^9, 3.748749970151113*^9}, { - 3.748750013043272*^9, 3.748750051449955*^9}}, + 3.733131339213026*^9, 3.733131352923026*^9}, {3.748749840810712*^9, + 3.7487498700068483`*^9}, {3.7487499293939*^9, 3.748749970151113*^9}, { + 3.748750013043272*^9, 3.748750051449955*^9}, {3.804224668847693*^9, + 3.804224671621665*^9}, 3.804224735766974*^9, {3.804224985946957*^9, + 3.8042250232698803`*^9}, {3.804225118624632*^9, 3.8042251207879953`*^9}, + 3.8043074900722237`*^9}, CellLabel->"In[2]:=",ExpressionUUID->"999c762a-7c58-4666-bb60-666ecc942fc6"] }, Open ]], @@ -205,8 +209,8 @@ Cell[BoxData[ 3.761392061135333*^9}, {3.7613921016004333`*^9, 3.761392104576024*^9}, { 3.7613921404004507`*^9, 3.7613921548703413`*^9}, 3.761392214320422*^9, { 3.761392255134748*^9, 3.76139228728538*^9}, {3.768662774164274*^9, - 3.768662782501505*^9}}, - CellLabel->"In[4]:=",ExpressionUUID->"f6e7f160-010f-4779-b1d8-ea0c5ba6e8be"], + 3.768662782501505*^9}, {3.803102044706339*^9, 3.803102048465652*^9}}, + CellLabel->"In[75]:=",ExpressionUUID->"f6e7f160-010f-4779-b1d8-ea0c5ba6e8be"], Cell[BoxData[ TemplateBox[{ @@ -215,13 +219,16 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 4, 1, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 75, 9, + 22584810622430269817, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.8026621409422417`*^9, 3.802664021746966*^9}, + CellChangeTimes->{ + 3.80381214577349*^9, {3.803900118828785*^9, 3.803900122850692*^9}, + 3.8039608399756327`*^9, 3.8042213463658943`*^9, 3.804242636201668*^9, + 3.804304087263123*^9, 3.8043977330433493`*^9, 3.804414868049491*^9}, CellLabel-> "During evaluation of \ -In[4]:=",ExpressionUUID->"f43690ac-2534-4e52-bdc4-1b11abdb3894"], +In[75]:=",ExpressionUUID->"fa8da54f-7b13-43f8-9560-28cb88b3a46e"], Cell[BoxData[ TemplateBox[{ @@ -230,13 +237,16 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 4, 2, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 75, 10, + 22584810622430269817, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.8026621409422417`*^9, 3.802664021773921*^9}, + CellChangeTimes->{ + 3.80381214577349*^9, {3.803900118828785*^9, 3.803900122850692*^9}, + 3.8039608399756327`*^9, 3.8042213463658943`*^9, 3.804242636201668*^9, + 3.804304087263123*^9, 3.8043977330433493`*^9, 3.8044148690057993`*^9}, CellLabel-> "During evaluation of \ -In[4]:=",ExpressionUUID->"6e1120df-ba71-4a86-a8bb-49a8e2ae428c"], +In[75]:=",ExpressionUUID->"0ebc8102-76e1-43c2-9085-881bc3cc1403"], Cell[BoxData[ TemplateBox[{ @@ -245,25 +255,85 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 4, 3, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 75, 11, + 22584810622430269817, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.8026621409422417`*^9, 3.802664021780335*^9}, + CellChangeTimes->{ + 3.80381214577349*^9, {3.803900118828785*^9, 3.803900122850692*^9}, + 3.8039608399756327`*^9, 3.8042213463658943`*^9, 3.804242636201668*^9, + 3.804304087263123*^9, 3.8043977330433493`*^9, 3.804414871916006*^9}, CellLabel-> "During evaluation of \ -In[4]:=",ExpressionUUID->"ab2d3936-24d8-4f9d-8ec1-a120d0475c73"], +In[75]:=",ExpressionUUID->"4b7859a6-bd37-4586-8066-70d80af9600b"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ \\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ -this calculation.\"", 2, 4, 4, 22573338086155504028, "Local"}, +this calculation.\"", 2, 75, 12, 22584810622430269817, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.8026621409422417`*^9, 3.802664021786839*^9}, + CellChangeTimes->{ + 3.80381214577349*^9, {3.803900118828785*^9, 3.803900122850692*^9}, + 3.8039608399756327`*^9, 3.8042213463658943`*^9, 3.804242636201668*^9, + 3.804304087263123*^9, 3.8043977330433493`*^9, 3.804414872411561*^9}, CellLabel-> "During evaluation of \ -In[4]:=",ExpressionUUID->"101a719a-022c-4807-b0cb-e7e72c39686f"] +In[75]:=",ExpressionUUID->"075032cf-b9bd-48b6-9122-c6a9f6bb26ef"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"EHF", "[", + RowBox[{"R", ",", "1"}], "]"}]], "Input", + CellChangeTimes->{{3.8039001889117813`*^9, 3.803900194143886*^9}}, + CellLabel->"In[43]:=",ExpressionUUID->"3529a0e3-d1cc-4fd4-8452-6b6eaa5ed9b1"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{ + SuperscriptBox[ + RowBox[{"Cos", "[", "x", "]"}], "2"], " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "y", "]"}], "2"]}], "R"], "+", + FractionBox[ + SuperscriptBox[ + RowBox[{"Sin", "[", "x", "]"}], "2"], + SuperscriptBox["R", "2"]], "+", + FractionBox[ + RowBox[{ + SuperscriptBox[ + RowBox[{"Cos", "[", "y", "]"}], "2"], " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "x", "]"}], "2"]}], "R"], "+", + FractionBox[ + RowBox[{"4", " ", + RowBox[{"Cos", "[", "x", "]"}], " ", + RowBox[{"Cos", "[", "y", "]"}], " ", + RowBox[{"Sin", "[", "x", "]"}], " ", + RowBox[{"Sin", "[", "y", "]"}]}], + RowBox[{"3", " ", "R"}]], "+", + FractionBox[ + SuperscriptBox[ + RowBox[{"Sin", "[", "y", "]"}], "2"], + SuperscriptBox["R", "2"]], "+", + FractionBox[ + RowBox[{ + SuperscriptBox[ + RowBox[{"Cos", "[", "x", "]"}], "2"], " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "y", "]"}], "2"]}], "R"], "+", + FractionBox[ + RowBox[{"29", " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "x", "]"}], "2"], " ", + SuperscriptBox[ + RowBox[{"Sin", "[", "y", "]"}], "2"]}], + RowBox[{"25", " ", "R"}]]}]], "Output", + CellChangeTimes->{3.803900195131247*^9}, + CellLabel->"Out[43]=",ExpressionUUID->"b05e9ec0-a83d-43cc-ac5f-98f69acf7b71"] }, Open ]], Cell["We search stationnary solution", "Text", @@ -301,7 +371,9 @@ Cell[BoxData[ RowBox[{ RowBox[{"C", "[", "2", "]"}], "\[Rule]", "0"}]}], "}"}]}], "//", "FullSimplify"}]}]], "Input", - CellLabel->"In[62]:=",ExpressionUUID->"6602dda8-5b82-4835-a2a6-e1e0a1c0e32e"], + InitializationCell->True, + CellChangeTimes->{{3.803102052997862*^9, 3.803102066234921*^9}}, + CellLabel->"In[76]:=",ExpressionUUID->"6602dda8-5b82-4835-a2a6-e1e0a1c0e32e"], Cell[BoxData[ RowBox[{"{", @@ -938,8 +1010,54 @@ Cell[BoxData[ RowBox[{"-", "3"}], "+", RowBox[{"2", " ", "R"}]}]]}], SqrtBox["R"]]}]}], "]"}]}]}], "}"}]}], "}"}]], "Output", - CellChangeTimes->{3.802662142115428*^9, 3.802667884393529*^9}, - CellLabel->"Out[62]=",ExpressionUUID->"83464c67-066b-4f31-832c-f92b96a255d9"] + CellChangeTimes->{3.802662142115428*^9, 3.802667884393529*^9, + 3.802692445653715*^9, 3.802754093232861*^9, 3.803025973522566*^9, + 3.803026605472929*^9, 3.803026777102297*^9, 3.803098813312316*^9, + 3.8031011194617157`*^9, 3.803109738411804*^9, 3.8038121476923428`*^9, + 3.803900121112207*^9, 3.8039608415482397`*^9, 3.8042213479913197`*^9, + 3.8042426374503937`*^9, 3.804304088877639*^9, 3.804397735058319*^9, + 3.804414874141756*^9}, + CellLabel->"Out[76]=",ExpressionUUID->"1f7f564f-f058-4cbb-b34f-bf52174c6518"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + SubscriptBox["\[PartialD]", + RowBox[{"x", ",", "x"}]], + RowBox[{"EHF", "[", + RowBox[{"R", ",", "1"}], "]"}]}], ",", + RowBox[{ + SubscriptBox["\[PartialD]", + RowBox[{"y", ",", "y"}]], + RowBox[{"EHF", "[", + RowBox[{"R", ",", "1"}], "]"}]}]}], "}"}], "/.", + RowBox[{"{", + RowBox[{ + RowBox[{"x", "\[Rule]", "0"}], ",", + RowBox[{"y", "\[Rule]", + RowBox[{"-", + FractionBox["\[Pi]", "2"]}]}]}], "}"}]}]], "Input", + CellChangeTimes->{{3.8043040664648027`*^9, 3.8043041344323807`*^9}}, + CellLabel->"In[16]:=",ExpressionUUID->"f58a37c9-2de9-4ff3-ac54-fc160256a143"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["8", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{"-", + FractionBox["2", + SuperscriptBox["R", "2"]]}]}], "}"}]], "Output", + CellChangeTimes->{{3.804304090534889*^9, 3.804304135354649*^9}}, + CellLabel->"Out[16]=",ExpressionUUID->"6c6971b4-a6c4-4077-8fc5-8f79c3933374"] }, Open ]], Cell["\<\ @@ -1274,7 +1392,7 @@ Cell[BoxData[ CellChangeTimes->{{3.8026626442062902`*^9, 3.802662694832094*^9}, { 3.802662889576977*^9, 3.8026629401653843`*^9}, 3.802663210947213*^9, { 3.802664497947946*^9, 3.802664519827835*^9}}, - CellLabel->"In[17]:=",ExpressionUUID->"bc0a02bd-ce9f-4092-ba29-455868247a72"], + CellLabel->"In[77]:=",ExpressionUUID->"bc0a02bd-ce9f-4092-ba29-455868247a72"], Cell[BoxData[ RowBox[{ @@ -1600,7 +1718,7 @@ Cell[BoxData[ InitializationCell->True, CellChangeTimes->{{3.8026629431991034`*^9, 3.802662975615595*^9}, { 3.802663168265376*^9, 3.802663225861127*^9}}, - CellLabel->"In[11]:=",ExpressionUUID->"a0467d14-fb57-4673-a6fc-eaba9b401d4f"], + CellLabel->"In[78]:=",ExpressionUUID->"a0467d14-fb57-4673-a6fc-eaba9b401d4f"], Cell["The two electrons integrals are equal to", "Text", CellChangeTimes->{{3.802663258848398*^9, @@ -1651,7 +1769,8 @@ Cell[BoxData[ RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"]}]}]}]}], ";"}]], "Input", InitializationCell->True, - CellLabel->"In[6]:=",ExpressionUUID->"89897658-b4e4-4283-b38e-d848aa34e2ac"], + CellChangeTimes->{{3.802758733847095*^9, 3.802758754862055*^9}}, + CellLabel->"In[79]:=",ExpressionUUID->"89897658-b4e4-4283-b38e-d848aa34e2ac"], Cell["The Fock operator for the electron \[Alpha] is", "Text", CellChangeTimes->{{3.8026632969749527`*^9, 3.8026632973595877`*^9}, { @@ -1732,8 +1851,9 @@ Cell[BoxData[ RowBox[{"i", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "0", ",", "1"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.802663565597023*^9, 3.802663581364587*^9}}, - CellLabel->"In[7]:=",ExpressionUUID->"24664069-d643-46e2-b730-262853885865"], + CellChangeTimes->{{3.802663565597023*^9, 3.802663581364587*^9}, { + 3.8027581280290337`*^9, 3.802758130722004*^9}}, + CellLabel->"In[69]:=",ExpressionUUID->"24664069-d643-46e2-b730-262853885865"], Cell[BoxData[ TemplateBox[{ @@ -1742,13 +1862,15 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 7, 5, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 69, 46, + 22573910896942579821, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.802664051564028*^9}, + CellChangeTimes->{ + 3.802664051564028*^9, 3.802758338159923*^9, {3.80275873813323*^9, + 3.802758758739909*^9}}, CellLabel-> "During evaluation of \ -In[7]:=",ExpressionUUID->"2a50fb86-b8d7-40ae-ab20-633f5f3b2658"], +In[69]:=",ExpressionUUID->"41e93916-2c12-4f0f-b75c-e288551489b5"], Cell[BoxData[ TemplateBox[{ @@ -1757,13 +1879,15 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 7, 6, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 69, 47, + 22573910896942579821, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.802664051573551*^9}, + CellChangeTimes->{ + 3.802664051564028*^9, 3.802758338159923*^9, {3.80275873813323*^9, + 3.802758758944069*^9}}, CellLabel-> "During evaluation of \ -In[7]:=",ExpressionUUID->"8e5f854e-ea62-408b-b6d4-660ed995520d"], +In[69]:=",ExpressionUUID->"2ebda45b-b108-423f-871a-e6c73a71050c"], Cell[BoxData[ TemplateBox[{ @@ -1772,25 +1896,29 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 7, 7, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 69, 48, + 22573910896942579821, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.802664051580594*^9}, + CellChangeTimes->{ + 3.802664051564028*^9, 3.802758338159923*^9, {3.80275873813323*^9, + 3.802758759044931*^9}}, CellLabel-> "During evaluation of \ -In[7]:=",ExpressionUUID->"a97faec4-d943-42c9-8686-d309da1ca613"], +In[69]:=",ExpressionUUID->"eb9c059f-4e6b-4ac6-8705-19af6acfa29d"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ \\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ -this calculation.\"", 2, 7, 8, 22573338086155504028, "Local"}, +this calculation.\"", 2, 69, 49, 22573910896942579821, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.8026640515892973`*^9}, + CellChangeTimes->{ + 3.802664051564028*^9, 3.802758338159923*^9, {3.80275873813323*^9, + 3.802758759145954*^9}}, CellLabel-> "During evaluation of \ -In[7]:=",ExpressionUUID->"7780729a-83df-42f3-9fb1-5b27a8689551"], +In[69]:=",ExpressionUUID->"8df9b20c-8952-4094-b6cd-7ab272c84f00"], Cell[BoxData[ RowBox[{"{", @@ -1840,8 +1968,10 @@ Cell[BoxData[ RowBox[{"Cos", "[", RowBox[{"2", " ", "y"}], "]"}]}], RowBox[{"25", " ", "R"}]]}]}], "}"}]}], "}"}]], "Output", - CellChangeTimes->{3.802664051881092*^9}, - CellLabel->"Out[7]=",ExpressionUUID->"846297c3-7ab4-4c69-aa0e-df2c493ae434"] + CellChangeTimes->{ + 3.802664051881092*^9, 3.802758338592367*^9, {3.8027587385194063`*^9, + 3.802758759258439*^9}}, + CellLabel->"Out[69]=",ExpressionUUID->"74bdf5ce-ac15-4fec-be45-50abe3e63f3e"] }, Open ]], Cell["And the Fock operator \[Beta]", "Text", @@ -1922,8 +2052,11 @@ Cell[BoxData[ RowBox[{"i", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "0", ",", "1"}], "}"}]}], "]"}]}]], "Input", - CellChangeTimes->{{3.802663616778529*^9, 3.8026636348017263`*^9}}, - CellLabel->"In[8]:=",ExpressionUUID->"858e2df5-f32c-46a7-986d-ee0dd3dd1489"], + CellChangeTimes->{{3.802663616778529*^9, 3.8026636348017263`*^9}, { + 3.8031011121019497`*^9, 3.803101114440724*^9}, {3.8031011517192307`*^9, + 3.8031011544498158`*^9}, {3.8031024646403522`*^9, 3.803102467086728*^9}, { + 3.803102529065599*^9, 3.803102532184017*^9}}, + CellLabel->"In[20]:=",ExpressionUUID->"858e2df5-f32c-46a7-986d-ee0dd3dd1489"], Cell[BoxData[ TemplateBox[{ @@ -1932,13 +2065,14 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 8, 9, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 20, 21, + 22576202114205250949, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.802664056552679*^9}, + CellChangeTimes->{3.802664056552679*^9, 3.803101121134951*^9, + 3.80310115496187*^9, 3.803102468136097*^9, 3.803102532952012*^9}, CellLabel-> "During evaluation of \ -In[8]:=",ExpressionUUID->"133106f4-2a95-41aa-a9ca-28ca606939bd"], +In[20]:=",ExpressionUUID->"17a0417a-9fd6-4745-8a6e-b3e7f3aa1cdb"], Cell[BoxData[ TemplateBox[{ @@ -1947,13 +2081,14 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 8, 10, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 20, 22, + 22576202114205250949, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.802664056562199*^9}, + CellChangeTimes->{3.802664056552679*^9, 3.803101121134951*^9, + 3.80310115496187*^9, 3.803102468136097*^9, 3.803102533083153*^9}, CellLabel-> "During evaluation of \ -In[8]:=",ExpressionUUID->"fba4887c-6d05-49e9-886c-61e56f50e3a4"], +In[20]:=",ExpressionUUID->"debb11f7-b500-4b5b-9cd6-9f3809960530"], Cell[BoxData[ TemplateBox[{ @@ -1962,25 +2097,27 @@ Cell[BoxData[ \\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ -\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 8, 11, - 22573338086155504028, "Local"}, +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 20, 23, + 22576202114205250949, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.80266405656892*^9}, + CellChangeTimes->{3.802664056552679*^9, 3.803101121134951*^9, + 3.80310115496187*^9, 3.803102468136097*^9, 3.803102533204788*^9}, CellLabel-> "During evaluation of \ -In[8]:=",ExpressionUUID->"32108298-0b16-4037-ba7a-91581c79bf6f"], +In[20]:=",ExpressionUUID->"8056278b-a62a-4a7f-9013-8daf19ae12da"], Cell[BoxData[ TemplateBox[{ "General", "stop", "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ \\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ -this calculation.\"", 2, 8, 12, 22573338086155504028, "Local"}, +this calculation.\"", 2, 20, 24, 22576202114205250949, "Local"}, "MessageTemplate"]], "Message", "MSG", - CellChangeTimes->{3.802664056579774*^9}, + CellChangeTimes->{3.802664056552679*^9, 3.803101121134951*^9, + 3.80310115496187*^9, 3.803102468136097*^9, 3.803102533316513*^9}, CellLabel-> "During evaluation of \ -In[8]:=",ExpressionUUID->"d195f59e-76b0-4895-92bd-104a79b47961"], +In[20]:=",ExpressionUUID->"0ce33cee-cfad-43b7-ba6d-0d87ab7474cb"], Cell[BoxData[ RowBox[{"{", @@ -2028,8 +2165,9 @@ Cell[BoxData[ RowBox[{"Cos", "[", RowBox[{"2", " ", "y"}], "]"}], RowBox[{"3", " ", "R"}]]}]}], "}"}]}], "}"}]], "Output", - CellChangeTimes->{3.802664056777917*^9}, - CellLabel->"Out[8]=",ExpressionUUID->"d3c978a7-f654-42e8-9d18-ac84427124ce"] + CellChangeTimes->{3.802664056777917*^9, 3.803101121577677*^9, + 3.8031011553766623`*^9, 3.803102468629456*^9, 3.803102533427928*^9}, + CellLabel->"Out[20]=",ExpressionUUID->"49e26bc3-f8cd-4b6f-b395-68267f050192"] }, Open ]], Cell[CellGroupData[{ @@ -2054,7 +2192,7 @@ Cell[BoxData[ CellChangeTimes->{{3.8026638781123657`*^9, 3.802663886744072*^9}, { 3.802664071761154*^9, 3.80266408231196*^9}, {3.802664114117106*^9, 3.802664122098942*^9}}, - CellLabel->"In[19]:=",ExpressionUUID->"3abfa35e-224a-4093-b094-7ec8ae51fcc0"], + CellLabel->"In[65]:=",ExpressionUUID->"3abfa35e-224a-4093-b094-7ec8ae51fcc0"], Cell[BoxData[ RowBox[{"{", @@ -2303,8 +2441,9 @@ Cell[BoxData[ SuperscriptBox["R", "2"]}]], "+", FractionBox["91", RowBox[{"66", " ", "R"}]]}]}], "}"}]}], "}"}]}], "}"}]], "Output", - CellChangeTimes->{3.80266454238374*^9}, - CellLabel->"Out[19]=",ExpressionUUID->"1358b260-fa3c-43c8-8085-d0506d6c1731"] + CellChangeTimes->{ + 3.80266454238374*^9, {3.802758334430443*^9, 3.802758342261498*^9}}, + CellLabel->"Out[65]=",ExpressionUUID->"1431d414-a54c-4060-a363-7c2461489924"] }, Open ]], Cell[CellGroupData[{ @@ -6945,8 +7084,9 @@ Cell[BoxData[ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", - CellChangeTimes->{{3.802666816575615*^9, 3.8026669633827543`*^9}}, - CellLabel->"In[56]:=",ExpressionUUID->"5b1e83e0-e5a5-4a98-b6c9-1c4db1bebccf"], + CellChangeTimes->{{3.802666816575615*^9, 3.8026669633827543`*^9}, { + 3.8026767719576187`*^9, 3.8026768014883413`*^9}}, + CellLabel->"In[17]:=",ExpressionUUID->"5b1e83e0-e5a5-4a98-b6c9-1c4db1bebccf"], Cell[BoxData[ TemplateBox[{ @@ -7074,7 +7214,7 @@ G7dTyfCLWmu/f5mgl1UfvNhFJVVfYzKz3ZlIs+TOvuRQSVF5hCP3FBNGHsv2 qA1RSdNzg0IHZyaChTYLbEaoREI5zDWezsS3qEP3owRU4mNocIplzwRt6fkd FVNUYrTwTpHKISacXkQN/f5NJWQVz+nAASb+B60qLNE= "]]}, - Annotation[#, "Charting`Private`Tag$25440#1"]& ], + Annotation[#, "Charting`Private`Tag$5633#1"]& ], TagBox[{ Directive[ Opacity[1.], @@ -7182,7 +7322,7 @@ Epgr0l6mPMCAHDuO8O0ogfyl1ObpHgYYeWud0Jwh8N3jsxZ/tjMgVOTgvNMs gef+2fj61xYGtMSeTo2dJ5AVmr/LpZEBqhq3zOuWCfyhKqjeqIEB7m9iZ75+ JVD6z9m7Gz4x4H/yPIB+ "]]}, - Annotation[#, "Charting`Private`Tag$25440#2"]& ], + Annotation[#, "Charting`Private`Tag$5633#2"]& ], TagBox[{ Directive[ Opacity[1.], @@ -7366,7 +7506,7 @@ zGCR+3BbTvdDMjx3XxTXzWPRHqeqD1cfkMEmSv9bPSYWyfZKu/2TSYY0CVuB DxeLRqb25eQQyPCBeO4RUYBF2953xDlfJ4OWbszJPiEW7QoxlZaLJ8OPNUTm 1hYWuY32m/X+TIZ/AbPZuAQ= "]]}, - Annotation[#, "Charting`Private`Tag$25440#3"]& ], + Annotation[#, "Charting`Private`Tag$5633#3"]& ], TagBox[{ Directive[ Opacity[1.], @@ -7515,7 +7655,7 @@ N/zjFMxY3H+BYqelz4RC+7H50mECU3MelJ/RZYKpn9b+VROLf4nBVfPLmRBF 3iF05hEoqDbRt1ZjwqfEw38nCgnsv3VLKV2RCRor/fc0zRKo5f+pd5TGhBMl iRMLCwRq6ndf3S7LhH8B9s73HQ== "]]}, - Annotation[#, "Charting`Private`Tag$25440#4"]& ], + Annotation[#, "Charting`Private`Tag$5633#4"]& ], TagBox[{ Directive[ Opacity[1.], @@ -7688,7 +7828,7 @@ g1cvTTtoJNo/tvfrbhZcKv5xuMKmkS9eEmXUnSw8tR2ay+2jkSV0W01jsGDs qWGjzqURydR/gl/8h4UQEZNJx3EaiRzWCeRsYuEr4/BDxiSNHCx4I661kQX6 au89lTM0wrx2R/b39Sz8ns3gzs/TiK9fRXzaWhb+B04lW3o= "]]}, - Annotation[#, "Charting`Private`Tag$25440#5"]& ], + Annotation[#, "Charting`Private`Tag$5633#5"]& ], TagBox[{ Directive[ Opacity[1.], @@ -7806,11 +7946,11 @@ ESj80rTT3o4J/8aefhIrIvDq85DLIhsmqK/zP9w8R6DMxgK7h8eZ4PIilru0 RKDCaVvGj0eZ8D/xeLqZ "]]}, Annotation[#, - "Charting`Private`Tag$25440#6"]& ], {}}, {{}, {}, {}, {}, {}, {}, \ + "Charting`Private`Tag$5633#6"]& ], {}}, {{}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ -{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, {{}, {}, {}, {}, {}, {}, {}, {}, \ {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ -{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {}}, { +{}, {}, {}, {}, {}, {}, {}, {}, {}, {}}}, {}}, { DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, AxesOrigin -> {0, 0}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, @@ -8046,8 +8186,9 @@ RKDCaVvGj0eZ8D/xeLqZ 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], @@ -8094,8 +8235,9 @@ RKDCaVvGj0eZ8D/xeLqZ 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], @@ -8142,8 +8284,9 @@ RKDCaVvGj0eZ8D/xeLqZ 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], @@ -8191,8 +8334,9 @@ RKDCaVvGj0eZ8D/xeLqZ 0.13945266666666667`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], @@ -8240,8 +8384,9 @@ RKDCaVvGj0eZ8D/xeLqZ 0.46756733333333333`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.528488`", ",", "0.470624`", ",", "0.701351`"}], @@ -8289,8 +8434,9 @@ RKDCaVvGj0eZ8D/xeLqZ 0.06825800000000001], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.772079`", ",", "0.431554`", ",", "0.102387`"}], @@ -8343,8 +8489,12 @@ RKDCaVvGj0eZ8D/xeLqZ RowBox[{#, ",", RowBox[{"Placed", "[", RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", - CellChangeTimes->{{3.802666949082383*^9, 3.802666964404241*^9}}, - CellLabel->"Out[56]=",ExpressionUUID->"fe2e4aca-1faa-45c3-8155-20096138d09c"] + GeneratedCell->False, + CellAutoOverwrite->False, + CellChangeTimes->{{3.802666949082383*^9, 3.802666964404241*^9}, { + 3.802676775593466*^9, 3.802676802336885*^9}, + 3.802757634518303*^9},ExpressionUUID->"bb57d11f-6164-424c-8647-\ +1b7eba2065c6"] }, Open ]], Cell[CellGroupData[{ @@ -8844,8 +8994,9 @@ sGCB4I+pmyzKPCloy8lULC4SdLys7LP3oOA/dUFRJg== 0.4731986666666667], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.368417`", ",", "0.506779`", ",", "0.709798`"}], @@ -8892,8 +9043,9 @@ sGCB4I+pmyzKPCloy8lULC4SdLys7LP3oOA/dUFRJg== 0.587148, 0.40736066666666665`, 0.09470066666666668], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.880722`", ",", "0.611041`", ",", "0.142051`"}], @@ -8940,8 +9092,9 @@ sGCB4I+pmyzKPCloy8lULC4SdLys7LP3oOA/dUFRJg== 0.37345400000000006`, 0.461046, 0.12992333333333334`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.560181`", ",", "0.691569`", ",", "0.194885`"}], @@ -8989,8 +9142,9 @@ sGCB4I+pmyzKPCloy8lULC4SdLys7LP3oOA/dUFRJg== 0.13945266666666667`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.922526`", ",", "0.385626`", ",", "0.209179`"}], @@ -9038,8 +9192,9 @@ sGCB4I+pmyzKPCloy8lULC4SdLys7LP3oOA/dUFRJg== 0.46756733333333333`], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.528488`", ",", "0.470624`", ",", "0.701351`"}], @@ -9087,8 +9242,9 @@ sGCB4I+pmyzKPCloy8lULC4SdLys7LP3oOA/dUFRJg== 0.06825800000000001], FrameTicks -> None, PlotRangePadding -> None, ImageSize -> Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], + Automatic, + 1.35 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ + Magnification])}]], StyleBox[ RowBox[{"RGBColor", "[", RowBox[{"0.772079`", ",", "0.431554`", ",", "0.102387`"}], @@ -9145,6 +9301,43 @@ sGCB4I+pmyzKPCloy8lULC4SdLys7LP3oOA/dUFRJg== CellLabel->"Out[59]=",ExpressionUUID->"0194e55a-69d4-4f78-9043-1ffc49c4ff4b"] }, Open ]], +Cell[BoxData[ + RowBox[{"Solve", "[", + RowBox[{ + RowBox[{ + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["137", + RowBox[{"75", " ", "R"}]]}], "==", + RowBox[{ + FractionBox["25", + RowBox[{"56", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["57", + RowBox[{"28", " ", "R"}]]}]}], ",", "R"}], "]"}]], "Input", + CellChangeTimes->{{3.802678158418623*^9, 3.802678183477907*^9}}, + CellLabel->"In[38]:=",ExpressionUUID->"9486dde8-3ccd-4686-b628-2d87532f0a2f"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{"{", + RowBox[{"R", "\[Rule]", + FractionBox["2325", "878"]}], "}"}], "}"}], "//", "N"}]], "Input", + CellChangeTimes->{{3.802678202178029*^9, 3.80267820258855*^9}}, + CellLabel->"In[39]:=",ExpressionUUID->"caf2114e-cd8c-4b4d-bc99-0de25a7e8886"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{"{", + RowBox[{"R", "\[Rule]", "2.6480637813211847`"}], "}"}], "}"}]], "Output", + CellChangeTimes->{3.8026782032399673`*^9}, + CellLabel->"Out[39]=",ExpressionUUID->"c851e226-2cb6-4cef-8d6f-c0f886bb379f"] +}, Open ]], + Cell[CellGroupData[{ Cell[BoxData[ @@ -10304,6 +10497,11 @@ Cell["sb-RHF and sb-UHF", "Section", Cell[CellGroupData[{ +Cell["Coulson-Fischer points", "Subsection", + CellChangeTimes->{{3.802670654880199*^9, + 3.802670661820393*^9}},ExpressionUUID->"e15caeb9-38ea-44bf-9f8f-\ +130ad15876c0"], + Cell[BoxData[ RowBox[{ RowBox[{ @@ -10320,10 +10518,13 @@ Cell[BoxData[ RowBox[{"Length", "[", "sol", "]"}]}], "}"}]}], "]"}], "//", "FullSimplify"}], "//", "Expand"}], "//", "DeleteDuplicates"}]], "Input", CellChangeTimes->{{3.802667799808613*^9, 3.802667806414116*^9}, { - 3.8026679066720457`*^9, 3.8026679098476467`*^9}, {3.802667974398497*^9, - 3.80266799336724*^9}, {3.802668297661792*^9, 3.8026683149503307`*^9}, { - 3.8026683572393217`*^9, 3.8026683618062153`*^9}}, - CellLabel->"In[76]:=",ExpressionUUID->"7a8160f0-d63e-44ba-bf07-5585a342b529"], + 3.8026679066720457`*^9, 3.8026679098476467`*^9}, {3.802667974398497*^9, + 3.80266799336724*^9}, {3.802668297661792*^9, 3.8026683149503307`*^9}, { + 3.8026683572393217`*^9, 3.8026683618062153`*^9}, {3.803812255734468*^9, + 3.803812278047453*^9}, {3.8039014397197323`*^9, 3.803901443058044*^9}, + 3.805104118707488*^9, + 3.805104157593554*^9},ExpressionUUID->"7a8160f0-d63e-44ba-bf07-\ +5585a342b529"], Cell[BoxData[ RowBox[{"{", @@ -10356,12 +10557,4075 @@ Cell[BoxData[ RowBox[{"28", " ", SuperscriptBox["R", "2"]}]], "+", FractionBox["59", - RowBox[{"84", " ", "R"}]]}]}], "}"}]], "Output", + RowBox[{"84", " ", "R"}]]}]}], "}"}]], "Input", + CellChangeTimes->{{3.805104186565771*^9, + 3.805104215478907*^9}},ExpressionUUID->"5133996e-8268-4c3c-8830-\ +b3c9ebe5adb1"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Show", "[", + RowBox[{ + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"1", "+", "\[Lambda]"}], ",", + RowBox[{"2", "+", + FractionBox[ + RowBox[{"29", " ", "\[Lambda]"}], "25"]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Blue", ",", + RowBox[{"RGBColor", "[", "\"\\"", "]"}], ",", + RowBox[{"Darker", "[", "Purple", "]"}]}], "}"}]}], ",", + RowBox[{"PlotLegends", "\[Rule]", + RowBox[{"Placed", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{s}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{sp}_\\\\text{z}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\<\\\\text{p}_\\\\text{z}^2\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{"Left", ",", "Top"}], "}"}]}], "]"}]}]}], "]"}], ",", + "\[IndentingNewLine]", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + FractionBox["25", "28"], "-", + FractionBox["75", + RowBox[{"112", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"59", " ", "\[Lambda]"}], "84"]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"3", "/", "2"}], ",", "3"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Thick", ",", + RowBox[{"Darker", "[", "Magenta", "]"}]}], "}"}]}]}], "]"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + FractionBox["25", "28"], "-", + FractionBox["75", + RowBox[{"112", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"59", " ", "\[Lambda]"}], "84"]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"-", "75"}], "/", "62"}], ",", + RowBox[{"3", "/", "2"}]}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Dotted", ",", + RowBox[{"Darker", "[", "Magenta", "]"}]}], "}"}]}]}], "]"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + FractionBox["25", "28"], "-", + FractionBox["75", + RowBox[{"112", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"59", " ", "\[Lambda]"}], "84"]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", + RowBox[{ + RowBox[{"-", "75"}], "/", "62"}]}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Thick", ",", + RowBox[{"Darker", "[", "Magenta", "]"}]}], "}"}]}]}], "]"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + FractionBox["25", "22"], "+", + FractionBox["75", + RowBox[{"88", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"91", " ", "\[Lambda]"}], "66"]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"75", "/", "38"}], ",", "3"}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Thick", ",", + RowBox[{"Darker", "[", "Cyan", "]"}]}], "}"}]}]}], "]"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + FractionBox["25", "22"], "+", + FractionBox["75", + RowBox[{"88", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"91", " ", "\[Lambda]"}], "66"]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{ + RowBox[{"-", "3"}], "/", "2"}], ",", + RowBox[{"75", "/", "38"}]}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Dotted", ",", + RowBox[{"Darker", "[", "Cyan", "]"}]}], "}"}]}]}], "]"}], ",", + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + FractionBox["25", "22"], "+", + FractionBox["75", + RowBox[{"88", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"91", " ", "\[Lambda]"}], "66"]}], ",", + RowBox[{"{", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", + RowBox[{ + RowBox[{"-", "3"}], "/", "2"}]}], "}"}], ",", + RowBox[{"PlotStyle", "\[Rule]", + RowBox[{"{", + RowBox[{"Thick", ",", + RowBox[{"Darker", "[", "Cyan", "]"}]}], "}"}]}]}], "]"}], ",", + "\[IndentingNewLine]", + RowBox[{"Epilog", "\[Rule]", + RowBox[{"{", "\[IndentingNewLine]", + RowBox[{ + RowBox[{"Inset", "[", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{ + "\"\<\\\\text{\\\\textcolor{darkcyan}{sb-RHF state}}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"2.2", ",", "5.5"}], "}"}]}], "]"}], ",", + RowBox[{"Inset", "[", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{ + "\"\<\\\\text{\\\\textcolor{darkmagenta}{sb-UHF state}}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{"2.5", ",", "1.4"}], "}"}]}], "]"}], ",", + RowBox[{"Inset", "[", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{ + "\"\<\\\\text{\\\\textcolor{darkcyan}{sb-RHF state}}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "1.5"}], ",", + RowBox[{"-", "2.5"}]}], "}"}]}], "]"}], ",", + RowBox[{"Inset", "[", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{ + "\"\<\\\\text{\\\\textcolor{darkmagenta}{sb-UHF state}}\>\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", "2.5"}], ",", "0.5"}], "}"}]}], "]"}]}], "}"}]}], ",", + "\[IndentingNewLine]", + RowBox[{"AxesLabel", "\[Rule]", + RowBox[{"{", + RowBox[{ + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}], ",", + RowBox[{"MaTeX", "[", + RowBox[{"\"\\"", ",", + RowBox[{"Magnification", "\[Rule]", "1.5"}]}], "]"}]}], "}"}]}], ",", + + RowBox[{"AxesStyle", "\[Rule]", + RowBox[{"Directive", "[", + RowBox[{"Thick", ",", "16"}], "]"}]}], ",", + RowBox[{"ImageSize", "\[Rule]", "Large"}]}], "\[IndentingNewLine]", + "]"}]], "Input", + CellChangeTimes->{{3.802667919328829*^9, 3.802667935065711*^9}, { + 3.80266800579642*^9, 3.802668008099038*^9}, {3.802668173388748*^9, + 3.802668258274457*^9}, {3.802668365597969*^9, 3.8026684259096727`*^9}, { + 3.802668527443355*^9, 3.802668573044139*^9}, {3.802668800392159*^9, + 3.802668806115922*^9}, {3.803812138614314*^9, 3.803812140731411*^9}, { + 3.803812198341434*^9, 3.803812302202159*^9}, {3.804222084574094*^9, + 3.804222099828126*^9}, {3.804222239986165*^9, 3.8042222734889297`*^9}, { + 3.804222322221203*^9, 3.804222326782917*^9}, {3.804222392798462*^9, + 3.804222489916087*^9}, {3.804222553367824*^9, 3.8042226442115383`*^9}, { + 3.804222735442032*^9, 3.804222780524128*^9}, {3.804223135088832*^9, + 3.804223157746235*^9}, {3.804223197172852*^9, 3.8042232464156733`*^9}, { + 3.804223292570428*^9, 3.804223297140161*^9}, {3.804223357281289*^9, + 3.80422342105267*^9}, {3.804223489928903*^9, 3.8042236240094223`*^9}, { + 3.804223657065524*^9, 3.804223790141605*^9}, {3.804223852781109*^9, + 3.804223880130396*^9}, {3.804223961085712*^9, 3.804223972607052*^9}, { + 3.8042240299069653`*^9, 3.804224030161584*^9}, {3.8042240707771263`*^9, + 3.8042240805619497`*^9}, {3.804224111383057*^9, 3.8042241208680162`*^9}, { + 3.804224165013245*^9, 3.80422420949358*^9}, {3.804224314816325*^9, + 3.8042243311056557`*^9}, {3.804224373919385*^9, 3.8042244275397387`*^9}, { + 3.804224527720196*^9, 3.804224529069611*^9}, {3.804224717576301*^9, + 3.804224719571175*^9}, {3.8042250324902763`*^9, 3.8042251043120403`*^9}, { + 3.804225142813636*^9, 3.804225275194055*^9}, {3.804227119704747*^9, + 3.804227135809744*^9}, {3.804227188477777*^9, 3.804227190336006*^9}, { + 3.8042426297615633`*^9, 3.804242633906111*^9}, {3.804397716227593*^9, + 3.804397729642684*^9}, 3.804414863361826*^9}, + CellLabel->"In[84]:=",ExpressionUUID->"19e9fcc3-462d-4146-8b67-65de6066d591"], + +Cell[BoxData[ + TagBox[ + GraphicsBox[{{{{{}, {}, + TagBox[ + {RGBColor[0, 0, 1], AbsoluteThickness[1.6], Opacity[1.], + LineBox[CompressedData[" +1:eJxF1O0vFAAcwPG74xhxL7rO1tku7nba0fQwT3MqTDFjxSHWVbccye6mmTw1 +mkZcoZuhOi21PBNJWapDXDqTTrFMGi4x5yHGdWd3nGrrfr8X333+g6/zxZTI +BBKBQAj/2z/j26SrOzvWvWb3GOku3C1UcbKWn76Jukx1DS6voYt2s08m1OiV +ZM/Yjn40l/2tN7EQlVWxyoYpaPV0UUqEjRXoMMI7xaGRQeVpXtAQ2xIM4bDT +WEwL0LeVX6c6SAINtxKpRzhE8Le+puL8fgKoYJZ5dItNPWa55OsdbsItsNzf +2zsgxwDGP4idW6zeBFX1DBuiTAcy7J4d7unUgrZO8ypN0zooiiq419CwBgr6 +p4cYZSsg86gp4n2eBmxM6lC/6ZwDkzfa+bdlatA9lxxnxZoEqVljuyqrRsFx +oci1bXYAzMh2LR2saAWb7vj41xx6etxs6eW8r4IbH0B7bRi3JWIUnEkb8EjP +nwR/dYX3ZSjVYF3hY4FQMgeydc3UzCoNOPV8n5ybtAJG350pWpKugQ9ri+Vh +leug5VnxCjlLC34SNNZH5uvAl/b0c3rRJugic16wDjOAhvT87WbeFrhkcKQ0 ++JjAR5cKxxxZBH+z0oCPxXvZRJCS0hzYTyOB3UGv5J10C3BbfMErhmIJEq2/ +3HfbRr1CUvtCCVag4XvLAm0dDRIppeE6tMQ461NgQJ3ojhItyRoMPiPhjFLR +8s8JyVJP1H2AsWybhWZG+5YH5qDvfkb7ZeehURYlxRoJes3feEApQ5Wvx8UF +b9HdoRs0eS/Kn6B0axXoqv4ERTiMOni+aA2cQgUKVUz2D7SRt2Rqn0f9Upmn +nFfRm8Rj+tgNdEQaVy3Vo3Snq8FKI/r/W+AfYipULQ== + "]]}, + Annotation[#, "Charting`Private`Tag$9070#1"]& ], + TagBox[ + {RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwt1OtPk1cAgPGWS89A6OvAklgHk1tnkTEw3CLoORIEh0W5CmQMyURABmKc +VkDRQWAUR7VhyiY4kSl3RRRGZAPOO6hdwTGc1BnAABUhFEEa6EpTSrstOR+e +/P6Dx/mL3JjjZgwGI/K//vfYA8myyQRoWYrzlMlkwlvWubwgA6B3aP0EQp0J +S8Pqk4U6QIvEEd2LahPmTXYPLqoBLej56rsxpQkv2MzcGVMCWrFVFt4xYMKn +svwSOwYAPa3Iak8vM+GL7uN0ehmgDRGdRcNsE66uca0cZgPaNyDcrcbRiGun +RLnRVix6L35/6ic7A3Z4FnuYz7GkPW833orx0GN5VGzoU3cLWlLXIKo6qMMH ++O5nXF3MaUlMxHxYqBbvbktuGPnEjD6T3C2oParB+svp9rv4TFrDGealxazg +f9buXk/5iEEvLH+6s/eQGktdKn37coxYtN/txIWJRRxkealjZ5oBC62N6Qny +eXwNBQTsK9TjHUUnTxbr3+BjNxNnF2p1WBb4cOgFVOKRRicrZrUWB9cWuFlk +jmMnm3Yf3KXBed60zDD+HFtvnxtRtazgKIbPpUMJT3B2XOkPTU1q/LW4ZbM9 +px6nDkw9dapcwoxZZp1Vbgd02WOMflKkwnmbwOMF3SBszuxQ/to1i9u8bgSL +KhUwa/Vh8rfVSuy59WaYaugV9LpomcRyncAqVDh64eRraJ+v2FRVM4qFAxy9 +7645+DIt2+PBjAwPzaX5bQlfgOcKPK4MXm/DSYmOGXcc3sGWq4Horvd9WChl +upSq1PDKiaK/U4t/h7s+fsYVqFegrUYQdC96FJrvGWV/qdDA6TMyX2HJBAz8 +0UfsqNTCd92R/efkSrj2iqcMeqODDWV1qWnls3B0IMr7kVQP3bWt9nk1Kmi3 +/sKqZ9gAJx992BuUuQRzx65OOnYaYfz306K3EjVsOXhKevYAA92qr+gVVK3A +kRhZCu8gE1l8lrNkma+Bxfe7tMXBZujP1ObGmBItzGhXxPJDzNHPttzP17J1 +cJwlbjvvb4F41c7zQKCH9sObNeY8S6QXlmy0xhpgYVC/8QWfhd7qt7GbAo1Q +uGEL4j4A6HZGmWKbK4P4HpLs+6NiqzuTaIXYua0hAxwzojXqC33c28U1J25C +GzlH/Y+wLYg2iAme39i5YUG0Qf4HTvdHMFhENtK/ujfPWWER2Sg0Wy6J1LKI +bCRenwks1bOIbLSdu61cYwaIFApPKOeP2gMiha79dTxL4geIFPKSOS1a5wMi +hfLid18LKQRECv32Jj64oAgQKRRnLq5QlQMihc6jdU95NSBSSP7Ly5zSHkCk +kF3EKqeXBkQKJY+x+zRSQKTQ8tp+dtowIFLIwa+zLWQSECmUKh05UvAaECnU +HPvW+HAOECkUfNrlsPMyIFLoG+betcRVQKTQM0lSrWQNECnE3X42XL4OiBQi +/yJS6F9MP1RJ + "]]}, + Annotation[#, "Charting`Private`Tag$9070#2"]& ], + TagBox[ + {RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + AbsoluteThickness[1.6], Opacity[1.], LineBox[CompressedData[" +1:eJwt1Ps31GkcwPFxm2clkxqP3dgmlyiUbOt2aD2f7h1LEorTVLORrAzWiUKx +dlkpWUeiKFSEXFLUUeH5hjTYsNHa4rjnmIaIMaNx291z9of3ef0Hb4PjwQdO +KLNYLJd/+0+f+ykTS0uIsXNlPLTL5FR7TtfEYR4xWurn2Afz5bRhdz4/fBYx +I3W2VRk35NSk90nT2CRi0mzu6+ldktMPy4fuvB1AjGxN9qCBv5yGBFh7VdQj +pnIsKmSzoZxGG79j/BIQY3HRNskpXUYzs4xSX3EQY/airP7n6Bma03ch2E2d +zQxWXr/bvXaa6rS7u5piNUaGv9UOEE9S0X73nS3GqoxWbKe62blxutfU+LSR +oQojanLo4L8cpfZl/Lttm5UZu5mlB7Ljw1Rx0Y+7xVSJCdkQ+ekd9NEZed7V +o+tZjH/SqUv2o29og2GqVa1wkeae2pTbLmimDmoxFea+85TZkm0cM1hK08DW +dtt5Be1PfhMsPlxJfG54vf+QM0uvte3Tz49qIW0FPHWlTBmtijspndTvIrzl +5d/Qx1IKPeObtg31kWX6I23ie1N0v8nzFkn5MAn0iL9WWDhJf25xVSx4i4mg +vq+FlzpOlZNjuUUPx4nhd4tuL2LFNNziyO1nVp9IkX/FwLPH72nauu8tJ05O +k4DpB/xLmQN0JHerk1XzDLGIVvNmG3XTp+5aA3yDWcKN6NRIz+qgNletx932 +K0iXb6DZ/aFGOsI/Gu9VNk/ORJolN10to44Vf6eaDy+Se7/bQZ5lKdHIzeT8 +lMCC5B9j/xL88pJcKWpe7VmpBJpSZ4cStw4SFHnn2NpXytB/utEqPK6b+HCi +T4UuqMDHJy51Z0QDJLOmydp2gxrcTbgl8E18T4ysau0HHdlgLCvmns0SE5Gw +Uk1HiKD34doaB/9xwgS5a1gmfAGeGf0XJCmT5PNFn7ZnWeqQnZ9U45w+RZwD +wrzbXy4D1cPCcbUIKZFqWfJa+jSgVVBUcCBORh5FjhXuW6EJjzR1j8gDZ0lz +sVtQlRkHTDINRpGzgujPrp+6AitAER63UOw+T0QqLN68jRZIFHqcQrtFYhYM +glv1WpB7MqFTz4gFutWxahr8lZCy7Y+k1cZKcC99LrH000rgBBdvr8fKMNzZ +ZL7j/Cqo3VlV81hXBUqk1yxvanNhQXjM5iBHFdacrT7w4RYXlNDr6+YLqrA5 +8SuPkI3aYLM3tM6JxYbWqLCqp3XaoOgpGcVTbNB5bWI/uw/DzkBRiouMDTx5 +qjDADcPluSG7eAUb1n29lNvjjkFfVy9Rqoxgi18Xeu6FYc+hRNMOLgIXRcKb +xOMY0v48EZBijSDOUByiF47BopE3tiwCwVRocYHjTQxnPe3Ttp9H8Dnjy+7y +HAzPhz23RsYiYNX8yjG6jcFD5XKSOBGBJuKHoQIMUTC3UZSJYEPW8h3t5RhE +T7uE8dUIBPXC3h8aMKxymsY1DAK/0bcrOxsx8N9yaqUNCII0d+/a3YRhQr6L +4/sKwblDvBKzVgw61pVl23sRZEhaI6a7MAga2g5GDiLI1nIoPfEOQ5G7ZPHB +CII864L+rh4MW0MNXQ0mEDyMidlTPYDhNyVHudc0gid5kkiLYQztKd45KXIE +TNOhstwRDLr6YXtEcwhEH+sHVokx/P8vaOVa4ngJhn8A0AJPLg== + "]]}, + Annotation[#, "Charting`Private`Tag$9070#3"]& ]}, {}}, {{{}, {}, + TagBox[ + {RGBColor[ + NCache[ + Rational[2, 3], 0.6666666666666666], 0, + NCache[ + Rational[2, 3], 0.6666666666666666]], Thickness[Large], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwtz3lMk3cYB/C3ffu+P4+gHGtGsCDQTTNQQQrIvH4PLHSFcTgEAYdXi8eA +qCiIErVFLudEDgWDELzQIVgB8VbmxQDJmHjQwTpEuWRIq0DrXlra7jXZH08+ +eZ7kSb5fF+mOiM1cgiBC2flkeNWSaQTB4LD/3XNoPKmPw+DcUOWmT1bEKZ81 +kQxmVOWVn9RaC8t+QgzOaTUPHWY9um/WIrvZDD4yX7remrU1eHD1PCcGf73b +XzCH1V9TdDpkOYMXSd4wc1lFXlrf0r0MbnCPjRxOY7BnwTJJtJHBXb/pr2xh +GKz7fE1MYuokNjcULrXaMYnLolXrHDSTWHGb5yzqm8RrEzWB2u0G/MeNEJ+e +dQb8purZAvthAz4mzFC7dxiw4k7Ixy2JRtw0nkr9E2zE3KyF11eNGvHB42WW +7x8Z8Xdp6l0F8VPYUHxI1Oo5hZUrne30Q1N42/RliWW/TGGVh9fV2o0mzH+k +dKvlm3Bf1yUx1WXCThbBh06FCaM1txrlsWa8IZMZlehMeGLquGjVczM+1eHx +s2SDGTNp9NHAKAs+48hflsnee6tfdXd2WvDLiri04QALbiED7F7NI8BO4/Ol +oMaC3QWvq/u3EiA6PdjWaEXA7icD/icqCXihCbIe9Ceg5bV3cPQQAcFu6cMO +6QRYvVzS/nYeB/pHRi2WOgJ8486GC2UcuOjRH/Cxn4CksDXfJFdyoOtCeLTO +gQPZncm+CW844Pc4dqN1GAfy/aDS05ELSykUrZezf9TazOnruTDKSx5UX+fA +2a1/bco7xYWjzqeddW85UCW6WC/8mwuFGqnvNCcunFF/sT9XQELS2lzbkQgu +7LefIS6JIWHRRaPn7CwuxN9fmnGzlAQizFTqdpsLnsZndzNVJOyaf2tO0QgX +NLaCZEdbHhR7+bh0O5Bw80T9yScRPLgSNRJjE05CfI2y0TmfB6qsgbzzchKc +Fugjj3TwYEFt2zbXayTc9T//rsKKgj3tWQruIAlBIp5JEURBbov1zN8/48HA +sTp56hEK6AfShwckPJDJH3P4LRT8aTgsKt/LA223i755Gg3p/nt7Ki7zIMFa +JBMH0RAsG/LO6+VBm7q6Y2c2DQV25x6Mz6LA12Z7rbKZhoMxb+V+ARTkqE/m +FZMITCr+Q0MyBS0ZKUPBGMHy92MRDWco4BeV19kqEHhGjiVIXlAgXuKenn0P +waHc/Dwplwb7OV7xxxsRhPa8uORN0jBi9gs7+ysC14zAJppHQ36z2LXxAYLU +mvqJaoqGrihpm64JQVbkteUTbO7ElFKH+HYEWpfStMzZbM56dDfgFYIZt/OL +zglokBbPurCqF8G9H/UpKY40eO/j569/jSDSviBK7ERDNwhl6X0IoqWbbUbm +0uDasXLm1SEEcaEluxcLabimTf3B5T2CG/vEffe/oiHn+f5Ajw8IdDvtqwrd +aIi5kemxYgzB84XCJJk7DaYDhWTsBIKPw/1aeiENYitlTcG/CFR6+95QT7bv +WENxBYNAUXOzZO5iGt69vCO/PImgji4MGWP3gvLW1a1GBO3luqsnRGx+xdMV +qikEXuFy2RZvNn+8av6ACYFtSaCtnw8NtKTHZtyMwEb57f3pvmwf9wGjxYKg ++Wl2gprd/wMkyiCG + "]]}, + Annotation[#, "Charting`Private`Tag$9137#1"]& ]}, {}}, {{{{}, {}, + TagBox[ + {RGBColor[ + NCache[ + Rational[2, 3], 0.6666666666666666], 0, + NCache[ + Rational[2, 3], 0.6666666666666666]], AbsoluteThickness[1.6], + Opacity[1.], Dashing[{0, Small}], LineBox[CompressedData[" +1:eJwVyX8803kcwPGNaeTHNnHEHvnRLpEkqYfq+H60/FiSHxUeG/LzSkRXl9Kl +cwkpKnJHFNcV+rG7UPmZe08JO2eMWQttbfNjyM+l0sS5P16P1x9Pi4gE/2g1 +HA4Xvdz/v0HvLRMylRAPC/tbjOWYiLZ5Z0KgEowpsblsczlGXZHdSTygBBfq +p9Eb6+VYWdvuz07eSrDwahiOdpJj9d5PGUWYEoZSfayMguSYLPDG+0M0Jbg7 +vvN8nC/H7OP8HEYnZsGk+IlbvdEg1pHX0ahKmQXBvm2sUNMhrN+N/LgjbwYY +uy+H64WNYMcf2QS5105DGW/qBSl/FPP6miamcaZg5masprZ4HAuJ9Gr6ZnwC +VB+eZBidncTOO3BWBWx9D5/vK4qLL01jbk1ckynmGNiYM8LVVs5i3hs6v9pl +KkCAD96edk+JRS2m+j4XDoPhGgukcJ/DLHM6Au8uDUKbKe8BzfkTNpnVwnvt +IQeZe7Cu5t55bCGyweJJgRQuUg8afpuvwgIvv5mLzJECKSb/Iv+OCquq+MQ1 +uCwFj8Yrzy6yVdjhr1tOJP4khdGS4+eXmlRY92/sF9tDpcCy/fWWx4QKe8C9 +HclZKwUqq7zR2m0BC9iUUtrx1zvwmikKTPyygIXNZfp3ZUqgmspgJiQvYqGN +9O9tz0kgkhYziGUuYsFpX5MuxUsgxuBEkfGvi1iQ4Q930H4JnGz9WC9jL2J+ +W4OmK6gSMCZMTPYNLGK7Tq27mvNYDA85L2RRLkvY2rkXXP/et8CTWZ00JuDQ +8AcV6jUfADFh7HbTAA5JI5iWOvoD4PJy19WkQRwa6KpVp6sPgMT3oZvTexzq +YZ9qqRjqhwA5x/EfFQ5xoqa8sh72w3dOPe6upnhUJJAF0B37Yc/VqTXpLDzy +fcqNq/ToA0Nd4fzfUjzysly/T+HUB4XdF3/+fgyP3K+nbzKz6QO85s2D3yjx +yDmOPpul0wfXZLkbrhHUkA2t8fQR/htID9qrP2Klhgh5FRfMWG/guoVF73fH +1VDdyfyC7HgRaIrKFVNEdXSV01uhFSaCxHCjMzkUdRSla8BN8xPBtHYI3tlU +HemVX59PdhTB2BVHRpXdsvdlMuO/vIadHiZ/GQUsu+s5qk/6ayDzNcPFZcuu +F/47uVgIv9X5E8d8CWgHq6Q265oQ0lefJc2wCIh0/22X5i9CaJtJZRMOE1C9 +KxOPjxKC0VYzon/ysp/aHzFjLYSaxsL5jIfL3u9G637WC9KV8xmniRqI9MDm +/o0OAegtqFqs/9VAtj8Mb1jJEQDJC5dtItJAe7b/8TilSgAadnmRqwc1UDp3 +dc2xfAG823So0nVBAy2OarZ4hAugtNdXgW1cgd7bjMhVH3rA67ltuk7uCtTG +vmsWRe2BhoYDla8OE9Hwj4fu9un1gGMDddvTU0REcDa18sP3gFmNg+xpKhFh +Hbl2LsPdINznt3eihIiqJ35xNq7ohs8bfV65vCGiUrsw1r/0blhH0Km+5KOJ +LlRQ8x1j+fBhY37SRy8tdHtNsiItmA9/t+zgD4Voodqst9tfe/NhqJNxZCZB +C00eKR5IsudDBXVLYmieFmJamFvCXBeYX3nlUCDWQg65a/9kpHTBpqnKEt6Z +lah55EB6o00neL7l7ypv0UZfXhpah+l2wopxs1QY0Eb2vwvb1aZ5YJMavGtp +VhvdCgqieD7jwdGzIrVPZjroRy7rVjfGgxOJRb6Cn3QQ7VFE1ciBDkgiudKr +duqi1PjjYsrP7UA6Kh5tk+ihPa62QQ8i28Et1yxvZl4PkQ0UfOTZDglB1RF7 +DUiouO7QqwRKO4SXr+cVMkionuDD7rj7DxQ+MyGzq0lotnDj2cw2LsjsOfY3 +vcmo7tio0vxPLmg6l2hEB5NRCio9VpvDBYar2NMnloz0hqnhI0wuPJLtKE3J +JCPrzTqebhNt8K4yXxLeSkZhrWOGeP02oM5X30lmUJBVYdm1go+tULNZ5B/B +pKDJuAgt+/5WkLADTsbFUtA5/b6F0HutsDt7i7Yym4IKQrjy59taQcf1MFMk +oKBOZXnlGVYL1Pg/0b9wVB+5mEd7T99rBunB8bDBulVoyeVohHNGMyiSGuxz +u1chTkjC6csxzXB+0W48bXwVohcl3aHZNUPG/sZZ+hoDdF7Nsp8neglN6yLd +2TEG6D/hxiz/ + "]], LineBox[CompressedData[" +1:eJwty3s41PkeB/DZmVItxVG7sREbJULGrZb45Gy7FE4bWa0Q7bp0jqXQINEc +SZdNeVwyJZcmK5e2olKSvr+MGdeZxrg1MdOIYeQ2GPObZDi/fZ7zx+d5Pe/n +/f58ezzGJ4xMIpEiiPvbrFvPFn1rWCC8328bLPgSE1zbsjvSpgmC5zTDz0yv +wRICpAWHJWwIGs+PnHBZhTk6v+UUqtmQsJm+MKy7ClNuap8Z+YYDy+0CMy+Z +BkYTPXJP8uOAgu1x6VgukUPOzhW2cYDbfrcmamYlFh++3nP0STM8HFqo5jas +wOzdNWg2gmZoairTnmeswBRmn0qSppvBUeQUGxe/AosfEys1LVqgwfna4ZOW +K7C4qEqmTXELVKz03LO/hILFxrotJF1uhQKUp0i9QcZsfe23sspaIermqr5M +GhmbtTP7SaupFUrMWk58+JmMxc5rlRUttYKrv87sET0ydirx7SFWXBvsvy19 +cLzoC+xkakyFVnA7hNVnB1rXkrDoK4VHim258Et/EE4xWkKF8Xn357y54PdE +WPdGrkYdwZkkjxNcCDfEhica1cjCLqVcXsyFFymMqY2RajTSH6hyW8sDLUOf +Qb3aRRRkZcAYHuWBdfXBMp2Qz2hbJHc891982AckWt2ICrkGtX4FgXxgHyxX +271WIT8fNoyd4MOvvuplWYEKpe9pyHG5wAfv1D02JB8V+qDzl/NIPR9sQpnN +XRiOCuuu/rHLvBOoSakDN8uVaIOm1453FAGQNrR0/VCoQNYBdy9W6ArgVk78 +huRkBfKoWBhK/FYA9f81OTD0iwKluFfc3ggCqMhxLD2wUYFGzmus8zsjgBke +3heRO4eeL2LyN3IBUM/luyTkz6LAKYdatqgLvm/Mylv9So5oLpm6eRNd8FeG +Zy3njhxlXR2O/u1zF1j+tPN95QU5YlvkmFH0u0FOMvk05C1H1hFyxt7D3RC/ +0o9pjE0jkqQyub6tGwpDawL0v55Cf3YauVU/64HNd7mL1LmPaMQtP9yZ0wMv +01/pT7A+om01666yu3sgmuYbKs79iMqy1b3CmR5wPy+sPrGLyL79UWTLXsiw +O31c+9wYKu+5wfAt6YV0mdWkk54M3Reulc9f6oO8x+f8I2Kk6PHg5yKnACEc +TFlsuFkkQZW980faIoSgmrL1U56VIGb7tG7AaSFMeA4+PHVUgrKfDmUkZQmB +6sofZ+lJ0KnL7dHPOUKw23Y4jmn+Hu2kFrg62r0D40bd0g5TEaqiO4mpWv3w +I4denLlPiO4aJRmavxqAopBq5T09ASqK5q0RdwxA3bLBa4aoEzEaTJTZ/QPw +7z9yHOuZnejaUR5vUTUAr72+VuRYdaLEfBM6304E3Vs/5V79gY+8tHkfEipE +QDv+Mqh2sQMpl7aUc3LFgBnWMIxNOMg0Jly/xkECLV2m/rpNNShCGmJPnhwE +fuUcd9ePzyCSfiyuqmAInryN2lyXwgXW0Vb1QrQUEqu9BXv39YE277yeesso +bJHfcbgcLIan9IrUPz/LINftRZeq6gN4tRmdJj39CANMTer1e1Jg7r51/UnY +BLyfp62pDZbBodFz8+ucp4Ab7mTqbjQOs5a145tmpkH70aYljSuTQBNW3RiV +yoGe51SUQpaD4EFq6yRvBoSM6Q6ZxQzce5O0z7t8Fq7oGow12M1CRZaFdDln +DmRWyTtk7nNgUkjhaZ5UgJKePftyrwLU9WKPJvd5OLC6ROJhNQ+U5JixN1Ql +6LSQw4u3KSHtwnaBvRYOW89a+ziswYGbVrpE0cFBmHiRbbAWBz268Y6u9TjY +JGp1Uv6Bw4MzeumnNuGgMRxRzdcjdjGrHR9Y4HCnc+F22HZiFyC7abYfB9uQ +Xs+z7jiIrMtDv8nAwbCo99fgCzhstzS9NnYZh7SxepfvCGPNS148z8TBQPjp +6XrC1aaM9f55OPRN7ElrzsXBXv8SO6cUh0aqxnULwiuUSPO1LBxGkuOZ4kYc +ekjDfgMcHGZ5XQmPCY2XjqVVteHws2vc1EXCWpV//34BDhu+347tJBycdM/M +GCT+/xm0cIbQcpxV5ycl+tJHYi9CmgxGTMdwMOm+H7aZUGtoF7DkODwTHgrE +CP0lj/+TrcChJd23I4uQKdrJCFXhQKl8+D6EcPJdVZPNIg7Pf8++8be735rN +LC/j4PB//wcAV4Nn + "]]}, + Annotation[#, + "Charting`Private`Tag$9179#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}}, \ +{{{}, {}, + TagBox[ + {RGBColor[ + NCache[ + Rational[2, 3], 0.6666666666666666], 0, + NCache[ + Rational[2, 3], 0.6666666666666666]], Thickness[Large], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwVkGs01Hkcxv9jYoTdVBRSbsVKRLVWmuOX1Ky10ZrKisq1y8jmUokpk07a +LTsqewpLMq5ZUS5hGtX35+jYWTqHpMk0bvOfQsKwf+M2LmtfPOfz4jmfF89j +ERrFPqFBEIT3Uv7n2Qwj9eIiA5eYcY/LapVwJ6jduG+Bgfdzk3qOViuhyobv +gucZ+BsWz6/niRKm6hYvJKkZ2L8s0EFeooSkzv4xYoqBj2rwEvuzlJBmXNNP +G2VgVl5oppKnhKfZvu30LgaOf/NYqGYpQZ2b8hdDyMBdnNpQtWQUElxV6bQI +Bl7ApusqFCOgzdy92caCgWc3C2+OLw4DVXUuXSTVwmO1+fJ15sPQVp/rvpuv +hbNOtfz6cMsXeGlX9se4hxZOMRWktnkOQY59peU9lSa+PNEpcvD9DJ2FD34v +LtHEwu28/APHBmHjtcgsRbAmZm/u55snDEAItW1w1WpN7CkjbD4l9UNFs1T2 +S/MyvOVDsUNw5icIXMspcb62DPNcQ1pKqz/ClGqsevzbZXivu4+jQKSAwl1H +TnSO0HFK4Uqv4Dck7FktOlyZS8dcYaMu/60cmMF0s2k2He9pEF/ykfaBp4H9 +rQhdOtYz2sH/2N0L+wIOMFtfaGBtY9arvb3dcJDBvhN0QQOLWX5XzxNdwGZ5 +W5HWS/0z8wDjKSmUzzrebpfSsGdc7MbUifdgskYlGE2j4dOuTvs0VkkgvrFy +fM6Dho2ECbXj9A4YeO8z6KwmMJ+V0jxs2A5VIR11PdUE9uRIfmtxaIOzieym ++JMEvjFyME7b+TUwiUqu2wYCR9u52k77iEFlq981nLsImfXKuw/0XoGt2+3z +LlqLoO/Pfe5UBpBk3uovi1uA6K+jI2kNdfDMmqgPlc2D4KalI+X0GAzV46fd +veYhaWJTyNaWbLAVPRWr6+eAyObuqqmPQWY5p4uzLOYA7+gop3cXIBef7tY7 +aWqI/jAUV+RWhbZbeVw8o5oFx7DRwYoj9ci3iROREzYLFaMG53bMNCCbQyEr +HnXMgPn96BEtZhPq1fTalrNzBoxkd7UKPjcj0XVK0F8yDZmclVclh1vRRdtb +qQZ601Bxm39PatSOhutm7DbETkHfhRmt0uQOlGxgveYKOQkujbSbwlYJWrjr +wXvFmoTIP1vf1vpJUbbCYltIjQpmbXRdfn4hQ2OmbzKk1iqYOHPsZJ5lD7Lh +xlxy5k+AJEDH5EZ4H7pa1F46pKZggWOmX/dQjrp+3BR4coaCd4cS0znlcuTy +70VdcpKCmPDwEtNqORpzWx8pHafAyi0vKvmlHAV3nrIXD1BQJs5PC3gnR7t1 +558UvaXAkLjOtqCTiIixqQl+REHB6yAPkyASHV3LPdFVQsH15cyCnnASCV+8 +NvQvpkB3IOpeQQSJonVi4w7kLfll4LQ1jkR9Bc+/c8ugoO0f+5+8U0mEJb6i +ddcogKC1fkX1JDJNLIzISKKgMUNvMraBRPFWUyareRR8v/+LnfvfJHKMvn9J +J2FpT7l3QG87iQTLB5gzZynYw9MWWw6RaO7JzpHzkRRETJSuVylJ5O/Hzxnj +UOCxoKMrVpFIv8BpYSCcgiiTsfIomgJF/pD8OCyUAnPBl7C9DAUSKyXHe4OW +fEFalfFXCrQx3XZF4DEKluevz1KuUqArzMtLX1NQ49Vi0mSkQP8BlbudHA== + + "]]}, + Annotation[#, "Charting`Private`Tag$9223#1"]& ]}, {}}, {{{}, {}, + TagBox[ + {RGBColor[0, + NCache[ + Rational[2, 3], 0.6666666666666666], + NCache[ + Rational[2, 3], 0.6666666666666666]], Thickness[Large], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwVx3dQUwcAx/GXxcPRyst4iAtEiQMZ4gBx5AfFYtmyQrVKBVnWAiJWVpUq +jSiCg5iqtEbUiDRYUJEIDYqjIMsagkgZPdCDIl45giDKStM/vve9z8KwOP8I +JkEQ3ob+f7KmqH+NVC9K2q6u/2YpBXXknY+Hz+lFrlVkRr3BxES5cZ1ML+oX +N2y0XkZBIqwR7rygFy2Jqrrbb7A0tTtMckkvsh3zUcVYUyixottbbuhFU7c6 +iWhbCn3Jh+sPVupFB/5NL4pYTSHE0r+ovFcv2sl6tz0CFAJvJZibWhCotKaY +32+jcDTS6VLbFwTSS0t+1CVQ8EhLCm9IIPBsS3oekUWh9rjdmbVyAuetPQft +FRR8i8KGC58SUATZMlWVFLKrZ1adGyHQZ3nq012tFMJcVjYVL2Sg88GC3GtD +FEQajZnWgwEn4RWR4wwumkPe1MYeZEBiPP5w0IqL+JG0Yl4+A5djKd77TVxc +GzrR3lvLwCFxgVWOmItT/8yKd3jPwNWFq276JnBxRGfifMycickOHBdncWHz +LnNvoBcTEydiZ2dd5yIuKLXHN4kJ9h3GXb+HXJQ3vMkNzGfC8/RAlriNi4r1 +f/6qaWRCNndj0skRLh4/sB8VjzKhNzbmELN4yFg/rSh4MQtza5SKq8t56DD9 +quCoHwvSbfufvNjMw4Zp1q3lySw8Gw0XuIbyEDAUvy/6OgvmS9N/7krhIWHQ +ARbPWQi5UclVSXlY6hsXZPSRha6T8kOmv/EgU1hqd1uxkVvablpUy8NMyl/S +4MOGk7zi78TXPKxL/JBflMpGuftU2n49D1OOZuzfC9hYoNTdHZ/DR51JWV7T +czbuSWJyS1fz4dNdmxc2yUZdiE6g8OOjrfpLzbiQA+50v9gne/iYnLnb+7Ev +BxXKjY9iMvho9ehZyUrjILM0JmLLZT4qfnnl6aXgoEVS8NK/go/AvuBnnzRx +EFtoTpxv4eO9u7ukdZwDm0fDO0gdH3bGtzM0i42w7lVvzdh0ASyqct+6bjWC +stRzz/IlAszO1h2rTDGCk0X4mR9cBHi6tfpkSYERhE6qNfROAUwOClo1WiNs +IF7ds00RIPRWV8jEhBEi5MxVe6UCRL62dJUvIxHcJTvVVyJA4vLurz0DSBTe +C5Bm1gswp8ms2iqNxNkBm78KewRI2lebm3SDxJnIOM8ZTBqdViOyZg2Jlqtz +7XLm0ZBxc9yym0gopSo5ez4NH71waLOWxAfzTpNUg++3hnirmkkQzU+GoxbQ +uJSlZl18SWJNIOexiwWNUN3R+NBOEnmNouSRRTS61VyP/j4SmWWfee2wpnGx +UDl65Q2Jko6xRq3B/jI3xfZ+El4mzn4eK2g8ivuOaHxL4lqsX7CjDY0rlm1l +xQMkjhS3R1N2NMIz8xcdGCZhn7Gr4A8HGvMOOGtsRkhceJC7csMqGs27tId6 +DbZ381bfNthtPadNPEpi+ocgrXw1jcUD0aedx0iUlarJlLU0OtoYm94ZXPN6 +iWzQYGnNxbfKcRL7x8ysohxpsPMbPp8/SaL35lm3QCca6uyI4RcGb3Mwe1Fn +cGLKVH7OFIn73wojXdbRWBH1k6+7nsRAQMWoyuCeAPtJvcHVrc3HbZ1p/AeV +khCG + "]]}, + Annotation[#, "Charting`Private`Tag$9265#1"]& ]}, {}}, {{{{}, {}, + TagBox[ + {RGBColor[0, + NCache[ + Rational[2, 3], 0.6666666666666666], + NCache[ + Rational[2, 3], 0.6666666666666666]], AbsoluteThickness[1.6], + Opacity[1.], Dashing[{0, Small}], LineBox[CompressedData[" +1:eJwt13k0VP//B3DGUqnsoihrEamUikpRWaJVlCKhUp/IUipbu1SKkLVoVRKJ +SLY8bwghO9mXMZgZ252xhvjd7zm/v17ncc4sd+77+Xq97ig6uJqfpfHw8Gzh +5eH5XzU9NTkwNzeBw/9fpR0rfr+ZnsAmu8plb6nKcI5LNpyYQJV6C92Iqte9 +D7k9GpqAzAP6rmCqpoR/GFnSRr2uYsJMnapLyq2mNLMnEPZ1z28fqnbrZM2z +8ZjAirvgRFyZgK+4t1ImcxxGL/hLfgyOo1Zn5W1u1hhu/ktZLFA9BsZC+wN6 +L0dhWlq/tqduFL6ediUSASOwu6KVWzMwAl2rh07OJ7lQal3WskRgBJ8Zu67X +7+GgfExwh/5uLpLd1qpL6XPgKTYutFafi6SZpX8stnGQt3p1wXI9Lj5IctbX +aXGgtTdzmraFizd7XjJqVnDgP3Eum6HORUTctFnVJAkdml2LoAQXvmfSl5Ul +keBP67xWzeDAm3xZLPSBROE8JmOuiwMv30cepm9JEK/fXV7fwcHVMIeKX9Ek +shnh/yKbOHArFL1T4k+iUZ9n4lYFB6dVLrJ+2pGY0UtVyc3kwJSxMpOQJDFK +TxPoCeIg+Ubh0yWiJCZVdDace8yBxNLTrs4LSfhf35LQ/5CD1v2vVsnQSLRr +frwx7cdBm8sm9Y72YQT/G5vb7MPBKil5xvawYczOpajJn+fgmz332OTsELIW +j03m7+bgVsQ6kbixIezbouEXakB9f5lz0cGBIVRfTnhxZif1+dp92vFNQ5AR +KwkQpe4bz/xWsaPpQ3hkpXX7/gYOTJJ/lqX9NwRDNf1/I4ocNE9F7XStG8RN +xQt3G2kcLPhq6p1TNoitF/e7reDlQMd1Jn1ewSBM95W3Os6RiOg+pf4qdRBB +Co56c9MkDpevkqoOGoSan5z1gTESJbHp7A17B+H/upz3PJPExDHHlTf1B3Hv +gttYQy+JVeIydmVbBuEsMD/QpIeEn79P/elVgyjSeZC6kU5ip+suIoxvEK/X +vBFXbyWRoV8VPv59AK4GZy2jq0j0TN2u2vV1AC8v837cWElC8uvGhU+SBvBt +U+avqt8kLq2OvKX6fAA8zHgPiTISmuK2TlaeA9gj8IrI/kkirrtfP3vDAGKa +Onye5pCojY31EVQfgJpSTLZ1Ngma1cEMc8UBnBhOHlqVRcKu/ItGv8gAQq2a +DYoySMh+9VoiN9iPGyYydLUvJEL95w1cj+/Hk5nVfrcSSJx4TNMRftGPCDM/ +m9NUzpRC/919EdaPPJ3DPXvjSXyJHZHF7X64MS5JK70jUZPeYcZj0w+raNP/ +5l6ReJbdHBls3g9z/kfreSg7EPXdCnv7IaGnWsz/kgS3rMzHYHM/kqv3X1oa +S0K8+1viHdF+TKn7rXenctvM/DIhPq8f7sQnenAUiTdDn3a//cfG4CUvv/RI +Ehum3rYUsNkQWeUfPy+ChLlY8EKBn2yEnInrbAslsUz60bHwHDasbvT6LadM +l/N/u/ILG/XPb2+1D6Hur5rvNqOXbJhpi/aPPiHxdOd5p/tebBy+ItC6P5CE +jeHpb9JubGTRbO4lPyahYmbL98GRDdEW49MSlNOPWjwvOcJGNHOsghVAwtfm +YJ+VKRstEbVnrSnvcTDdyNJn43r09d3VD0nUXdQvW7CWjY1jX3t+PSARc3mb +9DMVNuYSw9L2UT7jtfm0uiwb+QGdzbX3qT70WzNtOp+Nce5Hk2Gqb3MDVI1b +ZlmY1k+JukvZL1jpqdMYC2LH11vKUZaMkdF4TGdhh9D0Kut7JFpfS1yTa2Jh +my2/ES/luHjhgqRKFnoWCvYk+pFw/rRARK+IhTsWnPnWlLXT+K1/57LQlZmX +IUx5JnPu/ck0FtIFXUaK7lJzJm+KO5jAAvesYOFdyhalZIBwJAunF2tvWkhZ +rqq/4UUgC2e6Zzrq75Bg1PcqrfNjQYa2ZOM7ykktXS7wZuGoUtJGL8oeXa3Z +B91Z0P040nuY8va+P4Kd51hwz1EzX0eZf7DG3M2WhUCDJ95ilMu5v1/wWLLw +jOfy2cnbJMImS9jBZix8eqsqw6Ccf1cn+8cuFtZNX/Oqp0wKf3jI1WXhrI+T +cBnlFc+kjytrsWAZdKGlkLLZyvtqFmoshJR2M/Ipe6aMT/jJs8A3a7buJ+X3 +2xyLvy5hoUlnBf73/rqi+ojexSwENLZENVCmmRs6SguwMBi66EcP5fVt6ZtM +Zpiwu71j+1/KtudVBLxGmFixRlDkf9f/eORpXQKbiafhs3qalLNv8MU1dzFR +Z/jr937KzAWXLy9sYmLLUeGCS5SXhNN3ba9iYsTXVymG8h4Fc/GLxUx0yfwi +f1F2T/zRFZvHhL1eyoYZyi82a6VWfGVCP290YAN1HuU/Xt2aS2KiYpudigvl +qX2ih9bHMUFbV9D2ibJa4015++dM5IyNLudSPnp6eCgklAmFjlrWVur8/YZs +8/IfMiGiY2j0gHIn/46TKp5MbEiKLFxP5Uk4+NMaS1cmnIsdyUeUt8sun7nn +yMSgUxzRTzlSa+ZZnwUTsjERDllUPgtznS7I7GMiWOryDlUq31zjFt29u5lw +EBaujaZ8wDa78aMWE7xshW2BVD/4slZ/aFFjQvPwjIww1T8fPaKvLVJgot/6 +ZOFTygKPPJe4CDOx70BZ1Ceq33K/bbbQ6u/DpZCi37JU/7J3vVd2oPchsmDB +pwLKMhVSI6FNfVA1rvNzC6LyxxgNGS3uQ/iAtHYT1f8aYmmV3+L6YOhQq9lH +zQurGKWXzOd9cL0UevHbU2rvqYa6LH3ahwp+es3jMGqe6Lkv9rndh0llq5XG +1Px5dmGd2Q7bPkgvexI4Rc2v+YWJRYXSfVjzeSje/g2VF+fbI4oifdi8zW7z +bWpPz0gcU7gp2IeIiBqJ93FUXk/TvHXHesGzL6V27j21p/mOaybX9ELh4gKx +0URqviauPbGwtBce8v+IHZ+o8z3Cf//8j15kPigng5Kpvf/2c6dSSi+MtJaz +dqaSSNgtGBYZ2IsU62tDDGrex/W3EKN+vRj3mDxgk0nl5Wnq4GHfXjiwgxya +qP0Q2m1jvMipF1erLb4zckl4302bumXSi01ZQ9P6BSRMC+zsL/D1orp+Lkyq +msqj0+ag4qkeBKiUmffXkNghsShHhduDKxK1WsV11Hw+/U2yo7MHw4zXbiGN +1DzmEy45ktcDdgIP3DpJ9O/KWavn1YPtg9822nNI9LKDrZ+59eDBvy9+MSNU +3kIdH0yc64G+q7tbO7WP6+hi9NSjPXD5YaZzdYo67zvnw1dp9+BEXqPzOB8H +j/OlZkSGGehNsk/Rl+FAPkN7a2oPA0RpE5RlOfiScMTTvJWBrF+t2iLUc1ZT +cMho2C8G/IOGfOeUqeeVU4sHl8YxkFaSWmy0ngNM87crH2dAcl/9K29TDsyH +leV+HmRAtXD1fdZ+Dnrpu044GjGQ1GYXan+Yg0Wltxo+bGTARs3G9KIVB1ZR +MxWawgyIKM8ljDpywNUexZaCbkQpLS6suMfBPTWJ2casbhgZEIoN1POUjNyG +7d4p3XA9KenTF8jBTj63zNzYbrgkNh5Xi6B+X3V/ioFnNy6+OWerEk9dr0v3 +azPNbojXuISLl3FwPL7m7qlIOvaxH13dLMuFuYKj4esgOq4TGo47FLgwi/4r +2H2PjvtTh4oOreRC75FCgKMHHUJ770mEr+NC0dUl+OJhOh65b7sfu4cL1mah +WJ+FdBysqLHLceOC/jnW9juNjt2d+x66X+WiRU1LYe5vF0w6eZdv9OXi9zKr +t3eYXfAuov1qvM9F6uy7hIc/u3BVsF045SUXXkUGGZE3u9DRYxQbW83FpZ31 +15qudmHohkaEeCMXTpnndWVduhAgbSsV1s7FyY9Pcl/YdMFL6CQ3t58Lg6C2 +/He6XbB7N6H/QXAEC456VaaNdCIuyMlvfMcIontSmJXnOrHLcpjNnz2CNR8D +cyxtO6HzqL6Onj+CPJcLQS0Wncj0uvyipmwE9All7T6DTqSf79jPbBuBulDk +zVnZThRt+h01TBvFtZNTa0686oA5pNIDDo0ipjet5mxgB5JzNNrCT4yCcL3o +6e7dgX2GEzPpZ0Yx/05nwQOLDtRtepG6zmsUz94Xnfg2vwNbNSX+Lns7itzh +0AeS7u1oj4++zp4aRafnvrUKtu3g9JeVGgmOgZ8mWKdh1g5fZQ/fLLEx7Jf0 +kt+9sh2Pucsy6GpjaNc5leHe1IbyCpbOXqsx8N7RYFQYtGFxv2RMYM4YjCQL +dz4UbwVpmB1lGD4Ovj97Xw3OteD2mF6a39txENGVPOaDLXBiix3tSB2HrnzL +j2UlLaCfHRNjVoxjjTp3d9L1FvjxeAfvF5qAhL6CSSWzGUTYZ+kYf+p/F+39 +h40NzWC22PQmR0zg8U+NBVEFzWiXnfrb+X4CgmZbSu1eNFPz58j42+IJTFke +2Mc90gxTS+2oJKFJdDr5HpJCE1Q8ld8IRE4idi0t1SupCWYhqkKaCZM4wbkv +1h7dBItP02qeOZOovfq05r1HE8KarAu9OydRdPujhY56E26Nvty0dc1fJEU2 +WlmHN6Kk89y2/tK/8CrQtn/t9AfsmjnVCNVp0ELelhid+APn+cfLzfSmEWAr +vn7A5A9yPa2/qR+ZxrO/w7ObV/3BeHli3dmb08hdlxhT3tmARVqGIS1N05h9 +rtg4YdmAR1XglYucgf9/wTtj9zRgqWoH+fTzDES2zL3ftbEBqdXLfbaVzECh +pvVKoGgDvrgZK8lOzcBgfpSEclk9jC+lma+2+wc/D+GDB/TrIW0s9Iu9aRaL +dl3PGFlbDy2LhRJhh2cRLjKwPHp5PXY++5DgcXEW7z/+GuieqsMR/9iutnez +KO70C/D6WoeVese6Ty2dg9D+6Z9x6nV4xWn8XS3AQwSvZG6flqzFectbtdWi +vIRZAKtIjVaL7OXeq3VUeAnBYfaho8M1aJmduFu2hZfwyRw8k/qrBpusvpz2 +OcVLOJqNPD53owYZ4bPiIqm8xDb32dbavmoYO5Nt90/SiPH6OUfe+mokzMhF +0DxoRMpWXs7a/GoIql6sTwugEav4+QUCYqrRgZK43EwaIRq5QFP/cDXk3zLM +fKT5iN5cyetJ2VUIeFhhYdnJR7xSXDKvOb4KEbmPBoOn+Ahrf+mQeeFVePBH +3F1Eip+oOrjsnYNrFex6FKoaTfmJHLr8bxmVKiwSN5jNyOInFMWObhWSrcSY +/7vTt94JEFc/3PHOIcpBt76XeOT7POLO/WMxUbHlcM03cA/pmEc8cVyTd8W7 +HMp/GzU1aPOJDyoNvOu1y3Hh2gX2NZP5RPOr1Q/j4suwcHLMP7ZpPrEjuioy +MKgU7YOCWy+ICBGmnu+yLjiVYujz/RBpHSHi2DHvFmOTUiiWri/UtRci3KRU +5Gm0UozKuCoy0oWINyHX3l+98gsH16YWCjosJAQDVnw9ZVOCIL7jN63qFxHi +/400bNctgWP3pdUmgosJeZOSyaVLStC1PcelcstiQkfw0va6ymKIbzY3/hyz +mLhw52eBye5i1MuxhHldhIkKb+caLfUixJ+18CuSESWajxuMCs8rwm+9yJUf +N4sSfTpLlgx0/6Tm8/4IroUowTOB4+9jf8Jrk3dYVqgoseGyRNcysZ+ouDUa +biUhRoQ7ZQ/zTRagnna877e6OCHolX6UU10AgbOGncpHxAlP/+Tv7YkFkL63 +x1LOV5w48frNo6xTBSjLVkvkqxInVvwJUHUtzodDRoyr7C0J4gnDL8jmdT5a +47dMjHySIHi4N8b2+uTjjdduleBWCYK+6HKByrp8nDu+/c2q7ZLE+13Wp5oj +fuD7EclkawEpQvqQZVGx2w/8a2jv7tCVIh6cPKj51fQHPIOlw81dpYgLnrun +n8wSMHaUvSLXJkWsS9aINHQk8Nfl8IbZwiWE28bJWHunPLi32HtmlMsQ5gcG +nLbL50FFR6YpSmIpof1fp6507XccKHMOHLReSky+KKkv3/odih3vVstylhK3 +haIX6wjlYuLlgWfta2WJMysDW8TzclBZ9Xj9hzuyhJH+7YRB9xzYBVlXmjXK +EkJX/zN825SNK5+fq9s9lCNCu3SvCydkwf9x14mX/CsIjxlNM5ZNFpytNWnS +/60gjkorLS0UzcKmDlGh6coVhOx+oa9enpmwdinNdHgnT8RlNg8wjL9BT0Pe +9mumAuFfW5GN6QwUhV/xnxlTIM4P5T949jkDcrrLHzO0FYk1Kokqh6QzIN8x +8bD5myLx9YmPTU5vOpYNiF1zqlMivlw6Yr+zJh1xlys0RphKxP8BiBQnCg== + + "]], LineBox[CompressedData[" +1:eJwV13c8Vf8fB3AU6lzjXpuEhBClJVnvt4RUEqlktVNShIQo+ooiI0lDZkop +pTKKZEWo7J/scV3uICsjWb/TX+fxfDw+j8/nnM94fd5n1XE361M8XFxcutxc +XP+eWkO+00MG2bB726s79gKqmNv/6meLYTZohNw0PUJRRT+Hhz7eYdnwamt6 +yc9Pa5Bnl0f+21U5cJ5vaJu7yhoUU1YyVN2XC22B9yq/0lSwJZ7aXR6fC7qZ +CkPr65UxQWT+2glmLlhPfR81i1FGFa7mksSreWA/03bJVFoZt7aHmohnfgBZ +vhreXh0lnLPyGnj35wOcDG6wV16qhMWVR0P37fgIA8eObMyoW407c7dVhbd/ +hKibEh7m51ej3Z3BPTxEASxo2N4tf6+IcstafiUdKAD9pEjHsVBF7Lv6JdIg +pQA+PX1/neaoiK6uCXU+Op9gtO+XBpVQxKtmljYjpwvhEEfHzejCKtz+WW/y +9rtCsOhetnSn+Srk36Iap75QCGdFTVcLKq/CaEXullP3PsP92dbBT10KmDL/ +zr6jrAgCp5jRq+0UkH44/O1JagnYr/2G1m1ymHltvdfbTSUglNaa45guhz5P +G7UXDpbAt2NRjYaX5FBobMWn+wkl0Myzevq8qBzq3nxVUa1eCtdlJTiztisx +JvdHu5ZJGfQuSK1R5ZVFx46LiQFnyuDPJrWhgM4VqMojcaw6vAyc9x3yOpO7 +Aj9bOA2caCgDqcCp4yNnVyCHMTwad+QLpNhGBnr8lEFjUSrfvG85dA4V7Zut +kkahbdmV5gnlQFU36rTKkMY2J9vwuOJyyP2WKysWLo3uGclULf4KqOLxSmi0 +kMbHRhtWnIitgJYL6lXLWqRwws1aq+r1V7gn4vRf6bwkFt2bGhdv+ArjrBus +mT5JDCt4lHN88iss6ThUFlQtiQr8fbpzepXAP//QPuCBJO5J9DRZX1UJDjdX +2C5ulcS077F29/qqYBfPvuUKwRJoeC05XYuvGsxnzzRscpPAlg2vJr6pVkOA +rAL7up0ECtwvi+S5UA0flB/Z126QQK9j46Vuf6rhT1NK97I+cTSZsly7S/A7 +HDSr695pKY49z+19+td/h4q/va6ZBuLoZ+9cHmj9HTa3zT1FDXF8XXz1SN79 +7/CoxN17dLk4SoRn3lVS/AFq+c55J76K4YA8ZW5Buwb4HmOo6C4xDGyQMH90 +uAZCWv0ipfXEUOaGYtwW/xpYB3//7NAQw72cbVquJTXQHvl7YbmwGOZlnznZ +ursWinxkrkCzKH5ROjFwWKsOAhR6jCdcRDH2Y/HezSb1QPnz1LMsQwTfzL5v +mDlUD5bOr9RzEkWw2iD9YJFLPTjKTNl9iRHBxZIIp13R9aCsZZW57YoIulTb +XTjaXg/BvEtlvC1EENsnIm5fbIDTEzrdnCka2q9k0ayDG+D24+hfYUM09D7S +fk/yPulK9iZjOg1f9pUkpH5qgCsd3iazP2goMRSZ+YG/EZKaM74EPaPh0Jzq +D0ZCI2wZmhnOtKchP8haZWQ1guT0sbi31jRUDBL+n1tZI1w8bXC8ypyGh3in +Ov6yGmH83Ln/NuvQsFSwbIi6uQkk5Iq7xsVp+EDOUcCgugm65j+uojdR0Rjv +7L439T9gXEv/iUeoGHM5vlJ6WTOIlKFRpy0V6a+fmiRKN8MdASetEGsqBq7M +h3T9ZsgzrVCdN6Hip7/0TR+vN0NyYddhf00qaudslu0U+gmxVrjJcl4YVdVb +hpTWtMApHoeP3NbCePkY/ewLnRbICs5InTQTxooHQwOau1og8mXOyTkDYTzJ +z92rfb4F7uvU1xmpC2MKQ+1/O9+3QMrfsfH0JcIok3Sl0BVagSoVJVH8UQgF +xeQjsw+1gc2RdFv1jUKonh3HynJpg7c3j5vdVBNCUxsh48yANpDJf206rSCE +gbHz00+ftMGWyGX9/FQhnBDrOHZ/pA1uC6V/HBkWxDbxh1v8QtvBgzvne8Eb +QZzOoUZ7P2oH5wpdH5nngih28CbHI7MdFHb/kLqZLIh74y4nnWtshzN3Uj5H +3RHEEomDyx3lO0B4sP2AhZcgPpcU7YS8DvCJtwo4oy+I5XlhW/WrO2A89Ub5 +8y2CSD/EE6PT2QEeh6P1p9YJouyDMdMNSzoha+CJ5YdVghglVZelaNkJesfL +jZv5BdFbOiKYl9kJQd8s+U82C+COFfwa3yS64fm4nZWqvwBWBr37dkGtG85L +RXjPeAugBcvxnIh+NzjztyQ3XRTAgznZGYePdYPq5J7C584C6Gx5XI31shsq +P02qV+wXwPISp7vXFXrggKvZsq+aArjs0uYTTWo9QBeTuqSlJoC7VIlNKpt6 +4Dv3nfZUJQGsicxpqDLpAYva74dSVwhgs72ACO1cD6QtszhFEALImvwYnZTT +A99CbXk8WBRUfxF1dOxzD+if+SJ+kkFBV4dTWsaVPZC9zUbPqYeCY6XUuoG2 +HhjKsA51aaHg3yhn4XVcveB91/5dbyUFKerikZ929YKNgc46eEnBdU7u4a3d +vZCquWH++CUKErfrf4axeqE25JLpJQ8KMj9uVNIf64Wle09aRLhRMFl88lMi +Dx34t3B71pylIO2H7/AJZToYFE1sjXWi4ITef1bDLnSw1XN6q2JOwbqzjIQk +TzqEhS2j3jGlYOZ9E84+fzo4dNm85tpBwdO/+f97H0EHj0tWt0cMKdiScTvb +J4sOivJ7eChbKFggHSe5ZIoORo/uPt2oSMEHZtMnshfoUDfHSfslT0GvS7ZZ +p/j7QES1yzNzJQU16mXMK6X6QPfWvtN60hRMvJnkF6HXB93OFFYUlYLXp593 +Sgb1AZNvqFWci4I7/1fwREOAAdauppHn6ASG5zV2PRRnQMHy2x+iegiseTgo +zS/PgDRLyVcfugg84LQiuncDAz6Fr2+SaifwONPPP+4QA4avebrRmgj0n9l2 +gOsJAwz0zTd2VRBY1G4Vff4VAw5qV/XvLieQ5/PZb205DMi0KZ0rLCPw1vWH +RjmVDNCwMjB4U0xgHGVG02WYAaaTASfK8wnMWvmBr2lbP8R4fsCCNwT+Xqw1 +MjLuh02z/JdcXxOoTWf6v97TD9XMuberMgksfCb5++aRfhgNDdB6kEFg9frL +3QY3+kHps+er7KcEMoy0P6TX9QNHtEsx/TGBa5T2/hZr6weNn1xecfEEuvCd +Xne9rx+O3wvwv/WIwLHqe2kOU/2QNno02e8BgQv7J6NpsgPgmx7/5mYsgVKn +s89ecR4AZxVbhmUEgVOlh1btdB+AgX2MnJDbBDbKz7aI+Q5AyH7pG8XhBEa2 +Gu18HTYAL9SvCBmEEbjUolalN3MAYqL1XA+HEkh/4dGVmTsAFty81ekh5Pzx +ScT5FQ1A1cz88pkbBPoVO/CK1Q+AlIbK6rRgAkc3cfpMJwYgKX+Jk+x1cr2i +I+JF5wcgerTFPSiIwJe/tPb38DLheG/WbnYggafTL5f6SjKhayFrT8k1Ajtk +eFNe6TLhrNmf1TEBBOZffm7ra8yEzTMVcoKk7zftppruYUJnVlplmD+B1pEx +17odmTC0z3Vl5BUCv3IrOIkEMWHq0o7L2b4EpjmViXffYoLL/PW4HaSvF5z+ +8TKGdNsSi58+BOpfytQ3SWNCppyu11LS71i6K3y+MsH9hLN9gDeB0SZdDTvq +mHAg7CZjFenzqUFhtFYmNAdvGa68RKCqQ+VMBocJa5tVfORIJ9YeaOkUZMGF +0xPSTE9y/2nMRGVIsABLGHZJpA/femx2WZ4Fr9lZfHakxYz7cqkbWKBwwDK2 +2YPA8aSQC53bWMAfwnB/QLp2Tk0lYzsLTlu3ZzqQDst1v2dswwIhzQTDoYsE +nhEVs6A6suCksXlEHmkT97ylnadY0D8ttfEGaS71BU/vyyyYzxH0WkO6KyRl +rXEgC74TGwTm3Aks6NvRJ3yLBfqhXqMNpL0Twq1fPGLBvZZrd0NJh3ZWvjJ/ +woI36+9PnCL9YCUfP+clC4qLgoJMSWc4Gh8Ly2aB156ZrWr/+ksILFAvZEFk +eb64EOnvnYXi38pZcNQoRGrSjRx/5azbuRoW2E7LGXaRHnHUqab8ZMFt3d3B +VaS5Ei8pvepmwX6vJlYuaVrXu6t7WCyYlgs9+4y0otxoy9AoCxyKNy59QHqz +k+amiBkWlDFe5IaTNkl0idDkYUOcdOnVINIHu9KZPwg2bGTtt/MlfUau3+iC +KBtq6nTNPEn7Oik+FpJlg5PJAWM30mGJR6ZeK7EhPC14z3nS8V2P91lqsuH5 +5syj//xKri1jZAsbvsjlBvxr/9lJkjfakA3vzt5K+ddfbaLNES0zNmhOilb/ +G6+n687HOks2/PUymfz3PuNytaIXbdkg4UpddZv0kiMCF2jH2DC1xmX3v+8R +SzKvfHuW7L9gl8e/71XuDlG09mBD1uyru//mQ1v+i/+4HxuMfSIzK0mbHeH+ +GfMfG0p9Rwo7SNsmGW7YdJsN8bMNpeOkz3ZfCW+MZUNlumE+Qa6Hn/zHfs8E +Npxs0E1VIp2QtOlR9ms2fFAX1Xci/brbfcImjw0N6oKcANLF8q/3Thaxwcak +MTCJND1JdYl2PRtE2CuOsUj/7j7l2NzKBmp/3TNhcn8tVXiS501ng19L7g8d +0irJK13zfrMh0jwuL5r01h67ikNzbFCwbvYuIr1T4YHCn6UcyDrSJDxK+lyy +yP90JDgQl/7u60Fyv2cl8xvm63DAeKmUrC55Xkp6djywM+LAX9oh78ukGxSu +j/8154D2R3p8LunJ5LlnevYcUB1oNNL1IlA3ZUy4MIADanm7Kg+S53N37zoX +xxAO1K2n7Ekl7bDK9ct8JAc0kvQiRkhfSxnwMUzmACde1SiKPO9fUtp7i0o5 +4F5sjX2XybyIq1WX/c6BjP28mjvIvMgOK/P0+R853hUHiXTSaZ4veTewOPBb +ObPZg8ybYJMraqmCg9Dx90zTKjKfTNgyF4NtB8HNlODpuErun06h/J5jg3BQ +ZXmFPZl/2g08SwzODQI7uux0J2mVAk7sZMAg7NlSqz1A5iVfRP6H008GQcYm +qkPwPwIrtOy4zIcHYW70dMp7Mq8NlfeaP50ehOPSstb7bhKYK709hpt7CBYI +o9Jh0s941JXyRYegYXtHqxaZ96FNM2Zrtw1B2FtmThV5P+z0eRglGDwElL/G +T/fEEFhV1CLXIP0LrNS3/Q5PJPN5nS0jQvEXcBlVm1gmETic8POF+dpf4BDb +OyqaTKCIf/PmEv1fUDBXuzslhZxfnaZdWUd+gfnlrb+/pZHts2q9I5/+AvYP +De6jL8n2qRU1uzYMw3UKXfXKRwKVaKaxfLrD0LJBfZ8zed9qB5YfLt0+DH/M +Z17aFBBo7/SFsc1mGEw38sxvLCTnW6b0r+rlYSgebWPOk/e19t1CFf7CYbh2 +79j8t0qyfXD21bKdI/DsLGG+vZXApnTORj3rEfAhtAVd2gjc+02B+c5+BGrG +jSTvkvUDikRYpl4YAaX8o39YneT7JJ9SCIodgentDTVPyHpkqECi1LBnBOin +8upthsj70PcTT6feKAgGv0x4TNYvVm/lTG0bR4Gr+XZhmAYF7QKvdZX9HIW1 +knegT5OCJy17vNd3jILVmYWn+usp6PMrJZ2vfxQeS5mtHN9A1kdqystzpkaB ++WRlqvNWCg6lrP1OkxmDBd3Uc/7bKRgSo2P97egYNH7NsN15mIKfPK2dDIfH +4M9wyD3TWxRMelxa9WDJb0h2KZf9NEJBJ+vlAhe1JuBPd7Ji2lkBPGFf1K1j +PgkXdviIjvSR9fbY7rCrvlOgq/Z51tJdEBN+id3USZuGeE2e44NcQmhgYCFJ +z/8Dgb7za5ZFCOEHaYeA5ewZSN90PoShJox+5m1eCktmgQu0ZE8VC2N2d2zR +S8k5+B3SkZ22lopVPCq92cbzkGif7qF6jYrKviqxmfYLUJq72dG3hoqpUytz +oo4uwJ9g74NdtVRU8BJvvnhqAeQ8/ZyN66ko67ZUStttAVxHH9UJkv93Iqfo +8Z+vL8Dt+sXCJ61UXNyX+KT2xQK4E/6zjQwqtqpKvB+bXoDKkOr3JrNUPPhM +sKlxbgEY/m+iMueo2LSadzKHexHeak4FiS9QsU5uQtuPsghLAq++6OeiYYVY +Qz6P/CKYJNksCeWj4XuuyFJR00Vwpv5t+UGjodbVG32TuxbBliEmsVWUhq9n +/Ze2WC7C4/ODZ5LFaJgxdc708eFFcOB6YukpScPkIfNqpfOLsFp9lYLMShrK +uRgN8nksgsu1heXBcjSMZ+oIsL0XQXLYdPmwPA3j6Gv2ZgYuAuCYWakiDcWO +yrtF3VgETzMI1VCiYUynRPTFsEW4/KauPU6ZhlR7obf7oxYh6GG8CfcaGka0 +8DZsiV0Eukbcl3OqNPw/Y3IQPg== + "]]}, + Annotation[#, + "Charting`Private`Tag$9307#1"]& ], {}}, {{}, {}}, {{}, {}}}, {}}, \ +{{{}, {}, + TagBox[ + {RGBColor[0, + NCache[ + Rational[2, 3], 0.6666666666666666], + NCache[ + Rational[2, 3], 0.6666666666666666]], Thickness[Large], Opacity[ + 1.], LineBox[CompressedData[" +1:eJxF0Gs01Hkcx/H/XP8zQ609Ll2ZnVy6KC11ZrZFUTrHKhuJROQsOrlEJimt +LsSsS7VHRSwpZcplU9q1UU3f704IXZXLUlmGRDrVKtvPGDP779E++JzX+Tx9 +S36I3xjJpijKm9lnu+0HJw0GGn+UW8S3rRVh021Fy3Tm5w8L64o8RHjNd+Fp +Sz2NDVXN7O1rRJi9N87JWUfj8D/lZ7RuIvz2DtmRRGi8Fa0dtnYRYXHQtM43 +72kszjPpTHISYViW9Gp3P43vW38yshKL8NVQZsRvd2hc/e7yuwQixGGZJnhT +Go3h513UNWVC5H1s9/NaS2PILhN1SYAQHdvN2uRCGvFiimSZSIi+XsIXmc18 +3F12LzXhugCP2Z8e+ZDDx4JVXRgYLUDV+e709V58nJmDph8sBKhzjVJ2Cfl4 +avkfX7g00rjZ40TT9Qc8rK5JlCxMplHZF5+UcZSHZ7PvB3Xa0WgyPGRXvoGH +ZL5JrW0PH7NNq7ZOmfIw9IzzQ/HPfPzUbi1xe8pF76gi92FXPh5mSYe68rn4 +xHDtF+8xHk7d0a0I8eeihSY59tg5HmZVmpiam3MxbFuzcZoPDx11qjeSbg6m +1MappvF5+GBA7D+3gIPyPHF+Ri0XM6RzbscEczAixs7tRDQXHcX3astncfDi +lznawllcHLVvdprZzcZvvlJPbG3loPpC6NXnxWwc3TlbWn2Yg0drKm4dD2bj +fuPqAyaOHNy96HhLnhUbJYZwpX6IjVF3IfiRhoXGntEBF0rYuFGrTPm3lIXh +r2x2JviwcXOBbYk8koVVAQ7SBpqNPve3fP/cmoUCsSLav56FgTbPjuwboFCt +HH16JZaFKa/G66MuUdh75sqIwpaFp9waD3pup7DYtXrs5l8UNnMdPFIWUrhR +Ebg0JpfCGT13LRufGaDOrerX3nUUZnQWP44NMkCYdGvRU4rCxRVl6bf79XAu +0X9JYpIBblwyDxgN1cP4PtVAap8eUlPqF6gHp2BphaNXnL8eIgs/8fSxU8Bt +U7mxHk7B15oSynxUB28irk86ukzBclayriNBB+0vL1c61OpAvP6WufztJKhs +Qp7MttHBgr8LV+zeOQnRD+scdPmTEOVZGWo1rgWtkb/2lNkk5L6wLi2Ta8Es +PVlZnKmFMc/Hg+1kAhz6itq20FpI0Fksi06dgPuViz0E2RPQ9ayppMdA4NG8 +0f03OBOQlFthNK4g0Fqn9JueSeBJS5GsO52A8WRI70gGgSXs4+GqNAJym5bs +xiMEBuXymxkHCYzpejwPHCLgu8k5xiKJwEWr/qC3jItnPGiVRRJo6LHu7WTU +FL/P2r+GwLqJzLN/Mq7s0NSGuhOI8P09oZSxcFpH/+pVBGSa6u2pjD4H61cY +OROwE0jr3RlV29JGipwI5B7LYTUwFswz+04lIdC3fPP8R4wfg/h7SsUE0lfC +ohrGDSfJuQxLAuuDs3xPMvK5L4j3LAKK8R3CQMbEl8ryXhMCKXuCrAcYH1sW +tKunEzjU2rW6idE+IJu6ZEzgdQdLUcGoaYoLjBcQ6D2buncXo6shLN2PTyDP +4bXtJsYCmd9VGZfAXDNb8tmP8Wufz2EzPdH57Wc3lMsEFPW//wEdmYwL + "]]}, + Annotation[#, "Charting`Private`Tag$9349#1"]& ]}, {}}}, InsetBox[ + TemplateBox[{ + GraphicsBox[{ + Thickness[0.08818342151675485], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + FilledCurveBox[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYCYvc1R5cznFByOHXYaW2mnbrD7JlA4Inglx/e +5jrTVslhg+qT5nlv1RzOgICMkoOpzd6gaYpqDsrXHgUzvFF0yMj/0HryiqrD +HU3ZNf8vKzqI9ni9Ytmi6rBWSIcvfZ4CnF8KMi8WwTcxBgJhaTg/RjVC5lyM +vIOB1krhC0vUHf6DwH15BzOQfQ/VHZwnNAulzVJwmLNIeeefdA2I/XcUHB5F +iG+/uEDDAeyfG4oOtb+tCs51aDrA/FcP4mdowfk1nzYEZN/ShvNllr/w0Nuv +67Dy28uKMwaKDimxd9yYf+g5qH9SeTkrUw7OB6ufIQXnf9n3cWu6mIRDC6// ++imtunD+Br28xYwyOnA+OHxCtB1A3jUOloTot9B2EKmcVHL2CILfH9Htz1gg +BeeDwztHGqK/BMF/krjwmgm/Dpz/5+3rA5aPdRxaFNhVz1yRhPPB9hUj+Awg +kCDl8KJ4q+hvbj2HkLeXP85olHH48630wZxCPYcekP0CcnB+t43nrrQmBTh/ +T37N25muig4y8+I0Txvowvmw8ITxwfFqrAVNLwqQ9PRPw8EVFH4VMg5/QeYJ +qkPCs0ICEn8MqvDwAqeHKypw/huQe08j+GlgoOLQCXJfkBKcj56eAUdsRko= + + "]]}, { + Thickness[0.08818342151675485]}, StripOnInput -> False]}, { + ImageSize -> {17.013205479452054`, 24.55328518057285}, + ImageSize -> {11.34213698630137, 16.368856787048568`}, + BaselinePosition -> Scaled[0.3237956353650342], + ImageSize -> {12., 17.}, PlotRange -> {{0., 11.34}, {0., 16.37}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.057537399309551214`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}}, {{ + 1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDq8X7Re4WyFEpwP1hevAOeHvL38cUajnMMZEJij7BCjGiFz +LkbO4Y6m7Jr/zQg+TH0UiL9H3KHm04aA7FsqcH7Db6uCcxoqDibGQCAsDee/ +acvtNoqWdlgrpMOX/k8Zzn/gGu8466MSnH+D97ZY6jc+OJ/Hkc9rxkouhy/7 +Pm5NvyYF58PsQ+engcAzdoeZIPBTAqJPjAPirx5pOP9A974mk8cycL5I5aSS +sy5ycL7ytUfBDDkKcL7zhGahNC5FuPkwPsz+7cFWEf/Z5eH8VgV21TMlchh8 +mP9gfLB5x8Qh4RAoDxGfIubQaeO5K22RAsQfO0UgtKYSnO+xv1bW4rkKnA+L +fzA/UtIBPX0AAOVk78c= + "], CompressedData[" +1:eJxTTMoPSmViYGAQAWIQDQYNqg7/QaBe3gHGNzEGgsuSDiu/vaw480DZ4QwI +rBF1qL7/45YxtxKcX354m+tMX0U4H0zPUXCoAqnzFnPotPHclaakADHPWNzh +LEheRx6izkfCoVWBXfVMiRzEXgdJOP/Lvo9b06dJwfnClZNKzpoowfkfFq1X +OLsCwV8rpMOXvk7J4U1bbrfRbzmIf/iVofoUHH6+fX3AUlkFIh6v6NDIcrTf +cLqKg/uao8sZPJTg/L/fSh/MEVSB82HhAfZ3tpIDengBAFNsiuk= + "]}], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJZIGYC4intrVGX/+g5HOje12SiLOBw4rDT2sw6BN/n +BLvt7FA9hzQQeMbhUPvbquAch57DVq8NFnN+sjqI9ni9YhHRgfOP79rRy2ag +Bee/Kd4q+vu0nsOXfR+3pk8Tc5izSHnnn+d6Dgwg8EAMov6DnkNvRLc/4wcE +/4FrvOMsQ3E438QYCDaLO8gsf+Ghtx/Bh7kXxm9kOdpvKK4J50PcreEgXDmp +5GyKkIPfxYkx/5I14fzJIP/XwNSLOugryn/Juabp0AdyzwUxiPnztOH8tapP +mufl6sL5f7+VPphzUcNhJghEsjl4g8Jrq4ZDi3gta+YxVof1IPVrNRxSQe5Y +huAHPPG8ZCqM4IPDg4HFofrThoDsWwi+LMi/8ppwPsSdenA+evwBAJhGtQ4= + + "]]}, { + Thickness[0.057537399309551214`]}, StripOnInput -> False]}, { + ImageSize -> {26.06325280199253, 24.508064757160646`}, + ImageSize -> {17.37550186799502, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {18., 17.}, PlotRange -> {{0., 17.38}, {0., 16.34}}, + AspectRatio -> Automatic}], + GraphicsBox[{ + Thickness[0.07558578987150416], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}}, {{ + 1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQPWMmEFjKOPwHgXp5BxifPzbgvtFxJYco1QiZc3vE +Haa0t0ZdllF1qLz/45ZxtxCcb2IMBJt54PzrvLfFUs04HM6AwBxlhxe1j7PP +v2F3uKMpu+Z/M4IPU3/p97Hr8yK/2td82hCQfUsFzm/4bVVwTkPFAeScmZGM +DjA+tyOf14yXjA5rhXT40v8pw/kPXOMdZ31UgvNvgNzxjQ/O5wHRK7kcZDaK +zWd6wADnw+xD56eBwDN2iD98ftl/2fdxa7oY1F8+TA4w/javDRZzfrLA+THg +8GKH8w9072syecwD59uXONaejuF3gJkP48PsX3Jr+WNDZ0443w4kL8OBwYf5 +D8YHm3dM3OE7yJ5rnA6tCuyqZ6aIQd3DCwnHnSIQ978RhPN3BFtF/E8Xh/Nh +8Q8Jd0kH9PQBAF8M/CU= + "], CompressedData[" +1:eJxTTMoPSmViYGAQAWIQPRMMJBz+g0C9vAOMb2IMBJclHd605XYbRYs6nAGB +NaIO/RHd/owbBOH8VgV21TMmAnB+ehoQLON1qLr/45axt5hDjGqEzLk93BDz +jMUh6no4IbSPhINdiWPtaRkOBwYQcJCE87/s+7g1fZoUnC9cOankrIkSnP9h +0XqFsysQ/LVCOnzp65QcuB35vGZockL8w6/s0CJey5rJxuPw8+3rA5bKKhD/ +RQo4NLIc7TecruKg/knl5SxNITg/CuxeUTgfFh7VIP9kKzmghxcAkXKLZw== + + "]}], + + FilledCurveBox[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4sz8D60np6g5nDrstDbTTt1BV1H+S44Ygr/F +/MehFC41hw2qT5rnvVVzSAgJUl/wUtXB1GZv0DRFNYcdDk2Pju9QdcgAmXNF +1eFRhPj2iwtUHUR7vF6xbFF1mDGBv8osWwXOB5unheCnpwFBmCKcX33/xy3j +amUHA62VwheWqDucAYE9yg5mIPseqjt47K+VtUhXcZizSHnnn3QNh4bfVgXn +VqhA7dWA6lN1qAWJd2g6wPxXD+JnaMH5NZ82BGTf0obzZZa/8NDbr+vwIkv7 +2/S/Kg4psXfcmH/oOTxwjXecxagM539YtF7hrIQinN8b0e3PuEHeoYXXf/2U +Vl04f4Ne3mJGGR04Hxw+IdoQ/5YpQPRbaDuEc4q1G69H8IUrJ5WcZVGE841B +oFkRor8EwX+SuPCaCb8OnP/n7esDlo91HPhjA+4bbVeA81NB9rUh+GdB4flH +weFF8VbR39x6DuWHt7nO5FVy+POt9MGcQj2I/VcQ/Kcge/xV4PyAW9I1iUKq +DjLz4jRPG+jC+bDwhPFNwA7TcpgJAi+VIenpn4bDe1D4cSg5/AWZJ6gO5StA +4o9BFR5e4PRwRQXOfwNy72kEPw0MVBxkQfEmrwbno6dnABsaOyU= + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJZIGYC4oSQIPUFJ1Udntc+zj6/hs9hxgT+KjNvBF9i +6hXODCVVhzMg4MPu4HWC3Xb2VRUHmY1i85kSWBxWfntZceaBEpx/FqTujwKc +v8Oh6dHxGaoOGp9UXs46KeqQmf+h9eQWVQcTYyAQFnOY0t4adXmPqsOB7n1N +JsoIvkjlpJKzKQh+Ggg8E3N4U7xV9Hc3gg9zL4y/I9gq4v9xeTg/FcyQd3Bf +c3Q5wwxBiHsNFOD82TOBwFMBql7EAeQs48UKDgdB7mEWc6i+/+OWcbYSnF/z +aUNAtpUKnB+jGiFzzkbegQEEDrBA3M0i7/ASFH46LA6tCuyqZ77IQcKPB8Hf +7rXBYk4lM5yfDnYAk4P8rgX7Uv3k4XxXkDtvIPhgexpU4Xz0+AMAeRC+Mg== + + "]]}, { + Thickness[0.07558578987150416]}, StripOnInput -> False]}, { + ImageSize -> {19.842560398505604`, 24.55328518057285}, + ImageSize -> {13.228373599003735`, 16.368856787048568`}, + BaselinePosition -> Scaled[0.3237956353650342], + ImageSize -> {14., 17.}, + PlotRange -> {{0., 13.229999999999999`}, {0., 16.37}}, AspectRatio -> + Automatic}]}, + "LineLegend", + DisplayFunction->(FormBox[ + StyleBox[ + StyleBox[ + PaneBox[ + TagBox[ + GridBox[{{ + TagBox[ + GridBox[{{ + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0, 0, 1]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0, 0, 1]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, + 0.196078431372549]], {}}}, AspectRatio -> Full, + ImageSize -> {20, 10}, PlotRangePadding -> None, + ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #2}, { + GraphicsBox[{{ + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], { + LineBox[{{0, 10}, {20, 10}}]}}, { + Directive[ + EdgeForm[ + Directive[ + Opacity[0.3], + GrayLevel[0]]], + PointSize[0.5], + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.33333333333333337`, 0, 0.33333333333333337`]], {}}}, + AspectRatio -> Full, ImageSize -> {20, 10}, + PlotRangePadding -> None, ImagePadding -> Automatic, + BaselinePosition -> (Scaled[0.1] -> Baseline)], #3}}, + GridBoxAlignment -> { + "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxDividers -> { + "Columns" -> {{False}}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{All}}, "Rows" -> {{All}}}, + GridBoxSpacings -> { + "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}], + "Grid"], Alignment -> Left, AppearanceElements -> None, + ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction -> + "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], { + FontFamily -> "Arial"}, Background -> Automatic, StripOnInput -> + False], TraditionalForm]& ), + Editable->True, + InterpretationFunction:>(RowBox[{"LineLegend", "[", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0, 0, 1], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> RGBColor[0., 0., 0.6666666666666666], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + RowBox[{"0", ",", "0", ",", "1"}], "]"}], 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, 0, 1]; + 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, 0, 1], Editable -> False, Selectable -> + False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549], + + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[ + 0.130718954248366, 0.5359477124183007, 0.130718954248366], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.196078431372549`", ",", "0.803921568627451`", ",", + "0.196078431372549`"}], "]"}], 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.196078431372549, 0.803921568627451, 0.196078431372549]; + 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.196078431372549, 0.803921568627451, 0.196078431372549], + Editable -> False, Selectable -> False]}], "]"}], ",", + RowBox[{"Directive", "[", + RowBox[{ + RowBox[{"Opacity", "[", "1.`", "]"}], ",", + RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", + InterpretationBox[ + ButtonBox[ + TooltipBox[ + GraphicsBox[{{ + GrayLevel[0], + RectangleBox[{0, 0}]}, { + GrayLevel[0], + RectangleBox[{1, -1}]}, { + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`], + RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> + "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, + FrameStyle -> + RGBColor[0.22222222222222227`, 0., 0.22222222222222227`], + FrameTicks -> None, PlotRangePadding -> None, ImageSize -> + Dynamic[{ + Automatic, 1.35 CurrentValue["FontCapHeight"]/ + AbsoluteCurrentValue[Magnification]}]], + StyleBox[ + RowBox[{"RGBColor", "[", + + RowBox[{ + "0.33333333333333337`", ",", "0", ",", + "0.33333333333333337`"}], "]"}], 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.33333333333333337`, 0, 0.33333333333333337`]; + 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.33333333333333337`, 0, 0.33333333333333337`], + Editable -> False, Selectable -> False]}], "]"}]}], "}"}], + ",", + RowBox[{"{", + RowBox[{#, ",", #2, ",", #3}], "}"}], ",", + RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",", + RowBox[{"LabelStyle", "\[Rule]", + RowBox[{"{", "}"}]}], ",", + RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& )], + Scaled[{0.01, 0.99}], ImageScaled[{0, 1}], + BaseStyle->{FontSize -> Larger}, + FormatType->StandardForm]}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{ + FormBox[ + GraphicsBox[{ + Thickness[0.09090909090909091], + StyleBox[{ + + FilledCurveBox[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{8.653129999999999, + 11.8563}, {8.653129999999999, 11.2484}, {8.34375, + 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, 13.095300000000002`}, { + 8.653129999999999, 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, { + Thickness[0.09090909090909091]}, StripOnInput -> False]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm], + FormBox[ + GraphicsBox[{ + Thickness[0.043440486533449174`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWZDYzATYDFA+AxnqSdVLTzfQ022U2EWJ34kR +BwAG2ALT + "], CompressedData[" +1:eJx1lXtI01EUx2eWEtXU2TbbnP72+/VTtt5N7YHRqUgzpMykpKwscqvsQWTv +SaU9iEXZ01lGpZEYZkaYWSZF9NQeZPWHBUoaGayoLDF72O6927mUdOFy+fD7 +3XPPOd9zzzUuWZOc4atQKHzcc5V79nLPKXm5Kut5EQIWJDWN3iiAl2+ssX8o +OCpA89RFk44fFOG1yVDWfVmAunr3WMk5ePOhrEcpnD8VXRQeTRNh4+0rUwsu +CGCzukeMCNLLN7MVhR77Zm7fywVk7BXAQka7Eeb21eyxBAiwtamz0eLw+LF2 +EER+Gfz+eN9w2CX4y/VHNHB19vjUbpsWmf0XiEzcrd8XgDwxa1J2XRpnmdh7 +oISUDw2fnWc0kCanhj6uGQDCtdO1GeUa5v+5AUAW613O9NxILTLdZ9fCt9rP +lbaX3v+1sFOb3We5n5KdFxUC4cTuDBVcUA1V2spFWEb+89Mil5G1VodcRc7x +1zN94jl3k3HAiLw3NuGaNZkzzXeokeXjko7ptFQAJ020jn1PFJg/+3VMPwvn +JrLPyNlA1o/hYCd61OmYDg/CIYroFaxHpnncwZnt16OeLD49+vOV5GtDGNPJ +JSM78wK2xPSLgAySn7gwSE9JjjxtimB5/mlAZvY533TU5kTlGuBXx/rmwqAI +Fv8sA1QMX13sUyOz/WmhrP7eSszP5XpQkJEuwRYS3xAt8i1ir1iFHFd2p0Th +VMPhPbvmNcSaPPppIKlRb1+sMkM5iS9MAyPMpcFPB5tZPQeHIA8kcbeGIZd2 +vN9Uny4iU32+i/DkxRzXiPkmZNe6SvUPRyTk/8Pe7/YvFUmZjRHMXrOI8dP7 +80qEq5Dz5l6nzPL+XITCIqn6573/847edw6Mypc991GEkcS/nTLEk/hDJGQH +qbvJnOl58yVoWzGkI/+kDIGkbm0S6kn5nQTbif0xZmSqX4KZ1WG7xPJ56P+c +eN9/wokXZlY3NZxTSZ3N5Ezr87ISmdZHS3/ktuyWzCeufj2Y5sPG+S99Cvoj +V06vGFs4TolM6y1I1YOpPl0mZBp/Fecqoo/TxPLfW8Xu9zYTW5uCsN5CL2lO +9Wr2A9fuVY7R10PgbGNJyyhfP9if6pjpE6iFpNaEZ9ENff7uf4m/J3rZReIp +60LOJf3pbmcPpmFWq5FpHi1quKi/Muyh6zuyvS2n61j1L2TatxZ6+oKb6T2L +FpBp34kV2H0CNeufVoHdM18Nvjfe/kPrzSlif/K+T+wczt736w/tqcMd + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExClhk2omPd0w1P0LAAFx +Ajs= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJLIGYCYl1F+S85YfoO/8GA2wHGnzMTCCT5HKa0t0Zd +/qMH5/94+/qA5WFdOP/81bA3+rt1Hc6AAYJvDAKTBeD8B67xjrMmKsD57muO +LmfQUISbJ1w5qeRsiCLcPhgf5h50fvX9H7eMbytC3a3jEM4p1m58XtEhPiRI +fcFKLbg8jA/TD7aPWRvVPhsdOF9fa6XwBRcduPtgfJj7YXwTkP8uSzpsMf9x +KEVLHYMPUw/jw8wDqzNWh9v3qnir6O9sDTi/mdd//ZSjmHyYf54kLrxmkq8G +9+9McDyowOVhfJh+sH3FKqj2rVaF80V7vF6xbFGFuw/Gh7kfxofFJ4wPi2+Y +ebD0ALMPxoe5B50PS28w//RGdPszGvDA/QuTh/Fh+mHhhWIfMDxhfFh4w9wH +48PcD+OngcAxCXh8ovNh6mF8mHmw9IKSH4DpCcaHpTd0Psw/sPQK8y96/gMA +GLqMlw== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRQn1RxaqKGWmbjEAZ/3 +AiE= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4jQQUDN1SAUzZBxmTOCvMntt4hDOKdZufF7R +YSYIRBpg8D8sWq9w1kPRIR2krQ3BP9y2PPyUkiGcf13ok+N5NUMH5WuPghlk +EPw9+TVvZ7YqwPnGIDBZAM4/AwZ8cPPmgOyV5IPbB+PD3IPO/w8G3A4HQfon +GTr0RnT7MxrwOIhPvcKZ8QnBB9vXZoQq/8gIrh/Gh5nf7fWKxWQhgr/8hYfe +/4eGGPwY1QiZc38Q/Ndtud1GswXgfLD3fCQcHicuvGYy3wjOvwFyT5oxnP8E +JF9v7NAHcl+AOJzfqsCuemaKiMPpw05rM/dh8u+7xjvOEpSFq0fng90XIwW3 +DxJuknD3wPgw96LzweYtVIDzwfGrA00PzxDx739xYsw/ZyM4XwIUnkHGcH6E ++PaLDPNM4HwDrZXCF46YOLivObqcwUPBoZHlaL/hcxN4+kRPrwDaCDfk + "]]}, { + Thickness[0.043440486533449174`]}, StripOnInput -> False]}, { + ImageSize -> {34.53449066002491, 24.508064757160646`}, + ImageSize -> {23.02299377334994, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.02}, {0., 16.34}}, + AspectRatio -> Automatic}], TraditionalForm]}, + AxesOrigin->{0, 0}, + AxesStyle->Directive[ + Thickness[Large], 16], + DisplayFunction->Identity, + Epilog->{ + InsetBox[ + GraphicsBox[{ + Thickness[0.01414027149321267], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + 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}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBwAmIQvVEvbzFjj4XDTBCIlHSA8Q9072syWYzg90R0+zMK +SDlsMf9xKCULwQfL+2Dy09OA4JikQ91vq4JzHhYOZ0DARxJij6WFQx9IfYGY +Q4/XKxaTh+YOIOVpaqIOE4JLVKbXI/gmxkDw2QzOP1Ara5F+xcxBpHJSydkU +cYh9e8wcau7/uGX8WtLhRZb2t+lzzRzWCunwpdfJOvD5r5+S2mHmEPL28scZ +D+Uh6mvMHO5oyq75v1nBoWBN9+0MBTOHB67xjrMKFR1Ktor+Pv3PFCqvCHHP +elOHD4vWK5yNUHL4tCEgexa7qYMwyP4tSg5fdt7q+mtq5rDy28uKMw7KDjLz +4jRPK5g7mNnsDZp2UAXOb2Q52m84XQ3O99gP9MhzDYeU2DtuzCdMHSSmXuHM +eKQFkRcwgfP/g0C9AQYfrM5Ay8G+MmKF6V4Evx4U3jMM4fzlLzz0/i80dBAB +BfQXTTg/4JZ0TaIQgg8KZuPLEnA+OH4ExOHmtSqwq56ZIga3D8aHuQedD443 +Y1FoOjBwqALFj7coJLwPGML5Gm959xlIGsH5f7+VPphTiOCD4yPPGM6/DXS2 +0VZjuPkwPsx+cHhWIPjRCo4fk+cYwflgbZON4P6D8WH+h/Fvg+K/WQli/ldj +OH8DKP3kmMD5tqDwuGsCjX8lSHrRN3XYm1/zduZURWi8mzqUH97mOnOtAipf +F8G/D0p/grJwPiy/wPgQ90pA0resmcNBUP5kFnOYMYG/yszbDB4+Dk2Pjs84 +bQYNHxFIvikzh/NByS49xQLOR83/Eg7o5QEAAySu+A== + "], {{ + 22.020299999999995`, 11.2953}, {22.020299999999995`, 10.2594}, { + 21.459400000000002`, 9.495310000000002}, {19.9094, + 9.495310000000002}, {18.575, 9.495310000000002}, {18.575, + 12.618799999999998`}, {18.575, 12.893799999999999`}, {18.575, + 13.035899999999998`}, {18.825, 13.0844}, {18.9328, + 13.095300000000002`}, {19.290599999999998`, + 13.095300000000002`}, {19.5281, 13.095300000000002`}, {20.4938, + 13.095300000000002`}, {22.020299999999995`, + 13.095300000000002`}, {22.020299999999995`, 11.2953}}}], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1EsoRFEYB/DBZCghxqNYeC5mFsY0nndeh4V3XrMgCyJTRLFgQYoNCyMU +E6FJSSgikaQkUkIor5pZDDZkKaYpxDz8v5s7t27Tr27fd/7nfGcSmzqqjQEi +kcjP9Ra7Xn/XO+EIbJhuZyxD5X6iGDyYIEk9n4xmivF5p7Kcd8eqydZyoCe/ +b1S2zezo2WitqcIvPIbsKXcdS660xvU1RsjI0pGSV/G7jOrFW+plZ+ly6gdj +PULHmm+CW57k7Mf9FDJWdiLRzt7K2ceudfjbrCdremqXM7W8F1+K0n4edWTP +ep615JOj/LVWi5bqw+hvHg/rzbLxHhAfjyl3dGRvHp0gn47ywyl3TwZRe7J3 +/Qq1j/E9jHr9n1znRY6a3y/5SuSVVEP+cnQ/zFX5GnlCKtYnjUGa/3lD1WTP +7zZHDipI7fav4+1ZT0Mu+T7iLe8yOpfqw+i/YN8PnTPwHjN0pUwpOLI3DyfI +x1F+GPMEY95QD/OIfjDWIzTmHXl67U6rqjSK8sIHQ0s1p5u8sV8w9hPGfqM+ +TPfp77xgnCeM80Y+GPnhHne/vSSaJ6HxPYx6mFf0wzzDmHehkQf3BXlxn+Ct +bOdhM6cn4z7CuK+w8P/nF1da9Sg= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4gf7+OYYO7k4GGitFL7QouogMfUKZ4aUi4PP +CXbb2Ve1HC7mx7Of++iAwdcHqVfRcjC/djTXRMARztefsOCHYR2Cr/qked7Z +JkeHOYuUd/55rgnnp6YBARuCbwwClyXg/L6Ibn9GAXG4ea0K7KpnpojB7YPx +Ye5B55uADRR1SAfZI+boUHX/xy1jb1GIefMQ/A16eYsZzyD4iYcva6cyOsH5 +nzcEZM9qR/ArI1aYnt3sBDcfxofZrwsyvw3Bh5kH44Pd88/RYUewVcR/dXE4 +f62QDl/6PQk4P5xTrN04Xslhyje2+BktTnD+RpB7RZzhfLAzlJ0d9ubXvJ05 +VRHOV/+k8nKWprzDGRBwweTXfAJ67JYqXD06fyYI3FSG2/cfBPiV4e6B8WHu +RedLz4vTPG2gCeeDzf+lCQ8PWPrYXytrke6C4IPtZ3aG89d0385guI/gg8Od +28XBzGZv0LSHGg5uqqVMsxQQ6Rc9PQMAhB0kjw== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH9IU1EUx2dJYkQ/90Pa5n74Rkhl6UwqFI5W715CLERyliAG2/qB+Uf+ +kWBFWkoWJKZpU0ST0mChgRaKDEFnpU4QJUwkJfwjQyGlhvRr7b67dy/qgcvj +8959557zPedc08XCTPtmhUIRFlwZwbUpuMrbsocTHmLIWppYrk/Vgsx3jRGW +0Uk9vPiK4wI5GBbLCx4kXDDQ7+kY9q0IC64PBpjWluQnqDDMnspLdbUYoTPu +WmvYIgK7I2hDRuiZrvxrr0CQHamusO4wwVNiOQhmYvXugNUEc57tjdZvIn1/ +nzNye9sUq2bGyuLqIl9XDOWtCDot82VNPgGg9Mu7+secxwvzIsaOYca/cgu8 +/9IwOEk8T8xwsKp5NV7E8P1Zh9E3ZYKVzrNXXQjT89pNoKmdjLyUyfl6t+r3 +yDnO0n7nRqb5ct5D4k00M57Pb/mY2CEwrqm4d35CZ2Es6ZZsgW1nOmrsNs6y +3jJLfg5hSH8fkdLQLUCNf0tevYBheCDt1eVbAq3HTwR3wr2P4jUWsGnejiuG +EPtf+l7Luf+m/qhzRmR8mvh9LlJ92mPWss3MWNJTzfmlf+HGKITynxXhRFXZ +bscVI81nJ4IAsduh/jmJaP/EGiCK6F2JINdi0431RQNx6/iM4IdnuduZFE3r +vYJof+2Kpv6iMN2v00Oxrf2IzxrS36Fj9ayT+kzLWOqf8L2MJf9+DeQPTOy3 +mzCMEnOrINEatAbEuCn5wKQrifMnot+SSM8v0dD+GxFD86OjenhFFt9rouug +GMpnI2cVCXWBfjEUvx7+kH7t5Sw93nCW9V7PVE/Oht5mjz1Dx3iO6DeuYkzz +VzKW5q9HSfPs4iz1Rx/nHNJPntA8DipBQWxKpHEOqVj9pftCq2Ys6WpV031+ ++Xw1redhxPxLY1uK1sbTyDm8tfp4WApmLN9Xcj3W32f/ATNWIU4= + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y7vNyiFGNkDknI+0A47cosKueuSLr +MOUbW/yMOZj8dhDfRBrOTwOBY+IO/P7rp6QWwPiiDmdAwATBvyFdk2h01hOD +DzFPCs4XqZxUcpZFGs5/krjwmom+ikP78vBTRku8MPgMIPBABa4enf/r7esD +ls6aDvZNj47PWI3gL3/hofd/padDCy/Q4azqDsYgUOzpcOFq2Bv93SoOFteO +5pq88HBo+G1VcG4Fgg+zfxlIf6YnBh8WnjD+A9d4x1kXRR3UnzTPO3vL02Em +COwUcSiPWGF6VtsLld+N4MPiQ2HXgn2p68Qd0OMLAEcSv6c= + "]], + + FilledCurveBox[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQ/R8E7vs6PHCNd5xVKOkA48eoRsick5FxSE0Dgn2Y +fJh6GH8mCOwUc7iQH89+bqavg9uao8sZIsQc9tbKWqS3IPhvePcZzPTC5K8V +0uFLvycB53/Z93Fr+jRJOJ8/NuC+0XcFOH/lt5cVZxyU4HyRykklZ02UHfbc +6vqbyu7r8PPt6wOWyioOS1946P2/6OMAcmbaMxUHgU+O59N6fRw26OUtZrRR +dbi/j2+OsReCz7J4khXjWW9Ufq63Q7eN5660T8pw/t78mrczU5Xg/Duasmv+ +b1Z0WA6yr9PbIZxTrN04XhEivxbBnwEKp4sIvn3To+MzXntDwvEYgv9h0XqF +sxFKcL4xCAQrO0z5xhY/YwuCL+/4MfnMXAS//rdVwbkD3g6iPV6vWEJUIO7h +9HEws9kbNO2gisOTxIXXTNwRfFh4wPjg8HvuA4nPm8pwPsx/MD44nexXgLun +/PA215lrFRxcVEuZZjl4O7xpy+02ipaF8+V3LdiXuk4Sztf4pPJy1ktReHhD +0o8IJD60fOD8kq2iv0/3Ifg5nD8XpF/2cQh5e/njjIViDrz+66ekfvBxqL7/ +45bxawmHuTY6V2Z983FQANsnBgkfVWh6+iYCcX86gv9lQ0D2rHYEH5b+IeaL +OqDnDwDN+HKZ + "], {{57.807800000000015`, 6.981249999999999}, { + 57.807800000000015`, 5.8125}, {56.93749999999999, + 5.418749999999999}, {56.42499999999999, 5.418749999999999}, { + 55.84059999999999, 5.418749999999999}, {55.35159999999999, + 5.84844}, {55.35159999999999, 6.42031}, {55.35159999999999, + 7.993750000000002}, {57.378099999999996`, 8.137499999999998}, { + 57.807800000000015`, 8.160939999999998}, {57.807800000000015`, + 6.981249999999999}}}], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4vjDl7VTP/o7xKhGyJyTkXaA8VsU2FXPXJF1 +OK5pNen0eUx+O4hvIg3np4HAMXEHh6ZHx2cshvFFHf6DQDqCz+O/fkoqAyYf +Yp4UnC9SOankLIs0nP8kceE1E30Vhx23uv6mXsfkM4DAAxW4enT+r7evD1g6 +azqUbBX9ffqeH5x/R7om0eiun0MLL1Ahq7pDKshdy/wcLlwNe6O/W8Uhh/Pn +gnRpP4eG31YF51Yg+DD7wfrnYvJh4QnjP3CNd5x1UdQhQnz7RQY+f4eZILBT +xGFN9+0Mhng0/n4EHxYfCrsW7EtdJ+6AHl8A6hi84A== + "]], + + FilledCurveBox[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ3RzoObchLNDhPwjcl3KA8dU/qbycpSntwPFzQfrm +oECH6TOBIFLa4fBl7VRJPwQfrM8dwQfrdwt0iFGNkDknI+0QXKIy/b8Lwvz8 +ePZzkoaBDmuFdPjS74k5RIpvv8jwL8AhDQSOiUL49xB8G50rs57tRfBfbF/P +/LwgwOFNW263kbQ4Kj9aHs6/7xrvOEtRwaF9efgpI6D9MD7YPSEIPsy/6Py9 ++TVvZ05F8MsPb3Od+VfJ4Ttb/Awf3UCHDXp5ixltVCHmXQiA8yNA7q9C8Ccs ++GH4zCzAgT824L7RcSU4X6RyUsnZJfJw/kxw+Ek6bHj4cuqmFih/p4iD8CfH +82k3EXywf0wC4XzU+JN0QI9PAKnO2rA= + "], {{68.6125, 8.29219}, { + 65.77499999999999, 8.29219}, {65.8703, 10.1641}, {66.9203, + 10.3781}, {67.2531, 10.3781}, {68.52969999999999, 10.3781}, { + 68.60000000000001, 8.696879999999998}, {68.6125, 8.29219}}}]}, { + FaceForm[ + RGBColor[0., 0.705078, 0.705078, 1.]]}, StripOnInput -> False]}, { + ImageSize -> {106.08606724782067`, 24.508064757160646`}, + ImageSize -> {70.72404483188045, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.72}, {0., 16.34}}, + AspectRatio -> Automatic}], {2.2, 5.5}], + InsetBox[ + GraphicsBox[{ + Thickness[0.014108352144469528`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {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}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ9IGYC4v7gEpXp9hYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg7mDzwl229lXtRwcmh4dn+GN4H/Zeavr71czOP9Flva36XMR/Nrf +VgXnfpjC+TNBYKUp3HwYH2Y/2PzTZhj8gFvSNYlCmnD+etUnzfNyNeD8vfk1 +b2eKKsD5a4V0+NLrJOHmtyqwq56ZIuqgBtR2tssEzl9yfx/fnMvGcH56GhBM +M3KIUY2QOVcjDue3gOSvyMP5MPfA+CI9Xq9Yvmg6PE5ceM1kvhHc/dMn8FeZ +VRvD+Smxd9yYd2DyYeFRslX09+k8Y3h46WutFL5QYgTnb9TLW8wog+AXgOLn +gCGcD3bPMQM4374yYoVprQHcfBgfZj+3m2op0y4E/ysoPqcawvkQ/xii+c8Q +7n8YP5xTrN2YXwHOB4eniaRDN1CbCaOxg4kxCIg4HKiVtUhvMYHzz4CAjhmc +HyG+/SKDnLmD/K4F+1LXScH5BiDpYnk4f3J7a9TlPRpwPsy9daD0xoGZnmF8 +AG90K1g= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1FkoRFEYB/BZlCQSBuHBNmVGdpI7Y+bwMNmKeOCFsmXJ9uKBlLLMg0Gy +hGhSFIry4EXKA8rYydpQo4nSlBekKZRZ+n8316378Kvb953/Od+5kdVtJXVS +kUgkdrx5jlfieONH5+3JesbSUp2PjMEDEZ7y44kgtq/gxo7qeS9atn3n3rVk ++VOf8cSmZSPlhiKxXzDZVe4yhFxsDuuu8leQA4fybR4fCqoXbqxUHCUpqR+M +9QgdMnnl1WBVshnnU8VYockza/ZayWJffbaTDrTktlXDfUM77zvHMlJkvF3r +CdWQvz87Hucusqg+jP6m3Zy1Rl8NeSPDvlNr4+3OoxHk01B+OObGWipqjnbv +e43qn/E9jHrrCa0L4mYV9auteNBJc9XkROVKwHn/fyOPtte6P61S/82brSL3 +fHHtpy8cWd1Zvpw+zNt1ruOZZG+dvEOSn0n1YfS/9X/LPtPz3tMvlR1Wc2R3 +Hk6Qj6P8MOYJxryhHuYR/WCsR2jMO/J0Wezm1AIZ5YU/Ns2DP8+8sV8w9hPG +fqM+jP44LxjnCeO8kQ9GfrjT2W8riuZJaHwPox7mFf0wzzDmXWjkwX1BXtwn ++Lkp7nOqhTfuI4z7Cgv/P78YudAe + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4sqIFaZno10cDLRWCl9oUXXYqJe3mNHExcHn +BLvt7KtaDtmcPxekczti8PVB6lW0HC7mx7Of00Twj2taTTo9HcHfXytrkT7H +0WHOIuWdf55rwvmpaUDAhuAbg8BlCTi/L6Lbn1FAHG5eqwK76pkpYnD7YHyY +e9D5JmADRR3+g4C+o0PV/R+3jL1FIeZtR/C9Qf56iuD/jsk9+k/KCc7v9nrF +YrIQwRf+5Hg+7awT3HwYH2Y/2Pz5CD7MPBgf7B5xJ4cdwVYR/9XF4fy1Qjp8 +6fck4PxwTrF243glB/0JC34YzkPwwe7VdYbzz4CAjbPD3vyatzOnKsL56p9U +Xs7SlHdIB4VzHCa/5tOGgOxbqnD16PyZIHBTGW4f2F38ynD3wPgw96LzpefF +aZ420ITzweb/0oSHByx9RIpvv8gQh+CD7ZdxhvNdVUuZZv1wRpVXcXEws9kb +NO2hhsODfXxzjK0Q6Rc9PQMAg+xACA== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH1I00EYx2eaIr3nXqBt7sWNGMRIt0LE6lnR73dJmZTUKkMstlFmGfqH +gRlmJWGQmKSukNmrgaaBFkVYUNPKzRLFXiiMMMgwaCJDEVq7u+0O9YHjx+d3 +d889z/d57nRHTu1xxEokkpjwyA6PReGhsQWO+u4iyP0zFGi0KSHKF7QJRt+w +Grac/9HXWIJg4lJRTdohDZ13IFg7aRh3v9VASbdstt+MYHR7vs3dooWsNwmb +bixG4HCGrVcLuaWGhpBHhP2J8mrLCh1YLWErEeGrSd0WsuigzN66wR8rQhO2 +y5zFNu99ybSesfRMXam/K4VyigidxrGqZr8BPivLC9LaORcmznhcexHja8H4 +/MY8BC4cz3U99Jky6vrzEfy91aH1f9JBTdbvOGsBoue16qDTfPJ2zAnOS3d3 +1DuKOZP1lQuZ5ss5Ccdr1TMeK2gZsXYYGNdXXzw4pDIyJudmGuHeL2QOneYc +1TvKFbMZxQMIwU6sc7cBzLWe6dTNCN692tp+rMJA67EcQWWc92qqwgiTnTmF +7lGR7S/F8w852xVPBiVBgTGJ84VA9WlNmct2PWOip5zzg+B4mQ90cAXnMyPA +ttqq1c7jWpqPSYQQtnMa0OJ8Dou0f0waeITPvSNCntGuGnieDBJs0yJM9QS6 +XRuTab2XRPprVTL1l4roepUakiZt7527Ivo7VayeDbifDigZk/6JW8OY+A8q +YDavyPsvA4EPW5uMfrtExukj3iJrDmeiX3wk3nIF7b+fQuT+qKgeowKLj9Tp +mxDJZyFPLOtZ3/RFiMSvhnrcr8OciR4fOEf1ns9UT86aZ54eR7aK8Xes36CM +Mc1fypjcv6dSIG4HOJP+GOE8hfvpo0D1fC2l/wMC3dcrY/Un74VSzpjce4uc +5rMyUt+gnNZzh8j8vzyrTnfdFOfG85hzc+a6Yfc+xDj6XkXrMf89+w+MBx4e + + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4h8xuUf/nfJyiFGNkDknI+0A47cosKueuSLr +kHD4snbqSkx+O4hvIg3np4HAMXGHO9I1iUa1ML6ow4yZQOCI4C9/4aH3/6Yn +Bh9inhScL1I5qeQsizSc/yRx4TUTfRWHkBKV6f83eGHwGUDggQpcPTr/19vX +ByydNR14/NdPSd2B4JdsFf19epunQwsvUIJV3eE/CNR7Oly4GvZGf7eKA+vi +SVaMXz0cGn5bFZxbgeDD7C8G6S/zxODDwhPGf+Aa7zjroqjDlw0B2bOeezqA +gmXmThEHF9VSplkWXqj8GQg+LD4Udi3Yl7pO3AE9vgCqaskO + "]], + + FilledCurveBox[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQPWMmEPz0dXjgGu84q1DSAcaPUY2QOScj4/AfBK5j +8mHqYXyQtpk7xRxyOH8uSN/s6+C25uhyhggxh3Dx7RcZ5iH4rcvDTxmlYPLX +Cunwpd+TgPO/7Pu4NX2aJJzPHxtw3+i7Apy/8tvLijMOSnC+SOWkkrMmyg4h +JSrT/yv4Ovx8+/qApbKKg33To+MzXvs4pIHAMxWHNd23MxiW+zhs0MtbzGij +6lARscL0bDKCP99G58qsZ96o/DZvh24bz11pn5Th/L35NW9npirB+Xc0Zdf8 +36zo4ACyb7G3QzinWLtxvCJE/hiCb2IMBK8R/BvSNYlGrD4OqSD3HUPwPyxa +r3A2QgnOB2kzDlZ20J+w4IfhOW84f8etrr+p2xF88alXODNueTuI9ni9YglR +gbhH2cfBzGZv0LSDKg61v60KziUg+LDwgPHB4ccAjc+bynA+zH8wPjje9yvA +3VN+eJvrzLUKDvf38c0xjvJ2eNOW220ULQvny+9asC91nSScr/FJ5eWsl6Lw +8IakHxFIfDj7wPk8/uunpK5A8FkWT7JifOvjEPL28scZC8Uclr/w0PvP6etQ +ff/HLePXEg7m147mmgj4OiiA7RODhI89ND19E4G4vwHBBwWTyUIEH5b+IeaL +OqDnDwC7/m69 + "], {{58.0078, 6.981249999999999}, {58.0078, + 5.8125}, {57.13749999999999, 5.418749999999999}, { + 56.62499999999999, 5.418749999999999}, {56.04059999999998, + 5.418749999999999}, {55.5516, 5.84844}, {55.5516, 6.42031}, { + 55.5516, 7.993750000000002}, {57.5781, 8.137499999999998}, { + 58.0078, 8.160939999999998}, {58.0078, 6.981249999999999}}}], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y/vN3iFGNkDknI+0A47cosKueuSLr +MOUbW/yMO5j8dhDfRBrOTwOBY+IOvP7rp6RugPFFHc6AQAmCf0O6JtGIF5MP +MU8KzhepnFRylkUazn+SuPCaib6KQ+vy8FNGTzD5DCDwQAWuHp3/6+3rA5bO +mg72TY+Oz3jtB+cvf+Gh9/+ln0MLyOGs6g4mxkCw2c/hwtWwN/q7VRzMrx3N +NdHwc2j4bVVwbgWCD7MfrH8lJh8WnjD+A9d4x1kXRR1UnzTPOyvl7zATBHaK +OJRHrDA9m43GP43gw+JDYdeCfanrxB3Q4wsA9ba+Ng== + "]], + + FilledCurveBox[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ7S8nluWbHOjwHwTuSznA+OqfVF7O0pR2uHo016Qh +PtBh+kwgiJR2mLDgh+GzKAT/DAiEIPhg/cGBDjGqETLnZKQdFBw/Jp8JRJhv +o3Nl1jPbQIe1Qjp86ffEHNSfNM87yxXokAYCx0Qh/FcBcD7nzwXpm08h+Ftb +ai5srg1weNOW220kLY7Kj5aH8++7xjvOUlRwCC5Rmf4/IBDOB7snEcGH+Red +vze/5u3MqQh++eFtrjP/KjkcvqydKmkV6LBBL28xo42qgzzIvLsBcL4qyP1t +CH5s7tF/m5wDHPhjA+4bHVeC80UqJ5WcXSIP588Eh5+kQ+26bUn1E6H8nSIO +9/fxzTF+huCD/eMQCOejxp+kA3p8AgBMx9Yx + "], {{68.81249999999999, + 8.29219}, {65.97500000000001, 8.29219}, {66.07030000000002, + 10.1641}, {67.1203, 10.3781}, {67.45309999999999, 10.3781}, { + 68.7297, 10.3781}, {68.8, 8.696879999999998}, {68.81249999999999, + 8.29219}}}]}, { + FaceForm[ + RGBColor[0.705078, 0., 0.705078, 1.]]}, StripOnInput -> False]}, { + ImageSize -> {106.32665006226651`, 24.508064757160646`}, + ImageSize -> {70.88443337484433, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.88}, {0., 16.34}}, + AspectRatio -> Automatic}], {2.5, 1.4}], + InsetBox[ + GraphicsBox[{ + Thickness[0.01414027149321267], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + 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}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBwAmIQvVEvbzFjj4XDTBCIlHSA8Q9072syWYzg90R0+zMK +SDlsMf9xKCULwQfL+2Dy09OA4JikQ91vq4JzHhYOZ0DARxJij6WFQx9IfYGY +Q4/XKxaTh+YOIOVpaqIOE4JLVKbXI/gmxkDw2QzOP1Ara5F+xcxBpHJSydkU +cYh9e8wcau7/uGX8WtLhRZb2t+lzzRzWCunwpdfJOvD5r5+S2mHmEPL28scZ +D+Uh6mvMHO5oyq75v1nBoWBN9+0MBTOHB67xjrMKFR1Ktor+Pv3PFCqvCHHP +elOHD4vWK5yNUHL4tCEgexa7qYMwyP4tSg5fdt7q+mtq5rDy28uKMw7KDjLz +4jRPK5g7mNnsDZp2UAXOb2Q52m84XQ3O99gP9MhzDYeU2DtuzCdMHSSmXuHM +eKQFkRcwgfP/g0C9AQYfrM5Ay8G+MmKF6V4Evx4U3jMM4fzlLzz0/i80dBAB +BfQXTTg/4JZ0TaIQgg8KZuPLEnA+OH4ExOHmtSqwq56ZIga3D8aHuQedD443 +Y1FoOjBwqALFj7coJLwPGML5Gm959xlIGsH5f7+VPphTiOCD4yPPGM6/DXS2 +0VZjuPkwPsx+cHhWIPjRCo4fk+cYwflgbZON4P6D8WH+h/Fvg+K/WQli/ldj +OH8DKP3kmMD5tqDwuGsCjX8lSHrRN3XYm1/zduZURWi8mzqUH97mOnOtAipf +F8G/D0p/grJwPiy/wPgQ90pA0resmcNBUP5kFnOYMYG/yszbDB4+Dk2Pjs84 +bQYNHxFIvikzh/NByS49xQLOR83/Eg7o5QEAAySu+A== + "], {{ + 22.020299999999995`, 11.2953}, {22.020299999999995`, 10.2594}, { + 21.459400000000002`, 9.495310000000002}, {19.9094, + 9.495310000000002}, {18.575, 9.495310000000002}, {18.575, + 12.618799999999998`}, {18.575, 12.893799999999999`}, {18.575, + 13.035899999999998`}, {18.825, 13.0844}, {18.9328, + 13.095300000000002`}, {19.290599999999998`, + 13.095300000000002`}, {19.5281, 13.095300000000002`}, {20.4938, + 13.095300000000002`}, {22.020299999999995`, + 13.095300000000002`}, {22.020299999999995`, 11.2953}}}], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1EsoRFEYB/DBZCghxqNYeC5mFsY0nndeh4V3XrMgCyJTRLFgQYoNCyMU +E6FJSSgikaQkUkIor5pZDDZkKaYpxDz8v5s7t27Tr27fd/7nfGcSmzqqjQEi +kcjP9Ra7Xn/XO+EIbJhuZyxD5X6iGDyYIEk9n4xmivF5p7Kcd8eqydZyoCe/ +b1S2zezo2WitqcIvPIbsKXcdS660xvU1RsjI0pGSV/G7jOrFW+plZ+ly6gdj +PULHmm+CW57k7Mf9FDJWdiLRzt7K2ceudfjbrCdremqXM7W8F1+K0n4edWTP +ep615JOj/LVWi5bqw+hvHg/rzbLxHhAfjyl3dGRvHp0gn47ywyl3TwZRe7J3 +/Qq1j/E9jHr9n1znRY6a3y/5SuSVVEP+cnQ/zFX5GnlCKtYnjUGa/3lD1WTP +7zZHDipI7fav4+1ZT0Mu+T7iLe8yOpfqw+i/YN8PnTPwHjN0pUwpOLI3DyfI +x1F+GPMEY95QD/OIfjDWIzTmHXl67U6rqjSK8sIHQ0s1p5u8sV8w9hPGfqM+ +TPfp77xgnCeM80Y+GPnhHne/vSSaJ6HxPYx6mFf0wzzDmHehkQf3BXlxn+Ct +bOdhM6cn4z7CuK+w8P/nF1da9Sg= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4gf7+OYYO7k4GGitFL7QouogMfUKZ4aUi4PP +CXbb2Ve1HC7mx7Of++iAwdcHqVfRcjC/djTXRMARztefsOCHYR2Cr/qked7Z +JkeHOYuUd/55rgnnp6YBARuCbwwClyXg/L6Ibn9GAXG4ea0K7KpnpojB7YPx +Ye5B55uADRR1SAfZI+boUHX/xy1jb1GIefMQ/A16eYsZzyD4iYcva6cyOsH5 +nzcEZM9qR/ArI1aYnt3sBDcfxofZrwsyvw3Bh5kH44Pd88/RYUewVcR/dXE4 +f62QDl/6PQk4P5xTrN04Xslhyje2+BktTnD+RpB7RZzhfLAzlJ0d9ubXvJ05 +VRHOV/+k8nKWprzDGRBwweTXfAJ67JYqXD06fyYI3FSG2/cfBPiV4e6B8WHu +RedLz4vTPG2gCeeDzf+lCQ8PWPrYXytrke6C4IPtZ3aG89d0385guI/gg8Od +28XBzGZv0LSHGg5uqqVMsxQQ6Rc9PQMAhB0kjw== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH9IU1EUx2dJYkQ/90Pa5n74Rkhl6UwqFI5W715CLERyliAG2/qB+Uf+ +kWBFWkoWJKZpU0ST0mChgRaKDEFnpU4QJUwkJfwjQyGlhvRr7b67dy/qgcvj +8959557zPedc08XCTPtmhUIRFlwZwbUpuMrbsocTHmLIWppYrk/Vgsx3jRGW +0Uk9vPiK4wI5GBbLCx4kXDDQ7+kY9q0IC64PBpjWluQnqDDMnspLdbUYoTPu +WmvYIgK7I2hDRuiZrvxrr0CQHamusO4wwVNiOQhmYvXugNUEc57tjdZvIn1/ +nzNye9sUq2bGyuLqIl9XDOWtCDot82VNPgGg9Mu7+secxwvzIsaOYca/cgu8 +/9IwOEk8T8xwsKp5NV7E8P1Zh9E3ZYKVzrNXXQjT89pNoKmdjLyUyfl6t+r3 +yDnO0n7nRqb5ct5D4k00M57Pb/mY2CEwrqm4d35CZ2Es6ZZsgW1nOmrsNs6y +3jJLfg5hSH8fkdLQLUCNf0tevYBheCDt1eVbAq3HTwR3wr2P4jUWsGnejiuG +EPtf+l7Luf+m/qhzRmR8mvh9LlJ92mPWss3MWNJTzfmlf+HGKITynxXhRFXZ +bscVI81nJ4IAsduh/jmJaP/EGiCK6F2JINdi0431RQNx6/iM4IdnuduZFE3r +vYJof+2Kpv6iMN2v00Oxrf2IzxrS36Fj9ayT+kzLWOqf8L2MJf9+DeQPTOy3 +mzCMEnOrINEatAbEuCn5wKQrifMnot+SSM8v0dD+GxFD86OjenhFFt9rouug +GMpnI2cVCXWBfjEUvx7+kH7t5Sw93nCW9V7PVE/Oht5mjz1Dx3iO6DeuYkzz +VzKW5q9HSfPs4iz1Rx/nHNJPntA8DipBQWxKpHEOqVj9pftCq2Ys6WpV031+ ++Xw1redhxPxLY1uK1sbTyDm8tfp4WApmLN9Xcj3W32f/ATNWIU4= + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y7vNyiFGNkDknI+0A47cosKueuSLr +MOUbW/yMOZj8dhDfRBrOTwOBY+IO/P7rp6QWwPiiDmdAwATBvyFdk2h01hOD +DzFPCs4XqZxUcpZFGs5/krjwmom+ikP78vBTRku8MPgMIPBABa4enf/r7esD +ls6aDvZNj47PWI3gL3/hofd/padDCy/Q4azqDsYgUOzpcOFq2Bv93SoOFteO +5pq88HBo+G1VcG4Fgg+zfxlIf6YnBh8WnjD+A9d4x1kXRR3UnzTPO3vL02Em +COwUcSiPWGF6VtsLld+N4MPiQ2HXgn2p68Qd0OMLAEcSv6c= + "]], + + FilledCurveBox[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQ/R8E7vs6PHCNd5xVKOkA48eoRsick5FxSE0Dgn2Y +fJh6GH8mCOwUc7iQH89+bqavg9uao8sZIsQc9tbKWqS3IPhvePcZzPTC5K8V +0uFLvycB53/Z93Fr+jRJOJ8/NuC+0XcFOH/lt5cVZxyU4HyRykklZ02UHfbc +6vqbyu7r8PPt6wOWyioOS1946P2/6OMAcmbaMxUHgU+O59N6fRw26OUtZrRR +dbi/j2+OsReCz7J4khXjWW9Ufq63Q7eN5660T8pw/t78mrczU5Xg/Duasmv+ +b1Z0WA6yr9PbIZxTrN04XhEivxbBnwEKp4sIvn3To+MzXntDwvEYgv9h0XqF +sxFKcL4xCAQrO0z5xhY/YwuCL+/4MfnMXAS//rdVwbkD3g6iPV6vWEJUIO7h +9HEws9kbNO2gisOTxIXXTNwRfFh4wPjg8HvuA4nPm8pwPsx/MD44nexXgLun +/PA215lrFRxcVEuZZjl4O7xpy+02ipaF8+V3LdiXuk4Sztf4pPJy1ktReHhD +0o8IJD60fOD8kq2iv0/3Ifg5nD8XpF/2cQh5e/njjIViDrz+66ekfvBxqL7/ +45bxawmHuTY6V2Z983FQANsnBgkfVWh6+iYCcX86gv9lQ0D2rHYEH5b+IeaL +OqDnDwDN+HKZ + "], {{57.807800000000015`, 6.981249999999999}, { + 57.807800000000015`, 5.8125}, {56.93749999999999, + 5.418749999999999}, {56.42499999999999, 5.418749999999999}, { + 55.84059999999999, 5.418749999999999}, {55.35159999999999, + 5.84844}, {55.35159999999999, 6.42031}, {55.35159999999999, + 7.993750000000002}, {57.378099999999996`, 8.137499999999998}, { + 57.807800000000015`, 8.160939999999998}, {57.807800000000015`, + 6.981249999999999}}}], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4vjDl7VTP/o7xKhGyJyTkXaA8VsU2FXPXJF1 +OK5pNen0eUx+O4hvIg3np4HAMXEHh6ZHx2cshvFFHf6DQDqCz+O/fkoqAyYf +Yp4UnC9SOankLIs0nP8kceE1E30Vhx23uv6mXsfkM4DAAxW4enT+r7evD1g6 +azqUbBX9ffqeH5x/R7om0eiun0MLL1Ahq7pDKshdy/wcLlwNe6O/W8Uhh/Pn +gnRpP4eG31YF51Yg+DD7wfrnYvJh4QnjP3CNd5x1UdQhQnz7RQY+f4eZILBT +xGFN9+0Mhng0/n4EHxYfCrsW7EtdJ+6AHl8A6hi84A== + "]], + + FilledCurveBox[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ3RzoObchLNDhPwjcl3KA8dU/qbycpSntwPFzQfrm +oECH6TOBIFLa4fBl7VRJPwQfrM8dwQfrdwt0iFGNkDknI+0QXKIy/b8Lwvz8 +ePZzkoaBDmuFdPjS74k5RIpvv8jwL8AhDQSOiUL49xB8G50rs57tRfBfbF/P +/LwgwOFNW263kbQ4Kj9aHs6/7xrvOEtRwaF9efgpI6D9MD7YPSEIPsy/6Py9 ++TVvZ05F8MsPb3Od+VfJ4Ttb/Awf3UCHDXp5ixltVCHmXQiA8yNA7q9C8Ccs ++GH4zCzAgT824L7RcSU4X6RyUsnZJfJw/kxw+Ek6bHj4cuqmFih/p4iD8CfH +82k3EXywf0wC4XzU+JN0QI9PAKnO2rA= + "], {{68.6125, 8.29219}, { + 65.77499999999999, 8.29219}, {65.8703, 10.1641}, {66.9203, + 10.3781}, {67.2531, 10.3781}, {68.52969999999999, 10.3781}, { + 68.60000000000001, 8.696879999999998}, {68.6125, 8.29219}}}]}, { + FaceForm[ + RGBColor[0., 0.705078, 0.705078, 1.]]}, StripOnInput -> False]}, { + ImageSize -> {106.08606724782067`, 24.508064757160646`}, + ImageSize -> {70.72404483188045, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.72}, {0., 16.34}}, + AspectRatio -> Automatic}], {-1.5, -2.5}], + InsetBox[ + GraphicsBox[{ + Thickness[0.014108352144469528`], + StyleBox[{ + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {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}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ9IGYC4v7gEpXp9hYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg7mDzwl229lXtRwcmh4dn+GN4H/Zeavr71czOP9Flva36XMR/Nrf +VgXnfpjC+TNBYKUp3HwYH2Y/2PzTZhj8gFvSNYlCmnD+etUnzfNyNeD8vfk1 +b2eKKsD5a4V0+NLrJOHmtyqwq56ZIuqgBtR2tssEzl9yfx/fnMvGcH56GhBM +M3KIUY2QOVcjDue3gOSvyMP5MPfA+CI9Xq9Yvmg6PE5ceM1kvhHc/dMn8FeZ +VRvD+Smxd9yYd2DyYeFRslX09+k8Y3h46WutFL5QYgTnb9TLW8wog+AXgOLn +gCGcD3bPMQM4374yYoVprQHcfBgfZj+3m2op0y4E/ysoPqcawvkQ/xii+c8Q +7n8YP5xTrN2YXwHOB4eniaRDN1CbCaOxg4kxCIg4HKiVtUhvMYHzz4CAjhmc +HyG+/SKDnLmD/K4F+1LXScH5BiDpYnk4f3J7a9TlPRpwPsy9daD0xoGZnmF8 +AG90K1g= + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1FkoRFEYB/BZlCQSBuHBNmVGdpI7Y+bwMNmKeOCFsmXJ9uKBlLLMg0Gy +hGhSFIry4EXKA8rYydpQo4nSlBekKZRZ+n8316378Kvb953/Od+5kdVtJXVS +kUgkdrx5jlfieONH5+3JesbSUp2PjMEDEZ7y44kgtq/gxo7qeS9atn3n3rVk ++VOf8cSmZSPlhiKxXzDZVe4yhFxsDuuu8leQA4fybR4fCqoXbqxUHCUpqR+M +9QgdMnnl1WBVshnnU8VYockza/ZayWJffbaTDrTktlXDfUM77zvHMlJkvF3r +CdWQvz87Hucusqg+jP6m3Zy1Rl8NeSPDvlNr4+3OoxHk01B+OObGWipqjnbv +e43qn/E9jHrrCa0L4mYV9auteNBJc9XkROVKwHn/fyOPtte6P61S/82brSL3 +fHHtpy8cWd1Zvpw+zNt1ruOZZG+dvEOSn0n1YfS/9X/LPtPz3tMvlR1Wc2R3 +Hk6Qj6P8MOYJxryhHuYR/WCsR2jMO/J0Wezm1AIZ5YU/Ns2DP8+8sV8w9hPG +fqM+jP44LxjnCeO8kQ9GfrjT2W8riuZJaHwPox7mFf0wzzDmXWjkwX1BXtwn ++Lkp7nOqhTfuI4z7Cgv/P78YudAe + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4sqIFaZno10cDLRWCl9oUXXYqJe3mNHExcHn +BLvt7KtaDtmcPxekczti8PVB6lW0HC7mx7Of00Twj2taTTo9HcHfXytrkT7H +0WHOIuWdf55rwvmpaUDAhuAbg8BlCTi/L6Lbn1FAHG5eqwK76pkpYnD7YHyY +e9D5JmADRR3+g4C+o0PV/R+3jL1FIeZtR/C9Qf56iuD/jsk9+k/KCc7v9nrF +YrIQwRf+5Hg+7awT3HwYH2Y/2Pz5CD7MPBgf7B5xJ4cdwVYR/9XF4fy1Qjp8 +6fck4PxwTrF243glB/0JC34YzkPwwe7VdYbzz4CAjbPD3vyatzOnKsL56p9U +Xs7SlHdIB4VzHCa/5tOGgOxbqnD16PyZIHBTGW4f2F38ynD3wPgw96LzpefF +aZ420ITzweb/0oSHByx9RIpvv8gQh+CD7ZdxhvNdVUuZZv1wRpVXcXEws9kb +NO2hhsODfXxzjK0Q6Rc9PQMAg+xACA== + "]], + FilledCurveBox[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH1I00EYx2eaIr3nXqBt7sWNGMRIt0LE6lnR73dJmZTUKkMstlFmGfqH +gRlmJWGQmKSukNmrgaaBFkVYUNPKzRLFXiiMMMgwaCJDEVq7u+0O9YHjx+d3 +d889z/d57nRHTu1xxEokkpjwyA6PReGhsQWO+u4iyP0zFGi0KSHKF7QJRt+w +Grac/9HXWIJg4lJRTdohDZ13IFg7aRh3v9VASbdstt+MYHR7vs3dooWsNwmb +bixG4HCGrVcLuaWGhpBHhP2J8mrLCh1YLWErEeGrSd0WsuigzN66wR8rQhO2 +y5zFNu99ybSesfRMXam/K4VyigidxrGqZr8BPivLC9LaORcmznhcexHja8H4 +/MY8BC4cz3U99Jky6vrzEfy91aH1f9JBTdbvOGsBoue16qDTfPJ2zAnOS3d3 +1DuKOZP1lQuZ5ss5Ccdr1TMeK2gZsXYYGNdXXzw4pDIyJudmGuHeL2QOneYc +1TvKFbMZxQMIwU6sc7cBzLWe6dTNCN692tp+rMJA67EcQWWc92qqwgiTnTmF +7lGR7S/F8w852xVPBiVBgTGJ84VA9WlNmct2PWOip5zzg+B4mQ90cAXnMyPA +ttqq1c7jWpqPSYQQtnMa0OJ8Dou0f0waeITPvSNCntGuGnieDBJs0yJM9QS6 +XRuTab2XRPprVTL1l4roepUakiZt7527Ivo7VayeDbifDigZk/6JW8OY+A8q +YDavyPsvA4EPW5uMfrtExukj3iJrDmeiX3wk3nIF7b+fQuT+qKgeowKLj9Tp +mxDJZyFPLOtZ3/RFiMSvhnrcr8OciR4fOEf1ns9UT86aZ54eR7aK8Xes36CM +Mc1fypjcv6dSIG4HOJP+GOE8hfvpo0D1fC2l/wMC3dcrY/Un74VSzpjce4uc +5rMyUt+gnNZzh8j8vzyrTnfdFOfG85hzc+a6Yfc+xDj6XkXrMf89+w+MBx4e + + "]], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4h8xuUf/nfJyiFGNkDknI+0A47cosKueuSLr +kHD4snbqSkx+O4hvIg3np4HAMXGHO9I1iUa1ML6ow4yZQOCI4C9/4aH3/6Yn +Bh9inhScL1I5qeQsizSc/yRx4TUTfRWHkBKV6f83eGHwGUDggQpcPTr/19vX +ByydNR14/NdPSd2B4JdsFf19epunQwsvUIJV3eE/CNR7Oly4GvZGf7eKA+vi +SVaMXz0cGn5bFZxbgeDD7C8G6S/zxODDwhPGf+Aa7zjroqjDlw0B2bOeezqA +gmXmThEHF9VSplkWXqj8GQg+LD4Udi3Yl7pO3AE9vgCqaskO + "]], + + FilledCurveBox[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQPWMmEPz0dXjgGu84q1DSAcaPUY2QOScj4/AfBK5j +8mHqYXyQtpk7xRxyOH8uSN/s6+C25uhyhggxh3Dx7RcZ5iH4rcvDTxmlYPLX +Cunwpd+TgPO/7Pu4NX2aJJzPHxtw3+i7Apy/8tvLijMOSnC+SOWkkrMmyg4h +JSrT/yv4Ovx8+/qApbKKg33To+MzXvs4pIHAMxWHNd23MxiW+zhs0MtbzGij +6lARscL0bDKCP99G58qsZ96o/DZvh24bz11pn5Th/L35NW9npirB+Xc0Zdf8 +36zo4ACyb7G3QzinWLtxvCJE/hiCb2IMBK8R/BvSNYlGrD4OqSD3HUPwPyxa +r3A2QgnOB2kzDlZ20J+w4IfhOW84f8etrr+p2xF88alXODNueTuI9ni9YglR +gbhH2cfBzGZv0LSDKg61v60KziUg+LDwgPHB4ccAjc+bynA+zH8wPjje9yvA +3VN+eJvrzLUKDvf38c0xjvJ2eNOW220ULQvny+9asC91nSScr/FJ5eWsl6Lw +8IakHxFIfDj7wPk8/uunpK5A8FkWT7JifOvjEPL28scZC8Uclr/w0PvP6etQ +ff/HLePXEg7m147mmgj4OiiA7RODhI89ND19E4G4vwHBBwWTyUIEH5b+IeaL +OqDnDwC7/m69 + "], {{58.0078, 6.981249999999999}, {58.0078, + 5.8125}, {57.13749999999999, 5.418749999999999}, { + 56.62499999999999, 5.418749999999999}, {56.04059999999998, + 5.418749999999999}, {55.5516, 5.84844}, {55.5516, 6.42031}, { + 55.5516, 7.993750000000002}, {57.5781, 8.137499999999998}, { + 58.0078, 8.160939999999998}, {58.0078, 6.981249999999999}}}], + + FilledCurveBox[{{{0, 2, 0}, {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}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y/vN3iFGNkDknI+0A47cosKueuSLr +MOUbW/yMO5j8dhDfRBrOTwOBY+IOvP7rp6RugPFFHc6AQAmCf0O6JtGIF5MP +MU8KzhepnFRylkUazn+SuPCaib6KQ+vy8FNGTzD5DCDwQAWuHp3/6+3rA5bO +mg72TY+Oz3jtB+cvf+Gh9/+ln0MLyOGs6g4mxkCw2c/hwtWwN/q7VRzMrx3N +NdHwc2j4bVVwbgWCD7MfrH8lJh8WnjD+A9d4x1kXRR1UnzTPOyvl7zATBHaK +OJRHrDA9m43GP43gw+JDYdeCfanrxB3Q4wsA9ba+Ng== + "]], + + FilledCurveBox[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ7S8nluWbHOjwHwTuSznA+OqfVF7O0pR2uHo016Qh +PtBh+kwgiJR2mLDgh+GzKAT/DAiEIPhg/cGBDjGqETLnZKQdFBw/Jp8JRJhv +o3Nl1jPbQIe1Qjp86ffEHNSfNM87yxXokAYCx0Qh/FcBcD7nzwXpm08h+Ftb +ai5srg1weNOW220kLY7Kj5aH8++7xjvOUlRwCC5Rmf4/IBDOB7snEcGH+Red +vze/5u3MqQh++eFtrjP/KjkcvqydKmkV6LBBL28xo42qgzzIvLsBcL4qyP1t +CH5s7tF/m5wDHPhjA+4bHVeC80UqJ5WcXSIP588Eh5+kQ+26bUn1E6H8nSIO +9/fxzTF+huCD/eMQCOejxp+kA3p8AgBMx9Yx + "], {{68.81249999999999, + 8.29219}, {65.97500000000001, 8.29219}, {66.07030000000002, + 10.1641}, {67.1203, 10.3781}, {67.45309999999999, 10.3781}, { + 68.7297, 10.3781}, {68.8, 8.696879999999998}, {68.81249999999999, + 8.29219}}}]}, { + FaceForm[ + RGBColor[0.705078, 0., 0.705078, 1.]]}, StripOnInput -> False]}, { + ImageSize -> {106.32665006226651`, 24.508064757160646`}, + ImageSize -> {70.88443337484433, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.88}, {0., 16.34}}, + AspectRatio -> Automatic}], {-2.5, 0.5}]}, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + ImageSize->Large, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange->{{-3, 3}, {-2.9999998775510206`, 5.479999857959184}}, + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}], + InterpretTemplate[Legended[ + Graphics[{{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0, 0, 1]], + Line[CompressedData[" +1:eJxF1O0vFAAcwPG74xhxL7rO1tku7nba0fQwT3MqTDFjxSHWVbccye6mmTw1 +mkZcoZuhOi21PBNJWapDXDqTTrFMGi4x5yHGdWd3nGrrfr8X333+g6/zxZTI +BBKBQAj/2z/j26SrOzvWvWb3GOku3C1UcbKWn76Jukx1DS6voYt2s08m1OiV +ZM/Yjn40l/2tN7EQlVWxyoYpaPV0UUqEjRXoMMI7xaGRQeVpXtAQ2xIM4bDT +WEwL0LeVX6c6SAINtxKpRzhE8Le+puL8fgKoYJZ5dItNPWa55OsdbsItsNzf +2zsgxwDGP4idW6zeBFX1DBuiTAcy7J4d7unUgrZO8ypN0zooiiq419CwBgr6 +p4cYZSsg86gp4n2eBmxM6lC/6ZwDkzfa+bdlatA9lxxnxZoEqVljuyqrRsFx +oci1bXYAzMh2LR2saAWb7vj41xx6etxs6eW8r4IbH0B7bRi3JWIUnEkb8EjP +nwR/dYX3ZSjVYF3hY4FQMgeydc3UzCoNOPV8n5ybtAJG350pWpKugQ9ri+Vh +leug5VnxCjlLC34SNNZH5uvAl/b0c3rRJugic16wDjOAhvT87WbeFrhkcKQ0 ++JjAR5cKxxxZBH+z0oCPxXvZRJCS0hzYTyOB3UGv5J10C3BbfMErhmIJEq2/ +3HfbRr1CUvtCCVag4XvLAm0dDRIppeE6tMQ461NgQJ3ojhItyRoMPiPhjFLR +8s8JyVJP1H2AsWybhWZG+5YH5qDvfkb7ZeehURYlxRoJes3feEApQ5Wvx8UF +b9HdoRs0eS/Kn6B0axXoqv4ERTiMOni+aA2cQgUKVUz2D7SRt2Rqn0f9Upmn +nFfRm8Rj+tgNdEQaVy3Vo3Snq8FKI/r/W+AfYipULQ== + "]]}, + "Charting`Private`Tag$9070#1"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[ + 0.196078431372549, 0.803921568627451, 0.196078431372549]], + Line[CompressedData[" +1:eJwt1OtPk1cAgPGWS89A6OvAklgHk1tnkTEw3CLoORIEh0W5CmQMyURABmKc +VkDRQWAUR7VhyiY4kSl3RRRGZAPOO6hdwTGc1BnAABUhFEEa6EpTSrstOR+e +/P6Dx/mL3JjjZgwGI/K//vfYA8myyQRoWYrzlMlkwlvWubwgA6B3aP0EQp0J +S8Pqk4U6QIvEEd2LahPmTXYPLqoBLej56rsxpQkv2MzcGVMCWrFVFt4xYMKn +svwSOwYAPa3Iak8vM+GL7uN0ehmgDRGdRcNsE66uca0cZgPaNyDcrcbRiGun +RLnRVix6L35/6ic7A3Z4FnuYz7GkPW833orx0GN5VGzoU3cLWlLXIKo6qMMH ++O5nXF3MaUlMxHxYqBbvbktuGPnEjD6T3C2oParB+svp9rv4TFrDGealxazg +f9buXk/5iEEvLH+6s/eQGktdKn37coxYtN/txIWJRRxkealjZ5oBC62N6Qny +eXwNBQTsK9TjHUUnTxbr3+BjNxNnF2p1WBb4cOgFVOKRRicrZrUWB9cWuFlk +jmMnm3Yf3KXBed60zDD+HFtvnxtRtazgKIbPpUMJT3B2XOkPTU1q/LW4ZbM9 +px6nDkw9dapcwoxZZp1Vbgd02WOMflKkwnmbwOMF3SBszuxQ/to1i9u8bgSL +KhUwa/Vh8rfVSuy59WaYaugV9LpomcRyncAqVDh64eRraJ+v2FRVM4qFAxy9 +7645+DIt2+PBjAwPzaX5bQlfgOcKPK4MXm/DSYmOGXcc3sGWq4Horvd9WChl +upSq1PDKiaK/U4t/h7s+fsYVqFegrUYQdC96FJrvGWV/qdDA6TMyX2HJBAz8 +0UfsqNTCd92R/efkSrj2iqcMeqODDWV1qWnls3B0IMr7kVQP3bWt9nk1Kmi3 +/sKqZ9gAJx992BuUuQRzx65OOnYaYfz306K3EjVsOXhKevYAA92qr+gVVK3A +kRhZCu8gE1l8lrNkma+Bxfe7tMXBZujP1ObGmBItzGhXxPJDzNHPttzP17J1 +cJwlbjvvb4F41c7zQKCH9sObNeY8S6QXlmy0xhpgYVC/8QWfhd7qt7GbAo1Q +uGEL4j4A6HZGmWKbK4P4HpLs+6NiqzuTaIXYua0hAxwzojXqC33c28U1J25C +GzlH/Y+wLYg2iAme39i5YUG0Qf4HTvdHMFhENtK/ujfPWWER2Sg0Wy6J1LKI +bCRenwks1bOIbLSdu61cYwaIFApPKOeP2gMiha79dTxL4geIFPKSOS1a5wMi +hfLid18LKQRECv32Jj64oAgQKRRnLq5QlQMihc6jdU95NSBSSP7Ly5zSHkCk +kF3EKqeXBkQKJY+x+zRSQKTQ8tp+dtowIFLIwa+zLWQSECmUKh05UvAaECnU +HPvW+HAOECkUfNrlsPMyIFLoG+betcRVQKTQM0lSrWQNECnE3X42XL4OiBQi +/yJS6F9MP1RJ + "]]}, "Charting`Private`Tag$9070#2"], + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]], + Line[CompressedData[" +1:eJwt1Ps31GkcwPFxm2clkxqP3dgmlyiUbOt2aD2f7h1LEorTVLORrAzWiUKx +dlkpWUeiKFSEXFLUUeH5hjTYsNHa4rjnmIaIMaNx291z9of3ef0Hb4PjwQdO +KLNYLJd/+0+f+ykTS0uIsXNlPLTL5FR7TtfEYR4xWurn2Afz5bRhdz4/fBYx +I3W2VRk35NSk90nT2CRi0mzu6+ldktMPy4fuvB1AjGxN9qCBv5yGBFh7VdQj +pnIsKmSzoZxGG79j/BIQY3HRNskpXUYzs4xSX3EQY/airP7n6Bma03ch2E2d +zQxWXr/bvXaa6rS7u5piNUaGv9UOEE9S0X73nS3GqoxWbKe62blxutfU+LSR +oQojanLo4L8cpfZl/Lttm5UZu5mlB7Ljw1Rx0Y+7xVSJCdkQ+ekd9NEZed7V +o+tZjH/SqUv2o29og2GqVa1wkeae2pTbLmimDmoxFea+85TZkm0cM1hK08DW +dtt5Be1PfhMsPlxJfG54vf+QM0uvte3Tz49qIW0FPHWlTBmtijspndTvIrzl +5d/Qx1IKPeObtg31kWX6I23ie1N0v8nzFkn5MAn0iL9WWDhJf25xVSx4i4mg +vq+FlzpOlZNjuUUPx4nhd4tuL2LFNNziyO1nVp9IkX/FwLPH72nauu8tJ05O +k4DpB/xLmQN0JHerk1XzDLGIVvNmG3XTp+5aA3yDWcKN6NRIz+qgNletx932 +K0iXb6DZ/aFGOsI/Gu9VNk/ORJolN10to44Vf6eaDy+Se7/bQZ5lKdHIzeT8 +lMCC5B9j/xL88pJcKWpe7VmpBJpSZ4cStw4SFHnn2NpXytB/utEqPK6b+HCi +T4UuqMDHJy51Z0QDJLOmydp2gxrcTbgl8E18T4ysau0HHdlgLCvmns0SE5Gw +Uk1HiKD34doaB/9xwgS5a1gmfAGeGf0XJCmT5PNFn7ZnWeqQnZ9U45w+RZwD +wrzbXy4D1cPCcbUIKZFqWfJa+jSgVVBUcCBORh5FjhXuW6EJjzR1j8gDZ0lz +sVtQlRkHTDINRpGzgujPrp+6AitAER63UOw+T0QqLN68jRZIFHqcQrtFYhYM +glv1WpB7MqFTz4gFutWxahr8lZCy7Y+k1cZKcC99LrH000rgBBdvr8fKMNzZ +ZL7j/Cqo3VlV81hXBUqk1yxvanNhQXjM5iBHFdacrT7w4RYXlNDr6+YLqrA5 +8SuPkI3aYLM3tM6JxYbWqLCqp3XaoOgpGcVTbNB5bWI/uw/DzkBRiouMDTx5 +qjDADcPluSG7eAUb1n29lNvjjkFfVy9Rqoxgi18Xeu6FYc+hRNMOLgIXRcKb +xOMY0v48EZBijSDOUByiF47BopE3tiwCwVRocYHjTQxnPe3Ttp9H8Dnjy+7y +HAzPhz23RsYiYNX8yjG6jcFD5XKSOBGBJuKHoQIMUTC3UZSJYEPW8h3t5RhE +T7uE8dUIBPXC3h8aMKxymsY1DAK/0bcrOxsx8N9yaqUNCII0d+/a3YRhQr6L +4/sKwblDvBKzVgw61pVl23sRZEhaI6a7MAga2g5GDiLI1nIoPfEOQ5G7ZPHB +CII864L+rh4MW0MNXQ0mEDyMidlTPYDhNyVHudc0gid5kkiLYQztKd45KXIE +TNOhstwRDLr6YXtEcwhEH+sHVokx/P8vaOVa4ngJhn8A0AJPLg== + "]]}, + "Charting`Private`Tag$9070#3"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + Thickness[Large], + RGBColor[ + Rational[2, 3], 0, + Rational[2, 3]]], + Line[CompressedData[" +1:eJwtz3lMk3cYB/C3ffu+P4+gHGtGsCDQTTNQQQrIvH4PLHSFcTgEAYdXi8eA +qCiIErVFLudEDgWDELzQIVgB8VbmxQDJmHjQwTpEuWRIq0DrXlra7jXZH08+ +eZ7kSb5fF+mOiM1cgiBC2flkeNWSaQTB4LD/3XNoPKmPw+DcUOWmT1bEKZ81 +kQxmVOWVn9RaC8t+QgzOaTUPHWY9um/WIrvZDD4yX7remrU1eHD1PCcGf73b +XzCH1V9TdDpkOYMXSd4wc1lFXlrf0r0MbnCPjRxOY7BnwTJJtJHBXb/pr2xh +GKz7fE1MYuokNjcULrXaMYnLolXrHDSTWHGb5yzqm8RrEzWB2u0G/MeNEJ+e +dQb8purZAvthAz4mzFC7dxiw4k7Ixy2JRtw0nkr9E2zE3KyF11eNGvHB42WW +7x8Z8Xdp6l0F8VPYUHxI1Oo5hZUrne30Q1N42/RliWW/TGGVh9fV2o0mzH+k +dKvlm3Bf1yUx1WXCThbBh06FCaM1txrlsWa8IZMZlehMeGLquGjVczM+1eHx +s2SDGTNp9NHAKAs+48hflsnee6tfdXd2WvDLiri04QALbiED7F7NI8BO4/Ol +oMaC3QWvq/u3EiA6PdjWaEXA7icD/icqCXihCbIe9Ceg5bV3cPQQAcFu6cMO +6QRYvVzS/nYeB/pHRi2WOgJ8486GC2UcuOjRH/Cxn4CksDXfJFdyoOtCeLTO +gQPZncm+CW844Pc4dqN1GAfy/aDS05ELSykUrZezf9TazOnruTDKSx5UX+fA +2a1/bco7xYWjzqeddW85UCW6WC/8mwuFGqnvNCcunFF/sT9XQELS2lzbkQgu +7LefIS6JIWHRRaPn7CwuxN9fmnGzlAQizFTqdpsLnsZndzNVJOyaf2tO0QgX +NLaCZEdbHhR7+bh0O5Bw80T9yScRPLgSNRJjE05CfI2y0TmfB6qsgbzzchKc +Fugjj3TwYEFt2zbXayTc9T//rsKKgj3tWQruIAlBIp5JEURBbov1zN8/48HA +sTp56hEK6AfShwckPJDJH3P4LRT8aTgsKt/LA223i755Gg3p/nt7Ki7zIMFa +JBMH0RAsG/LO6+VBm7q6Y2c2DQV25x6Mz6LA12Z7rbKZhoMxb+V+ARTkqE/m +FZMITCr+Q0MyBS0ZKUPBGMHy92MRDWco4BeV19kqEHhGjiVIXlAgXuKenn0P +waHc/Dwplwb7OV7xxxsRhPa8uORN0jBi9gs7+ysC14zAJppHQ36z2LXxAYLU +mvqJaoqGrihpm64JQVbkteUTbO7ElFKH+HYEWpfStMzZbM56dDfgFYIZt/OL +zglokBbPurCqF8G9H/UpKY40eO/j569/jSDSviBK7ERDNwhl6X0IoqWbbUbm +0uDasXLm1SEEcaEluxcLabimTf3B5T2CG/vEffe/oiHn+f5Ajw8IdDvtqwrd +aIi5kemxYgzB84XCJJk7DaYDhWTsBIKPw/1aeiENYitlTcG/CFR6+95QT7bv +WENxBYNAUXOzZO5iGt69vCO/PImgji4MGWP3gvLW1a1GBO3luqsnRGx+xdMV +qikEXuFy2RZvNn+8av6ACYFtSaCtnw8NtKTHZtyMwEb57f3pvmwf9wGjxYKg ++Wl2gprd/wMkyiCG + "]]}, + "Charting`Private`Tag$9137#1"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + Dashing[{0, Small}], + RGBColor[ + Rational[2, 3], 0, + Rational[2, 3]]], + Line[CompressedData[" +1:eJwVyX8803kcwPGNaeTHNnHEHvnRLpEkqYfq+H60/FiSHxUeG/LzSkRXl9Kl +cwkpKnJHFNcV+rG7UPmZe08JO2eMWQttbfNjyM+l0sS5P16P1x9Pi4gE/2g1 +HA4Xvdz/v0HvLRMylRAPC/tbjOWYiLZ5Z0KgEowpsblsczlGXZHdSTygBBfq +p9Eb6+VYWdvuz07eSrDwahiOdpJj9d5PGUWYEoZSfayMguSYLPDG+0M0Jbg7 +vvN8nC/H7OP8HEYnZsGk+IlbvdEg1pHX0ahKmQXBvm2sUNMhrN+N/LgjbwYY +uy+H64WNYMcf2QS5105DGW/qBSl/FPP6miamcaZg5masprZ4HAuJ9Gr6ZnwC +VB+eZBidncTOO3BWBWx9D5/vK4qLL01jbk1ckynmGNiYM8LVVs5i3hs6v9pl +KkCAD96edk+JRS2m+j4XDoPhGgukcJ/DLHM6Au8uDUKbKe8BzfkTNpnVwnvt +IQeZe7Cu5t55bCGyweJJgRQuUg8afpuvwgIvv5mLzJECKSb/Iv+OCquq+MQ1 +uCwFj8Yrzy6yVdjhr1tOJP4khdGS4+eXmlRY92/sF9tDpcCy/fWWx4QKe8C9 +HclZKwUqq7zR2m0BC9iUUtrx1zvwmikKTPyygIXNZfp3ZUqgmspgJiQvYqGN +9O9tz0kgkhYziGUuYsFpX5MuxUsgxuBEkfGvi1iQ4Q930H4JnGz9WC9jL2J+ +W4OmK6gSMCZMTPYNLGK7Tq27mvNYDA85L2RRLkvY2rkXXP/et8CTWZ00JuDQ +8AcV6jUfADFh7HbTAA5JI5iWOvoD4PJy19WkQRwa6KpVp6sPgMT3oZvTexzq +YZ9qqRjqhwA5x/EfFQ5xoqa8sh72w3dOPe6upnhUJJAF0B37Yc/VqTXpLDzy +fcqNq/ToA0Nd4fzfUjzysly/T+HUB4XdF3/+fgyP3K+nbzKz6QO85s2D3yjx +yDmOPpul0wfXZLkbrhHUkA2t8fQR/htID9qrP2Klhgh5FRfMWG/guoVF73fH +1VDdyfyC7HgRaIrKFVNEdXSV01uhFSaCxHCjMzkUdRSla8BN8xPBtHYI3tlU +HemVX59PdhTB2BVHRpXdsvdlMuO/vIadHiZ/GQUsu+s5qk/6ayDzNcPFZcuu +F/47uVgIv9X5E8d8CWgHq6Q265oQ0lefJc2wCIh0/22X5i9CaJtJZRMOE1C9 +KxOPjxKC0VYzon/ysp/aHzFjLYSaxsL5jIfL3u9G637WC9KV8xmniRqI9MDm +/o0OAegtqFqs/9VAtj8Mb1jJEQDJC5dtItJAe7b/8TilSgAadnmRqwc1UDp3 +dc2xfAG823So0nVBAy2OarZ4hAugtNdXgW1cgd7bjMhVH3rA67ltuk7uCtTG +vmsWRe2BhoYDla8OE9Hwj4fu9un1gGMDddvTU0REcDa18sP3gFmNg+xpKhFh +Hbl2LsPdINznt3eihIiqJ35xNq7ohs8bfV65vCGiUrsw1r/0blhH0Km+5KOJ +LlRQ8x1j+fBhY37SRy8tdHtNsiItmA9/t+zgD4Voodqst9tfe/NhqJNxZCZB +C00eKR5IsudDBXVLYmieFmJamFvCXBeYX3nlUCDWQg65a/9kpHTBpqnKEt6Z +lah55EB6o00neL7l7ypv0UZfXhpah+l2wopxs1QY0Eb2vwvb1aZ5YJMavGtp +VhvdCgqieD7jwdGzIrVPZjroRy7rVjfGgxOJRb6Cn3QQ7VFE1ciBDkgiudKr +duqi1PjjYsrP7UA6Kh5tk+ihPa62QQ8i28Et1yxvZl4PkQ0UfOTZDglB1RF7 +DUiouO7QqwRKO4SXr+cVMkionuDD7rj7DxQ+MyGzq0lotnDj2cw2LsjsOfY3 +vcmo7tio0vxPLmg6l2hEB5NRCio9VpvDBYar2NMnloz0hqnhI0wuPJLtKE3J +JCPrzTqebhNt8K4yXxLeSkZhrWOGeP02oM5X30lmUJBVYdm1go+tULNZ5B/B +pKDJuAgt+/5WkLADTsbFUtA5/b6F0HutsDt7i7Yym4IKQrjy59taQcf1MFMk +oKBOZXnlGVYL1Pg/0b9wVB+5mEd7T99rBunB8bDBulVoyeVohHNGMyiSGuxz +u1chTkjC6csxzXB+0W48bXwVohcl3aHZNUPG/sZZ+hoDdF7Nsp8neglN6yLd +2TEG6D/hxiz/ + "]], + Line[CompressedData[" +1:eJwty3s41PkeB/DZmVItxVG7sREbJULGrZb45Gy7FE4bWa0Q7bp0jqXQINEc +SZdNeVwyJZcmK5e2olKSvr+MGdeZxrg1MdOIYeQ2GPObZDi/fZ7zx+d5Pe/n +/f58ezzGJ4xMIpEiiPvbrFvPFn1rWCC8328bLPgSE1zbsjvSpgmC5zTDz0yv +wRICpAWHJWwIGs+PnHBZhTk6v+UUqtmQsJm+MKy7ClNuap8Z+YYDy+0CMy+Z +BkYTPXJP8uOAgu1x6VgukUPOzhW2cYDbfrcmamYlFh++3nP0STM8HFqo5jas +wOzdNWg2gmZoairTnmeswBRmn0qSppvBUeQUGxe/AosfEys1LVqgwfna4ZOW +K7C4qEqmTXELVKz03LO/hILFxrotJF1uhQKUp0i9QcZsfe23sspaIermqr5M +GhmbtTP7SaupFUrMWk58+JmMxc5rlRUttYKrv87sET0ydirx7SFWXBvsvy19 +cLzoC+xkakyFVnA7hNVnB1rXkrDoK4VHim258Et/EE4xWkKF8Xn357y54PdE +WPdGrkYdwZkkjxNcCDfEhica1cjCLqVcXsyFFymMqY2RajTSH6hyW8sDLUOf +Qb3aRRRkZcAYHuWBdfXBMp2Qz2hbJHc891982AckWt2ICrkGtX4FgXxgHyxX +271WIT8fNoyd4MOvvuplWYEKpe9pyHG5wAfv1D02JB8V+qDzl/NIPR9sQpnN +XRiOCuuu/rHLvBOoSakDN8uVaIOm1453FAGQNrR0/VCoQNYBdy9W6ArgVk78 +huRkBfKoWBhK/FYA9f81OTD0iwKluFfc3ggCqMhxLD2wUYFGzmus8zsjgBke +3heRO4eeL2LyN3IBUM/luyTkz6LAKYdatqgLvm/Mylv9So5oLpm6eRNd8FeG +Zy3njhxlXR2O/u1zF1j+tPN95QU5YlvkmFH0u0FOMvk05C1H1hFyxt7D3RC/ +0o9pjE0jkqQyub6tGwpDawL0v55Cf3YauVU/64HNd7mL1LmPaMQtP9yZ0wMv +01/pT7A+om01666yu3sgmuYbKs79iMqy1b3CmR5wPy+sPrGLyL79UWTLXsiw +O31c+9wYKu+5wfAt6YV0mdWkk54M3Reulc9f6oO8x+f8I2Kk6PHg5yKnACEc +TFlsuFkkQZW980faIoSgmrL1U56VIGb7tG7AaSFMeA4+PHVUgrKfDmUkZQmB +6sofZ+lJ0KnL7dHPOUKw23Y4jmn+Hu2kFrg62r0D40bd0g5TEaqiO4mpWv3w +I4denLlPiO4aJRmavxqAopBq5T09ASqK5q0RdwxA3bLBa4aoEzEaTJTZ/QPw +7z9yHOuZnejaUR5vUTUAr72+VuRYdaLEfBM6304E3Vs/5V79gY+8tHkfEipE +QDv+Mqh2sQMpl7aUc3LFgBnWMIxNOMg0Jly/xkECLV2m/rpNNShCGmJPnhwE +fuUcd9ePzyCSfiyuqmAInryN2lyXwgXW0Vb1QrQUEqu9BXv39YE277yeesso +bJHfcbgcLIan9IrUPz/LINftRZeq6gN4tRmdJj39CANMTer1e1Jg7r51/UnY +BLyfp62pDZbBodFz8+ucp4Ab7mTqbjQOs5a145tmpkH70aYljSuTQBNW3RiV +yoGe51SUQpaD4EFq6yRvBoSM6Q6ZxQzce5O0z7t8Fq7oGow12M1CRZaFdDln +DmRWyTtk7nNgUkjhaZ5UgJKePftyrwLU9WKPJvd5OLC6ROJhNQ+U5JixN1Ql +6LSQw4u3KSHtwnaBvRYOW89a+ziswYGbVrpE0cFBmHiRbbAWBz268Y6u9TjY +JGp1Uv6Bw4MzeumnNuGgMRxRzdcjdjGrHR9Y4HCnc+F22HZiFyC7abYfB9uQ +Xs+z7jiIrMtDv8nAwbCo99fgCzhstzS9NnYZh7SxepfvCGPNS148z8TBQPjp +6XrC1aaM9f55OPRN7ElrzsXBXv8SO6cUh0aqxnULwiuUSPO1LBxGkuOZ4kYc +ekjDfgMcHGZ5XQmPCY2XjqVVteHws2vc1EXCWpV//34BDhu+347tJBycdM/M +GCT+/xm0cIbQcpxV5ycl+tJHYi9CmgxGTMdwMOm+H7aZUGtoF7DkODwTHgrE +CP0lj/+TrcChJd23I4uQKdrJCFXhQKl8+D6EcPJdVZPNIg7Pf8++8be735rN +LC/j4PB//wcAV4Nn + "]]}, + "Charting`Private`Tag$9179#1"], {}}, {{}, {}}, {{}, {}}}, {}}, \ +{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + Thickness[Large], + RGBColor[ + Rational[2, 3], 0, + Rational[2, 3]]], + Line[CompressedData[" +1:eJwVkGs01Hkcxv9jYoTdVBRSbsVKRLVWmuOX1Ky10ZrKisq1y8jmUokpk07a +LTsqewpLMq5ZUS5hGtX35+jYWTqHpMk0bvOfQsKwf+M2LmtfPOfz4jmfF89j +ERrFPqFBEIT3Uv7n2Qwj9eIiA5eYcY/LapVwJ6jduG+Bgfdzk3qOViuhyobv +gucZ+BsWz6/niRKm6hYvJKkZ2L8s0EFeooSkzv4xYoqBj2rwEvuzlJBmXNNP +G2VgVl5oppKnhKfZvu30LgaOf/NYqGYpQZ2b8hdDyMBdnNpQtWQUElxV6bQI +Bl7ApusqFCOgzdy92caCgWc3C2+OLw4DVXUuXSTVwmO1+fJ15sPQVp/rvpuv +hbNOtfz6cMsXeGlX9se4hxZOMRWktnkOQY59peU9lSa+PNEpcvD9DJ2FD34v +LtHEwu28/APHBmHjtcgsRbAmZm/u55snDEAItW1w1WpN7CkjbD4l9UNFs1T2 +S/MyvOVDsUNw5icIXMspcb62DPNcQ1pKqz/ClGqsevzbZXivu4+jQKSAwl1H +TnSO0HFK4Uqv4Dck7FktOlyZS8dcYaMu/60cmMF0s2k2He9pEF/ykfaBp4H9 +rQhdOtYz2sH/2N0L+wIOMFtfaGBtY9arvb3dcJDBvhN0QQOLWX5XzxNdwGZ5 +W5HWS/0z8wDjKSmUzzrebpfSsGdc7MbUifdgskYlGE2j4dOuTvs0VkkgvrFy +fM6Dho2ECbXj9A4YeO8z6KwmMJ+V0jxs2A5VIR11PdUE9uRIfmtxaIOzieym ++JMEvjFyME7b+TUwiUqu2wYCR9u52k77iEFlq981nLsImfXKuw/0XoGt2+3z +LlqLoO/Pfe5UBpBk3uovi1uA6K+jI2kNdfDMmqgPlc2D4KalI+X0GAzV46fd +veYhaWJTyNaWbLAVPRWr6+eAyObuqqmPQWY5p4uzLOYA7+gop3cXIBef7tY7 +aWqI/jAUV+RWhbZbeVw8o5oFx7DRwYoj9ci3iROREzYLFaMG53bMNCCbQyEr +HnXMgPn96BEtZhPq1fTalrNzBoxkd7UKPjcj0XVK0F8yDZmclVclh1vRRdtb +qQZ601Bxm39PatSOhutm7DbETkHfhRmt0uQOlGxgveYKOQkujbSbwlYJWrjr +wXvFmoTIP1vf1vpJUbbCYltIjQpmbXRdfn4hQ2OmbzKk1iqYOHPsZJ5lD7Lh +xlxy5k+AJEDH5EZ4H7pa1F46pKZggWOmX/dQjrp+3BR4coaCd4cS0znlcuTy +70VdcpKCmPDwEtNqORpzWx8pHafAyi0vKvmlHAV3nrIXD1BQJs5PC3gnR7t1 +558UvaXAkLjOtqCTiIixqQl+REHB6yAPkyASHV3LPdFVQsH15cyCnnASCV+8 +NvQvpkB3IOpeQQSJonVi4w7kLfll4LQ1jkR9Bc+/c8ugoO0f+5+8U0mEJb6i +ddcogKC1fkX1JDJNLIzISKKgMUNvMraBRPFWUyareRR8v/+LnfvfJHKMvn9J +J2FpT7l3QG87iQTLB5gzZynYw9MWWw6RaO7JzpHzkRRETJSuVylJ5O/Hzxnj +UOCxoKMrVpFIv8BpYSCcgiiTsfIomgJF/pD8OCyUAnPBl7C9DAUSKyXHe4OW +fEFalfFXCrQx3XZF4DEKluevz1KuUqArzMtLX1NQ49Vi0mSkQP8BlbudHA== + + "]]}, "Charting`Private`Tag$9223#1"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + Thickness[Large], + RGBColor[0, + Rational[2, 3], + Rational[2, 3]]], + Line[CompressedData[" +1:eJwVx3dQUwcAx/GXxcPRyst4iAtEiQMZ4gBx5AfFYtmyQrVKBVnWAiJWVpUq +jSiCg5iqtEbUiDRYUJEIDYqjIMsagkgZPdCDIl45giDKStM/vve9z8KwOP8I +JkEQ3ob+f7KmqH+NVC9K2q6u/2YpBXXknY+Hz+lFrlVkRr3BxES5cZ1ML+oX +N2y0XkZBIqwR7rygFy2Jqrrbb7A0tTtMckkvsh3zUcVYUyixottbbuhFU7c6 +iWhbCn3Jh+sPVupFB/5NL4pYTSHE0r+ovFcv2sl6tz0CFAJvJZibWhCotKaY +32+jcDTS6VLbFwTSS0t+1CVQ8EhLCm9IIPBsS3oekUWh9rjdmbVyAuetPQft +FRR8i8KGC58SUATZMlWVFLKrZ1adGyHQZ3nq012tFMJcVjYVL2Sg88GC3GtD +FEQajZnWgwEn4RWR4wwumkPe1MYeZEBiPP5w0IqL+JG0Yl4+A5djKd77TVxc +GzrR3lvLwCFxgVWOmItT/8yKd3jPwNWFq276JnBxRGfifMycickOHBdncWHz +LnNvoBcTEydiZ2dd5yIuKLXHN4kJ9h3GXb+HXJQ3vMkNzGfC8/RAlriNi4r1 +f/6qaWRCNndj0skRLh4/sB8VjzKhNzbmELN4yFg/rSh4MQtza5SKq8t56DD9 +quCoHwvSbfufvNjMw4Zp1q3lySw8Gw0XuIbyEDAUvy/6OgvmS9N/7krhIWHQ +ARbPWQi5UclVSXlY6hsXZPSRha6T8kOmv/EgU1hqd1uxkVvablpUy8NMyl/S +4MOGk7zi78TXPKxL/JBflMpGuftU2n49D1OOZuzfC9hYoNTdHZ/DR51JWV7T +czbuSWJyS1fz4dNdmxc2yUZdiE6g8OOjrfpLzbiQA+50v9gne/iYnLnb+7Ev +BxXKjY9iMvho9ehZyUrjILM0JmLLZT4qfnnl6aXgoEVS8NK/go/AvuBnnzRx +EFtoTpxv4eO9u7ukdZwDm0fDO0gdH3bGtzM0i42w7lVvzdh0ASyqct+6bjWC +stRzz/IlAszO1h2rTDGCk0X4mR9cBHi6tfpkSYERhE6qNfROAUwOClo1WiNs +IF7ds00RIPRWV8jEhBEi5MxVe6UCRL62dJUvIxHcJTvVVyJA4vLurz0DSBTe +C5Bm1gswp8ms2iqNxNkBm78KewRI2lebm3SDxJnIOM8ZTBqdViOyZg2Jlqtz +7XLm0ZBxc9yym0gopSo5ez4NH71waLOWxAfzTpNUg++3hnirmkkQzU+GoxbQ +uJSlZl18SWJNIOexiwWNUN3R+NBOEnmNouSRRTS61VyP/j4SmWWfee2wpnGx +UDl65Q2Jko6xRq3B/jI3xfZ+El4mzn4eK2g8ivuOaHxL4lqsX7CjDY0rlm1l +xQMkjhS3R1N2NMIz8xcdGCZhn7Gr4A8HGvMOOGtsRkhceJC7csMqGs27tId6 +DbZ381bfNthtPadNPEpi+ocgrXw1jcUD0aedx0iUlarJlLU0OtoYm94ZXPN6 +iWzQYGnNxbfKcRL7x8ysohxpsPMbPp8/SaL35lm3QCca6uyI4RcGb3Mwe1Fn +cGLKVH7OFIn73wojXdbRWBH1k6+7nsRAQMWoyuCeAPtJvcHVrc3HbZ1p/AeV +khCG + "]]}, "Charting`Private`Tag$9265#1"]}}, {}}, {{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + Dashing[{0, Small}], + RGBColor[0, + Rational[2, 3], + Rational[2, 3]]], + Line[CompressedData[" +1:eJwt13k0VP//B3DGUqnsoihrEamUikpRWaJVlCKhUp/IUipbu1SKkLVoVRKJ +SLY8bwghO9mXMZgZ252xhvjd7zm/v17ncc4sd+77+Xq97ig6uJqfpfHw8Gzh +5eH5XzU9NTkwNzeBw/9fpR0rfr+ZnsAmu8plb6nKcI5LNpyYQJV6C92Iqte9 +D7k9GpqAzAP6rmCqpoR/GFnSRr2uYsJMnapLyq2mNLMnEPZ1z28fqnbrZM2z +8ZjAirvgRFyZgK+4t1ImcxxGL/hLfgyOo1Zn5W1u1hhu/ktZLFA9BsZC+wN6 +L0dhWlq/tqduFL6ediUSASOwu6KVWzMwAl2rh07OJ7lQal3WskRgBJ8Zu67X +7+GgfExwh/5uLpLd1qpL6XPgKTYutFafi6SZpX8stnGQt3p1wXI9Lj5IctbX +aXGgtTdzmraFizd7XjJqVnDgP3Eum6HORUTctFnVJAkdml2LoAQXvmfSl5Ul +keBP67xWzeDAm3xZLPSBROE8JmOuiwMv30cepm9JEK/fXV7fwcHVMIeKX9Ek +shnh/yKbOHArFL1T4k+iUZ9n4lYFB6dVLrJ+2pGY0UtVyc3kwJSxMpOQJDFK +TxPoCeIg+Ubh0yWiJCZVdDace8yBxNLTrs4LSfhf35LQ/5CD1v2vVsnQSLRr +frwx7cdBm8sm9Y72YQT/G5vb7MPBKil5xvawYczOpajJn+fgmz332OTsELIW +j03m7+bgVsQ6kbixIezbouEXakB9f5lz0cGBIVRfTnhxZif1+dp92vFNQ5AR +KwkQpe4bz/xWsaPpQ3hkpXX7/gYOTJJ/lqX9NwRDNf1/I4ocNE9F7XStG8RN +xQt3G2kcLPhq6p1TNoitF/e7reDlQMd1Jn1ewSBM95W3Os6RiOg+pf4qdRBB +Co56c9MkDpevkqoOGoSan5z1gTESJbHp7A17B+H/upz3PJPExDHHlTf1B3Hv +gttYQy+JVeIydmVbBuEsMD/QpIeEn79P/elVgyjSeZC6kU5ip+suIoxvEK/X +vBFXbyWRoV8VPv59AK4GZy2jq0j0TN2u2vV1AC8v837cWElC8uvGhU+SBvBt +U+avqt8kLq2OvKX6fAA8zHgPiTISmuK2TlaeA9gj8IrI/kkirrtfP3vDAGKa +Onye5pCojY31EVQfgJpSTLZ1Ngma1cEMc8UBnBhOHlqVRcKu/ItGv8gAQq2a +DYoySMh+9VoiN9iPGyYydLUvJEL95w1cj+/Hk5nVfrcSSJx4TNMRftGPCDM/ +m9NUzpRC/919EdaPPJ3DPXvjSXyJHZHF7X64MS5JK70jUZPeYcZj0w+raNP/ +5l6ReJbdHBls3g9z/kfreSg7EPXdCnv7IaGnWsz/kgS3rMzHYHM/kqv3X1oa +S0K8+1viHdF+TKn7rXenctvM/DIhPq8f7sQnenAUiTdDn3a//cfG4CUvv/RI +Ehum3rYUsNkQWeUfPy+ChLlY8EKBn2yEnInrbAslsUz60bHwHDasbvT6LadM +l/N/u/ILG/XPb2+1D6Hur5rvNqOXbJhpi/aPPiHxdOd5p/tebBy+ItC6P5CE +jeHpb9JubGTRbO4lPyahYmbL98GRDdEW49MSlNOPWjwvOcJGNHOsghVAwtfm +YJ+VKRstEbVnrSnvcTDdyNJn43r09d3VD0nUXdQvW7CWjY1jX3t+PSARc3mb +9DMVNuYSw9L2UT7jtfm0uiwb+QGdzbX3qT70WzNtOp+Nce5Hk2Gqb3MDVI1b +ZlmY1k+JukvZL1jpqdMYC2LH11vKUZaMkdF4TGdhh9D0Kut7JFpfS1yTa2Jh +my2/ES/luHjhgqRKFnoWCvYk+pFw/rRARK+IhTsWnPnWlLXT+K1/57LQlZmX +IUx5JnPu/ck0FtIFXUaK7lJzJm+KO5jAAvesYOFdyhalZIBwJAunF2tvWkhZ +rqq/4UUgC2e6Zzrq75Bg1PcqrfNjQYa2ZOM7ykktXS7wZuGoUtJGL8oeXa3Z +B91Z0P040nuY8va+P4Kd51hwz1EzX0eZf7DG3M2WhUCDJ95ilMu5v1/wWLLw +jOfy2cnbJMImS9jBZix8eqsqw6Ccf1cn+8cuFtZNX/Oqp0wKf3jI1WXhrI+T +cBnlFc+kjytrsWAZdKGlkLLZyvtqFmoshJR2M/Ipe6aMT/jJs8A3a7buJ+X3 +2xyLvy5hoUlnBf73/rqi+ojexSwENLZENVCmmRs6SguwMBi66EcP5fVt6ZtM +Zpiwu71j+1/KtudVBLxGmFixRlDkf9f/eORpXQKbiafhs3qalLNv8MU1dzFR +Z/jr937KzAWXLy9sYmLLUeGCS5SXhNN3ba9iYsTXVymG8h4Fc/GLxUx0yfwi +f1F2T/zRFZvHhL1eyoYZyi82a6VWfGVCP290YAN1HuU/Xt2aS2KiYpudigvl +qX2ih9bHMUFbV9D2ibJa4015++dM5IyNLudSPnp6eCgklAmFjlrWVur8/YZs +8/IfMiGiY2j0gHIn/46TKp5MbEiKLFxP5Uk4+NMaS1cmnIsdyUeUt8sun7nn +yMSgUxzRTzlSa+ZZnwUTsjERDllUPgtznS7I7GMiWOryDlUq31zjFt29u5lw +EBaujaZ8wDa78aMWE7xshW2BVD/4slZ/aFFjQvPwjIww1T8fPaKvLVJgot/6 +ZOFTygKPPJe4CDOx70BZ1Ceq33K/bbbQ6u/DpZCi37JU/7J3vVd2oPchsmDB +pwLKMhVSI6FNfVA1rvNzC6LyxxgNGS3uQ/iAtHYT1f8aYmmV3+L6YOhQq9lH +zQurGKWXzOd9cL0UevHbU2rvqYa6LH3ahwp+es3jMGqe6Lkv9rndh0llq5XG +1Px5dmGd2Q7bPkgvexI4Rc2v+YWJRYXSfVjzeSje/g2VF+fbI4oifdi8zW7z +bWpPz0gcU7gp2IeIiBqJ93FUXk/TvHXHesGzL6V27j21p/mOaybX9ELh4gKx +0URqviauPbGwtBce8v+IHZ+o8z3Cf//8j15kPigng5Kpvf/2c6dSSi+MtJaz +dqaSSNgtGBYZ2IsU62tDDGrex/W3EKN+vRj3mDxgk0nl5Wnq4GHfXjiwgxya +qP0Q2m1jvMipF1erLb4zckl4302bumXSi01ZQ9P6BSRMC+zsL/D1orp+Lkyq +msqj0+ag4qkeBKiUmffXkNghsShHhduDKxK1WsV11Hw+/U2yo7MHw4zXbiGN +1DzmEy45ktcDdgIP3DpJ9O/KWavn1YPtg9822nNI9LKDrZ+59eDBvy9+MSNU +3kIdH0yc64G+q7tbO7WP6+hi9NSjPXD5YaZzdYo67zvnw1dp9+BEXqPzOB8H +j/OlZkSGGehNsk/Rl+FAPkN7a2oPA0RpE5RlOfiScMTTvJWBrF+t2iLUc1ZT +cMho2C8G/IOGfOeUqeeVU4sHl8YxkFaSWmy0ngNM87crH2dAcl/9K29TDsyH +leV+HmRAtXD1fdZ+Dnrpu044GjGQ1GYXan+Yg0Wltxo+bGTARs3G9KIVB1ZR +MxWawgyIKM8ljDpywNUexZaCbkQpLS6suMfBPTWJ2casbhgZEIoN1POUjNyG +7d4p3XA9KenTF8jBTj63zNzYbrgkNh5Xi6B+X3V/ioFnNy6+OWerEk9dr0v3 +azPNbojXuISLl3FwPL7m7qlIOvaxH13dLMuFuYKj4esgOq4TGo47FLgwi/4r +2H2PjvtTh4oOreRC75FCgKMHHUJ770mEr+NC0dUl+OJhOh65b7sfu4cL1mah +WJ+FdBysqLHLceOC/jnW9juNjt2d+x66X+WiRU1LYe5vF0w6eZdv9OXi9zKr +t3eYXfAuov1qvM9F6uy7hIc/u3BVsF045SUXXkUGGZE3u9DRYxQbW83FpZ31 +15qudmHohkaEeCMXTpnndWVduhAgbSsV1s7FyY9Pcl/YdMFL6CQ3t58Lg6C2 +/He6XbB7N6H/QXAEC456VaaNdCIuyMlvfMcIontSmJXnOrHLcpjNnz2CNR8D +cyxtO6HzqL6Onj+CPJcLQS0Wncj0uvyipmwE9All7T6DTqSf79jPbBuBulDk +zVnZThRt+h01TBvFtZNTa0686oA5pNIDDo0ipjet5mxgB5JzNNrCT4yCcL3o +6e7dgX2GEzPpZ0Yx/05nwQOLDtRtepG6zmsUz94Xnfg2vwNbNSX+Lns7itzh +0AeS7u1oj4++zp4aRafnvrUKtu3g9JeVGgmOgZ8mWKdh1g5fZQ/fLLEx7Jf0 +kt+9sh2Pucsy6GpjaNc5leHe1IbyCpbOXqsx8N7RYFQYtGFxv2RMYM4YjCQL +dz4UbwVpmB1lGD4Ovj97Xw3OteD2mF6a39txENGVPOaDLXBiix3tSB2HrnzL +j2UlLaCfHRNjVoxjjTp3d9L1FvjxeAfvF5qAhL6CSSWzGUTYZ+kYf+p/F+39 +h40NzWC22PQmR0zg8U+NBVEFzWiXnfrb+X4CgmZbSu1eNFPz58j42+IJTFke +2Mc90gxTS+2oJKFJdDr5HpJCE1Q8ld8IRE4idi0t1SupCWYhqkKaCZM4wbkv +1h7dBItP02qeOZOovfq05r1HE8KarAu9OydRdPujhY56E26Nvty0dc1fJEU2 +WlmHN6Kk89y2/tK/8CrQtn/t9AfsmjnVCNVp0ELelhid+APn+cfLzfSmEWAr +vn7A5A9yPa2/qR+ZxrO/w7ObV/3BeHli3dmb08hdlxhT3tmARVqGIS1N05h9 +rtg4YdmAR1XglYucgf9/wTtj9zRgqWoH+fTzDES2zL3ftbEBqdXLfbaVzECh +pvVKoGgDvrgZK8lOzcBgfpSEclk9jC+lma+2+wc/D+GDB/TrIW0s9Iu9aRaL +dl3PGFlbDy2LhRJhh2cRLjKwPHp5PXY++5DgcXEW7z/+GuieqsMR/9iutnez +KO70C/D6WoeVese6Ty2dg9D+6Z9x6nV4xWn8XS3AQwSvZG6flqzFectbtdWi +vIRZAKtIjVaL7OXeq3VUeAnBYfaho8M1aJmduFu2hZfwyRw8k/qrBpusvpz2 +OcVLOJqNPD53owYZ4bPiIqm8xDb32dbavmoYO5Nt90/SiPH6OUfe+mokzMhF +0DxoRMpWXs7a/GoIql6sTwugEav4+QUCYqrRgZK43EwaIRq5QFP/cDXk3zLM +fKT5iN5cyetJ2VUIeFhhYdnJR7xSXDKvOb4KEbmPBoOn+Ahrf+mQeeFVePBH +3F1Eip+oOrjsnYNrFex6FKoaTfmJHLr8bxmVKiwSN5jNyOInFMWObhWSrcSY +/7vTt94JEFc/3PHOIcpBt76XeOT7POLO/WMxUbHlcM03cA/pmEc8cVyTd8W7 +HMp/GzU1aPOJDyoNvOu1y3Hh2gX2NZP5RPOr1Q/j4suwcHLMP7ZpPrEjuioy +MKgU7YOCWy+ICBGmnu+yLjiVYujz/RBpHSHi2DHvFmOTUiiWri/UtRci3KRU +5Gm0UozKuCoy0oWINyHX3l+98gsH16YWCjosJAQDVnw9ZVOCIL7jN63qFxHi +/400bNctgWP3pdUmgosJeZOSyaVLStC1PcelcstiQkfw0va6ymKIbzY3/hyz +mLhw52eBye5i1MuxhHldhIkKb+caLfUixJ+18CuSESWajxuMCs8rwm+9yJUf +N4sSfTpLlgx0/6Tm8/4IroUowTOB4+9jf8Jrk3dYVqgoseGyRNcysZ+ouDUa +biUhRoQ7ZQ/zTRagnna877e6OCHolX6UU10AgbOGncpHxAlP/+Tv7YkFkL63 +x1LOV5w48frNo6xTBSjLVkvkqxInVvwJUHUtzodDRoyr7C0J4gnDL8jmdT5a +47dMjHySIHi4N8b2+uTjjdduleBWCYK+6HKByrp8nDu+/c2q7ZLE+13Wp5oj +fuD7EclkawEpQvqQZVGx2w/8a2jv7tCVIh6cPKj51fQHPIOlw81dpYgLnrun +n8wSMHaUvSLXJkWsS9aINHQk8Nfl8IbZwiWE28bJWHunPLi32HtmlMsQ5gcG +nLbL50FFR6YpSmIpof1fp6507XccKHMOHLReSky+KKkv3/odih3vVstylhK3 +haIX6wjlYuLlgWfta2WJMysDW8TzclBZ9Xj9hzuyhJH+7YRB9xzYBVlXmjXK +EkJX/zN825SNK5+fq9s9lCNCu3SvCydkwf9x14mX/CsIjxlNM5ZNFpytNWnS +/60gjkorLS0UzcKmDlGh6coVhOx+oa9enpmwdinNdHgnT8RlNg8wjL9BT0Pe +9mumAuFfW5GN6QwUhV/xnxlTIM4P5T949jkDcrrLHzO0FYk1Kokqh6QzIN8x +8bD5myLx9YmPTU5vOpYNiF1zqlMivlw6Yr+zJh1xlys0RphKxP8BiBQnCg== + + "]], + Line[CompressedData[" +1:eJwV13c8Vf8fB3AU6lzjXpuEhBClJVnvt4RUEqlktVNShIQo+ooiI0lDZkop +pTKKZEWo7J/scV3uICsjWb/TX+fxfDw+j8/nnM94fd5n1XE361M8XFxcutxc +XP+eWkO+00MG2bB726s79gKqmNv/6meLYTZohNw0PUJRRT+Hhz7eYdnwamt6 +yc9Pa5Bnl0f+21U5cJ5vaJu7yhoUU1YyVN2XC22B9yq/0lSwJZ7aXR6fC7qZ +CkPr65UxQWT+2glmLlhPfR81i1FGFa7mksSreWA/03bJVFoZt7aHmohnfgBZ +vhreXh0lnLPyGnj35wOcDG6wV16qhMWVR0P37fgIA8eObMyoW407c7dVhbd/ +hKibEh7m51ej3Z3BPTxEASxo2N4tf6+IcstafiUdKAD9pEjHsVBF7Lv6JdIg +pQA+PX1/neaoiK6uCXU+Op9gtO+XBpVQxKtmljYjpwvhEEfHzejCKtz+WW/y +9rtCsOhetnSn+Srk36Iap75QCGdFTVcLKq/CaEXullP3PsP92dbBT10KmDL/ +zr6jrAgCp5jRq+0UkH44/O1JagnYr/2G1m1ymHltvdfbTSUglNaa45guhz5P +G7UXDpbAt2NRjYaX5FBobMWn+wkl0Myzevq8qBzq3nxVUa1eCtdlJTiztisx +JvdHu5ZJGfQuSK1R5ZVFx46LiQFnyuDPJrWhgM4VqMojcaw6vAyc9x3yOpO7 +Aj9bOA2caCgDqcCp4yNnVyCHMTwad+QLpNhGBnr8lEFjUSrfvG85dA4V7Zut +kkahbdmV5gnlQFU36rTKkMY2J9vwuOJyyP2WKysWLo3uGclULf4KqOLxSmi0 +kMbHRhtWnIitgJYL6lXLWqRwws1aq+r1V7gn4vRf6bwkFt2bGhdv+ArjrBus +mT5JDCt4lHN88iss6ThUFlQtiQr8fbpzepXAP//QPuCBJO5J9DRZX1UJDjdX +2C5ulcS077F29/qqYBfPvuUKwRJoeC05XYuvGsxnzzRscpPAlg2vJr6pVkOA +rAL7up0ECtwvi+S5UA0flB/Z126QQK9j46Vuf6rhT1NK97I+cTSZsly7S/A7 +HDSr695pKY49z+19+td/h4q/va6ZBuLoZ+9cHmj9HTa3zT1FDXF8XXz1SN79 +7/CoxN17dLk4SoRn3lVS/AFq+c55J76K4YA8ZW5Buwb4HmOo6C4xDGyQMH90 +uAZCWv0ipfXEUOaGYtwW/xpYB3//7NAQw72cbVquJTXQHvl7YbmwGOZlnznZ +ursWinxkrkCzKH5ROjFwWKsOAhR6jCdcRDH2Y/HezSb1QPnz1LMsQwTfzL5v +mDlUD5bOr9RzEkWw2iD9YJFLPTjKTNl9iRHBxZIIp13R9aCsZZW57YoIulTb +XTjaXg/BvEtlvC1EENsnIm5fbIDTEzrdnCka2q9k0ayDG+D24+hfYUM09D7S +fk/yPulK9iZjOg1f9pUkpH5qgCsd3iazP2goMRSZ+YG/EZKaM74EPaPh0Jzq +D0ZCI2wZmhnOtKchP8haZWQ1guT0sbi31jRUDBL+n1tZI1w8bXC8ypyGh3in +Ov6yGmH83Ln/NuvQsFSwbIi6uQkk5Iq7xsVp+EDOUcCgugm65j+uojdR0Rjv +7L439T9gXEv/iUeoGHM5vlJ6WTOIlKFRpy0V6a+fmiRKN8MdASetEGsqBq7M +h3T9ZsgzrVCdN6Hip7/0TR+vN0NyYddhf00qaudslu0U+gmxVrjJcl4YVdVb +hpTWtMApHoeP3NbCePkY/ewLnRbICs5InTQTxooHQwOau1og8mXOyTkDYTzJ +z92rfb4F7uvU1xmpC2MKQ+1/O9+3QMrfsfH0JcIok3Sl0BVagSoVJVH8UQgF +xeQjsw+1gc2RdFv1jUKonh3HynJpg7c3j5vdVBNCUxsh48yANpDJf206rSCE +gbHz00+ftMGWyGX9/FQhnBDrOHZ/pA1uC6V/HBkWxDbxh1v8QtvBgzvne8Eb +QZzOoUZ7P2oH5wpdH5nngih28CbHI7MdFHb/kLqZLIh74y4nnWtshzN3Uj5H +3RHEEomDyx3lO0B4sP2AhZcgPpcU7YS8DvCJtwo4oy+I5XlhW/WrO2A89Ub5 +8y2CSD/EE6PT2QEeh6P1p9YJouyDMdMNSzoha+CJ5YdVghglVZelaNkJesfL +jZv5BdFbOiKYl9kJQd8s+U82C+COFfwa3yS64fm4nZWqvwBWBr37dkGtG85L +RXjPeAugBcvxnIh+NzjztyQ3XRTAgznZGYePdYPq5J7C584C6Gx5XI31shsq +P02qV+wXwPISp7vXFXrggKvZsq+aArjs0uYTTWo9QBeTuqSlJoC7VIlNKpt6 +4Dv3nfZUJQGsicxpqDLpAYva74dSVwhgs72ACO1cD6QtszhFEALImvwYnZTT +A99CbXk8WBRUfxF1dOxzD+if+SJ+kkFBV4dTWsaVPZC9zUbPqYeCY6XUuoG2 +HhjKsA51aaHg3yhn4XVcveB91/5dbyUFKerikZ929YKNgc46eEnBdU7u4a3d +vZCquWH++CUKErfrf4axeqE25JLpJQ8KMj9uVNIf64Wle09aRLhRMFl88lMi +Dx34t3B71pylIO2H7/AJZToYFE1sjXWi4ITef1bDLnSw1XN6q2JOwbqzjIQk +TzqEhS2j3jGlYOZ9E84+fzo4dNm85tpBwdO/+f97H0EHj0tWt0cMKdiScTvb +J4sOivJ7eChbKFggHSe5ZIoORo/uPt2oSMEHZtMnshfoUDfHSfslT0GvS7ZZ +p/j7QES1yzNzJQU16mXMK6X6QPfWvtN60hRMvJnkF6HXB93OFFYUlYLXp593 +Sgb1AZNvqFWci4I7/1fwREOAAdauppHn6ASG5zV2PRRnQMHy2x+iegiseTgo +zS/PgDRLyVcfugg84LQiuncDAz6Fr2+SaifwONPPP+4QA4avebrRmgj0n9l2 +gOsJAwz0zTd2VRBY1G4Vff4VAw5qV/XvLieQ5/PZb205DMi0KZ0rLCPw1vWH +RjmVDNCwMjB4U0xgHGVG02WYAaaTASfK8wnMWvmBr2lbP8R4fsCCNwT+Xqw1 +MjLuh02z/JdcXxOoTWf6v97TD9XMuberMgksfCb5++aRfhgNDdB6kEFg9frL +3QY3+kHps+er7KcEMoy0P6TX9QNHtEsx/TGBa5T2/hZr6weNn1xecfEEuvCd +Xne9rx+O3wvwv/WIwLHqe2kOU/2QNno02e8BgQv7J6NpsgPgmx7/5mYsgVKn +s89ecR4AZxVbhmUEgVOlh1btdB+AgX2MnJDbBDbKz7aI+Q5AyH7pG8XhBEa2 +Gu18HTYAL9SvCBmEEbjUolalN3MAYqL1XA+HEkh/4dGVmTsAFty81ekh5Pzx +ScT5FQ1A1cz88pkbBPoVO/CK1Q+AlIbK6rRgAkc3cfpMJwYgKX+Jk+x1cr2i +I+JF5wcgerTFPSiIwJe/tPb38DLheG/WbnYggafTL5f6SjKhayFrT8k1Ajtk +eFNe6TLhrNmf1TEBBOZffm7ra8yEzTMVcoKk7zftppruYUJnVlplmD+B1pEx +17odmTC0z3Vl5BUCv3IrOIkEMWHq0o7L2b4EpjmViXffYoLL/PW4HaSvF5z+ +8TKGdNsSi58+BOpfytQ3SWNCppyu11LS71i6K3y+MsH9hLN9gDeB0SZdDTvq +mHAg7CZjFenzqUFhtFYmNAdvGa68RKCqQ+VMBocJa5tVfORIJ9YeaOkUZMGF +0xPSTE9y/2nMRGVIsABLGHZJpA/femx2WZ4Fr9lZfHakxYz7cqkbWKBwwDK2 +2YPA8aSQC53bWMAfwnB/QLp2Tk0lYzsLTlu3ZzqQDst1v2dswwIhzQTDoYsE +nhEVs6A6suCksXlEHmkT97ylnadY0D8ttfEGaS71BU/vyyyYzxH0WkO6KyRl +rXEgC74TGwTm3Aks6NvRJ3yLBfqhXqMNpL0Twq1fPGLBvZZrd0NJh3ZWvjJ/ +woI36+9PnCL9YCUfP+clC4qLgoJMSWc4Gh8Ly2aB156ZrWr/+ksILFAvZEFk +eb64EOnvnYXi38pZcNQoRGrSjRx/5azbuRoW2E7LGXaRHnHUqab8ZMFt3d3B +VaS5Ei8pvepmwX6vJlYuaVrXu6t7WCyYlgs9+4y0otxoy9AoCxyKNy59QHqz +k+amiBkWlDFe5IaTNkl0idDkYUOcdOnVINIHu9KZPwg2bGTtt/MlfUau3+iC +KBtq6nTNPEn7Oik+FpJlg5PJAWM30mGJR6ZeK7EhPC14z3nS8V2P91lqsuH5 +5syj//xKri1jZAsbvsjlBvxr/9lJkjfakA3vzt5K+ddfbaLNES0zNmhOilb/ +G6+n687HOks2/PUymfz3PuNytaIXbdkg4UpddZv0kiMCF2jH2DC1xmX3v+8R +SzKvfHuW7L9gl8e/71XuDlG09mBD1uyru//mQ1v+i/+4HxuMfSIzK0mbHeH+ +GfMfG0p9Rwo7SNsmGW7YdJsN8bMNpeOkz3ZfCW+MZUNlumE+Qa6Hn/zHfs8E +Npxs0E1VIp2QtOlR9ms2fFAX1Xci/brbfcImjw0N6oKcANLF8q/3Thaxwcak +MTCJND1JdYl2PRtE2CuOsUj/7j7l2NzKBmp/3TNhcn8tVXiS501ng19L7g8d +0irJK13zfrMh0jwuL5r01h67ikNzbFCwbvYuIr1T4YHCn6UcyDrSJDxK+lyy +yP90JDgQl/7u60Fyv2cl8xvm63DAeKmUrC55Xkp6djywM+LAX9oh78ukGxSu +j/8154D2R3p8LunJ5LlnevYcUB1oNNL1IlA3ZUy4MIADanm7Kg+S53N37zoX +xxAO1K2n7Ekl7bDK9ct8JAc0kvQiRkhfSxnwMUzmACde1SiKPO9fUtp7i0o5 +4F5sjX2XybyIq1WX/c6BjP28mjvIvMgOK/P0+R853hUHiXTSaZ4veTewOPBb +ObPZg8ybYJMraqmCg9Dx90zTKjKfTNgyF4NtB8HNlODpuErun06h/J5jg3BQ +ZXmFPZl/2g08SwzODQI7uux0J2mVAk7sZMAg7NlSqz1A5iVfRP6H008GQcYm +qkPwPwIrtOy4zIcHYW70dMp7Mq8NlfeaP50ehOPSstb7bhKYK709hpt7CBYI +o9Jh0s941JXyRYegYXtHqxaZ96FNM2Zrtw1B2FtmThV5P+z0eRglGDwElL/G +T/fEEFhV1CLXIP0LrNS3/Q5PJPN5nS0jQvEXcBlVm1gmETic8POF+dpf4BDb +OyqaTKCIf/PmEv1fUDBXuzslhZxfnaZdWUd+gfnlrb+/pZHts2q9I5/+AvYP +De6jL8n2qRU1uzYMw3UKXfXKRwKVaKaxfLrD0LJBfZ8zed9qB5YfLt0+DH/M +Z17aFBBo7/SFsc1mGEw38sxvLCTnW6b0r+rlYSgebWPOk/e19t1CFf7CYbh2 +79j8t0qyfXD21bKdI/DsLGG+vZXApnTORj3rEfAhtAVd2gjc+02B+c5+BGrG +jSTvkvUDikRYpl4YAaX8o39YneT7JJ9SCIodgentDTVPyHpkqECi1LBnBOin +8upthsj70PcTT6feKAgGv0x4TNYvVm/lTG0bR4Gr+XZhmAYF7QKvdZX9HIW1 +knegT5OCJy17vNd3jILVmYWn+usp6PMrJZ2vfxQeS5mtHN9A1kdqystzpkaB ++WRlqvNWCg6lrP1OkxmDBd3Uc/7bKRgSo2P97egYNH7NsN15mIKfPK2dDIfH +4M9wyD3TWxRMelxa9WDJb0h2KZf9NEJBJ+vlAhe1JuBPd7Ji2lkBPGFf1K1j +PgkXdviIjvSR9fbY7rCrvlOgq/Z51tJdEBN+id3USZuGeE2e44NcQmhgYCFJ +z/8Dgb7za5ZFCOEHaYeA5ewZSN90PoShJox+5m1eCktmgQu0ZE8VC2N2d2zR +S8k5+B3SkZ22lopVPCq92cbzkGif7qF6jYrKviqxmfYLUJq72dG3hoqpUytz +oo4uwJ9g74NdtVRU8BJvvnhqAeQ8/ZyN66ko67ZUStttAVxHH9UJkv93Iqfo +8Z+vL8Dt+sXCJ61UXNyX+KT2xQK4E/6zjQwqtqpKvB+bXoDKkOr3JrNUPPhM +sKlxbgEY/m+iMueo2LSadzKHexHeak4FiS9QsU5uQtuPsghLAq++6OeiYYVY +Qz6P/CKYJNksCeWj4XuuyFJR00Vwpv5t+UGjodbVG32TuxbBliEmsVWUhq9n +/Ze2WC7C4/ODZ5LFaJgxdc708eFFcOB6YukpScPkIfNqpfOLsFp9lYLMShrK +uRgN8nksgsu1heXBcjSMZ+oIsL0XQXLYdPmwPA3j6Gv2ZgYuAuCYWakiDcWO +yrtF3VgETzMI1VCiYUynRPTFsEW4/KauPU6ZhlR7obf7oxYh6GG8CfcaGka0 +8DZsiV0Eukbcl3OqNPw/Y3IQPg== + "]]}, + "Charting`Private`Tag$9307#1"], {}}, {{}, {}}, {{}, {}}}, {}}, \ +{{{{}, {}, + Annotation[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + Thickness[Large], + RGBColor[0, + Rational[2, 3], + Rational[2, 3]]], + Line[CompressedData[" +1:eJxF0Gs01Hkcx/H/XP8zQ609Ll2ZnVy6KC11ZrZFUTrHKhuJROQsOrlEJimt +LsSsS7VHRSwpZcplU9q1UU3f704IXZXLUlmGRDrVKtvPGDP779E++JzX+Tx9 +S36I3xjJpijKm9lnu+0HJw0GGn+UW8S3rRVh021Fy3Tm5w8L64o8RHjNd+Fp +Sz2NDVXN7O1rRJi9N87JWUfj8D/lZ7RuIvz2DtmRRGi8Fa0dtnYRYXHQtM43 +72kszjPpTHISYViW9Gp3P43vW38yshKL8NVQZsRvd2hc/e7yuwQixGGZJnhT +Go3h513UNWVC5H1s9/NaS2PILhN1SYAQHdvN2uRCGvFiimSZSIi+XsIXmc18 +3F12LzXhugCP2Z8e+ZDDx4JVXRgYLUDV+e709V58nJmDph8sBKhzjVJ2Cfl4 +avkfX7g00rjZ40TT9Qc8rK5JlCxMplHZF5+UcZSHZ7PvB3Xa0WgyPGRXvoGH +ZL5JrW0PH7NNq7ZOmfIw9IzzQ/HPfPzUbi1xe8pF76gi92FXPh5mSYe68rn4 +xHDtF+8xHk7d0a0I8eeihSY59tg5HmZVmpiam3MxbFuzcZoPDx11qjeSbg6m +1MappvF5+GBA7D+3gIPyPHF+Ri0XM6RzbscEczAixs7tRDQXHcX3astncfDi +lznawllcHLVvdprZzcZvvlJPbG3loPpC6NXnxWwc3TlbWn2Yg0drKm4dD2bj +fuPqAyaOHNy96HhLnhUbJYZwpX6IjVF3IfiRhoXGntEBF0rYuFGrTPm3lIXh +r2x2JviwcXOBbYk8koVVAQ7SBpqNPve3fP/cmoUCsSLav56FgTbPjuwboFCt +HH16JZaFKa/G66MuUdh75sqIwpaFp9waD3pup7DYtXrs5l8UNnMdPFIWUrhR +Ebg0JpfCGT13LRufGaDOrerX3nUUZnQWP44NMkCYdGvRU4rCxRVl6bf79XAu +0X9JYpIBblwyDxgN1cP4PtVAap8eUlPqF6gHp2BphaNXnL8eIgs/8fSxU8Bt +U7mxHk7B15oSynxUB28irk86ukzBclayriNBB+0vL1c61OpAvP6WufztJKhs +Qp7MttHBgr8LV+zeOQnRD+scdPmTEOVZGWo1rgWtkb/2lNkk5L6wLi2Ta8Es +PVlZnKmFMc/Hg+1kAhz6itq20FpI0Fksi06dgPuViz0E2RPQ9ayppMdA4NG8 +0f03OBOQlFthNK4g0Fqn9JueSeBJS5GsO52A8WRI70gGgSXs4+GqNAJym5bs +xiMEBuXymxkHCYzpejwPHCLgu8k5xiKJwEWr/qC3jItnPGiVRRJo6LHu7WTU +FL/P2r+GwLqJzLN/Mq7s0NSGuhOI8P09oZSxcFpH/+pVBGSa6u2pjD4H61cY +OROwE0jr3RlV29JGipwI5B7LYTUwFswz+04lIdC3fPP8R4wfg/h7SsUE0lfC +ohrGDSfJuQxLAuuDs3xPMvK5L4j3LAKK8R3CQMbEl8ryXhMCKXuCrAcYH1sW +tKunEzjU2rW6idE+IJu6ZEzgdQdLUcGoaYoLjBcQ6D2buncXo6shLN2PTyDP +4bXtJsYCmd9VGZfAXDNb8tmP8Wufz2EzPdH57Wc3lMsEFPW//wEdmYwL + "]]}, + "Charting`Private`Tag$9349#1"]}}, {}}}, {Epilog -> { + Inset[ + Graphics[{ + Thickness[0.01414027149321267], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + 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}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBwAmIQvVEvbzFjj4XDTBCIlHSA8Q9072syWYzg90R0+zMK +SDlsMf9xKCULwQfL+2Dy09OA4JikQ91vq4JzHhYOZ0DARxJij6WFQx9IfYGY +Q4/XKxaTh+YOIOVpaqIOE4JLVKbXI/gmxkDw2QzOP1Ara5F+xcxBpHJSydkU +cYh9e8wcau7/uGX8WtLhRZb2t+lzzRzWCunwpdfJOvD5r5+S2mHmEPL28scZ +D+Uh6mvMHO5oyq75v1nBoWBN9+0MBTOHB67xjrMKFR1Ktor+Pv3PFCqvCHHP +elOHD4vWK5yNUHL4tCEgexa7qYMwyP4tSg5fdt7q+mtq5rDy28uKMw7KDjLz +4jRPK5g7mNnsDZp2UAXOb2Q52m84XQ3O99gP9MhzDYeU2DtuzCdMHSSmXuHM +eKQFkRcwgfP/g0C9AQYfrM5Ay8G+MmKF6V4Evx4U3jMM4fzlLzz0/i80dBAB +BfQXTTg/4JZ0TaIQgg8KZuPLEnA+OH4ExOHmtSqwq56ZIga3D8aHuQedD443 +Y1FoOjBwqALFj7coJLwPGML5Gm959xlIGsH5f7+VPphTiOCD4yPPGM6/DXS2 +0VZjuPkwPsx+cHhWIPjRCo4fk+cYwflgbZON4P6D8WH+h/Fvg+K/WQli/ldj +OH8DKP3kmMD5tqDwuGsCjX8lSHrRN3XYm1/zduZURWi8mzqUH97mOnOtAipf +F8G/D0p/grJwPiy/wPgQ90pA0resmcNBUP5kFnOYMYG/yszbDB4+Dk2Pjs84 +bQYNHxFIvikzh/NByS49xQLOR83/Eg7o5QEAAySu+A== + "], {{ + 22.020299999999995`, 11.2953}, {22.020299999999995`, + 10.2594}, {21.459400000000002`, 9.495310000000002}, {19.9094, + 9.495310000000002}, {18.575, 9.495310000000002}, {18.575, + 12.618799999999998`}, {18.575, 12.893799999999999`}, {18.575, + 13.035899999999998`}, {18.825, 13.0844}, {18.9328, + 13.095300000000002`}, {19.290599999999998`, + 13.095300000000002`}, {19.5281, 13.095300000000002`}, {20.4938, + 13.095300000000002`}, {22.020299999999995`, + 13.095300000000002`}, {22.020299999999995`, 11.2953}}}], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1EsoRFEYB/DBZCghxqNYeC5mFsY0nndeh4V3XrMgCyJTRLFgQYoNCyMU +E6FJSSgikaQkUkIor5pZDDZkKaYpxDz8v5s7t27Tr27fd/7nfGcSmzqqjQEi +kcjP9Ra7Xn/XO+EIbJhuZyxD5X6iGDyYIEk9n4xmivF5p7Kcd8eqydZyoCe/ +b1S2zezo2WitqcIvPIbsKXcdS660xvU1RsjI0pGSV/G7jOrFW+plZ+ly6gdj +PULHmm+CW57k7Mf9FDJWdiLRzt7K2ceudfjbrCdremqXM7W8F1+K0n4edWTP +ep615JOj/LVWi5bqw+hvHg/rzbLxHhAfjyl3dGRvHp0gn47ywyl3TwZRe7J3 +/Qq1j/E9jHr9n1znRY6a3y/5SuSVVEP+cnQ/zFX5GnlCKtYnjUGa/3lD1WTP +7zZHDipI7fav4+1ZT0Mu+T7iLe8yOpfqw+i/YN8PnTPwHjN0pUwpOLI3DyfI +x1F+GPMEY95QD/OIfjDWIzTmHXl67U6rqjSK8sIHQ0s1p5u8sV8w9hPGfqM+ +TPfp77xgnCeM80Y+GPnhHne/vSSaJ6HxPYx6mFf0wzzDmHehkQf3BXlxn+Ct +bOdhM6cn4z7CuK+w8P/nF1da9Sg= + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4gf7+OYYO7k4GGitFL7QouogMfUKZ4aUi4PP +CXbb2Ve1HC7mx7Of++iAwdcHqVfRcjC/djTXRMARztefsOCHYR2Cr/qked7Z +JkeHOYuUd/55rgnnp6YBARuCbwwClyXg/L6Ibn9GAXG4ea0K7KpnpojB7YPx +Ye5B55uADRR1SAfZI+boUHX/xy1jb1GIefMQ/A16eYsZzyD4iYcva6cyOsH5 +nzcEZM9qR/ArI1aYnt3sBDcfxofZrwsyvw3Bh5kH44Pd88/RYUewVcR/dXE4 +f62QDl/6PQk4P5xTrN04Xslhyje2+BktTnD+RpB7RZzhfLAzlJ0d9ubXvJ05 +VRHOV/+k8nKWprzDGRBwweTXfAJ67JYqXD06fyYI3FSG2/cfBPiV4e6B8WHu +RedLz4vTPG2gCeeDzf+lCQ8PWPrYXytrke6C4IPtZ3aG89d0385guI/gg8Od +28XBzGZv0LSHGg5uqqVMsxQQ6Rc9PQMAhB0kjw== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH9IU1EUx2dJYkQ/90Pa5n74Rkhl6UwqFI5W715CLERyliAG2/qB+Uf+ +kWBFWkoWJKZpU0ST0mChgRaKDEFnpU4QJUwkJfwjQyGlhvRr7b67dy/qgcvj +8959557zPedc08XCTPtmhUIRFlwZwbUpuMrbsocTHmLIWppYrk/Vgsx3jRGW +0Uk9vPiK4wI5GBbLCx4kXDDQ7+kY9q0IC64PBpjWluQnqDDMnspLdbUYoTPu +WmvYIgK7I2hDRuiZrvxrr0CQHamusO4wwVNiOQhmYvXugNUEc57tjdZvIn1/ +nzNye9sUq2bGyuLqIl9XDOWtCDot82VNPgGg9Mu7+secxwvzIsaOYca/cgu8 +/9IwOEk8T8xwsKp5NV7E8P1Zh9E3ZYKVzrNXXQjT89pNoKmdjLyUyfl6t+r3 +yDnO0n7nRqb5ct5D4k00M57Pb/mY2CEwrqm4d35CZ2Es6ZZsgW1nOmrsNs6y +3jJLfg5hSH8fkdLQLUCNf0tevYBheCDt1eVbAq3HTwR3wr2P4jUWsGnejiuG +EPtf+l7Luf+m/qhzRmR8mvh9LlJ92mPWss3MWNJTzfmlf+HGKITynxXhRFXZ +bscVI81nJ4IAsduh/jmJaP/EGiCK6F2JINdi0431RQNx6/iM4IdnuduZFE3r +vYJof+2Kpv6iMN2v00Oxrf2IzxrS36Fj9ayT+kzLWOqf8L2MJf9+DeQPTOy3 +mzCMEnOrINEatAbEuCn5wKQrifMnot+SSM8v0dD+GxFD86OjenhFFt9rouug +GMpnI2cVCXWBfjEUvx7+kH7t5Sw93nCW9V7PVE/Oht5mjz1Dx3iO6DeuYkzz +VzKW5q9HSfPs4iz1Rx/nHNJPntA8DipBQWxKpHEOqVj9pftCq2Ys6WpV031+ ++Xw1redhxPxLY1uK1sbTyDm8tfp4WApmLN9Xcj3W32f/ATNWIU4= + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y7vNyiFGNkDknI+0A47cosKueuSLr +MOUbW/yMOZj8dhDfRBrOTwOBY+IO/P7rp6QWwPiiDmdAwATBvyFdk2h01hOD +DzFPCs4XqZxUcpZFGs5/krjwmom+ikP78vBTRku8MPgMIPBABa4enf/r7esD +ls6aDvZNj47PWI3gL3/hofd/padDCy/Q4azqDsYgUOzpcOFq2Bv93SoOFteO +5pq88HBo+G1VcG4Fgg+zfxlIf6YnBh8WnjD+A9d4x1kXRR3UnzTPO3vL02Em +COwUcSiPWGF6VtsLld+N4MPiQ2HXgn2p68Qd0OMLAEcSv6c= + "]], + + FilledCurve[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQ/R8E7vs6PHCNd5xVKOkA48eoRsick5FxSE0Dgn2Y +fJh6GH8mCOwUc7iQH89+bqavg9uao8sZIsQc9tbKWqS3IPhvePcZzPTC5K8V +0uFLvycB53/Z93Fr+jRJOJ8/NuC+0XcFOH/lt5cVZxyU4HyRykklZ02UHfbc +6vqbyu7r8PPt6wOWyioOS1946P2/6OMAcmbaMxUHgU+O59N6fRw26OUtZrRR +dbi/j2+OsReCz7J4khXjWW9Ufq63Q7eN5660T8pw/t78mrczU5Xg/Duasmv+ +b1Z0WA6yr9PbIZxTrN04XhEivxbBnwEKp4sIvn3To+MzXntDwvEYgv9h0XqF +sxFKcL4xCAQrO0z5xhY/YwuCL+/4MfnMXAS//rdVwbkD3g6iPV6vWEJUIO7h +9HEws9kbNO2gisOTxIXXTNwRfFh4wPjg8HvuA4nPm8pwPsx/MD44nexXgLun +/PA215lrFRxcVEuZZjl4O7xpy+02ipaF8+V3LdiXuk4Sztf4pPJy1ktReHhD +0o8IJD60fOD8kq2iv0/3Ifg5nD8XpF/2cQh5e/njjIViDrz+66ekfvBxqL7/ +45bxawmHuTY6V2Z983FQANsnBgkfVWh6+iYCcX86gv9lQ0D2rHYEH5b+IeaL +OqDnDwDN+HKZ + "], {{57.807800000000015`, 6.981249999999999}, { + 57.807800000000015`, 5.8125}, {56.93749999999999, + 5.418749999999999}, {56.42499999999999, 5.418749999999999}, { + 55.84059999999999, 5.418749999999999}, {55.35159999999999, + 5.84844}, {55.35159999999999, 6.42031}, {55.35159999999999, + 7.993750000000002}, {57.378099999999996`, 8.137499999999998}, { + 57.807800000000015`, 8.160939999999998}, {57.807800000000015`, + 6.981249999999999}}}], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4vjDl7VTP/o7xKhGyJyTkXaA8VsU2FXPXJF1 +OK5pNen0eUx+O4hvIg3np4HAMXEHh6ZHx2cshvFFHf6DQDqCz+O/fkoqAyYf +Yp4UnC9SOankLIs0nP8kceE1E30Vhx23uv6mXsfkM4DAAxW4enT+r7evD1g6 +azqUbBX9ffqeH5x/R7om0eiun0MLL1Ahq7pDKshdy/wcLlwNe6O/W8Uhh/Pn +gnRpP4eG31YF51Yg+DD7wfrnYvJh4QnjP3CNd5x1UdQhQnz7RQY+f4eZILBT +xGFN9+0Mhng0/n4EHxYfCrsW7EtdJ+6AHl8A6hi84A== + "]], + + FilledCurve[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ3RzoObchLNDhPwjcl3KA8dU/qbycpSntwPFzQfrm +oECH6TOBIFLa4fBl7VRJPwQfrM8dwQfrdwt0iFGNkDknI+0QXKIy/b8Lwvz8 +ePZzkoaBDmuFdPjS74k5RIpvv8jwL8AhDQSOiUL49xB8G50rs57tRfBfbF/P +/LwgwOFNW263kbQ4Kj9aHs6/7xrvOEtRwaF9efgpI6D9MD7YPSEIPsy/6Py9 ++TVvZ05F8MsPb3Od+VfJ4Ttb/Awf3UCHDXp5ixltVCHmXQiA8yNA7q9C8Ccs ++GH4zCzAgT824L7RcSU4X6RyUsnZJfJw/kxw+Ek6bHj4cuqmFih/p4iD8CfH +82k3EXywf0wC4XzU+JN0QI9PAKnO2rA= + "], {{68.6125, 8.29219}, { + 65.77499999999999, 8.29219}, {65.8703, 10.1641}, {66.9203, + 10.3781}, {67.2531, 10.3781}, {68.52969999999999, 10.3781}, { + 68.60000000000001, 8.696879999999998}, {68.6125, 8.29219}}}]}, + + FaceForm[ + RGBColor[0., 0.705078, 0.705078, 1.]]]}, { + ImageSize -> {106.08606724782067`, 24.508064757160646`}, + ImageSize -> {70.72404483188045, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.72}, {0., 16.34}}, + AspectRatio -> Automatic}], {2.2, 5.5}], + Inset[ + Graphics[{ + Thickness[0.014108352144469528`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {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}, {0, 1, 0}, {0, 1, 0}, { + 1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ9IGYC4v7gEpXp9hYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg7mDzwl229lXtRwcmh4dn+GN4H/Zeavr71czOP9Flva36XMR/Nrf +VgXnfpjC+TNBYKUp3HwYH2Y/2PzTZhj8gFvSNYlCmnD+etUnzfNyNeD8vfk1 +b2eKKsD5a4V0+NLrJOHmtyqwq56ZIuqgBtR2tssEzl9yfx/fnMvGcH56GhBM +M3KIUY2QOVcjDue3gOSvyMP5MPfA+CI9Xq9Yvmg6PE5ceM1kvhHc/dMn8FeZ +VRvD+Smxd9yYd2DyYeFRslX09+k8Y3h46WutFL5QYgTnb9TLW8wog+AXgOLn +gCGcD3bPMQM4374yYoVprQHcfBgfZj+3m2op0y4E/ysoPqcawvkQ/xii+c8Q +7n8YP5xTrN2YXwHOB4eniaRDN1CbCaOxg4kxCIg4HKiVtUhvMYHzz4CAjhmc +HyG+/SKDnLmD/K4F+1LXScH5BiDpYnk4f3J7a9TlPRpwPsy9daD0xoGZnmF8 +AG90K1g= + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1FkoRFEYB/BZlCQSBuHBNmVGdpI7Y+bwMNmKeOCFsmXJ9uKBlLLMg0Gy +hGhSFIry4EXKA8rYydpQo4nSlBekKZRZ+n8316378Kvb953/Od+5kdVtJXVS +kUgkdrx5jlfieONH5+3JesbSUp2PjMEDEZ7y44kgtq/gxo7qeS9atn3n3rVk ++VOf8cSmZSPlhiKxXzDZVe4yhFxsDuuu8leQA4fybR4fCqoXbqxUHCUpqR+M +9QgdMnnl1WBVshnnU8VYockza/ZayWJffbaTDrTktlXDfUM77zvHMlJkvF3r +CdWQvz87Hucusqg+jP6m3Zy1Rl8NeSPDvlNr4+3OoxHk01B+OObGWipqjnbv +e43qn/E9jHrrCa0L4mYV9auteNBJc9XkROVKwHn/fyOPtte6P61S/82brSL3 +fHHtpy8cWd1Zvpw+zNt1ruOZZG+dvEOSn0n1YfS/9X/LPtPz3tMvlR1Wc2R3 +Hk6Qj6P8MOYJxryhHuYR/WCsR2jMO/J0Wezm1AIZ5YU/Ns2DP8+8sV8w9hPG +fqM+jP44LxjnCeO8kQ9GfrjT2W8riuZJaHwPox7mFf0wzzDmXWjkwX1BXtwn ++Lkp7nOqhTfuI4z7Cgv/P78YudAe + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4sqIFaZno10cDLRWCl9oUXXYqJe3mNHExcHn +BLvt7KtaDtmcPxekczti8PVB6lW0HC7mx7Of00Twj2taTTo9HcHfXytrkT7H +0WHOIuWdf55rwvmpaUDAhuAbg8BlCTi/L6Lbn1FAHG5eqwK76pkpYnD7YHyY +e9D5JmADRR3+g4C+o0PV/R+3jL1FIeZtR/C9Qf56iuD/jsk9+k/KCc7v9nrF +YrIQwRf+5Hg+7awT3HwYH2Y/2Pz5CD7MPBgf7B5xJ4cdwVYR/9XF4fy1Qjp8 +6fck4PxwTrF243glB/0JC34YzkPwwe7VdYbzz4CAjbPD3vyatzOnKsL56p9U +Xs7SlHdIB4VzHCa/5tOGgOxbqnD16PyZIHBTGW4f2F38ynD3wPgw96LzpefF +aZ420ITzweb/0oSHByx9RIpvv8gQh+CD7ZdxhvNdVUuZZv1wRpVXcXEws9kb +NO2hhsODfXxzjK0Q6Rc9PQMAg+xACA== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH1I00EYx2eaIr3nXqBt7sWNGMRIt0LE6lnR73dJmZTUKkMstlFmGfqH +gRlmJWGQmKSukNmrgaaBFkVYUNPKzRLFXiiMMMgwaCJDEVq7u+0O9YHjx+d3 +d889z/d57nRHTu1xxEokkpjwyA6PReGhsQWO+u4iyP0zFGi0KSHKF7QJRt+w +Grac/9HXWIJg4lJRTdohDZ13IFg7aRh3v9VASbdstt+MYHR7vs3dooWsNwmb +bixG4HCGrVcLuaWGhpBHhP2J8mrLCh1YLWErEeGrSd0WsuigzN66wR8rQhO2 +y5zFNu99ybSesfRMXam/K4VyigidxrGqZr8BPivLC9LaORcmznhcexHja8H4 +/MY8BC4cz3U99Jky6vrzEfy91aH1f9JBTdbvOGsBoue16qDTfPJ2zAnOS3d3 +1DuKOZP1lQuZ5ss5Ccdr1TMeK2gZsXYYGNdXXzw4pDIyJudmGuHeL2QOneYc +1TvKFbMZxQMIwU6sc7cBzLWe6dTNCN692tp+rMJA67EcQWWc92qqwgiTnTmF +7lGR7S/F8w852xVPBiVBgTGJ84VA9WlNmct2PWOip5zzg+B4mQ90cAXnMyPA +ttqq1c7jWpqPSYQQtnMa0OJ8Dou0f0waeITPvSNCntGuGnieDBJs0yJM9QS6 +XRuTab2XRPprVTL1l4roepUakiZt7527Ivo7VayeDbifDigZk/6JW8OY+A8q +YDavyPsvA4EPW5uMfrtExukj3iJrDmeiX3wk3nIF7b+fQuT+qKgeowKLj9Tp +mxDJZyFPLOtZ3/RFiMSvhnrcr8OciR4fOEf1ns9UT86aZ54eR7aK8Xes36CM +Mc1fypjcv6dSIG4HOJP+GOE8hfvpo0D1fC2l/wMC3dcrY/Un74VSzpjce4uc +5rMyUt+gnNZzh8j8vzyrTnfdFOfG85hzc+a6Yfc+xDj6XkXrMf89+w+MBx4e + + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4h8xuUf/nfJyiFGNkDknI+0A47cosKueuSLr +kHD4snbqSkx+O4hvIg3np4HAMXGHO9I1iUa1ML6ow4yZQOCI4C9/4aH3/6Yn +Bh9inhScL1I5qeQsizSc/yRx4TUTfRWHkBKV6f83eGHwGUDggQpcPTr/19vX +ByydNR14/NdPSd2B4JdsFf19epunQwsvUIJV3eE/CNR7Oly4GvZGf7eKA+vi +SVaMXz0cGn5bFZxbgeDD7C8G6S/zxODDwhPGf+Aa7zjroqjDlw0B2bOeezqA +gmXmThEHF9VSplkWXqj8GQg+LD4Udi3Yl7pO3AE9vgCqaskO + "]], + FilledCurve[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQPWMmEPz0dXjgGu84q1DSAcaPUY2QOScj4/AfBK5j +8mHqYXyQtpk7xRxyOH8uSN/s6+C25uhyhggxh3Dx7RcZ5iH4rcvDTxmlYPLX +Cunwpd+TgPO/7Pu4NX2aJJzPHxtw3+i7Apy/8tvLijMOSnC+SOWkkrMmyg4h +JSrT/yv4Ovx8+/qApbKKg33To+MzXvs4pIHAMxWHNd23MxiW+zhs0MtbzGij +6lARscL0bDKCP99G58qsZ96o/DZvh24bz11pn5Th/L35NW9npirB+Xc0Zdf8 +36zo4ACyb7G3QzinWLtxvCJE/hiCb2IMBK8R/BvSNYlGrD4OqSD3HUPwPyxa +r3A2QgnOB2kzDlZ20J+w4IfhOW84f8etrr+p2xF88alXODNueTuI9ni9YglR +gbhH2cfBzGZv0LSDKg61v60KziUg+LDwgPHB4ccAjc+bynA+zH8wPjje9yvA +3VN+eJvrzLUKDvf38c0xjvJ2eNOW220ULQvny+9asC91nSScr/FJ5eWsl6Lw +8IakHxFIfDj7wPk8/uunpK5A8FkWT7JifOvjEPL28scZC8Uclr/w0PvP6etQ +ff/HLePXEg7m147mmgj4OiiA7RODhI89ND19E4G4vwHBBwWTyUIEH5b+IeaL +OqDnDwC7/m69 + "], {{58.0078, 6.981249999999999}, {58.0078, + 5.8125}, {57.13749999999999, 5.418749999999999}, { + 56.62499999999999, 5.418749999999999}, {56.04059999999998, + 5.418749999999999}, {55.5516, 5.84844}, {55.5516, 6.42031}, { + 55.5516, 7.993750000000002}, {57.5781, 8.137499999999998}, { + 58.0078, 8.160939999999998}, {58.0078, 6.981249999999999}}}], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y/vN3iFGNkDknI+0A47cosKueuSLr +MOUbW/yMO5j8dhDfRBrOTwOBY+IOvP7rp6RugPFFHc6AQAmCf0O6JtGIF5MP +MU8KzhepnFRylkUazn+SuPCaib6KQ+vy8FNGTzD5DCDwQAWuHp3/6+3rA5bO +mg72TY+Oz3jtB+cvf+Gh9/+ln0MLyOGs6g4mxkCw2c/hwtWwN/q7VRzMrx3N +NdHwc2j4bVVwbgWCD7MfrH8lJh8WnjD+A9d4x1kXRR1UnzTPOyvl7zATBHaK +OJRHrDA9m43GP43gw+JDYdeCfanrxB3Q4wsA9ba+Ng== + "]], + + FilledCurve[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ7S8nluWbHOjwHwTuSznA+OqfVF7O0pR2uHo016Qh +PtBh+kwgiJR2mLDgh+GzKAT/DAiEIPhg/cGBDjGqETLnZKQdFBw/Jp8JRJhv +o3Nl1jPbQIe1Qjp86ffEHNSfNM87yxXokAYCx0Qh/FcBcD7nzwXpm08h+Ftb +ai5srg1weNOW220kLY7Kj5aH8++7xjvOUlRwCC5Rmf4/IBDOB7snEcGH+Red +vze/5u3MqQh++eFtrjP/KjkcvqydKmkV6LBBL28xo42qgzzIvLsBcL4qyP1t +CH5s7tF/m5wDHPhjA+4bHVeC80UqJ5WcXSIP588Eh5+kQ+26bUn1E6H8nSIO +9/fxzTF+huCD/eMQCOejxp+kA3p8AgBMx9Yx + "], {{68.81249999999999, + 8.29219}, {65.97500000000001, 8.29219}, {66.07030000000002, + 10.1641}, {67.1203, 10.3781}, {67.45309999999999, 10.3781}, { + 68.7297, 10.3781}, {68.8, 8.696879999999998}, { + 68.81249999999999, 8.29219}}}]}, + FaceForm[ + RGBColor[0.705078, 0., 0.705078, 1.]]]}, { + ImageSize -> {106.32665006226651`, 24.508064757160646`}, + ImageSize -> {70.88443337484433, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.88}, {0., 16.34}}, + AspectRatio -> Automatic}], {2.5, 1.4}], + Inset[ + Graphics[{ + Thickness[0.01414027149321267], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + 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}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}, {{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, + 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBwAmIQvVEvbzFjj4XDTBCIlHSA8Q9072syWYzg90R0+zMK +SDlsMf9xKCULwQfL+2Dy09OA4JikQ91vq4JzHhYOZ0DARxJij6WFQx9IfYGY +Q4/XKxaTh+YOIOVpaqIOE4JLVKbXI/gmxkDw2QzOP1Ara5F+xcxBpHJSydkU +cYh9e8wcau7/uGX8WtLhRZb2t+lzzRzWCunwpdfJOvD5r5+S2mHmEPL28scZ +D+Uh6mvMHO5oyq75v1nBoWBN9+0MBTOHB67xjrMKFR1Ktor+Pv3PFCqvCHHP +elOHD4vWK5yNUHL4tCEgexa7qYMwyP4tSg5fdt7q+mtq5rDy28uKMw7KDjLz +4jRPK5g7mNnsDZp2UAXOb2Q52m84XQ3O99gP9MhzDYeU2DtuzCdMHSSmXuHM +eKQFkRcwgfP/g0C9AQYfrM5Ay8G+MmKF6V4Evx4U3jMM4fzlLzz0/i80dBAB +BfQXTTg/4JZ0TaIQgg8KZuPLEnA+OH4ExOHmtSqwq56ZIga3D8aHuQedD443 +Y1FoOjBwqALFj7coJLwPGML5Gm959xlIGsH5f7+VPphTiOCD4yPPGM6/DXS2 +0VZjuPkwPsx+cHhWIPjRCo4fk+cYwflgbZON4P6D8WH+h/Fvg+K/WQli/ldj +OH8DKP3kmMD5tqDwuGsCjX8lSHrRN3XYm1/zduZURWi8mzqUH97mOnOtAipf +F8G/D0p/grJwPiy/wPgQ90pA0resmcNBUP5kFnOYMYG/yszbDB4+Dk2Pjs84 +bQYNHxFIvikzh/NByS49xQLOR83/Eg7o5QEAAySu+A== + "], {{ + 22.020299999999995`, 11.2953}, {22.020299999999995`, + 10.2594}, {21.459400000000002`, 9.495310000000002}, {19.9094, + 9.495310000000002}, {18.575, 9.495310000000002}, {18.575, + 12.618799999999998`}, {18.575, 12.893799999999999`}, {18.575, + 13.035899999999998`}, {18.825, 13.0844}, {18.9328, + 13.095300000000002`}, {19.290599999999998`, + 13.095300000000002`}, {19.5281, 13.095300000000002`}, {20.4938, + 13.095300000000002`}, {22.020299999999995`, + 13.095300000000002`}, {22.020299999999995`, 11.2953}}}], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1EsoRFEYB/DBZCghxqNYeC5mFsY0nndeh4V3XrMgCyJTRLFgQYoNCyMU +E6FJSSgikaQkUkIor5pZDDZkKaYpxDz8v5s7t27Tr27fd/7nfGcSmzqqjQEi +kcjP9Ra7Xn/XO+EIbJhuZyxD5X6iGDyYIEk9n4xmivF5p7Kcd8eqydZyoCe/ +b1S2zezo2WitqcIvPIbsKXcdS660xvU1RsjI0pGSV/G7jOrFW+plZ+ly6gdj +PULHmm+CW57k7Mf9FDJWdiLRzt7K2ceudfjbrCdremqXM7W8F1+K0n4edWTP +ep615JOj/LVWi5bqw+hvHg/rzbLxHhAfjyl3dGRvHp0gn47ywyl3TwZRe7J3 +/Qq1j/E9jHr9n1znRY6a3y/5SuSVVEP+cnQ/zFX5GnlCKtYnjUGa/3lD1WTP +7zZHDipI7fav4+1ZT0Mu+T7iLe8yOpfqw+i/YN8PnTPwHjN0pUwpOLI3DyfI +x1F+GPMEY95QD/OIfjDWIzTmHXl67U6rqjSK8sIHQ0s1p5u8sV8w9hPGfqM+ +TPfp77xgnCeM80Y+GPnhHne/vSSaJ6HxPYx6mFf0wzzDmHehkQf3BXlxn+Ct +bOdhM6cn4z7CuK+w8P/nF1da9Sg= + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4gf7+OYYO7k4GGitFL7QouogMfUKZ4aUi4PP +CXbb2Ve1HC7mx7Of++iAwdcHqVfRcjC/djTXRMARztefsOCHYR2Cr/qked7Z +JkeHOYuUd/55rgnnp6YBARuCbwwClyXg/L6Ibn9GAXG4ea0K7KpnpojB7YPx +Ye5B55uADRR1SAfZI+boUHX/xy1jb1GIefMQ/A16eYsZzyD4iYcva6cyOsH5 +nzcEZM9qR/ArI1aYnt3sBDcfxofZrwsyvw3Bh5kH44Pd88/RYUewVcR/dXE4 +f62QDl/6PQk4P5xTrN04Xslhyje2+BktTnD+RpB7RZzhfLAzlJ0d9ubXvJ05 +VRHOV/+k8nKWprzDGRBwweTXfAJ67JYqXD06fyYI3FSG2/cfBPiV4e6B8WHu +RedLz4vTPG2gCeeDzf+lCQ8PWPrYXytrke6C4IPtZ3aG89d0385guI/gg8Od +28XBzGZv0LSHGg5uqqVMsxQQ6Rc9PQMAhB0kjw== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH9IU1EUx2dJYkQ/90Pa5n74Rkhl6UwqFI5W715CLERyliAG2/qB+Uf+ +kWBFWkoWJKZpU0ST0mChgRaKDEFnpU4QJUwkJfwjQyGlhvRr7b67dy/qgcvj +8959557zPedc08XCTPtmhUIRFlwZwbUpuMrbsocTHmLIWppYrk/Vgsx3jRGW +0Uk9vPiK4wI5GBbLCx4kXDDQ7+kY9q0IC64PBpjWluQnqDDMnspLdbUYoTPu +WmvYIgK7I2hDRuiZrvxrr0CQHamusO4wwVNiOQhmYvXugNUEc57tjdZvIn1/ +nzNye9sUq2bGyuLqIl9XDOWtCDot82VNPgGg9Mu7+secxwvzIsaOYca/cgu8 +/9IwOEk8T8xwsKp5NV7E8P1Zh9E3ZYKVzrNXXQjT89pNoKmdjLyUyfl6t+r3 +yDnO0n7nRqb5ct5D4k00M57Pb/mY2CEwrqm4d35CZ2Es6ZZsgW1nOmrsNs6y +3jJLfg5hSH8fkdLQLUCNf0tevYBheCDt1eVbAq3HTwR3wr2P4jUWsGnejiuG +EPtf+l7Luf+m/qhzRmR8mvh9LlJ92mPWss3MWNJTzfmlf+HGKITynxXhRFXZ +bscVI81nJ4IAsduh/jmJaP/EGiCK6F2JINdi0431RQNx6/iM4IdnuduZFE3r +vYJof+2Kpv6iMN2v00Oxrf2IzxrS36Fj9ayT+kzLWOqf8L2MJf9+DeQPTOy3 +mzCMEnOrINEatAbEuCn5wKQrifMnot+SSM8v0dD+GxFD86OjenhFFt9rouug +GMpnI2cVCXWBfjEUvx7+kH7t5Sw93nCW9V7PVE/Oht5mjz1Dx3iO6DeuYkzz +VzKW5q9HSfPs4iz1Rx/nHNJPntA8DipBQWxKpHEOqVj9pftCq2Ys6WpV031+ ++Xw1redhxPxLY1uK1sbTyDm8tfp4WApmLN9Xcj3W32f/ATNWIU4= + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y7vNyiFGNkDknI+0A47cosKueuSLr +MOUbW/yMOZj8dhDfRBrOTwOBY+IO/P7rp6QWwPiiDmdAwATBvyFdk2h01hOD +DzFPCs4XqZxUcpZFGs5/krjwmom+ikP78vBTRku8MPgMIPBABa4enf/r7esD +ls6aDvZNj47PWI3gL3/hofd/padDCy/Q4azqDsYgUOzpcOFq2Bv93SoOFteO +5pq88HBo+G1VcG4Fgg+zfxlIf6YnBh8WnjD+A9d4x1kXRR3UnzTPO3vL02Em +COwUcSiPWGF6VtsLld+N4MPiQ2HXgn2p68Qd0OMLAEcSv6c= + "]], + + FilledCurve[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQ/R8E7vs6PHCNd5xVKOkA48eoRsick5FxSE0Dgn2Y +fJh6GH8mCOwUc7iQH89+bqavg9uao8sZIsQc9tbKWqS3IPhvePcZzPTC5K8V +0uFLvycB53/Z93Fr+jRJOJ8/NuC+0XcFOH/lt5cVZxyU4HyRykklZ02UHfbc +6vqbyu7r8PPt6wOWyioOS1946P2/6OMAcmbaMxUHgU+O59N6fRw26OUtZrRR +dbi/j2+OsReCz7J4khXjWW9Ufq63Q7eN5660T8pw/t78mrczU5Xg/Duasmv+ +b1Z0WA6yr9PbIZxTrN04XhEivxbBnwEKp4sIvn3To+MzXntDwvEYgv9h0XqF +sxFKcL4xCAQrO0z5xhY/YwuCL+/4MfnMXAS//rdVwbkD3g6iPV6vWEJUIO7h +9HEws9kbNO2gisOTxIXXTNwRfFh4wPjg8HvuA4nPm8pwPsx/MD44nexXgLun +/PA215lrFRxcVEuZZjl4O7xpy+02ipaF8+V3LdiXuk4Sztf4pPJy1ktReHhD +0o8IJD60fOD8kq2iv0/3Ifg5nD8XpF/2cQh5e/njjIViDrz+66ekfvBxqL7/ +45bxawmHuTY6V2Z983FQANsnBgkfVWh6+iYCcX86gv9lQ0D2rHYEH5b+IeaL +OqDnDwDN+HKZ + "], {{57.807800000000015`, 6.981249999999999}, { + 57.807800000000015`, 5.8125}, {56.93749999999999, + 5.418749999999999}, {56.42499999999999, 5.418749999999999}, { + 55.84059999999999, 5.418749999999999}, {55.35159999999999, + 5.84844}, {55.35159999999999, 6.42031}, {55.35159999999999, + 7.993750000000002}, {57.378099999999996`, 8.137499999999998}, { + 57.807800000000015`, 8.160939999999998}, {57.807800000000015`, + 6.981249999999999}}}], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4vjDl7VTP/o7xKhGyJyTkXaA8VsU2FXPXJF1 +OK5pNen0eUx+O4hvIg3np4HAMXEHh6ZHx2cshvFFHf6DQDqCz+O/fkoqAyYf +Yp4UnC9SOankLIs0nP8kceE1E30Vhx23uv6mXsfkM4DAAxW4enT+r7evD1g6 +azqUbBX9ffqeH5x/R7om0eiun0MLL1Ahq7pDKshdy/wcLlwNe6O/W8Uhh/Pn +gnRpP4eG31YF51Yg+DD7wfrnYvJh4QnjP3CNd5x1UdQhQnz7RQY+f4eZILBT +xGFN9+0Mhng0/n4EHxYfCrsW7EtdJ+6AHl8A6hi84A== + "]], + + FilledCurve[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ3RzoObchLNDhPwjcl3KA8dU/qbycpSntwPFzQfrm +oECH6TOBIFLa4fBl7VRJPwQfrM8dwQfrdwt0iFGNkDknI+0QXKIy/b8Lwvz8 +ePZzkoaBDmuFdPjS74k5RIpvv8jwL8AhDQSOiUL49xB8G50rs57tRfBfbF/P +/LwgwOFNW263kbQ4Kj9aHs6/7xrvOEtRwaF9efgpI6D9MD7YPSEIPsy/6Py9 ++TVvZ05F8MsPb3Od+VfJ4Ttb/Awf3UCHDXp5ixltVCHmXQiA8yNA7q9C8Ccs ++GH4zCzAgT824L7RcSU4X6RyUsnZJfJw/kxw+Ek6bHj4cuqmFih/p4iD8CfH +82k3EXywf0wC4XzU+JN0QI9PAKnO2rA= + "], {{68.6125, 8.29219}, { + 65.77499999999999, 8.29219}, {65.8703, 10.1641}, {66.9203, + 10.3781}, {67.2531, 10.3781}, {68.52969999999999, 10.3781}, { + 68.60000000000001, 8.696879999999998}, {68.6125, 8.29219}}}]}, + + FaceForm[ + RGBColor[0., 0.705078, 0.705078, 1.]]]}, { + ImageSize -> {106.08606724782067`, 24.508064757160646`}, + ImageSize -> {70.72404483188045, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.72}, {0., 16.34}}, + AspectRatio -> Automatic}], {-1.5, -2.5}], + Inset[ + Graphics[{ + Thickness[0.014108352144469528`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGAQA2IQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDqcPgMEOUpwPoh7RkYRzn/Tlttt9FvewUBrpfCFFhWHGNUI +mXMxcg53NGXX/G9WhvNbeP3XT1HVdogC8feIO0hMvcKZ8UgLzpeZF6d52kDL +Yc5MIPgpBeeDzY+WdkhPAwI2BP/81bA3+rc14HwTYxAQddgRbBXxP10Gzgf7 +U14O4m4fCQf3NUeXM1jIO2h8Unk5q1PModPGc1faIgUHkLUzd4pAaE0lON9j +f62sxXMVOB8WXmB+pKQDengCAMmunC4= + "], CompressedData[" +1:eJxTTMoPSmViYGAQB2IQDQYNqg5nQKBH3gHGnz4TCCJlHCSmXuHMcILxpRxO +7NrRy7ZBxSH47eWPMxZKOOgqyn/JMVNx2BFsFfFfXdyh28ZzV5qTMsS8NaIO +K769rDgjoATn88cG3Dc6rgDnH+je12TyWN7Bbc3R5QwR4g4mxkAgLA83v1WB +XfVMiRxE3WJJOB+s7rIkmrwUnO88oVkozUoJzv+waL3C2RUIvnDlpJKzW5Qc +3rTldhv9lnNITwMCMWWH/yDArwDxxyeoP2QUHX6+fX3AcrGKgzvInR5KcH44 +p1i78X8EHxZ+M8HhheDDwhcAPU+bFw== + "]}], + + FilledCurve[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{ + 15.329699999999997`, 7.5531299999999995`}, {15.329699999999997`, + 8.196879999999998}, {12.2313, 8.196879999999998}, {12.2313, + 7.5531299999999995`}, {15.329699999999997`, + 7.5531299999999995`}}}], + + FilledCurve[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}, {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}, {0, 1, 0}, {0, 1, 0}, { + 1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, + 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJ9IGYC4v7gEpXp9hYOMvPiNE8baDnA+BJTr3BmPNJy +KFzTfTvjg7mDzwl229lXtRwcmh4dn+GN4H/Zeavr71czOP9Flva36XMR/Nrf +VgXnfpjC+TNBYKUp3HwYH2Y/2PzTZhj8gFvSNYlCmnD+etUnzfNyNeD8vfk1 +b2eKKsD5a4V0+NLrJOHmtyqwq56ZIuqgBtR2tssEzl9yfx/fnMvGcH56GhBM +M3KIUY2QOVcjDue3gOSvyMP5MPfA+CI9Xq9Yvmg6PE5ceM1kvhHc/dMn8FeZ +VRvD+Smxd9yYd2DyYeFRslX09+k8Y3h46WutFL5QYgTnb9TLW8wog+AXgOLn +gCGcD3bPMQM4374yYoVprQHcfBgfZj+3m2op0y4E/ysoPqcawvkQ/xii+c8Q +7n8YP5xTrN2YXwHOB4eniaRDN1CbCaOxg4kxCIg4HKiVtUhvMYHzz4CAjhmc +HyG+/SKDnLmD/K4F+1LXScH5BiDpYnk4f3J7a9TlPRpwPsy9daD0xoGZnmF8 +AG90K1g= + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExHGpIVU9LjUD5Yah7l8A +JrECaw== + "], CompressedData[" +1:eJxl1FkoRFEYB/BZlCQSBuHBNmVGdpI7Y+bwMNmKeOCFsmXJ9uKBlLLMg0Gy +hGhSFIry4EXKA8rYydpQo4nSlBekKZRZ+n8316378Kvb953/Od+5kdVtJXVS +kUgkdrx5jlfieONH5+3JesbSUp2PjMEDEZ7y44kgtq/gxo7qeS9atn3n3rVk ++VOf8cSmZSPlhiKxXzDZVe4yhFxsDuuu8leQA4fybR4fCqoXbqxUHCUpqR+M +9QgdMnnl1WBVshnnU8VYockza/ZayWJffbaTDrTktlXDfUM77zvHMlJkvF3r +CdWQvz87Hucusqg+jP6m3Zy1Rl8NeSPDvlNr4+3OoxHk01B+OObGWipqjnbv +e43qn/E9jHrrCa0L4mYV9auteNBJc9XkROVKwHn/fyOPtte6P61S/82brSL3 +fHHtpy8cWd1Zvpw+zNt1ruOZZG+dvEOSn0n1YfS/9X/LPtPz3tMvlR1Wc2R3 +Hk6Qj6P8MOYJxryhHuYR/WCsR2jMO/J0Wezm1AIZ5YU/Ns2DP8+8sV8w9hPG +fqM+jP44LxjnCeO8kQ9GfrjT2W8riuZJaHwPox7mFf0wzzDmXWjkwX1BXtwn ++Lkp7nOqhTfuI4z7Cgv/P78YudAe + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRTHpYZU9ZSooZaZuMQB +pOcCJw== + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4sqIFaZno10cDLRWCl9oUXXYqJe3mNHExcHn +BLvt7KtaDtmcPxekczti8PVB6lW0HC7mx7Of00Twj2taTTo9HcHfXytrkT7H +0WHOIuWdf55rwvmpaUDAhuAbg8BlCTi/L6Lbn1FAHG5eqwK76pkpYnD7YHyY +e9D5JmADRR3+g4C+o0PV/R+3jL1FIeZtR/C9Qf56iuD/jsk9+k/KCc7v9nrF +YrIQwRf+5Hg+7awT3HwYH2Y/2Pz5CD7MPBgf7B5xJ4cdwVYR/9XF4fy1Qjp8 +6fck4PxwTrF243glB/0JC34YzkPwwe7VdYbzz4CAjbPD3vyatzOnKsL56p9U +Xs7SlHdIB4VzHCa/5tOGgOxbqnD16PyZIHBTGW4f2F38ynD3wPgw96LzpefF +aZ420ITzweb/0oSHByx9RIpvv8gQh+CD7ZdxhvNdVUuZZv1wRpVXcXEws9kb +NO2hhsODfXxzjK0Q6Rc9PQMAg+xACA== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllH1I00EYx2eaIr3nXqBt7sWNGMRIt0LE6lnR73dJmZTUKkMstlFmGfqH +gRlmJWGQmKSukNmrgaaBFkVYUNPKzRLFXiiMMMgwaCJDEVq7u+0O9YHjx+d3 +d889z/d57nRHTu1xxEokkpjwyA6PReGhsQWO+u4iyP0zFGi0KSHKF7QJRt+w +Grac/9HXWIJg4lJRTdohDZ13IFg7aRh3v9VASbdstt+MYHR7vs3dooWsNwmb +bixG4HCGrVcLuaWGhpBHhP2J8mrLCh1YLWErEeGrSd0WsuigzN66wR8rQhO2 +y5zFNu99ybSesfRMXam/K4VyigidxrGqZr8BPivLC9LaORcmznhcexHja8H4 +/MY8BC4cz3U99Jky6vrzEfy91aH1f9JBTdbvOGsBoue16qDTfPJ2zAnOS3d3 +1DuKOZP1lQuZ5ss5Ccdr1TMeK2gZsXYYGNdXXzw4pDIyJudmGuHeL2QOneYc +1TvKFbMZxQMIwU6sc7cBzLWe6dTNCN692tp+rMJA67EcQWWc92qqwgiTnTmF +7lGR7S/F8w852xVPBiVBgTGJ84VA9WlNmct2PWOip5zzg+B4mQ90cAXnMyPA +ttqq1c7jWpqPSYQQtnMa0OJ8Dou0f0waeITPvSNCntGuGnieDBJs0yJM9QS6 +XRuTab2XRPprVTL1l4roepUakiZt7527Ivo7VayeDbifDigZk/6JW8OY+A8q +YDavyPsvA4EPW5uMfrtExukj3iJrDmeiX3wk3nIF7b+fQuT+qKgeowKLj9Tp +mxDJZyFPLOtZ3/RFiMSvhnrcr8OciR4fOEf1ns9UT86aZ54eR7aK8Xes36CM +Mc1fypjcv6dSIG4HOJP+GOE8hfvpo0D1fC2l/wMC3dcrY/Un74VSzpjce4uc +5rMyUt+gnNZzh8j8vzyrTnfdFOfG85hzc+a6Yfc+xDj6XkXrMf89+w+MBx4e + + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYC4h8xuUf/nfJyiFGNkDknI+0A47cosKueuSLr +kHD4snbqSkx+O4hvIg3np4HAMXGHO9I1iUa1ML6ow4yZQOCI4C9/4aH3/6Yn +Bh9inhScL1I5qeQsizSc/yRx4TUTfRWHkBKV6f83eGHwGUDggQpcPTr/19vX +ByydNR14/NdPSd2B4JdsFf19epunQwsvUIJV3eE/CNR7Oly4GvZGf7eKA+vi +SVaMXz0cGn5bFZxbgeDD7C8G6S/zxODDwhPGf+Aa7zjroqjDlw0B2bOeezqA +gmXmThEHF9VSplkWXqj8GQg+LD4Udi3Yl7pO3AE9vgCqaskO + "]], + + FilledCurve[{{{0, 2, 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}, {1, 3, 3}, {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, 4, 3}, {1, 3, + 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" +1:eJxTTMoPSmViYGAwBmIQPWMmEPz0dXjgGu84q1DSAcaPUY2QOScj4/AfBK5j +8mHqYXyQtpk7xRxyOH8uSN/s6+C25uhyhggxh3Dx7RcZ5iH4rcvDTxmlYPLX +Cunwpd+TgPO/7Pu4NX2aJJzPHxtw3+i7Apy/8tvLijMOSnC+SOWkkrMmyg4h +JSrT/yv4Ovx8+/qApbKKg33To+MzXvs4pIHAMxWHNd23MxiW+zhs0MtbzGij +6lARscL0bDKCP99G58qsZ96o/DZvh24bz11pn5Th/L35NW9npirB+Xc0Zdf8 +36zo4ACyb7G3QzinWLtxvCJE/hiCb2IMBK8R/BvSNYlGrD4OqSD3HUPwPyxa +r3A2QgnOB2kzDlZ20J+w4IfhOW84f8etrr+p2xF88alXODNueTuI9ni9YglR +gbhH2cfBzGZv0LSDKg61v60KziUg+LDwgPHB4ccAjc+bynA+zH8wPjje9yvA +3VN+eJvrzLUKDvf38c0xjvJ2eNOW220ULQvny+9asC91nSScr/FJ5eWsl6Lw +8IakHxFIfDj7wPk8/uunpK5A8FkWT7JifOvjEPL28scZC8Uclr/w0PvP6etQ +ff/HLePXEg7m147mmgj4OiiA7RODhI89ND19E4G4vwHBBwWTyUIEH5b+IeaL +OqDnDwC7/m69 + "], {{58.0078, 6.981249999999999}, {58.0078, + 5.8125}, {57.13749999999999, 5.418749999999999}, { + 56.62499999999999, 5.418749999999999}, {56.04059999999998, + 5.418749999999999}, {55.5516, 5.84844}, {55.5516, 6.42031}, { + 55.5516, 7.993750000000002}, {57.5781, 8.137499999999998}, { + 58.0078, 8.160939999999998}, {58.0078, 6.981249999999999}}}], + + FilledCurve[{{{0, 2, 0}, {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}, {0, + 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, { + 1, 3, 3}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGIZIGYCYp0JC34Y/vN3iFGNkDknI+0A47cosKueuSLr +MOUbW/yMO5j8dhDfRBrOTwOBY+IOvP7rp6RugPFFHc6AQAmCf0O6JtGIF5MP +MU8KzhepnFRylkUazn+SuPCaib6KQ+vy8FNGTzD5DCDwQAWuHp3/6+3rA5bO +mg72TY+Oz3jtB+cvf+Gh9/+ln0MLyOGs6g4mxkCw2c/hwtWwN/q7VRzMrx3N +NdHwc2j4bVVwbgWCD7MfrH8lJh8WnjD+A9d4x1kXRR1UnzTPOyvl7zATBHaK +OJRHrDA9m43GP43gw+JDYdeCfanrxB3Q4wsA9ba+Ng== + "]], + FilledCurve[{{{1, 4, 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}}, {{0, 2, 0}, {1, 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGCQA2IQ7S8nluWbHOjwHwTuSznA+OqfVF7O0pR2uHo016Qh +PtBh+kwgiJR2mLDgh+GzKAT/DAiEIPhg/cGBDjGqETLnZKQdFBw/Jp8JRJhv +o3Nl1jPbQIe1Qjp86ffEHNSfNM87yxXokAYCx0Qh/FcBcD7nzwXpm08h+Ftb +ai5srg1weNOW220kLY7Kj5aH8++7xjvOUlRwCC5Rmf4/IBDOB7snEcGH+Red +vze/5u3MqQh++eFtrjP/KjkcvqydKmkV6LBBL28xo42qgzzIvLsBcL4qyP1t +CH5s7tF/m5wDHPhjA+4bHVeC80UqJ5WcXSIP588Eh5+kQ+26bUn1E6H8nSIO +9/fxzTF+huCD/eMQCOejxp+kA3p8AgBMx9Yx + "], {{68.81249999999999, + 8.29219}, {65.97500000000001, 8.29219}, {66.07030000000002, + 10.1641}, {67.1203, 10.3781}, {67.45309999999999, 10.3781}, { + 68.7297, 10.3781}, {68.8, 8.696879999999998}, { + 68.81249999999999, 8.29219}}}]}, + FaceForm[ + RGBColor[0.705078, 0., 0.705078, 1.]]]}, { + ImageSize -> {106.32665006226651`, 24.508064757160646`}, + ImageSize -> {70.88443337484433, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {71., 17.}, PlotRange -> {{0., 70.88}, {0., 16.34}}, + AspectRatio -> Automatic}], {-2.5, 0.5}]}, AxesLabel -> { + Graphics[{ + Thickness[0.09090909090909091], + Style[{ + + FilledCurve[{{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, + 0}, {1, 3, 3}}, {{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}, {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}, {0, 1, 0}, {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}}}, {{{ + 8.653129999999999, 11.8563}, {8.653129999999999, 11.2484}, { + 8.34375, 9.495310000000002}, {5.94688, 9.495310000000002}, { + 4.6000000000000005`, 9.495310000000002}, {5.387499999999999, + 12.6313}, {5.4937499999999995`, 13.071899999999998`}, {5.54219, + 13.095300000000002`}, {6.0062500000000005`, + 13.095300000000002`}, {6.8656299999999995`, + 13.095300000000002`}, {7.890629999999999, + 13.095300000000002`}, {8.653129999999999, + 12.785899999999998`}, {8.653129999999999, + 11.8563}}, CompressedData[" +1:eJx11H1IU1EUAPCZ07Bs6HRf7s297bXkiZC09UFInVFRlihpoGn0qTORkkjC +Sisyk1pZhIlKVEQQwfoAM8JUKsgIZ4JGf1SgaX8kTkoJWVot773vnQcNL4zx +u++9e+85995j21+RW7JApVLlz/3If+Lxa5V9dwX42T3ZXtpkAtnVQ8GPznET +dFZUT7TUCXCpwJsTEZcEw5v2uFv3Kb4/PVblT1f8WbT4QoIApZ651mOCzb7X +91RGARLIuMXyeHZ46e0+64rUw0kyj9cG5HXPMh14MzI7PFM8esPVWq2nUPEQ +mX/SCn7SfIpdzrk2aEDTeYNGtl43D9aO290l2RbWv4WHKjqvha3TIz+3okOk +nVa8Y2JwsvmL4gfaNE3pQxvschRw735bWBzldugj60rjWLxP7Kx/sQ1aSNsp +MBcJsCqjK7fJ7UCrYy5aD2SnoNtWB18Vp4rw/c4jvq/KBsbr72MOjqSyeLZz +aMfU0rHWtxr0C5LX0Vj0OUNNVFl0uOl8hxVzN3eLvempLI9tilWkndGgi0i8 +nDbMNF8hEd1YX1c42Dm/x4+262a9ItvHQDyY6XgiPN36eM2NX9EQOH/Iu+K5 +EdZVumt6uWhooOfLAN9qRsv7A1FQxy90+Bv1ECD2/V0vm46XNYNm4wXDLJ8f +2TRupw7Uy2cWDcTOooezx/b+uaU452vmwMqEEDqF5P9CBJwg+7ZNJ+1zJLqZ +dmjQz/LWFoRS4tD0ezEe5PHouVFr0ey8KWb5CjfNl1mPluOl5/SUYjr/m3g0 +Pb+dS8JM68G0YnrujhjmtXz/LpN9+iGN5zJK8WnhE6kLtXbpHhnQ9HkZh6b1 +Z6MFukid0NnQwoeRPFUWj5bvI61TvRzrVyezdR/jpDg5uELXY5bqW5L0vhnr +lWy2LyY0TXuPjtWFhmQp34ms3g3z6PwYfb2z346W6ye9x+NG+L++/gPc/EC9 + + "]}]}, + Thickness[0.09090909090909091]]}, { + ImageSize -> {16.501569115815688`, 24.508064757160646`}, + ImageSize -> {11.001046077210459`, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {11., 17.}, PlotRange -> {{0., 11.}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.043440486533449174`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGIdIIaxWZDYzATYDFA+AxnqSdVLTzfQ022U2EWJ34kR +BwAG2ALT + "], CompressedData[" +1:eJx1lXtI01EUx2eWEtXU2TbbnP72+/VTtt5N7YHRqUgzpMykpKwscqvsQWTv +SaU9iEXZ01lGpZEYZkaYWSZF9NQeZPWHBUoaGayoLDF72O6927mUdOFy+fD7 +3XPPOd9zzzUuWZOc4atQKHzcc5V79nLPKXm5Kut5EQIWJDWN3iiAl2+ssX8o +OCpA89RFk44fFOG1yVDWfVmAunr3WMk5ePOhrEcpnD8VXRQeTRNh4+0rUwsu +CGCzukeMCNLLN7MVhR77Zm7fywVk7BXAQka7Eeb21eyxBAiwtamz0eLw+LF2 +EER+Gfz+eN9w2CX4y/VHNHB19vjUbpsWmf0XiEzcrd8XgDwxa1J2XRpnmdh7 +oISUDw2fnWc0kCanhj6uGQDCtdO1GeUa5v+5AUAW613O9NxILTLdZ9fCt9rP +lbaX3v+1sFOb3We5n5KdFxUC4cTuDBVcUA1V2spFWEb+89Mil5G1VodcRc7x +1zN94jl3k3HAiLw3NuGaNZkzzXeokeXjko7ptFQAJ020jn1PFJg/+3VMPwvn +JrLPyNlA1o/hYCd61OmYDg/CIYroFaxHpnncwZnt16OeLD49+vOV5GtDGNPJ +JSM78wK2xPSLgAySn7gwSE9JjjxtimB5/mlAZvY533TU5kTlGuBXx/rmwqAI +Fv8sA1QMX13sUyOz/WmhrP7eSszP5XpQkJEuwRYS3xAt8i1ir1iFHFd2p0Th +VMPhPbvmNcSaPPppIKlRb1+sMkM5iS9MAyPMpcFPB5tZPQeHIA8kcbeGIZd2 +vN9Uny4iU32+i/DkxRzXiPkmZNe6SvUPRyTk/8Pe7/YvFUmZjRHMXrOI8dP7 +80qEq5Dz5l6nzPL+XITCIqn6573/847edw6Mypc991GEkcS/nTLEk/hDJGQH +qbvJnOl58yVoWzGkI/+kDIGkbm0S6kn5nQTbif0xZmSqX4KZ1WG7xPJ56P+c +eN9/wokXZlY3NZxTSZ3N5Ezr87ISmdZHS3/ktuyWzCeufj2Y5sPG+S99Cvoj +V06vGFs4TolM6y1I1YOpPl0mZBp/Fecqoo/TxPLfW8Xu9zYTW5uCsN5CL2lO +9Wr2A9fuVY7R10PgbGNJyyhfP9if6pjpE6iFpNaEZ9ENff7uf4m/J3rZReIp +60LOJf3pbmcPpmFWq5FpHi1quKi/Muyh6zuyvS2n61j1L2TatxZ6+oKb6T2L +FpBp34kV2H0CNeufVoHdM18Nvjfe/kPrzSlif/K+T+wczt736w/tqcMd + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGINIAaxQYCJAQEYkWhmJDWExClhk2omPd0w1P0LAAFx +Ajs= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGJLIGYCYl1F+S85YfoO/8GA2wHGnzMTCCT5HKa0t0Zd +/qMH5/94+/qA5WFdOP/81bA3+rt1Hc6AAYJvDAKTBeD8B67xjrMmKsD57muO +LmfQUISbJ1w5qeRsiCLcPhgf5h50fvX9H7eMbytC3a3jEM4p1m58XtEhPiRI +fcFKLbg8jA/TD7aPWRvVPhsdOF9fa6XwBRcduPtgfJj7YXwTkP8uSzpsMf9x +KEVLHYMPUw/jw8wDqzNWh9v3qnir6O9sDTi/mdd//ZSjmHyYf54kLrxmkq8G +9+9McDyowOVhfJh+sH3FKqj2rVaF80V7vF6xbFGFuw/Gh7kfxofFJ4wPi2+Y +ebD0ALMPxoe5B50PS28w//RGdPszGvDA/QuTh/Fh+mHhhWIfMDxhfFh4w9wH +48PcD+OngcAxCXh8ovNh6mF8mHmw9IKSH4DpCcaHpTd0Psw/sPQK8y96/gMA +GLqMlw== + "]], + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIAaxQYCJAQEYCbAZofqYiRQn1RxaqKGWmbjEAZ/3 +AiE= + "], CompressedData[" +1:eJxTTMoPSmVmYGBgBGIdIGYC4jQQUDN1SAUzZBxmTOCvMntt4hDOKdZufF7R +YSYIRBpg8D8sWq9w1kPRIR2krQ3BP9y2PPyUkiGcf13ok+N5NUMH5WuPghlk +EPw9+TVvZ7YqwPnGIDBZAM4/AwZ8cPPmgOyV5IPbB+PD3IPO/w8G3A4HQfon +GTr0RnT7MxrwOIhPvcKZ8QnBB9vXZoQq/8gIrh/Gh5nf7fWKxWQhgr/8hYfe +/4eGGPwY1QiZc38Q/Ndtud1GswXgfLD3fCQcHicuvGYy3wjOvwFyT5oxnP8E +JF9v7NAHcl+AOJzfqsCuemaKiMPpw05rM/dh8u+7xjvOEpSFq0fng90XIwW3 +DxJuknD3wPgw96LzweYtVIDzwfGrA00PzxDx739xYsw/ZyM4XwIUnkHGcH6E ++PaLDPNM4HwDrZXCF46YOLivObqcwUPBoZHlaL/hcxN4+kRPrwDaCDfk + "]]}, + Thickness[0.043440486533449174`]]}, { + ImageSize -> {34.53449066002491, 24.508064757160646`}, + ImageSize -> {23.02299377334994, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {24., 17.}, PlotRange -> {{0., 23.02}, {0., 16.34}}, + AspectRatio -> Automatic}]}, AxesStyle -> Directive[ + Thickness[Large], 16], ImageSize -> Large, DisplayFunction -> + Identity, Ticks -> {Automatic, Automatic}, AxesOrigin -> {0, 0}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, DisplayFunction -> Identity, + PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, + DisplayFunction -> Identity, AspectRatio -> GoldenRatio^(-1), + Axes -> {True, True}, AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, + DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, + FrameLabel -> {{None, None}, {None, None}}, + FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines -> {None, None}, GridLinesStyle -> Directive[ + GrayLevel[0.5, 0.4]], + Method -> { + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, + "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> + None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange -> {{-3, 3}, {-2.9999998775510206`, 5.479999857959184}}, + PlotRangeClipping -> True, PlotRangePadding -> {{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.02], + Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}], + Placed[ + Unevaluated[ + LineLegend[{ + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0, 0, 1]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.196078431372549, 0.803921568627451, 0.196078431372549]], + Directive[ + Opacity[1.], + AbsoluteThickness[1.6], + RGBColor[0.33333333333333337`, 0, 0.33333333333333337`]]}, { + Graphics[{ + Thickness[0.08818342151675485], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurve[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYCYvc1R5cznFByOHXYaW2mnbrD7JlA4Inglx/e +5jrTVslhg+qT5nlv1RzOgICMkoOpzd6gaYpqDsrXHgUzvFF0yMj/0HryiqrD +HU3ZNf8vKzqI9ni9Ytmi6rBWSIcvfZ4CnF8KMi8WwTcxBgJhaTg/RjVC5lyM +vIOB1krhC0vUHf6DwH15BzOQfQ/VHZwnNAulzVJwmLNIeeefdA2I/XcUHB5F +iG+/uEDDAeyfG4oOtb+tCs51aDrA/FcP4mdowfk1nzYEZN/ShvNllr/w0Nuv +67Dy28uKMwaKDimxd9yYf+g5qH9SeTkrUw7OB6ufIQXnf9n3cWu6mIRDC6// ++imtunD+Br28xYwyOnA+OHxCtB1A3jUOloTot9B2EKmcVHL2CILfH9Htz1gg +BeeDwztHGqK/BMF/krjwmgm/Dpz/5+3rA5aPdRxaFNhVz1yRhPPB9hUj+Awg +kCDl8KJ4q+hvbj2HkLeXP85olHH48630wZxCPYcekP0CcnB+t43nrrQmBTh/ +T37N25muig4y8+I0Txvowvmw8ITxwfFqrAVNLwqQ9PRPw8EVFH4VMg5/QeYJ +qkPCs0ICEn8MqvDwAqeHKypw/huQe08j+GlgoOLQCXJfkBKcj56eAUdsRko= + + "]]}, + Thickness[0.08818342151675485]]}, { + ImageSize -> {17.013205479452054`, 24.55328518057285}, + ImageSize -> {11.34213698630137, 16.368856787048568`}, + BaselinePosition -> Scaled[0.3237956353650342], + ImageSize -> {12., 17.}, PlotRange -> {{0., 11.34}, {0., 16.37}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.057537399309551214`], + Style[{ + FilledCurve[CompressedData[" +1:eJxTTMoPymNmYGBgBGJpIIaxWZDYzFRgM0D5DFQ0kxZsarkTAOT/Aoc= + + "], CompressedData[" +1:eJxllG1IU1EYxzedmiOdu847yjv34lYIVtiWSFT3MYkoRKOCZgaRsIlJL5If +EtTKlyRmGBWmFpopzEBxUUZGDKI0Cy3SKLFAQT8oFGjE2Ga6ds6591zSB86H +3315zvP/P885xqILRx2RMplMHl554RURXi+O7baH3mng+K+JpZbsZBC5zhBj +Gf2igz/epYHizET4ef2ca2ehXnjPwNbf5oW293posrvy5QlqmD5wOrut0wCj +KBpV4HCGY9gA3VPu2YycWDgRyzZYVUZw4oiGH2m63pDVCNwTtiNiZpVvRXFD +4oO9Q26Z30RZU3G7fOxZKtnvohw8lrna9jEz1GmrokqilZTrUd02hnIfkx5f +XM1AMdq22QQ4bwsDi4/6DWOTRnjt8tbYuhjyvMcIuI6AxIUWO/eRS6RMvl/P +RK/Eiahem4ny3JnOr7Z+M+W7DfUnJzgLZc/2813yPRbia5rEot8ih1BMqyF3 +JGbv/QEzVEz7p6wuNXx4s7+vpNos9CMBrimGmjK0Fpivmi39lB5H/8d+GpSU +O0budJduWeFFxv3L9fHYn57U/9luooz9ZCV+7Fu4PApGUOwIKscbV/icW7WM +86wB8ucOje+akJO6r+ihzF3uWVVFCTr1YEVxKRZOIZ9fpYAN8dN4Ye5S4CbS +s6gi86VOEf5Tk+85HfFZwRD/nRzt5z3Ux4Jkynh+FJsp4/w+LcygvGVqoqM3 +CWQoriopT8Z9Zx2ZCspZRdv2RUGIx/tXaonejcs8OT+c4EeQF+trQXVsCvJE +z3qunK8JNg8GeFK/Dp4f9mQ9CPgpk/Misej3Wia+SKx/+dDryOMoY52fkygT +/RrKeO4HNaQfVj/ldjwfAcrjy8Pf2gsC5Dy+1RA9rX95XM5wEu0/vi+SWcq4 +r1ZWyC8T/GfhCJ6PSBDzE/0bKJP8SspEF0NZvK/Efqy9z/4BcdI1cQ== + "]], + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQfWLXjl62AHWH/yBQL+8A4/PHBtw3Oq7k8Pdb6YM5 +gqoOU9pboy7LqDq8X7Re4WyFEpwP1hevAOeHvL38cUajnMMZEJij7BCjGiFz +LkbO4Y6m7Jr/zQg+TH0UiL9H3KHm04aA7FsqcH7Db6uCcxoqDibGQCAsDee/ +acvtNoqWdlgrpMOX/k8Zzn/gGu8466MSnH+D97ZY6jc+OJ/Hkc9rxkouhy/7 +Pm5NvyYF58PsQ+engcAzdoeZIPBTAqJPjAPirx5pOP9A974mk8cycL5I5aSS +sy5ycL7ytUfBDDkKcL7zhGahNC5FuPkwPsz+7cFWEf/Z5eH8VgV21TMlchh8 +mP9gfLB5x8Qh4RAoDxGfIubQaeO5K22RAsQfO0UgtKYSnO+xv1bW4rkKnA+L +fzA/UtIBPX0AAOVk78c= + "], CompressedData[" +1:eJxTTMoPSmViYGAQAWIQDQYNqg7/QaBe3gHGNzEGgsuSDiu/vaw480DZ4QwI +rBF1qL7/45YxtxKcX354m+tMX0U4H0zPUXCoAqnzFnPotPHclaakADHPWNzh +LEheRx6izkfCoVWBXfVMiRzEXgdJOP/Lvo9b06dJwfnClZNKzpoowfkfFq1X +OLsCwV8rpMOXvk7J4U1bbrfRbzmIf/iVofoUHH6+fX3AUlkFIh6v6NDIcrTf +cLqKg/uao8sZPJTg/L/fSh/MEVSB82HhAfZ3tpIDengBAFNsiuk= + "]}], + + FilledCurve[{{{0, 2, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJZIGYC4intrVGX/+g5HOje12SiLOBw4rDT2sw6BN/n +BLvt7FA9hzQQeMbhUPvbquAch57DVq8NFnN+sjqI9ni9YhHRgfOP79rRy2ag +Bee/Kd4q+vu0nsOXfR+3pk8Tc5izSHnnn+d6Dgwg8EAMov6DnkNvRLc/4wcE +/4FrvOMsQ3E438QYCDaLO8gsf+Ghtx/Bh7kXxm9kOdpvKK4J50PcreEgXDmp +5GyKkIPfxYkx/5I14fzJIP/XwNSLOugryn/Juabp0AdyzwUxiPnztOH8tapP +mufl6sL5f7+VPphzUcNhJghEsjl4g8Jrq4ZDi3gta+YxVof1IPVrNRxSQe5Y +huAHPPG8ZCqM4IPDg4HFofrThoDsWwi+LMi/8ppwPsSdenA+evwBAJhGtQ4= + + "]]}, + Thickness[0.057537399309551214`]]}, { + ImageSize -> {26.06325280199253, 24.508064757160646`}, + ImageSize -> {17.37550186799502, 16.338709838107096`}, + BaselinePosition -> Scaled[0.32439307852814453`], + ImageSize -> {18., 17.}, PlotRange -> {{0., 17.38}, {0., 16.34}}, + AspectRatio -> Automatic}], + Graphics[{ + Thickness[0.07558578987150416], + Style[{ + + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, + 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, + 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, + 3, 3}, {1, 3, 3}}}, {CompressedData[" +1:eJxTTMoPSmViYGBQBmIQPWMmEFjKOPwHgXp5BxifPzbgvtFxJYco1QiZc3vE +Haa0t0ZdllF1qLz/45ZxtxCcb2IMBJt54PzrvLfFUs04HM6AwBxlhxe1j7PP +v2F3uKMpu+Z/M4IPU3/p97Hr8yK/2td82hCQfUsFzm/4bVVwTkPFAeScmZGM +DjA+tyOf14yXjA5rhXT40v8pw/kPXOMdZ31UgvNvgNzxjQ/O5wHRK7kcZDaK +zWd6wADnw+xD56eBwDN2iD98ftl/2fdxa7oY1F8+TA4w/javDRZzfrLA+THg +8GKH8w9072syecwD59uXONaejuF3gJkP48PsX3Jr+WNDZ0443w4kL8OBwYf5 +D8YHm3dM3OE7yJ5rnA6tCuyqZ6aIQd3DCwnHnSIQ978RhPN3BFtF/E8Xh/Nh +8Q8Jd0kH9PQBAF8M/CU= + "], CompressedData[" +1:eJxTTMoPSmViYGAQAWIQPRMMJBz+g0C9vAOMb2IMBJclHd605XYbRYs6nAGB +NaIO/RHd/owbBOH8VgV21TMmAnB+ehoQLON1qLr/45axt5hDjGqEzLk93BDz +jMUh6no4IbSPhINdiWPtaRkOBwYQcJCE87/s+7g1fZoUnC9cOankrIkSnP9h +0XqFsysQ/LVCOnzp65QcuB35vGZockL8w6/s0CJey5rJxuPw8+3rA5bKKhD/ +RQo4NLIc7TecruKg/knl5SxNITg/CuxeUTgfFh7VIP9kKzmghxcAkXKLZw== + + "]}], + + FilledCurve[{{{0, 2, 0}, {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}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, + 3, 3}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGI9IGYC4sz8D60np6g5nDrstDbTTt1BV1H+S44Ygr/F +/MehFC41hw2qT5rnvVVzSAgJUl/wUtXB1GZv0DRFNYcdDk2Pju9QdcgAmXNF +1eFRhPj2iwtUHUR7vF6xbFF1mDGBv8osWwXOB5unheCnpwFBmCKcX33/xy3j +amUHA62VwheWqDucAYE9yg5mIPseqjt47K+VtUhXcZizSHnnn3QNh4bfVgXn +VqhA7dWA6lN1qAWJd2g6wPxXD+JnaMH5NZ82BGTf0obzZZa/8NDbr+vwIkv7 +2/S/Kg4psXfcmH/oOTxwjXecxagM539YtF7hrIQinN8b0e3PuEHeoYXXf/2U +Vl04f4Ne3mJGGR04Hxw+IdoQ/5YpQPRbaDuEc4q1G69H8IUrJ5WcZVGE841B +oFkRor8EwX+SuPCaCb8OnP/n7esDlo91HPhjA+4bbVeA81NB9rUh+GdB4flH +weFF8VbR39x6DuWHt7nO5FVy+POt9MGcQj2I/VcQ/Kcge/xV4PyAW9I1iUKq +DjLz4jRPG+jC+bDwhPFNwA7TcpgJAi+VIenpn4bDe1D4cSg5/AWZJ6gO5StA +4o9BFR5e4PRwRQXOfwNy72kEPw0MVBxkQfEmrwbno6dnABsaOyU= + "]], + FilledCurve[{{{0, 2, 0}, {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}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, + 0}}}, CompressedData[" +1:eJxTTMoPSmVmYGBgBGJZIGYC4oSQIPUFJ1Udntc+zj6/hs9hxgT+KjNvBF9i +6hXODCVVhzMg4MPu4HWC3Xb2VRUHmY1i85kSWBxWfntZceaBEpx/FqTujwKc +v8Oh6dHxGaoOGp9UXs46KeqQmf+h9eQWVQcTYyAQFnOY0t4adXmPqsOB7n1N +JsoIvkjlpJKzKQh+Ggg8E3N4U7xV9Hc3gg9zL4y/I9gq4v9xeTg/FcyQd3Bf +c3Q5wwxBiHsNFOD82TOBwFMBql7EAeQs48UKDgdB7mEWc6i+/+OWcbYSnF/z +aUNAtpUKnB+jGiFzzkbegQEEDrBA3M0i7/ASFH46LA6tCuyqZ77IQcKPB8Hf +7rXBYk4lM5yfDnYAk4P8rgX7Uv3k4XxXkDtvIPhgexpU4Xz0+AMAeRC+Mg== + + "]]}, + Thickness[0.07558578987150416]]}, { + ImageSize -> {19.842560398505604`, 24.55328518057285}, + ImageSize -> {13.228373599003735`, 16.368856787048568`}, + BaselinePosition -> Scaled[0.3237956353650342], + ImageSize -> {14., 17.}, + PlotRange -> {{0., 13.229999999999999`}, {0., 16.37}}, AspectRatio -> + Automatic}]}, LegendMarkers -> None, LabelStyle -> {}, LegendLayout -> + "Column"]], {Left, Top}, Identity]]& ], + AutoDelete->True, + Editable->True, + SelectWithContents->False, + Selectable->True]], "Output", CellChangeTimes->{ - 3.802667807868717*^9, {3.8026678912227173`*^9, 3.802667910302764*^9}, { - 3.802667975588361*^9, 3.8026679940600986`*^9}, {3.8026683027001553`*^9, - 3.802668315712294*^9}, 3.802668362411025*^9}, - CellLabel->"Out[76]=",ExpressionUUID->"e68ed154-12f0-46b6-9989-c127efd9455e"] + 3.8042231764280024`*^9, {3.804223222430417*^9, 3.804223247788875*^9}, + 3.804223297957926*^9, {3.80422338509906*^9, 3.8042234220145073`*^9}, { + 3.804223496962*^9, 3.804223559239401*^9}, {3.804223595665517*^9, + 3.804223624937519*^9}, {3.80422371759478*^9, 3.804223749839056*^9}, + 3.804223793295824*^9, {3.804223869640996*^9, 3.8042238807084303`*^9}, { + 3.804223967690423*^9, 3.804223973396228*^9}, 3.804224031090708*^9, { + 3.8042241060828333`*^9, 3.80422412237633*^9}, {3.804224169724375*^9, + 3.8042242100295677`*^9}, {3.80422441764296*^9, 3.804224428640792*^9}, + 3.804224531069324*^9, 3.804224723456316*^9, {3.8042250390413513`*^9, + 3.804225053570726*^9}, 3.804225105786221*^9, {3.8042251361614923`*^9, + 3.804225184343916*^9}, {3.804225231005576*^9, 3.804225239256241*^9}, { + 3.804225272082027*^9, 3.804225275786751*^9}, 3.804227138433176*^9, + 3.804227191217017*^9, 3.804242643658977*^9, 3.804397744993095*^9, + 3.804414886607503*^9}, + CellLabel->"Out[84]=",ExpressionUUID->"b2c16d2e-e99c-4b34-abdc-027e5a535907"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"EsHF", "[", + RowBox[{"R_", ",", "\[Lambda]_"}], "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["a", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["b", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"i", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"j", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"k", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"l", "=", "0"}], "1"], + RowBox[{ + SubscriptBox["a", "i"], + SubscriptBox["a", "j"], + SubscriptBox["b", "k"], + SubscriptBox["b", "l"], + FractionBox["\[Lambda]", "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "2"], + RowBox[{ + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"k", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"]}]}]}]}]}]}]}]}], + "/.", + RowBox[{"{", + RowBox[{ + RowBox[{ + SubscriptBox["a", "0"], "\[Rule]", + RowBox[{"-", + RowBox[{"Sin", "[", "x", "]"}]}]}], ",", + RowBox[{ + SubscriptBox["a", "1"], "\[Rule]", + RowBox[{"Cos", "[", "x", "]"}]}], ",", + RowBox[{ + SubscriptBox["b", "0"], "\[Rule]", + RowBox[{"-", + RowBox[{"Sin", "[", "y", "]"}]}]}], ",", + RowBox[{ + SubscriptBox["b", "1"], "\[Rule]", + RowBox[{"Cos", "[", "y", "]"}]}]}], "}"}]}]}], ";"}]], "Input", + CellChangeTimes->{{3.803812385282916*^9, 3.803812403398583*^9}}, + CellLabel->"In[17]:=",ExpressionUUID->"4176682a-d65d-4db2-9151-98036e520c4f"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 17, 5, + 22580861201607883515, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8038124042282677`*^9}, + CellLabel-> + "During evaluation of \ +In[17]:=",ExpressionUUID->"1988175e-5be8-4177-8b2a-b05b1703e1c9"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 17, 6, + 22580861201607883515, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.803812404366242*^9}, + CellLabel-> + "During evaluation of \ +In[17]:=",ExpressionUUID->"3ce86c56-ffaf-4160-b8ca-cb2f6935aaa9"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 17, 7, + 22580861201607883515, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.803812404478856*^9}, + CellLabel-> + "During evaluation of \ +In[17]:=",ExpressionUUID->"cc48eef8-6263-475e-8bd5-5b038cc085cb"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 17, 8, 22580861201607883515, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.803812404601035*^9}, + CellLabel-> + "During evaluation of \ +In[17]:=",ExpressionUUID->"8cb32a84-91d4-4943-ba65-b76c11b9cfe3"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + SuperscriptBox["\[Lambda]", "2"], "*", + RowBox[{"Table", "[", " ", + RowBox[{ + RowBox[{ + RowBox[{"EsHF", "[", + RowBox[{"R", ",", "1"}], "]"}], "/.", + RowBox[{ + "sol", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}]}], ",", + RowBox[{"{", + RowBox[{"k", ",", + RowBox[{"Length", "[", "sol", "]"}]}], "}"}]}], "]"}]}], "/.", + RowBox[{"R", "\[Rule]", "\[Lambda]"}]}], "//", "FullSimplify"}], "//", + "Expand"}], "//", "DeleteDuplicates"}]], "Input", + CellChangeTimes->{3.8038124183737803`*^9}, + CellLabel->"In[18]:=",ExpressionUUID->"00fd65a4-5f55-450d-a2ea-5569741e2307"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"2", "+", + FractionBox[ + RowBox[{"29", " ", "\[Lambda]"}], "25"]}], ",", + RowBox[{"1", "+", "\[Lambda]"}], ",", "\[Lambda]", ",", + RowBox[{ + FractionBox["13", "22"], "-", + FractionBox["225", + RowBox[{"88", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"2239", " ", "\[Lambda]"}], "1650"]}], ",", + RowBox[{ + FractionBox["37", "28"], "+", + FractionBox["225", + RowBox[{"112", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"1511", " ", "\[Lambda]"}], "2100"]}]}], "}"}]], "Output", + CellChangeTimes->{3.8038124194196033`*^9}, + CellLabel->"Out[18]=",ExpressionUUID->"7cf3eca0-eb68-457c-aba6-5195d38f4d11"] }, Open ]], Cell[CellGroupData[{ @@ -10371,37 +14635,25 @@ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ - FractionBox["1", "R"], ",", + RowBox[{"2", "+", + FractionBox[ + RowBox[{"29", " ", "\[Lambda]"}], "25"]}], ",", + RowBox[{"1", "+", "\[Lambda]"}], ",", "\[Lambda]", ",", RowBox[{ - FractionBox["1", - SuperscriptBox["R", "2"]], "+", - FractionBox["1", "R"]}], ",", + FractionBox["13", "22"], "-", + FractionBox["225", + RowBox[{"88", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"2239", " ", "\[Lambda]"}], "1650"]}], ",", RowBox[{ - FractionBox["2", - SuperscriptBox["R", "2"]], "+", - FractionBox["29", - RowBox[{"25", " ", "R"}]]}], ",", - RowBox[{ - FractionBox["75", - RowBox[{"88", " ", - SuperscriptBox["R", "3"]}]], "+", - FractionBox["25", - RowBox[{"22", " ", - SuperscriptBox["R", "2"]}]], "+", - FractionBox["91", - RowBox[{"66", " ", "R"}]]}], ",", - RowBox[{ - RowBox[{"-", - FractionBox["75", - RowBox[{"112", " ", - SuperscriptBox["R", "3"]}]]}], "+", - FractionBox["25", - RowBox[{"28", " ", - SuperscriptBox["R", "2"]}]], "+", - FractionBox["59", - RowBox[{"84", " ", "R"}]]}]}], "}"}], ",", + FractionBox["37", "28"], "+", + FractionBox["225", + RowBox[{"112", " ", "\[Lambda]"}]], "+", + FractionBox[ + RowBox[{"1511", " ", "\[Lambda]"}], "2100"]}]}], "}"}], ",", RowBox[{"{", - RowBox[{"R", ",", "1.5", ",", "3"}], "}"}], ",", + RowBox[{"\[Lambda]", ",", + RowBox[{"-", "3"}], ",", "3"}], "}"}], ",", RowBox[{"PlotLegends", "\[Rule]", RowBox[{"{", RowBox[{ @@ -10410,12 +14662,8 @@ Cell[BoxData[ "\"\<\!\(\*SuperscriptBox[SubscriptBox[\(p\), \(z\)], \(2\)]\)_RHF\>\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", - CellChangeTimes->{{3.802667919328829*^9, 3.802667935065711*^9}, { - 3.80266800579642*^9, 3.802668008099038*^9}, {3.802668173388748*^9, - 3.802668258274457*^9}, {3.802668365597969*^9, 3.8026684259096727`*^9}, { - 3.802668527443355*^9, 3.802668573044139*^9}, {3.802668800392159*^9, - 3.802668806115922*^9}}, - CellLabel->"In[92]:=",ExpressionUUID->"19e9fcc3-462d-4146-8b67-65de6066d591"], + CellChangeTimes->{3.803812467071536*^9}, + CellLabel->"In[19]:=",ExpressionUUID->"069cc37d-2cf6-46cd-af14-3fbfecc1ccbf"], Cell[BoxData[ TemplateBox[{ @@ -10426,182 +14674,412 @@ Cell[BoxData[ RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6]], LineBox[CompressedData[" -1:eJwVj3s01HkchseMma92V6usTUWRpQ4pmZo6lT5fWUJWpBnU0GRms4diKaSI -SEVuXWhF2tbkWDXlstFxibPKrSOX9RszJgxmJmc1upqGmWFn/3jPe97z/vM8 -1mHRB38mk0ikn/T5vw9UbDcikdQQHoF8mUw5xKd9PDFhoIbVvUf5FQFyKGUL -+p9T1JB2X+ei9ZfDjIlNcSZSQ1Vw906+rxyyE5duMv1WDZaEMujLPjl0essD -7NaowWy2ZGXlTjm4Kq/f9dmthrzAYnC1kgPdeYZRdEYN+xL6Xzi/lYFT/i7P -QI0asi+qTGrPy+DzClZQZNwcFESU+56wkEFxoDBklXIOqtXv0wtaJuFwpNJ9 -Jmoe+r/Pmi4MnYTxiv6N5lPzEEeJfhWCJiG1wUd1PFIDZ3oUd1weTgD5ouMT -v7caaBl4XGTEmoD9CZLYfJ4WdgjSznGMJkCwx8p0VqEF26dzOdT6cRBudq55 -zNHBVM6j/aUnx2FC9KcHVaSDpuniz8r144BYT5tTghfgiidtvmlUCp+0N+h+ -AwvQv+XqsZISKagTaNnuzEXY4InZmwKlMFY5KiaIRfjO22vRyUwKHZS9pqN2 -JBxVPzq1UDMGDhbSyslwEu57+SSCvW0MTnXJXG/ySbje7cO53LZR6JBu9Q5U -kLCBaU+0aP8oGA9u73ljZ4BX11hG9IhHgMG+d8CGa4DXpPBlvNgROOHLcovh -G2CRZ8EsjzoCGUQMI2LcADuGmHZG/fEa8nZgvpMlGZsrrP557/YayqmH05eE -kvESZ+9BW6kE7oUPH8u5TcZXudHkxAwJVNDLq21ekzFzhX1dm60Efpf8kHTZ -goJD6541+nQPQ5L5Vx6FQRTc7TwksU4YBl7Lzgv1RRSsO66adVo7DE6a/sZ0 -IQVPfBNQuK5XDMrlFjGWyw1xwAuH2+fTxFB/s/pW10FDvHcqMd5/ixh4DwTN -VnmG2EhlK+W8EcGajbOHsvoMcaZLa4JlkQgaXcumS42p2H6t1rDVXwRedENd -qhcVnwsp8mQZi0CWW5USl0XFue9eMnqfDwE3pc3ArIOKHRnX2/hpQzAjtp5t -N6JhG8e+rdm7hyDChM718KJh7oa2Bp85IXRLKvt+zaDhC4K8zreNQmAsi3os -aKdhk3hV3auzQrgkuZVTQEGYU3ZwwA+E0HHhtMIbEF4WGa3cSBOC2fWSquWp -CNffahqK7yLAY7vD2YwmhC1aSZr5awSYr3bm3WhG+GNWQzNVv/9d2OF77xnC -6V27Ck3yCchr91jX3Iow2Sjzil0uASJmWPfn5/o/VhcTkEVA5OmiVbwehGnK -dmZ1GgH51ahx7yjCgy3PfJJPERBWsPS+3xjCpfYDf2fFErA10SwvVIrwI7q/ -728xBIixDffsBMKSjkv3a6MJWNe35+saBcKy8tRD05EE/DUTd8T6HcILLEZN -KI+ASwNJ7pvfI/zjvqrkk1wCgurSN7t8QDjz4S+hSWEE6JKvUYI/IWx+J/Po -bY7e11jwIP8LwuFlLpwhtt73Q21BqRph+gs2oThCwPRgQ8rDOYSVqrKjqsN6 -/pLOgE4Nwoucu7VmwXr+1F4XoRbheapvsm2Qnp8nXC/TIWx/cyV7WyABNM+R -ZR8XEF7ptnjAnaX3cZBpFhcRfuWtDWIyCfgPGx1SMQ== - "]]}, - Annotation[#, "Charting`Private`Tag$39213#1"]& ], +1:eJwtlI0z1HkcgNfbfk+yba2fu7g2L1FWyXXehs7303vjREIxbbUXSbI4E4Ui +d5y25IxEUagIeUlRo7x8fyEt8nLRuWK8Z2yIWLtab3c3d8/MM89/8OgfDzxw +QpnBYDj947/1epg4sbSEaBtn2k2rWE605nSM7eYRzVY/zzyYIyd1u3P4obOI +Hq6xLk+9JSfGPc8axiYRnWz1UFf3ipx8XD54710/omVrMgb0feUkyM/So7QW +0WVjEUGbDeQk0ug97ROHaLPL1vEOKTKSlm6Y1MxCNO9lce3FyBmS2Xsp0EWd +SQ+U3bzftXaaaLe5OptQarSM+l7LTzJJxPtddzYZqdLs6A513vlxstfE6Iyh +gQotbrBr578aIbbF/Putm5Vpm5mlR7LjQ0Rx2YezxUSJDtoQ/vk99JIZefb1 +o+sZtG/86Su2I29JnUGSRbVwkWSd3pTVJmgkdmpRpabe84TekmEUNVBEksHa +etsFBelLeBsoOVyGvW55fPiYOUtutDrp5UQ04dZcrrpSmoyUx5yUTup1Yu7y +ku/IUymB7vFN2wZ78TK94VbJgymy3/hF02jJEPZ3i72RlzdJLjY5KxY8JVhQ +29vETRonygnRnPzH49jgh0WXl9ESEmp25G6FxWec71vaX/H0A0le96P5xMlp +7Df9iH8lrZ8MZ211sGicwWaRap5Mwy7y3JXdz9efxZywDo2U9HZidd1y3GW/ +And6+/MeDtaTYf7RWI/ieXw2nJfQcL2Y2Jf+lWQ6tIibms+eYg6+rmD8Bzz4 +3QayzYuwRlYa6+c4BiSciv5T8MsrfC2/cbV7mRJoSh3tCl3acUD4vWNrm5Wh +70y9RWhMF/ZiRZ4OXlCBT8/21ZwV9+O0qgZL6w1qcD/ujsBb9AEbWlTbDtgz +wUhWwDmXLsFiYZmathBBz+O1VXa+45gOcNUwj/sK3FP7Lo0mTuIvl71aK9LV +ISMnvsoxZQo7+oV4tr1aBqqHheNqYVIsZZtzm3o1oEWQn3sgRoafhI/lOa3Q +hCeaOkfk/rO4scAloJzHAuM0/RHkqMB6s+unrsEKUITGLBS4zmOxCoM7b8WG +UYUuK89mEfMCQXCnlg1ZJ+M6dA0ZoFMZrabBXwmJ217HrzZSggcpc6KizyuB +FViwvZZShqGOBtMdF1ZB9c7yqqc6KlAovWF+W4sDC8JjVgdZqrDmXOWBj3c4 +oITe3DRdUIXNom/cgjZqgdXe4BoHBhNaIkLKn9dogaK7cISaYoL2G2PbWScK +dvqLE/fJmMCVJwn9XCi4OjdoE6tgwrpvl7K6XSnQ09EVSZURbPHpRC88KNhz +SGTSzkGwTxH3VnScguQ/TvglWiKIMZAE6YZSYFbPHVsWhmAquCDX/jYF59xt +k7dfQPAl9euukkwKXgy5bw2PRsCo+pVleJcCN5Wr8RIRAk3ED0G5FETA3EZx +GoIN6ct3tJVQIH7eKYytRCCoFfb8VEfBKodpqopG4DPybmVHPQX8d6xqaR2C +AM3du3Y3UDAh38XybkZw/hC3kNdCgbZlWfH2HgSpoy1h050UCOpaD4YPIMhg +2xWdeE9Bvuvo4qNhBNmWuX2d3RRsDTZw1p9A8Dgqak9lPwW/KdnLPaYRPMse +DTcboqAt0TMzUY6AbjhUnDVMgY5eyB7xHALxp9r+VRIK/v8ZtHDMqdhRCv4G +x2hUVw== + "]]}, Annotation[#, "Charting`Private`Tag$7504#1"]& ], TagBox[{ Directive[ Opacity[1.], RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6]], LineBox[CompressedData[" -1:eJwVkXs01Hkchuf+tUorcsZBjpBaFBvhWPX5TrumSNLNvRtjO6WTLFIoUy7V -bDJNLl1ou6gzTQldVsmlc5SJ3dZlmyn8MBhDLqNJ6qcxZmf/eM/733ue57xL -YhK2xtEoFMomQ/7vzWJvIwqFhGgBZ7+NVANHTn06OEAloYi/OmL5Kw1ciy5v -f0knoSNi/gPPRg2oTR2unkUkJD5U5wQ3aODcsQUrzb8ngcaJHsut1sDrwKFt -TrYkkPqKJGOxBjgToj+C/Egwqjd5FHVWAx6r1F6Xj5KQJneS2W3SgLvwpw1h -WhIq7Bdzs1s/wmd2aHh8ygyEb/uaytrzEa6GyXdaTczA4Ub3RaLJSYiMn/BX -H/oGjmXltVTLSegXt7tajnwD36WVQ7bhauDXBH35NV4LfwliWDcvTAAte8WT -kHEtlFA6Cp69G4eNqd2/CXmzEBku9279cRzK19qZT6tmoaUryk+UMwZyt1UP -K/boQHlboMsbG4WB93e5zPc6kG1IuHouchRQ6NO6zIg5kNxNCT3T+AGmZi96 -hHTMwZy42dfb7wOQqaxz/jv0YB3e6RdYMQJ9kt5OmUwPzhJXdNh5BKT0dea9 -ThTclbfSb8WjYXCxUUgG91Hw+Hy5d6nXMCQ1KzkFZRTsTLb/XdKkAqnCMzBM -RcGJ4t2ld7aowOSt95thJyqufPGBZzw4BF7RNzY7xFIxs3Aq7lDmEBwMDv05 -sYyKxVb+yY7sIciRJXod6Kfio8eiZy2eKSHfB5e5L6Zh+Nomk+1Wwh1mZNZ3 -u2h4tNiJ50JTwo19XXvzrtBw11Ln2qLyQRB73KlyIGhYGQXC7u2DcL3bMeO0 -DR377sv6pZAyCBmWxtyicDqeq/cRxj0eAF6D78nqy3RMdakiN/IGwF3b/jxL -Tsdl2c36ZusBmDCzSVxsxsDD0dMtdfJ+qC6oKm7eysBCO/Z5fV4/8O6V19nl -M/B8kTmDHdQPtq7T2wVtDGzL5WgqWf3wnHNr7JoJE2+ZOeVbK1VAgAdDxw9g -YonV+sH7vytAeb4yM0XAxA05cw9CghQQm9lItZAyca9ONNlipgB155LpJiMW -dtR2rwu83wcHTD1iuQEsfEAoKsjw6YOWbknb4RwWpuSK9q5v7QWvhYcqyptY -uMY2JX35nl7I7S7OK6QjrCpKYLG1PSA9mawKBITTzX32H7zSAxaikkozPsJg -L2Ys8+wBrrdLWk4twrHyDvGidwRYWq/iXaxDeK0bxy5NRsDonE/wjXqEA3en -N/b9S0B+E9e+7gXCpUY+effaCHi/I6bl80uErZctWuHfQkB88mUr3huESzbv -v8SvI0BYhZ6v60V417ydanYZATGFC26H9CHcrFvZceomAZ7HLPJ3KRB+yp9W -TFwnoBM7xKYNIGwr8c98WUqAfdvaeQ9VCF+a8qlPKibgsTolaskkwtvRLegS -EJDbkeHv9hHh43ZlrevPEhD+Z5bbGg3Cj13dBU9OE6A7foEeMYVw9NA/Jy5k -E8A1Kb8n/Iqw0cWEuI0nDL6aR4XXSIQbvpgG1GQQMPa2JvP+DMKjOqOwH9IN -/CWvt73WIvxqeECDjhr4+a1r5LMIBzdVn0g9YuDnyZcpdQjroXn1cDIBrA09 -Cz/NGfblpuywJIOPi1Kr1xv+MD5jL00k4D8fP1Gs +1:eJwt1GlM02cABvCWo++4+ndgScDBODsB54RwRdD3laA4qMghAhlDMpFrHMZp +ORQdBAY40IYhm+BE5sGhIggjMsX3P6ldATuYlBmOABUhFFAa6EpTSju3vE/y +5Pf1+fQ4fpUTdcKAwWCEv+9/Hn8gWNHrAS1KdJzW6/V464YtN0AL6O0qHx5f +rcfCA7cT+GpAl1eF9iwr9Jg71dO/rAA078k3P4zJ9HjRfPbmmAzQUhtRSGef +Hp/M8Inr7AP0jDSjPaVMj8+7jtMpZYDWhnYVSdh6XFfvXC1hA9rbL8Sl3k6H +G6bLcyJNWPRe/OH0L5ZabD0cfdiNY0zvuNF0Pcpdg8UR0cGDrka0oPFOeW2Y +Gh90cz3t7GRIC6JCFw4Eq/DutoQ7Q58Z0KcTengNx5RYczHFysuNSSs5Em5y +1Cr+Z/3WlcRPGPTiyuceveEKLHSq9n6apcPl+13Sz00s4wDjC50eyVrMN9Wl +xIoXcA3y89tXqMHbi7KzizVv8PFrcXOLDWos8u8YGIUyPNRkb8KsU+HAhgIX +o7RxbG/e7om7lThvFy3Sjr/Epg7zQ/LWVRzB8LwQHvscZx4p/am5WYG/rWrd +YsW5jZP6pgftq99ixhyz0SSnEzrt0UU+L5LjPDPwaFHdD1vSOmWPu+dw286r +geXVUpix1pHwfZ0M77C5dkA+MAl3njeOZzlPYDkqHDmX/Rpa5UvNautHML+P +o/H2moevkjPdH8yK8MB8ss/WkEWYW+B+qf9KG46Ps0u9af0ODkpy01mzLx4z +/o8Ctl72R7d23YeFQqZTqVwBL6UX/Z1U/Af0+nTYlqdYhRZKXsC9yBFouGeE +/bVUCWdOi7z5JRPQ/2fPKjuZCr7rOfQsVyyD65NcWcAbNbxT1piUXDEHR/oi +dj0UaqCr6q5VXr0cWm6MmjyRaOHUw497A9Lewpyxy1N2XToY8+NM+ZLg/Y6w +k8IzBxno+u3KXl7tKhyKEiVyw5jI6Iust8b5Slh8v1tVHGiA/kxqaYoqUcHU +dmm0W5Ah+tXC9sv1TDUcZ1W1nfU1Qtw6xwXA00AryRalIdcYafglm3ejtbAw +4Jlu1I2FljTb2M3+OsjftABHPgLoRmqZdJszg/gBEux7UWnjyiSaIHbO3aA+ +jgHRFD0NftTbbWtINEObWcd8j7KNiOaICV5e9dg0Ipoj34OnnoUyWEQ20kze +W+CssohsFJwpFhxSsYhsVLUx61+qYRHZyMF2W4XSABApFBJb4TZiBYgUqvnr +RIbABxAptFNkv2yaD4gUyovZXRNUCIgU+v1NTGBBESBS6IhhVaW8AhApdBZt +7BDXASKFxL+9yip9AogUsgxd4/TSgEihhDH2U6UQECm0sr6fnSwBRApZ+3S1 +BU0BIoWShENHC14DIoVaopd0HfOASKHAU06HHVcAkULfMfeux60BIoWGBfEN +gnVApJCtw5kQ8QYgUoj8GZFC/wLjIlph "]]}, - Annotation[#, "Charting`Private`Tag$39213#2"]& ], + Annotation[#, "Charting`Private`Tag$7504#2"]& ], TagBox[{ Directive[ Opacity[1.], RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6]], LineBox[CompressedData[" -1:eJwVz3k81Hkcx/E58FUyq3TYDpVJ7S7FUijl82Eziw4etTFNx0ORNuPRxqZT -TLk2JUdUIscjCTWkbPeo3SyjcxJyreg3xjEZ14zGjGHtH+/H+9/na/He37bs -Y9BotE2T+/+9Cx0NaTQ1+Hg6cY5c0cCRM0Mhn+lqWN84YOOWroHsncL3lUw1 -pFqtqGalakBhws48S9TQXHpAV3ROA+ePs1aYfqOGOn+v6O5IDYi9OrcuNVdD -lh1bHLtPA659qTkb16qhUp5XD/YasLdTOGQcU0POQJTTTcko2CY7e/hp1eAq -EfD5zFFQzvHl8sNHwVyoibi/SQ2Zfg275vaNwmVlWcnq/K/A4/e5Kw5qYGrp -S9sg1Qh0FL63NuvWQIH5vDRL3ggIHm8cCeJrIcHo2TnFIxUwYpb/6fNFC53K -utnOS1Sw4WhLWHLgGNCOLPRXZCtB6LLIVCUbA2zuu9c6UwkNNnZ3S/11EH+Y -U3M7Yxg+NxZx9Bt1sEJ1ljtgOQzE96Eoavs4jAjiM4uEQzA8dtHep3YcbDPC -z5i7DYH6qMF5920T8Hr16kxe7SB8Km5rqq+fgEgPZabjgUGoZrqZti2lIdMm -yIQYDYLV/PZiaj8NPz4vtmoqHIDfa6Suafk0rNn0qb3CZwCq21d6+clo2DrY -9qixpx+M6xzfdC2lI+vV0x/j1vaDw848b3YAHZuX+RQ9zVVAyGbfn0Lz6Zi0 -pjdkQNcHsfWhDsEddFyoJ/0YwO+DJCfMt13AQGmgasvF9i9QoM+LnrKbgaKQ -NOvvvL9A3v7mPYlXGRicOOYy87UcCu0LytitDHR6WB4mcZNDbsuSiPj5TORe -KrMsed4LEWZTOZe4TJSsH+5au6EXAp+tOf0gg4mG00rYo+96wFb7/kl0AxPH -DOV1af490DdjfuiCGXpYmWAkuT3SDQ/Syi7XbNFDQRk/2CO+GwJvCUWLkvQw -zm4ON9aiG8ytVb8kSPSQlxk5/crDLnjiel2ebayP4v7Z725yu8DTXk8n8NTH -8nFB53qdDKQX7kSFJ+ijXIeFjGsyCIh6QZ9VrY8f/kjx/stdBoqmxaoqQwPM -sTQPlvV0QrCJfQDH0wDNDkmd/VI74WVLseRQrAFWLvc17nHrBIfpB0uFVQYo -3sVMZ/dLIa7lcmI6k2BoybclrOtSqD59WOYFBKODWOIAnhRmpWbdmSEguDsu -zCTbWAocR6sTsU8JtnZ0bG2qpsBsnl3gRRHBHxrCXt2ooqB33GlzXgVB1mDR -vrB/KEiq4liInhNMWaekT3tBQeO2vS+VlQQLunY2YQUF/MMZcwPfEEyg5Y7f -KacguYw8cWsj+De1aqw4j4K96awbPp8Iupx8LTqZS8HK47OSdrcTvBbDzduY -Q0ETsgNOfCaosXB+q8iiwELiYnRXRtDs59SKlVcoKFeE71jcT5B3o0ZZdYGC -uNoId5sBghcY1h8yEing3o+2WTdIUG61/EPIeQp0p1KY24cJ1vqPOJomUMAx -Ft5K/krwKp2Vtid2snfwXnq2mmBEkCRyVQwF8rrHUbdHCb4tNTg3JXrSnyXe -KtYSVCY/IncFk37Bu3UNYwTNI6yOxUVN+gMblkl1BH8d0k7ZEUmBgce/04fG -CUKupcjm1GSPlVQ7MUHwe/vrKXoRFPwH5qteOA== - "]]}, - Annotation[#, "Charting`Private`Tag$39213#3"]& ], +1:eJxF1P8z03EcwPFtbDtiP7TmrrlbbDfd6PTlfDtTjVOcU2KIa9UuI9x2Oiff +OjodsUKfc6imS12+E0m5pCGW5tAUl5MOa3HmSxxrcxtT3bXX+4fnPf6Dp/OV +lIh4Ag6HO/u3f8a1YWu7u+Q+i/tMdBfuNlJxulaQvoV0mekaWllHLtlpnk2p +kdeSPWM6BpC57G99CYVIWRWrbJSCrJ4tSgm3IYEOY/wwDo0IKs/xA4fZ1mAw +h53GYlqBvq2COtVhAmi8k0A9xsGDvw01FZcO4kAFs8yjR2Lutcgl3uxwE22D +5Txvb/8cIxj3KGZ+qXoLVNUzbPAyPciwe3G0t1MH2jotqLRNG6A4suBBQ8M6 +KByYHWaUrYLM4+bwD3lasDGxQ93dOQ8mb7YL7srUoHsuMZbEmgapWRN7KqvG +wUmR2LVNMwhmZLuWDlW0gsOjGUkkzUi3xaZ7PryaI89PWixNyvsqvPURtNeF +clvCx8G5tEGP9Pxp8FfXmf4MpRqsK3wqFEnnQba+mZpZpQVnXh6QcxNXwaj7 +c0XL2Dr4uLZYHlq5AVpfkKwSs3TgJ2FjfUS+HnxtT79oEG+BLjLnRXKoETSm +5+8087fBZaMjpcHHDD65WjjhyMLxLGL+I8X72XiQktIcMEAjgD2Bb+SddCtw +R3LZK5piDeLJXx667SC9glP7Q3Ak0Pi9ZZG2gQwUK7EzemSJSeNTYEQ60R2l +OgIZDDov5YxTkeWf45MxT6T7IGPFNguZGeVbHpCDfP8zyi87DxlpVVKslSJv +8EyHlDKk8u2kpOAdcm/IJk3ehxRMUXp0CuSa4RRFNIp08HzVGjCDFCpU0dk/ +kI38ZXP7AtIvlRnmvIa8jT9hiNlEjmGx1ZgBSXe6HqQ0If9/DPwDRQFd/g== + + "]]}, Annotation[#, "Charting`Private`Tag$7504#3"]& ], TagBox[{ Directive[ Opacity[1.], RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[1.6]], LineBox[CompressedData[" -1:eJwVz3k81Hkcx/ExY+YrIscqRfMIu2xJLEWr+HzokRBRNle2FVMtOlSOkqLQ -lszSgUhKqXWXDrZE7SO5qo2SRK5+P0M04zZjxrH2j/fj/e/zpet/cNtuJoPB -cJnb/++aa6nAYEjA+QdzR8UmKYSfHtn3RU4C1ziqafkNUsjyLWqsYknArp9b -uPmNFESq+lfPEQkUH3m7IrlaConHVFZpLJDAz/ygI3qPpVDr1ONuwJWAwi6v -yeAsKdgKL153Xi+BbWvE2hcCpWBuJrJIPyqBSm6XyUKmFEyT1zl4yiTAHWIt -O2w0CWOLPLyCwyah8zNj/oYDErjq2fzrEuEktGskromrFINPsHCj6IAUFuZE -e4/NE0N3buNKrT4plHQrbrIMmoCYJ84Te4JlkJlYqSF+OQ7MOONHbt9k4P8w -fb+C8Thsjmg7nMybgssOZu5Ot8egyGaZxrhgCn6XJapxF49Bs4nZ/bt+01CX -l+sclDkKX1ry7Nkt02AdVrw42XAUiMffFdHeMzAxZDo/pHgERqcumbu9m4FK -5cf799iNgCSCk7hx+yxMH7zduOvdMHTmd3z68GEWTqa+14TAYahh2Wl0GDDw -x4kyRKVhMNLpyqf2MtDEl68akTcER+po28s5DPxNld3StXUIarpWO3kKGBhy -ttj6tHAQlJss3/QayOHNkGvZr20HwcI321U/QA7D717hPfhLBPu2eGw4lCOH -K/mK3r0cEcR/OGQR1C2H0oxX+3aECyFpLeaYLmXiFF8pMlP4De6wfWLn7WRi -YGlq/dmd3yB7b+sufgYTw920fMraByDX/E6J/mcmWl8xm5rwGIAbbd9H/aHD -wtZW8XLvj/0QpaVon+rFwjhVtYOOvH7gPbM6VZbOQp2bmwQ3Br6CqayxPLaZ -heWFjNHik19BqK5zaKm6PDqcjHZategrlF0uSavbJo8Zqwwtduf3Aa+gqGJZ -kjyaaxe+VnHoA+7K8V8SGuRRltZXUNnVC+W2twaylNn47LwowSq2FxzN5adj -HNloIVQxMVvRC/Sf96LDEtjo0/8gKvy1AAKiX8hp1rDRuGPE8FyEAESfdMer -FTi4/uMLFyOuAIJUzQPsHTlY6ac9warrgfq2/IaQeA7+y/f56dXxHrBQO3C3 -qJqD19olR/1W9MCZtjR+Covgy1CuXWgXDTWnQgVOQPA7mXtcezoNmhcz76nH -EORm3tLZ4kqDvaVRZPxTgr1TVZuSlGjQ0jbjXaogGFWaco+nSEP/zNot2ZUE -k31hndU8GpKq7fUqnhMcGuSU9nBoaNnuXz9WRXCrfD3aMGkIDk1fwntDsHWP -1Z1xCQXJJaTcroNg4I2P504IKPBPUbnt1klQp0Cs59lDwepjmkk7uwh6zti0 -m9IUfEL9gMgvBOUzjB/R3RToNdgo3RcQvJ43POzSTsFDUdgO3UGCHN2tGQZN -FJx5F7XRZIhgjp/nBuZ7CrxKY02shwlmdRordzRSMH3iAst7lKAr04KV+pYC -e+WigmQxQc1+7aPkFQVaww9SsiQERUbKhnQdBQNNT6ILJwlevHJr4nntnD+z -1r1WRrDnRL44snrOH/PWunmKoAuoLvd6OefnNRvS0wRHnrKPr6migOPQrjYy -Q3BBVrxQ/cVcjxEtm52d6zmfEDP0DwX/AeGfUBg= - "]]}, - Annotation[#, "Charting`Private`Tag$39213#4"]& ], +1:eJwV1P8/0wkcwPFhtjH5ttUJGdZU6qiFvqC9lb6XL31jKKKrkKL0TeFEpdWl +IvKlJCWhSKdC9f6EpJT5Wr6cbzGzxtnJ1/nS3f3wejz/g5eR95FtvymSSKTg +//pfn9xrAz9/UonrvV7vbiorE8wJXRPrSSpR8pG7Y/9PMlG27oHHiTEqsZR4 +f8VqnEyYtBV+6JNRCdFUgryhj0x8V+tKb+qkEsvrXco068lEoJ+l67NSKnF0 +5eK+4/fIRBinmdh/kUo4DOXtn1pFJpKS2Tc+q1OJoWbGqdETSkRqe/QRZxUK +ES79WNGPCsSs6u2OC2YqEyUaT33uGJCICqft9pUcMsHkU0LNJiZxwwJOMNtY +iXhj+NR4xp5xXPnEI0NorkiU3JcHhvQOo1ywn8FdoED0Feu3e6oN4vDo/Zt7 +5pGIalNPs2jowzLjGxZvAqaRab8sNS2jG62Vw58t3DeJecllWy9rNWIcLFtm +FypHr9KrI6phr9AnxVX0PXUMIS1R+GqkjCd8aKCikDSChDURPSBv4xmo5S3B +50N4+HJA+cZuCU/VsEcoyRrEi25FHU/Mf/AO7Th/KzNThuE+pWvEbDkvbbpo +qWmaDMtN/VjveXLel0xZVXaiDH9wXUefu8t5MOWunCuQ4elE2WB5rJzHzOAe +LTgkQ9qsGeeyyBO816Ptm0sWy9A8Jv1zrGSCp291fPpF0ADWWujtjSemeF6l +7ZUGN/qRTA/enlRPgvW2Y7+1RvRj9BnVl449JDB7oUlKCepHP/qZWO0xEkxm +2VnMdu5Hrvh32ls9Bbh1Iz2FodmPk2Zc31IfBajeeyCAdrUPdx4j3z06ogB2 +pAH1wUtSHC2wMFo4Twnmh1Af5Z2WokVeMb5ZqQSaQ6w1R3ylGOH/ie7joARt +YqeTfRukeI3ynt12XAlChPntPVQpevOPPUh7pwT5d07ktZz/jpsKLpw4fZAM +xrbTzu8iJDhx8dOY6ytlqNayXZR4VIIbr08dqqxWhrCeM5QAHwnquN4zdRIp +Q3PMeBFzrQTzFVUo19UpEPttiL2PJsHHLE3Jj70UIEdLhxVjevGPSJcqDzUq +9NQ2JkKKGOPl2a1EIA3iHv4SzPxDjN3n7uWXXKTB6rO7HHpDxbi+Niax5Q4N +7nDqFa95itGdSXbe/pkGLqeE/u3GYvzWq+HnuVAFKuaU24Y96kGbjDPDjD4V +eHTwWWfxcxFuOb5tvUsEHeq9U1mbM0RYTXOyEt6mA2n35d3NN0V4gk8n+xXR +YZezT9NYsAhrNFzPqgzRQXElo8ZyqQg1HEabxw6qgRv9GJGb2405wdph3fwZ +oPqEm5qe2YV5rWrFkW4aYJlp0Mq91YWvqxIMqGc1wOueql7JxS7sDT8uKLyt +Ac/jv8V37O/Cey8P8B93aoB3+I2rczhdKJ1qMhyw1IQip8HQhLRveG2fjp60 +TBP8fjz1uJzUiS11vQXkMS1ItPrH+oCgExtem1u20rWh4vRivTUhnRgb1761 +gaUNHFJuk5zfiUq3luVwNmhDh1rOLr/ZnWgfUqXqnKQNO00ynDbe6sCa0rfr +TNYyIMpXZM6J7sBXEr+oue4MyM+Zq6FwqgMt49N+3xDEAM2l6Z9funRgnbVm +sNIdBlTy7m6a/0sHRjIE3c7jDIjIt7ikvqgdZdXHxopfMKFt+bP15fR2HDYt +dnOoZoINLqGESdtw2k6wQ13ChJFKs8j+rDYMynnoMFtvJhwSzQ/9tKANk0fp +6f4RM8FVZ06QYF4rpjWuC7ziMgvMwpT5FHYLiuXh/CdmOqBbVJ3QS25BwaqB +MoMtOqA8kvzlY08zDjzZ613pqwN/BXB3xGQ1o0ekvs9fD3RAsNvTUYfbjP+o +ZCcMGc4GsU3hWlO7JtzkrxJfytaF2lNRUWrsJmT6U97uWasLb/50LP2b3IQn +tcIf2x/QhfhFPfCsohEDp4bVhrN1wV6fYWPj1Ii0Lc0tlBV6cHfiENfB8yuK +Yt/qjXvrw5Vly4MW231FzWh5QeUlfTh5TClPm/0VV5npFU/m6YODNPHXrz1f +MMlNsTGcNAemmsvnex3+gjnC80KL+3PArciQdTS0AVfKFJZ8+GkA60aku3d4 +NmCybSF/9a8sWMJ9kWJl14APhKnGlu4soGVt1Z0gN2CHyIiIecmC54khM6Ou +1GNUhPWZLBtDYJyup8cn1+Hm+eNecapGMPZzXGsgpA7v54YNy+YZQdsFls4G +tzpMSTUbzF5rBJlxfnPlOnUo+qBYYH/OCFblkWz3xNfiuGkkbwXJGHzFiw6b +XK9B3/MUdQMtNjgc3hYcHliDVTb9xt6WbLAYPhnS6FiDFRr+nxa4sWFasfSC +QL0GNwprsx0fsCHOgJ/69+VqfKud47519VwIy1ZNC5ghRJvbWfK5SRzYWLjz +MetTFUYdvIYrKjjAfH+3sEZQhauvJj+cMcqBR9+sai1pVf/9NsOD4mIC5Q4J +VYtPfka++cuz9Pcm8C/h9JvM + "]], + LineBox[CompressedData[" +1:eJwVxXk81HkfAHCGmV8088vNTpR7U7u0imcoPt/kWlRbclTCax0bjysPJlJU +rnI0z6YiSm1LrlYkojRfR64u49hxn8PjaBw5QzzP88f79Vb7NfCEF0VERMT3 +f/6/jd60mL1fC3g+t/dRZKhjexfrD5cutsBl4yKNx1/V8EHBz1bJ/jyIfaE5 +c6dHFRvJ3zD8lMgDncKogM8VqtjQsllLOp8HHvzd/c/SVPHeXBvx22M88L1s +UHfJSRVr+tlWZ7q1QuCJ3Zndz3dixoLdgcLjbeClVnZraVAFS3Xre7CD26A+ +U/4aPVsFy2GlRLNbbaBX7TQw5KOCmUmC7s72NvD+e514vaiMd2lGRlCd26Hs +aiz7nbwyNjtZUOHq2gHhHtzihBAmtjD+95BOVAfUnXE0px1mYmtVtsRiVge0 +7D3PkZZh4mOfzU4lDnVAQaW9e0Pxd9glpnul3PNviBQzOuu/rITDSiVY0v/k +w4pLsXdluiIOvzfj1pvIh9NlzvLUIEUcGd0R/6SQD3Ia5RmvLBXxNbtHfJNp +Psxr7DPzWlTAHAGL7Xu+E95ZtEVHOingArlzZbXsLtifWKzp8aM8Hgyp3x8W +0wPZh6Ln2hRkcW8jlZn7Zw/YaZ8e91yRwZ3KFptddT2QfllE2bBbBrfU1TaZ +UHshlEapu/1ABmO5aldqXC+4XHteob9bBmeVvkpIje+DqA9uh/fbSWPXhWe9 +JTcGoIbKWZT034ZPW89WC/IHIDXKVMfDZBt2yNR7ovBuAEznvHlS5Dasrc5n +VVEHgf54+MK5ZyTe0ewgpmY5CC+TM/nCFQYmmfZp4/WDoMfZW3o1jY6nK47U +sBuHQBBqy5ehS2ItiYaQi/whGI5wPyc6LoFdnNH3UWNDsOL4YEajTgI3L+kn +xYkPw3zS107KJQmcvU/J8TYaBt2+IGDObcEuT4cnSl4Og19+Ec9imMDND9nS +07kjcLly9MjNUSoWnZ2tnSsfAVb7bJxKAxWzwDdssX4EWiuGTVpzqTinz6Vn +XTACMneGGp/6UfEVpln2VjUBuN5eE9NcEsesVLqRTroAfjIOrXm7TRznxD9y +97w+CrHr7LTWMxTsXuxfVJg+CmcDz2Z5AAUze4w2FvJGYbvlcQVFDQpO0W3N +iG0eBVI7Y6dgUhSHdVD4OVvHQCRA2Z2MFMWWGp5HJpLHIOhhkrfnnyJ47I22 +ccDv/4Gn3ZYNiQobXK2lAtkLGRMge6uTR7Nd4Sq9Pa5ekD8B93tMq4PUV7iS +qct7+ysmQM3CM2zj6zJ39qfDR807J6Bvim0Qk7fMfe3fnSAlPwnHTKpBX3KZ +e3J0y0ZuyiRUBFnvEPAWuVfbvca7rkzBakLuvEL4PLe/ZGfVgXNCCN7TNz3+ +j2nuB1bwbnW2EEpuyB0qWBJyX7+pu7slTgiDhybEM14IuRnNPsEdj4WQ+tTq +k+h+Idd5+Pn3gQNCoP36njGq/5nLk7b+/Q/HaUi5e6G3kTXJrQsK+k3CYgZM +rVnFJz3GuA53BxOmOLPwvs+qtfZoP/dBdlKV3Z0vEO3Or5EwfsQVP+MvpIYv +QOMek3wjsgM+uuc9ORGzBFLKQVNuQ6PwgsE8u+y3Ag9V/KbS7s2A9j21ccJu +FTj8tNgUWIDVsJhvBfbrkPPectO2aQWmVreTuawNcIxo8md9XIeHv8W3b9cQ +QV7GaUclI0UQ59D7pO+0RFGAzT6yPJiCyMACs1p5CpKSLhqxZYmjN+Yvq8qY +YshpPPDmN3ka+ubvZuhIiqPJgvnurEYCiRKt6Xu+iaMDkXTdFB8JZGgdXGMj +QkOT5YPsTc2taLW3cFz+Cw3RbUM+RryiI3O/Rs6RJRoK9ezSvVZDR8lrI6zY +VRqSKdsll9hER6rM7dcXKATqLk0NSOfTkZXTdZ02WQJ16m/4PJuno1Sely/H +gEB6Vk4vGvYwkG79js+S4QQ6WnLC+34GA11wME41u0QgrbXEkTt/MFC1wOFg +xBUCCd42CW/mMdBJseSkiesEQko2+dHlDHQRrf3QeI9AvQkKzS5tDNRYyfeP +fU2gAEmF7k1JEsnYzMtXYQLpHjAw/yJNIpcu8s1CHYHcJdVBoESimWUL0vMD +gbrmfhmv1yaRgkHpX2b9BBqpPk/Gm5HIve6TY8Qwgfwn/ahhP5Moz35qo3iM +QFvsJW96/kKig8Hqx9RmCETRlj2DXEkUJ2q67DxPIOd3c/d/9CJRC+dUFmeZ +QEvap0KYfiRiqoZaNa4RaNf5q/20f5HIo4gzs7lJIFplTu+XcBL9FzlvMKI= + + "]]}, Annotation[#, "Charting`Private`Tag$7504#4"]& ], TagBox[{ Directive[ Opacity[1.], RGBColor[0.528488, 0.470624, 0.701351], AbsoluteThickness[1.6]], LineBox[CompressedData[" -1:eJwVz3s01HkYBvAxg68UiURyyeVoNzbCIuR9pw5hW6xbKqlcskunEro4ROWS -Vgwht7WVtlWaUGJPiG6kPSI/xmVcZphR1qKIpmbGrP3jOc95/vs8hiHHfcLp -NBrtx+X8314Vdko0mgjCI4mnv78QTl2YOzomJwJOS1Bxha8QyoLYb18wRJCR -LtaU/CSEGTXjkgwiguBzqiXlnkLIPKu6RWO1CO4JA4c+7RLCKw+hr6m+CFjV -k9uuOwiBOZ37+24nEbSsuOSrs1EI1lYztkVnRKB/JyajZEoAlixHtz1iEeCJ -tHL3BAF80goIjIr7AkdTC4rCtARQsodzQGf6C6h3bQ3ZVT8O+6KmXWaOfYXM -77k/a/qMA7/irbn2+6/g3OBYeHJxDJIf7148EiWGWJhT0ysYA3rKd4+8/xWD -6lMtepzDGPxwmnuSFSaB6KIjTonv+MB23qixMCGBBCsb760sPnAsrB5UHZJC -XVX9nwZMPoz133FV6JdCRn1iUucCD0jAX01Je5fgVKKWc/xtHsxLrlp7dy/v -zRKt34J5IDqtmOniL4Nyma2xVJ0Ho3dHBnp7ZeBX6RUxkz8KbYwdGiOmNHwY -sjjxi8YomOny7o5H0DDXP2NoNGMEYtoFzLxbNDTpzbMxURmBNp6Nx54JGio6 -fE3vzBgGlR67jnemcmgpOx5ZvGoYbINueBmHymEC7dQdeskQHPUM2Bl9Sw4d -7CfsHI2HILU32jaSL4cys6eP4uq4kG2Ptyz16Lhy2EWr0JMLtxX2XVwRTMfW -OuX897xBuBExePhKMR3NBXn7dyYOQoX17RrjITquv+nuo792EK5zTRLSdRkY -sN0si101AAnayq4FgQxsrD2yMtxvAMKaHc7XFzEwS6l5cnq+HyzFbxsuchjI -CnKyNy/th2l13Wg9dXk892Zfir1bP9Tn1Vxr95HH14XbDhyc7YOwSnbTxmx5 -5I6or0sp6wN98wW/y13y2Og3uZnh3gcNzPKpMhUFxPjzbAMxB9yt5aXJ7go4 -/vKM16VqDgiyqpPiLisgx+3kpcuHORCa9FxOs00BdX2y07LXc2BmwHChVUkR -77U/Mwzv6IVINetQV3dFPJaVkxaZ0guvuXe7TqQqIn9qQ6OA2Qu2a45VsVsV -cZWtRmaEuAfSuNeu5DMI6hkoyNY19EDb+dgJDyDoVOh4LjyxBzRzS6vVkwne -X+InzTr2gKudWXxqI0GJZmbMVloPaG+wCrvaRHB8V3fOtzIK/lmy97zxhGCu -l1674RIF2a2uRk0tBAMKai+oSyjo9w95/ekFwXidXw0XPlMQFVukE9ZB0CBn -Trl5lgJWDWnYMUKwIqY0LnyUgpB81T+8RwmODmndPzRCgc1ZzexgHkFLzhbZ -/mEKBtA4NH6MYHGs0ZQPlwKjLueVDyYIehx8Ocnso6B2Jm6/4SxB/5vGSSad -FKR1J7hYfCC46WY3GL6hILDuosX2jwSNgie19TsokCbmMPbOE3T8hrlW+28K -XFXYlazPBE3mwEKljQLtjw/zy0QEHzd2P1BupWCq53HSvS8E0zMfeiq9XPaX -vvJ9JSboF+nTyXi+7E/u3M6REJxWU66Ve7bsD+NsEkgJfpim18haKFB0G14z -t0Rw8c22Vmnz8h8zgVgmI2h6oXJe/ISC/wCn7Uwh +1:eJwV1nc8le0fB/DjGIcIZZeVUWaJNMTz8GiQJxSKZEQaoqiMlFVkFklGyXzo +tBDKrO9VSUI2GdmrjLjPcfbB7/79db/er9d17td9fc/3872uLR5XjnsRCQSC +CQ+B8P+nZ0ny4toaCdXXrh5s3swESc6mrfu5JBStYDiyXpYJ9YcKTwcySaiq +dXHNVpIJW4erv80vkVCFPKWvT4QJsyITBf1jJNSgabD0Z4UBft6GjuWfSegt +5+r8rlEGhKkPoHMxJPTuWvusZiEDHj9RTfkuSkJFXdJ8X/UYkDMSe+WYkADy +84xGHcZ0kG63s9GU4kfdz/cVPD5Lg0ZbuwPN6nyI8nZhQOTpMlhoql9XVeFF +hETWcEY3FYyKTxe17SCivY1UBaoWFV73iOu91SaiESP/XmMNKiiv1Fc/3kZE +hna+hFh1Kgj8q/vdS4mI+ry+v1JRpkLn7xUqR5SIziZ33r4oRQVv9RwzjT88 +KERZku8vAhUeZ439jHjFgwaST9wT+kEBdvw5CX1NHpQoUX7nfBwFiqOufNFS +50Gi9xrqlGMo4BEWHKS6hQf9U9DydDCKAk3+8YOScjwo29rt9IkICjx2LC5g +CPKgVdOCebcgCuzbSjd4/4uAlBJDvOq9KBD8MdregkxAu+0a7QbNKaBTe1/A +7D8CyvhycqrZjAKjFelV+3IJiM/wzqEPf1PAgvxcXjuDgDZlL98i76eATNL3 +yfWxBDTxNGgkxYAC705LBXSdJyAuk05GqhSgMf575LqNgAI3GvHF81PgVGxl +epYqAVn8Toro5aUAkm3KHFAioFSJrZVqRAok7lt8ekKWgHyuzJ5sWMVA5ea+ +ImshAjLfshynyMQgl/vEN7R3DUgy/fWqcxicFPpTYuK6BiLud0LiO/H1WhIV +1SfWoKlH+bV4BwZ/juytMrRZA6tHzE8ZbRhEJd5GuqZrwA779rS4BYMyMZkO +BZU1qAg7vRtrwEBU2pSyMrUKBoV82l21GNSrpOz64LsKJz2DNSSfYWDde282 +3WsVht78KwKFGPTFxeX6u6yCcH6Lq89/GMwvRYioH12Fed7nJ1vzMJCAK5MJ +Oqtg327SXpKFgYfz0VSnuRXQmzHKmU3B14taHjGYWIEeaq3L+wcYBH46QFg/ +uALEjUdepiRjEK9p7IOaVmDiC5Vz4D4GbxhaB7a9WIFNck3FjXEYEFIFl5cv +rMCf2mxj60h8/WG+F63uKxAz+nn+SASG52vNjey4AkfO5VofCcdAw4PR7Gyx +Ag/5wvWOhWJgozdd8GnbCphfcX4VfgOD7JbPdsnTXPhn1STuzFV8fQQIeQ9z +wUpH7EK8P14vg1ow7+VCtg8ovPPD4MvjMm3GFy7Y53vKSF/B93Mhj9e1kAsO +kuMxzEsY7OcPL9c+y4VfBvKxlufw903fE0o+zYUnzWdlXnlhIP01y23Zngse +Bz//swH3UmyN8PuDXEgx2RE44YlBkQjd03obF7a6mCY8O4NB6gJfTZkSFzr9 +C3cr4Y5slRCXkeXCQuXupEx3DE4n76wbEeRC77ZHtmluGGyU9JX0n+XA9cZv +x0pd8HrRbnr3jHNg0kTwPxPcCz3xaN8gBxafKb39fhqDxnSyD7GFA2otQ/J0 +ZwzeBld+OlfPgap5keD7uPOdGmSb6zgQ3qP+RBN36ObJ+oevORBobvbPhVMY +eHMpm5iFHGDtG20Sxu04xON/OpsDx8fz1MqcMNDPUVJQT+JAqNG4PQn3LxXn +gHd+HEiIN5rtOolBL69386aLHLiKkMl93J8ng7eEn+HAWZOTAVa4s4vSvh8+ +zoHDgq6PW09gkBBTqPrqCAceJT1PTMUdfKHihrg5B3b31fq44LbT6lTvN+DA +grgQgemAganw2E0THQ6oSxpWfcO9fX6xI0+NA68F1l3Ixr35++o2AQUOjJ8l +bQzELVi8PsxbigOlN0qqbHHT78t3t67nwG2PGNftuCeuaGsZCHBgj4SMgBju +dlujiPRVNuie+v2GYo/Bh52WvRw6G4wnE87243610VHHfZENzaZJyp9xZ1LP +3a6fYcPI1N1fJbjvdgf0aYyyYfcuIcjBff1t1PZ7fWy4frOkKAX3mbSHUVg7 +/r5VqfxY3NZB+QMO39hwgT5YHonb2PGNXs1HNphnFgyH4tbch+4q1rDhy+aN +6v+39Ka2n7fL2PDjXVtcOG4+zpD+zAs25L2MEYvGjQ3Ox1oVsGH88K+qe7iH +6zjDJU/YYDmbH5uJu+XpOkPJVDZ0C/hEknFXh8klBCey4ZA2p7AGd5GbxtjP +KDYk8wqz2nCnmu7ZYxbKBitXp9BfuHkbFoeaA9gwXKqcz4vX66oVOerEZTZU +5iYPbcE93u6uPXaODUTTw/rmuI+dkOu85MYGLG0q/zxuNNgRTD/JholnYvpJ +uPXOxCtF2rKh4JrPeDVuUR+OT5oZG47aXnwji///oVi5xBYjvF6R53r+xT0f +6FPzUp8Nz97aqkfhbo4cIn1Uxfej3mjHxW1ESiu2ksfrt6V5jwneby8SrR16 +JdngQy46Hok7Nh3y5/jZ4O9I2yPhiAFDPtgycJUFaZcZpDO4z+XrLREYLFBa +XpQrw33wdZ6J9C8WVF/mF3PF+71C/9Rk7igLros3M6pwq1VtTNDuZ4FFVJ+u +DJ4X4uc7faZNLHC3Mb03hNvfwji8+RMLgsgudQfxvI1+X1Y/UcuC2VGLA29w +Q5/XtUuvWLDWb+Cdguf31p/Domn3WUAkfnUPdcVg7hrhrXIMCypXisgEfB6c +YlU5vwxngU8T75kY3Pv4tJ4jPxZI+x3dkYPPD7qcyIG54yywLX6SzvTAwCun +fjbAigVyfvVV6fg86lYLfUA4wAK3m2wPo7MYlO/4MyxlyILUic1u8fj88jvY +fsNUhgW/VSasHS5gMNIUq9wsxoINJcIbNlzE+9XW7KuDIAuQ3IeAdty6zmWS +l1hMCLP7anAKn5ezfqkljwaZEPouYDjzMgaeWY5TszlMkAsqGmwJwCC5Ysak +K50J15x2JfYH4vlqCUyrTWLCZ1WR+tkgDDatpB5ODGeC8MfEwU0heB5dOp7r +ujFhQe6rRlkYBn8pHbnsp8gE4gc4/DEWA589/Q2O0kzoV2A9lI3H4LHNBSUz +USYMPhAtu56AAS38bvuGVQbYVNsE7cfPn1ejn/TLhxgwHK1dypuKgVz+fgYt +iwGvzgWb3cnF4FBNk81wKgPEwx4TtfLx/HY6kRsSGXB8pHy6pwD/HmKwU/ot +Bnz1EtI1wc/Tu54VtXtPM0C7LdriSDEGy2q6ETc3M8ChIS/a8z0Gbc8UhXge +00G+UF24ZgQD9wXEcz2FDntuFnXNjGFA0fdkT8fTQZQn4+2mSfy8+/BsruUm +HUD11EDSL3z+duu1ZrjQYTW6Zm8VhueLYP5QbwsdirW05vjx+8i1Q1MJBXJ0 +EFrf+zGGRAG+xJgo6Y10CDjuThJbR4FtMi0BXCId7kX50nTFKOCj6+DYOEmD +zQtkzms5CtCdziu4k2kQ9ehaXe0OCsTkCEl35dIguGC3Xro+BWSnXooeyqSB +r+fklWBDCuz3W1rTjqdBhIPHpX/x+1PE3RvjjEs00By8sWZ0mALryhOeJe2g +QchiiMJedwooipTuhHfLoMyOUxhNo8DlSY2fScXLMHl0frjtMQU+1OXddS9a +hoq4E95fsyng4vtwkCdtGYYSffhaiyiQ1RoYfSBgGXS0+I4aVVJA7oFJ/zeD +ZRis3vg0vZ8CktLNEd2lVLjo1D/7Uo0KZ/+YaxeSqeDjtV2KrEmFioa6noBc +Kji+dD72ejsV7IKKtWSSqdCq3KjTtZcKKX0Pup2uUKHObLDs3lEqiD1x1BjR +pYLgKTn7xmAqrFOebvv9ggKOEfT5F71U+Jkl2DyaT4FHFpzyzz/x+7OcdsMP +fB/uHdnvp8epYCvhV/clngL5ygqtVotUSBNgk/O8KWBskuD6UHAZVBbW33bS +okBnr627msky7K8x3PXtOd4XZ0G3Aq+LyB7HHQi/d1lrj2B6eN2Gy0O0KjMx +2HXyXlf1+2W4/RqUC/F7k43DTv2llmVozLVcH4nnUPpRhiE2twz2MS7TezXx +XEjXRNnp0MDHPjqDTF6CpiekPLlKGuSt1hho5S1Besjsy2ygQS95qfVl5hK0 +z2ge0mukgemKM39J/BKcHeP3vdFPA8ki/atvfZZAgJdxoZBLg/eMEatPekuw +7rr482sH8b7eHbBa6b8I7Zn5VT5jdLgbP7qr1mMRHKd/7nw2R4elYatLH+wW +gZxi+XSJRof6GJW+esNF6HgzkFu6jgG+/W1vOlh/oNRs+MPMLgZ8uKXlNRf5 +B8x/XOI9hOfO/fNIs2LKAkxZkPwuHmbCYROm11DkAigmxLVW2zNhe6U4Ict/ +AXarxjgoeTCB+8Jsl9yxBVBYX3dRK5QJGSkFWRLiCzDiUPfoQAUT2s+c9xW8 +Pw8p/6q6PN/KAjPCoiglbg50XLEsSwU2aISQnpfemIPiHRtvxumyQXxZyfzK +xTl4oHfj/oQJfu7N2AbNW8yBY3+Q+IwrG0LaykamSXOwetKvWi+fDWXZgaWD +0bNQdW15lKXLARWT1WNfIn+DkvmTSz+cudC+wUQn8+pvaOy7SfC9zIWw6ZsC +vp6/oa1u4ZhSJBcGklg1kgd/Q/u9B6yBIi48HF9WPSv4G+bL8pQrqFzgi52j +EZN+Qc2rzhyFhysw3dmXaZo1A1FbVD5emF2F1Gcy1yXvzYDAhn17+HjW4J9b +J6x/hc6A0ZL8n88ya5Ct3k1MdpuBqvg3e98cXIOTwW2XRlRmIMHDWcWqYA0a +FRpMwp5Pg0hm5tSwPgE9v1A+VvtuCgJsWupm+XhQt0eOklXRFEwLFYlRJHgQ +wSXBZeDRFNxdcWmUVOVBJ4559jOvT0FmzLHzr814ENFIosPQYApc0ZmL+hE8 +6JTwNVRSMgk26t1JDUQiiuZ3W/0rZxJuRb6/WCBBRKVrR4xb70/CutsbGDlq +RCSwrFI17zsJsymbXVmHiKjsZ2eJps4kRL41ohreI6J1xfo5BeQJqLu63VxR +mRcZkhWH9DMmgB4rdFTegBe556/b/ClmAvoL1K3+PsSL3qWNp42em4Bwl8kn +NB9e5BGecl9BHf/9X97y2+t4UY0tJTQ9bxz+K9rvus2DD3lT35xOeDwG1qSX +n6zb+FHmbmz/+fgxUFz9VWY5w48ab+htNg8ZgwMcSavANX6kTijpZzuNAflW +9NNzegJoVOTVCW+5MSAleXqVpwogh61FtpYZo9AVtfNa5HkSiro4tUM9dhTe +JAcd/HmbhMpeqYnxBI/Cw1R0/mo2CYkbFHyvOjkKMs/sne16Saj579wjGjKj +UOWW3sGxEESRZbviRHVGIEu4Xj/JSAgN7y0/3CA8Ag0HtnkynISQMewUCJsb +hk6XqL3PbgghevP2OwsvhsFdQtt5rFoI+UxphLZoDkNGE1Gi32QdcpRV8I/f +NgQPGMWapfbCaHsYv5OA6iBk5LR0fviyHm2qaU//xTcICorOPywW1iN++pPe +pukB+Cug8NpOKVH001ffPunFAGANXgGq50RRvIubjaz+AEg41S8Ui4ihGePq +g1pm/SAnsfz3993iqDM4KkpEtR9EFAQu9R0VRx8qbD7/4euHac3S44pe4ihN +Z9q0vLEPvIotSl1SxdEBeQljY9s+sLvNx/xEE0e5HB99a7cfsPX8kACrfgNK +3LPXX8/sB3iZiwQpjG5AQdd4Szeq/gBMgCydyNmArOcydX9M98L1zLbAfw02 +opWBBg33y70w8/SY1M2ijehUjbLS1dAeMIc3MaVZEugQfc7F3q0HhN6zS0Xf +S6Cd+pVZu816IHD4gnfLkAQSfHF0E4evB7T4PjJ9lCXRu8wQqajEbigRCQn3 +fyGJJG50C6c96QIGreL3li4pxFxjbVgM6YLLSv99yl2RQsN3lWQtTnXB8AYl +ermGNCKnequxZbtALfm2bUGENPqrlGDimtaJz/8dOSt7ZJDanq3mlQGdIOKX +/SjwvAwS+mBlKe7QCbcxk4mn6TKouznN4ZNEJ5C1Fg4JsGXQxRmdy1sfdIDd +PzlRL7/KIuvLx6+H+3UAUX3bMO+KLNpFCwrps+kA7VtZXC0DObRK/Hw3XrQD +woV2SjPz5FCqolPOn4R2qBO7nyMTvwmFvVyX57u+DSKTQMo8Th5ZVju8Vmpp +hXeqSRipVR5Jfs2t7ohvhe/l2posCQX0fHx3p6FgKxRK2VmGFyigbjlP3lXi +d3hqYlay1qGIcrYVi5V+bAG6jqam8BYl5G3I2uwR0QILYS7pMf5KaM02aVfD +SjNoN/H1hAorI63YWq/7zCZIexZtHFGjjGiPBK6aVjZB6g7iffdfyggVHAuj +BDRBK4G8tFVmC3KAmbQT1G8wIrwmEhm0Bb0/alQXuOsbnC23uyizXgX9DzSm +DvM= + "]], + LineBox[CompressedData[" +1:eJwV13dcTf8fB/B7U93WPffe9qAtDQ0kTe+3hoaUhFAS8q0ISdpGoSWENKwG +kqwSWUWSjAZtaWhpaGrc6t7G7/z+Oo/n43M+53w+5/H5vD7vo7T3yOb9PBQK +xZBKofz/ii8H7AUHvsIO3Vfhwp/V0IYaZXlp+zew25U7fPe4Gq6IjX53264c +rr/ILzMuX4rLB2i3lKPLwdDy5EJY5lJU2xgTlvWxHGi2wZVHQ5eiLCvW8Ilp +BXxl/ub1Wb4UeVLjnhXpVIKF1k4FRooq1mVfyGoR/Q49AZGuo3EqWCVEnPNw +/A7HlXnPZBxUwS++F/d1n/8Orz6be1baq6B7ijUzkOcHCCjcCIhjqqCzm03l +ibAfUEcZJDbfUkbTblvrC4eq4V6sxm2xb0poJBFn8P18NWg5qOltylNCg/Xf +lrJyqoHH9OFgV4oS6mXb8V7rqYaCUvM5QR8lVPXd8OHm7hqwzrPOUKYrIX3C +3uSRUy2kKq0sNdyniMxfK/cF+dfClp6uq2c2KqJ4sfR586u18GHhdLKMoSLK +xnf/+llXCyIVq/9TIhRRXTU8lG97HRwNTvw4FqqA5lsevnZ3rwfrIVOvPZvk +0cr4cofGqXp4z7DvVNGWRxvFIMHJtHrYU2n+aquQPDoOmu8431EPQksMMxc+ +LUG3s7+mX3o2gJEun7ah+RIMfC5oyDrYCMHLjPcU2i/GkOsju1vON4LkxjTe +dN3FGH66Pvr+o0YIUSvf91N0MZ6xz2g0G24Eg2Dx7nW/5DCh2zDowNGf8Ff/ +4cFaXzl8KO5d8DGoCabW6aV2pslie0CZfuDZZtBbPbT0iIEMtnzhk82+2wyG +oUEhS5Rl8Odiq4Wm0maoix6wmqfL4I/Sj1/N+FoguC3n8pYeaSwW/+DOF9UC +0vxE6rpUaUx7/jYmMboVQsVdhq7SpPG6APdQ2f1WiHxzxlaeLYVJbsbO059b +wSa5Jaq6Wwov8r5e4ibQBkFeq5JzS6Tw5JaCZyqxbZCSkKFmcVoK3SdyW57F +/QYQlvVx4pHCnTajH7pzfoPLmefheuOSuPWm7n3J8t9gFHxHeUW3JKopNxoW +8bUDu/99wrUySZT/tnWR0vp2GN7lYNoeL4mErHNKX1k7BBIRDVoKkjj8emNJ +0JcO8PTNmdu+XQKXCn4OCGvsAKeSodjojRLoth2XnerpAG0bodPfzCXwG3tl +fBRvJ3T6PG6N15bAe6ukt13DTrikdWh4bhF5/+PO/mevOkHsz+sRr+fi+C09 +iDWc3QXqZmv8tJXFkTo6+vHfyy6QqHmfcFlGHA3hQOBkWRc8cT3+g5cljlmt +bs2z3V1wdXWAqjRFHCNkze8JK3VDSvuxwOE2MTRMFDHSSO0GE7vZ92ZpYpgV +neHhGfsHXPqKVVI1xNAj79DTR6l/gLGCPs1QFkPZZqP5iQd/oKOxwjlRVgwv +6tTcOPftD2RscFH/JCyGgfU8jVnCPUA9KyhQOiyK61U8N/Zf6IEQLeWqJS9F +seedmvHhK71grcL9G7dJFNP7xmIKMnth97W4qRN2orhT9H3j/LNeCHqc5RJm +KYpV+12OX6rthYr1DUWJhqJYIBKTmyveB3UNta2gJIpRO/vVxpP64NAD7/n9 +Eyxcyn4oFnyjH2YGiwv8Mlgo/clJ+WFOP6zfJLKj5SYLhRKn9Npe90NptC6P +YwoLR1dYOFj+7AeRi/+tsb3EwsJDv2KYEn9hauHLz0snWLjlj8B89sW/0Du0 +65GrKwsj6/b3NUUMAOFdeDVdjoXH7whPiVwegCj5QwKNUiz09s/jw/QBqLFk +aYiJs9CBOaec9W4ATn7+a3NThIUy9om7/LkDILDYieffHBNzP5bUCB0fhKZV +N5JvdjCx7ZlCkYn3ENDPyA59eMTESkN/TeWgIXgr4cf7+AETC9+VJgtEDUHv +lOuVm1lMvPHNx7/+zhAoSQhNxaQzcXtn/rIjv4cg8f4azaREJlazbK5kbhuG +w2scksJPMLHUz89L0GoEvPuZcw6bmZjPLqkbcR6BHa6W5YWOTMwMlzBv2DsC +Hh6qm3Q2MjEi5s3iO6dHYMqpwXuxDRPXpvPWmBaOQIpVhqXqWia2eNnLv5IZ +BRFnF+M2TSZuTW6PGUgYhWNZh9Oa+Jl40TqfTk0dBQ2WtXYULxO/TJ27Ipkx +Cm0mFG8DHiYab9e6uS5vFDa/PnrLgstAeZnAp8nVoxDDmLth3c/AvuvCDRai +/8Bhrlw/vYyBobcNVG5e/QdD/B9lNkUxMN9BMDvvxj+43WupGRHJwMH55uWf +7/yDCyfL9746yUD33REGY/n/QOOcpqZREAMtFCtsber+Qc65vRpnvBkokrnH +b0J8DK5kStetsGfg7XvxRfZJYxCexWCVSjEwQN0+s/EW2V58pO63OANtHwpH +7703Bk4WTxQpogycyI3bFPx8DM6a1Js5iDBwQ2FM152aMQj2kh9XoDJwuuas +IJcYh/5tbtmJAwQ6UU5sfRA9Dl9009vTPhKodsbUWP/SODxOEy4y/0DgLN+s +/PukcRA57RvZ/47AbOGwvrp745BzUrjA/A2B85IhYZTScQis1bBUySMwR/t4 +hgtlArp9bLRT0wjkdT00xBcyAezwZ4TJKQLlNmxTXBUxAYusNPs1ThC40gSc +PWInQLU7s3hxGIEecqzXb1LJ/rnJzkQQgUXNz88eeTMBap7GUYpHCAx0m5Vr +4k6Anv4rubndBF6w/+PAzzsJaflJNzTcCbxrWhWxSmQS4j3Kvu9wI7B2cXrv +hcWTUFbXYfFpO4F6rRb55maTcHXjdNdnJwL7d523e3RyEr59cfEItiSQ4hBw +oilqErLKLHTazAmUXrsrl//SJBDHLh62XkfgenldyT1pk2BTf8NAdS2BmW01 +HRLFk8Ae3xfMb0ig227ZkFNUNjjGDxw7sJzAKo8H9zefZQNzp+ZkkhSBkSqn +jCfPs2HMJEclWJLA1T1bKpOvskHZ+9OIqwSBNw9Sxlsy2ZDvvmablhiBBwNd +1np9YEP8wHPRfoJAgXi++rB5NvBlNQm18RNY6NDsJc8/BcpZT1t6+Qg8wsrj +FNOnwLJ5h8oEL4ENSW6K/EumIMb0MJ/4IgLvZeQfTDCZAs4xpSa/BTqav9zD +cy94CvCD4+Ob03Rkh6y5Zn16CnL0ap9UTNHxgSld/W/0FLwKyFyYZ9ORWfJq +o27yFPy3aHnUgUk6/q5gpL5+MQXLCz/0uY3RMbyzSLdqbAqeVk7KPR6ko969 +qyV+nCkwPzorRCXd5eWzVYxnGtyMn6u5DNDRbkg8bDtrGkQER5sF/9JRevpg +WafuNCRGGPLG9tLxBV1215TvNCQ4BsQOdtKxR2t92rGAaRitUqLuJy1t598x +EjYNfwQNjv7uIN8f9W1/X9w0vLvltupXOx0tF0IPN2VPwybMpPe20TFwyf3c +rbnTgLRAySOks01qx6pfTsPNnnDBmVY6CgdrBX0rm4YVpSvvi5KuGW0+9bZ7 +Ghpfyl12a6YjL0OgZM3gNCQpbns7/ouOBtr6vM/Hp8FmtVRJPOlUn/iYRzwz +MDZ2wr20iY4enaaXbynOgLhRxF3bn3S8QvGplVGfAX77qLMjjXQslb8mkaQ7 +A1+v96xKJr3MdSj14toZQH0bzkADHYdrb2WecpuBD6Xd0zn1dFQc+9rN3TcD +nOvCy3aT3sxkqwUfnIGV21qlJEi/sHd46Bc6A0537E2i6sjv8Wk+f0/KDNCd +HdxP1NLxSZcmuzVtBkoU8gOBdDvVxXDn/Rl4xhNjtYi0xdqnhZsLZuC5RxQl +oYaOQi93f7Kom4Fbg1tKiqrpaFp/nlbcPAO5kY89L5A+PP7S1rRrBgruPMxz +J12ty6zSH5uBpSdqrfhJ8ziYMvNmZmD8p3xcyw866vt6b9amciCX6nzsOemU +7OKGpUwOOEiV6/iQ/lY2KJ0pxYG1H83mrUjPdku7yitwIOkF21eV9G6lo78l +dThgdiNHuec7HRPgltLV1Rx4J9/x31fSJbu+7mOYcSCSt97yCWm160p9NHsO +5Ow98SWcdOrSoGC1LRygCmimepIWyasQsHLjwJF9+60cSJ82VU7d58mB9Pjg +ciPS45+DNCJ9yecXPNFYRvo/58rX6QEcUNPe6i5J+lebst37cA6s2/TWi0Z6 +44HgX61nObD+ykpLThUdiycrD8zGc0AqgBgbJq0focKVvcYBhci7R/6Qvi8S +ct7oFgd0nOzftpKWTamS236PA55hu2sbSV9UUX0U+JgDsreMCmpJU5+GmF57 +wYFGJ8O91aQDjL9X5BdxwH7F2/ofpPs+qe6q+US+v0KFUUPa1Sl0aLSSHP+D +epF60lUt308wGsj+FgaVTaTNvZcSOm0cGON97NBO+sV46G37Hg6UWN651Eda +/dQPnYPDHHC1OntxjPRNIbX3sWwOuOkV2c6TZiSFOWbPc0BAvOi9MDn/SKXq +32X8XAhunxiWJc1+pOb3h+DCG8/Gei3SPobhFF4pLhD2Tf5rSbd8rE5QVuCC +stzR0s2kNzkuU1q3jAsm2lJfvUl//BWet1uXCzF5VqdOkzb4r2bdyTVc8MwO +/pNKOuffspqbwIXr7dqc5/9fDwK1Y02OXAi1UdAYJb0oUf3MtAsXBvk8kEmu +n0CFk2JSHlzglVtOWUl6l4GG/hY/Lth9jjwWSvrHh5Ol/sFcYE8qqGaQttxY +t+XyaS5oZh0K+kpa0/PU8aoEcrzZmykK5Pq+PVLHN5TChQEboVX2pFlhmknC +GVww4s3nCSM9fbm+wCaPC5xezWOtpD+915ouqeaCw+S2oy/I/WW4ISKmo4kL +sXo6niOkHzU0SFM6uYBxn/s0yf14ZSjCyGyMC3p/PmdkkfaQ+xn6UnQWzAaF +HueS+7s2S1u4QXYWEuPGaVOk1688c2NCeRZ0iuv715J5oG2rU7hi1Sz4yaBZ +LWlO4Nm5h86zkLuJNU8n80aovmwIXGdBv6y/fSdp2VWCbbV7Z2GP9jbGA9JG +IxfecY/OgmZ1md3/8yvYK/nUhoRZ6Ji0UUgl843tkkMdqJgFw1Pebsdb6Mhf +MPjvZN0smDOiTzaQlhTX7RRtmQXHM2othmServ6RX2I8MAvfF2jrqWT+BtgU +nYkTnIOT1odep/+m45jhDz7N9XOgXlZqJ9NF5keyKLto4xyw1xU/u0BadHJL +j9PWOXjrrGu9qJuOK/KaykI852Db07J//0j7aXRFf42cg8hXd/Rbe8j8lGEL ++ryfAzfX/Tl/yfNlgCNHZBvOQ8N/Oo7N42SelUXbt+E82PuucD89Qe63y+Nx +4rbzkJ7e8FiNPN/01MtpETvmYegMWyiIPP8Ct4ZSd4bOQ67Y5nS1GTpScn9O +CBfOg+4WvR3F8+R8919rPgIL8KFXxKZRiEAvPapslvUCrGdJRmcKE/iK67u9 +xXEBPKoN+g6LEOh6xbLexmMBbOZ16cLk+Z7+frxKKWIB5t02fN3EIlBLdnNJ +bckCHPEMsmZJk+1e0XVyKhTkL7kd4KFG1gNh3uUqyyj4G1XZtssI9LtoW6Kl +RUH1xpDj+uoEwgvhXJNVFAz0TjsgoklgG0/CeVcLClYJWcp+0SZw8e0U8xv7 +KMjMqB48tJrAlLoHubJ3Kdh0ucT/sBWBCesq4mWWUtFB/Vn5Em+y/nl3Z1WL +OhXjz55/r+1D1ofGYb9uL6eibNHtg2sPEOitr6muqk9Fg/hLf/f4EojLYj7q +WFBRXz0sMM+PwFERS47FHiruMqt19w8h0PHnW6/Dt6iYmSpiG3yeQOLIQ/OP +EjwozMMbFk7Wk+8sXxUVyC5CfUvjhypkPTt3aLfBNoIX+/aUZT7xYSCVVpOq +NceLf3K+UK5VMNDAxr/EjsKPRsEmj/wUmMhpedQnMcaPNfcHN91xYaKl75eE +jWx+JHLVqHe3M/ECt8vwHIcfhy+97bi7g4mKsnKxEzw0nD9xftV9VyZau8Rq +1IrR8GHvb8knu5mYWL3/QMJqGqqnBX8q9WKiTpn8oFAIDW/9XMGQCGZi8Fbj +RPMTNDSsykmRC2Hih+6tpqERNHR74eioHMrELYsuxPfH0tDfqNBCL5yJYchd +/uU6DcdFwtc7nCb/R940HjpXSMO9P57cvhLDRFG7cYmiYhq+68geuRHLRLcm +4t1EKQ1faG32vRfHxJEpK8Kzkoanorf2vYpnouTq50/M22hY8TmlryOBiR6l +37eFdtLQ7Oq5xMHLTHzgPDCf10OOJ9zn4NQVJpr6KzsqjdBwoPJtKv0aE6Oo +a6e2j9Mw9N/sqHQSE38k7EhLmKJhU/Yvf9VkJsoqHrf+wqXhjpC1CnopTNz3 +NGFkYYGGktMstkkqE/8HP+3fEw== "]]}, - Annotation[#, "Charting`Private`Tag$39213#5"]& ]}}, {}}, { + Annotation[#, + "Charting`Private`Tag$7504#5"]& ], {}}, {{}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}}, \ +{{}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, \ +{}, {}, {}, {}, {}, {}, {}}}, {}}, { DisplayFunction -> Identity, Ticks -> {Automatic, Automatic}, - AxesOrigin -> {1.5, 0.308531749686184}, + AxesOrigin -> {0, 0}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {None, None}, DisplayFunction -> Identity, PlotRangePadding -> {{ @@ -10611,8 +15089,8 @@ t0Rw8c22Vmnz8h8zgVgmI2h6oXJe/ISC/wCn7Uwh Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All, DisplayFunction -> Identity, AspectRatio -> NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True}, - AxesLabel -> {None, None}, AxesOrigin -> {1.5, 0.308531749686184}, - DisplayFunction :> Identity, Frame -> {{False, False}, {False, False}}, + AxesLabel -> {None, None}, AxesOrigin -> {0, 0}, DisplayFunction :> + Identity, Frame -> {{False, False}, {False, False}}, FrameLabel -> {{None, None}, {None, None}}, FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}}, GridLines -> {None, None}, GridLinesStyle -> Directive[ @@ -10636,7 +15114,7 @@ t0Rw8c22Vmnz8h8zgVgmI2h6oXJe/ISC/wCn7Uwh Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, - PlotRange -> {{1.5, 3}, {0.308531749686184, 1.6767676219336236`}}, + PlotRange -> {{-3, 3}, {-9.025569240062119, 11.38875951526977}}, PlotRangeClipping -> True, PlotRangePadding -> {{ Scaled[0.02], Scaled[0.02]}, { @@ -11061,12 +15539,8 @@ t0Rw8c22Vmnz8h8zgVgmI2h6oXJe/ISC/wCn7Uwh RowBox[{#, ",", RowBox[{"Placed", "[", RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output", - CellChangeTimes->{ - 3.802667935498431*^9, 3.802668008801146*^9, 3.8026681942917852`*^9, { - 3.802668243660515*^9, 3.8026682587919397`*^9}, {3.80266839812646*^9, - 3.802668426727483*^9}, {3.802668528556148*^9, 3.802668573429961*^9}, - 3.802668806860057*^9}, - CellLabel->"Out[92]=",ExpressionUUID->"54f8084a-0a1a-41e6-ad4a-e23c2b5d4588"] + CellChangeTimes->{3.80381246824221*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"947fe042-ad35-4f04-94e9-b6cab7b10a23"] }, Open ]], Cell[CellGroupData[{ @@ -11864,6 +16338,4472 @@ solutions.\ 3.802669107262231*^9}},ExpressionUUID->"1f9addd7-b8df-4373-811c-\ 2771135ef044"] }, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Mono electronic wavefunctions", "Section", + CellChangeTimes->{{3.802687828189046*^9, + 3.8026878449506073`*^9}},ExpressionUUID->"cf56999b-9398-45ad-9683-\ +a6840742f71d"], + +Cell[BoxData[ + RowBox[{ + SubscriptBox["\[Phi]", "HF"], "=", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]1", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]1", "]"}]}]}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "y", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "y", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]2", "]"}]}]}], + ")"}]}]}]], "Input", + CellChangeTimes->{{3.802688805233779*^9, + 3.802688894867774*^9}},ExpressionUUID->"e07815b3-6cea-4548-a41b-\ +58f5157ffc61"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"c\[Alpha]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Cos", "[", "x", "]"}], ",", + RowBox[{"Sin", "[", "x", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "x", "]"}]}], ",", + RowBox[{"Cos", "[", "x", "]"}]}], "}"}]}], "}"}], "\[Transpose]"}]}], + ";", "\t", + RowBox[{"o\[Alpha]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]1", "]"}]}], ",", + RowBox[{ + RowBox[{"Sin", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]1", "]"}]}]}], "}"}], "}"}], + "\[Transpose]"}]}], ";", "\t", + RowBox[{"P\[Alpha]", "=", + RowBox[{"o\[Alpha]", ".", + RowBox[{"o\[Alpha]", "\[Transpose]"}]}]}], ";"}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"c\[Beta]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"Cos", "[", "y", "]"}], ",", + RowBox[{"Sin", "[", "y", "]"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "y", "]"}]}], ",", + RowBox[{"Cos", "[", "y", "]"}]}], "}"}]}], "}"}], "\[Transpose]"}]}], + ";", "\t", + RowBox[{"o\[Beta]", "=", + RowBox[{ + RowBox[{"{", + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "y", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]2", "]"}]}], ",", + RowBox[{ + RowBox[{"Sin", "[", "y", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]2", "]"}]}]}], "}"}], "}"}], + "\[Transpose]"}]}], ";", "\t", + RowBox[{"P\[Beta]", "=", + RowBox[{"o\[Beta]", ".", + RowBox[{"o\[Beta]", "\[Transpose]"}]}]}], ";"}]}], "Input", + CellChangeTimes->{{3.802754861518209*^9, 3.802754899399643*^9}, { + 3.802755531669859*^9, 3.802755568417548*^9}}, + CellLabel->"In[23]:=",ExpressionUUID->"4dbba78c-449d-4264-9a69-c05aa4ea77c0"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"P\[Alpha]", "+", "P\[Beta]"}], "/.", "sol"}], "//", + "FullSimplify"}]], "Input", + CellChangeTimes->{{3.802754904507367*^9, 3.8027549105744762`*^9}, { + 3.802755146870723*^9, 3.802755169716754*^9}, {3.802755211131271*^9, + 3.8027552115176907`*^9}, {3.8027553312083607`*^9, 3.8027553344664707`*^9}, { + 3.802755407624468*^9, 3.802755407947267*^9}, {3.802755575953148*^9, + 3.802755580711322*^9}, {3.802755691702355*^9, 3.802755723119164*^9}, { + 3.803109717202359*^9, 3.803109723942194*^9}, {3.803109860688802*^9, + 3.803109880840426*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"e81e0631-d79f-47bd-afa6-3f1e0056f6b2"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"2", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"2", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"], "+", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], ")"}]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"], "+", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], ")"}]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"], "+", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], ")"}]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"], "+", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], ")"}]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"2", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"2", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}], + RowBox[{"176", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}], + RowBox[{"224", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{"2", "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "+", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{{3.8027551614843388`*^9, 3.8027551700158377`*^9}, + 3.802755212705809*^9, 3.802755335338853*^9, 3.802755408379348*^9, + 3.802755582126316*^9, {3.802755692917428*^9, 3.802755723655871*^9}, { + 3.803109725989346*^9, 3.803109746121378*^9}, {3.803109861857627*^9, + 3.80310988192592*^9}}, + CellLabel->"Out[29]=",ExpressionUUID->"5f7e4e98-c695-4f7b-96dd-a4ee9689277d"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"P\[Alpha]", "-", "P\[Beta]"}], "/.", "sol"}], "//", + "FullSimplify"}]], "Input", + CellChangeTimes->{{3.803109906228863*^9, 3.803109907862094*^9}}, + CellLabel->"In[30]:=",ExpressionUUID->"365fa4c0-669a-451b-9b47-7b982a2792f2"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]]}], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"8", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"8", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]]}], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]]}], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"8", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"8", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]]}], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox["1", + RowBox[{"4", " ", "\[Pi]"}]], ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}], + RowBox[{"4", " ", "\[Pi]"}]]}]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", "0"}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "-", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"352", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"704", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "+", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], ")"}]}], + RowBox[{"448", " ", "\[Pi]", " ", "R"}]], ",", + FractionBox[ + RowBox[{"75", " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}], "-", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]2"}], "]"}]}], ")"}]}], + RowBox[{"896", " ", "\[Pi]", " ", "R"}]]}], "}"}]}], "}"}]}], + "}"}]], "Output", + CellChangeTimes->{3.803109908870942*^9}, + CellLabel->"Out[30]=",ExpressionUUID->"a7efeb2c-5ea7-4b29-aad7-cb84823766ec"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]1", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]1", "]"}]}]}], ")"}], "/.", + RowBox[{"x", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "3"}], "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.8026935477384987`*^9, 3.802693564315578*^9}}, + CellLabel-> + "In[206]:=",ExpressionUUID->"766d71ca-9033-46fd-b13a-c5d5f8035d8a"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"75", "+", + RowBox[{"62", " ", "R"}]}]], "+", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "9"}], "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}]}], + RowBox[{"8", " ", + SqrtBox[ + RowBox[{"7", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]], "Output", + CellChangeTimes->{{3.802693558316131*^9, 3.8026935648052588`*^9}}, + CellLabel-> + "Out[206]=",ExpressionUUID->"6944254a-bb87-4a29-a8f4-b3f49f370599"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]1", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]1", "]"}]}]}], ")"}], ",", + RowBox[{"(", + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "x", "]"}]}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]1", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", "x", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]1", "]"}]}]}], ")"}]}], "}"}], + "/.", + RowBox[{"{", + RowBox[{"x", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], + SqrtBox["R"]], ",", + RowBox[{"-", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}]}], "]"}]}], "}"}]}], "//", "FullSimplify"}]], "Input",\ + + CellChangeTimes->{{3.802751567570483*^9, 3.8027516108613577`*^9}, { + 3.802751710829711*^9, 3.802751713229548*^9}, 3.802752436753378*^9, { + 3.802752485716928*^9, 3.802752489780205*^9}, {3.8027525452703533`*^9, + 3.802752673768641*^9}, {3.802752899162148*^9, 3.802752902844163*^9}, + 3.802753176251533*^9}, + CellLabel->"In[28]:=",ExpressionUUID->"659579a2-0489-4b51-943e-23e2100a3cca"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], "-", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]], ",", + FractionBox[ + RowBox[{ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], "+", + RowBox[{ + SqrtBox["3"], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]}], "}"}]], "Output", + CellChangeTimes->{3.802752674314747*^9, 3.8027529065656147`*^9, + 3.802753177010346*^9}, + CellLabel->"Out[28]=",ExpressionUUID->"7ced4593-1d16-45e9-ac5b-217a2e032985"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"Plot", "[", + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"-", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], "+", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]}], ",", + RowBox[{"-", + FractionBox[ + RowBox[{ + RowBox[{ + RowBox[{"-", "5"}], " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], "+", + RowBox[{ + SqrtBox["3"], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]}]}], "}"}], "/.", + RowBox[{"R", "\[Rule]", "1000"}]}], ",", + RowBox[{"{", + RowBox[{"\[Theta]1", ",", "0", ",", "\[Pi]"}], "}"}]}], "]"}]], "Input", + CellChangeTimes->{{3.802751613861528*^9, 3.802751647112741*^9}, + 3.802751727462167*^9, {3.802752292819254*^9, 3.802752307115636*^9}, { + 3.802752493914497*^9, 3.80275253814194*^9}, {3.8027526936587353`*^9, + 3.802752694509098*^9}, {3.802752911244379*^9, 3.802752915242144*^9}, { + 3.803109656850216*^9, 3.803109663522086*^9}}, + CellLabel->"In[22]:=",ExpressionUUID->"a3c9266b-25f5-44de-8e7c-cbe2eaaba4de"], + +Cell[BoxData[ + GraphicsBox[{{{}, {}, + TagBox[ + {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ + 1.], LineBox[CompressedData[" +1:eJwV1XlcDd8bB/A2986lUlRkaUffQqVSUZ4jFEULKlQiFRWlnRRCCymtfpVW +tJA27QuTdO8kSeqKXC1DoZBKRUX9jj/mNa/3HzPzPOd85jnyjp57nQX4+Pi+ +4+vfXZCc3/pR22vL/uPBtz2qaHLV4OPNMvHmkGiXafTP08VqTl1xDqB4ZaHm +KeySSXgtXngcGoebj7tjD0ic+F0R5wnHq9r7T2Bfl24SKaz1AVVizX1n7Bxl +uwy+wgCwF2uqPIpdrzOivi/zHPiJVojYY78zutKQHXcBlpmO5tv8+56KsEpQ +QwjILAuMs8QO39DpnV17GULeWTwxwZbYlFnbWhYKPpN+utuws7a6Cf0uCAez +j4O/NmGv36W1Rz73KiTJF8xpYNdazCaaZEYC06DeXBn7tUPcmrS4GyDi/bZp +0b9+NNfrfmTHwLd3PaMM7ACd+PcBDbEQRuocm66kSSGwX5VVGw+nJPtlerGb +DRueaVclwCk1Pdc27FijNR7NZYlwVap/ph5bxmy04mfB/8B9KUxnYPdbWttG +3E8CY+1R52jsfKvauRW5yeCp+Fc6CFvXPnSnUeYtKB9bbWuFvfek9LukuAzw +39m/da6CJoV1gbxpnAmN18NGPmOPVHuJ0+xMYD29/vkldsWjznK/hiwQHmou +TMPexs6cTa+9AyUderfVsVcbd1gM6t0FjQVrEhZjz382745m1V3YIRfaOlFO +k20tbsZNZdmwZt2tFVXY9lytmNGCXDDf5SSjhY2sj3/YvDYP8m+K7BfHVnqb +rBV2Pw+mAnTav5fR5BBv9u2y3HtQnC2Zdxc74GOT/PbMfBAY2lTDwo4dsyu9 +GVcEAsnGgSUPaTJKMkW/XqQYLu4t330Bu70kVFZ7bzG8KMg13o1tO2Q3IMMr +htWjypUfS2jSw3aB19i3EtiUygwmsBMMTkQki5VBaUpl7n9FNNnVtc9d1KoM +hoaNhIYK8fr7g9nl5DLICEq9eg87t1BK4pRCOexkPxBdjV0jy85AWhVQP/xJ +QLKAJnv5FSo/21TBRe3lSc33cX/pIil2qVWQtOjg5WDsE5umgl71VUGOUuH/ +1LDHvNsMa12rIQOVbY69h/PRf741+lwNmCq2eZnk0aQKhzegnVEHFfsCbiVk +0+Rmtsl8Q596sFVXE4/IoEkxbs5Lnfh66EkPkViD3f9BIHFdaT342KjYs9Np +MpqvVlb6Zz3Uif3v8VwaTX7YrKo94v0ETCQiG9xTaTLi4YIj6d4NECvsyZVL +psnOjJbyaa9GCNOUMp+LxfkqVD43EtsIwQ19rHDsi4+uoE8ljTAkxpsviv0f +T//5q9FGUFQK7pWOockgqYK+PC82PNTaw1WOpknFqKgFNl4ceBj8c0zxGk2e +DjQ7Wnq6CfjK3Q1uhNCkiYd+HhHTBM2+jzMEsBUdVX7YFzVBnZ6/hd9FXM8u +RjAx3AQhdRvTDlygSQPpx0n27s/gpO3XfqlgnL+qdW1Ml2bYEfNUy/sMTWZP +CIOdbQuE9B+VvOtBk+cHp0NLAlvAZnGkFT/2ge4vLYyUFlB9pT9gfwr/D+zG +QyVvW4ChcfSnxEma9E4I8mdYvwB6X8PzQFecV81vBcUWrXD6aJHfKieaPFXl +HC2g2AYhmnmTkwf+zQdLOX6tNvi+80DkeuyRLv2Hc9vbwMX1m6WzDU36zizu +/OPSBkMpU75tVjQZuKVh5a/7bZCXrCuRtpcmwxplCr5ueAUJnnNPF+6mycy2 +N8+5hu2w9rCdpe0WmuR+2cXKdeRCe/7CpGg5mvyRrLzjsjcXhPN1v9+Rxf2b +MkMcLnFhgYR1XJUMrreg8feS21z4OZvb0rsC758XfImg8fM3QXC1NE1emtai +3I68hrC1K0JjxWlSTVgudP3hToiyLd0+wE+T19Qm+SoOvgX97lbZy319pJdq +U2J99nuoYsj8+BXdR04fcy/s9uiDfo2cTdMb+kjHR9YWMS4fgPK6Mlyd3Use +G+XW10f0A3PaMOIe2UNeV6/0zAn7BOtn+jX8X3eTAvWVOlcCv4Cm94RXdM97 +UlzFtLU3aQiebuTpHarnkTszDO+MxH0D3suJcPXsd+SSHy1GFyqH4YMPNfzr +aBeZQtXwC7qOgIXJl9eRkm9J/ZVb5+ScRuGjvehWs45OUrVPrD/YdwwsxQaK +vri+JgvyFp0o9/4JIaZqec9FuWRQj32Hatg4ZKrGRCRGtZNe+rqm6QkToM6f +X8xd8Iqcztju+DVmEnaNX1xw3OAl2XY65UjA7V9QcHdh1pmVLaSescJsd9Zv +yAroGfuz7hn5bIdeHkqdgu0jm6JemXLI7JJkvQ/50xB5MXEsY+1TUlJxrdvh +ezNg63QSHTSuJ9v5iUvSdX9AzVlb/eKBGrKc8Mlpe/YX9iQYZ9HWZeRaSTE3 +R/YsznAR2lNUQP6InpTQ7JyDxlQBsaj5t0nF8HA1Tzc+NHCiYfubwSjywyHe +O8PPfEhWTP5uvJMv7BzomCr34EcKpjNIcn4KnPF2PiH1nR+1Oz6ztrbPAbOK +WyZS/gLo5+03oT5/i2D4j1uQ4KQAkqvWufNocxlkvQkp8/ARRNmlM06j8lUw +fcLgyNkZQbT3dRdjTLQOVv6NtfUKFELC8Re4sidJ+GQc2UwIzUOWDu/28eye +wNPVLSATOQ/Nb18Z+PJFA7gROULyLAYq9uT8OjDzFJ4LRERtW8BAKmIBukv5 +GmHtX1cpFxEG4u+2t+MKNcKP0XXK+eIM5DDou3ubaCP48spNtZcx0I0q58YZ +OTyHCtlxu1QZSEh5vKlzRyPE7B+Q897DQGk6od0bohqhMlPJ4GksA83Tvljh +tYgNSnPbzz2JZ6DDjr+ElaTYEGPvXE0mMlBsX/GtDmk2nFiWo12XzECD5XxH +VeTZsCxhzfryLAYyq6u4UqHGhqBwFdncEgZKUF01u3M3Gww91PkjXzHQ0hE3 +NavLbChssYCrHQz0KVFYrjCMDctVvYLDXzOQkeH4VqFrbBj/XDJ1uYuB/J89 +WZoXw4bso5pjQTQDhYklCLemsYGw2vjRY5SBhCVSe+Mq2dC6WZ+9V5yJUnVS +22a/sOFald+M0WImau8XODf8lY3P/SKNzZJMlHAu8yRvmA316xXSFaWZ6O7b +F0oF42wolScCxuWY6Fz00n41Pg4kMbnKN9WZSMFF/cxDKQ4c63C/3mXORJeI ++S/ub+WAnEV2wwtLJrpxsn/+tu0ceN/S8/vJPibyYRdfe2vEAWuOpfN9Gybi +5ISYz5hyYGe1zpZzDkyUE/FoUNaaA+szBEdWeDJRucvYlgFXDvx2u7XvSDQT +/b0Ze9zhBgduBN5hXojB9b0WO9kWy4HV1/Jr0+KYKKS4Sn1LAges7tUq8m4y +kXtbx9TCZHxOfOb9tMpgooykC2HXb3PgpNOKBNNiJpq36oHTYBkH+uzTuBvb +mcg2xXKpxhsOBJzKjrDiMtGoXM0rvS4OiAYX6Pt2MpFzhLER8DhgkProbsk7 +Jkp/D0dQLwdS3nX7rv3IRI/zavct/8yB/TYykgrjTKS4ddcyrUkONFlkWIlI +EUi8Z5nBiDgFbo0Dj5lLCTQVqeTku5gCEd21ygLLCLQ4bqxwQoKCvbLV05Mr +CWSWFFz0YwkFvO/tGX2rCDQ7xjn4ZCUFw9cYQ6XaBLIS9wOeMgUxs7v3FeoQ +qN10eZKGCoXnYHxdnh6BgkblF4eqUnDmoNyNNAMC6d7966m4ngIB5U1a4TsI +dPtiWYOBJgWS7FPnD1kRiKn0oeaLPgVVumWf99sQ6I7rRnXxLRQcejBtYX6Q +QOZEGWcjUJAeH6643Z5A/xV/tD67lQJlx6ymdc4E2iv9n8D7HRToz3EX8fsR +aGT3Zb8lZhT0eC8PmvEn0GM75wlxcwpCPh0dmDhDII8sl0SWBQWcF8OVQ0EE +Ou9yTXvEkgLzVMKee4VAUoI14ylWFDjq6efmJhCo2srF0cWOAtfvLybe3yRQ +mc0DPxN7Ck5nOWxflEygjBfdYyqHKbjAukwHpREoeOSxCu1AQWrXs+V7cwiU +cvhBtMIxCu5E2bqF5+H3OZ7/MYh9f+v3qrr7BLJ+UFNd4ERB9T0x6zVFBLK/ +v/GaigsFnWdtYv5UEojxLl966gQF3esGezRqCHQxz6DxjisF/XTguuN1BDIU +aX5j4kbBz13pza/q8XqPZ+hFu1MgtmxAKPcZgRSFvn8aPEXBklb/fe+fE6jD +ZfZNgAcFMpeI2+KtBPqp8UBDwJOCdUOqENROINeVpTLCpykwqfE+a8kjUIzD +gZ5xLwosPYSawroJ9FpDe7GLNwUHFG5K1fUSqPfJ0eIO7OPXqktX9xNIfypC +8a4PBR5bTAXsPhGo9LHPFMOXAv+x9xaxXwhkfD5axwX7yiG+4ZlveL9UdL5J ++1EQKRqnr/GDQO9dKh09sOMaFCNdRgkUtmn3VhI7S8VY+dUEgUp23dpo7U9B +Xs9bf8ZvAj0SMtmTil0c58bePE2gLOvJ5z3Yj6ejHHNmCUQ80eQ/GEABu1C2 +hMfHQr1XaytjsFscS+bEBFlog8n6zkZsrtQ2M6N5LOTEirCbwOY1c1PPMVno +rwTbROEMBR/Ou3wtZrFQOt+HTFPsoQ2/9T4tYCGBHN5hL+zRT1cjlouy0B+l +oivx2L9Tlr+xEGOhkI8HFz3EnjMrWBW2iIWSo7qYL7AZguBbK8FCfpJrnfux +RSrbGkakWGh/qbnKb2wJd0fx1dIslDJgaEOcpWC57LiD7XIWajot9E0CW6Ej +tDBmJQsFOMR/WYmtEr7kL1uWhQ4J/NitiK2x+Z7pjDwLmY1ISa/C/j+h+UwX + + "]], LineBox[CompressedData[" +1:eJwV1Xk0ldv7AHBDznlP0deQuikkKak04KqoZydJuVckcg2JSqKIUDdUkiiZ +S3Ezj2UuwznnlS1DIclwMkbvMTRoItV1j+K3f3/stddnrb3WM6xn763m4rX/ +mISYmNgnsv5/l8RzW4f1vLcnuUc62WfSWON9tYFK/D4oyP752pZYVLL+aG+c +EyTL+jtbEpf+gJdyRcdBY5lo2Jh4dIHbVEWcFzxJuHZch/jG4kaZIvoMjF7R ++LiUOEfTIVWs6Czkmr7wFieu0R/fYJUWAHOiwqeYDBr3mVypzY67CO3mVpdo +YpGWtFZgbTAkdWzkxBKHberyyaZDoK9oZbwz8YKtaXRrWSjQT3RV1hGn73Cf +M1UYBn+ZOd2fTKex9h7dP9Vyr0EgfU+/nJi2mLm1Ny0CuoYXPfEmfukUtyo5 +LhqaFpx+059G6tHR3jzcEAOPDY6cu0Z8Vj/+1dnaWEg4eGPeJuI54KiRTsfD +ZYkEPd9UGjcb1TbpcW+Cg8rlFhniWJNVns1ltyDLlD6akUJjFfOJisnC2/B6 +y/rEqmQaj1ja2IffvwM/p8/qGRHnW9OzS3MTobd2dWftXRpvdgw1NUn7B14W +vJUv/4fG+08u7rsTlwp2v/GyHBNpLL0ZcMLuNNjC0v2TvkPjcZ63nLAhDVwC +Dv2rQFzxqKvcrzYdTkh8sKhIoPHOhrSZFDoTpivllXA8jVfu7rR4vyUL6if1 +27/F0Xhuk1SmDjcL2u+7Xtcgbmtx391Ylg3aexUkz8XQ2FGgGzNRmAt9Ecr/ +E96gMbI5PmSwNg88sVjP5wgar+hJ1L16Pw8udthl/nudxmP9Mz1KufdAbX7J +DlE46d9wo5pxWj7oKt9OqbtC+vPV4WFCXDFoZv72zjWAxpGKSYY1MiUgWxUa +zTlP447SUFW9/SWQo15ll3OOxvZjDqMq/SWQMTzm0OpHY0/7ed5fP5aCWfVG +hR4vGt/c5haeKFsG0QHtTh0uNO7ttfKYb10GrQo5FoucSf/9wTwksQxuZ0kf +t3GicW7RwgWnlpfDw2BZqTp7GvNVG1KRbgXo2MZwbA7Q+LX48sq3B7kwaMnb +f8SY1Jcik+RwlwvlLzIL9hrR2G3rf4HtDBd2Kh7QXoto/NWnzYg+wYOhyPR7 +AwZkPkYutEYF8GFxpekV0SYaaz3pH9VLrQK73rFPS5bR2KBh71yjMzUwPXOx +aeY7H8sKcl7ox9dA7YGvN+wn+XhkSOLWuoc1IKbbYfhwnI+jxGjVxZM1oB92 +xcXqAx8PGazRG/d5DCDp0WzD8HH4g3mHU3xqoVxOSse9iY+7UlvKRd71YJuz +qaj+Nh/nF2kGjMfWQ4Zp5sGLN/n40qMr6E1pPXw95TGpG8vHq/sNn7VP1ENP +lkAi9jofBy4sZPK8GyBx6cBV6SA+Vo+MnHfQ+wm8dXW2knPm49PnzZ0fnm6E +6N3xEVYafLzX0zCPimkEsdVTUZfUyHkXrS+OxY2QMtz7KE+Z5LOHFUR9boTb +v2ZTxhT5eNvi6juOHk1Qfs/eT5fFx3O569rYrs3w5KN7LjPKw9nfpcHBvgW+ +jw713E3n4QvvRaGl51vAIKWsbn0yD9sOvGthJbXAsbFx4aM7PCzdUG9X2tMC +XGM+71k0D/vcDPRn2TyHUyaLBguDeBjpfCwssWiFyHEN/Ru2PHyKeyxKQr0N +igvE1B/O5ZH3wXKZuG4bNMUWNYMUD4/3Gj6YNW4D02bX7iezXOw7rdD107UN +kvjBavXfuPj89lrlf++3Qa+DaUjAIBdfrVcp/LCpHR6ZJ70cKOHitLbuZwKj +DjjgJBN1xpKLBe/2cHJdBLDZtstxOrgSf0nU3BXiI4Asxc6biQGVeK4ZO9jp +sgBa/1gtoeNXiVFh/dSiDAE8mfINPuhWifO94V24UAAmXsnKx80r8WWR7lP3 +wy+Bl9Oskb64Eq+XXhaqfagL1j0rtwwpqMDX1/8Qq/irBzqWdnxaVF+Ovdc0 +3qrJfgWlxWsUD994iEVHPIoGPBlYYtb17sO8UuzyyMYixnUIDH43TgwdKMBH +JgQ1NeEj4LvDc17TPzn4xoZKr5yrb0D/62oW2paGJWoq9a+cfwdWpzMir0rH +Yzkts9bXd8ZgbFeSaV2fBzZNNcocj/sIAbZG5aKuMFj0pcXkYuVnqI7QUlly +KRmSnvLFJU+Mg4vLuSqP5lwwVN4xu+zoBMBU1qVJkxJYw8iOBPl+BdFAv9ns +hnIozJN3K/eZBMWzht773/MgcNCxc83Vb3BxnPPYeCUGb8PNZik3v0P19grR +jU21IEo1dvkQ8wM+3AtSky+qh7bTSYfPZvwLU6dPntri+hS27F4+M5A+BfWx +eRz9b03QtGtLHrr7HzyXdA1P8W+B7NLELUP5IvA78GeImvYLUFRf637o3jRo +0dkxKb1t0CFOXV5c9RNqFfd139bpgHLqTE5b0y9gtsnyll3uhLWKsu4uDTMQ +BEVWZmUC+BL1Y4FO1yyUhTj035h6CephYeu93MUQR9OhrVylG4bs+vuM3ooh +06LSke96PWA62vlfuac48lWIZ0f+1QvnfI65Lfwkjri5LyabHfvAvOKfvQv9 +JVDics93PSf64fNP90DJHxLI7bWD7HvrV5DeHVzmeUYSXYtUn1FcPwAit22H +/56WRCuuRhc+4gyC8q9Ye+/zc1CbyaE2pYZBeLM7opmaI4VsR9yyFYJeQ93K +FlCJkEIVzT/8XsxnwJ3KmaPGYaFqx8wN7hYMPJMIj9w5j4VYxVkJPpYMrP11 +YqGrDAvFbDXbd34/A18m1mnmy7HQ94+G3LADDPj2l5vpKbHQpbFc1yRbBoKK +GuL2rGEhxe2eGqmHGYg5MLrM508W6tPqztc4zUBl2optdbEs5HayR0Y9koEV +s8YBj+NZSElhwddx4hjHYzx8i4V8evwMqqMYcFPK0atKZKHDbed+2cQwoHRz +lXZ5Ogv9pJS2BcczEBimpZpbykKeHS9TuYkMGHluEI9oZ6EZJir5QTYDRS0W +cK2ThaSf35l/KofcizXeQWEvWciwYefwylwGvr0t/S+kl4Xka8wr7+QxkO2s +8zVQyEIFe6Yov3wGKOvfhz0nWMh+uMxUtpSBVgPDhv1ybGSrXPixjWbgOtdv +2kSBjbYe3u7vW8XAbr3ijQaKbGRN/+626BEDNdrLU9QXs5GXUC/UvpqBh2rU +2W/L2Oi6yCnjVQ0Dd9gCzYQNbPRHsJxzbQMDRzo9bvTuYyMspV+85AUDyyyy +a59bslF+cKhOAfGrlsGpx1Zs9OWOoqphGwM2TyyP3T/IRqK9PWvs2hkw5elv +D3Bio6lb/ylFdzKgnSo5vtSLjdSCbE1fdTMw5f6P1eEoNnr/tCVHkmEg+nwm ++2IMG4GBd0YE8crr+XRyHIkfrfReXsiA9T1avT+BjZrfWx9UHWLgwdv+SetU +NvoQ7laxfoSBk0eX3jQrIfHdxv213zHAOCYLfu9gI2UFXJf5hYGzp7LDrQVs +1F8RNV9xnIH5QYWGvl2kni9mmaHE2+4+yirtY6P5UV73j04wkNQ34Lt2mI1G +TIO1lSYZOHBQRXH5Nzaqn7eKfeQHA40WqdYyCyk0+GbwqcdPMr/1o9Xs3yj0 +Xqxzaw2xzOa1mhJKFHJjzs5f8IuB/ao80Q9lCsn9jbt5xP2fOlIZDQq9meRO +/Jph4PN11thDPQr9rSYNbuJCiJn5w6pIn0JR3Xz+A2Idn/iqvC0Ukh9uSfhJ +fO6vZdHJ2yjUMEmdjpIQgoTmVt2wXRRSHT+ac19SCIoNpy7YWVOIEv+o0iAl +BO7msrcHDlJI7cLTFCmWEOwKRBb7/qLQeEbthV3EKfFh6saOFNpoTjnVEWu6 +pDeuO0ahjM2uaZVsIRjOCuTF/SjUNqirfpkjhEGfJYHT/hTyijPL5BIHv3Ee +/X6OQmdZpiGfiZ88/1w5FkghD+lRF9u5Qth3l3IUXKEQXWWdtmKeEFy2GObm +3qQQbD4ilyothBOfnn9/lUChVsHlkjbi0+lOxvKJFKqQGwkTlxHCRU6IMDCZ +QusTHV4fJr7b27Rkfw6FLD0eb1g4XwiZkfbuYXkU4q+9FruD+P6OT9yq+ySf +M/5aJ4l592RtVhVTqDCrbA4m7vr7YMzPSgpt8nOzs/+fEAbWvR/cyKdQ48s5 +gZeIR4Tn1x2vopCOV9HLLOLJPSnN7TUUerBbZeMHYlml0Tm5TRRqql0Z7ikr +hEWt/lavnlHo+YOhE5HEKpepDLlWCmkduh2ST7xubA0EdlCouEl4aJR4L9/n +b8t+CkkGVZftkxOCpeecxqsDFFJ3lbRxI7ZdnrCw6jWFLjpsWH+J+Ph13sOV +I2Q+DAyuFRJ7bjeTcHhDocvFinPriP2/vrKIfUehxN3ttd3EV+zEPk9/pJBP +xmj/DHHE/DjDjV8olORuYCgnL4S4WvUI1wkK3XY+KVhOnK61W7P9O4ViouwK +dhLnDfb4s6Yo9Hmn4sf9xCVx7g0GIgq9XZlzxJm4WhTpkjNDIc2lJqIA4oYi +1dJ+MQ7qWmW1OJy4xaV0VlaSg4asNp2OJxYs3GluIsVBK+qGZpKJ+5sFdwPY +HFSUe6Qhl3joguuHEg4HCYzK6kqIxzZNbXkzj4PWkn+KSzzx5lr4kvkcdO3z +4+M1xFNJS7otZDlIqjVI5inxrHmhxlV5DvpXnP2hhZglCb70Ag76vshRrINY +prKtdnwhB/UVXPyzi3iBh4vcysUc9PikZ0cv8RLVb072SzhIUmF19Cvi5Z2h +RTHKHATuxSGDxFphi341qHLQvj/ES14TbzS4ZzatxkEHMlQWMMT/BzSIRXo= + + "]]}, + Annotation[#, "Charting`Private`Tag$20251#1"]& ]}, {}}, + AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], + Axes->{True, True}, + AxesLabel->{None, None}, + AxesOrigin->{0, 0}, + DisplayFunction->Identity, + Frame->{{False, False}, {False, False}}, + FrameLabel->{{None, None}, {None, None}}, + FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, + GridLines->{None, None}, + GridLinesStyle->Directive[ + GrayLevel[0.5, 0.4]], + ImagePadding->All, + Method->{ + "DefaultBoundaryStyle" -> Automatic, + "DefaultGraphicsInteraction" -> { + "Version" -> 1.2, "TrackMousePosition" -> {True, False}, + "Effects" -> { + "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, + "Droplines" -> { + "freeformCursorMode" -> True, + "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> + AbsolutePointSize[6], "ScalingFunctions" -> None, + "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& ), "CopiedValueFunction" -> ({ + (Identity[#]& )[ + Part[#, 1]], + (Identity[#]& )[ + Part[#, 2]]}& )}}, + PlotRange-> + NCache[{{0, Pi}, {-0.553763692248348, 0.5335541146242329}}, {{ + 0, 3.141592653589793}, {-0.553763692248348, 0.5335541146242329}}], + PlotRangeClipping->True, + PlotRangePadding->{{ + Scaled[0.02], + Scaled[0.02]}, { + Scaled[0.05], + Scaled[0.05]}}, + Ticks->{Automatic, Automatic}]], "Output", + CellChangeTimes->{{3.802751641784862*^9, 3.802751647617147*^9}, + 3.802751728238449*^9, {3.8027522946858187`*^9, 3.802752308349606*^9}, { + 3.802752497463564*^9, 3.802752538808447*^9}, 3.802752695360437*^9, + 3.802752916141945*^9, {3.803109657466114*^9, 3.803109664003181*^9}}, + CellLabel->"Out[22]=",ExpressionUUID->"20418fbe-e485-47ca-8690-9756fb7a2a3b"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"EHF", "[", + RowBox[{"R_", ",", "\[Lambda]_"}], "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["a", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["b", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"i", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"j", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"k", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"l", "=", "0"}], "1"], + RowBox[{ + SubscriptBox["a", "i"], + SubscriptBox["a", "j"], + SubscriptBox["b", "k"], + SubscriptBox["b", "l"], + FractionBox["\[Lambda]", "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "2"], + RowBox[{ + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"k", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], + "2"]}]}]}]}]}]}]}]}], "/.", + RowBox[{"{", + RowBox[{ + RowBox[{ + SubscriptBox["a", "0"], "\[Rule]", + RowBox[{"Cos", "[", "x", "]"}]}], ",", + RowBox[{ + SubscriptBox["a", "1"], "\[Rule]", + RowBox[{"Sin", "[", "x", "]"}]}], ",", + RowBox[{ + SubscriptBox["b", "0"], "\[Rule]", + RowBox[{"Cos", "[", "y", "]"}]}], ",", + RowBox[{ + SubscriptBox["b", "1"], "\[Rule]", + RowBox[{"Sin", "[", "y", "]"}]}]}], "}"}]}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1"}]}], "/.", "sol"}], "//", + "FullSimplify"}], "//", "Expand"}]}]], "Input", + CellChangeTimes->{{3.802756962044652*^9, 3.802757026009791*^9}, { + 3.802757225620154*^9, 3.802757226009513*^9}}, + CellLabel->"In[61]:=",ExpressionUUID->"769f2189-3930-4d90-baae-f734f7623c69"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 61, 30, + 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.802756964447884*^9, 3.802757026338327*^9}, + 3.8027572263868647`*^9}, + CellLabel-> + "During evaluation of \ +In[61]:=",ExpressionUUID->"11ab98cb-4a5a-417d-94de-6a22ac87e287"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 61, 31, + 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.802756964447884*^9, 3.802757026338327*^9}, + 3.80275722649935*^9}, + CellLabel-> + "During evaluation of \ +In[61]:=",ExpressionUUID->"b3605f9f-432e-4119-b548-de0558af5fda"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 61, 32, + 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.802756964447884*^9, 3.802757026338327*^9}, + 3.802757226597024*^9}, + CellLabel-> + "During evaluation of \ +In[61]:=",ExpressionUUID->"ba4ec38e-5a7c-44c5-b770-3ec51bbde4ae"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 61, 33, 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{{3.802756964447884*^9, 3.802757026338327*^9}, + 3.802757226698832*^9}, + CellLabel-> + "During evaluation of \ +In[61]:=",ExpressionUUID->"a2c98046-abf4-4c51-8f98-6e39f75c68d5"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + FractionBox["1", "R"], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + FractionBox["1", "R"], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + FractionBox["1", "R"], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + FractionBox["1", "R"], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["75", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["25", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["91", + RowBox[{"66", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["75", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["25", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["59", + RowBox[{"84", " ", "R"}]]}]}], "}"}]], "Output", + CellChangeTimes->{{3.802756964856093*^9, 3.802757026882474*^9}, + 3.8027572267916193`*^9}, + CellLabel->"Out[61]=",ExpressionUUID->"d0eb3c6e-513b-4a58-a30d-1da0c19c4f98"] +}, Open ]], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{"EHF", "[", + RowBox[{"R_", ",", "\[Lambda]_"}], "]"}], "=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["a", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "1"], + RowBox[{ + SubsuperscriptBox["b", "L", "2"], + FractionBox[ + RowBox[{"L", + RowBox[{"(", + RowBox[{"L", "+", "1"}], ")"}]}], + RowBox[{"2", + SuperscriptBox["R", "2"]}]]}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"i", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"j", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"k", "=", "0"}], "1"], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"l", "=", "0"}], "1"], + RowBox[{ + SubscriptBox["a", "i"], + SubscriptBox["a", "j"], + SubscriptBox["b", "k"], + SubscriptBox["b", "l"], + FractionBox["\[Lambda]", "R"], + SqrtBox[ + RowBox[{ + RowBox[{"(", + RowBox[{ + RowBox[{"2", "i"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "j"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "k"}], "+", "1"}], ")"}], + RowBox[{"(", + RowBox[{ + RowBox[{"2", "l"}], "+", "1"}], ")"}]}]], + RowBox[{ + UnderoverscriptBox["\[Sum]", + RowBox[{"L", "=", "0"}], "2"], + RowBox[{ + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"i", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"j", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], "2"], + SuperscriptBox[ + RowBox[{"ThreeJSymbol", "[", + RowBox[{ + RowBox[{"{", + RowBox[{"k", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"l", ",", "0"}], "}"}], ",", + RowBox[{"{", + RowBox[{"L", ",", "0"}], "}"}]}], "]"}], + "2"]}]}]}]}]}]}]}]}], "/.", + RowBox[{"{", + RowBox[{ + RowBox[{ + SubscriptBox["a", "0"], "\[Rule]", + RowBox[{"-", + RowBox[{"Sin", "[", "x", "]"}]}]}], ",", + RowBox[{ + SubscriptBox["a", "1"], "\[Rule]", + RowBox[{"Cos", "[", "x", "]"}]}], ",", + RowBox[{ + SubscriptBox["b", "0"], "\[Rule]", + RowBox[{"-", + RowBox[{"Sin", "[", "y", "]"}]}]}], ",", + RowBox[{ + SubscriptBox["b", "1"], "\[Rule]", + RowBox[{"Cos", "[", "y", "]"}]}]}], "}"}]}], "/.", + RowBox[{"\[Lambda]", "\[Rule]", "1"}]}], "/.", "sol"}], "//", + "FullSimplify"}], "//", "Expand"}]}]], "Input", + CellChangeTimes->{{3.802757258980661*^9, 3.8027572867759132`*^9}}, + CellLabel->"In[62]:=",ExpressionUUID->"7f89722c-8e55-4706-8dab-ab55bdb14f8b"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 62, 34, + 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8027572875926743`*^9}, + CellLabel-> + "During evaluation of \ +In[62]:=",ExpressionUUID->"209c0325-1cc9-4089-b43c-146157d458d0"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 62, 35, + 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8027572877030497`*^9}, + CellLabel-> + "During evaluation of \ +In[62]:=",ExpressionUUID->"edc0e392-08c6-4386-bcc0-836e4cd7ee44"], + +Cell[BoxData[ + TemplateBox[{ + "ClebschGordan", "tri", + "\"\\!\\(\\*RowBox[{\\\"ThreeJSymbol\\\", \\\"[\\\", RowBox[{RowBox[{\\\"{\ +\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\",\\\", \ +RowBox[{\\\"{\\\", RowBox[{\\\"0\\\", \\\",\\\", \\\"0\\\"}], \\\"}\\\"}], \\\ +\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\"2\\\", \\\",\\\", \\\"0\\\"}], \ +\\\"}\\\"}]}], \\\"]\\\"}]\\) is not triangular.\"", 2, 62, 36, + 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.8027572877926607`*^9}, + CellLabel-> + "During evaluation of \ +In[62]:=",ExpressionUUID->"146aef79-a163-483a-a4f4-df6aaca41f74"], + +Cell[BoxData[ + TemplateBox[{ + "General", "stop", + "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"ClebschGordan\\\", \ +\\\"::\\\", \\\"tri\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \ +this calculation.\"", 2, 62, 37, 22573910896942579821, "Local"}, + "MessageTemplate"]], "Message", "MSG", + CellChangeTimes->{3.802757287879641*^9}, + CellLabel-> + "During evaluation of \ +In[62]:=",ExpressionUUID->"08cfb1e8-88e0-4c28-8e1c-9727017a0ff9"], + +Cell[BoxData[ + RowBox[{"{", + RowBox[{ + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + FractionBox["1", "R"], ",", + FractionBox["1", "R"], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + FractionBox["1", "R"], ",", + FractionBox["1", "R"], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], "+", + FractionBox["1", "R"]}], ",", + RowBox[{ + FractionBox["2", + SuperscriptBox["R", "2"]], "+", + FractionBox["29", + RowBox[{"25", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + RowBox[{"-", + FractionBox["225", + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "+", + FractionBox["13", + RowBox[{"22", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["2239", + RowBox[{"1650", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}], ",", + RowBox[{ + FractionBox["225", + RowBox[{"112", " ", + SuperscriptBox["R", "3"]}]], "+", + FractionBox["37", + RowBox[{"28", " ", + SuperscriptBox["R", "2"]}]], "+", + FractionBox["1511", + RowBox[{"2100", " ", "R"}]]}]}], "}"}]], "Output", + CellChangeTimes->{3.80275728797547*^9}, + CellLabel->"Out[62]=",ExpressionUUID->"d398dea4-9190-4270-8730-9d7642933e57"] +}, Open ]] +}, Open ]], + +Cell[CellGroupData[{ + +Cell["Singularity structure", "Section", + CellChangeTimes->{{3.803025852495925*^9, + 3.8030258560144167`*^9}},ExpressionUUID->"9f9da50c-a1cf-4c4c-8d6b-\ +299ea85a230a"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}]}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Beta]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}]}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}]}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}]}], ",", "\[IndentingNewLine]", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "2"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"-", + RowBox[{"Sin", "[", "\[Chi]\[Beta]", "]"}]}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Beta]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Beta]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}]}]}], "}"}], "//", "FullSimplify"}], + ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.7999936000367727`*^9, 3.799993616856702*^9}, { + 3.799993707621728*^9, 3.799993734090374*^9}, {3.79999383162755*^9, + 3.799993876531172*^9}, {3.801823523544009*^9, 3.801823543594131*^9}, { + 3.8030259245522327`*^9, 3.8030259384459*^9}}, + CellLabel->"In[80]:=",ExpressionUUID->"f9d396ae-40ac-434a-bfdc-4e291fe1549c"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"\[CapitalPsi]1", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", + RowBox[{"\[Theta]2", ",", "R"}], "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]2", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "2"], "[", + RowBox[{"\[Theta]2", ",", "R"}], "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]3", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "1"], "[", + RowBox[{"\[Theta]2", ",", "R"}], "]"}]}]}], ",", + RowBox[{"\[CapitalPsi]4", "=", + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}], + RowBox[{ + SubscriptBox["\[Psi]\[Beta]", "2"], "[", + RowBox[{"\[Theta]2", ",", "R"}], "]"}]}]}]}], "}"}], "//", + "FullSimplify"}], ";"}]], "Input", + InitializationCell->True, + CellChangeTimes->{{3.8000019632284203`*^9, 3.800002015343547*^9}, + 3.803026588719716*^9, {3.803026739317348*^9, 3.803026758706893*^9}}, + CellLabel->"In[81]:=",ExpressionUUID->"d4b774d5-63a0-4cc7-8361-92c71cc02ea7"], + +Cell[BoxData[{ + RowBox[{ + RowBox[{"S", "[", + RowBox[{"\[CapitalPsi]1_", ",", "\[CapitalPsi]2_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], " ", + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{"\[CapitalPsi]1", " ", "\[CapitalPsi]2"}], "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], "//", + "FullSimplify"}]}], "\[IndentingNewLine]", + RowBox[{ + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1_", ",", "\[CapitalPsi]2_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], + RowBox[{"2", + SuperscriptBox["R", "2"]}]], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{ + RowBox[{ + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], "\[CapitalPsi]1"}], + ")"}], + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], "\[CapitalPsi]2"}], + ")"}]}], "+", + RowBox[{ + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]2"], "\[CapitalPsi]1"}], + ")"}], + RowBox[{"(", + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]2"], "\[CapitalPsi]2"}], + ")"}]}]}], "]"}], + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}], "+", + RowBox[{ + FractionBox[ + SuperscriptBox[ + RowBox[{"(", + RowBox[{"2", "\[Pi]"}], ")"}], "2"], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], " ", + RowBox[{ + RowBox[{"Expand", "[", + RowBox[{"\[CapitalPsi]1", " ", "\[CapitalPsi]2", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + FractionBox["1", "4"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}]}], ")"}]}]}], + ")"}]}], "]"}], " ", + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]1"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]}]}], "//", + "FullSimplify"}]}]}], "Input", + InitializationCell->True, + CellChangeTimes->{{3.803026323563024*^9, 3.803026335846343*^9}}, + CellLabel->"In[82]:=",ExpressionUUID->"63b3e1f4-4dec-4f64-8743-fb6324376933"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1", ",", "R"}], "]"}]], "Input",\ + + CellChangeTimes->{{3.8030263903403873`*^9, 3.8030263906485777`*^9}}, + CellLabel->"In[14]:=",ExpressionUUID->"7130bed3-4922-4086-9411-a42b6dd1b807"], + +Cell[BoxData[ + FractionBox[ + RowBox[{"225", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"91", " ", "R"}]}], ")"}]}]}], + RowBox[{"264", " ", + SuperscriptBox["R", "3"]}]]], "Output", + CellChangeTimes->{3.8030263974276953`*^9, 3.803026493611459*^9, + 3.803026693130332*^9, 3.8030268140040817`*^9}, + CellLabel->"Out[14]=",ExpressionUUID->"6026c673-8030-46f4-baaf-4c598d47e4be"] +}, Open ]], + +Cell[BoxData[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]1", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]1", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]1", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]1", ",", "R"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]2", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]2", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]2", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]2", ",", "R"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]3", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]3", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]3", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]3", ",", "R"}], "]"}]}, + { + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]1", ",", "\[CapitalPsi]4", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]2", ",", "\[CapitalPsi]4", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]3", ",", "\[CapitalPsi]4", ",", "R"}], "]"}], + RowBox[{"H", "[", + RowBox[{"\[CapitalPsi]4", ",", "\[CapitalPsi]4", ",", "R"}], "]"}]} + }], "\[NoBreak]", ")"}]], "Input", + CellChangeTimes->{ + 3.800004320144642*^9, {3.803026825922338*^9, 3.803026846975321*^9}}, + CellLabel->"In[16]:=",ExpressionUUID->"a3eb8740-47e3-4737-a9b1-c6428e3f30b1"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"{", + RowBox[{ + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"225", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"91", " ", "R"}]}], ")"}]}]}], + RowBox[{"264", " ", + SuperscriptBox["R", "3"]}]], ",", "0", ",", "0", ",", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"225", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"47", " ", "R"}]}], ")"}]}]}], + RowBox[{"264", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{"0", ",", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{"225", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"47", " ", "R"}]}], ")"}]}]}], + RowBox[{"264", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]]}], "}"}], ",", + RowBox[{"{", + RowBox[{ + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]], ",", + FractionBox[ + RowBox[{ + RowBox[{"-", "16875"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"975", "+", + RowBox[{"2239", " ", "R"}]}], ")"}]}]}], + RowBox[{"6600", " ", + SuperscriptBox["R", "3"]}]]}], "}"}]}], "}"}], "//", "MatrixForm"}]], \ +"Input", + CellChangeTimes->{{3.803027381820285*^9, 3.803027384276746*^9}}, + CellLabel->"In[17]:=",ExpressionUUID->"f35e4582-4228-4f38-a54e-dc5deec75b28"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"sbRHF", "[", "R_", "]"}], ":=", + TagBox[ + RowBox[{"(", "\[NoBreak]", GridBox[{ + { + FractionBox[ + RowBox[{"225", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"91", " ", "R"}]}], ")"}]}]}], + RowBox[{"264", " ", + SuperscriptBox["R", "3"]}]], "0", "0", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{"225", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"47", " ", "R"}]}], ")"}]}]}], + RowBox[{"264", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]]}, + {"0", + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{"225", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"75", "+", + RowBox[{"47", " ", "R"}]}], ")"}]}]}], + RowBox[{"264", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]]}, + { + FractionBox[ + RowBox[{"75", "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"3", "+", "R"}], ")"}]}]}], + RowBox[{"88", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"25", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], + RowBox[{"220", " ", + SuperscriptBox["R", "3"]}]], + FractionBox[ + RowBox[{ + RowBox[{"-", "16875"}], "+", + RowBox[{"4", " ", "R", " ", + RowBox[{"(", + RowBox[{"975", "+", + RowBox[{"2239", " ", "R"}]}], ")"}]}]}], + RowBox[{"6600", " ", + SuperscriptBox["R", "3"]}]]} + }, + GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, + GridBoxSpacings->{"Columns" -> { + Offset[0.27999999999999997`], { + Offset[0.7]}, + Offset[0.27999999999999997`]}, "Rows" -> { + Offset[0.2], { + Offset[0.4]}, + Offset[0.2]}}], "\[NoBreak]", ")"}], + Function[BoxForm`e$, + MatrixForm[BoxForm`e$]]]}]], "Input", + CellChangeTimes->{{3.803027403065143*^9, 3.8030274080288773`*^9}}, + CellLabel->"In[18]:=",ExpressionUUID->"570b3a93-4a1b-4fdc-8ae0-7d92ad4e6083"], + +Cell[TextData[{ + "On veut v\[EAcute]rifier ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["f", "\[Alpha]"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "6a3d7502-e023-498a-8b51-1b249d44711c"], + " ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["\[Psi]", "\[Alpha]"], TraditionalForm]], + FormatType->"TraditionalForm",ExpressionUUID-> + "4790ac15-7f97-4a36-adf3-69a7c9db6823"], + " = \[Epsilon] ", + Cell[BoxData[ + FormBox[ + SuperscriptBox["\[Psi]", "\[Alpha]"], TraditionalForm]],ExpressionUUID-> + "ef71988d-0b8e-426e-8596-a23c9dac4ca6"] +}], "Text", + CellChangeTimes->{{3.8030289813955593`*^9, + 3.8030290476023283`*^9}},ExpressionUUID->"7060cfbc-b77e-468b-8e7d-\ +f558d24eba5d"], + +Cell[BoxData[ + RowBox[{ + RowBox[{"h", + RowBox[{"(", "1", ")"}], + SuperscriptBox["\[Psi]", "\[Alpha]"]}], "=", " ", + RowBox[{ + RowBox[{"-", + FractionBox["1", "2"]}], + RowBox[{ + SubscriptBox["\[PartialD]", + RowBox[{"\[Theta]", ",", "\[Theta]"}]], + SuperscriptBox["\[Psi]", "\[Alpha]"]}]}]}]], "Input", + CellChangeTimes->{{3.80302912228831*^9, 3.803029132386075*^9}, { + 3.803029232868034*^9, 3.803029251554446*^9}, {3.803029421110385*^9, + 3.803029450192367*^9}},ExpressionUUID->"4eced9ab-7b5f-4bf1-a88f-\ +605ce1ffbdcf"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]_", ",", "R_"}], "]"}], ":=", + RowBox[{ + RowBox[{ + RowBox[{ + RowBox[{"Cos", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "0"], "[", "\[Theta]", "]"}]}], "+", + RowBox[{ + RowBox[{"Sin", "[", "\[Chi]\[Alpha]", "]"}], + RowBox[{ + SubscriptBox["Y", "1"], "[", "\[Theta]", "]"}]}]}], "/.", + RowBox[{"\[Chi]\[Alpha]", "\[Rule]", + RowBox[{"ArcTan", "[", + RowBox[{ + FractionBox[ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], + SqrtBox["R"]], ",", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], + SqrtBox["R"]]}], "]"}]}]}]}]], "Input", + CellLabel->"In[19]:=",ExpressionUUID->"389193ae-8236-4257-b913-487956199d4b"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + UnderoverscriptBox["\[Sum]", "a", + SuperscriptBox["N", "\[Alpha]"]], + RowBox[{"[", + RowBox[{ + RowBox[{ + SubsuperscriptBox["J", "a", "\[Alpha]"], + RowBox[{"(", "1", ")"}]}], "-", + RowBox[{ + SubsuperscriptBox["K", "a", "\[Alpha]"], + RowBox[{"(", "1", ")"}]}]}], "]"}]}], "+", + RowBox[{ + UnderoverscriptBox["\[Sum]", "a", + SuperscriptBox["N", "\[Beta]"]], + RowBox[{ + SubsuperscriptBox["J", "a", "\[Beta]"], + RowBox[{"(", "1", ")"}]}]}]}]], "Input", + CellChangeTimes->{{3.803029533977811*^9, 3.80302954812006*^9}, { + 3.803029615010707*^9, + 3.80302969978605*^9}},ExpressionUUID->"8fd58b5d-2f2f-4bda-805e-\ +569841bd16f8"], + +Cell["Ici un seul \[EAcute]lectron \[Alpha] et un seul \[Beta] ", "Text", + CellChangeTimes->{{3.803029710409932*^9, + 3.8030297665290937`*^9}},ExpressionUUID->"d4547d36-e161-4d1c-a2aa-\ +576fa7eb6bee"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubsuperscriptBox["J", "a", "\[Alpha]"], + RowBox[{"(", "1", ")"}]}], "=", + RowBox[{"\[Integral]", + RowBox[{ + SubsuperscriptBox["\[Psi]", "a", + SuperscriptBox["\[Alpha]", "*"]], + RowBox[{"(", "2", ")"}], + FractionBox["1", + SubscriptBox["r", "12"]], + SubsuperscriptBox["\[Psi]", "a", "\[Alpha]"], + RowBox[{"(", "2", ")"}], + RowBox[{"\[DifferentialD]", + SubscriptBox["r", "2"]}]}]}]}]], "Input", + CellChangeTimes->{{3.80302982160421*^9, 3.803029950942185*^9}, { + 3.8030300232829037`*^9, + 3.8030300400557423`*^9}},ExpressionUUID->"9532e944-f969-42bf-a2fc-\ +aeb9654c4e1e"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.803030662581065*^9, 3.8030306648418293`*^9}}, + CellLabel->"In[28]:=",ExpressionUUID->"fd85473c-6105-4b0a-89df-3eae31b3dc2f"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], "+", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]], "Output", + CellChangeTimes->{{3.803030647320953*^9, 3.803030665389762*^9}}, + CellLabel->"Out[28]=",ExpressionUUID->"b3a469bf-a2a3-48f6-992e-570df1247c87"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"2", " ", + SuperscriptBox["R", "2"], + RowBox[{"Sin", "[", "\[Theta]1", "]"}]}]]}], + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], + RowBox[{"(", + RowBox[{ + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}]}]}], ")"}]}]}], "//", + "FullSimplify"}]], "Input", + CellChangeTimes->{{3.80303107704655*^9, 3.803031085418138*^9}, { + 3.803098684410017*^9, 3.803098703385275*^9}, {3.803098793333054*^9, + 3.803098807183886*^9}}, + CellLabel->"In[13]:=",ExpressionUUID->"fcc5576d-e6b9-4da9-8091-360762076ff3"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SuperscriptBox["R", + RowBox[{"5", "/", "2"}]]}]], "=", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], " ", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]}]}]], "Input", + CellChangeTimes->{{3.80309905710285*^9, 3.8030990716183558`*^9}, { + 3.8030991230266457`*^9, + 3.803099145760396*^9}},ExpressionUUID->"ecfc6037-2a15-47ff-a630-\ +b175ec198f86"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.80309916465009*^9, 3.803099165107316*^9}}, + CellLabel->"In[19]:=",ExpressionUUID->"9aa55a66-2d47-4719-bf16-9988aafd98b5"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + RowBox[{ + RowBox[{"-", "5"}], " ", + SqrtBox[ + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}]]}], "+", + RowBox[{ + SqrtBox["3"], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]], "Output", + CellChangeTimes->{3.803099166611373*^9}, + CellLabel->"Out[19]=",ExpressionUUID->"d8e1148d-23a8-4aa4-ad30-4e0e301ba914"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{"-", + FractionBox["1", + RowBox[{"2", " ", + SuperscriptBox["R", "2"], + RowBox[{"Sin", "[", "\[Theta]1", "]"}]}]]}], + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], + RowBox[{"(", + RowBox[{ + RowBox[{"Sin", "[", "\[Theta]1", "]"}], + RowBox[{ + SubscriptBox["\[PartialD]", "\[Theta]1"], + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "2"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}]}]}], ")"}]}]}], "//", + "FullSimplify"}]], "Input", + CellChangeTimes->{{3.803099180957386*^9, 3.803099181380587*^9}}, + CellLabel->"In[20]:=",ExpressionUUID->"3503b2d6-b70a-437e-a15a-d9a52c1b9b32"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{ + SqrtBox[ + FractionBox["3", + RowBox[{"22", " ", "\[Pi]"}]]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"4", " ", + SuperscriptBox["R", + RowBox[{"5", "/", "2"}]]}]], "=", + RowBox[{ + FractionBox["1", + SuperscriptBox["R", "2"]], " ", + FractionBox[ + RowBox[{ + SqrtBox["3"], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SqrtBox["R"]}]]}]}]], "Input", + CellChangeTimes->{{3.80309919599328*^9, + 3.803099209833786*^9}},ExpressionUUID->"f6aab86e-ebf1-4ff2-bb94-\ +e5fc3880ad8a"], + +Cell[BoxData[ + RowBox[{ + FractionBox[ + RowBox[{"2", "\[Pi]", " ", + SuperscriptBox["R", "2"]}], "R"], + RowBox[{ + SubsuperscriptBox["\[Integral]", "0", "\[Pi]"], + RowBox[{ + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]2", ",", "R"}], "]"}], + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + FractionBox["1", "4"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}]}], ")"}]}]}], ")"}], + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]2", ",", "R"}], "]"}], + RowBox[{"Sin", "[", "\[Theta]2", "]"}], + RowBox[{"\[DifferentialD]", "\[Theta]2"}]}]}]}]], "Input", + CellChangeTimes->{{3.8030300457022123`*^9, 3.8030301017794247`*^9}, { + 3.803030147535007*^9, 3.80303015298065*^9}, {3.803030457625359*^9, + 3.803030462434627*^9}, {3.803031503941786*^9, 3.803031505485362*^9}, { + 3.803098940037898*^9, 3.803098944793744*^9}, {3.803099394865171*^9, + 3.803099397615796*^9}, {3.8030995101702433`*^9, 3.8030995105746393`*^9}, { + 3.803099620871674*^9, 3.803099626917458*^9}, {3.803099788741804*^9, + 3.803099790314433*^9}, {3.803100056249868*^9, 3.803100057778666*^9}}, + CellLabel->"In[29]:=",ExpressionUUID->"3de4ba35-172e-49aa-a188-9332858979e6"], + +Cell[CellGroupData[{ + +Cell[BoxData[ + RowBox[{ + RowBox[{ + RowBox[{ + FractionBox["1", "528"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"20", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"9", " ", + RowBox[{"(", + RowBox[{"5", "+", + RowBox[{"62", " ", "R"}], "+", + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}]}]}], ")"}]}]}], ")"}], + RowBox[{ + SubscriptBox["\[Psi]\[Alpha]", "1"], "[", + RowBox[{"\[Theta]1", ",", "R"}], "]"}]}], "+", + FractionBox[ + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], + RowBox[{"4", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SuperscriptBox["R", + RowBox[{"5", "/", "2"}]]}]]}], "//", "FullSimplify"}]], "Input", + CellChangeTimes->{{3.803100281510285*^9, 3.803100299037341*^9}}, + CellLabel->"In[31]:=",ExpressionUUID->"a7292427-2115-4f9c-9f18-5da50ab59ccc"], + +Cell[BoxData[ + FractionBox[ + RowBox[{ + RowBox[{"66", " ", + SuperscriptBox["R", "2"], " ", + RowBox[{"(", + RowBox[{"15", "+", + RowBox[{"26", " ", "R"}]}], ")"}], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]]}], "+", + RowBox[{"5", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"(", + RowBox[{"1056", "+", + RowBox[{"5", " ", + SuperscriptBox["R", "2"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"302", " ", "R"}]}], ")"}]}]}], ")"}], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"15", " ", + SuperscriptBox["R", "2"], " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"26", " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}]}], "+", + RowBox[{"15", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", + RowBox[{"3", " ", "\[Theta]1"}], "]"}]}]}], ")"}]}]}], + RowBox[{"4224", " ", + SqrtBox[ + RowBox[{"22", " ", "\[Pi]"}]], " ", + SuperscriptBox["R", + RowBox[{"5", "/", "2"}]]}]]], "Output", + CellChangeTimes->{{3.803100292648047*^9, 3.803100302317711*^9}}, + CellLabel->"Out[31]=",ExpressionUUID->"f92f50e3-fefc-415c-a277-e7b714aaddb7"] +}, Open ]], + +Cell[BoxData[ + RowBox[{ + FractionBox["1", "528"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"20", " ", + SqrtBox[ + RowBox[{"9", "+", + RowBox[{"6", " ", "R"}]}]], " ", + SqrtBox[ + RowBox[{ + RowBox[{"-", "75"}], "+", + RowBox[{"38", " ", "R"}]}]], " ", + RowBox[{"Cos", "[", "\[Theta]1", "]"}]}], "+", + RowBox[{"9", " ", + RowBox[{"(", + RowBox[{"5", "+", + RowBox[{"62", " ", "R"}], "+", + RowBox[{"5", " ", + RowBox[{"(", + RowBox[{"3", "+", + RowBox[{"2", " ", "R"}]}], ")"}], " ", + RowBox[{"Cos", "[", + RowBox[{"2", " ", "\[Theta]1"}], "]"}]}]}], ")"}]}]}], + ")"}]}]], "Input",ExpressionUUID->"f0133067-570d-4433-82d6-c88b843d3b1f"], + +Cell[BoxData[ + RowBox[{ + RowBox[{ + SubsuperscriptBox["K", "a", "\[Alpha]"], + RowBox[{"(", "1", ")"}], + SubsuperscriptBox["\[Psi]", "i", "\[Alpha]"], + RowBox[{"(", "1", ")"}]}], "=", + RowBox[{ + RowBox[{"[", + RowBox[{"\[Integral]", + RowBox[{ + SubsuperscriptBox["\[Psi]", "a", + SuperscriptBox["\[Alpha]", "*"]], + RowBox[{"(", "2", ")"}], + FractionBox["1", + SubscriptBox["r", "12"]], + SubsuperscriptBox["\[Psi]", "i", "\[Alpha]"], + RowBox[{"(", "2", ")"}], + RowBox[{"\[DifferentialD]", + SubscriptBox["r", "2"]}]}]}], "]"}], + SubsuperscriptBox["\[Psi]", "a", "\[Alpha]"], + RowBox[{"(", "1", ")"}]}]}]], "Input",ExpressionUUID->"9ea05b90-b41d-425b-\ +99d3-515aeee0e280"], + +Cell[BoxData[ + RowBox[{ + FractionBox["1", + SubscriptBox["r", "12"]], "=", + RowBox[{"(", + RowBox[{"1", "+", + RowBox[{ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], " ", + RowBox[{"Cos", "[", "\[Theta]2", "]"}]}], "+", + RowBox[{ + FractionBox["1", "4"], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]1", "]"}], "2"]}]}], ")"}], " ", + RowBox[{"(", + RowBox[{ + RowBox[{"-", "1"}], "+", + RowBox[{"3", " ", + SuperscriptBox[ + RowBox[{"Cos", "[", "\[Theta]2", "]"}], "2"]}]}], ")"}]}]}], + ")"}]}]], "Input", + CellChangeTimes->{{3.8030300020918617`*^9, + 3.8030300025654707`*^9}},ExpressionUUID->"d7df054b-9f62-40d9-a350-\ +cb34eecdf02b"] +}, Open ]] }, Open ]] }, WindowSize->{1200., 636.75}, @@ -11888,153 +20828,264 @@ Cell[CellGroupData[{ Cell[580, 22, 157, 3, 98, "Title",ExpressionUUID->"ada8eced-57b5-4e95-9679-10c23e57e050"], Cell[740, 27, 523, 12, 46, "Input",ExpressionUUID->"cddd0ec0-6b45-4f98-97fa-10a30d36a12a", InitializationCell->True], -Cell[1266, 41, 807, 17, 87, "Input",ExpressionUUID->"999c762a-7c58-4666-bb60-666ecc942fc6", +Cell[1266, 41, 1131, 21, 108, "Input",ExpressionUUID->"999c762a-7c58-4666-bb60-666ecc942fc6", InitializationCell->True] }, Open ]], Cell[CellGroupData[{ -Cell[2110, 63, 183, 3, 98, "Title",ExpressionUUID->"4fc18051-e9c0-4c5b-a384-aca352fcc60f"], -Cell[2296, 68, 194, 3, 35, "Text",ExpressionUUID->"0fbf1705-90d8-4972-a010-12f7a06f12e2"], +Cell[2434, 67, 183, 3, 98, "Title",ExpressionUUID->"4fc18051-e9c0-4c5b-a384-aca352fcc60f"], +Cell[2620, 72, 194, 3, 35, "Text",ExpressionUUID->"0fbf1705-90d8-4972-a010-12f7a06f12e2"], Cell[CellGroupData[{ -Cell[2515, 75, 5692, 133, 168, "Input",ExpressionUUID->"f6e7f160-010f-4779-b1d8-ea0c5ba6e8be", +Cell[2839, 79, 5739, 133, 168, "Input",ExpressionUUID->"f6e7f160-010f-4779-b1d8-ea0c5ba6e8be", InitializationCell->True], -Cell[8210, 210, 670, 13, 22, "Message",ExpressionUUID->"f43690ac-2534-4e52-bdc4-1b11abdb3894"], -Cell[8883, 225, 670, 13, 22, "Message",ExpressionUUID->"6e1120df-ba71-4a86-a8bb-49a8e2ae428c"], -Cell[9556, 240, 670, 13, 22, "Message",ExpressionUUID->"ab2d3936-24d8-4f9d-8ec1-a120d0475c73"], -Cell[10229, 255, 478, 10, 22, "Message",ExpressionUUID->"101a719a-022c-4807-b0cb-e7e72c39686f"] +Cell[8581, 214, 842, 16, 22, "Message",ExpressionUUID->"fa8da54f-7b13-43f8-9560-28cb88b3a46e"], +Cell[9426, 232, 845, 16, 22, "Message",ExpressionUUID->"0ebc8102-76e1-43c2-9085-881bc3cc1403"], +Cell[10274, 250, 843, 16, 22, "Message",ExpressionUUID->"4b7859a6-bd37-4586-8066-70d80af9600b"], +Cell[11120, 268, 651, 13, 22, "Message",ExpressionUUID->"075032cf-b9bd-48b6-9122-c6a9f6bb26ef"] }, Open ]], -Cell[10722, 268, 174, 3, 35, "Text",ExpressionUUID->"231d3157-529b-4bc7-a840-df39d8f184e9"], Cell[CellGroupData[{ -Cell[10921, 275, 896, 28, 30, "Input",ExpressionUUID->"6602dda8-5b82-4835-a2a6-e1e0a1c0e32e"], -Cell[11820, 305, 18044, 636, 803, "Output",ExpressionUUID->"83464c67-066b-4f31-832c-f92b96a255d9"] +Cell[11808, 286, 226, 4, 29, "Input",ExpressionUUID->"3529a0e3-d1cc-4fd4-8452-6b6eaa5ed9b1"], +Cell[12037, 292, 1342, 43, 51, "Output",ExpressionUUID->"b05e9ec0-a83d-43cc-ac5f-98f69acf7b71"] }, Open ]], -Cell[29879, 944, 264, 5, 35, "Text",ExpressionUUID->"8ada797e-51a3-42f5-9b78-7dc023472d79"], -Cell[30146, 951, 9947, 325, 455, "Input",ExpressionUUID->"bc0a02bd-ce9f-4092-ba29-455868247a72", +Cell[13394, 338, 174, 3, 35, "Text",ExpressionUUID->"231d3157-529b-4bc7-a840-df39d8f184e9"], +Cell[CellGroupData[{ +Cell[13593, 345, 989, 30, 46, "Input",ExpressionUUID->"6602dda8-5b82-4835-a2a6-e1e0a1c0e32e", InitializationCell->True], -Cell[40096, 1278, 9888, 324, 455, "Input",ExpressionUUID->"a0467d14-fb57-4673-a6fc-eaba9b401d4f", +Cell[14585, 377, 18424, 642, 803, "Output",ExpressionUUID->"1f7f564f-f058-4cbb-b34f-bf52174c6518"] +}, Open ]], +Cell[CellGroupData[{ +Cell[33046, 1024, 689, 21, 42, "Input",ExpressionUUID->"f58a37c9-2de9-4ff3-ac54-fc160256a143"], +Cell[33738, 1047, 411, 12, 49, "Output",ExpressionUUID->"6c6971b4-a6c4-4077-8fc5-8f79c3933374"] +}, Open ]], +Cell[34164, 1062, 264, 5, 35, "Text",ExpressionUUID->"8ada797e-51a3-42f5-9b78-7dc023472d79"], +Cell[34431, 1069, 9947, 325, 455, "Input",ExpressionUUID->"bc0a02bd-ce9f-4092-ba29-455868247a72", InitializationCell->True], -Cell[49987, 1604, 184, 3, 35, "Text",ExpressionUUID->"5284d7aa-c7f1-4ca8-913e-1f30fc96cd74"], -Cell[50174, 1609, 1325, 44, 70, "Input",ExpressionUUID->"89897658-b4e4-4283-b38e-d848aa34e2ac", +Cell[44381, 1396, 9888, 324, 455, "Input",ExpressionUUID->"a0467d14-fb57-4673-a6fc-eaba9b401d4f", InitializationCell->True], -Cell[51502, 1655, 287, 4, 35, "Text",ExpressionUUID->"129c7a17-7cbb-4633-8227-b25198d13382"], +Cell[54272, 1722, 184, 3, 35, "Text",ExpressionUUID->"5284d7aa-c7f1-4ca8-913e-1f30fc96cd74"], +Cell[54459, 1727, 1392, 45, 70, "Input",ExpressionUUID->"89897658-b4e4-4283-b38e-d848aa34e2ac", + InitializationCell->True], +Cell[55854, 1774, 287, 4, 35, "Text",ExpressionUUID->"129c7a17-7cbb-4633-8227-b25198d13382"], Cell[CellGroupData[{ -Cell[51814, 1663, 2547, 72, 133, "Input",ExpressionUUID->"24664069-d643-46e2-b730-262853885865"], -Cell[54364, 1737, 646, 13, 22, "Message",ExpressionUUID->"2a50fb86-b8d7-40ae-ab20-633f5f3b2658"], -Cell[55013, 1752, 646, 13, 22, "Message",ExpressionUUID->"8e5f854e-ea62-408b-b6d4-660ed995520d"], -Cell[55662, 1767, 646, 13, 22, "Message",ExpressionUUID->"a97faec4-d943-42c9-8686-d309da1ca613"], -Cell[56311, 1782, 456, 10, 22, "Message",ExpressionUUID->"7780729a-83df-42f3-9fb1-5b27a8689551"], -Cell[56770, 1794, 1480, 49, 49, "Output",ExpressionUUID->"846297c3-7ab4-4c69-aa0e-df2c493ae434"] +Cell[56166, 1782, 2599, 73, 133, "Input",ExpressionUUID->"24664069-d643-46e2-b730-262853885865"], +Cell[58768, 1857, 723, 15, 22, "Message",ExpressionUUID->"41e93916-2c12-4f0f-b75c-e288551489b5"], +Cell[59494, 1874, 723, 15, 22, "Message",ExpressionUUID->"2ebda45b-b108-423f-871a-e6c73a71050c"], +Cell[60220, 1891, 723, 15, 22, "Message",ExpressionUUID->"eb9c059f-4e6b-4ac6-8705-19af6acfa29d"], +Cell[60946, 1908, 531, 12, 22, "Message",ExpressionUUID->"8df9b20c-8952-4094-b6cd-7ab272c84f00"], +Cell[61480, 1922, 1558, 51, 49, "Output",ExpressionUUID->"74bdf5ce-ac15-4fec-be45-50abe3e63f3e"] }, Open ]], -Cell[58265, 1846, 172, 3, 35, "Text",ExpressionUUID->"0f3e01cd-58e9-4bf5-b1bd-194abb9bf7b5"], +Cell[63053, 1976, 172, 3, 35, "Text",ExpressionUUID->"0f3e01cd-58e9-4bf5-b1bd-194abb9bf7b5"], Cell[CellGroupData[{ -Cell[58462, 1853, 2548, 72, 133, "Input",ExpressionUUID->"858e2df5-f32c-46a7-986d-ee0dd3dd1489"], -Cell[61013, 1927, 646, 13, 22, "Message",ExpressionUUID->"133106f4-2a95-41aa-a9ca-28ca606939bd"], -Cell[61662, 1942, 647, 13, 22, "Message",ExpressionUUID->"fba4887c-6d05-49e9-886c-61e56f50e3a4"], -Cell[62312, 1957, 646, 13, 22, "Message",ExpressionUUID->"32108298-0b16-4037-ba7a-91581c79bf6f"], -Cell[62961, 1972, 455, 10, 22, "Message",ExpressionUUID->"d195f59e-76b0-4895-92bd-104a79b47961"], -Cell[63419, 1984, 1428, 47, 49, "Output",ExpressionUUID->"d3c978a7-f654-42e8-9d18-ac84427124ce"] +Cell[63250, 1983, 2750, 75, 133, "Input",ExpressionUUID->"858e2df5-f32c-46a7-986d-ee0dd3dd1489"], +Cell[66003, 2060, 739, 14, 22, "Message",ExpressionUUID->"17a0417a-9fd6-4745-8a6e-b3e7f3aa1cdb"], +Cell[66745, 2076, 739, 14, 22, "Message",ExpressionUUID->"debb11f7-b500-4b5b-9cd6-9f3809960530"], +Cell[67487, 2092, 739, 14, 22, "Message",ExpressionUUID->"8056278b-a62a-4a7f-9013-8daf19ae12da"], +Cell[68229, 2108, 547, 11, 22, "Message",ExpressionUUID->"0ce33cee-cfad-43b7-ba6d-0d87ab7474cb"], +Cell[68779, 2121, 1522, 48, 49, "Output",ExpressionUUID->"49e26bc3-f8cd-4b6f-b395-68267f050192"] }, Open ]], Cell[CellGroupData[{ -Cell[64884, 2036, 160, 3, 68, "Section",ExpressionUUID->"8bc81dc5-3e8b-48e8-9f7a-d3219da34091"], -Cell[65047, 2041, 177, 3, 35, "Text",ExpressionUUID->"4592d0bc-14a6-441d-b2c8-840c4f56bace"], +Cell[70338, 2174, 160, 3, 68, "Section",ExpressionUUID->"8bc81dc5-3e8b-48e8-9f7a-d3219da34091"], +Cell[70501, 2179, 177, 3, 35, "Text",ExpressionUUID->"4592d0bc-14a6-441d-b2c8-840c4f56bace"], Cell[CellGroupData[{ -Cell[65249, 2048, 375, 8, 29, "Input",ExpressionUUID->"3abfa35e-224a-4093-b094-7ec8ae51fcc0"], -Cell[65627, 2058, 7137, 248, 201, "Output",ExpressionUUID->"1358b260-fa3c-43c8-8085-d0506d6c1731"] +Cell[70703, 2186, 375, 8, 29, "Input",ExpressionUUID->"3abfa35e-224a-4093-b094-7ec8ae51fcc0"], +Cell[71081, 2196, 7186, 249, 201, "Output",ExpressionUUID->"1431d414-a54c-4060-a363-7c2461489924"] }, Open ]], Cell[CellGroupData[{ -Cell[72801, 2311, 328, 7, 29, "Input",ExpressionUUID->"a0575948-9a8d-4e4e-95a4-9d9847c0e597"], -Cell[73132, 2320, 7189, 249, 201, "Output",ExpressionUUID->"73363abd-4022-4483-a513-16a095022a5c"] +Cell[78304, 2450, 328, 7, 29, "Input",ExpressionUUID->"a0575948-9a8d-4e4e-95a4-9d9847c0e597"], +Cell[78635, 2459, 7189, 249, 201, "Output",ExpressionUUID->"73363abd-4022-4483-a513-16a095022a5c"] }, Open ]], -Cell[80336, 2572, 144, 3, 35, "Text",ExpressionUUID->"ebc3853e-526b-48a5-81bb-7a9f30466437"], -Cell[80483, 2577, 239, 6, 35, "Text",ExpressionUUID->"e3b49f5d-3aad-49ed-a3c1-faf6e92e1b06"], +Cell[85839, 2711, 144, 3, 35, "Text",ExpressionUUID->"ebc3853e-526b-48a5-81bb-7a9f30466437"], +Cell[85986, 2716, 239, 6, 35, "Text",ExpressionUUID->"e3b49f5d-3aad-49ed-a3c1-faf6e92e1b06"], Cell[CellGroupData[{ -Cell[80747, 2587, 1625, 54, 46, "Input",ExpressionUUID->"5197a90f-f38e-4136-83da-21ce5f4572fd"], -Cell[82375, 2643, 2408, 74, 66, "Output",ExpressionUUID->"3bacbe2a-e9be-448c-af54-b21efa2bf2c1"] +Cell[86250, 2726, 1625, 54, 46, "Input",ExpressionUUID->"5197a90f-f38e-4136-83da-21ce5f4572fd"], +Cell[87878, 2782, 2408, 74, 66, "Output",ExpressionUUID->"3bacbe2a-e9be-448c-af54-b21efa2bf2c1"] }, Open ]], -Cell[84798, 2720, 915, 21, 58, "Text",ExpressionUUID->"3d90d84f-877a-4e43-b9c0-1030bf3f0df5"], +Cell[90301, 2859, 915, 21, 58, "Text",ExpressionUUID->"3d90d84f-877a-4e43-b9c0-1030bf3f0df5"], Cell[CellGroupData[{ -Cell[85738, 2745, 2149, 67, 78, "Input",ExpressionUUID->"6810a691-9e34-44be-88e5-257f5a8c1ac6"], -Cell[87890, 2814, 1008, 34, 50, "Output",ExpressionUUID->"f4a0ea68-29b7-4b88-8111-587d0e775312"] +Cell[91241, 2884, 2149, 67, 78, "Input",ExpressionUUID->"6810a691-9e34-44be-88e5-257f5a8c1ac6"], +Cell[93393, 2953, 1008, 34, 50, "Output",ExpressionUUID->"f4a0ea68-29b7-4b88-8111-587d0e775312"] }, Open ]], Cell[CellGroupData[{ -Cell[88935, 2853, 411, 12, 47, "Input",ExpressionUUID->"5860bde6-0c0c-4201-8a77-3e9ee0d2ed2f"], -Cell[89349, 2867, 293, 7, 48, "Output",ExpressionUUID->"0bba0f28-b669-493b-8c39-a3d7c1476497"] +Cell[94438, 2992, 411, 12, 47, "Input",ExpressionUUID->"5860bde6-0c0c-4201-8a77-3e9ee0d2ed2f"], +Cell[94852, 3006, 293, 7, 48, "Output",ExpressionUUID->"0bba0f28-b669-493b-8c39-a3d7c1476497"] }, Open ]], Cell[CellGroupData[{ -Cell[89679, 2879, 1122, 34, 46, "Input",ExpressionUUID->"9a6badb7-ed47-40b0-8085-24c5bc98241e"], -Cell[90804, 2915, 63760, 1166, 242, "Output",ExpressionUUID->"26ac9f7a-2ee6-49e0-b0ac-59e073e25c7d"] +Cell[95182, 3018, 1122, 34, 46, "Input",ExpressionUUID->"9a6badb7-ed47-40b0-8085-24c5bc98241e"], +Cell[96307, 3054, 63760, 1166, 242, "Output",ExpressionUUID->"26ac9f7a-2ee6-49e0-b0ac-59e073e25c7d"] }, Open ]], Cell[CellGroupData[{ -Cell[154601, 4086, 1155, 34, 46, "Input",ExpressionUUID->"8b8bc894-1909-4f82-8fc2-be6f3932aa91"], -Cell[155759, 4122, 32396, 643, 243, "Output",ExpressionUUID->"bbc68235-4dbc-49c4-9812-3800209db685"] +Cell[160104, 4225, 1155, 34, 46, "Input",ExpressionUUID->"8b8bc894-1909-4f82-8fc2-be6f3932aa91"], +Cell[161262, 4261, 32396, 643, 243, "Output",ExpressionUUID->"bbc68235-4dbc-49c4-9812-3800209db685"] }, Open ]], Cell[CellGroupData[{ -Cell[188192, 4770, 430, 12, 46, "Input",ExpressionUUID->"0d8a6035-f32d-4793-b1ca-f87b3610e89e"], -Cell[188625, 4784, 275, 6, 48, "Output",ExpressionUUID->"ad0d2235-147f-4518-87c1-4dd62e352642"] +Cell[193695, 4909, 430, 12, 46, "Input",ExpressionUUID->"0d8a6035-f32d-4793-b1ca-f87b3610e89e"], +Cell[194128, 4923, 275, 6, 48, "Output",ExpressionUUID->"ad0d2235-147f-4518-87c1-4dd62e352642"] }, Open ]], Cell[CellGroupData[{ -Cell[188937, 4795, 1120, 34, 46, "Input",ExpressionUUID->"fcf7baa2-6f77-4232-a400-15762d5e1fd2"], -Cell[190060, 4831, 45723, 862, 246, "Output",ExpressionUUID->"e38e86a5-c37d-49fe-b290-a6b33e450513"] +Cell[194440, 4934, 1120, 34, 46, "Input",ExpressionUUID->"fcf7baa2-6f77-4232-a400-15762d5e1fd2"], +Cell[195563, 4970, 45723, 862, 246, "Output",ExpressionUUID->"e38e86a5-c37d-49fe-b290-a6b33e450513"] }, Open ]], Cell[CellGroupData[{ -Cell[235820, 5698, 404, 11, 45, "Input",ExpressionUUID->"37a432a5-9212-4f69-bd4f-ee45ce14d63e"], -Cell[236227, 5711, 268, 7, 48, "Output",ExpressionUUID->"491e73c8-dfa7-4aa6-b488-9857bfe4c759"] +Cell[241323, 5837, 404, 11, 45, "Input",ExpressionUUID->"37a432a5-9212-4f69-bd4f-ee45ce14d63e"], +Cell[241730, 5850, 268, 7, 48, "Output",ExpressionUUID->"491e73c8-dfa7-4aa6-b488-9857bfe4c759"] }, Open ]], -Cell[236510, 5721, 508, 9, 58, "Text",ExpressionUUID->"76876f74-21ed-474a-9a9d-85f07d24750a"] +Cell[242013, 5860, 508, 9, 58, "Text",ExpressionUUID->"76876f74-21ed-474a-9a9d-85f07d24750a"] }, Open ]], Cell[CellGroupData[{ -Cell[237055, 5735, 157, 3, 68, "Section",ExpressionUUID->"afaead18-5e78-459a-ab9e-1f6826e79431"], +Cell[242558, 5874, 157, 3, 68, "Section",ExpressionUUID->"afaead18-5e78-459a-ab9e-1f6826e79431"], Cell[CellGroupData[{ -Cell[237237, 5742, 276, 6, 29, "Input",ExpressionUUID->"ddc4bd4f-72ca-4be7-a6bf-141af9605a4f"], -Cell[237516, 5750, 12632, 436, 430, "Output",ExpressionUUID->"0304661f-7af8-4f41-b828-7bd37ba7d9a5"] +Cell[242740, 5881, 276, 6, 29, "Input",ExpressionUUID->"ddc4bd4f-72ca-4be7-a6bf-141af9605a4f"], +Cell[243019, 5889, 12632, 436, 430, "Output",ExpressionUUID->"0304661f-7af8-4f41-b828-7bd37ba7d9a5"] }, Open ]], Cell[CellGroupData[{ -Cell[250185, 6191, 277, 6, 29, "Input",ExpressionUUID->"216c684a-3ac3-4c0d-a1f6-4efc7954c120"], -Cell[250465, 6199, 12630, 436, 430, "Output",ExpressionUUID->"45ba14ae-03dd-4070-8498-e92ca6359f4d"] +Cell[255688, 6330, 277, 6, 29, "Input",ExpressionUUID->"216c684a-3ac3-4c0d-a1f6-4efc7954c120"], +Cell[255968, 6338, 12630, 436, 430, "Output",ExpressionUUID->"45ba14ae-03dd-4070-8498-e92ca6359f4d"] }, Open ]], -Cell[263110, 6638, 253, 6, 35, "Text",ExpressionUUID->"5132ca1c-5086-4049-9d9f-539d706507a7"], +Cell[268613, 6777, 253, 6, 35, "Text",ExpressionUUID->"5132ca1c-5086-4049-9d9f-539d706507a7"], Cell[CellGroupData[{ -Cell[263388, 6648, 2570, 80, 90, "Input",ExpressionUUID->"e6c9e6cd-90db-4d44-8da0-ad3de2b383ae"], -Cell[265961, 6730, 2472, 74, 66, "Output",ExpressionUUID->"8d831873-d11c-439e-8414-7a5eeceb49b1"] +Cell[268891, 6787, 2570, 80, 90, "Input",ExpressionUUID->"e6c9e6cd-90db-4d44-8da0-ad3de2b383ae"], +Cell[271464, 6869, 2472, 74, 66, "Output",ExpressionUUID->"8d831873-d11c-439e-8414-7a5eeceb49b1"] }, Open ]], Cell[CellGroupData[{ -Cell[268470, 6809, 1942, 63, 78, "Input",ExpressionUUID->"4945a4b2-10d0-4dd0-9b6e-5417c74af8d9"], -Cell[270415, 6874, 901, 30, 50, "Output",ExpressionUUID->"c57481c5-e784-4645-b3d3-1b54cd4cb2ba"] +Cell[273973, 6948, 1942, 63, 78, "Input",ExpressionUUID->"4945a4b2-10d0-4dd0-9b6e-5417c74af8d9"], +Cell[275918, 7013, 901, 30, 50, "Output",ExpressionUUID->"c57481c5-e784-4645-b3d3-1b54cd4cb2ba"] }, Open ]], Cell[CellGroupData[{ -Cell[271353, 6909, 1296, 39, 75, "Input",ExpressionUUID->"5b1e83e0-e5a5-4a98-b6c9-1c4db1bebccf"], -Cell[272652, 6950, 76525, 1396, 248, "Output",ExpressionUUID->"fe2e4aca-1faa-45c3-8155-20096138d09c"] +Cell[276856, 7048, 1349, 40, 75, "Input",ExpressionUUID->"5b1e83e0-e5a5-4a98-b6c9-1c4db1bebccf"], +Cell[278208, 7090, 76761, 1406, 248, "Output",ExpressionUUID->"bb57d11f-6164-424c-8647-1b7eba2065c6"] }, Open ]], Cell[CellGroupData[{ -Cell[349214, 8351, 1326, 39, 75, "Input",ExpressionUUID->"e096d0b5-6194-4b39-b564-43c2120b307f"], -Cell[350543, 8392, 37948, 752, 240, "Output",ExpressionUUID->"0194e55a-69d4-4f78-9043-1ffc49c4ff4b"] +Cell[355006, 8501, 1326, 39, 75, "Input",ExpressionUUID->"e096d0b5-6194-4b39-b564-43c2120b307f"], +Cell[356335, 8542, 38086, 758, 240, "Output",ExpressionUUID->"0194e55a-69d4-4f78-9043-1ffc49c4ff4b"] +}, Open ]], +Cell[394436, 9303, 542, 16, 47, "Input",ExpressionUUID->"9486dde8-3ccd-4686-b628-2d87532f0a2f"], +Cell[CellGroupData[{ +Cell[395003, 9323, 301, 7, 46, "Input",ExpressionUUID->"caf2114e-cd8c-4b4d-bc99-0de25a7e8886"], +Cell[395307, 9332, 244, 5, 33, "Output",ExpressionUUID->"c851e226-2cb6-4cef-8d6f-c0f886bb379f"] }, Open ]], Cell[CellGroupData[{ -Cell[388528, 9149, 1270, 39, 75, "Input",ExpressionUUID->"6e2f0f8e-60db-4310-8763-4994effde913"], -Cell[389801, 9190, 58300, 1087, 241, "Output",ExpressionUUID->"93354289-5870-4a58-8645-15687481f6f5"] +Cell[395588, 9342, 1270, 39, 75, "Input",ExpressionUUID->"6e2f0f8e-60db-4310-8763-4994effde913"], +Cell[396861, 9383, 58300, 1087, 241, "Output",ExpressionUUID->"93354289-5870-4a58-8645-15687481f6f5"] }, Open ]], -Cell[448116, 10280, 772, 14, 127, "Text",ExpressionUUID->"789a8640-f72d-4922-b335-731b29963b66"] +Cell[455176, 10473, 772, 14, 127, "Text",ExpressionUUID->"789a8640-f72d-4922-b335-731b29963b66"] }, Open ]], Cell[CellGroupData[{ -Cell[448925, 10299, 162, 3, 68, "Section",ExpressionUUID->"bde0567b-610f-4ced-b3c2-7e3d365cb7c7"], +Cell[455985, 10492, 162, 3, 68, "Section",ExpressionUUID->"bde0567b-610f-4ced-b3c2-7e3d365cb7c7"], Cell[CellGroupData[{ -Cell[449112, 10306, 817, 19, 29, "Input",ExpressionUUID->"7a8160f0-d63e-44ba-bf07-5585a342b529"], -Cell[449932, 10327, 1155, 36, 50, "Output",ExpressionUUID->"e68ed154-12f0-46b6-9989-c127efd9455e"] +Cell[456172, 10499, 170, 3, 54, "Subsection",ExpressionUUID->"e15caeb9-38ea-44bf-9f8f-130ad15876c0"], +Cell[456345, 10504, 948, 22, 29, "Input",ExpressionUUID->"7a8160f0-d63e-44ba-bf07-5585a342b529"], +Cell[457296, 10528, 982, 34, 47, InheritFromParent,ExpressionUUID->"5133996e-8268-4c3c-8830-b3c9ebe5adb1"], +Cell[CellGroupData[{ +Cell[458303, 10566, 8610, 215, 478, "Input",ExpressionUUID->"19e9fcc3-462d-4146-8b67-65de6066d591"], +Cell[466916, 10783, 198317, 3634, 388, "Output",ExpressionUUID->"b2c16d2e-e99c-4b34-abdc-027e5a535907"] }, Open ]], Cell[CellGroupData[{ -Cell[451124, 10368, 1786, 49, 75, "Input",ExpressionUUID->"19e9fcc3-462d-4146-8b67-65de6066d591"], -Cell[452913, 10419, 32738, 649, 240, "Output",ExpressionUUID->"54f8084a-0a1a-41e6-ad4a-e23c2b5d4588"] +Cell[665270, 14422, 3338, 101, 152, "Input",ExpressionUUID->"4176682a-d65d-4db2-9151-98036e520c4f"], +Cell[668611, 14525, 650, 13, 22, "Message",ExpressionUUID->"1988175e-5be8-4177-8b2a-b05b1703e1c9"], +Cell[669264, 14540, 648, 13, 22, "Message",ExpressionUUID->"3ce86c56-ffaf-4160-b8ca-cb2f6935aaa9"], +Cell[669915, 14555, 648, 13, 22, "Message",ExpressionUUID->"cc48eef8-6263-475e-8bd5-5b038cc085cb"], +Cell[670566, 14570, 456, 10, 22, "Message",ExpressionUUID->"8cb32a84-91d4-4943-ba65-b76c11b9cfe3"] }, Open ]], Cell[CellGroupData[{ -Cell[485688, 11073, 1632, 48, 75, "Input",ExpressionUUID->"0f9b8d2a-dca6-4a62-bd03-16a3aed40353"], -Cell[487323, 11123, 36675, 713, 238, "Output",ExpressionUUID->"4d69bb3f-ffa5-41d6-bffa-5f3d6ae9c174"] +Cell[671059, 14585, 741, 20, 29, "Input",ExpressionUUID->"00fd65a4-5f55-450d-a2ea-5569741e2307"], +Cell[671803, 14607, 714, 20, 49, "Output",ExpressionUUID->"7cf3eca0-eb68-457c-aba6-5195d38f4d11"] }, Open ]], -Cell[524013, 11839, 656, 16, 173, "Text",ExpressionUUID->"e6c814d3-152f-474c-9a5d-258e5890aebb"], -Cell[524672, 11857, 280, 7, 35, "Text",ExpressionUUID->"1f9addd7-b8df-4373-811c-2771135ef044"] +Cell[CellGroupData[{ +Cell[672554, 14632, 1254, 33, 74, "Input",ExpressionUUID->"069cc37d-2cf6-46cd-af14-3fbfecc1ccbf"], +Cell[673811, 14667, 46278, 875, 247, "Output",ExpressionUUID->"947fe042-ad35-4f04-94e9-b6cab7b10a23"] +}, Open ]], +Cell[CellGroupData[{ +Cell[720126, 15547, 1632, 48, 75, "Input",ExpressionUUID->"0f9b8d2a-dca6-4a62-bd03-16a3aed40353"], +Cell[721761, 15597, 36675, 713, 238, "Output",ExpressionUUID->"4d69bb3f-ffa5-41d6-bffa-5f3d6ae9c174"] +}, Open ]], +Cell[758451, 16313, 656, 16, 173, "Text",ExpressionUUID->"e6c814d3-152f-474c-9a5d-258e5890aebb"], +Cell[759110, 16331, 280, 7, 35, "Text",ExpressionUUID->"1f9addd7-b8df-4373-811c-2771135ef044"] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[759439, 16344, 176, 3, 68, "Section",ExpressionUUID->"cf56999b-9398-45ad-9683-a6840742f71d"], +Cell[759618, 16349, 812, 27, 29, "Input",ExpressionUUID->"e07815b3-6cea-4548-a41b-58f5157ffc61"], +Cell[760433, 16378, 2144, 67, 71, "Input",ExpressionUUID->"4dbba78c-449d-4264-9a69-c05aa4ea77c0"], +Cell[CellGroupData[{ +Cell[762602, 16449, 668, 12, 29, "Input",ExpressionUUID->"e81e0631-d79f-47bd-afa6-3f1e0056f6b2"], +Cell[763273, 16463, 33982, 1037, 844, "Output",ExpressionUUID->"5f7e4e98-c695-4f7b-96dd-a4ee9689277d"] +}, Open ]], +Cell[CellGroupData[{ +Cell[797292, 17505, 274, 6, 29, "Input",ExpressionUUID->"365fa4c0-669a-451b-9b47-7b982a2792f2"], +Cell[797569, 17513, 31209, 961, 839, "Output",ExpressionUUID->"a7efeb2c-5ea7-4b29-aad7-cb84823766ec"] +}, Open ]], +Cell[CellGroupData[{ +Cell[828815, 18479, 915, 30, 54, "Input",ExpressionUUID->"766d71ca-9033-46fd-b13a-c5d5f8035d8a"], +Cell[829733, 18511, 539, 18, 55, "Output",ExpressionUUID->"6944254a-bb87-4a29-a8f4-b3f49f370599"] +}, Open ]], +Cell[CellGroupData[{ +Cell[830309, 18534, 1637, 50, 54, "Input",ExpressionUUID->"659579a2-0489-4b51-943e-23e2100a3cca"], +Cell[831949, 18586, 1069, 37, 55, "Output",ExpressionUUID->"7ced4593-1d16-45e9-ac5b-217a2e032985"] +}, Open ]], +Cell[CellGroupData[{ +Cell[833055, 18628, 1699, 49, 54, "Input",ExpressionUUID->"a3c9266b-25f5-44de-8e7c-cbe2eaaba4de"], +Cell[834757, 18679, 11886, 215, 232, "Output",ExpressionUUID->"20418fbe-e485-47ca-8690-9756fb7a2a3b"] +}, Open ]], +Cell[CellGroupData[{ +Cell[846680, 18899, 3772, 105, 152, "Input",ExpressionUUID->"769f2189-3930-4d90-baae-f734f7623c69"], +Cell[850455, 19006, 701, 14, 22, "Message",ExpressionUUID->"11ab98cb-4a5a-417d-94de-6a22ac87e287"], +Cell[851159, 19022, 698, 14, 22, "Message",ExpressionUUID->"b3605f9f-432e-4119-b548-de0558af5fda"], +Cell[851860, 19038, 699, 14, 22, "Message",ExpressionUUID->"ba4ec38e-5a7c-44c5-b770-3ec51bbde4ae"], +Cell[852562, 19054, 507, 11, 22, "Message",ExpressionUUID->"a2c98046-abf4-4c51-8f98-6e39f75c68d5"], +Cell[853072, 19067, 5990, 213, 166, "Output",ExpressionUUID->"d0eb3c6e-513b-4a58-a30d-1da0c19c4f98"] +}, Open ]], +Cell[CellGroupData[{ +Cell[859099, 19285, 3779, 106, 152, "Input",ExpressionUUID->"7f89722c-8e55-4706-8dab-ab55bdb14f8b"], +Cell[862881, 19393, 651, 13, 22, "Message",ExpressionUUID->"209c0325-1cc9-4089-b43c-146157d458d0"], +Cell[863535, 19408, 651, 13, 22, "Message",ExpressionUUID->"edc0e392-08c6-4386-bcc0-836e4cd7ee44"], +Cell[864189, 19423, 651, 13, 22, "Message",ExpressionUUID->"146aef79-a163-483a-a4f4-df6aaca41f74"], +Cell[864843, 19438, 457, 10, 22, "Message",ExpressionUUID->"08cfb1e8-88e0-4c28-8e1c-9727017a0ff9"], +Cell[865303, 19450, 6017, 212, 166, "Output",ExpressionUUID->"d398dea4-9190-4270-8730-9d7642933e57"] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[871369, 19668, 168, 3, 68, "Section",ExpressionUUID->"9f9da50c-a1cf-4c4c-8d6b-299ea85a230a"], +Cell[871540, 19673, 4398, 129, 220, "Input",ExpressionUUID->"f9d396ae-40ac-434a-bfdc-4e291fe1549c", + InitializationCell->True], +Cell[875941, 19804, 1526, 41, 45, "Input",ExpressionUUID->"d4b774d5-63a0-4cc7-8361-92c71cc02ea7", + InitializationCell->True], +Cell[877470, 19847, 3673, 101, 162, "Input",ExpressionUUID->"63b3e1f4-4dec-4f64-8743-fb6324376933", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[881168, 19952, 264, 5, 29, "Input",ExpressionUUID->"7130bed3-4922-4086-9411-a42b6dd1b807"], +Cell[881435, 19959, 431, 11, 50, "Output",ExpressionUUID->"6026c673-8030-46f4-baaf-4c598d47e4be"] +}, Open ]], +Cell[881881, 19973, 1866, 41, 78, "Input",ExpressionUUID->"a3eb8740-47e3-4737-a9b1-c6428e3f30b1"], +Cell[883750, 20016, 4035, 131, 141, "Input",ExpressionUUID->"f35e4582-4228-4f38-a54e-dc5deec75b28"], +Cell[887788, 20149, 4370, 138, 123, "Input",ExpressionUUID->"570b3a93-4a1b-4fdc-8ae0-7d92ad4e6083"], +Cell[892161, 20289, 707, 21, 35, "Text",ExpressionUUID->"7060cfbc-b77e-468b-8e7d-f558d24eba5d"], +Cell[892871, 20312, 549, 15, 44, "Input",ExpressionUUID->"4eced9ab-7b5f-4bf1-a88f-605ce1ffbdcf"], +Cell[893423, 20329, 932, 30, 54, "Input",ExpressionUUID->"389193ae-8236-4257-b913-487956199d4b"], +Cell[894358, 20361, 716, 22, 57, "Input",ExpressionUUID->"8fd58b5d-2f2f-4bda-805e-569841bd16f8"], +Cell[895077, 20385, 201, 3, 35, "Text",ExpressionUUID->"d4547d36-e161-4d1c-a2aa-576fa7eb6bee"], +Cell[895281, 20390, 654, 19, 46, "Input",ExpressionUUID->"9532e944-f969-42bf-a2fc-aeb9654c4e1e"], +Cell[CellGroupData[{ +Cell[895960, 20413, 304, 6, 29, "Input",ExpressionUUID->"fd85473c-6105-4b0a-89df-3eae31b3dc2f"], +Cell[896267, 20421, 533, 17, 55, "Output",ExpressionUUID->"b3a469bf-a2a3-48f6-992e-570df1247c87"] +}, Open ]], +Cell[896815, 20441, 794, 22, 47, "Input",ExpressionUUID->"fcc5576d-e6b9-4da9-8091-360762076ff3"], +Cell[897612, 20465, 856, 29, 54, "Input",ExpressionUUID->"ecfc6037-2a15-47ff-a630-b175ec198f86"], +Cell[CellGroupData[{ +Cell[898493, 20498, 301, 6, 29, "Input",ExpressionUUID->"9aa55a66-2d47-4719-bf16-9988aafd98b5"], +Cell[898797, 20506, 571, 20, 55, "Output",ExpressionUUID->"d8e1148d-23a8-4aa4-ad30-4e0e301ba914"] +}, Open ]], +Cell[899383, 20529, 697, 20, 47, "Input",ExpressionUUID->"3503b2d6-b70a-437e-a15a-d9a52c1b9b32"], +Cell[900083, 20551, 882, 32, 68, "Input",ExpressionUUID->"f6aab86e-ebf1-4ff2-bb94-e5fc3880ad8a"], +Cell[900968, 20585, 1713, 42, 47, "Input",ExpressionUUID->"3de4ba35-172e-49aa-a188-9332858979e6"], +Cell[CellGroupData[{ +Cell[902706, 20631, 1349, 41, 54, "Input",ExpressionUUID->"a7292427-2115-4f9c-9f18-5da50ab59ccc"], +Cell[904058, 20674, 1582, 51, 57, "Output",ExpressionUUID->"f92f50e3-fefc-415c-a277-e7b714aaddb7"] +}, Open ]], +Cell[905655, 20728, 749, 24, 45, "Input",ExpressionUUID->"f0133067-570d-4433-82d6-c88b843d3b1f"], +Cell[906407, 20754, 750, 22, 46, "Input",ExpressionUUID->"9ea05b90-b41d-425b-99d3-515aeee0e280"], +Cell[907160, 20778, 809, 26, 46, "Input",ExpressionUUID->"d7df054b-9f62-40d9-a350-cb34eecdf02b"] }, Open ]] }, Open ]] } ] *) -(* End of internal cache information *) -