diff --git a/Data/DNA_EA.dat b/Data/DNA_EA.dat
index b86d1aa..9b74ef5 100644
--- a/Data/DNA_EA.dat
+++ b/Data/DNA_EA.dat
@@ -1,5 +1,5 @@
 A 73-24-5 	1.572302	-1.112845488267253E-002	-1.244641965646358E-002	0.818218	-5.905035393513733E-003	-5.850193328953127E-003	0.4735	0.1725	-0.54
 C 71-30-7 	1.400624	-1.104440375011201E-002	-1.232916433335030E-002	0.613380	-5.855474578578402E-003 -5.807852486273912E-003 0.2638	-0.0257	NA
-G 73-40-5 	1.884993	-1.139399072772152E-002	-1.290878357845295E-002	1.122363 	0.0			0.0			0.7487	0.4149	NA
+G 73-40-5 	1.884993	-1.139399072772152E-002	-1.290878357845295E-002	1.122363 	-6.138508297163354E-003	-6.157876784101071E-003	0.7487	0.4149	NA
 T 65-71-4 	1.194189	-1.125726615899225E-002	-1.278928447622424E-002	0.388406 	-5.942694859945368E-003	-5.970028247300262E-003	0.0564	-0.2136	-0.29
 U 66-22-8 	1.157819	-1.116178581583812E-002 -1.263984272930559E-002 0.350665	-5.928731990069141E-003	-5.951570440565138E-003	0.0124	-0.2832	-0.22
diff --git a/Manuscript/GW-srDFT.tex b/Manuscript/GW-srDFT.tex
index 35594b0..c81a7c7 100644
--- a/Manuscript/GW-srDFT.tex
+++ b/Manuscript/GW-srDFT.tex
@@ -182,7 +182,8 @@ We also compute the ionization potentials of the five canonical nucleobases (ade
 \section{Introduction}
 \label{sec:intro}
 %%%%%%%%%%%%%%%%%%%%%%%%
-The purpose of many-body perturbation theory (MBPT) based on Green functions is to solve the formidable many-body problem by adding the electron-electron Coulomb interaction perturbatively starting from an independent-particle model. \cite{MarReiCep-BOOK-16} In this approach, the \textit{screening} of the Coulomb interaction is an essential quantity that is responsible for a rich variety of phenomena that would be otherwise absent (such as quasiparticle satellites and lifetimes). \cite{Aryasetiawan_1998, Onida_2002, Reining_2017} \jt{Is it the screened Coulomb interaction which is responsible for these or more generally the Coulomb interaction? I would say the second.}
+The purpose of many-body perturbation theory (MBPT) based on Green functions is to solve the formidable many-body problem by adding the electron-electron Coulomb interaction perturbatively starting from an independent-particle model. \cite{MarReiCep-BOOK-16} In this approach, the \textit{screening} of the Coulomb interaction is an essential quantity that is responsible for a rich variety of phenomena that would be otherwise absent (such as quasiparticle satellites and lifetimes). \cite{Aryasetiawan_1998, Onida_2002, Reining_2017} 
+%\jt{Is it the screened Coulomb interaction which is responsible for these or more generally the Coulomb interaction? I would say the second.}
 
 The so-called {\GW} approximation is the workhorse of MBPT and has a long and successful history in the calculation of the electronic structure of solids. \cite{Aryasetiawan_1998, Onida_2002, Reining_2017} 
 {\GW} is getting increasingly popular in molecular systems \cite{Blase_2011, Faber_2011, Bruneval_2012, Bruneval_2015, Bruneval_2016, Bruneval_2016a, Boulanger_2014, Blase_2016, Li_2017, Hung_2016, Hung_2017, vanSetten_2015, vanSetten_2018, Ou_2016, Ou_2018, Faber_2014} thanks to efficient implementation relying on plane waves \cite{Marini_2009, Deslippe_2012, Maggio_2017} or local basis functions. \cite{Blase_2011, Blase_2018, Bruneval_2016, vanSetten_2013, Kaplan_2015, Kaplan_2016, Krause_2017, Caruso_2012, Caruso_2013, Caruso_2013a, Caruso_2013b}
@@ -336,9 +337,8 @@ For example, if the reference is Hartree-Fock ($\HF$), $\Sig{\text{ref}}{\Bas}(\
 
 In this subsection, we provide the minimal set of equations required to describe {\GOWO}.
 More details can be found, for example, in Refs.~\citenum{vanSetten_2013, Kaplan_2016, Bruneval_2016}.
-For sake of generality, we consider a $\KS$ reference.
+For sake of generality, we consider closed-shell systems with a $\KS$ reference.
 The one-electron energies $\e{p}$ and their corresponding (real-valued) orbitals $\MO{p}(\br{})$ (which defines the basis set $\Bas$) are then $\KS$ energies and orbitals.
-\jt{equations are for closed-shell systems} 
 
 Within the {\GW} approximation, the correlation part of the self-energy reads 
 \begin{equation}
@@ -347,15 +347,15 @@ Within the {\GW} approximation, the correlation part of the self-energy reads
 	\Sig{\text{c},p}{\Bas}(\omega)
 	& = \mel*{\MO{p}}{\Sig{\text{c}}{\Bas}(\omega)}{\MO{p}}
 	\\
-	& = 2 \sum_{i}^\text{occ} \sum_{x} \frac{[pi|x]^2}{\omega - \e{i} + \Om{x} - i \eta}
+	& = 2 \sum_{i}^\text{occ} \sum_{m} \frac{[pi|m]^2}{\omega - \e{i} + \Om{m} - i \eta}
 	\\
-	& + 2 \sum_{a}^\text{virt} \sum_{x} \frac{[pa|x]^2}{\omega - \e{a} - \Om{x} + i \eta},
+	& + 2 \sum_{a}^\text{virt} \sum_{m} \frac{[pa|m]^2}{\omega - \e{a} - \Om{m} + i \eta},
 \end{split}
 \end{equation}
-\jt{x should be defined. If it is just an index for the eigenvector/eigenvalue, maybe we should call it $m$ instead?} where $\eta$ is a positive infinitesimal.
+where $m$ corresponds to a sum over the single excitations and $\eta$ is a positive infinitesimal.
 The screened two-electron integrals
 \begin{equation}
-	[pq|x] = \sum_{ia} (pq|ia) (\bX+\bY)_{ia}^{x}
+	[pq|m] = \sum_{ia} (pq|ia) (\bX+\bY)_{ia}^{m}
 \end{equation}
 are obtained via the contraction of the bare two-electron integrals \cite{Gill_1994} 
 \begin{equation}
@@ -382,11 +382,10 @@ and the transition densities $(\bX+\bY)_{ia}^{x}$ originating from a (direct) ra
 with
 \begin{align}
 \label{eq:RPA}
-	A_{ia,jb} & = \delta_{ij} \delta_{ab} (\e{a} - \e{i}) + 2 (ia|jb),
+	A_{ia,jb} & = \delta_{ij} \delta_{ab} (\e{a} - \e{i}) + 2 (ib|aj),
 	&
-	B_{ia,jb} & = 2 (ia|bj),
+	B_{ia,jb} & = 2 (ia|jb),
 \end{align}
-\jt{the integral in the B term could be written as in the A term since we use real-valued orbitals}
 and $\delta_{pq}$ is the Kronecker delta. \cite{NISTbook}
 Equation \eqref{eq:LR} also provides the RPA neutral excitation energies $\Om{x}$ which represent the poles of the screened Coulomb potential $\W{}{}$.
 
@@ -395,7 +394,6 @@ The {\GOWO} quasiparticle energies $\eGOWO{p}$ are provided by the solution of t
 \label{eq:QP-G0W0}
 	\omega =  \e{p} - \Pot{\xc,p}{\Bas} + \Sig{\text{x},p}{\Bas} + \Re[\Sig{\text{c},p}{\Bas}(\omega)].
 \end{equation}
-\jt{an equation involving $Z_p$ seems to be missing!}
 with the largest renormalization weight (or factor)
 \begin{equation}
 \label{eq:Z}
@@ -586,7 +584,7 @@ In a nutshell, the present basis set correction provides cc-pVQZ quality results
 Besides, it allows to reach chemical accuracy with the quadruple-$\zeta$ basis set, an accuracy that could not be reached even with the cc-pV5Z basis set for the conventional calculations.
 
 Very similar conclusions are drawn at the {\GOWO}@{\PBEO} level (see Table \ref{tab:GW20_PBE0}) with a slightly faster convergence to the CBS limit.
-For example, at the {\GOWO}@PBE0+srLDA/cc-pVQZ level, the MAD is only $0.02$ eV with a maximum error as small as $0.09$ eV. \jt{these numbers do not exactly correspond to the ones in the Table II. Is it because of round off?}
+For example, at the {\GOWO}@PBE0+srLDA/cc-pVQZ level, the MAD is only $0.02$ eV with a maximum error as small as $0.09$ eV. 
 
 It is worth pointing out that, for ground-state properties such as atomization and correlation energies, the density-based correction brought a more significant basis set reduction.
 For example, we evidenced in Ref.~\onlinecite{LooPraSceTouGin-JPCL-19} that quintuple-$\zeta$ quality atomization and correlation energies are recovered with triple-$\zeta$ basis sets.
diff --git a/Notebooks/GW100.nb b/Notebooks/GW100.nb
index 226f480..203090f 100644
--- a/Notebooks/GW100.nb
+++ b/Notebooks/GW100.nb
@@ -10,10 +10,10 @@
 NotebookFileLineBreakTest
 NotebookFileLineBreakTest
 NotebookDataPosition[       158,          7]
-NotebookDataLength[  13702938,     242784]
-NotebookOptionsPosition[  13686389,     242463]
-NotebookOutlinePosition[  13686881,     242483]
-CellTagsIndexPosition[  13686838,     242480]
+NotebookDataLength[  13517839,     238315]
+NotebookOptionsPosition[  13500665,     237982]
+NotebookOutlinePosition[  13501141,     238001]
+CellTagsIndexPosition[  13501098,     237998]
 WindowFrame->Normal*)
 
 (* Beginning of Notebook Content *)
@@ -31,7 +31,7 @@ Cell[BoxData[
  InitializationCell->True,
  CellChangeTimes->{{3.7208031947801647`*^9, 3.7208032000677156`*^9}, {
   3.7208034541742477`*^9, 3.720803455246439*^9}},
- CellLabel->"In[1]:=",ExpressionUUID->"37867cff-0ca5-44bf-a2dd-e0dbbbf2fa3a"],
+ CellLabel->"In[29]:=",ExpressionUUID->"37867cff-0ca5-44bf-a2dd-e0dbbbf2fa3a"],
 
 Cell[BoxData[
  RowBox[{
@@ -40,7 +40,7 @@ Cell[BoxData[
  CellChangeTimes->{{3.7208031947801647`*^9, 3.7208032000677156`*^9}, {
    3.7208034541742477`*^9, 3.720803455246439*^9}, {3.776006644308682*^9, 
    3.776006645404855*^9}, 3.776007061792289*^9},
- CellLabel->"In[2]:=",ExpressionUUID->"6b655861-3eba-418a-a15a-1fcf0775d7ac"],
+ CellLabel->"In[30]:=",ExpressionUUID->"6b655861-3eba-418a-a15a-1fcf0775d7ac"],
 
 Cell[BoxData[{
  RowBox[{"Needs", "[", "\"\<MaTeX`\>\"", "]"}], "\[IndentingNewLine]", 
@@ -54,7 +54,7 @@ mathpazo,xcolor,bm,mhchem}\>\"", "}"}]}]}], "]"}], ";"}]}], "Input",
  InitializationCell->True,
  CellChangeTimes->{{3.7288240181604652`*^9, 3.728824027007351*^9}, {
   3.733131339213026*^9, 3.733131352923026*^9}},
- CellLabel->"In[3]:=",ExpressionUUID->"503d29c5-30e2-484d-9104-c72aa4e45b6b"],
+ CellLabel->"In[31]:=",ExpressionUUID->"503d29c5-30e2-484d-9104-c72aa4e45b6b"],
 
 Cell[BoxData[
  RowBox[{
@@ -68,7 +68,7 @@ Cell[BoxData[
   3.759165019260251*^9, 3.7591650205826883`*^9}, {3.759724285782976*^9, 
   3.759724288096609*^9}, {3.7759225458942423`*^9, 3.775922549658771*^9}, {
   3.778949458332233*^9, 3.77894948995479*^9}},
- CellLabel->"In[5]:=",ExpressionUUID->"761743e2-8cea-46d7-9151-ac0d311451f4"],
+ CellLabel->"In[33]:=",ExpressionUUID->"761743e2-8cea-46d7-9151-ac0d311451f4"],
 
 Cell[BoxData[
  RowBox[{
@@ -91,7 +91,7 @@ Cell[BoxData[
  InitializationCell->True,
  CellChangeTimes->{{3.779092040623983*^9, 3.779092141856688*^9}, {
   3.779092360464703*^9, 3.779092380213423*^9}},
- CellLabel->"In[6]:=",ExpressionUUID->"b6189236-bc55-4942-b848-7171c9a8786b"]
+ CellLabel->"In[34]:=",ExpressionUUID->"b6189236-bc55-4942-b848-7171c9a8786b"]
 }, Closed]],
 
 Cell[CellGroupData[{
@@ -991,7 +991,7 @@ Cell[BoxData[{
   3.778425076224629*^9}, {3.778425357297806*^9, 3.778425398140785*^9}, {
   3.778940799895406*^9, 3.778940842897552*^9}, {3.778940948377639*^9, 
   3.778940953284575*^9}, {3.778940997622835*^9, 3.7789410608201733`*^9}},
- CellLabel->"In[7]:=",ExpressionUUID->"740b32b3-1b8a-4ece-8173-ba84e85f7b14"],
+ CellLabel->"In[35]:=",ExpressionUUID->"740b32b3-1b8a-4ece-8173-ba84e85f7b14"],
 
 Cell[BoxData[
  TagBox[
@@ -1066,19 +1066,16 @@ Cell[BoxData[
       "16.4189016454629523878`4.215344101305395", 
       "16.5751430062096751783`4.219457284077705"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -1098,9 +1095,11 @@ Cell[BoxData[
    3.779120504070854*^9, 3.7791205612966633`*^9, 3.779120755724413*^9, 
    3.779121060626163*^9, 3.779193832917255*^9, 3.779193986516164*^9, 
    3.779609939311414*^9, 3.779786450323495*^9, 3.779982059487008*^9, 
-   3.780053302923985*^9, 3.7800593680010223`*^9},
+   3.780053302923985*^9, 3.7800593680010223`*^9, 3.780073044311335*^9, 
+   3.780112026027471*^9, 3.7801121619321613`*^9, 3.7802251622158012`*^9},
  CellLabel->
-  "Out[9]//TableForm=",ExpressionUUID->"d2b256d1-ff6e-44ba-adb3-d0cb37c9c08d"]
+  "Out[37]//TableForm=",ExpressionUUID->"410e12d0-b85e-4625-a925-\
+0fa214ca2274"]
 }, Open  ]]
 }, Closed]],
 
@@ -1187,7 +1186,7 @@ Cell[BoxData[{
   3.778425076224629*^9}, {3.778425357297806*^9, 3.778425398140785*^9}, {
   3.778940799895406*^9, 3.778940842897552*^9}, {3.7789409242363777`*^9, 
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941098194315*^9}},
- CellLabel->"In[10]:=",ExpressionUUID->"96bebe42-c17e-4928-8aeb-b7edbd2782ad"],
+ CellLabel->"In[38]:=",ExpressionUUID->"96bebe42-c17e-4928-8aeb-b7edbd2782ad"],
 
 Cell[BoxData[
  TagBox[
@@ -1262,19 +1261,16 @@ Cell[BoxData[
       "16.562454075800935982`4.219124687075365", 
       "16.6084297731988463909`4.220328574470012"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -1293,10 +1289,12 @@ Cell[BoxData[
    3.7791149772385187`*^9, 3.779120504191888*^9, 3.779120561392563*^9, 
    3.7791207609826937`*^9, 3.779121060713496*^9, 3.779193833101191*^9, 
    3.7791939865950117`*^9, 3.779609939376405*^9, 3.779786450443389*^9, 
-   3.779982059706756*^9, 3.7800533030157537`*^9, 3.780059368161338*^9},
+   3.779982059706756*^9, 3.7800533030157537`*^9, 3.780059368161338*^9, 
+   3.780073044406476*^9, 3.780112026229679*^9, 3.780112162003231*^9, 
+   3.7802251622694893`*^9},
  CellLabel->
-  "Out[12]//TableForm=",ExpressionUUID->"92235f6f-5c22-4e30-911a-\
-46ea504a3f0e"]
+  "Out[40]//TableForm=",ExpressionUUID->"9e159156-b792-4131-ba5c-\
+ea362b9008a3"]
 }, Open  ]]
 }, Closed]],
 
