Relabelled action to Sχ

1 files changed, 171 insertions, 181 deletions

diff --git a/figures.nb b/figures.nb
index 95780cc..1c534ec 100644
--- a/figures.nb
+++ b/figures.nb
@@ -10,10 +10,10 @@
 NotebookFileLineBreakTest
 NotebookFileLineBreakTest
 NotebookDataPosition[       158,          7]
-NotebookDataLength[  10553703,     193003]
-NotebookOptionsPosition[  10538451,     192758]
-NotebookOutlinePosition[  10538849,     192774]
-CellTagsIndexPosition[  10538806,     192771]
+NotebookDataLength[  10553611,     192993]
+NotebookOptionsPosition[  10538359,     192748]
+NotebookOutlinePosition[  10538757,     192764]
+CellTagsIndexPosition[  10538714,     192761]
 WindowFrame->Normal*)
 
 (* Beginning of Notebook Content *)
@@ -554,8 +554,8 @@ Cell[BoxData[
      RowBox[{"{", 
       RowBox[{"m", ",", 
        RowBox[{
-        SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "[", "m", 
-        "]"}]}], "}"}]}], ",", 
+        SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "[", "m", "]"}]}], 
+      "}"}]}], ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"{", 
       RowBox[{
@@ -668,9 +668,9 @@ q\",FontSlant->\"Italic\"]\)) = \!\(\*StyleBox[\"q\",FontSlant->\"Italic\"]\)\
    3.933649406292515*^9, 3.933649406339818*^9}, {3.933649450189885*^9, 
    3.933649450306967*^9}, {3.933669603756253*^9, 3.93366960474959*^9}, {
    3.933763782188147*^9, 3.933763853668864*^9}, {3.933763889963334*^9, 
-   3.9337638968932343`*^9}},
+   3.9337638968932343`*^9}, {3.9346177266119347`*^9, 3.934617726812172*^9}},
  CellLabel->
-  "In[352]:=",ExpressionUUID->"6c182b3c-b61b-4da5-97eb-545f093d6397"],
+  "In[425]:=",ExpressionUUID->"6c182b3c-b61b-4da5-97eb-545f093d6397"],
 
 Cell[BoxData[
  GraphicsBox[
@@ -3747,7 +3747,7 @@ StyleBox[\\\"q\\\",FontSlant->\\\"Italic\\\"]\\)) = \\!\\(\\*StyleBox[\\\"q\\\
      FormBox[
       TagBox[
        RowBox[{
-         SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "(", 
+         SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "(", 
          TagBox[
           TagBox["m", HoldForm], HoldForm], ")"}], HoldForm], 
       TraditionalForm], None}, {
@@ -3806,9 +3806,9 @@ StyleBox[\\\"q\\\",FontSlant->\\\"Italic\\\"]\\)) = \\!\\(\\*StyleBox[\\\"q\\\
    3.93364868051263*^9}, 3.933648724316554*^9, 3.933649364304496*^9, 
    3.933649407517312*^9, 3.93364945127024*^9, 3.933669606189589*^9, {
    3.933763814158901*^9, 3.933763845794353*^9}, 3.9337639997438083`*^9, 
-   3.9338438381602073`*^9, 3.933845140162109*^9},
+   3.9338438381602073`*^9, 3.933845140162109*^9, 3.934617728107791*^9},
  CellLabel->
-  "Out[352]=",ExpressionUUID->"92c1128c-8ae6-43fd-b1e6-03e770bd251a"]
+  "Out[425]=",ExpressionUUID->"aa34ee8b-81c2-4f88-9ac7-cc32bcaf34a7"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -3866,8 +3866,7 @@ Cell[BoxData[{
        RowBox[{"Style", "[", 
         RowBox[{
          RowBox[{
-          SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "[", "m", 
-          "]"}], ",", 
+          SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "[", "m", "]"}], ",", 
          RowBox[{"FontOpacity", "->", "0"}]}], "]"}]}], "}"}]}], ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"{", 
@@ -3991,8 +3990,10 @@ q\",FontSlant->\"Italic\"]\)) = \!\(\*FractionBox[\(1\), \
    3.933648715481228*^9, 3.933648715577067*^9}, {3.933649367834863*^9, 
    3.9336493690019407`*^9}, {3.933649400492437*^9, 3.933649400539138*^9}, {
    3.9336494473909883`*^9, 3.933649447500427*^9}, {3.93366961091483*^9, 
-   3.933669611694421*^9}, {3.933764016856601*^9, 3.933764023559519*^9}},
- CellLabel->"In[18]:=",ExpressionUUID->"987acbda-9443-4a50-9527-bdd438ec8a24"],
+   3.933669611694421*^9}, {3.933764016856601*^9, 3.933764023559519*^9}, {
+   3.934617731755888*^9, 3.934617731978382*^9}},
+ CellLabel->
+  "In[426]:=",ExpressionUUID->"987acbda-9443-4a50-9527-bdd438ec8a24"],
 
 Cell[BoxData[
  GraphicsBox[
@@ -6413,7 +6414,7 @@ Cell[BoxData[{
  CellChangeTimes->{{3.933648344039223*^9, 3.933648353137401*^9}, {
   3.9337640740719557`*^9, 3.9337640872245827`*^9}},
  CellLabel->"In[21]:=",ExpressionUUID->"718f433c-5ec4-4bac-860a-5bace6d1b65e"]
-}, Closed]],
+}, Open  ]],
 
 Cell[CellGroupData[{
 
@@ -6443,8 +6444,8 @@ Cell[BoxData[{
      RowBox[{"{", 
       RowBox[{"m", ",", 
        RowBox[{
-        SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "[", "m", 
-        "]"}]}], "}"}]}], ",", 
+        SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "[", "m", "]"}]}], 
+      "}"}]}], ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"{", 
       RowBox[{
@@ -6628,9 +6629,9 @@ Cell[BoxData[{
    3.933784296166341*^9, 3.933784298933405*^9}, {3.9337844106187143`*^9, 
    3.933784429085985*^9}, {3.933784466147958*^9, 3.933784466547345*^9}, {
    3.9337845591925*^9, 3.933784559391575*^9}, {3.933784672620721*^9, 
-   3.9337846733082037`*^9}},
+   3.9337846733082037`*^9}, {3.934617697627763*^9, 3.934617699098098*^9}},
  CellLabel->
-  "In[385]:=",ExpressionUUID->"5506e17b-9ca1-45dd-9a22-41bf59df28ce"],
+  "In[412]:=",ExpressionUUID->"5506e17b-9ca1-45dd-9a22-41bf59df28ce"],
 
 Cell[BoxData[
  GraphicsBox[
@@ -6985,7 +6986,7 @@ JrPXy/UGQKy/x9uqsxH/B43AQ74=
      FormBox[
       TagBox[
        RowBox[{
-         SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "(", 
+         SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "(", 
          TagBox[
           TagBox["m", HoldForm], HoldForm], ")"}], HoldForm], 
       TraditionalForm], None}, {
@@ -7086,9 +7087,9 @@ JrPXy/UGQKy/x9uqsxH/B43AQ74=
    3.933765135446073*^9, 3.933784003695829*^9, {3.93378409651264*^9, 
    3.933784142748611*^9}, 3.933784299557036*^9, {3.933784411901557*^9, 
    3.93378442948652*^9}, 3.933784466996705*^9, 3.933784559943639*^9, 
-   3.933784673696732*^9, 3.9346175169850693`*^9},
+   3.933784673696732*^9, 3.934617699659974*^9},
  CellLabel->
-  "Out[386]=",ExpressionUUID->"8f9cb3fb-79d6-4127-86da-ebb91a796411"]
+  "Out[413]=",ExpressionUUID->"f02fb6a6-e405-4836-80f0-e33cd4587ade"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -7114,8 +7115,7 @@ Cell[BoxData[{
        RowBox[{"Style", "[", 
         RowBox[{
          RowBox[{
-          SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "[", "m", 
-          "]"}], ",", 
+          SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "[", "m", "]"}], ",", 
          RowBox[{"FontOpacity", "->", "0"}]}], "]"}]}], "}"}]}], ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"{", 
