From 9d9333ca7ab9512a644e6bba66c786755fa4fb44 Mon Sep 17 00:00:00 2001 From: Pierre-Francois Loos Date: Tue, 29 Jun 2021 13:29:56 +0200 Subject: [PATCH] update --- Ec.nb | 1585 ++++++++++++++------------------------------------------- 1 file changed, 376 insertions(+), 1209 deletions(-) diff --git a/Ec.nb b/Ec.nb index a89ad6b..de376ef 100644 --- a/Ec.nb +++ b/Ec.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] -NotebookDataLength[ 7785721, 145695] -NotebookOptionsPosition[ 7754629, 145159] -NotebookOutlinePosition[ 7755022, 145175] -CellTagsIndexPosition[ 7754979, 145172] +NotebookDataLength[ 7744267, 144862] +NotebookOptionsPosition[ 7713185, 144326] +NotebookOutlinePosition[ 7713578, 144342] +CellTagsIndexPosition[ 7713535, 144339] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -910,14 +910,12 @@ Cell[CellGroupData[{ Cell[TextData[{ Cell[BoxData[ FormBox[ - SubscriptBox["E", "var"], TraditionalForm]], - FormatType->"TraditionalForm",ExpressionUUID-> + SubscriptBox["E", "var"], TraditionalForm]],ExpressionUUID-> "55efcb50-1afb-4c9e-94ab-187ef1bc9ba4"], " vs ", Cell[BoxData[ FormBox[ - SubscriptBox["N", "det"], TraditionalForm]], - FormatType->"TraditionalForm",ExpressionUUID-> + SubscriptBox["N", "det"], TraditionalForm]],ExpressionUUID-> "822fc5f5-f869-4d75-832a-2f0ddaa32779"] }], "Subsection", CellChangeTimes->{{3.833940777778371*^9, @@ -985,18 +983,11 @@ Cell[BoxData[ RowBox[{"{", RowBox[{"Thick", ",", "Black"}], "}"}], ",", "\[IndentingNewLine]", - RowBox[{"{", - RowBox[{"Thick", ",", - RowBox[{"Darker", "[", "Green", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"Thick", ",", "Red"}], "}"}], ",", RowBox[{"{", RowBox[{"Thick", ",", "Blue"}], "}"}], ",", "\[IndentingNewLine]", - RowBox[{"{", - RowBox[{"Thick", ",", - RowBox[{"Darker", "[", "Green", "]"}], ",", "Dotted"}], "}"}], - ",", RowBox[{"{", RowBox[{"Thick", ",", "Red", ",", "Dotted"}], "}"}], ",", RowBox[{"{", @@ -1196,9 +1187,8 @@ Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{ - "CCSDTQ", ",", "SCINO", ",", "SCILO", ",", "SCIOO", ",", - "SCIrPT2NO", ",", "SCIrPT2LO", ",", "SCIrPT2OO"}], "}"}], ",", - "\[IndentingNewLine]", + "CCSDTQ", ",", "SCINO", ",", "SCIOO", ",", "SCIrPT2NO", ",", + "SCIrPT2OO"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"PlotLabel", "\[Rule]", RowBox[{"MaTeX", "[", RowBox[{ @@ -1233,11 +1223,6 @@ Cell[BoxData[ "\"\<\\\\text{$E_\\\\text{var}^\\\\text{NO}$}\>\"", ",", RowBox[{"FontSize", "\[Rule]", "SizeLegend"}]}], "]"}], ",", "\[IndentingNewLine]", - RowBox[{"MaTeX", "[", - RowBox[{ - "\"\<\\\\text{$E_\\\\text{var}^\\\\text{LO}$}\>\"", ",", - RowBox[{"FontSize", "\[Rule]", "SizeLegend"}]}], "]"}], ",", - "\[IndentingNewLine]", RowBox[{"MaTeX", "[", RowBox[{ "\"\<\\\\text{$E_\\\\text{var}^\\\\text{NO}$}\>\"", ",", @@ -1249,12 +1234,6 @@ Cell[BoxData[ \\\\text{NO}$}\>\"", ",", RowBox[{"FontSize", "\[Rule]", "SizeLegend"}]}], "]"}], ",", "\[IndentingNewLine]", - RowBox[{"MaTeX", "[", - RowBox[{ - "\"\<\\\\text{$E_\\\\text{var}^\\\\text{LO}+E_\\\\text{rPT2}^\ -\\\\text{LO}$}\>\"", ",", - RowBox[{"FontSize", "\[Rule]", "SizeLegend"}]}], "]"}], ",", - "\[IndentingNewLine]", RowBox[{"MaTeX", "[", RowBox[{ "\"\<\\\\text{$E_\\\\text{var}^\\\\text{OO}+E_\\\\text{rPT2}^\ @@ -1298,9 +1277,11 @@ Cell[BoxData[ 3.833941743110475*^9, 3.833941752383319*^9}, 3.833941803531334*^9, 3.8339418444056377`*^9, {3.833941923437778*^9, 3.833941923908511*^9}, { 3.83395343950891*^9, 3.833953479422761*^9}, {3.833953685720748*^9, - 3.833953688458754*^9}, {3.833953759827365*^9, 3.833953760314291*^9}}, - CellLabel->"In[87]:=",ExpressionUUID->"a67ae21a-c72d-4d67-abe2-1be3a36cc379"] -}, Open ]], + 3.833953688458754*^9}, {3.833953759827365*^9, 3.833953760314291*^9}, { + 3.833954678773411*^9, 3.8339547251827917`*^9}}, + CellLabel-> + "In[167]:=",ExpressionUUID->"a67ae21a-c72d-4d67-abe2-1be3a36cc379"] +}, Closed]], Cell[CellGroupData[{ @@ -1558,8 +1539,8 @@ Cell[BoxData[ RowBox[{"ListPlot", "[", RowBox[{ RowBox[{"{", - RowBox[{"CCSDTQ", ",", "SCIrPT2OO"}], "}"}], ",", - "\[IndentingNewLine]", + RowBox[{"CCSDTQ", ",", "SCIrPT2NO", ",", "SCIrPT2OO"}], "}"}], + ",", "\[IndentingNewLine]", RowBox[{"PlotLabel", "\[Rule]", RowBox[{"MaTeX", "[", RowBox[{ @@ -1730,8 +1711,9 @@ $E_\\\\text{rPT2}^\\\\text{OO}$}\>\"", ",", 3.833941917509623*^9}, {3.833942414354508*^9, 3.833942421329791*^9}, { 3.833953306416747*^9, 3.833953310272266*^9}, {3.83395334795127*^9, 3.8339533978372107`*^9}, {3.833953497501061*^9, 3.8339535492045183`*^9}, { - 3.833953632324129*^9, 3.833953701516768*^9}}, - CellLabel->"In[84]:=",ExpressionUUID->"4a7754e0-f469-452a-aa2e-0612e3e61cc4"] + 3.833953632324129*^9, 3.833953701516768*^9}, {3.8339547623054667`*^9, + 3.833954764499509*^9}},ExpressionUUID->"4a7754e0-f469-452a-aa2e-\ +0612e3e61cc4"] }, Open ]] }, Open ]], @@ -5855,14 +5837,14 @@ Cell[BoxData[{ 3.8339535646734953`*^9}, {3.833953925927829*^9, 3.833953925999363*^9}, { 3.833954059126813*^9, 3.833954059551647*^9}}, CellLabel-> - "In[152]:=",ExpressionUUID->"5b87143c-454a-4069-aded-93ae6535f27a"], + "In[168]:=",ExpressionUUID->"5b87143c-454a-4069-aded-93ae6535f27a"], Cell[BoxData[ TemplateBox[{ GraphicsBox[{{}, {{{}, {}, { Hue[0.67, 0.6, 0.6], Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], GrayLevel[0]], @@ -5870,12 +5852,10 @@ Cell[BoxData[ 20.72326583694641, -738.202355812839}}]}, { Hue[0.9060679774997897, 0.6, 0.6], Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0]], + RGBColor[1, 0, 0]], LineBox[{{7.956300084607644, -300.}, { 8.540909718033554, -351.5036739190123}, { 9.234056898593499, -412.61132301900716`}, { @@ -5894,30 +5874,7 @@ Cell[BoxData[ 18.24497024587279, -682.3461623190212}}]}, { Hue[0.1421359549995791, 0.6, 0.6], Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0]], - LineBox[{{6.986869513443487, -300.}, { - 7.154615356913663, -310.291538119003}, { - 7.847762537473608, -356.6906258189988}, { - 8.540909718033554, -406.7649938190243}, { - 9.234056898593499, -456.9169083190161}, { - 9.927204079153444, -502.8246106190011}, { - 10.62035125971339, -540.5561648190087}, { - 11.313498440273335`, -569.4994759190024}, { - 12.00664562083328, -590.7445605189992}, { - 12.699792801393226`, -606.8676518190159}, { - 13.392939981953171`, -619.9615657190236}, { - 14.086087162513117`, -631.35991031902}, { - 14.77923434307306, -641.8348398190119}, { - 15.472381523633006`, -651.7649046190002}, { - 16.16552870419295, -661.3170121190137}, { - 16.8586758847529, -670.5002930190176}, { - 17.551823065312842`, -679.2829909190061}}]}, { - Hue[0.37820393249936934`, 0.6, 0.6], - Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], RGBColor[0, 0, 1]], @@ -5939,14 +5896,12 @@ Cell[BoxData[ 16.8586758847529, -704.2838050190028}, { 17.551823065312842`, -710.0228380190003}, { 18.24497024587279, -714.927853819006}}]}, { - Hue[0.6142719099991583, 0.6, 0.6], + Hue[0.37820393249936934`, 0.6, 0.6], Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0], + RGBColor[1, 0, 0], Dashing[{0, Small}]], LineBox[{{6.461468176353717, -651.435290019009}, { 7.154615356913663, -658.0359438190158}, { @@ -5966,33 +5921,9 @@ Cell[BoxData[ 16.8586758847529, -724.8869554190094}, { 17.551823065312842`, -726.8851986190157}, { 18.24497024587279, -728.9405709190078}}]}, { - Hue[0.8503398874989481, 0.6, 0.6], + Hue[0.6142719099991583, 0.6, 0.6], Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0], - Dashing[{0, Small}]], - LineBox[{{6.461468176353717, -566.986033219024}, { - 7.154615356913663, -578.9091567189928}, { - 7.847762537473608, -593.4755202189876}, { - 8.540909718033554, -609.3474533190317}, { - 9.234056898593499, -625.3935498190231}, { - 9.927204079153444, -640.8799414190014}, { - 10.62035125971339, -654.5604653190082}, { - 11.313498440273335`, -665.4156766190056}, { - 12.00664562083328, -674.4055645189917}, { - 12.699792801393226`, -681.0167456190186}, { - 13.392939981953171`, -687.0339679190351}, { - 14.086087162513117`, -691.7326213190336}, { - 14.77923434307306, -696.4109031190162}, { - 15.472381523633006`, -700.8825509190046}, { - 16.16552870419295, -704.942491919013}, { - 16.8586758847529, -708.9470995190084}, { - 17.551823065312842`, -712.692778219008}}]}, { - Hue[0.08640786499873876, 0.6, 0.6], - Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], RGBColor[0, 0, 1], @@ -6016,7 +5947,7 @@ Cell[BoxData[ 17.551823065312842`, -730.5680034189947}, { 18.24497024587279, -731.9872793190143}}]}}, {{ Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], GrayLevel[0]], @@ -6034,7 +5965,7 @@ Cell[BoxData[ CircleBox[{0, 0}, Offset[{3, 3}]]}], GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], GrayLevel[0]]}, StripOnInput -> False], TraditionalForm]], { @@ -6042,12 +5973,10 @@ Cell[BoxData[ Scaled[9.75]], {{{-4.605170185988091, -738.202355812839}}, {{ 20.72326583694641, -738.202355812839}}}]}, { Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0]], + RGBColor[1, 0, 0]], GeometricTransformationBox[ InsetBox[ BoxData[ @@ -6078,11 +6007,10 @@ Cell[BoxData[ Offset[{3.4641016151377544`, -2}], Offset[{0, 4}]}]], CurveClosed -> True]}], GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - Rational[2, 3], 0]]}, StripOnInput -> False], + RGBColor[1, 0, 0]]}, StripOnInput -> False], TraditionalForm]], {0., 0.}, Automatic, Scaled[9.75]], {{{6.461468176353717, -188.31975651900734`}}, {{ 7.154615356913663, -235.29466271901356`}}, {{ @@ -6103,10 +6031,10 @@ Cell[BoxData[ 17.551823065312842`, -672.3752349190022}}, {{ 18.24497024587279, -682.3461623190212}}}]}, { Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[1, 0, 0]], + RGBColor[0, 0, 1]], GeometricTransformationBox[ InsetBox[ BoxData[ @@ -6128,56 +6056,7 @@ Cell[BoxData[ Offset[{-3.75, 0}], Offset[{0, 3.75}]}]}], GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0]]}, StripOnInput -> False], - TraditionalForm]], {0., 0.}, Automatic, - Scaled[9.75]], {{{6.461468176353717, -267.76559241901055`}}, {{ - 7.154615356913663, -310.291538119003}}, {{ - 7.847762537473608, -356.6906258189988}}, {{ - 8.540909718033554, -406.7649938190243}}, {{ - 9.234056898593499, -456.9169083190161}}, {{ - 9.927204079153444, -502.8246106190011}}, {{ - 10.62035125971339, -540.5561648190087}}, {{ - 11.313498440273335`, -569.4994759190024}}, {{ - 12.00664562083328, -590.7445605189992}}, {{ - 12.699792801393226`, -606.8676518190159}}, {{ - 13.392939981953171`, -619.9615657190236}}, {{ - 14.086087162513117`, -631.35991031902}}, {{ - 14.77923434307306, -641.8348398190119}}, {{ - 15.472381523633006`, -651.7649046190002}}, {{ - 16.16552870419295, -661.3170121190137}}, {{ - 16.8586758847529, -670.5002930190176}}, {{ - 17.551823065312842`, -679.2829909190061}}}]}, { - Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[0, 0, 1]], - GeometricTransformationBox[ - InsetBox[ - BoxData[ - FormBox[ - StyleBox[ - GraphicsBox[{{ - GrayLevel[1], - PolygonBox[{ - Offset[{-2.75, -2.75}], - Offset[{2.75, -2.75}], - Offset[{2.75, 2.75}], - Offset[{-2.75, 2.75}], - Offset[{-2.75, -2.75}]}]}, - AbsoluteThickness[1.5], - Dashing[{}], - LineBox[{ - Offset[{-2.75, -2.75}], - Offset[{2.75, -2.75}], - Offset[{2.75, 2.75}], - Offset[{-2.75, 2.75}], - Offset[{-2.75, -2.75}]}]}], - GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], RGBColor[0, 0, 1]]}, StripOnInput -> False], @@ -6201,12 +6080,62 @@ Cell[BoxData[ 17.551823065312842`, -710.0228380190003}}, {{ 18.24497024587279, -714.927853819006}}}]}, { Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0], + RGBColor[1, 0, 0], + Dashing[{0, Small}]], + GeometricTransformationBox[ + InsetBox[ + BoxData[ + FormBox[ + StyleBox[ + GraphicsBox[{{ + GrayLevel[1], + PolygonBox[{ + Offset[{-2.75, -2.75}], + Offset[{2.75, -2.75}], + Offset[{2.75, 2.75}], + Offset[{-2.75, 2.75}], + Offset[{-2.75, -2.75}]}]}, + AbsoluteThickness[1.5], + Dashing[{}], + LineBox[{ + Offset[{-2.75, -2.75}], + Offset[{2.75, -2.75}], + Offset[{2.75, 2.75}], + Offset[{-2.75, 2.75}], + Offset[{-2.75, -2.75}]}]}], + GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + Thickness[Large], + RGBColor[1, 0, 0], + Dashing[{0, Small}]]}, StripOnInput -> False], + TraditionalForm]], {0., 0.}, Automatic, + Scaled[9.75]], {{{6.461468176353717, -651.435290019009}}, {{ + 7.154615356913663, -658.0359438190158}}, {{ + 7.847762537473608, -665.3992488190283}}, {{ + 8.540909718033554, -674.2712788190204}}, {{ + 9.234056898593499, -683.6562214189996}}, {{ + 9.927204079153444, -692.7353080190244}}, {{ + 10.62035125971339, -700.9588278189938}}, {{ + 11.313498440273335`, -707.5998829189984}}, {{ + 12.00664562083328, -711.6106555190242}}, {{ + 12.699792801393226`, -714.5753567190241}}, {{ + 13.392939981953171`, -716.24401871901}}, {{ + 14.086087162513117`, -717.836218519011}}, {{ + 14.77923434307306, -719.3984750190054}}, {{ + 15.472381523633006`, -721.1836926190074}}, {{ + 16.16552870419295, -723.0175414190114}}, {{ + 16.8586758847529, -724.8869554190094}}, {{ + 17.551823065312842`, -726.8851986190157}}, {{ + 18.24497024587279, -728.9405709190078}}}]}, { + Directive[ + PointSize[0.011000000000000001`], + AbsoluteThickness[1.6], + Thickness[Large], + RGBColor[0, 0, 1], Dashing[{0, Small}]], GeometricTransformationBox[ InsetBox[ @@ -6238,111 +6167,7 @@ Cell[BoxData[ Offset[{3.4641016151377544`, 2}], Offset[{0, -4}]}]], CurveClosed -> True]}], GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[0, - Rational[2, 3], 0], - Dashing[{0, Small}]]}, StripOnInput -> False], - TraditionalForm]], {0., 0.}, Automatic, - Scaled[9.75]], {{{6.461468176353717, -651.435290019009}}, {{ - 7.154615356913663, -658.0359438190158}}, {{ - 7.847762537473608, -665.3992488190283}}, {{ - 8.540909718033554, -674.2712788190204}}, {{ - 9.234056898593499, -683.6562214189996}}, {{ - 9.927204079153444, -692.7353080190244}}, {{ - 10.62035125971339, -700.9588278189938}}, {{ - 11.313498440273335`, -707.5998829189984}}, {{ - 12.00664562083328, -711.6106555190242}}, {{ - 12.699792801393226`, -714.5753567190241}}, {{ - 13.392939981953171`, -716.24401871901}}, {{ - 14.086087162513117`, -717.836218519011}}, {{ - 14.77923434307306, -719.3984750190054}}, {{ - 15.472381523633006`, -721.1836926190074}}, {{ - 16.16552870419295, -723.0175414190114}}, {{ - 16.8586758847529, -724.8869554190094}}, {{ - 17.551823065312842`, -726.8851986190157}}, {{ - 18.24497024587279, -728.9405709190078}}}]}, { - Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0], - Dashing[{0, Small}]], - GeometricTransformationBox[ - InsetBox[ - BoxData[ - FormBox[ - StyleBox[ - GraphicsBox[{{ - GrayLevel[1], - DiskBox[{0, 0}, - Offset[{3, 3}]]}, - AbsoluteThickness[1.5], - Dashing[{}], - CircleBox[{0, 0}, - Offset[{3, 3}]]}], - GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0], - Dashing[{0, Small}]]}, StripOnInput -> False], - TraditionalForm]], {0., 0.}, Automatic, - Scaled[9.75]], {{{6.461468176353717, -566.986033219024}}, {{ - 7.154615356913663, -578.9091567189928}}, {{ - 7.847762537473608, -593.4755202189876}}, {{ - 8.540909718033554, -609.3474533190317}}, {{ - 9.234056898593499, -625.3935498190231}}, {{ - 9.927204079153444, -640.8799414190014}}, {{ - 10.62035125971339, -654.5604653190082}}, {{ - 11.313498440273335`, -665.4156766190056}}, {{ - 12.00664562083328, -674.4055645189917}}, {{ - 12.699792801393226`, -681.0167456190186}}, {{ - 13.392939981953171`, -687.0339679190351}}, {{ - 14.086087162513117`, -691.7326213190336}}, {{ - 14.77923434307306, -696.4109031190162}}, {{ - 15.472381523633006`, -700.8825509190046}}, {{ - 16.16552870419295, -704.942491919013}}, {{ - 16.8586758847529, -708.9470995190084}}, {{ - 17.551823065312842`, -712.692778219008}}}]}, { - Directive[ - PointSize[0.009166666666666668], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[0, 0, 1], - Dashing[{0, Small}]], - GeometricTransformationBox[ - InsetBox[ - BoxData[ - FormBox[ - StyleBox[ - GraphicsBox[{{ - GrayLevel[1], - PolygonBox[ - NCache[{ - Offset[{0, 4}], - Offset[{(-2) 3^Rational[1, 2], -2}], - Offset[{2 3^Rational[1, 2], -2}]}, { - Offset[{0, 4}], - Offset[{-3.4641016151377544`, -2}], - Offset[{3.4641016151377544`, -2}]}]]}, - AbsoluteThickness[1.5], - Dashing[{}], - JoinedCurveBox[ - NCache[ - Line[{ - Offset[{0, 4}], - Offset[{(-2) 3^Rational[1, 2], -2}], - Offset[{2 3^Rational[1, 2], -2}], - Offset[{0, 4}]}], - Line[{ - Offset[{0, 4}], - Offset[{-3.4641016151377544`, -2}], - Offset[{3.4641016151377544`, -2}], - Offset[{0, 4}]}]], CurveClosed -> True]}], - GraphicsBoxOptions -> {DefaultBaseStyle -> Directive[ - PointSize[0.009166666666666668], + PointSize[0.011000000000000001`], AbsoluteThickness[1.6], Thickness[Large], RGBColor[0, 0, 1], @@ -6377,6 +6202,7 @@ Cell[BoxData[ GraphicsBox[{ Thickness[0.00484050534875841], StyleBox[{ + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, @@ -6657,6 +6483,7 @@ Jjy9YIfgZ+8pmSyhguB35zz/vVIwAZIeHhrAw+PPt9IHcz7qwfng+PQxdJBt fR244148XL/ozXPfg2dD+c8MHHTvqrA15sY7GGitFL6wxMABlv78L06M+eeM 4MPSIwBf6S4W "]], + FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, @@ -7763,6 +7590,7 @@ H+beNd23Mxj6EfziraK/T5d5wvkOTY+Oz1js6WCgtVL4gouBgzjIfZc8HbaY /ziUwqUL8QezF5wPNu+7p0Ptb6uCcxaGEP3VrnD+zltdf1PzXeHqLa4dzTVZ gOCHgNx3wdWhAGSQg4HDCU2rSaf/u6K657EbRnjD+AC/Ya09 "]], + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, { @@ -7922,133 +7750,6 @@ jsEs/Q== ImageSize -> {31., 23.}, PlotRange -> {{0., 30.89}, {0., 22.419999999999998`}}, AspectRatio -> Automatic}], - GraphicsBox[{ - Thickness[0.033852403520649964`], - StyleBox[{ - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" -1:eJxlk30s1HEcxw/FrCzunIdz3M+53x3JuWK2TPNG9GS5YbqGUHnKH9qwpmkt -D9NGQslDksymthptCddIk6I8jlqjjZQ8lA2TWSr53jc/qz7b94/X9v1+Ht7v -z9f+ZHJwrAGPx9NbPz7rR3/9CPMPz25ZkiNosCjil2A3xA8tbutXb/+P3UgM -qcAjAT7YT1lVvVoVchgjtsddgG0BbJp+xSaHMz4Lp3Ztsm3d9EHlmuufPHxY -lQwbJ0woETI3tFB2iY9ObfMVQ7WS1oveijyvQ9o4XwbvTEYtYj0MEBu3Hp/F -uKrJC9JT6UNF8qSIUd11rTZJvuw97h/lUzFow3GPLkQ0z4QUGzzwJuyr66iM -cr4UzciceKmR4VzHY//yXin8CrP4cSNSCNKLU3ufM7SuoRTteW2Z7h8lmK+p -Z3rvMohgNeK+SjscuN9Zx1uxQ1OIp2Yt1xbm5F2tiOtXp9e48O/+1XyOFYuy -mYpuU+79BueTe6YSjkOJTs8kCCd1M8ywRiLKnuopEGA2pVG46ixDC8kzJcDP -5bTxyiIW5STSzfGqw/dBYpWc9i0WYo/OBwWW2hYa48Ms8X3uS/veDgUk2uq2 -2KPWVKcnCowRXc1EHFPdxNz9bOJvqB3UIzYZMcUKOoeRBBMay6ZBKFBK6h+X -4HTk+wADKwXKdP1IMBlz5617v5xj1c57goH9m5yx2KBO0rLce1HVCafXapbL -P33Gebn0lgzxREc5g8Tk+ZzuVBnVJUiKBMLDztTXVnsEdhntu/nNmfp1mYGH -V2vwDR8nHDO2yHXzZmh+UyfkknkeifCC7OO8I51/wZpjR+LHjCUqaxxafkw5 -ooD41CCkdcccqU8frOn/cVDhKdkbPxGmSL8XVFTvZRGIPLwCFd2XbDuO6f+S -caybM5LFxVXPs32aTY4ODVZUdys5pvugpHOHssg2Caq/PulC/Qpk0U/8C3eh -PqywKCnccd7jiAv+/f+/AVCDwZE= - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, - 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGJZIGYC4r/fSh/MuWjkcAYM9CD0HCMHialXODMe6TqA -5QuNHER6vF6xhOg6GIOAs5HD1An8VWavdRwaWY72G143dJgxEwh+ajvYVkas -MNU1dNhi/uNQSpe2Q7SC48dkHQM4//zVsDf6u/Xg/JTYO27MP3TgfPf9tbIW -y3Ucju/a0cu2AcGfs0h55592HTif2021lOmXMZzvc4LddvZVE4fnWdrfpv/V -cZCZF6d5msHUITUNCJ7pOTCAgACCr/aked5ZL1OI+8U1MPgw9U8ixLdffKDp -8AJsrgnEXAMtSPhcQvBh7oHxwf601oXzYf6r+bQhIPuWpsN6VaCFutpw+54k -Lrxmwo/gg8NzJkyfEZxfvFX092k5Y3h8occfAE8FyTM= - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, - 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, - 3}}}, {CompressedData[" -1:eJxTTMoPSmViYGAQBmIQzeu/fkrqCnOHLztvdf0tNXXYYv7jUEqUKZwPprca -O2i85d1nsNMYzt+ol7eY0ccQzlcHyWsaONT9tio4J2Hi8B8E5PUcJgSXqEzf -b+IwYyYQ7NRxONS2PPxUkamDSI/XKxYTbYj+VjOHH29fH7B01nL4CuJPNYfz -rwt9cjz/zRLOnz6Bv8pstrWDrtZK4QtLdOH8fpA99oZw/t9vpQ/mFBo5/AHR -jtYOKbF33JgrjB0+bAjInjXdCiJvaOKgDzLniqXDDZA9bKYO3SBnXbSA+x89 -fADLZZf0 - "], CompressedData[" -1:eJxTTMoPSmViYGCQAWIQzeu/fkrqCnOHG0KfHM+zmTpcB9FmFnC+gdZK4QtH -LByeJC68ZnLexMHv4sSYf8aWDjEKjh+Tc0wcpk/grzK7bQlRd8XYQeVJ87yz -VlYO4lOvcGZsMkLlOxnC+dEg/T0GDgfaloefErJyWKsKlMjVd9AHm2PpcAYE -dPQc1N/y7jPYaenw51vpgzkTdR3218papLdYOrSwHO03/K7j8DxL+9t0W0uH -+JAg9QWZOg7dXq9YTC5aOMjMi9M8PUHb4cvOW11/XS0czG32Bk1T1HaQALlj -kTmcfwBkngiCrwGyr9MMrh/sDhkoP0AH4u8aU4h4jq5DGgiImTpMaW+NunxH -H873PsFuO9vVEM6XBulvMILqg+pfY+xw8rDT2sx3pg6R4tsvMtiZODSC/JVu -5nAQFC6HTBxOgeT/mcHjAz2+AFRAwP0= - "]}], - FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, - 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGI1IGYCYvGpVzgznAwd+GMD7huVKzjEhwSpL9DUx+A7 -T2gWSpNScHiSuPCayXt9B/c1R5czcCg4fN15q+uvqoFDqwK76pkp8nC+6ieV -l7NWysH58rsW7EvVk3PoDy5RmS5v4PDANd5x1kZZB2MQEDZw+LLv49Z0M1mH -H29fH7A8rOvQDjJvi4DDm+Ktor+9tR3ug9QLyjq476+VtVDXdlgjpMOXvk/W -ISP/Q+tJEW2Hmvs/bhlny8H5b9pyu41uI/gzZgLBTnmH7Q5Nj45HaMPdLzMv -TvO0gQ7cfzA+zP8+J9htZ5eqY/Bh6v+DQLyGw1qQe/gUHF6D3NutARGfL+8w -Z5Hyzj/LNR12BFtF/F8u5bBW9UnzvF4dh88g/07jdKj5tCEge5aOw+Jbyx8b -MnM6nAGBNTqQ8AjjcJBZ/sJDb7+OQ+Hykg3/+tkdfC9OjPn3WMch4InnJdPL -rA4JoPjh1IXo42F1YOHskk/WQ/BNQOEbjODLgsyrh/J92BzOXw17o39b10Fm -o9h8pgecDupvefcZVBpAwrtQBhI/lw3g4ecN8v9TA3j4wdIPLDzQ0xMAWW4A -mA== - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, - 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, - 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, - 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}}}, {CompressedData[" -1:eJxTTMoPSmViYGAwB2IQfahtefipRWYOLeK1rJnHeBxOHnZam5ln5vCi9nH2 -+RxuB423vPsMPM0c+iO6/Rk/cDmoPmmed1YKwfe7ODHm32VTOD9SfPtFhn2m -DqqfVF7O8uSB84UrJ5WcdRGA88HqN0jC+SbGICDjULJV9PfpdaYOM2aCgKxD -wZru2xkNpg4hby9/nHFQziFGwfFjso2pw38QsFdw+LQhIHvWdhOI+VsUHHq8 -XrGYMCL4p0H+uWcE53O7qZYy/TJ0OAMCPPJwPth8Rhk4XwSk/omUw2eQ+eZG -DvK7FuxLfSfpUAxyXx2CX//bquDcCQQfrJ/LGK4fxm9XYFc980Uazk9JAwI1 -GYfrQp8cz7NB1afIOCy+v49vDrOxw5u23G6j3TIOz7O0v03/a+SgDgpPTVmH -LeY/DqX8MoK4vwfBP9C9r8nkMYL/wDXecZahvINtZcQK01hjh5XfXlacUVCA -uPcGgl8ICt8CEzgfHJ+HTSD235aD8/+Cw1sGzgfb7yPpkBx7x435hZGDAsj/ -fmIO4GjcbORQc//HLePXopD0pGfk8GXfx63pYiIQ970ydFgvpMOXLifs8CRx -4TWT/YYO4OiuFITzIemRH86HpBdOh0aWo/2G7kYOfSB+ASs8vGB8h6ZHx2d0 -I/hg+7hMHG7w3hZLLWN3uAEK72MmDjGqETLnangcQNGQdg0hHwFKj3ymcP2Q -cEbwv+y81fX3K4IPNs/MDOK/aWwOsPy0/Nbyx4bOXA7o+QsA92ODUg== - "], {{ - 20.7656, 4.284379999999999}, {20.7656, 3.9109399999999996`}, { - 20.704700000000003`, 3.8015600000000003`}, {20.4516, 3.65781}, { - 20.160899999999998`, 3.4875000000000003`}, {19.823399999999996`, - 3.37969}, {19.5703, 3.37969}, {19.1469, 3.37969}, { - 18.809399999999997`, 3.7906299999999997`}, {18.809399999999997`, - 4.30938}, {18.809399999999997`, 4.35781}, {18.809399999999997`, - 5.07031}, {19.304699999999997`, 5.50469}, {20.7656, - 6.035939999999999}, {20.7656, 4.284379999999999}}}], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGItIGYC4rrfVgXnTpg5bA+2ivjPLufgd3FizL/PZg7y -uxbsS9WTc2AAAQFzhxkzgcBSzuGWdE2ikSmCLzH1CmdGE4IfIb79IsM8c4dW -BXbVMyWycH4LiB8iDecvubX8sWEzH5zfH9Htz7iB04HPf/2U1A5zh8UgeWZO -h4Nty8NPHTJzABk/8yY7nJ8GBmwOPCD1Kywx+DD1YOFrFg6Huvc1mShzOPz5 -VvpgzkILh8/7Pm5Nn8YJ538B8cX44Xz1TyovZ2VKwfntIPd/kXa4LvTJ8bya -JSRcEuQcuNxUS5mqEPwzINCD4MPcE/D28scZinIOW8x/HEo5ZemQAnLXMlmH -LXp5ixn/WDq4rzm6nOGHDCQ85Kwg4b9OxuHLzltdf10R/II13bczJiD4JVtF -f5/eZ+XwHwTqZeH8N2253Ua35eB8SPwoODzP0v42vdbKQbhyUsnZLQoO+lor -hS+IIPjg8J1kCeerv+XdZ2Bp6cAfG3DfSF0BHh5g++7LwPkfFq1XOLtCwUEc -lB4mWcD1nzzstDbznbnDaVC46Cg4PElceM2kHppedso7wNIf2D/n5BzQ0yMA -jsEs/Q== - "]]}, { - Thickness[0.033852403520649964`]}, StripOnInput -> False]}, { - ImageSize -> {29.542366127023662`, 22.418958904109587`}, - BaselinePosition -> Scaled[0.30040665634805624`], - ImageSize -> {30., 23.}, - PlotRange -> {{0., 29.54}, {0., 22.419999999999998`}}, AspectRatio -> - Automatic}], GraphicsBox[{ Thickness[0.03237293622531563], StyleBox[{ @@ -8449,270 +8150,6 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= ImageSize -> {86., 23.}, PlotRange -> {{0., 85.66}, {0., 22.419999999999998`}}, AspectRatio -> Automatic}], - GraphicsBox[{ - Thickness[0.011859582542694497`], - StyleBox[{ - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" -1:eJxlk30s1HEcxw/FrCzunIdz3M+53x3JuWK2TPNG9GS5YbqGUHnKH9qwpmkt -D9NGQslDksymthptCddIk6I8jlqjjZQ8lA2TWSr53jc/qz7b94/X9v1+Ht7v -z9f+ZHJwrAGPx9NbPz7rR3/9CPMPz25ZkiNosCjil2A3xA8tbutXb/+P3UgM -qcAjAT7YT1lVvVoVchgjtsddgG0BbJp+xSaHMz4Lp3Ztsm3d9EHlmuufPHxY -lQwbJ0woETI3tFB2iY9ObfMVQ7WS1oveijyvQ9o4XwbvTEYtYj0MEBu3Hp/F -uKrJC9JT6UNF8qSIUd11rTZJvuw97h/lUzFow3GPLkQ0z4QUGzzwJuyr66iM -cr4UzciceKmR4VzHY//yXin8CrP4cSNSCNKLU3ufM7SuoRTteW2Z7h8lmK+p -Z3rvMohgNeK+SjscuN9Zx1uxQ1OIp2Yt1xbm5F2tiOtXp9e48O/+1XyOFYuy -mYpuU+79BueTe6YSjkOJTs8kCCd1M8ywRiLKnuopEGA2pVG46ixDC8kzJcDP -5bTxyiIW5STSzfGqw/dBYpWc9i0WYo/OBwWW2hYa48Ms8X3uS/veDgUk2uq2 -2KPWVKcnCowRXc1EHFPdxNz9bOJvqB3UIzYZMcUKOoeRBBMay6ZBKFBK6h+X -4HTk+wADKwXKdP1IMBlz5617v5xj1c57goH9m5yx2KBO0rLce1HVCafXapbL -P33Gebn0lgzxREc5g8Tk+ZzuVBnVJUiKBMLDztTXVnsEdhntu/nNmfp1mYGH -V2vwDR8nHDO2yHXzZmh+UyfkknkeifCC7OO8I51/wZpjR+LHjCUqaxxafkw5 -ooD41CCkdcccqU8frOn/cVDhKdkbPxGmSL8XVFTvZRGIPLwCFd2XbDuO6f+S -caybM5LFxVXPs32aTY4ODVZUdys5pvugpHOHssg2Caq/PulC/Qpk0U/8C3eh -PqywKCnccd7jiAv+/f+/AVCDwZE= - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, - 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGJZIGYC4r/fSh/MuWjkcAYM9CD0HCMHialXODMe6TqA -5QuNHER6vF6xhOg6GIOAs5HD1An8VWavdRwaWY72G143dJgxEwh+ajvYVkas -MNU1dNhi/uNQSpe2Q7SC48dkHQM4//zVsDf6u/Xg/JTYO27MP3TgfPf9tbIW -y3Ucju/a0cu2AcGfs0h55592HTif2021lOmXMZzvc4LddvZVE4fnWdrfpv/V -cZCZF6d5msHUITUNCJ7pOTCAgACCr/aked5ZL1OI+8U1MPgw9U8ixLdffKDp -8AJsrgnEXAMtSPhcQvBh7oHxwf601oXzYf6r+bQhIPuWpsN6VaCFutpw+54k -Lrxmwo/gg8NzJkyfEZxfvFX092k5Y3h8occfAE8FyTM= - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, - 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, - 3}}}, {CompressedData[" -1:eJxTTMoPSmViYGAQBmIQzeu/fkrqCnOHLztvdf0tNXXYYv7jUEqUKZwPprca -O2i85d1nsNMYzt+ol7eY0ccQzlcHyWsaONT9tio4J2Hi8B8E5PUcJgSXqEzf -b+IwYyYQ7NRxONS2PPxUkamDSI/XKxYTbYj+VjOHH29fH7B01nL4CuJPNYfz -rwt9cjz/zRLOnz6Bv8pstrWDrtZK4QtLdOH8fpA99oZw/t9vpQ/mFBo5/AHR -jtYOKbF33JgrjB0+bAjInjXdCiJvaOKgDzLniqXDDZA9bKYO3SBnXbSA+x89 -fADLZZf0 - "], CompressedData[" -1:eJxTTMoPSmViYGCQAWIQzeu/fkrqCnOHG0KfHM+zmTpcB9FmFnC+gdZK4QtH -LByeJC68ZnLexMHv4sSYf8aWDjEKjh+Tc0wcpk/grzK7bQlRd8XYQeVJ87yz -VlYO4lOvcGZsMkLlOxnC+dEg/T0GDgfaloefErJyWKsKlMjVd9AHm2PpcAYE -dPQc1N/y7jPYaenw51vpgzkTdR3218papLdYOrSwHO03/K7j8DxL+9t0W0uH -+JAg9QWZOg7dXq9YTC5aOMjMi9M8PUHb4cvOW11/XS0czG32Bk1T1HaQALlj -kTmcfwBkngiCrwGyr9MMrh/sDhkoP0AH4u8aU4h4jq5DGgiImTpMaW+NunxH -H873PsFuO9vVEM6XBulvMILqg+pfY+xw8rDT2sx3pg6R4tsvMtiZODSC/JVu -5nAQFC6HTBxOgeT/mcHjAz2+AFRAwP0= - "]}], - - FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, - 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGI1IGYCYvGpVzgznAwd+GMD7huVKzjEhwSpL9DUx+A7 -T2gWSpNScHiSuPCayXt9B/c1R5czcCg4fN15q+uvqoFDqwK76pkp8nC+6ieV -l7NWysH58rsW7EvVk3PoDy5RmS5v4PDANd5x1kZZB2MQEDZw+LLv49Z0M1mH -H29fH7A8rOvQDjJvi4DDm+Ktor+9tR3ug9QLyjq476+VtVDXdlgjpMOXvk/W -ISP/Q+tJEW2Hmvs/bhlny8H5b9pyu41uI/gzZgLBTnmH7Q5Nj45HaMPdLzMv -TvO0gQ7cfzA+zP8+J9htZ5eqY/Bh6v+DQLyGw1qQe/gUHF6D3NutARGfL+8w -Z5Hyzj/LNR12BFtF/F8u5bBW9UnzvF4dh88g/07jdKj5tCEge5aOw+Jbyx8b -MnM6nAGBNTqQ8AjjcJBZ/sJDb7+OQ+Hykg3/+tkdfC9OjPn3WMch4InnJdPL -rA4JoPjh1IXo42F1YOHskk/WQ/BNQOEbjODLgsyrh/J92BzOXw17o39b10Fm -o9h8pgecDupvefcZVBpAwrtQBhI/lw3g4ecN8v9TA3j4wdIPLDzQ0xMAWW4A -mA== - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, - 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, - 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, - 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}}}, {CompressedData[" -1:eJxTTMoPSmViYGAwB2IQfahtefipRWYOLeK1rJnHeBxOHnZam5ln5vCi9nH2 -+RxuB423vPsMPM0c+iO6/Rk/cDmoPmmed1YKwfe7ODHm32VTOD9SfPtFhn2m -DqqfVF7O8uSB84UrJ5WcdRGA88HqN0jC+SbGICDjULJV9PfpdaYOM2aCgKxD -wZru2xkNpg4hby9/nHFQziFGwfFjso2pw38QsFdw+LQhIHvWdhOI+VsUHHq8 -XrGYMCL4p0H+uWcE53O7qZYy/TJ0OAMCPPJwPth8Rhk4XwSk/omUw2eQ+eZG -DvK7FuxLfSfpUAxyXx2CX//bquDcCQQfrJ/LGK4fxm9XYFc980Uazk9JAwI1 -GYfrQp8cz7NB1afIOCy+v49vDrOxw5u23G6j3TIOz7O0v03/a+SgDgpPTVmH -LeY/DqX8MoK4vwfBP9C9r8nkMYL/wDXecZahvINtZcQK01hjh5XfXlacUVCA -uPcGgl8ICt8CEzgfHJ+HTSD235aD8/+Cw1sGzgfb7yPpkBx7x435hZGDAsj/ -fmIO4GjcbORQc//HLePXopD0pGfk8GXfx63pYiIQ970ydFgvpMOXLifs8CRx -4TWT/YYO4OiuFITzIemRH86HpBdOh0aWo/2G7kYOfSB+ASs8vGB8h6ZHx2d0 -I/hg+7hMHG7w3hZLLWN3uAEK72MmDjGqETLnangcQNGQdg0hHwFKj3ymcP2Q -cEbwv+y81fX3K4IPNs/MDOK/aWwOsPy0/Nbyx4bOXA7o+QsA92ODUg== - "], {{ - 20.7656, 4.284379999999999}, {20.7656, 3.9109399999999996`}, { - 20.704700000000003`, 3.8015600000000003`}, {20.4516, 3.65781}, { - 20.160899999999998`, 3.4875000000000003`}, {19.823399999999996`, - 3.37969}, {19.5703, 3.37969}, {19.1469, 3.37969}, { - 18.809399999999997`, 3.7906299999999997`}, {18.809399999999997`, - 4.30938}, {18.809399999999997`, 4.35781}, {18.809399999999997`, - 5.07031}, {19.304699999999997`, 5.50469}, {20.7656, - 6.035939999999999}, {20.7656, 4.284379999999999}}}], - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGItIGYC4rrfVgXnTpg5bA+2ivjPLufgd3FizL/PZg7y -uxbsS9WTc2AAAQFzhxkzgcBSzuGWdE2ikSmCLzH1CmdGE4IfIb79IsM8c4dW -BXbVMyWycH4LiB8iDecvubX8sWEzH5zfH9Htz7iB04HPf/2U1A5zh8UgeWZO -h4Nty8NPHTJzABk/8yY7nJ8GBmwOPCD1Kywx+DD1YOFrFg6Huvc1mShzOPz5 -VvpgzkILh8/7Pm5Nn8YJ538B8cX44Xz1TyovZ2VKwfntIPd/kXa4LvTJ8bya -JSRcEuQcuNxUS5mqEPwzINCD4MPcE/D28scZinIOW8x/HEo5ZemQAnLXMlmH -LXp5ixn/WDq4rzm6nOGHDCQ85Kwg4b9OxuHLzltdf10R/II13bczJiD4JVtF -f5/eZ+XwHwTqZeH8N2253Ua35eB8SPwoODzP0v42vdbKQbhyUsnZLQoO+lor -hS+IIPjg8J1kCeerv+XdZ2Bp6cAfG3DfSF0BHh5g++7LwPkfFq1XOLtCwUEc -lB4mWcD1nzzstDbznbnDaVC46Cg4PElceM2kHppedso7wNIf2D/n5BzQ0yMA -jsEs/Q== - "]], - - FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, - 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, - 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, - 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGJFIGYC4vQ0IPBzdjixa0cvm4CqQ+Lhy9qpC13h/CeJ -C6+Z7EfwT2haTTr9HJNf82lDQPYuBL+F13/9lFQ1uH4YH2Y+jA+zH50/YyYQ -7NSH88HSEgZwvvpb3n0GmQYOFRErTM8qI/jdXq9YTH46YfBh+mF8mPkwPsz+ -9uXhp4yWOKC6pw3Bl3f8mHwmFpMP8z+MDwsfmH4YH2Y+jA+zH53vsebocoYK -cThf45PKy1mdYnC+SOWkkrMuonD/w/iw8EHnw/TD+DDz0eMfAF5P2U0= - "]], - FilledCurveBox[CompressedData[" -1:eJxTTMoPymNmYGBgBGI5IAaxQYCJAQEYkWhmKEZm41KDLE4MG5f5tGBT4h5S -3YzLfAAUFgJd - "], CompressedData[" -1:eJxlk3tIU1EcxzcLxaIULArf2ebVlmuZvYbVd5ay+wiHiS7S1GpqDzNQGYUS -9EDKihy+Wsus6AWV/VFZ9jKWlc8pTgkrKrOMSlIjqdTsnl27g/rB+eMD95z7 -Ob/f98zZlB1nmCSRSKT80vDLhV9t2SlurfRaxLYXJ/32WoicmzNHmhLo/3gR -qQ4VmknZach791e21Kqww/1nVcY3GlNj5HkuZidvCNQMbp7vZL+LH7XK8QXo -TTvTFdFHY3ap3T2zR4nJ50xq6Ssa9bW3j7rqlMK5PVoURdK16VGBWNpVnxVR -p4Uhna8PvngaqjY1VWuhIj45vlg/q6ZdslKLN9EpGnO7j8gOz2ZveA5pbOnR -nMjY1/O0wjrBR4IwmpRV//ssB6P1VvSJliDBdzUHr92m3JbHgcJ/p3OoK3qw -L+JdAK4UvciU1LBIkut9Wy3+MOovLW7ZzqJmnVo/XuiHVGuHwvCWEX33jqh3 -tWqdnEv62UWLnEh8L9Di/r98RF8UK/UMEDm+v2Ow4lEAHhb4Lcu4R2OcVMoc -9JF+fqXxiQxKIYNjnu4Mxobz3liK5bih3HlO6sug0Rp1dWtlMDxiq0sMKgbh -jnlSGLiu2242MvjV/7luuZXC6cj5dvMtBm2dCV8W3KWE+9qcnEG8/Vnx+9vd -h8cMiSx03T75aSYKZOzNWSx69Lw4KMHTyGJL8suYSbMpwSefxXvibQsWWTXv -slfbGifnD/FitXJxv3flxtAmnVw8/+M2xXD5KZngU8Zia/bAwYZcGQpIvwM5 -ZBK2K1B4MbExfJQF98xtxcnvCqH/11gsibwfV6YJRcmwa0qFZeJ8z1Bh/u8Y -PCF5HAjBD5KPRic7YnyIgeXs3DujfSGgSF6jGMHzdQjic2Xl488Y4f3MVeE5 -35bwTgZ9xLdAhVUkf58ZkPZIjqkwg+QzmRXZkUsLJ/JB4t/LCTnSOzk1Po6q -alCKLORBifPE7y2HA9P4Qb8Pm/DiYCPz2xAGGfGdshalxz32LGHD8O/7/wMN -jOVv - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, - 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGJZIGYCYvUnzfPOVgU4nAEDPYeZIJAb4CAx9QpnxiNd -B1WQfFKAg0iP1yuWEF0HYxAID3CYOoG/yuy1jkP78vBTRjYBDjNA+n5qO2xt -qbmwWTDAYYv5j0MpXdoOf2Jyj/5b5A/n2zc9Oj7DGsFXAZl/yg/On2ujc2XW -Nj+H47t29LJtQPDnLFLe+addB87ndlMtZfplDOf7nGC3nX3VxKEV5J4zfg4y -8+I0TzOYOqSmAYGbvwMDCAgg+Goge71MHd7w7jOYOckXgw9Tz7J4khUjq5/D -iyztb9P/mjiElKhM/y/hBwmfSwg+zD0w/vmrYW/0rXXhfJj/cjh/Lkhn9nNY -DwpYXW24fU8SF14z4UfwweE5U8shGKQ/IwDOP3xZO1WyDxFf6PEHAD93zRw= - - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, - 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, - 3}}}, {CompressedData[" -1:eJxTTMoPSmViYGAQBmIQrW016XT9hkCHLztvdf0tNXUILlGZ/l8GwX8sInvy -6eYAB423vPsMdhrD+Rv18hYz+hjC+eogeU0DB1fVUqZZZwIc/oOAvJ6Dd3Wz -vs+3AIcZM4Fgp46DuEfAHwnlQAeRHq9XLCbaEP3pgQ4/3r4+YOmsBeGvRvCl -Xz8yk3IJgvO7QdrWBjnoaq0UvrBEF87vBznc3hDO//ut9MGcQiMH1SfN885O -C3JIib3jxlxh7LB4khWjbw5U3tDE4fOGgOxZ1kEON4Q+OZ5nM3Xg/LkgffMv -hP/RwwcAAKiPGQ== - "], CompressedData[" -1:eJxTTMoPSmViYGCQAWIQrW016XT9hkCHG0KfHM+zmTpIv35kJnUFwf+8ISB7 -1vdAhyeJC6+ZnDdx2Hmr62+qcJBDjILjx+QcE4dur1csJrZBDgZaK4UvXDF2 -yI9nPycZGuQgPvUKZ8YmI1S+kyGcHw3S32PgIO4R8EfCO8hhreqT5nm5+hD7 -rIMczoCAjp7Dhocvp24yCXL48630wZyJug7Xj+aaNKgHObSwHO03/K7jIA80 -5oxokEN8SJD6gkwdB86fC9I3/wp0kJkXp3l6grbDYxHZk0+vBzqY2+wNmqao -7bC6+3YGw3oEH2xeN4K/HmRfBkL/TBDwhfIDdBxq1m1LqlcNhLgvR9fhPwhw -BzpMaW+NunxHH873PsFuO9vVEM6XBulvMIKYpwjVv8bYIUJ8+0UGp0CHSBBt -Z+LQvjz8lFFCoMPBNiDjkAlEvg0RH+jxBQDoIMpe - "]}], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGItIGYC4g8bArJnhfs6tCmwq565IuFwQ7om0SjX1+F1 -W2630W8JBxNjIKj2dUhPAwI2SQcFx4/JZ3oR/P21shbpWxD8+/v45hgf8nUI -env54wxHCTg/BMRXFIPz7Uoca0/LsMD5/k88L5lO/me/41bX39Ttvg41L5p+ -TbP8az/lG1v8jBCo+c9+wfn/weC7/R6Q+uN+GHyY+lQQHefnsN1rg8Wcyt/2 -G/TyFjO6+DnIbBSbz5TwD87vi+j2Z9zA4gDjf9n3cWu6mSicD/bPQTGHuTY6 -V2a1+TmcAQEdSQfza0dzTTYg+DNmAsFOBB/mHvldC/alvpNw4PFfPyX1hp8D -KFiNiyUcerxesZh89HMQqZxUcvaIOCQ8mPwd3oDCv1rcQXfCgh+GYgh+DufP -BenWCP4b3n0GM4P8Ifb5SMD5O4KtIv4vl4TzwcFjL+2w9IWH3n9Df6j/ZBx8 -TrDbzv7rB+eDw3cPgn9c02rS6X4/iH3S0vDwANu3RhzOXyukw5cuJwNJDzYI -/eJTr3BmvPJ1SAHFg5q0g8qT5nlnN0Hjs03KAZb+wObPlnRAT48A0ws2Rg== - - "]], - - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, - 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, - 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, { - 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" -1:eJxTTMoPSmViYGBQAGIQ3RzoObfBKcBBYdeCfal8Ig5vePcZzAwLcGhVYFc9 -80XYITb36L9NyQEOO4OtIv4/F3aojFhherYcwZd+/chMaguCL+/4MfnM3QAH -kcpJJWdTRBxWd9/OYPgf4HAGBHpEHYQ/OZ5P0w108FhzdDmDhLhDt9crFhPP -QIeK+z9uGXNLwflv2nK7jaxl4fyQt5c/znCUd0hPAwK7QAfla4+CGXoUHGrX -bUuq1wx0COcUaze2V4S4nwvK91dy2Hmr62/q8QCI+j9KDqpPmuedrUPwfU6w -285O9cfgp4LsaVNyOKppNen0dX+HPfk1b2eGKjnsAZn33N+BPzbgvpE4gu88 -oVkoLUoBzv+y7+PW9GnscH7O1IRCi8//7P/EAAP0lr+Dx1b/48lsf+1h9r2o -fZx9fs1vOP8/GHy3F/cI+CPRHYDBh6k/fFk7VdIvwMEiSdeO1eGPPSw+YfbB -+C3itayZbWwO6PENAJkg6dg= - "], {{65.0391, 8.635939999999998}, { - 65.0391, 8.960939999999999}, {65.12339999999999, - 9.045309999999999}, {65.44999999999999, 9.045309999999999}, { - 67.07969999999999, 9.045309999999999}, {67.82809999999999, - 8.478129999999998}, {67.82809999999999, 7.234379999999999}, { - 67.82809999999999, 6.06406}, {67.11559999999999, - 5.4593799999999995`}, {65.7266, 5.4593799999999995`}, {65.4859, - 5.4593799999999995`}, {65.3172, 5.47188}, {65.0391, - 5.496880000000001}, {65.0391, 8.635939999999998}}}], - - FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, - 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, - 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, - 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGJJIGYCYhudK7OeyQY5vF+0XuHsD0UHGP/Lvo9b06ex -w/kWSbp2rAf+2Qt/cjyfJhrk8MTvZcLf+X/su71esZhcDXR4Ufs4+/ya33D+ -fzD4bj9hwQ/DZ9uCMPgw9deP5po0lAc55ExNKLQo/mO/4eHLqZtyoPzP/+D8 -FvFa1sw2NgcYH+be9DQgmIbgNwd6zm14h+BfBZn/P8hhJgh0Kjp8Z4uf4SMY -7HCge1+TyWFZh8qIFaZnlRF8YxCQD3ZQvvYomOGPksPuW11/U7MD4XyOnwvS -N6cFwtWDzatE8CtA5nUHQsxpVoTYOzcQ7h7p14/MpL4EYoQ3jA8A8IbKvQ== - - "]], - - FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, - 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, - 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, - 0}}}, CompressedData[" -1:eJxTTMoPSmVmYGBgBGJFIGYC4gf7+OYYLwpxiFaNkDlnw+nQsTz8lNGMEIfr -vLfFUrdxOnzaEJA9qzrE4QaIb8biULtuW1J9YYjD130ft6aHMTuoPmmed9YP -wT9yWTtVclownP9ERPbkU/EQh+r7P24Zaws5bHj4cuqmmBAHjU8qL2etFHNQ -A+mvCnFoUWBXPRMiBefPmAkEknJwfnoaEJQpOrSB3GcT4tBp47krLUgZYv7r -YDhf5JPj+bSDCH6P1ysWk5nBDs4TmoXSTik5uKqWMs2qCXYwBoHLihD9ycEO -D1zjHWcxKjosmWTF6BsR7FAJcq+1goMJSJ13sIM6yL2csg67b3X9TY0OdqgB -yZ+WcfCubtb3qYKad1gB7n+Q82d2KkLUn0bwF4HM5wmB8w/UylqkW4Q4fFi0 -XuGshgKcv797X5OJswycv1ZIhy+9TsLhDAiIhDgEvb38cQajCMT9l4MdeBz5 -vGZk8kPCySvYQbxJZopB8C97GP8/GHy3j809+m9TeQicjx7/AAC+6M4= - "]]}, { - Thickness[0.011859582542694497`]}, StripOnInput -> False]}, { - ImageSize -> {84.31479950186798, 22.418958904109587`}, - BaselinePosition -> Scaled[0.30040665634805624`], - ImageSize -> {85., 23.}, - PlotRange -> {{0., 84.32}, {0., 22.419999999999998`}}, AspectRatio -> - Automatic}], GraphicsBox[{ Thickness[0.011674060238150829`], StyleBox[{ @@ -8958,7 +8395,6 @@ Ht8A/XnqIQ== 5.4593799999999995`}, {66.88589999999998, 5.4593799999999995`}, { 66.71719999999999, 5.47188}, {66.43909999999998, 5.496880000000001}, {66.43909999999998, 8.635939999999998}}}], - FilledCurveBox[{{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, @@ -9057,9 +8493,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0]], { + RGBColor[1, 0, 0]], { LineBox[{{0, 9.75}, {40, 9.75}}]}}, { Directive[ EdgeForm[ @@ -9069,9 +8503,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0]], { + RGBColor[1, 0, 0]], { InsetBox[ GraphicsBox[{{ GrayLevel[1], @@ -9107,8 +8539,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - Rational[2, 3], 0]]}}], + RGBColor[1, 0, 0]]}}], NCache[ Scaled[{ Rational[1, 2], @@ -9128,7 +8559,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[1, 0, 0]], { + RGBColor[0, 0, 1]], { LineBox[{{0, 9.75}, {40, 9.75}}]}}, { Directive[ EdgeForm[ @@ -9138,7 +8569,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[1, 0, 0]], { + RGBColor[0, 0, 1]], { InsetBox[ GraphicsBox[{{ GrayLevel[1], @@ -9164,7 +8595,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[1, 0, 0]]}}], + RGBColor[0, 0, 1]]}}], NCache[ Scaled[{ Rational[1, 2], @@ -9184,7 +8615,8 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, 0, 1]], { + RGBColor[1, 0, 0], + Dashing[{0, Small}]], { LineBox[{{0, 9.75}, {40, 9.75}}]}}, { Directive[ EdgeForm[ @@ -9194,7 +8626,8 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, 0, 1]], { + RGBColor[1, 0, 0], + Dashing[{0, Small}]], { InsetBox[ GraphicsBox[{{ GrayLevel[1], @@ -9222,7 +8655,8 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, 0, 1]]}}], + RGBColor[1, 0, 0], + Dashing[{0, Small}]]}}], NCache[ Scaled[{ Rational[1, 2], @@ -9242,9 +8676,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0], + RGBColor[0, 0, 1], Dashing[{0, Small}]], { LineBox[{{0, 9.75}, {40, 9.75}}]}}, { Directive[ @@ -9255,9 +8687,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - NCache[ - Rational[2, 3], 0.6666666666666666], 0], + RGBColor[0, 0, 1], Dashing[{0, Small}]], { InsetBox[ GraphicsBox[{{ @@ -9294,128 +8724,6 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= PointSize[0.5], AbsoluteThickness[1.6], Thickness[Large], - RGBColor[0, - Rational[2, 3], 0], - Dashing[{0, Small}]]}}], - NCache[ - Scaled[{ - Rational[1, 2], - Rational[1, 2]}], - Scaled[{0.5, 0.5}]], Automatic, - Scaled[1]]}}}, AspectRatio -> Full, - ImageSize -> {40, 9.75}, PlotRangePadding -> None, - ImagePadding -> Automatic, - BaselinePosition -> (Scaled[0.09205128205128206] -> - Baseline)], #5}, { - GraphicsBox[{{ - Directive[ - EdgeForm[ - Directive[ - Opacity[0.3], - GrayLevel[0]]], - PointSize[0.5], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0], - Dashing[{0, Small}]], { - LineBox[{{0, 9.75}, {40, 9.75}}]}}, { - Directive[ - EdgeForm[ - Directive[ - Opacity[0.3], - GrayLevel[0]]], - PointSize[0.5], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0], - Dashing[{0, Small}]], { - InsetBox[ - GraphicsBox[{{ - GrayLevel[1], - DiskBox[{0, 0}, - Offset[{3, 3}]]}, - AbsoluteThickness[1.5], - Dashing[{}], - CircleBox[{0, 0}, - Offset[{3, 3}]]}, {DefaultBaseStyle -> {"Graphics", { - AbsolutePointSize[6]}, - Directive[ - EdgeForm[ - Directive[ - Opacity[0.3], - GrayLevel[0]]], - PointSize[0.5], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[1, 0, 0], - Dashing[{0, Small}]]}}], - NCache[ - Scaled[{ - Rational[1, 2], - Rational[1, 2]}], - Scaled[{0.5, 0.5}]], Automatic, - Scaled[1]]}}}, AspectRatio -> Full, - ImageSize -> {40, 9.75}, PlotRangePadding -> None, - ImagePadding -> Automatic, - BaselinePosition -> (Scaled[0.09205128205128206] -> - Baseline)], #6}, { - GraphicsBox[{{ - Directive[ - EdgeForm[ - Directive[ - Opacity[0.3], - GrayLevel[0]]], - PointSize[0.5], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[0, 0, 1], - Dashing[{0, Small}]], { - LineBox[{{0, 9.75}, {40, 9.75}}]}}, { - Directive[ - EdgeForm[ - Directive[ - Opacity[0.3], - GrayLevel[0]]], - PointSize[0.5], - AbsoluteThickness[1.6], - Thickness[Large], - RGBColor[0, 0, 1], - Dashing[{0, Small}]], { - InsetBox[ - GraphicsBox[{{ - GrayLevel[1], - PolygonBox[ - NCache[{ - Offset[{0, 4}], - Offset[{(-2) 3^Rational[1, 2], -2}], - Offset[{2 3^Rational[1, 2], -2}]}, { - Offset[{0, 4}], - Offset[{-3.4641016151377544`, -2}], - Offset[{3.4641016151377544`, -2}]}]]}, - AbsoluteThickness[1.5], - Dashing[{}], - JoinedCurveBox[ - NCache[ - Line[{ - Offset[{0, 4}], - Offset[{(-2) 3^Rational[1, 2], -2}], - Offset[{2 3^Rational[1, 2], -2}], - Offset[{0, 4}]}], - Line[{ - Offset[{0, 4}], - Offset[{-3.4641016151377544`, -2}], - Offset[{3.4641016151377544`, -2}], - Offset[{0, 4}]}]], CurveClosed -> True]}, { - DefaultBaseStyle -> {"Graphics", { - AbsolutePointSize[6]}, - Directive[ - EdgeForm[ - Directive[ - Opacity[0.3], - GrayLevel[0]]], - PointSize[0.5], - AbsoluteThickness[1.6], - Thickness[Large], RGBColor[0, 0, 1], Dashing[{0, Small}]]}}], NCache[ @@ -9427,7 +8735,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= ImageSize -> {40, 9.75}, PlotRangePadding -> None, ImagePadding -> Automatic, BaselinePosition -> (Scaled[0.09205128205128206] -> - Baseline)], #7}}, + Baseline)], #5}}, GridBoxAlignment -> { "Columns" -> {Center, Left}, "Rows" -> {{Baseline}}}, AutoDelete -> False, @@ -9452,7 +8760,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= RowBox[{ RowBox[{"Directive", "[", RowBox[{ - RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", RowBox[{"Thickness", "[", "Large", "]"}], ",", @@ -9497,57 +8805,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= "]"}], ",", RowBox[{"Directive", "[", RowBox[{ - RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], - ",", - RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", - RowBox[{"Thickness", "[", "Large", "]"}], ",", - InterpretationBox[ - ButtonBox[ - TooltipBox[ - GraphicsBox[{{ - GrayLevel[0], - RectangleBox[{0, 0}]}, { - GrayLevel[0], - RectangleBox[{1, -1}]}, { - RGBColor[0, - Rational[2, 3], 0], - RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> - "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, - FrameStyle -> RGBColor[0., 0.4444444444444444, 0.], - FrameTicks -> None, PlotRangePadding -> None, ImageSize -> - Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], - StyleBox[ - RowBox[{"RGBColor", "[", - RowBox[{"0", ",", - FractionBox["2", "3"], ",", "0"}], "]"}], NumberMarks -> - False]], Appearance -> None, BaseStyle -> {}, - BaselinePosition -> Baseline, DefaultBaseStyle -> {}, - ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, - If[ - Not[ - AbsoluteCurrentValue["Deployed"]], - SelectionMove[Typeset`box$, All, Expression]; - FrontEnd`Private`$ColorSelectorInitialAlpha = 1; - FrontEnd`Private`$ColorSelectorInitialColor = - RGBColor[0, - Rational[2, 3], 0]; - FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; - MathLink`CallFrontEnd[ - FrontEnd`AttachCell[Typeset`box$, - FrontEndResource["RGBColorValueSelector"], { - 0, {Left, Bottom}}, {Left, Top}, - "ClosingActions" -> { - "SelectionDeparture", "ParentChanged", - "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> - Automatic, Method -> "Preemptive"], - RGBColor[0, - Rational[2, 3], 0], Editable -> False, Selectable -> - False]}], "]"}], ",", - RowBox[{"Directive", "[", - RowBox[{ - RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", RowBox[{"Thickness", "[", "Large", "]"}], ",", @@ -9593,7 +8851,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ - RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", RowBox[{"Thickness", "[", "Large", "]"}], ",", @@ -9639,60 +8897,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= False]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ - RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], - ",", - RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", - RowBox[{"Thickness", "[", "Large", "]"}], ",", - InterpretationBox[ - ButtonBox[ - TooltipBox[ - GraphicsBox[{{ - GrayLevel[0], - RectangleBox[{0, 0}]}, { - GrayLevel[0], - RectangleBox[{1, -1}]}, { - RGBColor[0, - Rational[2, 3], 0], - RectangleBox[{0, -1}, {2, 1}]}}, DefaultBaseStyle -> - "ColorSwatchGraphics", AspectRatio -> 1, Frame -> True, - FrameStyle -> RGBColor[0., 0.4444444444444444, 0.], - FrameTicks -> None, PlotRangePadding -> None, ImageSize -> - Dynamic[{ - Automatic, 1.35 CurrentValue["FontCapHeight"]/ - AbsoluteCurrentValue[Magnification]}]], - StyleBox[ - RowBox[{"RGBColor", "[", - RowBox[{"0", ",", - FractionBox["2", "3"], ",", "0"}], "]"}], NumberMarks -> - False]], Appearance -> None, BaseStyle -> {}, - BaselinePosition -> Baseline, DefaultBaseStyle -> {}, - ButtonFunction :> With[{Typeset`box$ = EvaluationBox[]}, - If[ - Not[ - AbsoluteCurrentValue["Deployed"]], - SelectionMove[Typeset`box$, All, Expression]; - FrontEnd`Private`$ColorSelectorInitialAlpha = 1; - FrontEnd`Private`$ColorSelectorInitialColor = - RGBColor[0, - Rational[2, 3], 0]; - FrontEnd`Private`$ColorSelectorUseMakeBoxes = True; - MathLink`CallFrontEnd[ - FrontEnd`AttachCell[Typeset`box$, - FrontEndResource["RGBColorValueSelector"], { - 0, {Left, Bottom}}, {Left, Top}, - "ClosingActions" -> { - "SelectionDeparture", "ParentChanged", - "EvaluatorQuit"}]]]], BaseStyle -> Inherited, Evaluator -> - Automatic, Method -> "Preemptive"], - RGBColor[0, - Rational[2, 3], 0], Editable -> False, Selectable -> - False], ",", - RowBox[{"Dashing", "[", - RowBox[{"{", - RowBox[{"0", ",", "Small"}], "}"}], "]"}]}], "]"}], ",", - RowBox[{"Directive", "[", - RowBox[{ - RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", RowBox[{"Thickness", "[", "Large", "]"}], ",", @@ -9741,7 +8946,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= RowBox[{"0", ",", "Small"}], "}"}], "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ - RowBox[{"PointSize", "[", "0.009166666666666668`", "]"}], + RowBox[{"PointSize", "[", "0.011000000000000001`", "]"}], ",", RowBox[{"AbsoluteThickness", "[", "1.6`", "]"}], ",", RowBox[{"Thickness", "[", "Large", "]"}], ",", @@ -9790,9 +8995,7 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= RowBox[{"0", ",", "Small"}], "}"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"{", - - RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5, ",", #6, - ",", #7}], "}"}], ",", + RowBox[{#, ",", #2, ",", #3, ",", #4, ",", #5}], "}"}], ",", RowBox[{"LegendMarkers", "\[Rule]", RowBox[{"{", RowBox[{ @@ -9894,50 +9097,13 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= Offset[{-3.4641016151377544`, 2}], Offset[{3.4641016151377544`, 2}], Offset[{0, -4}]}]], CurveClosed -> True]}], ",", - "9.75`"}], "}"}], ",", - RowBox[{"{", - RowBox[{ - GraphicsBox[{{ - GrayLevel[1], - DiskBox[{0, 0}, - Offset[{3, 3}]]}, - AbsoluteThickness[1.5], - Dashing[{}], - CircleBox[{0, 0}, - Offset[{3, 3}]]}], ",", "9.75`"}], "}"}], ",", - RowBox[{"{", - RowBox[{ - GraphicsBox[{{ - GrayLevel[1], - PolygonBox[ - NCache[{ - Offset[{0, 4}], - Offset[{(-2) 3^Rational[1, 2], -2}], - Offset[{2 3^Rational[1, 2], -2}]}, { - Offset[{0, 4}], - Offset[{-3.4641016151377544`, -2}], - Offset[{3.4641016151377544`, -2}]}]]}, - AbsoluteThickness[1.5], - Dashing[{}], - JoinedCurveBox[ - NCache[ - Line[{ - Offset[{0, 4}], - Offset[{(-2) 3^Rational[1, 2], -2}], - Offset[{2 3^Rational[1, 2], -2}], - Offset[{0, 4}]}], - Line[{ - Offset[{0, 4}], - Offset[{-3.4641016151377544`, -2}], - Offset[{3.4641016151377544`, -2}], - Offset[{0, 4}]}]], CurveClosed -> True]}], ",", "9.75`"}], - "}"}]}], "}"}]}], ",", + "9.75`"}], "}"}]}], "}"}]}], ",", RowBox[{"Joined", "\[Rule]", RowBox[{"{", RowBox[{ - "True", ",", "True", ",", "True", ",", "True", ",", "True", - ",", "True", ",", "True"}], "}"}]}], ",", + "True", ",", "True", ",", "True", ",", "True", ",", "True"}], + "}"}]}], ",", RowBox[{"LabelStyle", "\[Rule]", RowBox[{"{", "}"}]}], ",", RowBox[{"LegendLayout", "\[Rule]", "\"Column\""}]}], "]"}]& ), @@ -9966,9 +9132,10 @@ a0YmP8TcucEO4k0yUwyCf9nD+P/B4Lv9hAU/DJ+dCoHz0eMfAMMP7IE= 3.833941931372731*^9, 3.8339424249254*^9, 3.833944913808194*^9, 3.83395331509979*^9, {3.833953365365446*^9, 3.833953402369651*^9}, { 3.833953519355969*^9, 3.833953565422509*^9}, 3.833953707033587*^9, - 3.833953770123893*^9, 3.833953926623033*^9, 3.833954060263522*^9}, + 3.833953770123893*^9, 3.833953926623033*^9, 3.833954060263522*^9, + 3.833954239333253*^9, {3.833954709882498*^9, 3.8339547294307213`*^9}}, CellLabel-> - "Out[152]=",ExpressionUUID->"f92d90e6-98b9-4fa2-8c6b-4887bb076d0f"], + "Out[168]=",ExpressionUUID->"7863134f-9e20-454c-b9a4-e8fa6f7d0fcc"], Cell[BoxData[ TemplateBox[{ @@ -10114,7 +9281,7 @@ Xbcj0XR3wLcIPZQm0MVEPI+EzLXn/hC7m9ox+c9nW+aToNFa+s+o2qgEVkqF dgEJaYdI9559n3ptsab1hD2J6cokxnVVIyVRD9O4C0nohyv9u1S1lAW/xsNl EYnlhR/OnvyoTXPMgZ/0dsb/A9qgh2I= "]]}, - Annotation[#, "Charting`Private`Tag$87727#1"]& ]}}, {}}}, { + Annotation[#, "Charting`Private`Tag$102264#1"]& ]}}, {}}}, { InsetBox[ BoxData[ FormBox[ @@ -11493,7 +10660,6 @@ Uy8j/Afjw/wPjq/bYRh8mHpQsM+cG+bwAOR/Q0UHr+pmfZ++MAfla4+CGdYg 749QOF/B8WPymb0IPlj9tFCHArDHDCHusw918AH5v1QfzgeHu48hxP/mCP3g 8P8R4jB9An+V2W9E+gMlW+PDBg6w9AyOr0IEH5a+AYwsT3o= "]], - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {0, 1, @@ -11777,7 +10943,6 @@ mZ6P4NtWRqwwPWsI54PDO8YQQueow8MjFRR8bqpw/tPEhddM+DUcHJoeHZ/R bQDXD4lPfQfRHq9XLCXqDi28/uunpOpB1as7wNLfRr28xYw1ag7o6REAmbUJ nA== "]], - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{ @@ -12040,6 +11205,7 @@ Xw== 13.664099999999998`}, {40.9641, 15.5516}, {41.898399999999995`, 16.782800000000005`}, {43.30779999999999, 16.782800000000005`}}}], + FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, { 1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, @@ -12214,7 +11380,6 @@ eoWzEUqQ+HkX4/Dz7esDlouh4YsUnwBJqdt4 111.37299999999999`, 16.6234}, {112.584, 16.6234}, { 113.06099999999998`, 16.067199999999996`}, {113.32, 14.3391}, { 109.267, 14.3391}}}], - FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { @@ -12500,7 +11665,7 @@ Xbcj0XR3wLcIPZQm0MVEPI+EzLXn/hC7m9ox+c9nW+aToNFa+s+o2qgEVkqF dgEJaYdI9559n3ptsab1hD2J6cokxnVVIyVRD9O4C0nohyv9u1S1lAW/xsNl EYnlhR/OnvyoTXPMgZ/0dsb/A9qgh2I= "]]}, - "Charting`Private`Tag$87727#1"]}}, {}}}, { + "Charting`Private`Tag$102264#1"]}}, {}}}, { DisplayFunction -> Identity, DisplayFunction -> Identity, AspectRatio -> 1, Axes -> {False, False}, AxesLabel -> {None, None}, AxesOrigin -> {0, -440.}, BaseStyle -> 16, DisplayFunction :> @@ -13059,6 +12224,7 @@ nR38bwENKtKG+3+L+Y9DKVk6DvW/rQrOfUDwwe6f7ALnX8qPZz/HCPX/Bi04 Pw0E1DTgfLD6U6oObqqlTLNWuDjMmAkEP5UcIsS3X2Rgc3FwX3N0OYOHAsQ/ a50cGEBAQRTOB5uXJgLRv8AVzkePfwB/T/St "]], + FilledCurve[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, CompressedData[" @@ -14050,9 +13216,10 @@ r3B2hiKcD/MvLH2g82HpAwCcyAI+ 3.833941931372731*^9, 3.8339424249254*^9, 3.833944913808194*^9, 3.83395331509979*^9, {3.833953365365446*^9, 3.833953402369651*^9}, { 3.833953519355969*^9, 3.833953565422509*^9}, 3.833953707033587*^9, - 3.833953770123893*^9, 3.833953926623033*^9, 3.833954060542239*^9}, + 3.833953770123893*^9, 3.833953926623033*^9, 3.833954060263522*^9, + 3.833954239333253*^9, {3.833954709882498*^9, 3.833954729693369*^9}}, CellLabel-> - "Out[153]=",ExpressionUUID->"89d0c5bf-8bad-470e-845d-dcb0d531d0f7"] + "Out[169]=",ExpressionUUID->"feb39aa5-cfd8-4dd3-beb4-bb5cf581d7e1"] }, Open ]] }, Open ]] }, Open ]], @@ -145207,493 +144374,493 @@ Cell[22793, 525, 18740, 370, 358, "Output",ExpressionUUID->"f64203ed-fc93-468a-9 Cell[CellGroupData[{ Cell[41594, 902, 152, 3, 72, "Title",ExpressionUUID->"e86ca219-ce50-41b6-9e1b-b19ff1ff4ecd"], Cell[CellGroupData[{ -Cell[41771, 909, 499, 15, 54, "Subsection",ExpressionUUID->"f8195ea6-11f3-4cd9-bbc6-58b4f338894f"], -Cell[42273, 926, 16207, 375, 1020, "Input",ExpressionUUID->"a67ae21a-c72d-4d67-abe2-1be3a36cc379", +Cell[41771, 909, 433, 13, 54, "Subsection",ExpressionUUID->"f8195ea6-11f3-4cd9-bbc6-58b4f338894f"], +Cell[42207, 924, 15391, 358, 978, "Input",ExpressionUUID->"a67ae21a-c72d-4d67-abe2-1be3a36cc379", InitializationCell->True] -}, Open ]], +}, Closed]], Cell[CellGroupData[{ -Cell[58517, 1306, 435, 13, 54, "Subsection",ExpressionUUID->"2deee525-8033-41a7-81fa-8f54db8e8686"], -Cell[58955, 1321, 17309, 412, 1071, "Input",ExpressionUUID->"4a7754e0-f469-452a-aa2e-0612e3e61cc4", +Cell[57635, 1287, 435, 13, 38, "Subsection",ExpressionUUID->"2deee525-8033-41a7-81fa-8f54db8e8686"], +Cell[58073, 1302, 17357, 413, 1071, "Input",ExpressionUUID->"4a7754e0-f469-452a-aa2e-0612e3e61cc4", InitializationCell->True] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[76313, 1739, 209, 4, 98, "Title",ExpressionUUID->"65349f7e-5bc6-4eab-a848-be2c224ab83e"], +Cell[75479, 1721, 209, 4, 98, "Title",ExpressionUUID->"65349f7e-5bc6-4eab-a848-be2c224ab83e"], Cell[CellGroupData[{ -Cell[76547, 1747, 165, 3, 67, "Section",ExpressionUUID->"16a381ea-1b1c-49bc-af20-8f5dd32b688e"], -Cell[76715, 1752, 2036, 57, 110, "Input",ExpressionUUID->"895ab98c-f42b-4d20-8b55-5797a7b91a74", +Cell[75713, 1729, 165, 3, 67, "Section",ExpressionUUID->"16a381ea-1b1c-49bc-af20-8f5dd32b688e"], +Cell[75881, 1734, 2036, 57, 110, "Input",ExpressionUUID->"895ab98c-f42b-4d20-8b55-5797a7b91a74", InitializationCell->True], Cell[CellGroupData[{ -Cell[78776, 1813, 4341, 101, 367, "Input",ExpressionUUID->"c0d253a4-c77a-4d29-8f46-62c8768410a9"], -Cell[83120, 1916, 205460, 3729, 357, "Output",ExpressionUUID->"510f66bf-c840-4cca-9610-4e82d0caf1ea"] +Cell[77942, 1795, 4341, 101, 367, "Input",ExpressionUUID->"c0d253a4-c77a-4d29-8f46-62c8768410a9"], +Cell[82286, 1898, 205460, 3729, 357, "Output",ExpressionUUID->"510f66bf-c840-4cca-9610-4e82d0caf1ea"] }, Open ]], Cell[CellGroupData[{ -Cell[288617, 5650, 154, 3, 54, "Subsection",ExpressionUUID->"3bb0d721-e299-4b18-9417-d1e1c05fee25"], +Cell[287783, 5632, 154, 3, 54, "Subsection",ExpressionUUID->"3bb0d721-e299-4b18-9417-d1e1c05fee25"], Cell[CellGroupData[{ -Cell[288796, 5657, 1309, 33, 74, "Input",ExpressionUUID->"cdb434ce-1eaf-4f2d-9564-f363019aec44"], -Cell[290108, 5692, 440, 9, 34, "Output",ExpressionUUID->"4cbb7fcc-6ed0-4e1f-a107-5747a85138fd"], -Cell[290551, 5703, 362, 7, 34, "Output",ExpressionUUID->"bdb74f0b-38e6-48a9-a128-d4079e0e37c7"] +Cell[287962, 5639, 1309, 33, 74, "Input",ExpressionUUID->"cdb434ce-1eaf-4f2d-9564-f363019aec44"], +Cell[289274, 5674, 440, 9, 34, "Output",ExpressionUUID->"4cbb7fcc-6ed0-4e1f-a107-5747a85138fd"], +Cell[289717, 5685, 362, 7, 34, "Output",ExpressionUUID->"bdb74f0b-38e6-48a9-a128-d4079e0e37c7"] }, Open ]], Cell[CellGroupData[{ -Cell[290950, 5715, 1310, 33, 74, "Input",ExpressionUUID->"0db7e576-b902-4e92-a166-46319a6b0730"], -Cell[292263, 5750, 404, 8, 34, "Output",ExpressionUUID->"01ed7ea6-9cc9-4e3c-9f1a-9ba969cab6f0"], -Cell[292670, 5760, 302, 5, 34, "Output",ExpressionUUID->"d1e745fa-0f7e-4f9f-9d03-acdc1d995f2e"] +Cell[290116, 5697, 1310, 33, 74, "Input",ExpressionUUID->"0db7e576-b902-4e92-a166-46319a6b0730"], +Cell[291429, 5732, 404, 8, 34, "Output",ExpressionUUID->"01ed7ea6-9cc9-4e3c-9f1a-9ba969cab6f0"], +Cell[291836, 5742, 302, 5, 34, "Output",ExpressionUUID->"d1e745fa-0f7e-4f9f-9d03-acdc1d995f2e"] }, Open ]], Cell[CellGroupData[{ -Cell[293009, 5770, 1307, 33, 74, "Input",ExpressionUUID->"e3745875-1382-48d6-9233-a584c3ea6f23"], -Cell[294319, 5805, 429, 9, 34, "Output",ExpressionUUID->"80a3d0b4-2b7d-4627-b5dd-530ed134c20d"], -Cell[294751, 5816, 328, 6, 34, "Output",ExpressionUUID->"ee1db387-7c60-4812-9467-46fca487a44a"] +Cell[292175, 5752, 1307, 33, 74, "Input",ExpressionUUID->"e3745875-1382-48d6-9233-a584c3ea6f23"], +Cell[293485, 5787, 429, 9, 34, "Output",ExpressionUUID->"80a3d0b4-2b7d-4627-b5dd-530ed134c20d"], +Cell[293917, 5798, 328, 6, 34, "Output",ExpressionUUID->"ee1db387-7c60-4812-9467-46fca487a44a"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[295140, 5829, 164, 3, 53, "Section",ExpressionUUID->"1bb1c8f3-2f05-4c2c-a98d-e9900e55f10d"], +Cell[294306, 5811, 164, 3, 53, "Section",ExpressionUUID->"1bb1c8f3-2f05-4c2c-a98d-e9900e55f10d"], Cell[CellGroupData[{ -Cell[295329, 5836, 921, 21, 52, "Input",ExpressionUUID->"5b87143c-454a-4069-aded-93ae6535f27a"], -Cell[296253, 5859, 216039, 4111, 388, "Output",ExpressionUUID->"f92d90e6-98b9-4fa2-8c6b-4887bb076d0f"], -Cell[512295, 9972, 228044, 4082, 372, "Output",ExpressionUUID->"89d0c5bf-8bad-470e-845d-dcb0d531d0f7"] +Cell[294495, 5818, 921, 21, 52, "Input",ExpressionUUID->"5b87143c-454a-4069-aded-93ae6535f27a"], +Cell[295419, 5841, 175369, 3296, 388, "Output",ExpressionUUID->"7863134f-9e20-454c-b9a4-e8fa6f7d0fcc"], +Cell[470791, 9139, 228104, 4082, 372, "Output",ExpressionUUID->"feb39aa5-cfd8-4dd3-beb4-bb5cf581d7e1"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[740400, 14061, 150, 3, 98, "Title",ExpressionUUID->"c8ea3a71-bf82-42b1-8ca9-bd2f3ea9c623"], +Cell[698956, 13228, 150, 3, 98, "Title",ExpressionUUID->"c8ea3a71-bf82-42b1-8ca9-bd2f3ea9c623"], Cell[CellGroupData[{ -Cell[740575, 14068, 222, 4, 67, "Section",ExpressionUUID->"f469185a-24a4-4d35-82ab-fe6fb21a0ed0"], -Cell[740800, 14074, 1570, 42, 73, "Input",ExpressionUUID->"ce3467d1-752d-495b-ae3c-fa71bf8f0b39"], +Cell[699131, 13235, 222, 4, 67, "Section",ExpressionUUID->"f469185a-24a4-4d35-82ab-fe6fb21a0ed0"], +Cell[699356, 13241, 1570, 42, 73, "Input",ExpressionUUID->"ce3467d1-752d-495b-ae3c-fa71bf8f0b39"], Cell[CellGroupData[{ -Cell[742395, 14120, 1607, 41, 74, "Input",ExpressionUUID->"744dcccc-275d-4ad2-9462-dc69f3226f48"], -Cell[744005, 14163, 748, 14, 70, "Output",ExpressionUUID->"6819cfe7-4ed8-4f6a-8d2c-5cfa80febd66"], -Cell[744756, 14179, 655, 12, 70, "Output",ExpressionUUID->"ceeebdb3-fcd7-4c79-8188-d631e0b363be"] +Cell[700951, 13287, 1607, 41, 74, "Input",ExpressionUUID->"744dcccc-275d-4ad2-9462-dc69f3226f48"], +Cell[702561, 13330, 748, 14, 70, "Output",ExpressionUUID->"6819cfe7-4ed8-4f6a-8d2c-5cfa80febd66"], +Cell[703312, 13346, 655, 12, 70, "Output",ExpressionUUID->"ceeebdb3-fcd7-4c79-8188-d631e0b363be"] }, Open ]], Cell[CellGroupData[{ -Cell[745448, 14196, 1460, 39, 74, "Input",ExpressionUUID->"741227e2-7efd-45c4-bc3f-6953b6a13142"], -Cell[746911, 14237, 674, 13, 70, "Output",ExpressionUUID->"d48c3ce3-f2c1-4777-a34a-17a201843a62"], -Cell[747588, 14252, 567, 10, 70, "Output",ExpressionUUID->"64c637e4-f651-4740-8318-844238612dcd"] +Cell[704004, 13363, 1460, 39, 74, "Input",ExpressionUUID->"741227e2-7efd-45c4-bc3f-6953b6a13142"], +Cell[705467, 13404, 674, 13, 70, "Output",ExpressionUUID->"d48c3ce3-f2c1-4777-a34a-17a201843a62"], +Cell[706144, 13419, 567, 10, 70, "Output",ExpressionUUID->"64c637e4-f651-4740-8318-844238612dcd"] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[748204, 14268, 207, 3, 53, "Section",ExpressionUUID->"0c47bec4-8779-45ff-9b35-14c6b54ea7bf"], -Cell[748414, 14273, 1005, 17, 30, "Input",ExpressionUUID->"d7aa685e-4cb2-4ea2-b62b-486cbce72142"], +Cell[706760, 13435, 207, 3, 53, "Section",ExpressionUUID->"0c47bec4-8779-45ff-9b35-14c6b54ea7bf"], +Cell[706970, 13440, 1005, 17, 30, "Input",ExpressionUUID->"d7aa685e-4cb2-4ea2-b62b-486cbce72142"], Cell[CellGroupData[{ -Cell[749444, 14294, 13040, 296, 774, "Input",ExpressionUUID->"9fbba358-b4ba-4375-9b91-0af572d88038"], -Cell[762487, 14592, 2709, 40, 34, "Output",ExpressionUUID->"95a6a205-0581-481a-a076-8be2f1dfb794"], -Cell[765199, 14634, 2709, 40, 34, "Output",ExpressionUUID->"3083a880-6b97-4174-8b22-e5d0d4a8b3ac"], -Cell[767911, 14676, 260329, 4703, 598, "Output",ExpressionUUID->"33140fd0-788e-4582-a4c2-5d1cf30a4d50"] +Cell[708000, 13461, 13040, 296, 774, "Input",ExpressionUUID->"9fbba358-b4ba-4375-9b91-0af572d88038"], +Cell[721043, 13759, 2709, 40, 34, "Output",ExpressionUUID->"95a6a205-0581-481a-a076-8be2f1dfb794"], +Cell[723755, 13801, 2709, 40, 34, "Output",ExpressionUUID->"3083a880-6b97-4174-8b22-e5d0d4a8b3ac"], +Cell[726467, 13843, 260329, 4703, 598, "Output",ExpressionUUID->"33140fd0-788e-4582-a4c2-5d1cf30a4d50"] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[1028289, 19385, 165, 3, 53, "Section",ExpressionUUID->"c53c0e7c-8d76-4b78-ab46-cee8483f7a76"], -Cell[1028457, 19390, 1850, 55, 110, "Input",ExpressionUUID->"45aa8230-f7ee-467a-96ce-1c41bb98be6e", +Cell[986845, 18552, 165, 3, 53, "Section",ExpressionUUID->"c53c0e7c-8d76-4b78-ab46-cee8483f7a76"], +Cell[987013, 18557, 1850, 55, 110, "Input",ExpressionUUID->"45aa8230-f7ee-467a-96ce-1c41bb98be6e", InitializationCell->True], Cell[CellGroupData[{ -Cell[1030332, 19449, 4325, 100, 388, "Input",ExpressionUUID->"f571b6dd-0c6d-402e-90da-48632fe03369"], -Cell[1034660, 19551, 180614, 3300, 349, "Output",ExpressionUUID->"d4582cb9-6536-4c02-8db4-6e3678503469"] +Cell[988888, 18616, 4325, 100, 367, "Input",ExpressionUUID->"f571b6dd-0c6d-402e-90da-48632fe03369"], +Cell[993216, 18718, 180614, 3300, 349, "Output",ExpressionUUID->"d4582cb9-6536-4c02-8db4-6e3678503469"] }, Open ]], Cell[CellGroupData[{ -Cell[1215311, 22856, 154, 3, 54, "Subsection",ExpressionUUID->"6ed9e07a-b697-4c5b-9c64-02e7d7193dd9"], +Cell[1173867, 22023, 154, 3, 54, "Subsection",ExpressionUUID->"6ed9e07a-b697-4c5b-9c64-02e7d7193dd9"], Cell[CellGroupData[{ -Cell[1215490, 22863, 1328, 34, 74, "Input",ExpressionUUID->"faeee6a1-27da-4747-bba6-385c63127336"], -Cell[1216821, 22899, 591, 12, 34, "Output",ExpressionUUID->"fe0bdcf0-b0f2-40d6-af71-7a5eeb8cddbc"], -Cell[1217415, 22913, 510, 10, 34, "Output",ExpressionUUID->"c924dca5-0c44-4cf4-9e56-e49e2b0f3c8e"] +Cell[1174046, 22030, 1328, 34, 74, "Input",ExpressionUUID->"faeee6a1-27da-4747-bba6-385c63127336"], +Cell[1175377, 22066, 591, 12, 34, "Output",ExpressionUUID->"fe0bdcf0-b0f2-40d6-af71-7a5eeb8cddbc"], +Cell[1175971, 22080, 510, 10, 34, "Output",ExpressionUUID->"c924dca5-0c44-4cf4-9e56-e49e2b0f3c8e"] }, Open ]], Cell[CellGroupData[{ -Cell[1217962, 22928, 1305, 34, 74, "Input",ExpressionUUID->"a1e6c246-a9cb-4349-925b-42f5dafd15c2"], -Cell[1219270, 22964, 530, 11, 34, "Output",ExpressionUUID->"38eb5c9a-71e5-419f-9d61-83833778bbff"], -Cell[1219803, 22977, 428, 8, 34, "Output",ExpressionUUID->"09a91625-a08a-42c9-84a3-2b8b2af641c4"] +Cell[1176518, 22095, 1305, 34, 74, "Input",ExpressionUUID->"a1e6c246-a9cb-4349-925b-42f5dafd15c2"], +Cell[1177826, 22131, 530, 11, 34, "Output",ExpressionUUID->"38eb5c9a-71e5-419f-9d61-83833778bbff"], +Cell[1178359, 22144, 428, 8, 34, "Output",ExpressionUUID->"09a91625-a08a-42c9-84a3-2b8b2af641c4"] }, Open ]], Cell[CellGroupData[{ -Cell[1220268, 22990, 1302, 34, 74, "Input",ExpressionUUID->"3ea592cd-abcc-42c2-a4cd-02387a54ba6b"], -Cell[1221573, 23026, 575, 12, 34, "Output",ExpressionUUID->"789cdfb3-a7c6-4ba1-86f2-e673b64454e1"], -Cell[1222151, 23040, 473, 9, 34, "Output",ExpressionUUID->"36028a38-94f2-46ba-b553-8b9d3d86381c"] +Cell[1178824, 22157, 1302, 34, 74, "Input",ExpressionUUID->"3ea592cd-abcc-42c2-a4cd-02387a54ba6b"], +Cell[1180129, 22193, 575, 12, 34, "Output",ExpressionUUID->"789cdfb3-a7c6-4ba1-86f2-e673b64454e1"], +Cell[1180707, 22207, 473, 9, 34, "Output",ExpressionUUID->"36028a38-94f2-46ba-b553-8b9d3d86381c"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[1222685, 23056, 164, 3, 53, "Section",ExpressionUUID->"285c7b18-4488-4051-b69c-1c735933f199"], +Cell[1181241, 22223, 164, 3, 53, "Section",ExpressionUUID->"285c7b18-4488-4051-b69c-1c735933f199"], Cell[CellGroupData[{ -Cell[1222874, 23063, 957, 22, 52, "Input",ExpressionUUID->"f97d8f09-09e2-4eb1-8f8e-49bb58119b51"], -Cell[1223834, 23087, 203967, 3909, 388, "Output",ExpressionUUID->"4496443b-e817-44f0-bda6-d60622e48843"], -Cell[1427804, 26998, 203926, 3675, 372, "Output",ExpressionUUID->"1b219a4c-ebf8-4d66-8d35-9f1b69d7e001"] +Cell[1181430, 22230, 957, 22, 52, "Input",ExpressionUUID->"f97d8f09-09e2-4eb1-8f8e-49bb58119b51"], +Cell[1182390, 22254, 203967, 3909, 388, "Output",ExpressionUUID->"4496443b-e817-44f0-bda6-d60622e48843"], +Cell[1386360, 26165, 203926, 3675, 372, "Output",ExpressionUUID->"1b219a4c-ebf8-4d66-8d35-9f1b69d7e001"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[1631791, 30680, 156, 3, 98, "Title",ExpressionUUID->"0860c22a-77ea-459e-9e4f-ab8d06aad316"], +Cell[1590347, 29847, 156, 3, 98, "Title",ExpressionUUID->"0860c22a-77ea-459e-9e4f-ab8d06aad316"], Cell[CellGroupData[{ -Cell[1631972, 30687, 165, 3, 67, "Section",ExpressionUUID->"86c38d97-2176-4491-bd1b-14fcbf3c9de6"], -Cell[1632140, 30692, 1961, 56, 110, "Input",ExpressionUUID->"0f6df49c-36bc-4f29-a06b-1e01f88c8af7", +Cell[1590528, 29854, 165, 3, 67, "Section",ExpressionUUID->"86c38d97-2176-4491-bd1b-14fcbf3c9de6"], +Cell[1590696, 29859, 1961, 56, 110, "Input",ExpressionUUID->"0f6df49c-36bc-4f29-a06b-1e01f88c8af7", InitializationCell->True], Cell[CellGroupData[{ -Cell[1634126, 30752, 4311, 101, 388, "Input",ExpressionUUID->"e0a2c425-59de-45cd-a91c-54bed5e8d0d7"], -Cell[1638440, 30855, 191526, 3489, 70, "Output",ExpressionUUID->"209c9077-47b9-4b95-8f26-4475fab94d92"] +Cell[1592682, 29919, 4311, 101, 388, "Input",ExpressionUUID->"e0a2c425-59de-45cd-a91c-54bed5e8d0d7"], +Cell[1596996, 30022, 191526, 3489, 70, "Output",ExpressionUUID->"209c9077-47b9-4b95-8f26-4475fab94d92"] }, Open ]], Cell[CellGroupData[{ -Cell[1830003, 34349, 154, 3, 54, "Subsection",ExpressionUUID->"09abf152-a5b7-441a-b5b5-f9ac1c555a3e"], +Cell[1788559, 33516, 154, 3, 54, "Subsection",ExpressionUUID->"09abf152-a5b7-441a-b5b5-f9ac1c555a3e"], Cell[CellGroupData[{ -Cell[1830182, 34356, 1358, 35, 74, "Input",ExpressionUUID->"fc3b72f7-0f23-4ab8-b2f7-31cf8d6afb6a"], -Cell[1831543, 34393, 568, 12, 70, "Output",ExpressionUUID->"4e7216cb-65f3-4af2-b21a-4324a2ff0a56"], -Cell[1832114, 34407, 489, 10, 70, "Output",ExpressionUUID->"8c97cead-53e6-4b62-9b4e-38c5a82990ac"] +Cell[1788738, 33523, 1358, 35, 74, "Input",ExpressionUUID->"fc3b72f7-0f23-4ab8-b2f7-31cf8d6afb6a"], +Cell[1790099, 33560, 568, 12, 70, "Output",ExpressionUUID->"4e7216cb-65f3-4af2-b21a-4324a2ff0a56"], +Cell[1790670, 33574, 489, 10, 70, "Output",ExpressionUUID->"8c97cead-53e6-4b62-9b4e-38c5a82990ac"] }, Open ]], Cell[CellGroupData[{ -Cell[1832640, 34422, 1331, 34, 74, "Input",ExpressionUUID->"7a91f090-8b86-423b-a3b3-e111116f8a39"], -Cell[1833974, 34458, 504, 11, 70, "Output",ExpressionUUID->"47abb38a-bd9f-4d46-9faf-d7091519d270"], -Cell[1834481, 34471, 406, 8, 70, "Output",ExpressionUUID->"d25018f6-af24-43e8-9032-42cd5c459103"] +Cell[1791196, 33589, 1331, 34, 74, "Input",ExpressionUUID->"7a91f090-8b86-423b-a3b3-e111116f8a39"], +Cell[1792530, 33625, 504, 11, 70, "Output",ExpressionUUID->"47abb38a-bd9f-4d46-9faf-d7091519d270"], +Cell[1793037, 33638, 406, 8, 70, "Output",ExpressionUUID->"d25018f6-af24-43e8-9032-42cd5c459103"] }, Open ]], Cell[CellGroupData[{ -Cell[1834924, 34484, 1328, 34, 74, "Input",ExpressionUUID->"42c1fc2d-3b30-4c28-8611-511d1f3a6e37"], -Cell[1836255, 34520, 546, 11, 70, "Output",ExpressionUUID->"2d60e8a0-67c6-41af-9e5d-20361a449f4f"], -Cell[1836804, 34533, 445, 8, 70, "Output",ExpressionUUID->"a4cf1711-a400-4bbd-a735-5f2b6f98145d"] +Cell[1793480, 33651, 1328, 34, 74, "Input",ExpressionUUID->"42c1fc2d-3b30-4c28-8611-511d1f3a6e37"], +Cell[1794811, 33687, 546, 11, 70, "Output",ExpressionUUID->"2d60e8a0-67c6-41af-9e5d-20361a449f4f"], +Cell[1795360, 33700, 445, 8, 70, "Output",ExpressionUUID->"a4cf1711-a400-4bbd-a735-5f2b6f98145d"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[1837310, 34548, 164, 3, 53, "Section",ExpressionUUID->"e555d041-c954-4d42-975d-189c29eecbf7"], +Cell[1795866, 33715, 164, 3, 53, "Section",ExpressionUUID->"e555d041-c954-4d42-975d-189c29eecbf7"], Cell[CellGroupData[{ -Cell[1837499, 34555, 767, 19, 52, "Input",ExpressionUUID->"877d2c8b-2c78-4762-8177-a1dc684f1b5e"], -Cell[1838269, 34576, 208459, 3982, 388, "Output",ExpressionUUID->"89f92bee-2d84-44be-bfd6-342d0a4ad6c1"], -Cell[2046731, 38560, 213359, 3828, 372, "Output",ExpressionUUID->"17f37b7c-b110-4fe7-b385-25ba92fc5a5f"] +Cell[1796055, 33722, 767, 19, 52, "Input",ExpressionUUID->"877d2c8b-2c78-4762-8177-a1dc684f1b5e"], +Cell[1796825, 33743, 208459, 3982, 388, "Output",ExpressionUUID->"89f92bee-2d84-44be-bfd6-342d0a4ad6c1"], +Cell[2005287, 37727, 213359, 3828, 372, "Output",ExpressionUUID->"17f37b7c-b110-4fe7-b385-25ba92fc5a5f"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[2260151, 42395, 150, 3, 98, "Title",ExpressionUUID->"d9294d8a-4355-4e8d-bbd5-410646cba2c4"], +Cell[2218707, 41562, 150, 3, 98, "Title",ExpressionUUID->"d9294d8a-4355-4e8d-bbd5-410646cba2c4"], Cell[CellGroupData[{ -Cell[2260326, 42402, 165, 3, 67, "Section",ExpressionUUID->"ba4a26a0-d628-45e2-bb2e-6d6478a5b973"], -Cell[2260494, 42407, 2050, 57, 110, "Input",ExpressionUUID->"f11bb471-abb4-4b35-b78e-924d82295d82", +Cell[2218882, 41569, 165, 3, 67, "Section",ExpressionUUID->"ba4a26a0-d628-45e2-bb2e-6d6478a5b973"], +Cell[2219050, 41574, 2050, 57, 110, "Input",ExpressionUUID->"f11bb471-abb4-4b35-b78e-924d82295d82", InitializationCell->True], Cell[CellGroupData[{ -Cell[2262569, 42468, 4348, 101, 388, "Input",ExpressionUUID->"94359c49-c493-4513-89e0-5d3df8be5780"], -Cell[2266920, 42571, 185383, 3400, 70, "Output",ExpressionUUID->"75623405-5089-4991-9de3-62eb08924b83"] +Cell[2221125, 41635, 4348, 101, 388, "Input",ExpressionUUID->"94359c49-c493-4513-89e0-5d3df8be5780"], +Cell[2225476, 41738, 185383, 3400, 70, "Output",ExpressionUUID->"75623405-5089-4991-9de3-62eb08924b83"] }, Open ]], Cell[CellGroupData[{ -Cell[2452340, 45976, 154, 3, 54, "Subsection",ExpressionUUID->"e9c42ce3-0b52-4370-bf57-f8c7c204b085"], +Cell[2410896, 45143, 154, 3, 54, "Subsection",ExpressionUUID->"e9c42ce3-0b52-4370-bf57-f8c7c204b085"], Cell[CellGroupData[{ -Cell[2452519, 45983, 1378, 35, 74, "Input",ExpressionUUID->"68b92834-2cb8-4602-8e77-8c84f6a33562"], -Cell[2453900, 46020, 569, 12, 70, "Output",ExpressionUUID->"d1efad77-9e6c-4bc2-9835-b91f1eab355f"], -Cell[2454472, 46034, 487, 10, 70, "Output",ExpressionUUID->"9b1b3a31-b1c3-4556-8f8b-5850064053ed"] +Cell[2411075, 45150, 1378, 35, 74, "Input",ExpressionUUID->"68b92834-2cb8-4602-8e77-8c84f6a33562"], +Cell[2412456, 45187, 569, 12, 70, "Output",ExpressionUUID->"d1efad77-9e6c-4bc2-9835-b91f1eab355f"], +Cell[2413028, 45201, 487, 10, 70, "Output",ExpressionUUID->"9b1b3a31-b1c3-4556-8f8b-5850064053ed"] }, Open ]], Cell[CellGroupData[{ -Cell[2454996, 46049, 1355, 35, 74, "Input",ExpressionUUID->"4ead6903-964a-4732-82a1-349ed005a7a0"], -Cell[2456354, 46086, 505, 11, 70, "Output",ExpressionUUID->"fc1801ea-98fe-4540-9f99-73c03af65eb5"], -Cell[2456862, 46099, 405, 8, 70, "Output",ExpressionUUID->"51c286b2-b6a3-411e-ad5e-a1f42a5737c7"] +Cell[2413552, 45216, 1355, 35, 74, "Input",ExpressionUUID->"4ead6903-964a-4732-82a1-349ed005a7a0"], +Cell[2414910, 45253, 505, 11, 70, "Output",ExpressionUUID->"fc1801ea-98fe-4540-9f99-73c03af65eb5"], +Cell[2415418, 45266, 405, 8, 70, "Output",ExpressionUUID->"51c286b2-b6a3-411e-ad5e-a1f42a5737c7"] }, Open ]], Cell[CellGroupData[{ -Cell[2457304, 46112, 1402, 35, 74, "Input",ExpressionUUID->"b7abe509-152d-4b0a-acfa-9f50e03d419a"], -Cell[2458709, 46149, 546, 11, 70, "Output",ExpressionUUID->"e8c2fcba-77b1-42f8-8d3a-f485c2d46c23"], -Cell[2459258, 46162, 441, 8, 70, "Output",ExpressionUUID->"1f448d2d-b416-4b84-9bd7-9fbc685e7e02"] +Cell[2415860, 45279, 1402, 35, 74, "Input",ExpressionUUID->"b7abe509-152d-4b0a-acfa-9f50e03d419a"], +Cell[2417265, 45316, 546, 11, 70, "Output",ExpressionUUID->"e8c2fcba-77b1-42f8-8d3a-f485c2d46c23"], +Cell[2417814, 45329, 441, 8, 70, "Output",ExpressionUUID->"1f448d2d-b416-4b84-9bd7-9fbc685e7e02"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[2459760, 46177, 164, 3, 53, "Section",ExpressionUUID->"0ce9737a-03fc-4a26-a86f-c789f03e34bc"], +Cell[2418316, 45344, 164, 3, 53, "Section",ExpressionUUID->"0ce9737a-03fc-4a26-a86f-c789f03e34bc"], Cell[CellGroupData[{ -Cell[2459949, 46184, 668, 18, 52, "Input",ExpressionUUID->"5c19bfec-9035-4e97-b29e-a7411588e829"], -Cell[2460620, 46204, 205301, 3933, 388, "Output",ExpressionUUID->"00cf4808-ca4c-445f-bf06-204aab759cf8"], -Cell[2665924, 50139, 206931, 3738, 381, "Output",ExpressionUUID->"11ef3aed-59ba-4da4-8d92-d45ad63278e9"] +Cell[2418505, 45351, 668, 18, 52, "Input",ExpressionUUID->"5c19bfec-9035-4e97-b29e-a7411588e829"], +Cell[2419176, 45371, 205301, 3933, 388, "Output",ExpressionUUID->"00cf4808-ca4c-445f-bf06-204aab759cf8"], +Cell[2624480, 49306, 206931, 3738, 381, "Output",ExpressionUUID->"11ef3aed-59ba-4da4-8d92-d45ad63278e9"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[2872916, 53884, 154, 3, 98, "Title",ExpressionUUID->"3504afb6-6eb1-48f6-9495-ed3dc6c532d7"], +Cell[2831472, 53051, 154, 3, 98, "Title",ExpressionUUID->"3504afb6-6eb1-48f6-9495-ed3dc6c532d7"], Cell[CellGroupData[{ -Cell[2873095, 53891, 165, 3, 67, "Section",ExpressionUUID->"a5f2404f-9967-45e0-8a61-25658fb37a23"], -Cell[2873263, 53896, 2108, 58, 110, "Input",ExpressionUUID->"fec12b1f-939b-432a-89a4-71b4992d614a", +Cell[2831651, 53058, 165, 3, 67, "Section",ExpressionUUID->"a5f2404f-9967-45e0-8a61-25658fb37a23"], +Cell[2831819, 53063, 2108, 58, 110, "Input",ExpressionUUID->"fec12b1f-939b-432a-89a4-71b4992d614a", InitializationCell->True], Cell[CellGroupData[{ -Cell[2875396, 53958, 4407, 102, 388, "Input",ExpressionUUID->"d902b043-87cb-4f89-be8e-92455177b217"], -Cell[2879806, 54062, 191068, 3486, 70, "Output",ExpressionUUID->"a76fef51-0e65-4d7a-a848-ffec48be13f4"] +Cell[2833952, 53125, 4407, 102, 388, "Input",ExpressionUUID->"d902b043-87cb-4f89-be8e-92455177b217"], +Cell[2838362, 53229, 191068, 3486, 70, "Output",ExpressionUUID->"a76fef51-0e65-4d7a-a848-ffec48be13f4"] }, Open ]], Cell[CellGroupData[{ -Cell[3070911, 57553, 154, 3, 54, "Subsection",ExpressionUUID->"c46e08d4-b6ba-46f0-9c89-b288880426ce"], +Cell[3029467, 56720, 154, 3, 54, "Subsection",ExpressionUUID->"c46e08d4-b6ba-46f0-9c89-b288880426ce"], Cell[CellGroupData[{ -Cell[3071090, 57560, 1402, 35, 74, "Input",ExpressionUUID->"11d7747b-9e15-426e-81f8-ba79899ac511"], -Cell[3072495, 57597, 618, 13, 70, "Output",ExpressionUUID->"6501f92a-4687-4245-af92-1133a9994560"], -Cell[3073116, 57612, 540, 11, 70, "Output",ExpressionUUID->"178a87c2-6543-479f-b26c-b2da1b8fd242"] +Cell[3029646, 56727, 1402, 35, 74, "Input",ExpressionUUID->"11d7747b-9e15-426e-81f8-ba79899ac511"], +Cell[3031051, 56764, 618, 13, 70, "Output",ExpressionUUID->"6501f92a-4687-4245-af92-1133a9994560"], +Cell[3031672, 56779, 540, 11, 70, "Output",ExpressionUUID->"178a87c2-6543-479f-b26c-b2da1b8fd242"] }, Open ]], Cell[CellGroupData[{ -Cell[3073693, 57628, 1381, 35, 74, "Input",ExpressionUUID->"626d5c14-7754-47d2-bc07-efbaf7f4fd74"], -Cell[3075077, 57665, 547, 11, 70, "Output",ExpressionUUID->"709a2b53-d71e-44aa-9e1d-bab787ed1c40"], -Cell[3075627, 57678, 448, 8, 70, "Output",ExpressionUUID->"8b8c34c0-8f52-4fd8-93a2-ab21f6f4033b"] +Cell[3032249, 56795, 1381, 35, 74, "Input",ExpressionUUID->"626d5c14-7754-47d2-bc07-efbaf7f4fd74"], +Cell[3033633, 56832, 547, 11, 70, "Output",ExpressionUUID->"709a2b53-d71e-44aa-9e1d-bab787ed1c40"], +Cell[3034183, 56845, 448, 8, 70, "Output",ExpressionUUID->"8b8c34c0-8f52-4fd8-93a2-ab21f6f4033b"] }, Open ]], Cell[CellGroupData[{ -Cell[3076112, 57691, 1432, 36, 74, "Input",ExpressionUUID->"7b995c40-5cad-4bf5-9772-3e40edc3fe66"], -Cell[3077547, 57729, 596, 12, 70, "Output",ExpressionUUID->"d5317e13-3324-43fc-a358-7c56499ad6cd"], -Cell[3078146, 57743, 492, 9, 70, "Output",ExpressionUUID->"c05af9ea-9f68-4082-9cd1-33a26ffc09f7"] +Cell[3034668, 56858, 1432, 36, 74, "Input",ExpressionUUID->"7b995c40-5cad-4bf5-9772-3e40edc3fe66"], +Cell[3036103, 56896, 596, 12, 70, "Output",ExpressionUUID->"d5317e13-3324-43fc-a358-7c56499ad6cd"], +Cell[3036702, 56910, 492, 9, 70, "Output",ExpressionUUID->"c05af9ea-9f68-4082-9cd1-33a26ffc09f7"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[3078699, 57759, 164, 3, 53, "Section",ExpressionUUID->"a49527a9-f9ad-46c4-84b7-e9dc0ea5c2fb"], +Cell[3037255, 56926, 164, 3, 53, "Section",ExpressionUUID->"a49527a9-f9ad-46c4-84b7-e9dc0ea5c2fb"], Cell[CellGroupData[{ -Cell[3078888, 57766, 724, 18, 52, "Input",ExpressionUUID->"498a55fb-15c8-491a-86db-9027ef3a57f0"], -Cell[3079615, 57786, 208370, 3983, 388, "Output",ExpressionUUID->"780ac97e-c6ed-4d61-91fa-a1c9bd6d41ca"], -Cell[3287988, 61771, 212974, 3828, 372, "Output",ExpressionUUID->"642dd56a-daa2-4b85-af11-a1833f515d86"] +Cell[3037444, 56933, 724, 18, 52, "Input",ExpressionUUID->"498a55fb-15c8-491a-86db-9027ef3a57f0"], +Cell[3038171, 56953, 208370, 3983, 388, "Output",ExpressionUUID->"780ac97e-c6ed-4d61-91fa-a1c9bd6d41ca"], +Cell[3246544, 60938, 212974, 3828, 372, "Output",ExpressionUUID->"642dd56a-daa2-4b85-af11-a1833f515d86"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[3501023, 65606, 200, 4, 98, "Title",ExpressionUUID->"0d0d68ed-d033-407d-8b39-64222dce8392"], +Cell[3459579, 64773, 200, 4, 98, "Title",ExpressionUUID->"0d0d68ed-d033-407d-8b39-64222dce8392"], Cell[CellGroupData[{ -Cell[3501248, 65614, 165, 3, 67, "Section",ExpressionUUID->"837a9e8f-f906-41ee-adc6-0d92540acac3"], -Cell[3501416, 65619, 1980, 56, 110, "Input",ExpressionUUID->"00ce6a41-3340-4211-974d-333201273f2b", +Cell[3459804, 64781, 165, 3, 67, "Section",ExpressionUUID->"837a9e8f-f906-41ee-adc6-0d92540acac3"], +Cell[3459972, 64786, 1980, 56, 110, "Input",ExpressionUUID->"00ce6a41-3340-4211-974d-333201273f2b", InitializationCell->True], Cell[CellGroupData[{ -Cell[3503421, 65679, 4036, 94, 346, "Input",ExpressionUUID->"a68a10ee-e1f4-45f6-af20-3013ef2e0e0c"], -Cell[3507460, 65775, 157769, 2923, 327, "Output",ExpressionUUID->"caf9b833-7f4a-44a0-8796-25d9fb42ad3f"] +Cell[3461977, 64846, 4036, 94, 346, "Input",ExpressionUUID->"a68a10ee-e1f4-45f6-af20-3013ef2e0e0c"], +Cell[3466016, 64942, 157769, 2923, 327, "Output",ExpressionUUID->"caf9b833-7f4a-44a0-8796-25d9fb42ad3f"] }, Open ]], Cell[CellGroupData[{ -Cell[3665266, 68703, 154, 3, 54, "Subsection",ExpressionUUID->"ed1ad587-16f2-416d-bd92-ebf8eeda035b"], +Cell[3623822, 67870, 154, 3, 54, "Subsection",ExpressionUUID->"ed1ad587-16f2-416d-bd92-ebf8eeda035b"], Cell[CellGroupData[{ -Cell[3665445, 68710, 1284, 34, 74, "Input",ExpressionUUID->"6d7742c9-df65-4590-b3f1-0fd9e52bb881"], -Cell[3666732, 68746, 542, 12, 34, "Output",ExpressionUUID->"e0103e74-d6a7-4372-aeda-75269708f732"], -Cell[3667277, 68760, 461, 10, 34, "Output",ExpressionUUID->"9b0c491f-dd96-4e6f-931c-8a86749a6799"] +Cell[3624001, 67877, 1284, 34, 74, "Input",ExpressionUUID->"6d7742c9-df65-4590-b3f1-0fd9e52bb881"], +Cell[3625288, 67913, 542, 12, 34, "Output",ExpressionUUID->"e0103e74-d6a7-4372-aeda-75269708f732"], +Cell[3625833, 67927, 461, 10, 34, "Output",ExpressionUUID->"9b0c491f-dd96-4e6f-931c-8a86749a6799"] }, Open ]], Cell[CellGroupData[{ -Cell[3667775, 68775, 1285, 34, 74, "Input",ExpressionUUID->"4c80c160-37f9-438f-9852-a500b1652816"], -Cell[3669063, 68811, 478, 10, 34, "Output",ExpressionUUID->"28ad590f-2115-48a7-8839-de12586b0e2d"], -Cell[3669544, 68823, 378, 7, 34, "Output",ExpressionUUID->"82d67ce2-51b0-4210-a1e3-cd5af28a06d3"] +Cell[3626331, 67942, 1285, 34, 74, "Input",ExpressionUUID->"4c80c160-37f9-438f-9852-a500b1652816"], +Cell[3627619, 67978, 478, 10, 34, "Output",ExpressionUUID->"28ad590f-2115-48a7-8839-de12586b0e2d"], +Cell[3628100, 67990, 378, 7, 34, "Output",ExpressionUUID->"82d67ce2-51b0-4210-a1e3-cd5af28a06d3"] }, Open ]], Cell[CellGroupData[{ -Cell[3669959, 68835, 1282, 34, 74, "Input",ExpressionUUID->"384d7e0c-6f6e-475f-8857-b08cec2b998b"], -Cell[3671244, 68871, 503, 11, 34, "Output",ExpressionUUID->"d39e3aae-78f9-4669-add3-a721aada2dac"], -Cell[3671750, 68884, 402, 8, 34, "Output",ExpressionUUID->"0a7d756d-32d4-4601-afd4-e0ccded8c700"] +Cell[3628515, 68002, 1282, 34, 74, "Input",ExpressionUUID->"384d7e0c-6f6e-475f-8857-b08cec2b998b"], +Cell[3629800, 68038, 503, 11, 34, "Output",ExpressionUUID->"d39e3aae-78f9-4669-add3-a721aada2dac"], +Cell[3630306, 68051, 402, 8, 34, "Output",ExpressionUUID->"0a7d756d-32d4-4601-afd4-e0ccded8c700"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[3672213, 68899, 164, 3, 53, "Section",ExpressionUUID->"5968a8e7-7690-4c56-89df-d2afe069402b"], +Cell[3630769, 68066, 164, 3, 53, "Section",ExpressionUUID->"5968a8e7-7690-4c56-89df-d2afe069402b"], Cell[CellGroupData[{ -Cell[3672402, 68906, 668, 18, 52, "Input",ExpressionUUID->"e0024c13-0d48-40c7-8c74-741cc42a624f"], -Cell[3673073, 68926, 206271, 3946, 388, "Output",ExpressionUUID->"82b1b182-b218-4dc8-8128-2d9306e76a93"], -Cell[3879347, 72874, 208942, 3763, 372, "Output",ExpressionUUID->"18d2434a-61d2-4fc5-93c7-4fae3fb40d35"] +Cell[3630958, 68073, 668, 18, 52, "Input",ExpressionUUID->"e0024c13-0d48-40c7-8c74-741cc42a624f"], +Cell[3631629, 68093, 206271, 3946, 388, "Output",ExpressionUUID->"82b1b182-b218-4dc8-8128-2d9306e76a93"], +Cell[3837903, 72041, 208942, 3763, 372, "Output",ExpressionUUID->"18d2434a-61d2-4fc5-93c7-4fae3fb40d35"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[4088350, 76644, 151, 3, 98, "Title",ExpressionUUID->"89ceb3e6-e8ed-48f9-ad54-8f55b765da3d"], +Cell[4046906, 75811, 151, 3, 98, "Title",ExpressionUUID->"89ceb3e6-e8ed-48f9-ad54-8f55b765da3d"], Cell[CellGroupData[{ -Cell[4088526, 76651, 165, 3, 67, "Section",ExpressionUUID->"a672ed73-4892-4c6f-94df-45113bd9185d"], -Cell[4088694, 76656, 2200, 59, 110, "Input",ExpressionUUID->"9d9cd269-5af2-4502-b5cf-01d155493236", +Cell[4047082, 75818, 165, 3, 67, "Section",ExpressionUUID->"a672ed73-4892-4c6f-94df-45113bd9185d"], +Cell[4047250, 75823, 2200, 59, 110, "Input",ExpressionUUID->"9d9cd269-5af2-4502-b5cf-01d155493236", InitializationCell->True], Cell[CellGroupData[{ -Cell[4090919, 76719, 4446, 102, 388, "Input",ExpressionUUID->"7255c134-ca86-4314-bbf8-b83a11e42c5e"], -Cell[4095368, 76823, 189475, 3464, 70, "Output",ExpressionUUID->"68e88d41-263c-4372-8eae-4cec1e8adfbc"] +Cell[4049475, 75886, 4446, 102, 388, "Input",ExpressionUUID->"7255c134-ca86-4314-bbf8-b83a11e42c5e"], +Cell[4053924, 75990, 189475, 3464, 70, "Output",ExpressionUUID->"68e88d41-263c-4372-8eae-4cec1e8adfbc"] }, Open ]], Cell[CellGroupData[{ -Cell[4284880, 80292, 154, 3, 54, "Subsection",ExpressionUUID->"6843b2aa-bfe0-4330-85ec-c12a4533f092"], +Cell[4243436, 79459, 154, 3, 54, "Subsection",ExpressionUUID->"6843b2aa-bfe0-4330-85ec-c12a4533f092"], Cell[CellGroupData[{ -Cell[4285059, 80299, 1427, 36, 74, "Input",ExpressionUUID->"c2fd0978-56ec-4bdb-a941-8830e1cddb0d"], -Cell[4286489, 80337, 642, 13, 70, "Output",ExpressionUUID->"4be88d5a-8897-4ff5-98ea-3ad55fc8801a"], -Cell[4287134, 80352, 563, 11, 70, "Output",ExpressionUUID->"63de95ed-d1d6-41a8-9b1a-84a8fa2e31a9"] +Cell[4243615, 79466, 1427, 36, 74, "Input",ExpressionUUID->"c2fd0978-56ec-4bdb-a941-8830e1cddb0d"], +Cell[4245045, 79504, 642, 13, 70, "Output",ExpressionUUID->"4be88d5a-8897-4ff5-98ea-3ad55fc8801a"], +Cell[4245690, 79519, 563, 11, 70, "Output",ExpressionUUID->"63de95ed-d1d6-41a8-9b1a-84a8fa2e31a9"] }, Open ]], Cell[CellGroupData[{ -Cell[4287734, 80368, 1404, 35, 74, "Input",ExpressionUUID->"35a4401d-efa7-45ac-a9f9-662b80ee42c4"], -Cell[4289141, 80405, 575, 12, 70, "Output",ExpressionUUID->"f355e336-7703-4cf5-8b40-86e169da7205"], -Cell[4289719, 80419, 474, 9, 70, "Output",ExpressionUUID->"da21b9f8-3b3b-479c-92dd-4b978ce9895e"] +Cell[4246290, 79535, 1404, 35, 74, "Input",ExpressionUUID->"35a4401d-efa7-45ac-a9f9-662b80ee42c4"], +Cell[4247697, 79572, 575, 12, 70, "Output",ExpressionUUID->"f355e336-7703-4cf5-8b40-86e169da7205"], +Cell[4248275, 79586, 474, 9, 70, "Output",ExpressionUUID->"da21b9f8-3b3b-479c-92dd-4b978ce9895e"] }, Open ]], Cell[CellGroupData[{ -Cell[4290230, 80433, 1453, 36, 74, "Input",ExpressionUUID->"d9bc890c-a92c-4bf9-b971-2b0ab8a0ebfa"], -Cell[4291686, 80471, 620, 12, 70, "Output",ExpressionUUID->"3bd28787-964f-4e78-a6ec-37266acd0f48"], -Cell[4292309, 80485, 514, 9, 70, "Output",ExpressionUUID->"24a34fc9-1ce8-4a24-816d-973529872b94"] +Cell[4248786, 79600, 1453, 36, 74, "Input",ExpressionUUID->"d9bc890c-a92c-4bf9-b971-2b0ab8a0ebfa"], +Cell[4250242, 79638, 620, 12, 70, "Output",ExpressionUUID->"3bd28787-964f-4e78-a6ec-37266acd0f48"], +Cell[4250865, 79652, 514, 9, 70, "Output",ExpressionUUID->"24a34fc9-1ce8-4a24-816d-973529872b94"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[4292884, 80501, 164, 3, 53, "Section",ExpressionUUID->"9f8745cf-1727-417a-b067-8d71d31bea6e"], +Cell[4251440, 79668, 164, 3, 53, "Section",ExpressionUUID->"9f8745cf-1727-417a-b067-8d71d31bea6e"], Cell[CellGroupData[{ -Cell[4293073, 80508, 642, 17, 52, "Input",ExpressionUUID->"1af3a898-a964-44d7-86a6-b01d3c2bd890"], -Cell[4293718, 80527, 207357, 3967, 388, "Output",ExpressionUUID->"a1c9eae4-e506-4933-b434-0587d3b2ec75"], -Cell[4501078, 84496, 210946, 3806, 381, "Output",ExpressionUUID->"9b4cf610-2e76-4795-b4be-cc4386d8d5f5"] +Cell[4251629, 79675, 642, 17, 52, "Input",ExpressionUUID->"1af3a898-a964-44d7-86a6-b01d3c2bd890"], +Cell[4252274, 79694, 207357, 3967, 388, "Output",ExpressionUUID->"a1c9eae4-e506-4933-b434-0587d3b2ec75"], +Cell[4459634, 83663, 210946, 3806, 381, "Output",ExpressionUUID->"9b4cf610-2e76-4795-b4be-cc4386d8d5f5"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[4712085, 88309, 202, 4, 98, "Title",ExpressionUUID->"0191a663-bf30-4a43-b8c7-edce09d2361b"], +Cell[4670641, 87476, 202, 4, 98, "Title",ExpressionUUID->"0191a663-bf30-4a43-b8c7-edce09d2361b"], Cell[CellGroupData[{ -Cell[4712312, 88317, 165, 3, 67, "Section",ExpressionUUID->"17e4dd54-73a6-4cfc-948f-3b2a0a2d0174"], -Cell[4712480, 88322, 2311, 61, 110, "Input",ExpressionUUID->"3f8c9a69-d755-4607-984f-39042c34f390", +Cell[4670868, 87484, 165, 3, 67, "Section",ExpressionUUID->"17e4dd54-73a6-4cfc-948f-3b2a0a2d0174"], +Cell[4671036, 87489, 2311, 61, 110, "Input",ExpressionUUID->"3f8c9a69-d755-4607-984f-39042c34f390", InitializationCell->True], Cell[CellGroupData[{ -Cell[4714816, 88387, 4461, 103, 388, "Input",ExpressionUUID->"431a5e32-56f2-429f-8483-e92dd0b0e933"], -Cell[4719280, 88492, 195198, 3557, 70, "Output",ExpressionUUID->"74a38473-3715-4e08-abb3-cda80cd4a17c"] +Cell[4673372, 87554, 4461, 103, 388, "Input",ExpressionUUID->"431a5e32-56f2-429f-8483-e92dd0b0e933"], +Cell[4677836, 87659, 195198, 3557, 70, "Output",ExpressionUUID->"74a38473-3715-4e08-abb3-cda80cd4a17c"] }, Open ]], Cell[CellGroupData[{ -Cell[4914515, 92054, 154, 3, 54, "Subsection",ExpressionUUID->"d815ea12-04a1-462c-b37f-a002453aac90"], +Cell[4873071, 91221, 154, 3, 54, "Subsection",ExpressionUUID->"d815ea12-04a1-462c-b37f-a002453aac90"], Cell[CellGroupData[{ -Cell[4914694, 92061, 1475, 36, 74, "Input",ExpressionUUID->"dfd2825c-abed-47ff-b89d-1d580bdf5592"], -Cell[4916172, 92099, 638, 13, 70, "Output",ExpressionUUID->"9edcd7e9-399d-4a83-a7fc-d182b9b74fa6"], -Cell[4916813, 92114, 557, 11, 70, "Output",ExpressionUUID->"5bd5f58f-a0aa-4408-a063-321a21cf78dd"] +Cell[4873250, 91228, 1475, 36, 74, "Input",ExpressionUUID->"dfd2825c-abed-47ff-b89d-1d580bdf5592"], +Cell[4874728, 91266, 638, 13, 70, "Output",ExpressionUUID->"9edcd7e9-399d-4a83-a7fc-d182b9b74fa6"], +Cell[4875369, 91281, 557, 11, 70, "Output",ExpressionUUID->"5bd5f58f-a0aa-4408-a063-321a21cf78dd"] }, Open ]], Cell[CellGroupData[{ -Cell[4917407, 92130, 1455, 36, 74, "Input",ExpressionUUID->"ed9510f5-93cb-4fe6-971b-e392ed5691d9"], -Cell[4918865, 92168, 572, 12, 70, "Output",ExpressionUUID->"94596668-d114-4a6f-a304-e166ccb0df78"], -Cell[4919440, 92182, 475, 9, 70, "Output",ExpressionUUID->"77080df1-7104-4f0a-b26a-9266002359d9"] +Cell[4875963, 91297, 1455, 36, 74, "Input",ExpressionUUID->"ed9510f5-93cb-4fe6-971b-e392ed5691d9"], +Cell[4877421, 91335, 572, 12, 70, "Output",ExpressionUUID->"94596668-d114-4a6f-a304-e166ccb0df78"], +Cell[4877996, 91349, 475, 9, 70, "Output",ExpressionUUID->"77080df1-7104-4f0a-b26a-9266002359d9"] }, Open ]], Cell[CellGroupData[{ -Cell[4919952, 92196, 1509, 37, 74, "Input",ExpressionUUID->"12f033be-f0a6-4fff-8219-81a8819e3850"], -Cell[4921464, 92235, 615, 12, 70, "Output",ExpressionUUID->"cce9005c-a9af-4e51-886d-8230913f7a04"], -Cell[4922082, 92249, 513, 9, 70, "Output",ExpressionUUID->"877e1f2b-d1bd-4cb1-adcd-e5b13bbbeb6f"] +Cell[4878508, 91363, 1509, 37, 74, "Input",ExpressionUUID->"12f033be-f0a6-4fff-8219-81a8819e3850"], +Cell[4880020, 91402, 615, 12, 70, "Output",ExpressionUUID->"cce9005c-a9af-4e51-886d-8230913f7a04"], +Cell[4880638, 91416, 513, 9, 70, "Output",ExpressionUUID->"877e1f2b-d1bd-4cb1-adcd-e5b13bbbeb6f"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[4922656, 92265, 164, 3, 53, "Section",ExpressionUUID->"ad009b44-9684-4d7a-816a-3d7e17470d67"], +Cell[4881212, 91432, 164, 3, 53, "Section",ExpressionUUID->"ad009b44-9684-4d7a-816a-3d7e17470d67"], Cell[CellGroupData[{ -Cell[4922845, 92272, 622, 17, 52, "Input",ExpressionUUID->"0f1c98a3-43fd-4540-aefb-564369a4b97b"], -Cell[4923470, 92291, 210457, 4021, 388, "Output",ExpressionUUID->"69e43bd3-e415-4606-933d-197c24555ecc"], -Cell[5133930, 96314, 216955, 3901, 381, "Output",ExpressionUUID->"783d8194-8736-4abb-8796-34fcc398105d"] +Cell[4881401, 91439, 622, 17, 52, "Input",ExpressionUUID->"0f1c98a3-43fd-4540-aefb-564369a4b97b"], +Cell[4882026, 91458, 210457, 4021, 388, "Output",ExpressionUUID->"69e43bd3-e415-4606-933d-197c24555ecc"], +Cell[5092486, 95481, 216955, 3901, 381, "Output",ExpressionUUID->"783d8194-8736-4abb-8796-34fcc398105d"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[5350946, 100222, 151, 3, 98, "Title",ExpressionUUID->"b573437c-89db-4f4d-a3b8-3ca447533bd8"], +Cell[5309502, 99389, 151, 3, 98, "Title",ExpressionUUID->"b573437c-89db-4f4d-a3b8-3ca447533bd8"], Cell[CellGroupData[{ -Cell[5351122, 100229, 165, 3, 67, "Section",ExpressionUUID->"4bafd2ed-5d5e-49ff-af2c-b66598cb80d1"], -Cell[5351290, 100234, 2248, 60, 110, "Input",ExpressionUUID->"4e96eaec-94cc-465a-be70-f93c6b2a6381", +Cell[5309678, 99396, 165, 3, 67, "Section",ExpressionUUID->"4bafd2ed-5d5e-49ff-af2c-b66598cb80d1"], +Cell[5309846, 99401, 2248, 60, 110, "Input",ExpressionUUID->"4e96eaec-94cc-465a-be70-f93c6b2a6381", InitializationCell->True], Cell[CellGroupData[{ -Cell[5353563, 100298, 4457, 102, 388, "Input",ExpressionUUID->"ae76e7e8-1d11-4087-9183-aa7fe88d0cf4"], -Cell[5358023, 100402, 85984, 1535, 70, "Output",ExpressionUUID->"3a99289e-6458-489c-a7c6-a1a4a12c7439"] +Cell[5312119, 99465, 4457, 102, 388, "Input",ExpressionUUID->"ae76e7e8-1d11-4087-9183-aa7fe88d0cf4"], +Cell[5316579, 99569, 85984, 1535, 70, "Output",ExpressionUUID->"3a99289e-6458-489c-a7c6-a1a4a12c7439"] }, Open ]], Cell[CellGroupData[{ -Cell[5444044, 101942, 154, 3, 54, "Subsection",ExpressionUUID->"9107415c-fdc8-4f7d-89f9-b49684ad3106"], +Cell[5402600, 101109, 154, 3, 54, "Subsection",ExpressionUUID->"9107415c-fdc8-4f7d-89f9-b49684ad3106"], Cell[CellGroupData[{ -Cell[5444223, 101949, 1427, 36, 74, "Input",ExpressionUUID->"4600701a-7489-4aeb-8a2c-e1011a80c2b3"], -Cell[5445653, 101987, 663, 13, 70, "Output",ExpressionUUID->"ef4b16c5-7768-4478-8068-a614e3412c03"], -Cell[5446319, 102002, 584, 11, 70, "Output",ExpressionUUID->"9d217b2c-2c26-4bdd-883d-d77f0eaebb22"] +Cell[5402779, 101116, 1427, 36, 74, "Input",ExpressionUUID->"4600701a-7489-4aeb-8a2c-e1011a80c2b3"], +Cell[5404209, 101154, 663, 13, 70, "Output",ExpressionUUID->"ef4b16c5-7768-4478-8068-a614e3412c03"], +Cell[5404875, 101169, 584, 11, 70, "Output",ExpressionUUID->"9d217b2c-2c26-4bdd-883d-d77f0eaebb22"] }, Open ]], Cell[CellGroupData[{ -Cell[5446940, 102018, 1402, 35, 74, "Input",ExpressionUUID->"1c3f2e72-9de5-45ee-a0ca-7a44639c025a"], -Cell[5448345, 102055, 596, 12, 70, "Output",ExpressionUUID->"42d4d23d-7f9e-414f-98ea-bd36b91fb3f8"], -Cell[5448944, 102069, 497, 9, 70, "Output",ExpressionUUID->"d53f70f2-120a-43af-8af0-0f984237d352"] +Cell[5405496, 101185, 1402, 35, 74, "Input",ExpressionUUID->"1c3f2e72-9de5-45ee-a0ca-7a44639c025a"], +Cell[5406901, 101222, 596, 12, 70, "Output",ExpressionUUID->"42d4d23d-7f9e-414f-98ea-bd36b91fb3f8"], +Cell[5407500, 101236, 497, 9, 70, "Output",ExpressionUUID->"d53f70f2-120a-43af-8af0-0f984237d352"] }, Open ]], Cell[CellGroupData[{ -Cell[5449478, 102083, 1453, 36, 74, "Input",ExpressionUUID->"0da9c2ab-13b6-49bf-acbb-14c13d6c25b7"], -Cell[5450934, 102121, 640, 13, 70, "Output",ExpressionUUID->"a14845a1-c90b-48d4-91b9-acd682a39561"], -Cell[5451577, 102136, 540, 10, 70, "Output",ExpressionUUID->"ecd2eaeb-7942-4a84-8126-e847f4a7cbb6"] +Cell[5408034, 101250, 1453, 36, 74, "Input",ExpressionUUID->"0da9c2ab-13b6-49bf-acbb-14c13d6c25b7"], +Cell[5409490, 101288, 640, 13, 70, "Output",ExpressionUUID->"a14845a1-c90b-48d4-91b9-acd682a39561"], +Cell[5410133, 101303, 540, 10, 70, "Output",ExpressionUUID->"ecd2eaeb-7942-4a84-8126-e847f4a7cbb6"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[5452178, 102153, 164, 3, 53, "Section",ExpressionUUID->"0e1e9409-cd66-4922-a1ed-71fe5827c12e"], +Cell[5410734, 101320, 164, 3, 53, "Section",ExpressionUUID->"0e1e9409-cd66-4922-a1ed-71fe5827c12e"], Cell[CellGroupData[{ -Cell[5452367, 102160, 619, 17, 52, "Input",ExpressionUUID->"1a55c1f0-9585-4e5a-a2e3-f739cfe0ceb8"], -Cell[5452989, 102179, 207428, 3967, 388, "Output",ExpressionUUID->"d590b778-b33c-42ba-9bdb-13035d454a23"], -Cell[5660420, 106148, 211584, 3811, 381, "Output",ExpressionUUID->"b5179672-4739-44b4-8caf-79411418e259"] +Cell[5410923, 101327, 619, 17, 52, "Input",ExpressionUUID->"1a55c1f0-9585-4e5a-a2e3-f739cfe0ceb8"], +Cell[5411545, 101346, 207428, 3967, 388, "Output",ExpressionUUID->"d590b778-b33c-42ba-9bdb-13035d454a23"], +Cell[5618976, 105315, 211584, 3811, 381, "Output",ExpressionUUID->"b5179672-4739-44b4-8caf-79411418e259"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[5872065, 109966, 153, 3, 98, "Title",ExpressionUUID->"8a4ffb97-273c-457a-86b2-f36b838038c3"], +Cell[5830621, 109133, 153, 3, 98, "Title",ExpressionUUID->"8a4ffb97-273c-457a-86b2-f36b838038c3"], Cell[CellGroupData[{ -Cell[5872243, 109973, 165, 3, 67, "Section",ExpressionUUID->"410ead3f-69f8-455a-b141-b8c6bb31b59e"], -Cell[5872411, 109978, 2313, 61, 110, "Input",ExpressionUUID->"7a81855c-52b6-4da7-96a1-7b16776ec89e", +Cell[5830799, 109140, 165, 3, 67, "Section",ExpressionUUID->"410ead3f-69f8-455a-b141-b8c6bb31b59e"], +Cell[5830967, 109145, 2313, 61, 110, "Input",ExpressionUUID->"7a81855c-52b6-4da7-96a1-7b16776ec89e", InitializationCell->True], Cell[CellGroupData[{ -Cell[5874749, 110043, 4461, 103, 388, "Input",ExpressionUUID->"e513bca1-de00-41f7-9726-aa7ff84e1ab0"], -Cell[5879213, 110148, 194680, 3554, 70, "Output",ExpressionUUID->"5b76b829-9e42-4b23-bab4-b22fa59e1061"] +Cell[5833305, 109210, 4461, 103, 388, "Input",ExpressionUUID->"e513bca1-de00-41f7-9726-aa7ff84e1ab0"], +Cell[5837769, 109315, 194680, 3554, 70, "Output",ExpressionUUID->"5b76b829-9e42-4b23-bab4-b22fa59e1061"] }, Open ]], Cell[CellGroupData[{ -Cell[6073930, 113707, 154, 3, 54, "Subsection",ExpressionUUID->"129935a0-86a7-4051-bdca-a2a54da66afe"], +Cell[6032486, 112874, 154, 3, 54, "Subsection",ExpressionUUID->"129935a0-86a7-4051-bdca-a2a54da66afe"], Cell[CellGroupData[{ -Cell[6074109, 113714, 1428, 36, 74, "Input",ExpressionUUID->"c7e5d329-77b0-4dd0-88db-00aa2b589947"], -Cell[6075540, 113752, 639, 13, 70, "Output",ExpressionUUID->"c1d8c78f-a876-45d1-b94a-306c6623446a"], -Cell[6076182, 113767, 561, 11, 70, "Output",ExpressionUUID->"534dec4d-c8a8-41b4-b1df-829a5bedcb05"] +Cell[6032665, 112881, 1428, 36, 74, "Input",ExpressionUUID->"c7e5d329-77b0-4dd0-88db-00aa2b589947"], +Cell[6034096, 112919, 639, 13, 70, "Output",ExpressionUUID->"c1d8c78f-a876-45d1-b94a-306c6623446a"], +Cell[6034738, 112934, 561, 11, 70, "Output",ExpressionUUID->"534dec4d-c8a8-41b4-b1df-829a5bedcb05"] }, Open ]], Cell[CellGroupData[{ -Cell[6076780, 113783, 1404, 35, 74, "Input",ExpressionUUID->"a70de1ce-8526-4071-a1eb-123213e8a509"], -Cell[6078187, 113820, 572, 12, 70, "Output",ExpressionUUID->"17f5277b-7537-45cc-98ad-0c06c79b498a"], -Cell[6078762, 113834, 474, 9, 70, "Output",ExpressionUUID->"196baea8-6606-49db-8dad-e69cb57a70cd"] +Cell[6035336, 112950, 1404, 35, 74, "Input",ExpressionUUID->"a70de1ce-8526-4071-a1eb-123213e8a509"], +Cell[6036743, 112987, 572, 12, 70, "Output",ExpressionUUID->"17f5277b-7537-45cc-98ad-0c06c79b498a"], +Cell[6037318, 113001, 474, 9, 70, "Output",ExpressionUUID->"196baea8-6606-49db-8dad-e69cb57a70cd"] }, Open ]], Cell[CellGroupData[{ -Cell[6079273, 113848, 1455, 36, 74, "Input",ExpressionUUID->"edc830ee-5ccd-4b26-8a91-1e951afe5bc6"], -Cell[6080731, 113886, 614, 12, 70, "Output",ExpressionUUID->"6803d587-3ecf-4545-95bd-66c4d6c96c51"], -Cell[6081348, 113900, 512, 9, 70, "Output",ExpressionUUID->"e6f4d892-0b71-4ab9-852e-de9fe26d5c8d"] +Cell[6037829, 113015, 1455, 36, 74, "Input",ExpressionUUID->"edc830ee-5ccd-4b26-8a91-1e951afe5bc6"], +Cell[6039287, 113053, 614, 12, 70, "Output",ExpressionUUID->"6803d587-3ecf-4545-95bd-66c4d6c96c51"], +Cell[6039904, 113067, 512, 9, 70, "Output",ExpressionUUID->"e6f4d892-0b71-4ab9-852e-de9fe26d5c8d"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[6081921, 113916, 164, 3, 53, "Section",ExpressionUUID->"74affff8-cb32-47ad-9136-4b7cf83078b4"], +Cell[6040477, 113083, 164, 3, 53, "Section",ExpressionUUID->"74affff8-cb32-47ad-9136-4b7cf83078b4"], Cell[CellGroupData[{ -Cell[6082110, 113923, 625, 17, 52, "Input",ExpressionUUID->"2ca76e5a-82f7-4b88-9690-3ef64b3edef6"], -Cell[6082738, 113942, 210164, 4016, 388, "Output",ExpressionUUID->"66e8f57e-2b66-400e-ab31-860249320072"], -Cell[6292905, 117960, 216236, 3891, 381, "Output",ExpressionUUID->"cce4bd50-3b59-4bd6-91a7-6f1d5fa85aae"] +Cell[6040666, 113090, 625, 17, 52, "Input",ExpressionUUID->"2ca76e5a-82f7-4b88-9690-3ef64b3edef6"], +Cell[6041294, 113109, 210164, 4016, 388, "Output",ExpressionUUID->"66e8f57e-2b66-400e-ab31-860249320072"], +Cell[6251461, 117127, 216236, 3891, 381, "Output",ExpressionUUID->"cce4bd50-3b59-4bd6-91a7-6f1d5fa85aae"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[6509202, 121858, 151, 3, 98, "Title",ExpressionUUID->"3aa4c3c7-fc6f-42ef-aa94-929bb1c5aa0a"], +Cell[6467758, 121025, 151, 3, 98, "Title",ExpressionUUID->"3aa4c3c7-fc6f-42ef-aa94-929bb1c5aa0a"], Cell[CellGroupData[{ -Cell[6509378, 121865, 165, 3, 67, "Section",ExpressionUUID->"b03eb6df-71b5-4406-a539-f8a9bb649f41"], -Cell[6509546, 121870, 2251, 60, 110, "Input",ExpressionUUID->"bb79f009-b78a-42cd-a70b-1c427ab4c78f", +Cell[6467934, 121032, 165, 3, 67, "Section",ExpressionUUID->"b03eb6df-71b5-4406-a539-f8a9bb649f41"], +Cell[6468102, 121037, 2251, 60, 110, "Input",ExpressionUUID->"bb79f009-b78a-42cd-a70b-1c427ab4c78f", InitializationCell->True], Cell[CellGroupData[{ -Cell[6511822, 121934, 4457, 103, 388, "Input",ExpressionUUID->"274b1a81-3d1f-4d79-ba2b-e96aee7f03a2"], -Cell[6516282, 122039, 189652, 3471, 70, "Output",ExpressionUUID->"1338e4c3-b30d-4b55-bedf-b6646bd68e89"] +Cell[6470378, 121101, 4457, 103, 388, "Input",ExpressionUUID->"274b1a81-3d1f-4d79-ba2b-e96aee7f03a2"], +Cell[6474838, 121206, 189652, 3471, 70, "Output",ExpressionUUID->"1338e4c3-b30d-4b55-bedf-b6646bd68e89"] }, Open ]], Cell[CellGroupData[{ -Cell[6705971, 125515, 154, 3, 54, "Subsection",ExpressionUUID->"405e8c59-70fc-417a-adb3-16717ec9ddcc"], +Cell[6664527, 124682, 154, 3, 54, "Subsection",ExpressionUUID->"405e8c59-70fc-417a-adb3-16717ec9ddcc"], Cell[CellGroupData[{ -Cell[6706150, 125522, 1430, 36, 74, "Input",ExpressionUUID->"efaa24f1-ad32-4652-afa8-24a855b34924"], -Cell[6707583, 125560, 642, 13, 70, "Output",ExpressionUUID->"87a1d3d7-6c3b-4d92-8d5b-2d951cfff87f"], -Cell[6708228, 125575, 562, 11, 70, "Output",ExpressionUUID->"de8a4633-ede0-4061-b378-e4918c2a6cbb"] +Cell[6664706, 124689, 1430, 36, 74, "Input",ExpressionUUID->"efaa24f1-ad32-4652-afa8-24a855b34924"], +Cell[6666139, 124727, 642, 13, 70, "Output",ExpressionUUID->"87a1d3d7-6c3b-4d92-8d5b-2d951cfff87f"], +Cell[6666784, 124742, 562, 11, 70, "Output",ExpressionUUID->"de8a4633-ede0-4061-b378-e4918c2a6cbb"] }, Open ]], Cell[CellGroupData[{ -Cell[6708827, 125591, 1405, 35, 74, "Input",ExpressionUUID->"bd3953bd-1678-4443-b5d6-53b1ca3214af"], -Cell[6710235, 125628, 576, 12, 70, "Output",ExpressionUUID->"c01fcb6f-acf1-4d41-92b7-333682a3f8ab"], -Cell[6710814, 125642, 476, 9, 70, "Output",ExpressionUUID->"50431e47-4cc6-44ce-9099-2244245cb425"] +Cell[6667383, 124758, 1405, 35, 74, "Input",ExpressionUUID->"bd3953bd-1678-4443-b5d6-53b1ca3214af"], +Cell[6668791, 124795, 576, 12, 70, "Output",ExpressionUUID->"c01fcb6f-acf1-4d41-92b7-333682a3f8ab"], +Cell[6669370, 124809, 476, 9, 70, "Output",ExpressionUUID->"50431e47-4cc6-44ce-9099-2244245cb425"] }, Open ]], Cell[CellGroupData[{ -Cell[6711327, 125656, 1454, 36, 74, "Input",ExpressionUUID->"ec71f8b9-3a2f-4d82-9674-291fd3dcb70b"], -Cell[6712784, 125694, 613, 12, 70, "Output",ExpressionUUID->"ae75c011-44eb-4b20-af37-53a4f93bcad6"], -Cell[6713400, 125708, 512, 9, 70, "Output",ExpressionUUID->"13f1ff22-74ce-454f-a4a6-b684932eff34"] +Cell[6669883, 124823, 1454, 36, 74, "Input",ExpressionUUID->"ec71f8b9-3a2f-4d82-9674-291fd3dcb70b"], +Cell[6671340, 124861, 613, 12, 70, "Output",ExpressionUUID->"ae75c011-44eb-4b20-af37-53a4f93bcad6"], +Cell[6671956, 124875, 512, 9, 70, "Output",ExpressionUUID->"13f1ff22-74ce-454f-a4a6-b684932eff34"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[6713973, 125724, 164, 3, 53, "Section",ExpressionUUID->"310e5587-f9ab-4373-b92e-8e87daed147b"], +Cell[6672529, 124891, 164, 3, 53, "Section",ExpressionUUID->"310e5587-f9ab-4373-b92e-8e87daed147b"], Cell[CellGroupData[{ -Cell[6714162, 125731, 619, 17, 52, "Input",ExpressionUUID->"84daa51b-01a0-4d42-8143-288ce54cb6c0"], -Cell[6714784, 125750, 207487, 3973, 388, "Output",ExpressionUUID->"60eb4f65-c49d-449b-85c1-00047564470d"], -Cell[6922274, 129725, 211147, 3811, 381, "Output",ExpressionUUID->"983defbc-c3e3-4ad4-b590-81aa75912041"] +Cell[6672718, 124898, 619, 17, 52, "Input",ExpressionUUID->"84daa51b-01a0-4d42-8143-288ce54cb6c0"], +Cell[6673340, 124917, 207487, 3973, 388, "Output",ExpressionUUID->"60eb4f65-c49d-449b-85c1-00047564470d"], +Cell[6880830, 128892, 211147, 3811, 381, "Output",ExpressionUUID->"983defbc-c3e3-4ad4-b590-81aa75912041"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[7133482, 133543, 151, 3, 98, "Title",ExpressionUUID->"3f1c5daa-9204-4fa2-aff4-6501ee71088b"], +Cell[7092038, 132710, 151, 3, 98, "Title",ExpressionUUID->"3f1c5daa-9204-4fa2-aff4-6501ee71088b"], Cell[CellGroupData[{ -Cell[7133658, 133550, 165, 3, 67, "Section",ExpressionUUID->"8f74d292-59d5-45cb-a51d-f25b4743cd6f"], -Cell[7133826, 133555, 2201, 59, 110, "Input",ExpressionUUID->"52f42957-7028-4c6a-87b7-6d3cbef3d400", +Cell[7092214, 132717, 165, 3, 67, "Section",ExpressionUUID->"8f74d292-59d5-45cb-a51d-f25b4743cd6f"], +Cell[7092382, 132722, 2201, 59, 110, "Input",ExpressionUUID->"52f42957-7028-4c6a-87b7-6d3cbef3d400", InitializationCell->True], Cell[CellGroupData[{ -Cell[7136052, 133618, 4445, 102, 388, "Input",ExpressionUUID->"2d2e9e09-7384-4679-a741-81624c7ba94e"], -Cell[7140500, 133722, 188400, 3448, 70, "Output",ExpressionUUID->"e0d35a7a-e60a-4825-97ce-f769d2e8819b"] +Cell[7094608, 132785, 4445, 102, 388, "Input",ExpressionUUID->"2d2e9e09-7384-4679-a741-81624c7ba94e"], +Cell[7099056, 132889, 188400, 3448, 70, "Output",ExpressionUUID->"e0d35a7a-e60a-4825-97ce-f769d2e8819b"] }, Open ]], Cell[CellGroupData[{ -Cell[7328937, 137175, 154, 3, 54, "Subsection",ExpressionUUID->"80951159-85f4-4b2a-b4e4-386ff0b4b2ed"], +Cell[7287493, 136342, 154, 3, 54, "Subsection",ExpressionUUID->"80951159-85f4-4b2a-b4e4-386ff0b4b2ed"], Cell[CellGroupData[{ -Cell[7329116, 137182, 1427, 36, 74, "Input",ExpressionUUID->"e557ec2c-a2fe-4826-972c-21055ce691c0"], -Cell[7330546, 137220, 643, 13, 70, "Output",ExpressionUUID->"a7a842c5-1d78-4608-9a8b-4b1e7b266de8"], -Cell[7331192, 137235, 563, 11, 70, "Output",ExpressionUUID->"3fb2cead-2830-4ed6-bb75-b0b71c8aef75"] +Cell[7287672, 136349, 1427, 36, 74, "Input",ExpressionUUID->"e557ec2c-a2fe-4826-972c-21055ce691c0"], +Cell[7289102, 136387, 643, 13, 70, "Output",ExpressionUUID->"a7a842c5-1d78-4608-9a8b-4b1e7b266de8"], +Cell[7289748, 136402, 563, 11, 70, "Output",ExpressionUUID->"3fb2cead-2830-4ed6-bb75-b0b71c8aef75"] }, Open ]], Cell[CellGroupData[{ -Cell[7331792, 137251, 1404, 35, 74, "Input",ExpressionUUID->"7968e064-d590-43d4-899b-e2830156ec83"], -Cell[7333199, 137288, 578, 12, 70, "Output",ExpressionUUID->"512583a9-9f15-4b99-98cc-16127be0e5b4"], -Cell[7333780, 137302, 478, 9, 70, "Output",ExpressionUUID->"991d6277-e862-4fce-b5d0-67ae11c9a75e"] +Cell[7290348, 136418, 1404, 35, 74, "Input",ExpressionUUID->"7968e064-d590-43d4-899b-e2830156ec83"], +Cell[7291755, 136455, 578, 12, 70, "Output",ExpressionUUID->"512583a9-9f15-4b99-98cc-16127be0e5b4"], +Cell[7292336, 136469, 478, 9, 70, "Output",ExpressionUUID->"991d6277-e862-4fce-b5d0-67ae11c9a75e"] }, Open ]], Cell[CellGroupData[{ -Cell[7334295, 137316, 1455, 36, 74, "Input",ExpressionUUID->"9a668e93-ff40-4858-83e4-377dc9a38be5"], -Cell[7335753, 137354, 616, 12, 70, "Output",ExpressionUUID->"caf6f46c-9ea7-4b5f-bf09-48cd7f10b6ba"], -Cell[7336372, 137368, 513, 9, 70, "Output",ExpressionUUID->"cf3273dd-945b-4788-8907-a20268750a26"] +Cell[7292851, 136483, 1455, 36, 74, "Input",ExpressionUUID->"9a668e93-ff40-4858-83e4-377dc9a38be5"], +Cell[7294309, 136521, 616, 12, 70, "Output",ExpressionUUID->"caf6f46c-9ea7-4b5f-bf09-48cd7f10b6ba"], +Cell[7294928, 136535, 513, 9, 70, "Output",ExpressionUUID->"cf3273dd-945b-4788-8907-a20268750a26"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[7336946, 137384, 164, 3, 53, "Section",ExpressionUUID->"9d03b122-a5b6-4976-ad57-942073f6d9d0"], +Cell[7295502, 136551, 164, 3, 53, "Section",ExpressionUUID->"9d03b122-a5b6-4976-ad57-942073f6d9d0"], Cell[CellGroupData[{ -Cell[7337135, 137391, 617, 17, 52, "Input",ExpressionUUID->"22c90b4e-fec5-4cae-9b3f-6054fc1e0e89"], -Cell[7337755, 137410, 206965, 3961, 388, "Output",ExpressionUUID->"2e881186-68b5-4d7f-804f-5a40c0961d44"], -Cell[7544723, 141373, 209866, 3781, 380, "Output",ExpressionUUID->"3d4cbddb-11f4-42dd-bef6-bd86d3b5a2ff"] +Cell[7295691, 136558, 617, 17, 52, "Input",ExpressionUUID->"22c90b4e-fec5-4cae-9b3f-6054fc1e0e89"], +Cell[7296311, 136577, 206965, 3961, 388, "Output",ExpressionUUID->"2e881186-68b5-4d7f-804f-5a40c0961d44"], +Cell[7503279, 140540, 209866, 3781, 380, "Output",ExpressionUUID->"3d4cbddb-11f4-42dd-bef6-bd86d3b5a2ff"] }, Open ]] }, Open ]] }, Open ]]