@@ -1383,7 +1381,7 @@ Cell[BoxData[{
   3.778425076224629*^9}, {3.778425357297806*^9, 3.778425398140785*^9}, {
   3.778940799895406*^9, 3.778940842897552*^9}, {3.7789409242363777`*^9, 
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941139753708*^9}},
- CellLabel->"In[13]:=",ExpressionUUID->"3ee5d11c-5973-4742-8d2f-604aa1d19beb"],
+ CellLabel->"In[41]:=",ExpressionUUID->"3ee5d11c-5973-4742-8d2f-604aa1d19beb"],
 
 Cell[BoxData[
  TagBox[
@@ -1458,19 +1456,16 @@ Cell[BoxData[
       "16.6662162597660952201`4.221837012903875", 
       "16.6720447279382000261`4.22198886675083"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -1489,10 +1484,12 @@ Cell[BoxData[
    3.779107106554143*^9, 3.779114977337771*^9, 3.7791205042549667`*^9, 
    3.779120561503446*^9, 3.77912106081258*^9, 3.779193833292431*^9, 
    3.779193986676055*^9, 3.779609939451413*^9, 3.779786450568263*^9, 
-   3.77998205981129*^9, 3.780053303115924*^9, 3.780059368293725*^9},
+   3.77998205981129*^9, 3.780053303115924*^9, 3.780059368293725*^9, 
+   3.780073044726915*^9, 3.780112026332004*^9, 3.780112162077833*^9, 
+   3.780225162328953*^9},
  CellLabel->
-  "Out[15]//TableForm=",ExpressionUUID->"5d2a126a-3f77-44ea-bfad-\
-9cc3959fa98f"]
+  "Out[43]//TableForm=",ExpressionUUID->"7eeed9a8-7234-4882-8f83-\
+de24163f5516"]
 }, Open  ]]
 }, Closed]],
 
@@ -1580,7 +1577,7 @@ Cell[BoxData[{
   3.778940799895406*^9, 3.778940842897552*^9}, {3.7789409242363777`*^9, 
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941098194315*^9}, {
   3.7789411459949503`*^9, 3.778941164692428*^9}},
- CellLabel->"In[16]:=",ExpressionUUID->"0e83ae26-e77a-45c9-9c11-e053b599bcd2"],
+ CellLabel->"In[44]:=",ExpressionUUID->"0e83ae26-e77a-45c9-9c11-e053b599bcd2"],
 
 Cell[BoxData[
  TagBox[
@@ -1655,19 +1652,16 @@ Cell[BoxData[
       "16.7117601083342712798`4.223022192866553", 
       "16.7082133593031230134`4.222930012449942"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -1688,10 +1682,11 @@ Cell[BoxData[
    3.779114977456044*^9, 3.77912050433219*^9, 3.779120561596643*^9, 
    3.779121060870659*^9, 3.779193833486043*^9, 3.7791939883214006`*^9, 
    3.7796099396022377`*^9, 3.779786450660654*^9, 3.779982059994548*^9, 
-   3.7800533032088823`*^9, 3.78005936843364*^9},
+   3.7800533032088823`*^9, 3.78005936843364*^9, 3.780073044896895*^9, 
+   3.780112026434306*^9, 3.7801121621495047`*^9, 3.780225162384282*^9},
  CellLabel->
-  "Out[18]//TableForm=",ExpressionUUID->"279f9117-8c1c-4de7-86c4-\
-b4a4c40270d1"]
+  "Out[46]//TableForm=",ExpressionUUID->"0ae0a9d3-2100-4f23-860b-\
+f08b127b4b59"]
 }, Open  ]]
 }, Closed]],
 
@@ -1722,6 +1717,296 @@ b0151ac9cd80"],
 
 Cell[CellGroupData[{
 
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"GW20$HF", "=", 
+   RowBox[{"Import", "[", "\"\<GW20_HF.dat\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"IP$HF", "=", 
+   RowBox[{"Table", "[", 
+    RowBox[{
+     RowBox[{"{", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"GW20$HF", "\[LeftDoubleBracket]", 
+        RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{
+        RowBox[{"GW20$HF", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], "-", 
+        RowBox[{"GW20$HF", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
+      "\[IndentingNewLine]", "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{"k", ",", 
+       RowBox[{"Length", "[", "GW20$HF", "]"}]}], "}"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"IP$G0W0HF", "=", 
+   RowBox[{"Table", "[", 
+    RowBox[{
+     RowBox[{"{", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
+        RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{
+        RowBox[{"-", 
+         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
+          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{"-", 
+        RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{"-", 
+        RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{"-", 
+        RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "\[IndentingNewLine]", "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{"k", ",", 
+       RowBox[{"Length", "[", "GW20$G0W0HF$ccpVDZ", "]"}]}], "}"}]}], "]"}]}],
+   ";"}], "\[IndentingNewLine]", 
+ RowBox[{"TableForm", "[", 
+  RowBox[{
+   RowBox[{"SetAccuracy", "[", 
+    RowBox[{"IP$G0W0HF", ",", "3"}], "]"}], ",", 
+   RowBox[{"TableHeadings", "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{"None", ",", " ", 
+      RowBox[{"{", 
+       RowBox[{
+       "\"\<Mol.\>\"", ",", "\"\<G0W0@HF/cc-pVDZ\>\"", ",", 
+        "\"\<G0W0@HF/cc-pVTZ\>\"", ",", "\"\<G0W0@HF/cc-pVQZ\>\"", ",", 
+        "\"\<G0W0@HF/cc-pV5Z\>\"", ",", "\"\<G0W0@HF/CBS\>\""}], "}"}]}], 
+     "}"}]}]}], "]"}]}], "Input",
+ InitializationCell->True,
+ CellChangeTimes->{{3.77590351349603*^9, 3.775903514423417*^9}, {
+   3.778425010046465*^9, 3.778425016035069*^9}, {3.77842507012418*^9, 
+   3.778425076224629*^9}, {3.778425357297806*^9, 3.778425398140785*^9}, {
+   3.778940799895406*^9, 3.778940842897552*^9}, {3.7789409242363777`*^9, 
+   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941098194315*^9}, {
+   3.7789411459949503`*^9, 3.778941164692428*^9}, {3.7789442404898167`*^9, 
+   3.778944260998493*^9}, {3.7789480302740583`*^9, 3.7789481753009977`*^9}, {
+   3.7789489433903227`*^9, 3.778948965718418*^9}, {3.779006750590946*^9, 
+   3.779006776387995*^9}, {3.779091948913731*^9, 3.779091949353389*^9}, 
+   3.779092033241515*^9, {3.7790921632562523`*^9, 3.779092281918437*^9}, 
+   3.7790923484868383`*^9, {3.779092384470986*^9, 3.7790924050141687`*^9}, {
+   3.77919398189672*^9, 3.779194003482129*^9}, {3.779194074241927*^9, 
+   3.7791940893593693`*^9}, {3.779612888240376*^9, 3.779612897437357*^9}, {
+   3.7799821028094177`*^9, 3.779982107338616*^9}, {3.779982407467305*^9, 
+   3.7799824172203693`*^9}, {3.779982516087002*^9, 3.779982516393175*^9}, {
+   3.780112111260109*^9, 3.780112141322624*^9}},
+ CellLabel->"In[47]:=",ExpressionUUID->"5c5b09a9-6885-4248-9275-37748f62f536"],
+
+Cell[BoxData[
+ TagBox[
+  TagBox[GridBox[{
+     {
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pV5Z\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", 
+      RowBox[{"24.3603680000000011319`4.386683844681781", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"1", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "24.5739860000000014395`4.390475606516782", 
+      "24.6749159999999996273`4.392255682889858", 
+      "24.7151619999999994093`4.392963461467866"},
+     {"\<\"Ne\"\>", 
+      RowBox[{"20.8704010000000010905`4.319530793598956", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"2", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "21.3926009999999990896`4.3302635910827", 
+      "21.630023000000001332`4.335056981240653", 
+      "21.7327170000000009509`4.337114024725701"},
+     {"\<\"H2\"\>", 
+      RowBox[{"16.2478240000000013765`4.210795206048966", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"3", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "16.4763739999999998531`4.216861641520162", 
+      "16.5550280000000000769`4.218929919623587", 
+      "16.5835919999999994445`4.219678604430215"},
+     {"\<\"Li2\"\>", 
+      RowBox[{"5.2304320000000004143`3.7185375602760824", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"4", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "5.3406399999999996098`3.7275933041846727", 
+      "5.3907020000000001048`3.731645324532638", 
+      "5.4175769999999996429`3.733805092661438"},
+     {"\<\"LiH\"\>", 
+      RowBox[{"7.9635420000000003427`3.9011062748872183", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"5", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "8.1612410000000004118`3.911756202684354", 
+      "8.245222000000000051`3.9162023533798127", 
+      "8.284499999999999531`3.918266302279359"},
+     {"\<\"FH\"\>", 
+      RowBox[{"15.5409179999999995658`4.1914766689410285", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"6", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "16.1602050000000012631`4.2084468657086225", 
+      "16.4189299999999995805`4.215344851307351", 
+      "16.5245840000000008274`4.2181305350999745"},
+     {"\<\"Ar\"\>", 
+      RowBox[{"15.4035650000000003956`4.187621245553969", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"7", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "15.7244519999999994297`4.196575519139685", 
+      "15.9282099999999999795`4.20216697286315", 
+      "16.0806159999999991328`4.206302681245563"},
+     {"\<\"H2O\"\>", 
+      RowBox[{"12.1615190000000001902`4.084987822643766", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"8", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "12.792284999999999684`4.106948126515896", 
+      "13.0372299999999992082`4.115185327323422", 
+      "13.1350809999999995625`4.11843275529069"},
+     {"\<\"LiF\"\>", 
+      RowBox[{"10.7529229999999991207`4.03152653589969", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"9", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "11.3470320000000004512`4.054882279627364", 
+      "11.5850329999999992481`4.063897275216844", 
+      "11.7005490000000005324`4.06820623970145"},
+     {"\<\"HCl\"\>", 
+      RowBox[{"12.3952299999999997482`4.0932545897407175", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"10", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "12.768910999999999234`4.1061538599213705", 
+      "12.9625889999999994728`4.112691751235184", 
+      "13.0487239999999999895`4.115568045248788"},
+     {"\<\"BeO\"\>", 
+      RowBox[{"9.470736999999999739`3.976383776530088", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"11", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "9.7719430000000002678`3.989980925057676", 
+      "9.9761869999999994718`3.998964581239026", 
+      "10.0859470000000008838`4.003716681682721"},
+     {"\<\"CO\"\>", 
+      RowBox[{"14.6647189999999998378`4.1662737456037435", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"12", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "15.0170279999999998211`4.1765839905300375", 
+      "15.1705170000000002517`4.181000381473691", 
+      "15.2398270000000000124`4.182980036992308"},
+     {"\<\"N2\"\>", 
+      RowBox[{"15.8670489999999997366`4.200496162911947", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"13", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "16.3118550000000013256`4.2125033522392", 
+      "16.4825949999999998852`4.217025587546751", 
+      "16.5631829999999986569`4.219143800232749"},
+     {"\<\"CH4\"\>", 
+      RowBox[{"14.429716000000000875`4.159257783564277", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"14", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "14.7353059999999995711`4.168359159034372", 
+      "14.8551369999999991478`4.17187666139513", 
+      "14.9024300000000007316`4.173257090529354"},
+     {"\<\"BH3\"\>", 
+      RowBox[{"13.3491590000000002192`4.125453905913014", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"15", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "13.637223000000000539`4.134725942273338", 
+      "13.7393710000000002225`4.13796685081072", 
+      "13.7791209999999999525`4.1392215138687405"},
+     {"\<\"NH3\"\>", 
+      RowBox[{"10.5882959999999997081`4.024826073672924", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"16", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "11.1320409999999991868`4.046574797198564", 
+      "11.3247560000000007108`4.054028853599204", 
+      "11.3960109999999996688`4.056752859770405"},
+     {"\<\"BF\"\>", 
+      RowBox[{"11.0839890000000007575`4.0446960861067955", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"17", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "11.2993679999999994124`4.053054153059667", 
+      "11.3836960000000004811`4.056283289458049", 
+      "11.4225119999999993325`4.0577616229790925"},
+     {"\<\"BN\"\>", 
+      RowBox[{"11.3505160000000007159`4.055015605217144", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"18", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "11.6869569999999995957`4.067701446136662", 
+      "11.8474179999999993385`4.073623711482369", 
+      "11.9235170000000003654`4.076404375236869"},
+     {"\<\"SH2\"\>", 
+      RowBox[{"10.0972829999999991202`4.0042045285500985", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"19", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "10.4850180000000001712`4.020569180370649", 
+      "10.6514039999999994279`4.0274068574709245", 
+      "10.7238159999999993488`4.030349353719065"},
+     {"\<\"F2\"\>", 
+      RowBox[{"15.9291850000000003718`4.20219355614907", "-", 
+       RowBox[{"1.`3.", " ", 
+        RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
+         RowBox[{"20", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "16.2952219999999989852`4.212060281506792", 
+      "16.5079320000000002722`4.217692671249382", 
+      "16.6149909999999998433`4.220500110366377"}
+    },
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
+  Function[BoxForm`e$, 
+   TableForm[
+   BoxForm`e$, 
+    TableHeadings -> {
+     None, {"Mol.", "G0W0@HF/cc-pVDZ", "G0W0@HF/cc-pVTZ", "G0W0@HF/cc-pVQZ", 
+       "G0W0@HF/cc-pV5Z", "G0W0@HF/CBS"}}]]]], "Output",
+ CellChangeTimes->{
+  3.78011211839671*^9, {3.780112162302843*^9, 3.780112164709319*^9}, 
+   3.780225162559238*^9},
+ CellLabel->
+  "Out[50]//TableForm=",ExpressionUUID->"6e41949c-8713-444c-a3f5-\
+58e523087330"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
 Cell[BoxData[
  RowBox[{"IP$G0W0HF$CBS", "=", 
   RowBox[{"Table", "[", "\[IndentingNewLine]", 
@@ -1783,391 +2068,71 @@ Cell[BoxData[
    3.779007162046904*^9}, {3.7790073541504993`*^9, 3.779007372189651*^9}, {
    3.7790149178693438`*^9, 3.77901492095431*^9}, {3.779193994058972*^9, 
    3.779193994641159*^9}},
- CellLabel->"In[19]:=",ExpressionUUID->"d5dcee17-a82a-4fd3-9194-9c1dca598d2d"],
+ CellLabel->"In[51]:=",ExpressionUUID->"d5dcee17-a82a-4fd3-9194-9c1dca598d2d"],
 
 Cell[BoxData[
  RowBox[{"{", 
   RowBox[{
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"1", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"1", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"1", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"He\"\>", ",", "24.7523487959999037855`4.393616416228869"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"2", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"2", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"2", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"2", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"Ne\"\>", ",", "21.8192186747386536183`4.338839194862546"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"3", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"3", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"3", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"3", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"H2\"\>", ",", "16.6129114555196224501`4.22044575034801"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"4", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"4", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"4", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"4", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"Li2\"\>", ",", "5.4351821884969631071`3.7352141063124265"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"5", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"5", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"5", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"5", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"LiH\"\>", ",", "8.314738681478607063`3.919848604610832"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"6", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"6", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"6", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"6", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"FH\"\>", ",", "16.6196069054500945583`4.220620747437693"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"7", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"7", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"7", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"7", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"Ar\"\>", ",", "16.1470449970381686455`4.208093055527639"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"8", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"8", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"8", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"8", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"H2O\"\>", ",", "13.225307173729071053`4.121405767838133"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"9", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"9", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"9", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"9", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"LiF\"\>", ",", "11.7857344815965703333`4.071356652737717"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"10", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"10", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"10", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"10", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"HCl\"\>", ",", "13.1190011880269210565`4.117900771393242"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"11", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"11", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"11", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"11", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BeO\"\>", ",", "10.1577590714473640077`4.006797907726501"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"12", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"12", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"12", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"12", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"CO\"\>", ",", "15.295394023261893679`4.184560669285669"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"13", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"13", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"13", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"13", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"N2\"\>", ",", "16.6245716168240953436`4.220750463187389"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"14", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"14", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"14", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"14", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"CH4\"\>", ",", "14.9466402074422930468`4.174543580396049"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"15", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"15", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"15", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"15", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BH3\"\>", ",", "13.8168758083032994222`4.140409853993262"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"16", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"16", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"16", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"16", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"NH3\"\>", ",", "11.4676942970065312011`4.059476107112539"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"17", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"17", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"17", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"17", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BF\"\>", ",", "11.4529514608937024178`4.058917420125966"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"18", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"18", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"18", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"18", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BN\"\>", ",", "11.9811658110071252992`4.078499078541929"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"19", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"19", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"19", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"19", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"SH2\"\>", ",", "10.78438270895899187`4.032795291416753"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-      RowBox[{"20", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"20", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"20", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-           RowBox[{"20", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}]}], "}"}]], "Output",
+    RowBox[{"\<\"F2\"\>", ",", "16.6906604866675287724`4.222473523020735"}], 
+    "}"}]}], "}"}]], "Output",
  CellChangeTimes->{{3.779006708475514*^9, 3.7790067361815147`*^9}, 
    3.779007164523492*^9, {3.779007355631083*^9, 3.779007372612563*^9}, 
    3.779007493463765*^9, 3.7790149243676*^9, 3.779014981873602*^9, 
@@ -2177,8 +2142,10 @@ Cell[BoxData[
    3.7791938339426737`*^9, {3.779193988585444*^9, 3.779193998649911*^9}, 
    3.779609939986167*^9, 3.779612891377763*^9, 3.779613516792173*^9, 
    3.779786450824087*^9, 3.779982060731412*^9, 3.7799821104292297`*^9, 
-   3.7800533035280247`*^9, 3.780059368849832*^9},
- CellLabel->"Out[19]=",ExpressionUUID->"c3d2d243-fec7-47a4-b895-b57b4c7d6bc1"]
+   3.7800533035280247`*^9, 3.780059368849832*^9, 3.7800730452636414`*^9, 
+   3.780112026954015*^9, {3.7801121625085583`*^9, 3.7801121694762697`*^9}, 
+   3.7802251625793953`*^9},
+ CellLabel->"Out[51]=",ExpressionUUID->"8691dd0a-f9ef-49f6-b5d9-5230113b0d65"]
 }, Open  ]]
 }, Closed]],
 
@@ -2237,7 +2204,7 @@ Cell[BoxData[{
   3.77919386780691*^9, 3.779193888932817*^9}, {3.779194008870743*^9, 
   3.77919403139874*^9}, {3.779194061569977*^9, 3.7791940635998774`*^9}, {
   3.779194253589912*^9, 3.77919425504422*^9}},
- CellLabel->"In[20]:=",ExpressionUUID->"50587b0f-febe-4ef9-a287-fc7d8440d3ea"],
+ CellLabel->"In[52]:=",ExpressionUUID->"50587b0f-febe-4ef9-a287-fc7d8440d3ea"],
 
 Cell[CellGroupData[{
 
@@ -2319,19 +2286,162 @@ Cell[BoxData[{
    3.7791940893593693`*^9}, {3.779612888240376*^9, 3.779612897437357*^9}, {
    3.7799821028094177`*^9, 3.779982107338616*^9}, {3.779982407467305*^9, 
    3.7799824172203693`*^9}, {3.779982516087002*^9, 3.779982516393175*^9}},
- CellLabel->"In[22]:=",ExpressionUUID->"1b01945f-d8b1-4386-8d85-0dcb9e2b5372"],
+ CellLabel->"In[54]:=",ExpressionUUID->"1b01945f-d8b1-4386-8d85-0dcb9e2b5372"],
 
 Cell[BoxData[
- RowBox[{"Hold", "[", 
-  TagBox[
-   RowBox[{"SetAccuracy", "[", 
-    RowBox[{"IP$G0W0HF", ",", "3"}], "]"}],
-   Function[BoxForm`e$, 
-    TableForm[
-    BoxForm`e$, 
-     TableHeadings -> {
-      None, {"Mol.", "G0W0@HF/cc-pVDZ", "G0W0@HF/cc-pVTZ", "G0W0@HF/cc-pVQZ", 
-        "G0W0@HF/cc-pV5Z", "G0W0@HF/CBS"}}]]], "]"}]], "Output",
+ TagBox[
+  TagBox[GridBox[{
+     {
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/cc-pV5Z\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/CBS\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", 
+      RowBox[{"-", "0.3919807959999026536`2.593264790501142"}], 
+      "24.5739860000000014395`4.390475606516782", 
+      "24.6749159999999996273`4.392255682889858", 
+      "24.7151619999999994093`4.392963461467866", 
+      "24.7523487959999037855`4.393616416228869"},
+     {"\<\"Ne\"\>", 
+      RowBox[{"-", "0.9488176747386525278`2.9771827662077617"}], 
+      "21.3926009999999990896`4.3302635910827", 
+      "21.630023000000001332`4.335056981240653", 
+      "21.7327170000000009509`4.337114024725701", 
+      "21.8192186747386536183`4.338839194862546"},
+     {"\<\"H2\"\>", 
+      RowBox[{"-", "0.3650874555196210736`2.562396910757991"}], 
+      "16.4763739999999998531`4.216861641520162", 
+      "16.5550280000000000769`4.218929919623587", 
+      "16.5835919999999994445`4.219678604430215", 
+      "16.6129114555196224501`4.220445750348011"},
+     {"\<\"Li2\"\>", 
+      RowBox[{"-", "0.2047501884969626929`2.3112243102524954"}], 
+      "5.3406399999999996098`3.7275933041846727", 
+      "5.3907020000000001048`3.731645324532638", 
+      "5.4175769999999996429`3.733805092661438", 
+      "5.4351821884969631071`3.7352141063124265"},
+     {"\<\"LiH\"\>", 
+      RowBox[{"-", "0.3511966814786067204`2.5455504035258127"}], 
+      "8.1612410000000004118`3.911756202684354", 
+      "8.245222000000000051`3.9162023533798127", 
+      "8.284499999999999531`3.918266302279359", 
+      "8.314738681478607063`3.919848604610833"},
+     {"\<\"FH\"\>", 
+      RowBox[{"-", "1.0786889054500949925`3.0328962119424827"}], 
+      "16.1602050000000012631`4.2084468657086225", 
+      "16.4189299999999995805`4.215344851307351", 
+      "16.5245840000000008274`4.2181305350999745", 
+      "16.6196069054500945583`4.220620747437693"},
+     {"\<\"Ar\"\>", 
+      RowBox[{"-", "0.7434799970381682499`2.871269288536781"}], 
+      "15.7244519999999994297`4.196575519139685", 
+      "15.9282099999999999795`4.20216697286315", 
+      "16.0806159999999991328`4.206302681245563", 
+      "16.1470449970381686455`4.208093055527639"},
+     {"\<\"H2O\"\>", 
+      RowBox[{"-", "1.0637881737290708628`3.0268551579033858"}], 
+      "12.792284999999999684`4.106948126515896", 
+      "13.0372299999999992082`4.115185327323422", 
+      "13.1350809999999995625`4.11843275529069", 
+      "13.225307173729071053`4.121405767838134"},
+     {"\<\"LiF\"\>", 
+      RowBox[{"-", "1.0328114815965712125`3.0140210572660306"}], 
+      "11.3470320000000004512`4.054882279627364", 
+      "11.5850329999999992481`4.063897275216844", 
+      "11.7005490000000005324`4.06820623970145", 
+      "11.7857344815965703333`4.071356652737717"},
+     {"\<\"HCl\"\>", 
+      RowBox[{"-", "0.7237711880269213083`2.8596012906677672"}], 
+      "12.768910999999999234`4.1061538599213705", 
+      "12.9625889999999994728`4.112691751235184", 
+      "13.0487239999999999895`4.115568045248788", 
+      "13.1190011880269210565`4.117900771393243"},
+     {"\<\"BeO\"\>", 
+      RowBox[{"-", "0.6870220714473642687`2.8369706895396423"}], 
+      "9.7719430000000002678`3.989980925057676", 
+      "9.9761869999999994718`3.998964581239026", 
+      "10.0859470000000008838`4.003716681682721", 
+      "10.1577590714473640077`4.0067979077265"},
+     {"\<\"CO\"\>", 
+      RowBox[{"-", "0.6306750232618938412`2.7998056318902194"}], 
+      "15.0170279999999998211`4.1765839905300375", 
+      "15.1705170000000002517`4.181000381473691", 
+      "15.2398270000000000124`4.182980036992308", 
+      "15.295394023261893679`4.184560669285668"},
+     {"\<\"N2\"\>", 
+      RowBox[{"-", "0.7575226168240956071`2.879395603795164"}], 
+      "16.3118550000000013256`4.2125033522392", 
+      "16.4825949999999998852`4.217025587546751", 
+      "16.5631829999999986569`4.219143800232749", 
+      "16.6245716168240953436`4.220750463187389"},
+     {"\<\"CH4\"\>", 
+      RowBox[{"-", "0.5169242074422921718`2.7134268705550775"}], 
+      "14.7353059999999995711`4.168359159034372", 
+      "14.8551369999999991478`4.17187666139513", 
+      "14.9024300000000007316`4.173257090529354", 
+      "14.9466402074422930468`4.1745435803960484"},
+     {"\<\"BH3\"\>", 
+      RowBox[{"-", "0.467716808303299203`2.669982977396651"}], 
+      "13.637223000000000539`4.134725942273338", 
+      "13.7393710000000002225`4.13796685081072", 
+      "13.7791209999999999525`4.1392215138687405", 
+      "13.8168758083032994222`4.140409853993263"},
+     {"\<\"NH3\"\>", 
+      RowBox[{"-", "0.879398297006531493`2.9441856202541423"}], 
+      "11.1320409999999991868`4.046574797198564", 
+      "11.3247560000000007108`4.054028853599204", 
+      "11.3960109999999996688`4.056752859770405", 
+      "11.4676942970065312011`4.059476107112539"},
+     {"\<\"BF\"\>", 
+      RowBox[{"-", "0.3689624608937016603`2.5669821822673344"}], 
+      "11.2993679999999994124`4.053054153059667", 
+      "11.3836960000000004811`4.056283289458049", 
+      "11.4225119999999993325`4.0577616229790925", 
+      "11.4529514608937024178`4.058917420125967"},
+     {"\<\"BN\"\>", 
+      RowBox[{"-", "0.6306498110071245833`2.7997882699183836"}], 
+      "11.6869569999999995957`4.067701446136662", 
+      "11.8474179999999993385`4.073623711482369", 
+      "11.9235170000000003654`4.076404375236869", 
+      "11.9811658110071252992`4.078499078541928"},
+     {"\<\"SH2\"\>", 
+      RowBox[{"-", "0.6870997089589927498`2.8370197645829256"}], 
+      "10.4850180000000001712`4.020569180370649", 
+      "10.6514039999999994279`4.0274068574709245", 
+      "10.7238159999999993488`4.030349353719065", 
+      "10.78438270895899187`4.032795291416754"},
+     {"\<\"F2\"\>", 
+      RowBox[{"-", "0.7614754866675284006`2.881655927138403"}], 
+      "16.2952219999999989852`4.212060281506792", 
+      "16.5079320000000002722`4.217692671249382", 
+      "16.6149909999999998433`4.220500110366377", 
+      "16.6906604866675287724`4.222473523020736"}
+    },
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
+  Function[BoxForm`e$, 
+   TableForm[
+   BoxForm`e$, 
+    TableHeadings -> {
+     None, {"Mol.", "G0W0@HF/cc-pVDZ", "G0W0@HF/cc-pVTZ", "G0W0@HF/cc-pVQZ", 
+       "G0W0@HF/cc-pV5Z", "G0W0@HF/CBS"}}]]]], "Output",
  CellChangeTimes->{
   3.776141375618598*^9, 3.778425025073845*^9, 3.778425076763853*^9, 
    3.778425399048726*^9, {3.778940809710058*^9, 3.77894084333232*^9}, {
@@ -2356,69 +2466,36 @@ Cell[BoxData[
    3.77961292260291*^9}, 3.779786451722274*^9, 3.779982061779324*^9, {
    3.779982103859756*^9, 3.779982113883122*^9}, {3.779982414703477*^9, 
    3.77998241763907*^9}, {3.779982513534751*^9, 3.779982520697421*^9}, 
-   3.780053305187119*^9, 3.780059370655253*^9},
- CellLabel->"Out[23]=",ExpressionUUID->"c7830bc8-0173-4c15-a45f-6b6dc79a8648"],
+   3.780053305187119*^9, 3.780059370655253*^9, 3.780073046953371*^9, 
+   3.7801120285836678`*^9, {3.7801121626977787`*^9, 3.780112172152712*^9}, 
+   3.780225162725116*^9},
+ CellLabel->
+  "Out[55]//TableForm=",ExpressionUUID->"458d65ad-8b37-475f-8374-\
+25d180a0ad1a"],
 
 Cell[BoxData[
- TagBox[
-  RowBox[{"Transpose", "[", 
-   RowBox[{"{", 
-    RowBox[{
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0HF", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}]}], "}"}], "]"}],
+ TagBox[GridBox[{
+    {"14.7170504533887367415`4.167820778739723", 
+     "0.2969751016943700805`2.4727200397211897", 
+     "0.1341147016943701475`2.1274763879542937", 
+     "0.0587366516943701455`1.768909185766877", "0``3."},
+    {"15.3434212170428683208`4.185922207723788", 
+     "0.3183548052285897212`2.5029114094645415", 
+     "0.1444853484290707923`2.1598238095906943", 
+     "0.0628106524564088081`1.7980333047358086", "0``3."},
+    {"25.1443295919998064392`4.400440060781106", 
+     "0.4594019054500932953`2.662192792175387", 
+     "0.218834997038168666`2.3401167774655445", 
+     "0.0950229054500937309`1.9778283054101922", "0``3."}
+   },
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+   GridBoxSpacings->{"Columns" -> {
+       Offset[0.27999999999999997`], {
+        Offset[2.0999999999999996`]}, 
+       Offset[0.27999999999999997`]}, "Rows" -> {
+       Offset[0.2], {
+        Offset[0.4]}, 
+       Offset[0.2]}}],
   Function[BoxForm`e$, 
    TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{
@@ -2445,10 +2522,12 @@ Cell[BoxData[
    3.77961292260291*^9}, 3.779786451722274*^9, 3.779982061779324*^9, {
    3.779982103859756*^9, 3.779982113883122*^9}, {3.779982414703477*^9, 
    3.77998241763907*^9}, {3.779982513534751*^9, 3.779982520697421*^9}, 
-   3.780053305187119*^9, 3.780059373858592*^9},
+   3.780053305187119*^9, 3.780059370655253*^9, 3.780073046953371*^9, 
+   3.7801120285836678`*^9, {3.7801121626977787`*^9, 3.780112172152712*^9}, 
+   3.780225162775486*^9},
  CellLabel->
-  "Out[24]//TableForm=",ExpressionUUID->"186eb329-2bba-4a1c-b3bb-\
-ad4ac6b9fa16"]
+  "Out[56]//TableForm=",ExpressionUUID->"658e0e2b-b119-4254-a03f-\
+57852946fba9"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -2534,1082 +2613,136 @@ Cell[BoxData[{
   3.779006791080922*^9}, {3.77909256871741*^9, 3.779092574101212*^9}, {
   3.779194094654055*^9, 3.779194214797501*^9}, {3.779194263729128*^9, 
   3.7791943084855413`*^9}},
- CellLabel->"In[25]:=",ExpressionUUID->"4d3d2a6a-9cce-464c-b450-ab541240c58a"],
+ CellLabel->"In[57]:=",ExpressionUUID->"4d3d2a6a-9cce-464c-b450-ab541240c58a"],
 
 Cell[BoxData[
  TagBox[
   TagBox[GridBox[{
      {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], "]"}]}
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srLDA/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srLDA/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srLDA/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srLDA/cc-pV5Z\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF/CBS\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", "24.632143567849496435`4.39150220717734", 
+      "24.6918916502131047253`4.392554362584", 
+      "24.7283995378476681992`4.393196009027134", 
+      "24.7425537357115103987`4.393444522135898", 
+      "24.7523487959999037855`4.393616416228869"},
+     {"\<\"Ne\"\>", "21.3788888804857499792`4.329985129983453", 
+      "21.6694589018839209871`4.335848066886965", 
+      "21.7958773156394904902`4.338374354687626", 
+      "21.8358299255405121642`4.339169703023239", 
+      "21.8192186747386536183`4.338839194862546"},
+     {"\<\"H2\"\>", "16.4236072098453611545`4.215468549816227", 
+      "16.5417400219589296739`4.2185811909595", 
+      "16.5830435329847531989`4.219664240826888", 
+      "16.5971824593903711786`4.220034368389676", 
+      "16.6129114555196224501`4.220445750348011"},
+     {"\<\"Li2\"\>", "5.3057404211000376293`3.724745998672785", 
+      "5.3738326129601610148`3.730284134668808", 
+      "5.4086952885002048674`3.733092515135806", 
+      "5.4292298887716397005`3.7347382312875097", 
+      "5.4351821884969631071`3.7352141063124265"},
+     {"\<\"LiH\"\>", "8.1268315789211147404`3.9099212594940496", 
+      "8.2264632042617549246`3.9152131595119903", 
+      "8.2757845742447955217`3.9178091770837846", 
+      "8.3017372441534913463`3.9191689835329737", 
+      "8.314738681478607063`3.919848604610833"},
+     {"\<\"FH\"\>", "16.0067462158324929078`4.204303059331911", 
+      "16.4103699942035632375`4.2151183729257005", 
+      "16.5650243825308116641`4.219192079468857", 
+      "16.6130558950457398737`4.220449526267519", 
+      "16.6196069054500945583`4.220620747437693"},
+     {"\<\"Ar\"\>", "15.84857341586551982`4.199990175985885", 
+      "15.9811288123536865413`4.203607452053203", 
+      "16.0865456756346532075`4.206462796425307", 
+      "16.179319037898295619`4.208960238888946", 
+      "16.1470449970381686455`4.208093055527639"},
+     {"\<\"H2O\"\>", "12.5772892159431233239`4.099587047673806", 
+      "13.0090082713205905662`4.114244189819875", 
+      "13.1596303119697193296`4.11924368899475", 
+      "13.2070369001196201708`4.120805391250046", 
+      "13.225307173729071053`4.121405767838134"},
+     {"\<\"LiF\"\>", "11.2126565856213016303`4.049708521050715", 
+      "11.5961829451724529605`4.064315058308706", 
+      "11.7301382799885605124`4.0693031317985655", 
+      "11.7886419568203830721`4.071463777560779", 
+      "11.7857344815965703333`4.071356652737717"},
+     {"\<\"HCl\"\>", "12.7918954452297324309`4.106934901039511", 
+      "12.990066061891919702`4.113611359713688", 
+      "13.0953276246932777127`4.117116368268432", 
+      "13.1281490846635708891`4.118203499967575", 
+      "13.1190011880269210565`4.117900771393243"},
+     {"\<\"BeO\"\>", "9.8458345556927984177`3.9932525338383873", 
+      "9.9726447121192975942`3.9988103470344103", 
+      "10.0887749007019387193`4.003838432226228", 
+      "10.1528354023952527285`4.006587345466032", 
+      "10.1577590714473640077`4.0067979077265"},
+     {"\<\"CO\"\>", "14.9902764013084848216`4.175809640750639", 
+      "15.1826275599538274008`4.181346938623934", 
+      "15.2601566554552050547`4.183558991957692", 
+      "15.2918431205623441826`4.184459833930853", 
+      "15.295394023261893679`4.184560669285668"},
+     {"\<\"N2\"\>", "16.2247027596206265798`4.2101767491679984", 
+      "16.499135432532504808`4.217461187443129", 
+      "16.5865505247502795783`4.2197560759681245", 
+      "16.6236908785067107885`4.220727454478805", 
+      "16.6245716168240953436`4.220750463187389"},
+     {"\<\"CH4\"\>", "14.6925496921124896232`4.167097168229299", 
+      "14.852714387378414429`4.1718058297969804", 
+      "14.911191232181682409`4.173512339958538", 
+      "14.932133098000113236`4.174121852367941", 
+      "14.9466402074422930468`4.1745435803960484"},
+     {"\<\"BH3\"\>", "13.5734753185798098229`4.132691057567283", 
+      "13.7324798178451548125`4.137748969426153", 
+      "13.7828364388854964773`4.1393386024042105", 
+      "13.8017901811829286629`4.139935420849499", 
+      "13.8168758083032994222`4.140409853993263"},
+     {"\<\"NH3\"\>", "10.9343489686819186346`4.038792930242795", 
+      "11.3010904912782041976`4.053120352465222", 
+      "11.4137181297058560858`4.057427143118765", 
+      "11.4466287325273032849`4.0586775968552615", 
+      "11.4676942970065312011`4.059476107112539"},
+     {"\<\"BF\"\>", "11.2941057276203107307`4.05285184898499", 
+      "11.3955518894321450318`4.0567353630162595", 
+      "11.4319786618520460308`4.058121405159352", 
+      "11.4495739533566407431`4.05878932657558", 
+      "11.4529514608937024178`4.058917420125967"},
+     {"\<\"BN\"\>", "11.6729422356909164904`4.067180336394411", 
+      "11.8528797738803870487`4.073823879288046", 
+      "11.9375735629260280035`4.0769160608535335", 
+      "11.9752169044617886584`4.078283388437978", 
+      "11.9811658110071252992`4.078499078541928"},
+     {"\<\"SH2\"\>", "10.4395125612211518984`4.018680221184062", 
+      "10.6670608594330413865`4.028044772904619", 
+      "10.7567874689451272729`4.031682587982199", 
+      "10.784109404877391114`4.032784285134636", 
+      "10.78438270895899187`4.032795291416754"},
+     {"\<\"F2\"\>", "16.4189016454629523878`4.215344101305395", 
+      "16.562454075800935982`4.219124687075365", 
+      "16.6662162597660952201`4.221837012903875", 
+      "16.7117601083342712798`4.223022192866553", 
+      "16.6906604866675287724`4.222473523020736"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
-         Offset[0.5599999999999999]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
-   Column],
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
    BoxForm`e$, 
@@ -3631,217 +2764,37 @@ Cell[BoxData[
    3.7791941396765347`*^9, 3.779194215267829*^9}, {3.779194264461011*^9, 
    3.779194308973196*^9}, 3.779609944476287*^9, 3.779612925487275*^9, 
    3.7797864554932003`*^9, 3.779982065644603*^9, 3.779982167903863*^9, 
-   3.7800533108134108`*^9, 3.780059377314494*^9},
+   3.7800533108134108`*^9, 3.780059377314494*^9, 3.780073053042959*^9, 
+   3.780112034326724*^9, 3.780112162711876*^9, 3.780225162788855*^9},
  CellLabel->
-  "Out[26]//TableForm=",ExpressionUUID->"841b6133-84ea-47fc-aee1-\
-b816568e37bb"],
+  "Out[58]//TableForm=",ExpressionUUID->"d8d232ac-931d-4d73-8676-\
+b77d248c08f7"],
 
 Cell[BoxData[
- InterpretationBox[
-  TagBox[
-   FrameBox[GridBox[{
-      {
-       ItemBox[
-        TagBox[
-         TagBox[
-          TemplateBox[{"1"},
-           "OutputSizeLimit`Skeleton"],
-          Function[BoxForm`e$, 
-           TableForm[BoxForm`e$]]],
-         Short[#, 5]& ],
-        BaseStyle->{Deployed -> False},
-        StripOnInput->False]},
-      {GridBox[{
-         {
-          TagBox[
-           TooltipBox[
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource[
-                "FEStrings", "sizeBriefExplanation"], StandardForm],
-               ImageSizeCache->{58., {2., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLText",
-             StripOnInput->False],
-            StyleBox[
-             DynamicBox[
-              ToBoxes[
-               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
-               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
-             False]],
-           Annotation[#, 
-            Style[
-             Dynamic[
-              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
-             DynamicUpdating -> True], "Tooltip"]& ], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm],
-               ImageSizeCache->{50., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 27, 21259940437824449933,
-              5/2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm],
-               ImageSizeCache->{56., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 27, 21259940437824449933,
-              5 2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm],
-               ImageSizeCache->{42., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 27, 21259940437824449933,
-              Infinity],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm],
-               ImageSizeCache->{74., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>FrontEndExecute[{
-              FrontEnd`SetOptions[
-              FrontEnd`$FrontEnd, 
-               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
-              FrontEnd`FrontEndToken["PreferencesDialog"]}],
-           Evaluator->None,
-           Method->"Preemptive"]}
-        },
-        AutoDelete->False,
-        FrameStyle->GrayLevel[0.85],
-        GridBoxDividers->{"Columns" -> {False, {True}}},
-        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
-        GridBoxSpacings->{"Columns" -> {{2}}}]}
-     },
-     DefaultBaseStyle->"Column",
-     GridBoxAlignment->{
-      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-       "RowsIndexed" -> {}},
-     GridBoxDividers->{
-      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
-       "RowsIndexed" -> {}},
-     GridBoxItemSize->{
-      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
-       "RowsIndexed" -> {}},
-     GridBoxSpacings->{"Columns" -> {
-         Offset[0.27999999999999997`], {
-          Offset[0.5599999999999999]}, 
-         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
-         Offset[0.2], 
-         Offset[1.2], {
-          Offset[0.4]}, 
-         Offset[0.2]}, "RowsIndexed" -> {}}],
-    BaseStyle->"OutputSizeLimit",
-    FrameMargins->{{12, 12}, {0, 15}},
-    FrameStyle->GrayLevel[0.85],
-    RoundingRadius->5,
-    StripOnInput->False],
-   Deploy,
-   DefaultBaseStyle->"Deploy"],
-  If[21259940437824449933 === $SessionID, 
-   Out[27], Message[
-     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
-   Null]]], "Output",
+ TagBox[GridBox[{
+    {"0.3329083815601005525`2.522324729429658", 
+     "0.1270204279006701964`2.10387357143712", 
+     "0.0392469837341855587`1.593806285337708", 
+     "0.0110476345972951411`1.04326930143202", "0``3."},
+    {"0.3665952141469952519`2.5641867910050355", 
+     "0.135964153072730104`2.1334244217908593", 
+     "0.0420164781035943929`1.6234196462546697", 
+     "0.0136852082120867379`1.1362514093217688", "0``3."},
+    {"0.6480179577859477291`2.811587041147262", 
+     "0.2162989024084804868`2.3350543156519916", 
+     "0.0689841707454252884`1.8387494480332052", 
+     "0.0322740408601269735`1.508853344498681", "0``3."}
+   },
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+   GridBoxSpacings->{"Columns" -> {
+       Offset[0.27999999999999997`], {
+        Offset[2.0999999999999996`]}, 
+       Offset[0.27999999999999997`]}, "Rows" -> {
+       Offset[0.2], {
+        Offset[0.4]}, 
+       Offset[0.2]}}],
+  Function[BoxForm`e$, 
+   TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{
   3.778948232908155*^9, 3.7789490025112143`*^9, 3.778949244023615*^9, 
    3.778949466729723*^9, 3.778949514953648*^9, 3.778989281759061*^9, 
@@ -3856,10 +2809,11 @@ Cell[BoxData[
    3.7791941396765347`*^9, 3.779194215267829*^9}, {3.779194264461011*^9, 
    3.779194308973196*^9}, 3.779609944476287*^9, 3.779612925487275*^9, 
    3.7797864554932003`*^9, 3.779982065644603*^9, 3.779982167903863*^9, 
-   3.7800533108134108`*^9, 3.7800593775026627`*^9},
+   3.7800533108134108`*^9, 3.780059377314494*^9, 3.780073053042959*^9, 
+   3.780112034326724*^9, 3.780112162711876*^9, 3.7802251627895184`*^9},
  CellLabel->
-  "Out[27]//TableForm=",ExpressionUUID->"629f04c2-6090-4d94-93d4-\
-f4f98908cf2a"]
+  "Out[59]//TableForm=",ExpressionUUID->"fcf7fa65-36af-46d9-b1be-\
+822346f4d4f7"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -3945,1082 +2899,136 @@ Cell[BoxData[{
   3.7789490079748487`*^9, 3.778949032595141*^9}, {3.7790068012756357`*^9, 
   3.7790068080945387`*^9}, {3.779092621197775*^9, 3.779092624788823*^9}, {
   3.7791941678817673`*^9, 3.779194180966914*^9}},
- CellLabel->"In[28]:=",ExpressionUUID->"8f082628-03e5-4288-91c2-151ab2b847fe"],
+ CellLabel->"In[60]:=",ExpressionUUID->"8f082628-03e5-4288-91c2-151ab2b847fe"],
 
 Cell[BoxData[
  TagBox[
   TagBox[GridBox[{
      {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0HF$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0HF$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], "]"}]}
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srPBE/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srPBE/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srPBE/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srPBE/cc-pV5Z\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@HF+srPBE/CBS\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", "24.6646522457441754739`4.392074996594468", 
+      "24.6928258859418825466`4.392570794121613", 
+      "24.7239204821706088921`4.3931173381308355", 
+      "24.7400336141236216747`4.393400285366606", 
+      "24.7523487959999037855`4.393616416228869"},
+     {"\<\"Ne\"\>", "21.5645911073232419142`4.333741227772173", 
+      "21.7293422265904965229`4.337046579901482", 
+      "21.808142673869163275`4.338618679753961", 
+      "21.8348965966809664963`4.339151139577845", 
+      "21.8192186747386536183`4.338839194862546"},
+     {"\<\"H2\"\>", "16.4248264967334591802`4.215500790596553", 
+      "16.5337335717892450759`4.218370935031561", 
+      "16.5793198174780371801`4.219566709231419", 
+      "16.5956910813153797335`4.21999534210483", 
+      "16.6129114555196224501`4.220445750348011"},
+     {"\<\"Li2\"\>", "5.2807659757108860177`3.7226969215673784", 
+      "5.3656458197038672253`3.729622001987655", 
+      "5.4063104080326489509`3.732900977475465", 
+      "5.4285172216045225468`3.734681219936", 
+      "5.4351821884969631071`3.7352141063124265"},
+     {"\<\"LiH\"\>", "8.0988153460079193025`3.9084214971109588", 
+      "8.2131187410359824952`3.9145081016783947", 
+      "8.2710030047321723146`3.9175581785981803", 
+      "8.2998357293082243302`3.9190694968868005", 
+      "8.314738681478607063`3.919848604610833"},
+     {"\<\"FH\"\>", "16.1521227979756467619`4.208229607711245", 
+      "16.4474789006253985235`4.216099337942132", 
+      "16.5678867205997946144`4.219267116499435", 
+      "16.6088809827466512559`4.220340373005917", 
+      "16.6196069054500945583`4.220620747437693"},
+     {"\<\"Ar\"\>", "15.9141157048323051981`4.201782511308794", 
+      "15.994331458644971633`4.203966091879375", 
+      "16.083060268536947035`4.206368689392833", 
+      "16.1693612001072679618`4.20869286265541", 
+      "16.1470449970381686455`4.208093055527639"},
+     {"\<\"H2O\"\>", "12.6823695832228313662`4.103200405026273", 
+      "13.0265712012045007384`4.114830117603786", 
+      "13.1557724943673068907`4.119116354526701", 
+      "13.2012313113363042305`4.120614440810341", 
+      "13.225307173729071053`4.121405767838134"},
+     {"\<\"LiF\"\>", "11.3425583291085718685`4.054711021303261", 
+      "11.625546561728432593`4.065413379898575", 
+      "11.730104344954929374`4.069301875392306", 
+      "11.7833717541332312351`4.071269579473865", 
+      "11.7857344815965703333`4.071356652737717"},
+     {"\<\"HCl\"\>", "12.8307664630477660239`4.108252600313338", 
+      "12.9903863697992747461`4.11362206837683", 
+      "13.0862558155190775722`4.1168154058127495", 
+      "13.1177353647900822864`4.117858865263176", 
+      "13.1190011880269210565`4.117900771393243"},
+     {"\<\"BeO\"\>", "9.9283949618225015854`3.9968790455180923", 
+      "9.9806926566559184266`3.999160682221738", 
+      "10.0824136611161616628`4.003564511695141", 
+      "10.1464767854197219776`4.006315266064545", 
+      "10.1577590714473640077`4.0067979077265"},
+     {"\<\"CO\"\>", "15.0430966581461706966`4.177337246037153", 
+      "15.1834148703362785682`4.181369458816053", 
+      "15.2528275492446656614`4.183350360089738", 
+      "15.286159072431100725`4.184298374673238", 
+      "15.295394023261893679`4.184560669285668"},
+     {"\<\"N2\"\>", "16.3049917190062210182`4.212320582572162", 
+      "16.5020729050689247686`4.2175385014677325", 
+      "16.5781212472912535816`4.219535311608333", 
+      "16.6170636243069544946`4.2205542827196005", 
+      "16.6245716168240953436`4.220750463187389"},
+     {"\<\"CH4\"\>", "14.7254162815436835388`4.168067580961476", 
+      "14.8464601453460343095`4.1716229167776095", 
+      "14.9047563901933486363`4.173324882129175", 
+      "14.9286654387777044661`4.174020985321782", 
+      "14.9466402074422930468`4.1745435803960484"},
+     {"\<\"BH3\"\>", "13.5838425090237642223`4.133022637721843", 
+      "13.7228387079778819668`4.137443958869969", 
+      "13.7768341263870190971`4.13914942951611", 
+      "13.798896808858325258`4.1398443669101725", 
+      "13.8168758083032994222`4.140409853993263"},
+     {"\<\"NH3\"\>", "10.9949499112531174916`4.0411932552233285", 
+      "11.3005778567289656422`4.053100651764143", 
+      "11.4058923836506878047`4.05712926963317", 
+      "11.4410166673613051813`4.058464618286262", 
+      "11.4676942970065312011`4.059476107112539"},
+     {"\<\"BF\"\>", "11.2934171503267215542`4.05282537017891", 
+      "11.3849148959305637163`4.056329788542213", 
+      "11.4248676484264315434`4.057851177679218", 
+      "11.4456203620908354424`4.05863933676865", 
+      "11.4529514608937024178`4.058917420125967"},
+     {"\<\"BN\"\>", "11.7202259306495317759`4.068935983652093", 
+      "11.8480483664837858981`4.073646818407662", 
+      "11.9275853805173301936`4.07655253402617", 
+      "11.9685327064204471981`4.078040910927321", 
+      "11.9811658110071252992`4.078499078541928"},
+     {"\<\"SH2\"\>", "10.4531777111378669787`4.019248333760483", 
+      "10.6572937658224624613`4.027646937168862", 
+      "10.7446247266749601579`4.031191251658045", 
+      "10.7747500244287106597`4.032407203262417", 
+      "10.78438270895899187`4.032795291416754"},
+     {"\<\"F2\"\>", "16.5751430062096751783`4.219457284077705", 
+      "16.6084297731988463909`4.220328574470012", 
+      "16.6720447279382000261`4.22198886675083", 
+      "16.7082133593031230134`4.222930012449942", 
+      "16.6906604866675287724`4.222473523020736"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
-         Offset[0.5599999999999999]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
-   Column],
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
    BoxForm`e$, 
@@ -5041,217 +3049,37 @@ Cell[BoxData[
    3.7791938410491543`*^9, 3.7791939890714083`*^9, 3.779194181431531*^9, 
    3.779609946652101*^9, 3.779612927081641*^9, 3.779786457585979*^9, 
    3.779982067901416*^9, 3.77998216950714*^9, 3.780053314515749*^9, 
-   3.780059381130509*^9},
+   3.780059381130509*^9, 3.780073056627645*^9, 3.7801120375615187`*^9, 
+   3.780112162807775*^9, 3.780225162844274*^9},
  CellLabel->
-  "Out[29]//TableForm=",ExpressionUUID->"902edbc9-fc95-4138-bc2c-\
-22997092a192"],
+  "Out[61]//TableForm=",ExpressionUUID->"e1f4ac3b-d630-44b4-8cd0-\
+5dcfca5f663b"],
 
 Cell[BoxData[
- InterpretationBox[
-  TagBox[
-   FrameBox[GridBox[{
-      {
-       ItemBox[
-        TagBox[
-         TagBox[
-          TemplateBox[{"1"},
-           "OutputSizeLimit`Skeleton"],
-          Function[BoxForm`e$, 
-           TableForm[BoxForm`e$]]],
-         Short[#, 5]& ],
-        BaseStyle->{Deployed -> False},
-        StripOnInput->False]},
-      {GridBox[{
-         {
-          TagBox[
-           TooltipBox[
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource[
-                "FEStrings", "sizeBriefExplanation"], StandardForm],
-               ImageSizeCache->{58., {2., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLText",
-             StripOnInput->False],
-            StyleBox[
-             DynamicBox[
-              ToBoxes[
-               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
-               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
-             False]],
-           Annotation[#, 
-            Style[
-             Dynamic[
-              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
-             DynamicUpdating -> True], "Tooltip"]& ], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm],
-               ImageSizeCache->{50., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 30, 21259940437824449933,
-              5/2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm],
-               ImageSizeCache->{56., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 30, 21259940437824449933,
-              5 2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm],
-               ImageSizeCache->{42., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 30, 21259940437824449933,
-              Infinity],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm],
-               ImageSizeCache->{74., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>FrontEndExecute[{
-              FrontEnd`SetOptions[
-              FrontEnd`$FrontEnd, 
-               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
-              FrontEnd`FrontEndToken["PreferencesDialog"]}],
-           Evaluator->None,
-           Method->"Preemptive"]}
-        },
-        AutoDelete->False,
-        FrameStyle->GrayLevel[0.85],
-        GridBoxDividers->{"Columns" -> {False, {True}}},
-        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
-        GridBoxSpacings->{"Columns" -> {{2}}}]}
-     },
-     DefaultBaseStyle->"Column",
-     GridBoxAlignment->{
-      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-       "RowsIndexed" -> {}},
-     GridBoxDividers->{
-      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
-       "RowsIndexed" -> {}},
-     GridBoxItemSize->{
-      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
-       "RowsIndexed" -> {}},
-     GridBoxSpacings->{"Columns" -> {
-         Offset[0.27999999999999997`], {
-          Offset[0.5599999999999999]}, 
-         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
-         Offset[0.2], 
-         Offset[1.2], {
-          Offset[0.4]}, 
-         Offset[0.2]}, "RowsIndexed" -> {}}],
-    BaseStyle->"OutputSizeLimit",
-    FrameMargins->{{12, 12}, {0, 15}},
-    FrameStyle->GrayLevel[0.85],
-    RoundingRadius->5,
-    StripOnInput->False],
-   Deploy,
-   DefaultBaseStyle->"Deploy"],
-  If[21259940437824449933 === $SessionID, 
-   Out[30], Message[
-     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
-   Null]]], "Output",
+ TagBox[GridBox[{
+    {"0.2735475072530672014`2.4370327615511767", 
+     "0.1197732676636843185`2.07835989817311", 
+     "0.0433723081093328119`1.6372125342648436", 
+     "0.013266716181846671`1.1227634382682956", "0``3."},
+    {"0.2989263237859587918`2.4755641611804666", 
+     "0.1262273020381746158`2.101153299774415", 
+     "0.0463611077677696312`1.6661538045927187", 
+     "0.0148351296967295584`1.17129134750677", "0``3."},
+    {"0.5429375905062396868`2.734749911252793", 
+     "0.1987359725245703146`2.2982764843968435", 
+     "0.0753454103312023449`1.8770568023899823", 
+     "0.0266776296452260198`1.426147239122676", "0``3."}
+   },
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+   GridBoxSpacings->{"Columns" -> {
+       Offset[0.27999999999999997`], {
+        Offset[2.0999999999999996`]}, 
+       Offset[0.27999999999999997`]}, "Rows" -> {
+       Offset[0.2], {
+        Offset[0.4]}, 
+       Offset[0.2]}}],
+  Function[BoxForm`e$, 
+   TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{
   3.7789482693528748`*^9, 3.77894903322053*^9, 3.7789492441080933`*^9, 
    3.7789494669350233`*^9, 3.7789495150037107`*^9, 3.778989281825931*^9, 
@@ -5265,10 +3093,11 @@ Cell[BoxData[
    3.7791938410491543`*^9, 3.7791939890714083`*^9, 3.779194181431531*^9, 
    3.779609946652101*^9, 3.779612927081641*^9, 3.779786457585979*^9, 
    3.779982067901416*^9, 3.77998216950714*^9, 3.780053314515749*^9, 
-   3.7800593812866287`*^9},
+   3.780059381130509*^9, 3.780073056627645*^9, 3.7801120375615187`*^9, 
+   3.780112162807775*^9, 3.7802251628448143`*^9},
  CellLabel->
-  "Out[30]//TableForm=",ExpressionUUID->"3f6068aa-789d-451e-b5e6-\
-10a0ff9acbd3"]
+  "Out[62]//TableForm=",ExpressionUUID->"cde8d24b-70c2-40a6-b51f-\
+be2dae17e8e1"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -82690,7 +80519,7 @@ Cell[BoxData[{
   3.778940799895406*^9, 3.778940842897552*^9}, {3.778940948377639*^9, 
   3.778940953284575*^9}, {3.778940997622835*^9, 3.7789410608201733`*^9}, {
   3.778944117997401*^9, 3.778944147208864*^9}},
- CellLabel->"In[31]:=",ExpressionUUID->"f374a050-8b43-4e1c-ab4b-8dfa7dfe4b74"],
+ CellLabel->"In[63]:=",ExpressionUUID->"f374a050-8b43-4e1c-ab4b-8dfa7dfe4b74"],
 
 Cell[BoxData[
  TagBox[
@@ -82765,19 +80594,16 @@ Cell[BoxData[
       "14.8706393244375352225`4.172329640284345", 
       "15.0288547108831398447`4.176925885996401"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -82796,10 +80622,11 @@ Cell[BoxData[
    3.779107114154561*^9, 3.779114985423834*^9, 3.779120571121049*^9, 
    3.7791210713841352`*^9, 3.779193841626624*^9, 3.779193989141272*^9, 
    3.779609946884309*^9, 3.7797864578663263`*^9, 3.7799820682102413`*^9, 
-   3.7800533148879766`*^9, 3.78005938142864*^9},
+   3.7800533148879766`*^9, 3.78005938142864*^9, 3.78007305691535*^9, 
+   3.780112037861093*^9, 3.780112162904031*^9, 3.780225162900816*^9},
  CellLabel->
-  "Out[33]//TableForm=",ExpressionUUID->"048c0769-3ec8-47ec-a764-\
-50e7022c75b1"]
+  "Out[65]//TableForm=",ExpressionUUID->"117b887e-2881-4f8d-83ac-\
+3181bffdf7b0"]
 }, Open  ]]
 }, Closed]],
 
@@ -82887,7 +80714,7 @@ Cell[BoxData[{
   3.778940799895406*^9, 3.778940842897552*^9}, {3.7789409242363777`*^9, 
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941098194315*^9}, {
   3.7789441726229467`*^9, 3.7789441997912083`*^9}},
- CellLabel->"In[34]:=",ExpressionUUID->"fa4c45a8-ddd6-4291-b0ff-f7ddb674a3fa"],
+ CellLabel->"In[66]:=",ExpressionUUID->"fa4c45a8-ddd6-4291-b0ff-f7ddb674a3fa"],
 
 Cell[BoxData[
  TagBox[
@@ -82962,19 +80789,16 @@ Cell[BoxData[
       "15.1435936515662081803`4.180228947677202", 
       "15.1899066391049704094`4.181555104590493"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -82992,10 +80816,11 @@ Cell[BoxData[
    3.779107114260174*^9, 3.779114985505265*^9, 3.7791205712087717`*^9, 
    3.7791210714225397`*^9, 3.7791938418223963`*^9, 3.779193989191712*^9, 
    3.779609946946731*^9, 3.779786457951107*^9, 3.7799820683157253`*^9, 
-   3.780053314998081*^9, 3.7800593815372553`*^9},
+   3.780053314998081*^9, 3.7800593815372553`*^9, 3.780073057029646*^9, 
+   3.780112037961546*^9, 3.780112162994719*^9, 3.780225162961133*^9},
  CellLabel->
-  "Out[36]//TableForm=",ExpressionUUID->"d59e3dc3-47c9-4bd0-bc4f-\
-61855020919d"]
+  "Out[68]//TableForm=",ExpressionUUID->"37ba9b75-2a4e-4e0b-a4cc-\
+0c8f81513ea5"]
 }, Open  ]]
 }, Closed]],
 
@@ -83084,7 +80909,7 @@ Cell[BoxData[{
   3.778940799895406*^9, 3.778940842897552*^9}, {3.7789409242363777`*^9, 
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941139753708*^9}, {
   3.778944209570156*^9, 3.7789442323864527`*^9}},
- CellLabel->"In[37]:=",ExpressionUUID->"718dda33-1726-4391-8bed-e0672e45e563"],
+ CellLabel->"In[69]:=",ExpressionUUID->"718dda33-1726-4391-8bed-e0672e45e563"],
 
 Cell[BoxData[
  TagBox[
@@ -83159,19 +80984,16 @@ Cell[BoxData[
       "15.2029259406622987427`4.181927179891838", 
       "15.2089458980206551075`4.182099115003892"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -83189,10 +81011,12 @@ Cell[BoxData[
    3.7790817230168962`*^9, 3.779107114356686*^9, 3.779114985591751*^9, 
    3.779120571276531*^9, 3.779121071486504*^9, 3.7791938420232286`*^9, 
    3.779193989246027*^9, 3.779609947020925*^9, 3.779786457968437*^9, 
-   3.779982068432605*^9, 3.7800533151086597`*^9, 3.780059381653413*^9},
+   3.779982068432605*^9, 3.7800533151086597`*^9, 3.780059381653413*^9, 
+   3.780073057146558*^9, 3.780112038067762*^9, 3.780112163082955*^9, 
+   3.780225163017527*^9},
  CellLabel->
-  "Out[39]//TableForm=",ExpressionUUID->"cec2028a-3fb5-421d-bed8-\
-e9d6d8e1f08b"]
+  "Out[71]//TableForm=",ExpressionUUID->"91cca38b-a2cc-4a81-91c5-\
+0e7bccc42065"]
 }, Open  ]]
 }, Closed]],
 
@@ -83282,7 +81106,7 @@ Cell[BoxData[{
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941098194315*^9}, {
   3.7789411459949503`*^9, 3.778941164692428*^9}, {3.7789442404898167`*^9, 
   3.778944260998493*^9}},
- CellLabel->"In[40]:=",ExpressionUUID->"7895dc90-d7ba-4e21-8223-4615f676f072"],
+ CellLabel->"In[72]:=",ExpressionUUID->"7895dc90-d7ba-4e21-8223-4615f676f072"],
 
 Cell[BoxData[
  TagBox[
@@ -83357,19 +81181,16 @@ Cell[BoxData[
       "15.1624443621337015031`4.1807692202546685", 
       "15.1590408560463760779`4.180671723452753"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -83388,10 +81209,11 @@ Cell[BoxData[
    3.779114985678437*^9, 3.77912057135244*^9, 3.779121071607135*^9, 
    3.7791938422232847`*^9, 3.779193989308299*^9, 3.779609947087453*^9, 
    3.7797864580539017`*^9, 3.7799820685492573`*^9, 3.780053315223781*^9, 
-   3.7800593817697077`*^9},
+   3.7800593817697077`*^9, 3.780073057263524*^9, 3.780112038171393*^9, 
+   3.780112163095594*^9, 3.7802251630787*^9},
  CellLabel->
-  "Out[42]//TableForm=",ExpressionUUID->"809974b2-643b-4834-bde5-\
-f0a96b61acde"]
+  "Out[74]//TableForm=",ExpressionUUID->"8b1c5425-df60-4ef8-908f-\
+02bf3b833f22"]
 }, Open  ]]
 }, Closed]],
 
@@ -83495,7 +81317,7 @@ Cell[BoxData[{
   3.778944260998493*^9}, {3.7789480302740583`*^9, 3.7789481753009977`*^9}, {
   3.778989296778653*^9, 3.778989320855802*^9}, {3.779095556474421*^9, 
   3.779095561650095*^9}},
- CellLabel->"In[43]:=",ExpressionUUID->"8e941441-2618-4897-ba2f-18c0b38ca948"],
+ CellLabel->"In[75]:=",ExpressionUUID->"8e941441-2618-4897-ba2f-18c0b38ca948"],
 
 Cell[BoxData[
  TagBox[
@@ -83613,19 +81435,16 @@ Cell[BoxData[
       "15.066629999999999967`4.178016123179084", 
       "15.1099999999999994316`4.179264464339026"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -83647,10 +81466,11 @@ Cell[BoxData[
    3.779114985780925*^9, 3.779120571506633*^9, 3.7791210717210913`*^9, 
    3.779193842431217*^9, 3.7791939893589373`*^9, 3.7796099471535597`*^9, 
    3.779786458128839*^9, 3.779982068649797*^9, 3.7800533153353367`*^9, 
-   3.780059381872768*^9},
+   3.780059381872768*^9, 3.780073057375265*^9, 3.780112038275284*^9, 
+   3.780112163191525*^9, 3.780225163135285*^9},
  CellLabel->
-  "Out[45]//TableForm=",ExpressionUUID->"de01639a-2411-414f-bc1e-\
-dcf05d86ffb8"],
+  "Out[77]//TableForm=",ExpressionUUID->"ea211ece-02e8-4bc9-97ec-\
+4f35dfe074f1"],
 
 Cell[BoxData[
  TagBox[GridBox[{
@@ -83667,16 +81487,14 @@ Cell[BoxData[
      "7.7555539999999982825`3.8896128260760516", 
      "7.7400039999999989959`3.8887411851244273", "0``3."}
    },
-   GridBoxAlignment->{
-    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-     "RowsIndexed" -> {}},
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
    GridBoxSpacings->{"Columns" -> {
        Offset[0.27999999999999997`], {
         Offset[2.0999999999999996`]}, 
-       Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+       Offset[0.27999999999999997`]}, "Rows" -> {
        Offset[0.2], {
         Offset[0.4]}, 
-       Offset[0.2]}, "RowsIndexed" -> {}}],
+       Offset[0.2]}}],
   Function[BoxForm`e$, 
    TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{
@@ -83692,10 +81510,11 @@ Cell[BoxData[
    3.779114985780925*^9, 3.779120571506633*^9, 3.7791210717210913`*^9, 
    3.779193842431217*^9, 3.7791939893589373`*^9, 3.7796099471535597`*^9, 
    3.779786458128839*^9, 3.779982068649797*^9, 3.7800533153353367`*^9, 
-   3.780059381883958*^9},
+   3.780059381872768*^9, 3.780073057375265*^9, 3.780112038275284*^9, 
+   3.780112163191525*^9, 3.780225163135872*^9},
  CellLabel->
-  "Out[46]//TableForm=",ExpressionUUID->"9acfd0a4-3920-482b-8854-\
-9d7d53a23f9c"]
+  "Out[78]//TableForm=",ExpressionUUID->"b4a68d30-91dc-453a-9055-\
+d471e62bb1dd"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -83785,7 +81604,7 @@ Cell[BoxData[{
  CellChangeTimes->{{3.7789481873480797`*^9, 3.7789482324048033`*^9}, {
   3.7789893562129097`*^9, 3.7789893711485786`*^9}, {3.779095568562147*^9, 
   3.779095573569989*^9}},
- CellLabel->"In[47]:=",ExpressionUUID->"c771a5d0-a6b2-41e4-9a84-7b98eb54a22f"],
+ CellLabel->"In[79]:=",ExpressionUUID->"c771a5d0-a6b2-41e4-9a84-7b98eb54a22f"],
 
 Cell[BoxData[
  TagBox[
@@ -83903,19 +81722,16 @@ Cell[BoxData[
       "15.1624443621337015031`4.1807692202546685", 
       "15.1099999999999994316`4.179264464339026"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -83931,10 +81747,11 @@ Cell[BoxData[
   3.779107114715227*^9, 3.7791149858837976`*^9, 3.779120571591148*^9, 
   3.779121071972188*^9, 3.779193842664701*^9, 3.779193989475515*^9, 
   3.779609947220604*^9, 3.7797864582076693`*^9, 3.7799820687468853`*^9, 
-  3.780053315437216*^9, 3.780059381969286*^9},
+  3.780053315437216*^9, 3.780059381969286*^9, 3.7800730574965343`*^9, 
+  3.780112038377692*^9, 3.780112163285386*^9, 3.7802251631971207`*^9},
  CellLabel->
-  "Out[49]//TableForm=",ExpressionUUID->"2217573d-8415-4547-8011-\
-17c1354a0500"],
+  "Out[81]//TableForm=",ExpressionUUID->"d5ce85c5-f694-4aae-a6ae-\
+9d8367d98748"],
 
 Cell[BoxData[
  TagBox[GridBox[{
@@ -83951,16 +81768,14 @@ Cell[BoxData[
      "7.7026613475761624983`3.8866408042467633", 
      "7.7130100373125269897`3.887223896531278", "0``3."}
    },
-   GridBoxAlignment->{
-    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-     "RowsIndexed" -> {}},
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
    GridBoxSpacings->{"Columns" -> {
        Offset[0.27999999999999997`], {
         Offset[2.0999999999999996`]}, 
-       Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+       Offset[0.27999999999999997`]}, "Rows" -> {
        Offset[0.2], {
         Offset[0.4]}, 
-       Offset[0.2]}, "RowsIndexed" -> {}}],
+       Offset[0.2]}}],
   Function[BoxForm`e$, 
    TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{3.778948232908155*^9, 3.778949244657428*^9, 
@@ -83970,10 +81785,11 @@ Cell[BoxData[
   3.779107114715227*^9, 3.7791149858837976`*^9, 3.779120571591148*^9, 
   3.779121071972188*^9, 3.779193842664701*^9, 3.779193989475515*^9, 
   3.779609947220604*^9, 3.7797864582076693`*^9, 3.7799820687468853`*^9, 
-  3.780053315437216*^9, 3.780059381980053*^9},
+  3.780053315437216*^9, 3.780059381969286*^9, 3.7800730574965343`*^9, 
+  3.780112038377692*^9, 3.780112163285386*^9, 3.780225163197896*^9},
  CellLabel->
-  "Out[50]//TableForm=",ExpressionUUID->"c68943c7-e509-4d1e-beb6-\
-7a56c4f20b93"]
+  "Out[82]//TableForm=",ExpressionUUID->"256f6b4d-8db6-4060-89f9-\
+4efb5dbd5942"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -84063,7 +81879,7 @@ Cell[BoxData[{
  CellChangeTimes->{{3.7789481873480797`*^9, 3.778948268839349*^9}, {
   3.7789894382944202`*^9, 3.778989457429191*^9}, {3.779095581051141*^9, 
   3.779095586585718*^9}},
- CellLabel->"In[51]:=",ExpressionUUID->"ec1256d4-33e8-4f45-b014-0878328e833b"],
+ CellLabel->"In[83]:=",ExpressionUUID->"ec1256d4-33e8-4f45-b014-0878328e833b"],
 
 Cell[BoxData[
  TagBox[
@@ -84181,19 +81997,16 @@ Cell[BoxData[
       "15.1590408560463760779`4.180671723452753", 
       "15.1099999999999994316`4.179264464339026"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -84209,10 +82022,11 @@ Cell[BoxData[
   3.779107114820717*^9, 3.779114986001439*^9, 3.779120571670328*^9, 
   3.779121072073509*^9, 3.779193842878688*^9, 3.779193989542691*^9, 
   3.7796099472896423`*^9, 3.779786458286212*^9, 3.779982068856703*^9, 
-  3.7800533155092154`*^9, 3.7800593820919647`*^9},
+  3.7800533155092154`*^9, 3.7800593820919647`*^9, 3.780073057840234*^9, 
+  3.7801120384853573`*^9, 3.780112163376855*^9, 3.780225163254116*^9},
  CellLabel->
-  "Out[53]//TableForm=",ExpressionUUID->"31b64cc9-dd4c-43b0-b49f-\
-96c109a9797c"],
+  "Out[85]//TableForm=",ExpressionUUID->"d1ab6a32-bebb-4867-b944-\
+b315ed57a0b9"],
 
 Cell[BoxData[
  TagBox[GridBox[{
@@ -84229,16 +82043,14 @@ Cell[BoxData[
      "7.7070911812984057576`3.8868904970813123", 
      "7.7155097333084814437`3.8873646234711425", "0``3."}
    },
-   GridBoxAlignment->{
-    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-     "RowsIndexed" -> {}},
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
    GridBoxSpacings->{"Columns" -> {
        Offset[0.27999999999999997`], {
         Offset[2.0999999999999996`]}, 
-       Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+       Offset[0.27999999999999997`]}, "Rows" -> {
        Offset[0.2], {
         Offset[0.4]}, 
-       Offset[0.2]}, "RowsIndexed" -> {}}],
+       Offset[0.2]}}],
   Function[BoxForm`e$, 
    TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{3.7789482693528748`*^9, 3.778949244739724*^9, 
@@ -84248,10 +82060,11 @@ Cell[BoxData[
   3.779107114820717*^9, 3.779114986001439*^9, 3.779120571670328*^9, 
   3.779121072073509*^9, 3.779193842878688*^9, 3.779193989542691*^9, 
   3.7796099472896423`*^9, 3.779786458286212*^9, 3.779982068856703*^9, 
-  3.7800533155092154`*^9, 3.780059382103592*^9},
+  3.7800533155092154`*^9, 3.7800593820919647`*^9, 3.780073057840234*^9, 
+  3.7801120384853573`*^9, 3.780112163376855*^9, 3.780225163254723*^9},
  CellLabel->
-  "Out[54]//TableForm=",ExpressionUUID->"a1559c77-86b4-4b74-b5e0-\
-c51cc0f66b53"]
+  "Out[86]//TableForm=",ExpressionUUID->"4712d067-033f-4023-b07a-\
+b1b00ef4ec9a"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -143365,7 +141178,7 @@ Cell[BoxData[{
   3.778940953284575*^9}, {3.778940997622835*^9, 3.7789410608201733`*^9}, {
   3.778944117997401*^9, 3.778944147208864*^9}, {3.778993796498562*^9, 
   3.778993812570472*^9}},
- CellLabel->"In[55]:=",ExpressionUUID->"3733b820-19e8-4d95-9d3b-ef9c19a09235"],
+ CellLabel->"In[87]:=",ExpressionUUID->"3733b820-19e8-4d95-9d3b-ef9c19a09235"],
 
 Cell[BoxData[
  TagBox[
@@ -143440,19 +141253,16 @@ Cell[BoxData[
       "15.4136698901100501757`4.187906053596479", 
       "15.5714299232289441477`4.192328495628715"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -143475,10 +141285,12 @@ Cell[BoxData[
    3.779121015050411*^9, {3.7791210721780243`*^9, 3.779121081611643*^9}, {
    3.779121147843677*^9, 3.779121159905691*^9}, 3.779193843090057*^9, 
    3.779193989609847*^9, 3.779609947359323*^9, 3.779786458360993*^9, 
-   3.779982068975531*^9, 3.7800533155813923`*^9, 3.780059382209041*^9},
+   3.779982068975531*^9, 3.7800533155813923`*^9, 3.780059382209041*^9, 
+   3.780073058059353*^9, 3.780112038589583*^9, 3.780112163562276*^9, 
+   3.780225163312461*^9},
  CellLabel->
-  "Out[57]//TableForm=",ExpressionUUID->"663b1f03-40a3-4997-9381-\
-e572bbb6b5e3"]
+  "Out[89]//TableForm=",ExpressionUUID->"9beb9088-f68f-4b7e-82b4-\
+3eec285395d4"]
 }, Open  ]]
 }, Closed]],
 
@@ -143568,7 +141380,7 @@ Cell[BoxData[{
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941098194315*^9}, {
   3.7789441726229467`*^9, 3.7789441997912083`*^9}, {3.7789938254863977`*^9, 
   3.7789938430764503`*^9}},
- CellLabel->"In[58]:=",ExpressionUUID->"589a346e-5dec-4bfd-8636-0f69c29fffb0"],
+ CellLabel->"In[90]:=",ExpressionUUID->"589a346e-5dec-4bfd-8636-0f69c29fffb0"],
 
 Cell[BoxData[
  TagBox[
@@ -143643,19 +141455,16 @@ Cell[BoxData[
       "15.645871160402425204`4.194399749624907", 
       "15.6921520190644656623`4.1956825067428065"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -143677,10 +141486,11 @@ Cell[BoxData[
    3.7791210723251963`*^9, 3.779121084944294*^9}, 3.7791211795159283`*^9, 
    3.779193843473682*^9, 3.779193989675355*^9, 3.7796099474257917`*^9, 
    3.779786458436139*^9, 3.779982069065565*^9, 3.780053315649097*^9, 
-   3.780059382318665*^9},
+   3.780059382318665*^9, 3.7800730581800623`*^9, 3.78011203869088*^9, 
+   3.780112163650029*^9, 3.780225163367456*^9},
  CellLabel->
-  "Out[60]//TableForm=",ExpressionUUID->"1d70d98e-708d-4cb8-9952-\
-7c7d7167af56"]
+  "Out[92]//TableForm=",ExpressionUUID->"a8f6a2e4-091f-4e31-baa1-\
+8a5f95266f65"]
 }, Open  ]]
 }, Closed]],
 
@@ -143770,7 +141580,7 @@ Cell[BoxData[{
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941139753708*^9}, {
   3.778944209570156*^9, 3.7789442323864527`*^9}, {3.778993853154049*^9, 
   3.778993870951878*^9}},
- CellLabel->"In[61]:=",ExpressionUUID->"f1083ffe-a0f7-468e-ab08-90e1a3f1ca50"],
+ CellLabel->"In[93]:=",ExpressionUUID->"f1083ffe-a0f7-468e-ab08-90e1a3f1ca50"],
 
 Cell[BoxData[
  TagBox[
@@ -143845,19 +141655,16 @@ Cell[BoxData[
       "15.7286230306372871723`4.196690703782108", 
       "15.7346073969848276874`4.196855911059202"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -143879,10 +141686,12 @@ Cell[BoxData[
    3.779120571938652*^9, 3.779121015193987*^9, {3.7791210725407057`*^9, 
    3.779121088899686*^9}, 3.779121179615395*^9, 3.779193843833949*^9, 
    3.779193989745235*^9, 3.779609947490632*^9, 3.779786458509069*^9, 
-   3.77998206923214*^9, 3.7800533157182617`*^9, 3.780059382475772*^9},
+   3.77998206923214*^9, 3.7800533157182617`*^9, 3.780059382475772*^9, 
+   3.780073058296977*^9, 3.780112038800685*^9, 3.780112163743257*^9, 
+   3.780225163430197*^9},
  CellLabel->
-  "Out[63]//TableForm=",ExpressionUUID->"c605ff9b-8513-44f9-b627-\
-ac2b720ffbca"]
+  "Out[95]//TableForm=",ExpressionUUID->"4d4e631a-fd02-49f2-a85c-\
+cc3fcdb443cb"]
 }, Open  ]]
 }, Closed]],
 
@@ -143972,7 +141781,7 @@ Cell[BoxData[{
   3.77894094468468*^9}, {3.778941071778977*^9, 3.778941098194315*^9}, {
   3.7789411459949503`*^9, 3.778941164692428*^9}, {3.7789442404898167`*^9, 
   3.778944260998493*^9}, {3.778993878875177*^9, 3.7789938951028767`*^9}},
- CellLabel->"In[64]:=",ExpressionUUID->"dd119632-a936-4ad0-a5cc-869a3f9ca110"],
+ CellLabel->"In[96]:=",ExpressionUUID->"dd119632-a936-4ad0-a5cc-869a3f9ca110"],
 
 Cell[BoxData[
  TagBox[
@@ -144047,19 +141856,16 @@ Cell[BoxData[
       "15.736007052683277152`4.196894541556727", 
       "15.7325664729181600165`4.1967995753955645"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -144082,10 +141888,11 @@ Cell[BoxData[
    3.779121015260049*^9, {3.7791210727650013`*^9, 3.779121092329274*^9}, 
    3.779121179671891*^9, 3.779193843996827*^9, 3.7791939898783417`*^9, 
    3.77960994755653*^9, 3.7797864585858107`*^9, 3.7799820693288527`*^9, 
-   3.780053315807444*^9, 3.780059382596971*^9},
+   3.780053315807444*^9, 3.780059382596971*^9, 3.780073058412818*^9, 
+   3.780112038928368*^9, 3.780112163833521*^9, 3.7802251634856853`*^9},
  CellLabel->
-  "Out[66]//TableForm=",ExpressionUUID->"2879162d-e9cc-49cc-99ae-\
-9cf67c7b96cd"]
+  "Out[98]//TableForm=",ExpressionUUID->"7c8949f5-3f23-427b-897b-\
+0470604e4e6a"]
 }, Open  ]]
 }, Closed]],
 
@@ -144117,6 +141924,182 @@ bb4abc269acc"],
 
 Cell[CellGroupData[{
 
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"IP$G0W0PBE0", "=", 
+   RowBox[{"Table", "[", 
+    RowBox[{
+     RowBox[{"{", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
+        RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{"-", 
+        RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{"-", 
+        RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{"-", 
+        RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], ",", 
+       "\[IndentingNewLine]", 
+       RowBox[{"-", 
+        RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
+         RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}]}], 
+      "\[IndentingNewLine]", "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{"k", ",", 
+       RowBox[{"Length", "[", "GW20$G0W0PBE0$ccpVDZ", "]"}]}], "}"}]}], 
+    "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"TableForm", "[", 
+  RowBox[{
+   RowBox[{"SetAccuracy", "[", 
+    RowBox[{"IP$G0W0PBE0", ",", "3"}], "]"}], ",", 
+   RowBox[{"TableHeadings", "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{"None", ",", " ", 
+      RowBox[{"{", 
+       RowBox[{
+       "\"\<Mol.\>\"", ",", "\"\<G0W0@PBE0/cc-pVDZ\>\"", ",", 
+        "\"\<G0W0@PBE0/cc-pVTZ\>\"", ",", "\"\<G0W0@PBE0/cc-pVQZ\>\"", ",", 
+        "\"\<G0W0@PBE0/cc-pV5Z\>\"", ",", "\"\<G0W0@PBE0/CBS\>\""}], "}"}]}], 
+     "}"}]}]}], "]"}]}], "Input",
+ InitializationCell->True,
+ CellChangeTimes->CompressedData["
+1:eJxTTMoPSmViYGAQBmIQXXVf//E3xTeOi3p8wfSSGkexY2pvHD3lGcVBtMfP
+w7IgWtOgXQ5EL2hf6QiiAxqPuIForeV/3h9Uf+O4f0fMVxCdMaH9P4h+9kKU
+6RCQTnz7QxBEXzF3EwXRi67ZS4PoeI1psiB6yhr+eYeB9IrP8xeAaLGjJ8qP
+AuljC192guhdryTm3QTSu5OkF4JoucJzd28DaQnHXY9A9Jy7v77fBdJ3Vbl/
+gOifZWukHwPpksMisiA691p2N6/GG8dDErq9IPqbs7agFJBWjVooBKI3PXtm
+yqX5xjHH5YgZiN4ibX/tL5BeoRsCpm3u1d8C0WITu8A0ANJtm/g=
+  "],
+ CellLabel->"In[99]:=",ExpressionUUID->"57cfc487-608f-4265-b6c0-cb1c6b1b099e"],
+
+Cell[BoxData[
+ TagBox[
+  TagBox[GridBox[{
+     {
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pV5Z\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", "23.9872860000000009961`4.379981113249158", 
+      "23.9771549999999997738`4.3797976507769665", 
+      "24.0341869999999993013`4.380829435913989", 
+      "24.0412730000000003372`4.380957460096016"},
+     {"\<\"Ne\"\>", "20.3523069999999997037`4.308613645039485", 
+      "20.8788669999999996207`4.319706927807306", 
+      "21.0511930000000013763`4.32327671293347", 
+      "21.0532099999999999795`4.323318322452107"},
+     {"\<\"H2\"\>", "15.9793040000000008405`4.203557859111754", 
+      "16.1338620000000005916`4.207738337911593", 
+      "16.1928079999999994243`4.20932216642862", 
+      "16.2068529999999988434`4.2096986929842775"},
+     {"\<\"Li2\"\>", "5.1517049999999997567`3.711950986234472", 
+      "5.2417139999999999844`3.7194733211488673", 
+      "5.2804570000000001784`3.722671510410616", 
+      "5.3050360000000003069`3.724688335371818"},
+     {"\<\"LiH\"\>", "7.319753000000000398`3.864496426338871", 
+      "7.487382000000000204`3.874329991036409", 
+      "7.5578139999999995879`3.8783961995990404", 
+      "7.5942600000000002325`3.880485461730872"},
+     {"\<\"FH\"\>", "14.946828000000000003`4.174549036923943", 
+      "15.6054340000000006938`4.193275851257306", 
+      "15.8213279999999993919`4.199242934210088", 
+      "15.8512889999999995183`4.200064584082183"},
+     {"\<\"Ar\"\>", "14.9279240000000008592`4.173999415358438", 
+      "15.2464560000000002304`4.183168904763817", 
+      "15.4199800000000006861`4.188083810427307", 
+      "15.49843199999999932`4.190287762157773"},
+     {"\<\"H2O\"\>", "11.531121999999999872`4.061871567025954", 
+      "12.2126479999999997261`4.086809839792856", 
+      "12.4328050000000001063`4.094569122092256", 
+      "12.4712902000000003255`4.095911385134969"},
+     {"\<\"LiF\"\>", "9.8940289999999997406`3.9953731789735354", 
+      "10.5953189999999999316`4.025114036823515", 
+      "10.8216090000000004778`4.034291838207715", 
+      "10.935633599999999177`4.03884395070352"},
+     {"\<\"HCl\"\>", "11.9559580000000007516`4.07758438073992", 
+      "12.3355139999999998679`4.091157250519138", 
+      "12.5034080000000002997`4.097028402917424", 
+      "12.5711940000000002016`4.099376528520089"},
+     {"\<\"BeO\"\>", "9.1597869999999996793`3.9618853747813683", 
+      "9.4418620000000004211`3.975057648597198", 
+      "9.6307530000000003412`3.9836602446489406", 
+      "9.7353009999999997603`3.988349383757249"},
+     {"\<\"CO\"\>", "13.6695390000000003283`4.135753868398684", 
+      "14.017856000000000094`4.146681594331603", 
+      "14.1347810000000002617`4.150289084050983", 
+      "14.1793119999999994718`4.151655158784115"},
+     {"\<\"N2\"\>", "14.8396670000000003853`4.171424155546439", 
+      "15.2988680000000005776`4.184659297514253", 
+      "15.4396039999999992176`4.188636157216018", 
+      "15.4954579999999992879`4.190204417227973"},
+     {"\<\"CH4\"\>", "13.8495290000000004227`4.141435004001248", 
+      "14.153966999999999743`4.1508781787120395", 
+      "14.2658199999999997232`4.154296739977675", 
+      "14.3041245999999997451`4.155461284509502"},
+     {"\<\"BH3\"\>", "12.8676230000000000331`4.109498328308721", 
+      "13.1308860000000002799`4.118294030882251", 
+      "13.2243180000000002394`4.121373283998414", 
+      "13.2577528000000004482`4.122469917035049"},
+     {"\<\"NH3\"\>", "9.9628219999999991785`3.998382371098099", 
+      "10.556383000000000294`4.023515138631103", 
+      "10.7276109999999995637`4.030503016930004", 
+      "10.7473694000000001836`4.031302176356716"},
+     {"\<\"BF\"\>", "10.6605000000000007532`4.027777574498109", 
+      "10.8653689999999993887`4.0360444800299975", 
+      "10.9188089999999995428`4.038175269052154", 
+      "10.9432810000000007022`4.039147551116693"},
+     {"\<\"BN\"\>", "11.0696709999999995944`4.0441347134706085", 
+      "11.3955619999999999692`4.056735748338702", 
+      "11.5368709999999996541`4.062088036575616", 
+      "11.6014769999999991512`4.064513283374842"},
+     {"\<\"SH2\"\>", "9.6856539999999995416`3.9861289507135482", 
+      "10.0977470000000000283`4.004224485206725", 
+      "10.2457390000000003738`4.010543288461705", 
+      "10.3031070000000006814`4.012968210091552"},
+     {"\<\"F2\"\>", "14.9234899999999992559`4.173870398907362", 
+      "15.3789250000000006224`4.186925978970949", 
+      "15.5709959999999991709`4.192316393137768", 
+      "15.6398539999999997008`4.194232694549257"}
+    },
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
+  Function[BoxForm`e$, 
+   TableForm[
+   BoxForm`e$, 
+    TableHeadings -> {
+     None, {"Mol.", "G0W0@PBE0/cc-pVDZ", "G0W0@PBE0/cc-pVTZ", 
+       "G0W0@PBE0/cc-pVQZ", "G0W0@PBE0/cc-pV5Z", 
+       "G0W0@PBE0/CBS"}}]]]], "Output",
+ CellChangeTimes->{{3.780112051456059*^9, 3.780112084799567*^9}, 
+   3.780112163841497*^9, 3.780225163496029*^9},
+ CellLabel->
+  "Out[100]//TableForm=",ExpressionUUID->"aa7696c3-20c7-4ef5-bbb7-\
+d9cb9e42d567"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
 Cell[BoxData[
  RowBox[{"IP$G0W0PBE0$CBS", "=", 
   RowBox[{"Table", "[", "\[IndentingNewLine]", 
@@ -144179,391 +142162,72 @@ Cell[BoxData[
    3.779008697974452*^9, 3.779008720333139*^9}, {3.779009505908224*^9, 
    3.779009525612129*^9}, {3.77901554072021*^9, 3.779015541106265*^9}, {
    3.7790156690441008`*^9, 3.779015673384585*^9}},
- CellLabel->"In[67]:=",ExpressionUUID->"43547991-0ca8-46bb-8873-c03223377bca"],
+ CellLabel->
+  "In[101]:=",ExpressionUUID->"43547991-0ca8-46bb-8873-c03223377bca"],
 
 Cell[BoxData[
  RowBox[{"{", 
   RowBox[{
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"1", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"1", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"1", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"He\"\>", ",", "24.0641877347945580823`4.381371207037684"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"2", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"2", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"2", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"2", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"Ne\"\>", ",", "21.124804289116340783`4.324792694116379"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"3", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"3", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"3", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"3", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"H2\"\>", ",", "16.2297202912805786923`4.210311035106567"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"4", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"4", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"4", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"4", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"Li2\"\>", ",", "5.318201430086257453`3.7257647824724667"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"5", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"5", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"5", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"5", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"LiH\"\>", ",", "7.6191943913043065351`3.8819090540289536"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"6", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"6", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"6", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"6", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"FH\"\>", ",", "15.9376513992792965269`4.2024243233660625"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"7", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"7", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"7", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"7", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"Ar\"\>", ",", "15.5612406844399444594`4.1920442199625105"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"8", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"8", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"8", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"8", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"H2O\"\>", ",", "12.558394273056467938`4.098934113690068"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"9", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"9", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"9", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"9", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"LiF\"\>", ",", "11.0161181664407337166`4.042028585814401"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"10", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"10", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"10", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"10", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"HCl\"\>", ",", "12.6329513129106025815`4.1015048223827035"}],
+     "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"11", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"11", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"11", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"11", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BeO\"\>", ",", "9.8013458424621493492`3.9912857136337303"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"12", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"12", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"12", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"12", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"CO\"\>", ",", "14.2226462704705287621`4.152980408893074"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"13", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"13", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"13", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"13", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"N2\"\>", ",", "15.547343132065936544`4.191656183609257"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"14", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"14", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"14", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"14", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"CH4\"\>", ",", "14.3461008127406675072`4.156733878378907"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"15", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"15", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"15", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"15", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BH3\"\>", ",", "13.2926412260115487385`4.1236112831183735"}],
+     "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"16", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"16", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"16", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"16", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"NH3\"\>", ",", "10.8163507981663560287`4.034080763956045"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"17", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"17", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"17", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"17", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BF\"\>", ",", "10.9625863171069912738`4.039913025931286"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"18", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"18", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"18", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"18", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"BN\"\>", ",", "11.6525378454500483372`4.066420522121116"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"19", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"19", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"19", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"19", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}], ",", 
+    RowBox[{"\<\"SH2\"\>", ",", "10.3578331003350854189`4.015268908787737"}], 
+    "}"}], ",", 
    RowBox[{"{", 
-    RowBox[{
-     RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-      RowBox[{"20", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-     RowBox[{"0``3.", "+", 
-      RowBox[{"0.5773502691896258421`2.761439372640169", " ", 
-       RowBox[{"(", 
-        RowBox[{
-         RowBox[{
-          RowBox[{"-", "0.7220577785823703021`2.85857195091522"}], " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"20", ",", "3"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"0.9324605900361890853`2.969630485637294", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"20", ",", "4"}], "\[RightDoubleBracket]"}]}], "+", 
-         RowBox[{"1.5216479961150575217`3.182314198409834", " ", 
-          RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-           RowBox[{"20", ",", "5"}], "\[RightDoubleBracket]"}]}]}], 
-        ")"}]}]}]}], "}"}]}], "}"}]], "Output",
+    RowBox[{"\<\"F2\"\>", ",", "15.7115600043829353183`4.196219308379217"}], 
+    "}"}]}], "}"}]], "Output",
  CellChangeTimes->{
   3.779010698833243*^9, {3.779015541786603*^9, 3.779015549884285*^9}, 
    3.77901561985186*^9, {3.7790156704611588`*^9, 3.779015673923024*^9}, 
@@ -144571,8 +142235,11 @@ Cell[BoxData[
    3.779120572176271*^9, 3.779121072926343*^9, 3.779121293106276*^9, 
    3.779193844213366*^9, 3.779193990155279*^9, 3.779609947585825*^9, 
    3.779613107368078*^9, 3.779786458617422*^9, 3.779982069487294*^9, 
-   3.7800533158467903`*^9, 3.780059382759822*^9},
- CellLabel->"Out[67]=",ExpressionUUID->"d0a5c2ba-7f9d-4aa9-9bde-8cce4065fd74"]
+   3.7800533158467903`*^9, 3.780059382759822*^9, 3.780073058583355*^9, {
+   3.7801120389602413`*^9, 3.780112087285317*^9}, 3.780112163930298*^9, 
+   3.7802251635507727`*^9},
+ CellLabel->
+  "Out[101]=",ExpressionUUID->"62cce13f-c7c7-4ab7-876d-e0134fa2f279"]
 }, Open  ]]
 }, Closed]],
 
@@ -144675,20 +142342,144 @@ Cell[BoxData[{
   3.779008733389523*^9, 3.779008744648859*^9}, {3.779095643369925*^9, 
   3.779095657409272*^9}, {3.779121289352046*^9, 3.779121301042254*^9}, {
   3.779613103215661*^9, 3.7796131101333523`*^9}},
- CellLabel->"In[68]:=",ExpressionUUID->"ef1ef8d5-ac32-4eb0-b444-39483560e1d1"],
+ CellLabel->
+  "In[102]:=",ExpressionUUID->"ef1ef8d5-ac32-4eb0-b444-39483560e1d1"],
 
 Cell[BoxData[
- RowBox[{"Hold", "[", 
-  TagBox[
-   RowBox[{"SetAccuracy", "[", 
-    RowBox[{"IP$G0W0PBE0", ",", "3"}], "]"}],
-   Function[BoxForm`e$, 
-    TableForm[
-    BoxForm`e$, 
-     TableHeadings -> {
-      None, {"Mol.", "G0W0@PBE0/cc-pVDZ", "G0W0@PBE0/cc-pVTZ", 
-        "G0W0@PBE0/cc-pVQZ", "G0W0@PBE0/cc-pV5Z", "G0W0@PBE0/CBS"}}]]], 
-  "]"}]], "Output",
+ TagBox[
+  TagBox[GridBox[{
+     {
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/cc-pV5Z\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/CBS\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", "23.9872860000000009961`4.379981113249158", 
+      "23.9771549999999997738`4.3797976507769665", 
+      "24.0341869999999993013`4.380829435913989", 
+      "24.0412730000000003372`4.380957460096016", 
+      "24.0641877347945580823`4.381371207037684"},
+     {"\<\"Ne\"\>", "20.3523069999999997037`4.308613645039485", 
+      "20.8788669999999996207`4.319706927807306", 
+      "21.0511930000000013763`4.32327671293347", 
+      "21.0532099999999999795`4.323318322452107", 
+      "21.124804289116340783`4.32479269411638"},
+     {"\<\"H2\"\>", "15.9793040000000008405`4.203557859111754", 
+      "16.1338620000000005916`4.207738337911593", 
+      "16.1928079999999994243`4.20932216642862", 
+      "16.2068529999999988434`4.2096986929842775", 
+      "16.2297202912805786923`4.210311035106568"},
+     {"\<\"Li2\"\>", "5.1517049999999997567`3.711950986234472", 
+      "5.2417139999999999844`3.7194733211488673", 
+      "5.2804570000000001784`3.722671510410616", 
+      "5.3050360000000003069`3.724688335371818", 
+      "5.318201430086257453`3.725764782472467"},
+     {"\<\"LiH\"\>", "7.319753000000000398`3.864496426338871", 
+      "7.487382000000000204`3.874329991036409", 
+      "7.5578139999999995879`3.8783961995990404", 
+      "7.5942600000000002325`3.880485461730872", 
+      "7.6191943913043065351`3.881909054028954"},
+     {"\<\"FH\"\>", "14.946828000000000003`4.174549036923943", 
+      "15.6054340000000006938`4.193275851257306", 
+      "15.8213279999999993919`4.199242934210088", 
+      "15.8512889999999995183`4.200064584082183", 
+      "15.9376513992792965269`4.2024243233660625"},
+     {"\<\"Ar\"\>", "14.9279240000000008592`4.173999415358438", 
+      "15.2464560000000002304`4.183168904763817", 
+      "15.4199800000000006861`4.188083810427307", 
+      "15.49843199999999932`4.190287762157773", 
+      "15.5612406844399444594`4.192044219962511"},
+     {"\<\"H2O\"\>", "11.531121999999999872`4.061871567025954", 
+      "12.2126479999999997261`4.086809839792856", 
+      "12.4328050000000001063`4.094569122092256", 
+      "12.4712902000000003255`4.095911385134969", 
+      "12.558394273056467938`4.098934113690067"},
+     {"\<\"LiF\"\>", "9.8940289999999997406`3.9953731789735354", 
+      "10.5953189999999999316`4.025114036823515", 
+      "10.8216090000000004778`4.034291838207715", 
+      "10.935633599999999177`4.03884395070352", 
+      "11.0161181664407337166`4.042028585814401"},
+     {"\<\"HCl\"\>", "11.9559580000000007516`4.07758438073992", 
+      "12.3355139999999998679`4.091157250519138", 
+      "12.5034080000000002997`4.097028402917424", 
+      "12.5711940000000002016`4.099376528520089", 
+      "12.6329513129106025815`4.1015048223827035"},
+     {"\<\"BeO\"\>", "9.1597869999999996793`3.9618853747813683", 
+      "9.4418620000000004211`3.975057648597198", 
+      "9.6307530000000003412`3.9836602446489406", 
+      "9.7353009999999997603`3.988349383757249", 
+      "9.8013458424621493492`3.991285713633729"},
+     {"\<\"CO\"\>", "13.6695390000000003283`4.135753868398684", 
+      "14.017856000000000094`4.146681594331603", 
+      "14.1347810000000002617`4.150289084050983", 
+      "14.1793119999999994718`4.151655158784115", 
+      "14.2226462704705287621`4.152980408893074"},
+     {"\<\"N2\"\>", "14.8396670000000003853`4.171424155546439", 
+      "15.2988680000000005776`4.184659297514253", 
+      "15.4396039999999992176`4.188636157216018", 
+      "15.4954579999999992879`4.190204417227973", 
+      "15.547343132065936544`4.191656183609256"},
+     {"\<\"CH4\"\>", "13.8495290000000004227`4.141435004001248", 
+      "14.153966999999999743`4.1508781787120395", 
+      "14.2658199999999997232`4.154296739977675", 
+      "14.3041245999999997451`4.155461284509502", 
+      "14.3461008127406675072`4.1567338783789065"},
+     {"\<\"BH3\"\>", "12.8676230000000000331`4.109498328308721", 
+      "13.1308860000000002799`4.118294030882251", 
+      "13.2243180000000002394`4.121373283998414", 
+      "13.2577528000000004482`4.122469917035049", 
+      "13.2926412260115487385`4.123611283118373"},
+     {"\<\"NH3\"\>", "9.9628219999999991785`3.998382371098099", 
+      "10.556383000000000294`4.023515138631103", 
+      "10.7276109999999995637`4.030503016930004", 
+      "10.7473694000000001836`4.031302176356716", 
+      "10.8163507981663560287`4.034080763956045"},
+     {"\<\"BF\"\>", "10.6605000000000007532`4.027777574498109", 
+      "10.8653689999999993887`4.0360444800299975", 
+      "10.9188089999999995428`4.038175269052154", 
+      "10.9432810000000007022`4.039147551116693", 
+      "10.9625863171069912738`4.039913025931286"},
+     {"\<\"BN\"\>", "11.0696709999999995944`4.0441347134706085", 
+      "11.3955619999999999692`4.056735748338702", 
+      "11.5368709999999996541`4.062088036575616", 
+      "11.6014769999999991512`4.064513283374842", 
+      "11.6525378454500483372`4.066420522121116"},
+     {"\<\"SH2\"\>", "9.6856539999999995416`3.9861289507135482", 
+      "10.0977470000000000283`4.004224485206725", 
+      "10.2457390000000003738`4.010543288461705", 
+      "10.3031070000000006814`4.012968210091552", 
+      "10.3578331003350854189`4.015268908787737"},
+     {"\<\"F2\"\>", "14.9234899999999992559`4.173870398907362", 
+      "15.3789250000000006224`4.186925978970949", 
+      "15.5709959999999991709`4.192316393137768", 
+      "15.6398539999999997008`4.194232694549257", 
+      "15.7115600043829353183`4.196219308379217"}
+    },
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
+  Function[BoxForm`e$, 
+   TableForm[
+   BoxForm`e$, 
+    TableHeadings -> {
+     None, {"Mol.", "G0W0@PBE0/cc-pVDZ", "G0W0@PBE0/cc-pVTZ", 
+       "G0W0@PBE0/cc-pVQZ", "G0W0@PBE0/cc-pV5Z", 
+       "G0W0@PBE0/CBS"}}]]]], "Output",
  CellChangeTimes->{
   3.776141375618598*^9, 3.778425025073845*^9, 3.778425076763853*^9, 
    3.778425399048726*^9, {3.778940809710058*^9, 3.77894084333232*^9}, {
@@ -144710,69 +142501,36 @@ Cell[BoxData[
    3.779121098126433*^9}, {3.779121290303893*^9, 3.779121301318542*^9}, 
    3.7791938451322327`*^9, 3.7791939917591343`*^9, 3.779609948461097*^9, {
    3.7796131043795147`*^9, 3.7796131112613564`*^9}, 3.779786459509493*^9, 
-   3.77998207045485*^9, 3.78005331684343*^9, 3.780059383800028*^9},
- CellLabel->"Out[69]=",ExpressionUUID->"9cb9d834-c9db-4a18-8089-4c5220f869ef"],
+   3.77998207045485*^9, 3.78005331684343*^9, 3.780059383800028*^9, 
+   3.780073059601901*^9, 3.780112039812502*^9, 3.780112078074718*^9, 
+   3.7801121639396067`*^9, 3.780225163562336*^9},
+ CellLabel->
+  "Out[103]//TableForm=",ExpressionUUID->"31c700af-1286-49b5-b3fc-\
+84cda94961dc"],
 
 Cell[BoxData[
- TagBox[
-  RowBox[{"Transpose", "[", 
-   RowBox[{"{", 
-    RowBox[{
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}], ",", 
-     RowBox[{"Hold", "[", 
-      RowBox[{"StatIP", "[", 
-       RowBox[{
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "k"}], "\[RightDoubleBracket]"}], 
-        ",", 
-        RowBox[{"IP$G0W0PBE0", "\[LeftDoubleBracket]", 
-         RowBox[{
-          RowBox[{"1", ";;", "All"}], ",", "6"}], "\[RightDoubleBracket]"}]}],
-        "]"}], "]"}]}], "}"}], "]"}],
+ TagBox[GridBox[{
+    {"0.6019455660950665532`2.7795572198069833", 
+     "0.2360816660950665891`2.373062261441668", 
+     "0.0981259160950667536`1.9917837243079608", 
+     "0.0518950860950668363`1.715126236791981", "0``3."},
+    {"0.6639355848307211261`2.8221259460704236", 
+     "0.2561603284473217279`2.4085118714255054", 
+     "0.1076530098303009747`2.032026176606491", 
+     "0.0565849475263170767`1.752700917483651", "0``3."},
+    {"1.1220891664407339761`3.0500273693573323", 
+     "0.4207991664407337851`2.6240748708544563", 
+     "0.1945091664407332388`2.2889400727096696", 
+     "0.0871040730564676124`1.9400384634415324", "0``3."}
+   },
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+   GridBoxSpacings->{"Columns" -> {
+       Offset[0.27999999999999997`], {
+        Offset[2.0999999999999996`]}, 
+       Offset[0.27999999999999997`]}, "Rows" -> {
+       Offset[0.2], {
+        Offset[0.4]}, 
+       Offset[0.2]}}],
   Function[BoxForm`e$, 
    TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{
@@ -144796,10 +142554,12 @@ Cell[BoxData[
    3.779121098126433*^9}, {3.779121290303893*^9, 3.779121301318542*^9}, 
    3.7791938451322327`*^9, 3.7791939917591343`*^9, 3.779609948461097*^9, {
    3.7796131043795147`*^9, 3.7796131112613564`*^9}, 3.779786459509493*^9, 
-   3.77998207045485*^9, 3.78005331684343*^9, 3.780059385871749*^9},
+   3.77998207045485*^9, 3.78005331684343*^9, 3.780059383800028*^9, 
+   3.780073059601901*^9, 3.780112039812502*^9, 3.780112078074718*^9, 
+   3.7801121639396067`*^9, 3.780225163562956*^9},
  CellLabel->
-  "Out[70]//TableForm=",ExpressionUUID->"045e32d3-4ff8-4fea-bcd7-\
-d666a4338ff3"]
+  "Out[104]//TableForm=",ExpressionUUID->"e225c626-0635-49b9-b46d-\
+bc5568e25e15"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -144886,1082 +142646,137 @@ Cell[BoxData[{
    3.778994604131648*^9}, 3.778998294498117*^9, {3.7790055593412857`*^9, 
    3.779005559749799*^9}, {3.7790089266148577`*^9, 3.779008942948667*^9}, {
    3.779095665617442*^9, 3.779095670977413*^9}},
- CellLabel->"In[71]:=",ExpressionUUID->"7d732451-8167-4c5a-9357-1bd6ca4bb5d4"],
+ CellLabel->
+  "In[105]:=",ExpressionUUID->"7d732451-8167-4c5a-9357-1bd6ca4bb5d4"],
 
 Cell[BoxData[
  TagBox[
   TagBox[GridBox[{
      {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "3"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], "]"}]}
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srLDA/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srLDA/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srLDA/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srLDA/cc-pV5Z\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/CBS\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", "24.2585895107474698307`4.384865545685239", 
+      "24.0946216449534489357`4.381920111014939", 
+      "24.0872739857683271225`4.381787652637286", 
+      "24.0684013076329712533`4.381447244145759", 
+      "24.0641877347945580823`4.381371207037684"},
+     {"\<\"Ne\"\>", "20.8611131851956344008`4.319337479415953", 
+      "21.1555831270035596958`4.325425000612698", 
+      "21.2163391292582446113`4.326670448692458", 
+      "21.1555404130378974514`4.325424123753942", 
+      "21.124804289116340783`4.32479269411638"},
+     {"\<\"H2\"\>", "16.1550071886836050794`4.208307155606831", 
+      "16.1991827292226808765`4.20949310434867", 
+      "16.220716371127657851`4.210070030464384", 
+      "16.2203541985983470397`4.210060333526014", 
+      "16.2297202912805786923`4.210311035106568"},
+     {"\<\"Li2\"\>", "5.2305539002930689918`3.7185476818124514", 
+      "5.2773867068136919301`3.722418918789968", 
+      "5.3005959127278341469`3.7243246973481723", 
+      "5.3183277406752909044`3.725775097113821", 
+      "5.318201430086257453`3.725764782472467"},
+     {"\<\"LiH\"\>", "7.4799245803383342945`3.8738972189195393", 
+      "7.5521742723943461328`3.878072003094297", 
+      "7.5885927552152692144`3.880161246869331", 
+      "7.6118161181096697376`3.8814882883045683", 
+      "7.6191943913043065351`3.881909054028954"},
+     {"\<\"FH\"\>", "15.4122132015166677377`4.187865008101267", 
+      "15.8546417080661186105`4.2001564320478755", 
+      "15.9663109653567936164`4.203204583485914", 
+      "15.9387587834604982362`4.202454498083773", 
+      "15.9376513992792965269`4.2024243233660625"},
+     {"\<\"Ar\"\>", "15.3737111682030356263`4.186778717553208", 
+      "15.5034049344106374946`4.190427090546378", 
+      "15.5788057194468887445`4.192534161338195", 
+      "15.5973530487695963842`4.193050902594813", 
+      "15.5612406844399444594`4.192044219962511"},
+     {"\<\"H2O\"\>", "11.9462136264896390259`4.077230276690653", 
+      "12.4281188299393310359`4.094405397056401", 
+      "12.5540752502417518599`4.0987847275221805", 
+      "12.5422783901546548435`4.0983764362070065", 
+      "12.558394273056467938`4.098934113690067"},
+     {"\<\"LiF\"\>", "10.346362992123740554`4.0147877111415795", 
+      "10.8409650289433834303`4.035067943465343", 
+      "10.9642807093134102558`4.039980145888369", 
+      "11.0220170729003683618`4.042261079404085", 
+      "11.0161181664407337166`4.042028585814401"},
+     {"\<\"HCl\"\>", "12.352665282747837594`4.091760673604167", 
+      "12.5567180813168040032`4.098876143746398", 
+      "12.6364873116847693524`4.101626365626183", 
+      "12.6507151171481879715`4.102115075919208", 
+      "12.6329513129106025815`4.1015048223827035"},
+     {"\<\"BeO\"\>", "9.528839954472701379`3.9790400326386908", 
+      "9.6392738294697295487`3.984044317747943", 
+      "9.7412360266739934644`3.9886140662735214", 
+      "9.8008436336965782942`3.9912634603547312", 
+      "9.8013458424621493492`3.991285713633729"},
+     {"\<\"CO\"\>", "13.997307472967444042`4.146044502671549", 
+      "14.1833965913454580487`4.151780246660592", 
+      "14.224129738311964033`4.153025704844925", 
+      "14.2310463211265059158`4.153236832254776", 
+      "14.2226462704705287621`4.152980408893074"},
+     {"\<\"N2\"\>", "15.2203989489189375206`4.182426036077348", 
+      "15.4955477512189965239`4.190206932697103", 
+      "15.5478450167491448752`4.191670202868278", 
+      "15.558697919041769353`4.191973248808118", 
+      "15.547343132065936544`4.191656183609256"},
+     {"\<\"CH4\"\>", "14.1131612084617330538`4.149624302317219", 
+      "14.272016737871942027`4.154485346362287", 
+      "14.3222469570973167663`4.156011157952049", 
+      "14.3340941366951089009`4.156370252297117", 
+      "14.3461008127406675072`4.1567338783789065"},
+     {"\<\"BH3\"\>", "13.0928351316745015254`4.117033699165022", 
+      "13.2266868424518904135`4.121451071229125", 
+      "13.2679949754915753601`4.122805298382816", 
+      "13.2805411340560279854`4.123215771323151", 
+      "13.2926412260115487385`4.123611283118373"},
+     {"\<\"NH3\"\>", "10.3084332399611078301`4.013192662669957", 
+      "10.7247456166085814999`4.030386999820548", 
+      "10.815998896635750981`4.034066634294211", 
+      "10.7975286212077339343`4.033324363913434", 
+      "10.8163507981663560287`4.034080763956045"},
+     {"\<\"BF\"\>", "10.8759226024582442705`4.036466108308171", 
+      "10.9641568612144251205`4.039975240245108", 
+      "10.9684778793452828438`4.040146363721783", 
+      "10.9711343025545691177`4.040251531482951", 
+      "10.9625863171069912738`4.039913025931286"},
+     {"\<\"BN\"\>", "11.3962070972436197991`4.056760332843052", 
+      "11.5627809136086323605`4.063062296903686", 
+      "11.6275361304724000888`4.0654876976774625", 
+      "11.6533771975559030665`4.066451803964153", 
+      "11.6525378454500483372`4.066420522121116"},
+     {"\<\"SH2\"\>", "10.027702817838525462`4.001201454675358", 
+      "10.2799276285073979409`4.011990057202981", 
+      "10.3515850720436493049`4.015006855622411", 
+      "10.3635864678156437435`4.015510075258515", 
+      "10.3578331003350854189`4.015268908787737"},
+     {"\<\"F2\"\>", "15.4136698901100501757`4.187906053596479", 
+      "15.645871160402425204`4.194399749624907", 
+      "15.7286230306372871723`4.196690703782108", 
+      "15.736007052683277152`4.196894541556727", 
+      "15.7115600043829353183`4.196219308379217"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
-         Offset[0.5599999999999999]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
-   Column],
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
    BoxForm`e$, 
@@ -145982,217 +142797,38 @@ Cell[BoxData[
    3.779114991510816*^9, 3.77912057892028*^9, 3.77912107805052*^9, 
    3.7791213065592327`*^9, 3.779193849176399*^9, 3.779193995964774*^9, 
    3.779609951964273*^9, 3.779613114498851*^9, 3.779786463442172*^9, 
-   3.779982074581773*^9, 3.780053320411861*^9, 3.78005938796982*^9},
+   3.779982074581773*^9, 3.780053320411861*^9, 3.78005938796982*^9, 
+   3.780073063703806*^9, 3.780112043448247*^9, 3.7801121640352592`*^9, 
+   3.780225163620043*^9},
  CellLabel->
-  "Out[72]//TableForm=",ExpressionUUID->"445ddaf1-f27f-47b6-b250-\
-20469a083964"],
+  "Out[106]//TableForm=",ExpressionUUID->"0f456bdb-3221-478a-b088-\
+6e3a60a362c2"],
 
 Cell[BoxData[
- InterpretationBox[
-  TagBox[
-   FrameBox[GridBox[{
-      {
-       ItemBox[
-        TagBox[
-         TagBox[
-          TemplateBox[{"1"},
-           "OutputSizeLimit`Skeleton"],
-          Function[BoxForm`e$, 
-           TableForm[BoxForm`e$]]],
-         Short[#, 5]& ],
-        BaseStyle->{Deployed -> False},
-        StripOnInput->False]},
-      {GridBox[{
-         {
-          TagBox[
-           TooltipBox[
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource[
-                "FEStrings", "sizeBriefExplanation"], StandardForm],
-               ImageSizeCache->{58., {2., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLText",
-             StripOnInput->False],
-            StyleBox[
-             DynamicBox[
-              ToBoxes[
-               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
-               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
-             False]],
-           Annotation[#, 
-            Style[
-             Dynamic[
-              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
-             DynamicUpdating -> True], "Tooltip"]& ], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm],
-               ImageSizeCache->{50., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 73, 21259940437824449933,
-              5/2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm],
-               ImageSizeCache->{56., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 73, 21259940437824449933,
-              5 2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm],
-               ImageSizeCache->{42., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 73, 21259940437824449933,
-              Infinity],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm],
-               ImageSizeCache->{74., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>FrontEndExecute[{
-              FrontEnd`SetOptions[
-              FrontEnd`$FrontEnd, 
-               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
-              FrontEnd`FrontEndToken["PreferencesDialog"]}],
-           Evaluator->None,
-           Method->"Preemptive"]}
-        },
-        AutoDelete->False,
-        FrameStyle->GrayLevel[0.85],
-        GridBoxDividers->{"Columns" -> {False, {True}}},
-        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
-        GridBoxSpacings->{"Columns" -> {{2}}}]}
-     },
-     DefaultBaseStyle->"Column",
-     GridBoxAlignment->{
-      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-       "RowsIndexed" -> {}},
-     GridBoxDividers->{
-      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
-       "RowsIndexed" -> {}},
-     GridBoxItemSize->{
-      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
-       "RowsIndexed" -> {}},
-     GridBoxSpacings->{"Columns" -> {
-         Offset[0.27999999999999997`], {
-          Offset[0.5599999999999999]}, 
-         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
-         Offset[0.2], 
-         Offset[1.2], {
-          Offset[0.4]}, 
-         Offset[0.2]}, "RowsIndexed" -> {}}],
-    BaseStyle->"OutputSizeLimit",
-    FrameMargins->{{12, 12}, {0, 15}},
-    FrameStyle->GrayLevel[0.85],
-    RoundingRadius->5,
-    StripOnInput->False],
-   Deploy,
-   DefaultBaseStyle->"Deploy"],
-  If[21259940437824449933 === $SessionID, 
-   Out[73], Message[
-     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
-   Null]]], "Output",
+ TagBox[GridBox[{
+    {"0.2885689936680629897`2.4602496649339023", 
+     "0.0720887455222470191`1.857867468060584", 
+     "0.0221450376142579217`1.3452764222884581", 
+     "0.0115796230013586847`1.0636944202640566", "0``3."},
+    {"0.3322776677088560282`2.521501153446237", 
+     "0.0836135987771547268`1.922276916118348", 
+     "0.0315194056984105242`1.4985780202282364", 
+     "0.0151148367779168312`1.1794034616803735", "0``3."},
+    {"0.6697551743169931626`2.8259160775152408", 
+     "0.1751531374973502864`2.2434179211888647", 
+     "0.0915348401419038282`1.9615864274155372", 
+     "0.0361123643296519248`1.557655923256706", "0``3."}
+   },
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+   GridBoxSpacings->{"Columns" -> {
+       Offset[0.27999999999999997`], {
+        Offset[2.0999999999999996`]}, 
+       Offset[0.27999999999999997`]}, "Rows" -> {
+       Offset[0.2], {
+        Offset[0.4]}, 
+       Offset[0.2]}}],
+  Function[BoxForm`e$, 
+   TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{
   3.778948232908155*^9, 3.778949244657428*^9, 3.778949515403491*^9, 
    3.778989282447901*^9, 3.778989371392345*^9, 3.778994611208705*^9, 
@@ -146206,10 +142842,12 @@ Cell[BoxData[
    3.779114991510816*^9, 3.77912057892028*^9, 3.77912107805052*^9, 
    3.7791213065592327`*^9, 3.779193849176399*^9, 3.779193995964774*^9, 
    3.779609951964273*^9, 3.779613114498851*^9, 3.779786463442172*^9, 
-   3.779982074581773*^9, 3.780053320411861*^9, 3.780059388165361*^9},
+   3.779982074581773*^9, 3.780053320411861*^9, 3.78005938796982*^9, 
+   3.780073063703806*^9, 3.780112043448247*^9, 3.7801121640352592`*^9, 
+   3.780225163620655*^9},
  CellLabel->
-  "Out[73]//TableForm=",ExpressionUUID->"c2e51319-86c8-4152-bbd0-\
-a0d2fbcab96b"]
+  "Out[107]//TableForm=",ExpressionUUID->"cde37d03-185c-4915-928f-\
+78b487b78b99"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -146295,1082 +142933,137 @@ Cell[BoxData[{
   3.7789894382944202`*^9, 3.778989457429191*^9}, {3.778994616862583*^9, 
   3.778994644847723*^9}, {3.7790055682021427`*^9, 3.77900557296611*^9}, {
   3.779095676793386*^9, 3.7790957018647118`*^9}},
- CellLabel->"In[74]:=",ExpressionUUID->"daa984c2-5086-443a-bf30-942881dce2c8"],
+ CellLabel->
+  "In[108]:=",ExpressionUUID->"daa984c2-5086-443a-bf30-942881dce2c8"],
 
 Cell[BoxData[
  TagBox[
   TagBox[GridBox[{
      {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], 
-       "]"}]},
-     {
-      RowBox[{"Hold", "[", 
-       RowBox[{"{", 
-        RowBox[{
-         RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVDZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVTZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpVQZ", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{
-          RowBox[{
-           RowBox[{"-", "1.`3."}], " ", 
-           RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-            RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "-", 
-          RowBox[{"1.`3.", " ", 
-           RowBox[{"(", 
-            RowBox[{
-             RowBox[{"GW20$G0W0PBE0$ccpV5Z", "\[LeftDoubleBracket]", 
-              RowBox[{"k", ",", "4"}], "\[RightDoubleBracket]"}], " ", 
-             "HaToeV"}], ")"}]}]}], ",", 
-         RowBox[{"IP$G0W0PBE0$CBS", "\[LeftDoubleBracket]", 
-          RowBox[{"k", ",", "2"}], "\[RightDoubleBracket]"}]}], "}"}], "]"}]}
+      TagBox["\<\"Mol.\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srPBE/cc-pVDZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srPBE/cc-pVTZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srPBE/cc-pVQZ\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0+srPBE/cc-pV5Z\"\>",
+       HoldForm], 
+      TagBox["\<\"G0W0@PBE0/CBS\"\>",
+       HoldForm]},
+     {"\<\"He\"\>", "24.2907792820734016459`4.38544144780124", 
+      "24.0956975749160875466`4.381939503725066", 
+      "24.082833242585930833`4.38170757848441", 
+      "24.0658973970715734936`4.38140206079126", 
+      "24.0641877347945580823`4.381371207037684"},
+     {"\<\"Ne\"\>", "21.047097891535315739`4.323192220999145", 
+      "21.2153005884912140289`4.326649189437457", 
+      "21.2285204206857756049`4.326919725888838", 
+      "21.1546432800065176139`4.3254057064420275", 
+      "21.124804289116340783`4.32479269411638"},
+     {"\<\"H2\"\>", "16.1562946428102485186`4.208341764811134", 
+      "16.1912754228404374146`4.209281060444837", 
+      "16.2170366977196600544`4.209971499480456", 
+      "16.2188870128279951643`4.210021048347901", 
+      "16.2297202912805786923`4.210311035106568"},
+     {"\<\"Li2\"\>", "5.2054656637361613747`3.7164595861318808", 
+      "5.2694146457159414254`3.721762374177474", 
+      "5.2983774086389558988`3.7241428902865374", 
+      "5.3177732440633427302`3.7257298145766646", 
+      "5.318201430086257453`3.725764782472467"},
+     {"\<\"LiH\"\>", "7.4531552868973829362`3.8723401698737607", 
+      "7.5395005518022948365`3.8773425773312415", 
+      "7.5841134372542411413`3.8799048202167614", 
+      "7.6101017322381272479`3.8813904624807356", 
+      "7.6191943913043065351`3.881909054028954"},
+     {"\<\"FH\"\>", "15.5583147531397543162`4.191962553254617", 
+      "15.8919366139476121447`4.201176824174184", 
+      "15.9693257231702627763`4.203286579201191", 
+      "15.93472348772958469`4.202344531644384", 
+      "15.9376513992792965269`4.2024243233660625"},
+     {"\<\"Ar\"\>", "15.4406627314841333742`4.188665936831949", 
+      "15.5172806363042212752`4.190815614594507", 
+      "15.575963106928753632`4.192454909847605", 
+      "15.5875264146902612339`4.192777202444546", 
+      "15.5612406844399444594`4.192044219962511"},
+     {"\<\"H2O\"\>", "12.0524100476187783215`4.081073898838423", 
+      "12.4461205763039082228`4.0950340040540265", 
+      "12.5504956250091925796`4.098660876650238", 
+      "12.5366507152434643046`4.098181526114105", 
+      "12.558394273056467938`4.098934113690067"},
+     {"\<\"LiF\"\>", "10.4755765124371773567`4.02017793324029", 
+      "10.8705803339719064837`4.036252729837351", 
+      "10.9645400239339529946`4.039990417203015", 
+      "11.0169867368067144753`4.042062826591535", 
+      "11.0161181664407337166`4.042028585814401"},
+     {"\<\"HCl\"\>", "12.3928635880367306044`4.093171669313051", 
+      "12.5576406831397751063`4.098908052256159", 
+      "12.6278940288351044785`4.101330928709152", 
+      "12.6403638915904448226`4.101759576623182", 
+      "12.6329513129106025815`4.1015048223827035"},
+     {"\<\"BeO\"\>", "9.6130011620955286844`3.982858994813027", 
+      "9.6488687881849060091`3.9844764006136097", 
+      "9.7357317627074824173`3.9883685997761607", 
+      "9.7949502847356839652`3.9910022360306274", 
+      "9.8013458424621493492`3.991285713633729"},
+     {"\<\"CO\"\>", "14.0516489995184326034`4.147727292879441", 
+      "14.1843152244788992533`4.15180837422361", 
+      "14.2168416672814093005`4.1528031267159", 
+      "14.2253938953972287607`4.153064300671963", 
+      "14.2226462704705287621`4.152980408893074"},
+     {"\<\"N2\"\>", "15.3118177077486645743`4.185026750044178", 
+      "15.5069194442945548218`4.190525530810148", 
+      "15.5420944100749967021`4.191509542743447", 
+      "15.5528599738213983983`4.191810261957164", 
+      "15.547343132065936544`4.191656183609256"},
+     {"\<\"CH4\"\>", "14.146832665360310699`4.1506592165435965", 
+      "14.2659965924817040417`4.154302115950852", 
+      "14.3158205223697621022`4.155816244996464", 
+      "14.3306061503112776023`4.156264560402086", 
+      "14.3461008127406675072`4.1567338783789065"},
+     {"\<\"BH3\"\>", "13.1036864220473976417`4.117393491650475", 
+      "13.2171578842314545454`4.121138077850491", 
+      "13.2619754364457076434`4.122608219185554", 
+      "13.277631589688931868`4.12312061424426", 
+      "13.2926412260115487385`4.123611283118373"},
+     {"\<\"NH3\"\>", "10.3700894428745744591`4.01578250223083", 
+      "10.7246819741988304031`4.0303844226378", 
+      "10.8083650306563452403`4.0337600036789185", 
+      "10.7920158598338105094`4.033102574898952", 
+      "10.8163507981663560287`4.034080763956045"},
+     {"\<\"BF\"\>", "10.8774824364643691865`4.036528390723407", 
+      "10.9541424632086918933`4.03957838481105", 
+      "10.9614916538756759223`4.0398696575212725", 
+      "10.967188739893742877`4.040095317527421", 
+      "10.9625863171069912738`4.039913025931286"},
+     {"\<\"BN\"\>", "11.4477913058350733166`4.058721703600221", 
+      "11.5591700721851609046`4.062926653633881", 
+      "11.617970445689056902`4.065130267363959", 
+      "11.6468755837325073088`4.066209436200443", 
+      "11.6525378454500483372`4.066420522121116"},
+     {"\<\"SH2\"\>", "10.0426227421774907356`4.0018471484370295", 
+      "10.2707086038015784624`4.011600407774945", 
+      "10.3397530239403128149`4.014510165293621", 
+      "10.3542492504130674291`4.015118615231129", 
+      "10.3578331003350854189`4.015268908787737"},
+     {"\<\"F2\"\>", "15.5714299232289441477`4.192328495628715", 
+      "15.6921520190644656623`4.1956825067428065", 
+      "15.7346073969848276874`4.196855911059202", 
+      "15.7325664729181600165`4.1967995753955645", 
+      "15.7115600043829353183`4.196219308379217"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+    GridBoxDividers->{
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
-         Offset[0.5599999999999999]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[2.0999999999999996`]}, 
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
-   Column],
+        Offset[0.2]}}],
+   {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
    BoxForm`e$, 
@@ -147390,217 +143083,37 @@ Cell[BoxData[
    3.7791071223554153`*^9, 3.779114993816931*^9, 3.779120581336911*^9, 
    3.779121307874617*^9, 3.779193998212906*^9, 3.7796099540952663`*^9, 
    3.7796131164381847`*^9, 3.7797864654725103`*^9, 3.7799820771251698`*^9, 
-   3.7800533223301277`*^9, 3.780059390321542*^9},
+   3.7800533223301277`*^9, 3.780059390321542*^9, 3.780073066154483*^9, 
+   3.780112045691183*^9, 3.7801121640495787`*^9, 3.780225163632963*^9},
  CellLabel->
-  "Out[75]//TableForm=",ExpressionUUID->"d316f2c0-fdab-4f2b-9d25-\
-8d8b5f0fc357"],
+  "Out[109]//TableForm=",ExpressionUUID->"d0e3a4a0-2639-47d0-91cd-\
+10185a670598"],
 
 Cell[BoxData[
- InterpretationBox[
-  TagBox[
-   FrameBox[GridBox[{
-      {
-       ItemBox[
-        TagBox[
-         TagBox[
-          TemplateBox[{"1"},
-           "OutputSizeLimit`Skeleton"],
-          Function[BoxForm`e$, 
-           TableForm[BoxForm`e$]]],
-         Short[#, 5]& ],
-        BaseStyle->{Deployed -> False},
-        StripOnInput->False]},
-      {GridBox[{
-         {
-          TagBox[
-           TooltipBox[
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource[
-                "FEStrings", "sizeBriefExplanation"], StandardForm],
-               ImageSizeCache->{58., {2., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLText",
-             StripOnInput->False],
-            StyleBox[
-             DynamicBox[
-              ToBoxes[
-               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
-               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
-             False]],
-           Annotation[#, 
-            Style[
-             Dynamic[
-              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
-             DynamicUpdating -> True], "Tooltip"]& ], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm],
-               ImageSizeCache->{50., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 76, 21259940437824449933,
-              5/2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm],
-               ImageSizeCache->{56., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 76, 21259940437824449933,
-              5 2],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm],
-               ImageSizeCache->{42., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>OutputSizeLimit`ButtonFunction[
-             Composition[OutputSizeLimit`Defer, 
-              Function[{OutputSizeLimit`Dump`x$}, 
-               TableForm[OutputSizeLimit`Dump`x$]]], 76, 21259940437824449933,
-              Infinity],
-           Enabled->True,
-           Evaluator->Automatic,
-           Method->"Queued"], 
-          ButtonBox[
-           PaneSelectorBox[{False->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm],
-               ImageSizeCache->{74., {0., 8.}}],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControl",
-             StripOnInput->False], True->
-            StyleBox[
-             StyleBox[
-              DynamicBox[ToBoxes[
-                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
-                StandardForm]],
-              StripOnInput->False,
-              DynamicUpdating->True], "OSLControlActive",
-             StripOnInput->False]}, Dynamic[
-             CurrentValue["MouseOver"]],
-            Alignment->Center,
-            FrameMargins->0,
-            ImageSize->{Automatic, 25}],
-           Appearance->None,
-           BaselinePosition->Baseline,
-           ButtonFunction:>FrontEndExecute[{
-              FrontEnd`SetOptions[
-              FrontEnd`$FrontEnd, 
-               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
-              FrontEnd`FrontEndToken["PreferencesDialog"]}],
-           Evaluator->None,
-           Method->"Preemptive"]}
-        },
-        AutoDelete->False,
-        FrameStyle->GrayLevel[0.85],
-        GridBoxDividers->{"Columns" -> {False, {True}}},
-        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
-        GridBoxSpacings->{"Columns" -> {{2}}}]}
-     },
-     DefaultBaseStyle->"Column",
-     GridBoxAlignment->{
-      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-       "RowsIndexed" -> {}},
-     GridBoxDividers->{
-      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
-       "RowsIndexed" -> {}},
-     GridBoxItemSize->{
-      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
-       "RowsIndexed" -> {}},
-     GridBoxSpacings->{"Columns" -> {
-         Offset[0.27999999999999997`], {
-          Offset[0.5599999999999999]}, 
-         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
-         Offset[0.2], 
-         Offset[1.2], {
-          Offset[0.4]}, 
-         Offset[0.2]}, "RowsIndexed" -> {}}],
-    BaseStyle->"OutputSizeLimit",
-    FrameMargins->{{12, 12}, {0, 15}},
-    FrameStyle->GrayLevel[0.85],
-    RoundingRadius->5,
-    StripOnInput->False],
-   Deploy,
-   DefaultBaseStyle->"Deploy"],
-  If[21259940437824449933 === $SessionID, 
-   Out[76], Message[
-     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
-   Null]]], "Output",
+ TagBox[GridBox[{
+    {"0.2308784604669575358`2.3633834178167517", 
+     "0.0699280453665247492`1.8446513889810314", 
+     "0.0261634906899439017`1.4176956863741677", 
+     "0.0107747694911219938`1.0324079878996302", "0``3."},
+    {"0.2674172010369769148`2.4271893388840096", 
+     "0.0795294775817166066`1.9005281296409504", 
+     "0.0354959121908686379`1.5501783413601669", 
+     "0.0140806847830136118`1.1486237762728804", "0``3."},
+    {"0.54054165400355636`2.732829166202125", 
+     "0.1524770542772433402`2.1832044931873784", 
+     "0.1037161315694348218`2.015846309973722", 
+     "0.0298389908901768308`1.4747841318623522", "0``3."}
+   },
+   GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
+   GridBoxSpacings->{"Columns" -> {
+       Offset[0.27999999999999997`], {
+        Offset[2.0999999999999996`]}, 
+       Offset[0.27999999999999997`]}, "Rows" -> {
+       Offset[0.2], {
+        Offset[0.4]}, 
+       Offset[0.2]}}],
+  Function[BoxForm`e$, 
+   TableForm[BoxForm`e$]]]], "Output",
  CellChangeTimes->{
   3.7789482693528748`*^9, 3.778949244739724*^9, 3.7789495154736567`*^9, 
    3.778989282598178*^9, 3.7789894598663073`*^9, 3.7789946465939617`*^9, 
@@ -147613,10 +143126,11 @@ Cell[BoxData[
    3.7791071223554153`*^9, 3.779114993816931*^9, 3.779120581336911*^9, 
    3.779121307874617*^9, 3.779193998212906*^9, 3.7796099540952663`*^9, 
    3.7796131164381847`*^9, 3.7797864654725103`*^9, 3.7799820771251698`*^9, 
-   3.7800533223301277`*^9, 3.780059390588765*^9},
+   3.7800533223301277`*^9, 3.780059390321542*^9, 3.780073066154483*^9, 
+   3.780112045691183*^9, 3.7801121640495787`*^9, 3.7802251636336718`*^9},
  CellLabel->
-  "Out[76]//TableForm=",ExpressionUUID->"7c6d6070-835d-4cb1-82bb-\
-83af12138c08"]
+  "Out[110]//TableForm=",ExpressionUUID->"f74a838c-1586-426d-9ec7-\
+832fbb01ebbe"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -227978,7 +223492,8 @@ cyD9LGvBQRC9pObBCxAttITpE4g22p0q/gJIm87MkQDRQb1d598C6e83Ky6C
 EphWq3/x4z3IPef7WD6A7FVRFADRJrv0wLRBes8hNo03jpvfRp4E0RKs8e3s
 QHqf04EOEP0tbM0cDs03jlsYdoFpAF6/sE0=
   "],
- CellLabel->"In[77]:=",ExpressionUUID->"934d17bf-e5ea-498d-8540-17002062e881"],
+ CellLabel->
+  "In[111]:=",ExpressionUUID->"934d17bf-e5ea-498d-8540-17002062e881"],
 
 Cell[BoxData[
  TagBox[
@@ -228056,19 +223571,16 @@ Cell[BoxData[
       "9.3819999999999996732`3.97229542861114", "10.125`4.005395031886707", 
       "9.6799999999999997158`3.9858753573083936"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -228091,10 +223603,11 @@ Cell[BoxData[
    3.7791149944437227`*^9}, 3.779120581607521*^9, {3.779609954353168*^9, 
    3.77960995489648*^9}, {3.779786465760126*^9, 3.779786466289262*^9}, 
    3.779786506866982*^9, 3.779982077376892*^9, 3.780053322604273*^9, 
-   3.780059390737101*^9},
+   3.780059390737101*^9, 3.7800730665114727`*^9, 3.780112046063249*^9, 
+   3.780112164144596*^9, 3.780225163689515*^9},
  CellLabel->
-  "Out[79]//TableForm=",ExpressionUUID->"45df1a2f-b786-4ac3-af0d-\
-9ac2a2630d0b"]
+  "Out[113]//TableForm=",ExpressionUUID->"8da6fee0-11ab-4ec0-a7d2-\
+0a456a87de93"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -228195,7 +223708,8 @@ Cell[BoxData[{
  CellChangeTimes->{{3.7790830515309143`*^9, 3.779083083145974*^9}, {
   3.7790832533079653`*^9, 3.779083258081696*^9}, {3.779083342033791*^9, 
   3.779083368717235*^9}, {3.779609837925684*^9, 3.779609838364656*^9}},
- CellLabel->"In[80]:=",ExpressionUUID->"0885d563-94b0-4b57-97f4-2c6aec2f8795"],
+ CellLabel->
+  "In[114]:=",ExpressionUUID->"0885d563-94b0-4b57-97f4-2c6aec2f8795"],
 
 Cell[BoxData[
  TagBox[
@@ -228258,19 +223772,16 @@ Cell[BoxData[
       RowBox[{"-", "0.2686697022093103016`2.429218693953811"}], 
       RowBox[{"-", "0.15899999999999892`2.2013971243204487"}]}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -228286,10 +223797,11 @@ Cell[BoxData[
    3.7791149942289267`*^9, 3.779114994577814*^9}, 3.779120581693985*^9, {
    3.779609954428705*^9, 3.779609955031344*^9}, 3.779786465779195*^9, 
    3.779786507801176*^9, 3.779982077452064*^9, 3.780053322693735*^9, 
-   3.7800593908414993`*^9},
+   3.7800593908414993`*^9, 3.780073066614031*^9, 3.780112046143277*^9, 
+   3.780112164237698*^9, 3.7802251637757177`*^9},
  CellLabel->
-  "Out[82]//TableForm=",ExpressionUUID->"3048ed87-4d95-4916-9857-\
-f984d59c7b14"]
+  "Out[116]//TableForm=",ExpressionUUID->"50d69143-b340-4e71-ad91-\
+9500e74ab1d3"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -240319,7 +235831,7 @@ QHqf04EOEP0tbM0cDs03jlsYdoFpuy+nF4FoGzuLJSDadDq/3nMgnb5qJZgG
 AFAZvms=
   "],
  CellLabel->
-  "In[109]:=",ExpressionUUID->"223dd076-11c6-4e21-adfd-47ec45d93ecb"],
+  "In[117]:=",ExpressionUUID->"223dd076-11c6-4e21-adfd-47ec45d93ecb"],
 
 Cell[BoxData[
  TagBox[
@@ -240371,8 +235883,8 @@ Cell[BoxData[
       RowBox[{"-", "1.5749467199996689537`3.1972658663151234"}], 
       RowBox[{"-", "1.5337271069980797922`3.18574809333662"}], 
       RowBox[{"-", "1.1223629999999999995`3.050133341234227"}], 
-      RowBox[{"-", "1.1223629999999999995`3.050133341234227"}], 
-      RowBox[{"-", "1.1223629999999999995`3.050133341234227"}], 
+      RowBox[{"-", "0.9553256811389151393`2.980151452640561"}], 
+      RowBox[{"-", "0.9547986377642295741`2.979911790716053"}], 
       RowBox[{"-", "0.7487000000000000322`2.874307833128039"}], 
       RowBox[{"-", "0.414899999999999991`2.6179434348289727"}], 
       RowBox[{
@@ -240398,19 +235910,16 @@ Cell[BoxData[
       "0.2832000000000000073`2.4520932490177314", 
       "0.2200000000000000011`2.3424226808222066"}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -240434,10 +235943,12 @@ Cell[BoxData[
    3.780053322751582*^9, 3.7800533230717487`*^9}, 3.780053378565699*^9, 
    3.7800538626134*^9, 3.780053927856077*^9, 3.780054054581111*^9, {
    3.780059391103464*^9, 3.78005939180901*^9}, 3.780065532751717*^9, 
-   3.780065564736315*^9, {3.780065649630279*^9, 3.7800656537376842`*^9}},
+   3.780065564736315*^9, {3.780065649630279*^9, 3.7800656537376842`*^9}, {
+   3.780073066729711*^9, 3.780073067135811*^9}, {3.7801120462118587`*^9, 
+   3.780112046417726*^9}, 3.780112164330209*^9, 3.7802251638335342`*^9},
  CellLabel->
-  "Out[111]//TableForm=",ExpressionUUID->"73e399a1-443c-430d-85bd-\
-6b04d59bf09a"]
+  "Out[119]//TableForm=",ExpressionUUID->"bd937af9-d614-4968-97c3-\
+26618373f6f2"]
 }, Open  ]],
 
 Cell[CellGroupData[{
@@ -240540,7 +236051,7 @@ Cell[BoxData[{
   3.779083368717235*^9}, {3.779609837925684*^9, 3.779609838364656*^9}, {
   3.779609893189887*^9, 3.7796098974057283`*^9}},
  CellLabel->
-  "In[103]:=",ExpressionUUID->"6d1a3678-ebb0-496f-b10d-b946f08cc7b2"],
+  "In[120]:=",ExpressionUUID->"6d1a3678-ebb0-496f-b10d-b946f08cc7b2"],
 
 Cell[BoxData[
  TagBox[
@@ -240583,8 +236094,8 @@ Cell[BoxData[
       RowBox[{"-", "1.1600467199996689072`3.06447548045921"}], 
       RowBox[{"-", "1.1188271069980797456`3.048762979934987"}], 
       RowBox[{"-", "0.707462999999999953`2.849703731382164"}], 
-      RowBox[{"-", "0.707462999999999953`2.849703731382164"}], 
-      RowBox[{"-", "0.707462999999999953`2.849703731382164"}], 
+      RowBox[{"-", "0.5404256811389152038`2.732735978602982"}], 
+      RowBox[{"-", "0.5398986377642296386`2.732312231690127"}], 
       RowBox[{"-", "0.3338000000000000411`2.523486332343228"}]},
      {"\<\"T\"\>", 
       RowBox[{"-", "1.4077889999999999571`3.1485375674463136"}], 
@@ -240603,19 +236114,16 @@ Cell[BoxData[
       RowBox[{"-", "0.4719145193165605878`2.673863339415549"}], 
       RowBox[{"-", "0.2956000000000000294`2.4707044297227885"}]}
     },
-    GridBoxAlignment->{
-     "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
-      "RowsIndexed" -> {}},
+    GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}},
     GridBoxDividers->{
-     "Columns" -> {{False}}, "ColumnsIndexed" -> {}, 
-      "Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
+     "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}},
     GridBoxSpacings->{"Columns" -> {
         Offset[0.27999999999999997`], {
          Offset[2.0999999999999996`]}, 
-        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.27999999999999997`]}, "Rows" -> {
         Offset[0.2], {
          Offset[0.4]}, 
-        Offset[0.2]}, "RowsIndexed" -> {}}],
+        Offset[0.2]}}],
    {None, OutputFormsDump`HeadedColumns}],
   Function[BoxForm`e$, 
    TableForm[
@@ -240631,10 +236139,12 @@ Cell[BoxData[
    3.7791149942289267`*^9, 3.779114994577814*^9}, 3.779120581693985*^9, 
    3.779609954599752*^9, 3.779786466038061*^9, 3.779982077935875*^9, 
    3.78005332286378*^9, 3.78005338379463*^9, 3.780053937910345*^9, 
-   3.780059391343219*^9, 3.780065534008494*^9, 3.7800655657249317`*^9},
+   3.780059391343219*^9, 3.780065534008494*^9, 3.7800655657249317`*^9, 
+   3.7800730668497887`*^9, 3.780112046288144*^9, 3.78011216442625*^9, 
+   3.780225163894677*^9},
  CellLabel->
-  "Out[105]//TableForm=",ExpressionUUID->"e1faa357-4f87-4543-998c-\
-fffda588b147"]
+  "Out[122]//TableForm=",ExpressionUUID->"f1d99c6b-9d9a-4c57-9c89-\
+35a4b19a3987"]
 }, Open  ]],
 
 Cell[BoxData[{
@@ -242120,6 +237630,8 @@ Cell["GW100", "Title",
   3.7759793902727613`*^9}},ExpressionUUID->"9fb0ce88-036b-4aaf-98dd-\
 069443cb99a4"],
 
+Cell[CellGroupData[{
+
 Cell[BoxData[{
  RowBox[{
   RowBox[{"GW100", "=", 
@@ -242144,7 +237656,14 @@ Cell[BoxData[{
  InitializationCell->True,
  CellChangeTimes->{{3.775979395177147*^9, 3.775979401152217*^9}, {
   3.775979751816133*^9, 3.775979751982893*^9}},
- CellLabel->"In[89]:=",ExpressionUUID->"213df3fe-4089-4210-bf02-8173ea32533a"],
+ CellLabel->
+  "In[123]:=",ExpressionUUID->"213df3fe-4089-4210-bf02-8173ea32533a"],
+
+Cell[BoxData["$Aborted"], "Output",
+ CellChangeTimes->{3.780225163976019*^9},
+ CellLabel->
+  "Out[123]=",ExpressionUUID->"b2cb5b95-2871-47bf-b5c0-a49ac0e53aed"]
+}, Open  ]],
 
 Cell[CellGroupData[{
 
@@ -242461,14 +237980,13 @@ Cell[BoxData[
 }, Closed]]
 }, Closed]]
 },
-WindowSize->{1280, 755},
+WindowSize->{1617, 1216},
 WindowMargins->{{0, Automatic}, {Automatic, 0}},
 TaggingRules->{
  "Openers" -> {
    "PrimaryExamplesSection" -> Open, "NotesSection" -> Closed, 
     "ExampleSection" -> {"1" -> Closed}}},
-FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
-2018)",
+FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)",
 StyleDefinitions->"Default.nb"
 ]
 (* End of Notebook Content *)
@@ -242484,304 +238002,317 @@ CellTagsIndex->{}
 Notebook[{
 Cell[CellGroupData[{
 Cell[580, 22, 155, 3, 98, "Title",ExpressionUUID->"9c058984-7057-4fad-9b0c-3aecedd6e63c"],
-Cell[738, 27, 308, 6, 46, "Input",ExpressionUUID->"37867cff-0ca5-44bf-a2dd-e0dbbbf2fa3a",
+Cell[738, 27, 309, 6, 46, "Input",ExpressionUUID->"37867cff-0ca5-44bf-a2dd-e0dbbbf2fa3a",
  InitializationCell->True],
-Cell[1049, 35, 379, 7, 46, "Input",ExpressionUUID->"6b655861-3eba-418a-a15a-1fcf0775d7ac",
+Cell[1050, 35, 380, 7, 46, "Input",ExpressionUUID->"6b655861-3eba-418a-a15a-1fcf0775d7ac",
  InitializationCell->True],
-Cell[1431, 44, 574, 12, 68, "Input",ExpressionUUID->"503d29c5-30e2-484d-9104-c72aa4e45b6b",
+Cell[1433, 44, 575, 12, 68, "Input",ExpressionUUID->"503d29c5-30e2-484d-9104-c72aa4e45b6b",
  InitializationCell->True],
-Cell[2008, 58, 643, 12, 46, "Input",ExpressionUUID->"761743e2-8cea-46d7-9151-ac0d311451f4",
+Cell[2011, 58, 644, 12, 46, "Input",ExpressionUUID->"761743e2-8cea-46d7-9151-ac0d311451f4",
  InitializationCell->True],
-Cell[2654, 72, 775, 21, 46, "Input",ExpressionUUID->"b6189236-bc55-4942-b848-7171c9a8786b",
+Cell[2658, 72, 776, 21, 46, "Input",ExpressionUUID->"b6189236-bc55-4942-b848-7171c9a8786b",
  InitializationCell->True]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[3466, 98, 224, 4, 72, "Title",ExpressionUUID->"2e48d6dd-bcc2-4069-bdff-d98298b3703d"],
+Cell[3471, 98, 224, 4, 72, "Title",ExpressionUUID->"2e48d6dd-bcc2-4069-bdff-d98298b3703d"],
 Cell[CellGroupData[{
-Cell[3715, 106, 210, 4, 67, "Section",ExpressionUUID->"a169c7e1-61b1-491c-b20a-a08f05ba9968"],
+Cell[3720, 106, 210, 4, 67, "Section",ExpressionUUID->"a169c7e1-61b1-491c-b20a-a08f05ba9968"],
 Cell[CellGroupData[{
-Cell[3950, 114, 5176, 133, 156, "Input",ExpressionUUID->"2081d490-fe34-406a-815e-d0ab97901c29"],
-Cell[9129, 249, 6390, 129, 388, "Output",ExpressionUUID->"2faf99a0-a073-4cb9-9e1a-cbb1e0014033"]
+Cell[3955, 114, 5176, 133, 156, "Input",ExpressionUUID->"2081d490-fe34-406a-815e-d0ab97901c29"],
+Cell[9134, 249, 6390, 129, 388, "Output",ExpressionUUID->"2faf99a0-a073-4cb9-9e1a-cbb1e0014033"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[15568, 384, 255, 4, 53, "Section",ExpressionUUID->"a5750291-acb8-4205-bd01-79805d77baa5"],
+Cell[15573, 384, 255, 4, 53, "Section",ExpressionUUID->"a5750291-acb8-4205-bd01-79805d77baa5"],
 Cell[CellGroupData[{
-Cell[15848, 392, 4830, 129, 156, "Input",ExpressionUUID->"4d64e3d1-f0ed-4f0d-9dae-59126ce675b8"],
-Cell[20681, 523, 5680, 119, 388, "Output",ExpressionUUID->"d752f601-f84a-4ff3-9f3d-cafdd911724e"]
+Cell[15853, 392, 4830, 129, 156, "Input",ExpressionUUID->"4d64e3d1-f0ed-4f0d-9dae-59126ce675b8"],
+Cell[20686, 523, 5680, 119, 388, "Output",ExpressionUUID->"d752f601-f84a-4ff3-9f3d-cafdd911724e"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[26410, 648, 308, 5, 53, "Section",ExpressionUUID->"48bbade3-d610-40a1-a015-76e0b486ba4c"],
+Cell[26415, 648, 308, 5, 53, "Section",ExpressionUUID->"48bbade3-d610-40a1-a015-76e0b486ba4c"],
 Cell[CellGroupData[{
-Cell[26743, 657, 4875, 129, 156, "Input",ExpressionUUID->"9fb4566e-41c8-44d4-bcc1-83c3ace4ae0c"],
-Cell[31621, 788, 5715, 119, 388, "Output",ExpressionUUID->"6297040c-31dc-4406-9ac5-d56a510d2133"]
+Cell[26748, 657, 4875, 129, 156, "Input",ExpressionUUID->"9fb4566e-41c8-44d4-bcc1-83c3ace4ae0c"],
+Cell[31626, 788, 5715, 119, 388, "Output",ExpressionUUID->"6297040c-31dc-4406-9ac5-d56a510d2133"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[37385, 913, 722, 19, 54, "Section",ExpressionUUID->"50962d13-41d1-4f26-9807-690299046ad4"],
+Cell[37390, 913, 722, 19, 54, "Section",ExpressionUUID->"50962d13-41d1-4f26-9807-690299046ad4"],
 Cell[CellGroupData[{
-Cell[38132, 936, 2453, 57, 194, "Input",ExpressionUUID->"740b32b3-1b8a-4ece-8173-ba84e85f7b14",
+Cell[38137, 936, 2454, 57, 194, "Input",ExpressionUUID->"740b32b3-1b8a-4ece-8173-ba84e85f7b14",
  InitializationCell->True],
-Cell[40588, 995, 5383, 107, 70, "Output",ExpressionUUID->"d2b256d1-ff6e-44ba-adb3-d0cb37c9c08d"]
+Cell[40594, 995, 5327, 106, 70, "Output",ExpressionUUID->"410e12d0-b85e-4625-a925-0fa214ca2274"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[46020, 1108, 770, 20, 54, "Section",ExpressionUUID->"6811e92e-26bd-4687-be1f-71606109c64f"],
+Cell[45970, 1107, 770, 20, 54, "Section",ExpressionUUID->"6811e92e-26bd-4687-be1f-71606109c64f"],
 Cell[CellGroupData[{
-Cell[46815, 1132, 2453, 57, 194, "Input",ExpressionUUID->"96bebe42-c17e-4928-8aeb-b7edbd2782ad",
+Cell[46765, 1131, 2453, 57, 194, "Input",ExpressionUUID->"96bebe42-c17e-4928-8aeb-b7edbd2782ad",
  InitializationCell->True],
-Cell[49271, 1191, 5319, 107, 70, "Output",ExpressionUUID->"92235f6f-5c22-4e30-911a-46ea504a3f0e"]
+Cell[49221, 1190, 5262, 106, 70, "Output",ExpressionUUID->"9e159156-b792-4131-ba5c-ea362b9008a3"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[54639, 1304, 820, 20, 54, "Section",ExpressionUUID->"8d79f72d-0619-41cf-8285-c2faeb7fccc4"],
+Cell[54532, 1302, 820, 20, 54, "Section",ExpressionUUID->"8d79f72d-0619-41cf-8285-c2faeb7fccc4"],
 Cell[CellGroupData[{
-Cell[55484, 1328, 2453, 57, 194, "Input",ExpressionUUID->"3ee5d11c-5973-4742-8d2f-604aa1d19beb",
+Cell[55377, 1326, 2453, 57, 194, "Input",ExpressionUUID->"3ee5d11c-5973-4742-8d2f-604aa1d19beb",
  InitializationCell->True],
-Cell[57940, 1387, 5321, 107, 70, "Output",ExpressionUUID->"5d2a126a-3f77-44ea-bfad-9cc3959fa98f"]
+Cell[57833, 1385, 5262, 106, 70, "Output",ExpressionUUID->"7eeed9a8-7234-4882-8f83-de24163f5516"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[63310, 1500, 818, 20, 54, "Section",ExpressionUUID->"9e9f5a66-81e4-4b37-808a-3a5b19a88be9"],
+Cell[63144, 1497, 818, 20, 54, "Section",ExpressionUUID->"9e9f5a66-81e4-4b37-808a-3a5b19a88be9"],
 Cell[CellGroupData[{
-Cell[64153, 1524, 2504, 58, 194, "Input",ExpressionUUID->"0e83ae26-e77a-45c9-9c11-e053b599bcd2",
+Cell[63987, 1521, 2504, 58, 194, "Input",ExpressionUUID->"0e83ae26-e77a-45c9-9c11-e053b599bcd2",
  InitializationCell->True],
-Cell[66660, 1584, 5441, 109, 70, "Output",ExpressionUUID->"279f9117-8c1c-4de7-86c4-b4a4c40270d1"]
+Cell[66494, 1581, 5380, 107, 70, "Output",ExpressionUUID->"0ae0a9d3-2100-4f23-860b-f08b127b4b59"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[72150, 1699, 863, 21, 54, "Section",ExpressionUUID->"2bfccbb2-6448-427a-875f-b0151ac9cd80"],
+Cell[71923, 1694, 863, 21, 54, "Section",ExpressionUUID->"2bfccbb2-6448-427a-875f-b0151ac9cd80"],
 Cell[CellGroupData[{
-Cell[73038, 1724, 2945, 61, 147, "Input",ExpressionUUID->"d5dcee17-a82a-4fd3-9194-9c1dca598d2d",
+Cell[72811, 1719, 3956, 86, 299, "Input",ExpressionUUID->"5c5b09a9-6885-4248-9275-37748f62f536",
  InitializationCell->True],
-Cell[75986, 1787, 19047, 393, 70, "Output",ExpressionUUID->"c3d2d243-fec7-47a4-b895-b57b4c7d6bc1"]
-}, Open  ]]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[95082, 2186, 960, 22, 54, "Section",ExpressionUUID->"4e039aa6-68d1-47a5-bbbc-d6a2e4853781"],
-Cell[96045, 2210, 1216, 29, 131, "Input",ExpressionUUID->"50587b0f-febe-4ef9-a287-fc7d8440d3ea",
- InitializationCell->True],
-Cell[CellGroupData[{
-Cell[97286, 2243, 3706, 78, 257, "Input",ExpressionUUID->"1b01945f-d8b1-4386-8d85-0dcb9e2b5372",
- InitializationCell->True],
-Cell[100995, 2323, 2169, 36, 70, "Output",ExpressionUUID->"c7830bc8-0173-4c15-a45f-6b6dc79a8648"],
-Cell[103167, 2361, 4072, 89, 70, "Output",ExpressionUUID->"186eb329-2bba-4a1c-b3bb-ad4ac6b9fa16"]
+Cell[76770, 1807, 9055, 197, 70, "Output",ExpressionUUID->"6e41949c-8713-444c-a3f5-58e523087330"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[107276, 2455, 3543, 81, 257, "Input",ExpressionUUID->"4d3d2a6a-9cce-464c-b450-ab541240c58a",
+Cell[85862, 2009, 2945, 61, 147, "Input",ExpressionUUID->"d5dcee17-a82a-4fd3-9194-9c1dca598d2d",
  InitializationCell->True],
-Cell[110822, 2538, 46974, 1098, 70, "Output",ExpressionUUID->"841b6133-84ea-47fc-aee1-b816568e37bb"],
-Cell[157799, 3638, 8839, 223, 70, "Output",ExpressionUUID->"629f04c2-6090-4d94-93d4-f4f98908cf2a"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[166675, 3866, 3507, 81, 257, "Input",ExpressionUUID->"8f082628-03e5-4288-91c2-151ab2b847fe",
- InitializationCell->True],
-Cell[170185, 3949, 46897, 1097, 70, "Output",ExpressionUUID->"902edbc9-fc95-4138-bc2c-22997092a192"],
-Cell[217085, 5048, 8756, 222, 70, "Output",ExpressionUUID->"3f6068aa-789d-451e-b5e6-10a0ff9acbd3"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[225878, 5275, 8670, 185, 388, "Input",ExpressionUUID->"3ec08f0d-4141-41ff-b494-a3f3ed3f5aa3"],
-Cell[234551, 5462, 4214407, 73673, 1889, "Output",ExpressionUUID->"cf19ccea-3a0c-4087-afa8-4bd974c8b72b"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[4448995, 79140, 6612, 160, 451, "Input",ExpressionUUID->"7fcceff8-cd4a-487a-ab2f-b6b86028bee6"],
-Cell[4455610, 79302, 186101, 3303, 387, "Output",ExpressionUUID->"42159e66-231a-4402-b8d4-5ad0acb2206c"]
+Cell[88810, 2072, 3194, 75, 70, "Output",ExpressionUUID->"8691dd0a-f9ef-49f6-b5d9-5230113b0d65"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[4641760, 82611, 750, 19, 54, "Section",ExpressionUUID->"8bb2386b-7f94-4448-a34f-74a4f2d8352f"],
-Cell[CellGroupData[{
-Cell[4642535, 82634, 2519, 58, 215, "Input",ExpressionUUID->"f374a050-8b43-4e1c-ab4b-8dfa7dfe4b74",
+Cell[92053, 2153, 960, 22, 54, "Section",ExpressionUUID->"4e039aa6-68d1-47a5-bbbc-d6a2e4853781"],
+Cell[93016, 2177, 1216, 29, 131, "Input",ExpressionUUID->"50587b0f-febe-4ef9-a287-fc7d8440d3ea",
  InitializationCell->True],
-Cell[4645057, 82694, 5297, 107, 70, "Output",ExpressionUUID->"048c0769-3ec8-47ec-a764-50e7022c75b1"]
-}, Open  ]]
-}, Closed]],
 Cell[CellGroupData[{
-Cell[4650403, 82807, 819, 20, 54, "Section",ExpressionUUID->"43349f32-6131-4f41-8239-f3a4811d4612"],
-Cell[CellGroupData[{
-Cell[4651247, 82831, 2522, 58, 215, "Input",ExpressionUUID->"fa4c45a8-ddd6-4291-b0ff-f7ddb674a3fa",
+Cell[94257, 2210, 3706, 78, 236, "Input",ExpressionUUID->"1b01945f-d8b1-4386-8d85-0dcb9e2b5372",
  InitializationCell->True],
-Cell[4653772, 82891, 5232, 106, 70, "Output",ExpressionUUID->"d59e3dc3-47c9-4bd0-bc4f-61855020919d"]
-}, Open  ]]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[4659053, 83003, 852, 21, 54, "Section",ExpressionUUID->"9e831903-ff5b-4d95-875d-9e0e8daf116f"],
-Cell[CellGroupData[{
-Cell[4659930, 83028, 2520, 58, 215, "Input",ExpressionUUID->"718dda33-1726-4391-8bed-e0672e45e563",
- InitializationCell->True],
-Cell[4662453, 83088, 5256, 106, 70, "Output",ExpressionUUID->"cec2028a-3fb5-421d-bed8-e9d6d8e1f08b"]
-}, Open  ]]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[4667758, 83200, 851, 21, 54, "Section",ExpressionUUID->"384bef20-ac2b-46c7-9ffa-6e1c5fc7f597"],
-Cell[CellGroupData[{
-Cell[4668634, 83225, 2571, 59, 194, "Input",ExpressionUUID->"7895dc90-d7ba-4e21-8223-4615f676f072",
- InitializationCell->True],
-Cell[4671208, 83286, 5292, 107, 70, "Output",ExpressionUUID->"809974b2-643b-4834-bde5-f0a96b61acde"]
-}, Open  ]]
-}, Closed]],
-Cell[CellGroupData[{
-Cell[4676549, 83399, 865, 21, 54, "Section",ExpressionUUID->"82fbc9b0-dfa0-4200-a252-d90e45cf2eb4"],
-Cell[CellGroupData[{
-Cell[4677439, 83424, 3251, 73, 257, "Input",ExpressionUUID->"8e941441-2618-4897-ba2f-18c0b38ca948",
- InitializationCell->True],
-Cell[4680693, 83499, 7599, 153, 70, "Output",ExpressionUUID->"de01639a-2411-414f-bc1e-dcf05d86ffb8"],
-Cell[4688295, 83654, 2133, 43, 70, "Output",ExpressionUUID->"9acfd0a4-3920-482b-8854-9d7d53a23f9c"]
+Cell[97966, 2290, 8815, 183, 70, "Output",ExpressionUUID->"458d65ad-8b37-475f-8374-25d180a0ad1a"],
+Cell[106784, 2475, 2987, 54, 70, "Output",ExpressionUUID->"658e0e2b-b119-4254-a03f-57852946fba9"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4690465, 83702, 3609, 85, 278, "Input",ExpressionUUID->"c771a5d0-a6b2-41e4-9a84-7b98eb54a22f",
+Cell[109808, 2534, 3543, 81, 257, "Input",ExpressionUUID->"4d3d2a6a-9cce-464c-b450-ab541240c58a",
  InitializationCell->True],
-Cell[4694077, 83789, 7254, 147, 70, "Output",ExpressionUUID->"2217573d-8415-4547-8011-17c1354a0500"],
-Cell[4701334, 83938, 1748, 37, 70, "Output",ExpressionUUID->"c68943c7-e509-4d1e-beb6-7a56c4f20b93"]
+Cell[113354, 2617, 7656, 153, 70, "Output",ExpressionUUID->"d8d232ac-931d-4d73-8676-b77d248c08f7"],
+Cell[121013, 2772, 2200, 43, 70, "Output",ExpressionUUID->"fcf7fa65-36af-46d9-b1be-822346f4d4f7"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4703119, 83980, 3605, 85, 278, "Input",ExpressionUUID->"ec1256d4-33e8-4f45-b014-0878328e833b",
+Cell[123250, 2820, 3507, 81, 257, "Input",ExpressionUUID->"8f082628-03e5-4288-91c2-151ab2b847fe",
  InitializationCell->True],
-Cell[4706727, 84067, 7261, 147, 70, "Output",ExpressionUUID->"31b64cc9-dd4c-43b0-b49f-96c109a9797c"],
-Cell[4713991, 84216, 1754, 37, 70, "Output",ExpressionUUID->"a1559c77-86b4-4b74-b5e0-c51cc0f66b53"]
+Cell[126760, 2903, 7585, 152, 70, "Output",ExpressionUUID->"e1f4ac3b-d630-44b4-8cd0-5dcfca5f663b"],
+Cell[134348, 3057, 2120, 42, 70, "Output",ExpressionUUID->"cde8d24b-70c2-40a6-b51f-be2dae17e8e1"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[4715782, 84258, 3939, 97, 262, "Input",ExpressionUUID->"159e0a02-aa18-4879-9cbf-5c768604a8d6"],
-Cell[4719724, 84357, 3374233, 58921, 4029, "Output",ExpressionUUID->"614c64c0-b4d5-48e8-b45f-efa5f869f2f4"]
+Cell[136505, 3104, 8670, 185, 388, "Input",ExpressionUUID->"3ec08f0d-4141-41ff-b494-a3f3ed3f5aa3"],
+Cell[145178, 3291, 4214407, 73673, 1889, "Output",ExpressionUUID->"cf19ccea-3a0c-4087-afa8-4bd974c8b72b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4359622, 76969, 6612, 160, 451, "Input",ExpressionUUID->"7fcceff8-cd4a-487a-ab2f-b6b86028bee6"],
+Cell[4366237, 77131, 186101, 3303, 387, "Output",ExpressionUUID->"42159e66-231a-4402-b8d4-5ad0acb2206c"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[8094006, 143284, 777, 20, 54, "Section",ExpressionUUID->"6fa5b73c-8983-457d-a211-7386418fa555"],
+Cell[4552387, 80440, 750, 19, 54, "Section",ExpressionUUID->"8bb2386b-7f94-4448-a34f-74a4f2d8352f"],
 Cell[CellGroupData[{
-Cell[8094808, 143308, 2582, 59, 194, "Input",ExpressionUUID->"3733b820-19e8-4d95-9d3b-ef9c19a09235",
+Cell[4553162, 80463, 2519, 58, 215, "Input",ExpressionUUID->"f374a050-8b43-4e1c-ab4b-8dfa7dfe4b74",
  InitializationCell->True],
-Cell[8097393, 143369, 5622, 111, 70, "Output",ExpressionUUID->"663b1f03-40a3-4997-9381-e572bbb6b5e3"]
+Cell[4555684, 80523, 5233, 105, 70, "Output",ExpressionUUID->"117b887e-2881-4f8d-83ac-3181bffdf7b0"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[8103064, 143486, 852, 21, 54, "Section",ExpressionUUID->"54b6abe4-f575-4768-9559-d633d9e5f503"],
+Cell[4560966, 80634, 819, 20, 54, "Section",ExpressionUUID->"43349f32-6131-4f41-8239-f3a4811d4612"],
 Cell[CellGroupData[{
-Cell[8103941, 143511, 2589, 59, 215, "Input",ExpressionUUID->"589a346e-5dec-4bfd-8636-0f69c29fffb0",
+Cell[4561810, 80658, 2522, 58, 215, "Input",ExpressionUUID->"fa4c45a8-ddd6-4291-b0ff-f7ddb674a3fa",
  InitializationCell->True],
-Cell[8106533, 143572, 5503, 110, 70, "Output",ExpressionUUID->"1d70d98e-708d-4cb8-9952-7c7d7167af56"]
+Cell[4564335, 80718, 5169, 104, 70, "Output",ExpressionUUID->"37ba9b75-2a4e-4e0b-a4cc-0c8f81513ea5"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[8112085, 143688, 875, 21, 54, "Section",ExpressionUUID->"7eaea1d2-b7b2-45f8-a57e-abfdd6ee6bb6"],
+Cell[4569553, 80828, 852, 21, 54, "Section",ExpressionUUID->"9e831903-ff5b-4d95-875d-9e0e8daf116f"],
 Cell[CellGroupData[{
-Cell[8112985, 143713, 2583, 59, 215, "Input",ExpressionUUID->"f1083ffe-a0f7-468e-ab08-90e1a3f1ca50",
+Cell[4570430, 80853, 2520, 58, 215, "Input",ExpressionUUID->"718dda33-1726-4391-8bed-e0672e45e563",
  InitializationCell->True],
-Cell[8115571, 143774, 5547, 110, 70, "Output",ExpressionUUID->"c605ff9b-8513-44f9-b627-ac2b720ffbca"]
+Cell[4572953, 80913, 5197, 105, 70, "Output",ExpressionUUID->"91cca38b-a2cc-4a81-91c5-0e7bccc42065"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[8121167, 143890, 876, 21, 54, "Section",ExpressionUUID->"821738e4-b980-4468-ba89-8091b5c370a2"],
+Cell[4578199, 81024, 851, 21, 54, "Section",ExpressionUUID->"384bef20-ac2b-46c7-9ffa-6e1c5fc7f597"],
 Cell[CellGroupData[{
-Cell[8122068, 143915, 2633, 59, 215, "Input",ExpressionUUID->"dd119632-a936-4ad0-a5cc-869a3f9ca110",
+Cell[4579075, 81049, 2571, 59, 194, "Input",ExpressionUUID->"7895dc90-d7ba-4e21-8223-4615f676f072",
  InitializationCell->True],
-Cell[8124704, 143976, 5603, 111, 70, "Output",ExpressionUUID->"2879162d-e9cc-49cc-99ae-9cf67c7b96cd"]
+Cell[4581649, 81110, 5227, 105, 70, "Output",ExpressionUUID->"8b1c5425-df60-4ef8-908f-02bf3b833f22"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[8130356, 144093, 914, 22, 54, "Section",ExpressionUUID->"b2e5816f-6124-4596-b969-bb4abc269acc"],
+Cell[4586925, 81221, 865, 21, 54, "Section",ExpressionUUID->"82fbc9b0-dfa0-4200-a252-d90e45cf2eb4"],
 Cell[CellGroupData[{
-Cell[8131295, 144119, 3047, 62, 147, "Input",ExpressionUUID->"43547991-0ca8-46bb-8873-c03223377bca",
+Cell[4587815, 81246, 3251, 73, 257, "Input",ExpressionUUID->"8e941441-2618-4897-ba2f-18c0b38ca948",
  InitializationCell->True],
-Cell[8134345, 144183, 19012, 391, 70, "Output",ExpressionUUID->"d0a5c2ba-7f9d-4aa9-9bde-8cce4065fd74"]
+Cell[4591069, 81321, 7536, 151, 70, "Output",ExpressionUUID->"ea211ece-02e8-4bc9-97ec-4f35dfe074f1"],
+Cell[4598608, 81474, 2124, 42, 70, "Output",ExpressionUUID->"b4a68d30-91dc-453a-9055-d471e62bb1dd"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4600769, 81521, 3609, 85, 278, "Input",ExpressionUUID->"c771a5d0-a6b2-41e4-9a84-7b98eb54a22f",
+ InitializationCell->True],
+Cell[4604381, 81608, 7194, 145, 70, "Output",ExpressionUUID->"d5ce85c5-f694-4aae-a6ae-9d8367d98748"],
+Cell[4611578, 81755, 1740, 36, 70, "Output",ExpressionUUID->"256f6b4d-8db6-4060-89f9-4efb5dbd5942"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4613355, 81796, 3605, 85, 278, "Input",ExpressionUUID->"ec1256d4-33e8-4f45-b014-0878328e833b",
+ InitializationCell->True],
+Cell[4616963, 81883, 7199, 145, 70, "Output",ExpressionUUID->"d1ab6a32-bebb-4867-b944-b315ed57a0b9"],
+Cell[4624165, 82030, 1748, 36, 70, "Output",ExpressionUUID->"4712d067-033f-4023-b07a-b1b00ef4ec9a"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4625950, 82071, 3939, 97, 262, "Input",ExpressionUUID->"159e0a02-aa18-4879-9cbf-5c768604a8d6"],
+Cell[4629892, 82170, 3374233, 58921, 4029, "Output",ExpressionUUID->"614c64c0-b4d5-48e8-b45f-efa5f869f2f4"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[8153406, 144580, 888, 21, 54, "Section",ExpressionUUID->"bddf8ad0-04f2-4416-be36-ffb03975d392"],
+Cell[8004174, 141097, 777, 20, 54, "Section",ExpressionUUID->"6fa5b73c-8983-457d-a211-7386418fa555"],
 Cell[CellGroupData[{
-Cell[8154319, 144605, 3334, 72, 236, "Input",ExpressionUUID->"ef1ef8d5-ac32-4eb0-b444-39483560e1d1",
+Cell[8004976, 141121, 2582, 59, 194, "Input",ExpressionUUID->"3733b820-19e8-4d95-9d3b-ef9c19a09235",
  InitializationCell->True],
-Cell[8157656, 144679, 1989, 34, 70, "Output",ExpressionUUID->"9cb9d834-c9db-4a18-8089-4c5220f869ef"],
-Cell[8159648, 144715, 3897, 86, 70, "Output",ExpressionUUID->"045e32d3-4ff8-4fea-bcd7-d666a4338ff3"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[8163582, 144806, 3625, 82, 257, "Input",ExpressionUUID->"7d732451-8167-4c5a-9357-1bd6ca4bb5d4",
- InitializationCell->True],
-Cell[8167210, 144890, 47333, 1097, 70, "Output",ExpressionUUID->"445ddaf1-f27f-47b6-b250-20469a083964"],
-Cell[8214546, 145989, 8787, 222, 70, "Output",ExpressionUUID->"c2e51319-86c8-4152-bbd0-a0d2fbcab96b"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[8223370, 146216, 3545, 81, 257, "Input",ExpressionUUID->"daa984c2-5086-443a-bf30-942881dce2c8",
- InitializationCell->True],
-Cell[8226918, 146299, 47270, 1096, 70, "Output",ExpressionUUID->"d316f2c0-fdab-4f2b-9d25-8d8b5f0fc357"],
-Cell[8274191, 147397, 8723, 221, 70, "Output",ExpressionUUID->"7c6d6070-835d-4cb1-82bb-83af12138c08"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[8282951, 147623, 8739, 186, 367, "Input",ExpressionUUID->"3a9e658c-3253-4a18-8d7e-72563d7c2845"],
-Cell[8291693, 147811, 4404041, 76192, 1895, "Output",ExpressionUUID->"dadd61c9-36f9-4b17-b299-07f5f6ed3e56"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[12695771, 224008, 6640, 161, 367, "Input",ExpressionUUID->"3ecf4148-e1e5-42fd-87df-352cf97e9c78"],
-Cell[12702414, 224171, 210989, 3691, 387, "Output",ExpressionUUID->"8b0a34ff-63a6-4ad2-8e7f-a4859bac6620"]
+Cell[8007561, 141182, 5563, 110, 70, "Output",ExpressionUUID->"9beb9088-f68f-4b7e-82b4-3eec285395d4"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[12913452, 227868, 148, 3, 53, "Section",ExpressionUUID->"e30f1247-4a04-47f3-a04c-c8f1216198aa"],
+Cell[8013173, 141298, 852, 21, 54, "Section",ExpressionUUID->"54b6abe4-f575-4768-9559-d633d9e5f503"],
 Cell[CellGroupData[{
-Cell[12913625, 227875, 169, 3, 54, "Subsection",ExpressionUUID->"a2bc718a-cb8b-495a-910a-51d4ee1d2efe"],
-Cell[CellGroupData[{
-Cell[12913819, 227882, 4137, 98, 278, "Input",ExpressionUUID->"934d17bf-e5ea-498d-8540-17002062e881",
+Cell[8014050, 141323, 2589, 59, 215, "Input",ExpressionUUID->"589a346e-5dec-4bfd-8636-0f69c29fffb0",
  InitializationCell->True],
-Cell[12917959, 227982, 5250, 114, 70, "Output",ExpressionUUID->"45df1a2f-b786-4ac3-af0d-9ac2a2630d0b"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[12923246, 228101, 4248, 96, 257, "Input",ExpressionUUID->"0885d563-94b0-4b57-97f4-2c6aec2f8795",
- InitializationCell->True],
-Cell[12927497, 228199, 4366, 92, 70, "Output",ExpressionUUID->"3048ed87-4d95-4916-9857-f984d59c7b14"]
-}, Open  ]],
-Cell[CellGroupData[{
-Cell[12931900, 228296, 9670, 211, 682, "Input",ExpressionUUID->"6e0bf562-5aa6-452f-b6fb-9502e21cd49a"],
-Cell[12941573, 228509, 644770, 11703, 405, "Output",ExpressionUUID->"3f76b1d1-8c92-48e6-82d7-c7b922e359e9"]
+Cell[8016642, 141384, 5441, 108, 70, "Output",ExpressionUUID->"a8f6a2e4-091f-4e31-baa1-8a5f95266f65"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[13586392, 240218, 167, 3, 38, "Subsection",ExpressionUUID->"eca95258-cde2-487a-9f76-1e8d5adf7cd8"],
+Cell[8022132, 141498, 875, 21, 54, "Section",ExpressionUUID->"7eaea1d2-b7b2-45f8-a57e-abfdd6ee6bb6"],
 Cell[CellGroupData[{
-Cell[13586584, 240225, 3994, 96, 278, "Input",ExpressionUUID->"223dd076-11c6-4e21-adfd-47ec45d93ecb",
+Cell[8023032, 141523, 2583, 59, 215, "Input",ExpressionUUID->"f1083ffe-a0f7-468e-ab08-90e1a3f1ca50",
  InitializationCell->True],
-Cell[13590581, 240323, 5738, 116, 130, "Output",ExpressionUUID->"73e399a1-443c-430d-85bd-6b04d59bf09a"]
+Cell[8025618, 141584, 5488, 109, 70, "Output",ExpressionUUID->"4d4e631a-fd02-49f2-a85c-cc3fcdb443cb"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[8031155, 141699, 876, 21, 54, "Section",ExpressionUUID->"821738e4-b980-4468-ba89-8091b5c370a2"],
+Cell[CellGroupData[{
+Cell[8032056, 141724, 2633, 59, 215, "Input",ExpressionUUID->"dd119632-a936-4ad0-a5cc-869a3f9ca110",
+ InitializationCell->True],
+Cell[8034692, 141785, 5542, 109, 70, "Output",ExpressionUUID->"7c8949f5-3f23-427b-897b-0470604e4e6a"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[8040283, 141900, 914, 22, 54, "Section",ExpressionUUID->"b2e5816f-6124-4596-b969-bb4abc269acc"],
+Cell[CellGroupData[{
+Cell[8041222, 141926, 2234, 52, 194, "Input",ExpressionUUID->"57cfc487-608f-4265-b6c0-cb1c6b1b099e",
+ InitializationCell->True],
+Cell[8043459, 141980, 5585, 117, 70, "Output",ExpressionUUID->"aa7696c3-20c7-4ef5-bbb7-d9cb9e42d567"]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[13596356, 240444, 4303, 98, 257, "Input",ExpressionUUID->"6d1a3678-ebb0-496f-b10d-b946f08cc7b2",
+Cell[8049081, 142102, 3051, 63, 147, "Input",ExpressionUUID->"43547991-0ca8-46bb-8873-c03223377bca",
  InitializationCell->True],
-Cell[13600662, 240544, 4403, 92, 130, "Output",ExpressionUUID->"e1faa357-4f87-4543-998c-fffda588b147"]
+Cell[8052135, 142167, 3006, 74, 70, "Output",ExpressionUUID->"62cce13f-c7c7-4ab7-876d-e0134fa2f279"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[8055190, 142247, 888, 21, 54, "Section",ExpressionUUID->"bddf8ad0-04f2-4416-be36-ffb03975d392"],
+Cell[CellGroupData[{
+Cell[8056103, 142272, 3338, 73, 236, "Input",ExpressionUUID->"ef1ef8d5-ac32-4eb0-b444-39483560e1d1",
+ InitializationCell->True],
+Cell[8059444, 142347, 8211, 161, 70, "Output",ExpressionUUID->"31c700af-1286-49b5-b3fc-84cda94961dc"],
+Cell[8067658, 142510, 2788, 51, 70, "Output",ExpressionUUID->"e225c626-0635-49b9-b46d-bc5568e25e15"]
 }, Open  ]],
-Cell[13605080, 240639, 9593, 210, 682, "Input",ExpressionUUID->"c8108385-10fb-481f-ba17-8a16f9de1ad2"]
+Cell[CellGroupData[{
+Cell[8070483, 142566, 3629, 83, 257, "Input",ExpressionUUID->"7d732451-8167-4c5a-9357-1bd6ca4bb5d4",
+ InitializationCell->True],
+Cell[8074115, 142651, 7635, 153, 70, "Output",ExpressionUUID->"0f456bdb-3221-478a-b088-6e3a60a362c2"],
+Cell[8081753, 142806, 2159, 43, 70, "Output",ExpressionUUID->"cde37d03-185c-4915-928f-78b487b78b99"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[8083949, 142854, 3549, 82, 257, "Input",ExpressionUUID->"daa984c2-5086-443a-bf30-942881dce2c8",
+ InitializationCell->True],
+Cell[8087501, 142938, 7566, 151, 70, "Output",ExpressionUUID->"d0e3a4a0-2639-47d0-91cd-10185a670598"],
+Cell[8095070, 143091, 2094, 41, 70, "Output",ExpressionUUID->"f74a838c-1586-426d-9ec7-832fbb01ebbe"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[8097201, 143137, 8739, 186, 367, "Input",ExpressionUUID->"3a9e658c-3253-4a18-8d7e-72563d7c2845"],
+Cell[8105943, 143325, 4404041, 76192, 1895, "Output",ExpressionUUID->"dadd61c9-36f9-4b17-b299-07f5f6ed3e56"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[12510021, 219522, 6640, 161, 367, "Input",ExpressionUUID->"3ecf4148-e1e5-42fd-87df-352cf97e9c78"],
+Cell[12516664, 219685, 210989, 3691, 387, "Output",ExpressionUUID->"8b0a34ff-63a6-4ad2-8e7f-a4859bac6620"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[12727702, 223382, 148, 3, 53, "Section",ExpressionUUID->"e30f1247-4a04-47f3-a04c-c8f1216198aa"],
+Cell[CellGroupData[{
+Cell[12727875, 223389, 169, 3, 54, "Subsection",ExpressionUUID->"a2bc718a-cb8b-495a-910a-51d4ee1d2efe"],
+Cell[CellGroupData[{
+Cell[12728069, 223396, 4141, 99, 278, "Input",ExpressionUUID->"934d17bf-e5ea-498d-8540-17002062e881",
+ InitializationCell->True],
+Cell[12732213, 223497, 5190, 112, 70, "Output",ExpressionUUID->"8da6fee0-11ab-4ec0-a7d2-0a456a87de93"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[12737440, 223614, 4252, 97, 257, "Input",ExpressionUUID->"0885d563-94b0-4b57-97f4-2c6aec2f8795",
+ InitializationCell->True],
+Cell[12741695, 223713, 4306, 90, 70, "Output",ExpressionUUID->"50d69143-b340-4e71-ad91-9500e74ab1d3"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[12746038, 223808, 9670, 211, 682, "Input",ExpressionUUID->"6e0bf562-5aa6-452f-b6fb-9502e21cd49a"],
+Cell[12755711, 224021, 644770, 11703, 405, "Output",ExpressionUUID->"3f76b1d1-8c92-48e6-82d7-c7b922e359e9"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[13400530, 235730, 167, 3, 38, "Subsection",ExpressionUUID->"eca95258-cde2-487a-9f76-1e8d5adf7cd8"],
+Cell[CellGroupData[{
+Cell[13400722, 235737, 3994, 96, 278, "Input",ExpressionUUID->"223dd076-11c6-4e21-adfd-47ec45d93ecb",
+ InitializationCell->True],
+Cell[13404719, 235835, 5731, 115, 130, "Output",ExpressionUUID->"bd937af9-d614-4968-97c3-26618373f6f2"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[13410487, 235955, 4303, 98, 257, "Input",ExpressionUUID->"6d1a3678-ebb0-496f-b10d-b946f08cc7b2",
+ InitializationCell->True],
+Cell[13414793, 236055, 4347, 91, 130, "Output",ExpressionUUID->"f1d99c6b-9d9a-4c57-9c89-35a4b19a3987"]
+}, Open  ]],
+Cell[13419155, 236149, 9593, 210, 682, "Input",ExpressionUUID->"c8108385-10fb-481f-ba17-8a16f9de1ad2"]
 }, Open  ]]
 }, Open  ]]
 }, Open  ]],
 Cell[CellGroupData[{
-Cell[13614734, 240856, 198, 4, 98, "Title",ExpressionUUID->"36ec1eb5-e4bd-4b1e-b2ab-6a49f99064b6"],
+Cell[13428809, 236366, 198, 4, 98, "Title",ExpressionUUID->"36ec1eb5-e4bd-4b1e-b2ab-6a49f99064b6"],
 Cell[CellGroupData[{
-Cell[13614957, 240864, 159, 3, 67, "Section",ExpressionUUID->"83c3d3fe-bd0d-4a98-b6f0-3b45e486e87b"],
+Cell[13429032, 236374, 159, 3, 67, "Section",ExpressionUUID->"83c3d3fe-bd0d-4a98-b6f0-3b45e486e87b"],
 Cell[CellGroupData[{
-Cell[13615141, 240871, 6018, 151, 177, "Input",ExpressionUUID->"0652676b-df64-4e70-bb70-a15f0a6fc92f"],
-Cell[13621162, 241024, 18435, 376, 1245, "Output",ExpressionUUID->"9b4e722d-6ffd-40f0-8931-924adb7220d1"]
+Cell[13429216, 236381, 6018, 151, 177, "Input",ExpressionUUID->"0652676b-df64-4e70-bb70-a15f0a6fc92f"],
+Cell[13435237, 236534, 18435, 376, 1245, "Output",ExpressionUUID->"9b4e722d-6ffd-40f0-8931-924adb7220d1"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[13639646, 241406, 211, 4, 53, "Section",ExpressionUUID->"4e63b2ba-f0e9-4db6-9c25-7becd90e5558"],
+Cell[13453721, 236916, 211, 4, 53, "Section",ExpressionUUID->"4e63b2ba-f0e9-4db6-9c25-7becd90e5558"],
 Cell[CellGroupData[{
-Cell[13639882, 241414, 6070, 152, 177, "Input",ExpressionUUID->"d1a34d38-9472-48f3-91d9-b324047a07c2"],
-Cell[13645955, 241568, 18478, 377, 1245, "Output",ExpressionUUID->"da18bef0-28b6-4d69-abf1-72b177d15930"]
+Cell[13453957, 236924, 6070, 152, 177, "Input",ExpressionUUID->"d1a34d38-9472-48f3-91d9-b324047a07c2"],
+Cell[13460030, 237078, 18478, 377, 1245, "Output",ExpressionUUID->"da18bef0-28b6-4d69-abf1-72b177d15930"]
 }, Open  ]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[13664482, 241951, 236, 4, 53, "Section",ExpressionUUID->"6047ff2b-9735-42d5-a567-106730f18bd3"],
-Cell[13664721, 241957, 6075, 153, 177, "Input",ExpressionUUID->"9489af81-bfa8-4e79-aef3-7e81ce08044d"]
+Cell[13478557, 237461, 236, 4, 53, "Section",ExpressionUUID->"6047ff2b-9735-42d5-a567-106730f18bd3"],
+Cell[13478796, 237467, 6075, 153, 177, "Input",ExpressionUUID->"9489af81-bfa8-4e79-aef3-7e81ce08044d"]
 }, Closed]]
 }, Closed]],
 Cell[CellGroupData[{
-Cell[13670845, 242116, 203, 4, 72, "Title",ExpressionUUID->"9fb0ce88-036b-4aaf-98dd-069443cb99a4"],
-Cell[13671051, 242122, 934, 24, 68, "Input",ExpressionUUID->"213df3fe-4089-4210-bf02-8173ea32533a",
+Cell[13484920, 237626, 203, 4, 72, "Title",ExpressionUUID->"9fb0ce88-036b-4aaf-98dd-069443cb99a4"],
+Cell[CellGroupData[{
+Cell[13485148, 237634, 938, 25, 68, "Input",ExpressionUUID->"213df3fe-4089-4210-bf02-8173ea32533a",
  InitializationCell->True],
+Cell[13486089, 237661, 160, 3, 70, "Output",ExpressionUUID->"b2cb5b95-2871-47bf-b5c0-a49ac0e53aed"]
+}, Open  ]],
 Cell[CellGroupData[{
-Cell[13672010, 242150, 209, 4, 67, "Section",ExpressionUUID->"3c5c79d9-27c1-449c-aac0-357f2c893350"],
+Cell[13486286, 237669, 209, 4, 67, "Section",ExpressionUUID->"3c5c79d9-27c1-449c-aac0-357f2c893350"],
 Cell[CellGroupData[{
-Cell[13672244, 242158, 157, 3, 53, "Subsection",ExpressionUUID->"167860cd-18b0-47ba-8567-ab311dbfedaf"],
+Cell[13486520, 237677, 157, 3, 53, "Subsection",ExpressionUUID->"167860cd-18b0-47ba-8567-ab311dbfedaf"],
 Cell[CellGroupData[{
-Cell[13672426, 242165, 2486, 56, 93, "Input",ExpressionUUID->"8dbb67bb-8e8c-4d42-bce8-f8f4c87784d4"],
-Cell[13674915, 242223, 11422, 234, 1837, "Output",ExpressionUUID->"d8227114-0e36-4dfa-aee2-71f28efe0607"]
+Cell[13486702, 237684, 2486, 56, 93, "Input",ExpressionUUID->"8dbb67bb-8e8c-4d42-bce8-f8f4c87784d4"],
+Cell[13489191, 237742, 11422, 234, 1837, "Output",ExpressionUUID->"d8227114-0e36-4dfa-aee2-71f28efe0607"]
 }, Open  ]]
 }, Open  ]]
 }, Closed]]