@@ -7304,9 +7304,9 @@ Cell[BoxData[{
    3.933784156855558*^9, 3.933784160447575*^9}, {3.933784257511009*^9, 
    3.933784279612458*^9}, {3.933784443966354*^9, 3.933784470564404*^9}, {
    3.933784594590864*^9, 3.933784608066274*^9}, {3.933784669012691*^9, 
-   3.9337846690762157`*^9}},
+   3.9337846690762157`*^9}, {3.9346177039305887`*^9, 3.934617704195477*^9}},
  CellLabel->
-  "In[387]:=",ExpressionUUID->"92265c04-e236-4e0e-8f2d-85dfff966601"],
+  "In[414]:=",ExpressionUUID->"92265c04-e236-4e0e-8f2d-85dfff966601"],
 
 Cell[BoxData[
  GraphicsBox[
@@ -7474,7 +7474,7 @@ DKRAw5xR5z/4ug5iGJbNv+xa4itsyOc/rBxaZDvfz7/miLrX
       TagBox[
        StyleBox[
         RowBox[{
-          SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "(", 
+          SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "(", 
           TagBox[
            TagBox["m", HoldForm], HoldForm], ")"}], FontOpacity -> 0, 
         StripOnInput -> False], HoldForm], TraditionalForm], None}, {
@@ -7578,9 +7578,9 @@ DKRAw5xR5z/4ug5iGJbNv+xa4itsyOc/rBxaZDvfz7/miLrX
    3.9337652005245867`*^9, 3.933765275922225*^9, {3.9337841574614983`*^9, 
    3.933784160879216*^9}, {3.933784257984647*^9, 3.933784279966932*^9}, {
    3.933784446973759*^9, 3.933784474108399*^9}, {3.933784595774071*^9, 
-   3.933784608397269*^9}, 3.933784669425819*^9, 3.9346175171887007`*^9},
+   3.933784608397269*^9}, 3.933784669425819*^9, 3.934617705031602*^9},
  CellLabel->
-  "Out[388]=",ExpressionUUID->"b9a59dcc-69cd-40a7-876a-5bc308cb6a80"]
+  "Out[415]=",ExpressionUUID->"53525ec3-63aa-4102-8c66-00e0698a79ca"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -7606,8 +7606,7 @@ Cell[BoxData[{
        RowBox[{"Style", "[", 
         RowBox[{
          RowBox[{
-          SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "[", "m", 
-          "]"}], ",", 
+          SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "[", "m", "]"}], ",", 
          RowBox[{"FontOpacity", "->", "0"}]}], "]"}]}], "}"}]}], ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"{", 
@@ -7755,9 +7754,9 @@ Cell[BoxData[{
    3.93378417626397*^9, 3.933784180535683*^9}, {3.933784287950728*^9, 
    3.933784289628522*^9}, {3.933784477380589*^9, 3.933784484027956*^9}, {
    3.933784613469983*^9, 3.9337846136979327`*^9}, {3.933784665371888*^9, 
-   3.933784665491724*^9}},
+   3.933784665491724*^9}, {3.934617707522828*^9, 3.934617707763233*^9}},
  CellLabel->
-  "In[389]:=",ExpressionUUID->"2024fdeb-ff4f-4e26-834d-bece770e0a79"],
+  "In[416]:=",ExpressionUUID->"2024fdeb-ff4f-4e26-834d-bece770e0a79"],
 
 Cell[BoxData[
  GraphicsBox[
@@ -8156,7 +8155,7 @@ AIACvSA=
       TagBox[
        StyleBox[
         RowBox[{
-          SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "(", 
+          SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "(", 
           TagBox[
            TagBox["m", HoldForm], HoldForm], ")"}], FontOpacity -> 0, 
         StripOnInput -> False], HoldForm], TraditionalForm], None}, {
@@ -8244,9 +8243,9 @@ AIACvSA=
    3.933756917774147*^9}, {3.933757096109779*^9, 3.933757157279377*^9}, {
    3.933765252731138*^9, 3.933765276684458*^9}, {3.933784177228798*^9, 
    3.933784180954748*^9}, 3.933784289949884*^9, 3.933784484480413*^9, 
-   3.933784614122253*^9, 3.933784665873393*^9},
+   3.933784614122253*^9, 3.933784665873393*^9, 3.934617708212726*^9},
  CellLabel->
-  "Out[116]=",ExpressionUUID->"9103c484-5e87-4c28-90d1-8b05b08fa4f0"]
+  "Out[417]=",ExpressionUUID->"19c70bd8-82b7-4eb1-9dbb-9ea50e360376"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -8272,8 +8271,7 @@ Cell[BoxData[{
        RowBox[{"Style", "[", 
         RowBox[{
          RowBox[{
-          SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "[", "m", 
-          "]"}], ",", 
+          SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "[", "m", "]"}], ",", 
          RowBox[{"FontOpacity", "->", "0"}]}], "]"}]}], "}"}]}], ",", 
     RowBox[{"LabelStyle", "->", 
      RowBox[{"{", 
@@ -8337,13 +8335,7 @@ Cell[BoxData[{
        RowBox[{"Text", "[", 
         RowBox[{
          RowBox[{"Style", "[", 
-          RowBox[{
-           RowBox[{"Style", "[", 
-            RowBox[{"\"\<Unsat\>\"", ",", 
-             RowBox[{"FontVariations", "->", 
-              RowBox[{"{", 
-               RowBox[{"\"\<CapsType\>\"", "->", "\"\<SmallCaps\>\""}], 
-               "}"}]}]}], "]"}], ",", 
+          RowBox[{"\"\<UNSAT\>\"", ",", 
            RowBox[{"FontFamily", "->", "\"\<BitstreamCharter\>\""}], ",", 
            RowBox[{"FontSize", "->", "12"}], ",", "Black", ",", "Bold"}], 
           "]"}], ",", 
@@ -8396,9 +8388,10 @@ Cell[BoxData[{
    3.93378417626397*^9, 3.933784229521571*^9}, {3.933784307258991*^9, 
    3.933784313101503*^9}, {3.9337844944861517`*^9, 3.933784502900514*^9}, {
    3.9337846602517776`*^9, 3.9337846611710596`*^9}, {3.934617483517872*^9, 
-   3.934617507378639*^9}},
+   3.934617507378639*^9}, {3.9346175889111137`*^9, 3.934617608103231*^9}, {
+   3.934617713348909*^9, 3.934617713619424*^9}},
  CellLabel->
-  "In[383]:=",ExpressionUUID->"b3fc4f55-4c0b-4c22-9d55-e6dad1b1d50e"],
+  "In[418]:=",ExpressionUUID->"b3fc4f55-4c0b-4c22-9d55-e6dad1b1d50e"],
 
 Cell[BoxData[
  GraphicsBox[
@@ -8775,10 +8768,7 @@ YMcuw7wlRj2oNLNmQ0TDa2D1Tq3RaOpBD9Vs7Ld1NcD/APH4Ad0=
     InsetBox[
      FormBox[
       StyleBox[
-       StyleBox[
-       "\"Unsat\"", FontVariations -> {"CapsType" -> "SmallCaps"}, 
-        StripOnInput -> False], FontFamily -> "BitstreamCharter", FontSize -> 
-       12, 
+      "\"UNSAT\"", FontFamily -> "BitstreamCharter", FontSize -> 12, 
        GrayLevel[0], Bold, StripOnInput -> False], TraditionalForm], 
      Scaled[{0.07, 0.02}], 
      ImageScaled[{0, 0}]]},
@@ -8788,7 +8778,7 @@ YMcuw7wlRj2oNLNmQ0TDa2D1Tq3RaOpBD9Vs7Ld1NcD/APH4Ad0=
       TagBox[
        StyleBox[
         RowBox[{
-          SubscriptBox["\[ScriptCapitalS]", "\[CapitalOmega]"], "(", 
+          SubscriptBox["\[ScriptCapitalS]", "\[Chi]"], "(", 
           TagBox[
            TagBox["m", HoldForm], HoldForm], ")"}], FontOpacity -> 0, 
         StripOnInput -> False], HoldForm], TraditionalForm], None}, {
@@ -8866,9 +8856,9 @@ YMcuw7wlRj2oNLNmQ0TDa2D1Tq3RaOpBD9Vs7Ld1NcD/APH4Ad0=
    3.933756917774147*^9}, {3.933757096109779*^9, 3.933757157279377*^9}, {
    3.933765252731138*^9, 3.933765276684458*^9}, {3.933784177228798*^9, 
    3.933784229910527*^9}, 3.933784313690855*^9, 3.933784503398113*^9, 
-   3.933784661793009*^9, 3.934617507842223*^9},
+   3.933784661793009*^9, 3.934617614801477*^9, 3.934617714060598*^9},
  CellLabel->
-  "Out[384]=",ExpressionUUID->"8b97fa38-0b44-490a-8dd9-b8fb8e669334"]
+  "Out[419]=",ExpressionUUID->"deb3543a-4d75-4574-bbae-98c342faea83"]
 }, Open  ]],
 
 Cell[BoxData[{
@@ -8898,8 +8888,8 @@ Cell[BoxData[{
    3.933756956479843*^9}, {3.933765294999028*^9, 3.933765308583109*^9}, {
    3.9337843190521803`*^9, 3.9337843234517*^9}},
  CellLabel->
