(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 610402, 18796] NotebookOptionsPosition[ 554211, 17441] NotebookOutlinePosition[ 554551, 17456] CellTagsIndexPosition[ 554508, 17453] WindowFrame->Normal ContainsDynamic->False*) (* Beginning of Notebook Content *) Notebook[{ Cell["\<\ Pensieve Header: An improved MVA program with Jana Archibald.\[LineSeparator]\ \ \>", "Text", CellChangeTimes->{{3.4456901960708337`*^9, 3.4456902303730345`*^9}, 3.4462965412434*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"<<", " ", "KnotTheory`"}]], "Input"], Cell[BoxData["\<\"Loading KnotTheory` version of January 18, 2009, \ 13:53:34.0144.\\nRead more at http://katlas.org/wiki/KnotTheory.\"\>"], \ "Print", CellChangeTimes->{3.445686723594116*^9, 3.445687413772092*^9, 3.4456878803859053`*^9, 3.4456901340804076`*^9, 3.4456916353878775`*^9, 3.4456997351436*^9, 3.4456997761726*^9, 3.4462891716834*^9, 3.4462892652284*^9, 3.4462962332024*^9, 3.4462965541574*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"MultivariableAlexander2", "[", RowBox[{"PD", "[", RowBox[{"Loop", "[", "_", "]"}], "]"}], "]"}], ":=", RowBox[{ RowBox[{"1", "/", RowBox[{"(", RowBox[{ RowBox[{"#", "[", "1", "]"}], "-", "1"}], ")"}]}], "&"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"MultivariableAlexander2", "[", "K_", "]"}], "/;", RowBox[{ RowBox[{"Head", "[", "K", "]"}], "=!=", "PD"}]}], ":=", RowBox[{"MultivariableAlexander2", "[", RowBox[{"PD", "[", "K", "]"}], "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"MultivariableAlexander2", "[", "pd_PD", "]"}], ":=", RowBox[{ RowBox[{"MultivariableAlexander2", "[", "pd", "]"}], "=", " ", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "l", ",", " ", "mat", ",", " ", "skel", ",", " ", "pd1", ",", " ", "G", ",", " ", "t", ",", " ", "arcs", ",", " ", "path", ",", " ", "i", ",", "j", ",", "k", ",", " ", "M", ",", " ", "emb", ",", " ", "done", ",", " ", "pd2", ",", " ", "rot", ",", " ", "place"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"l", "=", RowBox[{"Length", "[", "pd", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"mat", "=", RowBox[{"Table", "[", RowBox[{"0", ",", " ", RowBox[{"{", RowBox[{"2", "*", "l"}], "}"}], ",", " ", RowBox[{"{", RowBox[{"2", "*", "l"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"skel", "=", RowBox[{"Skeleton", "[", "pd", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pd1", "=", RowBox[{"List", "@@", "pd"}]}], ";", "\[IndentingNewLine]", RowBox[{"G", "=", TagBox[ RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"2", "*", " ", "l"}], "}"}], ",", RowBox[{"{", "l", "}"}]}], "]"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}], ";", "\[IndentingNewLine]", RowBox[{"pd1", "//.", RowBox[{ RowBox[{"X", "[", RowBox[{"a_", ",", " ", "b_", ",", " ", "c_", ",", " ", "d_"}], "]"}], "\[RuleDelayed]", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"d", "\[Equal]", RowBox[{"b", "+", "1"}]}], "||", RowBox[{ RowBox[{"b", "-", "d"}], ">", "1"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"c", ",", "a"}], "]"}], "]"}], " ", "=", RowBox[{"-", RowBox[{"t", "[", "b", "]"}]}]}], ";", " ", RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"c", ",", "b"}], "]"}], "]"}], "=", RowBox[{ RowBox[{"t", "[", "a", "]"}], "-", "1"}]}], ";", " ", RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"c", ",", "c"}], "]"}], "]"}], "=", "1"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"c", ",", "a"}], "]"}], "]"}], "=", RowBox[{"-", "1"}]}], ";", RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"c", ",", "b"}], "]"}], "]"}], "=", RowBox[{"1", "-", RowBox[{"t", "[", "a", "]"}]}]}], " ", ";", " ", RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"c", ",", "c"}], "]"}], "]"}], "=", RowBox[{"t", "[", "b", "]"}]}]}], "}"}]}], "\[IndentingNewLine]", "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"arcs", "=", RowBox[{ RowBox[{ RowBox[{"Times", "@@", "pd"}], "/.", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"X", "[", RowBox[{"i_", ",", "j_", ",", "k_", ",", "l_"}], "]"}], "/;", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"l", "-", "j"}], "\[Equal]", "1"}], "||", RowBox[{ RowBox[{"j", "-", "l"}], ">", "1"}]}], ")"}]}], "\[RuleDelayed]", RowBox[{ RowBox[{"path", "[", "k", "]"}], RowBox[{"path", "[", "i", "]"}], " ", RowBox[{"path", "[", RowBox[{"j", ",", "l"}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"X", "[", RowBox[{"i_", ",", "j_", ",", "k_", ",", "l_"}], "]"}], "/;", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"j", "-", "l"}], "\[Equal]", "1"}], "||", RowBox[{ RowBox[{"l", "-", "j"}], ">", "1"}]}], ")"}]}], "\[RuleDelayed]", RowBox[{ RowBox[{"path", "[", "k", "]"}], RowBox[{"path", "[", "i", "]"}], " ", RowBox[{"path", "[", RowBox[{"l", ",", "j"}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"P", "[", RowBox[{"i_", ",", "j_"}], "]"}], "\[RuleDelayed]", RowBox[{"path", "[", RowBox[{"i", ",", "j"}], "]"}]}]}], "\[IndentingNewLine]", "}"}]}], "//.", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"path", "[", RowBox[{"a__", ",", "i_"}], "]"}], RowBox[{"path", "[", RowBox[{"i_", ",", "b__"}], "]"}]}], "\[RuleDelayed]", RowBox[{"path", "[", RowBox[{"a", ",", "i", ",", "b"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"path", "[", RowBox[{"a__", ",", "i_"}], "]"}], RowBox[{"path", "[", RowBox[{"b__", ",", "i_"}], "]"}]}], "\[RuleDelayed]", RowBox[{"Join", "[", RowBox[{ RowBox[{"path", "[", RowBox[{"a", ",", "i"}], "]"}], ",", RowBox[{"Reverse", "[", RowBox[{"path", "[", "b", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"path", "[", RowBox[{"i_", ",", "a__"}], "]"}], RowBox[{"path", "[", RowBox[{"i_", ",", "b__"}], "]"}]}], "\[RuleDelayed]", RowBox[{"Join", "[", RowBox[{ RowBox[{"Reverse", "[", RowBox[{"path", "[", "b", "]"}], "]"}], ",", RowBox[{"path", "[", RowBox[{"i", ",", "a"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"path", "[", RowBox[{"a__", ",", "i_"}], "]"}], RowBox[{"path", "[", "i_", "]"}]}], "\[RuleDelayed]", RowBox[{"path", "[", RowBox[{"a", ",", "i"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"path", "[", RowBox[{"i_", ",", "a__"}], "]"}], RowBox[{"path", "[", "i_", "]"}]}], "\[RuleDelayed]", RowBox[{"path", "[", RowBox[{"a", ",", "i"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"path", "[", "i_", "]"}], RowBox[{"path", "[", "i_", "]"}]}], "\[RuleDelayed]", RowBox[{"path", "[", "i", "]"}]}]}], "\[IndentingNewLine]", "}"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "arcs", "]"}], "===", "l"}], ",", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"2", "*", "l"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"G", "=", RowBox[{"ReplacePart", "[", RowBox[{"G", ",", "1", ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"First", "[", RowBox[{"First", "[", RowBox[{"Position", "[", RowBox[{"arcs", ",", "i"}], "]"}], "]"}], "]"}]}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"mat", "=", RowBox[{"mat", "/.", " ", RowBox[{ RowBox[{"t", "[", "a_", "]"}], "\[RuleDelayed]", " ", RowBox[{"t", "[", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", "a"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "arcs", "]"}], "===", "l"}], ",", "\[IndentingNewLine]", RowBox[{"M", "=", RowBox[{"Factor", "[", RowBox[{"Simplify", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Det", "[", "\[IndentingNewLine]", RowBox[{"Delete", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Transpose", "[", RowBox[{"Delete", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Transpose", "[", "G", "]"}], ".", "mat", ".", "G"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Position", "[", RowBox[{"arcs", ",", RowBox[{"pd1", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Position", "[", RowBox[{"arcs", ",", RowBox[{"pd1", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "]"}], "/", RowBox[{"(", " ", RowBox[{ RowBox[{"t", "[", " ", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", RowBox[{"pd1", "[", RowBox[{"[", RowBox[{"1", ",", "3"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], "-", "1"}], ")"}]}], "\[IndentingNewLine]", "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"M", "=", "0"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"emb", "=", RowBox[{"Table", "[", RowBox[{"Null", ",", RowBox[{"{", RowBox[{"Length", "[", "pd", "]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"done", "=", RowBox[{"Table", "[", RowBox[{"Null", ",", " ", RowBox[{"{", RowBox[{"2", "*", RowBox[{"Length", "[", "pd", "]"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"emb", "[", RowBox[{"[", "1", "]"}], "]"}], "=", "0"}], ";", "\[IndentingNewLine]", RowBox[{"pd2", "=", "pd"}], ";", "\[IndentingNewLine]", RowBox[{"rot", "=", RowBox[{"Table", "[", RowBox[{"0", ",", " ", RowBox[{"{", RowBox[{"Length", "[", "skel", "]"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"place", "[", RowBox[{"i_", ",", " ", "a_"}], "]"}], " ", ":=", " ", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{ "ni", ",", " ", "na", ",", " ", "arc", ",", " ", "dir", ",", " ", "oparc"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"arc", "=", RowBox[{"pd2", "[", RowBox[{"[", RowBox[{"i", ",", "a"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{"ni", ",", " ", "na"}], "}"}], "}"}], "=", RowBox[{"Complement", "[", RowBox[{ RowBox[{"Position", "[", RowBox[{"pd2", ",", "arc"}], "]"}], ",", " ", RowBox[{"{", RowBox[{"{", RowBox[{"i", ",", "a"}], "}"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"emb", "[", RowBox[{"[", "ni", "]"}], "]"}], "===", "Null"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"emb", "[", RowBox[{"[", "ni", "]"}], "]"}], "=", RowBox[{"3", "-", "a", "+", RowBox[{"emb", "[", RowBox[{"[", "i", "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"pd2", "[", RowBox[{"[", "ni", "]"}], "]"}], "=", RowBox[{"RotateLeft", "[", RowBox[{ RowBox[{"pd1", "[", RowBox[{"[", "ni", "]"}], "]"}], ",", " ", RowBox[{"na", "-", "1"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"place", "[", RowBox[{"ni", ",", " ", "#"}], "]"}], "&"}], " ", "/@", " ", RowBox[{"{", RowBox[{"2", ",", "3", ",", "4"}], "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "Else", " ", "*)"}], " ", RowBox[{ RowBox[{"oparc", "=", RowBox[{ RowBox[{"RotateLeft", "[", RowBox[{ RowBox[{"pd2", "[", RowBox[{"[", "i", "]"}], "]"}], ",", " ", "2"}], "]"}], "[", RowBox[{"[", "a", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"done", "[", RowBox[{"[", "arc", "]"}], "]"}], "===", "Null"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"done", "[", RowBox[{"[", "arc", "]"}], "]"}], "=", "1"}], ";", "\[IndentingNewLine]", RowBox[{"dir", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"arc", "-", "oparc"}], "\[Equal]", "1"}], " ", "||", " ", RowBox[{ RowBox[{"arc", "-", "oparc"}], "<", RowBox[{"-", "1"}]}]}], ",", " ", "1", ",", " ", RowBox[{"-", "1"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"rot", "[", RowBox[{"[", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", " ", "arc"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], "]"}], " ", "+=", " ", RowBox[{"dir", "*", RowBox[{"(", RowBox[{ RowBox[{"emb", "[", RowBox[{"[", "ni", "]"}], "]"}], "-", RowBox[{"emb", "[", RowBox[{"[", "i", "]"}], "]"}], "+", "a", "-", "na", "-", "2"}], ")"}]}]}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"place", "[", RowBox[{"1", ",", "#"}], "]"}], "&"}], " ", "/@", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"k", "=", RowBox[{ RowBox[{"-", "rot"}], "/", "4"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "l"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"k", "=", RowBox[{"ReplacePart", "[", RowBox[{"k", ",", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"k", "[", RowBox[{"[", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", RowBox[{"pd", "[", RowBox[{"[", RowBox[{"j", ",", "2"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", RowBox[{"pd", "[", RowBox[{"[", RowBox[{"j", ",", "2"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "k", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"M", "*=", RowBox[{ RowBox[{"t", "[", "i", "]"}], "^", RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{"1", "/", "2"}], ")"}], "*", RowBox[{"k", "[", RowBox[{"[", "i", "]"}], "]"}]}], ")"}]}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"pd", "[", RowBox[{"[", RowBox[{"1", ",", "4"}], "]"}], "]"}], "\[Equal]", RowBox[{ RowBox[{"pd", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "+", "1"}]}], "||", RowBox[{ RowBox[{ RowBox[{"pd", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}], "-", RowBox[{"pd", "[", RowBox[{"[", RowBox[{"1", ",", "4"}], "]"}], "]"}]}], ">", "1"}]}], ",", "\[IndentingNewLine]", RowBox[{"M", "*=", RowBox[{ RowBox[{"t", "[", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", RowBox[{"pd", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}], "*", RowBox[{"t", "[", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", RowBox[{"pd", "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"M", "*=", RowBox[{"t", "[", RowBox[{ RowBox[{"Position", "[", RowBox[{"skel", ",", RowBox[{"pd", "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{"M", "/.", RowBox[{"t", "\[Rule]", "#"}]}], "]"}], "&"}]}]}], "\[IndentingNewLine]", "]"}]}]}]}], "Input", CellChangeTimes->{{3.4456863470997696`*^9, 3.445686350250455*^9}, { 3.445686789122563*^9, 3.4456867930771675`*^9}, {3.4456868491035643`*^9, 3.4456871043260393`*^9}, {3.4456871383226395`*^9, 3.445687391261343*^9}, { 3.445687771882739*^9, 3.4456877816941957`*^9}, {3.4456878616053114`*^9, 3.445687873694149*^9}, 3.4456900293813887`*^9, {3.4456906022063975`*^9, 3.4456906086331854`*^9}, {3.445690650767084*^9, 3.4456906546356363`*^9}, { 3.445690846098556*^9, 3.4456908643964176`*^9}, {3.4456908966087656`*^9, 3.4456909001029863`*^9}, {3.445691214395668*^9, 3.445691216579556*^9}, { 3.4456995172335997`*^9, 3.4456995185706*^9}, {3.4456995568276*^9, 3.4456995727146*^9}, {3.4456996161566*^9, 3.4456997212506*^9}, { 3.4456997656466*^9, 3.4456997658255997`*^9}, {3.4462961781694*^9, 3.4462961985034*^9}, {3.4462965235123997`*^9, 3.4462965251233997`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"MV", "=", "MultivariableAlexander"}], ";", " ", RowBox[{"MV2", "=", "MultivariableAlexander2"}]}]], "Input"], Cell[BoxData["MultivariableAlexander2"], "Output", CellChangeTimes->{3.4456901343923874`*^9, 3.445691635668663*^9, 3.4456997353316*^9, 3.4456997763366003`*^9, 3.4462891829304*^9, 3.4462892653613997`*^9, 3.4462962402244*^9, 3.4462965543094*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"MV2", "[", RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", "t", "]"}], ",", RowBox[{ RowBox[{"MV", "[", RowBox[{"Loop", "[", "1", "]"}], "]"}], "[", "t", "]"}]}], "}"}], "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"MV2", "[", RowBox[{"Knot", "[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "[", "t", "]"}], ",", RowBox[{ RowBox[{"MV", "[", RowBox[{"Knot", "[", RowBox[{"3", ",", "1"}], "]"}], "]"}], "[", "t", "]"}]}], "}"}], "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"MV2", "[", RowBox[{"Link", "[", "\"\\"", "]"}], "]"}], "[", "t", "]"}], ",", RowBox[{ RowBox[{"MV", "[", RowBox[{"Link", "[", "\"\\"", "]"}], "]"}], "[", "t", "]"}]}], "}"}]}], "Input", CellChangeTimes->{{3.4462962481074*^9, 3.4462963000704*^9}, { 3.4462963444904003`*^9, 3.4462963652293997`*^9}, {3.4462963957794*^9, 3.4462964692594*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ FractionBox["1", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"t", "[", "1", "]"}]}]], ",", "1"}], "}"}]], "Output", CellChangeTimes->{{3.4462962567074003`*^9, 3.4462962754894*^9}, { 3.4462963393764*^9, 3.4462963656644*^9}, {3.4462964010024*^9, 3.4462964224863997`*^9}, {3.4462964588814*^9, 3.4462964699364*^9}, { 3.4462965324424*^9, 3.4462965543384*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"KnotTheory", "::", "\<\"loading\"\>"}], RowBox[{ ":", " "}], "\<\"Loading precomputed data in \ \\!\\(\\\"PD4Knots`\\\"\\).\"\>"}]], "Message", "MSG", CellChangeTimes->{3.4462965557334003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"KnotTheory", "::", "\<\"credits\"\>"}], RowBox[{ ":", " "}], "\<\"\\!\\(\\\"The minimum braids representing the knots with \ up to 10 crossings were provided by Thomas Gittings. See \ arXiv:math.GT/0401051.\\\"\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.4462965560973997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"KnotTheory", "::", "\<\"credits\"\>"}], RowBox[{ ":", " "}], "\<\"\\!\\(\\\"The multivariable Alexander program was written \ by Dan Carney at the University of Toronto in the summer of \ 2005.\\\"\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.4462965561024*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ FractionBox[ RowBox[{"1", "-", RowBox[{"t", "[", "1", "]"}], "+", SuperscriptBox[ RowBox[{"t", "[", "1", "]"}], "2"]}], RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"t", "[", "1", "]"}]}], ")"}], " ", SqrtBox[ RowBox[{"t", "[", "1", "]"}]]}]], ",", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"t", "[", "1", "]"}], "-", SuperscriptBox[ RowBox[{"t", "[", "1", "]"}], "2"]}]}], "}"}]], "Output", CellChangeTimes->{{3.4462962567074003`*^9, 3.4462962754894*^9}, { 3.4462963393764*^9, 3.4462963656644*^9}, {3.4462964010024*^9, 3.4462964224863997`*^9}, {3.4462964588814*^9, 3.4462964699364*^9}, { 3.4462965324424*^9, 3.4462965561064*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"KnotTheory", "::", "\<\"loading\"\>"}], RowBox[{ ":", " "}], "\<\"Loading precomputed data in \ \\!\\(\\\"PD4Links`\\\"\\).\"\>"}]], "Message", "MSG", CellChangeTimes->{3.4462965561094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"KnotTheory", "::", "\<\"loading\"\>"}], RowBox[{ ":", " "}], "\<\"Loading precomputed data in \ \\!\\(\\\"MultivariableAlexander4Links`\\\"\\).\"\>"}]], "Message", "MSG", CellChangeTimes->{3.4462965562944*^9}], Cell[BoxData[ RowBox[{"{", RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", RowBox[{"t", "[", "1", "]"}]}], "+", RowBox[{"t", "[", "2", "]"}], "-", RowBox[{ RowBox[{"t", "[", "1", "]"}], " ", RowBox[{"t", "[", "2", "]"}]}], "+", RowBox[{"t", "[", "3", "]"}], "-", RowBox[{ RowBox[{"t", "[", "1", "]"}], " ", RowBox[{"t", "[", "3", "]"}]}], "-", RowBox[{"2", " ", RowBox[{"t", "[", "2", "]"}], " ", RowBox[{"t", "[", "3", "]"}]}], "+", RowBox[{ RowBox[{"t", "[", "1", "]"}], " ", RowBox[{"t", "[", "2", "]"}], " ", RowBox[{"t", "[", "3", "]"}]}]}], RowBox[{ SqrtBox[ RowBox[{"t", "[", "1", "]"}]], " ", SqrtBox[ RowBox[{"t", "[", "2", "]"}]], " ", SqrtBox[ RowBox[{"t", "[", "3", "]"}]]}]], ",", RowBox[{"1", "-", RowBox[{"t", "[", "1", "]"}], "-", RowBox[{"t", "[", "2", "]"}], "+", RowBox[{"2", " ", RowBox[{"t", "[", "1", "]"}], " ", RowBox[{"t", "[", "2", "]"}]}], "-", RowBox[{"2", " ", RowBox[{"t", "[", "3", "]"}]}], "+", RowBox[{ RowBox[{"t", "[", "1", "]"}], " ", RowBox[{"t", "[", "3", "]"}]}], "+", RowBox[{ RowBox[{"t", "[", "2", "]"}], " ", RowBox[{"t", "[", "3", "]"}]}], "-", RowBox[{ RowBox[{"t", "[", "1", "]"}], " ", RowBox[{"t", "[", "2", "]"}], " ", RowBox[{"t", "[", "3", "]"}]}]}]}], "}"}]], "Output", CellChangeTimes->{{3.4462962567074003`*^9, 3.4462962754894*^9}, { 3.4462963393764*^9, 3.4462963656644*^9}, {3.4462964010024*^9, 3.4462964224863997`*^9}, {3.4462964588814*^9, 3.4462964699364*^9}, { 3.4462965324424*^9, 3.4462965565864*^9}}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"test1", "[", "L_", "]"}], " ", ":=", " ", RowBox[{"(", "\[IndentingNewLine]", RowBox[{ RowBox[{"mv", "=", RowBox[{ RowBox[{"MV", "[", "L", "]"}], "[", "t", "]"}]}], ";", " ", RowBox[{"mv2", "=", RowBox[{"First", "[", RowBox[{ RowBox[{"MV2", "[", "L", "]"}], "[", "t", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Or", " ", "@@", " ", RowBox[{"Map", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"mv1", "=", RowBox[{"mv", " ", "/.", " ", RowBox[{ RowBox[{"t", "[", "i_", "]"}], " ", "\[RuleDelayed]", " ", RowBox[{"t", "[", RowBox[{"#", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}]}]}], ";", " ", RowBox[{ RowBox[{"Head", "[", RowBox[{"Expand", "[", RowBox[{"Simplify", "[", RowBox[{"mv2", "/", "mv1"}], "]"}], "]"}], "]"}], "=!=", "Plus"}]}], ")"}], "&"}], ",", "\[IndentingNewLine]", RowBox[{"Permutations", "[", RowBox[{"Range", "[", RowBox[{"Length", "[", RowBox[{"Skeleton", "[", "L", "]"}], "]"}], "]"}], "]"}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", ")"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"#", " ", "->", RowBox[{"test1", "[", "#", "]"}]}], "]"}], "&"}], " ", "/@", " ", RowBox[{"AllLinks", "[", "9", "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.445688878964438*^9, 3.4456888884641075`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "1"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965567104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "2"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965567594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "3"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965568154*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "4"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965568784*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "5"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965569634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "6"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965570484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "7"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965571064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "8"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965571624002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "9"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965572293997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "10"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965572844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "11"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965573403997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "12"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965574154*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "13"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965574723997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "14"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965575313997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "15"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965575824003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "16"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965576504*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "17"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965576994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "18"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965577414*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "19"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965578024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "20"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965579044*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "21"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965579964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "22"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965580804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "23"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965581584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "24"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965582444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "25"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965583014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "26"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965583794003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "27"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965584414*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "28"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965585123997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "29"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965585794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "30"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965586384*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "31"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965587094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "32"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965587944*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "33"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965588484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "34"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965589234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "35"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965589824*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "36"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965590464*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "37"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965591644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "38"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965592363997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "39"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965593174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "40"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965593844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "41"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965594374*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "42"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965594944*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "43"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965596294003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "44"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965598964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "45"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965599994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "46"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965601004*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "47"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965602754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "48"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965604304*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "49"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965605774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "50"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965608314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "51"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965610804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "52"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965611764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "53"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965612354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "54"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965613244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "55"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965616624002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "1"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965617094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "2"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965617634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "3"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965617754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "4"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965618234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "5"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965618324003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "6"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965618844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "7"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965618954*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "8"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965619644003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "9"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965619764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "10"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965620254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "11"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965620794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "12"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965621604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "13"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965622094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "14"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965622614*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "15"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965622684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "16"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965623164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "17"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965623954*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "18"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965624024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "19"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965624514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "20"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965625383997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "21"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965626144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "22"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965627064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "23"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965627924*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "24"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965629463997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "25"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965629924*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "26"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965630674*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"First", "::", "\<\"normal\"\>"}], RowBox[{ ":", " "}], "\<\"Nonatomic expression expected at position \\!\\(1\\) in \ \\!\\(First[0]\\). \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\ \\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/normal\\\", ButtonNote -> \ \\\"First::normal\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.44568889077273*^9, 3.4456901355779114`*^9, 3.4456916366358137`*^9, 3.4456997358466*^9, 3.4456997776646*^9, 3.4462891853104*^9, 3.4462892658314*^9, 3.4462965632334003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Power", "::", "\<\"infy\"\>"}], RowBox[{ ":", " "}], "\<\"Infinite expression \\!\\(1\\/0\\) encountered. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/infy\\\", \ ButtonNote -> \\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.44568889077273*^9, 3.4456901355779114`*^9, 3.4456916366358137`*^9, 3.4456997358466*^9, 3.4456997776646*^9, 3.4462891853104*^9, 3.4462892658314*^9, 3.4462965633554*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Power", "::", "\<\"infy\"\>"}], RowBox[{ ":", " "}], "\<\"Infinite expression \\!\\(1\\/0\\) encountered. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/infy\\\", \ ButtonNote -> \\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.44568889077273*^9, 3.4456901355779114`*^9, 3.4456916366358137`*^9, 3.4456997358466*^9, 3.4456997776646*^9, 3.4462891853104*^9, 3.4462892658314*^9, 3.4462965633634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Power", "::", "\<\"infy\"\>"}], RowBox[{ ":", " "}], "\<\"Infinite expression \\!\\(1\\/0\\) encountered. \ \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \ ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/infy\\\", \ ButtonNote -> \\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.44568889077273*^9, 3.4456901355779114`*^9, 3.4456916366358137`*^9, 3.4456997358466*^9, 3.4456997776646*^9, 3.4462891853104*^9, 3.4462892658314*^9, 3.4462965633714*^9}], Cell[BoxData[ RowBox[{ RowBox[{"General", "::", "\<\"stop\"\>"}], RowBox[{ ":", " "}], "\<\"Further output of \\!\\(Power :: \\\"infy\\\"\\) will be \ suppressed during this calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\ \", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \ \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.44568889077273*^9, 3.4456901355779114`*^9, 3.4456916366358137`*^9, 3.4456997358466*^9, 3.4456997776646*^9, 3.4462891853104*^9, 3.4462892658314*^9, 3.4462965634214*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "27"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965634284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "28"}], "]"}], "\[Rule]", "True"}]], "Print", CellChangeTimes->{3.4456888901487775`*^9, 3.4456901362954655`*^9, 3.445691638211333*^9, 3.4456997367836*^9, 3.4456997782066*^9, 3.4462891858624*^9, 3.4462892653894*^9, 3.4462965634774*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"MV", "[", RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "27"}], "]"}], "]"}], "[", "t", "]"}], ",", " ", RowBox[{ RowBox[{"MV2", "[", RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "27"}], "]"}], "]"}], "[", "t", "]"}]}], "}"}]], "Input", CellChangeTimes->{{3.4456889067614994`*^9, 3.4456889229998503`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}]], "Output", CellChangeTimes->{3.445688923436617*^9, 3.4456901441729603`*^9, 3.4456916451685762`*^9, 3.4456997417586*^9, 3.4456997850945997`*^9, 3.4462891947344*^9, 3.4462892659054003`*^9, 3.4462965635504*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Flip", "[", RowBox[{"X", "[", RowBox[{"i_", ",", "j_", ",", "k_", ",", "l_"}], "]"}], "]"}], " ", ":=", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"l", "\[Equal]", RowBox[{"j", "+", "1"}]}], " ", "||", " ", RowBox[{ RowBox[{"j", "-", "l"}], ">", "1"}]}], ",", " ", RowBox[{"X", "[", RowBox[{"j", ",", "k", ",", "l", ",", "i"}], "]"}], ",", " ", RowBox[{"X", "[", RowBox[{"l", ",", "i", ",", "j", ",", "k"}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"VCube", "[", RowBox[{"pd_", ",", " ", "l_List"}], "]"}], " ", ":=", " ", RowBox[{"Module", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", "f", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Expand", "[", RowBox[{"pd", "*", RowBox[{"Times", " ", "@@", " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"f", "[", "#", "]"}]}], ")"}], "&"}], " ", "/@", " ", "l"}], ")"}]}]}], "]"}], " ", "//.", " ", RowBox[{ RowBox[{"pd1_PD", "*", RowBox[{"f", "[", "i_", "]"}]}], " ", "\[RuleDelayed]", " ", RowBox[{"MapAt", "[", RowBox[{"Flip", ",", " ", "pd1", ",", " ", "i"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}]}], "Input", CellChangeTimes->{{3.445689007810526*^9, 3.4456890168744287`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Series", "[", RowBox[{ RowBox[{ RowBox[{"VCube", "[", RowBox[{ RowBox[{"PD", "[", "#", "]"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", " ", "7"}], "}"}]}], "]"}], " ", "/.", " ", RowBox[{"pd_PD", " ", "\[RuleDelayed]", " ", RowBox[{ RowBox[{"Jones", "[", "pd", "]"}], "[", RowBox[{"E", "^", "x"}], "]"}]}]}], ",", " ", RowBox[{"{", RowBox[{"x", ",", " ", "0", ",", "3"}], "}"}]}], "]"}], "&"}], " ", "/@", RowBox[{"AllLinks", "[", "8", "]"}]}]], "Input", CellChangeTimes->{{3.445689271649629*^9, 3.4456893302075243`*^9}}], Cell[BoxData[ RowBox[{"{", RowBox[{ InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"9", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-9}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"12", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"12", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"12", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"12", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"12", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"3", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {3}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"15", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-15}, 3, 4, 1], Editable->False], ",", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 4, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"12", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"15", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {15}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"12", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"12", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {12}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"15", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {15}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"18", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"18", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"18", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"18", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"18", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"24", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-24}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"36", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {36}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"9", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {9}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"9", " ", SuperscriptBox["x", "3"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {9}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"18", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"18", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"18", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-18}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"24", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-24}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"36", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-36}, 3, 4, 1], Editable->False], ",", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{"36", " ", SuperscriptBox["x", "3"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "x", "]"}], "4"], SeriesData[$CellContext`x, 0, {}, 3, 4, 1], Editable->False]}], SeriesData[$CellContext`x, 0, {-36}, 3, 4, 1], Editable->False]}], "}"}]], "Output", CellChangeTimes->{{3.4456892945798655`*^9, 3.4456893304259076`*^9}, 3.4456901466688004`*^9, 3.4456916480856266`*^9, 3.4456997436726*^9, 3.4456997870966*^9, 3.4462892014504004`*^9, 3.4462892659684*^9, 3.4462965654323997`*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"#", " ", "\[Rule]", " ", RowBox[{"Series", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"VCube", "[", RowBox[{ RowBox[{"PD", "[", "#", "]"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", " ", "7"}], "}"}]}], "]"}], " ", "/.", " ", RowBox[{"pd_PD", " ", "\[RuleDelayed]", " ", RowBox[{ RowBox[{"MV2", "[", "pd", "]"}], "[", "t", "]"}]}]}], " ", "/.", " ", RowBox[{ RowBox[{"t", "[", "i_", "]"}], " ", "\[Rule]", " ", RowBox[{"E", "^", RowBox[{"(", RowBox[{"h", " ", RowBox[{"x", "[", "i", "]"}]}], ")"}]}]}]}], ",", " ", RowBox[{"{", RowBox[{"h", ",", " ", "0", ",", " ", "2"}], "}"}]}], "]"}]}], "]"}], "&"}], " ", "/@", RowBox[{"AllLinks", "[", "8", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.4456893711699734`*^9, 3.4456894181691575`*^9}, 3.4456998909136*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965656113997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965657674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "3"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965659294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "4"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965660854*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "5"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965662524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "6"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965663993998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "7"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965665514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "8"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965667004004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "9"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965668524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "10"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965670104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "11"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965671904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "12"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965673584003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "13"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965675294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "14"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965676823997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "15"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965678534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "16"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965680044003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "17"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965681954*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "18"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965683704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "19"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965685254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "20"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965686934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "Alternating", ",", "21"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965689063997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "NonAlternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965690344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"8", ",", "NonAlternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456894187151155`*^9, 3.4456901470431767`*^9, 3.4456916483352137`*^9, 3.4456997438346*^9, 3.4456997872886*^9, 3.4456998912546*^9, 3.4462892090664*^9, 3.4462892659974003`*^9, 3.4462965691514*^9}] }, Open ]], Cell[BoxData["$Aborted"], "Output", CellChangeTimes->{3.4462965716904*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"#", " ", "\[Rule]", " ", RowBox[{"Series", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"VCube", "[", RowBox[{ RowBox[{"PD", "[", "#", "]"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", " ", "7"}], "}"}]}], "]"}], " ", "/.", " ", RowBox[{"pd_PD", " ", "\[RuleDelayed]", " ", RowBox[{ RowBox[{"MV2", "[", "pd", "]"}], "[", "t", "]"}]}]}], " ", "/.", " ", RowBox[{ RowBox[{"t", "[", "i_", "]"}], " ", "\[Rule]", " ", RowBox[{"E", "^", RowBox[{"(", RowBox[{"h", " ", RowBox[{"x", "[", "i", "]"}]}], ")"}]}]}]}], ",", " ", RowBox[{"{", RowBox[{"h", ",", " ", "0", ",", "2"}], "}"}]}], "]"}]}], "]"}], "&"}], " ", "/@", RowBox[{"AllLinks", "[", "9", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.4456998378185997`*^9, 3.4456999066026*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "3"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "4"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "5"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "6"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "7"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "8"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662324*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "9"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662363997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "10"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662404003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "11"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "12"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662483997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "13"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "14"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "15"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "16"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "17"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "18"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662724*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "19"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "20"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662813997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "21"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "22"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662883997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "23"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662924*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "24"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892662964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "25"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892663464003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "26"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892663884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "27"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892664264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "28"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892664644003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "29"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892665114*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "30"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892665514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "31"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892665973997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "32"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892666394*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "33"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892666794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "34"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892667254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "35"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892667634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "36"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892668054*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "37"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892668574*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "38"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892668934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "39"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892669334*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "40"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892669784*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "41"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"], "+", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "+", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] ($CellContext`x[1]^2 + 2 $CellContext`x[1] $CellContext`x[2] + $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892670193996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "42"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892670684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "43"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892671164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "44"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892671544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "45"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892672104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "46"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892672704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "47"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892673154*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "48"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892673584003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "49"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892674074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "50"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892674524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "51"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892674894*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "52"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892675313997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "53"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892675654*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "54"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892676014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "55"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892676364*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892676724*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892677184*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "3"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892677564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "4"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892677914*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "5"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892678274*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "6"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892678644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "7"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892679084*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "8"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892679454*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "9"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892679834003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "10"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892680264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "11"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[1] $CellContext`x[2]}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892680634003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "12"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892681004*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "13"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892681424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "14"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892681774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "15"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892682134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "16"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{"-", RowBox[{ SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"], " ", SuperscriptBox["h", "2"]}]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, {-$CellContext`x[2]^2}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892682524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "17"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892682964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "18"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892683664*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "19"}], "]"}], "\[Rule]", InterpretationBox[ RowBox[{ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", SuperscriptBox[ RowBox[{"x", "[", "1", "]"}], "2"]}], "-", RowBox[{"2", " ", RowBox[{"x", "[", "1", "]"}], " ", RowBox[{"x", "[", "2", "]"}]}], "-", SuperscriptBox[ RowBox[{"x", "[", "2", "]"}], "2"]}], ")"}], " ", SuperscriptBox["h", "2"]}], "+", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 2, 3, 1], Editable->False]}], SeriesData[$CellContext`h, 0, { Rational[1, 4] (-$CellContext`x[1]^2 - 2 $CellContext`x[1] $CellContext`x[2] - $CellContext`x[2]^2)}, 2, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892684124002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "20"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892684484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "21"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892684904003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "22"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892685264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "23"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892685643997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "24"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892686034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "25"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892686474*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "26"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892686844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "27"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892687234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "28"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4456998471516*^9, 3.4456999069206*^9}, 3.4462892195334*^9, 3.4462892687544003`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"#", " ", "\[Rule]", " ", RowBox[{"Series", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"VCube", "[", RowBox[{ RowBox[{"PD", "[", "#", "]"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", " ", "7", ",", "8"}], "}"}]}], "]"}], " ", "/.", " ", RowBox[{"pd_PD", " ", "\[RuleDelayed]", " ", RowBox[{ RowBox[{"MV2", "[", "pd", "]"}], "[", "t", "]"}]}]}], " ", "/.", " ", RowBox[{ RowBox[{"t", "[", "i_", "]"}], " ", "\[Rule]", " ", RowBox[{"E", "^", RowBox[{"(", RowBox[{"h", " ", RowBox[{"x", "[", "i", "]"}]}], ")"}]}]}]}], ",", " ", RowBox[{"{", RowBox[{"h", ",", " ", "0", ",", "2"}], "}"}]}], "]"}]}], "]"}], "&"}], " ", "/@", RowBox[{"AllLinks", "[", "9", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.4456999145856*^9, 3.4456999202516003`*^9}, 3.4456999514765997`*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892689954*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892691504*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "3"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892692944*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "4"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892694704*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "5"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892696404*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "6"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892698174*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "7"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892699884*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "8"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892701633997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "9"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892703184*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "10"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892704914*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "11"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892706664*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "12"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892708403997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "13"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892710104*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "14"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892711864*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "15"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892713574*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "16"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892715344*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "17"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892717104*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "18"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892718784*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "19"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892720424*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "20"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892721984*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "21"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892723534*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "22"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892725474*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "23"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892727334003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "24"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892729104*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "25"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892730903997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "26"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892732854*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "27"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892734604*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "28"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892736354*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "29"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892737894*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "30"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892739404*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "31"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892741104*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "32"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892742994003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "33"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892744964*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "34"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892746594*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "35"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892748434*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "36"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892749974003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "37"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892751594*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "38"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892753364*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "39"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892755074*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "40"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892756823997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "41"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892758504*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "42"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892760184*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "43"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892762084*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "44"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892763993998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "45"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892765874*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "46"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892767634*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "47"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892769474*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "48"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892771594*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "49"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892773564*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "50"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892775364*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "51"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892777184*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "52"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892778993998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "53"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892780364*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "54"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892782254*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "Alternating", ",", "55"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892784054003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892785554*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892786893997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "3"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892788604*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "4"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892789994*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "5"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892791354*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "6"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892792623997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "7"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892794184*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "8"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892795544*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "9"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892797354*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "10"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892798904*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "11"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892800564003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "12"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892802284*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "13"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892802684*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "14"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892803073997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "15"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892803444*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "16"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892803814*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "17"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892804244003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "18"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892805573997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "19"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892807264*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "20"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892809364*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "21"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892811084003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "22"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892812604*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "23"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892813894*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "24"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892815374002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "25"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892817134*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "26"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892818834*^9} ], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "27"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892820123997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"9", ",", "NonAlternating", ",", "28"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "3"], SeriesData[$CellContext`h, 0, {}, 3, 3, 1], Editable->False]}]], "Print", CellChangeTimes->{3.4456999211426*^9, 3.4456999517886*^9, 3.4462892821554003`*^9}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"#", " ", "\[Rule]", " ", RowBox[{"Series", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"VCube", "[", RowBox[{ RowBox[{"PD", "[", "#", "]"}], ",", " ", RowBox[{"{", RowBox[{"1", ",", "2", ",", "5", ",", " ", "7", ",", "9"}], "}"}]}], "]"}], " ", "/.", " ", RowBox[{"pd_PD", " ", "\[RuleDelayed]", " ", RowBox[{ RowBox[{"MV2", "[", "pd", "]"}], "[", "t", "]"}]}]}], " ", "/.", " ", RowBox[{ RowBox[{"t", "[", "i_", "]"}], " ", "\[Rule]", " ", RowBox[{"E", "^", RowBox[{"(", RowBox[{"h", " ", RowBox[{"x", "[", "i", "]"}]}], ")"}]}]}]}], ",", " ", RowBox[{"{", RowBox[{"h", ",", " ", "0", ",", " ", "3"}], "}"}]}], "]"}]}], "]"}], "&"}], " ", "/@", RowBox[{"AllLinks", "[", "11", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.4457000468346*^9, 3.4457000796546*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892834264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892843124*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "3"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892853384*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "4"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892864034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "5"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892874774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "6"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892885294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "7"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892895804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "8"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892906303997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "9"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892917264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "10"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892928034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "11"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892938114*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "12"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892948543997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "13"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892958694*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "14"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892969653997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "15"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892980494003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "16"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462892991493998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "17"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893001804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "18"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893011994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "19"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893022254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "20"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893032524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "21"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893042883997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "22"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893052854*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "23"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893062804003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "24"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893072904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "25"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893083514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "26"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893093484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "27"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893103434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "28"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893113993998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "29"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893124024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "30"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893134094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "31"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893145044003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "32"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893155264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "33"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893166124*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "34"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893176354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "35"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893186884003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "36"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893197153997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "37"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893207644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "38"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893217794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "39"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893227634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "40"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893237724*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "41"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893248234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "42"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893258524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "43"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893268644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "44"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893279133997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "45"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893290204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "46"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893301514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "47"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893312324*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "48"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893323644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "49"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893333844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "50"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893344214*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "51"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893355084*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "52"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893365544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "53"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893376584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "54"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893386934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "55"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893397644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "56"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893409494*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "57"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893419844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "58"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893431224003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "59"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893442264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "60"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893452664003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "61"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893463564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "62"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893475154*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "63"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893485774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "64"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893496684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "65"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893506563997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "66"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893517444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "67"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893528714*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "68"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893538403997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "69"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893548774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "70"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893560204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "71"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893570554*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "72"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893581774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "73"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893592064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "74"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893602324*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "75"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893613094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "76"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893623094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "77"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893633604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "78"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893644354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "79"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893655864*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "80"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893667564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "81"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893679014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "82"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893689674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "83"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893699284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "84"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893709704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "85"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893720494003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "86"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893731244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "87"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893742144003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "88"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893753024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "89"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893763524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "90"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893774374*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "91"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893785704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "92"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893796224003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "93"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893806584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "94"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893816714*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "95"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893827024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "96"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893836994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "97"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893848873997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "98"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893860313997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "99"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893871144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "100"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893882754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "101"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893893604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "102"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893904964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "103"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893915934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "104"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893927064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "105"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893937794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "106"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893948664*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "107"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893959793997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "108"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893970664*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "109"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893981764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "110"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462893992464*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "111"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894003394003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "112"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894014063997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "113"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894024584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "114"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894035564003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "115"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894046994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "116"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894057874002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "117"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894068434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "118"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894078864*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "119"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894089364*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "120"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894099454*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "121"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894110184*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "122"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894120934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "123"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894131764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "124"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894141744003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "125"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894152524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "126"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894162354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "127"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894172994003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "128"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894183244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "129"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894193484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "130"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894204004*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "131"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894213964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "132"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894225234003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "133"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894236394*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "134"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894247044*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "135"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894259063997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "136"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894270383997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "137"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894281214*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "138"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894292024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "139"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894303814*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "140"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894315234003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "141"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894326644*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "142"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894337734003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "143"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894349104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "144"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894360104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "145"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894372234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "146"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894384894*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "147"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894397164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "148"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894408543997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "149"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894419834003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "150"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894431424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "151"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894442293997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "152"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894453314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "153"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894464653997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "154"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894475634003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "155"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894486884003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "156"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894498744*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "157"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894509533997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "158"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894521314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "159"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894532743998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "160"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894544044*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "161"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894555344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "162"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894567264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "163"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894579444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "164"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894592104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "165"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894604384003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "166"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894615884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "167"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894628054*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "168"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894639544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "169"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894650984*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "170"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894662074003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "171"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894673704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "172"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894685294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "173"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894696914*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "174"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894708334*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "175"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894719964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "176"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894731354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "177"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894743694*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "178"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894755264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "179"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894767153997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "180"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894778274*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "181"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894790044003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "182"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894801204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "183"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894812494*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "184"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894823984003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "185"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894834774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "186"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894846814003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "187"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894858114*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "188"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894869524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "189"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894880154*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "190"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894890874*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "191"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894901794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "192"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894912623997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "193"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894925383997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "194"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894937714*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "195"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894948684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "196"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894959034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "197"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894972534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "198"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894984584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "199"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462894996414003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "200"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895009034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "201"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895020783997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "202"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895032363997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "203"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895043964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "204"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895056233997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "205"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895067704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "206"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895079014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "207"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895090094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "208"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895103964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "209"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895116604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "210"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895129634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "211"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895142214003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "212"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895154674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "213"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895166794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "214"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895179063997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "215"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895191224003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "216"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895201963997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "217"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895214294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "218"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895226974*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "219"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895238314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "220"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895249824*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "221"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895261424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "222"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895273684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "223"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895287344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "224"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895300434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "225"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895312404003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "226"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895324334*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "227"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895336233997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "228"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895348244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "229"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895361154003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "230"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895374154*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "231"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895386514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "232"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895398464003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "233"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895410594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "234"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895421904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "235"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895434544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "236"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895446314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "237"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895458294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "238"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895469814*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "239"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895481574*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "240"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895493354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "241"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895504594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "242"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895515973997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "243"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895526624002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "244"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895539314003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "245"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895551294003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "246"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895563344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "247"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895574364*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "248"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895586314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "249"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895597284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "250"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895610193996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "251"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895621064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "252"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895633814*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "253"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895646303997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "254"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895658104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "255"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895669734*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "256"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895681244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "257"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895694194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "258"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895706303997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "259"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895719034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "260"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895731134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "261"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895742874002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "262"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895753724003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "263"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895764884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "264"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895777094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "265"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895789244003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "266"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895800294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "267"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895811654*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "268"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895822904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "269"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895834274*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "270"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895847114*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "271"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895859444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "272"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895870674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "273"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895883774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "274"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895896794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "275"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895909463997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "276"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895921804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "277"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895934214*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "278"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895946184*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "279"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895957834*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "280"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895969533997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "281"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895982623997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "282"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462895994754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "283"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896007394*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "284"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896018594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "285"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896031084003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "286"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896043344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "287"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896055224*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "288"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896066914*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "289"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896077883997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "290"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896089804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "291"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896101814003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "292"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896113904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "293"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896126814003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "294"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896139054003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "295"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896150744*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "296"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896163543997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "297"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896175144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "298"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896186904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "299"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896198594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "300"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896210484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "301"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896222564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "302"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896233964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "303"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896247254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "304"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896259983997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "305"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896271204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "306"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896283054*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "307"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896295174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "308"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896306904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "309"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896319894*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "310"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896331084003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "311"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896342764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "312"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896354034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "313"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896366744003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "314"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896378294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "315"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896390174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "316"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896402144003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "317"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896415294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "318"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896427804003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "319"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896439834003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "320"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896452704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "321"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896465964003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "322"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896477264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "323"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896488084*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "324"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896499063997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "325"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896510924*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "326"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896523283997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "327"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896535554*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "328"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896547144003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "329"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896560284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "330"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896573864*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "331"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896587434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "332"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896600604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "333"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896613873997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "334"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896627804003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "335"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896640854*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "336"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896653424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "337"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896666164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "338"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896680044003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "339"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896693304*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "340"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896706043997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "341"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896716434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "342"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896727174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "343"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896737454*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "344"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896748504*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "345"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896759484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "346"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896770304003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "347"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896782854*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "348"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896797824*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "349"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896809393997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "350"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896821534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "351"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896833954*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "352"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896852743998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "353"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896867084*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "354"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896880754004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "355"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896893564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "356"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896906493998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "357"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896918904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "358"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896930674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "359"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896942664003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "360"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896954944*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "361"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896967634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "362"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896979723997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "363"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462896991224003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "364"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897004174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "365"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897015684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "366"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897027964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "367"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897041074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "368"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897053174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "369"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897065534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "370"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897078014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "371"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897090554*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "372"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897102874002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "373"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897114894*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "374"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897127354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "375"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897140704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "376"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897153314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "377"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897165114*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "378"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897177634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "379"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897189774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "380"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897201424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "381"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897213204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "382"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897226454*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "383"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897238084*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "384"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897250214*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "385"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897262194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "386"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897274014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "387"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897286443996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "388"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897299284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "389"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897309834003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "390"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897321954*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "391"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897334323997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "392"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897346454*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "393"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897358054*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "394"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897369133997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "395"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897381994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "396"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897392564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "397"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897403143997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "398"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897414994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "399"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897426054*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "400"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897438403997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "401"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897451844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "402"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897464054003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "403"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897477194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "404"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897489533997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "405"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897500964003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "406"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897512674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "407"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897524474*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "408"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897536774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "409"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897549284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "410"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897561614*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "411"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897572734003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "412"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897584484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "413"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897596184*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "414"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897607813997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "415"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897619983997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "416"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897631224003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "417"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897642614*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "418"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897654714003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "419"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897666113997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "420"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897677743998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "421"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897689974003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "422"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897701804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "423"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897714014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "424"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897725704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "425"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897737574*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "426"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897749723997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "427"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897761124*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "428"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897773664*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "429"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897785783997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "430"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897798554*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "431"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897810434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "432"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897821364*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "433"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897832434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "434"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897844384003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "435"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897854884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "436"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897865434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "437"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897875754004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "438"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897888604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "439"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897899314003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "440"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897911233997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "441"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897923464003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "442"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897935824003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "443"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897947804003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "444"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897960383997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "445"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897973794003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "446"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897986303997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "447"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462897999224*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "448"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898011514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "449"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898024524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "450"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898036274*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "451"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898047953997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "452"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898060474*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "453"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898072104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "454"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898084144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "455"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898096754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "456"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898108684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "457"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898120444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "458"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898133073997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "459"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898145704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "460"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898157813997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "461"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898170383997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "462"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898183374*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "463"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898196664*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "464"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "5"], SeriesData[$CellContext`h, 0, {}, 5, 5, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898207284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "465"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898217964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "466"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898228584003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "467"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898239574003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "468"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898250874*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "469"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898261344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "470"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898272734003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "471"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898283274*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "472"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898293943996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "473"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898305264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "474"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898316384*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "475"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898327144003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "476"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898337824*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "477"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898348234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "478"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898358884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "479"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898369934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "480"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898380934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "481"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898392604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "482"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898403084*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "483"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898413873997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "484"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "5"], SeriesData[$CellContext`h, 0, {}, 5, 5, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898424614*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "485"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898435264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "486"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898446373997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "487"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "5"], SeriesData[$CellContext`h, 0, {}, 5, 5, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898457564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "488"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898468194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "489"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898478754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "490"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898489393997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "491"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898499644003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "492"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898511784*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "493"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898522684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "494"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898534094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "495"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898544604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "496"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898555074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "497"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898566043997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "498"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898577444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "499"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898587754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "500"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898598514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "501"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898610924*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "502"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898622743998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "503"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898636373997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "504"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898649934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "505"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898663654003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "506"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898676054*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "507"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898688914003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "508"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898702004004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "509"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898715394*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "510"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898729164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "511"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898742824*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "512"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898755424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "513"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898769444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "514"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898784203997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "515"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898797734003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "516"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898811874*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "517"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898824144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "518"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898838754*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "519"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898851074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "520"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898865544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "521"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898879694*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "522"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898892524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "523"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898906303997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "524"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898920274*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "525"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898933954*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "526"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898949234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "527"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898963064003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "528"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898977214003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "529"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462898990824003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "530"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899003873997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "531"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899017164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "532"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899031034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "533"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899043104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "534"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899055724*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "535"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899069404*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "536"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899082544003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "537"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899095434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "538"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899107544003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "539"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899118283997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "540"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899129734*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "541"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899139854*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "542"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899150514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "543"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899163634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "544"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899176074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "545"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899190134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "546"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899202693996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "547"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899215964003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "Alternating", ",", "548"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899229084*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "1"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899238794003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "2"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899249294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "3"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899258674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "4"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899269723997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "5"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899280123997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "6"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899289834003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "7"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899300444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "8"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899310584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "9"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899319884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "10"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899330224*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "11"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899341334*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "12"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899351004*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "13"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899361284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "14"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899371804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "15"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899380944*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "16"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899390924*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "17"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899401113997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "18"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899410193996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "19"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899420234003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "20"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899431233997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "21"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899440973997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "22"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899451314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "23"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899462623997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "24"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899472324*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "25"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899483004*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "26"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899493484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "27"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899504874*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "28"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899514904003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "29"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899525504*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "30"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899536214*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "31"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899545524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "32"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899555804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "33"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899565104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "34"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899575144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "35"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899584594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "36"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899595304003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "37"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899604844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "38"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899614814*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "39"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899624164*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "40"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899635024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "41"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899644463997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "42"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899655204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "43"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899664644003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "44"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899675234003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "45"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899685754004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "46"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899695254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "47"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899705394*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "48"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899715744*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "49"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899724653997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "50"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899733394003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "51"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899742384*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "52"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899751414003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "53"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899760193996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "54"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899769714003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "55"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899778613997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "56"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899787404003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "57"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899797274*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "58"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899806594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "59"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899815764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "60"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899825504*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "61"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899834964*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "62"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899845324*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "63"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899855134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "64"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899865064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "65"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899875074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "66"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899885434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "67"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899895094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "68"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899905204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "69"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899915554*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "70"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899924844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "71"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899934174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "72"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899943344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "73"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899951934*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "74"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899962454*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "75"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899971684*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "76"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899981454*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "77"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462899991244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "78"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900002174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "79"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900012534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "80"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900022774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "81"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900033014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "82"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900042844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "83"}], "]"}], "\[Rule]", "0"}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900051703997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "84"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900060534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "85"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900070014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "86"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900080064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "87"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900089184*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "88"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900099074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "89"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900108444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "90"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900117904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "91"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900126524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "92"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900135123997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "93"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900144284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "94"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900152914*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "95"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900162434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "96"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900171944*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "97"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900180774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "98"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900190544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "99"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900199723997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "100"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900208704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "101"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900217114*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "102"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900227244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "103"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900237784*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "104"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900247404003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "105"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900257714*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "106"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900268744*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "107"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900278834*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "108"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900288724003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "109"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900297813997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "110"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900308004*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "111"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900316893997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "112"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900326174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "113"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900335494003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "114"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900344983997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "115"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900353984003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "116"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900364604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "117"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900374804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "118"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900384824*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "119"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900393974*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "120"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900403873997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "121"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900413304*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "122"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900413394003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "123"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900422894*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "124"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900432174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "125"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900441024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "126"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900450884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "127"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900460804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "128"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900470334*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "129"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900481493998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "130"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900493064003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "131"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900503634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "132"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900513073997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "133"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900523634*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "134"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900535284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "135"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900535434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "136"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900545514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "137"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900555834*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "138"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900566974*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "139"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900577464*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "140"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900586834*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "141"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900597594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "142"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900608143997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "143"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900608204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "144"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900618234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "145"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900628264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "146"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900639024*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "147"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900650894003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "148"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900659824*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "149"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900669254*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "150"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900678594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "151"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900678674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "152"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900689224*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "153"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900698564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "154"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900710354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "155"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900710444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "156"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900718993998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "157"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900729144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "158"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900739644003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "159"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900749264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "160"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900758543997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "161"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900768664*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "162"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900779834003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "163"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900790674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "164"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900800864*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "165"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900810643997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "166"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900821844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "167"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900821984*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "168"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900822064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "169"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900832584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "170"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900842844*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "171"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900852834*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "172"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900863403997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "173"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900873594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "174"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900884694*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "175"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900895994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "176"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900906174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "177"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900914814*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "178"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900924734*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "179"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900924884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "180"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900935634003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "181"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900935744*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "182"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900947874002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "183"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900958484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "184"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900968974*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "185"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900979694*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "186"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462900990304003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "187"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901000564003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "188"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901000713997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "189"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901011084003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "190"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901022334003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "191"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901032784*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "192"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901044504004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "193"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901055804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "194"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901065464*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "195"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901077134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "196"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901087654*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "197"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901097244*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "198"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901106284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "199"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901116914*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "200"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901128654003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "201"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901140364*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "202"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901151074*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "203"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901161534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "204"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901171014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "205"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901181154003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "206"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901190424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "207"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901201914*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "208"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901212204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "209"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901222124*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "210"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901232293997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "211"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901242474003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "212"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901252574*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "213"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901265484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "214"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901275734*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "215"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901286823997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "216"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901297614*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "217"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901310764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "218"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901322594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "219"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901333494*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "220"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901344884*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "221"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901354704*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "222"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901365104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "223"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901375564003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "224"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901385494003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "225"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901395123997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "226"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901407404003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "227"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901416384*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "228"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901426804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "229"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901437404003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "230"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901450674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "231"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901462284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "232"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901473484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "233"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901484104*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "234"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901497354*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "235"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901509904003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "236"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901521144*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "237"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901532584*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "238"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901542234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "239"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901551014*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "240"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901559504004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "241"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901568774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "242"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901578194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "243"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901587594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "244"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901601134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "245"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901614203997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "246"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901625134*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "247"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901634544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "248"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901644904003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "249"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901655573997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "250"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901666303997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "251"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901677724*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "252"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901688584003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "253"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901688744*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "254"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901701594*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "255"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901711474*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "256"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901720464*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "257"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901730434*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "258"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901741334*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "259"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901751314*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "260"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901751394*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "261"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901751464*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "262"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901762344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "263"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901762623997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "264"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901762714*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "265"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901773984003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "266"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901784294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "267"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901795484*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "268"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901806443996`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "269"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901815514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "270"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901825604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "271"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901836043997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "272"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901845034*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "273"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901854954*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "274"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901866764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "275"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901879284*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "276"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901889784*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "277"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901901094*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "278"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901911124*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "279"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901921804*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "280"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901932564*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "281"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901942444*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "282"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901953114*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "283"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901953204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "284"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901953264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "285"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901963714*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "286"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901975344*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "287"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901985294*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "288"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462901997534*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "289"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902008764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "290"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902020674*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "291"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902033873997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "292"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902045394*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "293"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902057174*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "294"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902069214*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "295"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902069334*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "296"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902080694*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "297"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902080783997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "298"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902092004004`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "299"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902102524*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "300"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902111194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "301"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902123134003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "302"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902133304*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "303"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902144234*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "304"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902155573997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "305"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902165724*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "306"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902176624002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "307"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902187794*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "308"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902198264*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "309"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902208774*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "310"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902219133997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "311"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902228694*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "312"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902239764*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "313"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902250604*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "314"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902261194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "315"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902271984*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "316"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902284194*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "317"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902295243998`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "318"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902305544*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "319"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902315824003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "320"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902328403997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "321"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902340424*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "322"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902352204*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "323"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902362904*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "324"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902375324*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "325"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902385514*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "326"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902396624002`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "327"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902408394003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "328"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902418613997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "329"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902429624*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "330"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902440994*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "331"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902451233997`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "332"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902461064*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "333"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902471294003`*^9}], Cell[BoxData[ RowBox[{ RowBox[{"Link", "[", RowBox[{"11", ",", "NonAlternating", ",", "334"}], "]"}], "\[Rule]", InterpretationBox[ SuperscriptBox[ RowBox[{"O", "[", "h", "]"}], "4"], SeriesData[$CellContext`h, 0, {}, 4, 4, 1], Editable->False]}]], "Print", CellChangeTimes->{{3.4457000650456*^9, 3.4457000801786003`*^9}, 3.4462902482614*^9}], Cell[