summaryrefslogtreecommitdiff
path: root/IsingScalingFunctionExamples.nb
diff options
context:
space:
mode:
Diffstat (limited to 'IsingScalingFunctionExamples.nb')
-rw-r--r--IsingScalingFunctionExamples.nb8884
1 files changed, 8292 insertions, 592 deletions
diff --git a/IsingScalingFunctionExamples.nb b/IsingScalingFunctionExamples.nb
index 7f37ad0..1eda301 100644
--- a/IsingScalingFunctionExamples.nb
+++ b/IsingScalingFunctionExamples.nb
@@ -10,469 +10,6862 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 539208, 9380]
-NotebookOptionsPosition[ 533908, 9287]
-NotebookOutlinePosition[ 534304, 9303]
-CellTagsIndexPosition[ 534261, 9300]
+NotebookDataLength[ 944999, 17080]
+NotebookOptionsPosition[ 934897, 16909]
+NotebookOutlinePosition[ 935294, 16925]
+CellTagsIndexPosition[ 935251, 16922]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
RowBox[{
- RowBox[{
- "SetDirectory", "[",
- "\"\<~/doc/research/first_order_singularities/paper\>\"", "]"}],
- ";"}]], "Input",
- CellChangeTimes->{{3.857727143976652*^9, 3.857727184451297*^9}},
- CellLabel->"In[1]:=",ExpressionUUID->"cb2d1f0e-8921-4d60-a098-a74598dfa8f6"],
+ RowBox[{"SetDirectory", "[",
+ RowBox[{"NotebookDirectory", "[", "]"}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.857727143976652*^9, 3.857727184451297*^9}, {
+ 3.872827316271285*^9, 3.8728273233104467`*^9}},
+ CellLabel->"In[2]:=",ExpressionUUID->"cb2d1f0e-8921-4d60-a098-a74598dfa8f6"],
+
+Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"<<", "IsingScalingFunction`"}]], "Input",
CellChangeTimes->{{3.857727185315662*^9, 3.857727193227276*^9}},
- CellLabel->"In[11]:=",ExpressionUUID->"ebe5eb4e-2760-42b5-9d9b-c166d8a7c2b8"],
+ CellLabel->"In[17]:=",ExpressionUUID->"ebe5eb4e-2760-42b5-9d9b-c166d8a7c2b8"],
+
+Cell[BoxData[
+ TemplateBox[{
+ "InverseCoordinates", "shdw",
+ "\"Symbol \\!\\(\\*RowBox[{\\\"\\\\\\\"InverseCoordinates\\\\\\\"\\\"}]\\) \
+appears in multiple contexts \\!\\(\\*RowBox[{\\\"{\\\", \
+RowBox[{\\\"\\\\\\\"IsingScalingFunction`\\\\\\\"\\\", \\\",\\\", \
+\\\"\\\\\\\"Global`\\\\\\\"\\\"}], \\\"}\\\"}]\\); definitions in context \\!\
+\\(\\*RowBox[{\\\"\\\\\\\"IsingScalingFunction`\\\\\\\"\\\"}]\\) may shadow \
+or be shadowed by other definitions.\"", 2, 17, 2, 31921072673290221255,
+ "Local", "IsingScalingFunction`InverseCoordinates"},
+ "MessageTemplate2"]], "Message", "MSG",
+ CellChangeTimes->{3.8846918415052834`*^9},
+ CellLabel->
+ "During evaluation of \
+In[17]:=",ExpressionUUID->"39e14237-1709-44ab-9f4f-4142bbd7896c"]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"PrepareArgument", "[",
- RowBox[{"Data", "[", "2", "]"}], "]"}]], "Input",
- CellChangeTimes->{{3.8716222598767567`*^9, 3.871622264931773*^9}},
- CellLabel->"In[12]:=",ExpressionUUID->"83b24d73-7cfc-4a2f-a727-53c609f967fd"],
+ RowBox[{"N", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]], ",",
+ RowBox[{"1", "-",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]]}], ",",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]]}], "}"}], ",", "30"}], "]"}]], "Input",
+ CellLabel->"In[45]:=",ExpressionUUID->"5918f2c5-d04a-41be-9074-a9d239e03bad"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
- "1.148407773492004`", ",", "0.9896669889911205`", ",", "5.088311186824942`",
- ",",
- RowBox[{"-", "0.011429456733838021`"}], ",",
- RowBox[{"-", "0.172823989504767`"}], ",",
- RowBox[{"{",
+ "\[Gamma]", ",", "0.0001`30.", ",",
+ "0.9998999999999999999999999999999999999999999999999999999999`30.", ",",
+ "0.0001`30."}], "}"}]], "Output",
+ CellChangeTimes->{3.876370905881259*^9},
+ CellLabel->"Out[45]=",ExpressionUUID->"63b8069b-8598-4446-9037-7d26eca13873"]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"data", "=",
+ RowBox[{"Table", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"Re", "@",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "n", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"0", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "[",
+ RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"n", ",", "2", ",", "6"}], "}"}], ",",
+ RowBox[{"Evaluate", "@",
+ RowBox[{"N", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]], ",",
+ RowBox[{"1", "-",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]]}], ",",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]]}], "}"}], ",", "30"}], "]"}]}]}], "]"}]}],
+ ";"}]], "Input",
+ CellChangeTimes->{{3.8763698032393303`*^9, 3.876369884026998*^9}, {
+ 3.876369997688293*^9, 3.876370007596018*^9}, {3.876370093855591*^9,
+ 3.876370097827559*^9}, {3.876370373799559*^9, 3.87637037853475*^9}, {
+ 3.876370465791544*^9, 3.876370497109497*^9}, {3.8763705296866293`*^9,
+ 3.8763705300592623`*^9}, {3.87637087516536*^9, 3.876370917886569*^9}},
+ CellLabel->"In[19]:=",ExpressionUUID->"ffc53174-430d-4e0b-b71f-902d34f687b7"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"dataf", "=",
+ RowBox[{"Interpolation", "/@", "data"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.876369897948588*^9, 3.876369916907255*^9}, {
+ 3.876370456614004*^9, 3.87637045960681*^9}, {3.8763707444350023`*^9,
+ 3.876370747760907*^9}},
+ CellLabel->"In[20]:=",ExpressionUUID->"249e2bea-239f-4870-bccb-94af3730f0b6"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"pCovergence", "=",
+ RowBox[{"LogPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"Abs", "[",
+ RowBox[{
+ RowBox[{"#", "[", "x", "]"}], "-",
+ RowBox[{
+ RowBox[{"Last", "[", "dataf", "]"}], "[", "x", "]"}]}], "]"}],
+ ")"}], "&"}], "/@",
+ RowBox[{"Most", "[", "dataf", "]"}]}], "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"x", ",",
+ RowBox[{"-", "6"}], ",", "6"}], "}"}], ",",
+ RowBox[{"PlotLegends", "->",
+ RowBox[{"LineLegend", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"2", ",", "3", ",", "4", ",", "5"}], "}"}], ",",
+ RowBox[{"LegendLabel", "->", "\"\<n\>\""}]}], "]"}]}], ",",
+ RowBox[{"AxesLabel", "->",
+ RowBox[{"{",
+ RowBox[{
+ "\"\<\!\(\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*SuperscriptBox[StyleBox[\"h\",FontSlant->\"\
+Italic\"], RowBox[{RowBox[{RowBox[{\"-\", \"1\"}], \"/\", \"\[Beta]\"}], \" \
+\", \"\[Delta]\"}]]\)\>\"", ",",
+ "\"\<| \!\(\*SuperscriptBox[SubscriptBox[\"\[ScriptCapitalF]\", \
+\"0\"], RowBox[{\"(\", StyleBox[\"n\",FontSlant->\"Italic\"], \")\"}]]\) - \!\
+\(\*SuperscriptBox[SubscriptBox[\(\[ScriptCapitalF]\), \(0\)], \((6)\)]\) |\>\
+\""}], "}"}]}], ",",
+ RowBox[{"LabelStyle", "->",
+ RowBox[{"{",
+ RowBox[{"Black", ",",
+ RowBox[{"FontSize", "->", "12"}]}], "}"}]}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.876369918582409*^9, 3.876369955823151*^9}, {
+ 3.8763704278400583`*^9, 3.876370441157851*^9}, {3.876370738463645*^9,
+ 3.876370807838629*^9}, {3.876371122391995*^9, 3.876371134526176*^9}, {
+ 3.8763711865989513`*^9, 3.8763713519982843`*^9}, {3.8763718721351347`*^9,
+ 3.876371879486059*^9}},
+ CellLabel->"In[21]:=",ExpressionUUID->"a6d0fc76-cf0a-4234-9fe3-d57ae603ad2e"],
+
+Cell[BoxData[
+ TemplateBox[{
+ GraphicsBox[{{{{}, {},
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.368417, 0.506779, 0.709798],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwt13k0Vfv7B/BDSJTC4WTa+zgcw066KUNFtkoZUhENt0Shay6SqTShkEyh
+DNdwSaYQZSo+z6VcpZIMRaHIMRzzkCl892+t3x977fVa+5/P3p/neX+eLX/u
+goUDL41G66Wu/7vbFUaNrawwgOXbTKysIYC+KK206zcD6O699YcFCXi1/9Fp
+7zkGJN79vDlNgAClroo3w+MM4Nutr0OuImBobW9G+w8GmGLpbgG/VeGis+aJ
+kloGxPOpbxseVYVr7A44f4cBn7wvdSQ2q0JikkLMexEGtAwmau1IVoXU7pAL
+5mskYeDswfoEpipIfjx6WFVCAoKb6RZR2SpQf+TovgY2HTJuSvw0U1cBI1W2
+lwJLHIRGV0YNM5VhZ8HprMYtYtDQPh7ExJRhIey8uIaqKLioGx4vva0EM7OZ
+cWeUN0Bn8COPRi4bXrFitle7icD7HIcH/1qxYRf/9ZJN9mvBtbMkjXyiCLGk
+trZBgBBs8oknmcKKYJd8om8oVRAslZ6PIEcFaHyMreFJFICznxxSX5SyAFtb
+tBWV8sGeSElUL8oCISancTCXF5L7zVG3vTy4WgY/zM6mQSR3bv/u/5iQvly5
+jUinQarsWwWx10xoyx7/kJdAg5k34ev7a5hALp3iLwyjQe7FbdKx1UygZ2l4
+Pnelgbe1msricyZUzXab1vxBA599YSHLmUyQ1bq8XOaxgjroQ659gUywre1u
+wGKWUKUnNnfXkAkH9OYcOm8uoe1REq/u7GWCetkGWrLHEjK1gX3BBkz4nWuw
+Xcp8Cb37p98lWI8JD2MyksU3LKGsUr07iZpM+Hj2LzfBiN9oQV4nWUqJCQa0
+MZHJ0EXU983X1FeQCSr+q3OK/BZRdEelRYEAEzZM43svOC2i+rkeYw4fE7r6
+j/gMGy2iJv8ekdM8TPBvLO7mrF5EM22kUfU0DsUp3kVfgxdQs0vKZGg7Diy9
+ZfPXN+cR/7hQqmYWDh9F9dQSPOfRePODoycycLjGuSLgZjeP8IvRNdfScOiI
+nK+kG84jy4327W2JONzvmVawF5xHZVd/qD2LxIEvhDvDGzmH0jS1Pdj+OHA+
+fUkgk2dR2uvaNxPmOMQ+ZnjR780iu601SlGHcdhz9dihgYBZNMCrF6hhhkMK
+u4U3ymYWHWQTewKNcDju2+jSzZpFso+8hK30caiXq9O7lvMLnUozPfliMw45
+jiU/XpTOIOb95eMp63BoOZeKm2bNoC1vTNkPhXGgWd+17oibQYdcrn2PX4PD
+MXO79jmvGbQisVE5gx8H3p3iTZrbZtBQzi752SUM/hS+BIWF02hUtlQ8YgyD
+YH6b5d2p06gpMMvr8wgGRSsmuh8ippFzwMUO9jAGAtOs8mG3aXRH73RF0wAG
+xd8+FaqqTSPNLUk/HXowECrQSM3InkIx22Q6brRhoJmNdWo8nELRTwWEZFox
+sP1HSKbmzhRyH2s8VNmMQWl8T/z381PoTaSgtGATBueux0TIsafQgeuct98b
+MLjnd+1dPn0KZfS8ep7xFoPyS85CunxTaGt5X6XLGwxEHPfc/rN3EnlzZSWF
+/8Og8shkwIP0STR4jIndqcGgz6TrhVI09byPZ9DzXww2GL6df35jEmkofGiy
+AwzO7/jncovNJBqO8Fm2rMZAjGXhJopNorTpmgavSgz0ZHfnpa2bRByj7nuh
+FRg4ShKDW5Ym0K3g1gsZ5RhUC/E6HPo2gXq9Xt/nlGLgPPX09N3ECVTa5W6d
+W4JBgtbErr/CJpD70YG/ucUY1Pv9IbPXfwKt3oE3bqXMphW2L5ycQENcx1Xv
+izCw3Dta3mY8gRbn9QRYlG/d3vyweMcEMl1lNX+lEIPva/OPOUtNoKd/hRbu
+LqDe/whXc/+aCfQ4XNvz8RNqvfcJCdb8ONqua6woQTlRKqe5/cs4cna/bLWS
+h4GVUtYR44fjSGZdQY9ILgZBTn1b2CHjyLTTlpGaQ+1nvuJ6Ht9xxLKN09lO
+ecO2jPflx8fRxGDqbrdsDPS9e/JjD4wjF63LLFHK7hXy4Re1x1HS27fjFY8x
+aNBPM1FhjKMWnmcm0pQXbnWr8q0eR1I3GK1NWRiYh+uJwcgYKudJOhBBuUDs
+5Uef92Mo8M2D9MOU1ybsjNzyZAzxGZztkaDshFeY9YePoTlewzU/HmFQ90h7
+barrGEr9FibxlLKiWunbYwfHkF+bl8BtyjeLt4eKqI2hlq36X20od+mUHKgT
+HkPqfsz7uynroq0C17ijSO6a8WYW5QTDoleaDaMo9lRfthDlXw3qgSO5o6gt
+WIp/LpPaD4snBo/CRlFdLb/BEOWnXzbRrJ1HkYbeq1M/KIvY5FbTTajnfk6W
+nZRd+1QC3qmOokYPPqKL8luXx7uC1owi9o2Ur72UlSfZC7sGR1DRlV2Oo5SD
+fDPLp+pHkERx+4clyj3LLJ+87BHUOughIkathwxO17QLGUFefrPsTZT/FmZO
+SzuOIA/tE3RjygvRKcWfDoygL5FXv7hQPrFRziNMeQQZBh7wuE+5NCVpy57V
+I8izIL4TURZnS4/Oc4bRO+M9shOUL+Y9zH9aN4zkDOTUlKnv/WErw8Upaxjx
+ys8In6O8qTxOVf72MCK2xFSmUw7ZTR/44jCMNrmVaXEo7zUVdTBiD6MfGuEx
+AdR+pzVFKtD4h1F/5OMLHykvHxfpKfvJRbLvWRIqVL2U2wvbKGdyUdiTzyV9
+lCW5oXLdgVwU3X8015Sqt0segt/i7bjoneZzu1LK6tf4TwoocBHTxUsqkapX
+6cqPDwb4uCi/ltYoRNUz/6+ktrecIdT91THzOuVvbhqWkblDKEl0JOdyPgZh
+1jaHN2oMoZdhHb9jqH7xTiAiFsSHULKpV4Qi1U9nW2fefZsZRD/xBs1Kyjpm
+4SbpFYOIY3IKJqj+69etMCQMBpHU2eGUaKqfP/kGBa1VGERpP9zL9z6j+v/Z
+4dpRvkF0Ji372zzleDUOWVI/gGSMr+p7UnmwT1ZcV/fIAAoYCzC8T+VH2qKr
+xiGbfvQxPm85lsqfcG0djz8M+lHYxNX1d6h88rm0qkhMoR8tXHIWC6Dy6xA3
+YfNnDgdZ7ucZ8HqFwVJHnYqtOweFG+/NuF9P5XclE/cM6EMWK9rtd6n83P+L
+a21p04cG6sP1X37CYKtGWbKWQR+qndxxdZzKW8FcM+lFvj4kFWzoYU/lc2mC
+v0RQ+E90iy4n6f+Vqg+/FuH4pF60zfZx+p8cDOZW5kXH/HvRdfDz4PRT/XQb
+32j0Zy86e6Yr1XsQg+xYZ8WFjb2ozVxJJJM6H3YX0fTOxPegE+A4oDFF9W+/
+mrtS9A9EcAP2YzzU+ZonlO62rhsp1R1J2MjEwbjC6gn+rguFpy8KbWLhQP8v
+raIprAtJGl8MNFCkzrserU+agl0otnP5qr8Kdd5J2a1a5u1EnS/kSNmtOBAh
+Lxwi5jqQ0WqOk+xeHD7buxKFvW3Iwk5rat4Jh+rOI9qlWW3oNJEzdsoVh6xj
+mvuqnNrQ3KkLUv+64+BltGzdMNaKhlPjhmIv4bBBLSq6f7EF1erY7TwXQK1v
+qmQOpzcjZZq4YXQ0DpdXzd6TD/2ANDZ/8VN/iYOPPxHxJq4arasS0exfy4RD
+o+NthVlVSP33XLSLCBOUzpXh8WUvqdmtjzWxngmtxvuenmuvRMOFsV9XxJiw
+TepMy6JsGXLmWR+0SYqaZy4oaJ42KkT9fOcjK9nUfJSPdVtanEf24jduFegz
+ITdSh8z8o0o/4Wba6CNvJkQ43WyzvfVZv2XU+KzFPBPWTR/clW/eq2+tn3RR
+LkAevnvVbfcO4uq3HTZsfEPNj6MVZjU+9RP6RoXRCegRC7LupNvah87oq7tu
+VvilrgDsX3nivknz+vWq3r7ToABdxXjVLsclfdcmr4wLhopg9eB7CDeKRk6s
+U/ORrFWElEfhVQfjeUlZibqgo/vZwHfKbYTfj48MpBFiHS/Y8ME257FFkABZ
+96AmaEhTCZ6vk7aedRUkY1ulxHkzlEApUX5g9UEhskh7gCdiDTVfewct5R1d
+S7LcazZKeikDd0FGJFtHhIwWNdSyalaGtL/utMgobCALX5dmGmipQJTBu3Ap
+tij539/aVab3VUDkQt6eWgkxki7fkVbAUYHqfeVVpdLipLaRmm28niosudlo
+HROhk6tKLOlxd1WBZ/WnhE1LdNIuK1fmRKsqaBl51pjQJMkYyRSrOBYBC9/y
+ByQmJUmzuyVFLEcC9rnWR5n9kiQ/HHI303ci4N5ir07wgiTJKfYeOeNMAFNa
+JnSal0EmPEvRynYl4MDxUNVmcQb5uWb1gqMHAbFNDs5RmgwyK+4rRr9CgHod
+NizkxyATJbS8e+4R4Gu1M3ZPAINs1hrWnYkg4N+fVrr+NxnkZrpItXAUAZar
+7oUPhjLI52ZiIftiCLhCLqrVJzLIkxfXeA3HE1Bf+dkt+CWDNGccLYtJI0DM
+ZEqiChjktOnpnSnpBJxuF6mefsUgY7rwsfx/CBibNRSxf88gZQ85DbRmEiCp
++axgTxeDNEkuHz2bQ4Dtq8Zj/j0Msv6u9UJ0LgE5R7nLTzkMcn1jTGddHgG6
+nqzD8mMMMsQ/ZpV+AQG3eXbPnphikNoHl8ZvFhLwMepkatQsgxRzifOoLyJA
+mnn5QP0ig2T6tayIFhPw//+H5MzXksQtJQT8D5MIPME=
+ "]]}, Annotation[#, "Charting`Private`Tag$263674#1"]& ],
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.880722, 0.611041, 0.142051],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwt13k0Vd37APDbDYncyHANIfuijLkkMh5FvIYMRUrSKymiDEkUpVSihLeU
+oTS9QqWkVJL99CYJoRIpGct0M917zeG3v2v9/jjrrM/aZ52z93Oe59lrq/ge
+dNtDp9FoQ+T63333w5Th+XkmOJ/4/uH7hBZIzcirm/5hQmJskpfOuBZUbPx3
+x+FJJmyptL0Wy9cC9bYX73+PMEH5WEDSilEtGFjSfbulkwnrM7cH/z2gBSGB
+hp7Fb5hQazL1trlVC2LVvoH/WSaYLRWTTH+tBZlZrLQPDCbY7x9b6JGoBTnt
+CQddF8uAs8qiHNGlWiDTsNlZQ1oazj+5Led3RROqXDZb16hJwYWAn1JXFTXB
+TkPtEAtJwiLHXj32JQ0wKdyRW796GaT7WuytZmjAdKK/pL6GBIwfe/At4Mgq
+GJu4c3nnSnGAnArplraVUIHS1pQHM4D2JT7wgP1KMBU8XqzltwS2q33d6nhH
+HS5RRkZWMSJwTdLRR0tQHXZne/4ayBEGG7fgx2/91aD+rtLiBZlCQA/VN3pZ
+qgpKSx6xcYkAnDWuWp2qqAoiK3rq+wvoMFTo6H3iGAtas4VrOm7RQbZQ6Z1q
+NAseyGlVNmfSobv3u1l1JAtcJEPK3ibSgdUaukU2nAXpQtN5NwPpoHmj9sDr
+ABagQbGT2zTpIBiQp/nXVhaYlhqueZ+/ACoj/D6bG7AgaMvpq3l5NIj8xvhl
+NIzg5lypgeZNGvRca/HfPIigKW+k7l4GDb731TmGcBBQs16CDxNp4C2e71jY
+i0AqVz/saRANKt9pu5h2IHg10e7wnx4NjitxhbI+Ili+NmLuWeg8vjJ8SC/2
+KYIziR1rXvrO44er7RreFyMYaXPYX755Hh+Ii1/KfIyg4iz6WmE4j+9+Swgv
+KUQQ3FJf9HFqDhff+yiwOA9B+THNPZy4OayKnnfNZSLY9aa9RiltFie5fJc0
+OYnA1nxyz4+4Weyuumoy+wQC3WfitOzQWbxrcLMw/TiCPwVWa+RcZ/HRQwJP
+Px1FcDXtdrak+Cwu+nHmWHIEgoa/9wYLJ//B3Q53bocGIHj2/fiidzF/8Npb
+fNvJvQiuu1+9eTr4Dy4RZJvE+SMI+uv9F7rTHxyTmyueuRuBMFvLYlb0D5aO
+vFDe643AijbM4J6bwdfXRbfx3RCsil6U/yhqBu95ydp80xWBOF95w8GAGRxs
+eszQxQVBW69L5G+7GeziVGf/1AlBdP3j9p5FM3hT1O7f2XYIHl8//Oj76WnM
+mRP+t9sCATKfc30bN4XntD5Ie+mQ+UuYa2eETWGHmuuNAdoIYnuOCgXvnsJf
+zmR0RGsh+HZxqlTKZgqLhXX+vK2B4J8uPstPeArrx81jCXUEAgmcMfrFSazx
+x+y1tzL53g7Nhqbjk3iFN+9HqhKJNzugoCBkEi906d5WpYig7FvPTje3Sfxm
+3YVws+UIInS63t2UnsTiVdr2VnIIej59zaCyJzB/XYFXuSSCS3eZh6QuTGDH
+RulOWeL1xzw29cVM4JiltY0Ry0h81RrpKT4TeIPJQREjCQRbj9Tvb0cT+KKw
++dsmBgIhJ8bGYskJzL4Dn62Jn6g4rTgrMIFN1/Z7PBUj8aypbtTtGcdmFnLl
+15YgqFKsNI/NH8eO9nWs8yIIDnMFZN0yx/HepgCOGLHquw1ctaRxvCDOUCdt
+MYITIa9zPwSNY5FzP1VuCSMwflO2VFFvHA+FZHe0C5H1XJnpH1kxjukt1YkR
+xJeCTCoqJMYxsu4qFiMekX5+JIg3hlc96I+3EUSQv6+482XJGA6yOaj3eSGC
+Rt8cZYdcMj5zojKCmOad5P3t8hgWebTNWYHYw3V3y+ShMRwwfMb0IB1BnIMz
+M8FvDHcf685RJL5vY+rO3DKGrUZkpuoWIKCbSH40NBjDhZ3tSSbEOmvmGW/R
+GNZK9Kzk0xB46nIctywbw5phByaKiAvRm6qwUT52ui9oaUjcsvyhEL2Tj1P9
+bDxm5lVAgJllndrAx5HKOXsqiLeLhsPDh3xc9nUg2If4tKDPnEUOHyecPbyX
+Tfxo3t6sLpmPbyc7bxci/j61Nto7lo9TvJ5tbJtTASE+ev47mI+bXg5ovyBm
+DzHGj3rzseOEitgV4h190waiTnysXZ7SG0l8tqsnNNOMj/vW+Zd5ET9u/fRQ
+Q5uPoxd/SFpP/KOpfPC5Ah/zzTju2sTCHwu07ET5WNWzS16O2KAmPaB5mocd
+dtV/Eybe+fbkXf8BHt75sfryzKwKnMMHfo218LBOQZ/DKPGTF9tZp9/z8BJf
+49l+4vbijX9LvSDPT1Tk/yIWKdTPuZ3Hw8mcS64/iQ3zlH7oX+VhzY0F/P+N
+77olovDfWR7efpH+zwBxUva4p2skDy/uT9fmEpekd6V3+PMwbdrr9R/izpS6
+xoMePPxgxspVhMxvSVLpsnkbHvZ4uaZVntjodK5LsiEPh19X8NUl9j2elqyo
+Rt5/o6XLmvhCVGztfSkeFtjmtHMn8fPwQBEzAR5WmHdpjCbuDvawq+Fx8arQ
+UutMYsa+9We2d3OxjbbXwzLidb66Ff2fuDjtb5pUF7HfDnl61H9cnNweFiZC
+/l+pCzfmyk0uNv7ng4If8S/7tpfqqVxcPMj2v0wsblM99fQEF/fyvfLfE/uv
+uxXR6MPFTiHVsqYkn1INkot3O3PxdUaA9RHiMp3oUa4FFwtmxO19TrwMuQVL
+KHExXMtNsyL5ar7c4t4NMS4WyedkJBLvk9HsXz07is26Fa40EZeL0Pdsah3F
+z0LiQiNJ/gfyinYkZY5i6YPuGa2kXjLWjpruTRzFwtwXUaYCpN6j9BQ2RI/i
+AVu+3jViNdrDlulto3jkZ41KAKnHjiX3PQLlRrFX6+5ZtAgBw4VjuHHxKLYf
+GYy/Smz+j6Y0mhrBFRNFbeKk/jPl8j+3fB3Bz6LchURIf3BXz3X56+oITqi1
+llQSRRAf8Gu1WsIIzmoelSsgfnxfdemCIyPYWWrboDHpP+IGtz883zqCpwe3
+TOwk/anG8ob9KuYIdsk0PVm7lNT34zXnGNrDmPPoZam2NOn/xsW2laLD+IG0
+gPYvYjPMForlDOGxU6d23JBBMF6je2qwYAirJW6dUJIl+8+vVTG1GkPYvW5q
+0kyB1LusYmjiykG8sSrTdkYFQcn1rNXrFw3izemVBu0IgaSa/NBUz298azat
+7i0LQR2buT8g9zcOb40XzVJDsMFBYo+d2m/8PSnq5B6yP+jGCm4TYnHw27KY
+bVFsBPKlDVf6BDg4WvJNYIQ+AsHxrKbqngHsMd4B4QYIWoP1t1wsGMA4PcIo
+0hBBorePs6z+ALYq+EsvYx2CXrMXNppW/Vja2sLbbj2CGzNB+pt8erEqZ+CJ
+gzuC80bGoXpWvfjfIieTZA8EkeELHy1j9eLMwaH2T1sRbOJk6DT39ODjfZNn
+fLcjmP1WuWrXgR78tMNIJcsHwfbSFcphMb9w1YMvgSGBZL1RjaLpWd14i+s1
+01txCCbnpySGo7txSqCNhO0pEu8zyrJ227vxZN1hw6F4BHmXAlWnZbtxi8NR
+3w0JCCwe0cx3pndhfd9xxcUXEQT0ah9QT+3EaVqFybRrZH+9J3IzWKwdq382
+fJdWiqDZL0jzYXcTtuz3+fpjhuTvDxejktwmHF4fbt49iyDXw9D6VUATXrFe
+y3JgHsEhuznvmuEv+M4m/2WzC1kgrp2S2jvTiH9YGX0wXMKCv3jFk8pSn3F1
+63Vz7nIWRCycuKByrg7P2XZtPW/JgshozeT3l8txydqg8JEEFhRcNKbu6L2y
+lPbSTkhVV4XkgLimXSebLZuky3WEO1VBjO9oet+12/LLu2MaR66qQcehyjWH
+4zmWZ0Ls39X6qcPQC6f/IqtGLSvZkh81V6+E3LM3d/mdG7O8FO61oWdgJaiN
+35M8kjVl2Vjkq+lavAraHiu/Mt03a5l2ra1MIVAD3K90JHBSaJTrSjHhCFlN
+uP7v+VeO6XTqtd/j9nv1miDgFTwoGCVAGb455VZ+SAvqduXfdYsXopK6DV7o
+q2jDUzF574kgYaquvyROt0wb1DNV+hY5ilCZ/HuWlzfpwPTh+Nl7m5dQFQZ9
+0r69OsCZVmDkGTMo45yRx5dCdOHG3rONCixx6uCmTfF35nUhxar2vJyaBDVd
+FSZadGY1MA7eW/9Gehnl7YZ7GDQ9KLd+/qpEXpIy7PfcddJSD2aDfdZ6MKSo
+jNmWwMIjerBg0acMrVkpyk1I7PtAoR6stQv7z54mQ+3sXragrVcPplvv90lz
+ZShRz6glcgpssA6qSnEal6G2rT3f8I74wky38elpGWq59XBS9XI2NCXOd5TN
+yVA+ep4/mhXZsEJe4RyfzqSe1zIym5XYEJi/lq29iEnRjwtlVyiz4YmxW8tu
+USb1oCGTmbqCDXPvguOyljKplwJJbxxV2GC79ZzGZ0kmxRTwtpghvvRxT2CK
+IZNS9Lz8z9AqNuhWKv0WiWJSTfv0Ti43YsMRd5NL62OYVOxJuirbmA2vf7qb
+Rccxqc7leX1q69ggcij0Z9FpJvU2yZA3R7xl4YXz/eeYVFwD2/6NCRuOUjPa
+VZlM6lDv7VSWBRuqSpuDT5cxKYlJVoqyDRuW2fOkXwGTuuN045vCRjbsaGGU
+8yuY1BWXLZ9otmzI3afpr/2eSQWV7F9QTzw8YcPw+8CkDH90ZsTZsUHG8Enh
++jYm5WnUsFPIkQ27Kuo9oruYlHxtdfgCJzbkb+bMFfUwKYa4SswvYm6X0N3+
+AbJe66jNRZvYYBaGnFWGmRQH/xvv7syGMwssJjx5TCrD0fZjG3FDyraclAkm
+ldD89WKKCxvkV0TYVs0wqf0d/Tk1rmz4//Ms5ZYxlt3pxob/AxlbfUM=
+ "]]}, Annotation[#, "Charting`Private`Tag$263674#2"]& ],
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.560181, 0.691569, 0.194885],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwt2Hk4Vd/XAPBLptD9ynRKyZThXDIfY3IQSRlDo8hQUUIklEohJEkqQ0mT
+TKUoU8NeRVKpkCEVQuZ5nsJvv8/z/nWfz3POvnfvs9de66wr5epj58HOYDCY
+bAzG/3265cUPLy0RMNAkcPHzaQqE58Xk9P8RkHaMxdQ5RUG52cN9gTMERCYf
+KmwPpkCupeTjwAgBqkxPy/lACvr4O+43tREgE8s03udHga8XtaugjABZdZX0
+cQ8Kzsj+hIMXCTjre3X5khUFKakyCV+YBEiK+6z3kaTgTmuUj+1yUVCevzgS
+VawJotU7rEkRERhuSfR8sEMTKm12bP4sKwwtmi+fdAxogDkpGyAjLQQXe62/
+dgdpgN6TfRnfVAShKLmapcmjAXMxB4XUyZXw0G0hkyNaHSanH1zfLy8ATn9W
+6I9wqUO5dILmG28mcJ48lTwTpQb6nGcLFN35oTTOsfvavCok0traRqG88Jnj
+8v7b/qrgdmtXZ98dHsh4yGgRaVSBb4/WLWdL4QKBkRdJ3I+VYR3/UzVUyAFs
+YnNTOskbgFey61tvNjv4CgsHJwUpwVH7iKTMTAbEvn90dclPEe4ulmqw7jLg
+vmkVm+sxRWjIHPmak8yAoLZcvQovRaAX9nLmxTDgQuULgUQ3RRDOUD/+4igD
+SudMr5s6KMLr6dZt71QZoPpDR49dVxHWap1YLPJbQsUR9c/H2RTBpaz187qE
+BWR8yi7SJIUFWwxmPJrDFlCI9Aqh3hssUC4SYNzyW0Dvef/6X73Ggn/ZRpqr
+bRdQSljl675YFiQl3L8lJLCADnqy3qOzLKg+cMibJ+4fkt1Hq0x5sMCIMcwc
+i55HeY1chpmaLFAI4c56GjyPjGV3Nz9WY4HAhISJj+c8qkduWYXKLGjptjk5
+YD6PLBvG6moUWBDyLb+1i3semWa7v1UWZ0F+WuDTXxFzKOLorHgEFwukDRZt
+34fNokBF3dDnv0ioXmmglHx8Fl3RW7nOpomEM12nuLzdZpFCQFH5UAMJP6/M
+lgqbzqK7TCaLqiXhWvuEjDvPLFpuHnq+q5IEjqj+SfYrM0jty5NPvwtJ6Kr9
+kUzfmkb5PuVDUtdJSHxEBAhfnkb8q3u0pK6RYHza0aondBpVd4Tmy1wlIU22
+jj3eeRrFmKWbq18mYWfQtyOt0tNoxMdTIDCChErxCoMzWVOIW5Z3ISmQhKzD
+BW0vCydRYalzu91eEupc70hsy5hEghnn4pJ2k8BwuuT08/okUlkxuK59JwmO
+tm5NMwGTqO7c9+Fz9iSw6wnVUBqTKHt/wcFBSxL28PlDXt4EMjNp1j9vREIE
+p/PipjsT6Jjv9rNcNAlPlyw2fo2bQEzP+adxm0jgmpAuHvCeQFoO8Cdbn4T8
+37V5pNIE6vPcflpQiwTeJ+p37meOowlOhY40RRKozHXN6knjSEpun6oriwSX
+e7xr3l0cR8ueVPuQJAmFN9pv/Dk4jmzR4/dlciS4nk2IE5cdRweDXL7IS5Nw
+OfhMVa7wOLJP6crllSKh2N+LdyPHOCJvnz0zKkEC87Bx5J6OMfT5i8f0J3ES
+Sm3GQm/eHUMHnmjpP15NQqdFy0u5q2OoWTw7I28VCQKmn2ZfnBtDDz4lsRcS
+JBzUvXeiznkMbTHMj/kqQoKgtJ33ynVjyGNGpVZZkASv8Wf7LqWMIscJn9Yc
+PhKStUb1D8WMou1W+tdGePH+BKuuMQkZRc+ZEvy62LKMvKa53aPIROyTRT0P
+CX/4cx29Vo+irSrNvXpceL42/ZTZ8lEUxfn6+W1OEgyusUSkZ0dQzT9vQw7s
+lNVZ35t+jKAP5VZXfy8jwUEuw2Zr0gj6Mi+7spSNhHDPThXZqBE0Wd9croed
+n7v+P7agEVS9cUENMfD6NO5/Kd45gk7d7NL8vqQAhoHtuYlbRpC6Y1ulK/ax
+EqlYX+0RNGF8X3BqUQE+G6ZbKBAjyELmSZk89tz5VpKDewRdleckKxYUwDbW
+QBAGh5EItyF9GJs/We+KyuNh1Glkca7onwJ4SpRYdscOo+u7eB65Y1c81Oa/
+c3QYNb8/f0oEOyxfM5qpNIzOSe8mz88rQItOwZYKvmE0sXCOsQl7I1LjOtM/
+hCK5Fs8tzClAsunTcurzELKKz8kC7KnPyhcGs4dQxxHX4IvY9naPjR7GDKGn
+N6eGbLGf/VBkOHkNoZ2ndZZLYjOds98IWwyhkx0TFaOzCnC0UyG0ihxCdccm
+5T5gfzrySD98+RDyMVuUT8eWH5Od0+8dREPCNZWnscODHhSPVw6ivilFHifs
+9kXpkzmZg8i658NfGpuOuEu5RQ2iRYN9TgrYt/kkJ8QOD6K7fKm+QthzV9Py
+a7cMol1JGuLs2LtWifvFyA8ij081ByZmFKAwLVXFmHsQWdmKG/RhC8mKDc12
+DSBxwdLHHdi+OUm5zyoG0GSjRf4f7K9qxBHPjAG0dOzI1jZsxeLrpFTkAIr5
+VejXiR21Sbjnh8cA2hZSTg5id5UnZMSbDiC9+3K+M9gm21Z6mMsOoHMN3ibc
+eD7pNVdkGJwDKNRJ/t5q7MWdzPaiv/3IZPB3jAr23pbYdJ/yflRQIfTPHLvY
+nc9Z/kE/kvljPeGBLdofLd56oR/dXxQ4Hont78fz+4ZbP6pMqfPPxq6ejkyx
+MulHUdOCMzXYymc4d3PJ9CM+5uaFf9hipdU3ezj6UZdDo5kC3i/OqdSGT119
+KFL7aIoj9m9vdfsr2X1IsOPMnlfYlVkLCX6xfaj7++HyceyCzsqaHcf6kN20
+koYyjp8YJ2frVep9yKqUUywXOzCZFTcn1Id6twdcGcY+UD9Z9XuyF/WZ+XNo
+4XjUsYy1uFvSi86eR92fsbs3lpiyjHpRbkyA9xoc/7VB4eH8Mr3oo4N9SSD2
+m+fWZUMcvejhu6rZOuwbSl10QWUP6o/tsEvB52nzWqGNG2160C+jXwbm+Dyq
+7moJWafegwY9C7leYq9JzCphCPcgl6kXxarsJIzx0drvG7vR9Ujz2vX4fKfP
+H1W3cu5GhjF2+Sr4/Mdq6/ipGnWjA87zKSXYJ/2XPRWU6Ub3GjtdzHD+sOpP
+3tDY1YX0vnqdOcxNwsLPCgWXY13o9KtD9V+Xk9AjmnDI2KYL3XxrG+qD81Gd
+nVPGevUudDhdbUoQ56/cT+MyvZOd6Fdpgr0rP87/pZISx0M7kbTS25vS/5Fg
+NtXvZO/ciWT4rFObsNXUi25pGXUinTOKbtcESODJthSb5+hEJzwP6f6H82Nh
+cohIeOxf1BaTWyuP86dQcB3fjdQOlGZz2+LXGhJmlmZXDod0IGLBmL1mLQkt
+kRKrzPd0IN3O6F8fcb7OTPRaP7eqA1Vf9ukrx/l801OGwf4b7ahMO9TgjwwJ
+nt1Kx+SutiFtG/Q9Swmv/5hdwFnfNiRVGHavegMJmpMnQ35Yt6HJMdJ3TpmE
+RfayyBhmG8qR3bnkqIbr77rdd4Yu/UEmL9fnaeD6dCaH9673ilZEZ9UeCMb1
+bWuJw2OJqhbU99Va+Buuf8If0ktqYlrQ5lcc9+RNcL1t16qleFpQlQ2fWZsp
+fp6r3ZYtsjcjk6l9foHbSGBFvfSIm/mJ+vcX7pbD9bbR/Sgrr6MBEc8fhsf6
+kvCm2Ua7MKMBSaq/L1h7nIQMR2rza88GVHTtn2SePwkB5otOn4frUW6uxZOf
+uL4LKMVf7Z6vQ7O6li7bQ/H8xgtmJIS/I8b+wbCkGBJOLJu+LBX9Ff0Ug7KK
+DBwfIay4j9ffIH9tlq9wJ34+QyMNeRmvkUM0pbemmwQ51yKJG0WvkMz1By9l
+ekmo37r5mWtTKfr3cL5Zd5AEjdX76+bXFiFeLbbjIZN4f3xkqH3meeiAXIz7
+Nvy+VJ27rtXe7iAyNlm/IEmyIPuKDv1A9bVhARwIMfJnQZxnWIPL+UbDm9bv
+ru2TVYQVE9v1c207DLWdBq27finCn4AKzcDwfkPt/E11Xx4rwVCJ5buTlaOG
+JTd3ible2AAZF++6uEdPGjZWjX6ZslQG2akcoaDUWUNnv52OkSwVaMmXeK1/
+eMGw/5PkMtNpFXC4+SeqP55B25YcEHu/XxXSHsa+3n6DnR5+Fql+tFIVOPZ6
+D3IGc9CCdrclGhTU4KtL1iO7cC5aTUc8uDRODV6sEHOaPspDF/JeW2ncrwZy
+KVI93Nt56UMSjF3HTdRhLjB8IWcHP61rqDtplK4O/XNrmJk6TPrzEFeY7oQ6
+pB+6WLdGRoB+q+FX4LBdA+KNqmJXy66kFVs/klzpGsD0yTEuExGkN3KpxyX2
+a8CbzcWvC8WEaP69Hzi36GvCgrezliNTmN5EX2ah85rAxl2brLggTFt/TgO9
+Ck3QMj/+zoIhSmuO5TRP81Mw9zu3R2RMlG5pdt3Ltp2CzUcr4y2nROmVe5hq
+my0puDzfoRMxJ0oXmDx4MWBLQUPM0p9Xi6L0na3hb9rsKJAUWxM9wU7QHWUS
+cQk2FHhlaakpcRN0Q1HZ6p/WFDzXsWty48NeVaKqbE/B4gfvsNT/CFpw1QfF
+U7sp2LIzmvwuRND+P2zUDRwpSKzx8IqnCDqzxjjhhzMFLS5hgpW6BD1nSRiJ
+ulMgP3KrdMmAoF+7fbe85IL7tbPFrtrGBP2t8u8/2/0UlDLreH3MCPo0dZJ/
+4AAFHGnD+RkWBP1yzw6OXwcpsNrAt7fFiqB3m3Je+HqIgqRXcstEdxD0mvXy
+rp/w97dtM86x3EnQNeDqEIT7P9Yvpx0RewlaL9Kg9gK+P8AreP6VM0Hv9/xQ
+VO1FwZvZxPsTbgSd7vtK19ObAp7op9uUDhN01Cv7u0JHKLBbVTXudpSgW294
+qjZ5UpD6qDs11ZegCwNzlh7j63+1lm3+HkDQKWVzSv7HKVCuWDfAG0zQ4X2T
+C0x/CoIc9BKNQwn6l+uG9GvHKHj712FjSBhBq8ht8prA5g3w+/ssgqB5fOZM
+nuHx9ssux/ZGE7Sspu6J9JMUpCVkakrFEbRH6oZWTdzv9kiV/96VgNd77Kfq
+TAAF6s9aw+NvELR55bos8RMUnKLnlSpTCHrTpqB9b/D95d9E65fSCNq5aji8
+DPfTTGf1UO37BN3X7x669gwFu4YsZX0eEXT+vEb8nRAK7oV6fsnIwfHQLst+
+PIiCAf6IEy15BK1cUPL+HR5P3UoXF31O0J6n6zWiz+P+WvHVe8tivH86O3Tv
+XqCgsrTRO+IVQS+WjZ5+EUqBoMW4yGsg6Kvf9oQX4d/b18R8M1FO0Eo6plcq
+wijIOMw6qPSRoFe9de/Sj6RgeNqU6f6FoPnN6o+sj6JA5+KBwtQagm5xz4rM
+iaDgvGjo/u/1BP2qgn1FcDgFVQ+TuPh+EvQU2xa2XmxR6vkT4xaCXr3x/L+Z
+aApcyr85hrQT9MbiSqfReAqydvQvPusiaJHtlx7mX6JgrJ3rUW8fQf/+2fQo
+6yIFG49LW0sNE3SiUif3Dzw+km3T9K5xgo4slJptvUJBdfzuO/HTBG0qZdnG
+eZMCMckTWyrnCXpteOPyMHz9///PoJc3DDQeiKPgf1Ddh4M=
+ "]]}, Annotation[#, "Charting`Private`Tag$263674#3"]& ],
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.922526, 0.385626, 0.209179],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwtmXk0ld/3x5Hpo0h4nouSkOFe83gfU06izIWSBiUqQ6T6lEqlKIUKTSr6
+GFIyFEpJprOTSikapEhpMs/XTPie31q/v+56rXPO3vvs8977nGddJZ8Qtx0C
+fHx8Mfx8fP/365uf0D87y4JZF2O+TC1jkJmSVzP/ywIh5eaYDZrGULXy9ubQ
+cRY06lql/2Abg9r3J696BlgwdPSLjby6MXTN+53R+JMFdSrzM7cpGcOeQGPP
+wmdkXCTn5nzaGMJVm2DnGRbAPNMpjVkjSEpWufhWggVLVMx7K98ZQWpLdIjr
+PzQovU8OWRlgBPQ799VsigK0nLfhj6ARVK9xt6lRlYGZ2FJRnGIIdmzV/SrK
+0nB9bcqHBE1DMMvbnFmnKwUmi5pf1pYawGTsTmkD9gL4z+eyS6+lAYyM3bqy
+RV0SlH8tU4oo14cq5YtGFcES4O2x1StmuT6YCx0v1Nw+D+b3+ipPFenBZcTl
+Lj8mBiqNS56cMtAD3xuerV2ponBu1jayy0sX6u4s/oc/SRiWJF7e3Yl0YPG8
+An1cJAj7OyJ4Gy21QWxJW11njgB0V/fnqxtpQfMN0ZofNwUgYbW01io9Lbgn
+p/nic5IA7Ile4++vpQVrpPeUPY8VAFkxWZ2CpVqQKDyZlR4oAFT8Cod1lBYo
+94pHbuAIQLwGO3N8VBPMS4yNXmXzA3z9ZVZaqglBa6OuZWXxQRHvxb5eR01I
+nykx5KTzgYmERd07O01oyBqozb3OB9kl2sFFtpqApjcJ5cfywVDI7UPRVpog
+k2mw71EQH1B35i+0M9SE8rEWx0o9PsigWke4CzVhkcmBmcd7Z7HSrgOyvT0c
+OB37w6jUZxZfs3ozqNDFgYHvjrsq3GfxJoUIX9d2DlSdUf5SZTyLww9fkIef
+HAhurLv/fmIGF1/8tKS8gQMVRzk7uiNm8IfNYfXcpxzwftZSs/jiNP5R0JG1
+/BoHVlmO7/gWMY0vHVtge+UKB3QeS/Ld2DuNW9rFXXoucuBvznIjOddpfML2
+9oNb5zlw7WLGDWnJadzcskne6iQH3m3zCxaN+4u/XakcWxTCgeV8/RK8mCls
+32Cen2DPAY0wkeyCw1N4pdzdw+tXcUByWHFFSMAU1gwXF1O25cD39jUHe+ym
+8Lhc7OlKxIGwugctbSJT+GtFvYE+w4EHKaEFX6MmsXyjQuBLdQ4oW864Po+Y
+wArFR8rb/iH+F1hqXd83gddgq6V2ohwIbzsiHOw7ge+7H5S8J8yBpviJEhnb
+CTzHRPh4xBwOXPo1rLJddAKnreR9XTvNBsHo7hGB+HG8dtEEzhxkw4PNnHcN
+x8fxiwBppeUDbPDWD8jJ2TOOI4POLGrpY0NZU9sWN7dxnPRXqF21hw0HtH+9
+TKfG8QUN087vbWxo+/DlOroxhrfzpUbPNrPh8h3WfpnzY9jB5p54/Vc2WB/1
+cOk4NoYDrs+1vNvEhhTVeoGErWP4IiOS4veFDesP1e1qUR7DX//tDRerZ4Ow
+s8TKQukxvEXtv6C/H9jwUMl5yRnBMZwW80CM954NkjWv63XaRvHo60cbO+rY
+UK3wwjI8exS/E7qzif8NG0J5grJuSaNYpU/ju2QNG5a+XMFTPTuKZ6abqaWv
+2XBiz9PMt0GjWHfHr8x11WxgnpXNV9AbxdpzAze3VrEh27/wZ2nRCC4IKwh6
+XMGGep9URcfMEdzz9uXxoXI28Hmd9Wq6MoKfdikNGxL2cPVtHN8/gjMOn+Ov
+LGWDgJn0e2PDEXyPbfhQ6gkbtI1mJZ4rj+Di5piGvcVs8NTpdlorNYJ3+Tls
++vSYDXnKz6r3DQ7jIrkF57KL2LBx7r+Qnz+Mu1IzY04/ZEOU0NaZZanDuKPa
+s0KUcMGsg0Vt3DAun/y2Nr6Q5GtYubgneBijd4mZ2Q/YoN8nMXrEaxg3nHDf
+Zkl4c8ek4VznYZxqMXL0031y3s0f8tlawzi88/4nKcLfGip6ixcOY/2RJVLF
+BWwQfZ+jaTd3GLc5LMzbRtiwJjHg8+QQzrW3yJ5PeMvzyDs7u4bwuLbMnMp8
+NsTg3a0jjUO4q1av9BDhh082qkS9GsI3K6j3hoTF8gxSM7KG8EJffZnHeWww
+zlr8zeDaED7o5YaOE/a+Kbaw8swQLrOVrHYkfPbGqKfrwSG8behdziLCRYm/
+En/sHMLS1FD74D02/EyorQ/xGMLbDWvDawjPO1siNWs7hBWMH+3OJsyNylwT
+ZzyEw57zis4S9jl+MU5BdQhTaW899hE+fzj8zV2ZIfxL/aSzF+HifwPFLASH
+8KlKpyQnwr+DPexqhng4R2CLBSIs4W99euNvHg4S+mnAEDb10anq/MDDHn3T
+R40Ib98sL3C4kodDy+vljAnHewgj0Qc8PAXHRc0Il6zhHbuazsODwVJ2Kwi3
+OnwvVbvAw25bkj6vISxp+3ri0QkeNs9eUuRD2NyqiGu7h4e9uzJ/HSK80/Tm
+gfqtPMzOYW++RPiCYVyh72oe/hSdqvSAcJl22CBvGQ/H+o3rfyLcrr5TN1KH
+h91DFM/9JSyl7Ba8YDEPZyhP6GiQfFouWpabJs7D/YI75DwJ+9OcTt3pQbzb
+28LhHOFLkrQ67hnETgbuUEW4Qkxgh0vzIC6wOxjGT86zU7Dv5reaQaz+Z+9B
+a8Iys40/gkoH8YptQkVnCAcO3d98NmkQR0l08BYTvVw3GTT3ix3E3idrd4YQ
+rj6st3BF2CBOzRUZeEZYlS+/cXLDILZSWW95mOhx7Yq+4gb7QXwnq36mkXDk
+ae1rD0wH8f6bIe+WET3/mHfXI1BuEHPLrqfIEP1LrOk2XvnPIH4ssfNaFGHL
+SxxKeWIAS919d2OScJJc9sfGLwN49YUqPEDqZ51a5hr7awPYVUfPVpzU36mA
+Vl3V6AFsNCKyK4Xwg7tL5/MfGsDBO67GG5J6lTTMeFu8fgCvKrheG0DqucYq
+zUGDNYBX2q8aEypjw2RkC1tQZADL2iq0FRF2PWcpBb39OMQy78Uu0h/mXTeL
+173Xj6+91PX4SfpJxAOjGAmtftzprBI+9ZQN35nCVS/m9uPUkk2vayrZYIH1
+hcO7+/Cf0VWTqc/YMFqjc7I3pw+78Q9Muz9nQ1CrxrE37D5898pZ7y7Svzxl
+FfbGqvdimzm57bXvSL2kJOtai/Ti4u7Yc82kX0qryvdNtPXgJn/H0V7ST2v1
+WbsCMnvw2wZzyUWf2LDCccEOO9UeHL5jztLbjWzQCRfaIKzSjX9rbuf5/2aD
+fMm7qx2C3bhOUbUk+Q8bhEaTG163deE6MfW771vZ0BxssDY+pwvfeVgssqqD
+DbFeW1fLGnRh59V6get7iR4tnthylnfiouhgK/FxNqRNBRm4bG3HmjcX9eD5
+HDjHZfbqLW/HTxQcvdYu4MDBf+cUSKm0Y4HoH6XdUhxw6b6u/bmtDTeZuJiq
+0ByYbnqh4b27DWvWK04/XMSBjSVLFPcda8UwK9q6jcMB6cP1cxOTf+Ml7ke6
+PpD7d3x2YkF/2G9sxOlp6CL38/fTirJ2G3/jgnKVdiEnDmRdDlw6KfsbX51Z
+5m+7hgPLCvgstyT+wumO4Tc7PTkQ0K61W+3CTyxtZp5WFUju21yx9GDxFuxz
+pHLifgIHPm8P4uT/bsDVEd0jH/+Q98e3NdyizAbc02Omt4e8VzI9jG3KAxqw
+W2roRQnyntlvN+NV0/8Jf81SeeHaT94HWgkX2qfqsXb6UN7gBAfshwrHFWU+
+YrtHCXevzNeEA3PGzivF1OKtz5YXbLXQhINhnLhXVyrwilO6a2OSNSEnnkG3
+9MqtSvXja0/4a0FcQESDd+RnK02l07J/N2mD+LCT+V3X31aLzCS2dDjpwI/9
+L4xCT3VbLd77WnjHJl3oe+JcebB60KpEK2P7jJEeZJ5J994eM2K1I+2kVluh
+HqiO5kofSp6wQrVNc4Qs9eH7A8Vyc/9pq8ur/TZkl+rDuqs/orsT+NDzbac2
+9hgbQMrtc+VOiQLoDYi+/fvYAAQ3BfcKHRZEsr3Hay/rGEKtd/Ydt1PC6POt
+bbfacw3hkbi811iQKPrE8O94qWAEaklKHSJOYsj1RygVHGsEk6GnpnPd56GH
+p2X5O/8aQffkQoksRgIdl1V7mbTdGNL8ztQvVJFEcXHI/fN7Y0hY/uacnOoC
+lMK8dlQ1MwGJkFzrZ5QUOpnbYBN+1QQqbIrLi+SlkdZoa9uSaROYDt5q4iEh
+g6Y7WtdWe3KBX+TDdc1pGdS7QHj36YdcEI7eTzP8FIpYdtSng7DYP6xLNkIU
+EtyxuEkrjwvzY5/Md/2HQs5dVXETj7kgM3fzOS9xCmlZmTHvK7ggd25GNHAB
+WR/o6eGcz4XF4ulRoRSFNh69KR9XzAWVuBUCJ+Uo9F9l6i/vF1zQmN8WHq9A
+oUCPV53LS7mgnRA9laxEodbzB9+pFXHBYIHmoSxVClH3C+vvv+aCycW3ww/Z
+FFp18+7Ej+dcMJfes/epNoVq9q2ZYEi86LJU31t9CmmrNJcsqeGCDfUosMmY
+QiZKNuyBt1ywT1zf3mZKIc1lhbrHnnLBhTXpO2RJISONqbsXXnLB/dqNH7PL
+KRRbv8ht7QcueMpZec1bSaF5Gqa7eG+44JX0s1HWgUJzx1P5v1VxwWfhKQ9V
+Fwo9zVa4tYXM97uh9lHfjUILI/TNBT9xIUjh1eplHhTaZuPnv+EjF/ak7Hrj
+sJFC7fS1VJFaLhxQlLBfv4VCQX/3PtnwhQthaQXPfX0otGG6yUKuhQvhSu7W
+e3ZS6MYp2uVSHRdO3hypOBpI5l+g79s2cCFa5Zp5zG4KpYrU7afauHD+llnx
+lX0UUpPe45X5gwsXVb8Z3QylkLD1LzkVsv5q5vH7eWEUkr968Gk1mX9DXVmn
+NJxC07cVn0b2cSE9qyrnZSSF+FbjCZvPXMhk+6nXn6bQ29XKf+uIvZycf279
+iCX7eZwu9GiUC/mad5f0xlFIOq7ua0w7Fx7edflv4iKF1qYveLacxFesPSgn
+fJVC+lZ9vv+NcaE871KiVDKFVurHi9XyuFCpayKtmEoh65htkVs6uPCy4Eu8
+ZgaFjIcWHNDs58Ib/SPzmDsUij5+xPUy8ff+gUKMTS6FNuelPjEl3GAIQq75
+FBoayfGSGuTC14c+kV6FFIoZDFWfJfzDWGg24DHRS1RseuhfLvwpunMktJRC
+T17euvyKn4FOrsN4JKaQZNpGvxjiv6+4Z3/8MwplBu8WNpzgAs80fjD5JYm/
+pJFXIcbAWIn+7qwaCoW3tFlpCTDw17y+62Ed0VuPeopGL6mn8lC/px8ppDwl
+XflOlAHhZXJ/3n4m+ZGc4/mRZmAuLvVu+kqhn2nLou+Nc0ESbfnW1kKhxlq7
+4P4pLlBP+TYO/abQ+53O/SlLGJC3zmiYbadQ/KX6x2clGFj8zNZ9Xg+F+M/9
+Tgol+VSx6aiTHSD+lka/WyTNgMbzWCfVYQr1bT/i+kueAa2V2q/0xylU9ihx
+75Q4A/ov62yX/aWQwegkfXKG1JPdvkoHPhqdD1lqPyjHQIzB3P4FgjQ6k/Os
+Zc1CBpoX3VrYKEKjddceH58m8euKWNqlzaXRjpHuozxiL3Lw036/+TRy4YiH
+9ZLxT193p+tI0+hIjqKllxKJ54VI7QhNo6+ZAvPYagwcKUibLJMn602TVfLI
++tokU/VTi2kUUPPvazWyXinqg7ujMo3UMprFsjgM7A/ZdUJKjUbnjuRbjzEM
+vNwgeK+RTcbLlHrXS5L82PzXmKZNo8jleWa7WAwE65gI++vTaFu8RWKOCQMg
+W2ega0wjVw0Nq1YzBmTm+G8dZWik/uIYz4H48+vlO1duQSPktrnakeSr5PP1
+4lOIRiGesbbXbRiQqDRodbShkWKj2uPj5gxsu1uzQNqORlJFuuFJigw8TNy+
+rMmRRnnPU08sXcyASMR0YPpqGmnlJq2psWNg467Eq/7uNFooWfd3ypKBe+t0
+q3TX0yj10LbLGloM8KHqgdGNNPLWbNqkp8yAO2ebQsUWGlVa71FwWc5Apsyk
+fZQPjXbOBh0eJzwxczHUaSeNaoRx2w0Sj1OnZoZ0II3wDv8NbnoMpH6sqmsK
+plGj89x9b0wZ4JV7/U3fSyMrdofi+5UM2GaNagQcoBFHzpYd4syQ7/34dXqH
+aSRT1rP6M7HXfVQjcuwojfrEc2rnGDCwzO9pXsUJGs2x5JPMd2TgguvGr1Gn
+aLRfeZPEc28G/pgPiThH02jw56jIEMmXXqtHScBVGj0bP3DDaTUDJ+v62/SS
+yf7T/VbIqzDQ8CRaejyFRtWWL2RVXRlg31JC+CaNrq8PPXwsjIGjcSVBpzNp
+dNlysEJmIwN1h9yvO+fQaEGc19Bjcp7Kvj3PZfJoRJ2un7lN7Ic6R/G+3qfR
+VbdJ/fr9DLziLlbMeEQj3z1qkfO3M7BI+bFj4BMaaXivbjrlxMCeeWsO6ZfT
+KJ2lrr7FgYFnox23xoFG+YXdDk67GKB/RrzHVWQ/G5DgFcIBNfIzp6uJHkaU
+kk19GSh7VMhxeUMjL32v/tdrGZif5rSeekejPUfH0qK9GPCJbT3Z/JFGSdvb
+y+t2M/Bof3hBxmeiL9a3jIZDDIhuZX0L/Eojybpf6c77GNhkX/CPQQuNWhTs
+jpeS/OYZ2ptM/KKR8e5PRVJBDPAv/uUDbTQyenYsPSqWgbWiR+LPdNFILERu
+QOoMA3d40mUufUSfncOBC6wZmGy+20HxaNTQYb1zuw8DNkHVCc6jNDp78Vxi
+bhID56d+M1GTNKKp3ZIHib2G2NkfZTM0Gi495vTXnoEl8gtjhgVY6MGq0KM3
+QhgIzDbR1xJhoT2rH086FhK9M26NvnNZ6L1/TPfHUwzMvAyOSJ7PQjzGL7DK
+nYFV62PYH6VZaPWM5GzYSQYS2m69F5NlIcZ2yxf7DAaaDsBh60UsdKAvIds4
+moGlQs1KYUtYqMZi/ZmmnQzsvjz26v5SFto3nt/5MYGBYhXpfZ0aLDRln6eo
+TuLnL9SRV9JmoRcdb27cvcyAg7VDpac+C/0++WUil/i7/H5HYIIxC/m8umAx
+eISB794RUtWmLGRdmSh69ioD6gM3SmYtWchr35zW+TlED8eLfbjWLGS+Z6FX
+5G1S/xL1YiErWWjc7ZagODl/wZT+B5kOLDT0/XrLceLfRXvupu8uLFT2bxnH
+oprUT5naHNqdhfg2evCfvcnAT0frXOf1LGSz6I/TPaIHzlcv96hNLHTo0YnF
+t9JJPws8PFW2lYXywncHPOtjoGLicsawLwtNJzd8YIh/0ZgCRy1/FnJI1fGD
+DQy4yb4Z8g1ioVg4dF48l4HkO+3JyXtYqGGX0PrwblJ/JnNsPu4n9u4HDoTc
+Y0DnxeIescMsZJp2bvbRXgYOrTO7bH2MhV5PF44dfsjA0z/rLMIiWGj91WEq
+o4kBsf17/9yPIvmtsFh6oIToa875c50xLLRETu/nuwsMpFzMMlKKYyF7ya1O
+/MUMdChVNXteZKGk81fWHnrNgMH9llMJiSxk52ko+JXwETSlVZ3EQuJlr/4t
+Jfaq6uhPsykspHQt23+c2JPYanCMm0H0sVO698oTBjz7nFVD7hB9mUnyfJsZ
+uHks4G1mLgt1bPvPU6CXgZ55UQe+57NQVcSotNpZBoxvpCnQD0m8C5VrzmYy
+EK5Z9ty5mIXYOLoji+SjuuRzcFQZC8mamX0P0zAFKYchqhxYaPTZbx87or/N
+jRIVw1UstMqMr3A70VemP2en1iuy/tCOEL9hBvrHbCW2v2WhlLgR23wjU2DO
+bCtKfs9C35QO8V3C5L6jj235+ImFnjQ+YgkdZODN7WvCc5tYKEoqOD+IR/qH
+8cM86+8s1E3f7LPXMQXvqjqPsF8s9JO3WSz0GwPZ7t0z99tY6Ez9wcwuol/e
+L+E7nV0sdPkNvq70mwGLfcqrlfpZKLLmdkmVvCmc5l825jnEQu1/e/hMxhl4
+l7AhNWGMhXI8Ew/KE/3JLzmwqnqKhV4J7xXXfcnA////gEAjZdXpCQb+B2Kp
+/2E=
+ "]]}, Annotation[#, "Charting`Private`Tag$263674#4"]& ]}}, {}}, {
+ DisplayFunction -> Identity,
+ Method -> {
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}},
+ "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" ->
+ None}, DisplayFunction -> Identity, DisplayFunction -> Identity,
+ Ticks -> {Automatic,
+ Charting`ScaledTicks[{Log, Exp}, {Log, Exp}, "Nice", WorkingPrecision ->
+ MachinePrecision, RotateLabel -> 0]},
+ AxesOrigin -> {0, -25.205799457979587`}, FrameTicks -> {{
+ Charting`ScaledTicks[{Log, Exp}, {Log, Exp}, "Nice", WorkingPrecision ->
+ MachinePrecision, RotateLabel -> 0],
+ Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}},
+ GridLines -> {None, None}, DisplayFunction -> Identity,
+ PlotRangePadding -> {{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.05],
+ Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All,
+ DisplayFunction -> Identity,
+ Method -> {
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}},
+ "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
+ "ClippingRange" -> {{{-5.999999755102041,
+ 5.999999755102041}, {-25.205799457979644`, -7.661000555932736}}, \
+{{-5.999999755102041,
+ 5.999999755102041}, {-25.205799457979644`, -7.661000555932736}}}},
+ DisplayFunction -> Identity, AspectRatio ->
+ NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True},
+ AxesLabel -> {
+ FormBox[
+ TagBox[
+ "\"\\!\\(\\*StyleBox[\\\"t\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+StyleBox[\\\" \
+\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*SuperscriptBox[StyleBox[\\\"h\\\",\
+FontSlant->\\\"Italic\\\"], RowBox[{RowBox[{RowBox[{\\\"-\\\", \\\"1\\\"}], \
+\\\"/\\\", \\\"\[Beta]\\\"}], \\\" \\\", \\\"\[Delta]\\\"}]]\\)\"", HoldForm],
+ TraditionalForm],
+ FormBox[
+ TagBox[
+ "\"| \\!\\(\\*SuperscriptBox[SubscriptBox[\\\"\[ScriptCapitalF]\\\", \
+\\\"0\\\"], RowBox[{\\\"(\\\", StyleBox[\\\"n\\\",FontSlant->\\\"Italic\\\"], \
+\\\")\\\"}]]\\) - \
+\\!\\(\\*SuperscriptBox[SubscriptBox[\\(\[ScriptCapitalF]\\), \\(0\\)], \
+\\((6)\\)]\\) |\"", HoldForm], TraditionalForm]},
+ AxesOrigin -> {0, -25.205799457979644`},
+ CoordinatesToolOptions -> {"DisplayFunction" -> ({
+ Part[#, 1],
+ Exp[
+ Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+ Part[#, 1],
+ Exp[
+ Part[#, 2]]}& )}, DisplayFunction :> Identity,
+ Frame -> {{False, False}, {False, False}},
+ FrameLabel -> {{None, None}, {None, None}},
+ FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLines -> {None, None}, GridLinesStyle -> Directive[
+ GrayLevel[0.5, 0.4]], LabelStyle -> {
+ GrayLevel[0], FontSize -> 12},
+ Method -> {
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}},
+ "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" ->
+ None}, PlotRange -> {{-6,
+ 6}, {-25.205799457979644`, -7.661000555932736}}, PlotRangeClipping ->
+ True, PlotRangePadding -> {{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.02],
+ Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],
+ FormBox[
+ FormBox[
+ TemplateBox[{"2", "3", "4", "5"}, "LineLegend",
+ DisplayFunction -> (FormBox[
+ StyleBox[
+ StyleBox[
+ PaneBox[
+ TagBox[
+ GridBox[{{
+ StyleBox["\"n\"", {
+ GrayLevel[0], FontSize -> 12, FontFamily -> "Arial"},
+ Background -> Automatic, StripOnInput -> False]}, {
+ TagBox[
+ GridBox[{{
+ TagBox[
+ GridBox[{{
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.368417, 0.506779, 0.709798],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.368417, 0.506779, 0.709798],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #}, {
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.880722, 0.611041, 0.142051],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.880722, 0.611041, 0.142051],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #2}, {
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.560181, 0.691569, 0.194885],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.560181, 0.691569, 0.194885],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #3}, {
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.922526, 0.385626, 0.209179],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.922526, 0.385626, 0.209179],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #4}},
+ GridBoxAlignment -> {
+ "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
+ AutoDelete -> False,
+ GridBoxDividers -> {
+ "Columns" -> {{False}}, "Rows" -> {{False}}},
+ GridBoxItemSize -> {
+ "Columns" -> {{All}}, "Rows" -> {{All}}},
+ GridBoxSpacings -> {
+ "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
+ GridBoxAlignment -> {
+ "Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete ->
+ False, GridBoxItemSize -> {
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+ GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
+ "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Center}}},
+ AutoDelete -> False,
+ GridBoxItemSize -> {
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+ GridBoxSpacings -> {
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"],
+ Alignment -> Left, AppearanceElements -> None,
+ ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
+ "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
+ GrayLevel[0], FontSize -> 12, FontFamily -> "Arial"}, Background ->
+ Automatic, StripOnInput -> False], TraditionalForm]& ),
+ InterpretationFunction :> (RowBox[{"LineLegend", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.368417, 0.506779, 0.709798]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}],
+ ",",
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.880722, 0.611041, 0.142051]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}],
+ ",",
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.560181, 0.691569, 0.194885]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}],
+ ",",
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.922526, 0.385626, 0.209179]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
+ RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",",
+ RowBox[{"LabelStyle", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+
+ TemplateBox[<|"color" -> GrayLevel[0]|>,
+ "GrayLevelColorSwatchTemplate"], ",",
+ RowBox[{"FontSize", "\[Rule]", "12"}]}], "}"}]}], ",",
+ RowBox[{"LegendLabel", "\[Rule]", "\"n\""}], ",",
+ RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
+ Editable -> True], TraditionalForm], TraditionalForm]},
+ "Legended",
+ DisplayFunction->(GridBox[{{
+ TagBox[
+ ItemBox[
+ PaneBox[
+ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
+ BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
+ "SkipImageSizeLevel"],
+ ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
+ GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
+ AutoDelete -> False, GridBoxItemSize -> Automatic,
+ BaselinePosition -> {1, 1}]& ),
+ Editable->True,
+ InterpretationFunction->(RowBox[{"Legended", "[",
+ RowBox[{#, ",",
+ RowBox[{"Placed", "[",
+ RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
+ CellChangeTimes->{{3.8763699506493063`*^9, 3.8763699619208803`*^9},
+ 3.876370068782353*^9, {3.87637043091245*^9, 3.87637044257585*^9}, {
+ 3.876370721301976*^9, 3.876370808099616*^9}, {3.876371116142165*^9,
+ 3.8763711352371187`*^9}, {3.87637122695619*^9, 3.8763712464846573`*^9}, {
+ 3.87637134045012*^9, 3.8763713522979193`*^9}, 3.876371879846971*^9,
+ 3.884692135165325*^9},
+ CellLabel->"Out[21]=",ExpressionUUID->"a9b5bf87-e870-4cb1-a334-4610824736a2"]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Export", "[",
+ RowBox[{"\"\</tmp/pConvergence.pdf\>\"", ",", "pCovergence"}], "]"}],
+ ";"}]], "Input",
+ CellChangeTimes->{{3.876371882405683*^9, 3.876371903052721*^9}},
+ CellLabel->"In[60]:=",ExpressionUUID->"52b4bca3-6c24-4ce4-a34e-5809b8f6180a"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"data1", "=",
+ RowBox[{"Table", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"Re", "@",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "n", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "n", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "[",
+ RowBox[{"[",
+ RowBox[{"-", "1"}], "]"}], "]"}]}]}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"n", ",", "2", ",", "6"}], "}"}], ",",
+ RowBox[{"Evaluate", "@",
+ RowBox[{"N", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]], ",",
+ RowBox[{"1", "-",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]]}], ",",
+ SuperscriptBox["10",
+ RowBox[{"-", "4"}]]}], "}"}], ",", "30"}], "]"}]}]}], "]"}]}],
+ ";"}]], "Input",
+ CellChangeTimes->{{3.8763698032393303`*^9, 3.876369884026998*^9}, {
+ 3.876369997688293*^9, 3.876370007596018*^9}, {3.876370093855591*^9,
+ 3.876370097827559*^9}, {3.876370373799559*^9, 3.87637037853475*^9}, {
+ 3.876370465791544*^9, 3.876370497109497*^9}, {3.8763705296866293`*^9,
+ 3.8763705300592623`*^9}, {3.87637087516536*^9, 3.876370917886569*^9}, {
+ 3.87637139299862*^9, 3.8763714209705677`*^9}},
+ CellLabel->"In[56]:=",ExpressionUUID->"22e15b10-be95-4312-870c-ebe3402ea67c"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"data1f", "=",
+ RowBox[{"Interpolation", "/@", "data1"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.876369897948588*^9, 3.876369916907255*^9}, {
+ 3.876370456614004*^9, 3.87637045960681*^9}, {3.8763707444350023`*^9,
+ 3.876370747760907*^9}, {3.8763714277972183`*^9, 3.876371431900972*^9}},
+ CellLabel->"In[57]:=",ExpressionUUID->"6e3ba380-2dbc-463d-8279-e42bb1e3c387"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"LogPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "[",
RowBox[{
- RowBox[{"-", "0.31018352388662596`"}], ",", "0.2474537923130002`"}],
- "}"}], ",",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"Abs", "[",
+ RowBox[{
+ RowBox[{"#", "[", "x", "]"}], "-",
+ RowBox[{
+ RowBox[{"Last", "[", "data1f", "]"}], "[", "x", "]"}]}], "]"}],
+ ")"}], "&"}], "/@",
+ RowBox[{"Most", "[", "data1f", "]"}]}], "]"}], ",",
RowBox[{"{",
- RowBox[{"0.37369093055254343`", ",",
- RowBox[{"-", "0.021636313152585823`"}]}], "}"}]}], "}"}]], "Output",
- CellChangeTimes->{3.871622265105771*^9, 3.871622307815116*^9},
- CellLabel->"Out[12]=",ExpressionUUID->"db6d0977-ebec-4f64-a895-b2176143e8b2"]
+ RowBox[{"x", ",",
+ RowBox[{"-", "6"}], ",", "6"}], "}"}], ",",
+ RowBox[{"PlotLegends", "->",
+ RowBox[{"LineLegend", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"2", ",", "3", ",", "4", ",", "5"}], "}"}], ",",
+ RowBox[{"LegendLabel", "->", "\"\<n\>\""}]}], "]"}]}], ",",
+ RowBox[{"AxesLabel", "->",
+ RowBox[{"{",
+ RowBox[{
+ "\"\<\!\(\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*SuperscriptBox[StyleBox[\"h\",FontSlant->\"\
+Italic\"], RowBox[{RowBox[{RowBox[{\"-\", \"1\"}], \"/\", \"\[Beta]\"}], \" \
+\", \"\[Delta]\"}]]\)\>\"", ",",
+ "\"\<| \!\(\*SuperscriptBox[SubscriptBox[\"\[ScriptCapitalF]\", \"0\"], \
+RowBox[{\"(\", StyleBox[\"n\",FontSlant->\"Italic\"], \")\"}]]\) - \
+\!\(\*SuperscriptBox[SubscriptBox[\(\[ScriptCapitalF]\), \(0\)], \((6)\)]\) |\
+\>\""}], "}"}]}], ",",
+ RowBox[{"LabelStyle", "->",
+ RowBox[{"{",
+ RowBox[{"Black", ",",
+ RowBox[{"FontSize", "->", "12"}]}], "}"}]}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.876369918582409*^9, 3.876369955823151*^9}, {
+ 3.8763704278400583`*^9, 3.876370441157851*^9}, {3.876370738463645*^9,
+ 3.876370807838629*^9}, {3.876371122391995*^9, 3.876371134526176*^9}, {
+ 3.8763711865989513`*^9, 3.8763713519982843`*^9}, {3.87637143608066*^9,
+ 3.876371440221603*^9}},
+ CellLabel->"In[58]:=",ExpressionUUID->"965d5a6e-a5d2-4e2f-8234-02ac11e44315"],
+
+Cell[BoxData[
+ TemplateBox[{
+ GraphicsBox[{{{{}, {},
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.368417, 0.506779, 0.709798],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwt2Xc81f8XB3CzJNkhFZ97r33TMCvq3lBRVlFpoNKgkCRKWkKEjBANo5CV
+kbKScxAZZSVSRsiWvefv8308fn/dx/Px4T4+j8/nnNf7HChnrxw+z8bCwpLP
+ysLy36dVWuDw8rIoun/ip1hqK6DwvLiMxoIovlBfLL2wRwE/74s75Twjiq/S
+t9PtGQoo05pbPjgiis/rsgg3DQXs5+l83dQuipqT5+pDlBXQ4ZKqWWaxKG4/
+Ps7IpSngHelfeOGhKCoW3G38xq6Az57Tgr/xiuL92/v7qcXyGNXmfeXQKhE8
+a91xnV1ZHkVqTIzk167Fxo9aRpffyGGZsYlOpbQw2ijzZiesk0NdeWknGlUI
+V1+N8d7uKos7U0/FV28RxAgln16OPzI49+iCkJK8AGoU8p3iU5bByenYUAtZ
+fgwZP3vt5QNp/EwNVimw48XWy+9u3v4thRqcdzPp53gw/NGZGmeKFIYw1dX3
+3ObGBLOYhg2ONLR6YdbVH8WFnOX1Xwy+ULH6jcQq1mcrMH9Fo36JEBUleNK3
+QRYH7j0g9XvUhYL2f+WaA1I5sIo3/LfjdQoW5Md4nY7nQEPeAcNJRwqa2z35
+zRrGgVsKop4t2VHwRZWzp851Dry+YpcE7RwF1wXtaipX5sAvq2+9zjKmoLBI
+5b36dHa08rnWL0Gn4LkhbXpcAjvqbPV+Xi9Hwfel+T+uR7Pj1NUJBT8ZCpq4
+pCqIBrLjuodW4yxUCgb/DKo/foUd5096BLGuoyDfczO5NkV2DJUd1j27koLc
+RHd1XxIbGhvrluV3Edj8gqvyzys2vCEhQ4FOAt+uo5c2PmPDjOfZUNxOoLGQ
+Q37JIzaUosy0fG8hMGzFXELMJTZ8vZKLn7+BQOq/Ne7HFdiwaV15x3wpgRp5
+qirliayY24QrIYlAHnWzLRjDig8XvygLJhLYmumqkB3BiopN45ut3xDo/haI
+OB9WDD2jE7chlsCyaL01921YMaqiUjjhJYGmD827t8uzolizsYJBEIG2pp7h
+CQksaJNXi2OuBMYs5SkrxLBgXNoPU7hJYEPCSFVyBAvuPzb39/ENApmLJznT
+HrFgL+xcre5MoHC8kuMHWxZ8cLVjIPkqgZ+m2w4WbWVBHOseo9sQOBaztkdb
+ngW1kpXOKVgTKKt/0L2EwoJXDwaKb7pIYFB0Vk6ZIAu+7wm22XGewMpg8YOR
+fcsA7jGibmcI3KB2fSn76jKc2hfHGn+CQK9Hf1Q+nl2Gl5Y03t/HCRxpPXi5
+wGQZfGzE0oRIf35I/flZdRniqvYUBxwj0K6pOqN2dgken9UvyzQl8KeiRm99
+/xJ0vVrBs4K0lnu8xM/fS+AWgrynTAgUod/2bf20BI/OiV0UOkxggZvC+YH7
+SxBlELCUZkSgXG3o8yHHJVB9qfWDIB0szVo3arUEX4RTnoYaEnihqnH3zN4l
+CIhIn3pkQGANVfv6vNoSXKAMRq4mvdMlNXlJdgmkJSUPBOoTyEd4inFyL8Ea
+/42FcQcJdHUaMeSaX4Rgj+ZwNdJ/y056rh5chDOnXH0rDxCYc1VpTKBqEfg5
+3zWxkqaWvpRbC4swWPx0z2s9Av3EV1mKpS+CRdBEsy7p08VtlRLBi5BsSf8S
+rUvg/l0z51vuL0J0tFOxPunN2fwsL64ugkfK4erF/QSu3Sb/7MSZRVByYh/P
+JL2QtEdl3aFFaH7ZoHaFdKfUiapG5iKY9iq+3kK6ItLROmzrIrhcuc2c3Edg
+hpgv2xFiEXYI6Isi6fDg1y+E+Mn7K1LeGkj6Lk++Wt3yApR3tT85T/qCV31N
+4PAC+H4QPcgkbcDy75JR2wLAsyQLgrSKKycnb/UCfAzwaOQkvX5iY9TXggUo
+CYgtGNlLIJu92g7f1AW4Ny2xsZ10X4/hd73IBVj4t3GhgXTNmYt2XI8XIPZX
++7k60tm/7678cnsBlKoKT38nHXkkPMbTbgGeLtJnm0h7Vqdr6JgvQMPWePVu
+0rZ65T/YDBage3eV9Axpk+L2K4WaC7AccOIbH3k/O3fNrbq3aQEOPRXfrkia
+ki0Yu3vDAuw3mb5iTJprG3334uoFeNs+fucm6eEk7Z8f5+fBcUHxSgLpBqlT
+jq4D8zDl13qghfSnSCeeHb/noWjXiQ1i5PONFfOPn66YBzsBwSEz0r7Bccys
+vHmwmn9SEUXakafgl1PSPJi6+eYPkt7DMsw75jMPvxsJngjy/cq5rkxMv0le
+35N2d4Y0/4Sk9hWbeXiYH6piQdZHa4+xy6DuPARPpwdokvVUcsZGIHn7PFwL
+aNH/QDrl9/1kG7l5WH/B5KbKf/VZ/a6te+U8lPMGGu0j6/eMXuXNuOk5eEyz
+F2girVvcKXSuZw50EkocHcl6F8kW1m0vnYNrbrl7c8n+eBfpnP7bcw4MzSKD
+ww8RGCEWcODZ9Tlos5b5cIbst3vBb/6anZ+DPwa0tm1kPxp6/RRr0JkD68Hq
+ez1kv/bb7bxfwz4HUi7iPolmBNb2HF4fMD4L06DolEL2f86Zyx8MOmfBfLPf
+r6z/8uLIi76KolkwK5U81nGK7JddS4dK7s/CC32PqlAyX2oEdm2KcJwly80o
+G88SeKf71go7q1ngySVCx6wI/BUwmye8dxYM5VKsL18g8EnHBO0c1yw0Hnqw
+KvMymR/ZykvqszNQorRZWdSOzCNfx5+r+2dgX+jZcnd7AvVVR/wyK2fA937W
+LQcyHzm8BybZAmaA/cua8jcu5PM4pVDTcHcG0hiHZPTIvD29zSYpyWEG6rMb
+Xf7L4/xf3RaHD8+An+GGPeZ3CLyu2PElZu0MbJirvRfqSWB33c8I5otp2Gt0
+3/1VKIEhb0SdhP2nYXzthhtfn5L353bUsPf2NNilt2csR5D1Ll3PFmg5Da8h
+0dQ9ksBjN6ovt1GngdO0QWaePD9WGPDuyxSahpZjytyO5HnznmJAPOSYhjUJ
+vRzjKWT9VFbUb+6egj18Ve+F3pHny8bSXXcSp+Dpr7ZD3/MJdB7jEDv8bArO
+lWsxIoFAqS/aY9K+U/A6+NhupyLy/ToUxn+znYKt1gkLe8oI3F6cz7dx6xQY
+mW10tq4nMNE6s/1j1iQ0lusf5BgmsP5slOTB+EkojKFuaxsjkMXc1/xX6CT8
+dLdRqJgi8Oghq6YZp0mIplRY1i6RebBTqFZVeRI27GF/kMJHQUWVZd4S6iR4
+vpCP4xOmoNnmAX1TwUko99pC8xSjYCq1uMxxdAI63tl5JFAoeGL1NUxLm4BR
+J6GsXyoU9OS0XNodNQGZAY73fu2gYPryAc2qxxMg6dbxdHg3BVdMUHMG7SYg
+fHrNxZN6FHzXXJcmv2kCdnfYuu2zJOeDVKWo1wnj0Bdewt8RQEHVBIkWpfBx
+6E3s4nUKo+DpV9zrix6Ow8VnMT5SLymYFdYR9ucCef0l96a/SRQ8ezf48Ubp
+cXh041nR1BcK+t+88zVFeBwoiZxrQqspmHPtErcmxzhIDyobH2+kIK+1lteJ
+zjFI2uJsbdZDwTzjsdtPY8ZA7bvspOkqKnYdaP0oEzQGt0Vmi/YJUpF/b8Xs
+h3tjQAufeGGznooXdry6Xm85Bl7RXQF6m6koSD1sJyAxBgn7tl1MOkrFXRt2
+J0evGYPFIZg+eYaK1iIKfVsWR4FhpTJvZEvFAm6284bNo6CdWD7H/YCKl8Yz
+Tvk+GwXO09l3FN5TMUJtVOPio1EIzJjaxFtIxbKbW9dru47C6KkX1oZVVJRm
+SWuaOz4KHVvqD8/0UdFUeyinQW8UUnd6TtnOUNHdSzH83Y5ROO1xj266koZ/
+eFKOXlo3CgY6yB0mQ0Ne4wHVfatGIXefmA6LOg13PVFYS50dAZ/KoRML+2n4
+bF3i96afIzDmzfhcd5mGR2TijfXCR6B2r9WTE/k09LDp2iLtPQKZLFaBGXU0
+fJcixcd6YwRMVhxYEuynIb/y6285x0bgvvlzisUGKWQ4d6SE7B8BgYw1773U
+pdA+l+LnoD4CWuXt+jtMpbCSEX1ATnQEWqrN9ZeDpXDOvU2eY+UI2JWcvev3
+QQoP+e0SxH/DwFfwe+zFLylMFcyvcfk2DApp8UEhbNLIE7EzYMvbYTA+Lp0y
+oiiNNpK5Bj1+wzDAqX7mkLk0lsap80TZDsPfhr8/HgZJo9SmrIqj+sMQvTjv
+kVIpjfffqfjwbhoGtcWpLu01Mti6PXN/6ephKGP1pd4xk0FN2LbizsAQxNYY
+rU5Nl8GIvemfVSuH4KXjsuiu9bI4Vbn5wb+kIVBVSzToipFF08Nv98Q9GgKh
+lzGKrMflMOMnncX80hCs7NjR5XVDHnktkwqEDwzBDlYON0OdTWjbJXf7q/wQ
+GG/XsORrUMCKy280PFYNwa6Hc52X2eVRdkx6TqPvH3AUhfOGCMmhx43YnPGy
+fyA7rKO18qosdixRXZIT/kHGn+eV45MyyPSMUbXy/gczeb7be4Jl8OVqYkLc
++h8E37eVW8Uk95egyHd1+//BoGJ8cM2MNJqJbbz6SPYflFCXzc/kSWNW5PMt
+Wiv/wRaLPoEad2kUkhYfmu0eBBZv35wiY2l0SA5PySgdhIuK9/w1adJYtU30
+sk38IEif8NO6OyuF9JxQeYrXIJj3vJudrpNC793CvT/PDwIXV9mcUpoUah8U
+OK8rPQjvbcM7/e2lMLo2gMbCOQivctZ10g5J4dIx3o7svwPAJvDI9oyqFOac
+W20pGzsAXXb2axXYpFBkwGdj24MBWO2RWH6FrLdrV7maw6wG4GK7MkvNdxpu
+vsN5fAVtABauxdq7J9JQPK/maS/HADis1hGZD6Mh59Tzhoruftg/0RUk5UnD
+Zjsl04CkfvC3uSt00oqGZYmLwVf9+mHb0UduJiY0zOwqqzWx7weHUim179o0
+fGRuaSSm1A9ioz2iemQ/OUcoPJ4T6ofqAOVt28RoeObH5NfmyT5I2XvvqAc3
+Dbcb+B2Iye0DxlrfiCMjVOzRzN2rsKcPtNqZlyWRinU3PDx4aH1gv8E8tZHs
+/4L3RsVDHH0wVMLP+zORimGbupmZZb2Q1Bw0GRtCRZ0NQpqaxr3AOffCW8qO
+ilvNWl0llHoh4djD7bVWVFwfkpjLItwL6j+y+N6doOLYaqZ6SWMP2P9QqOLS
+o2L0vK2SoWUPKDSzbmmWpaKf+varW/f0QOGH0IE5SSq6XGNPF6T1wIgn37E9
+YlQ0HIhQbOzuBh6/7AtMMh8Xf5XKnbbvhrhStazeQQr2igRf1DLuBse/e4qk
+uylYf9g8XkqpG+zV0je5t1EwpWKc1jfZBVFmO8pD68jzI4+QdLzdBW6HDAoE
+8yi4b2rA3NSyCwZtdgurvqfgNqXsF2p7uqD8/O1Jh1QKciUZiM9zdEHIKrYp
+pddk/ke4rvXw+wtfd+TY1fhTUOhm/eqw552Q0J3XyXGRgjPLswLDrp2wafCE
+GvUsBVu9JMV0T3TC+oGvFabmFEwIuSQ1J9YJboVTy9MmFNydzrLLIqwDWi0U
+j9C1KCilLqOdfb0DdOqDTXp2UXBVwUE9/iMdIBb73PUDeb7VV4YdKRLqANlD
+DcNe2yho07PJXiaoHSo8zQsnyfPR0P6w012HdhgrcNDYKUFBlUkX159G7cDl
+5eDyWJyCS2zFXo9420H937TCeSEKhkgcjxry/QP73udGfuak4J1k7hi7NW1w
++1r14rp/BOrlHnkr+bUVtHOxaXc/uU9+ic6tfdQK/MEWKx16yHmgQ61OlasV
+gvvsEqfI/bl+nRX7ElsLvGyNuBPYSGCUbCpfemEzLJz7eUToB4GXVGfXn73X
+DKoifRoxdQQuGweolC7+huhD8rEt3whU8P54/vHMLxBZSJH48ZnAydAVjszs
+X8CjuCI6hZxP8PWhO2PXfwH7KiXaYyTwCPSEHR1vghNd8MGenG/uTQmVSQz9
+BFZfjZZX7wlsPGerkNbZAITXyacQT+6LLcbqWfEN8MIuoVYnjsD4o6o6n2wa
+QGL96WO1rwl00l0yrxz+AazuOQvL0eQ8tSkwqGe+HqyHTpZkPCdwOtYpcqig
+HgIj+K9ceUbO5xuPJ0/er4e3f7h/K5PzWwoftYSdqx72qF7Iqwkjn9945oyk
+8Hewvfe41yyYwK224ZyyjXWw3sdh4gC534t1uQluflYHSaxzetqB5LzYsHeT
+JlEHb72mI/Y9JtA9r9HSbFMtRNa8Nw57RKCNcr6t5XANDL4+R8/1IdA4Jfrm
+hXc1cL+w6m+7N4ESkTZPnLbXAIdrX6HOQ3IeZZ/2p/hUwfqvtrWGHgTqTMKb
+LXxV4JvToh/1gEDBHu/CXaHfQCnPb/+kO4GpFeKTx2O+whW5v/4Z9wl0y+/k
+tZb9CnpXfYpFSR9ITZFzflsJz7jO6z+4R95v0O5TwbkVoHdcW/HSXXIefbDS
+OZpRAUICFg5d5Dzsfr0mILWkHOQ/tzSfJy15/GxxRW0ZiOS/WeV8m8ChA/SW
+n8fKwGgDXxYn6XzNianuli/A4yh87pkbgWaElwJ7fyl8+uceWXeLQBlBIx0B
+h1J4eXxO1Jn0BLuYheRUCVyRpdtJkC6a/OOi6FYC2fs6QyrJ+TyoJzFIg60E
+Wll5vG6TPt3kmKzn/Rlu3EhUVyG9uVKj5BjvZyiQ/BU9TM73FanfZq6JF4Nl
+4LCzE+nw6DBB9+giaPQPrNtF+kKw5aZAmSLgVtcsXk1axUNuX2RKIdzy9Ge2
+3iCQ3XnUMkWpEIqW1bQ+kK69mHczLwfhjR4bBpKOOv7gSdluBI386gwH0r/C
+wk+89QGQWAjlO0LaxVXhcXloARwLPVO7i7Th0EhDWvwn6HsSqE0nLXM2WzIs
+Ox/Wscq3bSC99OO2tVvZR2jb2PtCkPQPPZ2Ms0158Fss8joP6ZRP3HO6/blA
+fat4lpu0x7ZarS3zOdD/0ffkf9dPxT31XcuTAzbr4cR/v6+8zqJ+fkM2EPv/
+mP33/dz+Uhs7FLPg/pKYkQLpDpaB82W7P8DbFbFqmqTznDJSU43eQ+7yV67D
+pIN6XaZDTmfCwd/DBZdJW5/azbx19R1ID9w47PPf36dqOHzOuGdApu7f/CTS
+YjqVtfufpENI26fpatKtV2iqp3TTYGwoemGGtP+x9FK5S2+hYla9RJp83pqM
+XWaTvslw8azmwaOkB2Qq+grfJsIWE2fvR6Sf8R679bj6Dew7ku9cRFpvqpPn
+5Ggc9JqM8y2RnmlxiJQVigXqWl7DXeT7P/r2USEejQZ+i+XoUtLcClvixUdf
+gB0uJ/KT9WQ9q1ueqRIBL83VmRakaeFufN0fg4Aht3WRnazPmhSJNtPDF+Dk
+hr3iN8n65ThzkPDWNmREckb/ayWduPmVC0+eI+NjhwZFl6z/liabtBhDb0aV
++csnUmS/uKQZHBwUe87oH9Ll5yT7S/yPspzJj0hGXc1zY0/SFlz+bC26MYyL
+B9Z/4SL7k2XHtTZtzjjGqgULrXVk/+o8Y0QI3ElhZEmc6bYk983Qd+9W7j2V
+yhgrVNefJX2tS1BDc2M6o9YqB0O9CPy86Jl4ZT6DwdBPKmok8+HCZluvhuwP
+DCK5N/4umS9JAduZsVs/MWpL8kdPkHnE8Tkqf6VKAePGuJCqCplXljMrdlxW
+B8YW5ZmP/GSePUrvF1sXhQz50tw7358QuHtdrsCfuCLG949PtO6S+218/xF2
++8xShkfkrNrlKAK/e/gUSqp+YYDfvKYzma8skp/u1mZ9YaywVFTxiCHwhInU
+gkpeGeMrx+eOBDKP+fLHJuaxgvEgkP2jcAKBN/wDun2qqhjXoyV1HDMIjJMt
+jtUwrmZsM+qVSyL33brCqbP/aqsZqxQ4PvzNJFBkPvVKwqUahgtnccaZLAId
+togMrravZWjbw2fXjwRKh//9W+f0nXFyJiNGupTAxzb3G067NzL+dTiu0moh
+0LuS9cPfgkZGzIfY+pRWMs8U3Z9Yzzcy0jtD7q37Q76/UXdjB6efjPy4EfuZ
+DjJfbnpU3L3QxHj8ZZvp114Ct/k8LIg88JsRtVu2qHyCPB8T/OObBdsYPS81
+J1byUnDNhL5GyqFORhNzcwvbXgry/1KycnHsZKReSsqc3kdBYRTz1XrSyQie
+m2QZ0qWguN/fXz/rOxkn7ghMtupTUE7KzZXT7C8jLOjjdK0pBbVMk3MtLLoY
+0fNWa+fOUdD5/artApd7GIa6g41MLwr+cSpVcfYYYHxqblkr9ZWCQ7kGRS5l
+owy97h8z7RZUjH8Yc/qczyRj54bgppAhct+bSha68XyWsfFWoIq9Pw1b30l+
+0rBeZAhlzKpkUqTwyNM/3gOBLEzpKzf378yQwsg4v0/6YWzMRYvSBy/1pJHj
+pN0/zpscTAkD07ft38l5/XTim8MeK5g9uQJF7Odl8MMacfNpWy5mWtafgd89
+MijzjNK7Up+bmfIp7fx7K1mcc/ZYTDbhYcq2cYhQu2RxYG49b8J2Xmb8xcNr
+rpL7TfTFh/XrafzM2uZS1891chi456vfOmkBpsFUdNyhveS+cyVZq3itIHOY
+I7naIEUeC3RyPmWJCzFDHDdfGRNVwEU7S7WjvMJMbyUPqYYbCsi6si6CvijM
+NHjVdPBNvQKq6ToWHWARYdI+u38YUaHjXHNK79oxEeYh71K3r7501LEtCzSY
+EmHeexCszPCno/9853bPORHm/j+dpzIf05EQX+8zwSbKvGCUERAdRMf9x3zk
+vwuJMkvoIjlBT+kYUnv+UqCqKNNbU8XL4zUdN5dKDHLfFGVeyvkiyvORjjeO
+7AzRuk3+/IWZluv5dCz8e0TT9b4o89bOUZf2T3Q0Zff36/MRZbLMurkWIB1v
+Mec3lT0TZQYLWkc9KaVjWV6jnWe+KPOkUgbjQh0dBQ+Mr/2EoswU5RsWFd/p
+eKqJt2DisyhTea3cqq0/6Dg8vZf33DdRZgPvWz7Wn3QUUX2fqtUqyvwVEKuK
+LXQ8/bn6qGuHKDM+MOSJWhsdE00GljK6RZmW/FNn0/7QUdORakQZFmVGDEfo
+JHTS0Yt197TZuCiz/9w1ulwXHWsCj0cFTosyhbsLfyd201GcuL6/bF6Ueb30
+KZ9iLx3///86JvPVKu6IPjr+D05eNpg=
+ "]]}, Annotation[#, "Charting`Private`Tag$1241108#1"]& ],
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.880722, 0.611041, 0.142051],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwt2Xk01N//B/AZO0X2QQvNe8YylhAqwhSKtEgl+pClKEVJpBRR2StLUqhs
+hRBKJcJ9FUlZkiT7vivr2Lfv/Z3z+8t5nOPc98x93/t6vZ5nNjtcNHdkI5FI
+WWQS6f/+nsqJGFtdpcBQ1CvFw+pKILooJauzRIGMlT2OJ1SVoGzPC+srcxSI
+qCMfPqWiBLLtBd/+jlPAJuqMhwdDCYbX9qQ0dVEg3EfC+wFVCdzOaVrmlVIg
+dy6svkxYCXzpzeAURAHy9Koaa1IR4uKJqGoBCmzM66q+9UYREjqCLx7mFQfr
+M6NW01RFEK89ckhBTAwaBL/Ocj5mQIXZEcNKuiicseMzElzDAGMFugdBFYFv
+SZaHPrgogHa2deqPLcKg+S0+pO6XPCyEOomoKwjBL68nxBt5eZieff7wpJwg
+DCmq0lOuy0EZNUqjxFUAdELfvb/WIAs6nDfzFE+vhVdkz+u1MrIQzdy2bZcP
+H+x+t8d9vRcdTj2x7BtO4AH+Myo1pHoa/EjbxEuO44IsSh7pphIN7P4B2SOK
+C4Lsm9sZDBpMqp9a6A/lAsMGzbI/cjQQLUkbqbrOBWNcja80CBpY1qvWPLbh
+AofveXqLkjToJhk8UN3MBS8eZ14q5qbBjNWZjXbpnBC52/2NXC8BQQm84r8S
+OcEgZnHnfBcBEn2ZAntiOeEhZYNMVQcBOm7jq4qhnEC6YLbo2UKAX+C17tnz
+nNDt+eJocx0BfHlhaeFbOGGfa4zk4CcCNq3NVUPvOaDOppqsnETAhV751vBs
+DpCMeJPEkUBASVFSoF0qB7i9dzNpf0KAjeuDFnIMB9h/Dvj06DEBT2quBBh6
+csDBTyNVRAQBkpG6Td+2ckDnxlrl5zcJEBWv9KvPZYfWff88newIOD1qoPgi
+nR2efj77J+gkAW/Li357JrLD2ZR3DZnWBBzxymZQIthBOsC/dNGSgKjGyHqr
+i+ww1N07+PEwAeviLeU7lNmBQWsX/2yAv49M/4+hDDYQ8Hf35GcQ0PqEp7Iz
+mQ3K1XV2RcsT8EpSsfxPHBuUCdTt3iRHgJmIW9GXUDaQOXR9VYdGQAzXQnrS
+OTZIY13gTdhEAPUf/y0rBhvMru37wyNKAMtZ1ceMygYbfioOfhEm4Eu/+dW9
+UmxQX2X2IFCIgLOdjy5o8rGBfiD5t/A6ArJ/bf5PaJgMEsmqZcf58Pso1NT4
+9pIMLhJOLrFkAtZus9wCSWTYPip+9gGJgPY8b0Z+LBkukMMuRq5S4dYrJPMi
+hAy6p6tQ7DIVKhJN+P2dyfBtwUqndZ4KcRtdeK7ak0Ek1Onc7BwVzsfdZ79o
+RYb2w03d4tgC0b/mrU3IUPhj8IfDDBWOBtn0b1cgQ24bm++WKSrIcvh1bdlM
+Bllz+RbXSSrM+iW3ykqSwVHbvDR3Aq/vPVAnyksGs8rvFobjVHCZ5a1ZQybD
+53JzkYdjVND1UPrGNk8C5TvmPsOjVOh0vYTGB0nwk7JwI+UfFd4MPygc6CSB
+tvhlGjf27TPv37U3kkDTmuvpxb/4+faLmVUVJGCsztMPjeD1jwY8Tk8ngZO+
+eLzJEBWSVgq3MpJI8O1i653WQSo0pI/XZMaS4NXASMdlbObyf5w5oSRgvc/m
+zR2ggmdaZKLqbRLkKbgPHsXOOPxV5811EvhtSLRc6aeCaKq6+zsXEuwepwvY
+YpuYneXf5kiC7enU0+LYvgtP0z/YkECHp96lro8Kec9/GWhbkCDKo1j1Afbg
+Qd6OjwdJEOJz5YMl9sZ5PW/dvST4LJO5lsA2T/EQQ/okUN+9QWuylwrBBzJy
+mdtJMLYpUbccu3i2w/SzKglyoqlKCdiTSWIDBgp4//Re8Plgy+03vfVlMwlK
+/mN222Jbz/ht3CtFAvtmatFe7MjE9x8qhEkgxPkgSQO7fN/fI/vWkGDuxmi8
+LPYia/NYJTt+nnTm243Ydno5ovFzq8jO6Pi0JHZllJTps6FVxMeIO7MeW2sg
+wD+peRWFh2qIUbETdSbyn1euoqJlEo8KNl+E9Wha0SoaOMky0cf26P1Ky3y1
+ilIebuo7ht2+fet/2c9WUXVpRs8lbON7zyJfh6+iPEbnoQfYb7p4K976rSJO
+e6pGIfYGLc+V/Eur6PXYRFw/dmBop8ZHh1XEte3ffQm8f+PtpudLjqyiZ7dq
+pcywT2zNT/pkuIqCubxM7mGXBVEbyzRXEbdDC70WW6X1nkCFLH4eIfFRAr+/
+x6rzhpUU7NtnRc9guzb9eP1zfgWdn2pkiuHz0KisM1g/vILKFyQUPbF330rd
+1NiygnLVs7lbsMUVfcLai1fQN/+krx/w+fK7OfipK3sFHTffVaqKz+PwryNz
+vQkriM3/Y1c2dskNhuOI/wqSULhQUDxMBfmfD+NH3VeQQSpx9yA+z1F0ct3E
+qRWUbpHztg/bqeaP3pzRCmo/JrZTDt+HWqqB56LWCqK4lb37ia3tlZ25IreC
+rqpOF97C92mdTIAEJ98KOsV5K2EO3zdvj/GDPIvLSO8kI74Y38feiv8C1vxd
+RjfoYydC8H39cEl9UqhmGd3JfmCvie+3XWlH5aaoZfQl44p6F77/e3XnHNv8
+l1Hb0JasqVm8f/mCpCeX8P/bc2UL4HqylLFLQ/LwMkpaOfXs5CLez6iUJyKC
+y+g5VSH6LK5PN9cWadWtLqHUqarsT7h+OQXW10aMLaHXmZ/ZaewEaHhzcgr8
+WELTXduLObgIqLU/48pzfwkFjIgq7lhLQH7LTe6vPkuI4a9T185PwLNjj5MC
+XJeQM7nA7z6uly4m336zHVhCvdOPTq0VIYBHTVFvec0Sco/bcDFAioBdpDGB
+yZBFpJ/fJRSsSIC8N/fL3GuLaFE6L7hVmQBBlrTBRedFJFOwZZ2uKq6nA2Ze
+f40X0bjIrgGqJgHeP9509HMvIh2+UZ1AfQLsTSqvvZhdQFmuvsn6uwkwLu0R
+OT2wgBL9fzpzGREgni9q3FW+gPqa9/wp2kfAm2dXclsCFlDetGxsnQUBsRLh
+++I8F9BO53nnJSvcX6PSei0dF5Ds3RhNTRsCDgY2SjQYLqDu+F/P608RMOyq
+7V/LvoA0lKyjf17C/UV35fAX/3mUb/zdahX3y1ohXaVY93mU3CsjNxZNgG//
+dS7XU/MoQSO8bwz31+bw+UJRo3kk7BTjQMf9+UE3izjNM49WTdM3Or8hYHf+
+1pVt83NI+/Y9+tB7AsbD3BvXDM8h0d7mghsfCdivOX43r3IOce/ftqazjACO
+4JFptvA59DflZHpyI/5+1ozahptzaMIryuJ7GwF2as4ZGW5zyLG4dZqnh4Ci
+5v6T5uZzaCtPK3f1PwI8lbu/JonNoXmXkqibHDTor2uMZT6ZRZ+lLUKkttEg
+Oo3iIXpvFgWmaarO69Jg9w2Lg4M+s+j51r74eUMaPKPXs0XYzqItZQNPTh2h
+wfGrP853UGdRx3ur6flLNOA6ILAnT2QW/VUQV+HwpsHbzQdkgjhm0Q3dPTt3
+3KKBYOX3epX+GVThbRSh8IAGFRvLdX1fzqDTNaX5h/JpcGWSQ8I8bgY9s7tU
+1Qo0oH01mKSHzSAujvW+yd9p4Of2KbXaZQYtavz80NlOg+2lRes2qs4g7Skb
+RTc+OvQ/Whwal5lBtVIJZF5xOkS7aJeVCc2gnNfxQ+Ob6TAu9uGqy9Q0cko+
+bl6sTYeXZ/O6Pr6fRmCgvKfcjQ71DgnSpqnTSPi13rMIPzqQbMJsmh9OI601
+wo0DEXSwOHyqac5jGh1/8FT6VB4d/E0PUYJPT6MPKUutT77QIctI5xjl6DQS
+fBGhGN5IBzZtkZ+aW6eR+5QzeyNJFpQ1VgW+UKeRmd9DLzNxWbBUGdl/VHga
+2fhwLX1RkoVsammF+wQLTX07Hs5jIwtNG3K42LpYyJyZzrnOSxY4KPGGkbUs
+FKnmMBUYJQsn1lyGnBwWunc5NNi7RhYCOG1X9BJYaK/x9VmHMVnIXd23s+Y+
+Cy0MjYnGC8tBy7yWt40vC8VPPbH13i4HXCzqh7+uLCSXFODpai8HaqMCM9dt
+WEh7lst7+Z4cWA8ubF1zgIXkja/wtpTIQVB3/6W4nSw0mZm/MsqSgzetdTkK
+Siyk1aa91VNNHtoaSv59WM9CMfaXzBWuyAPPzwxF4zUsFBXCVhTzRR62VsY4
+/1mYQn6L6pFvCAU4+eVWmtPwFDpBsqmnP1KAEHShb7ppCpn9yvl5S4kBbwtO
+EAHfppDMbRkLS5IidOTtsRctmEJXPLw37HJTAr5s9YSU9Cm0WTcpa1VFDTTT
+N7WpP8brdX1D87pKYJfMt/5z0BRa5Q6W2jHAgLAnM5aHvaaQ0e/0i2XrGfA+
+pjum02kK5TkW1D4KVYCuiJr6ixZT6HL3Ff50SQVYG1YovGqE13vpeGBHsTxs
+C0g1u685hR55aLmvXJAHh5tR9zfSp1CXuYapqqI83LvmW5UlOoV85Z4vW4/J
+wYfL5/h2ckwhW6qtcmOBHPS4WhhXTk2i1LbckoshciBwdnfgiZ5J9Fan7+gu
+GznY4aBSNlQ3iVC/TF2ihhyctpZiu/Z5Ev34fc+YZ50cFJpN+jxKmkQl845x
+JyploW9f+0fZyEmk9Uo6/GWWLAgafZ9/54fXo3goQLgsOO1I9qy3nUTvEldq
+g0/IQuTW+3mnDk2i86Un7Ed3yUKRsvfEpN4k2ttiz+vHkAVhqrmr0KZJpH4y
+6/enFTrobtDLTOSfRCEmLYN7hulwVpwxtGV5Aune155ObKBDCR+b48HWCZRW
+LJ4e85oO56ZeW4fFTSCkH8RSuUiHWK0JnTOhE4gdDX3dYUeHimuq6w28J9DZ
+iffqRYfpQCflNC1YTaD9UcXT/Fp06FybZXFOcgK9ndD9ZcpOBwGzEc09vBNo
+6c66e56zNNB9wBCjzo+jr+H1D0dHaBAn+fJXU+M4oqzj/gq/aXBMNtXM5PE4
+WpK4axCZRYM7zn1b6MHjyMZ0TL4jmQZvsmjryFfHkfpI/rBjLK5HW1OqPxwf
+R+JbnL6LBdGgUj9xnzxlHIltjEiuPE0D/zcaIQJKY2jjU/H1+vI0PD/l7S1f
+M4bmuWOlLTbTYCdS4/IdGUWqL7cS4VI471Wq3P6XMYoEdmeGneKngUufvE+V
+wigK1EQffFkEfD+fpnOHdxT5vAjXuz9KgNwkfUFn6B/ybDtwpWCQgO4Vqldm
++j/0uuvhWTtczy0lNl4KlfuHJNc3ZnZ8JeD9s/gtu7n/obu5Mj0fPxMgQpca
+ne//izoELXRzigmoUaOcd079i+7etLzclEeAgamQozH9L9LRe3RtC+4/Kr6c
+VlzECGqLmdEIxflOqrD20SDHCOKf1Ts9dJ0Azpn4hu/9w0jQK8T7+FWcx1zV
+j4ZnDKNjV5XdbHH/C7WxPSShPoxUmDMOEqcJuBLLuL8gMoyEOIOSBnE+tP89
+XdU6PYSUGKNi5bifbj9wd19SwRDKyLDqSjtOwMDOAiPGriEUwLq0hm0/AXVX
+79xZSwyh/QP35rRMcF59e6h0lGMIpbd9KfTag/OdUj8zr2IQrXkdsXnDLgIM
+N4js3Gk2iBx1HW3/ahGQuOiiftB2AJ0NDL18F+fBu9u2X1LdNYCOlzLJF6gE
+eF1mzxUmBpCDT4GplQzu7yOxyn/6+1Ee0yR9/wYClpvL5e0u9CM2+YePUnBe
+HBSPOrPbrB9FKs9uqsV5sd7cJpWm3o/ePTr/gBPnxazvU8TQdB9aZzreG4rn
+oROFMtLuPn3odKhd1hKen/bMjNgcte1DaUs86y9wEqCmnv9Ea1cf2pPvUTaA
+5y2ejANSixx9yJ1o8pzC89n7WG+xO3d70X5VfcY5PL8l/zY66nShF5Etvhms
+X6DCPSGhB8ZmvYh91G35F86Hp0PSBPlFe1G/bRWvNZ4PRa7Vr4mJ70EnrzxJ
+KcPz5NzqvNCYdw9iheROxuJ5sz1QWsL4RA968rjykReeR9Ojz9EWJHpQ6N5D
+0aZ4fr2/PoJxZK4bBT9LLduF893l5HeqWX+6URVX+5I+nn/1ckm6J2O6EV+g
+jvZRPD/Ttska5Ht2IxgslzqH523eElMTwWPdKDBsviAIz+P1lTHHPot0I9ux
+naNNeN53HlC6IBvZhUia180bu6lw8IK5x023LmRn7b+Pga0x7eXdeKgLPeYv
+vH67iworbKWBoQJdqPpKqqlpJ56XQwbv9vzrRBK1zZUFHVT4JijwYGd1J4Kj
+TOMt2NGbrBJGwzrRRP/8gko7nrdf+L7Ye74TzS77iBa0UcFW6Xlm4r5OlL0U
+MW6CbZj37fW8QidSvWrs39VKBYb2WL45byfK2Dj84Sb2plsKN47/7EAZPcMh
+NOyhcI9g3ogOVD31r/9HCxXePkXRHw92oIvRpZ/9sX0z+ZJc+TtQtMNZQW1s
+k4Jjr6Sr2tE1U47SuWacX78mFvwMbUfbY4aqi7Hb60e+3DZpR3pENC0E+2W3
+Vp0mTzsC//TCE9ge4/7tA+VtKGRp8rY6tt5K1XBsQBtqXnHyEMTmXSsxa2rY
+hsx3bfJjNeH9ljzFvsLWhlq+H49vx06Qy16X+6kVSbp4FdZgn9OcX+/g14qq
+JjjqyrA1DAzlRfVbUfy1zAbAXjUL1yhfbkE+iduLP2N/P9nMvFrUggTm472/
+Y0e70A8wrregGL1+9kZsW283q9YdLainxfjgCDYj+KPj/blmJLdD7BAH/nzT
+D7ncmfnNyIi7aJGKDSmHfSc9m1HVhyqTvdihr5+EPtdoRk2c0yqXsI+hgRiL
+qSY0Lk9KSsSWqVZP4XnThOzvNDz8jT3c7JNT6NaEzs/eYBfE+/tusOKjy5Ym
+lHRCtPMQtt+MSMWm0UY0Kda0+SG2KYdtfW1WI0pxo6IObHHhjM5b5xuR8UGH
+7C34fWYpM+f7B/8gRzcBmw5sL50wzti0P+hofDuvPj4fu00ahEyd/qANyi49
+Kdh/Trswcnoa0Fxh9NwNfL5K2sy2vU9tQGwhyUZD2KkWmobFzg3Inqdrxgqf
+Rw/jFZvKsd/IO+G5szE+v4JKEZEDi/UoTKqp2hKf99nnHs9GS+pRanLAtQHs
+9o1WmdP+9YjxwsPcuwd/vnXUL+w89WjyVdWlLJy3Taby5qRFf6HDOTde40QE
+qi6POeX+1KHZlCGhCWyJvhvCKnF1yMzI0+U5vo/9DUZKO2Xq0PYNJ2fFcb69
+VfjH1lLpJ/qlGPCRge+7J/vsvc0hNSg83L2dm4XvwzRK27KuBq1Q4qRY2MID
+wZ90H1YjnQcHWD3TVMj+LjVtlVSFwhhl52pw/uyP1LOOKviOFh0YP6pxvbKU
+CWSwD5cjDumz45c4CJAVPmQo5FaOgp7+inqI6x+LXeKk9MwXZBQ961eE62Pk
+wMtIHbYvaPHxNmVRXtwPs6vnLkuVorgOiV3DuJ56eTPuf3tYgn5HyR5QlsD1
+enS8ISe1GFF9XxfdkMTrO+RLx+QXIc7Ls4I/cL78bWL42qGpEFlPex6/sZGA
+rZIn6xc35KNY2uTIHK7/7RcJTWvjHKTOteHLFRWc17I2dRw1d0KzCXwr5/bi
+PGVvKhNscFA/zEMrdh3uPy9Vkr3WFrrrO5meTX6P82Nbk3NO0sFg/TnkPLHm
+IP58OQdM/0rE6xvwI9qvo7gfxenHCvlm6X+aucr104GAjPDtzOeqxfrrnr8p
+9/DD65clFHFrlOj7Pd5aHXqLANs5rh3ntyF9O1aQdsod3E9zhyUkE0D/NBA6
+LcEE6EkWCHW++Kwf3BV88UwkAanDx9gv5JXrH6O0hv9LJuDqvfD+kJoa/SSR
+fdOP8Txw39m/we7WH3369kCNInEa8LP262Qd7tH/lR66jfSRBp0e5RpX7ozo
+95Z+sJb3pcNowYHPXhUT+tLktqWtxrKQGpRkdzpkWn+T+JSOPa8c0GcyRa7G
+z+u/MI/670irHLS/kS7WObusn9t48+PmRHk49qgzeCSCxDQwfmTkaKMAz17c
+Ld4fw8Z0FBzi8JNlAMd/rv84r3EwlQxrtP9rY0CN3cs08ztczAxX/o+NTxXh
+Hb+UzawLD/N7CNl/0lQJZOM2D3Lv52OmPs35s3tCCRau3FnOPLKWmdN4KyHm
+mTKMLKwXSN8uwHzZm/n2t7YKJJ4Jql9PCDLrpNdVH2pXgYhdVXcl6ULMgw0u
+R9df2wICFzN3l4oJM8U3r24zY1OFEsMPxe+lRJgqJbbpTqaqsOxqq2UhIMpU
+FI11tLmnCmTuuljFZVHmffOPvWxVqqBl7P55H0mcWVGW0/abXw0WWrMGxSbF
+mb62eYSBiRoYulREHJgRZzJqE25o7VODe4s92wMWxJnLO/Ie7jVVAxmp9SEs
+NgqT5Da40+WAGuw9HqLwS4TCZFENGq0Pq0H0T8dzEZoU5icX5ZQrVmqgUr7p
+L981ClPPXbL8tbMaXD2mHb3bh8L0ybZ2KD+nBp96j+309qcw3YcsYn6cV4Oj
+7PfuDoVQmJ3SgWnlrmpwnbmoVBFHYXr8J9MGl9SgovCPa0ARXv+Vsmr5NTUQ
+3jclVgwUJh+57k2ttxpYNwmUsMoozMIgakPddTUYmzUSOF1NYe5b/ltb5KMG
+4ppvs3e3U5hCDc9USvzVwK7sh4V3N4X5jfk07OstNXh5ZGTldT+Fqc2/klRx
+Ww12ulMPbR6jMA3PDGllBqhBIFlv1nKKwuyq25wXFqgGtRFWCRGzFGbx2rXu
+3kFqICXjubdikcJ8WyvNHhesBv//exXzxWjFwawQNfgfSt7a1g==
+ "]]}, Annotation[#, "Charting`Private`Tag$1241108#2"]& ],
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.560181, 0.691569, 0.194885],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwt2XlUjP/3APBW0kbrSCpF8TzTriGKmZIlpUKUJdGC0q6FiEqRiErShvJR
+KqGFFi33UpJCi7RYivY97dP+e77n/P6a8zrznDPP+/2+977vPSNv43rAnouD
+gyObk4Pjf5+2r8KHFxdpyBHxyNJFnIHis6uUdOZoWHyi9tNXUQaW7Uo+7s2m
+4dF6DoM9IgxUain4NPCPht27MgkFYQb2Cbb/1/yXhqylu9O7lzLQzZFhmVNK
+wzd8TYNHZ7XwiuIPPH2DhpoiPcuk2rQwLn5t5BdhGn7XFFvW81ILH7eGuO5f
+Jok2EQrGH3S1ULLmoCkhIYGXBKbJNV83YoXZQYMqRXGUSPb1ema1EfcQip5r
+FcRQZUMCcrRq4taXx1Oq1UQx2bV31MxOE2dCT4tpEiI4sXGT/LkfGjgx9fT+
+ifUrcC6Gv2qdiQaWKURqlTgLo7HTz1Gdj+qow3s1h24niOfKfgRu0lDHKNbm
+zXp+/LioG60ev1MNbRMsO/se8+EXu6wLXiqqWP1Mdhln3BKM1E+1C+BSQVnB
+TA3I5cHGRx99Itl0dOnY8OvuSx4c9It+oztOx5KipOsnU3jQICImq2eYjlbO
+935yRvNgbPv78Z3ddEz46h1s4MWD7R/GVkk20FEqYlvzp408mGB6+d6K13QU
+l6zyr8/kRmkpj8Tb7nTkX9NV3ZvOhVwBGSrJYyT+SuCr+vOEC3U5bXvHhkl8
+IUUvb4zjwsZ9el47B0g0E3Mr+hDKhReM/4iMdJAYvWQmNcmRC70dswcdG0hU
+GBQKPEJy4b2s9PzBAhJ13jK0PqVx4umE853m10gU3GyphkmcuK5eoWmpP4kt
+Ob5kXiwnFvBn7yq5TGLgC1iTfJMTy7/sfsnwJrEi0VAowIET361N2W3qQKL5
+DasubYITN9fdzdM0I9HJPDgmNZUD57amMjvWkJi08HYjmcSB4p8/PNaXJbEh
+9d/X57EceMNiz8un0iSy5o/xvgrlQHaJQP95SRLFUzQ93jhx4P7GQU+mIInF
+U61G79Wp56+229xlEziaJNG9g+BAmnfjavokgeuNjQI/yHOg3+qXzZVjBEYk
+5uZXiHKgZuF7d8lhAqsiVxk96l2Emv+mX7d0Erh6k9dCnvsiyP92stWuJ/B6
+6B+tQptF+D2CbZJ1BP5rMTpXcnARzlQcKJmuJrDshkJTGWMRWvduS/pcRaBz
+c3VW7fQCWMVO5D8rJZDaI/v+gAXoH3h9RPs1gRtq78cPeSyA4BEDK+tsAiMV
+OetGbBegPFJi9a1MAk9/bdzO3rkANPf1Hf8yCFy+JnglL/8CCITPGU0mE3iy
+tLVKNnIeTFOnuYZiCNy9jW3/O2Ae+Lusb+s/IFA1bwVHgvs8yBux5B7eJ3Au
+XU9Lav88+D84c80uksCYyP8SxFbMQ2FABWPbbQKvChZtqlucA1EWffZ9KPX7
+1+trwofngCdDb7npTQK1fHl5havn4FM4udv3OoE1p844892ZA4cs21GZAALz
+fl5d+tFvDj5bBhONVwl8dCgmKdh5DsLFpdnRVwh0Mvz0nWvfHNjOrQsgLxPI
+p0HfPi8wBwqntux74kPgcPqOpsLZWQCtOcMIbwIb1h338O2fBcN3/PQbXgQ+
+XRmWMlU5C74C39/dOE+gHsew8OjNWeDRkrH67Urtp+/StMyLs7CSOzuah/KK
+cbkdrg6zcDtpx5KNLgS2dJv5DOyZBb+Ub1nJTgR+OOUg8lx7FuReGHL3nSMw
+42fAc4cNs5DFk/GGQdm3Oru1a+ks1LZrObQ7EHjKsOpi8tQMeD6M899JeU9p
+u5hd9wxkbXFVfHWWQLVtcy8UGmdghlvcdg1lyTzxPX/LZyDhKP/O2DMEzqur
+tD3OnYGcusEGKcod6Tsvn0iZAcbqC+uenCYw+5F35s/gGbjYwKFQaU9g7Mq7
+e+O8ZuA3KdDnQNk/8lmHpf0MFN5oeihC+YwgXqEdmgHH/Wj4zo5Ak+tNKxsM
+ZuBa/taZC5QZHCPZUVozkJ7SWahNebXvsn0H182A7zP/eA7K3OPy3SLiM7BC
+dDi5xpbAPuetATXcM2BZptOTSrm2+4D03bFpsPwS5XqTcv6pc2/2tU9DzOAB
+Qw/Kj39eMxX8Ng3b5cYCbSlfP5TQW/l+Gs6ekCOtKDtXv752M3saXvimGVtT
+Njf8IrPnyTSUsO6yHSjrlHbmLYmcBhuOGR0/ygrbFvZ/CJgGvg6WYizlGpFt
+yrEe02Ct8E2wkPKVrktLnG2nQeJ89v0OysqFb/+wzKch+j67SoJaz4+702/F
+d05DvE9XoQnlEDvt+z2MaSjc3OZ+l/KmLT6uRUrTcPXNpZlGyh1CuYbhtGkg
+5h1sNlD7ea9tfK0d3zSkPrmT609ZP2/jwuZpNjDGJ7n/Uv53y6NJoI8Nx7J/
+WBhS5/XoZFZ26w823JJOhALKxox/t3Oq2GB/4sceTep8Z5apnblRxIYd74w5
+cyintjjrHXvBBgmz/kkdKj54QvonuO6yYV2jV91pKp6yj5M1DVfZ4LN813c+
+Ryq/NRzS093YwGmy3DSHctGPrhMHDrCBvf95uzwVv46vFLco7WDDJwdpmS7K
+K4PsxGY2smGN/3v+HGcCvVTaPiZJsMHVP1j/DJUP67jkn3gtYYNFpdILEzcC
+6xqsLxtOTcHu5cJCTHeqXvj/Vh9pmgJV7/v/tlL51VXXFMtKmAIFlYsaSVR+
+Rj2jeYqHTcFEsata3QVqfy4fNunxm4L59sksQV9qPxTrucKtp6D5zbbIR1R+
+W1yoPteqMAVHPpaNbA4kcMk+4V05YlNQK7DGIO8aga/l9625wTMFfl4OwAqm
+8rWqsl61axJMVY1DPUIIrJAp33YlbRJalA/NHbxLoPcoz8oDcZPQ32gluz6C
+Ws/HHaOKtybBSUhsA+89Kj/c3qV8cZoEfZl1x9qiCdQuLVouoz4JhQnSOuse
+E5h2NudvYe4E1Ep/L2zNIrDe5rGcUcoEcPmY0VOoesxhdcvqx/0J+KN0L+NS
+HoGH99s2sz0nwLlP64l5MYFcW8VqGRsnIHvHeG3pJwJVtBaFPyhMgLpEFZPv
+C4GWqv3G5qIT4OhfYGVVQ+BLhdIKj5Fx+HJ07f2tjQQeFTiPr16Nw9YIs/cf
+qfslmNd6YfvjcTgucsI7ppfAzMW9ul/vjENX34k/lwap/RpXyB9wHof2PQWL
+lyao+PhV94pQHoc3l9nijktI5H+p+fi/1DE4UmA8b6RMIiNV9rdmzBh48t8J
+cNMg8eQTfun3N8agZWRl5otNJOZGt0X/OT0GbM3t/J56JNpcjbwjozgGhMsY
+Mi1JDLt45XOG+BiccBEO0T5BYv55R35dnjHoZt0KMLEjUfis/vWj7aPgpOb3
+od6NxLdmo34PkkZhfkeIhfUtEjv3thQqRYxC27o4o8ORJK7YWTn9xn8Uine5
+FbvFknh6yxOveutR0MtZMS2WSqKowgFnEdlReDZolqTxkcRtq7c/TxQahR5h
+h+U21SSelSR71eZH4N7uezRoJLGEn8ve5NcIhGQ8zePpJdFxLOv4rbgREAo7
+qNkvRMfYTSM6Z0JHoKcIZq/Q6FhxUV16h+8I2J/9IWskT0dFjlfNM0dG4IZ7
+5rL7DDr+Ecw47Cg1Aty/LuVsPEVHYbN+xq5lI9Dk41DzxYmO2+6REgrT/0Dd
+gi/lzQU6xkmlfWtu+gfWXeEr/CLoeEgpxcww5h+YViiXnPpIxyCHTjXFkH9w
+OLNcqvU7HbMz1i3nvPAPUuwyN9V00HHFxv++5Fv8g883/ZwJHmVkerdlRO3+
+B56X2kWSxJXRpUD+ttvmf7B1c8bb54rKWMVM3LuB9g/izeyznhgq40xgK8Gz
+9B883XZMNuW4Mu6/vU0UB4ehs0Vg/Tk3ZRSM3XpX7cUwfOg70X4hThkd5Ar2
+dd8ehpxgGcWuTGUsT94s+NhpGIzZ5S0nKpQxIFvrprDyMHDUhEX+nFHGFu2c
+3eUCw9Be6GEpK6mCuqCx5Er/EDBrvfgGNFUwdmdmGaNqCNRyJZef36+Ck1Wq
+1wbTh8A32vVZn7sKmh94oZccOgQuUZa696NUMKuJzmHlOAQMuerk0gIVFLZO
+LxHfOwRbojLTm/+qoFPnBr/PxBCMsPnOmQupYuW5ZzpBy4agMl+x9JuuKq4f
+VZzR6R2EQaeQixvcVTHowtP8sYpB4De56Of4XBXbFhR8nqcOQuFsrqvMoCqy
+gpMYtiGDoPts/Wo3bTV8KLBmfNXZQWCnSf3LDlfDmYhH2XW7B2H/+mef986q
+oeVKGffQ9YNwzz+peoyljrmP4tX0lw6CedhrPbsEdRRTXDU03TUAGolmM2/p
+Guj2PCYjq3wAjlsb6dHuaOJXDdo5h5QBkBONObKnRQPp+fcJ+esDIGiX2ZM4
+po4h28V7muwHwLZMeNjjkjp2lUWmhO8cgGFu77UypDruMBKx36M4AO4+QT3K
+zWqYWHt3LQfvAEwuellqe6vhgoVwW15HP/ywLH94ea0aHmu5neha1g9JVhpC
+zr9UMd9OwHr90364djDtAf2RKkr235RpvdYP3+JbHladVsXz7ny/om37wePC
+IfdRLVWsmboeZ7KjH+LDXnx7slQVVa/wHlmyth9YLL61si0quOptzYMenn5I
+kS/4bvRWBXkn4xsqu/rgl86Da90xKvjLWdP8bnof7G7WM9E/roIVafOR7rf7
+4OCxG0vCWCqY01lRe9ClD7JKygsslFQw1MradKVmH4T9Vi37MaGM3rHknRmx
+PnhlKnHpcKsynvo+8fnXRC+E796l0vhJGbX33d6bVNAL3pq2F6OSlLFbt2An
+qdcLj2348rSOKmPdhaAgwbXU9ydeJ7KpfCh5bVo6xNMLlx+ePGC8VRmjlbtY
+ORU98N2jvs5/tTIarBbT1TXrAQXB/1iHu+iobtniK6vZA3Mquj8/NdNROiqt
+gEO8B+aH/3LHfqHjqABr84fGbuB6bpOtnUvHxFknTRPrbkjNN60Qv0XH25u1
+3dX1uuFbZ07AtD8dfc5zZ4qu7QbvQWtBWR86mvTHqjR2dcFDHEhebUfH+R/l
+G066dMHK4/5m2Sw69khGntE36wLBgQ2lh7XpWH/AKmWdZhc4bIoIJdXpmFE5
+trZ3ohP+Dn3+dWQNHY++XSPn4dcJCTytOzK56Lhrst/K3LoTCrQdnZ7Nkqih
+mZewSa8T7Lqem5aOk8iXvm/VLE8nPOKRX23fTdX7WF+JoNsdEGo7orrpK4li
+F+sFouPbQSGwd8AyiUT24rTIsG87uFwRFyiPp+a563Ir9xxth0IXu7em0SSm
+Rjmum1nZDrmOlrRcqr5vz+TYdiK6DTKMIwyKfUhct1lpR55XG6TTDTTmPUhc
+VmJkuOJQGxxcXNFp7kJifVX0ofdibSD6dvGJoT2JDt3KLkoRfyFxWN5Dx5xE
+E5cDnlfd/oJ+1HpXZWoe1Jrw8W0y/QtuPqaJGsYkLnCVXg8V/gsX9oWv8jEg
+MUr2yOOhW3+AVyrDp4NB4pXn/EnOQq0gk/Egm3M1iYYFh17IfW6B8S2egsJS
+1Hz4MbGgNrQFrrrI5xDUvJjWtqmOwdcCYRlXJsJWUO8nZcu9wPUbXjTyCfJQ
+9+nj9S+XZ777BQdipv2CuKn7hTEtbeP/C5pyev1FOUlcNLurVT7/E+ydi70O
+zxFIhhTa32H/gDweP46L1Dw5cX+JByvvB1iw0xpOjhCI/+2/Mur1A8pC+b+Z
+U/PlIeiOPjzWDDbatxJO9lP9yqRYhexQE1w5+nIzdweBRjzW9TUZTeBnUzy/
+u42aH0TT/wSeawKftUVFD/5Q84kKa7qrpxE+tw8+tPhNYKOdE/mqvQF0FsWs
+D1H9Rclvs825KQ1QfCnjB28DgSmHGQbFDg0Q0e4mANT86rlnwapq+DvYHkhR
+NaLm12Pv2hzrsr9D0futYzK1VD+39aNPs9d3kN2wXeR/8+wK5fCI7tl6UC43
+4aqg+pupp56PhkrqoYvMTC/8TM1TMkeeTwTUA6+NvEUeNe9mLFf4wM1XD5am
+rY7lVH9kOJbDlhP/BlY+Fy30yglUd4rhXd9YB2z0n/L4QPWrnZdFVePq4JLJ
+Tc6MMqrfbNiprLumDmZ9nAW1qHn5iym5ZUd7LZSnnOsLfE/1ixXCu/am1ILQ
+yoyBpncEBr5ttLZUrgUNeVI6Dgl02FjkZD1cA9ZXXijxUjbLSLx4OrsGHiVP
+ivsAgbKPHO55ateAxheZY64lBPKrJrCmJquBS0Q9aoLq75rk7I/y+lUDxwEP
+j0DKXtxTYfI3v8KIhWP7qyICDSbgmdryr3BJX+aIGWXR7pB32+5/gWebJrZM
+FRL4p2n/TyPpL5DbNe7zlPLLylUTR5I+w82i/byWlC8XtQufXf8ZXue61YtQ
+3vsyY4P3iypY0djTWPuW2o9EL/2gjVWwxyuQK4ZyV8T245EFleB5W3O3HeXX
+15Z6JzIrwWerdOwmyoFeNXdffvgEld23+oUpm52JTSsy+gTJyhyagwUEyh2x
+Ka2srYCJvXInaykP7aX/brKogC71fIdCykW645Ndvz/CsFmZ/nPKoarFKyZs
+P8LBFXatiZQt11wnufvKQdLv78YEykqipgYibuUwZJ+u9ZDyOPfKE3KTH6Bq
+/6GG/yi/n/jjo3L5AwwPJghlUo7oTovQ4foAWf3W1e8on2z2eG4YUgZbOxJX
+NFNWrdL5YCFcBkafgsonKM8V8bTaR5XC1n3mXTRqPZUvv7DPryoFqbwL9kzK
+MYnRooGJ76FS4PIWJ8qnI62Vw5XeQ7LuMstHlLWCNux6lPEOjrf15X6nzO09
+Yp2h+Q7u1wsYi1L7XXvm7cW3+Qg/JT2FzCk/PnLtXsV2hDub9o7EUfbxJe98
+ul8CWnrnpjdT52sy9K/hVUoxfO54sO82ZSWbPLnovCJ4m+3r1En5u6FBlk3z
+W5hmnutOpuIlo5h/Zk9fAbzL3q4pRMVXkEatvtpsPvyYMVO8SHmj1In62dV5
+0PmpuO0EFY/8Yetk2lRywXB9fEIT5TaOfvuK7W/gjE7e78NU/Eb0+ExFncwB
+xYvPvp+k4r3FdS3j+J5XkB/TgGlUfoRZZJZvcHwBIV+CmnZR+aPL3GY5ces5
+xJ8P2NJDOU7Y4tKd6meglNhTsJnKv8MvQt/h4UQwJKX7+Kj8rMmQbTU/cBo8
+r10edqbyneeU0ZqQHSZMha0xxsbU/JKm+sRH8K0HM24lb7AqVR9+Nzu8SjIJ
+YbZsD3NZoOqHz6t9RgMr45lVCn7eVVS9MYhjxopcyWB2/VGQkmgl8H529tKd
+x18yw/TH96tS9et8p6iOrkwm86Se1lKjvwSWzQenuc5mMavFl9XeaafOU9Xp
+ekPeG2bEbPFeZg+B6Xe1WU/Vi5kSb5JZzFHq/coeFy3VKmGGooZxOlVvrdlL
+tpzbDMyAap4VUtR8FJrZt1LqMTJ9pRqecbIJ3C5VIPIn+T1T2eehy8I8VQ/7
+DnG75JQzT3L3aiXxk3gh7G7Xza9fmfvGF//aKZGYvL70qY5ZNdN5VqhPZwOJ
+de8mbQZrKZ89MytBkig5+9I11bGGuVGgTOmbColuapIDAi61TGGOYGl36j5S
+jOnoqPP8xkxYV3p+804S7zgENJwMbGQK2G7QqD5NYkgV55uOkkZmqJjEluaz
+JAaqBN47O9vILJ+2ce50JNFnJNDMzbOJmS5/zYTHlZrfLgZVXj3dzDx9qiz+
+GHXfaty8UfJo70/mhV1n8p1DqPsrNSzll2grs6yDL1wgg0ShcWOdjP3tTJaV
+kdkDNol/PMu1vIP6mTzH1wrwZdNxqGDfe5+KEabHjZuSL32VMeVG0km7mxNM
+zSC7ADeqf1OcfC52IX6aaVNqUJQso4ot2XLFOmfnmZaf5W5sGFbFQw/+hPSH
+c7CS4z8sChar4aPk28XG0VyswLQ6ofB96shzzHmQ9yIPCyIGC/7mqOPXk2nP
+DgQtYY3/Nt3UtkYD3witsppy4mNZr/VWuhmkgUpx8j1LjflZdoWcS/k6NHDG
+O2j++UFB1r+nZnu5DTWxf0ZaOFVbmFUXZTUITzUx8cyNeum1K1i0e25H7Hg3
+Yrje59tSiiIswwyH+CunNqKw63P9UglR1umlJQ9HX2/EEoP84txVYiw+rtst
+g4JaOO9svemwsDjrJNeGe8HHtZBzaV0sfV6cFfzfhpP6qVq4aY/H+70ckqy4
+zoFD/GwtnPmV0SMxKskqe1f5QZbFQAOnivB9k5Ks3+HD02f1GBg2264dPCPJ
+ynnHIZu6g4ENoYt/ihYkWdev/Ln9y4CBa1ZJ3xznorHWq75sWbeTgbstbhLf
+xGgsNwurnAt7GRhVa+8YzqCxJNy9Ljw0Z6BquewA/0Ua68nZooG6swy8cGhr
+lL4fjRV7fbWeL+V3HYd0fQNorPDvhw/7OzCQ39O9IyuYxvrkKCR96RwDzbnD
+bvfepLFskoqeVDoz8FFkqpb8HRrrUHWqopkLA3vky35ZRtJY6lstjP5S1sxq
+DQqPprGW5Iusa3Bl4CXWrHJFHI01zH2mb5M7AyveNjoHF9FY1sK8uf6+DBTd
+OyZRjDRWSFq+Us4lBh5vFi4ZL6OxOt49YV7yY2DKWfK08ica65z2zf5nVxk4
+PLVT2O4Ltf7zZ+9KBzBQ+8ap3PhaGitireuJA5QDJf1OfPtOY1UGTb1qp/w5
+OWaJwA8aq3nHtZz+QAZKMl6/1G+hsfiD0wYNghl4sqz6sG8bjRVwrDVnbQgD
+0w72L2R10VgewgNaUTcYONq25FlvH411J/Cg1iHKuh4KpvLDNJZK76vAX9Tz
+1zm3T1mO0VjnX51uv3SLgTXhRx6HT1Hvnzulf/oOA1et8dpdMUtjOZi/aNQI
+Y+D//x/Gerq6f/lHyv8HHOr1Jw==
+ "]]}, Annotation[#, "Charting`Private`Tag$1241108#3"]& ],
+ TagBox[{
+ Directive[
+ Opacity[1.],
+ RGBColor[0.922526, 0.385626, 0.209179],
+ AbsoluteThickness[1.6]],
+ LineBox[CompressedData["
+1:eJwtmXk0Vd//xpHMyXxQyRznXvN0hRyhDJGU0qikMitR8YkQKioSomSoyJRC
+RcJ+l4qigYQo86xkni+//V3r95f1WsvZd9+9n/dznmddGWcf+xNsLCws1aws
+LP/7e/xp7L+VFQL+9Oyr0nuvDSKLkooGSwQM6z9SfFmlDe+2ZR46N0dAyON0
+U9m32qDY/urjnzEC5uXfsfIhbRjm63n4s4sA3yjZqdpSbTjtruNYXEVArvhG
+e/t8bQhWaIWTVwhI7D5SRN7Whrv35OI+8xPQtmj8V/eoNqR1XPXZxS0G5zZy
+/ykY1QKxb7t3KouKghkqUkYhWlBjt9usVkEEWE5RUdKCWmChrOAnJysMuyLk
+96fd1oTNBYeyvqoJAd+sAN1SUhMWok4KayoLgk9HrP7WOA2Ynn2UcGSTAPxV
+IWKcuDTgnWycdqUXPzh1dOkcDlcHg9WXimkufPBoKF+a2asG8ZSenkkQD/js
+sA+50qAKx1Mc+4bTuGBok5bpWLUKfH0sxc16lwOeyCRLcxfSQYrvmQZ6yQ6P
+xWsSe4AG3r1Kv2IK2GETt2SmQAUNKsszIo9mscOn08xN1CsaHPa63caaiNl9
+Ni2rkAYpX85FmPmzg/OP8pFbD2ggccvo50ctdrC1dEzrD6eBiFhtSOOzVVCe
+77T3qTUNXEZNaZnZq+CVV+AVHQsaPP9Q/sM/fRUIni7rrDSjwe7zBSQRuwou
+qxHybUY0iGu51bjfBz+f+uvuZnUarL3nqNShsgrkb22puStKAx7p/q9DuWxg
+1cf+bU0PCb9SuGo7H7BBxqriFOFOEp5I0D4032UDnuVE4w2/SbATPl3+PooN
+IlVk5AybSUjkWMjOcGcD04Fh6ZxaEmT/rgnbT7LBt+oNIttekDDlph5kJ8sG
+VVXR4deLSHjfb39huyQbNLvXGzQ/JcG18463Dg8baK+xTwnIJaHgu8xBwWFW
+GPrkMj2RRoJBmY72xxxWqPYuzauMJoFPz1ENMlgh9kG7oM01EtqLA8mSZFZo
+2b9LvzOShLAnSDrzGisEuPL/EQkjoSbdck2oGyugwF3vSi+QsOfK4X6GMiuU
+jcuHjJ8kQZE9pEtNhhUispp+fHUhYTbkwS9FCVY4qZ/qW+xMwt3AgQYRbla4
+Y571KOoICZ1eZ9DYIAtwcyn3BuwlwXNPRFJ2Ngu8aSA+H99OQsZymRaZwQI+
+Jvt9XpmT0JQ99iUvmQWKuM4piZiRQDEPrn4axQJyQn+WWygSRLI0fV94ssAx
+M50NGZtJsLRzXaN3ggXO+vntldYnIXjhfnbpYRZQitUfeKRHwqAtd8drWxb4
+2YDUK7VJqJjtsH6rzgI6BTF2mmokTGSIDpgqs4A8x23N3yokbNphHfZehgXs
+H7k9u0En4Vb6y9IaIRZofzfyYEWZhNo4SevUoRUUSDc4oqRAgu5ARGhG6wpq
+cAiQYJUnId1gvORR7Qqa2DpX2iFLgl9vtXzekxVUX2X+qUCahPW6/sslZ1YQ
+y5i1ScJ6EiKjOrVfO6+gf9f1lVPXkTDWbu1RuRuv9z166xNJEt5dkW15p7OC
+5s9c1GgXJ0H11w3+GsUVNCDsso4Fc5L6vFktsYKQj4mTEkGC18+vhfXzyygs
+xUPquigJLSoGg43Dy+hHUkVBtQgJW8OypFralpHyBr4qbsxitKDo9opl5GJV
++SBDiISQS4NvugqWkfjL8cuzgiQMf98915u2jNZmvxXZg7nyInliJHQZHdNg
+85URIEGpPuHeqO8yKuBc7xC3loQ4BdaG8ePLqPABKcqDeSnAk2t6zzJS2lhX
+cZWfhJNfmrfMmS+j339fH+DH/E3W1H9RdxlFMVpn764hYfP5grzlTcvId0Im
+QxXzWukI8dU8y8jSqczCg4+EQL8xW65FJgrIzHMSwdxbczCC9w8TcUatFL/j
+JcF2Q/Vr/t9MdMjXyf4i5tIzmhOCX5jI8/Dt7QaYZT/cVxJFTJRteSWdFfN1
+SW4n8WdMZDe4y/0rDwkz3n4J6zKYSJOpXvQI89GqjlqpOCZayxsaEYp5u9Hc
+id+hTNTUpj1zHLNqiQBLyhkm2rvBx3UnZlEN5bsHjjHR+muDf00xL+WaaEvs
+YqLRuYQkE8w98ge+NFNMNN2fE2iB+VOqr2uiOhOdMLuT5Yi5UDyazUGaiWwd
++NV8MSfFPUwRFmAiL8bqTQmYL/GV6zasLKF6r+cZbzCfjGz8FvtvCUmX3y2a
+xWzD8td9Z8cSGrsR7KWHv5924OrV/F+X0Pdjvv0hmNdNbUirq1xCu7K/aTRi
+ZvPW1Y8uWELFVaYuGvg8hwZsv1umLqFQm6q4JMzfjp3y4rq5hEKyUhq48X2U
+tF3irA5aQuN/fPQjMKc6JGVEeC0hX36t3zz4PiO+PjMwO7yEHq3RbryL2dPy
+4w82myVkKLZBRwfrYXdVl88bwyV0o3pWrBXzZqMF7hD6EjrIoN+6hvXEpUHb
+wuRdQtnW+gVcWI//ck1bXi8uotDKztAWzE3yh3wDRxYR4XR5Z7EwCY/Eb2TN
+flpEudJ8xlFY79FxmdTLskXE6a6fEClGgi9fZatf7iJy6FmwuYnnw4TlH//E
+tUV0Y1TEASSwfgM5c54FLCJ547S2YTxvAlMbTX3cFlERQdORwfPZPmB3/o/F
+IloTnNJcKIX9+JibYB5jETnu2HCYD89zfltonpvSItr1pkP1rAzW59eijn7O
+RfS6QVzvJPaDY5a1AZmzC6j6uNLTCewXFlU9wi4DC0hR8MVM9CY8fyUiFl0f
+FlBcgMSlPpKEotRzz9oiFtAaByEPhiYJyeIxVnf9F1Aj2mOnhv0rJO5xr+OJ
+BeR0RFZNWxfrPbJFvMlsAQ09LA12xX447LU59NuqBfRCJUk2xJSE+gH7dTGT
+84g+/y1qBPtr6TGPFzY98yhcc439SQvsPw4pQ5/eziOT9e3vo2zwfBgt73of
+Oo9egBtHgiO+f0EjerLvPJr5faDK9iD21/7/OLyOz6Nz5qsPE9jfW2Pmy0TM
+59H838+jP46TcLt7Ss6Fax4t7nDdxX8a+02J1rLe/Byqvry20Ows9rdo3xbe
+4Tl0JjT6QfQ5EnbojF0vrp1DHbJKWjuCSGC/OjLNFjOHZpytN6fh91fRIfJb
+06U5dPkE7DgWg+dRwy039/QcojWQwrq3SShv7T9ibz+HrmomT4vfI8Ffpbs6
+Q3QOZWhs0/qcR0J/Q0sylTKL3u0t27a1noT4x4SfyI1ZlLkgaHqgCe/v4l7b
+waBZxJZhZhjdhvWs0MgW6zSLxPyvU5v7Sdh34atHh+wsSvgaGfRriQQOG/5t
+xcKzaIs2v2odG84TMjbSV9hn0f2TOo9/ctFAoPZTo2r/DApzsmq2w3mhZsMH
+o+CcGWTnoWDwQY0G5ybYxe3vzqDogf41Zbo0kK82nVCInkFTiUzHBpw/Qk6/
+yfrsOYO4D/md99tBA0ZV+doN6jNIJHR3ZqoHDfrvLA6NSc8gZDmIfpylQbzn
+5nfvBGfQtnhzfoOLNBgTLb3gOTmNZs8N+CbeoEGOa3HX65fTSM/qdQkU0aDR
+OW2jddY0Cr0d+Nwb5y2Ww9GHWxOmkVNZMXKpocHeXcd/zvlNo/vN3rk6HTQI
+td5JXHWZRpu+X/UlRmiQb27gQOyZRpwHNRV3ztKAbbNwvY7WNHqT5KxbL0AH
+Fe0V/vey06is2KBLXooOjqojO/YITaPaew2bumh0KJCtqvEdn0L3Ptyqy7Wg
+wwHes/D06RSq7G20Mr9Kh4jVTstb0qbQ0Q5129RkOjxbsTL8cnMKpfv8+5KW
+RweOKdnSP15TyN+0ftuXejpojPLP/Hd4CtH5E5lEPx0ODS5o8dpMId0eDw2z
+RToU/Wp4qkyfQkpn5aTjlVTgd1Pl39J1U8h5KIlngFIBrvpcmgXvFGoTcJv9
+74AKaNUmujUvTCLzyIVLfv4qcOR92OOTw5OIs1K5d/aWClxD3n3TPyeRj+D4
+Me1nKvD81QG5iI+T6M2xkvmj31SAp0Az7WH2JPr2TMA6g1AFnWyp35pJk+jx
+r/FKV2NVOPqAZ93bK5PIQ28pIc5dFaJTZhx3nZ9EMawnSyqSVeFlYndi58lJ
+xEvaRL/6rApdsV8affZOohy9gIV7nGrAF10mtGI+iaJ/Hw/vs1ADvYgsu5s6
+kyjrs3oruq0Gzpfibm5QmET23voXfUfU4EZAcF2+yCTSsc+7nU2qQ+lZdx5D
+9knUGqwlfNZLHXq89lrUTk4g2RIll9U16sDvujXyQM8E2niE5eF+Bw3Qd1Z9
+N9QwgZ7w5bhm5mqCyyFJtoC3E+hyvuBVf1FNiNnLQXEVTaAKyejXUgoaUGY3
+EXQnYwKNbikMDshThz6r9teKtyZQUCQHj/d+dRAw/zT/ImQCHc++8vXcOtwn
+jF/qmZ+eQBKbCp33f1fDOfKBf6PTBAp99eOgbIga3NK6WXx85wRq3ZHNVsBQ
+g3KVwPGJLfj/mwe/iy2owsCmk2phqhMoppf1u8dbVRCStfcSlJpAAytFd3bG
+qoLR+i156WsmUO/9EokqZ1VwFSOH1JjjiOPJQBCHvircFhDbhP6Mo68VNp8j
+hFShkofthO2vcRQron+5blQFhthHH/yuHUd1Dzk3B31WAZGVn52er8eRdMuL
+v9YFKuA+WXgo+u44SnL42m2P9ZKsO25wKmociZbyn844qAI1AerrTAPHUbHb
+/BkjUxVQYHn6c2H/OFrqmwkdEFWBPaajpU2W46j0+cvhKhYVCItUSSrSH0fW
+vdFG1/7QoZMvf6+7xDjyGzjCfe0DHfjtRnS2cY8j7vZ7FzOf08HoNikqOz+G
+gm7GmXk/pMNdiZzvP1vG0LaA3PMtYXRwUMyys0waQxIu4TQBPG/hbn1qClfH
+UGx7cGXkZjwf+fJrWS+MoX9BOc6nVOggoPXwc+m+MbS2mjVzlwgdao3TrZSI
+McSIud5o1U+DhbAOZXbOMZT80NEqpo0Gu64bCcHff6iiot5kfT0N+JI3x6g9
++YeCo6UmVmF/CS3SvsZP/4c8zjzve3OHBu2M4u0feP+hfVkD3iwxNDBEGhzB
+I6Nof/esvF8kDWZqVS//zR1FQp5BfZP+NPDsUwqqUx5FDLPq65v20eCTx2OD
+cO5RVPAf7VrXThpsmlBYMBj6i3h3PLv2Dve77mXZ83nZf9GI+4HfLAY0cBTf
+cCZq01/kHnWgVFuGBi9T76lt5fyLptYJ24qvo4GwguTofP8fxNnDCuuxX3/R
+IDzcsv4g4XPKE+HcNDC1FjxhofAHtb7gD6yYxHkvePV+DrkRdL9p4Z7RZxIk
+y77dGWQfQXaZRvcUP5KweuZe06f+YcTj+zBG7j3uh16ae2Jyh5GlEdW/r4KE
+qMNOO8U1h1HavPzn9AISziWTNxeEh5FmLnRtxO+rYz+m635NDyHJZk7bZ49J
+YNhct8p4NYR4ZU7wsWeQMGCIW5LJEBpUSMz2iSeh4UJ4OJ/cELp8VXLyzC2c
+z5/vrBplH0JxbFPhl2/ivknvp4prBpFYu/ed71dJMFsvbGhoN4g86hbPywST
+oO7YHiilOYgi49dP3PkP58P4nFcsIoNo6T3Bsz4A9yNeSu998wBqlrbZt8MP
+95tFT01bpwGkwKpwycID52c9xhl1kwGUn9E4q+hGwvmzq54JyQ0g4/TUQsFT
+OJ+MJKs09/ejRL/SHbw4HzBbPygd9e5HXNTgmmicJwbF4k5ttetHxRk9/tX7
+SWi0P5wlr9mPTM4+WeLH+SP/06Tc0HQfcj3c0VO5h4QDZdIbfYP60LP05ZxU
+WxK2zYwc3uPUh66slMSr4/yioVmSomvShyRVTHLqrHGezLWRXGTvQ0Gjfp2y
+lrhf94nv/93fizhZvtX9wv2zQ6b3DqrpRWMT+86lbyPhZXKgaPj1XiRyrD7Z
+DPfPBz/M95z07kXv73t0yeM8dUNQ8LaFXS8yee0fyr+VBJdrjwXWiPSi6GpF
+D6YxCcIBjbyJ93pQsKvOke2GJMytzAv+C+xBYfdtNx4xwHkycqO4xYEeZNK6
+iuMSzmvZ8e7yC+I9iD3odGs7g4Sb62LJ3XPdaNsz7/gNmM8+eKGe39yNHE/d
+5DuJ++yWZyxGRxK7UY5XaaMwzn/yeoqmJf7d6HFz7NQFHRK4K60tBRy60V4V
+Jd8BnBdHzc7sdNPuRn/entJ1wtxYm+jwVrgbrTmSQXZqkfDKvvzguskutDYw
+guGOOfVn1zG/hi40f0vKionzZ/hRTtfPhV3IV/SnZTJmtwG6t+KtLpTH9Jfd
+gtnW297v0ukuVHdXGI1o4L4xfT6wZWcX2q24nvcBZomL90M01LrQXPieiaOY
+l9mqIqP4u5Bc99ejSph7rw1e7/nbifLbxrbOqZPwUYD/tuHnTlS/83jEN8wF
+d7SSE/I70XfXTaKFmOOl9qeNRneiVUMBHcmYAzODM7d7dKLnMX/qozA70R/l
+pVvh9ZJsWi9jNiv+WDiv3ImSiKL+cMzk5n8l9tydiN3Yv+8GZqkw5Yv76jtQ
+nJbq+1TMQzF+V7ljO5DIo1d+JZif30fxr207kPxJlZ5mzMF5PBleazqQ9tLv
+lRXMlq8cnmysa0duSUfK1PD3EalOf1Uf1Y5Ytp5jO4W5vXHk/WXLdrRhF60m
+E3NOt26DDlc7MskvXfzfefmNhbYPfPiN4pxibujj89yyXDecHPEbmSjv9b6J
+uVHi+Kpltt9o9MTBTht8P2mbCtY+e/MLvQnp3V2K2V1nfp1zyC80E7zYqozv
+d8UuRvsDsw2NNV0elsF6+HSklbpQ3oYSTrzbm4053lPBhvyvDXlPK6fqYP2Q
+V1+fuDnXiuz/m7nigvU1ncDhS5W0oonUqLUcWH/wcFfwhH8rsv3w0LAAswMa
+SNw7+RNVPIjcLYT1GzIjXCM12oL8ZRIElYxIsGZ3avyW34JY0guPMTGLCeV2
+hnm0oIsKFydbtuB5VqHm+webkcTRvvwHFAnNLp7k054m5Ov5TusSnrfK33Z6
+L7OaUIKN+euzuK9k7dUxq3BrQgV/tFy98Hz6WSwfrv33AynkKK09jfuLAD32
+1sBiI/q9+X5a4Q58H5PFcxtFviOf0SOhUnuxv3kmrd7U3IDOGjHdj+0jQbzv
+opDq3QbEXnBjJhv7S3+TOd1QugE5yZn9MMd+FFbW7ORIr0eSzJXOF0dxn1g1
+e0Pm2hd0fyc54OqJ9TSNHqut/YJeWiZGTniRIDRw9Y1Rwme00dFmb4gP1usn
+yen9GXVI7oqRZ7YvXv/WlkNxrz4hRl9puTL2U0fpSHLV8AdU2CzoMxKJ/TKQ
+vPkxoRK9Vyy6bpKJ52l0rOlpVgWKFC/VMcD+r+hcsjGxpBx9+iSpwcgh4Yel
+WaHzzzJ0QCKM1/AJCVoSRxoX15cg1dPONe4vsN585HQOWTxFDv/FWx79gPtb
+vlTHHvuTqPRotO71YRJyYxjUI/UKYxupWVd2/H5kf5dWzqldaRyTtiAzgvuH
+0xyHvoceMi74KpnQSNEg6tmwuEQaGIfrTSQ93UaDLRKvBDsz3xpfnOJ/GGFP
+g6xhh1XexR+MDeK9dQvcaXDhRkz/tS9fjIvaTA2aUmhw0y206WhYs/FILjpS
+xkmHNVM7DPJ39RiDXHfx+m6cb/w+aJ8LHzGmMzo/PO9WgdFXNm/P14wbK9lG
+vjkzogpZVzKOulybNpbcNRw0N6gGCjN5whfuzRtvSfwWlXBJHdqLNlYYuDKN
+nSNSLtxl1QCHO51XR2JZqAvHq5bNQzQgNfN6xY5ENsrgnCvPWi5NYD/o9Xd1
+ADvlHPov5XG4Jnw5mvPYPpyD+pb9oI2dWwterJE8POvJRQ07EqfqQ7VA8a7M
+IOcOHur5XFn8hWktWDgXzszbzUdV86ZPvvDRhpGFdfzZDH7KbJmjpKJdG9JP
+XWlcJydACeVattfs1oFYk7rrEgqClHp9g7RvlQ7w++RtrRIVomgX2Za8lXSh
+0qy04qWkMNXzvPPl7du6wPRy0t3LL0Idzuy7lDKlC6ycDck0pgi1mFl3iMte
+D3QtfN9asYhR3vZhX4+90IOFX/mDohNiVGFdVJAhLwPMPGtibWbEqOp8ssaZ
+YMCNxR5GxIIYNbfI6fRMlAFNUSud5ctilPvNmoqz3AyQllx3bYqNoDRaHr1u
+EWKAe46uBp2ToJ6Gm99+Ks2A5wz7n8d5CUq1YNzlpgQDlqu9Qu+tJahPOqJS
+3gIM2L7vmvJ3YYLKq17NU7GOAbH9j+p5xAlqxx+u1TOyDGj1h4Ct6wmq6L6x
+oexGBsiv/iUTKE1QFo+GfM7g9bzjZz8WyhPUhb5ea0qOAaVywr5DSgRlJeWl
+a6LIANZiVUkZFYJatXjmvC9mq61Wbx01CCre8VagnTwD4utPuMfqENRJp55/
+f/Hz7UdDhWr0CerXf9WhT0gGbBpLKVsxIijvT6cfHlNjwOlLpc56Wwlq1rLj
++ifMZfyNPD7b8H6WPW4IKjCAPfVfUZYVQZ09sTpfQZ0Btiq8B9ttCSqSeaLi
+sT4DksoVV4ntJqhsaduHitoM6LLemmezj6DuPDF6lY/3R7Yd3h1xkKD4ffm+
+ntJlgJ97wGK5E0EdmqZ9+WnGgMr5+IdTxwlqYJIz/wZej+vaM2u6Kz4fX1bX
+w3i/9uJ1k8c9CWq72GikuBED7j0euHfvNEGx3doX4WvJgF7dVWbf/QjKc+dU
+JivFANUPUn94AghqqnxZIwfv54LD5vitQQTVxBM58caUAW96HQwDQwlq2D8A
+3lozgMfvTG9hBEHVys+5O2xnwJ5VN64PXSOoE/WWsefwev9Ri/Sau/i84lwK
+/rNhwLuvYj9WUgmK2bz5kus2BvA7aQbpPSSoy2cMd+bvZIDjqI2Cz2OCGoUN
+Dwz3MeBBkNvnrDyCal/wOm95kAF/+CL8258SVMKlxatJeP86KekbxJ4T1PlO
+r4t5dgwIppW/tyklqPdFDcY1RxhQU9bsFVFOUPkzJ/ZYujFAyGpStAIIapu/
+1NzN3Qw49JO/cuodQTnJsRxKxM9nuZIn6R8JSu+laKrGCQb8mzXnd/lMUC9v
+6xgKnGYA48qxl/fqCapySlFXAq8fJhZ05PsPgjJhdvPQ8f7rMpM4eFsJSrko
+vK8Of56YzvOCre0EFaWro7XdjwFH333dG9hNUK5X91kluDIgZ/fIcmE/QRU+
+3eHTdoABE90cj4eGsX6LmF6rPBlg6Cu7U+YfQfnk8H387xwDIlm3zDpOEhSL
+1br1Kr4M+Ba7Py12lqD8rxxKD3FngKS0//aaRXy/qZWlwR4M+P/fF6k1sEVS
+AD//f6I0RVc=
+ "]]}, Annotation[#, "Charting`Private`Tag$1241108#4"]& ]}}, {}}, {
+ DisplayFunction -> Identity,
+ Method -> {
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}},
+ "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" ->
+ None}, DisplayFunction -> Identity, DisplayFunction -> Identity,
+ Ticks -> {Automatic,
+ Charting`ScaledTicks[{Log, Exp}, {Log, Exp}, "Nice", WorkingPrecision ->
+ MachinePrecision, RotateLabel -> 0]},
+ AxesOrigin -> {0, -24.4628263145363}, FrameTicks -> {{
+ Charting`ScaledTicks[{Log, Exp}, {Log, Exp}, "Nice", WorkingPrecision ->
+ MachinePrecision, RotateLabel -> 0],
+ Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}},
+ GridLines -> {None, None}, DisplayFunction -> Identity,
+ PlotRangePadding -> {{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.05],
+ Scaled[0.05]}}, PlotRangeClipping -> True, ImagePadding -> All,
+ DisplayFunction -> Identity,
+ Method -> {
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}},
+ "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None,
+ "ClippingRange" -> {{{-5.999999755102041,
+ 5.999999755102041}, {-24.462826314536354`, -8.136370804376675}}, \
+{{-5.999999755102041,
+ 5.999999755102041}, {-24.462826314536354`, -8.136370804376675}}}},
+ DisplayFunction -> Identity, AspectRatio ->
+ NCache[GoldenRatio^(-1), 0.6180339887498948], Axes -> {True, True},
+ AxesLabel -> {
+ FormBox[
+ TagBox[
+ "\"\\!\\(\\*StyleBox[\\\"t\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+StyleBox[\\\" \
+\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*SuperscriptBox[StyleBox[\\\"h\\\",\
+FontSlant->\\\"Italic\\\"], RowBox[{RowBox[{RowBox[{\\\"-\\\", \\\"1\\\"}], \
+\\\"/\\\", \\\"\[Beta]\\\"}], \\\" \\\", \\\"\[Delta]\\\"}]]\\)\"", HoldForm],
+ TraditionalForm],
+ FormBox[
+ TagBox[
+ "\"| \\!\\(\\*SuperscriptBox[SubscriptBox[\\\"\[ScriptCapitalF]\\\", \
+\\\"0\\\"], RowBox[{\\\"(\\\", StyleBox[\\\"n\\\",FontSlant->\\\"Italic\\\"], \
+\\\")\\\"}]]\\) - \
+\\!\\(\\*SuperscriptBox[SubscriptBox[\\(\[ScriptCapitalF]\\), \\(0\\)], \
+\\((6)\\)]\\) |\"", HoldForm], TraditionalForm]},
+ AxesOrigin -> {0, -24.462826314536354`},
+ CoordinatesToolOptions -> {"DisplayFunction" -> ({
+ Part[#, 1],
+ Exp[
+ Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+ Part[#, 1],
+ Exp[
+ Part[#, 2]]}& )}, DisplayFunction :> Identity,
+ Frame -> {{False, False}, {False, False}},
+ FrameLabel -> {{None, None}, {None, None}},
+ FrameTicks -> {{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLines -> {None, None}, GridLinesStyle -> Directive[
+ GrayLevel[0.5, 0.4]], LabelStyle -> {
+ GrayLevel[0], FontSize -> 12},
+ Method -> {
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}},
+ "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" ->
+ None}, PlotRange -> {{-6,
+ 6}, {-24.462826314536354`, -8.136370804376675}}, PlotRangeClipping ->
+ True, PlotRangePadding -> {{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.02],
+ Scaled[0.02]}}, Ticks -> {Automatic, Automatic}}],
+ FormBox[
+ FormBox[
+ TemplateBox[{"2", "3", "4", "5"}, "LineLegend",
+ DisplayFunction -> (FormBox[
+ StyleBox[
+ StyleBox[
+ PaneBox[
+ TagBox[
+ GridBox[{{
+ StyleBox["\"n\"", {
+ GrayLevel[0], FontSize -> 12, FontFamily -> "Arial"},
+ Background -> Automatic, StripOnInput -> False]}, {
+ TagBox[
+ GridBox[{{
+ TagBox[
+ GridBox[{{
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.368417, 0.506779, 0.709798],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.368417, 0.506779, 0.709798],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #}, {
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.880722, 0.611041, 0.142051],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.880722, 0.611041, 0.142051],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #2}, {
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.560181, 0.691569, 0.194885],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.560181, 0.691569, 0.194885],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #3}, {
+ GraphicsBox[{{
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.922526, 0.385626, 0.209179],
+ AbsoluteThickness[1.6]], {
+ LineBox[{{0, 10}, {20, 10}}]}}, {
+ Directive[
+ EdgeForm[
+ Directive[
+ Opacity[0.3],
+ GrayLevel[0]]],
+ PointSize[0.5],
+ Opacity[1.],
+ RGBColor[0.922526, 0.385626, 0.209179],
+ AbsoluteThickness[1.6]], {}}}, AspectRatio -> Full,
+ ImageSize -> {20, 10}, PlotRangePadding -> None,
+ ImagePadding -> Automatic,
+ BaselinePosition -> (Scaled[0.038000000000000006`] ->
+ Baseline)], #4}},
+ GridBoxAlignment -> {
+ "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}},
+ AutoDelete -> False,
+ GridBoxDividers -> {
+ "Columns" -> {{False}}, "Rows" -> {{False}}},
+ GridBoxItemSize -> {
+ "Columns" -> {{All}}, "Rows" -> {{All}}},
+ GridBoxSpacings -> {
+ "Columns" -> {{0.5}}, "Rows" -> {{0.8}}}], "Grid"]}},
+ GridBoxAlignment -> {
+ "Columns" -> {{Left}}, "Rows" -> {{Top}}}, AutoDelete ->
+ False, GridBoxItemSize -> {
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+ GridBoxSpacings -> {"Columns" -> {{1}}, "Rows" -> {{0}}}],
+ "Grid"]}}, GridBoxAlignment -> {"Columns" -> {{Center}}},
+ AutoDelete -> False,
+ GridBoxItemSize -> {
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+ GridBoxSpacings -> {
+ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"],
+ Alignment -> Left, AppearanceElements -> None,
+ ImageMargins -> {{5, 5}, {5, 5}}, ImageSizeAction ->
+ "ResizeToFit"], LineIndent -> 0, StripOnInput -> False], {
+ GrayLevel[0], FontSize -> 12, FontFamily -> "Arial"}, Background ->
+ Automatic, StripOnInput -> False], TraditionalForm]& ),
+ InterpretationFunction :> (RowBox[{"LineLegend", "[",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.368417, 0.506779, 0.709798]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}],
+ ",",
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.880722, 0.611041, 0.142051]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}],
+ ",",
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.560181, 0.691569, 0.194885]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}],
+ ",",
+ RowBox[{"Directive", "[",
+ RowBox[{
+ RowBox[{"Opacity", "[", "1.`", "]"}], ",",
+
+ TemplateBox[<|
+ "color" -> RGBColor[0.922526, 0.385626, 0.209179]|>,
+ "RGBColorSwatchTemplate"], ",",
+ RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}]}], "]"}]}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{#, ",", #2, ",", #3, ",", #4}], "}"}], ",",
+ RowBox[{"LegendMarkers", "\[Rule]", "None"}], ",",
+ RowBox[{"LabelStyle", "\[Rule]",
+ RowBox[{"{",
+ RowBox[{
+
+ TemplateBox[<|"color" -> GrayLevel[0]|>,
+ "GrayLevelColorSwatchTemplate"], ",",
+ RowBox[{"FontSize", "\[Rule]", "12"}]}], "}"}]}], ",",
+ RowBox[{"LegendLabel", "\[Rule]", "\"n\""}], ",",
+ RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ),
+ Editable -> True], TraditionalForm], TraditionalForm]},
+ "Legended",
+ DisplayFunction->(GridBox[{{
+ TagBox[
+ ItemBox[
+ PaneBox[
+ TagBox[#, "SkipImageSizeLevel"], Alignment -> {Center, Baseline},
+ BaselinePosition -> Baseline], DefaultBaseStyle -> "Labeled"],
+ "SkipImageSizeLevel"],
+ ItemBox[#2, DefaultBaseStyle -> "LabeledLabel"]}},
+ GridBoxAlignment -> {"Columns" -> {{Center}}, "Rows" -> {{Center}}},
+ AutoDelete -> False, GridBoxItemSize -> Automatic,
+ BaselinePosition -> {1, 1}]& ),
+ Editable->True,
+ InterpretationFunction->(RowBox[{"Legended", "[",
+ RowBox[{#, ",",
+ RowBox[{"Placed", "[",
+ RowBox[{#2, ",", "After"}], "]"}]}], "]"}]& )]], "Output",
+ CellChangeTimes->{{3.8763699506493063`*^9, 3.8763699619208803`*^9},
+ 3.876370068782353*^9, {3.87637043091245*^9, 3.87637044257585*^9}, {
+ 3.876370721301976*^9, 3.876370808099616*^9}, {3.876371116142165*^9,
+ 3.8763711352371187`*^9}, {3.87637122695619*^9, 3.8763712464846573`*^9}, {
+ 3.87637134045012*^9, 3.8763713522979193`*^9}, 3.8763718090898647`*^9},
+ CellLabel->"Out[58]=",ExpressionUUID->"6660f0cb-7c8c-4df5-9146-056350f78fc0"]
}, Open ]],
+Cell[BoxData[
+ RowBox[{"ParametricPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"0", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"0", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}], "}"}]}], "\[IndentingNewLine]", "}"}]}], ",",
+
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",", "0", ",", "0.999"}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}]}], "\[IndentingNewLine]",
+ "]"}]], "Input",
+ CellChangeTimes->{{3.876369742606814*^9,
+ 3.876369749518669*^9}},ExpressionUUID->"3f75c1e0-258b-4769-8308-\
+40547e5bc66d"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}]], "Input",
- CellChangeTimes->{{3.871621469605801*^9, 3.87162147052512*^9}, {
- 3.871621790483807*^9, 3.8716217922994432`*^9}},
- CellLabel->"In[8]:=",ExpressionUUID->"23bc2248-ea2c-498f-be5b-40dd4156709e"],
+ RowBox[{"1", " ", "*", " ", "3", "*", "2"}]], "Input",
+ CellChangeTimes->{{3.8846851066526546`*^9, 3.8846851100998487`*^9}},
+ CellLabel->"In[2]:=",ExpressionUUID->"9c4c95dd-0cce-40d9-9382-601216046955"],
-Cell[BoxData["1.148407773492004`"], "Output",
- CellChangeTimes->{
- 3.87162147103511*^9, 3.871621526682054*^9, {3.8716217875635653`*^9,
- 3.871621792592815*^9}},
- CellLabel->"Out[8]=",ExpressionUUID->"108b1754-01ba-4ac1-8b36-cfe5355222e2"]
+Cell[BoxData["6"], "Output",
+ CellChangeTimes->{{3.884685107994219*^9, 3.884685110357212*^9}},
+ CellLabel->"Out[2]=",ExpressionUUID->"7dd902cb-f16f-49b4-8c3d-3fad52ca76f5"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ParametricPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"0", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}], "}"}], ",", "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"0", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}], "}"}]}], "\[IndentingNewLine]", "}"}]}], ",",
+
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",", "0", ",", "0.999"}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}]}], "\[IndentingNewLine]",
+ "]"}]], "Input",
+ CellChangeTimes->{{3.87595272795855*^9, 3.8759527743037024`*^9}, {
+ 3.875953429388359*^9, 3.875953486484068*^9}, {3.875953717122241*^9,
+ 3.875953801562244*^9}, {3.875956575822091*^9, 3.875956602382399*^9}, {
+ 3.875956644263064*^9, 3.875956696863812*^9}, {3.875956757489621*^9,
+ 3.8759567674092197`*^9}, {3.875956797650632*^9, 3.8759567978098288`*^9}, {
+ 3.875956870619629*^9, 3.875956879171691*^9}},
+ CellLabel->"In[4]:=",ExpressionUUID->"c480077f-daf0-49d9-971a-8783f8e24ae3"],
+
+Cell[BoxData[
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwVlnc81d8fx+2tjOwtZctexTkhKyJCviolQiKjkhClhZKVPRpSMoqshs4n
+UYokREb2uNbljs+1+d3fX+fxPH+9x+v1fr/lvC46+TAxMDAIMjIw/P/l7Uoi
+iyjcxPoSxerV/7AcdOq6byV+6iT2myvPpz2kGg7PtKlW2B7D7E77cfQwPoUW
+3xYvxBx3xNLUzI+YG2ZAif7r1AwuO0zo/ECbYMxD6CbEuUNh0hobPNbAdVrk
+HrT/V1eTnWGJOZxLCuFwi4OvyWbHddstsEFg6F/HGwtJKVZRgqfNsXaLFm9B
+x0jYBwX0BLXNsINXxhbzy8KhaLiqQoLOQUw2JbSitOsSnDoo7bGpD7C3Bxip
+lWXBsMMzTZttxgT72VtREmASBFv/e3raEjuAsbKYRLbkB8A730f57b8aY702
+0VyyIb7QM7I6VW/eCBsVDUmkfvaBya2xrSQFI+y1k0S/p5U3PNMhr6PRbIDp
+Rt2VfdR+Bsp6ttubpehhpfdYFCUDTsCqd3O8LuJ62JP+EonnzB5Q9bNsUuQr
+XSxiLMWx6r07PPUxICPgnw42K1sWHHrFDbrXtU82xWhjQvurzFMGnaGx3n3t
+Em1t7KdBy2qupDNs6iHX8M5oYSYdoetK/k6wXkMy9binFubWyDThtvsoXAiK
+IJhc0MR0E//e6WU7Ai8GhoivtaljMnyVzzgHrKBk+5ZfdIQ6ZuSQIFxuYgXf
+CbMOpCqpY67zf02cX1jCguA8ZsoDNayhK859/sEh+M3+bnlYqCp2KYfTh7nA
+HFZ+ZSxlfqiMmW7ckYlLhFAw8NSTrGPKWNVqLO2qFoQl/DYexRLKmJHHkxNX
+agAs12pQXyxXwhhtlcKXLpjCtEczuu9GFTHhZ2+N/KUOwNKoh5z+UXsxqZ4k
+FRNHQzh52nl3gJUCFumcouc1pw3D2u9JaigrYEZ4f0x/sTY8C4+XBXMrYO8H
+Tv1ZO6sNC4OCps793o155eyaWR3TgrOUdAbktRtrLHnIH0vWhNPW0slvsuSx
+i12+hOJcDRjw13841EwOc1Bzvj9+WRnWVjI9faQphx14Lx7bpKsMl7Mel85L
+y2ELb1rff6IqQemGzBKdDVls5U277ES4EtQfDbXjfieLjakN9x5MUIRtm3/+
+7d4vi9WO/dfr3r8HrrtdesdXL41pfNHNl+HYDb9aiNUKEySwKzH8R8f6pOAv
+sM0+1i2B/XjSZJH9XAp2Njv5dn6WwMZ18i5PhUjBHKdnl2TzJLDf1lVLRjxS
+8HREvZWPkwTWdIrw/paVJNzubJzXaRbHuBRfKrb2iEOZfu0Zu89iGLpf265z
+WBSePep/fo5JFFM/d9+VdmAXPH/qAOd+XAQrvi7rUye9C4oGGRk9nhbBCNO+
+C4hhF0xMV/J/1SaCyQ07PH3WLAhHlHZu1mWKYKBcni3PSRCaU3GBBC0RLF9r
+IC35qgB08ZBJ/xQqjJlIScUZLfLBrg6d2iF5IYyNfYilrJUHapM8GNWVBbEX
+54SzW0iskPCo1DHjOj9msU8y6ugwA1w1ddqVpc6HcUjx2jjkrAEJ4ZtMKvY7
+MHuxk7dexOMgOxaPnfbmwbQ9+j64GJDAFNt6RHMvF1a27VZ+eHYO+EcGNTlE
+c2ITtm5Z0hlTwFGoqeaRKgfmenviHl45CsKPPdIO4GXH8g3eiwcmDoDPjXrt
+U0usmI77jyNtMt1AJ3THOJnIgs0WWsoP+7WC5ik5qsYOFqx7VCgVL8VAhp96
+8jclZuzvBrPU0/CXoCIwLXzzJBMmG7fxemZvJlK0JZen3GfErEucOg/9qkN3
+54wuvfrGgHVMzNryyDShhomrOQHCDFht26tzOUdbUXiAWQVH/Raqjvyjaen+
+G1UQu5XqvTeRWmwun9/jbrQulFV9W3oD2VS1Pqmq6UWFyyq5OxrX0CeVN3CN
+2I++RO/45Ba7ioaHIucO9P1DMqcmiqr3rKB9w9FJ6VdGUMLK5nL9bxoq6PS9
+JkkaRXURc/wuaThyiXv7t8ZuHCnbSTON6FNRTn2jY/7nCRRdMJA6ME9GQXVF
+DekSU0i65vCm+DMSuilr0WIaNI06G/eH8uouoTQORZv+IQLqRzFHlosW0M/A
+ZRZfo1lUM+iZ8/ruLLLY36/3vWYObbL9rReJnEZ21kY1qjILKM+9h/+K8wTi
+X0/34o4novFMsYCu0hHEmC0sIrRjCfkWc0RyLfch80IhzLhjCVUUGw6ma/xG
+dyw5t31fkdDX4qHKvysN6D+VaZ60eDI66ZEzpDlaDFwi6qu1vCiI6HzwbqL3
+S8BFIPgQfSjIaEiNDyeUgJCC7oJSfwr6e/92zTq1DHgfLC5SDKEgrlzuAJYH
+lWB3cSBhTywFnc467zDUVgfm/W5fNy6goLubiirOno0gq46D+KGfgkoC5oaz
+VTqAyMuIc1+OUZHZ0WnukjMdYNBc76fLcSr6PtjpMZXVAewUvc0IHlR0tLyh
+YZ79N/CWy7DjPUtFFy3mRbQJv8EOJ7f7biFUdEqM5yWxsguQtbknZx5Qkfq3
+2vGRC73AS8yqcO4rFZ14KzR+4VUvuBpcvnb1BxXBVNNSHUIvePg0b5K1nYpC
+urSvhXn/BYTxo8ek/1ARyede4XfPPrCT+wbNepyKMmv2Hz7oNQCKDiviMdtU
+xD9USDbJGQapHaeIZgY4KvSEkT+GhoGzSNTCM2McuUc33+rgHwHJjgbZzKY4
+MoosDBBxGwHzz51+fbLA0cXP9ziCx0cAZ5p21m4nHDUf/1mUyzwGwsb9qXkX
+cOTw1P+nh9IYsLQ8XzV+EUeMQyufLO3HACn74DmlMBwR497kFGSOgfv4/NXS
+CBxltml2n9EYB2HhrB8z7tDZhNc4y3sCqFYbmlALceRduxxjeH8CjGycdBB8
+hiP9vaCWq3oCcN/85ravGEcHH3uuWLJMggLe8q2TZTi6IOp6Qv3FJIjySwpL
+q8fR92PUeLXlKRDnfYBwuANHKYE1V9Xkp0F3LClQswtHR+wfuvraTwPKvvEY
+vh4c7RWMCEoumgbNRuT+xgG6T8p07jW6EEC42ZjtwhSOKvfzGJo3zQDWO1i5
+yQaOqmx3ThxangEvSuJ4WLZxNDLLnZSrMgtIDMZNjYw0xEq7I2yROgv0GIND
+ldhpdJ23lr30mQPkCT1CEj8N8bvbDJzJnQMipAQ9gV00dFlAhTn89xxIKIqQ
+vi9MQ2UMgXvem84D2RPzX70kaKjmvarLN6kF4FvfpJyuQENntTJb4lwXAG90
+mXDzXhpyY9woKn64AJJbxcJnlWjI4k63wx5mIpAYSjjOr05D42lKPLdMiEBb
+dENfYB8N7b2WxetwlQhq/7wwZ9OiIfkVOz7NRSKw43G991WXhq5mypraqC6C
+x2ePcKXq09CIfj7XH99FYNECjzgY0tCxvT/1D48tAqdoodT8/TTkYOB+S5Jv
+CRwKqmxWN6Ghonz+fY77lkA0+135ClMa0ojyDw4JWgLXHwjkRx+kod8vZ6ZO
+Jy2Bluecf1rN6Pm4GQ0nVyyBOJXY8xwWNLRYFOfK9GsJ1Lx9O6p9iIZmqXEO
+tYtLAPaLfrC1pKHNtxWd5XwkwG5vGOZgRUNXEj2IM1okoBOYcBNa09CRXaTa
+AGcSiPA8elLKhob0xQWsdC+TQGpMSNgknRdj2pBFJgnkyVprZtnSkELPd+uC
+dyTw8Xbsmu5hevz1N/jMBklAdWNK5wOddVmC7LS2ScBqy8hIxY6GNNehUaA8
+GaRbrp65Qee6QCmJ5UNkMF2nzYDROWWjw6TDnwwObNmdnqQz10M+fPUBGTz9
+8atlic68QnV5l6vI4Fe88rVROme+Zsu26CUDpUuhFbV0Fjwx7+q3QQbRXWrZ
+F+ksBC3txuQoYK87ky83nf2q1VbeWlFAocd1k3h6fGKapuNDgRQQ29lkTKDn
+o6dPLPROp4Dc0UOXFekcfr73h+UHCnj6NXD9ED3/Mgof990xCkikOHaZ0esV
+73xXQJGLCgrkjq1J0uu5b+R4gZI2FQju7vDuote/kks//MF/VCBlULnpTe8P
+S1FziFscFWAF/MUd9P6RjvJevFdGBZXqv3SF6P395Wulr8iAg8vzbKoKdD08
+tGOjfFLEAcOghLcgXS9cAdGwzgEHE285jAfpevJ6F5bU8RgHl6oIOjQdGjq3
+J1wN/44Dzm27NQu6PoWiWDJvUHAwNpv6xE+DhlT7fR71WdGAYRfxlDJd78y+
+9moloTSQamnR8IXuD0/FrgxCPg2QQiiJ6nJ0PVR4xyOcBuZNdKP8xWjIbHkN
+4y1dBoTsibsudH/COfbg3L5lIP7q8mNTJhr6cE13uJRjBZAWzApn6H7XEpT/
+7um3ApyYe8yiSTja53NtkCN7BQRlDFScmcNRvHvVGPixAspINQ+2J3CUOPRk
+9qzGKqhfSQOneul8RNHI7cwqaFhr3C1On0eaxjzCk+mrwOIkyrndQp9n4vUa
+Q5urwP2ftulp+vyaSOxkLOtdA2+03Z530Pf2o/iL+/t2rgP/T0elauNxdDZr
+/BKyXgdVF7r+acXgSKpAKK/l4zpQDkrqGfTDEW3Q56xTxQZoSXrImqiPo7E9
+O51b5zdAj7iXcoUSjjRYyhcV1DZB9w3bCXNxHM01zCeklG8CcluEeOU6FV0/
+5GnL8HELqOxJWSPU0vfbI70j6kzboELx8eDKMyr69EB18KLNNnj+u7bAKpmK
+dGyt97oMbINP4ozON85R0TtR8eVvdxhgp69gkT8HFd0y4PUtrWCAHTmDSuFE
+CnKJb/ts0ssAay1vm13poiAddrLybRVGmCVf+Fkkh4IcHG6XWfYzwuux5zS8
+RSko3cta7g0vEzQTkZ4xXCKj3HYzY10zJlj/bF+EwlcyMhUabaivYIJKRhH+
+vwPISE+p0XtHJjMsTbKSYssloWuXiB1F3cyw6g53icxpErKhXDP+LMgC26q1
+pvTkSWipqNOuM4MF8pXadqfmLaEAy+ATt6pYYe2T7NLz34iItdj2ZtgWK4wS
+m3Ab3kVEgbeDSzLt2OB/Xq0ThscXUNg1QXvaIhv8hJfq5DbMob8lipKhh9hh
+S/R+A9q/WWQc+4S1OJ8dfhWRM+hZmkHJk6qLPa4c8ErgjYXWmWmk2NZXoVbP
+AWWJF3dc+DmFXP3nv8xLcsIM0Y/uBQWTyPDSYnUCiRPyqYpl6zCPI82hlLH4
+dm5omGqQ8c+gD3FgDjK+TjzwquPdOU/fP+jMTNwPgUEeyFH6Y1vyMP2+pOjo
+VjHtgB31wyuvJTDUTQllr3u8A2JDuTxJLcXIz8YTvbHcCWM7o+peRRYDwWiG
+6/WufDBZMlT6xIVfYEByAaPV8cHYexCvEekFKc6EjRlpfiirMnOoXncYuKyM
+1p5jEIAKjpOEafYZcCnla9D5KAEY62SPrsQTQepTsrk8oyAUz0+/l+VGBiX/
+0guMlXdBC9WtHs6KVdDh6CIT9GsXrH5sJFclsgVeB/acFrslBN/46N6cSWaE
+L0hzLtdthKEhW/wiTzgLPLEZFe0jLwJDI5ZX1rrYYVhV8Iq1gChUwc21lJu4
+oc7WmcYUKTFY/Pz4ixZ9Pmh74ErIRIEElK3tvPLBVxh2jbfcuLNXCn7yExge
+zxWH2dGs0b1EafjHdOvR8TkZ+Cy5Jxi/LQs7+CW2rp3bDXfKfW8Y/SkH7zz/
+eYbIoAS/9SS49ND/GTKCB7QuaMBIc868xqt74JaTWaw3SQfWt+xNaLdXgk07
+SY8lru+HVttf3OEtNUhw4VcKu28B/wctisaw
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3707#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwV13c4lt8bAHB7Zovs1yZ7l9Q59kwh3xQlI1pWKSqySyQaopBKRpGokJHz
+kJCkrOw9sl/eZWT8nt9fz/W5nnE99zn3fe5zpD0DHM8y0NHRnaOno/v/tbSh
+6U3Z+VuY+Ffhta5rmzDknbsSNcsFY9l8dKf0bSHMv+R++QyDA1boWuEvbZMO
++3o03+n62mLdoQXN2jNJsCDRJ9gtyhK7nJc7qaEcB/f7JxXrDJthZYunbBqU
+I2F3vGOnBtEEaxEZ1POcvw6HRwk9WYHG2Mizt/3E8KsQZLw9VH4QYjQLv28d
+ppdh8VTfAamoQ1jOxwq7168CoPCKhfTZP0bY+9NcLz+0XYSWccaT9nsNsfO5
+R/SWDH2gW9OGjRv/fkyTWFj3S84bcswodGSI7MPMSOKYi6cnfH559WFokD52
+Sr+eV1XVHVoKlmznVelho+oS4PGcG6wTLgnKEtDDtP4Jk3OIJ2ECi9/DLws6
+mNkxkdamF8ehs0+ZD6OgNrakGHw1qN0R3o9OMXQo0cJy+p88dRtzgKVA4WOS
+oxamjcRfVzE7QBfPxdbcPE3shcC/djLTERhRVqXCxaiBnSj96hdkYAONu1Vm
+vkapYxdPhwk/M7CGN+El3hMs6liK+au1cCsryKqDQq5IqWF7rW7vRD2xgPRM
+Gt867qhgDQbKDyPqTeFd4gV10w0l7FuKfmnpUQAZcxl/mHxSwiY6eQbfRRyC
+tgdS2S4EKmFaXUIExs8H4b/kQPmvS4pYg1yh+zkTI0gXS/3GQa+IBRbPsrqU
+7IddEiT3VxflsWD7I9Wvs/RgQdqTo68N5bGHqYUvXBX0YM60Gss4hzwWdPNi
+0dWPuvCnT+D7oWI5jMfykeRinw4k5wUmPGGUw75/eyR+3lEbUn5znx3qkcGu
+eH2UycrSgLmU+MnOMhnsOENIBDe/BhQTjx4PeSyD7VNxt3mcoA5ZKFPbpU4y
+mEJmP7f2HTVIb340z71PGvt0yd8h+q0KLLuVN/J7i4AV6nKrvw1XgtFKTOGB
+kwRsK42+01BWCWpLhjPe/EHAyFNxGlstitBg/rTLt2cEjHOs2rWFoAgHh45X
+Tx4kYAb36QMzJuShxZOAs4lKUtivSKv7TJWysCbMpqB6Vhy7NVZVKeFMgE5X
+U659/iGOLR1kGQR7CfCDlHn/rmJxjC89pVSMjgAzHnS0l10Rx3KVum2HXKXg
+0ciiqUEGcWzhmaisiKwkzGJStzXREMOO+QmKNs+JwbHJRFPCZxHMdG0n/Y/u
+Hnir+yWr6UlhbJpnaU9PGz8UjI3yF7IRxiSrqiyuF/FDeC2tl81QGGv2jlG7
+lcAPB0oilK1FhbHMEs62N5b8UGe1xURtUAi7zMj37VQjH7wYzJyne1YIY4t0
+5Njq5IU9tKw4gYTdWHBnwqj6EW54MoH5kBGfILZY3dbKt84GtwRX/7xlFsSw
+vpoPh9rZYLBsZojKhgB2I59X6/sbNti425XPc0IAc9PS21pxZYMnKn6lZpcL
+YEGvC9SDGlihqSQlUO+MAHazhHpROZcFsrLONpfX8mP8Ke+d7zxngjr0Xsdn
+XvJh6dH5ChVm9JB0IdxiZpoHM//ht3sjaB0c0s9n1d7Fha15l75hKSCBQp+E
+yaJGDmxbW53j3et5ILny7o3iFhvWfP103cfSSTD03PZq7lFWzND3sO+myxBI
+Ya0Ie77MjDXPlUS5i3cBf0hqOVLFhJm4yh8c6WkG/S4R553iGbGjjM/zYic/
+gY3MF+ztUQxYpMC89mpsHDr8p1Tc+To9NhqbFz4bVolKPfOi2W/TYUe5C/cc
+/9OIoh7tVe06tYMcfzj5MF//hfYnRH8fyt5CkWTnz+aCXeiMbxRQ49lExMju
+h0UjPehsSfoV0wsbyMWZR76rbgDV9TlVafWsoReCTUE0jxEkUZzzuvTsKqoY
+fCaWdnQMJe+uZM/voyL6tnP664wTyJ3jImH7PAWxBCbWMCRPoilTjc2H9GRE
+eBjY1sI+jUS83hgGh64gxgFf4eNZf9Ef5sKTT5iX0Zq9g3QV7yySTaCz7etb
+QB23zvQZZM+hwJqkh/2vZ5FJReNinewCSv3NXvXmwTQqzr7o2XhvEZWb8Hxu
+kpxAj2lmlDQBIprZcyppX8IIeqVmmyEBl5F0m28fKupFmrlhDD9Jy+hpFNoX
+3PkbVfE9TvP/tIJs/cTDpkXr0QeBgV1Hz5GQR6abfYkBQKxup+Vslcno6PDe
+wij5ejDsVl5Y2UdGQS8M9zs3dQBJv++GVpEUhBkv2p4ld4Dmc7qbLDEUxMOy
+anZHqhNYV78jN8RRUBk/UZU+tBOcOJ8XfiiRgrzuiL5rU+4CbycGWhSfUJB1
+QOz1kZRuoJ4hmd9eSEHCyZZKzn69IKs6KTT4DwXtn2JnbsjoBbfPaB8Q6qOg
+vTdPsVu29IKLj5nJ5QMUxD8u0nNXsQ+kspL2UUcpyHGXfinTRB8QD/s74D1P
+QcGhC2xjpwaAow12ipuOitaWorSbvIbB+qSqTqgSFWWl+rVlPBgGYMfJ6/te
+KuIUU7WMRcNgc7HCQ0SNinaVB4g+EBsBy9ueqEyLinpTE9wyu0bAHxffzyOG
+VJRqd1rGPHcUZFi7edDsqIhlNfmYkuw4YL21cEUskIrcSt9neR0YB7y7r5kb
+X6aiu95GYm+dxsHTosP3zgZTEe8bllGX2HFwnsvQ700oFRU8TWs5ND0Ovuwe
+kJaMoqL69yFK+kUT4E/RTf/PD6gIDK1FKxhPAZUs1cG0Uvx/V6KjWU5NAea8
+ypnij1TUnx8URA2dAjxWcs+/llGRmWb3GbrSKaB6/9HSVCUV3SRPe7ZKT4OI
+Va0Urnoq0rXu1Ldj+QtUsZCdiXYqytjqtpKV/QtKvKfYOzupqFH2nxcHxF12
+zgt14/E+padjv/EXWOCjm4znvUH136HvS39BfjX1Jc8YFZ2WH+a6ODADhqws
+uWOJVCSf8Dzfdn0GSF07xW++QkUzkotRB4VnAXNZ5BYDGY//bLSNs9MsyO2v
+vnSVRkUOknpXjrfOAhrLyJTOFhVVvpDr+lw3B8yRBuLloKFw4Y/eFaNzYFE3
+pS6Tk4aME5WSm3fmgDHi1ZbnoqGSPwZcsofmAWNippEKLw35C2ToV1fPg1zm
+e1ycQjS0M/6IPalqAez2u8rCL01D/93j7VXuXwC5idLdJ2VoqObXRZb+9QXg
+80ipMFuWhp7TaU0E718EYesbVhIKNESZP22dVrkIyK1ZVn/30tCh93vq2/sW
+gRZjwREeVRriohLdCRuLQKpXTEBHjYYY+3oCNwyXAMGVscBPA/+ed0HV6y9L
+oNqndOWdDg0lvtVRjxleAlPtKQ0fdGno5SWbtGs7S0DzQhvDRz0aOuPaXpZp
+TAQGpKUnuQY01JG0SZhtJAK9lNQlhwM09FDI3ujyDBGU2hIXNY1oqF7u92M2
+5mXQJrlAx3mQht4PyVxrVlgGQKhDp+QQDd0/fi/r54VloJ/XGfvFmIau2Vmw
+zt9cBl0iqX1XTGhokqOsTSBpGQjEz4zLmdLQ0yH+j3feL4Pced+xa2Y0FJt3
+fakDWwY1Vk5fhM1piEEtrkG5Yxl8y7MX+4g7bbb81gZlGYwfj1Hus6Ch4i6j
+6GCWFeBT64e8LGmoO1TRfUN4BYiGfn81g9v6p86U8oEVsMLzSWzMioacbPOK
+O+1WgIhHb+oxaxryLZd6ePf0CsjlSFeox11yXmpWJHoFXFW45ZRoQ0NN0ivh
+lEcr4OVJ3s5p3PUWHgEDuSuAFiaoaWRLQ8fcfdraKlbAdNmIayJu0Ctc1PZ9
+BXi+zLbswj1zvFhkYAB/v/3EpJAdDbXyxypRFlfAuaPzMk64dwi750ToSIAs
+wUaJx13etRNgx08CfsWGVp9xb/IxtybKkUD22QmeMdze+Wy8vfokIM277wDj
+YTz+fD57LWsS2D5pWiWJe77BJj3NlQS8rSfDdHAfL2Kg5/QnAaWCn5eNced4
+FT1LjCQBvoi4RCvcxvkjISKPSMA+0rv8//5rfaLwUy4J9F9NHf//87t5l9nE
+K0ggym9IQQ/318AA6eRmEvDxVN0ng3tJw4eJu58E3IrOs7HjnrWIrEufJ4EW
+GZe7s/j/MqveOaexRQJJ71KLvuJWFfNk7+AmA7muZ15puHXchT5FEsiA07Yq
+2xu3RmZT6AFtMmiOIDiq4LYV/ezLYEYGzrKdF+fx8dzDb/2g25kMPn0oGXqN
+23l9g7nMlwyWtwLSj+Nu+u3358V1MnB8l32PETf9FQ+Bp4lkYPAt920BPn8M
+k2U/s7LIIF4RjVvgdljN2W6tI4P+XHsPf3z+5e1epq12kgG7w6U7q3i+yN1s
+IqlPk8Eb1/nb13FbszfpNXBQgEhaxC9fPL9m/uM3lpGggNbXw7ROPB+lOS46
+J2lQwK8PWp/24e7ILBhLOEYBkfGOhfN4fh9M3nNLwpcClhc26vbjdmgouvTl
+OgU0e9gqReL1wD7wN0E+mwIMPRIzqHj99BS5DqfPUQDjAUvhKLy+KP45Eulb
+FPDzhVF+Ml5/J5c0rXJ5qSAmkWclFa/POPnk4ll9KmBtuO911xBfn0wdqOKx
+VOBn+TWFXZ+Gtva/q09KowI1k6kvnfh6ALjdJLkKqSB0+it9Kr5e/NA90W3Q
+QQUhdRMhm5o0NOFBlwmkaaBUK7/CTYWGVqXXdBX1aOCHONAfUqYhU+puDklr
+GsiuLBY5pkRDhU8Evu4PooEhwvlSOXk8P7/UkFTqaWBHYCrOXpKGXNjC6Xh9
+V4FQ3PfZYm4aYsuNlqsKXwXVE1Qf1114flPaV0MerwJn6kzFBjsNlTUza2rU
+rwLmWmYLPma8/kN4HiZLrgG/n1y8zzao6EtiRl+/3ho4yOKr0reK75NWGUYN
+D6+BsCj3ZXYqFRENjlbsD1sDn5LY+gDeLxLPeMXqD6yB4Ij6srVxKtqkbH9S
+IeP3Y+g/YCNUVPTA/Ls+5zoYGpTlvj5IRcPN9PrJB9bBSfN1/Sq8P/nFhp89
+nLUO+KyFPK43UVHkS8NkmbMboOo8e1tdPhWNSRhVx9/aAETKXdYbOVQUsOh1
+ijV9A+ib/c6Sysb750pyhf2PDRBjXcqm/YSKPnLyfePQ+QfAq4RGvxgq+rXr
+77QH6ybgER3+wXWSikworqFnZTZBv9L2XOQxKkoK34yLPbgJmmOrC4fsqUhk
+5u7s7uBNIDFkwOxkSkUbnudrEsc3wWvzzHh5FTx+T+ogpWELCBaV0e2lURDt
+hRFhZGQLfGLw67pPpKDcLaXgyY0tkIZ6xAdnKMhCdFjUWGsblNw6sK6O73/M
+a0vFrbK3Qan3T6XiWgryn3mfVhO5A7Tl7Y634/uzCNl0gaCsHdAozbI/I5SC
+ZDXDhcyqdkDRdEWbVSAFEQfDXltQdoDu3+Law+4UFNYgcHxclw6KTfuwUg9Q
+UFVn6zP/d3QwSu95qi+RjKqnTHa11tDBx249DcZTZPTt9/V2w1Y6WG47V7ze
+T0YFrIMzdvN0kDs7n56+kYz4VnzdLffSQ5mNeB+PZ2S0tb18u6KQHt4xNUmg
+NyKjlgudDe+/MMAgn4+VIu4kpLwqYqz2iwGekLY9xXiUhIIb0DtslAE6CmLe
+1ZCEvB29ZfcyMcL7n96sP5ImIUWHWh0uO0b42st9d9foCuJV7fptOsoIwx7Y
+kReOraCbS8UP9pMZIQtnzyFfkxVU9Lu7zoqFCWoPuJBzNFbQ1RPDFz6pMsFa
+j9sED/YV1CTjv9B0gwnGn+kMaK9cRoJHxPaIiTNDVn0h1Y9cyyi+a1ywSZMZ
+im7dZW5aJCIf3se9KebMsLY/duEeIqLDzRlLtwKY4dlmLU3gQUTc1BaVtgZm
+qPb2XcZG5hK6xjRbHHOVBX6ts2a5T17A+yN73NwKK/R/Nmh9jG0WDUeuU2W5
+2GB/yxuOmeoZFHzqgW6yEht8CCHN3n8GWTKJlGy5s8Hnt7kVIn/9RXE1OV6H
+8XPfpOWlkJ/R02gjl7nDpZYdhj4mn76TP4H+IwoHMA6xQ7YcZqcL5hNInauj
+av4fO3y2z622fGwc2Tm8Hg415IB/wuTvXNw9jv7FyA8+r+KAx5zBqvO5UfSq
+wRzSmjih0tEW4Rn8KJGfsoeeOMcJWzdPczuc60XVuov1ety7YI3zZwVH7x7k
+dmVY9YPzLgjFd1lW2Xcjd3P+0wkzu+BRrie/red+I24HbI4oyQ1H/2wRje/V
+IMeXd75K+vHCSBh2WcarHey7+oDOM4YXlpRrjhrydQKaUbXI6FNeSLjy2+NW
+Uxe4shyj+6CJF8Zr1HCeONwLSuvNaNPyfBCLGqqMaBgBciKyvDeJfNAsxHpI
+2G4G3L3h+HSbnR8+3qcu3nF5FmgHjCp0yPHDAvEFrtrsOaBwrHInwBW31U2W
+kV2LgLG72/lzKz9sDiTIN4uvgO3yD0H76wSgxdXcf7Usq0BpXK0qZ0wATj4l
+1Wr0roJQUuOHCAZBGF8pLplevAZiU36WpZkLQp+e0UTqhQ0QzFkS8axdEDbq
+6Fe0K2wDhyctT4YYhSA1V9m/5RIjrP3ovTqtKgRj2aOUpdjxvCTS52T8JwSN
+bfr9at8wwW/+hvGiRUKw3MHsRNwaM9xXgyYYzwhDUd49+/4/7/rzPAd2lvdA
+EieQ8nzJA1lGH7NS1ESgWww29cCNF6YJz1pZXhKBXoUfG58u8sLx27nFcFEE
+ugg7R+oS+OHWiWdpWgxicJFnKsTmtyAMenRYp9lWDPZE5cVtJ+2Gx8yNMk3T
+xOD55iexaU5CMOJa2TDUFYeUr+HPT68Jw4mqvgy+uxJw8bCDyY8KMdgYoOsT
+MykBX73jH9j5Kg6Nvaa9y0wkodhORy7/kAR0udpYQWSVgpbScXSfxQmQwTiy
+HJwiQFqztdmHQRmoElIs6JROgN1tgSdgriz8UHahMb6bAO1Pu0XrXZeDtf/J
+K/79TxraW5M/q1sqQMayqhiWGzKw3kZHaylzL0zZUvb/1CIDg3/4eXSPqUBV
++iNFzFKy0LqFphN1UA2Ol9+3r+2UhSx8/yZ8pDXhtxhQ2K4rB4WmhTl51jWh
+eoYU08QzOVhvN8PdN6YFL/1Sd+4NkYc2q5RRRaIOfO497P6bKA9vhToEfdij
+B21lyCYUfwV4R47eNfmUPtzDlT87EKcIjf50D/dY7YdF4oeDunT2wm3XfAOF
+VxDKSf4Ie8SgAm3+PfJWIxvD61UMA0kTKrCPUFkTGGQKS9Xqv1jOqMHzMU90
+bCQsodFp6allAQ24fDE7wdTHGv5q9HYR0tKEjg9fuFfstoP79hxSrKjXgkXH
+3s97P3CAl45IKrh+1oaX5MOUPIlOsFWSb2L4jw40q63oa5j+D0ZqNIuu7tWD
+JjemWNLLT0JvP12LnCZ9yM3KhWoa3KEfX8Ht7pZ9MNzPj2h2xgtyGzrZyPoe
+gFrtpstjoefgfxujhMiNQ/BGlUJOlXEgpG+ckkYKJjDmRuIt0fMh8H+wBV26
+
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3707#2"]& ]}, {}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{None, None},
+ AxesOrigin->{0, 0},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{-9.122028587832348, 5.702485161797756}, {-1.3938681721411004`,
+ 4.730885255577823}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.05],
+ Scaled[0.05]}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.875952731520175*^9, 3.87595277495057*^9}, {
+ 3.875953449526909*^9, 3.87595348700035*^9}, {3.875953781918692*^9,
+ 3.875953801983779*^9}, {3.875956874508904*^9, 3.875956879608242*^9},
+ 3.8846881416990147`*^9, {3.884688237460053*^9, 3.88468824813827*^9},
+ 3.8846882789055843`*^9, 3.884691471009809*^9},
+ CellLabel->"Out[4]=",ExpressionUUID->"73571a62-acb0-4c68-a41d-2dd04cfa4c6f"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"p2", "=",
+ RowBox[{"ParametricPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"Last", "@",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"Last", "@",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}]}], "}"}]}], "\[IndentingNewLine]", "}"}]}],
+ ",",
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",", "0", ",", "0.999"}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}]}], "\[IndentingNewLine]",
+ "]"}]}]], "Input",
+ CellChangeTimes->{{3.87595272795855*^9, 3.8759527743037024`*^9}, {
+ 3.875953429388359*^9, 3.875953486484068*^9}, {3.875953717122241*^9,
+ 3.875953824002554*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"3f8b6e53-ff20-489f-b395-47d925d34ae6"],
+
+Cell[BoxData[
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwV0Hk8FOgfwPExRY6MhhyVlFhGIhlXbJ6n6WAtEVFWGNHB0OmVWgZJKis3
+uaJTiaaLaKPnm0Q6NNK60jDuo8YRQ4P2t78/Pq/3/x/tfUdc91MpFErof/1f
+xabECXXdGMid8dZzazwLrk0Jdst9vOEKt9TY6soe6Bx6Z8hz2AVTw2Eo7Koz
+bK0bDY7a4wI3atf7TXraw4r2yMlMeUdwjfPKHGduhd2qcjTdPnv4lCsuE53c
+DE5fysuyM7dDoqeRyO2nLYyn2EWosLdAfqGeT8yNjdCGlc1VTFkwOSrvT55Y
+gkaYoW48czOw8csplqYF9G/W8pq3QPCXJXVEM50JcfVCulOtNUzfVBrn65iA
+b3hpqvnXjXASuypw5owh+W3023HdjUBf75Pz5oMR+PHXMI1fWYLrEFVb9MIQ
+Vvs2OLFSzMFRdJSXG8sAz/KGvpooUwi9MLo5abUuWJsnmBaZmsIdkbOsV6kO
+1DRPlCkObYBbSQVNx5x0oMJYM3WP7wbwT4xdNnppDXw7fHpwU7AJrAuwcjND
+2nAk5NhyyTsjuLhHOL+GrQUPa6WKFyQZgMWDa55PGzRAJcTnWtYuA1DN+1CV
+d1YDiui/eRWuMIDpdb5hidYacG9DldHoPQbc5XR1beGpQ1rGkNlToT7EmdXn
+vr2rBsURSXKBEXoQ4a79fO3wUuhju+lw7HRBur+wAZjKwGkN7DzO0gbX2sdf
+PG0VoXbrsidqgytAfLv/+KdGafDfGRg0QtWA9aToiEapFDTxmU8Ea1Qht2WX
+RHRznpiOe0kZGajAwjPGtbldP8hgRrFLZiQdtjmFMnzaxOSHrevSLKMlcCxm
+bHVJ6iRZoRZDXetEA57IyoAjnCDZ0VPRAwGLIag1MO7TvnHSLzN7+lWLPGis
+FJ4MthkjgeGHa5y5clDuuJm55ZKIuKjWlGUYyoLf0dCvUfVfSdiuDFOO4iLI
+eqQ3IM0eIS+qzRv6x6TB77dikz2Kw4R5nNYzIVoI19MD3ejfBsmrfu1JY9pC
+yF4bdHWGMkgyDxkl1zEWgFncteS3WgOEF5IWNu9NBVvrgku+/v1E32HiXkqC
+FNyf/GOlLK+PnB/ZGHq3jgIhngZBSbQ+UtV7KoejRoGSu7S82vO9JIzD4slW
+/CTDfMqGMGov4Yk+MSoC5olg0+8fVZN7yKxqVuk5rTlSuTHlRp1+DymYXptL
+q5aQlVzmC6jqJi+5tOe7o3+QBPy3rQa7m6zy6b1Z+ssM4R0SmXf+FJL4mfnp
+ikYxCTP1b/W4LiTlp0fo7mlTRFImWH7ASUgMHLWoXRaT5HRrmnfIeBfh5n9O
+/fx1gjzLrZsJzukiWmW/zy+/MU6ENPvvb1hd5GO1zXFFszGi/q7pxGLSSdpJ
+1I7pm9/I8Jt0yUOJgJR1+ObcPz9M2NPcqmBVAZmXaa1QDx8gqWJpFYbhF5Ln
+2Uw/6dZLRlvzbRYZdZCey8s4TcVdxOGwbaSsuJ0cLJQNl59uI5vs1U/dudNG
+eIVWHenGjST12PvnrymtpLZQ8LB1popkJsxnKMo3E2+vHIGJsBBJFPrGbtc1
+kSLOSGf2Wj5SuPzAZdd1PqELCiY25XSiik1DbKZzPXlos9hqS80Q0kh7m3RW
+rZJ8OGhnoU+ZQs46mF8iLEJJjjLfn+tPIQsLh7xD8cVInsPF5c5TqLvvQjTd
+6h7a9/REIv/qFBqNLUzdvvMBMmzfn9FmJ0YbmkssYj4/RqxpCSgWT6Puvf/E
+FoQ/Q71/fZQqaZEgObnHT2+V1qKMi0ds2pRmUYpzSBbbow75Z/WEEvtZpNyo
+NJQhqUMr81XzXlfOIpOJGeZDh3ok7tjv78qbQ80tj5IyFN6hyG2+DpTKn8g7
+iMEWLGlEzs7nSra3S2Ha7Vfb2++3ovR99toPFKl49cBFkcfONpTbwLI2Y1Fx
+Al/IEojbkK2qsKqCR8WnZtM8nu34jMwZ1QG0ywuwb2Xhv/KWAsTZfnRv7CNp
+3FRzqE43uRtJFzrEnPgpjT9ULZ8Q0npQyLmjRZcdZfAfbF+fjpQedOJPFSfx
+qAy2co0OjrzVi5L7DEebPWTxxPuP910UBpCJIKX7YoMCPqiTfZzJ+IZkwXnV
+QdfF2Gf3E4tFaiLkN3T2jXLHYtwyFRVAlEYR7zvT7BGVhtu2tWueyhhDKlxK
+ZIXHEhzBWHSGpfwdfdb8BuLyJdjVb1/4lTffUYrb4NyQFh0rvagON0yaRO4z
+wicHKMq4yG4uIpolRkVf0vOtDZbiHS6lyf4XJIjv4r7q8Iel+EAKgl9bZ9H9
+kGb2slhVLPxqv+O9/TzaOx/B3b9GHRvxE6MSd1Kww68nj/Xmr8BL/cxttHX+
++9Lz+kyc3ko8F6+iY/OPDM7mSnNbRFr4VrZpwVizLFbSrq8SvtfGs3I39CsR
+Ddc1x7s3H9DBhkus/S0X0XH4Frm86lO/YN+BHePrE1VwxWu9+AYnBnZn6VtO
+a6pju39feuLYdThIFHB78LIm/h+D2LN3
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3825#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwVxXk81OkfAPAxjsG2mYlyD3IkFjlWSL4PU1RabLJF2XJHjiaKIhpCtCps
+pCTlLBJpqEk9H/exiAhTznEksSYUEe3v98f79VZxDzrgRSaRSMz/+f9ldY0P
+2L6RsK9604Kj3kUIfXRM88udw5AkOpPB5ztCgf+x08fJv0NO3glr/at7gdu7
+7ZGRjy1cJ3lWxuUyoPCKd8hRlg1MiVmsHrRGYBqYVGI4uAtsS763HZE3h7eX
+D3TpzVqB6JH0O7enTIC4/dCiYieCP/wz+hh/G0HJOHeHEssCQhOCtYOEDUH6
+s7WKV485XFc5Nuj0XB9sYi3H7LTMwIoTeDbKRQ+yTi+mhDGNITj+bPfO1q1g
+I1W6ls/5FRy8/9QfAU2oli5l3pH8FZR2qQXtbt8CiSIBKS+nDUFhJaV+nYYG
+OHmzvQWlDGDjSo7S2QRViGJztH8W1AMXoccMW5IyWL7Vnqxl6cJ+77ZzoQeU
+IBz5U51FdGEpRLlptJgOFEMcGqykA02ttOS3YYogIKRX/yZeG+qoGj/l/SkP
+CbN+uoxlTchfl9feKiED3Ypzx+6fVIfwI+6NsTcloTA9zSHXTB22c3ldh45K
+Qs6EjghPXB2iTfknOlUkoc371OOBEjUY1cM+wWUbYD7/VGKaoBqM3TweVj5C
+g4WO9V4DvZuhTWSbLj5PBXZk/lDHqjKkLUIZ3F0HVRH7Cl98VIBu5Z7Lr6ZE
+IPLtPQrDRRpExlKUMUUAXBKFLcxpUpC8YBecemMFGwp4HJq8R4NMeVqTnMwi
+nvO7YD05IQGOiYq9lvoL2MK4gGKw7mcIt2HmNo1+xkXeiWPFDeLwUCSve48e
+H9M/P3qwZVUUVsUjb3kOzeCBLNszeQ4U8Cqnli6Vf8LXKZURWXxhUJV40iC3
+fgoHorkWe44QTCe4n+lkT+J3h6N8HS8LgkPXtZKqiA94OTNbrJNFBgdGqIF/
+7AT+radMwemcAITVj19buzuOy9zzo8XiSKBn7/tobGAMs1K1ful2/YHfzMTH
+U4gxbJoY3TxwdxWPzOJvC3mj+LgPi9CR+I5dg93bPdVHsVfpzWCG3zL2bHJa
+1czn4WquI0e/dwkXb3JvCTLgYcWSnNwyr0XcVrJX0bl1BF/b+FysgPsFi9tB
+ULvbCD4mflJ5zXcBv9p7tOkgaQSPM/S+pwjM45avsz2r2cNY1uOBWUjYZ6xg
+Hl8objKMe4SLXNKE+bhfvyV2Y/4QVk0k2XK50ziVK6oAMIhPVSWlvMv9iNPL
+m/tVOgfwjQ4xzoPkCczbxrw5M9yPK6wknjXSRzHzU8F4bv17PCnjmmSSOIR3
+tL3ZL5TzDqu0+3BxcR++71N4z+0EF2ewsElIVwe27TueVTfVi20DFCIm5Gqw
+b22NpoZzD3bLPGpXup3ANX+Zq9B9u7HDoFYRS72G8PswsCh78A1mZpuZOjW+
+IVjJz7aM81/jpX9ZBo0eg4QPu2hFdrYZEwNL0RqW44SE5kBGrmUt/sFLFUvi
+TBPSAc4y9fNP8Ye9zkVP8+aIrbX3hzTr3YjDohdIVJ9FYuZFqUYthUPMun/p
+X6hbJWJZj9Y1Wb0mWvy66h6/JCOacfaV55HviZJusdipzxR06fzkw3zXCeLA
+vfhaegAVVRWcT842nydMziST3GOoqPSf8jvN3vPEV/MXssMZVFSWQE4JTp4n
+gvkxRsmNVJT9l+eeg5PzRFnNrq8T6jT0Q8nqVGrmAqEmq0oNn6UhYvvhjiyV
+r8RaxROmabUkSl3hd3ZXfiM0eTqcnBFJ9O8lz8DypW9E2FzDkyiyFIoOk3a4
+YbZMXLrexk7fLYVm9CdjL1QvEyE/lUbd6pRCQu1NkwX9K8TvaS1pA4Kb0PH5
+vlM37NcI408SO37wZVDO4/CeNTMyEhn+m7KgI4u+3SEPWkaQUbr0xz02/rLI
+dXOcsRYmI15cXgmakUWZHhsi9fcJolXnW+n6ZHlUZUhm7w4VQqMc7m1agiLa
+FLly5SyDghqCjLxjxhRR2+CGebmHFGTpMeHJtqIjM+d+Nz0pUXT4TEPlLEUJ
+SapLkAPnRRHZ8mIF4aqMLguVC6SOiSNBNidG5PxmVJphfe9IrwS6vro18GnL
+ZqTJpIcP2VLRLwL2xcJKqkjHrurku1Iq4lVctXvVpYpOP1BJaE2kIf/Xuk59
+oeqom3rUbn2SJCpW+I3ZbaiFUg0tUOxVWaRG/ycilayN2NU2SDhTDp3jkN8n
+jWojwbg8fKFWHpXp1Ly0mdRBPGmjwpDTdGQiY7GlskYfRfV1XPOkqiJ/e7rG
+kWcGyNE1b7+QrxpqpdNGB3sM0TSTd4hE0kCeAUbWOY3GaGfmlNfiLi0UQCuM
+e9tigprv778iyNBB680c96n67EC6JRtctDO3oT+Wh5UvLlugW2EFRa7uhkig
+YVwFa1ghfm1xTOj97eg/eLmEcg==
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3825#2"]& ]}, {}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{None, None},
+ AxesOrigin->{0, 0},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{-8.985689911395795,
+ 5.4752540344034974`}, {-2.2687538849550464`, 0.8696374890668941}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.05],
+ Scaled[0.05]}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.875952731520175*^9, 3.87595277495057*^9}, {
+ 3.875953449526909*^9, 3.87595348700035*^9}, {3.875953781918692*^9,
+ 3.8759538242573233`*^9}, 3.875956884814212*^9, 3.884691471720155*^9},
+ CellLabel->"Out[5]=",ExpressionUUID->"2e60aa58-03df-4f64-a5b4-aac6f5b3dcd4"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"p2", "=",
+ RowBox[{"ParametricPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"-",
+ RowBox[{"Last", "@",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"2", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}]}]}], "}"}], ",", "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"-",
+ RowBox[{"Last", "@",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DScriptF0D\[Eta]List", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[",
+ RowBox[{"2", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}]}]}], "}"}]}], "\[IndentingNewLine]",
+ "}"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",", "0", ",", "0.999"}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}]}], "\[IndentingNewLine]",
+ "]"}]}]], "Input",
+ CellChangeTimes->{{3.875953835258749*^9, 3.8759538464750853`*^9}},
+ CellLabel->"In[6]:=",ExpressionUUID->"f1b88156-90fa-4eff-991c-fedc7873189b"],
+
+Cell[BoxData[
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwV1nc8Vf8fB3AjipCZvUo2lUgo9xrhV0RGlMyMpIQUZSSphKzISCpKMu+9
+mYX3ITPrmtmjjGzusvmd71/n8Xycx7nnfD73/X6/PpLOd81dGejo6G7T09H9
+d2XvjiHxS4UhFF+3qQDmSTDvjjYUsrdDHHHHmnpnx2BstlWh8IIl4jjL5ti/
+fxT0G5dvP7YxQ9bt5XmnFodBeDCE8obVGGmdsxv+fWwYrPlYOKSmjJBPhv/i
+cyOHwGSkrCT1jQGiwvDMeezgEBSRdG1U2/UR7JMpndwPg7AabxjE46iH2DDf
+nPulNwgDWG41HhVdZNCvzWB0dQAE/BWkIk/pIK28ZiaJOQMwrSNmu3Mag6iG
+MVZUyQ0A0eG1CvPsOWRJ8mUUG6kfWq5lOhogZ5GQP1jJwOp+eN48wWXSoIn4
+sjzARjv1g0NgcYLaggZSp09Hs1Hvh7iW0JZVKQ0kp/M+fcyhfnAiHjmlXK+O
+BIzFXDvR8BskHNpNdOPVEMs2RE3R8DcQKubZrYTUkFqr4cfl8r9BoUYiJjBX
+FYk5fuOY06HfYF/p+cZz5BTCLf2u4dtQH1wta5+qe6yCbNdENj0P6QNNtWiV
+ryoqSGmudSarRx/U9ZFK2GdPInHsr61OWvZBubJIgo3DSXQFgTK6in2w6PXw
+37nbJxCi7r6hpD+9cPeOj9BmqxJSXOmSPeTcCyLtuzeDHyohfibvKm5Y9kLF
+YaahBFklJFq/Rl/NoBcyvNMZya8UEUdmzuNf5Xuh0eRFwT1fBUQR56IYTesB
+fAN9HmOsHLJ0j6zuntIDPHfsP6ZYyiEhabNjEdE98JXrf7bZwnLIlcfPxIdC
+e6DgZJXScoEs0r9zm/3grR54nTSrWjEhg2h+KDb01u6BvKBYFo8gaYT1fokX
+ZqkbphwtjnoaSiFdI/XK2Te64V57hIiynBRy+klS5E/bbriBtcn3PiiFiHRm
+ilEtuuG9l9e0W+dRxNFUS+a1fjfMkRPpwPkoYnZ8dV+RdDfMGInF4VKOICLq
+yvbcS13g2e8x5qsriYT/WUu59aILSvEMmUknJJHW+BGR1iddsJbyIW9BTBIZ
+Ny9lVQ/qArGq5K+ntiUQ5S/uUbI+XXB6wtf4YIUEEjlvKfnAtgtad3pHjmpJ
+IJZ+teIZJ7tgy9qvgrNcDFlYD9u+8rcTpCrlQm5kiCF+TWrLOaOd0FS9XUEK
+F0O82ZTq6AY7wZGva6HWXAyR6lioqyF2QsS29heuVVHktn0W04vqTnC3DjYi
+qIsiXRwFZRxvO6FBX7D08D9hhNXnxdMs607owOzt/9MjjPjOrGp9tuiErnpz
+964aYSRdGanKNe2ENPMsP4l0YWRh2WUVMUTf97Dc0NVcGJH6Tl4QONMJe121
+C6fqhRDNzPIrXoKdID6oMmtcI4hon5iQvTtKhBuXPW7NMwggrS6yedLeRLhl
+f5ZFi8qPNKV0ZMXdJoKAl4bGhxl+ZFOmZHL7JhGiEmU9clv5kZxxWZlhJyKM
+yx7aKUvmR/xCb7KWWBBBj0LljjzJjwTpcrq0qBPBylY8sdr3MOLtH5ruRk+E
+buKp0tEjfEg14zBnm0oHzOwZm4wI8iG3a78yTCt2gHJpudE0Jx/ibaV6mF6m
+A/Lfswjz7/EiUunjseeEO+BGuPDe6hAvQrzWatLB2AHPKyN3ApN5EVZoFTLv
+bYdI9YanLny8yG6/wLXyh+2gsmpLryTHg7Qe98jDNrZBpTxtPV+SB2FmyZO8
+VNMGok63vqkK8SAiVjtcdj/aYLHFV8P2IA8iy7Jp8bioDVjCPdkZl7iRCG05
+pt7kNiCGydgSirmRcdtav9qbbSDldpWsYciNHNBhbI8/2Ab/kvLM3oRwIQfs
+bGYeWrbCrjPL08YALmR9fdlz/lIr5N1Qy97x5UJGbVSa7f7XCj1Oth8D3LmQ
+a9kG+89rt4Jr1UxGjhkXIvb5oauobCu0XHd9MXeUCwkK0bGibLWAj7GvS2Mb
+JxLwvFvs5KcW2NA2501R4kRumliczqT9AuHDYQzyJhyIy5EYkdDyZkgNpYbO
+uLAhhcMXWfjdmmCaeeth/W9WRMXf70fY8UbwCPSqMw1mQdis9h4K7WsAM766
+kiSFA4hU+7Gnr+vrwN8yScWTfT8i/cFd2CjrJ9TUqrVPrzAhfTjQCvWphVO+
+HH9JS/sQScV5qVbTGqiflqQoc+xD7vq0S1w1RuDNTaW4RllGxPJqhg42tBoK
+77z237FjQHx97lqPZ1eCzAVSQXw0PXLlZC+3V8N3eDGv4ZfbSIfoVmr+4uau
+gKrJgDTPw3TIcbrYxrD0MvD31C08UL4LVh11piNKpVC41CNb7rIDPaed+Le3
+i2GLL6X4mdg2LLk+vqxP+wa83Z4rLILb0O6i90aC9A18JcOfx/Bsw7amzqu9
+xW9QoJ4CKQe2QQrfllA/9Q2WORat8aQtmHa7zODb+w3SB9NLSQ1bYDNhl2Vc
+8g1CtPWGCXe3IKzQ2JnV/xu8X5N/y1G7CWeRgHcEhm+weGdWjaFqEz4QOwQC
+9ghwnsuQiVa2CbvvO9Yw2wQ4J+KCHS3YhAv5xhN9VAIIFdaL4lM3YTG2yVVy
+lgDuvZePOPpsQoprrJkckQDLdOrV4xKbwPVFIYzpAwGOWderDQpvwsusykL+
+dwS4Yynf1314ExYw5bqKaQQoa6aPa2TbBJsu24/XEwmA580bwa1vAFlC9+xg
+BAHmYqViI4kb0CDpuWfkS4CfwRzV1qEb4Mp504NqQIAwJqL03KMNSGL97SWi
+T4CD3zvxQfc3wPfJrwsGOgSoXa5UzLy1AQbMhc8ztQigW2DwdclyA/4ddeUK
+PkEAB7t+q1dyG1Aa3fryuxABzQdNvdGudfDWUS6xXsUDF+nKIb+2dXhjvlE5
+sISH/kPUJZamdbiBu5Zhv4CHspWRabWqdfj+W3XJewYPhJXg/Jgv65ATElVX
+NoIHvEiHjF7QOjDr6Nu1/8KDuP3kp+Jj62AssYmIf8FDXkSznqvEOpx6SOXd
+/xkPgYbnZ/iE18F+xUJ+NRMPCvFYTX/OdfD7ei+1LQMPdmeZ9mlurUGWbmPk
+lzd48An/XAfENWhoCK0fe44H9Tt3ZpoC16BGX3zVyQMP05CAefhgDUYdrkR+
+dMdDZLp2jJzPGlzl8Z7+64oH/6Ou7JFua1B0zmfG2xkPVf0Rzy9cXgPLj/ns
++bZ4SDUcoGuWXgNMWRYp+xL6/PrOWnknDeoE7loWncbD8GXNP7WtNEhZfhvo
+oIaHbI7fZa2NNChajWXlVsXD8s8fR8eraOj+jDqEnMTD+BUqmSmXBg/6ov/d
+U8TD6AdOKZMwGtxOfXa/6wgeDn93SrEKpsHM7p7QV0k8sD1WJdkF0ODwdpBs
+mAQeTktPWXp50aAzOzJQSwz9vX7B1lfXaMD3Vo+hRRAPmbttyo0qNGgpcUy0
+48KDmk1re5sSDX7NY35c48TDw4Lrl3pkaVCpZ3Th2iE8RBOL58bF0O+/MvTB
+kR3d/4vNr9ZZafBpWf1EJAsemHnuyUn+pUKlwVq/GQP6fSxJScdGqVA8z/vU
+jx4P0HV+SG6ACj/i7ial0eEhRpm4erKDCqVBo6TFXRwk6M5isT+oYIHg4/Bb
+OCh7OM9l9ZoKO5U+NvlUHEylFlDnXlHh9I9+wxkKDt6Z7fscGkGF27Stg8dQ
+Xwp86JIXTIWjmfe5v5JwgOwgNrvuVLgkLCPQvYyDU+tuUQnOVODodyqQQu21
+gH8mbUcF3IwF/8MlHKxePNthYk6FWJVrHvKLOMhO1clJPUuFMOFOpqI5HDhy
+HWdVVKfCg7gcLD9qo46m49UnqaCwX9ksbBYHrmT6uglpKvQLn1t0/IeDRfkI
+BmkuKnzyx4hjp3GQr9R3r/QgFcr3ru1VT+Gg+Uj7JwNmKgwY8BdjUZshZXpu
+WxSg2d16azyJA+vGi+6ZUxRo79dxev4HB9UP6hpPjFPg/R/5aWHUhOTBv9WD
+FLiylIUpnsCBTXOv8WAHBSKqz3ovjuNA/kdJivsvCvwEa8MY1NrjshmUOgo4
+nN0gnfzPWZXd7N8p0PW5vvHJGA5u1/QxpBVToP7B/IoS6hZu/9ljRRTgiX61
+NDyK7reD1tDZTxTQHdJy10Mt4mM91ZhBAWKO7p/NERyYTsx+Mk+lAPbP95Ml
+qCfYHHXdYyhge41iooL6/S1N8dUICgz+LRKiDuPguGdA0aOnFDC72/njO2qr
+WNZ/0QEU8G7UDLyEmq7fIpbvHvr+jKBUEdQH2edn3t2hgEaUQPTiEA4WvOZz
+C5zR9dwxX0pG3a5hxKtmR4GEU3N2PqhjFQcVK60pcOxbx0cT1AmpQhRdcwqs
+1e1VKKKu/xDm0WxMAaWz/tkcqO2PR0WbGlKAbVrFnTyIg5i9/Ou9OhQoijy+
+PYhaNMVx4NpZCiguerjWo5YzFmMYP00BXMtoJgH1dfdkpdqTFJjStijIQj1c
+Tn/okyIF/E8MKCejNri59PmZDAVGlu/IvELNf39p1e0I+v82cyQ/Q21VmkAy
+FKXA8QMVwaGobw96fpEVoMBTksdQMOpZN1ZOFh4KjLeJ4f4zpnxXYZYdrZfh
+nq3HqGPpBzabDlCA3ulldThqD2O5oBxGCiykaKxHoU4KeFz0YpcM1rV/cpJQ
+d2t5JrptkMFcMIz4EXWGZJD8eQoZKP28d3GoSZE6PkeXyTCgmRJeg5qn8MJN
++jkyKAewcPWiNnkjfWhskgwCza6886jxR11cK8fIUOKaG8OI7uc/1oRbqYNk
+cHjW81gM9XiPttiDXjLkO0zMaKHOGl1/bE4kg4Zie4Mtararl2KVW8hQeyRF
+JAR1hFHbRdYGMvQFnp3NRM1REfIL+UGGWQ2WGTLqSufWqLelZFjiURSQQOvD
+rOvh+n08Gdw1xZD/6kfdUbZL7gsZpl1c/b6hFtDU02bMJIP4bHHoLOpws1WL
+4XQyMP5oYjyC1uff3DOPXiWQ4aODilca6utqcy9dX5HBrS7MahD1aISDzrkI
+MiS+jf4mgtZ/PXvd5/lgMuhM1XTnoH6dWqSu70GGjic3P42i/ZNc+yNA0IUM
+/AyaOipov9m3/7VbsidD71CRZQRqLLWIO9mSDPH2IWNaaP/yWBoJTmLIIHvI
+MRxB+1uwRt+rVJMMx3LZ+2T+4qCqMudGhBoZ9AsuZsSjbnBvVlJQIEOd092E
+2+i8uHrJTOX2YTJMnuBl+W/eBGcMJQwtkCDw37iSHTqvEo2yV2tmSOC4NcI1
+i9o512zxyx8SvHhBsPCfR/s3+n6Fbz8JNiiDK2kL6Dxhv5jCWEcC+viNuF10
+PpZsdbBwvyVBRhmXuzo6b3N3JvdWk0jgs1EvM4v6jemzqM44EgT80zB4h85r
+U/0op9jnJFB1vJ7OtobW/5fkLSZfEpT63C3Yv4mDy06XQkaNSJB1hN/5LpoH
+tJiGxDI9ElD1ru8aoHmRdvGcRpw2CcydrNYl0DwJEtOSx6qi60l3ZhpmxEP6
+7a2MNHESLP2deuq1Hw9emUNuGrRV8IjJ52ZC80qs5OKOUNYq3H/dHrgujgfp
+/+ma33u3Cq/Kj5aqonkZSLvA0ZK8ChN5DRX30DwVcKGUB0SvQhsPveimFJr3
+CtoNrfdXQSk+3UJWHg+yuXyK1karcKk5NJwVze9u27RbKwsrcEhpjHfaGA8H
+nF9bqc6swBX2gdBANP9dlKbi/SdW4JFSVSmPGR5+kaq3tnpXIIHfOdTYAg/t
+MS6h29UroJC/ETV2FQ/yTRX5Q3Er8CCgPSoKPX901Wr5squuQLzvzXtb4XjY
+DBg+mKG8Anc/faQ0oecX3+zddSW5FXh1wm8yJQIPivWGLRfFVuACPzcnNhoP
+Fmk22o8PrEA1nV9K3ms8sDBPfnhZsQxnzgQGrKHnpdLlbK1olmVoH0/rcf6J
+h0F4fGnt0yIoOxtlRB0kgKB6NFKfsghuUa/15DgIIGxTcTohehEi3uY0N3MS
+wIA2InPMbxGqCUUBPIcJML2vZ0ZFbxGYRWpcmyUIsGVrq7QwvgA5Z76kwmkC
+eLQyrzQKLUD22M9bfS4EKBl2SCt6MQcu1sfky5oJsMPcX84fOANmea8Fwz6j
+5/OrfVwPLCbBbMgwIO5zMfxNFvTszhsH5iNWfS/nSsA9+0Ag69oAtH7kX+k1
+KoPC7DPDicqdwPlskmq6XQ4N2aP4/vUq+ECru4TMfAc727TRExPZmAmLY4Sv
+1Er46jk/lipPxGgbeu6aRgNwjb4nnUsbwwhdvBS0q1YDeC22M3p1s5hh72ph
+zEotEC4cmjy/NovBWIVX4ddrYXzuYMxb+TnM9fIUQWX6n8BEe35YP2EOc2TD
+wk2f+yfQp7bk57jOY2ZYR0/Mqf6Eku8KVo2iixhOge9UlaCfoBzk4e3jtYL5
+rNThmcxTB505s9OOMSsYXc0PuYGidXDDWmMsrnAFo28GLXdk6mCO8tS0dBm9
+Xz3lGqRVB6eFuA1V769iJsQN6Y1c6oA1lpO68YqEefsjU7quvA463A1Py9BR
+MVc/n74y5VUPscbM5GoZKqZBJNpf4lE9sHoGY8tMqRjkSt81r2f14FxxL4b4
+gYoheAk/0UuvB4VB16QBQxqmWtTcduhXPeiubSLseWuYN09X4vYrNsBkVBd9
+/u9NzKfKdRcaXSMkvbyrNXBoC1P08jjXmUONcCPlrx8YbWGe8T15miraCKIZ
+fOlNlVuY7x5xytWajWhuud4wL9zGNLH1dn940Agh5x0u0FXuYqoFx/K9qI1g
+avos32CQHkvAbz/6ztcMic5Gkjh2Buw+bFnlqkIzvG3X1VTVZcAy2t/CPdJt
+Bm2+iaryQgbsk5k5cpR3M6jJ1rpwJDNi501oTFvEZvA08L4eTmDCUn4bb7Jk
+/wKm7Ath93aZsBdfenybqP0Fd555f002ZsaKj57ZMBz/Bfce8ZjQlpmxFwp+
+i/eLtEDclMJy35UDWIGl7Ov171rgxGj8n5ftB7EPGFUeJDa0wgHEVNzdnA0b
+yuP+/sxKKzjNPv3FPcyG3T7z9C+XcBsUkk+pEhg4sF0maqt4vzbgCaYLKb/C
+iU0/4+OF1WyHIZFFhFbGic1PPZct6t0O8Rb/tmfFuLBB57uL2HLawWp9otSN
+jhvbnsme1i3WAV9HEjM05Xix0wmRWSf5iUA0sxL36uDFStZ/14s5R4SiO32O
+guF82Isil+f53IhwfSco2PUIP/aja7F9bTUR7hG81424BbD7Iz4OpC4T4dSu
+U228qCBW6P24F6tUJ1w4+8BnMkMYuzT4/suJtE7o/tv05Lm0KDYzU/9I4kgn
+pAYzBf9eEsPeLr+Zzi3bBVlxfd7UZxLYYf/WdrvALjgk2Vw10SaJPdF3puX3
+QBc09kVa9bkdxV4ykm2lN+yGQD2W9NqAY9ji6Tvx5k3dUN4kHdluIost/MhX
+zOjeA4Z7P69iwxWxjvhPSKJqL/wfXweqsg==
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3873#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwV1nc8Vf8fB3B7z+xCZvYIRRHHiNCQBopkloyIQl+7CFFIJCqSFdU9F2XV
++5DsuPbWkFLJ5Q7jon7n99d5PB/ncc7j/Vmvz1ve87KjDwsTE1MUMxPT/59o
+a3tFrV8MVud62Cbk3iyEv3BXpT9yxiLslI3bWD9BWYD7lfMsxzGl+3yf2+Wn
+YXxU94XBBXusgEPj3wDnFJTf9g1zjbfBVj54ZLw3m4R9Qekv9WessG0e1IB7
+zyZgONlxUIdsgYm/fdTSqjwBM5/lRh8Fm2NVsmKJtxvGwSz/uenrAwiWod4Y
+VOY2Di/nxo13xptiTVUnL9XyjoPEsrW8z4gJdvKsXJBPyxjYJJp/O6q+H3NW
+q1+MsxwD13aGneu2fdhY5vexdt4x4JnfNZAvZYTpsV75pjU2Co+vrGZFhOzF
+Dv1e5Nb8bxRsRAl/Sxv2YNmjm8cWHUahWYIQ8khkD9Zram4nqTYKqRyBWW8X
+9LGea3/zn34agVO+tb6sonpYVTRx2Pf8CNxJyNh/nLAbs7JvL561HAHUbFd1
+uuNurIrrl0aU6gg4e/7pKSnVxVoMI19W0YYhtrZBg59VBzPQ3DGnnzsM5sMa
+8+/jtTHHnqR9xfHD8B8SIOTCoY0dVo1qqwkYBk59CA/dqYWNvAn2y7MaBmY2
+nQ8DtzSwozcjDNMZQ5BCvqRtyVDFjsb6aNAjh4C1hLXbokYVmzDaX3POfwjs
+je9zXQpWxTw/+4kJuw3Bxt1g5feLKhipIPGjlfkQMN2kf+BhVsEwG6OlJ3xD
+MCRDcX/qr4yVxlQmHXkxCOW5OQ7P9itjkkZTtpZFg1D8XYvjK48ytqB1+vfF
++4Pw0Tf41fRLJUzBJDPkQMwgUEuDU3NYlbBz6qA/e3wQaCQBn+lRBcyucmxJ
+iGkQamNKP5G25LBnO1DvqpABSFBliw7+JoeJLv0SuuU3AHqy0az/dcthFy81
+Wlz1GADD3+ecPzyUwyiL85dTjw/A1LRT47cDcljPvIVFmt4AWOdc9rmtuhNr
+CCQFPVzth6You/LGn9KYw/FDGx9u98OJqxnX6rqlMYVioR9Dif1A3Hlwgu+l
+NCZQoFGxENsP+ZkD/bWh0ljw1H3JvWH94BBXNTfFIo1xyEZWabr1wyM2bXsL
+nR2Y3J21C7d1++HLt9uWcnVS2EkL+qD1FAnY9k0dTn4qhfE4VdgajJJA5ND6
+qkK6FBbESJNQGSDBE44z8n88pbABbE+gdAcJst1NlTAhKYz0x+yPZQ0JJMJ1
+LDvCJDGWHa5wLZ0EMcNFnJZnJLAHAm3Nfy1IIHozPkjcTgJ71zOJppuSALmW
+O8a1XwJLDQxY3rmfBJOEWDXb7RIYh4ONwdHdJNBf7bLQmhLHrikLl5F2ksA/
+jL3UwEccm3r95UInow9GVx4liqSKYXdS0sMlr/bB+eI92xWjxTDZu5+cvwf0
+geaDoTWbYDGsjppVW+fdByyWkeWk02LYQDZP1aWTfXD1nmvGqJIYxhBkUmIx
+6IMoRyONtFZRrKE4OplG7YUzqeymJsKiWEzJAiHvWi9sia6OPGcXxQZehDCM
+gnohTLEgXIMhgrFpiy5P+vRCm9hZYc9ZEcyxlFaveaoXXN703X/yWgRb6kjP
+WNPvBUtZWvCe8yLYTOCnGF3KR+Dk/Nnx+t02rOqBb+uX4I+gz+zlNF8kjLE9
+87d+frUHKCyEjxYPhbErgZ6514J6YHlq+1JJljBmkhyQaHWhB6R62OiJN4Qx
+IRs59TnnHljqPKZR6SOMPdsK0ttn0gPqoRbGURrCWE/bho0aaw8YZT1vJTUJ
+YWOl+lyiWd1AuRRtPf9dEAu6Gd+dVN0FVgpfP0lNCGInI3/fEarqAt1NHV/n
+j4JYW4BqTP6zLii7UjG1US2IBXTnjtXc74IUz8vU8XhBLIE9xo4e3gW/qbZ3
+Pu0UxJ5+nympNOmCpkxVgXhvAUzaV2Jitq0TTPeWcerx8WPJri/9rGY6YHhV
+//UeFn5sJDvUT3e0AzQXyh+Yr/Fh1xpSD8mQOkBZ5GV7yDc+7MFLw+L15g7o
+DfOJ0HvLhyVn7mxuKukAGbJiu3owH7apOOoeENgB2goHf5VP8mIJ/2pmL2+1
+Q6Vv6reqNh7M1DpqmFOuHWSXX1SobHFhuh+cUhPTPsD0Y/urJQ6cGCH+RELj
+9/eQwfkm6vESO/aXNYjFOagFghBK17EGNqw75HGXvVAzTDjH+p1IZsW8y/e+
+kHUBYBQUcvfHs2BMZj8u7aY2wZERVPpUJDPm6nXxc0Z2A6CepQncSUxYFv/N
+mIXYOoi/p6455PYPGHHiZac7X8O+1ITO6Sdb8MOStdBKuxb+KhuOxuZtQYHo
+5/EPqrVwpDR8QOHeFpxLutdsp1gLcz62d/yTtiBf6PhDd8lakCNwsnEFbsHI
+ZuvlWpZaUOE/rhuwfwtkvrk8Eh6rgQ/Oz+YnhzdBDFLCbyfWwPkL8WZagpsw
+q09ujPldDWF7HhDjuDaBw5n+Jfl7Nfg5ObMMM2/CcFyNQ+6XavAYVTeIo21A
+VZorZ/NoNVzkymr/PL4BDrY7B2xaq4E2/f1r57MNSLY9VqTwuBrOj3IQ9xhv
+ADX+kCzvqWpwfFi79dRgA/69eUB65FANRu213MLaG9C2oNFicLgayiPM3Mly
+G3A3pMnjsmU1XNcrma/h2ADMoD1ZQq8a3CZz3ngOMIDh57hLX6gafAgPQi0v
+MeB9dTsju48ISUGaXnNeDLjjHcbc3E2Eizz3KbfcGPCk2F10uZ0IOcTJP70O
++Pedp93cMCL8rdpm7m3IAJtPl4J9UdyGi2glGwNuPw4w3Z9NhKNx0enlT9bB
+N1YvfM6VCJshHexueevw46iKQZYL7uaDHNvurYOqbzjZ4jQRLGbWCqKT8Pcz
+tu6EY0QwqTXmPxu4DqL6seKNFkQYsmc7o228DnxqHeF31YjQPH6iYffoGjjm
+5WbqMlAoSBn7db5/Ddqp9OK0VRTkDINjMrrXoJhuq7BAQ8FvX1HPEqyB+C4Z
+j1oyCpTITHpt+RowzvtMBs+h4MWV/Pf49TV4aCDhcbsfhRfSvjIfZdag4Ijj
+ffsqFLZFcxdxSq6BScrJw6LPUai77n7NYtsaLFWweXwuQyFjmUW0nmMNwrIy
+ixKKUYi8cJTvOXkV0qgWV8gPUXAvJF5/2LwKdmvm836pKMi8LH6G+qzCucSI
+rhl/FIrIj+si3VdhL+Pe899+KAgvkiUtXFbh15tLgZsXUOCZoDcOHl4Frm3w
+QM0bBcXJo5EM/VUYnFQMI7qioGNcb3aKZRVmtAZeRB9F4cItlm75zRUQYaoK
+6DiMj8fL/MEifQXYUTKrhD0KCSP8K8k/V2DeQ6webFAI1fpThZFWIFwmSMPM
+HAXlSxURxk9WYODQv3y6AQrGv5JGePNWYKNQJytaH4XK90oBU1kr4FSnfppb
+D4VbeVImMUkr4H+9z0pTB4VPBUZurYH4/9LmK56o4fNfYytxxmQFeJyVN4x3
+oiBufrtEa+8KKKkXRzHJovD2R7QHs+4KqBRwNHdIoyARuOpeobgCmqZNd723
+o3BiqsNng2cFgsWSdneKoXBXrJ67bJwOfwt//zrIjwL5++zA3CAdbokd3unE
+h4/nplWjUi8dgjO9Mv15UchSK/nxtIUOgiKBmo+5USj7MVFYWEmHcy6jWuoc
+KKwffn7qcwkd9h+ZMTvFjsKeyhfKcoV02MfOevsGG75efxzECrPpkKZ0uusn
+CwqGPNuUi6LpwHTyz9TUPwJoa6WUfAmnwzrxRZk87uqrhgcUrtDBizhf6veX
+AEahJoRiXzpYGVxHWLcIcIPClFt2jA63G2r6XBkE+Jdp+37elg6/c2lajesE
+8JPuZ1G3okPvK5YmadxfdzytrzLC63+n6/NzlQA/40LXiPJ0UNJxnyynE+BY
+0wSBtoMOcy8LyuRw906kRewVp0OUK/VxPo0ATt/H9Bt46MBhf5cvn0qAa9cP
+Hm6h0gDpJQ/AMgGelhiFsC3S4M66zw8H3PTIpCLreRrMGxkpzC0RIJTPWKF7
+igaNihlcErjzrWxzhj7QIDHL41bhIgHa3jtySWA0WJDif2eHe3NHV7xLAw1k
+lB3E1/7g45nmS5l5SYP6C0Zqrrjly6bF5Cto8EWj8us23Ck8KuVexTR4lO7Q
+2LNAgIBp7cn5XBo47fzYbot7Gxf1ukYWDZa4Qhh8uL0tjGWD0miwzPrFdvA3
+Ad7fTG0lJNEgXutGbQHuxX6vQGocDb6mvDXxwz2x105y7380uMy2MmOEO6IL
+a424io8/OCufF7c7j7/cXz8ajJHTPRp+EYDJb0+FmzcNHhB+iufiPv3j6e63
+52jQ+vfqh2u4U/8dqJd2wevfVRTggntNP9Ms6gRe//lxXjPc6wIqrZNHaFDd
+m/ZUBTemkGptfIgGUbFquiK41bkPtj20oAFboEwNM+4Mr68WDBMa+EePaFF/
+EuDxxEKjiyEN/iW0FPzArS5L1q3fTYMUk2NMn3CzzIUWSWrS4PmpX07juN8t
+sPNH7MLn35e5eAR30bpO6KgcDQRWmL/83+dGogb37qDB7WsuwhO4106Ea+WI
+0eCA7VX9z7gzbZ/H0QVpYPS2xfon7v3ZhT0neWjQI/jKjo57QHxOqIaNBqUB
+ZaZseL0D9SxHRP5RQXdRUkEct4L/zbgr61ToexRMU8e9JEN/3k+lgnrYjloL
+3Eldn7p1F6lg4JLk5YZbMqjv6915KjQqyf67jvsxzzHy4lcqBDw+disfd0Xp
+z6Uj01TYGXNr4x1u3SPqP6pGqcAWoHd2Dncgf0E/7wAVOJnflgjg61fF6Hx1
+qYcKTO33JvbjVtE0i+9sw+sxUlz///p/bEo6qNpMhfKWUab/74/tkfXP5mqp
+EJns0cmF76eh3w2mVgQqDJ8STLHEnWLf2Pn0ORXWzt3Tice9HjdHcH9ChSBi
+rzY7vl8Xa5T53uVRoUrhXJI97p+Zmaels6mgsyOsJRv3rLTUm7FkKpz2nZ3T
+wc9D3377nr03qDB1XbQnHrfRl+He7Ggq2BX8lz2CO7Ze/qHDFSr84MrvTCYT
+wCqi16T9LBUO7Z6rEcTPY+/Lf6+UTlPhbll6QQTuVv9ZvgQHfH4lOj2+4fZM
+IMebHKRCTk5pQiuFAHVnTx0maFPBb6Oevww//ymbp5j41ajw4EJd/y48HzK1
+vB76KVJh0+5ZUAVupr2kGAVJKghKLOu+WSHAnKXOZhYzFY5Hi7XT1ghgE299
+KGyDAvv6HVUf4HnUMP1fyCk6BeRf/5g2xfPL4uSCs8RPCpD+yFrmbBBAnJHl
+n0eiwGr00ucAPP8Eue0yIrsoMPlPgqSO5yNX8tV0l1YKrLUX8y/gfvNkSECq
+jgLK3IvBEcwoVF1wk8l5QgE9i6vv6/D8PXrEkx6WR4HzIj+EMvF8LsnULTpx
+jwKESx2lAXh+R6sOhgjdooA+06dyLS4ULC4Ofb8VRIEzKXHLI3j+X/zYURB4
+gAJp87V/Pojg9/eqsb+tIQVErJsuDoii4KItzaa8mwKqU9ZyX/H7xcqsO2tS
+iQJt83/MeSVREHh7VcSajwKFyeX7b+L3U8Gyu6zQ5DJ0aLCeFdqFgpRXxf6w
+iGXoebMpn2aMwp/m0Bb0yjLUPTr+Zc4EheooHV5ywDKIxEa5WZiiYJ2aNn3R
+YxnchH+nsOL3rZTZyQgXu2V4dv3I01JrFG5yPZHSll4GfT0nu8uOKMh6QXER
+LMFFYyNLjgAU9j2lO4/UL4GbhkLo60AUupKTgadmCTLLXhz2u4zCdGXP4yvl
+SxAkZc0YuYLCbi22B6aZS9DO36U9EInCq9M5HO2eSyD5rjHcJhmFEfbKMzns
+S/C3hOihhvczC8FZgkl/ybCg3cnsUoFCYG727ZllMiz+2lN1uxLvn651zKaN
+kSH8qogM4xXeb71bXpopIUNmBtllow6FIOvzbk4IGRSmRfPudKPg6ObgmxG2
+CE7jswwKBe9fUpnsx8cXQPmnhnaqHREKD12X1vq4APe3XGYvHiGCNjdrWyy2
+AEdlM1zsHIjg0M1TIF+2AAmxnklieL/Y8eKsjlPYAuTMdvX2eBChXXKwJ1lg
+AW4VZtx8F0mEAkZu3qb5b3AwRaYqKokQ3JSeNfHsJ4wHHsr7T6Ia7pO4Gyoy
+v8POv2dcd2xWw2sLwbp22VkwUPnFyNteC/OSbulGqZ/gi+H9bJdDr0G+98I4
+VI3hORhf0HnnDeTFg1HYIAmojXUFFOF6sA+Ujvq+vQV4bn3M0M5rAI8C16ME
+QzMQnecWjPdoAocZ9cp45RYz36Yroctq7yCkcP++U+0DZqZkjwPHWDFYW4zX
+a/eaMetesb4oLNEMZtNrCbvM58zs+EMMBdRb4N/Xe9zpDQtm7D++aY35vYcf
+ti6VNSUUM6Kn0zXa21Zw5opmErqwauap0YsdkmwDsid9ita6ZXap1t+loL4d
+ui4Ntr56y4Jc3spPvnCtE9RWpcy1+lgQ7Zb0+eboTghrhRfYZxbkTKm+tHxi
+J3g7eiuqs7Ei3wyDFBbvdYLK8Xf6/IdZEau1bZXv0U4Q0hwiWX5mRei54Tw+
+i50gemyH5A5pduTgQqpkl38XvBziTvy1zIlU6Tg4forshpm4dboiPxdS/jbm
+aNqNbghzyzS4q8qF6L/XIlukd4MNmxRhy50LMZHRTfxY2A2JTcVeR/q5kBs+
+PH/OdHQDo4R9wPkdN/LJvz/gslQPPG09iKy08yKvdgjJnG/tgbIMSWbyL15k
+Js3wbVRfDzQa/GnZI8CHjLuW7y2b6AHX0BlN4ik+pKdU8eKu5R5wP7jtXOo8
+H+J6xWl8QPYjCBzHfpFlBZAhWmKVYPRHcCy69V42UAh5lmmfh1r3gtHVTCbP
+G0LI9svbWIVO9MKKSaPU5zwhZGkx3iDevRdCl24YZLYLIRZhm9yPInoBbbFa
++a4sjGze1M5vqewFJSlFof/IwghP7Agvn3gf/H1NDNnXLIJUuZopIVt9oPpV
+q6H4iwjSff6Y1wkOEkRQ2oixLKKIyvDMU3EBEtzM+Fibe1AU0YsIUe2VIUEY
+LyH2Yb8osonYhfCYkuB4TlfONKs4cqtwgcydQIK9vwWN/y1JIi7sUlZBO/qB
+43M2J01LClGM5erWUemHXImfh2wCpJCqPjXb7fr98DWp5CXyRwrB2NmPX7bv
+hy2Xh7m7WXYghJWa3eYx/TDbMJ4vnCKDvDUNM2db7Ie2ywa+N77JIFtbb2wk
+t/rB3Ou7d62FLPJ0xggL5RsA56ttb8icO5HrMqkc/JoDwGIe99rMTQ5JelRw
+SPXyALDWNtzguK6AEOuSZWe5BiFjSy2opksBwWS5S8/LDoIm87Eq9p2KCIV9
+mBFhMAhfX985+m5QEVHi/aVZ5DkIAX3ap8bClRFCGzendMcgPPaecSeRlZHe
+aCeLutlBsFegWtCCdiEPFzhr3JiGQJK/7OdkogqymGFIlTkwBFXSR0KG9NWR
+gfd05+L2IVCS7Y66x6KBeLJJmhIWhyCygWUyfVYDwRLPpsxLDAOq1fLWZl4L
+YVo5cGk1ZBhMzsnPLYnoIBej1Wviioehr83bWXy3LvL8eVx88dgwGEmaqrxp
+2Y20zHGE6DiMQMAx2V1n6/SQiBLzYOvsEeiRFZ6dGdFHDhO/zEZ8GoE4nY7t
+q+p7kODSqVsR+qPgHWhgXdy+F2HzPhJSljUKgcLlScNdRkjSMdmZJKYxENh/
+wk7xgjFiN41mpieMwWnGZ7k4hinybdRkG11+HJjb5uRhlwXyTDL2RfvyOPwP
+XQ72hQ==
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3873#2"]& ]}, {}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{None, None},
+ AxesOrigin->{0, -0.4306807289133189},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{-8.955815089046379,
+ 5.4573291409938625`}, {-0.4306807289133189, -0.06583390760243146}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.05],
+ Scaled[0.05]}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.875953836665846*^9, 3.875953847191218*^9},
+ 3.884691472844841*^9},
+ CellLabel->"Out[6]=",ExpressionUUID->"88a1b60c-97d1-42d8-bbbc-a379f83bd40b"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"data2", "=",
- RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}], "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}]}]}],
+ "]"}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}]}]}],
+ "]"}], "]"}],
RowBox[{
- RowBox[{"\[Theta]0", "->", "1.14841"}], ",",
- RowBox[{"\[Theta]YL", "->", "0.989667"}], ",",
- RowBox[{"CYL", "->",
- RowBox[{"-", "0.172824"}]}], ",",
+ RowBox[{"-", "15"}], "/", "8"}]]}]], "Input",
+ CellLabel->"In[30]:=",ExpressionUUID->"38c6377e-d6ac-4418-a565-18d85ba8fcba"],
+
+Cell[BoxData[
+ FractionBox[
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"1", "-",
+ SuperscriptBox["\[Gamma]", "2"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ FractionBox[
+ RowBox[{"3409755417054688", " ", "\[Gamma]"}], "7945377693816643"], "-",
+ FractionBox[
+ RowBox[{"53028535852605246071985852489792", " ",
+ SuperscriptBox["\[Gamma]", "3"]}],
+ "1618221648977661669617116917623881"]}], ")"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
RowBox[{
- RowBox[{"G", "[", "1", "]"}], "->",
- RowBox[{"-", "0.310183"}]}], ",",
+ RowBox[{"-", "1"}], "+",
+ FractionBox[
+ RowBox[{"47278060980595344", " ",
+ SuperscriptBox["\[Gamma]", "2"]}], "35848204582560841"]}], "]"}],
+ RowBox[{"15", "/", "8"}]]]], "Output",
+ CellChangeTimes->{3.8762085995213633`*^9},
+ CellLabel->"Out[30]=",ExpressionUUID->"2b8225f9-ed14-4766-a01c-a86c0feb9b0e"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"pMag", "=",
+ RowBox[{"Show", "[",
+ RowBox[{"ParametricPlot", "[",
RowBox[{
- RowBox[{"G", "[", "2", "]"}], "->", "0.247454"}], ",",
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Xi]", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[", "1",
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "/", "8"}]]}]}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Xi]", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}], "]"}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[", "1",
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "/", "8"}]]}]}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Xi]", "[",
+ RowBox[{"\[Theta]0Cas", ",", "gsCas"}], "]"}], "[",
+ RowBox[{"\[Gamma]", " ", "\[Theta]0Cas"}], "]"}], ",",
+ RowBox[{
+ RowBox[{"DScriptMCasD\[Xi]List", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ", "\[Theta]0Cas"}]}], "]"}], "[",
+ RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], "\[IndentingNewLine]",
+ "}"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",", "0", ",", "0.999"}], "}"}], ",",
+ RowBox[{"PlotRange", "->",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",", "3.3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"0", ",", "1.6"}], "}"}]}], "}"}]}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}], ",",
+ RowBox[{"PlotPoints", "->", "50"}], ",",
+ RowBox[{"AxesLabel", "->",
+ RowBox[{"{",
+ RowBox[{
+ "\"\<\!\(\*StyleBox[\"h\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\"|\",FontSlant->\"Italic\"]\)\!\(\*\
+StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*\
+SuperscriptBox[StyleBox[\"|\",FontSlant->\"Italic\"], RowBox[{RowBox[{\"-\", \
+\"\[Beta]\"}], \" \", \"\[Delta]\"}]]\)\>\"", ",",
+ "\"\<\!\(\*StyleBox[\"M\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\" \
+\",FontSlant->\"Italic\"]\)|\!\(\*StyleBox[\" \",FontSlant->\"Italic\"]\)\!\(\
+\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*SuperscriptBox[StyleBox[\"|\",\
+FontSlant->\"Italic\"], RowBox[{\"-\", \"\[Beta]\"}]]\)\>\""}], "}"}]}], ",",
+
+ RowBox[{"LabelStyle", "->",
+ RowBox[{"{",
+ RowBox[{"Black", ",",
+ RowBox[{"FontSize", "->", "14"}]}], "}"}]}]}], "\[IndentingNewLine]",
+ "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.875952981547227*^9, 3.875953205695381*^9}, {
+ 3.875953297097693*^9, 3.875953297193099*^9}, {3.875957011270492*^9,
+ 3.875957047134419*^9}, {3.875957125424335*^9, 3.875957151767858*^9}, {
+ 3.8759571836897497`*^9, 3.87595718748908*^9}, {3.875957237810454*^9,
+ 3.8759572647954397`*^9}, {3.8759573310521803`*^9, 3.875957359900523*^9}, {
+ 3.876209125582448*^9, 3.876209130718493*^9}, {3.876209246657913*^9,
+ 3.876209255553268*^9}, {3.884690546688959*^9, 3.884690577225401*^9}, {
+ 3.8846907201244907`*^9, 3.884690753852927*^9}, {3.884690875959548*^9,
+ 3.884690937551785*^9}},
+ CellLabel->"In[7]:=",ExpressionUUID->"7af4aaca-fcbd-4164-a23f-452af7281199"],
+
+Cell[BoxData[
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJxdlHc0F/73x9/IXtkk2SMK1ceKui9bVEIkZCXZFBIKIbtBlBnKiCI+HyuR
+pFC2rKLIznrv99vb/Pr9+7vn3HPP45znPef5vH9cSVd/y2v0GAyGsNf/N/9/
+sXhJcG1rSwJHcBjGtAdAMWg0clv7GOCEiuWDeszh7/h/RrvaugD19NKdPU6g
+7nfYlUnHAu5apvb49foDx+rpfikdF9iazMDW9UWC3vWElHSdGyAaXnnx+OAj
+SHbANtmfvgcCln+Eh0fyof7KEVMzTBpkxb6Q0M+pgoly3m/rA9nw66jh5FBV
+Awg5jHsPtBeCKjvmbqj5R/BE4nWQXgI+lrwkv9zPkDEr4d4m/RrO7viQ+fI7
+QeXllVFO4SpY0KrkpJG7YYOYm7P24l/wIti95s7pB/M/Cup3+GohySN7Vipj
+EI71Y5RxvfVAX6E4Rd8wBK6vjAzZgxqBHH1QLqJmBIacDK6OyTbDJz4LTF/R
+GESJmTaOinyEnJh8pbKmn5Cb1tWXmNkKjaO3rm9WTMCFGFnbwXNtYHHVLXPj
+y29g2jQbUBP4ArE+660hHlPgxnm/oGasHXTTI6hjdn/AJrztmdBsJ1ik34oX
+c56G0ETWLX78N+D6+SoozHIGDsx8bT9q2wNqxwIG71+aBc9gnrzmpT5gjxSL
+sbSZg0PZw3I6hgMgt3mnc1BvHhywnAkOI4OQFxXqI663AA0ZZrhDt4YgtvCT
+/huVRThrxxmzqT0C43Rar/iE/4JrjhCV6D4GAcW9gdz8S9D0LE/+ac1PiKx8
+eTRldwle1/OnbqT/gqHtlrye3WXwZKISjt6cghhB80XD7RXIeqLBXWkwDUa/
+GPA2K6vwkBjUdObcNJQ4mZz0xq3CW0sZ6rL1NEhkaX+NJK2C4KTSCYPr01A3
+2vOubGsVqB4vcw2SpmG9RgiP4VyD1d4RnpSBadg57SXQfHQNvLly1vyuzcDD
+uKfq/v5rwFxbtBZeNAt6+6j3h4hrkFZeG2hWOQsyfl8m6qhrwGHt/1aqYRbc
+WU4lZW2uQXSKhf9i1yzgSXNLTgxY+GQkyDdInAXE69OH48WCMnXfETnDOXCW
+NkqUPo6F6EbXdsG1OXhky7rRF4CFRglLyVD7BWije2DnjMWCw3oXr9n1BZhP
+8WM0IWJBMiJWRD5w786nLKRUqVjQdFjM2k5agII2gxq6XSzcEs4fkH2/ACLT
+wjLWzDjAaF5o9hNbBIvW8yMsQjjwzdmnbbC0CPLz3+ueq+PALjSowPHVEpR/
+vVSccQsHY0bECp+GJdB68g9r+20ccHKCSXLnEoxbDXRQwnAgWrsVv7G4BLy3
+5S5djsQBh6oOpkhxGSJc3LqkEnBw1sXpt1b1Mmga+QV3ZOGgaY5n6p/uFUhW
+zTxr34yDY+JPKswRFqzLj5l3MeIhiDNsGnMRC/7hZEksMx7s+/iyOq5jwcgw
+yJWPDQ+cTeP8Tx9hYbKoXfkKFx4El78Ka09hIdNmhoEiiAfrQ7Fe03o4+NpS
+IHpKAQ+WlC9vbuBxMKKLYZE1w8OAYllU+xYOVNQ0yi+dw4PLjwtxCix4uP2o
+qzvJfE/fHxPFL46HNs3sDIIVHsYGPSof7umyGGeNOx32/DF1x0tU4CFqm/gp
+xQ8PL0+FKXiFEEDkreh8RBoeEvsjU6vuE8Bfv7icmI6HWLo+fbZ0Avwb4yjh
++QwP1WYNoutVBBiaPCttk4sHt8qFgdZlAvi8wL7QLMEDxbbUW/UaET7/eeYr
+0YiH+Q03vTIPEiSXKFRHT+OhovXAWlkoCVJRxEvuOTzYiuN825JIkKc56pm3
+sJej6Nd73QoShB64GfJ+BQ/uE5m+N4gk0On43UBHxQPRLnK7J5YM6ifzcPXs
+BGia0WCRaaZA3YBG2pAaAQSYL8vu7HHwsspP3B6ffhyX7dVKgXTvlQhXdQKw
+6ltLWvVT4FIK2c5CkwAHLDKLns9QoMf5Bn3fSQIczDk2kcxGBT+mF4RuIABB
+c2Pky2UqEEWuhH8/Q4BCialg3DYVyjvTLTgcCSAb6e/K7kSDyQSRSvV4AkQl
+OI+b3qKBbVTawkAiAW737P/49gENYi1Cj/ilECDk8nu55SYabJX+/l2WSgDH
+4iDh42IbIAVjvMq5BCg+2BtrMbcBYfvuKXhXE2B2tN4l5+kWrP2jYPh5ggAF
+XwQ/1Py7BTPDcx63JgnQd7P22U7vFixyOH4+PE2A7/82FMqybAP2uZRi+gIB
+th+KRfTe2Qaygd1CCIEAVZPS2E3/HXBW3lm8w0KEuMTNvkGEQRuYXVKyGhGW
+HvFzeltikMR/+fyemkTQ2w6okHHDoLdOydXG2kSQVAm5tx2PQYXO+r6sukSQ
+qP7x3HwAgxbPBZ7IP0uEl/e8dLq86NDyd0UTQTciBMB+rHATPTruMXrWKH1P
+3xh+JG2IHjEnZHDkPCPCfv+nFvqr9OikRj0Nn00Euau5hy+IM6Clz+d8SwqJ
+IJVgkqkQx4BqcwL/UXxLhNr2HsUYp30obUYPFX4jggjfYzp+Yya08kBgy5+B
+BD9UL2kpeTAhN+Wk13zMJAjr+cCYmciEytjPKDWykYCuakw/pIcJDQdK1nDz
+kiBY5wPO/zIz4jFvyf4lQQK3lYsPwmNYkC2m6zYbkEAtjW6AUYkdqRzt//Pz
+LgkOSLY0PbJhRwYC0hMF90jgs+DjnhbNjhSlo4W97u/t+2ReYp1gRzljB4OZ
+HpDg/oLNHWI6B+KNlHxyPZcEZYEs8QkSXEgpq8pl8D0JXmcYNz2+yIWYC/FH
++ltI8NHxOu5EIhdiE19uGmgjQXaiXbQ1iQsVd2eZT3WRwN0/7In5IDeSzlsx
+OjJBAukBj6yB0f1IsNVGNmGbBJp1sq+tqftRScXIt3Y6MjwuZeMHIR7Ua7Yx
+wspEBn0pe6EztjzI8sXEhTwuMkR9e+PhN8mD9slY8m+KkyG/9bhZJwMf+pii
++D5XnwxX3wZY/akVQHYZnmd+PiTDs87xhowlAbRxw7pCIZ0MGeEBp2UkBJG2
+0oRzRBYZ2ngU7s08EES8mhOCqIgMN1tesUQECaF5a7lQ8UYysHKnnjYOFEGM
+pMakawtk+FyNDzBqEEFBlwSU1VbJkMDVPhW9I4Lirh6c4CSS4fAJ1cjvDw+g
+eQft8Z87ZHBfU6j/1CKK+oXqJBcEKVB/JqbnnPchxH2SR/GvCQWo5SsjdzoP
+odwQVQc7cwowZV00eiAvjhpH63dGrCkQp6q8kLAsjrRUsOeIrhRg67rbqdcu
+gb7FTTg336VAA0koRWlbArHvHLZ/FEuBNMpOnJ6aJMq9qG/tl0yB0uDd5+Jl
+kkgVT6dwMYsCxIMxzOUFUqjEJKPqSy0FKGrmbILTUqj04zlWpr0/VFwgcpxB
+Vho95VEysv5MgbIU99dpb6WRbv7CHcnvFPjZxkCP+SGDsqW83t3G7/kvkOFZ
+S5JHGiGv2T2OUeHd5XsN9X/lkYMEvuWJFhUMUxZ+bJkqIG9H4+FBXSq8V3Ci
+2QgcRrrPW2tSLKlgbfLcXrhbEfEkHcRuBFGBWuhCi9VVQiHFMro9d6mg+8I3
+zbhRCe1XfOldF0eFUk6+DZu6I6jB29q0L5MK3t6eac0Tyogx0E9C8QMVQryr
+etYCVNCnTFGuTx1UMCsdT57Yp4ouHGEyDR6gwsSBK9zEIlV0UmncWHWOCkcM
+cXSBjMdRpQwnjp1rHZae/SxlvXYcxY99bkkVXodfnT0qsx3H0cRlviZN6XX4
+mNOSxph5AlVb6Nauaq6D1gHSKay7GlJ+QN7idN9jn4r6lDk1tJDXbl5/Yx0a
+1TMZaR7qqJ+Q1px4dx2s1HVSDSM10EKh/H+VGetguKVVtoLXQh3V9klinesg
+4xX5WC7/JOpvPbB0YngdeCVqfrRbaaNQ7+yQiOl1WLQ5PcAwrIOi2GSxddvr
+EF3gGLojhRDXIV/KX3UatOZwj7o9R+hg7921YUMakK9Fm/SL6yLmR1ePMlnT
+oDSNp9hZXQ+p609XnQqiQc16pt3Nbj100iTC0zSWBu+YFb+5eemj2l9hNiXp
+NODZX33D8KMBkvO8GWdbR4Oj7O/iY0MN0WXPwYLaDhogdZY7Z04ZIaNB5xL/
+HzS4GZWy3r1gjHDnZbPZdmgg4BsagJ8zQy0xuSMOZzfgQfeD5ymbZ9EZzfkb
+9U4bIOHiceON1Hmkwfuw7H7gBjT0HDoxb30B9X0gn36SuwEO5bi6WhYLdLc+
+7uvv6g3gUKnQWO2wQC/SSx3rOjZAPMR66n6AFcq1j/KQJ29AxSW15i8OF1F/
+EYfOAMcmVH5y2dWwt0YUQQOavOwmkJRUuLqfXkL+nUzMjLabQH3VUlEzZouM
+a4c4XtzcBNn3Ezy31e2QYpJIgcjDTRgNElVOt7qChHgfJw12bEIpQ4+Fo6gT
+6k/ezftnfhN498tR9ic4o0muP+L/MW5B8MQVMc5cF3R5U1v4qtwWBPEqtVn0
+uKLc9/lr9iZbwHXqoutpCTfELcrfWe+9BZ4VnZWc2dfQ9tI36pPHWxAfTzsx
+ftATsTLWjVtPboFSq0vSd3VvJCvmdS+ZdRsGMNzvQrN9kfi8v9yM2jaIRpNU
++JQCkK+N0FC62zZ4zEeFEZtvoETCZOifjG3g8jlKs0sNRALX/s7yf9uGN7Mn
+VEVqglGccMSZBLodUDpvSp+sdRux2AamF+vsgMXtjuLr2uGIeDt1cDl8B2hH
+h6/dnIhAxslIityyAxVhh6rOl9xDHcoeUxGsu0DGrat+vR6LGlQVZIMv74KS
+1b7qtzPxiKpz/TxD9S6Un9pMML2agoifQ9EICwbpZPc5ih1JRe3q088aTmOQ
+fH76sMWpDNQsYRV4PxyDYmM4DD7T5yC+D7uiCq0YJGaPXw/uLUSR7q/JN3np
+ULMG8U1cySvEkYcf7gykQwqH0e97pv+ic/9ZBUev0KGklJ8XqzU+IIxr4J0L
+SfToI1VkUvZgL9o/XZ1m5c2A3nPqdtm0zCPh4iLPlL/70AnH33LHH2KR4/Lq
+FKMzI/ofa4RZ3A==
+ "]], LineBox[CompressedData["
+1:eJwVkHk01A0Xx6cRKqJC2cq+RSnKGvcSPZaMSgrtlFBZQk/WlEKFjCQaLS9j
+mUabUI/TjpQJJSkRPSSULWZ+v1kMj/ePe+75nPM533PvV8s/bNshKoVCyZqd
+/+/XOvb0jqAxbBoQpXr4S+JQte/TKaM6TGpvMi4ap6KO4dqZwdRqZFyTyauw
+pqL5+YjGrr5y/EJ94SvzcA4uDVa7mGfIxMWBkpOmrnOQonjObyPnOn6MipXe
+P0FBi9Hcg86Tubjrh8l7WRYF6UK/WkX7bPzz52rHi2AKLqN1MRT/yUCqy/Uv
+a8womBQukKmsSMOMEhG3lkLBIQ+ZyrHOs/hM5C1bXDYDxzsHvz7oPI0SNK4m
+xWcGqk8YqvaMJmKMnXLXX3IzsOVhDb6Qi0Pvhsl7UY3TcDVEzvZgz98oc2F4
+oPLiNOh3JhoOW0Vj6vJAqX1bp6Glm1dk3XocQ9fecopdOuvHdis3Noej/JS1
+E71HDNST9boR60Jx4e2LqcblYnjzusgO3Y5gf4Y44EecGILovNHDDUGYJhr/
+FUgTQ7dqrDE9PxBH7tBaQ3TEkNTM3actFYBs0w/LpdumYLdfPfnx4gFUz/bw
+tL03BZ9vRzn22+5Hnr9Mr176FHxZMc8hRHMvUnK9eIUhsyxZczJEejeGPvnS
+ku02BWWRPpYHdf2wnyK1scN4CtrncVZsCffBKE3Kyj1yU1A35VFom+iNWcuT
+kurbRZDulsbmWmzHnpw9wclPRDCsL6X6RsYLE+1DVq8tEkF9zfac6+ItyGe+
+ytSKFMHefZvpl5S2YOEVz2nX3SJg23D1HifSUG27M2vVJhF0dw306Se74zgp
+nylWE8FLu4ltiqvdcGheks1naRGwoifj3oy74HvHn982cYWgpFkpUK3ahKXm
+UYaNzUK46X7zz/4FG7Hu3eF/2eeFULtw+ulJR0c8dujkQFyMEFwY831pKQ7o
+dTR66kGwEG49d5h/ZxVi982dq8FdCDF3V8fQNAC93lrszdwghEe667tiuHZY
+b8x8bL5aCOpNWWFlTbaYRnYkRS4Rgp9R1dLUFhvMqnt8X1pSCIKUMBdatzUy
+6n3S+kkBmN6etLXWsMJWSZP4yG4BbD1jk3RedT3GNx5cduWuAJg73hnrhK1D
+o09m0mZFAnhW0TYUzDFH487eaKk8AcQHORPW+WZY5TVYRTsjAH+dsuA1p9bg
+iGLuCVNfASwcKrbbILUG5cNPH/PzFEAzz0/HUdcUl0sPXrvvLACufy/vV+gq
+pEUWlnaYCaCfPbfB6eBK/J7f8GBaTgC/i5/HDDwzwhSR3F6ulADamyZOGmgY
+YR89Y+28GT5svf7WNXnMAJ+8vuyfOsYHzol1vxPe6mHs9/ie9x/4EJeid7DW
+TQ9XXX13jtnIhwIr81xxiy56gqYKvZYP7xZmt5T366D6rqCWiio+BIzO2Tdi
+rY3HjuuOzWfwQWq+nfPzdi0cV93tmZvDhxW+KXJhJ7RwdPALwzKTD13qjpXC
+p5romW7v8Og0H05lmFyWb1+BXyNKDt0M5kOt6bYbst6qGHosKe/lBj4kuMjc
+svykghMBg8Zhlnw477qzgeGjgmPpWrImZnzYztI2ZAYpo+zj0WutBnxY2cg9
+TGEvRbOXNuUcBT5UeqhUWJQo4AlxSonVKAnxF1ovb/VUwOI+59ynQyQkxptx
+9gqXIIc1ZkDrJ8FDIrBm6Y4l2Ku/O4reRULYN6+lKdqLUe60dB2DQ0L0+I5y
+2wVyaF3eRV5jk3AhidqZSl+Iwueu+h2lJEzvTG+xVFuIh/jJyzSZJNxhFTae
+XS+LpI9GfUMBCYdkbijZnF2Ad2PY1LhMEjT/qHvfS5TGU7cW0X0iSchJa+lu
+05NGyZOPI5TCSeiLSCi+0iyF1W0KBzqOkrAo2ubDK10p1NPny58IJCGbkjPQ
+0jsXHaZJB4ofCUar/sSJjsxFgdtDLV1vEpTXj0TeukFFE0d6q7MjCeX7CzPP
+7aIiI9i3JBhIYBV0dKWpUHHX8hdOlzeQcLcjo+ZD3hx8d0GygLQgoc1x3ofG
+Igqe35jXTTWZZQvvO2lNYnBoDOhTWkbCSGiPwf25s70zL9/gjBNQHNZQk1xO
+At5p1901SoDjRJjSP7N3ULT9osd+E+BmdWPRqnICHioC6A8QsG4sbtGpIB4o
+jtyZx/lGgEZ/7u1IlUl4lf6o6CeHgIH0jmu+EaOgN+EbpMwmoPArFQskRuHX
+PtXklSwCQrtW7vO/OgL90VdksZQA7QiB497aYfj+s8Q1uogAv7fv+ftNfoO6
+fVuydAEBzAElhwN2g6BhNyxbl0GAffLUM4ZlH7BOf557JJKABSt8YgO4vfBQ
+z3aIiCCgjCXpMvGgFwycZiTPhRNQeWrjfV/TXtB+wvtUeowAlbSndKr5v3Al
+6bindBAB+i+O3edWd4Noa06z0Z7Z/yXZMkaOX0CQPxb83YWAmG0LwhV+fAYy
+/7gO+y8CLu2sqhCnfAavV5U5f28iIGc5/WxdSzvYXevIUnIioOYbS/Pl0U8Q
+mL0k+xAQUOT8vLjpQyvEzHX9sc2CgIAEu0UxIe/AYfPNLA+92XzbhDdxHzlg
+UfdrZqUuAWmMJZaG9hxQDExVW6BDgFT/9fzDyo2QWmnr2qRJQIST2pqBngZo
+Vv+telidABN2W3VgdS2Ellyk9ysQ8JqIG7706jGw/uc6SEgQMCT/ZEJr+BHc
+D+jcIzHL1xVoJoPLHgGTrqi8mEqAa0rKM150FXS+b6etoRBgEVdQ4OdeAbkj
+zVEJUzwoJys3nWeXgT9TQn8Ljwep6iZFhlAK5hr8zDAuD16F7fIIaS8GZrWb
+fNYkDzzGeRSWfBF8NJ7j3vaHB0ey9mz8vJMBvhTWgeBRHjQ8SFEarM6DhNgY
+K/oID4bP1qhdVc8FxtuyRTXDPNg24yI6LcqC0gsGNXK/eeBSp2VlOpQOm5E8
+Z/OLB29SKSLxQCo4tOq5HB6a9RlHt7tPngHh3XFxziAPJLovVfcrxQOr4jKz
+doAH/wFUSmum
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3922#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJxdl2k0FPz7xm1jLWuW7HuU7I+l0v21F5JsWbILJULKUklFKaVCIdkla/FU
+JEUoWwvise8GWYZZzIwxjF//t//7nPtc535xnXNdrz7nlvO9aH+WhYmJifp3
+/0///7wODBnax9gHNhbxCuvyFlCkoj+kwtAH9ldJdwUUnIHE7jWoxrCE/A6R
+RGuFANBU2dV/hHEaau5OOX1SuAKVGtnt1xiBkHNU2uaJ4h1w1I4vurYTBSIc
+B+M4lZ9BT0Ev7hprEnjzOX49oFICLseky6vFsqC52De5XbQODuIHsLc+FoJ5
+dBEJq9gMjepWjeszpXDpzelqUnYbBBg9yc2vewMm4snJvTd+wPagu7+owlso
+eqZmlULrAf/9WYHePbVAFpAdrpvrg3ntxuNNaR/hourYMG/DAJTtwXE9Q42A
+tVzSTncehpUTGMspw2aQnQ0o7JAZA0kVmVfHbVvBDuhyCm8mILg+dJEj9huI
+xm+LtKRNQfL52dp3zB3A4jV4XGZuGlyYVz/kPOoCjc99n5+Jz8Loyf17x9N/
+gs3ZYRcPfyxUWZdnYUJ6APnH5WQUzsGtn22X3aV+A9+oP+Nj2zz8l8BU36Ha
+Dzp1VTwrjAU4u/Tr3U/7AVj05SgMkF6EOaPB9JmdIVgwH2c9Zr8ESdaSOrd3
+j8HR+C97X19fhge77Jfv+05CiEJpi2XaCjxUHf2qGzEJHDZ3Q2kZK1AXRR9b
+vDkJD9VwuyterEC6v9fm5YJJMMspV+EtWQFPEwFL0elJOH3owWDfhxXgSMst
+MdOaAkMdQpDHxArY3HvPZFY3BZbPfUeDVXGQMf9tbdfgNLRlsO1LbsJBSun3
+jMnJaVhsvjS/0oqD3Lc2LR/+TP/V09W2HTjIjsptiNuchqFprL9gLw62OXt5
+3KRnIHGV4vZ8BgdKhOBXjoEzMNoo9b0SswqvpWu0HzNmYB+7iO2E9SpA7nte
+uikW3sbr59wbWoUapcWwaFssQPVo98jYKgifuqDKcMHCkGajotr0KjjGvvoq
+H4oFxbVFve7FVegykvjYm4kFFPeSU5S+CjpKhxK617Ag5WrbXCW1Bmd5/Ujp
+xXPwu6vy+abvGuzpSbjRd2ABSj9YsaqtrgF3zIT1oOECDATa7PtDXAPJHNkL
+fywXwDgNMoqpa7DUn0vU9l+ACP0x9UdMeBja80g5OGcBRo6r/uDmxkNM6bxg
+jOAfyIkdr+aSwkO7hER5FscipD1sea1iioe1U/XXFuSXQURhyIn5MR6StFlf
+vddZBvU4tfsmqXjI3zeckG62DMnjleTb6Xh4ccumISFgGdK3ay5xZOFh8Cam
+UatiGbhWgkQECvHg+uo9e7/+CszvnrTReIcH3+ByItETBwkGtsefD+EhsUUt
+mysCB/KmHMqzI3jI43zmqJuIg/Xr/RZq43ho8vtwqa0CBxxw3rlpGg9OjIjW
+KRoO8JFD9X+W8PBRCx/B9XwViO+NKMe28XByd1+FyPIadN8Mu2siTwD+goUg
+X2Y8rDCZv2hTJMD1K++7LHf/vS92C1rvI4A3AzNhpIQHDt6CfU5qBLiRnsA+
+4oSH9bFXLKF6BPj8KV1nsR4PwmILe95aEeCqiIyBcgoByq9lpj26RIDSWf48
+ejYB3O4X6cpdIUBeBWF2powA+VLytm+jCZDaeC554RsBWJaycEPXCXDXqGn7
+B4MAIZwZ66pJf/NZq00qRxLhWO7o4OwLAiTvaqFIhJKAxm48+amNAJVCARXK
+cST4jjs6bN9JgC/K5lqWKSQ4tb/FZ/E7AVI8cly7XpOgOGZNTqyXAEv8Ur/H
+8SSIknOKvjZKgNV8v0jvmHU4qZl5wgdPANPQdgOlHDJYu54JKRQnghln3Amz
+ajKYTyYJ2EgR4WCit/uNVjIoC8z4UWSI0LinycpqiQxRSfGiJ5SI8MQ0gGho
+SIFP7AXDLJpE+GZqZF07RoHPZPfOx+ZEiJg31qIc3oDMZkzz0XAiWBRZatw6
+tQEH3JvxPZeIoEpkwx8M3IA9MyvDfleIkIpRbJlL3YBzx1jHk68SYXxIhWdi
+eQO4g4u/YROJ8CUxPU+9mAZleX3yDc//+tlf2/lr0uHrvaV7LN+IoKdrxrhi
+RQd37myd1+1EqJHDabz1p8P2tmKjWxcRcBd/pJVl0QFz3+pqbTcRfn8fbcvE
+bIHkMb7P0SN/+zdJfRqc24JJ28p8VTwRirHtdT+7GPAUH5FsKUmC6Wj9qFQc
+Azwryc9sZUjgJFEZmcm/Ay71RnPO8iQQupMyfP70Dvje4nYIViGByYfg50f+
+7IDQsNTbIl0S7JvQ3J+dzIRMmDqfOJ4gwbWXgfn8Q8woM2/EsuMGCbJlA+PN
+V5nRcPqg99YtEkTsTT1eysaClOUO82rfIYEqj3kFTYsFvXBg1i58QAI915qi
+kRQWxG5QQHiaRQL+uL4pIXtWNJfZyfXrLQnSzsxNdLNg0M/VtZ2MRRJoZMTs
+bEphEKlqV1LXCgnqlUX9vQ0xKMG1oJuxRgKvwzFvx8IwqLHZsPwChQSy7bF7
+3sxgkJfe3iUP1nW4y2nh4PObHW0aXMrIklqHGXIZtm+BE7WfvZj1yGEd1qb7
+pnp5uNCJW+FszKfXYfDk4qqSJhfCRnuURrqtg+ya+Kf+GC7UeWKk0tdnHZ4W
+8t4NEeBGZWyBKm4X//rdBKTz7XnQa7t6oYbkdbAsQSETyrxoxiJ8MahtHYw+
+9/YYnOZFFkbRcmJd6xCmtSImlMSLnPcHy3T9XIcycYdq22Ve1J4pl6j33zrs
+INfToh/4kM2CTLEWdh0kJdL4ztTyIxdN195aFjIsZbVoMvXxI9naDO+n7GRw
+6v8kQ17jR079r6WjuMnQvMPhNrBfANk13zAzEyRDCcHH9HmxAJqnXOFglydD
+99Zebc8yQeTsvmqsbkL+yynp4JrvgijwK7ebqQUZvLR73C+sCqKS59WyZ6zI
+8CLwlabsP0KI5yoaz7QnwzuTTZOadiGU/OeTEPIjw43wtjfKrMLIfo199kQi
+GcgprVL6s6JoaKB4seYHGSZMDnOxSYihoHJs0vteMnCpHVQpcRBDTXPqck0D
+ZOCzUau42i6GKGHlCdgpMuQRzUVW6/eiP9a/pGPJZFAyo5WE/5JAs4dE8dMy
+FHjk5LH7j7Akql95qWurRAFhqsz2PU9JVCMq/qF5PwUGnA/WBJMkUXaw70jj
+PxRgXIjTD1OTRifPsxzZY0OBq5GOr8zCZZEYp8otk1gK8DItvVfPl0UxQfQ2
+9XgKHD52+jyxWxb9K87NULhDga3P10olteWQX4pRq2oqBdobwhrzmOWRXNzK
+qZJyCoQ+NHBS6lNA5rM+crfHKfBygimiSFAR7eeb5uXDUmDEalsu2EERtWMU
+LUqWKHDosqjj1pAiCpvZMadSKRAtfe/bEbISInf31KgIUQEfPCGpd00F/Q4S
+NqBYU0HkyohZQLcK6lLe/NVtT4VQ09p6T0VVZNw5KlPrSgXswf72iT5VVJ7e
++rUskApOmyNV76wOoPtnUgx0Eqgg9JvX6nPVAaT8JOFddDIVvHQtVLiE1JDS
+itiHH6lUkK0TkX2HVUN9ZbtcCwqoUNL0hnS7RB11PM66zPaFCh8j23Z3S2kg
+trdnMr61U4G49NIDk6mBEFNcZEY3FSKOPE37YaWJ2CiJeaGTVHhEb+nSOqOF
+xrbyVkg7VKibvrzv8ZgOyrbkP15ptgFLv9iVR/V0kZOd9uOiExtg199d/SFN
+F9mz8TTUOG+AA3/3zzSnf5Cr4X/v95zbABZ3yQjClh6aGj/CYH20AR6VSj74
+UH00/dKMszlzA8IdBrHRWH3UJJPlnlW4AWLdGfqtIwao0vFkaG7tBuywmbxj
+oR1CQozhuN1TG8CzAIkcDw4jb7vlpbqlDWj1mbTmVTyCKv9c8r1N3oDbHQsB
+wv5GKNvYZzSehwYcmjukb8II2ad/qtAwpIHXpfMj7FEIxXJOUOlmNMggaVuS
+RhGKn6zaRbCjQeTBoJ30GmO0TfXSdztHgwYxizK1VFNk5afAbPOCBsuFYZN2
+8mbIwsvIJr+cBrixoh7hejN0NFDHSqueBo9OvP9tsGWOZoIUewUGaSDM3Ct0
+r8wCGe3rHT47TwOTaN3j3l6WiEf038wdMg1Q2AtF5oVj6ICfcTavyCZQa7kO
+S3w8jg4kzV24p7wJRTJEEe9MK5QbYSzipL8JndS9jC8xNqjdWBy77LoJaj03
+Ujmv2KF12qEn14s2wcLvY4mq+CkkuTaoi63dhOnIwoKbHadQFu5ZdEPXJnhN
+rEZGWjogx7Nbir2kTTDOl/KQFXdEDoKB8hJcdJjz26lTozuizG6drRVpOlw8
+spLBsuqMjl0bCjOzoUN22eclblYX1DhoenvYjw7ldT0uO2quKG/U6YbwNTq8
+TxvobO5wR7+4zdNLX9NB6oyd/zx4oFH4sr6nkw4vSA/efBnwROFZTMwOWDoo
+iGdKPTT0QXo5KjqxUlsQ1CtaTkS+6NDwo9qbh7egipOGyfXxQ0+vcm5luG1B
+UVlOASnXH0VVj3n1xP7lpvcXDvzWWSQomuGGXmzBd28PjePxgejePzm9O41b
+wOGfUpWpfg79brSOUp3dgviwVpq5SgjiPDKA1dPchgpMkvrNxIuI47Z9rq/r
+Nrw6ueorszccKeMUZ+8lbEPhs61TxbkRiE8ZGz5Rsw2Bh/jY7pyJRG+qvR9n
+TW+D39fP+p6eVxBHw438bSEGdPWn+5D+jUavtKMUXY4zYEZfrdYx5Criw8i5
+st1igJKrxofwkji0fO5dTmgjA0aNP8bWwU3krBNGE9thwOWzvfNPUm+jnK8Y
+/QKzHWDgYucazt9B+otWNp2PdqBnMCB1jXQPyaDRA7end/7+fZK7c0NSkKfj
+wHy8FBPaX3eAz1MiFX0xfWOwaMuESPkxAd6Ep0ilJbmS+Q4TUrHbqLyvmY1C
+gvy7NL8yIXq0T8puhwJkttflcBgP819u9Ty4OVeCLPpuviv1ZEaJp3ufq3S9
+QVubfKq+LcyoqPi+ZWdVHZqKTpc2PMqC9rucfby3ohVNHcnXvDDFgliPaVR1
+dvah5TZM/sMOVmT3RPbgr5xVdFixSt3JGYO8O7z4IY+K7MJkEjipGPQ/QPOT
+wA==
+ "]], LineBox[CompressedData["
+1:eJwV1Hk0ltsXB3CzQsiQscF4yRUyT+2DTEleFJHMGeINJVMqKVwiEulKplJk
+lrHIWEiTsVDIkK5Q6H2edzD8nt8fZ531Wd+1ztnr7L2OlGeQ3RkWJiamV8T6
+/76sdi0h7zaOOAqGvkbQ2NHq2npsv+Q7pMPmSj7oz4rIizQndYc21Jg6Zfa+
+ggXZXvivboGlDuFzqnJn5ViQ609PUR/vcpQ7Hu1LamJGhZvD8k2dRSisIlX9
+gTszsnlacOhhXz66mxTV91SYGd3n1Wl6+jIbeU8lGP4ZYkLqsUeHgwcyEf8h
+hptMDhMS7Iw//1shHR05Ehqe5c+EDN/2pGw23EJVe5ZwaQMmZJn7fFnIIQkx
+uz+enRVgQsl2KuZqn+JRq/Bbec+xLSgTydiVwnwDkb1UZ5gztyDkNFf987Jr
+SGHZ6/XA8S3wfbWaExF+FcUHmhf8JbYF7kkSD0sORqNLfLnx579tQs1u6Yf2
+AZHohHJBm2H5JrAJCgX5bA9Hz1hXHslHb0JI4m8hJ3ookh/Krh+13gRH1eiB
+ZyoXkJGBcj2f9CbQROoYWgbBqOr6+3yR/g3olgq83cl+DilnCKD40g3INyWP
+CX8OQA6Rt2srEjbARXf59K05fyQs+MGMfGYDLIoc+bnk/VDfUOSJwsMbcDAh
+q7k93QdlHmdrUZPbgFeR7K4c8mdQDf+MEwvnBiy+FZLqKPdEHuvpJnzv16Fu
+YmRbZbYHqp8S/yX7bB300pdgNNcdyQTlsx/4dx0+nJHeS391GmVZenhN+q6D
+8ccXgg8NXZBEI7M9mbQOm+UStlsDzqhwmq2+SXcd3h8qtva1OomUFNccvHnX
+YcScKS5T0RH9YP88WkljQO5yHuOhhAMSXKtXzZhjQKWEhSlZ4zj6zaQrvb2V
+AXG1dm9e7LRF0z6n5hfDGTB9SnWU5ENC8dVffUx8GUCrLirKSrRBrN+T1Fkc
+GSBhlabAqWuNUr9MWj3RZkB4+V7HOStLpHhcJFVmgw7/8EzWaAdbIN8RL/Kx
+X3Tgn9N0u5pnjn6chqaub3RwrnQalJA0QxvW1bX/dNPBTMUoqTXaBLE94clU
+vEsHI9n0RIcFY8Sxn3zlURIdvDZNGwxcjdHzYD95h6t0+GjLnZTiaITmGxbH
+HPzpIHRsM+80H6DXzxJ2FwId7q7/FFozPIQ+lB9+8liTDovW0bwPQg3RPcNO
+/hElOtxpJ4WkUvWRbPtUXZUoHc7q39m/TNJFV9b4j2n9oQGZtDN2rU4H2Tib
+R53/SYNjmj/4vPbpoHd3WwT6p2mQlxXrc4NNG11QF+Fa7aeB0uezeDGrJpJV
+LD9VVk2Do0OGi851aojzvyPWXmE0yInXPJnopIZ4TE5oBQbRYG7WmTeAicgl
+2XKT/Wgw3lKzd+KEKsq6OvB95yni/jvPu1p1D6CTLZlyUkY0cBVQiFcW3I+E
+uv7uWuOngemjcOr1B4pIIyzuPnDT4HDZ6Pyn/Yoo7WtEYA47DUz8uS8KHFNA
+JVPxTQl0KiSHXGAY18ojR1zoqeQcFQQPnUyiLMkgrd8WrqwtVMhRKwsLyJJB
+8SXaqiMNVKhNupJNN5ZB7ROkbY01VOBU2Unely+NYsa5XzwppgKP5zTrQLAU
+GiiJEVPNpMJcRw97d+seNMdyTaU6mAodd6jiJIs9qP+SaYdjIBU8usfrzw7u
+Rp/VlXu3+1FBcettJteKJCJJS11KdaOClUxps4CFBDKuSMuVtKFC9luVMZaT
+omjvlJ+3uCoVyji5PyqyiKII7sos77+p8NaEfJlWLoLuOg13NyhQgTemRdiP
+SwRxF3vkREhRQc38pY3fsDDixP+UuAtSQStF1EiiTBAltQbMVVFxSK/76vxJ
+kR89W3rKVtCDw2GeuEtcND5UWxj7L/trHARDbD078/jQ5LYL9kGdOOxql5VW
+W+FFR34xGLYvcYiXw1JMH+5Al5QnbtvV4iD6rdhSDLjRp7EXgpoFRE5KzrY4
+yImCng44Kl3B4VNy6Pp9KgfaV3NhUSIah+CJx9uqWjlQv1KyMn8UDu5Wohw7
+SByoyNo7jTUMh7Iv+tXGkezowUHzCaFzOIiRlaMFfrKilGAphTFXHCz7Gv7u
+1WNGfscTrJuMcThnsqj/nJ8Zsc7x6S4iHJSZOyfV5pmQ7KiEozTg4KI0pliW
+yYT+FGdz39PHoTs8WUF2hfhnVeuvFWsQ+amPTRPFG6AtZnnU8S8cGrK36VkQ
+c+zdwMf/khcHrZ9tqV3hNHh+759vljuIvIXyefYQDbLsq4U/c+Mg9E51mPMD
+FU5NTKQxtuEQWXa9NgvDYbwj0ciVFYcxjtcVzB4YtI9yHrxFxWBpJtZjMnMN
+jrqkK0fMYhAbq2xUT16DXYucuUdnMHBvptWsmq5BVcviB+lpDO55XJXOwldB
+ranJf2gSg485OgoBbqvgvc1c8Og4BvaiQ+e00QrsGT9gmTSAgZxKbhHLlWWI
+XnJV/7sDA3JTn3cp6w9AHmPVAUUY3BE6Rfo6Og/s35VknzzCoCIvusKzah6m
+bqP4mYcYhGQ0hni7zoMSl6SgWyEGleL+Qcovv8OeYjlpjzzivB0u2grJczA0
+VPos9V8MFtorht+7zMAaZ6ti8i0M9jGLs4m7TUJI3sW2+iiifmQXESI/Cbua
+xQJ2Ed4eWzygsTwBJeNyfWGRGPyKnVJhXJmAAxTOx7oRGDxTt1o6W/QVNvGQ
+gu6LGPgHTrezsH+BNMaBJNYQDCT65L5tbhsF0yO7yKu+GCQuSW120wehr6t4
+PdARA+MmL3Hh0UHg5s0foTpgkKFpVpnVMAh2LsAfR3g/asnVvzgIDuei8nJP
+YDAgrXVsbXUAfG/qiI3YY4CWL469wfvBWbny0wkSBmGX6hLTZD/CE+P0vDuW
+GHDn7zD0WumFuUR9gVkDDPjV3Z30unrBfM9y0A3C5lFdfbZZvdB1RpJFjrDi
+6OYfONQLaW/G2n30MfAjH3HZkdoDAvVx+Yu6GOztmL3GZ9ANlcnZ/szaxHtf
+swuNaHkFHZ1Ls2nqGEiWLiFKWxfoofaXVmoYtNm0xPLd74LB3K66FVWif24c
+3acvdkFiRXN/FuHCWv+tjP1dcFLoRdisCgYmPmu/vLM6Ia7vlN/VAxg4hjjQ
+jKM64O4SNf6FEga/3yZ6j3q2QcXlgApLeQyOZsU/kEFtUNX8TnRRDoPh+197
+8na3gaFOcu4twvo3ZYycalrhl+NO+qAsMa/CPkZ7il7C0QWmGTcZDP5a4lt3
+y2kGzUZDnuh9GOQVhmbeetcIhR6J9h3iGLR40FYD7zTCqHiWhi9hsz+6xjlO
+jbCSEC/FQ1i1rvTRz+8NoMqlu9tBDINQs0FdYG+AKzGWqQsiGAgfs1s8QqoD
+mgSJLiSMQTVJiLlKsgayp1e/BfJhoG7AZ8XyqxpivzucFyWsMKCIbrVXQ12i
+IHMXLwae8W/HbH2rQVjJRFSCcPmBzhdX6qpAj2wk28tD9FvrTRWpsQIiv9T7
+y3IR/fvDTzIqKAGXUvq5YTYMnmo7S++1L4HS0Hv7YwiPSqVZnWYvgcP1vmP7
+Ceuw2sRRzxbDUL+3cAwrBrbaiH5f7wmYnQ/8rciCwRvpwQXZn49gyQ7Do7Yo
+MFI71zKWkg8UlX+M+OkU+Ou6sDqHST6gHsGeChoFhraaxJRX8mA7bqZhTbhO
+85hYd28uVD4SaU6kUiBwVSbX4EYO8BhnX2HGKbBdu/+N8u57EGPXGflzjQLT
+n0YqZStTof4qc+njJQroLbQnUqpvgey0h5IRYZYkrWDh+hSwFbkeN75Igbui
+tT16HTchUfn+Kz7CD5IWlOb/SwB8UiMgbIECuk4ul5QvxoA4k8uG/jwFMlS5
+CmRErwLj5uVfg98poJHJFUOyuAxFM6/qAggzhKX0eysjIfN9QEv2HAXcX4vE
+f84+D0U9lyuxGQoUWIYme48Hw0q4qW4K4WcJGjqhBufg0OeoDBnCzRXRY/4n
+fOHdl+EWm2kKyAkwpT754QWdGTY3574R9flTG11j3KFBdlLhEuG96YWiArrO
+EPQ84A4/4Uf3HVNRlD2Uzf5rODJFgf8BaaHzUQ==
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3922#2"]& ],
+ TagBox[
+ {RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJxdVWk0FfzXRVxDRcicZKqoVIRS7B8NlDJ7CpVHCEWkMiQJCRUyJdIkFSrx
+CClJEjIkFBqIhEzXnV1TXv+v71nrrLP2l70/7L32UT7ia+POx8PD0ze//7v/
+f0a3pZRdKpKBVOFloZkuXTzLFFKJLlqFa84PZGa6dmLLnm/vYor0oa64xG6m
+yx5lg6rmCUWmWG3xaudslzsq2oI8c4v2Y/3r44t4u8/gzFRRj/hzDxhpeq5a
+0h2FoJuKtKLiQNA3C6Tt7U6F6uxd/ZTyGGSo2ud11j/ECZdbQpJeSTjHSR58
+MV4A+k/IFTvfQFHDy8pc5xKsdUk8umzwNgzvpC6uNS3Hz/Dih1kxWQifdWj5
+MFCJZwVHSgRHH0AmYeu6GwPvcPVzYr+fRS5WXEnICfhWA63acoGNl55A+avP
+zSe3PmC726VviQsL0Hlr1HnznUbk12oM2VYWws2fuTDYrxkqFnZRXwKLoK2Z
++NREoQX5yw27l7kWY/jhIXPb261YdJwt17qtFNrM434+wp/B6+FVtdm6DHHF
+EUyn1C+wtc9+l3TyFZZa/Yh5vKwDSuEKGmsiX4MTfNR6w9VOBBQ7xBf8eAOT
+txT7AcVv2OHVvylU6i3y1XP4F974jmsf5Bw3e1TBZ/p75l3dLnzRKU6JrX0H
+naMCJzjN3djV654YqP4efyJXzIRq9KD3QEF70qsaHNcX+9A+2wOvsJ57L2zr
+8Obrbvfyml4M3t844LGgHtTylcHe8b9wTkd2TIC3ESQrm3X6WB/cw6J+G4l8
+RCPliZDD1t8obdytssfwE4K4QvfkVPpxLkBVRyClBbNWhlqZwgPgcXHu15xu
+Rfq5XP+UgQHYVB572l78GdbPCr3O/RjEGe+cq76J7WhKC7/cVPcHzpJqA61P
+O7HiyOCCT6VDSMheolbs+h1hqnIijdXDSJPTcb3v141lyqHGIfUjeM04ELY5
+rBsCG13LFzSPYCLE7/i3uG4Maa5XjmsbQXFSz+SOx924+CDkcdaPEcRKveor
+GejGtIJWZyd1BHP0jROK//7Ed2lL+EuOolTXxqpSqwcBCmO/Dh8ahf5+P+m8
+7b3wfhzCsWSNgiT4LNm+txcXjNfsqeOOwjnCWvS3XS8e/OZmGM+OwmRH/3aj
+o704K2Olr08ZQ2/Wky672F4UWnb4a8mO4ceMibVUSy8O1G56sW/bGNaf9TTf
+5vELEf56n+yjxmDtV+C/vbAPfsk7uVXyVBw/UJm8pLwPCbcyVh9TouJJdjj7
+T00fDkWmxUqoUaGeFlX16kcfSp//7T26jooh/YrzI0K/IeAruWg5oeL3Dqme
+SNffUE1WNa11p0LAXbhM9X8+2Ve8WfwfFU+/5Z87r9WP1ffN9nWVUKGlOCgy
+aNCPinXO2vmvqLAxtPnda9sPj/fRQnbvqQiwM1ENv9SPvnPXRQo65/WN0reH
+UPsxZf0zI2+OCkXrez5S9QOIZtRTnluMQ1z4qmDi1wEcZf2IVLQbx+U8/6YV
+QwNQ7HNpjHEYRwIjISRUaBBG2ZQ6N7dxUAxnG9abDUKXYputfXYcQo6GzMyG
+QQTTPrSsejiOaFOJova+P0hJe9gWPTeOrH2KZWs5f9BwKiAyjY+GViP5l5lC
+Q0g/kbzKW4AGt5MesQ3rhsCv65oiu5AGzAVeOhY8nyv3abXz0jQ0r2mx7ZUa
+hvxXY8vQdTR8Wb2K4+c+gvGc1HL7gzSUVnQt5T87Ar4KVpa8Mw1brkmynseP
+IH9NfnqPCw3yW6RYfi9GoJcc+drXgwZ3nxoVh8WjKJ+I47/pT4PZHGVE/fUo
+LPWtalfG0mAneHf2hd68r3a8xxRLaQhgR/+Mt6Si+p/PKoIvabggELroqicV
+7bt7FRjlNJzUuFM6m0GFnuipLw1VNPgW6N+r4x3HT9k31+M/0jBTvpvftmMc
+An5iPTYDNKTP1F9Ma6WhfIVdXZ80HUUh9wXV+mjIv9Kss1WeDjsLsdZmJg2/
+U9jOKYp0GJnNpV+SosOr9qLAXjU68iXvVZ11pEMzVKD900Y6eLV3rvs0TIeO
+/82VOvvo+M5Xe0FiNRMue6NH/KLo4NkhqmduyER89nkfSiwd7GDFwQIbJqRC
+GLK3r9IhMGt2XOA8E3715dNtyXTUn4l/86udCbN7y50ds+hQNKgMZSWykCbf
+q/3lDR2uHqrJG7Q5+FfRf13WDB1WkR/r3u3jgH+LmOApHgaqeCWUbnhx4PZ+
+OGIXPwNhielPBbM4kKRJB7AXMhB9qLFQQXoCXKfS7lMKDLy5G7eFtpALy7+9
+iRMGDHT166oJruXiucc/y9lGDMgb/lX13ctFU8TBR2wTBtycTgvrx3PhsVCl
+bm4PA5yYIp06qUm4cwW4m50Y2NyYKSGhN4VkByf6jnMMUD0rlrc6TSE4adW/
+Zy4w8NHfMYsbPgWlSM0tuRcZ0NBmOIU1T0Hj2VEzhTgGbnf9PHXPdxpaNi6l
+GrcZkHktz3r3fgZOIvGiE5UMPAsPEfnbMYeCjT8fJAszoXM3ydZGgIdwSyLz
+6IuZ2JPu8pi2nIc8CVn8zFaCCWXN40GStjzkqk1It6oCE6yIQhnpNzyEnbty
+jL2WiaApR9beR7yEUmnC9bJmIm5FUAjnPS8ZrplsXvQPE79ib6fx9fMSiysX
+bZ87MnFlpvvJbjU+cj+mI17cjQmfmOqg2kd8ZB326VECmWiLE+veXb2AtE4p
+0vpuMfH6xpVtIsMLiI/Xx+yOLCa6Q16oWi7hJ2IdlJ5Pj5gIX+bL9TvMT4Qa
+Xqz+XMjEBLUuwIVXgISvCalTqmHCqUBiQ4YbhcjpJjl8G5/X+2PixZdCIWEx
+4y5abCY+3EOJcjWF3Cr/sCh2iokCU0WH1JWCRCzXPNNGgIVmL27Oe5YgeX5S
+jrtZgQVjuU1dji+FSfAvz0dHzVjwT9VPOj8jTBr/iF58YsHC12VhvO0QIYOD
+AaPTdizkDGwSIvUiZNFsJrXUhYUKg5K+cepCsqS6pCYnhAWXv28CcUGU3O3e
+I5ZYyIKJDTV17qsomf0QIhrxgoVrKW2MG7piZPap9uawNyxQU8sEExhixLfV
+oON2Ewumn1OVr1ctITNl/ygFD7Nwc/3Z/WvjJYjCV4ODTSvZMHbWOPyySYJo
+WzxouKnFxpmrj1AvKknSHfONzuqxkeToX3I/VZLs2CPt6rmLDfET/hsaSpcS
+VXXNWAkPNvp9fh9m8EsRHdGGES9fNqZjrPsk7aTI25wJVlsgG/d2OnxN4EqR
+Xk/mud4YNko1bAzuH5Qhy0Uo6WOP2XCO4slvfiVDihbDtv/5PPaYsbqvKEse
+utwRZr5mQyUod+zxkCwRdzU4YPOJDZMlyn8vPpQnZWmn+rQ4bJiHF9xc07ac
++AXtzfm1iwNzCAdePaJEqk22O9ZZcRC97X2rD0eJaK91//bBkQPfWeEuXF9B
++lA8p+LLwSWKnL70qDLxvPzsmEk6B7KZT60HzFRIJBllyGdz4O608ed4jgpp
+dis5LfWMgy3Mt542p1TJ+i0ikqffc6BwV+D7ET11gsHOh0wmB22dch2zhepE
+den6/Ik5znyfFtHctVeSvzituHLRBD6ZROx7arKKxFVcsxVUnwDvwJmv2bka
+xCTn1kE+hwnknZKVUbDTJNSqkMsXjk6Akue9R5yyhuTdsBbTPT0BYZFf3s4R
+a4nYgPhls2sTuFzy7x3GyHoS5x34waZhArLxYRfb/DaQPYn6ueXfJsDeqqwy
+SN9AZq2rL50YnkBrQFpkjJA2UTbLii0W4SLtqpOB7B1tEkBZ89ZKgQs94czy
+QUMd0rqwWpnM95SuELnVdX0TuTK29ZGGJRet9pI1wTa6pDKaP3KNCxeOkkpR
+O+X0yIlNLXPXTnFhY5QRYtyoT8TmhE3S07k4axpmJD+0ldDrnV9oj3ChYVq/
+X0zJkBSaH6nq45nEfwmzP72PG5EouTKVVTKTWNn4wuJIDiGHMrY/ido5iSaL
+3Ta3A41J5wpTzn+HJjHVdGllxn4TYm8cypsWMInOpf16xdY7yBm7c6sK8+b5
+lPZ/i/bbSWrES/p4aiaRHF334HbuLjI1Njhq8GsSFBth9UM8ZuTI8eFQ37lJ
+OLSoGZUF7SbLVHRiChSnAJ4SKUcZc1K9Q5UpbjgFZsXSnoreveT6kPxg7qEp
+fFI7LHDnshXZIvonpC9rCjvNX3ZseGtNHqdlP+WrnYKs6ZGeJEVbcqB8aGfF
+6BRi6M2hlg/tiOH9W6u2LZ0GmzHT4uv6D7ELn0l8ZDgNnh7ptOHDB4jpIeN1
+2l7TqF9aF2rwwJHofx93kkqbhkh4ovK6XYdIy2TTQHLtNJTOLtLmW/MveRhn
+rTIzNY3RKP5FsRMuJCF1RVnexhkEMk/GUeTdyJ/L9xxFvWdwOIKt+i73KCkY
+9M57kjeDJLXDy1NqvAj/xpiZ1dQZREjf2M/K9CEpMVUl+/RnYfFXLt1C7yS5
+z0x5Jhc9i66D+o/f7z5N0j7ibVv3LNQf+5TesAoid1c7Oq6eT7Uc9QeltTyU
+FLr/atn/9C+eS5VtjXwYQUR3ZJtFaMwhPSy9XUQzhthM7urSLJuDf+W53vT9
+18h/5oXGqRt5SJ1G+w/xoDQiInf4wr70+T/iqb6vwDuLbAjxW3FTkZc0/bda
+3LKqgMQz3a0zWnnJNYm/q3Vdq0nr7uCpJaN85JKpfZaYdwe5IG2fIcnHT/4P
+ohvibg==
+ "]], LineBox[CompressedData["
+1:eJwVkHk41Psex8foaoo2e7bIUkN6JjWZiM+3HKayjlu2Ials6Roq4yhqKluy
+RIe599JF6rR4GBdDIbJk63BslRnFsUQkW+Y3G+O6f7yf91+v5/163gbnGe6B
+eBwOx1jP/3umSs3zrOUndHdg0/D5v21AD4qiCPRDlSiEsYFzeScefVgLrNZp
+fILqbhPda93lUIua1+V9fv9CFcuWJvhWHNoySRv1M8lE+Zx65WlvHDpopeWZ
+1J6Mekvc9j/G41BDWMBFn5Y7KCRxlX3z6hrUEH5h5YTHoUjqYYsGTAZby+rU
+B7nRqK5Z0XHtngyGFGbr9eKvIpJ3I6+bKAO55FCOkncEyrlce6mmfxUsbTm3
+9nSGIc1Pxld+JqzCJefEp1eng1GZad0dbVgFewcKfaHzImKv0OQMZSsQf0SB
+NWJ7HqX0u7kebFoBFtvqg7/hOTQ/cBRXkLICmgojuMoGX9SnbZ762WMF9MOe
+91u0eKNr462CayYr0MwPlnVRPFEJqz6cIJbC+dz+R8mEM4ha/NzPvlsKoV98
+pqpv0BCribTIuSWFjVfGqiwJbuhRYWxNOF0K5edeMkdZzohVc04Fo0ghfume
+U6q1I+qY/7mgpymFY88uxRWQTyJGyICsVSSBV+zmD+QgKjqTrDP5J18CAh6p
+YeqdPQox8qjSq5fA0Bv1K5OS40j1YMkNUrIEKCd05fNaj6FJnIjdGS4BIt/l
+5GwJQvrWbGcvDwlcM3D13Jpog9rvaPO275XABzM2KeSTNTI/PuOmryyBYofp
+UWtHK7RcQjg9uyIGlZ+ZH6NTLZGXxiOnjAExHDp6ZH+q1WFUuI/7vrpBDDHZ
+ZBsleTIqzWra/KBYDObW1SVLgxYIfzUAR0wQw/Rd3bTF0QNIPWyb9eAVMVww
+ra1grpCQxCpUXTVADH89+bijqGE/mmNy7quBGPLaNlhPOZqj10sfz3TvF4NG
+uLvUfcEMyfsEbZLoieHem6FgbgwROYr1jLJxYsigkvLYAcbrvoX23u0iOLl5
+ZsKFZYRCkncUGNeK4Guv9OTDYkM06d2ZfbxUBOq1C4eOGO1GT0uJ1QHZIjhA
+zH4RrbwL0XDOSpNBIgh9UgbzP3TRw7gCpSm6CESaAV//+0kHERiutw1pIiDd
+CvNM79NCu7/dfe5wdJ3f8M44wk0DRR4LuoZXEwE3hzoam6yOnO6u9b5UFIG/
+BUeAOtRQ9puxVyy8CFZd/k7HX1BFgSZNeZwFIZx+a1db+n0HiljY5IV1CyFq
+oNSG6bcDKfXcMphqFcLy7XHx4MB2hHPqGJDWC0ElPqSi6Pdt6Lq3ztY0jhDI
+fyxOuG1XQmXcrmhylhBoLT9mroMiIpE15s3uC2EoMvGFGXMzOtBDD4R4IRgx
+d1c2iQgoUbiHUcMUgm3UdxrllAJKV5DAnK8Q+nJV1b0m5dBaiAelw1wI+WnP
+LI9EySFV/RStor1CYLN6xs5ulENvjQcvpBuu79X1XJQdwiHZg0vd7J1CUFiW
+42wOXAVl88DVywpCKD6XI2/wiwgK7Nofj4xh8CxLSugqF8KJ1F35xcMYnJZu
+eW5hLASKSd+deD4G36TyA2WqGLQFv9L17cOg76Vf2UXtZRiT/VaX14SBTMF9
+kVa+AFOZ2imUpxhoOGyqjHZbgAScq0ptIQaSjEpc8+g8oPDbSdT/YHAjr6op
+LmIOzPS358SxMcDhj5n+Vf8d/kmYtfVJwcBn0mMtbeMU/Mh05ldHYiCyJcvm
+bk5CU1lUWns4BjX7QmiHxV/BR7FeYzQMA7XqNnkzbAKSzjDtiEEYGI0xj1Zs
+G4dRCUFZhY7B6KmtameDRuC0QfLaYQcMMoi/mWbeH4bqpYh4hh0GTJ0gbib3
+C5gN181yEAb+lv3UGI3PkOGuKaRaY5Di8l4nfRsPOpm6a70kDGIDqbD7dT/Y
+hfBmLHUxyP1R9XpUtx8Y7pA+poUBnrpL2pXQB4Oa/LSHmhgsUN1Nhs/2wmyj
+gyth/UfGv19MFAd3w81CXqmVIgYUh4BII24rGHSU55dLBJDW6sZf6n8HvJgY
+jRqRAIg3S7iawhawfq/X0YoJwCYl22njqWZozJrOnV8SQFkSj/V511twqFKk
+x30XQNOirU3sYiXI5++ZiP0igH+0xI7ZPK0AFTPywd4hAfB+5YVq+ZfDjKHi
+CJEvAOetho/tOjig37ZX99tHAWjQxm23BP8O+/oU5nJ6BOApDG0IIz4BFzL/
+s9KfAuCLxqV6WCEU1Tl0JXYJgC2jZvnSc0H2a1JyYqcAGIUFjfYkNqhDuq1S
+hwBMb1D8rTQfQtCbzD+y2wRgydfdWW6cDjHk1L2GrQLg0q/HJEAirPo+OlHZ
+IoD/AZPoZSQ=
+ "]]},
+ Annotation[#, "Charting`Private`Tag$3922#3"]& ], {}}, {}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{
+ FormBox[
+ TagBox[
+ "\"\\!\\(\\*StyleBox[\\\"h\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+StyleBox[\\\" \
+\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*StyleBox[\\\"|\\\",FontSlant->\\\"\
+Italic\\\"]\\)\\!\\(\\*StyleBox[\\\" \\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\
+\\*StyleBox[\\\"t\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*SuperscriptBox[\
+StyleBox[\\\"|\\\",FontSlant->\\\"Italic\\\"], RowBox[{RowBox[{\\\"-\\\", \
+\\\"\[Beta]\\\"}], \\\" \\\", \\\"\[Delta]\\\"}]]\\)\"", HoldForm],
+ TraditionalForm],
+ FormBox[
+ TagBox[
+ "\"\\!\\(\\*StyleBox[\\\"M\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+StyleBox[\\\" \\\",FontSlant->\\\"Italic\\\"]\\)|\\!\\(\\*StyleBox[\\\" \
+\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*StyleBox[\\\"t\\\",FontSlant->\\\"\
+Italic\\\"]\\)\\!\\(\\*SuperscriptBox[StyleBox[\\\"|\\\",FontSlant->\\\"\
+Italic\\\"], RowBox[{\\\"-\\\", \\\"\[Beta]\\\"}]]\\)\"", HoldForm],
+ TraditionalForm]},
+ AxesOrigin->{0, 0},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ LabelStyle->{
+ GrayLevel[0], FontSize -> 14},
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{0, 3.3}, {0, 1.6}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{0, 0}, {0, 0}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.875957126514063*^9, 3.875957152540943*^9}, {
+ 3.8759571847549353`*^9, 3.875957188180087*^9}, {3.875957249738762*^9,
+ 3.875957266071168*^9}, {3.8759573346853323`*^9, 3.875957362091642*^9}, {
+ 3.8762091314286547`*^9, 3.876209168479266*^9}, 3.876210214519513*^9,
+ 3.884690547837318*^9, {3.8846907344980288`*^9, 3.884690754914673*^9}, {
+ 3.884690931703446*^9, 3.884690938018208*^9}, 3.884691475790214*^9},
+ CellLabel->"Out[7]=",ExpressionUUID->"20c955a9-cd81-4419-878e-3b98aa44aefc"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"pMag", "=",
+ RowBox[{"Show", "[",
+ RowBox[{"ParametricPlot", "[",
RowBox[{
- RowBox[{"g", "[", "0", "]"}], "->", "0.373691"}], ",",
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Xi]", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[", "\[Theta]", "]"}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[", "1",
+ "]"}], "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "/", "8"}]]}]}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Xi]", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[", "\[Theta]", "]"}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[", "1",
+ "]"}], "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "1"}], "/", "8"}]]}]}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{"\[Xi]", "[",
+ RowBox[{"\[Theta]0Cas", ",", "gsCas"}], "]"}], "[", "\[Theta]",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"DScriptMCasD\[Xi]List", "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}], "[",
+ RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], "\[IndentingNewLine]",
+ "}"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Theta]", ",", "0", ",", "1.4"}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}], ",",
+ RowBox[{"PlotPoints", "->", "50"}], ",",
+ RowBox[{"AxesLabel", "->",
+ RowBox[{"{",
+ RowBox[{
+ "\"\<h | t\!\(\*SuperscriptBox[\(|\), \(\(-\[Beta]\)\\\ \
+\[Delta]\)]\)\>\"", ",",
+ "\"\<\!\(\*StyleBox[\"M\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\" \
+\",FontSlant->\"Italic\"]\)|\!\(\*StyleBox[\" \",FontSlant->\"Italic\"]\)\!\(\
+\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*SuperscriptBox[StyleBox[\"|\",\
+FontSlant->\"Italic\"], RowBox[{\"-\", \"\[Beta]\"}]]\)\>\""}], "}"}]}], ",",
+
+ RowBox[{"LabelStyle", "->",
+ RowBox[{"{",
+ RowBox[{"Black", ",",
+ RowBox[{"FontSize", "->", "14"}]}], "}"}]}], ",",
+ RowBox[{"PlotRange", "->",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",", "2.3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"1.35", ",", "1.45"}], "}"}]}], "}"}]}]}],
+ "\[IndentingNewLine]", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.875952981547227*^9, 3.875953205695381*^9}, {
+ 3.875953297097693*^9, 3.875953297193099*^9}, {3.875957011270492*^9,
+ 3.875957047134419*^9}, {3.875957125424335*^9, 3.875957151767858*^9}, {
+ 3.8759571836897497`*^9, 3.87595718748908*^9}, {3.875957237810454*^9,
+ 3.8759572647954397`*^9}, {3.8759573310521803`*^9, 3.875957359900523*^9}, {
+ 3.876209125582448*^9, 3.876209130718493*^9}, {3.876209246657913*^9,
+ 3.876209255553268*^9}, {3.884690546688959*^9, 3.884690577225401*^9}, {
+ 3.8846907201244907`*^9, 3.884690753852927*^9}, {3.884690875959548*^9,
+ 3.884690937551785*^9}, {3.8846910297536173`*^9, 3.884691039714095*^9}, {
+ 3.8846916487180977`*^9, 3.884691709606249*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"7bc98e14-1631-4fc3-aed1-367c66e81e01"],
+
+Cell[BoxData[
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJxdVXc0F/z3t0chs7KlrBIyPmT0epuV0VNEFBJKSCQrLZH0yFPJKCKjMtJQ
+2qSSKJLxeCrKimR+fKaP3dfv39895977x+t1zn2d1zn33lW+oc77ebi4uKiL
++X/9/8fbIlo6Q1ANM0PKR0MCrBHanu7HFDRCnZRoc0qAC7Qo6jcmBW2R5njG
+rDHAD29Dos7zCrlCR+r4oN3Bo1Dw8NU3FtqPZgHx+I2BCTAPfDfALxyJTR9O
+VC4NTkPWtXgPS5FEyAetvOl3+CaOZzeeps1nQNTNS+WJ7WP0KNLODQfk4/zF
+DKrOmmp8a32eotRwG3KvB4SeD73DshzdsC1vymBgr9KurPERpb2qVRKV5Rg5
+ud75gvBn+KgTkddjFXidYuXpVtIKGY1Ny6V0n+HsMaXCcfN23AieEjTb8xIl
+SL9vWvgFkhUpYtOcV5D2tBbOMe5AmtpI78raN+AdO5VFyf2OZf4Gb61v1MBz
+7O2O74wuXPtPQDW4thZzJk3qu816ESd2pWnzeB1qgrgs4vf3wcCIrv8j+iNo
+2ywmLYt+QiPWuynf8BNWmEhmvOjuR3lDoMtXvmZEDcbWreT6hTO23ndljFph
+vdNxPdN4EGlj7zmW823Qv9iTcdTjN1IPfzFt0f0P42KRS4ZThyDieKVo/v5X
+vNSwWL+8dhgchapIxwOdED9/9f1U3wgelsk1iRztxPnrmnFtgyNQ3j2k/eV0
+J1p9wnfcHR3BVXJQ52xWJ2rXpW30YY/gaP8e921NnXAd/qL1UWgU4bXsiFuU
+70hx0+nM0x2Fh1z8sVviP6DVOCzmd3IUJWYX5lIHurCX/mTCTXYMzV+kY4YX
+fXGYyT4wqDiGIHH2SQfubkjPvxCMUh2DRBHDXVepG4Oq6xoy1o2BoupXEO3e
+De3Lmbu/WoyB91WKv0xzN6pvDXH5+Y6BZcY/2lvbgzdLhSl5ZWPgLxGPHx3p
+xa+l4yHvNo3j9jWRs+HMXlR9cP57q/U4nPWHdnHN9UJ6z9ah5s3jyMu9n6kn
+2gfut23hXdvHMVAd7TWg24e1Jp31s77jeGQ/fys/qg+xBs97bJMWcf+FZ2XC
+P7H5zmVXqZZxKMSZz5tv6Uey78mBh75UcHQlv5S49OPMQJjCwwAqioS2vVLe
+249Y6vum8kNUcLlUc3Si+jHn1Jf3MIoKbocnQ+23+hHfbCj7IpmKQaGwRCe+
+AXS7Nir1PqJCvLqRevjTAJZ/lStJ550AM8SmoSNxEM/5/c41FU3AbzRHqjBt
+EFLevt7ZZRPIuno2IaZgEAcdXn4JKJ+Ay76m9dtfLeI2Vnf5Xk4g4uEemXvs
+QdT15fPbNU3gduE2kQ2BvyHXFu40xJyAwwXdTUs8h7Dyzah2hwoNOg8qmmuD
+h7AuN/iq/WoazNmMa5ePD+G9QbFvlRoN6tp5Vp7Xh3BUNFOxYC0N115cXVb/
+fQgn6HuNQg1p8DDgsuTzGcaF822hSlto0LP8OM2JGkFJSduuplAawmbzebOT
+RxAWtfrymXAa1hben955YwTMrSE7KJE0zFFP7l9eNwIa9ocXxC7WpMTwT8tH
+oVScZHcqkYaDX3/l6r0ahWPIMW6X6zQseCsHOCmP41PpiG9oPQ3pRqJVYZRx
+VDM/JVIaaEi03NtQ4TSOFW2B2xc+0bB3mEcq+8Q4bF4r9l1qo+HuyHA09fs4
+6If7xCq7aPASmBij51MRVv9vhj6LhsP3TMv1F314fcH3n/ur6FitF9X/To+G
+wt5v0afX0JFqkDF0cBMNfEEtmjs06JAt+C0x4UHDOS6P/kltOgKr8nJoqTTU
+JYx3O5jQkZFkyk/jpy/uhYCs4l90GNAaLI3/0BFy4HjAgZN0zIbJ2t9YxoC7
+qsIH5zg6BGPKQpVVGCgu/apAEuigzDzmO2LJwPp5iVLFv+kwu7JO0T2RgUy9
+Q7ED6XRIyidVHJZkoqbdP7bwLh1PW24x7lmz0HFsQ/TYDzoiLupLx7mx8GHO
+XKKuh46hxNTOsEAWUrQdHuX/pGNCvCPqwSUWfq/ZIO4xREeB/wf+0i4Wvgeu
+D/7CpCNOYZ9Z62k25EfqtfiXMuDzWSFgS88kktopVJgyIKF2y+qfyUm0rN/H
+tLBY1HXvVsWsKAcH9D6YWxAGsj5949llwQHZJnYbdgzkbfzLW+oGBwepX4R3
+OjNw7sEdDaGDU6DGZGi8CmJAuQ9i+1bNQFJ0bLAgh4Fmo8glNpYzuOZ1u1gi
+n4EznltDg/fNYKHJ1ybhJgOXfhdWJxfO4OC9GpVDdxgY2JFLVmvOwrJMtXnn
+cwae1gvVJ1rOgZEpFpHYzgDvL5UXGx4vYPKvK+VnxJh4mKX640z3AnLwfNRw
+0ceAvdn7TYT/YIH29uKIDBNf8YnSvfcPnHp3r/JSZKLrZ8opOWEu0veGLuqj
+zcRYx+hGgzoustnkTX+fPROVm7esSD/CQy50ZspyJTMRRkm61pjCQ37vFymv
++4cJg7gI/60lPET2R7zo5VQmtLbSB+V7ecgeHhvKuiwmXOX5aBtdeMmwjAA9
+oYQJ1XKjGdctfKSrIqirtp6J4PNVPFEH+chOg0H2y0Ym6mPxm3qej+SFTVg+
+bmbiqZPPS1oDH/lu/ONK+VcmwHF39HThJ5p3x2gtv5k40RkksTZagMSIDb58
+JsSCfmOm3IVcASK8j9o4IMKCS0SBm3etADny2DdDRoIF155PNF8pQZIy+yEq
+XpYFnr3bnsg/EySX7NxPJ69lwUnL+IPmCmEi59IS4+nEgmHjzU0eDiJkl/qu
++26ZLOgZqDNDE0SI9T+nqjjZLEiMmM/ZVYmQzicetbl5LDyqjs6z0RMlTWny
+01MlLOw5XWMxvEqMBNZ8Th6vXOQrJQ+9XSFOPIVTn/74yUKAZ7B9rak4ifXR
+CGr/vThPiNO71VucnH6tJ9U2xsIa4/8Sh4vEiTKfwMWeSRbe5etVN2ySIM7G
+aw1sl7LxpoPyoeOCJFkRZv/S0YiNhw2X155+Lkk+1uyl3zVlg1eUt+PHL0mS
+FuQTIE3YuCTd2dVqJUUsrFeFTduz8bq2sEtJQJpcM15zX2kfG+vV/+XLfSpD
+4goObBm/yEbREnqcAF2GPLvb9qApnQ0F1XmxE9rLyd/aj8WfZbNxr+1WRFHR
+cpLV9t7ydhEbefofT9WUrCB0UT8FZjUbX2JMAjeNyhItGQvhSDobqwOMd/cR
+OdLTV6p4doqNYgOVy/7X5Ehk4/Ls/D9sBCjdkdvsJE84ysLPecQmkbwuucyi
+RYEQ7i6P8HWT2KE9vC6fokjauTdGMfUnIZzurBeUp0iEHGwXEkwn4eYRa34u
+RonsC0yKaN86iat+rVa31VSIQWOwj1ngJNyrcwVK/FTI7oxIQ3JkEroXuF3M
+b6oQ9SpNutuxSWxnb6hx1lhFHk5RLlX+PYnIjJCYcRtVohYf3BtcNokRdcHt
+xoNrSI5rCH89YxJx59N8imzVyJpnwbLyc4v8yyVUarEaidnOr3+en4P9Crau
+SZHqxONSb82DlRy4jtn8k2qiSaLNletsyeLd4G02Ov1Ik2Tx7bY6as9Bk65W
+zCE9LXLLaAmneicHGnyRhrwb15IXuvryjwM5aJB78o4Zr002nDgToZ3BwQ7/
+hLR81fXE9aT2Pd98Dh7kFvPKf1hPVJ9rSleXcSBtuKa1VE2X3HFRyRqq4eBn
+YOF3N7kN5Ghlsqk2kwMJ+Vh7mXMbiKfmce+yPxyorJSTMZ7cQOwrV9h7iEzh
+zFnpx8UD+oSxp9lts/oUFC3OUUJ4jEjW9ijPLM8pyNj7hy+5ZESW5nsZ1gdO
+oTZp4eGTVRRS61KZoxU9hVazOvHy3cZkwKlZMu3KFLySl6R/5jYh28OyWnPz
+p/DveMG26+Um5IEYPXHg/hSuLit8DQ1TkrNn2kbn0xT4Mt+E6NNMya5UxTaj
+71OQFOKLXvrOjOBQg1f8yBTEGV9bjP62IBfHOrpZwtN447rvpu1XQg7dtdmY
+6jiNH7rid98etiSvXH2yJLynEV1Q+IopZkW++jBAC51GelaQmNshaxJ5uJO7
+I30aznaoWrPOhjRZv1caK56GZbWD1yjbhqxxF7wSWjmNR2pDnvcq7Ijl6/ty
+Xf3TKLe2YimVbiZqLQqzbVPTuGF6SObUgy0kSKnm+3axGagseW9RxbYnT174
+B3GbzcD91bfquI2O5EUthWbtPAMm9yWrZZlOZOnxFXY6QTN4EOenaeW8ndx0
+vNG7KmcG4v/OM47o7CDfho/KWj6dAVW9syZV0Zn0pVdaGrbOYOnssYrhVS7k
+fFnVUuHxGRzLMU9R3LSTzBDp+M/Cs7j3svXhpkhXUpLdbpShMYtrG7g8fja4
+EW6/9IhQu1nE0e/z2vV7EPVd3dyPkmZRMmb3sq98D+HSfydtf2cWVO/j6+Ur
+vMjxJRwut8+zSG9faRzM2Ev4gn9lsJmzeNrzReGC+T4S62vb4ig/hwrzYzH/
+lvoSz+aK62dt5uCS/afmwxZ/IvZf99vG0DmE9Ff4C64+QNLvPJJ2z52DaYp1
++E2bg0RhdcuvgKY5LHwP0eZUBZHoO+cGrLnmQQ3P0X2fF0K85ksTLSnzeKBY
+9jk4IYw05hRq1IXOQ863iFc3OZwkXu42c7g3D8X/XnaYzkYQrT7Zn34T85iY
+dq/aMhlNTH6rZ9dSFrDSMObIQvFxoljeI7Lt7AI8KZlhIZpxRK/+8nmFjgVo
+bm0ci9BMIBdlU7tvUP7gsLWFmYlSEml6ZGL74sYfsHI+rjM+k0KyK5/tXFj8
+m+xb8VU2YldITYX3Nm4nLvLzip7+ufKrZJeUzlXB61xkoWCqx8g+n7Qorny1
+aoqLRFC3P37CKCZeKleDxYK5iU5jsemxkxXk3SEdewMuHuLjV2roYVpLSrhW
+Nu0c4iFHxadF+lf0kSKjk6fUz/KRsNc/Wp2qfpHn4zrf7Dr4yP8A39MoSg==
+
+ "]], LineBox[CompressedData["
+1:eJwVkGk41Hsfh8dgsiUy1hYRU/ZUlin1/TUjkeRCZC3LkRmkKGlRKqRwilGR
+Yh7bxKEUR9k6tkR6muRwWkhzLNkSYv7/mWHM0/Pic93X/e6+PnrBJ9xDiQQC
+4cqv/Z9v5S+3Tz8YRVq+nExxvwxSqsitZD3sQG19Vz/oG0ijz3dckhojatCL
+xDi+qTER2cZlek+nlyKCs0/G+6tSqEohq1Zhjo3sk7ODzEhS6MSQrPnKhLtI
+vCKWklBEQN00SrRiQwZS+bAjxdKdgJpSyc/PjtxAJh/WNxxYSUDep+7ZBXGS
+kHAwkxpUJIFw/82soC+XkcFBOVr6DgnUmSop/k6OR/qRBWOmX5ZhXd6thYmm
+OETsLTiof2MZfry8FjPgexr5UMlxvXbLEKxrZ1haHI3cnNKpCrgYXJOCn1KH
+olD4H7Pm3GdiIPfTA4/TIpAz1yrb/4IY5OsZ/u67GIjhzx7RsBdDmlOUr3FV
+KJIbXDl7XkUMV3VId85eD0HxPEX2Wt4S9LhL2OxHQSj/rxPWBVVLELh+gE1X
+C0TcM4afGlKWQP/EiquH/QOQ+X+DvxgfXYIvNiHqs5O+yOVKy4sa2yX4yXqS
+seGlNzLoS7poQl4CZlhQ3ukBL3RpwjwkaG4RSpk21dnGnkg2lr1g2b0Ip0zs
+9HgcD5S/+aZh/JNFKK/Ma8xUdUPpHQ7nFWMXoWe/Ei/5uyvSLbZCuj6LECKL
+3HMmXZBecIaG0+5FSOmjR3hE7kfUzUWn7iguAlF5HXty1BFRV5XcyJ4XweCG
+vZT2hH1ovCTvt6gBEcwmJKsNkPaiIwj8GE9E0Gm3kR77g44OvZlSjr0vAu6z
+hObJSRpiVfZdNEoRwXiu+w+Wzh7ECH0lCQ0UwWe5sDLkYYfO20bTvbVFYFs3
+nNWqvhPVhJ3p65ATQQ0/RiSaoqLu94cGOQIh5LzO4x16a4PKPSGX/UkIqocO
+E+r7rNGjj862T7qEcK/18KLHdyt0sWu1xvpGIURm8LYvw3aUobDGjfgfIVg8
+1bS2vrAN3TxTnBfNEkJ5v8al6eat6JVMh8QiWQgjRlQ/McMSzcg3SX6PEMLa
+3eQr6VbmyEAyn5O4UwjIhfxzFc0MERMGdw5uEUJX7rwO+JgixwPK+yIpQrDG
+0iapJcaok3XQZO1qIWzZe7RLsWQToiU3GRROCcDxQOZRCU5Btz2io6OGBPBN
+JuBYqxsF5T9/QAz5JIDa2Es6XlqGKLvE42RzhwAcZFYxrCf00fjT2SALjgB4
+RtLqi0x9tKeAGrghXwDLMjy+84weMl/aUG15VwCPFLO8Gkl6aN/1W8pV1wRQ
+n0pVonWsRze3y9qTmQK4ufCULB+mjS7uWCPp3CoAHZqxkmePFiKXmFaEmwqA
+sTMM9GhaKGKbG0OfIoDTZPraFHNNROoSGPVoC+BnysYUDWt19HnxUAiFKICU
+4zJzx4ZUkdCyssbxHxw8tfIZl5JU0V3eRLz2exz2+o6ylI1U0XEWyVL0Bocz
+3UrZ9HMq6IraJsvJFhzaah+31IQpI4M/jWrjH+MwWhZjtyyrgG6rzI5uTcUh
+QM/M9WuqPOrrHHAWJOMg8JjozVwtj7hRtjavr+CQzTrSpGEsh7gPHXjp53BQ
+YBv6nY8jofXPFpLvMnF4q++0/UG8NNro2FF40xkH5oskWTWKNHIvKDIT7MOh
+X6rZyeM9EXHtA2vC7XF4HpVKIpgRURpP0zp8Fw65iW3lXJyAnH5LiH9ngcOD
+vBGZ5WIxyBU6G2hr4NB+cXoNfZMYLFqTjGXUcAhrjZ78Vr4E1fyeI9gqHDSL
++4tVGhehvz19dkYeh8gt6fXHMSFIZgKMrJYxUDmVZcbqxIARdLx7YQwDzv5t
+HzkP5mAvoyKvtQmD7yaXCRquc9B6a5pMfYFBiHdLLo84B4xb9Ttq6jE4W6JY
+zIyaBe+qjP1/1WBQcHiOJVX2Awxs+7NVKzAwS3S8QH48CfxA/M/H9zD4Sjjg
+6a07AmtGQkUBZzEgmRlV9LYNQ9ZEWlrkmV891o0jz5jDoKG3bkXCaQzg74eT
+mXVDEANKrMqTGHwsFsdMM/4FerPbu11MDLglax3IxEF4yk/TJflh0HK7M9h+
+rA9WyPpGkvZgMF5Xbi4f3wfnKiV19wADm2ws13R1H0yXup212I1BqlXs5XO0
+Xrh+Ld0ieCcGPm7sYzlVPVDs2Ds2bPXrF5N9VPq9d8DkZFV4mGBQLTJ7PpXV
+Dl9akyubNTFwm9hD8ZRuB7/CjvZsDQzyXYu7T55+CfdDdcpPqmPwnLEuhuPX
+Bq+0OO83qWHQ6p3HC93VArGSNZrlyhjMcb+NNrDqYcTn9rAUCQPFdlO5a4V1
+YPNv1sK8DAYuHzZeX1FTC2kIZ41JYxAYpeCtOPQMQqSYjL+lMJi/q5el7VcN
+79TZCi/EfDDZvDK5NbEM3HKbeb18PkSNJ6yu6X4I61KzGK8X+ODv6DDP1edA
+hNAhvmmeDwm1fccs/imExK9vtj+Z44OyXZO2u00BDJKCuv+Y5QMlx6m+dAcb
+PEwDRjkzfOi2XaYcm8mBIz90mUXTfJj2Qvz+D3eAIlfFLfrOh2Hda5Wpr1lA
+V9lzv2SKD/JeNNfi67fgiL5lV+kkHx7/bIs0zLgB38pHvB5N8EGvXhDtW5YI
+XG6DXfU4H3Iip6hKpReA0aAWVz/GhzRDoudH3ZPgRnCQavvGh/AyGYbYJxSm
+jM/dcPnl/wNBM+Ba
+ "]], LineBox[CompressedData["
+1:eJwV1nk4lc0bB3CFlCJKEaksRSSVQpKhQgvJUhJKJP2EpJJCItmyZcn2kopW
+EYWQ9/baj3POMylbtkpSCaXMkbXf+ONc5/pc5zzzzDzPzPe+5RzPWDjP5uPj
++04/M98fNgbLRxY4Q8fuSHKpl6Dj0QuHMnLPQr/j5gO9nwjqf7wqODrfD3RD
+BvqHewiyuaNRqNBwDZ4qDJbzUWcKal1JUw2HWf2nqsU+EqQ9Je92wj8aQjPD
+xuQ+EPSzScTm6KUEWKS5otO4myBz36YSm/lJoNH+MMCui6DFS4OlPyemgP30
+1HavToLiawM7RRMzwAtf5WW2EzT4115QaWUWTK6NrhRuJWiXzJvhwn3ZINpw
+5qFSC0FWTUn838/fB3PfaH/DZoLk3r3afa78IYi6b+i69pagK/YKE4rKT4Ft
+9bVU+DVBhmXfclyKCkBQXmiVDougsj0OBdN/SsAp9+fVzjKCpPN26Qw6lIJF
+coTefOokKePwmrpSUNNWGt9aSpAXR9BBP64Manc6eiS9JGjf36n8IulymEfy
+YywKCXJ6vaZXfxIgdmSDMZNL0OxtxvqWEZWQ5n1tUPIuQX5Vm5nsvEroSH//
+w+IOHc/P0TepqRIEFMOHojMJusDf7mwnWwVWrccFhW8TtCxkpWz44yo4JhoY
+JfIPQWJ+B6/sflENEVsT+g7cIsjT8ELhrRu1YMpSkvl9gyCJer2bnKxa+GBi
+q+ZM/eUiY11bXgt2Nr4v2yIIaj60+ofQj1rYKM/Vrw4naIeiyvCb/XUwsuaG
+0dNQgpxD+n35BOrhf+EJW+uvEbQoeKFb0bJ6OLp5a4AFtcmAT5m2ej28KHth
+1h1EkMg0yzHLph4+Vg7HjQcSVPzGZUQxpx6aS0ufGF6l72/NV/4Nu1kQc1Jy
+7xp/gkJyFKt6jrBAxjDoMMuPIPni2PFT7ix4YV3w2526OH/emeGbLHD1asJl
+vgQdGkjwn2pjwZOT16RdLxNk7aS1w/pYA4ieFcNiPgSZWZr/d+ZMA0jtf5vA
+uUjQq50OhccDGiDrcUBvOLX25SqbtxkNMC9eUG4edaPusx+8jgbAnhXzpb0J
+EhX57dPb3wBqSoWyPRcI+ly9QSZ3rAFOTva/fELdzh840LKUDb5V6jd2Ugtd
+u+wYasaGevFdd66fp+fF75N/6FE2qIWlOR2izrA3NnZwZ0NjmhtRpnaO+Gyf
+HsGG2e+/hL09RxDL/brz7BQ22H34340n1B/IcIzBAzasU1p67Dr1kflzi82q
+2PD9iK6fHvWtKfWTKxvZoHpRoE6W2jRKKb2hmw3zdRM+T3vR/foPU2A+wIYT
+uKztI/XmMMmpF2Ns+PXM7k4t9f3lwo0jcziwTNdV/yl198XaIHEJDuSt7y9K
+pG4vfMDuUePAY8vi9W7UnX9uz0nW4YBbjuemI9RzjUVdVI05wM+9sGgvdZZH
+kW66JQcSbTa83kZ9csX1lsFjHJhOXOmuTr3uelyQrBsHkkhbvyI166ti9Dof
+DhzMnbtvOfUijeeGMsEc0DDzilkyM3/vLyPfYjjQfmi4RIz6hMudvuQ0Dli9
+vsQRoXZ48+eE8gMOfPwhxVowc/1s/ZLkAg5sLST5M7/byc9Z11/OARRrHj5z
+fWzyMkFZFgd65oabz4y/xSrixsYm+n93CZGZ+1tJ5ggqv+fA0ath/87ML7VI
+qoSvnwNiG5JOzcxf1aKgv2yEAwn7xUR1Z+4Xkt1t85cDfgd68mfWvyH+dFv7
+PC58WChjbUstHsiRRhJciEz8yudBna318UvICi709aUUBFEbxi0JLFDmgnL7
+7TMpM8/ntIpS5SYunPsZta2AevS2lnSRLhccNWWkuTPvb2FuSrQRF4JVFRb2
+U8+Ksendd4ALns/ur5hH3/9kp6P2kA0XQiY5JirUh0LN315w4kJoWm+6KfU7
+LPKrx40LxOvE0nPU+aE9r7d40/kyA6Wp1LYH/7yKCuOCWpd72k9qIQMOir/J
+BSmlqx9X0P16t+mje0AqFxYFvnYxozZrCX+2IIcL2W72+4qpP/8Q1sx9wQW5
+JLUXQ9TEOXe3VjkXcl46n1em52NR1tJhPoYLHus9JO5RZ7Jsfxu0cGH9+Yuz
+eqkfatXZnu7mgkaevYMSPX9qx7ds8hniwj2+vNhCah0D/7l2PC606Kqc5aPn
+dXGpz5K101xgmd//aEo9+cg3I0CEgQl2RPxP6jJXVaEICQZexx9Zo0/zwEvd
+AwXKMJC5cfeiOOq7FzPKNdcysIZwF2+/RNdzQtaCqDMw11Fu6y1qbSkryzua
+DJzMXNA6TF2jtGZL5U4G3qRwMp7RvCkxCjqutZcBvrXW7YtpHo1HLotLPcBA
+l/K3/EvUi2/9G69qz8AL/lhbU5pfi32rxfwuMBAn61m05ApBgWv1bJx9GVj8
+tGswmnpr8t/q7YEM/JRbvXR+AEFnTFtjXkUyYKky23UBzctbgV83OcUxoJna
+l3uTuvW7duBYEgMx47slpWm+NmfpZ5G7DMgKXw/fTPN3IiW21PYhAxmpg3m1
+1KwUi7/5Txlw3z+2yY7mtbm1RoL6Swb8PSSjbgbTvD7Va+vFYYBoL3VQonnf
+lWt02L6RAdSoqNVCPek24ru1hYEUjciRsDCCDlcEPKt5z0DbZ0mvcVovNmXb
+T17oZWD53ee2JbSeeJGwz5LfGKgNuHfFj9abVdHjszf+YsBrZCl7YRRBEQd1
+PB/yGKgRqlP4QN3OLhsQn2AgSEtDojCanpe5NUFl/BgqHgYpuMcSFLrDfpWb
+BAZxtRWzliXQfF6L51yUwiDPNZUUTyRo58ZPTeeXY1iotD1HlNa/70nVMXsU
+MTypaH4nnUzQs5DBvFXKGJbX7ipZm0IQf5Pniu+qGHqnl2XrpRJktOnd3iMa
+GJbkCur50nr6fPUxnb+aGH61vtK9l07QZZOgjiQdDLurdb83ZtB8EUyMzzLA
+IFCyYsEuWq+LEzW815theLta5dnV+wRV4VVaThYYVD6lunQ+IOhUm+a7yIMY
+ZB0rJfQfEXR1XH8p2GKo7mzXXJVDkEyed0fdUQzlYz2K6U8JWq5v01JzHMPl
+28IT8nkEOfpUwR0XDO+837rvLSAocv/61gBXDMG84OSB57R/UBPxtnTHoF9e
+UZdM+42MKOnUDi8MVlPzvcRKaH2uF7l71h8D207DM6SCrre4c/l0AIYwhVrF
+oEpaP1O6Sq8GYTjdU/Aqopqgm2N2T06FYjCy3mlTXU/nWzQkz4TT9XL9THgN
+BPGlvhNSicSw43cHnxaXoJz/kGNNLIZ1wZHsvkaC6m0yJwTiMQyZNs+ybiIo
+12P13m2JGBLvzdFpo/3ZPt1mk8gUDMYvvu0Qo/3dsV2VCg/SMPDazLzqaT+o
+vdCGvEzHcGqBomMC7R+vhQdz/rtD348R97HrF4J4o5W/X97DEDMg8Ny7n54n
+47+HH2TT8dp/d6QM0ufft3+l6yMMSXd/+6wdoet3m8rUe4KhwzlaMHmU9pNt
+H+4IP8UgxBPpk5ug+T1L4nj4Mwxdu5UjImfz0L1543q6BRj2mJwaPjOHhxoU
+d3T0PcdQPMrwzgnz0C4FVqRCMQbXrh7J3kU8pJx9t6LwJQaOsGWcpSQP3RSQ
++IlKMWSOFrn1y/BQWfM9f91yuv/E3pvcWs1DXUtcx3L/xaDV05mfp8JDAYel
+cpZVYNjiE79tTJ2H/Ou0s/z+w7D9yJfAC1t4SCBE+2drJYa10SdNlbbxkPov
+lwzVagw+i9+kiRvwkEzf+KuLNXR/Vqhmaxnz0PmyqGtjdRh05l8WNbTioeSp
+U8bqLAwPZAe1NtvykOecY8/tG+h4Bgf+9XDkIY9mqeZgNgZFQTeHsf/xUONR
+xdIsDoZsi/2G787y0KX6kTPlXAz784qFJC7zUGl2Dz9mMIwz4lV5QTzkG0vG
+O1/T/ZQu7bk6ka7vs2zKUCMG01Cnke+3eUgud0jszxt6PgoXlO95wkMlb1le
+Y28xTKw6sW9fMQ9NHB1ifjVhsI5+dmO6iodUGny29DZjCBpaKXyukYcyrZyK
+uC0YZunpbyx9z0OCB0OO57ViEHSRSPgyxEMZEclG4W0YHskcNRL/y0N17uoX
+bN/R/XbI2eiA2CgqDYDJ1e0Y1sefnqyQH0UqKf8MfKXeUanUfE1zFJlrj1tm
+dWBQMNOZLt83ipYz3w0Od2Jw/5Vlmuo4ihyEnWsEujCcu7PeYa/vKPJQ0hl8
+RG2uFjYtdGsUtW5eVW/cjcF76kL30uejaMfxpye6qc9p93XWvhlFj3faNLq/
+x2BJitq8ySh6ruC/nEcdmpbhnCzzBx0ysLK6+AGDyc6H2S8M/6AKmcmQYerF
+C4VKvc7/QT7F5ytPfMRw/9Umz8yHf9CrT5kSjdTvf+6S0/v0B1kGGN3Q7MGg
+XWOsE7N6DFm9Et2cSH3wGCnceHYMpTuFLB+kLuEc2qBfP4aMJFdY6H3C0MR2
+yQhWG0ehCSo9YdQDdZyJmqxxND3S+45D/VbN0XinxgRa+MPVSLgXg1mQB/H/
+MIF+L4HNBtTK5qG8W8WTqFiKlX+W+my3gQKbNYUG+Q41pFGXk/IFZhp/UZSn
+1A2grjj0QLM1jk9f4f1Dvi7qjdeMVQ7zzda/13Jda2Rm/Cju4EETAf1t6hK6
+gp9pfhYniD1Pnavfvfe2tBj1jy+mSw5zxfV9dvDvWUR9rOZ0w7lfS/T/DzHk
+Bgc=
+ "]], LineBox[CompressedData["
+1:eJwV1Hs0ldkbB3B3Y1BUGmGokEsGKUT0RIlcxyXJZaKbkSZR+ikht5pTo0Ri
+KrnklFs5qZ/rsB2mkTi2pBCSOShyOee8u2gqzZ4/9nrXZ613rb32832eZ9Xe
+CK8DEmJiYtH0/PfVNGC7LhnDiG07Umv/VaapkM92UaBWsbu1mssXoJybK+W/
+jmJ0xUWfdam6FW1WvP76HfU5/Z1WZ+62wySro7ebeubYMm//gkEYOOfz+QG1
+0e3fgmS0+LDiSd3uS9Qq7J8z78aPQ/zvEZ/2Uxs7DinbL7yFuH/apzZQ13nI
+8ScmJ2Hl38pWX/kYlZ7P75WOmoKiQ4fftVAPvk3fL82ZhgxZwaJkai6R0Cis
+noGVtdfu2VBzvhnZfT9rFpzB57ngb4yyXu9ZzjYQwFbXmbQ86pkCj4TUWAGc
+rtLhO1EHnmQihc0CWFyaOzw1gpHqc65Xm7gQuP0TaReot+c++DbRSgjJFSnz
+OtSzkixJ23AhnDrdY1D7GiOFOzme49lCiC02NHKiju07KGPVJAT1kRa57mGM
+5gsVL3aOCiHc6XGHL7XW8SoPXRkRvCx0SXjxCqM2r0XBt3VEoJrqttaTelbl
+1tOSLSL4YW6jfdcQRl1RsgFdfiLw7M6Sc6GW5zSabIkQwfIvPizuIEanLT7P
+6KaIgJPh17ae2lBNIqg4WwRI/PjTggGMbg0YeU6UiGDa8HCJPHVikGyMTL0I
+ZBPm/CJfYuQqlSNa0U7v/77xTXc/RrIuH/qtX4pAXLA7yJRa72R+edxbEYja
+fbmsPow03V+UkPciiL9gpj7ci1HBDh9NjgQDmUZBUabUYXtV2Y2LGFCY3tgZ
+94LWV8fjpx/UGFgcqmbR+hyjzEkNzW90GdA6+GW7ew+tz57Ao2utGMh7u3/h
+wjOM3IObYs/aM3DM9+arR90YXbIYqYpyYaC2un7m01N6/3T5L3PeDNxXaTY3
+pj6Y5eaiHsiAa1ZJXWAXRj8yy8NH9zFQcTko5RzGqH44INQvnAEX1d/Fu3kY
+2Vo4rdl5kgEPz5pmYQetv66fzJsEBp5kP+MrUtcr9SpZnGWgrIsdvOkJRtk3
+V3upZTCgrpPR5tqGkXKwqkVVNgMnY8bK/R/TPPfxSjVyGahxL/4c/hdG/P3u
+Zj53GGian46OeIRRn2+Mg2E5A6najskRf2Kk3cgX9nAYSOoKPnagGaNDLi0h
+nFoGPlhf3xvAxchkwGRutIGBGJ2hBbcm2v8eXzvfc+n/3Flfg0aMdojLVlS2
+MfDw02vNJQ0YpZ6XqQjhMXBxRq18rp7O48HUUVEXA+8CzIxrazHqTzo739TL
+QICiRvTy/2NkOZJhsXaUgeaUeKsDDzGycrXR6htjoF2jQ378AUbH9J6Pyb9h
+oHJh29XKSvp+tRbr3gkG4pFCrj0Ho99uyCutm2Xg+01ndGQqMJLal7mUK2Tg
+8qR01V93aT1iD/+5mTCQra2jCGW0Hid2YemPDDiGZwx9KKH5FfUf+PETA7+y
+GnllxRjJ/JqkfeELA0c1M1Yr3saI+NltfiZOQHB01PRePkb2VlWoXo7AHxnC
+3DV5GPXwbg63yxNQrVQovZ6L0aRj6nyHIoGlSf71sdcwMhs01S9SJjCVFtI5
+nkP9XrAxdimBBpbWDfdsOj9v/S0dVAjIifckLbuCUYR13MMHqgSU5NeXRGVg
+dPlIgcRuNQL8ADU2Lx2j8bauIZE6gdCxZstTaRilSc2USGsRuK94Iu7eWYw6
+7Ra3c3QIPLnzizRJwahaW6Vbcg2B1HndqxbJGN01OzrupkfgahhrsjIBo6jQ
+LTaPDQjMdxypm4rDyPxqz8d5QwIF+awy7dMY/TGzqWGVEYGY955yrBiMttxY
+tiHQmMDu9IHE6hMYedad9TxiQuBnMe/1/ON0X60Q23HSlMClBw5+ZpEYlbSN
+pJwyI7CWt8eZE0b3U766nIkFgbZHPMO2UDqPSv8MKlgSKBfERQ4foHlnX3w1
+St0klegotRcjZ96Jj8lWBCI5d0aWBNN+zVbY5WJNoBVq5jR/wqjs3YdDipsI
+GOV1lJv4Y7Rfan5dkg0Bboun7wY/mp/BlZXmttR5LekWvhh9K8224VOHTIjz
+1nth1IS4YeuAQHpct0DZGSO0cCY4x47A9KHpCkknjIZaJc7r2RNYcF6lzzjQ
+fTUuza6kjgsz39VuR/eharFkw1YCk74V3z0EjExL6yNsthHYUR9ddM0Wo/v5
+Dpo11N6+1eYhVnS/eeikFTkQSJtK3mpniZG1pnukynYC9UNgqmWOEe9a4XAS
+9f+6Wmt6TP/Lv/+GtyOBPtO8oHJjjCrTMuWrqUN5p5lEI4xqQ023fedEIFrq
+afxOQ9p/rISdx6lFHZJSevoYPeaNuXVS/wvg/QWA
+ "]]},
+ Annotation[#, "Charting`Private`Tag$5186#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJxlUWk0FfoDtCtFoiL0hMrSU0mhxPyUslayp2RJQkQekhT1QrR6KEpS1hJp
+zxpZiiJrlhCuZHf361r/ff/POfNh5sPMmTMKrr6WJ/h4eHj4eP+Q5//hIHBp
+mi9XBSOnTEeMK/ehdrxCXCBXB8reFXMnK20xebPBc1GuMUrdThpnVLrDpFai
+fnWuPY63bvCWqwoClKWcnXI9ECSrNzpbFQlyrvddYF4wojceLoj8dAddnGKJ
+hpdX0XFc7VhJTSZuhHiHLWpMggdX7NvMh3cQ4FoluO1NQ87qCG2/R+VQMA/Z
+/fvBE3QrlDyKxifIZM/y/2WTD1/F7emN5nVQO+V67+r7V/iSwNRu829Eda38
+Iruodyj5XRqT59+Cp+ct7pzzLcLT8rKbdx3a8GPAsHFg9wc8aPXuKhLqxOFX
+JkbtTeXIMIuU2dLXBQOz3Y7tPJUoY565NxH2Ew+H897eNKkGc+xEoQt/H7q0
+touIsT9jMVVPa/fRfpT5qQ4/fPYFfjpP4oISKfguIyqaOlgPrx15hWbDA3jZ
+JX7dbXsjnMJDjPdsGsSVr5U7IxY34w3MPBPsf6OOLp5G2duKhsPXzgbcHcKC
+w9LOgcw2ZEa6+OiVDOOiSp6N7KNOvDnNL6w2NYK0jLphw+U9kNNdsOxSG8OP
+a+NX9OV70BfndPvQ5jGItS2zNVDvQaQgq6hacwxeBwo/uJr0YNqiuSd/1xg8
+Vv16v/JyDy7NsB2uHBiD1jqFXENWD1wD3b1U/MdQekYzYSnlJza03etxLxhD
+t9uSMYvJXkg12LysMxqHQ3FoisVUL04tc85LNR/HHadDDna8fdjUs+LZP4fG
+oaXptyxEsg+sgq15q4+Mg//X4SMrdfrAH72v48TpcTjrCfDnXO5D6S+Pvxfi
+x3GbK/w4dk0/Wmq1R3T6xyGiP+oR6E1B2PtV7pTQCRgxrtGqgijgU32i53Fp
+Aq1Zvg1/XaLg/o9YjfGICcSUrikYTqBgZdEmP87NCQwcMbH89YGC9YyNNqKP
+JhAlmFEQunIAjBv261A1ARMttYDgTwPw/efn2lLRSXwTKnMgJoO4G5gYuvfh
+JMISDsqX2QxCXsTctDRtEptti9tMXQdxvtvGUjt7EmKj/x29dH4QiiKJkmov
+JiEvJbUvIG8QmbKqXhIVk+j/b5P7xVW/8TZmjjIxOIk6Vs+ZW5O/UV4vGeUj
+RcVdn2UtMXO/oX0hRj5vNRUyNlgTt2QI/h2neyZkqRioU39aqzyEn6dKG/zW
+UqEu0nS/zXkILiO7bgepUiGSYJYf3DqERMpsebQuFfd1FHuP1gzDJ7tSr9GJ
+Cv4Vb1/4dg4jobf4ibHrn3zvwevxo8Mw7A8+WOZGhcFzSv0KsREYPVlmmu9J
+RYdfaTzdagT/2qcuivuHimdbs0N3UUbQPB26wi3qT9/5zpxe8TGsbPjSoP2c
+irBbFZmn142Ba8Fz/N0LKjKds+MkdMbwZqJUX/s1FbvKvjYmO42h1nuhRbuA
+Csep5JbS52PQpL67tquCirdL7JIOW48jR7D8gXUbFe08g0t58idQ3iPnULFA
+xUzxYobkn5/UhAVqFPho2Pr8swM6J8CEwtVwARrW2/bt7RaYxC9bMa7+Yhpu
+zQoW7Tgyiehj5q8/SNDQrnnpu5kQFSFcT+HG9TT4ptBrI8upkHvYOa9lTgPT
+Sd0nv46KydjxS6kHaLiSXBM61EHFOSu5kyKHaFhzQHXfFToVDq76Dj9taChP
+stT1WUeDAOli3nCiAeoRmrLX/viUu1fn/Wkw3f8rJcuNDlh//Khxj4YPFR7+
+/AF01F2betGdTMNBZ97DAf/SMdYTqh7zkIa3sf4Cdx7TEZykXDeQTkOohtzp
+7j46vh1xqkl9TkO1wn8lj90Y2JigcWNbFQ2rgqs/WIQyYZqoYttEpeFrE59m
+1k0mHNpnCmIZNOxJfvlB+hET4d3U2kNsGpa18C4+UM1EwKXGqeYZGvhWKL4V
+lmDhfUBLeq8QHV8oXcfG8lhgTZUZya2hozAyqmgvDwe8nz8FrzelQzbGkbJ8
+FQcjT/YmTJrTQfPs2M3zNwcbkirCCg/SwY1vbTe058DbW6nS0ubPTp6F3sCX
+HED03ZYbznSk1nWal/pModo7pVntLB1Cr3a9tuSbRvJzmUeSGXQErTjzXGTN
+NN6kHjWbzqJDv/eoLlV7GqtpXYy+p3RkT5UU7T09jZUnPPa9zqdDuSY3Y0P3
+NBwzViieKKbD1bN1cEPlDMbTg3Zzm+mIr7SNziqcw5LKMKcpfgaScgT1yzvm
+4Kpkz1MvxMBcqhLvcu4cNgV8eZW+mAHduc6P1jrzKB5JPWyzjIH4WAee0IJ5
+aN1Lba6QYeCasYlDVfUCKgyaFdo0GHj5Vqnw4yJecvqfqNkBZwYyBjNtDeR4
+CUXGOaf3OAPeJ1cJ/NrMS9KV9+R2uzNAb2qUe2DHS6apjq9+eDPg/Dza8Uc2
+L4ldFyQyFMzATy+L0+OWfIRmXcNrGMuAAF32TtpnfrLzYI2ybAUDKsEF60sp
+/GS+8llaTDUDnz0sHVYt8BM7ldrlszUMvNEf+nhZS4B4HDFpGWhgQDqq6bVL
+tgDpqM93qe9hwGjPoc3MREFivv65ruAMA/5tkQ1m7wUJv3FiZcI8A99NBfsn
+2gRJ+VHqZRU+Jvo2XzGXlRYi10UPvLRe/EcPjkyoJguRf01UnT5LMfGMY8WS
+eC1M9pxQ01HYzkRZb0Xvo3Zh0l5z0aFNh4mq9/maN+eEidFgK+/tXUzwpc7t
+uWK8iIg/OsVaZMiES1NSzRLKIqK0/dtSGSsmAguDLb9sFCHX6y2kS88wEXcm
+VzlLSpS80s4x2/mCCbdK/L5gJErONUSEC79h4kW+0qXvZ0WJwFntlLb3TKT0
+dY2v6BQlxv1KeeFlTPi37Dk6ny5GDsumd7K/MUHlKV+isVGcaOYNhJ2bZCK3
+S8U/20icnCWCIcEMJpZLip3ydxMns1EV9SEcJiL+cTbmfyhO9DJKsqIXmKgv
+VU3Sl15O1nr+nG5YxoLzxR0UVzkJMvhK956oBgsHD44G5elLkPp30xv3bWfB
+qy7nm5uLBPlRm5B2eQcL1ukRwquzJchKD9dTwrtZME9pMGrZKUkkCTvQwIoF
+yf0+NU5nVxDppjOvw4NYSO2PO1XpKEU6Ph7TvVjGgv3JcNnK21KkzbVTRqOK
+BXehv/vOVUqRDz9+bBmuYUEsTLNq5SZpMvpWVNezmYXYxxKRQSKrSZLnZd+n
+gyxMGxQd8hqVIa3+YW4QY+Mo5UtS+kZZ4jVatXS/JBuR8Rv7271lCdfTkeEs
+zYaGjl+0IV2WRB90/nRfkY3ewKtdFYvXkIB1BvlO2mzcf3c3qtpPnkh+7+vc
+6spGxmVFd+8KeWI/NiOQd5KNiPQbbQVL1pJv57Oqt/iwcXVtUgrFZS3xum8a
+uD+YDWe7Hak7pRQI0XnrMHiTjbsf56K0niqSZDX+prwSNgylJb0+9SqSijrb
+/fkVbNzcs5P3iLQSSbHm21JUwwZHX70vPUaJpN1Jej3eysaB5Mwf0aHryB1B
+alrNBBvJH1O+pSZvIPJx8/MXFTkI95155zq+gfQG3bIqVOXAUeAvLQ6USYfK
+udf8Ghw0RpoGNo0ok0x2Z1w5OPB95qAleliV3CNXJqiOHBTbrvaTLVQlI+pn
+ytNOcFAmqtd4aY0aaRvaXeLuw0GsxlxK1qga8d1Z4PzXBQ4OZb80LMn6m3ws
+ubDe8QEHn9T/dRxfo07ef6Pz3MvgYOmlW0c331Un9g3Cj4ZzOTD1a73nELeJ
+7Lffm/OxlIPsO7etOh22kGcNaWPufRzkVDTkhfVtJbX/afd2qk2B/vdSKx89
+TaJXF7zq7LYpeEYmbFZL1iRPtHwj1PWn0CVkIH3ddRtZx6cUOnpoCgJT16xy
+VmkROc0s4dKQKURnJ36quK5F/qNeXqMfMYViSRXdRiFtMlD4oLf71hTmfmk8
+viqsQ15+U8kMy5iC0KY3IXoGO0m3clWAW9MU3nUtmy/v2kk4m4KXTHdPwU6y
+3U7koi75Ebdw/+3wFOL2pD6Wbt5FdKsfizzh5SKkOnv76waQLfL1J+I1uWiG
+5Lr+Q4RYBuV9vUy46CmO8q79QIhL9D39x/u5UFE8YVX2xIBonvY7FeLBxZDI
+xZPhpXtIoo+15odULopC/j3Pb2JItOVlX5zM48Jh7OzOOx2GpD+cYmZUzMWX
+i9RFHmL7yLHLN5RetXMxu3ksNPjVPnIj5zP2/ObC4uiF77ucjchy8bqdEmwu
+Yh02LAw2GZMLX+afBa6YRu++tl8jSSbkN3vbT7F10wgQXry2z8uUdL+54UXV
+nMbJvgwjf3VzIrek8MJd62mU9iVuM9lgQZ4O15p8SZqGfsZMm2KJBbkVUCo7
+mzONRRHuB6qOHiJiYuFfb5VOw8bY7qFZgSWRT5TQow1Mw9lUVrflrBX5pPXd
+9/PUNGQS66wDdluTnGsZAStFZ/AuNabiMI8t8Q7oT1PWnoGY9+NmebYtMTZk
+qnPNZ9BUf37Lojk7sv+b0rHDx2dgZbjNf+VeB5ImXTxEiZ2B4zFaj0bMEeK2
+vrX/r6czuHYlNv7M0FGyKm7rwOKKGWhtXRkcM+NE+gaHfVZz/uQpmEZd/OFM
+XG6+WLCWmMXBa6ZGgV9dSPptu1+nN81ian3HlbkmVxLRqH0x0GwWeYNyEjW0
+4yTSVTwu2HMWhWVrJ7gbTxCJCK/I6Kuz+NkiL7Qjwp0477S/UZQ9i3HRDQ86
+Mj0JQ9DIrXNsFrE6Awo2IaeIh6qaDVd8DvLTLYfP/etDhEmdV4rWHPTMgvNo
+tb4kbiRQeNRxDr2bc4+lqp8hG64XTgpEzSHCQGXHw1R/whQqWCn1cg66fa3l
+TvsCSLyyYrzlzzm4tapbFakEEfXRbb8nxebBSDcokrQOJnxZnUFbDOYxYOEd
+pNweQp41H7vuHDSPYz6p87o1FwhJ6WrvyJuHTNk6u4HUcHLs5O5yodF5FHpx
+2P4vL5Nto6+K3Tcu4JJncQFnSwT54qSsHe+3gDea/nIieleJveyqDPOiBUim
+s7KuC1wnStJtI3pCPIRZJD876HabqMxslMncykMoopzK2rNxZK1UvtvD4zzE
+60Shk3bUXZJOERhTvsdDHG1WzauKPSBvBBGc2MZDnDi+Mj2nH5Mrr03ft6zh
+JZW3eXnHdLJJfZLK9lRfXkLa1rzPy8sn5RdZO9DISyRUHFimt98TTavPltUm
+fES0xq6pXrCS7H21R2THIB/h6nksX2hoIXxfe8KqO/jJsEbhVm4KjUhQnkmx
+ogXJx9i4HBdPNmkRiHiwnyJI/gfrYPd2
+ "]], LineBox[CompressedData["
+1:eJwV03k01P/3B3DbkCX7B2lsZYkoUlrIffkQSciSXcgWERKypmSptNh+kiQm
+JcyESpaIDyMkIVlSlGXKki3znsUy3/n98Tr3PM695zzP69zXS+lsiK0vFwcH
+xzv2+f9a2BfdLOWGoaGtj+M/TuOQ0mZqoGHSMHK4lz09Jc2DLquIjJYbtCMt
+tKnjKMaNyGF87xZS61CcivvoNS8uNMqIqHAnVKLKu5kpqWOcyJqpjc7HPEOC
+CcX8PZGcqPRQbxNXQhFqSlINtVPiRKzXG1tfyuejCNPS2B/DHKiniN+XpzwH
+eT6el9J6wIGym+NI8fUZSJrrRCKfNwdKE7FUTs28jZT/q9pN0eFA5RO71JuF
+b6BfQ2dFynEcqNT3S/1GUjLadbn+L6ueBWMavhKiL66hcL5FvqthLNB5X7xF
+6mwiWvIOejGkxQJTK/K2KkYcUsDLeOotbsKZizYfHXujUWl9dwH2ahNctJxy
+pVSjkEYFNN1N2AS+/4rsI39eQp/O/Th6z2ITVDREzbctXkTaSy8G72/fhGFK
+X+1WFIZ4SvX7nRY2QDfYlXo8IwQdz60xuNW6AT/Kv24zZAWhUYOWhtUHG5Cl
+5Net0xCIPNrxY16XNuDGe3tD3bpzCJ+zQS6x3oD6huWk1EU/dO2vpkye5gbk
+dc5zajv4IutzAorbBDegaPZrl1z+WdQ9sEI0616HJ8MjgwYhXigDN+z6H2kd
+/uSnx3B5eKI9z3V0vDLXYWz9Nz6I3x0pRhgrNrmtg3CZ9PK7QFdkVcy7y8V4
+HXD9E0zuBWck+89G6xeNdWjukC+yPemI1gWFVA+urwHXZzWNCCUHRCiv8MZR
+1mC6xr49R+g0Yuyd/5XUuwbx2E6nXLwdUo3LDwp6tgZxq34JcfPWaLbQ10nQ
+bQ0mjyitV+daoZFmrCPixBrw4lfyOh0t0dOPJ/1OH16DQD9aIL+oBTLMPnrB
+Q4bdV/ujZ4M7gfBbM60St6zBTwFVQSK/OaoccDjMzWDCXeKJv4b6ZsgmNlxd
+YZQJlwS8OJL8TFHY55b/KruZIL+vt3L54TH0/uDJ5JwmJohf2ZplvssEDaSk
+TVsQmMDTvzQo/swIKV33WsCHMuHySITz1R1GaMHQ+0SrDxNyxET8CASEUkVu
+1hU6M2EXibQj+jygo1W6EqvGTJjIaj0rutMAueHe5I3LMsFawTTSzlcfKb+N
+GhUQY0Kq/emcadIRRPPXjPPkYwKv1/EDiQ6HUe3b33IpqwzAOmJiUxf0ULVo
+n83DXgbECZ1QFzqrh5Qnvj5Ye882c50U9fUAKntKm4t7x4DgyCh1hZH9yGPk
+lu4EiQGx/TUHFbfoot3+k7OKdxkgtvRpkrBFGxEVomv67Bkw1x6Dqwvci/7R
+X82jWzIAhCe1RTr3IIkbQfV6ZgwYPLNToCxLC+mK/XyNHWZAG6Po52fX3SjK
+LSv5siIDJs2/v/uWq4bqwh35VZfpsK1j9SVeSw0F9Iy5pc/RwRKX/VWcrIqa
+d7vEclPoMBP2N428roKOELeM7hilg2A3qWIlTRm1DRlT5NrpEBzFqI7k2YFq
+T3pZdD6iQxl/SfG5RiU0k8Z02veADjJbbrNmopRQg4XuvWc5dLB/KigbvKyI
+CGIzL1+n0yH5lgk5a1YBSZjueeAaSwfd+l4fx1A8+nvuy61nLnTYa7HZThHA
+owgptNboQIe2nUkuEc+2o9y88dnvtnS43Hs8yJUii3aYP2o6bEEHT/4g0nL0
+NmT4ZPqmuwH7Ptbz/MQFKWQks37hiCIdKBSHrA8EKbQaaD04gqdDAkedBXKR
+Qu77yUOJ2+ggJjN+WujDP+hdx3bjaXF2vtqBcdcGSdRT+0IQx0sHuYs8++d7
+xdHzMTmb9D80cHDu+2hpK4J8Q3TqNFto8JaoPdq4IoyENUyq3Jto8LVLP7ox
+WxiJ+aNX2Q006DF1cjX/vhUVJmrck6yhQYiEGbnqihAysSgpcS6nQa6/+CN3
+bgFUptATMPt/NIhYlrleMIpDqUI17W/DaGDSadDBeIxDJYWKfPdCaBCjRPXc
+5Y9DayYSMf7BNBDcRz7yh8qDum95dO0IoEFjmQDXCzwPYqTt+9npyc6T4wfF
+dC4kP+vwofcUDQSe5SZbNLKALHuz+YouDcYUMnVyIliACe2Lm9ShQTjPeFXV
+HhbIp6Fxc20abBCfFDoQNoGUS0yS16JBRtz1yLWcDciXDyimqNJAfnZK6dCj
+NSAln7P7I0sDmxkxyd3qdNjfeTO5kocGLK8X2yswGhSWn+w6w83Os+p4Ut1G
+A+NjryVFuGiQM2u03fwsDZZPvnoewcJAlXTf+TwBgwknHy8XJgbk34pSsgZU
+8E7/lpGwhMGF3KBJ4cYVKAoIPCYzhgHh4f7vh3NWIOXjUvTvbxiIrvwo7Q5e
+AWlkklI/ioErJcRUWXEF7n9qlfIZwSCqRbk98sYytLsHVHQPYDA05ueXFbwE
+4j0x4UsfMGj8TsLP/JoH1qbe9cAGDG6QBlY/36WAajV8uvoIA2dPEf15Hwq0
+1FzwqC7AoK6SH+d1hAJvxDY4ph5iMKq5qeVGmQaRAnrIiXwMNA1l+uP/nQaV
+G3ltO+9jcG3kS+VjgSmYzFS6y5uJQX1swcrtgZ9w+rwr4UoKBmaNrxrsTn2D
+g/HtFybCMGgoLK7iU/wGhO/jBXZsy1pPXhddGoXzfeBBDsUgUubSkFzGKBis
+PMwuC8HA7dhdNYmhr9ChUFYRG8yex63H9oSNQFT2QdLBAHY+v6aY5NggiDuE
+qol6YZC2qW63N7wf5vxxM6K2GMiYoCt1p/phWP7imxwbDKwHW3oT9vQDD/fx
+RVm2b+lKLtbO9gHxZmiu6ikMTo5wEL/79gEe//7Fv1YY7OmO6Lrq1wvKrQ4H
+bp/AwFLyt2cA/iMwnZNifI0xaA1U5L0z1Q0S7k6N1H8x4BbsYG4ldsOAJ2aZ
+wva3+1IMPHSD/l2f06VGGDzJiqjz9v8AYlbKvxYBAxGGr9HG+05YTT0WmG6A
+wWylK43R1g7SdOkW6gEMaMP2kScftIN89AflHLZ/L/22/h7SDo7ksTf72R4W
+S3Kp3d4ONhFLAZf2Y5DLXpJZJBkGOsMXqPswiE/3vRam1wYXR5I4OLXZ+6Vf
++Kz/owVEhnOKdTUweCQ9Upf9tgVMye1zQ+oYJKTqDSjktYAMvsMuju1r2KLt
+B9sWIKhYJpB3YfDLW87rQkczPPf7u9dZDYPuSS9Hg+h3oHyuLz9ZGYM7W6fD
+FG83QIlnyplFeQwWH1t0u9k2wOyirfN9tlVaDhX/km6AdM4abyO2m8vG+yiE
+esifKyrJkmO/z/ul8/Hv6kCOONB/CI/BSOJNn2c8tZD1YC46eRsG1Q/PPxls
+fQUkzy5TFUn2f6hONePOfAVyX65c/CSBgVeUz71Qz1fQLpZUFM12z1RDuuDm
+SyDiWHw94hjsGI8tPWTwEiR1qucjxTBInX5+Xq6tCg6xlMgdwhh0BVxcOMYi
+QtRMjlEgPwYKUZbpegQinDubMiTEtsa10MgSMyKEPzb2ebEFg+KYSsm1jArg
+zY3wXOXD4OH0S5FQzXLY48A1HM+LQTLXmcCvUaXAnajuf4cbg5ZrfkGt3gRg
+9dzQIWxQQbjwzYqUFAFyL14aNGbb+E5AWn9HMQgZWPtOrVNhyKw8+MreYugK
+sQQVtu/wemgXchZBxELbSAmTCvPLyW7ToQVgUnDMvphGhaa8JVHOkWw4Znu0
+K3mZCrulq6WOnMmG59N+GepsP8nOLeafyoLdDsr6H5eoMFVmLBewnAk9NnoH
+JNl+aq3xQEIiA0r6mxseL1BhTfNP9JeJm/DHyvLzyzkq1HNdjee1jwG7A6X6
+zdNU0JIOMvQgXYZvm/VdHmwzRELOvxaIgrqKdF3WFBWq3vAVWXeGw3ULt4yj
+bPu2cPL+agiExOdGkbUTVDDHUcIHfQ+DwPDVXJ4fVPgfKSLi9g==
+ "]], LineBox[CompressedData["
+1:eJwBwQE+/iFib1JlAgAAABsAAAACAAAA3aJiARwTbr/in+G/ftv1P9KHeT0A
+S3i/L93uWPHY9T+R3CRlst15v3JYt4x/2PU/nD74EM/8fL9DhepEm9f1P7hj
+HgUekYG/7i8s7s/V9T9oAzDvMoaHv+gQSdct0vU/oZo6hmhAiL868+d7uNH1
+P1KxJ+Gm+Yi/kwoQ4ULR9T/+eYs8Q2mKv3fPo+tW0PU/BKgQgh89jb9b3Xr4
+e871P+uZn3ZDXJG/6fd6prnK9T9tg7Zi8rGRv5nzsytAyvU/Ed4r5y8Hkr9i
+ESlsxsn1P5GcfyJZsJK/LgF6HdLI9T/Vss0Mdf2TvxhhnzjmxvU/h3oL2VSD
+lr8KlLsIAcP1P/GL66Ez0pa//qfrGoPC9T91AG05qiCXv45qMuMEwvU/6aS7
+AWG8l7/dr7+UB8H1P07OfAQE75i/PPICcwm/9T8UiZtVsDqZv4w0ES2JvvU/
+D+equfiFmb9PJbGaCL71Pzv0pMxfG5q/ViZmjwa99T/6koOCf2Wav0qW2xWF
+vPU/Is89WT2vmr8wc6NOA7z1P5bSQ9KZ+Jq/SEFuOYG79T/vzTdulUGbv+ml
+7NX+uvU/3f7suw==
+ "]]},
+ Annotation[#, "Charting`Private`Tag$5186#2"]& ],
+ TagBox[
+ {RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJxdknc0F/73x4UkoySpT2ggI1JKMuL5MkpDWkZDg7IyyopPkZJRUkmDPiIN
+FKHMEKXFm2SGbN7IevOeeL+Fr9+/v+c599zzOPeee+7znOda+/OHHPj5+Pga
+5+r/+v9XtY97dW7eKlw2Xs82tN6O3zFFWXl5GrD/T3gZrM3xsYqNwjxDOC0I
+joW1LaqNen3K8yxAv+ecbGTtBpfWvbvn5Z+Ep4JEx27rADw6HZ7Um++B9v6Q
+4nPWkTCucfnkVXQFbo9Ld41aP4Gmjslmb9EoKLG+d3hGpKPhQ6XmwGAM6gPe
+qMWwc1GfRgk1zn+KholbvlICxWBkJErOKr/ErUcHzpbafMbrfP+frngF54w3
+xXvGvkF4rCHapuINUjKtPiQ3UUDJOq229t1bVPI/mu+cVQU+l8zrrX+yYP5J
+RrUlpQbtY7w8EcdcTMqqsx8n1iEPj1aP1OfP/SeSIne5ATPX93roHSqEcxzt
+T+3+RgjyB685oV6MZF7HyqYDzWCEl95nznzEbHiHpplWC5wv5ItkPisFfKeO
+q+9sw5W+Pt21tl9QuUlJRMaqA+fvDGxPW/kN7mz7E2kKXXj+KCHstFoZeoaj
+ucu0u5ErYR+4ei8FUlm7BIr0epB1Qj8soLUSyvUi/T+OUcHe1Zu1L+cnQL5P
+awf0YlFBfG10ew10qAcGxe71QdM3UXriSx1EpDtDGd/6kTjYCL3WBjwLDy0U
+o/+BoZ/cq737mkBNGVDSWD0I6oWHFZwjTbhft8fNTXEQDeNifa/PNoH3dF9y
+muogmu87624KaEKC3sUpda1BSP7jPpiX1oR+WBrp7x7EribWwgKxZhizcsfD
+vAdxv8Zx1VRjM14l5Mh2lw/C73fpry1RLdAO2tHecHEI+xeEXOyKb4FDm5Qi
+9/IQZOQ94x6ntUD1x0bfVdeG4HLxR6FmWQt+17F13W4NQSzH1HpqpgWfRPKc
+pBKHQHOJSxf0bIXTT7ZyLGUI60UdtQJPtUHqJ1POR24YQhYLfWfPdSBb61R0
+Qfkwlm++Kjoa2AGPl3by8T+HEb6qhDCjOpDwXMUguGEYsUc3ym/P70DtxsR/
+DnYNw3bf8cUtgp2YNhKPnzc5DC+bL4b2LzuxUyFyX6byCI5n+ygNX+pCuwsZ
+3H1jBCKHFPz7Qrtw02Snnv2dERgwDB1oUV345eh8IODBCDz8XS8ppXSh/MDq
+htzEEXjWTV4mDV14mjfsZVgwgsORpSvVNbvxPvZcf8rQCFJX2Shkj3fD8obS
+pmELGmq8z16zFejBzuczRfJWNFxvtU6XluhBy9ZlxrbHaZiQlZ8sVu1Bn/C9
+nb+caNDPlddoO9GDB2YlPp1XaWhzr5+9SOmBf2bYA+tsGkw9sv7oZVKRHqJ1
+sOefUQRuZTLMSqhouDmy+uSaUeTEmLadq6LirNcjwzalUcRXrVvKGqai1PG3
+X+eWUXzfpOAnub4X2rtkN/FbjOLIl8Ouham9WMb363JR8Cgq86hi+h/78CY1
+ZkpqdBR8QWfMt9T0oYqvne3KHoXIyke9pt198PaYd+AbbxQ3MzUFcwX6QTsY
+qRO0YAxckVCX6t392DtxW11i7RjUvUvs5Vv7UavcHPLacgy6XD8BaakBNEnY
+RtQVj2Eka+n2PJUBhJHAUwFfx9C0neXmbzCAFRUTwqqVY6i2er3grNMA5Ius
+BiOaxxAtuP1O94cB3N2wxdKTNYaSjC0zXz0GYTjsuKdfio51hpO1f+hD8G5L
+Oe9hTkeGeO54mtgwRqpdDYwO0BF85qtxisow8n+GiUtb0rGMwuzYYTeMYK0n
+n78dp6P7t8ujrb/m+Jk21cCVDjObRs3L5SNYNJal9SCCjq80Hf5VPaNgXAgc
+ZFfQUZ3JfaorNIZWnQGvxdV05H7Nupe8fgy1eWuuqdfTsbigNsPfZwxvbrrB
+o5UOXy+e8SIhOlTepPyUGKGjUj7bTiuZjuWHnD83ijMgkxQXqSPOxC/Vtpzb
+hxlQWviewlZgwuO6hX2+DQOL04om/+gx8RvKvdTjDPSF3Na96MLE7XKNgB1n
+GXBt3HxuF4WJM22+L9R8GdiYFW107QEL/M8q9G/GMDBrmspdnMnCtidWYtQ4
+BjqzxeOpFBYOn/KXJokMLFc4UXKCj43//FNZAq8ZWOnlsK3oAhvxSu1x2YUM
+bEilPJY5zYFfhuSOgg4GojWEtwYFcTDcWbphD5WBN9Om6XpPOQg37a/s+MNA
+Yb1KXUknB2c+Ge9dypjzE0WhKjqM4+pJ1v5UASbajtk0VARPQDkl+XWs6hxb
+Bp2/J81D4H5l2kd/JnorA6pdTXhofJsgVxrIBO+T4rumCzyk/cpULwtmInpb
+UoZHFQ+/a8tW9kQykStlun7g9hRSU4MzLZ8xYfrel1qgMY1TuTQ93Uomut0T
+30o6TsOVe6HvTg0Ttmp6FpsS5ubzzI8O/WLCLFKmmiIxA6rH3a6sLib80zVj
+h2ZncOyjlXXkOBNGamqWnBA+ovciZqOnAguXtd2661P4SLGB+7SaKgt+9mnu
++pV8JNeguYymwUJFNSX53dJ55GEHMy1MjwXFTffvPEibY0quvsQhFny3fnO3
+4fGTP4oeB2ODWeie7/fYQVmA5J/Psv55gwWlypNaulYCJPewEUfsLgvHZ19t
+MM0WIK/OHPN/GcfCnxyl3Zf+FSSJQ0eXkNw55ndF+BYhYqdxJc9siAURr5js
+Qh8hoqe9fCiNwcLi5vxA83whQkwvUWW5c/fW0U/lkgUk5dYHQSVhNkYcW7e2
+OQiTIn25E61KbLC/DaQiW5gMi3GXvNFgI9bXpsiOfyEJlLvjfkubDQs1x3CZ
+5IVEJ/qEit9ONnxe1KbKzRclL2otgkWc2Fi9v0l9vb0ooW35q33kPBtez1V0
+LpWKkrQl53rz/Nj4x1iiZWu4GOE6Fl9+dYMNJVfdpDDNReT6WwMXxzQ2dh0p
+VdkvtoQsd6RIJrHZmExPLqg5NMdjPh83zrChVh3XfSxuCfGxmZxft4CDF7VP
+hDs3SxJrU/2IUzIcFMT0i5leWUq+rX+XlGHCARE9sPBZ01KyPrVAV8iCA1Wn
+e/sbtkiRf3zOGF06woEJZVm7EUeKGC/4HV7ozoFF2V1bs0Rp0izbG/ruMQf3
+hN6LH5NaTiwvhazlT+JgiZVUVkjkchKbSUv3fcuB7dXPrzg3V5Bgx/wAStlc
+7hVS5do+riQmUm5hRpMcfK7UMtA8LkM29NrNfBccxwq5xIL0vzKkyiH1qP+S
+ccjcef8l+LAcCaJGbD6rNo7I8a77nA1riPiyZ14RduOQvFByxTt6DXEs3Nyb
+5DGO3xtXZ6tOrSExOh73mZfHISzb22/cspbUSV1fpxQzDi6X/a/WQXnS1/fX
+XyJpHFqzT30CquRJ0x/Z0c3Zc/vzgyzONymQPm+V1So14/BqHtnZ5qBIqI8z
+Fs12jKPn8fwj66YUyat5bRHSo+P43qIVqLldidjpv++SEJ8ALanTWEBFlZxU
+LpcNspjAyNOGLtpfVUK5G1OWdGoCZ/ZvyWluX08SJmpuKXpOoO9gwsaHZepk
+bKK8XffhBFZcvhUWV7eB6Iw3/GxOmYCVzFsjyVENEvqhMK2rcALF9bGmyzI2
+kQ7lnL3omcBebpGT5FFNgo/KIs/GJ7BPSCQxefFmMpTwvPia6CQeel8VV3i5
+hfRURza0aE+icXYwLTNEi7hxTSft9k3Cq7CWp3xxK9FsCc0MPTuJ5Waia/fc
+30bkjljFlz2YhFyOvqDVFx2iXdJuwkufRNbXqvp14nrkXtzie8yySdCO2ZoP
+8raT4xLlJ51nJpE8qWMblWxIBrjlewRkuHjIf2y6yoCQtLiHS57qcCF74sJu
+iq0xWcHd9kvJj4ugt4zzd2JNiOfCrzsQy0V5ePj8gQlT4udpvimrkIsz6a/J
+jas7SYystkZ8BxcSFUaw0t1Fku/5Fq0V5IHqnLCmaP0eYsZ5OOSgxkOpTv/M
+ilPm5EWEnMlDSx5snnudPEy1IGY/qhq7g3h4o+L9s4p6gCiJlSSEpvOgllhe
+YRR1iIwlf9n2tZ2HwbfeLiTEkrjW8q+mSUxhtO61gmitNbkfdSn+pNkUOg+8
+XHTl9lGyoOtm8s1rUygWv+NwrtmW0NaRRRMfpxDRKCa/wuM04Z8MeWsh8BdR
+Lq+KtYbsSYF5sp+d+V8Ied98ECXqSIZzw0q3PfkLm9zqos2S54iNb1GiEvsv
+XlXk8lNPnychs9O76FbT0JW72nd6rzf53sT7d+LLNMZYbXoidv6EX32Y/sBo
+Btcfey7K6w8iCdMLf6XXz6BA9NohSlcoUXOITqy5NouvLzfvaVsYRaQ+u943
+UecjThxpY+GF/xFhIW07j3w+osjVWTJITyWZT8qelN2dR4brmRYVWd/JB+nX
+TmsWC5DEz/YqfC0/SPsV45yDJwXI/wCWGKy/
+ "]], LineBox[CompressedData["
+1:eJwV1Hk4lFsYAHCydesiWyqyRFnK1pUW6j3Zri5RConIVpSdqCy3IlRipJK1
+ImSPJCJHGDMjikREQiW0Z75vjLHc7/5xnvP8nvM+Z33Pq+weYOu1hI+Pr4Jq
+//eWdQ6Vixc7kKK2a/5pdwE019njck2pAoVvtC4IaedHzJWcS99XZ6Gw8+bj
+g2N8SDHk6KYGURr60bSlZe5vPmS0u8Bv36tYVKOyTDulaBF0+lays42i0J7s
+j+Eu0wvAbF+jXlN6ChkpH8kNOLIAtWZeHR8eB6KKjgnvy8PzwFu0ti24fgJF
+ZllUjATOw2RNhKVlnhfyqxzsoK2YB7sgxz/92G6o/35a1diTObjoHvb7pJkL
+0rdMiRnymwPppPAzmYOOSMnqw1kB9TkwVGRcDLG3R+FBueP6EzyozbF5xBd5
+AO39unQhsYwHz2Ta87NV9qOPK9Il7cN5cL7ysqDWUWu0JHh0Yc6UB2dlIz/P
+yVoiFcF43tKVPFAf3rx4z9oCGbcE18lMzUL2p/xn3V/MkKmmwLKXTbOwwaPz
+S/OQCfrmyMv+lj4LSLYhpUfSGKG8pCv6p2bBQ05/LvACQi/tdL0CbGfB1+UB
+u9Z0F9K4f7A+UG8WEugiNbv7DNG2EPvvKyRnofOA0pZDZduRR4PBTi02FwLf
+OpcINW1F+0fXChS+4UJXXnIE7bQ+6ogZPLgnlwueCtxTXRJ/oRd0przpJS5I
+dCvm/e7QQ6sGnoqjIC6kiUk6CG/WQTYKXHuOCWU/GZNBcy2kx2+QeV2bC6Fe
+zGrBixtReC5/ArmaC7L0Y9sEfdUR+6YDb+D3DFx0on9JFVVDJcx9TeYjMyDr
+ReM0sdYj9SGlU9YvZsAneE/iQLwKuiOh90y0dAbKNx9WH21TRHapUq5xfjMg
+ohCeEQ4KKOSJ57tFlxmIKuk+ttglj5wf2Pw1sm8Gjl/nE50yWIM0gy6otmyZ
+gcu5hhqdIqvRqrC0Q0/VZ+DemHjBzSlZNKr66JKo/Axkdhw/njQig4zX6jLv
+CsxAQed8vPsvaTQS2mj1nsMBet46TXdxaSQser/a6ysH+gMTxyBAEn2+HiNh
+3McB8yM8QSlbcRRn9IfzdCkHbjKs1M9oi6E/Sk3ev87jgF4tqK1fJYre9nY9
+/pTBAacGlqvZiuXIxE0nIvkSNd/krzDD8yKo2JDv+DtvDvxSWvKRXS2Mhkxf
+aki5ccDClc6V/iWE0kLdZvwcORDSL/So85wgWssoTE76hwPXHpR5nZ7mR7/v
+33xxVJsDcfWqGy668qPL93e05KlxIN1Ad1S5mw/B0h+BgsocmGH4ly7GL8Id
+Rv1POWkOTHkqXLjVwoNTqwpeJ/NIiHXSCqMXENDTWmDM/5IE/LPUyWaRDUZ9
+9p3dLBLO6DkJGx9hg7j/9oyaVhJcFa+7xapPg6X6Pzvrn5AgqjC1fgnnJ+x4
+mb01v5AEoSfRfg45U5AqtXpjcSwJTV+1byi+mgSaCpcv5RwJk2OWDQ3LJ8Ho
+pOmpuEgSVH9MPs9P/gyNdmtUskJJsGTR9nNff4Tk9TdcT3qRUKf5bvdbvREI
+l78l5bWHhJr+LpOV7u/hr2vn1DTMSUiK4Y3OHxsGnZ6QlxxjEmobP/mlxgyB
+pfVprWojEuToYksrlgyACFM77Z4uCQELN6oz2a9AntvXYLyGhNwomh/b/BVI
+x3Rcz5YlYXGkUM4puxvYym4VfDIkNMzLCY7YdcHu6qTN78VJSOjV9X/86Tlc
+LmbumhUiwXk/N747uQXWP/u3njZNgFhdg89MTjOonUwtdv9FQJB3Z4THw2dQ
+ESVpYPiDABOB6Li5Pgz3ikZYi1MEPFpYezVJsw6IuEja6zECQnJz7RP6i8Fb
+WnNLZg8BtRe+yaUUpGKHlRoT6+oI8IjuEvB+kYarpv4RjH1MQHbq/F6d95m4
+YbuM19QjAmzx32Lvhu9iK/eN1W1VBGiUBTQk7irC795ava4vJeBcuanHOrmH
+OPjz2X1X7hLgeHqzxyWtp9hp45JznkkEfDwTIXTy4VM8vq899MBVAhj2fG8j
+DRrxoSK3VeaJBDwg4m766mP84qm9mcFlAjZvG46MTWjCz0Nv6uyOI0AwfYWd
+2aZmfCcvPoobTcDWdsOk6JpWHFSt+7k+mAClA9+Gu3pb8ffV3pVylA9uu+oY
+xW7Fwu9N+6KCCBDfvsvppw4d78qtkNsTSIBByrxJ4m06zqmdXMbzI0B2rrd6
+yKMN2/oUOzB9CNCcVPaPoDFwENa2mHKnztPmPVR/m4G1m/RuJ1LGl6WEssoZ
++HuNC1OX8hUbXsPu5wxs1KQSE+1GwL+tA3VWfExsePvLdp2jlGelL2QcZmIf
+crBt7AgB222u9Zf0M/E3sc2TkYcJyGzTFZ8YZuKsxoUfNpT1+mr2jnxk4rje
+vPuqlKeSgpz/+MnEwlkp63ocCWjce4B0EmDh5txrIyaUpUddeR8VWFj3Qv1Q
+0CEC3A7eeHNEmYVvO5glu1Detn7mbK4KC3tzG1usKK+ITA+6psbCAhK0Qi3K
+hld+t6losTB9nCbOT9mlpPqOhDYLW+2zjuM6EFC9TPRWN2VpeZbPNOVf90y8
+PXVY2DL99OPvlC1CjrHaKcd6vvX9Qnk+zDFQSJeFvQ4Ex09S3u8zLiZDOeJo
+u+D/fiXVcWCWio9ICx7738dtO6ceUWby8yt8pfziGY60oGyWKvHoB2VZ+YyK
+Kmr9UFnzfDblD38Onl9B7bf3a2P8Emq/V4PShQTUWTivrEBam/KmVvtUU1kW
+3pDNONJMWZare6Odut9GjzHdbuo+tfQTLULeMvGJIr35Wcp0kQ5vwT4mpg/a
+vlnvRMDfdw4dHu1g4vPIrzyaMltPJCu5joqXPPvEyJmAmrOGK4WTmbjmybLJ
+Ceo9B2hf4OgmJiaO+xpzqPfHTRK6z3YycFIWn1WuLwG8/b61agYM/M2+pX+e
+Mpj8GxSnzcC2CZpLD1P5N9tjP75JkYHlPxRZSvsTMKZzb0CJj4EDNkrb0AII
+2FBIVNY3tWHVOZv0fCq/eeWDDu4723CUmrIoOkPlk61DfLU6Hf8iC3vEEqj/
+lnlXz620GZ+r8vK1LyegaSAn7otFE553CNuj2E/AuvCcoTvD9Vhh8Sg9jKo3
+bJG8UwntNdhB0uZu3A4SLmg4lzVLVuEMzqL5tD8JVfq2sbXzlThnUWhkLICq
+XzsmwsonKvFEr3LBq0ASes7UFWY0VmK7XF5tVTAJU8HNgqEnKvGT7ePs0DAS
+MnJqlmk0P8DLZW7l8UeTIPn7ZuTaD+X4hR3xesdVEnaMyNcsrSvHpYZFbTpJ
+JBQ5WBZPJ5Xj9x2MEdVkEippC5XMHeVYrbvuqngKFR8ex/K/VoarLpW0jV8n
+4es7mmfh7lL84JxoWlYWNf+GW9aJsqU41N9nMTWbhByqVAZ+K8Flb6SSruSQ
+IEgTaNmaXoIHBrrXRtwhYaV8R13jz2IcqH1CwPkeCW0PDw3ntBVj4fQHGQfz
+SfBUOWYfnVWMR9xNHfYWkCAiYKxjaFGMI3m9APdJeBeiEb9KoRivEr9xclsR
+Ca0vW5SI6SK8b7lqg14xCT4xaZwuVhFe88FDb2MJCSFZ6iKlt6nxoi3PVUtJ
++A+uCats
+ "]]},
+ Annotation[#, "Charting`Private`Tag$5186#3"]& ], {}}, {}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{
+ FormBox[
+ TagBox[
+ "\"h | t\\!\\(\\*SuperscriptBox[\\(|\\), \\(\\(-\[Beta]\\)\\\\ \
+\[Delta]\\)]\\)\"", HoldForm], TraditionalForm],
+ FormBox[
+ TagBox[
+ "\"\\!\\(\\*StyleBox[\\\"M\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+StyleBox[\\\" \\\",FontSlant->\\\"Italic\\\"]\\)|\\!\\(\\*StyleBox[\\\" \
+\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*StyleBox[\\\"t\\\",FontSlant->\\\"\
+Italic\\\"]\\)\\!\\(\\*SuperscriptBox[StyleBox[\\\"|\\\",FontSlant->\\\"\
+Italic\\\"], RowBox[{\\\"-\\\", \\\"\[Beta]\\\"}]]\\)\"", HoldForm],
+ TraditionalForm]},
+ AxesOrigin->{0, 1.35},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ ImageSize->{396.99999999999864`, Automatic},
+ LabelStyle->{
+ GrayLevel[0], FontSize -> 14},
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{0, 2.3}, {1.35, 1.45}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{0, 0}, {0, 0}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.875957126514063*^9, 3.875957152540943*^9}, {
+ 3.8759571847549353`*^9, 3.875957188180087*^9}, {3.875957249738762*^9,
+ 3.875957266071168*^9}, {3.8759573346853323`*^9, 3.875957362091642*^9}, {
+ 3.8762091314286547`*^9, 3.876209168479266*^9}, 3.876210214519513*^9,
+ 3.884690547837318*^9, {3.8846907344980288`*^9, 3.884690754914673*^9}, {
+ 3.884690931703446*^9, 3.884690938018208*^9}, {3.884691030959455*^9,
+ 3.8846910405584087`*^9}, 3.8846914788814507`*^9, 3.884691620259225*^9, {
+ 3.884691704823866*^9, 3.884691710395669*^9}},
+ CellLabel->"Out[14]=",ExpressionUUID->"4f815cd7-c383-4356-a54d-23d8389e3529"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"Gls", "[",
+ RowBox[{"[", "2", "]"}], "]"}], "//", "N"}]], "Input",
+ CellChangeTimes->{{3.8762095371659527`*^9, 3.876209563909773*^9}},
+ CellLabel->
+ "In[107]:=",ExpressionUUID->"f36a97fc-860e-4e7e-86d3-36fc120dfab0"],
+
+Cell[BoxData[
+ RowBox[{"-", "1.3578383417065956`"}]], "Output",
+ CellChangeTimes->{{3.876209538327829*^9, 3.876209564066291*^9}},
+ CellLabel->
+ "Out[107]=",ExpressionUUID->"d40435e8-6022-47c6-92e2-dc02d3d8722c"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"pSus", "=",
+ RowBox[{"Show", "[",
+ RowBox[{"ParametricPlot", "[",
RowBox[{
- RowBox[{"g", "[", "1", "]"}], "->",
- RowBox[{"-", "0.0216363"}]}]}], "}"}]}]], "Input",
- CellChangeTimes->{{3.857747495843032*^9, 3.8577474992661*^9}, {
- 3.857749029593395*^9, 3.857749045024091*^9}, {3.857749131648108*^9,
- 3.8577492078973837`*^9}},
- CellLabel->"In[3]:=",ExpressionUUID->"874f84cd-149c-43b3-8711-b9fd0129e036"],
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "15"}], "/", "8"}]]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[", "2",
+ "]"}], "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}], "]"}],
+ RowBox[{"7", "/", "4"}]]}]}], "}"}], ",", "\[IndentingNewLine]",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "15"}], "/", "8"}]]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[", "2",
+ "]"}], "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",", "\[Theta]"}], "]"}], "]"}],
+ RowBox[{"7", "/", "4"}]]}]}], "}"}]}], "\[IndentingNewLine]",
+ "}"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Theta]", ",", "1", ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}]}],
+ "}"}], ",",
+ RowBox[{"PlotRange", "->",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",", "2.3"}], "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"0.015", ",", "0.105"}], "}"}]}], "}"}]}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}], ",",
+ RowBox[{"WorkingPrecision", "->", "20"}], ",",
+ RowBox[{"PlotPoints", "->", "50"}], ",",
+ RowBox[{"AxesLabel", "->",
+ RowBox[{"{",
+ RowBox[{
+ "\"\<\!\(\*StyleBox[\"h\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\"|\",FontSlant->\"Italic\"]\)\!\(\*\
+StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*\
+SuperscriptBox[StyleBox[\"|\",FontSlant->\"Italic\"], RowBox[{RowBox[{\"-\", \
+\"\[Beta]\"}], \" \", \"\[Delta]\"}]]\)\>\"", ",",
+ "\"\<\[Chi] | \
+\!\(\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*SuperscriptBox[\(|\), \(\
+\[Gamma]\)]\)\>\""}], "}"}]}], ",",
+ RowBox[{"LabelStyle", "->",
+ RowBox[{"{",
+ RowBox[{"Black", ",",
+ RowBox[{"FontSize", "->", "14"}]}], "}"}]}]}], "\[IndentingNewLine]",
+ "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.875952981547227*^9, 3.875953315769273*^9}, {
+ 3.875957061887289*^9, 3.875957104302837*^9}, {3.875957134472674*^9,
+ 3.8759571357521*^9}, {3.8759571703214827`*^9, 3.875957176129848*^9}, {
+ 3.875957284251436*^9, 3.875957289963092*^9}, {3.875957366732642*^9,
+ 3.875957382812718*^9}, {3.8762091878796577`*^9, 3.876209192631675*^9}, {
+ 3.876209751602669*^9, 3.876209811843375*^9}, {3.876209848116508*^9,
+ 3.876209861628406*^9}, {3.876209944462913*^9, 3.8762100154872293`*^9}, {
+ 3.876210224923583*^9, 3.87621023768332*^9}, {3.876210756477833*^9,
+ 3.87621081543836*^9}, {3.876210894360219*^9, 3.876210901623786*^9}, {
+ 3.884691262125641*^9, 3.88469130343027*^9}, {3.884691369512054*^9,
+ 3.8846913697035637`*^9}},
+ CellLabel->"In[12]:=",ExpressionUUID->"b1086ee8-7679-4537-81e7-3871b266ebb6"],
Cell[BoxData[
- RowBox[{"{",
- RowBox[{
- RowBox[{"\[Theta]0", "\[Rule]", "1.14841`"}], ",",
- RowBox[{"\[Theta]YL", "\[Rule]", "0.989667`"}], ",",
- RowBox[{"CYL", "\[Rule]",
- RowBox[{"-", "0.172824`"}]}], ",",
- RowBox[{
- RowBox[{"G", "[", "1", "]"}], "\[Rule]",
- RowBox[{"-", "0.310183`"}]}], ",",
- RowBox[{
- RowBox[{"G", "[", "2", "]"}], "\[Rule]", "0.247454`"}], ",",
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwVlmc/EIzbQG0Vkk02kZkt+7rsmZlRsrKKzOy9srNLyi5kZW8JKTJCWaGh
+krgTQinJ839end/5BOdwX/YydSYiICDwJSQg+H96NVZdTm69r2qWXOSmosSp
+QvNC/nKlOY/qRGxuTiBdrsqJvaTut3+IVemxZerQpUllejBmNKX6B75W0vpb
+2v5URc32sdD3vmV8yTnb99xoQiWP4BjXv4JF9Dw1cmudZU5lw7+GhclkCoX9
+cqq+ZX9Q6bcku5V79SXefkdP5dOyrMJ5WuTi0sNBpBL5MpXj/p8Kqbj7Zbnd
+ftQhanFrmNtUKTM5vDHC/ASrqrl/GKruqAxfXt7XO+jA4cP9ruH1XyokhgMy
+3dSt+MpMYDZ2cV+li+yCuvTvRnzF6rNFREYAqzL5QjRR9SiePpAcpUwEpscY
+3Nt+12CrXgIjTw4JiFV1S+dVVOLM7Mqi9VFyMFsdvta9VI4fq1Ila/OPwtVn
+/zIqkx8g06ULvwvPUYLc04po/dRSXNKmvdLPSg2X3n6um5guRqV+ExIrYhoI
+7uY09msuREm9297ECbTwy4idto0jHz35w9+3MNMDUXw2mcF8Ht4YszPUaGeA
+Tqff3gbzuXiJIoA63pkJLEEmSo/+NtJs0WSe52KBy3WFLQOROfhJ1lok5etJ
+KNBoiu5myManivp/yHrYQIaOx8plIhP7R1Zry4s5wOyu4rVvVRk4/Sxcnk+H
+CyacLG5EqKXjtRClr1e1uCFq9oH6kt1N5HflHqTV5wFWW94OkYcp2B448ZLG
+ghdqZW2UXBiTUb2IIeaC6ymgKPpap12eiNzCLp8XI/ggalw1i/t8Ai6uGfik
+5/PDQ7fapn62eKyzfEDv3HsaBAhJLjsdxGEkfzyv6ZoArIiHct3djkUa2QVz
+/ZNCMPyQW1bjIAabuoJ7NY2FwZIt5UYccwyKHusfl00VgfNzASot6tGYZlKj
+Rv9SFMZCw2gcwqPQu0CRf4pBDHxfxEFwYiSqzZVdaZUQh5LMgLeqZyJw3cjK
+221BHJ7WNjhTrYVhx+mJPMJECVDuC8sj6QxFAxsxv8CzkhBJtZBDmhGMbLJl
+lN8LpSCHfilHKTsIN0XUgr9YSEMVsS5uPghERR6lrRoaGXhmJRV5ZCAAJSXP
+pCqPy4C9k8q5hA1/5BlyCs5Jl4X0RwfzN/j9kU1l9l+t6VkQfaxKKXnFDzUq
+JYLimeUg0eBxVNmR62ikHMTmUiMPppcZb7O7+OJnGhdHlxAFcK+51lcy4oOV
+gg1TTPqKYBGxZVAt54O0Z4hFAjmUgERTy7mnxhsrOY7KRu8owVfXJ8evnvZG
+w7CJcckxZdC4xegdZ+yFjEKiXxIfqoBuNMM2WYAHcra2q6dIIQTXazkbxl/D
+M6usrn2PEFhL82mWStyxpn+QMkJYFV5UiLHx711F84cJw7GCasAxIT93R+Iq
+/tDf93hRpQZexRR809evYHLsQmWaqDpIj637l51wxaHHGhczz2pA6kTcv3Nu
+LlgropE30qMBbZY+WSvDzlioxkEaqa0JGg1CAteKnHBhu0ZT30YL3Ng/JJbT
+OmG7zx9WhzUtcJwlqvRKcUT33P+414K0oZP2d25S6mVkPfuX2PiuDkzq0L4w
+o7+MQ+80aIVEdYGSaG2osNgB28lFmn36dEHNN+Lf9DN7LE4INtP4rgeDhIfc
+F23tsWKC7dFovD6YCxt/Ytu1w+nmNIvHXAYw5Rw6Vhdii+l0vNGvrM4BSAyx
+nB20QXfdn/E7P8+B6V768TkWGxQY71wKvm0IS9K3U00mrPFTTsdY5RsjkKZ0
+4rUOvYCGToK7KnImMKfIaPFiywpfzE5tjaaaQK03hU7kNSvs3rMiOfLRBOj9
+3XepPS1xW+1APTbNFAifcbDl7ligQ96aQ/+yKQzPvcvqibBA9jHZwBplM2CT
+89axKTDHY83+oZEbZuCwb38pQ8Ic50xprrjqnodlHpBdGDqPdOQG2nv3z8OM
+s6KIKsF57C01W6W1NoedtKKTVummWLXkeIlj0gISflg66sib4hsmBT8Ut4Rw
+ihqp2GUT9AoY6yDPsIRrMayR8RomuJrrQhJnYgXsCWPKAr+MkfTjzdNyTVbw
+Lqp8+3m1MYZhZXM6wwU4tbRa2HrSGCNNn5qfXrwA1tPDbC8rjVDMiTrTBS8C
+YbhdbTm3ETIFv4/TLrsIK9/MuPVZDdFSIWjzm7c16Pks/xcgZYBMG6NJndQ2
+MK/YGi0wpI/yk7HlBz420J/Jvypmp49kk08Oh6dsQDTUs2c/Ww8djxYIEufb
+wofzWS9eMOqiqM6UizezPZh4z8e5dutgfMzpwlZ9e4g6qrz5wVEHDXRlezDS
+Hrxv1DpItWujIsUEL9eKPdgb0AmT+WshfXVdHHmnA6TWkmSLCmhhxKD74ZUN
+B3gcw6Y+taiJR4FZlYrvMoS+iRMN0tPEkwPtN9kzLwOv82tZZlkNrI6XSr5w
+zRE8vhwmyOyoY6FsYdDYfUcYrx0USGlSxzfEDeyxC46wS6q90iujjj0tvkea
+9J0gkvnz8k1tNaycPjPDLeYMnr+5ou8fV0Maoa/rRVecQcaWVbRzRhXV7pV3
+2ZY6A6nfx+lXV1Xx5oLwQQGjC3zsrOuiu4fo/Jy7l5PIFZ7pZ7zPuop4VRrP
+FCu7glV8WeqKHKKOwqSdfbAr2Exbcx00AR4EL+UWbbmCmYnxvRE9FZQmrBdn
+XL4C90pVi/h2lJFmf/NmJs9V6H8zcHG5UBkNXg4N6dtfhXtlx+8E7ikhPdVr
+17DFqzAamJrN3qWICRx6uiOzbqDy50lJe5A89pCrMx+ZvwaMfGlnM2TlUXN6
+e5j1pAdEBK7E2e7KoWgPgYnbRQ8QF1m3GvWXQzJdiqC2BQ949s3tvmf0WZz8
+nlFEveQJ96by5sO0ziLbv9cXfvF4geeYeJct5Vkc/PpIhMXZC1Snrs/cvCuL
+CZm6fcfWvODs+M4f8V4ZNPYLvGMS6g0XZ9Itr6fI4MXoH/kiBd4weJP5/DVL
+GaQZ9T9/6ok3mAo8EPbfkkbeVycbrhL7wIRrsmaKqDT6745s6930AYUA8ijt
+p5JovDjrbFvuC5LHv1Bn3pHErd2h4sMXvrD3ibrJyVMSJb2dVrrXfeH9oDZZ
+Caskpg488EqRuQ4dXDoa4mESKPjP1TLw+XUgLOjM+WAmjondQBaz7gdZZ+mC
+x8XF8QqRiet7Wn+ICxVsEDgujgIsy/JWcv7wrDvyN3+OGHoR1B/Pj/UHPq3m
+V4o3z+BqFkmgO2sA+Ft95/UrFUH7g6Ir3MaB/+uZBo2W4/+8YjwkJiQQjhr+
+Sl84JYLrMepixGWBEEpvPa1RJYyenyzNHP8EgnhV5kb3YyF8GfPuQkF5EHiG
+x1HNkAiirSuc3CAJgcwk4t7kCQEc2JQx1pQIgduNl57O5gsgeSZ1VKdNCAwI
+lNyXOCuAbs9ZygjbQoAep30qfE/jZ5W/3wjdQ4GV2kdwkogfbfOY3vfNhYHE
+AsHe8Vk+bPjeQEtMHg4K2sMCz6r5sCLL4sFlmXBI5OpbybbgQ45Im+6wrHB4
+GVR1mNpwCmWu8nazGkaArejT17dCedFDmZXkYDgS2vzliAos/uc0gWOc+5HA
+EnjuFokkL4qeYZesZ4gCgljOgY1VHnxZW+DOrhUF0l03PelsedBEjWWrsiIK
+2vxm1pMsuLFkWDkrwSMaTjaSZ3HKc2OS9Y+9N3HRYF3Gq/OblRuNRt5wyudH
+gwn/m3r/j1z4KIi1hH0kGoStF1LCfLmwRJqXMVIwBsR/cO7IKXFihLPCfvHX
+GPjJ0XIofpQT5d71Lz0miIWNsOgfeTMceOOLt/kKcyyEe6j6dvhy4EmW77N2
+urEwIb3ETFnPjjd8t7e/VMXCiYQizj1lNqQ50vZFzzsOXM1o/Txp2PD1+9fS
+YklxoBXRI6G+zIoVJJofOEvjgKtU4hVxGiu+c72nzj8VB3a5a6PPPp1E0neE
+357L3QCF7f3moCIWfDlXbmBOEg9VhEzZd0yYMN4oVDj7QQLsOua/UhJhQpN5
+owjpvgSg6wjQECdnwvc+YZuf3iYAmYK9GWEPI957ss/nwZQIMzGBL6XFGFGc
+SzxMICURTvt8HRfjZEBbBl5G9E+C7JZIO5d/9JgT7v2pLysJVpPE6t+/pcfM
+DNFCk/okUDKrnsgtoEev5l/jd/9LgrR5EKPgokfPc9mTry8ng4jB62BPcTp8
+9Fev561ZCniEbhTG0NHh6conhMq+KfBfcrn7+E9apGiWIKnKSIHvlXqdJ3po
+cVvoi0LtWAr4H2gN8BjRolinBI+VTiqQLC69Ph5Kgz5Nh4HKeBPSlyjcz69T
+ozTZuWUphXSo1Sy2TuylxlfDP0nqL6RDkZ+pL2UONSoMmdHLB6dDGG+MIJES
+Nf7SZvzt054OHhtps+npx3Hi6ta5J6wZoGX2NuKeBhXyvQiqIcjPgHweja4I
+NipkpRht5qvJgLYTQ/YVO5S4cDOI16Q7A/jqjYKel1Eic2mtWNdiBqR2RYkJ
+U1DimbL4LwvsmWBG0dd+/OMxvGRrt2ZYkgnL1C5fiXqOIZV69Ns3DZngQGoQ
+KXX3GJbILfC792eCSseDGW2zY9irZNte/CkTvnHc5hEbOornXu53WfJngUjT
+E9nU7iOY/HTUb6cmC7btptzsR8lw5ucf94892VDIt9q/XU+GIsrXqSjHsyFi
+fMW/7hYZQt47FsX32UAy+7qj0I4M26//8q48zIYnaX/Dzu+S4iGpNtkg5gDb
+j/uab0+ToraauirpQA7M7V95mlBBjOYuASNJL2+BZKi+fGEGMd5PbMq3e38L
+nqcQV00FEyPJrWPPFTZvwePArVvFBsSofGKdg5D2NvxYi776aJsITzEcXRgz
+vw2iSMftq02ETdeJKV3f3QaVnsA0SRJCDPu+cZiznQsrWivDqhsE2Kc0SpFO
+dgdSo56Ies0TYJhOj2E6yx2YTi9P4G0gQL6kucBSuAP8n/9L+2ZHgNMVyzp0
+qXdAR/gd7/0bh6Bj+T2Egz8PbFgbDZjlD8CQ6CLlnO1d2Dz6d/I3wwFc//qG
+6Y7vXTDbsnGn2P4LkrS9Brbxd8GJwTDpce1f8P7nKnFQexdUK0YczvP9hQsu
+9G/jDu6C2oWPGmTs+0BSSx3SVXAPnrdeqXMT+Q1shtN7Tz/mw/ONwN26E7/h
+wPGj93+7+eDPo03BtLsHh2YDyHy0AMhvF7zW7dmDgHeJK9FiBSB78bqwkuke
+GAR/PncrrABun2qfPx31C6RKFa90MxXC6bkc3bEfu0An7+xEYVoEo1tbmevz
+u8C1aFX/1rkIrEwWnws+3YVbKv6mLcFFMMRBb7ybvQvz2hp5fiVFUNo75DQl
+uwvprzUlpbaKQJjFvi49ege+pAoYzekUwwVqhrUtwW1oj/gTY/FfMaROi/rW
+MGxD7J1/kQ67xaDyN9wsnHAbjHrpqL0OiyHTsvuBw5sf0Ks89imTrgSwSYJH
+IvkHPKg95fZTsQRMf7nITW5sQQvjE0LFmyXQp60fdW54EzzJF+WbJEoh7dmu
+w932TShlftNwQqkU7k020P0p34SSs+S93lqlQJGiELMVuwnt3A+L5KxLIZiz
+duKxyia8/fLPeyWuFCiN8vs9vDaAX/BafN9cKXgOl7ud8FiHqd5TP6/E3IcF
+2u42O/11mF6ctiRKuw8fb5xPmhJcB3N+3bHCvPvg3RSxIrryDZYopnY+1N+H
+r4tJS3mO30DolS4mv78Pdk9+hwo5/gdnJxZP+ig/gPFFgr3F0FUY4Kquydp/
+AA9irM6E266CJuFDzXTyMkg6Q7arpLoKNWbJh2l0ZXCwypJ0knwVBKR2Z3OF
+y6A8PEhKN+cr+Ko4C45bl8GguWONcfMK8FwneTrVXQbUjF6eP49+geu6Q50Q
+XQ7JR2iYtreWYURVQmcstRwKG8PIyeeXwTirr9DmTjl8nh0x9KtaBu+ByMr4
+unJgkBVwczBYBlP/QY0/b8uB+NLGpkfOZ3C7Q0BzRbECOg59xfOkP4FdvaLU
+5b0KkJveYdTn/ATrt7nJ9UgeAqv/ryM0xz6B5r3WNukTD4EfbzTMvf8IalLN
+DbQCDyEwVzv5fOpHSCJrYduyfAhyggG+a1+XYP/9cR+59oeQveVh+bPuA1Bm
+sXr/DKmEU8y0Ba73PsBnFoXT6omVQEzepLoe/wEOGnKtsm9VwnHeJ+oyth9A
+djDpjEp9JQyyEAS0UH0AnncnBx8vV4LN4eHz/g/v/veBf+qdTapA0W5HOjlh
+EfwcJukdhKvhSMd4r4DjIlCVL7pxyldDR5WC4ZrKIsRzhjkuaVXDO2Pzwemf
+C9C1JKLmfbkaenGpUffKAnhKfH7bkVcN7YmPJGNM5gGPXVw8OFIDtbb98aeV
+5uCUEsmB2VoN8Nk3LnqzzUGj0XVa7b0aWK6lNZ/9OwukJazzymS1YBsZLbj/
+eBY0SjfiZXlqgXQ9YfKu6iw0ySknnL9YCydCCKQ4DGegtPxTg8ZILXBQMxXY
+hk7BTOnxd0T1j8BzWaiR2m4KlOplhr16HkGx6g/2ebUpyPB4VfZh9BH8GcxJ
+7jw2BQEiFNIvVx+BuDFVW/m91/Bd9NHqHG8d3NptHqbvfwVPXd7XP7pTB35q
+/T5ZXJMgNm3G16pWD+qqQQ0bRybhcNPzvxrdehBiHZew35qAeYlTSWXG9TAv
+8KsipH8CCBYHjPJt6+Ggw9Yq23kC/DK4BYtD6mGSQPxYgu043O38REnUVA+s
+7MlDasWjQKTefewsXwO4WdY2xPuPAtPKG0p3kQZQmlx7+E1vFPL0B6lKpBqA
+0I1FhePnCAwbpNPQqTVAfrafL73hCIjmTGhT2zWAs+bUnjjJMHRaGdddzWsA
+gtvvq00SB4HAgW+vnroR7AW6xcxtB+GB52+vF0yNoKEjrBQmPQhJFCkhnzkb
+IX6h3EZ66TmYBjQZ84g3wqaawLSO0nMoeVYJj40b4clni7ZPewPQQNwp7JvV
+CBsaamTbyf2Q7FRpucrUBP/Cf8aecu6H2Pakp1ZcTaDnmmzqD/2gWjVCMyLQ
+BPN9M85+O33wx3zCvl2+Cfi9p0iX7frg4b96llbrJqCm9KjyV+qFIfGxTCxu
+AmNX5yRqpm4g/cf9skK4GRpKCVNtZrugoG7/z0epZvDdZptcyO0CIQsyUm6l
+ZjjXZ+J3haUL/hX2dpcZNEPGv/uOjzk6YZG18sQrj2a408FYIS7ZDv3XHx7v
+qG8GEsfjJ9lCmyEp7tGPWbkWSBPoPcet2gy0h4Ps/qot4H+istyEvBmEht9m
+M+i1gGXuEzGpnCbo/9fjbW/dAl2S8uG7dY1Q2ZxowxHRAncecYVYbNRD52xB
+qcpAC4xcouJjZamGiT9OM2JmraC+a5CcVl4FCstYS2DTChfWqTsuSVcBXcxZ
+yhmXVhDfL+Y8YlIJOolC4WkhrVCwdeFtZloFUO/urMqWtsKOXHGjwMkHsH0u
+jvvaj1YYXk0wdPl4FzyaNRoKbrfB924j+QHau6DOl7ZMVdIGF/lS55+q58Ew
+d0lBbHUbfAjf3iqryIUutsqeyN42kLix6LsckAPXulYnutbaoMEiz7/CORUi
+I6T/6GM7CEyHza18tod1oXoKls12yFzK3hmSswBqiuY3LPvtcO/vULy0khZM
+7u5JtZN2wP8BldWZ5Q==
+ "]], LineBox[CompressedData["
+1:eJwV13c8188fAHAUomSTkdGQb0mEkLhURssqZVc0lJFoWMlIg8iqjIyIki1k
+v+5jfBY+b7KihJBEUchI/N6/fz6fx/Nxr3vf3fvuXndvecerFhc42NjYLMmf
+//9/SRn9VuJgCPQtHRZ7pCpQzMcJHa2vrjByd8ehPuMK9LA35OUZ52AILhCN
+Pp9Rgfx+FF0sYIsDn6Fgb02HSpRYqyGxLzsOiuaFGduvVKJ/zcJjR82fwIvS
+giaFm5Wo3b7t0Z/Up3Bvw3st7chKlGw1dSdEMwFc3QfYmbWVaA9fS2S3aQpo
+FAX8yZevQozJ00fERV5C205ttHeyCoU3DNU3276EJvbF0Md/q5B5Eqe9ecZL
+uJq2xWySuxplSvHcp6tmgs5M3TeWXDW6kbt90PNYFvTn17wRPFGNzm8lPD94
+v4ZiA7pqQ0U1yq6QCouueQ2Zl8fy2qjVqNlhRUSaIxuSeTkWx9urEc2iWzQr
+LBseDA9VGP2sRr9uhOVHJ7yBg5kmW19srkEPRTu3fs3PBcH2PBve6Br00W5S
+kjaVCy0D3Gv/pdQgr+3fSv1258FOgVdsbHk1aKd++oWzpXlgc92xUZNRg+Ke
+pThIVeSDPKe2+k2OWlS57Oa5164Q2PkKr7l51yJKlBy1+WgxbPeJLjx6HdCM
+1cGoDNdiiOgfO615D1DpqY3ZjhHFEGb65u7+eEAOQtYiiaxiONkW9yi3GhBO
+vPN90vQtDIt/RD6rMFI/Kr3V2KQEeG/4LBSZYVQ5kNKY61YClmqjxi9sMNqg
++G9w8VEJWHi2Nqedx0h008buE00lYP5T8UGrN0aNe2i5i4alsDvw6vffLzDa
+VPUzacfeMhDZc7Rv3xxG637lOqhYlYGtY/O5nRwUJGNZXi57swxmwyfddvJR
+UGuVwa3aojJgqW58abuZgk71RC/+2/YONEwH613NKCgrqZkWK1AOR6pPKunm
+UZBQem7Jo/cVUKP46pOYRx3aIB/4ePdEBdi01cpS/eoQRaMphMZZCV59fgz/
++3WortL+e61WJew8XHxqJaUODRkprxlJrgTesPILFqw6xLp37D+JC1UwoiXw
+YG5nPSpKCZv1Gq2Gz2qjCW6T9ehD9kjrlVqASp+y699cG5HJht3DDe0ATPEc
+L13vRhTr5eosOAbwkLCpDwtpRGcq8mYwD4Ywl4VkvsRGpDL6YmxADYNIwSOH
+AmojGk6MLvhyD4OK4M52XRkqYld9YcinSIF/Gmn9Po1UdNTBUeu7KgUSN/1u
+DSOoSISl+RvrUEDR943z4x4q6h6TJ2xNKWByYEDC6wcVeZYefGl0kwK7n9iH
+vhChoaT70k5/6ygAe9P+u3uWhqoGMUyeroOp3BFB6g8aqtV8691+rg70DSYs
+3v+hoaJlZZ9ClzrICGGONK/QEKPZ6fypO3UQkHnp3SNBOjont8/VIqsOlna/
+lddQpyN7y7pb/NN1UFRWaC51k46S//n9eLhUBwbsxZycAXS0K/vM3D/Oesh+
+1irxKZSOArz0et9vqAeR+xHqFk/oaI9rnr2KXj2MclRw27+lo60jAta19+uh
+dhf3yPA4HYWo6mt2RNVD5u6K2dTfdGRxV+f3UEI9WD9r7TJaoKOnaioCv3Lq
+YUJgccqei4GCMsou1hH1EOF2YyhdloHc3vAYGYg1wOEy4zvhJgy003/X30WZ
+BvgT5LlV8CQD/Vtaan2zrQE0ri1ahFgz0JdA49/zWg3w9/Bu7Z3nGUgjePKO
+qW0D+PFqTz71ZiC1+SiHsZQGkJeLcMHJDBRudsWnJKsBcnSGUxteMJDMo8RC
+3/wGKL+RSH+XyUCnar4Gztc0gL3XudkreQxU6TTNUfmpAe76i5esrmagg8M2
+Ng7DDXDkZ0xwIDDQjvSs0X/jDRBqWHJwvI6BqGnBhcp/G4CWrpESwWCgWe5x
+i9MSjeB2nr+Cs4uBMrm2FHXKNcJP213yCx8YqGBQ1cFUsREiX1Fuf/zIQHZj
+YkXqmo1QJTIg6jbIQONrIx7TTjbCRt81RP04A4l5rq6Us2uEVPqdUeWfDNS1
+8ProDadG8GyznH8wRbZ3wKdQwLMRBPncOXlnGUh7oKRd4HEjRDxa7EP/GOhJ
++eZwg6eNMOs2x9i0wkCpH0MoN5IbIYhT6u0MGxOlrSLK6DmN4BS7986F1Uzk
+OvXYb7y4EQZpTk6ruZgI//3B5KlshCIZPqMYbibaTxcR1aY3Qne7BL8fLxNF
+Fb0QPUI0gsjY45nOtUyUyXcy91RXIzwMf/NRlo+JqkwTXjkONwLP86rCQH4m
+OtT3WdBxvBFu8yamPhNgIkuVgo32vxshR2AiOlmQifTydLcaslGBesg9+KYw
+E43oJCuoc1Nh/eljQYdFmKjAntmxcT0V3Pvn764VZaL7V6N2rxKlgv1cSUQ1
+6ciC8gPDUlQw3VmeZCfGRIt6vGsom6jgLaJSME56bvOR0IT/qDDZieiXxZnI
++6hOjZsKFbbWr3ztIn0kPKVYV5MKlWP+a9U2MFFCxm5nHj0qRL0u1wggPbu/
+ZKD1EBU0DV9fKCdtttwnE3eUCk8fqCcNkg666Lz1hAUVWo9rdy2QPvKHZ47P
+mgrOCqFi7BJMJC9z62nDGTJ+6oPtHFm+eNCR69ZFKrRdH838RFq80e/wVjcq
+BKyynCkkPdK2pOJwnRxPkYGLO2l5hQjNGD8qdMC2n+Kkf4pEn6UEUyGTdtg/
+j+y/0s4rBeMPqfDDYFhkF2nDfbe2CUZTYUVQ4t1zcvxFZiLNqvFUyOn4fe4P
++b6uVSemHU+lglbQeZF9pD+Ln3t9PosK7K3GLW7k+1Y+VPX1Zh4VcivPhYeT
+88Hjvuhwt4QKvxZOH38ixERSAm4iEVVUmL5bKRhOzl/WrANvdB0V+ISWu1zJ
++eXTlTgUxaCCYoJ/0l5y/m1tvjSEtVLBr/u6/Qy5Pk6k572+9pkK9y8feL+D
+XD9y3ruEHEaokEBbE5TNw0Tb7gBhMEGFMo7tW4XXMFF98sQJ7kUqvOTdeOgN
+uV7ZPWfkBtlowGk6XdHNwUSvZ/tNyrhp0OOrJPWLXN9YXKrXQpQGdTG+caNL
+DLSuHetKStNgUiwhq2GRgcz9/6zv20QD1K0UHzHPQCatL7gsVWigYuOwbmia
+gYgWu/T1R2lglavQkTRG5ge5eUaROQ08pQQDur+S+eg+h7eZFQ02RRiNLQ8x
+UO63l16BF2hQKfPll8Bncj8qW+vl3KHBX5MSI/02BqIUvvu5/R4NbjIGvHtb
+yPoRVN2sR2R7VdKHzjAZyEjqW/3jBBqUnjWO2VHPQGP5VvXKb2ngmmF6ifWW
+gS5wXa4Or6DBbMNYfX0BmU/z2lyGgQZ2CkEPX+Yw0MKpEwsPmmnwqJtXXTGD
+gQTLtsuljtCgPf6TjmY0Azk07ZfhEKeD0atEFbfLDKT84LbdijQdFhw18pXJ
+fFrnlvNyfhMd1qmOdH50YCBuT2v7fmU62LmULc+fIPPVjtUVtw3pkDqT/0ZX
+l4E0TT4/tj1Gh095pe62mgykn+kZqmFBB9MzKZHnVRkoNmBNd589HUoco99p
+bWWg10Eqtmw36NAZy+07upaBmrpUr4IvHQpcXb87cDJQXqBmmW8gHW5ydthR
+lunow4Lp6Eg4HbT0Nosb/aIjwuGo1ON0OmjrKIac7KSjvtjhKWWCDlD6Otkl
+gY6E3+rbF3fQwbKCKRoRTUcyafTNu3vpYHUMyuIf0tGK7Se6wggd4gZearj7
+0JHXgWulw4vk+BLXuglY0ZHckuzW0q0MqFXJ19pMnqfLj86arGxnwKfK9Kf9
+3HR0N2zjnIEKA4TXblofukxDPvxbWul7GWB/hnc5bJyGYlWy+l+aMuBP0pm6
+wAYagm3cl8u9GVAuoSrF4UlD2m93Hrl+mwGqRQ+OsznTUMd6Hb2dwQxoL7O6
+MWZPQ5usRC4+DWeANLKz9T9MQ01W9SMGKQw4V9F3NV2Whl6qbPtPqp4BJ9Ku
+hX+mUVFA13mebBoDDuT3rwRXU1GY+NYN6s0M8E+K2S5YREWvUr7T9DsZ8NuY
+efR7AhWdabmeqjPKgFL9DLOIK1SUECyc/oaXCbsvORoGc1ORI5f+7nX8TBgz
+qvF9t9iI7iifXesizIQTG8SnOn40Iv6A0RQ5aSY4VcZq0dsb0a2ba7xddjJh
+0GvL1YiURhTKdDkVZEo+j9d5o9+uRlRXMJxdHs2E+Hd/GFJ6Dejb6NjYxqdM
++Fnzbo6u1IAifOd2ByYy4eTUuZ+WUg1oX3f5qE4GEyTCt4evn69H5k2OAlEl
+TPh7+kzNbEE9usVmsJzbxQTBjy2h1yXq0YvewPyhXiZYBRVa83DVo84ym1Dx
+fib4Unkk/X7XoXMUmfybo0xICtyROMOsQ9tDJWWE55mweOie6F7fOnT/ijIn
+dUMTjMjznB9so6BHkdMzhHQT7CuS/KRUTUHZuxK2dcs1waJ74rR5FgWFfLxs
+16fYBF5249KKvuT9NkFMnaHVBB5XetmWZSmoKlBPXM6qCX5JySRLkffvTwJH
+jnTFNcHRRzMXq+NrEO5XohyLb4KW4HVNThfJ7w8LnlWUpCaI3tslU6lWg4Lj
+WRPp6WT5ty1511qqUfUaTf9jhU2Q9lqkfXmpCiEb6UzNpia4x3C6JH+sEln/
+vO8UzmqC4INi3v4ilei6CA97X1sTXM6xORfwqQJxcez57POhCSCQFnPdpQJt
+O+R5MHGkCQyLp7ikQstRelUk/eZKE2hnnJRryypDt3gEebM5muHfRRmbU5fL
+0HeTad0ezmb48jFZx2dHGRp7FRmktq4Z3pZcu/MkvxQh39l4YkMzRLmr3xcr
+LEH3+jLXvVJthnjzUo03qcXoci0/+8dzzaCl3lmfYJWLDGN3TdWebwZR20kR
+j8YctL+Ri+fFpWbo/+sR6qCag653/a4649YMxwlB6m2uNyjI/MBBmnczSBRW
+b07KfIUkezMr0ONm4DVe+fqrNB3xnX9dwxXTDMqamR8fC6cj1s8bf5vimsEh
+2j5UyeMFyqs5q2ie2Ayb3ff+Z6uQhkrdexwNM5vhgDDPo8p1SYiN20utr7IZ
+HojLyjQpRKFOerfxg5pmOJwmm+IaGIFU+P1eqeJm0E3PMWHmhyHr7kOH7jQ2
+Q52h7culf3dRXIe2GFdrMxiGjGZRmJ6ILn5mom64GQDMKEP2t8Gba5S+sq4F
+BDy0rku+ToPwqns2Ofwt8CMZmL+evABCfZLHUqgFmAe/bHYLTYdbe6Kp6eIt
+YLY7rtru8ksQKFbu2rapBXikaAf8DF5D7uE1Bj17WmAw2dW3S7EQjItiNS9p
+t8C3W49RTl4hxFW7Wk/rtMCo9NMHbmpFwOtouotLvwVebT4vXqdfDNuOv9QX
+O9oCU6kamgOXS2CX1cuJAYcWMNUZmX81Vg7Hn/6xsDjXAi+N29N0Ayogatpx
+geLUAr3aU1kDwpWg2fyS97lzCzzLT3Y/faAKInkdbXU8W+DW7eibBrk1kLui
+Fr8ttAXOrQjUCNhSYFvV1NWa7BaY+3Qyzr+HCtUFVtHvc1ogPvN26QvynM2Z
+MjT+mtcCF3rXdTk8oEGUAt2Hp7gFInM9OzK16fCnAthQZQvU/OR7/iCDAcVL
+640vMVtAn3LDp+JJM3DELkpfbG4BjmG3wd9/mkGTcjvWidUC7ckfnnywagGR
+XcjZ5n0LLA2WOObLsEB128FGzd4W+PudUfWmmIBtw3emisZawLlbNuxJQBto
+jsXvSRpvgf7n7JHfS9rI777R/0J+tADrZ4z/i3GyvGNR0vRXC/xU9D2iZfMe
+vE637u2eb4Fd2u9c5Pa1w0ykyfpsbhYsMCt9ngl3wulvrt2nt7BA5eARRW/x
+Hrh/OKJaV4EFQya3cgPP9UDK+IWdmxRZkF6zpCGb2wMSlUmlX3ew4P25rqHN
+B3tBy/f2LQc1FnT59B338v4ITKvrvjwHWCDsuj/xOvtniH5XFfDhIAvij+HJ
+cMvPgFZPSGUZsEBJ/84R8zefgZtLf4vuYRbIVfdnTVj2g/X33SE2ZiyokVeM
+YdoMgFOnptIJBxbse8tpINU8CJ4Ha2TWnWXBE6HaheW/g9AS2FVWf44Fo1pl
+/4yUvsCka1+v8gUWZO3gG+KL/ALGDq3csy5kPDa0CD01BOU+xmn6PixIMnAX
+W780DGsOzhiN+LJAV2v1ct3uETi16syL+/4s0HireOLn5REYOuLiSr/DggCu
+0JXcnhEISJbw3nuPBQOBHtoTtV9hi/UG3sEYFjwTDFOIePEN8kwCKZZxLDC3
+UhIR/vQN/hNNPsN4woKZ4LdbhMTHYLvdYYu8eBaYTWSaBUaOwc47r+SdU1jg
+/bd/WTfkOzh/VBnLzmZB1G4JvxOhE6C7LGDOl8OCmCEX+EebgNVhxOuruSyY
+lr5upLH2B3QHKmxXLWBBfzw93zz2Bxz73R/yqoQFB9Rmnlx68xM0HCL5HYEF
+RXVvPmX7ToFbxvK7EswCwQsxFThtCmo5Nllz1bGgTX3x6HbaFCjO5dzPamCB
+6+pXo/Miv+DlqYGXvQwW/DRJH0kq+QX/PTx7WqiDBSIukwKU1dNwe61B08lO
+Fhyv5utxVZmGlNkz+592sWDRtHbUx24aaFymKmI9LAh7fuRLVek0FBknafB+
+ZgGv0jhacp2BcnHtw/WjLMhMMZY7NzkLz+LP8E19Y0Etv+dMhtwfuPotaFjq
+Owu+yj/TtbT4A6f1U1s8Jsj65RwE97s/UDHoGc//iwU7TppsZIXOAcPQxEd+
+kZwvxVX+s9oLoL0xJBP9ZcHTkWsGxZ4LoCC6fcJuiQUpA0PUXzkL0NiSzoxb
+ZsGaXN0ny7KLwJW/8mGBg4CL2Qd6b63/C/WRMWkJawnw7OSs3Mf1D1ZbGbzJ
+XkdAgcRt4Q9G/0BYJaWznI+AJdt3Y+vD/sFODa7YDn4CJusZfywFluEda7mE
+XYQAez/Bg35bVkA2Q3dutzQBmbVbNjmWseGWmCZTjY0EpIfvKff5xIYjq6Zb
+98gQEDzIffgnBzs+fJhmoilHwHwYTv1txo615u0PKW8hYPbBsY57v9ixmGP8
+jZkdZH9Xe7L6DVbhnbTZA8tKBIjH1tWJ31yFJ7o7JbmVCYgtAc/2rFU4pFdz
+QlSFgLYXgcQnntUYgcIWRXUCanrZbjp3rcbmG9DJ7RoEHKI6ik7ycuLlTM7Y
+HXsImK5aLuHez4lTVfL0dmgRwP6wNeVPDicOulhvJ7uPgGy14x4c4VxYby5X
+QFKXgPMm0rvNGrjwemu7bmE9Aow9OoX3L3PhtHCh1NX7CdA5pDK0/jo33v90
+duvHgwQk/5469erSGmyrci7I7igBgd234ro9ePFOSlWy8TEC4vwNSx1KeXGR
+YVuH2nECnGuU5/IXebG9rNwTblMCDGOvri+7vxZLWAy6vLQgIOXw2ZsFOetw
+dX+2y8MTBEhe2qTb+mcdrq1cG+Z2kgDXT7WUtgN8+Cp/6Ba1UwSMcJykhvTx
+4cdG6X1vrQmgHBsQZJPhx+6W4f3RNgR89hShBHvw43W4Z9VVWwLKpNw2sTfw
+4zmb+6UK9gQ4/mbSV/YI4B+f9zLDzxKg/9jHac+oAN4k1yi38xIBG28/UzZy
+FMKywfQXk6TlY122zUUJYayj5FzkTMCb6gkfVSyEW89EUHdfIUDJNXjhmJww
+/lwx167kRoDXE93e06PCWP3J/rAx0vk3FAZiJEWw5qfOB5nuBJzYu6PK2UQE
+d42ePivlQUC11kzvj3ci2PcaK3jZk1wPqX/NU2JEccajqNBSLwIE3d3Mppii
+eK1TQLvLdXI97ulZnlwlhkeUDlt03SBAbC1bBoe3GDatCRlJ9yaA9ktbCJzF
+8USPcpFkAAF21K+I76oEZssfj6KSfhQv1xv6VgJ3h7tRrt0hAL6J5PTOS+Df
+6+XEqIHkfkl67atwTxLbOrQ/uxhCgBqVKZSdI4WH/x3j5rtLAP8q230X5qQw
+j7whs5j076EZa8lD0lgoW+DYUigBt+7XSNwZkMbB3h7G9x8QUNu02vXlVhmM
+tcztFR8SMKZt65vgI4OHtp2l00nHWH6nvmbJ4FYvu3TucAL4CpSMFP1lMdHO
+f/V2BFlfoOzuM085rK/UUXI4hoCHrXoiXxfkcU9u1tcJ0ntkQ//s270J63/U
+Ov04loCmsSgJF5dNuFpL709bHAE/N7b+sBvYhAtsdmqaPCPgpOIDI97OzXiz
+/Zkr46RPnJgRjxTZglOaIvvvx5P7gd1xw1rLLXiDSWB0bQIBvq+nbqzq2YJl
+/HpkNj8n4I756n23fmzFwmJb3CpJiyfNeh3XUMDHWhPZzJMJeP9920mDAAW8
+42nqvF8KAb2zwQ8LhbdhAb1lTUYaWf9yZ5TEcUX8fpz/qH4mAd5xeaqdK9tx
+scsnyRbS7Fohx97a7cCMcK49VlkEqA/ZrJGp2oFFtOdNXV8RMC5gJFzpr4Tv
+tQ1LP8omwKkpv2RJWBmbX1azEHpDgFbTWbpygDJWXjPU+Yz0l9w31urflfH5
+iS+MtBwCLou6vBuk7cLKe+nub/IIWGkb5bzRooKTfUPkd+QTYOC/I9yNVxXb
+mD3ZmkN67cPG1X7GqvjATbXN2QVk/lt7c/sPmir+8OfR8vMiAlxmHucOduzG
+XtmqhhvIe9BBj0htdSk1vH1S5EsM6c455cZWRzV8TId7w723BDzo8urk/KOG
+a71T750vJWBzVYWD7k4NHMXnYvmBNGdRu+W+2xo4VMQ56GgZub9Dj18uZ2ng
+vZHHfu96R+bX2GHxozf34Mt6/Pq/ysnxfZRt+fxBE/s2vuM4W0GAVd12c4aG
+Fjbn0d7CIt3HNs8REKeF87+IPnhdSYBe8yvGtdPaWOTwmU+W1WQ+2bumhjaz
+Fwt7zGYC6ciqG/cMz+ngXfUrbYo1BBjJv+2YJHTwuZ1VFguku/XqhRbe7sPd
+hcyVGCDgK+XdbEC8HpaUYf86R/r34Of/vokj/Oi+jqodJsBtx5MTswkIh7ey
+zW+iEGDhqP1K7sR+7NebbppdR0CStnhku4c+frim9SJPPQFnvouNSFTr4yMp
+oSPOpCv5nDxX1hzAhwbpkgoNBFyaOMvqeHUARys7uCU0ErDbM955dvEgFtUN
+YMyQ7tm6nSfw5CGcNJ362JRKxvc+FuIrPIT1SuRtV9HI/aUozeXsZoC1/bPm
+nOgEWL//VtDKYYSD/tjlVpI+0vSGKeluhDkvhrQIMAgQXScn9O2jEf5P/OSp
+KtI7+nS9T4MxZht9VsvPJMBsQ+uInMZh/I4eEOdEWq2mdkd13mFM57kUxtNE
+5vfPKxW1r45gtQy2HFvSvGvVdp347yj+UOe2N4/0N85to8L5R7GY9q8sk2YC
+ivmzym9TjmETy97asBYCbl71ThkQMsWasZJK7aQf9/U8W51limVL+DZKsch8
+d+p99CkZM9wsuxyWTTryT9WoX6UZlujzWjNFenDgyZbLa81xgmME7x6C3D/P
+i9ebO5jjv5ZJyZj0Pt97PKa8FjhCj3sXZysBE6UNT0OdLHDPMKfhYdLrLPq7
+5motcCtfNmcraQsO9b3d/iewf/xKW3cbAbmHmn6miFliNz6/pxvek+ebsr9+
+c4glFnc/98WK9DxjqKd72hJzMq0EP5Bm11jd+P3TKfz1wucZsXay/cxVv7ec
+Oo17lMvPWpI2v8ChkvH+NN6y3+x9K+kzrA3SfZ1WWH5v8Ae+DgKEv3UZd9hZ
+47SGyUtHSD+XH0i9N2qN7V87ba4jHVjz69WLNbbYlXNaKLeTgMMcsfwZt+1x
+UZ7h5RHS9fZzbPYKDrh7S+oRmS4CQnV8N6/qcMCz0/sLIknrOYmmX5Q9i5/p
+/t1NJZ36Oirov4CzOFL7+YF/pBXOelk29J/Fd356cl3pJs97l4fcUznncHHx
+hqpU0kHyzzZWiTniFhS61EG698BQxfu7jrgmKlpB7wMBu05Karq4OOHtvQ82
+ru0hYHtq22X1ixdwhO8tPV3S1w0dY49PXsA/K0d/uJM+Lh0x+NX/Ip69qrjQ
+Svp70TM166xLeND4oiV7L5lv9q9uf3bAGfuHsemrko6PzxbdNOyMdT5vpj0m
+zen9XppD6wq+cFPCsZb0t8/v89q/X8EXQw5FTJBuMWL/8C3DBWd+EHpi9JGA
+04Y3Mhb/c8OZTHnP66QLJtSkHs+5YYlQ3YE00kdnuU88a3bHJr7XPOZJX7xs
+P65i5IFv/2hV2faJvA/4189upXvgxi+1Vy1Jr2b9eOZgcg1nilteKSS9XiLr
+abGLJ1awu6vQR5ry5cHA+VVeuFrJzJGnj4Do+C79hy+8sPoww/osaWtFs6SI
+39fx0Kt/ouGkHfKnCOWsG9irqMeilHSdyzrfxnM38UJVnOmaz+R5dFt+PPX3
+LRx0fZ5flbR65oOSPro33vuFz8Ka9DZ2Lh2ubB98rdrS7jXp8l1Nmh4P/bBk
+7dqtBGk7hknvfJg/9kr19ZglvVd8/MxS/G28um1IT6qfgIRxh/O6JQHYJ/VB
+1H7Shgn0vkd9d3Cp2psLF0gnBgjlj4QF4vGYh7UPSTv53FCfVQ7CCqKhS62k
+iaXnmnNRwXg4atOXadL3wha+rDMLwXsfBh4TGyDg7Mf0zbYSd7G6Rb+OFmlc
+0qUT8+MuzpG+U2hN2tGGq8OjJRRf+pP6xpe0Q+Elh8aKe1iRGbQ9iTTBvjf9
+6tv7+IDd/epe0tWr16Vmvn+IP+hvJxZIxwruW2u1GIalPR45bxgk83/pFdli
+tUeYd8uPB3tIU66e91gTGIE3eoernCS9ULm7jjUQiZ3OZ525RvryfceSlh1R
++Gmtv1gk6RX1xDDR6Sjs5nxKmvr/5z1yUVbJjsGR5V0ug/+P/9xkop4Yi2tu
+rTu0RHrCETyCk+LwvjaNTLEvBAxI+6rfyX+Cr7OiHquQ7jwcd6ak4ylee9p2
+1RHSOu/PeXXyx+NZlXY2J9Lqmr3jDecScATbngd+pKd1Gg4kNifi18aUhFjS
+7W+Xu19bPMfZV4o1ckgHTc6P3P+TjJ9mGdrVkQ7omyuUqkrFSlJVfD2khSR9
+RFrb0vBM47Ejk6R9OwLTente4NMhWkKcQwTY6Edllc2l47frqy5Ikg5++nUo
+f+dL7M4haLCL9Db5VX7WAZl47YebhQdJ53fN+mdMZGG9b4qvT5MWyNMP/uz3
+Gi9fcVJyIR24WAytu97g1FuOugH/f/77Xmn6ulzcv9rxYxTpnCNdvwrF8/HS
+t2SuDNIO644nb9hRiJt6zKHk/+3V9Kedv1SE6a4VnFTSn7elhNxuKMZK4gK9
+XaQ5/J8sVxuW4AdHHv/3lfT0mKzcic5SbN7OJTZLuiejetQn4h1+TstKXTVM
+9u/2J4ma6xVYbWsqVZD01/ad2dHRVTizTTZclrS43EJiyHgNtki0+qFEOmnf
+4UPvDDD2U/f5oU26hqhhDtZQsKluUbjh/+PPuxt7nK/HC9oqdAvS+YrMmNr9
+jTj32dYMB9L10xZHEm1puCgHS18h7X52ySIRGPjWWxWNG6RT9UwokT7NOKXj
+5cQd0nZedDXBBAJzbjx2MIx0yt8mw7T4Nvwh2FI7jvSryMasj7ntOGV4kpVM
+2tGdf/abeBc24Dmy+hVpD2nfDtWJD1g5LaangLTNpl0/OPQ/4f368yblpO0F
+/l4WkBzAU67Z5zFpWXWLH0s3vmDTRx2S9P/3l++WmcPxESzx69U1grTRl7aP
+ZynfcF2n+eUu0oILrIe+yxM4yJ6No4/0+4bXo3Fyv/CZuEGdIdJsQiOno9xn
+sMHVzeJj/68vxK6s9HIer2mejv35/3jVtymmYsvY61pg8TTpZZELJutfcFBs
++Oc850kHH98aGurJTcnQC+1c+v98ya2auCu8nnIiyKqXbYQAnj2lZZ0VwpTn
+B1KCVpMOlytamo2VpHzvCmniJs0b97VhY+AmyqTfnnJe0kcjJ5ulO7ZTiq2G
+jPhIp1ydPP7sjjrl2e13vvyke50zmvyZ+ykew/1mgqRHRb3N7c1MKOEeD5lC
+pAWxlEF1+hlK+c+BUWHSXn8bIthXrlMcRIWzRUiXusze0g18SlErtP75f3NE
+PeVP1iul/A80RFjx
+ "]], LineBox[CompressedData["
+1:eJwV1mc41e8bAHArftmVQoVCS8umjO5DtkRWIiOVYyS7SGaEU4TMlFH8hVRG
+tlM24ZtzUkaJkrJJKCf53714ruf6XPeL+3le3GPnucunLrAwMTHV4fl3h/Q5
+zwh8JagcpUtCR/TKSWf8RgT/2cuuyNNoLYDUEv2TdxN61afvgvPqOdLbiqmC
+Dej7Rw3Dv900IRltW5rkQ9c/iRhMXtEg/ahUpfGgMwaNzjH3KJLCg6fOcqGt
+7OgmHJSDpF4dmbj/0Om7jm+ZUpQk9b5VvLgOvcH6w73uT9tJ9+h7vzCj1dZG
+dQotNpO8B2XZ/44S1BOpEqviSvyk75dCiN9ozebq+QXl9ST6kuqxRXTArNAP
+QWY2Erkz0XwOvV02vxDEmUjqh59tnETbf++TTXNaAVv9Or+v6CN5BVf/jCzC
+Cbmx0E/oCS9vkW6LHyAyYS7fj/Zz/FmRwDULXlZKsTR06+pkyu+wCUi0KI97
+jf61bluSMW0MfLJXlJvQxsnT9QntX6BxVCamFm16l+bApDUCw28aisrQJF8H
+l6cXh8BNm+1aEboq/6plzNgAHFYTXXyIVkzXktObfA9X0pS33UP/mdNbljzb
+C2IHrk3HozPiC+aP76NDZgmPWxR6sGkgLAV6gO+9YEoQut7t+NWZgwSoSL9y
+90GHJcoV82h1wiOSzIIzWjVfm9/lRTskXouTtEN/4lWTrfFpBREVVlYz9F5j
+hVAm32aQ6SiN1UXfmVuM5CtuhBy7tlZVdFqIcM9RoQaQESMXS6Mlcw8+5Hry
+EpKFqzUk0ccSaYoC3fUQa/j1hiBaaMmff2d4LXzO4fflRI+T/OaNPKvB6+e5
+TatfCOobV2XjnvhKAHZW+9l/HujM7x56AYExgtYjaJE87rYjpuUQs6OVjY4u
+iexZeT5RCnzmymeb0BTpG63k7BJYzY4/X44WHV8nzu3zHFLdf2/N+xf/+kKj
+zO4ZRPAlhySj+faVTOQ3FgOt5XZSJFrYsOKJzVwRrDWyn/FD39df2xNLKgQe
+yT3dF9BDxrOZtaWPIWRe4IcZ+qr6x95OzXzwlFxq1kTvkQsaZMzkwd2cOT3Z
+f+9f97iXXpILpGNSQTvQglkUK/HbjyCspu0cL1rvjaHk3LWHINQyv8z4TFA9
+9E8s+1/PgRhGh9o4Wt7N2k3qTjZIjfnLv0OP6WVn3C3JAom/Eh8a0BKi9ktD
+LZkQ8nhG/imab6dEgoTmA1D4FbASiWZU3FiWCL8HDjw3nbzQuT9WItQ006E4
+TTfyLHr1nc+JlC1pIPZ41EIX/ZX5bk8DIwXoCiH9suhaCvHRcz4Z+PcCrwj6
+wUDlMe+lJNCz0FtkR8teXRl+uj4JHjl1DPSPEFQayWx23iIRZh5Q+hvQm8mH
+GQpxCZBevZdSiA7/M/H4EC0eUpRbZhPRWZsEBXaLxYNqRBRHILoykJ7r43sH
+TjESaY5o0oWch2v5cSA2ym1igLZUmur0vBILdwffk4XR+68wjtiSbkH4Li8W
+JrR9Le0yiwoFuk5zGo8NE9SNEYsipqQYEJBr4ihBt/J6cf31iILimINeKejq
+gXt9jNSbMHtAMj4QnTDExDvZEQn6izrTWujMHDOqg34EePinv96DpmxXu8ES
+dQMmw9pM1qOTuTWzR7rDwXDM1eL1J8yf6bas4BcGsRdUegvR2dwUj2e9obBS
+lv6HglaTLFTzUg0FQ55aLQO0y6bPnIdFQ8Au5L2TFHoEOO37pYNhc6qC3Hr0
+BibbnknpILCKcW1pHiKo5KKJ/Q4mgXBvc0bsQ/STMSPPHI9rsJb3kikUXc6W
+ulMxLQACIPnLUXRn1oHXl9n8wY+UaSaILlAee6ygfRUCjhp6LHzE//Pyv7gV
+dwWSuEj5BWhGsKuRj5IfXNo93BSBPvKbL908yRem6ntu2aPff+2ik3/7AH3R
+Smwzet7mmAuD5g0h4joTMx+wf1Q/t5/T8QafcTmHNvSaPcsMc4MXeLhVmgag
+JaUjIbbJE4ZZ84hT6G4Rck26oScETan/kkLTe8VpY30ewOEjYjwwSFClquMu
+MTEug7BaZfBzdKwqpWVc6jI0FubbRKHJRk+VZx3cweiDnJgCOt+lmWn7qBs8
+E5JYx4W2KSC3lB5yg+ZZ/rThAYLqw3lqg26wK5h633kdg542+97pJuMCqlO+
+LnZo4YU10agEZ+hMZa6UQ5tauDqU/yKDvHKJ3WA/9s9pNl1/uhPo3GYZ241+
+1Oy9NaHuArxVevT3Vx/WX29Z2GaNC7B2TKm1A20utLis33EeaM695EvoaQUj
+HvjqCKyWshrq6NAQn7i6K47wV1mykxf9oX+oiszjCLIU5x/F7zHft/0H6aRz
+wCnGGxeEfvt39oD1sANwzI5/OIFmC0gRzwl1gFu5329NviOojkF7hjg77WE1
+0UlDAt1IqS7OZtiCvTatd6GXoLJ6WSTPOduC+vnKXU3olOmA/qHBs1D34wrD
+Ea1H0Wbs7rABuUu6YVlvsT94GioGdZ0B/5WNq+7og0pj9n3mZ6Au3EpBDV2a
+uuUm+4gVVDztH+qjE9SHv9uqotdOwzZxEWEe9PDEpDGztSW8K1YP76cR1AXy
+QYXXyxaw9KuvMBctolG4oyfZAvb8t6isht5Joy4YD5pDdba8tnMPQeW/3WB8
+PdAM1DdG/k8OnWxULRyyzwySNPTaVt/gfzu+dxn0mcIT/SzdeHTe9hp2HhVT
+cEif1iknCKqv1WjR4qZT8GSjVP51NMcD1mZGlwlwP+hq00LnVs1c84o2AZbw
+RoPeboKqo0tbpLCZQJhHtfV8F0Fdbo0+68dpDC97ghsq0NGaUkvcD05C0e/7
+E9fRzcW7yBH7ToKek03wevQ3do5PmjpGkCm+q16kE/PL74nzzDAEy8ifsp9f
+4/x7yCjsUDSEOTqnSx76bbvzbX66ATTJhokdQtsnp7HJbzAAYiu94GgH9ofR
++frcHD3oMtigsNpOUCOrPgQeMtAD9/9Cw6joPNmhKaNFXVByd3bSRJ+W+dYm
+Y6QLkjNRNrptuL+onCuI3qADPjtvZjOjL6snDO6o04bk2i/3qltx/saFGdm6
+aINekOXz/ejJKv5XOe1asDAa7MjZQlD/tqwfJaUfhwNZbZavmrFeVdeN/TI5
+Dq4GRSxX0ZElBju5uI6D4v6RwNEmgnrp/OrTHaGakJqpxVHdSFD9hT1fKQdq
+wEtGQZk7uu+028U5NQ0If/RZWAId6531qpVJA5zYHbkpDQR1693QzJpoEiS2
+DyRZvkK/S+vkyge4f37F+ks9QX2mFCMwLK4OE99dUxPRURx5j/ub1CDmJF+c
+JrqBOzv5IlkNzH+GFObU4b7XkpwiVKYKXkViuWdrCSqTPms/w0YFRD9KV3Ch
+L7J3Kj7hVIF2y4wbVTUE1f3KLt/SqqPQOytwSgBdo/V7PGfbUfgzSKlpqSKo
+7ESSrfmMMtQIXC7yQs/wJe39masMidJvrET/xX+eKC6zRftmTPhUEtSpQabD
+N+hKEPzW4LtoBe5Lh3RVmtsVYZs+z6u2F7i/TZYJ9Ucrgke4q6UX2oO7MmZU
+XxGiTt6qayrH+T8Sb00QCqBYk3T7Enqx9FNybqICxGS0b9uC9nihLOpwWgHm
+ZQzI9WUEVU45JHtVRAEi/qfmfRFNa80Y9xuVh/8Ds6JpOA==
+ "]]},
+ Annotation[#, "Charting`Private`Tag$4131#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwVV2c0Fg4flT0SWSkSQpJZhB78fvbee2fvZO+yd/bOSpSMCPEoIUIqRQlN
+MqIQGSkN7//9dM89536559xzz708jr5GLqQkJCSZ+0hI/o9NnboqmjZtirqa
+w23tPQwKBygtLtz/floxTSDQ71lAkoLtmqsO300WRfu/bIZaHdcVSGQYGQr0
+yBSDJ/59SaJpU8iOfVprGvsDXZvm8g/l9Cq8YW6bkSlfRUP+8EiaiMcKmzne
+kkizgJ6hP0m5JkYVTk0XxlyPnsb4yNQfJnQTCqqElpKi+Cm0bJw2YJp8p7CW
+1TnncPMVUpFRNnMd+aTQxVqkhtyj+OCLaYhc5rxCZu5RA9OdJ6j98euV3xpL
+CkMDToUBnwcxrMXLq1F1RcGcUyvxb2s/dvZRRi0prit8zOrgsuZ7iKl+8wSK
+mA0FFnWt0dCj3Wj9aqc6Y3pLwXucJWyk4R5OpbYVbdrsKDCwtXBrjnSgxt1c
+uP3zl0JA/tHqi+fvYht7YpxSyx8FaQUY8NJvxbKi7DG5lD2FWusfq6+S7yDT
+ydSUIoV94Gf0yc7nXxP++KP95f0gKbTPruw7YtCINTslDwm25CCfL3Gc5Ecd
+/u79+D1pHyVYsnJ6DszW4vUbEl0FrVTAwm6kV053EwPEg9IggAaMDfzru9xq
+0Pw37UNrpIOFQp7u2bXrqHl4NXnwCD30HVILYSyvQrTgabUhZQCPVyIcKj7X
+MFLqrcalCEawqrwgpmlZifzmGqtKkQdhOO6UKt+Dcsz3NBz0jmOCkO33ApJb
+pUiftry8ksUMmk33SouNrmJX+CDZ3WoWCPvVJ7T4qhh7BwqlO7pZgbc9RUU7
+sAh9I82EP39kg/Hd5pMh4oVIzq25K0nBDgkH5u1TKQpw5s4z/kKJw7AYZzm1
+73sexvn0FJE4H4Hve/oUdeu5KNoWWepSygFD7Vy6uaS5+Ois1fi9t5xQQvvU
+jZo/B41CimS2ubggIIxXJ9EsGxvr7x2k9TgGXte+Od3Nz0KHu0fDQ2y4Qf9A
+WclQXyaKemt91KHigeQ53m0SvwwcP/5EleQuD3QRWlhFJa+gEn3Yp3QXXrCA
+swN3N1KR0bD74LEXx6GPcDeOdzkF08arSzmS+cB65lpF2UYyrqe2qk4r80Pl
+H/UgcupknJFzfuJCKgAL/k4e+kJJWKRaQVLfLwAeIUfWMywScbrg9uu6pBOA
+XmxbS9kJOKWmqOugJwj2Zu4Ms7zx6JvDXzY7d/I/f32n+MPicFbrwXxNixDU
+8M9dHpqMxXLCs3rG+FNQUGQoKK8Qi6IXuSyPWQjDs4y9NIqGGHRJYnF5LioC
+AcHP1Ou4Y5Ax9Y/FEWpRiA0Kk+m+Go0F9QHP9+ZEYd8x1i4D9cuotaf565Gh
+OEi82XcuS+cSFnI8rZEaEQdq9s6eHNsoXEigLeXXkgBJ6SlhssoINLTfjYvQ
+OA1k5Itv+EbDseMz79UPw6fht6pR+QWacKzTsVLr0DkD7nWnV87nhyJpdtfe
+sJkkTNTtFLEshmDoUE/g3gdJSPDSp6TAEHThJNGucZWCfj6jLVrKYORDAVlC
+5FloZrLucPcPwoPerN9P0EjDypmt+pz5QLTOXNK8VCgNl1/mdB15E4DeDj+d
+HYgyMEoX37tiFYCNJvW/vmrJwi/FXhr/T/44XTL+avKjLBzLjNut/+2H5rT8
+cq9pCVAeeVJjK8MPGaiSh2erCPB80LWaTcAP1+bSS3Tl5GCUkjz3tP1FrHq8
+KC8VIA98q0eVJ0kuoqxwuHQTowLsS5zvNdf2xXyHz33RTQpQ8tznUe26D4pt
+kTDyfwc4dlpJSzLSC7l30iIElBQhL6pqXnvZE7Pkrn0RLVCEmZsfhj/YeWLi
+iuLkh6+KkOq5fL7dyAOjfpjfES5QgpG9A19qXrpjyT9Lx6crSmBlJMjtYOaO
+RuvLHAdUlOFrT7LYdXc37OLPVonaUgaxuqgvsz9ckYGzLKFWVwUuFxlO2ye7
+oiAve0DQTRWo34lQyG9zwZxUT+oNG1UwanTNmhB1xhISOUfXF2pQtMKT9OGV
+E9IIZyhmiqhDSOlqiHaEEzYy9diYpqvDM3/ooBxzRHoNRcEObQ3YbODOPHXZ
+EW3jI58ZNmhAhoSEtauYIxp32+Yl0WuCu9Jvlol8B2z2U4rvG9ME1ezXFF+0
+HTDaefjWoKQW0PEvfBghc8CIAxurTkVawCCy1Dcaeh6dVLLeuDlow7EWIUvP
+FTs8+PFNY9KuDkRv187lhduhh8xWrKO1LoBkdd0ZOjtUvWyd2NOlC/5zumaJ
+Z2yR6kF84b9oPeg5z/+gsdwaQ07kKfdTGYBj+/SnKgVrvNd5+6zkOQNgMLcP
+SJ+xQqjwH573NoBY49rflEJW6P42i538lQHEHPOSlX1pgUtaK6FnqwxBV5hp
+0SfaAktcn8VWTBjCecvXsmfFLdBH+sqwGp0RlPceqrDIM8d/lKsO+kFGkDtU
+zzDhY4YtGy4cKjrGwHEs7EDhCTO0/xbnVhJrDDO7n/WuzZqiSC5npUinMVD8
+i7jpZ2OK7OJZZ2hPmIDI009hYnYmyExPiCikMAUWD5YAVx4TbLh36OGovCl8
+DNC417BgjCemQ1pVg00h/UQfr56fMeqTaZLOLpqC5vDPCYU8I5Td8WOZGTGD
+wZRyW017Izx5jy5lg8ocZMkaLkudMsJQm5+hoGQOk8LNTeUDhvh9Svlscoc5
+vIve/SVObogrpda8Y9UWkLhFyOh/bYCxN554tc5YQNGtr3rMtQZoFNyx/wWn
+JTSdDbZ7q2eA4dJjg3fyLWGSyBsuq6mPs7NjSjypVlD14bPp7DsdtDYyEUiN
+soE7PFHx3Xk6SB46fLvlvg2QxX+TqtTTQQYHZjXGXRsw8RSTPD+gja2XQ/g9
+Q2whn/TuLd1uLdz6NqCbH2gHn/tZ2UcvaWFS0NENxzY7ILlnxXUGtfB4U+kd
+5y07qBR9HJY6oIlZ/G9pyYPs4SrhiyHjWw2krSkMMpc7D76XCXcEr2lgq5M5
+G73teUienqMn89DAT2P8+u+jzoPN+xLq9V11PPvAQX+o5zyIthie1j+hjkUq
+i7sjKg6Av5ccoipUceNQalu2sSNcaDlpBH6qyGhgI/02yBH8a5kV8pRVMbPg
+kz+hyBGmrx22WP2igpzd/B/VPzjCfMPDaA55Fbyu682Q5O4EGZyPZRJ+KyFN
+xJhZbpwzvOHqG/B+rYSl1VTiDjed4dok08OBJiWUvWm/rvbUGfwsN0gGXJRw
+RHZw05LZBVq580OGJxSRjk+2prTaBZim3r1JfYo4GfF4IuWpKywQbg0euYXY
+McbMv7vpCi390wrMSYjhvYfqEjjdQH/7u5y0CqLjtDjHNx83CKwQMFJIBPzk
+xf2dlMkdlrruTmpVy+MLjlJTMXsPqFBT0TroJY9HyNvJdFI8IK393M/w0/LY
+B0G7sa0eEJR12060Xw6Xr0skA7UnqAWh9PgyAX8cTcr93uIJdfI/yqQszuEX
+U6ARofcGZuUbanyC5zDoUlTRoow3xF0dxbyfsvjXSTDzvrM3lHPUbayXyOLl
+VabIpi5vCBqyS/FekMF0pfHJAR8fEPmUMv4vUxqrTB5NVo5fgGX1wFFZN2ns
+vjuatrzPF6rEXhW+V5DG655BY3pivmBuceqAydpZTAuP/WCX6gvuBjKXFkzO
+4u0Y66Ex7ovwXC3rdISEFL6OpmO2ensR1t60My8zSmHwZemn4usX4daVxz7V
+65L469+xjwcp/WDiri7nerMkElN/7W1I+EG+YA/puKQkHt0wvime6gfz/BxT
+nJpncLFv4lS+nD9MSX692C98BovX42QZjP1h2C6I4ybjGXRz6jbK9fAHTnmp
+Zd43p/HUVnReZ4E/rPqMzb7xPo1D1wKfR33/r4w/lvMQyyXQLGZhbaY2AHam
+1oZmEySQLVQ69FdPAMzvJy1DHwnUe8jYyzEZAA2uNtdz5STwXFtPRBRFIAwP
+6cskfxBHB/ZInruOgXCxo5DinKA4FhYzHv/OFQS2K4kOjPdFsK75hn9keTAs
+zErjoWwRfBvIvvKMGAwZN4QdA91EkKndQkzwVTC4WwT2i7CK4EV+rb//qEKg
+uuPgRlygMPJfeHlUxD8EjAi37fYUTyHZGZPWRI1Q0C4R8iQ9egq5pk7KxziF
+gnrBqqXeTyE8fPX8ucRLoTB8I3TlQZMQ8q4MhDW1hcKpG2OZizxCuFC6HHqJ
+Jwzu9OotDjOdRCqxsM80f8Mg0tm4h3JDEAm9+RK32MNBtk2gNGZMEG8HPCo1
+kgwHjr6+bdFsQTzSv9zd7xUOlyLdrpgzC2KHF20117twQJZftg68JzCDnCK5
+5X4ELHNrVbe78eOjVr1dsfgoWNL/5c+tx4+NxeKjsZVRkBO7ZNEuyY/aXWyj
+H7uiIDNxdtKZlB9jBKYJLdtRsM1+5OPDCj5k5fVRHXS7BHL3T3menD2ON9MM
+ZCp0L8O/o/cP68bxYuCdycXdzGjoq6PnS73Ai/IkArUt5dHQxFmfu2TJi6UZ
++h0XGqNBJVYtkVqCF0VC2zs3n0TDWYrCIyMzPNhoWsIsQRkDwttPbUTVeFDG
+QEo1JCoGKL1uJJQLcOPhK5Vcx31joXgg9lwzGzdS/kFzq6hYCNths5mi5Eam
+GXa2/LRYuDGcFznx/Bjetl89xlobCwnNF8lFjY+hW2H/WfgUC/9I3euGnLiw
+W+EU9TmTOOgrNl8vq+LEH59LWXrk4iFDcvDHUNJ/fHTpl5N2PAQ4u7ay+nCi
+JUPl6f1W8bBhPmbMIcOJY+U8Ra4h8XCBOsj38QsO7PukRa3cEg9kP452BFFw
+4Hb0PoFiwQQwO3BSKzf5MH5byexqOpQIM0ncCVO+h5HjNYvcPsFESGVmzAfz
+wziZ0OtlJpMIVA/kwF/gMO59oRmns0wEkplsIadBdrSw28utKkmEZvS6hPvZ
+sabqsfglriT4vOVY7XWbDfctXN2bEUyGx6zvIy8VsyH7W8a1atlkcPmQH9AQ
+z4bN6pQm3lrJEEVFILW0ZsPSM3ohFN7J8Il0/sYaDRuaLoZ/P9+UDD19XtYr
+XqzY0DV64v7ZFKC78kSNRIkFXzmb2ayrp/63Rxp+G0mwoGqgkNBv81SoXVp+
+T+RmwRzzk0+p3VNB8bBE84M9ZqzyPhojnJwKL6pSQmq7mTGo7XRB/uNUuLr5
+hP8rMGOTlorEqmYarJl0nXPRZ8KKPq+aWr10uOZ9Y3sJmfDW44bTdPbpMM85
+WhJ5mgl7xW+7XfRNB/f0ZvVXrEy4ef96v1JWOgRyWjURPhxE0ne6XFQv08Hi
+j7bFwoWDKHOqTZre7Ap4qTr/pi5jROFn/m8pzmdATa3u+4osRvTVSW9wvZgB
+7MqNqcrxjGgauTE3HJ0BbIkE2jtejHhe7E1U4bUMYOL+0cpLYEQN5Vw5/bkM
+GKMqZ60mMqC8Mus7MbdMqKo6rjGrdwCV4wIazWSywKee6Ri57AH8RZGk2oBZ
+wNW5XEE4fgAHH/r8JdXMAtYaF9HlHXrcGXN90mqZBRdlu/w0q+ix4f23x7wR
+WaBP8Oz+ursfzcwEp6S6syDkZHYG7X06jJenVhdWzQbCn/ZbNDfo0O9ECLet
+XjYct7aK4Mqmwx2wk840zwbxJ4eeJbvRYcvrniM7HtlQ+Qy3bFjpMDqBpvp1
+RjY4fCVJ+BpIi+/j8fjIVDa032PX/6BEg4PUMVuVPjkQ0/U4w1acBn/u38/7
+MzgH9F0IIutHafCG8etgg+gcMFguFtD5RY1XbTxzyXNzYHGXPuh9MzWmhVUm
+hBNzQHEtUFvrODUu6ZF1lJLlwrE4oZJeFiqkKKOruFuSC05nSveFUVBhSgbL
+7yvXc2G10Y0GflAi4WaZqltDLiiPqt/bnKREt2TGas7uXGA2mV78e5USV7Su
+h+R8ygX9Z1obSQKUSCJqQFYnmAf0zEek6VQp8OH8ebKEjjzItA31sJKmwEdc
+a0LhvXkwVZ7hdvckBd6r1RS/OJwHncal2RkHKHBKyvyl3bs8oPV2FH42RY6X
+hRNc1PbyoFTxnoSHLzn+zRA1U1DPh+bi0Qevqslwrst8amQyH66aDXRHFJLh
+SRer7MpP+eCyaTIilkqGcaR/CYHL+TDjovL2vi8ZUieWOXHt5YO1wKagI4EM
+NfTbv0YJFEDPAkvKu3FSzBwn6HgEFYDDCMNrPkZSdO7ioVxlLoS5Eofn7jUk
+mHmmWC7RuAiCqo2oZktI8BJ7f7yDbRHQ9p3/5ZRFggbn7LPk3Yrg5qODczER
+JEhqTlzbCS+C94PnhviMSJB7PKonqKoIUnL2nv8jIcEVQyvB/O9FUFd61yl9
++B9Q9Pbo22cVw07CvdiWhD9Qbn10l3S0BFjlnP5cD/oDB/Y4ntq+KQE1S2Ge
+ay5/wHfKU7BztgQcrL9Bt+ofuNKnm+i3XQJ5vo0VsZR/YL7lUv/SkaswvdoX
+JZT6G+41lnxed7kKPEd4lhqLd6Fod3LV+c9VkKrknHWc/Amlf55rDQiVwVjc
+p+Fnj3+C3JNZbXqpMuDgUS5QvPcTdK+nvjKFMih1yGnRLvsJruWFgUvGZZDj
+zTM+4/QTyAvb15ijyuCq+U4nxeYOuGj9sYp7UQYhP/8LMvsO5H+PzusNLAeP
+tlcBdjHbwJDGF1ncWwFUU9m95MHbMDqxtqb7pAIUJRzTWjy3ISeKs5t0vAI0
+pPNi+Ey2YdeQzd1nsQIeD0oqOJzYBm+HPwHHqSpBNozxksyLLWh7W8hDIVoJ
+HtWTxWf4tsDTnm1hMaISXv63ezlnN+D6pmQvN/s10P9p1ToQug7Uasoc9t5V
+kPx9xIT+68p/P1Z7Zff+dfhbkMbF2vAFisaaWYe2q2HfwWTFxorPwJu2bsOk
+dQPcdE4Sf/PNQ0pZwXvFpJsAhu59NPtmwW1oU1nsQS18T7MpyPg6DWSE+xVt
+dHWgdef1+6jU9yBgmNP6VLEeXpwhT5/TfgNBPdzD7JkNoFkQ/bYldAJWHe9w
+UL5qhAzdoI2Ao+OQX2+69/LvbegPWFP+8nIMwt/RGn7hagYxq+0s2ucvwJeb
+YeZMSzPMU/5KsnJ5BmXU26qxeAfOyjj846IfhtCLnxQuTt0BzQGh2+2ygxD8
+1OZmp1MLEGRclT38+4HkEEFoYacFRndf/5Y+9BC+2crwRl5uhYZXPgcXtx+A
+h3Bjbue+Nnhn9F3Y9XEn1IiQJc6mtYGrMtfxRzLtEHy/sfMVzV2IGPnCWHin
+BZzfXeLdzLgLYbH73cUZm8BHhkxC5EA7KDgd/hRx4xa8TNO51xrTDvxVVjdW
+lKrh3bjVrdDf7XDzC0vwqHoFaC90vR736IDfD6RNLywXgPOwL9vMyw546CM+
+XcB9BURb04q0FIkQZzHX/H4+HZx/pLVMKxFBeeWXk9StdEh50F0UqEKEWx4c
+JsdOpwPQEYfL1Ingb6ZdM66SBosO0w9WdYmQKy5l2+OTAtQTZ77FWRHhD3M/
+uI8kQIfQG/eUACKIPX7a/Tc3AaTP+VKxBxGBM6TOqMYqAcJVOP1vBBOhJIam
+UmgpHu4TiPV9YUS44vjgOD15PKjXzjb9vEwEuuvznsIQCy8+2/62SicCGUV9
+p1FCFFTpcZX8rCZCmnyRBRttFLCcJhrevkGEdoIwL0VmJMiKJz12qiWCYVDR
+plNxBGwqPdwcqSeChLzFAF9zGKzVZ2JFCxEWt/uXqxeCwE9ipUWqlwgMH6lz
+mH2CYLsiwnbxIREyuIrtG7YC4Zmq5FBRPxES/w6J25AHQk4619TuIBGazUS/
+tfD7g8XEo7X7I0TwPfKQ0m7GG84deb4t8Y4I2SOnXPy2vCAmrSZn+j0ReFqO
+HZmk9oLZ5NJv6R+JMPg+j674tAdw0S7Off5EhOJAt/rNFBeYH53uL1wigsUh
+L5uCSmeYlK+xVP5KhKIUTZ/UDidAycTb35aJoHpdU9L1swPcXijKV1kjQsRw
+IvnLTBtw/rZlsbpNBPkFg06BPiuQOJW6WLBDBIc2L3XObQvwD5eWwl9E2Mfm
+/W/JxhQOdU/R5/whwqoBaVNPtjEMfXtadO4fEcyDtTTODhnC5brXs7N7RDig
+v5tK7q4DQcan2k6TdUJi0ZzT7QkN0MkIJrwl74TRlxbiBWqq4LQ2ERND2Qm0
+nF5h9zsUYZFXJ0mQuhPgfl8WwUQOxCZfa7+g6QRF5Yu6YQQpeNgV8CKIrhOO
+CSeG2mkJg24iPxMnfSfwZp985KfKCf+WvjL3HeiESwcWHKVLJhSeaPlE7/9P
+/z/4N2Nv
+ "]]},
+ Annotation[#, "Charting`Private`Tag$4131#2"]& ], {}}, {}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{
+ FormBox[
+ TagBox[
+ "\"\\!\\(\\*StyleBox[\\\"h\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+StyleBox[\\\" \
+\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*StyleBox[\\\"|\\\",FontSlant->\\\"\
+Italic\\\"]\\)\\!\\(\\*StyleBox[\\\" \\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\
+\\*StyleBox[\\\"t\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*SuperscriptBox[\
+StyleBox[\\\"|\\\",FontSlant->\\\"Italic\\\"], RowBox[{RowBox[{\\\"-\\\", \
+\\\"\[Beta]\\\"}], \\\" \\\", \\\"\[Delta]\\\"}]]\\)\"", HoldForm],
+ TraditionalForm],
+ FormBox[
+ TagBox[
+ "\"\[Chi] | \\!\\(\\*StyleBox[\\\"t\\\",FontSlant->\\\"Italic\\\"]\\)\\!\
+\\(\\*SuperscriptBox[\\(|\\), \\(\[Gamma]\\)]\\)\"", HoldForm],
+ TraditionalForm]},
+ AxesOrigin->{0, 0.015},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ ImageSize->{467.9999999999988, Automatic},
+ LabelStyle->{
+ GrayLevel[0], FontSize -> 14},
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{0, 2.3}, {0.015, 0.105}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{0, 0}, {0, 0}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{
+ 3.8762098132490873`*^9, 3.876210114932979*^9, {3.876210229455621*^9,
+ 3.876210239439103*^9}, 3.8762103425194483`*^9, 3.876210503369525*^9, {
+ 3.876210758072206*^9, 3.876210817271525*^9}, {3.876210896342799*^9,
+ 3.8762109031134443`*^9}, 3.8846914827458572`*^9, 3.884691623712654*^9},
+ CellLabel->"Out[12]=",ExpressionUUID->"cc721759-3e61-45b9-a2e5-7355171aadcc"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}]}]}],
+ "]"}], "]"}],
+ RowBox[{"7", "/", "4"}]]], "Input",
+ CellLabel->"In[33]:=",ExpressionUUID->"d791a8a8-5290-490b-9a1b-d5bf9c6cd5a4"],
+
+Cell[BoxData[
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
RowBox[{
- RowBox[{"g", "[", "0", "]"}], "\[Rule]", "0.373691`"}], ",",
+ RowBox[{"-", "1"}], "+",
+ FractionBox[
+ RowBox[{"26592656237357401", " ",
+ SuperscriptBox["\[Gamma]", "2"]}], "14322483561143241"]}], "]"}],
+ RowBox[{"7", "/", "4"}]]], "Output",
+ CellChangeTimes->{3.876208695658787*^9},
+ CellLabel->"Out[33]=",ExpressionUUID->"2723ffda-71c1-41b3-9446-6fd7f97d95ab"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"pSus", "=",
+ RowBox[{"Show", "[",
RowBox[{
- RowBox[{"g", "[", "1", "]"}], "\[Rule]",
- RowBox[{"-", "0.0216363`"}]}]}], "}"}]], "Output",
+ RowBox[{"ParametricPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "15"}], "/", "8"}]]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[", "2",
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "]"}],
+ RowBox[{"7", "/", "4"}]]}]}], "}"}], ",", "\[IndentingNewLine]",
+
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "]"}],
+ RowBox[{
+ RowBox[{"-", "15"}], "/", "8"}]]}], ",",
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[", "2",
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}],
+ SuperscriptBox[
+ RowBox[{"Abs", "[",
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}], "]"}],
+ RowBox[{"7", "/", "4"}]]}]}], "}"}]}], "\[IndentingNewLine]",
+ "}"}]}], ",",
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",", "0", ",", "0.999"}], "}"}], ",",
+ RowBox[{"PlotRange", "->",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"{",
+ RowBox[{"0", ",", "3.3"}], "}"}], ",", "Automatic"}], "}"}]}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}], ",",
+ RowBox[{"WorkingPrecision", "->", "20"}], ",",
+ RowBox[{"PlotPoints", "->", "50"}], ",",
+ RowBox[{"AxesLabel", "->",
+ RowBox[{"{",
+ RowBox[{
+ "\"\<\!\(\*StyleBox[\"h\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\"|\",FontSlant->\"Italic\"]\)\!\(\*\
+StyleBox[\" \
+\",FontSlant->\"Italic\"]\)\!\(\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*\
+SuperscriptBox[StyleBox[\"|\",FontSlant->\"Italic\"], RowBox[{RowBox[{\"-\", \
+\"\[Beta]\"}], \" \", \"\[Delta]\"}]]\)\>\"", ",",
+ "\"\<\[Chi] | \
+\!\(\*StyleBox[\"t\",FontSlant->\"Italic\"]\)\!\(\*SuperscriptBox[\(|\), \(\
+\[Gamma]\)]\)\>\""}], "}"}]}], ",",
+ RowBox[{"LabelStyle", "->",
+ RowBox[{"{",
+ RowBox[{"Black", ",",
+ RowBox[{"FontSize", "->", "14"}]}], "}"}]}]}], "\[IndentingNewLine]",
+ "]"}], ",", "pCasS"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.875952981547227*^9, 3.875953315769273*^9}, {
+ 3.875957061887289*^9, 3.875957104302837*^9}, {3.875957134472674*^9,
+ 3.8759571357521*^9}, {3.8759571703214827`*^9, 3.875957176129848*^9}, {
+ 3.875957284251436*^9, 3.875957289963092*^9}, {3.875957366732642*^9,
+ 3.875957382812718*^9}, {3.8762091878796577`*^9, 3.876209192631675*^9}},
+ CellLabel->"In[95]:=",ExpressionUUID->"efe0717e-1a4b-4a72-a5da-a2e9186bd1ec"],
+
+Cell[BoxData[
+ GraphicsBox[{{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6],
+ Opacity[1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJw112c4Fu73AHCrEI8yMjKSEYXs9SXnNjNSVEZG9g5lj5CRrWSvbGVnhqwk
+o0JG2XnsvclW/+f34n+/ua/Pi/u8ONe5z3XOFVPHexYEeHh4Tfh4eP+7///o
+NaRMYoIxiMSWleJU6gqQLOcdkOPM4zLkdyolCAtvOtA5nN+NkxucjkiCjy5e
+3Rmcl8Yqlf5JycK/DQ2Tfy8wiKnjx2e8CEW4E/1Rch9nLRYxfcJRFTj6KCO3
+hnMxUasy8bU7IHML6zWFs5jDNdOz0ppAZJo+M4BzD7cJYbjZfcBG+T77grOK
+kHsuRYQWUOQEKFbiLPHfqElchQ54/yiRycR5jONQh3H0IXxIILSOwNn0gnxO
+Dr4BHPSFtLj8L74elzHftUdwuUxGzQBnzJpML5u0Cfxo0N7gxFmG0frG8l1T
+UPzTQkqCM2+ujG+FmRl4zjo/WAzCoI72XzxKERbQlt/qlYPz1AjxW8oMS6gV
+cdD2xRkL31QnKqyAds7DVAfnl4pzt71HbeC/nu9kRDjfZyhvV1u3BV9b9oKh
+QAyyKdnJYSZ4DOzbh24FOE+j9pa2aw7wUlwp9xbO8lahkXHSTyHB20jJIQCD
+vmk+Zwlsfwp1J++thXF+HsGa6qThBMJ43fV7/hikbz3w5IG5MziWJ++640wr
+b6TFEekKbqZd5ebPMYjueJeQkdYNIhW79Rlxduq7PkiV6Qaub07Fev0wiOzl
+Hv7ZKncw9uLwF8H5ZlaSzPGYJ3iIclgu+GCQtGht37GFF3z9IJ76CuchKZ+W
+0w0vUNvexhfD2WfKd+AM0TPAw+SY+zzDIFkMWxgXry9UZXU/3/PCoHCDjQZ9
+GX9gbfTniHHHIN8h4iDxMH/A9gQlUuPswu2nT/PTHyYMw1dj3DCIXK9Vvc8m
+AP5bI78Z4YpBFF0yzbrxgVAmweBt6ox7H9AwkLX6AnxW6IOLHDCIUHivNVo8
+GFYXH3CR4UwZGI3xDwiGFwKhxdb2GLTBKNhsQR8CmCYTM+bHGBQxKsmEFEJB
+h24w2N4GgyqK+Jul08JBX2G5Ld8MgxynO2zlF8LBp5Kmdt4UgxZOMHVqQhEw
+aZ8RzYYz/TlCDZPOCPjc6/cn1hiDRm/CYuZuJKT088QaGmLQcX9lp6v6K6Dv
+zVOM1MagGkNeVTW8GNjLQaO6t3D1n5X13YE9BmjSRtQtlDBoJAsrH6sUAz35
+NNuOirj8ySmxYiNjoDv/WrefPAbZu9Q3BjDEglzien8Y4PKd2i98LBQH5ON7
+SrfEMaifrli/yTIBhmnxhW04MSibf86MKDwBmO0SLklzYJC4VVeGWkkC4BOI
+SmLYcfVvpvHx904CCM09YSpkxSD1laX3F/wT4YvYdf8eRlw9YYhvV6YmwQbV
+0l4LJQb9LqT6dtCXAjxWlTJaJ+SI9T7huZrdFPgiZRi0d0SO3gddKHGjS4WT
+FPFLCYfkKExjhP3IIBXs7bzEe/fIEV5rJjHVYiqU1fGDwBY50vnVoRDyNw0q
+nYkbMubI0eO2qbA43gwgfrwHMt3kiNZgzK6vPQvm+/AIwxLJ0V/FtNSpkSwQ
+39MsTY4nR1dGJqe3V7Pgol29U34sOaq4NdRAT50NR0yuyp9ekSMMXc2np0bZ
+cCqwJDQSQo6cFvEZ9Q6yQUNP1LjMnRyJSPA1kvPkgq2+H9W+FjmyQZc/QNxb
+OK5PKf9LTo7iZ1ktW9mLoPZiT1bfUzLEn2M4hKEvA3wBU2L39+fQ8U5a6np2
+BUzqc7B4DpMijSlusWfU1TBsoH0j4YQECfbi3djsqYEyrPDtwmNiZJKvpEjm
+8hEUPFuweydn0YCRgtkwZyO8QKFNzftnkB+z6schhk8QkVGxzthPhNJivv8I
+S2oBxg+heoR1hEgjkFO3X70VTmt+7agGEiDiY7U+0YttYPsbkX7XwEfmmBeZ
+VcPtUOhxaPdXCA/peLcm0s12Ah3FeF3e31PwCCM9odn6BtdKzK09O4+BbuZr
+O59uN3zJsp/vcjwEO1fKN43LP2DLIIQ2SmgfmFJ+XZVW7ANM7/1h4PsDBhuY
+UIPBfuj/ePyShGoHauPVNlncfgLem2C+FYEtWKJ6UzT47Cf4Dup/qLu2BWti
+MgqvA38CDSdLbhjbFqjKJF88//onuG/VvOej2QKlVHDiK/4Jh7Ga0cH7mzDG
+vT23N/0TzvJUNXk3bYL7g8CK7/d+gf2zvlNX9U24rYcJPJYahAv0XGddsesw
+TqWAf1lhEFJvTwVk9q7DkId2hNLtQTi3W+z8o2Ud5FRu9mYZDEK8EU2VeO46
+eKuzeIX5DAL2rdRnQZt1sGpkkmP9NAiBBULZXTtrIFPRgR+kPARMX4rrs8jW
+wDSVbn/HchiSotLQkuIKCLz8J5TkOAy/Rd+MzUqsQOReUTvyGIZ/BN2JMzwr
+sEekR5gRNgwjMrKuy5Qr0Hvugmh08TD4bVz4wTyxDGMad9KVd4aBhFZck9F9
+GZrQoitP0AhMD9uQuRQtQX3iG66EqlFgjg0LKmVehKJ6g1XZ5lF48/HzrsOF
+RZD+L/9g5+soNIoxXBcmXITHW0r/bLGjINtiM9e+uACipdM2eefGYPt10DvG
+qgUIopHZ0zAdA1LL7+leagugLrLlX0o7Dj1VgsYXfOYhSpeajp9tHHwI2UhU
+n8xDUMKlxg984/BIUsU3xGweWp0YdMYUxqFiS3gQozoPKsl+gV7O46B7yCil
+TDcPhO86sbT946BnzkvuUjEHxTU0r4/ifkOXGpFcwcosJO0bLglk/Yaq5uHI
+BOws8Bq27DiU/IZVwu3QkIFZYFY/f5Og/TcIb7+Od6mfBXYNJ/fg/d/Qnv+J
+yDtiFhhGiR+SG0yAa2WPniTvLCw53tNR4sHC1uDDzmdPZiB0Le5BgAQWuGtV
+fSfNZ2DcDEg7FLEg42e7dOvhDDxqvN9ga4wFxfJX2CtyM+BC80WBKQEL83Et
+6gQ0M+Alr7GZiD8JNNei5Vxrp8Hm7P42n9Mk3EZzB+xE06DooPFw1mMS5kn7
+7zUdTsEo1ZkLGX6T0PSHYlF/Ywr4r0T4XYmahM94kV8yR6fgQD4Cq5c/CUTa
++Eqa5VMgH/fFMwc7CYPMlPbqRlOgm890UqQ5BRo/SFQrGichpkyO8Y/uFOyO
+EF+oqpwEc20RFnnjKei+IUFZVzAJ4o5hM2sOU6DlcaGtK34SrB3GDn0jp+DH
+YtvWJYdJ8DbJGI3tnIK2u3d07l2ehORY8fOlCtMQpp+Nr0eChZc7Lg0q6tOg
+jVSGonYm4P09jv0VrWlwKJqX+zoxAXRYHmEFq2lIalQb066egD3rnDSF8Gl4
+2O1J1m06ASs9g5SRfdMgaCAtzdn8Gx5TpK47WMzAVnWRUqDPOPyx4/u94jAD
+Pb2CTwpsxsGqm9vsiccM7K1d5x7SGgdSFSq96IgZMKtUlVO5MQ4Pu6b2eStm
+4D3tJG0odgxaJJsUp/BmQfI0/thRfgyIq3PXvXNnoWn/t+78hVGIKax2Viud
+BfyCpsfwbwQotBzfs9XOwqxxG3nG2gj4R2o6Ln6fhc2U442n30agRYmWun9n
+Fq4lLEpa4v4V3z4R71XFOeiQqY8OPRyGgI+m7bTrc3DvH89A+eIQJCRvYzcO
+5kCIhqNlbGgI7rZHbvYRzsOg8wg/eccQ1OkKsZczzANZ1WLU87whcO+2I/mt
+OA94aU6yNaZDEE15dnI3Yx7SaIV4DCYGoY713hVP/QUwPTqg8R/9BQYH36nU
+rBYgxq2V9Pu3X3DZN4iBy3kB7sgrCTLW/wIxg8Xk0/AF+F5TS9uT+gvc6DP6
+OOsXoFqCit/X8BfgSWg0OuD6gJcLoxAxri/apRJJKSwvQt+LBvW6jQE40BdQ
+cd5fBM6nnXWdkwMwVjovWEq0BL6vulUm+gYgm5Kt/9blJXi51j3AWDUAwTss
+FORaSzDDMOI/6TEAgqO0A/Ofl+CA7NbgK8IB0PN0yXyUvwyzs8pdAcz9MKS0
+U/K4dhk86GNuXKHoB3IMKEd0LoNxuVZt+98+YKg+CTlaXIbAgVDgmuwDMgFp
+vNzrK2D//DqpTE4fqJkYTUiWr0CUNMFqy/U+qJ2jnBTpWgXC777LzNALyS/J
+5MImVqHmuG0sQ6AXFC0vN29troLbostvbrZeYLouG/nv4hqwn5w9r3GmF0Lv
+kmCoTNZAsyGFZz7xB7jUvTQXOF6DGGMshra6B/gux5bcRRsQMBFKeXTYBa4Y
+r2m8BxsQe00t/vVkF+j/oE7usNqARyVS/4l2dAFpwxhNwqsNwOzZTGfGdcH5
+la/0UpMbwGHKG0Iq0AX3WYJsp+U2gTNv9pDF5jvc3Wsrfrq1Ca3Gpuyas1/h
+x/WC5+0nmyDxT0vCtusrGI9oBHOTbMHZIQ/5V1Vf4W5v4HOay1sQ/q1T7DTo
+K4z0W5e+VN+CYrcJW+urX8HlbFcIa8kW5C1X9nnZdUL2TS9uW/dtEFaN6Xzx
+tx3Cev1el73YhtJkVRrJ+XYIwP8hfy5uGxYMMyWPutuhQq2W8aBsG37LDZK+
+fdMO5qULfS0r2/BTgTcq52Y7/NF9ZydgsQPNdycDRZ63wfr1tr1Glx2wT5OJ
++mLdBs6H89omQTuwodV5z1SzDeq7928t5+yACP3WuQ62NvBweDRDOrsD/StB
+xyLtX2D2yFyuwHoXbHxapbLOf4HilkvrBZ67IGwhxk1+2ApalzftW8N3wdp8
+qyJouhU8cn/Xy5bsQkNqXWp6dStYjCfZP93Zxc0zv164GrTCtp7faXfQH/B9
+p3yxtPgz1M6Ik3A07sG5O7Oj0jotQE38kPMvzlLLRgRG2i0gGR2cYtuyB0xX
+mF/O3GuBM/JaV+737oFjAsXHOvkWYNBMyk2f2YOLlwQV5ARwThUcjzi3DzpP
+Oe+7kbbAmsTRYNvDfTCRERGwbfgEGayTrpun+1CJtxbmx/EJVPQqSIioD0DD
+rsrwA+UnWLvxmlWC+wD2Ts6FbJ02w/qsOB7h/QNwsKfwRZXNMJjLEMNTeACM
+qVWxOyzNwOnnaEpmdAgfK5Kzi44awSfUeEzV7RDi7A9owgcb4Un3hU/vow5B
+c+i5p18Fzg/rr640HELkbAL5e9tG0M1zoRdiPoLPxcmEV8YbIJ2pJ0hz7ggs
+rfK91VvrYWaoxiQ14QTsCSyHKrLrIKWNtqmq4gSOt00MLgTUQadTdeLfnhNI
+aueODjSpg58VtVmcJKdAe+R3UMhaB4cvmX17np2CFI+G92lGLZRj2TeOHf+C
+/4FAa2l2DeSqtDzTffUXF1991CKwBuYSkhvWSv/CK9VLTkLmNeBb2Zn2Zf0v
+eE/p0pNfrYESTvW7Ik//Qfie/8anwg/wIuz4Rz/CQ5iUY7UbtdWw9IoGY3cP
+D121rKCXTqkG2dMnJRzmeKinoFbC6Fk1MPO7+5+G4CFtai+rOVQNLOUj6Xf7
+8NAtXVfBrW9VkOVvK/3dFh9R5E0TE81UwhsSsrq3vvhINnDvo0V7JUidNg8X
+xOCjTsX1uPGCSuiyuvyFux4fjX9OqCB9WgmZAt8OLlIQIM9+R2UTvEp4Ahc2
+6BsI0DzvZz9C9gpg+ejNG/OTAB3MD+tanakAEscETfk1AtRxEzs1s1AOnGZp
+1zQuEyKzYNG9qyXlwBqqnMQdTIjuBmO//pQoh+r27uuBRkTId9NduOtBGeg6
+p8QPehMhO5Z8rzqJMjAS/lDvkESEen62SDczlUHUVeO1J7i53mEvWoX723tQ
+r3hWM6RyBil21jxoXysFSupofJpbZ5HruaaoqzIlMCigI8ljfRb9GXP2xZCW
+gFN305mksLNIYk8Lj/NnMZy8H5Z37z6LvoZrZMzZFoODdNOm40NiVKjjmVWc
+UgTGqw+ivANJkHDaaOhtwkLgWqT8G1FIgliLOlok+wpg9eN+MEk/CSo7s8Kn
+k1EANAWUfrfZSJFWuEUYm3QB6OYWCAp0kqIGg4PyI/d8EIrB7zvDQ4ZyCifI
+iw/eAtWV5oZX2mQoa5r5YkPXW3BYeGwZE0CGWJPFfvzJfAs6j5N0SMfJ0M2l
+GOV5lbfgvaD9bCeOHJ2OEGA/vsmD7picOY8v5Ch8bZaI3jkPpvtf9gbvkiPK
+o6KGdOU8CBNQ6lPA7c3aTeH93Lu5kOlMEhLKSoGiYkb5+NVzIT3+VkP0AwoU
+MnLoMcyeC7WPrDaFwyjQI1FOiaKjHEgJ0wvQ2qVAS7FGRN35OfDI0Sv2bv95
+xPW40gmfOAeu9Fkn9w1dwO2Z/XXXv2eB2AfOIq39C6gw0L7UJjcLIt+dowE6
+SlTdlDjd55MFsmz6dCq6lOhEfOOUWTALvL8VWztgKdFAaUR5bnImlGe7umgS
+UKGX00L3+VwyQQTPW62Akwpx+CixYO9kwsjM4G6zPRXy/xh6tYkoExJbhNQ6
+CakR1z3kNjCbDuyzO07R16kRn9Jeu1taOvwqIzvBalIjjsv+Co8fpAO3S3j8
+5WxqpB9NXa3e9gZcWhLAXoUGDZzXPl4qTAP990/uT1VfRCEth3tBL1IgonOs
+Nn75IhqvPDhbIp0Cr7yfyHCw0iKNz3+0RXeT4SMlt/9MFC1iZFYusjRPBsvm
+fBJfFzrE6xM6oaaSBDKk797Fl9GhGlv7t66ESbh869FUrtEhQezFtH+NiWBE
+2WpOb0ePKLNtyEREEuGE4rXMLWcGdOeswBQLZwI0l289UaplQAW5v05UpuPh
+OUX7ZMBfBpSqbCz7KyMeWIQF/AZeXkLXj8hukTPFg9Y6d83nZkZk61xjdEIf
+BwabQiLJ55kQserkGPdILCQcUQvuGjMh+mdCEdXJsVDVUMRlQsKMCgfMojYY
+Y+GtSmC3uh0LcmPCd5vniIGtwtXBZ50siJI1B0uz+Bo2kx4oRXFdRgF8G4k5
+Ra/hqcCNhdCVy4jEfYl4Wvg14H336ZRrZ0V5b099Z5SjoXiXLpLnlBWtGtv+
+oTkfDSF7f4PlRK8gO2e/AfWiV5Dv+i/9csEVxPXP/+dwx0v4wxRIXJjJhtK/
+k5mfkkbBnujdc7TTbIg7w/TQJi0S8jIZhAg52dGHnVe0SfyRkBNpWRTznh01
+ePvclNSNgJ6IHra7++xIr3zGuXgtHHSkZOhbEAc6f8Y1YiowHHpaCQnwRjjQ
+rsfFltcVYZDnB19XuDiR6q81KoxaGJDTkbZ98+BEn4yjSlRnQ+Gu2Ke0d6xX
+0WqkCD+GIRQ2Mjko18O50EgqXX1FRDBUPvSvrVniQh77f/1IeINBKnJh5ESV
+G0mVGPle6n4BjdxGh9oXr6FZw0+VzpQvwOhzjP0b32soci1RuL4qCITqDKw/
+L19DtV65vs26QQDK6fr0XdfRkn4ezb/sQJjLMjkMkuVBZfKN5f+pBAJ/tn3M
+rY886MDVqEl4MwDiMdRH2h94Ue3og+FHKAB07GxiGsdvoKcmAhLpS8/Bxa6s
+e/0JP5IcYXX6Fv8c7rwbixgnEkCrQzY51XLPYeSS4fmdXAH0YikgMfamH9Ad
+LN0fOxBAjaJ69vOpviCYccDse1cQmWr649cd+wCj4ia+8xkhxEwo/BDb/AyG
+EkffkVoIoWd3Bi+LcDyDgc5u/tkOIaR2j7foXLg31KQ2x5xJEkbbzqoAel5w
+8YbkdvYZETRTl2OT/sUTN6/+SxV0F0F0y2Rp/gKewHtp9+aGpSg6TeQPHyT3
+AJrHJTWRc6JoTzo+TMXHHQrEks4cWouhBu1sevkNNxARk36t6CeOPv1rzewa
+cgU5QY6BKioJtFo4Tfjojiv8bsdWUhZLIBseiu8e7S4geyJZsLoliR5Zc8ep
+1zsDxtYv+mrGf0jtIJGHVMIZ8FirRtrvS6Gc5+73ND84wbC2TB/hL2mUECDe
+EF7zFAr2O2VSs28ioRPedp//ngJlLb5UtKcMihgQWsdrfgJWmY88/7IhpKeg
+M++W7AiVqeeHzNMRIuyzy1wqcoB1iwDl3suySDXwSlJQiz0QTinSF7yTRbWv
+M/6ojD6G5BjKPGMxOUQ0L7YttWcHrw+S9Jy65JDJc6oRg4t2EEd8/Zu5rTyS
+kdwmfi9uCyfny58qflJAN7S0aLdeWAMfWV1IkKciEnvsfHG+3ArOi5E8U7mp
+hA7UE9/QTlnCzg3vWWvyW+h0mcDtBbUlWD+PPOhauIU2j498RFUsIJ8YKXv0
+KiM/jfmSawHm0OLoPBbaoYL0fj+nt2gyA2p7zydbc2rIz4nbpQmZglZXVHrk
+8W00YSjHphBrAifG1k+L2e6gRd+Lr98vGsPsQqv+qMFdRK8SWEsoawzR3SzC
+81oa6EOZmXaIhBHwF25+qCbRRDPnsfxzu4aweKNEfK1DEyX5mSVw1RjAYPpS
+WHPcPWQfbGai5acPf920Jl88uY+YNLQKXdX1oFRHtLHN4AHKxnj0vrryEKI+
+m/wT19dCZFPLz4qOdcAu4IxKn7024o1nedc7pg39PPwUXQk6yKK6OJn4sxa0
+5jeXVA3rom+cmfu6pQ/g5OM4pYeYHuoQufm5O/M+GBmuuLtW6iO4/9DIMfke
+ZLkw3oi7b4iWpLQybyVpggZht+YjRiP0zfHHV+M3GrB0/urehVBjZGeuKRGh
+eRfkxg2ZMWkmaDxoq47AVR0cqHhaNbtNUafsjVbIU4Mt6QemMqzmiOz0i6j+
+tAqcLeksxaRYIIbOHQVHXmXgYDMMJ5O1QhbyqrGJgUogH3IoPMZkg7xDHB5s
+LShA+SeT8AExO5Q0Hemc+lAePuKdr/NMsUfN3febPwzLwpH/Lj81zxOU7BrH
+ZGmBQHD+uddO41N01PrD/82/m4C14zvUe+2MHNpvrAtoSIH9rLAAQ5Urkl09
+hx1rkIAxdVWCCEkPRMSKB0eKYsDj0ZFnJeWNaMtzLDdWhAHL98vCadwXcWRb
+CXC9FwTwYim789YfXYtxjLvByg+NmwcCX62CkDmeQ5k/Cw/Y3SMqfz8TgkQM
+1Uks9Ljgr/RxqKpZJOLQ5Zan/cUO+ck/HjHzvkbniFYVj16xQmd63C/Nm/GI
+xOf97m0GRngTSK7whSAVlTc2y40lX4Qgva0D154sxM5ebj2bdwHUxXaKg9/m
+o9/2chvEL0gAw4Um/FUrUJ1VHS/JKh5YhI0+KBdvQi+J2OiGrvyRodllwHIy
+9aBbAt7E/VfnZcLOyn7Xbp5H2VRJe4fPfsjoP5i4KvRyA3mR7S1IC3TI/B/R
+Thl+
+ "]], LineBox[CompressedData["
+1:eJwVymc8FfzfwPFjZY+IIknZ2Ssrvr+OlL13ChkhGZdN9uggWcUxk5HDoex1
+kSIZZXSSklEZl5LtIDLu//3g83o/+Zy75W3qQonBYD79r/93SFwjfdxtFRXv
+Lei+Ee/VaGqx6dgXe4Ow2GvPW0ZWNbhFZI9+3m9CPIp8VcGmfzXCEn0HJmer
+0MPrfZH4Ymow9zidjBctRQkHNbXsg0zw7US8rea7AkRLszu3z8QBj1aynLU2
+s5BwhIPnS41TULFn231CIwMxBue3z26fAQ3DybwTrSkIVTAfFpw6Dyy+u4wN
+dTh08WpC4PEAIagyYGxYnYhD3X24C7KsYlA88fNr7UQ0Svl4hfvhvAQMB4ny
+fFuJQIO07VVeYTJwVN+GXrGEoZzwV9S7RXJw7g6LmvO3ICQu0Gg0OaMAKRMR
+okvKAehFCz4vBymB0retEhXSP0hA0GjDak0FKMKmTw0M+SCCKMNwZ+cloAru
+EfRV8EI0ubIko+cA829L1JHuHUSM4Mf33rgMT9K3Vm73uiErvlDrhE0sYE+H
+iqfnuKI0I8olKfwV6C0+896gzhkFteJOpupdhYghsv35Y07IbVfEIohZG3xt
+e3Y+Jjsix+TE9LYpHTis9MfOqzkgxzmRDcl2Pajjo7vswX8TheHoSggEA5ik
+aQv2oLVDwylNlVQlRjDsZ63kLGiLTsm//vHgkzFI07/jM/axRoNeBflO302A
+qH/orzlviWap7ObJ66YwvW9QrBZhgT5RW12TYTCHLl0ckXzRHJklVS7TiFnA
+tPAxnj5GM9Srq4l3NbSE6Jx0j4xdE5The5SuGWoFW23mjwoOjJF2Zmf5wypr
+sLfXT0/lNEaGL3T5VedtYEWVLNQSYYi2ApcalAWvg9TjqHDfDX0klNiSFO5u
+B0eTC7PCsXpIFTlI7DfcABqNDdMTUrpISiE5jnDMHuoCNsP61rTRnp6pp5q0
+AyjYXfLk7r+G9uvoZiSnHeAuf8MuT+NVZOk2wy2c5ggHKKKcq14LKX86Ucun
+dQssl9i74l5fQQymVe7sB7egRO/JugODJhKootgaC3CGGebDjmAsFn23+0gu
+uOgCMXn0NoYJl1F+Brqrv+cCLisppL1RhDAuwa+mXrlCdedl+mpJhDyocz0N
+km5D13OpEMOzgCa1khmyLd1gRlBxMoSsjqxe/NBvEnIH48E0b8KgGvqZ50Xl
+8t4DPMUaue4Pq6I73pbmSyV3QO6+t7bhtApSXdSkUInwhETJBXR+Vxl9sWGQ
+vnb9Llyq3FRTOauMFv9OcXGoeQF1YG/TuJESmpfNp8k54w2j7Saz1kkXUR7p
+YbUHhQ8YxahGJfIoohxe36TaRR94Y/leXMBbAYUdsfZbOvrCYN3oL/d38khh
+LdTMeNwXgt20tlVy5JCTxdFLlcF/IDA6hW2LXg6xMhx4Cuv4gWlWWEhnlCxK
+iuDGOL71AxcBgrtMpAxi29PvbH3jDyy/ytQvHZNBMlu666NaAUCxbSuAFZRG
+DdqjHMp9AXDSaWZr0UsSYYiJ4SMjgXDVUdFkukgCya7GHVBaBcEdCcsPlV/F
+0Z0+629B00Hwm0jde8X5AqJTuhAqsB4My2WdIQsvxVDG4IYDq18I7AxuBIuc
+FUMBCQ7DrNshYFLQrxO7KoLKox4q6h6FwiojdaGYvQjK3WGXiYkPA3vMESn6
+ozCiy81rHmC6B6uBCr/D+4VQi3hlXiJfOMQnCDl36woh/eLtk4eEcMAry2cd
+DAui0Ioah0iFCPjEnDFcNS+Arj7WaC81jIR7KxT2yyrn0WvuVbra3ihgoVfX
+6hw7hyZntkXYj0fDWZsEFu/Ac6jQjEFt2zYalnmxDXsd/GizfKRIay0a2tNe
+rxa78CPaoAHRGrUYML3QT3jNyo/IzKas+fdjoCBFIpN1jA/plBF8t/ljYZlV
+rJxOmQ8Z+2RLOnvFAmevHJ1m4Rn0n7VOn0l7LGjyH6nOBfKinQF7UaJNHAxJ
+mxYyWfAgD8XCDv3ceMjTZixS+sSNUklzaS9+x0OcjlVvnjU3on4bHJmqngC+
+FedFS91OIUWsmFPPTALAAPk2hsiFdgWT/DDyOOjsY7ijhOVCM7eptDVxOCih
+rK1bnOBEic4VHZhpHES1/dEI5uJEcfT1TotJiTBgwF138RkHMlNyafJZTAJc
+EinTxIgDicykE6I0kyHtnty7m3vsKMD5MTV9QTJYULm2cVmyo60NwfVokwcQ
+M2XGlXD+OHqgmZbB/CoFeG1yZFvH2VDhL1LXOO9D8GHapQ7OYEOesXZOvKEP
+wS9pKOcuHRuq6yTTU19MBf81yyo1BhbkKU5lTbRJg5Qoyon76cyodnnvXzIu
+DRisHwwrnWZG64Z68oEtaVBdUTwQp8iEbM7r7PGfSod7jIWcqnEMyOwZqznH
+13RwEgnroz3DgLzcrNp4GDNgkUis7mumR8uyw6E2lzJgviXz2eYGHXJdPNl4
+70kGqK/zWryIoEXvslaHrdwyIQM3PD0qRIv66BZ6TuZlwrZveNnjoWOoiC4h
+gGUoExgDVD90CR5D4iplLU8UHgEe82hheIYaRaEPs0bUj4FDcdmvqJASEQlM
+9V+qs+CFQ/HD+OuUaIXzUsj+bBZU5o9P4rgp0ekxbowlTzY0jae0fcBTIOm2
+Br7K+9lAwtJ9GCjBIK14DbtPznhQ0eAiHrphUPxb7pmyfDzsL0+RBaQxyESN
+c4Q4iocfthUKN+8dASetVaeVVg4sXLSoxg0eQLLP9L6UWC5Yr10aPXQ5gI6A
+JVLFrVxYc8XTsWIOgBy5PGKTnwuGDdzmU8r7wMnDLmHDlgc1Nl2mtu170DVH
+0ze6lwebXt9Eaqj/QKtnj0z7eAE0ePe2xVbtwDmWaxv1pwtBe8Obs9ViB/7V
+TKBbvFEI5sqFbJJV2yDXHq94fLYQFFfD2CLdtmBx0qJbb+0JUCyIPSjl2QLu
+bWWJ0zxFoD4m+XNnkAyjpOtE6UtF0D+zLXZcmQx/kLtpU1QRXJjPqvTj3oQP
+/zCWqDI+BU4O0X3P0Q3o2PBfFZN6Cof+w9fd0zZg/V+mVGWTpxBeniBgzbgB
+PQFhU/XZT0HfuOxHCtM6eBse3hIQLob1B+O5Nr4rQKDeL1rSLoGcr5Qon2oF
+Sk0f3Rm9WwIhkxfsb2Uvw7H1TYbJjBKQ9N3F3uxeAnlelW3dqRK43j/yx0Hi
+NywJX/lK8CuFtWb2VoaBRYitLChJyymFcqSzSOO+COMnIyrwnaVgPBFF/bXy
+F0wNWJbTM5VB9QLnZUf1n2CzyCjl+6wMmMmOYwdzCxAUSZtnN1gG8n9tkl6n
+LICBku2AG7kMZscKzxJn/gNTrqr2WewzuCkqexCfMw9UgpdFXH88A4jdf5mn
+NAuKuu/rawQJwMRnHepEngFDzSi7TV0ClFXQaG/UzoBu3edhM18C/BupWWMj
+PQPaPdH+Xi8JwI/rSKeU/wE6llOuzLYVIP3qbg25aRp4vrDZ02dXwgK64v77
+6jTgo5kWFDorQUTGNv3slynwXTnailyohGU3te9Sh5NQeTZBKkCZCNziPnr+
+1hMgJC808W2CCFgaIqMY9gvIGYirfRathlBTBh+Ouc+gHHsxkMmsGgqsGusO
+Ej7DMc/9Sqfwasg8kx73ZngMdKS1O4JJ1fBqqoL/tecnIHwLn8ZGPId8rc6y
+wQ8k+G+51Dt+8gXcPD0lcjmGBErkRrUQ6hqgy/Fbj5MnwXbYfb8unhp4Opx7
+9A/+AxTgvGJSrtVAkeGvuuI7I1D9lmqavrgGnMLV2UI83kPS3Wdn221rIUQt
+vC/s4zvILL/psOhfC5l57EqiGu/gFc3+jlxqLRzOFeTcPjUAPdok6RNv/vdf
+OS2z8K0X8PL1qnzSdeB53rGqwKIX0sRai4R166C31WSF9P4t9McZZei51AHb
+osBMWWcPMD/ZsFjKqwNZ4miTa1M32Fr4xGcw1AOuP+RvslI3jO3tOeCE62F0
+I0ONoa0LaG3c7xVg6yGp0EQE0/0aFr4o7gmH1UP3vrdvY18neJKar3ct18Ob
+7bCl1K4WyC6jnYsYb4BN1vaNc0vNkKv0vSp/pwGKOAwlfp5sBjfHBuUfnI1g
+lJDwciugEVb2R/5+N20E6bD8fFu9OtCYfr7wfqgRcOtGL0nxtTDdgJzkVhrh
+SIOqUrerBhQYxf7rZm6C/fXCWWzMc2DxvMHoZdAEXTsNVxOJBKD4YxC6NdQE
+ubwSJaJQDlcC8TUfVpug2vu6gcdYGWweqb74ztYMZmtbmArWEogtrSXnmjVD
+adoNzc9WeTCf2cJfONEM5bUJnD+b8FCurjsnedgM/PFtp7N5s6BkeezKLn8L
+8B5p/43+mwZmL3I5tG+3gPKbc8rSvx6AVzJGfSipBYrvY/4eLNwHIWvOsMfP
+WyAlz9NcbzMGIp7YGj4htUDEdGrTPOc9WO6ovLq83QL/B0ktRvc=
+ "]]},
+ Annotation[#, "Charting`Private`Tag$237555#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6],
+ Opacity[1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJw112c8F973AHAjIp+PZJaUkT0yS1nnZmTLTBEh45tR9s4qhSSrItl7hRDZ
+o+y9997jY0UZ8fd78L9P7ut9H9wH557XPecwmzzXNCPAw8NrxcfD+9/+/yuw
+4vMU9jUWfbWwGeI45oD4hyVMmFMnc4oOcR6LQtgadpr41LRF89Pxx3fAJiOB
++dgfi3aIHw/yHstDnKjDzNapZ+Rt2sr/qcJqedC1mVP/NPZISDvWAOuO9bmO
+U9+TshuxPdaGt94p7KWnFuDE9Ekc68L+/dKl2FN7vEPt5471IFVLhMfnf/fb
+EBKP/jOA4lVWnOGp42+yTQ54GYEbJkpQ7NTvt4liao+N4TF97O6FU/d4xA/k
+ej2BmU1ZsYVXWFTatV4Qc2wKfjOJJ99Pnc0f0+h5bAFfC1sxaqfOz/p9x9br
+KSQE/dSmPrXP/J9Rs2NLULdquTL4EovaZ/dwusc2IK5pJqx56jXcVrq213MY
+PyPkc+7UOblKeNzetjB+yUOt2g+LtjdsAvhO7ODaML7t1VOTX5F+JVhtD9+n
+/eqbfLGItGHjvKi3AxCQno1+fur88Gla+RNHyPPJa/nmg0U6Qj7JnicuUGCy
+rXLeG4sSHnlNhFS7wrjTTlGsFxatXnThSvZ2AwFe5QTOU1fdceDvOXEHvO16
+fJEXWCRK61yhjOcFDAbhu0weWMT1gfWWbY0XDPTsvohwx6KKh9Syn3y8wTfC
+6C3BqUXpHdOcfXzgYBRuDrhiUUH3ht04nh9cW2bu1XLGosyZgO4DIz9YwxUE
+ZTlh0VOtFz8u1frBbub95n+OWLSUFCv9yPclMJvjjUc7YJFd7Aj9Lr4/mGVT
+m2fYYlF3Yve6J2EAXKLalWO0xKJxLGtlh1UAqKmf8+d5ikW835u2WPoC4Ee8
+T7Hwf1i0V8VZ1JMSCL0Urmui5li0oqtZqX73LVx8rlNz3uT0fZvj5zoDQ6BW
+557jvwdYxB2aMKayHQL+3enEzbpYFMgwMtGm9x6+xM6Eh97HoiCNTJpVmlDw
+83wSQ6WNRZgDkpdnF0NBPr7ixbIaFkk4UVqGBYaDO7sVXb8MFjVXq6WuVIbD
+PklqhJE0Fm18ii2V2w6HvbOC1EsIi35fkPPE14+A8PUrbKuSWPQ5K5Y0lDcS
+jEZbPteKYtHcUUE7tusDEF2N9M7nxqIHClez8i9GQ6SZ0XQMFoumRydUexSj
+4ax94ocWMiw66pBn3HOPBmXtlcVdUizaytd8JDseDYkaGU+libHoIpVA6WHi
+Z0jvL/jz7RiDRgX0aoZ5vsBnE/mtbRwGzWUP+trdiQc8Ngux320Y9GD6vfS0
+fTxkPhy6W9qCQbw/5Sq0UuJBJ+YFxq0Jg/iPrjknECbAiCNT42Y9BuH/pjCI
+M0+ALkZh6h9lGFSkO787wZsInjEnc7npGMS3OTDnV5YEzDhGA35vDPK34g1e
+70kCYgrn8mhPDFoU3Wp4uJoEoZtvKPHdMSg0Q/nkJkMyGKvvfm1wxCAV3Nb3
+M17JMPWuo5LPEoM0vP4xbdxJAaru7CvW2hg0JSC/Rd6aCp3BQTYF7BhUe12p
+6vdMBnD+ifoZW0eGAt7/Fdn6lwHiojj6s9VkSOtqMM/mxUzQUxUStSknQ0Sw
+lbyrlglvhfca+YvIkNh6MyVjeSaoZ5a4hKSSId8wLUdcRBbY8PN4Fb4hQ3La
+070R8jkwTv2iK12RDJlJhsUllORBkRNW4PPPc+h4UN+U7lohPLLjKCXOI0Vm
+3NEWRl3fQUOouvW5AQmaE6pSrI4oA9mqrY7U38Qoi3qd9COqAo8baq0boURo
+TZVIfup2LZDmmOGq8M+gy5yM6Ypq9bCoQhE3+poAWf94tnzW/RdsH9gEU1Lh
+o0DL2e9F+E1wJETZZkZ6Arr4uNLY9y2gxxS5RStyBKP3uC+NR7ZDrNaoW6Pk
+PuQqZ0UT2XTB382+FQbXPdg8o09q79AFc5foM7HP9qBs6i7htFsXBEWHvMcz
+3YP2zauxDa+7AKKfDa3d2wOmQM0v+Qld4O6dYzfJsQcd+lyW+P1dsNmR4ME3
+tAtq/xGmJUM3PPRn9bUX2wW/9gYn/Ss9kHo7xKuZ6DfoEHhKUrP1gGFyXrXn
+4Q70PluL6eLtgQW63zVCWztQyZTFqS3RA8Pj68TpYztQqLva+1q/Bz5Nvy/O
+L9yBV2Zj2NjPPfAs/TVSNNkBdXrFiKTLvbA5fWYqonYb+l/h/Wji6gPymKXM
+goAtaJn9T2dVsA/m7+R+qfTeAsdn+S0XxPrgjJM+bZvzFvxtZFaxVOqDPcHF
++E3TLfBkp8dXsuqDvMFcmgd3tkBZ7u9WQ24f6KGcoYSDTRA9Egtuv9EPAdFX
+di8/3wSzlY6ids0B2F1K5XhfjQN0/lrzr0cD8JTbv+BtLg4IM/Mt6s0HgCgi
+WSMkBgdq55N0O90HgINRfCDVBQfiHXfDuJMHQEon7/CKAA4sfW9vb/8egMbQ
+/rPCSevQuio6tfllEFYuDEpuB60B3d4zu5T0QWD80Cv4zW0NtAw6bht+GwT9
+EV451//WgGJK581c4yBkMUa10N5dA8aVW2USO4PA3aanHYu/BhyWx+VMykMQ
+7tzzosttFeYkByNnToaAeB7vS+ezFdAgP0MrTDYMnpmmzxMMV+Dw4EQniHYY
+Nhp4eFzUVk7jRMyryjcMWc7p+jevr8Bolek8q/4wmATpxB2uL0O7M7k6S+kw
+dDIHfEh8tgxnmqwbX7mMwHIDrbae4xL0Veiylr0cAYOq7v1F0yUIv5DL8Of9
+CPgv87z00FmC9kPbf28yRuDJfj0U3VyCxTePNYlHRiB76PFD6/1FWMAw4ntK
+jcLd7oyuPe9FCFRmEH6JHYP4gPEY+7AFkK5FQ4OXxuBSr2p26csFWGX9cyjM
+PgahLX3dhM4L8FrEdZQAxoD8XK9Jpt4CENDdqT+0HYMkYcq3gqwLoM8j+9Fo
+YAy4bn5OvVE6D0rREpw86eOAx02tf25uDojKY4m8isaBzd7x0/bAHPC7/9IZ
+rh2Hsv6wicnmOfgz5vg8c2wcWumk3jbnzQEmdMUun3ICZBp+agx7zMFgiy+L
+sc8E8DLT8q5Qz0EwRnM1yGQSfhH9yGtXmoW3XKM/RewnYZzwwYCi5CyUuByO
+LftOwu+jb4Ot/LMQYfr4wClxEo5LhyymqWdBX/qCPN30JGxiVLM0J2fgbERc
+mqzgFDxgGKJTdZoBlcBiPNmSKSjrWDX+kjoNQk4ULsPVU/BsDZx7oqYhnbHz
+iVPTFAgb31MlD54GHNluZc3wFHTYGqNP9tPg8TxXLu1oCirN/7uGg2nYOnik
+WigzDZIl/Sx5o1MQtfBrAzM4DZU9EqSudFPwLqP10+TkNChXvSwSxExBbKFK
+XenSNLwmNlDdxJuCLy5x5V4H08CzEBX4t28Sjki6yfSuzoCanapVnMcksG5Z
+pWtbzMA+ldZqTcsE5F4tEAo9noHmsFTS+7bjcNwetnmHZBaG77O14+uPg3pY
+Je/hhVnodCcRK5Ebh880r6Vfsc1CCqE7KVweh6acj0NbKrPwwU5Po65hDFLV
+Q72lY2eBGWNI/ZFxDKTjiskPZeagVJwu33xoBL6xLdu6qs1BZOTXgMyfI0Cj
+Yc11/GAOcIU9zrv5I6Djnv6T5dkcUKkKv8sIHIE2yctl3VFzoBak4OghPgLC
+bGKvOjfmANvbX9qTMAym5E92IlPm4SeeuIG4/RCIzu8rC+afmsQhJ/bxEDh+
+MdMaLJ8H2jeGoySqQ9B4VTUO9c5D4IZZ9z7HECyQODgFEizATaGcdbmJQUiz
+P9g8NlkAnHe2kb/KINB0vfLu5VmEPOLasUj+ASB1m1AevL0IU6OtoREMA8AQ
+y2S9JL8Iteo1Dl9IB2C9L25byHQR3soJVLbN9sMQ9Xt2q9hF4KELupIe1Q9u
+GQuUbpRLEENfiLlzph8aLl/Oij67DOQYnOz+TC/UzrO8eka3DFaUFZq3u3uh
+rHFKQYtjGUSc7WVfVvdCQl7Rhor8MiBJbIvIl16IOterQBiwDOJ+mMvk93uB
+ze/YJgyzAomKs2WfWntgU+OH5yLLKkTL3yDbq+yGQCHC9GLhVaCnffcg4Gs3
+xHMMv4qUXYXx+YgTlvhuiPNTKX9lvgqs+SWadj7dMOhLVCWYvQr8Wv79djLd
+oJdeTNwnugZ6lRHv8Fq7wNQqa3vbcB1yrYId39V0wus63hhS+3Wg8ftTUpPc
+CV9IPmqL+K/D1SqO62fedELdk1KHhux16Hwfn1Su2gm6x/b1U/vrwDeqILY2
+2gFVgpv2pJ9x8IZ37IP6YTvcw/Zm065ugBUdlT3p3TagSFz8zwR/EyI7bUuP
+ONvghXNxizx2E7pNSKwJMG1gdEw0Icm2CRSpR0RyPa3gE/mKeERnE2hX/e3T
+HrdCZUWk8PKPTZCfZYnuf9ECrx5FKxc0bEK/MwGsG7eAqkDxw8DeTZBIUjqm
+vdsCqaeHT9c3oc+dqiiBvAXymRHPBvMW7Ny1fhqc0AyetIy32EO2oNfDwrim
+sQkyZiniD2O2gGmKhONPThMkZG/NzmSe1sWg1QIIb4LIqqdvF39twUS3MQGx
+QRMESlb/azveAjM+vwPznUagVOadZHfcBtEyuyyna42n/1fd3uVnOyA8ynwx
+MfQX5FKZZ7N77QDrmbhrbq6/oI5dTlA+ZAd4DS7mGhv9glCD2IctX3dg5jsJ
+u6nAL1ijuNIzvrkD7SKT1653/4T1hCeORm6/oT8pZaOb5icAucPSWNBvuCbN
+8TLvuB58buoQ2n/5DU9WcmVjF+vhAu/ZnYXq3+As0yKZ+aMegjyFJfBJdmET
+/4Gnn2E9yD5rvMUWuwvvn0y23siuAzkSL1XZ/F04wudZovpQB3z+Rvre9bvA
+MRY2g+9dB5XU1UpKK7uQ6ldugNWqgzAZ8+3bt/fA17pzevqwFupkJJW/j+3B
+QR7tT0/1WrBduCO4J/4XfkdcpNElqgH5ZHl+P42/cGy+gE80Xw3c22c2+Sz+
+QhpMGDlXV0M4EWvdfPhfEFQ0icxwrIbpIU6yidW/wLz4bFNxqgrq/CPjr6fs
+g4H5lINbRSWoM5hID5bvw+SD+gPHqEpI5JW4mtK7D6Zt9wOCHCthvWf1Rzbh
+AbTge30i5KsEqYFEKQ+zA+D55ZzKG18BXMRf1U0FDoHmu6m3VkA53BKRPXZW
+OgQ15vD8VbPy03xZ5y80PQSZPof/YmXKYe15W0Rm9CEQiFqrqJ6UQW/raEMU
+0RFMV+MTT7iUgUL1lYrB+SM4v5SrUGHzA1LnGkvaW47h77SEp4h1CUy4irqE
+rx+D6nwXtbJSCTy4nOMYRXECD9PF3nhxlgDN65BhS90TuMtm2i0+/x2kS60+
+SyydwHtyrhlyo+/APiHAHfMWD9Vw5gqR6xdDjSKNlFA8HjInVP6+LlYMIFIz
+vvENDz2xyHVYpi+G4Yq/T6dG8FBJ3JrDjdEisBrIyk7ixUehYdMOVw2KwD3V
+IoFiCB9JmJLU85gXQjSThY8cDh9p66mLt8gXgt2lcMWMMwRoTLdW7RVXIXCR
+yWXvCxKgKyiPUXn9G4g9LEgeCSFAPi/J77M4fwOMV+8UlSYhcqW//AIXXAAP
+tSaGnloRIqp4J4y0bQFEOfof7L0iRNZfz3zO1yqA+spqvR+lhCiPoy5ggr4A
+fEtnvbdYziBrPYEUz6x8CH80P9FJQIRa+Wsz7WPzQOCT28nBFSIUKh9sT2yV
+B5XsdKZGt4mQzAvR20238sBY3K1wzJYI2QW+9e3v+wqsje7UeTNEiDrISoHm
+/Fd4Q3JXy7iHGCVxL5AxBOdAmkmoSMAWMQossTQJeJQDP2p6AncpziISt5+V
+zHw5cD//Pmm6+lm0y8wnN9qRDZ6PSuy8es+iS++oFi2os2FyN3Oud5EEga0G
+0Uh6JqxP9051k5GiJ6nEDuc9MmHs3jKOTYAURQ5Sb9qezlEsG/QVfW6kqH3k
+yWjJbgZEJJG/sblwDn3W+tmudTcDtvQuXE3QJEPU+HML3zfS4JeLMnuo5+mc
+FaAtmPYrDUrP3ApaSSNDGRAfXRNzajJumbkjMoSjO3zjrJAGkaHR+LRfMehv
+kabYfHIqyKQhmwl2cuS6QrpfY5ICYpXdXbd0yZExFZkJs0QKWAquXaQKIEfZ
+Atv3s2hSIJdeK19tlRxx/b2Te6M5GU7QQ1260vNIij4xSEAoGQ7rfuCnrZ1H
+TSmW3b2YZGhKk6KdoaBAn5Zv3oxfTAI3mu660bsUqC1P5trX2CS4cjni/KPv
+FEiIH5FnkyXBUnSdAF4vBQqoJm96t5gI2n0VjLsbFOgvVko4qj4R6k/O6g1w
+X0CvTroXr3kmQtqWscznlAsoN/i1Bs1GArQeXRIyzKREqfwhuIzSeLgvdtWq
+oJUScWb24j9wigcjoS59axwlWpcKa9cWiocvFukCTDeokO+ID5tobhwUSx9I
+FzRSIepi+cOYtFgIrKmKclinQjhV8r1is1go4Km9kUNFjRiE8ocY2GLBsVlH
+LcCYGm2/4cd1pXwBD7uGPHZCGpTVVRrYmR4DpkodOf28NEh2Knpb9WkMRMyY
+C2J0adCXRnLnizwxkDg5ZHgplwY1WzFYhOV9hiR3vJsHj2nRseUQH0VFNOyG
+1F8RnaVDBEmiRjyzn2BSWpz0zOWLyFRk7MAl5ROQ8PJxpmldRLcVjR4wmH8C
+rApvtkfjRZTEqDlptfIR4rblaHE/LiFbzxs/WP58gICP2tcX/l5Cob/fEnOX
+f4CXyYmEI7foUZXUAGOA9wdI6AwubSmnR//JfZNQIP0ALLL7aXYdl5HDX82e
+PqZICNExwC7RMCA24ceC7xcjgO4P479AQwYkk/fHKv5rBIzc5yuw2mFAxOFf
+/9VIRsCJtZeoLe9VZEUzYEhkFA413UEOZF5XUWEMo5kVVzikMTRcJu++in7H
+/zJg3wkDQjsFAmsPRlSyPFn4+U0YuDpqp8vaMaH38pEjbkWhQIG3Unw9gQnh
+5Hn0XvmEgqSCruV2JxMSl95fmVEJBfwqzwwGIWakUuuZItr+HlrLbavi8VnQ
+3qCKx454COTtPmTbF2VByNcmSmb4HZTXVo08es6C8h5+5xBzeQf166oej6dZ
+0JtC+5ZLxcFg/+6WDlvvNWRwt9E+9tZbSJ3As0+mZEWpqbx2l0eDYELpH7OV
+FivyPGiSk/IKAgknOu2jIVbktauUZdcQCJ5XA39J7LKhIsFO/CDDABipdeNn
+QOzoPbZDnYs4AP58YSyMCmZHV735tqy+vgHnPXD5zM2Bes8LWY3gvQGc1QTD
+TU9ORGcMSDfXHy44j8iad3Iirdc8OjGP/eE/me8/DFm5UEkAvoE1pT+M8vU1
+TvRyoaQCjh9Fbq9O65t4k991bpSzKN3Ec/0VSEXPbXC85UY63tPAP/sSdA5G
+couUeFDFntPMiNpLON9DrlSZy4NI29Rb/YhewmORu5ykVLzo3jfPqO8VfsBY
+QstUNMeLhPnojWp5/SCuOm/nZdp1dL5vTcqIyhcqHRuwnVf4UYXX3vSTDh/Y
+W0k1IIriR8Mlbk7bgT5gI/Ehok1JAGn8nDjKI/CB2+1TFz4GCyC15zv2ld7e
+0D/XXXGuSwClOpFt8h96QdBhXYvgI0H0gVKcVWv3BXCp7e4RpgoiLZObToSO
+L+A3O91uzYYgEqNf/Ne44wmSFNu3Zd4KoYOvKXvBex7wbdqJI3RMGImnawbh
+k7rDcgcx++hNEbTYsPRBLdQN7vd15pdGiCDBv+luXy+6gQZFZ3uEzg20/S5f
+KI3XFZx6Z8aaym4gFVpMjWSpC1y84xJzwnITUes0fFiUdQFCfQb7raObyNq8
+87OdsTOo57AZbz4TRYfiKERjywkctQbnXOdEkX6FhaaMnxNQdH4SrR+5hdxM
+mBb10x2BiEi6iGBfDBGrsYwZHtvDuUXwPxssjtZ51mdbPtrDsPGkMjmrBHoH
+i4wKAvbg2rRoTmMqiRjp/p1zNreDsw7MHVEYKVTBXZrFTmgH23fKxljLpVCa
+AZ7RUoItYAROdn7RILToFHJOqvo5PHKwHCF2QWjuQtgmB/5zCN0Rkt8ZRUhJ
+loBcRO4ZePP9dxJZcAfd+EQmXNhrDZUl9K3FLNLIIeO8JftVa/ASLc96GCWN
+qHEFohWWVvD94t1M3nAZdNutR0T9nCXsJNlOqrPIItaeveExtacwOpbcRfND
+FqV6K5etffgPSkhYSBfvy6Hm/BIOn0kLCFMt7rl1JIeCYipefOKxACr8bqrA
+zLtorbSXWdjdHBRdRRSNHssjXcmel1qtZqBi+4UVf1EBYSKYXVidTIG8hFT8
+cpkierlTwjjQ/gQCGLdpjaKU0MalwmJyricgMZ4QmOCnjHB8+rMdr02g+c+l
+4xo3FWR9jt+IbtEY1DycKsq9VBGRqdvWkqIxlIgwvUgOV0Od7huWsnlGINjl
+HU7irI7Yn0ea3CZ8DLpPytK46DXQ9fGCxZvjBjDpmJTo26SBcjBrtOoVj6BC
+U6Fty1cT5ekHSL5J0AerCZyjo7wWyicn65wI1AOhhCsGTPTaSFNB2OKh60MY
+enJSwnuojZScrrTtWz0AkxezfburOoj/TOhmnakuKEisfSLA3Uexzc57JSb3
+ISqzcuUc4QOETxAuOGamA29Luh6c8D5EFT6G3MLPtOExtx8d5TM9ZG0pmVjj
+oQVlEQPNtU36SLZiJiwgRBMEHqmbLoABcp2jFH2fpgEZO8F5NQOGqPJ3Kflw
+vTpgeDT9XysYofSBmor+tntASh915d1tY0TvI2UbwaAG77vpsraRCSra/Xey
+66wCL0j2ieKMn6BCprVZkjElaM+MTdyJM0UKpmQaQ8qK0GFUc3bzyAw1NHIo
+2DXIQ4aRAb+ijwWqpJVIm1a+C7NPQnKjrj9FdEytN2+NyUJCRUBUGLkVKkt9
+0fTKRQZsbOv35Tht0CCvuezQFWlYIAq47uv/HP3LM2qS7UTw+h7OhPGSHcox
+lgwqpwOI+XikkRJnjygnrt2xTZeAi2Lnz7x+5IgIb3GU96mKgcDPSlFDQ2d0
+2lhGXCK7BVV9kcY731wRW4SvhcPkDbh2i/e7to0HumAdoHm5VRhuPuQvtUvz
+QsU/NF/f6xAEYuky9xLwRWM3eg/Se/hh1ax7ISz8JeK6k525cIsX1HHu8+WW
+r9HwKkPuSScnzA2ah2/sBCL25qKAzCg2uErPgI2zCUEiJoLbeREs0PSd57zh
+5XDUT09JsPmSEVIS3MyNtj6g2fNG98kU6YFc429OkEAMuhG/pkjsRgOfXI1D
+sFqJaHuH4/pH2gswudgV7DufhgwrbDjGFc9BpW73Z86WPLTFHT09co8Q2FKD
+5JtzS1DR2zDc67ADKXdds9BL2fVoof2530W/TSkiBf7c5uZedLzz0TWUY1pK
+PZyJryMWhza6o2qrRhulcG2PKSD+D9qu+C+Ho6ta6v8Anz6kFA==
+ "]], LineBox[CompressedData["
+1:eJwVlmc8FX4fhu1VRkZ2thChKCO+P5tERvY+IiNbqGyiY2RlZI+szGPlnMhI
+RVNkR8QpEdkjxfN/Xt2f69314npxC2B8TFzISEhIKEhJSP6/X8Si4ovSdpHL
+r9UYyu4u1cSdv9GfeN4jxQmzR0EF31UdV/etzpt3I/5o3602q03VisCfrUtk
+rcg7ypd7Tuyfqv0yhsP1eh2aUvMgNTaiAL3DEVH8i3I0+TV+dHyEDjxqSlTL
+3hajM/evqsgznAArRgX8k+e5iKV9B3eDgQ0yoq+M+A5losdXuGo83Tgh8UWc
+/5pYOhq5GdqZxHkKht72Jx8+fYA4V1+aNKUIQEohYZXVPAEZ3ni6RVQWBlJT
+aR3ZsTiU7kmqcYPpNLxkf3gymTQWRb7VqDc+LgHRdnRthNooJNjz7/XQWSkY
+6tvIDwmOQJ8HLg5lKMtAcAJ3WfW5ULTXm+JosCELb3kFy0w9byO2ilen1Z6d
+By4WVh9X2mBk9C3QlS9LHiSwa6xWfwJR7djeUn70RSiUCR1qlg5AfZrnMv0j
+FaFjqL6NptAPjWuZLNumKIM2R+vBhUu+yEVM8Dl3gwp0CdxMe0HpjarkNif8
+vgIQtbwm2cY90TkyMidmJjU4Uli1e0B0RyGKhkrhCupgVW7BRCfqhpIoVfLm
+3DTALD67oyfdFV3DyTcJlmjC1G1KeypRF5QryV4uNqcFkx+0HI9POaPUwh/h
+U2I6sPmOVaC3DoP6RQL5hEN0gTAzStOQ64QMfxVI/vqgB9fSV2Ci0BEtRfBQ
+npLSB9GXecedfBwQs2Rcy+P0K8DnKsj356UdYtQKWvQ8MgCBwWcsZSq26KVK
+w3eHgKtwup7b+GjIGvFX0/deCDaCU2bpGN4YK2RnpMegpmAMvFBlcEPfEg3e
+rXr58q8xMOiS3MsUt0DpmhTMHX0mkLFadFDGbY56HiBz7lRTyEvHbPfzmSE+
+vPWZKftrUMatq+Uldw0l8uDsNmXMIF9uDi9iaYpsP4ct2VCZQ4aTVWwd1gTd
+2Yz4d/yrOWS3mLx5dsIYpbYOI4lcS5i1kZkwcjVCuxKuhfGhVrCOKy/Pxl5F
+WbdpJhgx1qDBOhAwbmmIiqjUfjy7bANIP1WMWtEA1YUzzMdesAXTv+mT38Wu
+IMGwQJrrInbg0UEta3FaH613nWoxYbcHbB2fBVFfDwWaG5gLkjlCyPGvTRd9
+dRFRw6+8IMIRthbkHSKKdJBcAjPNw0NHcGqwGubm0UZm5uzrRBIM0I4tnz3j
+poXu7IgmKcdiYEbp6uXSDk2EHxJ3JqF1BhFptYSuUA2U3kPq/+7kdbgsnI41
+X1JH+kd6QtwF1yH4UOvpJXt15ExueLZb2AX6jY8lJFuooVGZQi1yBVfAzDzW
+Mv2CkPbPOkz+C1f48CDMjNcVoXrx4D9RRjeAy/CwyI4R0KIfI5e4txv4/V1m
+3VRRRdSHh9vEQzfYMwhlKAhUQfsWQVvEVHdI7jHyS9lTRijQxayi3QP8xkN8
+ObSUEXm9mC7G0BNwQpgzF3KU0HJ/dZgl0RM8lDMkVo0UEakOK+/ySS8INzoR
+vdmqgKy3nAxicF7gJL/I6MyvgNRy5q8YGHgDLjvaNZbiImIYy03wvu8DRXJ8
+xO6wC4iW/8TsLIsvNAccJYQeyKPXsgVWfNd9gW3cY7eKXB5hq92OzKn8gIJp
+y7wjWQ4dq0xRMbT0g4ae4rYMbjk0mCAdPvrED2htYt+vqJ1HQRuH2lnG/nDt
+s8ov61ZZVDrIjPDlAVAUJ2+JtZJFJR0CA6f+BsDkgjWDJ4ksUk3AMTOYBsK3
+zia+GTMZdPSIyi+O7BZ82gzAqlDIoH7xmY/0NreAV0XYc9xdGoVlaMdwt9wC
+pwxCX5fiWbQcRp/+6kYQGHCFWu1WSiESvLMOpjcI8h64OYlxSaFPu6cpo3iD
+4XCp6zmRVhI52XpjNEeCwYxZLE6KRQK5HjRGv7t8GzQfB+/FFIij3HYeA4/q
+26BcO/FjTEIcBSmcnYmluQOG7sduMRuKIWmTfROp/juQ4RdwoN4iij6H7ny+
+YBAKTG8splZMRdH07O7JioZQqKE9fDG/LYKSDnM0k5jDwIrMIvEGEkEBncRU
+wkQYUKhaJmyvCKEDOwhL9IqAdNnaIM9sIaTsmS+o9yUCmhLCc/+oC6HtZk3W
+VyKRQCp9wou/WBCpRZXe/pgZCcyYb+RDvgIo/jwv+1pIFMTyPkXXxAVQeNVP
+gmVTFPh7LaYHz/Oj4qSEHpJfUaBl5f7Cx5Yf2XMlOdA7RsNYbz/l665T6M32
+why9fgy0Z+xxGemeQkox6rmucTHg83qqzWOYF3U3rOUc9MSA/NG7TLp1HmTJ
+b7Y4rhgLCkI1Hcy63Ig+Yc/LXPIe2Hj/mEXzXCj7WO9GnPt/fM/XODSSC2l7
+k75fq7gH/bTCMvPdnEjT8Sabj2Ac5L6TniSz5EBPXYT5j/PEQw31sUFxMg7E
+Ino76J91PAxqeIXt17Ej8XOlliK58cAe2cnmRseOrL29XNk578NFnedX3UbY
+ULo1ndFdTiy4GNfea09kQ9lIsZrdGgsKhwajzhpsSCSGfvFHLhaM77O5Pmlj
+RT9sbN4L8iaAYjKHGnctC5JwIDXeF0qE38LxHq43WZA3n/rqGddEsL4rQTEo
+xYIoJyWXU6oSwV7HGBaamdGI4vrAklQSCGHl+J3fnUCX8MsF80rJ8LB12npM
+nAlNPdIWKLJLAe3j9+7S7TMisc3DZZHCFKDzM8a8KGJEcUUnS4dnUoC/R1hQ
+dp0BmYiYBhjLpEKOyE6yVhk9YjZ4pErZnApU8smqQyb0aDnTQXRuOBXIZD6b
+YMnpkUXFm4KPW6nwzFCf1dHtOGLml3w7fyENuOeq9DjhGGrqn2H9/iwNKiY9
+3J126RCeO8fLdDoNzlHYnnjSSIdeyhWGDB2mgYfdopaEKB3qzzJXpFRPh64A
+P0l3Hlrkih0MUhpIhxijpFzdc9RISen5p3eTGTCSFPg3b48KZWHqZnX/ZUDA
+TAVNYxcVIhGeP/zM9xDM9Dmo6I2o0D9zBwpel4fw5IsyTv02JbrZqRPivvYQ
+hLykQpmXyVF16nbkDG0WeNL/jqbtIEe+u6dXrkplwUyFOcnDZHIUJFAy99Eo
+C1LG7+1bnSNHhk78lAfZWVA8a9TgEU2GeKtyKw9Es0H77VPJASVStDbAL5uu
+kwNeGr+UCUykyGdkJ2HZOwckSV98lf1Bgohyy5rXsnLA+sykeG0mCSroC3Qz
+JeZAb3CSmPD6EYx/VHagjH0EGJtB/EzVP0gjyVnj68sFNmLCdJPzP/hd+dgI
+8ysXEiPHIy34/kE0Z7B1E2sefE78lkz56C8Ev/QnveuSB02md+mKMg9gaupa
+Rw11PvTk0ijp4vahY4NeNtCwAC4ud6f0Be+DzyPprdjgAnjeuT2+oLoPaUuH
+L0qKC4D1vcwI9cc9GJe9K3K0UQBRtTEt2Tu7EM/ldFE7pxDGqV7VkzrtQKKf
+/Mm1hSIYdB372yazA8vtx2ltqIth79rrtVWSnf/8y/Q0eIrh0KTwydfSbRiZ
+EXIW0i6G5YCacw9/bUHZlHYtf24x/JyPdvqauQmDyzbWlBolEBYtpdbmtQlr
+QQ9YPluUgGPHftOG1iawD6udqbxZAnlOEYLZuxugsMunb51VAp/yFcQ8HTag
+kfSAf/NnCRhzfPa+iNYhxLtzmphWCmcO/StHedfBUZU2eruiFG5fZtnuP1iD
+9mM9UzQdpWAgId9f2r4GbTJMcUrfS0ERhzYYL6xBtCU+s1+pDMSkC8vJwlfB
++49BY9xCGYQJZyv0qK9Cw2bo9Lv9Migtr/tDQ7MKbVQneU8yPobJiRs4qYcr
+sDMXXoNTfAwfy+0bi5t+QRIpxeqxlMcwJX2Zk0i1DH8pOhw0lcrBHf/2eg35
+IjgZu0RFpldANquN0fTED8Bafu8sraiA2qLQekzjD2DgKMx+RaiAkIftftft
+f0Dx+xfkLPMV0MLl7iP1/Ds0iU5/7zxfCb70thfFkohQP+t/ymykEog99SMf
+bOeB+JHhqylnNRTduRpDcmkeNCtZl3KlquH8gYi/D/c8HBuSKfymVg3BPSyD
+ZFPfQO53+HyARzVQpP5lWrP9BmzrGMaCZ9Ugw6Lxy8tzDprdaczJ7Z8ALykX
+BZfDV0h4FEu+XFoD+cgkxE/0KzhKVvWtttcATXTVkNzqDPT5kctufKiBX9Gz
+0gfhM1BaRE/c/VMDuPP6Kx7l01DxkbL+n0ktuN/81kNG+QXYQ9PslsjqgPOt
+yNwhzQSkFsFrCkw92NXwFZ74Mg4ueZ5XloPr4bi613pgwzgY7tDpDibXg5S6
+DlbCYhxmvLLvZuLrYUa4Tkr1yRj029H1HjvRAJNXJMb97Uf/6/qPXFFXAySu
+CBy+/jMMvj13pB8kN4Iq3pmLbWIYQudEAiuzGyFLXrsh++kwUByjj+kqaQRR
+1FmofGsYupmofi+3NsKw4AXDzY0h+M6GTZSfaQRYvTX5ZvcTDEs8kbl/Fgch
+d1uxqcKD4DJ6rpD+Aw4Y61fuDdEMQkfeMPXeGA5S60g5wiY/QpXziZbZORx0
+Rf3eF/X6CBHRK7212zhgpTZlN876ADJYX5DmbQLy+ayW0N138L0uYXTCswmo
+i+lVnNcHgOeNB0cFdTOwnne0UuobgJ99W1l8J5pB907fW+PsAdBc2JrJ4moG
+0YnDLVAdgIcHBHy4VDN4el22pU/ph0S+uFPnTZtBpHchivHSaxggxXVKFDYD
+Z80K2u7uA+P0S/Hy51pg5R32+gSmG744jSnhjFvhanZcgRDqBg+9+esXbVrh
+c950fxFvNxQf7Sbhr7eCRqKQmlVTFyzK93TgglvBns1V7VT5c/DntJr1LWgF
+iRXGvw75HRCd12IivNgKj0oDMx+8b4f+fJ1S6Ttt0GjEStrI0wTOdPq8GilP
+YbiF2DmZXAzuyUlTCyZ4EIhhO0+lUQwDjcT8b1Z4GD3Cc0qtFwHX2Z99Y454
+qJA35Hw9UAjVrGI8Vd548NkQKrwUmw9pb6drvmLxQHfx0xsp3hzo48AYFz/H
+w+zYaINwQwqUlGjksgkQQH2pB7uNewBxQ5KdP0UJcIC94MvWlgxmFqXvmiUJ
+kMPR0q/UmwiqepwR4goESE9YOvPj538/Yp/x0yNDAmhb2d6VuhUJTPH3/0Tf
+JkCpDF2JEEcERKx0/W4IJwBTJl2kkW4YbAptkg/FEOAfm4DyQMNtWLA0ubad
+TIB7r9jjxnP9oSs6ku9pCQHu6wUmXZ/yhQcWt7ITKwiwEy+nEHjJG94vKL24
+VkOAgPrQSXezG1Bi+Pyor4UAJ5lJUioXnWF0mn/bE0+ASPe9dvtIR9AJLrhB
+/ZwAfumlHMyK1iC0eEMvu5cAG3kWKeiOKRxvqUzifk2A/wEbenxk
+ "]]},
+ Annotation[#, "Charting`Private`Tag$237555#2"]& ], {}}, {}}, {{{}, {},
+ TagBox[
+ {RGBColor[0.560181, 0.691569, 0.194885], AbsoluteThickness[1.6],
+ Opacity[1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwtV2c0F477tUd2mclOdmYyP89jlT0TWSE7ZO+9V9krIkIkEfFpiiQRKak0
+jEpllBEi8/f9n/O/b+6Le1/dc895nivgfMHclYyEhKSQlITk/5jrxac1hjcD
+Gv5Xczw/3vmnLhPo/u7Ymq6GlxAXq/ZuAIFHhzCMxyQ09BM+OyssZxMuhunW
+Cl7g0nD9wVh+XO0qwXL/0fDBOgYNgVsTClufbhCeHIz6/iueXGO0aMTcbKyN
+IEIbxV3ZvoW/HyczFhs9IDRHhupbPl7FZjWWipmpbkLO3PBomfASZjio+dQV
+PiPc0LzO8eXrLD5ZXhvd6HpBKNKL1pNR/47zSV8vtDe/IoTXjjcsdX/BnDzh
+rJ2ON4RAomtyr+gEip8vCyBde0cIWxP83vDnA742WT2f5/GRsBQn3E+f/w4H
+dlqeVzJPEGjnJdLER99gEwnrCuffKQLz7Yh08ZzXOGUpISq/85VwfP3qQLrV
+MIoc1j2jyPOdYMV1d+WF8CDeoV2VeWL5kyBeGJVP7tOPmwt0R6PrZgnjm+rl
+2ux9yFB28NUBpl+E15/Pnhlj6kVhhbEfx7MXCO3W4fVTBj3oer531yR/iTB8
+ktLF6XE3Zja4+CbOLRMm/xhxZzt14d15hWw2oxWCye9487LTnfg9Vtzj5/1V
+QuvO6LurUg9RanE095P8X8Iag9lsDeE+xt06cOAdcZ3wuS5Ftiv+LtLLcWs+
+PPGPcLShzNZmqQM1vPgbgqY2CeMMHEGzSe14jIZv4UfSNqFu6JXLY5U7+E5A
+79GW/C5hRNpJ+CtDGy5adbeX/94jHJs5dvDX5m0M4RKV/DhGAiCV3vNntwWP
+hs5usXeRAsHGyDKAowVdfxW+jbhJBhdSSM0ikm7hnLYm//YVcui+4unzefMm
+vuEeL8ktoICm34MkDy81onvUjKFcDiUcv4O9cuo3kIe1vvBtDhUYNS/9bSNv
+QIdC4oHAImqgzdC4tjd5HX+l7twgq6KBMFZlKs5XdagmuxwT1UILVWt9RUoj
+tcizX2Jx7Ok+GMwtD345XYOeZkoFzBN08HackTSAqgYjft1QO7RNDzGDAXZf
+jl3DkmTHuVVeRrAIU4x/dK8K5Zo0RcKVmcG4YjVZjb4KTQ9V/6MYYQY3zxDH
+Wo+r+EN6VGXOmwVIAqNt/MsrMUyw7aPwvv3AFlhyMzesAo9NWX6+07AfKiKH
+VP1crmBunrJlgcEBMHsc/Pq3QzmmKod5dy8egC61tcWnkZdx+99Bt38ENgj6
+ESd7qrwU1a6dmtmdZYPnpmWXZvtK0HbN+OTJYnYIJpYODe4Uowr56vrwCQ74
+nlybf0q9GHt6VqOKNjhA9umljenkIvQh13YruckJRbb3NRfeFeKF+BLTN85c
+8Pd3ylfnnAJ0TVQZm3t7ELQsVr7bzeejFh3ffGc1N/yLbxZjM87HdEaPD4cD
+DsFB73XrcdE8HFmLtyzj5AXOCZHk/VdzUTZuIqtukRfG6vVfGfPkYkfgvWWl
+fj6gFFQZjxDNwS41svzVbn7wthV+mXc+G9XLncji5QSAae4CHzH7EoZ6u3MY
+1giAcRS5YvKfLDxCRhFXmikIxwOSadVlsrC3pC6Vi1QI/GHuRVFwJpJ+vF3+
+JlQI8s8balWyZWBjxOjFZY/DMEuxGVd4IR3HXpHoWHw7DO76Un0PhtPw2fmw
+x3MOwrBCN/7gXFUqNq58nu44cwRE4qS6Tu9PRc5LFy7Ojh2BAhvlQdu0FKQi
+2q0anREBt1V59saEZLwu1ShUby8Knnf3cpKpklGwNYam/IsodGRQHsi7lIRm
+/A7Tj9zEYGTq0nzCjUQsi30wlRokDjRttMDDkID7fkfAoQpJ0Hi9fHKwKR6v
+RxVzuEtIwePF8jYfs3isSDffGLsnBWn2v44xVMXh5fdjBUc/HgWTx3q/XhvG
+4cxbmrvM3tJg7KQoLvk3FjPo41rZ96ThYdYnoYBHMdh3Wi9Lp0AGzvbGS4yI
+xODDO6QkUZMysFldmx1cFI3Xbh3+pCkhC7Nszp++xkYhN8aZxj2Vhfwmlx86
+sRHY+3pYvmVHDniKLOSvUkfg8enX784ayQPHt72XQvnheLxVmunKFXlItWcy
+VWwLwwzK8LlOUAAHlY7l7JNh2ENL/r06VwHupaBK/UQoVvzhPnxgWgHy9uue
+6mANxSshJ8WKM47BEn2lR2xbCObnyxnfmDgG2aQqOU2nQjDu3algXXlFiJFL
+CJ69EowJHqq5hycUIYFSa2tcLwgDlwKvWKgogcJj3WvUe4EoVWLW9S5LCYyT
+bC+/bA/EeG9P2teTSqAmT2tNKRqIe4fYhcRTleGYrrzAN54AtLevEfL4pAIC
+tXiwe8If9xW0ClXIqkKeRp/OzFV/fB7OFq+XpgqvteMeL4j6o73Ou7A9RTUw
+VFA9vXrCD287yYR/LVWH620bd2RZ/PDDkmf0oxV1EH6zKrl89wKe+fBSgd6Y
+ACddC7OZfvmip6bVEjkFwJmFzJ0VDx98q0aV1aiCoG98bbSS3gcrhYU5XT0R
+WnLCXmzf9saavtMdViUIMYeqWK+SemNv7JfnP/8iEFdyPEPbvHCWYN/S0qEB
+9bwrYoXnvDBNNvmYzE8NmFzg7ONg88J0M0OWGQ5NKPb4WS4e5YmURL0AkghN
+ONcUOXPzjAcGTYt4vUYt+Ob5dJWN1QNHSECeJVALJOJmH1wfdkeHJb3qtFot
+oC29aCCh747Q+vEQL502XC9KY6A0dMNeySTFL2PaMMwsL0fJ5IatJk+nPtHr
+wKEwI4HdEVc8O7yTzqChA3Ytiva99q4omJ+RxnZDB5x92cd5YlzwVXE3dUfM
+CdC0//Sa7Iczuowz0IjK6YL84r9vekRndL7Q+jLAQxeMSUO+q6U7I/9Deb3l
+Cl14uf33Mpe0M+69pmdLp9eDo8LGtqcTnDDIOFdScE4PKg/6TdRYOyGT8/t2
+GkF9qDAGmlRpJxw5weUtaKMPD/drRWxNOGL/jy2exQF9eB1l7m2n7Yjx0x6v
+528ZwH3zZc09XkfcJWPY9pwxgMs3ZQlaq2fR/9bcyEFBQ5BuJXlGPHcWr1jV
+nWAtMoSLAdNeo0YO+I5BpcAlzghyQyDfycAOyQhlMT4OJqAYdq6qkdEOmUuF
+NJjKTOBJUOf3jhFb3Gl72fn1vQms5AiZU9jbYus58jNMYqaQVrrDLxxhg+6D
+HUFBNaYgZ+zJQTFqjWEat2THK80gXNckhbzaGlfixK/efWwGdqZJ+0r8rLGt
+/UT0zUkz+ND7gjuUyRpHY155jPOZg/xgi+WwhRWmhtEanasyB8HtO9QH1yz/
+69N09b96C9gg4bww22eJnIRa4aNDFnCnU1xJs8wSbY/2LsQsW8DxGXHdVC1L
+9NzXqhCscgoiLMhFhC+fQtUMw/a2oVMg4RTzZtfeAtnpVsf8/1mCpLNOf7CS
+BX7gPHrEne80PKEs3LQ6YIHmtroYpnMaKJS/d1gNmOPg8/VHv3NPA9WceB+X
+ujnalB1gE5a0gl1h9QgPBTMcHX261elqDdaFkcbfWM3QuPf+I5+L1kDRu7e/
+bc0Ua22aPx1vt4aSK29uGd41RdF5H2ZeyjMQ6GZ3WFfDFAPVX1+VrTsDiXtx
+lpNPjJEr0zb3wm8bSGtu4zx/0RhzHz5cecVuC+Od60djrY3x0dMnukZoCwMm
+g/zKS0aYX251uyj/P30yxaJH2AgV4vQGz6vaAfnS4FL3dQNslbF+wJVjD4qv
+ThsciDbAHy+e7524aw/+RHWBXnMDfKIm6545ZQ93lenv6+zp44udpMwzsg4g
+StX7o8xOH5vu+VzbN+oAhvub3dpE9NB6l3p1nNER9P5+krlIpoey9fnZN4Uc
+oVnWR4w4rov30geKUpQc/8u/k2mjQBcdJRkn7ZwdIddxV5eNWhelhcQ48joc
+YS2NlpHi3wlcbJiT4nFygjyRxcjIsRP4mYI5uCrECXhlDA4q3j2BdfosFLJZ
+TpDWFE0TEHYCvzOuLfkTnSBzcuLA8pYOfu3t6Y9gdAZq19G+EEYdNOYxLa3r
+dAYv4dvUbvZa+C3MnMNaxAWkaS1Oz2toIdte1LAkugDTv7eEhiNaaD0hHc54
+xgXwbH/g4JImLlSLFm9kuEBvW8JWZaommmw2Ed0XXYCLz9dot1MDMwJGzjXf
+d4WaBZEfz+s0MDF2lc581BXuH0o37bmkgZvBPjGkC66gNLhYq3NWA42lPt1N
+EXADPdpbOwFkGpibaqwhnu4G/mIDtfvMEM1uvcx/Y+MOk8y/Jy+rIvYacvZp
+BLtDomxvn8URxLIGt8qH2e6gvNDAFLUBmHJ+89jYU3fgexLWM2IB+G/+3oM6
+aQ9gm+rUzuEkYEXrd4VKak/wd6/+lvpWFY/Lnsha6PICq4F+VZY7qthCdUnX
+67MXiFaquY7mqSLL087l5XUvcJiz4aYyU0WZb9tkwtLngUHowTLNKxWUHhGc
+46o4DzQiKgN8Y8rImknPpR7jDTWGk7J095Xx6XDW/ZDL3rBgEdsvWq6MTHhA
+/GGHNwgkdwxtOCrjzIfa816L3sDwyddk6pcS9gUYap9y8gEdRyGeAAYlRJPx
+G7YnfeHhxpEt4z/H8fLMA0MzF19gX9yutHp/HFML1yvM433BIrvp+VzVcez2
+0zYKe+ALL5t2ChmVj2PF37oKE5kL0KwWJrbnq4hf1L9qsDP6gZNJQqHeugLe
+h4YkvV0/mB012A3/qoCrEzxTofT+8Fcpsb9vSAHl1dmUGw/6QwvVYuP9GgV8
+G/dqiv+4P+wPcXm0bqGAsTfPr5708wcNabmMKqI8Rk2vFyR984fNw1F0Z/Pk
+0Kpp80DbUADEuTnrfoyTQ8HZwjexnwMg0nVvxvuCHOoIJkSazQdAMaV/y3tD
+OVSefxRPThsI04eCZjtp5FDF/6dltXYghG2a3LydJIu6orLZAw8DYXxCPeVI
+lgwW1pv/7GoJAq64vH0UUTLY3xcfFNIdBAPn/NrXz8vgSaugZtmRIHh31n6C
+31AGRxNzJe6tBAF/ZY9UCIMM8hzVFKE/HgxiG+JD7KLSyHcyIKG7MxhurMPx
+wbNSKMSRlOkyEgJMK7zz8dpSeNg4xvbltxAIJyHltRWTwlx25271tRB4VRHB
+ELoiiU8cyQ2lOENBpQ/TjNMl8dTRTF0Th1Dwmx+U1nsggarRXYSK+VBoiatJ
+WlQUx362Ttlz+8LhqiTXCXkBcRQOrlTU5w4H9HzHk0Mnjj6fJagUJcPBIvNm
+aMGUGE5YMZIfMg6HNl+Gez2ZYlh7JNFFIC8c6q7TRJT/EEUSDkUDFu4IUChR
+fqLdJIKP/05+ipeJBIv654Ful0VwS7FIhFQzErz79f6Wp4qgJ/sNyWSLSPDY
+b7x20lkEZ4qHHctCIoHDPaQ0j1MEhYLOOpM8igT9pOucX9KOYGTVLcub+lFw
+X2hYvjpUGElkMhzTPKOB16aKN8JdGE2XG+5qRkZDo8/1Z85WwmheqJJJejEa
+/NOFV1yPC2NW9sCVrJZo6PCT1ZXdOIyqZoHnx9ajQYb+Z/PzqMPY2zkDJ1Jj
+gHvh3DGPXCGsijx5KbQhFpJ/SJofTRTCn5umRl0PYsG2VLGYLFgIk+R3Qxle
+xkLAOpPpW2shVOIPZmz/EwuTkBgtICCEkkllpYd440BQ64akzh1B1Kgajtzn
+EQfSWpcea04LIMfxM/WZO3Hg0WPz/PI7AbyWO2XdQx0PltR6JKT9Aki4cKRs
+hyUeJu7ptKw3CeClqyNvwo/EQ/Snnc3MMAHcml9lyDWJB/mnDWvALID8Cavu
+KtXxwKL1O/WMHj92cWYPhuglANsff7NT6vzIT1MtRXIqAdTPjHHZyvJjktgA
+R5ZDArzZyvPI4uLHZD6DlMbABOCrLSjZGOVD+0c3n9JUJIDKyOg0NQ8feh8S
+yFJbSQB2c9/4skc8yL25G5hamQjU/95q9DTw4HYpTcz1hkQ49V54cLuQB3/N
+brX3tyVCrR/NfI0vD15MGrzF+jwRgo5oMffx8+BymkXn06VESIsFI420Q5i1
+yC1yUTMJrs/TMaSc40Ypuq9tj34mgQIZPOky48b3P+jYhf4kwSNy5s/7/lsb
+UfE1lRnbSWBY9nZ98BA3muWcFnVkSQZXPqPfVO8P4s8U2X3CqskgSnqeVsv4
+IEoZXfrGlp0Mz0m90r1OcqFBiMylPKUUMBxQYedW5EL/WuohAe0UkNtitft0
+mAsTpXyz2kxSwLn61PMMMi6s0F3MnHBLgbXvVHzXOjnx8dvFFPPCFLB2gJ0G
+ZU58eqZEsfVPCjyVux1XrMKBNGLtQ8bNqRAVG7l3SIIDx18/qJN6kPrf3h49
+0MLNgR9aajYY+1JhNZLy8e42O5IfkKT6MJEKrk/I/NW62JFHMqY7gzENJCVp
+OCT12DGzfyjJxTcNXIIKT4S6sOHPm5EVi9Lp4Hw59+2b02z40peGa1o1HQoT
+WHtU9djQgtxt4ePJdEiaME2TOsqGvn7E+uGz6dAle8e1eIMVf0ndtnybnQ6m
+OVvL4dmsKFbG62S2lA68v1nuiPUewM7wZ9372jKAlE0+dcJoPzJbSK+HQBa8
+jL+4FqG1H1334vhEDbJgTffbNq/yfpSLydD9dDoL8ohV96IP78drTjzlJ32z
+wOSbuFDhFguSLDZrK13Jgri7w9nCjSxYWsMcGr6VBfOX0jWuMLHg/OYCIeLe
+RfDrzLxB84EJ67R9vbxVs8G7u1zl6DMmlJ99llWjmw1N52TXndqYMOaP5u6E
+ZTY8KW/sXLnIhA5vPw7Z+GWDpv8y9WMtJtwdIz/oW5sNrcVPumduMyLZAc4r
+pDQ50JccvStVwoD67H95AgNzwEyUYPEhnQ5d8pzUnhjlwrrCe1O5SDrkr3cZ
+kD2VC/tEdugKvenwaFjmqWqbXPBUCS0NNaFDVce/dinuuXCYeUC0hY0O+Qb5
+1Wzic2HIvv/Pz2v78KDjK0HZ9lxY+G3QpdJHi6oNV/eV8eSB2I7I6AsRGmSU
+FuO0Xc4Dl1pLL6ODNBh0m0BfspEHbDqL2mP0NMg01if4bi8PMqeL62j/UCNX
+0rsOS8Z8GL3DqPTxITUejTYNc5bIB6HivTyJU9SoLMVn2OqaD5KXB6at06lw
+3ccqX/xTPgzbckqfoKfE+mfHcsL6CyBtRPjaflJKLO0Msf34qgCeG9no/Vij
+wOZ1PmX1sQK4qhTCem2SAkOGLSWofhZA9Hg0SUAbBc6ab87UUBTCVYdQbkc7
+Clz4ktXBhoXAw8g6Z9lGjsq3BqmeEgvh1XCDakwQGQ4PEn4a3ygCv70QpZzz
+ZBjBPKTpf7sIHJ9EWFx3JsMhueq0grtFYPWF5+20KRlqXZ8YGX9WBNr81hXl
+UmSY/334bOS3IgiMHWTa/kmK3rc5jb4eKobn8Z8snBxJ8fbJBdKzOcXA2Rp4
+n+osCRqVkGsyR5TAL0aSALLRbajdWGnli78MEco+zuR1/4Bc45jO46ByaPgV
+K0s38xf6P0gmnPWugPia7eohvVUg8X30dd34KlDisZtZAn+ARGrOjcyuCsKu
+cnkg0xJY5Uh48aZWw3AETzdD0i8gTAc7wJ1rcID+fbBd4izkTZoaN7+pgZ9y
+H7UaS36A6cxnT//9dcAuUxBFLzINy2dKpBI0r8OU3S+pjO0vIPH4en5RQD3Y
+CGYyfrw3CdyHvOjEehrAoDgleVPoM1z7oUxiSN4Im343UjgqxsCzOln7u8tN
+cGhWKeqpegu0yQb1Au1NMByvm5i2NgK1T3g97CiaQVy6neay6SvIqKNUZ1Ft
+geZXv9Yq+AZBiNfjWchcCxQbPr3M2NAHf4q4zQoab8Ozv0Unjzb0gOHLr9wK
+3q0gldau/EWtC6gY5yqzBNsgW8BvuL/+HpzODDLinW8DDj3lNPZXbXA78aYb
+ScMd2DDVdjakawLnTo/VfNd2sLvzYCovpBos9CcpxxQ64Po/rpCyu3kwfdg2
+u2OjAy4yrDbGeOUBlzZz7JHtDrjg2boUdSgP5rxtrxTtdYDj4+mogbhc+JNe
+6xpKRYSvHT6R9fo58O1BzWFVViLYjzX/HXqWCVF1UmdeSBNBqWC+1tAsAZQc
+XBIZ3YkwbeE5dutBPHjx/CYkeRHB0cCrTPu/uzmVWSq66UOEd2WR1GwbseAh
+Z5LyI4gI5ZMEr63//pBHQ/1e3QlEuG3APjPFGwClL8dHYyuIwMDfvUyx6QeX
+iGt+G1VEGKC5Z8ndeAGc9DdU/GuJ8OvUhGAp93ngkGm2PneTCIqXTmyvUzqD
+u2ncfb37//mlx7Qok88Cy3h6b88jIojnWSbV79lA52WnXfVuIpQOv0gu+mcG
+Br4+/+SeE4HlWJ9017I+qLlfftD0ggj1hPcJXisawGiV2ig6TIRBl5hblkuy
+kNEs039thAgk/4/Mr3msfO+I8D9sI26P
+ "]]},
+ Annotation[#, "Charting`Private`Tag$230210#1"]& ]}, {}}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{
+ FormBox[
+ TagBox[
+ "\"\\!\\(\\*StyleBox[\\\"h\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*\
+StyleBox[\\\" \
+\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*StyleBox[\\\"|\\\",FontSlant->\\\"\
+Italic\\\"]\\)\\!\\(\\*StyleBox[\\\" \\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\
+\\*StyleBox[\\\"t\\\",FontSlant->\\\"Italic\\\"]\\)\\!\\(\\*SuperscriptBox[\
+StyleBox[\\\"|\\\",FontSlant->\\\"Italic\\\"], RowBox[{RowBox[{\\\"-\\\", \
+\\\"\[Beta]\\\"}], \\\" \\\", \\\"\[Delta]\\\"}]]\\)\"", HoldForm],
+ TraditionalForm],
+ FormBox[
+ TagBox[
+ "\"\[Chi] | \\!\\(\\*StyleBox[\\\"t\\\",FontSlant->\\\"Italic\\\"]\\)\\!\
+\\(\\*SuperscriptBox[\\(|\\), \\(\[Gamma]\\)]\\)\"", HoldForm],
+ TraditionalForm]},
+ AxesOrigin->{0, 0},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ LabelStyle->{
+ GrayLevel[0], FontSize -> 14},
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{0, 3.3}, {0., 3.690456156465704}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{0, 0}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
CellChangeTimes->{
- 3.857749257151309*^9, 3.857749580151471*^9, 3.857750445127521*^9,
- 3.8577516345702353`*^9, 3.8577902377024403`*^9, 3.8577905746804*^9, {
- 3.857790654638524*^9, 3.857790670814478*^9}, 3.857791166262724*^9,
- 3.8577912575588627`*^9, 3.857793185554345*^9, 3.857799943653722*^9,
- 3.858849755117009*^9, 3.867387189726757*^9, 3.867392573802265*^9,
- 3.86739918902833*^9, 3.867807029271892*^9, 3.870503634462634*^9},
- CellLabel->"Out[3]=",ExpressionUUID->"2569ec7f-06f8-4d96-90ad-f6881e3c95ff"]
+ 3.875957140679967*^9, {3.875957171901413*^9, 3.875957177389202*^9}, {
+ 3.875957286074856*^9, 3.8759572915772743`*^9}, {3.875957370668831*^9,
+ 3.875957390170678*^9}, 3.8762092922172947`*^9},
+ CellLabel->"Out[95]=",ExpressionUUID->"a7be33ba-7aa8-4b0b-9929-84068abe4ebd"]
}, Open ]],
Cell[CellGroupData[{
+Cell[BoxData[{
+ RowBox[{
+ RowBox[{"Export", "[",
+ RowBox[{"\"\</tmp/pMag.pdf\>\"", ",", "pMag"}], "]"}],
+ ";"}], "\[IndentingNewLine]",
+ RowBox[{"Export", "[",
+ RowBox[{"\"\</tmp/pSus.pdf\>\"", ",", "pSus"}], "]"}]}], "Input",
+ CellChangeTimes->{{3.875957304698913*^9, 3.87595732350677*^9}},
+ CellLabel->
+ "In[213]:=",ExpressionUUID->"fb19745f-d068-48af-9c29-c7123646b8ef"],
+
+Cell[BoxData["\<\"/tmp/pSus.pdf\"\>"], "Output",
+ CellChangeTimes->{3.8759574026282253`*^9, 3.87621093736329*^9},
+ CellLabel->
+ "Out[214]=",ExpressionUUID->"e0694b56-77c1-47e5-9928-2750b564de6e"]
+}, Open ]],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.875957138191024*^9,
+ 3.8759571381925697`*^9}},ExpressionUUID->"5ff59419-6b49-4b92-9161-\
+5b0dab56051b"],
+
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{"prep2", "=",
- RowBox[{
- RowBox[{"{",
- RowBox[{"\[Theta]0", ",", "\[Theta]YL", ",",
- RowBox[{"ruleB", "[",
- RowBox[{"\[Theta]0", ",",
+ RowBox[{"p2", "=",
+ RowBox[{"ParametricPlot", "[",
+ RowBox[{
+ RowBox[{"Evaluate", "@",
+ RowBox[{"{", "\[IndentingNewLine]",
+ RowBox[{
RowBox[{"{",
RowBox[{
- RowBox[{"g", "[", "0", "]"}], ",",
- RowBox[{"g", "[", "1", "]"}]}], "}"}]}], "]"}], ",",
- RowBox[{"ruleAL", "[",
- RowBox[{"\[Theta]0", ",",
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDut", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], ")"}], "[", "2",
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}]}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
- RowBox[{"g", "[", "0", "]"}], ",",
- RowBox[{"g", "[", "1", "]"}]}], "}"}]}], "]"}], ",", "CYL", ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"G", "[", "1", "]"}], ",",
- RowBox[{"G", "[", "2", "]"}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"g", "[", "0", "]"}], ",",
- RowBox[{"g", "[", "1", "]"}]}], "}"}]}], "}"}], "/.",
- "data2"}]}]], "Input",
- CellChangeTimes->{{3.857749259001082*^9, 3.85774927262074*^9}, {
- 3.85774951881236*^9, 3.857749541888072*^9}, {3.857749582534094*^9,
- 3.857749642863475*^9}, {3.871621938166548*^9, 3.871621938294367*^9}},
- CellLabel->"In[4]:=",ExpressionUUID->"13ac0713-5c3c-49fc-a322-a9f53d13bda2"],
+ RowBox[{
+ RowBox[{"ut", "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ SuperscriptBox[
+ RowBox[{
+ RowBox[{"uh", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}],
+ RowBox[{
+ RowBox[{"-", "8"}], "/", "15"}]]}], ",",
+ RowBox[{"-",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"DufDut", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[", "2",
+ "]"}], "[",
+ RowBox[{"1", ",",
+ RowBox[{"\[Gamma]", " ",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"",
+ "]"}]}]}], "]"}]}]}], "}"}]}], "\[IndentingNewLine]", "}"}]}],
+ ",",
+ RowBox[{"{",
+ RowBox[{"\[Gamma]", ",", "0", ",", "0.99"}], "}"}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"AspectRatio", "->", "1"}]}], "\[IndentingNewLine]",
+ "]"}]}]], "Input",
+ CellChangeTimes->{{3.871624380395876*^9, 3.871624486365077*^9}, {
+ 3.871628883904001*^9, 3.871628909432775*^9}, {3.871629457267346*^9,
+ 3.871629525012162*^9}, {3.8716296135256433`*^9, 3.871629703591056*^9}, {
+ 3.8716297390329103`*^9, 3.871629853114192*^9}, {3.8716298958192244`*^9,
+ 3.8716299139879017`*^9}, {3.871629944204525*^9, 3.871629952700124*^9}, {
+ 3.871630090583139*^9, 3.871630094694592*^9}, {3.8716301742008753`*^9,
+ 3.8716302000245533`*^9}, {3.871630243281377*^9, 3.871630253377584*^9},
+ 3.8716304265249653`*^9, {3.871631246388459*^9, 3.8716313024379177`*^9}, {
+ 3.871631382016287*^9, 3.871631383422778*^9}, {3.871633017182467*^9,
+ 3.8716330172537737`*^9}, {3.87223244386093*^9, 3.872232463125258*^9}, {
+ 3.872232659147134*^9, 3.872232720226219*^9}, {3.872232925175202*^9,
+ 3.872232941062345*^9}, {3.87282774234025*^9, 3.872827744082013*^9}, {
+ 3.8759514937750607`*^9, 3.875951563008548*^9}, {3.875951848422546*^9,
+ 3.875951860758119*^9}, {3.875951890774691*^9, 3.875952107994501*^9}, {
+ 3.8759521565880737`*^9, 3.8759521795243063`*^9}, {3.875952669870229*^9,
+ 3.875952670693328*^9}, {3.875952819881544*^9, 3.87595285055249*^9}, {
+ 3.875952938059046*^9, 3.87595295966661*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"fa46f97d-9534-4d3f-8e90-a8598a4bd324"],
Cell[BoxData[
- RowBox[{"{",
- RowBox[{"1.14841`", ",", "0.989667`", ",", "5.088157817267288`", ",",
- RowBox[{"-", "0.011429064706840788`"}], ",",
- RowBox[{"-", "0.172824`"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"-", "0.310183`"}], ",", "0.247454`"}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"0.373691`", ",",
- RowBox[{"-", "0.0216363`"}]}], "}"}]}], "}"}]], "Output",
- CellChangeTimes->{{3.857749616140647*^9, 3.857749643120922*^9},
- 3.857750445664744*^9, 3.857751635086946*^9, 3.857790237915689*^9,
- 3.85779057489809*^9, {3.8577906548620043`*^9, 3.857790670988171*^9},
- 3.857791166635693*^9, 3.857791258021803*^9, 3.857793188099229*^9,
- 3.857799944441625*^9, 3.858849755394497*^9, 3.867387191076661*^9,
- 3.8673925739943132`*^9, 3.867399189446398*^9, 3.86780702978512*^9,
- 3.870503634937377*^9},
- CellLabel->"Out[4]=",ExpressionUUID->"d356300d-fbd5-438e-842f-b2e2d92bd3a0"]
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwV13k41F8XAHD7kiV7krUoIiEk1B1ZUlFDiyWVyp49ISkSklSyz/ArW9YS
+bUQ6V2U3Q6WQvVKSGDN24v2+f83zec6997n33HPP9xmls362rhxsbGwMdja2
+//9+4j4mkWgYhbO73uc13aHD9Lv8jWFRJzFp5fjORsIXc1l7O84dxSIW5Mm3
+hHdbx9q88SbjRJ/MthrCGn3jR2y3WWG8tKu9gvBcPufHBc79uENCcy6fMI93
+llDKUwusFRpmlkoYCX/0Wvhlhp2vb6yMIiwZ3LJOPNQUk7S2HvYhnLR/T2OW
+5V7MEE8TPEb42M2HId2WJrjc+fzkLsK+5SOHb/qQsOLPJ3MbCC8OHzhYeBLh
+IWEvlaXbdNh1QeSmmPAeHPk9O7SL8JNt9vrfvxvjRF6nqXLCn2zzGh93G+HE
+mry7NwhP+iYcDvlliCP7I4+cIJzIEVJrI2iIGT+XjTUIf9vkorfObBcm/1Wy
+Wkyggw1fXMmuBAPsn7cYWU+YdPoVX/a3nRjbJfXeJqyr+60wwXwnFpmdPnGE
+sMjbLSj+mT6O5N7OIUU48ARf2El1faxYYk3/fIsOBasGvxdK9Yj1TuEkwuab
+j3tf0tXDjEP+3VaES570X5B8r4uH8u9JcRHO5JMrUnLUxSTDj2FV8UQ+pwVz
+eGd3YDaTvdxehGe3SQeYpu/ApBjmC2nCD92vdDrv3oFFAqcT3t+kw42fd5XL
+03QweU6vTJzw1I6zHHr7dTD2y5x/GUeHvH51nz2r2jiSfN/TjrDaisO7+Cpt
+zCZyhH3mBh1ulbkPDgQRxnS4S3hNocpBbl1trLh2y8MthCVG2e/RZrSwlmVg
+xetYOnAFCnulRxIu3Y0GYujAfVlE32q/FsYX/2Ivwkd1Xl/hk9DCIl6TntPR
+dFDnJ9ftPrUdk94d1lm9TofQfSSzmBVN3FHwzSaScH2WqSt7riYeqtCirETR
+Qe/i0vTo1DZc/sfnAfMaHd62b+Djvr8NK4aknfIgvDXPyvel1TY8Pzxu3htJ
+Bylubl+7Cg3sUZt1uyqCqLefnKkC7ho41E13YiNhTu+V1n55Dax4Ojgk/iod
+yNtPlF9KUceRp8K5bK7Qgb0yvEfSVh0PhVznKw+nAz3PsC1IVB2L8NboCRL2
+NP15UTN1K+aztxR8HUaHB6Z9fs/L1DCbe9fjhRA6NJmS97IHqWHF6SUvHcK6
+op6lTYZqODvX8pN7MPEeuLnXxLep4tGJzQVNQXTIGOqLck9XxZG/FUWnL9DB
+Ijk9LPacKia/EVeVJXyRkshnv7oFS/fWOp4NoIP4QnEji74FK6r/CI70p8PH
+Y10meQ+2YD7XYZTpRwfjWYF+SbMtGNP39TT40CHK8oPG4YzNWDXZXGvWkw5v
+PpHPxvttxiKh918teNABqo0fpO7bjBWPPJ1acCfyqXX5LPuiCiZVCvoxXOkQ
+oOVFOtZJ2ODL858udNC3v9h2+okKJj9wLuk5RwejteSbUe4q2EC98eGLM3Q4
+z50sn2imgud/ajy670yHZU1nZbRRBfu/dDsXfZoOT/8dz/YdVMYinwNHzE8S
+53sUH01xVsbSisMox56op08e1jv3KmO2us+dfnZ0uGxjcvCYsjIO9RmXNTpO
+h+CeLHWusU3YPu5lY+MROojtlbXuDNuEsZxX4qtDRH5bOe+td96EO8olG32s
+6VB9Y8uDBvNN2OCH6zN5KzoEbaF+tRbbhD14zMuC99MhX7+yk/ZkIw6dPaO/
+akrUp5VTvVDGRhx3O3ETZS8dasWsZfMiN+Kq5zLN203oYPd099YG241YuuDR
+niN7iPvut3WpXlTCZJPh/kADOqhI2D8KGFHCbO1sGUx9oj+Vyun5dyjhqkk3
+IT89OhyycGAaFyrhpg+31E/p0OEzxxHWuJ0S7sjnJUlq0KGhxmJgwZyI63/b
+mraVDtuV9toY6Srh7IqJPRJqxHstVBqyE1XC3Y8mvvNuJtY/Y3qln6aIRxkj
+W2kKdPBXljsSVKuI/asLPHbK0+HEZxxo8FgRZ/cd/Hhflg5duf4nzG8r4m5m
+4VbX9UR+SE5hTocVMf4Uv9AuRofNQx8VLUmKOOO2dfYmUTqc2lamfEJbEdsz
+aBeD1tLBctY/Z1pcEbN1RpQJCdJhWIiZ3fhCAYd+EDsjz00H1yOL684NyGMt
+JTPFV7M06BVxLk97L4+L9ukODU7TwDoUCfCWyuPIQ3yfOVk0OOT40oEaKo+b
+ghZPmU7SIKiBPy9QSh6Xl1xZzf5Fg/CG2gEdJzlsqf2w40sXDbL+JmXSzOWw
+v9MDkQ+faVBb2XE6Y7scnh8xSmj6RIPcl6rHazjlsLO1osGTdhq0CiSLq5TJ
+4qJSCb8TjTSYrTJ04hCQxdLtsbD9JQ0EFqMTX85twKGW3Ut8z2kQeOAWW+KP
+DTiD4ZA2WEHsz3W4svzNBmzZWf0r+jEN6pqWp7KCNmDF7lK+8nwaZH67bvz2
+pwzOVqGXxCXRoH48zSXtswzm+2jCbpBIA576bu2b72Uwaa1d7Y/bNHBJLiI3
+58pgMvOoh/5NGlxR3cde4iyDRa7sTa+OoMHWY17F+cPrcaLyq0YLbxosnjvu
+afRxPQ7dbfuszZMGP5s3v/7zdj3m+3JdkOxOg0a2ztX0/PU42xTzHz5Lg12R
+lyLWea7H3c2qezTtadAme4V6aVYaM95VcQWaEvlwOaOsoySNSQ6mn8SkaTDf
+fik/QFwaa51Qeb1GkgamHsMdDdzSuKlx6OmqKA0+pSzurxhbh9kudbUNCdDg
+OTtvSeSLdbhcObkxYrUNpLpieHoPrcOMsb+R2j/bQFGXtt5p7zpcpHI8Z/Fb
+G9h3W9yf1FuHLb8868WDbaC1jdvMWm4dHv3ok2PW0waZDkIqA+NSuOlKZ6xa
+WxsIZYbraN+VwlWjNuc9K9rAWSVcqf66FM5emLnJVdYGEvWhox6hUjhj8Eh7
+VkkbvIs+5DV4RgrPt0V/eJ/XBj/7cw9E60lhPqPOFmZqGzzVOulwd1ASY18u
+q8ZLbfDy8udo+m5JLG2xN9IetUEtuaTzra4kLlLYqPzVqA2E7fjT6tQl8ehQ
+kYuDQRvsSY/aMLCeiN9JfUPWboMKhh7bvVkJXMXvO7ZxUxtsCSIfpVVI4ERU
+2HiMh4i7s+3etF0CW1a19i62tEJ6CavDZIsEZrRExGo3toL67tx8DwUJrLWF
+56fru1bIypftoK8lxks8amisaQWGz0jOEkMcJ+a7KPs/aoWXh7VnW56L40g3
+Fc6jt1sBZmK0RkzEcairDcPHuhWur3UYdTIUx3FXcDj3/lao5OXx6dMRx93T
+XMFUs1a4VmH4kLlJHLOdtX722qgVOov/sw3jIdZ//CL4m1orpLZprf/TJobJ
+v7xEn3O3gu7VJ+TlU2LYHlr1Qmpa4Iiq4b+j9mLY8r+Qi29etgB7ng3rmY0Y
+bspjmHE+bQHX2eakaDMxXFXekh5T1AJu0+ej/LaK4XnnWg2f1BboKr8af25O
+FA85K4k1+7aAZtXb6uupoth+8UJXjQIxP3++u+yuKJYOC6imy7TAo4GQiYGb
+opgsY+8+KNkCop8Th62vimK+e46bFgVa4Ctt5wY3d1Hc5PnAVHK+GVIlhR9e
+MiRc06L0vb0ZLp513b7yXQQ3HWmzHrnSDGX2f79WD4jgRF2T7GehzbDxo37J
+5R4RHPpcdTjiQjNkfv6Wxd8ugqUPLOiIeTbD+9UenePVIjhun/1O+aPNENB8
+0OLxPRHsXzDa3KnWDLPidyw0TUUwW2DWqfefmiCNwdxRuUcEjz59HFlObwKn
+n+bqpoYi2GPhzyy1uQk8i9tVXbSJOKvnuxc0gXTGtflmBRGsVc34OlvSBNtU
+PW+bLq7FGazzMvhaE1TFL5/svLAWR3r9apPXbIJ9+Ezq6WBhXDRsI2Me1QjJ
+Saci5X2FcZP6PX778Ea4csaz7purMI6rO2vtGdwINE11jcvHhPH82HxXrFcj
+XO7bPj2mS8x/kSNXZtsI+gOP/+JpIfxeTfJe2cZGmM85FSIXKoS96/SPRtY1
+wCHtuCHvBEEsm11ZXbFYD8GW6y7QYgSxx789l9un62E5xDxGO0IQi7DOiI5P
+1MN4zjkZrkBB7LLU/1bpez2cn5h6+NFOEJN1vBwiWuvhlMGqqZiyIA6amTzA
+lVUPzGKLFC4QwM5eqtPGxvXQZ5zauWZlDQ7ab6BVeOk9xH4z/UrN5ceRBnq+
+Fsy3sEbCMVmQzIdTHp7dPr6nDj7soT8/qM2LyWNf9pMtACgmtDIbCR5c1CF3
+/GxjDUz4mB8QF+PGJLE6JQHnKnil9s5eXZsLl7cctOw1eQGcuSFzbw5y4vKF
+ND7WXAVw7PhSKXyNA/uzT69J4imDXxmTuwefsOPR3dvPiYwXwu6v5feP/GHD
+cWJ1tCDLXChLdfW9YciGI/OSTH4BFfookd5h7KsQWUcq8plKBLZoN5u7T/6B
+YsCOkBPoGoRJf/i36LUMbK71Ow7mHYW++cGBeyJLkH1yRKGiNxj9Ex0/JPFh
+AfzlUcfIo1iU2f9dqKJ1AUSOTBys7olFSnloxrphAcoDBHR9eG6gEM9jRnE1
+C8AwSzD3PX0DebWcyFh5uADZ197Y9q+NQ1pflrSYYcT4lzJkX6+bqEpkXeWU
+MjHe3PjNcZ4EJPGDPG9waR5ILbG9Kd6JKEBn4NjMhXkgc9W5X7yaiM6EP3pT
+4TsPGYNnq80TE1HGYYfyrS7zoJrg+uzFs0TUpy/CJ3d4HrrT789/XEhEFQ0N
+apwq8+DsILjAcf0eConvNPrYMQfSHvz3DG8mofGXKZp3W+eAfOrpcQlKEto3
+OCNv1TAH3V0H/vQXJaF+3ZHZ+po5wPaTUaSmJJRkEx7yqmAO2LZyhpryJCP+
+d7dPPAifAxEz8hApIhn1GE8/Oqc6B/kbqDZyrimozfnijrBNcxCUXKLPFZiC
+NhozSxPl50B1hCrRfzUFbagNDqiVmAMXZFXrkpGCKmg0Myn2OciIzfnQ2pKC
+LnDm1b7vmYX5/U/iFjRS0YXZx+Fit2ZhqFEqretnKnr2QTV5c+wsvL+r935l
+KhWNRZgmGl6bBY8zZavr/qWiVc7fxmdDZsFbIy9HUTwNSfSNHCs/NwuhQtkF
+8XvSkCTHgt4+41kYN1868zYpDTkIBqic/DsDbEWCRxu00tHJZaVsjtEZkDaW
+KlgyTEeL2w9MFn6bgdBt8uWK5umIY1WBn9k1A1Wf+xm7HNLRZqkquei3M/Do
+V5hFcWQ6uk7/6/wgfQYy6uOPhLelo4DtN8dMkmagSeXZy8ef09FotKDJj4QZ
+0Fq4M0IfSEc3Rr7ZqkbNwOjsvdIhRjr6T8Z3+bH3DPjvvPHPRCIDORnfWioz
+mYF8pfCRZbsMFDG5VeaQ8QwERcfnqTtnoAlvjpVx/RlYLhvfe8AjA53rcxff
+qjED1BPH1e1CM9CJOR/3HKkZSNhLa3mSnoFCGNMW0X+mQZqPHn/yUwbaJKLp
+vy51Goxf+ee92ENBvTrYbU3iNOhSX7wIM6Mgw8zjsv/ip0FmW+BP7QMUpGf+
+5+1w5DTIm5QUBR+joLN31JiF3oQFmj47nKegI6e1w7eYTYObcxFXXAoFZZl7
+akuhafAqCM7xo1BQhB37Ay7DaQh0fhm4/z4F5Y/l5Qxtn4axFv2qT4UU5Dj0
+yyB1wzREfTee21tNQf9sk8kMJgsch0pv3u6jIAHJdQ5f/7IA08JlKEMUxPyr
+Jf5+lAXj0nxzaT8oyL/bl5o2wIIEfmuK5zgFKYtw/N7ZwgKy+sdHXksUlKO2
+OVChngV1S2X1fKuE588X82AWGBW46lM4qMjL/oFi5wsWTO6LU7nHT0VTTB+V
+8zksKHBcde2XoqKeV57i5CwWiNaseAjLUNHjFd5HuuksuChk2aEtR0UBEp69
+ywks0LXk+3h4ExW9ZpzafDOUBR3tT+mjmlS04azoyfMXWNBW4634WJuKBFp6
+Da19WfDXQuv7OV0qQu8mf691YUHZ5YNvi3ZR0ZtPCfz3DrPgc5aDRKIpFZ36
+vW5f/AEWqOkpePeZUxGPxVv16+YsWOve0bTBkorufcOjF4xYkHlLO/2CFRX1
+svmr2GxhAZXe8ezGUWL+d7bEfRtZ4OFKO+V9nIpuh5rd3y3Hgi8eBzaY2VOR
+9Zxavqo4C4J0VNrbTlBRdcjh/YsrTEge3nnY9CwVZXrZ1/9dYELGjjXP8Dkq
+KivIHB6aZsLZawZ62q5UVLJFdKF+jAlaxeqZf9ypSIP3HKtyhAmhsbpRep7E
+/lw0E4qHmKDhrnQn0IuKFAt90299YQLbNqMNDd5U1JHCzh/+gQnl758/6POh
+ogmRA+u825hgX1d6+KcvFZ1N1uM7+JYJJ7dVGnzyJ/LJN/N7Vy0TDk4oXnwZ
+QEWxv3LdVKuYIPvi6feEQCrqi2HbzlXGhOP1XKfEg6jos0jrpakiJhRMbfR5
+R3jd/VcnB/KY0PRL+YXbRSoaFHb42nKfCVHmr3f+I9wirD/5ksIE7ueZs7HB
+VHRfvD8zN4UJQ4xgFmcIFa06fR28fZcJ7A0cWkGEt0+/qg6NZ8LympnHXYTf
+lfJqnIthwtoiLj/NUCryVDi8wzqSCSYpv4NCCVOebejQv8wElw6nuheE7VLn
+2RWDmXDNV/r4T8Ijr/yb+AKYIBHfpbvmEhXFDwhvmjrPhA/Wx08rETaKOyna
+48aElXGbLnXCHpy/kvAZJjiXxN1XI5x7Tq+w0IkJj9pfvZQhfO76R+s7dkzg
+ev5QaZVYH3NaxgbZMkGvUmj4C2FFKwWyozUTcs2ez+YQXrw5XIIsmVBJd3Jx
+Jhxdvi5N2ZQJKR9b1cUIh4YeEOXfw4TNXxoOVRLnrTnNIfvXgAlmbhLthwkr
+FTe+6NhB5GNdeFkvkT9Zp40DzzSZ4BvXMOFIOMiMmpKmxoT/HGvv0Yh8czFf
+docqMyFwpzplB2HnqtViRwUmOH7o5blN3FdW2RKvsQyx//7Mvp4LVDRbps2U
+lWTCJqldsjKE13G7efavYUK05L6hIKIePopuR9bcTFAWqrG6TNRLtN/J+Ner
+U+CizcMI9CPm24ZepUxPgc/riz/0iHrLW6++mXdyCrKi9hmyE/Vo8rSdFPR7
+ClZ0DnbUEvVaKx7SZjVAxP1sG9Z4UFH2id3GVd1TsCZGWD3TjYruBIbLbvo0
+BQdSfXpkifdA2z6qPtc4BYn/UmSnzxDv5e9cUEbFFLy9Zx/BdKSif5v57VZL
+pyAyiHlByIGKCjcn5rsWTIFm55H69XZUJCwSEqGVOUX00/VxPEeo6MlY90aI
+noKo408/aB2gIgmz1kNKEVNw1OAa48s+Kvo9KD0cdWkKenOSI3yJ/vDMR1vf
+zHcKFj45zgeQiPNs2ZEIdlPQ4ZJPadGjIpnr/X2ytlPwrbkyYlmHikjK5fGX
+rKbAQX34t4IWFckbbePVNpmCc7GhR422EvdD5g/I2DoFGRelmt8T/c5tnPuC
+5T8GDBywclcm+ucf0YiozDkGXJtsrfVboaDvf7xH/04xIGwfd92jRQq6Ifbn
+eeJPBqR0LnUtMSloC/fO3fR2BjzVz06c+EZBH9gb/VRzGSB2DAWrYgo6JB1T
++DGLAXF308UHaygocgP33vB0BhQc6nO6WUlBnvuWsmgJDFhj+GmpqoyCzJ9e
+/eoRwoCqQNOi6CwKUtyVx4i0YsCy4PP89osUJETxElbaxwCPiDCet/4U9PVv
+fAw2YUD8BaOdRcT3S0nc78o/fQZMBN8TJp+hIJf+3ig/JQZ8TeH4JGRFQTN/
+z1S6jU9CScfjYlMFChob35Fwb3gSTil95g1aT0Eh/EpsNV8mwSxgxj5DnIKm
+rx/A/HWTMCtt0v+al4KafmddTUudBL6+dWUXJzOQWs2NL+f3TIKIx8mgotcZ
+qDOycHD5zgT8zCoY3HgoAz2p+ccheH0CHHVXwwwsMtCYm+/x9SETIBEzaUba
+k4GK+EtiNU9PgH9Ji/9mzQy0cudW797tExCZI3XVWigDvTtxuUW0/S8EfXRU
+5G9OR3PZ/sLGQn+h6JiNtZV+Oop5Olltd/0PPH86E/p8NBVJvZMOqAz5Az/q
+Ea/mQCpaU56wRdL7DxyV2muU9SkV/XA8eafl6B9wcbB9cPxNKtLbHS8mt/kP
+dK7hyTdNTkVhby+7n24ag6KVJ9zsRqloC99UrJXAGCjm3I2VjUpBVQKrTifj
+R6HKRkUtaDIJSTTsS8eXRqCjohCpwB0UHib8u5gxDB71G5qXH8WgtP2ymt8b
++0DLrndSdkMoUlTSu+1wthPYAvXz6Lbb0VCd27XD7g1AHkq5rF8XAl8u3WgX
+mksHe8UYrlatOODUuVK1lFiP3gqoJFLlk0GgRaola6YeHb50lOP8rmSir7Rc
+u+nYgNR0e23R0WQQPLo0sk+lEf2Wlw1n3UyGYfvXXW5vmtBTJ4fzN2eSYePN
+KYv81VZ09Me5dHdaCiQVK5UJn/mAxKt6H7VGpEH6j1/Sei+7Eb1Sb15pggJa
+MeKNO1jdiBys/MuAnwofAm0dvLV6kH7kirOtMhVU3/Sz3y7tQYmTO78lOFJh
+W4VMGiX/K7JwqUlWaKRCdI2j6KHcPmR/zfJiZXYmvCi3uzLtPoQ0KixG7xz7
+D1Jyh+4lxQ+hztSst3/9/wNN9syQ44+HkMj+B/GHEv6DbzodIjasIeRRGtMu
++e4/kE6x0tpwbRgpL558UK11HxorUOXR/G8oezDvh73gAyiel/qgKTiCHpXC
+ypmz2eA6fL6yfOcIyo4V2mIXkA3mFr+/+Z4bQVXHbEWsI7PBZc3757k1I8hb
+U0Xa6H42aCwP317y/YmyeMz+U/iaDTa8I4JS334hZ8tbl3htcyDqE+56szqG
+tFxujO3amwtu4pb+ZN0/yDlb4wLJJhcO9P+RM/T8gyLj2g/uc86F58Cyken8
+g8hUi4FjV3OBTeh03PaycWTf16MQXJ0LhafrPduCJpCioWQL6OTBuCO9WEF9
+CvmTAnOdNuVD23KFmOCBKVS019DJRTsfdgrW1up6TiGDkNmJ8ygfGE87vfYU
+TaHRnsJ7YSfy4ZiBnKq1GhPxad48n5qcDwpeigKGBiwUmnns9BvOh6DTPOrv
+fIKFIqO5ed6KPoTfpnLdn66yUPlRfut6hYfACg6vLmhgoVEVncctRg9h6Mez
+SSXHacR43mDVceEhBDpmmD27N4MUAw6VvPv+EKz/fZ23rZ5BBjs+3oKphxDG
+nTtq930GYb0T7dWrDyElp24mQ38WlXNMnH+yoQBStrHNaX6bRR6RJ2ISjxRA
+uMKbG8mH55FBjZCv5rsCyCuSSo+OmEdD+kPe8h8KwOaMe/zqk3lk2e9wQ2iw
+ACJFj9TeF1tA9lST5dHFAjjrZFvbPbCAGK76p1J0CoHs9G69WdoSInEFUaty
+CuGAkoqGbtcSGurqZelWFEIfl8T0+vXLaKi/uPkJLoTfCy2Fww+WkaLDYkv2
+YCHU7OAV1qz+R/zv7THxkysCOTfSgzTOFdTBnZw1oFEET5R1InQOraBy93pt
+K+Mi2J8efUzt1wryD7UeVTpRBHN+8x7pEmwkrYOkGy8zisDAfnPQwz1spMSy
++UqpoiJQy7ORCfVkI3X8+9UdVFkEGv89zI6pI8YnnXq39UsRLHgf+ysYzk4q
+986UDhcvBssMH2v+x+ykDjPJkpaNxRB444AD3yA7iS2ZrUtKpxgMxtqj9Cw4
+SIwtkp8LycVgL6NxNnwjJ0nx6B7x0tvFELdjs2uNEycp8WOFzkhWMYhxlLU6
+ZnCS/NeE3JJ9VAyjVRKhc+JcJPIHjWdRLcUQ/GSPW5w8N8lZd8xWnbcEblxL
+Dn/oyk1irHV4aS1VAhPym7OqyrhJ5bbfB71VSiBBKylJZR8Pic2BYp5jWgIx
+ZkW8Fim8JJEfRjeHIkrgrwHpmd4EL0mrN8r6150S2GwvkCx7kI9UXp59aOy/
+EuBiPHsQI8xPchbtqv5RUwK3X333877IT/I3iljpbSmB51HqDySG+EmRepJa
+7T0l8OzMUGdh3RqSP6WIr3iuBEh3+YKUdgmQtK7LRd/lKQX/ngrNyy8ESENB
+rmkBkqUggX32mrwRJDnP8W9U3VEKh2H5fsRBIdLQuOr5ZZNS4PA0nTYbFCJF
+yqeMtZJL4bPA3Mz6MGFS5GhsbNrpUgjcX38nXXYtiZQbp+zkWwr/A+GgJz8=
+
+ "]]},
+ Annotation[#, "Charting`Private`Tag$6193#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], FaceForm[Opacity[0.3]], LineBox[CompressedData["
+1:eJwV1nk8VN8bB/BBStax7wzZkyxl516lslSIUFKoZClZKkSRKKksRVREsif0
+DSnLc8o2M8xYWiglUbQpS0KWfuf317zer89znnvOvefeOUo+x3cd5qRQKEsc
+FMr/f/O8h+a8Us4idGs2n57MhkX1XTWhDe4oWLn4Tyt2Qsk2CJF0QrH9aT8a
+sY/e/vpA9ZI9qqoPvVCFvauq+mrknW2oao9jSw52YOqLq/xz1qjqg0FRArbL
+FN/Neys3I10ZTW0/7Jv8ZQyjC1aoKszSdQv28qKfxEsnEnnNxqvIY/+g/xwc
+K7JElB3UzF9X2WCbr2sj/9cc5TX+edCA/eiJQWhIkhmi6Dr5x2Mrpt4eeGxn
+ioY0zBhbsatet6QH6JkgGquXxYWd6REncsrIGFUNGofXX2GD/u++ogg3I0RC
+ausx7ESLubwtVw1R3jHKExlsN/FfFWmvNiLaxSqn55fZYFid5/hk3UZE3daZ
+cgg7WzJ+a9b1Dcjx4rkwDuwE7WbPo9wbUFUjZSkriQ0nj1Vxo3MGiPovWnst
+9m/OF257VxkgytJazrpLbCj9QOU0yNBHjiu3niWwWTYJHP5a+ih25cq7zxLZ
+8Ph853GzNj1EvVAaYIkt9lj/HZefHpooDR6ouciGlRLS3XpCegjp35lWx3bx
+UTbeVq+L3M+GP0q/wIaH39aefRWoiybirWUXE9hQ62C1Loqmi/oHHNbux/Zv
+9io8rbkeufe6bxGJZ8P5zdMhacU6yCt/zuHQeTb8ufLz19W1OoiqLLviYRwb
+5vpoUpw169DQN0mfuXNsaLf0ep60eR0i9WwDTLFVr+3eyX6tjSKe8cmHx7Jh
+zZVrZ6OCtFEqJ5yuiGHDdXUx7qnStSh1bZyxwFk2pB62LTDdsRbpDnje3HCG
+DW8OMOW+TWshkvGsyDWaDR1S7d6P7LQQPew1Pek0GyJo4dTQv5oo678jg9mR
+bNjAPZo2VK6JUg025ZdGsKHO2anRVFoTOYZVGT46xQazSvvhkV4NlOpjwlN1
+kg0znsIuj5M1EO33zKXiE2ywr6hyDebXQO5N1LwLoWyomeIRVWGro7n2iI1B
+IWwoyPdQuZOmjupENc44BuP1paklXJNXR6leV1S5g9iQwjj9YPSzGqI0H7jY
+d5QN6zMLS6or1VC/1uOcgkA27JXQGzmzTQ05rrD/puOP91PMZRHDC6qo7s8K
+sRWH2FB08XrugosqSgxu/pfsw4ZV6WTksooqosnY1Yl6s+Hr2tjniXQVZFMn
+eZ13PxtGxW2d5m6roCon2cfR+3B/5QKnk8EqiHLQ6/6XvXi9KnNVQXI4Rzt5
+KtzY8F375be+6TUotaY7dJUrGz4/XTbR6FyDeIK3PNzrwga19Xen98WsQRpj
+gw9+OrKhx13/rfUvZdQdcfpZpy0bwi1/xguzlPHzUB77vQ0//+i0hCv3lZFf
+avsXia1sOBXGFg4PwFbZEW+ziQ3ycrs53tkpo5IPe2juJH6/Dp1c9XYt7vfj
+aba3JRuODVelJf9SQhNls6Y+pmyY5S3WM+9VQv2tMgf2GLOBbyFGJqRGCeVx
+KfnZGbKh+ELFtNcZJUR3v7xORp8Nypn1hVMiSihxS0JxsCYbrtJ8dMPmaUjD
+y03MSJ0N78pWaR4YoiGbH6zjsyp4vHvD8LFKGorwYMweprGhddfqGtldNNSv
+kRP8VwLvt0sZMuVmNCRVrRCeKob3e/34qeuqNJRIHTxFE8Hz95f+2/BbEQVH
+5h/REWDDR//7xh4OiqjqSc9GTi42DKe58J1WV0Spsk/X+VHw/bRNmVWnKCKe
+uZ1a9CUWfPvs+W/NIwUUrHrC6NQcCyhvzMu2KiogEsl3Jo2zICO+wrZbQB4F
+j6pZZL5mgeuugaqSX3JI6pvv6+4XLBhdUyzzpkcOlfgn7uTuYcEzg25Ps0w5
+NGE/ObS/gwV/bc91v1HFzg+seQks6N10QmMrrxxC1x4f/dzAgg0f3+5f/imL
+hnzUBCefsKD6XxrPjieyqLvVVHz+EQtOmWQnEk6yqI709ewsZsHNzaLsUSNZ
+FKw5lFxdwAIWU3tFt4Iscqx0rc28y4IZ7juvD47LoDwp5/Gdt3G/qPuXw67K
+oKyQJrVzySyo/Teqt7dfGtG/Zmv8CWPBf9el3UqeS6OJA6Unk4NZcHoh1FPz
+gTQy3qjSq3SMBX5Cl2dRnDSiqgojE18WqPRZ39fTlUaJN/7e0XFnQeiq1eUx
+16XQl+AvX9eZsWBS/7tZcawUCr6e/zfciAVXbxRxzB6TQsad0YaNBixwKYz6
+zW8rhWjeTEMTbdzvulw4F4cUqjPovjIrx4Kuq5VS98MlEcWqYl3KUifQDnV5
+BR6RxN9fciFvvhPG9tJe2LlJorwrhWTFTCfke8UVHzaSRDwBxqb1452wUazz
+AmVeAtW9XZbNfd8JedGnqdHnJJAjaWKe2tAJKd7imVxhEijrz+DhvXWd0Lvl
+yvOCQxJIN8dHlVbdCQrUkj59GwlUtb3t2J37nWDk7vz9JBXXm9Xs9b3VCTAb
+Nr23UBwFX3ngpRreCfOFj6I9ssQRRb3sZWloJ8gyPwaEXMb5UY9lzaBO2HFh
+46V3IeJIV00wSv5wJ4yG/I4vJcSRzbcQ555dnRBwsHT056AYot5Mdw5a1wk+
+yWhfjxb2xZhzVz50gFFEcou+ohgqicxcqfi2A7gtl+2KRMVQ9xu37vKXHWCf
+r/v7+aIoCrbdbvGU0QFXXz/OY3WJIq8jbFb2ow7o2zeCOCJFUeKMlOv5Cx1w
+UK76z/EgbGfDuI7YDrhst+bG+EFRZJPeqSQU1QHrBGsiJBxwvySP9sTjHSBE
+5XgioyaK3AX1KVvdO6D4laY8+7UIqlMw7P6m0QH+jx4uKrFEkDGl7s535Q4A
+7Tip880iqF/gsPAXuQ4Ysh9LPFolgrrHy369oHaASsaXpf4kEUTn1R4Ln2PC
+kTjG7LKVCKIx889NtzFBpVflcVudMJqryKju8mLCoeKqUamHwqgulnHv6V4m
+zJxIZ4WVCiP3VSK0fBcmPl8wojffEkZZMzeYvjZMQMvMJJtoYZQae1e/fT0T
+tpqt3TJgJYyQQdz90SUGKE0PXn3aS0XGrDXujzIZcOdoUgp3JxVJcelpb0xj
+wOWJsRC3VipKJFmfHiUxgOeLabFQHRWlVg0IlpxhAN+JsNjuHDze7GZ64EEG
+aH8vqbgUgPOjdgPeOgzIecnMuMpDRXR7H0XF53S43VMypMhJRbqk94vKp3SY
+yxLZHTIrhFK/vLG3eEQHO9dd0gvvhdDEvddZOwvo8E6VP73oPs4LIlfbX6CD
+FPM8xc5WCA0FRkZV2NLBxlwzS/+qINIwyAg1YbdDl9HiXdY5QdT95PRr/7Z2
+2HBsmhZ2ShC1XJo+kdnUDuX5HCbvDwgilaq44G8V7VB4nndmrYEg2m53iHk8
+pR3mefMMCgcEkLZt0fYFh3ZwiBCpuWUggLKI0kfru9qAXXpaPENTAMXW19zZ
+0N4G+bv+VWcqCiCqyTonI2gDP53zMTV8AkhX9bKMYWUbPE8W+O70iR813LXO
+l05pg7GgiYdcmfzoy5Gy3KidbXBs4lzQIgc/+rFzSr6loxVEeHqvCv/gRVTN
+t5+0n7WAvfCvid2feFG/TmGS45MW0DCY3Jv7jhf5yTdyhz1sgeSm+1pWLF5E
+HlK4WH23BdyGQ/hRBS/6onuLWyuuBT77br5RGMqLYtklRz5uaoHL4tcKxpZW
+o/SjVnsympshbEjMeY3SasTfn79U/vw5kPd+2pwNW4WqlP2zUlMRRJvsLnok
+shJ1g4UHVbARGnqqtw4NrEBDi/mOtzSeQID0j89XSrlQnseb4JXyNWDBN1v3
+JZ8TZbl8nrFLewijj5ekwm9xoKo/MzbOAuUQLiW97F1MQcbr7K/UMgvh1ZdL
+zwzv/oN+tT08+nl5sPq27JFdn5aAFIV1J25kwgo/VbH590vgOCRmcPpkJngp
+732U17cEVerjxpkumdATOdUyxVyC1EVbewnRTIihNsnnP1wCLzv7BxppN+Dw
+kYM/tWNwP39O39y0DPjq1hwwLrME3cc09g7cuw7yPX93/HRZBPKWxL0KgVSI
+56atstm5CF5jBrJHh1LgTFZUfv62RRha+rb5YWEK5Kitj95rugiUJt3kQd0U
+uDkkkf9ScRFizxpPt9gmQ1+YzM/JbwuAnP4ZooQrkLzk4Mw8twAU3d4DR9Qu
+QX6gfZZl1ALEfnp+1nIqEVaYWt17dGIB8iYuN9s3JcIQX82qvCM4z9Kv4XFL
+BP6mldPndiwATaFgmu/yRVAOlMz0l8bev/HixqUE2E2Tsnv+8C+QB6Tv/lt9
+HnpyNrcF3v8LeVqNMv7v4yC25e2YeCH2Z+ahlQ/jQPrqNqmjWX+BorLK4517
+HFCnhaRpMTjPf3xwpuwcCL3SnS7c/heG/BP397vHwufiu8NrvswDWjs/daE2
+CuoNn2UPfZwHSqlFrUVAFBjn9n7KGcAmty/vVYiC3+OTsjJd8xA7UjVNv3ga
+gs9bi0jXzgPpHOsQciASLpXandONx/0uW/h9UwoHgUe/ExENj7c//ldnOhRO
+DibIzsng8SmBJz8+DoU2bxcJXXGc+3t9/x4dChsPhW+6uxr7OVcuD08orNWP
+O5w4NQdk7wcOL+UQePOwdp9/yxxQuOvf/2UHwd64P7ahfjjXU/lm7+sHs8Tt
+vhqfOYg1XdmYwO0Hi9O2DfP7cH2DCTpaeAR2jpUlxjlhnzOYsxrzhb88nQpZ
+prjeJPTqyrDDcFwwt6OXH/dr0/0zXOYDjoHXEuMezgKF90BIqKEHWIZvVtt9
+fxZieUSf6F/fC8JdLAmNQpyXR9bHTe4BkfY34+wsnBd0f+j+zx16IhjetFjs
+sz2qCjauMJAT3dOzE9fPq38kGp1A9GyjQ6kNdqdRwIC+E+zbcFvi3CZc7+bn
+xFnmCB8CCqL0DHG+9ZLhsIkDUJ6YpmXIY6drhGRo2UPty0DPgB9/gMLvkLQv
+dzNEuXRJbx3F/uhhVV+/CbQjkZjyELbq+SvqA1YQmM1qfvsCW/7hBbU1JFzz
+15zZWY9dECDiUWkCJ0RT0rVrsH+qtHZLGQPTOOkYbyU2+UzTPdEQPJraGW35
+2LRcy8xIA0j3lJTZlISdJ9Hpb7sW6mM+nFCKx3ZsmdM+owEqITtXcJzFnrtj
+QmlUBXW58iYUgj10yYDlRYMNNRapm/Zge1nvnxzmgYLvw/IOGth1T9pPVkkS
+408UXG4qY2fNHj0SL0uUPW2rHJHD1rWUvrFZkXD08HkVIYzdPx3z3moN4emz
+3FHwdwYoVIFDHdxaxKhvj+LEb+yW/7SnstcShzmVMsx+YWed5adrriMy3hLD
+vSPYxlseW4voEuldrXOcLGy7UNjZpU84VLXZObRjl4sM1ocYEB78e5/efobN
+IzzFI7SBqKy2nthQiy2y2Xib6UYiMjS/5lwVtlhtkil9I2GRnHuDXYZ9g0tU
+xMmQ0MpOKPXLxR4d4A11NiK4c06+rbn5/35+dxY7jYhXUqKqXOnYU12Vx62M
+ifvHD3PfScQ2t7spKmtCeE4o3foeh23Kf3NrrAkxb3h7q8kZbF0eX98hE6Jd
+8+WnlyHYi9wNwWmmRDh/9ivlo9j6u4I9h02JKiW9d8G+2NcCbcx0zIiAKsm5
+Ji9suogH30kzgkF9qSHgge0bAexaM+Ld/W/HPHZja1tcvTBtRpxZ+NBW6oCd
+HvzOYK05IZVkbDBnix2R2trnaU6cnYr4b6s19u9E77DL5kTlB1XrDEts/keM
+VdXY/C1jI8bYJ15K3ugzJ3Zb92frG2BLKfoq/jEnJL3HfM6t+//1dLsKhCyI
+we2nTLrVsVWoQeoqFkQPhZemqPz/9ertLzGwILQT1CWC5LDvHK/XsLQgeCed
+ZRslsBuo+aWbLYiNAWLr+YWxac91tK0tiL8qPx09+LCLbp59SFgQUwd9Y8u4
+sS3FKk0NLYihcM7G+X+/gfJWfJCubkEEwbaVtn+xTb9oeopZENTieo+s39hz
+pg/nFsyJtpKRhrGf2CXK17MHzYnf9ls0jb5im0v9sm0wJ/RUffMujPw/n/vE
+kWFOCL/uUHr9HnuRK6PVz5zgFlgsV+3/f793ijeMzAn5hGirk73Y9MSiExzm
+xDvuF4Mtndi1x+x82syIlQcT4sXasX2d13ldMCOoluJjj+qx42gmabOmxG3m
+oBmtFltmZGh/mSnxlm/wxpUqbDHHLaHupsRX2f88DxdiO+anBBWZEKLmd+k9
+udh75bL3bDUhXB79NbK8hZ3n91/yR2NiulZJWTIFO9p+x8BqY8J8ZHX2+UvY
+KgoLv28YETJFaVIT57ErTLk9FY0IMqNGkhGBHe8ZL6dsSHin0JWifLB5026F
+/zIg1ArVCsb2Yb+rTFd2MyACz6Squrhht5zMVXmqT1DUm9as2/7//pLb9EP1
+iJWDHBwfNmLrblZS3b2OsHewPG6vi218Nkbz7VoivuB3/2MtbHfrlPHdWoRe
+8sqcVMX/X3/wRqOeOqH7DB+HV2MnP9WpP00j/iT0SVVw/X/9GxdmAuWJ4sld
+O2WWp4GyvfSIVLc0IbeayJ2awi6fDXfzFiEc94R35r/Dzrsg8dbqs2WP48cG
+wT5syn5HBbO+JgVK0d3TPdjddG2fi3+aig9EbN3Vhm3jwYj15weOwa4JShX2
+1qM2ljI0WGFwJ/xoGXZ17cJAsDK425v86ivA5v0QGt+tAqIrhCorbmL3ni38
+UaYJ4QzGIY/z2HZlvuOf9eCBOP+Wh67YuU2C0oPm8DXvsXO+I7aI/o+xYEvQ
+tpWyuW6HrSVWG7mChPzq6g8nLLGLfCw9C6ygyDj6qaHaNMT2TM0e59oCHdPO
+udUzUxDrndOlaLkduiUdW+/9wjZSPSamtwOut/9qv/Z1CihW5jm31XYCjeeV
+V/B7nPNu8qrkd4SgDpcezdYpQGarK3oEd8GJ+JU6Gem4PsdwiHB0BWqw8ttz
+ydi3y7YrD7rCdFTnnqBEPD5pUNjmmBtwVMf3bI2eAvLGVo19Ke7gIJZ1beYg
+zgV0BbOH9wJnHBqwNcC+afpGrfUAWPPmXmb0TAKqlbEdMTsMzcmnv0p2TgJt
+MzUqM/UwBDkiqm/bJOQp3Td/8fkw3L1W/oSjHvvUYvdQmi+I5EwfMSyYxPfX
+/4fDxBEYdgtipZ/C46Wcdnu0BUBuy8tQZdlJSH2d85QnMBj6tSLE/cVxfso1
+rCYnGMohKrRSaBIcO3dH3usOhgbJpj1mKyaBrD4pv9koBCJ5R7scxicgWFI0
+K3lVKHSXmE4EwAT+vx34aF0dBvfHK0p8D06Ao6fOj3yLcDhS/nKlhucEkNZF
+D8gz4TASp8Hx1XUCEv/M6ms04nzfSLu/3QT0V9HWvLSIgMKefVd89SZgaEy1
+K3tTJCi6O7Kyln9BxGk2ZWBPFPT8MF6VtPEXxF77vMq9KQaGl159v5I3Di47
+D/J+KI+HugujzkLp41A31nWv+WU8VHZZPUi9OI737/Za+mI8HH82qJMaNA78
+700lNuxIgI4n7XZx5uOgbekanPwrAbI2NHbq9f/A35MTnNtML0KMjrNijeAP
+yO5w9wobuwTbQ4ZaVkR8g3ilY2uk76TA4hKtQTZ0DCwzRgNfNmWAhOkp12dC
+n0Dqd3OWOEcOqPcJao60D0GTotwjb/N8II6Xcye9fQuRy9MJRuuLQCB2Sklz
+wwtY5815ZwmVwefVXGkS29thWeDyX1WyErjcnEvfby6GjcrStMW1/8FQtabR
+zPnHhALvr5i5/Gow5M7ckRnAJpz+FO2bUHgMn07RFXc5viWqQpDHlaEnsOlC
+iSPl+zCx6H5YreFsA5QXJ67Pn/tKcATtu+O9H4DaPpjBuTRBXD4ruD1R9hmU
+7CmWXy8wSXDz2C4M0J4BPeAH87D8JMHGB/71as8gou4ufdJikqgW17zVp/sM
+Xupl1yXETBIlgnu9NbY+g5ptQzMlK6YI02BDCXbwM9g++MfaUnKaKN2BLDTa
+nsH7XqJ2tfcMwQ68Ns0T8hye7rn/tefkDCEuzJx5ceo5rAiseFaWNEMIL6tz
+5EY/h7hBmfbk6hniZ6CY/sbE53CWN3H1mtV/iAcTo9Peuc/hjUEjmV7zhxAz
+vPmwgfUc5grSthyWmyMSdeTGT2g1w3/bZl9EGMwRjpLHT5O6zfB497GmPLs5
+ove82Cp+w2a4WZSgpxM5R7T9VJG/Z9UMsV2Zfpv75ojlTdwbetybgUuQMX8q
+c57Qnz/F1L7YDMXllfNimgtEnd+W5A8jzdDRceCAtdUCIcdYsbjtazOYOHAM
+XdqzQGi1UL2rfjZDcsyZDrckXB+hTD033wxnRijXuMYXCHSjcUFJqAUou0rd
+m2oXiWVU9MrbtAVmXhWgqX3LRNZQ87++1Bb4yjocbRSxTHSaxYxa3miBD6no
+e+b1ZULsk3Nj4e0WSIP2unLmMrHhvZ9pWFELqDuF/15r+o+41qdyVKChBdwD
+TojuEaKQ/bnbz1iOtYAVq+1Kyz8KKfPZ43WaRSvQIiVy+YU4yF6pCb2BTa3w
+ze5q62EFDrLo3P1wFZtW+MjieG9vwUFqJ3eh2l2tcNSwaf33KA6yIcjV+u2R
+Voi+YJiXuchBlm+b/iR3rRVM3Pc2MPm5yNS3uzemjLaCM8/X3jgFLlKrefup
+V99bQWyhzt1Jl4uMfeRwW3ayFb4r3jqv78JFBtfVpxYvtMLGKUcjvhwukkf3
+35omahs02/+K2WawgqyyFWz+bNoG/z1e53M3jJu07nG5I5/SBi78h/4dSuIm
+6ZWWh3rT2yDmu3T69rvcZOLMMc6Lt9pAjq9086UubpI0edz2q7ANJqVuhres
+W0lecan2g4Y2GHh7kbtociX58t3DIddvbXCyVfXce95VJLLeRl090QbU69I2
+pMoq0hqyxOpn2qDSSf7VJbdV5AnvtFsKHO0Qx9Fjbo5WkVW3GRkjku3AIKhG
+d2/xkMYb9KUPb2mHjg83eHtrecjolAenxezboffQ8U6jFzxksF34g2bHdvh3
+Ret7Af9qMl1X4YLSvnYoHRlZKRO3mtSefLP0NrQdxHbeTFGM4CX3/T3Yb53X
+Djze1zOWbvCTP0zWMKf+tgO/9kIm1xN+ssCGxmNGocMmNd9ruwb4yf7gNsnz
+3HTwuczu6aIJkME1/vdFqHQ47kqNO1IpQDYIXstdr0qH0K5DLUrvBEn68ECm
+lwMdimNqPG24hEixXqf3hS50iN7WltKpJUTyX/8y+W0PHazQ3sXp00KkzYY3
+F08cosOB1vMH/whRyXeTx30SIumwOvE4mw+o5Hbvxcqce3SQenjH+fcrKkkL
+XHz5oYQO4ouut2XGqeTc15I2pQo6vNeqFVGVEybjh48KFdbRwaBMoM35jDBZ
+7nBUv5RFh/WDXpNbd4iQBSOfs4tn6cBXnp5d4idCBss1nR5dpMMpe86m/fEi
+JI/MsLIqJwMyDINvdjWIkLHD4T13+Rkg+unKznk9UbLKk34vS4kBAdGxAg7r
+xcg8zbLFKHsGlAxvCh92wdad1HN2YsBDqwAugSgxkprpp6TlxgDNEE5HY4YY
+KeWqqNPnw4B0N7NfvsfESfcv+vPrTjOg79fXO3pZ4iTVN+4vZywD4srH2p80
+i5O0X6HVfQl4Ps+EHkjLS5DGD0KcYtMYYJ7kH0R/I0FOCF3QYpcwYH7VVhEd
+PkmS7nTme14Fng9rT+MFC0myv+rqwbBqBuypmVDQL5Qku/8ZRUgiBuyWCpoM
+OidFOr46qrOvjwFHzrp4+tVLkYmao/na7xmg82PeOf+PFDnBPde5OMyAmUmy
+midEmiwxUrfK/smABLucVtlwGdKR62JBHzcTNDUDbK41yJDGjpmokI8Jejw6
+15u4ZEnaQFtqmDAT1Gms8/GZsqSXDmO7oDwT7kOeiWKfHFlVsU2H3MCEEy3G
+0ze05cmSVZajfKZM2KY5Nx8TL0/qXv/o2Ecw4Z/niIKKuQKZeiDS4pg9E8Z3
+mG2qZCuSdWOTQRk+TDg4Uc7XLU8j6Spuj/f7MaG5ddt5ZVcaOfRkuUo9iAkb
+SO+G9k7sO96P6yKZMFIU/3QPnxKZmNLcHBvDhN+iy2zr7UqkjXRNrE0Cvn7J
+Tp+2V0okJSyDry+VCU0248m1CsqkTfvaNzk3mODQ1KBWHaBMSjXmuR7KZsJ5
+N81sxL+GpLNPeU0UM2H27H9lzgfXkHVOsT9qHjAhonPMcblxDRlh/UQ96hET
+Hqy2LZKQVyFTlf4Ik0+YYBb1bmkxVoXUiOG7vwKY8D+V60rA
+ "]]},
+ Annotation[#, "Charting`Private`Tag$6193#2"]& ]}, {}},
+ AspectRatio->1,
+ Axes->{True, True},
+ AxesLabel->{None, None},
+ AxesOrigin->{0, 0},
+ DisplayFunction->Identity,
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ Method->{
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "ScalingFunctions" ->
+ None},
+ PlotRange->{{-8.901764074565405, 5.318264993138306}, {-0.23873241421250402`,
+ 0.025852856652346816`}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.05],
+ Scaled[0.05]}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.875952032802268*^9, 3.875952047759521*^9}, {
+ 3.875952077778509*^9, 3.875952108413797*^9}, {3.875952158124817*^9,
+ 3.875952180687911*^9}, 3.875952671527186*^9, {3.875952833903912*^9,
+ 3.8759528406658363`*^9}, {3.875952951318654*^9, 3.8759529671528463`*^9},
+ 3.884691796783944*^9},
+ CellLabel->"Out[15]=",ExpressionUUID->"174f48a3-9933-4f7f-8806-091e93a9ce75"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Plot", "[",
- RowBox[{
- RowBox[{"Evaluate", "@",
- RowBox[{"Last", "[",
+ RowBox[{"p2", "=",
+ RowBox[{"Plot", "[",
+ RowBox[{
+ RowBox[{"{", "\[IndentingNewLine]",
RowBox[{
- RowBox[{"(",
- RowBox[{"DScriptF0D\[Eta]List", "@@",
- RowBox[{"PrepareArgument", "[",
- RowBox[{"Data", "[", "6", "]"}], "]"}]}], ")"}], "[",
- RowBox[{"6", ",", "\[Theta]"}], "]"}], "]"}]}], ",",
- RowBox[{"{",
- RowBox[{"\[Theta]", ",", "0", ",", "1.1483"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.857752199377262*^9, 3.8577522658207273`*^9}, {
- 3.857752372693047*^9, 3.857752372913364*^9}, {3.857752403756793*^9,
- 3.857752444697954*^9}, {3.857752478098198*^9, 3.857752537396385*^9},
- 3.857752575268834*^9, {3.857753034125165*^9, 3.857753035115671*^9}, {
- 3.857792145892029*^9, 3.857792151035262*^9}, {3.857793200326879*^9,
- 3.857793202743438*^9}, {3.871622315917389*^9, 3.8716223509177313`*^9}},
- CellLabel->"In[17]:=",ExpressionUUID->"59d7c94c-1b16-401f-9f76-aee317437f4b"],
+ RowBox[{"-",
+ RowBox[{"Re", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Evaluate", "[",
+ RowBox[{"DufDut", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "2", "]"}], "]"}]}], "]"}], "[", "2", "]"}],
+ "@@",
+ RowBox[{
+ RowBox[{"InverseCoordinates", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"t", ",",
+ RowBox[{"1", "/", "10000"}]}], "]"}]}], "]"}]}], ",",
+ "\[IndentingNewLine]",
+ RowBox[{"-",
+ RowBox[{"Re", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Evaluate", "[",
+ RowBox[{"DufDut", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], "]"}], "[", "2", "]"}],
+ "@@",
+ RowBox[{
+ RowBox[{"InverseCoordinates", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
+ RowBox[{"t", ",",
+ RowBox[{"1", "/", "10000"}]}], "]"}]}], "]"}]}]}],
+ "\[IndentingNewLine]", "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"t", ",",
+ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",",
+ RowBox[{"PlotRange", "->", "All"}], ",",
+ RowBox[{"Exclusions", "->", "None"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.871624380395876*^9, 3.871624486365077*^9}, {
+ 3.871628883904001*^9, 3.871628909432775*^9}, {3.871629457267346*^9,
+ 3.871629525012162*^9}, {3.8716296135256433`*^9, 3.871629703591056*^9}, {
+ 3.8716297390329103`*^9, 3.871629853114192*^9}, {3.8716298958192244`*^9,
+ 3.8716299139879017`*^9}, {3.871629944204525*^9, 3.871629952700124*^9}, {
+ 3.871630090583139*^9, 3.871630094694592*^9}, {3.8716301742008753`*^9,
+ 3.8716302000245533`*^9}, {3.871630243281377*^9, 3.871630253377584*^9},
+ 3.8716304265249653`*^9, {3.871631246388459*^9, 3.8716313024379177`*^9}, {
+ 3.871631382016287*^9, 3.871631383422778*^9}, {3.871633017182467*^9,
+ 3.8716330172537737`*^9}, {3.87223244386093*^9, 3.872232463125258*^9}, {
+ 3.872232659147134*^9, 3.872232720226219*^9}, {3.872232925175202*^9,
+ 3.872232941062345*^9}, {3.87282774234025*^9, 3.872827744082013*^9}, {
+ 3.8759514937750607`*^9, 3.875951563008548*^9}, {3.875951848422546*^9,
+ 3.875951850621904*^9}},
+ CellLabel->"In[18]:=",ExpressionUUID->"8d8879fb-c6bb-4b5b-a028-bc28257684bb"],
Cell[BoxData[
GraphicsBox[{{{}, {},
TagBox[
{RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
1.], LineBox[CompressedData["
-1:eJwVWGk4lV0UJTJEoYyFJCIkXGW++8qQ8fIpUqGUKClEQhlSSRSFZCizMkdl
-yPC+ZhIyT0nm8ZrHS/Sdfnn2s897zlprr73PuQ5dcTS5toOGhoaNjobm39+L
-ync3so6eJ3JwtMi03G0onl0nudNyKYA1S37ZpYiUUnr6UZEfnKdhbnZ2uO1j
-bWlddXtNsNF/kH85SFfgSF9pCLPCZh7nOdCLW95YZ5gqNTOMOv6rxwJGFIMN
-aDeWS4PrtmT9jKyB4aJT/RWav6XOU9INXHI2wJp/OVc1fCd2lvWybRqnHURH
-8XXmlbNiCtKvaNTWbsBmMpvjs4C92H7jiujmHge0/5d99lo82JbzkrxNiSP0
-/9ribo7hx+Z1Q8fvGzmjfPIfLp1D2FBv+pfqsjvQJrb19lmYCNZ+s/Ihm5wr
-2t9DNklOHKv585N8Puku+v7ddK+YFFbwYvlAEuc9uJgz6jioLIOlCu6epDxx
-h+DhdaPHIXJY9EfR/JNrHrCie1BfZd8J7DmJ+Mj3+v1/eoR61ipg3i1mxvU9
-D2AqjNhSnaWMOV1xFODU94YKbqlXObVqmPXS0ynLEh+0XtrQMYiEJQZaVLgb
-PQSl4MPGS8c0sQNtE6kCTH6Qu5NlKUtCGws/cDekoswPHh3jLUrR0sGeZL6w
-YJV7DClG+/ec7jXAtpf5NHKnHgMqXQ2dmRHmpvb+qFnSE5gMs9q1d8MYu96E
-rcZxPgVhYeFulqYz2CC3/i/Nxqfo/KYq4bOm2IVLXZWTTwKQvh/ZambMMP35
-uZeEtWdQUnxxUM3qAlal+OBe98dAaGxgrbp60gJTfchk5XU9CBzK3UoKRaww
-6b2HJGt7niN/aItdOWyNfbiQxeEQ+gJgcklqXe0KJpSktM6uH4zweEsduHYV
-45A3qb5QEoL0vSsT0XsN20gvP37P6BXCtwj4rZvYyR+MSd8yXgGPA60e67oD
-5rJkyM3PFAoCta/GVEJvYxSV3j9lZaHovPcPWf44YeKXhZz2CYSB8YbNqvmQ
-M3btse3wNY+wf3m+py13sP6GxW+75MIhfvnGJd/vrtj+BUU1y+BwyEifCvne
-eRc7x+WT83EqHPE54r827YY1W7K8OZv0GsxMX9NtyXtg5bOHbWI538CzgFQ5
-TV1v7E/PctcX9zcg7vVp8co3H+xkdbX+9743cIff6OHPDF8sPcaOsJ4cifgS
-I9SM/bARf8UPe5ijkL+dTnQee4QdvMN8QPRWFMr3x+jte4yF62TsMDkRjfxK
-7x68+gRrIjxwux4VjfxSolK57I8xHzSc8t6KRnxOWsZuPsW8V2ZbMqpjoNb5
-rTOvSCB2PVEuYafZOwgn6prMjgZjiS/ouPiL3oF0t55mKM9L7Jd7e4CcYCzy
-z8T0ufKXmImRm9OlsVjUfzT720RCMcHtvjgLlXjEf+zae+nXWLFLdY/drXik
-v3Vh7t/XmPlk1j6XuHjET+FCY2cEFtbu/fQZXcI/fZYz3kRiTBlCjvnfE5C+
-SjwGdm+xFCHmtPKthH/9oCjo8A47FbEw1HA8EeF3M1y4F4t5PawwGw5L/NdP
-jwJN4rHFczZEdoskVN+WgPOZiVhIo4H7geAkNE8yhN0MkjApjROfjpQlgZ1t
-LGPIfBJmJ81wRE0kGfFVJyxrpmB99Km77SnJwMHhYXpKKBXz8Hx5+q5gCtKT
-33JtMBXjnnd/6GucguplPymamob991N3JeJLCvI7CEifysBqcqf7Kh+8R/rQ
-vInLzsY+Wh3PFNidivinFGmrfMby01Knu1RSkf95A5yLPmMly4ckQ+1TkX+2
-z2+ofMHqAjnTGer+5XVEiNp52EA+9cOcXxo6T44q716AjdG6jKflpqF6Pa9b
-3VWIUQwoR2wG0hA/hR9a8YUYdag/pVstHfFJ0Ets/YrtZatKKl9PR+sNkhbM
-SjDeC2rD98UykJ6CYkXbJZhgSr7wSbMMVC8GHtW0UkxSJS0h/XMG0ieY9JAB
-xzTtguPCbmeiesWIGC+UYW64ecy1kSz0vf3jr3ursAe7WnsP7stG/th1LtSr
-CvMz1d/fq56N+Ds0zUxWYcHTalHkuGzkvwFcvrYa+8Bz+I3ChY+Ij0mqYngt
-Rilw+0Z/PQe6/dJuxXl8xxwtCZPWPjlI/y3H+1vfscUd80x4RA6aX29ylv0a
-sHXDGzoe1TmoP8tyKkMbsZ0jF2tnhHMR3ogvC9U/MEF29erOX7lIv/7ZZLVW
-LHso+BW2nIv86csoGtSKQV6f5XuWT2ieKNg497Rily+4r95V+oT4MZ5wdG/D
-kpI/inG9/hcTrv3F2zFxJcHAMwaf0TxRzTO724XJXdkkNxd9QfO6QPGg2y+s
-Ql73QGHLFzRvWewT+n5hZxjfjMdNfIEeP8PwAY1+zDVTzteROw9Chq/rvOL8
-jRWs3sjdcycPzauvfw0uDWCqQd37DI/mo/1YHJn3D2FaX/K6v70pQPNSnd+o
-YRSLUDySkphTgObFg1ButjFsrCTC+f63AjSfldckTMYw/+p7u45tFiC8j2YI
-PWNYTaeS6kurQqTH0MWIqXHsNLU0zkz0K7ov9Ur/8k5husQa2+FPRWjeb1Pz
-Xs9i0RUnCSXfi9B9NTmv2T+LTWl/+Bs+UoTqwxDy88gcFmgUEKnNXYzwH+nh
-LJzD6i/r1ad5FKN+VSmSvzWP6T9qOuZEKkH1ONTKELyAGdZ1Lv9pLP03jz+G
-YUuYSQGb5rHRUuTHW8XC/UuY2XudMMs/pQjPgysBW0vY5cdFspgEhuZZhXOL
-yjJ2hxR72+cphtYfCDiev4xFFF6boFXHkb8FVIriV7DoD7EKcuY48sPa9bWS
-FSwuosv/iiOO8FLyF7pXsFRXXdHKd//yLlRu9lWsWObYlccbOOJ3/sGy5yrm
-dHbjFt2FMsS/qcNNfQ1b/B7xOuZaGfKLtGmB+RrmqkEoJTiXIf+yb0c6rmEe
-cg6sNgFlaN7EP1R8u4b5sfenV+WXoX4da/8yv4bRB3i2WlSUIfythO/069jT
-v9wby41lCG/ckgvvOvZ81khXdLQM8Xm3+y5xHXvdUD7+ZF856jf+EJon6xiv
-phWb4MFyNF9mR11fr2PRxRsn8yXKUT/ZX3ZIWcdi0wn+Y+rlSM+CHb8q1zEh
-4eYsb8Ny9P6YO23Suo4lRTl0cJ//93369KmBdSw1IEXktFM5wvPSI3hjHZOg
-OWXw+3454ltyd5SBimXe63e597Qc4Xm0/HEvFcu15an8EFuO/OIf8kacisn3
-f56C9HLwan30OUeOiuWbGu/tzitH/Zt944QqFSvSfGbN1FiO3iN6IR6GVIyf
-S4E5quff+rDkNlMq5j06knN0rBzpqdhw15KKDeSFmhct/uN71s3Shoqd8ifR
-6P8tR/X4zBFgT8WSzWY//GSpQP4dZ1lypGIMYm+NHHgr0Pw3bIlxpWLX13TX
-/ohUoPl5tNHHnYrV167FvpCtQOd9uPH2PhWTikzRFiRWoP032Oa8qFjw9TOz
-2XoViL+5+F0fKjavSBsB5yqQP/bvl/KlYibMH9War/77HtfnQPGXHovRy04V
-4H6P+bAwWs+dvuvFwoN/8Sa9BdrP3bNQ3u9ZBeKzblriScV+6tn27Y2oQPyb
-PEj3qBjxAOfjpMQKdN+Uto3eoWLx0+WS8h8rQEszsibtFhXbUeLYVlX87/yy
-L8/sqJjNc4H7pnUVyD86NI8uU7Eai+/CY+0VqH7ru8LMqZj4MY96t8EKVB/r
-kwVGVCxw68gdxtkKNB+nhylaVIzS2M4XufFPn2lXWRUqRo71KxdnrET8P+n5
-HadiObdlbnzdV4nyYTV9wlRsL/Sz6wlVonlKq0fkomKubM8Le6Uq0f5vTiYj
-P3T+Vrp8U6kSCITjsyxr65hizjjjH61KpPd0652xdeyPscY5gUuVqJ/UsgkV
-65jVoYXtrJuViL/UzYDsdaxsIfY90b0S3S97h1qi1rHHoRsrl15VovnQ81Lx
-1jo2diX13fy7f/k94cam65gOwUzrYXol8i/zhInqOsbanhueWFmJ5uspYVbG
-dex28iVVQvO/8xZ6S6fWsGbX3SOVfZWonrbPjBrXsHCuG4TRlUqkb4M7U8ga
-xn9OqFVMvAr5J6w8gH4N8xZr8iiUr0J5evXF/lVsYO3+IV31KuQ3DlWxwlUs
-ObLLyf5CFaqHxZNJ21VMqjeYLet5Far3+ExA3goWnK5aoBZVhfqfvo7RfwWb
-95yyakqpQvWRYiearmBfDmhnz2FVCE8iS+3cMqZmuWUgt1D1z/8HGLiWsSNV
-S3oBW1VofuPdu/uWsD2SUzr9zNXovuERrUlYwgbWOzUDhatR/p41HF3CHofn
-qA6dqUbzX6uES3wRu7X5XlnxcjXa/7r81ZEFzOzKO8Vgh2rE75mTUdwCJiYT
-KK/8pBrp99/TTfYFrP77VanQ/GpUfyvdhpo57LPcBYmJimpU/xfKP8XnsLdR
-xuLEH9WoXrGpOwNmsVt2aiJT49VI7w33t2ozGDsdD/8pvhrkj/K1S0+mMDPl
-epbF+zVo/nTa1z0awSChjFknoAbps9T8MW8YE2cqYIwNr0HvzXxl15EhjNqR
-RKeXVYPup+TkJ4qD2Ftnr82E/hrE7+e5H64/seFUmen/1GvRfKm5WhJQhzWw
-iU1+MKxF+w99OvywCvviJjC+db4W3c/NLkcdyjB/zV3DaXdq0bxd5Ssn5GAS
-A8O9tMm1aH71YsEXPhGdeN7U5zLUITx4HibWRfz8eeEZYW8d+v0V9Wfxdg9x
-1chAN0+gDvVrpr5GyU/igwDaukL5OtDUHDBOkh8gBlBvVuNX6pA+uUffMYwS
-E36SyhqxOlSfNoU2mCOO3IvxMaqv+/eeNw/UmyeKc64SWzrq0PyL9cRW54nZ
-Bhml7ZS6f+87k+Ezi8SiUq7in/u//fs9OS99aIXYGjeVN+n2DelZIKLEtEnk
-UtW6e9PvG+Kjt2rQsEk0746Tn3nxDemTR9589YfYz276eT75G7rPM6PEhbeJ
-Uw/xnLXWb0ivIGw0nQZ22IRn7Dxej/Tx0hTbSQ8EcWLCofF6hD++bv0MC5gJ
-pA/ELNWjflY7KtXLAu57uYW4ab6j/qmmM7JmBezPTOwuvu9oflj/sr6zG/Ra
-3r1d0vuO/MR27FMcG1z23HpTnf0d8Rt6brRvLzxvKAm+4daA+pfu6/g8N4w5
-qTzI3dkEccti7ttrQnA1hsXrHEcTXJS51swscggGqn96bfE3If8y6KgZH4Le
-/Q98dOWbUH00bx5IOwRNVSV+g1eaIH+gXirTQhgKeInPOMqawMvEwKi3/jAE
-lJEinD1/gPjWIXGu8iPAxXS4O/JeM9pPoHLmrxSEiKsU0422oHoc3tX7Sx58
-TzS/PzHdAm0fZqsEqPJw59S1ULuFFjB7PZJyjvMEmFmE3Pi+1YL4xDzI1DsB
-gi+HecK4W0FczXWsOf8EZK4FuQrrtIJXqM67gucnoa6m75h6Ris40AoKv5RS
-hKI2Zz6X3FZwL4h7NqOlCJkDDDtTClqhZHOQ7uQlRQjZkOljqmqFZ0yuDf6v
-FMFM+klgc18rmHWILwqsKMLI62Pjl/a0IfwnetsLlID2mne8t3Mb5IoO3dsU
-V4H459UO2vfaoNHhQ1yEmgoQv7Aq7fFqQ/4m0XGbqMADupiWdwFo/c4DdmWe
-KrCeULCjNK4NrL/fYS6pV4H5/nmbzcY2iJdPvbv3miqEMCjKVra1ITwvNpvv
-qYK0tM9WYE8b5NPcd3EMVAUHr90R+0eRs2cHpPQ/qsL4AYlapT9twHDf191t
-TRX6za8edZdoB55M2ZwrD9XAyzd9BWTaAW7oaNOGqgF/6kI548l2iOYL/Hw/
-UQ0urPlceKOO8kc9OOkq1aDj9dugfPN2mCO30pnuIEJDa8fMsn87MBQbMP7w
-IMLNDf6ikuftqB+WsnYHEGGXsI3/49B2cO9yNBCJIIKO86IgZ2w72L239uvO
-JUIVG5sxIa8dhBN1LczGiVBsoPPJebgdpgjlbHf1AOqFIrG8yXbUL3s32c4B
-dC+P11Pn2oG1MzP23lWA1bdPhx/+aQezvL61jPsAcjM1nKFcHSC/pHYzIQ1A
-vZz7UOeBDtgcGQiO/gJg/Nr22H7hDlBqGtGxwgFuqTFoJ0p3gPH+tXuaiGbq
-C617n053gFZVWPLjTYAC69ePVg07YOPLwaxrO0hQc2I0RPks+t7b8r8ZBhIM
-/3qcWnG5A7yGflNT2UiwmNv+hcGuA4I1ssv69pGAxl+kXO9WB8K3brrMQwJB
-6aqeVo8OpOeES9NBEhzbwTnG7dsBKT5Hyl8eJoFq59XFC/4dqF6ctifFSHDe
-m45lOBSdz8mjISlNgvCmU6pLGR3AsWB8rFCZBEmJoToKnzqg9lUzX6gaCT65
-DZ29X9gB/e+kvMgkEvwQ9LtFV90BF8tA7bYWCfoXWzxOf+8A4U8s11pOk4BS
-c8g/qKUDKtz6o7j1SLDLsTx2Xz/CR+2u1CaTgE+DI+PcCDrf1cxf1pgE4jzW
-BTFTHchvT+e3/iPByemcyt/zHcDzvGEy4wwJtHCa5sNrHajeredVTElwNsy4
-z24L5RtCxDPNSHDFLn4ig64T9Y8GcfscCZxV5pfnmDshX8bzkex5EviykWjl
-2TuBcJh5UOsCCf0OCdntzt2J9NlLUrlIgtiC33wl/J1AU0YXyGFBgsyg40do
-DnfCM/eI1DoUF1/ykdM82gnWQc1PLluSoJ7wgxhwHH0fQs/ag+JuxoP6DSc6
-4Q6lRVTOigTjP2+fY1fthOgbothNFK9+xK6ePdUJHIeUyp6geOfjPU6ROgjv
-idc8vijmNLd60EfuRL//2HIuoPiwVHaAkCk6L6bhLheK5Wi2w20udkK4FZjm
-oPPU2w0TUq07of/FURVJFBunvsui2HXChshbTn+E1+rBzFeZ253w6NZaUxni
-d8tYrcbVtRPNk+lzPxH/MsdcrxjPTjTPJnJ6kT57Q0RPVPh2gjvP7sEicxLY
-ZEdRJvw7Ic51vOs+0jO/cXcy2wuULzB6IoD0Zpp5ePFkWCfUPrzRE3eWBBdY
-V/daRnWCgF1S1Q5Ur229/ofpKZ3AMJ1x2N4I4bM3UWrJQPu1t3jcNiRB4rOa
-+bXcTqgYq5E8o0+C03XZl7QwhH+E42apNgmix4V5HKqQfs+Efp3SRH5ieNMU
-Wt+J+snJNVWdBC+1fNQGOjvh4kDI732qJBiyWVpm+IX2/+ITzadEAvnHdpnH
-hjuBh3Ve5+8JVJ8KowP35zrBbmzkP/vjJJAYqmxNWOkEh8Hl13OSJHhAqxhY
-t9kJwZVv48+Kk+AQSYjKxdQFtYMiA6VCJHC9hB5Ye7rQfrS0FfyoX72Zrl/l
-7IISyVtlKbwksC+d78wR6oLgMINVFnbUL8rlX/SVumDz8bN3yRsA9BdOONwB
-tF5FdjR5HsDMI+1wlFbXv/9njl8dA9goeBU69l8Xwpc2KtACoHHiitND+y4I
-32Zx800CiDjbKZbq1AVK0meV7r4BmHDR+93k1gUC45IW4kEAzz/JkfkfdaH3
-x3jsN2eA9uN0UgUxXWDGddB4TQXgiNG94V8JXRAfvk+j/xiA++3paPrULjQP
-wq88OgggkNXGbPKlC+Q/x/Ix7QCwlUgepzR0QU9iguRmJRHWRLSShLe7gMNZ
-jzVAhQirVjdVftN1w5SLZtULCRRHvmqLYe6G3Opd+hf4iLDM2k/HxdWN5rdC
-7+lVNVhcdrNhlOoGGl/x7LtZakCpShWlnO+G/Hha2cMcajC93VSaeqkbpCMz
-DaL+qMKU4orptWvd4K5QUNE5rgqTmer+/U7d//5fsfChVBXGwnvHmp92w0Wn
-Yz3JtqowYMOampfXDXPBq1e5s1Xgd6wc6U5xN5rnZYLMESrQ323eLV2O4vxf
-J6u8VOCXQQpTakM3ND7//SPMQAV65Yk3ooe7obZFdDl6XBna6Z0kfDh6IKO+
-mGqxTxm+Jbdl6tzqQe/TiWXbU4qgGLTjyUOXHugeYmJYE1KEVGdZyyKPHnSf
-/orT/asA/sSQ3VL+PWDs+YlfoVgBTnXr3WaL60H92yuiKKMAJSwVxzube0Dv
-YNXbzT0nIftOzqer8r3Q75XxYzaeAGGkF4Xem70Q3eP6YVJbCnLUbzsb0v5E
-7zkatfVZSWg4ZSTBz/gTHs3wr+RFSAK9Fsfbr3t/ovOUv5JGJcBN97XP8tGf
-6D4PFE/wPgrmJu+07c1/Ir2PnPmTeAT4bbLaTfN+gvvaX5qPeUKQ8rRxXsqx
-D/FL2eR7QgMfpxQlp2n7gRBmMflA6Sj+SrBA+uyL37CiLh1MlVTB98jd+8wT
-9hvmIqRdci6r4IFaCoo/I3+DdeWV7LOvVfDHDgXqV5J/g/iKFYvNtgruVlRw
-1qn4N5ToO6RE/FDFLcwKPZ9PovWHXwnvuU3E99VaXB0SHgCl6JOXPzeQ8F/b
-lh/3+wyAwOZEaHGjBt5uVfFK2W8A7Mjlt9LGNPB67IjrhScDQBNe2+n3VwPP
-955TjA5C60+/rlyT0cRfbvtW8EUOwEVFQ5GxUE381HZSB2/uAJRc+v0o30QL
-f781uck9PADPaA7xqZZr428tyf0nxwagYnUTO9+ljYeWfiozm0TrDzq3W81o
-4z5e959EzA1Abt5WlyDfadx8i5WN+88AiIuS9ro4nsZ3bR0X5uIahKmPd4PO
-8Ojgt//c1dl3ehAYslTTlc7o4sU3CAe2dQfB/fjhXS02ujhT1/zMhMEgVEgb
-iBq76eIJuTfDMJNBGDHv19gZpYu321r337BC+/3uF9f9pYurtBi4lt1Feb8t
-c3FrPTyAuOt0hvsgiJ/rO0pw1sPbM2r5Iu4PwsoNPEnkoR5+2/8UfvPhIERT
-mc4Wx+vhiSqKu3heDILSwJuNvH49nOn94fhbyYPAI5f4ss1UHzfdN3jH/MMg
-cLx2o6rb6OOJvrFaGunovHkN0Yg7+rjqRb5p3pxBkH55IXQuWB93ZGc7WVWM
-9rsjaXOtRh/v9Nz4vr8N5UfZ/U1kDPAko5a1WtohcGes/D0xZ4CHDgkJJdMP
-gbTGxQ8VGwa4710nHV/GIfBy0Np6uNMQt4phi1LcPQSPwjwVc/cb4rzjhspp
-vEMgbKMg36JhiD/3rn8QeHwIHAIN6fe+MsQ9Ofan2MoNgbiZ0zf1aEP8RvKN
-xlMn0PcuY2VmSYa4dj2T4KbyENzRMjwhk2eI03Cfxm9qo+95tSriuwxx16xK
-WkPLIWDI0LG+y0PGr5D2SRy9PARtE3tfrQqS8f/arpjsvDoESmRZ3OIIGZem
-0iaVXh+CZ62Ne7rlyfiEJklT2nUIcscryIHGZLyzK8Rh1z2E9+p5DcI5Ml5t
-/zt8zGMI5Ou2JMotyXjiS+/RWJ8hCPmY2RxkT8Yt+kr82YKGgMcnx77Pj4zr
-ObJ+nH6B8NvnTWcGkHGlHRZdtS+RPtdEra4Ek3Fu8U0x3wiEz0aX70EUGW92
-Ufo2nzAE8e+o2/bZZBxjeLbQkDwEm6PJQlc/k/GsqG6+tA+IH91rFVIhGQ/E
-79lbZw2h+3T9alo5GddkyWdpLRwCM5FfeQptZNx+mfkspXgI8l95KOR0kfFX
-vyzfMuBDUHtteJupj4z3f9x5TKV6CMJNs25dHCHj9FHn75rWofXRrfymE2Rc
-0i+r1PE7wmNidOg4hYy7nzUlJ7cMwYoprerjJTIeq5YWgbWj+t97fvHvKtLn
-yFZ/d9cQsF7bP3xhg4zvpSY77u5H53WxwGcaI1xxaL1AbHAI9KT+E8yhM8Kt
-vhvQnBoZgqkEi/svGIzwjHfLL92mhqDEIblmksUIb/XX6Xk5g+KvuuXX9xjh
-645vD2XMD4FWib9JHbsRLnh+/kb10hBwzDM9ZNpnhGue0vz0e3UIKiazzhzl
-MsLtJSM3qNQhMD7+qEWCxwh/xUk5xbmF+HDV0O7mM8L7x8LadOiGQZjV/Y0L
-vxFO3zx+4CrDMEyRjFjXBYxwya8qNl7Mw/CM1cbE8qARbpIYkvmGdRgYTg04
-JwkZ4e5Bw8u5bOj7p/wu9YeM8FhXBbWGvcMgIBBv1SpshFdbBj0Z4xoGr1oh
-teLDRjhF+3cjDR+KA/14nogY4XtlCNwH+Idh5WXX6nFRpA/fU6sTB4fBffnS
-SDGKL+34+d5IeBi9z59Nih8xwv2npeduiA6Dw655tnsozmz3U3gsPgyPxCys
-36O4tbTTJ1ZyGHqEq8bzUUx9L1FXKD0MrCT9rFQUC730Zm+TReuT1Uvuo1jb
-o9V8Rn4Y2ggiB2VQ7HDlSAKj4jCUnHs7UI3OD9P3nDykMgzQ5sOihuIi+SZZ
-VSLiH9+c/hrhHxAQ9jRTHwbrzJJvPxA/Bka3CifNYdj8+s5lGvE/Nv9tV9Dp
-YeA4Tv08gfQ52yNwJkVvGPT6fCJqkX6eFc4xuCHC07dbLADpG59RPdxjPAwV
-xunOEoJGeG04n9TyGcRX86lfNqrPrNct1z3n0HnOtLacB4xwTrvyEvELCD9b
-vLgFqqeyMddODcthyP3E2fUE1dta6Yah5WVUj01l71fID9ksHP2vbFF9s/qm
-yBxGePuyzZHMG0gv8kA9DZsRvvmr8HaNA9I/MaU7nNUI18m5/HfjzjCIz+l/
-ucpohA+ezRGy8UHrnX4sv9sk41b6lud1/ZAetgJr0etkvE99V6j0k2GwozW9
-6r2C5oe0DR01EOH9y5u+PkvG65l4x15EIL5RMfolA2T89N8qQZco5Acyy9oM
-6seqFedz5m+R31heOzH0oP4f+l4nnIjWmyntoDST8U8lPhkFWUhfx+59QTgZ
-P/5ZauRtzjBIx15OWi4i45lpPfx+nxHeMXsHrXwy/j6CEGzwFfHnaxp6m0nG
-o53GnQarhqEWOz0jEknG/USMTrL0DcNc5uET79H8+rv/z+35fsRHliQYaEPG
-H3CkfegYHIaRaTEpMysy7ra9gy9+HNVj7uvy+//QfOnO35RfQnre3bkkpUDG
-TZ4LllvtGgGaj/eru7cM8R9+36kau0fgTn6El/aqIW7g4S53lH0EHj3ffend
-LJrntq1JS1wjsKl7c4jhtyGuTPL3Dzg0ArWXLjbVY4a48PKM/ifFEWi70xUr
-6mmId5HikjtURqD7w88iByd0f7ww3lonjsCKY+V/0baG+OqRz9mgNQLW9GLk
-NBNDvP68O0fjfyOg5JnIG3XUEHfGd3SN24+APFWDsaPVAC8L5Lki8A7tVzXM
-5rDPAL/bVVdEih+B3J/4XC6DAS4h4rnPJmkEjCWY7Qep+nh4aV9Vehrix1v/
-Zuu3Pn59PkFMMX8EHM5klh/L0MfZzaRmTH6MgJ3UUO9jNX380iF19wDaUXBQ
-2HeoyUQPzw97fOQd/SiU6BYWVWro4awMde25jKPQ6P1jzwd5Pbxoiiz7czfK
-P9Q1UeDWwzm/WEwd2z8KI4XJqg+7dfF6bXeLNrlRqGA1cW09r4vLO3wkCdqM
-Qr6IAruksQ7OVCDA/KVmFPUzn0ALhzZumqiWE+M9BnNMIVZ6Lup47AEXcxbt
-cXhU/vidsb4iHjQ1za1AMwHxNi82WrmO4SOHZpUK8yfQe1o94kouN0719bZq
-/joBdtoqL+mEuPE9A3seTZRMQHi28PO1YC5cKfZ4A2/lBGiOlCr03uLEg/c7
-W3n8mIAVPs/V18f34kr7lv2UJyZgat+FKj9/FjyYfuN7Cd8kCNRGShoWLmNK
-4zutyh9Mot/nUwsj+Tsh+czcnWSfSZgj94hJRDMAe1n306d+kyC+VXy86AEj
-TERm5BoGTMLKN/NjX4EZIvX+29kbNonwNtiIl7LCetbbzMX0SXCvtSktreeA
-fFfC5uGeSXgWqa7QYcELwoP87Ix9k2A8lUZoruCFYEMG0al+dJ60m89NcT6w
-PdJDzhlBeK77PPFb5AOubu9E1flJcPBQn5L2OwCuKvW6poxTILyLBbcLEQS5
-HdaR/iemgOftwvezMsLQWUVu/KA4BdG/aE7RWguD51PVHd9UpiD8wnq+yyth
-KGfldWA5NQW1Kb530xeEwZjnB7wkT4G0eDvR6uNhcJRSG4+ymwKBN7PjXQdF
-IdOM72RW1BRwjHL1TreLgTEf482mt1NA+PluUW9bDJZ/LsfNxU3BZqrwdUcx
-cVC1bmaWez8F4ta7bzJ5iMP3m09/5X+agrno1nFPvqMw5bvyuOw7wmNb63rV
-SALEMlra2ramwM68huFyiBQI3+el4jTTEM90jFX2oxTw618SzKSbhvDoBZcf
-TVLAPk25/ph5GkpqVZ+57j4GGxJM2/Jc09C4SMm8HHAMmtKJ4hFS08ifHGF1
-rtJQ5/nE0O/4NPTMB5S7vJKGSr2GO7flpkFL3maEkiUNhVPnS7UVp9F7NktO
-d0waEiTumqxpTIMXSVIq4+xxcE3PeGB+cRo6H6k/YuOUgdueiwmaVtPw/Bjj
-/S4hGbihp1QrYz0NPGfKmvyPyYDVVA0Hs900OBzLT4nRloHTEkPvv96ZhlPF
-5O7YezKwP523ZX/gNDCqzjZxdMhAWdoT0V+F05CfUO805CULFnFW8UXF07DM
-OCXt+lQW1sMVDkRiiE/wNeW5l7Ig4zvJfqZqGgjXfCwTkmQh3szwT92PaegV
-CWpfrZWFh3RcbV/GpsFDaLv8NqscCFJnDEMnp2E9cdeXKE45KJqtqXOkTENb
-e2RQNr8cLPa4YxKLiM/P8H0RUnJwJacvLX5rGnxzOFMs9eXglGWy73NOCkjH
-/FjseiwH/SZemzd4KMBzsZz3fZAceOqYuZ3eT4E9n1sarELl4BOByWGHEAX0
-3gWzvIyTg8O7HM65S1Jgc9WZf6lQDsr+araaSlMgXHNimhuXA4sVAUOCLAWe
-3XRPEq2Wg/CBH6dmT1IAbJfW6VrkgL6AIG1zCp1/sNCvelwO4jNZ09S1KMBh
-st2lPiMHqomjhw/qoLx0/520RTlwffGGr9eQArkskmnKW3IwcnWT3vg8wqvD
-c8OWgwDV7JU/VZwoYDzHPDlzggDRFvFu51wQPsPUfG9lAtxO9eJwcaPAHDWL
-eZ1IAG6S4un0BxSgaez3TT5NAFvHrE+8zyhAONTvNXaOAMrFgYbyzylgfcCA
-VHqRAHsYr08YhVCA4VUUi9clAuTHCgs+fU2BWutPfwtsCcDQ9ObZSgIFghdk
-Tgi4EqCX764IRwoFxLuecBHvESD7mgkulYr2+7X0RMeTAGZbrCtXsymgdLb6
-4n5fAkjoToX45FIgjjV+eNCPANvhtRIxX1C8y48U9oQA76X8LrcWUeBi5C/s
-cyABPN0vbc6UIv75inSHXxCAXKUawVyO+GxYXnkQQoDVi2vfSbVIb7ZzBTNh
-BKj/0G5rUU8BAdk7zTsjCBC7lEvr3kiBiqFRPaZIAmgHOSh8bKOAuxElvSGG
-APu7dFvrO1G9Y8S+BL8jwKyw2K2xHlRPK1ZblTgCRBQNJgoMUMCrO4nFNJEA
-9gy4mtIw4jt48XBFEgGIJm+7z44hfIW1kvtTCDA2abbnOYUCKZVwLugDAYpO
-yKd9mKNAd0BabHIqAYIfcmhWLlJAmMHvYFoaAa40zvb3r1BA885eSmQ6AU7y
-NXhsrFMg3z6b2zWDALuupXFy/6HAo8rPucqZBOjP8f8o+5cCJUaBPygo/vTn
-qp7hjhkInkzyC8wigL+O+uj1nTPQxvfg175sAlwIF/R9zDQDHIcjFwNQLD2w
-uT+eZQY26/3bJ1G8Q6onr3jPDLCeHHh98iMBOu/lG3dxzIB0iZauI4rTK8Om
-FzlnoHbYmjYcxd5szv57eGegW3CiORnFJhfJhyQOzAADHl6fgOIjHyRLtARn
-gKZBijYIxRuLTOesD6H9mryeXkZxE3Fs4YHIv7ylkzCKEwMrn0eKoZg3o6kZ
-4XHrjBf7IjEDKQSDvJso1hP2rvhxDOGNPK6whPgJ3r5oOS3zD5++nR2KF78q
-rjPIz0BjVax5HdKjZid3mLAC+j5IWpAbxfNWBoLMyjOQQd8QZIX0PFDolzan
-OgO5Ci9sI5De2hxf5TthBhzebJSWono42c/hJafQ+tmEhHZUr+hKUf0kLcTv
-Bvehn6ie1fwWnc90ZqDfcl6/5T3yz486ihl5BuIKjYaeJxNAU/zvPbX/UCxy
-8JYJ8ofjwxN0ImdnQOD3+CAj8k8VIZFv4fwM8p903SnkL8fI+9pB12ZA/AQb
-aQP5M3oht8X5+gxUHGFsI71B6/UmLMxvou+ntxvvvUbnbZ11EXWegeg8dZWC
-VyhvLR2PP5gB4cSTH72eIf8W2Ui+90H1L5Yj6j4lAB9nTP5zP4SnT+HLTtRf
-t2sYG88HID2bRV7/h/qRV3KQuhQ2A0rZ2ZMn3Qhw6jHPk96IGTBLoHEKciHA
-rV+G7OVRCJ+osmWLEwEqQoqOBMfNQHh+QKbsTZRfDjsjnoHWNwoNaKF5UVGq
-nWVRgfTM6siu1yQAhdtLUaMa1et6opSaOgF4nD5XHq2bAb2/Q3sT1QjgICzU
-u9qIYker8xon0bx6SmV41YPw8baFjh4hwE3jzMvV8+g8f+Xf+TuRf/6OsUwt
-IT8uUIhUGgLIfDxUsGdtBghXd/dK/ZGD1d1vdptvzaB5Sc91Hc1T3+8Pi6aY
-Z6H79qd+mX40n7XPcbIfnkXvt9s1Ap/loER1R90FU5QvqvuxbILuG4qqi4/5
-LEzOjd3zN5CDhzH3BJMvzoJAlzuFRVsOtDcorjPWs5DL4f58UVEOmgu6Dvne
-noXw2ahBGUE0r+Wy7qc8RfmdDAmPxmSB9aj58fmvs2Ad9zxgj6MssG+LyDCU
-zqJ6UW2v2ckCZ9uCDH/ZLLgr3Jz9dEkWBLyC5HRqZsG4iEtDzlgWpFuwE/Gt
-CN8Ojd1VMrJg5CGqajw9C2Bdbak5LwOh3xZ1cvjnoP+JooHiDRngs39xxcln
-DkLaAhOyXkjDNRo6s84D8yBs4ofvWT4KxXv17hf6zEMwna9vcYMIDP/4lLHe
-Nw+PXnRhXVJCoK5+Ofiq4gJwtNwXDDyA3nvCM7rzSgugtGeVlmODB+jpPHd6
-qSyAsXKlZFY3D9RUhT2IIC5ARjp/lGgEDxjo1Np/01wAhgNEnHcvD5gbSZ8+
-/t8CBA/3feXeww2Oln/+btxA+7+iv/yTmxPeeUQ6h8YsoPe53pjybXaQGPwv
-hf7dAtJPW/nCWXbI12HpcYtdQPoMpwYrs0MzjzfpYsICTLY1TJ5kZIcd+VfZ
-RD4sgJ1twuYuDTa4viidlfdpAbr9fmuofdkN8jerJ7q/LUB0lKFQTv4uKG/1
-5tf/vgBTYf0rGgG7gKysaFzasACNDVo1Oy7sAjvmjIKEHwvoPfzoMu02M0R/
-eOlv37EA0t0hmTt0mIFm5KLIn4EFgElRN+4RRvhusXjp4Pq/9dJrXqo7wW0y
-IaGEugA0vt1zWXt2gpDbf8PnNxfgogyH/r5BenANybEN31749/5m8/anB8GK
-27eYdy6C3kEh5rY2OrgjNu25xLGI9JB/5eK+A3gXh1/XSi5C/mUHSlDrX2KF
-d1iXzbFFcL+HSQk9/ku8xaLBt+P4IvT/qnTlP4nyIolvVeUWQZ7QE2sQs010
-OHc5KVdxEbQ0VVqf2m8R8ZK+nBitf98fLNPn3yTa6yIbn14E4429FcbtG0TO
-ThX5Tp1FpOfBt8XPN4jX56IL2A0WoYLbUKVim0rcK3wee2KyiPRbwoLH14kl
-2Uw0h88uwtwskyCWuE60UylULzNdhEfHgveYWKH8WZ7qDfNF2Ez+sfa+c41o
-O1jDEHlhEdXXIsoubI3IcdtN54TFv/VUgefGa8SSDdHAVstF5Ltlc849aP3T
-ju+OlxaRv0QFaBpWif8DvBoyLQ==
+1:eJwtWHk01f/z5oaEskRZQ1eSUPZCvd6SJEslqSgVkqKSLVnLvrXYRT5CWUOW
+bGHetixX9uteS7ZrJ9m3yLffOb+/5jxnnj9mzpk58zwjavbE4B6Bjo5uDz0d
+3f9F93G9he1tIs7Yd6ej6RYNxlz3LfduEvGBs8Y76f5hfY6B1aJ1Im5tShSQ
+v0kDkZO2W08WifgR4c2hGGMaVAWFMQ+OEfGpo5nTZtdowCxDOYD/IOJrp1nG
+5i7RIMLhjs6LOCI+qCAqs6RBg0x6+490ykS8QAf/GnmEBoz3tOT4bh3Epzx6
+k7xmh2EvtdYmKVQUvx8WzdhRMAwG1bHmRxpF8NcxO0uzng+D6+9TNm9pwvhp
+2WviV5WGofhZ7MOciwfwjgCvXumlIdAPuyry950gzhd4Vtc1bQi04sv1z8/w
+4+amj758uDEEKXXPu+xN+PBELtH7XqxDYOoTwdOSth/3VdieEs8dBI87O7JZ
+9+7Doy8/M6wwGgQ6aWHQ8OXGAzIGGSV+D0BP8Dv/TDIXrsSOD8axD4Agi1X6
+0hlOXI236auMVD9YK0oy9gqy4+4R42hF8CeYK/enVVez4vMFokk8S70g6ayy
+/fgjM84eNXt7u6wHEn9eqXmuzoj736x87anaDXIjchudCow4/c6htMeK3VAz
+xXn8uAQjfprKJmZ8rBvGVlvixvYw4uOaUlLixG6Q5NK1v9LHgEcTtJnDWLoh
+79zZg9LPGPBOO4M/BVQq1OQovBj8vAMvWTA2Z7KjwvhLHjUtXgLuGzC6kBlN
+ARb3nN/hLARcZPly/sIbCsg4aycPbtLj3NaECPkACjg9dmdxGaLHIzLOhCU7
+U4DJZJT6OYMet9A+6aV6gwJiCl8duU7R48bk2okzfBQwGzPM+XmXDn/Z1Uqy
+iugCv6FZM0lDOvzMcL73YHAXZPQF7Ht2jg731R9hv+zdBQvtZe4cR+nwtvUc
+B0G7LiB4asf4TWzDj74iHpOLXYBkJ9su796G+qFjz22Yu6A0UkJzwmgLuLCe
+JA8HMjCbjJvTq23BjTfH7xGtyWAkkuLFL7oF1dbW/nCXDAsZRFx3ehOKcoMy
+f+qT4Qh+QDXXcxP89RzSciTIEDPFLeuS9gccpGcD43o6wRHRC7FtrINBwsdp
+DuVOqGLAVQ8NrIN1osUfD6lO4Gj0MD5dsw6FD4t2Dot2wmfDzWjb1+vAeSyh
+xI+tE0YerHKRD65DQwvPtNZQBxhE/GL+T2cNHLR2NIYHdMDxye6lY/Er4Ms4
+0xv6ox0c5qSP7PdZgbfU6KxTVe1QvPry1t+HK9C8FkHpK2wHdSbJ700nVqAg
+N6RqKaEdDIgu0Q86l4Gu0LDS/2k7ON7iV0lmXQY8rtFRmKsdStuMPfe5LAJ1
+RsZX/Hwb/KVm52/dWYTArImdf1Xa4MwgYWJEaxFK/EUda6TbgDSbcSmfZxFi
+ZZluCu1tgz7WP6KXchdg7rjYxY2+VtjWjKsJnJiHinq/BcVHrXC2tHfXltEc
+1Oct0u5sNkN2xqeTdapzIJjyinStpxl44548CBWZg2wbHSee4mboWmUK0+n8
+Da/XJVmG7ZrhkKsRR/zGLNS7JW+nj/6AqpfLbJjWL6ArS/BVhCaIMgu06eT4
+BXUKQj4K75rggYZQk1XPDARfC9k/Y9cEHIyawaGPZkBP+VX5i0NNcDsgYhct
+fBq0BC2mRfxJsPlanslvcBLSszytpVUbofVJ3T3+jEngrqm7IsHRCMmXTGqz
+7SeBc8s+sW6kAS5weftQmCbhiOf9U79CGuBdZDvhiPQEhErLTqRQ60Hp/dNt
+0vMxuBfp9EH9Zh3Ypuesce6lgdBVgqwXQw0c3/PY+8zgMHAWlLAt/6iGeTup
+PfZZwyD6NlqrM6oa7NTSiZ1aw2AstesgSbwaHFuS9KPchiA0kvuuKqqCxamj
+2opNAzD22JL1uz4ODgVpplGWA3D5SWGa+m4cVtwPOazSDUA7w5fSlkiANQ7h
+hBLFfrDVUUpV9a+ATSWu5VMJfUC1qTNgNywDJu+1D+fsuuHFRI/OjcAi8Nd1
+LExl6wa9R6li10cLgXnfAok5lQry+64eLD5dCCzp0yuNvRRozFLQ1pgsAPaW
+ft2Lml3Qe/hMdi9/HryNMTH7MkAGX80eO3Q7F7jMqM84XciAu+rJy3/4AtzL
+bUkd2Z0g4HI7NEgmG3gFateu8XZAVWNx2lpmKrwbUd9TktcOOpomd1KWPwF/
+dgWRX68dTrx8qjql+BGE1Iv1+162gVrj6hvfmA+g0WykXdnVAoX+Prb7ckPh
+3N1LDt6sLeDB0FurIR4M55e0EzSxZlC5L8GQlu8FuvynlhvSm+DTl+GQ3DF1
+MLIkJra7NUDs1AHOB9FhKOipfUDY13rg0uUdDEmJRuVu1U8MZuuAOrn4TW/g
+PRILNz/dfvs7KI1k2/rPJKPr/+UfCoupBXodgvzZ1hQUnL5jt0FbDWh/Cy8w
+bElHC5Dc23amGugjXHJ5uL8gcdJiVahrFciVXHN+UZ2LbnRpZFwuqIRI478B
+ub75CJ+hObcdwiHESz4lXrsITfy+jx8sr4CuO+XV6RdL0EUm5jdJMuWgb83C
+jD39hg7In5dK4iyF/9I5K9RYcOSrPbEh6l0MOU61ShcuVqKZ2wENiUuF0Hsp
+KqM5owpdcZKIEbX8Cu1IWMFcpAaVhtRbJlLyQaVj+X5mQS0STbZSFNXOgxN8
+85S2R3UooISZIbH0C1T/SjpsbNiA+hMuf1K/ng1WbOFOMQ4klNUUekZdNROm
+djxIchv6gVzX2wawA2mgsJDOQbzVirTFudwx+k8gpD3K4CbQjvZfMeDHRhKB
+9Klh6rFZJyJtiz3xfB0P0sqZ21FJFGR141O6h2E0tIaH1kBWH2LIPzTizh8K
+Qh/Vno+uDSGMT/fUBu4LIdtG43juCJqLeWcx/84O+rwUlKnNNORGiKg9d+IG
+Gpe5leKhMYRkYs3ruJU80U3W1zXiUz9RP1/uLCt7CLrEHH65SrcHXZGnlvmp
+R6Bu8gyHsCMFFXZf8/J3jUXJnjlaqRJktBufJtYYf0AVVHHnHagDofBMv5pn
+yeiHec5ifnwbemppPVkTkYJ8Go1xFvlWlHTyqG5tbjpijvjvdcXoD9TJNp1d
+2/wZRecd4hVJJyGmwQzO79M56Eqhr9775Ab0/oaiirnPvzlw9kspI9UhRY1I
+axpX/r98dMBp/u+oWWr5vXliAfrruB5uH1iD6Oi+bptXFCGg3ntfXlyJ3k1y
+y47oliATY+vto3Y4kutwMLPoLUW6Vxk2LrhXIIsUhVqLtXKU7/cq256zFG29
+iVgZ8QN0WSaJVYypGJHUNsLzgnBEnLvmkrq3EFmIG9fK8VWhkA3foBe2eei4
+AEu/3WAVKuJ66SpT9gVtsZeu5KVWI8N+yc4IuWwUtc4nIa9Ui6Zops9PMqah
+uqbuIPkr9Ui665Ujd/s7ZOXcU2dytAExEv3mW7QiELNYL4PPjkYUubK2j4P6
+Cl1w7fPozCchvmnZfUVtdqjpyICdI3cL0pSW9Fr/Eww25IGc+JkWxKi3JZl0
+Iwz8MNsVM7NWJHe4kqQVEwWHZ2zlg1XaUO3b62tXa/4DKw27rN6pdpSawuAn
+tpUCJ94tkH4bdSDHdarlj/o0YP5tN7WjugORYgNr3wZlQHqs/WGpuE4kqKrK
+xrqQBVPzDoluOl3oK68AuEjngc2HZ5FCn7tR0cIpZ5HpIlBbWc2X5e1BHwKW
+x3gji4FN17ld06cHXdg/cuy6WglkrTqzP77Zi5r71aUJ3qUwq+8SWMH2E1li
+PTtkFsug2KOiIkdpEAmEzdg2FeLwIf3vjxKbQfQt8ESM8gYOAZ2nf1YnDSLX
+yJXo72qVcF0S/lD2DCH6fC5eS6iEdTKcoBsfQukP1Kgnv1WBinRl3qVoGgpe
+8keC/1ZGsbMrqqKBhp4ZyDVo1P67N64zLlKbNHTKglVqfK0GxBv2azDfHUGE
+359rM01rYe+9xx0gOYoio3LkbcW+w8x7gSWZijE00y2i1RJbBwlsToq7RydR
+yUvDcGfUCLH5wXyu+6eQ1LWk5T+WjRBlnLg1oT2F7tJP6si/boSQtKbamuwp
+xGNJvlbV2wjOZ4lGbs7TiEx2EX9hTwIDt1anadZfqPRVcfqNqCYgOPH0WfDN
+oS1ymalnTjMY38loL1aYQ6EZetrLbc2QdwE1sF2aQz6/NnVll5rBTPhBYYHf
+HAro25f4V7kFqurL3jIszSGJA/3FhPIW8Baw0PzYPI94vu4pSzZtBYbKvGya
+9yIaWPMOtdVrg5uZWp+UExZRu1jt13STNiiI7IsLLl1EnkLf+VoetIHFQ6ZA
++flFpLn7lsuAbxvU7jU29zZdQozn994WLG8DP0t6XuLJZWQzoygkJ9EOO9ku
+vTSbXUES5c+tdiy0w/XDxrjSrlVkwrDGNL7VDhlnLLZZxFbRzlRdctmuDtB/
+7uyef2MVVR2jvECiHRA19uE5Q+0qetqh/+zjxQ4Qr5x/mhK3hviM478wZXSA
+plO42dT5DdSdOD42frUTvAe7NOySt5Aw4bg54Q0Z+kt0HjmXbaGIgHiNmGgy
+qITjUR7kLRRr9fmX+AcyzGlmTAbt/ItOug40y+SSwTTT/U2y9V904I4Nx1T7
+P76TWG+n/DbCBXIDeHm6YJ3xZImAGR3mXm+SnPBPj3+J87vksUCP3Riu0DD1
+ogBpr984Ox0BiwrWKtwTRIGxYF+PxN0E7Prw2dsloRQQdPP5XCNBwIL0zz/b
++kCBgJtezKy3CVj3ymiWOlDgjpAHHk0iYHubj9pUblCAI8HxeO7HHdjIoftX
+Ox9R4UmSBceIESMmMdDnVKfZDaYPY4X8XzJjslV2Am+yeyDwstNJ+fes2G3X
+c1GvRnuBgTtyzHNjDxZM3RnwlfMnUEi+cz7snFjWk8fsmbv74aqrmVJsNRd2
+vD5Akcw4ADas0webjbkx69qSJPqeARDO/B7FNMWDffu8uYn0BsG1WOMKe9x+
+rNxf96Vs9iDYptgUKh3jw+ieK6zHEIaAjaBsJjPKj1neu+ehfX0INB8ZRkqG
+C2LK7GaVZ1OHgLdE6Imm2AHshJXVr58zQxBmFxB6nCKMCUu+e2ai8M+f+l2U
+ji8UwVRfmg+W2Q+DpInP1Y/uolilBV80Q84wdI3tSgq/ehDTEJxPt5kZhmaz
+UXUuYSL2UT3srgqRBkMMqWuRB4kYN54/e0SMBkspVjl84kSs5mf3Rb5DNOCb
+nhYUlSZijG4Or1fFaWBhv7B6TJWIGa59/JsrSYMN7+0svWtETIJEKz4gRwPx
+T3z8gW+IWMO5OAIVo8FJrd5WtnAituvPjEyVOg10J9/7v40iYmVMyrKfz9Dg
+qbTIcnQ8Eet+OFfkeZYGZV/FW1MyidjUq/ctYudpYPBd3q+mjojRKQ4p3L9I
+g3tWy2rnSUTsDF1xnf4/f+/MUrRIaiZi2e8dZJUu0yBeX+VuB/lff+HdgQxX
+aDDRhakN04iYW8fExQSjf/U6ExbvjROxPcU+cb7XaLBboCZ9coqIZai4VFhf
+p4Hcba398/NEbP+TzCBlYxpo0u9qdlgmYj7FOxSETGhwPbnRZ22NiJ1qmS0g
+3KTBQ80QVbdNIqY847J74h/+/38GNo4Vnvpxiwb/A9Zg7FU=
"]]},
- Annotation[#, "Charting`Private`Tag$98991#1"]& ]}, {}},
+ Annotation[#, "Charting`Private`Tag$8675#1"]& ],
+ TagBox[
+ {RGBColor[0.880722, 0.611041, 0.142051], AbsoluteThickness[1.6], Opacity[
+ 1.], LineBox[CompressedData["
+1:eJwtWHc01v/75gkpyohCKnrkU0K2j6jXW0jKKLTQslIo2SVkr5a98pGRjOwt
+3G87ez08Zjwee2TPyLffOb+/7nOdc/9x3edc51z3dfEbPtc2IdDQ0BykpaH5
+v+k8obG0u0vE6Qcedjbdo8K40+HV/m0iPqSst5fmL9ZkHVov3CTi5veJRyUN
+qMAnZ7XzfJmInzmxTYnQo0KlfxDj8DgRnz6bNmN4mwqMouTjeDMR37i4f3zh
+OhVCbB9eexNNxIel+EVXlKiQRmuTSCNLxPOu4fmhZ6hAb6IqwX3vJD7t0h/v
+/msEDvXUWMQH8uOPg8LpO/NGQLsqyuhMAx/+PmJvSfrLEXCav2DxkXoCvyh+
+W/CmzAgUOUQ9zdQ6jnf6uveLrFBAM+gm359IXpzbT1ndKZkCqjFlmldmeXCj
++5ZZn+9SIKnuZbeNPjcex87/2J2JAvc9Qzhbk4/gXlK704LZw+DycE8G06HD
+ePgNB93yW8NAI3IClLw4cN/UYfrT80PQFxDpk9bFjsuw4MPRLEPAu98sZeUS
+G67A1ZQvKvwTzKWF6Pt5WXDnkAm0xjsIRrI/k6uqmPDFPP54zpV+EHI8v/ss
+kRFnCfv1YLe0D+IGdapfKtLjPgYV713le0FiVGKLJEWP0+6lJD+T7oXqaTYx
+sdP0+MUeZgG9c70wvt4aPX6QHp9QERYWJPaCELu6jc4AHR5OUGMM2t8LOZeV
+T4o40OEka+3feT09UJ0p9Wb42x68eEnPiMG6BybcOBVUuQi4l+/YUlo4GfY7
+Z84H7yfgfKs3cpc+kEHUUS1heJsW5zAnhEj6ksH+mfP+VxRaPCT1UlCCIxkY
+9Md6vqXS4sZqcu7yd8kgIJVvx36BFtfrqpm8xE0Gw3HdzMFHNLhbd1ujWUg3
+eFN+GQrp0uCXRnI9hgO6IXXA97DDZRrcS3OU5YZHNyx1lDqznqXB2zczbXmt
+u4HgqhbhPbkLzQOFnPpa3YDEp9pvHNiFH5RzLy0Yu6Ek9LTK5K0dYMf64l1s
+u4BRf8KIVmEH7n4QMyGad8EtviR3Hv4dqDI394FHXbCUSsTVZ7ahMNs/bVCz
+C87gx+WzXbfBR8M2OfN0F0RMc4i/Sv4NtiK//KL7SGCHaI8xb22CdmziDKss
+CSrpcPlTQ5tgHmf820WYBKwNLnoXqzeh4Gnh3hF+EnzT3Q63er8JrOdii72Z
+STD6ZJ296+Qm1LdyzqhSOkE7ZI7xv2sbYKu6pyHYtxPEpnpXzsWsgSf9bH9g
+cwfYLoicOeK5Bh97wtMvVHZA0brbvT9P16BlI4Q8UNABigxCtU3/rkFu9tvK
+ldgO0Ca+Cn9CWoXdfN0KnxcdYHeP53wC0ypAdIPdCfYOKGnXcz38ahnIs6Je
+glfa4U9PRu7Ow2XwS5/c++d8O1waJkyOqi5DsQ+/XbVIOzT+Sr2ey7kMkeIM
+BscOtcMA02/+69lLMC8moLU10Aa7KtHVfpOLUPbDe0nasg2US/r37dxagKqc
+ZerD7RbISP0iVye/AEeS3jXe7msBrujnTwL5FiDF4po9Z1ELdK8zBF0jzYPv
+ptD+EesWOOV0izVm6xdUvE7YTRlrhkq3VWZMdQ5Wv8d6SUMThBn6WZBY5+C7
+1DFPqcgmeKJ0rMmsbxZcb789MmvdBKz0KgGBlrOAZN+VvTnVBA98Q/ZRg2dA
+htd4hs+nEbbfSzJ4D0/Bu3RXcxH5Bmh7XmfCkzoFa1V1OqdZGyDhun5Nhs0U
+LG7bxNWN1sNVdg9PMsMUMLg+vjD3th4iQzsIZ0QmwUhEfDKp5wfIfHqx2/hy
+HA6H2n9WNKgDq5TMDbZDVGDWJYi701WD2MFnHpeGR2Aqp5h5tbkKFq2FD9qk
+jwDlfbgqKawKrBVSiCTVERgR2neyUbAK7FrjNcNeU8ArmOORPKqE5emzatJN
+Q1D41JSpVhMH27zk+2GmQ1D0tCBZ8QAOa86nbNdphiB/K7OkNRRgg/VEbLH0
+TxBEMl/lfcphW4Z99ULsAFjo1Wmz6JYCg8fG58vWvUBT2nftrl8h+KjbFXxl
+7gUF+a8Cd8YKgPHwUiPj1x6oHNQ9WXSxAPanzKw19JMh0URKTWkqD1haf6pr
+qXTDXIZiRj9PDnyM0DfMGuoCvu+91uhBNrAb9jiwveqC3wPqkpKfs4BjtT2+
+M4ME06R7gf6iGcB1tGbjNlcnMDTlJ2+kfYXIUcWDxTl/dV11+2HS6hfgySgn
+8mh0wJyhpfy0dCIcUyzSHHBrh1mmpQ9eEZ9BqeWWWkV3K7zgsrQ6nB0Ilx9d
+t/VgagXDh/E1SoIBcGVFLVYFa4HeGOqe5Fx3UOe5sFqf0gTFmS+8s8cV4ZYp
+Ma7jdT2M/RvN9iQ8CPm/sPENyv8BJwXzh98mhaOy11XPtX/VgYnW91KNoU9I
+INjoYseDWriypfPCZzYB3fkv91RQRA0oBPVKKrcloYCUPQe026tBSDozX7c1
+BS1BQn/7pSqwMnHM4eTIQoKNy5WBTpUw4Jb98k1VNrrbrZR6I68CLIv6/bO9
+chE+S3VsP4WD2MJ0SoxaIZqcf4yfLCsHt6Xj9SlaxUiLgfFDvGgZXPz4mwV7
+8R0dl7wiHM9WAm/1tOoU9uPIS21yi9+jCNb1zVWualWg2Qe+9XErBXCty72y
+JbUS6difjuA3zYfd7QADI75qVPL2h2kcORc++m1lpOXVIP4EM2l+tRzwF7fW
+67CsQ77FjHRxJVmw3KgvoK9bj37G3viieCcDCua4XKNsG1F6U+AlRfk0UDDr
+IrpRmpHTZvsQdjwZRKvq3U/fa0NqguzOGO0X8LM2jPY/2oGO6GjzYKNx4HNy
+oibKkIQadwWeu76PAZ2Ory/PJJCR2d0vKS664WC+cf5TYuYAoss9NerMEwgn
+9q63RG9REMatfmEL94JPKk0e5zJH0UJEpPFipDX0LG0beDdS0WtCSM3lf++i
+j/0yyRHKFCQaZVTHIeOK1Fu0llVmB9FP7uxfTCxvkcaUG0eIRh/Skewp9VYM
+QX+036ub2ZFRQe9tdx+nKOTvUxNaeboLHcBniNV6n1E5+3juQdSJUHCad7VD
+ArrqaM1YHNOOXpiaT1WHJKGiRBd0QLINxcudVa/JTkGz/ZZiFWPNiMQ8k1HT
+8g351DIG8qc0IobhVLbamUzkviR+NiahHn26K33eyDMbVTD8J1rWWIeklULN
+qey5SHhFdegiTy1qEV79ZBSXh3Idtpts/KoRDU3+rlF5ITqbdbywrKgCRU5x
+iI+qF6Nu0h12YWscSXTaGhr3lyCTGT3Oa87lyDhJqsZ4owzlyr4ts2ErQTsf
+QtZGvQENGWwfFmAoQo0KW8E5/jiyT2f2+HqoABkL6tVIcFeiAb+OD2+scpDY
+0f0/rYcrUVJFrqtoaRbaYSlZy/lahWLUKH0hEhkobJP7tKRMDSqYqnaWo09G
+dU29/pI6PxAaS3nJ0RGJzBz76vTP1qOXKrMrraohiFGgn85zTwMaU47jZe15
+h646DbiQchuRD1noeGG7NWo6M2Rtx9GKzmGsbzZ/B4BF11BmzGwrUg7jFIq/
+GwTemNWaoWEbUijdaFCNCIN/Zq0kA863I9FFfP1m9X9gpmSd3j/dgcodyF4C
+O0nwb+RS4/ytTsS4kWXa/CMZGOetp/dUdSIuTtOaj/6pkBJl849wNAmF/TnO
+zLSUDtOLtnGvr3Uji3E2eCWSAxafHUKPfetF2pFyjnwzhaCwtp4rztWH/vVb
+HOcKLQJmdccOFc8+BGbD5+4oFEP6uiPLM4N+lF5yUYTgUQK/NF/5lTMPosIp
+8h7R5VIocikvz5QZRtKDM1ZNBTh8TvnTXGwxjAJ+ykbIbuHgS7o4WBU/jGSX
+V8NrFSrgjhD8Jh+kIBc+di5TqIDNLviXZoKC5uble+S+V8J5kYqc6+FU9CjK
+B/EGVoM0qTusvJ6KprfE65Vq/vqN0+wr4W0qEmBhEp7YqAbB+iNKjI9GkcF/
+32rS7tfAIZNnnSA0hjQ0MiWtBGph9tPRFdHycTQfxafaGlUHscz20gfGppCd
+hm6wI2qAqNwAbqcj00iHGL/627QBwvTidibVptFc8+Q1yfcN8Da5qaY6Yxrd
+k+y6XdnfAI7KxFuvHWeQUeIrwTc2jaD9us1+hmkOSd8vSrkb1gQEe84BY+4F
+VJtcet81swX0HqZ2FEktIDtnDbXV9hbIuYrqma8vIHd8W118pQUMTzwpyPNe
+QEWZh+P+yLZC5Y/Sj3QrCyhjcbCIUNYKHkeNVRJbFhFv7MHShPttQFeRk0H1
+WEbyVI9AK412MEhT/SIbu4wkWGryU/TbIS90IDqgZBlR99Zytz5pB+OnDH6S
+i8soa93g1ZBXO9Qc0jPyuL+CnCUOPeAtawdvU1ouotwq2uiWPiZxugP2Ml93
+M/y1htq+vjTbs9QBd/7Rw2X2rSP6+XWGiZ0OSL1kvLtfYB3lBKp3le7rBM2X
+js65d9fRcx7yG8TfCWHjn1/S1awjYrmmQ6JWJwhWLL5Iit5AHcoxWQypnaBi
+H2w4fWULxbydGJ+4SQKP4W4l64QdND97zojwoQt+Fl+zdCzdQcY2MUoR4V1w
+PhgPc+naQU91vs0Jfu6CBZXUKf+9f9A+06EW0ewuuJ/m/CHB/A+av2rBOt3x
+d99eoJ8kuYuCGbJ9uTi7YZNervioIQ2mnaufEPv3H8+K9r7uskSLiTeXK913
+J0PjIe8JFhoCZmmvWnDQnwzjAV4ucQcImFiz8oPiQDLwvvb8Vn2agBnKXXHY
++UwGXwN3RqYHBCybMpauCGR4eMwFD28kYLNFZy0qtsjAGmsnlp24BytjfXyT
+ZNkDz+ONWUdv0WOEhgH7OpVeuP806piPGyPGnG599ENGH/jdsJeT/MSEnTe9
+HPZurB/oOELHXbcOYqZVe33z2QaB3Oi14MnChvnqPWNJO/ATbjoZykRVsWNM
+ub7SXfRDYME0c7JFjwNTzSqOp+0bghNptWEM05zYmfjtbaQxDE5FSjos0Uew
+s87qbuIZw2CVZFEgc44be/ZMajOCQAFmgqyh6BgPRtIzcVG7QwEVS91QoWBe
+7AudYYXyVwpwFR97riJwHEu6ZzY3OEuBIGvfQDHyCezdiUgHfam/+dRbSySm
+gA9LtjcaLrUZASF9z5uJzvzYOT3ucLrMEege3xcffPMkls22mGIxOwIthmOK
+7CeIGLts0KPzRCpQ6L5uhJ4kYu75ub/OCFBhJcksk1uQiEl09mpxn6IC98wM
+L78IEbN+Yft+XZAKxjZL6+fkiVjlXOKfbCEqbHnspmvcJmJhOLXouAQVBL9w
+8/h9IGKyCtGEHowKcqr9bczBRMxhYVa0UpEK6lOffD6GETGhbRnxb5eo8EKE
+bzU8hoipPlwodFWmQmm+YFtSGhG74/GpVeAKFbRrJb2r64jYMyGK1GMtKpiY
+rSpcaSRiWauFdZp/873j/sLlxhYidjTIVlzmBhViNM8/6uz6e59frx+dDhUm
+uzGFESoRm/4xqRV76y9fR8KyyQQRc0r3jPa6TYUDR6tTpqaJGJfYq3LzO1SQ
+eKB6ZHGRiHkZp/nL6lFBhXZfi+0qEVtK3yN1TJ8KdxIaPDc2iFha9a88ggEV
+nqq8lX+9TcQSKa8OTP7F/99nYDdlCi4036PC/wATEAAY
+ "]]},
+ Annotation[#, "Charting`Private`Tag$8675#2"]& ]}, {}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->{True, True},
AxesLabel->{None, None},
@@ -485,6 +6878,7 @@ ju+OlxaRv0QFaBpWif8DvBoyLQ==
GridLinesStyle->Directive[
GrayLevel[0.5, 0.4]],
ImagePadding->All,
+ ImageSize->{453.9999999999991, Automatic},
Method->{
"DefaultBoundaryStyle" -> Automatic,
"DefaultGraphicsInteraction" -> {
@@ -504,7 +6898,7 @@ ju+OlxaRv0QFaBpWif8DvBoyLQ==
Part[#, 1]],
(Identity[#]& )[
Part[#, 2]]}& )}},
- PlotRange->{{0, 1.1483}, {-0.0009506600468124029, 0.000499549205820878}},
+ PlotRange->{All, All},
PlotRangeClipping->True,
PlotRangePadding->{{
Scaled[0.02],
@@ -512,183 +6906,1411 @@ ju+OlxaRv0QFaBpWif8DvBoyLQ==
Scaled[0.05],
Scaled[0.05]}},
Ticks->{Automatic, Automatic}]], "Output",
- CellChangeTimes->{
- 3.857793273501688*^9, 3.857799947911737*^9, 3.8588497580654993`*^9,
- 3.867387198157053*^9, 3.867392576035952*^9, 3.867399192057679*^9,
- 3.867807033354333*^9, 3.8705036374745817`*^9, {3.871622322431304*^9,
- 3.871622353837566*^9}},
- CellLabel->"Out[17]=",ExpressionUUID->"7d82a994-0e66-45e2-9f9d-23085d92d885"]
+ CellChangeTimes->{{3.871624407919861*^9, 3.8716244955603247`*^9}, {
+ 3.871628888535161*^9, 3.8716289223051*^9}, {3.871629457518793*^9,
+ 3.871629525242256*^9}, {3.8716296137151327`*^9, 3.871629625997673*^9}, {
+ 3.871629704200838*^9, 3.871629853550775*^9}, {3.871629898460318*^9,
+ 3.871629914537928*^9}, {3.8716299451102247`*^9, 3.871629954339423*^9},
+ 3.871630097238586*^9, 3.871630131562233*^9, {3.871630181745326*^9,
+ 3.871630254768821*^9}, 3.8716304278287153`*^9, {3.8716312511595173`*^9,
+ 3.8716312558499823`*^9}, {3.871631307414646*^9, 3.871631326008296*^9},
+ 3.8716313890517387`*^9, 3.871633035236746*^9, 3.872232484200904*^9,
+ 3.8722326877670507`*^9, 3.872232744803054*^9, 3.872232822043681*^9,
+ 3.87223294392085*^9, {3.872233009055416*^9, 3.872233025832799*^9},
+ 3.872233187762746*^9, 3.8722332247040377`*^9, 3.872233388756542*^9,
+ 3.872233836144418*^9, {3.872233886469149*^9, 3.872233911922018*^9},
+ 3.872233954033169*^9, 3.872234657727256*^9, {3.872827739501729*^9,
+ 3.87282776748412*^9}, {3.875951503161869*^9, 3.875951569735404*^9},
+ 3.884691802873703*^9, 3.8846918532524557`*^9},
+ CellLabel->"Out[18]=",ExpressionUUID->"48123e43-e631-4a06-a47a-7719830a4918"]
}, Open ]],
+Cell[BoxData["\[AliasDelimiter]"], "Input",
+ CellChangeTimes->{
+ 3.884691837898141*^9},ExpressionUUID->"c5dbaf72-a605-4c61-ba62-\
+df24770f7000"],
+
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{"Solve", "[",
+ RowBox[{
+ RowBox[{"InverseCoordinates", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}], ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}], "]"}], "[",
+
RowBox[{
- RowBox[{"{",
+ RowBox[{"-", "1"}], ",", "0"}], "]"}]], "Input",
+ CellChangeTimes->{{3.87223512665443*^9, 3.872235127014502*^9}, {
+ 3.87223527941006*^9, 3.872235292649597*^9}, {3.872235335347577*^9,
+ 3.872235335506427*^9}, 3.8722354455250196`*^9},
+ CellLabel->
+ "In[106]:=",ExpressionUUID->"e32ddefb-6d7d-41d8-9408-44dfb467bc51"],
+
+Cell[BoxData[
+ RowBox[{"{",
+ RowBox[{
+ "1.0000000000000000667030452102246523874476270997852356600807`36.\
+17585433868004", ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{
+ 3.872235127332223*^9, {3.8722352819398212`*^9, 3.872235292893738*^9}, {
+ 3.872235331301289*^9, 3.8722353357074413`*^9}, 3.872235445743123*^9},
+ CellLabel->
+ "Out[106]=",ExpressionUUID->"1b64efb6-925e-4824-9bef-21a9599fd16c"]
+}, Open ]],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"dat", "=",
+ RowBox[{"Table", "[",
RowBox[{
- RowBox[{"tt", "==",
- RowBox[{"R",
- RowBox[{"(",
+ RowBox[{"{",
+ RowBox[{"uhh", ",",
+ RowBox[{"Re", "[",
RowBox[{
- SuperscriptBox["\[Theta]", "2"], "-", "1"}], ")"}]}]}], ",",
- RowBox[{"h", "==",
- RowBox[{
- SuperscriptBox["R",
- RowBox[{"15", "/", "8"}]],
- RowBox[{
- RowBox[{"g", "[",
RowBox[{
+ RowBox[{"Evaluate", "[",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], "]"}], "[", "2", "]"}],
+ "@@",
+ RowBox[{
+ RowBox[{"InverseCoordinates", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}],
+ "]"}], "[",
RowBox[{
- RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
- ",",
- RowBox[{
- RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}], "]"}],
- "[", "\[Theta]", "]"}]}]}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"R", ",", "h"}], "}"}]}], "]"}]], "Input",
- CellChangeTimes->{{3.871628972194471*^9, 3.871628981154234*^9}},
- CellLabel->"In[77]:=",ExpressionUUID->"d0b98ea5-26fd-48d2-9fd3-094018a22423"],
+ RowBox[{
+ RowBox[{"-", "1"}], "/", "100"}], ",", "uhh"}], "]"}]}], "]"}]}],
+ "}"}], ",",
+ RowBox[{"{",
+ RowBox[{"uhh", ",",
+ RowBox[{"-", "1"}], ",", "1", ",", "0.005"}], "}"}]}], "]"}]}],
+ ";"}]], "Input",
+ CellChangeTimes->{{3.872234766752447*^9, 3.872234779704761*^9}, {
+ 3.872234823049811*^9, 3.8722349522281427`*^9}, {3.8722350912462263`*^9,
+ 3.872235094854218*^9}, {3.872235191920051*^9, 3.872235254417467*^9}, {
+ 3.872235450845731*^9, 3.872235503214364*^9}, {3.872235840093238*^9,
+ 3.8722358505084553`*^9}, {3.87223607674478*^9, 3.872236151410009*^9}},
+ CellLabel->"In[16]:=",ExpressionUUID->"2ccff759-af39-4419-abaf-3a2ff108b592"],
+
+Cell[CellGroupData[{
Cell[BoxData[
- TemplateBox[{
- "Solve", "nongen",
- "\"There may be values of the parameters for which some or all solutions \
-are not valid.\"", 2, 77, 41, 31834900206562845425, "Local"},
- "MessageTemplate"]], "Message", "MSG",
- CellChangeTimes->{3.87162898136685*^9},
- CellLabel->
- "During evaluation of \
-In[77]:=",ExpressionUUID->"54591efa-3e06-4780-a52d-356be312bb3b"],
+ RowBox[{
+ RowBox[{
+ RowBox[{"InverseCoordinates", "-",
+ RowBox[{"1", "/", "10"}]}], ",", "0"}], "]"}]], "Input",
+ CellChangeTimes->{{3.872235113998953*^9, 3.87223512019034*^9}, {
+ 3.872235272145976*^9, 3.8722352748733377`*^9},
+ 3.872235439677137*^9},ExpressionUUID->"9d38bf0a-1b01-459e-b90b-\
+f4f4f415ffc7"],
+
+Cell[BoxData[
+ RowBox[{"InverseCoordinates", "[",
+ RowBox[{
+ FractionBox["1", "10"], ",", "0"}], "]"}]], "Output",
+ CellChangeTimes->{3.872235120626444*^9, 3.8722352750587683`*^9},
+ CellLabel->"Out[94]=",ExpressionUUID->"38d4c10e-4140-44a4-b4d6-bba3ce09f096"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"dat", "[",
+ RowBox[{"[", "1", "]"}], "]"}]], "Input",
+ CellChangeTimes->{{3.872235227833015*^9, 3.872235229152369*^9}},
+ CellLabel->"In[86]:=",ExpressionUUID->"44224ffd-2c48-4581-a368-ab909e0701bb"],
Cell[BoxData[
RowBox[{"{",
- RowBox[{"{",
+ RowBox[{
+ RowBox[{"-", "10.`"}], ",",
RowBox[{
- RowBox[{"R", "\[Rule]",
- FractionBox["tt",
- RowBox[{
- RowBox[{"-", "1.`"}], "+",
- SuperscriptBox["\[Theta]", "2"]}]]}], ",",
- RowBox[{"h", "\[Rule]",
- RowBox[{
- RowBox[{
- RowBox[{"-", "0.2885788587440556`"}], " ", "tt", " ", "\[Theta]", " ",
-
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-",
- FractionBox[
- RowBox[{"1.`", " ", "tt"}],
- RowBox[{"1.`", "\[VeryThinSpace]", "-",
- RowBox[{"1.`", " ",
- SuperscriptBox["\[Theta]", "2"]}]}]]}], ")"}],
- RowBox[{"7", "/", "8"}]]}], "+",
- RowBox[{"0.016405558185319673`", " ", "tt", " ",
- SuperscriptBox["\[Theta]", "3"], " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-",
- FractionBox[
- RowBox[{"1.`", " ", "tt"}],
- RowBox[{"1.`", "\[VeryThinSpace]", "-",
- RowBox[{"1.`", " ",
- SuperscriptBox["\[Theta]", "2"]}]}]]}], ")"}],
- RowBox[{"7", "/", "8"}]]}], "-",
- FractionBox[
- RowBox[{"0.0851120718084878`", " ", "tt", " ", "\[Theta]", " ",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"-",
- FractionBox[
- RowBox[{"1.`", " ", "tt"}],
- RowBox[{"1.`", "\[VeryThinSpace]", "-",
- RowBox[{"1.`", " ",
- SuperscriptBox["\[Theta]", "2"]}]}]]}], ")"}],
- RowBox[{"7", "/", "8"}]]}],
- RowBox[{"1.`", "\[VeryThinSpace]", "-",
- RowBox[{"1.`", " ",
- SuperscriptBox["\[Theta]", "2"]}]}]]}]}]}], "}"}], "}"}]], "Output",
- CellChangeTimes->{
- 3.8716230762709217`*^9, {3.87162897892483*^9, 3.871628981372864*^9}},
- CellLabel->"Out[77]=",ExpressionUUID->"3e64dfbd-1d75-4bd6-b63e-4e5bec743e80"]
+ "-", "0.00095951352705328559882280580778407117`12.425236895726037"}]}],
+ "}"}]], "Output",
+ CellChangeTimes->{3.8722352294047327`*^9},
+ CellLabel->"Out[86]=",ExpressionUUID->"a7b79756-7237-4715-9177-7809c5991e45"]
}, Open ]],
+Cell[CellGroupData[{
+
Cell[BoxData[
- RowBox[{
+ RowBox[{"ListLogPlot", "[",
RowBox[{
- RowBox[{"InverseCoordinates", "[",
- RowBox[{"\[Theta]0_", ",", "gs_"}], "]"}], "[",
- RowBox[{"ut_", ",", "uh_"}], "]"}], ":=",
- RowBox[{"FindRoot", "[",
+ RowBox[{"-", "dat"}], ",",
+ RowBox[{"Joined", "->", "True"}], ",",
+ RowBox[{"PlotRange", "->", "All"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.872234876162487*^9, 3.8722348963942738`*^9}, {
+ 3.872234941355227*^9, 3.8722349415550013`*^9}, {3.8722352326251287`*^9,
+ 3.872235247920665*^9}, {3.872235477245391*^9, 3.872235477588955*^9}, {
+ 3.872236087544827*^9, 3.872236118129261*^9}, {3.872236158738308*^9,
+ 3.872236158929994*^9}},
+ CellLabel->"In[17]:=",ExpressionUUID->"eb887467-cb9c-4af9-9454-a333612bd730"],
+
+Cell[BoxData[
+ GraphicsBox[{{}, {{}, {},
+ {RGBColor[0.368417, 0.506779, 0.709798], PointSize[0.007333333333333334],
+ AbsoluteThickness[1.6], LineBox[CompressedData["
+1:eJxVmXlYlGUXxt+ZkSQs+yy3MhfSupRcUsk1PFpplqa4kqaVhglqZe6muYX7
+Z6lpWZloZqS5kSQo6nk1xZ1dQNZhYJhhHRwBQbYv3+c+f3zzjxcX8szznN95
+zjn3/XjP/Hz8LLOmaTtMmvboX/Upp0VffLdx3n6Lnnpwvp9Xqos23N31583v
+Lfrxt3K/bHncRaGtZk3tsM2iry8eF9VhvYs+G/T7wsCvLfq0by9Vdp3mor2h
+K1J+WW7R+xofF6WN2DjjxucW3ctY0EXXezvchbMs+qPV3soto+m/9wmqe9+i
+/7vYvyuWUfZHS/eZxlt0Y7lvy2jkqX4Lat6y6J8YnzIatGMm5/lZdD9jwTJy
+b5w6Q+9r0VsaGyyjPw44+3zbzaKXPNpecSkd7jukuX9Hi24sd6mU5n9ffsvc
+yqL/9OOjTyl1ulr5VpiXRf/CWLCUNt7bH+CnWfSRxgZLyWTbl3S50qx3NA5c
+Su994N7pV2zWqx4tV1lCdwPL54ZZzfrtW48+JXTZ/zVfc4pZ/+1R+A6WkE/e
+P/q7N836CmODJeTfK9q+WTfr440Dl9AfwXuWnP7brHczAlhCo/c8NSLpiFlX
+PEqoSZfmL1lDzeBRTGdGnnZk7jKDRzH1Dpz6/vXNZvAophLvZf6HVpnB49+f
+153aPX+hGTyKqY2eUO0TZAaPYnJ5RIxInmYGjyLq4zl+1LxxZvAoovq5EQnu
+4WbwKCLrY66DsweZwaOI5t97buuNnmZ9iLFgEe2d6z+2XWczeBRRux37I6e0
+MYNHIfXLbL5lfTMzeBSS5+ItW/c1msCjkN4d5Vj9232TboRvfiGdr07p9oPD
+BB6FlBqc+86SDBN4FJLjnekHh8WZwMNJWv8gd/UlE3g4adPv2ZU/nzaBh5Mu
+/TRhjs8RE3g4KdHi2ey3X0zg4aTA7NwdnjtM4OGklx/7ODIgxAQeTup8NrTP
+jqUm8HDQtjjfMxFzTODhoEHb/RovTjeBh4Pih74dGeVvAg8HBYzy37nnDRN4
+OGi012Ga0c8EHg56+5W6eU93M4FHAT1+bUDMn+1M4FFAC69trOze3KRvNwJY
+QK0G0MHdmgk8CsgvI3mx3a2BRwGFzo5v8bxdA48CGjLg/LMDUzXwsNPDFe16
+vnZdAw87laX5l3aJ1sDDTkGr9tx3H9XAw04eoe70Q/s08LCT1+hnBvtt13Rj
+ex3sZDvifzhqrQYe+fT0V9uj2izUdAPHrXw66fatmRKogUc+VV7wrFk1SQOP
+fKqd5fPGhhEaeOTTlLNVH37eXwOPfApb404e2FUDj3za3PNUF3tbDTzyqOvZ
+mNj5j2vgkUceWb6hUfcbWfHIo4/mXxw6JrmRFY88Ghxd/OmBiEZWPPIovtvG
+ZuG7GlnxyKOdCSMerFjUyIqH7V/+q5uaJjay4mGjkyFOL+rbyIqHjdLHTL7m
++3QjKx42Cjq6pMFa3sCKh412b9/w8etxDax42Ciw3uNQwLEGVjxyyTU6aHbH
+rQ2seORSpF0fvieogRWPXHq+67wEfXgDKx65lPZhxI4fXmhgxSOXOq5dYGnX
+WM+KRy49WHRkz9sZ9ax4WCk/4oUo78h6VjysNOBe1bkDO+tZ8bDS4OUvVl39
+tJ4VDys91qbN7ztH1rPiYSV7M2+z1rmeFQ8rdUzW+jSvr2PFw0rO8ePGRqfU
+sYp/Di3RagI9TtYh3jnU9Nj2z4o21SG+ORT+8aWAoBl1iGc2BbtCa1cOrEP8
+smnyivLOL7WoQ7yy6dT5RZtmOGsRnywKauEd251rEY8scqWM3rB+dy3On0XP
+BKX0CJ5bi/NmEmUO6n5naC0b0foyk87d3J8Y06qWjfB0zaToXnemDi56yClG
+PmVQwpyBBb0uPOQQI38y6MIXB1Ye2PGQ+xj5kkEXqzo12xb4kG3GgulknREz
+09XvIfIhnY6NeL3/Fc+H4J9Os4qXt2+WXgPed6ntZMuW80dqwPcu5ffeHJf2
+ZQ143qWfolq2n/JODfilUbuDg1cOerYGvNIouqJX3DJHNfikkeWNE7FP/V0N
+Hml02hbbtHZtNXik0r4uv959dUw1eKTSzI2RC6KfrQaPVPpjSXDshvwH4JFC
+c9IbwncefwAeKVQ45YfDd5c+AI8U+vZmdpPJQx+Axx2anLwuyeT5ADzu0GLf
+WbkpsVXgcYcmHgn5K3ZXFXgk08lju1fZplSBRzL5bH6je7MOVeCRTPEhLUYP
+y60EjyS6bk98+quDleCRRLT8xITTgZXgkUTTex1ent+lEjwS6dPy3Wsa8irA
+I5Euj1pd+vBABXgk0oicgJi4DyrAI4HyJlZsWvBcBXgk0J+b+nqnJd8HjwQa
+dm1IdsW2++ART6+2vvbJueH3wSOevsvuetS7zg0e8fTJOspsHe4Gj3j6c6F9
+3LZAN+IfR3/3SPx6cWs34h1L/uYz9y7E3EN8Y4nHBD313uJ7iOdtym0M69Hz
+hXuI3y1a9uzWj3rcLke8btGgooyZQ5eUIz436dCE15b4ty9nqxGPG/TdKx6r
+t4S4+DXj/Dfovbhtfo/fKOM9xnmv04VhtU3sXmVcYSx4jW72PRucO6KU/Y0N
+XqOd9ycOP/9VCR818ukqTYs759vnRDF7GvlzlTr0P9ekIr2IA418iaHC8C2P
+n9SKWDfy4wpdtmVNf6JTIXcy8uEK1fR4yiNsgJNXGge+TAFba4pavuPgNIP3
+P7QwRYu2TihgX4PvPxTq1XvD5kl28LxEk35e2nPtmHzwu0hT26zb4jMkD7wu
+Uk/bL31SO9vARyfPF2Ntlxus4KHTj+7j4b57cxD/C/RT97XtrnpnId7nKczd
+Zthz/01HfM9R26AvFp9PS0U8z1J7z7y3nU3uIH5naH9Gy/HBTyYiXlG00Jxd
+1CnrNuITSR6eoREvjbyKePxNnScE/ZM0Tudlxvkj6ERl6x6rM8P5FeO8p8gn
+o0m+072Gncb5wsk5NujAmAXHaL+xwZPUa9X89W3m6HTS+LrjdGVrYvmmvjeo
+k7Hfo3R2RdQn9fMSabuxv8O0oFtwYdM300gz9hNGp4pbdmganU1rjO//ja6P
+XR3Sts5G5cb3HaDjeya0/rWtg1SD30eTK/bO/jW9mPYb6/1IOc38v07kcvz9
+LkqZEOMT0b8C//8bqgwf+/pjkdX4fQit8+u0LPr5Rvy8iL4e037l8k4eQ0WB
+/Joz8kbM2ReGaq2M37M/fo+/Z/l7zRgAv+Hk/1t/F8v3r1H7Yzf2h/2z7N+q
+zsfXcT6cn+X8iA9LfNR5D/MoxA/xZYmvWv84hyD+4MPCR8UznFuBH/iy8FXf
+H8FPVin+yA+W/PiPyh/ujvxBfrHkl9rfGf4L+Yf8ZMnPV1T+cjfkL/KbJb/V
+/i9wGPIf94Plfvyh7g+3wP3B/WK5X+p8F/lj3D/cT5b7OUDdXz6E+4v7zXK/
+Vf5f5nG4/6gPLPUB9YOlfgSp+sIu1BfUH5b6c1LVJ56B+oT6xVK/qlV943jU
+N9Q/lvo3VNVHnob6iPrJUj83qfrKYaivqL8s9Tde1Wf+EvUZ9ZulfrdV9Z11
+1HfUf5b6/5HqDxyJ/oD+wdI/Jqr+wrPRX9B/WPqPOl8890N/Qv9i6V97VX/j
+Y+hv6H8s/U/1h0R+E/0R/ZOlf6p4JPJc9FdVn5P4Q/Rf9GeW/qx4J/EN9G/0
+d5b+rup/Mr+M/o/5gGU+UPlwhydhfsB8wTJfXFbzBwdg/sB8wjKfqHxJ4SLM
+L5hvWOabJ9T8w4cx/2A+YpmPVD6l8n7MT5ivWOYrxSONm2D+wnzGMp8pHmn8
+POY3zHcs853icZftmP8wH7LMh4pHOsv8iPmSZb5UPNI5B/On4pHBMp9ifmWZ
+XxWPDE7CfIv5l2X+VTwyWeZjzM8s87PikcUtMV9j/maZvxWPLA7GfI75nWV+
+VzyyOQDzPeZ/lvlf8cjhv6APoB9Y9IPikcNLoS+gP1j0h4/SJ+wNfQL9wqJf
+1Pms3BT6BvqHRf/EKn3EA6GPoJ9Y9JM6fy7XQF9Bf7HoL+gzFn0G/cai36Dv
+WPQd9B+L/oM+ZNGH0I8s+hH6kkVfQn+y6E/oUxZ9quZhG3eBfoW+ZdG3Kl/y
+WPQv9DGLPt6g9DPPgH6GvmbR1yqf8lj0N/Q5iz5XPPJZ9Dv0PYu+VzzyuQ76
+H/4Aiz+geORzOPwD+Ass/oLiYWfxH+BPsPgT8C9Y/Av4Gyz+BvwPFv8D/giL
+PwL/hMU/gb/C4q/Af2HxX+DPsPgz8G9Y/BvFo4C94O/A/2HxfxQPB4s/BP+I
+xT9SPBycAH8J/hOL/6R4OFj8KfhXLP6V4uFk8bfgf7H4X4qHk8Ufg3/G4p8p
+Hk4Wfw3+G4v/pngUsvhz8O9Y/Dv4eyz+Hvw/Fv8P/iCLPwj/kMU/hL/I4i/C
+f2TxH+FPsviTikcRi38Jf5PF31Q8ilj8T/ijLP6o4lHM4p/CX2XxVxWPYi6F
+/wp/lsWfVTyKWfxb+Lss/q7iUcLi/8IfZvGHFY8SFv8Y/jKLv6x4lPAV+M/w
+p1n8acWjlMW/hr/N4m8rHqUs/jf8cRZ/HP45i38Of53FX4f/zuK/Kx5lLP48
+/HsW/17xKGPx9+H/s/j/ikcZy/sA3g9Y3g8UDxfL+wLeH1jeHxQPF8v7BN4v
+WN4vFA8Xy/sG3j9Y3j/+B6NuRm8=
+ "]]}}, {{}, {}}},
+ AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
+ Axes->{True, True},
+ AxesLabel->{None, None},
+ AxesOrigin->{0, -3.378167736878136},
+ DisplayFunction->Identity,
+ Frame->{{False, False}, {False, False}},
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{
+ Charting`ScaledTicks[{Log, Exp}, {Log, Exp}, "Nice", WorkingPrecision ->
+ 15.954589770191003`, RotateLabel -> 0],
+ Charting`ScaledFrameTicks[{Log, Exp}]}, {Automatic, Automatic}},
+ GridLines->{None, None},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImageSize->{665.9999999999993, Automatic},
+ Method->{
+ "OptimizePlotMarkers" -> True, "OptimizePlotMarkers" -> True,
+ "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
+ Identity[
+ Part[#, 1]],
+ Exp[
+ Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+ Identity[
+ Part[#, 1]],
+ Exp[
+ Part[#, 2]]}& )}},
+ PlotRange->{{-1., 1.}, {-3.378167736878136, 9.36479789866991}},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.02],
+ Scaled[0.05]}},
+ Ticks->FrontEndValueCache[{Automatic,
+ Charting`ScaledTicks[{Log, Exp}, {Log, Exp}, "Nice", WorkingPrecision ->
+ 15.954589770191003`, RotateLabel -> 0]}, {
+ Automatic, {{-2.3025850929940455`,
+ FormBox[
+ TagBox[
+ InterpretationBox[
+ StyleBox["\"0.1\"", ShowStringCharacters -> False],
+ 0.1`15.954589770191003, AutoDelete -> True], NumberForm[#, {
+ DirectedInfinity[1], 1}]& ], TraditionalForm], {0.01, 0.}}, {0.,
+ FormBox["1", TraditionalForm], {0.01, 0.}}, {2.302585092994046,
+ FormBox["10", TraditionalForm], {0.01, 0.}}, {4.605170185988092,
+ FormBox["100", TraditionalForm], {0.01, 0.}}, {6.907755278982137,
+ FormBox["1000", TraditionalForm], {0.01, 0.}}, {9.210340371976184,
+ FormBox[
+ TemplateBox[{"10", "4"}, "Superscript", SyntaxForm -> SuperscriptBox],
+ TraditionalForm], {0.01, 0.}}, {-6.907755278982137,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-6.214608098422191,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-5.809142990314028,
+ 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.}}, {-4.605170185988091,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-3.912023005428146,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-3.506557897319982,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-3.2188758248682006`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-2.995732273553991,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-2.8134107167600364`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-2.659260036932778,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-2.5257286443082556`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-2.4079456086518722`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-1.6094379124341003`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-1.2039728043259361`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-0.916290731874155,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-0.6931471805599453,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-0.5108256237659907,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-0.35667494393873245`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-0.2231435513142097,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}, {-0.10536051565782628`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 0.6931471805599453,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 1.0986122886681098`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 1.3862943611198906`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 1.6094379124341003`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 1.791759469228055,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 1.9459101490553132`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 2.0794415416798357`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 2.1972245773362196`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 2.995732273553991,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 3.4011973816621555`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 3.6888794541139363`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 3.912023005428146,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 4.0943445622221,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 4.248495242049359,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 4.382026634673881,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 4.499809670330265,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 5.298317366548036,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 5.703782474656201,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 5.991464547107982,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 6.214608098422191,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 6.396929655216146,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 6.551080335043404,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 6.684611727667927,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 6.802394763324311,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 7.600902459542082,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 8.006367567650246,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 8.294049640102028,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 8.517193191416238,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 8.699514748210191,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 8.85366542803745,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 8.987196820661973,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 9.104979856318357,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 9.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.}}, {
+ 11.918390573078392`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 12.206072645530174`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005, 0.}}, {
+ 12.429216196844383`,
+ FormBox[
+ TemplateBox[{0, 0}, "Spacer2"], TraditionalForm], {0.005,
+ 0.}}}}]]], "Output",
+ CellChangeTimes->{{3.872234877752461*^9, 3.872234956364738*^9}, {
+ 3.872235206340292*^9, 3.872235257483449*^9}, 3.872235328860366*^9, {
+ 3.872235455682191*^9, 3.872235506074443*^9}, {3.872235844605751*^9,
+ 3.872235854155307*^9}, {3.8722360831096478`*^9, 3.872236159131474*^9},
+ 3.8728279294097643`*^9},
+ CellLabel->"Out[17]=",ExpressionUUID->"1e205518-5f28-4b0d-bf97-1ef60e744fe9"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"p6", "=",
+ RowBox[{"Plot", "[",
RowBox[{
- RowBox[{"{",
+ RowBox[{"Re", "[",
RowBox[{
- RowBox[{"ut", "==",
- RowBox[{"R",
- RowBox[{"(",
- RowBox[{
- SuperscriptBox["\[Theta]", "2"], "-", "1"}], ")"}]}]}], ",",
- RowBox[{"uh", "==",
- RowBox[{
- SuperscriptBox[
- RowBox[{"Abs", "[", "R", "]"}],
- RowBox[{"15", "/", "8"}]],
- RowBox[{
- RowBox[{"g", "[",
- RowBox[{"\[Theta]0", ",", "gs"}], "]"}], "[", "\[Theta]",
- "]"}]}]}]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{
- RowBox[{"{",
- RowBox[{"R", ",", "2", ",", "0", ",",
- SuperscriptBox["10", "8"]}], "}"}], ",",
- RowBox[{"{",
- RowBox[{"\[Theta]", ",",
+ RowBox[{
+ RowBox[{"Evaluate", "[",
+ RowBox[{"DufDuh", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], "]"}], "[", "2", "]"}], "@@",
+ RowBox[{
+ RowBox[{"InverseCoordinates", "[",
RowBox[{
- RowBox[{"Sign", "[", "uh", "]"}], "0.5"}], ",",
- RowBox[{"-",
RowBox[{
- RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}]}],
- ",",
- RowBox[{
- RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}]}],
- "}"}]}], "}"}]}], "]"}]}]], "Input",
- CellChangeTimes->{{3.871623051098364*^9, 3.87162311994796*^9}, {
- 3.871623153141858*^9, 3.8716231605568438`*^9}, {3.871623563300939*^9,
- 3.8716235634680767`*^9}, {3.8716238133855333`*^9, 3.871623826096807*^9}, {
- 3.871624083622401*^9, 3.871624365683359*^9}, 3.871624437060791*^9, {
- 3.871624474669331*^9, 3.871624494893714*^9}, {3.87162891423326*^9,
- 3.871628921457245*^9}, {3.871629472283608*^9, 3.871629506652087*^9}},
- CellLabel->"In[88]:=",ExpressionUUID->"27f70f50-5ebf-4a6d-94af-1a6bfe816e28"],
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}], "]"}],
+ "[",
+ RowBox[{"ut", ",",
+ RowBox[{"1", "/", "100"}]}], "]"}]}], "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"ut", ",",
+ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",",
+ RowBox[{"PlotRange", "->", "All"}], ",",
+ RowBox[{"Exclusions", "->", "None"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.8722347322313757`*^9, 3.872234748184293*^9}},
+ CellLabel->"In[58]:=",ExpressionUUID->"c56e2f6b-9c72-4c2d-8eba-3038314a2f4c"],
+
+Cell[BoxData[
+ 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->All,
+ Method->{
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
+ AbsolutePointSize[6], "ScalingFunctions" -> None,
+ "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
+ (Identity[#]& )[
+ Part[#, 1]],
+ (Identity[#]& )[
+ Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+ (Identity[#]& )[
+ Part[#, 1]],
+ (Identity[#]& )[
+ Part[#, 2]]}& )}},
+ PlotRange->{All, All},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{{3.872234737395122*^9, 3.872234749166255*^9}},
+ CellLabel->"Out[58]=",ExpressionUUID->"b9d51004-0cce-4c5b-a304-1aa9a84c56db"]
+}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"InverseCoordinates", "[",
+ RowBox[{"p6", "=",
+ RowBox[{"Plot", "[",
RowBox[{
- RowBox[{
- RowBox[{"Data", "[", "2", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}], ",",
- RowBox[{
- RowBox[{"Data", "[", "2", "]"}], "[", "\"\<gs\>\"", "]"}]}], "]"}], "[",
-
- RowBox[{"0.8", ",", "0.01"}], "]"}]], "Input",
+ RowBox[{"Re", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Evaluate", "[",
+ RowBox[{"DufDut", "@@",
+ RowBox[{"PrepareArgument", "[",
+ RowBox[{"Data", "[", "6", "]"}], "]"}]}], "]"}], "[", "4", "]"}], "@@",
+ RowBox[{
+ RowBox[{"InverseCoordinates", "[",
+ RowBox[{
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<\[Theta]0\>\"", "]"}],
+ ",",
+ RowBox[{
+ RowBox[{"Data", "[", "6", "]"}], "[", "\"\<gs\>\"", "]"}]}], "]"}],
+ "[",
+ RowBox[{"ut", ",",
+ RowBox[{"1", "/", "100"}]}], "]"}]}], "]"}], ",",
+ RowBox[{"{",
+ RowBox[{"ut", ",",
+ RowBox[{"-", "10"}], ",", "10"}], "}"}], ",",
+ RowBox[{"PlotRange", "->", "All"}], ",",
+ RowBox[{"Exclusions", "->", "None"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.871624380395876*^9, 3.871624486365077*^9}, {
- 3.871628883904001*^9, 3.871628909432775*^9}, {3.871629457267346*^9,
- 3.871629525012162*^9}},
- CellLabel->"In[93]:=",ExpressionUUID->"8965277f-d2d2-40c8-b8ca-7816448c9503"],
+ 3.871628883904001*^9, 3.871628909432775*^9}, {3.871629457267346*^9,
+ 3.871629525012162*^9}, {3.8716296135256433`*^9, 3.871629703591056*^9}, {
+ 3.8716297390329103`*^9, 3.871629853114192*^9}, {3.8716298958192244`*^9,
+ 3.8716299139879017`*^9}, {3.871629944204525*^9, 3.871629952700124*^9}, {
+ 3.871630090583139*^9, 3.871630094694592*^9}, {3.8716301742008753`*^9,
+ 3.8716302000245533`*^9}, {3.871630255641987*^9, 3.871630256505756*^9},
+ 3.871630433661292*^9, {3.871633041478835*^9, 3.871633042334145*^9},
+ 3.8722329932793493`*^9},
+ CellLabel->"In[54]:=",ExpressionUUID->"8965277f-d2d2-40c8-b8ca-7816448c9503"],
Cell[BoxData[
- RowBox[{"{",
- RowBox[{
- RowBox[{"R", "\[Rule]", "2.5550984351177726`"}], ",",
- RowBox[{"\[Theta]", "\[Rule]", "1.1459055298636132`"}]}], "}"}]], "Output",\
-
+ GraphicsBox[{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[
+ 1.], LineBox[CompressedData["
+1:eJwtmmc41//3x+29N0XyQZlZWaX3GyElUVIhhJRIIqOMiERkRmYJ2TKzKueV
+vbJX9iYreyX+3991/e+cc50b5zp3zng+rusct3h09S4JERGR93/mf95z9vLa
+4SEB7WptvAplNYIZd47NwX0CArcB2qojRqDLNLpduktA2//mH+4QjIBfyeHf
+o3UCEtO/2OsgZwRVryOoxmYIKGAlwyPsuhFQSfbxoZ8ENPvW+9KbGCN4+8T8
+knc8AZE00peGHDeGbGKnVCIFAnpigjdr4CZAfldLhvu2ABrvltXWWTYF1v5a
+u+Tw4+j0pIbts2lzuFodZynSxI9uQfWmjrcFuP9RsQubPIa68GrCT18rKHON
+e5B3hQ+1Hl1Triu2BgGrx5/6L/Ah7WiFdSqwhjd6F8aI1fgQB2f+x6uN1mAh
+snXdQI4Pecy57e0NWwPtoL7qLhcfMqYvupxEeQ9Mz1FzqU/wotI9WiF1k3tA
+Su5W2/uEF2noLTlz0d4H3Yjr/AexR9FSRRxPpLcNPJNh1NaKPIpEOjYGwoJt
+IK2z4XFY8FF0XDOF5V2MDRywnK0WeH4UDfitUH7Pt4HcSAFrLaujaKOYbPHR
+uA3QRf3JDpM8ijgyHOrdzj+ApneBCoTqI6j11hfVq8y2oJX4XffCIg8Kb+Nl
+JTTYwcqboX2yGR6kfTRRO7jHDuK8/mb9GOVBGcSyEwcTdrBopkR5posHWZ2u
+MCE6sIMIgS8gUcGDNK4cfeQs9xBG0nOkWAN4ENVe9fyplIfgUhjPMkLgQebj
+zb4nAuwhrf5pr5MxN1K3Mv55UskBYmVc1DMNuJE3i/StYVUHCE50zB+5zI0o
+Wv/MxVx0AEcn29faODdi0beUETJxAJVjt88dE+JG5lF/1SKfO0C3C57WtMyF
+jm7tirXUOwCJMKXL8RdcqOZF3ujv24/B1O8te1sGJ2Lt0H31I9kRWrEtSrdk
+TvRo14G0OscRsL839vgTONEHcUJ4S4kj8DseGXUM5US9NKRkO02OMGGWnMHh
+wonsJ7tUCtYdwfpM/hlTdU6013phoFjTCezXmu8sDXOgwOphWrV1J/AyJ/1M
+y8qBDA5zXmTfd4b8Nq2QbjoO5B4bPQJPnGHiXLB9IgUHOt553XXE2xk0edlP
+ndpjR0YL398oxzoDw4Bw/tVxdvR6PC/6UZMzvL92sTA2jx158hi/7ZN0AdAM
+Lzmhw45IrvJ/2Tp0gbUvPdErGuyoT7XA7gG9KwgK8biWY+zop8rc5m8eVwgg
+TVG4JMuOnlv0FNPJu4IeKi6z52FHcRFk9hN2rjCm1F/xZY4NwbjO7cEhVyCS
+OAbqL9lQ5YvbonZ1buDBoWr60osN+Z8e9KvsdYPtQ4t/da5saJBUmfL4rBss
+d6adufiADZkxSf3ioHoKg26SZXpX2JD4mRGmhotPoaRGpeA2Nxuq11M4Z9D1
+FB6amKS45rIiC3+6uZLVZzCn4aVWnsaKaBlmXZXJ3MHqVNL43gdWJFr0SKiD
+wx2MSKaOeUWwondeMuqKZ93hQoZtgp8rK7pde9R15ZU7CG48iwpXZUWZ29IN
+/AQPGAiKfZXdw4ICqKyfXbLxhK5a/hzzNhb01IyS7tDDE1oO09vZG1mQXmCy
+Y12YJ1Q6lXB7f2NBd/tSRMLLPCHZuCvbIIXlv3lrlOOm9oIHYvTt/xxYUKPC
+L0q6z17wt8mbS4+OBb0wSnQSJPOGDTIqFXIKFpSoGCZ1g9Ebls+F3qk4ZEa6
+ogcFUTzeMFaYmCW4zoyeRfqcl5f2hpq4irO7v5jRyhs6L0ozbwh+sGGenM6M
+pN5IX9/95g1Hae5nbqgxo0ly5U+xL3zAtLIlWOAsMxpm0hJyD/OBj47SDnqn
+mdGf+ttSD9/7gPDgnnzOCWZUp6+t71vhA6dy3tRY0jEjbWX+3GfrPqCmWzTa
+2cOE1n5/38m9/wJsIg7YC+4zoV2bYNENc1/I0bTcHbnDhMrZ1C34HvvC8l79
+EJ0xE+JUbhkz8fEFR8vwlPuXmZBLQ7oyZ7IveMgJSvPLMCFaqlCxl1O+wJcb
+GcO3zYi2IhS17j70A9vTouSDRxmRlYtwPx72EhzJy9NdGBnRtUds4RPJL+FZ
+j9ZFFhJGxOrX753w5SW8dr4bqj3LgLgpPuTeGnwJWV+SuMsKGJCQ+Nulfyf8
+4fdpTskoTQakbifxk63OH+7Jk9244kCPvuY9UajnCAB7isjdeQt6xBIaOtAg
+HgAuvccT/K/TIyNjy+9zagHg74KNf1emR+OVmsf9HgVAWskzW3FyelTRPfzu
+VFMATMuvPqeOo0PDRd8ygl8GgqXCSEZ1NS3i2moT4+IIAusMBUPNUlo0RpnO
+GCEZBA+4w0kbs2jR0UMTFQmtIHD4q27aGk6LpGgsbRrcgsADMll/mdGi0Fm7
++pjhIHir5ey1/JcGXf0k8fZXbjDU3aAz4JajQTZ6VCxfH4RAY8Nd4oQTNOjr
+kgDx6KsQaFGCz3xHaJD/U8E98U8h0HnEkVqQhAbNJiReuTAWAqOjfZWS7dTI
+tsw04eXNUNi5lyJy3o4adXRdJSk6GQaibsqH9qlU6L7C1mGybDigYV3RyWgq
+xMqb5JWpGQ6G6pbXbwRSoXhF96K2W+HwgiE4G7OnQjDPbuLhHQ6/UodvMClS
+oVEf7XjTtnAI6PDOL2imRHmhGtyBThEwI1p/Z2ONAo1t/Llf2hcJHmGDwfen
+KZC2VGCx7p9IYNn6UzrUR4HINWd1mSjfwrkfXAy13yhQ5qsMKjaFtxB140FF
+lD8FKuAaJRaJfQvn/ehZFXgokP1zx9a5u1HwcfhazVNVckRH8GmlFHoHMlMy
+e91y5MieJl+qGX8HNfPMUlInyVGHrOEwMnkHM9tt8TMM5Ei23ZdYI+odiLLo
+OF0bIkOrafZKlVQxUKh5XkDClQyx7epnz+7GgPplws2AB2RItTH0BR13LHRf
+IwmZvE2GHHa/UtspxsKWOdqNPU+GPv6R9Bx2jYUz7mc7KFjIUEvm19K43Vio
+yZPzHsshRV3XffdpqOPheglryZkkUqSqkz4lKB4PM9/WFqIjSRGrNfbV90o8
+UDXl37j8jBSJ00wxsr6Lh8tT4qcqtEjRC+eQyWCRBOjlEhqJnCBBhZ4yf2NN
+EmHWh/2sFhcJWqa8c+c1URLQeOb9iaQhQbcH3s1wcieBpJt2ytg+McpuoQge
+kU4CF3tPmmfjxKhRVZKaxyoJKIyn+3OyiJH14OWTps1JICj3xZlFhRitM1l1
+13/6CBdOXRExO0WMks6pCKlVfQQ70d9D2ceJ0Y3leTWS0Y9QzM97XoOCGOWd
+/vXqBncyqNO/ZHFrI0LJG8kBDuHJYDFjkDd8hwjRUVd8OBuWAv7jyxaiBkTI
+J2/RLLAgBbKGAjhcNYnQ5E2eu+JdKbDW+c2TSYwIDT5WIXnGmQokz7Vj/OcO
+QW15gNUwNRUw6d8d+vSHQLP4W1ip/RP4n+BVWlg9gAP6DPaX25+glVc/ya/3
+ADgGjtOoHEsDU5py+9IPB7Ddl2K6/SgNPCYDaHllDsCNqGa8miMdKqJOaswZ
+/oPxAwkpbfcMoDKetSQ++w9CPo4+187MAEP+tBc8x//BbwMFvta+DFjLIiCd
+hX04vBfoZCefCSKI70zB830QNZykUtrLhJh5NulnGX/BebA5lfV9NszkdV2J
+fPMXlAV9TO/2ZIOcc4R9juNfaItbNr9DnwNth4w5I2f/wslumnDL5zlAwU57
+Qr1jD8SHIi5N2uaCM0bMS7e3C4NnC4Tf2+RBFRk6IzS6C/cLE9ZpcvOAqcnL
+6FzNLmxJbWneWM2DHIP9dw4hu/CK+pvOlXP5MGWzzdIjsAsK9x/9lWzLh6tv
+l6jeX9qBP5EZJwyoCyHpVs6JUqkdkPu4/IpVthCW+Ww129l34GbP4BGb24Xw
+OnPOl2RsG0bOXi6YKCqEH5WTB9ZPtsHw89Vs6/tFIPX718apxC0gKxbvLlwr
+hicrEiKcflvwPq6bs4fwBcq2fW4fPNiCsW2B8ezrX0CVQrSuRXELxttrkl9+
+/QJXCc/e2XRvAn3WJ7geVgLRoq3Nel83gZ8lzf5VfQkMSgsQKSZvAnOpdfCb
+wxKwwpvuUzhswl8zGXERx1Jwvs2jnEK7CU8suCcIFmVQYWVv/3ptA5jL7/N6
+JZXBgW1V8uNfG1Dl2+TaPVoG/s8e0OLpG9DvXCodfKccYt5VDA2pbUD0aPJs
+2+MKqOgwes7xbB2qHIQ6g5q/wUH/56J/5utA+uDAtOjod1AbI5mb0lqHZva0
+iguPvkPzcpZeEfs6eD/M7RjnqoQh2r/H9QrWYK+KrH7cC4Cf9YqhQswarEZS
+CL8eArjLk/Ka7/kaDO6Q2uzyIlg+eWl9UWcNKpc8s3i8ERxqxNcEzq2Cp9bV
+so0rP+D85T87Dm2r0Jf8Y9/T/wcEGKhL3CxZhcZA+hzeyh/AZLkQJey3CitJ
+6yZIqgoEvM/cqz62CvGucZt+gtVg/So0PotiFcw15JIKrKohK2SyLXxpBdQT
+ye6ppFWDbGKQovnXFbhOzlqWKFED5ysGqf8ZrkBHvOOPJt1a+Jz1San+zApo
+3ltorPhYC1zxj2zC+VegvVig5vtWLfRuU0Rc6v4DF9w432mn14GQuyFT4t4y
+KAySpzYINsCO8fwj6ZpleN8B3+JeN0DLWa+22jfLQHS+gUxuvQGeHHwKWeZf
+Bpp/+hHiPxuhymeTDtdaAnVRtr/x6c0QbRFo1820BG7iLa7kJ1rARp235f7A
+Iiht3IrBs1qAiVwjKPzhImxsFfV1f/sJU9P980IKiwCI83qATiuU1dldrCBa
+hPwxkhdVY61gFvCWejJyAVI7fe600raDjM1JG9fbCzDfK5RmeLsdKC5+a6A9
+sQAqV84sRhS0w2faqVdyFfMQsKbRlWXRAfshshT+Y7+BbJmVYLHQCe2P6u/y
+ZP2G3u5Iw0DDLkjRM6797PQbWprv8H2q7YKLLL5+fRS/odhq6Oeb/G7gW+eY
+sm2fgyhp180W8R5Y68pSJ4qbAwYB1i/TuT0QG9VJIiIxB8bvalaKoBfsXKwt
+vm/Nwp0wfGBfrw/wG3s/9NEsCCkUL2rO9cEcl4DPs2uz0LFf1o6J/oJvu1/G
+GHhngePLZvnnnl8QOqCNp8zMgNZl7t0PAQMgn/D4sPnpDAAP12g/xdB/94Lc
+zFx9BpKkeLR4u4Zg+HZs5QbdDCwIlM6PZAyD37EfnrxJ0zDwJq8ScxqFm0TX
+hwtspoHbhMnyndwYiI/PndWUnQYaRSrD91/GoCuZad++bgpIbCQZnJvHIc03
+1Zg0bApOma6wC9+ZgGdWil/f3ZqCwODfTlkHEyAgbP4MLU6CNfOyyY1rU7BF
+sfHLoGQSlvPjuvJpp6Fx9pXS7+eTcFrex1a1dRocMvN2mFknwZ7KzHrvySxI
+Mdj7qo1NQMuFdf+jl+Zg1VGcwSl3AnzSylb+iP8Gx7OZhG6tCdDIp3Bd5FgA
+2Y/3PpOx/1c3w09+lP+/viEXVjo9MQ4Tlv9OcisvgXNbsm60xzgQnukX1L3/
+A/Jyd37VaY+DQFNVq77LCmzFHLPa5hgHF4H3f3RPrELJv+HlE1NjgHR/fmGb
+XAVXi4SnNwvGwKeZ/4Vt1hoo1huRBXqNwUnnA2Exr3XYEeMOLb80BoY2UQdn
+zDZgfV5M+3TLKGgnZrPpXN6CJ8UZptHWo2Ae7jHkZrINW55CT7aJRsHvOLO0
+gecOuGolB96MHwE1q3s0ogW7sMN07EP56RFg0cICbu/uwdOB+GKe9mHYnNpt
+tbmxD3spXE3uD4bh5rBhwUTLP9iXZ9lU+TAEZ56cdnR6QYQ8iUJpPigNAfGO
+y7Wgu8TooJGWn6h7EJZ+rvH8u0GCvCMDTt+xHwQ8Xta01YgUEd8mv1RFNQg2
+u0k19I/I0AvhF+aElAHwNfvzrT2KHJGtHDj7qQzA49xfulLtFIjCdydJ0/EX
+MD5UUeb3o0avdJxL0ul+gTKPeGPdIQ2i4lhrpkrvB8WJI0FCkXSIJnNhq2mw
+D0oyXfyISJhQkON9OnGXPjDi1xCUW2VCdGenj79h6oO3R0Z8uZeYEWPbiM4V
+jV6g8YmmyaJmQ2Exxhb5oz1wIZsK7z/Jjlgs+l2Zn/VAnrG8T7g+B2Lb7Eju
++twNwdXu4cslXCiqUrdMTrsb3rZWBmsscSOOgOafUZNdUF92+99Z/iPonf6F
+yS3PLojOdxk70D6KuI7U7tzg6oKSEb7Ii5a8KHZKlaG8sBPiZW+b45Z8iOdz
+JYHncidIsWksS2DHUILrGSX32Q74+lTiodn8McSrWqY75NMB7o5Zbv9E+dF7
+mtNWKkc7YBtlhbso8qNj3QVP35e0g9ec1qkdVn6UlCgZeqjXDll0tArld48h
+9VZD7R+9bTBEEbtowMqHNO/oPfGlbYOTs4Ls9VxH0YUN7Q8aeCt0FdWIrd/m
+RhdfqTdROv+Evo3Ig8FmdqTDo7LZmNkCbGOfHqjo/sedufL8wSPNIJ6Zk7ad
+RYn0calLuqzN0B0UzmNuuQkGXSIuTBeaYDop90qr0jhmaE342OnRCOZhkf7R
+KuT468dOARFfGiCT/nxhdjUr/t2j+tHV5XogY8vpeRbDiwtGWp7rNKuD3/Z7
+h7fOiOA33xcJRcTUgrrUdN/GU0k8KJOU/mpHDQzQGwYEVUvjlcXXNphpauD2
+u7Nyv47I4WuQMtihVg139j8sbUvJ48LN61Xh7lXgN79uR7aigN/qVc/SL/4B
+ei0pP9y1lfDg8chw5iUE8SXEvwxllPH/dotbhxCCOsZLn+pTlfG5P/eQwPdK
+UD/61exFkjJ+hYIqNFnyOyiNbxq8EVXGS45m3BZI+gqhnnmEZB0lnE/2gngy
+cwWwbETwK7Ep4i+15/aO+5ZBOE/vJfNweXzRLKDx40YJnA3dGfHpkcMrghus
+P/YVAeMHMXvTHSn8eMr908e1C0Hg5qjszWUJPKCciuxjRT7cGKEj+7Atgue2
+hKupnskGsr1843ovAdx9t2MU58sA1UzSeEpZPlxbmMUTJ/4E76k0zV9tcOKc
+167y4FMfwZaDUevFRRa8+VDw0fOQRIhwILX6aU+D37/1KdPL4B2Qkyuk1z8m
+xsmKhKY8ecKhLZe4y1ZwHcO5dVT20EtQpU8wGdnrwVZiYq1WYx2h5sLD6cqe
+fvAgeVurqXgLI4wyIDvCCkjGWdazyT/H2C68rBh03YER7oJlWsZgLOEvZeSw
+6SFck+3/5q/6FvO7IzbxyIcElfy68eKVexyW9uhj8HQtGaJHC4QaoyRMVyJB
+UC2UAmGR2f41rilYNTNF0/VlSvTY2vZ3zds0jKpzLkpjjQolK4np1BZkYsTl
+g76RGdSom27hc21rDsZXSlQozUuDKMaymOsW8jCiIZ6mBCMalHDrtLKlXwF2
+27bkwZ4NDTqtHmU7yVKEfch0Pad0jQa1im8mWH4sxtzYzhz9X/49juutk6dK
+MJewJOaqn9SIiOjLoWVlKfbvenjSqg01iv3NJj2lU45divhXQ75FhWS6nlhY
+DVZg343yQxOdqZBVmlyt1c53TH+gQYbNmBJZCRvVynBXYZQHhhLPd8mQ1BGa
+EcexKqwsPW9dyZwM/WOs2CpMr8YEfO688WsgRdG73Cdl5WsxMy/nL0pJJKi+
+5ddr2WsNGHeGa2iDCxG67zZQbyzWiO2uK2Qd6T0EKsFBMj/SJqznqszL5foD
+uOg+5NVd1IyNu1145Fm/D/PCw1/3g1ow4euyl1l6/kJQ5/COoNVPTJSgtZGx
+sActIqOOzmxt2DMD13Aa2V2w6xnNS1xsw+4Kn3AxsdwBf9xhy8KiHXMUK0j+
+Eb8NJxYdZIOUOzBujcevPhO24L66Y+7gfCcmac5arRuwDoqxa81/DLswCXs8
+NWB1Daj+OM6TVndhTlp12Znma5AZ53RCPL4be/tO+FLKlVV4trKugVP2YAHz
+q2dI2lbgouYTKwOnHoy96taJ69dWYH71yUePS71YkrU60U7XMlRobUJYaS/2
+kOEYbfv2ErxOdB5JJfRh3Vmil1cISyCm7XLk598+jAp7LBf7n46zS3KN4s35
+hSW0aUkY18/B2a3tImmuAYy6ziRNUHAO6HTcOjX8BjDX2odT5f6zkLvtxmhv
+MohlLUtaXjKZAa/LuxIvGgYxphHi2fb/9IVuylOdaLkhTKEy0EFOcxqWdZ8F
+VtINY82LYV21alNQmbqX3uk2jL1WI/odXj8JIXvP6mamhrGXxs6Ym94knEpz
+J2X8PoL5ks2+nns4AWVelZV58mOYkrXWWY6uMUjKPPhZbjeG6eh/trF8MgYB
+3eeGq5PHsFt6PKdTucbgpij87WMYx/g+Nj/g7BqB3R5QJJodx87GNdgzGgzB
+BBHRBRreCUzqKVPVf1QITWL4DbZrExg+X5QlLzUIcT7I+SRMYOSe7mIUvAOg
+LPGjUO/dJDZLvHVkidAPp7t7oysbJ7HsgPOUzCV9IOW++Ex8fxLLWJlLIbvU
+B8KNnOpUd6awVLXA4n8evcB6174LRKexrAqNn4MH3cBA51cqcXsaO87rPsfz
+qRtoimLj40OnsZGT9Pt+l7uBiLjW0nVjGjuvXtEcldoFiwlHNiQrZ7DaY9PV
+yzadMKsu3Z+wMoMtKjx8XnusEybmNb/REGaxm/Ija5f7OuCXoqPfzKtZLDEm
+WV/1UgfUdTewvdefw5geNsbc02iHH+4jO7R+c9i3VGc9L8p2+CawMfS0ZA7T
+SJB17I9qg0KHY5+uH/mNNRqpzOpmt8IHOpfT9NO/MdUmG8bz6y0QVxTE7c45
+j7E8Xo9ZfN0C0UYf/81pz2P+fD0vKgRbIDijpbbm8zwm/jsVDzZtBrfzBEMP
+twVMxuhdbODvRnBaUFSez1rAOn8KNg6GNYJ9hC7fzeEFTOQhhfG8UiPcHXs6
+I6u2iI1txBUzhjfAVY92lwXaJUy/H8+8drUeLhNmjG6dW8JmWbKKTSnq4ULT
+33P1DkuY562gsu6vdXCO6wRlSs8SNkD/O2JEtA7Eij3fGX1YxvzXlCVecNUC
+iQv7kBX3ClZUXkD6RqwajMyzOsvkVrBDIan0paUqKLyINdLprWAz2y7wuKAK
+LI7ZlBT7r2ACTWaGDWeqoKrhWxjZxgomrAJJWyY/gKdI/9VNxlVs7ZLJaNmJ
+H+CYOOOZI7qKcb+XzLVdRyDgyGRrcGcVSxqdGgl+g8D3iJVGausqtjeuQ3Uj
+BmCIfPfMzu9VjNY6a+37GQC5lTcyOuRr2GJduvqXsUqYqik9tnFmDTOhCRiQ
+PlUJ5+1p99Qz17CUgnjs6fA3IPtR+HnSdx3bEv9e+smtAkyytT4pfFjH7k1m
+tltJV0Bx1FB8UMU6VrVh44UtlIPVA4pA2dV1zJuUJFTKohxqWY0sfU03sMZ1
+f5n7Jv/xvTUxF0FpE3PMGtFp8yyBEb1oBleDTYx6UT5rQKME5M+IkTc/2sRi
+1IjkixlKYIbx+ppj2ibm0ZysW5X8BTTLM1qqWLcwT+XA0omuYqCk0/OxWN7C
+iOpjXJRvFMHNE0ZInnob2xTg1L8qVgRZalaHNILbGEdUK+nBYSHoPnXzLLq1
+jfVXkVRSZBdC9EzSU7Labeyi6CRPLGUhCP9YfZwWv4M9Pfsvr74/H9yG/uY/
+K9nBqIVUK8m/5EPTNvmKbscO1nvU6nlxeD7YS/LYb1PsYlJVlO0mOvlQEq/2
+4ILjLnbvPLp85U0eaLhEWsxf2MM4+5kIT+JzITo88WOl5R727PqOmrN5Lszl
+pI9FeO1hxEFVR4SEcyF48qvpmeI9zCt86rp/UQ50600ZBR/7i638KFOj7M0G
+K7HT1yS3/mKvBN3uLCpkQYkmFkHCvI8F9nksFlJkAZWFdkev2D5mllv2h6Q3
+E3Jibl95fmcf6wgWeqrgkvkfT/lfam/Zxy5qD6p+/5YBvmO96o4p/7Ck5Dgs
+xzwdRsovPXT79g+z/bRHvqWUDsqRKNqr5x+G7wqrfGBNhxWNrN+vKQ8wkS90
+QrQNaWCa7RmaYnuAMZZO/T1xOg2UXQQHu2UPMZFGoUrPY58g+kos2aDOIRZ8
+PKpC/iAVVk8ySI7fPcRKRR+0qQynQsbgtvfSu0Ns+genu0xCKnCoNgtT7B9i
+mSme0gm8qbBLrlR+xIIIp1aM2fwskQJpjus/39sT4Sq0BLVRphQwGM2dOO5O
+hA8rXmLS20iG/DIBupNviXD95Z/yK1+TwdqWzkyujghfvF9kw6GbDN3to2SX
+RYlxWVnbcnPPj5Af76/ntUaMb26NksaSJkEzq/8sIxEJ7kj5usKt7wPMBL30
++khPgg/ucbmJZHyAox5+OTUnSfAoyhD5mosfIMDkBRWtGQleu3eQ/f3tezDn
+9ULvmklwlzstbrXKieAe5XlD5BcJnl1J+5nAnAjR9J7LFTMkuJfvpZsDswnQ
+8s/96AgxKb49piR6OToBFEeeugkqkuL3Ln83kNyOB6YPzlIFqaS48v4RxN4Q
+B2KczvVqhaT4lU2Gl29S4kAz9IlpN5DiWifI0q88jwOP507B2wOkeHqv2Xie
+QhzMmT2eU2Emw+0YSYebsmMB8T9MavIkw5unDx43JMXAo2QrpilDcryNWJrm
+fHk0hDyNTQixJMfJ7ndzRb2Phs96rSeVHMjx/YDtVTa/aFg+UFANCSTHnXk0
+9T9ciQY7Y1pHxW/keBE2Jtw1FwUP2Aq7go9T4OyLwZymhCiw9j+MPr1IgROt
+e5c7lESC/205wtgOBV511a9xOCkS0uRs8l6TU+KN2bXH7IMiYXqis36UjxLP
+cLZ/uG0eCVZY2k6gPiWemk9tlkofCRY7OkYjJZT4XZGQ3JMPI8D0QRzvKx8q
+PG3wwxCVejj8/UXduvqGCg8IvhBWIB0OMdpPvUziqHCue3KXn/CHQ8fJm6PS
+RVR4CVsMq9ZBGJyfZf84NEWFP5ip/w85wkDEKlxQ5gI17pG2pGukFAYbtwPE
+hhlocKs10bWmNyEQ9nN7UOsIDV6wwWs76xACEir3ggtP0OBhZfPl4gYhYH1U
+c+kVToPHLy6mSR0JgV8DpHkyjjQ40/WH/uzZb6DyxnOZgB4afLxou4W1MxgC
+9V2UZBNocZv0uj8UZ4IgokXULieTFidlOj70iT8IErRG3wuV0uLUQq3/HlAE
+Qb7KBTKuzv/iKzFfrTtfQ78IT9s+JR0u5WOGH7V7DSdJKq3qnOjwCz61EWpp
+gVBXSB526xI9buX35fsX2QBol6io6rxJj9sSTZ6M5Q2AgQz7zUvW9LiMy4um
+OMoAWH7fZ3TOhx4/9Zi+d3vwFXAEZQoRSulx/4B1MVb/V3DX8vLXRQEGfL2d
+TvPjqP9/HBk183yPAQ9JuZJRm/YSWJa9GFgoGfGy8n5X3aiXcLzhvnwqKyOe
+7KxovOj7Es55nPVvEGfE01gf91rfeQlPpyaFmM0YcTJr4f2rvC9huVjmbnI1
+I55oKVG7EOMHi6Jzjy00mXDrG3+WtN/7wgbn8MtsHSa849PgU8VQX/hL1hm7
+cZUJz+BaNVT09gWa0a8//M2YcBa6uThbC184ERnKnO3GhHtRiD1OPOELFn/l
+C9azmPBJ6exTXF9eQF/zyxU/RmZcSKRPtGrQB96eS9S4zsGMrzGxEyJ++sDV
+guI4IV5mvOz98o4j+EBr9OT5OlFmXNfzX6d1ig/U3VGNpdRkxhPjci3Y7Hyg
+ZHtf9bUHM67xyCndgcgHoglPIkN/M+M3UbjuSzlvMIgOmjNbYcafnEiiVj3p
+DSzUKSpS28w4iHBm0Rz1hpDljtl2MhY8cfWjVj2pN/iXnzrLws+Cn8Tb79en
+PweXKwtTbw1Z8HBz1ehTS15w3d1CPq6aBY+KpiBuf+0J0YlsFNuNLLhizpGY
+ERdP6IW6nmvtLDiT5DlDYktPMCQTc6YfZsEjPjoPvjjjCTffrBd5b7Hgpj0s
+fE5LHmD0wU/6nggrTvnVvXTVwAPMq9PE5UJZcb39qkfl0u5gR7sg0GrEhke/
+Ix314X0KC08ryGjvsOGBMvHr4gxP4cFc4IzWPTY8LSaCdubADe7Vnsz64cSG
+K/IHEb8YcwOL59bSX4LZ8KZzWZJmqW5wa30cS6hkw28dUzuZJOkGmoP9Jg8E
+2PE1K1eTVh1XOJZdF00xz45LEt8zLcxxBoMPZeVNK//Fco21Jh+c4XVk1lDI
+Njt+gaLMmTXCGTbcQwQ4yTlwBgs2p0+uztCkY/j5BD8H3nasVN1I3Rlclqdr
+Lxhy4GYcXi/3hp7AT2nyzddVHHg2TfzpYq4n4F6mfo0xnhMXlbdhUctzBBmT
+9hWzj5z46jjlqUufHGH+0CQkP50T703jVDWJdwQjLZdG/WJOvCrvKyH6lSMo
+92Zgb39y4tP46M49c0fYWacX5ybiwrunGoo9WB3B5VQ/GeEuF05QHZGQff4Y
+HNLsSuRPceO/KiYYlG0dYKTtSBSDPDeuvjDQb2DhAJd3m5xmznLjn7hyB1xu
+OYCojoh09EVuvO5zmXW7lgNMrU5nb97lxq+0pTX0CzrADRWzj8UJ3Hg/UaSk
+A3oE57r1g2VoePDwvy+J9kvtgY5EwUJymgeftr65Z9xiB+WupNdmFnjw43v3
+/5BU2oH1Upv6+zUe/E1BaWxxnh2g/vtCDERH8J96wZMKkXbglBc3t8RzBGdM
+MhL6bmQHAyYH9rl6R/DKGVbD8gVbyCitdRf/dgQnZt9MkGG3BY2HBlGikUdx
+36hSfX4/G+Aq532kIciHL+TVTJr/sYYIx4Bwqb5j+NtF7jT+ECu46n9FIrGE
+H29McQ+iTLcAUWO/66mex/HeGCNyXao70DtDnRx5XQB/dIyj9CyxGbRaTKuy
+HCPgSXoit/N8TGCcLH0nSoCABzp5OSm5msBG2v08bmECvpvrfrHRzgS4FxaO
+Hpcg4Ifb0SJ7N0zAymlt+9QZAl5Tpa6QJGkCe76HuZdvEPAguWcbu0PGIPyJ
+mycwlIArlvH116sYg5LWYDtdJAGn4807TiJnDDq/E16FRRNwJ1f5HFVRY3gs
+wb/5LpGAlznwO7dzGMO3L8LtadkE3DP410PxFSO4WifrX1NPwP2MPX4MpBjB
+3fubZy80E3BHeyXTe3FG4EZTut7cSsDjQzSId8OMIFFX+U5XDwEfm2TWEfMy
+grle/OzEJAE3X44Lb75pBHtuJOt3Zwn4L2zg3/MrRkB/pCbz9zwBfxCjZaCk
+aQQyZlqcq6sEnM+jt6BC1gg0iKlbn2wS8C95bIUvRI3gZkqT384OAd+Qqwi5
+ctwIHmgEn/HYJ+CRCybnj3MZwf//++EChVFt2wxG8H8rcYN3
+ "]]},
+ Annotation[#, "Charting`Private`Tag$307210#1"]& ]}, {}},
+ AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
+ Axes->{True, True},
+ AxesLabel->{None, None},
+ AxesOrigin->{0, 0},
+ DisplayFunction->Identity,
+ Frame->{{False, False}, {False, False}},
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLines->{None, None},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ Method->{
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
+ AbsolutePointSize[6], "ScalingFunctions" -> None,
+ "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
+ (Identity[#]& )[
+ Part[#, 1]],
+ (Identity[#]& )[
+ Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+ (Identity[#]& )[
+ Part[#, 1]],
+ (Identity[#]& )[
+ Part[#, 2]]}& )}},
+ PlotRange->{All, All},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
CellChangeTimes->{{3.871624407919861*^9, 3.8716244955603247`*^9}, {
- 3.871628888535161*^9, 3.8716289223051*^9}, {3.871629457518793*^9,
- 3.871629525242256*^9}},
- CellLabel->"Out[93]=",ExpressionUUID->"4a56b86c-fd32-4aa6-8c0b-bb95b62204d9"]
+ 3.871628888535161*^9, 3.8716289223051*^9}, {3.871629457518793*^9,
+ 3.871629525242256*^9}, {3.8716296137151327`*^9, 3.871629625997673*^9}, {
+ 3.871629704200838*^9, 3.871629853550775*^9}, {3.871629898460318*^9,
+ 3.871629914537928*^9}, {3.8716299451102247`*^9, 3.871629954339423*^9},
+ 3.871630097238586*^9, 3.871630131562233*^9, {3.871630181745326*^9,
+ 3.871630258132637*^9}, 3.8716304351074743`*^9, 3.8716330652711782`*^9,
+ 3.872233200053898*^9, 3.8722346935680523`*^9},
+ CellLabel->"Out[54]=",ExpressionUUID->"15c08e09-69ae-49ce-bca4-734d90c2d092"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Show", "[",
+ RowBox[{"p2", ",", "p6", ",",
+ RowBox[{"PlotRange", "->",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"-", "10"}], ",", "30"}], "}"}]}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.871630257338043*^9, 3.871630260657209*^9}, {
+ 3.871633084735176*^9, 3.871633098326951*^9}},
+ CellLabel->"In[55]:=",ExpressionUUID->"c241bd5e-e38f-4710-8e5b-f8e7f5db0d5e"],
+
+Cell[BoxData[
+ GraphicsBox[{{{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6],
+ Opacity[1.], LineBox[CompressedData["
+1:eJwtmmc81+/3x22y994fIqJEIvJ+l5CIkigrCakkkT2yR0lkZFWiZG+Kyrlk
+Zm9l7xnZe/y/v8fjf+c6N85147pzXuf5fDwuIYvHelYkREREvv8d/6te01dW
+Dg8J6PKFteBXLEYw5cG+3r9HQEcc+2h+8hiBDuPw5pdtAjq9Nfdoi2AEgor2
++49XCchI63KPvZwR/Hz+mmpkioBez6V7RtwwAirpXn7UTEAZ4T5aL+OMIPqp
+uZZPIgGJ/KT7Ei5kDFnEjh+JzhCQoD7eqIabALmVxikuU2HEUS+rqb1oBiy/
+a2xTIoWQ6x+1h+6T5qBXlXD3WIMgMs6vWtf2sQCPf+dsI8YF0E3xKkKzvyV8
+dUl4kKfLjyTWl8/WFluDsOWTT78v8SMduzOrVGANL69eGiG+wI+qF/M+6P2y
+BotjGzf05fiRF7ju7AxaA03/tfPbnPxoY6zwSjLlPTBTOcKpOsaHbjXTiKqa
+3ANScteanqd8CONdcOKksQGd1zcED+J5EZdzAneUz31wP8WgqRHFi76/WOuL
+CLsPaR31TyLC/usTpTK/ibsPB8zKVcLPeNGbc0uUP/LvQ06UsLWGJS8SeUj2
+9/HofaCN+ZcVIc2Lxm7a17lefAANb0LPEKp4kMdB8Xk9poeg8faHzqW/3Ejv
+Bh8Lod4Wll4O7JFNcaPt5CTNsG5bSPDezawc5kYagafGDsZs4e9tRUqlTm7U
+U1pmQnRgC6+FS0CqnBthTTyPneQewdDn7JMsIdwo5FHV3InUR+BcmMg8ROBG
+UVijv1iIHaTVufU4GnOhi1tGzeKK9hB/ylk1Q58L2X46eWvwvD2EvXXIH7rC
+hfpv/5uJu2wPDo4Pn2viXChvxOKUqIk9nBMwVREQ5ULWgrsXop7ZQ5czntaw
+yImuu2xLNtXZA8lRSmchP04UtJA7PGv6BMwCotla0zmQE5FOcGWKA7RgG5Su
+KRyo4qg9aVW2A2C7hjuCSRyow1A4sqnUAQQdeIYdXnGgHzIkZFsNDjB2OyWd
+3ZkDuRJ3nitYdQBrpXwlM1UOxNCn0Ves7gh2K413FgbZkUzqAM2FVUfwNifN
+pWFhRwq2WX5ZNk6Q36oR3kXLjggkMUPw1AnGVMLs3lKwI295fZchHydQ52M7
+cWKHDR2of395Nt4J6PuO5uuNsiFBydzYxw1O8O765cL4PDake+5WdK+0M4B6
+ZKmYNht6wsNfsnHoDCsl3bFLamyIhzzP9gGdC4iIcruUYWyoY2dyfZbbBUJI
+U89oybKhBubOYlp5F7iKir/acbMhP3ESuzFbFxhR/F1eMsOKZlUum/YPuACR
+lACoBrIiHRMjCdtaV/BkP28W6M2KTpD/DqjocYXNQ4v9WhdW5PVLnlJo2hUW
+O9KULj9gRQGVx/+wU7lBv6v016u6rCitso+x/rIblFafKzDlYkVx7rIq+p1u
+8MjEJNUlhwWJdlPOlC67w4ya94WyNBZkd2XM5SyZB1ieSB7dec+C1sYeiLaz
+e4ARyYSA92sW5Bsupaqg7AGX0h8mBbiwoJ+vOVyWgj1AZM09JvI8C+KQO14v
+SPCEvhfxwVndzOjbvJm71n0v6KwRzDZvZUZLkkS0h55e0HT4uY3tFzOqUEl0
+qI3wggrHUi6f78yozjTpWORXL0gx7szST2VGTuuVclxHvOGBJF3bvj0zagtq
+o6TN9YbdBh/Oq7TM6DR5nKMImQ+skVGdI6dgRoHtz08aMvjAosqrO+WHTEiy
+YKsghtsHRgrfZoqsMiHndY+L8jI+UJ1Qrrz9hwlNplB4U972gbAHa+Ypn5kQ
+zY7Eje3vPsBLbZOxdoEJsY/KfIr38wWziqYwYWUmhDeriHpE+MIHBxn7q6eZ
+0IHljZOP3vnC0f4d+WwxJvQpF7/mX+4LJ7JfVt+lZUJajBw57qu+cEGnaLij
+mxEJxBZt5dj4wf3XB2wFNozoh/IziTVzf8hWv7s9dIcRkRSdtuB/4g+LO3UD
+tMaM6CClYsTE1x8c7kam2lxhRB1V8Wc5UvzBU05ERvAUIyrk9ZEMnPAH/pyo
+OP5NBmTxWUzD6lEAPDwtQd7Py4A8Yxl/4xGB4EBe9tmZgQFJnT6IGEsJBPdu
+jcvMJAyIdbHSJ6kkEJ47Wb3SnKZHDkXBObf6AyGzJJnrawE9stPyWNgXC4LZ
+0xzSMer0yJKVqZm1NgjuyZMZ6trTofwC3TN17CFgRxG1PWdBhzL/3e+rPx4C
+zj1CSUE36NBzjnM/Zi6EQJAzNvrjLB0aEhcQCngcAmml7g+Pk9OhOYeiNyca
+QmBSfvnZkQRalEMblh4WGAp3zwylV1XRoFWHV5Kc7C/AOv2MgfoXGuRjZ8Xw
+WvoFPOCKJP2VSYP0LnOfk9J4Afa7qmYtkTQokp7/fr3rC/CEDJY/t2kQgYdQ
+Fzf4AqI1nLwXd6lROsOfqD85YVBrSKvPJUeNGoPimL49CIdf9VbESWLU6ECk
+gGg4OByaFCGXn4cavfycv338Uzh08DgcESGhRmrxorqXRsJheLi3QrrtCDra
+MpgYePMVbN1LPXbR9gjiukFFUiQeARKuZw/tPlIh4yOvD1NkIwEN6kiMx1Kh
+rUFF7wz1SDBQvXvDMJQK3RpgLmq9FQl+9GFZmB0VKpHOMPb0iYQ/HwcNGRWo
+kNa9zgSz1kgIaffJL2ikRNR/yzhDHV/DlETdnbUVCjS6LmHzpTcKPCP6w2wm
+KZBGJxTp/IsC5o1/XwZ6KVDIYy4dRspoUKnkpK/5/t99m3ZK1jPREGP4oDwm
+iAJV7q8SHYuPhosBdCxnuCnQ3ubN5hmrGPgweL3a7Tw5wsVmmyhF38CpiVM7
+XXLkSGqZ/kQj/gaq55hOnhQnR6ZVWf3I5A1MbbYmTtGTo6r9msOLMW9Aglnb
+8foAGTrPEnymgioOCtUvCku5kCEfzSMZ09txoHqFcDPkARmaC1L0oeWKh67r
+JOHjpmRou8GQ0lYhHjbM0Xb8RTKU1JHjPugSD0oeyu0UzGRojHqvOGE7Hqrz
+5HxGskmRjIvMNvWRRLhRylKqlEyKAibxUZHjiTD1fWU+NooUBc1VffHXTQSq
+hnzDK+6kSC1XmZblTSJcmTh+olyDFLkQhwyHHUuCHk7RoagxEjTKob0Rb/IW
+pn3ZlDU4SRDUFJk+J0oGaq+8f1HUJKjlR+sYB1cySLtqpo7sESPDPeGQIZlk
+cLbzonYfJUYqtxnJuS2TgcJ48nd2JjF6q5pPMGtMBhG5Eifmc8TopWdES92n
+D3DphO6x2yeIkc2mssCFnx/AVmJ2IEuIGIm5flcmGf4AxYJ8F9UoiBFliaav
+IVcKqNIFMru2EiFVsnO+9pEpYDGlnzd4hwgpmajHKkekQtDoooWEPhEKTTtu
+EFqQCpkDIewu6kSoUoPG+HhnKqx0fPdilCRCDGPBm24cH4HkmWZc0MwhiDwr
+ojT4+BEwmdn2a3SHoBEuxaHY9gmCxPgU55cPYOCxFXng5ido4buWHNBzAFbk
++tvKAmlgRl1m9+X9AeyO5WlvPk4Dz/EQGr5TB+BdpdJcxf4ZymPE1WYM9uEM
+/Rk2TY90oDKevkusvA+8ftt3NTPSwUAwzY9baB/Su28St/Smw0omAWnP78Eq
+6Vt9W/kMOIb4lQqe7UFtsNGkwk4GxM2xyrin70J7VbQTy7ssmMrr1I16uQs0
+t15KWXVngZzTa7tsh11YXpeUvkOXDa2HDNlDyrvw4oe90d1n2UDBRiOm2r4D
+/B6atOMPc8AJI+aj3dkGpmvM7W/v58FPMqQkOrwNLCopCdQ5ecDY4G2kUr0N
+BS3ucwbLeZCtv/fGPnwbkgoruXVV8mHi/iZzt/A2/KtaQtKt+aAXvUD1TmsL
+pEzGeq4fKYTkW9liX05uwc6DalkW2UJY5H+o3sa2BUdOiVbbmBbC84wZf5KR
+TdCj27s2VlQIlRXjB9ZPN4Hpn/9Za5siODn7Z+3E2w1QyiiRK1wphqdLUsc4
+AjZg41f6ky5CCXzd9DU9eLABVWorslk3SuA8hURtk8IGrJqGTgV8KwE9gvub
++13rkH27ZUQ/ohRiJVoar35bB0yCMyiorhT6ZYSJFFLWwXs+Iz7ssBQs8QYb
+Cvt1eEgeQxB3+AJOptxnU2nWwWpjPE3Y4iuUW9rZPV9Zg4XRpU7P5K9w8PBn
+ypM/a2B2cFOgc/grBLk/oME/r8HVL6Rlz++UQdyb8oGBC2sgqDFPaHlSDuXt
+Rs/Y3Vdho+bj+dDG73DwO7do33wVHpib5ubz/oALIyQzExqr0LktOqP2+Ac0
+LmZeLWJbhejE2pIhzgoYoNkVulqwAg0eOgeD3gCCLLoGZ+JWwL5sQjJoAMCK
+O/U5/7MV0KbtvbbJh2BRXGv1r/YKSKe+MOL0QXCollgdOrMM2RK/Rpd1K+Hi
+lX9b9q3LMKDif+geVAkh+qpSN0uX4dLv1kDuikpgvDsfczRgGR5xqQx+P/kT
+hH2U7lUJLMPTNOlkH5EqsA5+lZhJsQx/fi3R5lhWQWb4eGvkwhJsDLC9Vkir
+Atm3LxTMvy1B1S3V63FS1XCxvP/IvsESHJPkJ6nWqYHczE+KdUpLcJurL6no
+Qw1wJj6+Hym4BOQOsUKlGzXQs0nxWqvrHyhGTf3DP9eCqIcB49udRWg09HX9
+IVIPW8Zzj2WqF+EEIbA9/Hk9NCl7t9a8XARej0gtsdV6eHrwKXxRcBFMn4XS
+8Tf/gp++67S4xgKYSvdthXxuhFiLUNsuxgX4eeo67/LRJrivytdk0/cX9Cse
+10tkNgEjudqLyEd/YVYqq+rb92aYmPw9J3rmL5zL2Hn4SLsFvtbaXi4n+gun
+iWrefhppgdsh0UfGo+ahYUip+AdNG5y6L37fxXQemjzvfLlo2gYUl7/X04jN
+wzczrg/PCtogl2YiWK58Dpqps59GW7TDXrgsRdDILNyLuzKgOt8BbY/rrLgz
+ZyG2SyfFxqATUq8a1+Q6zsIbvxs1vjWdcJnZP6CXYhbeXTj72DK/C/hX2Sce
+ts1AnNrjY8nHu2GlM1OVKGEG2DyoJUtyuiE+poPkmNQMbFr69bpDD9g6W1v8
+2JgG48vfByqu9gJuuFN5DU1DzBJFNOlML8xwCvu6X58GJTF2iaVjf+D7dskI
+Pd805CpbkN7s/gOv+jTx1KkpkJ+k8j0f0gfySU8OG92mQLYA+dhQDPy3L8hv
+m6tOAX9cfWxKxwAMmsZXrNFOgXXGZP/N9EEIEKj04kueBDtqBb33DsNwk+jG
+YMH9SRB0RKGY3AgcH51RVpedBI5vwzQqJSPQmcK4Z1c7Aa5/HnIQN45Cmv9H
+Y9KICYDCocw08zFwt1T49ubWBNQGdujzH4yB8FFzd/R3HIb5y9xy9CZgg2Lt
+j37pOPBZ7wasU0/Cr+lgxdln45DonF/m0DwJ9hl5W0ws48AZzkB54DgNJ+nt
+/C+MjEHJDxFxysszsOxwnN4xZwyu/j7ZVyE5Cw7KGYQujTEgM+9xcmebB9kP
+93LJ2MbAkHH1nIbAX1gjP6p4emwUGJuI1w0UFsCpNUUn1nMUeiNEOT8k/QN5
+uTt/ajVHoQlutAg5/Tc3cQKWm+yjQN1MfOtAdBlK9wcXxSZGgHWM4dv70WVw
+sUhyu1kwAk38uf3N6SugUGdEFuo9AioLX0nNPVdhS5LrVZnWCNyv7Vg+Z7oG
+q3OSmqebhsHsPh9n9+UNeFqcbhZrPQzZd8Jlym9twoaX6NNNomE45HrLqua+
+BS4aKaE3E4fA4EtWPMrZhi1Ggfdlp4dAcjQpMXx9B9z6Eou52wYhq1yyTfz6
+HuykcjZ4PBgErbQyW6H6fdiTZ14/934AhDw2PN2eESEvolfU7xUHILX6Aqm8
+BTE6+EUjSNTVD3qXxHZwfRLkExVy+o5dP4g6KIS+MyBFxKbkWj+p+iG1xaLS
++D8u8jvqZ05I7YNDJvqrYRHkiGzpwCngXB+EvdPW1WigQBT+W8nqDn/gLFc0
+eZ7nERSs7VT6mfYPFIhnY482qREV+0oj1effcMc3S6I+lBZRZ8xvNPT3glzq
+qy2VLQb0wsGG9rhzLwTGDgokzzEiWuVJoZeMvWCkZVoDk0yIoXVIW1etB8rY
+x0JDiVhRRJyxRf5wNySKYaal/GyI2eK3C5N7N2TXXMON1dkR63p7SmduF1xv
+M/pnnsGJYip0vsppdgGbI0O69xAXYg9pbI4Z74Rzn7PCVRh50Jtrl8Y3vDph
+0QBR9irwIk6emi1Dzk6gKf5nzXmND8VPnKcvK/wvB1bLXipe5UfcuRUE7isd
+cNyYz++TpABKclFS9Jhuh+lN3tbmHgHEd/6rzoBvO+yXnPTyFxJE76hPW57j
+bQdXg78U304IIoGuArd3pW1geU+EPIxWECW/lX51eLUNZJR6RxeMBJBqi4Fm
+ZU8rrMaJ0t6i50fqd64+9adphZppbscSHl50aU3zvRreAr8aZ1uUH3Khy8Gq
+DZROzdDsYjaoPMWGtLnPrf/KaAK9v9R+H12ZkE6OvGDYUCOU7kU51opSoWv4
+SS0dlkbIY1P/Lp6/Afqdx5wZLzVAuXJJPj30YwbWhA8dnr9Aaj+w6VCWDH/+
+xDHkdUk9lC5MsiJRFvyHZ9VjvcU6WJ+p+bg7xouLRN1V6bhdC0a2m0uvWsXx
+m++KRF/H1cAa/oRag0Yaf5FBSqfXXg3M4ltl917K4BXF19eYqKvBdLf1kHhO
+Fl+B1P72C1Wg36j6r4FCHj/auPoz0uMnqOrZCY62ncFv9ahmXiuuhD2BL0JO
+Cop42GhUJNMCgo4bAVGjMmfx/7LFtV0UAR1ZzvPHpWfxmX/3kPCPCmjVoB4o
+qD6L61JQvUqR/gFn/W9NPTY/i5fyppsKJ3+DiWOfRMReK+L8speOpzCVw9Ra
+fugZawU8UHNmR8j/Kzy0T1fqnZfH/94O+fVhrRSu5B8WLsiexq87i8cJWZfA
+p9Dpj2u6snh5WL31h94iWKtWStq8KoMLpdqcFtIshDyuHzlBL6XxkDIqsg/l
++aA5UaOQ6C2B5zRFXjivlAUkabsPnjUI4x7b7cM4fzr4j9SfPx3Gj2seZfbC
+iT9BqdzNBhlmTpzjuh43PvEBBBYINYqnmPHGQ5HHz8LfwpRexYk3o0dwm1uf
+Mrz130DryzvGZfFEOFmR6IQXdyTU012f1yNbxnAu7XM7KBD2NI/Ohr6rx5bi
+4i2X4x1g5B//2tHIUfAkia5RV7iFRTf39Jmj/zgl4W4dq/wz7KVQ0PBF8l0Y
+4ipYpGEIw36z/3xsO0GErsv+/h50Phqjp4/u8HhLikr/GPoFeyRgflcWky9X
+kyM6NE+oNkrGuL8eXvJ7RImwqKygapdUTDhQvb0hiwo9sX44Wx2dhsWO5Tp+
+f3UEpShKatcUZGAtBUc95/7z3i7a+dyalmzskKnK89CHGlGMZDLVzudhj4l1
+L018okZJt06fvRtQgHFOywf/fU+NTqvGPBxnLsJc3TMpyV2oUcvx9aS7H4qx
+X/oj9KMy1Oge+42W8ROl2Dszw0mRniOIiKjk8G7FF+zalztxYTZHUPwsq8yE
+dhlWaLTiTr9AhU51PrWw7C/H7rpG629bUyHLNLkay60f2LFr/P1v1CiR5VGj
+mlNcP7HIstWmN6Nk6CQP9ZDDyE9MberFV2JNMrTPUL5R+LkKo7uW/EOlkBTF
+bnOJy8rXYByks206YSSorunPc9nr9djzu6wP9+8RIRvXvjpjyV8Y8250Lu+3
+Q6AS6ScLIG3AKmjoJ83zDuCyx4B3V1EjJpZzQ0u/aA/mjg5+23vRhBVU7ZX1
+/fzPKzoGt0QsmzFG58gBhf4daDo27ODE2opNvlAqLxTdBtvu4by3f1uxIdMR
+fiPDLQjC7TcsLNow8+mDrtWITRD7ay/74mw7xhynaLvMvQE2qg45/XMdGMmP
+d1UxfqugEL/S+M+gE7topVxz5+8KUP1zmCOt6sRmf3h0kJusQEaCo9jxxC5M
+3KRAeUhrGdyXVtVwym5s7PDs+8TGJbis/tRS37EbM94jw1WvLsHc8tMPnlo9
+mAjTdNJayyKUa6xDxJcejJgqR1RjdQGev3Ua+kjoxQo/mD7pFlgASU1nnubd
+XozhxKuTZyPmwTbZJYYv+w+2fZX0K0PNDChvbBbJcPZhzhyTRPTCM0Cr7dqh
+FtCHXWSXWOgImIacTVcGO5N+LNeNyrHUaAq8r2xL+dX3YzICmXK3/+MNnVQ3
+7Vi5AeyU59nPYxcnYVHHPbSCdhDLLrsllXV+Aio+7nzucB3ETh6k0b+qHYfw
+HffaqYlBjOxbKfEL3XE4keZByvBjCAvsv9Yq+GgMvnpXVOTJj2CZnwTuBXeM
+QHLGQXOZ7QjWzNDUOew4AiFdKoNVKSPYGFvVpATnCNyUgN1e+lGsUky47lLH
+EGx3gwLR9Ci2z+Co63p9AMaIiC5R841hFpbWtY+gHxokcUPW62MYGXDOF5/o
+hwRf5CQOY1hm9LZnLG8fnJWqLLz6ZhyjcJZD8YTfcLqrJ7bi1ziGnlYwVJX0
+wkmPv+7H98YxcYORnG+Xe+HoLw5VqjsTGGWM3Zcfnj3AYmXXCRKTWKbQb63M
+gy6gpw34ImU6iRl8iLb9+7ELqIviExNfTWIpfvrXbl3pAiLimrsua5OYVaXv
+6ccfO+FvEs+adMUU9iD+nVvb/Q6YVpX5nbQ0hYWYVKylC3TA2Jz6d2rCNCY/
+xkwj29sOfxQcAqaCp7Hd+7Z3jmm1Q21XPeu7azMYUYp9uL5aG1R6DG3RBMxg
+FZp1V20p2+C78NqAW+kMlhVQdK80phUK7QU+3eCZxTZ/RD06mdUC72mdT9NN
+zmJVMneDJVebIKHoBZcHxxzGqYAbdj9vglijD/szmnNYb9urpx9FmiAsvamm
+OncO001Ts3I1awTXiwQDT9d5bMFvxd5t9hc4ziucncucx3Tvsz1qivgFdq91
++G8OzmNt4RdQv+IvsBpxm5K98Bf7NXrBiySyHvQ825znaRawqsA3TZf06uAK
+YcrolsoC5i911Fifog4uNeyq1NkvYNZWF/sbvtWCCqcYZWr3AsaaspHQLVEL
+ksVeb4zeL2JCYmw/3DlrgMSZbcCSawljMnvUHSxZBUbmmR1f5ZYw+r360pmF
+n1B4GftFe3UJ05grPPKo4CdYCNwvLQ5awm6PLdJWK/2En/XfI8jWlrCdK5mM
+qyaVwF10LfgmwzI2d3rBpUSsEhzeTnllSyxji1ZmtjarCIQdGB/q31nGsqhz
+J0NfIvDnsVT72LKMNa/H0OrFAQyQbyttzS5jNafNpMqUAOSWXp7SJl/BWIeO
+F+aPVMBE9ReBNaUV7N2vRxlSJyrgoh3NjmrGCkZVH1/iNPgdyCoLc8f9V7H9
+XB7JVNdyMMnS+HTm/SpmE5VhaiFTDsUxA4kvylex/uVZwrn5MrB8QBEqu7yK
+DXsbWkhblEENi9Fdf7M1bIVSwcDa5D/ftybmJCiuY2cukCw0e5XC0NVYehf9
+dYzL/qjhH7VSkFeSJG98vI4xEsv/K6QvhSmGGysOaeuYX+08f2VKCaiXpTf9
+ZNnAFPcz80c7i4GS9qqvxeIGpjotmq9oWAQ3xYyQ/JFN7ITRuchrkkWQecHy
+kFpkE6tv07m8f1gIOm6uXkW3NjE24QBGiqxCiJ1KdiOr2cTQsUG/OMpCOFq5
+/CQtcQu7qe9ztu53PrgO7Oa7l25h/U9stclL8qFhk3xJp30L6xpiZyqOzAc7
+aW67TYptjFTe1sZEOx9KEy88uOSwjenVpcXqvMwDNecoi7lLO9jvHxpRjok5
+EBv59kPF3R2MjNvyy1PzHJjJ/jzy2nsHm6zEokWO5kDY+DczpeIdzClIoCew
+KBu6rk4YhQnsYiFpu20UPVlgKXn6uvTGLjY+NkLx90wmlKpjr0mY9rAaL6vo
+QopMoLLQbO+R3MNqzegSSHoyIDvOVPfZnT0s4SmX+BnnjP/8KkirrWkPIy5W
+2v7+/X8c06PqkLqPBTdQkGebf4ahMq1Hrt/3MTmdrqZ1xc9wNgrFenfvY8M8
+luTvWT7Dklrm7HPKAyzs7+o/6vo0MMvyepX68AALeV7cKHY6Dc46i/R3yR5i
+FnlXY70EPkGsbjxZv/YhFv0pO0r+4CMsi9NLj1odYst8NhnnBj9Cev+mz8Kb
+Q4ylos3gVNJHYD/feJRi7xCTpnrAmMT3EbbJFct4LIhwO1KSvlypVEhzWG1+
+Z0eEn5Q9JjbMmAr6wzljQh5E+IXe2XXdtRTI/ypMKx5NhC/JveZb+pYC1g9p
+b8vVEuHSKE6PXScFutqGya5IEOMi/fufzL0+QH5i0FXvFWL8S+fuehxpMjSy
+BE0zEJHg5CRm711738PUi0DvD3QkuNfNQNNj6e+B1zMgu1qcBLfdF+Crvvwe
+Qkz8qGhuk+DPZAqjf0S/A3M+b/SmkQQvPS9tVXP2LXjEeBke+0OCk4n0JhCY
+3kIsnddi+RQJfm/RS61vOgma9j14h4hJcZxHlvNKbBIoDLm5iiiQ4gNL4hel
+NxOB8b3TyYKPpHgwEW0hW30CSHI41V0oJMUPHDRcXqYmgPqrp2ZdQIo7uPnH
+6z5LAM9njmGbfaQ4G51NV96ZBJi5/WTmHBMZ/l98/8dz8YAEHyU3eJHhb5xq
+79Unx8HjFEvGCQNy3IIxi+RiWSyEu8Unhd8lx+nGHjPFvIuF3Kst4or25Phe
+bdEca0AsLB6cOR8eSo7XbJ2//F43FmyNaRwUvpPjXoL6gp0zMfCAtbAzTIgC
+T0nqYTIjxIB10GHs6b8UuEwJb4l9aRQEmcoRRrb+62ueqhlMjoI0uft5z8kp
+8ZN+gTx2L6JgcqyjbpifEn/HfO3+pnkUWGJpW6HXKPH2o9LGH+miwGJL22io
+lBJX6RfPFH/0GsweJPAF+1LhPJQ7f6hUI2H3z5GW5ZdUeFVT9ssCmUiI03Tz
+NkmgwisjUi4/FYyEdvGbwzJFVHjCay4mjYMIuDjN9mFgggoPF7M7z/stAo5Z
+RoqcunQEL3Lr0TZSjIA10xDJQXpqnGaod7HhZThENG/2a/BQ4+cbe+5N24eD
+1Ll7YYVi1HifZl7pcf1wsOZVXwjGqXFW6/rUkzzh8KePNO+UAzX+yeepP1vW
+S6gwfHYqpJsar3DUaWDpCIPQa86Kskk0+OD0hwUKpRfwuknCNjuDBq8+Qdb3
+SfAFJGkMvxP9QoM7kZbtPqB4AfnnLpFxdtDgF7Vel1l3PIffx7hb9yhp8ZTL
+ziq8ts9BnKTCstaRFn+ZzBh5IS0UagvJI25p0eF09wy/l8iGQJtU+c+Om3S4
+WHKoWDxfCPSl261rWdPh7kjqVwJlCCy+6zVS8aXD5fsquzb7g4H9RYYo4Qsd
+ftysTIIlKBis7l759leYHrf1WLn4YTgIyFhjpp7t0OPJ7x58rkkLBOZFb3pm
+Sga868mGs05MIAjV28h/ZGHAr43eNPrrHwgqnspB9ccZ8MyG2G7rO4HgNjEu
+ynSbAVe+ZLCrxxcIi8WnrFKqGHBtGvvq+bgA+Csx88RCnRFvZtZb0HznD2sc
+g4FZ2ox4oSTupvDKH3bJOuLX9BhxvruGBgo+/kA9/K0y6DYjbthyLeGhhT+I
+Rb1iynJlxDWcEu3fivmDxa58wWomI+52IHaCs8QPehsDlwIYmHBG7L7Ez35f
+iFZ5q3aDnQlXckgXft3sC3oFxQmifEw4pYb/lgP4Qkvs+MVaCSb8TVp0h3Wq
+L9TeOR9Pqc6Ej0dpWrDa+kLp5t75555MuOkVzs/2RL4QS3ga9WqWCefpU9MJ
+lPMB/dgXM7eXmHBDnhtHzov7APOR1HMnN5nwmbWmDGpeHwhfbJ9uI2PGb9y9
+pVFH6gNBZSeUmQWZ8ffeajZ1n5+Bs+78RLQBMy5y/2fMiQVvuOFhIZ9QxYwL
+rScStT33gti3rBSbv5hxUd7CN0POXtADtd3X25hx1ezuG8R3vcCATNKJbpAZ
+l5Vl6PdT8oKbL1eLfDaYcfcH+XyOC55g9D5A5t4xFty0XfDLsr4nmFelHZd7
+xYL7KTg9LpPxAFuaeeEWI1Z8/1jDkC+fG8y7lZPR3GHFCZctVo/Tu8GDmdAp
+jXusOJucEc3UgSvcqxHPrHRkxS/AdWK/EVeweGYtUxLGilt1P5W+/dEVbq2O
+YkkVrHgNPZN4srQrqPf/NnkgzIYHNWibtGi7gEBWbSzFHBtelqpuVpjtBPrv
+v5Y1LLHh/MIZNSbvneB5VOZA+CYbPqsS58Ty2gnWPMKFOcjZ8XSpdYdPLk7Q
+oG2QKybIjr+gilc1UnUC58XJmksG7Lgzh0XgzsBTaJYhX3/+kx3P+ul3upjz
+KXh8Vb3OkMiB/202YL6Q5wCnTNqWbn/gwBffrUtrfXKAuUOT8PzPHHhpCPl5
+k0QHMNJw/nWtmAN/2JdBiA12gLM96f+5OQeutd28dc/cAbZW6Y5zEXHitJlf
+iz1ZHMD5xG8yghUnvm3QLiX77AnYp9mWyp/gwm8E/aY/+9Aehlp5YujluXDx
+xrbf+hb2cGW7wXFKmQtvoU3tc75lDxLax2RiL3Phcw251m0a9jCxPJm1bsWF
+Gyq+rf8tYg+G525/KE7iwv33fKTt0WNQ6boWdoqaG6endSba+2IHtCRnLKQn
+ufGEQa0d4yZbKHMhvT41z42Th5j8I6mwBeuFVtV3K9z4I4Os+OI8W0C/bUTp
+iXhwZoLP+JkoW3DMS5hZ4ObBNxt0RH8Y2UKfyYFdzlUePLicyqBs/iGkf6nx
+OP6dB//IM590iu0hqD3Sj5GI4sW/x+VdEwy4D5xlfI/VRPjxET0YN/9nDa8d
+QiJP9grghqbsaYLhlqAXpCv1tlQQL5Bwe0H52QIkjANufPQSwvN7bpLrUN2B
+nqkjKVE3hPE7n1m+KBPfhhaLyfPMAgR8wF/MNM/XBEbJPm/FCBNwPMPTUdHF
+BNbSbPK4jhJwsSm3y79sTYBrfp5XSIqAM56OObZjaAKWjiubJ5QIuN2RC2eS
+pU1gx/8w54ohAecR8FzbHjCGo5+4uENfEfB1N8HfdeeMQVGjv402ioDfHcgX
+IpEzBu3ZpOCIWAJuJKeQfV7CGJ5ICa6/eUvAo4SFndrYjeF7ydG2tCwCzne6
+/9HxJSPQq5UNqq4j4DdWvCr7Uo3AymZd+VIjAeckVTK7l2AErtRfVhtbCDi3
+kAbxdoQRvNU5e6ez+7/3OLBoS3obwUwPrjw2TsAVnyZFNt40gh1XklWraQL+
+oap//5muEdDxVGfMzhFwUW5NfUV1Izh1W4NjeZmA12/3FpTLGoEa8ZGWp+sE
+3FiSvdBPwghupjYEbG0R8MTcb+G6QkbwQC1MyXOPgF+5a3ZRiNMI/v//H94s
+9qZ1k94I/g9H3Xlh
+ "]]},
+ Annotation[#, "Charting`Private`Tag$284811#1"]& ]}, {}}, {{{}, {},
+ TagBox[
+ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6],
+ Opacity[1.], LineBox[CompressedData["
+1:eJwtmmc41//3x+29N0XyQZlZWaX3GyElUVIhhJRIIqOMiERkRmYJ2TKzKueV
+vbJX9iYreyX+3991/e+cc50b5zp3zng+rusct3h09S4JERGR93/mf95z9vLa
+4SEB7WptvAplNYIZd47NwX0CArcB2qojRqDLNLpduktA2//mH+4QjIBfyeHf
+o3UCEtO/2OsgZwRVryOoxmYIKGAlwyPsuhFQSfbxoZ8ENPvW+9KbGCN4+8T8
+knc8AZE00peGHDeGbGKnVCIFAnpigjdr4CZAfldLhvu2ABrvltXWWTYF1v5a
+u+Tw4+j0pIbts2lzuFodZynSxI9uQfWmjrcFuP9RsQubPIa68GrCT18rKHON
+e5B3hQ+1Hl1Triu2BgGrx5/6L/Ah7WiFdSqwhjd6F8aI1fgQB2f+x6uN1mAh
+snXdQI4Pecy57e0NWwPtoL7qLhcfMqYvupxEeQ9Mz1FzqU/wotI9WiF1k3tA
+Su5W2/uEF2noLTlz0d4H3Yjr/AexR9FSRRxPpLcNPJNh1NaKPIpEOjYGwoJt
+IK2z4XFY8FF0XDOF5V2MDRywnK0WeH4UDfitUH7Pt4HcSAFrLaujaKOYbPHR
+uA3QRf3JDpM8ijgyHOrdzj+ApneBCoTqI6j11hfVq8y2oJX4XffCIg8Kb+Nl
+JTTYwcqboX2yGR6kfTRRO7jHDuK8/mb9GOVBGcSyEwcTdrBopkR5posHWZ2u
+MCE6sIMIgS8gUcGDNK4cfeQs9xBG0nOkWAN4ENVe9fyplIfgUhjPMkLgQebj
+zb4nAuwhrf5pr5MxN1K3Mv55UskBYmVc1DMNuJE3i/StYVUHCE50zB+5zI0o
+Wv/MxVx0AEcn29faODdi0beUETJxAJVjt88dE+JG5lF/1SKfO0C3C57WtMyF
+jm7tirXUOwCJMKXL8RdcqOZF3ujv24/B1O8te1sGJ2Lt0H31I9kRWrEtSrdk
+TvRo14G0OscRsL839vgTONEHcUJ4S4kj8DseGXUM5US9NKRkO02OMGGWnMHh
+wonsJ7tUCtYdwfpM/hlTdU6013phoFjTCezXmu8sDXOgwOphWrV1J/AyJ/1M
+y8qBDA5zXmTfd4b8Nq2QbjoO5B4bPQJPnGHiXLB9IgUHOt553XXE2xk0edlP
+ndpjR0YL398oxzoDw4Bw/tVxdvR6PC/6UZMzvL92sTA2jx158hi/7ZN0AdAM
+Lzmhw45IrvJ/2Tp0gbUvPdErGuyoT7XA7gG9KwgK8biWY+zop8rc5m8eVwgg
+TVG4JMuOnlv0FNPJu4IeKi6z52FHcRFk9hN2rjCm1F/xZY4NwbjO7cEhVyCS
+OAbqL9lQ5YvbonZ1buDBoWr60osN+Z8e9KvsdYPtQ4t/da5saJBUmfL4rBss
+d6adufiADZkxSf3ioHoKg26SZXpX2JD4mRGmhotPoaRGpeA2Nxuq11M4Z9D1
+FB6amKS45rIiC3+6uZLVZzCn4aVWnsaKaBlmXZXJ3MHqVNL43gdWJFr0SKiD
+wx2MSKaOeUWwondeMuqKZ93hQoZtgp8rK7pde9R15ZU7CG48iwpXZUWZ29IN
+/AQPGAiKfZXdw4ICqKyfXbLxhK5a/hzzNhb01IyS7tDDE1oO09vZG1mQXmCy
+Y12YJ1Q6lXB7f2NBd/tSRMLLPCHZuCvbIIXlv3lrlOOm9oIHYvTt/xxYUKPC
+L0q6z17wt8mbS4+OBb0wSnQSJPOGDTIqFXIKFpSoGCZ1g9Ebls+F3qk4ZEa6
+ogcFUTzeMFaYmCW4zoyeRfqcl5f2hpq4irO7v5jRyhs6L0ozbwh+sGGenM6M
+pN5IX9/95g1Hae5nbqgxo0ly5U+xL3zAtLIlWOAsMxpm0hJyD/OBj47SDnqn
+mdGf+ttSD9/7gPDgnnzOCWZUp6+t71vhA6dy3tRY0jEjbWX+3GfrPqCmWzTa
+2cOE1n5/38m9/wJsIg7YC+4zoV2bYNENc1/I0bTcHbnDhMrZ1C34HvvC8l79
+EJ0xE+JUbhkz8fEFR8vwlPuXmZBLQ7oyZ7IveMgJSvPLMCFaqlCxl1O+wJcb
+GcO3zYi2IhS17j70A9vTouSDRxmRlYtwPx72EhzJy9NdGBnRtUds4RPJL+FZ
+j9ZFFhJGxOrX753w5SW8dr4bqj3LgLgpPuTeGnwJWV+SuMsKGJCQ+Nulfyf8
+4fdpTskoTQakbifxk63OH+7Jk9244kCPvuY9UajnCAB7isjdeQt6xBIaOtAg
+HgAuvccT/K/TIyNjy+9zagHg74KNf1emR+OVmsf9HgVAWskzW3FyelTRPfzu
+VFMATMuvPqeOo0PDRd8ygl8GgqXCSEZ1NS3i2moT4+IIAusMBUPNUlo0RpnO
+GCEZBA+4w0kbs2jR0UMTFQmtIHD4q27aGk6LpGgsbRrcgsADMll/mdGi0Fm7
++pjhIHir5ey1/JcGXf0k8fZXbjDU3aAz4JajQTZ6VCxfH4RAY8Nd4oQTNOjr
+kgDx6KsQaFGCz3xHaJD/U8E98U8h0HnEkVqQhAbNJiReuTAWAqOjfZWS7dTI
+tsw04eXNUNi5lyJy3o4adXRdJSk6GQaibsqH9qlU6L7C1mGybDigYV3RyWgq
+xMqb5JWpGQ6G6pbXbwRSoXhF96K2W+HwgiE4G7OnQjDPbuLhHQ6/UodvMClS
+oVEf7XjTtnAI6PDOL2imRHmhGtyBThEwI1p/Z2ONAo1t/Llf2hcJHmGDwfen
+KZC2VGCx7p9IYNn6UzrUR4HINWd1mSjfwrkfXAy13yhQ5qsMKjaFtxB140FF
+lD8FKuAaJRaJfQvn/ehZFXgokP1zx9a5u1HwcfhazVNVckRH8GmlFHoHMlMy
+e91y5MieJl+qGX8HNfPMUlInyVGHrOEwMnkHM9tt8TMM5Ei23ZdYI+odiLLo
+OF0bIkOrafZKlVQxUKh5XkDClQyx7epnz+7GgPplws2AB2RItTH0BR13LHRf
+IwmZvE2GHHa/UtspxsKWOdqNPU+GPv6R9Bx2jYUz7mc7KFjIUEvm19K43Vio
+yZPzHsshRV3XffdpqOPheglryZkkUqSqkz4lKB4PM9/WFqIjSRGrNfbV90o8
+UDXl37j8jBSJ00wxsr6Lh8tT4qcqtEjRC+eQyWCRBOjlEhqJnCBBhZ4yf2NN
+EmHWh/2sFhcJWqa8c+c1URLQeOb9iaQhQbcH3s1wcieBpJt2ytg+McpuoQge
+kU4CF3tPmmfjxKhRVZKaxyoJKIyn+3OyiJH14OWTps1JICj3xZlFhRitM1l1
+13/6CBdOXRExO0WMks6pCKlVfQQ70d9D2ceJ0Y3leTWS0Y9QzM97XoOCGOWd
+/vXqBncyqNO/ZHFrI0LJG8kBDuHJYDFjkDd8hwjRUVd8OBuWAv7jyxaiBkTI
+J2/RLLAgBbKGAjhcNYnQ5E2eu+JdKbDW+c2TSYwIDT5WIXnGmQokz7Vj/OcO
+QW15gNUwNRUw6d8d+vSHQLP4W1ip/RP4n+BVWlg9gAP6DPaX25+glVc/ya/3
+ADgGjtOoHEsDU5py+9IPB7Ddl2K6/SgNPCYDaHllDsCNqGa8miMdKqJOaswZ
+/oPxAwkpbfcMoDKetSQ++w9CPo4+187MAEP+tBc8x//BbwMFvta+DFjLIiCd
+hX04vBfoZCefCSKI70zB830QNZykUtrLhJh5NulnGX/BebA5lfV9NszkdV2J
+fPMXlAV9TO/2ZIOcc4R9juNfaItbNr9DnwNth4w5I2f/wslumnDL5zlAwU57
+Qr1jD8SHIi5N2uaCM0bMS7e3C4NnC4Tf2+RBFRk6IzS6C/cLE9ZpcvOAqcnL
+6FzNLmxJbWneWM2DHIP9dw4hu/CK+pvOlXP5MGWzzdIjsAsK9x/9lWzLh6tv
+l6jeX9qBP5EZJwyoCyHpVs6JUqkdkPu4/IpVthCW+Ww129l34GbP4BGb24Xw
+OnPOl2RsG0bOXi6YKCqEH5WTB9ZPtsHw89Vs6/tFIPX718apxC0gKxbvLlwr
+hicrEiKcflvwPq6bs4fwBcq2fW4fPNiCsW2B8ezrX0CVQrSuRXELxttrkl9+
+/QJXCc/e2XRvAn3WJ7geVgLRoq3Nel83gZ8lzf5VfQkMSgsQKSZvAnOpdfCb
+wxKwwpvuUzhswl8zGXERx1Jwvs2jnEK7CU8suCcIFmVQYWVv/3ptA5jL7/N6
+JZXBgW1V8uNfG1Dl2+TaPVoG/s8e0OLpG9DvXCodfKccYt5VDA2pbUD0aPJs
+2+MKqOgwes7xbB2qHIQ6g5q/wUH/56J/5utA+uDAtOjod1AbI5mb0lqHZva0
+iguPvkPzcpZeEfs6eD/M7RjnqoQh2r/H9QrWYK+KrH7cC4Cf9YqhQswarEZS
+CL8eArjLk/Ka7/kaDO6Q2uzyIlg+eWl9UWcNKpc8s3i8ERxqxNcEzq2Cp9bV
+so0rP+D85T87Dm2r0Jf8Y9/T/wcEGKhL3CxZhcZA+hzeyh/AZLkQJey3CitJ
+6yZIqgoEvM/cqz62CvGucZt+gtVg/So0PotiFcw15JIKrKohK2SyLXxpBdQT
+ye6ppFWDbGKQovnXFbhOzlqWKFED5ysGqf8ZrkBHvOOPJt1a+Jz1San+zApo
+3ltorPhYC1zxj2zC+VegvVig5vtWLfRuU0Rc6v4DF9w432mn14GQuyFT4t4y
+KAySpzYINsCO8fwj6ZpleN8B3+JeN0DLWa+22jfLQHS+gUxuvQGeHHwKWeZf
+Bpp/+hHiPxuhymeTDtdaAnVRtr/x6c0QbRFo1820BG7iLa7kJ1rARp235f7A
+Iiht3IrBs1qAiVwjKPzhImxsFfV1f/sJU9P980IKiwCI83qATiuU1dldrCBa
+hPwxkhdVY61gFvCWejJyAVI7fe600raDjM1JG9fbCzDfK5RmeLsdKC5+a6A9
+sQAqV84sRhS0w2faqVdyFfMQsKbRlWXRAfshshT+Y7+BbJmVYLHQCe2P6u/y
+ZP2G3u5Iw0DDLkjRM6797PQbWprv8H2q7YKLLL5+fRS/odhq6Oeb/G7gW+eY
+sm2fgyhp180W8R5Y68pSJ4qbAwYB1i/TuT0QG9VJIiIxB8bvalaKoBfsXKwt
+vm/Nwp0wfGBfrw/wG3s/9NEsCCkUL2rO9cEcl4DPs2uz0LFf1o6J/oJvu1/G
+GHhngePLZvnnnl8QOqCNp8zMgNZl7t0PAQMgn/D4sPnpDAAP12g/xdB/94Lc
+zFx9BpKkeLR4u4Zg+HZs5QbdDCwIlM6PZAyD37EfnrxJ0zDwJq8ScxqFm0TX
+hwtspoHbhMnyndwYiI/PndWUnQYaRSrD91/GoCuZad++bgpIbCQZnJvHIc03
+1Zg0bApOma6wC9+ZgGdWil/f3ZqCwODfTlkHEyAgbP4MLU6CNfOyyY1rU7BF
+sfHLoGQSlvPjuvJpp6Fx9pXS7+eTcFrex1a1dRocMvN2mFknwZ7KzHrvySxI
+Mdj7qo1NQMuFdf+jl+Zg1VGcwSl3AnzSylb+iP8Gx7OZhG6tCdDIp3Bd5FgA
+2Y/3PpOx/1c3w09+lP+/viEXVjo9MQ4Tlv9OcisvgXNbsm60xzgQnukX1L3/
+A/Jyd37VaY+DQFNVq77LCmzFHLPa5hgHF4H3f3RPrELJv+HlE1NjgHR/fmGb
+XAVXi4SnNwvGwKeZ/4Vt1hoo1huRBXqNwUnnA2Exr3XYEeMOLb80BoY2UQdn
+zDZgfV5M+3TLKGgnZrPpXN6CJ8UZptHWo2Ae7jHkZrINW55CT7aJRsHvOLO0
+gecOuGolB96MHwE1q3s0ogW7sMN07EP56RFg0cICbu/uwdOB+GKe9mHYnNpt
+tbmxD3spXE3uD4bh5rBhwUTLP9iXZ9lU+TAEZ56cdnR6QYQ8iUJpPigNAfGO
+y7Wgu8TooJGWn6h7EJZ+rvH8u0GCvCMDTt+xHwQ8Xta01YgUEd8mv1RFNQg2
+u0k19I/I0AvhF+aElAHwNfvzrT2KHJGtHDj7qQzA49xfulLtFIjCdydJ0/EX
+MD5UUeb3o0avdJxL0ul+gTKPeGPdIQ2i4lhrpkrvB8WJI0FCkXSIJnNhq2mw
+D0oyXfyISJhQkON9OnGXPjDi1xCUW2VCdGenj79h6oO3R0Z8uZeYEWPbiM4V
+jV6g8YmmyaJmQ2Exxhb5oz1wIZsK7z/Jjlgs+l2Zn/VAnrG8T7g+B2Lb7Eju
++twNwdXu4cslXCiqUrdMTrsb3rZWBmsscSOOgOafUZNdUF92+99Z/iPonf6F
+yS3PLojOdxk70D6KuI7U7tzg6oKSEb7Ii5a8KHZKlaG8sBPiZW+b45Z8iOdz
+JYHncidIsWksS2DHUILrGSX32Q74+lTiodn8McSrWqY75NMB7o5Zbv9E+dF7
+mtNWKkc7YBtlhbso8qNj3QVP35e0g9ec1qkdVn6UlCgZeqjXDll0tArld48h
+9VZD7R+9bTBEEbtowMqHNO/oPfGlbYOTs4Ls9VxH0YUN7Q8aeCt0FdWIrd/m
+RhdfqTdROv+Evo3Ig8FmdqTDo7LZmNkCbGOfHqjo/sedufL8wSPNIJ6Zk7ad
+RYn0calLuqzN0B0UzmNuuQkGXSIuTBeaYDop90qr0jhmaE342OnRCOZhkf7R
+KuT468dOARFfGiCT/nxhdjUr/t2j+tHV5XogY8vpeRbDiwtGWp7rNKuD3/Z7
+h7fOiOA33xcJRcTUgrrUdN/GU0k8KJOU/mpHDQzQGwYEVUvjlcXXNphpauD2
+u7Nyv47I4WuQMtihVg139j8sbUvJ48LN61Xh7lXgN79uR7aigN/qVc/SL/4B
+ei0pP9y1lfDg8chw5iUE8SXEvwxllPH/dotbhxCCOsZLn+pTlfG5P/eQwPdK
+UD/61exFkjJ+hYIqNFnyOyiNbxq8EVXGS45m3BZI+gqhnnmEZB0lnE/2gngy
+cwWwbETwK7Ep4i+15/aO+5ZBOE/vJfNweXzRLKDx40YJnA3dGfHpkcMrghus
+P/YVAeMHMXvTHSn8eMr908e1C0Hg5qjszWUJPKCciuxjRT7cGKEj+7Atgue2
+hKupnskGsr1843ovAdx9t2MU58sA1UzSeEpZPlxbmMUTJ/4E76k0zV9tcOKc
+167y4FMfwZaDUevFRRa8+VDw0fOQRIhwILX6aU+D37/1KdPL4B2Qkyuk1z8m
+xsmKhKY8ecKhLZe4y1ZwHcO5dVT20EtQpU8wGdnrwVZiYq1WYx2h5sLD6cqe
+fvAgeVurqXgLI4wyIDvCCkjGWdazyT/H2C68rBh03YER7oJlWsZgLOEvZeSw
+6SFck+3/5q/6FvO7IzbxyIcElfy68eKVexyW9uhj8HQtGaJHC4QaoyRMVyJB
+UC2UAmGR2f41rilYNTNF0/VlSvTY2vZ3zds0jKpzLkpjjQolK4np1BZkYsTl
+g76RGdSom27hc21rDsZXSlQozUuDKMaymOsW8jCiIZ6mBCMalHDrtLKlXwF2
+27bkwZ4NDTqtHmU7yVKEfch0Pad0jQa1im8mWH4sxtzYzhz9X/49juutk6dK
+MJewJOaqn9SIiOjLoWVlKfbvenjSqg01iv3NJj2lU45divhXQ75FhWS6nlhY
+DVZg343yQxOdqZBVmlyt1c53TH+gQYbNmBJZCRvVynBXYZQHhhLPd8mQ1BGa
+EcexKqwsPW9dyZwM/WOs2CpMr8YEfO688WsgRdG73Cdl5WsxMy/nL0pJJKi+
+5ddr2WsNGHeGa2iDCxG67zZQbyzWiO2uK2Qd6T0EKsFBMj/SJqznqszL5foD
+uOg+5NVd1IyNu1145Fm/D/PCw1/3g1ow4euyl1l6/kJQ5/COoNVPTJSgtZGx
+sActIqOOzmxt2DMD13Aa2V2w6xnNS1xsw+4Kn3AxsdwBf9xhy8KiHXMUK0j+
+Eb8NJxYdZIOUOzBujcevPhO24L66Y+7gfCcmac5arRuwDoqxa81/DLswCXs8
+NWB1Daj+OM6TVndhTlp12Znma5AZ53RCPL4be/tO+FLKlVV4trKugVP2YAHz
+q2dI2lbgouYTKwOnHoy96taJ69dWYH71yUePS71YkrU60U7XMlRobUJYaS/2
+kOEYbfv2ErxOdB5JJfRh3Vmil1cISyCm7XLk598+jAp7LBf7n46zS3KN4s35
+hSW0aUkY18/B2a3tImmuAYy6ziRNUHAO6HTcOjX8BjDX2odT5f6zkLvtxmhv
+MohlLUtaXjKZAa/LuxIvGgYxphHi2fb/9IVuylOdaLkhTKEy0EFOcxqWdZ8F
+VtINY82LYV21alNQmbqX3uk2jL1WI/odXj8JIXvP6mamhrGXxs6Ym94knEpz
+J2X8PoL5ks2+nns4AWVelZV58mOYkrXWWY6uMUjKPPhZbjeG6eh/trF8MgYB
+3eeGq5PHsFt6PKdTucbgpij87WMYx/g+Nj/g7BqB3R5QJJodx87GNdgzGgzB
+BBHRBRreCUzqKVPVf1QITWL4DbZrExg+X5QlLzUIcT7I+SRMYOSe7mIUvAOg
+LPGjUO/dJDZLvHVkidAPp7t7oysbJ7HsgPOUzCV9IOW++Ex8fxLLWJlLIbvU
+B8KNnOpUd6awVLXA4n8evcB6174LRKexrAqNn4MH3cBA51cqcXsaO87rPsfz
+qRtoimLj40OnsZGT9Pt+l7uBiLjW0nVjGjuvXtEcldoFiwlHNiQrZ7DaY9PV
+yzadMKsu3Z+wMoMtKjx8XnusEybmNb/REGaxm/Ija5f7OuCXoqPfzKtZLDEm
+WV/1UgfUdTewvdefw5geNsbc02iHH+4jO7R+c9i3VGc9L8p2+CawMfS0ZA7T
+SJB17I9qg0KHY5+uH/mNNRqpzOpmt8IHOpfT9NO/MdUmG8bz6y0QVxTE7c45
+j7E8Xo9ZfN0C0UYf/81pz2P+fD0vKgRbIDijpbbm8zwm/jsVDzZtBrfzBEMP
+twVMxuhdbODvRnBaUFSez1rAOn8KNg6GNYJ9hC7fzeEFTOQhhfG8UiPcHXs6
+I6u2iI1txBUzhjfAVY92lwXaJUy/H8+8drUeLhNmjG6dW8JmWbKKTSnq4ULT
+33P1DkuY562gsu6vdXCO6wRlSs8SNkD/O2JEtA7Eij3fGX1YxvzXlCVecNUC
+iQv7kBX3ClZUXkD6RqwajMyzOsvkVrBDIan0paUqKLyINdLprWAz2y7wuKAK
+LI7ZlBT7r2ACTWaGDWeqoKrhWxjZxgomrAJJWyY/gKdI/9VNxlVs7ZLJaNmJ
+H+CYOOOZI7qKcb+XzLVdRyDgyGRrcGcVSxqdGgl+g8D3iJVGausqtjeuQ3Uj
+BmCIfPfMzu9VjNY6a+37GQC5lTcyOuRr2GJduvqXsUqYqik9tnFmDTOhCRiQ
+PlUJ5+1p99Qz17CUgnjs6fA3IPtR+HnSdx3bEv9e+smtAkyytT4pfFjH7k1m
+tltJV0Bx1FB8UMU6VrVh44UtlIPVA4pA2dV1zJuUJFTKohxqWY0sfU03sMZ1
+f5n7Jv/xvTUxF0FpE3PMGtFp8yyBEb1oBleDTYx6UT5rQKME5M+IkTc/2sRi
+1IjkixlKYIbx+ppj2ibm0ZysW5X8BTTLM1qqWLcwT+XA0omuYqCk0/OxWN7C
+iOpjXJRvFMHNE0ZInnob2xTg1L8qVgRZalaHNILbGEdUK+nBYSHoPnXzLLq1
+jfVXkVRSZBdC9EzSU7Labeyi6CRPLGUhCP9YfZwWv4M9Pfsvr74/H9yG/uY/
+K9nBqIVUK8m/5EPTNvmKbscO1nvU6nlxeD7YS/LYb1PsYlJVlO0mOvlQEq/2
+4ILjLnbvPLp85U0eaLhEWsxf2MM4+5kIT+JzITo88WOl5R727PqOmrN5Lszl
+pI9FeO1hxEFVR4SEcyF48qvpmeI9zCt86rp/UQ50600ZBR/7i638KFOj7M0G
+K7HT1yS3/mKvBN3uLCpkQYkmFkHCvI8F9nksFlJkAZWFdkev2D5mllv2h6Q3
+E3Jibl95fmcf6wgWeqrgkvkfT/lfam/Zxy5qD6p+/5YBvmO96o4p/7Ck5Dgs
+xzwdRsovPXT79g+z/bRHvqWUDsqRKNqr5x+G7wqrfGBNhxWNrN+vKQ8wkS90
+QrQNaWCa7RmaYnuAMZZO/T1xOg2UXQQHu2UPMZFGoUrPY58g+kos2aDOIRZ8
+PKpC/iAVVk8ySI7fPcRKRR+0qQynQsbgtvfSu0Ns+genu0xCKnCoNgtT7B9i
+mSme0gm8qbBLrlR+xIIIp1aM2fwskQJpjus/39sT4Sq0BLVRphQwGM2dOO5O
+hA8rXmLS20iG/DIBupNviXD95Z/yK1+TwdqWzkyujghfvF9kw6GbDN3to2SX
+RYlxWVnbcnPPj5Af76/ntUaMb26NksaSJkEzq/8sIxEJ7kj5usKt7wPMBL30
++khPgg/ucbmJZHyAox5+OTUnSfAoyhD5mosfIMDkBRWtGQleu3eQ/f3tezDn
+9ULvmklwlzstbrXKieAe5XlD5BcJnl1J+5nAnAjR9J7LFTMkuJfvpZsDswnQ
+8s/96AgxKb49piR6OToBFEeeugkqkuL3Ln83kNyOB6YPzlIFqaS48v4RxN4Q
+B2KczvVqhaT4lU2Gl29S4kAz9IlpN5DiWifI0q88jwOP507B2wOkeHqv2Xie
+QhzMmT2eU2Emw+0YSYebsmMB8T9MavIkw5unDx43JMXAo2QrpilDcryNWJrm
+fHk0hDyNTQixJMfJ7ndzRb2Phs96rSeVHMjx/YDtVTa/aFg+UFANCSTHnXk0
+9T9ciQY7Y1pHxW/keBE2Jtw1FwUP2Aq7go9T4OyLwZymhCiw9j+MPr1IgROt
+e5c7lESC/205wtgOBV511a9xOCkS0uRs8l6TU+KN2bXH7IMiYXqis36UjxLP
+cLZ/uG0eCVZY2k6gPiWemk9tlkofCRY7OkYjJZT4XZGQ3JMPI8D0QRzvKx8q
+PG3wwxCVejj8/UXduvqGCg8IvhBWIB0OMdpPvUziqHCue3KXn/CHQ8fJm6PS
+RVR4CVsMq9ZBGJyfZf84NEWFP5ip/w85wkDEKlxQ5gI17pG2pGukFAYbtwPE
+hhlocKs10bWmNyEQ9nN7UOsIDV6wwWs76xACEir3ggtP0OBhZfPl4gYhYH1U
+c+kVToPHLy6mSR0JgV8DpHkyjjQ40/WH/uzZb6DyxnOZgB4afLxou4W1MxgC
+9V2UZBNocZv0uj8UZ4IgokXULieTFidlOj70iT8IErRG3wuV0uLUQq3/HlAE
+Qb7KBTKuzv/iKzFfrTtfQ78IT9s+JR0u5WOGH7V7DSdJKq3qnOjwCz61EWpp
+gVBXSB526xI9buX35fsX2QBol6io6rxJj9sSTZ6M5Q2AgQz7zUvW9LiMy4um
+OMoAWH7fZ3TOhx4/9Zi+d3vwFXAEZQoRSulx/4B1MVb/V3DX8vLXRQEGfL2d
+TvPjqP9/HBk183yPAQ9JuZJRm/YSWJa9GFgoGfGy8n5X3aiXcLzhvnwqKyOe
+7KxovOj7Es55nPVvEGfE01gf91rfeQlPpyaFmM0YcTJr4f2rvC9huVjmbnI1
+I55oKVG7EOMHi6Jzjy00mXDrG3+WtN/7wgbn8MtsHSa849PgU8VQX/hL1hm7
+cZUJz+BaNVT09gWa0a8//M2YcBa6uThbC184ERnKnO3GhHtRiD1OPOELFn/l
+C9azmPBJ6exTXF9eQF/zyxU/RmZcSKRPtGrQB96eS9S4zsGMrzGxEyJ++sDV
+guI4IV5mvOz98o4j+EBr9OT5OlFmXNfzX6d1ig/U3VGNpdRkxhPjci3Y7Hyg
+ZHtf9bUHM67xyCndgcgHoglPIkN/M+M3UbjuSzlvMIgOmjNbYcafnEiiVj3p
+DSzUKSpS28w4iHBm0Rz1hpDljtl2MhY8cfWjVj2pN/iXnzrLws+Cn8Tb79en
+PweXKwtTbw1Z8HBz1ehTS15w3d1CPq6aBY+KpiBuf+0J0YlsFNuNLLhizpGY
+ERdP6IW6nmvtLDiT5DlDYktPMCQTc6YfZsEjPjoPvjjjCTffrBd5b7Hgpj0s
+fE5LHmD0wU/6nggrTvnVvXTVwAPMq9PE5UJZcb39qkfl0u5gR7sg0GrEhke/
+Ix314X0KC08ryGjvsOGBMvHr4gxP4cFc4IzWPTY8LSaCdubADe7Vnsz64cSG
+K/IHEb8YcwOL59bSX4LZ8KZzWZJmqW5wa30cS6hkw28dUzuZJOkGmoP9Jg8E
+2PE1K1eTVh1XOJZdF00xz45LEt8zLcxxBoMPZeVNK//Fco21Jh+c4XVk1lDI
+Njt+gaLMmTXCGTbcQwQ4yTlwBgs2p0+uztCkY/j5BD8H3nasVN1I3Rlclqdr
+Lxhy4GYcXi/3hp7AT2nyzddVHHg2TfzpYq4n4F6mfo0xnhMXlbdhUctzBBmT
+9hWzj5z46jjlqUufHGH+0CQkP50T703jVDWJdwQjLZdG/WJOvCrvKyH6lSMo
+92Zgb39y4tP46M49c0fYWacX5ybiwrunGoo9WB3B5VQ/GeEuF05QHZGQff4Y
+HNLsSuRPceO/KiYYlG0dYKTtSBSDPDeuvjDQb2DhAJd3m5xmznLjn7hyB1xu
+OYCojoh09EVuvO5zmXW7lgNMrU5nb97lxq+0pTX0CzrADRWzj8UJ3Hg/UaSk
+A3oE57r1g2VoePDwvy+J9kvtgY5EwUJymgeftr65Z9xiB+WupNdmFnjw43v3
+/5BU2oH1Upv6+zUe/E1BaWxxnh2g/vtCDERH8J96wZMKkXbglBc3t8RzBGdM
+MhL6bmQHAyYH9rl6R/DKGVbD8gVbyCitdRf/dgQnZt9MkGG3BY2HBlGikUdx
+36hSfX4/G+Aq532kIciHL+TVTJr/sYYIx4Bwqb5j+NtF7jT+ECu46n9FIrGE
+H29McQ+iTLcAUWO/66mex/HeGCNyXao70DtDnRx5XQB/dIyj9CyxGbRaTKuy
+HCPgSXoit/N8TGCcLH0nSoCABzp5OSm5msBG2v08bmECvpvrfrHRzgS4FxaO
+Hpcg4Ifb0SJ7N0zAymlt+9QZAl5Tpa6QJGkCe76HuZdvEPAguWcbu0PGIPyJ
+mycwlIArlvH116sYg5LWYDtdJAGn4807TiJnDDq/E16FRRNwJ1f5HFVRY3gs
+wb/5LpGAlznwO7dzGMO3L8LtadkE3DP410PxFSO4WifrX1NPwP2MPX4MpBjB
+3fubZy80E3BHeyXTe3FG4EZTut7cSsDjQzSId8OMIFFX+U5XDwEfm2TWEfMy
+grle/OzEJAE3X44Lb75pBHtuJOt3Zwn4L2zg3/MrRkB/pCbz9zwBfxCjZaCk
+aQQyZlqcq6sEnM+jt6BC1gg0iKlbn2wS8C95bIUvRI3gZkqT384OAd+Qqwi5
+ctwIHmgEn/HYJ+CRCybnj3MZwf//++EChVFt2wxG8H8rcYN3
+ "]]},
+ Annotation[#, "Charting`Private`Tag$307210#1"]& ]}, {}}},
+ AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
+ Axes->{True, True},
+ AxesLabel->{None, None},
+ AxesOrigin->{0, 0},
+ DisplayFunction->Identity,
+ Frame->{{False, False}, {False, False}},
+ FrameLabel->{{None, None}, {None, None}},
+ FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
+ GridLines->{None, None},
+ GridLinesStyle->Directive[
+ GrayLevel[0.5, 0.4]],
+ ImagePadding->All,
+ Method->{
+ "DefaultBoundaryStyle" -> Automatic,
+ "DefaultGraphicsInteraction" -> {
+ "Version" -> 1.2, "TrackMousePosition" -> {True, False},
+ "Effects" -> {
+ "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2},
+ "Droplines" -> {
+ "freeformCursorMode" -> True,
+ "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" ->
+ AbsolutePointSize[6], "ScalingFunctions" -> None,
+ "CoordinatesToolOptions" -> {"DisplayFunction" -> ({
+ (Identity[#]& )[
+ Part[#, 1]],
+ (Identity[#]& )[
+ Part[#, 2]]}& ), "CopiedValueFunction" -> ({
+ (Identity[#]& )[
+ Part[#, 1]],
+ (Identity[#]& )[
+ Part[#, 2]]}& )}},
+ PlotRange->{-10, 30},
+ PlotRangeClipping->True,
+ PlotRangePadding->{{
+ Scaled[0.02],
+ Scaled[0.02]}, {
+ Scaled[0.05],
+ Scaled[0.05]}},
+ Ticks->{Automatic, Automatic}]], "Output",
+ CellChangeTimes->{
+ 3.8716302612695627`*^9, 3.87163043703398*^9, {3.871633080838892*^9,
+ 3.8716330985389347`*^9}, 3.8722347137716227`*^9},
+ CellLabel->"Out[55]=",ExpressionUUID->"9ff27ba2-33df-4d53-894e-2237adc5b8f1"]
}, Open ]],
Cell[CellGroupData[{
@@ -9285,9 +16907,9 @@ Cell[BoxData[
CellLabel->"Out[9]=",ExpressionUUID->"3fd3b5f8-4da9-404f-8b20-64b6c99239f0"]
}, Open ]]
},
-WindowSize->{954., 1019.25},
-WindowMargins->{{0.75, Automatic}, {3, Automatic}},
-FrontEndVersion->"13.1 for Linux x86 (64-bit) (June 16, 2022)",
+WindowSize->{1426.5, 740.25},
+WindowMargins->{{0, Automatic}, {Automatic, 0}},
+FrontEndVersion->"13.2 for Linux x86 (64-bit) (December 7, 2022)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"3a2ec9ae-362f-42b0-9bfc-c766461c7128"
]
@@ -9302,85 +16924,163 @@ CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
-Cell[558, 20, 290, 7, 24, "Input",ExpressionUUID->"cb2d1f0e-8921-4d60-a098-a74598dfa8f6"],
-Cell[851, 29, 210, 3, 22, "Input",ExpressionUUID->"ebe5eb4e-2760-42b5-9d9b-c166d8a7c2b8"],
+Cell[558, 20, 318, 6, 24, "Input",ExpressionUUID->"cb2d1f0e-8921-4d60-a098-a74598dfa8f6"],
+Cell[CellGroupData[{
+Cell[901, 30, 210, 3, 22, "Input",ExpressionUUID->"ebe5eb4e-2760-42b5-9d9b-c166d8a7c2b8"],
+Cell[1114, 35, 746, 14, 37, "Message",ExpressionUUID->"39e14237-1709-44ab-9f4f-4142bbd7896c"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[1897, 54, 411, 12, 24, "Input",ExpressionUUID->"5918f2c5-d04a-41be-9074-a9d239e03bad"],
+Cell[2311, 68, 313, 7, 25, "Output",ExpressionUUID->"63b8069b-8598-4446-9037-7d26eca13873"]
+}, Open ]],
+Cell[2639, 78, 2386, 64, 25, "Input",ExpressionUUID->"ffc53174-430d-4e0b-b71f-902d34f687b7"],
+Cell[5028, 144, 355, 7, 22, "Input",ExpressionUUID->"249e2bea-239f-4870-bccb-94af3730f0b6"],
+Cell[CellGroupData[{
+Cell[5408, 155, 1900, 44, 29, "Input",ExpressionUUID->"a6d0fc76-cf0a-4234-9fe3-d57ae603ad2e"],
+Cell[7311, 201, 38351, 718, 181, "Output",ExpressionUUID->"a9b5bf87-e870-4cb1-a334-4610824736a2"]
+}, Open ]],
+Cell[45677, 922, 287, 6, 22, "Input",ExpressionUUID->"52b4bca3-6c24-4ce4-a34e-5809b8f6180a"],
+Cell[45967, 930, 2463, 66, 25, "Input",ExpressionUUID->"22e15b10-be95-4312-870c-ebe3402ea67c"],
+Cell[48433, 998, 405, 7, 22, "Input",ExpressionUUID->"6e3ba380-2dbc-463d-8279-e42bb1e3c387"],
+Cell[CellGroupData[{
+Cell[48863, 1009, 1836, 43, 29, "Input",ExpressionUUID->"965d5a6e-a5d2-4e2f-8234-02ac11e44315"],
+Cell[50702, 1054, 51354, 931, 181, "Output",ExpressionUUID->"6660f0cb-7c8c-4df5-9146-056350f78fc0"]
+}, Open ]],
+Cell[102071, 1988, 3091, 86, 110, "Input",ExpressionUUID->"3f75c1e0-258b-4769-8308-40547e5bc66d"],
+Cell[CellGroupData[{
+Cell[105187, 2078, 217, 3, 23, "Input",ExpressionUUID->"9c4c95dd-0cce-40d9-9382-601216046955"],
+Cell[105407, 2083, 172, 2, 25, "Output",ExpressionUUID->"7dd902cb-f16f-49b4-8c3d-3fad52ca76f5"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[105616, 2090, 3451, 90, 110, "Input",ExpressionUUID->"c480077f-daf0-49d9-971a-8783f8e24ae3"],
+Cell[109070, 2182, 15241, 266, 284, "Output",ExpressionUUID->"73571a62-acb0-4c68-a41d-2dd04cfa4c6f"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[124348, 2453, 3400, 90, 145, "Input",ExpressionUUID->"3f8b6e53-ff20-489f-b395-47d925d34ae6"],
+Cell[127751, 2545, 6727, 126, 283, "Output",ExpressionUUID->"2e60aa58-03df-4f64-a5b4-aac6f5b3dcd4"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[134515, 2676, 3377, 90, 145, "Input",ExpressionUUID->"f1b88156-90fa-4eff-991c-fedc7873189b"],
+Cell[137895, 2768, 17043, 296, 282, "Output",ExpressionUUID->"88a1b60c-97d1-42d8-bbbc-a379f83bd40b"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[154975, 3069, 788, 24, 25, "Input",ExpressionUUID->"38c6377e-d6ac-4418-a565-18d85ba8fcba"],
+Cell[155766, 3095, 817, 23, 64, "Output",ExpressionUUID->"2b8225f9-ed14-4766-a01c-a86c0feb9b0e"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[156620, 3123, 5711, 140, 228, "Input",ExpressionUUID->"7af4aaca-fcbd-4164-a23f-452af7281199"],
+Cell[162334, 3265, 27757, 477, 251, "Output",ExpressionUUID->"20c955a9-cd81-4419-878e-3b98aa44aefc"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[190128, 3747, 4538, 112, 192, "Input",ExpressionUUID->"7bc98e14-1631-4fc3-aed1-367c66e81e01"],
+Cell[194669, 3861, 36212, 618, 273, "Output",ExpressionUUID->"4f815cd7-c383-4356-a54d-23d8389e3529"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[230918, 4484, 255, 6, 22, "Input",ExpressionUUID->"f36a97fc-860e-4e7e-86d3-36fc120dfab0"],
+Cell[231176, 4492, 212, 4, 25, "Output",ExpressionUUID->"d40435e8-6022-47c6-92e2-dc02d3d8722c"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[231425, 4501, 4922, 121, 174, "Input",ExpressionUUID->"b1086ee8-7679-4537-81e7-3871b266ebb6"],
+Cell[236350, 4624, 34641, 588, 326, "Output",ExpressionUUID->"cc721759-3e61-45b9-a2e5-7355171aadcc"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[271028, 5217, 359, 10, 25, "Input",ExpressionUUID->"d791a8a8-5290-490b-9a1b-d5bf9c6cd5a4"],
+Cell[271390, 5229, 385, 10, 42, "Output",ExpressionUUID->"2723ffda-71c1-41b3-9446-6fd7f97d95ab"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[271812, 5244, 5792, 144, 209, "Input",ExpressionUUID->"efe0717e-1a4b-4a72-a5da-a2e9186bd1ec"],
+Cell[277607, 5390, 40087, 679, 244, "Output",ExpressionUUID->"a7be33ba-7aa8-4b0b-9929-84068abe4ebd"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[317731, 6074, 383, 9, 39, "Input",ExpressionUUID->"fb19745f-d068-48af-9c29-c7123646b8ef"],
+Cell[318117, 6085, 196, 3, 25, "Output",ExpressionUUID->"e0694b56-77c1-47e5-9928-2750b564de6e"]
+}, Open ]],
+Cell[318328, 6091, 154, 3, 22, "Input",ExpressionUUID->"5ff59419-6b49-4b92-9161-5b0dab56051b"],
+Cell[CellGroupData[{
+Cell[318507, 6098, 4529, 108, 145, "Input",ExpressionUUID->"fa46f97d-9534-4d3f-8e90-a8598a4bd324"],
+Cell[323039, 6208, 22560, 386, 283, "Output",ExpressionUUID->"174f48a3-9933-4f7f-8806-091e93a9ce75"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[345636, 6599, 2888, 67, 110, "Input",ExpressionUUID->"8d8879fb-c6bb-4b5b-a028-bc28257684bb"],
+Cell[348527, 6668, 14491, 256, 223, "Output",ExpressionUUID->"48123e43-e631-4a06-a47a-7719830a4918"]
+}, Open ]],
+Cell[363033, 6927, 145, 3, 22, "Input",ExpressionUUID->"c5dbaf72-a605-4c61-ba62-df24770f7000"],
Cell[CellGroupData[{
-Cell[1086, 36, 246, 4, 22, "Input",ExpressionUUID->"83b24d73-7cfc-4a2f-a727-53c609f967fd"],
-Cell[1335, 42, 621, 15, 25, "Output",ExpressionUUID->"db6d0977-ebec-4f64-a895-b2176143e8b2"]
+Cell[363203, 6934, 592, 15, 22, "Input",ExpressionUUID->"e32ddefb-6d7d-41d8-9408-44dfb467bc51"],
+Cell[363798, 6951, 405, 9, 25, "Output",ExpressionUUID->"1b64efb6-925e-4824-9bef-21a9599fd16c"]
}, Open ]],
+Cell[364218, 6963, 1441, 37, 75, "Input",ExpressionUUID->"2ccff759-af39-4419-abaf-3a2ff108b592"],
Cell[CellGroupData[{
-Cell[1993, 62, 295, 5, 22, "Input",ExpressionUUID->"23bc2248-ea2c-498f-be5b-40dd4156709e"],
-Cell[2291, 69, 241, 4, 25, "Output",ExpressionUUID->"108b1754-01ba-4ac1-8b36-cfe5355222e2"]
+Cell[365684, 7004, 334, 8, 24, "Input",ExpressionUUID->"9d38bf0a-1b01-459e-b90b-f4f4f415ffc7"],
+Cell[366021, 7014, 263, 5, 39, "Output",ExpressionUUID->"38d4c10e-4140-44a4-b4d6-bba3ce09f096"]
}, Open ]],
Cell[CellGroupData[{
-Cell[2569, 78, 829, 21, 22, "Input",ExpressionUUID->"874f84cd-149c-43b3-8711-b9fd0129e036"],
-Cell[3401, 101, 1110, 24, 25, "Output",ExpressionUUID->"2569ec7f-06f8-4d96-90ad-f6881e3c95ff"]
+Cell[366321, 7024, 224, 4, 22, "Input",ExpressionUUID->"44224ffd-2c48-4581-a368-ab909e0701bb"],
+Cell[366548, 7030, 302, 8, 25, "Output",ExpressionUUID->"a7b79756-7237-4715-9177-7809c5991e45"]
}, Open ]],
Cell[CellGroupData[{
-Cell[4548, 130, 1122, 29, 22, "Input",ExpressionUUID->"13ac0713-5c3c-49fc-a322-a9f53d13bda2"],
-Cell[5673, 161, 918, 18, 25, "Output",ExpressionUUID->"d356300d-fbd5-438e-842f-b2e2d92bd3a0"]
+Cell[366887, 7043, 579, 11, 24, "Input",ExpressionUUID->"eb887467-cb9c-4af9-9454-a333612bd730"],
+Cell[367469, 7056, 15603, 348, 327, "Output",ExpressionUUID->"1e205518-5f28-4b0d-bf97-1ef60e744fe9"]
}, Open ]],
Cell[CellGroupData[{
-Cell[6628, 184, 954, 19, 24, "Input",ExpressionUUID->"59d7c94c-1b16-401f-9f76-aee317437f4b"],
-Cell[7585, 205, 17997, 314, 164, "Output",ExpressionUUID->"7d82a994-0e66-45e2-9f9d-23085d92d885"]
+Cell[383109, 7409, 1047, 28, 75, "Input",ExpressionUUID->"c56e2f6b-9c72-4c2d-8eba-3038314a2f4c"],
+Cell[384159, 7439, 1536, 42, 178, "Output",ExpressionUUID->"b9d51004-0cce-4c5b-a304-1aa9a84c56db"]
}, Open ]],
Cell[CellGroupData[{
-Cell[25619, 524, 878, 26, 25, "Input",ExpressionUUID->"d0b98ea5-26fd-48d2-9fd3-094018a22423"],
-Cell[26500, 552, 377, 9, 22, "Message",ExpressionUUID->"54591efa-3e06-4780-a52d-356be312bb3b"],
-Cell[26880, 563, 1835, 50, 58, "Output",ExpressionUUID->"3e64dfbd-1d75-4bd6-b63e-4e5bec743e80"]
+Cell[385732, 7486, 1595, 36, 75, "Input",ExpressionUUID->"8965277f-d2d2-40c8-b8ca-7816448c9503"],
+Cell[387330, 7524, 15702, 275, 183, "Output",ExpressionUUID->"15c08e09-69ae-49ce-bca4-734d90c2d092"]
}, Open ]],
-Cell[28730, 616, 1760, 46, 40, "Input",ExpressionUUID->"27f70f50-5ebf-4a6d-94af-1a6bfe816e28"],
Cell[CellGroupData[{
-Cell[30515, 666, 550, 13, 22, "Input",ExpressionUUID->"8965277f-d2d2-40c8-b8ca-7816448c9503"],
-Cell[31068, 681, 421, 9, 25, "Output",ExpressionUUID->"4a56b86c-fd32-4aa6-8c0b-bb95b62204d9"]
+Cell[403069, 7804, 394, 9, 22, "Input",ExpressionUUID->"c241bd5e-e38f-4710-8e5b-f8e7f5db0d5e"],
+Cell[403466, 7815, 29012, 497, 179, "Output",ExpressionUUID->"9ff27ba2-33df-4d53-894e-2237adc5b8f1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[31526, 695, 608, 17, 25, "Input",ExpressionUUID->"6c1d3718-7a8d-41a6-98ea-98fe3318bcfa"],
-Cell[32137, 714, 235, 4, 25, "Output",ExpressionUUID->"8b0315bf-6d61-4278-a829-dedfe692066f"]
+Cell[432515, 8317, 608, 17, 25, "Input",ExpressionUUID->"6c1d3718-7a8d-41a6-98ea-98fe3318bcfa"],
+Cell[433126, 8336, 235, 4, 25, "Output",ExpressionUUID->"8b0315bf-6d61-4278-a829-dedfe692066f"]
}, Open ]],
Cell[CellGroupData[{
-Cell[32409, 723, 606, 16, 22, "Input",ExpressionUUID->"516a4819-1b7b-40d4-a8ad-e2086998c231"],
-Cell[33018, 741, 7198, 136, 175, "Output",ExpressionUUID->"cb4c528f-0710-481a-bfb2-44297fb7fba9"]
+Cell[433398, 8345, 606, 16, 22, "Input",ExpressionUUID->"516a4819-1b7b-40d4-a8ad-e2086998c231"],
+Cell[434007, 8363, 7198, 136, 175, "Output",ExpressionUUID->"cb4c528f-0710-481a-bfb2-44297fb7fba9"]
}, Open ]],
Cell[CellGroupData[{
-Cell[40253, 882, 526, 13, 22, "Input",ExpressionUUID->"aed31f23-624a-4974-a440-50445111532a"],
-Cell[40782, 897, 14567, 257, 179, "Output",ExpressionUUID->"2d0442be-aad9-4e64-bcb2-9c95e259b44d"]
+Cell[441242, 8504, 526, 13, 22, "Input",ExpressionUUID->"aed31f23-624a-4974-a440-50445111532a"],
+Cell[441771, 8519, 14567, 257, 179, "Output",ExpressionUUID->"2d0442be-aad9-4e64-bcb2-9c95e259b44d"]
}, Open ]],
Cell[CellGroupData[{
-Cell[55386, 1159, 1501, 38, 22, "Input",ExpressionUUID->"47f1d4ba-afc2-44f3-aeb8-a071f0e8c4f9"],
-Cell[56890, 1199, 574, 12, 32, "Message",ExpressionUUID->"a415b118-1097-4155-84e3-609dd9a85a38"],
-Cell[57467, 1213, 614, 13, 22, "Message",ExpressionUUID->"8871feea-390b-4d51-8323-ededa45e1a08"],
-Cell[58084, 1228, 574, 12, 32, "Message",ExpressionUUID->"d90fd7e9-775c-4fd4-8a1d-aa407ff8abe4"],
-Cell[58661, 1242, 576, 12, 32, "Message",ExpressionUUID->"e5d7a12d-1671-4c8c-989b-ec0f9f4c67a0"],
-Cell[59240, 1256, 652, 13, 22, "Message",ExpressionUUID->"bdad9088-50c1-4d40-ad09-4fbb47c24899"],
-Cell[59895, 1271, 614, 13, 22, "Message",ExpressionUUID->"4c080a0f-6df2-46f1-bc2d-7a054fb75363"],
-Cell[60512, 1286, 616, 13, 22, "Message",ExpressionUUID->"cbf1491d-6d6b-408a-9961-e6e37a65a0a6"],
-Cell[61131, 1301, 656, 13, 22, "Message",ExpressionUUID->"c77564c1-0ba4-4c7f-959b-735db191f7a0"]
+Cell[456375, 8781, 1501, 38, 55, "Input",ExpressionUUID->"47f1d4ba-afc2-44f3-aeb8-a071f0e8c4f9"],
+Cell[457879, 8821, 574, 12, 32, "Message",ExpressionUUID->"a415b118-1097-4155-84e3-609dd9a85a38"],
+Cell[458456, 8835, 614, 13, 22, "Message",ExpressionUUID->"8871feea-390b-4d51-8323-ededa45e1a08"],
+Cell[459073, 8850, 574, 12, 32, "Message",ExpressionUUID->"d90fd7e9-775c-4fd4-8a1d-aa407ff8abe4"],
+Cell[459650, 8864, 576, 12, 32, "Message",ExpressionUUID->"e5d7a12d-1671-4c8c-989b-ec0f9f4c67a0"],
+Cell[460229, 8878, 652, 13, 22, "Message",ExpressionUUID->"bdad9088-50c1-4d40-ad09-4fbb47c24899"],
+Cell[460884, 8893, 614, 13, 22, "Message",ExpressionUUID->"4c080a0f-6df2-46f1-bc2d-7a054fb75363"],
+Cell[461501, 8908, 616, 13, 22, "Message",ExpressionUUID->"cbf1491d-6d6b-408a-9961-e6e37a65a0a6"],
+Cell[462120, 8923, 656, 13, 22, "Message",ExpressionUUID->"c77564c1-0ba4-4c7f-959b-735db191f7a0"]
}, Open ]],
Cell[CellGroupData[{
-Cell[61824, 1319, 356, 5, 22, "Input",ExpressionUUID->"c6e27107-d1c1-4def-bce7-5bfc77efa117"],
-Cell[62183, 1326, 431003, 7099, 264, 351059, 5788, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"65425ede-668b-4584-b959-e541ddaed240"]
+Cell[462813, 8941, 356, 5, 22, "Input",ExpressionUUID->"c6e27107-d1c1-4def-bce7-5bfc77efa117"],
+Cell[463172, 8948, 431003, 7099, 264, 351059, 5788, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"65425ede-668b-4584-b959-e541ddaed240"]
}, Open ]],
Cell[CellGroupData[{
-Cell[493223, 8430, 474, 12, 22, "Input",ExpressionUUID->"d91d527e-9cac-4ce1-9ae6-5ff3208121a2"],
-Cell[493700, 8444, 4330, 89, 171, "Output",ExpressionUUID->"559d6958-bbd1-42f4-b122-f3904597675f"]
+Cell[894212, 16052, 474, 12, 22, "Input",ExpressionUUID->"d91d527e-9cac-4ce1-9ae6-5ff3208121a2"],
+Cell[894689, 16066, 4330, 89, 171, "Output",ExpressionUUID->"559d6958-bbd1-42f4-b122-f3904597675f"]
}, Open ]],
Cell[CellGroupData[{
-Cell[498067, 8538, 1771, 32, 24, "Input",ExpressionUUID->"5a79a2e7-c8b4-40fb-9154-88fdcc27bd73"],
-Cell[499841, 8572, 14400, 247, 630, "Output",ExpressionUUID->"a6b30fc2-c088-4262-94f2-edcc475c95da"]
+Cell[899056, 16160, 1771, 32, 24, "Input",ExpressionUUID->"5a79a2e7-c8b4-40fb-9154-88fdcc27bd73"],
+Cell[900830, 16194, 14400, 247, 630, "Output",ExpressionUUID->"a6b30fc2-c088-4262-94f2-edcc475c95da"]
}, Open ]],
-Cell[514256, 8822, 162, 3, 22, "Input",ExpressionUUID->"536d20a8-587f-4cd2-8d38-d67784bf6d33"],
+Cell[915245, 16444, 162, 3, 22, "Input",ExpressionUUID->"536d20a8-587f-4cd2-8d38-d67784bf6d33"],
Cell[CellGroupData[{
-Cell[514443, 8829, 347, 7, 24, "Input",ExpressionUUID->"91e758ec-72b9-4894-b62d-8872e6b4ee42"],
-Cell[514793, 8838, 369, 7, 28, "Output",ExpressionUUID->"7ebcdde0-d788-47fa-bc62-df9697e7a7a4"]
+Cell[915432, 16451, 347, 7, 24, "Input",ExpressionUUID->"91e758ec-72b9-4894-b62d-8872e6b4ee42"],
+Cell[915782, 16460, 369, 7, 28, "Output",ExpressionUUID->"7ebcdde0-d788-47fa-bc62-df9697e7a7a4"]
}, Open ]],
Cell[CellGroupData[{
-Cell[515199, 8850, 1225, 20, 24, "Input",ExpressionUUID->"deab78a8-001c-48e2-8e09-f201bb4cea29"],
-Cell[516427, 8872, 4606, 106, 179, "Output",ExpressionUUID->"9cd66a8a-65ca-4fb7-ba2c-0e30d1efdb75"]
+Cell[916188, 16472, 1225, 20, 24, "Input",ExpressionUUID->"deab78a8-001c-48e2-8e09-f201bb4cea29"],
+Cell[917416, 16494, 4606, 106, 179, "Output",ExpressionUUID->"9cd66a8a-65ca-4fb7-ba2c-0e30d1efdb75"]
}, Open ]],
Cell[CellGroupData[{
-Cell[521070, 8983, 1327, 21, 24, "Input",ExpressionUUID->"ac67b8f1-5341-473f-9d1d-922e2695ed9e"],
-Cell[522400, 9006, 11492, 278, 179, "Output",ExpressionUUID->"3fd3b5f8-4da9-404f-8b20-64b6c99239f0"]
+Cell[922059, 16605, 1327, 21, 24, "Input",ExpressionUUID->"ac67b8f1-5341-473f-9d1d-922e2695ed9e"],
+Cell[923389, 16628, 11492, 278, 179, "Output",ExpressionUUID->"3fd3b5f8-4da9-404f-8b20-64b6c99239f0"]
}, Open ]]
}
]