-  "In[121]:=",ExpressionUUID->"587076b9-908e-406a-9c46-ad3a25c086de"]
-}, Open  ]],
+  "In[420]:=",ExpressionUUID->"587076b9-908e-406a-9c46-ad3a25c086de"]
+}, Closed]],
 
 Cell[CellGroupData[{
 
@@ -192788,221 +192778,221 @@ Cell[16184, 514, 150, 3, 50, "Section",ExpressionUUID->"f6acd268-0983-4ccc-b375-
 Cell[CellGroupData[{
 Cell[16359, 521, 163, 3, 41, "Subsection",ExpressionUUID->"80e4596a-0f6c-482b-9d38-4e3778e2b753"],
 Cell[CellGroupData[{
-Cell[16547, 528, 5751, 144, 121, "Input",ExpressionUUID->"6c182b3c-b61b-4da5-97eb-545f093d6397"],
-Cell[22301, 674, 179108, 3136, 218, "Output",ExpressionUUID->"92c1128c-8ae6-43fd-b1e6-03e770bd251a"]
+Cell[16547, 528, 5788, 144, 121, "Input",ExpressionUUID->"6c182b3c-b61b-4da5-97eb-545f093d6397"],
+Cell[22338, 674, 179121, 3136, 227, "Output",ExpressionUUID->"aa34ee8b-81c2-4f88-9ac7-cc32bcaf34a7"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[201446, 3815, 7149, 179, 212, "Input",ExpressionUUID->"987acbda-9443-4a50-9527-bdd438ec8a24"],
-Cell[208598, 3996, 128644, 2400, 218, "Output",ExpressionUUID->"34c26d83-2227-445e-bd36-24d72298b64f"]
+Cell[201496, 3815, 7183, 180, 213, "Input",ExpressionUUID->"987acbda-9443-4a50-9527-bdd438ec8a24"],
+Cell[208682, 3997, 128644, 2400, 218, "Output",ExpressionUUID->"34c26d83-2227-445e-bd36-24d72298b64f"]
+}, Open  ]],
+Cell[337341, 6400, 604, 15, 53, "Input",ExpressionUUID->"718f433c-5ec4-4bac-860a-5bace6d1b65e"]
 }, Open  ]],
-Cell[337257, 6399, 604, 15, 53, "Input",ExpressionUUID->"718f433c-5ec4-4bac-860a-5bace6d1b65e"]
-}, Closed]],
 Cell[CellGroupData[{
-Cell[337898, 6419, 175, 3, 30, "Subsection",ExpressionUUID->"5df07bd5-2097-4030-81f4-b69a40cb15f6"],
+Cell[337982, 6420, 175, 3, 41, "Subsection",ExpressionUUID->"5df07bd5-2097-4030-81f4-b69a40cb15f6"],
 Cell[CellGroupData[{
-Cell[338098, 6426, 8957, 206, 176, "Input",ExpressionUUID->"5506e17b-9ca1-45dd-9a22-41bf59df28ce"],
-Cell[347058, 6634, 23308, 456, 161, "Output",ExpressionUUID->"8f9cb3fb-79d6-4127-86da-ebb91a796411"]
+Cell[338182, 6427, 8992, 206, 176, "Input",ExpressionUUID->"5506e17b-9ca1-45dd-9a22-41bf59df28ce"],
+Cell[347177, 6635, 23297, 456, 159, "Output",ExpressionUUID->"f02fb6a6-e405-4836-80f0-e33cd4587ade"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[370403, 7095, 8985, 213, 176, "Input",ExpressionUUID->"92265c04-e236-4e0e-8f2d-85dfff966601"],
-Cell[379391, 7310, 12433, 272, 161, "Output",ExpressionUUID->"b9a59dcc-69cd-40a7-876a-5bc308cb6a80"]
+Cell[370511, 7096, 9013, 212, 176, "Input",ExpressionUUID->"92265c04-e236-4e0e-8f2d-85dfff966601"],
+Cell[379527, 7310, 12422, 272, 159, "Output",ExpressionUUID->"53525ec3-63aa-4102-8c66-00e0698a79ca"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[391861, 7587, 7268, 172, 130, "Input",ExpressionUUID->"2024fdeb-ff4f-4e26-834d-bece770e0a79"],
-Cell[399132, 7761, 25691, 487, 150, "Output",ExpressionUUID->"9103c484-5e87-4c28-90d1-8b05b08fa4f0"]
+Cell[391986, 7587, 7294, 171, 130, "Input",ExpressionUUID->"2024fdeb-ff4f-4e26-834d-bece770e0a79"],
+Cell[399283, 7760, 25704, 487, 159, "Output",ExpressionUUID->"19c70bd8-82b7-4eb1-9dbb-9ea50e360376"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[424860, 8253, 6341, 147, 130, "Input",ExpressionUUID->"b3fc4f55-4c0b-4c22-9d55-e6dad1b1d50e"],
-Cell[431204, 8402, 24825, 468, 161, "Output",ExpressionUUID->"8b97fa38-0b44-490a-8dd9-b8fb8e669334"]
-}, Open  ]],
-Cell[456044, 8873, 1101, 27, 84, "Input",ExpressionUUID->"587076b9-908e-406a-9c46-ad3a25c086de"]
+Cell[425024, 8252, 6178, 141, 115, "Input",ExpressionUUID->"b3fc4f55-4c0b-4c22-9d55-e6dad1b1d50e"],
+Cell[431205, 8395, 24732, 465, 159, "Output",ExpressionUUID->"deb3543a-4d75-4574-bbae-98c342faea83"]
 }, Open  ]],
+Cell[455952, 8863, 1101, 27, 84, "Input",ExpressionUUID->"587076b9-908e-406a-9c46-ad3a25c086de"]
+}, Closed]],
 Cell[CellGroupData[{
-Cell[457182, 8905, 162, 3, 41, "Subsection",ExpressionUUID->"5159d821-004a-42df-9d4c-fa83e8d77495"],
+Cell[457090, 8895, 162, 3, 30, "Subsection",ExpressionUUID->"5159d821-004a-42df-9d4c-fa83e8d77495"],
 Cell[CellGroupData[{
-Cell[457369, 8912, 7382, 172, 140, "Input",ExpressionUUID->"6c065066-6bf9-4f3a-a1a0-0b9cba9f452c"],
-Cell[464754, 9086, 51249, 968, 177, "Output",ExpressionUUID->"7e82ffb6-84e7-4a29-8501-6c669630aa8e"]
+Cell[457277, 8902, 7382, 172, 140, "Input",ExpressionUUID->"6c065066-6bf9-4f3a-a1a0-0b9cba9f452c"],
+Cell[464662, 9076, 51249, 968, 177, "Output",ExpressionUUID->"7e82ffb6-84e7-4a29-8501-6c669630aa8e"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[516040, 10059, 6421, 149, 118, "Input",ExpressionUUID->"b7835bf7-af7e-4043-ba65-56202b80be80"],
-Cell[522464, 10210, 2560, 41, 125, "Message",ExpressionUUID->"27f8d3a1-af00-43ff-a010-d91ea739ca18"],
-Cell[525027, 10253, 1028, 19, 22, "Message",ExpressionUUID->"eed8c3e0-eea5-4156-aeeb-895e7f9ef13f"],
-Cell[526058, 10274, 93525, 1708, 177, "Output",ExpressionUUID->"0bb4ebbd-525a-40a9-8738-739ec949f19e"]
+Cell[515948, 10049, 6421, 149, 118, "Input",ExpressionUUID->"b7835bf7-af7e-4043-ba65-56202b80be80"],
+Cell[522372, 10200, 2560, 41, 125, "Message",ExpressionUUID->"27f8d3a1-af00-43ff-a010-d91ea739ca18"],
+Cell[524935, 10243, 1028, 19, 22, "Message",ExpressionUUID->"eed8c3e0-eea5-4156-aeeb-895e7f9ef13f"],
+Cell[525966, 10264, 93525, 1708, 177, "Output",ExpressionUUID->"0bb4ebbd-525a-40a9-8738-739ec949f19e"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[619620, 11987, 8597, 210, 190, "Input",ExpressionUUID->"60fc774e-789f-47e9-995f-80fba0589db7"],
-Cell[628220, 12199, 3522, 55, 125, "Message",ExpressionUUID->"3f1e63ad-98f0-4464-9bdf-6d9d8e725115"],
-Cell[631745, 12256, 97618, 1734, 177, "Output",ExpressionUUID->"d21fb0df-419f-4363-bb7f-617faf904692"]
+Cell[619528, 11977, 8597, 210, 190, "Input",ExpressionUUID->"60fc774e-789f-47e9-995f-80fba0589db7"],
+Cell[628128, 12189, 3522, 55, 125, "Message",ExpressionUUID->"3f1e63ad-98f0-4464-9bdf-6d9d8e725115"],
+Cell[631653, 12246, 97618, 1734, 177, "Output",ExpressionUUID->"d21fb0df-419f-4363-bb7f-617faf904692"]
 }, Open  ]],
-Cell[729378, 13993, 861, 21, 68, "Input",ExpressionUUID->"1b485599-abd1-4bc0-967d-165fc92d833b"]
+Cell[729286, 13983, 861, 21, 68, "Input",ExpressionUUID->"1b485599-abd1-4bc0-967d-165fc92d833b"]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[730276, 14019, 168, 3, 30, "Subsection",ExpressionUUID->"b535800b-9d38-4d4f-9e23-c69cf4d429fb"],
-Cell[730447, 14024, 633, 15, 24, "Input",ExpressionUUID->"f9bfb54c-f8f3-4525-abeb-233750cee79a"],
-Cell[731083, 14041, 1328, 26, 24, "Input",ExpressionUUID->"7618c6de-8d4a-471b-b096-c27a59d6c675"],
+Cell[730184, 14009, 168, 3, 30, "Subsection",ExpressionUUID->"b535800b-9d38-4d4f-9e23-c69cf4d429fb"],
+Cell[730355, 14014, 633, 15, 24, "Input",ExpressionUUID->"f9bfb54c-f8f3-4525-abeb-233750cee79a"],
+Cell[730991, 14031, 1328, 26, 24, "Input",ExpressionUUID->"7618c6de-8d4a-471b-b096-c27a59d6c675"],
 Cell[CellGroupData[{
-Cell[732436, 14071, 369, 8, 22, "Input",ExpressionUUID->"f0210815-94c5-4cb1-80fe-bd2530af8882"],
-Cell[732808, 14081, 1159, 23, 42, "Output",ExpressionUUID->"fe6a90df-8284-4593-ad95-18776dee12ba"]
+Cell[732344, 14061, 369, 8, 22, "Input",ExpressionUUID->"f0210815-94c5-4cb1-80fe-bd2530af8882"],
+Cell[732716, 14071, 1159, 23, 42, "Output",ExpressionUUID->"fe6a90df-8284-4593-ad95-18776dee12ba"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[734004, 14109, 1477, 42, 39, "Input",ExpressionUUID->"94b6c17c-655e-47eb-9104-1a3e8efc5930"],
-Cell[735484, 14153, 2609, 78, 54, "Output",ExpressionUUID->"a47fe3af-36d2-4287-bd83-2a93e3914f03"]
+Cell[733912, 14099, 1477, 42, 39, "Input",ExpressionUUID->"94b6c17c-655e-47eb-9104-1a3e8efc5930"],
+Cell[735392, 14143, 2609, 78, 54, "Output",ExpressionUUID->"a47fe3af-36d2-4287-bd83-2a93e3914f03"]
 }, Open  ]],
-Cell[738108, 14234, 2817, 65, 39, "Input",ExpressionUUID->"baaf63c8-5be4-4d2a-a22b-7dc91aa7910c"],
+Cell[738016, 14224, 2817, 65, 39, "Input",ExpressionUUID->"baaf63c8-5be4-4d2a-a22b-7dc91aa7910c"],
 Cell[CellGroupData[{
-Cell[740950, 14303, 676, 19, 35, "Input",ExpressionUUID->"f413f90a-2bbe-4119-afe0-c4eeb6f72ad3"],
-Cell[741629, 14324, 1383, 37, 41, "Output",ExpressionUUID->"88b56873-7ab9-4829-8db3-a20d0df14d25"]
+Cell[740858, 14293, 676, 19, 35, "Input",ExpressionUUID->"f413f90a-2bbe-4119-afe0-c4eeb6f72ad3"],
+Cell[741537, 14314, 1383, 37, 41, "Output",ExpressionUUID->"88b56873-7ab9-4829-8db3-a20d0df14d25"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[743049, 14366, 632, 16, 35, "Input",ExpressionUUID->"f4199132-776b-444e-905f-98463bad3266"],
-Cell[743684, 14384, 396, 7, 42, "Output",ExpressionUUID->"c3a6a8d3-f6e2-4820-ad3e-241c8716142b"]
+Cell[742957, 14356, 632, 16, 35, "Input",ExpressionUUID->"f4199132-776b-444e-905f-98463bad3266"],
+Cell[743592, 14374, 396, 7, 42, "Output",ExpressionUUID->"c3a6a8d3-f6e2-4820-ad3e-241c8716142b"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[744117, 14396, 1520, 37, 35, "Input",ExpressionUUID->"a2bdf3e3-eab7-4136-8b03-4eb31b271821"],
-Cell[745640, 14435, 1838, 26, 25, "Output",ExpressionUUID->"d0a3d4a6-34ba-40f2-a7d0-f233befe2a26"]
+Cell[744025, 14386, 1520, 37, 35, "Input",ExpressionUUID->"a2bdf3e3-eab7-4136-8b03-4eb31b271821"],
+Cell[745548, 14425, 1838, 26, 25, "Output",ExpressionUUID->"d0a3d4a6-34ba-40f2-a7d0-f233befe2a26"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[747515, 14466, 1391, 36, 35, "Input",ExpressionUUID->"bdc90b67-e81a-4882-976a-f1ebbb721caf"],
-Cell[748909, 14504, 388, 6, 25, "Output",ExpressionUUID->"542b581b-e106-4e4d-9ba9-cf5b96db734b"]
+Cell[747423, 14456, 1391, 36, 35, "Input",ExpressionUUID->"bdc90b67-e81a-4882-976a-f1ebbb721caf"],
+Cell[748817, 14494, 388, 6, 25, "Output",ExpressionUUID->"542b581b-e106-4e4d-9ba9-cf5b96db734b"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[749334, 14515, 5042, 119, 121, "Input",ExpressionUUID->"aa7e3288-606c-43dd-b026-af18071365ea"],
-Cell[754379, 14636, 43675, 801, 78, "Output",ExpressionUUID->"8869033b-708a-43fd-adfb-83f0ccfdf27e"]
+Cell[749242, 14505, 5042, 119, 121, "Input",ExpressionUUID->"aa7e3288-606c-43dd-b026-af18071365ea"],
+Cell[754287, 14626, 43675, 801, 78, "Output",ExpressionUUID->"8869033b-708a-43fd-adfb-83f0ccfdf27e"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[798091, 15442, 4059, 92, 89, "Input",ExpressionUUID->"dcf47297-6e73-48db-95c6-2be317bfb5b5"],
-Cell[802153, 15536, 92270, 1688, 156, "Output",ExpressionUUID->"50b8d242-2452-4ef9-ade0-89cad39074e7"]
+Cell[797999, 15432, 4059, 92, 89, "Input",ExpressionUUID->"dcf47297-6e73-48db-95c6-2be317bfb5b5"],
+Cell[802061, 15526, 92270, 1688, 156, "Output",ExpressionUUID->"50b8d242-2452-4ef9-ade0-89cad39074e7"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[894460, 17229, 4471, 129, 160, "Input",ExpressionUUID->"b7c04588-51c4-46ba-b43a-323e54fb82c5"],
-Cell[898934, 17360, 19236, 384, 178, "Output",ExpressionUUID->"f2e5b5ab-73a2-4890-8c6d-8c0a51640602"]
+Cell[894368, 17219, 4471, 129, 160, "Input",ExpressionUUID->"b7c04588-51c4-46ba-b43a-323e54fb82c5"],
+Cell[898842, 17350, 19236, 384, 178, "Output",ExpressionUUID->"f2e5b5ab-73a2-4890-8c6d-8c0a51640602"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[918207, 17749, 1344, 40, 38, "Input",ExpressionUUID->"d5c71612-e41c-40a0-8f22-153b347f934a"],
-Cell[919554, 17791, 5766, 126, 186, "Output",ExpressionUUID->"15eecab7-6f2e-4f51-ab59-b11829825066"]
+Cell[918115, 17739, 1344, 40, 38, "Input",ExpressionUUID->"d5c71612-e41c-40a0-8f22-153b347f934a"],
+Cell[919462, 17781, 5766, 126, 186, "Output",ExpressionUUID->"15eecab7-6f2e-4f51-ab59-b11829825066"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[925357, 17922, 457, 10, 22, "Input",ExpressionUUID->"6729ea2e-916f-4c77-ad4d-d272adeb529e"],
-Cell[925817, 17934, 1874, 30, 35, "Output",ExpressionUUID->"aba920a7-24d4-48a9-abc4-340913a33287"]
+Cell[925265, 17912, 457, 10, 22, "Input",ExpressionUUID->"6729ea2e-916f-4c77-ad4d-d272adeb529e"],
+Cell[925725, 17924, 1874, 30, 35, "Output",ExpressionUUID->"aba920a7-24d4-48a9-abc4-340913a33287"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[927728, 17969, 961, 25, 25, "Input",ExpressionUUID->"04e6644b-90a9-4b4e-90ba-9f54a0b030a5"],
-Cell[928692, 17996, 4097, 82, 49, "Output",ExpressionUUID->"670f5bb6-e3c3-40eb-95ab-5d64eee71eb8"]
+Cell[927636, 17959, 961, 25, 25, "Input",ExpressionUUID->"04e6644b-90a9-4b4e-90ba-9f54a0b030a5"],
+Cell[928600, 17986, 4097, 82, 49, "Output",ExpressionUUID->"670f5bb6-e3c3-40eb-95ab-5d64eee71eb8"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[932826, 18083, 1971, 47, 76, "Input",ExpressionUUID->"4f6ec33b-2722-4715-8283-2253119f6e1c"],
-Cell[934800, 18132, 34412, 749, 148, "Output",ExpressionUUID->"5f95b587-01c3-436e-9341-9fe0ec6d289b"]
+Cell[932734, 18073, 1971, 47, 76, "Input",ExpressionUUID->"4f6ec33b-2722-4715-8283-2253119f6e1c"],
+Cell[934708, 18122, 34412, 749, 148, "Output",ExpressionUUID->"5f95b587-01c3-436e-9341-9fe0ec6d289b"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[969249, 18886, 941, 25, 25, "Input",ExpressionUUID->"c699da20-b8e1-4d8d-b830-d061605f160c"],
-Cell[970193, 18913, 4598, 89, 49, "Output",ExpressionUUID->"22f6d4e3-f58f-42ca-a947-d73af4f59190"]
+Cell[969157, 18876, 941, 25, 25, "Input",ExpressionUUID->"c699da20-b8e1-4d8d-b830-d061605f160c"],
+Cell[970101, 18903, 4598, 89, 49, "Output",ExpressionUUID->"22f6d4e3-f58f-42ca-a947-d73af4f59190"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[974828, 19007, 691, 20, 25, "Input",ExpressionUUID->"a50d66f9-04d2-4491-ae90-63cb096c85d3"],
-Cell[975522, 19029, 1419, 38, 37, "Output",ExpressionUUID->"93972afe-cf98-4775-a402-768aa8f557c9"]
+Cell[974736, 18997, 691, 20, 25, "Input",ExpressionUUID->"a50d66f9-04d2-4491-ae90-63cb096c85d3"],
+Cell[975430, 19019, 1419, 38, 37, "Output",ExpressionUUID->"93972afe-cf98-4775-a402-768aa8f557c9"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[976978, 19072, 4121, 102, 125, "Input",ExpressionUUID->"e5d2c2e9-65d2-42b6-87d6-57bf360d129a"],
-Cell[981102, 19176, 46291, 997, 161, "Output",ExpressionUUID->"77c89222-5a66-4830-a35d-c39177f17b74"]
+Cell[976886, 19062, 4121, 102, 125, "Input",ExpressionUUID->"e5d2c2e9-65d2-42b6-87d6-57bf360d129a"],
+Cell[981010, 19166, 46291, 997, 161, "Output",ExpressionUUID->"77c89222-5a66-4830-a35d-c39177f17b74"]
 }, Open  ]],
-Cell[1027408, 20176, 556, 15, 53, "Input",ExpressionUUID->"8abd0066-58cc-4935-be9c-3bede175f9cf"],
+Cell[1027316, 20166, 556, 15, 53, "Input",ExpressionUUID->"8abd0066-58cc-4935-be9c-3bede175f9cf"],
 Cell[CellGroupData[{
-Cell[1027989, 20195, 1285, 39, 43, "Input",ExpressionUUID->"c455b4ff-c06e-4670-8c0b-a6b83b146cb8"],
-Cell[1029277, 20236, 309, 5, 35, "Output",ExpressionUUID->"f467a816-b753-401a-9cd1-33aaa8625b41"],
-Cell[1029589, 20243, 327, 6, 35, "Output",ExpressionUUID->"7e645a45-fa80-41c2-8b3c-521aa2144a29"]
+Cell[1027897, 20185, 1285, 39, 43, "Input",ExpressionUUID->"c455b4ff-c06e-4670-8c0b-a6b83b146cb8"],
+Cell[1029185, 20226, 309, 5, 35, "Output",ExpressionUUID->"f467a816-b753-401a-9cd1-33aaa8625b41"],
+Cell[1029497, 20233, 327, 6, 35, "Output",ExpressionUUID->"7e645a45-fa80-41c2-8b3c-521aa2144a29"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1029953, 20254, 1276, 35, 42, "Input",ExpressionUUID->"5d1f916c-a784-49e1-8c0c-4c3c76f0c816"],
-Cell[1031232, 20291, 4497, 91, 55, "Output",ExpressionUUID->"c7d9eb4d-1411-4062-aab8-29af2cad1024"]
+Cell[1029861, 20244, 1276, 35, 42, "Input",ExpressionUUID->"5d1f916c-a784-49e1-8c0c-4c3c76f0c816"],
+Cell[1031140, 20281, 4497, 91, 55, "Output",ExpressionUUID->"c7d9eb4d-1411-4062-aab8-29af2cad1024"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1035766, 20387, 1324, 34, 42, "Input",ExpressionUUID->"a04437e1-ad3b-4721-b631-2e920551efc0"],
-Cell[1037093, 20423, 4671, 92, 51, "Output",ExpressionUUID->"c9130ad0-7626-4136-aa61-d83624a05169"]
+Cell[1035674, 20377, 1324, 34, 42, "Input",ExpressionUUID->"a04437e1-ad3b-4721-b631-2e920551efc0"],
+Cell[1037001, 20413, 4671, 92, 51, "Output",ExpressionUUID->"c9130ad0-7626-4136-aa61-d83624a05169"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1041801, 20520, 2183, 59, 53, "Input",ExpressionUUID->"fe010fe0-3f0c-4ab4-be57-676536c7b785"],
-Cell[1043987, 20581, 15118, 337, 179, "Output",ExpressionUUID->"e8003fd8-91d5-43e7-8f54-b5e982139cb4"]
+Cell[1041709, 20510, 2183, 59, 53, "Input",ExpressionUUID->"fe010fe0-3f0c-4ab4-be57-676536c7b785"],
+Cell[1043895, 20571, 15118, 337, 179, "Output",ExpressionUUID->"e8003fd8-91d5-43e7-8f54-b5e982139cb4"]
 }, Open  ]]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[1059154, 20924, 206, 4, 41, "Subsection",ExpressionUUID->"ff39082a-03fc-42e8-9724-cba9e881655b"],
-Cell[1059363, 20930, 1704, 46, 75, "Input",ExpressionUUID->"872cc790-4f13-4d2d-99a7-abdf4436fa2c"],
-Cell[1061070, 20978, 1015, 17, 22, "Input",ExpressionUUID->"f17e49ae-1bb3-48f1-9b75-bbeb65878fdc"],
-Cell[1062088, 20997, 1246, 23, 24, "Input",ExpressionUUID->"b398376c-4a37-4baa-8263-1a3b2b0d511d"],
-Cell[1063337, 21022, 718, 20, 24, "Input",ExpressionUUID->"2b59e2ea-3c03-4c5d-ba00-f9025a081a2f"],
+Cell[1059062, 20914, 206, 4, 41, "Subsection",ExpressionUUID->"ff39082a-03fc-42e8-9724-cba9e881655b"],
+Cell[1059271, 20920, 1704, 46, 75, "Input",ExpressionUUID->"872cc790-4f13-4d2d-99a7-abdf4436fa2c"],
+Cell[1060978, 20968, 1015, 17, 22, "Input",ExpressionUUID->"f17e49ae-1bb3-48f1-9b75-bbeb65878fdc"],
+Cell[1061996, 20987, 1246, 23, 24, "Input",ExpressionUUID->"b398376c-4a37-4baa-8263-1a3b2b0d511d"],
+Cell[1063245, 21012, 718, 20, 24, "Input",ExpressionUUID->"2b59e2ea-3c03-4c5d-ba00-f9025a081a2f"],
 Cell[CellGroupData[{
-Cell[1064080, 21046, 1667, 37, 41, "Input",ExpressionUUID->"915061c0-7ec9-48b1-a951-8e51348a9795"],
-Cell[1065750, 21085, 55327, 1054, 336, "Output",ExpressionUUID->"93b1d9e1-547b-4a56-9209-648c8c715d70"]
+Cell[1063988, 21036, 1667, 37, 41, "Input",ExpressionUUID->"915061c0-7ec9-48b1-a951-8e51348a9795"],
+Cell[1065658, 21075, 55327, 1054, 336, "Output",ExpressionUUID->"93b1d9e1-547b-4a56-9209-648c8c715d70"]
 }, Open  ]],
-Cell[1121092, 22142, 317, 8, 22, "Input",ExpressionUUID->"86708862-7b81-4d16-95d3-4da6365a6038"],
-Cell[1121412, 22152, 2191, 49, 41, "Input",ExpressionUUID->"9de20adc-add5-4dad-bd65-1e8498717078"],
+Cell[1121000, 22132, 317, 8, 22, "Input",ExpressionUUID->"86708862-7b81-4d16-95d3-4da6365a6038"],
+Cell[1121320, 22142, 2191, 49, 41, "Input",ExpressionUUID->"9de20adc-add5-4dad-bd65-1e8498717078"],
 Cell[CellGroupData[{
-Cell[1123628, 22205, 2279, 53, 41, "Input",ExpressionUUID->"e528bc83-fedd-4cb7-a7e2-7fb607978acf"],
-Cell[1125910, 22260, 64299, 1232, 336, "Output",ExpressionUUID->"6bbbb0ed-a433-4420-8afa-bfa6f4669dd0"]
+Cell[1123536, 22195, 2279, 53, 41, "Input",ExpressionUUID->"e528bc83-fedd-4cb7-a7e2-7fb607978acf"],
+Cell[1125818, 22250, 64299, 1232, 336, "Output",ExpressionUUID->"6bbbb0ed-a433-4420-8afa-bfa6f4669dd0"]
 }, Open  ]],
-Cell[1190224, 23495, 848, 17, 22, "Input",ExpressionUUID->"ef6f487a-9ee3-4aa0-b539-506a622a13b7"],
+Cell[1190132, 23485, 848, 17, 22, "Input",ExpressionUUID->"ef6f487a-9ee3-4aa0-b539-506a622a13b7"],
 Cell[CellGroupData[{
-Cell[1191097, 23516, 1354, 26, 24, "Input",ExpressionUUID->"0db98d0e-b92d-4ab8-bb66-61f53b411000"],
-Cell[1192454, 23544, 328445, 5397, 296, 269006, 4425, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"05ce0ab7-c150-4319-bc8c-f6fbbda4fda7"]
+Cell[1191005, 23506, 1354, 26, 24, "Input",ExpressionUUID->"0db98d0e-b92d-4ab8-bb66-61f53b411000"],
+Cell[1192362, 23534, 328445, 5397, 296, 269006, 4425, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"05ce0ab7-c150-4319-bc8c-f6fbbda4fda7"]
 }, Open  ]],
-Cell[1520914, 28944, 815, 23, 40, "Input",ExpressionUUID->"40263386-cd9f-4a8d-b927-488a1cae2843"],
+Cell[1520822, 28934, 815, 23, 40, "Input",ExpressionUUID->"40263386-cd9f-4a8d-b927-488a1cae2843"],
 Cell[CellGroupData[{
-Cell[1521754, 28971, 2207, 42, 38, "Input",ExpressionUUID->"994154ba-91be-43cc-9ca0-50745729e383"],
-Cell[1523964, 29015, 269883, 4439, 161, "Output",ExpressionUUID->"148e4c1a-652b-4992-8055-5b38b2e33f1c"]
+Cell[1521662, 28961, 2207, 42, 38, "Input",ExpressionUUID->"994154ba-91be-43cc-9ca0-50745729e383"],
+Cell[1523872, 29005, 269883, 4439, 161, "Output",ExpressionUUID->"148e4c1a-652b-4992-8055-5b38b2e33f1c"]
 }, Open  ]],
-Cell[1793862, 33457, 1065, 17, 22, "Input",ExpressionUUID->"1ac93f6b-d483-4656-bc4e-cafae8d64928"],
-Cell[1794930, 33476, 1419, 30, 24, "Input",ExpressionUUID->"e5032b08-7a83-444c-b31e-b851a96b69c9"],
-Cell[1796352, 33508, 1086, 30, 24, "Input",ExpressionUUID->"4360d156-0917-4230-ba20-5153b91f78dd"],
+Cell[1793770, 33447, 1065, 17, 22, "Input",ExpressionUUID->"1ac93f6b-d483-4656-bc4e-cafae8d64928"],
+Cell[1794838, 33466, 1419, 30, 24, "Input",ExpressionUUID->"e5032b08-7a83-444c-b31e-b851a96b69c9"],
+Cell[1796260, 33498, 1086, 30, 24, "Input",ExpressionUUID->"4360d156-0917-4230-ba20-5153b91f78dd"],
 Cell[CellGroupData[{
-Cell[1797463, 33542, 1765, 39, 41, "Input",ExpressionUUID->"24bd308d-c1c0-418c-9278-e1cef4b12f0f"],
-Cell[1799231, 33583, 492466, 9337, 336, "Output",ExpressionUUID->"c7e54478-684c-4d40-af44-a66ef70233cc"]
+Cell[1797371, 33532, 1765, 39, 41, "Input",ExpressionUUID->"24bd308d-c1c0-418c-9278-e1cef4b12f0f"],
+Cell[1799139, 33573, 492466, 9337, 336, "Output",ExpressionUUID->"c7e54478-684c-4d40-af44-a66ef70233cc"]
 }, Open  ]],
-Cell[2291712, 42923, 317, 8, 22, "Input",ExpressionUUID->"f7d8a0e0-db54-4a86-97a2-09b9bb47639b"],
-Cell[2292032, 42933, 2391, 56, 41, "Input",ExpressionUUID->"670190eb-97cf-48ad-b575-b3100869cb93"],
+Cell[2291620, 42913, 317, 8, 22, "Input",ExpressionUUID->"f7d8a0e0-db54-4a86-97a2-09b9bb47639b"],
+Cell[2291940, 42923, 2391, 56, 41, "Input",ExpressionUUID->"670190eb-97cf-48ad-b575-b3100869cb93"],
 Cell[CellGroupData[{
-Cell[2294448, 42993, 2348, 56, 41, "Input",ExpressionUUID->"578ccac6-7b17-4583-9281-66874ba9b897"],
-Cell[2296799, 43051, 795623, 14282, 336, "Output",ExpressionUUID->"b80ff946-be74-415d-8de2-ab145714ebf3"]
+Cell[2294356, 42983, 2348, 56, 41, "Input",ExpressionUUID->"578ccac6-7b17-4583-9281-66874ba9b897"],
+Cell[2296707, 43041, 795623, 14282, 336, "Output",ExpressionUUID->"b80ff946-be74-415d-8de2-ab145714ebf3"]
 }, Open  ]],
-Cell[3092437, 57336, 848, 17, 22, "Input",ExpressionUUID->"a515cac5-2419-4e69-aff7-acf2ed64e535"],
+Cell[3092345, 57326, 848, 17, 22, "Input",ExpressionUUID->"a515cac5-2419-4e69-aff7-acf2ed64e535"],
 Cell[CellGroupData[{
-Cell[3093310, 57357, 1354, 26, 24, "Input",ExpressionUUID->"f89589c3-3d58-45c8-9cc4-1a567916cd3b"],
-Cell[3094667, 57385, 560902, 9207, 296, "Output",ExpressionUUID->"7542bad6-cea8-486a-ad70-240e327e482d"]
+Cell[3093218, 57347, 1354, 26, 24, "Input",ExpressionUUID->"f89589c3-3d58-45c8-9cc4-1a567916cd3b"],
+Cell[3094575, 57375, 560902, 9207, 296, "Output",ExpressionUUID->"7542bad6-cea8-486a-ad70-240e327e482d"]
 }, Open  ]],
-Cell[3655584, 66595, 815, 23, 40, "Input",ExpressionUUID->"584b6c8b-947f-4280-9a9c-7ab2728cd4b7"],
+Cell[3655492, 66585, 815, 23, 40, "Input",ExpressionUUID->"584b6c8b-947f-4280-9a9c-7ab2728cd4b7"],
 Cell[CellGroupData[{
-Cell[3656424, 66622, 2201, 42, 38, "Input",ExpressionUUID->"7a622b9e-63d1-4073-8620-2e390e4d56bd"],
-Cell[3658628, 66666, 560220, 9198, 161, "Output",ExpressionUUID->"cc529c41-089a-4275-8426-a2014dd26b11"]
+Cell[3656332, 66612, 2201, 42, 38, "Input",ExpressionUUID->"7a622b9e-63d1-4073-8620-2e390e4d56bd"],
+Cell[3658536, 66656, 560220, 9198, 161, "Output",ExpressionUUID->"cc529c41-089a-4275-8426-a2014dd26b11"]
 }, Open  ]],
-Cell[4218863, 75867, 1627, 36, 38, "Input",ExpressionUUID->"b4b2f41d-2e37-47da-9ba6-562bb35857f8"],
-Cell[4220493, 75905, 577, 16, 24, "Input",ExpressionUUID->"94331b49-df2d-48dc-9c78-a542603df328"],
+Cell[4218771, 75857, 1627, 36, 38, "Input",ExpressionUUID->"b4b2f41d-2e37-47da-9ba6-562bb35857f8"],
+Cell[4220401, 75895, 577, 16, 24, "Input",ExpressionUUID->"94331b49-df2d-48dc-9c78-a542603df328"],
 Cell[CellGroupData[{
-Cell[4221095, 75925, 1258, 33, 24, "Input",ExpressionUUID->"fa6551ed-ab50-40f7-9b77-8b6ae3f11f33"],
-Cell[4222356, 75960, 2522980, 48064, 286, "Output",ExpressionUUID->"1168ec66-8687-4c95-8f7b-591acb738b27"]
+Cell[4221003, 75915, 1258, 33, 24, "Input",ExpressionUUID->"fa6551ed-ab50-40f7-9b77-8b6ae3f11f33"],
+Cell[4222264, 75950, 2522980, 48064, 286, "Output",ExpressionUUID->"1168ec66-8687-4c95-8f7b-591acb738b27"]
 }, Open  ]],
-Cell[6745351, 124027, 254, 7, 22, "Input",ExpressionUUID->"c0e2215b-6c8a-4d76-b692-b351b0f9c2ee"],
-Cell[6745608, 124036, 2061, 49, 41, "Input",ExpressionUUID->"e1ec0204-d79b-43d2-91be-5ef87bf83dbf"],
+Cell[6745259, 124017, 254, 7, 22, "Input",ExpressionUUID->"c0e2215b-6c8a-4d76-b692-b351b0f9c2ee"],
+Cell[6745516, 124026, 2061, 49, 41, "Input",ExpressionUUID->"e1ec0204-d79b-43d2-91be-5ef87bf83dbf"],
 Cell[CellGroupData[{
-Cell[6747694, 124089, 1617, 33, 22, "Input",ExpressionUUID->"d982051e-8a3f-46b8-b9a6-c5fd1fb15b3c"],
-Cell[6749314, 124124, 2568146, 48452, 336, "Output",ExpressionUUID->"8a79898f-8c41-4f2b-b502-795be7e4aa6b"]
+Cell[6747602, 124079, 1617, 33, 22, "Input",ExpressionUUID->"d982051e-8a3f-46b8-b9a6-c5fd1fb15b3c"],
+Cell[6749222, 124114, 2568146, 48452, 336, "Output",ExpressionUUID->"8a79898f-8c41-4f2b-b502-795be7e4aa6b"]
 }, Open  ]],
-Cell[9317475, 172579, 795, 16, 22, "Input",ExpressionUUID->"655b3958-406c-4270-9fe9-daeb72feaa1a"],
+Cell[9317383, 172569, 795, 16, 22, "Input",ExpressionUUID->"655b3958-406c-4270-9fe9-daeb72feaa1a"],
 Cell[CellGroupData[{
-Cell[9318295, 172599, 1355, 26, 24, "Input",ExpressionUUID->"64a83c48-1333-4bf5-8046-beea10bc8ca9"],
-Cell[9319653, 172627, 584911, 9603, 296, "Output",ExpressionUUID->"7e5f1c92-bf6a-4096-ad54-d323bfc1730a"]
+Cell[9318203, 172589, 1355, 26, 24, "Input",ExpressionUUID->"64a83c48-1333-4bf5-8046-beea10bc8ca9"],
+Cell[9319561, 172617, 584911, 9603, 296, "Output",ExpressionUUID->"7e5f1c92-bf6a-4096-ad54-d323bfc1730a"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[9904601, 182235, 1801, 36, 38, "Input",ExpressionUUID->"4af7039e-624b-403a-a217-39596557d073"],
-Cell[9906405, 182273, 622812, 10226, 138, 583952, 9589, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"1b72ff84-f8dd-4c43-882c-d391e6753a71"]
+Cell[9904509, 182225, 1801, 36, 38, "Input",ExpressionUUID->"4af7039e-624b-403a-a217-39596557d073"],
+Cell[9906313, 182263, 622812, 10226, 138, 583952, 9589, "CachedBoxData", "BoxData", "Output",ExpressionUUID->"1b72ff84-f8dd-4c43-882c-d391e6753a71"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[10529254, 192504, 950, 25, 38, "Input",ExpressionUUID->"b138cba4-9273-4e2b-a292-61ce9cfdc73c"],
-Cell[10530207, 192531, 627, 15, 138, "Output",ExpressionUUID->"5fadd0a3-c66f-4348-b0f3-af515a92cba2"]
+Cell[10529162, 192494, 950, 25, 38, "Input",ExpressionUUID->"b138cba4-9273-4e2b-a292-61ce9cfdc73c"],
+Cell[10530115, 192521, 627, 15, 138, "Output",ExpressionUUID->"5fadd0a3-c66f-4348-b0f3-af515a92cba2"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[10530871, 192551, 4013, 107, 92, "Input",ExpressionUUID->"9edd1e7c-f2f3-43e3-9815-eefb0715d66a"],
-Cell[10534887, 192660, 2374, 61, 48, "Output",ExpressionUUID->"d4dfa7f2-94fe-4ea7-be34-a9f88e32595a"]
+Cell[10530779, 192541, 4013, 107, 92, "Input",ExpressionUUID->"9edd1e7c-f2f3-43e3-9815-eefb0715d66a"],
+Cell[10534795, 192650, 2374, 61, 48, "Output",ExpressionUUID->"d4dfa7f2-94fe-4ea7-be34-a9f88e32595a"]
 }, Open  ]],
-Cell[10537276, 192724, 1147, 30, 99, "Input",ExpressionUUID->"812cdae8-d5de-418f-b2d9-e9ede64c5cca"]
+Cell[10537184, 192714, 1147, 30, 99, "Input",ExpressionUUID->"812cdae8-d5de-418f-b2d9-e9ede64c5cca"]
 }, Open  ]]
 }, Open  ]]
 }