From e5ce920e7b87d3237e03cc90e2f57703ff5c55a4 Mon Sep 17 00:00:00 2001 From: Pierre-Francois Loos Date: Fri, 26 Mar 2021 15:48:45 +0100 Subject: [PATCH] new data --- Notebooks/CBD.nb | 196 +++++++++++++++++++++++++++++------------------ 1 file changed, 122 insertions(+), 74 deletions(-) diff --git a/Notebooks/CBD.nb b/Notebooks/CBD.nb index c88a2a5..8ea575a 100644 --- a/Notebooks/CBD.nb +++ b/Notebooks/CBD.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] -NotebookDataLength[ 235807, 5719] -NotebookOptionsPosition[ 231003, 5624] -NotebookOutlinePosition[ 231397, 5640] -CellTagsIndexPosition[ 231354, 5637] +NotebookDataLength[ 237978, 5767] +NotebookOptionsPosition[ 233174, 5672] +NotebookOutlinePosition[ 233568, 5688] +CellTagsIndexPosition[ 233525, 5685] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -166,7 +166,7 @@ Cell[BoxData[ RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\<\>\"", ",", - "\"\<\>\"", ",", "4.041"}], "}"}], ",", "\[IndentingNewLine]", + "3.164", ",", "4.041"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "CCSDTQ", " ", "*)"}], "\[IndentingNewLine]", " ", RowBox[{"{", RowBox[{ @@ -483,9 +483,10 @@ Cell[BoxData[ 3.823326609828835*^9}, {3.823483103860236*^9, 3.823483108796145*^9}, { 3.823529733441641*^9, 3.8235297380443172`*^9}, 3.824441777889266*^9, { 3.824481557380546*^9, 3.8244815610168753`*^9}, {3.824871656630433*^9, - 3.8248716798780317`*^9}, {3.825647331768765*^9, 3.82564734442376*^9}}, - CellLabel->"In[4]:=",ExpressionUUID->"283f461f-fa73-44be-9b2e-3fccbe85020e"] -}, Open ]], + 3.8248716798780317`*^9}, {3.825647331768765*^9, 3.82564734442376*^9}, + 3.8257401278773537`*^9}, + CellLabel->"In[3]:=",ExpressionUUID->"283f461f-fa73-44be-9b2e-3fccbe85020e"] +}, Closed]], Cell[CellGroupData[{ @@ -1391,7 +1392,7 @@ Cell[BoxData[ CellLabel-> "In[209]:=",ExpressionUUID->"1f47c0ab-65f0-4e3d-b3bf-78a937e27006"] }, Closed]] -}, Open ]], +}, Closed]], Cell[CellGroupData[{ @@ -1622,7 +1623,7 @@ Cell[BoxData[ "Out[210]//TableForm=",ExpressionUUID->"2be1012c-883f-42eb-b9e3-\ ba443f8e5e1d"] }, Open ]] -}, Open ]], +}, Closed]], Cell[CellGroupData[{ @@ -4763,6 +4764,19 @@ Cell[BoxData[ RowBox[{ "\"\<\>\"", ",", "\"\\"", ",", "0.084", ",", "1.588", ",", "\"\<\>\""}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"(*", " ", "CC3", " ", "*)"}], "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{ + "\"\\"", ",", "\"\<6-31+G(d)\>\"", ",", "\"\<\>\"", ",", "1.809", + ",", "2.836"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{ + "\"\<\>\"", ",", "\"\\"", ",", "\"\<\>\"", ",", "1.695", + ",", "2.646"}], "}"}], ",", "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{ + "\"\<\>\"", ",", "\"\\"", ",", "\"\<\>\"", ",", "1.662", + ",", "2.720"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "CCSDT", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"{", RowBox[{ @@ -4783,6 +4797,10 @@ Cell[BoxData[ "\"\<\>\"", ",", "\"\\"", ",", "\"\<\>\"", ",", "\"\<\>\"", ",", "\"\<\>\""}], "}"}], ","}], "*)"}], "\[IndentingNewLine]", + RowBox[{"{", + RowBox[{ + "\"\\"", ",", "\"\<6-31+G(d)\>\"", ",", "\"\<\>\"", ",", "1.604", + ",", "2.121"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "CCSDTQ", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"{", RowBox[{ @@ -5018,7 +5036,9 @@ Cell[BoxData[ RowBox[{"2.102", ",", "0.027"}], "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", - RowBox[{"\"\<\>\"", ",", "\"\\"", ",", "\"\<\>\"", ",", + RowBox[{"\"\<\>\"", ",", "\"\\"", ",", + RowBox[{"Around", "[", + RowBox[{"0.176", ",", "0.040"}], "]"}], ",", RowBox[{"Around", "[", RowBox[{"1.659", ",", "0.044"}], "]"}], ",", "\"\<\>\""}], RowBox[{"(*", "567286", "*)"}], "}"}]}], "\[IndentingNewLine]", "}"}]}], @@ -5063,9 +5083,11 @@ Cell[BoxData[ 3.824617029162079*^9, 3.8246170854291067`*^9}, 3.824797966620908*^9, { 3.8247980371849403`*^9, 3.824798040181305*^9}, {3.8249897672092257`*^9, 3.824989774674591*^9}, {3.824989962333706*^9, 3.824989967362425*^9}, { - 3.8256748573917227`*^9, - 3.825674861641438*^9}},ExpressionUUID->"0fe9f196-cce7-4233-9666-\ -614981e2b593"] + 3.8256748573917227`*^9, 3.825674861641438*^9}, {3.825674943622177*^9, + 3.825674950484906*^9}, {3.825752246872456*^9, 3.82575227566343*^9}, { + 3.8257584292108192`*^9, 3.8257584614289618`*^9}, {3.8257584997186613`*^9, + 3.8257585004026318`*^9}}, + CellLabel->"In[5]:=",ExpressionUUID->"0fe9f196-cce7-4233-9666-614981e2b593"] }, Open ]], Cell[CellGroupData[{ @@ -5128,7 +5150,7 @@ Cell[BoxData[ 3.820119797451242*^9}, {3.820394165740387*^9, 3.820394165850604*^9}, { 3.8203942656540833`*^9, 3.820394277151956*^9}, 3.822208994665655*^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[ TagBox[ @@ -5161,6 +5183,15 @@ Cell[BoxData[ {"\<\"\"\>", "\<\"aug-cc-pVQZ\"\>", "0.0840000000000000052`2.9242792860618816", "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)\"\>", "0.2099999999999999922`3.322219294733919", "1.7509999999999998899`4.243286146083446", @@ -5169,9 +5200,13 @@ Cell[BoxData[ "0.1650000000000000078`3.2174839442139063", "1.6590000000000000302`4.2198463860243605", "2.4500000000000001776`4.389166084364533"}, - {"\<\"\"\>", "\<\"aug-cc-pVTZ\"\>", "\<\"\"\>", + {"\<\"\"\>", "\<\"aug-cc-pVTZ\"\>", + "0.1489999999999999936`3.173186268412274", "1.6310000000000000053`4.212453961040276", "2.5369999999999999218`4.404320467221731"}, + {"\<\"CC4\"\>", "\<\"6-31+G(d)\"\>", "\<\"\"\>", + "1.6040000000000000924`4.205204363948145", + "2.1209999999999999964`4.326540668516562"}, {"\<\"CCSDTQ\"\>", "\<\"6-31+G(d)\"\>", "0.2049999999999999878`3.311753861055754", "1.5929999999999999716`4.202215775801132", @@ -5322,11 +5357,11 @@ Cell[BoxData[ "1.7270000000000000906`4.2372923375674585"}, {"\<\"CIPSI\"\>", "\<\"6-31+G(d)\"\>", InterpretationBox[ - TemplateBox[{"0.215", "0.020"}, + TemplateBox[{"0.2010", "0.0030"}, "Around"], Around[ - 0.2149999999999999967`3.332438459915605, - 0.0200000000000000004`2.3010299956639813]], + 0.201000000000000012`3.3031960574204886, + 0.0030000000000000001`1.4771212547196624]], InterpretationBox[ TemplateBox[{"1.602", "0.007"}, "Around"], @@ -5339,7 +5374,13 @@ Cell[BoxData[ Around[ 2.1259999999999998899`4.3275632601872775, 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[ TemplateBox[{"1.587", "0.005"}, "Around"], @@ -5352,7 +5393,13 @@ Cell[BoxData[ Around[ 2.1019999999999998685`4.322632711692223, 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[ TemplateBox[{"1.66", "0.04"}, "Around"], @@ -5393,16 +5440,17 @@ Cell[BoxData[ 3.8226686319292297`*^9, {3.8235302516364937`*^9, 3.823530264731718*^9}, 3.823601421186048*^9, 3.823841188055235*^9, 3.823841480873786*^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-> - "Out[8]//TableForm=",ExpressionUUID->"36194225-fc0f-451b-93f7-bb2197cefcef"] + "Out[6]//TableForm=",ExpressionUUID->"e2124d33-2d89-4e1c-8d3a-3faa59b02399"] }, Open ]], Cell[BoxData["\[IndentingNewLine]"], "Input", CellChangeTimes->{ 3.822208995773974*^9},ExpressionUUID->"91058d2c-e268-4c8b-8ff4-\ d01b8a02c12e"] -}, Closed]] +}, Open ]] }, Open ]], Cell[CellGroupData[{ @@ -5658,65 +5706,65 @@ Cell[3108, 99, 152, 3, 38, "Subsection",ExpressionUUID->"146f0b45-c767-44b4-adf3 Cell[CellGroupData[{ 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[3905, 125, 16098, 361, 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"] +Cell[3905, 125, 16123, 362, 1627, "Input",ExpressionUUID->"283f461f-fa73-44be-9b2e-3fccbe85020e"] }, Closed]], Cell[CellGroupData[{ -Cell[190695, 4738, 152, 3, 38, "Subsection",ExpressionUUID->"0b0b3775-588f-4d6e-8521-a48a2543bc88"], -Cell[190850, 4743, 14449, 324, 1396, "Input",ExpressionUUID->"0fe9f196-cce7-4233-9666-614981e2b593"] -}, Open ]], +Cell[20065, 492, 168, 3, 37, "Subsubsection",ExpressionUUID->"496a2a44-bf08-47c1-928f-5e9378cdcbe6"], +Cell[20236, 497, 34689, 895, 1604, "Input",ExpressionUUID->"1f47c0ab-65f0-4e3d-b3bf-78a937e27006"] +}, Closed]] +}, Closed]], 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[205632, 5080, 3156, 50, 56, "Input",ExpressionUUID->"a64c1c75-5181-46a3-916b-6c0d8d53cd2a"], -Cell[208791, 5132, 12202, 265, 894, "Output",ExpressionUUID->"36194225-fc0f-451b-93f7-bb2197cefcef"] -}, Open ]], -Cell[221008, 5400, 147, 3, 52, "Input",ExpressionUUID->"91058d2c-e268-4c8b-8ff4-d01b8a02c12e"] +Cell[55270, 1406, 167, 3, 45, "Subsubsection",ExpressionUUID->"c2a68803-eb09-4af4-95e0-ded4fd26bba2"], +Cell[CellGroupData[{ +Cell[55462, 1413, 3016, 47, 56, "Input",ExpressionUUID->"517fe565-dbd4-4f72-9bce-30280a372548"], +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]] }, Open ]], 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[221393, 5416, 152, 3, 54, "Subsection",ExpressionUUID->"1c76f8e7-0977-47de-b4f9-95febd6ffe98"], -Cell[221548, 5421, 2921, 65, 241, "Input",ExpressionUUID->"1606e71a-fdd3-4bff-84a4-4cf2d64faef5"], +Cell[189190, 4691, 351, 9, 68, "Section",ExpressionUUID->"031beb2c-3612-4398-bbed-82451a91c66a"], Cell[CellGroupData[{ -Cell[224494, 5490, 3030, 47, 52, "Input",ExpressionUUID->"4b815da6-1ca4-49fb-9f5e-99820f6623b2"], -Cell[227527, 5539, 3424, 79, 200, "Output",ExpressionUUID->"37fab670-976c-41e6-a633-c9de5012fcd2"] +Cell[189566, 4704, 156, 3, 54, "Subsection",ExpressionUUID->"e797c147-2261-4ad9-bf30-a876fe039a42"], +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 ]]