From 86302ed839cc3e783e68fe5177ac41496e5db145 Mon Sep 17 00:00:00 2001
From: Jaron Kent-Dobias <jaron@kent-dobias.com>
Date: Thu, 15 Apr 2021 11:30:51 +0200
Subject: Changes.

---
 new_schofield.nb | 5052 ++++++++++++++++++++++++++++++++++++------------------
 schofield.wl     |    4 +-
 2 files changed, 3371 insertions(+), 1685 deletions(-)

diff --git a/new_schofield.nb b/new_schofield.nb
index 86da5b9..620abc1 100644
--- a/new_schofield.nb
+++ b/new_schofield.nb
@@ -10,10 +10,10 @@
 NotebookFileLineBreakTest
 NotebookFileLineBreakTest
 NotebookDataPosition[       158,          7]
-NotebookDataLength[   2809057,      54906]
-NotebookOptionsPosition[   2787544,      54562]
-NotebookOutlinePosition[   2787944,      54578]
-CellTagsIndexPosition[   2787901,      54575]
+NotebookDataLength[   2915702,      56592]
+NotebookOptionsPosition[   2894006,      56249]
+NotebookOutlinePosition[   2894400,      56265]
+CellTagsIndexPosition[   2894357,      56262]
 WindowFrame->Normal*)
 
 (* Beginning of Notebook Content *)
@@ -25,8 +25,7 @@ Cell[BoxData[
  CellChangeTimes->{{3.817548726786456*^9, 3.817548838429791*^9}, {
   3.817579586526174*^9, 3.817579588547625*^9}, {3.8176251109891653`*^9, 
   3.817625112168749*^9}, {3.8176254615736647`*^9, 3.817625462650483*^9}},
- CellLabel->
-  "In[769]:=",ExpressionUUID->"e595a667-7f25-4f98-9f12-a321a236d113"],
+ CellLabel->"In[1]:=",ExpressionUUID->"e595a667-7f25-4f98-9f12-a321a236d113"],
 
 Cell[CellGroupData[{
 
@@ -37,15 +36,16 @@ ec66b9fbf698"],
 
 Cell[BoxData[{
  RowBox[{
-  RowBox[{"F1", "=", "RF"}], ";"}], "\[IndentingNewLine]", 
+  RowBox[{"F1", "=", 
+   RowBox[{"RF", "[", "1", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"h1", "=", 
-   RowBox[{"h", "[", "0", "]"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{"h", "[", "2", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"eq1", "=", 
    RowBox[{
     RowBox[{"eq", "[", 
-     RowBox[{"F1", ",", "h1"}], "]"}], "[", "2", "]"}]}], ";"}]}], "Input",
+     RowBox[{"F1", ",", "h1"}], "]"}], "[", "4", "]"}]}], ";"}]}], "Input",
  CellChangeTimes->{
   3.817563268660089*^9, {3.817563829122241*^9, 3.817563846550528*^9}, {
    3.817563950998456*^9, 3.817563956525237*^9}, {3.8175645239988813`*^9, 
@@ -94,9 +94,9 @@ Cell[BoxData[{
    3.827406370961958*^9}, {3.827406701976047*^9, 3.827406704095851*^9}, {
    3.8274067687212753`*^9, 3.8274067707292433`*^9}, {3.8274069422923*^9, 
    3.827406944748127*^9}, {3.8274072211131983`*^9, 3.827407222169073*^9}, {
-   3.827407319595125*^9, 3.8274073211146317`*^9}},
- CellLabel->
-  "In[777]:=",ExpressionUUID->"c239eacb-bd0a-49ce-8667-3aa72e4020c9"],
+   3.827407319595125*^9, 3.8274073211146317`*^9}, {3.827409287336087*^9, 
+   3.827409290872624*^9}, {3.8274098320522213`*^9, 3.8274098381365843`*^9}},
+ CellLabel->"In[2]:=",ExpressionUUID->"c239eacb-bd0a-49ce-8667-3aa72e4020c9"],
 
 Cell[CellGroupData[{
 
@@ -113,8 +113,11 @@ Cell[BoxData[
       RowBox[{"B", "\[Rule]", 
        RowBox[{"RandomReal", "[", "]"}]}]}], "}"}], ",", 
     RowBox[{"{", 
-     RowBox[{"AH", ",", "AL", ",", "AM"}], "}"}], ",", "1"}], 
-   "]"}]}]], "Input",
+     RowBox[{"AH", ",", "AL", ",", 
+      RowBox[{"A", "[", "0", "]"}], ",", 
+      RowBox[{"A", "[", "1", "]"}], ",", 
+      RowBox[{"gC", "[", "1", "]"}], ",", 
+      RowBox[{"gC", "[", "2", "]"}]}], "}"}], ",", "1"}], "]"}]}]], "Input",
  CellChangeTimes->{{3.8175612726329412`*^9, 3.81756128486736*^9}, {
    3.8175614038617268`*^9, 3.817561415404965*^9}, {3.817561511096093*^9, 
    3.817561563944231*^9}, {3.81756250196518*^9, 3.817562507914916*^9}, {
@@ -180,34 +183,30 @@ Cell[BoxData[
    3.8274067728096743`*^9, 3.827406788913322*^9}, {3.827406948837386*^9, 
    3.827406958716473*^9}, {3.827407127680643*^9, 3.827407128079562*^9}, {
    3.827407228409534*^9, 3.82740723008123*^9}, {3.827407323371593*^9, 
-   3.827407323515147*^9}},
- CellLabel->
-  "In[786]:=",ExpressionUUID->"3d566693-1b4e-4bc5-b33b-b8036e1e4822"],
-
-Cell[BoxData[
- TemplateBox[{
-  "FindRoot", "cvmit", 
-   "\"Failed to converge to the requested accuracy or precision within \\!\\(\
-\\*RowBox[{\\\"10000\\\"}]\\) iterations.\"", 2, 786, 488, 
-   31545628048664738478, "Local"},
-  "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.827407395251296*^9},
- CellLabel->
-  "During evaluation of \
-In[786]:=",ExpressionUUID->"1c182b96-c1c8-47e1-acd1-78c085fad78c"],
+   3.827407323515147*^9}, {3.82740930147158*^9, 3.827409310035211*^9}, {
+   3.827409841331037*^9, 3.827409844391388*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"3d566693-1b4e-4bc5-b33b-b8036e1e4822"],
 
 Cell[BoxData[
  RowBox[{"{", 
   RowBox[{
-   RowBox[{"\[Theta]c", "\[Rule]", "11.234871044550745`"}], ",", 
-   RowBox[{"\[Theta]0", "\[Rule]", "0.20442292308093693`"}], ",", 
-   RowBox[{"B", "\[Rule]", 
-    RowBox[{"-", "0.19962954578726677`"}]}], ",", 
+   RowBox[{"\[Theta]c", "\[Rule]", "1.2494108745616666`"}], ",", 
+   RowBox[{"\[Theta]0", "\[Rule]", "0.19818543306206707`"}], ",", 
+   RowBox[{"B", "\[Rule]", "6.5604388016784085`"}], ",", 
    RowBox[{"AH", "\[Rule]", 
-    RowBox[{"-", "3.8659484808143287`"}]}], ",", 
+    RowBox[{"-", "0.16244159504741973`"}]}], ",", 
    RowBox[{"AL", "\[Rule]", 
-    RowBox[{"-", "1006.1980163793688`"}]}], ",", 
-   RowBox[{"AM", "\[Rule]", "201.63822725231765`"}]}], "}"}]], "Output",
+    RowBox[{"-", "0.00883146154580277`"}]}], ",", 
+   RowBox[{
+    RowBox[{"A", "[", "0", "]"}], "\[Rule]", "1.5280505211841284`"}], ",", 
+   RowBox[{
+    RowBox[{"A", "[", "1", "]"}], "\[Rule]", "0.41781003779336234`"}], ",", 
+   RowBox[{
+    RowBox[{"gC", "[", "1", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.0383105704226548`"}]}], ",", 
+   RowBox[{
+    RowBox[{"gC", "[", "2", "]"}], "\[Rule]", "0.007859622154113684`"}]}], 
+  "}"}]], "Output",
  CellChangeTimes->{
   3.817561286441853*^9, 3.817561420490069*^9, 3.817561452135456*^9, {
    3.817561512454604*^9, 3.817561517595207*^9}, 3.817561585719215*^9, 
@@ -313,9 +312,9 @@ Cell[BoxData[
    3.8274065351100483`*^9, 3.82740663642057*^9}, {3.827406686433227*^9, 
    3.8274068385420847`*^9}, {3.827406871815476*^9, 3.82740687874862*^9}, {
    3.82740693712918*^9, 3.8274073339286118`*^9}, {3.827407384652878*^9, 
-   3.8274073952582073`*^9}},
- CellLabel->
-  "Out[786]=",ExpressionUUID->"83666f30-49e7-43b4-80f6-e48366afbcad"]
+   3.8274073952582073`*^9}, {3.8274094713815203`*^9, 3.827409485867508*^9}, 
+   3.8274095359429293`*^9, 3.827409877056613*^9},
+ CellLabel->"Out[5]=",ExpressionUUID->"ce03c573-ca33-401b-90ba-5bd25d99354f"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -360,21 +359,21 @@ Cell[BoxData[
    3.826689557772312*^9}, {3.826704552638647*^9, 3.826704584318801*^9}, {
    3.8274034730303087`*^9, 3.8274034795895233`*^9}, {3.827405094243422*^9, 
    3.8274051038912973`*^9}},
- CellLabel->
-  "In[783]:=",ExpressionUUID->"d41a0bd7-fcf9-49ad-ab2c-6c1fb49d80e4"],
+ CellLabel->"In[6]:=",ExpressionUUID->"d41a0bd7-fcf9-49ad-ab2c-6c1fb49d80e4"],
 
 Cell[BoxData[
  TemplateBox[{
   "General", "munfl", 
    "\"\\!\\(\\*RowBox[{\\\"Exp\\\", \\\"[\\\", RowBox[{\\\"-\\\", \
-\\\"100192.92231710025`\\\"}], \\\"]\\\"}]\\) is too small to represent as a \
-normalized machine number; precision may be lost.\"", 2, 783, 487, 
-   31545628048664738478, "Local"},
+\\\"2994.0294304100676`\\\"}], \\\"]\\\"}]\\) is too small to represent as a \
+normalized machine number; precision may be lost.\"", 2, 6, 1, 
+   25083312901620948025, "Local"},
   "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.82740733615094*^9},
+ CellChangeTimes->{3.82740733615094*^9, 3.827409571600717*^9, 
+  3.827409881907219*^9},
  CellLabel->
   "During evaluation of \
-In[783]:=",ExpressionUUID->"ced7d64b-20bc-42c3-b577-c706eee45834"],
+In[6]:=",ExpressionUUID->"d6bda865-5990-40b2-a51c-720a0d22ec73"],
 
 Cell[BoxData[
  GraphicsBox[{{}, {InsetBox[
@@ -382,164 +381,163 @@ Cell[BoxData[
         TagBox[
          {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
           Opacity[1.], LineBox[CompressedData["
-1:eJwt2Xk0VP//B3BrWpSlIqIkiQhpQ3gN2Upoo4XKUtpkKR9JRUmKpE0lS0JZ
-UkIRoteUVEpSJCTZ97kXY+bODMPv/s75/jXnceY9c+59vZ+v1/uec5d4+m0/
-JCYiIvJFVETk/z+tlXO0n2yXYL5o/2+lx69rb3fOWW4Y6CTB5B+JXaQVfhQ9
-xdJNNm6RYM7MkxtlnT2DFwYS7NutJZjSrMKJGr8oLCuNPqFqLMH04/AOvN/1
-AA1dj+XfXSzB3DRdx7xleTaqJWkbRw6JM3MWqG2687kYx1Wz7A5HijPlXM3l
-BmZ9xsGbdt7jWWJMdfO9e++c+I1KW0xaNjSLMpVlFv00cGzDvMpxBbnfosy2
-qmdQv78NbaF8W0+dKNP0iKPtCb82/M+Q8enmN1FmZYyu7oWbbfhjgU1BN1OU
-uV5N4oL2zzaM6t529UamKJOqSmZd29GO/NCjazoDRZme7EPVSY4d2JQfHxMt
-I8qcGkmhnDW7ULdkp8xCaVHmX5N/DSlru/ACU/Z2znRR5taL0yVbrbpQ6/vV
-+9WiokyZL5d3rffqwuCh4LQ5YyLM2480FPendOGC5XuKbzeKMNfPeSsbOr8b
-XZKUuhJSRZgNWwuPL+B3Y11kwoac1SLM8Xj3lyYPe9Gu7rVfkIEIc8dskcKG
-7F4sW/wr3WIlvf5uz8yjhb2YUSwj3agpwhxZZPjGv7oXQwYiWiSURZi1BV5e
-0oJeXOLod36/iAhz7eDasKAdfdi64mro0oQpjCHeblk61YefK973lNyZwv8+
-GV+/PqMfC9yEjluvT6HHLesDxNx+vBx7cvH5C1PIWl2Cd7T6UXfUjdngPYVj
-O/MzT2zrx5CSVWLRq6ewVnaAeSC1H+fb/bk8XD2JtfjkwmaTAQyemBkqrJzE
-L2l/w7daDWBLnknQTJzE7LKkEnvHAXyslOCtkT+Jt7/51yzxHEDDwd22u+9O
-4icyv2lL1AA6xjZMZ+6bxPLbj+Mf/RrAyPof124QQny+Ifezk/cgDlwVjUjq
-FeJZ1755on6D6GC26lx2mxBdgnI6M08P4ryMmz4VP4VY8CtGvuHqIKaddnKg
-ioSY/VHIf/V0EFH525wDYULMrHksFzY0iDz3z7f0ZIVYcuBYoPORIcwL+Tru
-OkOIumVzXB74DeGRuJpDUWJCHCH8vOuChrDxU71x19gEKlNpKisuD2GJXnv7
-g6YJvO3nudgzdQhDJvirJNMnMJMQhk/+HsLx+zo//6ydQM9b+/t4Zix8la9n
-OkN/AoVzKpWkrFjo83VVxjqtCbRyL6mYtZmFLZPrQ24pT2BE8uVonjMLyw5Z
-qdtOjeMp940a7idYeG71vpMFn8cxkTPz+tEEFk7WxMpHuY6jWNXFPf+xWMg7
-ufOfjvM4tr6qdhcfZeGogvKzGsdxXMhM2RfFZWHP/ifW8yzHUdHVFc5PsbCG
-eBOcokWvfxH3W0KOwIdz+lsLOQJ8buI/GWdIYHxBbs5uUoBbk3rN09cReNsl
-MHi8T4DdRX9uZ5sQGPlwSs6iRUDvw+tzDy0J9NVTsK5+L8DaxMwY7e0Emjtu
-zOm4IcCnkjWMj34EGo1OD74cJcCNQW8euJwi0PBejZXWJQEeNFbW+BdEoGbr
-ntYTQQJ88DervvE8gXN8/eX4brSfBjX5XiOw9XryaZkVApQsXzN/+RMCG1d5
-WRUsFeCnX+2HNmQR+POXlpyzqgBTm8ck7XII/Kj66mmCrACnfa/asDmfwNzn
-X/4uo/ho75dYMFpGYNg3aqPpBz7Wss38f/0kcDSm4JFzOR+3nA4JyPxFoPeW
-E0LfIj6K3Dlwzb+RQMevHUWpWXz8I3wh3/eXwEVV37SlrvNR8jqjwKePrs/V
-q5FqkXxsL49/Qw0QOM1uY6dxGB9vuxUMn2ERyPpYnOQTwEdLx6Jer1ECyz6k
-y/x05uM54rd9zTiBBhH7fQYd+ZhxRp4rP0ng441KVRJ2fNxot/yfowiJMe9j
-w9eb8PGxss/pZxIkujLPcJIW0evDjMWnpEkUvHH6c7iXh+zMhIfiKiT6np1p
-dLGNh+EEa2e5KokdJpVxCU08fLfUwd93MYlVJSaO377yUKnyzb8idRLjXy97
-Z5jHw4Yag642LRKlT7epbsnm4fmgUkmXFSReWJcYciiNh0EdR1Le65B4pFB2
-TXwcD+eeZFqF65G4/uV4hjCYh+i6KiFxNYlPTxaJK57kYYBcMVavIXGRYYC7
-wXEezvI4589ZS+K0/B4lr308rDbafH6lEYkh/qlB51x4uJur1GpqTCKh71Z3
-14mHKcUv6zaakNiQ+yPmswUPNYp+RBqZkrjZN6a/3YSHXzRVNmmakfh2pa3N
-+GoeUtPKs2eZk/jkWdnUSk0evr4Q61QOJC7wOe1mu5iHeU6XH0Qx6HrqGJa4
-L+ChKH//NQcLEgOfZp68M5OHJ61t/cssSVwxpmGoLsFDmUc9Dm4bSWwzSxvJ
-E1Konz2dGKNt/yPJv2aYQsG9B+dlrUkUWahssG+AwsedA/53aBcdvE8OdlL0
-dV/Sk7EhUZ13y3fGbwo/39wqO0K70UJGL76Wwusyh4122ZIYey2GpfmFwuaW
-KMMi2la/ZjwvrKDwhe5TkTl2JPIXXfGxKqdQZnXJ4/20c49I6NYVUchbmqWW
-RftgwcVBjzwKfVYfCRqgrTwx+XQ4m8Ljdwcyl20isdb63LGwdHr9ebXXe2hH
-3uBrz0mmcO6S8SeRtE2bgvqT7lFYWnA86BntUfWxLJ2bFA57e634SjvTJ+BI
-aRSFRQF1FR203YqI5ZsuUSgt9dyKTVtexKf39zkKR/e2507Q/rypP8M7iMKj
-qR4SU7RD73h7c/woPDVnsa2A9pq/ncsijlIo2zDzDEF7QNOjW96LQgtdhaQ/
-tB/5tz5OdaNQytqw4B1t51LXgwYuFHrs3Fr+iPZMiaal6EThtlgPDKbNdHDp
-dNhEYaPmrtJNtIPu16W1WFLI3aaeN5e2bvtWz+OmFOZsfJXWQNenY0XNEsFa
-Cvn6k3du044PtG+/qk9h2+aRy7a0Hd9+fqSoTeHBz6EhHHo/xKfbuGeoU3ih
-5f6pJNrF2yoWr1Wh0PjNylOmtH0TGf8q5lN4I37V2V/0/jbrbdjfPp2+v8V2
-z0bpPNwMLlb1F6PQzMCsKYi2zfu1fyfHuThL9pDCmBWJ+c4GbiokFy/Pkq9q
-ovPlnfJ8YU4fF9fdOGNpSVulf8Uf4w4uXs1vrEun83n13LK9u35xUT7N0mY7
-nV/zj2lKPTVcdGrU10mh8z0mo9YU+JmLBueb9Lvp/B9IV959+w0Xuzs0H7nR
-/bHui4zLt1QuatXM2sGn+2to7vX5bolcTNU295GhnbZv5q+BOC5W3Cl6tYju
-xzkjEjunX+Wi9EHzP1rrSexWFGzb6MtFfDyrcNCQxOGPmy+NHubilCXX5Mcq
-eh79l/gq1YNe/1hiY54B/ft6U0URZy6qHWtt20vPC6ObYS1lG7iouvx9pKc2
-iZZQO9tnLRfLJ6Ztm0fPny2EGizU56K99NxnqEmix5b3qWfUuVgZ93OhuAaJ
-0dMlD6+bwUUNH535ZotIjHvtHN8txkV9w574N/T8e+idURU3wUGH7FllqxeS
-+PKDrS6b5KCdd1+v7AISWy5Ej7xo4KCF6bIZYXIk6vNlzmk/5mDHgeuzdMVJ
-NMlyf96YzMGRVVc8rEXpftyV33rlPged0w0Dd08RuLtwu0VPNAezFg83HKfn
-d3jA3WnpARwMTrGotGUTWN+vfEsFOOhbsfjfr3YCzzQvy5BpHkOT5tqGXaUE
-Tj4+fnht3RgufZU7FPCa/r1fvpZr9RjKuKzqi3hFYLSEWU7G2zH8bRv64G4u
-gQl6O/PM0sdwvmmWpmcagW/Cw0uP+4yhvf4nbvZVAoUr/tV8mmTjkgtXvkhs
-pf+Po3GTRbGRGN6owthCn0fMY9vmjrAxsdHvYaAdfb46c+v2d7LRx9PPrIpB
-n2dhs5s4n9g4Uhy6fMkqAqFuQ+fSW2wMMT76+rosgRfPxlNhS9k493OF+rEv
-LLSrfbRwoSob5a6LzV38kYVzlmVDkQIbLw2ucal5x8KEmpIrQzPYmFIp/Xdh
-CQsLlvxR3DM8ig81Xi45lcnCjk+qRoblo7jATNdg3iUWWs5LD+5yGcXc7fue
-rVzHQonnz/l20SOo16MZpBUzhFaqOc/3XhrBrMrIHVKRQxhxPcvD59wIncPb
-89rChlDCN73qhu8Ilp7YZR92agjF9R88aNg+gqmOO74H7h1CsfwI44MLR9DK
-q8LRfPkQihS6ngl7NozBn9SU3MoGkTozd/R4MomSvBd2m+nnT7VlhWa1N0is
-f9uT2fhtgL5fl6g14fQ59u1+scfHAUzQTFATepN4vvgG5fV6AM3r1Jxi6ZxP
-xvXqaD8YwAhdvWd5FQSmlpT7FrsOoPw/O29OPwuVXNZ5CFr6caVVaHPouiE8
-Kkoox9T24V59PY2NM/sxKt8hYNbTHvT7ffyI04NurDrpNpsn34Uhj4jZs706
-MEF8qbbZyXZs3jLpuqz2L44siTt16XsLOj6P8EsTNKCA0JRcfLkBc53uWocn
-1GKuhVX7St9aLPsdvqTLowKjYy1+W26twF9Ob9kaPdlYH3GJf6kzGxuVD4oX
-v84C122BQt/CLHj3/NhO674KMPZo26HzqwLO9J26NehaC9LkhmWXV9WCpcj9
-SxoOv0FhUM4/+WcDnKvYmTao2go1XlGlbvP/wiF1q6lM0w7YdG/Nwbxt7aCh
-WWso/6IbLmpd8VTW6ALWdEXJrz19YCKflp18swf8LHJYm+cMgUnii7AvRX0w
-ozz/T3gICefC1Ic13w9A4Psujt0VEnzX+OfoVA1A6ydFWZk4Er4d5ZXq1A7A
-q5/nrRKfk/AgUPO7ausA7O/b9PxlGwkl7eP3qvgD0DQjAE4uHYYf9WkTZgaD
-sHLtDLn0qGGYPnavLebBIHS8Vl807eYwWCZfC+alDEK8ianO0XvDMK1cR+tA
-xiCIMfys9dOHoTu05aPqy0Fo3PzrzJuyYTjYKfbtQPUghLundtSRwyA7cGYn
-RzgIDdeMX0m4jEB9xUfZPfuGQJ69b9WI2wgovNLb98hrCBz2huf+9RqBeOpH
-cvvRIfig9TWrKGAEdr5YNrotaAgKKt2Sj1wfgROeF9L7Y4cgdiossvrDCMz/
-y5Vmvx0C61Mfd8etHoXOHVeV9ymz4ELzwK8LJqOQZx9l2bqYBWUWMjtOWIxC
-oGOK3J5lLDCU3e1g4zQKdTmHEjcYsEDteb8F79go5Ns0K72yZsFEj7SOW9oo
-tIntyvD3Y8GrvTuES+XY8PKDuarUWxbkri9UTFRkw9Vpj9WOvmdB5jxFQ/lF
-bMjYqLC78iMLEmqavUV02JCfauvq852+HkvP2hYrNjyJ7j0b2MYChxUB6XeD
-2TBTeMT3uCgBPfzYTVJtbJCrbtrbY05AW8OwV2gPGyKzQP6aJQFNL7eHcobY
-8Fum4622DQHVJxRedvLZIBYgNrzTgYCC9mQV5twxWLLwTYinKwGhVc/IYNsx
-uDS+O2R3EAGKD77cHcgdg/nOuQfTMgkok91jblE4BiZeKxNOPSXA42pvz/03
-YyBy5OEH8+cE5JyWMLL+PAbb9IeH3xcQAC7mzSntY7D86ZVT4eUEHJ5bsMh5
-Hgfi+SvDW34QIH2N8SlHmQPzBHVaW+oJyBf77ie2hAN5u+syChsIGB8ZZL5Y
-yQHdmcFLgv4QcKN2mddMWw44ro79+6yLgNfXH2TiGfp727s/SQ4BbpJaWxUu
-cGA4v1F2giJA9HwRzyeSA7s6WqaLCQiw96nbpHyHA20n3i0aFxLwb/PsocBn
-HFBcZpCbKklCxPvEuK8FHBDm50aelSJB22SFmXoJBxjFS2Y6zSDhlLZt7PdK
-DlTNDJvZKU2C1PSLBiv+cYBdZl/+di4Jz8Jkmi50c2BsRnrJofkkbKOSL/4e
-5IBChPr2aYokJPaU/ozgcSCuafXWNcok6FeOBf6T40LGZP2WjWok7Ao/UhJn
-xYV5zcXZOjokhLeK/gy050LMvRkukbok5JokDuzczoXvn7L2Nq0kQYL9beF8
-dy4U6nh4HTEgIc9rdejds1zoOPHIYMVaEv5g9b3/wrmQZG2/z3YdCdNUvF84
-R3FBqdHju9t6EvbVx7fNv8+FA7XuIf7GJMy0nrS8V8CF4fCYbBMzEtam3ncN
-KuFC/pOzqGROgrvQINCFyQW9KrbUCO2iQq8nCjVccC2cvfwqg4R2OWE5t54L
-Ud+5PFsLEqR97zU0/OGC/3WKPUXbS7NK6n4/Fw7dr3HdvZGE2HBPtdPDXBhZ
-M1TBo13aOm60i+LCGqU8+1tWJHSb3N22fpILfUPlw0usSZC9r3dMUZKCH7tL
-8p7S3sD+FE7NouC5pE2Ujg0J3k4eib/lKdiQJBX8mHaZVFz1fTUKvLWLY0Nt
-Sej1Wtl9ejkFEQFE/j/a8syPwl16FDjY9LUb2ZFgruKuYLSWgstbN6lE0z4a
-zNdbYEpBn1Hh/jracfW3bXmWFBhlfc+Yt4kEpoGue+MmCgxsTUcdaA/GVAYX
-b6Xg9tuH5mG0Ffr334rfRYHK64SoLNoW1rzs4P0UxDbV1VbR9km99X73IQoy
-a1hynbTvC1f8MfKhQANiNo/Rfr/nA3vBKQo+1W0PFtJmFe6T5p+hwH5td/wk
-7QXylEbTBQoCpXuzKdpWvjfNSq5QICI2kdVH2++LtsuDWAqevf105wftBM0K
-3zN36esfZB0uoP0x3O3KniQKPA3kl16jPdLKSTFOp2BwXeN7V9oqG24UKz2l
-7yez00qDtu19rR/8PArm6TRmdNH1OMl+19/0mgLDY3t6kmgnO7mKlb6lIGf2
-LFEH2p9zxpQTKikwe3tzbIyuN1sqdnVINQVZGrFv42gvOrh8y946CrL7M9x0
-aW9mMg+aNFMgURRa/Ybev/9U9p5XbqcgwLBk1kbaj4LZdwW9FLyWEii+p/e/
-uj4mt5mg69naRRjRVr+O/xImKBhbbcueTedn1oF7dyXFeeAb+kfrNJ2vMYMT
-9v4zeMA2HdNvsiThU73ya2sFHkQ3SuZcofOZlzHik6fCg28KWgvr6TwnBH9W
-X7iUBxeuLXFWou2jEhQ7rM+Dh81Di2Lp/DsTW6xc1/FgvULf03K6X8yZSwWV
-pjx4snk2v9uUBLmDPw4lbuLBfneterUNdL/k6JrZePFAeKPLCej+Szkvzs47
-yoP+jpOv19D9edWpOWuhPw/8X9b+UKf715V9Zd7IOR7k3nBQ7DckQWRD52Di
-PR4kXb7xQlWPhH7p0tRpyTyYqfD3dCM9H3623twVkM6DpqyUzmv0/HgSbl5h
-k8cDwf2G5BYtur5fHiSMVPGAO+R4eNlSElYn+W91q+WBcvuV+U+W0Pvtazvt
-UwMPPN3+7FKl5xEpxwlI6uTBh6catygVOv97tm6yFfLgLnXp0XYFElr7pvGS
-DPjAabgRkUrPy0+lf59LreeDjKRGbDY9T/NiXnmdNONDc4Xq7KfiJFwy8Pxu
-u5kP/YVxXnFTBGgFl2eMevEhqazOdA49r09KBTrb3efDnOa80Th6vneUO581
-fciHBWbvy4l2ArYFrk81eMKHD9eORsE/AgzaBUMLXvIhZvLVgo9NBBClFyP6
-a/jw9k3LT+8aAo763ngZPU0A69Jdb48VEtCoEdAUOlsAX4deW5TT55Pdn+1T
-J+cJwMDn3pdzLwjQtFOwd1UXgMTi+QfasgjoWpLcoWMugKiGIkfjRALcfz2V
-+/afAN4lnl5mEEpA7bWY9e/OCaDXt9P2UAh93ln67iu8JAC59+Uqt+jzc9GL
-VdnJtwTAE/Dqqn0JaLlazPB9LgDCaPma+v0E7DL96CfTLQC1Mcd4NTMCHNPb
-v23bOQ7lLTq/H46y4OgYeXGZ6zic8Oc0lLFYEGE9uZbvMQ68+f13fvSxoLRX
-+eEjv3GIYMmY/mtlwTLdnb5k9DhI6z+RuPaFfh559XHO9XfjIJgyClB/xIKn
-H3OcPutNgOT4vmiGFQsqFUvFk9ZOwIlumcJV5ixoO/L5tZ/pBCx5wN2uZMQC
-hVndixU3T4D7y6X/vuqw4KLTouFDhybg21wbXrk8C3Y33rwpnjQB0Ve5y+tb
-h0Bq4L8f5jOEYOi136nYbwja8t6pJ8sIoXLh2YLhI0NQfHp24Ph8IbyT5V5W
-8xyCY5JPFIrVhcC+dznIe+cQ1KjVu64yFYLfoUubrhkNwb1dhj1L/YRwLK5M
-fv3UIGhWEoLpv4TQFmksOzNyEKaumWw5/EcIr1/ebdENpZ8nt0cmV7YLwcDZ
-9q9N0CBEt6kywgkhTPurHejuPQjE+JbL41KTcHrbwQptm0EoMsyRIUwmYfqu
-gI1zJQbB+tFhjbpHk+C2RCRrzZkBeGz/trs0cxJm6WutDvYbAAlqXmZa7iQI
-o8zU8g8NwHuH99onyybh1YIUBfHtA2A+rqIv1zgJqwxsVi1fMQBGLj+NnWSm
-IHTyyDTfxn5YIW3m9PX8FOyv1TzZrdsPUqYzyj1WijDsZ+S7c171wr0tO4YS
-DEQYITf3VW/P7gWNfckL61eLMHQW5gVkJPeCZeiqEBsTEYb7gVAPg8heOMfc
-s17HVoRBplqk1Lj0wrDV0/wxdxGGm+Spf4bcHmh2sM+4EifCmGSL1MWs7IHc
-A9dvPB8XYch1f4xWCu2C2+Wsyw2TIozS7zkOZv5dcHqh47kpUVHGnmPU6l2e
-XcD4PefotumijBrZE14nbLrgh+NNS848UUbElxDlpXO6YMzsDsdUT5QRZHjI
-sSCxE4xVHrhWu4syfremUNtfdMCHxsfLBytFGdkTE4/WFbdBSseCdy6pYgyZ
-k/a367/8BrPHG8QUfMUZZXvUL04WfQEFzybzrABxRgXLXMN5xxcgFp8+a/Kf
-OGMdcWbpSbIKHiYWjO0/J86Yf3p01pRmFUze1u7NjBZnbA+94OZ15xPgRcVq
-40xxhopsZvEWjw9gcYB9d1+bOGPSJfNSXtobUFa99ZPsFGfMvRXx9Wt1KYw2
-68mE94ozTv2S1wzglkCay7GrGYQ4I0vs1ts9dsUg5tgeQk6IM9wTjHUf9byC
-CtPvBy4qSTCUV/3saVV6BkkCn6S5qhKM9a7z2RsPPIXA4plNT9QkGD1f9cJK
-07NAY43N9i/LJRhy0RdP/NF+AhE65VZz10kwzmd0itY6J4Fb/96LT4wlGELx
-Q/VZP+JhTSavfL2ZBKNrkZRomv1d6FJfs97NirbNd52+UzFQ1vbjFGErwbi3
-OjI73u0yxD30y7tgL8EYut99fM6lc+DjNpsl7yTBuOTz+WF1tA/8730k43/v
-I83/D7Y7b/0=
+1:eJwt2Xk0VH8bAHAllCJFEsmSpFCyJduDIoREVCohiYqUlER7pJSllJSSJCT5
+IanokaRSikTMzL0MsxmMZSSE3uuc9685nz/ud32We8+o+R122zddRESkbpqI
+yNRva/Fyw1sTQhzKI34Pr4982284cPvomBB/nyfvHZm/HWeWvv7r8keIJv7b
+HpXPCUSTMuf3EgNCPO4rMH00LQJvlYe5nWQJ8a1q86f73bG49QOG7voixLOJ
+ykEf8DbWN297pn5HiNlVAFcDn2DNaKzmc0Mhio/l5/54U4qzwr9MMr0GscZw
+7IKffg3GOL34cCFhALUvzD98c/gbfjVosg6IH8DLAY+1j8h/x/lKvyvs4wZQ
+53YAmhp/x/Quw1KpCwMY2Pk54mb4dyyJKcm+fXwA95A+cX7C78isLI59unsA
+DzDKul6E16O5UZFDo/YAvtY3sMsKaMAB5ed16p/6UTT4y58DOo04Jzngv3fV
+/ej0iJ2uadaIWuJLUnze9ePwmeQjvxwa0VsQv+v+6350tPbPVdjfiLVvD3Qv
+etaPW/jqSYseNmLmHs1Z85L78VPZzUF52Z/o9jB9w7+d/Xg+lHZRqu8n7nNQ
+OPGyrQ9llMU7PWKbMcp//EVgax9KFcoPpyc3480z7UOLGvtwp9ZFCSK9Gatf
+5ByNqulD2F+ibVXSjBrq60Ksn/Uhh73kcVp7M3aM7dj3JbIP1e7kv3q49hf6
+5N91b1tAjRcwx0O07RdGfDyTnDi3Dxfo3Fu3qusXJnbsbbCe1YdhimEursJf
+WKmgszlrXICvi/TnRkq0oMqlcsegTgGm699X8F/dguRuwlpYKEDfCKecG9Et
+uGuuip6EkwBlrRZmHZRtxSUb9C3X2ArwTFDwe2vlVmRG2DrttBRg/TXraqnl
+rRjQcTDwuZ4AC1Pdj8aatmLoi7KMbQsEKG9b8HKabyte2uk2L4fsRZu/nx7J
+5rdiwZNLg/ZHerHisQL3tSkNQxmpImEHetFwdZn0lvU0NJiXL52+txctpfds
+IzbRsCzyx8oBj17cJ1bq3rKLhlXOKnvvmPaiacYave2nadgsLGvsEu3FouDP
+RueQhv+gp+TKrR7MPmTjG2NKx8QhiWc/E3ow1SLTsMqajuq5Sx8vietBj8Vl
+74bs6Wg3f2dK0akeNJJKlrHcRsfrrM/hNJ8ePO7Y/MI3jI5L4p4Yr9TuwU2x
+CR8EuXS0/OFX9hm7cbXkQ0NdGQbWx5wulH3VjVXCD9z18gz0M0vL2V3UjZ2J
+qklbFjMwJqshdSCrG++lzP62RYuB345bnVx0pRsrB+qWcYCB3kpLTIO2dqOp
+WP/vPcEMPO3f+mZmFx9jBP7+j98xcHDTAe2aDj5WrHC0dqhhYIDB37QLDD7O
+9a8MZ9cy0Hm6cuTkdz6ub0joFv/JwMUZPiZDpXxsPCJtLGAz8A2dW9J2kY+k
+wf6Hm2cSuOp9hEb6aT4mear/d3IOgZl5s256RfDRssN4zT0ZAq+c1A5rOsjH
+i30Zl2sVCPRaeHjNFzc+9m0V4FctAkfchp+VqvJRoXVnfuBGAg+ZxiofU+Rj
+bt+MKMVNBLarKVxbI8dHxejOn9UuBH7sX3coX4KPlxsitUQ9Cbx1PXplpqAL
+tZuentf0J9CwdsaTa+VdKLN5hc+sMwQesZbN8N/ehYOlmfmOzwlMtGkk07Z0
+4dJCIxOnIgIL1t9QbnDsQmeVnrW2Lwjk28retbDoQl3mu7vKbwj0d5S9Ja/e
+hWZ5UrqBNQRud5eN/9TNwz3VEcYBdAKPb22snWTxcPVrr6E2gsAUjxuzjEge
+fl4bZLelncAf22RjH9bz8G/+/OeKbAKddsmej3zBwxMW32vtBQRa7ZON0DnD
+wx8rVQSy/wj0Dmgs9Yvgoa1ie5vENBKj99/4nXqEh4/5I5eE00l8HSQbJubP
+Q0OG9Z//xEk0DJENIe15WJ+bnf1FikS3w435cjY83Ox8Nyx6LolHQm90O5rx
+UJQuKbZ8HokFR2WDXury0EsQEu0rR6LWCVn/xPk8DE1pHw9TJNEuojGzZjYP
+LbStNVlKJO47eYM5PoOHOaS9hpMyiZmnZPcE/eFic2RAtqgqiYvPynrZMLio
+/inxr8wyEk3PNaZGNHFx06W26VaaJO44f+NXwTcuPuiR7AtYTuKti7IeSu+4
+GOa64PS9FSTKxMm6Dj3m4nH+9+fZupQr7MXvP+AiDkWcubSK8kB0+cY7XNyY
+luW0ezWJ83bwtO7Gc3G4V43zR4/E+deU2zbEcHHXtPcvXq+h/M4tRXCGi48i
+L8Ud16e8omKaTRgXo59Lb2g1oLx78GX3IS5+qVi26qwhibJJy0NSAriY+GtS
+XdWIRLnRJBpvBxefKN0x2GRMWfdjYrI7F2ddfurWPGXfcTtzZy4qXFS/4LWW
+xAWfA4oTrLh4fYy5xMWERPmJu0HrTLmokhN1rWLKaxpUOg24+GOTqpzmOsr7
+xJvjdbk4Z9Pxktgp3zGLN17OxRsrtEI7plwXatOuysWcuDZ7Y1MSF07LHolT
+pObTsbO6QFnBiF5gIMdF036x7Z+nHCSzj5DiovTPT0kzzSin2yrFSnDRbMik
+z2rKDZENetO4qBUvcvTolMUKY2ljHJw1/FkpnfKidWyLi0McbM8DQSVlxWDF
+IV0BB+/bzOkmpvxwc94vLgcXH6PJDk256aLPOSYH1y7wOCBqTnnWa3ltOgdb
+FZf3z56yRd/Xnz85OJb6N1tqykc0Lpz+xsHqqujEmVN+vGOd1icOJvC3F4xT
+4ym1Xu9reMfB/nMm0/mUF0tVPz71hoOfF326Vj9l69Gdy15wcLtfsVvhlMNX
+zf9ewEFT7Wy3uCnn7v0UkcPB83udEnZOmUg9rZ7JwcpFbpLLpzzvm+HXuxyc
+G7X3Qzd1XottRbvDUzio2qJTlUtZ+aTJQ5UEDtrf9ZruS3nJs+Btny9z8LLb
+ndh5U2ZmSoWd5+DDvBT3N9T9LHGQiqwJ56BjQmTNGHW/S6Jt9EIPc/CAXEVo
+4pT/O8FZFMTBDO0jgSqUVRZ1uAXv4uBzn067FVS8qDovnLXQk4M/j4/rZVHx
+pHrOCSs3c7BwrsVhhSl3lWrLrefgYaUeQQ8Vn6rKPcwKcw5ibKmBM2W1LWqp
++405WBHk05hNxbP6q6sz3qzgIJc1e6UdFe9L43wIXxkOBq+g7TWi8mXQ/H60
+tiQH1TLWCvypfKrqpyv/FqXW9+ah+nUq3/y2b/O+/IeNusG/E+q0ScxY7tJW
+QLJxUEcuV0SLxFD61TMRLWx8ELS5cILKZ6uEzyo2P9hYcdw5ZIjK97bhDT5N
+H9jovaNP7vtSav81Zsy/+WwM3Oy9bp0KiYKTJ899yGbjd4f1S2csIfGt7ku1
+hAw2PiJy6j8tJnF3ir6f+k023h/3jAKq/tzzX9Fpf4qNJdMF6zuo+qQoupCd
+4sBG18HO0cmZJPJLt17as57yuXB6gARVDw8kL1thwUZRL8W0T2JUvfkhFVCu
+x8b5TeIvTlL1MvXhDG7HQjYeWu96PfkvgfJWg7zVHBa63DE2zughkCNcHTfa
+xsKE8LjcbD6BpU+CV7xvZWHDlYeyT3gEesztCvKsY6GVbvKPFBaBN8k2flQJ
+C0+TSVraDALnR9f1fD7PQovGbfeNawmMdzTdNSeKhXJu/9FyPxIoofDki0s4
+C1O2nVGU/0DgeNHZvMb9LNSwr6DeXqj5eQaBhBML37/K8ZCi+s+rrWmd/fIs
+5NrKxGndp/qZuoS7gQwL47VlfuvcpfpVX1hV+CwWLl6Sd2llKtVvrzg/HPvb
+ifnP/i6el0zNXymyZwazE/90b/KOv0Sgj85+2sKnnTj6ijdhfpBA2mijg1dW
+J3Y5mTz7uZ/a30erV/fSO1Ev7FjmPqp/OvoppqoldqKxs9T+sN3U/Kl1Htrh
+nTht0O6G5WZqPzMMGyyhE1c7pjulrKHWQxf5tK+xA6/Fugy6DTBQktFRoFTX
+gd23dZf69FLvF4zqlIaaDvwGCsX7uxioQlzea/G6A38G9QzvYzIwkZT5J/ew
+A8Xc71mqNDDwKFPVuDqkAyXDBS4xzxlozLXKUpfswFXVy8/pBzIwmat+tUW0
+Az9GP+Fd38tAAXfG0esTTDwi68lhezPwCe8TjPUz0SFA9+kFDwYq8F3pDb+Y
+uHL3pqunbRg41uMz/9xjJubb9K4IU2JgxeDZs21WTHzsYCXl/5mO1XOSjaVN
+mRhyyM836z0dazUf9ZgbMBGi6tPICjq2eH3YnraMiYtLT9ZYFdFxqGrWGg9J
+Jg4cOgTlaXTUuZHMrG1sx2yv+qdJB+iYZpBlUxrQjtPF9inUiNGxn3d9luKi
+Nvw120m3cSUN0xdXObyc3YY4rGxXuZSGjq6/47ZOkpi+54lEzmIaPnq5UzKh
+k8TeyKhr+6Vp6BmjNXtGAYks9aj27IFWLF9aNUdgQ6JvzPsYrZetGOv9e27V
+IQJtVMaH7Cyp9+2fO+UPVNJx3YF8fpBFCxrqVRHhD1vQ9ImO62ftZsz0fWHe
+ZdmEZYoVVQvzGnFE1MZTQf4HHirc+eafUgO6/CmV9navw+Zyhadn7L9S+w46
+GZ5Wg433a7PVVWvwtefmHTM8KnGNbZDcL81KnLchvb5aphh/bGyV3jdZhAYn
+xf3x5B0cuTy3ddqJO7gnM8h4g2sqyPTO3dnhnAqKiqK3hDeL4c2FeZtmnyuG
+f6KiaWELK4FWp2ST1IxgVc9fd7+7BipGHRLkDtXAvDq3BvJBHcw5tV+mJv4r
+zBp6P+re3wDr17647jBeD/r5W4SuW5ug3GvC5eXrRggT2uonn26BKLGBGkvZ
+Zhh3GztEptIhpj4ip1SjBZYNxPzzyKbDI8n5LzV0W8AlQTa5rpgOVqIpPdeM
+WuDBF52X5d/o4HIy8P0Wuxaw2bBn2t0ZDKBzKpn397fAZaPqlG2hDHg8mdHr
+lNsCcgrX39ZvJMAi2bWAp9UKOoSazPthEszf/a3OVKBB0oLqYnfRNpij9yrT
+RYUGw84B21hz28CkgP319zIaVL7Nuy+2og3U4oL/GRnQwCPDQNd+ZxvUix96
+Gu1Mg9N7bR3rsA0mO1YlaZ2jAe+YYdXBDe0gfVBHu51FA8UkMbkSx3aIJrM0
+B/k0cH7WvG/ctR083OhG//ppUMSOmHVtdzuMLAm/LDlBgyjPCteC4+3wTGFm
+HVuODvNM7Nr6c9rhde4ph2fr6WD6d9t4uBQTWlJMPoSl06FqYvS0rRwTligo
+PNvxiA6OIvemLVBiQsS0j3HrcungJdYuXqLFBL3MZwrcEjqcnBs4b3A9E9b8
+8HMZ/UKHsqURmiGR1PNlelojI3Qwdkp1DeAyQXV85wJXFwa8dTFtNBIwYdmX
+1E2h7gyw28LwEPvNhKy8ptVXtjPA01N1Z9b0DojffH40z48B4T45+zqUOyAg
+X25rxnEGlBwri/Te2gEvy5ebbk9ngH56S5bnuw54fcPkWC+bAS2HxAqLPnbA
+O5OLGsNdDDhtrv9G+lsHTKuXWTDay4Ba+tWGGloHKGLT897fDPBThEnjoQ6I
+njyWliRGwI3bj7ctXN4JtceLX1YtJWAo6ahkS3wnJEqOlFbsJCDN98ECwxud
+YHayY/rsPQRYrfmqmninE9SPpHm6+REQX79srX12J3TMDJH+HkiAxtzWvWXY
+CWnScdfPhhPgEQ8VqYOdsFVllX3VNQJKY+aE7tjOAonRK/tKXlHPN+slpXiz
+IHiOw039cgL2anoUNfiz4NeHiPq8twTI1KQPORxhQUpWxoG49wQcFFt90vQK
+C4KuWI9MfiVA9eKW80rlLPiaUiBZSxIw3Bj+aFsVCyqq3Zx47QTULU2rvvGJ
+BclWtudEOgmIfN8hPqeJBfIvE98u4RLQNP3Y1fFeFoj/WrFjfh8BV87dukmo
+sEFcVSbz5wQBPg2vXyzSZENv0jaPpH8ErFVra/bQYcMzaz5z4zQSWJXLF30z
+YUPw8LGzmTNIAJFX6W+3sKGgGx9LzSZB3pV4O7aNDaWPRIZT55DQ82Bau7E3
+Zcnb85dIk5AGjurPD7CBf8Ipb8E8EoZO07MfXGBDxIsUzdfyJNR++/eRHscG
+BYFlvqwCCQ+XaHQtTGTDdl3XgYBFJLi8PaSdeI8NXlbGxWNKJOROTDw/+4IN
+lXI8XrMqCWed1RvK37ChfXqO+aQaCZ7pdoMj79igtoxvo7KUhBkWCYZHvrEh
+8tBFH5dlJHhHqb7y5bIh565osc8KEq4ULZi9TMCGLbbXiKCVJJTyJHfzhtig
+/l/A9YPaJEh7/BY5PJ0DD341RW7XJcH0Kt9NfxYHGs+6Fa1fRULAu7as33M5
+oPy5Z//y1SS81a21j1LmQDTHwbZFjwT+XkwDDQ4oTQwFPl5DnVdaSc90bQ6U
+G12fflCfhBDxB4lxJhyY7bM7oc2AOi/zmx1OwIF9rKjT1w1JqDkaZyhjx4Hf
+z3fTjYxIUG4La7nlzoGQuSbNwcYk2C8IWunlxQHTS4tDJykf2+QdpezLAa5Y
+6uHYtSRknHP/1r6fA3kHMn7MNCHh60t71awQDriVat8+T3mk1+Lo/nAOmC/Q
+ezNEWUPDoHplFAf0iUfme9aREJWoHPhfHAfivhVvVjYlIadm/utjiRxwOWpB
+hFL+OS4xx+Q2B76HzasspyxiMLH7bzoHrP9oDouYkaATNPj8bRYHehzCoy0o
+b3/AnXb+KQdUOoTu1PcNXGxiuNsWUeezJ+3EA8qFs388nvmKAzPifDjVlBnW
+H/98QQ7Uulre76A8M6LcIaGGA5r12ukjlA0L/rvrVseBEw5qTHFzEnxY2b0L
+fnKgavnCQOp7BuIV70ErjQNXJ8X05lAuc01KusfkACOOY0x9DwErJqZzD49a
+T8F/kYPUeDIVp4yW9nFAIcJntJWyuTA0lvObA98W9xS+ohy4IqA1d5wDx0ad
+HyRRvrlnp3awKBcCb5yp8qVcmeIarSfJBenUSIWVlHu+2H4XynDhA8PkAZ86
+H4XpZmovF3Kh2btk6yPKG0z0wiKXcMF7Pdd4K+XQkGUfLJZxwfrXl/UT1Pnf
+zVJcOE2HC/MSdp28T7mGNjeoWp8LY+I3m9ZSHpQRexO7jgsvpgd7fqbuzzG6
+z1t6Ixdqd/RV/KTu/3gxq7DBmQt3piVkuFDO7GqdnrKVCzNryh9UUvEy5lGd
+reRHjddT2B1PxZdm/KsRMpALVk0hhlwq/tyqChwzD3PhNDs3aR3lvFV3BFrR
+XPA0unyuhopfL4kQY+NULvhLXZg8S8V/lqRAJuY+F0ZmGlk8pfJDIBXS3ZTF
+hWNruLHfqPw5LxeSEf4fF2adqzIV0SHhqVqI5ItaLvgWp/LmapEwrCFgzWig
+5uu8vmP6chKstEJw6y8uRCmHf+6l8vfnqpBjQ51cmKi4+uA5ld/jZiGkwQQX
+Nrta/iGXkGAHgrILojw4ki2jf0eZhESbkBuNs3ggIlbr7bSYim+HEPsweR4I
+jhyOTafqi7NnSFHRah68WD/G5cuScD80JGaNHw+2RshF6kmQwAsT+JwL5IFL
+qL3MSTES9E+EmDWE8MBua8Dp16LUfUSH9Iee4sEODxZ9uQgJfVdCvApv8mD+
+lush+SNUP3kcsmr1Rx582KR4eSePqr85gpln6niQMTOPpsch4OfTkM5vjTxo
+u2ndPUnV78CikNSQdh7Ur5S1utRGQBKGTC8Y5UHkDtmrps0EdLSGNOvodIFH
+d5iFXRUB598jU9SgC+xkZq8MQQLUnsn00tZ1QfP6rUevUf3G52yRaNzGLjh/
+tE6qqJQAUnNYj+3XBVap8mtv5BHQGhZ9Nf1OF7wz2hxXnEhAxO5vt45ldEGS
+OJq5Uv1MYaNK5qYnXRAXob+CFUeAp+K7stGSLvijMpE/cJ5af+UMjkd9F8ik
+yas8OkZAvVS8lbQEHw6/OsDe7UlA6B/GJrYUHxoDKt2D3QiYy9TdVi7Hh1Mn
+rzLCXAhwKfkefECdD0uP+xkF2BHwxUv2bo0FH5QEll/ajAioeZL2+/QxPuhX
+HnynIUtAhXVuXh+TDycO2D3l1jAg/unAl2weH2QzHxgK3jFg1wLT3t19fDC6
+69zTXc6AcV7t6q/jfCjbItb2tYgB5ok9JTkLu2F79Il7GvcZUE6uRl/nbhh7
+7Pp1RRjlU6WNjWXdwJfAp9Hy1PjsyaEr2A2X3+e6BMhQ42/eKG9T0w0bZUQ6
+bSWp8dVbthc2dsNk8baWrgk6mNeOEvGCbrAtS6qsZtGhXMGCZ6vRA+u/+5HV
+hZRfvB9/mdADS3wL5zCt6ZDXcyv7b0oPeBxwFKia0SF16QFXuNcDqxsLXm03
+pEN4kkxWTU4P6LGKJQo16bAqePempnc9QNpUeExI0uGBxp87g8IeqNP09Zv3
+gwbnb6xcq7u9F7w2x1+U86JBaO1Ee6h3LyzETU9c3GjgPa3hSol/L6xY1HD+
+rCMNzA6fIM2O9MKo/lzvL6Y0GHKsvuR4pRc05sVETijSYN9075/7y3vBPI4x
+1NDaCvZHko5kqgrg3DFH8zVbWiH+upFT8HIBrNuiW5uxsRW+P23VNFklgA2F
+DX7ilq3gyVFj1JkJwHdXSn7xylbw31lkN+opgC0yMQdvibbCWdtGJddrAvBc
+OaMzsrgFyhYtqJkYFcCq8qsKRbNbYHlVquKOxj44t/n13UPpzXA5/2N0YWsf
+yHuOVSsnNwP/1nC7RHsfXFlY1/ghphkKDm59UtrTBxzjH3fHDjdDmuRMRUnR
+fvip3JszbN0MaiXvs/cv7of0ULr7WlYTrJIwq1Tf3A9fGO7fvqs1gcOzFcLU
+kn7YcHnAfMa5Rkj6N7zw8qkB+NuYcjv33Xe4sJjpudt9EJpVNeRWX60BM0Lj
+yfvFQli0Ub1y4fpXcIu3fcBOVQjKhW/vZrLKoF8Yb1a7lLL7SN7IpTKqPv7+
+Xr9SCJ8GvlmKf3oJ0iYfRggTIZSmXTTKdiiFjuR9jiNbhTC7qGrZgE0xXLHP
+7tW5JoTXSSEspmIesNxpawsThVC1X2zygWsuwB7p8wY3hbDBPUht8FIODIUf
+lze9K4TAJxLr3PqywfuRHWzMFcKr8vbkf+WPQH+Sk+j7QQgjeoGW47FpED9L
+ic76JIQLGR55XHYqcOU2Lwv8KgRRsTlVIza34Z72y1chjUL4oUnfcXXsBojv
+iO04xRRCpseCVvrbK+Dj/0bnH0sIllKj/TOCY+HN4b7j53lCiGoeHzy+6CKE
+xmybHdcnBFbuzL+BtEioTbrqMUdIPd/d3jipdQw00vFBwrAQVE4bqdnzDsDp
+HGHX/DEhkIfM3X36vOD//1/C//+/tPwf9U1g7A==
            "]]},
-         Annotation[#, "Charting`Private`Tag$150135#1"]& ]}, {}},
+         Annotation[#, "Charting`Private`Tag$4572#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -551,7 +549,7 @@ I83/D7Y7b/0=
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{0.375, 0.375}, {0.375, 0.3750000000000284}},
+      ImagePadding->{{0.5, 0.49999999999994316`}, {0.5, 0.4999999999999858}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -571,213 +569,224 @@ I83/D7Y7b/0=
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{-2.5403541891658863`, 
-       2.5403541891658863`}, {-0.9777827344487778, 0.9777825342404552}},
+      PlotRange->{{-1.2494108745616666`, 
+       1.2494108745616666`}, {-0.4724153643313823, 0.4724153057583146}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {143.86568033582398, -87.675}, 
-     ImageScaled[{0.5, 0.5}], {269.74815062966996, 167}], InsetBox[
+      Ticks->{Automatic, Automatic}], {159.9449084269849, -97.50736892665735},
+      ImageScaled[{0.5, 0.5}], {299.8967033005967, 185.72832176506162}], 
+    InsetBox[
      GraphicsBox[{{{}, {}, 
         TagBox[
          {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
           Opacity[1.], LineBox[CompressedData["
-1:eJw12nk4VG8bB/CpZCuksoRKKkUlqSRLZ5SiiBZrlkihEhElWSZUKkSUEjVR
-hOy76B4UIkV2SSPZlywzZ+ze+/fH+4+5Ptf3ue9zPOc5c87jsuGc86kLiykU
-ynH88d/ngsTSSfqKJQzB6bNKbR8XUQdDdexm3i1mUDSvXzGumSFaTKQdGG/R
-eTflZMJniE/rJi/eiUXH1z+SMJshXr5PuCIUjXaz5g3rniZOVHK7b3yEvqB/
-/jFlmshd+OSv646uZxY2HJgk/Jw0X7/QROv85lT+ZBFr9FTb1doWMSi5Tb3r
-ZIeJ9M8zosLN6Db6WFLlEKFNFJ/sqUf3JWj5Xx4i3JWoFaE16FqGsnjmIFEn
-fiSzm4G2ELX+fnCAuN99MvBRAtrz7tPTrr3ElM/FPV1uaNE07yLeP0TopLxz
-vst/PjEdlN1JbHEdSgx2QssHm7217iSMLjivV3FAK4krpxQwiQxdd/5gc/Rq
-qu62jg7iovhtpvJBNL1iwPhbK9Ga8SzogRBakVU6I1pLbC8wFJJc/l/uFxXV
-842gMVY8TuZF03zWetFriK3fAyO/LkK/4/nKEasmPIY8YgVZFAYl0M8ORMoJ
-8S1m+Y9b0MyLZ6cj8wnj6DV/o16jrYFicCcRkuIa7ba9RNMt6iN4U2E+Kaz/
-QxRa2rjo+aEMiC/g+9cejh6tTDj4IQfYTVNT6+7+N77uEzPkI0QItwnFXUKr
-RHHv/lsB9Xej1JJ3o8+tNTTY2AA69XnO1xXRUdo2x543QNH6xjjNHWj+q6e+
-CjZCfL7Q8hZZ9I/7Py9MNoLnQEA7lwRaZvYs+bkZNug7e1tR0Fz8CWXHfkKH
-fKDPxqgFoLgvnDo7z4TKstKegnD0d5oIj1InZFrM6Z8IRu8p2nD9QifcCXFd
-701D9+c8SqruhO3jFowmO7RLG9/VJ3/As2DX4ge70XkQeW/dXxDR+Xln9Os8
-UJJhfT5PL3jM8vvMfUZvydKkqvRCe7rqdX5Ar5GVfuDQC2/WRNltykBH+ry1
-rewFpUFTbdMnaKXq+l13+kA/pImXYYkWy4s9M9EPdxvqHj4amQOKVWhAW+wQ
-DAQuCojuRbsdvMqsHoLjGru8EploS//I96whWB0f6lj2A/2OuvnZ4WGIvWFw
-nJOLDmhfyfg7DCBRI3jWF735ap6L+D+YtK4MU1iB/qxfL5s8Cume1TPmfHNA
-67hZ+/vDKDhEfLtwfzF6YZrX9+sotFQ07P/LmgWKY8zlq8OjUKDQ2fm8dRZo
-ab5Z0gpj4Dk7tWtpHFr8jtTnpDGYidz24+deHC9ekPQgbByyMxTU+XairT1v
-yb0aB8fqXfHKW3E8z2rP9Pfj0D6/zzNMAq2Xp3GjYhyKLmjJaC/MAOVv173+
-mXHw2m3pmlmJ3pN21sl6Aua/hay8b46uvFdpI86CSVfD39uM0PUKQpdlWDAu
-KvH+mz76025Vm+0s6LF6e3j1QfSuJMfVVBZ8G/ng8WrrDNCKsoIj7VjwUrC/
-I4c9DRTlCW7JdBY8y0xNNv2HHlUSm8xnwWNjN4+ZvmmgNVhWlJaw4O7LBWHN
-dszHfuzdUM8CJwXRw19L0elkyBI2Cw7oH0r+8witl3DIYS8bVMZ5Pe7cx/ot
-5QWbNNig9PSb1lZ/zCUf3/uuxQbZDrOOK9cxf/XSZPQ0GwSdrgpPWWDem8dt
-7cKGjuCYG0LymGvt8VmUyIaWXbZamRsxbz5W+C6NDT8atwobrcV8sdhiIpcN
-5Wuzk6JWYB5yslOljA2pKVW/NnOmcLyAiG07G3xrOIfUP01hv/iZqGUkjAdl
-0o2K0f0f6OnCJNjpXZlzykWz6mWzxEjQr/6T+/od1hN0Ad+NJKz7UiPHE4wu
-iP+yW5WEx4GBd6XvojP+TWcQJHDrHOra74v15/7eWnuYhOHy/GhHF3RfRVyR
-AQlFn+KEfhjheGvZZWvPk6AYYOU4qI9WeLmf5yIJbw6t+cKlg/ZQ3Pz7CglB
-pSF++1TRexYumt4gwZxxkx29DvttTt/sep+E6Q8GP+17J4G2o0VRP4kEp1v8
-KreZ6NuP70ikkvBH9XNEVOskULxfOzVmkPClQFW/phrzsi4lsQISnuVtLlFK
-x5yYJavLSVh+g7lWLxEd52sjWEUCTfmF54VYHD+wtYqoIcEhZ8WeZxGYd9yq
-cq4nYV/WTPycB3rdInLpbxKSXHOXiLni+JlMRkknzpeSi7XiZcxtdow7/sX5
-yehZY2uJVnErDusnoSm1LqhSEy0kYC06QcIxp6D+TlV0e2+1PpuEjzu0j8zs
-xn6qi7lvcEh4+75oYYcsusRUPHKGBLekBNdwfrQdISW2hAPyrE1KMlxY3+Mc
-k8nFAaZG7Fj6HAdo4SNmVG4O6NZFX/02ygHKmZ2pSnz4KSmhaDmAn2JPzkTy
-cyD3fOS/wS60fejlkWUckJkMc+JrRnc4/L0myIEWTSGFZ7XYr7HGOlaIAyEP
-g4Zlqzj/zf+lshUcmFp3z1GrGH2j/MSvlRxIdeDaXp+LzhDVbFrFgfOZtwdt
-0tGP/vaWrOZA7WGvS75x6IHk2y6iHLj7aEpOMAbNQwbuFeOAeuv1/uinaNGz
-zkPocRnWu22h6GZu4qk4BxIcXRwK76Pj+RbvXsMBi9yRLUf98XwP0kpL0Ssp
-jr3NXpgfoj04LMGByqP98XbXMY+VPP8B7RNuZ8d2RpPWZpskObDnV9fmgIs4
-PsLcjYYekLXpXmnLAYbaKviOpl/tePPaAvOjQYdWSnHAqND8vKIxB6hNFct0
-0PxcrRvBAPv5lW1wQTOOG3cdP4qf/jcfBaOvR9bHth9EJzOtYtDbO0+cu6yO
-/R4MPaej/8h/2zC9F/NVwcci0c/cdDsDd2J/vjTP22j9j5V0MTnMW9X2nEUv
-4T1iHS+DNl5zWxGdf7Js/V78pCnKX2bj+Tq9oP4uE8H8/fHZFPSm7uKXp/C6
-MSLPHjiDblNQs+rkxfMNVlGbxvkI9chfe3UxHi8zZTYYfaR07695XGeMztAg
-EfTssqzoYFyXtNB0VijOb4aRooXUPxKofc0HKGi7VymSyX2YV39zs8XrI9Uv
-/3P/H6yPNaMX4vUL9Np8xqSRBEro9gUtvN4HymPX9HxDk0OHPfA8WULSrW6V
-2I9XKfEVro+zcRKmjz9g/SnRoSpcT6uHI8U25KAvr/r9TZgDVcoizWl4n1Ob
-TohU4PpTrhIyrnmN/ZgbXSNwvQ6tChaxeIGemE2+KMCBWEv+xoEIrFeIMdi9
-nAOCY1yGvIFY3/pkOg7vh26x6ZOHnHB847nBGbyfRsuP+Y/bY17/+qg3zsu0
-+4vs1zZYf93n2wQF6xvUxShGmN9scWbMkaAS6ttepIb1PR38rSQJB4laAce9
-OB+b/kVy4bzpjUgTkjtx/K+Ox5vxfrfRK319UwbzyE9sbZzHB7xL7ZX50Bd/
-2gn1khCRZ/SsezGO/7LjTC9+f7y0i/8SMcsGhtWfRTk4r1mftLdP/GPj8+ZW
-2K4OEtppD8bSmthA/bg0Pr2BhJ1TQl5ybzDfF0t8AxJU31mntMRgfkUgZGkx
-CVomGR33IjHPSJTcXUiCac4pzZ4H6Jeloi7ZJPi5POGOw+cQzXD01s13JDT0
-S4RJEXh8WrBbWQgJN9s2xwu1sYAhpC9xw5CE+TeX7ffic5Fm1fxU8QTWO2ds
-Nf+KuYp7429d/P24NJLjP7KA8qWvdP0hEqIUDNM14jC/mOovu4uED35+hZcd
-WUBtHswzxefTnPzvbxXzE0BzjcTXUzb4sTeFDnMmgHp28PPaLDZwMy6dXDWG
-uXnNi6gUfH4akfVWXRPACNV9dDOWDet8BVrZFRP4PK95X/OQDUS9WtfGMMyr
-A12bLdhw+9Yzju9GzJWCBnImWaBTS5eUXIv9jqnJ0MdZILg5kcgVxeNFusT4
-D7Eg6lvBvSE+rA+neSszWZC54aeY2eg40Lx6i/QqWPCnYq2KUvE4MCSa2ZoR
-LDi4Os7jrzHmYicSA+RYwJWSMqXzYAwYtzyFBA5NAOfmqvHLMf+AOv2CeL1i
-DHZo+bT5KA8BTc5bue7sMJzZqbDpEH8/0H6sjKAw+sC5+bKDwfNuoD19Naj6
-oQs86SMCArZ/gHKh8r2cUwe06c2bb679BfTl2VLnLRvBwk7vxPfsX0DjcGmV
-qDVCh2+U1s3nv0BaPv3OTolG6MxU3lFzDu0VnUo0N0CfuPO8G7sdaOsSWIqn
-GoDz9zf9k0Q7UAN2al3SrYfV3iXdthfawHqd2vB33TrQTwlwjp1uAuu5cG77
-ldXQ8q99ZENnE9DnVpR0tFeBjdJep9cVTcBQH2r2TqgCt7xuR3oEjpf5naak
-UQVRJUcuvVRowufRJelbl75ATyPvhahzjWAtUDiX8LUCfOaDzjyuqgd65804
-7/RPwKvZ3SqcUQ/Wglcj5GmfIMxfwywssh6k28Mzlpz4BG94R0xCz2PemrxC
-bbQMqlYaGIXM/wDGkFFVqVIZiG4RPvFA6Qd+/xh9N2OUQKrBk8N+UbVAOWBe
-HD5XDOsppVztPrXAsCsRcX9dDKHpI2V7bWuB6h+ZUHW4GFyEdQ72b6sF6ftU
-9YZHReAQz/ame34H6rxU3BW5D+CWwriqzqgBmvrO7HXX8iHog7Gxm24Vzt9W
-72LbLHCSSm/YsroKaMm7pPnFssDAm+/0z/YvQF+Zw99WlQkriSKDg05fgFn+
-pmDpnkx4Vrrh6IqwSlzfltlRyzPgzZchtfdN5cDsk2FapKZAUbPfhr82ZcBs
-Wuplk/wWUh6M5hxUKANrHZWUePW38FLD6tjr6VKQpuwyHvn2Bmhx+69ZhZfi
-+2JjaiAZB4ecRz+1fCoBSnh53+JTsVDFbeVQs4UBlMutRlnuL+H6tcgpkz4A
-pm2ssH1BDJi2usqI3Aa8nrw96gvRIPlWzu1R5keg2tfIGIe9gFj1SLEAkWKg
-ut6rc/n+DDIuu1pd+VkA9Apx0T/Z4fC47vg9ebcCYMrGaoZKhoPbPrn03uUF
-wIh+vs874DGoLGEuOncgH6TXyLhLWIYBI+r4W+PXuSCt+zt40+kQiKXIfVul
-mgvWdSeqarSCIcCOi1P7IwcodreahNSCQFvpg44uVw7QPUf9L+99AN++bB0i
-7LNA2v9IxE+bu5C+k0tkbiETqH70X2897sDjJ781Cp+hp/yvyUQEgJHN00d7
-qjKAOjIVdaDVD9onl+yW25EOtJ4+hyQVX/Aq/pj39WEa0E9Q5ngzvYG4786n
-XZwKlKfiptN7vKBcuuu9mnQKMMOnSpJMbkKjwceJTT2JwPgRfvTHCjeQL+/0
-TZFMBGn7omf2v1xxnSxdrnzyHVjLMcA4ywXk5fQ2aRfFA+OlUW886YT7Auf0
-72NvQfoP48SPNkdoFAlXN93yFqivZrh/1F3C69hmePFxHFjLKl9xnLSDRo85
-5lhFLNBclINFtl4A+X/SVzznXuP+cU1L2iVbaPxpf+ehAx1GpYdW/dhqDYZv
-RDduVX8F0p1b+r7qWMJCqKXa/oQYoDT05/LZnQHDS4OXzb2jgLn9tNvgSiOY
-N1YKcOx7BtZfBpa8jT0FiYduRnufjoRQ1ybmC9MTYKjIyA75+ATfH7dxMi7q
-wbwUT80ruQig8P+6+MVJB97x6XenRzwG5tXGgmCGFpwmI+ZKFkKBwgq2FTir
-CbOf87bFN4YAo9boZnKEOpx8ddiiMvkh0B8rdndz7YN4j/qggduBwLyvv4Ip
-qAQzJ22Kl5veAekGqxPmF7bBiW3/hhUU/IDRt3kemBtBl29aPZbXB5hM5Q3i
-0pJAfhB52ZN9AxiBdmcyelYA3WnXgryNC9B+H6vvk18MEQejGB0SdsDo9WxZ
-cn74Y61B3NLvPaeAYrHF7rz3549ST/Oaven7CdqhzjFrRvjHDgnfMYG8swRT
-02mnHLXjo8TWQOV5P0eCoftlNNF18qOtzdZC1SduhHRy0j39W3yQn7rcjOzz
-JBhU4+sd5SLA4zM5Y/qSRlDvT3OLRktD5ptL1cqV/gTlwPX9GYFbwLK6PWr1
-+F2Crk49sjlxJ/CO618al3xAMEqaR9757IFM8ZL9tYeDCeq14ZnA0v2Q+uo5
-V/O+UIJx7dLwWjoBXFmnhj5/DSMYJwW03y07BGfKlzVk24QT9M7RpCURRyCt
-9dOHODKCkL6ipbLq4jE4Q9n38Lb0M4J+ZEt2oNdJSFs16no15zkhLRR18F/r
-aeDaknjm7LEXBO2un02IpTGkHZeU13B7SVBXbUrVbzYHP8UB3qdcdILCY5p6
-psYKdhSWewl8pxPMmg/XClnW4Ffje37WNpagOgb31x09DztMLFquKcQR1PGx
-0O8r7KCFqaI3OBlHSJeunSgcsIcdrLHdbcFvCaaBe8mB5svQInF+SX7eO0Ja
-d/+i1Udd4ejeGA/L8ESCuus796LH16DQoGl4sXMSwYy1Mx/qdoMXATotx2Xf
-E7RVx/cnpN4Aq5HtKV0RaYT0owvN3GXe4MC1O0xLJZ2QjjBzo9r6Aj3su65Y
-fDpBX8+TvvEeDVa85y0pup1BWJ/Wlzp50A/GmZ7JPPuzCGsbhei/k3dA3knM
-ri0+i2AekytonLgL52aypFNWZxPS69W2CbPuQb3I8JNTo9kEM6yDNOF6ANnH
-ztJiEnIJ6719igW2IXAj+5DRbtFCwtqQOr9ZIALSNZlC3AGFBIW4/IcrOwL6
-vnlVtYxhbmKZ52D5BEz7cwifmg+E9ROx1Ny8p6C6bqv8l4BigrGuOWPng+cw
-f+iub9pNBkHt/jOR9uYVRD1oaH+WziCsb6SaXNlPB+U6GVW/XsyzDauzXtPB
-2QpYhkYlhHV4W8h399fA9Ji8OK1YSlCVY8o2bo+DkpRLhof7ygiGzSPa0dp4
-0I9988Jf8hNhXXvav0wzAdqedvwp0f9E0NkyAirZCcDyPeVyIOcTQeVJ3CsQ
-/Q62nlIN2ef3maAs++hucCMJQki+SjmpCoKZJeDkap4KZ4hENcETVYT18LMt
-my9lQe/uLj89/yqC2fv1WF5GFrhtXVv1IBdzuz+6BVNZECwcZsqztpqgd+84
-vexhNjC6PNwpA9WEdNdir/bMHJAN1Ekb968h6BkPY9tF8+Fm37WwQfNagr5G
-WTxrRzG0uKm7p9+oJagBjr5v7heDyqKlZu7haI8CYllPMZBrnkovVNUStHbl
-JfvoH8FVNz9tpWodQTeufD63nAGOqbM1+8V/EDQO/+FLYSVg5XaHP7ChnqDn
-XFx9sewTHKRE+m863kxQKW+03jKqcSsoTLd3aCaYX03PhE1Xg8VIUFGSfzNB
-j81+kLjnK1xv92MrFuL4fs17lolfITHfyV5jSwtBLR/j/h5RAytcjugaL2ol
-qBqyqzOufYffneyVgTltBO2DjtC6d3XgVWYYO7i2g6BtuFFzrbgRLshoLSSo
-/yEoOSaDoUs7YJNsrdLKtG6Ctl7SMqKtC4Z5xZZW9/QRlL9z4+yH+D6pmTx8
-THCIoMy+0x/cPAx8xRk//Tz/EVQXo0HxqVFoerg/m8t4jKDe9Azo4pqAlROW
-u8YsxgjGTrU/uwQm4PgZv9Rftpg7GhR6ikzAp63V73Jd0Cx6zszmCcj8bBHj
-EIyWv/ir4MgEhCz43v36Cb1hnm/9vQk4fK3cNGL3OEFdyvqttwT3DW0DjTTV
-cYKinj/Yws+CIk2h01c0xwlGtJee1UoWKK0wPX7EAE251Gu4gQXSKf2ak5fQ
-6pWeowdYMNuzfJtFLNa3ClW3eLAg+8zpuY3CEwTlWe6gfC8LUvfliL0QQ//+
-AlbDLEhYLaa0ct0EQd0Rlvdw4r/3+zY7yrYJgjEmMV67gOdz8FxtuxbmvuEZ
-POJsOC7vEvfEY4KgLVhorddmQ89UyFEeJlojwrX4FRvfw0ZtfXpw/Blbculb
-NrRmnfJhD2G/N6cijySx4esV0ayuKcx7pwTTs9mQ2RkjxVjFIhizMf0yX9jg
-8+X9Pw9t9IOFLtooG8SeVz0ZSEU3Swr8USGhaIXZAc0ctEhwCK8G7h8De3si
-P7BwvhuuyWqSkHyDS+VwJbqkXkfnKAmE8YG2V50sglJjvmejGQn2qzLXGa1m
-E4zTb8sVbpCw/CG1IlmCTdCWb3pV4UlCxuLvzos3sAnq4jYjEx8SZsYGGWk7
-MB9ap25+h4RHtZtt+bXRvT/mJx6TkBf8PAFuYj+jwH6b9yRYLN16QpTGJig6
-Ponn00hY5J076XgX+zHwWZZJgq5j/VGJcKyXEvyilE/C72MCQ27vsf5J7Xn7
-MhICSl9EVGdiffR6pmQ5CXKq8hoyBVi/pOJyeSUJ1+S0Q75/xvH/VMLmakjg
-4b2tKP8b8xuF6yeaSXjvK9RK68a8ZWyrSRsJJzkxt5sHsd9rh9n0dhJe9BT+
-CJjE4+/73nG4E/fHn1luv4VJgspmPZ/ox/2tuv9aZXGSoHxMn+Mawv1ttnB5
-0DqSYOTW/102QkJZnIKY6jbMxxPXTI+RYOLnUBChha65uNFkCve7HYt+uOli
-v0fatSozJKSqvhgwPIX1QrZ1AnMkcE3USIpY4/hTJrFhFA7sNLDfw7ZDv9ti
-Tl3MgTPJlOONV9Blm1T/LOFAuu1unye3/jveBfUFbg78hK9P3f2wf4mvjicv
-B7il7NKM7mP/She9Pj4OWDY8Y4pEkgTtqLlAzHIOBCoqTbFj0CHcWV0CHMgO
-qhZueoPjg8Y2rBXiAP/h+YNPMzF3gO0OwhzY+zrS/HoB9h/YnXFzJQf3dYpu
-xgw8/qVltd6rOPDQrCpIuQLrRQK83VZzIDfH9q3oN6wvaE6xFOFAp/BcMdmA
-blcz2i/KgeVOT5uafmI9o9OeR4wDtrJfeCL7MVeKfeUpzoEQv3PSN0bRH/hS
-1q/hQGHHjIoJB12nR+aiu1WfnNw3j9a450yV4MCKSIVLYks5BEOzdnkRWm2i
-wo+zjIPrU7VUTpIDdgY2L5pXcghKf6P/fXRY8nRW3hq0b/Lhn+ginoivkdIc
-gppfMrNOigO9tju6b2zB+h0SUYbolYzyORMF7L8uc7UX+oCUtajKXqy/5Xf2
-Cfqix5SCuDrmlb5O//29LqLhsfbkQbRs1N7//p7HUNxu3XIU+zkVv3uIHgz6
-7JF/AnN27YfLaNF+q7BnJtivOe+cBlrz8GSihxWODzsRRkE7vg4rNb2A5+fm
-rpaD5xs5J/9TxRHzw7OG5uhSs08T4tfQV3PrxvH3H86xXD51E826+vYWWnwl
-Z1MrDW3FKmPj/Gk5hWoU3MPjtXFtsEE7V8kZPw/BXOpcejHOf5RsmdPNJ//1
-q7iwDF3uZ3HPLBr9fnDPMbxeYx3sV/vjsP7AbWFPvJ5Sao/y1yShVyn/i8Lr
-rR25tW4qHf0mq+Q9rgfXiZL+1jys533llYbrpTKZJRH1GXMuDc97uL4meEJ2
-e37F3HDjG4sVHFh3fovemXr0n44AGVyP7lJnvCU60cxl+2m4fukeE0+me7Fe
-NnhCbBkHvjYEpbaNoE8v2U3H9S4TDL+jZnG8f5GgH94fy84+fbJ0ySRB6SDV
-Jrk4wFK8onuVD523vdQa76eKBom8w6JotZh0Xrz/HKWuh4zuRFufJDMnSTAa
-0dMyV57E+SC+FpIkHGBsnP6sjvlW1rtsFgnC5+suvDiK1jY67jNKQm7ydo0j
-tmjBtPUOvSS88l4ykX4RPRLLt/CXhECDtneSV7FfybGEe39IMJ+4t3rMCx09
-UH/lFwkUta7BF0/RsyI1QT9IOFb1PGrsC9and/MuLyRhd/TVExa1mMeS1IJc
-EqSctLkrmjAfYPmbZJHwT5jtEt2F+fQyij1+/0aYnTiqPYd5/tq3tTEkdPRx
-T0YrThGU5b9UP3uTUFH4K4VnH5qfW8LnJgnpQdm2rhpTBK2o3GSLOwn+iue+
-ax/D/P2tsmOOJGz1KI4ft8U88bdcAz4/XHncjHQi0WumI3t3kfCn2OiW+kt0
-p/Hdndvx+9Zt32vFt1jfTTl2XpYExc7pIfEs9P0X4hESJIwU3g7o/4bjF9kd
-XraYhItOj7IecE8TNB1Ta90aNrRscmn1EZgmKEkrSLNyNuj8PLXguhpNI7wM
-gQ2yOqK65jI4fqWotEAGG/5uiPmz7QDmLyV3Pgxng3VjknCNO+bL+d+mGLKh
-9mHQvhIvzKN6rrjpsYE46GSZ44+e26Uhq8WGdWm7EmPCcLzCz6xju9nQHphP
-dUrBXDDP5skKNpiolzsLdaOVRdM3VbBAP66z5qThDEHzsL9dspEFF1n/bm82
-R9cKmy2IsyDg8PzeKZsZgrKvVnaLIAsKeyVe0p3RF0Yu7pmcgM3bDZ3+PUD/
-NZw4VD0Bs9nlgsElaN8FWfkrE5BUnmxQqTBLULosY5NejcNnscIl0Xtn8fvw
-3Q3+x+PAdKjMc1ZHO2ufPxUwDqLLuteLHUN7HDkS5TAOtw3WjV64gBYN8eVV
-HAfTltDQJdHovHTtk4VjwDPgXneAb46g3GWu3lI0Csz0EpkYIXTm/JGg96OQ
-f0PAbUZkjqANlky2RY/CpaVvRfNlMD9gkLDHexS+STeY71LH3Iz41Kw+Ck9N
-lHo2OmMu9loizvkfyH4emeZtRK/SY11RGYaFh6p69j/Rb2NMLqwahpZTd2M+
-d6L3nLu8fWQIHjDXUv1G0Kc3qsjFDcHIjN6dGZ55vJ6Zzm38Q5CrlCw0ooq2
-NPNfUjcAh+n2m+rpaKuAqrR9ffBG92N3YQKa6l4HvH3AxVmdEJuKHh+dedza
-C6XHS+Vci9Bdw9v8PHvhwIzUTuGW//pN8dAKekDF+Md+A6EFgpKgzt22rRvk
-l2sYVHuj/XZt5unshPt54SuyAtCqnyX3JnVC37mBuqiH6A/u9A3XOiG+INLw
-0nM0c8XHvVydsNF+3IwvB918e/uRjUyQKk04rz2Ejs+5WZPYDjzqfMU2OyhU
-ykdZJWX+Rniqd3ooShFtEWIiGNEAmyxjJBt2o50KhR3XNsBBn12eR1TRi7kO
-5ynUgxfDbN82bfSPHQl3dOtgVCspg2WNpl7aFPGzCtqO68bfi0CnrzqXrJcD
-qWeDH6XM/Je/Tz7XVkk8Lh6+0zSPzt/nRVlcRdyQ1PdaWLSISglVfJQoX01Q
-mwUvnuRFM57fW+9bQ9Tphx5kr0b/5Qo2lKgjWBrhbHUF9KgU3+n+RmK/1HPz
-r9bo/HoL9shv4lPLmy2Dn9FVWcfr6weIoXf8TaZf0A+8Mg/tGyRW3bwaUP4V
-/W6gfPmLQeLcGvXO1/Xoc/rZiba4DzlTH2XaiW7ivFg1NUyo/VwkWD6Lbuxq
-tI8aJTJ/WbHouxdTKTcGjZ5OThCv/oiXGL9Gq24a6Ds0Q8RfWfvx/hu0vb/p
-Ce8Z4v3khg9FCWhrneCu3BkiX3BbjkwqOqE/Klh+lvihqpE4Uoim2viMr5oj
-uMNtwu42oD0OqQv/myecDiXZ5PIsodIWos8+t11EbdnzYfjxiiXU////0v8A
-SsW9Sw==
+1:eJw1mnc81e///0W9s0IUSgmpZCVUVi5JRknZsgkhGWVmJDJTGSWSkaxSVojI
+04qyN8c5iIwznGMcSVbf1+d2+/3+Oed2v13X63pcz/W6xu0lbO9h4MjIwMCg
+j/387x/36YR88hYdGN7XNB3JewKL8ksv767ToV7R1AJfEQ/MlV829P5gbCrW
+YPcyERSqrjbtXqKDkGFdQZZJMiTX3jMImKZD6Jyj4+K3dDD6Bp6W7XTo0Yvz
+4pbPg54h048iqXRY+944b3KqDFr+Rh0vlqcDUSDLa8AD4NNu0pLWaWz8/bfe
+O40BZO2//PWnFB3iLpfvv36sHu6fZjfiPoE9H2YJOxPrQdol/qHPATpcT/Gx
+sHRpgJcjKQTl7WXYfECd6+VsAufP7xK/ty5Dz1R/C1JpARaf9u1J82XIeVfz
+zIO3A5wOzUWUmy6DWeeq4gfUAc1NjHuijLDnuc4EfnPugFBuJQFJvWWor9pN
+f/KlA9aKC875XlgGbS0ci79lJxDJEZ6sYsvQIZdrXZPaBd9t1aZkfy/BtDuH
++cngHjjObOmya3kJZIX6vr1+1gOPiv0Wh2lL8JrAfv7fmx5Q2y7aDiIuQdCj
+KseElh6oSjss0IpfgrUT/poUjl7IH1o3tGhcgpWnNX73X/dCpG7Ft/BnS8D+
+9uxOmcI+THfwglPcEtD8v15SrekDboHfX7VjlqCKgXVJpb0P0knylXvCl0C9
+jT2NjdIH5ZHleS99l8DcX3WYdrIfJus/RRVaLYFSiURjb04/qJwp0+mXWAL3
+pPftp54NQNihvm8VYlh/F/954/QBaGVavpBybAmI0b7H7xQOgEHfaSWrI0vg
+312/4d46AC4epeJz3Nh45Pim+u0BSH5XwrbxdxFC3Ici3rgOwtLh4k6R74uQ
+m3r+dfC5IWBPdCptaF6EiMHX0gSNIRD7T/CFbcMiRIpnM4kbDIE1Lc4y48si
+TArMxie5DUFbnSvlwMdFCAth/ZORNQTZNsdZ9iYuwlq40PTrXcNg8CZd45/F
+IpwsVMlwaBqGO/uNxTLMFqGTdrWgqmsYomPY2c8bLwKDsmbnJm4Y6rwC++/r
+LYJyfVGY8eIwiKvfsF9VW4QO8QATnUMjwPhrXyj12CK82jbzU/MaAUcdfr/P
+EwswLzXLncaJgyCHzQpn3AI4/r5tZ8OPg+cPfq4c6F8A/gyZeF5hHDRXFNwN
+alkAnuT2t1ayOBAVUXS/8HEB0A4PhWtGOJhav+HYfn8BdIlsdc0vcGD7Ic1w
+Yv8C1K/LagpyjoJ/64PEeM4F+GE1OqXNOwrxUzd7L7AsALlijvnW4VGo55e8
+lrNJA0Zj0f9CJEbhSETtZZdfNMjMijHl0xqFcauxC/QSGth8T5jdCBwFS84j
+Mrt1aSD/qZqrlDAKghqyqqcv0eBOxq173VOjMOl/SddClQZTkSarE8RRcJq6
+7VwsQ4NGyiG/4ZVR8KyoyjLdTwOhbl4BYXY8RFgY7C0Yp2LtsZmiCnjQjnc8
+0jdMhXsr3vucz+OB9Zu/1GYPFTQuVe/NUMdDvHSmzvUmKrBZn4ZJXTy82jH/
+cC2fCj/jWl99t8VDUX7EsrYXFfirNNcOROLBk5DCcM+VCr/8aWvRsXiQ2/uB
+I/0mFezcVonkp3iout8nvmRMhbnJxpKol3hovHrkZqoSFfx+GiceK8DDEL2q
+n8REBdOvwrJrLXhIEeuY5NmaB5uLY8dT2/BgYTWxcH51HnatzntKdeHhZ8su
+9kTiPNgm2QrKDOKBnGqgodQ5Dzm7m55lTOHhH5ovj02ehwcHdA2ObWD2rOz+
+OPBsHjrRkN3SFh5E3h3NFYyZh4YR5vRSBgJoclu8KAuch8IwkSKO/wjwdPqH
+z6jtPMgXc0wqcxFAKHXmjqj5PNSpt9HfcROg7OoOJ3fDeXjH8diOfT8BhioV
+TBg154F0oMqx6AABBGPyz4pLzIPQQHvFLREClJxvkvYWnQc1XNOlAFECqC+P
+H687PA99OhM2D44TwMmCl8+Aax6yGbZ0XMQJUCQV8SfgNwUa9Xe9Kj9NALWp
+rIUmGgUY9uofuS1HgL7k2rk9RAp8OZhlxXuGAKv/6MNvRingEpt76IoCAVT7
+7Kt+AAWuMeZpSasSoCcypISnmgJizLcVHiMC2Cu/KrAqo4DBsUGuMTUCROb0
+pizlUEBPaviZzUUC8N+gxitnUMB3mU09XoMA7/ewxES8pAAh/Ai94hIBunzV
+Ag7EUqDuGLfLTy0C2EpYet0Mp4CJRaTijDYBlif8XD4GUSA6n0loQocAvDrF
+Ny54UIBNSVGz7AoBCrba9B87U+D9SkjCY10CKJXN6gzaUWCqiMhifpUA1gKC
+Si5GFLgUrJA6pEeAxW5F2U9XKVB0I6fm0TUChD0yFt/SpMCzFiQidp0A+xS9
+RLTUKHD3YntfPcZ51LiDCYoU4LX4r19PnwAK2QXceFlM722xWB/GbSbNrMck
+KTBS9wh32YAAlmw/GT2OYf3N1SlVGNNgY71KkAJx0jk3DxkSINSbj87IT4HQ
+HY7aPhhzn5Sj6O6lgGqOamYTxjljer+SWTF7V0h3dhsR4GyiK/4nEwUCCYJf
+1DD+rhnZL75FhiGD5zEeGJtvvGn3XiWDmAXDVBLG88Vfm+oWyLC8i//HR4xD
+HHA1zCQyVHo+0/iK8fIVV4mWKTKoB9GNGzF2ktt4FU4ggxVLv00dxqMH41gv
+DJHhx3yHUynGVxkP39/uJkPPxQceaRjXkz6San6QId47KiQIY/le1RsBTWTo
+kgpLMcK4oKr7+9mvZDC5xdZ4FONDWbYKK5VkWLer+0fC7IuPWsovLSFDcf4Z
+k3yMd3qE8Xm8J0M5G1ubBcb+JjxRkjlkyHk/bLMb4/nzOaukdDJUk+UOvcf8
+aXvsjFP+SzJ8DvzMpIHxAHvLoEMCGY6b/j04iMWjBj9XPvGIDOKXuCgELH7S
+Tf6i6SFkKK3l/GiIcfZ7lufm/mSY1BYpbcDiHxsgcW/wNhn0X3UmhGP5sW1b
+O5XoSIZgvsd+w1j+3NW+anDdhgw2B3JLRTA25/M43W5AhiJ9mTOZWP51bf/L
+itYlw0pyfVTPZaweZ+O5NDXJgAuhqP3F8vVkRdlCvSIZVOK1/spg+bxmsPqx
+UogMTtV3dihh9eCmFHXY+yDmj51SzCewevkpzP/k9D4yuJlNprKpE6B1UdHt
+w24yJCxre9Zg9Zb8NFg8m0aC2YL2W5VKBGD15XhlQyQBP25Bw1YRi7dVJsvh
+KRIcTjzbuwOrX0fJBuLLQRJoHzjDIonVt3zbzvwntSRgxu/1OXwKi1fpC94r
+lSSoT3TViZDC4pV6PJK5hAQbZbOL0xIEYHLWdgx/S4JIN5X2x2LY+2JX3NGA
+WBI0No6J+wsTwOsCT5aDGQlG9MofdO/F4qveP/5KnwR5IyFr0ZzY++di0uHe
+yyRItqaKKe4hAPkST9r58yRQa7VtDWYmgMNlnmReERKc4dqfmrKNBzNDnrjv
+FCLUhZwPPUDCg69Rf9v2NBEOHbl64MIsHl4YJ7GcGSeCq/75ZptfeOgz5Yl6
+00OER0NSTmFjeNC15Am7X0GEnVeF/Kx68aDmyOMv+YAI+1q/l3h8xoO1U3+l
+vT8Rpg/O/cdWjofgW0m/U7yI4Gkn/z29BA9fXHju7XIggvWpZ9nv3uFB3p3H
+fVybCOtP7utbpOFBzI/HIZ6bCCioz10iGA9cMTzXV3LnQFrEWypXCeOv2v9l
+ZM7BXLXugUdnMV4KrtVKnYOXLbFHLWXxsPcGUSwtbg526JJz/pzEY/X/dYf6
+vTlw4/4zRODHw/4fTp+eqc0B8js4cPP3KBxk+cIrgZ+FXwUJtLB3GJ9f6BgY
+mAWZb6ZST3Mw9hIND+mahbSAUd6kzFEQwD1d6G2YhV38PhsxL0bh0Lub3/0L
+ZkHe1++R5ENs/dfZc7/FZxZeXbG20TYdhaMxtmN2XLPAPnTC8e82DpZVMoIl
+WGfBYfaUjM1fHDQu4g//ZpqFpKp7LkDHgb2ZqXX0nxkgfGk460HEQdYJvYmi
+8RloyRr7ENeLA8EW5cmNDzMQfdw3ujEbBweZ+GZe6MwAm5Uz5cwFHHAHd87/
+CJsGIacBrgMeI1CEZ/ju2D8FN9LDK0Jch+DrcmjohNokbGflxqdeGYBF4lOW
+gwcm4EPjm9qT3b0gOGDB61qPB52JRDW50C6Ql2kc83kzAsFfSj635PyAbLsK
+FZLqIFSfo67HuDXDGpO6CT9vH+iM9ESz+AHo/anksDbsBHtf02tlOytBp9HO
+7b5CJ/RL8N96PlkBGk/Y25IPd8JmS9lKVF0FKB+1j+ie6wA7MBp6618BYtf2
+bKoFdUA71cK/lFoOjPk3SUdz28HJoTdOCf8JKky4mkmrP+BrQ2dAdXMpHKp0
+CfB51QIlaFYxpqgQMnRJ5TYPW6AtPJHzvW8hCP9yXtRxboEHt+o2V1QL4TiX
+8y3Bsy1ASWgfZul5DzKuTsatvd+Ag+r2QX7lHWgI3jx9gOUb/FIfI3/WKIDb
+kZakWr8muC5vcKZhdy7QDhFE862bgJhg8ih0MAc8P1nYJlxqgie3T457vM0B
+75/mw448TcAUVuA9gXIgROnGN47iRhh2LAvdHfgWEmnGb2xnG4Dz17mh3PU3
+8MXk2o2dxvWg/IE5blYtA+YMH/f2KtbD19f9Ey2T6bBPv1UnU7Ae/paZZx4P
+T4fx5BBv7x4At/Z/Zk6tr0E71Prsz9U62Hem03/FOA0EDAW/fL74Fa7ZXdSv
+fpwCvleT3xvswXjujma7fAr0aHGkUYdq4d0n1xCH8ZfwSGU78KhrLfjpKL+T
+lnsJtGPj55/F14D6d+WwU79eQONaeoPTWDVQruxxvmaVBIfo+8t25FdD+CWl
+55ycSeBHfZL92rMaFroaKq0bEkFyKji8j6kauiwMmgpPJEJyu9UlVfEq2Ocs
+IcaxEQ+uGYd/7PerBJUBtuGq+09gr0Z6TzPXJyjZrHqY7BQB9wfrgjbGysA3
+w4DN988jmHL6KSZbWAY+H6vabsU8gvKYow8zL5UB19n/0h6VhINZ97vT9++X
+wlBiF28lWxioVbgds/leDP1nx2e4qcHAPVIc3GFfDCF8uTYVp4Nhen15UHGr
+COxdNr/G+wdBtFpA5D7ZIlDs615YZQ+E7vaIuR9pHyDR7j1j9nV/sJ7KeCfv
+8Q5+2/818tS4BzK7pnZks7yDo1WqqeIf7wKj2DFzzpwCKLbZnXCK/y7k3Slk
+JY/kg1n0QPbh355AXft8O1M9DzTRp+dXXtyBOoGNJvaxXDhqn+uf/dgN4lVV
+D933y4WnrXWyGZG3Qf5Rc4fRhxxwYGW1ehzrAkGcvVKsvG/htV6T9Z02R9CT
+3RfpV5INwh4zfwVmHUDI2HR8+nI2mO5P3Rf8nwM0vxp7Cg/ewCPZm5xWxvbA
+qzswQerLBNd075IgU2v4kmAe37w7E6IrWL6ZjFqC1fBPtUyVDNjfj7P66GQB
+OfbUN0Z5r4Hx7t2S0TQzkAvABg1IhW8nVQ2D/A2hueq18cuyFFDxOch366oB
+mKzJanlQXoLsA9v0MAl9uO9nI37EKhnGZt0p+f/pAfvn3wJ/XryAjFD9SwLr
+VyBj9fGe7q7nUPNY6dm/fzrQ4FO1GKKWBMF7chlOXtQEgwq9KZOARCh7/nbc
+O1QDplem+6XLEqDqodUB1KMOzN57P48fjQebgjGLCj0Ecreu6d+pfgpfXln4
+3LRSAZPZQPnDEk+gF/nzHEtQhPTpgfUgjliQv/1qaPWWPNTf3DEuGRoNtIEx
+Ay42WZiekmogLEWCOP4TU1beKWC2N8+JuxkBdBOBvnsPJUBiMjJKZTAcjl5w
+S36bdwL0bD+5zmuGgeXLq9fP8orC3YmJq6+rQmEzQSdAtkcIxL/y26cYhUCL
+CzeLyjsB8KrxEls7Fwi83BJfNzV5oaq6jWYq4A8UC5XRkoC98O/z0YrP297w
+5gavcmMYK2hWBgXyTXnBG4+22+IqTHDApTCcFnsHxNLRnmtovS7P0YqrSP8W
+jPHttogxX6yTt+dMv8NvBwHRKs8knk/WPfoaZmheZwyDEVHjXJ4ddWp3OnFl
+L9WhXuai6mZbTp1o2PtO5TMnEVVXwdfx0L06g6Ls+uuy11C4Zo4E26WvdRzW
+VM13bJboAvesRUv+cF1AWTPvfuSAXryZUFvIJ9bNV3DHGvu7oo4d+YKm3L/r
+ii1LttvMPNGdp/f3hnIzgLO1qcJtn3vIdGei2sK3/0DYdtuLLdEXPbkhSnR7
+ywGjdrmFhUUByMt6ydxnkAee39SdudIehCiFgoclafxw1ZEuOD/3ABm6RHv3
+pglCuNxVSc2whyiV9CpSykMEbMuFdJK5wtGLFVzj+OgxUDmz4jib8QiZb7Wc
+W40/Cb/PpmVG1kQhsQuzJwRpMtD32b12SCcGBVLF6R8V5KBIQR13fCQW+edE
+dtkVnAFnJRJ368oTJLyl0nH0jxJo1NSe4gt/hu78Z2IkNnQeuAS18z5Fx6MP
+xXIEwTtqQM0QaGLiS0RdV79HNBZcBEubiF6J8UTkUnbjnbH9JWg7sjBhmJuE
+RgukkxyltSAvq3HzrdwL1Dz25ANt6zLYZLuc1biegvqaKD+Ev+qDv9SitYFY
+KppemzvBv2UA8VW+UbYMr1CmAjPHuJYR1HeFjwSVpCFSlHRs55YJCG2k36/g
+ykTmXOVKZLIlKESKvm0iZqLa3GpX9ofWUBA9OONsm4W6qbb76Vy2UM9jyeGn
+8Ab9009zwTXYwdJJF5skYjbynffsy7vpCCEeH+69MnqLqvb4TjnccALWioWo
+N/Vv0bLEa2lPo1sgouZbUpySg3QPmgc6mbuAgUn4jg7tPKT9O33oZe4dKAtL
+f7vz3TsUYZQX/SztHqh+//mZbf97xJRRRTRR84a2PaId3A/fo7++bCNlc94w
+lfJ+RehGIZLSfXX5qKov8BR/vnSe5SM6nbk938ASAF+oRPoX+RLEMuB89NvB
+BxAazxpS51qCuj3VwuSJD0BTTpK5MasEKbeHiu+1DIU+f49DP9hLUbV/y/vq
+Uw+BzLSqMTxdivaGOO/+ORMGBw8yJdOff0KahnqRfXGR0Hcs0MGi9RPqbDEJ
+pGxHQsxpumzT30/I7IeXN+fdKFjT/tWdaF2O/P98+uJjEQ1Dfk0ssmIV6FrP
+PqsCpVhIGgwP9qypRKO2L7xZxJ8Ce8JOR+pkNTKtdkweuZkEza+D5Iz3fUF7
+LnL6z3xIgsCClR1fNb8g+adDl91Wk4AM0xlxhV8Qo98pNBv7HL7TmkckfGrQ
+ufM9VaHVLyBCN0LXlfkrCvPR2L8umQL/mJhe3eOrR/vOUIV1XNNB5m2YRrNs
+PUrrVCuR+ZEO9uqMC/v06tG8m8JsilgGNIfu0Kh8VI+Gh/ZcIREzIHrrH3Vt
+qR41RzIx1Z3LAq4/mxdCOhoQ7Sn3xOaPNyBEXiVFP2xCTcod990FckGth6yY
+QWlBnB2cN287fAA5T20Vj/9akda97ppfWR+w/VOeqppwK7r1RZ338dgH2HPd
+7uKUSSs6FWi54Gj6EUa7h3WPN7Yi5bLevZpXi8C7u9mmKOU7uqFeXwFCJVDQ
+lRFRd6kNOS+9MZE4VgZ7Ow16xzM7kezVLr1150pgWWn6a7jYiwKZntursgLI
+ftCnXzcaRMl7OFt5nzTDPfol2cSQEXRWl7AjyP0HbBqsu42n4FHAucK1SfUu
+kBwT5mpaHUeyU64fLSp6QWnDdNNnzySqqpP1wjEOgGz6SI5JwxQ6Zs+Yf8lw
+CCoj2T1vmE2jWGW1yHY0AnFDMgkvrKeRREpwX7vmCNw8blzW6zCNuGVvPG+9
+OgJcLekrOl7TSO+mokupxQjc3nUqQCl2GilI5ZGu+o2A0CP9MIHaaRTkO9if
+93EEYh8mPx87MoOKE7QKanlxYNv7peLA8RmUL9e2U/QwDs4JTwwZS86gWRFn
+s8ijOJiuP3GgS2EGkTYZB5VlcIAYqtPr9GcQ1Wv5k4sODlZC8HmZ4TMoWnI2
+uvM+DqyDhKrt5maQ++RR71QcDmLL9rMdo82gLwk5ygMTOKgksloRV2aQ6GNa
+CPMsDjiMfzN4MM6ifd0nHayWcVAn1aYddBjjFWH+KtZRODxxbyTZcBYdN859
+Jak0CoQLrX/aYRbJpD14RE0aBWb/Wp1nLbMoyK6m6GrqKMgXlaYZdM6iC9Iv
+P+ZljELcwdcINzqLEi/x7LuInadU6J5Rs79nEXlGalG0bhTScg7y7ZCcQ+Nf
+y9WjZ0fBfLf72bMpc0hgVYCn4DQeclhpXJEZc+iIkf1Gxxk80Pa4UwZz5lBh
+UiMXRREPYfvcs3xK5xD/xLVSbnU8FAq7s1a0zaFjg8t6nAZ42FR2H5fbmkO/
+lodFv3jisX0XrSqciYg0QaPHwxuPnZ/dk/pZiOi9aqC9oD8eRHXcte/xElHM
+WupJpwd4uGriXlZ2iohGxX+0ZD7BQ4ane+RpeyJqnuaw/FyAB+I9mu1DZyJa
+p722/VuIB1k/d+VedyLa/r22U74YDy3B7ouegURsfdAQSKrAw0Ksu3nJcyK6
+K3p0x1oDdl7OdZc+1UpEZ11TW81weIgtoDE/6MQYf69EhICHgUL3X139ROS+
+5bU0PY4H5zL3FPefRHQ/fcjFYBoPCeDOWPSXiBysdlf20PAwhXMfkpQkIUsl
+WqsJIwHCmmCSSY6ERu4y7x7cSQDhj1zUUUUSijM7TdfZTQDb0DKmGC0SypOP
+reFjJ8D48VWZGXsSctgUdFXfT4AQLi2VWhcSypUP8vDhI8Dh9ZdaSZ4klDD2
+iJ5xgACWnYrWF0JIqNzMyHbwMAFw94Ifp6eSkNLG8MnuYwTwt+pK9s4ioZTk
+8IcVJwjAr3Uk+0o+Ca33KpxMPEkAk4MNVX/LSYgpyVJfWooAA/U7Z417SIh5
+OsV2SY4A3u+NlySHSUiQpeB5zBkC8DzP22QaJ6FXKxMkvnMEMLilzVNGwcaf
+0vzJq0SAnj1xahy7yeh6v4hZOiKA5x/ClZk9ZITvL1mcUSMA56SUae0+Mnqu
+pRUoqk4AvfLuO64iZDTlTtYL1yAANV0o4MJJMtrHezTu7SUCxEV5PeKXISMu
+vtq31ZoEaDfnSWs5T0YurJaXW7UJ4KrhkJeuQUbE+cjOOh0CsEpXlHpfISNZ
+FnOeD5cJoL3D9LvIDTKSbDrTfUuXAERyfv9fGzJS1DJXPHuVAFEDa+M9TmR0
+uddabx3jlvxXv0O8yYi3WN7u5jUCOCVQGEwCyWhl5IAh83UC7ApUYZcKI6O8
+8v9GsjHOcXjCtzOGjHLyGMmy+gTQ0BsXwT8jIyOufeFVGE+fOyVdlkxG/11X
+S5czIEC4cKhiTDpmf/1j2RyMRdh6NWxzMH9V/1VhNSRA44rw9XOFZNTyJK7S
+EWP78bsWHGVklPzkUmolxju+NznNVJHRxZ3HJjYxzirdd7cWyGheQTxMwYgA
+ammOwUktZKTnbhjkgvHEo8po104ycptKb332v/tR993PLwyQkVnXLutCjAXN
+zDL58WQk7RSpWIvx1wvv3i9MklHPyAGj/92XxhUutecRyejeMzT0v/tUy/1K
+VKsFMnI4fXOhCGPJB2Ec+1exeA10pb7AeJPYdqpjk4zep7Z3e2HcYcCjH85E
+QTMlbx5fxPh1rcVdJVYKyjJKaWXF2O14TtISFwUxd/wObsXsUYmfLy/goyBF
+138FARizr8sP2QhSsPX6r7owxoSbwX94j1FQQfYJzTrMfx86v/F3SVBQ4+GO
+D9cxDjrHoRQhS0H8D8W8RjD/674xsVBRpKCQG8FPjDE+xJYZREcUNKDKutmK
+xa92/BTYXaUglZZvVXFYvOO0/X/yG1EQV5f7xrgeZm9Z/Y4ecwpa+agRcBzj
+zQh9DVVnCtqSs+N8geVTx0Kq4293CjJPPHio9gpm342pyA8+FLRTcVZ3BMs/
+Fal7Pw6GU1C28jOmRSxf2V/WkHtjKCglfTiYooXZw7CTPSYeY0PmXQQsv4MG
+nuv9SaegU1I0kddYPdQGVvb3V1GQWPax9ZdYPcXNbK/EAgV5uO9VVFbF5ndN
+i1e9hYIYjG6a9Ktg8xMZMSvpp6BXlJl9U4qYftvfsTgaBfmGz235Y/XMLq/+
+7+JvCgrji4trPI3pp8cKbWxQUObjoTYGGUzfS+CmC8s8agwlq1pIYvr854mX
+ROfRcc5K2yhRTD8sgmVLfB7pTZ377iOC6c93ipefxtoP2JWYCWH6YH1HBM2j
+QBIfZUMA078Vurx9Yx55D/9y+MyNjVfRtPn52TwSMBY9v7WFh/fzyXkbL+ZR
+huyco90GHlKOul5Hr+dRTY+Zcs0aHnwSuHJaCuaRzQx95BodD9J3rK4MNsyj
+pz/iTTfn8JAp+id1mT6PLKclRa278fDUou3i2fV5pFl9u+9gBx6CEtOpAQxU
+5MtQOtHxHQ9mDBoXduyhIrGMNqa9jXjgIsQTOY9TEc/BuyT+cmw9SxI/J2VG
+RdH00UmRZDx4tm399LSmogr7u2fkEvFgvaM3ttyBivau5qcqPMWDsoffuLIX
+FT04qBgqEomHlcvNEZdjqWibY1T5rg8eHBmtB27VUpFSfu+BLX08aHsleGUL
+0VCLaFlROiMe4p6e0b1zgoZqT2R96tsche5C3HEFaRoy2G4SXl8dxc7PwoRO
+ZRpiO8ItJEQZBQeLMs2/JjTEwHp9qbVvFEIv9Qtcf0JDbrcOaT3MHIWqA/tb
+tv7SEF7619M70qOwebY66zvDAnL6EYN+HR8FZGQVmLR7ATEpPI69fGQUWp7m
+ypzcv4DkrIMGqZyjMMB0Ns1IZgEd4qNGRS7iYJFq4lnotICYvRSy14twcKIx
+5eCN/gVUV6D3FIRwEP2hNbgEt4CcfRqnN/hwQE5e/bn75wLaZyn7R5wTB0W3
+jfIr5xcQo7uRkt3WCLxiZT7IyrSIFM8nv5HCjYBweVPerUOLyE2a6/SFpyMg
+vVu5XuTaIuJde7xXijYMNkF9XnoGi+jEPLtJ5a9hiF9yOXrfeBGN+3jmn8YN
+wzI+JbLXYhEpibeYbzcNQ0XJqm6o8yL6cabbeSFlGFTMy3BjDxeR8ekubQm1
+YdD5eJKeUr6IPhfzi/wKH4LEqdri8s+LKImjjGXSbwgIfNfder4sovNBS2M9
+t4fAPcx3ZnfDInrHLXMuEtufJpo2Dft2LiJLkjC/lsgQ4HdY1RrNYvNNOUw9
+9HUQ7pjER3DxL6GVkjNR9LkBqHx8VF1SYAkZeV8uFR0dAIaGym0twSWkUcx+
+WKtjABIlxvweiC6h9w0sOTYlWH8GcVeazBIi3+0eGfcbgH/vm/Q6dJaQwZiP
+yN6dA5Dwb5UvOnAJfQjdo3Bkbz/sLFh2mwtZQrSpTlF+hn7wv05r0AxbQtsv
+E0jbtD6wfTNze1fMEtJdFZ140dEHMhcHICx5CdW5GFYSI/ugK7L0VnDpEmre
+dl4UWOsFVg63z3fnlpCYabhqVEcPhB+aNLEyXEYqGswSrX4dECkhshhmsoy0
+oz2/Cl3rgGilmzEFN5bRitdiqunxDnhqNlNDt1lGz8u1Ga0G2uHVc5JQrNsy
+2uR7rvVNuh1K2ZfJlRHLyMH+jfmOsR8wscn4gKtqGY3MsBwcFGwF5THR/KZD
+dMT8TC7P8EwDJBPNljSF6MiIObt3ZKseFulxym1H6WinRxjLqZZ6bH/6u7tH
+nI7qHS5a6pnUA4fCt7UxBTqK75y8/5FYB1OJjpfXjOjoukAQ7p9eDcRq51El
+n9BRwaSfSmj/J5g2HD1XEo/pbfSFPzH7BMiGI0zuOR15Ek41KoyVwYqPL69S
+Gh0tLs9mOc+UgvVbTaT1jo5+4s7kGU0Vg+z2bLzdN6wd1UrKzudDHIsAfvo7
+HfX0r3NTSXkwt+/aMecOOrKNHsZNzObCa4nP1e792Pin01ndxt/CfzeipgIn
+6UioXJhPJjoTbB1qJP9N01FWdsdeXr90qPFY8A0jYnofXcZuOaSBZ6QpW8wC
+HTE4r67pKr2EtoTHxux0rP+2uuGEyAsQTYfMZ6uYP5BJEp4lCUIK6CTudYzP
+qqhdWIiH//f9E/r/3z/9Hxc7SXc=
            "]]},
-         Annotation[#, "Charting`Private`Tag$150181#1"]& ]}, {}},
+         Annotation[#, "Charting`Private`Tag$4684#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -789,7 +798,7 @@ SsW9Sw==
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{0.375, 0.375}, {0.375, 0.3750000000000284}},
+      ImagePadding->{{0.4999999999999716, 0.5}, {0.5, 0.4999999999999858}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -809,20 +818,20 @@ SsW9Sw==
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{-2.5403541891658863`, 
-       2.5403541891658863`}, {-1.4444890988021655`, 2.218189614824275}},
+      PlotRange->{{-1.2494108745616666`, 
+       1.2494108745616666`}, {-0.4426732863775592, 0.}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {431.59704100747194, -87.675}, 
-     ImageScaled[{0.5, 0.5}], {269.74815062966996, 167}]}, {}},
+      Ticks->{Automatic, Automatic}], {479.8347252809547, -97.50736892665735},
+      ImageScaled[{0.5, 0.5}], {299.89670330059676, 185.72832176506162}]}, {}},
   ImageSize->{
-    UpTo[540], 
-    UpTo[167]},
-  PlotRange->{{0, 575.4627213432959}, {-175.35, 0}},
+    UpTo[600], 
+    UpTo[223]},
+  PlotRange->{{0, 639.7796337079396}, {-195.0147378533147, 0}},
   PlotRangePadding->{6, 5}]], "Output",
  CellChangeTimes->{
   3.826008397009801*^9, 3.826008507422884*^9, 3.826008595888225*^9, 
@@ -851,9 +860,349 @@ SsW9Sw==
    3.827405097886524*^9, 3.8274051043033733`*^9}, 3.827405405700671*^9, 
    3.827405692550297*^9, 3.827405734644206*^9, 3.8274057812126303`*^9, 
    3.8274062656095324`*^9, {3.827406308186413*^9, 3.827406311147161*^9}, 
-   3.8274063894409723`*^9, 3.827407336244371*^9},
- CellLabel->
-  "Out[783]=",ExpressionUUID->"f1a29def-c507-49d5-a1eb-e27b3b7aa51f"]
+   3.8274063894409723`*^9, 3.827407336244371*^9, 3.827409574280491*^9, 
+   3.827409883702799*^9},
+ CellLabel->"Out[6]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJztfQl8V9WV/yu/BHDrdFrbae2irdWxLrW1tcvU1qqj1i6OtXs741IrgooL
+oLgLyiKIKKLihrgjLkhlkdWwgyAkEEhCCGsghBBIICEQtvc/3/vO9/7u73Hf
++0Xtf8bONJ9PWO57795zzj33bPfcc39xeY/OV3a9vEeXKy4/5vxul9/QucsV
+3Y857/pu0pT5WBBkjgmCYN8xAf4dyj/1j9jPsfjjoOb/s60LzV+ZsFOnTnwS
+vdnf8+Ddj9I3pv3D9p598pHH1//N5eavI8J9+w+ENfXN4ZKVdWHRovXh2NlV
+4WvTKsJRUyvCV+V3zIyV4ZQFa8OFZZvCNTWNYcvuvcF/JY13hPnnIeGBAwfC
+dbXbwxnF1eGb0ytNZ2/OqAxnlVSH1Zt34Hlwo6eTG8yfHcPde/aFy1fXm4EB
+DAAZJ4ABiIam3b+MUIjAKAx3te4L3yuvDV94e3l491Ozwz/3eTs4PLyk93h5
+1u2hd8Khry0KJ85bbSDCyL9PAv8wfbB1+67wlSnl4XUPTA06mI4yYdcHpoYv
+TlwOWgXXezroav4sMKgvXrE5fHDkQgDCz3s/PSecvnh9uHff/uDCCPw/6het
+guy8ZRvDB142XxSaLw4NbxTI+4yYGw4Z9V447I3icPhbS8MnxywJH351UXjf
+8/PDm4ZOz75eAFjDZ8eVhmVr6sP9Bw78JgnHQ/TBrta94cuTysLL750g/4uI
+detjM8IHX3kvfHx0SThY4L/l0Rn6LBNe2nu8AaOuYafimtv5Ndp2QP5aXFHr
+fNseYIa9hACYiGGji8MBL7wbXnP/FHYNTBcs34RPg59HtOEU1W3baah+1X2T
+LJTXDpoSPiaQTFu4znDknr37gwir9mZ0zB5m4FVhHLDDZfdM4Eg3PDgtfP2d
+FXgl+FUShTqaf3YIV1ZvC7sNeQefmt+bhhaZKcQKKNSP5d+GqWWcoJ0OckXf
+t8Pxc1ZhFiKqmDGuVtZu2LHL0Ji9Cv3Dp/+6JFyxbht4hx1vkiU5cnJ5eGW/
+ibZjzPzOXXvMGz+N6PRb53VQ9tJ7JujrBWGXgZPD5ycsM3hIz59UdgPIYDf0
+JhPDzoVKZn6FosEvk0jTQckMMgBwICBTE85esgGkP1QfgwfBS8Sx33Pzw8bm
+3Vd7uu2inywV8SMsYT8Btzc27WaPQBvcnZ2L6cBZqfBr7bippTV8dnwpcLFE
+A9/NX1ZjFt5nnVmb9t668PbHZ1r+vv+lBeHqjY3mjQuT8G9v/lkYjp1VlYPc
+jp2twREKqky7EaJ8ft3gaSBqF0+fVzlcO0445lL9BAuicv22j+topau2mMnE
+I9Bo7abtwQUR5hdz1cmgkN7ymsX8nuFzjRDFsvqCszrL124VWbPAYv7o64vD
+zbLOQi6/LJCFxNfBZ4RMA1j7E/oMRAOOeCbcGi6tqgs6e5Dt5NDnufHLbH+Q
+byKM2N2Whha76roMmAx1EfwkQvaXujAhFPo+O8/20H1IkZH/QPTL+s762h1G
+BLvLDFpEdEXws6TpLVAYZsqK5ocvTSwzHX9Sn8lUG6mCZ5Brwrg6j7kdXumg
++8SbJba/N4pWoD92t7251QgWwykiwiGZzo/QvUh7mLt0Y9ip/yTzClYp5Frr
+3n3H6WMsbwKEX8i44hWbf5qEZEZHrhA24Bp+ZmypQfJIfQb923fEvBwkO3k6
+/Iu+D/Z7SnQTYRC9HXxan8kqNgyN9juemAXQg/MiDC9UFKAB3c9vGzYT836C
+w7SQMFcPnGKZG0yLqcAb5yeh2s4BoeugqaZv6B6xeYLP6DOMjTY8g+SWdadz
+50O1wNgFhFNW3L9o88YtTeFf+k40zSLOFcFfKIJbGlsM7vwQilcE0kn6uFmk
+2zNjl9rHgFWWUSJeH3PIPlBhh6HT3LJHZVyEF8wHPBPCQVoqDrkdXqEIwNTi
++BPnr/6cNmNdsVmWxbkRXj/XQbD2oY659uXt4FRFCqIHvMivYZ0JzuemI1Vg
+LDW8D2FYtaHhKB0KGkBsCvOo5yPTjRa+wtPXn7Wbkso6K0/F/Py8NmM5o6lT
+/4kQNf8e4fMzHWSRGC6cRUgVmdXgm4oPlIa7kKFY6hu1Bw8+MhgEFbv768yV
+X9BRxISyug5GH6SpAdv0crm+VSMcBd0aychFxnL9vD4TOloFCwbA2j0nQuWn
++spMMb3FGjCvgA9ENwbf1meQKJgu8gZE9smKJnjqjTfeCLt16xZee+214SOP
+PBI2Nja2UzQXLFhAVK0R1KtXr3DSpEmK9MHkOEB2lb/IrnfKasAy/KJ+BWl0
+mYIrIvLPnm4u024gnIj8HY/PAqfbbkQ12m5EZChNLtAvpy7M8jhICsvxO4o3
+FjD5C3wDd0VocaI+fvvtt8NbbrklrKmpCXfu3BkOGzYsHDBgQDsdd/369eFr
+r71mAJWvCsJt27YJ+HfeeWc4ZsyYcMeOHSmUKTD2GMW72ApHa/Ok+WssPGIE
+XJ5IlILwqb8usdaYsB17GDk5Ynd4L6Jkz47o8RMPPWDzgxG/pwjDqXrs9WL7
+HLa7UNro1/bhpk2bpPd9+/YZKG699dZw6tSp5JG6ujoD48aNGy3W27dvN203
+3nijyHD8mQk7d+5sWGzQoEFe6uxXJDDh16uFIQbtMQ47ASpKTBhhl3m6uVS7
+mVu60WIjHsox2gxEab+IcFcSna+DFC1al2OTYhX+G5eK/PW2SCsuM2hhUTVH
+Kwz79+8HogbZAv1zy5YtYUtLi4Fv5cqVGX31uuuuC9999139X/bze++9Nywp
+KQlI2XwrjRQD8xoDSqxGkVtfVmQgwiiS4YMcsNTJ7eYS7QaCipaHeGFfiRES
+1oOolbMiip2ng8yTpxS84EpQ7If6DEKZggcKa0NdU3C8AiArxgCxYcMGSwOs
+uBkzZjj4tg+rq6sNw2EV4kdpYoRRIXrYo6/DPICYV019rDaLgrczJs1cC2vX
+rg379esXXn311ab72bNnWzCwjN96660csjc1NRlw5TsrCF0aMjgB+4+mFOwa
++CEkJBgIgQFdX0rIc/VLKFAaaFiJWJ1n6jOYt1wSmGRRlMFxCoXDX4GPwWjU
+jxs3LnzuuedcInox2afQwh2lHyyi+6vaDH+a+l80asQGHcJdu3aF3bt3N3Rr
+bW0Nly9fHl5zzTVhWVlZQKk5ceJE046fPXv2GB6QZuEAA0BpaSmQ8TH6f7EH
+NRZAJ7EYCRNsYq5akac/jgj774o4IlDUrANfjMzBs/QZggdULsBIxK4StoNh
+iylTphCIcPPmzVbO0TPEqu3Tp09YXl6eStS9CilMU5oIsnKO024QlYNuQzOC
+PVipP9RuQE2Rv0YGZ8yfhUbk4mfOnDlGcwsYVmgMHz48fPzxx3O4F2q8S5cu
+OeIY4F1//fVQWF7h8p/aw2bHqhk3u4rrF5aMWjSBEvwcxQYxD3LrXU/Ohiay
+z8RmDXsPn2Nn8d3lNUE0jZHSvfnmm82SFxVqbJGBAwd2VEDQfNddd4W33Xab
+lQAJZEYMCSNgamUdHa/N6xxzYVZJNSlcWVlpJXdGJXfv3r1Nl6NGjQoHDx7M
+hQV+uOOOOxzidgi3bt1qwIZEw08+UfEnJQXEAV0R6BIseEKKQJfD0WdGBD5b
+v4SxD8LS/xOusmIE2hPBDRoSc5ZuCI5VAtPYw0KFJn700UehqRkjhIQAoElM
+TEkLJxa+E4aQ+TtBm+Fv08QUYUxLGTIH5hP+Rx4F3/bo0UNBjoCD4H/44Yfj
+JMwK+j/oOLPUXQf7iGCk20iGfOS1xSo37SoHpWHwcJUjyECND9uaATroCbHN
+gu+nII/4NFlL6Enkxc0NezwcOfbi2xJ5ZZ8c5F0eIvKYGbw3f/78g5CPAcI4
+MqJfIDVGfHVaxde0GfqOuNRu3fkjlxIF4eR311i+Eu+NljLkDwKENEqxKr/n
+GbtVu4ERhWiNuoknajMiV+xdLPxznNnG+nKl1NNPP22lFIVpfX29EbowutMW
+ECkAA42mhdD/RH2V6nfEuNJA0f+xQxzqWHE76AeCBx5SHgD675VvCr6bgj6d
+Z0RwrF9fYEJbdHZkMUerNasaR48ebf69ZMkSqxop28D8Dz74YNq8k/1XbWiw
+RBYDi4PD1mL8prF5dyTbrAEB44giGToQsoZePbDn4gFxFq/YrG5SLgC7dSSs
+JrpOYnmerM2I5FEqTF+8ngJ/3bp1Yf/+/Y2hBckNQ+sQ9qRcn4L1751XaTs9
+OHLhyU4zwgNoHjNjpWL9Ix0bkD7wciQLEZOCU3yhgzXlJGgm9AtOT8Ea5hnf
+FQF4ijYjvodmOPhib/8hBQXEtNiD+GzsAfsaaMb0yDo8w0Uhy2oQ5WLmXKTQ
+iytrfWv0V1q1Rd19H/QZu7iHjS4Ovq5du36WGHs+0H/nvApmN7JmagV7gBig
+w7CwbJOC/kN9im1GJxxysYIO5QUbB814XFXdEHwLz8zQu/RjGGZU1bJqT9Xm
+mC/i29ojzKOLKq2vKBbIqfoqtkjUzAoU4DMUMkhBhlYRTYeh+CsHavIf5lpE
+a3CaZ3TCP3p6NPrtj88EGxJ+4wIMty6AD/7f6qsNMBXVeZpRXP0NbcauJpe/
+OGw/cFEoMLuvhrDyoYD4G4W+2YmmQUsJA2ugK3fsFoIpy4pBXHGJv6nNFeu2
+2rEFjt/ZWSPMI3TPRu0uDtFLCSeLJVCAf6BfIKTIeZ723rrfKcCIoJLh8DWC
+Pt9IAXhpVZ3FW5YhZ4YLXBS88kXu57/RzyG7qBcWV9Seps3YYqGNJehEgQCN
+B0QShETFQAfsWi80gSk6o7AuIG9PTYQ/A6PFvPvEmyXRYlDSkNry79+mwE9N
+CO4VMAg/AgBkoaUr63Lgz3pygFNM9j8q6CAlZwS7a0Dr656xd2o3iNRCBOH9
+8jX1lEK0qYQygQ/0X+vnCJpyuCUr6/j5k7o/AGtO4f6+swI4WTOLq+mnIPmA
+5Bo7uyoNZOxncl6F1b/Njjdll5bIHN+eOqHm9gXWshCIPWCvjSJZ6BJBrJZU
+FBvgUhigYVx6tly4+BUhd0oi9BkrPEUQWz3NwBikmg/uX+kwtVubLbVFZ5yu
+zVjvjBQJHXPgzuogYCVC5RJFB7KMcUjMh0y+hpVzx27WbiDQGIkRC/w72ryh
+rskGkIR+v06BnvH4e5+Zi9GJ/CjdoxGaKpOo9VYAS8j6/qKDGFOGpCcZIc1l
+/QcnJYKesZFZkWuWKtg9RxvMTQHGl19wsb6K7XpiLnYEgaMoxyNx4b6XC/rT
+StqbxbwRUcN9Aiy3m9XiMftrIhlPTAGdSkuwt6DXOPCIzZ4GOrIMHCwJnGsD
+Tl24VkHnlMJ75ZTKmr5CQccWB80FRLjA/8ZtMUM36ceQxVwJm7ft5KqnQAA+
+8uHFHph/qa8its/hy9bU05ujSu7/3HylRHC6gw7dhsEjF16pzcUrNtuOxs1Z
+9TXPmE3aNmHuKkpgK2Ah2iioSio3X2xRZcIFA+79BCJ+hGgVmULU9HdzARXH
+zLV/OmnzW5qggI9Efp+QAij5QfCxSpibkYgpCCl8+SAX6avuahUXj1CDgORK
+UeMKNcUinONuak68PKnsKuUHfETF11m8SdhU/+oZe4d2A5uQnCHvEvp6sRWo
+gMRzS4Y+q2azxl/GqkG0xeCWNWNFhKy7zgo3rGHYdbR0EN86PhHujHW673h8
+ljWOaYYiRix0uMjz+X/oqwj+OmqJpt5a1VYQ5+LYRGvPGg+u9SgTcrWCjhA/
+c0u4y3hcCugUkrDcCDrCe5QeYlUkg55VS+Jy2s8x68z4mFlSHYObFiScOpHS
+12gzvC/qLWF2H8jb9VXYunxVBNGP9FWaSJhmH8gX6ucIdzrqiJ9zI1mIpmIu
+oJUF6c4BxXdmZiAyfLgmpaOvpoDM/UBjj4QhfT+sNU68zPZ/JEKd9WrEHlGf
+v8CkZaENES/xF0/PhZoeITaLZcyuyiCYHYZCYIDDUzg2EfSM1YJiKWqUJRuJ
+g7PpA/oXzkyRR8V9JNxQztTZwl8KN30Q1yoWh/h6hRt9UcTAtoLB/RXP2I3O
+IIxgievPABENOMhXETe+zDBCzySp7uJPyWhE/jElyHPjlwU5oGe9EaGvpsNG
+0RzqiDdnVKaBXKGwgWQiUQkyZozB4JGTywzIpoOf6wvwU7jjKaKIoUBkBRj4
+hxRlTdiAbibDiMbV27S9mzbbLWphalmTX7aDNSrgzJeBx3W2foR8vMjRmASX
+5BceHAkrYyRQB7ta9xFWxDq5KMWKyIFV6PpiRFdh6aC7w8cQcGhHBAAh8mMS
+iZuxm0DvvLfOwg0eIU+JfvfB/TNnEqgSxC5n5JPKduK81apUAkYC1jrOhkh4
+xsJh3mFG1FAxfHy0Z+AG7cbViWI5nRObJw0q/TwF9GUatAUXimgn6HRIYFTn
+gJ7Votj6uVl7wbIkH48uqkwGOWO9r56PztA9ugKTntxZl+OcpRuS4c2uIjEI
+7eeMicIMELaJlIkNdBnzO6tAe2oz1TIeCRG+lAIy9diLE5frRkt2uwP7djL9
+vizDn+qrriCXuSbU8AcZwV9cUZsDdVZh9X12XnCLw9UU3DBKxL3RXJjcgbc5
+I1DKiaFP0KHBOVnSnAx6xnohA4UNztM2V8Qp0Axmgh3Zs8juWxVuNxNhkIZK
+3K2PxAykQjcDyfz0798/MNtBAsjKlSstwNxY8JGhymEP0YTEg048rBMfDS7Q
+z7FpSwNTrGt+Tlkldm+cDC9NKrMOmuB6mza7uQjCfaRAarJRh5xkI/wUFxeb
+Df7FixcLFHv27AmihOD8lMhYixZW0PkKFT0O5U5fJikpQVtZrdbzHH6yQqix
+JTIxAsboIbyZBSL+CzdPX3hrfnjpnaPCK+5+NSxeVtWu7UlG7bWtrKwsvOGG
+GwwhOqQgDTlKl+cn2kYpgoCbwdh8+hOFDdFersyZxdX8iEpiRnF1EEOSziUy
+1WXV3a7cy6Sgzld3Da/sfE14VZdrdQO+TclBxLSqqsqsD2m3bS6mWwm3OFrk
+VJHIRMcV8SIyLvD0wFe5G9E12toi5txQl6VPzLnxZPYC1aUQ0X6XNrvJRGI8
+cx7zpf1wHpGfg+wEzG12C3hLDCGYiUJtAo81wDkSTvfhSabHgsFcqUNBBsdR
+FjQhy1V6+2Yuqm9r+gm0qhDnbtPcEQrLsj+ip/jJM7EdtQ1oc2vUl4SxVduo
+bGA6UqswnQ+CVXT8TzyfE1ucjyEDNLfsIbYwNgi46CjFlru5rt0oBkxvnR9a
+/OAQTclmqowVPW6qDLML5N+mTdg+FVVGSEVAWlRhHjgbTcmoZo3BZ8YutUKd
+mzpCsSCGJI0RcLBwcoTkYUZh0fTT1Lmk9BRdkB1M+gS0Fbaxsbaxvd2zZ8/E
+ua1XEDAWtYLMAoGmS4dwVQR0WtbaoW7WmvmBFrnpppvMuwD7qaeewrz4Nlkp
+x2u37swa/bXbCQltesTilXzMNtjvLCNxX+5VWFxFJxZ1UuJJRLn2JutBKGkW
+PFbD0KFDoQx9oJJoxcrRsIKs9RWF/hyOPlWnJn922mE52Wn4wXRCI2MlY8qx
+UQ1JtXfvXu900ix4WXX/vc/MtW4NTls60H4jl4gM6kFJyurso83cwMQmqTg9
+n0mkRsbm/WKG6KYwdCN8ZKNqHyaXjOsYrA0YxCzx0oFGJnQobc95pRtJCnD7
+ZVluzyFFxkT2aVr2VaaHG0ahgJWMbdlPpxCDq11UmXXW3yvfZF1QESaM1n3A
+zC+XFGCjpHxvkoJCBo6oSFXOEJGCWFI6MJ3ItcnEfemnzdi+YcRElpuPClSR
+MalCQoCYtMSnLFhLZyNfkhZTdMTahHEerl69Onz55ZfNAsqqZzrOkJZ36vkX
+MRkZRRmlSgxcmoNvxmw00i69T3uhfoPSWlPTeGQKstz+1fXFWB6tXZOrFYbc
+VMuXlEVkFy1aZAiAKb7qqqsgIbz5SPTnmIYKstvgUYE56+gAF8kkXZJUbTYI
+dp+O7R6eAPg4u/CpRApkbFoa4pMMHGPzi85Y2Zp6op8vHYs5SbBdx44daxSI
+OeSQhHnG7hK5oxsGZMymvjmGNrQCniDGKDw5QJvhPzL2J0ItDWOedkJs5aIY
+HIgEReimp19RAYGda2trjfcF9Y3lIHLAN9mMsCAJkqb28tX1hIDHvmTJa7zE
+5nRiSpnkK7L9fm2m9QhaVazdak4KmiHr9AXYYRxJ1gF3Yshtl0Xcdooyji/f
+iud4J0yYYMwEoA8OgBpOMAmIJneWej46w92nwOkuuk8xNGOr4H6HoRm6QPgf
+myb/7BmYWDMACaUoDEKsY6LFdxyLUmi/k8QixiT3hahtuz9clAt6xu4vg40f
+0F5g4vLM2/C3liaDnN0DhBDj/imzElT0n5MC7yL1Pa6Mcli4m+k6141NuyOJ
+rZs2kXNN5ihdtWWwNtOPwW9J5eZPpEDNrEVs8RDqmO5OhjpjhdSz40rtGXtu
+74g8C2LwkkY4VSBC5UFtZh4BnAoxgf7JM+BmhwN4nE7kPsekCQSzywcvQ8kI
+BpIyomX5OSWHWG8EmacLYLwytXfC3NUPaTPkG9PnHh9dkgYy1DaXuHzGdAZ3
+q2ndpu2GoqaDs7Qvet0IATIvgskYwDMGaGlV5BWDH4QvhrDZycoVR/DjiYBm
+7ElonJRnGsmgl7IO1dmeb7kPAZ6h6JY1xkwZJtUAKFkAp7ggZ5kPcmSofoHT
+yQ4vHJECLzeu5RObC0XPAMtIhMxZKSATXYR6BDaCDBuJVtaqDQ0KMg8UbduR
+zUysqm4g1GAHShthhzSoET3Da7OXbLBQu3ZZ0aJ1yVBHB/3xmphTNrOqn4a4
+Js1fE8TgZWRKY5GP+LiiovZwz4C1+ipMFPKpLB+OyR2Cu56cHfjgPVM/d21Z
+8TD5OUMaj71eTJB5UArEYORBiPGYnzEOSwGZ2boQYoI08xNhXlya3Rv+cSLU
+WQ0HYc7UQUrVbg+9EwcZpWrwCCtgV+s+guwGvoUrDMhmvFrtkiYqYtDMBh2s
+hQzA1T4QuT+MaB83TWTFMfEVlgnp3dC0+2QX0Iw9cQK3kIeEKDiUFw5NJGzG
+FlmQybeJzYwuwYwVXjkzBWTGzCHAZcUR4+4qXpF4r/B+Wb9w04GEk56wvLDU
+5YVDPGNu0lehMKjBSyrrCHVsxSVDnfVKR00pD5gmzU0QrMIckDP2OCZygZ70
+MILomjR4kftKjEWMc8DRznLzAcv8CnezSRQPP+eOIPbzFF4eiQWBqOBEvTzl
+4QqxTTomgpy1qaQXezoDaTmXxvIwzNc8duWuMH6EsjjOuj0pF1A+hVMjlKH7
+C4sdUEWbQvgz2jbCDw8ir1ixIuCWki+KdnrKs6QIG04rwbPguyNHjgybm5u5
+7ZjDorv2+HYoohSm9ubID9yvrl27GsMcHqq4X+104BdffBGnpvMNzNxZOHi5
+9CgwdMCPbqexKogPXVoaTKtEzP9P2sbUDoimH3kQYnKSK5rmL6vh9GKvgDxR
+t21nzvRmdzzhvUXRrk8Z4wtBB8bTEaHD/7nhBY8Om2OMYqVF+qJNurZEAw89
+KBo4c+ZMu2GzZs2asG/fvjiww7l2tf9TY5YkznW7cMiQIfK+zJYJkiPkMGbM
+GI6KiMP06dPzjcr8NHjoIAZcWhmqHf7DcGZ81zANaRrBDBnCpf6TjhET7ly8
+vkmPCXfyDHdkcKhMZ/xoh01oMzqmKU5U5oYpOxgSuD/Amwub5M4XwmSe7N8i
+DLpq1Soz/s6dO22iAcNQxjVZWefbqfs3baPMqq6utsPI4jNTlDQMjyctW7aM
+fbYZdXqTWDekeMW6rZxlKMPrrcW1PnmWs3GXV0QZ/qe20XFGW2yK5+mJHTCF
+jMIpRog/N/LawWwD5JvifLE7TvGHjOzKkCbkJ6vGZuzQR4Ual/Xui5pwdktK
+Sky5C6RXEkosSLzb0NDgHSZtdvNhzdmlcwsZK7KW08OdBBgkvqllJq1rOkhX
+/JyJMlDUObOb3W17aWJZ8Dlt801bvvjyaW18jykTFRUVJvsDMnTp0qXmXLh8
+x+w1ZAPy+NCz40vTpmrevHmGUdwRucURSYbUEXkGwTdr+ZBhRIqZeDhdwPMg
+MevpDA8GP9A2pqZio5CfM3qGpS6KMloVwZf0qZvBK/552sTl47zT2vgeyYhN
+A8g47Eii3AnK5ezevZvZnYucuFX5mnpfzLmtayzPiGkT17bllqU8UtEu0TZa
+SDh97Js1ZsxD9dkQ27KNnDjklnNqxFnOmbiMqTOJJ7cNmxkclTJr+UL8p7Xx
+PS4c0BBGKP7Howg8vADPoXXPPiNNDapxFYeNQnYOg4Yqztc5z2okqbg0YDkr
+9NZQlY6lbei5R1bMPi4d38QwHq9BIc4rrRjUB4jNCoP6E+autvXYsHM8a9Ys
+k7mTOzvpOxJxGzV51yIi3PPPP29SwNppIhhMQmJEaYgQNiOmL00qy3iQpyMi
+1qk5h478BqCAHQRZMG0dkcnlmD54GrBlZZiObUCKKswNvlVtaLjEac6GhNYn
+T2D2/P/IyWW23BENlJGTyzl7rCFGpYcI17YduziB2PIHNQAvJ7CjPvPtsZye
+8owcDPLRMWun7pnWdzJvUAoyYVoPffsS+vJ4ju3bOCInDJM1YMAA0428dUgK
+MtwjsHQTaSXCjJR2bQ0DpIGbp7jc/Iya+mZ+RAsDB6Fypidjyl/S+HhJ+cg9
+pIBTaDgNjx/gx5AEnREcumHVNKNUe9v8FjKMS1cKIGZwCjPZz3OU6oEDUc6C
+1lqNLGumDE1fvP5lnSDoWnrCCHkqnASTKkSMy4AF35ibiBCdD0Ye48PGILMU
+xcwmmK4KESsuBiaR0COqI3WmGQrHh8jldknJ4qsQqJdrN268U6S/r2IKwSQ3
+I8VKZopYWoFaujHIgTGb+oR9uFcUQLMh/uK7VH8GwBqH9EwPk/VCGEEfBv6E
+HZJhzEZFkeDNYoSUGdgSUgBZVhLSiD0vWL5plDYjcse9fBmF4LnbPzI57J/x
+FbCYDzaetcQxQicCys+5ZrA5FAOPkTs9KfKqNjOhwuRf1jVt1I4YvEMJb5YH
+dXfJarY0+WrBsEAKc4Jx9Iifk8lADFskR8HL5pQPe6M4eI3Ti7ppwmcYAXkx
+OPfwhr6PGDlGEULYIhd290D6YJ3Tfs9S8Jd7q9fweKqrS2YUVxNod90Izgr0
+UQ4zcR0Xr9j8ujO3GEP1/+vOEFS5slQINVe22HG2wiytf42a+OrOEPDcWMw+
+4s2VNFdWkkJ9ZPSldHID/uDJDfpEKBfC8WO7CGZ8Mzwt5Aed7QiWyuXaQETc
+HTIGuG+L5m/d5tu5+u8YN7mt0HKx6jTjo/hC/n+/OOZvo5nJqC5Wqs8RZwY9
+rFSKnO3NreQ07hJgg8y3NuiOuD6tKDB+zpRtnF/5B6PG2gqpCmyaGI6//V9j
+VJanhIR3gtHJvJqxR2vFBtBC6dlj2tDyWxpafBW0yKvc9NXiQCw3wE1rTRSM
+UuW82yy+tKco6aW9bcNNLpGymIR9b98OvS9PhjEiRmIQoxDKUIO524isg09J
+JzraWziM2xXQ8TzbKLYkCecufFnFinZ0yU0H2xFmhycsYQfiCNlIHYwHEkXU
+2DAqjQwx5BXQbB6unor0lfsirDxhgopmzbv2EFUqUFTITwAUPyiA4RSaDF7W
+XrH/RedWeIgAMGNZjHALK5IueGpK7I1oWtL2Jwty9ifFN+cpOQTJiJ7P9+fU
+osY+Rnt8dIm90YEGC45O5eDbMQdf/NBRgy3R0LT7JQWK4RTQfH+21g6S81gc
+TKjF8agscHz4i0rY/Nt1HQ7arsNhA5y9qKmpsYGKvXv3ptKBJQjAj0ypq1i7
+laAxexlWaw4pDjmIFPBHe2p1FGQ4gVdf1G6YTgUjlfLAOgiRK91Zm3mqFZwk
+C4N668PsXjEugExQ0Ke2ttZ7dI60YMFd1PYQLEgLFixAHDKHFn7JipRQ+t3i
+Db6gzchP5ipZu2k7VwNdy56PTNf7YqIUBaZNvTWriqT4gLs8xLioqMgE43EY
+zbdZd5ozOqvdiOlOoBgBgfIU8XR8MiG4QuntQ8ILmz0fo7LmqZMQzPgY+tqi
+4Gp9lV6fObV/4ABdqnxbDUzeQPwV/CH84uTtxw/96zlB4glnhgtCtJyLp0GT
+2MGBYiaPWHvP65gsTjB2VpVVDzyaL0rKooZNGxaQLF21hajlC8bTXHnyySdN
+QnPUWdJkZiuLIcuAt1gxa1t8sSBlGgv0T6p/YylU1D6rzbZ0j/yKxiWuPWxy
+U60dkP4TjkIQ0XzxbSIKrsVBpCREGUXE6T6KWHH4ODQL4SJxKQXXQu2F1zBB
+80mPI/RVVgeHHUD31GR39LaVm1i7xc3aEcM+cqjblpcPtsYpX2SvQPPdfffd
+IInPNCPWzI9FDrIsEGLNaiyoWdAGrN10LbEknnFWQlc1AWYv2UDEeb4c+tqO
+GYmNnlmxwds80jL033zzTSPAQAhsWGFfpKWlxYfwN5xRaBiJYXmtvsojZzc+
+9E4awu21F76uzDJcm3l2BREHWd5kaRpSvZ+eY2/CoxAzmd08OusHOabYrtVm
+t5aFTMBxyVB30C+4lpF6IwbT0/oqLZmnxiyxPiP9SNiIBNnV9LKmk0HOGiY4
+gGvv/pO/6DCI6GwDvKh+zsjTiHGlzLQDt1HyCRwEmUm9OAl7nbYx7RDetA/e
+U50uaT6WVNbxc+6NTRM/LwVeHgEqqdxsZ0QsYiYz8vCOKiEuA9CDJ8HL19Rf
+p82UlqC0UNxXxvPUWMdacJNQUwbhVGAK1Cwr7HKF0OEJfZVW9pszKm1sdZtz
+uKKppZUgAxNe0yV8nQxyVrshIZYXRVIGITTbBnjdbIVnxpYyK9dVJ1saW8gV
+XJLCR3qBZrbWlJ7SMbCZsZiZxHryeiiHgJavsR5nGqCHai9MrVcNPUxfZbge
+uoBxV0J0/4sLLJTuebSKdVt99VB5HpFlwCCu3c85uvDRVx14TSeH6XvUrTr9
+tAhi5xMIaHZnsMzeUcpyL9nTTblQssyHW/9Y7AACataBRlQrWPnLS1iCDLnQ
+1XLAUoJsz41GxRgIMlkOniXrSJXm+qu+6qenxHq9LvKCiTTzuhACSgH5cO1l
+scsLVVt4DMKtRjW6qJJ7QHD96fiu3th4o9PMiIBIuWSos6WUEGTopm08ECCy
+PQ3kI2KMoQlcD2tzlaONZG0QZDfxXHQLK2DxQJyWQPEVamVE09b37G0iQoR6
+4vzVdrm0AWqXN0QLPRzjW5ix3D1iDXjo/O76OQoB0skSPywZ3uw6xprtrm3c
+SoK0SQH24+QKJ39HPuVZKVfRLl9tK3LyMBhqBPfQNp4IwoaoD1jW4nCXs3iM
+RDdmQ6TcXv1P+gW1BQIUYuDyRJoVqZHnS5CZBIhNwR76KskOY1vG9NXAJdSx
+k+CEGquGgqSquqENUMcOlvDc3/7cBcXdYy4enErt4bzKHqYtXGegNmOxEC6X
+MVbcTdrGUB8q4KRA+QkdgxFNnSSeqaRZAYlgyyTnUkFY9SZtZrRUV5yvTi+r
+ebA4INRcfWMLoWahJ8j4FKj/WXuhqagVtgbpq7xJAAfhmCzksptgQpBRMYqa
+TtyfZJCzsMGwvFnbxltnZUF+eKPa9Cy+is06hJsGKiR1uWcMyRDusu6pbYyi
+IsDlg5jlKiCQaK0uraoj0DQOxPHKAdp0wtuIIWu5SzOzuHqgfsutcBxqZGoP
+xSR2bliyzS3PKK6kr+4xoeTGD7xvUTOsU+dupotD85Vk6n5Kv8iWSZ8EM4zV
+CRDjY/LF3KUbCTUNF6gkQu2Gj8bOrvJBzboPblkikY7sAWuVJBdTLi/UUXF6
+RjX66w5kf+0tlqdP0JnmgboZjC5Yb1psqf1MefGDTgtET5/eoq/ysDbuIUqB
++0jtBUYvNcWk+Wt4oz0FGGqeM6uSCRjiX1h43Yr3ImWS4c09enqrtrG20avT
+KtKA/bSOxnWKqdlQ19RXm62xHel9Zldj3ZD1REBwTBoxWOw+eFkxwb0RQ3QE
+P6d0hPzIC3JUg56WHvIWcT9dH32fvuXgkQvtmY5YIvGt2sxTvUCxrmGnoakZ
+kNDyXhQ9dUpoWYcFNfNSoP2M9oIiYlTyL00qu1ebYZqRFKJiyBA8a4+oxO3a
+5h6W9ZXFPl67dCM7RYvWs2JfjZNQL6SKTvgF48xf/19LF/KiYfcWSxHa92gz
+b9TuFVVDJwVYqQmBj9v11dhq9xXYJhGYCaSHWEkE0IbaTNZnjAj/DdULP6uA
+MHSppcd6abNbn1EMUJ5wYN6KiFxLjJjUTiZGNvqCLLw7tI2ZNguWbwpyyNCB
+9Qotnh+kYCFzT031sSE51ceCuxUDTrGxhg4cILLU/wgyE9pXHK3qw5Q1GWJF
+s/g5MyzF4yGyY/VRvjsniXC+uoW8dtqtFybqhzUEITGZTzevdCNPuEK3cfkL
+7Cwo6ZZTsNsUPoyzwcB+z84L7tQ27u9h+zOG7ocrWkju5Xl51RZ3sllPC8NQ
+kZXm3p7kSB5CyQ1ZlNvwYchaELsd92j+shp+zrvzkJ37Pue0rSULeYM3pAbD
+jdQ0XIaxmpFMcaD3iNIs5AG2wbkSC9tX+Z0487oeda5IYBakURUWnTbNWbdJ
+t3y2tXQh8y5ddSUOIrGdMDenbCSxpfc7SLxfYgv1zJUvz33Ysq6DG/cXG9Vd
+M46VkYNt4hWb7ZUY77eEIZOKmcNotNSqLbQSIG0Z2BRz/kztgRYPDo3dra/S
+2tdilmZKzVhEl6FKrcx+t/bFJMuKtVuDGK5/u6KDPCrAIjHqGNLonKZRazTL
+uiOaLDuL8m5EE5KdLq4sS9+lAKy2zwuUUEW/l7ZxPcGPV2x95lMEb6RHGA3A
+2V4k1dIRMsXNldPEhmSdCUYEcBEu9Stz4dXY8F0HwDIYyGSgDBYzmHAzaoKk
+hxS4mXsEN54KXaQmQWYqCZaYiIIztRnuL5lPLENCDSOROkX0SzLU2cAX4vW9
+tY3l/ZGJkgLy0Tqae0+fmKQMsoAHaTSIU8HCM8wVA5IyKRyTcWds+PvgZU0M
+9+IEUfj8nMY1CqvnBfngC9VRIp8BKXYFXSWONrmDqRk4qUhT1K33JTRnZmFy
+olLhQYUU5syZYw1jFirAmz5bkDRgfK5HdP1Cb212czKExY9OJgPvlcci4RY9
+K+7b+HSY9dzFZmAOHXkDPte92kYPFflm0X5JWzKXOh6UueQ70++TSayJ4ZYx
+mfzuGs4KRK+zF+/SwfRDMsJX5VIbXVRJxHlqG4/qG1uI+NPOOo4Qb2+dBr3d
+wUAnyBa+z8wk2lDuyT+fyXhMDEL1VTgNPIGztKouSJl8yiuWu9Y7AK53qMdy
+DmJFs+wVT5YVLVpn0Qf9+Sq2wPFTWVlZ+P6zkfJhfrTDlNzLHDWlnN47izfg
+lE5ezHMvX0IkpUFWP7c/yd/wlETQEn36xwi4sEgtjRioEiEFjcR8+UiJOBsx
+QH3LzBHdmSGm3A7GYZ0UTI9VTMGU3MzFKoUhypQD1EqiPhbCsRQfki+pUuzA
+UUYN/RFxAYlsvgyl9zfB2ctascffV9toQyJKlIIzTWFsPTH3R8wtossyqzdH
+tysRXd5Fgi9EY3FMeknwH4lrviSltuJKVW/i09m0fQ5Nq/+modPT0KUHy3xE
+4z/ytqtIGTg3MzHdmRIL2Yv99FXXeaza0NCWo7pMnYkddvU59jwpzIJ+fUbM
+tSPHNNaXkrFlmIbRcnwhS4RpetyfMOHeMCS2DBBio5DhVKbfPfr64tRDrcxb
+iR0P9aHINRtZuLaeLbGM6aO8WEaRSh74g4CSdWiTo5mdjR6FeZkOz608BPsY
+7OadtZdFW0K+W14IOk0KmMwyOol1o6NSUuD+V4UbxhntCYjp1r37Amb4Ayf6
+bALsudqNa9YTblfKi6Pkg5veV06h/vmr79NXXYWQAvcJCjci78wYwuYygk48
+I8bIKgTEth27CLfrfHFfhKc9/xIVM/fdTkO4me2jtfcJtyveU+DmRg9tUlXA
+PM2HEAN9TzFsWIrbvfJAVB6hhhbnpL05o9IHtXv2k06VrK0B+qoroF2oTSfc
+n2RUHBJPePjP2szUeShYgZuwcjfTpBWGIWskx8j2hRRYGftVj4mwutI1hcIn
+KmfAiWEwFUtbnDx7JhoHRRkbFvY9T7th2PqOJ2bZrUg3GiBmwxcsdXjEEquD
++ZKvTavgdzEB+cVkgE9SgCGD4tddX+Igw4Oi5h5ZMfcJNSN0yMpleWYGJuAh
+yVL+vGdYwk+9AtbfsbPVxdsRfSnwn6wwIo6E8eh0445XFghhkAvUEMrw2guG
+JoRuFnQ4xuxG0PCBzgCsW5taPBhuebvWdArcrD0NZ4IihLdes8IU8lAYG5Nl
+wCs86DbNLK4OBumrXEpYDkLyo1LgZhYS/JSGHbsIN0UfQi8pcH9d4Ubya/zK
+a5aso4cMk0lmknBT9FWu32bhRsyV7SKJfHAzFuymSY0YV/qAvsqSgcguSYGb
+6ZLkBfyKzf4HbXYlYvnarbwdB6vCEX1MxqAFD8hFnHwuBWqeCQPviS4l1OMc
+dzgFamb/ckMdvyInWLbUrVIik8A7anJs0zAk1Di1TJ0nUtgHNbfQsOLJ28+N
+XzZYXxUD3lqBeaGO/CXmXAH/5avrtXgvLxuMwnU4ACFkDC6IDYOQCXOLKMGx
+HkRHfjYFeFq2YHCxgJjnE6PKF5Lh59UxMBJY5QCdSQ/2NnOqCVOCft1W3gA2
+zgmBEXSj/VRRvjq1wgf6Z5xXmcswcnIZe4ixYQropyno+IK5DHBJxVKxVUhw
+ZQ1DYQLPz7QbN8TMJDQGqUEzGdhQ2AxIgJmcBR0n3PiQ9kWmFFM7cKE1335L
+YQT38oASPhDRrLcSFBoFQKsPeMABJaCukUZAwbDs6/kJy/7FQxpmILgifvT0
+yiH6KtO0UGE6hcDfVgDhBVNforea+mZ7jQNFEogi7byZkaHjksq6gIXGaVbA
+uhEbwXdhDeHm0SYY9uJsE25mIIjBlgY3a+1Ap3DjE5YFDBNedMKCJvgVxexe
+hmqLPNQ3E3Ss4N7D59BR8oHODBXkYdC1Fo5hPialGrYPU0D/joKOxHManAjf
+obbFz3QEJFcw20c0ATFyy4gIGkxfZfz1kmjx+u6EIegkL3JyRDcT9Jlq3d8z
+fG4a6N9V0FFFh9MP32hLQ4tKu1znB9Ey3NXD626YuC7oBqxCzggU5LNA5Dua
+zzws90Za0WpD9VXeiouj2CnAf08BhGnFcKmhe8NOvTos2rHkeoTtgZAY765h
+7RTsGBN4EIKcICLdBzzz3rCk6c2JRcEe3OMHsgw+nwz/9xVGxClYqBMsD1l4
+rj4DEzPCAxUl3GDvX+atVEirZXo5IwNwJJpaWn2XrRB+sgg0h5CM8AMtRo/X
+1W5X+NuUHpNx02NsYYhevXqxPlWQXPyv0ISN6IRBi8IM4zU8zPxTAcgrSxjz
+EKwtBSCZqc2e/usSHwWYFArOZuaI+GuP6atu3kUM/dTEmIKcxBhzvc62bduk
+Q+yNoERh0p1SP1AKgHWoJMCEuGuD8bx5TtKQyCUWxqMRhIpLLFDP3GVVcNnb
+Z4g35X90xGof8WbhT5QKzsE7PROGGLEsN4Lk7fT4Ls6pg00GDRrkxfwMxRwz
+wRQ2yEIcj/qxPkNmMcU7gxju1TH0QKo2NAzTZkZbMZMiVn0XvDCdmbImUnyb
+4+dfkPOptGhrUgXbsOuD4pQlJSU2rJpvLfxQ+QymMOWomgzZRJJCk4PNNYrD
+5xDJLLbnJguIBUOPZcSIEWakTrZqXLRnxx+tRx5wPw9b6QgZInTYp08fFC22
+Otr3jOWuneLspt/FixebI56IsGJb/r777kPElVFe14WUJeibKabHgyaM+Qtt
+TsgLzGEHAYP7oBAPxXQBIAA2efJkEzBgyYS/BaFoQlNsIfsyxkX58o8KlBOQ
+1YHVB2mDH+WgbCrSGfoiJDODTvhFVpFY2ZQtyLUgyyANDvEHGtwMSpnSXmF4
+lPaIa3uxbfn666+H999/v/n33r17Sdx4YXMkhoEIKOKKV7ELisy4pqYmrT1w
+eNo7po9Y6fd2ZpEVmtLqmEssHYiUyspKu09ANQYRsWpDg+9aJHIQj+rjIFdj
+0+4ouvup9wuUyaRByiMuzQNk+A77JxMmTFAu+pvSjr4C9+/hdb5PkVSofyIX
+CNt4DiN56zdR9IK2jATC7du4pclaLQiw0FJC0A0OMovOM2qGO4eMAm5vdo7b
+25ug+QNTQhYTi4li7T322GP2MXgauUpFRUX2+AJmJbdURoGZCfzo95S27ue8
+AOWhhx4ym3v431cVFWgR1vAAmrtlbfjufuKJqGXOPTuieE9oA/QcHkU67rkn
+2tFnTQglgvaSvy/GEZiwDb/CLts2JcG1V8ShoiCzysvLU/nhLH0fZzXoOmPu
+5y+rsS4EohrkFbgJuAyO10640aRPahuv0Y721PFne5OflsgeGaNNx48fb/7H
+OUYG2AsvROVHeAoDRI6XENFqxOwj4/mcqYGYi1dfjSosUsrANOP5TzGffNzB
+w30IGzCMJXrKXoOaB3iOjusZMSfpHJK/P0ZAcnZHduzK4ZLE5EEeFkczqqJD
+wVHrxNA+W3tCoUyGPzUsB5XNeIRrwWOtYY3xOjIesEFkh9s0PpQBxTvvvJOD
+8jPPPGPKhOB/p7XxvQLtFfk7UN+w5kUPmzEhhdeuXWuPaDDWpzEH301rhyuK
+WKMsFQ7TWoxae/ojH0isbL5w4ULjRcBSwd0R2J2V71ik4YNQhfqD7Au/KsYF
+CWmVZEmoDSCcJB5YpgyuF51V1VRwIb+pj+GLM4hHY17aeHkYbx2E7Z/GBfkY
+/7Q2vkcLCwoF2CC1A0ITN/GIIuVeJBHCJojoP98lcDw/zRwb7DsIlU9sIyDU
+zpDAAADrETvzSKFjhYAPQghOPFclKuHoxPvCEecqPaC8aZLDYhw7qwrT9HV9
+DIudrhp+cUutaB/ep8bo8KKK2pRZjBSclvYxP66C+1Yb3iEfcvaEXe1eG/iQ
+SAMeEYEpVQxzC6WMm7PqpDYMz/wXzJneS2WPbL9fdOktcFsK0YyUeTpPJwIC
+l7ue+EUsSlYbiQAfkboaFgIO6/GeNDfGU715B7eWkQiEbBgwkGOV0TiF0Qpb
+GOIg17BPfyc+VWI/ewu40aMDYoQciS/wbs1UGTocqm/B+qH9CVcZYYGT2gCN
+O3O4KMSte+8eWjrtgxOFE8r7SxGgS5lQ7vdidGxNC1YCkXyoXWgGpqqkKDjA
+rvGLoJlQg1uFWKAHBSALTBkiWJ5dunQBHiwHD/13++23G1xwFVXcz48/I/k4
+mZ2cKvRQVkTqa9oH8v3IaohVw9X2XUZIeJDizaRErGHYCaekwENhiOmMw4N8
+5fh0vg8ycAOScWKUq0+ZxguUMxDOpS7DL1gZu7pg4+N0ClE/h2FGMrBIqT9q
+t4yLXz1wSvCsQujmw+GAeVL9YeZ+YU+De/2IhzY27w5G6PsM2wvnpGHETUMs
+CmiF6wdPs4yJHQG0AYwvK+YYkleI0M/GDh2WJm8Ow5FigIONiecUVGbs4hf5
+XqCU72rCDvo+IsUM+Hc1e0Q7AxZsw8E3aC/wjoz7uWTsuO2FrCLsXf2lX3bZ
+QWtgtwnbetRi2FFD+qRws30P84ajiniDt4pYESL/4+Rxdxi/SICDc+TLuKNj
+VlXdYA9TAUM43oZa7dC9u6dgvueOBsrpYFdA5L0FEZt/qKyOXRFyNNJvYNeI
+v2bfA8GgM/CGAYZmCejATArMHHaZfemftKeAP0saRhq4CDNWlDwTDOeDkghh
+Cebyvwgs7OCht/rGloCxfMwEDuggiZXvYa8TSwT8aHrtqOAAJ5ISMSKcoJQp
+90VfM/oJyMP8PcbLmlpapydjcLG2QTRjyxln8QoMZIVmnSP/DSsBJwD3WwkY
+1T9CfBtG1J1PzCpQZKDWEe7ZT2QOU/7HCuMZJBql+Bb7de0Uegcuk34FAgwZ
+9R7nGVOJpCgsshnJGNE3q5H1hNeRUlFoujjMdIHdQkCC9Y5CaohQw49D0hIu
+u8XGROcBk/WbjOEC7Kduqm+OUKILDXZBLqKwuU5me8PyyE4DQPASzC0C/Sdy
+rrGhh+M26GBmMgq/VwYG0RDJgtQEmwgXiDkYTQ4cdaR5IM0fogOi6vLo+05a
+aP/I5BGi29SOMNOO9Oz3ymvNqSEQDBoaucEIOoKpkZOD005IXt2xs1VrTPsM
+0r+vtg9THryj/oldVyxe1LfGc9AOGWNQFmIAfJjq5R8ldD9MWxQ283Jh8UeI
+PH+PpP3fjNs/2Obvuu0jyDatnjbfpQPJ9xnkf++M5OHNn/09D951vsk+yffm
+B+n9f/wb0/4heg9zf479R6vbGnzs/wGQtqAb\
+\>", "ImageResolution" -> \
+96.],ExpressionUUID->"d0a859da-0926-499d-89e7-01e150db65d8"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -867,18 +1216,18 @@ Cell[BoxData[
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{
-         RowBox[{"Abs", "@", 
-          RowBox[{"Transpose", "[", 
+         RowBox[{"Transpose", "[", 
+          RowBox[{
            RowBox[{
-            RowBox[{
+            RowBox[{"-", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{
                 RowBox[{"eqLowRHS", "[", "F1", "]"}], "[", "#", "]"}], ",", 
                RowBox[{
                 RowBox[{"eqLowLHS", "[", "h1", "]"}], "[", "#", "]"}]}], 
-              "}"}], "&"}], "/@", 
-            RowBox[{"Range", "[", "8", "]"}]}], "]"}]}], "/.", 
+              "}"}]}], "&"}], "/@", 
+           RowBox[{"Range", "[", "6", "]"}]}], "]"}], "/.", 
          RowBox[{"rules", "[", "h1", "]"}]}], "/.", "sol1"}], "]"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
     "\[IndentingNewLine]", 
@@ -921,29 +1270,26 @@ Cell[BoxData[
    3.82731298252908*^9}, {3.827403486965724*^9, 3.827403500013921*^9}, {
    3.827404825327669*^9, 3.827404845878521*^9}, {3.827404940416987*^9, 
    3.82740494304041*^9}, {3.8274051423647337`*^9, 3.8274051425959997`*^9}, 
-   3.827405301703141*^9, {3.827405444321988*^9, 3.8274054450814238`*^9}},
- CellLabel->
-  "In[784]:=",ExpressionUUID->"6c557c5e-e6b4-4351-9c51-9653ebaa3755"],
+   3.827405301703141*^9, {3.827405444321988*^9, 3.8274054450814238`*^9}, {
+   3.827409586817156*^9, 3.8274095878530817`*^9}, {3.827409891445684*^9, 
+   3.827409891585438*^9}, {3.827410137366831*^9, 3.8274101417393312`*^9}},
+ CellLabel->"In[16]:=",ExpressionUUID->"6c557c5e-e6b4-4351-9c51-9653ebaa3755"],
 
 Cell[BoxData[
  GraphicsBox[{{}, {InsetBox[
      GraphicsBox[{{}, {
         {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{1., 2.5681667543952633`}, {2., 2.382780896441164}, {3., 
-          1.3811213236677444`}, {4., -0.06616652693563371}, {
-          5., -1.3561077844188318`}, {6., -2.3027509947911393`}, {
-          7., -3.035301732084035}, {8., -3.5857908717651927`}}]}, 
+         PointBox[{{4., 1.5266814661371535`}, {5., 4.586416194513483}, {6., 
+          7.853909097145279}}]}, 
         {RGBColor[0.880722, 0.611041, 0.142051], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{1., 2.5681667543952638`}, {2., 2.3827808964411643`}, {3., 
-          1.2905752673773987`}, {4., -0.7100357048335054}, {
-          5., -4.431526570580832}, {6., -7.130674861358855}, {
-          7., -9.151031152428711}, {8., -10.777531103155672`}}]}}, {{}, {}}},
+         PointBox[{{4., 1.5266814661371124`}, {5., 4.385565955422396}, {6., 
+          7.398146817333473}}]}}, {{}, {}}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
-      AxesOrigin->{0.8541666666666669, -11.821907697742997`},
+      AxesOrigin->{3.958333333333334, 1.031539996804932},
       DisplayFunction->Identity,
       Frame->{{False, False}, {False, False}},
       FrameLabel->{{None, None}, {None, None}},
@@ -954,8 +1300,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{18.688297193877553`, 0.37500000000005684`}, {
-       8.89825177281972, 0.37500000000004263`}},
+      ImagePadding->{{21.037353515624886`, 0.9865722656251137}, {
+       11.572385974971098`, 0.5000000000000284}},
       Method->{
        "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, 
         "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
@@ -967,8 +1313,8 @@ Cell[BoxData[
              Part[#, 1]], 
             Exp[
              Part[#, 2]]}& )}},
-      PlotRange->{{0.8541666666666669, 8.}, {-11.821907697742997`, 
-       2.5681667543952638`}},
+      PlotRange->{{3.958333333333334, 6.}, {1.031539996804932, 
+       7.853909097145279}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
@@ -976,261 +1322,135 @@ Cell[BoxData[
          Scaled[0.02], 
          Scaled[0.05]}},
       Ticks->FrontEndValueCache[{Automatic, 
-         Charting`ScaledTicks[{Log, Exp}]}, {
-        Automatic, {{-11.512925464970229`, 
-           FormBox[
-            TemplateBox[{"10", 
-              RowBox[{"-", "5"}]}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-9.210340371976182, 
-           FormBox[
-            TemplateBox[{"10", 
-              RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-6.907755278982137, 
-           FormBox["0.001`", TraditionalForm], {0.01, 
-           0.}}, {-4.605170185988091, 
-           FormBox[
-            TagBox[
-             InterpretationBox[
-              StyleBox["\"0.010\"", ShowStringCharacters -> False], 0.01, 
-              AutoDelete -> True], NumberForm[#, {
-               DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 
-           0.}}, {-2.3025850929940455`, 
-           FormBox[
-            TagBox[
-             InterpretationBox[
-              StyleBox["\"0.100\"", ShowStringCharacters -> False], 0.1, 
-              AutoDelete -> True], NumberForm[#, {
-               DirectedInfinity[1], 3}]& ], TraditionalForm], {0.01, 0.}}, {
-          0., 
-           FormBox["1", TraditionalForm], {0.01, 0.}}, {2.302585092994046, 
-           FormBox["10", TraditionalForm], {0.01, 0.}}, {-13.815510557964274`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-13.122363377404328`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-12.716898269296165`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-12.429216196844383`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-12.206072645530174`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-12.02375108873622, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-11.86960040890896, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-11.736069016284437`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-11.618285980628055`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-10.819778284410283`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-10.41431317630212, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-10.126631103850338`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-9.903487552536127, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-9.721165995742174, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-9.567015315914915, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-9.433483923290392, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-9.315700887634009, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-8.517193191416238, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-8.111728083308073, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-7.824046010856292, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-7.600902459542082, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-7.418580902748128, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-7.264430222920869, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-7.1308988302963465`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-7.013115794639964, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-6.214608098422191, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-5.809142990314028, 
+         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{1.6094379124341003`, 
+           FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, 
+           FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, 
+           FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, 
+           FormBox["100", TraditionalForm], {0.01, 0.}}, {6.214608098422191, 
+           FormBox["500", TraditionalForm], {0.01, 0.}}, {6.907755278982137, 
+           FormBox["1000", TraditionalForm], {0.01, 0.}}, {0., 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-5.521460917862246, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-5.298317366548036, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-5.115995809754082, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-4.961845129926823, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-4.8283137373023015`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-4.710530701645918, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-3.912023005428146, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-3.506557897319982, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-3.2188758248682006`, 
+           0.}}, {0.6931471805599453, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-2.995732273553991, 
+           0.}}, {1.0986122886681098`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-2.8134107167600364`, 
+           0.}}, {1.3862943611198906`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-2.659260036932778, 
+           0.}}, {1.791759469228055, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-2.5257286443082556`, 
+           0.}}, {1.9459101490553132`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-2.4079456086518722`, 
+           0.}}, {2.0794415416798357`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-1.6094379124341003`, 
+           0.}}, {2.1972245773362196`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-1.2039728043259361`, 
+           0.}}, {2.995732273553991, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-0.916290731874155, 
+           0.}}, {3.4011973816621555`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-0.6931471805599453, 
+           0.}}, {3.6888794541139363`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-0.5108256237659907, 
+           0.}}, {4.0943445622221, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-0.35667494393873245`, 
+           0.}}, {4.248495242049359, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-0.2231435513142097, 
+           0.}}, {4.382026634673881, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-0.10536051565782628`, 
+           0.}}, {4.499809670330265, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {0.6931471805599453, 
+           0.}}, {5.298317366548036, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {1.0986122886681098`, 
+           0.}}, {5.703782474656201, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {1.3862943611198906`, 
+           0.}}, {5.991464547107982, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {1.6094379124341003`, 
+           0.}}, {6.396929655216146, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {1.791759469228055, 
+           0.}}, {6.551080335043404, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {1.9459101490553132`, 
+           0.}}, {6.684611727667927, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {2.0794415416798357`, 
+           0.}}, {6.802394763324311, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {2.1972245773362196`, 
+           0.}}, {7.600902459542082, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {2.995732273553991, 
+           0.}}, {8.006367567650246, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {3.4011973816621555`, 
+           0.}}, {8.294049640102028, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {3.6888794541139363`, 
+           0.}}, {8.517193191416238, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {3.912023005428146, 
+           0.}}, {8.699514748210191, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {4.0943445622221, 
+           0.}}, {8.85366542803745, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {4.248495242049359, 
+           0.}}, {8.987196820661973, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {4.382026634673881, 
+           0.}}, {9.104979856318357, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {4.499809670330265, 
+           0.}}, {9.210340371976184, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {4.605170185988092, 
+           0.}}, {9.903487552536127, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {5.0106352940962555`, 
+           0.}}, {10.308952660644293`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {5.298317366548036, 
+           0.}}, {10.596634733096073`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {5.521460917862246, 
+           0.}}, {10.819778284410283`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}}}]], {144.7700681132607, -86.78851594019267}, 
-     ImageScaled[{0.5, 0.5}], {271.5384199237796, 165.31145893370032}], 
+           0.}}}}]], {160.42706293570112, -96.80191896282624}, 
+     ImageScaled[{0.5, 0.5}], {300.83095696380263, 184.38460754824044}], 
     InsetBox[
      GraphicsBox[{{}, {
         {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.3479721300952583`}, {4., 4.587954331309981}, {6., 
-          10.177796226000511`}, {7., -22.1925019970656}, {8., 
-          16.780429850359194`}, {9., -16.93500662503782}, {10., 
-          24.01378508115924}, {11., -13.874735830346257`}}]}, 
+         PointBox[{{2., 1.3479721300955771`}, {4., 5.223089228012206}, {6., 
+          10.861439314866471`}, {8., 17.510789067527373`}, {10., 
+          24.790944685595456`}}]}, 
         {RGBColor[0.880722, 0.611041, 0.142051], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.3479721300955767`}, {4., 4.935185824379387}, {6., 
-          10.639852315850225`}, {8., 17.26810229153006}, {10., 
-          24.513171387303696`}}]}}, {{}, {}}},
+         PointBox[{{2., 1.3479721300955767`}, {4., 5.223089228012205}, {6., 
+          10.869945020662854`}, {8., 17.524751029233922`}, {10., 
+          24.80788312242227}}]}}, {{}, {}}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
-      AxesOrigin->{1.8125000000000004`, -25.847485995483993`},
+      AxesOrigin->{1.8333333333333337`, -0.48789904074958285`},
       DisplayFunction->Identity,
       Frame->{{False, False}, {False, False}},
       FrameLabel->{{None, None}, {None, None}},
@@ -1241,8 +1461,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{15.66294642857142, 0.37500000000005684`}, {
-       8.89825177281972, 0.37500000000004263`}},
+      ImagePadding->{{20.55707908163265, 0.5}, {11.572385974971098`, 
+       0.5000000000000284}},
       Method->{
        "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, 
         "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
@@ -1254,8 +1474,8 @@ Cell[BoxData[
              Part[#, 1]], 
             Exp[
              Part[#, 2]]}& )}},
-      PlotRange->{{1.8125000000000004`, 11.}, {-25.847485995483993`, 
-       24.513171387303696`}},
+      PlotRange->{{1.8333333333333337`, 10.}, {-0.48789904074958285`, 
+       24.80788312242227}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
@@ -1263,92 +1483,61 @@ Cell[BoxData[
          Scaled[0.02], 
          Scaled[0.05]}},
       Ticks->FrontEndValueCache[{Automatic, 
-         Charting`ScaledTicks[{Log, Exp}]}, {
-        Automatic, {{-20.72326583694641, 
-           FormBox[
-            TemplateBox[{"10", 
-              RowBox[{"-", "9"}]}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-9.210340371976182, 
+         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{0., 
+           FormBox["1", TraditionalForm], {0.01, 0.}}, {4.605170185988092, 
+           FormBox["100", TraditionalForm], {0.01, 0.}}, {9.210340371976184, 
            FormBox[
-            TemplateBox[{"10", 
-              RowBox[{"-", "4"}]}, "Superscript", SyntaxForm -> 
+            
+            TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> 
              SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
-          2.302585092994046, 
-           FormBox["10", TraditionalForm], {0.01, 0.}}, {
           13.815510557964274`, 
            FormBox[
             
             TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> 
              SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
-          25.328436022934504`, 
+          18.420680743952367`, 
            FormBox[
             
-            TemplateBox[{"10", "11"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-25.328436022934504`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-23.025850929940457`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-18.420680743952367`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-16.11809565095832, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-13.815510557964274`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-11.512925464970229`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-6.907755278982137, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-4.605170185988091, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-2.3025850929940455`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {0., 
+            TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> 
+             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
+          23.025850929940457`, 
            FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {4.605170185988092, 
+            
+            TemplateBox[{"10", "10"}, "Superscript", SyntaxForm -> 
+             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
+          2.302585092994046, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {6.907755278982137, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {9.210340371976184, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {11.512925464970229`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {16.11809565095832, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {18.420680743952367`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {20.72326583694641, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {23.025850929940457`, 
+           0.}}, {25.328436022934504`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {27.631021115928547`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}}}]], {432.79752895712903, -86.78851594019267}, 
-     ImageScaled[{0.5, 0.5}], {268.5130691584735, 165.31145893370032}]}, {}},
+           0.}}, {28.03648622403671, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {28.324168296488494`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}}}]], {480.7977654572947, -96.80191896282624}, 
+     ImageScaled[{0.5, 0.5}], {299.8641102641853, 184.38460754824044}]}, {}},
   ImageSize->{
-    UpTo[540], 
-    UpTo[167]},
-  PlotRange->{{0, 576.0549216877366}, {-173.57703188038533`, 0}},
+    UpTo[600], 
+    UpTo[223]},
+  PlotRange->{{0, 640.7414050431871}, {-193.60383792565247`, 0}},
   PlotRangePadding->{6, 5}]], "Output",
  CellChangeTimes->{{3.8260139356528893`*^9, 3.826014016404052*^9}, 
    3.826103482588256*^9, {3.8261924073516417`*^9, 3.826192422251688*^9}, {
@@ -1369,22 +1558,133 @@ Cell[BoxData[
    3.827404849750861*^9}, 3.827404952955348*^9, {3.8274053003547297`*^9, 
    3.827405302722981*^9}, {3.827405424099656*^9, 3.827405445525691*^9}, 
    3.8274057106595793`*^9, 3.827405755094181*^9, 3.82740580264576*^9, 
-   3.8274063360586443`*^9, 3.827406412668069*^9, 3.827407355279873*^9},
- CellLabel->
-  "Out[784]=",ExpressionUUID->"550ffdb4-dbe3-4db6-a510-a3a6be0895b7"]
+   3.8274063360586443`*^9, 3.827406412668069*^9, 3.827407355279873*^9, 
+   3.82740963730418*^9, {3.827409935799437*^9, 3.827409964530815*^9}, 
+   3.827410211055859*^9},
+ CellLabel->"Out[16]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJztXWlwFMcVXutYgZI4SYVUJU6lQoW4cNlJxUkqcap8Oz7i64dTTlLJD9uU
+bZkbzGmbG8xpY7ABG5AQGDD3Ye4z3IfEjSRAFuKQkBDiMJdAxyK99Peme7Zn
+d3Z2NLsCYTQuDTs9Pe+9fle/fn345TY92r7dqU2Pdm+2aflctzZd27Z7s3vL
+Z7t0E0WJd/l8iS19Pl+gpQ+/SfyUt5CrFW5hxU2lLkqH8z+JNGvWLBo3bhw/
+JfA9lfr160dLly7l6mfOnKHhw4dT586dqUOHDjRgwABau3Yt1dXVPcrV/bRk
+yRJ67733qH379tSjRw+aMGEClZaWJkgMly9fprS0NPrmm28khmQ6efIkDRs2
+jD95//33adu2bb7HJLjPPvuMunfvbr6bPXs2VVRUKOJ27drF4NS1b98+JgrE
+denShUaMGEEHDx5U0CorK2nq1Kn86t1336WJEyfSt99+q4ibOXMmffzxx1rz
+kygrK4s++OADJuDDDz98TFZduHAhIxZ/4sm4r1ixQtHhe1HWGzhwIK1Zs4af
+XpDtXblyJfXq1Ys6derEBBYWFsp3fjp06JDJ4a5du9LYsWOppKTkWQkOLFBo
+E/jenKlW19WrV7lRAI0Gzp07l2pra30tDDkP4X9+wlIQ7Tb/pk2bRp988gn/
+FrJkUKtXr2ZqcJ0/f572799Ply5dAvfpwIEDDF60xPeohLl3715QStevX6fy
+8nKaMmUKKwDq4wLv58+fT2fPnjWfIVnoVnV1NeOC2A4fPuxTyrRlyxY6d+4c
+wzxx4gQNHTqUxowZo2RTXFzMIOWVQEePHhX8BUa0EHxv27YtFRQUSIipNHny
+ZBo9ejRduXKFKZg0aRJDVa1GKzZt2qRUU4iGJY8G19TUgCk+pQIwht69e0MV
+xJN4K+6C16YKKJkBtGS0kBnuiWxUX3/9NcjwPc/1UoCWevbsSadOnaJAIMCG
+BTW4ePGi7+9cpxnDAZPWr1/PdcCYL7/8kukQeJ6RfMMrkAurAhr8FqQlGFz6
+9NNPBfPAJcipb9++qGPRkGZMoLIS/AFpu3bt+LfgW3PZNqjy4MGD+ekJWQYe
+QP+EwggOGmXbt2+nbt26sS4qa4OCQFf1b48dO8b6fe3aNSEsowwmAD3G08Oy
+DOJ75513WFkUvLKyMv5WKIzEm8zG/vnnn5v2IXjke1zWh1Kj8QsWLDDNVbkn
+0UwBF/dEVqGOHTvCM0hZGWYNxgY9RSIrO9qJp+dkGYwG3wOvqgetBQ6By6wH
+k5dO1qwH+lBP6INZJlwjG41hcprE/OwZJZv4kr78e/LLZcuWwX9ZuA21gGCF
+hzQlBRBwBTol69atY07p3woHzhIQymBKCr5z3rx5FkkdOXKEW+EsqUQaMmSI
+cqC+p/iexNKAdqEpgoOK+VAwVBdGaYLU/ezfZRmsACQKQYmnoJDAxKCQmrFH
+gm7D4MASWAYUR/oFJxnBL0SSr42MqqqqmJFQc01GKfL17t27+Wt4FhAJK9qw
+YYPhu1KYbbm5uWy1gICeGh0CRKDYCGfwxRdfWIiEUqLdeHpEosrPz4e3ZFg5
+OTnUv39/fOeXqOCQ0fOdPn2anTq6O/hB0VVLEM1Yt9HOjz76CD6K2QbUkJjg
+h6IInadoBD/9TZahKiQmlM3s+eD20Bph+swbKdHnJTYUAxs8JAIG6Y2ZR8Ir
+Pi+hQN2AUXaSrJKCP0ol7GS4c+dOdmt6GTqdEBkappPMig/aoF1Sfr4U+Q7l
+aAN695EjR4LzZiSDngXGBurgXaFhwsT9Lu1OCQ4o4QGAAkYALyTUyi9fIwAA
+4fgMlCB+EnJWKgSR4zX8NvoM+GT4R0GIT1GiW+LTIRYrtNMMY5YvX87qpgnL
+7MtgotAXeAPoA/oxhDoI+5TAZ8yYwa2BUcDS0S0LX+wkKpfmNlT6D7hExKMW
+MzN8BQJH0twZpAOp4El1brAbKIbeaWVkZJid1iOyDOBlEGZ+q+QAJ6+7WzBC
+4JYu0+igECKrCy1TVgLhqA7leVkfjIUbh54rpr8g64vIyKTjJc3SQjuRrVu3
+sm6Q1lE5dUAQuipDRBbSASluQ45wI/AHIdyGiSFASpBhkoq2SOsolAT0ejdu
+3DDrJUnVUnHjokWL+LfovELiRkMi06dPt8DSQ7OkEClB/VU92LWqp4wO4RY8
+KIYXUFU4aOGB/VIoKkpEE0CSsAxp9imsaPgcnhSfwvLQ2YhnGXUksesD5+Aa
+hECVgRw/fpwDD/RrFy5c4OAvLy9PtzGoSKgNCXXyPSMpg8oBO5wW7FqIWDbe
+jzCQVQaxFKgD9mAgOEyySPXzQTdniNQ6Cklkn2wn0tB6cngp6TPuRUVFrIDg
+IagIDgANUYbCkB29rSj1eugbVL1HJS4oP0aIwAUfKrom2S5jrNenTx9+Jzp/
+5bkhB9goNAAgEVWLPvNliRl+EJhhii9KLPCzsAMoJoZxmZmZPl2seAdXAPeC
+IYmQnS4yeBgQAsbrIoswvJMiI+sVt+zAX2RDtYG2UXN4pBev36oPHzTKxOtX
+cfuz+fhP3FpEhp5kU/YDl2Xfj+HbpjL3ZU/YlCXalP24qcy27Ecu6/2c74aZ
+sCtNtqnUZByNq6zJOG6+cbjoQ16yKXs5hjK3Yo4Fhx3NjaHZXHSLG8v3xhf3
+3G4fJpivR3jAo3SgTvxXWxsIfjPIoXJ11XX+wKz8HwPBA/xPxJkmu75PzT/k
+7VhMR9L/SIXp91P2spEaCc31+nyBzp3T36CTGfdSXvpDdCI/y5aMCFMeyfJ1
+KFi06Ej6g4lUlPEbQWVZ8RErF/vzz+Sw7w5u+cqnPto15SXrR/82SPq9bLqe
+lFcjkVB4gUANHc+4T4E8cXiHOzr2rJto0rEv4ylHOvSUs53TUZM2WYv6AiL/
+ZWe+SnW1Nwx4A7lCuGwqrl6k/emP8wcnMlpTztY5trKJkDRl2SQBqsqSnCrc
+S4U5GyH0yIqpKtdUV9LRnE10obzIqPxfK9YIGT87xeR7NAN8QL7X01bN4gHM
+KeNi57brjQB10iLkATwjsPNHwcc3tEq3kX+9RY75DiewlXyPpK5VV5ur5DJf
+SH9iRgXZOyT4xo8fj6l1n2eTNhD7OV+K/NGCBQs4xYTfgUAgQb5etWoVr81A
+tg/zKZitGTlyZHL9+HqvfI8WqNUShvWlcMeJfKO6MLUGOKWlpbYu21Xr7BAq
+54luEt9h5l+5ACTWsrOzNcJsYHeQL1SSO81cyNFMTQ7wZbM4JVGyM0I2LqIU
+XTQHKV58V1JSYpIOiW3evDnYnCQTdHsu/CErFGStuIG1FHhWeXantRZOiwJi
+aYpnyXSSL9AAvMSckaocvo7Ar68j0OfM7abMI6qgQ3t01caEnLrApqiq7dSW
+8Bk/vz7jp092hc51YUlItLa0ki0GyzBHguk20SYVwMEXIKLA3ANmAOCDRo0a
+FVHiTi0Jn3RO1ied1QyrWV/NrpaVlRnNCOILIX7x4sU8f4gZE4145UAhVzhQ
+ZOcvX77sifgGFkPEziSamltnHv36zKM+M2c3MWdH0z9kGQL1M8X5+NegIzUK
+nR2kQNFpYPIEk11Wep3n5BT9Eaab7GT2ikRZfrqQcib/lePy3MkPUXlJgUFT
+c5c0Q7mBF7QpmpPkO7tJJw+eXdG6c3ZXc9CBvx2zO7qj1a73U0B3zAkBOqtT
+7EDPnj5GByc/zADB3bOlhd6BKrXC8FYAohuBgDu1aqTxb9OHNyFov3OHV00f
+ftfGhGocgS47dByBFRnqshlH3B0bziROsCB8QHebhuyTeDC62xTHkN9u/sgV
+YhWz5OXlqZcOobl1ia/dRGDMSKOtmmsQpNHWWN6SlqqYD+tr1Oo9jlfCYusQ
+k+nsgDQ8Dk2yxKFijMdrpn3G4jOE5EgSRxs2RlVs0IJBOJbEi0pG21Kdwkz+
+HOrWpUuXBEhCgIepIYKbNGlS7CSBHCzpBMA0NSVuH0WqiBfcw/4CdUnR+KOQ
+8mv+J8Vps42JIkImKWJr+2jfidEeLyP0QJrTfhA3ySY7FH0lR7HceNCgQZzL
+kmT5otHVWuLUtiPwJdNRyl5cZaP6SYFjYwkWGLtkjSJBW2evp0DqlQFRJKgV
+lXJFbjQSjEFzaqRl5FxVSzC5yC/1k4VY94gyN7JoJeVotxY65tyQ2wysvsTX
+0DiPCZz6ILSucm2ur3KNlG6pX8qX11oLWmuqa2j70rG0eWYnyt29dk04KSoS
+UdlnbXVmpOSJF1KSadvcXuboFFObxw5n+1Yb9LgIzRSU/elPWsa52ctGWaDU
+l6qsOZ0t8E4c2hwDPMHwqgrau2Qg7Z75GuVnL1jjARTfX3fNmbDqEfG4GkxN
+l2V1NdeosnQH3ag47SvygFYxuLbyApXOMWZMizPvo+tF630nXbd6uoRyJTfT
+IqYzy/7lDkoEqiqOLrLAO7s2LSZ4dbUBOrexKxVltqbTC1+gmkvHo8L7hXzv
+daemh559hiyjuuBqeXdketop6Ho2yaAriY6XXqJ5/8unHTmlaFY00n4p37vb
+E+fXE/x81bPTV8IuPnOF2gxZSa8NWsF/S7YcjcpFJ1LD96r49cSxl+BAkbp8
+W6FJJv4GpG+LidTwHVB+PUfvPmiYJgnMO3bOQuC05bmNjZeGD0qizftP0agZ
+2fTV6sNUWR2Ih3IG98v49bQ8XzIIUZ+4ikEaMMVwjxSYh30iuhuoz0RSQycv
+9CbVcx9FqO+t7/RSU1qk0aVFGgRpeFqkuSUtggs+E1ajtnwKZ2kMnezzMfXO
+hribdMOeSyxkhDHAPcArijH/zc+GGMclAJ6IJswynDuhtvZ7nkjtI1/s2bOn
+IRGkcDeJl2rDHdZFgqFguGeOqowMMjHyNAneMQa3tXHjxmij7ahcQfAGHyZ6
+GnNzar2B9ZVEgjgsSMXCVPh6JN6EanluvIKLvgBT/XAVUGH0Yk5LHKPB/e5O
+NzR9GJfx8G3ZsjtGLzmkFf4a6bPDOVm0P2sNVddUt/MMKpk2zQmuCd+e8QrG
+vb62HuBdkmVyvTuvXE+Q69cLcraY9dJigG2s6f+DBXZ58SHXsOM8XlDSKNy7
+jPIz/kTH0u+nA6tG6NIIal5HWTme0f0VWYbdDjLH4YumC9+5kNwY1vgjnXAW
+ZeWS1/mihoz3uUVOZ3bFmoSKXUSplpWAuHBEAKZkwDyEa9BhddhNWGT/K0mk
+doJV+ArVmBNYUdsVPlxJtQxXBGBzGhUKgpE86MnOzo4WgakWaic/hS+YjDlX
+w/cY54bBhMGDByvwOHQBhmDAdG7kPRKFw6FIXF2m0ZQpesqgMaD2kqx6j7JS
+mBaU45wozKDiGQYphhdRxyjKxUQ4Q6gBk3F8VxPAaDU8Gypg3a9ga9RJx3vk
+e/3YHdXchkrLqWEhTAY5MsBEOh0aB//quKMjAt3Bg2hS9YNo+IpzHk4NEGH9
+yI/pvSE8HA5vIdfWYXcAS6p+AAtfcc67KQnA8UPpdQngGeJzNYYMxi/GjHcy
+uw+sQoALwVAcs9eex+KNI6p2aPVtPl64FS3jw6+SZVQd24Yhr8GZ/XDXOJXr
+bq/7geIy8+eK9S3k+7js84lPFBVN6E4k13sfSXx6zVhIrt++nVgimmF3FmPr
+vX8nPhGJK58lPg/ZxhOHXTxegxC3FIds4olhD4/XWKOR9nRx/fAt+cLr2pWf
+xobY02oUzzjVGNnL0cstIgGNBanT4abYaegZqTpPtLamggJXS8RDna+lAyFO
+B+Jiy6ZnQoxznZPp+sl1VDz1t3KN1ttI6slMwk3mjCKodN7TloVj14s3OhIU
+PqRMDnPgxnoDIz7UDqnnzhNJO/gsJPIKCgp4YBGWPYpK9en5z1iorjy1Wa5P
+SQpdzOFqLcfdZtYWU8aYOpX2x1jhMEEvnCZiRtgDJipFAOh5ns5UiKINVDzt
+d4ZCrGvHCqFaErKGI8oSDtU34lEeTmxKDbOW6M+MNbpGGUa66oxdzxPEysDq
+AtfpRkUZmGWcRBmBECDE4FIvQ0IKxzbEREgvB6RYAY5kkl6GPeHqCJgGQRqX
+lgaHFL0dUCnpVlVVmWU4dCNm6faQnyPzDk+UmZkJ5CpqUnaB9CeiJuQlpV14
+XxWgcEJoMGF4P4FTxT1YSwFZwodguTey5bdRdkLZS02gli5VVPHTk5EqPyVf
+YORaXFJG5ecvyJxTdL9y8KgY9A1fw2sQx83fS7WiA3ki0kdPyo+AaMPMHuyM
+jqe3pi3LJkQ9EU4h7D1+k2XhY87Rs9EQ+unU8UMWP47jxISH/ZlLnD3HWXEe
+KHCB80xRrgUnGhqoqXKLc8+RMnpr6GrGN3rWLrpR64KxmL/bN6+DuVcgd92Y
+qIxVqlJZHaBzF3GCm4OqmJUvnqTqq+X8FJez/Jr2L9+KD8l6NaL/X1ZjKPXd
+9X8XuOdx\
+\>", "ImageResolution" -> \
+96.],ExpressionUUID->"b28d9e81-c7d6-4780-9722-5e838afd9601"]
 }, Open  ]],
 
 Cell[BoxData[{
  RowBox[{
-  RowBox[{"F2", "=", "RF"}], ";"}], "\[IndentingNewLine]", 
+  RowBox[{"F2", "=", 
+   RowBox[{"RF", "[", "2", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"h2", "=", 
-   RowBox[{"h", "[", "3", "]"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{"h", "[", "4", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"eq2", "=", 
    RowBox[{
     RowBox[{"eq", "[", 
-     RowBox[{"F2", ",", "h2"}], "]"}], "[", "4", "]"}]}], ";"}]}], "Input",
+     RowBox[{"F2", ",", "h2"}], "]"}], "[", "6", "]"}]}], ";"}]}], "Input",
  CellChangeTimes->{
   3.817563268660089*^9, {3.817563829122241*^9, 3.817563846550528*^9}, {
    3.817563950998456*^9, 3.817563956525237*^9}, {3.8175645239988813`*^9, 
@@ -1428,9 +1728,9 @@ Cell[BoxData[{
    3.827404400190401*^9, 3.827404420238784*^9}, {3.8274045097126637`*^9, 
    3.8274045126565638`*^9}, {3.8274047169724197`*^9, 3.827404723828395*^9}, {
    3.827404767149251*^9, 3.827404769613168*^9}, {3.827405559211132*^9, 
-   3.827405561458974*^9}, {3.827406421058803*^9, 3.827406425898838*^9}},
- CellLabel->
-  "In[535]:=",ExpressionUUID->"4dc1af41-4bef-447e-a233-c8c033887359"],
+   3.827405561458974*^9}, {3.827406421058803*^9, 3.827406425898838*^9}, {
+   3.827410007136595*^9, 3.827410024500999*^9}},
+ CellLabel->"In[9]:=",ExpressionUUID->"4dc1af41-4bef-447e-a233-c8c033887359"],
 
 Cell[CellGroupData[{
 
@@ -1440,8 +1740,9 @@ Cell[BoxData[
    RowBox[{"eq2", ",", "sol1", ",", 
     RowBox[{"{", 
      RowBox[{
-      RowBox[{"gC", "[", "2", "]"}], ",", 
-      RowBox[{"gC", "[", "3", "]"}]}], "}"}], ",", "1"}], "]"}]}]], "Input",
+      RowBox[{"A", "[", "2", "]"}], ",", 
+      RowBox[{"gC", "[", "3", "]"}], ",", 
+      RowBox[{"gC", "[", "4", "]"}]}], "}"}], ",", ".1"}], "]"}]}]], "Input",
  CellChangeTimes->{{3.8175612726329412`*^9, 3.81756128486736*^9}, {
    3.8175614038617268`*^9, 3.817561415404965*^9}, {3.817561511096093*^9, 
    3.817561563944231*^9}, {3.81756250196518*^9, 3.817562507914916*^9}, {
@@ -1525,29 +1826,39 @@ Cell[BoxData[
    3.827404515849715*^9, 3.827404516008604*^9}, 3.8274045561855392`*^9, {
    3.827404728540772*^9, 3.827404795461753*^9}, {3.827405566388193*^9, 
    3.82740557845172*^9}, 3.82740564622897*^9, {3.82740643693969*^9, 
-   3.827406439179371*^9}},
- CellLabel->
-  "In[538]:=",ExpressionUUID->"e74b775a-c745-4f15-9b63-7bb00af5a487"],
+   3.827406439179371*^9}, {3.827410039890891*^9, 3.827410061081759*^9}, {
+   3.827410104744341*^9, 3.8274101058397303`*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"e74b775a-c745-4f15-9b63-7bb00af5a487"],
 
 Cell[BoxData[
  RowBox[{"{", 
   RowBox[{
-   RowBox[{"\[Theta]c", "\[Rule]", "1.1794056865572926`"}], ",", 
-   RowBox[{"\[Theta]0", "\[Rule]", "0.21954119175540773`"}], ",", 
-   RowBox[{"B", "\[Rule]", "25.29499205495345`"}], ",", 
+   RowBox[{"\[Theta]c", "\[Rule]", "1.2288751981920953`"}], ",", 
+   RowBox[{"\[Theta]0", "\[Rule]", "0.19640798159756928`"}], ",", 
+   RowBox[{"B", "\[Rule]", "4.33645857329687`"}], ",", 
    RowBox[{"AH", "\[Rule]", 
-    RowBox[{"-", "0.0037017931470797382`"}]}], ",", 
+    RowBox[{"-", "0.1690406593024206`"}]}], ",", 
    RowBox[{"AL", "\[Rule]", 
-    RowBox[{"-", "0.04675689259995678`"}]}], ",", 
-   RowBox[{"AM", "\[Rule]", "1.402131220096063`"}], ",", 
+    RowBox[{"-", "0.0003412551019198761`"}]}], ",", 
+   RowBox[{
+    RowBox[{"A", "[", "0", "]"}], "\[Rule]", "1.7271062824951564`"}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "1", "]"}], "\[Rule]", "1.7856617805311157`"}], ",", 
+    RowBox[{"A", "[", "1", "]"}], "\[Rule]", "0.6424630704337999`"}], ",", 
+   RowBox[{
+    RowBox[{"gC", "[", "1", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.23389486915853022`"}]}], ",", 
    RowBox[{
     RowBox[{"gC", "[", "2", "]"}], "\[Rule]", 
-    RowBox[{"-", "1.5501692081318597`"}]}], ",", 
+    RowBox[{"-", "0.06559771761617084`"}]}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "3", "]"}], "\[Rule]", "0.5183558036085821`"}]}], 
-  "}"}]], "Output",
+    RowBox[{"A", "[", "2", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.17084263911996586`"}]}], ",", 
+   RowBox[{
+    RowBox[{"gC", "[", "3", "]"}], "\[Rule]", "0.010000509650763907`"}], ",", 
+   
+   RowBox[{
+    RowBox[{"gC", "[", "4", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.00020438037505787854`"}]}]}], "}"}]], "Output",
  CellChangeTimes->{{3.826689120800562*^9, 3.826689127418775*^9}, {
    3.826689158488123*^9, 3.8266891737031317`*^9}, {3.826689317590938*^9, 
    3.826689360645096*^9}, {3.8266895920966187`*^9, 3.82668965774481*^9}, {
@@ -1574,9 +1885,9 @@ Cell[BoxData[
    3.827403799553021*^9, 3.8274038250868883`*^9}, {3.827404411304475*^9, 
    3.827404474434816*^9}, {3.827404520773925*^9, 3.827404582308402*^9}, {
    3.827404734048932*^9, 3.827404820482794*^9}, {3.827405568262806*^9, 
-   3.8274056500914383`*^9}, {3.827406440885428*^9, 3.827406445571705*^9}},
- CellLabel->
-  "Out[538]=",ExpressionUUID->"c721f549-2817-44bb-ac54-1cce625d65af"]
+   3.8274056500914383`*^9}, {3.827406440885428*^9, 3.827406445571705*^9}, 
+   3.82741006348425*^9, 3.827410107607787*^9},
+ CellLabel->"Out[14]=",ExpressionUUID->"0f4a791d-4a5b-4503-9704-91aa49f4aa67"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -1585,14 +1896,6 @@ Cell[BoxData[
  RowBox[{"GraphicsRow", "[", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
-    RowBox[{"Plot", "[", 
-     RowBox[{
-      RowBox[{
-       RowBox[{"t2", "[", "\[Theta]", "]"}], "/.", "sol2"}], ",", 
-      RowBox[{"{", 
-       RowBox[{"\[Theta]", ",", "0", ",", 
-        RowBox[{"\[Theta]c", "/.", "sol2"}]}], "}"}]}], "]"}], ",", 
-    "\[IndentingNewLine]", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
@@ -1623,13 +1926,108 @@ Cell[BoxData[
    3.826013508779696*^9}, {3.826273132094234*^9, 3.826273132189824*^9}, {
    3.82669166646017*^9, 3.8266916666199207`*^9}, {3.82670494152559*^9, 
    3.8267049433095284`*^9}, {3.826704998497435*^9, 3.826705009798936*^9}, {
-   3.827403808596418*^9, 3.827403808955679*^9}},
- CellLabel->
-  "In[539]:=",ExpressionUUID->"fb42dfa6-f948-472b-87e8-e4cb6e90ba26"],
+   3.827403808596418*^9, 3.827403808955679*^9}, {3.827410084066362*^9, 
+   3.827410084728478*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"fb42dfa6-f948-472b-87e8-e4cb6e90ba26"],
 
 Cell[BoxData[
  GraphicsBox[{{}, {InsetBox[
-     GraphicsBox[{{}, {}},
+     GraphicsBox[{{{}, {}, 
+        TagBox[
+         {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
+          Opacity[1.], LineBox[CompressedData["
+1:eJwt1nk01dv7B3ARTZLqoqLQoBJR16VLeRuSEyEVhaRSMitTKkRSyJBypcRR
+igyZju5FmSu5XAnhfApn+Bxjpo40qX77u9bvr2e91lmfffbez97PfpSP++w7
+KSoiIrJwlojI/+L+ww/rC0ft9a3+P0ZGZD++z9oG+WOCoP9F3RnTNk8WA75d
+O395kPjXthTamnUIu88mp1iSWGdb47WT5Yr8oNc7dEhknzxQsoMVBL7fi49z
+STzhlX5AlxWFRl2rg6dKoqB6pv7hNlYKDsjfrvhQmIJ589tr11fmQG+Wc832
+ghxIM/6YaVjFQiV7ZeN+CRbaPn0+mIJy3JHcG2I1pxxLNM49PiqoRnNHrdsX
+v2rsq3VhNUnWwyTBNkInvw6U5oSks9tLsOVzooybX6BS5skVxt+N4IgcHTBq
+fIXGq85bT/7bjATdQ3d/hjThX2bQaKh0K5atX8LI3t+CnUallAvzDU7Ktt+3
+8mmFJ3Nhd4BKO6TiX2p1ZLyBH7Ozva6lA+z+PRfev2vDIpck1zz7TkyEtX3V
+mmxHzOva72/mdOO1Z8+pwPlvwRJKMhUfszFLToFRPq8Tp3v3vJur/Q5Cnezy
+ZXQnFnrOyGhy3iNPobbFrqIL+jUZQx+9evGv4RG9NZ7dWCE99KHAvxcbdzVt
+++TdjWmnLRPuF3oxw/S+8eJMNwp/1U7zonqhcMPY7tjZbiiBL9ae2YtU89vq
+kZe6IVq1bhWL3Yuxh42lISndePk0d5+fSR+kKvqcNOu7ke1A9ZyT4kBOMjQ0
+bikb86vT1V8t5qA38MiuIRk2vFc7h8jKcMD3jHAzXsaG1tCIAkueg+rx7JqP
+CmzUBf5w+LCBgxBGRd4OFTZ6E5WoI8YclJtuN7i8jQ3ZVy6dxkEcfDWJqGlz
+YOOKlrBlIY8Dg7Mplq5pbASGD9msEXBga2XSosNk41RL3/ttgxzsq1rRLn6P
+DYZr87DzGAefbsZ4pD1gY8HdhxIV3zjQlLreVpHHxnWxQ/ouS7loUfpsXVDO
+xp22Z4+rdnLRN1zeF9jBRowiS6vDlIsz0ysKZDvZuOCZ83TIjIsa35UzpV1s
+HJZIbvzNmovvW+1lRyk2FHV9BO6OXNDlP/XNuWw8uKe8Ui6Qi7z/YvSqR9ko
+PH0l1iebC5brYPllcQr9d88lNORyMWe75bylcygoNHreUCzgYiopL545l0KU
+8v6U16VcxH6+oMtaQOF4m+IDjTou/iypk36xmIKsVvnT8fdcZP5XHHNjJYXg
+zyPDPkt42Pfez6r9dwola/pGG2R4CG33+rb+DwpDVm0Tist5ELGa8/a8NgXb
+R2XTrxV5UHY6sEz+TwoadpGimuo8pO/+8cZEnwKvYtWKCVMezM0XDxgzKDBC
+rXefDuGh+33dbq49BcmkwIiEMB4M9Yo5gw4UXuekVhZE8HA5OrNn7DAZ/61g
+y2g0DxPJP+dOH6FwQu38CvdkHm4yQpQnj1MIp+6POBfysEne9s877hR2TjSs
+iyjhYdcuNcUoDwpzJUad7j/hIVK2wtXfk8L1LTodnKc8yB7xVGF4U0iPanrm
++IoHd2l9xvszFCq0p+IOcnlonOMt8U8QhdA9y18F0jzYN4nIXTtHwfC4vmjy
+APned2m043kKr+KiAjtGeWBYqyf+uEChk1Zwsv7GQ7ipu7rqRQofb5homi/l
+Y6BePOiPSAqbxpPb9E34SA4Qc196nazH4L29JYMPjYJARhHx3URlvqM5H13+
+l5LMEylIaeULg635yMkf9g+5QcYLqv3tqSMf2VtY+1uSyHxFP9jqBPLRYb3E
+Z+1tCsL9W/p2neNDuHf+8kfEag8DT9kG83FPsmaz6h2yXtNZQQGX+LjaMnF3
+YyrZv1jZ26x4PtbFGYTLpJH8yBq+08jmY+2ah3vvZZDfT11xRi4fQbOlchbc
+I/9X1jRi+ZiPa1beHv7Eag62M14sPr6cyFI3vE9hUYbHyvxqPhaOTz5oyCTj
+TRY9fFrHR8zYErN1DyiEGU2rN73ggzVjdSic+CMdpj/cxAdXpaRQ6yHZv43J
+Thu6+agNVTGNyiLjXXg3oPOOj+1qOlvZxIxmpdOmvXxItcVFbsgm8/HOC3Oh
++ciPzzxRR5zOqrn3YIKPw+o3Z/EfUeiaLaFaKiR2/7RpfQ4FaVvzkvppPtKp
+5ko34ktf3tbxZvjQjvaXGyY+uWOErzSPRrDhe2ZXLgXaS33QV5JGlYdb5tI8
+cn/SfT48X0RDeanWCwvio7+EU66yNHwVRJ2fEfdqaH+tWE5DYeRF7wSx49Gg
+H5IraQRIM4LW5FOwr50RL15DQ+nyvNkRxOxJ/fli62l4a86fLiQ+tDpcykaV
+hv+4ufg7YpsIcbmvmjTKC2QvbHpMoYNlKm+uReP4r2PcvcT76GjFNB0a+WJ+
+J/yJ95pIbTDUp1Eq61nzhLglYK/aTUMa593kbrcTW2Td0BTspDH/i1T8OHFz
+Z4eWDoMGu0iLOa+AgtkcuT+jzWl8z3BvViZu1LHb8c6SxrapGzLbiBmuqYbq
++2gs+JRwfg/xy5Qek4s2NIokd34/QmzSqGj25hCNrfWJt3yIn389ZrnmMI0T
+1Q5WocRGqg/2BTjREGu4vPoaca19v23DcRoFVePSycQG1zY4LHehMZlzcQWT
+uOqpu5OHGw37PDlkEe/4kO9c6Un2c3ZqaB7xM4XxU4tO0+iTGe0uINa12OJ5
+zI/GLqdJiyLishC/06xAGpcuXuspJNYpeOIvfp5GvBbz6mPiv3s/Bx0MoZHm
+IL0nh1hrkW5IThjJz2SdaiYxC8Hh3yNo/CuduiaVeOvpqkiLqzRyPwVrJxIX
+ZYjEMGNorPq2xzmSWOONUfxkHI2xW+M5Z4kLZkXeME6kYe26e74rsdrWhuS/
+kmh8WoPLtsR5x+elDtwi+ch8ImdMrHrTnPlnKg3znsTn6sSP6uMyr6XTmDdc
+FiNLvH7qdXbPPRqbRaTdf5D8rbU5UBT+iEZjHel4iDMjk0vb82jEXNiUnkW8
++u/usnWFNNxs/+RGEivKOdY2PiHnaVC/WP/x/+oB84V8OY3pXFH9ZcQKQdxG
+r2fED9byx8n5W8E+2ba4nobaE4XA28Qp8x51Or+k0fO22tmDWE53mHrSSMPZ
+2MFNj/i3VG++XSuN8fOyz96S87/I8ezUvR4axRmCYCG5TyvOjmg85dCwuf63
+VQWxSqKTRwefht7zd0EXifVfmPIkhmmwLnb8N5vYW31Zq8c0jZ12TmHfyX0+
+bxq7IPIrjWXtxWJPiK8cEzFNn6HhrlT13pM47a/BylZRASzayxK6SD1o/lGW
+98ciAV7Zq31OIfWjW059wHKJADURRiomxPSWe6tdZQQYMwrNHSf15/vJ6Nt3
+5AUow6oSEKu22F39tV6ALW8WPGsi9Sw6/dvxRgMBpth78m6S+phU5p3OMxbg
+mX/Q2nXEGW089vddArB/sCZLmeT8STTt3WwhQPXAsqjX6RQGvVP1b9oJcHFO
+2/2JuxR2YfsKR18BlAd/u8RLIffZrsgmMECA7HflWnbER/zWJiYECRAW66vb
+cotCQLbk3LpQAcaZfH1WMoUHi3o+qVwTwPP6RlU38h6IcULeTGQKILaxLuRy
+AoUD7LGoPdkCvA5OiGyLp5DV5mTwKFeAjX9fSFpFbPbCsNCpWIAdQV4NRbHk
+fcwVj2upEmA0uv9iZTQ5DwFxjHy2AFk+G9WDIkg+vH/+mtMjgMFxc2bWJQrV
+p3z+ceYIoLInQa49nNRHe2sV+QEBbrQbrVAJI+cXMrNjpgRYerrRpTSYwh/z
+06pPLerHR3kbad8Akj8xqbP1S/phU7K4N8yf5GcmdLOibD/2HF5WHOdH+pHx
+o2mdCv2YWdLuco+8z3Uday+YqPZjwLVoUbEXBUtmvvYak36wlFZYnDlJ4ZTW
+s8e95/uRSH3bHLCfwmY3C5ZqaD8cpSzWme2jMJXWWxYY3o9hUcmtK61J/Z8z
+67lUVD/klUvjKy3JfaBMKP2/+iFsmtg/sJu8R2GvJZiF/bgaWjS3D6S/+I/n
+5EST+fkGfT6iSmGBqP/JvAGynvthRdMbKLRpi3t8Hu4HV9fhYux68j5krA9M
+mOzH79KhR0rWkvX4ecZW/+xHyR2sHlhF6svy6TLF5QP4HnyoamoJua8u85Zw
+LAbgW84xyfhK+tPLzZbCvQNk3TZr5L6w8e/9hGsSBwZgn2lrGzvNhm+fjLi6
+/QCiF4pVnhGSfvjQ6i/nXAZg5G0ct4H0i87mer1LLw5gtXKW3i4O6Sc1vXJN
+iwaw3V110PAFG+u/txoVLhlEk0fmA70YNmq+XP8+W3YQo7qdtSuj2LCf3ltq
+v3wQjUs3jPyIZCN+snWdhNIgKsPsjpeFszE90DrXUZ14iTUtc46N5x2tLfMZ
+gxiaJW3kd4qN4wWt9i4hg9C8m9f4jxEbd4+1+q4cHISSIKrWQ9iNekbdcd2R
+QXw+M1z/Y6Ibwxql+w6ODUIvLlI2fqwb237e2po4NQid7aX5OUPd6Ljj9HH2
+rCFM1ixkNvd1Q7Jj7MyH5UMwrp3Or23qRvCuhWeemg/hxvjcX673u+GwyczH
+rnAIc1/HBxebdeNMW5vwke8wuhhl2/yudWHa7ObZW7tGoGH48lgcsxMvVVoa
+9kt+gJS70uOwnLcQ7zCQK+R9wLK2XNorogMJtPrv3bmjUAoYL9h2qB0+bRu7
+fvMZw5TUrOIZhTZUJzqenzAeR2wq48vSolaoUeKf9ohPwDDO9pRKQgu2dASp
+TZ6ewH4Dzd0x9k3gbheuZ1ITcEnrr+tZ/Ao6XbnztHZMoiHc0VVq4Dl22v90
+X/ZoEhsTv7LCj9bis1RCCX/BR0R5Xi/WXvAMNlvXV5V5fQTDVt1G+8QTeOg7
+7O7p+og7amy1JLN8qAQ3VwzqCnH6m8HK9qw0TK8e/35/uxB9GZk5mzTS8KJx
+8Q5HfSGklwXMufbPXZyQO1j9xlCIjUMiMUdepeJeCbe+giHEzFvrMfvh21AY
+mm6OtRVCfdXaE081krHYVrlP01cIzj5uuEN4HDgzxkojfkJErO3sW5wUi6JM
+l2MPA4SILNuh/C7rGiwn8/jLzwmhrX3na1ZzNGJjtQdFw4RQ+T21eMPyK5Co
+N5/siBNiftmhHqFHCDrdvLcmJAjRYF9kJ7h5AQ+lE/12JwpRvtV/luizc9h5
+pPNTZZIQo19zNKokAxH+9ei3rFQhBk5x19066oW9GRF6x9KEeO+7+wNYblAy
+zQqWZwphpi8dtlPCBVVJIz8T7gvBvyif1mDviHg9KQOzB0Lwsve0/RK1hSNP
+M3x2lhD6jZHGwwctoBa9v64qW4jNPwyKM213YEYjUOxcjhDXE3solZuH9f8P
+L1uhJg==
+           "]]},
+         Annotation[#, "Charting`Private`Tag$10952#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -1641,8 +2039,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{13.512215285129393`, 5.145423971340392}, {
-       4.245699215955369, 0.3750000000000284}},
+      ImagePadding->{{11.532844387755098`, 0.5}, {4.997223543150426, 
+       0.6895743299112809}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -1662,110 +2060,135 @@ Cell[BoxData[
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.1794056865572926`}, {0., 0.}},
+      PlotRange->{{0, 1.2288751981920953`}, {0., 0.41691215144736693`}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {109.19360222251683, -62.28491567201606},
-      ImageScaled[{0.5, 0.5}], {203.14140143277442, 118.63793461336392}], 
+      Ticks->{Automatic, Automatic}], {157.86313208535137, -94.99868317222196},
+      ImageScaled[{0.5, 0.5}], {295.61445644511036, 180.9498727089942}], 
     InsetBox[
      GraphicsBox[{{{}, {}, 
         TagBox[
          {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
           Opacity[1.], LineBox[CompressedData["
-1:eJwt13s4VFsfB3CEKKJSCil0VCIlIsk3KUrlFEVEISRJhS66CIlONxGlQqGQ
-UORWQsclcit3cknM7L1nBo1JSKV3ned5/1rP55m916y9fnt919oqLses3ESE
-hISmCQsJ/de6RQb/q9luZ+z5/3Z1baDtrFx9vIsTD/+vXbF1SUpPjjnSmgwu
-fybts7CJ+vIcW+S76ZpXkZarzurLzzkEq7dPyipI+89ou1dWzmk4rygZYkhr
-t79pVWZOGNKXsJddzw2DSeTOqPScuzhwRjtIreAulvdx5tMvU6Ee7eMeXJYK
-z5MbC9/YZePhxHWOqm82zNdHJrutK8CJc9e6t5wswEInGaP02GL0CmnF58iU
-4GDcrxr/LaXo8tNg96WWQs9A4m+v4ApcfCF7U1rpHWpGol5YZlQh43zEQGT4
-e2yV3nsyK6EGjrIzuN9ba7GpaZVMf0s9RHNL87sMP+L2xKLQas5H2C68c7tP
-0AD3WI6vonMj/F7rKUanNmE8an2t9XgTKLe4vMB/WhBQqGmz3a8F/ontuVct
-21BqkGKhKduG4RypKe5GHeCYuawIedwO/SM7ZuaqdGLKpQLT2AWfIOV6N8Sa
-1YWuOffLHuR14ljomAm3sgdPW+ee3KfbjcTemqAsk17oDSlHiDT2gPdNK6ly
-+RdY1ayul9XtxVvPwxt2SvbhUt4Tr8DhXsgIWXSm1Pdh9g7Ht/3FX9DecWLj
-xph+xJ3t00wJ6IMs31LtgxkLMfypEcmG/fj71UVX1X4Wvs30TbsnzoJoxLw9
-fH82mkfWjUVKsrDs2+6tP8+xkdcmuum6FAt/s8SlxALYOBN3pztgFgvRqp0T
-csFsTC59LeuqzELSYM5x9atsSGwQPr1iDQs6/NqdMvfZWOAdblrmxoLJvqdB
-3wvYMK9+1jVQzkKhwqPycQEbrWVbx/+qYkFP9q977SNsuBbRsw/UsCBpl9mX
-N8pG8Au1bQ0NLDTmuTV6T7BRfOfBq9weFlJ/Rs6uFaage/DanYBxFgoartxZ
-J0tB5ZfnTllNNmrmnzvOXU7hxXcJr63abCjZZL25q0XB+GtyWLAOG84NzZ6m
-2hQc+vqKRwzYSKoP5UbrUIipstfq2MzGqMfsQ0vWUpgRbTEt8QAbE7JTG35u
-pvBTS6N89W023Ldc+Nt9P4X01OQPjnfYuJqp0tl2gPSnptYZdo+NXdfTKsyd
-KRTPUxJ0PmQjzMgwV9WVQuCUGYtC0tkwWTv9a/lhCqIdw+eaK9hQL3lg/dqP
-/F/Iq9Unx8l4152Rd/uH3D+ph4c/SX/8Qp+EqxSO+WdbvJ9ko+xbnGLXNQof
-vZ85LxCjYFuquHv7TQqRdnHhFTMplOgs2DXvNgV57SDeHDIPHVKRovtjKSz6
-tCUpz5HCvjnXEmMzKGheW6qd5kTh0NN5GrcyKaw1kiiMO0jBcXjZsuDnFKzi
-KxtDyDiXrdS47pxFIcTFTMT6JAVnEU6HdC4Fhmvq/PU6hdYFw2uU3lAYeaA2
-2BdO4eK2WNExYuEdU/xbIynEL1Yx/VhEQeF56a2iGApqHNmZASUUtvuavL32
-mMLpid+sd6WkXj+NFy4l9/2lKDtT+j2FN+nKzxTJdZ56v1/XE793nFwjQ65z
-d9H9cLOaQl9JkeVoJQWPil7dabUU5EKMAsqbKDw93soZrKdwRsqw24lHoelZ
-3kOPZjL+ovmHdw9R8OYVFMm2UIjw/jFiPkxhdFEE8onTPhZIaY9RsDHROPqn
-lUJXlL7RbxEaAS4truc7KGCB3oN7CjQkxZWPLu2hMM7ifK9dQMP36Z6wUuLs
-9PidQio07rjsybX/TEHdSEL80BIaq6LTLS73kvru6zyuq0vjo0fJ9rI+ClWq
-t2oO6dO4Ps1obEc/hWDuJvUHhjSiuZeyWolH/TM7hU1oHJE8a93HotATE2T2
-YQeN3TbL0EeR99VpTYLILhrbHZfaO9KkXkt5P/V209BVFwpqJX6Xvzsr1p6G
-XJcpv5ShkNm6RMnzEI2ryzzNQ7gUAuTqh0WDaBy3XXkkdZCCQVfwdoMQ0p/n
-OklRMk+CJP2UI2E05grbP3Mkdl+d4NB4g4bjNurHtK8ULK38Kh/ep2FY35y9
-g09BQmGZalMcjb7tcq73iEu/dJ8XT6Ax0hM1p594zQlznaMpNOw2+54+TuZd
-+ZZCnGEOjc5x12W+Agrtth/GjubT8Co68iGTOHJhiFXCaxoWqgMnGGLx54NT
-Jf6lkbjfP23PNwpvTyW6rCuncdP7Dv4hPmtsW+RdSaMufMeH18RDdW99Wupo
-JB9M75IfoZAafbJOooGGQa6bnSmxi6PGUqNmGlo2XfVexK0Dt7sTP9HIfqme
-+Ir4Vs4Wg9ZuGoOnpf90EVuc/x0p+YWG+IM2q0nioumHthynaUT+Wd9t+J1C
-o+RFtaNcGqo17da7iZmpdycPD5L6RleKeBFPij3vcOfTmM5N4wQRy4lW5hz8
-RuPGKTWJO8QaIp/DnUZp5ExvdEwl3iA05un4gwYTa8stILaZnGFm/4uG84Y9
-GZXEXr/UVWz/kHpreyU3EwdPGP+yFmHgULG+5TNxzLhN204xBuVBR9ZyiDNH
-vbN3SDDYLX63kU9cPhJ6w2I6A5F5Lo9GiT8J4j3MZzCoj/dOnCDm8/NMN81k
-0PVkf/svYvGv9comcgxO72s2+U2sOEj9WC/PQHGmT89P4pW8yWZDBQZh6z5l
-jBObcea+0F/AoNjn+fNvxA70imu6i8j1PlH9A8Q+bDP3VWoMrOdpbmURX+nf
-b7JCncGlQ/N7O4jjv5xSWr6MAS7/Sakjzvl8c2yJJoPI10GPSoiru5MbF2sz
-kPMzff+cuLezOENFhwFlwqjEE492tF5R1iPP0zY77SqxVPvQQUUDBtrSns4n
-iVVbxTFvHYMF3TfN9xMbNCsrzDFm4OGu7rCZ2LJxzfeZJgxiec3xGsT+9e7P
-ppszkEmRyPhK6n+zNiBUwoLBjTltpz8QP66+4yy2g0E43/JYBvHHd+/k/1gx
-eE/X9x0kpsp7BD/3MGjYp7LfiPhX6Wjd+F4GswayRGcTLy1RDxHsZ/AgTq3x
-v/fXuMj4wFdnBkf1d45fI95daGM44MogqmfXln3EgfmhfLYng9XNXq4jZH20
-PaccOk4x2Fale0mWeCBjUr/Vn4HYOqOhRrLeRNLnzm46z+Bvzx2Bt4lXpJq9
-rw1msHyaxjwZ4tBHyXpvb5LxxS+U5pP1HRtfLFsUwaDArDI5iTg7tpX3KorB
-Tf881z1f/8sj8cSX9xmwF0pvf0nyQS/CfUZKMoONn2aU7CV54iXr2BH1lAH/
-5+6NfwbI/IRbPw5OZ3BLpvlHErHczQ2G+7MZZFjoizIkpwVXFdznFDM4ZJR1
-wZ7kk8a0maum/MuApdF9T8Ah6/Wfqb/4ZQxuC72mrxA3hI1E1L5nMJfeJP+C
-5NuLkPqiSy0MflV3vWFIPjJTKq6caGfgqFXr6EO88FKh9YFOBll/BrQm2KR+
-Qakcwy8MMt9dthclPhoQPEcwwODq8mNdIiR/Nc6sOeokyoG8+lHjVJLvLmOa
-BpZTOThfEJ4hR3zvlNoUo2kczHw+aXaxm+TfSdl78rIcjG68MWbZRYE+wS2v
-V+TAdUzUvJ3sH4+PxCutX82Bw65bDpFkP1I+IF4734WDU4drrBKrKEz53uBm
-7sYBR0y66l+yrzFX4/74eXAQ66At+fkdmf883dUfvTl4dSJxcFYFBfMZB++H
-nuNgq4eqntO/FI4XlXh8i+Lgt4WG961XFPZYXxNRieGAV2Jx6noBBUOOTazl
-Aw76miI3heaT88ecoQ9PEzgo09PR8SX7+T0vJX2nTA5OSvab65D9vlTRX6yu
-koNW9z0ym1MppGRtejhRzcEBNe2dC1IoXDeXXbu0noOqwZRd356QfPJN8brU
-zIHKUsXomCQKvOqWprVfONi1PFKuKp7U+6xOYvIEB04lL9JeR5FzRzvPOFCL
-iwUWYmxeAMnnxwp2p1dycWVU0TrqAgXu8a2+3qu5eHlRp8zwPHmfJFNSHNZy
-IWK3NzXInzyvoYvs2s1cnDtw4OKYL9nvY9u/DDtw8fVC5JJLHiRPnCpCDl7n
-orkjIWHeTnJ+0ByJtw/nos1SuinQksK0H6qvdkUSO4ZOUtvJ80QEDiKGi0Vb
-0jdmbCX5X7rORukxF5ZcRX8VU5Kni7OXtBRywXmZcDhVj5wzmPhqMx4XVSYK
-r1bMJ7/XJL68MMTFqvvvu7XkyXrKTI7NGeZCe8nsexpzKLj6ZXqrjnMxkmvV
-qETOacpCxbMmRXmwToo3Z0mQ/U6+2z5XmQdDy/bJyTE2zpop8tSsePBPicpx
-bmZj2+O704Vf8WDqMsWv7jIbd4om/YTf8HA4PyzM4RIbva1uPcIlPCjVzvPh
-BLLhJ6mbJVLBA3/4bs0vcp6P9/5oI9rAg0V3+FVJHzYEBpKJUzk8FLK+SRU6
-snGv7qzBjPkDWCzcVXd+NRv0qKObov8AVqprDhxvZ2F3RFKx1PkB+GXwLC61
-sPB2OUd+MmAA4vr01duN5PvCya+6N2QA9uaDGRm1LGypvqqdfGsAdHDeuaq3
-LKTF5f9YmTqA6a5hs2JSWfDeNPOmWdsAInZaz44/xcJIRHneCb1BbL64o8aI
-fHc4tR8vKhQewhYbFdUXU/vxLpfb5fZ2CAlDN6zWfv2C68ZpWVPCv2LuM/5F
-XnQv+qaKlQxp8vGyzJZ3aGUPfhY+yLp2jQ+lxVvfzFboRNnmlgBVAR/9vboz
-Fh1ug8SDk3s5u4ahXNhT1fmoCaFylFb982FYHd1rb6T1ATkHf3SnzxFAc4/Q
-0+i4ChwI8L1f6CfAxVBuUFd5PgSjA9KupwR44HnqrpZnPkKOuQdJnRFAXqHK
-1kEmH6lOdh6O5wQorrO5Z2WXB/5GrPkTJEDejUCnR7wcBE6d3rgxXACD1XWV
-2ZLZSLiVKFn9lPS3MkzunE0qdCWVLvg8E6C5h99rHpOCd0HRfIUMAWxZNytr
-OpLB9bnSduSFAA022lbj+55AZ4/3E+l8ARan8Pf1OiSidL6hya5yAfZpJh27
-mxCD3ZEvc35UCNCvZ5A0rHgX1DStpYmVAoyF5jnmRkdj2q+FMt+qyXg2zlt1
-JiwSVj1i3VENAmz7viW0ovIKWDYXd65vEqD8eq+p8MvLOPVhvIzdLEBkzLq/
-pscF4/5bXtqadgEY7+ok6c4z0Fzrpvy5Q4CXG6pzh1J8UJzVExHWKYC+11Kp
-epYHdmrsFVvZLUBgzlqjFs5e9Cc2nGnvEWDQ7nBTzdYzxv8D3eDLjA==
+1:eJwV1nk4VG0UAHBKkmzZKqUkaVGWUiQ5KiShSYp8tnyIZM2erCEqhoTsWyUS
+GYTktUUiJs3cosg6c2dM2SWk735/zfN75r7n3nc55z077NxNHFZxcXEZc3Nx
+/f97wfJxc+kPCy3R+QWhVyX0usiIpyV5FHWQElX98O1yYr3G8ume6xR9WNqa
+Ex57ubz+8pYB+dtRJsD8yxP/qKCl/qF66uh5ijm4GuZcu3y5p5560SRv+6A1
+fM9LId8u/lYfdZS3zDfKDoTEXsbZF4zWy+mPxPVnOMAFDVVn8iZOfdOlBlcd
+ihNY6D0W23F5ut7WIdOwuN0FXA49aq5V/1W/ciNQQXTQDfZV/+0TLV6uN25U
+iNRc8gCtCtYFMXNulKmfNuse5QU2Os0pv/N5EKebzz5/gzeMukSmaBzlQ8fM
+/D5hGT7AlHK9T9sogHodTMuPU/zByetdW6S5KNrzo2mHp1YgPJbKP9BTKY58
+vVUSCtpvgscF4a5WtY1IPELIY/1gMFB3GLzKf7YVHYysd88+HAo09/PnYh5t
+R73vfHYfXQqFaSuVQT6zHWgPaTT5elQ4tK2eCA/Pk0PUB+nGvIYREEqqMqz6
+Vx75fTbhzdlwG5RvKZxUV9uDWq0bfT5lRIIeO1xgp8R+ZO+aZapBuQPjd7aa
+a146iAReXhSg+ccAv0XPBe7QQ4gyK9DiqhULBuq3jVjlqmhV0M1Due13wc/i
+RN92VTWUE2suyjcYB9SlojqJAk2k3yX8PvdxPDx1m903JKmFFu6MNGQeJsPa
+yjm794mAsjvT/NWWyCCzuD33t8kJ9PPCOvxaVCLsL6Tnt2TooKa50WY1ViLc
+X9qKJQfqouSUhmwewwcgQU5qnbXUQ8e/+pllbUgCER/PXSZK+uieHaP1Y8ZD
+8C4uPhrFb4j2eTY/Vqekwi73l/RDRiaoakmD++K2R/D+7fnZXo4JOhFVbukZ
+8wjoRgq6u+MvIPP0XLEimzSwkB7ir/pqiqLfhoRtEciABbo/5VGSGRrdrGm1
+Yp8Nr6/KaeyItEIeBZRqKWo2TNY9khI4Z42CUyRi06Vz4E2beX3KFhu0Tvb+
+2Ks7OTDamN142toWyagFZUxa54LiWJnwopAdOnfFgt9ufT702ZwUFit1QEny
+kuqT2vnAtyCmMb3HEfWNf3QI9s2HhotT36ULHJGj75nGtKF82PJR7d7lrKso
++K66/6dXBdDF2t1tkeeMnldKMnTsn4Bb0SEVPdwVreP/1Lj7zTNIDsjnplfc
+QLJOJXZ7J57Bmeff8F4ub6TRGr1aYUcRcG0zjnUx8kbXwjV1FSOLoIy9y00V
+90adi4/fqRoVg5y7QZe5nC+KG/fvPtH/HLJefeB0VPkj8Q/b+v/5UwqYdpr1
++VPBKPnhcv2LjWWgUxmh8jgnGOW1OMeXKpdByIWo6dCVYPRaVkf5pV0ZGAoe
+ftT9OgRxBhY8K1rLYJ26lrddVigyMrObq417CcfWn9SeUwhHIvqHl9u2UcCt
+Njx8wT8StZkUHD+rRoFPKrojwy8iUbCVWEjXOQqILHvNrx+LRByvKW56KAVm
+GJL9m02i0LvMkrXDwxQQvGV9WlYpGoXO7BJbflIB4rzVWj2zd9BUluQ+ZaUq
+EBiRNt/w4h7qmftllgo1UPR8MibIORG9WjQKULKogW3VAtN9cYko429+Wqt3
+Dah9n+q2qEhEjutI/bPPaoDvvc+L+r+JaHFrod158VoISR/Rkkh9gGR1zF35
+WbXQ/vH30ERXEvJKrA4PSqyDwDnpxXHTFCSqFFBiO4agZz1aDKzPQCaNjpQO
+gWaQ338imG9tAepTnhT417kVvrxIGLgxVYTeSFRG6Ve1g9QtB9ujqi9Re/S/
+Bx3ed0K/94HciIkK9D7b/0ewCBXePDIMyztUg3ROVvQ5Zn+Evp3zjormb9D1
+bMEvPvKfoDfpxWVmYwO6kY19auqiwa0fCor7hZuRsGOSU7EFBtz8cVE3j75F
+sd2NSx/XfoE93xqlehLaEGVGIHt7SS9gwsdinHvbkceA4Ve+I18hNVEheWWi
+AwleX5ZQHvwGZ7v6Z73lupBWQw5r2nUA9lB3XDMWoaKn//T1BwgNwry4RZX4
+xo8oSnWmS3B4EPwDJAfE+XtQqUfUPfenQ1C5ZSLHvr8H6QefP+NxaxjEX3+w
+yCr9hBQmknu0dEcALv7ZaWhLQw7Hx0dk1o1CB/XPiRu/aWjU9QDuJTAKy+9O
+VvYv0ZBdljunRXgUSm8zkvRWaMj278ysk+QovKfapoitpiOLxuU1L3eOgqNB
+S3qaAB2RdIX2nNAaBR/PWjXL7XSkYaRy/cqNUfCMCXctOkVHwlZ+s7n9o8DR
+tKKYR9ORlN+40uvBUQjfGqOrHkNH8gk2LrSRUdBuIFlL3qUjrbenh3nZoxC4
+RVO2K46O3A5sorrMj4KRhy5LIZmOOv9UFx8WHgNLm2DZnAI6islatGvXHgPt
+urU1Tg10lFTtljV8agx2Nidd29RERzk9w71LemMg2qSY0tpMR9W8HSRFozGo
+/iBtu62NjnC3dK0Hl8fgyvHFJ68/0JEeaEpZeY0Bj19szfM+Olo9eOvjZP4Y
+2Pr13HKcoSPT3p93DJ+OwSpHuX6eOTp60mOjXVg0BuITDo6583Rk8PZEqc3L
+Mfj95dcs7TcdkYvW3O+qH4OFZ9vmd3FhaKvPff3nvWNAzpPb7S6AocP8meiq
+MAOut93STt+JoajVQn7NogwQnzu7dkUOQ1+WgxW3SzJAxuos21oeQ0ETtpnY
+Vga4qSit3rIXQ000uZu6+xiwirfTO0gRQ8bZz4/s1GVAQMSX3yPqGLqqWlcy
+EMiA1DMPn5w0xJCisxFlXzADTsnad9kZYWg2c6DaN4wBXCHKG8OMMRS+lrtF
+6A4DqH7H+KtJGMrq0+3TesiAdKaPi/BFDGGh3bzZpQzgt+14+68VhjIrbQXG
+ywlT/nQ7WGPInj21Qa2KAeaKcnMONhiaviAu3V3HgNxN1DjbKxgS3H350N92
+BnQPac5pOWBI58Owjc0oA5zHC4/lXMfQ+lXeDsVMBpgqlL+LcMVQz5E1Lr/Y
+DBiqbb/m4IYh25zdvvFTDFg+WcqR9SDW48b1e2iFAV4G+/ujbmCIsnm+evtm
+Jggq7JWZDsBQoHF0vctWJpjHv+6pCsSQdsSmllfbmfCxKy0p4CaGujga3efk
+mfAsgabzOwhDbBQyFnKICezDxkZDIRiSdVwnOmjEBIM3maUXIjHke7vTeIbE
+hNrf6lI/Cb/Pi7/La8oE+76+7qgoDHl9l1hzwIIJcWZiWyjRxP6Yyy4EODLh
+q3bE3l8xGPr37LEBsRAm2F7ahu+Pw1C184rU7nAmKBlXDxUTFrjTaKYRyQSS
+BWvH3ngMVbSc/mh7lwnq3Qve28gY4tEybSlJYcJ0xH7r2QQMFSi7Fp0uY8Ll
+2FNcRg8xtGCszLSgMOE9f8PJMsKGrjM73aqI+WSGtW1IJvb7WUBmUh0TPJOb
+k7sJ6+6MIg+9Y4JQIaZzJBVDaSfOfJjtYMKdJqHEu4R/2gjw83UzYUndbft3
+wskZiRGKdCbI5yb/Dn2EIYZEtu/NISaQx44VlKZhSEPVjhI3yoTjCZbj84Tj
+THZN5jKZcC4yzkMzHUNH4oud3/1gAk+UtGoT4dgStydfJ5lQFjLvuSoDQwMd
+KiM/Z5iApX/haBOO4qu2lFhkwkaXl6nVhPvkbz7a84cJGat3tU8RVtTVwo5x
+4ZAVk354byZxPsNaztnx4qAbeq8xkfDuJerJUlEccr/bZZGyMNSwQF7ikcTh
+tlTQ4RDCFvOkCovNOOQMZ1UVE46bou7ilcFhJazGZ4XwngnywD87cbi2KEiR
+yyb2k0NKeSmPg8fJXb36hOeZVD6rAzhoO5oNxBImj5Eby5VxCDhJrSskvG+E
+FMinioPzRFt4C+GWQZFD1mo4JHz9oTRA2GqAOk7RwKEhd6p57v94X8kF67Rw
++MsXobU+h4jXS7KyOYHDBx6T7G2E930WkazUwYGnUoihRLiFRu3i18dhnaOz
+KBC27iFH257FoY8sKmdIeKGbpF1ljMNSX62UGeHEDyK/15vgUCIpNm9DeH8H
+9eWVizisPtVZ6Ui49R352itzHD7dTbnsQti2lbRT0BKHd2fkh1wJLzaLfLOz
+weHZqn2GboQfNFKTqu1wkHA2Tbv+fzxENhJyxAG3NOtw+j9eHYnX3hmHP+zR
+Abv/49WKoJrrOEQbldIs/o/3iuon7IHD9LjTcxLhpEqyssMNYv0tWhx0CCtS
+SKxaXxyYlt5cRwi/KxPJEwnEQXNIIWgXYbsXVAvHWzgYrMn6Ikp4uZgsVheK
+wzexYIkVYj2Tn5E6N9zGwTQy5CCTsPJTkcir0TjwcV1S6iLcXkA9/iYWh0mz
+yvUUwnZ55HnROBw4cefbHhJeziaVOiXgMEgbuOL7//h0qox4Kg7zB7MOqhB+
+n0rudU7HYU3CUaf1hO2TSYkoCwfB2NSbI8T5SU2grnZ5jMMpuo/GfcIH48l1
+DYU4JH63HrMm3HmP5CP5HIfNc4PXFQn/jaYyGstx8HwZLdJGnN/USHL2xioc
+Mm5v2k8mfDCCZO5ag0PXa6mdZoQdg6ntmxpwcH1plDdA5ANXEDncrRmHFFHO
+3mzCaQGkYy2tOLhJf75rRbjLm/rc/QMOU4Ee/Z+I/HPyIju8peIwgt/vvEt4
+lQdp2xYaDmpqWNIJwoddqPGtfTi8p7SVPiHyOeMK1Usax8Ffz2KtGZH/zfpN
+dhrjhGe/16wmzFaqMDH7ScxfNjD2BVEv1FdSDibMEt9Xxhu5koIhWprNNA83
+Cy6FneqNJurPUtj54R08LAiWUPLdRVjW+VSP1loW8J12Umok6peH2u5yf0EW
+sN8Nz00nEfWR9tOTs5kFPnpfO+EBhg69HryyTpoFw00Sel2JRD7n9ZyXl2HB
+9b2DvRaECz2qVGzlWaCZpk9yI+qljmDw1KeDLFjl5+IVTNTXID1Bz9dnWTAi
+HW956i6G8g/8tf1izAJXTwMHSiyxv+JTpLnzLIhRPxK5g/CmEZqykjkLDK91
+rlu4Q9TnkIzJPHsW3CpUl4kj6j+nWsEj9hYLevdUm1qHYUgsR9r2aSgLondt
+qi4NJepjtDCpJYIFF3ndlf4S98udizNKKzEsUDdRv5wajCG56doJz2QW8Oc2
+PqAQ99M/Cgbul0tZ8M3sRsB9HyKfjSxLHMtZsFU8Q6LFm8gXD7fxG5XE/FkL
+9AXi/uusTLwa95pYz9S0JksvDGlpf7VpbmNB+UqKnpA7hmQuXicdGGTBom5z
+z0Ynon4Hx6lwb2CDr23Fh2Zz4v7PzXEXEmfDweGW9HozDG1vKS/ZspEN8y9K
+7ry6hCHzdZ/3HpFmg0ywY32+KZE/D7bLuuxlw+GHGx46EP3C88IyUfoJNgT9
+Ke2MO40hz56emUIvNmzZwmPuq4ohU9pQyYIPG46v36W9+RBxH2CTV/UD2DDr
+Is2pUSHqQa/QN2YIGxQ7BuJmiX4mfMigRf4+G96KVS8aE/1O4mRTUsFTNqSv
+k9JNlSbWX4hyOOcbG2qlnwbe5CHyXaRpYuI7G95caYvBVmHIX/TjMxhhQ6nG
+TTMlbgxpSk5If2ex4Ru+WrHvDx21SCvwbvvFhol/PZvFf9ERfX8+lr5hHPRC
+NNylWXQ0b/DAL0VvHAz0jXtudtCRwxGa04sz41BUHH2vtJ2OaDskLN4ajsOx
+nLOGQ0Q/SVlI1pwxGYcLuOA3rRY68niSxn3OZhyygxuODtfREZs77y6v/zhw
+xyZ/aS+ho4HqsmyfZ+PwKl9u9Vai322V72q7IMCB4WvXM9r06ejm1PrDJcIc
+2OT884GBHh0p153J4xXjwLatfgc7iP467fzboJrNHBBRMrN/q0X0y0F1Ktt3
+c+BGcuCjTFU6kuwpSmef4IA12f1YP9GfO96Kdg/z48CDOO4/qbM0tIamvbF0
+mIifxkXiSqEh/Ttlr7vHOCB99AlTJomGYjVlbCdxDoxYm3pCAg0JPf5bqDLB
+gbKj7y1879KQpG+9RsUSBzYK74nqCKGhPZs0rWvEf8AlywYQc6IhA0u1x816
+P8D0t5PJJjUaih89cOhL0Q9YvB9pvNj1Cbn37P0s7v4T/vTGRoqP9yCUYBU4
+eWoCJiLLtQupH9H+vjVzhmsmwU7vSV5aIRWp0Pz3T3lMQu25l5Tm2C40pDmz
+O7tvEib2Sly9FNeB1D4XrVM9PgUn/XLGQ+69QzoWK9c2FU6B28ZhF1z4Lfol
+FF8+sn4aClddM6rIaEQXD+6ur3adBlJzTT9nRx1y0frnTP/nachQ+yDE2laB
+5IM6a3GNGZg8UKO8r7MQzctOLOVpzkDOi52/z0YVorftG45bac2AtkZQkqN2
+IbLfaIY+npgB6jEZt6iKpyi3fKi5Vn8GlMN86J4ZT9BW1nznvUvE8yZ327hc
+CtCGSzu+K3vNQJmXJtNgdQ4aXD4lM35jBmwdoqvVArJRWb7jlcc+M9AQt/7v
+h/EsZDxVPLI5gBj/SXjpMzUT3bt3BF8VOgMyPlly9mnpiLf57BTtPuGzDEFP
+hRSEObsdjI+fgVB6y8V/M5PRY5GEG2cSiPHSTg5nhZORjjU29yaJeN9pQ/U/
+00ko7Lft4pP0GRj8R+owuyYRkXIijl3JJP5fuHLqvkIikjn9JGhLNhHPc+8n
++cwEVJ80vhKfNwNcS2O046FkFHdMSNuggIi/K33cdyQeWQ0rh/E8IQyqHJvW
+OLQ/5kJT/VNiPgsNfUee3UfLSr6rA54RVghjLN29h/4DvFUqGw==
            "]]},
-         Annotation[#, "Charting`Private`Tag$121326#1"]& ]}, {}},
+         Annotation[#, "Charting`Private`Tag$10994#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -1777,8 +2200,8 @@ epYHdmrsFVvZLUBgzlqjFs5e9Cc2nGnvEWDQ7nBTzdYzxv8D3eDLjA==
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{13.918811108970326`, 5.146744339546046}, {
-       4.245699215955369, 0.3750000000000284}},
+      ImagePadding->{{23.65816326530612, 0.5}, {4.997223543150426, 
+       0.6895743299112809}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -1798,183 +2221,19 @@ epYHdmrsFVvZLUBgzlqjFs5e9Cc2nGnvEWDQ7nBTzdYzxv8D3eDLjA==
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.1794056865572926`}, {0., 0.7175279889805627}},
+      PlotRange->{{0, 1.2288751981920953`}, {-0.35354192197704976`, 0.}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {327.7847647635738, -62.28491567201606},
-      ImageScaled[{0.5, 0.5}], {203.549317624821, 118.63793461336392}], 
-    InsetBox[
-     GraphicsBox[{{{}, {}, 
-        TagBox[
-         {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
-          Opacity[1.], LineBox[CompressedData["
-1:eJwV1nk0Vd8XAHDKLKVSvkkkRSppkGTapYSUUDSSDFGEDEWDDC8KCZlC5kJk
-Jg3elgxlqoRMieddvPue6ZFo0O/+/rrrs+5aZ519ztmDnI2rmf0CHh4eC14e
-nv9/7aMC3m7pPKVzZFbnP/3CL292NvmdWFa2G5SZi0N0hiPoWw0Vs/pK9eGt
-cXLI9FAhXW6l/tKEelM4uDSfU77wHT03+FdLTekJGGZkBrUMfaKrzT0PG0+z
-hNu9Rz/HOHbTrcu2bbhffx6KbdxOxC8cpG9wEaGto9uB0QVzpaMDLDqpwGS8
-KHWAX+FF7i+GJugF3yv3Hcm9BKZJ/H6/bX/QPePjUhlpl8H4SuRlD8df9KTs
-in+ah91A4g6XITP9j/6PtqEgqP4KWHzSRN+FC9HmfJTVZ10P0M+IuBRsIoA1
-2v/EpOmeICtmukdpQBjvzXQ6F5Veg561iamJQ+LIadWT/qPiA7HS9tdMJZaj
-cUFx48Hc66CSfOz4F9sVKOEYtqk37Ras8vK6oeEohVcPzHUprLkNgZO6l2XX
-rEFn8ZIa9cN+0Gx+sfTjlCx+5Mh6Btb7A88f5TcGC+WR50xH48Y7AbBWcpme
-adp63PEhTL5FNxCao5PFwEQBo5/Mtf5Hp8Ez+e/Eh34lPGX1ZXt+aTDI8YbE
-HB7ahiFN9+4dc78LVhOv/mPObsc3GnsHZlXuQe2GptLR5TtRRvJ5xP7cEJgP
-4GdZ2O5C5seg8c60+zB94cpvXwcNXKGjre97Lhz01cwXPqnUxIN5U8nyax7A
-iZv917SktfH4gW2Kuw9HQOpq1EMu4Iu1jzv86yNByaOr/e6C/fjphHfAcYUo
-kEyZV7L+uB9Hwo9tVbwTBYoTpY2uqQdQ6q9wUJPuQxg4z6rcffQg3uy6ukuS
-Hg3uszkvHL8b4r4ok+i80jhQvx7hspYwQZGUFimf1fFwbtQq+Ku3KbbmHk7T
-C4gHkyu93UJLzNCm1iC/7+gjeMP7i6db9xjSZve+F2cnwO9yvhHV9+ZYZ7X9
-j6dcMtT/9+biW8MzGO5UELDvbjIcTPousJL/LFp4KwsvHk+GJ4HRC5nVZ3E4
-Umll1psUsBlo/8bWs0IaQzyek5sKO4Oe5bWVWuPTFcLFMvrpwGdy2XVouR2K
-SBv8oF1Ph8Ab/cwTd+zQZV2wOvt5OsgeSgngn7VDNRV+fCGRAWE5UUtXDNhj
-vQFvkwkjA7SF06/wVTvgyI05IuDWE2jZ4hS8Gp1wM4O1argkG8yrn4hOmLmj
-sfFZW2IwGyJuMB4aJbij26uWvMHlOTCzJsViG8Mdy6NKoN8jB3oYi6/FeHjg
-3v237Lt2PgM5387I5iRPtMgUL2osyYWAqnrfCaFr6Hdht0FhST64MKaedOnf
-xPTWnMj8wXzYVV3YYpp6E2t1pHvylheAFCfsutncTRSR5HXJ8SiAnl8rdEfz
-bmGDLWH4eVUhSLqf7gmWuo3mEgWuDV2F4Kxyp/yJoD9e8tJ9/eZUMQhw73Zc
-VqFhSOm41f4rxdD4r3DROlsa5kwlLWi4Wwxr2re6S8bRcOTKT8OvL4ohognf
-1P6j4QWXvM7JFSWw7YgmqdJ2B887rJxRaC2B+UQDh933gvHkKXJb5KEyyDSJ
-//lTPhS94+PaJG3K4Lu8zLuGc6EY9/WAd7JPGfhUJe7rSwzFDvMUzM0ug5gH
-ZQfrJcLwuNlx4zqBcti+sfdXqvB9NDGiO/2uLoeNmXL6rv/CUV876qm9ZgWo
-VPpszrsfia3bR6rI4xWgrOVm61sciVYKOj2uLhWgZp5+4urXSPRcQi65nlYB
-hbk3HL/KRWH6wD6fcMGXkHbrUbtlRRT+vTNp9OLLS+gaN5H14TzEkhaTSSHn
-1+AnRfvU6haLstZLtPKS6KDP6Cs1YyViiODtU7dK6ZAffVHJTiIJp/PHrho3
-0YE+1vgqBpKw4W9z0cRvOmSEXlY8FZuEnolhirvOIFTWj7VY6z1GOzZN+Pui
-KrBmtdPccpLxpcKCHw6NVZCeGKRRWZOKto//NPoYVEOoLU+qZlsG7lIXOuoc
-UAveKR96s4xysXE6utD4+Xv4bVrLaugqQkOxk15FaY3g5RBvrqtZjge+bF8y
-2N4CTW0Bh129XuPDX2uDGlifoMl4QtryfBVeSGJ5rD7fCjTXNm6P0jucjdZu
-Ojb7Bda14dnIc3Xo+3qLxWHPdpCR/7TsWfAHrFbPOrRF/CtU5poL+K9uRtZB
-m620zE447zc/mWn9CRcGVuxPWtMNMTJzDd1rW7F3RcK7xPIekBDdk9+wtA1z
-OlZ6nVH9BsWO/mbFI+24a0wmckFrHyyNXp/Nx/6KZo07W8RV++Hiw39D25ld
-GFj+xNlvsh9uzJVmCFT04PIjllWD9AEw7OmoN8v9ho+vM7Zk+TJga5WwgrD7
-d4yfEIx8qjEIznnDNg8j+nFqqcezRwJMGNbtXzPmOoD6Dbm9nBomVK/ev+qQ
-KgN/K2+q2fmQgOQpC9+Tcwxc222QUW45BDwX3fesyx5EWLMr8ZHUMPzMl2me
-283EWSbrR9OaYdj03vyQtgYTi/OSTXjkhmF+XYLWbS0mKmgJCTgoDkPnAdVb
-83uZuPhMj5uq6jC0E6KnSEMm9sX7H/x4ZBg4gd+ar55hoq9EyySf/zB1Xps0
-LW8xsVLUwcBteBgmJ/j1VN8wsVX4tvxlchiyMgUsxyuZOCIYN39xdBgcfDZO
-ZiMTJfjqS22nhkGsVi1U8h0Tnf8oyJ34NwyqGw97Mj4wcfXo0Jy25AhcNL13
-d+tXJvq0XMgV1R+BA4PxCokTTAxv8g0SOjQC7tvh9nouEzMbYs/zHxmB17gK
-8qaY+KmuTvKf2Qgo5b2fLJ9h4kZUoHGtRuBbZbT4yz9M/FowdLbr6ggQrd0p
-rkIE7oq8sDjr6Qg0sRKt02QIqn9adkXnjIAc3+3McVkCMx8cywzIG4Fl3WuN
-tOQIlAjfq2FVPAKHTFfTP8kTyA2RurCCPgKqt/cpDW0ksJDWUhnYPgJrJ2uD
-qncQuMlb7bI1HwusSLcxLT0CbX5uUTcWZEHIvc0mFgcJfHRVfqGWCAtaZ8x5
-XPQJFPISfyQpzoJn3k6G8YYEDl8ha1pWs6Dv+XPnziPUfpySpbV3sqB914yD
-gAWBMucEmlbZsMDi9HyhhD2BC398tte3Z8H7rHv1whcIHAl5/M/TkQVbWvbX
-/6FcXK6685MLC2Jlpn17HQnUX2ybEHSDBfJeohUBzgS6VaLjVDQLnPx+xF70
-IND8WOgCuXgW9C/90KvlSaAGyyLJOJEFus9vzYt5Eci3YuxjThoLdAR3tuZc
-peJxlt5tnc+CpgaHjHofAqtX+/A317OgTvrK9sTbBGYVHUj51cAC9fixT0Z+
-BIbpi+/Z2MKCBcGEzi/KFh5ZzoFtLOAeYwSYBBDIbmj/smeABTOytIcMGoGf
-rNMuOzBZsOScxgP/OwSWzzgLxgyzwCslz0wmiEC/dXyaE6PU+QXYKZsGU/d1
-fUf6018ssP1wTSrpHoFzS+Y12/6y4FalnZZSCIF9Tz608/KSMPXFULaUcs5n
-a2FLQRJCI+LXvwslUEfpgdtyCRJk64NX1N0n0KGTreOnTMLJyeOtVpEEZmdK
-nbq2jYTKTeq5VZRJN0MPl50kzP55E7g2inpPwllZZ/eQ8M6G2NZN2U3DRnyP
-Hgk9pbqOu6IJLBKI3LTNgISflTWbgilzW/GAohEJ0uanhzsoezqt8VlhSkL8
-i59GbjEEeid1DkyeJcG840ZBSCyBLx0F/4ycI+Gm9WqVJsq/VNVW9tuQMByt
-mSEaR+DN5oeHWhxJuC+18wKNcuWjartaJxKsGzJLKinP20/6vnEhIWOgkTtN
-2W/euOSZJwl1W132W8YT+LbhVnPaNRLObQw8Fk55QVzecPx1EobE/c0qKdNU
-RKSD/aj1zl+SWvGIwNrf6mq+gSSYcMcGtCkLvHcw8Qqi4qkJj7GjfNe6lmYb
-RkJClik9l/KHLdPJpx+QEKMvtqOJssjcupemUSSI6K14QFI2qjX9YhBDQmt5
-WZtAAvVeIv1GIZ4Et1SNBXKUmy0LBHcnUutzx1fuobx4U5/c1mQSKu7KLTtK
-+ejMIq0NaSS0K6+esqEcUa1pIZ1JAsZtfOlJ+XP4JbflWSRcuhhjS6O87Myj
-EJFnJATueD4ZSfmY4vtM3uckOLm+tnlMOXpqhj5bQMKOe6LlTym344au8WIS
-nraPkM8prww7PjVURsLeuGSeEsonTgaK9VWQoPn32kwZ5fj1xYrtr0mgyVc1
-llPumujf10Sn9rOs+vb//0tVLjn77i0Jh6veLy2mfOaeztVXNSQcWizrn0c5
-yfxyRFE9CcGNS5ozKX+TS3qW3UBCYgkxnUBZZqyhJqWZhCYX9s9wyudezfXF
-fiJhY5RTux/l1KCNc/e/kHAjpTDMjfKA2YnldzpIMODnX2NFeZ1skPLNLhK6
-ZEruGFK2ZZfqe/SSsEeVv24H5cwXg+cvfSdB5bret1WUicBlN88zqP0tozfM
-U/elYLIv9iRBQrfIy/sDlHNGkhsOsklwnrGMTKUc35hecmuMBM7XvjIfykH5
-T5NKJ0nYqWVuZELZzjPfZd0sCZ7H/Gt/UO/L7ETxiVO/STBWvJBdQ3mfRvne
-iHkSsjF5NoKyDA992TwfGz6ccfwmR3nR4NvfqkJs0MxTdBui3vPv2lqmkygb
-7p2Oc86m3BnaXN61lA03Dw4mr6ccJfntdJkMG2LeZ338S+WX36/+/Rw5Nhza
-ah/7nLLrN+YW+Q1soG8JxtOUD2dw5iM2s+GalOmu51R+Cqj8SXdWZ4Pp33Mx
-Ox4SOL2UJyxDkw15Ck/Nm6l8H5xe6NWtwwYImnezp1z1SlTfQI8NJVUaZfep
-enH94Gq2vBkbtAyUT9MfEOioJNt22pwNA7xmXfspn1gkXxl5kg1x0yp5deEE
-qrZuevDPig2nl140rKHq0Zilxs4eJzZs28NvkELVq969OtLLXNnAoSkZLaHc
-KK/Lb+jOhh7PrISbVH3LZhl+Lfdmw92AeamjVD208Tp1I+oOG4bP7A7+QtVP
-k5OWdh/ussH9rv4XZcqgef4ITxgbMlSM7O5Q9Vaa96KsSxQbWohrpluoetwR
-5v3OMIUNv2cv65zyp/I1M06U9yUb+r/lR229QWBs5bwn7xs2BP4SenXpOoH9
-HfZ9vMiGqWtc90yqP3gKqxYtqGXDpviLseLeBCa7fLLg+8wGaaXk8Eaq33DV
-hdMFWdR5brv/qPEygVpmbqJCHCqesLu+/VS/Cnb66ik0TsV7nDHCdaL2l/xE
-X/gHZdX0Q+KXCDy4UHdUhJcDR3YNbVGm+t+j5uvqi1dx4PCRjqoxSwKZQwNp
-i6U5kNPbktJzlsCtPIaiS2Q5kL904GftGap/7ZDsW7KBAyHBOuIPTxHIiSsJ
-XLqdAxsXGzctNidwrw2nRcKQA45aC2pDjah+PWNpv9qHAw5KTcaxagQej8yg
-L7rJAS26WffuXdT9b2ZJzvtyIFRfr79jJ5UP1p4N/TQOiAT6nhTbTqBBQ4jK
-0wgOfH5dQJzZTOCzxy/mtmVzYD3P/hZfah5xObA0/OBXDhyt3pTfwU9gd5/F
-8O5uDhw6VrVKgY+K1ydpr9I3DnSx5EbcFxAom684JTrIgWFvk2d8/6j5SFLn
-5OcxDmx3CykQmmXidvaldWcFRmGwtWhlFIuJ05E15Vd2USXWRUnmSQM1D+7/
-3peuPgoBE2PeHu+peWp6TqBNcxQUPstn6tQx8YyFygk13VG448/v2PiWidVS
-CT9/GY9Crtj7EHoFEx9kuKrTHEdh6PIPO5GnTNxUJvUqNnEUig4cz9vuy8QD
-F3Yx6pNHwf7lzd3xN5hoJWkiMpc2CsBQ9fztzcRInzunz2SPwmUR9/kXHtQ8
-qz3xS7ZsFBrDSA3hi0ysravVzGkZhdOPe31EjzHRutOt8jXvGKjzr9e8u56J
-HThmX843BmqtV6vK5ZholOW8uEhwDESXHjNkyDBR7arjuadiYyA842WzbRUT
-xSSseSNXjcGl6YVJ2WJMfHX0qN6F7WPQuem3t9DMIC6vV24WPz8Gwy/uavnV
-DGJdGdlrXzUGWembq9edHERWifbx1HdjwP8hpVnn+CAuKo5o7K4bA8u0BKkT
-JoNolq/26mjzGPBZ/PW8aTCI358GxO3pHoMpdevFCeqDOBsnZSY2PQb1yxNJ
-2f8GUen6ofpSxXGoPbfhj3EbA8N0nhUtfDAOejmbv/zby8DPlT3/qUSNg47r
-vZcaWgxcqS3mdzpmHHivnnl3ZTcDUzXdjIsSx0FL9pR2mzIDS9TV2FbZ47Am
-IDX/khQDu3dUr3/1dhysTQ4/6eUO4EbF7ji36XFwpgV1NKcOIEOQH8e2TIDz
-rR1P8yb68ffrxKLQ0AmwfXogw+NnH77Ta/ddx52ACvco/Si9HhRK9DrJMp0E
-sVODoWcPfcUgiSHlloJJ6NM6GZbV24qltnPf8lZwIWCtme/b/gY85+uR8NqT
-Cy2GRoufrUTkznDE7K5yoX+8IuBvLh1prhf8F3lzoejgbOjafXTMtj7laHmD
-C3s/iBi0X6rECV1Q++fPBf3b2d2zr1+jn6Boq+4DLpwN9/Vcb16BaRHpwg05
-XNi/LmzZjE0RqgpL33LP5YJnSvtrVW4h1vnHTEg954LdueQ0Xf9CJN3vfnUq
-5MKMq6RJvHYB7jB3eSL2ggs7TsZXbCnIxepVGvtMa7ggsHLtkxV+mXg8qqR0
-rpYLVVWni2/FZ+CQiPLG9Hou+Bw+0EkrTEeRP7JLphq4kOxWX+f2PRXN+vi/
-RX/mQlKsmiLtSgIyLW6baH+hvMfZzygpHq9+nH1HtHGhVeEsy6wuFhOq2M/U
-OrlQ3LjzsPx/D3HLHnuZ711c6D76SXQUIpFe1BcZ3MOFmy4LPk80h6PJppP8
-275xQej73spQqVAcTP/s3dlHnee7C2O59sH4P7mAgdE=
-           "]]},
-         Annotation[#, "Charting`Private`Tag$121372#1"]& ]}, {}},
-      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
-      Axes->{True, True},
-      AxesLabel->{None, None},
-      AxesOrigin->{0, 0},
-      DisplayFunction->Identity,
-      Frame->{{False, False}, {False, False}},
-      FrameLabel->{{None, None}, {None, None}},
-      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
-      GridLines->{None, None},
-      GridLinesStyle->Directive[
-        GrayLevel[0.5, 0.4]],
-      ImagePadding->{{13.512215285129397`, 5.145423971340335}, {
-       4.245699215955369, 0.3750000000000284}},
-      Method->{
-       "DefaultBoundaryStyle" -> Automatic, 
-        "DefaultGraphicsInteraction" -> {
-         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
-          "Effects" -> {
-           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
-            "Droplines" -> {
-             "freeformCursorMode" -> True, 
-              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
-        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
-        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
-            (Identity[#]& )[
-             Part[#, 1]], 
-            (Identity[#]& )[
-             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
-            (Identity[#]& )[
-             Part[#, 1]], 
-            (Identity[#]& )[
-             Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.1794056865572926`}, {-0.6751359920027515, 0.}},
-      PlotRangeClipping->True,
-      PlotRangePadding->{{
-         Scaled[0.02], 
-         Scaled[0.02]}, {
-         Scaled[0.05], 
-         Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {546.3759273046307, -62.28491567201606},
-      ImageScaled[{0.5, 0.5}], {203.14140143277436, 118.63793461336392}]}, {}},
+      Ticks->{Automatic, Automatic}], {479.65205569482964, -94.99868317222196},
+      ImageScaled[{0.5, 0.5}], {307.7397753226614, 180.9498727089942}]}, {}},
   ImageSize->{
     UpTo[600], 
-    UpTo[167]},
-  PlotRange->{{0, 655.5695295271476}, {-124.56983134403212`, 0}},
+    UpTo[223]},
+  PlotRange->{{0, 643.5778472189565}, {-189.99736634444392`, 0}},
   PlotRangePadding->{6, 5}]], "Output",
  CellChangeTimes->{
   3.826008397009801*^9, 3.826008507422884*^9, 3.826008595888225*^9, 
@@ -1989,9 +2248,307 @@ OrlQ3LjzsPx/D3HLHnuZ711c6D76SXQUIpFe1BcZ3MOFmy4LPk80h6PJppP8
    3.826702270169533*^9, 3.82670247769197*^9, 3.826702928578911*^9, {
    3.826704944992766*^9, 3.8267049529148703`*^9}, 3.826705010823153*^9, 
    3.827311046379264*^9, 3.827313657677243*^9, 3.827314385136931*^9, {
-   3.827403802712145*^9, 3.827403826347602*^9}, 3.827406448571678*^9},
- CellLabel->
-  "Out[539]=",ExpressionUUID->"780abf21-a6d3-46d2-b547-fd3404f56c38"]
+   3.827403802712145*^9, 3.827403826347602*^9}, 3.827406448571678*^9, {
+   3.827410088419756*^9, 3.827410111532262*^9}},
+ CellLabel->"Out[15]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJztnQe4VdW173eEA5Z7b/KS3JeeGEu8Lz0xuak3uend1JtiEktsYMGGvWJB
+xQKoiBFU7AEVUQHpTSkiRXoHDwgcivQiiKw7fnON/zpzb9ba+5yjec/v3ezv
+26esNdeYY4w55mhzzLl+dnzHdiedcXzH9iccf/APzjn+rHbtTzj34O+feY5d
+avW2UqnVwaVSafvBJf5O7E//UfE5lB/7XP4fe/W34dc/J4sXL05OPfXU5MUX
+X0x2796dDBkyJDnrrLOSrVu3huY7d+5MHn300WTt2rXh/1dffbW0X3LLLbeU
+Wifbt28Pz/Dds2dPCrlN8swzzyQXXnhhsmrVqtCkZ8+eyQ033LBfuF23D8TN
+mzeXWiUbNmwwiH369AE2/yV79+49pCkQD0qWL18eIOqzYsWKQNPUqVOT119/
+PVmwYEFy2mmnJTNmzCgFJPdLunfvbt1t27YtWbNmTXLppZcmAwYMEDyeGzNm
+TAbv4YcfTq666qqAsWEVeAaPnnvuuZKINvoDHx577LHkxhtvDH+/9tprKcgD
+9wFZQNFhDs2eDBA6d+4MYuFvoySF1jYM0pw5czJojz/+eHLBBRcAzQbHGhtD
+AeGfVAT6xgPfNrn33nuTO+64I4MBYcAYPXq0IUCb1qHb22+/PbnpppsY+MP9
+0YsuuigZMWJE9ih8Ofnkk5OVK1fa+NJm/+Syyy5LzjzzzOTss88OX/jfvn37
+8LdJwCFNBtUqeeSRR+BN+G8/v3bXXXcl99xzT/jvo35t/fr14Vkb/qydDVFy
+7rnnuuil1xjKQYMGlcHr0aNH8uCDD4b/DvNrcBXKU0xr43u4P3fdddclTz31
+lDMivTZ48ODA3YaGhnQ0Ho9Ho1Vy9dVX5+L0wAMPuEikI4I49+7dO7n++uuR
+m0O96Y4dOwIaixYtsv/Sax06dEief/55fzAFAiv79u2boY9k33bbbc0D0yrp
+0qVLk0YEpdKuXTtkK2vHZKWPjRs3+oi0DdP+yiuvTFavXh0mEhOWCWbPZ1yN
+R6NNE/HVSMYjcoBfMzlPOnbsmLz88svpiDxWPiIXX3xxMmrUqDIaoQ86GyWi
+dZg3d999d+jD5twh3hQNBmqAF2pM+LFjx5aNiE2roH6WLFmSNyJNA9M2yPQp
+p5ySTJ48OczauXPnhik3bdq0klCaOHFimH4xRevWrQvwjfM+GilKDz30UIDH
+PeAY3I9VGYhaaOYNxIF+bdy4cck555zDVEoH4tHmTQ1NMRQefdr0zEiuJSB1
+/hOBQwCB4SNQau7cwm7deeedmJbkjDPOCBrQ6BeYps4FY2F4tL6+PswFLAej
+hoF8s+fCQX4NmYaliWxFv3gIUlvh98MnthUaRkjX/I+1+/Dhw7PnsLXSlpo/
+qKQnn3xSbD+sCY9KkSMVV1xxBUqxJOmUETDWZmxGwiqNAN26+cvanX/++cn4
+8ePL2FVkBIpwyzMCYjMqBwmtZPP/8fvA8E/p496X/DPEAM9p4MCB8s8ykbF+
+g9+xbNmyZMuWLUHUkECjuxQ7ZdCHb0QbzLqp8f19FJjzl19+eXBdslEofKqN
+d4znAjMYd3S3uXJB8+AkqmOmQ9euXcPjeDvoVXNpBGLkyJFBvCXuU6ZMCdPk
+pZdechCtw5iY7xZmvI3F/tWRO9THGTWIqWZuo0NsNEp69L777guIgrD1FKTI
+zOr3cgYi/DwhGqhw+xPeyaRJk5JLLrkkDNG1116LGvcZ2SYApyM4hA5FzQ8d
+OlS8ZRIhXUjm6aefHiaYPSL7BNpoYFRRjUfa+m20MFMZ+eA23mPmJLQJLj2z
+FNGA5TgCNnWELq6FHEnQhSdmMg7zQXjiiSeClcGJiwahAKV4EOgTHkFNPAhA
+7NSpU+iMccT/Mi32vYzJ+7A+b2i6NWXM/kc/WJWX0xesSfaq+Y/8RsMr25NV
+60IA6AotlXTmLpJ+zTXXBElXwISkAwyZ5YNCRGkiiIwuzxGgmQLzZ9okt956
+axAa4DFDUMgWj9VFuOWR+m/hlznCJne0OabToGTS7FVl6N/yyAvJcVcNToZP
+fsmnzruaHeeiqtA72BPUHNoCNHv16pWRgF3BgcL0ontRAKbq8khI3aD9YXWy
+ftOOZPaSdcnoqfXJY6MWJPc8PTO57dGpyU0PTd4vuf7+Sdbsxocmh0vcosmo
+KfXJLHvklc07AdE15cWhKXDr52h+vJd/6oIr1zrZtGlTuOlhnkxcnuUmRiJU
+SyLziDsK/kZ65vXH9Iz01jt37UlmLlqb9BsxP+l836TklOuHlt7BoNi9U7sM
+T258cHLyxJiFybxl65PX9rxeujGWwNape3nj8DCK/UcvPDCnp7xrB73F272V
+cHkr8SD1S9OY6bK/PhuG/a9PvJgnYO/hZx12ytp7ZK5QQO5tHAXIbDJnmYdJ
+JMwypaifvL6GOVprN25PBk9YGgT5+KsH1wU5bpOccfOI5Np7JyZ3PD49eWjo
+3OTJcYuSoZOW7ZeMfKHebtuf4RK3aNKp93hkOn3aRPy6Icntj05LJsxayWy5
+PvTlE6AuoDFm2vLAiROufSZZt3FHRspbdWT/MQvenFkwYebKMO5/ueYZbEKe
+ZH7Yr9VKRqQ+XJpbxQucOXNmcv/992OdMms1f/58gsNgnLmPu9+zZ88wSYIm
+HuyAt+3YjelMOt093rBMdXn7G4Ylt/abatNjSTK//pVk+87dpX/xTu3vZM7S
+9cnTzy0OhuvEa4cYlFT6T+w8JLmz/4vJ/JdewXCl87JM+tEFl9/1XOCE9VD6
+XA4bjnyTr30+59p+Piq7X3s9ObvbqIBP3+HzFFc2LUFXl/Tr1y+4NcQwhN/z
+5s3LRoAQl3s4u8Ajs2uhUp6/MMivLV25KfDPZCTjKdzqbzZ12apNcO9/O+Jm
+XoNb8cAzc9A/aWsTnZ7jknHTVwTre3XM/sYOF63YYDimzYEgJD79/3go0MUM
+A8K3befudCiqZyOkO4ln8TC7deuWDRfsV453/5xun/JrwJsyryG5+p4JJXER
+iYDn5hmXPuTo4YLOXLw26fHYtOTYToPEwbO6jkyGPb8MQSp1ihneNu4NuxeI
+u7DH2GTP63tTJ/dbDtqoDVTT4JmJS4/w56slAxTG4ajKaSUxQBBovnXMBDQD
+iwRaKiDyExNkW2PGDIgYM3nOakQqY0zXv00JnilpLWXdNm19Nek3cj4UlGKu
+jDUxNKaVrijmCo+efN3QQPiQSUvLufK34fPCjXO6j0Kc01AgPwZXSEzsiWxw
+j2kH+bt27Yq5Qff2NUz52YoQvSo3nnC0GXo5MXzNY0juGzQ7WbNhe+kIf27n
+rteSgaYWbT5mnLjUnkGF0uKymBP7l3GCD9oW0OZVJ5u37QrXvunMWGdRBJaD
++xNnrfxhDqaPO6YrLZRDMceYPjRkLswufSLClEgD5S1Mez05IxgDWlxSHVOU
+z/m3jwng735qZhmmknT0lolJwDQg+qjjRxDxyLC5AS8a2mRK7howg2in9Bkf
+SIImIiLRcMZNI5IX5q6O0QowpTtmWFAiWChRPv/h9+pXbw7XuW+GS2FjzLp+
+3i2DfI5bA77X9pmY1DdsPtJvz1q8LkijbsMx4+RFMbPyjX9Xi1F5woxsmFd8
+vu4tujz4fLhnAWHpxzkw/uZ827J9V8ZcvkRSOBXE8190DOEtUaTanHvr6GTx
+io0X1saQJIAE7NkXV4SbX/N7mHtxd8WaLXlIPuIIoEkV4olFJlRf8dvTFqzJ
+bjP+QyYuBf/zi/Fr7T/RMJKEHa+mi51f8Xvw84pezynA+EkOmIciBiGxwg9F
+ZeR93W9v2vYqMXl2Gw9/1+4959XGD8Bn3jIyPIV0x/g9P2dV5vrZRP5JJr4P
+erfG1OS828Zk3TKEBvAbfhuJGTB2UXabqbVhy86OxVjVec+mKjJee4on+ZLf
+MzNknY4O903X/jQHzAMODDD4djRFX0+b31D6tt97ceGaEPWIm0ZL6dxamNWF
+MSPM4jFmQJaV+ndHb8QLL4Wb7XAHduzOQ+8+5w+UEI+JP8wy0ybf9a7grmY1
+utXGu3ROMYZafLWJnxx7VaqjEGs+X4xG+/SbUjkeOH7Jz3LA9IlECj0i5PoM
+moX+/L4jhwmUQ8woPTfj5dLZxchpHQXTI+O467U94eYX/N4TYxeGe4ij3ctD
+7l7v3XRD0sGlloDUZn7pR34PGmM7YpFv6awIswBR+GzdsStp3yV1Yeifz5F+
+D8UlK2/R71HZw/d4T4TEsgYQ9NLqzaWf+D3GFpdYWBi3S2cW80crHCOn1Ifm
+ZuCC7eTzeb+Hyxz5YkflgOntg4eUktBS7yS4TBh/JiG2iXn/4NnZ7aeeXVzq
+UBs5XMlL3ZfAyvH5nN9bu2F7xoup8xt+ngOmlyMHa2JdhkwY6J8LOfv1yLB5
+2e1BxrkzipE7wBFYUL8hewTFz+ezfq+nqUOum68M+DzkFKG+untPcvPDL8Tj
+xiO/jJB7OJqyNttLpxcjd2AFAhfdEYYu3Py03zOpycAZEb/IAfNX7x2JvLL3
++GzSmRkt/SbCLB7TcTYlTquNmenj5CRXkYTTjZg1Wnjznku/zIFxp3dtvmSm
+kZkwKKrfRqKGMQ122LSSeUOlU4vROsjRwh2VFoVqPp/0e5lZN3Avr90aMAtQ
+enqfcFRarsPNI/CkSr/3e8gwKQJNsiUvbyy1r40PnqMsnTzHT/i9ODfQa8CM
+I72nN3spQmtYVCGwhsVC4qZNm/Li8jscBWJvBWi4VKZRSkf7PShiPsg54V67
+Ykb8kxM7M8dj/bjfq/AXUr3191nUKKhMy2NGDycYbNs5M0g3mFiV/uT3ELGO
+t47O7pmnVjqlmBn/7AR3s7CSR5iTco+19JO6KanEmJEPwtvsZY828bJH+Hhp
+lx6JK7vyUnO3R8TjQ4DNJXemxB/j91at35ZJCYaCOP/kiPgAUSSj5+VvEynH
+JMt4oQOsAye5mcnxNnFyPK4XySsXyYt8b3OybGZnJGO1zNSXjvN7c5etz6xV
+n4Gzghd3UvF4/4sT2H/0wiyEIZ/I52N+D8NBDp77T45b9AUH07Sc6AF5OdEA
+vlbNUrgWEqPdnTZ8I9FN5G92v/QXR5IUmwyExTBNINmiiMwJxQGJSTa3IVMf
+5nWJ5KYlIQ/IS0JWjnmpqYMu4hcu35D5bOhkiD/R0X3UQ7FjUxflxGLi3+5P
+mLEKT7BMizfOR5UGeI5i88gX6lMPu6Vpv+rVOnkTu5tG26RcYQyx5Ladu12S
+U9vLog73sPE20UtV1uLfrsfs1w0PpKa/s0UAWYijShfiRG5i801ZiPQ3nPcr
+LJbJU+tdHVvzADIP/tI7nw05/1P8HhEG2k5q3f73qZDLgHc4fUSc0g6EkHwO
+8XusbUv/mb37kvfU4uxeYW1KHs23eG8sAXZwXQN90NzeEeSe5NLi8Srk/q9s
+OFNnm4CKBBufj/o9uW6eFfttDpibHamNFhHKhvKbvN1pDkYTyTl6fG2kQEQR
+HhlVPgf7PYZcEe7sJet+x+UA5SZHhcQ04y2qjCceQjRGUUya1eu3HVeMyjv9
+iTgZsdKTER/x9l3dA+jywPPuYpbDuNExwjpcdXfqbWFrjQSPuFJPTP4jEoyU
+HhuhFSC+0xuH/IOH5WR8ssmpfD8aUKw2/y8PqS5Rx/Lx0Q+mSzxSTu28xOje
+gbNifCqgvcufQEEe56OCJ8jng34PrK+5NyW/x2PT/pAD5gYRaNPhDg+XmGg2
+wJ71qBCj2SuPKUbq3f4ECWTlFEgM8PmA3yOpp3G1EKYYqUbTwXfynNUd/bLi
+LWSp4ZVtf66NDylAzCVP9XWxfr/fIzQhQOSeQT46G/vrvYGW4Pk+M3HpeTny
+w2/8tz8Vo/KvDu25GS/vk2N7n9+z4DGTik3bXj06B8x13jvLKlKWRPII5PkO
+huSsRGLA2EWO1Lv8yZxgJvMXqBD33rJrmMjKZRC5lXG7fYmtKxNAbFs2bd7j
+qLKgShqQBv3HLPxjDqzODgtBl49BqgB+X+hgCKHF1OUNW/5YTnFOxFJWZe3b
+g7Iop2CDTZ4/oPXVOPvHKlhMoxZqcF9Nv+bRqJKUjVt2ZuzAibS5U7pIvDQ5
+7ewqSPJ2dExom6LNJ1rPjMuO8+ycENb8AhMcUT4S33jx0bj+pxww13gHTHyt
+gQHKiPOVolTPKUVsbnsFHVQixB93Q5tLB7GCEhKokpiOviPmZ/G5zeRAR4By
+tYMlkLzF12EQOxLVl+WIm13/Qzn2FOnHH48bCrEPpQ4SpDL1YBEiH6l6nCDS
+rq6H/5xD+tXeVAoYNTBr8brLYxm6b1KZDP3+TeX9e9VT0mgwy2a+zLtSke7i
+5BFzlTeVWuQ7emr9lZEMndQoQxV0FHj1TaVDKjk2ryollbOEV6JJb/r4mBww
+nbwp0aH81weHzBFlFYL0u5iEujyXPCslyStgb5ODgKycggf8Vy2IvcPby5uy
+cXIPqBzGld4nSUv5v4wp0nNVFcn6bTk5Od52GTmVpeDVyIn9VNZy+Ch8ZP08
+csXyKLpC3Zr50VIgzjNx6zUSr42NKmrQ+CVOTJ5pl2ejRBzyYlYo3FQCh/nA
+QpO7YsH/DVCyqZk0ln3g2OCqdvaHZUGQdlMC/1ULlfJgMqTf93oRiRKK8unc
+C/uWP1ecPa3bJ3s6e/bstEzLImz2N+lTULydO80ud3TMr8rGbOr8huv8MkpY
+kaSF1FUIl8uLzpRfNM4Xpg+KoCk3aPFISvObusu5BcXfsilUC0iZmDaTCxyv
+r5hP/ptiDigSkdOMu+EFGomWHbRK6qnCr3K5GdlRrXVWbP2VTq1VF36pC5L5
+7FlKmEQJtqGLg6a0g+sX3D4Gu/zriN4ATFTGCTILlEIHWpNCOcjuP/Xs4q+l
+VDY5ISoqK7bTtvWmtQqGL3EqcX8UVxBfWizqcWnrUK+jMG/gc4tjKiugfdif
+mDa/IcuikWLlowXC/r7kiEI0vnzbwbRwk2qTS0Izx9R+KXTENaRM+WaHLQN3
+Yqq5flVM6Ef8Ca0C4jlqzU4jwuq3LL5FZd9xMC3ZBNqCssuLHQvq9zQUMxev
+vUXiEi3T3tpvahNIDRbm2pQcCsVjUkmPc92XLr/jI1Z7s2WbeLNl+HhpY17l
++EXeG9kLac0nxi7s5pcXrWhUPkbpL4tJUo7oaV9AxILhLqTCkmSqWa7UtAVr
+vuskvdFNjG+keDGNH9OyCnk2Nz88OZjL7o52b8/FYTlMI/2iNhPIDGjmo99i
+JmgR9No0w/s9R6AFWwVFT0vKFC/wbplgiikppcD/udUxZXFOWtq0aBW6lbWk
+jjsTl0WpsVTJXZwfW/zyxpMKkWpMjOIvm/92u18e+UJZjcbPi/FR0lhZVGI8
+Vb24K6Yl2NsenRqeCwCUP4nzXaZmevjlMMHvTCd4z8enNwEBWKgkOfWTFfCZ
+cQ2vbD85B8J53nS1zRklPSxi6ilOl7u4R0WoBDhaMhjrC0+ebHo9ElBVDlik
+eEoOAh1dQuJcPtqNLOmdDqZ73zRuuO6+kBD9WTFDtOMTdaV8UOf0qdIehya1
+isxt3bGrGKnWyT1Pp8oRE2pR4F/9cqxgXly4pgo+Wk0ipS29Z5H3a36ZxIHG
+bfCEpe1yIJzrTZWl5mvj2ssvU7YVqe+fFqNyuD+hhARum5G/2y9XlDW3y4ZY
+ydlUQobIqe3tl6kj02WT4SYgQK5c5aq9BszY5ZfNmmeRqwXA7XMgnO2jSzSl
+CUIMyK6Cux2MChLRstbTT4rx0TKnSh74zlm6/lW/LE8jLP4nSTE+jTYUMbEY
+556IUCl7Q6sKKkdU9IkJMCJ3+GX8MGFofvqpORCU1yd1oKaT56zu45eVWmak
+bMR+XBsVxlX5N1Mp2/1yXB9pJua0HAhnelO8b6mU+wfPvs8vYwpktEx6q6Ci
+ugMhzwSyibTNL1P82Kjdtp2WSawWXlApygvym70Q9/vDlIcqhLbp/KNaWKQq
+RYkmRbpbIpoU8D04ZM7pOWA6SFZ8wqZrCtsfiPiqtIapuxifAEd7Vcnka5aM
+mlIvBPDqJIE2qfMQ0ALZlHmNRuf5Oase8stUkOiy2dAfFjNE5UCq56TPjVtf
+3eSXQ8mlC87A8UvOyIFwujclz6im9zw98xFvqjVtU/elJuCBkbmgR+YFCQ8t
+BJ7bfTQjn4fHaT60DJ+EmupLi228cjxVewqX5y1b/4NifFQvFttMcz83+GWS
+eDIapsA7FOLTGGcx0MsbtvT1ywpZQdXk5fvFqKiUTjX3ZMUtWH3FL9/k5bPu
+G3bIpOxUkWAOloi2UL6fX6YQ8LjGhdkmIEAWX+thpgPW++W4yszcil/4OLwZ
+SaGCMrrcpFB7h032Qqsh1HzhLTzqqCp9HLZIyI/OpflT/oS8rmPTmbTWLyNk
+F7qYmquf0vx3SQo1o3iunXMA9SMvC05QTPWYI45hlu8yY9HaKhxQyatiD3Ir
+NvXW+GXF6Kg+UxhBx73xpJAOn6p2KFpe+qSdg1OqCnk3ue/vl2XTydoad75b
+m2piu3aNFrNBU2BHo4/39LOLf5xS/UaTRGJQS4qpTnGQLDnIlvQfvfAJvxyX
+wGThc2SKPuPttFqCbNQ3bF7tl83+pY5kt1EMvgqLm5Yk2r8ySRQwjorkqtfI
+qTIKB1EFImhL9vsNcPy06IhHYAP7neKB/YxDi3PcWnJY6dDiWiKzpr9yME3L
+FLWNM0Whz5YM58mOigwe9tji1if9Mku9Gk5TTVXoVTl9vCAxeMISkaqEmVfZ
+/8pJaEmmyKvhxJlaxXAnOQYvLmz01I3ZT/tlrUEy4tb7t4sp1G4GuUsscpoT
+tsIvU+sg+OYP/dopfHMSR82qflNNI164MswWKw2MLiuhZ4yoSXFaF69lIQ+j
+S/UOLXagzMf4L3+kxamiZtW8neC9Mcnkl7BCZu6K7z9vjE0JGwx0up7ShDqT
+urjOJHysrXsNrTQ/Q8u82hLty4lj95Ev1Itr2hdOiGOqv2MhbY3iBhSL5QZH
+o6hldgtmKsgqLiZpu89Zsw0NDWHOQV6rnJRkHnnaBiU3Hqtspn6ZkIv2QKsY
+KQBQrTELj9IrZteG+GVpIbeb/xkTVVg4ohVYSkcRJZtJpbaFOKclUUoWadF/
+qSMgL9m3UZ2XA+Z4B0OAqFCU7CRmQnSw1Vejbr5uBR0FxQta6WB6cEwZKVMT
+2Dy51644NrOoHwvolvhl1vGliqz78wupaDRo+B5mu4d5UyUliaIqsK9ROMKB
+xJxD2bdv36hwRPKiIvkgL5t2LPLLr5efoHFBDsLHeVPF3p6jGO6XyappQ7SR
+/80mcVyLDRz8R1+cuJhnQr5YRXIWOgKjp5YdgZNHwrHelKmrDcPmzI/0popc
+2VFVgX9BmYiOZkGB6dTHPCOv7af1kbiMnlq/wC8TZ2VHWI1ZGJYbAgBtAkG9
+suDQqF73+PFZ5TvUzCf8Rox4teKQtkG9MqXRU8g8BwxzNB9HQOeNgvb4KsBF
+wdhEm++XJcm4jhaDX5gD4RhvqliCcNRU6mhvqo2hPR+fXqqgo7gqpE2ydOnS
+cI2jeLHaFOTNnDkzb96qIhxBUg6yiwvSXEcO1XhsY6h/UQ6YP3tTjItswJPj
+Fo3xy8ohAMWi7vTMgFwD/+VcwVg+Jxp3pTYk73n4aKcUnrPmBwl0VKK8bCXU
+73l6VqkKRtperkHGlVy7Yftsv6wDhzybd3EhMq2zzdPBo924Y5xf1qkKWJ8N
+W3Z+vRYq5YMlqmY6tLh4r9+I+WFVPUD5ozegYELTY8Kslc/6ZTgrmA8PnVsF
+i69GYiGLOWj8EiGgjKBL/SU5EI72pqzzaBPSnf1fHO+XVQ/EkrVF7l+LUAlw
+dGCCdZoxzib6i36Z9LIU7/QFay7NQeAPkTgpT0AOn410wgILoCSoGYkYiwpo
+X3NoPCHhhJXk8ac5NNIlSt5aj5cVItWot5ksC+o3TPTLShsTfBtfv1qMz9f9
+CQr9tJbRb+R8oaIFI9hr2ioPld97U7KFCp0eH71gkl9mVikNNuKFl6qgotNB
+hDw0LVy+YYpfJpiTV2ah2eU5EH7nzEXmVXLGGgZR6/MOhpPiuM7anA3CV2rh
+kw68TguR/XjBocnqEX9ZL5dncvc7b6BDMmBgwyvbJkfSrCjG/N8qWHzDn8Ap
+lZnrM3CWAMUz1JilXYDF6cRWcToxu0YkW77AfUA4BFuf5tSb/dZRm0cmtVO2
+xDvFmyq7ZMqoVIXubzqUOGc/c9HaWKy0Jefup2amdB/UnJRiFptWfXNEs+rM
+FD6iV3WEWfe+U4PlkRivjlw90z5fLubAf/oT8urR1CY3muNyRjnl0zRf0AjN
+SCnK4933fO3aRWbxxvw7HkvX7VjtY+vtNG+vglebIaWaRNaFelnVmlESDsuk
+XUMNsLNs3PQVR6eUNjmNKKryKK1VaPYbR2H8zJczKZy1ZN10v6xqDFSVWekv
+RXQGODo4i8oMeUXmvj0n/tl4qEoC28y62vGORdOShuVUKQdRs6zsV44X6S7p
+VPM4ZBXj03seGjI3JquCP9+WMLrDgz9nno0cBbmqWN1V67b+xSHUShFWo60Z
+xWS/cjZjT7VDDVvLYugMx3Di7JVZSGfT9t9rkZpC06Ch9oGmd0EQOcuKmqE5
+wamplifMm4dx2VG1A/M0jFIFWBSbLPKuwFRqyPyfKrR9J5IH1Uw+8MycMZLT
+pDFBhYeMPRVttbfG7nN+vCZaS6rJfukg4xk1ckq9PGzVOLOQk+3fzSX5u/7E
+hKi4xLzr0brsrjp9LF25Sdn14s2w+xzQHlPZ3NoxrQrGWrGrr86JVO5prAzb
+KqR+z59Q6TuGxKJ4xcD4IhgRbj0ybN61ORDiA2xUqCGFr8hPux/CZhMdfVQF
+n5Q6lqh5CvGCuhEOTb2EurLdewJSAcrPvYE28bhGnueXmYFapzUHpAoW3/cn
+KMDUEyY+SsnEmZo5S9d3zoFwlDdNfeehCocWeFOOpfSUUKkKHj9wKHJMCQ5N
+4oZGw6wFWnN0rsuBoLOPmO9KdCumUJZksdfRIM/GoyNr4ZNGKFr6Id5hJ7Yy
+hCoOIyDbtnN3MVKtCQVi3bTIm8q8WNhZipEJQH7oKJBqUswnP0oZ5NjxNR/x
++hwUfupN4yV90xWL/bJsOrK/67U9ny9myY/8CQ5RFyCLjJSjx93TQXMWmt6Q
+0aETs/IW2YUFsYrio7HTV1TB4sf5gqKFER3JBSY2JjcUQigPZWnOkrdyyLIl
+CNBeHYJVBZ98QXnKocVlnjZiXaqQFS9G28xd5pcJ+5TcsYGsgo+4nSc1WgGN
+k5d9Bs26scpgVywR13tTKabbHtVRybnISPZikRkyaekT0QjIQ1ZMmYeMZgJb
+MZSux/nAAms1RvlylNgrm3d+thgpzUlJEN8F9Ru07q9Vba/euCmT4x96A017
+0u2mRJb75dhdtHi3JgKpyGh7PkO1ceurWc0FGlx2re/weTfngJHKZBew6DBJ
+e9kvyzT4xP5MMT5HOT4UbsnOwl40Zz8NleGqAyjx97iXh5TsCTUjwt9iXS0h
+M8+Va7MgJkaqzK5xsJWyovcPnq36Izk2TIWXVm++JQcBmdXY3UVmKOla5WCk
+jS9NKwA+XcyaX/gTz0YbQ42xf/PL5Fw1O0ycuhbi07iEiQWw2EDFEvHENiGs
+gop8PuXIYY/x4GGnl1rTC/zoW1JqzI08fOTxxZbdRH6NN1Ugy8SuiUz5IWM4
+MZT1q6BQhVPt02WpxpfAyM8O1X9eGGNemeqkVMDPTN6wZeenirFQaMPJJNJ1
+HHBFdld1lXE97JR5Def4I292aqg5VWd5MRTL76g/MSFOLj8xZqEzofaK94H7
+rHiTBCJEZFmDNTOccwu58hD7dTQCEkpTZSqZjee0SWHKyr9LtqkZBWyKvft5
+VTvTwoyWCg15u03w028JodAny/lYvMTeZp8ldkK3WbNm7edviuXcNmKcsWPH
+Vs2ZKPjn+/ycVX2isZd60slFofrzDSav0jiq+cVwytHEtfBjpi1XwShbDOXc
+m40pY2Phor6WNknY6L1+eXFenEiT0mAYza3zA2Fbh00tkfo8PWXVG8p+vZEK
+OiXs2HkmT4ozQPGyNnh7KWo2u1cwrGAtO2aYjgrJ610ZVrSvKtIJRDmpXNsg
+OAEvyjurOqUlCTW1a/pRdd9wBJFyLRqyMkRNz0ZHEM9SkrZ6/bZPlHOooEKh
+rQNGt5COZhZyzBxFsa1TmbDuJVDE9Od6epyAnI2xvfxevJKgrcFiUksyc29E
+mr7pLJGPgEthrsVmb6oVsoeGzi1VsKlqGUpdqBXlHXskd7FWvOEzb/ZryYjF
+aGl4anhJxeps2rhGHlNPgHOes6Nlqb3mH4qnZaA4oBo9dbk2QWiLFB6HKdSP
+l/OqoCMVkCDdpFMHDx6c27dW+NCQimVMK2lLmGoQUVD1DZvPdwpbnBhsVrWg
+FulWRZv4KP9BqMUclIUE3hy+MuZUL/KgHGjhwoXBJPE35zhCA2/1zeOUlmW1
+bMrXhkZbCpVsdl9aO2ObnVRsVpXh172Xsr3yvstwm7eXC3Fl7/GlCvZUqx2h
+Zg3BxiGjFJKJNnLkyDws4lV0hZE4WvPrXylp8yd6USvIZkLuzAHztQiMInGi
+0bUbtpe0T4sktvS/RVOp+5zrRevAYCb4db4DCbd81bqt2Vmr5N+0tI/bQvgX
+MCsrL4gH3OKLnd6Zyo7Mtpeq4PFH74tSJg0R4SinOen4T0ZcGQPiSLO/rqDy
+Ky5iT7b/6IXa2jfdT4Zjspoe+7dipFQWQ6yi7BbJf+oetHldiYTj0pzNXTlg
+VIdC5kWnyShSEVKkA7RQMXTSsipI/dmhISpS1wTnjIoOCSC+0/gPmbi0Vw6Y
+L0cDLysNw0mEaVeojoAlPjFxOyJCqqy8jOyiImFEEsuh0xpjq0I6GK1UjE/j
+OwSAZz6g9srCO42leTcxKhWAjvUnyIyIB48Mm6uzGjkTQxl3xhKvpHdGkUrU
+Rvlhx66mXvd+lM9mRbcKCip1jKeEDYMOQaTwVEnqcs8tv+qPKgLRbl7CXl1e
+tj7TIebsfKwYH9WKavOvU6VD/phXogzlYxqjdE8OGFVREgrKmFByhxwLKX4r
+EzF4wpKaSJWfSHScnyHf2aHJ8T82jd/vzQHzBQeDbtemDxDAQwkt3uawlD5C
+k1mfhxdj9hcHydRQjhgm26zKjm2Kc0IGuU8OGJUrw16SsDRlJpi/m2KmQwvw
+VDV9bFCrYKZyecy5FKuO0dQRWbG03OunXwf0AijV8SoLhjPDC4b4yJzLqtjv
+UhVkTvQOEWdlB9Gppg2ys7zYIKM9nmQ7SUzdlwNL1fZxwobX8PDRa2Mk7xBs
+LDusGDMtVZIWk25jTXrxio0lHYSFTteCBAYHnX5/DixtoeCEJA1SrwEzGk+a
+E3rIsaykSUSMXoB4sgPCmuo1D4gDs01HFiEJ2osBcus37fBcVjlSn81hr2xA
+aCHfSUd6MSP26oznXJ7pVGUMsM6XAT1ee3JxhLqq8jDASPKDObC0dYowS3v9
+dfB+aKEjhaA3Wtmogp62KvKE/AO8HoZUTiTDrZQa98wT93xkOaxPe3tUhorW
+Me/o4dBCobhK23r2n16qgps2kmKjVD1LsZvZKT8sdd/TeHnf4cOZbHzKW6Fx
+tNEKV355w5YUI50tprdjIIlmqQ8pRurUaDw7ubjxFEqsY9Sddmtyj1d7XO/3
+mpcjLXyzewtetf1Jx6DST55lSi600OFyKFYVwA2ZtLQKM7TVmyO75OUC0tRN
+SUlhoOlNLtihqfMbnBktyHLul3Tv3t1QJGIi3GRby4ABA1pQUKe91PLF+OpV
+aDrGX+9TuTD10z5azIjTnVh0tgQN4zp2+go/RKL85UbcGz/z5dS4NCM7KUoI
+j+jfostMekjbIAppb+m1WuV22l0f+2V6o5MOZIxdRNPWVbhwhvfNpNQc58vL
+iOJzu2W1jw2Zhvr02NNmJB5FCWLDexDwi+MTgcGJrExTXxL9cceN1T25tuRM
+M1ukozb1lkLzq0pV+NDBxZHgI35nE+9AsmuaNay8Eq9oZiAQWqmtlVIUGRMn
+TgxqobHdgWEGgA67d/jUrNnTYRxUvCsLg7Pyuo6d1JGpqowgkWwK8OBiFpzp
+LKh8LxU1CmZPpNqxfEq2ImM4qcpm1UoYFkvBgbEUBHyaUdonZnBkn8QeZZ69
+yFVH4DIvFfFYRBIzI0DUuTq84EVVQJhFVqQzr2DH7mx9Gx/PXEZfAa6e/6vU
+A2zQipWg64GM9oID5I5wNPBU5YShvjJ/RyewP+1aEjO8Vwf55w681D4ZPWXN
+9KZA+Y/4L4op8B/xbG9xqpvyPgyzAaj1kFdjpYnJklmBlhX/fcxRwxnWGjmV
+J5RghhY6eZq1ZY3mkpc3VuGENDEJBXnEcIQxVsDBaT66h8PJi7X0kpJqb8eo
+6hW0rDDwcO+W7I5OaWRqssYfWrzHH1KqiA1LVcjv6KhujN55COP8LaDaToDn
+JVcb3xfXbEAOuMMi9CSqBPvkGUKL9/oA6QUFCJZpmg8XY3ieY4h/q3jU3VJ8
+WGVhsI1SBLjIvBcjHAMQoOlsNLZPadsF5GZxso6ixvzr3KpxL66ogtf5jhfm
+o1/0DgXckJXrtv7Rb4cXYQ5pfKsegavp06dyIB7iSFJ6KlLw6DMkP+AP6fRZ
+3o9dBUNFBuTDNHjIzIRZKz0d2yao9viNkm78ns4B91EHF+d1UEOZ6Ol4YI7K
+UQPjxIeKMbzIseB1kFKwfEmDmXbTi/ao/1dgCGPGTFuevZ89BvcRB4c5U4jv
+jkB2zOmH/Tk5wo8Mm1uqguHFDhKHKH4FIUFiwyvbtdxG5C49StURunJwDrgP
+R0KjfTB82e2nt6x9xNmoCmSSTdb9ByMkA9BLHRb+gGrOSWCxfcog/cJvs1FG
+2+yE+doN25/J4HzIGzLBdBg/X6zJXgXTdclLL70U9oYqhjFHtqQ3FZP394Pe
+OZxIpwxEZxO59BS+6i8vuJL5RE/edluajz/UwdRQrbin5cuTdWGd6YorrsgW
+KiDgsJrEHVhGHJ85c+aEE1pYcMTmdevWjTXbQ71rlrSk1QN/S+meeD5eoNKq
+Sq+HOZh9q27allXdRBQG4yme42OJ5+8tluvLnI/sRorfoc6ENltwlN8mfy0f
+gC+CZAI1JAfiB50o5rJSKLipo6cuz458wVXA6YGdu3btCqxkOObOnVtSPpDo
+kut8zPkrOO9JclBQLqMxrzxBKi1g2bBhg0Hs06dPkFBWP00qg/atGrkeFNyd
+MWPGZIPAsqHcIHwXQhjoMVFzbd4Umg8qoxl0uE9lCUfkECVz3AhOJc6zzj2l
+P5iBWJ/Ma9ftH8GrLOCphoM4WbUu6cB9SGcOn3HmOcmxl/4t6fLARDV/f7HI
+Xe4MQZViwRTDoDddZ3ktcKolKB+SD0Eb07HDcsDqNH62jSsvT+oOB07eNHMS
+hWM8y4IUDlpCg6RPpzytOF7rcMe4WkVR+uj+YW7yMkuUEV/Yy5otfxv7P+q9
+NjUlQIbI5Dj8p3ZElX6SUEnwalGm8Gv69OmFQTiTQmrHtLe4m9V61OpDz8Zl
+DspxPtz3ieSk9mcmx13WlwzjB4rF40ofejYqyNjz5WRI01I/9NsoLKU55V2a
+ORueA/F9Eib7hdOipAHpYAOjPCemwy1VRh4FE8z9FECSTbjoFDLp+1pVL1qx
+Z0TpSh+3agLT1CxJly5dmiQYtahq7cOELCOnw4YNC+KP5sP2EMsYLtXkolYX
+eXKhGdnxmt7JSe3OSB54ckKpilB08g5xYvDo5Bbzm5eAE/jpjHM8PPKE0hm0
+4X9SAiNyYL/XB4bdG8oD88UdtmsH+SPoXqxKTCUzgvMyGrmxzwn/h3jTWpVj
+Eg9enAnjyAXmiMe+GaRWcQappLO4KBUhiYanwXDyUkpUEQUrhzSRojpHiWIX
+gnZ3Q8IYmio7vIpI1AJdLBJpuejx59+RnNL+DGyvW5LmvlEtz2nMyyZe7Xjj
+4cT6hDIEaqywRt9yRhDNxl4QOmfFmi0h7xegvidqqG0EaBv20pir/09NnDB5
+71DQoNVSM3X+ExeEA4yA4TwoNU/HtAk4otzJ4OBgY9tMXg9tIhkCQwoQFBBt
+POCbb74Z76Ka/LRcpaTnADH3TzizU3L9jV0r5Ke43rluH3epipeYl5O5xq+h
+ASi6tgDQQJsM2DVEBamgxX84qVTOaq1Fzg3CTyJ3dA78f3V+ogR5saLsGLvG
+Zi9Z9y/RPENFxGYaeyUzLdUbHUiYOanVqhGl4DBgTz75ZKVm2je52SpObmYT
+kiQx4RfofayJKGviYpQqvaZnn302oB2LRZH3Uq2PPJGSa0B6/S/n356c3uGc
+Upk8FRZ+N9EdzBOjziJ2x+5wktxxVw3OxIjjR/wtzV5Q1SrYLWpaTOazdqzn
+sLZPizE5fbzbsWfPa+xkkS3ctO3VtzvnFC/0798//E2MoXihKac+xtFZTnml
+nEMUA8schBsmUYf5UwWJY9VkMoMZeGSYxRNUC2aOQujKoKsaAfhzWJRKFdWj
+R4+S3u2AQGFdiHyMj5VxbB54PVpR2qpHsZBgS2+jJ8xITjz13OSks68OL7d+
+X7mIFVQ4S70WOJR5qyXaHEuRrK+OlYmMv0jNa5xahawgpX0WR2XtMIBU1tNi
+XE4f73QCEd84tUUtAkt2GNR0haouqa+vD34SsTOjS+JDywYFx2tKOAoKX6Xc
+tIiI2dMjBbkiZenR7HjQ5HKASEYm8+/zcdWjnJ2G8DIyQAaMISMRQHLw1enY
+WHVAFYh6WUZFua+khsudOnUKDGFCnXZhl+SYKwawZ7ZSagq2D0hqCvzMxrMO
+JSscit8l3dWbyQCb9FkKYCw/5+3YOsmLJ8yKZe3wgdhMikV7LkdWtFJLKoDI
+rP0NwxpVnakif6tRmlb+jDdmxZtDm0yYmjhT2jjD83yivGmiNU1SCb7km6HF
+mhqHbbFT7VPeDt+RGo1YA1NKw1oii3MTcvqQtSYDTCVDx1tHl7Ft6vyGRtLF
+Y/i01wFUkF5gtQuMdvGb11uF1+uyqGJxk2PUOuSTeTcTNa42847wptQOMadZ
+gGjlyDM0eD+EZOGQptCLXF9KLrh7TvdRGblkaQjQKEQPqPw8Ji2/ML/AdOTR
+1c2vsRaII97h5hGObOswSuTccc1sJPRyJbDE+WcrqA2qSKO4jDduIM6Tc3qS
+u4CFBmqsNuEgVprtoaH1L8uJzCuvz1NmeRTqLVJEviyoEcVmaLcO2TC0O2Jm
+TsH7vUcEidI5Jh75fqRXlLKVlEIAMxSlqTk9KhcCDKhl+Mww6HF6JCznWJDw
+QJWX7qnoHzcGXdE1RaV1ANUmxGEgP3D8krDwjVezV+UuaU6HjeKsbWGpIOT0
+m4a3jkinpsPcY0Ztug9T1H/4YEzQNTSjIxhoLGjt5JB64pCIbKG9yrsx5bCy
+isJYsIR1we1j2gRQbUMyAoeL5ALbU2AyeA+dtMxEZdSUepNs1AbHJaNN8fNZ
+tqJqjrrKE659pi6AqgvuP2uX5FDRVOQ3ZjhbOAoArLjPKigF9+ZH1jlbWNkl
+2OUwRHcTk98X09TbJYZKAI5hY5cIJsCgmvym2DBOMJ8ZRjUBVY7T0+cN1B/4
+8e7iHtJq2HcFh4ON75Sts/QM+Ywfzgo9MgM5pZjfrKAiGdxnZg2ZtDRMWo5y
+ZZ05PdK2bXpeoPXFOhr3MVzILG3yDlg+KOfagU281tRn30p9vJVw+b/RR6px
+owXUcLlbE59+K1HyD+n4+0pHxa3wM09OPp9z7cgmXnsjz1ap6Pv/Atfw84Sm
+PNh4vUnNW9zPW+/BCg22DyOS8s+h/7gaXy297b8Bika3qw==\
+\>", "ImageResolution" -> \
+96.],ExpressionUUID->"2fed4247-1bf7-4b41-ace8-8affb4f078d9"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -2005,18 +2562,18 @@ Cell[BoxData[
       RowBox[{"Evaluate", "[", 
        RowBox[{
         RowBox[{
-         RowBox[{"Abs", "@", 
-          RowBox[{"Transpose", "[", 
+         RowBox[{"Transpose", "[", 
+          RowBox[{
            RowBox[{
-            RowBox[{
+            RowBox[{"-", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{
                 RowBox[{"eqLowRHS", "[", "F2", "]"}], "[", "#", "]"}], ",", 
                RowBox[{
                 RowBox[{"eqLowLHS", "[", "h2", "]"}], "[", "#", "]"}]}], 
-              "}"}], "&"}], "/@", 
-            RowBox[{"Range", "[", "8", "]"}]}], "]"}]}], "/.", 
+              "}"}]}], "&"}], "/@", 
+           RowBox[{"Range", "[", "8", "]"}]}], "]"}], "/.", 
          RowBox[{"rules", "[", "h2", "]"}]}], "/.", "sol2"}], "]"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
     "\[IndentingNewLine]", 
@@ -2060,29 +2617,27 @@ Cell[BoxData[
    3.827404825327669*^9, 3.827404845878521*^9}, {3.827404940416987*^9, 
    3.82740494304041*^9}, {3.8274051423647337`*^9, 3.8274051425959997`*^9}, 
    3.827405301703141*^9, {3.827405444321988*^9, 3.8274054450814238`*^9}, {
-   3.827406467116021*^9, 3.827406522781513*^9}},
- CellLabel->
-  "In[542]:=",ExpressionUUID->"82d96d28-401c-43fa-8337-b55bfd500552"],
+   3.827406467116021*^9, 3.827406522781513*^9}, {3.8274102383971157`*^9, 
+   3.827410242359497*^9}},
+ CellLabel->"In[17]:=",ExpressionUUID->"82d96d28-401c-43fa-8337-b55bfd500552"],
 
 Cell[BoxData[
  GraphicsBox[{{}, {InsetBox[
      GraphicsBox[{{}, {
         {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{1., 1.4984044952377256`}, {2., 2.149896186100941}, {3., 
-          3.148588671129332}, {4., 7.321245713972689}, {5., 
-          11.65139160728852}, {6., 16.268292399754465`}, {7., 
-          21.10833674585024}, {8., 26.130702648726547`}}]}, 
+         PointBox[{{3., 1.1194472532987714`}, {4., 1.1999198146886625`}, {5., 
+          0.6772820922002218}, {6., 2.5445660607092155`}, {7., 
+          5.6069443682236235`}, {8., 8.865777421623179}}]}, 
         {RGBColor[0.880722, 0.611041, 0.142051], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{1., 1.4984044952377258`}, {2., 2.1498961861009427`}, {3., 
-          3.148588671129331}, {4., 7.321245713972692}, {5., 
-          11.406395540898531`}, {6., 15.758090642811325`}, {7., 
-          20.329293818672735`}, {8., 25.077972140838284`}}]}}, {{}, {}}},
+         PointBox[{{3., 1.1194472532987714`}, {4., 1.1999198146885637`}, {5., 
+          0.6772820921994017}, {6., 2.544566060709058}, {7., 
+          5.504677244626188}, {8., 8.576100347440168}}]}}, {{}, {}}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
-      AxesOrigin->{0.8541666666666669, -0.4292126243005278},
+      AxesOrigin->{2.895833333333334, 0.03648586271641799},
       DisplayFunction->Identity,
       Frame->{{False, False}, {False, False}},
       FrameLabel->{{None, None}, {None, None}},
@@ -2093,8 +2648,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{16.26084183673469, 0.375}, {8.868246774481946, 
-       0.3750000000000142}},
+      ImagePadding->{{21.02742346938777, 0.5}, {11.566248868886646`, 
+       4.765527593857556}},
       Method->{
        "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, 
         "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
@@ -2106,8 +2661,8 @@ Cell[BoxData[
              Part[#, 1]], 
             Exp[
              Part[#, 2]]}& )}},
-      PlotRange->{{0.8541666666666669, 8.}, {-0.4292126243005278, 
-       26.130702648726547`}},
+      PlotRange->{{2.895833333333334, 8.}, {0.03648586271641799, 
+       8.865777421623179}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
@@ -2115,70 +2670,182 @@ Cell[BoxData[
          Scaled[0.02], 
          Scaled[0.05]}},
       Ticks->FrontEndValueCache[{Automatic, 
-         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{2.302585092994046, 
-           FormBox["10", TraditionalForm], {0.01, 0.}}, {6.907755278982137, 
+         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{0., 
+           FormBox["1", TraditionalForm], {0.01, 0.}}, {2.302585092994046, 
+           FormBox["10", TraditionalForm], {0.01, 0.}}, {4.605170185988092, 
+           FormBox["100", TraditionalForm], {0.01, 0.}}, {6.907755278982137, 
            FormBox["1000", TraditionalForm], {0.01, 0.}}, {
-          11.512925464970229`, 
+          9.210340371976184, 
            FormBox[
             
-            TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
-          16.11809565095832, 
+            TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> 
+             SuperscriptBox], TraditionalForm], {0.01, 
+           0.}}, {-2.3025850929940455`, 
            FormBox[
-            
-            TemplateBox[{"10", "7"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
-          20.72326583694641, 
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {-1.6094379124341003`, 
            FormBox[
-            
-            TemplateBox[{"10", "9"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
-          25.328436022934504`, 
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {-1.2039728043259361`, 
            FormBox[
-            
-            TemplateBox[{"10", "11"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-2.3025850929940455`, 
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {-0.916290731874155, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {0., 
+           0.}}, {-0.6931471805599453, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {4.605170185988092, 
+           0.}}, {-0.5108256237659907, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {9.210340371976184, 
+           0.}}, {-0.35667494393873245`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {13.815510557964274`, 
+           0.}}, {-0.2231435513142097, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {18.420680743952367`, 
+           0.}}, {-0.10536051565782628`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {23.025850929940457`, 
+           0.}}, {0.6931471805599453, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {27.631021115928547`, 
+           0.}}, {1.0986122886681098`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {29.933606208922594`, 
+           0.}}, {1.3862943611198906`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {1.6094379124341003`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {1.791759469228055, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {1.9459101490553132`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {2.0794415416798357`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {2.1972245773362196`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {2.995732273553991, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {3.4011973816621555`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {3.6888794541139363`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {3.912023005428146, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.0943445622221, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.248495242049359, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.382026634673881, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.499809670330265, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {5.298317366548036, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {5.703782474656201, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}}}]], {144.92775512853382, -87.675}, 
-     ImageScaled[{0.5, 0.5}], {271.89163051045244, 167}], InsetBox[
+           0.}}, {5.991464547107982, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.214608098422191, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.396929655216146, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.551080335043404, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.684611727667927, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.802394763324311, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {7.600902459542082, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {8.006367567650246, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {8.294049640102028, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {8.517193191416238, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {8.699514748210191, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {8.85366542803745, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {8.987196820661973, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {9.104979856318357, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {9.903487552536127, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {10.308952660644293`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {10.596634733096073`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {10.819778284410283`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {11.002099841204238`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {11.156250521031495`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {11.289781913656018`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {11.407564949312402`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {11.512925464970229`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}}}]], {159.6889631385883, -98.74512056523616}, 
+     ImageScaled[{0.5, 0.5}], {299.4315041469704, 188.08594393378314}], 
+    InsetBox[
      GraphicsBox[{{}, {
         {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.3479721300955767`}, {8., 12.910637149206908`}}]}, 
+         PointBox[{{2., 1.3479721300955767`}, {6., 10.957458918278414`}, {10.,
+           24.92085632077457}}]}, 
         {RGBColor[0.880722, 0.611041, 0.142051], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.3479721300955767`}, {6., 9.398898389330203}, {10., 
-          23.415843184702496`}}]}}, {{}, {}}},
+         PointBox[{{2., 1.3479721300955767`}, {6., 10.957458918278414`}, {10.,
+           24.92028129913678}}]}}, {{}, {}}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
-      AxesOrigin->{1.8333333333333337`, -0.3789640157547857},
+      AxesOrigin->{1.8333333333333337`, -0.49673983464692517`},
       DisplayFunction->Identity,
       Frame->{{False, False}, {False, False}},
       FrameLabel->{{None, None}, {None, None}},
@@ -2189,8 +2856,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{11.393973214285715`, 0.375}, {8.868246774481946, 
-       0.3750000000000142}},
+      ImagePadding->{{20.55707908163265, 0.5}, {11.566248868886646`, 
+       4.765527593857556}},
       Method->{
        "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, 
         "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
@@ -2202,8 +2869,8 @@ Cell[BoxData[
              Part[#, 1]], 
             Exp[
              Part[#, 2]]}& )}},
-      PlotRange->{{1.8333333333333337`, 10.}, {-0.3789640157547857, 
-       23.415843184702496`}},
+      PlotRange->{{1.8333333333333337`, 10.}, {-0.49673983464692517`, 
+       24.92085632077457}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
@@ -2211,65 +2878,65 @@ Cell[BoxData[
          Scaled[0.02], 
          Scaled[0.05]}},
       Ticks->FrontEndValueCache[{Automatic, 
-         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{4.605170185988092, 
-           FormBox["100", TraditionalForm], {0.01, 0.}}, {11.512925464970229`, 
+         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{0., 
+           FormBox["1", TraditionalForm], {0.01, 0.}}, {4.605170185988092, 
+           FormBox["100", TraditionalForm], {0.01, 0.}}, {9.210340371976184, 
+           FormBox[
+            
+            TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> 
+             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
+          13.815510557964274`, 
            FormBox[
             
-            TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> 
+            TemplateBox[{"10", "6"}, "Superscript", SyntaxForm -> 
              SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
           18.420680743952367`, 
            FormBox[
             
             TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-2.3025850929940455`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {0., 
+             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
+          23.025850929940457`, 
            FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {2.302585092994046, 
+            
+            TemplateBox[{"10", "10"}, "Superscript", SyntaxForm -> 
+             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
+          2.302585092994046, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {6.907755278982137, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {9.210340371976184, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {13.815510557964274`, 
+           0.}}, {11.512925464970229`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {16.11809565095832, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {20.72326583694641, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {23.025850929940457`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {25.328436022934504`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {26.021583203494448`, 
+           0.}}, {27.631021115928547`, 
            FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, 
-          {26.42704831160261, 
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {28.03648622403671, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {26.714730384054395`, 
+           0.}}, {28.324168296488494`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {26.937873935368604`, 
+           0.}}, {28.547311847802703`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}}}]], {432.349831074377, -87.675}, 
-     ImageScaled[{0.5, 0.5}], {267.02476188800347, 167}]}, {}},
+           0.}}}}]], {478.8317172218873, -98.74512056523616}, 
+     ImageScaled[{0.5, 0.5}], {298.96115975921526, 188.08594393378314}]}, {}},
+  
   ImageSize->{
-    UpTo[540], 
-    UpTo[167]},
-  PlotRange->{{0, 574.8441518916864}, {-175.35, 0}},
+    UpTo[600], 
+    UpTo[223]},
+  PlotRange->{{0, 638.285508166598}, {-197.4902411304723, 0}},
   PlotRangePadding->{6, 5}]], "Output",
  CellChangeTimes->{{3.8260139356528893`*^9, 3.826014016404052*^9}, 
    3.826103482588256*^9, {3.8261924073516417`*^9, 3.826192422251688*^9}, {
@@ -2291,9 +2958,112 @@ Cell[BoxData[
    3.827405302722981*^9}, {3.827405424099656*^9, 3.827405445525691*^9}, 
    3.8274057106595793`*^9, 3.827405755094181*^9, 3.82740580264576*^9, 
    3.8274063360586443`*^9, 3.827406412668069*^9, {3.8274065026698103`*^9, 
-   3.827406523491081*^9}},
- CellLabel->
-  "Out[542]=",ExpressionUUID->"6f2f5da5-4600-4a92-85ae-cca01fb533fd"]
+   3.827406523491081*^9}, 3.827410472167076*^9},
+ CellLabel->"Out[17]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJztXXlwVdUZv5ANtGod5Y9OpzPMWOvU6ozTmbZu2KKCgvKfU6d2ppRaEWTf
+ZV9UQEFZCqgkbIKmQNj3RZYgSQhJgLDEhIQQCGvYCSHwknw9v++ec9957937
+3s19SUhqrvMuuWf59u8753zn3GuXboN7vNen2+Ce73Zr+9rAbv179Hx3UNuO
+/QaKopgWhhHT1jBaGG0N/E2GoW5B12O4hRQ3l7oofZ7/iacvv/yShgwZQh98
+8AENHTqUEhMT6cKFC+24OoZu3rxJ3bt3p5MnTxrPcVkCnT9/niZNmkR9+/al
+Xr160dixY2nr1q1UU1NjgT137hx98cUXXA+wy5cvp7t37z4vwaIaYE+fPm28
+KLsIrDR79mwaMGAA9enThz766CPKycl5RXZZsWIFdxE/8WTeN2zYoNgy3pDt
+xo0bR1u2bOGnznyPo40bNzIVADt58mQqLCyUdfF09OhRi5v+/fvT9OnTqbS0
+tIMEd+nSpSC0rSgzM9MSpxAMTZw4keU3fPhw+uGHH9roEk6g9evX09mzZ6mi
+ogL8slg+/PBD8vl8xrPcphVEQ1euXLF+ggDGevjwYfR7VoICMQcOHKBr165R
+eXk5HTx4kMUl+LO0A1AgREqcysrKWEPLli0zXpBMTZ06lZYsWcJPL8h+kNu8
+efPo1q1bVFVVRbt376YePXpAVcbLsh80P2zYMOhCPAno4l5dXW3poKNsJyxB
+sWK05HsMjR49mlavXk03btwwOkmcu3btYuODWIQ42Iqgh6tXrxqvS9EADqxo
++/bt3AZiXLRoEdMh8LzKzR5ilGAX1ZAc1IpnlOO6ffs2DRo0iNauXUt37tzh
+eoA9duyY8aipsJck9ZAYQJw6dUoqKIZV3rNnT0hbcIQ7GwP169cPXBnKX2Bp
+EyZM4CfVNzs7myUJhbeUZZAujABPyin279/P3FdWVlpl0AbwHD9+XDyZZWiD
+tnhSmoFljBo1ilJSUixPuH79OvfVaQYdvXv3hgVILZgeA83gSdE3ePBg2rt3
+Lz+9JstgeegPP1fthIwYh8BlaR9iR1l+fr5FM2ANHDgQ1mL1hbV99dVX/PRI
+qAqgHRiLMv7Lly+zE8MgcOmhSfVbt24dffzxxwHiB2sgG+aqix8GpIsfRg8L
+SU1NlWWt2HpGjBjBUVHQwqzt3LmT1S7oMI0vliUNrX/33XfoogQL10AUE25q
+YdbD0+uyDGb9/vvvsyEpgUEBIpZoCmhFFy9eZCOEm4AShIAFCxbQJ598ArTh
+5L906VIOPLqOt23bxjajyd8MBnEMAkHmxIkTzBS8RIV2yG7mzJnBOlDVsExY
+BWIFGEDM3bFjhwpPIAQ98K8wdG6G0JCcnCxHghhatWqVpUUFFhbx+eefq1jM
+2hNRUvEMUUC0AqwV2RFVEAnhQ7ik6DtJaSrXQgBCFAfPmzdvZoKFbjtJKHl5
+eWwCCjFipwgmyinshI3whHFVFzYcADq1ETbiA6pg8DADQYTFNgwQesvIyAgV
+dhyzBBbhF59++imwWOMOBkfUI9BjYIPEIHUR/SxJI2wAZXFxsdUvPT2dpkyZ
+giDMkRIDCQZIuL0Stxq/ESLVIItxDpxrorYCPTwBI6QYhNhREMIwEENqSl2L
+Fy9mW4NVwKGgbRHOwgnapVW3k24KKhAhQIngRgkRQoAQMUirgKKCAhiRw70l
+NDF7YDcUAcloL8vgEAsXLuQnZerjx4/nUUtdmOAAvsBnxVTERBVnO0l6QCbM
+H5anBNlZtp82bZo1cr+p2b6aTCkp7Nmzh3kibVR2isuYQehxOSkpKTguK3NE
+PIDHwncgNuhbsPmiFDBCAygMsFJTiLAqMwKb0wY1LpMVqeN59oe5VFFREUdb
+YZUQmpInAjR4UD/4DcYyMeRbMofbwRF04wV/oq8cKxNYn9AL9A1Dw5gNfYpn
+OXbGcuwYM2YMe76Qf2eNf6BEBMd4hLHoyJEjuplDo8FmLBgzOkjtAiu0AysK
+1EaCNUlZuXIl/33o0KHgSYrSBIhG3EQ1GITshKyUJlTcsNGEms22lHNaxL5g
+TUC8wvc4rsBbgKmgoOA5CQbWETwXT0tLs8D8SYIB/3PnzmWZIKwirAilvqJJ
+E3Qj+KEaus/Nze0isSCgAAvs/w0pPTEPYihgG0Ft/vz5hq4c1CG4QCTALChQ
+godKZ8yYwQJWgo+VdSUlJRzjwCtULgYuQ07jKfDysNT6o+QHSJWE+D7JqaKr
+1rGlVT3ZTXPPeGKt6okRmj9jlonqt3D7Q+BjG61REJAYm7JYm7L7bMpau2zn
+tuynBq+x0/wXmzI7e3n4/6Ts5/cI7y/43uyejQxeY6e52T0b1D3thnI7V2xn
+U/aiy3Zuy9yqvovLsjddtmusouCieywAvrua1jV3bICOZr43lm5X3KScbYl0
+aOc35PPd5coWNu3VSvvC2ULK2vQfKji4zcTxjjOO8XyPoyqfj7KSOlJJ0q/5
+l7Hgr4aGKF7vxNeF0gI6PveplmgtYO7fOD2Qr7cj4YyhUwVZCp+h4Ny8Xma1
+q5a0BaPOXD9FtDTbg2ZHvLzImSAZuHmtjIoSf2txmJf4e7Gy9pEDkqMZqywk
+6Yv/5Zo5pTTRn3ISXxEEvk6Fh3drsmwdgqtG/Ldv1QQ6mNiOMhb+na6UlZp4
+/uaMh+9Nw44bvqPpCbF0924l7Vs7kdK+6UqHUpO5kq3Pv/z9ZyQocZSeMtyy
+Gvx+zN5sUjDODWkt/YE9jvbP6xwAKmPlWJmwjaWT+Zlszrlzn6WsLbMZUHs3
+GBzIFrADcB0/tMNKDh9I/LNVfjLpcTp38qgJ125YdittjiFbZlHat70oL3Od
+2haEdR9PfDLAzfOyNgaCf8kGbiS8Lyv9LBtiMQMXqqws987My5IZUA0qEXQr
+ym941gbfG1VKpgl19Iukt2yOzDLKumsb58gHqgs7Gki1IeWGbHdRUZHpe/G8
+0YEUI3KCSOQhzV9dXR3nlYNe/KeZ/0dmE2lV0YhT0aZLJHA6FqRgS13tBCHB
+KGgx3aYlkocCCLLtyORjj2H16tWeieojK44cOaIq5bT6ft7UmzNnjiUrZHOx
+fYOtR1zqUIKe8cdeG1KbJqt1TlQM72TKAxcSqZmxx74NLkhObg8H7w5jP98V
+TX4z6huGEpjNjh07NErikAjmhC8u7DWY291me7Whj6MMTIafisYuEC+WAxrU
+5WQ52LhTRKWmptbOcoKdPZZJwbYKDnSIOhOK36mwU4P9DGT0A5xKSAwpeewZ
+YcMHeyNQbjR+pZwd5GAnCEFENDLhxXHYGTlyJJOFfXMRdoz6ijt1PJg8Jus9
+RFZHFiKR+JiUptfQ6WhPkRA/LutDjTwhXHg0EbqXqTMaO/+O0f3bsMsBRMmb
+XWyL0WOb2c79Xk0j4y8hXIDybizKSj2EITucqbIM02Qsfa9fOWfsdklCLcKO
+nVPulu3vVFZYq/wTiU9Q7p7/GrsikGAXhxQ8TI71JYZYVkQF7/DeZQHwspM6
+RAUP6/v0RV2t9T6WQAzP1fpvjywrv3lVZQo8UcP3RjrDbkIdf1rro16ywsOw
+/GB0OL0Pyw94Rew89ww/LNcDwsgD2M/qA2mkAdoVUnfrnHvAX/gBWo1YGNxw
+Eoc4dlNtFlTKcm2H6tbhhmrujgPBfLJZ3HEQC8aN89INuVxQDobDUVg34fgS
+fjhIiWXD9u3bvdMzkv+MZ5NSizZWmSny+GjhYpkFE1YCjRbuKCko6FGd/pQw
+DVdA/a4wWoKCxeEwFo4B1gqUXb0JNJZPeOF8GYwmGn7HyIrk5GSujIq4ezkM
+L5KCuXT+JKUv6U4ZC96mH3PkyfTaYTZBxfEOipoQYgPn8oUSY7MHeAtlWU11
+FRUnPRGYj85cZ7XbGAWtGQvf8W8wzX0G21kBtLoTXmVlOe3fMI0yVoyhi2cK
+vQiP713ddLSfCjf6yZZ7An8p6zEEqZmUeUq1NZ9AVRcCBF4Hw7FS+POsWbPw
+toKh9m5sZlrOATkSDyZR8dbpYxyLxSlT/O3z+VQaa9OmTfxCD1JYOB0tDyLX
+a47kV7IessBrCeYT7vfx4W/98DneHQGcM2fO8LOcrKlpRRQpFDsqFFj1Npb/
+9aU4Pp67b98+BiFnONaMp07SD+EIwoFt9CstLbUIgtpwch2XnN1ZyKNIvTQJ
+uejmgjcn1KXeVdDNRRDhaC7ePSuWF05YwIBBQZcJz/QoTLFwbhuzFnj5Z599
+FuxRbpM6fK/HtZriBi8v4RUXvFGgcaNiFiaMiFnQqMCohyw3+SGNi+bVX1Nd
+/TUBTsOvA9WmW35+Pr9SgrcxYLUFBQXmZLiO1oMPRVwP4l+8jImuGKGxC6rM
+vOHXhOaLpZCIrirEVrihCdQjTSNlBV4tqkcECfwWG1ay4BKBA7uDkHBUElWr
+zzVr1rBRIZZjvIP4hBHVcqE4SjbH2/HgHS+v2R1udkWaWsDidUTYPEY+vD2W
+l5fnfWGngGLcwrvD4BU/IVzvQJXX1VTdoStpE+hsSke6vGck1fgqjHHRAr2e
+mxiQ0L+WPSN6oKBOB3pp54DogR5M3yRWhb+xTkRl7k6JHui8tbk0ZGISzZ46
+jIZN/JrmpByIHmjqgdP0j/EbrN/WfcXugPpNXc0PEH2/zyqhmcuyaUtGMVXX
+1Hinrz6WoQ2/rmzMK9lmzhqgY31vvIQec2mecDfNCXej3W55MOKBLbVuRBnW
+jZj7ZWVlNewsG81x3hFzI/gAvvGB9viSgas5YagreZhbQ1Q4kqXrB/suYMoE
+Gp6SR2Q9powqXqj0ovymAl8Ox8CsE2sO6UdP2Uc160buBZ2QPsTnYJAIAnw3
+s+5HJF3oh8iDbQ589AZ/C7rDnV6tq+xl8Nw8ns0EnzHAUgJ1UNTp06cjTX7b
+yHrs/+BTTbquQ0+9xuunXvmSaU9VXdusZ7i1C4YUeB++SgFRI1QIUUfDkXZC
+1OJIOyKqpwnrLEuoLA4BBnlsdamvRbmxuHA8ycO3Wlm8fgBXz8BGmYAdITnB
+MhC+qisG5gapRsPJvdCOWjji8x4q5MtPokRcOLrxHf+533j93C9fMgesqhsi
+BWyGrljeqUAyCTITpKukqcPZYD1q1XWG2C3FGCAwUCG+aRQ7jB3BQ0ddZIEb
+6VLiJ92xya+Nm+RCsLljmI7/lhVeZ71tnADriP1m8x6XepqMusJkV69WVO4m
+jYGvSj1aH0hDZw6Br/7UC9LQiVfgm08NxGlcwBwJl+hjxMq8DL7Hpi70VQsl
+jPJiZljLZa0bxftnPA+HzHhUPgeHubDvIY2U69AfQzS+eopvueFwG76aGmkW
+ZusPtZ3hqOkJnFCeqrOOHWLxJbfv+cJ3OjELcb0Yd44StZ3WOJNpTtwhV70M
+s/Lc3FyJyyOpQ8Mgxbo1+FO2ODmkPuFYL0jrjVP16Wv+7kBVJT+pDzc5WYa+
+pIMD1soy/GZroo6ju5fz6MzS9lSS9DiVfd+baqp9xtOSq5ycHPZh8C9IUW/R
+4buI2BBGkgi5BKwbhL268hu7evXy+IVNXQM2k8qPr7JIQYYQnoVQJEhRn/UD
+dbBmkAMvQ+yNmo7za98KoOPG0cW238ipFdCKku/p1AJ+9Z7OLu9A1ZXX3AH1
+q+xV2bzq1kWqPJ8NizHq9z14Z4ZiyVdVTRv2FlHSmkOUW3jRkRDV/vDepZSx
+5F3K2jAVn06J9O0bJbdvNx+ztte6it+JM2Hk1l52ys/eHPJtBx1hqBuM+npP
+wE7exrQTkdEEf9Zh/7wuEb/pY/G1xQtfOVsD+Vo1TiGM9mil44ZCsL4Thb4P
+F5ZF1PeRtBRKW/wen56t8vkCyPR62PKBQOVNDnyUKzLnU3AJ4Q5NOmf/ozmO
+GHoOMEbPIRn323DkEVXoyccYPfFmoron/NUVUl2LDmcZrbEYH73FYEEk32Bx
+f64z7LHFVk5JKYYgpkzmyyvmTgwIQNpVWHvUhyhtjx22dko4WXIRJAhlidmK
+AIGJHdBg7lJcXOyZpCf5H3MJiP/zBCSBS5O5ed0w2/9OauHYsWPW9EW2NUIa
+PyX5RU4YKx4noKod5kBYX+Jj2nbtnpbMwO2B3BapaqQ+6G/biAKvRvT/emkM
+pUaL/wGcBhRv\
+\>", "ImageResolution" -> \
+96.],ExpressionUUID->"2795cd65-b435-475a-a7c3-265a28bc9991"]
 }, Open  ]],
 
 Cell[BoxData[{
@@ -2301,12 +3071,13 @@ Cell[BoxData[{
   RowBox[{"h3", "=", 
    RowBox[{"h", "[", "5", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{"F3", "=", "RF"}], ";"}], "\[IndentingNewLine]", 
+  RowBox[{"F3", "=", 
+   RowBox[{"RF", "[", "2", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"eq3", "=", 
    RowBox[{
     RowBox[{"eq", "[", 
-     RowBox[{"F3", ",", "h3"}], "]"}], "[", "4", "]"}]}], ";"}]}], "Input",
+     RowBox[{"F3", ",", "h3"}], "]"}], "[", "7", "]"}]}], ";"}]}], "Input",
  CellChangeTimes->{
   3.817563268660089*^9, {3.817563829122241*^9, 3.817563846550528*^9}, {
    3.817563950998456*^9, 3.817563956525237*^9}, {3.8175645239988813`*^9, 
@@ -2343,9 +3114,9 @@ Cell[BoxData[{
    3.82669187949545*^9, 3.826691896799794*^9}, {3.8267049572621393`*^9, 
    3.826704967694076*^9}, {3.8267052110266113`*^9, 3.8267052140105457`*^9}, {
    3.8273110525027113`*^9, 3.827311062014526*^9}, {3.827403862804702*^9, 
-   3.827403874140709*^9}},
- CellLabel->
-  "In[106]:=",ExpressionUUID->"172fdee0-af8e-4049-9dda-cfec26fad09c"],
+   3.827403874140709*^9}, {3.827410524999736*^9, 3.8274105395687513`*^9}, {
+   3.82741145039071*^9, 3.827411456893076*^9}},
+ CellLabel->"In[31]:=",ExpressionUUID->"172fdee0-af8e-4049-9dda-cfec26fad09c"],
 
 Cell[CellGroupData[{
 
@@ -2354,11 +3125,7 @@ Cell[BoxData[
   RowBox[{"newSol", "[", 
    RowBox[{"eq3", ",", "sol2", ",", 
     RowBox[{"{", 
-     RowBox[{
-      RowBox[{"gC", "[", "3", "]"}], ",", 
-      RowBox[{"gC", "[", "4", "]"}], ",", 
-      RowBox[{"gC", "[", "5", "]"}]}], "}"}], ",", "0.001"}], 
-   "]"}]}]], "Input",
+     RowBox[{"gC", "[", "5", "]"}], "}"}], ",", "0.01"}], "]"}]}]], "Input",
  CellChangeTimes->{{3.8175612726329412`*^9, 3.81756128486736*^9}, {
    3.8175614038617268`*^9, 3.817561415404965*^9}, {3.817561511096093*^9, 
    3.817561563944231*^9}, {3.81756250196518*^9, 3.817562507914916*^9}, {
@@ -2429,31 +3196,42 @@ Cell[BoxData[
    3.8266921558368683`*^9}, {3.826704971398871*^9, 3.826704972677854*^9}, {
    3.826705218923092*^9, 3.8267052252507772`*^9}, {3.827311068198715*^9, 
    3.827311075198703*^9}, {3.8273137547587833`*^9, 3.827313765782802*^9}, {
-   3.827403883588715*^9, 3.8274038888529987`*^9}},
- CellLabel->
-  "In[118]:=",ExpressionUUID->"0ea1b44d-26c0-49ba-8c54-6d51b749dcee"],
+   3.827403883588715*^9, 3.8274038888529987`*^9}, {3.827410547396983*^9, 
+   3.827410554937995*^9}, 3.8274106870939302`*^9, {3.827410815516715*^9, 
+   3.827410815806432*^9}, {3.827411461881913*^9, 3.827411463667987*^9}},
+ CellLabel->"In[34]:=",ExpressionUUID->"0ea1b44d-26c0-49ba-8c54-6d51b749dcee"],
 
 Cell[BoxData[
  RowBox[{"{", 
   RowBox[{
-   RowBox[{"\[Theta]c", "\[Rule]", "1.4450844473569175`"}], ",", 
-   RowBox[{"AH", "\[Rule]", "0.1844645592258201`"}], ",", 
-   RowBox[{"AL", "\[Rule]", "3.9360808814948265`"}], ",", 
-   RowBox[{"B", "\[Rule]", "1.7326129972002668`"}], ",", 
-   RowBox[{"\[Theta]0", "\[Rule]", "0.19563626261098388`"}], ",", 
+   RowBox[{"\[Theta]c", "\[Rule]", "1.256150194441318`"}], ",", 
+   RowBox[{"\[Theta]0", "\[Rule]", "0.19659583486890103`"}], ",", 
+   RowBox[{"B", "\[Rule]", "3.3835952730467027`"}], ",", 
+   RowBox[{"AH", "\[Rule]", 
+    RowBox[{"-", "0.16859364176414532`"}]}], ",", 
+   RowBox[{"AL", "\[Rule]", 
+    RowBox[{"-", "0.00014483276888331068`"}]}], ",", 
+   RowBox[{
+    RowBox[{"A", "[", "0", "]"}], "\[Rule]", "1.7103492392256754`"}], ",", 
+   RowBox[{
+    RowBox[{"A", "[", "1", "]"}], "\[Rule]", "0.6036631606869818`"}], ",", 
    RowBox[{
     RowBox[{"gC", "[", "1", "]"}], "\[Rule]", 
-    RowBox[{"-", "0.5044140216161278`"}]}], ",", 
+    RowBox[{"-", "0.23804006240850448`"}]}], ",", 
+   RowBox[{
+    RowBox[{"gC", "[", "2", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.04794766309304652`"}]}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "2", "]"}], "\[Rule]", "0.1611089509262143`"}], ",", 
+    RowBox[{"A", "[", "2", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.15271151273623845`"}]}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "3", "]"}], "\[Rule]", "0.2755709011802334`"}], ",", 
+    RowBox[{"gC", "[", "3", "]"}], "\[Rule]", "0.0015531770940406865`"}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "4", "]"}], "\[Rule]", 
-    RowBox[{"-", "0.20889511734246113`"}]}], ",", 
+    RowBox[{"gC", "[", "4", "]"}], "\[Rule]", "0.002716559293438954`"}], ",", 
+   
    RowBox[{
-    RowBox[{"gC", "[", "5", "]"}], "\[Rule]", "0.04259077531811529`"}]}], 
-  "}"}]], "Output",
+    RowBox[{"gC", "[", "5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.0004982669709997347`"}]}]}], "}"}]], "Output",
  CellChangeTimes->{{3.825763769229417*^9, 3.825763862906001*^9}, {
    3.825763893981986*^9, 3.825763937705072*^9}, {3.825764027795516*^9, 
    3.825764084811095*^9}, {3.826007456702271*^9, 3.8260075356923723`*^9}, {
@@ -2481,9 +3259,12 @@ Cell[BoxData[
    3.826705239838923*^9, 3.8267052473268833`*^9}, 3.827311077033286*^9, {
    3.827313732590865*^9, 3.827313763818696*^9}, {3.827313795166583*^9, 
    3.82731380515902*^9}, 3.8273144278575087`*^9, {3.827314465988103*^9, 
-   3.827314636985034*^9}, {3.827403890749875*^9, 3.827403914127656*^9}},
- CellLabel->
-  "Out[118]=",ExpressionUUID->"56c18def-f4e2-417e-9122-970061230305"]
+   3.827314636985034*^9}, {3.827403890749875*^9, 3.827403914127656*^9}, {
+   3.827410567444728*^9, 3.827410596445406*^9}, 3.827410629656549*^9, 
+   3.82741066053817*^9, 3.8274107408841677`*^9, 3.827410798114471*^9, 
+   3.8274108586006947`*^9, 3.8274109230501413`*^9, 3.8274109886800747`*^9, 
+   3.827411446721054*^9, 3.827411602875659*^9},
+ CellLabel->"Out[34]=",ExpressionUUID->"2ac0e484-7c64-4080-9011-1dc2e15c4d10"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -2492,14 +3273,6 @@ Cell[BoxData[
  RowBox[{"GraphicsRow", "[", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
-    RowBox[{"Plot", "[", 
-     RowBox[{
-      RowBox[{
-       RowBox[{"t3", "[", "\[Theta]", "]"}], "/.", "sol3"}], ",", 
-      RowBox[{"{", 
-       RowBox[{"\[Theta]", ",", "0", ",", 
-        RowBox[{"\[Theta]c", "/.", "sol3"}]}], "}"}]}], "]"}], ",", 
-    "\[IndentingNewLine]", 
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
@@ -2511,11 +3284,7 @@ Cell[BoxData[
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
-       RowBox[{
-        RowBox[{"F3", "[", "\[Theta]", "]"}], "/.", 
-        RowBox[{"B", "\[Rule]", 
-         RowBox[{"ruleB", "[", 
-          RowBox[{"t3", ",", "h3"}], "]"}]}]}], "/.", "sol3"}], ",", 
+       RowBox[{"F3", "[", "\[Theta]", "]"}], "/.", "sol3"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Theta]", ",", "0", ",", 
         RowBox[{"\[Theta]c", "/.", "sol3"}]}], "}"}]}], "]"}]}], 
@@ -2532,13 +3301,108 @@ Cell[BoxData[
    3.8182444139503117`*^9, {3.826008373734087*^9, 3.826008396493952*^9}, {
    3.8260133301047697`*^9, 3.826013341448687*^9}, {3.8260134958356*^9, 
    3.826013508779696*^9}, {3.8260137167995996`*^9, 3.8260137321035547`*^9}, {
-   3.8267050137668047`*^9, 3.826705030326956*^9}},
- CellLabel->
-  "In[119]:=",ExpressionUUID->"324ac29a-a49d-4e6b-a8d8-b259afcd34c7"],
+   3.8267050137668047`*^9, 3.826705030326956*^9}, {3.827410584350115*^9, 
+   3.827410590140625*^9}},
+ CellLabel->"In[35]:=",ExpressionUUID->"324ac29a-a49d-4e6b-a8d8-b259afcd34c7"],
 
 Cell[BoxData[
  GraphicsBox[{{}, {InsetBox[
-     GraphicsBox[{{}, {}},
+     GraphicsBox[{{{}, {}, 
+        TagBox[
+         {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
+          Opacity[1.], LineBox[CompressedData["
+1:eJwt1ndcze/7B/CWjBSKhtkSSqWQUXqZDSsioRxJpVASSiUpiQZJw2h+S6FB
+W6UdodAe5320znmfc0pIU0r53Z/H4/fX9Xj+9b7e133f13UpWF8wtRUSEBCQ
+EBQQ+C9OdGbvzfS30P/9/3F+w/oNk9iEXS6nBf6LaRsbV1XBGF6HQ/a/I3Gs
+TyExBcdQHLVE5xmJsbs+dkbDAWUatWohJF4cXDwVAXfkezlqnCSR9cHg7gME
+QHow0eS1fgDm5rCa7uMxFCrl+pT0HuOO5N1RO5MUtA4bNvGQAuXYEOpcUDa8
+J7pShF2yEe6dtEyitgACy9JUIsILUHC2dWDfvjI4TY3cOyNZhrH6q1Yz3Sth
+Z8q8+mZ+JS4Mhd0r7KlC19JlIWG7qqDuGfHKyqgavqr/XA+YfoRe6doTE46f
+kXDRuGN8/ieUdSznvjtXB7EA4y3MsS8Q0xOwviPcALn1J5dLf6iD+6d9R3eF
+NeLjbNe2df/qIbz5qMbkzmakH/s39h6NyJ2WufsVswUBXV9nVB1rws2XVQaW
+99uwfJ3PVne3ZlwJNCkSBgWha2X+nh4tCHmrcjWpjoWvJpUm1eateMsqlNru
+1466Gp/BqDVtUDgYM9K2sBPWeuOp6+g2nP2SqPdGoROdU7I7xPltyNmTcjNm
+ZSc+Vzer0b1tMDJ4Pc9apxNeRxYMBPe3wVm3Xr3vYCf2+SvtqB5vQ9nyaXaT
+dzox6/3Vj0NzmWCMn29R+N2JklSZmwJ6THw5GGuR69AFrtEricFgJpiu8y9L
+O3ZBJCml4GAIE3RUYLCbcxeSDd/lvgplYoLrWrzJrQtXOXbxdpFMrPQwWVbi
+14Va33cby+KY8E0Q4FTFdeHfCr9tillM6AxZn21r7sL/dGip+GYmYsJXuE9s
+68bi/jUzXGUo2BxR9Vfc1Y0UcbUvBnIUVsuqhxkbdUNre8Rc6UUUiqK00x/u
+78ZOxemzMpZSoBK2dK+16EY650Z1/XIK0pmHjM9f7oalxjSLT2sp3PvsLdee
+3A1994e3o/dTOBLiqyKS0o0Yd11/vQMUlhy8tVYtvRs9lcwJ6iCFtKbAfe7Z
+3agVttgjZUahmhXhs6CsG37Jn1wvWlCY/i21dx+zG/V/AyjOGQo3RNsKSsTY
+8IydzIzzJue6/UnRqjls+B2wnaXuQ8HPy7I0XJKNOVoZ9/J9Kdwe7np7Vo6N
+pmmKC6tvkfzYvbXSK9g4qteu0xpEIbpkguu0nQ3Gb32Lxw8p5Lsuk1zmzkZx
+tdnAm3QKm7O65wdeYyNT9LqNxCtSjx+JMiPebFRY759kZFAotVm5pMafjYwu
+lbjxLApVplor3cLZuOV5NXZRPoUmjR36ta/YMFkkaC1SQeEXz+6sN4+N5Lj1
+uReaKGiU5p7K6GXjqfkhycvNFM4/FDnW/Z0NZ9nuT64tFHoMEwx3DLGxvL7w
+mFsbha7n7crTBTjY7Or0xeYrhfqzhzvvyXFwodtMZIBDYe6OxJbSxRwcKvdf
+waIp7F80+PnXMg6yHvYmVXJJfWtCikxVOFDxy88O4VOoWF3zWHotB9n+z+bM
+76OQ9XPb4di9HEReuJjyeYDkW3V/T60JB66PXZxjBkm+cZ3bBQ5xoNZ0LeTc
+EIUUEy8t62McpGstbxMaoZCQkS+hYkesL3N/yRiFMBfNj+neHCg5mHkJT1G4
+PLpYvziLA3U9S/v7M1iQzWWoduRyYGKuM2vlTBaKL8VL/8vnQLXu6bwSYtEB
+pf6tpRyIFH08wJ3FwsM+1fi3NRzUqYnclRdnobBro9AnmoNKzWm08TwWGHEe
+P7/zOQi6G1n/nliIUUSJ93FgoDeguFOShT0sZJsMcBCT/ODXBinSB5oNbBon
+OZAT9lw3ewEL/6oPV1HSNLoEGwzOyLLwNCAya0KOhsP+6TY1xEZGbbGLl9DY
+3W/CUZdj4f47CzeGEg3bxxnTfxIrllmvZGvSYGpV08cXsVB1/el84bU0ptRz
+5mQRn93CE1DWoRHv1xE1fTFJptCBaatHI5AR3JpOvDPXObDXiIa+iQeTt4SF
+nktZrrP20jgjGS6mtZSFu9rD1momNFpi5WPdiVteuek6mtF407OanraMhTMp
+17//OkXjRrvpwCx5FmY7lLXNs6VxpH+7shFxxgqhd9r2NHRftufdJB57eivm
+shMNv6qM8RHiwLjg/WMeNP7qKoxXKZDvt95dc+I6jXkf5qhNEBvODZGs8KFx
+rW/hRXVFFkR8QluC7tA4xp+tF0xsXfAg/1cQ+Z7I67J84vKBsCdmIaQe20SO
+c4ivW0cylkXSuDIxp1pbidT/ycOtfo9puGc/iDcn1m18pNgbTWNAeFuQB/ET
+sSci++NpOB+dDIgiHtsRxctKpBGlmxJdSGx+LfqDzDMaBuaqla3EeTkxKddS
+SL0uW00OEl9aHu9kkEljxSWPNCVlFhpO/O9Aag6NMV9lhU3EayITtOfm0yj8
+NffFXuKQL4nzr7yh0amgtJNB/FM0aZRZQmNjlP6gI/FeJLfpV5B6CBpmexKn
+uj0rTHxHQ0lG/vZt4lkZz6NnfKSRU5buGEps3/PiuuMnGmECTXaPiavkU60a
+amks/+PqEke8/Fja9g2NNJy+e9xPJPYLTVeObqGxWO9tWRIx++NLUUGKRqjD
+BuFk4q1CGT227TT4CwrMnxLHbc6sru6i8U9QoySeeMolK02TphEi4akTRWyZ
+mn0vnE9DXu9WWRhxISfH+c83GgqpWpaBxHKL80wZP2lwomxnehNfPfx6XeUA
+jVIn0Q8XiVuC86VXjtCYSPzz0Jp43buCseAxcj4sZfeDxGGThdTABA2xVsdz
++sSD64uKjvyjUXOl0GkV8QGn4tg3Qlww83/5ShK/TC65IS/Kxbzy0Wd/yPmI
+d5Za35rJxe3arPYO4vMy5Tu/zeYicJeYcgVxtUmFislcLsqe8jwSiVfdqZyR
+I8XFohA1ti/xnbK332RluBisKjtmRbxL6/1L9hIurlW7uS8gfurw4b6hAhfi
+xWcUfpD7J5Tw0SVNmQv+7p3MCuIyyU86rmpcyH+3umpPvHTPZ1mWBhetqs4n
+NxJ73fwyDm0uYi1mHREl3jxcVzJzExcpB70vRpP38Gh1Q7yTHhdjhqqRNsS/
+bRp9G8GF/wOBalXinOZmgxgDLjL76xiZ5H1pvKa+rDnMxfZ7lzc/I+/VONg+
+ycKci/bzVik2xDanRj39j3Px+a6gg/yy/+6/5KqvVlwYHFnY8IC892lWxjdv
+O3IRX5Fy8DTpD/LrW49lOZP/f7tzvRTx5lm2a9ovcSEqJ3KmnPQT55wb7doe
+XCyJS8uRJf46I39Dhz8XknPKRrMWknzbd0nMDORCi4o1NiOWzG6k197lQoUh
+922E9DOjE/2hAWFcKL2IldImzs5U+b4untQrbNH0SBnSL45HxAcVcBF+qvjU
+7PksJGkqueUVkfNqzPUPI/21TCRzX3cpF55iu8dkiUdffhrXqeLi79GZ5UtJ
+Pz4lLGLGbuDCcmobf8FcFjamuczc9J0Lry6ue5YYC4d8BLpO93NRyHhzaimx
+05F7efcGufDJNYi4Q+bBU4GU0/QYFyJixp3mZF7MMesuDpnGQ+LvO5Pdoizw
+Jk1ceEt5uL0+y/ypIAtv9sbomynyIB7+Vp0nQPp31LdZb5fzoOvvIKRCvHnT
+rcT/reZBUkHzWRyZVyGXC5ssN/OQt1683WOCwsY+5Q2NZjzMDHv1o26Ygvhm
+F+Htx3gY7NVMHiTzkH2ntDbDkoeIrNOWksTBKsft753mIXc4q3wPmaddp0Ie
+G18k+UyPdEr+QSGg7c9EaTAPAv5yhhNkPjNWGH7QuM9D8Ik1zX/J/F7nGh4e
+E8aD2aFtVn/JfO+Q0lT3fMKD3Y2VjiPdFLRNbBg6z3lQjx+2qm0n+9m7L2Vp
+lTw4Dxo9VyT7xOrsxFuPx3kYfTD9mgHZP+x7OAZjkzxcatp9QbycQuIS5Rnm
+gnz4D6272FBKYeGdp4HzZ/CR5tgbf6SY7F8nkkJCFvAhxdv7ypDsM2zRZ49v
+reHDO22n3yeyHz06npJ+0Y6PF61fx6zI/tQU8s2pzoGPaW5dBb0RFOa8U12j
+6cjHVlfNAOdwCv6aqVnfL/HxWuKl6dVQCpdE0l6f8eFDxlYt1JnsY/tfppef
+iOYjuvtBkTDZ70SEMpuNG/h4+NW+LceGwt9GryCnZj5sxHnsxacpDCft3hbW
+xoeqb5TezVMUOMZ02tcOPsIKi9t3M8h+Eyrjd6GPj4agPa3vzCl4K1zXjhDp
+QV3kgdSzuymMb90T0qXTg6TqwxMXNMi+4801covqwboA+4qzA0wk1Fwc7ozt
+wY+Tb5R0+5k4LDMVZ5TQA0HR7YEzfzCR/1L6t9yLHiwqUT4T38OEd7thUlFe
+D/RcOk/ldTIhoZsiKNTQgw33X9vf/MyE+qhTYfCMXvzZd10r4RkTZ8+PqSVc
+6cWo8aX+UTMm2g7P+1R3tReXtzi1uR5iwmCL6vl/nr0wG1WcPXKACSUJyzRL
+317Elosf/r6Hia+vSlfLhPTC94OefdU2JvYP+asHP+/FtH8LcleqM6HlsUDT
+ldWLVfSbG8lCTIzd1tbeve0bxMrEzYOft0F2i8qV/hl90KzWXGRPt6LKamzF
+g+4+WPt4iXMHW3Ane2AyM/U7SqTkQk/8bkbr5Y87av1/oHTTSKRiTRN0bT+k
+ORz6icp823nTnjRCq/+GqeDifrzVntfBOdqAHL6MfeRIP9TfVlbc4tYhefq5
+A4etfkHkioDc7x9fUGBaoGz55Rf2363OZaTVIOKszUPrzQPoC0/wUDP/gAm5
+xKgVcQMYH11v9lf+HZ4J1Jufmz0I87I91ffvlaPj+oMkR5dBNEXc1N1pWoT2
+jxmhTi2D0LEIr/v6MBdKe0vW/9w+hIk4/69zg9IwZHvy3OrnQ5AtDsh158Vg
+yuqk168XQ3Dfdyim1DEGMyxPhuSkDoHF9BmcPRKNpaYns/VeDaHo5fjGEuFo
+7NY/ObE3bwi79Ffe9FJ4ggTpk0GOb4fwZ2+Fvw8jEgfeM1Jfdg1hn1Vdvn3J
+XVhUMIpd2ENQ0z8zX7E2GHbFjFodegjJpiXx/Z1BuJbNGCrhD+HF2ug/7wUD
+8SyOoVv7cwjT8/Y6uxj4Y8qNUdP/dwhXjBNcXzzzwsxLjPbsqSF4Tt3Qq6nx
+xHwnRr+bwDBaHjl1LPzlDlUbhpSAyDD0r1+S3bXJFUcOMCzmig2j4ya1JjbK
+Eaf2MBybZg+DsipnN/AccN6A4f1IYhj1jnlMe207+OoxEuUlh9FsWF/uGnEC
+dzcwcmmpYVRPMtIHNY7gkTbj/fMFw/hZf9LF8cE+JKgzmOdlhhHwRkJzXugW
+pK9k9K2RG4aNS97xvzWW+v8HL4uLfw==
+           "]]},
+         Annotation[#, "Charting`Private`Tag$21431#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -2550,8 +3414,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{13.414859693877554`, 0.37499999999994316`}, {
-       3.944840409303879, 0.3750000000000284}},
+      ImagePadding->{{11.532844387755102`, 0.49999999999994316`}, {
+       4.997223543150426, 0.4999999999999716}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -2571,114 +3435,135 @@ Cell[BoxData[
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.4450844473569175`}, {0., 0.}},
+      PlotRange->{{0, 1.256150194441318}, {0., 0.4241118461046876}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {109.02624462557412, -63.642109874438596},
-      ImageScaled[{0.5, 0.5}], {202.9432527858332, 121.22306642750209}], 
+      Ticks->{Automatic, Automatic}], {159.13698616065489, -95.73828096823078},
+      ImageScaled[{0.5, 0.5}], {298.20061200562844, 182.35863041567768}], 
     InsetBox[
      GraphicsBox[{{{}, {}, 
         TagBox[
          {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
           Opacity[1.], LineBox[CompressedData["
-1:eJwt13k4lN0bB3AkCi+SRNpFJEoisnyT9qIkKiFLRYvKkiJJWZKK0kJESuUN
-la2sKWuRyBrzlDBmnpkxSDHW8jvvdf3+uq/PdeZ65jznnPu+z7PI5dTuwyJC
-QkIKwkJC/0Wl/l6tW6kHTWf8P+70vBVsIGUC7UQP1f+i96xT2qOSFmjw4L4e
-JjGU/h7cJumAARbjUSOJkbvuvqyS9MC9/NdqWSTOnDpQViJ5Ab3M+U9dSbT5
-kVj7VvIGTrzu3r9R4gZ8a4YaCyUT4Mi66cyYmoAbn+Y1+Wx4ieJ/Bw61a7zE
-fQd98dHzb6DnaVrpvesNBjcIy9dmvEVUrLBs84632GpQISNUUopoGzlulH0p
-0r/ced5wpBKy1nc9LIoqoHOtrLTRrhoGTw6k3NxUBf8/ZTOdjGsxqD70Ljmh
-Bsvz3Saie7+gwE++4UpsHdJFE7T/6W6A+InXCfI29Thb/3XZkvwmHEw/UJf9
-sgFL/MdLhUJb8OsAp+g8vxGd2bVxg2dboS+y/0HI8mZwT6YYh25lQKd3qYUQ
-WiBSuGK+1vpvCPM/0etn8RV/upLi43TakTX+CcuNWmF2fTbzyeQPmLI+iDIm
-W7GdOV/PdawDSspfFogWtKF0bUmmxN8OiM2l5cOK2rA22lU7S7gTqo7JoWLv
-2qBu9u9S4emdeFB/iSFS3oapD3XmPJzdCeET82y4n9vwzm7DJGN1JzK/vvnX
-o7MNug1Hq3af6kTaosi0PeIMKJfkOKzv7gR/SJlKtmQg52zLNANOJ97tv2L1
-excDltoj2Vr8TiT/DZUws2YgKN5IQmmwE64B8hu/7mWAfab0Tf+ULnDfu3f1
-OTGQteyLTIJKF4os9vVVezGw5U5PybBLF5w31lBr7jLg47ZY7UVnF/4tXmj/
-q4mBiv7z9jdZXbDLagz51MKAwrnmaG9uF45WjEkntzKQFx4+aTjQhenzU7dY
-fGPgz/O+1kohJsQsC/ZFMhkI4xdc61jABCctRbVsgIFYT+uBmY5MHIwu3TEq
-RYE7mr502JkJ955u1YfSFNZeFnNkHGYiy+ePu7kshW/R+dVJHkxEWGtpX5lJ
-YVHOgidaF5h4Zb23aFyJQqqgx3bzAyYs9VrV7qtReHs+pMifwcSeaYp6KaYU
-ZGW8liu3M1G1OkYgvI7CoccHHxR2MuGomOF4wIyCVNXagAkOEzH0UxWJDRTs
-FAaMAoeZ+FXldmXvVgojGQ6Fl+S7cVr8Mz/TmsJqtn5BuGU3HokkcI64UQj3
-W7JMY3c3PBubBPfcyXyl5OKqbLqxeXlkdsVRCsG6vX4SDt3IeBxuuOAEhYag
-ZMPrx7sRH5kbWHqawmll2fyo8G7Y2ygtrfajkL6Lm3uvtBsKJ1qLfkRQWGxu
-axta2Y3yz8oqE9coxOqVDXpXd0PsnIPY7BsUQuYk6Fg1dIPq19m4JYrCge5d
-aZJd3VCaGfQi9jYFiXN5iUHCLKjXj3gPxFNwf3gl9Ng6Fj5uPagfmkah/dag
-yv4NLMyNT2Z6plPYE+JcunkLC1cyChUdXlBYd9RocskuFlQbKpRXvKIwW7f/
-3I+DLMxRpiJLsihUVtqe2HORBXeboTNJ+RRU+lStTYtZoMeEMrdUUnjQo6bJ
-K2FhHj/y5BixPHfplHsVLCwp/tCb+oGCaLdGdm8NCxHqdqumVVFgt2nNTKBY
-UDFnUtmfyP5W6DWOj7Dgd+Bmf90Xsh5l+mkpEyyUrLjF9ainEP9+TbC1EBse
-nm+fSzRQuF5oqJsmzsaLVXkX1jVSOJlpcttOgQ3LklkBCc0UdBI2WufrsnH4
-usOMeQzy/LhNmofXsNFSWBOVQrw4dvOUGUZsRJ5mta6kKMjd3prtvp4NP6NV
-NfhGYTDcYqaiFRtX7shgZzuFPB+bRt+TbPRs8rqzuovCSi/btMVebET8FfuR
-Rvz81N7g2jNs6P8pGlnEpBB3bL+u2gU2lC4/j5PophDg5HC7+Rob37W3J31m
-UcCOw9arn7Ohoffu5xzuf+cj8c3ndDacS4T3XyBO4rUouWWwMd4QlNROLHR1
-S8f9XDZmtJrUJvAovK/Q9JisIOMpA2nSfArr8SusuouNhdOmpBb0UfCS1uS5
-stnImzpNVbKfwuPvrhZ/uGz8s8Y92I54SkDzzJUDbDBy0TNEXJ6Xl3R3ko05
-ox4nFwxQ2LTqYoHTXBrfjR6fN/lNwVc4b97YAhruTxnbAoifffkZdFuFxg+x
-AOECYvFTLpsrl5Hxs2OqqwYpfEzb2KRpSMOilb171hDJL//ANRXGNAr3ux/a
-Tqy+LTfOcR2N/at2HwwiDueoO9/aTENDYC9HE29VleoT2NDwmmPskyKg4D+4
-wermfhpt5n1fm4hTyy7kaDjQ+BMkslR4mJx/l35/+0M0TC13hNsSr9VRbx9y
-o7Ft+WTcReJjQs5mUcdpnMmXjkshrk5sEC/1onHBzcRxkHjMQ/L4AV/y/5Jt
-KkojFJaZbKgd9KOh7lrdYkx8jXp9Z+klGi9mPZt6iXiH4v1FN6JoLOsTiZwg
-Ttxkle1zm8Y/5a7zlEcpDPhM32gfQyOk5vNxA+J79X7umg9ppAcObTpFzJnU
-GZNLJvOvsmwKJ16rzbs29oyGQwRn0SPiHxF2r6pe0rg8IDf5mXhVvpxZZhYN
-5SGTqC7iELq6IfYNjVy19o4h4pZZwYeCCmi47Fg3KD5G1neDkcCtmEalcGaV
-IrG/1+8rO0tpvM8NcFYn/pyUprSmkoZCTn+hPvHCOte0+dU05GbYtpkTe/1R
-NhGrpbHk7Xj+TuJyzaba3noa0f7LHe2IFeyuOzU30xD9oVvpSuwevuFXURsN
-Y2uHX8eJC99MBD/5TuO13GCXF7E0K2fW9U4aZprmseeInWZ6pHizaGQH3JW7
-QJxlpmp4gEvjbJ7e7iBi0dPfq9f3kv1zPrn3MrFt4l37ZQM0PlRfXRxM/LzG
-om/GEI05Sg3Z/41PjE0NGh2hEbfuluQlYkuN4hmdE+R5U2csCyRO2uub/FGI
-g63jcTL+xL9CtfUyRDloCjlX5EO8IYddGTONg7DGXytPEsd0Je67KMWBIb3b
-4wgxT3Yv74gsB6U3Oj0diI0hE2Apz0GSC21qTRzp8eEffUUOHtSmN20m7oi/
-+HDeXA7cxP11jYhXVa/RmbqQgy0yMQe0iENH+kv5Khy8ztluMZ94mY0Tu1CT
-A5ZUXOQE2c+AYMVzySs4sLEtbecS12Z+mX5NlwP+0YejzcTe0mZadkYcVNZH
-30wlrjQeLTYDB59l9P+5Tax4PHOXhjl5P16KjT9x0YdFPiPbOLD8Kb19I7G0
-oG1qhyUHM3ZEjagTOy+Jjvmwm4OMZ4NeksRil0QK79lxILvrcl0NOd/7XhXs
-CHTkQEJqdVYacep3r/bDLhzEJ313uUq8cy1TWO8YB0NZ6ivMiB+7x9+ee5ID
-q1qr7crEg/esVUW9OEibuKT/X77F/i7b0ujHwd31oucfE3elP4nyvMrB7Xnf
-yn6S/F7D/mmncIODM0v9bpcTX19golZ4kwO1um0HYoj1o5uLRGM5+KDn1GRI
-HHFWjBfzjIOxRAUvL1I/fmTsfm2cysG2BfOmmxKv5iUGdb7gYH7r+P1pxO32
-a2ZrvuZASUU2NY7UK5317huKyzgYDV9+NYvUs7DzOTKuH8j+R0UOniFm5AhR
-4p84SJntdMCAOGTpfU+rBg6CopTmFvyi0CpVndjdwYEG1+pUJqmfQV81RyX+
-cnBcIuLKKVJfm2XPlb8S5sJ3mPl+MfGybeVRe6ZyofA3Z6SJ1OumInu1RCku
-3L76HtInXvr4hrWOMhfDE2E6vaS+157of7HXgIvcdVerlpH6P08k2+WJFxen
-p6Yspkm/uRMXaB/jy8W9shd2nsRSuttsI/y54CteOzZG+tOYa+fW05e5yOu8
-KTeduKVCRsc4mgt/WY2rih3k/F49MdmYyYWZmPtaIdL//sqqPZgywEWZrhH3
-N+m3Z54P3BUMcjG3QHBmPzHf7G0Ud4SL65tmdbwl/ZnhtSe4TogHeRl5i2DS
-v980XT4WL8tDSpd2pFAthVOxPwx0V/IQutK8pvwjyY8F95tdTvHwM3HO/DNv
-KchEPLAz9+ZhhU+0QkERBdPBhz9UzvKwaW/N2J9C0v8/PuN2B/IwoMcKu1xA
-6oFnzp8jkTyUHtPKCMwl9ay0TvX4Cx5eBDbtN8+kUHBYzNe7hwfdnIqrf5PJ
-/bNu+rh1Pw9a9uULFxErrv0naPVvHvgl2U/XPybvJy0fMTTGA9s40u9yEunv
-uYsSz0r0ADlG24YeUEiZZlJ5XqMHwh177qXcJeud5q0Q4tYD6m/PiGkYyb+F
-ks2Ljvegr7//zq5QCsN3H99+d7IHS1J4651DyH0zqF52/EwPvNflNl28TGGB
-zQpJr5AeMJeY1GUGknz6y5s8+KgHa1J3KnN9SX+3cuEaUT0oDl799ckRCr3D
-u4p+W/IxHMnqtjAn97Uat+c/dvOh0bf7lMR6Mp+kwHufbPlo3ujzvYLcf423
-pp9OduRj8c3NhwzJ/TgiTlzV+iQfSaPrFWcaUlAzKb6RdYMP01qbkZvaFBwv
-ax70rOGj4KWF12tFCnVSYiL9W3sRMKvB/B6XATV+hnqsRS/KyxxeLeEwEPDp
-wE4zq14obaufncVmQD0i88Htfb0Qenq1vYp8DwSJO6wxcOvFt8OUce93BlaK
-5Jy4FNKL6Qqnp01pYCB62PnrzHe96OiOX3A0nwHbrrfpBqv70Dft/rhMKAO1
-qsdUWUr9ePJ+fd3rGQzQisOJkdN/Io3JLxcKaoPhxYLv9Rd+Qnfu+bKCrlZ8
-qTrKZ4z/xJ+7L9l681uR7xOndc1zAHtMZIX2b/+KeNuKZn73AEpVGp9MHmxB
-ydxvFvIuv0AfqpZdbdIMQ3Ofka6WX4i/+y5mxfQmCCxGvM7a/EZ4kHo+L6oB
-aVG+e97W/0a8oNxyWd8XZOv4uqduHETky15Zlm8tJnOddziUDSI599nxm07V
-SEysdck1GMKm2a4RTzUqoVek11GaNgTJhwaRtsklkC0O17qjLsBOjyd7nULz
-YLrQ4YVUggCJ687pfpJKw8hekWL5hwK4n/a9JvksFVlRKbVzHwmgEn9BYTFS
-oTo50L/8qQB3Lkbsqz/9HFLtYassXghwIWtliF5DChjxGbk33gog4ZznPX79
-CXxni5ZKtwvg9LE13KosHit3Pm9Q6BBA/ZOVJZ8XB16YJXN+lwD+W/cVasrF
-wUEQK7qCLcAfznTPmIOx2NCstXlnnwACr48ecwR3yH15b03UXwHUfmmkK6tc
-R031xLcYoWFov9989NGRCISJPO59KDIMF9tEebfn4Rj15EtniA0jfHVH1qvl
-oejYdcnqi/Qwas87O23ZE4C4cDWXVtlhGJ/Ok19Rdw573n/y6pAbxp1/m2yu
-bTmDDysU7vxUGEbPu49bTD1OIMit8MmIIvn99FUTKbaHsfah02sh5WH8vqc9
-yPSzx2DL1Mpp84ax6qWq6JGgHXgpndYiu2AYeUuG9aWrj5v+Dzh1GNk=
+1:eJwV13c81d8fB3CkQUso5WtGlIYZJfUus7JHknFJZYZsGmYh4dqkRC6yR1aE
+o2GVSrj3I0my7ucOISoR/T6/v+7j+Xh8PudzHuec9+t9rqSjl9kVLg4ODiNO
+Do7//y5/rTGojrI58XdZafcwTmsW7DustgJHobFnu0rDgZTWsiP9+zrgDHwO
+uSp18UBNq+zrtcMdM2bQFp1h3p3U3rrIkqSUwAXYQ/l5++CB/tZugRNuCWR7
+YDzQIH9f+NL6TrR8Z+OMIxyX6JZMSppsrVc89rdEyAm+WUXMOdhMtz7S6f76
+EFxBL17Fbm7/fGvUhfOvEpyvQipPzlyM1mKrl8dkYRjZC6wGFrP8FlZay9qO
+6jTaeEOsCrvBSpwL5b7hUHs64wPNxcdFxJLWotSBzr2lkX7Au+zUEGPMg2JG
+EoTzhQLgP5Z6Trr1ZuT9Q2Q1DYLh02fDhTP7BZDT3/GZhP7rYNQgcwFRtiPr
+daXfop1vwrX1YT3hmjuRpvDR9mByKFxxlb6G/xBFIvxhNo1JYbBpUXVYO0IC
+7ci4NFBnEw47fR+JHxXbjXgfy3VUzETA/VcHFe+S9yBumS1Q2hgJdMHY4+OX
+ZdFqyVzDk8jbEMxKv2JnuA/9qH1WnCsUBYXtscIV5w+iz1268clwF+JKo59/
+3KuMaIZy68g8sdD9gDti1l4F9fZtDr3XHwvu4YXMrNzD6PXwwLXbznGgEii8
+LfHEEVQ262gRQCZDrZ1CBc4+jvrVKU6NBxKhzXUiz/QaIJMVQUpDUiJE+8Ub
+5oacRGcjFv+rtUkCr/fK9bRdmgji0ObymWSwPadVc+6uDmo2UjxbapECu8RP
+1+/w1kXq2yhRxY0pYNYta5Fhp4dU0qP+FUSmwh3qrTCq9hm0N9dw7pFQOrhe
+j/+jZmCI+Go/DyTCfViaLb/CJ26OBso1ujeX3wfN2gCnT+3mKPNJdkuscBao
+1+bXOntZIIkH9oW3f2bBH6p+cd+bc0ghYjwwqPQh6GopVdDyrNDeIv/NVRtz
+QZoL+62GkRDvnsJoT81cwNTcO6VK7BH7MY3zYHAulPcILU2BA6p6oPareCoX
+Cpt8msp3XURHyH9GKC8eg3mcSUbhF0d0OuBWVUYgBVb6T/dvfOKE5ObL5Swr
+KOBIWdlqKeOMNl0byRecpMBbLTW95UJn1OsK95PM8uH4sceh58pckJUdZ8S9
+gwUw9H0962SnG3LRvmMeOl4IJRX3t1Qd90Ix/PG/nIxLoK5JH6zS/JC8TXTj
+7YgSkDuwaaVhwg/RKOE38+oIix70L1HxR9KHA7hG/isFZ82zf3Vp/qjtvP2W
+c3gpjOqOyltLBKLFh4oyWuHlcFgXujs+BKNaAVYJ+UIVZAlMTWdlhaINR1zi
+xHyrYCCoTIf7byiysZ30KI+rAp9BWubKoTDEVfBV4S2qAhFT99iupDBkojpQ
+v06mGsq3Zm8rsw5HbKuWl7d+VMMFvoe0tD8RSPoRecj9Xg140Q8qmLpHoZKf
+lEvX82vgwiL7ZRIlCikYPmPHtNRAOG8VWWA4Ch37O7paMFMDjmn614cMo5GZ
+tZLUqHktuOCVa31VYlDYDqq7hUgdnDmpbda0ORYNJwivaJTXQ8P5F21/ZuJR
+amiB+JYPjdAUTolkqKYgdn6dpQazEWr91zV9sUtBWm/a493WNoGHWnrxwu0U
+9ENwarnjWBOYsqq9Y/tTkEmJzGBoUROEUdf2m/ukok3UJ4lz4c/humSxinF9
+GoqUK+GkqrRAV6thgM/5TNTohs0ZGrYBr+UH0eqlbLT4MciBJ/gV7A8N8DEd
+zUde8ykJTXgHDB5/ueXitjJ08EZapcPpN1DJWyfixahGGkjZbtnjHaSpPxBV
+7a5DbSN7Jtvde+Hhl386Z1Sb0EYNDseYNX3w9t6r8J/hrSi4x9BKJ6UfPmVK
+7D7i9gKtUbc6tKJNhbsZEsfKel6hurXVZys/0cBP6l5VDW8Hiqzo0LVNHATb
+lGK+w0FdyD/WuHkNDMFvioHxkYE3iPxaJqig9zMcYiroOK30oNefmwQ0b38B
+mjD3VledD0jSNPvnoPBX2M7I6Isv7kXvTR/Z1LmOwo467eWLjR9Rdqps8PKp
+b9Bhd5HcVtuHwtYNNrZuHAMTnVTLC+R+NDvl5BY6NQaqg5RnmMsA8vslcqLl
+6TgcKgngKBanoticOKPF6xMg8bXe/UArFeFYvIJdyATk/l7KKWujIj0+Mv/L
+8AmQe+qtvP8VFXGHJ9HuxUzAsumqv1QXFYU4ppPE0yfA+G+PDUcfFfnuyfXU
+rZ4AhUiShvskFdmW1iSk0idgPPwLnXMjDR1qGHqvYDEJlnxTv4VMaehMnEuB
+zflJmJb4UbTBnIYuX/x1I8p6EpzTjAd+W9BQ1kb+fcMOk8DvcCPzoxUNrXU4
+ExntMQkmztw9Pg40NLzhmdpI1CRUrku/5+5FQ7HWabn3Gichl+/IB+U4GiqQ
+lwqsb56E2yHRfPPxNNTGXW34DU3Cu/yjbVVkGvpV0bOk2jEJXTZGrrIpNHRx
+Dfe5sb5J0HZfxDizaOhImQ/PUfYkNLNTqW5PaGhqxdhnSmwKtP9s7OZ9QUPP
+DbJPnNs9BZHtv/WevaShxAdM3td7poDqFfnt0msaUj96h/L4wBSMh5Y61nXS
+ENmvacBWfQr4F7MTT70nxmdJq/Wfm4LK9iDV1SEaujv4ZxnFTcHlooS4tfM0
+RJLV6zqUOAXv9T6G+y/QkEpAamp2yhS0K4ZGjv+koREB+YM3sqbAJ9O+pHGR
+hpSML5NUi6bAPWTzdaNVGhpqf99W9moKxDTc23bxYOhADeXOfSJZbfZIsJRF
+MeSCj+surkxBnsnNzfZiGKKISm84z0kHqqfSqRhxDAnH5McKbqCDVv7OzwOS
+GFpvV0Amb6fDloTud5YyGBpb9+T+HQU6mOfsOL9yCENiGnTrCWU6CIuvd+BR
+wNAFb1kRLTU63JLj9xNQxFDv5yePOE7QIWmG/VxSGUMtVUWUG/p08PKYRTJq
+GMq0Lin3dqJDtX2YVt8JDA2QmZ69rnSgSIn0tgKGtrbLKch70OGaeMPF4pMY
+ipIvfcr2pYPId5fkIE0M+XKXNTiH0+GMqZr4Px0MGVWUv7B7SAf5lwPJZQYY
+ih2fjmjOoUNrwXXNYEMMte88pP0fhQ66TvvmtIwwpEEU7GAxHd5t3He23xhD
++6wq35o30OHvDs/RT2YY4uaqpp7po4Mh7m8QZYWhv/237nlS6TA+OKkqewFD
+CwVnT6UM0qEzaQOpg/D4mYmy4RE6XMrVuPjPGkMvk4Rue7HowLh5StnWDkOh
+kiFKadw4PC5QbG+7iKGA+bN443ocKjVkrXQcMeTZLvRohBcHwR2qUl2ESa7V
+PHu34XBV85ZD1yVivtUTo02iOPAudXrVXMHQ0kl98qgqDjdZV/KUXTH0g3+n
+zlp1HAal96U9IMycmFjadxyH37tjn3O6YehTTIiTrxbxfCNvXhfhZ73Vx9eZ
+EONJmr0/eRVDVXkh83LmOPReN7LMIvzET7/Y2BKHy+b1W38QTt85KXjfFoe9
+JdXbH3pgyN9hJ3u/Kw6BX1qchjwxdFVp8rHJVRxEtW/67PHC0GXup+f9vXBI
+LLxR7knYokj/Vas/Dt+95KqWCRtc3xk8HoTD33KTQLiGIS2DyUMbbuKgnV5w
+NZyw0mxIlmkEDo8834z+Iyz3Ut8k4A4O55T47TW8MbQ7dee6BzE4pOsF8QYS
+3nbkqfdEAg5jbon0KcKzoZOnAx/gQCpMqKnywVDeW++Fr49wEPrUaDdG2EJo
+Ned0Hg4SmNnoNl9iPSp2/N5VjEP7m2APN8JuS3l5EWU4WC7ZBaYQFtGVN2JV
+4qDhamvVRDj0i15Bcz0O5EuWjzj9MKSwb8BkTxMOnAnFXLsJj/k5/I1vwWHp
+cIfGScKpbewnv9pwkH5gZWBLWHdTsLn9a2K/5TYrBhBePL/2X2cnDlY3E5nx
+hEsoSSUKb3GotyIHUQjbzoha3n+Pw+rT+qF6wluOlXBy9eFgXFbD10W4LUq1
+3I2Kw9YUZWGMsE/fS6v+QRzmxsZ/jROWFjPm1hgmvq/jU/idMM31c2X+Vxws
+EuP2/iYcU+dss3kch9qu0ZsrhNU5F9YFTOEgJiFK4fTHENsg7OkIA4f1v2ay
+1hB+lLmJpDeNwxts/eX/22Qik6dqFgefMIFVDsJcCnvqdi4Q8/n0wuUvMV7t
+jWqH8N84hC++oPwk7NR5fBNzCYdXUq8q2IR3CrxpMFvFYeGd391vhN+QLC89
+52SAfGaU8gDhmyVjW6TXMmDetKjsNeGDvzyb4jYwYHHx7sJTwiOnlq/83MgA
+s8bPvDmEE+Ojt5G2MuDOtOFMDGHNTwItHfyExZIeXyO8IJ3rIr+DAd/WWEpa
+Ei68dkAwcxcD3kUaeh4lbNX8DHGIMkCqZm+MMOFm8487+qQY4GpnLEkj9t8z
+x+6luiwDdrNXcqoIS7AYHhQ5BqyaWjJjCN+O4Gr3U2RA1oeeUSXCqu8Trn1R
+YYCjr3EcN2F8138iukcYEL1Oh2uAOI8G1cq+QsCANmELg6uEV/8isTBNBhzJ
+6xc/TLjqtMEbXIcBQjLJzcvE+RYcvSzZZMCAAPUskwjCHfvnenabMOCPob6e
+JuGgwFtB98yJ+VziXcdB+POW9A+21gwwKI0c8iPqKc569412OwYYjxTO7Cd8
+orBC5tBFBvgKlbwdJeoz73jnrX/OxHyrpDEtwm5XF/fn+TPA+v4L5Rmi/gct
+tvX0BjHA/IpfchZh3eNyV//dYMCgiOo/LcJSW2zLbCMYMKD4mzOJyI/hSnRA
+iMyAU9rfCwTcMXQ2c7BHJ5kBFs/TPCv/n0dhc1f90hjAVeytdYZwmqlU+ccH
+DNjvPcwXSOSZ0XzUwbgiBrjni6g8dyb243POu6ZSBkw0rbXSIyz3+pkHo4IB
+v/aaRX10IvpXGrNct44BonrynKNEXrapGh3ifEnsh0+T6ySRp4rXt8sHfCbs
+kjiQZI+hXMdDH/JHGMCO5Lu9SiLqS1/Pq/8bA+LEPdVdCTP/C65UwBmw9dFk
+0xEiz/NahuVZC/8/n13cbUTeC3LmKzhsYcL7twtxXucwFMFo7k3YxgRV5/eJ
+zRZEHn2kXmsRZMIuFZnM9YTf5a2vFv6PCdgU8b+G6DdR2u6KVFkmtM0KcuUS
+/WgxWknp7CkmuMZmL5ucwVCP5YlOF20mdAnx6EecxtDjPWdto/WYsHu8qqJa
+j1jPVxejXhsyYVhzsZpXF0MPVxOHTlgzIapai1JA9MuT/jMRyr5M4BNR2RB6
+jKh3x7J+kQImhEm6PGrdT+SL4jOXY0XE/LKyRJ7KEevD8XrlQikTXvu7FlP2
+YWgo+7NsRjUTrMyVvofJEveLT7w3t7Uy4Q9Pv7i0FNHvjV2l12FM6B0aW90k
+TNTzcRn/mQ0sOHSNmui8jugnd+b+mW5iAaWT05Rj7f/roTm2disLFKayXqSv
+wZC5vXlu8A4W9Eeb1zRzYCghPOztGmkWYH9K+tlLNMTdMSS5E1hAVd769ct3
+GpoxIr8/6c+CKrb0JCeVhkIyrC9QglgQlSNkbdJPQ5tG90ysvUm8Lzke/PAj
+Dcl5N/95E8GC2S0XGw8S97HLKQzpc4ksIKfHKasQ97UhTOuGaykLMvZx/eh9
+RkMdDouyyd9Y4HbYP+E0cT/cpmvypGmCBaurA4c9M2nIdn+RzDidBfyWJh+T
+0mnox8/ze1S+syCl98BEXzINid1r2E1bYsHYn7gAjXs0FFAXICosyIaz8pxq
+5TdoSJb3J3+eLhuyVn4EcdvQUEzN3Ep1KRvGdgsevCNAQ/H8PL5ilWyIHODY
+tcBHQ8neEnjsUzY4sGfTHbbQULa8cd+lRjaoGMSfVuKhoaelZYXbO9mwjUIJ
+e7ZKRcMUZ+PgMTZwMONVTBhUpJD6JffkrmmYvlR/rKyZijC/bq0PUdMQVsGU
+F7SlosxrHuWcsdMw8rZ0l+gFKrK+uk1IJX4aRJ7VjElZUtHIpQvMzJRpUPqT
+xL/fhIomzBiJjrnTcF3DjSGuTUWzCjwjPxunQW7OzJeyn4p4pk8HiUxPg2Xo
+JCf/nwF07EpXmav5dzh9mnd7QvwAUpwJM+MUmQGSd7SxRF4/qqULuaT/nAFG
+WOOoWkgfKlzvbmLhMAtWjy11+Qw+okazRmnb97NwQCNk/6bGDyjN7XKGo/oc
+GPF9yCh83IOWd1EeyObMQT7Tw/nA7W70hOPjefdNP6Bec3Mue6odjYQkF3j4
+/IDM6K19zWYv0ZfuqiRP2g9wSC5eajzdgqQMWg9/15wHbYvm9Xd/1qL5K/bu
+B4rm4Vogwzd3qBitOtjfmi2ehzZxzWxGUjHaYGtPri2dBxOu1zNyZ4qRmJl9
+jUYl8fwJunp6QxE6e8J+2aB+HkYvGKXxpT5BeTvs73m8noewZNHubP0CZNJJ
+Kq0YnYeqX+XPnOpykc1LUovP2Dz0TnAIvHHPRU4tpA+qE8T4Ru0/ZXbnops1
+pPlW+jycPISveSCag57kkI59+D4PDhNFU9kfHqLVQNLbmb/zwEGrDbFWzEQ8
+vqQvNavzkBus9Ns2OwMJepJmAjkWgMOab9acJwPJXSYJcHAvQFuBfpv4tzRk
+aUKy4du4AKPwwk0xMQVd1Cd5DGxagLCWBf+h5WR0VZcUmrllAU5OX24Jck5G
+ERokigT/AuQ+e26fdiIJxauR6iYEFkBCXYwpUJKIMpVInUXbifc16rbGbE9E
+eQdJn64KEd+fqe0d5ySj8r0klsIuwvcmhSiD8eh/tg0Sgg==
            "]]},
-         Annotation[#, "Charting`Private`Tag$29953#1"]& ]}, {}},
+         Annotation[#, "Charting`Private`Tag$21473#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -2690,8 +3575,8 @@ yPSzx2DL1Mpp84ax6qWq6JGgHXgpndYiu2AYeUuG9aWrj5v+Dzh1GNk=
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{8.954559948979593, 0.375}, {3.944840409303879, 
-       0.3750000000000284}},
+      ImagePadding->{{17.332429846938773`, 0.49999999999994316`}, {
+       4.997223543150426, 0.4999999999999716}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -2711,63 +3596,20 @@ yPSzx2DL1Mpp84ax6qWq6JGgHXgpndYiu2AYeUuG9aWrj5v+Dzh1GNk=
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.4450844473569175`}, {0., 0.4371650540626146}},
+      PlotRange->{{0, 1.256150194441318}, {-0.366516972833637, 0.}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {324.8485840042734, -63.642109874438596},
-      ImageScaled[{0.5, 0.5}], {198.48295304093529, 121.22306642750209}], 
-    InsetBox[
-     GraphicsBox[{{}, {}},
-      AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
-      Axes->{True, True},
-      AxesLabel->{None, None},
-      AxesOrigin->{0, 0},
-      DisplayFunction->Identity,
-      Frame->{{False, False}, {False, False}},
-      FrameLabel->{{None, None}, {None, None}},
-      FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
-      GridLines->{None, None},
-      GridLinesStyle->Directive[
-        GrayLevel[0.5, 0.4]],
-      ImagePadding->{{13.414859693877554`, 0.37499999999994316`}, {
-       3.944840409303879, 0.3750000000000284}},
-      Method->{
-       "DefaultBoundaryStyle" -> Automatic, 
-        "DefaultGraphicsInteraction" -> {
-         "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
-          "Effects" -> {
-           "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
-            "Droplines" -> {
-             "freeformCursorMode" -> True, 
-              "placement" -> {"x" -> "All", "y" -> "None"}}}}, 
-        "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> 
-        None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
-            (Identity[#]& )[
-             Part[#, 1]], 
-            (Identity[#]& )[
-             Part[#, 2]]}& ), "CopiedValueFunction" -> ({
-            (Identity[#]& )[
-             Part[#, 1]], 
-            (Identity[#]& )[
-             Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.4450844473569175`}, {0., 0.}},
-      PlotRangeClipping->True,
-      PlotRangePadding->{{
-         Scaled[0.02], 
-         Scaled[0.02]}, {
-         Scaled[0.05], 
-         Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {540.6709233829727, -63.642109874438596},
-      ImageScaled[{0.5, 0.5}], {202.9432527858332, 121.22306642750209}]}, {}},
+      Ticks->{Automatic, Automatic}], {480.3107512115565, -95.73828096823078},
+      ImageScaled[{0.5, 0.5}], {304.0001974648121, 182.35863041567768}]}, {}},
   
   ImageSize->{
     UpTo[600], 
-    UpTo[167]},
-  PlotRange->{{0, 649.6971680085468}, {-127.28421974887719`, 0}},
+    UpTo[223]},
+  PlotRange->{{0, 642.3475301018033}, {-191.47656193646156`, 0}},
   PlotRangePadding->{6, 5}]], "Output",
  CellChangeTimes->{3.826008397009801*^9, 3.826008507422884*^9, 
   3.826008595888225*^9, 3.826009193863812*^9, 3.826012726730015*^9, 
@@ -2777,9 +3619,301 @@ yPSzx2DL1Mpp84ax6qWq6JGgHXgpndYiu2AYeUuG9aWrj5v+Dzh1GNk=
   3.826195084074216*^9, 3.8266919241994867`*^9, 3.826692005003628*^9, 
   3.82669216257351*^9, 3.826692585000332*^9, 3.8267029526331244`*^9, 
   3.826705031912634*^9, 3.826705250545885*^9, 3.827311080287442*^9, 
-  3.827313808548408*^9, 3.827403919535881*^9},
- CellLabel->
-  "Out[119]=",ExpressionUUID->"c649f99a-b980-4714-acb5-e71ec36d8280"]
+  3.827313808548408*^9, 3.827403919535881*^9, 3.8274116119308653`*^9},
+ CellLabel->"Out[35]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJztnQe8VdWV/2+AB5a0mUn+k0mZGE0yGdNj2qRMYpoxiekxiUkkxgZGRbF3
+UQEFBBU7IGBDESkqCCJdAenw6L333vuZ9d1n/c7b93LuvY+Y/yeZcj+f9+Dt
+s8/aa6+99up73zPOubLZ+Zecc2Xzc8854bSW51zWrPm5V5zwvRYtranhWwqF
+hicUCoU9JxT4f2L/9V8ln5P4dUTz/9rWM8M/jZMdO3YkDz/8cHLJJZckl19+
+efLss88mhw4dahAe1yRPPvlk0qFDh+zttm3bWusFF1xQaJgsWLBAzYUTHNzh
+w4eT559/PmnZsmVy8cUXJ/fff3+ydevWFFzDZMKECbzswNO2p59+OuncuXP4
+6yR/Mn78+OT6669PLrroouSOO+5IFi1aVBCMbdu2BRjz5s3ztsbJnj17ku7d
+uyctWrQIs2BGmzdvFrilS5cmbdq0CeCuu+665LXXXjNAPDsuuemmm5IXXngh
+m+G6deuSBx54IICBKLfffnsyZcqUk3x0RmF0SNAg/K4JIPTxGTr4/JkI1saN
+GzNYDcPvJuF9PtEsw99G1IzwAwcOzAgffveJ1rRBcu+99xYaJTt37gxzufHG
+G5P+/funlGqSTJ48ORk5cmSG79SpU5NLL72UKRrk/fv3228WsXRhX3755eTa
+a69NVq9enezatSt56KGHkrvuukt8snz58uS5557LwBr6BsiWwDDp0aNH0rFj
+R/4C9IfCK8cnCxcuDFSZNm0a4yaDBw9OLrvsssCRfFhTQK5fv74g7B999NHk
+7rvvTrZv3x6eP/LII0nr1q0BW/iQ96H9iiuuCIu6b9++ZNasWcmf//znZPbs
+2Q7n+DAW7frceuutSbdu3cLMDh48mIwaNSpp1qxZsmbNmsKJTgHawbNPnz5J
++/btw/8PHDggkKUUqDA9B/mOQGie7d69Oyw2KPG3FiAiQfh77dq1yTXXXBOY
+QYtlmzWXGX5VwmQrVqzItpDxfyBROrG0zcgT8IMRPuKkZK+8+uqr2ZzAA1ir
+Vq3y7XtMYH5tO34gdfPmzcP/DX+tCvvmwQcfzEAxRaYyYsSITBKwqhdeeGG0
+Ug1ZgTDkhg0bfIUbJq+//noQMDb1rB+rx67nr0bexmryrgkq348NA69PnDgx
+/KV9iMByIWeYVsf3w/4eSyVJdExEbraccUm6HAOKlwN2gLPgWOEO6wBny5Yt
+Pn7DwD7M8Y033sjwFJuUzsf6RPNunPTq1SvIcX1cwgoMEs1FSIYCEu+JJ54o
+It+cOXPCcNWWg6HY3zG8oUOHBjLUwTsmkBBR2KVLl7DUkM/IGbjHZIOoeuRq
+VEdZU4tX5FgfHEl62223BSpoY/UrXpRx48YFfo3B2wwDKESAFhc9ArbskRO9
+DalGv5UrV2aLgqBEhMSLsnfv3kARUwB5iwJhhg8fXoTCY489FiReTETkNcMh
+gYxfgphHFjPDTLg2THr27BmaY3BsmyuvvDL8VeNYMUsEqquhwOI2k49UWItq
+mOatxXHeBrbIWmOZQt5CVNsdx3obxGXBkACacrXdUeO/0ajgYLJbi1A4uq3R
+JJg+jDVo0KBAMnYq0sJ2f8YY1bZFjcOC+bSa6CsEvplZgQZ/7T1xvLdpGxtt
+03Xom67Dv/tzt9HCX2qTIuEdjTd69OhMkWhtTDlkIuJExxhFwtz1wTCRImni
+lEVqDRgwoHhjpIKYaemTpziYIkttxlPhoxG3i0WEbteuXTMlIfK3atWqSMcJ
+NZayPPkr45WnIN7qbbAKuPHXt3LIHX43i5YjPD45NDTGtks6deoU5CemGJvR
+rLvGjtRLL70ULEjWiq3NZEEKIsiOwZK7+uqrMQgCGEz0du3aHePLgJy6+eab
+A0tGyyBzBvsRs4SRZM40dsiQEQFj4jFIXcwVE3diAhlmffv2Df+fPn16Zphp
+Am5WFm0GVtGML59Ao0A93oXRbVWOqQeGJ/qSQ7IxY8aEvloYLSh0Ywb0AXv2
+NoaM/V34dn0WquS5lqyMhyWi4SAY+TMbClfIhjzJH8uhgnA4VLCcYafNhjDD
+ZEKIfdgnCcQbbrghEAPjGJfjGH/G5G+55ZbwDCYwQZ45XcuWLQuCh2fwFV5S
+E0cDgiDg4V4mAncsWbLkJF+Sfv36BQ0EvWxJjq2AiUaD/eBmJla8FI2TxYsX
+h4nCTIyG7zZjxozv/AWrEH63z/ZR/bv/xeP83b64e++Buudn+IM9+w5kL371
+KIBdeOeQZNbijenzH4UHjRKMq9bdxyXtnngjWbNxZx68VPC9Mzl46HCybvOu
+pHbhhmTklOXJgNELkqcGz066vTAjebjvtOShvlOTR/pNS3q8VJs8O3ROMmjs
+4mTczFXJghWbkx27992XYnRSCtUGOJtfX8wZMLi6bCT7hwFHTV2RPPZibXLz
+o68l57Ue/I7k7FYDjR0vufvV5O6nJyT9Ry1I5izZmOw/cKhwdzztRgHq+W0G
+80IydMLS43IGq2/b8f/3br3f/dviki77VZ1HhGV/fNDMr+V0HeZdDxw8lEyb
+vz7pbkx7+T3DGwfeelvSouOw5PbHxib3PjvZWG9G8ozxc5/h85K+I+cnvYfN
+TZ4cPCvwesdeE5PrHxqdXNB2iHEk7zaCRUM7e2T7rn3twkjOkiEelLz0+qKA
+W/N2r7AzMjvs75uu//3f/XvgS9YdSWyckceXr3hXjAgT1smj/afTvZHLPHgN
+VoW3lq3Zluw7cNDN1FRcbtm+J8jnfqPmJ+2fmoDwa+hsec7tg0xcTkwmzVmD
+KG8b3ipiS/bClfel26bnwJmFz+bg97l6tp3yJt5VGADt9+f2QwM+L7228Os5
+XQd727ad+4I+annP8IImbHsyefD5qcm42lVQ+/85VNTY3GWbgoq64t4Rae+G
+ySUdXg1Us56F1jFtGmcDTpm7NuDS9LZByfK12z/zNybPs6/ODejYnNF9gTyh
+5yB/aeX6HUmXAdOTP93xsvlTKVHs/4Eo0+avY73f77DgnUUrtyQ9BtYm57UZ
+3MCJgihD1G3evqdwe0yUJhlGvInxACZteo7n79TC+K6D3rB1dxiVDmNrV/1n
+zoxe8jY4GonL4ELhmvtHJq+8sSTZtWd/5qfv3X8wGTZpmcn4kVk/hnh6yOxk
+p/VrlY8qH2jyR1s/sHlj1upiVLFieIChYRswD9UXvM1speT+56YUodrWpj9j
+wfpAAvm0h2wfT5i1ho2b9UPsDxm/BE4s3BKjekwRqnwgPhiZakr22az5fNux
+XbJ6a3jGj4mKb+Rg29/bTMkkT7w8CxmQYdHBxMNCW3J6nOz9kDpsF9sXWb/r
+HhyVzF++OfS4qTK2tkbZhu1nmpLPtyIOu/Px8eGZDf3NHGz7RjQbNnEZdMqw
+QBkLi0/5uiKvTC7AsOm+TNW9GcgHCzdGmIZRGjgeIyYvD53Pbf1yYE0+p/oz
+DAFt8BXrtufh+LyPbY+TVl1fzxbAKBYk6+Fs0zZONm3bI3YOP5gkRvEbYiIW
+QxeSUOCmR8aEt+AyPt+MnqEGeGam96k5YJ5zJE0qBKsF0U93/sVaNsIVvuhI
+2iZILmqXrhkbAwvHGPO68kg2dERYDk0N+5vPN/zZaDPZaWdpTCflIdnbEVi8
+amty7QOjMlDsorWbdv2HP96yY2/QZHqMs2IQry2PXyP//ZCJOd6AWAh9Pl/3
+Z+ylS83G4/nzI+blRXWecSLyKswsqYFaQf2y0l91JAFu/kXgQPpc3GEoOuaa
+6kjCI+fVeShFSL5ovE07W8p0YR6SvRyBjcbJt3Ubm1Gp/ZMToFK6HDVBVLS8
+d3jGBCY8C1eXR65GCIxJEWh+1yvoxfDwq/4MkYIdw3OTz0EoBShPO0ozF23I
+hAF65NWJS6HTqf4YWdEhWlcsbBM/V1bHCq6+ws0UfM0Yq6dMA4TtaM+Ny/OC
+QE9Ga4b0aOrrerUpGtMO3/HHbDNJX21DG/mK8vg1dhymzFuXSRE0Gp//8Gcb
+ttQpw/EzV+eFR55wYFg/sfTo/NxkXP/TnBboRLHbHd3HBj+iZTXkasKsYQ5t
+pUxdf9kxxIvn4S1dgg7Mw/Bxh4guhWqa7EBzawze6T4U4hApy2M2uLF64fLy
+GCqovHrDjkxgET7g8yV/ttTIKXrMXrLxuzlgevroyDW5/rAhkY8f+bOFK7Yk
+zYyng/Vk28L0QOGyCLMAUdHVXq+kLIVLuNdVsKIWMnzufnpC4Xs5yHSPeG2g
+O30irpHjx44PhCSaIU2/bvOuQovylBJmcAhmK68h5vl8wZ/V2u6TTjRdlYfc
+Y44cnI5xEHO67Z2fOnJEYECKR5d1GhaIdWl55GSdjp6WagC4fb2B4HOKPzsc
+qbcu/aeflgOmmyPHZr+vd90uMGENNX/uyLGfQEp7HkP1kurIgcCtrr3veWZS
+EXJjZ6zKELc1ykOuq4++c/f+sPe0AUZMXuZ5sZowZ2kYbNitO/cWLi6PmVxE
+jHDNFUeOz2f9GfaOpLh5L9/PAdNFdDF9IKWK8J06b13h1/5slW0wCWZ0Ixbz
+n8tjdryPjiehyYAJn8/4s8HjFmeKwsDlYfaoj26OU3Kp8zpY2IQLv/VnSEvt
+WWxF7JSLqmNmpM1UEUFHPp/2Z+wR7G2evTxucZBNAcojPiaqsbnLApxfMz0K
+v/NnWDiS1l1t+gjL5uXxeWsJNbAUtpr5wudT/uy5YXOzbW68fXoOGCW7MIwk
+pa6xtYSD/uBgkG5iE9PS9UAKM0YcQeSKzyf9GVEDuIRnr01f+YMcMA85UvCn
+aH3jw2OCu9zUwchccOV2REbsbd6PuIb6ERzm8wl/RpxXjGmCKQ+VBx0VXhUq
+SBM04B/9GQK3qzMsK2h9CxeWJ9LbfXRJGhzAQ154cLI/W20en2zA6QvW/zAH
+zAMR37D4AmVyovAnf8bWkR8E/5ucKFxQHTM2tJQpLkyMmbBu0yPo8zzM7vfR
+CXxoh6GE8KrP82e2cQOfaZMjF84vj9k7fHRsY00GEHw+5s9QtFpp83x+lAOm
+s48+Z+mmzBBu1e11Nq7TJZWlkljQzpbGsa6I2b4DBzN5iYLj82/+LOQ9jF5u
+WckbqlgMeVxcDBk+FD+Q1CfjRTabhNqIESNqcpC6z+fCBtIKYLEzz2aOVOxR
+9R0xv8IU3+lvYGPJc8Ml5fNRf0aIR8/WbNypKVYsC2x8RFEcadva2toGXh9I
+HRopw1GjRmVVRzFi9/o0MWkkd9kCZrm6KG8UTFfZJuYlnFttmjXFQaYekdX6
+YQcZO8XmEwS9VBMKgRqFKhM+XhqnyoK4Mk5BW4pivEKg0DAHn3vEkFt2ZUos
+qNDdUqEprtqR+IHmwPrmz53iP/gMVuWYvZrdmGmRN71jr8/u8ssvt2ckbKM6
+mrwyGqUXmJ0vbe7sOvkMcLkVByausSUzqmqC20ZbWIme6VY8p/zs/tFn0OuV
+OeEVLKI9+1IjWsUBmHiy4cyM/ZKDqValJY+GZD2FE3Bm7969qYZIOTMEtTt4
+LySTGARTe31mYjcKilakN/synk6YjSZB4lWrTvA1ngR2B+2EUmxLaxLVKpw0
+iTvvvDOUElAYQHkmlVN52+tu748jIn8f68X2vvtWxdvL3IA/ll+df/I3xtau
+ykIDqDk+J/gzFlwbefD4xakjW7k8SPzGClKxMGjQoNzJaG1Qie2eTHc3otG0
+hruy+bupabUZ1WRpbV4DdCYwPujTyoLnph9sfEWbylTaNPZZUww3f/58VEL4
+P/WWqsDNm2H7CB2MLhHZpF5BVX15O+rs8jN8l08AO1qhC7QAn3/1ZwSVZCyY
+O/MVn1yZwpTG/pgKJEqm0H0U+cCHw4YNy1Nm7X0g6f4gtGpXXe3NbCjZzbah
+Kszm3f6G/M+WUZz7A/5MjseNZuPZFH6WA6addzXjNcPH/O1rvTnbEUYv07+p
+EZ3xytGdXGgYWJ+2C7LzBA3DoQsh0yAHQc0zjpDjyvJRDgb9rRU11+/nOWDu
+cpRnL9mYSSxCYLD3tRGvKbCGwU9ZxO/jGR9X3xp+mQSUXdKVmp7+/fuH/x86
+dCiP4ZVkU/wXLljn3v/7/Bm5cVlymStfDOZOnwtKUS4QQWAyJtc7GHP1M/Pf
+vOGiKTYuVwiusmCKpvwISSGPwTUPXsUaZZBOvUINevJefzbXLFYxm3mRv8gB
+09YHwEOVJYrXhDWkSmsFSlh6s5F/VzyP6OBI+Hi5aH3n8c8+CF6uooVT560L
+D9+jOdo/SmU82GfqL3PAtPEBUDu4DYqHEdK7KeI78styV+G7s4on4zXI2cdr
+kMtOJmhwLQVpb1kkWPZ8ND0ybJKtxm5hCmEGrR0Y9iGBntQtH5wsW7vNU2+p
+9ysme2bonBKc3+QCiMiEipRm6eupsTgjfVXnkfJTfpUDprV3VTASm37GgvWt
+vFlyL/DQii2/LZ5CmZrX+k7hX3wQkh6le1pyjXSdaLt91768KdxRgis/Qycs
+vS1iH0kGsc9viudRplRUVeKIJapBKbDEKbM5ZUdljpxPTdHeRmBmNoLMIgxV
+xVf7j1pwZg6s270rXp003uODZmqusFbzOtYqmk9+raUMQiZDCSrPMQrLTUbC
+iMh4nTmwtmgepPyC3WtzsTnlzUOrgOmvqCXGCAJXvPf6jJWxoErDiblaXZKe
+ZKyCXQqdy9+hYkMxkhGTl/06B0wr0cIcBAkoDARiTpJIsbYjCIT1dGZ1zNDD
+mJO8Rj1XjJmwJvFt88/D7NZodCp05JwhVu50MERsFFQzPq+AlAwA7YzYDFcs
+Y+2mnZnGNwH+m7JI1YUf+THBKNvoBY/OoTNNH/2qGj7FRvRdT0RGdGm4zF3y
+PKRu8a7EssWfZvjIgMT0VwrJCBkjFeDIBsQ2iso2AmyFE4kDar62D3+bg8XN
+PqO1m3Zloh51wIGNDhGGAjNv2eZflqePzGwlG1tETq1i0tCOmgWeP9Bnylk5
+YKQ4sXdveHh0xnMYBx0dDEk/2nluvPiL6kgR8JaTSj1MjBSCIVKTZ2Vk1vGW
+2E+BT9Zs3OlRgdSpUOBqyPglFVD5oL8xzt3KODilDAw6Twv/5OBZv8sBIwNJ
+uoWfKXPX3uvNKqIM/Lxj78+r4VNTVILC2rD6occxJSN5fV4eUjd4VypntB/7
+DJ93nzfDz4qhPtR3agWk5F+z0QWIQmc+SoUScJCUenHMwt/ngLne50Z6XkEU
+ImXIwc4OJo63z1m66WflkfqQv0E2MYQW2tUl/pXe7jtifsb1xrp5SF3nSLHI
+IjjIIbgfcDBmacZS9qfVkcLoU96f2D4f1QTgDMjjNd/jD2WRapT0ds8fdW2O
+6oMRBKwXHg0au7gCPgr5TF+wPhYY4aHKOuSzMjtbijx85JxO9qrCVBEu13lY
+sTfiyozHn0T4BDg6xyEZHFe5qIzI1FFm9Ru2Z+dgcY0vFZJR3lQXT3UJlbgu
+1GRejEoJNCGFrBAxyXvzeYuPBIp3eSy3nWuVPMyu9v5ofyWLmSQlrzpgGdv9
+67fs+nF5zBRKfdmVI9p6o5d/RWsJtZav3d60LD6NQolkauoOgWpdvDl4Ud0y
+L6oeqLBakvumjA5HzbANzd1emPHHbMWv8g7jZ9bl/kwXdvNmWFDNxtdnlEfg
+I/5GnG4wm+KQN6tCzmu3/pgD4UrvilWide45cGZ3b1bZitsFPyqPinIV9nJm
+KZoqPeDNCEBZ4P1Gzj8nB8IVziZIB1xrGYL4D8JnTSRjp8xbVw98Yi1qLC98
+CNnQxCMzaMvjU5fIdDbp6c0yLonM2Er/sDwqylSJx7GezI3f582bo5ytSbw/
+5UBo6V2lh51hHvfmEgu8KirFLr6nSAt7HZokHhxt7Xn4KECNyhPXGD2e9GYZ
+qITnjQd+EOET4CipGAxrN0QGj1+8x5tjYZdllYoRuMzngUhRMkC8IiziykBj
+uRiLEmg6ZKTQ//mpSNnlzbGcu/vpCeeVxaeOKSCK8crT3qwgGoDNwjm9Giqp
+wr3RZSXhKmTrTocWl6WtXL8jDx8lRGQnOsP08uaiJNvA2gr4KDNNIFhrMnH2
+mh3ejEJRwMMAnZ8D4VLviiaRB21b6llvnuqTYVcbP3y/PCof9zcUYWZtbXdv
+92bpg2ZpiWMeKkp9QVy5Qwho45SC8GGxlY8xoV0PfJAwLZzPbP23eTPWlvSw
+MXd4LwC4xDvI/MLaMaP6OW+e6fVe2Npm2p9WHgFVWsSLbJpgqzf38DDb1WmZ
+zwU5EC72rhT9anWHTVrWJ6KF6PSoqrtyUVH9ifQFlrONudmb44C4LfiFORCU
+dIVs2rVYRDD+8w6GYLkY30TP96rjsyUKLZspvMkHif0H+cN5SF0U9VdIC8VG
+QUU/70+Vc3ASnp9aqICRyoYUe4PfzT7Z6M3xiRSjVrOyyDQKBw7EILbc/b2Z
+ghAZPiYVvhuhEuB8KpqLcCYCjOhf7zDS7TxC27l5DhbNvSsVXoqT9R+1QKcp
+lNu//7kphRiFEigq6sJYlbU/eNxi4SFB7O5b6nxVqemoOaKmo9y1TXlpnWYO
+A6Uht6+t5/BecKzi8IQt3XfKT0/VdKoURcmZVbvWm9HX4koTW7/w6VWs52hy
+RD1HtQuJyk+zLgSPW2iCWcd2FH+799lJharTS+Uo1kPsAKzxEThrSTvawdgq
+WGpHUcehCGl8pU+THFQu9OFUPsOP/X+gN6O21Gwm17fLz0mlmfC14lOjp61Y
+HTVLgtlePSOdTr0LN+Ryl9yHkxekv8C7Bn3ZLtOXL3vXTi6GzHrzmxHqkf6s
+qfeVZnlM8znHqLdXPKLFt+7cu9JBI1BUOysuUAqtWumHljS+m6YuYXSuj4C5
+IpHF5jSDvfCyIxWfnbLV/lZMkrfXNz8a/o72U323kyiDyyIzyCTfSm9WnD2E
+gTfsUD6uWimJ0jnxRTF5KdrzfRidLmGYpWu2DfGuypKZTi4UkaVsTrW+m04F
+1nOivKkZIcu9Oa6u6fXKnDN9pSsVmqhsK76gJa+w6TwfYlEUtDMJqrO28XY3
+HXhq8azLJAAVo6vH3vy8d5WTi0e7c/f+Zd7MyRf5PWYV6prHKqUole4+yVt2
+7QrIrGBOqIwxVTXU+6sI55F+0wolVKiSus3fiWJ0xmzpRwge7jttqTfHoU9j
++l/7UFXKVMrcNJJH+HN9IPmmVF5s2bH31RJGRHBv2LL7m/VadxU3VdtmOogR
+B1/NBVvsyxCfwwmx6EQ+TzGYPzkY857iWI2uL4j9DmOvkimUSfzWd9t80QeR
+S8DuNBt2kTdPjoxPEyAtciCc411jL87QHOHN8uKwCM3B/UYx9hXTvUe/ATQb
+mFHnWYzRF3pzXCxsRuxlORCy4vLDdWFt4jg4gpoSCyIf+dmhc4qmVCnje1R8
+reNQcvr4mTZ/3QJv5hi7zLQdu/eVn0qdqck2NGNF999RgKqAhK14ehA61wDS
+sTGFu3DC7I153hwnQYdPWnZ5DoSm3hWVLGlglvxob8ZalLwaMHpBPVDBs1Yq
+pEv/6ULFrNMs4GOmQR4qZ/syBXPek1OhSslk5BgHI0+MYg6zKL5eHh+d+YsT
+i7ZKc7x5RpQ+MIcsBOsCgLO9g7YdG8c20GvejLclV3fw+MUVEPiKv8EFPdI7
+xg+zvDnOp5jdfUUOBB03mRLlKEwSjfVmZZqJYxhaX4tQCXC+4vSMV4TTZQi7
+mQ5DqSZksyGXh8XvvSvFCSqe6zpg+jhvJvUqk9dWJ8aiBJBOicYyeVztqlpv
+jk8ejpm24socCDoZhAiQtoQ7OXI+3sGo3AKX2Bjtq+Xx+Zq/oXOmBKE2b98z
+XYMkdT53a696L49UI7gh02cLV255w5spfVa8dMKsNVXxSWPpcmdRUgw8zaHF
+1qkZS1flgDnLuxK/kbNvW3eid+XOKJpMbxUqIKNT0Fhncq2GTVo2NZpVVsHx
+6tyrcyDoWFkc7sXlwDuf6GA4QCgPzTz1r5TH5z/9DdW8QtK1m3ZN8Wbt1pZp
+rUt5fOpCkTjzNv5k7+rXSRC/KlTFI3WjVYuHBcGsJvkIZKcVmTOj45ocML/x
+rrEYGlu7akoEQcp9/WY/jZ+Lzzf8DXaPgjLmW4jAcUjaRPC1ORB+7V0JcCjb
+Y2biNO+qMgojW6ECHrofQcW+QaWt3TbBm7U5PPEX8AgAznR6xtE6DAEO5ojp
+FScgEm+M9+UIiwDjm4JRahkcqBML8Un/QWMXXZczhTO9q+oQmqaxuunejEMr
+VfjSawtjLEoAnRqNqXqXxwfNHBdNVXkczxsX8vD5lYNZFS1t3xHzJS+5r0A6
+38T/l8rjo0tAlMtyK1Z6ROcPmK9t9+tzIPzSUUf7iZ2oCQN14UOJmazM16av
+rICPrlDpWuwYSMUSTVaxZq9XZt9QFp9GocQmtZSGsE+kW3XMk4zkYZ0Xr4BK
+TdBiCgbIL5PNoZss0NZmm+Th8wvvWhuZhEaD2d6M6pRqM+1XAZ/v+BvxoRjT
+8zLHdKjMAd2YA0Fns6GiTrVz5RBaZI73V9Fch6cmFCogo4t5FKtAm5iZOtKb
+Y7vCjJybciD8zJGB5Tt5aAMRzcHHuQ6GoxSR//+FavikoaU2PfM9ANUHXJJ6
+S+WRahTuMBLfz1u2eb53VTTcplSogMz3HErsXJkWGu7NiuyfHcIsa27OgfBT
+78r+lpVu+1t+hFQDVLfF/HyESoBzmveLfVP7v9xrrAiVeHV+bvItOQj8xOkZ
+72rcWXa1sECmCoxZETEWJdC+72/I3kXymQMy1JsVZwmByB17b8nm8RPvULSX
+t+ySnysxh5VriJ1SDYHUf1AJB0KKc+xDHBrpgKZ1keJbc8D8uIT+QTXPWLXY
+m3Fglbd/Y9bqCvicHq+vqx6b5GBHE3mpvE1Hzxbn4XOGg+Esu0yuh/pOXepd
+Zc6YaVWogMwPHEpc/21+hSKyyoEjd22gVjkQdH1HqfGNplZMiYoUQTdJ8bny
++PzQ35AOcG5RDiD2rY3Kt5XFp9iJNrG53LtyN6m7KoWqeOQzzYs+AuXKEnQm
+Sm+vMJ1YbpuZsaKEl1Djtpc/Wx4fzaqEaYSKykNDMGj3/jxUfuAzQjyXhhqF
+T7yrTbpXwEfcV8I3A7w5TmNPX7D+jgqcp+vd4OGtO/eu8mbtbwhs+/szESoB
+jrajGMVVfT9vRs1pVzz2Ym3rHAROz5nCjIXrlSWKN7TJzxiBXMlQzCuYGOif
+5/1ZfGKSszKUE+chJWkZ13D1eiU9OhDt6jY9xhUqYCQJDhQlJ6EzskQFAdkJ
+J/uZu3RTmxwwutUIV02KAOeGTbA2QlTUM9fy0+WRkl5TyQs/5haoVoLT28LV
+OLttttJSaJJF56cu3nofQnnOx16cUagwurS7isXYjaaMn/Up4hDpNAPFUhQf
+tc0BI/Uea1fTAhu8WRsavW37MM3T1yOpd9wRSb2juMRA1hT2jy5lw87hhPgz
+jpjqa0HMZMidOWBk1nGvgxbClLaqGg7Hfs7ri4qm9rajSs755QWF+t5eINOV
+01o6k4v7CRuqKovgkXzrkVOW35UD5jsOBrNGLnooXbVtusnBqPAIm94m/Ml4
+kmVTbfW9p0DeADVxMuyMqZ9yvIKj7Za54nHl51EXn2I/mJuv+hyoJLfQ2LFk
+CmXyJ/EUKl1GIAdL1zHxM2baiid8CqkLO6HInm+XA0aeXqwmTAxv9a7yQ+55
+ZlKhBP8yGa8mjkDlawe0AKIcMmDRyi0qvVTglLiWGYRX+pBH8VVsb+Ywsrxx
+Yl+KDphyUwlaHPox3+IT9VpWkaW+FxnomqxQVOf3sMCSnCjt4YjEGYEXxiy8
+yjGoWPDSMC54yb5s7ihOMJ8aISYxrWo/UQjmU0m6SfkSCpXJutX3VgTFo7Ar
+JINQiZQvPObPQkLVk1WqN7o0Zb5618rU9/inYkkK22ITmpesWk5Vi2MPGs0+
+XkyLKjm8o71PQVeYcbuMLCaKB7EsdSkbi6NQKs4EV8K1SGlT78IblS9Uo41i
+jnFcy6wdldwS05F+sy5FtKmcDDyKuxgUyOUIgxzL3sPmdvVm6Rke1S7aoLh0
+fUts8s9kKzZPzFe2oynw3f6SbMc7Hx/v9a65hpLi4SpNdNmswx2k5xX4f3HM
+QgWxq9XB1HftFEdnkXQxGmVp2GO7HQX4TJit3rjz5GpzSblPuVDiJvOXb84u
+dKOsVPFtnT681nGuVOZS35369QiHB/pMyYIdJue9TL9hOJJBu+3mQoXpnOWg
+kIJKQYXbyrbsyu5fw7pRbJ7IJW74dc6/FYtX6n9UW3ym4H3T1NLQGQidhEGJ
+mXz+9/LzUd4Ok0UhDxadklydSBPXIuDMv7jep1KxHKX+B7WV6+OYjpRav5Hz
+93szxJQXOXrqigpT+b0PzKEWBanRoPCtTvzFRtO42lX35YD5qoMhqKOyq3AK
+3pjygPdXFNts2EKMUYD0BwfAHW+yMfE70UU6o0lkVc/MFOqcg4dyxLEhgGrj
+Sq2DDoYqApncZhR8rDxxlMGnskSyA28OC1fXW8W14vAvwcbymNXZcGxnG/2w
+d1WuiChtBYyaOhTVDbg06yj2MYdXBTyXuid1fw4YFRPoKjD3PhJv1s3l8K7t
+w38rj48qP1Qk4ipLdzExuwc93cDK2YQLD+SAUbEFqx9dfBAevsWf4SWq7Mvc
+76pISXrOyGxj02nZXUN9Pe8KI0yas+bBHDBfcjCcjRJPt/VbDEIPHYzUTZUY
+dod1Y14uZudE7Kki2vP8jqq7HNrY6HzVoLGLwlWZAcoX/WUi4fIDMek4B5uk
+vVIIW6P0jGmMCvjoGkkiQDpuiIlhOy27bSa+tpRYOMz/UA6sL0RUV2zs/FT4
+pehJySic1KX/9EIF3FRiyNXgyrejNEyLFnQRS+lVjizNw2Vxa1R0a7KuuWrs
+z+IQiDH9R8pjpisuuYdHhT14G2s37fQrPNJ7uGQHUPyAR/lIDixVc7LlJJTY
+THxUFBpz/qsTl8aYBWDnR4yqSAfhR9RrfOuF1CsU41LoR3PwOcX7Y6vofH44
+AlN6ul11KeEeLV0umEuuCxwkB2Q1DWQyztkt/owNoZIqmM30mt8+XAzrc94f
+40dld+kVSAdT9HQjAGks2a+LV22tgN6FES/pCBVKHdmZ3UZkK6BQNZJk8ty1
+7iEUw/qs98ejUuCRlcBrCD30HT/a/AT/KuCmEyFoZ9l6cNO2nfv87oB0vynE
+6Dav33ddDCs+MKFaUfZ6tj91t6/inCy/TeSk8ug1j5hF2xDbDdLpYi1VZPEz
+dMLSx3LAfDqaibJtyK/s6+V0NweoS9eap1gBMx2aImQls4bYGFtCR+V1wIef
+AaMXdC+LWaPwZUARfcPDd3h/BWYxaypgpLNl0EraBHZbtWFHdjg91uqkDxG1
+Aa0ASqe34rg/iPHRDa6hAKlVlrA6sTw+F/uY3L0k5581XLpmW3aZYDySRH+P
+HFif9P4EM6V41D/0+Ad/SXzH90FVwE1nJNnEErCwKu6PrnLkOKs2OPeaYCj2
+zIH1Ce9P+EfhRV3+FnroPk5Fxhlo7/6DH4rQCxAvdUCEO3U0HN1tbnB2FFjJ
+H34os2CQx3OQ+rj3p6at9F7b0EOXLcHx2vhmV8VIlYBs4SCpZJMqDwb7zFUF
+of5SpP5YH2j2RA6sk70/JfVyIzBuMkvj3f6S7r2k+K4Cbil5GgfnWIeYxb3G
+Ixf5Y/a/DqTygwtlbU/mQNQR5WKhPRLTJ8VQt6FxuE/wjNonlEfycscC30lS
+iB/kvrU1i5BUap8fDiRZ21M5ED8WsbG2mBRf6PEef0lFXrjRFTBsGaGgGpbg
+r3Ufh5UkPYuyUv0gPy+MWejf7FIMTufwMRdVKwQtkZGhh65qU/02gtQo8cHy
+GEpwEMHSZkOXcvOPrCZsTR0L4mfI+CWe7SmG9VHvj4Ol7CRbwZgyRU+XlbFg
+2kRvzFpdAb2rHCQxafE1IY05SzdlpjCWhaxr5IvJZD+XXQzrI94f81ToQaBM
+nb7fX1IgwBi/UAG3q31xkeCCx8/wSctY8KY+HDezieGJWZrd6N99VAxO3wWM
+TShwSDY8sNBDd2GhIeUI2dj/Wh7DaxxDEvEqmOAHB88Elzx4DnIo04+5B0FC
+/DxA07f/YtHIGIRsZqPFV+o2zNbABEIhRipAudZRQTzGBgY1AOa7nOWP2Sjm
+QmUaEbloRnufnMnpC6JREzJlsNxQz6GHblga7lVWPDT5+YHy9FLIB8dCNgib
+gnuZDDMdUMIy19fkBHL2mYqL93wOxA85khyVV8Aa/WiWdYqkLjdiiRQpmbFw
+fQUkb3AskFHyDyT1TAv+yh9jJShHEVbF3OfD+tb4YognOJLkyOQ3otsy5aHv
+pVe2zLR3oQKGN0ZrrYu/JVfMxPlFNtyaLDoObUwEZV9YF4P7oPdnHWU/4NUT
+b1QUbunSpSG5QyydUCpfhC3nmti5h02J1un8arNmzUqWqewXfyt9QmJNXyqv
+9ASvgK1hUDipfmCOzOPVhEw13/KtYD8TKP1C8XqnBdPvdQcM4DhQ1KNHD3Jl
++gJF0gvKGgZiF9Jz8HyOvPI4n7wfdlhHZiCbxBnIIvLPnDmzkNK/cdKxY4iB
+ZdfoYoaapfb+8nx1s0+O0yjKW/IWRonx2k/8MdEWHbWUt2mO/oAciB/wV/DX
+Y04lp2S7POWuJiF7RfiXafAV97NmzQqUnT17dkHn7ClFoF0fFozMH8fRGvjB
+YNKQRSzXgO9TJ5O+c2eI+HN8tn///gpTkTkbOXKkODdkbchKrFwZZlFbW0s2
+5MSqkI4/4hYA4vLKzXFcmUA8MzI2dMFaJc96JEhAwfCAgmPhMdJa3bp1c5D/
+FNoJmCuHA8H4+7B/10pp/UYlwmt3lMntiobxuuzdu7cBfFc4NkyInvwcPJje
+3QgOSg68PG6x34N51PeEK2rGieDOnRWSP5L5bvEJIMhlT7pbigo+wx+j3+RS
+yQ0wFn8hB+L7/RWUiYojZJbbBlFmjDOfyBKjUjYBW6UgslIAaRsnKmHhtWvX
+ZrtdksMYKHuXEghWKZ4o0oRKG1KuDcLvFNUWLVqwSi5xq8MTMXv16gXzhb/U
+79FHHw1VGdl28jwawk+fOOMtWIhjlz4ZLHJvN9+cShipO3hDi1pf2olOca5O
+UUHgIbtRIcaKuiuwJBj9vpjr3npU5U7GhZIRCHzmSJ7Xdldehc2tjhybj0Mz
+Mj8QqZhoHF45XZvMLHbCJsqpIH7Ncn8pB+z7fN2oH1WFJyAxy1UDUW4FkFp1
+FGtI2URQX2SptSoQA91NfDOu+QCHumqTJsmmTZtCChIK8IkV9Yn1hCWOadeu
+XUXuO8HbquWmhdvYsWODrDQ5FqQPEhuR0rt374yD8rivGt3yuE/hX8R8165d
+Q4WOST9ZR7gbsqrMyyrivrJ1aDUOGd3OjsbI4QfZ7Lse5szjutscMm6+Mssy
+Dmcu2nCaPyaHEX8rLGciTFAOzIH4Xmc47gVWMQIOwdxlm7IbInr27Bn0V0w4
+tjLMVUekhsno0aPD9rYdlTHJuHHjwoTid6n8AgeqbWocZUon7rvvvlJmOzow
+TUL5JYlkJCg8AI9AV2piJDWrVW8IJfYPfOb2WShUs2WsxGLVKJXHYgrhwyEI
+Q56ZWhZmHbPQeW2hhL/KVJMJf6Q+PK+Pq9S84gcVoqPEiTQ2v6vuy6MpB/LL
+Pr34rUlI96hQQxJNX+s7KAf+exwlrMs4VoOjZF640gTVdqgkINJDFZxa1fpJ
+o9QfYAwMkhxGqy8YQKC2zHAMTMJmNgYSmPrKMtNkQXaBDbIM0xK5iyn515Zl
+2s7YfPC7afrMzVOFJy7lvv0H31vMaGWqOUULJsHAZtMdwWjBYbndZ0ssWblS
+fvCXUZY4o98QC9r6EDK4uMPQjAXJyG1JvwsyvYQocNc/+/Ac2ohtPBjM/I+3
+OkD2H6IjNjoQ5TI6xFRsd8gSM5UMLO4p0btIORlY8qDph/GEtV+qJqvB0H5k
+N+PEgudHnWCVCpv0nom2YNfErIAc6d69e/irmkFWiTZ5bKTNSh+pcPkLBC0U
+aXxt+soSNiojr0REfB+uwYE/nYVyK7XaOnE4oxcHaVBb1DpRy/M1H5ITnXEf
+kqjG66/kgH23v4K1BlOWWGtv91HlVfXt2zf8n9iDvCoVIKIG0Dw4Nnj/LKuR
+VU4XMqNTp06htguOwS8ys162BnqIx85IVd6Sm41PBruwJFyvw9jgQGl17JRW
+uBWJZpQnwohF4G80l3FgFjBk5DFjxiQLFy4s4abKpNH7ecVret+4mvuvkiVL
+lgT0kMXIVtstmWuk73DhZE0Je5UpHZYDgTocMGBAJTWo4xa8zbmbyzoNy2QQ
+AVCOlnOa4cuOMPU7sfNJuDMY//sPZtdCxfDf5ZgSkI/tM9zNLdv36Asbly1b
+FnYc3gurTMCoib/ar1+/pFWrVoGuLCXBIlM2VYJnYi0pvxLWKvOWxsRgQuUi
+ZQihESzI4mFla/z0NqabgnN+1xvAxRAwGazN22KoYyoQQhH1vNJBDQnvswfZ
+DwyLchoyZIjuu48LU9dv3vUvxWxUpupabISyw9dt3759OTbSUQqsHSqITTBl
+bEQ+nwMMVHB8PmIjpYqVhyEgTZx7WA78f/T3UKc6VyflPTqNtqeh51P8ZZXi
+kxormm1+HbU0InsU0pYTxB28jfIP6mOaRVYjuHBmmOzap70fgUIMjdsfG2t/
+1al21oMew3PGeKe3cdyWJOD5bQZnY1BBQ/wn0Xw/751JzHPWnny0zzcvJNrR
+24j4UCrVouOwDC+qOUnrsd1P9n5kDrln25RIhkNTz8dTRzAqZ4y3R/iX8gJZ
+SArPM/wrfOPFPd6GdqJA1ZbUcW0UcnocnCdPcqjOQWFIcplcW6lpUeRCVzKU
+Y3KGkdFEWpBUb/N2dUtKNvLViUvrSgkqfMuLSkLJ32GPwRpCFz3dpf/0UIFg
+pNd3rzAk3Euy1AxDYUxghwALNuLrOSOJWdlsQDRZms2WKjUSYpz+CL0rfI+Q
+CpnJT7HwMKbJ8xRU42AN4K2gfxgGz9/2WSrR01oeTkZSzQh9r75/pMFK5wvd
+CCJip1q/cTmD18RgNu8K50KcDtlkOO4IfeDI8NZvoskEcPrKCeoOwJGMkw1e
+EwAcG+hO7pzwPuyOy4/oYUDKKCiPaOQ0ZavSxrFRiq7py/YjfgoM296FGp8f
+cSpKBDhyYO9NcBDMj9cJZXF3JIkH7mzgKAwVKRe1G5qRCNQo6qLfYSfKWeXX
+qktELoQH/EHNfst7h5uXk4IkaoZ/QW7WNumxobkm7FdKyrjVEGpuMBk7JRrC
+ZalJ1xQMpZh8VREiRd8Q8ofymKXlQk1CqTz0ADMmhoYHFPspReWYgAqJUtrx
+8iEMBILexu2TUpAXUCxuv95VflBdMQ9+lA/AiEb1BiEXnZ5FJ81O6t7WZ14O
+hONz2o57E21vBt7f6t3/bbi49ZzHUOF3+/+Gc/qfsjZ/T7j8JXzyuZy2U+rZ
+7820VThK8j8C1/C72V/jxbrH/3/H+eu/WNfu3ZPiz0n/1xq3Ft7yX2xJ3fY=
+\
+\>", "ImageResolution" -> \
+96.],ExpressionUUID->"cadeaac6-1a22-4e8e-b41a-a387ed7b1836"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -2802,12 +3936,10 @@ Cell[BoxData[
                RowBox[{
                 RowBox[{"eqLowRHS", "[", "F3", "]"}], "[", "#", "]"}], ",", 
                RowBox[{
-                RowBox[{"eqLowLHS", "[", 
-                 RowBox[{"t3", ",", "h3"}], "]"}], "[", "#", "]"}]}], "}"}]}],
-             "&"}], "/@", 
-           RowBox[{"Range", "[", "11", "]"}]}], "]"}], "/.", 
-         RowBox[{"rules", "[", 
-          RowBox[{"t3", ",", "h3"}], "]"}]}], "/.", "sol3"}], "]"}], ",", 
+                RowBox[{"eqLowLHS", "[", "h3", "]"}], "[", "#", "]"}]}], 
+              "}"}]}], "&"}], "/@", 
+           RowBox[{"Range", "[", "8", "]"}]}], "]"}], "/.", 
+         RowBox[{"rules", "[", "h3", "]"}]}], "/.", "sol3"}], "]"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"ListLogPlot", "[", 
@@ -2824,46 +3956,39 @@ Cell[BoxData[
                RowBox[{
                 RowBox[{"eqHighRHS", "[", "F3", "]"}], "[", "#", "]"}], ",", 
                RowBox[{
-                RowBox[{"eqHighLHS", "[", 
-                 RowBox[{"t3", ",", "h3"}], "]"}], "[", "#", "]"}]}], "}"}]}],
-             "&"}], "/@", 
+                RowBox[{"eqHighLHS", "[", "h3", "]"}], "[", "#", "]"}]}], 
+              "}"}]}], "&"}], "/@", 
            RowBox[{"Range", "[", "11", "]"}]}], "]"}], "/.", 
-         RowBox[{"rules", "[", 
-          RowBox[{"t3", ",", "h3"}], "]"}]}], "/.", "sol3"}], "]"}], ",", 
+         RowBox[{"rules", "[", "h3", "]"}]}], "/.", "sol3"}], "]"}], ",", 
       RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], 
    "\[IndentingNewLine]", "}"}], "]"}]], "Input",
  CellChangeTimes->CompressedData["
-1:eJxTTMoPSmViYGAQBmIQLbPxx/WuxjeOGUxPnoPoDUesmR4BaRaD7SwgOvYw
+1:eJxTTMoPSmViYGAQAWIQLbPxx/WuxjeOGUxPnoPoDUesmR4BaRaD7SwgOvYw
 Hx+INmLdyQ+iq4rmi4LoIrszYiC6xH1iAYjukL4KplUubQx6DKQvaOkEg+ii
 b8odIFpE7iqYPtLZNB9ELzrRBabZrDpdrja9cbz16bkbiG6dkRkOopdcLQHT
 z9hXV4DoqVfOVoLoCr7qOSD6D+eGuSD60VfjVSB68eRIMB03dc1GEK2z5vdm
 sLqOvIZrQLqopqsbRLf+3tsPomfzHwLTx7ynB90B0is+ygaDaC0voN9b3jiW
-Jed7gGi5lDBmViDdb94PpgHa+agZ
+Jed7gGi5lDBmViDdb94Ppt09r90yBdLXSnLugGgApsWwuA==
   "],
- CellLabel->
-  "In[156]:=",ExpressionUUID->"d85908e0-a479-4a49-999f-e6e49522af2d"],
+ CellLabel->"In[48]:=",ExpressionUUID->"d85908e0-a479-4a49-999f-e6e49522af2d"],
 
 Cell[BoxData[
  GraphicsBox[{{}, {InsetBox[
      GraphicsBox[{{}, {
         {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.3386332014722349`}, {3., 2.8939882640121604`}, {4., 
-          3.206047941862596}, {5., 2.9118230865747363`}, {6., 
-          3.5392728354467016`}, {7., 6.7132340753318545`}, {8., 
-          10.29748189304271}, {9., 14.03792646673528}, {10., 
-          17.91190835569147}, {11., 21.903673280482636`}}]}, 
+         PointBox[{{3., 1.0649064080577708`}, {4., 1.1173147960493124`}, {5., 
+          0.2238626347339854}, {6., 0.5312547845461176}, {7., 
+          3.2610544797642897`}, {8., 6.271896205427803}}]}, 
         {RGBColor[0.880722, 0.611041, 0.142051], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.338633201472238}, {3., 2.893988264012164}, {4., 
-          3.2060479418626113`}, {5., 2.9118230865749792`}, {6., 
-          3.5392728354465324`}, {7., 6.713234075332}, {8., 
-          10.297481893042754`}, {9., 14.182402881518504`}, {10., 
-          17.048288857042387`}, {11., 21.78793855742182}}]}}, {{}, {}}},
+         PointBox[{{3., 1.064906408057768}, {4., 1.1173147960493146`}, {5., 
+          0.22386263473472404`}, {6., 0.5312547845480837}, {7., 
+          3.261054479764651}, {8., 6.131787166598187}}]}}, {{}, {}}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
-      AxesOrigin->{1.8125000000000004`, -0.2706978919270261},
+      AxesOrigin->{2.895833333333334, -0.2494303149439657},
       DisplayFunction->Identity,
       Frame->{{False, False}, {False, False}},
       FrameLabel->{{None, None}, {None, None}},
@@ -2874,8 +3999,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{11.393973214285722`, 0.37499999999994316`}, {
-       8.910519826327231, 0.375}},
+      ImagePadding->{{14.701690051020393`, 0.5000000000001137}, {
+       11.626653019891705`, 0.4999999999999858}},
       Method->{
        "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, 
         "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
@@ -2887,8 +4012,8 @@ Cell[BoxData[
              Part[#, 1]], 
             Exp[
              Part[#, 2]]}& )}},
-      PlotRange->{{1.8125000000000004`, 11.}, {-0.2706978919270261, 
-       21.903673280482636`}},
+      PlotRange->{{2.895833333333334, 8.}, {-0.2494303149439657, 
+       6.271896205427803}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
@@ -2896,64 +4021,116 @@ Cell[BoxData[
          Scaled[0.02], 
          Scaled[0.05]}},
       Ticks->FrontEndValueCache[{Automatic, 
-         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{4.605170185988092, 
-           FormBox["100", TraditionalForm], {0.01, 0.}}, {11.512925464970229`, 
+         Charting`ScaledTicks[{Log, Exp}]}, {Automatic, {{0., 
+           FormBox["1", TraditionalForm], {0.01, 0.}}, {1.6094379124341003`, 
+           FormBox["5", TraditionalForm], {0.01, 0.}}, {2.302585092994046, 
+           FormBox["10", TraditionalForm], {0.01, 0.}}, {3.912023005428146, 
+           FormBox["50", TraditionalForm], {0.01, 0.}}, {4.605170185988092, 
+           FormBox["100", TraditionalForm], {0.01, 0.}}, {6.214608098422191, 
+           FormBox["500", TraditionalForm], {0.01, 0.}}, {-0.6931471805599453, 
            FormBox[
-            
-            TemplateBox[{"10", "5"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {
-          18.420680743952367`, 
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {-0.5108256237659907, 
            FormBox[
-            
-            TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-2.3025850929940455`, 
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {-0.35667494393873245`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {0., 
+           0.}}, {-0.2231435513142097, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {2.302585092994046, 
+           0.}}, {-0.10536051565782628`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {6.907755278982137, 
+           0.}}, {0.6931471805599453, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {9.210340371976184, 
+           0.}}, {1.0986122886681098`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {13.815510557964274`, 
+           0.}}, {1.3862943611198906`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {16.11809565095832, 
+           0.}}, {1.791759469228055, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {20.72326583694641, 
+           0.}}, {1.9459101490553132`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {23.025850929940457`, 
+           0.}}, {2.0794415416798357`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {25.328436022934504`, 
+           0.}}, {2.1972245773362196`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {2.995732273553991, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {3.4011973816621555`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {3.6888794541139363`, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.0943445622221, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.248495242049359, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.382026634673881, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {4.499809670330265, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {5.298317366548036, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {5.703782474656201, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {5.991464547107982, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.396929655216146, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.551080335043404, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.684611727667927, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {6.802394763324311, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}}}]], {141.93021389675732, -87.31932644622096}, 
-     ImageScaled[{0.5, 0.5}], {265.86018760775926, 166.3225265642304}], 
+           0.}}, {6.907755278982137, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 0.}}, 
+          {7.313220387090301, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}, {7.600902459542082, 
+           FormBox[
+            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
+           0.}}}}]], {157.30526990857518, -97.02128328364161}, 
+     ImageScaled[{0.5, 0.5}], {294.5969894570861, 184.80244434979355}], 
     InsetBox[
      GraphicsBox[{{}, {
         {RGBColor[0.368417, 0.506779, 0.709798], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.3479721300955767`}, {3., -44.84387434429729}, {6., 
-          10.37776133445378}, {10., 24.234845682087865`}, {
-          11., -33.060372274778224`}}]}, 
+         PointBox[{{2., 1.3479721300955765`}, {5., -41.41784828549032}, {6., 
+          10.948863622571741`}, {7., -38.77879095587507}, {10., 
+          24.9086485092741}, {11., -29.841985580749498`}}]}, 
         {RGBColor[0.880722, 0.611041, 0.142051], PointSize[
          0.012833333333333334`], AbsoluteThickness[1.6], 
-         PointBox[{{2., 1.3479721300955767`}, {6., 10.37776133445378}, {10., 
-          24.286545803156915`}}]}}, {{}, {}}},
+         PointBox[{{2., 1.3479721300955767`}, {6., 10.948863622571741`}, {10.,
+           24.90854286796568}}]}}, {{}, {}}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
-      AxesOrigin->{1.8125000000000004`, -50.25372203803475},
+      AxesOrigin->{1.8125000000000004`, -46.60827306453103},
       DisplayFunction->Identity,
       Frame->{{False, False}, {False, False}},
       FrameLabel->{{None, None}, {None, None}},
@@ -2964,8 +4141,8 @@ Cell[BoxData[
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{19.68080357142857, 0.37499999999994316`}, {
-       8.910519826327231, 0.375}},
+      ImagePadding->{{25.91422193877551, 0.5}, {11.626653019891705`, 
+       0.4999999999999858}},
       Method->{
        "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True, 
         "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
@@ -2977,8 +4154,8 @@ Cell[BoxData[
              Part[#, 1]], 
             Exp[
              Part[#, 2]]}& )}},
-      PlotRange->{{1.8125000000000004`, 11.}, {-50.25372203803475, 
-       24.286545803156915`}},
+      PlotRange->{{1.8125000000000004`, 11.}, {-46.60827306453103, 
+       24.9086485092741}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
@@ -2987,34 +4164,21 @@ Cell[BoxData[
          Scaled[0.05]}},
       Ticks->FrontEndValueCache[{Automatic, 
          Charting`ScaledTicks[{Log, Exp}]}, {
-        Automatic, {{-50.65687204586901, 
+        Automatic, {{-46.051701859880914`, 
            FormBox[
             TemplateBox[{"10", 
-              RowBox[{"-", "22"}]}, "Superscript", SyntaxForm -> 
+              RowBox[{"-", "20"}]}, "Superscript", SyntaxForm -> 
              SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-27.631021115928547`, 
+           0.}}, {-23.025850929940457`, 
            FormBox[
             TemplateBox[{"10", 
-              RowBox[{"-", "12"}]}, "Superscript", SyntaxForm -> 
-             SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-4.605170185988091, 
-           FormBox[
-            TagBox[
-             InterpretationBox[
-              StyleBox["\"0.01\"", ShowStringCharacters -> False], 0.01, 
-              AutoDelete -> True], NumberForm[#, {
-               DirectedInfinity[1], 2}]& ], TraditionalForm], {0.01, 0.}}, {
-          18.420680743952367`, 
+              RowBox[{"-", "10"}]}, "Superscript", SyntaxForm -> 
+             SuperscriptBox], TraditionalForm], {0.01, 0.}}, {0., 
+           FormBox["1", TraditionalForm], {0.01, 0.}}, {23.025850929940457`, 
            FormBox[
             
-            TemplateBox[{"10", "8"}, "Superscript", SyntaxForm -> 
+            TemplateBox[{"10", "10"}, "Superscript", SyntaxForm -> 
              SuperscriptBox], TraditionalForm], {0.01, 
-           0.}}, {-48.35428695287496, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-46.051701859880914`, 
-           FormBox[
-            TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {-43.74911676688687, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
@@ -3036,10 +4200,10 @@ Cell[BoxData[
            0.}}, {-29.933606208922594`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-25.328436022934504`, 
+           0.}}, {-27.631021115928547`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-23.025850929940457`, 
+           0.}}, {-25.328436022934504`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {-20.72326583694641, 
@@ -3063,10 +4227,10 @@ Cell[BoxData[
            0.}}, {-6.907755278982137, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {-2.3025850929940455`, 
+           0.}}, {-4.605170185988091, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {0., 
+           0.}}, {-2.3025850929940455`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {2.302585092994046, 
@@ -3090,10 +4254,10 @@ Cell[BoxData[
            0.}}, {16.11809565095832, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {20.72326583694641, 
+           0.}}, {18.420680743952367`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}, {23.025850929940457`, 
+           0.}}, {20.72326583694641, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
            0.}}, {25.328436022934504`, 
@@ -3105,12 +4269,13 @@ Cell[BoxData[
            0.}}, {29.933606208922594`, 
            FormBox[
             TemplateBox[{0., 0.}, "Spacer2"], TraditionalForm], {0.005, 
-           0.}}}}]], {429.9340568688434, -87.31932644622096}, 
-     ImageScaled[{0.5, 0.5}], {274.1470179649021, 166.3225265642304}]}, {}},
+           0.}}}}]], {477.52207566960305, -97.02128328364161}, 
+     ImageScaled[{0.5, 0.5}], {305.80952134484113, 184.80244434979355}]}, {}},
+  
   ImageSize->{
-    UpTo[540], 
-    UpTo[167]},
-  PlotRange->{{0, 576.0076859441722}, {-174.6386528924419, 0}},
+    UpTo[600], 
+    UpTo[223]},
+  PlotRange->{{0, 640.4336115220558}, {-194.04256656728322`, 0}},
   PlotRangePadding->{6, 5}]], "Output",
  CellChangeTimes->{{3.8260139356528893`*^9, 3.826014016404052*^9}, 
    3.826103482588256*^9, {3.8261924073516417`*^9, 3.826192422251688*^9}, {
@@ -3124,22 +4289,121 @@ Cell[BoxData[
    3.826693189017332*^9, 3.826693195508483*^9}, 3.826693227271687*^9, 
    3.8266932658138647`*^9, 3.8267029830556583`*^9, 3.8267050798781137`*^9, 
    3.82731110851019*^9, 3.827311158810931*^9, 3.827311190613722*^9, 
-   3.827312689350894*^9, 3.827313835719719*^9},
- CellLabel->
-  "Out[156]=",ExpressionUUID->"a6d1a118-756f-4ed0-a86e-9a8b80b25962"]
+   3.827312689350894*^9, 3.827313835719719*^9, 3.8274130038297663`*^9},
+ CellLabel->"Out[48]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJztXHlwVeUVf+blJWCn9g+t03WgY13aP6xdFFGwioqtjjOdaW2ndmqlyqLs
+iyyyyY6gJCCbJIDsI5EdwiZLIpCNNQTCFkgggcSEANlDEk6/37nfubkvb7t5
+eTGBcmfeTe6933f2c77lnHtf7zakV/e+3Ya890639q8M6jag13vvDG7ftf8g
+dct5j8PhbO9wOGraO/A/qX/1qcHxEE4et+/etXH3t/wnkgoKCuiTTz6hAQMG
+UO/evenDDz+kuLg4qqysdHTmNk46dOgQ9e3bl6866n75+fk0ZcoU6tevH/cb
+O3Ys7dixg27duuV4httEAAYtXryY+vfvTwMHDqT58+dTcXHxsxrsggULaO7c
+uXzVSXcBOXPmzOHmQDlhwgQ6fPjwq7oLMPbo0QM/dWWcz549K7w5uuh2H330
+EW3fvp2vXuCzi44dO8ZUgtrRo0fTvn379LNIqqqqopUrV9LQoUNNKWzZsoW5
+6aRh7t+/vwHuNnTjxg1TsMnJydzv/fffp4kTJ1JWVtbT7rK+fPkyQykqKqLy
+8nI6efIkjRgxgmJiYrRc2/B9JSPzl5iYSH369OH/b968+bQGBRBHjhyh69ev
+U1lZGR09epRlFh8fr8UfyfL99NNPqaSkhFXx+eef06RJkywqctLp06epV69e
+dO3aNc1oJAtv4cKFTEptbS0lJCRwmytXrjj+rPsBN1SvdKOuFGHqrOCaihDT
+wT3NiiOMz04W/vr160GX43mN89KlSyw4mFpdXR3TBUUopZltoKDx48fTt99+
+y3DPnTvHZgtFGrSHc19FDStbqSgMF2G6P9oDB2SFNtu2beP+paWljg6Gpp7S
+ZCuQbLW4elprZvny5awJiBk/sA97wP/Hjx8XjpUGmMr6rk7WQM+ePaFwR5i+
+p6TJ3QsLCx3iETDPTZs28ZVoCFpAO2Xm6sq4B9RpaWl8JRqBMYEbaETcAOap
+SVR4cXayJsGGcnotWSetWrWKPv74Y74S+mA9ixYt4qs/6nvgC25hbQdvhWis
+Ws/IyGC8xpUhfQQC7e18QIPDhg2jPXv2NJQ+fASGWi/CCLDF96BgHDomCWWQ
+GpzOKvXMzEymIpDUv/76a6ZEgdZSb8PUwZmVa7L2YC+KUjYKZcWv6a4wqUGD
+BlFKSoqOJU6mEGFLmZmJ1hqPROjTpk2zIfRI+uKLL7g/SIc7wjWgaMB/zqfA
+nUyDN2UtW7aMrwxpO37Pf1wcIeCp6enptHTpUpbQM/oZyIK3WASvpRfBdnjx
+4kUeEOA2iNq7d++WeIZAAcqmT5+OIMPBat68eWxKSsiiA1g5rBJMCWRFAccv
+HXRZR7m5ua/rLtnZ2awOGPwLugvCCCIqwOHQcpcwD6Tww9TUVNYofAZRBiCe
+1yAwFKxYsYLbASueq/ZiaN4kDUNRLLtJGlqE2LxIevXq1TR48GD2RHiyslNT
+0ioWMQMYB90l7WJm8AyDFAxHuYkZ6zEIgixEH8gJRglvU+OE6ZUwpFmzZvGV
+9EtKSjJVU11dzUM/BlmMESJoxH8EOfiHDKabN2+mJUuWWIVsKmHGjBk81M+c
+OZOtAfFewRAlKBXyrZycHLZnsAnwGBxCYM9P6kfQI7iNjo7WEgznIILJzsGD
+B0GZGB8YgEmQORHhIY2Vo+6bnn3hwgU2CwhVBDhu3DgOIHJAcaAcbUSAeXl5
+ZtARASJKIGAhSLkL0MlcYiiAwF/S9xCiZbIk3MMQECvJRuiFpOTwEnp/p3UH
+j5DpCciePHkyUItUYNFRUVEWszSkBzPCJCDMy1RAIjikNGTIEFYCBiYEDDVH
+6qjBoAuEbgUDf123bh23kIkngges32qxMB9lSnosjGTrhELBCaIIrFEifBdt
+CwgVY8aMYee1hAgwDieD/yLiglIIRZmTORHZtWsXoxQLhjnBmVVEMici0ANI
+2Lt3L/QRrrvKHARGj4gLShvMQUQVQjSaQ9OY/iiGRRWIFIgiDVUhU9QwPVFF
+mBRVdNTG980337CBCWgVvByiBzFW6xQbAmmoTggG5oBIAy9HFFEO8qp+jNkw
+RjiZ+3/22WeY/4o5g29ggdl30V0w+gAi5IGxALan1CGBGR6zZs0alomsOJTd
+ddYCh7BhF6BFQXZpVkHHyJEjmVXMH5TFaRaabWn1OP6EiRdSlGZZrnHF57ct
+zb09n9HqOj5q3FOP/45TJ/PyDZweMBo95gWI0+a9e0N8r+13gKOl8N4pOLri
+HI5b3iziB17u3Weznd17d+GR48d89hoavKmls5d7z9lsZ/deVy/3wluRyP7f
+4N3GJvJSiO91soii1Y/04ebjT5uEp57Rbi3KT6g6Gnt04XR8fxwdX9CBMmKe
+pKMJS/lhGy/t++r2mdlXafqKVJodd5jyr5YV+8Ywjs/YUyijszG/ppzYX/Lv
+fOxjVHajiBtFeunXh88uKimvpu6Tt9Fb47bwb8TcBEdAdE4qLsoTVGoZgLOT
+8i+echcMT5BZpX11tzMXiwWT6oazWgbX1JndCgOJ0kVJS/5tMpm8+A26Rbcc
+AbmsullLA6N3m1wq2frjUtRWV1dDmSkb6UTyOqqtqQmotmulVbQh8SztSLlA
+1Tdr/WDgc+uw4c2a+OKSSlq39wxtTTpPldW1q+yAYuVu1kJWnWhA1C5TyFOW
+JDv8QEnUeGE2B5Z3Z8VeyFSrfM+mm/Q9b+YD1Uq75b6xJfA5AuZC6THPmCZ0
+OuZxKi8pPuATawS7SI8p9S4yfE6CAkIrAyFzUsn1Ag8vUSya7fb5UcfpnGKa
+sSqN5q45okJAuR9BWlk7GNvVZC0j5imEBW+s8dmPsYhuSm8UUvL6CZT01Qgq
+ys/2pptAoPjcHMG91Q+KrajjnTauGtuT4ZR9OpXjxoFl75rDz1Rb8CKsz/mo
+KCuhzJgnxE+PLXiWPQqNZfPrRnE++7QJ8k+2cLk8cOWcTlPUG4g0QG7ZUfOV
+vHYsu3B27MOUsn5SPS7viuS7YZqv6qoK5fodzDBwKPZlMCIZ8+KCi+YjQVF6
+nQdeeqUJqijKv0BJcUMV6aPAkojsakGORwiEGN3AvxwEXtlkTYobUT8fWDOm
+EWpxf/6ihWDIiALqWGbtGDhLK6r5ys8Chs8+jf1Fzc7S+AweZN4eH087U7Nt
+was3CgNKBOUVlprDFX7vTNpKNbV1PwqWui7NBLcpXPtTyfWyKiqvvOmhku9g
+zHhIiwqJIWyeY1cYm9vIrpSVlbmaChfVGkg4VFRUcLYIO85RUVH+4XqEjUd1
+86ysLH5UXl7udVVrizQBhrQxklco7AkamPB56tQpTjki24WEMRIp8+bNYz7t
+LzcFGjIb0AZSEcjyoTikqqqqidpwMlwpTfC2Mmg0MOTFrfkpKUYwWviA865+
+gGQUHvaw1A/prCMfSNQg5SE2uW/fvp/hvod5WCkSgJLt0UUGdij6gZlyg7Wi
+0YkTJ/hasndIUEEvGzdu5FQbniPzgoKKnwYQm08X7aEfABEeKrs0KUUyE/kk
+5OkkyYlKJKTCcPUTO0jr5dXTD6ovv/ySE9VE9fnUnTt30qhRo+yjaix/yJgj
+f2lFCp6RFm02pC3CKbiSmgFBGhsba2pS3BHZeHcbbsO1W3KgrkeKrZDor62t
+bRBk/mOhsl713fmui0vukO1E3tWdxkjTvNeuXcv/A6+Yt5H4+D7V1NQwf8hE
+gyere8B5P/jgA8aBbChCl3IVh8+4FUig72qikZpG8QSIE6LD9TPknFGggSiB
+1DWK30TA58+fZyJRGMIqwISzupqsBxhJTk42ZGAMhHBvOVDNo4JP0CwM0Q9S
+UlLY2tXPsHuFS4pyvJISScOHD+faADmkVAuZd58DViB6xugHGhdfST0g7Aqp
+fTlQSwkASpf2ENab21g/aL5jvgydbtiwwUQIOxWd2l9rGsEhnKveMNwj3W4x
+HBgKwhZsFYl71MEoQwpkODJsYIBz9/u2MlTzAR9Dsh+jAWoBZs+eDf349i0h
+F0M0IhsaKHLFbVBvAHdCHAEeVIvYozXCjAEYnDE1wf8qrom4t27dyjpGGICJ
+6wKVBuIONKX9uX4O39YOaQYqCMtaY4QCWMDJy8sLfirnDaEEEpkQNKw5hVfX
+ExZipLAi9MvNzTURQK4oPzOR2p9cNh9/Hj4USHcYbeWQ+rAm6c4Ysl1siTAM
+zO1l9DGAGmaJCTUcFBWs8KBp06YFPam24sQojqIarCesOMVr4WnwWhSdqWga
+NM7WsZ9V3/FO26lryY53ZdkKOvrZseS7dzfvQ2fGxogQTrlZRyll8RuUFvsa
+nUjZMCVY9DL/wD449sNlnzUr5lfIAE9uGlwnb1U33Bw+m77XbDwxWASGIFyU
+vPgfJtHpMR2RDnMETbVI92Z1JR3aPodSNk2jG8VXgpbuXfe4G+XdGWg2ZRsz
+K+MVJ3lBEWXTU6dOxZ6ErLh8LImaNqEL4zmwi1/LwR4G9g9Ryn7mzBmHnQWO
+fcW309Cio6N5S0oOvbiRqBOStY3gwu4S3rbBYZnzN2rKP0E/8Ny+dVq3b821
+hX8tf483ZLBihzTxKgxUis0cqdNv5DLIqIaJ9LeXG3CXQQwQrxSgDdbPUAs2
+EpS4mrxqmqQfWDcKI2zR5DRpwqZMhOY1qDVVKIjASz3G3v+9vCtgPRq73vJJ
+j8fWZkMqeph7JvfKa9nm0dgVmF2piFh10r0ewD8NGn0GP7sIDCNzoZCFZ0aY
+xSQtfQvjuSei+uAyUXfzts/rDw1qmqyJ9rT4aHv8TNAAvO3R+kOYsuhvbgiT
+146yh9BbrBOgmamb6HzMowwwc8ETVJB7phFAWYqi2ILL5yjjwDpUBxhN3vQq
+7zttxtPinHmMk/fjDxelBM4PNtfUgGlw3BdscjC0O6MP6Of2EoYR1oQhH80x
+wfBHk2e+LcKabwt6ItIUmjwTjxHWxKN10hGCrdcWk46HMwWyHfcUZYQ1RcmH
+nmmI7YRk89ZwrvCGw5WdrKTVsUK5tyskNRjQ/OUcG4aeu1u+rYOzaD67qKqi
+lJJWD6W0ha9T6ubpXImf2gR4gGWdvxxLXN4keKkL/+IGLyluhD14rJCZGsrB
+bbPcaiXPpu9tAlXhPL3F6yDJX42ic8cT0oIAxedWasytxX1afNZ1G3W83QJQ
+a+541xpbomNv/SCIAsgf4r59DzAwNa2w8QFfwAOxKa/RBVPYeL8dpPVy6OcH
+VaByP1uoGstfoMLGQEiN5y5edED96IeZJCbaki7yYh4es1C7C2Apba+rLKZr
+KVPpauJwqi7KeKQZ5Sprauz5wi6xloAJgFXsvuNo4praN6cuyt/8pjlTurTk
+N1RbUeh42A+7nqsjl8fqCJ+QC9eOHFTR5oP8J5LrqLGTiY+F4WiuZb18F49u
+1VLOwkfcUpuVlxLNxr/QDAdbPWoQ1TzVow9qeQCW/kIiP9b2KR4RijW12E7B
+ln9ZbOcJZTtFugi98bWqwp6vwsUgilENz2qLjzCyV+G1CXxuCBYCzeDQAcoM
+GMFvfsirTTUVV+lk/GjKWNuHruUd6eCTryArQNtpPHjNOTU+ipKW/ZeOJSzv
+bOXZZX6sFB9Uw2e+jAwF+YhYoTWLBeuPme8aDZ61B68Ym59wDFm9bTuNLGXj
+ZLf14onkdfIVBom8kIH0FXjNtckjkaROeXO3CfFuLz0fzyo0G/+hecwCxRN/
+dV8/rx7qLg8Xy0N/UY1/qHkV3M2xyyR2MWxOgmkXeGesoLjcj13YrVdub9MQ
+jAGpLUcA6xHKTSyZPlzML8GL9DRyfiIdSM97Ut8OUcl0Ow0OHzdIjY/m92iP
+JqzQEcDnPK0ZKqFv82XS7fduO7kfrei74a3hruOe/wHTYFSp\
+\>", "ImageResolution" -> \
+96.],ExpressionUUID->"face6933-14b9-48f9-ae2e-d7eaa7164c92"]
 }, Open  ]],
 
 Cell[BoxData[{
  RowBox[{
   RowBox[{"h4", "=", 
-   RowBox[{"h", "[", "8", "]"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{"h", "[", "6", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
-  RowBox[{"F4", "=", "RF"}], ";"}], "\[IndentingNewLine]", 
+  RowBox[{"F4", "=", 
+   RowBox[{"RF", "[", "3", "]"}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"eq4", "=", 
    RowBox[{
     RowBox[{"eq", "[", 
-     RowBox[{"F4", ",", "h4"}], "]"}], "[", "6", "]"}]}], ";"}]}], "Input",
+     RowBox[{"F4", ",", "h4"}], "]"}], "[", "8", "]"}]}], ";"}]}], "Input",
  CellChangeTimes->{
   3.817563268660089*^9, {3.817563829122241*^9, 3.817563846550528*^9}, {
    3.817563950998456*^9, 3.817563956525237*^9}, {3.8175645239988813`*^9, 
@@ -3176,9 +4440,9 @@ Cell[BoxData[{
    3.826705269163965*^9, 3.826705272651581*^9}, {3.826705793549531*^9, 
    3.8267057995017138`*^9}, {3.826706792791143*^9, 3.826706798135113*^9}, {
    3.8273113209157887`*^9, 3.827311327115488*^9}, {3.82731247019237*^9, 
-   3.827312476760333*^9}, {3.827403932797948*^9, 3.827403945678021*^9}},
- CellLabel->
-  "In[120]:=",ExpressionUUID->"4fbf2b0a-5252-416a-b90a-a12f6d946efe"],
+   3.827312476760333*^9}, {3.827403932797948*^9, 3.827403945678021*^9}, {
+   3.8274116302097473`*^9, 3.8274116509241962`*^9}},
+ CellLabel->"In[36]:=",ExpressionUUID->"4fbf2b0a-5252-416a-b90a-a12f6d946efe"],
 
 Cell[CellGroupData[{
 
@@ -3189,9 +4453,8 @@ Cell[BoxData[
     RowBox[{"{", 
      RowBox[{
       RowBox[{"gC", "[", "6", "]"}], ",", 
-      RowBox[{"gC", "[", "7", "]"}], ",", 
-      RowBox[{"gC", "[", "8", "]"}]}], "}"}], ",", "0.0001"}], 
-   "]"}]}]], "Input",
+      RowBox[{"A", "[", "3", "]"}]}], "}"}], ",", "0.01"}], "]"}]}]], "Input",\
+
  CellChangeTimes->{{3.8175612726329412`*^9, 3.81756128486736*^9}, {
    3.8175614038617268`*^9, 3.817561415404965*^9}, {3.817561511096093*^9, 
    3.817561563944231*^9}, {3.81756250196518*^9, 3.817562507914916*^9}, {
@@ -3269,39 +4532,44 @@ Cell[BoxData[
    3.826705805342586*^9, 3.8267058111336823`*^9}, {3.8267068008477297`*^9, 
    3.826706806391283*^9}, {3.82731133269199*^9, 3.82731133535538*^9}, {
    3.827311521263528*^9, 3.827311521398993*^9}, {3.827312480640839*^9, 
-   3.8273124807842493`*^9}, {3.8274039521822*^9, 3.827403956750306*^9}},
- CellLabel->
-  "In[140]:=",ExpressionUUID->"5ac27342-feda-4aa6-9098-1d0e7b78fae8"],
+   3.8273124807842493`*^9}, {3.8274039521822*^9, 3.827403956750306*^9}, {
+   3.82741165833948*^9, 3.82741166121636*^9}, 3.827412427862399*^9, 
+   3.827412473501149*^9},
+ CellLabel->"In[63]:=",ExpressionUUID->"5ac27342-feda-4aa6-9098-1d0e7b78fae8"],
 
 Cell[BoxData[
  RowBox[{"{", 
   RowBox[{
-   RowBox[{"\[Theta]c", "\[Rule]", "1.5328899165006784`"}], ",", 
-   RowBox[{"AH", "\[Rule]", "0.18775020090652753`"}], ",", 
-   RowBox[{"AL", "\[Rule]", "5.28523415114999`"}], ",", 
-   RowBox[{"B", "\[Rule]", "0.8282389264890428`"}], ",", 
-   RowBox[{"\[Theta]0", "\[Rule]", "0.19415545582757046`"}], ",", 
+   RowBox[{"\[Theta]c", "\[Rule]", "1.1913833361480375`"}], ",", 
+   RowBox[{"\[Theta]0", "\[Rule]", "0.19918281253989364`"}], ",", 
+   RowBox[{"B", "\[Rule]", "6.433174331384018`"}], ",", 
+   RowBox[{"AH", "\[Rule]", 
+    RowBox[{"-", "0.1630978569729147`"}]}], ",", 
+   RowBox[{"AL", "\[Rule]", 
+    RowBox[{"-", "0.00014061182444561173`"}]}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "1", "]"}], "\[Rule]", 
-    RowBox[{"-", "0.6662916962061386`"}]}], ",", 
+    RowBox[{"A", "[", "0", "]"}], "\[Rule]", "1.5011108226120964`"}], ",", 
+   RowBox[{
+    RowBox[{"A", "[", "1", "]"}], "\[Rule]", "0.0808689737352336`"}], ",", 
+   RowBox[{
+    RowBox[{"gC", "[", "1", "]"}], "\[Rule]", "0.14830274579751998`"}], ",", 
+   RowBox[{
+    RowBox[{"gC", "[", "2", "]"}], "\[Rule]", "0.2139734556619153`"}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "2", "]"}], "\[Rule]", "2.2371143183050557`"}], ",", 
+    RowBox[{"A", "[", "2", "]"}], "\[Rule]", "0.8098024012406883`"}], ",", 
    RowBox[{
     RowBox[{"gC", "[", "3", "]"}], "\[Rule]", 
-    RowBox[{"-", "4.377648171511998`"}]}], ",", 
+    RowBox[{"-", "0.8548762696016743`"}]}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "4", "]"}], "\[Rule]", "4.345558138420816`"}], ",", 
+    RowBox[{"gC", "[", "4", "]"}], "\[Rule]", "0.6376578899636798`"}], ",", 
    RowBox[{
     RowBox[{"gC", "[", "5", "]"}], "\[Rule]", 
-    RowBox[{"-", "2.4133660040759435`"}]}], ",", 
+    RowBox[{"-", "0.2962660763114042`"}]}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "6", "]"}], "\[Rule]", "0.7687390939155959`"}], ",", 
+    RowBox[{"gC", "[", "6", "]"}], "\[Rule]", "0.05709149668524899`"}], ",", 
    RowBox[{
-    RowBox[{"gC", "[", "7", "]"}], "\[Rule]", 
-    RowBox[{"-", "0.13197147549883242`"}]}], ",", 
-   RowBox[{
-    RowBox[{"gC", "[", "8", "]"}], "\[Rule]", "0.009511653903360723`"}]}], 
-  "}"}]], "Output",
+    RowBox[{"A", "[", "3", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.3683696801437099`"}]}]}], "}"}]], "Output",
  CellChangeTimes->{{3.825763769229417*^9, 3.825763862906001*^9}, {
    3.825763893981986*^9, 3.825763937705072*^9}, {3.825764027795516*^9, 
    3.825764084811095*^9}, {3.826007456702271*^9, 3.8260075356923723`*^9}, {
@@ -3347,9 +4615,14 @@ Cell[BoxData[
    3.827311975567474*^9, 3.827312035347621*^9, 3.827312204955512*^9, 
    3.827312350478697*^9, 3.827312410767437*^9, {3.827312466931651*^9, 
    3.827312501365696*^9}, {3.827313860157197*^9, 3.827313862882073*^9}, {
-   3.827403957086482*^9, 3.8274040077193727`*^9}},
- CellLabel->
-  "Out[140]=",ExpressionUUID->"27f02b30-ca65-47fc-b569-1f1337edbf82"]
+   3.827403957086482*^9, 3.8274040077193727`*^9}, 3.827412051293481*^9, 
+   3.827412121780139*^9, 3.827412193844829*^9, 3.8274123023835173`*^9, 
+   3.8274124211055603`*^9, 3.827412472017557*^9, 3.827412547581163*^9, 
+   3.8274126595829678`*^9, 3.8274127065402*^9, {3.8274136147932043`*^9, 
+   3.827413629455366*^9}, 3.827413675585771*^9, 3.827413725442918*^9, {
+   3.8274138083237457`*^9, 3.827413889480339*^9}, 3.827413923359967*^9, 
+   3.827414001420635*^9, 3.827414049005356*^9},
+ CellLabel->"Out[63]=",ExpressionUUID->"0b968ca3-4b2a-49a0-947e-8d00eeca52c5"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -3369,11 +4642,7 @@ Cell[BoxData[
     RowBox[{"Plot", "[", 
      RowBox[{
       RowBox[{
-       RowBox[{
-        RowBox[{"F4", "[", "\[Theta]", "]"}], "/.", 
-        RowBox[{"B", "\[Rule]", 
-         RowBox[{"ruleB", "[", 
-          RowBox[{"t4", ",", "h4"}], "]"}]}]}], "/.", "sol4"}], ",", 
+       RowBox[{"F4", "[", "\[Theta]", "]"}], "/.", "sol4"}], ",", 
       RowBox[{"{", 
        RowBox[{"\[Theta]", ",", "0", ",", 
         RowBox[{"\[Theta]c", "/.", "sol4"}]}], "}"}]}], "]"}]}], 
@@ -3391,9 +4660,8 @@ Cell[BoxData[
    3.8260133301047697`*^9, 3.826013341448687*^9}, {3.8260134958356*^9, 
    3.826013508779696*^9}, {3.8260137167995996`*^9, 3.8260137321035547`*^9}, {
    3.826013841697954*^9, 3.826013853521943*^9}, {3.827311985975671*^9, 
-   3.827311986287529*^9}},
- CellLabel->
-  "In[141]:=",ExpressionUUID->"63fcec7c-aaff-46be-90dc-231bca0993d9"],
+   3.827311986287529*^9}, {3.827413652694055*^9, 3.827413655440963*^9}},
+ CellLabel->"In[52]:=",ExpressionUUID->"63fcec7c-aaff-46be-90dc-231bca0993d9"],
 
 Cell[BoxData[
  GraphicsBox[{{}, {InsetBox[
@@ -3401,90 +4669,95 @@ Cell[BoxData[
         TagBox[
          {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
           Opacity[1.], LineBox[CompressedData["
-1:eJwt1nk0VesbB3CZCaVBKRUpXCm3OSVfZCzJEG5Kg6lSqBQZkzEyJSSVkAgl
-krFZ3bohY5LpbISz90EojlOJ39tavz/2etZnnXXevd/peR4Fe3cLJ34+Pr5x
-8vyJSY61qleqD2td+X987jdxXqpeCwmpayclSQxpeLSzus4Ue3bds3lPIts3
-riin7iAuCgaz00mUNZ9mJ9e5YUXwmjJvEh892RQUVxeAjft93s4lceqUxZ6o
-uhhYBm24ev1DDDJ3dW2MrEtFWriYc+W7VPhv+1KdLlmAb8E6T3fyHoJ5LNxc
-0lqK7Z6BRZNppejb4bI8M+AFpsS4HvTv5xgti7Es7X2NDwe+G4Q6vcb+83q+
-hq/fwYtnYmgy/BYGIhlab8eqUSYv26p0twp+9bPi/xGrh1v7NQ8r5VpEFfp5
-fRlrwG8l88LcrHoc8HmW2yf2EdH+3l5SOxthb3PfzP9XMxYWjlQKvWpCjUae
-yK4vLSjaExiiqNAMrkCARNxYK8achRqaoz/Bumcq2KWnHam+i0tuNbTA656l
-8dMfnai9GnZ6fEkrpjQ6ZmUIdGE6XmqPvlkb2nOcHhfwusCuin6fa9uOZMnW
-aR/+HvAplQl7OXbglO8dwbifPdCPzpnnpdcJlU6bgsMivUhz9FxLy7JQUaty
-KHBmL/L1ewyG5FjY9fKHZNqsXlQZtZuPLGPB7c6NE9SCXthdU9AfWclC8XFK
-6aBKL7R2V0S0rGVBl+t8a79xLy75iTXoGrNgN8sz0vpyL+g1iyPDPFmI10lw
-NJnVh2qeXVhCFQsmsTu1Vs7tg3dCVG9fDQvCnXwLp2T6cNvN0XRjHQs+512r
-Hy7tg1Ojl25tEwv2Dw3WzV3Th6LRWSl0Bwvrl/yYbjXpg3Dev57Pv7LwkWd3
-42hkH8p6u905synEGMw7px1Dxn9zTWhyDgWjhCpT2fg+rBPNiJ85n8JT9c38
-1df7MNWqEbdClsJd59nH1+T0QdJqraiWAgXPj5Wbxt/1oWKpuL3UWgoLCpQb
-g4T6IebEBMvvoZB21zslX6wfxZLLK2XMKajeqLZvk+zHmGtWqLglBa0w9+9r
-ZfqxyOX2dY41BccDpfO6lfrRFlTVFXWQQoGooQ2M+uH2PsB4nyuFnUecO35F
-9uNG2fcoiQgKH63LMpVj+7GGXiz9KJKCnYm4q+XVfsz3EhC0iqJwanP+79wb
-/dBOcl5/NZZCkiR3qe39foin/bg7kkjhS3nokbIP/WC5/mOknkHBb87d/rOz
-2Si4vnt+aRmFNY4drfvmseGl6932rZxCV/HcD1oL2VAZ0zVXe0JBb19Qkag8
-G49f1JgnP6MgkXYo8KY6GzYTt6/sraRwc/WiRW9M2Vh7a99du2oKphfMJXMs
-2OB/yTY5W0OBr+ESX4w1G4Oa/6Ve+kDmf3ai3+YgG1fEK5FbR0HtyceiAVc2
-9PeHuzQ0kf0wit09N5oNK6V6wYftFNxS3mrz4ti4+c5/aVoHBfnB3+s7E9g4
-alTTHtNJIST25KLsm2y8CyqGE0XB5JMxe+t9NtZLv0wf76HQ4SB40b6aDcev
-s70zGXIeiredNaxjo1QgJNWdQ0FbxOOoWhMbtd0RR7YMUMjM7d7NbWNjW2r3
-88pBCidHny+K5LAh4DdSUzFMYTLA+3GhGA3l3zs4m8cplI80zg2WpMHK7brU
-Suxpr+axV5pGp0VGy3kuhWF9au3EQhqcMueQggkKPRL6DzVVaPj5tMwR/Enh
-dkCqlJQaDbaUr+pV4gMjE66UOo20Yd7wsl8Umpty1YI20+itdAleN0nhv5TZ
-ue8MaMSuTn2zbYpCqISL2PWdNPRmhO8oI9YNeH3MxZRGRNNfbuumKTw54qks
-aU1jSPhDzyy+LuSrdGRaOJH3BcpuGyY+kbJRcMVxGsytnytXzOiCikSsw/hJ
-GtUqz/tsiDOGdZYnn6Ux8PTclyfEiSXZtzuDaeSn+Hw8x98FC5UZ0/nhNNT9
-tR3SiaVSbA8GXqbhs1bwbTXxJX/JJYpXaQjYyoosIXlKf9jZbyyJhmHTxr4d
-xPxHXrb/m0Ljnkp/0nFiPz2PlGMZND7svnm2kFijpOaHRhZZv1H3tCZirrLS
-vpm5NNQWe9weI3af2bogv5CGcES2zHrBLqj5r/O6UEzjnGdOjBkx/fXyJ7Ny
-Ggrb/FpPEts3aiV+f0ljMFSDnU68TC957M0bGm4xEzkVxB3Fo5ZJ/9HQ8ViN
-RuJk5V1FR2tovG37N4smtrqeOUejnobxu7yu38RzZk6dFv9IY9O1qkFpoS7U
-+tk0tLfQWCkkVb2C2OiweFwARSPao+i3AbFQo8Pwni80cku/mlsTV+54ZqrA
-pvGPwozzjsQBxTL53zjk+7d+dj9NvE35lOSbrzR6mCMa/sS85PcnE7/RKPWI
-+hhO/FhcscaZS8PG20DnCvFpP79VW37SuPMj4MJ14jVfmyPFpmjwma+MTSOu
-EKn+vJqfgT//cHcWsYHCSyULYQYPPM7X5xE3bi0+6ynO4HnHA9uHxIf25lam
-SDFQ5/kGFhIPut6e/WIOgyn+ep1HxOfDEw5+kWHQ9fRa6p/fBdMj7ossZnD4
-2KukP/+Pqwj4uWoZA5nqbar3ieU+ehiZKTKoXs39J5v43tCxpLPKDG4d6Fqe
-TrxB5GBv8ioGhtmc8D/f/0rect0zdQaK3UKX4ohNtxoFdq9ncPqIomIYcZvl
-9lqhLQxOCmzc50Ps7LpOTlWTwUWl1aquxN/ClF1MtRkcy59KPPhnfdPkys7o
-MbARuHXTlFi8Qlr4mhGDhXMmt28nTmoS3vvEhIG2yWwfVWLFoV/plBkDzXu1
-ZjLEBcKjwwJWDBLT1Sr5iDXl+7er7GMwtEW+liHnYa9lfeupIwx+sjKKS4m7
-Tv6rnOjEQCJS/spNYtewinPlxxkskpAWCSQOK8+U5j/DQDB6daXun/PUdP2Q
-kieDPGsTkeXEqYMxD3b6MNgQ/bp/mpz30mXexleDGDxNyTpbSqyn4XatNIzB
-YzcxxSvE9RYOfe2RDApzHp34c5/o0N0XV1xlELmgpno+8aJBhfLiO2S/s3ve
-2pH7mSW0QKQtm4Ffm6ahGvG6ZRJWU3kMAh82HvlB7vsuC+6IwWMGDf3FTrHE
-fmVVKp/fMPB5kXwvl+QP0cYXnpP/kfUOFf/lSpww8PiN/AeyXzPq2OrED5be
-Pny8mUGTa7X8IZKPWCEeyT/7GOjsn9LU/E3yr7mc6BIRDjiqV0+c4lEYf8sN
-/CnOwZfgzthmki9zNRt+tEhxsFnlb4MtxHNVwgbiZTg4ccLoOJfk2/6p4VpR
-JQ7O19CXrb5TuHz/deKYHgevgh/a3h4i4y9PlWo04qCtszyvk+TzsWvnwx+a
-cMDOjo+TJT4YvNrbZS8H9vu3y0SSevC37bUDXQ4cKCwOnW/KpvBJ5IRiTRAH
-N9mjwvZdZHx//Zs5YRwcaFfL9ib1Rvv7svnhkRww41WdMSwKOayPwrrxHDSP
-jko9IvXKr1iLU5rOAbXySFj7ZwrLHeYU3nnJwYjDfF5FPQXX5+VavlMc6B9T
-DX7wnMK3dvWsPP4BDOT62xwk9dbzx13JDuEBhEppHZJ4SiFgQ3yH5qwBBIgH
-iB8m9Tom18VnatkALF/4t/UVkX4iaXHJRZ0B+AnIlJ24R+br5r/6UsgAzNKW
-HHQg/cH5qO8JZZcGILd7q8uTaFLPco5P0lEDeN0eXjqb9BNCfVbVxokDpH4U
-LSi6REFm/5rjM7MGkB7nO/npIoXNhlRmzLsBvLTzr7nhQcFnmY5covggfGSX
-Hl5iRUHMrnW4UGoQnpJJ48qk/0lOOf26ds4gpvXbueqkPyqZn+EiungQv38o
-YctuMt+ZAuW+qwZJHnSe+EufggvvjZW9ySD26bjGxG+gYNtgFKseM4gQDblK
-P2kKGsFm/FXSQ4g5L6rd/pqFEblavrT5Q5Cu2HHhzCsW7pXsmj4nOwTVrN1Z
-Ii9YkOEYTCooDOHyHOv8VRUsjJlt53r/PYRzOtJltgUsFCxV5fy1ZwiKZtG6
-VjdZUKoQaIyIIuMtsa17eYaFuaMl6cYiX2EkPTg/mfTHtRYidIj0MBbNk3in
-o9UJi0MtHkJCI5iK44bq7e1AkszwRHPACOTo8hcF1u2oeue7R1BgFCcvexR+
-XtWGmVNFAv8EjOKVcsPSpBmt0Fxz5LKY4DfMzjCwCc9rge+XcveuwG+Yed0q
-QuTAJ8xNsf6s9+sb9qrmRGQKNuPGzmPzRAK/o/Di45LGC034O3Dlg6+/vqOl
-OnD9K8FGlDy0kd0QNIbs8Pd5Ndb1SOz6ICYiPI5K7mWpwk0fcDFp2Ho6cBwu
-FmvNghvew84gzMtKmAu+/X+/cRz9F4a+/43VB3GRpunex5WvRGShKbd1kgvW
-r0vaQ/ZP8azbuFr74gRYe8Uu3D1chN9JI5M1kxPICYi7YT6diTdqqtljUxMQ
-Fpm+0vIgE5GVDuZyM3iQeba12vhAJhZ+/XT3hBAPj3b19H8ru4N1+s9MxaV4
-eG6j1299OgPHvkekGS7jYSfb9fezp7fRtEdRr1KHh5KTbqdcLBKR0nfgK7OD
-R/Kuu8nR3AQc9k1KljbgoTn3dPxW/gR8zRIbOryTB9n98nMdC+MhOjWcOG3B
-w7Nw466XknHQuv+UrenIQ5W5ke5y/1AI6XKvODrzoGulmdGiHIKaFnXNqGM8
-/GWXcXZzYxD2CdyJaz/JQ2eeYcP4ykCctY3Q8DnHw8zgfQKN8eewdaTyS7oX
-DwFuxXLtPWcwI2wy+r03D1sUe69sWncKMYXuPQsDeLDc8Sn07S0nWBnmRGkH
-kvm1+OUf3XIYcp09m44F8XCi3KHb6o4Ves7IdceG8KChVxaplaWPHFHry6Vh
-PKyPT2O/kHXS+h9iObzL
+1:eJwt1nk4VevbB/CQIiGhSANOg0oDGjTwlYgU0kCZSoYiijJ0lI6QqUiDsWMo
+KkMnQ0ISJ1PmIYnYe4W919qbZNgaVIfe53dd71/39bnWXvd69jPc96Ny8txB
+Z+EZM2aICs2Y8b+o2j3zrZ2Sta7y/0d7BQXR54KtqMjW4xWSeNjbtiVQYASN
+RiGr/0XzB9MFLgIrzFZJ6nQi0fSF+cNjglN4FdKw4SCJTQYXlx4S+KG88Jrx
+ZhKvR87tNReEQe3ZvJDu8TCc+cdym5kgHoPcOJ7nWDycllqYKn/JRG/GvuS8
+T5n4mqS54nxEAWq5ZsUplwrw6dfMaGf/EjwPbRKLtS7Bo7n6rvrD5TDQU7dU
+f1KOR6o2R4QvVsLr2Q0Zr12V6I0z2XC0tAblH7Yr3HaoQfZm+3Lfz3WQFut5
+FXyqDmdPR80IH2xE1w3K/s66RshPjP+SXNmK7OtKOYPKLegW23akSr4dEg92
+D9m5tuHCOonZ3Ji3GHJZ5xH+rB2/p/zkof4OwQVXt49JdyA04XyA7JNOpBRa
+9dEm7zBNzdZX3d+FozMjLqnd7UTV9g0OsdxuhNrJyw7Wv0fwCe6Hqw49CNk+
+60scuwubNDflZk73YqLIf+DtZDf6mmUo40A2ZDN72kXGPyBAPtL1D9WP4FvZ
++2QO9UBrW8MqDfs+aGb+aenR0IuH++OMopb0w+HfZPdToSxIF+XGzvrcj1Av
+a/3obWwYb73nITnWD9NnySKTO9gIKgk1lJvox4SCtt4JXTa+ldp9VfnRD9vp
+26vVd7PBqpA4oiM6gMVClbn5+9nIqj8l571kAIb/tClfOM7GbvayO/2mAwh4
+6W/cFMyG38yYmLKnA4hcJi/16g15P2ujRmH+AJIVztQV17OhZ97enlM4gMPT
+o6N5jWyIJc2XvVc6gJQ5hSEprWwkbIiN/bN2AKKsEyUuXWyUWiclbaEGcH3Z
+zIFsho3pvIyMPEkOzK68Ff8tQuGkpaFh5jwOwk5rhtWKUqj9RdOpshy0Oy90
+vDGbws09q1bdVORgc2rCJlkJCsqsrCyPFRxcUI3WkJxPQX927tM1OhyETHSt
+LVhG4Zrdi5IMdw6SR55zy7aR59qyLaxzHERlv7L32kFher4HR+4CB5yWL71/
+6FDwrVOWuvYnB85XbrGD9Ci4aIU7OodycL6cM6xmRGGPuJXUyjQOJtrqi+QO
+UxB7/sXxcQcHi1x+Nrm4U6i+afbnx/ccFDkOX+vxoBDolhm9sIeDL1EzNuw/
+R2Fyme2LsD4O/NXUzVefpzAYWSV1+jMHfvXdRQ1+FBpO3H6hNpsLvcXlyVlB
+FG7M3SidvZ2LbH1WUkccBZawzsIcHS5KVn/ijcZTUP+xd9kTPS6mPmUdnZNI
+oYl23PB0DxeRgYbp2+5RmFsRb15wkIvOUOvWq6kUorx+3yx148IwUX1ByWMK
+1Km5CS89uOhYNuJYlElhvb1iWpknF2tFk5oLsii0mGjllftykddcIXiYQ0Fq
++am2yiAuIhY88fXJpRD9vmVeYxIXB/6xmiwpIvmaehWakrm4/iq4IaGY5Kvi
+KzencVGv0pXnW0Ly5QprtD7iYku2SIl6KckXscWio4CLX0s4D66+Iuu7I+VW
+bwMXv4OMrrRUUejTyElkNXPhp9V09GY1hY1qJffZbVxczHgBsxoKbXJv8z++
+J/kEHzfW1lKYNyL6ljPABa+/43ZKPYWYNI/5wz+5MBLVHRxroaDdpHVz3TQX
+FVcv/ZvaSvJ//yFxTojGpQVVu/e3kfzmoaKC2TR+zJnal9JO8k+lTH6XoxF6
++pvFyncULq529tmmQOP33/YXK4mVj6wV+CvRWKL9ydC2k4Lnk+JPUyo0rGt+
+d4S/pyBt00aJbKBRY/Rfdk03haLQOBtDTRrzjnv8MPtAwb7Atjt0M424BOWh
+TuKn4oPt4jtptJ1h57J6KJiVCNVI76VR15v+splF4RvnzS6L/TT2cBQkDNgU
+UqSjy2+b02i/P/69mHjEZVGJvCWNxyYnHidQZH3ktXKUHGkEHdi0X6ePwpZd
+P1bZudD4I7XOJ42Ycq/ISHGl0RrIbBXqJ+tVvS9FxZNGhPGh4JfE70dllBwv
+0FgZ4i4hP0DhilJ3fIYvDavp9NXuxC3nnW6tCqCxUUNkpSyHnJ+UNVKugTQs
+2F+FHYmXNoxFZgfTOJf794U84rMqASHrImn8jEqWNOCS9W+L9dOKp6GzL0bW
+jCbz88vmi3cSjeO5RgGRxParVL2KkmmIfx3wqSZ+euWp27YMGhXp9jIaDAXL
+bG+e/2MasqJznzkST3dudyrLpiHQ3tp/h9hs3Rs75JPxiz3oGyb+djSqJ7CQ
+Roxlbp48j8xfyCGrymLynOqcs5N4T57iO5GXNDILL48cJx7p/XjAsJyGjZiE
+zVXiuNmPmkNf09ihzDdPI9bVcjepqybjt73UVEbM2Gu+Ea+jEb5Zve09cVTk
+5O59jTTydU9ajxCf6LkQEdBCIyO2WlKET0FzzWhLbjuNZYe87eSJRf3d5Abe
+0egL6TdeQdxdTx+T66ax3OJyqyZxtqJD6p5eGr3fCsd0iANcWdyLFA1O86+c
+PcQHXlityemnscXo9QxTYlXxjnNsLo11n31GDhB/OWr2XJpPI8sx0vsg8ZvM
++p+7PtFwOH3utgVx0qSBnvcIDeGOWCMzYnfjf689GqfhHnv2jjGxbsKOxu4v
+ZP1euvnoEcvwi+ZJTNJ46PFreDMxd6umpc4vGnuHb/1QIy4K++feuWkaH+6m
+JikSh3ep9d8XYhD/MbZ1NrHNqoyV72YyMDnBxE+Q+Vnvt8x9lhiDwFrhCRbx
+jDdJ+doSDIrYtn1VxG8XLPjuJsUgPcrleCbxQ5dbO5NlGDj33DoXSWwyK/yN
+kAIDvSH5XUbEiy1FJDcpMXhseEhIlXj04ZWDLksZfD176cBPsh/uGvqwG5Yz
+kEm1TEwndokdU51axeDsmtFb3sTb6DOnN6xlsDVKZ+FuYirk5MQdDQbbNtTV
+dJP9mPeOrV27iYEXM/Q5lTh4+bErk1sZ+DrHpDkRq1Wbi9vpku8JaaYzZL//
+lG00u7mLgfxteUE6cbPjnruvDRi8bjWptyc+L6KzbOU+BuuT/KWayXkxOFTi
+dNSMQdQ9u0uBxAvTtbIjLRiob3I8q0Fcpr9m86gVg5y/MrnXyXmcHbRwX4kT
+g8HVHOE/yPntab8dM3SK5Mu6f6uSnPcnKlLvF59hMPRhzYPjxAdfz3S46sWg
+evjCntsfKfw9Q+BrcoXBS6b2xgdSTzb+1fSAFc9A8dbChFFSn+KGfvZ0JTHQ
+enTfyJN46shq2Y5kMp4bwdUjpL41qIcG16czYG+NXU53UXDqgVNRLgPNSI5X
+MamPCZufrYh5w8Bj99r+cVJvp9P67a43kPHE5GuaEzvPnRcX2swgeGWxSTap
+z5oc91kBHQzGzaKbjpH63RSzkuf6kUFafpxESiPZH8OJmbu/M/Cf26zwkvQD
+F6u6Pt2fDNaYFqZ+If2iufKbwvYpBg1nTzJriZMSD0VsFOHBkuuaf6eSwiYj
+Sbcl0jz46F7XNK6gcPpB4NrvK3lITC0NMSD9qu3oqafZljy87vePCiP9MfqH
+mQ1zjIdT84N0HEj/NE3aIqZqx0PJqVBt7Ufk//eKnkx05KHHIFCSSqdQZZ8h
+H+7Jg0yG4gpx0n+LnPovO0fyECacmcS6S+bb02afcjkPIs5/r/a5QsFaZvek
+zWsebET/1v9+mYJiwZqH8dU8BBZ1x/leIvM/8WNaqpF8r1hl1P0i6Ze+CQVT
+XTyYFeRYaJP7RNDlTsXecR48HYx99jpTcA0358eu4KPuzJKfFnvJfjEYCktS
+4+Ocd9/MJHKfkRK6tip1LR/v9bclfjSkUPBnqUumBh9OJjvtHPUp/Oe2gi7V
+4SPV9pqxKbkvRZv+6v94hA+T0y222eoUCuc/7l0dykepOiUZJklhVuuuS+sj
++OiUCk3+i9zPjl1nLdK6QX6fX5TjI07WW2S+9c7bfMTwTuhbk/ud0dfL3WYp
+fOxa99RcdIqNnq6DnReK+Dgs/s/9gU9s0menW14xfDxqkv9cTO6flwPMtj4b
+5KPGixV2poaNSbuU1MxhPmybructrmJDsFTX846Aj03rw7L9ytlg0gJkXKf5
+uKqlsW3eczZaMv47JLdgELM+bQ5pvM9GypOf3W6Gg7D8afPt9J9s7Cz7NrAw
+YxDJ7+UcNVTYkHn7u8L08SDuOspWz1pK8vHEkoOzB7FczlPjwyI2bsoqWY3m
+DeJ5wJaNPnJsDLihsfbVIEorC4oiZrMRoRj+zKdrEL5h5U+Xf2bhva9iSMec
+IRhmTSYrF7HgpbFzxU2vIQyYfb6/HCz0nJz8EuU9hKXdrwOu7GBB/25h9Q2/
+Ibg+P1nWuZUFue/qTpEBQyjj33W4vJGFkrIl6dcihpBY8sA4W4WFaaPfypfv
+D6FdZtorXISFSPvKxa7tQ0gor7phWtOLjOvGcrs1PqEi2Wntd71etO54oCEn
+NIzV251YE1MfMNlW+Uulahin1fzC52R0442n+oTD1c9Yu+Scv6FaF266cBQq
+zEcwN3tfbsaJThze5fDp6LxRpKUNCo3HdGD+efVh6f5RaM63H4z2bkeZpXLU
+f5ZjUBRLNNkf1ILPTJT/zaIxSF4/1vdFuwFKqqq/Ny4dh/bjduk+rxq8aVXs
+Gbsyjta7Kba7xv5FrXBRYz17HGtPD5p7K79AZd/Fw/kGAoQ1VDyZHMzFTo1U
+reIMAUZtecFV7anwFL/3zfGRAOLnt1g47E1FRn/ci3mZAjyopm31XqdA4nY0
+3HIEeHLBuqMqPxk9goB9SwoEiNgcXvMp9h78Cm0dgysEKPuR17T4TDwKti66
+Y94jwDz3ixfH4qPBSC+w/K9XgKfL3DyUEqOwiC+jmMUWYM0GMVFu0g1cTRBP
+Fe4X4PF0fppFWiQO/JjMfs4TIL1CbHdxQShGSrsqlb4KwI+pkeMNB0D1Tse1
+um/kfarjQK3IZVieaTX2mRTgRS//5JSSP14pvWlp+SXAfr09Zv4HfHHjclHP
+VeEJtOv6F1bf8cC/hwuS18+cwPLmwjyXLldMqD890Ss6AZk9BimdS1xgzX7I
+bBKfgLc7Vh10sUP08/tZ/XMmEHTn7Kw1My1RGZXsHj13AgvPDracNzfFN+fE
+DTukJrBJq+3zUgMdrNaNFfCkJ/CXQhB3r5+t7v8BnuuMWA==
            "]]},
-         Annotation[#, "Charting`Private`Tag$33479#1"]& ]}, {}},
+         Annotation[#, "Charting`Private`Tag$29392#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -3496,8 +4769,8 @@ PKyPT2O/kHXS+h9iObzL
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{8.95455994897959, 0.37500000000005684`}, {
-       3.944840409303879, 0.375}},
+      ImagePadding->{{11.588747396477704`, 3.239247427407463}, {
+       5.083598441810324, 2.4950794958917584`}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -3517,17 +4790,133 @@ PKyPT2O/kHXS+h9iObzL
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.5328899165006784`}, {0., 0.5006953511620791}},
+      PlotRange->{{0, 1.1913833361480566`}, {0., 0.4829298151103623}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {142.92733997831488, -86.14928426334575},
-      ImageScaled[{0.5, 0.5}], {267.84937809231235, 164.09387478732523}], 
+      Ticks->{Automatic, Automatic}], {159.06205010860648, -95.87772464051923},
+      ImageScaled[{0.5, 0.5}], {298.0576596306341, 182.62423741051282}], 
     InsetBox[
-     GraphicsBox[{{}, {}},
+     GraphicsBox[{{{}, {}, 
+        TagBox[
+         {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], 
+          Opacity[1.], LineBox[CompressedData["
+1:eJwV1nc8lf8XAHCFSNJCJJE0iAqVhq+jSUnLSEbZJDMz2VGSTUYyQkLKTCoc
+WYUUUXEfRMZ9LjflWjfC7/n99bzer88zzj3n8zn3bDZzvGi5lIODQ30JB8f/
+r1KdXF+MxQxUb03zqX0O66i4IiLC/ZKlDEHc+4vjILpKx9Xokz9LHRgKn+vV
+oahKxUE4vH3qAlxb16Ozxrq26lzGQrEV6xLUJtheFIO2KrNvw51/x4yhXKZq
+5A6LVnUo2NqvYcoUzqf0fhywGqg6nma4dvWkBawYtNC1sxmp0np97sllljVo
+m8Zv+aU6XqXXfuxA5h9bWK8duP9B+1SVyS/lZuaYPfi0ysbIsWarSjmFdye7
+O4F74+kEfS0OfL06io1TzjD3L9IqyooTq8T5agZdXeDknyPeFXXLsEY26P7y
+SVdQCHUIJKz58ONxz03aLA/ok1gAd9U12HqBRfdwvgk2K0Ie23usw69X7Ioe
+/fGCIrll6sQXIez1NDk+POYD3r8rYoXGN+BAMG3lCgc/6Fs1oNRXIo6up/JG
+E9z9QSxmLCjijCR66km/rJgKAOGGH5ddLbfgrFG/6LmXgdClNn/vzYqt6GOe
+6tvvehsmnA1MlWu3YaCTiMayySDInC9R/2Ipi/dD+YlzrLtwn7UgVaGigALR
+jfCzKARKI7WSCnQUMSrhTpar8z3wnHbXOuymhHFZHA5Jf0KhJSclS7R1H6ZW
+TXIMjIWD9T3i/SDzEErWF1m6vYgA12ObF8JOqWBms0MTj0MkNCRx3Gl88R/q
+2E2einePgiZWWp7vKTXUv+mw7u1UNLzl7+yXMD2GSf8+ngjSjYGC/BnlSoXj
+SPPb6an1MgaEL1XoZSw7gcZ3yO4frrEgv20q9WjlSTSLNcvmmoyDClDtaDM+
+jdef6x08y0qAUqtjecx9FzCHIJZuM0gEPn+BZqmPF3B4uenH+XeJYLZlXKfL
+4iKaWF2/+jw6CaTfW4U1pGijnoR/ML9CMvhlaeUkyevh0ejctibHVMgiDDj6
+6gzRH3clZ3xPhcONk6V/A42w8leJhRekgf+bVeyIY8a4ceuPuTiedAgUOvlJ
+9uMVTAhgRBz/ng5L2oEjct4Eww8tlGa6Z8B/xtx5rdYWmN9WnRSZlwHh1hbh
+WTQLbLK57XurNwOmB6VPlpy1RN4EXg3tk5lQe3nsmv8hKwycWEssFc6Ct56x
+Ve2SNuiZv32J2csn4B75dOfuHXZosemCluRkDowEbMtaG3UDaxxOGCdL50Lz
+qsTsb99voCQetBfWzYX3HTteS0q6YPdVqXD+slwIi/TJPFnsgrqPJz6yPfJg
+4dDq+G/drnhSOv5M29wzGFLd+XbstAdulyU0AzkL4MDeiyH7Q73xjtdnw3ml
+Avh8vOVz8E9vHGyqve5pUQASG/4GXzrsg+nX8+871BdA5wKrOmDMB8O+VVk+
+P1YIk7Jq/34Z+CGXSNSTJO4isPih9JZrWwBOPVTceuNeMcyOqHcqqgeh5+BX
+1r7HxeAYs/aAoVcQ/pO/Wf23vBha2V0a1c+DkOsdGgaQxSCfef2wmlAwCtLP
+xESpl8CE8LU4IXowKipZL77gLoVlEycceeLvolNzctdowEsQFJywjJK8j6Nz
+XBGWXuUw2enxateNaNz1x3mJfFw5mH15t6rvQTQ6Dfa6Tj4vh2jQvF38Ohqn
+P5Yb3u4vh1HJ8LA3S2JwaaqdzGON11BnI0DTjY3BDWoddd3Cb+C3jCH9RUUs
+agRlzmmXvIWnB3T04rfHYzb/0WtHmVVQoXqiPsIwGbOlDHWXetbAVs4Ribvb
+M5GIP71b/009BFXx/1Bi5mLevitV7r8+gNjHS/6cuYXoYBPOEcJohni3WTUX
+m1IUmhifW7ntM7C/+O1//a4cO3kP6tYKtUF4a4BfEn8lusiv4BmM+gLi31wb
++sqrcXHeQwjkOuC/IvPujwq1eCfxhs+6/K/AzizaHxZdjwu9PEelznyH2dvN
+WYmKH7D20G7TB4OdILKdk7W3rQlvmwx2BZjSIDFmt4iqegvuVdxbkLNAwOln
+PVd7WZ+xr2VNr4Z/D5h7dCqc39+GPkKh17ZI/YDJeYeLSSFfUOlg03aFK33Q
+5+Y89eJjOz45E68eLt4PBya20EXHO3BVWcGDZb/6YWPzhzA5yW/owRUVVfHi
+JzzZ3tfBlv2Owcavy7PsBiChRk7MfFMnhvHvWZV3aBBehqTw5Qt0YVS6/Vrm
+7CAE5g/IHfzahQc+KkXKLwzCdxctbYPOLuyb+bvCcckQrJnba3OT6MI95+5w
+s3iGYL703OWi/i5snU9lzwgOQUK682HesS5cZdjay7l7CCT9dwhdWEbDCCGl
+Z2LmlMN+NKrvo2F4KPuYZvMQ1P156RoRRkMTmss9n09DkM8r+0c4koaKsr8/
+FbQNwVL+SLmUaBp2Ng5dFuwcApXCPYMZ8TSUWt7u2DM4BPJhk4qx6TQsu/s8
+2XFhCOrrYx2XldKwN8hsIlZhGKoD7R32dNGwsKPnQMPeYejs8d/gSNDwtvRl
+X7byMGieKLJ+1kPDHXXnlhurUt7h1L/xJw1vcP4nsU1zGNhPEvcPjNCQJ3C9
+ZrnFMHg7nbz3b46Ge/w+ZnQnDMN/B+k/DDYSGD8yS/v+cBhazQquyW4icF5X
+Zl17yjBkjLPfz0gQ2CR353Zj5jCYcnQv3N9CoAUNLMoKhmGE2wMeyhKYuK9k
+a9T7YfAp+6avdYBADmZSzrGZYZAwXNDlvUig1aUPfaqzw5C2rHQgSpvAlppp
+kUPzw/A8zlJuvS6BD5O07+3hpMOybVGjG/UJ3Ku+0lZ8FR1Wr/rCt/IKgTYZ
+/jtnttHh/KtaMb9rBLbqW7/I06OD54+CJU98CYz4e9Zw+DIdrKz+7lrwI1Dr
+4X5eKWM6OMQcitUJoOInuM2SzOkw+in7H/s2gbVXsoRCnOjArjmmLHmPwDKL
+fm/LUDqMlU3Z0WMIdOVulHkcTgeLGtOYdXEEKmUXfuuOooPG8M9elQcEFtL9
+9ugk0KHHRoFxJ4HAXNtNg0ez6LDKzvwpO5nAR06GmpJVdFjP/+nXhSwCDdYc
+Yxu+o8Ow63WB808IFC2WfZJQR4faJVYnNbOp/E/8XRBopgPv71D2gRwCI90T
+i+e/0+FZ2anT488IPLve/+pBgg754UF8nfkE8pdb87v10kHW6iLt7XMCQ/7u
+t2IO0kG/tT7Lq4DAQO+vosQ4HR5M/mrsKCZQTbyyQXiKDk+Jx6OZJQQuVma5
+XGTTIT18p5BTKYHeiy4tjQt0CCkfurX4kkD3wLUB5StIGJPi8ZktJ/BayDny
+wVYSZjs1PEyqCKw4PnL34Q4SCK0J6SnKAkuCt6ftJOHCr9Fdd5HA4ptvrHIU
+SDAYKdTJrCbwn+3WoTf/kbClf7LtbQ31e7ZXB6EaCVrXvc4criUwfcBAuu4Y
+9bzjVvFyyieMosxbTpGwToqozK2j6qs11/9Dl4TRYgO6XQOBfcvjAwb1SbA4
+kD7/jbJSw57NDEMSgmrGzFXfE9ipamXCMiWBz/6ROPcHAmXnODhmLEjgbHd3
+tKDs/So5bc6aBJvG8wLvKG/e09bL5UBCgeK/3Tcaqfozr/sudyYhPfJ0UQPl
+hpxlmwRcSai6EOMt0kSg7WYV4/VeJIhu5xsroVy69ikhc4eEcfL+9qZmApd9
+PnJr1z0SXJrjBng/Enj5fvcGpTASbIfjBo5TXuBca6ASQ4JQq09+KeXz1fl/
+1R6QUFdEupCUM7zVk04kkuDEOust2kKg+pR359lUEmLlBbVcKD8sWu+p/ZgE
+K56ZdY8oM+2L1+tnkRC32C1SQ1lVVuuV0VMSlBJ5DYcoRw3T9UzzqPWIii7u
+TwT+zAictnxOgilxOG4L5X1XxeNtC0mQKGm8p0o5RKx8n2MJCdfv5L7Wo0z7
+fvGrSxkJF5dKbLGjLBf3y9XzNQmPVjvU+1L2PR8i6FNBwoFOWloE5Vb+LaUB
+SMVfmVuUTHlLY6X2nRoSNMwkZp9Qdg/WnwitJ6E329/zOeUPRyZiIj+QkJu7
+Vq6Y8oaFcMW4ZhIG328QLKVs92bHl8RPJLxP6d1dQrnKvdY5pY0E1rIs3wLK
+a5SurMnoIOH1pqLFHMoWv9mF2d9JuKl2pjiNctmz2PPPaCQM81Q8iKXMa7Pr
+T0EPCQ4X1HODKBtIN0aW9pEQemgf8wbl/D7z3a8HSOCSajG+Qnnx0cKnymEq
+Hzl68ycpe/ucVS5hUPm9KacrT5ltnJqWwyRBvKFqajVlN9UxntTfJNglmPSO
+U/lnbVJ1imVR+VOyFGil7LgY3hkyRYLKJsngZ/+v348eNV82CcJiQ0eCKA+n
++6y5tkBCaVRPqDxl84CWm1eWMOBN02uhBWp/9JmK/9TmYkBh0vhAM2WaVGWx
+Kh8DjJQ/qF+lfIlzpdjelQwof7+mW5pyx4DRbZnVDGA78RfRqf35KeuftqAw
+A4KN7TdYUtYMPlOxXJQBg3b+zyUof7B8JL0oxgBSPtX3O7W/a7apTDE2M6B7
+v16nKmXgCTP+Ic0AzatpV8eo81FBJ+o7tjNgcva8VDLlspxb8SjPgOq9Zy8x
+qfOldK95oXQPAxbaTn+Iolx4Tcw6T4kBcv1rbihSzpN9q/zgIAP0T1nY21Pn
+NzV/ttP2BAP65Zh/3tUTKBZ++oiJBgPiLfiFz1NOtH+Yq6vJgFLBDw4E1R9i
+dh3yUrvAgOknfuUMqn/cKbwpJmzMAJ2OxYeD7wjkjG68vcKEAXzSfJpGlP2d
+RZkc5lR8PTEybVR/8lJ8XTFqw4BNvvGOxVT/si9lG79zZQDt6quV2pUEjsRp
+NJR5UO+jc0qWVlD/Z26Ju/K9GKBqXGe4lrLJ/gOL8f4M4PbbrNXwhkCdco90
+uzAG2Pr1cfNT/VOlYvrn+iyqHt1rTwhQ/XjNl0XUesoAgYvaInuKqHrTeVNu
+5zGAV+ZGyNlCqv+vE7v0u5ABWYlKKgEvqPNqC80NlQwYXjzUXZlH4D3RkBK3
+7wzQ+3lXOzaDwCu7o6Oe0Rjgv/tnou9jAhVPPLTv72GAyC2Wg1U6gd1O+du1
+Bql4zA437UwlcM+H1mTpcQac7nq5IzyJwG/uokHtfCNg8VC6PzeSwGdhUqbL
+BUaA3ZbWZRxB5StjpyqsGQFF6y2XBMKpfvrpP3beeso/rvVahBLos9XMLlB6
+BGLdNvKRQQRKd+TpKKiOQGCh4MGTNwl0VlDZGuk8Aje1vGWMr1L71Yw9Ge46
+AjJE4MUqYwKPxpXWhXmMQFzbUtONRgQKzshZhPqMwNcjl+Q+U/NAeYV4ZvC9
+EXikWG+/iponFtQXJb0fj4ARX+OO2WMEhl6p2XitbQSyIy5yuG0lcCLSl2nd
+MQIz+5/3OFPzitG7QxVW30dAZSYr6vpmAuWlSwwtekZA0ijKTVec6leMzIdX
+GSOgwOOyi1OIwPVuwSJ6S0bB4vHEdD0ngVn3NQSPKYyC2FmrL0O9NLRkVeoH
+7h2FTg26j0Y3DbddVkp5pzwKqc9emTyl5rWn2zZtU1MdhX+XoOlyBw3z3k0o
+/6c5CrxHfm6KbqRhwUyqobLlKKjz15ucKqHhG/OpjJ1JoxBYocXZc5uGXk22
+dNtHo9ATtD6/3p+GhxX6dualjcLzQS+fPB8aViw0le7IHoVqQcdEGw8aYlJ6
+w9aSUZAQ/5lZZkvDus+aIxIto/Ci2O1N0nkafj6coSC4hAlSOmKmN0VpKF3V
+ZLORiwnFRrNiW4Rp6Kk2kSbNwwRSK9qlcS01n544LrBvJRMUa1kzK/hp6Hp2
+eERXlAlBTxfP2ix04QZT2awEBSaU/L3L5fuzCy3uFAuLmTEhuKN928acLmS3
+1sxtrmWCWHZO+gaZLvTwSJ/b0MCEzRfuKyxKd+G0uO/cukYmLKpOePRJduGU
+7cE57s9M4F0vvzVJpAtZXIWzDBoTWA72HAM8Xcg8kPK3iMWEI+0TLzuHOrEv
+3WPmiNQvKP4K28+kdeJ7J7kJ04BfcLQl/7gebydGWg2I4LkxmPQySJiP/YY6
+R0xH9Vf/BueLqdlGS7/i2htyzFX9v6Fc38VHZn07VuhJhv/T+wMnknd1r1vS
+hr+Gw70iy/6ASEzKe+WWFhSTklrcs2kcuPbeKrw08wHffxal/fEdBxXLoNTy
+k3XYsLSsubFnHPTr8gqmlRFr+jx1io6zYPXK1VeqFV+iikKa0qssFnAcH/2y
+1zsHnZYnT5tns8D/xxH5mV05mNUf/3p1DgucWi5c+Nb/FFfERIDtMxZEvZBh
+j6o/RRrLR1O8mLpfNvXrLaFs9Cg1Mr+NLNgzESVgXZaJxcobYs/RqPez21f7
+SqXi8CphvX8EC0x4a6L3RaXgBnKNaG4PC/r4dzkrLzzCgMTlaUv7KUe3+2wk
+kvH8X3beSzp1v/josVuJSTj25nuN2BQLqjkvOfNKPUCp2PbgD9PU+kPb0Jy4
+ONS7/lnDjU2tG72aSeaJw0qx958+zVHf3zgh6jcWg2HeZbSApROQvuNR2snq
+KKzWKU7ZxTUBJgdtvKiAcELuhQnBPQH+6qKxNnqRaNDzZHjv8gmoftRxgHd3
+OEa8fJzbzzcBanqfkiw2hmFNeIpdBD/l6bvxbnz3cdoyafdhAer53TXGKn/v
+oYzqAxZ9FbW+uFziDRmC/wO9jhxT
+           "]]},
+         Annotation[#, "Charting`Private`Tag$29434#1"]& ]}, {}},
       AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
       Axes->{True, True},
       AxesLabel->{None, None},
@@ -3539,7 +4928,8 @@ PKyPT2O/kHXS+h9iObzL
       GridLines->{None, None},
       GridLinesStyle->Directive[
         GrayLevel[0.5, 0.4]],
-      ImagePadding->{{13.414859693877553`, 0.375}, {3.944840409303879, 0.375}},
+      ImagePadding->{{17.389899113199668`, 3.3159940467838283`}, {
+       5.083598441810324, 2.4950794958917584`}},
       Method->{
        "DefaultBoundaryStyle" -> Automatic, 
         "DefaultGraphicsInteraction" -> {
@@ -3559,19 +4949,20 @@ PKyPT2O/kHXS+h9iObzL
              Part[#, 1]], 
             (Identity[#]& )[
              Part[#, 2]]}& )}},
-      PlotRange->{{0, 1.5328899165006784`}, {0., 0.}},
+      PlotRange->{{0, 1.1913833361480566`}, {-0.43449117625561784`, 0.}},
       PlotRangeClipping->True,
       PlotRangePadding->{{
          Scaled[0.02], 
          Scaled[0.02]}, {
          Scaled[0.05], 
          Scaled[0.05]}},
-      Ticks->{Automatic, Automatic}], {431.01216980739355, -86.14928426334575},
-      ImageScaled[{0.5, 0.5}], {272.30967783721024, 164.09387478732523}]}, {}},
+      Ticks->{Automatic, Automatic}], {480.1250994938687, -95.87772464051923},
+      ImageScaled[{0.5, 0.5}], {303.9355579667324, 182.62423741051282}]}, {}},
+  
   ImageSize->{
-    UpTo[540], 
-    UpTo[167]},
-  PlotRange->{{0, 576.1696596581573}, {-172.2985685266915, 0}},
+    UpTo[600], 
+    UpTo[223]},
+  PlotRange->{{0, 642.1260987705243}, {-191.75544928103847`, 0}},
   PlotRangePadding->{6, 5}]], "Output",
  CellChangeTimes->{
   3.826008397009801*^9, 3.826008507422884*^9, 3.826008595888225*^9, 
@@ -3582,9 +4973,305 @@ PKyPT2O/kHXS+h9iObzL
    3.8261953453066387`*^9, 3.8261957306693487`*^9, 3.826195933693584*^9, {
    3.826703008871719*^9, 3.826703019444212*^9}, 3.827311989617463*^9, 
    3.827312057868156*^9, 3.8273125117881947`*^9, 3.827313870719933*^9, {
-   3.827403984053931*^9, 3.827404008286982*^9}},
- CellLabel->
-  "Out[141]=",ExpressionUUID->"3b47183d-06e0-43b9-8604-0d92f4111d12"]
+   3.827403984053931*^9, 3.827404008286982*^9}, {3.827413651416996*^9, 
+   3.827413657582225*^9}},
+ CellLabel->"Out[52]=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJztnQe4VdW173ekGU1y74u5ufflJTfeWFJucmN6bpIbXxLTe49paowFC/Ze
+sKCooAjWqIjYRUVUQECRJkUE6e1QpIP03nW98Ztr/NeZezPX3oebfPney8v+
+vnMOzDXXmGPMOeboc+7vH3fuySecfty57Y8/7uBvnn3cmSe3P/6cg79xxtnW
+1OotlUqrgyuVyo6DK/w7s3/6r5rPIfzaq/n/29ZfhT9tszfffDN78skns7PP
+Pjs77bTTsltvvTXbsGHDfuFxm2z8+PHZiSeeWLxtXa3VWiqtsgEDBqi5coj3
+X7hwYXbttddmp5xySnbRRRdlL730kvXkWavswQcfzLp27Rr+19rbNm/eHODb
+e5XDHca4ceOyiy++OMDo1KlTNn/+/Mp+3n/jxo2h/5w5c7ytbbZixYrspptu
+yk499dTs/PPPzx5//PFs165dh/ljhrjzzjuz008/PTvrrLOyxx57LHvjjTfy
+tw+MsQqfHTt2ZA8//HCABEQwgVKbqMqhjsWaNWsCFvk88DufKT4pDEtQOMzB
+9erVqwC3n4O77LLLCpR8EYpJ6Ny5c/XwoVfv6oV97rnnsgsvvDBbvnx5tnXr
+1uyOO+7Irr/++hxGu2zx4sVhovRZuXJldsEFF4QFbsX02W9DsVjgD/h727dv
+z84555zsmWeeyXbu3JnNmDEjTNPMmTMdv9bZxIkTs+HDh4cXDVKrbN26dda8
+dOnSgOy0adOybdu25ZN5UDZv3ryw1JMnT6Z3NmjQoOzMM88Mk8aHEcF01apV
+ghhYy5c5W716ddaxY8esT58+lTCj+2Xdu3e38bZs2ZK9/vrr2aWXXpr169dP
+Cx5jx4fFvuqqqwJ8dgP4MD6se6i/QztjGdqBBKjm/7TX4JjPQgkO4sk9e/aE
+95944omsS5cu4d+7d+8uW5xJkyZlHTp0yF599dV8cfZe8HZhTl544YXiJegB
+12XLltmIzYwLKjZu5YPeNnr06LD7bbULDuvZs2dg2HirwoXt27eHga0fv3Pe
+O+OMMyDN56pd4Obbb7+9wIM5grOGDRtmfJ3DYg1OPvlkaC7GHDFiRGDYrBAn
+zRttyZIlRT9bl8CBWRAWeRvr5+Ko6HfbbbeFzc3/tNOYOm3Odi0c43BvQ0pK
+fO3vbcb1gVdYmEDsA/ma/NKfi1/mzp1biEEW8uWXX3ZOyGcYoQEN8KLNl9BF
+TiDZYrKef/75sITNS9MuW7t2bZBXts8CFrFUFayrr746OUUPPPBA1TLbUoal
+QQTES8MSxkvDdqUfclH94FvGXb9+vS9Nu+y+++7LrrjiiiClYXub+jBl9n4x
+tallaQQ/tSxv9Ta2MCxt05wvy/3Vy8I8AcckUrEssB505ljnbexecLd1KOax
+d+/eQZbG88gWOvfccyOWbBtg9ejRo3Y9BAa18uKLL1aBuffee7O77rqramlh
+AV7lL6oJOY1ueOSRRwp1NHbs2KBWYlhIRd6zaS9Q4v2HHnooO+mkk8Iz5Lbt
+agmC1Co0Ap1ahQO8DVsA4VBsjt77tjm0yeAc+tnqFyQ32hkiGeFDP2yKxCq0
+bFO0C31gBOQJzMtmAAXTgAVKLd0QqEFWcNGiRWFDIAuZYpTkX3pDHOhtMKOW
+MSzFfflSfNifRyZe5aOOJ/qEKdUHNSZ9oiVmk8H8WSQY+D9jxfrknnvuKfRJ
+W18g5C5jYKBUC6tch7AO+qR0CJscfWTCr/Ihb5Msh1U09siRI/fSF7Z7pKOK
+fghQ0dISfVE2Rr11sLnTXFc+k5j78PvkRmuTG3fgazor27RpU7Dab7jhhrY+
+fahqTAGmFtUycODAMFX2/0JNy5Dr27dv+PeUKVMKQ25/Z37Yplu3btW7pl1h
+scG5vNq/f39ZbL66bcPq4QiY8R4wfO211+AgGUBmHQXIPAJLxKFpHhEwdOjQ
+wEPaIxMmTAi8D48c6ivJa6NGjQrYaI32rw/+MKeLZYZetrktkd6CDqaOFUbI
+wbHGdZ9tyUKFx1oeOVXML04Vk2HroLlZsGBBaEJl4BIwT1OnTpX/A9GY+Ewx
+iGOIvtUxlzzzFYldpksuuSS8cs011wSXqZ2PJjsTfuE5sqepqamBeyRc8QEg
+hd0He2Bpm1I4zAeGAZlsKK1dhLpeT+vsqaeeCjYPjBktAqQYKwfNwVu33HIL
+S9iiRUg97/L3F6teXLl2a/Pzb/uDPW+8ma3ZsC3870h+N8NyELmENQa0Pzw6
+9qqB2SszV1RBGThmfvbHawdlQ19ZlEOpQWli+N0ujLZ01ebs5RnLs2dHzct6
+D5ie3fr4q9kND75sEvXa+8Zan+sfeDnr/tjE7N5np2b9RszNxkxdli1asTHb
+veeNyg05SofkYG2EX/PrC4kRc0OiTbZr9xvZtPmrs8demJ1dfe+Y7Phrnqu8
+I/v9lQPs2R86PRfannhxTta0eF32hunXa+N5C/GO7LxbhvFC1uWh8UxCYWvG
+wx34f1HbAX9heH/LOEvYwdw3PvxKWOfL/jQqMKr1+3LilTHhd+vAWeNnrMh6
+9JmYnXDtoNaBqd6RHWMQzr91uLHwhMDeT41oyoa8/Fo2/NXF2YhJS7IXXlmY
+PWOs/+CgGaHPRbePyI67emD+eqvstK7PZw88NyNbsGxDpVMYqYoX5y1dHzYg
+eBqkv/Pi3xDO4kWEK+t7jK2zsUF4WMKLL3nb4pWbsl79p2UnXTfY/pdLtxM7
+DwpydPC417LXlm8I8vNtoX+bwN60DRq7ANkLS/l7rbLL73opGzV5Seh/Zejv
+HNi2GPqp4U0Bwz9eMyhbvnrzJxOYpWzcT/8Z/T4efrfOduzak53ZbWgY/v6B
+0/dLdP1Som2Et2FFvTp7ZVA1OcGts/bXDzFlMy2bsWANE/OuaKRx05cHfWSb
+ej+fnrNufjEbNnFRmJ6O8fS0KwZkdq+8Z3TAkdmk6yf+inPUx3QdY59+4wvZ
+th27WzpHw6I5QkFffMfIgilusEmYMGslpFXe4/1Wm9nw0OCZCL+KZufcHsNC
+P/TkZenZ4bNy7ZZgL4Dl40Nn5ybJVxz9FWu2IBHDw5emLP1qAtWhQtX+TJ27
+Krv0T6MKFNDqLKeNUXm/97NZCLaE7YmiH+pcJtElMar7V6HKh/XWjsRQ4PO/
+HVtpDQwJQyeF7Qs+A8tWb866PDg+dOcHTJnADZt3uA/dLtu8bWd234BpYSj6
+mL0Sdim+/8Uxlm/dC0sm46ZHcmzO6T4MovOJ/bKjOnXeqpwM+1m4YuPXaA6Y
+DvHBYflHn59VzD4dez4zNVu7cbsHjdvyItNdEHFt73HZuk3bL4pwCzCVEtiw
+ZUd2apfnQ9+7+00JCP2XP2OjXHDbiPDMxjkqMXeDfVg259m29TTsNb3GIvU+
+4o/NdMuefWleoRtPueH5bHLTqgvjGasG3MpxeHXO6wVQmbVf8mfobdoRpbZI
+Kfye86nbvnN3WDeBOtmEyuipS8NG+Fg0dZgG6oMYtXU9vxzJ1v4b2c4b7W8Y
+kq3ftD08/II/27p9V2jn+YDR87+eADPQEZi1cG12dvfmSbz9yUnZpq07j/DH
+23fuyW5/YlLxGMt856495zXCr01gnPNuySmDw+HW0OM/vdtjxlU8ZHQznFJI
+9ncsYAqTCYH5ghTr+gIi5VP+GC7vP3p+8fgKE7Qbt+w8txzJNo7D/Mh2YmX5
+fN6fGYeH7cgzczg+rsHq5UhbxTnSIsBEsHDw4MHR9FRj86yDZkRkhiYbVW1r
+8VkHNrnp9bD3eYRQXbVua+WcchqVTkDISWzgaPH5nD/DoeIZu9cIE41104Wt
+qzJS9lbrEK1sFWIJJAw2bdqUJPMZhz7bWE7bnwk2D5El/LyTiRGix2fcNDRb
+vmZL5exGZOb2y1U9xxTmOho29PiMY42C0VqbHAiw2oS4desQfebjaTMtZpw1
+E0VK6caZL6JR8ELXrl2TlD/tOA6buLgQpLC9SavKF/0Z6J3l0gyL3zRD5axy
+sts5Va+v2xpkEa+h5GOKtXE79Qp6yCkG5dYhshLF3FMhd7UR9SE2TpJGM9OI
+pZ/ytWFV8F3E0l1Nw5oS+i8nGo4X0R1srY2aypkR0QGoApAjzVWSCpq9aG0Y
+6FP+bNHKjcUYxl9HOEqNcjutHU0iV6w9zM7HyWuTz5hBeMI7btm2K7vu/nHF
+WKhGUzRHRvSgZ8MCG11rNmyrnFG+iPv7awgwfEa9VqhpmdHS4WagFGZjo4xJ
+G/9NIJM8VURXIZliZJ70/sgIxIu2p6msylf92ar1WwtTmxjIejNTOpTTp0Cl
+CbFgefLan56aHB5+wp9hPGk2bet/0rm7XsJBWx7GpCZk1qxZdSl7wvvbrre9
+MjjnNkPHpH/lKH/G9hOKl9w5EhVaOb2csgMceyzNWlNBNjerak6F9Ka0VUm4
+XlxO8+WXXx6CvWLBmsEfd5zHTFtWiBNEntlclW/4syWvb8L1C89gWMThaeX0
+HOijm/+0l1XxH/5s2rzVhclrQrnQvun4tsIQsB8jlS1OH0f4+fELi5nsZuxu
+VkblW/6M3S5C73l6SrCgTm1ETBtAFLYkLm1hgnw0WiG8MYf73QSsR0Wl/ZEm
+5efOvpMRbt9xSGOnLyseDRwzvw5yb/M3UHOiCX88xkvuPtvPREgKr0ei2Sdu
+pMERttb2PYckt5w1M3v5lHK83u5v9DeTWWPDRHw+4s8wqS/0CbVBv5cA87Dj
+heC/y2z7KsM2y77vSxNLPAzz1eu3VdpHyAWgb/fODKuNxN4sVPuHHS9zCcND
+czsx/L5XQHjIIRCYu/nRCQU2ZutVfuTPMNOJuGkX7dy9p1Inxv4OHxNXVxvs
+kSGzwkPFxUH4Arfqzcz9fgLMgxFmuJ10xTpB2v7EweD1aggTm3WQ+gd/A4kg
+FTnztTXh4QdrWJRJMoGcQuoBR8omuHBi4VHjx8rPHAxWqKZx7LRlJ5Uj9Y/+
+xh1P5mYIimPL9rxcSXkf2FeTbzP1gwSY+yOkuvkagtTE2Ssrv3AwDw2aWbhY
+poNPbIRUm+AiyfLAqUGkhB6HOkjtQQJaxlMpzHo7LHhdzOypEK9ryNdXBCKH
+kUEnlKP3P3z0WbZ4cmfgbj6HaM7sz6V35u72Q4Nn/jAB5r4IM6iTCBg3fXnl
+aAeD6ykB9NzYBXWQeqe/8ah7bOhQcz7Cww/4MyJoEhtmFaSQ6uVIsTtud544
+JneuKr9xMDXS54+NkMrZQsEH7H/CUaHHwdF0dbz7JUnHHyVg3euw4EYJLTAb
+NXlJ5bcR1hjSwV26M/cvjo/QCxAP8jEJ68hVQ/LF+ExxkwESjVdT+PQUPvbn
+kSEzi/02/NXFld87GEwxGTO2MDEqNdAUvSTNIBaduyQPWf1rNElX9szjk/f1
+n/bjgqKeWhjzr4XGoHELjvXmkZObbfJZC9f+oREWbTytkgu8c3pEIan3OUhS
+c9rjphZ+nIB1j0Z3j4Cfx4fOPi4aAt+Z5rPcnD6uHLN/cmiEpfC8eO0uD0u9
+N5of4ks86/nM1J8kwNzto7MT5GcSKUOy/MHB1BjCjtRB/ua+1Tq3CjYybScW
+pcKtVOQYeqSivO92TGIxTmSXz//yZwgfMYp5ZCli73KU8eXF6Ew5+dI/Opgp
+kW1sII+NiT2gpVW+qprevXt36Ep5BEEG/m32f8r3/Gcfn1RbpBTCQwWq5cPZ
+IlR+moDxJ6cPv1IqmLCmifPKiQ4fT4Z2LCKTBsfE9LUtq3pVHRs1HZRN58OU
+EZHbsDK5sIHekA37L46F/Ce3ylPE3OmwkNniPkQm++IkBwPzi1Db6zXERNX9
+4eNlcS0lRriSs1dIjdBsMx2tCplg6sptjWoYdzh0PHDZVsgPQ9wtx+bgLCaO
+rfjvq4nwCsvi4xWWpUQEx1/MRMBdUkkZOO2lOPhg/05hf7uDRVvJlCXIRcDj
+FAeDspYmM3OiBvs/cwn+pz+BFcncMAiB5x3mZoUe/+Qv3fZEbi7YelR+ngB0
+mwDZH+0AJMA8c6ZPc0pin37qvFW/q6akpJavpZS8xwcxKyO4DpKzfKTq8OaV
+LpmzaF2gI0C5zTvIL+Jn/IwVHbwZ5zKPbQxnqX5bjXhJmZsCLYgkCu0oaiZe
+ZkQUtfYxARKzE91k4mfCrDx2cJD3hyDaTee4kVsN41aHQT5BMAaMnn+GN6Nn
+yGHS/PTIuVV0pAvEFFOBCOq0eE5pcBkRUoz3RWmIdR4wkBHL/2VhmjJI0XGL
+D0saQl0JSqM0z3QwQycsKrjMrJ7cVExq8vc6tNjxl9EdesgleXjwzEIK2lAp
+zHo4LJOpxVQSRMC+PMvBYBMqftDtkVfqYCbjJja6B45ZEB7KeSPPd4JnQE0l
+/zIBprsjxfqe4zG6i+8YGST5OQ6GnIZch8lNq35djpSMP0q1pO8l2+Tm9vWN
+wo4wclNI3exIIdtkIaNmCH6e52AkKUDWwBwdIRWA/avDQB5c7+KJIbfvdPGk
+sAkJKS2HmcO/SuDTTbDsj/aRJNT5DobYFp6d+1cxPjXQ3h+9IXGjpKWQYiVp
+J11hs1COVOsQ6onc5wu9uc/QPD9PVqCAkMRHbkScpMS156OoJCvRwRW9GetH
+J8Dc5F2xtiUpzYS+yJtDBtGn2VCug8+/+RuKHGJEmNkeHir+q2Q582cK5+hi
+2W/0pUJen+zDEadpTm03cyfq0vj8l41QaUMEJzAab5FPK1xCJU3YtwpxPzWi
+6dcJWF0dFhMhcwOY23fu9tKA1mEcRcOfHDanDmbykgmoyVzuO6ypCims8Ny7
+HoSRk0KqiyMF/goaMS1Ezy5zMCPcJ0KSmG30i3KkFE+QXwgbKK+iBCl76DK3
+SczL/E0pUq0LRxXxZm7B5d6MVSMD1nikIT75vu3mCQ/cty3bd+XLp9S3ihZC
+rGHT9hRSN3hXBcT4GTZx8RXeTD2KcDUT7OcRUgGOysqRs9pItzw+sTlKpIQL
+PoHrrEqewW6QIT5gr1O0GHbSxtQ433jjjdTdp0yf6x197GhJr/sGTLsyWiwV
+Gd3+5KSYqhpACr9RQnFMMT2LwkNleectWV+49rY/RV3d3PCBe51WJNNGiTtd
+KaWn7htKOWCXct6u85lHGaougT1MuOUqxwxjQYtqCvVn5XQe7m9IvDJpyoG/
+xftTcSnH40ja9iEprLpATFg/blnk4mI8OjtVb0TWN3xF/qyT9+/qG7rLg+Mr
+DUnKQ3uK2CCYCFu/6eQSftIEvbZ8g1PV4sSvUjcQzsmI+lQ1V3Kwm+YuWXeN
+uNTcIjHXzNfW/LScJoWo0RtyQs17f9O73u0hOZs5z281zuzKKGczEjuBXfEq
+zAmMvLtOPrBkr++Dzg5QCfRr7htbqYP+hxJQTMLs8WZq6WXz2TyIgpblb9si
+OsLhEJ7RH3ESqi72RkQzj5qRJWmS6TpvxpTVgpig/0k5RUqsyHxqn4dQdnuz
+Ek4U2tgifTM018/Ziqdmz54d2vA5UiR0ctpJFEhFI9PY/9d7f7mo7JSGROSV
+SNJAxPAwB3Y6JQh4VR2aD/Ytn/MGR6o4d4mg4xE/MB1CzZYqSdTVjkmst4k0
+UkQnTUW9rpjHjPAfR3QFYB+J+imGYsa5CJGdjq1i3CFCGhw+YnfjqsJbnMy5
+7rrrOM6e0j1X+0CcjJCzYEzU1bsqM2PWWyXGvQbKvzuUKptj4drt3hysey9c
+GzlpybEJCFICkyL79/nxC2/0ZrwfNds2+FEjVHJzQ7lBDHhjico2h6aojxv2
+KXyudDAE12TCkvHCVLjJ++M3BqX8xKRKHYw+Kt7ftquwK0nDAWqLY4RpDzbB
+tB+74LgEmCscDOapbDdSUIR65IbMdhXK/K9Ys+WH5Uh9zN8gpqOw9nNjFwgf
+zjBEpv1xBb92jKb3bg+rkK+gnKu7j6OIuj2v1EFBBQjPenLIY3CbvJldpQM5
+Zs3/IQGho3elAEvc8crMFT28WZUNnnL4QSNUPIzmq6rC2o0OjQrxyJBP4SPj
+GG9bm9nM61u8OU5ZmX1XB5+POz4btzQnFpTOXB9BU77wkSGeKaoGc5mDCVaX
+Z0UxbRGVCjVNjDN8m7Z/P0IqADvC+8U25dAJi4QFxTfF65t3pLDQae03IzGJ
+lUSIV4E7nsm3e3jwzBiLGmgqMJJkZGATnuu8qyIVvfpP84xFCpnW4bCOeGPO
+onV3eLOy6X/Ms+nfa4RHdRUDUprQxhqHhtul7Wj+SAofOZ3BYb+ySMTpWo7Y
+pTVftA4+n3R8CGiozpLwDCyz2vvLFjVB5tnqahgXOwzSKoJBBhwYf3KMXpzQ
+7PSbKMqLWFqQ62oT57rCcGX3DKXyWyoIjJNP5hKv8mbib5F6SNF2kWOBga1q
+XEJRbHFdx4BoFd1GZxVt79inC2yiq3ZSN+2kSPy0IyGzm4CCMfbr3lX5fnOh
+81RVeFuBnYc88oknZC8pk/pUtfnwnZig0lyW4sLxRTLtShGuntHzww7YXVnh
+CKyIbFPzIU5MgFGsTJUZ/IyavEQZakSgZOnkptdrSChJnyj4UnPnSsoA+oxT
+EfP87a7ol3t/5Q84S3RSAsYFPhzxLjk6ZqD38q4qx+7ce1ylBv8Gyav4cpJm
+90acQsBEk2vsusyboUSOianAFMLnO9EwPKVXdL3Ui6R6OZjY27T99e0WTbz8
+gfg+j5TprEp1mZ2s8KIVG5d6s2qLicLbQpST0JzbYd5Nxvb2rso7kgmuQb0k
+UZW67yLlHn/O5w62l+DHTkGQLHakNmzeUQQEja9PToBRCF2lFvyYLr7fm1G3
+0k/rNm3/VjUJdVNW9e+GSK2GavTJvalUQnGxRY6QqoQwOW3WUiSd613xUxXH
+MstE16zEBkufF2ZXkVQve1V6mUJqO+sYyvRIn5pXstCbcQzlQpuub5+AoFtE
+KCDUGR6Fmx90MKpMxIE28zj3lJNqWWd3ZK6wnubMvObN4n8GMl2fwudsx4fp
+kxJAUOFlPuRg4syAeU0N8akOWRGNNROxMt+hERyXGDNJHBLZAcrZ3kFFvcfk
+EuYRb+acP80YLAb/GxEW4XWdiWAR5AhhkpAWmOcwnh6ZF+MSJLQZPyVBgtJ0
++ISSc32HNT3qzbhZzb7/yhiLGkA6/EXVlADZ+HO9GQaQ1zps4qJTExDOdIoY
+UwY2mUnKOR7z/sqgkPOtg4xOyimTxNwaEzd58wAv1GLebLVTyJwhRrGllfiD
+KUyDejl2ro8lbRat3Pj1Rvik2W62QyMhK3lhPHFaKVLNTt6xeWTgCe8qf6A5
+0J5E5suOTGpPzvIRVCWCv2R6LIWM6gFwk5Ud6z96/pPerOIpZNeW7buOKsfn
+SH8jlnQPDpox05tjb37gmAWnJyCc7hRRoKOdS3aEvSB82KNKB5tvXgcfHVGV
+XOLn5RnLZ3izUu2sn4mrFD6nOT6MqSoq9iBZmqccjFJ24GR4fq0cHx3w1TlJ
+RO7SVZunRfMjAWBCo0MpPq1DOk0GgrnV/byZDScFay5ojEqA8xUnh5GUO4Fx
+UNJTNSuv5LNCeMfaOxQvn+odiB9EOuQZR1PRUxNdlTpzoMM1sWFJUgKlOtlH
+oIxYjGKS54wEmFMSYAhgA+YZBxO7PyvXbv1qOVJf8zeoBVTYx1ZA+GgP4dzZ
+Xkvh097xia3+C9zq7+/91W5eSaUOMkcVfLWgcJPND37Vm5EuCn7YLj2zFJnm
+JCV70fbkAG+WN48yM77/SiNUqqVdOMCwYZtfadOMJhLPoKXwOdm7xr6M7cmB
+3gw3iqJhExfXwefrjg+RU9WZYwxTqPiKQ+OZOGLQ2AV5Znmfb/vt3Llz4YXP
+zXVf6JlyUVVVGPs5thsGebNsHDyKN3VuPkneNxwZUheqdlawYrxDk8bokMtz
+kbePd97uda1qpVVxo2sZmSc6djBgrXckWtdHRVCzF62tQ+s3/Q1qwcQTts9e
+9mYuLJCVYTo0pAj3IVUpZz2+pTTlrJ/gNIW4bb8ql6kyxPsrAUPKNCYoQPqW
+4xsnCkyKjPNm2W1unzgZLc5Nioz4Vs9UfdoJPpzi0+41Pe/NcxatK6xsW6Ej
+y1dFZ9DeiIylUHNhG36MQ8MOVuzf/GsVJLT0ZtH4bsxm51014wujotnHnp/1
+gjfHTpLpvjoUfNspAEudyA8HnXbtqYx2aNKeXn8kClp6K6eulOSax5TfeHyE
+ggwVpeKG1qwUUtNQ+HI5Qd9xaAQeJBTu6JtrulEODb2vZyMmLfmdT3hLUpS6
+l3H16tVJYv7gw8eJI5A2Pqq86MMjEST4xk1fXoeY7/obr0bVoGbDiQ5d3IKr
+ZLOV09EwQVlyeWHp+ojX5DygYGe+tma4d1W+99re4yp1SCkOHY6oOnSoo9YE
+DcTIput+76Q0SFGWXAGYcumP84GIpkc2i8aP41SmT/6rESG5g6TyEDx46qyG
+OzQVvnpF43kJMMc6GAg/vcZ0H+n9r/HAEBZQHYx0bhK/RrlslaOJ53DZmi84
+eP38BJhjHAw2mRIgcBanncVxY71kCoJNkX0pQioA+4HDQLe3r6nZ017WaTj2
+uG2TclSaA9IY6eZovuTNWECyWYxZYixqAP3Q3yAQJvL7DJ0tOTkvSgjPW7L+
+goIOHaSKqzZspDE+hKLrV/UcU6kz+o8cSnx8ecy0ZUO8OZwb8iW2SbkwAeF3
+3pW6JEWcjLnGejMXPAjw4pWbvtgIlVwu6XYY9hvH3HVTgzzXY/PTIil8dOAN
+VlPlI8lIKjDGeX+lPnsPmO4XWLQgsXPAXokdkiSUHxCqQ60QgR82bFhqb/84
+4lwV3WHwceb9OSfujSg3aBNwUQLMb6I5InAp851aZRlasslRH2Y6fyGm7+37
+lNyhvGLatGlGv1FeyW+SJ7xq6jIphn/i2JGGlZrEmEdTyzVQGJjIlQmWciIj
+aW4/5i7JXmYKOzQ7F1X0leZ6FPQm7+Bx8WTQ+6dOAtws/asIcX9HAGdWXr1Z
+iRcnwPzau8bRWbMcJ3jzk8PmFJPzpq4UapRyiElwyz9JQvNJ5+asiQ0o7DWr
+Xo+cwv5onwTq2VQzzuk4RKRIoCpMoaUFyzbUkFCS7mknBjGGQ6/DUH369OEy
+95yhguX4Ux9CfqhLNgUBtkTWqvkXlyQI+JWPE5eQcKCCqMir3l8luvc8PaXS
+sgUQ9lQZoco5X8KlQVxYntoOP/f+bFaub5PBbvrdr9RpzjZQhGESKkXMLyMw
+OocQKlFWb65MitZau8qI/Hw1PSWJIBmM2PkYYwMHDkzS8QtHgI2nUDqeHNfR
+KWRG+ZDYwTRwqD4IUH7pHRRx4WfCrJUKxCDzdI7dutQg3iD9Q9awqakplBjy
+by5SkW+YIkQziRmvYAMehRnblb6OkA7eojJsri4tnY/WVdd62AZTuE0eIqL8
+Td1V1aL0D+Yut6zjGHI/Ncw1dOjQlD4Rh7NFFZkmSYeWe8IRUWotmA5L119W
+h0U56sStZHTFS2Snix4iADJM5i5Z5/SkNLjkBqXXClrigyM8FZiHiTT3xs2X
+J8D8zMHEMU2sPEK0072/lumuflMqdTCSHI6NpH4j5goZWT2UOpkySiEjhcDu
+UwqWXbbk9U0VhZ11iw40G299thwfqTbFfFy0KaWD4pRN2v+leR1L8aneT0ad
+IvLsJyVojLoYlQAnNiBkZMHDpqgqSm/p4DFzbmuQwkJXfKDfxBu2BZQvqdkC
+nymfEFlrsIVuiUK4mSldJP0oGZVsMTfzigQYmVdYm7VGvZCq4eM6SP3OoVF5
+qzo2rvfCytIdI0xgZzfkwuU8mSoX01Yt4S/xvTyfJu8vH832SqUOWr93UFSK
+yLwCJN6P0uky/lhTcxivLBb+h8LbGESqDyHOLXxKBIqPiS4b0E+Xo3KMQ8Nn
+k4Ug8XOfQ0P56gjEQ4NmXpUAI9/ncT/fcGzucStHWsPMdfCRq0qGU5InJA9s
+/Xs5NAX0MHxMlKTw+YF3VQmkD7wgzdafKsdHVzlwUEc2GJe8wCUq+MGfVzzB
+7NirE2DkNsd1ljpeKqRq2LoOUoqSqHjZ4wv3RJwhpzpcuWdzl0JK0QUSNR08
+p0N/1n5hgqNjjAKk4x2PvtEh5mETF93tzTptB8E2R50SKHzXUSAzoCPnsBoZ
+YNVxTKlm5k+Wz4uie2xpJbGPycVqUQ1IDEQBsaeGN12TAKOwHlyrcnJeMVei
+qJep4eg6SP0xWhWd42BTmyNUUdGkEjgX5Dc4lCPVfGIYTpk6b5Xqj2o4+hPl
++CiujlLWjb+4+6br/XaA6jOdcxatuzYB5tveVdWV/Ax9pSjpipm5afG6Ovgo
+d4GM1jkiJD96WSW/hADkqJmy61xwoGL8sfqy7bmi4N6Jsk8qdVA4yVEgVivR
+jmNKqkGl0Crwot24sHMCzDcdDC6nWIyyeWorVF4YHxm04Y4oR+pkh4ZFJ05D
+WRBo6O7Q4iPWpjCuS4BR4ooCL00h4XrU1koHA2vqtshB4xbUQUq5VC6nlutO
+bIbKaB13xgJQEortg4xLYdacMdxdHF5HDFGvoTJZmVdsjDd1o2EkgZRrRgQr
+SscW4OyEThZLOmGNGOzrE6gcFaGuPcEKci/qagdD3YOchFkL18ao1EA71aFh
+7ihRhvOK2asvGo0v/LVtk5dw7XMq1PyMIhWqr/qkZypH+DWHEZ+DgB5T05W1
+3l9yiPMhdQhU6QVXB4rROYKFV36DP4uvXe7q304iKvfx6Gad77lMeocqGVBw
+hp8x05at8+a4UNH45D/K6VTJC26Q7ralUoCKeR2BVfgd7rM9Fl7Zh2yoUm/x
+d3ql0ohf9eHigyMDRs+Pj1ZotvuPnl+Hpg5OEz6vis6IjnMoR+co4zuZzPDp
+kNO0z6nRRjSp5IXh5BaEayOtdYOjotDRuXkFz8fKCVMxGcsrE4uIN4ul84jh
+2iv3jns+M1W5kkb50VKCwt5TqRcHkzQweQfE/sZoYD0zxV+HDBXooShkAMNz
+7C0d3wsH090wYWKQ5aKlZV/u2XhxjvSx4ounwIN6js3en1ynU1upQ9JZDgol
+rdozND0k6RSdkq7H5HfC5fXp9dOkLd06Wh/yRIqwoCMQxzo9VpWG37zjoxEx
+UR1pm1CFpF2DQwkMneXHZVXepO+wpgt9uutmSNNfGJeiInVTNUXcfEHDVscA
+vpD9YgZhTEUNNJUMQ7ckGzqYANrl/iy+0BBayZGLqLq50vQXsKWI+pL3Z3vo
+nhyqy8hv6iim4iMQbVvq38uJ0led4juKZTF1MAZ0K0Vc32c+780JMCr6xdGX
+XYJ0J0y7w8EQuhYrT25aVQep8xwanp+C3UhqkvQ6SjUqqqg3X6V7AoyqoMnn
+67QiNJoKruzy/qqS4cCNY7SvN/opQsnxExLcOX57o6PjGFgAMnHw24gk64QP
+zyTBHhkys0cCzH9GrKajXkwrgXWd8S6ufzDJYMz/kZiwt+1TFswI1bd+8/2/
+fGMhkt94OZV9ucBxw5pXxSPiY+GKjcWz+HIIHVMMdAZQn4+ouzm6MNYc2orO
+5Mf3mjzx4pwq6kpzYPkq7R/CyipH4IdQs38ZNsSnqLrQceLWYNUlYxibYCtY
+NZwOdysYyjHub0nA0rmSmD5s2vEzVhQ3QOhmTDaQ9ftwNX0l+RndOMAXonJP
+hz7Olakwug7LEVLTpkXhmvlSnPJQ3Ig1MK66NQFGX3ER3/ErkjIHQzhMPD96
+6tIakkoSZvG3HXNEjW8grSUpWBNaIKSPwpKwvk1kRacZ4hKdoRMWKQkaE6JD
+YrWEcCVw6KHdr/KCK+8ZXWnZ6kjIkzznqBc3YjoZldTSXOLgyLaqHiNEX0aE
+m7hlt8WJWuUaUpTpEF+gzOOfVZTp23PIqMg5Nun7oWriSlJpOocH6z399NP1
+WO5Sh8R20YE5IW/IFfXy5njLuda13rcnwH0qQZfuvM5y9shf0nKSMakhqiTN
+JqJgPq7079KlSxlRlzkk9q9iSpJupvTk2sKdEltneED9jgQ4nfFFbSnjWEVU
+W0dNl+2yZ01ffzCmK51rU9ITNiSBW8Z+HQVj+vLCBCdkQXBH4QzmXGcI0KrE
+nu5MwNIRatS/SsaryNFMw1ESr8++NM/JSdkHuiQBo0URDP6aN1HEpYCmUldI
+mL1wrcczq2Ed4f2Jcar+BGt1qimc0EP3oMU2lemsw8vRK26VWL+1MC1BYez0
+ZVUVuqrMOyaPROUHlAMo3QxAyEj7gPge8cYwhi6Lg6dOaD4GVQepq5xJeUNc
+xQ+3K9luVFi6f5SbMzF5dwKSrlGgtlW+AfxMqDf0eJu/pFSacUklxiyAu9rx
+IXykXBw/KFEzEVQOGJt55iDck8DnY44PN0vJhIVZKfINPfTtCEhLwVq2evNh
+5ZPVyZFjlThAUnzvj629mWjH+IjxAQDdFp3CUHeDkIjVdsI7wMgOPf7BX9J+
+un/g9Eod9K51eJh5MrOAyxXjSt9x44PQRjRiZvVMwNI3rkFqnJgFFaKMfHTz
+porb8X6Mjw4tx7CzQ8W0iL9yh1kynfbraAKFJIfEcJTvTYD7sIPDjNA3EvDD
+F3kgh/jo4lIYSkHbQeMW1EHyuogFH/NSXTl1ZpSryoDzJQo7EpoGyV4JcB9y
+cASflThla7OldBRBd8zrRnY2t+2+Q8qRvMGhMvdS9fxlYxhU1TBwc6AUN8qu
+ORdZDe6D3p9YqoLRLOerc16PrxJ2b635cqU6GHZxDEmHyoxUPMd28k9KGIzH
+hmXvBMTDHUm+Klr7hZlCxYQe/+wvKWHVqdeYSh0MuzoKsEqf6KvomICp81b9
+KOKD2Cjh37Y4IbscAB4awYm/GIvkL+44H12XHW4xbrakPhBhF2Dd5LCIKcZf
+hAhJpvm/749ZhlhcU+tvM/lAgspD/BVGFv/lZEwD41b+uOTL3BUu5w56ynD0
+KTs5pAsf/xwvucE31wtMhFJxzQiH3YkQ6eKrefPmFeAafMvf3rfxtw3n6PEM
+8QY5f46vu3Xr1sP8lb0v628TX9YfXuWy5f3qYyBwXDwgcGENK/klFnw8XSFk
+gVLV9V3lbN7NR0fFIxnFAFgsZv4ob8w+lZ2F8B05eYlXm1SDy29kbRc2LtJG
+dgbigiOob2Ye59iPuBUiY8uWEGzEV+vXr58Oa2FcDx8+vJisRoe18q3y9hDd
+28dQRaUkVnFoQzQP3AtN/n3eeeeFuBzu2pAhQwLaFDxKEDRIytRiyBAwLOY3
+FFPyhmnes2fPgnlLvitBVdhMArkcfUowEDSuo5kxf1V23EU9w9quWLURiGXn
+6KILbfKlqcNt3X0IfAQF6eTKmTDU0SvS4oqWykZ/OAHu4Ih5b49UPJLMJJrE
+B1PGa1xBqj1CIS1R0xxA3haflPugU9urV6+y6FClheGhQ1qIRvztoaxiljUn
+GJEvunpEXxPs2a4CtTjdJVhIRXg6hkWcH+80K7Rm9R387VoAv/g6J/tz0Y19
+QrtpNx0Piy8Ienc5O/TwkXDd4/Uj6kOigsTjUb5EtQYXmW+z1h9JgH2/v4Kr
+F3/VLaXDptS03MgIvsiTUTQ3MDeg2LDKe8QnDzVfHGLwsE3xrodtfGZyFEoi
+a4e1EAWFhNng+N7GFkWyCZaAfbJC/DVOSrX2CR8zZkwQKnD8nj17gmhDEffp
+08c5v5ol2rYQvtii78BRoR9h6S3bdumrDmsuXaojKG71YQlX6Ko/fggGmEX3
+VX9MdDX+Al0SZTt27Xk0AfF9/gruQMxHpCltFHHu2LFjw76NF5bC+yAIV6wo
+DkDGRzi1mpg0HpYs3vWwZBVTlMQmD2shCjmY/YPopg2FAzrSdyys6TCJnZZd
+nNsWiRZedcshHDOwRarHDo1Aix2mTZsW+jHfT4+cq4hSfIdVHV64zZmWuCY1
+JrLusUMIh5De/LL3QR6RupcXAgNyxwV2x2MJ2O91ekhm6za93Gcbjx8qTBvt
+U/WLj8Ue6m2NRIUuLk6FefdNTrQLqhvzh7Vjo7E3sXQxW4VPS2UEXIpMwFhH
+RmDTYD1PmTLlLyAj2mTTp08vmAIlT7y29pIw/ndQOWfc4ahincYRAwpsqVTH
+of2iI8fxm9gpIm5nkuTxBNj3OFgCETo/IrUkI1Zni6TUuc5MKzNy5MhCqafO
+GB/q8LEtSsLjlZL4+GEtHLaIYXfrJqfDYw31c/16z8RaMIVipjWLM6CctcBu
+KIMvL12LryIRW61KfM2aluKd5YuvuDFbniOsZ3YbaqgaMECY94L7QQDrc44W
+BgRXKClVSniGTFXzAZBq+PqeKhx3rgU+6brBBXyMFbiDHm9zBiMPz3RTe4Bl
+jTYwfd3Wh693QlsMIe8lkVqolOQWDm/J6Pk9aTiVfIX32rVrg+S2NZDJ3+B0
+Oc2YH4gCxBP/x/ywVa7omxNSX4a0f33w+ej7B2ZgavCeWAHFk4nI2apJbZbc
+XRdrjrCCd/nCoekBZY5GsXDYEmxhGOPTDhfZr5C7JMNryzf0LQC+W5xm+5Nw
+7DndhxUAcYq5DYge73CAJaEJrUXJAXdtjZbmYA6vP5rO3hF/gVdwSuAlM0j2
+CnrUVJe088cYIh07dgyvuocH5HjFa785av/6kLXiLKV5nIW9gQOnMPzISUu0
+4iW3+9WxFRRJJwTGGQnzIquEAlqBCrwjnLPJR+imMWVxOO8JfzyVgP+uSOiQ
+Hb70zlEFfAigjK74tmLdfa58OOUoBvh95egrjk29Q5+AfrPMQftQlE6K4qPe
+j9IPT/UW/bCB/dsPK/0SY7zT25CHyE1zpIp3kY2MUSQZdBl4/FVVo6curUOC
+AsisAInN0298wf6Xg6f0hPA9MyQNAqdwtTs3qKofKwJp9HgmMcY/ehsimKsF
+O9zULPqxCqkVpXw79NY11UrAe+X+e8tJuN/bkPwIi453v+SotQ6LTIyXGjub
+wX/zruTAsU1RQqKC01lkW+jRPzGMUkwMAy9RFGzYixAC9tyVQJl2eOGTEdVE
+fGGEOguh8BwTSTVWexODMRXwCetva61v2IOruXiJ69yMaBFCpRBJGJJ1zyVG
+UmKRU6LjZ6wINpNtvFaRiBw0bkHzF7/W+bITnahjTjgKxJzYnmwdQLUJa0fi
+j1WhFJ1tmudw8moa2ggc8G2uLEVrR4GAEDk5Dn4NTgwrH4gJYClhUm4OIzVh
+dkI8bZR0c0ugYo91vt9IhyZRRIS0YMuzu7/YJkA7KFSbQBAlPWw6jAy+vohD
+ZfANC8c1gnz5D5daoKdQP8gwbokhU83VIMYzTmjrkD2g5JOkycq1W/I7Md4a
+sOKbA7GJOMzEF9uTjODcBpV7tu8rbRwECQ5Wm02pPNleX9/W16eNU8yUHvEC
+ERmbLKMsXyx2IrULpHQJ+CFUhkXT5DLXpHDeH/+LgzvQB93Fdy/9tnyKn3EG
+xDekgpa8G1IHfJAiLCAhIBwMY8n9EGI2H8hSrAtQxnGAY8mSMEdMO77I0HwI
+G+1ofv1LORLhd5fEgwP/Cm0H/IXh/a3g8tfAL5ebf+eJ/1dw+SvyxH/ndhyc
+btnbOAdEbqZMmZIqtgq/U+z1mUTbp/8K/arIPnBfcnA2HYSK2oRwIFOCj0qw
+q6mpKVkTXUp7+H1yjEjD221uvvlmxecrqTLefRqrwTU0pKMJzP1Fxqpb/tou
+27lzZ2A9fOWlS5cGX4w1WbhwYaX53pjwZuqc3j5QJ9OJ1QUEgW0iQD169GBd
+94l5U8OWBMgEV8OSyN2/DGQYq7m9ZoS6d6Y0j8AZwP089UwQRCP8mUtZ74KT
+5sFPLIoIWgVPuApe+OSF7lFD+Bzy99b/bmvlLf8HZTBWTw==\
+\>", "ImageResolution" -> \
+96.],ExpressionUUID->"954abb73-0f16-4ccb-86d7-a266e98571c4"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -54560,9 +56247,9 @@ Ixn6sD9rCf0P/KIjtA==
 }, Open  ]]
 }, Open  ]]
 },
-WindowSize->{637.5, 1062.},
+WindowSize->{717, 792},
 WindowMargins->{{1.5, Automatic}, {1.5, Automatic}},
-FrontEndVersion->"12.2 for Linux x86 (64-bit) (December 12, 2020)",
+FrontEndVersion->"12.1 for Linux ARM (32-bit) (August 18, 2020)",
 StyleDefinitions->"Default.nb",
 ExpressionUUID->"6f6c570c-dfc0-4320-bdc7-0f1de62bb24c"
 ]
@@ -54577,335 +56264,334 @@ CellTagsIndex->{}
 *)
 (*NotebookFileOutline
 Notebook[{
-Cell[558, 20, 423, 8, 24, "Input",ExpressionUUID->"e595a667-7f25-4f98-9f12-a321a236d113"],
+Cell[558, 20, 418, 7, 29, "Input",ExpressionUUID->"e595a667-7f25-4f98-9f12-a321a236d113"],
 Cell[CellGroupData[{
-Cell[1006, 32, 156, 3, 50, "Section",ExpressionUUID->"bb531fce-8a9d-4a5f-8d6a-ec66b9fbf698"],
-Cell[1165, 37, 3945, 61, 55, "Input",ExpressionUUID->"c239eacb-bd0a-49ce-8667-3aa72e4020c9"],
+Cell[1001, 31, 156, 3, 68, "Section",ExpressionUUID->"bb531fce-8a9d-4a5f-8d6a-ec66b9fbf698"],
+Cell[1160, 36, 4069, 62, 71, "Input",ExpressionUUID->"c239eacb-bd0a-49ce-8667-3aa72e4020c9"],
 Cell[CellGroupData[{
-Cell[5135, 102, 5378, 82, 22, "Input",ExpressionUUID->"3d566693-1b4e-4bc5-b33b-b8036e1e4822"],
-Cell[10516, 186, 415, 10, 18, "Message",ExpressionUUID->"1c182b96-c1c8-47e1-acd1-78c085fad78c"],
-Cell[10934, 198, 8220, 119, 25, "Output",ExpressionUUID->"83666f30-49e7-43b4-80f6-e48366afbcad"]
+Cell[5254, 102, 5623, 85, 51, "Input",ExpressionUUID->"3d566693-1b4e-4bc5-b33b-b8036e1e4822"],
+Cell[10880, 189, 8615, 127, 55, "Output",ExpressionUUID->"ce03c573-ca33-401b-90ba-5bd25d99354f"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[19191, 322, 2035, 41, 71, "Input",ExpressionUUID->"d41a0bd7-fcf9-49ad-ab2c-6c1fb49d80e4"],
-Cell[21229, 365, 489, 11, 18, "Message",ExpressionUUID->"ced7d64b-20bc-42c3-b577-c706eee45834"],
-Cell[21721, 378, 27227, 477, 138, "Output",ExpressionUUID->"f1a29def-c507-49d5-a1eb-e27b3b7aa51f"]
+Cell[19532, 321, 2030, 40, 92, "Input",ExpressionUUID->"d41a0bd7-fcf9-49ad-ab2c-6c1fb49d80e4"],
+Cell[21565, 363, 530, 12, 22, "Message",ExpressionUUID->"d6bda865-5990-40b2-a51c-720a0d22ec73"],
+Cell[22098, 377, 48610, 827, 205, 25867, 457, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"d0a859da-0926-499d-89e7-01e150db65d8"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[48985, 860, 3062, 65, 157, "Input",ExpressionUUID->"6c557c5e-e6b4-4351-9c51-9653ebaa3755"],
-Cell[52050, 927, 20173, 446, 138, "Output",ExpressionUUID->"550ffdb4-dbe3-4db6-a510-a3a6be0895b7"]
+Cell[70745, 1209, 3200, 66, 216, "Input",ExpressionUUID->"6c557c5e-e6b4-4351-9c51-9653ebaa3755"],
+Cell[73948, 1277, 19705, 395, 204, 11522, 263, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"b28d9e81-c7d6-4780-9722-5e838afd9601"]
 }, Open  ]],
-Cell[72238, 1376, 3616, 56, 55, "Input",ExpressionUUID->"4dc1af41-4bef-447e-a233-c8c033887359"],
+Cell[93668, 1675, 3690, 57, 71, "Input",ExpressionUUID->"4dc1af41-4bef-447e-a233-c8c033887359"],
 Cell[CellGroupData[{
-Cell[75879, 1436, 6455, 93, 22, "Input",ExpressionUUID->"e74b775a-c745-4f15-9b63-7bb00af5a487"],
-Cell[82337, 1531, 2836, 47, 42, "Output",ExpressionUUID->"c721f549-2817-44bb-ac54-1cce625d65af"]
+Cell[97383, 1736, 6592, 94, 29, "Input",ExpressionUUID->"e74b775a-c745-4f15-9b63-7bb00af5a487"],
+Cell[103978, 1832, 3242, 57, 75, "Output",ExpressionUUID->"0f4a791d-4a5b-4503-9704-91aa49f4aa67"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[85210, 1583, 2121, 44, 87, "Input",ExpressionUUID->"fb42dfa6-f948-472b-87e8-e4cb6e90ba26"],
-Cell[87334, 1629, 19440, 364, 103, "Output",ExpressionUUID->"780abf21-a6d3-46d2-b547-fd3404f56c38"]
+Cell[107257, 1894, 1885, 36, 92, "Input",ExpressionUUID->"fb42dfa6-f948-472b-87e8-e4cb6e90ba26"],
+Cell[109145, 1932, 35714, 618, 200, 16505, 304, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"2fed4247-1bf7-4b41-ace8-8affb4f078d9"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[106811, 1998, 3105, 66, 157, "Input",ExpressionUUID->"82d96d28-401c-43fa-8337-b55bfd500552"],
-Cell[109919, 2066, 10411, 229, 138, "Output",ExpressionUUID->"6f2f5da5-4600-4a92-85ae-cca01fb533fd"]
+Cell[144896, 2555, 3145, 66, 195, "Input",ExpressionUUID->"82d96d28-401c-43fa-8337-b55bfd500552"],
+Cell[148044, 2623, 21579, 442, 208, 13742, 316, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"2795cd65-b435-475a-a7c3-265a28bc9991"]
 }, Open  ]],
-Cell[120345, 2298, 3056, 49, 55, "Input",ExpressionUUID->"172fdee0-af8e-4049-9dda-cfec26fad09c"],
+Cell[169638, 3068, 3178, 50, 71, "Input",ExpressionUUID->"172fdee0-af8e-4049-9dda-cfec26fad09c"],
 Cell[CellGroupData[{
-Cell[123426, 2351, 5575, 82, 22, "Input",ExpressionUUID->"0ea1b44d-26c0-49ba-8c54-6d51b749dcee"],
-Cell[129004, 2435, 2989, 50, 42, "Output",ExpressionUUID->"56c18def-f4e2-417e-9122-970061230305"]
+Cell[172841, 3122, 5633, 79, 29, "Input",ExpressionUUID->"0ea1b44d-26c0-49ba-8c54-6d51b749dcee"],
+Cell[178477, 3203, 3610, 63, 75, "Output",ExpressionUUID->"2ac0e484-7c64-4080-9011-1dc2e15c4d10"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[132030, 2490, 2116, 46, 87, "Input",ExpressionUUID->"324ac29a-a49d-4e6b-a8d8-b259afcd34c7"],
-Cell[134149, 2538, 12026, 243, 106, "Output",ExpressionUUID->"c649f99a-b980-4714-acb5-e71ec36d8280"]
+Cell[182124, 3271, 1743, 34, 92, "Input",ExpressionUUID->"324ac29a-a49d-4e6b-a8d8-b259afcd34c7"],
+Cell[183870, 3307, 35033, 608, 201, 16556, 305, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"cadeaac6-1a22-4e8e-b41a-a387ed7b1836"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[146212, 2786, 2165, 57, 141, "Input",ExpressionUUID->"d85908e0-a479-4a49-999f-e6e49522af2d"],
-Cell[148380, 2845, 12666, 283, 138, "Output",ExpressionUUID->"a6d1a118-756f-4ed0-a86e-9a8b80b25962"]
+Cell[218940, 3920, 2042, 52, 174, "Input",ExpressionUUID->"d85908e0-a479-4a49-999f-e6e49522af2d"],
+Cell[220985, 3974, 20452, 417, 204, 13445, 304, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"face6933-14b9-48f9-ae2e-d7eaa7164c92"]
 }, Open  ]],
-Cell[161061, 3131, 3104, 49, 55, "Input",ExpressionUUID->"4fbf2b0a-5252-416a-b90a-a12f6d946efe"],
+Cell[241452, 4394, 3183, 50, 71, "Input",ExpressionUUID->"4fbf2b0a-5252-416a-b90a-a12f6d946efe"],
 Cell[CellGroupData[{
-Cell[164190, 3184, 6118, 89, 22, "Input",ExpressionUUID->"5ac27342-feda-4aa6-9098-1d0e7b78fae8"],
-Cell[170311, 3275, 4561, 76, 58, "Output",ExpressionUUID->"27f02b30-ca65-47fc-b569-1f1337edbf82"]
+Cell[244660, 4448, 6162, 89, 29, "Input",ExpressionUUID->"5ac27342-feda-4aa6-9098-1d0e7b78fae8"],
+Cell[250825, 4539, 5185, 85, 96, "Output",ExpressionUUID->"0b968ca3-4b2a-49a0-947e-8d00eeca52c5"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[174909, 3356, 1882, 39, 71, "Input",ExpressionUUID->"63fcec7c-aaff-46be-90dc-231bca0993d9"],
-Cell[176794, 3397, 9607, 189, 138, "Output",ExpressionUUID->"3b47183d-06e0-43b9-8604-0d92f4111d12"]
+Cell[256047, 4629, 1787, 34, 92, "Input",ExpressionUUID->"63fcec7c-aaff-46be-90dc-231bca0993d9"],
+Cell[257837, 4665, 35026, 608, 202, 16251, 300, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"954abb73-0f16-4ccb-86d7-a266e98571c4"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[186438, 3591, 2181, 56, 141, "Input",ExpressionUUID->"8f2cfc94-a67c-484e-bbeb-610484e18a97"],
-Cell[188622, 3649, 13768, 305, 138, "Output",ExpressionUUID->"9909fce1-573c-4c13-ad95-5009778e65ae"]
+Cell[292900, 5278, 2181, 56, 195, "Input",ExpressionUUID->"8f2cfc94-a67c-484e-bbeb-610484e18a97"],
+Cell[295084, 5336, 13768, 305, 184, "Output",ExpressionUUID->"9909fce1-573c-4c13-ad95-5009778e65ae"]
 }, Open  ]],
-Cell[202405, 3957, 3159, 50, 55, "Input",ExpressionUUID->"59993536-91f3-449a-9e8c-58cd1f6ec74c"],
+Cell[308867, 5644, 3159, 50, 71, "Input",ExpressionUUID->"59993536-91f3-449a-9e8c-58cd1f6ec74c"],
 Cell[CellGroupData[{
-Cell[205589, 4011, 6174, 90, 22, "Input",ExpressionUUID->"ab599d2d-27ef-4491-b1cb-534f98403e59"],
-Cell[211766, 4103, 4887, 84, 58, "Output",ExpressionUUID->"5791ce89-84da-4042-b894-b02baf536b37"]
+Cell[312051, 5698, 6174, 90, 29, "Input",ExpressionUUID->"ab599d2d-27ef-4491-b1cb-534f98403e59"],
+Cell[318228, 5790, 4887, 84, 96, "Output",ExpressionUUID->"5791ce89-84da-4042-b894-b02baf536b37"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[216690, 4192, 1882, 39, 71, "Input",ExpressionUUID->"f9bd15f0-d859-4863-9fe9-3ad2883e76d2"],
-Cell[218575, 4233, 9557, 188, 138, "Output",ExpressionUUID->"27a9c152-8a0d-4899-aa74-6a603c9665b9"]
+Cell[323152, 5879, 1882, 39, 71, "Input",ExpressionUUID->"f9bd15f0-d859-4863-9fe9-3ad2883e76d2"],
+Cell[325037, 5920, 9557, 188, 138, "Output",ExpressionUUID->"27a9c152-8a0d-4899-aa74-6a603c9665b9"]
 }, Open  ]],
-Cell[228147, 4424, 2869, 47, 55, "Input",ExpressionUUID->"1282028e-7a8e-46e3-bc91-b35b1d1604ed"],
+Cell[334609, 6111, 2869, 47, 55, "Input",ExpressionUUID->"1282028e-7a8e-46e3-bc91-b35b1d1604ed"],
 Cell[CellGroupData[{
-Cell[231041, 4475, 5473, 80, 22, "Input",ExpressionUUID->"83c6d43c-fed0-4989-a06f-986a75bf7651"],
-Cell[236517, 4557, 649, 13, 29, "Message",ExpressionUUID->"f850765e-bd6e-4983-ab5b-d0a4594f5e4f"],
-Cell[237169, 4572, 3284, 67, 76, "Output",ExpressionUUID->"867e56b6-68c5-449e-9999-5d28dbd56383"]
+Cell[337503, 6162, 5473, 80, 22, "Input",ExpressionUUID->"83c6d43c-fed0-4989-a06f-986a75bf7651"],
+Cell[342979, 6244, 649, 13, 29, "Message",ExpressionUUID->"f850765e-bd6e-4983-ab5b-d0a4594f5e4f"],
+Cell[343631, 6259, 3284, 67, 76, "Output",ExpressionUUID->"867e56b6-68c5-449e-9999-5d28dbd56383"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[240490, 4644, 1852, 38, 71, "Input",ExpressionUUID->"9903c113-3088-4e43-884e-783e3462a3bd"],
-Cell[242345, 4684, 17127, 315, 136, "Output",ExpressionUUID->"ace4a267-d48c-4a17-8b21-0b8791f1d4a8"]
+Cell[346952, 6331, 1852, 38, 71, "Input",ExpressionUUID->"9903c113-3088-4e43-884e-783e3462a3bd"],
+Cell[348807, 6371, 17127, 315, 136, "Output",ExpressionUUID->"ace4a267-d48c-4a17-8b21-0b8791f1d4a8"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[259509, 5004, 482, 11, 22, "Input",ExpressionUUID->"85ae5ebd-4d7b-469b-b177-bd88ef9a9e54"],
-Cell[259994, 5017, 9927, 243, 178, "Output",ExpressionUUID->"392555db-33d5-4e50-8a31-e2a3a67d3a75"]
+Cell[365971, 6691, 482, 11, 22, "Input",ExpressionUUID->"85ae5ebd-4d7b-469b-b177-bd88ef9a9e54"],
+Cell[366456, 6704, 9927, 243, 178, "Output",ExpressionUUID->"392555db-33d5-4e50-8a31-e2a3a67d3a75"]
 }, Open  ]],
-Cell[269936, 5263, 2967, 48, 55, "Input",ExpressionUUID->"d0ac4c0e-3fde-4f39-860c-119c61865e94"],
+Cell[376398, 6950, 2967, 48, 55, "Input",ExpressionUUID->"d0ac4c0e-3fde-4f39-860c-119c61865e94"],
 Cell[CellGroupData[{
-Cell[272928, 5315, 5720, 84, 24, "Input",ExpressionUUID->"31b6196c-dff7-4ae3-ba24-930461af4520"],
-Cell[278651, 5401, 771, 15, 29, "Message",ExpressionUUID->"7df3f521-17b3-470c-a210-7a61feecd5cb"],
-Cell[279425, 5418, 4257, 83, 76, "Output",ExpressionUUID->"ea8fe62a-dd49-4054-b383-0738f0b8f82f"]
+Cell[379390, 7002, 5720, 84, 24, "Input",ExpressionUUID->"31b6196c-dff7-4ae3-ba24-930461af4520"],
+Cell[385113, 7088, 771, 15, 29, "Message",ExpressionUUID->"7df3f521-17b3-470c-a210-7a61feecd5cb"],
+Cell[385887, 7105, 4257, 83, 76, "Output",ExpressionUUID->"ea8fe62a-dd49-4054-b383-0738f0b8f82f"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[283719, 5506, 1796, 36, 71, "Input",ExpressionUUID->"c89d4fc8-2254-4238-b27d-107fefc31da5"],
-Cell[285518, 5544, 17264, 316, 136, "Output",ExpressionUUID->"d1455115-bd06-4d75-a8b5-99c39d1e90d7"]
+Cell[390181, 7193, 1796, 36, 71, "Input",ExpressionUUID->"c89d4fc8-2254-4238-b27d-107fefc31da5"],
+Cell[391980, 7231, 17264, 316, 136, "Output",ExpressionUUID->"d1455115-bd06-4d75-a8b5-99c39d1e90d7"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[302819, 5865, 874, 23, 22, "Input",ExpressionUUID->"d7824482-d74e-4fac-8224-3728d7d92b24"],
-Cell[303696, 5890, 3739, 89, 178, "Output",ExpressionUUID->"ad65c8a7-66e9-4c1e-b599-35bacb78e113"]
+Cell[409281, 7552, 874, 23, 22, "Input",ExpressionUUID->"d7824482-d74e-4fac-8224-3728d7d92b24"],
+Cell[410158, 7577, 3739, 89, 178, "Output",ExpressionUUID->"ad65c8a7-66e9-4c1e-b599-35bacb78e113"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[307472, 5984, 549, 15, 22, "Input",ExpressionUUID->"93164c6e-f8e2-4fb1-ab0b-a65d379b88ef"],
-Cell[308024, 6001, 234, 5, 25, "Output",ExpressionUUID->"db3875cf-f19f-4e24-a7e4-c4017292b8fe"]
+Cell[413934, 7671, 549, 15, 22, "Input",ExpressionUUID->"93164c6e-f8e2-4fb1-ab0b-a65d379b88ef"],
+Cell[414486, 7688, 234, 5, 25, "Output",ExpressionUUID->"db3875cf-f19f-4e24-a7e4-c4017292b8fe"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[308295, 6011, 262, 6, 22, "Input",ExpressionUUID->"40b90456-e65f-4936-94f0-aa9e157985d1"],
-Cell[308560, 6019, 1039, 29, 51, "Output",ExpressionUUID->"e84b103a-4734-481c-bc68-32680f2490ae"]
+Cell[414757, 7698, 262, 6, 22, "Input",ExpressionUUID->"40b90456-e65f-4936-94f0-aa9e157985d1"],
+Cell[415022, 7706, 1039, 29, 51, "Output",ExpressionUUID->"e84b103a-4734-481c-bc68-32680f2490ae"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[309636, 6053, 1085, 28, 24, "Input",ExpressionUUID->"802f97e2-70b5-4c0e-b977-f8a2e505bb60"],
-Cell[310724, 6083, 74312, 1240, 77, "Output",ExpressionUUID->"13540836-8492-44db-8f61-825c10092a3b"]
+Cell[416098, 7740, 1085, 28, 24, "Input",ExpressionUUID->"802f97e2-70b5-4c0e-b977-f8a2e505bb60"],
+Cell[417186, 7770, 74312, 1240, 77, "Output",ExpressionUUID->"13540836-8492-44db-8f61-825c10092a3b"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[385073, 7328, 1597, 44, 40, "Input",ExpressionUUID->"9510d7f0-79c6-409e-9c06-caac79aa83b9"],
-Cell[386673, 7374, 487, 11, 18, "Message",ExpressionUUID->"b9cd98f1-c229-4f5b-95ec-13d954ebd59a"],
-Cell[387163, 7387, 490, 11, 18, "Message",ExpressionUUID->"ea96e00a-9fe6-4d33-80b4-d0a9eed78731"],
-Cell[387656, 7400, 488, 11, 18, "Message",ExpressionUUID->"a31115cb-de8f-481d-994b-5bc9a83710b8"],
-Cell[388147, 7413, 457, 10, 18, "Message",ExpressionUUID->"667a685e-0e76-4db4-8986-9eaad489f3e3"]
+Cell[491535, 9015, 1597, 44, 40, "Input",ExpressionUUID->"9510d7f0-79c6-409e-9c06-caac79aa83b9"],
+Cell[493135, 9061, 487, 11, 18, "Message",ExpressionUUID->"b9cd98f1-c229-4f5b-95ec-13d954ebd59a"],
+Cell[493625, 9074, 490, 11, 18, "Message",ExpressionUUID->"ea96e00a-9fe6-4d33-80b4-d0a9eed78731"],
+Cell[494118, 9087, 488, 11, 18, "Message",ExpressionUUID->"a31115cb-de8f-481d-994b-5bc9a83710b8"],
+Cell[494609, 9100, 457, 10, 18, "Message",ExpressionUUID->"667a685e-0e76-4db4-8986-9eaad489f3e3"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[388641, 7428, 1243, 25, 24, "Input",ExpressionUUID->"4c6fe8ab-4f6a-4b57-92a5-c94e403d041d"],
-Cell[389887, 7455, 257598, 4238, 182, "Output",ExpressionUUID->"11addea4-5f17-44f9-80f6-b7d15dd56efa"]
+Cell[495103, 9115, 1243, 25, 24, "Input",ExpressionUUID->"4c6fe8ab-4f6a-4b57-92a5-c94e403d041d"],
+Cell[496349, 9142, 257598, 4238, 182, "Output",ExpressionUUID->"11addea4-5f17-44f9-80f6-b7d15dd56efa"]
 }, Open  ]],
-Cell[647500, 11696, 2861, 70, 41, "Input",ExpressionUUID->"bc84d748-2ae9-4f3e-87ec-0fa12dfd6954"],
+Cell[753962, 13383, 2861, 70, 41, "Input",ExpressionUUID->"bc84d748-2ae9-4f3e-87ec-0fa12dfd6954"],
 Cell[CellGroupData[{
-Cell[650386, 11770, 4876, 115, 75, "Input",ExpressionUUID->"c099f9b5-a706-4293-9c42-f007146a13f7"],
-Cell[655265, 11887, 372, 9, 32, "Message",ExpressionUUID->"94a73904-550c-43cf-8d0b-35b5cbc01228"],
-Cell[655640, 11898, 414, 10, 19, "Message",ExpressionUUID->"3f893d05-e641-4bf4-9ea5-bcabdc4d6a95"],
-Cell[656057, 11910, 374, 9, 32, "Message",ExpressionUUID->"53b27a41-4cd2-4652-a104-35161ad96bf2"],
-Cell[656434, 11921, 372, 9, 32, "Message",ExpressionUUID->"413977e9-0c84-449f-b053-9df53b50e738"],
-Cell[656809, 11932, 449, 10, 18, "Message",ExpressionUUID->"d499cd59-07fb-492e-b9f7-1ddddfebb272"],
-Cell[657261, 11944, 412, 10, 19, "Message",ExpressionUUID->"395175e1-6469-49cf-a376-9be005af7add"],
-Cell[657676, 11956, 412, 10, 19, "Message",ExpressionUUID->"8f65301b-fe48-42b3-9924-e0e8e3bea608"],
-Cell[658091, 11968, 454, 10, 18, "Message",ExpressionUUID->"6d1c81df-b866-4446-8abe-657a6a8d929f"]
+Cell[756848, 13457, 4876, 115, 75, "Input",ExpressionUUID->"c099f9b5-a706-4293-9c42-f007146a13f7"],
+Cell[761727, 13574, 372, 9, 32, "Message",ExpressionUUID->"94a73904-550c-43cf-8d0b-35b5cbc01228"],
+Cell[762102, 13585, 414, 10, 19, "Message",ExpressionUUID->"3f893d05-e641-4bf4-9ea5-bcabdc4d6a95"],
+Cell[762519, 13597, 374, 9, 32, "Message",ExpressionUUID->"53b27a41-4cd2-4652-a104-35161ad96bf2"],
+Cell[762896, 13608, 372, 9, 32, "Message",ExpressionUUID->"413977e9-0c84-449f-b053-9df53b50e738"],
+Cell[763271, 13619, 449, 10, 18, "Message",ExpressionUUID->"d499cd59-07fb-492e-b9f7-1ddddfebb272"],
+Cell[763723, 13631, 412, 10, 19, "Message",ExpressionUUID->"395175e1-6469-49cf-a376-9be005af7add"],
+Cell[764138, 13643, 412, 10, 19, "Message",ExpressionUUID->"8f65301b-fe48-42b3-9924-e0e8e3bea608"],
+Cell[764553, 13655, 454, 10, 18, "Message",ExpressionUUID->"6d1c81df-b866-4446-8abe-657a6a8d929f"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[658582, 11983, 390, 10, 22, "Input",ExpressionUUID->"a66d45ff-8000-4c96-bcb2-2bc7343fd5de"],
-Cell[658975, 11995, 230, 4, 305, "Output",ExpressionUUID->"5364b922-5bbc-4121-ab23-dc5bb4bec4cb"]
+Cell[765044, 13670, 390, 10, 22, "Input",ExpressionUUID->"a66d45ff-8000-4c96-bcb2-2bc7343fd5de"],
+Cell[765437, 13682, 230, 4, 305, "Output",ExpressionUUID->"5364b922-5bbc-4121-ab23-dc5bb4bec4cb"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[659242, 12004, 2250, 58, 59, "Input",ExpressionUUID->"8e0288f2-5922-4dde-923e-8106073adf6c"],
-Cell[661495, 12064, 1066745, 23056, 352, "Output",ExpressionUUID->"c6c9c8e8-7cb0-4ad0-a6c6-fb0a70db55da"]
+Cell[765704, 13691, 2250, 58, 59, "Input",ExpressionUUID->"8e0288f2-5922-4dde-923e-8106073adf6c"],
+Cell[767957, 13751, 1066745, 23056, 352, "Output",ExpressionUUID->"c6c9c8e8-7cb0-4ad0-a6c6-fb0a70db55da"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1728277, 35125, 1775, 44, 24, "Input",ExpressionUUID->"4355674b-0fd6-4516-8896-cd33a8476ab5"],
-Cell[1730055, 35171, 376, 5, 25, "Output",ExpressionUUID->"b8a18520-7b45-49b0-af16-64f6d0a9c819"]
+Cell[1834739, 36812, 1775, 44, 24, "Input",ExpressionUUID->"4355674b-0fd6-4516-8896-cd33a8476ab5"],
+Cell[1836517, 36858, 376, 5, 25, "Output",ExpressionUUID->"b8a18520-7b45-49b0-af16-64f6d0a9c819"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1730468, 35181, 427, 10, 24, "Input",ExpressionUUID->"ee6beea5-4d88-4650-837d-58c8d3c6363b"],
-Cell[1730898, 35193, 18847, 324, 179, "Output",ExpressionUUID->"a27bcc82-f8f9-42d8-854c-a204a73d483f"]
+Cell[1836930, 36868, 427, 10, 24, "Input",ExpressionUUID->"ee6beea5-4d88-4650-837d-58c8d3c6363b"],
+Cell[1837360, 36880, 18847, 324, 179, "Output",ExpressionUUID->"a27bcc82-f8f9-42d8-854c-a204a73d483f"]
 }, Open  ]],
-Cell[1749760, 35520, 3136, 79, 41, "Input",ExpressionUUID->"5894652c-ea9c-458f-866d-b40d1a5efb75"],
+Cell[1856222, 37207, 3136, 79, 41, "Input",ExpressionUUID->"5894652c-ea9c-458f-866d-b40d1a5efb75"],
 Cell[CellGroupData[{
-Cell[1752921, 35603, 592, 13, 24, "Input",ExpressionUUID->"3fee7ec2-e0c4-4420-8192-c46efe85e265"],
-Cell[1753516, 35618, 5889, 112, 178, "Output",ExpressionUUID->"2bfc8e2b-006d-4096-8c4b-8422da967dcb"]
+Cell[1859383, 37290, 592, 13, 24, "Input",ExpressionUUID->"3fee7ec2-e0c4-4420-8192-c46efe85e265"],
+Cell[1859978, 37305, 5889, 112, 178, "Output",ExpressionUUID->"2bfc8e2b-006d-4096-8c4b-8422da967dcb"]
 }, Open  ]],
-Cell[1759420, 35733, 4130, 102, 75, "Input",ExpressionUUID->"16683f20-3a25-47da-8c9c-58bfb1a56ae7"],
+Cell[1865882, 37420, 4130, 102, 75, "Input",ExpressionUUID->"16683f20-3a25-47da-8c9c-58bfb1a56ae7"],
 Cell[CellGroupData[{
-Cell[1763575, 35839, 1495, 23, 24, "Input",ExpressionUUID->"0c28b27c-3e81-49ce-9293-512f19f95aeb"],
-Cell[1765073, 35864, 6141, 116, 180, "Output",ExpressionUUID->"a225487e-1b09-4625-b1b4-0393225de258"]
+Cell[1870037, 37526, 1495, 23, 24, "Input",ExpressionUUID->"0c28b27c-3e81-49ce-9293-512f19f95aeb"],
+Cell[1871535, 37551, 6141, 116, 180, "Output",ExpressionUUID->"a225487e-1b09-4625-b1b4-0393225de258"]
 }, Open  ]],
-Cell[1771229, 35983, 2010, 35, 55, "Input",ExpressionUUID->"78606265-f50f-49dc-888d-33550f059b83"],
+Cell[1877691, 37670, 2010, 35, 55, "Input",ExpressionUUID->"78606265-f50f-49dc-888d-33550f059b83"],
 Cell[CellGroupData[{
-Cell[1773264, 36022, 4151, 62, 22, "Input",ExpressionUUID->"396a3ca5-637b-4194-943d-7ec379bcf47e"],
-Cell[1777418, 36086, 2707, 49, 25, "Output",ExpressionUUID->"032de8e5-e62b-4c2c-a2db-afe60e4c0f47"]
+Cell[1879726, 37709, 4151, 62, 22, "Input",ExpressionUUID->"396a3ca5-637b-4194-943d-7ec379bcf47e"],
+Cell[1883880, 37773, 2707, 49, 25, "Output",ExpressionUUID->"032de8e5-e62b-4c2c-a2db-afe60e4c0f47"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1780162, 36140, 1600, 34, 71, "Input",ExpressionUUID->"050da7fc-1308-4d49-81b4-1f4efc54c09a"],
-Cell[1781765, 36176, 17028, 313, 136, "Output",ExpressionUUID->"5c8a355d-e522-4c74-8a53-b7d46e9c333f"]
+Cell[1886624, 37827, 1600, 34, 71, "Input",ExpressionUUID->"050da7fc-1308-4d49-81b4-1f4efc54c09a"],
+Cell[1888227, 37863, 17028, 313, 136, "Output",ExpressionUUID->"5c8a355d-e522-4c74-8a53-b7d46e9c333f"]
 }, Open  ]],
-Cell[1798808, 36492, 2110, 37, 55, "Input",ExpressionUUID->"37ec5e26-c9a1-4c3e-b046-f5bdcb69b8db"],
+Cell[1905270, 38179, 2110, 37, 55, "Input",ExpressionUUID->"37ec5e26-c9a1-4c3e-b046-f5bdcb69b8db"],
 Cell[CellGroupData[{
-Cell[1800943, 36533, 4183, 60, 22, "Input",ExpressionUUID->"aafc8bea-bd59-4ab7-b436-168abec75b4d"],
-Cell[1805129, 36595, 2082, 30, 25, "Output",ExpressionUUID->"823a15e6-d4d4-45cf-b711-54e7c88841d0"]
+Cell[1907405, 38220, 4183, 60, 22, "Input",ExpressionUUID->"aafc8bea-bd59-4ab7-b436-168abec75b4d"],
+Cell[1911591, 38282, 2082, 30, 25, "Output",ExpressionUUID->"823a15e6-d4d4-45cf-b711-54e7c88841d0"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1807248, 36630, 1650, 35, 71, "Input",ExpressionUUID->"d90b515e-65bf-42c5-a9d8-7ebc27861a0a"],
-Cell[1808901, 36667, 20490, 372, 135, "Output",ExpressionUUID->"674ddf51-ef87-4ea3-981c-9bca8b07e0de"]
+Cell[1913710, 38317, 1650, 35, 71, "Input",ExpressionUUID->"d90b515e-65bf-42c5-a9d8-7ebc27861a0a"],
+Cell[1915363, 38354, 20490, 372, 135, "Output",ExpressionUUID->"674ddf51-ef87-4ea3-981c-9bca8b07e0de"]
 }, Open  ]],
-Cell[1829406, 37042, 2205, 38, 55, "Input",ExpressionUUID->"74c29eca-8a3c-482d-b962-b5a7bc6eeeb5"],
+Cell[1935868, 38729, 2205, 38, 55, "Input",ExpressionUUID->"74c29eca-8a3c-482d-b962-b5a7bc6eeeb5"],
 Cell[CellGroupData[{
-Cell[1831636, 37084, 6088, 119, 41, "Input",ExpressionUUID->"4f2555c0-0b0b-46e3-953c-b99c2d8ef953"],
-Cell[1837727, 37205, 3154, 60, 27, "Output",ExpressionUUID->"7ba637ff-c37f-4ab3-8f3f-c3a013477573"]
+Cell[1938098, 38771, 6088, 119, 41, "Input",ExpressionUUID->"4f2555c0-0b0b-46e3-953c-b99c2d8ef953"],
+Cell[1944189, 38892, 3154, 60, 27, "Output",ExpressionUUID->"7ba637ff-c37f-4ab3-8f3f-c3a013477573"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1840918, 37270, 1700, 36, 71, "Input",ExpressionUUID->"11bfaed8-b616-4bdb-acee-d6f652a0a4e6"],
-Cell[1842621, 37308, 16873, 311, 136, "Output",ExpressionUUID->"9d9174e8-24e3-40da-860e-87b1062d7e14"]
+Cell[1947380, 38957, 1700, 36, 71, "Input",ExpressionUUID->"11bfaed8-b616-4bdb-acee-d6f652a0a4e6"],
+Cell[1949083, 38995, 16873, 311, 136, "Output",ExpressionUUID->"9d9174e8-24e3-40da-860e-87b1062d7e14"]
 }, Open  ]],
-Cell[1859509, 37622, 2257, 39, 55, "Input",ExpressionUUID->"da646d41-2935-4f0b-94a9-796be9875f10"],
+Cell[1965971, 39309, 2257, 39, 55, "Input",ExpressionUUID->"da646d41-2935-4f0b-94a9-796be9875f10"],
 Cell[CellGroupData[{
-Cell[1861791, 37665, 6220, 122, 41, "Input",ExpressionUUID->"bd584363-7bad-4830-803a-025a2ac0e9a6"],
-Cell[1868014, 37789, 3291, 62, 27, "Output",ExpressionUUID->"83698929-f178-4c4d-9569-7a23e1e9c919"]
+Cell[1968253, 39352, 6220, 122, 41, "Input",ExpressionUUID->"bd584363-7bad-4830-803a-025a2ac0e9a6"],
+Cell[1974476, 39476, 3291, 62, 27, "Output",ExpressionUUID->"83698929-f178-4c4d-9569-7a23e1e9c919"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1871342, 37856, 1746, 36, 71, "Input",ExpressionUUID->"f7b18b38-4aa7-4d26-8653-c5282fb8bc07"],
-Cell[1873091, 37894, 17143, 317, 136, "Output",ExpressionUUID->"aeb5446a-db30-4b37-a075-fd0875fea03f"]
+Cell[1977804, 39543, 1746, 36, 71, "Input",ExpressionUUID->"f7b18b38-4aa7-4d26-8653-c5282fb8bc07"],
+Cell[1979553, 39581, 17143, 317, 136, "Output",ExpressionUUID->"aeb5446a-db30-4b37-a075-fd0875fea03f"]
 }, Open  ]],
-Cell[1890249, 38214, 2305, 39, 55, "Input",ExpressionUUID->"6dd58649-2ccd-4fad-b61e-e6b84d8dc37c"],
+Cell[1996711, 39901, 2305, 39, 55, "Input",ExpressionUUID->"6dd58649-2ccd-4fad-b61e-e6b84d8dc37c"],
 Cell[CellGroupData[{
-Cell[1892579, 38257, 6753, 136, 41, "Input",ExpressionUUID->"47d19cd0-5c7e-4d2e-8522-f7af9f76b03d"],
-Cell[1899335, 38395, 3674, 69, 44, "Output",ExpressionUUID->"e4c2258c-d675-43b1-8eb8-1a175227c843"]
+Cell[1999041, 39944, 6753, 136, 41, "Input",ExpressionUUID->"47d19cd0-5c7e-4d2e-8522-f7af9f76b03d"],
+Cell[2005797, 40082, 3674, 69, 44, "Output",ExpressionUUID->"e4c2258c-d675-43b1-8eb8-1a175227c843"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1903046, 38469, 1798, 37, 71, "Input",ExpressionUUID->"e5291fe9-0a5c-4396-ac44-47a5f71d5568"],
-Cell[1904847, 38508, 17131, 315, 134, "Output",ExpressionUUID->"f761d7d5-04c8-40b2-a937-6fac9575aeda"]
+Cell[2009508, 40156, 1798, 37, 71, "Input",ExpressionUUID->"e5291fe9-0a5c-4396-ac44-47a5f71d5568"],
+Cell[2011309, 40195, 17131, 315, 134, "Output",ExpressionUUID->"f761d7d5-04c8-40b2-a937-6fac9575aeda"]
 }, Open  ]],
-Cell[1921993, 38826, 2356, 40, 55, "Input",ExpressionUUID->"034d75ed-4e94-4dfa-b0b5-fb25cd2d30d3"],
+Cell[2028455, 40513, 2356, 40, 55, "Input",ExpressionUUID->"034d75ed-4e94-4dfa-b0b5-fb25cd2d30d3"],
 Cell[CellGroupData[{
-Cell[1924374, 38870, 6967, 140, 41, "Input",ExpressionUUID->"939e0991-1a33-48bb-8325-c6afb708b1bf"],
-Cell[1931344, 39012, 3893, 74, 42, "Output",ExpressionUUID->"07c46e6f-b409-4e46-91c4-1f8deedd3b7c"]
+Cell[2030836, 40557, 6967, 140, 41, "Input",ExpressionUUID->"939e0991-1a33-48bb-8325-c6afb708b1bf"],
+Cell[2037806, 40699, 3893, 74, 42, "Output",ExpressionUUID->"07c46e6f-b409-4e46-91c4-1f8deedd3b7c"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1935274, 39091, 1848, 38, 71, "Input",ExpressionUUID->"41fa3464-11f7-47db-b9f4-c04a234b3967"],
-Cell[1937125, 39131, 17640, 324, 136, "Output",ExpressionUUID->"e6ece27a-240d-4388-ae6d-863762fb16fc"]
+Cell[2041736, 40778, 1848, 38, 71, "Input",ExpressionUUID->"41fa3464-11f7-47db-b9f4-c04a234b3967"],
+Cell[2043587, 40818, 17640, 324, 136, "Output",ExpressionUUID->"e6ece27a-240d-4388-ae6d-863762fb16fc"]
 }, Open  ]],
-Cell[1954780, 39458, 2409, 41, 55, "Input",ExpressionUUID->"5f4959b4-0631-460c-894f-e078cc08f6c0"],
+Cell[2061242, 41145, 2409, 41, 55, "Input",ExpressionUUID->"5f4959b4-0631-460c-894f-e078cc08f6c0"],
 Cell[CellGroupData[{
-Cell[1957214, 39503, 7710, 160, 57, "Input",ExpressionUUID->"42dd11c3-40d8-4229-9f2b-ea33c98a4a3d"],
-Cell[1964927, 39665, 2581, 37, 25, "Output",ExpressionUUID->"d656f635-4cba-4947-8345-8861516ad400"]
+Cell[2063676, 41190, 7710, 160, 57, "Input",ExpressionUUID->"42dd11c3-40d8-4229-9f2b-ea33c98a4a3d"],
+Cell[2071389, 41352, 2581, 37, 25, "Output",ExpressionUUID->"d656f635-4cba-4947-8345-8861516ad400"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1967545, 39707, 1894, 38, 71, "Input",ExpressionUUID->"3b92c534-fe03-4b93-bce9-3935e73cd50a"],
-Cell[1969442, 39747, 16747, 309, 133, "Output",ExpressionUUID->"047cfbb9-7bc7-4793-b25b-33d1e4b54f0f"]
+Cell[2074007, 41394, 1894, 38, 71, "Input",ExpressionUUID->"3b92c534-fe03-4b93-bce9-3935e73cd50a"],
+Cell[2075904, 41434, 16747, 309, 133, "Output",ExpressionUUID->"047cfbb9-7bc7-4793-b25b-33d1e4b54f0f"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1986226, 40061, 433, 11, 22, "Input",ExpressionUUID->"a88f2391-1bc9-4d7a-b773-d4641b529a92"],
-Cell[1986662, 40074, 6817, 169, 177, "Output",ExpressionUUID->"900bc96d-749d-4402-b6fc-1bde2c834df4"]
+Cell[2092688, 41748, 433, 11, 22, "Input",ExpressionUUID->"a88f2391-1bc9-4d7a-b773-d4641b529a92"],
+Cell[2093124, 41761, 6817, 169, 177, "Output",ExpressionUUID->"900bc96d-749d-4402-b6fc-1bde2c834df4"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1993516, 40248, 1672, 45, 40, "Input",ExpressionUUID->"c2d3e68e-6754-4848-ad45-4d3a81a85373"],
-Cell[1995191, 40295, 511, 11, 18, "Message",ExpressionUUID->"7042c19d-9eb1-4c6c-b9ba-e11ecd2dad61"],
-Cell[1995705, 40308, 511, 11, 18, "Message",ExpressionUUID->"e96fc95a-7476-4cfa-9b6e-023e5f08ec84"],
-Cell[1996219, 40321, 513, 11, 18, "Message",ExpressionUUID->"697e339d-fa4d-4453-8541-d603f6be5ebf"],
-Cell[1996735, 40334, 478, 10, 18, "Message",ExpressionUUID->"a383bd1a-c1d9-49e6-a3ce-876ea12c3de9"]
+Cell[2099978, 41935, 1672, 45, 40, "Input",ExpressionUUID->"c2d3e68e-6754-4848-ad45-4d3a81a85373"],
+Cell[2101653, 41982, 511, 11, 18, "Message",ExpressionUUID->"7042c19d-9eb1-4c6c-b9ba-e11ecd2dad61"],
+Cell[2102167, 41995, 511, 11, 18, "Message",ExpressionUUID->"e96fc95a-7476-4cfa-9b6e-023e5f08ec84"],
+Cell[2102681, 42008, 513, 11, 18, "Message",ExpressionUUID->"697e339d-fa4d-4453-8541-d603f6be5ebf"],
+Cell[2103197, 42021, 478, 10, 18, "Message",ExpressionUUID->"a383bd1a-c1d9-49e6-a3ce-876ea12c3de9"]
 }, Open  ]],
-Cell[1997228, 40347, 3187, 80, 41, "Input",ExpressionUUID->"7baff68f-40db-4778-a165-a239cf88cc8b"],
-Cell[2000418, 40429, 4180, 103, 75, "Input",ExpressionUUID->"54ea4ab2-b182-41d0-bc24-6dda493e24b7"],
-Cell[2004601, 40534, 5400, 131, 109, "Input",ExpressionUUID->"b233f772-ebe4-4d6e-82dc-3e50dc9f4a60"],
+Cell[2103690, 42034, 3187, 80, 41, "Input",ExpressionUUID->"7baff68f-40db-4778-a165-a239cf88cc8b"],
+Cell[2106880, 42116, 4180, 103, 75, "Input",ExpressionUUID->"54ea4ab2-b182-41d0-bc24-6dda493e24b7"],
+Cell[2111063, 42221, 5400, 131, 109, "Input",ExpressionUUID->"b233f772-ebe4-4d6e-82dc-3e50dc9f4a60"],
 Cell[CellGroupData[{
-Cell[2010026, 40669, 1359, 27, 24, "Input",ExpressionUUID->"326e1381-0fb5-48b8-8b67-86eb59a8de43"],
-Cell[2011388, 40698, 488773, 8032, 182, "Output",ExpressionUUID->"ffcf6638-e41b-4dc3-a888-cbc1ddb5bd70"]
+Cell[2116488, 42356, 1359, 27, 24, "Input",ExpressionUUID->"326e1381-0fb5-48b8-8b67-86eb59a8de43"],
+Cell[2117850, 42385, 488773, 8032, 182, "Output",ExpressionUUID->"ffcf6638-e41b-4dc3-a888-cbc1ddb5bd70"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2500198, 48735, 663, 15, 24, "Input",ExpressionUUID->"a93f2c6c-20d9-4e76-bf4e-d83eb645bfe2"],
-Cell[2500864, 48752, 10088, 182, 178, "Output",ExpressionUUID->"e009ecd9-f064-498f-9713-a517c7738512"]
+Cell[2606660, 50422, 663, 15, 24, "Input",ExpressionUUID->"a93f2c6c-20d9-4e76-bf4e-d83eb645bfe2"],
+Cell[2607326, 50439, 10088, 182, 178, "Output",ExpressionUUID->"e009ecd9-f064-498f-9713-a517c7738512"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2510989, 48939, 1607, 25, 24, "Input",ExpressionUUID->"355b7a05-dc53-48b3-a074-381cbbaeac81"],
-Cell[2512599, 48966, 27041, 593, 178, "Output",ExpressionUUID->"c021a3f3-a988-4ee0-849b-500241e51534"]
+Cell[2617451, 50626, 1607, 25, 24, "Input",ExpressionUUID->"355b7a05-dc53-48b3-a074-381cbbaeac81"],
+Cell[2619061, 50653, 27041, 593, 178, "Output",ExpressionUUID->"c021a3f3-a988-4ee0-849b-500241e51534"]
 }, Open  ]],
-Cell[2539655, 49562, 1994, 35, 55, "Input",ExpressionUUID->"a727ff31-abf9-4fbc-b1ba-5e10e05cc6ba"],
+Cell[2646117, 51249, 1994, 35, 55, "Input",ExpressionUUID->"a727ff31-abf9-4fbc-b1ba-5e10e05cc6ba"],
 Cell[CellGroupData[{
-Cell[2541674, 49601, 6104, 123, 105, "Input",ExpressionUUID->"e698d719-72a9-4ac8-adc0-f3dc6de33b29"],
-Cell[2547781, 49726, 599, 12, 29, "Message",ExpressionUUID->"66d8969a-eb54-4408-9ca1-e26797128b2e"],
-Cell[2548383, 49740, 3201, 61, 60, "Output",ExpressionUUID->"c2ede9a0-b94f-4b1e-a656-779f19255c39"]
+Cell[2648136, 51288, 6104, 123, 105, "Input",ExpressionUUID->"e698d719-72a9-4ac8-adc0-f3dc6de33b29"],
+Cell[2654243, 51413, 599, 12, 29, "Message",ExpressionUUID->"66d8969a-eb54-4408-9ca1-e26797128b2e"],
+Cell[2654845, 51427, 3201, 61, 60, "Output",ExpressionUUID->"c2ede9a0-b94f-4b1e-a656-779f19255c39"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2551621, 49806, 1705, 36, 71, "Input",ExpressionUUID->"cf4b5c4b-339f-4dee-887e-9827e8e84f6a"],
-Cell[2553329, 49844, 18192, 331, 135, "Output",ExpressionUUID->"59a5f5ab-6f64-4857-9cc3-85e34ce96d47"]
+Cell[2658083, 51493, 1705, 36, 71, "Input",ExpressionUUID->"cf4b5c4b-339f-4dee-887e-9827e8e84f6a"],
+Cell[2659791, 51531, 18192, 331, 135, "Output",ExpressionUUID->"59a5f5ab-6f64-4857-9cc3-85e34ce96d47"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2571558, 50180, 336, 9, 22, "Input",ExpressionUUID->"284ac71a-7465-46b2-a883-7d04bfed7c1a"],
-Cell[2571897, 50191, 5691, 143, 177, "Output",ExpressionUUID->"8b218d9d-8ae6-4b3f-a0aa-21817c81ea81"]
+Cell[2678020, 51867, 336, 9, 22, "Input",ExpressionUUID->"284ac71a-7465-46b2-a883-7d04bfed7c1a"],
+Cell[2678359, 51878, 5691, 143, 177, "Output",ExpressionUUID->"8b218d9d-8ae6-4b3f-a0aa-21817c81ea81"]
 }, Open  ]],
-Cell[2577603, 50337, 2089, 36, 55, "Input",ExpressionUUID->"7b4489a6-2b9b-4fa0-b010-a2b21dfcde45"],
+Cell[2684065, 52024, 2089, 36, 55, "Input",ExpressionUUID->"7b4489a6-2b9b-4fa0-b010-a2b21dfcde45"],
 Cell[CellGroupData[{
-Cell[2579717, 50377, 6598, 135, 41, "Input",ExpressionUUID->"3bcb2734-3eb2-49b0-9f9e-04e4c7a4fa3a"],
-Cell[2586318, 50514, 3462, 68, 44, "Output",ExpressionUUID->"babae66a-342f-4778-9bda-49d5d95c0e25"]
+Cell[2686179, 52064, 6598, 135, 41, "Input",ExpressionUUID->"3bcb2734-3eb2-49b0-9f9e-04e4c7a4fa3a"],
+Cell[2692780, 52201, 3462, 68, 44, "Output",ExpressionUUID->"babae66a-342f-4778-9bda-49d5d95c0e25"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2589817, 50587, 1755, 37, 71, "Input",ExpressionUUID->"0e6a979b-40f1-49c5-87f2-c038673fb15e"],
-Cell[2591575, 50626, 17980, 327, 135, "Output",ExpressionUUID->"067ae380-8bbe-4d24-910a-2d72ea259077"]
+Cell[2696279, 52274, 1755, 37, 71, "Input",ExpressionUUID->"0e6a979b-40f1-49c5-87f2-c038673fb15e"],
+Cell[2698037, 52313, 17980, 327, 135, "Output",ExpressionUUID->"067ae380-8bbe-4d24-910a-2d72ea259077"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2609592, 50958, 384, 10, 22, "Input",ExpressionUUID->"a0ce8c43-76ba-466b-b075-393a38369f3e"],
-Cell[2609979, 50970, 5952, 149, 177, "Output",ExpressionUUID->"efcd0ede-5fe0-410c-85a7-f2cb4a37d0c4"]
+Cell[2716054, 52645, 384, 10, 22, "Input",ExpressionUUID->"a0ce8c43-76ba-466b-b075-393a38369f3e"],
+Cell[2716441, 52657, 5952, 149, 177, "Output",ExpressionUUID->"efcd0ede-5fe0-410c-85a7-f2cb4a37d0c4"]
 }, Open  ]],
-Cell[2615946, 51122, 2143, 37, 55, "Input",ExpressionUUID->"64ac9234-6e5e-4a0a-889d-9a4d2d9e49eb"],
+Cell[2722408, 52809, 2143, 37, 55, "Input",ExpressionUUID->"64ac9234-6e5e-4a0a-889d-9a4d2d9e49eb"],
 Cell[CellGroupData[{
-Cell[2618114, 51163, 7704, 168, 57, "Input",ExpressionUUID->"d5ce1c93-2d50-4d5c-a1f8-53932ea334e0"],
-Cell[2625821, 51333, 3873, 76, 44, "Output",ExpressionUUID->"55d1b86b-6c0e-4346-b514-6a32ca6f4162"]
+Cell[2724576, 52850, 7704, 168, 57, "Input",ExpressionUUID->"d5ce1c93-2d50-4d5c-a1f8-53932ea334e0"],
+Cell[2732283, 53020, 3873, 76, 44, "Output",ExpressionUUID->"55d1b86b-6c0e-4346-b514-6a32ca6f4162"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2629731, 51414, 1805, 38, 71, "Input",ExpressionUUID->"4639fe6e-d305-44c1-81c3-afb4e380c88d"],
-Cell[2631539, 51454, 17885, 326, 136, "Output",ExpressionUUID->"ee73d4b7-147b-4902-9021-472fa1cbd2dd"]
+Cell[2736193, 53101, 1805, 38, 71, "Input",ExpressionUUID->"4639fe6e-d305-44c1-81c3-afb4e380c88d"],
+Cell[2738001, 53141, 17885, 326, 136, "Output",ExpressionUUID->"ee73d4b7-147b-4902-9021-472fa1cbd2dd"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2649461, 51785, 434, 11, 22, "Input",ExpressionUUID->"487c1f18-3c65-4275-b382-bd34678bb77b"],
-Cell[2649898, 51798, 5661, 140, 180, "Output",ExpressionUUID->"98313969-c467-4d0e-84c2-9301e7354fd8"]
+Cell[2755923, 53472, 434, 11, 22, "Input",ExpressionUUID->"487c1f18-3c65-4275-b382-bd34678bb77b"],
+Cell[2756360, 53485, 5661, 140, 180, "Output",ExpressionUUID->"98313969-c467-4d0e-84c2-9301e7354fd8"]
 }, Open  ]],
-Cell[2655574, 51941, 2143, 37, 55, "Input",ExpressionUUID->"f984095d-d7b8-42c0-84b6-f249f7191889"],
+Cell[2762036, 53628, 2143, 37, 55, "Input",ExpressionUUID->"f984095d-d7b8-42c0-84b6-f249f7191889"],
 Cell[CellGroupData[{
-Cell[2657742, 51982, 7833, 169, 57, "Input",ExpressionUUID->"eb772438-6d55-4597-94c4-e8e4c8a28dea"],
-Cell[2665578, 52153, 2018, 33, 19, "Message",ExpressionUUID->"15e11a28-3910-4175-baec-32f60966f167"],
-Cell[2667599, 52188, 4286, 85, 44, "Output",ExpressionUUID->"dc1d0e6d-dbfc-4101-8f2b-a45c3ce40dc1"]
+Cell[2764204, 53669, 7833, 169, 57, "Input",ExpressionUUID->"eb772438-6d55-4597-94c4-e8e4c8a28dea"],
+Cell[2772040, 53840, 2018, 33, 19, "Message",ExpressionUUID->"15e11a28-3910-4175-baec-32f60966f167"],
+Cell[2774061, 53875, 4286, 85, 44, "Output",ExpressionUUID->"dc1d0e6d-dbfc-4101-8f2b-a45c3ce40dc1"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2671922, 52278, 1853, 38, 71, "Input",ExpressionUUID->"6f764f4a-8e60-4ade-81f6-342ce8502e9b"],
-Cell[2673778, 52318, 17826, 324, 138, "Output",ExpressionUUID->"073b197f-bc4b-40a2-a232-0cc8f06d961e"]
+Cell[2778384, 53965, 1853, 38, 71, "Input",ExpressionUUID->"6f764f4a-8e60-4ade-81f6-342ce8502e9b"],
+Cell[2780240, 54005, 17826, 324, 138, "Output",ExpressionUUID->"073b197f-bc4b-40a2-a232-0cc8f06d961e"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2691641, 52647, 480, 11, 22, "Input",ExpressionUUID->"afe99e33-748e-47f2-ba2a-c0c57008e3ff"],
-Cell[2692124, 52660, 7596, 187, 177, "Output",ExpressionUUID->"76d79e7a-9d2d-45b3-bb8a-8f918994420a"]
+Cell[2798103, 54334, 480, 11, 22, "Input",ExpressionUUID->"afe99e33-748e-47f2-ba2a-c0c57008e3ff"],
+Cell[2798586, 54347, 7596, 187, 177, "Output",ExpressionUUID->"76d79e7a-9d2d-45b3-bb8a-8f918994420a"]
 }, Open  ]]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2699769, 52853, 165, 3, 50, "Section",ExpressionUUID->"747c9bc3-63ef-45c3-af83-bc456177b1c8"],
-Cell[2699937, 52858, 800, 21, 40, "Input",ExpressionUUID->"ebc19a92-5a4d-4254-8fad-8cadbfa1bd32"],
+Cell[2806231, 54540, 165, 3, 50, "Section",ExpressionUUID->"747c9bc3-63ef-45c3-af83-bc456177b1c8"],
+Cell[2806399, 54545, 800, 21, 40, "Input",ExpressionUUID->"ebc19a92-5a4d-4254-8fad-8cadbfa1bd32"],
 Cell[CellGroupData[{
-Cell[2700762, 52883, 886, 24, 24, "Input",ExpressionUUID->"f224ec13-7431-41d4-919e-0ad10e8ff5b2"],
-Cell[2701651, 52909, 299, 6, 25, "Output",ExpressionUUID->"5043975f-bf54-4984-bf97-09e0c59f4acf"]
+Cell[2807224, 54570, 886, 24, 24, "Input",ExpressionUUID->"f224ec13-7431-41d4-919e-0ad10e8ff5b2"],
+Cell[2808113, 54596, 299, 6, 25, "Output",ExpressionUUID->"5043975f-bf54-4984-bf97-09e0c59f4acf"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2701987, 52920, 1529, 43, 24, "Input",ExpressionUUID->"bdb2aaf8-6c60-4fd6-b0aa-d74503ebfe5d"],
-Cell[2703519, 52965, 216, 4, 39, "Output",ExpressionUUID->"672f3cb6-b559-424b-b6e9-dff18bdab931"]
+Cell[2808449, 54607, 1529, 43, 24, "Input",ExpressionUUID->"bdb2aaf8-6c60-4fd6-b0aa-d74503ebfe5d"],
+Cell[2809981, 54652, 216, 4, 39, "Output",ExpressionUUID->"672f3cb6-b559-424b-b6e9-dff18bdab931"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[2703772, 52974, 2328, 62, 24, "Input",ExpressionUUID->"9581e610-c27e-4ccd-9de0-7344556f685a"],
-Cell[2706103, 53038, 584, 12, 18, "Message",ExpressionUUID->"926f5636-f494-4b80-9e0f-998a05d07881"],
-Cell[2706690, 53052, 420, 8, 25, "Output",ExpressionUUID->"3c60fc73-ad7e-4b33-a3eb-fdc35776a150"]
+Cell[2810234, 54661, 2328, 62, 24, "Input",ExpressionUUID->"9581e610-c27e-4ccd-9de0-7344556f685a"],
+Cell[2812565, 54725, 584, 12, 18, "Message",ExpressionUUID->"926f5636-f494-4b80-9e0f-998a05d07881"],
+Cell[2813152, 54739, 420, 8, 25, "Output",ExpressionUUID->"3c60fc73-ad7e-4b33-a3eb-fdc35776a150"]
 }, Open  ]],
-Cell[2707125, 53063, 1234, 32, 24, "Input",ExpressionUUID->"3a793a2c-1a2c-433a-873f-55e7861acacf"],
+Cell[2813587, 54750, 1234, 32, 24, "Input",ExpressionUUID->"3a793a2c-1a2c-433a-873f-55e7861acacf"],
 Cell[CellGroupData[{
-Cell[2708384, 53099, 379, 9, 24, "Input",ExpressionUUID->"6a4616ab-41e4-44cc-8806-ee9851e65934"],
-Cell[2708766, 53110, 21750, 374, 177, "Output",ExpressionUUID->"7ae541cc-49f0-4346-9e8f-3995505a8e9f"]
+Cell[2814846, 54786, 379, 9, 24, "Input",ExpressionUUID->"6a4616ab-41e4-44cc-8806-ee9851e65934"],
+Cell[2815228, 54797, 21750, 374, 177, "Output",ExpressionUUID->"7ae541cc-49f0-4346-9e8f-3995505a8e9f"]
 }, Open  ]],
-Cell[2730531, 53487, 2535, 66, 24, "Input",ExpressionUUID->"02eee1a8-8fdf-4ef6-8fa3-737b3067106e"],
+Cell[2836993, 55174, 2535, 66, 24, "Input",ExpressionUUID->"02eee1a8-8fdf-4ef6-8fa3-737b3067106e"],
 Cell[CellGroupData[{
-Cell[2733091, 53557, 491, 10, 24, "Input",ExpressionUUID->"8858ddfc-1e71-4778-a0b8-512abba3d901"],
-Cell[2733585, 53569, 22737, 390, 179, "Output",ExpressionUUID->"3a7e88f8-603a-4c66-8a1b-065c43aff3cd"]
+Cell[2839553, 55244, 491, 10, 24, "Input",ExpressionUUID->"8858ddfc-1e71-4778-a0b8-512abba3d901"],
+Cell[2840047, 55256, 22737, 390, 179, "Output",ExpressionUUID->"3a7e88f8-603a-4c66-8a1b-065c43aff3cd"]
 }, Open  ]],
-Cell[2756337, 53962, 3849, 95, 75, "Input",ExpressionUUID->"954f68de-17bb-4b28-b089-18f4c1840d53"],
+Cell[2862799, 55649, 3849, 95, 75, "Input",ExpressionUUID->"954f68de-17bb-4b28-b089-18f4c1840d53"],
 Cell[CellGroupData[{
-Cell[2760211, 54061, 448, 10, 24, "Input",ExpressionUUID->"fd8d9fbd-6567-43cc-a4dc-4c986b02e466"],
-Cell[2760662, 54073, 26854, 485, 178, "Output",ExpressionUUID->"b7f39439-0c1d-40f8-af40-5fed6fd931de"]
+Cell[2866673, 55748, 448, 10, 24, "Input",ExpressionUUID->"fd8d9fbd-6567-43cc-a4dc-4c986b02e466"],
+Cell[2867124, 55760, 26854, 485, 178, "Output",ExpressionUUID->"b7f39439-0c1d-40f8-af40-5fed6fd931de"]
 }, Open  ]]
 }, Open  ]]
 }
diff --git a/schofield.wl b/schofield.wl
index 8ac7ffc..1c9482c 100644
--- a/schofield.wl
+++ b/schofield.wl
@@ -47,7 +47,7 @@ ExpIntegralEi[1/(B \[Theta] - B \[Theta]c)] -
      B \[Theta] + B \[Theta]c))])
 RFHigh[ξ0_][ξ_] := (1+(ξ/ξ0)^2)^(5/6) - 1
 
-RF[θ_] := AL RFLow[B, θc][θ] + AH RFHigh[θ0][θ] + AM θ^2
+RF[n_][θ_] := AL RFLow[B, θc][θ] + AH RFHigh[θ0][θ] + Sum[A[i] θ^(2(i+1)), {i, 0, n}]
 
 ruleB[g_] := B - π / (2 1.3578383417066) (- g'[θc] / t[θc]^Δ[2])
 ruleθ0[g_] := Simplify[g[I θ0]/(-t[I θ0])^Δ[2]/I] - 0.18930
@@ -132,7 +132,7 @@ newSol[eqs_, oldSol_, newVars_, δ_:0, opts___] := FindRoot[
     oldSol /. Rule -> List,
     Thread[{newVars, δ * RandomVariate[NormalDistribution[], Length[newVars]]}]
   ],
-  MaxIterations -> 10000,
+  MaxIterations -> 500,
   opts
 ]
 
-- 
cgit v1.2.3-70-g09d2