First commit.

1 files changed, 5464 insertions, 0 deletions

diff --git a/new_fitting.nb b/new_fitting.nb
new file mode 100644
index 0000000..984c5db
--- /dev/null
+++ b/new_fitting.nb
@@ -0,0 +1,5464 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='WolframEngine 11.0' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[       160,          7]
+NotebookDataLength[    266505,       5456]
+NotebookOptionsPosition[    260551,       5318]
+NotebookOutlinePosition[    260886,       5333]
+CellTagsIndexPosition[    260843,       5330]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[{
+ RowBox[{"\[CapitalDelta]", ":=", 
+  RowBox[{"15", "/", "8"}]}], "\[IndentingNewLine]", 
+ RowBox[{"\[Gamma]", ":=", 
+  RowBox[{"7", "/", "4"}]}], "\[IndentingNewLine]", 
+ RowBox[{"\[Beta]", ":=", 
+  RowBox[{"1", "/", "8"}]}]}], "Input",
+ CellChangeTimes->{{3.7063083106573963`*^9, 3.7063083329533043`*^9}, {
+  3.712334405178295*^9, 
+  3.712334412851521*^9}},ExpressionUUID->"453b2247-e031-4ce0-942e-\
+333cafb9d8bf"],
+
+Cell[BoxData[{
+ RowBox[{"B", ":=", 
+  RowBox[{
+   SuperscriptBox["Tc", "2"], 
+   RowBox[{"\[ScriptCapitalM]0", "/", 
+    RowBox[{"(", 
+     RowBox[{"16", " ", "\[Pi]"}], ")"}]}]}]}], "\[IndentingNewLine]", 
+ RowBox[{"\[ScriptCapitalM]0", ":=", 
+  SuperscriptBox[
+   RowBox[{"(", 
+    RowBox[{
+     SuperscriptBox["2", 
+      RowBox[{"5", "/", "2"}]], 
+     RowBox[{"ArcSinh", "[", "1", "]"}]}], ")"}], 
+   "\[Beta]"]}], "\[IndentingNewLine]", 
+ RowBox[{"Tc", ":=", 
+  RowBox[{"2", "/", 
+   RowBox[{"Log", "[", 
+    RowBox[{"1", "+", 
+     RowBox[{"Sqrt", "[", "2", "]"}]}], "]"}]}]}]}], "Input",
+ CellChangeTimes->{{3.710165117000553*^9, 3.710165135845058*^9}, {
+  3.710166812248849*^9, 3.710166813704604*^9}, {3.7101686184055443`*^9, 
+  3.710168639875917*^9}, {3.712332904286895*^9, 3.712332924319373*^9}, {
+  3.712336262642572*^9, 
+  3.712336263087694*^9}},ExpressionUUID->"8520f7d9-58a8-45e4-8f09-\
+0593a7effe0b"],
+
+Cell[BoxData[{
+ RowBox[{"Ch", ":=", "0.838677624411"}], "\[IndentingNewLine]", 
+ RowBox[{"C0", ":=", "0.0255369719"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Gs", ":=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"-", "1.3578383417066"}], ",", 
+     RowBox[{"-", "0.048953289720"}], ",", "0.038863932", ",", 
+     RowBox[{"-", "0.068362119"}], ",", "0.18388370", ",", 
+     RowBox[{"-", "0.6591714"}], ",", "2.937665", ",", 
+     RowBox[{"-", "15.61"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"\[CapitalPhi]s", ":=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"-", "1.197733383797993"}], ",", 
+     RowBox[{"-", "0.318810124891"}], ",", "0.110886196683", ",", 
+     "0.01642689465", ",", 
+     RowBox[{"-", "2.639978"}], ",", 
+     RowBox[{"-", "5.140526"}], ",", "2.08856", ",", 
+     RowBox[{"-", "4.4819"}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.710169173253154*^9, 3.710169184053568*^9}, 
+   3.710176296470265*^9, {3.7104325222932177`*^9, 3.710432528757256*^9}, {
+   3.710501137799197*^9, 3.710501138175331*^9}, 3.710501169167768*^9, 
+   3.710511723204533*^9, {3.710511776901121*^9, 3.710511777086232*^9}, {
+   3.710513569993368*^9, 3.710513570186606*^9}, {3.710947708992654*^9, 
+   3.71094771436915*^9}, {3.71138858519073*^9, 3.711388709847731*^9}, 
+   3.712333611380781*^9},ExpressionUUID->"5438519c-7952-4225-a1e4-\
+2658de13ea79"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"t", "[", "Tc_", "]"}], "[", "T_", "]"}], ":=", 
+  RowBox[{"Abs", "[", 
+   FractionBox[
+    RowBox[{"T", "-", "Tc"}], "T"], "]"}]}]], "Input",
+ CellChangeTimes->{{3.704741683097254*^9, 3.704741703621593*^9}, {
+  3.704966329354185*^9, 
+  3.704966331937989*^9}},ExpressionUUID->"d44f3e47-dc47-446a-9531-\
+356bd4f683cd"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"data", "=", 
+   RowBox[{
+   "Import", "[", 
+    "\"\<~/doc/research/sethna/doc/essential-ising_doc/data/data_square-4096.\
+dat\>\"", "]"}]}], ";"}]], "Input",
+ CellChangeTimes->CompressedData["
+1:eJxTTMoPSmViYGCQBGIQ/SO46bvZrNeOaybM/Qmi5d467A4B0ldyHPaAaJWL
+i6aFAmnFqJkzQXTrfb3sSCBt4s6dA6J9lvItTgbSsRcTwLTBRhn3lUA6JEAJ
+TN9dcoJpNZDWZz8Hpv95hHBuA9IH0iPB9Gmmn7v/AumwuX/BtEVM20EQzbx5
+Kpj+9+ynBfPs1471tyssQfRlUb7NIJpB5zmYXpR605wFSPckRVmA6OgZnFb8
+QPqRQqk1iBZ6xpIhDKQrmU2zQfQ24aDr4iDaJhJM83yVEu8C0qd6XoLpf3OP
+TLCY+9qxwuUamN7KXVKzCUhPWNdfB6Kfpb31j5r32vGHWGQAiN5eu6/wDZBu
+63kIpt/tLXwRP/+1o55dB5heYvxo30ogveYp134Q/VGb5cZFIH2FMQNM/+jz
+uAuiax7lgGkAt+fV8g==
+  
+  "],ExpressionUUID->"9c43836c-5224-4a7f-b325-f696ee8f0277"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"assData", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Thread", "[", 
+      RowBox[{"Rule", "[", 
+       RowBox[{
+        RowBox[{"{", 
+         RowBox[{
+         "\"\<L\>\"", ",", "\"\<T\>\"", ",", "\"\<H\>\"", ",", "\"\<E\>\"", 
+          ",", "\"\<\[Delta]E\>\"", ",", "\"\<M\>\"", ",", 
+          "\"\<\[Delta]M\>\"", ",", "\"\<C\>\"", ",", "\"\<\[Delta]C\>\"", 
+          ",", "\"\<\[Chi]\>\"", ",", "\"\<\[Delta]\[Chi]\>\""}], "}"}], ",", 
+        "#"}], "]"}], "]"}], "&"}], "/@", "data"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.7063080739089403`*^9, 3.706308196943145*^9}, {
+  3.706308240016282*^9, 
+  3.706308244511922*^9}},ExpressionUUID->"a43d9214-a29f-42c0-be11-\
+b311bd30fcba"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ht\[CapitalDelta]v\[Chi]t\[Gamma]", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"\"\<H\>\"", "/", "\"\<T\>\""}], 
+         SuperscriptBox[
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"t", "[", "Tc", "]"}], "[", "\"\<T\>\"", "]"}], ")"}], 
+          RowBox[{"-", "\[CapitalDelta]"}]]}], ",", 
+        RowBox[{"\"\<T\>\"", "\"\<\[Chi]\>\"", " ", 
+         SuperscriptBox[
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"t", "[", "Tc", "]"}], "[", "\"\<T\>\"", "]"}], ")"}], 
+          "\[Gamma]"]}]}], "}"}], "/.", "#"}], "&"}], "/@", "assData"}]}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.7084424185475073`*^9, 3.708442466974317*^9}, {
+  3.712334432699621*^9, 3.7123344426988583`*^9}, {3.712334506300148*^9, 
+  3.712334506475676*^9}, {3.712414174322257*^9, 
+  3.7124141746816587`*^9}},ExpressionUUID->"6084435f-1cba-48f5-b83b-\
+776c8904b43e"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"G2C", "[", 
+   RowBox[{"G_", ",", "n_"}], "]"}], ":=", 
+  RowBox[{
+   SuperscriptBox[
+    RowBox[{"(", 
+     RowBox[{"2", 
+      RowBox[{"ArcSinh", "[", "1", "]"}]}], ")"}], "2"], 
+   SuperscriptBox[
+    RowBox[{"(", 
+     RowBox[{"Ch", " ", 
+      SuperscriptBox[
+       RowBox[{"(", 
+        RowBox[{"2", 
+         RowBox[{"ArcSinh", "[", "1", "]"}]}], ")"}], 
+       RowBox[{"-", "\[CapitalDelta]"}]]}], ")"}], "n"], "G"}]}]], "Input",
+ CellChangeTimes->{{3.710431611671788*^9, 3.710431807930592*^9}, {
+  3.710431856538815*^9, 3.7104318583308353`*^9}, {3.710431919875804*^9, 
+  3.710431926395955*^9}, {3.7104319922690163`*^9, 3.710432021645361*^9}, {
+  3.710432077446334*^9, 3.710432079534667*^9}, {3.7104321123044033`*^9, 
+  3.7104321124801607`*^9}, {3.710432149639596*^9, 3.710432150055525*^9}, {
+  3.71043268970404*^9, 3.710432706152014*^9}, {3.710499171168581*^9, 
+  3.710499171640834*^9}, {3.7113887207043552`*^9, 3.7113887254325523`*^9}, {
+  3.711746644260429*^9, 3.711746646000889*^9}, {3.7123362695709867`*^9, 
+  3.712336270395398*^9}},ExpressionUUID->"8012ae8b-f509-4055-88d8-\
+6ab9179c5d6b"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Gs2Cs", "[", "Gs_", "]"}], ":=", 
+  RowBox[{"MapIndexed", "[", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"G2C", "[", 
+      RowBox[{"#1", ",", 
+       RowBox[{"#2", "[", 
+        RowBox[{"[", "1", "]"}], "]"}]}], "]"}], "&"}], ",", "Gs"}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.7113887305096493`*^9, 
+  3.711388752705145*^9}},ExpressionUUID->"9d6df2e9-b392-44e3-8d2d-\
+0d2fbd39108b"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"\[CapitalPhi]2C", "[", 
+   RowBox[{"\[CapitalPhi]_", ",", "n_"}], "]"}], ":=", 
+  RowBox[{
+   SuperscriptBox[
+    RowBox[{"(", 
+     RowBox[{"2", 
+      RowBox[{"ArcSinh", "[", "1", "]"}]}], ")"}], "2"], 
+   SuperscriptBox[
+    RowBox[{"(", 
+     RowBox[{"Ch", " ", 
+      SuperscriptBox[
+       RowBox[{"(", 
+        RowBox[{"2", 
+         RowBox[{"ArcSinh", "[", "1", "]"}]}], ")"}], 
+       RowBox[{
+        RowBox[{"-", "15"}], "/", "8"}]]}], ")"}], 
+    RowBox[{
+     RowBox[{"16", "/", "15"}], "-", 
+     RowBox[{
+      RowBox[{"8", "/", "15"}], "n"}]}]], "\[CapitalPhi]"}]}]], "Input",
+ CellChangeTimes->{{3.711388784468334*^9, 3.711388796618476*^9}, {
+   3.7113890628705187`*^9, 3.711389159296204*^9}, {3.7113893315569563`*^9, 
+   3.711389481334655*^9}, {3.71138985874389*^9, 3.711389938559081*^9}, {
+   3.711389984384206*^9, 3.711390030512754*^9}, {3.711390118386538*^9, 
+   3.711390123322785*^9}, {3.711392878404933*^9, 3.711392959726313*^9}, {
+   3.711393030990801*^9, 3.7113930689353456`*^9}, {3.7113933770364037`*^9, 
+   3.711393405821177*^9}, {3.711393734513516*^9, 3.711393753722184*^9}, 
+   3.7113937840344963`*^9},ExpressionUUID->"fe4cc6eb-7a17-4492-88c6-\
+d064203dafb1"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"\[CapitalPhi]2f", "[", 
+   RowBox[{"\[CapitalPhi]_", ",", "n_"}], "]"}], ":=", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     FractionBox["1", "15"], "-", 
+     FractionBox[
+      RowBox[{"8", " ", "n"}], "15"]}], ")"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     FractionBox["16", "15"], "-", 
+     FractionBox[
+      RowBox[{"8", " ", "n"}], "15"]}], ")"}], 
+   RowBox[{"\[CapitalPhi]2C", "[", 
+    RowBox[{"\[CapitalPhi]", ",", "n"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.71139385111989*^9, 
+  3.7113938884129877`*^9}},ExpressionUUID->"1f83e486-383e-46ee-b0f8-\
+0bcc636d076a"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"\[CapitalPhi]s2fs", "[", "\[CapitalPhi]s_", "]"}], ":=", 
+  RowBox[{"MapIndexed", "[", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"\[CapitalPhi]2f", "[", 
+      RowBox[{"#1", ",", 
+       RowBox[{
+        RowBox[{"#2", "[", 
+         RowBox[{"[", "1", "]"}], "]"}], "-", "1"}]}], "]"}], "&"}], ",", 
+    "\[CapitalPhi]s"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.711393802777763*^9, 3.71139382823591*^9}, {
+  3.711393894325083*^9, 
+  3.711393897628517*^9}},ExpressionUUID->"a7a65e56-b6ca-40ec-81b9-\
+c85c27760d23"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"\[ScriptCapitalY]", "[", 
+    RowBox[{"A_", ",", "B_"}], "]"}], "[", "X_", "]"}], ":=", 
+  RowBox[{"With", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{"Y", "=", 
+      RowBox[{"B", " ", "X"}]}], "}"}], ",", 
+    RowBox[{
+     FractionBox[
+      RowBox[{"A", " ", 
+       SuperscriptBox["B", "2"]}], 
+      RowBox[{"\[Pi]", " ", 
+       SuperscriptBox["Y", "3"]}]], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"Y", 
+        RowBox[{"(", 
+         RowBox[{"Y", "-", "1"}], ")"}]}], "-", 
+       RowBox[{
+        RowBox[{"Exp", "[", 
+         RowBox[{"1", "/", "Y"}], "]"}], 
+        RowBox[{"ExpIntegralEi", "[", 
+         RowBox[{
+          RowBox[{"-", "1"}], "/", "Y"}], "]"}]}]}], ")"}]}]}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.711124441710182*^9, 3.711124530878909*^9}, {
+   3.7111245683253117`*^9, 3.711124693735055*^9}, {3.711124986668089*^9, 
+   3.711124991547586*^9}, {3.711125054779648*^9, 3.711125060364771*^9}, {
+   3.711128839760344*^9, 3.7111288423582163`*^9}, 3.711745351025848*^9, {
+   3.712444782668785*^9, 
+   3.712444810334702*^9}},ExpressionUUID->"09618fc2-355f-4b7a-bdc9-\
+8e7737cc6527"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"f", "[", 
+    RowBox[{"c_", ",", "\[Lambda]_", ",", "n_"}], "]"}], "[", "X_", "]"}], ":=", 
+  FractionBox[
+   RowBox[{"c", " ", 
+    SuperscriptBox["X", "n"]}], 
+   RowBox[{"1", "+", 
+    SuperscriptBox[
+     RowBox[{"(", 
+      RowBox[{"\[Lambda]", " ", "X"}], ")"}], 
+     RowBox[{"n", "+", "1"}]]}]]}]], "Input",
+ CellChangeTimes->{{3.711745360060711*^9, 3.711745466429007*^9}, {
+  3.712332255645196*^9, 
+  3.712332264604857*^9}},ExpressionUUID->"3c937161-0a6e-438d-af4f-\
+3dd66630fd12"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"F", "[", 
+    RowBox[{"\[Lambda]_", ",", 
+     RowBox[{"{", "Cs___", "}"}]}], "]"}], "[", "X_", "]"}], ":=", 
+  RowBox[{"Total", "@", 
+   RowBox[{"MapIndexed", "[", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"f", "[", 
+        RowBox[{"#1", ",", "\[Lambda]", ",", 
+         RowBox[{
+          RowBox[{"#2", "[", 
+           RowBox[{"[", "1", "]"}], "]"}], "-", "1"}]}], "]"}], "[", "X", 
+       "]"}], "&"}], ",", 
+     RowBox[{"{", "Cs", "}"}]}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.711280376265687*^9, 3.7112804332866573`*^9}, {
+  3.711280475060844*^9, 3.711280512109704*^9}, {3.711280550958372*^9, 
+  3.711280551654231*^9}, {3.7112811962485027`*^9, 3.7112811998084784`*^9}, {
+  3.711281455683463*^9, 3.711281458996625*^9}, {3.711281515084396*^9, 
+  3.7112815266039762`*^9}, {3.711281568126196*^9, 3.711281568326316*^9}, {
+  3.711281600383168*^9, 3.711281600510542*^9}, {3.711382284101598*^9, 
+  3.711382289078205*^9}, {3.71138325877594*^9, 3.711383261815545*^9}, {
+  3.711411054298094*^9, 3.7114110558496113`*^9}, {3.711418094014813*^9, 
+  3.711418095509705*^9}, {3.7114181830506573`*^9, 3.711418188448765*^9}, {
+  3.7117454706317997`*^9, 3.711745559966292*^9}, {3.7117481414510612`*^9, 
+  3.711748141715679*^9}, {3.712332281997588*^9, 3.712332282091671*^9}, {
+  3.7123323947108173`*^9, 3.71233239659125*^9}, {3.7123324622153397`*^9, 
+  3.71233246228836*^9}},ExpressionUUID->"735d5501-1f21-45bd-8ed0-\
+f6cf093305c2"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"t\[ScriptCapitalY]", "[", 
+    RowBox[{"A_", ",", "B_", ",", "\[Lambda]_", ",", "\[Lambda]2_", ",", 
+     RowBox[{"{", "Cs___", "}"}]}], "]"}], "[", "X_", "]"}], ":=", 
+  RowBox[{
+   SuperscriptBox[
+    RowBox[{"(", 
+     RowBox[{"1", "+", 
+      RowBox[{"B", " ", "X"}]}], ")"}], 
+    RowBox[{"1", "/", "15"}]], 
+   RowBox[{"With", "[", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{"Y", "=", "X"}], "}"}], ",", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"\[ScriptCapitalY]", "[", 
+         RowBox[{"A", ",", "B"}], "]"}], "[", "Y", "]"}], "+", 
+       RowBox[{
+        RowBox[{"F", "[", 
+         RowBox[{"\[Lambda]", ",", 
+          RowBox[{"{", "Cs", "}"}]}], "]"}], "[", 
+        RowBox[{"B", " ", "Y"}], "]"}]}], ")"}]}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.711400051541917*^9, 3.7114001452974653`*^9}, {
+   3.711401123611092*^9, 3.7114011299546947`*^9}, 3.7114011637948437`*^9, {
+   3.711401560507028*^9, 3.71140156086724*^9}, {3.711401645931511*^9, 
+   3.711401650828912*^9}, {3.7114016912805643`*^9, 3.711401694636785*^9}, {
+   3.711402290374463*^9, 3.711402293474028*^9}, {3.711411058672563*^9, 
+   3.711411061746209*^9}, {3.7114110960824423`*^9, 3.711411096570217*^9}, {
+   3.711417941830036*^9, 3.711417944365245*^9}, {3.711418028207302*^9, 
+   3.7114180292548733`*^9}, {3.7114181957049837`*^9, 3.711418206729879*^9}, {
+   3.711745572708201*^9, 3.711745580595965*^9}, {3.711745629448295*^9, 
+   3.711745634093555*^9}, {3.711745793281616*^9, 3.711745807111754*^9}, {
+   3.711746292570936*^9, 3.711746293098068*^9}, {3.711746326494326*^9, 
+   3.71174632777686*^9}, 3.7117464177923107`*^9, {3.711747283012965*^9, 
+   3.711747294841539*^9}, {3.711747505898472*^9, 3.7117475236889877`*^9}, 
+   3.712332514882201*^9, {3.712334707430091*^9, 3.7123347230054617`*^9}, {
+   3.712334807076936*^9, 3.712334813014325*^9}, {3.71233601684032*^9, 
+   3.7123360175518208`*^9}, {3.712336047623122*^9, 3.712336047974897*^9}, {
+   3.71233798039786*^9, 3.712337993741922*^9}, {3.712338252324432*^9, 
+   3.712338281388233*^9}, {3.7123383286857233`*^9, 3.7123383339240847`*^9}, {
+   3.7123387438902597`*^9, 3.712338820451537*^9}, {3.7123388776141148`*^9, 
+   3.712338924638679*^9}, {3.712340141787671*^9, 3.712340142043068*^9}, {
+   3.712340545729707*^9, 3.7123405486970377`*^9}, {3.712341470496182*^9, 
+   3.712341474407735*^9}, {3.71234183036593*^9, 3.7123418305810213`*^9}, {
+   3.712354555968*^9, 3.7123545563597813`*^9}, {3.712354943966426*^9, 
+   3.712354955133952*^9}, {3.712415319222093*^9, 3.712415347484277*^9}, {
+   3.712415409126966*^9, 3.712415422437852*^9}, {3.712415854268941*^9, 
+   3.712415854838209*^9}, {3.712416016679778*^9, 3.712416017303521*^9}, {
+   3.7124170695470552`*^9, 3.712417078618964*^9}, {3.7124193543124943`*^9, 
+   3.712419364599393*^9}, {3.7124198922963953`*^9, 3.7124198935297413`*^9}, 
+   3.712444751854981*^9, {3.712444814901537*^9, 3.712444817925375*^9}, {
+   3.712444931415309*^9, 
+   3.712444932206974*^9}},ExpressionUUID->"3cc7a352-8e74-40d2-a8dc-\
+c80eb20715ce"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{
+    RowBox[{"coeff", "[", 
+     RowBox[{"A_", ",", "\[Lambda]_", ",", "\[Lambda]2_", ",", 
+      RowBox[{"{", "cs___", "}"}]}], "]"}], "[", "m_", "]"}], ":=", 
+   RowBox[{"SeriesCoefficient", "[", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "1"}], "/", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{"2", "+", "m"}], ")"}], 
+         RowBox[{"(", 
+          RowBox[{"1", "+", "m"}], ")"}]}], ")"}]}], 
+      RowBox[{
+       RowBox[{"t\[ScriptCapitalY]", "[", 
+        RowBox[{"A", ",", "B", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+         RowBox[{"{", "cs", "}"}]}], "]"}], "[", "X", "]"}]}], ",", 
+     RowBox[{"{", 
+      RowBox[{"X", ",", "0", ",", "m"}], "}"}], ",", 
+     RowBox[{"Assumptions", "\[Rule]", 
+      RowBox[{"{", 
+       RowBox[{"X", ">", "0"}], "}"}]}]}], "]"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.711125517648148*^9, 3.711125596028914*^9}, {
+   3.711126666838328*^9, 3.7111266715099497`*^9}, 3.7111268045836067`*^9, {
+   3.711128367184978*^9, 3.711128384456789*^9}, {3.711128921727463*^9, 
+   3.711128923577119*^9}, 3.711144855567177*^9, {3.711145027742408*^9, 
+   3.71114502943013*^9}, {3.711280668446847*^9, 3.711280730409648*^9}, {
+   3.7113826612331057`*^9, 3.711382679277907*^9}, {3.711383047597011*^9, 
+   3.7113830478424788`*^9}, {3.711384103841185*^9, 3.711384111734256*^9}, {
+   3.711384264405143*^9, 3.711384265063219*^9}, {3.711384436088707*^9, 
+   3.7113844376716547`*^9}, {3.711384620210237*^9, 3.7113846367455606`*^9}, {
+   3.7114004711968117`*^9, 3.7114004803133173`*^9}, {3.7117458319145947`*^9, 
+   3.7117458474622087`*^9}, {3.711745892439929*^9, 3.711745895023213*^9}, 
+   3.711747513293597*^9, {3.712332645436041*^9, 3.7123326555554657`*^9}, {
+   3.7123328272950077`*^9, 3.712332827454815*^9}, {3.712333057523223*^9, 
+   3.7123330584827547`*^9}, {3.712334565660677*^9, 3.712334566179604*^9}, 
+   3.712334911938224*^9, {3.712334968375413*^9, 3.7123349881834917`*^9}, 
+   3.712335636842126*^9, 3.712336613065865*^9, {3.7123393976391163`*^9, 
+   3.7123393986389*^9}, {3.712354572622405*^9, 3.712354573142272*^9}, {
+   3.712354959270417*^9, 3.712354968646373*^9}, {3.712444271229842*^9, 
+   3.712444280599669*^9}},ExpressionUUID->"e24f4a68-986e-4066-a581-\
+a6f6c7f2d0d4"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"tail", "[", 
+    RowBox[{"A_", ",", "\[Lambda]_", ",", "\[Lambda]2_", ",", 
+     RowBox[{"{", "cs___", "}"}]}], "]"}], "[", "m_", "]"}], ":=", 
+  RowBox[{"SeriesCoefficient", "[", 
+   RowBox[{
+    RowBox[{"-", 
+     RowBox[{
+      RowBox[{"t\[ScriptCapitalY]", "[", 
+       RowBox[{"A", ",", "B", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+        RowBox[{"{", "cs", "}"}]}], "]"}], "[", "X", "]"}]}], ",", 
+    RowBox[{"{", 
+     RowBox[{"X", ",", "\[Infinity]", ",", 
+      RowBox[{
+       RowBox[{"6", "/", "15"}], "+", 
+       RowBox[{"m", " ", 
+        RowBox[{"8", "/", "15"}]}]}]}], "}"}], ",", 
+    RowBox[{"Assumptions", "\[Rule]", 
+     RowBox[{"{", 
+      RowBox[{"X", ">", "0"}], "}"}]}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.711382718702981*^9, 3.71138276838371*^9}, {
+   3.711383050014797*^9, 3.711383050242051*^9}, {3.711383486475614*^9, 
+   3.711383487219301*^9}, {3.7113841207897787`*^9, 3.7113841220280952`*^9}, {
+   3.711384268220221*^9, 3.711384268620213*^9}, {3.711384440253104*^9, 
+   3.71138444152641*^9}, {3.7113846272494383`*^9, 3.711384639785527*^9}, {
+   3.711400490202056*^9, 3.7114005190520906`*^9}, {3.711400753032037*^9, 
+   3.7114007534423513`*^9}, 3.711400829464615*^9, 3.7114008766080503`*^9, {
+   3.711401200460012*^9, 3.711401215967461*^9}, {3.71140127622073*^9, 
+   3.711401299038*^9}, {3.711401431384166*^9, 3.711401431747507*^9}, {
+   3.711401514272585*^9, 3.7114015147667*^9}, {3.711401598631646*^9, 
+   3.711401615277038*^9}, {3.711401873244913*^9, 3.711401908855957*^9}, {
+   3.711401952182374*^9, 3.711401969867771*^9}, {3.711410990608663*^9, 
+   3.7114110720417433`*^9}, {3.711417992798225*^9, 3.7114180029502907`*^9}, {
+   3.71141803721391*^9, 3.711418037366577*^9}, {3.711418106640023*^9, 
+   3.711418108269602*^9}, {3.7117458591564293`*^9, 3.711745899593842*^9}, {
+   3.71235457920654*^9, 3.712354579718397*^9}, {3.7123549736706543`*^9, 
+   3.712354981054162*^9}},ExpressionUUID->"a56bfbaf-960b-4015-a85c-\
+09cf0b8bfac6"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"coeq", "[", 
+   RowBox[{"gs_", ",", "\[CapitalPhi]s_"}], "]"}], ":=", 
+  RowBox[{"Join", "[", 
+   RowBox[{
+    RowBox[{"MapThread", "[", 
+     RowBox[{"Equal", ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"MapIndexed", "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"G2C", "[", 
+            RowBox[{"#1", ",", 
+             RowBox[{"1", "+", 
+              RowBox[{"#2", "[", 
+               RowBox[{"[", "1", "]"}], "]"}]}]}], "]"}], "&"}], ",", "gs"}], 
+         "]"}], ",", 
+        RowBox[{
+         RowBox[{
+          RowBox[{
+           RowBox[{"coeff", "[", 
+            RowBox[{"A", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+             RowBox[{"c", "/@", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"Range", "[", 
+                 RowBox[{
+                  RowBox[{"Length", "[", "gs", "]"}], "+", 
+                  RowBox[{"Length", "[", "\[CapitalPhi]s", "]"}], "-", "2"}], 
+                 "]"}], "+", "1"}], ")"}]}]}], "]"}], "[", "#", "]"}], "&"}], 
+         "/@", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"Range", "[", 
+            RowBox[{"Length", "[", "gs", "]"}], "]"}], "-", "1"}], ")"}]}]}], 
+       "}"}]}], "]"}], ",", 
+    RowBox[{"MapThread", "[", 
+     RowBox[{"Equal", ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{
+         RowBox[{
+          RowBox[{
+           RowBox[{"tail", "[", 
+            RowBox[{"A", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+             RowBox[{"c", "/@", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"Range", "[", 
+                 RowBox[{
+                  RowBox[{"Length", "[", "gs", "]"}], "+", 
+                  RowBox[{"Length", "[", "\[CapitalPhi]s", "]"}], "-", "2"}], 
+                 "]"}], "+", "1"}], ")"}]}]}], "]"}], "[", "#", "]"}], "&"}], 
+         "/@", 
+         RowBox[{"Range", "[", 
+          RowBox[{"Length", "[", "\[CapitalPhi]s", "]"}], "]"}]}], ",", 
+        RowBox[{"MapIndexed", "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"\[CapitalPhi]2f", "[", 
+            RowBox[{"#1", ",", 
+             RowBox[{
+              RowBox[{"#2", "[", 
+               RowBox[{"[", "1", "]"}], "]"}], "-", "1"}]}], "]"}], "&"}], 
+          ",", "\[CapitalPhi]s"}], "]"}]}], "}"}]}], "]"}]}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.711127768307501*^9, 3.711127777695016*^9}, {
+   3.7111283766727448`*^9, 3.711128377696988*^9}, {3.7111284816258497`*^9, 
+   3.7111284816982107`*^9}, {3.711131012722617*^9, 3.7111310128725157`*^9}, {
+   3.711131057739306*^9, 3.7111310578028603`*^9}, {3.711131165946952*^9, 
+   3.7111311660267153`*^9}, {3.711131960721342*^9, 3.711131990641569*^9}, {
+   3.711132058898202*^9, 3.711132083083659*^9}, {3.7111321363398542`*^9, 
+   3.711132155308148*^9}, {3.711132193205224*^9, 3.711132196106987*^9}, {
+   3.711132401064698*^9, 3.711132407496299*^9}, {3.7111324534170637`*^9, 
+   3.711132453512753*^9}, {3.7111331754354*^9, 3.711133181724448*^9}, {
+   3.711133732917274*^9, 3.7111337748935003`*^9}, {3.711133832767126*^9, 
+   3.711133835918847*^9}, {3.711144591615869*^9, 3.7111445918151817`*^9}, {
+   3.711144909236732*^9, 3.711144909372231*^9}, {3.711280742761245*^9, 
+   3.711280748577429*^9}, {3.711280839939365*^9, 3.711280850923047*^9}, {
+   3.711382786464031*^9, 3.71138280952666*^9}, {3.7113828400460377`*^9, 
+   3.7113828424829884`*^9}, {3.711382877868333*^9, 3.711382886339211*^9}, 
+   3.7113829268554983`*^9, {3.711383125961887*^9, 3.711383126075973*^9}, {
+   3.711383483565281*^9, 3.711383489695387*^9}, {3.71138412809828*^9, 
+   3.71138412902487*^9}, {3.7113841730654907`*^9, 3.711384188223826*^9}, {
+   3.71138422562675*^9, 3.7113842257412*^9}, {3.711384642985208*^9, 
+   3.711384653521617*^9}, {3.711384696867886*^9, 3.711384704785922*^9}, {
+   3.7114005267610483`*^9, 3.711400587253001*^9}, 3.71140082638897*^9, 
+   3.711401282974221*^9, {3.71140201479671*^9, 3.711402219743505*^9}, {
+   3.711402363763309*^9, 3.711402367384304*^9}, {3.711406409575788*^9, 
+   3.711406418562105*^9}, {3.711410537834981*^9, 3.711410541970874*^9}, {
+   3.711410630708232*^9, 3.711410641729927*^9}, 3.7117457104609213`*^9, {
+   3.7117458841467867`*^9, 3.711745910024816*^9}, {3.711746207521892*^9, 
+   3.7117462119921637`*^9}, {3.712332776039748*^9, 3.7123327808388968`*^9}, 
+   3.712338154642107*^9, {3.712354151450596*^9, 3.7123541515700703`*^9}, {
+   3.712354236259856*^9, 3.7123542424513407`*^9}, {3.712354986415963*^9, 
+   3.712354990287594*^9}, {3.712444490417069*^9, 3.712444492633418*^9}, {
+   3.7124449517274313`*^9, 3.712444964327435*^9}, {3.7124451511488533`*^9, 
+   3.712445155450884*^9}, {3.712445520812173*^9, 3.7124455251061563`*^9}, {
+   3.712447007906191*^9, 
+   3.712447011001156*^9}},ExpressionUUID->"92da139b-a52d-4447-9324-\
+99e506e4eec1"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"coeffSolve", "[", 
+   RowBox[{"gs_", ",", "\[CapitalPhi]s_"}], "]"}], ":=", 
+  RowBox[{"Solve", "[", 
+   RowBox[{
+    RowBox[{"coeq", "[", 
+     RowBox[{"gs", ",", "\[CapitalPhi]s"}], "]"}], ",", 
+    RowBox[{"Join", "[", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{"A", ",", "\[Lambda]"}], "}"}], ",", 
+      RowBox[{"c", "/@", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"Range", "[", 
+          RowBox[{
+           RowBox[{"Length", "[", "gs", "]"}], "+", 
+           RowBox[{"Length", "[", "\[CapitalPhi]s", "]"}], "-", "2"}], "]"}], 
+         "+", "1"}], ")"}]}]}], "]"}], ",", "Reals"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.710187645373934*^9, 3.710187671781014*^9}, {
+   3.710187714694552*^9, 3.710188080676458*^9}, 3.710188310648212*^9, {
+   3.7101884321961327`*^9, 3.710188455017291*^9}, {3.711125814630831*^9, 
+   3.711125829480744*^9}, {3.711125990185895*^9, 3.7111259902981167`*^9}, {
+   3.711126411297247*^9, 3.71112641160216*^9}, {3.711126675478744*^9, 
+   3.711126676893127*^9}, {3.71112678535808*^9, 3.7111267872720537`*^9}, {
+   3.7111271649423943`*^9, 3.7111271657720947`*^9}, {3.711127784151555*^9, 
+   3.711127785415187*^9}, {3.711128390641011*^9, 3.711128391329144*^9}, {
+   3.711128477114607*^9, 3.711128477274085*^9}, {3.711131062570588*^9, 
+   3.711131062641337*^9}, {3.711131161684704*^9, 3.7111311617960978`*^9}, {
+   3.7111312178129873`*^9, 3.711131238180999*^9}, {3.711131775254218*^9, 
+   3.7111317757418547`*^9}, {3.711132349408059*^9, 3.711132349582994*^9}, {
+   3.711132394536049*^9, 3.711132394735704*^9}, {3.711133737435302*^9, 
+   3.71113376923734*^9}, {3.7111338406382837`*^9, 3.7111338581907167`*^9}, {
+   3.711134488665099*^9, 3.711134489648821*^9}, {3.711135170475876*^9, 
+   3.7111351741398*^9}, {3.711142432245284*^9, 3.71114243898098*^9}, 
+   3.711142950557087*^9, {3.711142991469988*^9, 3.7111429916378317`*^9}, {
+   3.71114459782337*^9, 3.711144597999036*^9}, {3.711144700609076*^9, 
+   3.711144700792609*^9}, {3.711144912466927*^9, 3.7111449125636578`*^9}, {
+   3.711145133943836*^9, 3.711145134415825*^9}, {3.7112808379851093`*^9, 
+   3.711280855433352*^9}, {3.7113828527074747`*^9, 3.711382852806621*^9}, {
+   3.711384228452677*^9, 3.711384244958742*^9}, {3.711384656769746*^9, 
+   3.711384702282771*^9}, 3.711387237369863*^9, 3.7114009024351*^9, {
+   3.711402106280443*^9, 3.711402111019196*^9}, {3.711402317036561*^9, 
+   3.7114023259426947`*^9}, {3.711402374902124*^9, 3.711402377663019*^9}, 
+   3.7114043707832108`*^9, {3.711745930473428*^9, 3.711745931147093*^9}, {
+   3.711747231465534*^9, 3.711747241851837*^9}, {3.711748272260783*^9, 
+   3.711748289728723*^9}, {3.712333084492065*^9, 3.7123330916760817`*^9}, {
+   3.712333437555957*^9, 3.712333563437696*^9}, {3.712333648783169*^9, 
+   3.712333706390777*^9}, {3.712333793785727*^9, 3.712333802977302*^9}, {
+   3.712335610010169*^9, 3.712335611410121*^9}, {3.7123541116649923`*^9, 
+   3.712354118696906*^9}, {3.712354247643244*^9, 3.7123542477067413`*^9}, {
+   3.712444455976335*^9, 3.71244450800416*^9}, {3.7124448370949306`*^9, 
+   3.712444838629472*^9}, {3.7124448993824177`*^9, 3.712444920982739*^9}, {
+   3.712444976607883*^9, 3.712444988153257*^9}, {3.7124451425056543`*^9, 
+   3.712445142849566*^9}, {3.712445517415395*^9, 3.712445517495449*^9}, {
+   3.712446999952668*^9, 
+   3.712447004336327*^9}},ExpressionUUID->"d1c2ab88-8346-4b96-8358-\
+7032ddc9b592"],
+
+Cell[BoxData[{
+ RowBox[{"n1", ":=", "6"}], "\[IndentingNewLine]", 
+ RowBox[{"n2", ":=", "1"}]}], "Input",
+ CellChangeTimes->CompressedData["
+1:eJwl0Xs01AkUB/BJsbukbZxJaSMiOVJJmrXCGAlJWE20k7JJxNhFm9MwNnph
+U3mVJhWxHYYeqlMTk12Pdns4nWJUjLVi2h0xIY9SsWt/37t/3PM593vuuX/c
+axEeF7RLh8ViSZiCac633KLLtPz1mjby3dBN4xhGZ+8asj3sC3MYtL6UdOH1
+2UKvVedXwS0tV0OhrekNUpuQvwOW1RSTLNW+Kvja8vNrlCdxTUWMDancRVA2
+vdsOxpZkr4DJJl9eh9cHnEkXyfx6eM7xQwN0P3qxGTbvrCDzAj91j2VcYDWT
+tI8pDoCPxaVkcuugELb3DJP7r9hEwQ6DZaTGr14EhRVV38OrZ4VnYbS69hzk
+5BrdhWJLY3LeWslD6HPKuwnqT5v7HF4sSlHBH+7k9cPCgMRhKC8d1f+OMTBi
+ipwzXBYBg3Iuk9Yvs8SQH16SBD+2ZufAPsOcPJjR9egK5F55QvoPVN6D/y4z
+fgClc2e3wjwzI/KIdclkPKP3oTKy0Fj3ZAKjVXtHAbQp/kYN06IkpGt1kAam
+qy21MCFY4LSH0cgihPTUW7od5st9voXldaezYOjxQjJSnJUN557LJdUigVaD
+v6/eRkaKWQa9jNuXp5MWbkpb6LVxjz08NPFIAHVSmkn/tNp86JddR8a2nK14
+xTiuKiI1h/5pgbOCpynhm9CLgiHGX81lpMvu1GSY1Nspgdl3eSXQjBvwvyPh
+Kth9fqsaWlj4rnqDu/D9yUbpcjdY+ZUD+fH4gZHT5Vp+V+rXozA9Z8pAynhJ
+PGMmPNo3ZgVnBHvYwmOC7SugvcrOAe7KmhEHAzbok4My4U3IXhBGyoUdTdDB
+cs0jWPq+vRd6KPvIoxFTWujke2oUZmRKWGcYxYo0MnMswwg6Hv+DA/efqZoH
+lZm/mUL/Hyctod4bEyvYpPWLKWS02RBE3p0V6S6XafnLlQmkTN2ygfrxZ+Qr
+x7ZLUPF+nOTuezEIpW49pJdT/nsYnlFAVrrWKW8j92skOxQu3fD+QTey/nFf
+RDXjQs1LEZzpt1ivhlHngSfp/FHGhtz0S+SeSZ+FMK050RrqGW1yglGyYHK0
+KMUN5g8J3KHy2eJ1kBNY4wXtsl7uh39u+yQVPg1ekQk382LJwVi2FN5ZYk3q
+XI6+DZPlBeTh3FRzBfbM4i2Cg4d3aOoZhSd3kic2HuiHi6PTSTOPTcOwPmoX
+meQX9pbmeLtJVliiTgPju/EksvDJbEOYIrEkO6/1mUBr6QTpmWJnDo/l25M3
+HYaXwaDqXFdo7NEYAmNC7pF7WyuS4E8T10jzG5PlUMGbIneU8x/Coq5+Uoc9
+4tnGOF8r84bq9siOLsbaKIdOeEKRmv0C/31+mOT4ci/Ae+XrSqGRCacKVq00
+IWtVrb/ArFvtpLCiQt7NWJ3zdw0csw007GHcVhBCZjT0smFt2QBpo367GSY2
+TZKh7N9HXjOauvSMwqLPfv4AY9feJk1dV0/B3ck8MjFKojfAuCR6qz7U11xl
+w8rVbA400/3LFq6cmL4UpjRKubB4vYK8sPP6Ouj7gO8L/SdFB2FbZzy5N6E5
+Dz6re0pqgw1K4Br5bJLlpVsJzfUcyDHdoRp4fssIyRGNuQ4yDj2fIOdbL4qE
+AtOlZKRPrQiOOKrIOfGX42B1wX3yPzu/TIw=
+  
+  "],ExpressionUUID->"8ba3b735-f852-4740-89e2-f8c994bad666"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"sol", "=", 
+   RowBox[{"coeffSolve", "[", 
+    RowBox[{
+     RowBox[{"Take", "[", 
+      RowBox[{"Gs", ",", 
+       RowBox[{"{", 
+        RowBox[{"2", ",", 
+         RowBox[{"2", "+", "n1"}]}], "}"}]}], "]"}], ",", 
+     RowBox[{"Take", "[", 
+      RowBox[{"\[CapitalPhi]s", ",", "n2"}], "]"}]}], "]"}]}], ";"}]], "Input",\
+
+ CellChangeTimes->{{3.711402337632412*^9, 3.711402351662695*^9}, {
+   3.7114023967578573`*^9, 3.7114024042290993`*^9}, {3.711402530271908*^9, 
+   3.711402530448357*^9}, {3.711402973108058*^9, 3.711402973282971*^9}, {
+   3.711404378367446*^9, 3.711404383905211*^9}, {3.711404441194911*^9, 
+   3.711404441698839*^9}, {3.711404527701469*^9, 3.7114045282460318`*^9}, {
+   3.711406208078418*^9, 3.711406237139463*^9}, {3.711406433285026*^9, 
+   3.711406446136756*^9}, {3.711407032828783*^9, 3.711407033572945*^9}, {
+   3.711407114582775*^9, 3.7114071329362583`*^9}, {3.711411115426866*^9, 
+   3.711411119610133*^9}, {3.711417881117146*^9, 3.711417881827758*^9}, {
+   3.7114179119648952`*^9, 3.7114179121243362`*^9}, {3.7117459506504517`*^9, 
+   3.7117459660158567`*^9}, 
+   3.712445710306643*^9},ExpressionUUID->"75b34247-c730-423b-886d-\
+59f5cb6deb5a"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Solve","ratnz",
+   "\"Solve was unable to solve the system with inexact coefficients. The \
+answer was obtained by solving a corresponding exact system and numericizing \
+the result.\"",2,426,97,30792052569587397139,"Local"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{
+  3.712444854547719*^9, {3.7124449691448708`*^9, 3.712445010621546*^9}, 
+   3.712445158417512*^9, {3.712445530262022*^9, 3.712445543121759*^9}, 
+   3.712445592274822*^9, {3.712445705808455*^9, 3.712445710756302*^9}, 
+   3.712445778931396*^9, 3.71244590563651*^9, 3.7124469661051273`*^9, 
+   3.7124470149985113`*^9, 3.712447286922311*^9, 3.712447330073927*^9, 
+   3.7124473606150637`*^9},ExpressionUUID->"c9598ffe-1b6f-4d29-a03f-\
+f11061c66e05"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"resol", "=", 
+  RowBox[{"Select", "[", 
+   RowBox[{"sol", ",", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"Re", "@", 
+        RowBox[{"#", "[", 
+         RowBox[{"[", 
+          RowBox[{"2", ",", "2"}], "]"}], "]"}]}], ">", "0"}], "&&", 
+      RowBox[{"AllTrue", "[", 
+       RowBox[{
+        RowBox[{"#", "[", 
+         RowBox[{"[", 
+          RowBox[{"All", ",", "2"}], "]"}], "]"}], ",", 
+        StyleBox[
+         RowBox[{
+          RowBox[{
+           RowBox[{"Im", "[", "#", "]"}], "\[Equal]", "0"}], "&"}],
+         FontWeight->"Bold"]}], "]"}]}], "&"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.711126827992573*^9, 3.711126845896306*^9}, {
+  3.711383601704068*^9, 3.711383619609501*^9}, {3.711747647769277*^9, 
+  3.7117476511440487`*^9}, {3.712332422688661*^9, 3.7123324227838182`*^9}, {
+  3.712335588842856*^9, 
+  3.7123355892479343`*^9}},ExpressionUUID->"6dea207c-d325-4f70-83ed-\
+c79db3de75a8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"A", "\[Rule]", "1.9587948504211927`"}], ",", 
+    RowBox[{"\[Lambda]", "\[Rule]", "13.406002473610284`"}], ",", 
+    RowBox[{
+     RowBox[{"c", "[", "2", "]"}], "\[Rule]", "0.005982642818925599`"}], ",", 
+    
+    RowBox[{
+     RowBox[{"c", "[", "3", "]"}], "\[Rule]", 
+     RowBox[{"-", "0.0035566417258866543`"}]}], ",", 
+    RowBox[{
+     RowBox[{"c", "[", "4", "]"}], "\[Rule]", 
+     RowBox[{"-", "0.15416659855707585`"}]}], ",", 
+    RowBox[{
+     RowBox[{"c", "[", "5", "]"}], "\[Rule]", "2.9857410707789906`"}], ",", 
+    RowBox[{
+     RowBox[{"c", "[", "6", "]"}], "\[Rule]", 
+     RowBox[{"-", "51.636467816428926`"}]}], ",", 
+    RowBox[{
+     RowBox[{"c", "[", "7", "]"}], "\[Rule]", "239.3186208235674`"}]}], "}"}],
+   "}"}]], "Output",
+ CellChangeTimes->{
+  3.71112684772051*^9, 3.711127167502366*^9, 3.711127263563253*^9, 
+   3.711127734852036*^9, {3.711127891343577*^9, 3.711127965598741*^9}, 
+   3.711128277679661*^9, 3.711128427260337*^9, 3.711128512593253*^9, 
+   3.711128849804503*^9, {3.711128927459*^9, 3.711128956559329*^9}, {
+   3.711129835176065*^9, 3.711129874486671*^9}, {3.7111299479001503`*^9, 
+   3.711129959916041*^9}, {3.711131002485588*^9, 3.711131079106924*^9}, {
+   3.7111311389116373`*^9, 3.711131169122946*^9}, {3.711131220502434*^9, 
+   3.711131240199974*^9}, 3.711131270758545*^9, 3.7111317885930643`*^9, 
+   3.711132201548139*^9, 3.7111322402806873`*^9, {3.711132411047985*^9, 
+   3.711132425680193*^9}, {3.7111324558088093`*^9, 3.711132474911468*^9}, {
+   3.7111325115956306`*^9, 3.711132534409734*^9}, {3.711132892133135*^9, 
+   3.7111329029155416`*^9}, {3.7111331770233517`*^9, 3.711133209422481*^9}, 
+   3.7111332613681793`*^9, {3.7111333615537786`*^9, 3.711133389015579*^9}, {
+   3.7111334995121813`*^9, 3.711133581590208*^9}, {3.711133785056485*^9, 
+   3.711133788077322*^9}, {3.71113384350084*^9, 3.7111338673752127`*^9}, 
+   3.711134495488867*^9, 3.711134661391077*^9, 3.711134853561689*^9, 
+   3.711135031744586*^9, 3.711135089875717*^9, {3.711135280319158*^9, 
+   3.711135286870617*^9}, 3.71113538603419*^9, 3.711141863168076*^9, {
+   3.711143057840811*^9, 3.711143095814589*^9}, {3.711143720717564*^9, 
+   3.711143770254261*^9}, 3.711144387985478*^9, 3.711144608495792*^9, {
+   3.71114467984442*^9, 3.711144707200704*^9}, {3.7111450476995983`*^9, 
+   3.7111450577050123`*^9}, 3.7111451251136637`*^9, 3.711145754477867*^9, 
+   3.7112807678757153`*^9, 3.711280863336578*^9, 3.7113830543241463`*^9, 
+   3.7113831311889887`*^9, 3.711383276414392*^9, 3.7113833895280037`*^9, 
+   3.711383493010149*^9, {3.711383612000029*^9, 3.711383645784315*^9}, 
+   3.7113838010599527`*^9, {3.711383898638966*^9, 3.711383945317296*^9}, 
+   3.711384727087088*^9, 3.7113869314470177`*^9, 3.7113872589905567`*^9, 
+   3.711400627259748*^9, {3.7114007605396957`*^9, 3.711400775924486*^9}, 
+   3.711400833514181*^9, {3.711400893884923*^9, 3.7114009307848387`*^9}, {
+   3.711401141410986*^9, 3.711401170327198*^9}, {3.711401208213293*^9, 
+   3.711401228253015*^9}, {3.711401287449333*^9, 3.711401302493699*^9}, 
+   3.7114013965571957`*^9, 3.7114014364872923`*^9, 3.711401519161151*^9, 
+   3.711401566139608*^9, {3.711401603041353*^9, 3.711401618375593*^9}, {
+   3.7114016629357853`*^9, 3.711401752478468*^9}, 3.7114024261590776`*^9, 
+   3.711402887868083*^9, 3.711404385969921*^9, 3.711404445271946*^9, 
+   3.7114062190153313`*^9, 3.711406647910049*^9, 3.711407037353334*^9, 
+   3.7114071177492943`*^9, 3.7114071823978357`*^9, {3.711411106194289*^9, 
+   3.711411120569405*^9}, 3.711417883069405*^9, 3.711417917110334*^9, 
+   3.711745989010577*^9, 3.711746158819243*^9, 3.711746302961667*^9, {
+   3.711746335454427*^9, 3.711746394301255*^9}, {3.7117464247171373`*^9, 
+   3.711746452126339*^9}, 3.711746938262602*^9, 3.711747244222775*^9, {
+   3.7117476336860323`*^9, 3.711747651528306*^9}, 3.711747684143216*^9, 
+   3.7117479061889973`*^9, {3.711747942075696*^9, 3.711747988377726*^9}, 
+   3.711748024304606*^9, 3.711748248784582*^9, {3.7117482974278507`*^9, 
+   3.711748347467708*^9}, 3.7117484114110537`*^9, 3.71174847986862*^9, 
+   3.711751018643577*^9, 3.712331922955222*^9, 3.7123322940326033`*^9, {
+   3.712332399460648*^9, 3.712332423074317*^9}, 3.71233246600548*^9, 
+   3.712332520873538*^9, {3.712332649515435*^9, 3.712332661756093*^9}, 
+   3.712332933216043*^9, 3.712333060519957*^9, 3.712333689179837*^9, {
+   3.712333778890033*^9, 3.7123338084750433`*^9}, 3.7123345771941957`*^9, 
+   3.712334710657847*^9, 3.712334876241708*^9, 3.7123349794758463`*^9, 
+   3.712335372009775*^9, {3.7123354625234337`*^9, 3.712335481396208*^9}, {
+   3.7123355792070637`*^9, 3.712335589454562*^9}, 3.712335624062875*^9, {
+   3.712336025759777*^9, 3.7123360512912273`*^9}, {3.7123366803727427`*^9, 
+   3.7123367384648867`*^9}, {3.71233816281131*^9, 3.712338284799004*^9}, 
+   3.712338338713687*^9, 3.712338372063933*^9, {3.712338420996147*^9, 
+   3.712338436058208*^9}, {3.712338475139687*^9, 3.71233849101685*^9}, 
+   3.7123402325531673`*^9, 3.712354251462027*^9, 3.712354325872079*^9, 
+   3.712355015753613*^9, 3.712419777254176*^9, 3.712444516287922*^9, 
+   3.712444560739027*^9, 3.7124457117055693`*^9, 3.712447016892515*^9, 
+   3.712447287159154*^9, 3.712447330096336*^9, 
+   3.712447361096211*^9},ExpressionUUID->"f96cb453-4aad-4678-95fd-\
+d5b0d301ffe9"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Show", "[", 
+  RowBox[{
+   RowBox[{"LogLogPlot", "[", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"\[ScriptCapitalY]", "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"\[Pi]", "/", "2"}], " ", 
+           RowBox[{"C0", "/", 
+            SuperscriptBox["B", "2"]}]}], ",", "B"}], "]"}], "[", "Y", "]"}], 
+       ",", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"\[ScriptCapitalY]", "[", 
+          RowBox[{
+           RowBox[{
+            RowBox[{"\[Pi]", "/", "2"}], " ", 
+            RowBox[{"C0", "/", 
+             SuperscriptBox["B", "2"]}]}], ",", "B"}], "]"}], "[", "Y", "]"}], 
+        SuperscriptBox[
+         RowBox[{"(", 
+          RowBox[{"1", "+", 
+           RowBox[{
+            SuperscriptBox[
+             RowBox[{"(", 
+              RowBox[{"0.0705991", "/", 
+               RowBox[{"(", 
+                FractionBox[
+                 RowBox[{
+                  RowBox[{"\[Pi]", "/", "2"}], " ", 
+                  RowBox[{"C0", "/", 
+                   SuperscriptBox["B", "2"]}]}], 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox["2", 
+                   RowBox[{"11", "/", "16"}]], " ", 
+                  SuperscriptBox["\[Pi]", "2"], " ", 
+                  SuperscriptBox[
+                   RowBox[{"ArcSinh", "[", "1", "]"}], 
+                   RowBox[{"15", "/", "8"}]]}]], ")"}]}], ")"}], "15"], 
+            "Y"}]}], ")"}], 
+         RowBox[{"1", "/", "15"}]]}], ",", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"t\[ScriptCapitalY]", "[", 
+          RowBox[{"A", ",", "B", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+           RowBox[{"c", "/@", 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"Range", "[", 
+               RowBox[{"n1", "+", "n2", "-", "1"}], "]"}], "+", "1"}], 
+             ")"}]}]}], "]"}], "[", "Y", "]"}], "/.", 
+        RowBox[{"resol", "[", 
+         RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+       RowBox[{"0.0705991", " ", 
+        SuperscriptBox["Y", 
+         RowBox[{
+          RowBox[{"-", "14"}], "/", "15"}]]}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{"Y", ",", "0.001", ",", "10000"}], "}"}], ",", 
+     RowBox[{"PlotRange", "\[Rule]", 
+      RowBox[{"{", 
+       RowBox[{"0.00001", ",", ".05"}], "}"}]}]}], "]"}], ",", 
+   RowBox[{
+   "ListLogLogPlot", "[", "ht\[CapitalDelta]v\[Chi]t\[Gamma]", "]"}]}], 
+  "]"}]], "Input",
+ CellChangeTimes->CompressedData["
+1:eJwd0n0sFHAcBnCZUq1DzssfdBOtu63M65VWydlSbKldijIvveiF7OT1vJXp
+Ni8jZaWbq5MUV/TCysUuVtHRJtoh0yKLVJxTbipv9Xu+fzz7/Pf88zzrj0vE
+MaYmJiZCFujvyZ8/Wz0hEmi/WMQy3UOabGHb0Bz5yrzVDer8sj2gIWdQCBuT
+67fAD2WemVCQHHYJzvu65MEMdVE+1F5dpoBH6/LIsJlPvDim88URspl73RUm
+KORk52bBOxhZoiDN1hZUnGNqcn+o4JJk+hHkd3V3wDUbYnrjmVH+XeR+WfFi
+AnM2MnAJLrqNl55nBlv+uQZrX1aPQbvWmknotTJjWyIzZ1U2maa5FQId3laS
+ywtf9DxlfnSp64MHFryHoLxUOQyPmPcPf0Xf7OURqKk6wR9nKnfvE8Cs3Puq
+b8wF3WMys57TA8Upr8m2KqdQA7PB40I4vF3WFAujjZ3klbR1CugcwSfNRR0t
+MChqVyv8rrLVGWgvMTkpMRuFA4HWZPSMymcaPZ4p2+EoV5QI42t7k+Cbu9Is
+uDpdRvqXu7v+ZKbaF5BBBo4QaktUO2BAuqX1L2a+rQPpY4zbA7kcKal09JPC
+7vBT5ODWm7nQovSYDHqHJqUamfZjqaQyh9P2m+no1d8BW7LkczdqJkROz9Sm
+cmbaE+FG2FfPE8ABzdhOWMe18YVFAZ/18PChB1PQWV8sKWdaFVaQm+4N7m1U
+sV8lD5GSWruDaqaTupgskeT/hW7B0n/w/Rldw3Omd7tpM6w0iqehTWQE6X5H
+ytEzG1eEWMH2h/qTU0yeVHYa/gdpr96K
+  
+  "],ExpressionUUID->"e92029ad-cc6c-439d-99f4-348213864b01"],
+
+Cell[BoxData[
+ GraphicsBox[{{{{{}, {}, 
+      TagBox[{
+        {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwV13c8le0bAHAj2xkch+Mc8+AklFLRq3KOEgmVmazM7KxQiWhoGT/ZMlJW
+VpGV0XMpEpUV6TUyQqWyRyF+9/vX+Xw/9+d5zj2u67qvR9bRx8SFg42NzYid
+je2/X/a+y9fuZNMgo4aRL2yJg8v/jj68lE6DrfejLcSRlwd0X3ok00C6hsEj
+hOz3uWjU6h4N9kXX5okh/xwhshtE0+BC60gMAfnsl0CZ/bdo8GAqXkYUeXSi
+n6l8jQZnJqYSJZBtvjHP0MJo4LDw7IUI8sepnDCBizQ4f01VgYZcvPHuYtRJ
+GjTcVvosh2zBkPSN2aRC0dNn0urIXYpXY8NWqYBjGPjtRDZU/lp6bokKC0JG
+r/Yiv95u2G43SwXZNF6u/cjaO8t+Hf9BBWws7/Z/4/VqojjmJBUy0i41aCKr
+7w1RUR2lghzTZJSJXKYxYiA9SAXPCeWU/8ZVNI94EvqosPH7Uul/4+zHvc/+
+r5QKQR9k7un/N9/ABpt7tlR4l+7jYodcnX8vhGxJhXT29lpr5Jf/uqalmFBh
+2uaGsAPyp4PCnzL1qPB7+GabEzInt6tp0S4q7OjosnJHtkoiHmviooJAb8ji
+eWTeaieN5RJxcJ4wlIxBJn3fZ3GxQBwWko7PRiFL0fCB6w/FYde7XL845D1X
+aso5UsThh7plVwLyGT3cDsJVcXijk1h+H7mqr0pe0UIc6pL/XXmM7PybT9hq
+gwIu83J5b5DtQtSPaf6hwP0B1bS3yJYbjlepixToUcy8045sEhFbuzpNAR3L
+yisdyEZb6uf7v1MgQ8/Npxv56M1vSnXjFPiZruv1AfkQP9np/jAF+tQGbD7+
+t9/Ecx+seynQm71m1o+8Mz5N4EAnBaR2DJ4dQFYSbTks8ZYCtbeMTn1Glk9d
+CFlvRu8vGvAf/m+9EjIVg4DGg+WdxpApWYY/6+sosDBjdusLsjD9onxGFQVU
+X/2qGEcWzM21CS2jwL9O5IKvyDyK3Qm2xRQQfrI6+A258FSamIMVBWYSFFME
+TuMgp//1CW1zCjyKf5mIR860Xbgpe5IC54WWpInI95wMf48eocCl3OVyEeQQ
+n41Pjrso0G/buCqJbHjTMc2ZlwLPwsJEdyHPVClJulWJweRIauppZHxvFdGx
+TAz0NuwlbJB3LBzaYlMsBmMKtId2yF6q1j9OPBQDdTzPcyfkb/l3n2vEiEGN
+apnwOeSRlJ/mPGfFIPGLkv115O5LpTF5ZDGw6ZTPLkeeS9G8+oAoBvO9a8mV
+yMTq14FpAmLAsF68V4N8fOGzTQy7GFz2+p7wAvmtJ0E56Jco+Jtfa21DbrLx
+bTnSLAoaEoO548iVWmpsE+dF4Y2rZwPVCsVL1I4FPx9ReEetyJNCFulXmtxw
+F4VTerxcdGT/QLl3lDOisDsicH4b8s5ikRRDfVHwKuzk1kQuFF9RrZAUBZdI
+uqsVcuZi3Zlrr8mg8memMgvZ6FCNCbGRDM8Sdag5yOuxFUcy6sjQmx9TU4Bs
+rVyiXP2UDIQtd3vKkCmOmStTaWTYDI++04Qc3xEea+JDhkgBob9TyLcKj2Cy
+FDKMTxQzDlrjgKGf+laARIZ9+wM1DiE3f/3Zt4Qjw8gvpeN6yBwKCbOtnGTg
+873hYYx8OWtM1n9GBLTf/JlzQfZLuHL95WsRaPwT6fg/ZKuw5/pOgSJQeaL5
+whTybwmchZGvCAQcrnWYRU6us3fU8BSB0yPWGsvIPb95QgQcRGDtouwODhsc
+nAiwKH5mKAJFZKdDVGQdtwX8FnkR6FV69McAebvJ9p6cbhJ8DHaKqES2kZkb
+ln1PgnSP5bl65DvTFT8yW0gg/mfeqwn5250DnKn1JMD63iZ8QM55ZaAWnUeC
+DGuf4/PI1L0e/wu8hFyTWb7LFgfclHxDXToJeB2C2Z4j7530sHwlQYKvfb0f
+G5GdK3Y4s8RIEG6sC23IjSerQjQFSRB67XDhIPLl282FO5aFQTvRVYbdDgfz
+q194xdqEweQfKTdD5OEhmeavfsLgmCf+9yeymp5OVJiXMMipwtEV5MinrqZk
+V+RA5Xz2MygfrpWOHrIRBmq53G1R5MuKBzYydIXhVkPvGguZGnBKw4wmDIfX
+FBNTkC14Yx5DkxDIbISpm9qj+PIr8z2FCcHhdRX3M8gb/T0a08+FYPSZVrEn
+cm4J7TXtiRD8ORFtfx150eTxWFCqENhMGiVWIcdlNNG2nxOCgmf31KQccPBO
+bS06VUwIXOi46VVkwq/Ac9HCQjCWL+7I64jqYf7s8QicECR33honI3+iTRLc
+OYWAi9kltQt5fEtX3L4ZIuwXr3JyQ17/mJfY95oISw7pu/uRVUJMMshBRMiK
+fnz/rRMOfPa+D+XzI0JhWpPZAHL5jJ7dX08ifL4SK/sDeZ/zQekJByLsu5Oy
+zO+M4sVIMbvCiIjuzfU4A2Qb6Y0cUwUiDEnNZnYiU26anpZ7TIADNpodUy44
+eGG1TXxXJgFS4isbNpBddmx+0oonwBhRo0X4LPq/3kJLq1ACbA++rrIf2UCe
+wzLOmAC8V7m1o5HDGp9abP7Bg031+Up1VxxMrOHMBo7hYXfhal+WGw6iOr6Q
+vjPxMKIY61eNrPbo+YflPXgICEhR6kAOO+ZiKiyNh/ae2L8byJTUehP9BVQn
+pcO22buj+qnuaVx9HwfuxKRGRQ80H983x+N/CkLGeQW1Hk8caEwaaluPCUJA
++LXD08j11l275T4Jwj3vykBeL3T/6/ZTnr0SBNVozYMHkfslfo51pwnCmdtH
+bAuQOVoJwcL6gmByR4v7hjcOjGVPZcXlCoCsxs5tp31QP5I0EHf6vgCcTy7L
+D0a2ErS/LhsnANRbVwyTkJ1X3NzLLgvA/vd1fD3IF95f2t1lisZxv04Z++Lg
+wcXMFiKHAFj8qfM29cPBbNfETKwdP5DLXw0FBeAAC912+q4ZP/iHXuxKRY7Z
+5v0y8hg/GONJs/XIyhGLCaHq/BCf01PKeR71Uzs5NT3x/FC/t0sjHnkoRua6
+7gs+eGzCzKsNxEGbgTXlryQfyO7fFaByAQepK5kRv0l8YB6UpWyO7PZobGqB
+jw88m5rIYcjca+4NU0u8ICFpGt6JrF14wfHTe16YFJOoDL6IgxrepOJnobyg
+5GrS3XEJ5UtzJ8tjiAcyYw/FF4TiIKFzseBuNw9IP/nOPYh8fYAiVNLCA1kn
+4l8QwnDgOGc/OlPGA5zkrWvByFKScxGBkTywUTVSbnAFBynnhV6Fq/JAegvZ
+ky0CxYucyZHkCG5gpQvezL6O7tMdQSU1QdzwM0hL6TOyxz9p5H5Pbng5RJGk
+3cCB/omxCQkLbhCwM1lIROYO8Y98qMQNAUEq3rGROAjvvtdS8oELrNR+zcbd
+wsH5iA/6TQpcQKqy2fopCvUjO/LGs2hcUJio/ZIaje7HgQtXQoS4QJfnUKkt
+ctEeqUq1v1vA8SUxZBx57KubTHbPFtjdbD6/FIPi5fjGcui1LXC8+lixYhyq
+V7RtORqjnJD4LZqvMxHld8uaFqmPE6xYQ5GSSeh8zrf/O/2OEybVxhw8kV3a
+Awh5NZxQ+6hejTcZB+kRLy6J/I8T5iMSDXRTcMD/zdR4TosT6A/sanvScPC1
+ImyjMJ0DHpb25x98gOITdqUUx3FAy81c/Szkpnfju0ojOSBfw8uDPRvF3/gx
+lzJfDvB0tVFuQbYUEXtXrcMBql+W6ywfofkEPElt+skOocpVjxLycFCqNrLn
+8wF2eNWQijtfguajFd8+vIsdvAwNWyeR7xzTdRtlsMNnoTqKVSkOXB2L748T
+2UGtNz7w0BMcyNy7wPFjnA0WW19pUstQ/Zwjdq5EsUGKpeC9yQocfLe/9pFe
+u4m9VXsat1KP8mnCdSUqZxPrEBgpD2lA83E3pKzEbGJFiQoX2V6g+u1Ptnrr
+tIlxGk+tCGDo/K/nDwXgNrELmwYflBpxMJX/drzJfgML/2FSdKsZfX9MkxbO
+8vzFQl99NWtrR/Uv4Depa24d+5sVmeTcger3yuCe/YPrmETf6aRN5GK2vCBC
+2Tr2YmXug0YXDryF961WW61jOg1n7Mo+4GB6rw07X+kaFi1scq71E8rfyzmE
+IrNVTKTZ8178FxxIHplMvM1axUi1BvT94zg4hlOUcFNZxVb0Zn2+IOdmFCkq
+bFnF6lcj9dQn0XpflGtnPfuDudbz/x3/hs5rEwLihf9gplI6Kq7TKB+uDvWF
+dK5gI5QFwpZV1I8ck7azql/B5m6Q+pqQ54UdxvcVrGDNtoKBkWuoP3o0Prt0
+ZQU75NmxT/AvqmdNP/h8VVcwXsuKZVk2PHhxre53jlnGrt5I5g7mxgPzlugD
+Q8MlzG263+09CQ+leHH5YPUl7M7x3z4NIniQSKQVZMssYScVBBJKyXj4nS3z
+dHlxEWssua+RIIaHp3VK8CBjETPTshb0puFBZkZrZHF6AXOQOjVtLocHdgtX
+mYy4eWwHJahNENV530H3nJaQeQzqFcroe/Hw2dFLcd5lHiMMhff/o46HWh+/
+nXqa85i3j/Sq5z48+N8OYc2NzWEnMa/Y4QN4GKuPtT+yZw5zLv61lUsXDzf1
+fLUHSmaw0QMPh01Oo/cNqIqI35jBjgYqSIdZ4WGP78ykhc0Mdsx8Mq3QGt07
+KeeiuvlnsBOYrQGPHR40p7z6Wl2nsWaD8ZIORzxMR7l718j+wjRKa90yvPBg
+1u2Ympg4hR1NYtfdE4GHwrN0rw9eU1hkwln67atofWujWkI6U9h6wDPb4Wto
+/+QcxqPmv2Mlrf5LsZF44Ak8o3r9xHfs4vj9N+xRaH1iNs3+fN+wYQPWimIy
+HmRtzedOhE5gv15bmESX4mHVOwlTMJ7A7r55lLHzKR66w/qi1+QnMKFF4ye9
+ZXi4+uC0Uv67cUzL7IGyQiXajy+2Thu0cey9WO3Tf+vw8NDjbG9x7RjmG3dq
+d1orHnRnp/1Js8PYua8Jltcm8bAs5EfAkoex+5WGOo7f8JC3e6HIgzmMFdYc
+VDg8hQfu4JXxxpjPGHm09B3/NB5a/m5a+G4fwo7t4R0oW8LDUQGh/e89+jHv
+CX+mPRcB9Bm7OW9O9GBmF6YCjjIIcHS11Lw9pgfzPK48b6dIAN12pQLyvh6s
+1nM4PFiJADpBdKOcOx8w2c/bekt3EID1Wii5UbUbM3ZYvqKuQYBz70bMfy+0
+Y7lWNFLRUQIYGFrnjkk0YaWHh5rVvAlQyVyrvStym+mk4P6Gp4EAOb4+dtUp
+cczn+dtirmDoeW2HYcX8JKZ+jrbHn0YCRPg9nOVyfMA8+D3RfeE1AURIkfPf
+wgqZAucistm6CCBZxAg5ZVPNvGuP7w+fIAB9JQjDv21mBsYkVBJ4iSAvmeXg
+wdHL7CxNs+FSJ8J27aKrsla9zFNDTmEFGkRQd6l+9Kmsl6l+8/tfw3+IoF/S
+MaHr8JEpctKEknaACOcOsnnIQR9z/UFMq85hItTYOvgPhvYzffax4gdPEsEo
+U+7a8T/DzG3a/xiJexOhjmBmIn5hgkmSDbYafUwE3TRpimD2BPPAR/zHhiIi
+dMr/GNponWAO5H+6f7+ECOP/XHUfp00y24JVeKzLiIB3fhr+BJtk3mr76Py9
+hggONYJPjvB8Y259o35J5w0ReByaBfyTppjBMc8Hlr4SwbRcvbmtYob5Pjm9
+zVhZCG7f8KvnGF5kRg1cbGVHfXKFLCXvwclV5jr7s6nyIGFIbvfep+CyyTzv
+TTPJ0yDBwyX97eYBHCxntwGbdSkRuOoXi9fcysWKua5lD6JkeBGoonOvmIeV
+uV4/fAovCsNlZY0ebvysVoLdvjtK6Ls0KCa+akmQVV64+eYciwJOBRmV8kEE
+VugNtroXVuKgeLst9raoEItQuMBSS6KCEcf8uVorYdanOVj1eUUDl2Scv3It
+iZXxacp3hSAJhbNm0hYcZJaciIbx4DEpqAivXBTSEWVNfG788/KqNJSp8E/j
+ssVYBEdzsa+eMjCYfifu1SSFxUmcrOQSlIVVxU3L53pUVsIu98emtbIw9CPq
+KOshjdUk0pApcJYO0/66Y+ETEiz11BXnTG45mCMvZrHrSLEMGXg2/ko5oIe+
+5zlwV5oloCJ5RsxSHqJwI285z8qwfqZU1pN/y0O4x4dcPhFZljKf7ra2XAW4
++3jQzKtKlhWvf2VuSY8B3yYMPLSfy7Jeinaotx1jgA697opovSxLfUU7NNOI
+ARtpqYXQKMti5dzB6ZkywD/Kgo38XpYVzHN5f4odA6x8OosavsiyLuTdeqsZ
+yIBte5s4CEJ01kUTjvLwhwyI9NtNGSfRWTdV2inmuQwYK3m4/bkonfUoISZ8
+WwED0hkRlk4SdNYB+GrSXcIAIkWrtHornSX46iOH/HMG/F6tPm2vRWfd1rkZ
+09LBAHONrT57teks0iW2LendDCgPSLrOr0NncXadvuTbywCvn+efVOjTWWFb
+CtzFBxgwMrSLi8+czrJo/Z+J5yQDDlKzqZ9P0VkZR763M78zIM2CuPOZFZ2l
+a0wxFPnJALOOaStbezqr22vpaMMcA8oE7HzVnOisRuXsN3GLDMAffX+D5yyd
+pfhJSv/sCgP1AwfuD7qh9Rl5t2muMqAFip6WedJZ8253DQl/GfB/Enr/mw==
+
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145318#1"]& ], 
+      TagBox[{
+        {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwV13k8VF8UAHD7PgtjGDPWsUT2SqQyo1CWiCR7tmTLTosolFTST0kohSQh
+RaRQ7yhLJZQo2WlIyL5F8bv9NZ/v57557953zzn3PDmPIJsjHGxsbPvY2dj+
+/bJ/PR1/KYcGfvck4kXscXD622Duqds0uPXOZpME8mK3yWu/mzTQmX45REQO
+6SsadLxGg9xU+Thx5IkBIrv5FXT9EZofAdn7e4Ts9kQaZA7cXSUjDw53MVTj
+acC+0hgsiew8yjhMi6GB9rh7hijyl7G8GMGTNCihl6xTkYvXPpxM2k+D152K
+lfLIdkpSwcnrVIC+Ews6yJ+U467GrFBBsbbLRAvZQvVHSeACFcS/5Kf/G29Q
+t2hxnaYC5261Ln1kQ63SX5bjVKhWTXX9N16zSQzHGKHCcwPta//Gt+pEqWkO
+UkHg96cKBnKp7oC5TA8VwoLCA/6Nq+kb+xO+oufhkuL+jbNbHvP+r4QK9K0B
+Xqb/5hvx0vmaCxW6l5Y2uyJXPrgWRbangvJ+kYtOyK+/Hc1Mt6GCs+H5ATfk
+zp0inXf2UGF/x9+bnsicPEcPFGlToTJAc4MvsmMa0ayOmwrCPmmvwpH5Kj11
+Fx9JQLBG6tAVZNJPPbuTBRJwgWJckYQsTcNH/MmVAHVx860pyFvOPC/jSJeA
+pTqHG6nIh/fgNAhxEsDGbxZxC/nZ12cKynYSYL/WV/kQ2WuZX8RxjQK2S4Fu
+b5Fdo7aa6f+mwF4nOdsmZPs1jzjqPAX2PNExakG2ib1atTJJgdmwWb1W5H1c
+NbNdPyngE2+m3Ia898LoxmoWBaTPNSt8Rt4lQPa81U+BDft5yF/+vW9i4Gen
+DuR3x4S6kLWuZwru+EgBBeUZqW7kjWKNuyWbKNDUy4XvQ1bImIv6U0+B49+3
+qPT/W6+kbHkPUCBGQkZiCJly12KippoCG+Omd35HFqGfVMh6RoE3TSp+LGSh
++/edo0spQPWZcf6BzKvclupSTIEnmyNTRpELD2WKuztSQOSWvYmgAw7yuhqs
+DA9SoDjx4m488h2XuQty+ykQGWjTTEC+5mmxPGhMgQn9M4dFkaOC1jo9tCnA
+NpdxXwrZ4oJHphcfBSzKel5qIU892yjl80wcjlenbnNAxnc8I3qUikPiwlC1
+E7LG3C4u52JxyM6RN3RFDtB0GrfKFQfHRuohT+TRB5df6CaLA122veQY8kD6
+xEFeb3F4fcFyOR657VRJcj5ZHCIPNWuVIc+k68dlE8Vh/y+xDRXIxMqGiExB
+cajcHyv3HNlyrs85mV0cgMue/gq5yZ+gGvlLDOKeFtu+R65zDm40rheDwJ32
+aizkCoNNbMPhYuDttrqN6ojiJUljLiRIDHgv/keXRhbt2jiy5isGUzpaZ+WQ
+QyPkP1AOi8Hly9oBKshaxaLpFqZisGvzw+htyIUSS5rlUmJw9TdnpwPynfnq
+w/ENZJiUkqDeRd6367kNsZYMst3p0feQ/1wtN86qJoPyuBCtANlJ9ZFq5RMy
+5LQ76JQiUzzuLI1lkmHq/NSPN8jXW89etQkiw9eTbgfGkBMLjTE5ChkY0T+O
+7XDCgZJpRpMgiQzt++uiDZHrf0x8XcCR4drBK9dNkDkUU6ffcZLBe0agZD/y
+6btDcqFTopCvXKl9BDkk9cy51w2iQA48mXkV2THmhalnhCi0iqhl/0RelsTZ
+7QsWhbY5ocQp5JvVbh66/qIgKZ3hvIDcvswbJeguCt+LNK3ZnXFgFWZX/NRC
+FJ56crhLIBv5zOG5FERBdUKGYI6sbqPentdGgvVfp+LLkZ1lZ/rlmklwkPx4
+thr50mT5+J1GErycMwt4gzx6aQdnRg0JPr1wTmlDzntjvulKPgneDzgazyBT
+dfz+izhFgq7jA1laLjjgoTywMKGTgF7W0VaJrDPiZ/9GkgSswOsPANmrXMOL
+KU6C+5NuV98h1+5/FqUvRIL97sKR3cinL9YXaiyKwJdjZ4fXkWdXvvOJvxcB
+TWlnGXNXHPT3ytb/CBGB8oyGtHHkTXuMkmICRKCZfmFgATnhydED5KMisN7B
+v5PtMMqH+JLBXc4iMKqoQiMjn1besZZlIgLnv/AnMJCpYYd0bWkiYL1lG+Em
+sh1f8kOoE4aHl5WTrd1QfIWUBh/ChGGA/eYrF+S1rnbdyRfCwKbove6LfP8R
+rYH2WBg+uSs9jkOet3k4FJkhDFbjeV3lyClZdTT1QGEwfPjBS9IdBx82rV7J
+EBcGW4FLS8vIhF8RgVdEhKFtgurL44Hq4YNpy1icMCRYCv4kIXfSRgi+nMLA
+/dRCWhOZxfUpRW+KCJsk/tp7I//5kn/jawMRbnn1kjqR1aJsssiRRDiRYGH1
+zhMHQTrN0fwhRFBwOMP9Dblsao/rX38iZNu5to4i63ntlBl2J0JX5Lk7fF4o
+XvYp55TvI0KB8qK6KbKzzFreAUUifO40p7cgUy4ccJB/SAC9l/bSo0dw8MpR
+RUL7DgEKBun8f5CPaKx3GlwnQOL2STzRGz2vo9DeMZoApagU6SGbK3DYp1gT
+QHNRKPQSckztE7v133gIrxRp3HwUB8OrONtuMzyo1GTm3/bBQVLrd9JPBh68
+h5q3lyNvuvfi8+IWPBi2BU03IceYHTkgIoOHPXYJVavIlIwaG9M5HDx08W13
+9kX1c6u/deUtHBRp7tyj6IfmE/zW8vqEEJTOWvl89MeB7oiFodOQEGjLtYeP
+Idc4fdos3ykEfSuKuVwB6Pw36aI8fSMEvtqdh7chd0lODLVlCsGVkBn/PGSO
+d4TjIqZCwNzwcfzsMRxYyx26m3JfEM67R1baBqF+JK07xeGWIBAnTLTCkB2F
+3M7JpQhC5kvn1hRkryUf39LTgqD+RiS2FflE86nNnw4Igk9kX6VFMA6yT95p
+JHIIgmRhRJZlCA6mPw1PXXUVAPmb5AchYTjAolUcLtsKgAmJmZqKnKxy7HWC
+mQBskjYprkRWjZ1Pjd4qAArdjS5ryN5anPr+eAFQcxtouhKOg95k2XMmr/iB
+r2KcoyICB+/NnSh/pfjBXMfNUekEDjKW7sQuk/hB1nKDoBWyz72hsTl+fljo
+u/XrODLPqu/LsQU+0Ksp2vse2bDwhEdnMx/oHOVwDTmJg+d8acVPo/ng5Zcw
+/XenUL7Uf2T69fJCPGU9JCcaB6kf5wsut/FC69hUdzvyuW6K8KNGXnjG+eUi
+XwwOPGbcBqdKeSHtdVVZMLK01ExsRAIvNEWF7zI6g4P0cOE3ZzV5YQuPSMHy
+WRQv8jbGN2N5wCd6jpRxDp2nGpGPnkfyQM/P3KIOZL9tmeQufx5I1Bm/JnIe
+B6ZWQ8OSdjygJv/J+goyT1RoQu5GHtiw1+h2QgIOzrZda3z0mRse3FZ4lZiI
+g/DYz6Z1itzAej0q35KE+hGNfNZdGjcsqoqWEa+g87H7xJkoYW4w+2OWcgC5
+aIt0xaa/XGCRe9CoC3noh49sTjsX2I5bXBhPRvFiubYYHc8FnwuiO6RSUL2i
+qeTpDnJCVcXqvrobKL8bVw1IXznBw9ejRjgN7U94y7fJD5zwucE/8TDykZYw
+Qv5zTqB3kbf/Qb4d++qU6H+cMJuQL6afjgOB0QPWMwaccO6FKu/bTBz8KI9Z
+K7zNARLVWaOa2Sg+QTu9OIUDftieOJ6CXPeBpV2SwAF3H285P4eczTI7UhrM
+AfWetTIvclD/Jir+odKIA3Y/POhhdg/NJ+xxRt0EOxwRHS84n4+Dkk0DW/p2
+sINl62KV5yM0H4PrLf3a7KA4rub2BfmSmYnPoBI73DZmyzAtwcFRj+JbLCI7
+wF2jt9qPcSB77QTHOIsNuF9+1OJHRSNlhvhxKYkNitixt+3lOPjpFv+FXrWO
+ZUzTtVg1KJ+Gjy4l5a1jOr5Suj4v0Xx8LShLyeuYqYLA9wnkwlCyY5PnOqan
+W6a2/Art/7kHvWG4dYxTSuW2WC0Oxh40serc1rCTzr43wurR98ckac6b9y82
+eNXI62kLqn9hy6RPM3+wML++hH2tqH4v9WzZ3vMHsy2NOzqKXMyWH0ko/YOV
+7jbwlv2Eg2MieiuVjn+we9MzwRmfcTCp48zOX7KKaf3VO/mkE+Xv6TxCke0K
+Nr4Y4X/iOw6kjEduXGSuYK2W1G8yLByY4ZQlfdRWsEWqPddb5PtZRcqKXCtY
+HcfdNOoIWu+rMsO7T39jEfhw7O0o2q91CLsu8hs7mTz0wXQS5UNc79eoj0vY
+s9jHpqzfqB8xk3F1rFnCqNK1o3kr6DwVcWfpFSxhHEUnXL1XUX90jzW9cGYJ
+866Q/TT+B9WzunH+YM0lbLDfe4yNDQ8B3CvbvZIXMW5brQe2PHhgJIplW1gs
+YCzK/LYCEh5K8BIKx7cuYDLCevh0UTxI3qAV5MguYF/WVdcTyXhYzpF9sjg/
+j+VUF28PFMfDk+qNkJ01j/UzVgxMaHiQnTIYmJ+cw+TiQoPV5fHAbndUNitl
+FsMO7yob2IyH4B7fvMaoWawlJd/5X93v8whQnj0yiz3u8jTFbcVDVVCI1h79
+WYyruXnSQA8PoRejmDNDMxh2v/Zy6Q48DNVcdTPeMoNxb/aV7zDGw4U9wYbd
+j6awM77xN6Qd0P26NUUlzk9h4YJW10wd8bAleGrEznkKszHmbIpwwqP+ODCp
+TWAKs41zm//kggf9sYCv745OYt2694wyPPAwmeR77LncL6zP2ea9VwAebNs8
+Mm7cGMP82HOXFs/iodCbHvA5YAyL7P143jwOrW910EDYaAwjjMWH5sSj9yfv
+zkqa/YnxJw35WyfggTfisOY5q5+YAlvi39rLaH3izvWh/KPYQuPDGyNpeJBz
+OThjFT2MtThRQo1L8LByLA1TtB7GElZ5HUcf46Et5uuVVYVhrO1yK++VUjzE
+ZTtsfPCBhUmJllV1l6P38d3Fc43GwtrKvPKTq/GQ6+fdUVw1hImpm3ebv8OD
+yfRkKGm6Hxt2H51TH8HDonAIAbvZj4l/TPcVGsVD/ua5Ij9GP3Yvvv/zxE88
+8BxfYtUm92FvqwlJT3/hofHvul2wei/GQ5Iqt1/Aw15B4e3Nfl3Y33t/VDm5
+CWCqtJnzwnA7ZjS4zPZdkQB7V0oOtiS3Yyr56QvLGwhg0rKxgKzXji0Zzvwm
+biSAUSR9X96lz1hXkLXuHg0CMBuEb9ZqtmGp592KPmwlQOCHgYPLcy3Y4dL4
+4h17CWBu4XR/SLIO81+vzakKIEAFY7XqsuhFhnPH7viTNQTICw5yrUxPYXRm
+Um5Mv0L/N3TvV36QxhB7517jW0uA2JDcaW6PbIZAg5+VRwMBREkJs6MxhYzC
+mJ/3Aj4SQKpIKeqQcyXDqmnXzxEWAehLkRi+qZ4hqS95rIYX9VlSd939ODoY
+ik7ZPfd0iKBuWBQn59jB8Oz5cMJElwhbj1Te6yztYKTsXg8Z0yOC6aPWYRP3
+LwyN4YzorTuI6DuJzU8evjK0x8/w9e8iwnMX99Ce6C4G91KNe+h+Iuy7Ix9v
++bufwdHtlXc/gAjVBFsbiRPDDA9L6432D4lgkilDEcoZZvzXcHtxcxERPiqM
+9669G2ZUMbYLCT8iAmtbnC+LNsLYkpcm2vqECHivJ2cfYyMMIWJhjuNzIrg/
+F3pszDvKqDcwGXvcSARe93rB0LQxxjPOJ6u2P4hwoGxr/fvyKYZRj43KjY3C
+cPF8SA1H/zzjON+aOtsrYSiXo+Rn719h9PzSWzGNEIGbLcf0FI+sMypkjno+
+1yFB7oKp+sEwDqbQsy0JeyRFIS7kKl5/Azczol8n948IGV5FqBldK+Zl+r8i
+bNvBLwb9paW1fj4CTIEY4YpweXFwjky+/mxBiJkYvvy8dysFPAuyKhQiCcxd
+c5r6K/skQPni+6sXxYSZ609dqIPnqLCPYzawylGEWbrdf2N+MQ2O3MSFqlaR
+mDdpntbFM5JQOG0rY8dBZtZL8CuPyEtD+dmKeWEjMeZKjFxPrrUMlKoJTOJy
+xJlSVT32gxay0HP7UsqbEQpTNdTpq+SILKwor9u/2ENlRupe4JBIkoPe8aS9
+zFwa0+zkcClLgw6ToSZDZ4clmU/HBnenNtBhhjx/l91ImunA/6O2F+00PbqZ
+d8dlGeZtl1oNcS4FSMINNHF6yzLtgx7xaGYqwFm/z/f5ReWY9//uej2+QxEu
+P+yxDXgmxzRw9f1W1q4Io8PmfoYv5JhSh2OP2X9VBCN69RmxGjlmtWk029o3
+RVjLzCiEWjlmpJuSvGm/IoQm2bGRm+WYzQOeTv0/FcEx6GPRy+/ofoMv0gXX
+FUFFp46DIExnppkvWHmqKEFCyGYKi0RnSj2lveFTU4KhR7nqL8ToTLtwK50S
+DSW4rRRr7ylJZ0Z2fBf7vVkJiBSDksoNdObNuMGWZAMlWF6pdHAzoDODnuiS
+qg4owUHdDUE6hnRmalzt8cN2SlAWlnZOwIjO3O3k383loAQBE+GPy03pzJ4s
++WwrVyUY6NXm5j9IZxZfNZYZ9lGCndQcat8hOnOgYfL0JX8lyLQjaj11pDOr
+++CbZqAS2LZOOrq40ZlnuVn/nQpTglJB1+BNnnRm+3bdcZlIJcDvbT7P601n
+FuRUGtWfUEL9wI5bPT5ovXu8s/yilKARip6U+tOZbDuNFggxSvA/wOjyJA==
+
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145318#2"]& ], 
+      TagBox[{
+        {RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwV1nk4VO0bB3DGvpwZM2PGmCFMSESlLK+3OHpVtlRIki37liVLyZKtRUkv
+yhpJopBSCqXOTZZfksqSCllCRdlFEr/n/etcn+s557qe5zr3/b0fBZcAS3cS
+Dw+PFC8Pz39P3u7I+PPXOaA34q5YZYtB5IfBgpNXOdBnaW/xFPlnz656nwwO
+5Mfo/vlvPehT6aBdKgdoWJXsM+TvAxK8Zhc5cGpd869qZI/PofJ/n+MA+S9L
+GoE8OPLRQC2eA4tmUcxGZPuvBk6caA58EZdWAeR3Y4XRYuEcePsse20TctlK
+a3jSPg4INUUWdyHbKMsGJq+yoa9OyPUn8luVuEvRS2z4OXLbcBbZXO1Luf88
+G5LljS4tIjepm7c5TrFBA5t/+wfZcFPFD4txNiScPtC7hFyrycQMRtnQ0x8r
+xXMIA22tiA0bB9F6PZ+xAHKFzoCZXC8bCmMyo0jIG/R2+lK60fu3xoqEkHkt
+jnr8W86GGlOjVGnkstCn9qkObBD9tf2kAXJVcWoEw5YNfkcdlvWR6z94Zmda
+ssErcv8NI+T322nv83azYbu5ZZ8JMp+gp1XpZjak/2AmWCPbpUuYNgiwQeuT
+RpYPsnCVq87PO9KwfVchfzYy/ZuuTfgtaTDLVpj/z2s45NDlAmmQeW63Ix95
+66nq+6RMaRgw/pZahOy0G9OgxElD7VyX3wPkR92PFFVspCGy/SxfG7LbogjN
+boUF89nS3wTtMHCM0DbV+8WCsv1y2mLItisucew5FvTU/o6jIFvGXnq8NMGC
+6IraPTTkPfy1Mx+/seAPw+waE1lbwr/jcBcL2ijbMCVkIZX2yw5lLKglfgUb
+IpcczJY6YscCeRv12hjkwo9New0PsGCooN7nNHKew+xZhX0saGe3rp5DTnU1
+XxzcyYICupltCnJEwMp7l80sOLH7jHEBsvlZl2w3YRacbdyr3og8+UhV1uuR
+FHy5wKNHOYwBueuRhEuFFCjOS43SkTVmd/Dbl0kBr+HnDBay38bD43sLpODu
+uVtkLvLX4gs1OslScK+ka7cW8kDm9wNCHlKgRMrKd0BuP1meXMSQgh/MUff7
+yNOZenH5ElIwebt9sApZoqopNFtMCtxXJ9yeIlvMfrJP5pWCbJHYmP8hv/Sl
+qIX9YAJ/Jo3cj9xgH9i8s5EJ3wRuksn2GDzU1+QZCWFCmK20ahCyW5LGbFAA
+E0qt7LedQJb8qDq64s0E77a8b9HIx0LXtrKcmHAv7KT+ReRNZZKZ5iZMuBsx
+cLAEuUR6YWOlLBNclz1bRpDz5p44xTcx4FBtW42bA/p/O6otJeoYoD/vPeaH
+vHypcmfuEwb8s3Z1TyjyYbU7alX3GHC6+CvlDDLLJW9hLJsBPE8tjG4hp72O
+uWQZwIB6lsCzCeRzJTsJBRYDks3/cE47YqBskvVSjM6AaDmaZTJy45fv3fMY
+A7qYfmkZyCSly1Mv+Bigl2MjW4IceW1I4dikJHCzHxKvkYMun0qob5IEorzD
+VdYJ9Ud0jYlrqCQkNA2sr0delMFs9gRKQtgOgYlW5Iwnzi46vpJQ1reptBu5
+c1EoQuyIJKzR1Dj+A3lvsE3ZA3NJ0FR5nSTtjIGR1yyZX1ESNqhmHgtBVrdU
+7yxsp4Nz34mDWkdQXslP9yu8osPedzxzO5DPT1SO5zXTQeiF+Y19yF/Pb+PL
+qqWDvVW1sR9y4XMzzYtFdOgXLPMqRGZr+fwbepIO30L/2sFywUCQVWy+i0sH
+M1tfB4orBlqjPrbPZegAiSNxcshulRpuuBQdhuqJ5xuR6/Y9itATp8OugdtR
++5AjExtLNH7SoKuDEElDnln6LCzVQoPxyawAGTcM+vvkG78E0WCd0yEPQ3cM
+NHcbJUX70SAWajdZI5+552nF8KTBvTXCLE9kjfjywR32NGAJf9W4iBypsm0l
+dxf6/oHo5Y/I7OCDOtYcGjwMOr77pAfKY+Hk29BAhfmWTLs2T1RfQRWBBwkq
+zDgYpwwjr3zs1JmooYKrQPbIEvLNO5wmzl0qcOrUR9Z5YTBneXsoLIsKK6HR
+++ORU3IbOOr+VAgwU5o38MagVfP3xSwpKnRu9kh/64MB5Ueo/0UaFYh4YWwM
+2bJ4yiIWo0J6s0I+yRflKWeU4s1HheHKqbVbkYf536boTkoAr7tWfiby8rui
+K91NEmDV3xbr6YfyPMIylxEmAUcqbout8ccgQOtVlEiQBAznW2fqId+f3O34
+x1cCsn1tjA8i67ptlxs5IgFPIsToKchGe1SuV+6RgJf7M20FA1B9yK0UWilJ
+wCfRl00LyKyzVofW3qaAxNWO4IUgDJ7ZrZfenEeBS4/V0jjHMHDXWH2vn0aB
+xKR3QwbI97tKbO2iKLDrV75kIrKZIsk2ZT8FFGwjm2SDMYiuu2ez+osMdzvD
+8vaFYDDyG7PuMSUDudtrti8Mg6TXn+nfDMjQvZKeK3wc/e8bNR0/t5Lh0Tnd
+mC3I0abuVjQ5MiyV+kwnIrOyai1NZjFQcx5O/OsEyk9t3/1VOaiPc4re3QhH
++wn8n0Xad3HwKJLlK47EQGfU3PDwkDjkv8rmfYdce/jtlrXvxeGK4yY9gSg0
+b3d9ZD14Lg40x1o7N+SPMt+H2rPF4W7JsrNSNOrvF5TjNBNxWD2cDPdPYbBf
+4eC1lJtisKJd1Loch+Z/ek/KoRwxmDYLzN4Sj/pb3DlBIUUMGmPSS32Q3Ra8
+vCsixUA9akvWB+QTr05ueWslBqVGISWPEzDID89rliCJgepBl++JZzCYejsy
+eclRFELEvf9yOo8BEbX+0AVrUTAJrXuTi5y8/mj9GVNRGHzE+6AXWS127nKU
+tijkjV87dPgCur9s4tPzJYuCsY+Xrn0SBn3J8gm7nomAsNi3c37JGLSYHWb9
+kRWBi+yx8RepGGQt5MUu0kVgwc8hiZaGgdeNobFZEREIusAffxhZ8Lf307F5
+YYCmjJAJZMOSEy7vXwkDT3lSMOsKBtXC6WUPooTBOIKtE5WB+qXxDe7TJwRh
+Xl25SVcxuPxm7taFdiGY9DWb/4Kc0MOi3mkWAie3iLp/cjFwmXYenKwQghEZ
+mcfLyGtkp2NDzwjB84DHf4dcwyAzhPo8ZqMQ7FS9+Ce8ANXLWsudGbGC8KE/
+LHb4FpqnGmF3qsME4c6Jnef23sbA569sxkdfQVDU3ct8gmyyd2hExkYQcjpP
+t6SVoPNEHDtToCoIMk3Um2ZlGMS0pzbf6RCAzyHdd7vuYhAS22HSoCQAsc7W
+xQerMNihUTR8jSMAele2+7ciS/ScOBVBFYDoNOpTw2oMSreueaj5hx+03z6Z
+U6/BYOiLl/z1Tn5IsF/pEX+C6sVi5WdUPD+s3J8THXmG8oqzvlBnkA9wP0KE
+rxn1d/NvfXo3H5i8eDWRiNwS0vZhopUP6rKe+lP/h/qtLZhSVM0HNpZ1htwX
+GFyNfXZS8l8+8JSe3Gn2EgPRr1b7p/X54F2G9oEnrzH4Uhm9UnKVBHYdtRzW
+B1SfsDmzLIUEke+d7gNyQ+vw5vIzJGhVKJDy+Yjqb9jUvSKQBA6y8fuJHnRf
+kpRqrTIiwY11ljnBn9B+gu9mNXznBZ8hbQv+YQzKNQe2ftrGC53bB5JaJ9F+
+9NPa+jfzwv05z4f/TqH5YrrLa1CZF37sa3lxYBoDT5eynGEJXtiiMVszNIOB
+fOoJ0vgwDxRsaWgX+onyc1rizUISD3xe5INTyxh8c45/x328ShRmNx5XFyWD
+3YjnQlLhKhF1ZOyduBgZWrzNWQvJq8S6z6K6P5BLjjHsXrquEtgJNf4KjAw+
+CcV9wdgqkbEnpt+ISoax4pfDDc4rxLCIcGweiwzfJ+izHkJ/CPuq17HyKmSw
+D16kv51eJnpEc6nc9WRoXejd+nfvMhFv0vdcUZUMZTxFYZSKZcInZzxNfQMZ
+jtJ0l6rslontjW9WzTeRYULLnlek/DeRYa86/1yXDFORhZRS6yUilRLzNQvl
+nOzO0SuJ+BLxdcGi/44ZGUwxFRmvDUuEUu/4VL05GW7mlqoo8S8RVxJ0vaYs
+0Hmf3Te89uAXkeDfA7ZWZGhYheA02i/C+TR5zMmeDJlxfd0RbxYI/eGSxxYB
+ZGg0lXO0q10gTh4z7z0bSIYZ2pFh3VsLxKihpk59EBn23Biemj+1QIy5tlzV
+CyEDqWFcJHDjAuGPOf6jF04GP4Glv92SfxJ9cdVDofFkMDjHzDc3nycu/3rR
+NJJJhnKytOJx7XniFZ4g65FNBpkrnFvX5eeJieRP4l9zyLB4Xf7ez7k5Yp+B
+yZOpPDLce6IK+blzRGn+thjGTTLIT+oPzE3MEk5GMr/vVJCB18ZTPjdlhmDu
+sM5UaiXD2d2Bhj13Joml8X9fnROkwKeejZLSpyeJHlf1jXbCFNgaODlqYz9J
+7E/Ys1tdlILus/5J7aKTBPXws9z3GAX0xvy6X3hOEGWT62f/YVBgIsn7aLXC
+D6L5+KNLRxUpYN3uknXlyhjxx9IhXswIzSWHA9N7o0aIkMZurso5Cpgob+E7
+O9JJRMdGHr3HlICHBr8fX5BMNGAZGLotormqKHvtiA+py+D15mqXux1ojlKs
+LaVPjBgMFt/7J30vFazuaze2VE4a0Nu4V393USHxdFAtqX/OwL8wQvWXLw0q
+FVhF+fuWDFic5S/stXTIaDuqq+S+aqAVLqiaPkCHgnkT9QPBJHyFMzREqpOE
+uKBLZL11Anj4/qny1XIGPAvdYJRaJoQfWYl+SclhQn9FRZ2PlyieZRipdvKW
+FNiHJac9mhfHVT0eTjWWs8D1Vu5DxTAKHtg5oeZbLQ0qiS2XEplU/EFN+veL
+A2zYQ5rxf2xHwzvjSIOfljjgnoEdU3tMx69mvxlS0JSFkilrORsSA5cCJ1KB
+7RqojHk4RzVi4s7b7OmqkXJQsUF0ArsuhSdvxLw9HOSh9+r5lOejLJx2M1Vr
+bkYellRWbWt2s/Ejn9f3Vl9RgL7xJGO8gIMHtTSQMG0uTBzbNRQzIoOXOTL0
+519yYZoxd43XaA3ufHKmvtl/LXCjXgltuyCHr9lgdeq3oCIkYQMv+TzkcaKj
+ZcbyqiLE+HTcFJFUwGGPR3GovhJcuN1r7fdIAU+o6sjr6FKCryNmPoY1Cnhz
+SlDB8fdKYMR9copZq4Av9koWc3qUYCU7qwTqFPDwNR4PXAeU4FiSDQ/jFXp/
+rfj72TElsAt4U/r0swL+jLNlnySPMqzXaiBRqFzcmFY5c0BVGc4EbWEN07n4
+kUV3yaUNyjB0p0C9hsnFj6bMaudtVIaryrG2rjJcfJyVGz26VRkkWPrlVeu4
+eHiMMOu4gTIsLlUdctbn4hki+scyrZXhgM66AC1DLt5/Xu76toPKcD84PUHU
+iItb+bS8GTikDH7fQ+5WmnDxzuHjmuudlGGgb7OAyAEunhNPX63xVobt7Ovs
+Twe5+GqRwlZHP2XItpHY9MCOi7ulTHmTApTB+vWEnYMzFz9+obXbNEQZKsQc
+AzVdufjAmW7KZJgykI1fnRby4OJP5a8Zp4Uro/zcltPrxcUjLLlxOpHK0Ayl
+9yp8ufgM07m2J1oZ/g+0w1Nx
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145318#3"]& ], 
+      TagBox[{
+        {RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwBIQPe/CFib1JlAgAAADEAAAACAAAABuL7TiGo1z+R43N7QvcHwLsPVFIZ
+eOU/EkAMXyI3CsBTsjbFyrTvP3rd/BuhmgzAiYVxvALf9D8N0GC9HfIOwLQh
+GKagUPo/u9DfPzy+EMCXzm04JWX/P5sBJ4Sw7RHAovVJLVVzAkDloevYkzYT
+wIJxjw46JwVAxezpH3Z5FMC+dSxEkqwHQND//0mfphXA37GxwWpoCkBGgpOE
+N+0WwFx2jpO29QxA58w+ohYeGMBjqJ21JHYPQB3CI7L0SBnAKInKj4kWEUC/
+JobSQY0awE0C8m66WhJAjFMA1tW7G8Bllw1yK7oTQMXv9+nYAx3AqvBUH1YC
+FUAnVAfhIjYewLSAtfQRRBZAH2NQymtiH8CxLAruDaEXQMJwC+IRVCDA3JyK
+kcPmGEAJlHpQEewgwPoo/1i5RxpABm8oR8iQIcDd64xIQKIbQE4f87Z+MiLA
+7nJG4oDlHECrs0mYWMkiwPEV9J8BRB5Avf/eAepsI8Aifc0HPIsfQOUvAN2e
+BSTAjA3gywNmIEBYNT4xU5skwIBq06UJFCFAgPK6Db89JcCLqdxUbLYhQL6T
+w1tO1SXA6OVLakG5IUDyqW8a89clwEQiu38WvCFAJsAb2ZfaJcD+mpmqwMEh
+QI/sc1bh3yXAcoxWABXNIUBiRSRRdOolwFpv0Ku94yFAB/eERpr/JcApNcQC
+DxEiQFFaRjHmKSbAhnEzGOQTIkCGcPLviiwmwOKtoi25FiJAuYaeri8vJsCc
+JoFYYxwiQCOz9it5NCbAEBg+rrcnIkD1C6cmDD8mwPj6t1lgPiJAm70HHDJU
+JsBVNydvNUEiQM/Ts9rWVibAsnOWhApEIkAE6l+Ze1kmwGzsdK+0SSJAbRa4
+FsVeJsDg3TEFCVUiQEBvaBFYaSbAPRqhGt5XIkB1hRTQ/GsmwJpWEDCzWiJA
+qZvAjqFuJsBUz+5aXWAiQBPIGAzrcybAsQtecDJjIkBH3sTKj3YmwA5IzYUH
+ZiJAfPRwiTR5JsBqhDyb3GgiQLAKHUjZeybAx8CrsLFrIkDkIMkGfn4mwPI0
+YYo=
+          "]]}},
+       Annotation[#, 
+        "Charting`Private`Tag$145318#4"]& ]}}, {}, {}}, {{{}, {{{}, {
+        {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
+         0.0055000000000000005`], AbsoluteThickness[1.6], 
+         PointBox[CompressedData["
+1:eJwVl3k8FW8bxq3Hdubsx7GTrUiorIkZ0mJNJLRIKipUWixtRKEUUZbKD6Gy
+lGxRpLmTyJLsokT2PVmy5533r/nMZ2aeuWee+7qv77XG9YztcR4uLq4Zbi6u
+/x/VeR/mfn71BV8/0jWfYkgFm43TJVFejajekq3A2HoaNNItC3h+t+MqPdc+
+lXtTQR42tbOCe/DtXHfpBxso4Muwr8hwnMFzXWNn+1QRCCjceTDIqRQNWHey
+FxOigaGz+JvnNzpRJTFSv90HGlzmttyVRhnCDz5XmpwPocBr6dTU8zJz+L/7
+ox/8TRAo95OKYZGycYvKjfu0DGlQcsllvfajcTww4bug5GEKeK65p9YT/Qev
+H5f7zlGiQM8NdCSlahF93XBDQGyaAZLv+GN924fR/h1BWwNl6LAizhbwiFxB
+/3OsU+25wITjjtaPO3jn0UhHpST7eAa0fr3RwnP8N1rx3FZGJZsOOY1dhXSj
+WZTz0ezZ+k0MCLI6dMjUjg873HhXxyKNDeM2P7VcJ3mwR1c7vN0SWJBdfBy5
+dpcbu1U3I1VcxYI8Ea2GAas+NH6HbL7iejo0+6o/fqjKhb1JkTXklmBB6IVg
+Lwu/KbTDrH/0lyEDah9kSZQYi2CKd65OXEvigHd40JW2n0KY+BGS7EA8B9Lo
+2uNP3WjYQbPS/esuSMCYuPHWE6eo2OpFP5H8anGwIY3vVy3kx3poLbgfnyjQ
+822UxcToWBvr+iRflwSc2vqbfbuKjm3gva2YS5ICVTPFLxRxAWzzV9nQC/tE
+4Vlbz52kNDJW8e5IhvQ7MXhDYm5avsTAbhc4fPFTlwKHEVnPYAEK9sgja0Ba
+Sxzkm2+zZy4LYqHxkned1DkwpTavIWnPwTh+13L+85YD694alU8YG1uplaiv
++SEDPY4sq9NqTGyu8mdvyAZpkE2efqEzxcb8Tu3lvnFNFpzUvtfcIYlh7EMX
+bQYr5aCgX6zeNpKFDR17rLS6TQbuGlMH0lNFseOzlWLP62VB80JbZK+EBBZv
+7+2WXrQGdi9qhHR3MrEKYdLDhxnSIOqbctu+VgK7kuPlxeaVh0ODjeTVIjGs
+9tlEpongGqgJm9jufVIcS4hKXqrTXAOP1fM8K69KYuky5w92HJAHwfovT/U1
+pLDv62bzu4huX28NtZ2P+CB113ax7hUyVNu5l5St8EPjOKeh8ikZko+ZV3+d
+G8EtXpG9llYQeOrV7GvyZRb/oHsej81FILHXS0u0hRtokT8tqwrIsD3TeVj4
+/jxuu2GuXvcFBZ62dK4u6PICJ8HJMcaQDJPD5WiCzD8cPZ5dYK+MQHip+rGX
+xpM49dhqPRJBAbsIo8BGxyW8Ma+N8qkZAR+K+0t/gWn8R2q0y5YJBKw/pS9t
+PMcF/Tau/SvOCJAFFVq2evbjQc6ia2P6KNAQmvbEOLMZz1tsUiytpcIdLcb4
+PBqPUuebfNaH0WDjBVHjHTpVKF/CrYCm7TSgjO0+aJrXhhZcdmr5cIUGS61o
+ZPPlMTSlZmo2tY0O216lyDl+6MJFYt4alzZToCwT27BZ+SM+MLhfYbKaCkZy
+Te55x36hsvqjIyvviec5UbF5vH9Qys8yr+/VdHhQ41phMjmAhne8ihTQpMNa
+euSgT9U0KiP08WXGCQYUMqxSRXV4MEFHxenHtSz48ZW9cVMTF/apf8JBO4gF
+7jIjDq0Sy6j1hPkSVYIJvHfblf7r/oeGsoN1pg1ZcFFQulLEfgF1jdteEbKR
+CSeUbgctxvNitMT4qMFoNjg6N0+WOZOwLVZx09XHRGHTE5Gjzz8IYNFmbw4K
+GXBgZW+WbdcSH/Yrvlh0RUoU+vJ3mYQrCmHHLiaKS5Zx4ENQdo9J5F/UdPPZ
+qsX3DAjcde/SmVBh7AdJV8nWRgz8SQmFUjkUrEw+3vfBV3FgHzb1PuZJx6ju
+4b/sKiSheSw6x25EBOMYcrgWzohBeuk6valiGhYn3a//bkICWrm4XwcK0bCl
+B+lvxO0kIFujWl7PCsESj1fL0baIwy8zmsOurwzsEXtgW+omabhsvqGkVZqB
+vTvgr7bOWwreRJElk3pZ2JbFHWsmu2VggE8wvjiQiSW5mus2HpKGxAdtbHoM
+G5MPsZZ0S5IFu2cKDWqbWNi0fn/QBW4ZULQcnAvaIYpdcl9me1HlIGqcZ+Ps
+nChWWDKwxvyCHFx91Rh0X40fXux6p9z+mQwPNlFV9a4s4/1GBoJaKxR4HpnU
+Vu3GA7FbC+vCzBHYHeEgIyhJhkqf6Bsr/8jg9Jw/61zhAv7QWn//pS0IKMg4
+xx2YEoBfViN2n1+QwcG7I3GAlxv4CjUHUR0Esq9TU7OreIEUrGgwJUqBV2E5
+GgpvhGFdya220jEyBAbvPM9nsor3eXbLLMQjoEqrc0XthSCGz+RnWQIZmlbj
+nX0jSfAh935A71YEugZ/2atZpeNvWdZpJCMalLPoDilG4/i73dx6PxYQ6JAT
+qutWncE7Wnwh9zYCXo6O5ez8QVzmxPq9bCoVBKwuLwWv7cGdXq/7ZsmgQlV4
+mUmSYhM6usS31iGCBiuxZuqSx//g1B/KHTtTKJCav4QsSwAa9ynf6twpGtis
+LYq8Y1yLY34tN8dVacAe2lgyoNuOZ9WVkxIFaOB7tjgkx+Anej3fuNCSQwfK
+grdmxuRfvDTdKNe0FCH0tHCY8WwK1cuWv9JO+FeJLVMxDn6jje9Vil22MaCy
+ZTN6am4R7d3+dKdnABO+Kfvz8GiPoFyrnpJnvengLZmgfzajD30+ZfxW6jDh
+f6oWCe0es6hT/t63hyIYkO0myeWaxo2N0ALktF+z4FjO28CUjfPozkyVhmgz
+Jkxr+XRtLl1BlQVExdOUWNCs0Hf3qjEX1iTZwZA9woJlJJmjeooPy4u6w20V
+wgYXf8eu7QK8mGbBB9Hh02ywyUuxonzhx1ozbuw2DBcFldl2fEpDAKMVdjxq
+/ioK6yrpAu9mhbAv5XbS8zQxqMWOIEmOIpj+5fgbZzzE4GlwfEBwCRlD7sqa
+nucSh9maLLu2aEHsflVBXsRJDpzdf4p5QoaCjf3O//OpRhxot7JkbyvQsSuv
+Yi4xUiXB0EnTwuI6FauN/N1VsV8CfC48OLncTMfG65+lmGlJQdpg5ADnHA2T
++zWUzjUkAQd9Dx87HcLAxCWUP0pGSIF1/e0A22Emxk1/bziiTvid+pkd3bpM
+bDa8+rxdvDRcyV/Xx02nwhnaM9emGDJE/HA/Oa1Pgy1p6EpvJQKTu1ottliQ
+Qe3Qp6TTCgiYd5jrnrspBJtGFupPuiMwt2UHRyYbgTcNb76raiKQrEpn7hsS
+BpXTjbl0XQooJtjafTrID63o1d1f1yJw+UWow115Qehrk+BwqyBwoZhzJwMn
+geSZ7mtreshw6d+ikJgWN/z8Y+39tBwBTnlA1WIsDyzJDtR840Lg7pjkRPcC
+L9QnbUQL6QhkWrs+dEtZxUPe8BppHiXW81nQSfyxjI+HC55SIepb7vJ7QNkz
+hwcFkS3Ut1JAevmlW8CnP3iTwVSjfxIF4sb0476JLuKnKFUpESkINFyXstgV
+PoNHOolX52yiAJrkr3F6dRznmjE+/oWfCoIX62Y7zw/hm4u8KALFFMirMoqz
+GurBPXnuZ2zbSoWYKx8TfN924BL2zoXeLBoYx6x8eGH6FRfjRwfr0qjwJU7y
+AmtDHp6/b6x1zUEaDF7/bpilUYxaoJK5O4/TAL9Bn8gY6kUb1A+MRBL9bj6n
+eYSS2oBusmHutvtBA7XM1256F4bRGImX5yhAB5Hdx9P0in+gGsOQ+ZNJ+NXr
+aI3q1Qn0yj2L/tAZOjh03fTxEZlFw1pfmyozmbAhcFvri+1TaN2yDbeNPAMo
+U215hg1zqEvuK+NOBSYo/gf2dQdX0NAqy3PHSCwo890RR4pbRGsT3DrP3mWC
+eu/aoxZ0Luz2PX1XSxsWrH2yOWlenw872ari/DePDcGhqg81LnBjxg0xwYdq
+WPDNUa4mzVUQ69KffWXnzYF/7GFHWCVhE+Hs4DgaBw5VHxFhtfFgGU/oWtkR
+bNif8NC2M4EfO+YYV9BxThQupT0X2xNOxtZzYtpWtorD3sGft7UnEMx/qWC3
+V4A4pGpMOd/6JIQZnKnKj98oBrLvc2Qk9lCxgpFXTylmEuCt/ibWc50I5qt8
+b/cCLgazRxSEV51omEvw0NY1JEm4LL557KwIHTMdbEiRipOE1U/biy+O0MFp
+8BZ/WAYCGtumTHj16fA6xnx8ZIkMjZLR40YvqFBgI+DPE4HAULG1Uu87Onaq
+rEnzzREpGCddPxgVSgOuSQXGJME/ai9J7T4DZNiXPvQuUwuBoJXagv1mFMh0
+uGyiyYvAoYBtC1HBIvCkpcle/i1x392mDdlywhAshGyu7iDDGbwtsn+/ABib
+GKopLpJhIdbAY3WOHw6mPl1lFiNAOkOZrSoVBI0GJUp1OgIHGgqzpGL44KR0
+2jV2AwI6i54Tupt4Abt2FX1P6EUqQq/U7is3tNQULr5/h4B6leP4WU8uSHu/
+JnkwC4GjF7UOwAeCD8tI44nEer+eKGWGhc7j5PD0JDkOBfCbk20c5j+8klNX
+M3oXgZi1DyL2WC3hv4OVMnzEKbCr29lofmkKf5sQoj2qT4VEYQ5VU2cSP148
+JxkTSIEmoT32dd0jeFGBE8UNpcK3nNNFhvb9eIpCl9eGQCrwXe1XPXW/C/+n
+Jz9q5EaF7wEeJ/TXPEaLY8Xlee7TIL7Q3WjLlWa8fdjI06ySChHoAacN1WX4
+TofmmFOEnsinUtOLLv9C1SQ+WC1H0mFH6R3corsN3UBBF7iABn19YQmHoqtQ
+ngt8N4e7iPxYEKe0U2AQtR4IGTQ1poOZpcsZLeofVLi2TblMnAHrzku5dUSP
+oXcmKlob5unwUO5b0F2XBbQp9BZ1vScT/jXU2a00T6O+4VjBzSsMMD7ZOWGv
+vIw6X9xit0L4zZG5XYxPj/6i6+V2dfsvMWB2wqJJZuwfiu69l/simAU76nxX
+pr9xYfwrSgfay1kgtW1DUUkiLyawVv++pY4o+FV15nwz4MH0gvrqBPsIPR7U
+Kb1xjIS9mVruN4kVhb83j6kkc/NjBnP/fP22i0J8w6iPpaoQZu6KFB/9woGI
+A8sz7pUCWImvVKq2BgfOsRSGNe8KY/6b9MYuq4qB4ejMFfakCMYTIBtmoyIO
+LJdMnc7XFKy9q2yHjpMECP25fW7BFsHWDB7xePtYHHwbzja7kGlYWMDx4pEm
+CZDVy41SesyAxzTKD3UbBDqX0Kz8YTq8swvJEa9DoJ0n7JOxHh324pl6WoQO
+fhfzCcVbMsGz1nL/JYK3cs8rZXwNocH6yvt+84/JQI674VOSSYUbY1/fh9iR
+wejkh9jWnRSQZcXpuPgjoOu7p2aqjwzp8j7+iSgCg453oilBImB+Ojnv2SaC
+3zLsN6jKCsP4Hdc4fuK8I/CtoOk7QUALvdvlCb1tLdEyO+IkADTV7uK8ZTJQ
+8ltvv9bkhVMqaZsbPBFY8S3cH3+fD9a8josI8CL8p28k/Mpffli/9ew+DQcy
+gJrPrfov3BBrsj777hMyZK1UHhs/xQVzCrnraPcRSLm4pp9O+4d3e5zo7H6J
+gJKZZqyZ+RJ+66NN7+MSCjj/ZJi/fT+LVx+N/1TrRAHhgv3+12/M44F8G/fP
+DiOQ5Zh2fHJ+Chex5a+/qEmBDWr5ous2T+LRuZIUS38K1AWtj9HY3Y/P5dd+
+OxlN8F3cCXv62Wb8ZNw11ZwTVOB3OxVe2TGCt7yyPYOcpMCXiYR4g9AuvPpZ
++mGBKCpo9LXqe/U8Rl10GdG9hjRQEH5V/SCzCg1gtpw9epIGym/tDcZyy/Ce
+KMtYa10aJEtgh0+OtaEZ3zw8Vupo8KxGcbLy+i8UlhxdPU3oQP/z+cQ+ZBB9
+vHb/5NxrOvgtP904FD+Gim58+ZtG6CVJwarNgPEHnaijSiweZ0Cb5Y+dfN+m
+URu5x8oCpxmgJWkTH3N0ASXfluG6/IgJmjiuvO73P9T6o1NF6F0WBMb8yq/9
+7y86EffpazPhT9Wfp3FnlWV07/zalFI+Fvw690YWS+bFIjtdzdcYicJWp1fi
+vh1cGCfl6eGEQRZke19zUODlxx4lSOxje4qCaMJA+AFDHuxl4fWPY3MseDPo
+1S7gRsLEexLj5vpE4RC3b1f9eiHMHXGVVSjnwDoBpKUgQhgb31OvOXtQDDb7
+qD2M/yOCeZ2X/3X0lxhEqT61GPssgIlKa4Vt8eUA8vaoyNW9CIYZkW47dorD
+hqYXls/8WHDhCpdh/RQZnG2cWjZXMoHrla0TuZsMkqyhiQ9sJlSKnrl/4Qah
+n1rByIXdNPjYV7rJ6CYZOJKaQjbHGOBUbjW+doLI3+Ffxjrz6KA97S11xxKB
+8qMj/zy46fA3sjXYez0xv2/9EF/fgYBM0obGtwFkqG1/WrDDlwzBf5Oy0jYj
+kP/8iS3VkArzOvr0Og8E9uUK3XNhiYDJU5PllG0Ex43eqL+aKwR0R02uXZkI
+PGAZMB9aC4KmutXny3/IYHiogjauxAdbv9XV7FNFYK262JjQRx7wOuHkzTuJ
+QHivMqMxjB8q8bxLOd8R8E8n9RSMkmBPT0iW4SWirsz6tKDFVXyzw1qfNXYI
+WI92+yu5cMPo60O9F50QcEDzHadOL+IDEuEPWiQowMNeCi3WWsGPSL9zCtKj
+QNpb0wsqGXO4jFK4ROQXBJTv2ikd6Z3B/a790nZVoMDSffvmBOkpPNvlY1f/
+GsKvTD3znryawM0OfUo9vUQBH2S28lJ8L94+fi4XGaHCzqXne92zi3C3ufqD
+oWY0cNSPHKYqDuMf1lds+1VMhWR2n1spTwNeLnyM5XyRyDsuao4d4j9wpfnw
+qsQpKvzevxjNyi5A0ZGN8cH5NHBnfn6aZVKPGr71nSjqpAHqTIv77PQdbcwi
++4rP0SBky3GWj14vmlv6pjUxmQ6lbb7nYndPoOe+jJfUWDHA6qZTFH/5EOry
+Vlyi/REdQrWMn94f/4Pe81NXkHRgQIO7Xa6S/xxK2+6m8cKeCbrOsmK/jRZR
+tqxlUukhJhgUv7p1MH8GfVF1zdmjiQGb2tSErlWvovkuuqZNGUQ+MjkRr7CL
+G5M2CTCzrmeBQZG07SjCh61D90d5N7Fhk7F6PSmLB+PTnYq69IsNAXveK77m
+W0Ef7bb2yJZgQXe9smNBEwn7IxnFPyHAAfbi3vKvZ/kxmWOxveodovCi9Z1V
+vI4g1jtwxlFGktBHGPOGy7IwlvyJ9WJdmxgUbf9Bv/JQCDN0r9aOJa77TExW
+bCXWNXm62L5cQ+QLt9ZyxyIGHObK+vFDEgG953T3C3vpsDjWLYER/HNuVu9X
+9Qkm0DZZz7vnkSHs5WvFNVfZIGpM3VZFQ0DWaLp1gJ8Bdwx3oHYHiX5WdX2Z
+TXCo/0uqgNF7MogZTVTJ9VJB+UpOt8wtBLSyna7zpNKg9r8DYT/JCJxOjg08
+XywCZjr6truCEdhVZfkxwkEY1v6E5yk1ZLgeUXRsK8Ex4slJW6UVERBxk8T2
+SSNwxrty/DcfwVOHxKIzZwTh8sPOJVEZBLB4vbLKKAGo+o+/fWYXoe8elYTV
+Gj7YWxn3YCfBV1P0b0QmI0Gcdk+FCIYAT/KUiuRJXpg8r4TF/yP0LXSJR5fE
+Axwn7TYrCYLnUOqMbSoXRI/ty8nHEShLb33TGfgP971m+CWB0CuicKKZVbKE
+H6UEvryUiwCbNLp3OnUSV6yquFE8RoF7f31uWs7O48NhO7BTzxE4vuKnFabx
+F09p7A7AVShQHe6k/+7kNH5srlrp8U8KmHcbhO15N4rHISB0vIMCTzvfnNd+
+2o1vASNaz14q0HgPjX3UHMA/erFG7+ZTwDetyH7n5lZ8/3V3xXRlGnRIJxbZ
+6FXgdjUPmbwkGpQJmol6CGjhBvkx98610cA/j9GgntyN+hyy6++8Q4cTX7em
+G6m0ogIMm16yMB2G+Tbm4esH0LoB4Zks4rqKN/8GHcUK1O6xCqKbSOTUWIPb
+NkWjaHGHQ33YVzqwhh6VV03Noze1x3aZpjCh0eaOiveTSXRlHxqfHMEA938a
+e7a4T6Na5i5rGwwY8GVmqYh3w1/UXMI4UdKACYclX9YfuPYPvfTH2UPWmgUh
+POSUWT4erN5bOjI5mA1VXkIZ0W+W0Pvbi8rihVjgsn0bq8OdFxtassQrqtlw
+5Y6UHD2FC/tKmpj6I8OGuTVZ/6VsIPJOugDr6pAo8ERVHwm5J4BdPXmunOc+
+B9ZLsdPfV/NhFaGeHLyFDT+auJtPTQtiXkpZTVd6OfCMV3LL0aOicNPuTpJF
+LzGPTff9uMbFBh/bs4ufqhFoC6wsm8xlw5mWhkD6XwROvjPoePQfEy7/3qPo
+54zAPYvEv+TdBGdOmb6LekjM+xWfK4VbGPD786Igk8jTtnx4rOktOnS9sJdx
+0UXgsPSHnS7Evs1c5q6yySTD+osHLzUS+7Q9iNZXQeQFwweOY+vGGHCj56i7
+3ALBP5ZHsuZCEGhl5b/W/UbohTFwqmOYAt6jYuFitxG4eZEzwVAkw7sBxpHS
+dgSumPKOWzgLgde2wN1f4hHwEOp9p/5BGIYutJQZehN5633KqNuSAEz7qldu
+JtYTj5ypCI4nwe4XeY/zoxDgLjTdUNLIC69/0s6K2iMQenlFRXrvKh5PGln4
+aIsAalm6N0mbH6JePZfpIupP5NIRmCZzQ6SV0ckpFsFbu8nf90Ys42kbk8pl
+phA4P9ou03aGB3bInFr5SPy/SOfAzKWtM7hsouQfJ6Je076JiHKeOVy4gtvF
++yIFuuwpt+99XsB3hUxrLPpQIGlXvvhG3z94OZW01LqTCvERvTI72gbx3W/O
+Z2wIowJvQWhcs+s4Ln30hrmQK8FfwaR9BRY9eDOl6ICfPg2Eeesttv5oRONy
+OoeWG2nQclYxzyywHa+Vs0u4yqZBtHnMv433MvGmXqU0j7002D2k7bqjsRbP
+duDv+XiFCquv/9t5kYWjP8Mes7a/psGryfHnDbQRdDV/wEWHyoCx52SK83Qn
+mnfUNaNUg8hD/bQu9GYfmp4s5+FG7Ltdgpvr0v0p9L+bMYUKhxnQYaE9dzTh
+NxqQU35VyIjg+kj+Mx+cZtH29oLV5wS372ZfsLstO4+GXfhTQb7EhABIHRHP
+WkEtY93frIiwoL+Mc9mufxG9ZeDYGkToQ+Gh37D9Y27MtGQaa7/JBrN9xr7e
+elxY9moJuCmwYeKM+dUt/3iwprej3VN9bCi+2H1O5ggfpq0uvzqpJgqJHX4x
+XzdygLyhBBsUpMCnvlUdnnJ+zNFymHtalgNJa3UzBpQFsA5vISdzSw7ckSzQ
+Ha1jww2Pmr6vKQiEyS/v8Zdmg2POuEMqwRt1DkoyhwIJDqw1U2k4j4DL/Yfa
+Ap4sMG5SRrcIIqDtUbgzppgJkQ9sU3SI+W3d3NwmL8SEUeXhyVRi/pp/l5rK
+IXy4TW3GiYfgFXnL4hajZ4RPTz318n5E6GtGJrV2htDLq7HSlDIELio0pY0C
+AuuSv6VsPUDk7+76e07baPB7gmuilOjfR4tSrvUKVKAeGKsKfkvwkadzChov
+BLXWwUfyWsngOfU+VXFJGPpqL0jpKCMweZSr7/4ZfnjzbdMepi4FhAxzrh7U
+FoSVihm7O58Q2F+UeF7AmQyO+7805F0h9LToJ+LXSAJZATOPZuJ9rg9jWl6R
++UDQqr7bk/CHfI9ii8Ed3GChIrPTUI0CQ5nBu0ifV/Hxmx1K5uYUuJv9p7Qm
+gwe4h84eskwgvhdzW764dREX9uFyVX5MgdLcm3PGPCt4zefLv6+FUeB08Rzn
+pc8cjtliGtPzCOzd0biQbj6BywSYUGSbKPBL2+Ct5OgfvDHh4CafNApcS1MN
+7cmZwZ+/Yt6uAQqsneQqCN3ci+/Pvet1/RgVnh6dHxja/R23CytYlo+lwviW
+WU0OPoSHpOXUGKZS4Y/eau3p/3rRE/oLjHofOlSL5czW6NXjIl0Jl0nzVDin
+p+EYT25AreYbKG9XaWBiXe3Q0VKEtg7cP8fm0OG3wLfIJyEFuAup1rkjhQbS
+D3ZIcasMo/sz1VRL0gk/OWAqWKzwA/Xj/1vCCKTDSODP4fsFE6j+OekPN9Yy
+oHRzBDdNbgq9l5zSnv2AAWffLvd/659BW2uLXNcKMKHARuT6Rt0VtBszVeNb
+ZQLJPRlJyZpDD5RNq1J3MuHJMbWrJ7wX0esje7kF8phQU6n4bns5D/bkUb+m
+VwUbTrT6H19cXkU36jG5T7SyIMf/8hRymx/bu/lib0ODKLTqmAaqrOXDNhv7
+fHGQF4XVDxEVR45wY5eieQPrd7HhfzIVAug=
+          
+          "]]}}, {}}}, {}, {}, {{}, {}}, {{}, {}}}}},
+  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
+  Axes->{True, True},
+  AxesLabel->{None, None},
+  AxesOrigin->{-7.243548595730511, -11.512925464970229`},
+  CoordinatesToolOptions:>{"DisplayFunction" -> ({
+      Exp[
+       Part[#, 1]], 
+      Exp[
+       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+      Exp[
+       Part[#, 1]], 
+      Exp[
+       Part[#, 2]]}& )},
+  DisplayFunction->Identity,
+  Frame->{{False, False}, {False, False}},
+  FrameLabel->{{None, None}, {None, None}},
+  FrameTicks->{{
+     Charting`ScaledTicks[{Log, Exp}], 
+     Charting`ScaledFrameTicks[{Log, Exp}]}, {
+     Charting`ScaledTicks[{Log, Exp}], 
+     Charting`ScaledFrameTicks[{Log, Exp}]}},
+  GridLines->{None, None},
+  GridLinesStyle->Directive[
+    GrayLevel[0.5, 0.4]],
+  ImagePadding->All,
+  ImageSize->{489., Automatic},
+  Method->{
+   "DefaultBoundaryStyle" -> Automatic, "DefaultMeshStyle" -> 
+    AbsolutePointSize[6], "ScalingFunctions" -> None},
+  PlotRange->{{-6.907754950041409, 
+   9.210340043035457}, {-11.512925464970229`, -2.995732273553991}},
+  PlotRangeClipping->True,
+  PlotRangePadding->{{
+     Scaled[0.02], 
+     Scaled[0.02]}, {0, 0}},
+  Ticks->FrontEndValueCache[{
+     Charting`ScaledTicks[{Log, Exp}], 
+     Charting`ScaledTicks[{Log, Exp}]}, {{{-6.907755278982137, 
+       FormBox["0.001`", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-2.3025850929940455`, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"0.100\"", 0.1, AutoDelete -> True], 
+         NumberForm[#, {
+           DirectedInfinity[1], 3.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {2.302585092994046, 
+       FormBox["10", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {6.907755278982137, 
+       FormBox["1000", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-4.605170185988091, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0., 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {4.605170185988092, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {9.210340371976184, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {11.512925464970229`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {11.608235644774552`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {11.695247021764184`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}}, {{-11.512925464970229`, 
+       FormBox[
+        TemplateBox[{"10", 
+          RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
+        TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-9.210340371976182, 
+       FormBox[
+        TemplateBox[{"10", 
+          RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
+        TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-6.907755278982137, 
+       FormBox["0.001`", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-4.605170185988091, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"0.010\"", 0.01, AutoDelete -> True], 
+         NumberForm[#, {
+           DirectedInfinity[1], 3.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-10.819778284410283`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-10.41431317630212, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-10.126631103850338`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.903487552536127, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.721165995742174, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.567015315914915, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.433483923290392, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.315700887634009, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-8.517193191416238, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-8.111728083308073, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.824046010856292, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.600902459542082, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.418580902748128, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.264430222920869, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.1308988302963465`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.013115794639964, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-6.214608098422191, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.809142990314028, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.521460917862246, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.298317366548036, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.115995809754082, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-4.961845129926823, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-4.8283137373023015`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-4.710530701645918, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-3.912023005428146, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-3.506557897319982, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-3.2188758248682006`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.995732273553991, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.8134107167600364`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.659260036932778, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.5257286443082556`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.4079456086518722`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.3025850929940455`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-1.6094379124341003`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-1.2039728043259361`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}}}]]], "Output",
+ CellChangeTimes->{{3.711127581297364*^9, 3.711127671653528*^9}, {
+   3.7111277288106327`*^9, 3.7111277366725388`*^9}, {3.711127897561698*^9, 
+   3.711127989923276*^9}, {3.711128531017274*^9, 3.711128603747486*^9}, 
+   3.711128644658575*^9, {3.711128792524933*^9, 3.7111288008644753`*^9}, 
+   3.71112885096681*^9, {3.711128928512074*^9, 3.711128957107048*^9}, {
+   3.711129835974813*^9, 3.711129874794202*^9}, {3.71112994843898*^9, 
+   3.711129965132526*^9}, {3.711131241307453*^9, 3.711131271438347*^9}, {
+   3.711132426203773*^9, 3.711132475671316*^9}, {3.7111325122985573`*^9, 
+   3.711132534770512*^9}, {3.71113289265272*^9, 3.711132999784379*^9}, {
+   3.71113305134641*^9, 3.71113326201278*^9}, {3.71113336192397*^9, 
+   3.711133389604954*^9}, {3.711133517771099*^9, 3.711133582241486*^9}, 
+   3.711134496102757*^9, 3.71113466207756*^9, 3.711134854029689*^9, 
+   3.711135090730062*^9, {3.7111352809742613`*^9, 3.711135287201799*^9}, {
+   3.711135386616991*^9, 3.71113539880623*^9}, {3.7111418638349133`*^9, 
+   3.711141874612363*^9}, {3.711143058419879*^9, 3.71114309669414*^9}, {
+   3.711143721578021*^9, 3.711143781584158*^9}, {3.711144388545817*^9, 
+   3.711144396276979*^9}, {3.7111446094977303`*^9, 3.711144613339398*^9}, {
+   3.711144680795624*^9, 3.7111447079156322`*^9}, 3.711145048573194*^9, 
+   3.711145755283853*^9, {3.711280769563562*^9, 3.711280813646409*^9}, {
+   3.71128086415739*^9, 3.7112808935043173`*^9}, {3.711383284512624*^9, 
+   3.7113833097489967`*^9}, 3.711383393690321*^9, 3.711383498698038*^9, 
+   3.7113838047693*^9, {3.7113838756258183`*^9, 3.711383946552723*^9}, 
+   3.711384730626437*^9, 3.711386949899585*^9, {3.7113872601171713`*^9, 
+   3.711387270415874*^9}, 3.711400630845186*^9, 3.7114006697189007`*^9, {
+   3.711400762798764*^9, 3.711400791840289*^9}, 3.711400835439849*^9, 
+   3.71140117862505*^9, {3.7114012100308228`*^9, 3.711401230114215*^9}, {
+   3.7114012898146687`*^9, 3.711401304233672*^9}, 3.711401399846105*^9, {
+   3.711401438638013*^9, 3.711401467119611*^9}, 3.7114015211970882`*^9, 
+   3.711401567985734*^9, {3.7114016056007767`*^9, 3.711401628136093*^9}, {
+   3.711401713531468*^9, 3.711401762269224*^9}, {3.711402429115448*^9, 
+   3.711402461770267*^9}, {3.711402891136282*^9, 3.711402912285914*^9}, {
+   3.711404388755679*^9, 3.7114043986387873`*^9}, {3.7114044486445208`*^9, 
+   3.711404518773761*^9}, 3.711406227232978*^9, 3.7114066542628*^9, {
+   3.711407038444659*^9, 3.71140704510012*^9}, 3.7114071267611237`*^9, {
+   3.711407183979395*^9, 3.711407186101308*^9}, {3.711411107866351*^9, 
+   3.711411124301353*^9}, {3.711417889047347*^9, 3.711417893068492*^9}, {
+   3.711417923813339*^9, 3.711417927211397*^9}, {3.7117460522126207`*^9, 
+   3.711746072757844*^9}, 3.711746160953579*^9, 3.711746305413265*^9, {
+   3.7117463375108337`*^9, 3.711746395772622*^9}, {3.7117464335159273`*^9, 
+   3.711746454122615*^9}, 3.7117465470598*^9, 3.711746940815365*^9, 
+   3.711747248172297*^9, 3.711747654450551*^9, 3.711747686591345*^9, 
+   3.711747907603959*^9, {3.711747943644298*^9, 3.711747990225561*^9}, 
+   3.711748025986208*^9, 3.7117482508749237`*^9, {3.711748299790553*^9, 
+   3.711748348990406*^9}, 3.711748413322699*^9, {3.711751021978037*^9, 
+   3.711751038687649*^9}, 3.712332294814478*^9, 3.7123323594159307`*^9, {
+   3.712332400499013*^9, 3.712332423677504*^9}, 3.712332467999897*^9, 
+   3.7123325246127777`*^9, 3.7123329339854317`*^9, 3.71233306107482*^9, {
+   3.712333779837001*^9, 3.712333809300539*^9}, {3.712334493005431*^9, 
+   3.712334510551341*^9}, 3.712334577996705*^9, 3.712334713121067*^9, {
+   3.712334878262806*^9, 3.712334884606503*^9}, 3.712334982486836*^9, 
+   3.712335372846648*^9, {3.712335463345566*^9, 3.712335483397084*^9}, 
+   3.712335625359729*^9, {3.7123358580019712`*^9, 3.712335868493102*^9}, {
+   3.71233603024267*^9, 3.712336053066616*^9}, {3.712336682684705*^9, 
+   3.7123367392818108`*^9}, 3.712337360880822*^9, 3.712337795680142*^9, 
+   3.712338163714761*^9, {3.712338205779873*^9, 3.7123382310299273`*^9}, 
+   3.712338285582103*^9, 3.7123383395338163`*^9, 3.712338372836412*^9, 
+   3.712338421620803*^9, {3.712338476027618*^9, 3.712338491980421*^9}, 
+   3.712340233328706*^9, 3.712354327016433*^9, {3.712414195235113*^9, 
+   3.7124142102309523`*^9}, 3.7124197799583807`*^9, {3.712444517030016*^9, 
+   3.712444563117937*^9}, 3.712447018249096*^9, {3.712447272141313*^9, 
+   3.712447293163858*^9}, 3.71244733171198*^9, 
+   3.712447363526393*^9},ExpressionUUID->"6f9af633-d5dd-428f-99bd-\
+2f26d8eaaec3"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"\[Chi]fitData", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"\"\<H\>\"", "/", "\"\<T\>\""}], " ", 
+         SuperscriptBox[
+          RowBox[{
+           RowBox[{"t", "[", "Tc", "]"}], "[", "\"\<T\>\"", "]"}], 
+          RowBox[{"-", "\[CapitalDelta]"}]]}], ",", 
+        RowBox[{"\"\<T\>\"", " ", "\"\<\[Chi]\>\"", " ", 
+         SuperscriptBox[
+          RowBox[{
+           RowBox[{"t", "[", "Tc", "]"}], "[", "\"\<T\>\"", "]"}], 
+          "\[Gamma]"]}]}], "}"}], "/.", "#"}], "&"}], "/@", "assData"}]}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.704742362877256*^9, 3.704742408664497*^9}, {
+   3.704742527890593*^9, 3.704742541794598*^9}, {3.704742660156436*^9, 
+   3.704742663684565*^9}, {3.70479005735952*^9, 3.704790076495715*^9}, {
+   3.70481811917313*^9, 3.704818120508998*^9}, {3.704967594413649*^9, 
+   3.704967598205678*^9}, {3.7049676822310743`*^9, 3.704967683798901*^9}, {
+   3.7049918676424503`*^9, 3.70499186974644*^9}, 3.705137184169389*^9, {
+   3.705139154629438*^9, 3.705139154869261*^9}, {3.7063088519286833`*^9, 
+   3.706308868591404*^9}, {3.706309070860243*^9, 3.706309074588221*^9}, {
+   3.7123405055606613`*^9, 3.712340505920287*^9}, {3.712414165770205*^9, 
+   3.712414166393816*^9}},ExpressionUUID->"533b82f3-0063-4115-96b4-\
+8433fa98f775"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"\[Chi]fitWeights", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"1", "/", 
+       SuperscriptBox[
+        RowBox[{"(", 
+         RowBox[{"Tc", " ", "\"\<\[Delta]\[Chi]\>\"", 
+          SuperscriptBox[
+           RowBox[{
+            RowBox[{"t", "[", "Tc", "]"}], "[", "\"\<T\>\"", "]"}], 
+           "\[Gamma]"]}], ")"}], "2"]}], "/.", "#"}], "&"}], "/@", 
+    "assData"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.704742362877256*^9, 3.704742434345558*^9}, 
+   3.704742551451827*^9, {3.704743283549821*^9, 3.7047432893176622`*^9}, {
+   3.7048181252291403`*^9, 3.704818125885125*^9}, {3.704967607189753*^9, 
+   3.704967608813735*^9}, {3.7049918708030987`*^9, 3.704991871258729*^9}, 
+   3.7051371912569857`*^9, {3.7051391581891537`*^9, 3.7051391584132967`*^9}, {
+   3.70630888492132*^9, 3.706308897057547*^9}, {3.7123405121205*^9, 
+   3.712340512456396*^9}},ExpressionUUID->"48cb4fd6-ae15-4151-b7ab-\
+6b86437dacba"],
+
+Cell[BoxData[
+ RowBox[{"nn", ":=", "1"}]], "Input",
+ CellChangeTimes->{{3.708443195975164*^9, 3.708443199799218*^9}, {
+  3.7084432394395514`*^9, 3.708443261072507*^9}, {3.708784620032201*^9, 
+  3.708784620135791*^9}, {3.708784815539405*^9, 3.708784815698888*^9}, {
+  3.708784854244011*^9, 3.7087848549074507`*^9}, {3.708784938829364*^9, 
+  3.708784939172886*^9}, {3.708785211505432*^9, 3.708785211713141*^9}, {
+  3.708785417084654*^9, 3.7087854172275763`*^9}, {3.708785462725395*^9, 
+  3.708785478628188*^9}, {3.70878551097403*^9, 3.708785511093617*^9}, {
+  3.708786038502285*^9, 3.708786050677973*^9}, {3.712340629736655*^9, 
+  3.712340629832727*^9}, {3.7123414197574663`*^9, 3.712341442677649*^9}, {
+  3.7123414986081553`*^9, 3.712341498703578*^9}, {3.712341792723755*^9, 
+  3.71234179297202*^9}, {3.712341855229192*^9, 3.7123418553734083`*^9}, {
+  3.71241920393309*^9, 3.712419204045659*^9}, {3.712420039474929*^9, 
+  3.712420039650827*^9}},ExpressionUUID->"63a9f987-b95a-4687-8447-\
+f3daac286a24"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"fit", "=", 
+   RowBox[{"NonlinearModelFit", "[", 
+    RowBox[{"\[Chi]fitData", ",", 
+     RowBox[{
+      RowBox[{"t\[ScriptCapitalY]", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"\[Pi]", "/", "2"}], " ", 
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"C0", "-", 
+            RowBox[{"c", "[", "2", "]"}]}], ")"}], "/", 
+          SuperscriptBox["B", "2"]}]}], ",", "B", ",", "\[Lambda]", ",", 
+        "\[Lambda]2", ",", 
+        RowBox[{"c", "/@", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"Range", "[", "nn", "]"}], "+", "1"}], ")"}]}]}], "]"}], 
+      "[", "X", "]"}], ",", 
+     RowBox[{"Join", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{"\[Lambda]", ",", "\[Lambda]2"}], "}"}], ",", 
+       RowBox[{"Thread", "[", 
+        RowBox[{"{", 
+         RowBox[{
+          RowBox[{"c", "/@", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"Range", "[", "nn", "]"}], "+", "1"}], ")"}]}], ",", 
+          RowBox[{"ConstantArray", "[", 
+           RowBox[{"0", ",", "nn"}], "]"}]}], "}"}], "]"}]}], "]"}], ",", "X",
+      ",", 
+     RowBox[{"PrecisionGoal", "\[Rule]", "70"}], ",", 
+     RowBox[{"MaxIterations", "\[Rule]", "1000"}], ",", 
+     RowBox[{"Method", "\[Rule]", "Automatic"}], ",", 
+     RowBox[{"Weights", "\[Rule]", "\[Chi]fitWeights"}]}], "]"}]}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.7047424379335747`*^9, 3.704742499793915*^9}, {
+   3.70474256029918*^9, 3.704742560714816*^9}, {3.704742745430072*^9, 
+   3.7047427560700817`*^9}, {3.704816911026376*^9, 3.7048169469311037`*^9}, {
+   3.704817035108499*^9, 3.704817035284093*^9}, {3.70481726730385*^9, 
+   3.704817267463744*^9}, {3.704817300960455*^9, 3.704817306408422*^9}, {
+   3.704817446786764*^9, 3.704817449490715*^9}, {3.704818275455348*^9, 
+   3.704818279719268*^9}, {3.704965843170809*^9, 3.704965845466652*^9}, {
+   3.705001282881546*^9, 3.705001305092474*^9}, {3.705008799902341*^9, 
+   3.705008817309978*^9}, {3.7050228523264723`*^9, 3.705022878095461*^9}, {
+   3.7051372381451473`*^9, 3.7051372518246107`*^9}, 3.7051385318297567`*^9, {
+   3.7051392579993134`*^9, 3.705139281919064*^9}, {3.705139321384213*^9, 
+   3.7051393242157507`*^9}, {3.7051393931129093`*^9, 3.705139408004856*^9}, {
+   3.705139451937954*^9, 3.705139452586129*^9}, {3.705139588188541*^9, 
+   3.7051396005239363`*^9}, {3.705140009554923*^9, 3.705140019450447*^9}, {
+   3.70514992440141*^9, 3.7051499452815113`*^9}, {3.705149976082178*^9, 
+   3.705149978506048*^9}, {3.7051500214520197`*^9, 3.70515002213894*^9}, {
+   3.705150339872649*^9, 3.705150343775866*^9}, {3.705150758775298*^9, 
+   3.7051507631014442`*^9}, {3.705151958737191*^9, 3.7051519806892967`*^9}, {
+   3.705152041706599*^9, 3.7051520418982973`*^9}, {3.7051521144367456`*^9, 
+   3.705152123259862*^9}, {3.7051521567801943`*^9, 3.705152157196206*^9}, {
+   3.705166143780427*^9, 3.705166188068859*^9}, {3.705166230821793*^9, 
+   3.705166234869689*^9}, {3.705166459057212*^9, 3.7051664716251307`*^9}, {
+   3.7063089777646847`*^9, 3.706308987234838*^9}, {3.706309220518959*^9, 
+   3.706309241264122*^9}, {3.706309397688818*^9, 3.706309415841155*^9}, {
+   3.7065641430947247`*^9, 3.706564207365931*^9}, {3.706567659866004*^9, 
+   3.7065676711190968`*^9}, {3.7065678437409067`*^9, 3.706567924137554*^9}, {
+   3.7065679928977623`*^9, 3.7065680815561657`*^9}, {3.7065684422374268`*^9, 
+   3.706568449642846*^9}, {3.706568480888012*^9, 3.706568554918489*^9}, {
+   3.706901476596971*^9, 3.706901566991775*^9}, {3.706901602963606*^9, 
+   3.706901606151558*^9}, {3.7069016365695887`*^9, 3.7069016416809797`*^9}, {
+   3.706901740810973*^9, 3.706901783563507*^9}, {3.706901840908586*^9, 
+   3.706901844651593*^9}, {3.706901910045526*^9, 3.7069019116687603`*^9}, {
+   3.7069019811732388`*^9, 3.7069019812704153`*^9}, {3.7069020895849524`*^9, 
+   3.7069020934962683`*^9}, {3.706902163868494*^9, 3.706902296803402*^9}, {
+   3.706902374463688*^9, 3.706902437205505*^9}, {3.706902544041626*^9, 
+   3.706902548871641*^9}, {3.706902608968905*^9, 3.70690262224065*^9}, {
+   3.7069027264106607`*^9, 3.706902767970791*^9}, {3.707048631195756*^9, 
+   3.7070486570361843`*^9}, {3.7070489344889107`*^9, 
+   3.7070489462863197`*^9}, {3.707048976458363*^9, 3.7070489766810427`*^9}, {
+   3.7070491359001226`*^9, 3.7070491528677177`*^9}, {3.707050878015752*^9, 
+   3.707050878076877*^9}, {3.707065794838023*^9, 3.707065901696669*^9}, {
+   3.70706595428377*^9, 3.707065960561912*^9}, {3.70706599399479*^9, 
+   3.707066033048881*^9}, {3.707066069492025*^9, 3.707066075411188*^9}, {
+   3.707066344344153*^9, 3.707066350007468*^9}, {3.707669292132317*^9, 
+   3.707669297132937*^9}, {3.708442758833302*^9, 3.7084428036736403`*^9}, {
+   3.708443114149672*^9, 3.708443164054968*^9}, {3.7084432038658533`*^9, 
+   3.7084432112801247`*^9}, {3.708443244320887*^9, 3.708443247544548*^9}, {
+   3.708451812272045*^9, 3.708451812341448*^9}, {3.708784598857151*^9, 
+   3.708784603113076*^9}, {3.708785447348003*^9, 3.708785458156178*^9}, {
+   3.7087855001510143`*^9, 3.708785527991172*^9}, {3.708786042157309*^9, 
+   3.70878604364589*^9}, {3.712340571733281*^9, 3.712340663683361*^9}, {
+   3.712418980617587*^9, 3.712418981906975*^9}, {3.7124191371877193`*^9, 
+   3.7124191396521*^9}, {3.712419445523443*^9, 3.712419467769823*^9}, 
+   3.71242005218015*^9, {3.712420120454302*^9, 3.712420121591338*^9}, {
+   3.712420153229155*^9, 
+   3.7124201708159447`*^9}},ExpressionUUID->"f7c504d9-50bd-4d15-bccd-\
+8271b18ceb07"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SeriesCoefficient", "[", 
+  RowBox[{
+   RowBox[{"Evaluate", "[", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"t\[ScriptCapitalY]", "[", 
+       RowBox[{"A", ",", "B", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+        RowBox[{"c", "/@", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"Range", "[", 
+            RowBox[{"n1", "+", "n2", "-", "1"}], "]"}], "+", "1"}], ")"}]}]}],
+        "]"}], "[", "X", "]"}], "/.", 
+     RowBox[{"sol", "[", 
+      RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ",", 
+   RowBox[{"{", 
+    RowBox[{"X", ",", "0", ",", "0"}], "}"}], ",", 
+   RowBox[{"Assumptions", "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{"X", ">", "0"}], "}"}]}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.712420860562139*^9, 
+  3.712420917890833*^9}},ExpressionUUID->"9934911f-d265-4bb4-a635-\
+816005c56a60"],
+
+Cell[BoxData[
+ FractionBox[
+  RowBox[{"0.02030814063278619`", " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "2.5149495449771924`"}], "+", 
+     RowBox[{"1.`", " ", "\[Lambda]"}]}], ")"}]}], 
+  RowBox[{
+   RowBox[{"-", "2.000000000000001`"}], "+", 
+   RowBox[{"1.`", " ", "\[Lambda]"}]}]]], "Output",
+ CellChangeTimes->{{3.712420855295561*^9, 
+  3.71242091809783*^9}},ExpressionUUID->"93180487-1da3-4064-a645-\
+15b9034144b9"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"fit", "=", 
+   RowBox[{"NonlinearModelFit", "[", 
+    RowBox[{"\[Chi]fitData", ",", 
+     RowBox[{"{", 
+      RowBox[{"Evaluate", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"t\[ScriptCapitalY]", "[", 
+          RowBox[{"A", ",", "B", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+           RowBox[{"c", "/@", 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"Range", "[", 
+               RowBox[{"n1", "+", "n2", "-", "1"}], "]"}], "+", "1"}], 
+             ")"}]}]}], "]"}], "[", "X", "]"}], "/.", 
+        RowBox[{"sol", "[", 
+         RowBox[{"[", "1", "]"}], "]"}]}], "]"}], "}"}], ",", 
+     RowBox[{"{", "\[Lambda]", "}"}], ",", "X", ",", 
+     RowBox[{"PrecisionGoal", "\[Rule]", "90"}], ",", 
+     RowBox[{"MaxIterations", "\[Rule]", "1000"}], ",", 
+     RowBox[{"Method", "\[Rule]", "Automatic"}], ",", 
+     RowBox[{"Weights", "\[Rule]", "\[Chi]fitWeights"}]}], "]"}]}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.7047424379335747`*^9, 3.704742499793915*^9}, {
+   3.70474256029918*^9, 3.704742560714816*^9}, {3.704742745430072*^9, 
+   3.7047427560700817`*^9}, {3.704816911026376*^9, 3.7048169469311037`*^9}, {
+   3.704817035108499*^9, 3.704817035284093*^9}, {3.70481726730385*^9, 
+   3.704817267463744*^9}, {3.704817300960455*^9, 3.704817306408422*^9}, {
+   3.704817446786764*^9, 3.704817449490715*^9}, {3.704818275455348*^9, 
+   3.704818279719268*^9}, {3.704965843170809*^9, 3.704965845466652*^9}, {
+   3.705001282881546*^9, 3.705001305092474*^9}, {3.705008799902341*^9, 
+   3.705008817309978*^9}, {3.7050228523264723`*^9, 3.705022878095461*^9}, {
+   3.7051372381451473`*^9, 3.7051372518246107`*^9}, 3.7051385318297567`*^9, {
+   3.7051392579993134`*^9, 3.705139281919064*^9}, {3.705139321384213*^9, 
+   3.7051393242157507`*^9}, {3.7051393931129093`*^9, 3.705139408004856*^9}, {
+   3.705139451937954*^9, 3.705139452586129*^9}, {3.705139588188541*^9, 
+   3.7051396005239363`*^9}, {3.705140009554923*^9, 3.705140019450447*^9}, {
+   3.70514992440141*^9, 3.7051499452815113`*^9}, {3.705149976082178*^9, 
+   3.705149978506048*^9}, {3.7051500214520197`*^9, 3.70515002213894*^9}, {
+   3.705150339872649*^9, 3.705150343775866*^9}, {3.705150758775298*^9, 
+   3.7051507631014442`*^9}, {3.705151958737191*^9, 3.7051519806892967`*^9}, {
+   3.705152041706599*^9, 3.7051520418982973`*^9}, {3.7051521144367456`*^9, 
+   3.705152123259862*^9}, {3.7051521567801943`*^9, 3.705152157196206*^9}, {
+   3.705166143780427*^9, 3.705166188068859*^9}, {3.705166230821793*^9, 
+   3.705166234869689*^9}, {3.705166459057212*^9, 3.7051664716251307`*^9}, {
+   3.7063089777646847`*^9, 3.706308987234838*^9}, {3.706309220518959*^9, 
+   3.706309241264122*^9}, {3.706309397688818*^9, 3.706309415841155*^9}, {
+   3.7065641430947247`*^9, 3.706564207365931*^9}, {3.706567659866004*^9, 
+   3.7065676711190968`*^9}, {3.7065678437409067`*^9, 3.706567924137554*^9}, {
+   3.7065679928977623`*^9, 3.7065680815561657`*^9}, {3.7065684422374268`*^9, 
+   3.706568449642846*^9}, {3.706568480888012*^9, 3.706568554918489*^9}, {
+   3.706901476596971*^9, 3.706901566991775*^9}, {3.706901602963606*^9, 
+   3.706901606151558*^9}, {3.7069016365695887`*^9, 3.7069016416809797`*^9}, {
+   3.706901740810973*^9, 3.706901783563507*^9}, {3.706901840908586*^9, 
+   3.706901844651593*^9}, {3.706901910045526*^9, 3.7069019116687603`*^9}, {
+   3.7069019811732388`*^9, 3.7069019812704153`*^9}, {3.7069020895849524`*^9, 
+   3.7069020934962683`*^9}, {3.706902163868494*^9, 3.706902296803402*^9}, {
+   3.706902374463688*^9, 3.706902437205505*^9}, {3.706902544041626*^9, 
+   3.706902548871641*^9}, {3.706902608968905*^9, 3.70690262224065*^9}, {
+   3.7069027264106607`*^9, 3.706902767970791*^9}, {3.707048631195756*^9, 
+   3.7070486570361843`*^9}, {3.7070489344889107`*^9, 
+   3.7070489462863197`*^9}, {3.707048976458363*^9, 3.7070489766810427`*^9}, {
+   3.7070491359001226`*^9, 3.7070491528677177`*^9}, {3.707050878015752*^9, 
+   3.707050878076877*^9}, {3.707065794838023*^9, 3.707065901696669*^9}, {
+   3.70706595428377*^9, 3.707065960561912*^9}, {3.70706599399479*^9, 
+   3.707066033048881*^9}, {3.707066069492025*^9, 3.707066075411188*^9}, {
+   3.707066344344153*^9, 3.707066350007468*^9}, {3.707669292132317*^9, 
+   3.707669297132937*^9}, {3.708442758833302*^9, 3.7084428036736403`*^9}, {
+   3.708443114149672*^9, 3.708443164054968*^9}, {3.7084432038658533`*^9, 
+   3.7084432112801247`*^9}, {3.708443244320887*^9, 3.708443247544548*^9}, {
+   3.708451812272045*^9, 3.708451812341448*^9}, {3.708784598857151*^9, 
+   3.708784603113076*^9}, {3.708785447348003*^9, 3.708785458156178*^9}, {
+   3.7087855001510143`*^9, 3.708785527991172*^9}, {3.708786042157309*^9, 
+   3.70878604364589*^9}, {3.712340571733281*^9, 3.712340663683361*^9}, {
+   3.712418980617587*^9, 3.712418981906975*^9}, {3.7124191371877193`*^9, 
+   3.7124191396521*^9}, {3.712419426040761*^9, 3.712419430906158*^9}, {
+   3.7124194812419577`*^9, 3.7124195370508213`*^9}, {3.7124197909521*^9, 
+   3.712419797694468*^9}, {3.712419912985506*^9, 3.7124199155685663`*^9}, {
+   3.7124205429104633`*^9, 3.712420543452038*^9}, {3.712420750431916*^9, 
+   3.712420751328113*^9}, 3.712420848266129*^9, {3.712444398743801*^9, 
+   3.712444401935453*^9}},ExpressionUUID->"6459e03e-49ac-4247-9e9a-\
+b1bb9f5d89de"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"fit", "[", "\"\<ParameterTable\>\"", "]"}]], "Input",
+ CellChangeTimes->{{3.704742685524661*^9, 3.704742689532659*^9}, {
+  3.7047961416599903`*^9, 3.704796142395809*^9}, {3.7048051150942717`*^9, 
+  3.7048051158782663`*^9}},ExpressionUUID->"d4269174-d0d4-40b4-ac28-\
+93abba4c0d9e"],
+
+Cell[BoxData[
+ StyleBox[
+  TagBox[GridBox[{
+     {"\<\"\"\>", "\<\"Estimate\"\>", "\<\"Standard Error\"\>", "\<\"t\
+\[Hyphen]Statistic\"\>", "\<\"P\[Hyphen]Value\"\>"},
+     {"\[Lambda]", "1.8817792028175195`", "0.004996676343829919`", 
+      "376.606182455906`", 
+      "9.5747526487399393700354111838502657993991`12.90131007175338*^-615"}
+    },
+    AutoDelete->False,
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Automatic}}},
+    GridBoxDividers->{
+     "ColumnsIndexed" -> {2 -> GrayLevel[0.7]}, 
+      "RowsIndexed" -> {2 -> GrayLevel[0.7]}},
+    GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+    GridBoxSpacings->{
+     "ColumnsIndexed" -> {2 -> 1}, "RowsIndexed" -> {2 -> 0.75}}],
+   "Grid"], "DialogStyle",
+  StripOnInput->False]], "Output",
+ CellChangeTimes->{{3.712420537907407*^9, 3.712420544250095*^9}, 
+   3.7124207522473497`*^9, {3.712444301770245*^9, 3.712444323836296*^9}, {
+   3.712444381289075*^9, 3.71244441853673*^9}, 3.712445551161646*^9, 
+   3.712445602944385*^9, 3.7124457209523687`*^9, 3.7124457832043533`*^9, 
+   3.71244592297609*^9, 
+   3.712446971110643*^9},ExpressionUUID->"02dfe6be-0c13-4b56-8b62-\
+675c294111aa"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"p\[Chi]log", "=", 
+  RowBox[{"Show", "[", 
+   RowBox[{
+    RowBox[{"ListPlot", "[", 
+     RowBox[{
+      RowBox[{"Log10", "@", "ht\[CapitalDelta]v\[Chi]t\[Gamma]"}], ",", 
+      RowBox[{"PlotRange", "\[Rule]", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"-", "3"}], ",", "6"}], "}"}], ",", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"-", "5"}], ",", 
+           RowBox[{"-", "1"}]}], "}"}]}], "}"}]}]}], "]"}], ",", 
+    RowBox[{"Plot", "[", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"Log10", "@", 
+         RowBox[{
+          RowBox[{"t\[ScriptCapitalY]", "[", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"\[Pi]", "/", "2"}], " ", 
+             RowBox[{"C0", "/", 
+              RowBox[{"(", 
+               SuperscriptBox["B", "2"], ")"}]}]}], ",", "B", ",", "0", ",", 
+            "\[Lambda]2", ",", 
+            RowBox[{"{", "}"}]}], "]"}], "[", 
+          RowBox[{"10", "^", "X"}], "]"}]}], ",", 
+        RowBox[{"Log10", "@", 
+         RowBox[{"(", 
+          RowBox[{"fit", "[", 
+           RowBox[{"10", "^", "X"}], "]"}], ")"}]}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{"X", ",", 
+        RowBox[{"-", "3"}], ",", "4"}], "}"}], ",", 
+      RowBox[{"PlotStyle", "\[Rule]", 
+       RowBox[{"{", 
+        RowBox[{"Black", ",", 
+         RowBox[{"{", 
+          RowBox[{"Black", ",", "Dashed"}], "}"}]}], "}"}]}]}], "]"}]}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.7047329906714993`*^9, 3.7047331824368887`*^9}, {
+   3.70473324687014*^9, 3.704733251381863*^9}, 3.704734736989978*^9, {
+   3.704741894041542*^9, 3.704741992210286*^9}, {3.704742043268236*^9, 
+   3.704742096652954*^9}, {3.704742129180667*^9, 3.7047421619927464`*^9}, {
+   3.704742567508285*^9, 3.704742577107051*^9}, {3.704742616468075*^9, 
+   3.7047426468200207`*^9}, {3.70474268274114*^9, 3.7047426829487047`*^9}, {
+   3.7047428295193367`*^9, 3.704742829795821*^9}, {3.704743149843864*^9, 
+   3.7047431838914547`*^9}, {3.704743224165559*^9, 3.70474323291709*^9}, {
+   3.7047433049747868`*^9, 3.7047433052567797`*^9}, {3.704743472073699*^9, 
+   3.7047434726009483`*^9}, {3.704744472857861*^9, 3.704744473274468*^9}, {
+   3.704789683610531*^9, 3.704789685321693*^9}, {3.704789994718698*^9, 
+   3.704790017396002*^9}, {3.704795260792721*^9, 3.704795264351173*^9}, {
+   3.704818168502204*^9, 3.704818174112096*^9}, {3.704818233543045*^9, 
+   3.7048182344716463`*^9}, {3.7048823204207363`*^9, 
+   3.7048823454332237`*^9}, {3.7048849755348587`*^9, 3.704884984360744*^9}, {
+   3.704885534113755*^9, 3.7048855344392233`*^9}, {3.704885853651043*^9, 
+   3.7048858540657167`*^9}, {3.704965773843742*^9, 3.704965777065875*^9}, {
+   3.7049693612179613`*^9, 3.704969362720312*^9}, {3.704969399050403*^9, 
+   3.704969447906712*^9}, {3.704991898067823*^9, 3.704991921331386*^9}, {
+   3.704991958589786*^9, 3.7049919703480597`*^9}, {3.7050675461019287`*^9, 
+   3.705067552125432*^9}, {3.70513674970753*^9, 3.705136763418333*^9}, {
+   3.7051372263219357`*^9, 3.705137229337325*^9}, {3.7051393434243317`*^9, 
+   3.705139344126608*^9}, {3.705166738542261*^9, 3.7051667397973537`*^9}, {
+   3.705176438011141*^9, 3.705176464402214*^9}, {3.705176507475484*^9, 
+   3.705176525243636*^9}, {3.705176575181119*^9, 3.7051766349376163`*^9}, {
+   3.7051766711498632`*^9, 3.7051766733819523`*^9}, {3.705176837978043*^9, 
+   3.70517686389679*^9}, {3.705177734310852*^9, 3.705177748038958*^9}, {
+   3.705231673761531*^9, 3.705231966817231*^9}, {3.705232013634255*^9, 
+   3.705232014625255*^9}, {3.70523210300005*^9, 3.705232119848153*^9}, {
+   3.7063084483714867`*^9, 3.706308457012969*^9}, {3.706308640985435*^9, 
+   3.706308682934486*^9}, {3.7063091070446177`*^9, 3.706309109724715*^9}, {
+   3.706309613956152*^9, 3.706309614132029*^9}, {3.707436986052169*^9, 
+   3.707436992524081*^9}, {3.707437592518285*^9, 3.7074375947752447`*^9}, {
+   3.70743767159232*^9, 3.707437671958208*^9}, {3.707438477243264*^9, 
+   3.707438478110629*^9}, {3.707481753346265*^9, 3.707481754129567*^9}, {
+   3.707664795014165*^9, 3.707664795726964*^9}, {3.7076651937319937`*^9, 
+   3.707665195358817*^9}, {3.708442820514758*^9, 3.7084428863547688`*^9}, {
+   3.712340674251704*^9, 3.712340745877091*^9}, {3.7123407856701803`*^9, 
+   3.712340785754417*^9}, {3.712354614143187*^9, 3.712354615407503*^9}, {
+   3.712416803677637*^9, 3.7124168047510023`*^9}, {3.712420780136553*^9, 
+   3.712420789193008*^9}, {3.712446204182747*^9, 
+   3.712446257834797*^9}},ExpressionUUID->"2c5824e4-f401-4979-a7d0-\
+d150d63fc2a4"],
+
+Cell[BoxData[
+ GraphicsBox[{{{}, {{{}, {
+       {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
+        0.0055000000000000005`], AbsoluteThickness[1.6], 
+        PointBox[CompressedData["
+1:eJwVl3dcT/8Xxz+jnZKi+BqlZTVEVJL3R4OUrVQkoy1EpUHaQ4WIKKQkQqE0
+jZy3psqoVDS09x6fxv3M3/39dR/nce5933Pf97zer+dZfcb9sCONQqEwqRTK
+/6+TCWYvZCs/wNk4lzcvFdngNe82kkLF6M0ZymyFHAea81btjIsoBzVlbtbE
+ATaUWiRaHVxcA9Xic1aPS1kw4Z44q5nZCfqB9VdfWRIQ5bgnVzXgFfJ9Z2t0
+q4UNM12591KeVaJad3TgyHIu5ErbCFv01sO+oh9Z/FAW2OziZOQs7gG2cgdL
++SwBe2MS3cQXPwTBIs+yH1s4oK+wiWWd3wSWnx4z7U6zYKRe45JtZBvsj/14
+hq3BgtvZXck+xv0oMOv9nkeXKTjAUqOrxbMRhdJ1pDWLuLBmw+dfROYg+nmU
+r2zVR8FXD4Yaz7T0oOgyY6VyVQpePagy3mLcglL+yS2EfB4wE82dPTy7kE3P
+GjXpx3xwWD2zJCh9EqHZ+Ynt32nYVGdZGsNzAilJf+4Q7KfiKxK/R3jXxpC4
+ic57B0kaGT8R/ZNai2w7d55R+c0F5tFHC/2XjKCQ3EyLkstUXDTj/2NSrAP9
+0jTLPZvFBz+XlVkVmXNIfbVCSWWYAE6cyyYifGeRMhzolAwUwMQuk7Dv1zjI
+oCEiU5clhJc1Nv2I2cNGaazXKiLOQpgVNdNS3DKFHKIejpfL0/F2xc4pifdc
+tC+JsU/MShi77v3dub+Phzwf/M5vsRLBBo53zASkmEj494EsjhMdFxl9WCXa
+OY+MQ4IiqP6COMNQcqGpBIWh8bFJwfWKCB48nyFhtoSFqvLNK7f3COJVy3Q8
+dxnPoE6DpzhEUQDfPxtwV81YgGEg8HZZ8+0F2MxWmFt1mcYoevDYJuanGP4c
+tzXTJZ3C2G+zs3nKShRzgs1khxfSGcW2acvox8Vx+O/txXvbBBiGRmF5oCqB
+ra6eXfe6hcrYV/NO/PceMfzEPeGH+Gs6g1k9xz+WKo4bbeK4bzOFGDirKGVH
+hSS2Cwqzj9pJZSjcpz4oKBHFiTQc8GuXMENcROyvidlCvP2SXdB5X0HGcY2D
+FjfuS+A2u0ydW9JCDGroy2+cVgnsf8pjaLxDmJEg2bL0as9CvGo/fip1VYQR
++C7vHGePFG4+kVWf1TsJa1NlVsZqELCw8vS7qWXToLtnvZdY1zxIqWovv3vu
+D9SKSOXQJFigsFRZsm68C7S/y3DSqwjoPt6haccag325H+Vlxueh+8ntSAvr
+XlAXenbPJo0FK4+/m3HPngDxfxb7oiLnYc3s3TabdUPwyrbkSc4hAg4+sh6P
+M2iFE9+0j6pGs0CfkDRqxP3w7eq60q2DBJzLC9l9ILID1vjseXaET4B8g2d+
+y50R2Lfw8/fBEAKkoieO33hUB9bvN3/Z38CCOtvaEcnpr5ATNpHPfMIGIkZm
+tbpUOLptl6omUsiBtyodN1f05SFhj37KN2MOqD04nysXX4rGq9Z8007jgFuo
+nNfDor/ooWhSxw8eD2TDsNDC+GrYuEi1MaaCBUZZh9fzn2aBU6ORmUMSG6Kv
+/fZU0PmJLJscwozluBBv0rg++dY/5FC9ZSBhgAcnZV9+uDfyG937eOxYagsX
+BOYU/X5qdqJQBrP5E4sPufoZ0R2p4+jRksy4Xika1gj3fHNi2yj6/iu1z6SG
+in37Xmw+7jqArq3QMfN6QMEXnj1mtNYOoSPhp6Q496g4L+B4VyOlD02fPPyh
+IYOChb/t1s4WnES0VZVmikU0LPe08/XmC9PostO2iouedHzM/9qyy6lMJPOi
+ryRSXQDrbPRmTulNoa6jOEB6Cx1HvHAXyW+cQXLPLR41pQpgzW9KghYJ3ajl
+ia2+lSkFX24vNJ4Tm0Pbww+eOLVKEFcfvOT3KZ2FavdnnzZxE8I2ej++Bhjz
+UCL8B9PyIvhBoGigLppHj711z7bpCWJZO60jBlJc9NXfpivLQRhnS2cocFvY
+aFiqWj7knxBuPvZ81M+TQH9iGginQUF8jxJjGXSUwliiNGlmbyuKzTUT92Ff
+Pooul1e0zBXBvREdt7uUaQxhJTcL5ToxbP4kU+bpBIWxsXpHUG+wKH6pKSlN
+BxpjmGc3H+cjjkdjWFVfo6kMFXHulJCUGI65ia8p2dAZRSVT1rv7xLHaVckt
+xtN0RjM1YFlg/AJc/PLaO4bDFLxbuGtREIUAgVcy8xNFA6AlWnwse4gFiDUn
+7D83DlmXlUaULxFQ5B3vHuE6Dy+SHYUjNQlwuECVvGTZB4/7HVI22ROQ3KL0
+t/g7EyJMC13kB+bhqmfMLeLWKLz1MD0XcZL0h/WfOnmak7A0J+1ttiILrov3
+3DPeMgcd2MjojTwB36SGKrxVh8FwzdzlXXkEfBfpzqNTZ6H2yMZR7eZ5MEg4
+/yg4YRrUOzZnmjkSECl41iNteTzssqxfrq/Dgcoz9tU/nZrgleHVtRdEWXDa
+X87QLawTGAZpHu0vCbD6r/zBj/h6mNOuV9ZjsSDx2JuPsVG/IAt/uSjAZcHn
+lQstUlIwKgsvPImLOaDgqOPTqNMGTYk9wwWPWBDnuOvhcVYG8o06nucYxoHv
+7XeXs6ML4XBTdaOELAcMGzX3RfSXQfG31Sn5f9mQdGGs65FhFTL772Z0ZhYX
+7FNOvh0d6YZ/6X4CP+oJkDHdgnM3daB1XTYXJwt4oCsb6OR8rwVt/eV/d/YD
+H95rrx3Ydq4fffEVfB8wTsHZuwZK7Eoa0QHa10eG+3jwoslX1GaqFqU90fpz
+Tp0Hv9ctUN/6qAs5ObjdX7mKgq2T7r4vfj6Grqc/p8VxqNi6w0jsA70XfVri
+VF2IKVhaMNzlS/0g+v563ee2QCqu6zvegAxG0Po7vwqu51BxhVZ4mP2nSZRf
+aPhZ8z0NN83rmypGTiDnuKPv25JoeLC24Uva+BS6Wqv4peEeHau9uaTep8RE
+vVv23nStoWO6o88p1xuz6MKP5libfgHsmsWNe4XnUGDa2dujW0i/ikmkDjPn
+0Zow5i7bAkG88pnBhzXWM+jChe1LJiwFcFKw4021dSzkLzE9PEv65YazXxvG
+y7jI7d6n0xZUEXzlSNfQuRNsVIz7RNR7hPCKUzdPa7F4iK7NOeAdKIIHbqk4
+v73DQZLBqOaPnTCutWZq6clRGJt/dHy98kMEW6YxLa6YUxndXVbHQnXEcG7+
+iySbbArj9pr1t/NzRbH7kCurh82CskB+sUb9PKRZLm9Q3ciBjmn+nFAb2X8f
+XxnY350HKlN4o8YBAl5F0pd0rp+F+Z4Il23RBOT0uyxPqyBAOyWPa3CMABWf
+aYriyTlI9x+7lrCDBc8TqtVW3pqCORv/h+zDBGwW3bk7eZYJDiXmmwUtCBBu
+DXa1K56GiwF17ZdlCdikJtGU3TUK8bGvb29pIeBsTmxngsoEeJeVNilpEWDe
+f6WyxWYSdup9mahE5Hp2bn4aV4bBp1Js7lYEARu3KUlkLhoE3lVVXxpZ32b3
+oo0vGT2wtX6vgqgRCwbWXvDc094GgfkiDNNEFpy8mC6k9qoP5IyTbiUWEcCq
+Gru/5m8n3Jmp76raxoIvTu8+G0s2gw5Vz33dFMlznhxbhkEDRKSbMayzWDC7
+fMc//XM1wDmReN1nNRt+n0gyObe1As5K987zxtjAe4+yytZ+gjExySoTfzZM
+GguYbbubDCEBQ52RbhwwnxB79OnLC3RivHDpuasciFh8ZKjfrBZJ7aJOa2vw
+4KiaUYHXsy+I4e39Ws+MCyJ/KaVDyxtR7/EPaQ0NPNiy5VdK9fQ39PxQrG7B
+ay4sNrkYMDHSjNy4b8a4G/lgtNsv6druLiS+hqnoeYeCy0d1tzGL2pFthGhT
+eBAfBNYdFOO/60HXtCJq55IpuGvzuTJ68CCyCfY68tGBiqPbI/uDl/Yjg6DT
+ORlsCv7ynGcQMTiM4jJCiOE0Kt5aWnAk8s4kKr90N4X1l4bpfcnvRQ6PIS+L
+d+yahTRcminz2ExjBq166/n+na0ADq71URdlTaNGsYqfr0QEsMnP4QqTExPI
+60m+sM8HGl4RMcn6VjaFzj9d6p8eSMfUrGSqZPU8Sv9xZMPUsCA2jtG/eIBP
+IH0Fm4wXKkI4L7V9zY0zs0jcXjgyiy6ItwQLc25vZqMzOf1D3+qF8F0v2/Dv
+9+eQbx7zzPFAQfyx7gyv1pmDgjZltNP8hHHwrYoG6cdctKt0Rd/ErDDWsF+2
+KVCeD7qpPw6/LCGAmHO2MhjmgtV3/o8WNZJXvqU//BTChrA7G5/hDAJKXe2N
+LWp4SElY2H/kBcmvM06+nHwOrFHzUrAl+WdzPNVD7z8CCoR3BqnaEfA2bPLE
+lf0skM3IjFLbTPqNLEqb650DZvzvnqapebgzGFienz0L1Py6qCVSBDQwfVW1
+9zCh+MuFXwc3EDCNb+6YXDwN8qlez4XrCNB8URl1+doMrFJYeZhO1vvsWdie
+7I5JCBuJ30TvI+PPOYnumRPwqqetu4bUi5GlfIXtxBg8rNzaYU2ezx4xz3Br
+5AjMBLQsLiwjwPPnkaW/e7tg5fBQy79iAq5r5nha7u8F741erCbSz3ZFfxiy
+lh+C1+qNE5nk90v2DR38m98PQjI7zncqs6DV4srAwWsdcFcjinNeng2rDm89
+lLSuFdRFB397BLBgUW/5/QfWfyDtftvVjcps6FcU6YiLrIPz5k5PvGzZMMbc
+qLX+fDV4PDa/OmZC7vOtkZsxtyPRSe/nxq1VHNiRpU5dXP0Vqh3kXXQfsmFP
+ZtLSRYezoOKjzk6hcxxoWjmxeNXJn+h8itvbIyE8wEaLUqSLStGyUYUYoWVc
+CPVza1q2NR+9N+ws9jrIheQCRnkcpR6FeQWsjCe40L78Zcrj1H+IOFL99tUl
+PpyyZpUn1v5FO5ZY7Lyky4eMaFpYg1gfCs/v2lbWRsHepTHqtXqdaFBcoSVJ
+koLHq57NW3kOoBOXErarBVHxr6UXxY+kdiPDLTdUuv1J/gpuaWhuGUIFlsKj
+MbWkX533HD1hPIq61ymIrRWj4bkSv5ossUm0XMk+WNKcjpUn+/Q7M8fRb7Xi
+UztUaFgtvrNqs+c08kkaj3Z5QsfbkpegqR1TCEnp0rdb07FP6tO0vJYZlPOw
+LvVFpgAWdbZb65XORFVLMod2Kgngj9cMZOYWzqGa0AKBUK4AzvAUTdY1nkfa
+1utqm5sF8VxQpe/HTBYyDLVeXNslhLXKHJ76+RLoS6NN3bYdQnibrWM/u4ON
+MqlP7jvuE8avE/v8dNZR8D/tsKkF3gQkbPy+WGMVH3Y6/Cpx6yb5ny6hMzrI
+hVFfsbv8ZQSYHEDO1iUUvM6VYreU5C0xfJSVkccB8SpHhfCmeYitcZJ0C2aD
+vfSd0ISH87DscBpj3T4WeMu4R9QnEjCi3HtmYCkBF1Mzq185ExDdqaGa3jMH
+o3ytXU62BGhtbCt2zJoFof1lR5uPE3CAM9Ws6D8DWk/LuxVIvfHbBnu7djPh
+fdasTZQ6AUuoBRz5jAlgObtSRm4RwOtl8k+2T0J2YOOl0Fgynlu69anMNHi/
+XCxcnjQPPEqY0ufRMWisTA23a5uHctu8KP3wETi/4fUh5SwCGC+uZRauGAJi
+vdHoBdIX15usOrQ1tx9U/qp0FWSzoDzZsVOruwvec+Y1SmxZcK/aeHWueS/Y
+X3mInrDJ5wfVBd5d6YDQyysnm3VZcFQq6ZCNcivU/vnausqXBTfLNngcDKkD
+GRvRW+bn2DC7yHx9GP4KA063b0uYknpyVo8+fuQPLAiT+EQ7ywKBbF/3+DPV
+cFDw1ys5Nzbo3fL+eVz3OspUF9PkbeUAM/yGvaJ5PvKpHt0QG8IBve0DI/zt
+WfB598FFsRs4cOqe1auEilIUm8BdvXAzFzobql6/cP2Jpk2vn73P5sIlDRnN
+RsF6FBGedOJAKQ/8H4UMtjT+RdbJS1UVdfigaWz+vD39H2LGnnVdNMuHaRld
+c4/tnYjWLTooRKPgIrFFST4SfWhtqMIGvhAVn7+ygh7QNoSGS008ljdTsa5F
+EzDTulFITN7VCdKfUmZf5rIuDyAAQxlzeyqusfHXoC2YRJ3SPhUth+hYZ9E6
+F96uUXSRVZpis5aG32wgYgwZU6ikzbivzI+OiypOmQS/G0e2E6AVvpWGlztv
+FwnzmkafM2r9yrro+KBuGk343wwSPddnlpQmgBui+AKmi+bQXKCQ2bF1gviR
+iUPrdZN59MDieNXpx4LYzvCvd9lLJkotFqbUnBbAbQoU8yo/AuEOwWPbfITw
+5qDxc/MVJGceHXOYVib1UXU/8I86FdtRWJUvFhOwbY+sVMFdCi7sj13r9YwA
+Zo7AXtejHOg2t79YUTYPux3PG6pP80F/XLy0X4GAvtUFgiNfeMDhngvp8SD5
+aFPFsoxoLuhnJt1ROkqAk1GsVv8oAWvDR15x8DwsiNvx8/mHeWhdsKPd8AQB
+FREmF9YqkvpamTAsRvb7ersjfWfC5yBh4j/VNW4ENDPMJhUPzUJ4jJjMgVIy
+tvHb2bliBl7rxb+pViLg2BnFlauCJoFmlkDRsCRgh5R+zT/zCbiRUvusg8KC
+iTNyIqdyp6Caq++sN05A025L8ZSBabgtZN557yEBnSLtzvnlw9AZ03nmsS8B
+s647SnQ1x+DBOLNteQAB/vaq89kzfZDyZ5e+tCoL9sQK6mrbDYJQ/c+cv4jk
+rcyx/zRv9oDDnJDDdBe5nnksZCp3wbWzroxAdRYcHn9bcNy3Hbqrd/Vqq7GA
+2Psm+WB6M2w8TUSvGWSBi1S6oaFgLWi/O7LErZANvprTaZ/vpMHn8brHW805
+MNZu0GvW2AAeOkFPL8WyYcBcZ/vMjSJYUCfla/eAA7NqPoeCXL4Bf4EEuwXY
+sEL2sN7p2afoy4JIBQs6F6RuxSbvRZ8RI+6HxvO9XBDbr0TP/FqBFqlwb372
+JfOLqZ9bsmsQu/RtqF4yD66kjLn0HGlGhR6GaQu/86Hkc6VPe0gDun9b69ym
+eB4IrNY6PKjcjmIP3hDd3sqHoU0DSVfse5Bd9ClF/WoKzs8/PsKt7kPf311U
+NaijYOHdByPmWJ1o7uuE1tJjZCyQokFNGkaH5LSl3k1R8dC4zq4wwTF0IGrx
+zeWLaZgh2MoxcptER8UYq7RmaLiuMiGIpjOBSgf+zJym0nHwPpdDAdqDyHt9
+C7bxpuLLjUZz5b+nEeePTaESVQCHdvi4hSdPIWjUi3VuomPWmmRCWGQG7VE3
+P75+QgDTIRlFX5xDM91p5QF3BTHupteabp9FxZUM3zgyrxd/Q3zuMqkP40J+
+fCcBU62HeHk7KfgdPFn0yJTkHfNJw8H/ePBd2UnaleSfZ7zMx40tFKxb/O0f
+dXQeNn13dNF9TcMhetLLODsIcK3KkdpwgA9rh0tbEoJIvclKXJWTomELvayi
+PXPz4Nhyda3zezZcaxYLC04n9bBqk+PLPg4UursqxeuT/fp360Dqknlw6t5j
+655KxpOOuqc7Z+F8sfKvYRoB4us3lKmQHONQ8r65jJyH1s+if117CBg933Aq
+W5uAv+07aQpvZuDJNl2TaDMCJlh0frsvEzplVBeUuxNg8HJNxQmpKdh9qId7
+h+SrYyzJxU+Mp6HptPBnERdy/vgeY72idQJGdtkPRUuwoEO30DL/wDhclPl4
+lbGbAFNoU9HuHwHrZ9oqQ40EXL3L780OGIJbj0w/JZB6nWmtENGUHYBN1Rcf
+xlYRMIQmsNlAK/B7kxedaSXXu+ryJvNNL9THnYDarwS8TM+qVDfphqeSq92F
+NrPAv/GdwcvWDnjPVP2+soYFThdtVhnK/YWKJaInLn9nwZRjkOWVoe+gWFj+
+sWkrG/xmzwswdv2GgQ3LOgtfs+BPzNOOC6YlsFjJ6FKqJAeGvBTqfu7NgZLc
+kE8jDWyoqev2fOK4Gs77ip/CO7kQ9UFDFzq/I6dk59wBfx6scUnCBagEBTX2
+HH2ZyIWrjO03e3b+Rn1tclN3yPzSFdceWOvnoGV+I7IWbRwQ/BrgPSj9F9Uv
+OMkqnOBByMpY+4CMXjT9wSm0WIKKpTXGNo53tyJKbmGG1SoKHqYtzLrS3IG2
+VIgo12fyoTAihMc17EYX1Z9tX5tL5sHOOsx/CPnPJG0WeUbFwc1t4tf3jaP7
+Lt76/97RsGh9OYO6eAA1ZQX+CXGm4jDTGC/Blgl0kS7W8WqUhp/bW8sI9o6g
+TT1FWa7WNMyKfU+7bjSNduYrBtb30jE2l2v+5sNEoqGzjyb9BPDlHVaU3Qun
+0CN/QTWtORoWWJNjKpY5gyb3vbL4CwJYy+DQEV0POnbJKc+onyFAV8h3dtaA
+hvOxJSuyg4D7kfOOcuTcFXHuOFVJiAWT+wwG80SpOFvoSPLlEAKeuidENpLf
+Yem+RbA6j+xH9W9LB1/zQVG4UsZ3IwElFFH9l948GBUOKQk6RYDIAtojFfK/
+LQp908LqnYczRYd5ToZcqNvmCifJeWHzURPPeHcKfn02Ut19PQGNHyW+pD4n
+gC15/fyWEQJU/8rmdDWxYNzM4eSxl2T+93bJ05fmQb91qjuS9KWR1ub6dpFZ
+0Jx3dVEg62n4uvSvvMEcON8d/lgSR8DR1t7BpHomTE7upm8i19sWzXt8ImUa
+mu2t42bekjzJe09p0ZkEl+6jkQeuEDCWcjlXY+sw3JZ7qGlO+snc2zMaK85N
+geENgWveffPgZfXmTvaTUfA35a2aUWBBE5K1yfwxAAlakXJ5NBY83Vk+kEif
+gNH6i6JfyP0b61ZZoHKvE9Z5q4drkfVefnhiMJ3TDUZu3/6UeZH3u9ldVnfs
+A9oFMdHl3iywns+9vNOqDUbFHC+Gb2DD0MflIdvz6uHIz+EsZ3s2nA2oPI4i
+mkAs6YzPLkM2fHpkHXv+2y84kSG16JAmB56/8onCpzEqejG7krqNCzZmFXJO
+quUwEc88XjPBhkLJUrm70g8g5ZaxjaIdB94seqmWJfIBPjkV/Ltmwwax04m7
+e3iv0YrQhtlTQlxQeBHXNP6sERU/N35vdZIPSy59dauiVyGJ2F5idQsXZPSU
+5IfqapHbjZf8LvK/fymuP8xT7EDc0Z7MjUN86LlWLDLr1YIULd9eepfFhyib
+zoKAmC502qDP2InkdimpZfFUZg+6kj409XuIgjOTXzsLlg0iTpYv44ErFU+x
+szLDbPvR+ffp391JfSz84WIgfn8Mnf2ar1WdTcNRslqnrquPoOl1wfdMbWnY
+zzZo/e7ACZSzViTKUYCOeW9a1K7nTKIvqwI+jRrSsdRcqU2YigCOrs6RD5Rl
+kfM2Q6Cyfwpl/Wf6iiIrgIVNWj3EVjCRHdPlQNh2ASyHhzmGkzQcSDMxqCsi
+IHjdgluKVjQs9sl4s4QfAd47z52zj6Hj10yrK5R4AmqEs8epRVQsN51IvalD
+gLTUB79ORSre93Sk+Dl5fv+p+ROHr1OwB3XAOIY8f0O8JnYz/pH7VGkVVnCN
+gNVa28T5L3lwe8T00M180k8CB9OLvLhgwboU5N1EQPxu5eXEHwJiL69tfRFI
+QK856fkMDlTeT6N1kv0brzFTtW0ByRm/FOyja8l55OCP2S36s/CRo3E2cgEB
+GQeLO33c5wBuu6knHCJgg8dDCc8nU9Al/6EvcQfJN9zeVzNC5HxjtWAFr4WA
+e1sovQXPSN7bsuVYwWMC8hXN9HPrpkluOhbDJN93Ku/NjNbZSdCd5CSFkv5w
+7rrxTzv6GBj9/eC0cQsLrNb0erQ+HAZP2W4rswMs8JP/0jCxZQIaV6X8WVdI
++nOwGv1vZR98eFZ6NCKeBfJH1GNPbBoEJSPVi4fDWXC+mqlieboH6m6bwjMR
+FvRFfch7fKAZUqcHpZTLSf7a5xybrNAOj1fm9TxOYsFr+1f1NfOd4Fslu0gv
+nwVrvYLR3Tc1kKB4+7qbMRvqXsReW/qhAmbqFC9FurOhZYUZ+35AA2gdYDgM
+XmGD0h/m81jRWiRp6DaQcJQHj5HLPRWNz7BMuv/PzVJy3nkhLrr4SREKnzKJ
+KojkQq7GxHVKbhoKoIVF7c3iQpuspeXK+qeQMu6TeYbkgIG3yg3xzQ1kDXu8
+D77hwcZ6sT8yl76htri49e+ceBCcL+7xOKMZDZ2hSN+J4oNcj/L2JP92xJZ5
+ov1QiYLvrDW7WqvahX5e1/0hHEnB4ppndlmfGkRx/xlqHbajYq/FXXEWsT2o
+OPTox6gvFKxR2LKvYa4PpVe1C3kup2K0jSk/sXcCye8XSe8apOE7vYlKLd+G
+kX/DPTGXZTRsWst09MibQpZ01oBSHR0LzlrPbQyeROXLeYs/6NGxZ62Wvp3W
+GGKqp+ZW+NPw/wCKeP7m
+         
+         "]]}}, {}}}, {}, {}, {{}, {}}, {{}, {}}}, {{{{}, {}, 
+      TagBox[{
+        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
+         LineBox[CompressedData["
+1:eJwl2Hk0lN8bAPAZZowlJiNC1myVVFIR1UwSERUVUSlL0oZvKEspKfuuKJJd
+0kqlSJ6bbGVJ9ij7vi9ZZsHvdn5/vedz7jn3vve59z73eV95W2ezc1wEAsGE
+SCD8ex64Xj+6vExB/Yq5vj03mLDXS9Yink1BE8RKkyFs7ZuXvmybp6CnNSHU
+bmyN2x9Uf0xT0GE/7aoB7I1+3LEXximI3/0u6sRW8j9MIA1T0Jt5qlM/tkxQ
+wsUnfRSUlZTLM4q9OnSgQauLguayyBp92CsjNOj1vynoQ0bJp2HslsyYqMx8
+ClLp7VeZxnZsOrrDxJWC9AMeZhNvMsHmV1LygBMFOWx8lcfB7Va/R/jvXKQg
+zy5u03/tRzs03aUcKGil5YFWMrZxt19Hng0F/ToYQfvXvr/vh6HpaQpKPyUW
+/a99z+CadyMnKOimYBuRH1tz5LyM/zEKckep5/61bxl/Gyh3hIIeNV6s5MNe
+IK9qm9lIQTvNq9Vp2EHbG27F9/Ogn/7sLgVsKaHAXU1dPOhz6nCQPParfh2m
+8B8epO41pqKM3RCXdjWongeVCJx1X4ctx7p6zgPxoBkFow1q2HlFwgfN43mQ
+/WN7oiZ2t8FhMdohHnRtwNzKGNtdjrvexJAHDRVdNj6IzcvMiwjS40ENV2+r
+HcZWy5bhI+rwoI+uWgJm2B4rxtkTKjwIzYZ1WWAL/QztqibyIDPrnCU7bB2r
+7y+C3pORzq4ePh/s6Q/t+mI5ZOQqKhx1GztbdKYz9QUZ5Wm6W/pi27pSvDdn
+kVGEjGqHH7bEzzWihWlk5JyeYOePXbtpy+sDSWR0fMZPMwA7MFTPsDGejJLl
+DxcEYc8bXLk5HkVGYa/cJcL+xSfDd7V3GBl99Cxa/GcH7tgcShAZmZO6b0di
+y9hkH7x/F/evN3g5CruxqKhP7jYZTV17MBmDHSpVf+ulNxk5+bj03cfW8xqQ
+0L5ORrVqpR0PsDnN7LdlV8motIx27iH22+0rDx11IqMT270cH2GrCptPSKmQ
+kQD/8FDev3g7XQx6tpaMijfoeuRjx1f5KOyQwV76U1yAzRf41OKwKBnl1nhm
+FGEPLC2ALzcZGb/5HVCGnTaaENnfQUK1SjPFTdhrKrrU3zwkoZWjbFUmtpvL
+K6Wj90loc5e2CRu7StxbYi6ChLiiqFcXsX0urCLuCiAhncxbX4k+TOjkN6gt
+dych1XvPQvmx001eOHWYkdC0sPhtaexN9deeCwmSUMmocoUetr/3vqQcXhKy
+NfE2NsDuUFgZc4xEQltfSDcYYke6PfOKZ3OjQ3I/xg5hT4v+NlQe5kaDpHkj
+S+wPJ/YO7i7nRvqxK/Y5YzPaBZSu+HKjMxukNRKxt55iXMq5wY2eyhL8k7GV
+Wt1yZq9zo+IDY2fSsPmb/uz2ceJGVjJrpLKx66tfm0ec5EYV6cOlH7AdPh8N
+zNnOjeQlSHr12CGPE0Zmh7iQp/e0rNAtPH/JWnXtPi703+mBX8LYLg9JHj6d
+XKhJw6xMFPvY/SskSjMXUjZMuSONLRNKlxYv4ULI6KmDGvYb755D2k+40ELp
+RsFD2E1Wqrk+ZlxI5XpDfQz22GnUKHKIC5GjjOQfYpNsjjOzDLnQlMGi62Ps
+redvMeoZXKjr2iBfBna4a32NymYu9HNfgUcetkGo90itABcaI570a8X++LlS
+UaGUiHq7U0gqt5nwA5098BERkRMjjW8jdv/X2UsmhUTE21a1uAV71XfZt9ff
+EtGPUxoqOtj/NbnurUohItLSt0eHsTdMrLF29yGiGIu1dZ7YCXKX48o1iah8
+JNKlHtuY6Si4tJWIQsVHvvzC5vw857dtExHtahCX6sS29jvjnKJIRFJ8G9mj
+2Gv7zQy8hYlo4kIPjeLLhKznO+c3jRBQ75qlgV3YeTsoFrFPCEjHqrTmNfZ5
+Kqm66hEB8aOZwx+wxQcJ+7gfEFDK4sWuImyvR6xNLiEE5HcPra7B3s0Z4zHy
+IKANLxyFxrBLvjTkLZoSUORWDnvjHSb8NE4VO0cmIKsNsZbvsRVcLPpzCASk
+q5S9ugh7WFni8uL8MmwIrukrw1Z/N5a9pW8ZUi9EpbRgo5rYdXGwDElRTi85
+2B3cQwr2bsvg5Z270sAP51unMMmlP0vw7s2G0D5s9G4+P65hCXSO9Q9MYNuz
+bSzVK5eAtDnYlIX9InDHQ/uPS8CSHD9IvYvzX1qHaGX0EhioKY7vxLZqURd+
+aLAEUSoew1HYcbpNlK05i7CUssfK5B4T7sYQba9kLcLxwuqyE9hXezcWZiUt
+wqZ4X7o9trG/n4tsOLbqMWtvbK7vW36tuLQInrldxtnYl01DsgcUF8ExznuK
+3x+fr7MMk8SHHLhbuXa8GVst59LTlggOjtuCQR+2JFcccVUABy7m++dOY8+m
+jb0PdudAho1YgWAAzs8D8TIeZhyojpCP1cMWdZ6dMFvBAWsVVsR77OGb2dG8
+t9lgH7WgmhHIBAGvjCj/a2xQvn1bPA9747XkSNIVNgSELKwpx77iFBtOsGKD
+r9U3xyHsSes7wQsabDA85Sa5OQjnb7rVncEBFiiuu8QpwiZx8V+tOMyCWfN1
+T6aCcT5YIv2nr88CX5Wep+QQJuizlp1LdrGA955JlQR24PTsFbSeBS8E7c/r
+Ygv0dF34yM0C18rHg/exaSX5NlkfmHDc3GYnPZQJsv4XTANlcV4nb1PIDmNC
+cKiSQJYYE77Jiu5H2H+ju0rKBfE5yK6/04RdkWSpReEsgHi0mxl3OF6ffENZ
+/5YFiH5G1bfGLhldP+YXtQBHTrASJSJwfXF0OPAW9wLcsFdZ+TSSCXWWmbpJ
+rHlovFA8g7B3nbXlFE3NQ+zUn/lWbOErrc5LHfOg8eKwLTWKCQX+381vFs7D
+fe3Jr57YggXZit7u8+D5gNxxLJoJuXKX8N09B986hxKV7uPzWRin9rV9DsaT
+Rwz3YQucKImnNs3Bjl5TSRts+whp96ySOTCvpa5PxBZb+rG+NWUOLhsVca1+
+wATPtm0xu0/NgeVe2xrhWLx/YpfOkX7Owil6Nb/SQyaMqqvWH6mYhfvDDQkG
+2I+qLRiJMAtcFH6Li9jTpBzJHa9m4cb8tPEb7HRXux/nQ2ZBKsRi155HuJ4w
+rdCq3D8L2YvG5rbxOJ8JRAtEF/yFQpuikarH+L42C5eWz/kL8d9n4hawwx8F
+b37z9C/Mvim9qZjIhEMqfkdr7v8FCdPH8zewa3TdEvid/8J9g7bnW55ge5qr
++in8hS33pC3TkrAHJA+6hc7AoR200Q+puP9Nq09z+82AoXu37Qh2uLuIc7Tn
+DLgf1JWWTcP9c6+IeeMwA7/uLZ8OwK6RWWwdZcxAjwtZ4mQ69vGOi+dmpyFK
+eOwLNZMJ1V/Tgs2tp+F8RarVm2dMmFtlYxFwfBp2yBh2DmLLOcgofjSehlaH
+99ny2Xi/8D76LKEzDRN75an3scVNwid/r54G2k5J2RvP8fo0eZjb/ZyCVX6W
+aZYvmcAeNFnrojcFqy3XhxnnMEFRW2AiWWcKCndsNgnHPhRS8enn1il4uTLj
+VC12stq+4xryU6Ahe+jS8Vx8Pq5qBc4tToL8tlRTu7dMiGavHb/xYRLCzRZi
+wt8zYb3QQn7QhklYe3VLpFIBvt/576kuyk3C1ATd3gO7h4eW6LJ6EtpTR9Iq
+sROXVW9bkCbh3DtlR9dPOP93Q6hR4QTkueTQKgqZMPU0IsNXYQIIYnIO/oDr
+AY3NzRNTY8BPk2qwKmWC0UbDgqb2MXhj4qxUiE1Sskv8XDkGrxoGZqTLcD0p
+FmcXkjEGM5nJ/D3YZ5hLE8qWY1ATmr/ZtQLXI1DDa41G4WV3UfvzShx/Iyft
+qvAReO2aIO9Xx4QVThfurrgxAvn0frUZbKMo+xrjCyOQ+22+1K6eCWXNVrbV
++0agWngqQb+BCUX2BsE1C8OwK29gktaE73cfudZa22EIDdCoKfvFhPu5dZ6N
+O4ag2Hl4IqkLn9/G6q+iikOg+5X4YW03/r5gVgiaCw+BtpeQbCZ2GB1SmkYG
+QUW5qeFVD45n1fNvzcmDoCPUO1zeh+fXf1eilX8Q3hkp20gMM+GkpGZ+e3s/
+TH7vi9szg/Ol2TsP2+p+sOguTajCXgpS1+r/1A9zj9cyTv7F68tU/TD2sB+k
+1Voue80yobdF7j3HrB+2WDPPo3kmOMXx50iW98FUdYXbJQ4Tbq9qzzJ/3QsX
+L5T76PKwwNT4pGNrYi/I9Ag19GGvvduiYh3aC6eNB9uDKCwomanLPHehF7Se
+08QbeFnAV1+e7qbQC0H1z1X/E2BBdFROcnRcDyg8SXWrWcmCdKF7D2tudYMe
+SypEUooFvx+npDRf7gbfB2aNfdirVIuyOy27gaCwYWWuNAvuGcwXTmtg+4ed
+NJFlgcPtC11ig13g4jBqF7GWBSrTJhvOHOmCQGVtEV2cx7MbxQon5DqhYMV/
+VY6aLOi20yhdEOyEhHcSQse0WLC9N+kx91wHtPbOnWHsZIGYNO2LSnYHXFM7
+ryWlw4KW8Dk+F1oHMNMGWjr3sODkVUgg9PyBlx6O6Am+R2x3moL83Tb40Wh7
+9685CxZ8wgsLzrbBG92L76csWBBeUpl/dHcb7Isenpw4wYJPh/Xf3ZtrhcuV
+f4InrPD8HHSeDTm2Ap+YpR3bmgVl0UoxOSa/wLmR10n/PAtUR5kOe1c3g0FY
+4fY3HiwoVte0b51pAi/dgv9qPVlw4rqbjWttE9zPoTROebHgLtfEyYygJmDr
+00W1brKgXbz3CB+nEaRixh7U+bIgcn+N9s/OBnise/E8I4QFf5+kCtlk18GX
+g/M15CTcX5RMEuluHRAtYK1jMgs++8VvzjpdB6lt1n8rU1jg7xh9ZGJlHWTT
+pkQfprNg9dY70Tev/4TWRZKbbjYLtEttxOL1amGH/61nne9ZQGjeuyvzcyUI
+petfPljDgm+fdp4ec6kEPlJKbccPvB+S1X22KVaCMtnll/tPFihclEfFwd+B
+EqT7J7OBBfqLBL0Oi294/Ac/pNpYEKqADopPl8EB0cwrloN4fJc9J4OVi8HH
+0H9ZmsSGqaWC1ZptXyCHe2mgk8yGyjDNhp6IL7DjaUtwBoUNt55vMdnNRLAn
+YydpmwAbaqr3+3TGAcyeUu87R2PDlU9C+i+6C+C6gtFJGXk2vIhNbtznkQM8
+XYrdQ3Q2OKl9eltb4U7/azdlsc6PDR94Ze18onzop+oWtuy6xwbC1b18Yi/9
+6MYW8uWmAWwwMsn4+NU9lK4fLLPpTggbxn3zQiK44+gLtOzF+Rg2MKTo7u5G
+6fQf6btPaGWw4cIF7ouDY7n0G0+L/IW/sWEp4lxvCr2YTn+yRvCIGAd2HbdT
+rQsppkvpclNWSnDAS9LmKldLMZ0vba9e3RoOzKWfIti5fKWbFq8KPS3PgYn8
+o1KKKSX0riwRx4iNHOjs2Xssk6uc7nQgmWyzjwPFmjIl2aWV9EsobeeXqxz4
+6jzy81dGHX0w9pHH4xY83noH/kvf6ugmQhSjgjYO5HV36nJG6+jRQge0W9s5
+kHW86a3Mtno6f8Gwh1wfB0J1vjywK66nE8UJXmVTHDCnxFmOtTfQ1zTodHsI
+LMLQE90ugngzPcB7T7knYxGoNY8mVYLb6Id3Rwpz3iyCpLvl4S65bvqd/t1k
+rqdLOB6Re0619dNTyrc0NTQvw6KWbjVTb4RecpYn7Cyu889rUr1SeSbph8bJ
+SXWGRFRKPKGecGaavnnM7aygKBcq3WmtpRT5l370aH9EQAcX6k33FOCZnKNn
+SuTfsMbfkRk3zTZ5qDDpV7KNjVKekdBvMo/756Nsesiy0q+NEWS09UtNgOXr
+RXpzj6K0YwQP2jB8bNi/e5muGfzfs1E/CpJT8Ai9t5bI2Kqp4JcXxYs4AekH
+I+lcjNji5mfSUXwoRq/oMcmCmxHG52wjEM6P8uO7jyr6kxih7VIJ0akCKOdp
+X+6KFDLD5MFjrx2ZK5DWoZnryfU8jO/vvvs0I0HkZTxek0jgZeiebVff3yyE
+wogV1XYSfAyLPOOXSW1UtPnIi62NhvwME9tP4Tu8V6LU4850qoMAo4bSUHVu
+eSWqzZVtz72xgpEfbaAm6SuMwp+1dhOfCzLknv1YMSpIQ9IWbhESpUKMxsBG
+bfsoGnpSP7SO/F2I0SJgb/s6hoZkjpwpnqwRYoRubQ9mPaAhOUOj2fIWIYac
+WWR7ZDwNrdWRO3ltVIjRHloR+TmNhtbJVinXi1AZ1+TcZFfn0dDWAYWiUFsq
+Y9PM+T/fW2nord0jC4/zVIZkBE1O7A8NbesUmrK7TGWMbPKzs+mgoe2/mAo6
+16gM2ubc0fkeGtKq/BE0FERlJLuv51Uao6Hdr72P6+dQGX4LMba3lmmoSHVq
+XD2PyiCQ5HO+E0XQniyHQOlPVMbDMDuCGEkEMVJMP/0toTIebSCnvOAVQbox
+KvJpLVRG2b6k4V/CIugrNbEg/A9+3/HCPUqrRJBeKO2YVzeVIWIZGOMiJoL2
+31v0Nx2lMqSyFOmUNSKojOgqt3uKyqh4MfPATFoE6fsM5q+bozLacy6PJcqK
+oHLW6aOr2FTG++/h+4fkRdD//19SGcMClk+2KYqg/wFXP2GP
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$137251#1"]& ], 
+      TagBox[{
+        {GrayLevel[0], AbsoluteThickness[1.6], Opacity[1.], 
+         Dashing[{Small, Small}], LineBox[CompressedData["
+1:eJwl2Hk8VN0fB/AZM8g2E4NKWUK08khFqBklpVKhSHtZStZsWUqKbMnaE4ki
+KrSZep4s4XuKoizZkuwkZCfbvWP4nef1+2te79e558y9Z/mcc+/Kc67mdgIU
+CkWbSqH897vncv3QwoIw2qMufcHtKgGGfopWSTxh9JRUrbuOrXfV8f2mGWG0
+hKy97oCtHZi77uuEMHLI2Vzgh70+iHbXYUQYZWTpidlgrwo5SKEPCKNlvRfE
+PLEVwu9ffPALt3dkfWUw9pLIvgbdLmHkZpv92Rl7cbQ2u75VGO2Y6LQMwG56
+Eh/7JF8Ymf/7PDwS+0KjxRZTD2HEcWnrycIO39xwLalXCDX9Lnv1G3sFI8yg
+sUsIcU/a3+jEftmrT0i2CaHJt7ZJw9gNCenu4fVCiNVdFDuOrUS62/kgIUTt
+SHhLYL8tltxnmSSEWnbsGRQNIKB790FZqQNC6ExC0Me/sL2UaPWmJkIop7rI
+fh32IuJtdLiREIoMdqvZjL0hW0GEqo/vh7v3jx62j/gIb1RdCDGunXfahc2o
+jeyqouL6H58aHMfWP/blefi/gqh605RjBPZEbruxLFcQPRvuPBCDnS3zp/PR
+c0HUWvoi4T+f8xD218wURKsHtdzuYi+rXS5TmI4d7sRJxq7R+OvVnoeC6MlB
+zcf/OSzSyORbEm4/JN/xEfbMbuerI7GCKMfV40km9svH15f43xZEO6dom7Kw
+7Wl3ucLhgmhlfNjYS2yFs9n77gQLos78EzGvsL8VF/9SChREklnCe/7FjlxR
+f+2FvyBS+nBq4T8b+fUt07ssiPQU9D6+xZ77znvzyR2XXxD1LcR+s3nxAQsX
+QfSVbDtShL1O0nJ0hbogotyXFJr8r79dLoZnKQui5HdaKQR2UmWAyhYFQfT8
+IV+Vhy0S9tTqoIwgilvkckTgGgF987NwnSaIvjlU/l6MnT50P6a3g46qvfP6
+NLCXl3dp5STSUb1tsb0Ltqfby1UWd+jodTZzmzt25VL/ZdPRdHTGLFbOGzvA
+QZpqEEpHoQcmfl7F7hTdXVPmRUduGaMfbmNnmD536TCnI98hniYXW6Pe+xlD
+go6o62/aENgh/jsfchfR0WrWxik+dofK4vjDdDoys+qNFAgkIMYzyy+JR0NP
+WkZrxLAnZFpN1AZoyH3oeaYCdu5Rw/5tZTSUmP2P925sTrvYKufrNCRPZP68
+j73xBMeRe4WGdDUWyT3CXtXsyZ26TEPvX8aVPcEWbWzbFuBCQw3SkqfeYNdX
+vbKMPk5Dz/uVOyux7YsswribaajmE2mwgH0r+f7g1G8B1MYQtXO8jp9frkZL
+75cAsqrNZLljuyXSfQI6BdB8TOkJX+zDd5zpwt8FELtl6mootkIkW35pqQDa
+YfIMZWDn+P88oPdAAOVXoqed2I3H1r0OMBdAjYasX2duEDB8En1jHRBAcw1t
+bRew6WePEJkmAiiIKO5ww954/hqnniOA/rq3IjkQO8qjvlpdUwB13OLHpGLv
+jvQfrBETQKmPXKq6sfOKKlRVPlKR2WlHW9cgAr6iM3vyEBV5SIRn+WD3lkw5
+mhZSUfUPg5zr2NJfFN9cfkNFE3EZHnewLzV6GFamUdErm87pfOy1o8tPeQVQ
+0dr97yOEgwm4r+SUUKZDRUWenpueY+8nLkjMb6QiUie5Ihd7rtYuaJMGFclm
+a3mUYJ8KOu2apkpFvpd2q7dgK/ea7/aXpCIdo8gVYjcJyHy2dUZjkIIO3zKZ
+dcZ+u0XY6u4DChJvjZMwDCHgPJNeVXmPgrqnXtYfwF7aT9lJ+5uC3muMwAls
+v3ukhtstCrKd+PzMB3vb3LDQXh8KslEtieFil75veMs3o6AWk555tVACavc/
+krUTpKC9kYK+K8MIUHGz6uVSKEissTlIC3tAbZkTf2YBxvolXxtia/0znP3X
+rwU4XBy84xw2qr67OgEW4OATBd8M7A7abxVbzwUYNBiV3RCO89blttx82zx4
+V+1SPhSBr/9nJj+hYR7Uey6sscG25Z211qqYB3NPvok39vOwLYm2efOw1reh
+OhlbP71DpiJuHgyK0+UGsY81aUkm7p6HioKm7MhbBCTsaBTeyOXDqNOzup5I
+AoLjqeecM/kwda6wisB271lfmPmQD9vbWa2M23h8QoLcFKP4kFoqcnArtsCX
+v36IO/IhXkbxSjS2k9mt7D5VPux0kPzNicLr6wzHNCVxDsrU0rfkR+P85jo+
+bYqeA96va3m12HICCVTp0DlQiWdaD2BPpQ//G+E1B5TVadPLY3A+9yUp+JjP
+QZuIRXYgtozr1Ki5+Bx4LkoTPhSL+/dqdtyiQB7sVX7zWTieADG/x7Eh3jx4
+mePcpIa93js1hu7Mg2pNLUljbGeXu1GUYzww23eNdhN77NSNiFltHrRmm/bT
+7+D8Zh+70d9HAsNYaUT8b7x+BETdyw+SMHJH+iY7AefBPP2SsTEJ/u9O77HF
+NiYXXEsNSLhuNKUfjh02MeWM1uD6T3cV1GOL/exyyKORYL7CXNoxkQCp0vyz
+mbkEuB7PCEi/R4BiiINZmCLeJ1yWy21LJiAicpVYpiy+z6i4HDvsybiu0jIJ
+nIt6VL8o7PKH1rrCc7PA2l/+pBPbPd9EMaRpFip9WlxCU/D8HFozHBQ7CyKt
+DhPtD/B+bjEQdo02C0aLr/ydm0ZAnfWTHQ/JGWjPLhHtwzY4c26ueHwGPksv
+fyf7iABJ52bX+Y4ZuPJxxVdv7IKQL5ZXC2fgot/1yq3pBEgUZKv6e81AXsnF
+UxUZBLxWckTefdMwujuVUMjE67MwYUNJ+zRcksmxPIItdrQ0idk4Dd3ftaZv
+YdtGy3tllk7D+LTQPIEtO/91TXPaNHzX8tT9kUWAb8um+G0npiGm4WBqxjM8
+f+7O29Frp+DZCu+QS68IGNJaV3+ofAoqnIZrc7DvVVlxUmAKjtrrXhzDnqBz
+5ba8nIJlGiZBbjm43zxsvp6/NQWMuoCznlx8njAr163YNQWbY3gKt97gPBOL
+E4srmIQI/hr2DB6Xl+ZR8iu5kxDjrL1mdx7Ox3sRmjlPJ2G9jcyVBOwD6kEW
+1XcmYfKQ8umt+QRU7/C8L+o6CQ/kWtVvFGD7Wq4LUpmE0LZi/dVF2H1y+zwj
+/0D8Rn2TLx9w+xpLTtKC/sBFt8nTq0tw+14s1zjfP3Bypc94CPYBmnh8jv0f
+CDTUCN1Viusr8JuHOH9gx2BpVPlH7CMdF+2mJkBC+e+E3nICqkrSIyxPTYC+
+DEEN/UrAtPRZq9AjuHzncYMRbCV7BdW8/RNQ4uH150gNni+L7hUt05+Ak4GM
+ZrVanH+mUWOtSyYgZePdxOo6PD6NPpY2teOQZzh7bEsjAbx+U2U3o3EIirRm
+ObYRoKonNpqqPw4jFq/oP7EP3Cp/V7txHO69yr15vJ2A1A07j2ivHAdzusPW
+Ax14fbjrhk3zx2AZXdlXr4uAOJ7yyJXcMSjfkDqg8YuANYzZ/PC1Y8CI3GwQ
+OYz3d9Gb6/hKY7Dx9U4llRECfgpJpbgtGYOx0/afCrBTFtYFWtHH4GF7xImh
+UZz/3RC5t3AU7lZ1fT46QcD40+jH11VG4XamtY/VDD4PaGt+Hx0fhvPaa2on
+qCTsXW9S0Ng+DBL+iV/SBUigr7JJKaoYBi67NeMIXqc+sgk2tx4Pw8mpmYV3
+dBJOE/OjatbD0Ntp5hwvTIIGVC86hYZg6SMdhosECVV7XfQqowYhPEui/8cy
+EsRdHILFrwwC5+2AwWM5/H+xttX7HQYh2fGfW5eWk/Dp+7FzVTsHIT30zHIJ
+eRKKbXdHVM8OAG8gZOUhJRJyApSaa84NwJu/rUFInYQ7r+t8v235DUeV5JW3
+byah7ltViYzqb4hb3dy6dgsJi4lyCUvJ35D3Ef27VIeE22xIaxzsB9ebVZ9m
+dEkIqXz2+XtqP2ydsQ8twTnl0xu8rFm0H2xY/rFxRiQcl9PJb2/vBbXOCqcl
+R0hYb/6Pz7mqXggzKytYYknCfLiWbu+7XthqKae6zIqEVGJd7nBiLxTXEPsV
+rUnoaVL6d868F+JEVGW2niTBJUGUK1f2C2bXsJ3T7UgIlG7PtHzVA7f1AyqO
+XSbBbP/xC80pPbClip4Y6EOCcnCT+qnIHoDw2EdPfUko/VP3xM6hB0ZUdbwJ
+fxJE6ssyPFV6IGGxms7zQBLiYrmpcQk/4f1+tOJgBAkZjJuJ1de6gR4W6hP3
+gITW5LS0707dwLu4+fX8QxKk1xVnd1p3A8tkz22nNBJu7p4pnNDuhv77SRtM
+M0iwD3Toku3vAgVTHkc5mwT1CdO1pw91QYy5F13+LQnZ32QLR5U6QUpDO+30
+VxK6bbQ/zkp0wp4HhtMCtSRs7nmYTJvuALXQs/KZdSTIyku9V8/ugM1h830z
+30hoipoWcZPC5e5191604v52h/uUn20Qd9bhs/sACee2msHK4BY4abtWzVWY
+B7MBUYUFZ1ogbyz3saYID6JKK/IttrWA5lOt3nFRHrw7aPzPzelmuEvpe+nP
+4IG0vX7W7wvN4NSndyNDhgef4lbFc01/gDaZZ7xflQfrhgh7wyXfYc2YeN/c
+Dh580NKxbf7TCDGMrb9njHhw9LLnWY+aRmBbJtVPGvMgWGD0+OPwRmBofbKb
+3MuD9qU9h0TmvkF4lWqaqAUPYnZV69V2NsDRjIYrd2x4MPngEeNsdh2Uhkb3
+rgrB7cUqPKQH14FCIXcyOowHRUFJmpkn66BjyMlxLoIHIRfiDo0urgPZSb3E
+1mgeLNl4I+7q5VpYm5ArU3CPB3ofz8omGdVAzLrB6oEXPKB8NzR4UlQBp4aW
+mq9vwte7bT8eofYBavjCdpc2zcH4fMESnZb38KemSeKSzhxU3NZp+Bn9Hjy0
+Zw546M3BtWd/mW4jEOzYLJ9yjTMH1VW7AjoTABY32l7N3T8Hzu8Yxs+7C0Cz
+Va03w24Ont9N/bbThwtPXry96HdvDlw2vHtTU+7F1s7VKVIV4UPuIkWbgNgA
+9mrXrC3R4nyguBuKyL4IYsdnOdHmmHzYa/o4r8Qrkq2bteFuqywfRq6/vRVN
+S2CnKxYm5eNzEWcF28trbwabaOL86ubwwcGBdrF/+DWbvd2ub9SPD/PRdj1p
+7A9s68+OnLopPpS4Dtb+eFzH5vmK+0vJLwCz+t6YekQLW1PM+cagGgXJeVkf
+7FLqZn8Zy7ut+JGCHBxitp9o6WUztnuFaXhREV93RxVhNMi26jv17bScADqv
+w/R7JDTGfh/OCBCrFkAfqUe17p+eYBfUrMnIwO9BH7ee0l0VM8lOjjHNsNSk
+o54MXzGhsWn26uuXuiOn6OjxVXMNH3WCLfSgS8E3H783Cwp5FVnw2CsHAh2U
+goXQxvfVodav+Gyz1aKFpo7CaO3A4YGQ7gW2WtC0mP/+RUhJxSfypjKVYxO3
+Yp+DiQiaC83YF8MW4MzI5KzyMBBF8UbFyXQrGqeYta+sX1MM5Sd1W6iG0Dkp
+rzOP3jEQR9ynv16LpwlyjPT3bH+lJ4F0D/y5nFovxDGhdRENhxjIb/9IdQpl
+EedSX3q5sC0T3aaWV9ksE+F8am5Ql9ZejDQPPd/4zUSU07zhS3MCLEaPjriy
+mfZinO1tFlfX75RENa8V219fEee42x1nXSqVRFFZzd3UZxIcfnTczYFDUkje
+yjN62UcGZ9pfo1WtQQo9qP+9WvALg3MsMUTpUqMUUjh0+sNYNYOTbCV4/l2T
+FFIy2TtV1sTg3Bm5SB5sk0LK+krHvYcYHIVnwXq+vVJotWKlWj2LyTkT5SZf
+OSuFNvapFEeeY3K477uOeciz0Bube1Y+55mcmaaU9iJFFtrUyRi3cWJyJnev
+sV2kzEKbfxAq+t5MzmvtDM8UNRbSrfga/jucydHY8Cu7TJOFtr3yP2LMZXKW
+t3hdXLGDhYrXjY9ovWVyBGRpoueNWGh7pn2Y/Dsm56fh1mdcYxbipJm9myxl
+cvR3JkwY72OhHfHqK9ObmJyjPs13Lh1moRJmSkFUG5OjzHU1LLRkIaNIqcN+
+3UzOvqb7o0LWLLTrJj/EbAiXr805lHyShT5RPZS2jTM5vrPxtL7TLGQc0J+/
+eprJ8ZsTzNM6x0Jl5EkLaR6Tc4JJd7liy0L//z7G5OySiFxVZs9C/wOhiofL
+
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$137251#2"]& ]}}, {}, {}}},
+  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
+  Axes->{True, True},
+  AxesLabel->{None, None},
+  AxesOrigin->{0, -1.02},
+  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,
+  ImageSize->{485., Automatic},
+  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
+        (Identity[#]& )[
+         Part[#, 1]], 
+        (Identity[#]& )[
+         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+        (Identity[#]& )[
+         Part[#, 1]], 
+        (Identity[#]& )[
+         Part[#, 2]]}& )}},
+  PlotRange->{{-3, 6}, {-5, -1}},
+  PlotRangeClipping->True,
+  PlotRangePadding->{{0, 0}, {0, 0}},
+  Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.707669280342009*^9, 3.7076693055732193`*^9}, 
+   3.707670227571476*^9, 3.707670279354446*^9, 3.7076704179499903`*^9, 
+   3.7076890254896317`*^9, {3.708442810225156*^9, 3.708442825615745*^9}, {
+   3.708442867584693*^9, 3.708442886906851*^9}, 3.708442941043404*^9, {
+   3.7084431231244173`*^9, 3.7084431660145493`*^9}, 3.7084432157552567`*^9, {
+   3.7084432513103437`*^9, 3.708443263366468*^9}, 3.708451815645948*^9, {
+   3.708784607845929*^9, 3.7087846234534407`*^9}, {3.70878480209125*^9, 
+   3.7087848232645283`*^9}, 3.708784860369842*^9, 3.708784969602377*^9, {
+   3.70878519903968*^9, 3.7087852184905567`*^9}, 3.708785249551149*^9, 
+   3.708785301211081*^9, 3.708785403734845*^9, {3.708785464939011*^9, 
+   3.70878553077702*^9}, {3.708786046252172*^9, 3.7087860529631453`*^9}, {
+   3.712340687040523*^9, 3.7123406898929577`*^9}, {3.712340740706085*^9, 
+   3.712340746288026*^9}, 3.712340786132267*^9, {3.712341422072835*^9, 
+   3.712341444734881*^9}, {3.71234148193649*^9, 3.712341500356955*^9}, 
+   3.712341794861045*^9, {3.712341835919621*^9, 3.712341857303825*^9}, 
+   3.712354297048585*^9, 3.712354343222934*^9, 3.712354419780979*^9, 
+   3.7123544683466*^9, 3.7123545345657053`*^9, {3.712354603657954*^9, 
+   3.712354616045879*^9}, {3.712354676984397*^9, 3.7123547732262907`*^9}, 
+   3.712355249706522*^9, 3.7123553786150913`*^9, 3.712355554706808*^9, 
+   3.712355845596476*^9, 3.712357871094554*^9, 3.712402693007428*^9, 
+   3.712414179738449*^9, 3.7124164820333223`*^9, 3.7124165793904657`*^9, 
+   3.7124167478685703`*^9, 3.7124168054507647`*^9, 3.712416862553542*^9, 
+   3.712416913569981*^9, 3.712418989052652*^9, 3.7124191553268538`*^9, 
+   3.7124199181280107`*^9, {3.712419994168869*^9, 3.712420021449827*^9}, 
+   3.712420056852771*^9, {3.712420127848818*^9, 3.7124201736831503`*^9}, 
+   3.712420552037171*^9, 3.712420753135285*^9, {3.712420786642437*^9, 
+   3.712420789660735*^9}, 3.7124443266735573`*^9, {3.712444383695437*^9, 
+   3.712444419535204*^9}, 3.712445552269155*^9, 3.712445603900373*^9, 
+   3.712445722334865*^9, 3.71244578411648*^9, 3.712445924650709*^9, {
+   3.712446233092272*^9, 3.712446259431014*^9}, 
+   3.7124469723056173`*^9},ExpressionUUID->"dde3e3a9-0cb5-4b7f-ab70-\
+3c49ca3d7d6e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"fit", "[", "\"\<BestFitParameters\>\"", "]"}]], "Input",
+ CellChangeTimes->{{3.712340886335466*^9, 3.712340889581972*^9}, {
+  3.712341190677258*^9, 
+  3.712341193227158*^9}},ExpressionUUID->"f184ef37-afc5-434f-aea8-\
+ffddfcc7f01c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"\[Lambda]", "\[Rule]", "3.647256050314803`"}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.712340889801001*^9, 3.71234119345047*^9, {3.712341422608639*^9, 
+   3.712341445624464*^9}, {3.712341485998266*^9, 3.712341500653166*^9}, 
+   3.712341796378963*^9, {3.712341836889235*^9, 3.712341858245736*^9}, 
+   3.7123543475851173`*^9, 3.7123544225520563`*^9, 3.712354469900642*^9, 
+   3.712354620164184*^9, {3.712354680496811*^9, 3.712354774446205*^9}, 
+   3.712355252563312*^9, 3.712355554731657*^9, 3.71235584562005*^9, 
+   3.712357871116666*^9, 3.712416925931582*^9, 3.712419919748313*^9, {
+   3.712419995166749*^9, 3.712420023486136*^9}, 3.712420181139059*^9, 
+   3.7124457890655193`*^9, 
+   3.7124459508622227`*^9},ExpressionUUID->"4098e4d4-0560-4547-be30-\
+aace734c4987"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ListLogPlot", "[", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"Join", "[", 
+     RowBox[{
+      RowBox[{"{", "\[ScriptCapitalM]0", "}"}], ",", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"Abs", "@", 
+         RowBox[{
+          RowBox[{"coeff", "[", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"\[Pi]", "/", "2"}], " ", 
+             RowBox[{"C0", "/", 
+              SuperscriptBox["B", "2"]}]}], ",", "1", ",", "0", ",", 
+            RowBox[{"{", "}"}]}], "]"}], "[", "#", "]"}]}], "&"}], "/@", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"Range", "[", "15", "]"}], "-", "1"}], ")"}]}]}], "]"}], ",", 
+    RowBox[{"Abs", "@", 
+     RowBox[{"Gs2Cs", "[", "Gs", "]"}]}], ",", 
+    RowBox[{"Join", "[", 
+     RowBox[{
+      RowBox[{"{", "\[ScriptCapitalM]0", "}"}], ",", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"x", "\[Function]", 
+         RowBox[{
+          RowBox[{
+           RowBox[{
+            RowBox[{"Abs", "@", 
+             RowBox[{
+              RowBox[{"coeff", "[", 
+               RowBox[{"A", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+                RowBox[{"c", "/@", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Range", "[", 
+                    RowBox[{"n1", "+", "n2", "-", "1"}], "]"}], "+", "1"}], 
+                  ")"}]}]}], "]"}], "[", "#", "]"}]}], "/.", "x"}], "&"}], "/@", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"Range", "[", "15", "]"}], "-", "1"}], ")"}]}]}], ")"}], 
+       "@", 
+       RowBox[{"sol", "[", 
+        RowBox[{"[", "1", "]"}], "]"}]}]}], "]"}], ",", 
+    RowBox[{"Join", "[", 
+     RowBox[{
+      RowBox[{"{", "\[ScriptCapitalM]0", "}"}], ",", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"Abs", "@", 
+         RowBox[{"SeriesCoefficient", "[", 
+          RowBox[{
+           RowBox[{
+            RowBox[{
+             RowBox[{
+              RowBox[{
+               RowBox[{"t\[ScriptCapitalY]", "[", 
+                RowBox[{
+                "A", ",", "B", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+                 RowBox[{"c", "/@", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"Range", "[", 
+                    RowBox[{"n1", "+", "n2", "-", "1"}], "]"}], "+", "1"}], 
+                   ")"}]}]}], "]"}], "[", "X", "]"}], "/", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"#", "+", "2"}], ")"}], 
+                RowBox[{"(", 
+                 RowBox[{"#", "+", "1"}], ")"}]}], ")"}]}], "/.", 
+             RowBox[{"sol", "[", 
+              RowBox[{"[", "1", "]"}], "]"}]}], "/.", 
+            RowBox[{"fit", "[", "\"\<BestFitParameters\>\"", "]"}]}], ",", 
+           RowBox[{"{", 
+            RowBox[{"X", ",", "0", ",", "#"}], "}"}], ",", 
+           RowBox[{"Assumptions", "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{"X", ">", "0"}], "}"}]}]}], "]"}]}], "&"}], "/@", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"Range", "[", "15", "]"}], "-", "1"}], ")"}]}]}], "]"}]}], 
+   "}"}], "]"}]], "Input",
+ CellChangeTimes->CompressedData["
+1:eJwdzFtIk2EAh/G5ZLNtbqUwIcpwB4eKbooYwoJ9s5QWgpSbMyLEPM3DFJWF
+VBhLFGxdZFGCpiG65cBQhzglT9F2IQgZkUfYpbUPRTzgh03p/b8XD7+7J6m8
+8V4ln8fjaUgwql7zdHCYZdq3bS+h7Er/gp94vO6m8rV21Qyx+0Z0KlwWf8+A
+r/N0WrjbsqqoGGEZ68/fVN0bXzYMK+eMMOftRz/Mf14YhOe/0oSVxMnZQTE0
+Ja/EuIjHAw0X4VbIJYOi94Y4WN1vSIDDgQLqxsL1FJj1IJNa7B/IheE7Rj2U
+FkoYuJzfboLys9umXuKlv3V3oXqlqwhKEl9Rm70lXpubZfYiqxOQ3yeahvqO
+mq+wjMcFoNd8Rq06VR9Bt2Seg5vPUpV1xHeLL1RQuenKgOMWvhb+WePW6okH
+ngjVMfKNayI+vBWkGvWH5mZiq/CEGtOT49jHz+dsg84ap6XXwzL3Jz6Vwn1d
+uBy2CnwN8NrNLYv/M8twCoEVjnUm2GaJqsciO0yWJvbBUMg9BM2TjzzQM6T3
+wh5fRLBErP1xKoTBky45XIz/QrXHX0iDBucONTBW9gQujTqo0gqzOEwsSv8Q
+C6/KjeO7xGJpNfXf5e0pqCgomYb/AepFToo=
+  
+  "],ExpressionUUID->"318a2176-9af8-4eb2-a44a-805d59a407c0"],
+
+Cell[BoxData[
+ GraphicsBox[{{{}, {{{}, {
+       {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
+        0.012833333333333334`], AbsoluteThickness[1.6], 
+        PointBox[{{1., 0.20082428216262066`}, {2., -4.360775179005213}, {
+         3., -6.460900611466145}, {4., -7.8423802865985355`}, {
+         5., -8.817313544951592}, {6., -9.505764693665155}, {
+         7., -9.971982706127193}, {8., -10.256439308648243`}, {
+         9., -10.38709822150855}, {10., -10.3844613840237}, {
+         11., -10.264207022511004`}, {12., -10.038713113734813`}, {
+         13., -9.718000245599143}, {14., -9.310346548281125}, {
+         15., -8.822705856807845}, {16., -8.261001975563165}}]}}, {
+       {RGBColor[0.880722, 0.611041, 0.142051], PointSize[
+        0.012833333333333334`], AbsoluteThickness[1.6], 
+        PointBox[{{1., 0.20082428216259543`}, {2., -4.360775076335285}, {
+         3., -5.830391697563509}, {4., -6.504456136060981}, {
+         5., -6.753788170290081}, {6., -6.7159247424693485`}, {
+         7., -6.460354678470231}, {8., -6.028874663405286}}]}}, {
+       {RGBColor[0.560181, 0.691569, 0.194885], PointSize[
+        0.012833333333333334`], AbsoluteThickness[1.6], 
+        PointBox[{{1., 0.20082428216262066`}}]}}, {
+       {RGBColor[0.922526, 0.385626, 0.209179], PointSize[
+        0.012833333333333334`], AbsoluteThickness[1.6], 
+        PointBox[{{1., 0.20082428216262066`}, {2., -4.360775076335285}, {
+         3., -5.8303916975635195`}, {4., -6.504456136060982}, {
+         5., -6.753788170290077}, {6., -6.715924742469348}, {
+         7., -6.593474493353132}, {8., -6.832308553881589}, {
+         9., -6.909921432178013}, {10., -6.8542910460549855`}, {
+         11., -6.725493651060986}, {12., -6.496629558411245}, {
+         13., -6.174627204763308}, {14., -5.76671759342796}, {
+         15., -5.278978575167664}, {
+         16., -4.717257512808765}}]}}, {}}}, {}, {}, {{}, {}}, {{}, {}}}},
+  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
+  Axes->{True, True},
+  AxesLabel->{None, None},
+  AxesOrigin->{0., -11.15557646774275},
+  DisplayFunction->Identity,
+  Frame->{{False, False}, {False, False}},
+  FrameLabel->{{None, None}, {None, None}},
+  FrameTicks->{{
+     Charting`ScaledTicks[{Log, Exp}], 
+     Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}},
+  GridLines->{None, None},
+  GridLinesStyle->Directive[
+    GrayLevel[0.5, 0.4]],
+  ImagePadding->All,
+  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
+        (Identity[#]& )[
+         Part[#, 1]], 
+        (Exp[#]& )[
+         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+        (Identity[#]& )[
+         Part[#, 1]], 
+        (Exp[#]& )[
+         Part[#, 2]]}& )}},
+  PlotRange->{{0., 16.}, {-10.97531613837917, 0.20082428216262066`}},
+  PlotRangeClipping->True,
+  PlotRangePadding->{{
+     Scaled[0.02], 
+     Scaled[0.02]}, {
+     Scaled[0.02], 
+     Scaled[0.05]}},
+  Ticks->FrontEndValueCache[{Automatic, 
+     Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{-9.210340371976182, 
+       FormBox[
+        TemplateBox[{"10", 
+          RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> SuperscriptBox], 
+        TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-6.907755278982137, 
+       FormBox["0.001`", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-4.605170185988091, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"0.010\"", 0.01, AutoDelete -> True], 
+         NumberForm[#, {
+           DirectedInfinity[1], 3.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-2.3025850929940455`, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"0.100\"", 0.1, AutoDelete -> True], 
+         NumberForm[#, {
+           DirectedInfinity[1], 3.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {0., 
+       FormBox["1", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-11.512925464970229`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-10.819778284410283`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-10.41431317630212, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-10.126631103850338`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.903487552536127, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.721165995742174, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.567015315914915, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.433483923290392, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-9.315700887634009, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-8.517193191416238, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-8.111728083308073, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.824046010856292, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.600902459542082, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.418580902748128, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.264430222920869, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.1308988302963465`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-7.013115794639964, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-6.214608098422191, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.809142990314028, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.521460917862246, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.298317366548036, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-5.115995809754082, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-4.961845129926823, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-4.8283137373023015`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-4.710530701645918, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-3.912023005428146, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-3.506557897319982, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-3.2188758248682006`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.995732273553991, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.8134107167600364`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.659260036932778, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.5257286443082556`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-2.4079456086518722`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-1.6094379124341003`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-1.2039728043259361`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.916290731874155, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.6931471805599453, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.5108256237659907, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.35667494393873245`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.2231435513142097, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.10536051565782628`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.6931471805599453, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {1.0986122886681098`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {1.3862943611198906`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {1.6094379124341003`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {1.791759469228055, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {1.9459101490553132`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {2.0794415416798357`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {2.1972245773362196`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {2.302585092994046, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {2.70805020110221, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {2.995732273553991, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}}}]]], "Output",
+ CellChangeTimes->{{3.710698075659574*^9, 3.710698116827692*^9}, {
+   3.7109483412498407`*^9, 3.710948350124186*^9}, {3.711126867676691*^9, 
+   3.711126926785492*^9}, {3.7111269770429783`*^9, 3.711127011512371*^9}, 
+   3.71112708891626*^9, 3.7111271686421633`*^9, 3.711127272636292*^9, {
+   3.711127457883432*^9, 3.711127494390698*^9}, 3.711127907894992*^9, {
+   3.711129875571169*^9, 3.711129919374709*^9}, {3.7111299535301123`*^9, 
+   3.7111299766717043`*^9}, 3.7111312661811533`*^9, 3.711131299373033*^9, {
+   3.7111333625030193`*^9, 3.711133390724989*^9}, {3.711133521566346*^9, 
+   3.711133583525776*^9}, 3.711135291340001*^9, {3.711141827523261*^9, 
+   3.7111418310294313`*^9}, 3.7111443993529673`*^9, {3.7111446213281813`*^9, 
+   3.7111446242421*^9}, {3.711383369851819*^9, 3.711383397357383*^9}, 
+   3.711383504902141*^9, 3.7113838184541283`*^9, 3.711383922815707*^9, {
+   3.711402952508552*^9, 3.711402958023882*^9}, 3.711404390088929*^9, 
+   3.711746726419971*^9, 3.711746765694718*^9, {3.711746855213851*^9, 
+   3.7117469271558533`*^9}, 3.712336546732326*^9, 3.712336606319612*^9, 
+   3.712336645889738*^9, {3.712336691123527*^9, 3.7123367404383574`*^9}, {
+   3.7123383529819508`*^9, 3.712338375406939*^9}, {3.712338477349781*^9, 
+   3.7123384936611223`*^9}, 3.712340855903501*^9, 3.712341274116418*^9, {
+   3.712341311978713*^9, 3.712341334321162*^9}, {3.712341427897252*^9, 
+   3.712341450442026*^9}, {3.712341490932637*^9, 3.712341506437632*^9}, 
+   3.712341802069538*^9, {3.712341842610015*^9, 3.712341863495072*^9}, {
+   3.7123543533323793`*^9, 3.712354372987413*^9}, 3.712354427874082*^9, {
+   3.712354475376789*^9, 3.712354490278894*^9}, 3.712354624937665*^9, {
+   3.712354659322887*^9, 3.7123547794222317`*^9}, {3.7123552571853523`*^9, 
+   3.712355263773179*^9}, 3.712355558705669*^9, 3.712355867547941*^9, 
+   3.712357874815097*^9, 3.7124169850583267`*^9, 3.712419002183814*^9, 
+   3.7124192007347183`*^9, 3.712419922276613*^9, {3.7124199980667677`*^9, 
+   3.712420027212335*^9}, 3.712420183743813*^9, {3.7124383681880693`*^9, 
+   3.7124383840029383`*^9}, 3.712444337927021*^9, 3.712445566104023*^9, 
+   3.7124457924226217`*^9, 3.712445887131619*^9, 
+   3.712445954967486*^9},ExpressionUUID->"89b54540-039e-4ccb-82c9-\
+59f2f46d6fbd"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ratioData", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"With", "[", 
+       RowBox[{
+        RowBox[{"{", 
+         RowBox[{"X", "=", 
+          RowBox[{
+           RowBox[{"\"\<H\>\"", "/", "\"\<T\>\""}], " ", 
+           SuperscriptBox[
+            RowBox[{
+             RowBox[{"t", "[", "Tc", "]"}], "[", "\"\<T\>\"", "]"}], 
+            RowBox[{"-", "\[CapitalDelta]"}]]}]}], "}"}], ",", 
+        RowBox[{"{", 
+         RowBox[{"X", ",", 
+          RowBox[{"\"\<T\>\"", " ", "\"\<\[Chi]\>\"", " ", 
+           RowBox[{
+            SuperscriptBox[
+             RowBox[{
+              RowBox[{"t", "[", "Tc", "]"}], "[", "\"\<T\>\"", "]"}], 
+             "\[Gamma]"], "/", 
+            RowBox[{
+             RowBox[{"\[ScriptCapitalY]", "[", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"\[Pi]", "/", "2"}], " ", 
+                RowBox[{"C0", "/", 
+                 RowBox[{"(", 
+                  SuperscriptBox["B", "2"], ")"}]}]}], ",", "B"}], "]"}], "[",
+              "X", "]"}]}]}]}], "}"}]}], "]"}], "/.", "#"}], "&"}], "/@", 
+    "assData"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.704742362877256*^9, 3.704742408664497*^9}, {
+   3.704742527890593*^9, 3.704742541794598*^9}, {3.704742660156436*^9, 
+   3.704742663684565*^9}, {3.70479005735952*^9, 3.704790076495715*^9}, {
+   3.70481811917313*^9, 3.704818120508998*^9}, {3.704967594413649*^9, 
+   3.704967598205678*^9}, {3.7049676822310743`*^9, 3.704967683798901*^9}, {
+   3.7049918676424503`*^9, 3.70499186974644*^9}, 3.705137184169389*^9, {
+   3.705139154629438*^9, 3.705139154869261*^9}, {3.7063088519286833`*^9, 
+   3.706308868591404*^9}, {3.706309070860243*^9, 3.706309074588221*^9}, {
+   3.7123405055606613`*^9, 3.712340505920287*^9}, {3.712413797491253*^9, 
+   3.71241388135924*^9}, {3.7124139514944696`*^9, 3.7124139520385036`*^9}, {
+   3.712414150105638*^9, 
+   3.71241415156942*^9}},ExpressionUUID->"a7e36aee-5801-4c8e-885d-\
+815ca16b84cc"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ratioSmall", "[", "X_", "]"}], ":=", 
+  RowBox[{
+   RowBox[{"-", "2"}], 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Rest", "@", 
+      RowBox[{"Gs2Cs", "[", "Gs", "]"}]}], ".", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        SuperscriptBox["X", "#"], "&"}], "/@", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"Range", "[", 
+          RowBox[{
+           RowBox[{"Length", "[", "Gs", "]"}], "-", "1"}], "]"}], "-", "1"}], 
+        ")"}]}], ")"}]}], "/", 
+    RowBox[{
+     RowBox[{"\[ScriptCapitalY]", "[", 
+      RowBox[{
+       RowBox[{"\[Pi]", " ", 
+        RowBox[{"C0", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           SuperscriptBox["B", "2"]}], ")"}]}]}], ",", "B"}], "]"}], "[", "X",
+      "]"}]}]}]}]], "Input",
+ CellChangeTimes->{{3.712413954619421*^9, 3.71241409144135*^9}, {
+   3.712414222786386*^9, 3.712414256251178*^9}, 
+   3.712414319427877*^9},ExpressionUUID->"7116efe8-b6e5-49e6-b4ba-\
+7c07f19c62de"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ratioLarge", "[", "X_", "]"}], ":=", 
+  RowBox[{
+   RowBox[{"-", 
+    RowBox[{
+     RowBox[{"\[CapitalPhi]s2fs", "[", "\[CapitalPhi]s", "]"}], ".", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        SuperscriptBox["X", 
+         RowBox[{"-", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"6", "/", "15"}], "+", 
+            RowBox[{
+             RowBox[{"8", "/", "15"}], "#"}]}], ")"}]}]], "&"}], "/@", 
+       RowBox[{"Range", "[", 
+        RowBox[{"Length", "[", "\[CapitalPhi]s", "]"}], "]"}]}], ")"}]}]}], 
+   "/", 
+   RowBox[{
+    RowBox[{"\[ScriptCapitalY]", "[", 
+     RowBox[{
+      RowBox[{"\[Pi]", " ", 
+       RowBox[{"C0", "/", 
+        RowBox[{"(", 
+         RowBox[{"2", 
+          SuperscriptBox["B", "2"]}], ")"}]}]}], ",", "B"}], "]"}], "[", "X", 
+    "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.712414327321868*^9, 3.7124143314517097`*^9}, {
+  3.712414365084766*^9, 3.712414453495257*^9}, {3.712414580432067*^9, 
+  3.712414580760212*^9}},ExpressionUUID->"95f0b7c3-c6ed-4f85-9a9a-\
+7590deda5a4d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ratioLarge2", "[", "X_", "]"}], ":=", 
+  RowBox[{
+   RowBox[{"-", 
+    RowBox[{
+     RowBox[{"\[CapitalPhi]s2fs", "[", "\[CapitalPhi]s", "]"}], ".", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        SuperscriptBox["X", 
+         RowBox[{"-", 
+          RowBox[{"(", "#", ")"}]}]], "&"}], "/@", 
+       RowBox[{"Range", "[", 
+        RowBox[{"Length", "[", "\[CapitalPhi]s", "]"}], "]"}]}], ")"}]}]}], 
+   "/", 
+   RowBox[{
+    RowBox[{"\[ScriptCapitalY]", "[", 
+     RowBox[{
+      RowBox[{"\[Pi]", " ", 
+       RowBox[{"C0", "/", 
+        RowBox[{"(", 
+         RowBox[{"2", 
+          SuperscriptBox["B", "2"]}], ")"}]}]}], ",", "B"}], "]"}], "[", "X", 
+    "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.712414327321868*^9, 3.7124143314517097`*^9}, {
+  3.712414365084766*^9, 3.712414453495257*^9}, {3.712414580432067*^9, 
+  3.712414580760212*^9}, {3.712418477897538*^9, 
+  3.712418491122006*^9}},ExpressionUUID->"1d4c4e9a-cb5e-4a15-af2b-\
+359acec88a18"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Show", "[", 
+  RowBox[{
+   RowBox[{"ListLogLogPlot", "[", 
+    RowBox[{"ratioData", ",", 
+     RowBox[{"PlotRange", "\[Rule]", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"{", 
+         RowBox[{"0.001", ",", "100000"}], "}"}], ",", 
+        RowBox[{"{", 
+         RowBox[{"0.6", ",", "1.6"}], "}"}]}], "}"}]}]}], "]"}], ",", 
+   RowBox[{"LogLogPlot", "[", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"ratioSmall", "[", "X", "]"}], ",", 
+       RowBox[{"ratioLarge", "[", "X", "]"}], ",", 
+       RowBox[{"ratioLarge2", "[", "X", "]"}], ",", 
+       SuperscriptBox[
+        RowBox[{"(", 
+         RowBox[{"1", "+", 
+          RowBox[{
+           SuperscriptBox[
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"-", 
+               RowBox[{
+                RowBox[{"\[CapitalPhi]s2fs", "[", "\[CapitalPhi]s", "]"}], 
+                "[", 
+                RowBox[{"[", "1", "]"}], "]"}]}], "/", 
+              RowBox[{"(", 
+               RowBox[{"C0", "/", 
+                RowBox[{"(", 
+                 RowBox[{"2", "B"}], ")"}]}], ")"}]}], ")"}], "15"], "X"}]}], 
+         ")"}], 
+        RowBox[{"1", "/", "15"}]], ",", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{
+           RowBox[{"\[CapitalPhi]s2fs", "[", "\[CapitalPhi]s", "]"}], "[", 
+           RowBox[{"[", "1", "]"}], "]"}]}], "/", 
+         RowBox[{"(", 
+          RowBox[{"C0", "/", 
+           RowBox[{"(", 
+            RowBox[{"2", "B"}], ")"}]}], ")"}]}], 
+        SuperscriptBox["X", 
+         RowBox[{"1", "/", "15"}]]}], ",", 
+       RowBox[{
+        RowBox[{"fit", "[", "X", "]"}], "/", 
+        RowBox[{
+         RowBox[{"\[ScriptCapitalY]", "[", 
+          RowBox[{
+           RowBox[{"\[Pi]", " ", 
+            RowBox[{"C0", "/", 
+             RowBox[{"(", 
+              RowBox[{"2", 
+               SuperscriptBox["B", "2"]}], ")"}]}]}], ",", "B"}], "]"}], "[", 
+         "X", "]"}]}], ",", 
+       RowBox[{
+        RowBox[{
+         RowBox[{
+          RowBox[{"t\[ScriptCapitalY]", "[", 
+           RowBox[{"A", ",", "B", ",", "\[Lambda]", ",", "\[Lambda]2", ",", 
+            RowBox[{"c", "/@", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Range", "[", 
+                RowBox[{"n1", "+", "n2", "-", "1"}], "]"}], "+", "1"}], 
+              ")"}]}]}], "]"}], "[", "X", "]"}], "/", 
+         RowBox[{
+          RowBox[{"\[ScriptCapitalY]", "[", 
+           RowBox[{
+            RowBox[{"\[Pi]", " ", 
+             RowBox[{"C0", "/", 
+              RowBox[{"(", 
+               RowBox[{"2", 
+                SuperscriptBox["B", "2"]}], ")"}]}]}], ",", "B"}], "]"}], "[",
+           "X", "]"}]}], "/.", 
+        RowBox[{"resol", "[", 
+         RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{"X", ",", "0.001", ",", "100000"}], "}"}]}], "]"}]}], 
+  "]"}]], "Input",
+ CellChangeTimes->{{3.712413884575171*^9, 3.712413892525337*^9}, {
+  3.712414275339645*^9, 3.712414299827372*^9}, {3.7124144300058193`*^9, 
+  3.7124144348537903`*^9}, {3.712414759940282*^9, 3.712414804003825*^9}, {
+  3.712414863781342*^9, 3.712414882678788*^9}, {3.712414964870536*^9, 
+  3.712415030847807*^9}, {3.7124151084515142`*^9, 3.712415174257453*^9}, {
+  3.712415233019642*^9, 3.712415242578576*^9}, {3.7124184636830873`*^9, 
+  3.712418464681706*^9}, {3.712418499851099*^9, 3.7124185030428658`*^9}, {
+  3.712418810974667*^9, 3.712418854255878*^9}, {3.712419024026373*^9, 
+  3.7124190417413*^9}, {3.712420260991317*^9, 3.712420278439487*^9}, {
+  3.712420454259121*^9, 3.7124204699551086`*^9}, {3.712447119872972*^9, 
+  3.712447142409273*^9}, {3.712447180530634*^9, 3.712447227834652*^9}, {
+  3.712447307068275*^9, 
+  3.712447307171896*^9}},ExpressionUUID->"8edb02fc-298a-459c-b821-\
+fc7cafdf4d12"],
+
+Cell[BoxData[
+ GraphicsBox[{{{{}, {{{}, {
+        {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
+         0.0055000000000000005`], AbsoluteThickness[1.6], 
+         PointBox[CompressedData["
+1:eJwVlmcgln8fxbntvUeJBhGZkRT6XSqEjIwIyQqhZESlISpFVmQUsnf2Hn0v
+kr1ue5ays1c2z/95dd6eF+dzzjlu6aR7h0BCQrJGSkLyfxUni8pryGmF4Jtq
+Fim3nyMdqdWKkHudKMZ+punza3PoZLlWSFgcgCH9hqTNOxlwAj8zwO7zByTb
+hiQTZWzAg9WgLt1oDWg5YKXH9Rt6Uaxq6n2zCt1ZDp8+ohUMimaHSlNfjaDd
++GVVvcul4El67WoS4zQY+1z06iX1QkW8iYmufBvwWnz9K0tTCap9dOQjO2U2
+qCQuJd7Yq4CKJ+anz36aBy3W2JHBfFfkeDxY9M+HZTB4NX309YI/+vMK/U1o
+3EaHYg0L33eVA08lRbjHwAyK6ZosCZnOgb1DHFQOQXuoRlL1zpM0HO4YaX0e
+JNtEb6uvm62/r4Te9lc9hDuLiMG+3Zd2DIfczl/FLBfXEQs/gxXvYBl4a966
+dUWPHFNsWO3Nd2qGeZ2fMpZLBKzE4X7059eFkF1+h+F5ACmmcfuV8ChbO+TT
+yRAnNcfRfAw1s1ZPNXR7iH+OEiHBltYG851D6sHXzeeexqMVdNhOE/mRN0JL
+WObhCiU67ASHimPw9yhw9vd+2veTBvuVzss1MlcLSSxn55NtmLEK+pxHYV8B
+5g4pKdjZM2HuPYzVpzSrQIdy3likmAIrMEi5OUBRDywFOoLc3CyYLDetM8VA
+HtgrLHL4NbJgYQ9vniswbQQRNYFWxkNUmHlVjpAchkNK35/3X5LosfKCV9Mf
++r9DKSXbmd0nrNgHfYlJCskCMPx71NGHihG7b+z6zZgC4ES3H8eaJzUWl6qT
+45jVCCuimxI8BlwYie2Uoqt7EWiNNQv/wDiwfz2G81Z2RfDHiF3zvigb1hdH
+8dzVrxaOxq1mya5wYHUZnlFGfflwU3So+T0lN+bWtXivmrsICie4O3SD2LG4
+lNcxj7bLIECJaTItkROzSd3M7/cPRJJufUFjhw9jYQn1hT7eiaC9LfFmdIQN
+kzKw2g4dqwJOjwQ/g5bD2GISx1GKu+/h1lQn/UEJN/an10lpTSURmt8uKDvf
+PYRtCd3lZcrIRJ/F8x3rn/FgOhoLd87GBAF1R2vyeYkjmOWSrDlzXxKc1sJb
+Rj6R4+0shxvf6uejJj3bipo9Cry0YIO143wlirNWb2rf+AtT/RzeR0lzUfK9
+bo9LreugKKjCOSSZimLH7slw9pDicc4cFKQ3viHlDLMZ2tBN0K5Xu0wjUgLJ
+PSMHW+fI8LKzHJH+fT/Q0kwtiubbh+sJFmPGvIXIv0rc+qvSEuTnKu+etYoB
+vcCLXp1GOyDs1j74+649cme0/fqYahXaI6R61wlxSOtH2o6UCwl+deXjA966
+ZERPzd+j4DgBDwPxxY38T0D0TYpXyugGscFLDqtxhfBehnV+E0Uiq0/rqloD
+tSDlxqmkItuI7A6UHElPZQLjnLbplfw+VD0kJPRoNAt2elFQt+ccmkg9GSo5
+2wSXcxKOGVX/Ak6VRbXz371RTQYmJi34HTLytJ1yI1Pg4rEu23zr30hl6H5P
+eHEu7HCFhOeTLaPw7pqcU60AYc2WdZeWJhEL/aXlY+eqQIglaMq9cRUJyI81
+Ots3QjGrZiKnLAG7ZJhULKHXAMPtHFJnukiwp3On0qI7WsGW769h7+FdtCnF
+IK1+rxTIAgZOxozuIzoG2kypbCI8pOatpzPYQg+RQPdKaTPYnfTz3o4kw4zg
+979LnR1gZNa9VGNGiYm6lqUo0TfDmXg6q9RqKizt/q7xN+VO2NPP1P21Q44N
+WX11O3WHCOMFVy/5C9BghcfpQ++1E6HaO/vPpaB/aPet4egZ6Ubwuhr8xMmX
+FtO7nR73KoAIjymji4/kMmIr9/UrlBIageP2FWdrRxbM+UKfnzBfC3TPfcjV
++0uH+RVqjBfq1UJa1Sm5lXJm7PtjGV7R4B/QS0Ja5EXDjEmaS05IKtZBtkTT
+CTlNBqwYC5UmcW2C32rMhlfbWbHAPOvwYO4O8FQXq+jlZcU4AhgDS/paoDSE
+nufLGDumwWvf+tC9DibJqSPLvdiwW36V49IfcIgN6+Ng+ciBCZZ6qOt3N4Be
+Cj9R9Aw71oURlkzzAASuTW14q3BiHeTaL3tlv0PIPEFqfYMTM8lj5gpuqoNn
+OZ3eoaIUOKlb9zetJ6Uo7AyTiNzTXdh6cgtiU2sgNehLX5MNAT96bZyGfDIZ
+aQca8lHz0OOuIsS26epMdDOVItOleAsE3v+OUW8qQvx8ZhEmK1T4ZbfTdyuY
+ypGh82DsJBkp7upHEFC0ykbZL5kSsxvJ8CMCC7zlDLmQ8zZXgr+UFpcIGFPd
+zs1FXj6qruSXDv7r6aOp2y6hSIS5zRIZ0OAlv0TeBVyvQF0HkWYeQZQ4VLxL
+vjIcj35N/TYQ1UwDTl8XamHfCqhlZzFMuDgPkUmcht0eWWjwGE3bqMga3JWu
+d0mqzEf3jIxqOQqmYJ1kZlvmwleg0vTc8RH6AwecHQOGRXHQ6F9z6YtAF/Ju
+dXyioFYKe+Fq4jx3lmHgReEr9+JUSCzYYdg9jKMh/rsSKnEVoCNUEvReqQUG
+ZD+t9F3BgWNaqmLy3ABcrfv2TV4cB48H5W9y5X8ib0Jqk7x9HTBuOUumL/0D
+E+qas/F68WiHa+s2a8oKilcqvfRpOh0qdNkEIvBFlCrOo9vnToT6Hmlkv7GN
+9O61u8zxt0G/4GMC4exfJES7fPCjoRqceaLPP0gfR+08u8eDiPWQK6IRPeCw
+jt487pjor6yHbBseEsskUizL+k6saWAzWOeWeSVIbaKhx29DNXuIsCrj/ku6
+ag+xNQTpjSx3Qjf/eMAzJRKsz95hlPR9O+wyxHGJ2JNjOn4UNqLJdWD+2OiX
+MhUZZrqXTfWukQg6+QmajK0UmFq8ndOEdRcIrw/AigQVplR7YlxTqw1O1bNQ
+Va7TYLHDqoPq5kRowSwYvhjRYQ8v13hUeTVDsk/kC58KegyLDpMbEWyG9eZM
+vb4P1JhY+cxiwFw7PDC2Z7PjY8QkAtO5Yz51APO7zKN+/CzYEiqzjWLsAMWb
+khoaL5kwsreZXaoW7eDuFnZ3t5sFczjpX/KrvBWSpoImuVyYsf3DqU8FKVrB
+1OO29f03rFjBwJeQIzK1oNXh90J3hg279zgzgXCxDf6IO6mMnmPDxmaSEq2v
+dMDTglPjpCxMOMvazNXvguUocNj27up5ZpzdZdx4vycNlq72alzQoMepOqao
++V4lIPVB9XMur2nwZ1xVw766z9HGBRUuvmwG/HLvsu7rmWgUJ8LCdmOaFjcZ
+U/p+62spCETr6v0wpcDbqc6KKM+kIc8sX8OAE9S4rLOtRPhAEnIr53qfDpT4
+p6zFD24nC9GT/W0abhlSvIL/NOfPnjfAVfuicTucgAdLc1D/XSlAAXM8C6Nb
+ZPgpi2zrYYdclKFlGWWTcABJaVaFwuEpyM19SzZ2eBekprZn+2Uy0O6vR2GM
+1zegKPuG/HBmLPDufrV58WMZuu9T8horp0HE3PmIfs5tkFdY/PSoJg4RXx7R
+uOq/BgRlCfsAlzeAvjyWuH8wD6xO+fqOuwVA/bBtfcR1Go6nOe//Uw6F/MaL
+EZrTf2BS3l02h/crfHz6PdqjbBA4Avt/+urXgNLHveqsK+2AZ/NJ/FRPhdYI
+Hjd2sXyg5Vpbo7hQA1MvhxQzJcrRo5AoWY+pCoBXLAvp02PId8o72WKlAdQ3
+JC0YE4loOb993bS2DkQzimzk3GZQmgKjvU9jC9Bp30mSKx9G9ZW3OM+u10FY
+0QeJpoMF9M4vnS7buAkMf712d6dbR74c564G/P1vV70u92YpryDZ/H8iwdf+
+43WlL1+RuIEeHNoX0FbtAIEY3KDNdA9dpZzJZZokQo2HSgRlxDZK5M66Kdja
+AeJjQlYaLCRYSFqlbqFJOwjFS3/ZPE+O2W596Cc4tIGPr0iUhBspdl7cMJnz
+dAf0Gx1rTrKkxnzzTxffTiPCPseMEX5AiVneeVhBMO+GW00WdOx9BEzAOm+C
+oqsbjKOjdEeiKbC3m5dPBJN2wZOkVO7r/vTYkqZO2b+0TtCf+ul3doEBc5sM
+7gnXaYJEiRWzdz9osCWH9hzvtG44+i2X7/B1JoxSU6KdYbgdnMVLwx1P0WGW
+UxHaA1rdsG7BT3twkxkreZJuk1pDBM9D0nMP6Fgw9YU/ZT/zOuDgh3L5w78s
+eOjARQKpZQJIXF65RHaeBZdddzQRup+OOnk+zF/MYsJ3PAWWUxjDYLpc6+RY
+JQsm73vwkp6nC+YpX5qG+DLjLXpX33+8kQWiXykH3Cfp8VEeX7ZX0Z+R915L
+obEaI77kuqReaJqObr24vBXiQ4eXO2W9+9xVjG4EdIllH6PFqQKI3tOSBcgJ
++oImjKlw1gceXAQ8F22FyzscbFDgktLp7dViUUDpxLjeWEWNX/Lqqj3vGwEm
+xOLMIx/JcdHNvJmzh+NAdttx4dwZMpxLac5rViIPHQmUq9JrJ8Up6AUkUxhe
+g3ij0fwDRxL8Ab3nLcJvN2T1UMYEr16HPhZ/yYCAdPQ7/mTGW99NWD5MG/V9
+KgTg9VIfF9s+PNV9rHjQEY0+CoUFXtfcgYqXIlfv/IyFq6NmFzd3VuCKOtmk
+Vd5/+03LxSQpuwTvnsU4W+iHQxfNdYO20b+wvHcj3469FPpz75coGkyA2wVB
+1kfk5UD+bELEPvQXOK47WKs658DQCwe788c/I+OEEffnvHUQWWx78cLTbjCX
+Y/D611YAgcjkplhTDSQLHbO/86AW6O0T00o8fyOvyWqDNTEiqFS9B43RPjSp
+LSidQQUwPv42+taHRsTCSlhyXG2EzsKIk6pUU4g/nYdrKQ4HtWvmTjJMyyg/
+P583/VMjnHI9YjP4YQ4Jzi6+t59tg6hj/d4B5ltI8gvpptO9//JMbNPb615F
+pfyXdLrKmkHp7siCgeAueh+qU38FesFi4yrrj0//EF/QjeQRtQ5YX9Do4pvb
+R5N83FXX53tApc1jb7WfBKu1VTgavNYJRy6LlVTEkmHNp9u96qYG4VHjSG6/
+PAHra9YYnCJthhpT2apX1pQYz/g2teaTDvj32lo4jpQCY0tVN2lo6oJI4qz7
+NREajNWzkt/TrBMCTXbXbOupMHYfQQpOayK4sPPPSAbQYrflOjmN2dpAcXbt
+KccSHWZuyBCxE9ED7OYZsiNFjJhk82qD/aUeoFn2c9nSZcC6No55rZ3uAg/i
+g25zemZMpXc7UorQBUfl8kJOfmbFv+0VlMf8eYpGdlBmwQwLbh750ZDwJhMG
+CG9/KMmx4La+op06w9losZycJvIaG25/8Te76q43ynM9md7+hhlfDyhzWFkt
+RfQRr9wrMphwpTKJMlbBanTxbnV4ryojzrcxVv6rzAvOeVxvXhmnx9fH/wh+
+FAhHU0bvPzB60+E3bnlS+gXGIu10AzGRo7S4u2lQm15YHBr0KqO+UkmNp3C/
+VWhL/YoUKmTULG5S4aHEbG4Bp1zEWNDrVyRJhicpEz47K0SgPY9i48hQctzn
+XH/2yOcQxDX+1//pPwq84DTn8nGa7wgXdX/X0UqK3x2wZhO0wlHmXr31vD0J
+7vtN4WdKVghKeHh8goV5H/zEijkUqt+hk2qS4WrqO9BETZ6ovFUBZj9Z1cu+
+rQOedPd+e1EC0BYaP375ahMoqTQeHlt0QZlGSXeWNlfA8wK9AE2BKoiJFnCe
+kl6CuPsD7MyfPkCb9+mPEtoTgB/OFei8UglUEXYGLA+6gWzv1NHExi9AYWPv
+Xz/4Fyg0pZ3Vp16j1oXoSHnfX5A+pabnQFMEEuO95+/9+Yyypspn3KeKgZ82
+pyksoxFd5/m5vX+uGATLDOTn8mogMYvZVjIIIO4wdvvuXB+Cx/rx/0yqIaVZ
+YKn+5W+0IRxgmR/fACzLDXY3GKaQ6PCJAlXxdni0myw1HTmHRKft395vbIMv
+/Jp98qzLyHhv3eShPxH6rg2rkvevotj9s752PxtBhkcn8qPVFjLJFJD4rtEN
+kgCCpxb3kTHX7shzn17w+vi7oCXmH9qh46/VbuyEpoZVMBPeRRcVnHglk7rh
+t0vpUSyODAtZc1RzMB0ChZs5hzwGSbA5Rb7gn9w9kO383JCfjAK7TSLv9OV0
+L3BGT/qbKBIw2momvbF7rVA6dW+AyoYSCz2I5dYx7YFbpB6/Ok7TYMrHfuYE
+4kQ4RcXQUxhIi70y6dg9JtQJ0u6iUZHLdNjK18pzQ4xECBFJ1phroMJ+mfC8
+ahjsAYYyK7pn+gwYwcfkiaF8H4h1ZV1LecSO65MwCcUpZyAznZs90vVsuBpl
+EBIRz0E87NML1RxseJ6fkWWRXiiMtFAHbWkz41f473lWj1YgLh5JGh1rVlwm
+yFb++7kstOTfOjeSz4LrP+28nL7og2qt/u47kLLgz3zvKXpZfkZW74YPnR5k
+wFvrOF6MylehloHkQhUPelz5SaGIel40KkiN12VSZMKHXEtCWG2t4UYeTbA5
+Ox1OGePyfLQ8HJXOvup4lkeDs30TkAsX/wRh7PJsUVrU+JTSwuOgK3lI8VYd
+8/xJcvxBI+8x11sZSEice47mOwHfuShpkqWcBP5jgqydbylwJen9DzH6SfA4
+jfJP4Swl3tHgU9uh+gDxZXQkeW8fQOpQ5/w/tgykNTv6+KQ5Kf4vrGbUPSkJ
+GaICo5X725BHMtHYwRANBI4d33KZPWj5Kclu+S0DksquuAmnb0D9lvTByY1w
+JBigd9JibA38t4IW9FndYSfUoDuadwVssHXa0S1fBFcc8+NzFoDvbarJF8MC
+cGdYr38SOQZTr8PGZD7UgOpOqr5tdgl4vqi+1+KLg9H5oBkmgRk4tqCh6dNb
+A3Ec4zZVBCIwmjfsnMObwMNc1Gjw0DAUBLrF9w59g0Xj7Q/s2YXIweLcTbEH
+DWDL1pCceakDHYndiKCuqAdkxhzRcHMIPTr5qG5foRbeXLjD7i43hv4qG2/u
+URChqs/DJVx7AaVt+kv+MegCzdc3Qyhqp9HTuuWDojON4CujlBw6v4zOM5C/
+SxdqA6KtXt7JxxvoTN7cmBpfN5wzO8q9eHEbCSid3+6QbAX58px3pgVrKJc/
+vdY4mghn+kRpnjcdoMmrnDNFAr1gfckukv8qKXZUt3/jrxUR5Et4dWcZyDHn
+pxZ0pxQ64YySeAdlJgHLuHbxk9vaILy4/k2giHwPuXlqKF7f64LRDkGjwi5K
+TG3W7gbbVDdwbOvXtj+gwMbeTHh6vBiErN5KzUjZ//4ef3Ig7+0RCHnL9sp8
+lxZ70hFhWfW3F0qUh1meRtFgL/zS6mTsu8F9YalO4TA7TrVO/VF4JhPUbXpr
+jUpY8fo7uOzxpDgkl8pi66bPguss7Aw51acjl3W53012bPiMVsybp6ZF6O3X
+IoHjzzhw9DnmzY3XCejoxdXeSQpWfLZg5NWXYBNUKmL5NbuZHf/dkCOUml6A
+uC8uNB4bY8JnSqrM/rWGgEz2zZeERGa85H6OOG9UMrofF+7lWk6Hh/T9ciIT
+ewVXG699DzSkxTd1p+XC9grRy8ASawUvRlypYHpVlzwe0dnwYDd4GfDfjIVH
+7T6lI/Fb3B8y1qjxeQ5m2qycFIRFytXUh1Dh3vc+hqcwfUYjf4SjD5rJ8USj
+0usNnO9ghaUf/yNOiUtZqLLWfIpHhLgVYZ67ZLjuSjh9pko61NI8IZyjJOCK
+nFwTj+3zkCxiWtNNJME/m6d2rAR5QE1ab+mI1z5orH0oa+H2Qwz8dt3sFTtQ
+Ivv7s+LDUMRBOau/mrgEPm3KjC3DBRD8z/31tfVNyKqlO5pOkoDu7D2SeSvx
+D7TKRXkEXIOgyf/m+cq7q1CR6u+sHF8M6qPyb69XzsLw+IS5ZkYaJI+Uup5N
+HoWJCbUcF7uvwEx2a+675CTEVZ89piPqAR5JJQaq0r2gZ+TJOrRYA4O8sSU6
+cnVAettnWPB7IdRQq3E6UMnAqcBAx9iX7fA4n5UoHjeK/BRzFiqDiGDXrpB2
+UbgX6dZOkIl0NMIMuVQ+nJ5E1d3XxDp1m0HYmUJMVqAOBVjXxLdn1cCFcHk/
+nZJZNHNMLYt4shnYpz/VNq5soq9Vwfr60AOdOu+FneOX0Jsv/7r8hrvBdl/i
++gXbVXQuXM1ETfkHtK7tlJCJ/UM88e3zuQI9cJvna4fJ8330lyTJgzKxC94Q
+6BPWyQnYaW3lCIXkfmi8R5P+oXQHMZ6Z6/+02QPmypfZB23JsKKlw0f1bHvg
+6fsjx1gSSDBEnpbCVjAAG8czYxLEKLGMTfKemfleIIQ0WbwJpsIKDj+6V7TT
+D6ePcKR9ayLHYpZZyGmFWmC4i7TbfpUaa0kJGPj9n58UMp4LVlaceJJOs02U
+QB6EXbkx/JyEA2/JO+JiMJwJfV71NUt5HLjf14JHbI4FcLdSfvBTDBu+fftZ
+UGeoKgRrxP6j12bHx9g5BoSqYuHGnvvT4guseHx55k17YirSJYfwK+9Y8IhQ
+y2KTb2HoNm+1qrkgM94a5Lf1TrsEnX5o+qSzjxk3Pf6GT8U3BRTDjOZOzbHi
+xj3EV5YK6SjzmkXmxhsGPKTw2HF/j0y4yjppPzjDiF/IE9afMg+B1w+5FlgF
+6PEKXVsB27UMeHqFbF7DjAav2QlP6OsIBgeasUrxalp81tiFvuC8IpL4ljBr
+s0OFh3EmC678SIFDQWt1PpGUeCg5yYOp455AWnxFrKKTDP+5lktySD0O+Xru
+CfPqH8BtljFyV5FMhK5V6X85S4HXpF5XkjpTiWJJZKlW6UnxfBvPjpcW6UCr
+TT+kH7gLkef2Cz7MBIHr7ABfnxMBj2Jo41dVTIYgM6+MHYU18CL+2Qj+j8cr
+4wuBtYQNaMcZW/vGs+CXAaNfcMMWxHHzDfIN5MGXqwWHpDyWgTV2XLnNAIfI
+wDE+lb4pOBlcOZg6XQVkhb4R3ZbzMEKTJLk69w0kfChvFGr8gXu3Fsp+aDUB
+LVmHhsJwJyphHy/MHquFngcC+WpeA3DjSfx2LHkNfFD/uC8VnAGMCrUuVPk4
+aE+ftVTpbIGtshDnTb9wOCiKUX3IDoii6MdFJ516yFmaTyUy/0VyucuzwiOd
+MJdKz2i2OoJSxI39VVMbQWWC+Rd6PY4Onk50B2q1gl60jeVO6AoKjuTVcqlr
+gUGNsxtW0YsoWzPqiAFGhM9BFE7VN9fRhmQzvdhUH2hzuOn5Hd1EZtYmljFk
+PfACT/x7KHMPMZdJ757xIcJEDZen3sQ2wryqFSOG+4A/6tGMwWdS7Hqq6+Ao
+6RCo3VDycJYjwZhms7I+cw/DgpP6swv7BKyKWiq43nQAyh+OuvBZkGO/W24H
+BS/3QOzgo4/tUly4dP/35qTpIvgxfiBLqKXABK+3969NDsMXoXPpk4JU2GXu
+7130Qn3wnqfw3GwbB47pgEg3QwK8PbF7/TEvB84klcGupnsftRme5LvlxYm/
+byOzLv32DsxDo85SObLjzPM32b8vJKGzDsWqH8vZcKJ/Eseg9hek1d3dd4KG
+De9M+mHq0h6H1IeOrOQasuIiz3iEld3s0Ilr5T0XU1jw3z5pPtpz0XBjjS+x
+ZY0ZJ7lULOnEmgYP+buSZnEG/Otbm9Gy08/QkdGO4JuXmXFOe53yd2bP0Kft
+I5Yd/Ex4IsklkrLUJOBzNEtAkTR4ZJevGONqAXJc+ZYosEOLZ9wk6Z1uSUBL
+ViTjoU4U+KfjrrfavYuARjH3melZalwqK5s8xiwBjEtiXanM6HF+w2+L5m3P
+QWL7Ed2jTkpci368vfZdOLKM+tiTQ0+OR8jGZg6Ov4cCh3KNKRVSvCJOUuxW
+Sw5MZ/hcpWw4gDbhfr7pwjwIyF6uak4n4Ilv5jyIf03QCcxm96HCNvyqE1cS
+GiiGqrzXG0qEPfhYKUG1J1UC98s3uL66b4AsSdZOVKsF0lfp3EpTX4B0D7eD
+L//11e+z8mU8s8uw/Ff+pw9JBjxPEvH9k7v23y/xfClYXwhCSySFvtJjYP54
++ATnegEkW21OTmsPAWnV+Zj2ynyYv7AuyQXTcFr27pzdyWpYljtouR8zhn5c
+OMz47koLNHHnrjfLdYAJC0UnvCkGFzkJo0h6IhKro39T4NsMl7SaDAd7SpCQ
+tEKvt2InLFL1B8W/KQSjulAR/hvNwBumcoRUeAbd9et76KvXBOwmV6jL+YfR
+/fe8F1bvdcJfr58zoYULyKH8xW5CdAdUSQeSMh9bQZbSzw3ZQjrhQdnuRP/E
+GprIiZP649YNhTp0L6XO7aHBF93aQk1EoLSNY0jI3EAc79mP0TV1Qry16DM7
+521UEyWw6eHQBc31ApXKtQQsPnn3cEhJP9j1Pr6zvXuAasTZ2Uru90PuY88V
+Bj8K7OLiaTkhywHolb3iJSxEjr2d6YdPkb1wUB1YZ2FBis3WZ11ANv3wP6Sk
+DgM=
+          "]]}}, {}}}, {}, {}, {{}, {}}, {{}, {}}}}, {{{{}, {}, 
+      TagBox[{
+        {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwVlnc01f8fx+2VPe+9iIzsPSt6XRKREhkZFbkyCplRmUWSUtkJ2febQsgs
+n7edbFkRySgreyX06/fX8zzO63me5zzP65/noSueZk5UFBQUUZQUFP9XtiiL
+0OhMfvRNK6pgU1kEzK7mhNSl8qO6iliH7jVRSNRbC95O4EfhBRFhh1cPwRcR
+3WCFJ/zo67H7erwFoiBA+TToajQ/Mo4UHB2zEYfL377dSbvHj2psm/fzXEUh
+64P8nb5gfkQn2lpHzSkOkrfab+n68CPlmCWmtC4xuHaB/1agOz86OkPb4Ptb
+BArV3QKLnfnRUy0e8rM4MVBdow84aMePFk3MAnrsxOBmj+VNC0t+1BVQoEo9
+Iw7VRbn+Mef4URNpI3lRRgz2Hq37NRjxoyP96rSXi8WBeP2E347eP24j9NZQ
+iIHXOSU3txkC6jKtYrWmOAxl8qGumRMEpELlOe5oIAHbzF0uQ18JKPTab7MT
+y+JwbF7QhW2QgNYUBiwilSUguPW6s34PAdH6Dqt+c5eEuvyaq0FtBMQ9/jMm
+VEQCaCKZrpY1EdCy8KqdjbUkGJCsneYxAmIpu/jJn08ConXJJJFqApLsfjip
+YigJHcJbjtZlBBQRLRfkxS4B7H9POj4pJCCNt9GjwdqScH40/koLmYCOvbhm
+9pMkBYk1kw77WQSEgqMy1dUl4UuKsoNaGgHtSk6h1QtSIBAQZn89iYAKFMvC
+dFQk4bJl9+XspwQk5UIafWIqBVmqQpeHHxJQ02v2TpKqJHzGsZgbKRBQYU+4
+RXSGNCT6eyAaKQIqz/VQEuuVAZu+LllMhIBcTwksWSjJwHjsM1pVXgLKjXWn
+Kq+TgZxfa16LbAQkxkrIOvNTFpxPW4yRGQno5nMTgtU5WVikw1UI7uHR+7Nm
+u5dGZeEtKVB0aBOP4hwPjsn/u/vWD8c+W8YjSQ9hi6eucqAprLVrPIdHEzSe
+wurjsvAnKM2FfgqP0l5Plc6uyUHtyH5f3SgeSeu0bt7xlIPwI/Y6dwbxyIM6
+ZUUuSB5OJtW9Ue/BIzcBYzOWPTlg2BAhrHzCo2tD/hmuYXLQZnYvsqARjx74
+mht9eyAPj4unV51q8ahM9NxIOKc88Fwntw2/xSP+z6aG3zPlQWRSLqgxGY9i
+R9+lm9YqwDQxdjb4GR5dzMJ/xVkpADl92eJIDB4FTQn6VIorgoJNqXxhCB7R
+tAsfKL2mCKsV3KkugXh0z2qbPH9MEcp5/OlFffCob+zJOde3ihDoM+gzeh2P
+VEzy3njdVQStHs3xpKt41E+5OLu1qQh/5Z8bm9nj0f7g6/zOT4pQH/OnktkG
+j2irPH5EvVSEyDk78ZbzePTTLmK5g0MJDE/VPg0788/vUsKhN6sIzHlC+8cM
+8KjjstNn8gUl6KYOc9sk4lFJWZ7jeyUlsMROnLimikeqC4/eH7ylBATB3CJx
+eTzypQvRKLNUgtFbdALjEni0yXk6TbNeCUjqrevm/HhEHFCSUGJSBol4aQc2
+Hjx65sY1enhOCeZWHna0suKRWP7qm4NmylBo8uvIPYZ//1OP88lUUQavN2fz
+jlP96yccLb+RogyqB4o5f//BIbbGbgNCkDJsu3CElG7gkOJ0ZlltpjLUNHvP
+uy/hkLy23BfPZmUIFuuzkpzFIVafhXiVeWXQDVdrnJjAoc04y5JuNhWgHU9U
+TPuKQzfMGooebynDR+3tF1YDOJRa3RnHIagCManWjJzdOBRsFHPXR1cFTH5X
++7W34tD5Q+oG+84qwGklMBHZgENduOwnvo9UYKAs6KzOBxxaaxq4O1WiAimc
+36r/lOPQJTJGdXtIBexuECXKi3Go7KhONde+Cgh3ZsbdeIVDp9cTfyeIqsKk
+DDWFTA4OMShLXUnlVIW8B6Tr02k4dP/svuS+piqwPBo/zpSMQ4ORvl++XlUF
+3yd2HArPcMhab3E/Ml4VRuKGJs/H4FA/Yh38+kgVdJPMywMiccgmIiS0tkYV
+xnL0KJg9cejspx09O6IanCSjXkVXHIoatzu27K4Grwu0ci0ccUiPv+a55TU1
+4CqqvHnrIg5dSf0yqJqiBrdKVI0yrHDomG7FvdlmNfj+rlig0RSHOAVDpxj+
+8akq2aWZ0//yPYYQ7boaFL8n17Ho45BGLYstOqQOfEgsXpmIQx887558KqIO
+UZtTNSETfCj5WZYjG0kTln7bP875yofy3Zcdq901wXLvq33rAB/62+4R3/hC
+Ez5QWKssdvMhioYdoYY2TRCj6aflauNDJC5bneIdTXhIbzqk0cSHuBLz3E/R
+HYFVpo5Xdhgfup/iKftY7QhYsxoGhVXxoeX0k3adpCOAOJpM8kr50EELmvYf
+XkdgWzZ3sv0eHwq/O8KsVXwUXB2dDhAk+FA0lvmNU1MbXF6d1bc7xIcaBvhP
+M3hqw9UVjbB0fj6Ef5lcnBajDaQQpi0Rdj6E1NKWuSa0wT61aELmNy+yGCLP
+j8Qehwuff1dpt/GihCcdqlpbAKdOPHZx8ORFc2tNr6Zv64BB9M3sbFdedLnS
+r/pRig7o99iPTTvyIiEhQUZSoQ7oXVYxd7vAi7Z1w228v+sA8fYQ+OjwIo/v
+aWQDQ13QKBXhi+DiRaLJq3BA+AQcFq1oIlfwoCbv2ORr83qQO1vi7vGWB+Wv
+4aOyWU6CWHEhj2oBD9JYfx26IHsSRLXznLB0HtR+u9dUw/MkCFsl0A5E8KCn
+TuFVxzdPAv6hz0lqcx5EutnxxJrVAJjXFJouLnMj3x6dM1SuhvCwSsZddI4b
+DQpEZybGGgJTqATP7CQ3omfS+/yg0hAYWYScfAe5EUuuliUDoxHQSbDSPqzl
+Rk1WVT27r42AwnZBrzKGG9EesFHmojSGtXpyI6cUN0r5Xm7S//Us8Cpgvbqi
+3Oit1sj0Q0YT0EztH/cW5EYv7FV/RaqbQLAP1V4vBzdySBEO1XlqAkxidmpx
+O1zIySiS7YX4ORCJYMvjaudC2MTRy2emz4GZgf99bk8uRE7sHGoJMQO/0pgE
+PVcutPz3lUzmczNIFsrO9nXkQl8jEm9+f2cGY1tdWJ8VF0pbDKdNWjADN7LU
+djyRC11peQZZtuchjHHUhYeTC3WaNUy76ZhDcdsJI953nGg363HnNTlLOF9x
+vam1kBN9E0pKtjpnCZtZCcQgMifixCtfyfOxBO1bP9WnUjmRb8GE87NqS/gk
++VC0JJwTJVQ8cD962gomI3p3z5zjRG3Z7JKPbl4AXqJDUcQ8B6pVdr34Y88G
+qmSipY9McyALVw0JV0lbsOMrzV0Y40DdXxTIxudtIXuR5sX5Xg4U038mOOs/
+W1BMI0cdquJA2y3cFpnWdmC4s+TwIZIDHdQfj/ncfBHulAVzbxziQCNunHRp
+1+2hYpJ7u4mfA3G3h+r8jbCHVc6CkUQeDtRiR6h9lmEPLl6DWZqMHKjJiyx2
++LM9WMgrKt1ZZkf5vNtMYloOIE/+foYaY0eGtuVaCzxX4Fuq3n0OO3ZEx7Lv
+JzbnCIS2YbcJC3bk0+945hcDCSx3bpwtNWFHSRaaMdMSJGi/kMZjcYIdMRMq
+7zpdJUElz2Z2sjQ7Eug8R0WeJoGIkEkYrLIhr3Qx75hfThBBx7NuK8uGth4L
+9nwVcwHdYv/7vcL/+PgkfY6BC1DYDBEMedjQwZ83wzLcXODOm1Qd9X1W5BTu
+vS391gW8zUVi2btZUbD/NHM20RXssxSkm3xY0S0WWVknVzfQOm5kL1/Dgj5/
+02TVmLoOOz8L1nKKWNC5wHrBLhZ3qHzKcp8/hwXp+kqKZmq4g8p09xuGRywo
+Gpxmdx66g3SM1Z+JSyxIX4daN0rDA/iGSYlJVCxInoch0fK5J6z6hbRTGDEj
+4XXV3vRTXlB8kO5osDYzag921Elw9AKPlpj8P4rMaH99b7Us2Avmcc/DN/mY
+0Zsxi0s+77xgqqZMc2H6AGJ/lKexIuYN/ZRzOYNhB5DxsAyTDLMPVD4yDyqs
+YkKBpcVzd/Z8wV99ZE7mDRMaIWUcUzroB6rfHC7895IJNcRdkcCBHxQreqrk
+3GdCKleEGULC/OC/zw9mUyyY0MNAYf8qBn94jscsIlYYEfXi+63Dh25CUK6U
+vJ0UI6K1Q2WydwIhPGXauVCQERlHuBTLZwZC1KPMTApORsRaGLTp1BwI8X54
+ntwdBnTymMATP45b8Ook4+6vNgYk8JnR99CrWzA0PdMa4sGAaFOHrZemb4Py
+YbJTdik9sq82W059EAyaBFLGRj49klPkdv7+LhiOswp/MXhBj0Db9OrViWAw
+3EwyXrhHj0ZPz5IUtULAvvm+ipolPcJn2Fp2robAo6vOlC3bdGg2c5VNpzwU
+ZvIOp81p06FHp6vOqhqFw0GRD/k3lenQQtYTAXFSOJxPO19CI0GHhg+ePn40
+OBxq40JbDrLTIa6Q6+a9JeEQHzq8YjZBi6ybtTUxwbtAtHmsXxNJi8YYP8RX
+7tyFZJbNpYddNKju2SXTtN4I6IyK2cE10qDrOQZHglcigJpGlDavkga1TxfL
+R7NHgseOCQFl0iBDsbtSYiaRoPfzP711HxrUGanYebUzEpbRxRQ7HA0KE76t
+Y9t/H075NunKOVAjR6NLo6V00RC8GCpRZ06NsgNXzzyWj4YyFy1mi1PUiKaJ
+9W2OZTQIXyztv6NAjQL8vAsi86Nh+2SmS/seFUozlWeWMn4IZL6gx9eeUyG3
+Af5htcwYoK9RHf7vMyWiazps+udOLGipLddqt1Ai1oTJ87RvYsG7qCC7p5oS
+TSYNMVuNxsJYtoj770xK9MfZL81V6AmUx7BTGN6gRD9DFOZfhD+Bq5cWxGeY
+KdGCtzSB9dxTaKbM8TqsT4EohgxupjDEgV5LvEjsUQp0yLzX76loHNTFRHze
+kqdALn0zBYXH4+A9n7NaKx8FytXSC7P2iwOSrfnqYO9fbOlFnIL/VBxoldpT
+OuL/Ytz0N4y3WuNh/kqgUGDeHhZ0+qdqeGki/PhlE2YUu4dd9eUvv/s5EcYD
+tCb5A/awEzmn1ovXEmHg8d+8WsM9jBh1MypWNQnqqyPkaX7tYiXJ7XqOlUnw
+nPOZdqzKLgZf2GOTPiaDUf0r21y0gzklPf3Uz5wK+qcHvO7l72DbgcrGq2qp
+oNtHGeX4eAeTXDzMd/pyKhz9caHskN0OxjdsOlBSkgpSTPQs6Vu/MZ+jLxVI
+di+AwcyxNlH+N0ajy/gopSYNWr7zH4p6sYV1W9PgJixeQr2bgYbz3S2sWFvA
+JtrjJdSueZ/Rd9vC1nKO+1nefwnltJ8CaTS3sJTuQ1S2VS8hTyqgN/TzJlYQ
+3ybAL5QJkV59dwOZNrE9Z9Ji7kom6FE++uEWsI7t3RQ66FeWDS+T3dOxy+vY
+qDujTGBPNvxROGvJbbCONe6qfM5bzIaSS2zNH3jWsQ4bbD9EKgeE3z/NZS9d
+w1TZMA2lzBzY808klf9axWZI5bKdyblQvpAxQem4gpme9bGWLcgHznuhzy2N
+VrB0w33VnY58cOd3MCtQWsEu+XS57S7ng5iRSL05xQrWyDlTnaFBhmf5OZn5
+acuYGmPCFc8WMow1mtU9L17CVrubNsgr/8G5YqcPSqkLmNDq3TRmv9cgzrx7
+Ud59AZNnTDlf9OI17Dg/25eGBYxz/LR0XONryBHCQGxyHhujkus7xPMGfj/G
+1fPKzGMdy4s//KreQJZ7W/Of6llsx2XuzyxbEdxsdXDejpnFolt0Ffi1isBY
+fJt+49IsFmO7VZLhUgSbX8UMF6lmMb17nCnk+iI4bRzcNm40g9ErBfH6aBfD
+urRSd9PwD2yDq5mnZ78YWiNbbtS//oEFTVq9nud7C+kTFzmw4B/YjEuiCCi9
+hVPPo80qRX5glIKyFQmkt5DGONX3ym0aK6wLAInOt6A/k/gldmcSCyBlTqgU
+lgC/ntytmPZJjGd0w+NRWwksZzQQHqRPYi/zK3eOzJZAqtWybbjuJBbks/gx
+XrwUlpsNx3yjJ7BpyetVz7JKISV3d8Ka8B3rtN60pysugxt7hxe8ZsYxvmCw
+7hooAwML040H5ePY6+bdzwr7ZbBBk0dfbTaO7XR6fv109h1kfUy/oMr7Dasa
+EF/e3XoH5wLW3EglYxhjklcIt1g57EucCoo/O4YdLD21tnSuHGzur2SuR45i
+GbR+VCxvyoFTX2++bGsEe86+1pHvWQFoI3lvKm4Ei2+RXM7JqgCP3F9sPIoj
+mLYokT1roAI+0SSp+rkMY6988YJIpxLCG2aD1L4MYTcaw7ZTxKtA0ef4Eye/
+IeyhqbpztkMVjInEZSVwDGG4e8849tOr4Gi4VsuG4SDWn2ToMyhYDWvEWPby
+6n5s1X1O575cDWQtT4r8sOzHKDSl/O751cC5l5pqvGt92KbwRzsiVgOv/363
+9pfpwxI6bumrXXgPpFrVbPUXvZh69LrmXuYH4PR48O6qZi8W18rxrf/3B0CC
+Yy2JfT2YXgcnJYV5LQgE3V/YZO7B1sdvPchgw4B8s+yax59OLCv/gL7xeQQ0
+gxefdKp0YibzddfqHyCwV6d/J3+9A1O70kTRUIcAt2G9v/i1DZMpCVl7oV4H
+vubUoiY8bRhjp4RpvE8ddJe+Nig68wlb0PIWNyupgyjvv088az9i75NmWBzV
+6mGqh/yua7MFowOngKHAeiAqmQ0rKLRgXWyjLNaoHraXckSXM5ow2wqT+ebz
+DeDqblR+I6we668Q07yf2AjaYafSBVvqsMmKhp6sn43AkaAf+Ym5Dqt6GfSY
+91gT+ARGvD6liGHy0Yp95rNNwI3zXyi6WIUNmFQv3HBqgffg/Z5xtgI7gddU
+f9zWAiRnjxhH33Lsep7ApSLVj/Cu/Kos38NSzPy0Ssgl9lYoeFU4tHujAHsj
+EB1wbPkT7P7OCyi+T8acVi3Gjnu1gbFhBo6UnovpUDj+xG22wXCX0NvEpAys
+wKHAqvlAB1THNzo4Pw/F+g5gJvZuXbBkkBQ52OeI+b5LXi2n6wamhsnARcwN
+lkRi8/NsugH8y9Mv7TyCIdPbdrRMPXDWvl2iVTQbRDO/6xRF9cI+e999HpY8
+GNn8Hu221AuFdSM/HTbJwJXiXHnQ+jOwiM7n73wsBOdoTvlatT74sUrDzavx
+DvxpGUR2eAbgeBuD3vuCckjm4YpLTRyAxGxm3yvClSB6IC2vlzAIJ825+woZ
+a6C8u3bQVH4Ieoc5Pol6IBh0H+9pvDsM+81cE/6SdSDYZaZ9QnQEpEt5dlon
+6v7tCJLfZvMIhD/ES9+wagBaaZmIU/yjoKR1KPo9sRlUwqbE/vv9DewkRbPY
+/jSDvIZTpMelcYjiFq++8q4F9KUVla7Xj8P4guQcg3QrKL2Lji19+h2epCka
+WXC1Q+HBSA/Ds5NQljKBHR1tBy2CinBbxyQMJcSrCed3wC9y4/rlc1Nw6PG2
+8PzRLpgg22d+uzQN1jB+m6jUA4ZrF8+MZ/6E69pV6iqJPaDhGDWcf3QGgo89
+WxH/0wMJY9lfXw/MQJaGnvOBpl6QaXVoCsDNwZwC2WzgQh+Iz6kfV29YgF25
+MJbWD33QG7zDxOz/C1hlbT7WiPRDCJX9mUOyi6AiyXw8c6EfdOU5W/czl+CO
+8A2p66GDEJm4d5bRZgVYODQpqMjDEOv0c5qtfB2E2Thq1plHgC/L7YqC5AYo
+s8z5/fQagZnVHLmK1A2wZHwx337sK6wHVm3ORm5COiXFYFLXKFwNJHlpuW8D
+7vfkQOLtcQigoBTT892F/2YL3shmT4JHfRnxbwYVcfV0YUt13yRcbDXGHGao
+iFqFxd9P0U0BtffJMR4lamK39zseJ9cpENAlkFwbqInbf2qD0hSmodnslXzQ
+PA1Rn7X3DOv7HxCfcC8yxICeOKG8/WupbxZk1oyNG0WYiazHRZKsqZdB1P/M
+w0AuLmLk5Mf35Z82YGtlSagpVYBYz7Dclce6C2Jfuwmt90SJQk2aJNw6BVFn
+2Mn09jVJ4kzVoJRULzURwp9jd3XkiHGL6lfvLtIRN1g59Qv1lIiXTE8kvOpn
+JL6WCdE7gakQD6yzHeP/w0wMMzDtKvJWJzo4CfbPM7ATtaW/nk8VOELscGaM
+LA7kIGbm0j2ee36MKB1tsZrCyEXcmM+Z5TU9Tkw6sT04G8xNTH6QP6XjTiSm
+P/nIahfNTXy7olJy9CaR+D8xA8ab
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145820#1"]& ], 
+      TagBox[{
+        {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwVlmk81Osbxu1LxMz8ZuTYlwxOgzZLiue2REmdFkvonJMlypK1pGMrpaNN
+KZSyL2VfZn7S5pkQEnWyayGyhZAlCvWf/4vnc3+uN9d93ff9ffGouvnvPyLA
+x8f3lff+XzkvfEr3S9K45V83VRiHAoRzIunzqlSur2Lwnb73CM6LMOZcWNLc
+4rHdg1NSpjBzIqqZz0aSKy6iv1P38DaIyNXWPaQtzi0ZbnB2vmIMo3nM1DET
+Ea5h8A/RhR4j2BHy3FzHVZAreEchpV7PEOr5cwKZVnzc7nWGiSfd9MGmpsAl
+l/sDsybUbJLJTWDJf2XY+9Qc1r7Jb2U9sgH2lh15uuHOBL4yPHB8q8Z6uJ27
+POAk14+NjVfzNUrqwDE/m8qAMzWY7Nbra0vWhmup623siWYktzD021wAE/I/
+Fxazsj8hHZvR5lQ1dZAyVUt2EpxGc6tXenaJqUDsp8YnlU3zKAhtlexMkoMa
+senXeVLLyCRp2PZfCQYoPzfykJ3jg7G0xz6kBQVGH3Zpa7cKwsdRjkfFlCg8
+NniRkNIrCI1xB7BRsyhcZT9akhgXhJ2vvT1e3xeFTcWpLZOCQnCsSrBex00U
+IjPcAzn6QnAv8VNEWYcIEBemqtBtIRDtN3F9h4XB1E50h8NhYbh82vGIRaYg
+3Jg08IyZFIHbJe55Sca/kJLKrIDKDxG4fCUqQpX/FyrYV5r+RFgUzielrLQ2
+/ERcjmbPvIIoLC5c7iqw/4kmTsvaHt0lCizvO2qbg1eQleiPDbt5uYSoAit9
+5BJaVH66IuMmBirCWxqsXRZRzL6wFLafGPxUrNWS11xEUjH6hnvDxED5cWSf
+wuwC0hguDoi7JgYUh6YDRZcW0P6itE9L1WLQdNrvmgD+hgqNol98lBcHzsFb
+u+t159Ff+ywSCzrEgWEeEBO6eQZ9jnnrCAPiELzKbLhaYAaFVAbKdU6Kwysl
+j+1Wb76iOPmMdH6xVTB29BBLxv8r4gwt5x80XgXhUaq9NcXTSPx0ZbVI+ioo
+75JnKflPIk6W9qjbUQkIv++X47MyilAHt2AxRAL+fv6a/atgFDWJHvS7ekYC
+KtRt+dSdRlGfb+zMwxQJMHstHi37YAStMvy0TGmRgKhupdz6sGF0+OVdKt4g
+CS+fZIkdlhtEEnPSW+WXJCF/V5Pn+YQ+5JnezDopuhraReyCfel9iGsTp/SG
+WA1DxwP5fZN70clMAYELrNUQU9a7np3xAQ3smW+c+XM1rGyckXfgvkNV+W8d
+mrirIU0/jBu6qRsR9sk7NFpWw7nNBjpF9V3oOJ+dcXTPatgw6Lc85dyF1jq2
+KBrMrIbFFN0zWbGdKF6IO5ipLgXvpsWGU8bakeffuUFhsVJQ8+oIU2DwDXq2
+ys2jPUEK2v9uZz+98AYpVCo56KVLAfvfk/gU6w1qlby1ZeiBFBy4yLo8euo/
+ZPLoIt++z1Iw7Go0I7v1FaIzAq5q2UqDSEK3yDntF8ify4qOOSgNa/0eP6iK
+b0RNPp8Dez2kgX3ikUDNQgOKrnGzvxkhDc01LqRVSz0a97dX4CuVBu8/C3c/
+v1KHXI8odoyLUYAbtoU67spF3oz+kRIpCugu+F9r78Yo5HnOj0A6BVySiqWK
+p6vRvxoslUVlCiizXrh0aT1FJUPGPkKGFKhfVILIRw/R8pGD/IpHKCAwuygf
+8hcbicgo0D96U0CryHM4Ja0CUer7mNkBFLjS0y9h3V+O1JlettrhFCgo386Q
+O16GbIZPJOvfoED8zSI5lk0hSva8obPnGQVY9x/cPCeaiTJkHIHaQIF7mc82
+iN1LRwX1cgfamykwFv+xuMk6FVUzs045d1OgTWOzhnX2LTQ4XFbrOUUBtLaP
++zgqHk0mhXRqz1PgrpFJl7/hJbRoZfR54gcFHM6wldx/xSKJe1gqWIQK5Mzv
+Tc2REWij1yunKEUqtA11hddaA962JsHXXJ0K/Pk7lUu3uWOrBvsoYW0qbHcQ
+1a9gBGInzQ85lzZTYfTDnfT4wigcPTI+lbyLCnanj67TqL6CW7zEY8vCqNC4
+eUSyNfwOdrj1aN10FBV+TdjkmdBS8cdGnzd6sVTItIlI25yRhme0XymUJlDh
+9B9356XaMrDsRAK7uJAKyhqJ59RKsnGWgqXTl3Iq6OeKT245lIPX7Z7/yaqi
+wvwAQ2hSJBebljjaFNVRoUOBK+qwPw97BCj0F3yggohnnsb2mvt4MqMlduwT
+FY4ox+xyc8jHoW8iWb+PUcFqXbWP30g+vrixPzT/GxW23dp5KYSvEJfN5Urd
+l6YBY+l93T7pYmys4cgZYdCgaXxL79ilYlxrL+asqUADO9O60KfCJbiz0js3
+T4sGLYP7DTd9LcHLp/S25ZrRoOR1pjzLrgzH5n/sH7SmQYKxV+bbC2VY+u31
+C2v30CDFd+TFjkdlWG3rXGu2Mw3ci8buhsiX4x0rVceygmlwNdNYKvx1OW7V
+8ZYeCKPBAafdT25/L8cuf8mTqtE8P70O5WS1CnwcR/BlXqbBmT49gMAKfOOM
+eXJ6Lg2MdW7Ic/jZWKFidltfIQ1E2eYLhupsnDeQM6BUQYPjMppDVRZsXGUh
+qptWTYO9jU29+Awbm4dUtX2oo4FfwLU623Q2fplzLEzxJQ2+H38SMPiYjXuF
+m+vudtGgWmyHq9kMGx81iPB+/4EG/Ad26a2W5OCvnroUhUHefobUuqbXcrBQ
+4zWXO9M0OFvU7iJpx8G/X7SfuS1OAL9WNWfsHgdTGBMb/KUJUJr7Rrn+kIO/
+pZ8NtGQQcCcpUedsEwc/I0unJ1UISN50VWDPGAfngdX6OiZPZ0g76nzn4Msv
+3/vfZhGwsMk957AoiQ/2i09ZGBGgY4fXNKuS2NQ3Q/c3UwLs9f/MEdMlsfqC
+wfFJCwJ2XGAsZG4hsdjZluLanQSoVI1vTLEk8aSkx5dbfxBQLvxPyOweErcn
+/2Adtydg1l64tfQgiR+pXfe1cCGAKXnW5Y0ric8bVY9/8SRgezadsA0isXet
+3bpaXwJM1H83zw8j8d494963gggY7tmTHhxNYoOeMwV+pwjwqvokXxxLYgUP
+2THzSAL2fnDMdrxMYoGpEm3ZcwQ4WRrKn7hO4pGw7ce+xBFQ4rPFXTSJxM1C
+7+/XxBNw+usf9pQUElfEB40mJxIwrUo+v55K4lty4lp+dwiYi/hx9koGiSNz
+073MMwkQ2rDGQTibxB7rDe6tuUeAxz8nBZZySLzzcfPwRBEBUlIiVgF5JNa1
+cmfWVBAQ4WDZ43mPxPQ3348kVxGAH+3x/8jTP1yu5fpWE7ChYYrs5emPw8wh
+szoC3loX27vzdH3g07Vrmgg4sb/zqz/Pr2j5gMfEawJmTK5rieSSOOHCWPaz
+DgJ2XvicoMnLE0o78ynpHQFHMz/UdfDyHkpdo+7bT4A0x3c3LY3E5lolbmYj
+BHRb5lT28ubVYltmyXzh3fdl8fltySSWMn3XPz5DwKb173nIk3iuMVD12SJv
+v1se7qu4SuK3B8Rck34SkPCeZtYSR2Jub1qGjxAd5CLE/ok6R+LcY/ofYRUd
+zOiyfk2RJL4491JZhkKHEbN10aWnSBwQ5fb3OIMOzZY5sut5992WGN+bqEqH
+B3Lf7cQ9SKymwlTy0aSDsfDRQo9DPJ4Kn/wJOnTQNAufOGxH4jbu5/djRnTw
+0bD1MLMgcdWuaAWuKR1c1VzWaRmTOK1T5lCiJc8v89UKZz2PnwmLd2gvHSxD
+t1Q9V+DxE/pWjuFAh40dzdK2NBLrCwQ6j7nQ4e8Y+v4IHu98smk9N714/dJJ
+m6FpDk62WOz6HEmHlS5XtXHMwYMXVUszz9Gh4mrcgXVsDt7YahPrdJEOzidL
+vdTyOPjV4dTNLxLp4NT2h9GWSxwsEml+/X4RHeQ9+2vW7ufgkKrLNl5v6VB2
+NvNubRsb1/wiVZU/0iGX8nvopxo2plj3LXYO0eGGZ/yrxnI2LuzYcM/qKx2k
++Lj6I1fZeGCmU5ApxoB9gaAUZ8XGe3VUnw7qM0Al7FTNqqIKnBZic/PuVga8
+NQ153ZtcgSceB/vYmTHARejU1nMxFfiCTf1vdbYM0N61v3O7cwWu9vI5me3O
+gN+S2zQqhSswK4vUc7vOgAZX84Z2u3IsvsYmq2+CAUHhgksDpaW4s/ewJH2W
+ASJzA39+DivFOXmhJ3d8Z0CdicX6QotSDAa5NuXCMlAdlXbjSGcJPmnPN3tW
+SQaeTqWdb1ssxgM3Ki2Ye2WgW6OTFraxCD+iqA/5smVA8nJcuHPUfey7alnz
+R9gaaMGiUVvzM3DfTSHNfyZkYbPAN5vlp+7YAvn1q0TKgbDB5n/7r6WjB9Es
+hs68PPz2RdjxW1QpWv8+RafPQxEYHoMxhO0DlOJ4jL9yVgm8BjOY0TsxWqVv
+fe/7JhUIen3Kw25HLUKv4goLVlRge/S+pTXqDSh0Tj2rpFYVagLNPBO7mpCh
+57GOI+FqMHJ9RZKz7RWaGvnLs9RSHbIFQ0th8j+kR/7aVPRLHR5aVZrE3W5F
+QdKLs0uVa2F2b910q2E7Kg7LoPZGaIB+/8LFpbkOFKA35xNsyASKXtXuH9e6
+kG/IE5kyYyb8s7visPqtLnTs4blnEyZMkGb8a2Kb3oXcLBhrPC2ZsL8l2D61
+uAvZORrUHNzHhGPq/IImTV1oS9QpWVMfJrQc1j8dJNiNBF4v14mlM2HWrHC5
+8kQ3+kk899+exYR40YK7PeHdaOngFbmzuUw4blUhsRzTjeYGFAOWCpnAnQp3
+hIRuNPzNVH6yigmVpGVBfUk3alI6E9jWyoTGT5f+ahrpRvXuOxUonUz47z9X
+/rHJblR7n9pg28OE0S8FJ8S/daMnG7MUeF82MN2g02Yt1INKrGobqiaYwJoX
+86xR6UEFly4FzU8xgWFx7dZHzR50778DihtnmWDVykn9qduDMpwHgwq/M2F9
+3lEVY5MelJpepDi6zIQeRbM0R8selDIY0riWTxN+bts5FbKrByVpmwS7CmrC
+A8dcImF/D7pxXFgpTUQTbPPCJEqdetD/AN6hClM=
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145820#2"]& ], 
+      TagBox[{
+        {RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwV1Hc4lt8bAHB7Zu/tNV4NIcoKz12kSEIqKykre1ZoWVkpSSgRKSUzlFQ4
+ypbN+z6irIxCyOhr+z2/v871uc45932f+1znkC76WDjT0dDQxNLS0Px/ZFSJ
+VZtiZqwp+atWqn0V4Fhg/eG9F+hrdiWWbN47hkED7Qs/siFNjTXHXCCurAPG
+X/Jsc2rWUPXHETu1E1pgQHt3wj1oCVndX1I5oaQOZm+cq/Y9mUFeAZYZy9Jq
+8DhnY9RadATFMjFH/DVRATcv43LfsC9oNumA+3rcbrifoWJ8mq8V+5LhV8zB
+Ig+vf+cXKj7/iWUNcm7pfpAETj2ZVGv6ecw8UYw/PokfXvRVsF8Vncc0+sb2
+Tvnwg3bAydCH++axjr2mz61N+MEl97pbx/l57MssXZ0nIz9U8eIHj1TOYzSC
+7RSnID7wnLwzrHL5L0bP3eDw4gIvtNxf3sUyuYC5H5zwLjzEDQ574p/Kby1g
+02UlYselueFfvQyfvsAipnuBwfi/TS6QWT+5cUN/ESsh/9i3J5gLgp3z2hcz
+F7GsCstr9n6csFP7fMCQ1RJ2pgSsxNx2QNTPpsrylmUsOr2rJeEqC4iFCtxo
++LmMBZyfFq/czwJvxC/qUjeWMR/JU46SC8zQf3q9alnpHzbD+WcoyosZlJr2
+ov1J/7BXcesr/1yYgFLw4HOp7X+Y62Up0e9ODCB3xa6haGYF07TJdfueSAMf
+eF9HVTOuYnEvLVMEz9KAafGyYbvkKtbR/lI9U5wGgn7da/xjtor5Sp2jYObb
+WKvN5ybFd6vY9HH5wZWYTSwAI3/Nu7GG/XcwjmmnyBr2hWW+4yXnBqbyt/vp
+wtdFrImz+78d5A1M/MvOI06Bi1g7/1upAN0NrEpmgD9NYhHrlw7ywTw3sEJ2
+bk4r/wVsQZOGq695A2vK0FQ0kP+Lkdy4TVlvb2IHSUPFVMc/GNln4bJP+iYW
+HT9/w7t9BlO83JtBKdvEZBU8jUq1ZzDNsEd/no1uYn56N98cFp7GzB5L39WG
+LSx/nGU7a/IXFtqs0uqxvoW9H49lK8LHsKgO3qUu3m2sVLrIxeTcGBZPWRLT
+3L2NeS77Pnk89hN7NFLhwWC9jYXRs8nrrIxib1aBPaN8GwsqK6sOURvByrdl
+1Ojbt7HJj3/n3RqGsUpGRlu38W1sbudGwLrNMDYW40QRZaOB9zfYRVZ5hrD5
+hzvlJzVpYJzPPtFxfgBbTBXRSjOggSOXkNeg8gD2L43txAkzGkgebN8K8O/H
+NrJmAstcaSDy/JMZCs03jKXwTd2tFBqQC9hzv+IQFZOq13QSXqKBAb5iy8gT
+XdgCnHx1f5sGdCQ8QLG6E2uodJ5iYaeFaywpInb7OjHPtw98V0m0wM3Wvt9F
+rx2reD5zvf8kLTx//1qpWLkFuyNFX2NhSwttlZPRJRrNmP0TEfqvLrTw96mj
+EGbQhDEmGcZ+ukELjvQSuhXuDZhFeFZyej4tjPCr5hyb/oLJb5X38b+nBd34
+RdavAl+wleA2sbtfaOHx9cd+5gafsad+a89ufKOF06lC901tEDbtYFlkz0wH
+1LlYOxOrD1gkxtIo7UgH0dTMsnWDQuzsJ0m2x950sPKIw8a5Kw/brXHgBE8I
+HZx6F5Yw5JaLdSpd7KFNpIPOH+PXRKqfYxKSlUOj1XRw244zLa8/GZt/3C1j
+20IHpsMxwSOvErE6gd/OPRQ6UNvLVWrLdwdz5xCcqZ2hA4NIx+rL8lew8g2f
+lRei9NDwav2Ku1wEig2KOihBpofrYyoelmfjkN1S+s3kffRQN+Zb9LbsPqKb
+aWaIOkYPxz2fTdImpqKTA7I8rlfowevHvLr6kWz06wO+a1c3MZ/OjQeMFKJP
+6s0P0gbp4aeVq9HmqWJ0r+zjOvs0PXTcv7Mn//wbpFaY0TZLzwAMPrSJD2tK
+0M0sR7+3Bxggf9g0YsPmLTKTON0vf5gBUl2HZ6irb5FsmqF+qikDCGd9b6pO
+foeaknYJhLgyQKnSCz7a+nLEFz1XgT1mgPiFJz8x+g9ogn6EVJLDAJUJvjNB
+8R9QRWh3nEwpA9xQKhEw4vuI7EPe2TF+ZQArxT7xGZFPKNfrGs3XDQaYTrjT
+StlRhfQsmY+dcWAEJbMyBh/jGsTdtfKm0ZMRqtiaBWlu1aCfJ6ZEtIIZQUDV
+s6K2tAbFHG2bFnvACIKfOSX/E/qMerSTEkZqGcGKg9Yu5dtndIkkhXsqMEFb
+rcmf+7q16OBTbhhUYwJPweOPfFxrEacY3euTwAQ3u1Z+1N2vRWX84yGq1kxw
+pJUzeXikFm0x50uuxDHBZki+8YGbdShpVt0lYpYJDqkNPu99Vo8kpRfppNeY
+4Et3Ga72pR7lmRdnVjIyw4Whb5WHRutRzVuFb8vizLARcD7Ll9SAZkKETS4d
+Z4bLy1PBRukNyJB5bd+JXGYIzrzzVvt2I1qRqtoUvMgCawMTgUOKzSjCPDit
+zIsFPgx4Xqw70ow4Iw5omAWzwO0XvdSb9s1IfqLQN/Y+Czwrmz13NaEZWRQ8
+/blezQJ/Vv7jvTPXjPI1Q5uHxVhB9kxFbEduC7I310/Oo7CCHZ1hcRJ9K/od
+0X8WRllh8uMTXk7RVhRY7idKnWWFkSyfI+4qrShWLCuTloUNWrlrvzTbtaK3
+4xuvrbTZ4H7WaVGVt62INaS8mimTDa5Ez0f9PteG3mbv+nXxEjucel2fK5DZ
+jjBKTd5KIDv0GyQKuJe2oxZmK697Yexw7qm36ev6djTkGbXwIY0dvC4nU35N
+tyM2jZ8b3G3s8FuDttdXowM5fE3nQft2gLlYslBDSwdiX+I6KLa+A+Y6PjGV
++XUil8xWxSvMHHChJaCQIaQT1RjHSnbxcUC6xuWtE+Gd6MozOrpoRQ5IsBBo
+bHzQiUZNl5sWznHAmZnkLauyTlTxuv9MSw0H3D1Og68uEPHO5/gHR3HCsyxa
+V0/PLvSZ7aJT7wNO+FH+qqg2oAuJl0ueUc7kBItgjcd817pQ945HWuPvOUGs
+5qpPRmwX0v0YR2P+mxOeKhY3Wr/sQvwCvvd2mnBBnnrAvpDBLnTBWYIyzcIN
+kzwKo7eMupG7wMhkESc38L/ceyz6ZDcKrH+x5sfPDWX7OL7HnO5GMfKK0itS
+3NDcticj5EI3KhrX9mDQ4Ab5/UsLwsHdaMPZilbCmRuOC7GcMnjVjVJdkvaa
+fuaGPyX0ab7b3ShL8CzwNHKDm5qxaj1DD8prED3V28oNv36b+/Oz9aBqcnaQ
+TR83CCZeXcnm70FjE29qXea4wYC+MDJ0Vw9SdW23viXBA/V3G6lg0YPaXFmj
+3gTzQKThXt75zB505tHHPfO3eIBXk+cvY04PGm7y6FKO4oFyZz0ewbwetLCr
+Xbz4AQ/YMtHvlH/bg4RnHpQV5vMA6eiWynZjD3LyFR/J+8EDDB5Hq17O9qCN
+IGWdnEO8kB0twzim0YuiXg+PjB3lBclHudvGOr2Iqz8xWs6UFwJvtbUXQC+S
+ObjU/dyGF34ZKW06GPWiY5sVbtkBvNB+vkQk3qYXJYUdTs3M4YW7FoVGf6/1
+ot1xpxces/LBEesrbEKfehG3wMw+Hy4+CC+aW8yq7kX/MsP9DAQI4/u+kb/0
+os/viudnpfnA6JhzDrm5F1mNsM7pa/JBQEty7j9qL7qtWT39x4UPKsS8rwz8
+7UXDE+TxQ3V8kFV6vbVTjoIa/KrkhFr4YHjgJfOIAgUVbJxymungg9ag8qI/
+uynoKm/Yz5QBPrh4UMF0Q4WCOPUGRqYX+KAo3W7fnA4F6SQnDCaT+OGuv8h1
+JUsKStVfwX/f5IeVg78ddodS0FgcqfhZJD9kJL83+hxOQardxlHWcfwwwlql
+cPo2BbU7ZOxvTuYHXS7fjoA4CmK6eTgxt4AfYi8pkO4+pKDAinhj135+UDaN
+cVbNpSCzvaSqsQMCMHScvtO2jYKeBho/TD8oAPG72LlSOyho5lOAh+UhAUjI
+n8rs6KKgaOMGkToTAciLOfpFk0pB1a4eV547CsCH6sIz04MUpJj9TvliogCI
+eIWTeucoiFXIOHtoRgAs5hiWGrioiDrosIN/kVjPqXRygIeKXry8euXYqgAE
+ijVPzPBREajnGJcwCoJ9NNbHLExFV07TLIZLCoIox5aEhDQVjSaV65PNBIHR
+2XCtUZmKPnLLjnuWCcIObv0H+09QUUyf1slnHwThKUNY7D9TKjqdZfaBggTB
+Ic5EqtyMiuaVb97VaxWErgZhVSVLKiKf/HaAe1wQfF7UG9DZUlHS3YSoMkEh
+OFqZkKpziYo82TYU1oKFYGTkrxJHGBWlKK7sqbslBIOtusw+4VRUY7qkfO+2
+EFiy9gp3RFARX9KMhkyiEAi3KM7HRhH1if04apwrBCeu6b2eukNFrHurXdOo
+QqBXPctuk0JFL0+GvtJWE4a2I4dctl5TUaff9XwGLWEwfBNzbE8+Fa0lBRW3
+6wlDyK7e7DMFVHSiz/f9RWNhMPDqaMgtoqIlhwuNcReEoeKD1bZ2GRUd9j88
+2Z8gDPZjlXXClVQ09JBB4dqMMCQ95OyubyX6ozFb9XlBGDhRfnR/GxWp9uOW
+LKvCsBjSXPKnnYqipPLDkxlFgPtZlQdXFxUp5pkPFkuKgE7a7WKgUFEQepo8
+ZiYCvVG96nY/qIhnSpPB9J0IXPYybo+cIc4bL/Pk4ScRuC+6Nurxh4qclHeo
+DnwWge2syNfms1RUETh0/lK7CKwfOHRKZJ6K7LdvfwqfFAFth3Djx4tUlMff
+4/9eRBT2i9wzPrdGRfqY14j0TVHYIyWhScuMo2M6OrybEaJgmR8p9I6wqRa7
+/rdYUWhhj6S9xIIjG7XXLxKTRUE8WG+thRVH/grjrnSFovCvdCvr9g4cZXGd
+m/05IAo1tye62nlwtDlksv5SSwxYhnimKsRwRPdDTDECE4PSAIVLZuI4Yumf
+sjt/RAx2xbcLTBLm742pFjIXA946QQZeSRwpNtWFxVwSA21BJWN7aSL/Gx0W
+91Qx0Eo0cu6Sw9H7UEWBvctiQPuT/sfOvTiS0773Y3pNDJLz8ptzCD9YnMvJ
+oxGHrJN3d8go4cjbpUx95w5xsJIMeCSsjCOyibaVrKw4bG7WDG+q4ChF6NgT
+EXNxCDzQNPd6P44CixxJTIXioGW98e7uQRyNutb/risVhxB7a/r/CJuRFEoj
+KsSBR6Co5rwOUe/DqcO0deLQsHrgnrIujn4G+zlt9BP5dM1im/RwZHHk1qsF
+FglYOIo9Gz6EI5XvaXuHnCRgNjFUvegojiQFp2JEPSSAXXnEnvMYjtjNtMZO
++0nAhdL2/7wIT9Tiaa03JIA0FH9zjxGOMvL5WT6mSEC6w/ZypjGO2K7dG33Y
+JAExCdd0fE7gaFwkPNVYURLcP9/1LrDAUfeproXbqpIweDZffoNwzV1p08+a
+kuASqOF8/BSO0mkRg+YRSej2sgz9Rdji97qfvL0kPBq9riVxmlhfcdmE5r4k
+8MxbHfc7i6O0s2605YuSEOefYNdki6Ox6Yx/UauS8CSpb5PRDkdKod3TZ7cl
+4WWf1zF9wl9yD1JX2aTg3nurgUrCv1c58nVlpKCGkYex4ByONNNLLevNpGDi
+skRbyHkc4cPrr3oLpaCyP0Xrx0UcSV9Wycgpk4II36ohbkccubM6P7jyQQo6
+YxZ0DAhv7Wu/LlwvBdQLYpJ5hMkRWeZ236Xg8GmzKH8nHH16kL3pxygNBtMD
++v+ciX4dOPpqVU0aIn5MMLZewpEPZuUhrSEN6cyHfq4R7jVyUz6qLQ1CNq+C
+drkR/ba/8/4hSAPeZ9R2m7BKTEej8gnCnhm7Drrj6OzA2V/OLtJQ7qDD9tgD
+Ry/CLu3qfiQNt8Lu7ZbzxhFrfPCflSfSECUr0WlM2DslrkQqUxqyV+S0/Qhr
+5hdoeeVIw9t2lnNVhL/2zhuxlEqDsMbwpIUPjhYUgt31vkrDXKSYfYAvjrD2
+2Py8TWnYDnERiPfHUZ+606cvNCQ4katgm0/YN1Pvaz89CbI4r/u1EM72XZxi
+YyOB08oqN0sAjpj4zu32ECQB1rUoE0a47azK6z3KJBCtGmp3D8SR7Qj1ZYED
+CbicInklr+BoyaikvM6RBLxKmTMahONL7zR8dyGBQ7VXpjnh6giY2OFFgiMc
+vPcjCcuQ8+S9gkkQeh1//ovwb/cbL/Y+IEFKB9b4+iqOri7JZhfVkoDjDcN1
+nmAc6bH9vZnYQILRJGd3ecKM0tW2gc0kGFv219EinHTcSkC7gwSJ7qrxDoSL
+s+Nj6vtJ0JP8YLCQ8KTZsvf3vySoEn/iqx9C3Edhw0E2aRk4bqp2wvYa8b5q
+k4T/yMhAIbv1mgfh8T6H5Q55GSDZfk64TjiAYb0oeY8MuEUOBWQQTrBVliFp
+yIBTwbzcIOFG1kcsmqYyoGDRYGh7HUcaLm4U5+tE/MIDjkduEPXrFK5H3ZIB
+3munwi0JG/D+JeWGy0BqBm+cI2GL6iDvqRgZ4NrBYBlG2FswhtknWQYuzydS
+PhHOaXipFVQkAzr7MwsVb+KIT2EsI25YBrBylcdbhEU3Feryf8pAHfsGB/st
+4j30eEy1ThC+GeojRFjp1qI61x8ZcJfcs6pM2Bin60xaJeqX097tQDgsmkSX
+wSsLzuyG4lWE5ybtXYoNZCFc6vG2Wyjxf3okWz85KgtROa1JAYStZ7+aRBvL
+wqqNnOgNwrVLmmrnzWTh5GrCZgLhVFo+Gi47Wfhqc4v0jjAm1vjYO0AW6i2f
+zm4QTjBVbtubLQuqYdZSEWE4qutyrhHJkYXJV8/F7xBetUwvY8wl8v225Uwi
+7GjLmvajUBZ2W1l3ZBPWuPTT5e4HWbgyZ9n8mfBQWCrNn05Z8GP2yN8krPxu
+W61gWxZcHpx+6BWOo0cp2/6xdHKg3XlbPJAwXdB2iQujHCjQeD8JIdyrva1M
+YpcDw4K0G9GEg2q29qQIysE1r87eLMI1XzdlQ/fKgQy59VsXYbPRdT5LWzmo
+yXJO2huBow+16xb77OWgPKaITY2wTM56IucFObjTuC9Ek/CS6zpXs4scsBny
+HdYn/OjPGruevxw4tvpfsSI8srJKvzNWDrau/gsJI+zPtbK4Xi4HSWzPtdsJ
+i5V4Xxf6KAfJQkkqPYTrLMYZ1KrkINZ4QLKPsGBKt4B7rRy8UXw+NkL4o3ih
+Rl+HHFTAGcFlwrS7L157+0sOrv7VFheNxNF9g1Y6L1F5KFTh2rInrDVx+E6M
+hDzQaUTzOxIejf7A90JaHthtiuVcCe//+lJugCwPes3qqj6EcfMwQyM1eQjs
+VaK/RVjyvHqcvAmxX3UlMoNwYXAWz+ANeWg49M6QSjiyidW1LlQebjr6e3wj
+bCcUUJkXIQ8raq/ufCfM9u6I69VYeaibSaweJewyP1XJnSwPHozSc7P/j+96
+4JJ+gTzkkZ6HMt3G0T3Llurcfnk4HvsoQZWw83M1/oQf8vCjAFM+QFhnId3t
+8rA8DNBLftUgPJXgw394gjBnyn86hA2/8rsP/JWHdi02uaOEtw+dF+BkJcPI
+wNMOG8K+ykseARpkeNhPeXiLsGdgpeAbbTI42NsxhRN2+xD5eUaXDI5FiwGR
+hC/qCwi5GJBBYNlLP5aw5Vn1L1bmZOgqx94+IKx1K0hYz4MMwpcLRl8QpuvY
+qGPJJEOvre2TBsJbfPU+R7LJgAWHpjURXre6KxqeQ8Q38U5pIbw0KuG7nk+G
+/ZUVke2EJ/7pic1WkCH9XupBKuEWyTC/nm4ymAz2CY4TbnA0EuemkmEbxsYm
+CNfm8jSafCPDW0vmN78IV6pmizcMkeGM7ivdGcJFhrWNFTNkqDrQob5IOO/O
+Hf/lOTI8vyoyu0T4VecpCdVFMgQyZWX/I5xlM+afv0qGk+0B9GuEMzILJH5t
+kMEbby5eJ5w2FtgkR6MAl9u8rDcJp+zSDbhArwDNTE4024STvBklnzIpwHD3
+mxc0UTj6H4ej+kc=
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145820#3"]& ], 
+      TagBox[{
+        {RGBColor[0.922526, 0.385626, 0.209179], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwVy3c41u//xnF7j9teJaS7pAgVKdfrCkmKSoiKVCgkGRkNo0RFKsqWvUvK
+SML7ooT4RPaobCmUveX3/f11Ho/jOJ+y552NbZkYGBhyGRkY/n/575n6PUiS
+Ik7p590C2MKQsV2qb0WsFCnxu6yTJROGInSnfRaeSRFz5sJ/05phaB3jk1t2
+D6RI56S/4IpzGNpyvf66tpsU+cBcV/OtOwzhyzrXlnT/1xub7RZ8H45cjqk4
+OIxIkqB3KiVjUc9QgZKffVK/JDFYX/MJip+hBZ6GSx3fJElm+Dpt0v4M+dRe
+vqj3VZKUJvmGGIhFoAfamTZyJZJke/LLsuCoCJS8c8PZrmBJ0jSdor6SEoma
+xXlNDJQlSbhgfWBQbzSK8LhCWBQkSfeijp4mZww61dKwjZKTJD0JxezbVWNQ
+76Mw1p2ikmT4X/vGloAY9IdN/O36VQli0Oc0prY9FnHMyklOfpYgAQ/GZJ49
+iEP7vmr0RtpJEDWvxLbu6wloTSnmiLG1BOFNsrhs9SIBVYYsF/OckiClC7y9
+Sj8S0CH98if+hhKkcXk6zVI2EZlROjqOOyUIC/VosDooEbm8NEpHTBKkeXuG
+7uEzSSj9vs3loXhxkvolwqRnUwrifdiLuKLEiW/vPbuV/SnI/fEZAeUwceLS
+7klpW6Ug7UiTIq9AcTJ6tF7jSGQK+pGqy8DjLE5u2hgxWHCnIjEi/1QVi5Og
++0YfHy+nontzg+99+8WI0kx+mM6/dPR30To09ZsYUX+XO8Uqk4HMVr9Z17aJ
+ERaWtIHF/RlInqWVVahOjLDNfYj1DMxARKDqaHq+GOlo/OXeJJCJFralDdQH
+iBE5Vs78g6pZyP6CLbfkZjFicr/2h1lcDrqUbaR3RlaMDFnopAl/zEF2k+r+
+z6XEyO450QTusRxk48s1L0cTI7sMFD3T971A1rGv+hUXRckFy/S2qN4XyLx5
+8Z1WnShZcZxtLVHLRfo6oZfOOYuS7SGu7XkBeejgA8+UFHtRIlfkZe0Zl4f0
+vlr/GLogSrY5c8lZF+Qh3bNqJg7mokTstIxw9GAewjc6wG2/KBHNLtiSq/ca
+qefLid0VEiWS8h/Snwi8QfSNb6sy34qQsYUrK68/5KO0X2+crrwWIcl8itSj
+/nwkn5crsjNHhOhkrBXGMxagjVrpttRzESLLnOx0GBcgmZPPWNvuihDJynuW
+c1QBkgh2O8BsIkIeHLgX9qWmEPFMK1dZTgiTyYD4yI9MxSj4naLTxt/CJNpx
+jlV3SzHi8tss8mtAmIzqpjL/MyxGnLwbbN3bhUmiLpLaGFOM2DbzsQaXC5Om
+8KCevbveIYbTY7rFIcLkfVto6ZJHCZquzPwoqCBMTL++XrNRLEOiylST9kZh
+Eu4UaDlsWoY0Ylt7XdcLk9b2IzlpfmXIx41ptUlAmCw4K/n1tJUhLvkzu8KX
+hMgkWyOfQWA5krvLny5UL0QW/85eOzJJIeODHkHCzkJkb1uIpfmtCnQtP+SZ
+rr0QsWpty2qJqEBRG1JS3C8IkewENgmPvAr0Y76BajkpRASl/2ooDFYgh0yF
+hadYiOyzf3zLzLAS+XN+vyQiKETKDoyI/aN/QHl1OgaihYIkzvx+luTiR3Ti
+7eWq2lxB8siz+vJeySo0l/wM38r8n01D7jzeW4W0rv/cPRgrSM64Vcx1+FSh
+z1uCN765LUiUaYelx9g/oYG7TSuGxwTJCX1y006+Gonic6/ujgoQS369UzL3
+a9E7xQdb9wwJkDOVjqwer2vRGbH8tLEfAiS7j92Ou6sWpfxhiTvRJEA4Zd50
+zSl+RjviM+/JvhMgYT5VJd1Nn9Ghpb/nygL/53OK+Rrb69HNAh/hWVkBkvah
+QEVLrAG9HRBeqJISIAvfeaXdDjagKcGc7ggRATJxpbJu2rMBXXJpT9bgFCCt
+257ube9sQKZKO1RuTtDI5iyrlOhjjUgps8+QmaIRpYzoWJMNX1FPrG6QwBka
+2cWm+eRfdxOSrOty6DelkUJsyaS12ITMlq4a5R+lEXrU17pM0WZUbx4vYqpD
+IwZGZ/w5jZtRschcStRWGkEuNtrzn5uR3Iaj/jDFT8S/Bfz8UNWC7rKJzJze
+xk+cWK2H1fvakHaeR1CTDD/hsbshZsTUjhhOdUgeEuEnzmcnZJ5ubEc3X8bu
+3/2PjxwJmf2aZ9eOXE3kHtEa+UhynKHZzr/tyDpZeWuVGx85RA8OTObsRPuQ
+gbXSe17iGvByD92uGy39zJlOfcVLTna1na962I2Kn/AGSaXyEpsuo/b4wm6k
+NtT4kuMhL+GOnRhfZv2GtoacXO634iVcAjpr17K+IbEum4hIJl5yurHi5Yvl
+72jqmm89gwEP4XR8LVB3sRflSbNp+mjxkK8sSnsD/XvRleqQjOUdPMRx5QVl
+H9uLRsVjbs+J8RC/+f3t2Q29aPB9gcbYEDf5e17lwDrNPtTK+Du13Z+b1L4w
+C50V7UfFD01u5b7jItV930UvTA0gj93dvxVfcpEX6Lr4C4FBtLPnnHlWIhcp
+4ae20lUGUd4OZ7XUIC5iz+pZmHt1EGU13/8VbcpFirxLRiWmBlGMBGV6d5KT
+ILn4N8//DaFbaQpKZxQ4yZqeHJWNR9Dt6KGLues5yd9t38IUbUbQvYdJSQyC
+nORKh49Vb9AIenpNQiRtiYMwd9P5fjaMoOwDnCvjdRxkyk1kn8v5X6hjaKTW
+9woH6ZiQeV325DdSpWfapuSzE3fJsu0eUuNIQ9ImYTaDnYx8sJIT1BtHiE+m
+82AcOwk5KnNt7Oo4OjQXeWQsgJ34/RefbFk9jqw/BantMmMn2+u4NPd5/kEP
+7S4yVi+wke31P9b2DfxFI+n0+N9abESTDD7y9ZxE0nJlGZ6qbMTXUXv50eNJ
+dCL+xBuWzWxkp8zHMx+zJlF5uF+1NI2N+Ik2NUZ/m0RP/bomjftZCXtJidqq
+zhTCp0L13geyEmXl/WEtEtMoinfub3ADCxFLWFI5PDCDvtwLWRL/yEK6rilu
+0WWcRcwsG1nTi1lIzblG6UsbZtGVpaOSJImF/DgXyKJ6Zhbp/szSnXFjIYef
+2Ae2tM+iCWIZfUachTx87KEW0j6H9N2rtLefYyZR0aVDkUsLyOeP3+YKE2YS
+vx0V35JdRAWX9vGY6jMT6Vt3JRP1F5GMZX7rTWVmYvFvkT0uchEtHEi6VL/K
+RBZLFxavayyhTLFboY4xTCS19NyHrYHLiP39zq6sZkZiyXFqr7TJP7Rv10S5
+VjUjmflzBMzv/EOur3JSvpYwkjpL3druN//QjxQ5p8UkRrIoEbOnQnANFYXQ
+GA5dZSTzEe57BdvWkJ3V2KYRHkbSdj/ycEwhA3xiTHWh6zGQyco0wav2TKBb
+/VTukSYDSQ7b26oUwAQVIXeb55UYyDv+/64IJzBBqdjFXbViDGSHZSGHaSsT
+2Jw2mWpvWqOi/XVE3+gww758a8YLEmuUepNjIt8WFhg9773BO32VGnH547VM
+Y4Ph8VP+Bo9WKdOk6U8cKmzQ67VvQMprlUoOjUnQPc4GbaFr6eWHVqk5C5M1
+/TA2qCy5q8QyvkJFN5LpYFF2iBEM03qktkKpvA1uVt/CAQaV2afTyBJ17XHB
+102uXKB3uM0lIGOJes+3V60ulgu0WxjvXQhdos53Xt/4pooLNIfNC2TPLFE7
+yvYb6klygwIXO+/z+UXK0fL4rvBP3MBhfKE8QmmROlPVN71uGy9U90nJ3oub
+p0KbaJoMYjSodDiofvHOPBU5XipvtoMG5dOuhnoO81TeaOTf5kM0KGL97M2i
+MU9tO8ktq3+LBukKXk1+zXPUy4fDwxLDNAh0abnjzTVH5SYW/IqlBECX8eGw
+g9cMdffxaMZcuBAkRjk9p87OUOeerMnteSMEy8pGZsIHZ6jrpvvOZDcKwRsr
+/k9lIjMUJ/e6rZJ8wiBT+iSNlj9N/Qo7raoeLAyrHhE2ReNT1PC+xHOZoSJQ
+NJbQz3hhkjIaz/v+oFQMBAP8YswMJqmn1wyT9/SJgZPUOeMclUlK92Eoryyb
+OMgbyFWaMExSW56s7oo9Jg5hGalJGfETlJGktI/eiDj8+GhcEZP3lzqw469i
+jZwkHMuzLVOJHaMsee6Y8levg008K5ZKTmNUzdJY0N2JdbB0MezfVhijGMO2
+OqhLrofUDRTID4xSikPvnh29sh4WQ8UrRRVHqa2PLDlPS0hDslPdp+WSX1QS
+tyjjthsbYGarSmNV1zB14gHrmLSGLNQGVl+tfDFMWbp7To8dk4Xn/ZYClM8w
+pd2z8+UPe1nQj3lgXCw3TJ1nGGdRipOFeM7BlmyHIWrT6bkpfyY50BuJ6Hy0
+NEB9d2jYtr1NDqLTVvotJPuoRrY0WeFYebi6Sh9zGemlYhZoh/Xey8NB0+Oz
+94t6qVyGA/nZ3fIwy5LOXmLcS3Gp2Hpzr98EyTXPzXeK9lDJvI33diVvAkE9
+3dGC+W4qucMl17WIDtP4Ea2opJV6add6aoBDAZInBuSGzVopX7742/+UFeBY
+osYu0ekWCpYHssxOKsCLtT4LD8UWKjFh2ZVKVwCb8p0pu+OaqBWJUbdb+lsh
+07PA8cryF+pxqYAOY5Qi2DsZFF31r6RUmvfnLNgrgZa//vP11RVUZgD/V4MI
+JRB4phf4maeC4phmuvq9UgncvO++0N9BUXyhhY+q1imDsLjH2CvLd9SkiEVe
+TrMy5GTndqxczaGk8u1YBTN2gJF1/ebajSlQEuPoq7NPFf7RWoJEeNPB9fvM
+UrOZKuRWdP88N5cJ22yVhYNdVIF342jGUk0upOKENacMVRieYhEWVS8E4UbL
+UR4RNWjqEvi88QqBznKTnL55NXgcv8PAVKgeHLSF+kK+74KC6H5K83s9GD66
+s8jHsBs6nj3dJZPxHxxcfGNTLbcbZEMXZEY1G+B7+qZ73y7tBgvovYFVvkJE
+xD7XpPnd8Fs507jNvAUUlvpYBzZoAK+ABgNTZhccWlcQUBevCTL8Au9neLph
+/esbe6qrNUGV9/e1ny7doN3TN8UypQlmnHGj9Xu/QbhTK03/4F54zsjQHtnw
+HQaNXewXZvaC+OJAW8SNXnjp9HzTWUstyPqV83JbygDwTHpsyFbFMHU4t7qk
+ZQAM/Y1l3x/GsC83r0+fbRBs5i1qpmwwNLoWitjaDwLLwc9TbZEYFpbLb8Ur
+DwH869TzXsOgx9dkyFc6DHFc1gGn2/ZDv+rC+N+WXxAf7X/TLFUHtj1bYvdh
++w1jz26+L6zUAY/5FVkejd9Q/jCqRKdPBzhLGc22xP6GwsEm0XFpXdhxgLvc
++twovB3dpHQrThd8T0qHfh0fA3Fy6Vpz4gHgQ3KRFswTEHLV9bZ740FI7Sjm
+9pScgCi+R9kfpw6CpttRv6cqE9DSUr96QEQf7DJv2jecnQDdwtJ930/pQ5lg
++94DpRNgs1ui2XZEHy7/DO7dcW0STiXEnJLmNYDPj2cVOH5Owbxc1PU9vkfA
+WjHk+aZ/U5BpyRitlXkE5qrkhHREpsG9fvTMza9HQG756MotnWmI35AtkyNv
+CN622V+mE6ahrjWYtP1nCFs0z7r1mM+A5ltT+deKRyFwoKa06PMsUKp8IRPc
+x0HKT+TWp4FZuGv/6cId+nHIW3deq21lFtZ9LjeB/cehy3S5bFZpDk7prd5U
+8zwOSjXbqZ3hc2BvWNciNHQcWl+EVbw5PQ/L/mYHx2uMQd7jzKfcsQXQOetr
+/u2NCbwTzAosZ10E/3HuT4LNJmD0albvi/QiHLO613V92gS8RkKrx48twuS9
+cfm+naZQf6qiZlvhIlgIJj7iKzEFN6DXZd9agj3KB3N2fDGDSo6JhnS+FRC2
+SFqu2WABNXxN8zz0FZgAjtJduhbwRbhgg5vWClj7VuS2XbKALhkvZ7i8Aq5H
+Xx4temMBUxoM/B21K7Dzz/GnM/qnQNaeZsR5dxXC434Lv/I9DX61O+odl//B
+ke+W6ljcCgIbBGe+Cq7BIc43p2t0rCCkdUZKY+sa1MZeigp1toKovmJHFos1
+yNufl99WbQV5i5g7vmgN1murzlvdOAsTT7ds+qnBgBuCvbKNPK1hQ5WGjfgM
+A94/IKqvyHIepvDRjMdrDPjKDp2EtPXn4VOp7W8ObkYcbiJpq6N+Hi4XhF1d
+lGXEll6Oy78czkNxytjNrqOM+O0yb8RI83kwvp34LC6HEe90+GjT9uICBABH
+tcwFJhzw30Hpjhu2cPK9NFf0FSacOdEqJxtjC1vVdxkKXGfCJOcTw9NiW2hU
+Ot/M+IQJK/Mv0xdmbWG9dGlPfzkTpm18hoirHRStOC+kSjLjAw/47vu7X4SR
+d+0KCk3M+BH7NV27GHt4v7s2LOYHM96ZVuflUGEPofkly9yjzNil/s/7zBF7
+UHsZ/98fZhbsYkS9bVF3AJ/ECy4Fu1jwl6bjcdMdDiAU9LcYollwQpuwQiT9
+MiATdn0za1b8nP/Ij+7JK0D7upBXfZkVe1w+u6tWxhkGDH9L7PFmxSoce14v
+H3WGewf/G5UKY8VpPpKRKq+coVkz/FHfB1YcqzzaeU3jKlyS3dB+eTMbdnfI
+LZ5ncIHwP7vt7vxhw3Uf7VJ9c11BWmaaSWaJDbMZSc99qnGF7OOvEkpZ2XE+
+24VllQFXIAWbO2fXseOJv50tbuJuMHZd/Milw+yYsFe9zwlwAz32JRXDTHbM
+6ry/WNjGHRY2lK2KnufANxSUdMWxB9w57h2T78SBt6soDew46wF8d3apH/Pm
+wJxv36u5+XjApuGXV+8/5sArp2hF18o8wPjF84Hlcg78OtK731PLE3I0/Gp7
+pTix3Uzr0+cHvMDquM6z7FZO7P384c1xz+vw607XSdzPiWM9rv8pTrgO7kUu
+km1/ODGngIlxWfV1uC+VmMDIwYW3VVkJu4rfgIKhlSxzTS5MH2V7El56Aziv
+F5WzJXDhw0cef57nvwUFyQoj5y9xYwtdQRurIV+AVpK94M6NU0dvuDtx+cFn
+dnOnUH9uLMm8hcVQzg96LgdOvYvhxv82Z+VeNfYDLvWBFdp/3LhYnJZnVOAH
+1nVxApQKD750Krbhvo8/cM/w75Va5sFbk9sf0pXugF1C/TYPdl4sX7altfvQ
+HSAG96W/CvHiyj4uyyLbO+CRxMQUtI0Xj7qf6OiOvwP9RrM1U5a8uL6pcPM4
+fwAUZ3WZfSa8WP/1/Q6j5QCwO5vm6h3Ih7+1hx/ZPxEIFVznbVrC+PAi8u6e
+ogXBuiJpM+UEPtyTuri1QSUImnii9gy95cPtMjyVHO5BoFXygOH4Lz683/t7
+Y8BSEAiLXA3dcoQfO2gLv63hvw/nbNe3jnLQ8OuyovSqM8HgINL3M5ePhm86
++xuF+QWDe1XqkoswDa+WHde4nxoM9zZtk1nY8D87fbg8NxYMuUOajizqNDyR
+IBzR5BsCK7bmjOttaZj5S/x4/suHEGkXvt2ogoap97ocESKPIVH0JBaopuHr
+Q1p79LY+huxPkida6mmYvV15hRceQzk92etUBw2bed0LHLz0GAaH8z7Y/aXh
+LOmapldlj0H14hcL3/UCuL7vu3uj4xP47yJnYJ63AL4Xk9Zd2RUGZlElihO+
+AljL5kdc6EwY9NY4flUOFMApt2XnvfjCYUrhy7pXYQJ4i55iZ5Z2OIiPheW/
+zBHAJ45rM/m+CAebq+v6sr8LYIFofW2ewKew4qW8L22/IHZRPs11+ngEBGb1
+9g0eFMTlWdfatzhHAH/XkyB5I0Fs38K8T/xhBMjtnWlKOSWIOTujNp+pjQD9
+1WL7ZDdBHBwXynlDJxLC/bUjE9L+9x/YVLkFRcHWB6ZT0ZxC2LDCi++HYQzQ
+RMZUnPmFsJn5i9lKpxiYS7jtoisihK+YLfhVP4yBisJXE39khHDAyZdVyl9i
+wLyP86+OhhD2zi9s8DkWC3c1ykfH7YTwpqFvPfKn46B3mD60/6MQVlV2WV6+
+9xwidRbaf/kI46vvvv0aS02CwQeyr5IChDG//OCVjOIkUG0yCLR4IIwXmWcq
+XeuT4It1/M7aZ8KY77b2770zScDmo/0k84UwFu/4khelmwzuxSEGF7uEsejt
+oQ++I8lwbLts2eAuEdztzPd7vVYqcIoZJPeMiWBJnneUqmQGtP2w5hGeFsHM
+zuUlejszIDXd00N/UQTnXlDWcjbKALw7zeA1qyg+Vkp1rt7OAA9Thunb0qJ4
+7tAmD4HxDOgPL9KhHxPF+yqM+QWrMqGEtnHocr4o9rDjOuYakA2XuVY2L3mL
+4aJTP94p4lzoecqy+caYOP5yrE2mjiUfdMCpT8ZHEhe99/+e9/ktvPXbJrJ9
+VgpnmfQUKr8uhR3fYrb32KzHd4zyl6nfBGJO2jMWTUvjvVacd4y7PgDXroMZ
+i2oyWEHmEpPLm08AX+7nZK/+z0mcDhnfasFzZmNy7gdZnHKngNmJ/T9Qt7Nv
+tb0ph5/p83m8YWqEvz+t7F7pbsTKBUWQnvYVlAvX1F6sbcRvMsps1ZSbwZV/
+YXq5SB4LMiSLRr1pgZfeiQI/bm3CkWI9IjLmbXBVecbRTZ2OL3rVMB3ob4fL
+7qWieZp0bPMk1JD+qx3s3wVUjGnRcdXBlmT2iXY4ryMiZqdLxyW2sZc/r7aD
+ycndlebH6Thpk/6NYxIdsMfXSxw50vEdxb8eVsc6gKlh5SNHAh3/Yt55w7+8
+A/4JVTkfSKbje1mH5i9UdcCy+UPJ22l0fCNx9oZefQfM9K+/upxDx4q3O59z
+d3XA8ByS+lNMx4udJociZjvgs7S/S3MTHXOr+2x6ua0TPl04tI7WRsfRzvny
+j9U64UOmQPWRTjr2S3qh6KbZCaWqyes+9dCx8PZ3x/bod0Ku3ofq4jE6nu3o
+n6260AnZwcGus3/p+INuj0qWQydkNJ5YrzpNxzUb0LUQl05IPDXomrNIx1L/
+TQuc8O2E+IQX60dW6Nh9o5rj7sBOiBl0r5Fn2Iw7J9LqJB52QoSClts55s14
+NQ2rrYZ3QvgVVunnbJsx+6f5pN6YTvg/OxjBdg==
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145820#4"]& ], 
+      TagBox[{
+        {RGBColor[0.528488, 0.470624, 0.701351], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwB4QQe+yFib1JlAgAAAE0AAAACAAAAD4hVgIqhG8B++v38D4Dqv1JmpH/B
+mxvAOqTBHvp86r+WRPN++JUbwPlNhUDkeeq/HAGRfWaKG8B0oQyEuHPqvyh6
+zHpCcxvAakgbC2Fn6r9AbEN1+kQbwFSWOBmyTuq/cVAxamroGsApMnM1VB3q
+v9MYDVRKLxrA1mnobZi66b+miWRs5Z0YwHgdKL+E5Oi/aWNlCxonF8AmGrHP
+oBzovyYjt8WotxXARl6HqqhY57/zwqjEEikUwLPmsmUUhOa/sMtDSha1EsAq
+uCfgr73lv3y0fhT1IRHA683xOq/m5L+FBhX0WywPwCIrCWCaE+S/8nV/zABK
+DMBi0WlEtU7jv32lKS5cKQnA7LsfCTR54r/opiad6j0GwIDvHo3iseG/SHTF
+Qi1hA8CKamvbfO7gv8YBpHEmRgDA3SkNCnsa4L9KwqpbpcD6v3hk8O9Rqd6/
+RAGN5mp49L/K/XCMdfzcv1CwZb0xm+y/CiaMvXBX27+ZpfziWRrhv1fgOW3L
+ztm/aW1KtnCBwr87I5Ld7STYv5CdMEpVE8w/Mvh8zG+X1r+p6autLKPjP8RV
+Eny56NS/Dj4il1kD8D89QkLA2kHTv4bjyLy2yvU/ysAEg1u30b/CCPDPpg78
+P+vHcQakC9C/H8U4ZBj0AEBDwuIQmPjMv+i51ykp0gNAeBIXPpfpyb+T7jZm
+g+4GQOlzoOwlmMa/XlFDlarVCUBw+U6Yc3/Dvwv0Dzsb+wxAMpBSxVAkwL9h
+ZR3V6wgQQI2JFje6sbm/zWcJhrB5EUDsOtLdUIyzvyqKVfKZCRNAbR1wDg3E
+qb+XQ/jX6X4UQB+roKvopJq/CRdKot/sFUBFUFAghPlhv2wK/Cf6eRdA1Q3k
+mAs6mD/flAQne+wYQB+CVOandqg/Qz9t4SB+GkBbXHH9Be2yP7eALBUt9RtA
+Vi9uDTotuT8w3Jot32QdQLbGAMsPTr8/mldpAbbzHkDXnfRC4/nCPwo1R6f5
+MyBAL7RDo/8Txj8/zomrqv0gQFW5PYKMcMk/d/Qjoq7DIUCroAI4ar3MPzdm
+adVlfCJA3mOi8IjRzz/v515mr0QjQPCK9hMMlNE/L7X/M6z/I0DgUQkx9CLT
+P3IP+PP7tiRA5YmBuQSq1D+teaAR3n0lQFA5T4FNUtY/cC/0a3M3JkCuVorK
+Nt7XP2x0vBawOiZAk6VGnR7l1z9puYTB7D0mQHz0AnAG7Nc/YkMVF2ZEJkBO
+knsV1vnXP1RXNsJYUSZA6M1sYHUV2D85f3gYPmsmQClFT/azTNg/As/8xAif
+JkCfMxQiMbvYP/4TxW9FoiZAhYLQ9BjC2D/7WI0agqUmQHHRjMcAydg/9OId
+cPurJkA/bwVt0NbYP+b2PhvuuCZA3Kr2t2/y2D/KHoFx09ImQBgi2U2uKdk/
+xmNJHBDWJkD/cJUgljDZP8OoEcdM2SZA6L9R83032T+8MqIcxt8mQLVdyphN
+Rdk/rkbDx7jsJkBTmbvj7GDZP6qLi3L17yZAOeh3ttRn2T+n0FMdMvMmQCI3
+NIm8btk/oFrkcqv5JkDz1KwujHzZP52frB3o/CZA2yNpAXSD2T+a5HTIJAAn
+QMJyJdRbitk/lik9c2EDJ0CpweGmQ5HZP5NuBR6eBidAkhCeeSuY2T+oCmRG
+
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145820#5"]& ], 
+      TagBox[{
+        {RGBColor[0.772079, 0.431554, 0.102387], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwVl3c81l8bx91mZM97lJldKCMK36+dEWWLRFbSsCoUUhmZpaKUsolfKKOs
+rkMRDcm+7zIyUkj2Ho/nr/N6v65zrnPO53Om2OmLlh70dHR07QQ6uv+XXDE2
+12MzKegkEv0cnnEALD1zwusfU1CMFA0m4lQgRX8ubPkBBY3fepC63+YAUMV1
+wxTvUNDv345Jj9RVYBfhbqhnLAXNJX2Kd8OV4NTAwLX0WxRU849vMGpSGbLq
+FK51hlFQ4FnRHMs6VRh9HHp1ZzAFrR1Jnl7NUwaZkM8hugEU9IrhP5ndvqrg
+Y08JCT5PQR9no+yunFGGYrWzwaVeFGTEV0g7JKsKKnMsQcJOFPSeVfjWyT8q
+cOWb7RUbWwo6teulU9kjNaguyb0cf4yCuuu2bm4Uq8BGwvyldyYU9Fy2ykPe
+Xg3wc3qXVvUpaHlNd7QnRAX8ju0/e/Y3GeUwRvcp3VaDcoXr3plDZOQtPxz1
+beogLLN/PdP7g4zCTDL2UALU4PDE7jNcPWT0uz9C4lv7QQhrOedl+I2M8rPP
+LsbIa0B9fo1n6CcyOu3/yC689iAwRrF5ljeSUerg/rEd3Bpg5O7gMQFkpGSv
+FuNZdBBidQvcxau3851cXwhaUYcvoktuDuVkNLximlb49CBwbxm43SkmI7Nq
+5dW4MXWw6rt/+kMBGaX4ZhoVyR6ClJph180sMjJuundZh6YO1EcHXFXTyciq
+uKRSXegQ7AqKcDmXSkaHHHO4GdvV4ZRt26nsu2T0rMDCVpftEGSpiJyixZFR
+booT2aVVHTqIHNYmimS0oieZwWJ6GFIuX0CMsmQ0cXu28/QjTTjR+XUviJOR
+1MevhKOjh2EwKZlJRZCM9GtrXrSGakLO3zm/KS4yWmpz9cmv0wIvU5v+AlYy
+UnVWeXqMXwummImvd2+Q0LT/Psp6gRa8dA+W6F0kISdiiJ4dmxYENtCSkqdJ
+6BIfdW+Bpjaoi2qum42TUOLcs8/GWVqwFpp+hmWEhEpaSGUWrdrw9vtmZ30f
+CT0P8uFh1tCGGxouOtd6SAjJpL5MdcbAILX+hdo3EjKdkLkqtF1/x4I4eeYj
+CSknmx8s09WGT5a3oorek1BAvVHDiisGiaWjsx5vSchRqYuP57s2CJwr+ER7
+SULhxiZkfn8MxIf3hb5/SEJ+67JfT5vjMIon/QlLJqGJ+LTAJj4cCp5O22jE
+k1CZwPE6h4c4KJ4oUygOJ6HTv5ovFf3EYfY1/+MzwSR0Xy5k1LYIh0qByywS
+ASR0aBcpuUROB4IDegL6zpGQorlkjdoiDprf1AdTPUmoOzjgqX+ADmwppJlZ
+upBQ8n+iTtO4DjTEr71hP0FC34+1fI3m1oGocSfJD1YkNJ/MT1WL0wHjI2/v
+RhwlIet/ol35TjrAnieyedhoO/9Ymb1Dlw60MUScXcRJaHy6JD2kQAdsQU/P
+R4WEGG+ufpSZ1wHy7twSSQUSivfWMJH8pAN9Icy7BqVJKJhJKCME0wV3tZZ5
+awoJ4WLfv9+L1QXp+3KuXAIkNMaZ8eWQhy6Mz8R9aeEkoRQHfabXXbpQbPFX
+49YOEtrzmvPp0ktd8HthnqdNT0Kj7w5r3xTVA5Wdpbwra0SkFzZkW7SpC8tn
+eMLLFojITbZV1e2tLtQ0+U+c/0dEHMeCiiRM9SBsT6edzB8i8n/8aNXfTw90
+b6i+HxoiIpZDDafvp+oB02CKUvoPImJ6PhYKIXrQrLX8xK6biFw0XTUgUw/i
+Hzuw8rYR0bPRKcaSZj2wWKm+9LmFiKyqzHSb/+kBr92uoah3RERQ60jqE9SH
+7vJQc506Ihqf2er6pqUPj3gHqtcqiaguO5rwxV0fnHxx6cpSIjJu5uaZjdMH
+0dbMe76FRLREviA2/UofhuUZ6ORzttuL231YS9eHvNvu50bTiQjSxMMGGvWB
+I2FQm+0hEcWzffLYs6gPgXeceBSTicj21BElNSkD+H6vd9gqnoisy3fGvt1l
+ALqp1pVBUUQ0nTZgsWFmAP05+nTsF4mo42bkr7kuAzAoQO1K3kTEzOkb0c9k
+CP8VaebauBGRKe/Ur//oDIGv5M2VkJNExHU8B74pGULIKxWTZ3ZEdCRwz48u
+F0P4WVG66/1xIppfVYHwk4ZwpGrvv9+mRHSnifNnR4IhlNYW1HMYEpG6gonI
++zpDEEJ77h/AiehykXXwkVpDiFkcqQkfEkKn5Tk5f3EZw78Vl8ScH0Ko4XCa
+8LyQMdhu/HBp6RZCd052J/IYG0MdnYPyVJsQMh0/OSoRYgx7GLuY+D4JoYGD
+bWIiRcYQx3K892CjENqUKbkqX2EMs2xfCp22e43017G//ssYHDiNQyOqhNBT
+/61DXUImgHgaLfLKhJCOw3R4hIQJLO/NHf58Swg5nhHR9vAxBW83j51kaSGU
+bAythozmcKbQ3NBJTAgxcATml2iZg+fMwYinFCFk5eqcLeJoDu7hbEvi3EKI
+IOXcOvDKHFwelwzJrwgiMzbWsdMeFmDfsVKl9UkQOYoJXFfzOQZH9BLPuF4U
+REcXMn98WjgORrFXsrO9BdFo7AnbB/yWYPjNpX/UTRB5WMwfz5G1BP1TytZn
+7QUR25f6Y5zOloBf7cUCdARRTIv22YJmSzhYJi4UySeIXrYtl4vkWoGUxOvG
+gtcCyFeufSvrmg3k/nl1/sJLAaTo4mPe98wG9pQWC6gUCaD4+7E3aGADElp5
+HvBUADFOTv8eYbAFUbsHTN2RAkhQ46XW5URbIMUFGDBYCyCG8+HpP1/YAfuc
+YuPJaX60tiGjIE88AXFV8uclxvlR13El3yLsBLBdlxb4M8yPqjS8D9d7nwBW
+DhGPwB5+9KjoY4pl7QlgluZkinvLj8RaS1tD3R2BznFS/008P3IyirY0rXeC
+uYaC97yy/EhLI+R8ZskpEFSEdl0JfmRW7ywV2HcK1B93Dfrv5kdl7dhwE5ML
+hAXQb7Tz8KNhMcsRfRUXYNvjpHpvlQ892X9l8Mk9FxCP5Mrj+8yH3mt2SRDt
+XcHS6HI0/0U+tPhlX3nN+mm4VBb/QN+bD11dnXqlSXSDhyLZ2YFufOjBAzWf
+JmU36F/6Cp12fIin68rNw+fc4GyB7PJ9fJvba3I2+twggrXvjAAvH5LpkP7g
+1OIOpZ/0TAQreFG47P6HSvWeYPX6XGNLMS/aUzygNj3iCYtZD/DQAl7EGXvn
+H5HVC7RCxtRGHvOiENU451fHveCjTJzEqxu8SI35dEjTqBcMR7avHz3Gixq+
+MS3LkrxBEHctiZzgQQGf0bpfsQ9UycfKaYzyIKvMP48mqT7gJFSWO9nPgzYb
+El89YToH2VOMT6zaedAR3O6qkPM5UEoviBGr4kFwsVaPl/c8GK/+c62L4kFb
+Lz9VBUZfgGvlYfwLYtvxO1HEu12+8HqYf7mRwoMcln/6hf/zhVneou8pAjzI
+lU77YwarH5zx68lSZ+VBp7+88zmm7Qc2Ckr7r01zo1n7uM74536gUPDzKANw
+o+9Ef9J0tD8MPNaP5nHiRpxsgtxfPAKB/Il2dsiGG3UXfiKrRgaC7aqveZkF
+N8ran7j7S04gfLZPF7DR40a9V9aOJY4EwhuBxeyHctxINAG9cfC8BOIiFhHY
+LBfyENI75BNwGSKZBeYd93Ih7pl6iWsVQaBbejm6XZQL7RYshrHeIKA70Us2
+FuBCO4N+GsWsB8G1F4911DY50fGgv2PO+sHgby2exN3GiWyYEYN/dzC4ZCnK
+NQZwIitH5d+hjFdBU9vERaGGA40JK0nLxIbC6ljRXE4JB9JkuBDrWx4Kb+5y
+RFNyONBC4ovF2f5QUB5te7EjgQO997ZNKVYJA7l4u7UhZw70KFq3mn44DIRo
+7imp9BxohE2npVzyOsxeCv9MZ8KOOlXLg77mRUCpMPOhMC125P1xl6tMQwRc
++BCfv6bEjsa3Eq4W9kXABDHtxqIQO+qO//N1n8ANGKkpV58c3YmY8l4bqEbd
+gC7CeE5PxE6UoPG6Kdz3JrxJsA4trmJDjbikPNUrEi6rfR+Xf8GGFMbSKZMx
+kaAy4Gr/PIMNCb1Md9pfGAmlSheVc6LZ0CejRkbrv5HwvOP2n0c2bOh5MBc3
+/eUoSCOBTeQMK0p6LiKufzcaQnNlFZxkWVHm7Wm2xJnbcOPRqFfxblYkNSB5
+iSoYCzEJmZl0vKyI7+9yqINmLNy/RBLIXd2B7t4pjVuOjoVCA9b1v592INdE
+/yfVYnHQO/q7JfzCDjTxl0sr8VQ8HJAq8MguY0H2L0YYbjMngTrZ/dlCPguq
+ZqpNWDmQBNqcolSjJyxoaZPPtuBUEhgvpppN3mJB9dMi/+qrksClKVpZ1ZYF
+yQ6LGFxRvwMJnl6ED8vMSG1q57eahTvwO08qfVyLGVVhz2dpt5NBWLwu/8oB
+ZjTFasHUlJ0MVulWrxilmdH6arZlZ10yvL13/YMwNzM6p30n0XE2Ge5fp81Y
+DjEhDtdpMunkPcBPJBrWRDEhcVMTn2CN+/CQY/Ff3FdGxEYS1hDhSoHWmPhV
+4ntG5HaqrLF1XwowMEow5b1hRATF4fx8sxS4sGpBRpmMiOS+ebg7NgX0x57r
+zwcwohj7HKe9rKkwjU4+ciIyokQkwzPB8RCOBDbq7nNlQD27r0se0EiDsKnr
+0vXWDKhvueJSvEsalJ/RZLc5woDSSnVSRWLSQPRkWdc1RQZUOwpXZ3rSYNkg
+88znDXrEP/aLYhbyGAqEQhN90uiR4aimnujHJ8BSo0J73kFA6eIHWPwePgNN
+1em3Wh8I6HiZ/I3QD8/Av6Qo+1s1AaVpynZ+XnwG/dni51cyCcj4+tBzsnwG
+VMZz0xn7EpDk64L7lPgM8HSelPzNTkDceIxernUmNBFy/KQM6ZAmRTmWh5AN
++h/uiycdokMCwq3+GpRsqI+P7FhSoEPiE8jhpmo21Ap5qbYI0aEXqtx1oWez
+wd3ReranfQvq76pReLqzQbPMheBG2oI/mpeedJblwMTpYJHgvA3gPmt1eyw2
+D379PRFhkrQBki+ZNJ48z4PBIM1hStAGyMYKzFxpzoPuxK28t8YbwDGoIJ7L
+nA8N1ZEKjH/XwWtwWPL7rXxI403WSlJehwdNEhO0mAIwaSh0zEWr8HLFO8uu
+tBAMTbv9buWvwqjTgIlhTyHodhJi3BJXYb9qjZL3ZiEc+mVfLua0CmEh0alm
+R4tAlo2F4+nSCgTUSe2887cIdli6vU1RWAEWGbqUw+ov4MNPiljMkyWIXunr
+frNUAg1njQ563VyC+6M05a+8pfB2zv+o4dklcPHYrBiQLYVKpo/BjOpL8HBr
+zvGEfSnkyQa1X+9YBHmnKOeqylKI8uu8Gcy2CC1un6sOBr8EfULCr7NB8+AZ
+/KqTTrAMMh6efwqn5sFv/sm0u1IZrCma2/IbzUN0q8e+PyZl8MqZq6lOYB40
+2CoDLa+XgWjt3Vzusjm4Jc0rWTRZBhuXU9wr/85Cz86QffGfyqFy8tkQwW0G
+cprEvtRnVQLvretptiYzgKd43XWqr4TzFFfLov0z0FtX85w8WAl7TMQbrOlm
+4CsdQY0g/BqS83My89OnAeDM8ZDHr6H/vWV9Wuk/8El4UKuU/gaOlXrU7X88
+CdQFYYJRbTVIsq+fVDi/zW279IX6qmHVK3lTDpuEzLRjyTs2qyFHBLA9wxMw
+bt0Za47XwEoisUFQfgLO7w646t1UA1nnPzWtVf8BrQfiymO9tTAvt7+tkfYL
+mvoX6m2EAB7lrg85kH/Cn94sz7GNevDdkJr0+z0IToyc7g78DWBkc3zhduUg
+TC9YfR+Qa4AFxjyWastB+G81SFHOvgGymp/aqwgOQLu5iXR5WQPwGupPlC99
+h5r5NeW0C+9gDk/irqzugvykfXJRc+/B+7xJpW9EA6ScdHkScbAZ7qQrmdjw
+fcYONPwOH9hohed/il7szR7GNGL/xrS6d8CsafGH6s5hLCxStXg8oAM0i0t/
+HmEewcgnZ7oJNzugzb9CwMN7BJvJSowUzeyA5bW3oemKo9jeA9fukPs6wJCz
+/Shn7S8sq4c5mWbVCUMHlv/+6/yDzV11QKaHu2Dvg1WWMOZxbMv8rYWfcRdc
+XloXY1cfxzICOPfF23UBay3BVubxOMbuv8mbGdAFSgY737q4TmA51iesdIu6
+INxOOPHb30lsynqzQp3YDZza4qkODNOYaalqeM5YN+T0vtl5hTyNcSSzZ+vM
+dcOhAIvr9/dPYz8HjPXbNrvBs+Ca99dT05inmIFHvUAP1PH2HDaoncambAtn
+pnR74NxY3KDSpRlM1YPCYJvWA/Q3xG3M42cwmc0LMis5PfBwV1WLT/YMJn6f
+fDGupAfeH//1Ku/bDKZnH/Tl2vseoNTikbsUZrEbuvrfEv/2wMc7C7I7xmax
+MzNrScc0e8FFPv6p5OYs1rzx5menQS8sNorz6QnMYXf4lCmGFr0gvmaxHqo3
+hw3cN6ubcu2FYI/C1rlnc9j2t53HJqoXZA6dChiwn8f+WGSZOXzqhbedC2Pr
+F+cx7SiuJ086esH6YrwTOXoe+1G3/Pnj9164nlNlYFMxj73fZ3hibKIXejj5
+iZ94FjDRCNXh3TupEDXcXFv5cQFTfNn8zMuACpTrAqFNwwsY2zWN8X4zKpTu
+Oq3Vvb6A/Sb9MDtsTQWazVrdgsIi1pcx3pt1mgoKzftA5d4iZjaz9lA2jArv
+3EPC9f/b5rVKhaZbVLAnfMCsGxcxFbmVEcM4Ktw45IIClhaxu/lK+HwqFbr+
+S65/5biEtbs8K1grocJZ44GIhsAlrNDCV62yggqbo/K67QlL2ENx2k7rGirI
+iDQ2zMASFnksRU6jiQrX7i69U9qzjGUdf5KRR6MCj4L+LVxrGbP+ltgWNECF
+vI939I/ZLmMnB2aT9o1QoY1BrvFizDJWRSD5aP+lwp7LTk3Fk8vY5plnAWsb
+VKjifR71lmkFG3wgvD5AoIF5yYJhq/AKFhF6KiyPiQZBvxM//D22gu1n71Gk
+stOAI/J79Ib3CiY2ehQ34KZBlpjMEY6bK5jAIAvHPT4afD5R37y3YgWj9W1l
+d5Bo4LrEcVuzdQXzb2SxbtpFg8V7J4zNxlawW+5jcWkiNBD9MtfiQ1rF9tFx
+eoztoUGFNx579cAq9t2wYvqUNA1MmBNM4kxXMZ7zC71VsjQIwKQ+FYauYmk/
+TqTxKNBgxw//uOqUVWxC+PppLiUaPAkC048lq5hXorbH1H4a7BdgZ6c1r2JF
+mbcfFyvToOml/ec/P1cxv5w/mxaqNHA0z41fWV3FTn+8ertdjQbT4zNmrPxr
+mIjerKqaOg0io7U5SPvWsAfa97dCNGhA3hP3RcZwDTOc0xrKOESDEtSToH5q
+Dcu470LLP0wD/ZN7zI8ErWFGJvSjSZo0oK74ctrfXcOqKG+37LVocCGlrtWr
+cA3r7n4nw6BNAwZltqQr79Yw9qke58RtfvjV1iL6xxrmamWVubrN+85lc6Uu
+rGEyRhLTRhgNGnZMf83jXMdEJVtML29zM2f7ErvUOubAMZETuc2t/OUiAVrr
+WDBrCFPINneSU4yo1utY9I/DF622mSYadBE7t45RWD1HeLZ5UOpEau7NdWzH
+g3Sviu3+fu3VhJ2P17GnjYtrWts8eUB4zO/VOibTN59TtD3+WXU6rt6Wdaz3
+623Pze35LWsPqWn/XMfm5wUM1LZ5U/+9c87yOuZf4WVgta0Ho2leFBv3BnZS
+peaczbZebMdjin2lN7AXC1VIc1tPbruz3d3aG1jBtRAj1m29BU+abWrabsf/
+hLPUbPsh5s1tzhq5gak/vmHRuu2f1MXZSxefbGB01zJ/KR6gwd5LneldZRtY
+60Ojrsvb/qtHPPybObSBzTbQ/yjfSwPt6BCBHasbWG1bPPN/ctv+JDhpXeDZ
+xPJI0S9iZGhw7JFowiF8E7t2Ty1tVoIGts/oKzLsNrG4reyFcDEaOOWO/GC+
+uIkprU8vzwrT4MzLgr0d6ZtY6hhBOnZ7fV9vUfrss7aJxTRuRIZx0CDqK+/8
+N94tzIYv5cYhNhrEd81T1OW2sPiMiTs/mLf9/fnGh9FhC/sVs1OkY2v7vFnB
+d6ZXbmGb30tr4qapULklrszQuoX5ipM2gyepUMvE5Og9uoWtj9l2mv+mwkiM
+exeZjQ6XqcBu/be936fvy0iOqdPhtzq/rGt8ocJcKkkjTZ8Of3PD85dzMxUW
+09iOHj1GhycWPl8/+44K6xmTgWVedHim7RZBo4oKO16Uvg9PocMD+Asai7Op
+INKo7k6cp8PryO4j/IFUmMUt8u9s0eFDD2QUe85ToanWY3zHTgJ+hYdv84YX
+Fc6VJ/uuiBHwtgGrmNQTVHiTPXmNZkHA+c5urlViVLC8kfHgSREBL8scSxxl
+ooLkZmUv/2sCnlY22GO62QvLwV8oCQ0E3FUwBUtf7IWnfquZodTt/I80qYSx
+XphwsS52ZqHHO9L5dLuaeuEWtuODqBs9LtGl/rPuRi/Y1QizPbpAjz8IKrAf
+Du4FuYOqR3lC6HFtm9HqBd9eaFM43UG4S4/PI7E3P517Ybdw7cDQW3r87w3j
+MapGL1SuX1zOITPgc6NCLJ6TPfC7qkdWtp0Bt5eUfN2i3wM1ai3Jaf0MuHZK
+iRBVvQcSy6rXdk4w4HFZXIXde3tA+UX6lykGRvzozFW2dP4eCMtw8ytXZcQl
+2AoNHYe7gS/63xvsESPula1BaQjtBm1rliO2Lkw4c7rzkGN+F9ybUvO8OcWM
+/9VSZMrs7gDn43oPCrtYccrL8LeOcm2wc57rMGWNHQ9SZZj9ijeDq8furokd
+3Hh7VselaYTgixdrVGkwD951jWnAu6oc5GJtZh+x8uGy8sUc3TEZkKq33PMn
+jB93gGrdq/IRGKuQSdbApAAePxOmL9uUh51jW5deDRbCN53mGEVjy7fvYUbp
+q5NEfF33g1aYby2mh53/KRpGxgv3PPnPQqsBe319r8C+BQquFnkkKfFrI6b0
+I23fgPtu/NyBmXyCUguWZudNqJwTxvPJ5duv4s8Ym6pR/oqyKJ5scclngq4N
+w1pvFxVuiOJR/zk8lHn7DbsyL5FV/E4MP8APJ7MudGAHPb27PK6J4yXWuV0K
+W53YvzFnzxJ9CXxvBT2vVUk3plixpfzflgQevsU74qDTi/lzLc+tVe7Bnz20
+OJrwkYq9CM7g6Q+VxPeF1A9fDPyO+SrO+wQclMKN1qTJLoQ+7FxgrWDpISn8
+eMqdN6Y7+jDvqlv1k1pSeGpw/7GDXH3YaT0BIU99Kfyd8vGLnLv7MGs7tQb7
+41K4/JcM91r1PkwjPIio7SOF15jJagj59mH0X9ff73gmhcsWDTc39/dhm3yN
+Fw2ypPBShc8VZaN92Jp9AvlGrhQe1FaZ/nSyD5sf2u27ViSF8/q9cg5c7cN+
+LWpTpt5I4eleonkigv3YR+EIv452KdwUf3j80tF+rMnNeBd3txR+bvDI7Cnr
+fuxdAc8HM6oU7kh/OdHEsR+rPZC1q2lACo+G01Ui3v1YseG7D28mpXBVPXNa
+y61+rDAuzn/hnxTeeqbIrjyuH8tvs9p9YE4K39Va1/Y0uR/LODHiX7QihW8O
+7q4MyOjH0p/9t/v3uhSedjBY3Dm/H0sbCWzeQyeNb4nkxh4p7sdSZLUCXBmk
+8TKrgqkDFf3YvQtMwk+ZpXGDiNvmu2v7sf8BbmLwGw==
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145820#6"]& ], 
+      TagBox[{
+        {RGBColor[0.363898, 0.618501, 0.782349], AbsoluteThickness[1.6], 
+         Opacity[1.], LineBox[CompressedData["
+1:eJwV1nc4l+8XB3B7kz0rM5pGtm/cT0JSIitJohCyRVJmkcxCyGhYGRFRtnPj
+80mhZWuYoYySvf0+v7+e6/XHc133dZ/zPvcRv+Rh4kBDRUXVSE1F9f/vjkjz
+kKhnIthEV129rlgJTBxzghvTRbDncXihk6YEyTrzQSsPRfBe31GdzGUl6JfQ
+DpK7L4I34vPHvceUYCf1g0DHKBE8MicsHt2lBBcHB29l3hHBZXwsYpHyypBV
+L3urK0gEf4yXuDIkpgx7A9oDtH1EsG7/9x3qbspw1VIk4IabCF735rH6/FYZ
+SlRcbpReEcFM5hMyadXKoDTP6L/bWgQbTnhKSDOoAOF6zHdNRwRX9+ivpD5R
+AS9jBReXX8J4eX2ruxLUoEI2xPnZiDD+npOXz9qoBitsn5z6vgvjMZ7CxG1O
+dfhvapfTjl5h/GPvzwfmPOoQ9N71it4XYcx04UR2Bb86ND6vdQxsE8Y/hUic
+Sw7qQBfB4lhBFsbv6mLrjV3UIUo7316iRhgfQPiBeYM6fBBbvnyuQhg32M4/
+MGfTAM5t3cv3S4Sx4fnA+GZuDUiuHbXbyhLGW3Pii5lXNCBLSfTi12hhXPHW
+vvUV93/QKchuZiBH+V+LNJGcqQnJfu6Ybp8wLs6W0pcs1gSrrk8HQUIYU5k2
+8hfNa8JQfAK9Er8wXrlO0pc9qQV/GAQrd20KYctTlWGFW1pQZn9Dsm9JCE/t
+x5/26iK41vQ1PmFWCNvHyJvdt0KgJnZk49QkxVdtH+s+Q7AemOnE+FMIN8tG
+HaWpQtDwbaur8YcQDqa+XvppC0GYuu3RW71C2D/UuMCPlQDdlMZilS9CGA9I
+bs/LEsC0KCH8r1UIi+akrJ8zIaDN5E5EEUkIqxcUDWtcJCCudGzOoUEI/xE6
+aVsdRgCfa37b1zIhTDX7I2isnACJ0UOBpFQhvJQl4B4qeBSOfFEbSnEUwttX
+17cYp47CtmzaKRNbITygS3vHa4c2NMWsV7FZCeED4pNXOxW1IWLSek+LqRBO
+25RlVdXThhP6DQ9CDYXwRembX1tctMECjh27qiSE37w0/S3yTRu8ik/nadEI
+4YOD9mdzyccg756961imIHacNolx6tEF9tghLZZUQZzRJ9cRuqAL1+5bc8kl
+COL22Xi+bm490E4xe+MfIYhjFK76yVnowUCODhWbhyBOcp/SYenXAwEslXSY
+EMQbeTtFQ2aOQ+TSz9rgEQH8z0hIq+2wAfxdtY3L+S6Ax/89GVKyNgCLze+2
+73sE8EKZ93ZQqAFI0XXT87QJYKe4jL7OdgPAXGSjvHIBnKuxQ/Sm+0lYOZg7
+2n5HAKusGNIUVZwC58sOrMIyAthFgLPiqI8ROBWe1rMWF8D6mW3pPx4bgeM/
+1dDHIgL43R7hu5UfjMA+mGVZglMAP3hf35PKawy26S9HDqzyY9bHtB6PvYzB
+snO1WrONH1Pf28reVjgD+sfinOw8+LGNiLWxzwcTOB51PTvbmR8r6h81Gp4w
+Ab0vtgNjl/kx85233qG0pqBzUdHMxZIfd+KjUfs1TIG42Yd8jvJj9/xIVbMC
+U1AtlxAI5+HHPRUv/ynHm4G0ZCU5v5IP31s5HPUpwAJyf79ycy/jw4NGVpP3
+My1AqrSET6mID8+FB38ZwxYgqZnnAI/5MOibDXYzngWxsw/pe8L58ABNUtqp
+1LMgFO2jS2vGh9c5jX4ONlsC27wc+cIsL+bb5rfk0T8P0dUH3CQneXGAWVZx
+nPd5YAmR4fs9yovDDquOsWaeB2Z2UYdrvbzY5llaKev8eWCQ4aCPbuDFste1
+hw5mWQPV+WmdqhheHK1V3W3MbgPzTfkk7n282IlLN44p1hb45aBDW5IX90fk
+82/l2IJaeveQ9y5enLG8o4ev3haCfGg2O7h48WsDBYviGVtgkbJWTlzjweSd
+3FuuxnYgEb4jj6edB8+5DGQ37rwEJsf97vJ68GALV93Jb18ug295zEMdZx58
+pKPtc8ify5Aqmp197TIPvnVbxfg4qz0MLH+CrrM8uL5vuvesrj245O9bSSJ4
+cM+nVVe/WnsIZf7hxMfNg/kmUgn80gFK244Z8L/mxjXgK6xecwVMK13J70u4
+cXnR1SzTwSuwlPWQCMznxoc3zfyz6JxAM2BC5Wc6N07RSplaNnKC1r3Rkq/C
+uPEJGZMHF347wWh4x4ahMTcO+POtwVvGBfgJu5fhU1y40spH27PTFaoPRO1X
+H+PCj0pMHjlTuYG1QHnu9AAX3n54rTnnkBtk/6HLMO3gwuvWVzzmI91APjM/
+UryaC68l3H08oO0OJ9b+2tVHcOF3jEyHLUkecKsiiHdRnAv/SZ9k8wnxgspR
+3hWyCBe+t3D9kFy6F8xxF31L5uPCHtE7rbjfeIGTV2+WGjMXthcpcjKd9gJz
+WXmFW7OcuMuuzaDZyhtk84cNaYETf/Y3d41EPjCYrnOXy5oTvzjxkd5lvy8I
+t311GTHnxIHtwfQ5Br5gseZ5utyIEy+Yt8pxXPWFdstMPvNjnDi6uobv2gtf
+qOJbyk7dz4mvUx1QilPwAwlRo1A0twP/ulG/rqp7HcIZ+BbOH9yBZWnN7FyT
+boB2qd/dDrEdOL7oW2F61Q2gsuoTPsG3A2+2/avZ+H4DbhWnH1XZ4sCqtf4G
+FtIB4G0mEc/5mQOX8cc/dqsNANssuf1kHw7Mkpe57vj3JhzRMrCVrWXH3lHn
+FLxDgmBtomg+5yU7bl2meuZUFARVD9jviuSw4zafjL1pPUGgOPa5mCmWHVPv
+spgrORQM+2POro/YsGMVzc60/IFgEPhqn5xCw45raCYuc+aFwJxvcDuVARuO
+LrRMKj4QBqW7GTSCNNnwANM856njYeDeEvN8XZ4N8z7U1+G5HAZTgmlhSwJs
++HTkMbed6WHws7ZCbXqMFefzqiuJsd+GburJnN5QVlyvuEgWXb0NVbFmgSXV
+LPjHlBrt47lw8FP5NnmgmAWnB6T7NvFEgNKgnWXBUxZs7TnEJKAcAaXyHoo5
+d1nweZvshDP+EVDQee/3I3MWfJI54gQP9V1IEwLz8H/MOJ+/tItmZyQE5u6T
+td7HjKvirCXcbkRB2KOxKyW7mHEAxLZ7P46CyNhnz6i4mXF5tkxvQXMUJPkK
+8eWuMWHTzc61FxzRUKjLvDHTxoQjF0upOJ5HQ9/Yr/fB7kx488scu+dwDByW
+znfILmfEvlpeHo5B8aAmbP9k8TkjFrtyco2jMB60OMT6j2cw4uhzpypmu+Ph
+xFLKqek7jDjC4YGNvMB9sH17V1HZghGrFQ3LbXreh1jHK9QtKwy4vrfLUGb/
+A/iVJ505qcmAbe7ziBSXJ8Buifrn1w8zYNv3yz5d7Qlgmmn6ik6GAeeeee4s
+Mp4ADYkhLbs5GTB5CZUxCSVCUsjXfyYj9Pi2uaSbfUgiEFZxerUR9HjD99gL
+LfMkSGVf+hv9iQ4PDykteAsmw8fImDVBEh0unxdh+qKcDLR0kvR5VXS4ToJf
+xNQ0GdzXjITxMzr8WivyU3NcMuhMFOgs+NDh3y/y3M4zpsAsvvDIWpAO0+7O
+jb69nQL618jah+xoseF+0Sc1bGkQ9CdEptGMYuWv4+8U0qDC6QibuT4tpvdS
+YGY8mwZiF8q7b8nR4hevlZ7wZKXBiu4zp/ZNGty6qGfjo5EO+QKBcVfTaLC7
+PV/V9WsZwFir9LWgkxqL1wl+/c3xBI4ozzZotlBj0Qi1wTMaT8D7ZVH2lxpq
+7KTU2//X4QkMZEu4rT6jxpZZfj4f65/AmxhOqhOe1HiXkOF7drWn4GgzvecX
+GzXu67cUvf/3KbylzvGS1qPCtxf0UniuZYFOS5JEvAYVtm2e8syJzoLGmPDO
+ZVkqLBQa5mSUnQV1AleU3wtQ4U1rx635jiywP28219uxDX58oj9uKGbDkXJb
+6stC25D83znGe6vZMHXphuiNvE3w3yjsU03LhfEZq1CD+E3wrDv2W/51Lgz5
+HxkV8d8EG3FxF73PudATt53XcGITWmwKaFsY8qCpJlyWbmYDWsdGb4v55kEa
+d4JmvOIGLO6qXzt29jkYNBWez8VrkKH1gYGkUAB6J3u87jxfA1fj0FEq0wLQ
+7qKOvBy3BiccEwrsrhWAxrhlhbj1GjSs+urEVxbAPhZG9sfLq+AOiksZqBCY
+TC43JMuuwsV1J+0kiyJoGRYRj8xYhizBKu3bT4uhyeW46pXbyxB2fcTR4W0x
+NMx7G+q5LMOFn7W87tPF8Ia+9Qad2jKI0jc5zauVQN4+/46QziXI+nE26HNn
+CUR4dd2+wbIEC2V3e64xlYIOdey4i/8CfPD7/KXQrAyepro9hosLMH51D2e1
+cxmsy5224D2+AK1/uJK+BZXBK5sdb+v5FoD1wlLphYIyEKt7kMtZPg83x5/u
+s9wug02/ZPs3M3NwpUafV+XlK3gz/WSE+vI/mLHi+CckWgHGpQ71CunTMCL1
+z6L1aCXsYdu4IOs2DafG3hzyt6qEtSsJW/vRNLAkPnuo4lMJOaKApEanQNf3
+6sBoTiWsxgk28R+Ygk3FENISUxVkubW9Xa/5DfNtP/KzOqtgYb/CZ/LXcUjx
+un3O0qMG3ke0eDa9GIcTi5kTsvdq4PHIBS4IGoeVo8L+dNk1oJ8WZVIlMQ55
+Z/kbCnpqIJP5Z1ehyxgY9ryqfqdZC3q/kvvj10ahV+VadQ1LHTzK3Rg5JzwM
+IX8dD6ym1YPnpvS0168hOKdR0uP/uh6Om59ZvPdmCBKq6O4NfaqHRbo8xhqT
+IeDrH+hyoGuArHePLZX4B4E6RsFS3bUBuPV0piqWv4GygID4QxWAeSKe801N
+N3yrDMoNPIcha3ZUYtyiG3xqrnK+t8dg/FRNmX++C1xfmxVQe2J4sT18zu9A
+FxwwOvJbPQKDfYNStkpGB6wkXG5rLsOQf73iqvv6RyA53DWVo28EZzeDN56h
+TbAepPMsMrMRNEP1H+9qaYS9yu08/bmNwPVQL6KVrRHwl5v8wiWN4HMj/IW+
+PIBFb5GVe0Mj8Ar6Tb+8UA1qU2NTlwcaoaiwpG/Dswg6Epd1ckWa4LRtu8x7
+yWx0QH2gOyWmCbY4u+7yseehTJZz+rqJTVDS+G3CbikfFa108/x61ATsklPP
+196VoJppuf84njfB+BwdL7/qa4T9ko2GcBN0fOVqlXTHqLXG+eXruSa4nylv
+YM7TjjYH6Igeo2aoeDQCGj/akWmgsN9X82boe5ikLPb8A8IzLdXd55tBPG5F
+bErjE2q3+vm67EoznENDNwmFL0gteNmLOrgZJuXyTXosu9CvVztT2F80AzuX
+GhVN/lf0m5eG7wAVCcR2cNUusH1DCrH3Yg/Qk+Aw+6TvhNc3xCU8GiDFQgIL
+5oyp9v++o8Ca8bfbPCR4TE3Vm/LpB3IM+5pqLUMCwdXRnuSbQ6iNhWql7BQJ
+Cn4XFR/MHkXW5r6avQ9IMHeypKWmaxQdlg/f1/eQBEdKSof1GX6i8c7ZjS+P
+SPDZ+zWfg/NPZH8o1Lz0GQlW1hsCM+XGUMjHNwUCZSTQ4+gw5KgbR1NhjP7x
+H0lw37PrSsbMOPoglrB3dwcJvnb0hO4XnUCKVqdzc7tJ4Jby7bVe2ASaKZFY
+e/ydBEliY7uC9X8ho5NVHzQmSTByeGXmb9dvpOj9tZ+XjgwHH64xBjFMorSi
+GFE5RjL4LW+Is6lNorlgC0ZtFjIw11Fb7E2fRInZ3mVnOMkgr8vaYGs3hTDH
+qZ2CO8kQfHZ33JeZaTR59u9TrcNkeFctln9RdAYF513MHFYiA/dOyaYZ4xmk
+PDDAEqhKhrwhmSXmihn0+vuVg5lHyPDRWcFGO+APqtniUAjTIwOHlkTKOdpZ
+lOoReeu7JRly+qpYrwvPorHz8epDVmTQ8DEKSVKYRdZSEyo/rMngmH/L+dPF
+WSQQ6/+ryZYM9dy9/+nWzaIIvn3DR5zIYFLsVnqpcxalBJdasbiQ4ddxuj0h
+k7MowD+H6stVMvAGKnDUCv5DFcvc7054kMF1InpI3vcfet4USv3blww0YRLm
+p2P+oR6DL2nB18mQurP6/dXsf+jHK3vDHTfIQDoz/irvyz/0J5ZhUegWGUTq
+iPCdsnMo1mmI/XsoGUotelfVdecQA9Wg/H+3yaD3z839rPUc4qSetEq8QwZv
+6fSzCVFzKHLH+VrZu2Rovb+4j2liDhk+kfLiiiGD7YGYx3u25lD2/Ei8WiwZ
+lsgSPMf45pFpcGKOZRwZJNaNNgKPzaOeybTnt++ToerhuGe61Txych5/EPeA
+DKflA8eqvOaRwE12l4QEMtxwKPw4/2QerXBxfb+TRLlvqqPHuCrnERiyefs8
+pNx3Wm+l7Md5lJEj9scqmQyfP9E9c96YR+LT7A94U8mwV+Oiz6DlAtr14fbp
+w+lkaOhanNjwWEBezYXDExSbecRYC99dQLsTPU4lZ5AhJKda1/z1AtLcQ5P1
+I5MM/Mi4xrt9AfWc9rvn95gML/rHZe+PLiB5xe6jTE/I0MvBK9jGtYiOeg/v
+5n9KqUdBYcyvvYsobNOeSKCYRucoNQOxiEYqgg8yPqPUY6DXV/LsIqIaKRq+
+RrHsDfdJwn0RMcw623yjmMRDf9EmfBF98SaeaWSRwaokvfNmxiKaOFSXn0Dx
+rP5h/Ufli6hb2NNnlOKI0Xd1b1oX0WHPxe2D2ZR6hvAFvh1dRPdvucVeo7h0
+5yXNno1FlPZ3PrGcYt3qks0xviWkGt/HNUnxV/P1+kXZJfRoyIdeMIcMHnPH
+g+j1l1C2vIybJsV08UlafHZLaDPN+rgVxY8ODG9JBSyhU1x3E9wpln13CJQS
+l1CunYRhAMXN9gHBOi+WkLFmuW8gxZbULciMspzqa7Ww+FM8k8lDZT+whGJm
+FlhcKA7TsMU+y0tI8923a6YUC/S+CLnNuYz8dKSOK1H8wmeVSNy3jIJ6gkPY
+KCY49aiztZfRkcV80e+U83e/SGh8dX4Z8e2+LJlNscuJwdCma8tIoT8gyo7i
+rbED2h2xy4i9nmwqQHFimD/NSN4yeuAlEUSi3N9eUXLTP1hGP8r9mZwprq/l
+uk3dv4w0LKv/0VFsYmlzjGtuGd03HFBLpdTn1oPlZnmpFbTtN/k9h1JfLlmd
+O4TmCpoUnVfdTXFe630dY4sV1MkgORNH6Y/PtPvJHpErqGDxySULSv84PPUL
+D362gnzjzooXU/pr7UizbnzNCsqJZFVdp/SflJ/125LpFeTqlmUfSOnPau6C
+iAb6VeQkrn6zLI2Sj5eLeh93r6KI94rj3x+Rwf9XXMuM8Sr6eES8UojS7+zh
+3+5uOq8iOTaunQdSyJAlvlef/fYqcu+16VSk5KPdqvHdwder6Aa9j+oBSp7s
+ltnvHfm4iooTgkeFEil5TbQ6cWpiFZW7+Q1tU/Io9mH+/VWhNXSohae9LJ4M
+Pki6rTBwDbEqPrUvjiID03fv6JrkNVTgYpJgcY8MGf5wsvXlGvq5WLdjmTIf
+3pZZtv8eXkNeXh9Xd4WTQVgq+sNevXUkcd8+ljaYDE1Ms5/yODaQfvnE6CEv
+yjzm6Fhmk95AW6Kb510p8+0jb4Woj+YGClgf1sl2o/SrmL8Hct1Aoe3LLmvO
+ZJhTo9rR934Dxel85T99iQzizpynmcM3UXy4x/XoM2SQ9pjz9cjYRJpP1bXP
+GFHeD9+uzO7yTeRkYxC5w5AMaqGpM89GNtHJkKZ7vvpkMH4kFqtBbCH7bKZb
+E1qUefBevv3q+hZqrXtFY7+fkrdP3AtfuLfR+eM+K2UyZIjpXhBR27+N2nOv
+BKxIUfI9XHWV7tw2uhdGs9dDlJK/VYI18802eju0dJqWl5LfpL17JtSoCKmE
+64zv1kkgSlazF1ygIl50Z6t+JFPeX8Lo+f1tKsLqruE37SYSvK1zmGRipSY2
+aCzuljaQwLUiwXNVnJqwqGOlul5Jgqrs6VtfjaiJLOJHQWk+CUzCnj7MKKIm
+6OoHM/vukeAOYmoRu0xD3MscX2E+ToKztbtZHrnTEDdtDhdma5Ngv6qyIVcA
+DZGYerRARYvyvste6qR+QEMkp0ek6SuTYNfuusGRBhoiVT8jfqckCd5seKzk
+CNMSl1b4qO9uNsOv6t59+zpoCb5DpBr/4maoVXmfkDZASzx1DE/79LwZ4spr
+1lmnaAnL9a6t3VnNoFic+eEPLR2hrb3P/nlyMwQ9vexVoUxHlIv9Zb1I2X94
+7v6tQo/oiIttE/JulH1Ky4xR38KWnngtt+O12GQTJP5Rcbz9h4E44RXV8oml
+CXaLzdOIrTEQW/OteJy2CQrPvHxSR89IcDe+ElvZoOyNFTL9izsZCTcuc0mW
+v40wHSB4yukkIxGhqpEx1dEIeoxrCob5jITiGZPs548aYUW0fpP/EhPRkiTl
+u1uyEWzOHHtY2M1MXPCa+/1dGgPrwo7/RNbZiP8eaa1LxdaCncOu7ikmTiIt
+hZ9ItX4DH64wR5Te4CLygu1d6/aVwf4o87lHzDyEqsjsZ9L1PEg5ttL7O4iX
+WHeOqlzffAjMAgZZg9N8RGxmPK9SrTFyZdmQWbshQMzmyZ3MuJmGBpPoZG5O
+CxIksSvqB48WoGPIbVgsSJhYyvG+2qFQjipDDvIdWhQh7tVH5u6+UI3kv6cd
+GrTfRVj7X/RJ9wCUdtaZ+s38biJg9B/bcfpmxKJ8/PmqohghZeh55I/IW4Q+
+3isq3BQjnGM4Oid836PrC5JZJc3ihGDr9UyOxnak6ujc7XBLgojdv3KJp+sT
++jth4/hSR5L4l7FH/FfSFyT3elvxxbYkEVdjtxoj2Ym8d6zMr7+RIgRctOM8
+CrtQ8Y2nXAOBewgTi4KlhyY9yFNu4aqPqjShFz+u7jzQi1yv1fGXakgTNa8M
+ao3HepFz9Z3GaU1pgndbQVNtuhddOsYn4KgjTZi+jdBmXOtFZmdVmizPSBO0
+OodNc/n6kHqwv6DWVWlCf2QgevhUH6L5tEFieiJNLGojc6vaPrTFQ/bQzZIm
+EtPujh1t6kPrlrHCYbnSxLbwf3773vehhZFdnutF0oTRz6HUlZ4+NL6kJfKn
+SproXuEdTZ7rQ627Q706O6SJtqexUZ37+tHbyyd2cvZIE8oj6uK18v2oOZ+r
+5VS/NOG7rVeVpdqP6g5n7Xw7KE38vBA64aXbj0r0mluqpqUJ9y4HA067flQY
+He29+FeasBNg+rl8pR89/2y66/C8NKHlyRA06N6Pnlr99C5alSbmufnKS271
+o8wnL3b92pAmclSkTiff7kdpP6+9k6KSIUSlYn8HRvWj5H2aPna0MkScgVG4
+w4N+lOhOv/sxgwyxT9hF3DC1H/0PMlt+Yg==
+          "]]}},
+       Annotation[#, "Charting`Private`Tag$145820#7"]& ]}}, {}, {}}},
+  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
+  Axes->{True, True},
+  AxesLabel->{None, None},
+  AxesOrigin->{-6.815651875262375, -0.5059214775009321},
+  DisplayFunction->Identity,
+  Frame->{{False, False}, {False, False}},
+  FrameLabel->{{None, None}, {None, None}},
+  FrameTicks->{{
+     Charting`ScaledTicks[{Log, Exp}], 
+     Charting`ScaledFrameTicks[{Log, Exp}]}, {
+     Charting`ScaledTicks[{Log, Exp}], 
+     Charting`ScaledFrameTicks[{Log, Exp}]}},
+  GridLines->{None, None},
+  GridLinesStyle->Directive[
+    GrayLevel[0.5, 0.4]],
+  ImagePadding->All,
+  Method->{"CoordinatesToolOptions" -> {"DisplayFunction" -> ({
+        (Exp[#]& )[
+         Part[#, 1]], 
+        (Exp[#]& )[
+         Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+        (Exp[#]& )[
+         Part[#, 1]], 
+        (Exp[#]& )[
+         Part[#, 2]]}& )}},
+  PlotRange->NCache[{{-6.907755278982137, 
+      Log[100000]}, {-0.5108256237659907, 
+     0.47000362924573563`}}, {{-6.907755278982137, 
+    11.512925464970229`}, {-0.5108256237659907, 0.47000362924573563`}}],
+  PlotRangeClipping->True,
+  PlotRangePadding->{{0, 0}, {0, 0}},
+  Ticks->FrontEndValueCache[{
+     Charting`ScaledTicks[{Log, Exp}], 
+     Charting`ScaledTicks[{Log, Exp}]}, {{{-4.605170185988091, 
+       FormBox["0.01`", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {0., 
+       FormBox["1", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {4.605170185988092, 
+       FormBox["100", TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {9.210340371976184, 
+       FormBox[
+        TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox],
+         TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-2.3025850929940455`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {2.302585092994046, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {6.907755278982137, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {11.512925464970229`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {13.815510557964274`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}}, {{-0.5108256237659907, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"0.6\"", 0.6, AutoDelete -> True], NumberForm[#, {
+           DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-0.2231435513142097, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"0.8\"", 0.8, AutoDelete -> True], NumberForm[#, {
+           DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {0., 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"1.0\"", 1., AutoDelete -> True], 
+         NumberForm[#, {
+           DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {0.1823215567939546, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"1.2\"", 1.2, AutoDelete -> True], NumberForm[#, {
+           DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {0.3364722366212129, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"1.4\"", 1.4, AutoDelete -> True], NumberForm[#, {
+           DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {0.47000362924573563`, 
+       FormBox[
+        TagBox[
+         InterpretationBox["\"1.6\"", 1.6, AutoDelete -> True], NumberForm[#, {
+           DirectedInfinity[1], 1.}]& ], TraditionalForm], {0.01, 0.}, {
+        AbsoluteThickness[0.1]}}, {-0.916290731874155, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.7985076962177716, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.6931471805599453, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.5978370007556204, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.4307829160924542, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.35667494393873245`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.2876820724517809, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.16251892949777494`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.10536051565782628`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {-0.05129329438755058, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.04879016416943205, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.09531017980432493, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.13976194237515863`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.22314355131420976`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.26236426446749106`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.30010459245033816`, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.371563556432483, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.4054651081081644, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}, {0.4382549309311553, 
+       FormBox[
+        InterpretationBox[
+         StyleBox[
+          
+          GraphicsBox[{}, ImageSize -> {0., 0.}, BaselinePosition -> 
+           Baseline], "CacheGraphics" -> False], 
+         Spacer[{0., 0.}], Selectable -> False], TraditionalForm], {0.005, 
+       0.}, {
+        AbsoluteThickness[0.1]}}}}]]], "Output",
+ CellChangeTimes->{
+  3.712415031740975*^9, {3.712415138403935*^9, 3.712415175020652*^9}, 
+   3.7124152439213333`*^9, {3.712418453634082*^9, 3.712418504143734*^9}, 
+   3.712418855593092*^9, 3.712419043605371*^9, 3.7124191618062687`*^9, 
+   3.712419212697241*^9, 3.712419927383946*^9, 3.712420000758985*^9, 
+   3.7124200325912943`*^9, 3.712420189541621*^9, 3.712420280001046*^9, {
+   3.712420458514633*^9, 3.7124204717540607`*^9}, 3.712420567375518*^9, 
+   3.712444350250976*^9, 3.712445574685938*^9, 3.712445794287002*^9, 
+   3.712446099572846*^9, {3.712447221707871*^9, 3.712447229436884*^9}, {
+   3.71244730031251*^9, 3.7124473085450153`*^9}, {3.7124473457371597`*^9, 
+   3.7124473741804857`*^9}},ExpressionUUID->"125886ae-c39d-4cc4-92b3-\
+b120cb36e3d2"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"D", "[", 
+  RowBox[{
+   RowBox[{"Sum", "[", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"a", "[", "n", "]"}], 
+      SuperscriptBox["x", "n"]}], ",", 
+     RowBox[{"{", 
+      RowBox[{"n", ",", "0", ",", "8"}], "}"}]}], "]"}], ",", 
+   RowBox[{"{", 
+    RowBox[{"x", ",", "2"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.712444143356751*^9, 
+  3.712444169012451*^9}},ExpressionUUID->"db4fa37b-3e24-42d3-9003-\
+39346bf27b53"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"2", " ", 
+   RowBox[{"a", "[", "2", "]"}]}], "+", 
+  RowBox[{"6", " ", "x", " ", 
+   RowBox[{"a", "[", "3", "]"}]}], "+", 
+  RowBox[{"12", " ", 
+   SuperscriptBox["x", "2"], " ", 
+   RowBox[{"a", "[", "4", "]"}]}], "+", 
+  RowBox[{"20", " ", 
+   SuperscriptBox["x", "3"], " ", 
+   RowBox[{"a", "[", "5", "]"}]}], "+", 
+  RowBox[{"30", " ", 
+   SuperscriptBox["x", "4"], " ", 
+   RowBox[{"a", "[", "6", "]"}]}], "+", 
+  RowBox[{"42", " ", 
+   SuperscriptBox["x", "5"], " ", 
+   RowBox[{"a", "[", "7", "]"}]}], "+", 
+  RowBox[{"56", " ", 
+   SuperscriptBox["x", "6"], " ", 
+   RowBox[{"a", "[", "8", "]"}]}]}]], "Output",
+ CellChangeTimes->{
+  3.712444169267357*^9},ExpressionUUID->"5eb74cdd-7c7e-4c1d-bf32-\
+5ff5e487d8bb"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"1", "/", 
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{"2", "+", "#"}], ")"}], 
+      RowBox[{"(", 
+       RowBox[{"1", "+", "#"}], ")"}]}], ")"}]}], "&"}], "/@", 
+  RowBox[{"(", 
+   RowBox[{
+    RowBox[{"Range", "[", "10", "]"}], "-", "1"}], ")"}]}]], "Input",
+ CellChangeTimes->{{3.7124442230038157`*^9, 
+  3.712444245997406*^9}},ExpressionUUID->"32e58bf6-54b9-4c50-ac70-\
+0522b591a2f1"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox["1", "2"], ",", 
+   FractionBox["1", "6"], ",", 
+   FractionBox["1", "12"], ",", 
+   FractionBox["1", "20"], ",", 
+   FractionBox["1", "30"], ",", 
+   FractionBox["1", "42"], ",", 
+   FractionBox["1", "56"], ",", 
+   FractionBox["1", "72"], ",", 
+   FractionBox["1", "90"], ",", 
+   FractionBox["1", "110"]}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.712444246292817*^9},ExpressionUUID->"877b4ec1-6f85-4691-bbce-\
+4a4af337e93d"]
+}, Open  ]]
+},
+WindowSize->{614, 512},
+WindowMargins->{{18, Automatic}, {Automatic, 18}},
+FrontEndVersion->"11.1 for Linux x86 (64-bit) (March 13, 2017)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[560, 20, 430, 10, 77, "Input", "ExpressionUUID" -> \
+"453b2247-e031-4ce0-942e-333cafb9d8bf"],
+Cell[993, 32, 916, 25, 82, "Input", "ExpressionUUID" -> \
+"8520f7d9-58a8-45e4-8f09-0593a7effe0b"],
+Cell[1912, 59, 1380, 29, 147, "Input", "ExpressionUUID" -> \
+"5438519c-7952-4225-a1e4-2658de13ea79"],
+Cell[3295, 90, 363, 10, 50, "Input", "ExpressionUUID" -> \
+"d44f3e47-dc47-446a-9531-356bd4f683cd"],
+Cell[3661, 102, 742, 17, 101, "Input", "ExpressionUUID" -> \
+"9c43836c-5224-4a7f-b325-f696ee8f0277"],
+Cell[4406, 121, 728, 18, 79, "Input", "ExpressionUUID" -> \
+"a43d9214-a29f-42c0-be11-b311bd30fcba"],
+Cell[5137, 141, 986, 26, 82, "Input", "ExpressionUUID" -> \
+"6084435f-1cba-48f5-b83b-776c8904b43e"],
+Cell[6126, 169, 1139, 26, 37, "Input", "ExpressionUUID" -> \
+"8012ae8b-f509-4055-88d8-6ab9179c5d6b"],
+Cell[7268, 197, 422, 13, 34, "Input", "ExpressionUUID" -> \
+"9d6df2e9-b392-44e3-8d2d-0d2fbd39108b"],
+Cell[7693, 212, 1223, 30, 62, "Input", "ExpressionUUID" -> \
+"fe4cc6eb-7a17-4492-88c6-d064203dafb1"],
+Cell[8919, 244, 618, 19, 50, "Input", "ExpressionUUID" -> \
+"1f83e486-383e-46ee-b0f8-0bcc636d076a"],
+Cell[9540, 265, 547, 15, 34, "Input", "ExpressionUUID" -> \
+"a7a65e56-b6ca-40ec-81b9-c85c27760d23"],
+Cell[10090, 282, 1178, 34, 113, "Input", "ExpressionUUID" -> \
+"09618fc2-355f-4b7a-bdc9-8e7737cc6527"],
+Cell[11271, 318, 537, 16, 56, "Input", "ExpressionUUID" -> \
+"3c937161-0a6e-438d-af4f-3dd66630fd12"],
+Cell[11811, 336, 1488, 31, 57, "Input", "ExpressionUUID" -> \
+"735d5501-1f21-45bd-8ed0-f6cf093305c2"],
+Cell[13302, 369, 3073, 57, 58, "Input", "ExpressionUUID" -> \
+"3cc7a352-8e74-40d2-a8dc-c80eb20715ce"],
+Cell[16378, 428, 2315, 46, 102, "Input", "ExpressionUUID" -> \
+"e24f4a68-986e-4066-a581-a6f6c7f2d0d4"],
+Cell[18696, 476, 2021, 39, 80, "Input", "ExpressionUUID" -> \
+"a56bfbaf-960b-4015-a85c-09cf0b8bfac6"],
+Cell[20720, 517, 4842, 102, 240, "Input", "ExpressionUUID" -> \
+"92da139b-a52d-4447-9324-99e506e4eec1"],
+Cell[25565, 621, 3426, 58, 102, "Input", "ExpressionUUID" -> \
+"d1c2ab88-8346-4b96-8358-7032ddc9b592"],
+Cell[28994, 681, 1890, 33, 55, "Input", "ExpressionUUID" -> \
+"8ba3b735-f852-4740-89e2-f8c994bad666"],
+Cell[CellGroupData[{
+Cell[30909, 718, 1208, 25, 34, "Input", "ExpressionUUID" -> \
+"75b34247-c730-423b-886d-59f5cb6deb5a"],
+Cell[32120, 745, 763, 14, 59, "Message", "ExpressionUUID" -> \
+"c9598ffe-1b6f-4d29-a03f-f11061c66e05"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[32920, 764, 947, 26, 79, "Input", "ExpressionUUID" -> \
+"6dea207c-d325-4f70-83ed-c79db3de75a8"],
+Cell[33870, 792, 5344, 86, 80, "Output", "ExpressionUUID" -> \
+"f96cb453-4aad-4678-95fd-d5b0d301ffe9"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[39251, 883, 3354, 85, 252, "Input", "ExpressionUUID" -> \
+"e92029ad-cc6c-439d-99f4-348213864b01"],
+Cell[42608, 970, 53194, 1042, 328, "Output", "ExpressionUUID" -> \
+"6f9af633-d5dd-428f-99bd-2f26d8eaaec3"]
+}, Open  ]],
+Cell[95817, 2015, 1372, 30, 60, "Input", "ExpressionUUID" -> \
+"533b82f3-0063-4115-96b4-8433fa98f775"],
+Cell[97192, 2047, 964, 22, 37, "Input", "ExpressionUUID" -> \
+"48cb4fd6-ae15-4151-b7ab-6b86437dacba"],
+Cell[98159, 2071, 1001, 15, 32, "Input", "ExpressionUUID" -> \
+"63a9f987-b95a-4687-8447-f3daac286a24"],
+Cell[99163, 2088, 5497, 96, 159, "Input", "ExpressionUUID" -> \
+"f7c504d9-50bd-4d15-bccd-8271b18ceb07"],
+Cell[CellGroupData[{
+Cell[104685, 2188, 841, 23, 79, "Input", "ExpressionUUID" -> \
+"9934911f-d265-4bb4-a635-816005c56a60"],
+Cell[105529, 2213, 432, 12, 51, "Output", "ExpressionUUID" -> \
+"93180487-1da3-4064-a645-15b9034144b9"]
+}, Open  ]],
+Cell[105976, 2228, 5267, 83, 126, "Input", "ExpressionUUID" -> \
+"6459e03e-49ac-4247-9e9a-b1bb9f5d89de"],
+Cell[CellGroupData[{
+Cell[111268, 2315, 304, 5, 32, "Input", "ExpressionUUID" -> \
+"d4269174-d0d4-40b4-ac28-93abba4c0d9e"],
+Cell[111575, 2322, 1182, 25, 50, "Output", "ExpressionUUID" -> \
+"02dfe6be-0c13-4b56-8b62-675c294111aa"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[112794, 2352, 4586, 88, 162, "Input", "ExpressionUUID" -> \
+"2c5824e4-f401-4979-a7d0-d150d63fc2a4"],
+Cell[117383, 2442, 27178, 459, 325, "Output", "ExpressionUUID" -> \
+"dde3e3a9-0cb5-4b7f-ab70-3c49ca3d7d6e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[144598, 2906, 255, 5, 32, "Input", "ExpressionUUID" -> \
+"f184ef37-afc5-434f-aea8-ffddfcc7f01c"],
+Cell[144856, 2913, 808, 14, 32, "Output", "ExpressionUUID" -> \
+"4098e4d4-0560-4547-be30-aace734c4987"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[145701, 2932, 3878, 100, 321, "Input", "ExpressionUUID" -> \
+"318a2176-9af8-4eb2-a44a-805d59a407c0"],
+Cell[149582, 3034, 23850, 584, 234, "Output", "ExpressionUUID" -> \
+"89b54540-039e-4ccb-82c9-59f2f46d6fbd"]
+}, Open  ]],
+Cell[173447, 3621, 1991, 46, 109, "Input", "ExpressionUUID" -> \
+"a7e36aee-5801-4c8e-885d-815ca16b84cc"],
+Cell[175441, 3669, 985, 31, 87, "Input", "ExpressionUUID" -> \
+"7116efe8-b6e5-49e6-b4ba-7c07f19c62de"],
+Cell[176429, 3702, 1075, 32, 88, "Input", "ExpressionUUID" -> \
+"95f0b7c3-c6ed-4f85-9a9a-7590deda5a4d"],
+Cell[177507, 3736, 996, 29, 64, "Input", "ExpressionUUID" -> \
+"1d4c4e9a-cb5e-4a15-af2b-359acec88a18"],
+Cell[CellGroupData[{
+Cell[178528, 3769, 3813, 98, 218, "Input", "ExpressionUUID" -> \
+"8edb02fc-298a-459c-b821-fc7cafdf4d12"],
+Cell[182344, 3869, 75961, 1365, 249, "Output", "ExpressionUUID" -> \
+"125886ae-c39d-4cc4-92b3-b120cb36e3d2"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[258342, 5239, 452, 14, 37, "Input", "ExpressionUUID" -> \
+"db4fa37b-3e24-42d3-9003-39346bf27b53"],
+Cell[258797, 5255, 756, 23, 32, "Output", "ExpressionUUID" -> \
+"5eb74cdd-7c7e-4c1d-bf32-5ff5e487d8bb"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[259590, 5283, 458, 15, 32, "Input", "ExpressionUUID" -> \
+"32e58bf6-54b9-4c50-ac70-0522b591a2f1"],
+Cell[260051, 5300, 484, 15, 50, "Output", "ExpressionUUID" -> \
+"877b4ec1-6f85-4691-bbce-4a4af337e93d"]
+}, Open  ]]
+}
+]
+*)
+