summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--figures.nb1272
-rw-r--r--marginal.tex2
2 files changed, 1065 insertions, 209 deletions
diff --git a/figures.nb b/figures.nb
index cfa06cd..b97e458 100644
--- a/figures.nb
+++ b/figures.nb
@@ -10,10 +10,10 @@
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
-NotebookDataLength[ 1232002, 24522]
-NotebookOptionsPosition[ 1215345, 24246]
-NotebookOutlinePosition[ 1215742, 24262]
-CellTagsIndexPosition[ 1215699, 24259]
+NotebookDataLength[ 1259902, 25378]
+NotebookOptionsPosition[ 1242767, 25094]
+NotebookOutlinePosition[ 1243165, 25110]
+CellTagsIndexPosition[ 1243122, 25107]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
@@ -154,7 +154,7 @@ Cell[BoxData[
3.915530780148059*^9}, {3.915530891127125*^9, 3.915530922455567*^9}, {
3.9241609780538807`*^9, 3.924160982965692*^9}, {3.924162186828877*^9,
3.9241621901083317`*^9}, {3.924162311335291*^9, 3.924162320022914*^9}, {
- 3.9267607225073366`*^9, 3.926760768524247*^9}, {3.9267620978944073`*^9,
+ 3.926760722507337*^9, 3.926760768524247*^9}, {3.9267620978944073`*^9,
3.9267621072226877`*^9}, {3.926762329962654*^9, 3.9267623500744543`*^9}},
CellLabel->"In[7]:=",ExpressionUUID->"6c00d5eb-8ba7-405a-9bf1-5d71e992492f"],
@@ -3230,7 +3230,7 @@ Cell[BoxData[
3.90601616215897*^9}, {3.9060164087157993`*^9, 3.9060164195478573`*^9}, {
3.906016724777636*^9, 3.906016759546612*^9}, {3.906017868966701*^9,
3.906017993144882*^9}},
- CellLabel->"In[11]:=",ExpressionUUID->"830d12ec-ccc1-4fbc-9de0-2282430f4840"],
+ CellLabel->"In[1]:=",ExpressionUUID->"830d12ec-ccc1-4fbc-9de0-2282430f4840"],
Cell[BoxData[
RowBox[{
@@ -3279,7 +3279,7 @@ Cell[BoxData[
RowBox[{"_", ",", "_"}], "]"}], ":>", "a0"}]}], "}"}]}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.90601619406374*^9, 3.906016261000745*^9}},
- CellLabel->"In[12]:=",ExpressionUUID->"bcf9e08b-5bc8-4156-8987-ae991b3777be"],
+ CellLabel->"In[2]:=",ExpressionUUID->"bcf9e08b-5bc8-4156-8987-ae991b3777be"],
Cell[BoxData[{
RowBox[{
@@ -3299,7 +3299,7 @@ Cell[BoxData[{
CellChangeTimes->{{3.906016273153998*^9, 3.906016296681038*^9}, {
3.906016335065982*^9, 3.906016335785755*^9}, {3.906016425291695*^9,
3.906016427035625*^9}},
- CellLabel->"In[13]:=",ExpressionUUID->"90676af5-535d-4801-950c-574cc68db098"],
+ CellLabel->"In[3]:=",ExpressionUUID->"90676af5-535d-4801-950c-574cc68db098"],
Cell[CellGroupData[{
@@ -3307,7 +3307,7 @@ Cell[BoxData[
RowBox[{
RowBox[{"matForm", "[", "A", "]"}], "//", "MatrixForm"}]], "Input",
CellChangeTimes->{{3.90601650742142*^9, 3.906016511901194*^9}},
- CellLabel->"In[15]:=",ExpressionUUID->"3e4fb69d-9599-4326-945e-414023395a5f"],
+ CellLabel->"In[5]:=",ExpressionUUID->"3e4fb69d-9599-4326-945e-414023395a5f"],
Cell[BoxData[
TagBox[
@@ -3337,10 +3337,10 @@ Cell[BoxData[
3.908621322305964*^9, 3.908959013422355*^9, 3.909041244953446*^9,
3.915532039997315*^9, 3.915532490361631*^9, 3.9157715661300697`*^9,
3.916379988951159*^9, 3.92726705097127*^9, 3.927267091691385*^9,
- 3.928307087937766*^9},
+ 3.928307087937766*^9, 3.928834300011047*^9},
CellLabel->
- "Out[15]//MatrixForm=",ExpressionUUID->"dc8c4d24-e3b9-4519-b25a-\
-d1b37a8ca665"]
+ "Out[5]//MatrixForm=",ExpressionUUID->"5b6dfc95-6cda-4b27-a377-\
+f74ab71517d2"]
}, Open ]],
Cell[CellGroupData[{
@@ -3357,7 +3357,7 @@ Cell[BoxData[
"MatrixForm"}]], "Input",
CellChangeTimes->{{3.90601630021717*^9, 3.9060163020008*^9}, {
3.906016344778521*^9, 3.906016369306422*^9}},
- CellLabel->"In[16]:=",ExpressionUUID->"692c829b-e066-4a5e-bd71-7d2bb33fb03d"],
+ CellLabel->"In[6]:=",ExpressionUUID->"692c829b-e066-4a5e-bd71-7d2bb33fb03d"],
Cell[BoxData[
TagBox[
@@ -3388,10 +3388,10 @@ Cell[BoxData[
3.908621322502807*^9, 3.9089590134471207`*^9, 3.909041245152533*^9,
3.915532040420734*^9, 3.915532490902354*^9, 3.9157715661819*^9,
3.916379989103819*^9, 3.927267051024227*^9, 3.927267091746293*^9,
- 3.928307087994485*^9},
+ 3.928307087994485*^9, 3.928834300074581*^9},
CellLabel->
- "Out[16]//MatrixForm=",ExpressionUUID->"1d662128-382e-4f15-b860-\
-f781d0e058f9"]
+ "Out[6]//MatrixForm=",ExpressionUUID->"157a005e-ef56-4427-8003-\
+7bf5e0bbee2d"]
}, Open ]],
Cell[CellGroupData[{
@@ -3416,7 +3416,7 @@ Cell[BoxData[
RowBox[{"ad", ">", "0"}], ",",
RowBox[{"ad", ">", "0"}]}], "}"}]}]}], "]"}], "&"}]}]], "Input",
CellChangeTimes->{{3.906016432156065*^9, 3.906016492940791*^9}},
- CellLabel->"In[17]:=",ExpressionUUID->"9dee447a-c909-40cb-8546-4295c33c7ecb"],
+ CellLabel->"In[7]:=",ExpressionUUID->"9dee447a-c909-40cb-8546-4295c33c7ecb"],
Cell[BoxData["0"], "Output",
CellChangeTimes->{{3.906016435385942*^9, 3.906016493093434*^9},
@@ -3426,8 +3426,8 @@ Cell[BoxData["0"], "Output",
3.908611419701027*^9, 3.908621322735462*^9, 3.908959013614911*^9,
3.909041245371322*^9, 3.915532041003538*^9, 3.915532491323807*^9,
3.9157715663195257`*^9, 3.916379989663705*^9, 3.927267051079937*^9,
- 3.927267091844021*^9, 3.9283070880533533`*^9},
- CellLabel->"Out[17]=",ExpressionUUID->"f17e3a44-13b0-4bd9-987a-b8c0d0f58652"]
+ 3.927267091844021*^9, 3.9283070880533543`*^9, 3.928834300292862*^9},
+ CellLabel->"Out[7]=",ExpressionUUID->"eca32abc-9cef-4928-b496-8f693beedfaa"]
}, Open ]],
Cell[BoxData[
@@ -3528,36 +3528,38 @@ Cell[BoxData[
3.905850823299843*^9}, {3.906016526231467*^9, 3.906016610960813*^9}, {
3.906016648120619*^9, 3.906016668361017*^9}, {3.906018022634241*^9,
3.906018040601918*^9}, {3.906018074803009*^9, 3.906018131963895*^9}},
- CellLabel->"In[18]:=",ExpressionUUID->"ae225317-c8f2-42eb-a092-5a3d6696fcf1"],
+ CellLabel->"In[8]:=",ExpressionUUID->"ae225317-c8f2-42eb-a092-5a3d6696fcf1"],
Cell[CellGroupData[{
Cell[BoxData[
- RowBox[{
- RowBox[{"FullSimplify", "[",
- RowBox[{
- RowBox[{"Limit", "[",
- RowBox[{"\[ScriptCapitalS]twin", ",",
- RowBox[{"n", "->", "0"}]}], "]"}], ",",
- RowBox[{"Assumptions", "->",
- RowBox[{"{",
- RowBox[{
- RowBox[{"0", "<", "q11d0", "<", "1"}], ",",
- RowBox[{"0", "<", "q11d1", "<", "1"}], ",",
- RowBox[{"0", "<", "q110", "<", "1"}], ",",
- RowBox[{"0", "<", "q220", "<", "1"}]}], "}"}]}]}], "]"}], "/.",
+ RowBox[{"e00", "=",
RowBox[{
+ RowBox[{"FullSimplify", "[",
+ RowBox[{
+ RowBox[{"Limit", "[",
+ RowBox[{"\[ScriptCapitalS]twin", ",",
+ RowBox[{"n", "->", "0"}]}], "]"}], ",",
+ RowBox[{"Assumptions", "->",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"0", "<", "q11d0", "<", "1"}], ",",
+ RowBox[{"0", "<", "q11d1", "<", "1"}], ",",
+ RowBox[{"0", "<", "q110", "<", "1"}], ",",
+ RowBox[{"0", "<", "q220", "<", "1"}]}], "}"}]}]}], "]"}], "/.",
RowBox[{
RowBox[{
- RowBox[{"-", "2"}],
- RowBox[{"Log", "[", "a_", "]"}]}], "+",
- RowBox[{"Log", "[", "b_", "]"}]}], ":>",
- RowBox[{"Log", "[",
- RowBox[{"FullSimplify", "[",
- RowBox[{"b", "/",
- SuperscriptBox["a", "2"]}], "]"}], "]"}]}]}]], "Input",
- CellChangeTimes->{{3.9272803840094433`*^9, 3.927280410881407*^9}},
- CellLabel->"In[19]:=",ExpressionUUID->"441c736d-f94a-4b61-ae4a-050ffb34f1d4"],
+ RowBox[{
+ RowBox[{"-", "2"}],
+ RowBox[{"Log", "[", "a_", "]"}]}], "+",
+ RowBox[{"Log", "[", "b_", "]"}]}], ":>",
+ RowBox[{"Log", "[",
+ RowBox[{"FullSimplify", "[",
+ RowBox[{"b", "/",
+ SuperscriptBox["a", "2"]}], "]"}], "]"}]}]}]}]], "Input",
+ CellChangeTimes->{{3.9272803840094433`*^9, 3.927280410881407*^9}, {
+ 3.92883430197756*^9, 3.928834304729701*^9}},
+ CellLabel->"In[10]:=",ExpressionUUID->"441c736d-f94a-4b61-ae4a-050ffb34f1d4"],
Cell[BoxData[
RowBox[{
@@ -3626,18 +3628,6 @@ Cell[BoxData[
FractionBox["1", "2"], " ",
RowBox[{"Log", "[",
RowBox[{
- FractionBox["1",
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{
- SuperscriptBox[
- RowBox[{"(",
- RowBox[{"q120", "-", "q12d0"}], ")"}], "2"], "-",
- RowBox[{
- RowBox[{"(",
- RowBox[{"q110", "-", "q11d0"}], ")"}], " ",
- RowBox[{"(",
- RowBox[{"q220", "-", "q22d0"}], ")"}]}]}], ")"}], "2"]],
RowBox[{"(",
RowBox[{
RowBox[{
@@ -3691,12 +3681,870 @@ Cell[BoxData[
SuperscriptBox["q121", "2"], "-",
SuperscriptBox["q12d1", "2"], "-",
RowBox[{"q111", " ", "q221"}], "+",
- RowBox[{"q11d1", " ", "q22d1"}]}], ")"}]}]}], ")"}]}],
+ RowBox[{"q11d1", " ", "q22d1"}]}], ")"}]}]}], ")"}], "/",
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{"q120", "-", "q12d0"}], ")"}], "2"], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{"q110", "-", "q11d0"}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{"q220", "-", "q22d0"}], ")"}]}]}], ")"}], "2"]}],
"]"}]}]}]], "Output",
CellChangeTimes->{
3.927277343768147*^9, {3.9272804001319532`*^9, 3.927280411646502*^9},
- 3.928307089831167*^9},
- CellLabel->"Out[19]=",ExpressionUUID->"7e5b218a-4bf7-4e16-b6af-f640354de52c"]
+ 3.928307089831167*^9, {3.928834302219067*^9, 3.928834305024976*^9}},
+ CellLabel->"Out[10]=",ExpressionUUID->"1e108568-0a21-4daf-a8ee-a4654bc765f6"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"e00", "/.",
+ RowBox[{"{",
+ RowBox[{
+ RowBox[{"q110", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "11"], ")"}], "0"]}], ",",
+ RowBox[{"q220", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "22"], ")"}], "0"]}], ",",
+ RowBox[{"q120", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "0"]}], ",",
+ RowBox[{"q11d0", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "11"], ")"}], "d"]}], ",",
+ RowBox[{"q11d0", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "11"], ")"}], "d"]}], ",",
+ RowBox[{"q22d0", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "22"], ")"}], "d"]}], ",",
+ RowBox[{"q12d0", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "d"]}], ",",
+ RowBox[{"q11d1", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], ")"}], "d"]}], ",",
+ RowBox[{"q22d1", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], ")"}], "d"]}], ",",
+ RowBox[{"q12d1", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "d"]}], ",",
+ RowBox[{"q111", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], ")"}], "0"]}], ",",
+ RowBox[{"q221", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], ")"}], "0"]}], ",",
+ RowBox[{"q121", "->",
+ SubscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0"]}]}], "}"}]}]], "Input",
+ CellChangeTimes->{{3.928834305402545*^9, 3.9288344381642303`*^9}},
+ CellLabel->"In[17]:=",ExpressionUUID->"da099c4a-d072-47b7-a4c0-1d2e953c1613"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{
+ FractionBox["1", "2"], " ",
+ RowBox[{"Log", "[",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "2"}], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"]}], "+",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"]}], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], ")"}]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"]}], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], ")"}]}], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], "-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"3", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "0", "2"]}], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"]}], "-",
+ RowBox[{"3", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "d", "2"], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "0", "2"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "d", "2"], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "d", "2"], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}]}], ")"}], "/",
+
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SuperscriptBox[
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], "-",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"]}], ")"}], "2"], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], "-",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"], "-",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], ")"}]}]}], ")"}], "2"]}],
+ "]"}]}], "+",
+ RowBox[{
+ SuperscriptBox["\[Sigma]1", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["\[Lambda]", "2"], " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], ")"}], "d", "2"]}], "+",
+ RowBox[{"2", " ", "\[Beta]", " ", "\[Lambda]", " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], "-",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["\[Beta]", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "11"], ")"}], "0", "2"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "11"], ")"}], "d", "2"], "-",
+ RowBox[{"2", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], ")"}], "0", "2"]}], "+",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], ")"}], "d", "2"]}], ")"}]}]}],
+ ")"}]}], "+",
+ RowBox[{"\[Beta]", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[Omega]1", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"]}], "+",
+ RowBox[{"2", " ", "\[Epsilon]", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"]}], "+",
+ RowBox[{"\[Omega]2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], "-",
+ RowBox[{"\[Omega]1", " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"]}], "-",
+ RowBox[{"2", " ", "\[Epsilon]", " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], "-",
+ RowBox[{"\[Omega]2", " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], "+",
+ RowBox[{"\[Lambda]", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"\[Omega]1", " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"]}], "+",
+ RowBox[{"2", " ", "\[Epsilon]", " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], "+",
+ RowBox[{"\[Omega]2", " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["\[Sigma]2", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ SuperscriptBox["\[Lambda]", "2"], " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], ")"}], "d", "2"]}], "+",
+ RowBox[{"2", " ", "\[Beta]", " ", "\[Lambda]", " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"], "-",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}], ")"}]}], "+",
+ RowBox[{
+ SuperscriptBox["\[Beta]", "2"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "22"], ")"}], "0", "2"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "22"], ")"}], "d", "2"], "-",
+ RowBox[{"2", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], ")"}], "0", "2"]}], "+",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], ")"}], "d", "2"]}], ")"}]}]}],
+ ")"}]}]}]], "Output",
+ CellChangeTimes->{
+ 3.928834317909019*^9, {3.928834348162314*^9, 3.9288343601265783`*^9}, {
+ 3.928834393210747*^9, 3.928834438402287*^9}},
+ CellLabel->"Out[17]=",ExpressionUUID->"2e335f2a-9fef-43a8-9084-365867a1db49"]
+}, Open ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "2"}], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"]}], "+",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"]}], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], ")"}]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"]}], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], ")"}]}], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], "-",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"3", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "0", "2"]}], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"]}], "-",
+ RowBox[{"3", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "d", "2"], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], "+",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "0", "2"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "d", "2"], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "d", "2"], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}]}], ")"}],
+ ")"}]}], "//", "Simplify"}]], "Input",
+ CellChangeTimes->{{3.928834838844556*^9, 3.928834848548061*^9}},
+ CellLabel->"In[20]:=",ExpressionUUID->"c0add40d-eaa6-456f-8505-abe2286e5787"],
+
+Cell[BoxData[
+ RowBox[{
+ RowBox[{"-",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "2"}], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"]}], "+",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"]}], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], ")"}]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"]}], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"], "+",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], "d"]}], ")"}]}], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], ")"}]}], "-",
+ RowBox[{
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"2", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "0", "2"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "d", "2"], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "d", "2"], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}], "+",
+ RowBox[{"2", " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{"3", " ",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox["q", "12"], ")"}], "0", "2"]}], "-",
+ RowBox[{"2", " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "12"], "d"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox["q", "11"], "0"], " ",
+ RowBox[{"(",
+ RowBox[{
+ RowBox[{
+ RowBox[{"-", "3"}], " ",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "0"]}], "+",
+ SubscriptBox[
+ SuperscriptBox["q", "22"], "d"]}], ")"}]}], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}]}], ")"}], " ",
+ RowBox[{"(",
+ RowBox[{
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "0", "2"], "-",
+ SubsuperscriptBox[
+ RowBox[{"(",
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "12"], ")"}], "d", "2"], "-",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "0"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "0"]}], "+",
+ RowBox[{
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "11"], "d"], " ",
+ SubscriptBox[
+ SuperscriptBox[
+ OverscriptBox["q", "~"], "22"], "d"]}]}], ")"}]}]}]], "Output",
+ CellChangeTimes->{{3.928834831950756*^9, 3.928834848765751*^9}},
+ CellLabel->"Out[20]=",ExpressionUUID->"13ac65e6-8e7b-45f5-9963-38143953c129"]
}, Open ]],
Cell[CellGroupData[{
@@ -5771,7 +6619,7 @@ tolerances.\"", 2, 412, 67, 23882815617388216864, "Local"},
"MessageTemplate"]], "Message", "MSG",
CellChangeTimes->{3.909042535149797*^9, 3.9155328751204443`*^9,
3.915771850129451*^9, 3.916380287761401*^9, 3.916387078856232*^9,
- 3.927267371956482*^9, 3.928307368436137*^9, 3.9283329154271393`*^9},
+ 3.927267371956482*^9, 3.928307368436137*^9, 3.9283329154271398`*^9},
CellLabel->
"During evaluation of \
In[412]:=",ExpressionUUID->"022a1ca5-a3f6-4746-885d-a0317a32fe74"],
@@ -10456,19 +11304,19 @@ e497kHuRe5J78x/wSPRS
3.927269574612711*^9}, 3.9272696110843987`*^9, 3.927269963911026*^9,
3.927270023369107*^9, 3.927270070957769*^9, 3.927270263068353*^9,
3.927270298337522*^9, {3.927270370098089*^9, 3.927270408689001*^9}, {
- 3.927270474927936*^9, 3.927270530976882*^9}, 3.9283084778592854`*^9,
+ 3.927270474927936*^9, 3.927270530976882*^9}, 3.928308477859285*^9,
3.9283095916600018`*^9, 3.928310786330997*^9, 3.928334055128286*^9,
- 3.928334171522675*^9, 3.9283384685124273`*^9, 3.928340137031719*^9, {
- 3.9283698354720163`*^9, 3.928369856307811*^9}, 3.928371006381309*^9,
+ 3.928334171522675*^9, 3.9283384685124283`*^9, 3.928340137031719*^9, {
+ 3.928369835472017*^9, 3.928369856307811*^9}, 3.928371006381309*^9,
3.928371131600775*^9, 3.928371268374576*^9, 3.9283713499502*^9,
3.92837142613761*^9, 3.928382384241624*^9, 3.928382741904481*^9,
3.928382901388444*^9, 3.928383045162767*^9, 3.928384622513546*^9,
3.928385667996121*^9, {3.928385744256181*^9, 3.928385781748316*^9}, {
3.9283860233987513`*^9, 3.928386071232974*^9}, 3.928386173831628*^9,
3.928386528341237*^9, 3.928392404758099*^9, 3.928392867458043*^9,
- 3.92839329782364*^9, 3.928393931734811*^9, 3.9283943979057617`*^9,
+ 3.92839329782364*^9, 3.928393931734811*^9, 3.928394397905762*^9,
3.928394808732456*^9, 3.928395251656701*^9, 3.928395681147725*^9,
- 3.928396347796915*^9, 3.9283971447758007`*^9, 3.928397789603183*^9,
+ 3.928396347796915*^9, 3.928397144775801*^9, 3.928397789603183*^9,
3.928398720424361*^9, 3.928399159357809*^9},
CellLabel->
"Out[762]=",ExpressionUUID->"9e89ad7d-0b3a-4232-a289-73138258011c"]
@@ -10567,8 +11415,8 @@ Cell[BoxData[
TemplateBox[<|"shortenedBoxes" -> TagBox[
TemplateBox[{"1"}, "OutputSizeLimit`Skeleton"], Short[#, 16]& ], "line" ->
59, "sessionID" -> 23882815617388216864, "byteCount" -> 2146480, "size" ->
- 16, "stored" -> False, "expr" -> Missing["NotStored"], "wrap" ->
- OutputSizeLimit`Defer, "version" -> 1|>,
+ 16, "stored" -> False, "expr" -> Missing["NotAvailable", "NewSessionID"],
+ "wrap" -> OutputSizeLimit`Defer, "version" -> 1|>,
"OutputSizeLimitTemplate"]], "Output",
CellChangeTimes->{{3.905941916302861*^9, 3.905941963097375*^9},
3.905942388134901*^9, {3.905942438623794*^9, 3.905942464087213*^9},
@@ -24244,8 +25092,8 @@ Cell[BoxData[
6cb9b2e573e2"]
}, Open ]]
},
-WindowSize->{1920, 1023.75},
-WindowMargins->{{0, Automatic}, {Automatic, 0}},
+WindowSize->{952.5, 1023.75},
+WindowMargins->{{0, Automatic}, {-538.5, -1.5}},
FrontEndVersion->"14.0 for Linux x86 (64-bit) (December 12, 2023)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"fe7785c4-a5eb-46c5-8188-772697b31ba4"
@@ -24271,258 +25119,266 @@ Cell[CellGroupData[{
Cell[2355, 70, 171, 3, 50, "Section",ExpressionUUID->"e26a72a6-0937-45b0-a625-f1bdf166fa4e"],
Cell[2529, 75, 899, 29, 48, "Input",ExpressionUUID->"50c08a66-4e65-4112-8ad7-d5d45f281a8c"],
Cell[CellGroupData[{
-Cell[3453, 108, 2084, 50, 24, "Input",ExpressionUUID->"6c00d5eb-8ba7-405a-9bf1-5d71e992492f"],
-Cell[5540, 160, 29582, 583, 177, "Output",ExpressionUUID->"96d8c022-71f7-4175-ad56-0b948701a2c3"]
+Cell[3453, 108, 2082, 50, 58, "Input",ExpressionUUID->"6c00d5eb-8ba7-405a-9bf1-5d71e992492f"],
+Cell[5538, 160, 29582, 583, 177, "Output",ExpressionUUID->"96d8c022-71f7-4175-ad56-0b948701a2c3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[35159, 748, 355, 7, 22, "Input",ExpressionUUID->"0c67dbb9-49b6-4edb-9219-e0a5cdf9b31d"],
-Cell[35517, 757, 492, 7, 25, "Output",ExpressionUUID->"85074921-98fb-4fbd-91ef-b733df3a8845"]
+Cell[35157, 748, 355, 7, 22, "Input",ExpressionUUID->"0c67dbb9-49b6-4edb-9219-e0a5cdf9b31d"],
+Cell[35515, 757, 492, 7, 25, "Output",ExpressionUUID->"85074921-98fb-4fbd-91ef-b733df3a8845"]
}, Open ]],
-Cell[36024, 767, 435, 12, 35, "Input",ExpressionUUID->"06818f5b-ee0e-4634-b547-e05e415c12a6"],
-Cell[36462, 781, 312, 8, 27, "Input",ExpressionUUID->"ab28ae26-b52f-4a56-978d-e7ee3f806eda"],
-Cell[36777, 791, 676, 19, 44, "Input",ExpressionUUID->"eec97d73-ae34-443d-825f-cbb8adebe02f"],
+Cell[36022, 767, 435, 12, 35, "Input",ExpressionUUID->"06818f5b-ee0e-4634-b547-e05e415c12a6"],
+Cell[36460, 781, 312, 8, 27, "Input",ExpressionUUID->"ab28ae26-b52f-4a56-978d-e7ee3f806eda"],
+Cell[36775, 791, 676, 19, 44, "Input",ExpressionUUID->"eec97d73-ae34-443d-825f-cbb8adebe02f"],
Cell[CellGroupData[{
-Cell[37478, 814, 196, 3, 22, "Input",ExpressionUUID->"83c0ad8f-8d45-4089-b5a6-d03efc9cdfbe"],
-Cell[37677, 819, 217, 3, 25, "Output",ExpressionUUID->"8a53c8d7-c295-47d2-aa7f-189bb8a2f899"]
+Cell[37476, 814, 196, 3, 22, "Input",ExpressionUUID->"83c0ad8f-8d45-4089-b5a6-d03efc9cdfbe"],
+Cell[37675, 819, 217, 3, 25, "Output",ExpressionUUID->"8a53c8d7-c295-47d2-aa7f-189bb8a2f899"]
}, Open ]],
-Cell[37909, 825, 2505, 60, 39, "Input",ExpressionUUID->"def223fd-aeee-4091-9e76-97462b62b6cc"],
-Cell[40417, 887, 5604, 139, 116, "Input",ExpressionUUID->"f1078ecd-48ad-4003-b086-93bd8c2242bb"],
-Cell[46024, 1028, 7652, 192, 193, "Input",ExpressionUUID->"244eac76-0bbb-4e5a-9b06-0f294e654a3f"],
+Cell[37907, 825, 2505, 60, 77, "Input",ExpressionUUID->"def223fd-aeee-4091-9e76-97462b62b6cc"],
+Cell[40415, 887, 5604, 139, 228, "Input",ExpressionUUID->"f1078ecd-48ad-4003-b086-93bd8c2242bb"],
+Cell[46022, 1028, 7652, 192, 311, "Input",ExpressionUUID->"244eac76-0bbb-4e5a-9b06-0f294e654a3f"],
Cell[CellGroupData[{
-Cell[53701, 1224, 694, 11, 22, "Input",ExpressionUUID->"28a195c1-e132-4911-80e7-05e2e1470f78"],
-Cell[54398, 1237, 32305, 586, 74, "Output",ExpressionUUID->"577d2755-a6c5-47a3-9e67-78c4a4c9e8b1"]
+Cell[53699, 1224, 694, 11, 22, "Input",ExpressionUUID->"28a195c1-e132-4911-80e7-05e2e1470f78"],
+Cell[54396, 1237, 32305, 586, 74, "Output",ExpressionUUID->"577d2755-a6c5-47a3-9e67-78c4a4c9e8b1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[86740, 1828, 676, 13, 22, "Input",ExpressionUUID->"e68d9ce5-814e-4498-aeeb-52ccf1b87537"],
-Cell[87419, 1843, 31492, 576, 74, "Output",ExpressionUUID->"9496b18b-d8fb-4070-8783-a932a49d22f3"]
+Cell[86738, 1828, 676, 13, 22, "Input",ExpressionUUID->"e68d9ce5-814e-4498-aeeb-52ccf1b87537"],
+Cell[87417, 1843, 31492, 576, 74, "Output",ExpressionUUID->"9496b18b-d8fb-4070-8783-a932a49d22f3"]
}, Open ]],
Cell[CellGroupData[{
-Cell[118948, 2424, 725, 13, 22, "Input",ExpressionUUID->"9df7247c-bae3-4562-95d7-d5d547f8369d"],
-Cell[119676, 2439, 31654, 579, 74, "Output",ExpressionUUID->"9cd54024-e29b-456b-a509-0492f8827637"]
+Cell[118946, 2424, 725, 13, 22, "Input",ExpressionUUID->"9df7247c-bae3-4562-95d7-d5d547f8369d"],
+Cell[119674, 2439, 31654, 579, 74, "Output",ExpressionUUID->"9cd54024-e29b-456b-a509-0492f8827637"]
}, Open ]],
-Cell[151345, 3021, 795, 19, 53, "Input",ExpressionUUID->"9c8fbe7e-534f-4567-b9e1-d7a5c3ce1086"]
+Cell[151343, 3021, 795, 19, 53, "Input",ExpressionUUID->"9c8fbe7e-534f-4567-b9e1-d7a5c3ce1086"]
}, Open ]],
Cell[CellGroupData[{
-Cell[152177, 3045, 157, 3, 50, "Section",ExpressionUUID->"8475cc42-326a-4ebf-b66b-7d80366a5280"],
-Cell[152337, 3050, 6532, 182, 341, "Input",ExpressionUUID->"830d12ec-ccc1-4fbc-9de0-2282430f4840"],
-Cell[158872, 3234, 1567, 47, 22, "Input",ExpressionUUID->"bcf9e08b-5bc8-4156-8987-ae991b3777be"],
-Cell[160442, 3283, 702, 18, 38, "Input",ExpressionUUID->"90676af5-535d-4801-950c-574cc68db098"],
+Cell[152175, 3045, 157, 3, 50, "Section",ExpressionUUID->"8475cc42-326a-4ebf-b66b-7d80366a5280"],
+Cell[152335, 3050, 6531, 182, 341, "Input",ExpressionUUID->"830d12ec-ccc1-4fbc-9de0-2282430f4840"],
+Cell[158869, 3234, 1566, 47, 53, "Input",ExpressionUUID->"bcf9e08b-5bc8-4156-8987-ae991b3777be"],
+Cell[160438, 3283, 701, 18, 38, "Input",ExpressionUUID->"90676af5-535d-4801-950c-574cc68db098"],
+Cell[CellGroupData[{
+Cell[161164, 3305, 236, 4, 22, "Input",ExpressionUUID->"3e4fb69d-9599-4326-945e-414023395a5f"],
+Cell[161403, 3311, 1439, 31, 111, "Output",ExpressionUUID->"5b6dfc95-6cda-4b27-a377-f74ab71517d2"]
+}, Open ]],
+Cell[CellGroupData[{
+Cell[162879, 3347, 467, 12, 22, "Input",ExpressionUUID->"692c829b-e066-4a5e-bd71-7d2bb33fb03d"],
+Cell[163349, 3361, 1448, 32, 111, "Output",ExpressionUUID->"157a005e-ef56-4427-8003-7bf5e0bbee2d"]
+}, Open ]],
Cell[CellGroupData[{
-Cell[161169, 3305, 237, 4, 22, "Input",ExpressionUUID->"3e4fb69d-9599-4326-945e-414023395a5f"],
-Cell[161409, 3311, 1418, 31, 111, "Output",ExpressionUUID->"dc8c4d24-e3b9-4519-b25a-d1b37a8ca665"]
+Cell[164834, 3398, 709, 20, 22, "Input",ExpressionUUID->"9dee447a-c909-40cb-8546-4295c33c7ecb"],
+Cell[165546, 3420, 668, 9, 25, "Output",ExpressionUUID->"eca32abc-9cef-4928-b496-8f693beedfaa"]
}, Open ]],
+Cell[166229, 3432, 3805, 98, 110, "Input",ExpressionUUID->"ae225317-c8f2-42eb-a092-5a3d6696fcf1"],
Cell[CellGroupData[{
-Cell[162864, 3347, 468, 12, 22, "Input",ExpressionUUID->"692c829b-e066-4a5e-bd71-7d2bb33fb03d"],
-Cell[163335, 3361, 1427, 32, 111, "Output",ExpressionUUID->"1d662128-382e-4f15-b860-f781d0e058f9"]
+Cell[170059, 3534, 1020, 27, 39, "Input",ExpressionUUID->"441c736d-f94a-4b61-ae4a-050ffb34f1d4"],
+Cell[171082, 3563, 4956, 136, 124, "Output",ExpressionUUID->"1e108568-0a21-4daf-a8ee-a4654bc765f6"]
}, Open ]],
Cell[CellGroupData[{
-Cell[164799, 3398, 710, 20, 22, "Input",ExpressionUUID->"9dee447a-c909-40cb-8546-4295c33c7ecb"],
-Cell[165512, 3420, 647, 9, 25, "Output",ExpressionUUID->"f17e3a44-13b0-4bd9-987a-b8c0d0f58652"]
+Cell[176075, 3704, 1980, 63, 41, "Input",ExpressionUUID->"da099c4a-d072-47b7-a4c0-1d2e953c1613"],
+Cell[178058, 3769, 12182, 366, 143, "Output",ExpressionUUID->"2e335f2a-9fef-43a8-9084-365867a1db49"]
}, Open ]],
-Cell[166174, 3432, 3806, 98, 78, "Input",ExpressionUUID->"ae225317-c8f2-42eb-a092-5a3d6696fcf1"],
Cell[CellGroupData[{
-Cell[170005, 3534, 925, 25, 24, "Input",ExpressionUUID->"441c736d-f94a-4b61-ae4a-050ffb34f1d4"],
-Cell[170933, 3561, 4940, 137, 84, "Output",ExpressionUUID->"7e5b218a-4bf7-4e16-b6af-f640354de52c"]
+Cell[190277, 4140, 6837, 203, 59, "Input",ExpressionUUID->"c0add40d-eaa6-456f-8505-abe2286e5787"],
+Cell[197117, 4345, 6167, 201, 62, "Output",ExpressionUUID->"13ac65e6-8e7b-45f5-9963-38143953c129"]
}, Open ]],
Cell[CellGroupData[{
-Cell[175910, 3703, 994, 24, 22, "Input",ExpressionUUID->"27f3f5fd-a103-416e-9e22-49288939ab46"],
-Cell[176907, 3729, 6542, 175, 73, "Output",ExpressionUUID->"1b144bac-a028-45f3-a721-bd16185eb07c"]
+Cell[203321, 4551, 994, 24, 22, "Input",ExpressionUUID->"27f3f5fd-a103-416e-9e22-49288939ab46"],
+Cell[204318, 4577, 6542, 175, 141, "Output",ExpressionUUID->"1b144bac-a028-45f3-a721-bd16185eb07c"]
}, Open ]],
Cell[CellGroupData[{
-Cell[183486, 3909, 906, 25, 24, "Input",ExpressionUUID->"ad63e4bc-666e-46ed-8c23-6d418adb2b5d"],
-Cell[184395, 3936, 3915, 116, 55, "Output",ExpressionUUID->"85986fc9-5212-4924-bbb0-44c85aa62f64"]
+Cell[210897, 4757, 906, 25, 24, "Input",ExpressionUUID->"ad63e4bc-666e-46ed-8c23-6d418adb2b5d"],
+Cell[211806, 4784, 3915, 116, 89, "Output",ExpressionUUID->"85986fc9-5212-4924-bbb0-44c85aa62f64"]
}, Open ]],
-Cell[188325, 4055, 984, 20, 22, "Input",ExpressionUUID->"c88cdbf9-9e5d-49a2-927e-12c0fc1e998e"],
-Cell[189312, 4077, 2604, 54, 24, "Input",ExpressionUUID->"13c828e2-dc96-418a-98b1-bcedb602773f"],
+Cell[215736, 4903, 984, 20, 22, "Input",ExpressionUUID->"c88cdbf9-9e5d-49a2-927e-12c0fc1e998e"],
+Cell[216723, 4925, 2604, 54, 41, "Input",ExpressionUUID->"13c828e2-dc96-418a-98b1-bcedb602773f"],
Cell[CellGroupData[{
-Cell[191941, 4135, 419, 10, 22, "Input",ExpressionUUID->"5547b70f-6ccc-4c3c-b7a2-430267adff70"],
-Cell[192363, 4147, 5767, 145, 160, "Output",ExpressionUUID->"f66850fa-e64c-45dd-b704-5045a5ac66bd"]
+Cell[219352, 4983, 419, 10, 22, "Input",ExpressionUUID->"5547b70f-6ccc-4c3c-b7a2-430267adff70"],
+Cell[219774, 4995, 5767, 145, 309, "Output",ExpressionUUID->"f66850fa-e64c-45dd-b704-5045a5ac66bd"]
}, Open ]],
Cell[CellGroupData[{
-Cell[198167, 4297, 431, 10, 22, "Input",ExpressionUUID->"87393889-0e58-4140-85b8-c09bdfb83fa6"],
-Cell[198601, 4309, 11262, 318, 177, "Output",ExpressionUUID->"f6ce55a2-7f04-49c0-800a-b712e2e93692"]
+Cell[225578, 5145, 431, 10, 22, "Input",ExpressionUUID->"87393889-0e58-4140-85b8-c09bdfb83fa6"],
+Cell[226012, 5157, 11262, 318, 390, "Output",ExpressionUUID->"f6ce55a2-7f04-49c0-800a-b712e2e93692"]
}, Open ]],
Cell[CellGroupData[{
-Cell[209900, 4632, 472, 12, 22, "Input",ExpressionUUID->"4d2d8f62-3f6d-45b3-9a63-780219e0e7e8"],
-Cell[210375, 4646, 1391, 36, 27, "Output",ExpressionUUID->"de5a6a45-70fe-4fde-8b20-59e5cc7175f7"]
+Cell[237311, 5480, 472, 12, 22, "Input",ExpressionUUID->"4d2d8f62-3f6d-45b3-9a63-780219e0e7e8"],
+Cell[237786, 5494, 1391, 36, 27, "Output",ExpressionUUID->"de5a6a45-70fe-4fde-8b20-59e5cc7175f7"]
}, Open ]],
Cell[CellGroupData[{
-Cell[211803, 4687, 947, 20, 22, "Input",ExpressionUUID->"83eebe5d-3503-4b31-b14f-639ea14a0248"],
-Cell[212753, 4709, 844, 16, 22, "Message",ExpressionUUID->"55c5134f-0549-48cf-b7a6-054801bf5ad4"]
+Cell[239214, 5535, 947, 20, 22, "Input",ExpressionUUID->"83eebe5d-3503-4b31-b14f-639ea14a0248"],
+Cell[240164, 5557, 844, 16, 22, "Message",ExpressionUUID->"55c5134f-0549-48cf-b7a6-054801bf5ad4"]
}, Open ]],
-Cell[213612, 4728, 1160, 24, 22, "Input",ExpressionUUID->"4c448220-e031-41d2-9096-b9e341dcd981"],
-Cell[214775, 4754, 3839, 84, 41, "Input",ExpressionUUID->"63ea8c17-6059-4955-9b14-1b9deb692962"],
+Cell[241023, 5576, 1160, 24, 22, "Input",ExpressionUUID->"4c448220-e031-41d2-9096-b9e341dcd981"],
+Cell[242186, 5602, 3839, 84, 58, "Input",ExpressionUUID->"63ea8c17-6059-4955-9b14-1b9deb692962"],
Cell[CellGroupData[{
-Cell[218639, 4842, 1255, 27, 24, "Input",ExpressionUUID->"7fe546c9-0af1-4973-85bb-971e16ca3307"],
-Cell[219897, 4871, 1752, 40, 48, "Output",ExpressionUUID->"39969724-0d91-4ef4-b410-c18d0a8e2303"]
+Cell[246050, 5690, 1255, 27, 24, "Input",ExpressionUUID->"7fe546c9-0af1-4973-85bb-971e16ca3307"],
+Cell[247308, 5719, 1752, 40, 38, "Output",ExpressionUUID->"39969724-0d91-4ef4-b410-c18d0a8e2303"]
}, Open ]],
-Cell[221664, 4914, 968, 26, 24, "Input",ExpressionUUID->"84934d64-fc27-4a55-a1de-6f9f09494033"],
-Cell[222635, 4942, 362, 10, 22, "Input",ExpressionUUID->"83f76904-20b3-4c92-8479-9704a86e9bc3"],
+Cell[249075, 5762, 968, 26, 24, "Input",ExpressionUUID->"84934d64-fc27-4a55-a1de-6f9f09494033"],
+Cell[250046, 5790, 362, 10, 22, "Input",ExpressionUUID->"83f76904-20b3-4c92-8479-9704a86e9bc3"],
Cell[CellGroupData[{
-Cell[223022, 4956, 178, 3, 22, "Input",ExpressionUUID->"18644ace-46f3-463e-bb29-b07ed4d9811c"],
-Cell[223203, 4961, 26005, 545, 291, "Output",ExpressionUUID->"d9254789-0045-43f6-9526-bb536e039a69"]
+Cell[250433, 5804, 178, 3, 22, "Input",ExpressionUUID->"18644ace-46f3-463e-bb29-b07ed4d9811c"],
+Cell[250614, 5809, 26005, 545, 611, "Output",ExpressionUUID->"d9254789-0045-43f6-9526-bb536e039a69"]
}, Open ]],
-Cell[249223, 5509, 890, 19, 22, "Input",ExpressionUUID->"82f4b3f0-5071-4e29-8e26-febf3110e5e0"],
+Cell[276634, 6357, 890, 19, 22, "Input",ExpressionUUID->"82f4b3f0-5071-4e29-8e26-febf3110e5e0"],
Cell[CellGroupData[{
-Cell[250138, 5532, 3664, 87, 107, "Input",ExpressionUUID->"acfb6249-e04b-4f94-810b-05af73aac0bc"],
-Cell[253805, 5621, 3577, 71, 70, "Output",ExpressionUUID->"1f705e83-d82e-4eb3-b5d0-7016c511c55a"]
+Cell[277549, 6380, 3664, 87, 125, "Input",ExpressionUUID->"acfb6249-e04b-4f94-810b-05af73aac0bc"],
+Cell[281216, 6469, 3577, 71, 90, "Output",ExpressionUUID->"1f705e83-d82e-4eb3-b5d0-7016c511c55a"]
}, Open ]],
Cell[CellGroupData[{
-Cell[257419, 5697, 2813, 63, 24, "Input",ExpressionUUID->"2a2f7dd9-b465-4d3a-81cf-abf195bcfc21"],
-Cell[260235, 5762, 751, 14, 22, "Message",ExpressionUUID->"022a1ca5-a3f6-4746-885d-a0317a32fe74"],
-Cell[260989, 5778, 749, 14, 22, "Message",ExpressionUUID->"ccb61a53-c9d0-4b66-9a6d-5527317cf820"],
-Cell[261741, 5794, 748, 14, 22, "Message",ExpressionUUID->"e67913d1-7922-45b2-a3fc-422e54270fef"],
-Cell[262492, 5810, 618, 12, 22, "Message",ExpressionUUID->"8897a997-3fdd-4724-8013-1940d466953d"]
+Cell[284830, 6545, 2813, 63, 72, "Input",ExpressionUUID->"2a2f7dd9-b465-4d3a-81cf-abf195bcfc21"],
+Cell[287646, 6610, 751, 14, 36, "Message",ExpressionUUID->"022a1ca5-a3f6-4746-885d-a0317a32fe74"],
+Cell[288400, 6626, 749, 14, 36, "Message",ExpressionUUID->"ccb61a53-c9d0-4b66-9a6d-5527317cf820"],
+Cell[289152, 6642, 748, 14, 36, "Message",ExpressionUUID->"e67913d1-7922-45b2-a3fc-422e54270fef"],
+Cell[289903, 6658, 618, 12, 22, "Message",ExpressionUUID->"8897a997-3fdd-4724-8013-1940d466953d"]
}, Open ]],
Cell[CellGroupData[{
-Cell[263147, 5827, 1907, 53, 39, "Input",ExpressionUUID->"f6acd6ad-220b-4828-a7d3-5558b5c91e4c"],
-Cell[265057, 5882, 3429, 88, 85, "Output",ExpressionUUID->"cf13c926-28f8-45f7-af10-fb9df9bfa856"]
+Cell[290558, 6675, 1907, 53, 70, "Input",ExpressionUUID->"f6acd6ad-220b-4828-a7d3-5558b5c91e4c"],
+Cell[292468, 6730, 3429, 88, 136, "Output",ExpressionUUID->"cf13c926-28f8-45f7-af10-fb9df9bfa856"]
}, Open ]],
-Cell[268501, 5973, 1583, 41, 24, "Input",ExpressionUUID->"b04acde6-1c4d-4632-b34e-b05a8c3158f7"],
+Cell[295912, 6821, 1583, 41, 72, "Input",ExpressionUUID->"b04acde6-1c4d-4632-b34e-b05a8c3158f7"],
Cell[CellGroupData[{
-Cell[270109, 6018, 310, 8, 22, "Input",ExpressionUUID->"bb7ea87c-a295-4530-bdcd-103371a64b77"],
-Cell[270422, 6028, 75679, 1309, 194, "Output",ExpressionUUID->"f3df510c-64d4-493f-be4b-77179f3e1041"]
+Cell[297520, 6866, 310, 8, 22, "Input",ExpressionUUID->"bb7ea87c-a295-4530-bdcd-103371a64b77"],
+Cell[297833, 6876, 75679, 1309, 183, "Output",ExpressionUUID->"f3df510c-64d4-493f-be4b-77179f3e1041"]
}, Open ]],
-Cell[346116, 7340, 573, 14, 38, "Input",ExpressionUUID->"e965b82f-c267-4cf2-88c2-30c8f6edbaa7"],
-Cell[346692, 7356, 6173, 126, 56, "Input",ExpressionUUID->"0e4fc5bc-9f3c-4021-8d39-840e7c78e01d"],
+Cell[373527, 8188, 573, 14, 38, "Input",ExpressionUUID->"e965b82f-c267-4cf2-88c2-30c8f6edbaa7"],
+Cell[374103, 8204, 6173, 126, 108, "Input",ExpressionUUID->"0e4fc5bc-9f3c-4021-8d39-840e7c78e01d"],
Cell[CellGroupData[{
-Cell[352890, 7486, 915, 26, 24, "Input",ExpressionUUID->"f60a2b45-e619-4e66-a5fe-f654a250e3c1"],
-Cell[353808, 7514, 721, 12, 35, "Output",ExpressionUUID->"96d1045a-9474-43ec-8292-bc7debf68953"]
+Cell[380301, 8334, 915, 26, 24, "Input",ExpressionUUID->"f60a2b45-e619-4e66-a5fe-f654a250e3c1"],
+Cell[381219, 8362, 721, 12, 25, "Output",ExpressionUUID->"96d1045a-9474-43ec-8292-bc7debf68953"]
}, Open ]],
Cell[CellGroupData[{
-Cell[354566, 7531, 1101, 29, 24, "Input",ExpressionUUID->"966871e9-cb76-4279-9fae-2e272197164a"],
-Cell[355670, 7562, 869, 14, 35, "Output",ExpressionUUID->"bd005f2c-3540-40bc-973d-0f7a71b82930"]
+Cell[381977, 8379, 1101, 29, 24, "Input",ExpressionUUID->"966871e9-cb76-4279-9fae-2e272197164a"],
+Cell[383081, 8410, 869, 14, 25, "Output",ExpressionUUID->"bd005f2c-3540-40bc-973d-0f7a71b82930"]
}, Open ]],
Cell[CellGroupData[{
-Cell[356576, 7581, 1007, 28, 24, "Input",ExpressionUUID->"d19d89e4-a282-47a0-a129-6bfc594811ce"],
-Cell[357586, 7611, 775, 13, 35, "Output",ExpressionUUID->"ce944e89-67da-4135-b451-ebdaa58d62aa"]
+Cell[383987, 8429, 1007, 28, 24, "Input",ExpressionUUID->"d19d89e4-a282-47a0-a129-6bfc594811ce"],
+Cell[384997, 8459, 775, 13, 25, "Output",ExpressionUUID->"ce944e89-67da-4135-b451-ebdaa58d62aa"]
}, Open ]],
Cell[CellGroupData[{
-Cell[358398, 7629, 758, 19, 22, "Input",ExpressionUUID->"0a707b26-1c87-4e49-9fde-e91e569d127e"],
-Cell[359159, 7650, 13763, 316, 72, "Output",ExpressionUUID->"01979e1e-9bf7-4837-a6a1-76d3e2ca2f24"]
+Cell[385809, 8477, 758, 19, 22, "Input",ExpressionUUID->"0a707b26-1c87-4e49-9fde-e91e569d127e"],
+Cell[386570, 8498, 13763, 316, 62, "Output",ExpressionUUID->"01979e1e-9bf7-4837-a6a1-76d3e2ca2f24"]
}, Open ]],
Cell[CellGroupData[{
-Cell[372959, 7971, 3983, 94, 38, "Input",ExpressionUUID->"abdd1227-571e-42c2-ba14-b0236a50da8f"],
-Cell[376945, 8067, 136157, 2406, 145, "Output",ExpressionUUID->"9e89ad7d-0b3a-4232-a289-73138258011c"]
+Cell[400370, 8819, 3983, 94, 38, "Input",ExpressionUUID->"abdd1227-571e-42c2-ba14-b0236a50da8f"],
+Cell[404356, 8915, 136149, 2406, 135, "Output",ExpressionUUID->"9e89ad7d-0b3a-4232-a289-73138258011c"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[513151, 10479, 166, 3, 50, "Section",ExpressionUUID->"e8e3024e-103e-44c3-bff6-eeb43f1280c8"],
-Cell[513320, 10484, 2020, 56, 35, "Input",ExpressionUUID->"01b4718d-1b06-4ca9-9828-eb7538126c81"],
+Cell[540554, 11327, 166, 3, 50, "Section",ExpressionUUID->"e8e3024e-103e-44c3-bff6-eeb43f1280c8"],
+Cell[540723, 11332, 2020, 56, 35, "Input",ExpressionUUID->"01b4718d-1b06-4ca9-9828-eb7538126c81"],
Cell[CellGroupData[{
-Cell[515365, 10544, 683, 19, 22, "Input",ExpressionUUID->"18b98bab-0eb8-4c66-8662-8b5e34efa820"],
-Cell[516051, 10565, 1017, 15, 65, "Output",ExpressionUUID->"28d11ee2-0596-4d50-9a1e-cbeee6fe020f"]
+Cell[542768, 11392, 683, 19, 22, "Input",ExpressionUUID->"18b98bab-0eb8-4c66-8662-8b5e34efa820"],
+Cell[543454, 11413, 1036, 15, 63, "Output",ExpressionUUID->"28d11ee2-0596-4d50-9a1e-cbeee6fe020f"]
}, Open ]],
-Cell[517083, 10583, 3356, 76, 53, "Input",ExpressionUUID->"54eb6310-6546-48ff-bb13-776eec083f58"],
+Cell[544505, 11431, 3356, 76, 53, "Input",ExpressionUUID->"54eb6310-6546-48ff-bb13-776eec083f58"],
Cell[CellGroupData[{
-Cell[520464, 10663, 1619, 42, 24, "Input",ExpressionUUID->"dfdd1eea-966a-4bd0-8f13-2b14628904cd"],
-Cell[522086, 10707, 47641, 852, 186, "Output",ExpressionUUID->"4b18b0e6-da57-47d7-8170-1cbe02c23f44"]
+Cell[547886, 11511, 1619, 42, 24, "Input",ExpressionUUID->"dfdd1eea-966a-4bd0-8f13-2b14628904cd"],
+Cell[549508, 11555, 47641, 852, 186, "Output",ExpressionUUID->"4b18b0e6-da57-47d7-8170-1cbe02c23f44"]
}, Open ]],
Cell[CellGroupData[{
-Cell[569764, 11564, 618, 17, 22, "Input",ExpressionUUID->"f71f24e9-9817-4053-9bea-a250d010efff"],
-Cell[570385, 11583, 87714, 1572, 288, "Output",ExpressionUUID->"b61fdba8-e6cc-4e49-8ada-29b397873cb1"]
+Cell[597186, 12412, 618, 17, 22, "Input",ExpressionUUID->"f71f24e9-9817-4053-9bea-a250d010efff"],
+Cell[597807, 12431, 87714, 1572, 288, "Output",ExpressionUUID->"b61fdba8-e6cc-4e49-8ada-29b397873cb1"]
}, Open ]],
Cell[CellGroupData[{
-Cell[658136, 13160, 707, 19, 22, "Input",ExpressionUUID->"de157c7b-b709-4e1e-8df1-e3e28f52b43f"],
-Cell[658846, 13181, 44199, 801, 179, "Output",ExpressionUUID->"ee7cf310-ffc9-4000-8be1-72457e8e1cb8"]
+Cell[685558, 14008, 707, 19, 22, "Input",ExpressionUUID->"de157c7b-b709-4e1e-8df1-e3e28f52b43f"],
+Cell[686268, 14029, 44199, 801, 179, "Output",ExpressionUUID->"ee7cf310-ffc9-4000-8be1-72457e8e1cb8"]
}, Open ]],
Cell[CellGroupData[{
-Cell[703082, 13987, 703, 20, 35, "Input",ExpressionUUID->"c481b209-2bcd-4c5b-9300-64e792165889"],
-Cell[703788, 14009, 191, 3, 25, "Output",ExpressionUUID->"e229148f-e3cd-49b3-a2a8-d25d53f79d45"]
+Cell[730504, 14835, 703, 20, 35, "Input",ExpressionUUID->"c481b209-2bcd-4c5b-9300-64e792165889"],
+Cell[731210, 14857, 191, 3, 25, "Output",ExpressionUUID->"e229148f-e3cd-49b3-a2a8-d25d53f79d45"]
}, Open ]],
-Cell[703994, 14015, 480, 14, 39, "Input",ExpressionUUID->"f117b50a-92dc-4e32-abab-3922821a7857"],
+Cell[731416, 14863, 480, 14, 39, "Input",ExpressionUUID->"f117b50a-92dc-4e32-abab-3922821a7857"],
Cell[CellGroupData[{
-Cell[704499, 14033, 5205, 126, 61, "Input",ExpressionUUID->"ac3f0bd9-271b-4050-a7c4-8134f5842c06"],
-Cell[709707, 14161, 168828, 2864, 145, "Output",ExpressionUUID->"dd8dc669-3267-4282-8329-809350365c56"]
+Cell[731921, 14881, 5205, 126, 144, "Input",ExpressionUUID->"ac3f0bd9-271b-4050-a7c4-8134f5842c06"],
+Cell[737129, 15009, 168828, 2864, 135, "Output",ExpressionUUID->"dd8dc669-3267-4282-8329-809350365c56"]
}, Open ]],
-Cell[878550, 17028, 770, 19, 53, "Input",ExpressionUUID->"c4b7a709-0c12-406e-817b-d5ab6248e215"]
+Cell[905972, 17876, 770, 19, 53, "Input",ExpressionUUID->"c4b7a709-0c12-406e-817b-d5ab6248e215"]
}, Open ]],
Cell[CellGroupData[{
-Cell[879357, 17052, 166, 3, 50, "Section",ExpressionUUID->"30f349f0-0201-45b2-b5a3-8e49839759e0"],
-Cell[879526, 17057, 2725, 67, 35, "Input",ExpressionUUID->"45a50f4a-d97f-42b1-ada9-24fc0845df15"],
-Cell[882254, 17126, 440, 13, 35, "Input",ExpressionUUID->"70d06993-9c98-4ef4-85b3-edb1c3ba7f4e"],
+Cell[906779, 17900, 166, 3, 50, "Section",ExpressionUUID->"30f349f0-0201-45b2-b5a3-8e49839759e0"],
+Cell[906948, 17905, 2725, 67, 35, "Input",ExpressionUUID->"45a50f4a-d97f-42b1-ada9-24fc0845df15"],
+Cell[909676, 17974, 440, 13, 35, "Input",ExpressionUUID->"70d06993-9c98-4ef4-85b3-edb1c3ba7f4e"],
Cell[CellGroupData[{
-Cell[882719, 17143, 1050, 28, 22, "Input",ExpressionUUID->"8c463f84-76c8-4379-88b6-1e727102231e"],
-Cell[883772, 17173, 10958, 307, 106, "Output",ExpressionUUID->"2ae85ee5-ac37-40ff-9e25-33aba3eab114"]
+Cell[910141, 17991, 1050, 28, 22, "Input",ExpressionUUID->"8c463f84-76c8-4379-88b6-1e727102231e"],
+Cell[911194, 18021, 10958, 307, 96, "Output",ExpressionUUID->"2ae85ee5-ac37-40ff-9e25-33aba3eab114"]
}, Open ]],
Cell[CellGroupData[{
-Cell[894767, 17485, 1348, 36, 39, "Input",ExpressionUUID->"96d20562-b958-4d4f-ac54-fb5edc1b11d7"],
-Cell[896118, 17523, 2211, 72, 56, "Output",ExpressionUUID->"a162cdc1-705f-4672-ae1a-890773989108"]
+Cell[922189, 18333, 1348, 36, 39, "Input",ExpressionUUID->"96d20562-b958-4d4f-ac54-fb5edc1b11d7"],
+Cell[923540, 18371, 2211, 72, 45, "Output",ExpressionUUID->"a162cdc1-705f-4672-ae1a-890773989108"]
}, Open ]],
Cell[CellGroupData[{
-Cell[898366, 17600, 872, 26, 25, "Input",ExpressionUUID->"45b7bda0-6295-48d7-9a9b-df79450c99c1"],
-Cell[899241, 17628, 18704, 355, 192, "Output",ExpressionUUID->"a27c23e2-1920-4360-9a69-b257e0d81f2f"]
+Cell[925788, 18448, 872, 26, 25, "Input",ExpressionUUID->"45b7bda0-6295-48d7-9a9b-df79450c99c1"],
+Cell[926663, 18476, 18704, 355, 182, "Output",ExpressionUUID->"a27c23e2-1920-4360-9a69-b257e0d81f2f"]
}, Open ]],
-Cell[917960, 17986, 3196, 86, 73, "Input",ExpressionUUID->"4214fe68-3ea2-4071-92ec-d501f3d25cf0"],
+Cell[945382, 18834, 3196, 86, 73, "Input",ExpressionUUID->"4214fe68-3ea2-4071-92ec-d501f3d25cf0"],
Cell[CellGroupData[{
-Cell[921181, 18076, 951, 27, 39, "Input",ExpressionUUID->"a5cb9abb-ed86-4976-9ecc-fd5518916c55"],
-Cell[922135, 18105, 3246, 93, 100, "Output",ExpressionUUID->"9b8c1e46-3986-413d-b7bf-6aa94b87eb6e"]
+Cell[948603, 18924, 951, 27, 39, "Input",ExpressionUUID->"a5cb9abb-ed86-4976-9ecc-fd5518916c55"],
+Cell[949557, 18953, 3246, 93, 100, "Output",ExpressionUUID->"9b8c1e46-3986-413d-b7bf-6aa94b87eb6e"]
}, Open ]],
Cell[CellGroupData[{
-Cell[925418, 18203, 1329, 34, 22, "Input",ExpressionUUID->"db85a58a-435c-4d0a-8c51-0c2640969430"],
-Cell[926750, 18239, 1880, 60, 55, "Output",ExpressionUUID->"8a35ea3d-ed21-4e33-8824-c132d8b27c9e"]
+Cell[952840, 19051, 1329, 34, 22, "Input",ExpressionUUID->"db85a58a-435c-4d0a-8c51-0c2640969430"],
+Cell[954172, 19087, 1880, 60, 55, "Output",ExpressionUUID->"8a35ea3d-ed21-4e33-8824-c132d8b27c9e"]
}, Open ]],
Cell[CellGroupData[{
-Cell[928667, 18304, 579, 15, 22, "Input",ExpressionUUID->"c9ffbb5d-6b37-4a76-8c79-d0de5c139a97"],
-Cell[929249, 18321, 11398, 234, 186, "Output",ExpressionUUID->"b59006fe-f37c-4871-a973-46e0413200d9"]
+Cell[956089, 19152, 579, 15, 22, "Input",ExpressionUUID->"c9ffbb5d-6b37-4a76-8c79-d0de5c139a97"],
+Cell[956671, 19169, 11398, 234, 186, "Output",ExpressionUUID->"b59006fe-f37c-4871-a973-46e0413200d9"]
}, Open ]],
-Cell[940662, 18558, 1144, 26, 22, "Input",ExpressionUUID->"4c8d0c76-a2a7-40b1-b6fe-f45c16cb33a3"],
+Cell[968084, 19406, 1144, 26, 22, "Input",ExpressionUUID->"4c8d0c76-a2a7-40b1-b6fe-f45c16cb33a3"],
Cell[CellGroupData[{
-Cell[941831, 18588, 212, 4, 22, "Input",ExpressionUUID->"ad57fc71-fcc6-4fd4-b0f7-b878c240416d"],
-Cell[942046, 18594, 222, 4, 35, "Output",ExpressionUUID->"68f8c96a-c11c-48fd-b259-2e0770fb9704"]
+Cell[969253, 19436, 212, 4, 22, "Input",ExpressionUUID->"ad57fc71-fcc6-4fd4-b0f7-b878c240416d"],
+Cell[969468, 19442, 222, 4, 35, "Output",ExpressionUUID->"68f8c96a-c11c-48fd-b259-2e0770fb9704"]
}, Open ]],
Cell[CellGroupData[{
-Cell[942305, 18603, 260, 6, 22, "Input",ExpressionUUID->"98247650-d262-4810-9a09-b82172ed14d1"],
-Cell[942568, 18611, 156, 3, 35, "Output",ExpressionUUID->"b42de7f5-fb90-493f-8730-505cb6f4fbaf"]
+Cell[969727, 19451, 260, 6, 22, "Input",ExpressionUUID->"98247650-d262-4810-9a09-b82172ed14d1"],
+Cell[969990, 19459, 156, 3, 35, "Output",ExpressionUUID->"b42de7f5-fb90-493f-8730-505cb6f4fbaf"]
}, Open ]],
Cell[CellGroupData[{
-Cell[942761, 18619, 499, 14, 22, "Input",ExpressionUUID->"8d2f4cc8-be70-40f0-8030-791191ae6af8"],
-Cell[943263, 18635, 294, 5, 35, "Output",ExpressionUUID->"bbd7e664-d32d-4da1-af9c-c2d14ddb0f87"]
+Cell[970183, 19467, 499, 14, 22, "Input",ExpressionUUID->"8d2f4cc8-be70-40f0-8030-791191ae6af8"],
+Cell[970685, 19483, 294, 5, 35, "Output",ExpressionUUID->"bbd7e664-d32d-4da1-af9c-c2d14ddb0f87"]
}, Open ]],
Cell[CellGroupData[{
-Cell[943594, 18645, 1565, 45, 22, "Input",ExpressionUUID->"92fb26f6-6860-4b79-9533-0d2feb1db965"],
-Cell[945162, 18692, 17579, 350, 103, "Output",ExpressionUUID->"a5ca0d9b-697f-41aa-9bc9-c6e41f8638f8"]
+Cell[971016, 19493, 1565, 45, 22, "Input",ExpressionUUID->"92fb26f6-6860-4b79-9533-0d2feb1db965"],
+Cell[972584, 19540, 17579, 350, 103, "Output",ExpressionUUID->"a5ca0d9b-697f-41aa-9bc9-c6e41f8638f8"]
}, Open ]],
Cell[CellGroupData[{
-Cell[962778, 19047, 2811, 69, 22, "Input",ExpressionUUID->"158567f8-2e36-4711-872a-8fa10d905ad7"],
-Cell[965592, 19118, 13910, 313, 191, "Output",ExpressionUUID->"5236b89e-0d98-43ce-b98e-febb8307486e"]
+Cell[990200, 19895, 2811, 69, 22, "Input",ExpressionUUID->"158567f8-2e36-4711-872a-8fa10d905ad7"],
+Cell[993014, 19966, 13910, 313, 191, "Output",ExpressionUUID->"5236b89e-0d98-43ce-b98e-febb8307486e"]
}, Open ]],
Cell[CellGroupData[{
-Cell[979539, 19436, 269, 6, 22, "Input",ExpressionUUID->"8cb36fc2-3856-4f28-9961-910e48ddac2e"],
-Cell[979811, 19444, 1863, 40, 36, "Output",ExpressionUUID->"ff0ed560-b332-4bb4-8ac7-253cabf4858e"]
+Cell[1006961, 20284, 269, 6, 22, "Input",ExpressionUUID->"8cb36fc2-3856-4f28-9961-910e48ddac2e"],
+Cell[1007233, 20292, 1863, 40, 36, "Output",ExpressionUUID->"ff0ed560-b332-4bb4-8ac7-253cabf4858e"]
}, Open ]],
Cell[CellGroupData[{
-Cell[981711, 19489, 409, 7, 22, "Input",ExpressionUUID->"3293d30f-7d68-4b6a-8ed3-a65763303491"],
-Cell[982123, 19498, 375, 6, 35, "Output",ExpressionUUID->"e5929c2e-7bce-452b-8da3-30291fa9c8df"]
+Cell[1009133, 20337, 409, 7, 22, "Input",ExpressionUUID->"3293d30f-7d68-4b6a-8ed3-a65763303491"],
+Cell[1009545, 20346, 375, 6, 35, "Output",ExpressionUUID->"e5929c2e-7bce-452b-8da3-30291fa9c8df"]
}, Open ]],
Cell[CellGroupData[{
-Cell[982535, 19509, 4913, 119, 38, "Input",ExpressionUUID->"79ade24b-fc27-4e0b-9ecf-ddb0de8aaff7"],
-Cell[987451, 19630, 56348, 1071, 191, "Output",ExpressionUUID->"d49dfd16-6e40-4701-8389-f2ecef5947c4"]
+Cell[1009957, 20357, 4913, 119, 38, "Input",ExpressionUUID->"79ade24b-fc27-4e0b-9ecf-ddb0de8aaff7"],
+Cell[1014873, 20478, 56348, 1071, 191, "Output",ExpressionUUID->"d49dfd16-6e40-4701-8389-f2ecef5947c4"]
}, Open ]],
Cell[CellGroupData[{
-Cell[1043836, 20706, 4715, 99, 104, "Input",ExpressionUUID->"95fd3173-4c7c-4968-a5e5-50349f8991ff"],
-Cell[1048554, 20807, 78288, 1482, 164, "Output",ExpressionUUID->"5520b420-ca48-4374-9f40-3cf6b68c1fc7"]
+Cell[1071258, 21554, 4715, 99, 104, "Input",ExpressionUUID->"95fd3173-4c7c-4968-a5e5-50349f8991ff"],
+Cell[1075976, 21655, 78288, 1482, 164, "Output",ExpressionUUID->"5520b420-ca48-4374-9f40-3cf6b68c1fc7"]
}, Open ]],
Cell[CellGroupData[{
-Cell[1126879, 22294, 320, 7, 22, "Input",ExpressionUUID->"f8b772de-8c0c-4a56-b222-57a41ad73da1"],
-Cell[1127202, 22303, 642, 10, 35, "Output",ExpressionUUID->"e59eb3bf-6625-4f33-ac38-e54b885b4202"]
+Cell[1154301, 23142, 320, 7, 22, "Input",ExpressionUUID->"f8b772de-8c0c-4a56-b222-57a41ad73da1"],
+Cell[1154624, 23151, 642, 10, 35, "Output",ExpressionUUID->"e59eb3bf-6625-4f33-ac38-e54b885b4202"]
}, Open ]],
Cell[CellGroupData[{
-Cell[1127881, 22318, 254, 6, 22, "Input",ExpressionUUID->"ca871bd4-fd4b-4992-8467-b1ea8a130f23"],
-Cell[1128138, 22326, 2505, 61, 85, "Output",ExpressionUUID->"edd14cfb-2ab3-48f0-858e-ba2c420a7c8a"]
+Cell[1155303, 23166, 254, 6, 22, "Input",ExpressionUUID->"ca871bd4-fd4b-4992-8467-b1ea8a130f23"],
+Cell[1155560, 23174, 2505, 61, 85, "Output",ExpressionUUID->"edd14cfb-2ab3-48f0-858e-ba2c420a7c8a"]
}, Open ]],
Cell[CellGroupData[{
-Cell[1130680, 22392, 6507, 158, 69, "Input",ExpressionUUID->"18770a82-a9ab-4dc0-96f6-90b9a602b037"],
-Cell[1137190, 22552, 26467, 566, 287, "Output",ExpressionUUID->"99a6f973-7b2f-4b45-b8d4-9dbde1fc2de6"]
+Cell[1158102, 23240, 6507, 158, 69, "Input",ExpressionUUID->"18770a82-a9ab-4dc0-96f6-90b9a602b037"],
+Cell[1164612, 23400, 26467, 566, 287, "Output",ExpressionUUID->"99a6f973-7b2f-4b45-b8d4-9dbde1fc2de6"]
}, Open ]],
Cell[CellGroupData[{
-Cell[1163694, 23123, 2354, 65, 143, "Input",ExpressionUUID->"c6046f7d-b5c6-4523-81fd-2e2ab01a6f97"],
-Cell[1166051, 23190, 46183, 950, 520, "Output",ExpressionUUID->"f8fee0d7-6b40-4fdc-8252-25053ddb879b"]
+Cell[1191116, 23971, 2354, 65, 143, "Input",ExpressionUUID->"c6046f7d-b5c6-4523-81fd-2e2ab01a6f97"],
+Cell[1193473, 24038, 46183, 950, 520, "Output",ExpressionUUID->"f8fee0d7-6b40-4fdc-8252-25053ddb879b"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
-Cell[1212283, 24146, 160, 3, 50, "Section",ExpressionUUID->"f122010c-d89c-48b6-a849-06e9f4254e7f"],
-Cell[1212446, 24151, 2883, 92, 49, "Input",ExpressionUUID->"97f59fe8-af38-42ea-9678-6cb9b2e573e2"]
+Cell[1239705, 24994, 160, 3, 50, "Section",ExpressionUUID->"f122010c-d89c-48b6-a849-06e9f4254e7f"],
+Cell[1239868, 24999, 2883, 92, 49, "Input",ExpressionUUID->"97f59fe8-af38-42ea-9678-6cb9b2e573e2"]
}, Open ]]
}
]
diff --git a/marginal.tex b/marginal.tex
index 798d199..8668b68 100644
--- a/marginal.tex
+++ b/marginal.tex
@@ -1183,7 +1183,7 @@ limit of $m\to0$ is taken, we find
\right)\left(
(\tilde q^{12}_0)^2-(\tilde q^{12}_d)^2-\tilde q^{11}_0\tilde q^{22}_0+\tilde q^{11}_d\tilde q^{22}_d
\right) \notag \\
- &\qquad\qquad+\left(
+ &\qquad\qquad-\left(
2(q^{12}_0)^2-(\tilde q^{12}_0)^2-(q^{12}_d)^2-2q^{11}_0q^{22}_0+\tilde q^{11}_0\tilde q^{22}_0+q^{11}_dq^{22}_d
\right)\left(
(\tilde q^{12}_0)^2-(\tilde q^{12}_d)^2-\tilde q^{11}_0\tilde q^{22}_0+\tilde q^{11}_d\tilde q^{22}_d