loos/CBD
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

new data

Browse Source
This commit is contained in:
Pierre-Francois Loos 2021-03-26 15:48:45 +01:00
parent 1673e49464
commit e5ce920e7b
1 changed files with 122 additions and 74 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

196
Notebooks/CBD.nb
View File

@ -10,10 +10,10 @@
NotebookFileLineBreakTest NotebookFileLineBreakTest
NotebookFileLineBreakTest NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7] NotebookDataPosition[ 158, 7]
NotebookDataLength[ 235807, 5719] NotebookDataLength[ 237978, 5767]
NotebookOptionsPosition[ 231003, 5624] NotebookOptionsPosition[ 233174, 5672]
NotebookOutlinePosition[ 231397, 5640] NotebookOutlinePosition[ 233568, 5688]
CellTagsIndexPosition[ 231354, 5637] CellTagsIndexPosition[ 233525, 5685]
WindowFrame->Normal*) WindowFrame->Normal*)
(* Beginning of Notebook Content *) (* Beginning of Notebook Content *)
@ -166,7 +166,7 @@ Cell[BoxData[
RowBox[{"{", RowBox[{"{",
RowBox[{ RowBox[{
"\"\<CC4\>\"", ",", "\"\<aug-cc-pVDZ\>\"", ",", "\"\<\>\"", ",", "\"\<CC4\>\"", ",", "\"\<aug-cc-pVDZ\>\"", ",", "\"\<\>\"", ",",
"\"\<\>\"", ",", "4.041"}], "}"}], ",", "\[IndentingNewLine]", "3.164", ",", "4.041"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"(*", " ", "CCSDTQ", " ", "*)"}], "\[IndentingNewLine]", " ", RowBox[{"(*", " ", "CCSDTQ", " ", "*)"}], "\[IndentingNewLine]", " ",
RowBox[{"{", RowBox[{"{",
RowBox[{ RowBox[{
@ -483,9 +483,10 @@ Cell[BoxData[
3.823326609828835*^9}, {3.823483103860236*^9, 3.823483108796145*^9}, { 3.823326609828835*^9}, {3.823483103860236*^9, 3.823483108796145*^9}, {
3.823529733441641*^9, 3.8235297380443172`*^9}, 3.824441777889266*^9, { 3.823529733441641*^9, 3.8235297380443172`*^9}, 3.824441777889266*^9, {
3.824481557380546*^9, 3.8244815610168753`*^9}, {3.824871656630433*^9, 3.824481557380546*^9, 3.8244815610168753`*^9}, {3.824871656630433*^9,
3.8248716798780317`*^9}, {3.825647331768765*^9, 3.82564734442376*^9}}, 3.8248716798780317`*^9}, {3.825647331768765*^9, 3.82564734442376*^9},
CellLabel->"In[4]:=",ExpressionUUID->"283f461f-fa73-44be-9b2e-3fccbe85020e"] 3.8257401278773537`*^9},
}, Open ]], CellLabel->"In[3]:=",ExpressionUUID->"283f461f-fa73-44be-9b2e-3fccbe85020e"]
}, Closed]],
Cell[CellGroupData[{ Cell[CellGroupData[{
@ -1391,7 +1392,7 @@ Cell[BoxData[
CellLabel-> CellLabel->
"In[209]:=",ExpressionUUID->"1f47c0ab-65f0-4e3d-b3bf-78a937e27006"] "In[209]:=",ExpressionUUID->"1f47c0ab-65f0-4e3d-b3bf-78a937e27006"]
}, Closed]] }, Closed]]
}, Open ]], }, Closed]],
Cell[CellGroupData[{ Cell[CellGroupData[{
@ -1622,7 +1623,7 @@ Cell[BoxData[
"Out[210]//TableForm=",ExpressionUUID->"2be1012c-883f-42eb-b9e3-\ "Out[210]//TableForm=",ExpressionUUID->"2be1012c-883f-42eb-b9e3-\
ba443f8e5e1d"] ba443f8e5e1d"]
}, Open ]] }, Open ]]
}, Open ]], }, Closed]],
Cell[CellGroupData[{ Cell[CellGroupData[{
@ -4763,6 +4764,19 @@ Cell[BoxData[
RowBox[{ RowBox[{
"\"\<\>\"", ",", "\"\<aug-cc-pVQZ\>\"", ",", "0.084", ",", "1.588", "\"\<\>\"", ",", "\"\<aug-cc-pVQZ\>\"", ",", "0.084", ",", "1.588",
",", "\"\<\>\""}], "}"}], ",", "\[IndentingNewLine]", ",", "\"\<\>\""}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"(*", " ", "CC3", " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
"\"\<CC3\>\"", ",", "\"\<6-31+G(d)\>\"", ",", "\"\<\>\"", ",", "1.809",
",", "2.836"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
"\"\<\>\"", ",", "\"\<aug-cc-pVDZ\>\"", ",", "\"\<\>\"", ",", "1.695",
",", "2.646"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
"\"\<\>\"", ",", "\"\<aug-cc-pVTZ\>\"", ",", "\"\<\>\"", ",", "1.662",
",", "2.720"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"(*", " ", "CCSDT", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "CCSDT", " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"{", RowBox[{"{",
RowBox[{ RowBox[{
@ -4783,6 +4797,10 @@ Cell[BoxData[
"\"\<\>\"", ",", "\"\<aug-cc-pVQZ\>\"", ",", "\"\<\>\"", ",", "\"\<\>\"", ",", "\"\<aug-cc-pVQZ\>\"", ",", "\"\<\>\"", ",",
"\"\<\>\"", ",", "\"\<\>\""}], "}"}], ","}], "*)"}], "\"\<\>\"", ",", "\"\<\>\""}], "}"}], ","}], "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"{",
RowBox[{
"\"\<CC4\>\"", ",", "\"\<6-31+G(d)\>\"", ",", "\"\<\>\"", ",", "1.604",
",", "2.121"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{"(*", " ", "CCSDTQ", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", "CCSDTQ", " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"{", RowBox[{"{",
RowBox[{ RowBox[{
@ -5018,7 +5036,9 @@ Cell[BoxData[
RowBox[{"2.102", ",", "0.027"}], "]"}]}], "}"}], ",", RowBox[{"2.102", ",", "0.027"}], "]"}]}], "}"}], ",",
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"{", RowBox[{"{",
RowBox[{"\"\<\>\"", ",", "\"\<aug-cc-pVTZ\>\"", ",", "\"\<\>\"", ",", RowBox[{"\"\<\>\"", ",", "\"\<aug-cc-pVTZ\>\"", ",",
RowBox[{"Around", "[",
RowBox[{"0.176", ",", "0.040"}], "]"}], ",",
RowBox[{"Around", "[", RowBox[{"Around", "[",
RowBox[{"1.659", ",", "0.044"}], "]"}], ",", "\"\<\>\""}], RowBox[{"1.659", ",", "0.044"}], "]"}], ",", "\"\<\>\""}],
RowBox[{"(*", "567286", "*)"}], "}"}]}], "\[IndentingNewLine]", "}"}]}], RowBox[{"(*", "567286", "*)"}], "}"}]}], "\[IndentingNewLine]", "}"}]}],
@ -5063,9 +5083,11 @@ Cell[BoxData[
3.824617029162079*^9, 3.8246170854291067`*^9}, 3.824797966620908*^9, { 3.824617029162079*^9, 3.8246170854291067`*^9}, 3.824797966620908*^9, {
3.8247980371849403`*^9, 3.824798040181305*^9}, {3.8249897672092257`*^9, 3.8247980371849403`*^9, 3.824798040181305*^9}, {3.8249897672092257`*^9,
3.824989774674591*^9}, {3.824989962333706*^9, 3.824989967362425*^9}, { 3.824989774674591*^9}, {3.824989962333706*^9, 3.824989967362425*^9}, {
3.8256748573917227`*^9, 3.8256748573917227`*^9, 3.825674861641438*^9}, {3.825674943622177*^9,
3.825674861641438*^9}},ExpressionUUID->"0fe9f196-cce7-4233-9666-\ 3.825674950484906*^9}, {3.825752246872456*^9, 3.82575227566343*^9}, {
614981e2b593"] 3.8257584292108192`*^9, 3.8257584614289618`*^9}, {3.8257584997186613`*^9,
3.8257585004026318`*^9}},
CellLabel->"In[5]:=",ExpressionUUID->"0fe9f196-cce7-4233-9666-614981e2b593"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
@ -5128,7 +5150,7 @@ Cell[BoxData[
3.820119797451242*^9}, {3.820394165740387*^9, 3.820394165850604*^9}, { 3.820119797451242*^9}, {3.820394165740387*^9, 3.820394165850604*^9}, {
3.8203942656540833`*^9, 3.820394277151956*^9}, 3.822208994665655*^9, { 3.8203942656540833`*^9, 3.820394277151956*^9}, 3.822208994665655*^9, {
3.824617274248993*^9, 3.824617280677133*^9}}, 3.824617274248993*^9, 3.824617280677133*^9}},
CellLabel->"In[8]:=",ExpressionUUID->"a64c1c75-5181-46a3-916b-6c0d8d53cd2a"], CellLabel->"In[6]:=",ExpressionUUID->"a64c1c75-5181-46a3-916b-6c0d8d53cd2a"],
Cell[BoxData[ Cell[BoxData[
TagBox[ TagBox[
@ -5161,6 +5183,15 @@ Cell[BoxData[
{"\<\"\"\>", "\<\"aug-cc-pVQZ\"\>", {"\<\"\"\>", "\<\"aug-cc-pVQZ\"\>",
"0.0840000000000000052`2.9242792860618816", "0.0840000000000000052`2.9242792860618816",
"1.5880000000000000782`4.200850498091078", "\<\"\"\>"}, "1.5880000000000000782`4.200850498091078", "\<\"\"\>"},
{"\<\"CC3\"\>", "\<\"6-31+G(d)\"\>", "\<\"\"\>",
"1.8089999999999999414`4.257438566859814",
"2.8359999999999998543`4.452706226511029"},
{"\<\"\"\>", "\<\"aug-cc-pVDZ\"\>", "\<\"\"\>",
"1.6950000000000000622`4.2291697025391",
"2.6459999999999999076`4.422589839851482"},
{"\<\"\"\>", "\<\"aug-cc-pVTZ\"\>", "\<\"\"\>",
"1.6619999999999999218`4.220631019448092",
"2.7200000000000001954`4.434568904034198"},
{"\<\"CCSDT\"\>", "\<\"6-31+G(d)\"\>", {"\<\"CCSDT\"\>", "\<\"6-31+G(d)\"\>",
"0.2099999999999999922`3.322219294733919", "0.2099999999999999922`3.322219294733919",
"1.7509999999999998899`4.243286146083446", "1.7509999999999998899`4.243286146083446",
@ -5169,9 +5200,13 @@ Cell[BoxData[
"0.1650000000000000078`3.2174839442139063", "0.1650000000000000078`3.2174839442139063",
"1.6590000000000000302`4.2198463860243605", "1.6590000000000000302`4.2198463860243605",
"2.4500000000000001776`4.389166084364533"}, "2.4500000000000001776`4.389166084364533"},
{"\<\"\"\>", "\<\"aug-cc-pVTZ\"\>", "\<\"\"\>", {"\<\"\"\>", "\<\"aug-cc-pVTZ\"\>",
"0.1489999999999999936`3.173186268412274",
"1.6310000000000000053`4.212453961040276", "1.6310000000000000053`4.212453961040276",
"2.5369999999999999218`4.404320467221731"}, "2.5369999999999999218`4.404320467221731"},
{"\<\"CC4\"\>", "\<\"6-31+G(d)\"\>", "\<\"\"\>",
"1.6040000000000000924`4.205204363948145",
"2.1209999999999999964`4.326540668516562"},
{"\<\"CCSDTQ\"\>", "\<\"6-31+G(d)\"\>", {"\<\"CCSDTQ\"\>", "\<\"6-31+G(d)\"\>",
"0.2049999999999999878`3.311753861055754", "0.2049999999999999878`3.311753861055754",
"1.5929999999999999716`4.202215775801132", "1.5929999999999999716`4.202215775801132",
@ -5322,11 +5357,11 @@ Cell[BoxData[
"1.7270000000000000906`4.2372923375674585"}, "1.7270000000000000906`4.2372923375674585"},
{"\<\"CIPSI\"\>", "\<\"6-31+G(d)\"\>", {"\<\"CIPSI\"\>", "\<\"6-31+G(d)\"\>",
InterpretationBox[ InterpretationBox[
TemplateBox[{"0.215", "0.020"}, TemplateBox[{"0.2010", "0.0030"},
"Around"], "Around"],
Around[ Around[
0.2149999999999999967`3.332438459915605, 0.201000000000000012`3.3031960574204886,
0.0200000000000000004`2.3010299956639813]], 0.0030000000000000001`1.4771212547196624]],
InterpretationBox[ InterpretationBox[
TemplateBox[{"1.602", "0.007"}, TemplateBox[{"1.602", "0.007"},
"Around"], "Around"],
@ -5339,7 +5374,13 @@ Cell[BoxData[
Around[ Around[
2.1259999999999998899`4.3275632601872775, 2.1259999999999998899`4.3275632601872775,
0.0410000000000000017`2.6127838567197355]]}, 0.0410000000000000017`2.6127838567197355]]},
{"\<\"\"\>", "\<\"aug-cc-pVDZ\"\>", "\<\"\"\>", {"\<\"\"\>", "\<\"aug-cc-pVDZ\"\>",
InterpretationBox[
TemplateBox[{"0.1570", "0.0030"},
"Around"],
Around[
0.1570000000000000007`3.195899652409234,
0.0030000000000000001`1.4771212547196624]],
InterpretationBox[ InterpretationBox[
TemplateBox[{"1.587", "0.005"}, TemplateBox[{"1.587", "0.005"},
"Around"], "Around"],
@ -5352,7 +5393,13 @@ Cell[BoxData[
Around[ Around[
2.1019999999999998685`4.322632711692223, 2.1019999999999998685`4.322632711692223,
0.0269999999999999997`2.4313637641589874]]}, 0.0269999999999999997`2.4313637641589874]]},
{"\<\"\"\>", "\<\"aug-cc-pVTZ\"\>", "\<\"\"\>", {"\<\"\"\>", "\<\"aug-cc-pVTZ\"\>",
InterpretationBox[
TemplateBox[{"0.18", "0.04"},
"Around"],
Around[
0.1759999999999999898`3.2455126678141495,
0.0400000000000000008`2.602059991327962]],
InterpretationBox[ InterpretationBox[
TemplateBox[{"1.66", "0.04"}, TemplateBox[{"1.66", "0.04"},
"Around"], "Around"],
@ -5393,16 +5440,17 @@ Cell[BoxData[
3.8226686319292297`*^9, {3.8235302516364937`*^9, 3.823530264731718*^9}, 3.8226686319292297`*^9, {3.8235302516364937`*^9, 3.823530264731718*^9},
3.823601421186048*^9, 3.823841188055235*^9, 3.823841480873786*^9, { 3.823601421186048*^9, 3.823841188055235*^9, 3.823841480873786*^9, {
3.8246170711267757`*^9, 3.824617089179977*^9}, {3.824617278068821*^9, 3.8246170711267757`*^9, 3.824617089179977*^9}, {3.824617278068821*^9,
3.8246172809312143`*^9}}, 3.8246172809312143`*^9}, 3.825752286564755*^9, {3.825758493325074*^9,
3.825758503859522*^9}},
CellLabel-> CellLabel->
"Out[8]//TableForm=",ExpressionUUID->"36194225-fc0f-451b-93f7-bb2197cefcef"] "Out[6]//TableForm=",ExpressionUUID->"e2124d33-2d89-4e1c-8d3a-3faa59b02399"]
}, Open ]], }, Open ]],
Cell[BoxData["\[IndentingNewLine]"], "Input", Cell[BoxData["\[IndentingNewLine]"], "Input",
CellChangeTimes->{ CellChangeTimes->{
3.822208995773974*^9},ExpressionUUID->"91058d2c-e268-4c8b-8ff4-\ 3.822208995773974*^9},ExpressionUUID->"91058d2c-e268-4c8b-8ff4-\
d01b8a02c12e"] d01b8a02c12e"]
}, Closed]] }, Open ]]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
@ -5658,65 +5706,65 @@ Cell[3108, 99, 152, 3, 38, "Subsection",ExpressionUUID->"146f0b45-c767-44b4-adf3
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[3285, 106, 167, 3, 45, "Subsubsection",ExpressionUUID->"85eac05c-0c0d-4570-9562-016c59c123c0"], Cell[3285, 106, 167, 3, 45, "Subsubsection",ExpressionUUID->"85eac05c-0c0d-4570-9562-016c59c123c0"],
Cell[3455, 111, 447, 12, 30, "Input",ExpressionUUID->"5e934c70-0bb3-4c28-a094-c1ba13c9aa1b"], Cell[3455, 111, 447, 12, 30, "Input",ExpressionUUID->"5e934c70-0bb3-4c28-a094-c1ba13c9aa1b"],
Cell[3905, 125, 16098, 361, 1627, "Input",ExpressionUUID->"283f461f-fa73-44be-9b2e-3fccbe85020e"] Cell[3905, 125, 16123, 362, 1627, "Input",ExpressionUUID->"283f461f-fa73-44be-9b2e-3fccbe85020e"]
}, Open ]],
Cell[CellGroupData[{
Cell[20040, 491, 168, 3, 45, "Subsubsection",ExpressionUUID->"496a2a44-bf08-47c1-928f-5e9378cdcbe6"],
Cell[20211, 496, 34689, 895, 1604, "Input",ExpressionUUID->"1f47c0ab-65f0-4e3d-b3bf-78a937e27006"]
}, Closed]]
}, Open ]],
Cell[CellGroupData[{
Cell[54949, 1397, 271, 4, 54, "Subsection",ExpressionUUID->"e9b6b4b3-0323-418a-aaa5-63000ac657a3"],
Cell[CellGroupData[{
Cell[55245, 1405, 167, 3, 45, "Subsubsection",ExpressionUUID->"c2a68803-eb09-4af4-95e0-ded4fd26bba2"],
Cell[CellGroupData[{
Cell[55437, 1412, 3016, 47, 56, "Input",ExpressionUUID->"517fe565-dbd4-4f72-9bce-30280a372548"],
Cell[58456, 1461, 7766, 161, 1056, "Output",ExpressionUUID->"2be1012c-883f-42eb-b9e3-ba443f8e5e1d"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[66271, 1628, 168, 3, 45, "Subsubsection",ExpressionUUID->"e347b647-085c-4a7a-aacb-16cb902d6b69"],
Cell[CellGroupData[{
Cell[66464, 1635, 1559, 31, 76, "Input",ExpressionUUID->"9326eaa0-341b-4e7e-b996-418c884cb254"],
Cell[68026, 1668, 109780, 2764, 92, "Output",ExpressionUUID->"97c1e6af-851b-4074-9392-0292b07355a3"]
}, Open ]]
}, Closed]]
}, Open ]],
Cell[CellGroupData[{
Cell[177867, 4439, 152, 3, 54, "Subsection",ExpressionUUID->"a0eea47c-0908-49f4-87f8-8a7d458525f2"],
Cell[178022, 4444, 2808, 53, 113, "Input",ExpressionUUID->"c94fe3f6-bb2b-425b-9436-cceb389f4f54"],
Cell[180833, 4499, 8151, 180, 281, "Input",ExpressionUUID->"ce9a37c9-f290-4ff9-8e20-fb2ac069191f"],
Cell[188987, 4681, 129, 3, 28, "Input",ExpressionUUID->"afe9eaa6-d491-4b7a-be7d-51d4faa79596"]
}, Closed]]
}, Open ]],
Cell[CellGroupData[{
Cell[189165, 4690, 351, 9, 68, "Section",ExpressionUUID->"031beb2c-3612-4398-bbed-82451a91c66a"],
Cell[CellGroupData[{
Cell[189541, 4703, 156, 3, 54, "Subsection",ExpressionUUID->"e797c147-2261-4ad9-bf30-a876fe039a42"],
Cell[189700, 4708, 475, 11, 33, "Text",ExpressionUUID->"adf832dd-e1af-42ec-b58c-cbbbe9c3192b"],
Cell[190178, 4721, 480, 12, 196, "Text",ExpressionUUID->"c1f07e0a-8d48-41b9-a295-c059851cd566"]
}, Closed]], }, Closed]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[190695, 4738, 152, 3, 38, "Subsection",ExpressionUUID->"0b0b3775-588f-4d6e-8521-a48a2543bc88"], Cell[20065, 492, 168, 3, 37, "Subsubsection",ExpressionUUID->"496a2a44-bf08-47c1-928f-5e9378cdcbe6"],
Cell[190850, 4743, 14449, 324, 1396, "Input",ExpressionUUID->"0fe9f196-cce7-4233-9666-614981e2b593"] Cell[20236, 497, 34689, 895, 1604, "Input",ExpressionUUID->"1f47c0ab-65f0-4e3d-b3bf-78a937e27006"]
}, Open ]], }, Closed]]
}, Closed]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[205336, 5072, 271, 4, 54, "Subsection",ExpressionUUID->"29d9a581-07ec-4f13-a8a0-7566f2d2f79d"], Cell[54974, 1398, 271, 4, 38, "Subsection",ExpressionUUID->"e9b6b4b3-0323-418a-aaa5-63000ac657a3"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[205632, 5080, 3156, 50, 56, "Input",ExpressionUUID->"a64c1c75-5181-46a3-916b-6c0d8d53cd2a"], Cell[55270, 1406, 167, 3, 45, "Subsubsection",ExpressionUUID->"c2a68803-eb09-4af4-95e0-ded4fd26bba2"],
Cell[208791, 5132, 12202, 265, 894, "Output",ExpressionUUID->"36194225-fc0f-451b-93f7-bb2197cefcef"] Cell[CellGroupData[{
}, Open ]], Cell[55462, 1413, 3016, 47, 56, "Input",ExpressionUUID->"517fe565-dbd4-4f72-9bce-30280a372548"],
Cell[221008, 5400, 147, 3, 52, "Input",ExpressionUUID->"91058d2c-e268-4c8b-8ff4-d01b8a02c12e"] Cell[58481, 1462, 7766, 161, 1056, "Output",ExpressionUUID->"2be1012c-883f-42eb-b9e3-ba443f8e5e1d"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[66296, 1629, 168, 3, 37, "Subsubsection",ExpressionUUID->"e347b647-085c-4a7a-aacb-16cb902d6b69"],
Cell[CellGroupData[{
Cell[66489, 1636, 1559, 31, 76, "Input",ExpressionUUID->"9326eaa0-341b-4e7e-b996-418c884cb254"],
Cell[68051, 1669, 109780, 2764, 92, "Output",ExpressionUUID->"97c1e6af-851b-4074-9392-0292b07355a3"]
}, Open ]]
}, Closed]] }, Closed]]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[221204, 5409, 164, 3, 67, "Section",ExpressionUUID->"5e574607-3b56-4320-867c-484c37c5330b"], Cell[177892, 4440, 152, 3, 54, "Subsection",ExpressionUUID->"a0eea47c-0908-49f4-87f8-8a7d458525f2"],
Cell[178047, 4445, 2808, 53, 113, "Input",ExpressionUUID->"c94fe3f6-bb2b-425b-9436-cceb389f4f54"],
Cell[180858, 4500, 8151, 180, 281, "Input",ExpressionUUID->"ce9a37c9-f290-4ff9-8e20-fb2ac069191f"],
Cell[189012, 4682, 129, 3, 28, "Input",ExpressionUUID->"afe9eaa6-d491-4b7a-be7d-51d4faa79596"]
}, Closed]]
}, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[221393, 5416, 152, 3, 54, "Subsection",ExpressionUUID->"1c76f8e7-0977-47de-b4f9-95febd6ffe98"], Cell[189190, 4691, 351, 9, 68, "Section",ExpressionUUID->"031beb2c-3612-4398-bbed-82451a91c66a"],
Cell[221548, 5421, 2921, 65, 241, "Input",ExpressionUUID->"1606e71a-fdd3-4bff-84a4-4cf2d64faef5"],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[224494, 5490, 3030, 47, 52, "Input",ExpressionUUID->"4b815da6-1ca4-49fb-9f5e-99820f6623b2"], Cell[189566, 4704, 156, 3, 54, "Subsection",ExpressionUUID->"e797c147-2261-4ad9-bf30-a876fe039a42"],
Cell[227527, 5539, 3424, 79, 200, "Output",ExpressionUUID->"37fab670-976c-41e6-a633-c9de5012fcd2"] Cell[189725, 4709, 475, 11, 33, "Text",ExpressionUUID->"adf832dd-e1af-42ec-b58c-cbbbe9c3192b"],
Cell[190203, 4722, 480, 12, 196, "Text",ExpressionUUID->"c1f07e0a-8d48-41b9-a295-c059851cd566"]
}, Closed]],
Cell[CellGroupData[{
Cell[190720, 4739, 152, 3, 38, "Subsection",ExpressionUUID->"0b0b3775-588f-4d6e-8521-a48a2543bc88"],
Cell[190875, 4744, 15491, 345, 1501, "Input",ExpressionUUID->"0fe9f196-cce7-4233-9666-614981e2b593"]
}, Open ]],
Cell[CellGroupData[{
Cell[206403, 5094, 271, 4, 54, "Subsection",ExpressionUUID->"29d9a581-07ec-4f13-a8a0-7566f2d2f79d"],
Cell[CellGroupData[{
Cell[206699, 5102, 3156, 50, 56, "Input",ExpressionUUID->"a64c1c75-5181-46a3-916b-6c0d8d53cd2a"],
Cell[209858, 5154, 13306, 291, 966, "Output",ExpressionUUID->"e2124d33-2d89-4e1c-8d3a-3faa59b02399"]
}, Open ]],
Cell[223179, 5448, 147, 3, 52, "Input",ExpressionUUID->"91058d2c-e268-4c8b-8ff4-d01b8a02c12e"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[223375, 5457, 164, 3, 67, "Section",ExpressionUUID->"5e574607-3b56-4320-867c-484c37c5330b"],
Cell[CellGroupData[{
Cell[223564, 5464, 152, 3, 54, "Subsection",ExpressionUUID->"1c76f8e7-0977-47de-b4f9-95febd6ffe98"],
Cell[223719, 5469, 2921, 65, 241, "Input",ExpressionUUID->"1606e71a-fdd3-4bff-84a4-4cf2d64faef5"],
Cell[CellGroupData[{
Cell[226665, 5538, 3030, 47, 52, "Input",ExpressionUUID->"4b815da6-1ca4-49fb-9f5e-99820f6623b2"],
Cell[229698, 5587, 3424, 79, 200, "Output",ExpressionUUID->"37fab670-976c-41e6-a633-c9de5012fcd2"]
}, Open ]] }, Open ]]
}, Open ]] }, Open ]]
}, Open ]] }, Open ]]