(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 685939, 16070] NotebookOptionsPosition[ 683512, 16033] NotebookOutlinePosition[ 683885, 16049] CellTagsIndexPosition[ 683842, 16046] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"F", "[", "x_", "]"}], ":=", RowBox[{ FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", RowBox[{"(", RowBox[{ RowBox[{"PolyLog", "[", RowBox[{"2", ",", RowBox[{ RowBox[{"-", "\[ImaginaryI]"}], " ", SuperscriptBox["\[ExponentialE]", "x"]}]}], "]"}], "-", RowBox[{"PolyLog", "[", RowBox[{"2", ",", RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", "x"]}]}], "]"}]}], ")"}]}]}]], "Input", CellChangeTimes->{{3.737196866673444*^9, 3.737196875196076*^9}}, CellLabel->"In[1]:=",ExpressionUUID->"748eabe5-c3d2-4801-b8b7-aa7a789097c7"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"G3", "[", RowBox[{"a_", ",", "b_"}], "]"}], ":=", RowBox[{ RowBox[{"F", "[", RowBox[{"a", "-", "b"}], "]"}], "+", RowBox[{"F", "[", RowBox[{"b", "-", "a"}], "]"}], "-", RowBox[{ FractionBox["\[Pi]", "2"], RowBox[{"(", RowBox[{"a", "+", "b"}], ")"}]}]}]}], ";"}]], "Input", CellChangeTimes->{ 3.737201965981352*^9, {3.737202002231657*^9, 3.737202033142387*^9}, { 3.737202126146511*^9, 3.7372021534299583`*^9}, {3.7378972597648673`*^9, 3.7378972820313244`*^9}, {3.737897408257219*^9, 3.7378974198940997`*^9}, 3.7384280032345715`*^9}, CellLabel->"In[2]:=",ExpressionUUID->"0ab29ce4-3405-44f4-bf4a-16ef730ff686"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"EnergySetup", "[", RowBox[{"n_", ",", "FacesCW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "i", ",", "rhoV", ",", "rhoF", ",", "include", ",", "LineFaces", ",", "f", ",", "Faces", ",", "NM", ",", "nonlinefaces", ",", "radii", ",", "RADII"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Faces", "=", RowBox[{"Sort", "/@", "FacesCW"}]}], ";", "\[IndentingNewLine]", RowBox[{"f", "=", RowBox[{"Length", "[", "Faces", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"LineFaces", "=", RowBox[{"{", "}"}]}], ";", RowBox[{"rhoV", "=", RowBox[{"Table", "[", RowBox[{ SubscriptBox["rV", "i"], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"n", "-", "2"}]}], "}"}]}], "]"}]}], ";", RowBox[{"rhoF", "=", RowBox[{"Table", "[", RowBox[{ SubscriptBox["rF", "i"], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"f", "-", "2"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"include", " ", "=", " ", RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"nonlinefaces", "=", RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "f"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"-", "2"}]}], "]"}], "]"}], "\[Equal]", RowBox[{"n", "-", "1"}]}], "&&", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"-", "1"}]}], "]"}], "]"}], "\[Equal]", "n"}]}], ")"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "then", " ", "*)"}], " ", RowBox[{ RowBox[{"AppendTo", "[", RowBox[{"include", ",", "i"}], "]"}], ";", RowBox[{"AppendTo", "[", RowBox[{"nonlinefaces", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "else", " ", "*)"}], " ", RowBox[{"AppendTo", "[", RowBox[{"LineFaces", ",", "i"}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"NM", "=", RowBox[{"NMinimize", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"k", "=", "1"}], RowBox[{"f", "-", "2"}]], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"i", "=", "1"}], RowBox[{"Length", "[", RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"include", "[", RowBox[{"[", "k", "]"}], "]"}], "]"}], "]"}], "]"}]], RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{ RowBox[{"include", "[", RowBox[{"[", "k", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "<", RowBox[{"n", "-", "1"}]}], ",", RowBox[{"G3", "[", RowBox[{ SubscriptBox["rV", RowBox[{"Faces", "[", RowBox[{"[", RowBox[{ RowBox[{"include", "[", RowBox[{"[", "k", "]"}], "]"}], ",", "i"}], "]"}], "]"}]], ",", SubscriptBox["rF", "k"]}], "]"}], ",", "0"}], "]"}]}]}], "+", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"i", "=", "1"}], RowBox[{"n", "-", "2"}]], RowBox[{ SubscriptBox["rV", "i"], "\[Pi]", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Flatten", "@", RowBox[{"Table", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "m", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"m", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ",", "i"}], "]"}], ",", RowBox[{"(*", " ", "then", " ", "*)"}], " ", "1", ",", RowBox[{"(*", " ", "else", " ", "*)"}], " ", "2"}], "]"}]}]}], "+", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"j", "=", "1"}], RowBox[{"f", "-", "2"}]], RowBox[{ SubscriptBox["rF", "j"], "\[Pi]", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"include", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"n", "-", "1"}]}], "]"}], "||", RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"include", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}], ",", "n"}], "]"}]}], ",", RowBox[{"(*", " ", "then", " ", "*)"}], " ", "1", ",", RowBox[{"(*", " ", "else", " ", "*)"}], " ", "2"}], "]"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"i", "=", "1"}], RowBox[{"n", "-", "2"}]], SubscriptBox["rV", "i"]}], "+", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"j", "=", "1"}], RowBox[{"f", "-", "2"}]], SubscriptBox["rF", "j"]}]}], "\[Equal]", "0"}]}], "}"}], ",", RowBox[{"Join", "[", RowBox[{"rhoV", ",", "rhoF"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"RADII", "=", RowBox[{"Exp", "[", RowBox[{"Re", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{"rhoV", ",", "rhoF"}], "]"}], "/.", RowBox[{"(", RowBox[{"NM", "[", RowBox[{"[", "2", "]"}], "]"}], ")"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"RADII", "/=", RowBox[{"RADII", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"radii", "=", RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"n", "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"radii", "[", "i", "]"}], "=", RowBox[{"RADII", "[", RowBox[{"[", "i", "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "nonlinefaces", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"radii", "[", RowBox[{"nonlinefaces", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"RADII", "[", RowBox[{"[", RowBox[{"n", "-", "2", "+", "i"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"radii", ",", "LineFaces"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7372045119396753`*^9, 3.7372046545187597`*^9}, { 3.737204685631832*^9, 3.7372047308167467`*^9}, {3.737204773625032*^9, 3.7372048110040503`*^9}, {3.737204842780097*^9, 3.737204924806987*^9}, { 3.7372050053122187`*^9, 3.737205008911607*^9}, {3.73720504639081*^9, 3.7372051214979887`*^9}, {3.7372051736233463`*^9, 3.737205179673382*^9}, { 3.737205261713398*^9, 3.7372052618754*^9}, {3.737205306100531*^9, 3.737205373527009*^9}, {3.737205491627762*^9, 3.737205535178033*^9}, { 3.737206922016953*^9, 3.737206989324239*^9}, {3.737207032865409*^9, 3.737207073209803*^9}, {3.737284915566703*^9, 3.737284955928123*^9}, { 3.737371291071519*^9, 3.7373713419977837`*^9}, {3.737468221809287*^9, 3.737468222498644*^9}, 3.737468268451545*^9, {3.7374683559250183`*^9, 3.737468513179357*^9}, {3.737468554130938*^9, 3.7374685561663094`*^9}, { 3.7374686045167637`*^9, 3.737468621354309*^9}, {3.737468670066434*^9, 3.737468700374711*^9}, {3.73746873598547*^9, 3.737468789149178*^9}, { 3.737469118685132*^9, 3.737469121422579*^9}, {3.737891244695794*^9, 3.737891247299219*^9}, {3.737995135349449*^9, 3.73799513678258*^9}}, CellLabel->"In[3]:=",ExpressionUUID->"72e544ec-21b3-4511-8714-78e40bf96f8f"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Boundary", "[", RowBox[{"n_", ",", "FacesCW_", ",", "LineFaces_", ",", "radii_", ",", RowBox[{"\[Epsilon]_:", "0"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "i", ",", "j", ",", "faces", ",", "vertices", ",", "lastvisited", ",", "d", ",", "h", ",", "H", ",", "breaker", ",", "unvisited", ",", "f", ",", "endcircle", ",", "ComputeEndcircle", ",", "ComputeEndcircle2", ",", "delete"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"unvisited", " ", "=", "FacesCW"}], ";", RowBox[{"(*", RowBox[{ "Keeps", " ", "track", " ", "of", " ", "the", " ", "faces", " ", "we", " ", RowBox[{"haven", "'"}], "t", " ", "visited"}], "*)"}], "\[IndentingNewLine]", RowBox[{"f", "=", RowBox[{"Length", "[", "FacesCW", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"faces", "=", RowBox[{"<|", "|>"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"centers", " ", "of", " ", "face", " ", "circles", " ", RowBox[{"(", RowBox[{ RowBox[{"or", " ", "normals"}], ",", " ", RowBox[{"for", " ", "lines"}]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "f"}], ",", RowBox[{"i", "++"}], ",", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"vertices", "=", RowBox[{"<|", "|>"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"centers", " ", "of", " ", "vertex", " ", "circles", " ", RowBox[{"(", RowBox[{ RowBox[{"or", " ", "normals"}], ",", " ", RowBox[{"for", " ", "lines"}]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"n", "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "Radii", " ", "is", " ", "an", " ", "assoc", " ", "from", " ", "v"}], "\[Rule]", RowBox[{ RowBox[{"rad", " ", "and", " ", "facelist"}], "\[Rule]", "rad"}]}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Vertex", " ", "circles", " ", "going", " ", "vertically", " ", "upwards", " ", "along", " ", "first", " ", "FaceLine"}], "*)"}], "\[IndentingNewLine]", RowBox[{"h", "=", "0"}], ";", " ", RowBox[{"(*", " ", RowBox[{"height", " ", "along", " ", "the", " ", "left", " ", "line"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{ RowBox[{"Length", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "-", "2"}]}], RowBox[{"(*", RowBox[{ "Number", " ", "of", " ", "vertex", " ", "circles", " ", "that", " ", "lie", " ", "along", " ", "first", " ", "LineFace"}], "*)"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vertices", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{"h", "+", RowBox[{"radii", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}]}]}], "}"}]}], ";", RowBox[{"(*", RowBox[{ "Set", " ", "the", " ", "center", " ", "of", " ", "this", " ", "vertex", " ", "circle"}], "*)"}], "\[IndentingNewLine]", RowBox[{"h", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "]"}]}]}]}]}], "]"}], ";", RowBox[{"(*", RowBox[{ "Keeps", " ", "track", " ", "of", " ", "our", " ", "cumulative", " ", "height", " ", "as", " ", "we", " ", "climb", " ", "up", " ", "the", " ", "first", " ", "FaceLine"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"unvisited", "=", RowBox[{"Delete", "[", RowBox[{"unvisited", ",", RowBox[{"Position", "[", RowBox[{"unvisited", ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"d", "=", "0"}], ";", RowBox[{"(*", RowBox[{"Horizontal", " ", "distance"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ComputeEndcircle", "[", RowBox[{"prev_", ",", "face_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Returns", " ", "which", " ", "vertex", " ", "circle", " ", "we", " ", "calculated", " ", "last", " ", "based", " ", "on", " ", "previous", " ", "vertex", " ", "circle", " ", "and", " ", "face"}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", RowBox[{"n", "-", "1"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], "\[Equal]", "prev"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "then", "*)"}], RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", RowBox[{"n", "-", "1"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "else", "*)"}], " ", RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", RowBox[{"n", "-", "1"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle", "[", RowBox[{"n", ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], ";", RowBox[{"(*", RowBox[{ RowBox[{ "Previous", " ", "vertex", " ", "circle", " ", "is", " ", "bottom", " ", "line"}], ",", " ", RowBox[{"face", " ", "is", " ", "first", " ", "FaceLine"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Face", " ", "circles", " ", "going", " ", "horizontally", " ", "across", " ", "upper", " ", "vertex", " ", "line"}], "*)"}], "\[IndentingNewLine]", RowBox[{"breaker", "=", "True"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "f"}], " ", ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "unvisited", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"n", "-", "1"}]}], "]"}], ",", " ", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{"circle", " ", "contains", " ", "n"}], "-", "1"}], ",", " ", RowBox[{ "so", " ", "it", " ", "is", " ", "on", " ", "the", " ", "upper", " ", "vertex", " ", "line"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"ComputeEndcircle", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{ "circle", " ", "also", " ", "contains", " ", "the", " ", "vertex", " ", "right", " ", "before", " ", "n"}], "-", RowBox[{ "1", " ", "to", " ", "ensure", " ", "we", " ", "are", " ", "going", " ", "horizontally", " ", "across", " ", "in", " ", "the", " ", "right", " ", "order"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"If", " ", RowBox[{"we", "'"}], "ve", " ", "reached", " ", "the", " ", "second", " ", "faceline"}], ",", " ", RowBox[{"then", " ", "do", " ", RowBox[{"nothing", "--"}], "find", " ", "the", " ", "other", " ", "face", " ", "circle", " ", "containing", " ", "endcircle"}]}], "*)"}], "\[IndentingNewLine]", ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "else", " ", "if", " ", "the", " ", "face", " ", "circle", " ", "is", " ", "not", " ", "a", " ", "line"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", "h"}], "}"}]}], ";", " ", RowBox[{"(*", RowBox[{ "Set", " ", "the", " ", "center", " ", "of", " ", "this", " ", "face", " ", "circle"}], "*)"}], "\[IndentingNewLine]", RowBox[{"d", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}]}], ";", " ", RowBox[{"(*", " ", RowBox[{ "update", " ", "how", " ", "far", " ", "along", " ", "the", " ", "top", " ", "line", " ", "we", " ", "are"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ";", RowBox[{"(*", RowBox[{"Update", " ", "endcircle"}], "*)"}], "\[IndentingNewLine]", RowBox[{"unvisited", "=", RowBox[{"Delete", "[", RowBox[{"unvisited", ",", "i"}], "]"}]}], ";"}]}], "]"}]}], " ", RowBox[{"(*", " ", RowBox[{ "remove", " ", "that", " ", "face", " ", "from", " ", "the", " ", "unvisited", " ", "list"}], " ", "*)"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "Vertex", " ", "circles", " ", "along", " ", "the", " ", "second", " ", "FaceLine"}], ",", " ", RowBox[{"climbing", " ", "vertically", " ", "upwards"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"h", "=", "0"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{ RowBox[{"Length", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "]"}], "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vertices", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"d", ",", RowBox[{"h", "+", RowBox[{"radii", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}]}]}], "}"}]}], ";", RowBox[{"h", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "]"}]}]}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"H", "=", "h"}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", "0"}], ";", RowBox[{"(*", RowBox[{"Reset", " ", "height"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ComputeEndcircle2", "[", RowBox[{"prev_", ",", "face_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", "n"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], "\[Equal]", "prev"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "then", "*)"}], RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", "n"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "else", "*)"}], " ", RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", "n"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle2", "[", RowBox[{ RowBox[{"n", "-", "1"}], ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "Face", " ", "circles", " ", "along", " ", "lower", " ", "vertex", " ", "line"}], ",", " ", RowBox[{ "moving", " ", "horizontally", " ", "from", " ", "origin", " ", "to", " ", "second", " ", "FaceLine"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"d", "=", "0"}], ";", RowBox[{"(*", RowBox[{"Reset", " ", "distance"}], "*)"}], "\[IndentingNewLine]", RowBox[{"breaker", "=", "True"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "f"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "unvisited", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "n"}], "]"}], ",", " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{"circle", " ", "contains", " ", "n"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "endcircle"}], RowBox[{"(*", " ", RowBox[{"ComputeEndcircle2", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], " ", "*)"}], "]"}], ",", RowBox[{"(*", " ", RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{ "cirlce", " ", "also", " ", "contains", " ", "the", " ", "vertex", " ", "right", " ", "before", " ", "n"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"If", " ", RowBox[{"we", "'"}], "ve", " ", "reached", " ", "the", " ", "second", " ", "faceline"}], ",", " ", RowBox[{"then", " ", "do", " ", "nothing"}]}], "*)"}], "\[IndentingNewLine]", ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "else", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", "h"}], "}"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"then", " ", RowBox[{"we", "'"}], "ll", " ", "make", " ", "this", " ", RowBox[{"face", "'"}], "s", " ", "center", " ", "be", " ", "where", " ", "we", " ", "know", " ", "it", " ", "is"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"d", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}]}], ";", " ", RowBox[{"(*", " ", RowBox[{ "update", " ", "how", " ", "far", " ", "along", " ", "the", " ", "bottom", " ", "line", " ", "we", " ", "are"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle2", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"unvisited", "=", RowBox[{"Delete", "[", RowBox[{"unvisited", ",", "i"}], "]"}]}], ";"}]}], "]"}]}], " ", RowBox[{"(*", " ", RowBox[{ "remove", " ", "that", " ", "face", " ", "from", " ", "the", " ", "unvisited", " ", "list"}], " ", "*)"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Set", " ", "the", " ", "normals", " ", "of", " ", "the", " ", "vertex", " ", "lines", " ", "and", " ", "face", " ", "lines"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", "n", "]"}], "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "1"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", RowBox[{"n", "-", "1"}], "]"}], "=", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "faces", ",", "vertices", ",", "radii", ",", "d", ",", "H", ",", "n", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "0"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "*=", RowBox[{"-", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "]"}], "*=", RowBox[{"-", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"i", "\[Equal]", RowBox[{"n", "-", "1"}]}], "||", RowBox[{"i", "\[Equal]", "n"}]}], ",", "\[IndentingNewLine]", ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "d"}], "]"}], "\[LessEqual]", "\[Epsilon]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "0"}], "]"}], "\[LessEqual]", "\[Epsilon]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "=", RowBox[{"{", RowBox[{"d", ",", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}]}], "]"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Return", " ", "the", " ", RowBox[{"assoc", "'"}], "s", " ", "of", " ", "the", " ", "faces", " ", "to", " ", "their", " ", "centers", " ", "and", " ", "vertices", " ", "to", " ", "their", " ", "centers"}], "*)"}], "\[IndentingNewLine]", RowBox[{"{", RowBox[{"vertices", ",", "faces", ",", "d", ",", "H"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.737219030683413*^9, 3.737219068499385*^9}, { 3.737219129031519*^9, 3.737219157331717*^9}, {3.737219214776095*^9, 3.737219232499251*^9}, {3.737219530428797*^9, 3.737219737723432*^9}, { 3.737219973681823*^9, 3.737219981058498*^9}, {3.7372852522441998`*^9, 3.737285273052194*^9}, {3.737285379557729*^9, 3.7372853808850813`*^9}, { 3.737285506667365*^9, 3.737285515803762*^9}, {3.7372856044249487`*^9, 3.737285632285976*^9}, {3.7372857006889677`*^9, 3.7372857800137577`*^9}, { 3.73728584887117*^9, 3.737285857200169*^9}, {3.737286074306966*^9, 3.7372860829425373`*^9}, {3.7372861272847137`*^9, 3.737286147655734*^9}, { 3.737286180526772*^9, 3.737286183012919*^9}, {3.737286465705851*^9, 3.7372864888059*^9}, {3.7372865215606728`*^9, 3.737286606697309*^9}, { 3.737286645970365*^9, 3.737286648042437*^9}, {3.737286686140306*^9, 3.7372867642027607`*^9}, {3.737287269374832*^9, 3.737287342750917*^9}, { 3.737287384822444*^9, 3.7372877639349957`*^9}, {3.737287798168841*^9, 3.737287798698641*^9}, {3.737287874201215*^9, 3.737287886754616*^9}, { 3.73728794855105*^9, 3.73728794906709*^9}, {3.737287984087804*^9, 3.737287984258391*^9}, {3.737288167935055*^9, 3.7372881688958406`*^9}, { 3.737288229464828*^9, 3.7372884829941387`*^9}, {3.7372889651024017`*^9, 3.737289028710766*^9}, {3.73728913478118*^9, 3.7372891349574013`*^9}, { 3.737289176488153*^9, 3.7372892189711437`*^9}, {3.737289296434997*^9, 3.737289307920455*^9}, {3.737289377154367*^9, 3.7372893780167713`*^9}, { 3.73728946731621*^9, 3.7372894685890083`*^9}, {3.737289519964464*^9, 3.7372895646104527`*^9}, {3.737289627498472*^9, 3.7372896504948683`*^9}, { 3.737289698936853*^9, 3.7372897006060762`*^9}, {3.737289761143084*^9, 3.737289790713337*^9}, {3.737289852057372*^9, 3.737289856144655*^9}, { 3.7372899307846327`*^9, 3.737289954524984*^9}, {3.737290111472128*^9, 3.737290137729048*^9}, {3.7372903101204*^9, 3.7372903238682327`*^9}, { 3.737290363021036*^9, 3.737290395639821*^9}, {3.737290434642714*^9, 3.737290436215727*^9}, {3.737290481178443*^9, 3.737290524071663*^9}, { 3.737290651768982*^9, 3.7372906712458363`*^9}, {3.737290704533799*^9, 3.7372907061133537`*^9}, {3.737290744976763*^9, 3.737290766875083*^9}, { 3.737290999240056*^9, 3.737291019271243*^9}, {3.737291057840662*^9, 3.737291080456534*^9}, {3.737291128953987*^9, 3.737291140451013*^9}, { 3.737291260286092*^9, 3.7372914176080303`*^9}, {3.7372914768350573`*^9, 3.737291536874617*^9}, {3.7372915673943977`*^9, 3.73729157857458*^9}, { 3.73729459361259*^9, 3.737294594755714*^9}, {3.737294841256043*^9, 3.737294872151122*^9}, {3.73729499894667*^9, 3.737295013697496*^9}, { 3.737295117321186*^9, 3.737295146177869*^9}, {3.737295198600103*^9, 3.737295201561144*^9}, {3.737295332216126*^9, 3.7372953659228153`*^9}, { 3.7372958344031277`*^9, 3.737296025548025*^9}, {3.737302057273785*^9, 3.737302228939927*^9}, 3.7373022837982073`*^9, {3.737302343644175*^9, 3.737302375974662*^9}, 3.737302421339328*^9, {3.737302477569655*^9, 3.737302565791008*^9}, {3.737302777019927*^9, 3.737302823909573*^9}, { 3.737303123387793*^9, 3.737303214311923*^9}, {3.7373032530403357`*^9, 3.7373032965502157`*^9}, {3.737303417213832*^9, 3.737303518053563*^9}, { 3.737303590633803*^9, 3.737303600566893*^9}, {3.737303631996339*^9, 3.737303736869626*^9}, {3.737303779146243*^9, 3.737303825046517*^9}, { 3.737304130063211*^9, 3.737304181026523*^9}, {3.7373042470907288`*^9, 3.737304349277087*^9}, {3.7373043812177143`*^9, 3.737304407351365*^9}, { 3.737304581411367*^9, 3.737304616831106*^9}, {3.7373046620344*^9, 3.7373047068712873`*^9}, {3.737304771496949*^9, 3.7373048444644938`*^9}, { 3.737305306432076*^9, 3.7373053158581667`*^9}, {3.7373053546618013`*^9, 3.737305355635768*^9}, 3.7373054429132357`*^9, {3.737306098271888*^9, 3.737306106600956*^9}, {3.737306417696192*^9, 3.737306447095158*^9}, { 3.7373064781213903`*^9, 3.737306483985478*^9}, {3.737306573567268*^9, 3.737306587589746*^9}, {3.737306720838073*^9, 3.73730674819695*^9}, { 3.737306852180376*^9, 3.737306861658111*^9}, {3.737306929352565*^9, 3.7373069458296127`*^9}, {3.737306985973919*^9, 3.73730703321769*^9}, { 3.737307104020858*^9, 3.737307104380198*^9}, {3.7373072016479588`*^9, 3.737307219827284*^9}, {3.737307283259153*^9, 3.737307449938692*^9}, { 3.737307507268676*^9, 3.737307531627266*^9}, {3.737307624863483*^9, 3.737307630803578*^9}, 3.7373692366355057`*^9, {3.737378768428591*^9, 3.737378772696554*^9}, {3.737456548739272*^9, 3.737456676468967*^9}, { 3.737456732055797*^9, 3.737456785246457*^9}, {3.737456880379624*^9, 3.73745693261576*^9}, {3.7374569872793217`*^9, 3.737457002918715*^9}, { 3.737457034354722*^9, 3.7374570868457327`*^9}, {3.7374573446089993`*^9, 3.737457359698818*^9}, {3.737457621684537*^9, 3.737457654757286*^9}, { 3.7374577893447638`*^9, 3.7374578203273153`*^9}, 3.73745786787053*^9, { 3.737458414579453*^9, 3.7374584346434393`*^9}, {3.73745848723744*^9, 3.737458515616708*^9}, {3.737458663428769*^9, 3.73745867379788*^9}, { 3.737458742757172*^9, 3.7374588188135767`*^9}, {3.7374589524311037`*^9, 3.737458970370059*^9}, {3.737459004685546*^9, 3.737459017734614*^9}, { 3.737469143102393*^9, 3.737469152438889*^9}, {3.7374723221463118`*^9, 3.7374723517302732`*^9}, {3.737472517403573*^9, 3.73747252044235*^9}, { 3.737472566196344*^9, 3.737472599816885*^9}, {3.737472901109223*^9, 3.737472904411367*^9}, {3.737472959283648*^9, 3.737472959747048*^9}, { 3.737472997133112*^9, 3.737473040080291*^9}, {3.7374732109292183`*^9, 3.73747321567245*^9}, {3.737474220810277*^9, 3.737474243746545*^9}, { 3.737720030799748*^9, 3.7377200552173643`*^9}, {3.737720087337412*^9, 3.7377201185616283`*^9}, {3.737720170734948*^9, 3.737720176149166*^9}, { 3.7377202115121927`*^9, 3.7377202116963243`*^9}, {3.7377202481305037`*^9, 3.737720253754922*^9}, {3.73772028641499*^9, 3.7377203344757833`*^9}, { 3.737891223277732*^9, 3.7378912238571*^9}, {3.737906075544756*^9, 3.7379060758948555`*^9}, {3.737991347709439*^9, 3.7379913481113663`*^9}, { 3.7379951711905804`*^9, 3.7379951715466285`*^9}}, CellLabel->"In[4]:=",ExpressionUUID->"34558bf5-30de-4efd-a85d-1e42927d2f41"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_"}], "}"}], ",", "r_", ",", "face_", ",", "vertices_", ",", "radii_", ",", "lines_"}], "]"}], ":=", RowBox[{"(*", " ", RowBox[{ "face", " ", "is", " ", "all", " ", "the", " ", "vertices", " ", "that", " ", "the", " ", "face", " ", "intersects"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_"}], "}"}], ",", RowBox[{"r", ":", " ", RowBox[{ "known", " ", "center", " ", "of", " ", "opposite", " ", "kind", " ", "and", " ", "its", " ", "radius", "\[IndentingNewLine]", "face"}], ":", " ", RowBox[{ "all", " ", "the", " ", "circles", " ", "of", " ", "its", " ", "kind", " ", "that", " ", "pass", " ", "thru", " ", "that", " ", "opposite", " ", "known", " ", "circle", "\[IndentingNewLine]", RowBox[{"vertices", ":", " ", RowBox[{ "all", " ", "the", " ", "circles", " ", "of", " ", "its", " ", "kind", " ", "that", " ", "are", " ", "tangent", " ", "to", " ", "the", " ", "one", " ", RowBox[{"we", "'"}], "e", " ", "looking", " ", "for"}]}]}]}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"verts", "=", "vertices"}], ",", "i", ",", "j", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Omega]", ",", RowBox[{"face2", "=", "face"}], ",", "b", ",", RowBox[{"b2", "=", "True"}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "||", RowBox[{"MemberQ", "[", RowBox[{"lines", ",", RowBox[{"face2", "[", RowBox[{"[", "1", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "2"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "face2", "]"}]}], "&&", "b2"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{"lines", ",", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"face2", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", ";;"}], "]"}], "]"}], ",", RowBox[{"face2", "[", RowBox[{"[", RowBox[{";;", RowBox[{"i", "-", "1"}]}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"b2", "=", "False"}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"b", "=", "True"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "2"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "face2", "]"}]}], "&&", "b"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{"lines", ",", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"AppendTo", "[", RowBox[{"face2", ",", RowBox[{"face2", "[", RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", RowBox[{ RowBox[{"Length", "[", "face2", "]"}], "-", "1"}]}], ",", RowBox[{"j", ">", "i"}], ",", RowBox[{"j", "--"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Phi]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"j", "+", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "x"}], ",", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"j", "+", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "-", "y"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"j", "+", "1"}], "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", RowBox[{"(*", " ", RowBox[{"j", "+", RowBox[{ "1", " ", "refers", " ", "to", " ", "previously", " ", RowBox[{"computed", " ", "/", " ", "known"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Omega]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"x", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Cos", "[", RowBox[{"\[Phi]", "-", "\[Theta]", "-", "\[Omega]"}], "]"}]}]}], ",", RowBox[{"y", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Sin", "[", RowBox[{"\[Phi]", "-", "\[Theta]", "-", "\[Omega]"}], "]"}]}]}]}], "}"}]}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";", RowBox[{"b", "=", "False"}], ";", "Break"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Phi]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "x"}], ",", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "-", "y"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", RowBox[{"(*", " ", RowBox[{"i", "-", RowBox[{ "1", " ", "refers", " ", "to", " ", "previously", " ", RowBox[{"computed", " ", "/", " ", "known"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Omega]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"x", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Cos", "[", RowBox[{"\[Phi]", "+", "\[Theta]", "+", "\[Omega]"}], "]"}]}]}], ",", RowBox[{"y", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Sin", "[", RowBox[{"\[Phi]", "+", "\[Theta]", "+", "\[Omega]"}], "]"}]}]}]}], "}"}]}]}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Simplify", "[", "verts", "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->CompressedData[" 1:eJwd030w03EcB/BfYk1pbVk7J7ukh9VFD7qo9CBxVnokiVIdPV3tEJ0aGxcT OqQpPW+hh+Uh2wmrXJcukas81LWVMQ1JEyuiOnX93t8/Pvf65/P53H3ufZ+Z EdGBB60oigqgC3JY57PEevO6xgW+52Dr/IHr8FhcUBG8EMorhY7pIjX84j30 AKpXKmqgSWtpgBmfdhrgkfTibrhj/TQzpCT8UahhvvkDCydum5BAKy0PI051 CLGDHr0PiDXe/vZQYjbxYZzVXxG8oGHGwOx5jNPwzo3+NDhDLs2G1LWePBjN nnMNZgQvuQ7DqjzvQLVvHLHYR6mFtcmKF3DQv/kVmdfLW6H8tYMO7vNpbIMN fRtMsGNzJvGhY1QfDLwnH5dIy/FQMqEpt5bYX1m/G6omNRMDu95Fkr4VIxIo y82UwcmqADl0P8jKhxdjh4lJ6wcU0OkevwieaJtQDgtnKzXw1VW7t7AinDJA pt+abpjfpycyunb2wbHt6cTMv1sGYazTo1F4cvS+jZTWWdBKXB2hMybTnj1v 3QmttSWfoYHbRPTgPtmUghxC9UT9GlYFdD7OrYFZvycPwiq+nJFKO8DhOsGy X+XE7l9iIXR5X7IXrhCERELKzf0IlB0OFsGCx5+j4aqli09CXu/VBNihmXoG BjcdyiH9hyrl8NYPr0swLCRRAbek2NyECxiUCrLbh0qgoGiaGh7Xva+Dloj6 dvhMX9sFl/O0/fBTy28L3G1bsDEbd7UJt0JevzwSTkx1OwoZ319GQcpxigSy nb3yoB9LVgidRM+KoSrohxrOuF9dBwN9whvg8zBtE9nvEtoCc4WWHhjDKzXD Tmf78UrkFT+fDfe75TTfpF3pWtEC6yIDdDCFk0MUmoK6Ifco9R0uuiwZg75v hf9gdWWaVQH+xXiJyHZb6wnFedOXwz0Bmu3Q1POQOGLTsQuOffsTDtO+XYmB //ZOj4UOxlnx8KtYJobGpfnJcM6iMzJoK426C2+vNajgsJ20ES5M8mqCxbdP L47/QP+z6xVip+7AXAltvc0yARSc8vmpos2wjyP23p05N+mjed3TtDJX+B/t yqjE "], CellLabel->"In[35]:=",ExpressionUUID->"1669407f-19e4-41f4-83d2-404c097a4b8c"], Cell[BoxData[ RowBox[{ RowBox[{"Cull", "[", "assoc_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"vis", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"unv", "=", RowBox[{"{", "}"}]}], ",", "i"}], "}"}], ",", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"Keys", "[", "assoc", "]"}], "]"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"assoc", "[", RowBox[{ RowBox[{"Keys", "[", "assoc", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"unv", ",", RowBox[{ RowBox[{"Keys", "[", "assoc", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"vis", ",", RowBox[{ RowBox[{"Keys", "[", "assoc", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";", RowBox[{"{", RowBox[{"vis", ",", "unv"}], "}"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.737378883847493*^9, 3.7373790220179577`*^9}}, CellLabel->"In[6]:=",ExpressionUUID->"0ca661cb-0814-4baa-8045-ccb6be11fd34"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Interior", "[", RowBox[{ "n_", ",", "FacesCW_", ",", "LineFaces_", ",", "radii_", ",", "vertices_", ",", "faces_", ",", "d_", ",", "h_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Vunv", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"Funv", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"Vvis", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"Fvis", "=", RowBox[{"{", "}"}]}], ",", "i", ",", "j", ",", "f", ",", RowBox[{"verts", "=", "vertices"}], ",", "verts2", ",", RowBox[{"fcs", "=", "faces"}], ",", "fcs2", ",", "fi", ",", "vi", ",", "x", ",", "y", ",", "k", ",", "b"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"f", "=", RowBox[{"Length", "[", "FacesCW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"Vunv", ",", "i"}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"Vvis", ",", "i"}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "f"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"Funv", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"Fvis", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{ RowBox[{"j", "\[LessEqual]", RowBox[{"n", "+", RowBox[{"Length", "[", "FacesCW", "]"}]}]}], "&&", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Length", "[", "Vunv", "]"}], "+", RowBox[{"Length", "[", "Funv", "]"}]}], ">", "0"}], ")"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "Fvis", "]"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"(*", " ", RowBox[{ "for", " ", "a", " ", "known", " ", "face", " ", "circle"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Length", "[", RowBox[{"Intersection", "[", RowBox[{"Vvis", ",", RowBox[{"Fvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], "]"}], "*", RowBox[{"Length", "[", RowBox[{"Intersection", "[", RowBox[{"Vunv", ",", RowBox[{"Fvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], "]"}]}], ">", "0"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"fi", "=", RowBox[{"Fvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], "=", RowBox[{"fcs", "[", "fi", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"verts2", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "fi", "]"}], ",", "fi", ",", "verts", ",", "radii", ",", RowBox[{"{", RowBox[{ RowBox[{"n", "-", "1"}], ",", "n"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "fcs", ",", "verts2", ",", "radii", ",", "d", ",", "h", ",", "n", ",", RowBox[{"{", RowBox[{ RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}], ",", "0"}], "]"}], ",", RowBox[{"verts", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "fi", "]"}], ",", RowBox[{"Reverse", "[", "fi", "]"}], ",", "verts", ",", "radii", ",", RowBox[{"{", RowBox[{ RowBox[{"n", "-", "1"}], ",", "n"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"verts", "=", "verts2"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"Vvis", ",", "Vunv"}], "}"}], "=", RowBox[{"Cull", "[", "verts", "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "Vvis", "]"}]}], ",", RowBox[{"i", "++"}], ",", " ", RowBox[{"(*", " ", RowBox[{ "for", " ", "a", " ", "known", " ", "vertex", " ", "circle"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"b", "=", "False"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"k", "=", "1"}], ",", RowBox[{"k", "\[LessEqual]", RowBox[{"Length", "[", "Fvis", "]"}]}], ",", RowBox[{"k", "++"}], ",", RowBox[{"b", "=", RowBox[{"b", "||", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Fvis", "[", RowBox[{"[", "k", "]"}], "]"}], ",", RowBox[{"Vvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", "True", ",", "False"}], "]"}]}]}]}], "]"}], ";", "b"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"b", "=", "False"}], ";", RowBox[{"For", "[", RowBox[{ RowBox[{"k", "=", "1"}], ",", RowBox[{"k", "\[LessEqual]", RowBox[{"Length", "[", "Funv", "]"}]}], ",", RowBox[{"k", "++"}], ",", RowBox[{"b", "=", RowBox[{"b", "||", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Funv", "[", RowBox[{"[", "k", "]"}], "]"}], ",", RowBox[{"Vvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", "True", ",", "False"}], "]"}]}]}]}], "]"}], ";", "b"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "then", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vi", "=", RowBox[{"Vvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], "=", RowBox[{"verts", "[", "vi", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"fcs2", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "vi", "]"}], ",", RowBox[{"FacesList", "[", RowBox[{"vi", ",", "FacesCW"}], "]"}], ",", "fcs", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "fcs2", ",", "verts", ",", "radii", ",", "d", ",", "h", ",", "n", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "0"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"fcs", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "vi", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Reverse", "[", RowBox[{"FacesList", "[", RowBox[{"vi", ",", "FacesCW"}], "]"}], "]"}], ",", "fcs", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fcs", "=", "fcs2"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"Fvis", ",", "Funv"}], "}"}], "=", RowBox[{"Cull", "[", "fcs", "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"verts", ",", "fcs"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.737371589519445*^9, 3.7373715939907503`*^9}, { 3.7373717937672253`*^9, 3.737371867174656*^9}, {3.737371907831069*^9, 3.73737217884262*^9}, {3.7373722186269712`*^9, 3.737372303076326*^9}, { 3.737372765799387*^9, 3.737372795651403*^9}, {3.737372858097958*^9, 3.73737290560703*^9}, {3.7373729483086967`*^9, 3.737372962791078*^9}, { 3.737376949244026*^9, 3.737377199857114*^9}, {3.737378821576833*^9, 3.737378856709831*^9}, {3.737379029954533*^9, 3.737379249070065*^9}, { 3.737379302218759*^9, 3.737379442833221*^9}, {3.737379504802657*^9, 3.737379571504554*^9}, {3.73737972110927*^9, 3.737379741421777*^9}, { 3.737380015082492*^9, 3.737380027586205*^9}, {3.737380096483328*^9, 3.737380123433268*^9}, {3.737380170681796*^9, 3.7373801708619337`*^9}, { 3.737380320948838*^9, 3.7373804262726393`*^9}, {3.73738047325154*^9, 3.737380485443796*^9}, {3.737380518592564*^9, 3.737380537424242*^9}, { 3.737380576718589*^9, 3.737380596012712*^9}, {3.7373859949503098`*^9, 3.7373860041894217`*^9}, {3.7373893401960897`*^9, 3.737389340516891*^9}, { 3.737390296785729*^9, 3.7373904116517477`*^9}, {3.7373904724338512`*^9, 3.737390578698831*^9}, {3.737390622302457*^9, 3.737390636926055*^9}, 3.737390871387472*^9, {3.737391458456609*^9, 3.7373915337313957`*^9}, { 3.7373916762920856`*^9, 3.7373916866307707`*^9}, {3.737391755289661*^9, 3.737391760387761*^9}, {3.737392424160388*^9, 3.737392446839201*^9}, { 3.7373926496569033`*^9, 3.7373926770265007`*^9}, {3.737415538959766*^9, 3.737415550423221*^9}, {3.7374157811082497`*^9, 3.737415783008522*^9}, { 3.737416229137042*^9, 3.73741626934859*^9}, {3.737416301320304*^9, 3.7374164268381977`*^9}, {3.737416488079246*^9, 3.737416506542727*^9}, { 3.737418543755864*^9, 3.737418614467947*^9}, {3.73745208819372*^9, 3.7374521079510527`*^9}, {3.737452248507903*^9, 3.737452260807358*^9}, 3.737452337464182*^9, {3.737452547756901*^9, 3.737452552175274*^9}, { 3.737452597327281*^9, 3.737452623027234*^9}, {3.737452951467626*^9, 3.7374529538565903`*^9}, {3.7374529931356688`*^9, 3.73745300450865*^9}, { 3.737453253031118*^9, 3.7374532838306513`*^9}, {3.737453448755361*^9, 3.7374535016621037`*^9}, {3.737453540364457*^9, 3.7374535737880087`*^9}, { 3.7374536292349997`*^9, 3.737453661316655*^9}, {3.737453692604967*^9, 3.737453705446292*^9}, {3.7374538230331917`*^9, 3.737453850633659*^9}, { 3.7374540473125362`*^9, 3.73745406845465*^9}, {3.737454116980228*^9, 3.737454141500236*^9}, {3.737454665545776*^9, 3.737454752199181*^9}, { 3.737454823087352*^9, 3.737454936342786*^9}, {3.73745497887639*^9, 3.7374549822716417`*^9}, {3.737455062923647*^9, 3.737455067024728*^9}, { 3.7374592709534693`*^9, 3.737459282809087*^9}, {3.737459718460556*^9, 3.7374598283067007`*^9}, {3.737459871128312*^9, 3.737459943923081*^9}, { 3.737460424909642*^9, 3.737460468107106*^9}, {3.737460531451869*^9, 3.7374605342064867`*^9}, {3.737460570370933*^9, 3.73746065914788*^9}, { 3.737469228334271*^9, 3.7374692297752113`*^9}, {3.7374759421424723`*^9, 3.737475959220735*^9}, {3.737475996982561*^9, 3.737476043275124*^9}, { 3.7374760741261263`*^9, 3.7374762044096413`*^9}, {3.737476237384112*^9, 3.737476257932431*^9}, {3.737476290722767*^9, 3.7374763178872833`*^9}, { 3.737476633241235*^9, 3.73747668584684*^9}, {3.737476775880768*^9, 3.737476807271324*^9}, {3.737476934280177*^9, 3.7374769365813828`*^9}, { 3.737476994438554*^9, 3.7374770257193117`*^9}, {3.737478615746154*^9, 3.737478664034655*^9}, {3.737478700737122*^9, 3.737478703803566*^9}, { 3.737891193943988*^9, 3.7378911945027657`*^9}, {3.7379034272313843`*^9, 3.737903448515432*^9}, 3.737903546475888*^9}, CellLabel->"In[7]:=",ExpressionUUID->"8eb99bd7-ecdf-447b-9254-91418df0046a"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "fcs2_", ",", "verts_", ",", "radii_", ",", "d_", ",", "h_", ",", "n_", ",", "fls_", ",", "\[Epsilon]_"}], "]"}], RowBox[{"(*", " ", RowBox[{"fcs2", " ", "is", " ", "proposed", " ", "fcs", " ", RowBox[{"association", ".", " ", "fls"}], " ", "is", " ", "facelines"}], " ", "*)"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "j", ",", "b", ",", "b2", ",", "K"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"K", "=", RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"Keys", "[", "fcs2", "]"}], "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{"fls", ",", RowBox[{ RowBox[{"Keys", "[", "fcs2", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"K", ",", RowBox[{ RowBox[{"Keys", "[", "fcs2", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"b", "=", "False"}], ";", " ", RowBox[{"(*", " ", "\"\\"", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "K", "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"b2", "=", "False"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"-", "\[Infinity]"}], "<", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "<", "0"}], "\[IndentingNewLine]", "||", RowBox[{ RowBox[{"-", "\[Infinity]"}], "<", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "\[IndentingNewLine]", "||", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], ">", "d"}], "\[IndentingNewLine]", "||", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], ">", "h"}], "\[IndentingNewLine]", "||", RowBox[{"(", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"n", "-", "1"}]}], "&&", RowBox[{ RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "n"}], "&&", RowBox[{ RowBox[{"verts", "[", RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"EuclideanDistance", "[", RowBox[{ RowBox[{"verts", "[", RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], ",", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}], "\[GreaterEqual]", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Epsilon]"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"radii", "[", RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], "+", RowBox[{"radii", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ")"}]}]}], ",", RowBox[{ RowBox[{"b2", "=", "True"}], ";", "Break"}]}], "]"}]}], "]"}]}], "]"}], ";", "b2"}], ")"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"b", "=", "True"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{ RowBox[{"j", "\[LessEqual]", RowBox[{"Length", "[", "K", "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"i", "\[NotEqual]", "j"}], "&&", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", "\[IndentingNewLine]", RowBox[{ RowBox[{"EuclideanDistance", "[", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}]}], "]"}], "<", RowBox[{ RowBox[{"(", RowBox[{"1", "+", "\[Epsilon]"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"radii", "[", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"radii", "[", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}]}], ")"}]}]}]}], "\[IndentingNewLine]", ",", RowBox[{"(*", " ", RowBox[{"then", ",", " ", "bad"}], " ", "*)"}], " ", RowBox[{"b", "=", "True"}]}], "]"}]}], "]"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"fls", "[", RowBox[{"[", RowBox[{"1", ",", "i"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "\[NotEqual]", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "&&", RowBox[{ RowBox[{"fls", "[", RowBox[{"[", RowBox[{"1", ",", "i"}], "]"}], "]"}], "<", RowBox[{"n", "-", "1"}]}]}], ",", RowBox[{"b", "=", "True"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"fls", "[", RowBox[{"[", RowBox[{"2", ",", "i"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "\[NotEqual]", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "&&", RowBox[{ RowBox[{"fls", "[", RowBox[{"[", RowBox[{"2", ",", "i"}], "]"}], "]"}], "<", RowBox[{"n", "-", "1"}]}]}], ",", RowBox[{"b", "=", "True"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "b"}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7373860513513117`*^9, 3.737386324009047*^9}, { 3.7373863565686207`*^9, 3.737386763058362*^9}, {3.737387011692689*^9, 3.7373874131979523`*^9}, {3.737387444285528*^9, 3.737387446417802*^9}, { 3.737387501724284*^9, 3.7373875162781897`*^9}, {3.7373875865809803`*^9, 3.7373876073787117`*^9}, {3.737387674890192*^9, 3.737387682382772*^9}, { 3.737387740454358*^9, 3.7373877582071867`*^9}, {3.737387870977488*^9, 3.737387912943714*^9}, {3.737388020284473*^9, 3.7373880216503363`*^9}, { 3.7373881133311872`*^9, 3.7373881231093473`*^9}, {3.737388218003031*^9, 3.737388251234787*^9}, {3.737388306336886*^9, 3.7373884325997267`*^9}, { 3.73738859353605*^9, 3.737388596101646*^9}, {3.7373886515625*^9, 3.737388731115857*^9}, {3.737388764603668*^9, 3.7373887825179358`*^9}, { 3.737388827395173*^9, 3.73738885534306*^9}, {3.7373889569580507`*^9, 3.7373891513974247`*^9}, {3.737389185971114*^9, 3.737389229300188*^9}, { 3.7373892871568117`*^9, 3.73738930336942*^9}, {3.737451960169162*^9, 3.737451962438613*^9}, {3.737452188533687*^9, 3.7374522140811863`*^9}, { 3.7374523846778708`*^9, 3.737452411688586*^9}, {3.7374524423850327`*^9, 3.7374525059763308`*^9}, {3.7374527627193413`*^9, 3.7374528272523108`*^9}, {3.7374529127507477`*^9, 3.737452943447597*^9}, { 3.737453021653625*^9, 3.737453033081242*^9}, 3.737453194007431*^9, { 3.737457949590412*^9, 3.737458106215234*^9}, {3.737458155680525*^9, 3.737458160666041*^9}, {3.7374582249762278`*^9, 3.737458233452886*^9}, 3.7379035853422227`*^9, {3.7379952037395506`*^9, 3.7379952046351557`*^9}}, CellLabel->"In[8]:=",ExpressionUUID->"df3b60f9-0301-4a00-901e-3f42ad1f6dcc"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"FacesList", "[", RowBox[{"v_", ",", "Faces_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ContainV", "=", RowBox[{"{", "}"}]}], ",", "i", ",", RowBox[{"L", "=", "2"}], ",", RowBox[{"p", "=", "3"}], ",", "temp"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "Faces", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "v"}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"ContainV", ",", RowBox[{"Faces", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"While", "[", RowBox[{ RowBox[{"L", "<", RowBox[{"Length", "[", "ContainV", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"While", "[", RowBox[{ RowBox[{"p", "\[LessEqual]", RowBox[{"Length", "[", "ContainV", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", RowBox[{"Intersection", "[", RowBox[{ RowBox[{"ContainV", "[", RowBox[{"[", RowBox[{"L", "-", "1"}], "]"}], "]"}], ",", RowBox[{"ContainV", "[", RowBox[{"[", "p", "]"}], "]"}]}], "]"}], "]"}], "\[Equal]", "2"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"temp", "=", RowBox[{"ContainV", "[", RowBox[{"[", "p", "]"}], "]"}]}], ";", RowBox[{ RowBox[{"ContainV", "[", RowBox[{"[", "p", "]"}], "]"}], "=", RowBox[{"ContainV", "[", RowBox[{"[", "L", "]"}], "]"}]}], ";", RowBox[{ RowBox[{"ContainV", "[", RowBox[{"[", "L", "]"}], "]"}], "=", "temp"}], ";", RowBox[{"p", "=", RowBox[{"1", "+", RowBox[{"Length", "[", "ContainV", "]"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{"p", "++"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"L", "++"}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"L", "+", "1"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "ContainV"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7373893963188553`*^9, 3.737389499461423*^9}, { 3.737389625681715*^9, 3.7373896502694798`*^9}, {3.7373897037433033`*^9, 3.737389735684783*^9}, {3.737389775354559*^9, 3.737389877602042*^9}, { 3.737389938671054*^9, 3.737389955021085*^9}, {3.737390098064752*^9, 3.7373901898598967`*^9}, {3.7373902333090754`*^9, 3.737390260404229*^9}, { 3.737477725750886*^9, 3.7374777259423532`*^9}, {3.737477772140749*^9, 3.737477809678876*^9}, {3.737477865110086*^9, 3.7374778881276903`*^9}, { 3.7374781429692793`*^9, 3.737478158525076*^9}, {3.737478266335372*^9, 3.737478275141066*^9}, {3.7374783969519587`*^9, 3.7374784008097754`*^9}, { 3.737903596846489*^9, 3.737903597250413*^9}}, CellLabel->"In[9]:=",ExpressionUUID->"94e58c8f-e9bc-4bc5-9f72-1e7d65b723b4"], Cell[BoxData[ RowBox[{ RowBox[{"Q", "=", RowBox[{"(", GridBox[{ {"0", RowBox[{"1", "/", "2"}], "0", "0"}, { RowBox[{"1", "/", "2"}], "0", "0", "0"}, {"0", "0", RowBox[{"-", "1"}], "0"}, {"0", "0", "0", RowBox[{"-", "1"}]} }], ")"}]}], ";"}]], "Input", CellLabel->"In[10]:=",ExpressionUUID->"e0269727-13f8-41e1-9bed-e3d214f9ade5"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"InvCoords", "[", RowBox[{"z_", ",", "r_", ",", RowBox[{"d_:", "0"}]}], "]"}], ":=", RowBox[{"If", "[", RowBox[{ RowBox[{"r", "\[Equal]", "\[Infinity]"}], ",", RowBox[{"Simplify", "[", RowBox[{"{", RowBox[{ RowBox[{"2", "d"}], ",", "0", ",", "z"}], "}"}], "]"}], ",", RowBox[{"Simplify", "[", RowBox[{"{", RowBox[{ RowBox[{ FractionBox[ SuperscriptBox[ RowBox[{"Norm", "[", "z", "]"}], "2"], "r"], "-", "r"}], ",", RowBox[{"1", "/", "r"}], ",", RowBox[{"z", "/", "r"}]}], "}"}], "]"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7384326280939045`*^9, 3.738432658461647*^9}}, CellLabel->"In[38]:=",ExpressionUUID->"335fc47c-61a3-4d42-b8dc-1a6e429b3dbb"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Gram", "[", "SC_", "]"}], ":=", RowBox[{"SC", ".", "Q", ".", RowBox[{"Transpose", "[", "SC", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SuperCluster", "[", RowBox[{ "vertices_", ",", "faces_", ",", "radii_", ",", "fls_", ",", "d_", ",", "h_", ",", "n_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sc", "=", RowBox[{"{", "}"}]}], ",", "i"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"n", "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], ",", RowBox[{"radii", "[", "i", "]"}]}], "]"}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"vertices", "[", RowBox[{"n", "-", "1"}], "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["h", "2"], "+", RowBox[{ RowBox[{ RowBox[{"vertices", "[", RowBox[{"n", "-", "1"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], FractionBox["h", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"vertices", "[", "n", "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["h", "2"], "+", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "n", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], FractionBox["h", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"Keys", "[", "faces", "]"}], "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{"fls", ",", RowBox[{ RowBox[{"Keys", "[", "faces", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"faces", "[", RowBox[{ RowBox[{"Keys", "[", "faces", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"radii", "[", RowBox[{ RowBox[{"Keys", "[", "faces", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "sc"}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input", CellLabel->"In[12]:=",ExpressionUUID->"8f83b82e-c1db-40d9-ac4c-a723737f7704"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"DrawCircle", "[", RowBox[{"{", RowBox[{"bhat_", ",", "b_", ",", "bx_", ",", "by_"}], "}"}], "]"}], ":=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", "b", "]"}], "\[GreaterEqual]", " ", ".01"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"bx", ",", "by"}], "}"}], "/", "b"}], ",", RowBox[{"1", "/", "b"}]}], "]"}], ",", RowBox[{"InfiniteLine", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"bx", ",", "by"}], "}"}], RowBox[{"bhat", "/", "2"}]}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "by"}], ",", "bx"}], "}"}]}], "]"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7383666121648498`*^9, 3.7383666304241414`*^9}, { 3.738366663056327*^9, 3.738366710683964*^9}, {3.7383669102892475`*^9, 3.73836691462473*^9}}, CellLabel->"In[14]:=",ExpressionUUID->"d37cc6ff-e0b5-488e-9c86-c606b2039282"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Packing", "[", RowBox[{"n_", ",", "FacesCW_", ",", RowBox[{"\[Epsilon]_:", "0"}]}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "radii", ",", "LineFaces", ",", "vertices", ",", "faces", ",", "d", ",", "h"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"radii", ",", "LineFaces"}], "}"}], "=", RowBox[{"EnergySetup", "[", RowBox[{"n", ",", "FacesCW"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"vertices", ",", "faces", ",", "d", ",", "h"}], "}"}], "=", RowBox[{"Boundary", "[", RowBox[{ "n", ",", "FacesCW", ",", "LineFaces", ",", "radii", ",", "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"vertices", ",", "faces"}], "}"}], "=", RowBox[{"Interior", "[", RowBox[{ "n", ",", "FacesCW", ",", "LineFaces", ",", "radii", ",", "vertices", ",", "faces", ",", "d", ",", "h"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "vertices", ",", "faces", ",", "radii", ",", "d", ",", "h", ",", "LineFaces"}], "}"}]}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.737469007369687*^9, 3.737469107407995*^9}, { 3.73746916343927*^9, 3.737469194858486*^9}, {3.737469239984439*^9, 3.737469246965393*^9}, {3.737469315964088*^9, 3.737469336634994*^9}, { 3.737469428057992*^9, 3.737469432696295*^9}, {3.737469465014307*^9, 3.737469481114959*^9}, {3.7374695687460957`*^9, 3.7374696091341476`*^9}, { 3.737470455200612*^9, 3.7374704661283417`*^9}, {3.737478361306628*^9, 3.7374783619053802`*^9}, {3.737720455890616*^9, 3.737720462414033*^9}}, CellLabel->"In[15]:=",ExpressionUUID->"9a3eb7b4-a69e-4770-9009-32f6122d8145"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Render", "[", RowBox[{ "radii_", ",", "fcs_", ",", "verts_", ",", "fls_", ",", "n_", ",", "d_", ",", "h_"}], "]"}], ":=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{"Blue", ",", "Thick", ",", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", RowBox[{"n", "-", "1"}]}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "h"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "h"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", "n"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "0"}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Circle", "[", RowBox[{ RowBox[{"verts", "[", RowBox[{ RowBox[{"Keys", "[", "verts", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"radii", "[", RowBox[{ RowBox[{"Keys", "[", "verts", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Red", ",", "Dashed", ",", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"h", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d", ",", RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", RowBox[{"h", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Circle", "[", RowBox[{ RowBox[{"fcs", "[", RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"radii", "[", RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Length", "[", RowBox[{"Keys", "[", "fcs", "]"}], "]"}]}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7373911026555433`*^9, 3.737391276476068*^9}, { 3.737391324439508*^9, 3.737391325806115*^9}, {3.7373913655803022`*^9, 3.73739137356105*^9}, {3.737460834501174*^9, 3.7374608791258917`*^9}, { 3.737460909495472*^9, 3.737460979640925*^9}, {3.737469858560081*^9, 3.737469918056663*^9}, {3.73746995156046*^9, 3.7374701969102716`*^9}, { 3.737470230362206*^9, 3.737470299948655*^9}, 3.7378928141832247`*^9}, CellLabel->"In[16]:=",ExpressionUUID->"affbea28-f93e-449d-873a-65b52e624ef9"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"SendToInt", "[", RowBox[{"\[Epsilon]_:", "0"}], "]"}], "[", "y_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"x", "=", RowBox[{"Simplify", "[", "y", "]"}]}], "}"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{"x", "-", RowBox[{"Floor", "[", "x", "]"}]}], "]"}], "\[LessEqual]", "\[Epsilon]"}], " ", ",", RowBox[{"Floor", "[", "x", "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{"x", "-", RowBox[{"Ceiling", "[", "x", "]"}]}], "]"}], "\[LessEqual]", " ", "\[Epsilon]"}], " ", ",", RowBox[{"Ceiling", "[", "x", "]"}], ",", "x"}], "]"}], ",", "x"}], "]"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7384110559425135`*^9, 3.7384110603257904`*^9}, { 3.7384111195493803`*^9, 3.7384111627798147`*^9}, {3.738874571476321*^9, 3.7388745834074063`*^9}}, CellLabel->"In[93]:=",ExpressionUUID->"15495297-a588-42f2-9830-ff3a5a9d76a4"], Cell[BoxData[{ RowBox[{ RowBox[{"R", "[", "vhat_", "]"}], ":=", RowBox[{ RowBox[{"IdentityMatrix", "[", "4", "]"}], "+", RowBox[{"2", RowBox[{"Q", ".", RowBox[{"Transpose", "[", RowBox[{"{", "vhat", "}"}], "]"}], ".", RowBox[{"{", "vhat", "}"}]}]}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"BMat", "[", "n_", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"b", "[", RowBox[{"i", ",", "j"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Bend", "[", RowBox[{"V_", ",", "m_"}], "]"}], "[", "i_", "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "sol", ",", "assignments", ",", "rest", ",", "l", ",", "others1", ",", "others2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"sol", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"BMat", "[", "m", "]"}], ".", RowBox[{"(", RowBox[{"V", "[", RowBox[{"[", RowBox[{";;", "m"}], "]"}], "]"}], ")"}]}], "\[Equal]", RowBox[{ RowBox[{"(", RowBox[{"V", "[", RowBox[{"[", RowBox[{";;", "m"}], "]"}], "]"}], ")"}], ".", RowBox[{"R", "[", RowBox[{"V", "[", RowBox[{"[", RowBox[{"m", "+", "i"}], "]"}], "]"}], "]"}]}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"assignments", "=", RowBox[{"Association", "[", "sol", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"rest", "=", RowBox[{"Complement", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"BMat", "[", "m", "]"}], "]"}], ",", RowBox[{"Keys", "[", "assignments", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"l", "=", RowBox[{"Length", "[", "rest", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"others1", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{"rest", "\[Equal]", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "l"}], "}"}]}], "]"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"others2", "=", RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "l"}], ",", RowBox[{"j", "++"}], ",", RowBox[{ RowBox[{"others2", "[", RowBox[{"rest", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "=", SubscriptBox["a", "j"]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"others2", "=", RowBox[{"Normal", "[", "others2", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Column", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"MatrixForm", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"BMat", "[", "m", "]"}], "/.", "assignments"}], ")"}], "/.", "others2"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"BMat", "[", "m", "]"}], "/.", "assignments"}], ")"}], "/.", "others1"}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.7378245147847567`*^9, 3.737824531315222*^9}, { 3.737995674554207*^9, 3.7379956992022705`*^9}, 3.7380623568729105`*^9}, CellLabel->"In[18]:=",ExpressionUUID->"cd35cdcc-79cb-420e-8b24-2c510cf42e01"], Cell[BoxData[ RowBox[{ RowBox[{"Everything", "[", RowBox[{"n_", ",", "FacesCW_", ",", RowBox[{"\[Epsilon]_:", "0"}], ",", "steps_", ",", "sizemax_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"vertices", ",", "faces", ",", RowBox[{"f", "=", RowBox[{"Length", "[", "FacesCW", "]"}]}], ",", "radii", ",", "d", ",", "h", ",", "LineFaces", ",", "Vnye", ",", "Vout", ",", RowBox[{"bends", "=", RowBox[{"{", "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ "vertices", ",", "faces", ",", "radii", ",", "d", ",", "h", ",", "LineFaces"}], "}"}], "=", RowBox[{"Packing", "[", RowBox[{"n", ",", "FacesCW", ",", "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Vnye", "=", RowBox[{ RowBox[{"SendToInt", "[", "\[Epsilon]", "]"}], "//@", RowBox[{"SuperCluster", "[", RowBox[{"vertices", ",", "faces", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "d", ",", "h", ",", "n"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Vout", "=", RowBox[{"MatrixForm", "[", RowBox[{"RootApproximant", "[", "Vnye", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"bends", "=", RowBox[{ RowBox[{"Bend", "[", RowBox[{ RowBox[{"Vout", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "n"}], "]"}], "/@", RowBox[{"Range", "@", "f"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Column", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Render", "[", RowBox[{"radii", ",", "faces", ",", "vertices", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "n", ",", "d", ",", "h"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", RowBox[{"Thick", ",", " ", RowBox[{"DrawCircle", "/@", RowBox[{"Orbit", "[", RowBox[{ RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "f"}], ";;"}], "]"}], "]"}], ",", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}], ",", "steps", ",", "sizemax"}], "]"}]}], ",", "Red", ",", RowBox[{"DrawCircle", "/@", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "f"}], ";;"}], "]"}], "]"}]}], ",", " ", "Blue", ",", " ", RowBox[{"DrawCircle", "/@", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}]}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "d"}], ",", RowBox[{"2", " ", "d"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "1.2"}], " ", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", RowBox[{"h", "+", RowBox[{"1.2", " ", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}]}], "}"}]}], "}"}]}], ",", RowBox[{"PlotRangeClipping", "->", "True"}]}], "]"}], ",", "\[IndentingNewLine]", "Vout", ",", "\[IndentingNewLine]", "bends", ",", "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"RootApproximant", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"SendToInt", "[", "\[Epsilon]", "]"}], "//@", RowBox[{"Gram", "[", RowBox[{"SuperCluster", "[", RowBox[{"vertices", ",", "faces", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "d", ",", "h", ",", "n"}], "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}]}]}], "]"}]}]], "Input", CellChangeTimes->CompressedData[" 1:eJwd030s1HEcB/Dz0NquzUkLIetQzozzEBJWpwultN15duTpyDTkacjDKuXy jzRPx+3acp4iTKdZ1Dxch2O6Vpquc4m0PMxKslZKv/f3j89e++zzeW+ffz7M xEyeUJ9Go/lTBUd7HPvb59Y4HasjQ9BecGEU7veUvYUsPblLB2VV2ZY7nI09 HA1f0B8KILv2Xha8/3iwAE5FZFgx369xzNMl1lA7J3tlQ7lZ8o5o5yGsD6N8 lLTRANXDGp98yjcHbpyB8rnaEKhQzfLhzLBxAunHmESZvDCqhLJLWE70bckb aqMMMOsh5ptc1kHLetkC1BUI1sncVboBzUN7Q1WUxsa2YZBenJMC61S8VDg6 6VUIWUZLJXCySl4ORXuXiLTmibswQyephHL71Ubo6/hACpPFwU9gmlfmAKwR 5z0neb5yBJqulI3D6jYRUfx7RwdXK+kfYYVH+xcYoAteh05x0u9QVrpJnH7J 2IaLd5qIYcOuelOU8ZHlxJi1X5ZQtextBaXpg0egwiCXCZ8aprChQexVNxgX 0XqC5J+xOdCtej4YFhmmXoJd4phwOMDPiIJ0U9ukOM0ax7lfkgprtowyYemt o1mQpqjKhZ3BwnzoovhUBNUWP4iSXpXyGiXz+tAkdP4rVEOWe9JrGDmv/plN eTzt9HY2yTvswPZONjE3MNY8h1K02E0sKFQEwmn/Y0FwatxlHTJWRN9gvcrP MJcyXNxMlHB1FrBRsUgsny22hUldg0SbbgYLNqkMHMhe+IQTDJXYsuGwnbMf jOdunoKefY4BZG8mMQSmTGt5kBXN4MNznWMCWBfTEgc/73HNgL7nPYlnVy6O w5t9PGKvWrBFNEsg5jTf/ge1Xz134V6e68k8ygauhNi+W8svplxIWI6A3iYz FVDpRhfBQxp//VLcp7UygIvzPgeh9M8+U9iquSII/0D9jfUKUU/pnwy5QV3E /zAJWpE= "], CellLabel->"In[94]:=",ExpressionUUID->"b49300f9-4eb0-4e74-b00e-238ad2cc61d5"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Orbit", "[", RowBox[{"co_", ",", "cl_", ",", "steps_", ",", RowBox[{"sizemax_:", "\[Infinity]"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "j", ",", "k", ",", RowBox[{"orbit", "=", "cl"}], ",", "L"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "steps"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"L", "=", RowBox[{"Length", "[", "orbit", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", RowBox[{"Length", "[", "co", "]"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"k", "=", "1"}], ",", RowBox[{"k", "\[LessEqual]", "L"}], ",", RowBox[{"k", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ "orbit", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}]}], ")"}], "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], "\[LessEqual]", "sizemax"}], "&&", RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Round", "[", RowBox[{ RowBox[{"N", "[", "orbit", "]"}], ",", ".0001"}], "]"}], ",", RowBox[{"Round", "[", RowBox[{ RowBox[{"N", "[", RowBox[{ RowBox[{ "orbit", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}]}], "]"}], ",", ".0001"}], "]"}]}], RowBox[{"(*", RowBox[{"new", " ", "thing"}], "*)"}], "]"}]}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"orbit", ",", RowBox[{ RowBox[{ "orbit", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}]}]}], RowBox[{"(*", "newthing", "*)"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "orbit"}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.738062389806858*^9, 3.738062427087122*^9}, { 3.7380625273360224`*^9, 3.7380625840383434`*^9}, {3.738064608037428*^9, 3.738064608439394*^9}, {3.738408767299783*^9, 3.738408799676605*^9}}, CellLabel->"In[22]:=",ExpressionUUID->"b43a5c15-ff8f-4841-a157-1d63bba9b7c4"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Everything", "[", RowBox[{"12", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "5", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "8", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "5", ",", "9", ",", "8"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "1", ",", "6", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "2", ",", "7", ",", "11"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "3", ",", "8", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"8", ",", "9", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "5", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"10", ",", "6", ",", "11"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "12", ",", "11"}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "10", ",", "11", ",", "12"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], "}"}], ",", RowBox[{"1", "/", "100"}], ",", "2", ",", "20"}], "]"}]], "Input", CellChangeTimes->{{3.7388746640237913`*^9, 3.7388746657242126`*^9}}, CellLabel->"In[95]:=",ExpressionUUID->"1571fc8f-6178-4fd6-b368-3e2ac055b580"], Cell[BoxData[ TagBox[GridBox[{ { GraphicsBox[ {RGBColor[0, 0, 1], Thickness[ Large], {CircleBox[{9.79795897113271, 6.999999999999995}], CircleBox[{7.348469228349532, 7.499999999999996}, 1.5], CircleBox[{7.348469228349532, 4.499999999999997}, 1.4999999999999998], CircleBox[{9.79795897113271, 4.999999999999997}, 1.0000000000000002], CircleBox[{11.757550765359248, 6.}, 1.2000000000000004], CircleBox[{9.797958971132708, 9.999999999999996}, 2.0000000000000004], CircleBox[{0, 5.9999999999999964}, 5.9999999999999964], CircleBox[{9.797958971132708, 1.9999999999999976}, 2.], CircleBox[{14.696938456699066, 3.}, 3.], CircleBox[{14.696938456699066, 9.}, 3.], LineBox[{{-5.9999999999999964`, 12.}, {20.69693845669906, 12.}}], LineBox[{{-5.9999999999999964`, 0}, {20.69693845669906, 0}}]}, {RGBColor[1, 0, 0], Dashing[{Small, Small}], CircleBox[{10.410331406828504, 5.999999999999995}, 0.6123724356957947], CircleBox[{8.981462390204983, 7.999999999999995}, 0.8164965809277261], CircleBox[{6.1237243569579425, 5.999999999999996}, 1.2247448713915892], CircleBox[{8.981462390204983, 3.9999999999999973}, 0.816496580927726], CircleBox[{11.430952132988159, 3.999999999999999}, 1.6329931618554525], CircleBox[{11.430952132988162, 7.999999999999997}, 1.6329931618554523], CircleBox[{4.898979485566354, 11.999999999999993}, 4.898979485566354], CircleBox[{4.898979485566354, 0}, 4.898979485566354], CircleBox[{12.247448713915887, 0}, 2.449489742783178], CircleBox[{13.472193585307476, 6.}, 1.2247448713915894], CircleBox[{12.247448713915887, 11.999999999999993}, 2.4494897427831783], LineBox[{{0, -5.9999999999999964`}, {0, 17.999999999999996`}}], LineBox[{{14.696938456699064`, -5.9999999999999964`}, { 14.696938456699064`, 17.999999999999996`}}], CircleBox[{8.57321409974112, 5.999999999999995}, 1.224744871391589]}}]}, { GraphicsBox[ {Thickness[ Large], {CircleBox[{9.79795897113271, 7}], CircleBox[{7.348469228349531, 7.5}, 1.5], CircleBox[{7.348469228349531, 4.499999999999999}, 1.4999999999999998], CircleBox[{9.797958971132708, 5}], CircleBox[{11.757550765359246, 6.000000000000002}, 1.2000000000000004], CircleBox[{9.797958971132708, 10.000000000000002}, 2.0000000000000004], CircleBox[{0., 5.9999999999999964}, 5.9999999999999964], CircleBox[{9.797958971132708, 2.}, 2.], CircleBox[{14.696938456699066, 3.}, 3.], CircleBox[{14.696938456699066, 9.}, 3.], TagBox[ConicHullRegionBox[{0, 12}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"], CircleBox[{10.287856919689442, 6.060000000000034}, 0.06000000000000034], CircleBox[{10.287856919689386, 5.940000000000003}, 0.06000000000000044], CircleBox[{10.39177466635294, 6.121212121212149}, 0.06060606060606061], CircleBox[{10.391774666352902, 5.878787878787896}, 0.060606060606061066], CircleBox[{10.497813183356545, 5.93877551020412}, 0.06122448979591891], CircleBox[{10.497813183356524, 6.061224489795922}, 0.061224489795918546], CircleBox[{8.895515381686305, 7.815789473684234}, 0.07894736842105322], CircleBox[{9.044269819507152, 7.769230769230786}, 0.07692307692307726], CircleBox[{9.16172786911107, 7.87012987012983}, 0.07792207792207735], CircleBox[{8.858428658832317, 7.972602739726021}, 0.08219178082191782], CircleBox[{9.13593471632646, 8.02702702702704}, 0.08108108108108121], CircleBox[{8.981462390204985, 8.08333333333333}, 0.08333333333333323], CircleBox[{6.5319726474218305, 6.11111111111113}, 0.11111111111111147], CircleBox[{6.5319726474218065, 5.888888888888876}, 0.1111111111111111], CircleBox[{6.402626654403555, 5.9999999999999964}, 0.05940594059405927], CircleBox[{6.339855804850584, 6.235294117647055}, 0.11764705882352922], CircleBox[{6.339855804850583, 5.764705882352937}, 0.1176470588235296], CircleBox[{6.298687910013892, 5.938775510204082}, 0.06122448979591846], CircleBox[{6.298687910013889, 6.061224489795915}, 0.0612244897959184], CircleBox[{6.123724356957946, 6.124999999999995}, 0.12499999999999994], CircleBox[{6.123724356957947, 5.8749999999999964}, 0.12500000000000014], CircleBox[{9.044269819507106, 4.230769230769199}, 0.0769230769230765], CircleBox[{8.895515381686259, 4.184210526315779}, 0.07894736842105234], CircleBox[{9.1617278691111, 4.129870129870112}, 0.077922077922077], CircleBox[{8.858428658832317, 4.027397260273969}, 0.08219178082191778], CircleBox[{9.135934716326437, 3.9729729729729635}, 0.08108108108108095], CircleBox[{8.981462390204987, 3.916666666666664}, 0.08333333333333341], CircleBox[{11.022703842524312, 4.7500000000000115}, 0.25000000000000266], CircleBox[{11.022703842524285, 4.3500000000000005}, 0.15000000000000047], CircleBox[{10.688682513962915, 4.090909090909086}, 0.272727272727274], CircleBox[{11.305337274383897, 4.461538461538465}, 0.15384615384615427], CircleBox[{11.122007480745243, 4.0540540540540535}, 0.1621621621621623], CircleBox[{11.757550765359227, 4.499999999999998}, 0.30000000000000104], CircleBox[{11.430952132988168, 4.166666666666666}, 0.16666666666666677], CircleBox[{11.430952132988168, 3.666666666666666}, 0.3333333333333336], CircleBox[{10.688682513962943, 7.909090909090938}, 0.27272727272727265], CircleBox[{11.022703842524304, 7.64999999999999}, 0.14999999999999997], CircleBox[{11.022703842524283, 7.250000000000022}, 0.24999999999999978], CircleBox[{11.12200748074524, 7.945945945945939}, 0.16216216216216203], CircleBox[{11.305337274383911, 7.53846153846155}, 0.15384615384615394], CircleBox[{11.757550765359271, 7.499999999999998}, 0.3000000000000001], CircleBox[{11.430952132988166, 8.333333333333329}, 0.33333333333333315], CircleBox[{11.430952132988166, 7.833333333333331}, 0.16666666666666677], CircleBox[{7.348469228349534, 9.500000000000005}, 0.49999999999999956], CircleBox[{5.878775382679626, 9.000000000000002}, 0.5999999999999999], CircleBox[{6.531972647421804, 9.66666666666666}, 0.33333333333333304], CircleBox[{6.916206332564261, 10.23529411764706}, 0.3529411764705878], CircleBox[{5.878775382679623, 9.999999999999995}, 0.3999999999999997], CircleBox[{6.298687910013885, 10.714285714285712}, 0.4285714285714283], CircleBox[{7.348469228349531, 11.250000000000014}, 0.7499999999999992], CircleBox[{4.898979485566354, 10.999999999999991}, 0.9999999999999998], CircleBox[{6.531972647421805, 2.3333333333333304}, 0.3333333333333329], CircleBox[{5.878775382679624, 2.999999999999996}, 0.5999999999999992], CircleBox[{7.348469228349528, 2.4999999999999956}, 0.4999999999999991], CircleBox[{6.916206332564259, 1.7647058823529371}, 0.3529411764705874], CircleBox[{5.878775382679622, 1.999999999999997}, 0.39999999999999936], CircleBox[{7.348469228349528, 0.7499999999999989}, 0.7499999999999989], CircleBox[{6.298687910013884, 1.2857142857142843}, 0.42857142857142805], CircleBox[{4.898979485566354, 0.9999999999999991}, 0.9999999999999991], CircleBox[{11.975283186939967, 0.7777777777777771}, 0.11111111111111102], CircleBox[{11.870604138103088, 0.5769230769230766}, 0.11538461538461532], CircleBox[{11.547594501692116, 0.6428571428571427}, 0.21428571428571422], CircleBox[{11.757550765359246, 0.9999999999999971}, 0.19999999999999943], CircleBox[{12.162983550371617, 1.034482758620683}, 0.20689655172413662], CircleBox[{12.103361081987464, 0.5882352941176465}, 0.11764705882352931], CircleBox[{11.757550765359253, 0.23999999999999994}, 0.23999999999999994], CircleBox[{12.435871001822266, 0.6923076923076914}, 0.23076923076923045], CircleBox[{12.247448713915887, 0.24999999999999994}, 0.24999999999999994], CircleBox[{13.063945294843574, 6.111111111111105}, 0.11111111111111147], CircleBox[{13.22724461102914, 6.059999999999989}, 0.06000000000000001], CircleBox[{13.227244611029159, 5.94}, 0.06000000000000009], CircleBox[{13.063945294843581, 5.888888888888884}, 0.1111111111111112], CircleBox[{13.256062137414865, 6.2352941176470535}, 0.11764705882352951], CircleBox[{13.33330499164452, 6.000000000000001}, 0.06185567010309279], CircleBox[{13.25606213741484, 5.764705882352929}, 0.11764705882352937], CircleBox[{13.472193585307485, 6.125000000000001}, 0.12500000000000008], CircleBox[{13.472193585307485, 5.875}, 0.12500000000000008], CircleBox[{11.757550765359246, 11.000000000000032}, 0.20000000000000057], CircleBox[{11.547594501692133, 11.35714285714286}, 0.21428571428571455], CircleBox[{11.870604138103085, 11.42307692307691}, 0.11538461538461545], CircleBox[{11.975283186939972, 11.222222222222209}, 0.1111111111111111], CircleBox[{12.162983550371582, 10.965517241379292}, 0.20689655172413693], CircleBox[{11.757550765359255, 11.759999999999991}, 0.23999999999999994], CircleBox[{12.103361081987464, 11.411764705882343}, 0.11764705882352951], CircleBox[{12.4358710018223, 11.307692307692307}, 0.2307692307692312], CircleBox[{12.247448713915894, 11.749999999999993}, 0.2500000000000003], CircleBox[{9.122237662778716, 5.999999999999982}, 0.2068965517241345], CircleBox[{8.709296863229063, 6.444444444444442}, 0.22222222222222082], CircleBox[{8.230285535751475, 5.999999999999994}, 0.23999999999999982], CircleBox[{8.709296863229056, 5.55555555555555}, 0.22222222222222232], CircleBox[{8.818163074019433, 5.87999999999999}, 0.11999999999999988], CircleBox[{8.81816307401943, 6.120000000000001}, 0.11999999999999976], CircleBox[{8.573214099741122, 6.124999999999996}, 0.12499999999999986], CircleBox[{8.573214099741122, 5.874999999999994}, 0.12500000000000008], CircleBox[{-9.79795897113271, 7.}], CircleBox[{-7.348469228349531, 7.5}, 1.5], CircleBox[{-7.348469228349531, 4.499999999999999}, 1.4999999999999998], CircleBox[{-9.797958971132708, 5.}], CircleBox[{-11.757550765359246, 6.000000000000002}, 1.2000000000000004], CircleBox[{-9.797958971132708, 10.000000000000002}, 2.0000000000000004], CircleBox[{-9.797958971132708, 2.}, 2.], CircleBox[{-14.696938456699066, 3.}, 3.], CircleBox[{-14.696938456699066, 9.}, 3.], CircleBox[{19.595917942265416, 7.}], CircleBox[{22.045407685048595, 7.5}, 1.5], CircleBox[{22.045407685048595, 4.499999999999999}, 1.4999999999999998], CircleBox[{19.59591794226542, 5.}], CircleBox[{17.63632614803888, 6.000000000000002}, 1.2000000000000004], CircleBox[{19.59591794226542, 10.000000000000002}, 2.0000000000000004], CircleBox[{29.393876913398127, 5.9999999999999964}, 5.9999999999999964], CircleBox[{19.59591794226542, 2.}, 2.], CircleBox[{10.532805893967655, 5.750000000000085}, 0.05000000000001478], CircleBox[{10.532805893967774, 6.250000000000159}, 0.05000000000000455], CircleBox[{9.381024546829272, 7.978723404255334}, 0.06382978723405568], CircleBox[{8.748177652797034, 8.214285714285657}, 0.07142857142857403], CircleBox[{8.907235428302478, 7.575757575757681}, 0.06060606060605351], CircleBox[{6.259807120445896, 6.388888888888877}, 0.055555555555556], CircleBox[{6.08149177518583, 6.517241379310341}, 0.10344827586207059], CircleBox[{6.0516805409937415, 6.294117647058815}, 0.058823529411764754], CircleBox[{6.081491775185835, 5.482758620689661}, 0.10344827586206952], CircleBox[{6.259807120445903, 5.611111111111107}, 0.05555555555555573], CircleBox[{6.051680540993736, 5.70588235294117}, 0.05882352941176483], CircleBox[{6.845149418188632, 5.999999999999996}, 0.08219178082191902], CircleBox[{9.38102454682908, 4.021276595744573}, 0.06382978723403739], CircleBox[{8.748177652797043, 3.7857142857142643}, 0.07142857142857172], CircleBox[{8.907235428302611, 4.424242424242415}, 0.06060606060605142], CircleBox[{11.328890060372164, 4.812500000000015}, 0.06250000000000061], CircleBox[{11.50195183567754, 4.7608695652174235}, 0.06521739130435014], CircleBox[{10.960428679572177, 3.9152542372881323}, 0.050847457627118786], CircleBox[{10.84774028946836, 3.7857142857142856}, 0.07142857142857181], CircleBox[{11.022703842524294, 3.675000000000005}, 0.07500000000000026], CircleBox[{11.08716409891333, 3.842105263157896}, 0.05263157894736853], CircleBox[{11.458629983189121, 3.20338983050849}, 0.05084745762711887], CircleBox[{11.527010554273716, 3.117647058823544}, 0.05882352941176467], CircleBox[{11.641139371642799, 3.1485148514851926}, 0.05940594059405763], CircleBox[{11.656192569106093, 3.2586206896551815}, 0.051724137931033295], CircleBox[{10.768053918769663, 4.574257425742515}, 0.05940594059405321], CircleBox[{10.688682513962949, 4.424242424242426}, 0.06060606060605836], CircleBox[{11.833898497601835, 4.129870129870136}, 0.0779220779220778], CircleBox[{11.651626884590245, 4.162162162162163}, 0.05405405405405427], CircleBox[{11.595749608037798, 4.018348623853212}, 0.055045871559633135], CircleBox[{11.757550765359245, 3.9200000000000004}, 0.08000000000000027], CircleBox[{11.328890060372117, 7.187499999999932}, 0.06250000000000361], CircleBox[{11.501951835677554, 7.239130434782618}, 0.06521739130434598], CircleBox[{10.847740289468314, 8.214285714285683}, 0.07142857142857194], CircleBox[{10.960428679572166, 8.084745762711863}, 0.050847457627118814], CircleBox[{11.02270384252426, 8.324999999999987}, 0.07500000000000058], CircleBox[{11.08716409891334, 8.157894736842106}, 0.05263157894736838], CircleBox[{11.527010554273824, 8.88235294117656}, 0.058823529411767064], CircleBox[{11.458629983189109, 8.796610169491515}, 0.05084745762711992], CircleBox[{11.641139371642707, 8.851485148514756}, 0.05940594059405405], CircleBox[{11.656192569106132, 8.741379310344788}, 0.05172413793103606], CircleBox[{10.768053918769649, 7.425742574257471}, 0.05940594059405145], CircleBox[{10.688682513962997, 7.575757575757595}, 0.060606060606057895], CircleBox[{11.83389849760183, 7.870129870129854}, 0.0779220779220774], CircleBox[{11.757550765359237, 8.079999999999998}, 0.08000000000000025], CircleBox[{11.595749608037794, 7.981651376146791}, 0.055045871559633065], CircleBox[{11.651626884590252, 7.837837837837845}, 0.054054054054054126], CircleBox[{7.764420316746788, 8.999999999999947}, 0.056603773584907834], CircleBox[{7.735230766683817, 9.105263157894681}, 0.052631578947370035], CircleBox[{7.803684136300316, 9.18584070796463}, 0.053097345132742134], CircleBox[{7.8787711314263245, 8.96907216494846}, 0.06185567010309293], CircleBox[{7.913736092068819, 9.173076923076886}, 0.05769230769230936], CircleBox[{7.960841664045347, 9.062500000000018}, 0.06250000000000022], CircleBox[{5.94876080390203, 8.214285714285678}, 0.07142857142857259], CircleBox[{5.878775382679625, 8.333333333333332}, 0.06666666666666647], CircleBox[{5.878775382679648, 8.079999999999991}, 0.08000000000000046], CircleBox[{5.743631121008838, 8.344827586206902}, 0.06896551724137955], CircleBox[{5.715476066494086, 8.083333333333337}, 0.08333333333333329], CircleBox[{5.65266863719195, 8.230769230769223}, 0.07692307692307701], CircleBox[{6.53197264742182, 10.066666666666665}, 0.06666666666666769], CircleBox[{6.346405242665491, 10.022727272727263}, 0.06818181818181847], CircleBox[{6.49399606226237, 10.255813953488374}, 0.0697674418604653], CircleBox[{6.298687910013882, 10.21428571428571}, 0.07142857142857152], CircleBox[{7.667967890451724, 10.043478260869561}, 0.13043478260869762], CircleBox[{7.504819637463351, 10.148936170212776}, 0.06382978723404248], CircleBox[{7.348469228349552, 10.1}, 0.10000000000000078], CircleBox[{7.607826965820697, 10.23529411764707}, 0.07058823529411762], CircleBox[{7.422696190252084, 10.24242424242424}, 0.06060606060606113], CircleBox[{7.348469228349537, 10.392857142857146}, 0.10714285714285704], CircleBox[{7.69839633446141, 10.42857142857143}, 0.14285714285714243], CircleBox[{7.511768544535076, 10.333333333333336}, 0.06666666666666664], CircleBox[{5.307227776030219, 9.583333333333336}, 0.08333333333333325], CircleBox[{5.187154749423199, 9.352941176470583}, 0.17647058823529382], CircleBox[{5.511351921262147, 9.624999999999996}, 0.12499999999999972], CircleBox[{5.344341256981475, 9.740259740259734}, 0.07792207792207771], CircleBox[{5.132264222974276, 9.619047619047615}, 0.09523809523809504], CircleBox[{5.344341256981476, 9.95454545454545}, 0.1363636363636362], CircleBox[{5.187154749423198, 9.794117647058817}, 0.08823529411764695], CircleBox[{4.898979485566353, 9.799999999999992}, 0.1999999999999998], CircleBox[{8.328265125462849, 11.500000000000032}, 0.10000000000000156], CircleBox[{8.479002955787942, 11.653846153846178}, 0.11538461538461589], CircleBox[{8.319021767942857, 11.7169811320755}, 0.05660377358490542], CircleBox[{8.250912817795975, 11.631578947368434}, 0.052631578947368536], CircleBox[{8.139842837556373, 11.538461538461542}, 0.0923076923076915], CircleBox[{8.398250546685178, 11.877551020408188}, 0.12244897959183655], CircleBox[{8.209100759597664, 11.72972972972972}, 0.05405405405405389], CircleBox[{8.059611411738208, 11.70967741935485}, 0.09677419354838747], CircleBox[{8.164965809277252, 11.88888888888887}, 0.11111111111111094], CircleBox[{6.7832023646303, 9.32307692307698}, 0.09230769230768902], CircleBox[{6.91620633256425, 9.058823529411791}, 0.11764705882352794], CircleBox[{6.598625429538354, 8.938775510204096}, 0.12244897959183655], CircleBox[{6.5319726474217905, 9.238095238095259}, 0.09523809523809472], CircleBox[{6.680426571226842, 9.218181818181835}, 0.054545454545454244], CircleBox[{6.783202364630341, 9.173076923076941}, 0.057692307692307564], CircleBox[{6.73609679265374, 9.062500000000009}, 0.06249999999999992], CircleBox[{6.628031068707419, 9.117647058823529}, 0.058823529411764705], CircleBox[{3.429285639896449, 11.499999999999995}, 0.09999999999999998], CircleBox[{3.1493439550069438, 11.357142857142856}, 0.21428571428571427], CircleBox[{3.458103166282132, 11.117647058823522}, 0.17647058823529405], CircleBox[{3.562894171320985, 11.363636363636354}, 0.09090909090909088], CircleBox[{3.6177079278028463, 11.538461538461531}, 0.09230769230769231], CircleBox[{3.265986323710903, 11.777777777777771}, 0.22222222222222218], CircleBox[{3.7684457581279647, 11.230769230769223}, 0.1538461538461538], CircleBox[{3.8676153833418585, 11.526315789473674}, 0.1578947368421052], CircleBox[{3.674234614174766, 11.812499999999995}, 0.1874999999999999], CircleBox[{6.368673331236261, 11.499999999999998}, 0.09999999999999998], CircleBox[{6.217935500911142, 11.653846153846148}, 0.11538461538461536], CircleBox[{6.081491775185816, 11.482758620689646}, 0.10344827586206891], CircleBox[{6.235064799811723, 11.36363636363636}, 0.09090909090909086], CircleBox[{6.452314444404467, 11.268292682926829}, 0.14634146341463397], CircleBox[{6.531972647421809, 11.77777777777778}, 0.22222222222222235], CircleBox[{5.878775382679626, 11.759999999999996}, 0.23999999999999982], CircleBox[{6.029513213004742, 11.230769230769221}, 0.15384615384615377], CircleBox[{5.878775382679642, 3.666666666666678}, 0.06666666666666687], CircleBox[{5.948760803902007, 3.7857142857142936}, 0.07142857142857173], CircleBox[{5.743631121008839, 3.655172413793124}, 0.06896551724137963], CircleBox[{5.87877538267963, 3.920000000000008}, 0.08000000000000036], CircleBox[{5.65266863719195, 3.7692307692307727}, 0.07692307692307702], CircleBox[{5.715476066494082, 3.9166666666666696}, 0.08333333333333354], CircleBox[{7.735230766683729, 2.8947368421052606}, 0.05263157894736848], CircleBox[{7.764420316746664, 2.9999999999999916}, 0.05660377358490544], CircleBox[{7.803684136300366, 2.814159292035369}, 0.05309734513274241], CircleBox[{7.8787711314263085, 3.0309278350515454}, 0.06185567010309279], CircleBox[{7.913736092068719, 2.82692307692307}, 0.05769230769230759], CircleBox[{7.960841664045331, 2.9375000000000004}, 0.06250000000000011], CircleBox[{7.348469228349542, 1.9000000000000075}, 0.10000000000000121], CircleBox[{7.504819637463349, 1.8510638297872353}, 0.06382978723404278], CircleBox[{7.667967890451671, 1.9565217391304357}, 0.13043478260869645], CircleBox[{7.422696190252058, 1.7575757575757611}, 0.060606060606060844], CircleBox[{7.607826965820694, 1.764705882352943}, 0.07058823529411778], CircleBox[{7.34846922834952, 1.6071428571428534}, 0.1071428571428573], CircleBox[{7.511768544535085, 1.6666666666666685}, 0.06666666666666679], CircleBox[{7.698396334461422, 1.5714285714285734}, 0.14285714285714318], CircleBox[{6.3464052426655035, 1.9772727272727357}, 0.0681818181818182], CircleBox[{6.5319726474218, 1.933333333333337}, 0.06666666666666653], CircleBox[{6.49399606226238, 1.744186046511626}, 0.06976744186046507], CircleBox[{6.298687910013886, 1.7857142857142843}, 0.07142857142857137], CircleBox[{5.511351921262149, 2.375000000000001}, 0.12499999999999986], CircleBox[{5.187154749423199, 2.6470588235294126}, 0.1764705882352941], CircleBox[{5.307227776030215, 2.416666666666664}, 0.08333333333333322], CircleBox[{5.344341256981477, 2.25974025974026}, 0.07792207792207784], CircleBox[{5.132264222974275, 2.380952380952381}, 0.0952380952380952], CircleBox[{5.187154749423198, 2.2058823529411757}, 0.08823529411764701], CircleBox[{5.344341256981479, 2.045454545454548}, 0.13636363636363621], CircleBox[{4.898979485566355, 2.199999999999999}, 0.2], CircleBox[{8.250912817795946, 0.3684210526315772}, 0.05263157894736817], CircleBox[{8.319021767942862, 0.2830188679245279}, 0.05660377358490558], CircleBox[{8.479002955787909, 0.34615384615384515}, 0.11538461538461504], CircleBox[{8.328265125462794, 0.49999999999999756}, 0.0999999999999995], CircleBox[{8.139842837556385, 0.46153846153845735}, 0.09230769230769147], CircleBox[{8.209100759597673, 0.27027027027026984}, 0.054054054054053974], CircleBox[{8.39825054668518, 0.12244897959183672}, 0.12244897959183672], CircleBox[{8.059611411738178, 0.2903225806451599}, 0.09677419354838664], CircleBox[{8.164965809277257, 0.11111111111111106}, 0.11111111111111106], CircleBox[{6.783202364630307, 2.676923076923035}, 0.09230769230768959], CircleBox[{6.531972647421795, 2.761904761904748}, 0.0952380952380942], CircleBox[{6.598625429538359, 3.061224489795919}, 0.1224489795918368], CircleBox[{6.916206332564242, 2.9411764705882146}, 0.11764705882352874], CircleBox[{6.7832023646303305, 2.826923076923066}, 0.05769230769230751], CircleBox[{6.68042657122684, 2.781818181818175}, 0.05454545454545429], CircleBox[{6.628031068707424, 2.8823529411764706}, 0.058823529411764684], CircleBox[{6.73609679265374, 2.937500000000001}, 0.06250000000000012], CircleBox[{3.562894171320986, 0.6363636363636361}, 0.09090909090909087], CircleBox[{3.4581031662821333, 0.8823529411764702}, 0.17647058823529405], CircleBox[{3.1493439550069424, 0.6428571428571425}, 0.21428571428571416], CircleBox[{3.429285639896449, 0.49999999999999983}, 0.09999999999999996], CircleBox[{3.6177079278028472, 0.46153846153846145}, 0.09230769230769229], CircleBox[{3.7684457581279656, 0.7692307692307688}, 0.15384615384615377], CircleBox[{3.2659863237109032, 0.22222222222222213}, 0.22222222222222213], CircleBox[{3.6742346141747664, 0.18749999999999992}, 0.18749999999999992], CircleBox[{3.867615383341859, 0.4736842105263155}, 0.15789473684210517], CircleBox[{6.235064799811725, 0.6363636363636362}, 0.09090909090909088], CircleBox[{6.081491775185819, 0.5172413793103448}, 0.10344827586206895], CircleBox[{6.2179355009111426, 0.3461538461538461}, 0.11538461538461536], CircleBox[{6.368673331236262, 0.4999999999999998}, 0.09999999999999995], CircleBox[{6.452314444404465, 0.7317073170731693}, 0.14634146341463386], CircleBox[{6.029513213004745, 0.7692307692307693}, 0.15384615384615385], CircleBox[{5.878775382679626, 0.23999999999999982}, 0.23999999999999982], CircleBox[{6.5319726474218065, 0.2222222222222221}, 0.2222222222222221], CircleBox[{11.941262496067976, 1.1875000000000198}, 0.06250000000000155], CircleBox[{11.757550765359209, 1.285714285714248}, 0.08571428571428369], CircleBox[{11.865418203573523, 1.37614678899084}, 0.05504587155963366], CircleBox[{12.103361081987416, 1.3235294117646732}, 0.08823529411764522], CircleBox[{11.975283186939958, 1.3888888888889055}, 0.05555555555555626], CircleBox[{11.897521607804004, 1.5714285714285954}, 0.14285714285714518], CircleBox[{11.345005124469434, 0.36842105263157837}, 0.05263157894736834], CircleBox[{11.470781234496819, 0.3658536585365851}, 0.07317073170731701], CircleBox[{11.26765281680259, 0.4999999999999989}, 0.09999999999999978], CircleBox[{11.229121517477918, 0.33707865168539175}, 0.06741573033707834], CircleBox[{11.38681718266774, 0.2702702702702698}, 0.05405405405405395], CircleBox[{11.022703842524306, 0.18749999999999967}, 0.18749999999999967], CircleBox[{11.279045792350447, 0.2093023255813953}, 0.0697674418604651], CircleBox[{11.43095213298816, 0.11111111111111106}, 0.11111111111111106], CircleBox[{12.679711609701151, 0.4117647058823529}, 0.058823529411764705], CircleBox[{12.639367072761184, 0.30000000000000004}, 0.06000000000000001], CircleBox[{12.763130765028123, 0.2368421052631579}, 0.07894736842105264], CircleBox[{12.81271557763506, 0.38461538461538425}, 0.07692307692307684], CircleBox[{12.75583337751237, 0.5660377358490533}, 0.11320754716981066], CircleBox[{12.541387483049869, 0.40000000000000024}, 0.08000000000000004], CircleBox[{12.597375820027763, 0.12244897959183672}, 0.12244897959183672], CircleBox[{13.063945294843574, 0.22222222222222188}, 0.22222222222222188], CircleBox[{12.982295636750688, 5.749999999999935}, 0.05000000000000433], CircleBox[{12.967886873558001, 5.558823529411833}, 0.08823529411764001], CircleBox[{13.149892303362257, 5.631578947368445}, 0.05263157894737027], CircleBox[{12.982295636750852, 6.250000000000017}, 0.050000000000000495], CircleBox[{12.967886873557807, 6.44117647058829}, 0.08823529411765385], CircleBox[{13.149892303362263, 6.368421052631548}, 0.05263157894736905], CircleBox[{13.865036279904764, 6.0000000000000275}, 0.11320754716981056], CircleBox[{13.657760990063773, 6.121212121212106}, 0.06060606060606105], CircleBox[{13.657760990063768, 5.878787878787872}, 0.0606060606060608], CircleBox[{11.757550765359168, 10.714285714285614}, 0.0857142857142885], CircleBox[{11.94126249606797, 10.812499999999964}, 0.06250000000000078], CircleBox[{11.865418203573565, 10.623853211009171}, 0.0550458715596334], CircleBox[{12.103361081987433, 10.67647058823528}, 0.08823529411764842], CircleBox[{11.897521607803949, 10.428571428571344}, 0.14285714285714257], CircleBox[{11.975283186939937, 10.611111111111086}, 0.055555555555555816], CircleBox[{11.267652816802604, 11.499999999999968}, 0.10000000000000071], CircleBox[{11.470781234496828, 11.634146341463389}, 0.07317073170731728], CircleBox[{11.345005124469429, 11.631578947368403}, 0.05263157894736818], CircleBox[{11.2291215174779, 11.662921348314583}, 0.06741573033707861], CircleBox[{11.386817182667729, 11.729729729729709}, 0.054054054054054015], CircleBox[{11.279045792350436, 11.790697674418594}, 0.06976744186046514], CircleBox[{11.022703842524338, 11.812500000000082}, 0.18750000000000366], CircleBox[{11.430952132988166, 11.88888888888886}, 0.11111111111111084], CircleBox[{12.812715577635093, 11.615384615384606}, 0.0769230769230771], CircleBox[{12.763130765028134, 11.763157894736823}, 0.07894736842105278], CircleBox[{12.6393670727612, 11.699999999999987}, 0.06000000000000011], CircleBox[{12.679711609701151, 11.588235294117645}, 0.05882352941176478], CircleBox[{12.755833377512394, 11.43396226415093}, 0.11320754716981112], CircleBox[{13.063945294843604, 11.77777777777774}, 0.22222222222222293], CircleBox[{12.597375820027775, 11.877551020408156}, 0.12244897959183687], CircleBox[{12.541387483049874, 11.600000000000001}, 0.08000000000000015], CircleBox[{9.063112048297775, 5.750000000000001}, 0.05000000000000327], CircleBox[{8.967623465104484, 5.6440677966101624}, 0.05084745762711764], CircleBox[{8.967623465104479, 6.355932203389804}, 0.05084745762712102], CircleBox[{9.063112048297707, 6.249999999999966}, 0.05000000000000064], CircleBox[{8.437131336253126, 6.388888888888875}, 0.055555555555555816], CircleBox[{8.31902176794283, 6.2830188679245005}, 0.05660377358490587], CircleBox[{8.319021767942848, 5.716981132075454}, 0.05660377358490565], CircleBox[{8.437131336253167, 5.611111111111095}, 0.05555555555555555], CircleBox[{-10.287856919689442, 6.060000000000034}, 0.06000000000000034], CircleBox[{-10.287856919689386, 5.940000000000003}, 0.06000000000000044], CircleBox[{-10.39177466635294, 6.121212121212149}, 0.06060606060606061], CircleBox[{-10.391774666352902, 5.878787878787896}, 0.060606060606061066], CircleBox[{-10.497813183356545, 5.93877551020412}, 0.06122448979591891], CircleBox[{-10.497813183356524, 6.061224489795922}, 0.061224489795918546], CircleBox[{-8.895515381686305, 7.815789473684234}, 0.07894736842105322], CircleBox[{-9.044269819507152, 7.769230769230786}, 0.07692307692307726], CircleBox[{-9.16172786911107, 7.87012987012983}, 0.07792207792207735], CircleBox[{-8.858428658832317, 7.972602739726021}, 0.08219178082191782], CircleBox[{-9.13593471632646, 8.02702702702704}, 0.08108108108108121], CircleBox[{-8.981462390204985, 8.08333333333333}, 0.08333333333333323], CircleBox[{-6.5319726474218305, 6.11111111111113}, 0.11111111111111147], CircleBox[{-6.5319726474218065, 5.888888888888876}, 0.1111111111111111], CircleBox[{-6.402626654403555, 5.9999999999999964}, 0.05940594059405927], CircleBox[{-6.339855804850584, 6.235294117647055}, 0.11764705882352922], CircleBox[{-6.339855804850583, 5.764705882352937}, 0.1176470588235296], CircleBox[{-6.298687910013892, 5.938775510204082}, 0.06122448979591846], CircleBox[{-6.298687910013889, 6.061224489795915}, 0.0612244897959184], CircleBox[{-6.123724356957946, 6.124999999999995}, 0.12499999999999994], CircleBox[{-6.123724356957947, 5.8749999999999964}, 0.12500000000000014], CircleBox[{-9.044269819507106, 4.230769230769199}, 0.0769230769230765], CircleBox[{-8.895515381686259, 4.184210526315779}, 0.07894736842105234], CircleBox[{-9.1617278691111, 4.129870129870112}, 0.077922077922077], CircleBox[{-8.858428658832317, 4.027397260273969}, 0.08219178082191778], CircleBox[{-9.135934716326437, 3.9729729729729635}, 0.08108108108108095], CircleBox[{-8.981462390204987, 3.916666666666664}, 0.08333333333333341], CircleBox[{-11.022703842524312, 4.7500000000000115}, 0.25000000000000266], CircleBox[{-11.022703842524285, 4.3500000000000005}, 0.15000000000000047], CircleBox[{-10.688682513962915, 4.090909090909086}, 0.272727272727274], CircleBox[{-11.305337274383897, 4.461538461538465}, 0.15384615384615427], CircleBox[{-11.122007480745243, 4.0540540540540535}, 0.1621621621621623], CircleBox[{-11.757550765359227, 4.499999999999998}, 0.30000000000000104], CircleBox[{-11.430952132988168, 4.166666666666666}, 0.16666666666666677], CircleBox[{-11.430952132988168, 3.666666666666666}, 0.3333333333333336], CircleBox[{-10.688682513962943, 7.909090909090938}, 0.27272727272727265], CircleBox[{-11.022703842524304, 7.64999999999999}, 0.14999999999999997], CircleBox[{-11.022703842524283, 7.250000000000022}, 0.24999999999999978], CircleBox[{-11.12200748074524, 7.945945945945939}, 0.16216216216216203], CircleBox[{-11.305337274383911, 7.53846153846155}, 0.15384615384615394], CircleBox[{-11.757550765359271, 7.499999999999998}, 0.3000000000000001], CircleBox[{-11.430952132988166, 8.333333333333329}, 0.33333333333333315], CircleBox[{-11.430952132988166, 7.833333333333331}, 0.16666666666666677], CircleBox[{-7.348469228349534, 9.500000000000005}, 0.49999999999999956], CircleBox[{-5.878775382679626, 9.000000000000002}, 0.5999999999999999], CircleBox[{-6.531972647421804, 9.66666666666666}, 0.33333333333333304], CircleBox[{-6.916206332564261, 10.23529411764706}, 0.3529411764705878], CircleBox[{-5.878775382679623, 9.999999999999995}, 0.3999999999999997], CircleBox[{-6.298687910013885, 10.714285714285712}, 0.4285714285714283], CircleBox[{-7.348469228349531, 11.250000000000014}, 0.7499999999999992], CircleBox[{-4.898979485566354, 10.999999999999991}, 0.9999999999999998], CircleBox[{-6.531972647421805, 2.3333333333333304}, 0.3333333333333329], CircleBox[{-5.878775382679624, 2.999999999999996}, 0.5999999999999992], CircleBox[{-7.348469228349528, 2.4999999999999956}, 0.4999999999999991], CircleBox[{-6.916206332564259, 1.7647058823529371}, 0.3529411764705874], CircleBox[{-5.878775382679622, 1.999999999999997}, 0.39999999999999936], CircleBox[{-7.348469228349528, 0.7499999999999989}, 0.7499999999999989], CircleBox[{-6.298687910013884, 1.2857142857142843}, 0.42857142857142805], CircleBox[{-4.898979485566354, 0.9999999999999991}, 0.9999999999999991], CircleBox[{-11.975283186939967, 0.7777777777777771}, 0.11111111111111102], CircleBox[{-11.870604138103088, 0.5769230769230766}, 0.11538461538461532], CircleBox[{-11.547594501692116, 0.6428571428571427}, 0.21428571428571422], CircleBox[{-11.757550765359246, 0.9999999999999971}, 0.19999999999999943], CircleBox[{-12.162983550371617, 1.034482758620683}, 0.20689655172413662], CircleBox[{-12.103361081987464, 0.5882352941176465}, 0.11764705882352931], CircleBox[{-11.757550765359253, 0.23999999999999994}, 0.23999999999999994], CircleBox[{-12.435871001822266, 0.6923076923076914}, 0.23076923076923045], CircleBox[{-12.247448713915887, 0.24999999999999994}, 0.24999999999999994], CircleBox[{-13.063945294843574, 6.111111111111105}, 0.11111111111111147], CircleBox[{-13.22724461102914, 6.059999999999989}, 0.06000000000000001], CircleBox[{-13.227244611029159, 5.94}, 0.06000000000000009], CircleBox[{-13.063945294843581, 5.888888888888884}, 0.1111111111111112], CircleBox[{-13.256062137414865, 6.2352941176470535}, 0.11764705882352951], CircleBox[{-13.33330499164452, 6.000000000000001}, 0.06185567010309279], CircleBox[{-13.25606213741484, 5.764705882352929}, 0.11764705882352937], CircleBox[{-13.472193585307485, 6.125000000000001}, 0.12500000000000008], CircleBox[{-13.472193585307485, 5.875}, 0.12500000000000008], CircleBox[{-11.757550765359246, 11.000000000000032}, 0.20000000000000057], CircleBox[{-11.547594501692133, 11.35714285714286}, 0.21428571428571455], CircleBox[{-11.870604138103085, 11.42307692307691}, 0.11538461538461545], CircleBox[{-11.975283186939972, 11.222222222222209}, 0.1111111111111111], CircleBox[{-12.162983550371582, 10.965517241379292}, 0.20689655172413693], CircleBox[{-11.757550765359255, 11.759999999999991}, 0.23999999999999994], CircleBox[{-12.103361081987464, 11.411764705882343}, 0.11764705882352951], CircleBox[{-12.4358710018223, 11.307692307692307}, 0.2307692307692312], CircleBox[{-12.247448713915894, 11.749999999999993}, 0.2500000000000003], CircleBox[{-9.122237662778716, 5.999999999999982}, 0.2068965517241345], CircleBox[{-8.709296863229063, 6.444444444444442}, 0.22222222222222082], CircleBox[{-8.230285535751475, 5.999999999999994}, 0.23999999999999982], CircleBox[{-8.709296863229056, 5.55555555555555}, 0.22222222222222232], CircleBox[{-8.818163074019433, 5.87999999999999}, 0.11999999999999988], CircleBox[{-8.81816307401943, 6.120000000000001}, 0.11999999999999976], CircleBox[{-8.573214099741122, 6.124999999999996}, 0.12499999999999986], CircleBox[{-8.573214099741122, 5.874999999999994}, 0.12500000000000008], CircleBox[{-19.595917942265416, 7.}], CircleBox[{-22.045407685048595, 7.5}, 1.5], CircleBox[{-22.045407685048595, 4.499999999999999}, 1.4999999999999998], CircleBox[{-19.59591794226542, 5.}], CircleBox[{-17.63632614803888, 6.000000000000002}, 1.2000000000000004], CircleBox[{-19.59591794226542, 10.000000000000002}, 2.0000000000000004], CircleBox[{-29.393876913398127, 5.9999999999999964}, 5.9999999999999964], CircleBox[{-19.59591794226542, 2.}, 2.], CircleBox[{19.106019993708685, 6.060000000000034}, 0.06000000000000034], CircleBox[{19.106019993708742, 5.940000000000003}, 0.06000000000000044], CircleBox[{19.002102247045187, 6.121212121212149}, 0.06060606060606061], CircleBox[{19.002102247045226, 5.878787878787896}, 0.060606060606061066], CircleBox[{18.896063730041583, 5.93877551020412}, 0.06122448979591891], CircleBox[{18.896063730041604, 6.061224489795922}, 0.061224489795918546], CircleBox[{20.498361531711822, 7.815789473684234}, 0.07894736842105322], CircleBox[{20.349607093890974, 7.769230769230786}, 0.07692307692307726], CircleBox[{20.23214904428706, 7.87012987012983}, 0.07792207792207735], CircleBox[{20.53544825456581, 7.972602739726021}, 0.08219178082191782], CircleBox[{20.25794219707167, 8.02702702702704}, 0.08108108108108121], CircleBox[{20.412414523193142, 8.08333333333333}, 0.08333333333333323], CircleBox[{22.861904265976296, 6.11111111111113}, 0.11111111111111147], CircleBox[{22.86190426597632, 5.888888888888876}, 0.1111111111111111], CircleBox[{22.991250258994572, 5.9999999999999964}, 0.05940594059405927], CircleBox[{23.054021108547545, 6.235294117647055}, 0.11764705882352922], CircleBox[{23.05402110854754, 5.764705882352937}, 0.1176470588235296], CircleBox[{23.095189003384235, 5.938775510204082}, 0.06122448979591846], CircleBox[{23.095189003384238, 6.061224489795915}, 0.0612244897959184], CircleBox[{23.270152556440184, 6.124999999999995}, 0.12499999999999994], CircleBox[{23.270152556440184, 5.8749999999999964}, 0.12500000000000014], CircleBox[{20.349607093891017, 4.230769230769199}, 0.0769230769230765], CircleBox[{20.49836153171187, 4.184210526315779}, 0.07894736842105234], CircleBox[{20.232149044287027, 4.129870129870112}, 0.077922077922077], CircleBox[{20.535448254565807, 4.027397260273969}, 0.08219178082191778], CircleBox[{20.25794219707169, 3.9729729729729635}, 0.08108108108108095], CircleBox[{20.412414523193142, 3.916666666666664}, 0.08333333333333341], CircleBox[{18.371173070873816, 4.7500000000000115}, 0.25000000000000266], CircleBox[{18.371173070873844, 4.3500000000000005}, 0.15000000000000047], CircleBox[{18.705194399435214, 4.090909090909086}, 0.272727272727274], CircleBox[{18.088539639014233, 4.461538461538465}, 0.15384615384615427], CircleBox[{18.271869432652885, 4.0540540540540535}, 0.1621621621621623], CircleBox[{17.636326148038897, 4.499999999999998}, 0.30000000000000104], CircleBox[{17.962924780409963, 4.166666666666666}, 0.16666666666666677], CircleBox[{17.962924780409963, 3.666666666666666}, 0.3333333333333336], CircleBox[{18.705194399435186, 7.909090909090938}, 0.27272727272727265], CircleBox[{18.371173070873823, 7.64999999999999}, 0.14999999999999997], CircleBox[{18.37117307087384, 7.250000000000022}, 0.24999999999999978], CircleBox[{18.27186943265289, 7.945945945945939}, 0.16216216216216203], CircleBox[{18.08853963901422, 7.53846153846155}, 0.15384615384615394], CircleBox[{17.636326148038854, 7.499999999999998}, 0.3000000000000001], CircleBox[{17.962924780409963, 8.333333333333329}, 0.33333333333333315], CircleBox[{17.962924780409963, 7.833333333333331}, 0.16666666666666677], CircleBox[{22.04540768504859, 9.500000000000005}, 0.49999999999999956], CircleBox[{23.515101530718503, 9.000000000000002}, 0.5999999999999999], CircleBox[{22.861904265976325, 9.66666666666666}, 0.33333333333333304], CircleBox[{22.477670580833863, 10.23529411764706}, 0.3529411764705878], CircleBox[{23.515101530718503, 9.999999999999995}, 0.3999999999999997], CircleBox[{23.095189003384245, 10.714285714285712}, 0.4285714285714283], CircleBox[{22.0454076850486, 11.250000000000014}, 0.7499999999999992], CircleBox[{24.494897427831773, 10.999999999999991}, 0.9999999999999998], CircleBox[{22.861904265976325, 2.3333333333333304}, 0.3333333333333329], CircleBox[{23.515101530718496, 2.999999999999996}, 0.5999999999999992], CircleBox[{22.0454076850486, 2.4999999999999956}, 0.4999999999999991], CircleBox[{22.47767058083387, 1.7647058823529371}, 0.3529411764705874], CircleBox[{23.515101530718503, 1.999999999999997}, 0.39999999999999936], CircleBox[{22.045407685048602, 0.7499999999999989}, 0.7499999999999989], CircleBox[{23.095189003384245, 1.2857142857142843}, 0.42857142857142805], CircleBox[{24.494897427831773, 0.9999999999999991}, 0.9999999999999991], CircleBox[{17.41859372645816, 0.7777777777777771}, 0.11111111111111102], CircleBox[{17.523272775295037, 0.5769230769230766}, 0.11538461538461532], CircleBox[{17.846282411706007, 0.6428571428571427}, 0.21428571428571422], CircleBox[{17.636326148038883, 0.9999999999999971}, 0.19999999999999943], CircleBox[{17.23089336302651, 1.034482758620683}, 0.20689655172413662], CircleBox[{17.290515831410666, 0.5882352941176465}, 0.11764705882352931], CircleBox[{17.636326148038872, 0.23999999999999994}, 0.23999999999999994], CircleBox[{16.958005911575864, 0.6923076923076914}, 0.23076923076923045], CircleBox[{17.14642819948224, 0.24999999999999994}, 0.24999999999999994], CircleBox[{16.329931618554554, 6.111111111111105}, 0.11111111111111147], CircleBox[{16.16663230236899, 6.059999999999989}, 0.06000000000000001], CircleBox[{16.16663230236897, 5.94}, 0.06000000000000009], CircleBox[{16.329931618554546, 5.888888888888884}, 0.1111111111111112], CircleBox[{16.137814775983262, 6.2352941176470535}, 0.11764705882352951], CircleBox[{16.060571921753606, 6.000000000000001}, 0.06185567010309279], CircleBox[{16.13781477598329, 5.764705882352929}, 0.11764705882352937], CircleBox[{15.921683328090644, 6.125000000000001}, 0.12500000000000008], CircleBox[{15.921683328090644, 5.875}, 0.12500000000000008], CircleBox[{17.63632614803888, 11.000000000000032}, 0.20000000000000057], CircleBox[{17.846282411705992, 11.35714285714286}, 0.21428571428571455], CircleBox[{17.52327277529504, 11.42307692307691}, 0.11538461538461545], CircleBox[{17.418593726458155, 11.222222222222209}, 0.1111111111111111], CircleBox[{17.23089336302655, 10.965517241379292}, 0.20689655172413693], CircleBox[{17.636326148038872, 11.759999999999991}, 0.23999999999999994], CircleBox[{17.290515831410666, 11.411764705882343}, 0.11764705882352951], CircleBox[{16.958005911575825, 11.307692307692307}, 0.2307692307692312], CircleBox[{17.146428199482237, 11.749999999999993}, 0.2500000000000003], CircleBox[{20.271639250619415, 5.999999999999982}, 0.2068965517241345], CircleBox[{20.684580050169064, 6.444444444444442}, 0.22222222222222082], CircleBox[{21.163591377646654, 5.999999999999994}, 0.23999999999999982], CircleBox[{20.684580050169075, 5.55555555555555}, 0.22222222222222232], CircleBox[{20.575713839378693, 5.87999999999999}, 0.11999999999999988], CircleBox[{20.575713839378697, 6.120000000000001}, 0.11999999999999976], CircleBox[{20.820662813657005, 6.124999999999996}, 0.12499999999999986], CircleBox[{20.820662813657002, 5.874999999999994}, 0.12500000000000008], CircleBox[{39.19183588453084, 7.}], CircleBox[{36.74234614174765, 7.5}, 1.5], CircleBox[{36.74234614174765, 4.499999999999999}, 1.4999999999999998], CircleBox[{39.19183588453083, 5.}], CircleBox[{41.15142767875737, 6.000000000000002}, 1.2000000000000004], CircleBox[{39.19183588453083, 10.000000000000002}, 2.0000000000000004], CircleBox[{39.19183588453083, 2.}, 2.], CircleBox[{44.09081537009719, 3.}, 3.], CircleBox[{44.09081537009719, 9.}, 3.]}, {RGBColor[1, 0, 0], CircleBox[{10.41033140682851, 5.999999999999995}, 0.6123724356957947], CircleBox[{8.981462390204987, 7.999999999999995}, 0.8164965809277261], CircleBox[{6.123724356957946, 5.999999999999996}, 1.2247448713915892], CircleBox[{8.981462390204987, 3.9999999999999973}, 0.8164965809277261], CircleBox[{11.430952132988168, 3.999999999999999}, 1.6329931618554525], CircleBox[{11.430952132988166, 7.999999999999997}, 1.6329931618554523], CircleBox[{4.898979485566354, 11.999999999999991}, 4.898979485566354], CircleBox[{4.898979485566354, 0.}, 4.898979485566354], CircleBox[{12.24744871391589, 0.}, 2.449489742783178], CircleBox[{13.472193585307483, 6.}, 1.2247448713915894], CircleBox[{12.247448713915892, 11.999999999999991}, 2.4494897427831783], CircleBox[{8.573214099741122, 5.999999999999995}, 1.224744871391589], TagBox[ConicHullRegionBox[{0, 0}, {{0, -1}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{14.696938456699064`, 0.}, {{0, 1}}], "InfiniteLine"]}, {RGBColor[0, 0, 1], CircleBox[{9.79795897113271, 7}], CircleBox[{7.348469228349531, 7.5}, 1.5], CircleBox[{7.348469228349531, 4.499999999999999}, 1.4999999999999998], CircleBox[{9.797958971132708, 5}], CircleBox[{11.757550765359246, 6.000000000000002}, 1.2000000000000004], CircleBox[{9.797958971132708, 10.000000000000002}, 2.0000000000000004], CircleBox[{0., 5.9999999999999964}, 5.9999999999999964], CircleBox[{9.797958971132708, 2.}, 2.], CircleBox[{14.696938456699066, 3.}, 3.], CircleBox[{14.696938456699066, 9.}, 3.], TagBox[ConicHullRegionBox[{0, 12}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"]}}, PlotRange->{{-14.696938456699064`, 29.393876913398127`}, {-7.199999999999996, 19.199999999999996`}}, PlotRangeClipping->True]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"144", "1", RowBox[{"4", " ", SqrtBox["6"]}], "7"}, {"72", FractionBox["2", "3"], RowBox[{"2", " ", SqrtBox["6"]}], "5"}, {"48", FractionBox["2", "3"], RowBox[{"2", " ", SqrtBox["6"]}], "3"}, {"120", "1", RowBox[{"4", " ", SqrtBox["6"]}], "5"}, {"144", FractionBox["5", "6"], RowBox[{"4", " ", SqrtBox["6"]}], "5"}, {"96", FractionBox["1", "2"], RowBox[{"2", " ", SqrtBox["6"]}], "5"}, {"0", FractionBox["1", "6"], "0", "1"}, {"48", FractionBox["1", "2"], RowBox[{"2", " ", SqrtBox["6"]}], "1"}, {"72", FractionBox["1", "3"], RowBox[{"2", " ", SqrtBox["6"]}], "1"}, {"96", FractionBox["1", "3"], RowBox[{"2", " ", SqrtBox["6"]}], "3"}, {"24", "0", "0", "1"}, {"0", "0", "0", RowBox[{"-", "1"}]}, { RowBox[{"96", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox[ FractionBox["2", "3"]]}], "17", RowBox[{"4", " ", SqrtBox["6"]}]}, { RowBox[{ FractionBox["1", "60"], " ", RowBox[{"(", RowBox[{"5335", "+", SqrtBox["27528865"]}], ")"}]}], SqrtBox[ FractionBox["3", "2"]], "11", RowBox[{"4", " ", SqrtBox["6"]}]}, { RowBox[{"24", " ", SqrtBox["6"]}], SqrtBox[ FractionBox["2", "3"]], "5", RowBox[{"2", " ", SqrtBox["6"]}]}, { RowBox[{"48", " ", SqrtBox["6"]}], SqrtBox[ FractionBox["3", "2"]], "11", RowBox[{"2", " ", SqrtBox["6"]}]}, { RowBox[{"36", " ", SqrtBox["6"]}], FractionBox[ SqrtBox[ FractionBox["3", "2"]], "2"], "7", SqrtBox["6"]}, { RowBox[{"48", " ", SqrtBox["6"]}], FractionBox[ SqrtBox[ FractionBox["3", "2"]], "2"], "7", RowBox[{"2", " ", SqrtBox["6"]}]}, { RowBox[{"12", " ", SqrtBox["6"]}], FractionBox["1", RowBox[{"2", " ", SqrtBox["6"]}]], "1", SqrtBox["6"]}, {"0", FractionBox["1", RowBox[{"2", " ", SqrtBox["6"]}]], "1", "0"}, { RowBox[{"24", " ", SqrtBox["6"]}], FractionBox["1", SqrtBox["6"]], "5", "0"}, { RowBox[{ FractionBox["1", "60"], " ", RowBox[{"(", RowBox[{"5335", "+", SqrtBox["27528865"]}], ")"}]}], SqrtBox[ FractionBox["2", "3"]], "11", RowBox[{"2", " ", SqrtBox["6"]}]}, { RowBox[{"48", " ", SqrtBox["6"]}], FractionBox["1", SqrtBox["6"]], "5", RowBox[{"2", " ", SqrtBox["6"]}]}, { RowBox[{"36", " ", SqrtBox["6"]}], SqrtBox[ FractionBox["2", "3"]], "7", RowBox[{"2", " ", SqrtBox["6"]}]}, {"0", "0", RowBox[{"-", "1"}], "0"}, { RowBox[{"12", " ", SqrtBox["6"]}], "0", "1", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { RowBox[{"{", RowBox[{ TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"30", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"35", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "41"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "7"}], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"30", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"35", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "42"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"29", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"35", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "40"}], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "7"}], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"57", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"68", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "80"}], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "12"}], "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"29", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"35", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "42"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"28", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"35", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "41"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"28", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"35", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "40"}], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"56", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"68", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "79"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "12"}], "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"56", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"68", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "80"}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "11"}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "2", "0", "0", "2", RowBox[{"-", "2"}], RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "30", "0", "0", "35", RowBox[{"-", "41"}], RowBox[{"-", "7"}]}, {"0", "0", "0", "0", "0", "0", "30", "0", "0", "35", RowBox[{"-", "42"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "2", RowBox[{"-", "3"}], "0"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "2", RowBox[{"-", "2"}], "0"}, {"0", "0", "0", "0", "0", "0", "29", "0", "0", "35", RowBox[{"-", "40"}], RowBox[{"-", "7"}]}, {"0", "0", "0", "0", "0", "0", "57", "0", "0", "68", RowBox[{"-", "80"}], RowBox[{"-", "12"}]}, {"0", "0", "0", "0", "0", "0", "29", "0", "0", "35", RowBox[{"-", "42"}], RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "28", "0", "0", "35", RowBox[{"-", "41"}], RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "28", "0", "0", "35", RowBox[{"-", "40"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "56", "0", "0", "68", RowBox[{"-", "79"}], RowBox[{"-", "12"}]}, {"0", "0", "0", "0", "0", "0", "56", "0", "0", "68", RowBox[{"-", "80"}], RowBox[{"-", "11"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "180720"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "283680"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ FractionBox[ RowBox[{"19267589", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "8640"], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ FractionBox[ RowBox[{"19587269", "-", RowBox[{"5185620", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"972", " ", SqrtBox["165173190"]}]}], "8640"], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{ RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "180360"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "284040"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ FractionBox[ RowBox[{"19271909", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "12960"], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ FractionBox[ RowBox[{"19582949", "-", RowBox[{"5185620", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"972", " ", SqrtBox["165173190"]}]}], "12960"], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{ RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "165240"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "260280"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ FractionBox[ RowBox[{"18118469", "-", RowBox[{"4929540", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"924", " ", SqrtBox["165173190"]}]}], "12960"], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ FractionBox[ RowBox[{"18429509", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "12960"], "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "170640"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "267840"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ FractionBox[ RowBox[{"18498629", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "8640"], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ FractionBox[ RowBox[{"18818309", "-", RowBox[{"5057580", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"948", " ", SqrtBox["165173190"]}]}], "8640"], "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{ RowBox[{ FractionBox["1", "432"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "168912"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{ RowBox[{ FractionBox["1", "864"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "264384"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ FractionBox[ RowBox[{"91758745", "-", RowBox[{"24839760", " ", SqrtBox["6"]}], "+", RowBox[{"5335", " ", SqrtBox["27528865"]}], "-", RowBox[{"4656", " ", SqrtBox["165173190"]}]}], "51840"], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ FractionBox[ RowBox[{"93313945", "-", RowBox[{"25159860", " ", SqrtBox["6"]}], "+", RowBox[{"5335", " ", SqrtBox["27528865"]}], "-", RowBox[{"4716", " ", SqrtBox["165173190"]}]}], "51840"], "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "180720"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "283680"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ FractionBox[ RowBox[{"19284869", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "17280"], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ FractionBox[ RowBox[{"19578629", "-", RowBox[{"5185620", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"972", " ", SqrtBox["165173190"]}]}], "17280"], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "118800"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], "2160"], "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{ FractionBox[ RowBox[{"11", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "17280"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "4320"], "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ FractionBox[ RowBox[{"14722949", "-", RowBox[{"4353360", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"816", " ", SqrtBox["165173190"]}]}], "51840"], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ FractionBox[ RowBox[{"14930309", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "51840"], "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "140400"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "220320"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ FractionBox[ RowBox[{"16209029", "-", RowBox[{"4609440", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"864", " ", SqrtBox["165173190"]}]}], "17280"], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ FractionBox[ RowBox[{"16502789", "-", RowBox[{"4673460", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"876", " ", SqrtBox["165173190"]}]}], "17280"], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{ FractionBox[ RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "17280"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "187920"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ FractionBox[ RowBox[{"14697029", "-", RowBox[{"4353360", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"816", " ", SqrtBox["165173190"]}]}], "25920"], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ FractionBox[ RowBox[{"14956229", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "25920"], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{ FractionBox[ RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "21600"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "235440"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ FractionBox[ RowBox[{"17003909", "-", RowBox[{"4737480", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"888", " ", SqrtBox["165173190"]}]}], "25920"], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ FractionBox[ RowBox[{"17263109", "-", RowBox[{"4801500", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"900", " ", SqrtBox["165173190"]}]}], "25920"], "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"28", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "32400"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"56", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"44", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{ FractionBox["1", "180"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31680"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{ FractionBox["1", "180"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "32220"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "180720"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "283680"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], FractionBox[ RowBox[{"19267589", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "8640"], FractionBox[ RowBox[{"19587269", "-", RowBox[{"5185620", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"972", " ", SqrtBox["165173190"]}]}], "8640"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "180360"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "284040"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], FractionBox[ RowBox[{"19271909", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "12960"], FractionBox[ RowBox[{"19582949", "-", RowBox[{"5185620", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"972", " ", SqrtBox["165173190"]}]}], "12960"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "165240"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "260280"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], FractionBox[ RowBox[{"18118469", "-", RowBox[{"4929540", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"924", " ", SqrtBox["165173190"]}]}], "12960"], FractionBox[ RowBox[{"18429509", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "12960"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "170640"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "267840"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], FractionBox[ RowBox[{"18498629", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "8640"], FractionBox[ RowBox[{"18818309", "-", RowBox[{"5057580", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"948", " ", SqrtBox["165173190"]}]}], "8640"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "432"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "168912"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "864"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "264384"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], FractionBox[ RowBox[{"91758745", "-", RowBox[{"24839760", " ", SqrtBox["6"]}], "+", RowBox[{"5335", " ", SqrtBox["27528865"]}], "-", RowBox[{"4656", " ", SqrtBox["165173190"]}]}], "51840"], FractionBox[ RowBox[{"93313945", "-", RowBox[{"25159860", " ", SqrtBox["6"]}], "+", RowBox[{"5335", " ", SqrtBox["27528865"]}], "-", RowBox[{"4716", " ", SqrtBox["165173190"]}]}], "51840"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "180720"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "283680"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], FractionBox[ RowBox[{"19284869", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "17280"], FractionBox[ RowBox[{"19578629", "-", RowBox[{"5185620", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"972", " ", SqrtBox["165173190"]}]}], "17280"]}, {"0", "0", "0", "0", "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "118800"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], "2160"], "0", "0", FractionBox[ RowBox[{"11", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "17280"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "4320"], FractionBox[ RowBox[{"14722949", "-", RowBox[{"4353360", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"816", " ", SqrtBox["165173190"]}]}], "51840"], FractionBox[ RowBox[{"14930309", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "51840"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "140400"}], "+", RowBox[{"37345", " ", SqrtBox["6"]}], "+", RowBox[{"7", " ", SqrtBox["165173190"]}]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "220320"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], FractionBox[ RowBox[{"16209029", "-", RowBox[{"4609440", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"864", " ", SqrtBox["165173190"]}]}], "17280"], FractionBox[ RowBox[{"16502789", "-", RowBox[{"4673460", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"876", " ", SqrtBox["165173190"]}]}], "17280"]}, {"0", "0", "0", "0", "0", "0", FractionBox[ RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "17280"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "1080"], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "187920"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], FractionBox[ RowBox[{"14697029", "-", RowBox[{"4353360", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"816", " ", SqrtBox["165173190"]}]}], "25920"], FractionBox[ RowBox[{"14956229", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "25920"]}, {"0", "0", "0", "0", "0", "0", FractionBox[ RowBox[{"7", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "21600"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "1080"], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "235440"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], FractionBox[ RowBox[{"17003909", "-", RowBox[{"4737480", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"888", " ", SqrtBox["165173190"]}]}], "25920"], FractionBox[ RowBox[{"17263109", "-", RowBox[{"4801500", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"900", " ", SqrtBox["165173190"]}]}], "25920"]}, {"0", "0", "0", "0", "0", "0", "28", "0", "0", "22", RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "32400"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}]}, {"0", "0", "0", "0", "0", "0", "56", "0", "0", "44", RowBox[{ FractionBox["1", "180"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31680"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], RowBox[{ FractionBox["1", "180"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "32220"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"30", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"12", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "18"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "7"}], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"30", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"12", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "19"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"57", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "34"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "12"}], "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"29", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "16"}], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "7"}], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"29", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "18"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"56", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"21", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "33"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "11"}], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"56", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"21", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "32"}], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "12"}], "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"28", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "15"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"28", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "16"}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "30", "0", "0", "12", RowBox[{"-", "18"}], RowBox[{"-", "7"}]}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "1", RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "1", RowBox[{"-", "2"}], "0"}, {"0", "0", "0", "0", "0", "0", "30", "0", "0", "12", RowBox[{"-", "19"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "57", "0", "0", "22", RowBox[{"-", "34"}], RowBox[{"-", "12"}]}, {"0", "0", "0", "0", "0", "0", "29", "0", "0", "11", RowBox[{"-", "16"}], RowBox[{"-", "7"}]}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "29", "0", "0", "11", RowBox[{"-", "18"}], RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "56", "0", "0", "21", RowBox[{"-", "33"}], RowBox[{"-", "11"}]}, {"0", "0", "0", "0", "0", "0", "56", "0", "0", "21", RowBox[{"-", "32"}], RowBox[{"-", "12"}]}, {"0", "0", "0", "0", "0", "0", "28", "0", "0", "10", RowBox[{"-", "15"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "28", "0", "0", "10", RowBox[{"-", "16"}], RowBox[{"-", "5"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"30", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"24", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "42"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{"5", "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"30", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"23", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "41"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{"5", "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"29", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"24", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "42"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{"6", "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"57", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"45", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "80"}], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{"11", "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"29", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "40"}], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{"6", "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{"1", "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"28", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"23", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "41"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{"7", "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"56", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"45", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "80"}], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{"12", "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"56", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"44", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "79"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{"12", "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"28", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "40"}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{"7", "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "30", "0", "0", "24", RowBox[{"-", "42"}], "5"}, {"0", "0", "0", "0", "0", "0", "30", "0", "0", "23", RowBox[{"-", "41"}], "5"}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "1", RowBox[{"-", "2"}], "0"}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "2", RowBox[{"-", "3"}], "0"}, {"0", "0", "0", "0", "0", "0", "29", "0", "0", "24", RowBox[{"-", "42"}], "6"}, {"0", "0", "0", "0", "0", "0", "57", "0", "0", "45", RowBox[{"-", "80"}], "11"}, {"0", "0", "0", "0", "0", "0", "29", "0", "0", "22", RowBox[{"-", "40"}], "6"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "1", RowBox[{"-", "2"}], "1"}, {"0", "0", "0", "0", "0", "0", "28", "0", "0", "23", RowBox[{"-", "41"}], "7"}, {"0", "0", "0", "0", "0", "0", "56", "0", "0", "45", RowBox[{"-", "80"}], "12"}, {"0", "0", "0", "0", "0", "0", "56", "0", "0", "44", RowBox[{"-", "79"}], "12"}, {"0", "0", "0", "0", "0", "0", "28", "0", "0", "22", RowBox[{"-", "40"}], "7"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "12"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{"2", "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"15", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "21"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{"5", "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "12"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{"3", "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"15", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "20"}], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{"5", "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"14", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "20"}], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{"6", "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{"1", "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{"1", "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{"3", "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"14", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "19"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{"6", "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"7", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{"4", "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "6", "0", "0", "9", RowBox[{"-", "12"}], "2"}, {"0", "0", "0", "0", "0", "0", "10", "0", "0", "15", RowBox[{"-", "21"}], "5"}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "8", RowBox[{"-", "12"}], "3"}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "2", RowBox[{"-", "3"}], "0"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "2", RowBox[{"-", "2"}], "0"}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "15", RowBox[{"-", "20"}], "5"}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "14", RowBox[{"-", "20"}], "6"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "1", RowBox[{"-", "2"}], "1"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "1", RowBox[{"-", "1"}], "1"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "8", RowBox[{"-", "10"}], "3"}, {"0", "0", "0", "0", "0", "0", "8", "0", "0", "14", RowBox[{"-", "19"}], "6"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "7", RowBox[{"-", "10"}], "4"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "4"}], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"15", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "7"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "3"}], "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"14", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "8"}], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"15", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "2"}], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"7", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "3"}], "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"14", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "8"}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "2", "0", "0", "2", RowBox[{"-", "2"}], RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "8", RowBox[{"-", "5"}], RowBox[{"-", "4"}]}, {"0", "0", "0", "0", "0", "0", "10", "0", "0", "15", RowBox[{"-", "10"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "9", RowBox[{"-", "7"}], RowBox[{"-", "3"}]}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "2", RowBox[{"-", "2"}], "0"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "1", "0", RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "14", RowBox[{"-", "8"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "15", RowBox[{"-", "10"}], RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "8", RowBox[{"-", "5"}], RowBox[{"-", "2"}]}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "7", RowBox[{"-", "3"}], RowBox[{"-", "3"}]}, {"0", "0", "0", "0", "0", "0", "8", "0", "0", "14", RowBox[{"-", "8"}], RowBox[{"-", "5"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "4"}], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "3"}], "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{"1", "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{"3", "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "3"}], "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{"1", "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "2"}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "6", "0", "0", "3", "0", RowBox[{"-", "4"}]}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "1", RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "2", "0", RowBox[{"-", "3"}]}, {"0", "0", "0", "0", "0", "0", "10", "0", "0", "4", "1", RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "4", "2", RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "1", "0", RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "3", "2", RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "8", "0", "0", "3", "3", RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "2", "2", RowBox[{"-", "3"}]}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "1", "2", RowBox[{"-", "2"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{"5", "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{"2", "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "7"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{"3", "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{"6", "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "8"}], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{"5", "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{"1", "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{"4", "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "8"}], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{"6", "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{"3", "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{"1", "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "10", "0", "0", "4", RowBox[{"-", "10"}], "5"}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "2", RowBox[{"-", "5"}], "2"}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "1", RowBox[{"-", "2"}], "0"}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "3", RowBox[{"-", "7"}], "3"}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "4", RowBox[{"-", "10"}], "6"}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "3", RowBox[{"-", "8"}], "5"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "1", RowBox[{"-", "2"}], "1"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "2", RowBox[{"-", "5"}], "4"}, {"0", "0", "0", "0", "0", "0", "8", "0", "0", "3", RowBox[{"-", "8"}], "6"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "1", RowBox[{"-", "3"}], "3"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "34"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{"35", "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"21", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "33"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{"35", "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "18"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{"18", "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"12", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "19"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{"18", "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"5", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"12", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "18"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{"18", "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"21", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "32"}], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{"35", "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"5", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "16"}], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{"18", "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{"1", "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{"1", "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "16"}], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{"18", "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "15"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{"18", "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{"1", "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "10", "0", "0", "22", RowBox[{"-", "34"}], "35"}, {"0", "0", "0", "0", "0", "0", "10", "0", "0", "21", RowBox[{"-", "33"}], "35"}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "11", RowBox[{"-", "18"}], "18"}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "12", RowBox[{"-", "19"}], "18"}, {"0", "0", "0", "0", "0", "0", "5", "0", "0", "12", RowBox[{"-", "18"}], "18"}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "21", RowBox[{"-", "32"}], "35"}, {"0", "0", "0", "0", "0", "0", "5", "0", "0", "10", RowBox[{"-", "16"}], "18"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "1", RowBox[{"-", "2"}], "1"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "1", RowBox[{"-", "1"}], "1"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "11", RowBox[{"-", "16"}], "18"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "10", RowBox[{"-", "15"}], "18"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23760"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "267840"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ FractionBox[ RowBox[{"18507269", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "8640"], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ FractionBox[ RowBox[{"15284549", "-", RowBox[{"4289340", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"804", " ", SqrtBox["165173190"]}]}], "8640"], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{ RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "20520"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "236520"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ FractionBox[ RowBox[{"16990949", "-", RowBox[{"4737480", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"888", " ", SqrtBox["165173190"]}]}], "12960"], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ FractionBox[ RowBox[{"14139749", "-", RowBox[{"4033260", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"756", " ", SqrtBox["165173190"]}]}], "12960"], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{ RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "20520"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "236520"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ FractionBox[ RowBox[{"16977989", "-", RowBox[{"4737480", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"888", " ", SqrtBox["165173190"]}]}], "12960"], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ FractionBox[ RowBox[{"14152709", "-", RowBox[{"4033260", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"756", " ", SqrtBox["165173190"]}]}], "12960"], "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23760"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "267840"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ FractionBox[ RowBox[{"18498629", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "8640"], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ FractionBox[ RowBox[{"15293189", "-", RowBox[{"4289340", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"804", " ", SqrtBox["165173190"]}]}], "8640"], "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{ RowBox[{ FractionBox["1", "432"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "25488"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{ RowBox[{ FractionBox["1", "864"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "283392"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ FractionBox[ RowBox[{"19264133", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "10368"], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ FractionBox[ RowBox[{"15863429", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "10368"], "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "22320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "252000"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ FractionBox[ RowBox[{"17764229", "-", RowBox[{"4865520", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"912", " ", SqrtBox["165173190"]}]}], "17280"], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ FractionBox[ RowBox[{"14705669", "-", RowBox[{"4161300", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"780", " ", SqrtBox["165173190"]}]}], "17280"], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "6480"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], "2160"], "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{ FractionBox[ RowBox[{"11", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "8640"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "4320"], "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ FractionBox[ RowBox[{"10161029", "-", RowBox[{"3585120", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"672", " ", SqrtBox["165173190"]}]}], "51840"], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ FractionBox[ RowBox[{"9020549", "-", RowBox[{"2880900", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"540", " ", SqrtBox["165173190"]}]}], "51840"], "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{ RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "22320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "252000"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ FractionBox[ RowBox[{"17729669", "-", RowBox[{"4865520", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"912", " ", SqrtBox["165173190"]}]}], "17280"], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ FractionBox[ RowBox[{"14740229", "-", RowBox[{"4161300", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"780", " ", SqrtBox["165173190"]}]}], "17280"], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "25920"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "282960"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ FractionBox[ RowBox[{"19258949", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "25920"], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ FractionBox[ RowBox[{"15889349", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "25920"], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "25920"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], "1080"], "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{ FractionBox[ RowBox[{ RowBox[{"-", "282960"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ FractionBox[ RowBox[{"19284869", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "25920"], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ FractionBox[ RowBox[{"15863429", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "25920"], "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23760"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31680"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23400"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23760"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "267840"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], FractionBox[ RowBox[{"18507269", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "8640"], FractionBox[ RowBox[{"15284549", "-", RowBox[{"4289340", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"804", " ", SqrtBox["165173190"]}]}], "8640"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "20520"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "236520"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], FractionBox[ RowBox[{"16990949", "-", RowBox[{"4737480", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"888", " ", SqrtBox["165173190"]}]}], "12960"], FractionBox[ RowBox[{"14139749", "-", RowBox[{"4033260", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"756", " ", SqrtBox["165173190"]}]}], "12960"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "540"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "20520"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "236520"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1080"], FractionBox[ RowBox[{"16977989", "-", RowBox[{"4737480", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"888", " ", SqrtBox["165173190"]}]}], "12960"], FractionBox[ RowBox[{"14152709", "-", RowBox[{"4033260", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"756", " ", SqrtBox["165173190"]}]}], "12960"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23760"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "267840"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], FractionBox[ RowBox[{"18498629", "-", RowBox[{"4993560", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"936", " ", SqrtBox["165173190"]}]}], "8640"], FractionBox[ RowBox[{"15293189", "-", RowBox[{"4289340", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"804", " ", SqrtBox["165173190"]}]}], "8640"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "432"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "25488"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "864"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "283392"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], ")"}]}], FractionBox[ RowBox[{"19264133", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "10368"], FractionBox[ RowBox[{"15863429", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "10368"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "22320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "252000"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], FractionBox[ RowBox[{"17764229", "-", RowBox[{"4865520", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"912", " ", SqrtBox["165173190"]}]}], "17280"], FractionBox[ RowBox[{"14705669", "-", RowBox[{"4161300", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"780", " ", SqrtBox["165173190"]}]}], "17280"]}, {"0", "0", "0", "0", "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "6480"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], "2160"], "0", "0", FractionBox[ RowBox[{"11", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "8640"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "4320"], FractionBox[ RowBox[{"10161029", "-", RowBox[{"3585120", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"672", " ", SqrtBox["165173190"]}]}], "51840"], FractionBox[ RowBox[{"9020549", "-", RowBox[{"2880900", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"540", " ", SqrtBox["165173190"]}]}], "51840"]}, {"0", "0", "0", "0", "0", "0", RowBox[{ FractionBox["1", "720"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "22320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "252000"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "1440"], FractionBox[ RowBox[{"17729669", "-", RowBox[{"4865520", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"912", " ", SqrtBox["165173190"]}]}], "17280"], FractionBox[ RowBox[{"14740229", "-", RowBox[{"4161300", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"780", " ", SqrtBox["165173190"]}]}], "17280"]}, {"0", "0", "0", "0", "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "25920"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], "1080"], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "282960"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], FractionBox[ RowBox[{"19258949", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "25920"], FractionBox[ RowBox[{"15889349", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "25920"]}, {"0", "0", "0", "0", "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "25920"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], "1080"], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "282960"}], "+", RowBox[{"58685", " ", SqrtBox["6"]}], "+", RowBox[{"11", " ", SqrtBox["165173190"]}]}], "2160"], FractionBox[ RowBox[{"19284869", "-", RowBox[{"5121600", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"960", " ", SqrtBox["165173190"]}]}], "25920"], FractionBox[ RowBox[{"15863429", "-", RowBox[{"4417380", " ", SqrtBox["6"]}], "+", RowBox[{"1067", " ", SqrtBox["27528865"]}], "-", RowBox[{"828", " ", SqrtBox["165173190"]}]}], "25920"]}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "22", RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31320"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23760"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}]}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "22", RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "31680"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}], RowBox[{ FractionBox["1", "360"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "23400"}], "+", RowBox[{"5335", " ", SqrtBox["6"]}], "+", SqrtBox["165173190"]}], ")"}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"12", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{"6", "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "7"}], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{"7", "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "7"}], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"21", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{"14", "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "12"}], "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"22", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{"13", "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "12"}], "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"5", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"12", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{"6", "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"5", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{"8", "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"21", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{"14", "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "11"}], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{"7", "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{"1", "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{"8", "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "6", "0", "0", "12", "6", RowBox[{"-", "7"}]}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", "11", "7", RowBox[{"-", "7"}]}, {"0", "0", "0", "0", "0", "0", "10", "0", "0", "21", "14", RowBox[{"-", "12"}]}, {"0", "0", "0", "0", "0", "0", "10", "0", "0", "22", "13", RowBox[{"-", "12"}]}, {"0", "0", "0", "0", "0", "0", "5", "0", "0", "12", "6", RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "1", "0", RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "5", "0", "0", "10", "8", RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", "21", "14", RowBox[{"-", "11"}]}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "11", "7", RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", "10", "8", RowBox[{"-", "5"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{ RowBox[{"-", "1"}], "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{ SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{ RowBox[{"-", "3"}], "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{ SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "12"}], "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"-", "3"}], "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{ RowBox[{"-", "4"}], "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"7", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"-", "3"}], "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"11", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"8", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "12"}], "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"-", "2"}], "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"20", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"15", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "21"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"20", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"15", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "20"}], "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{"20", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{"14", "-", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "19"}], "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ RowBox[{"-", "6"}], "+", SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{"20", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{"14", "-", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "20"}], "+", RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"-", "5"}], "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "2", "0", "0", "2", RowBox[{"-", "2"}], RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "1", RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "1", RowBox[{"-", "2"}], "0"}, {"0", "0", "0", "0", "0", "0", "2", "0", "0", "2", RowBox[{"-", "3"}], "0"}, {"0", "0", "0", "0", "0", "0", "11", "0", "0", "9", RowBox[{"-", "12"}], RowBox[{"-", "3"}]}, {"0", "0", "0", "0", "0", "0", "11", "0", "0", "8", RowBox[{"-", "10"}], RowBox[{"-", "4"}]}, {"0", "0", "0", "0", "0", "0", "11", "0", "0", "7", RowBox[{"-", "10"}], RowBox[{"-", "3"}]}, {"0", "0", "0", "0", "0", "0", "11", "0", "0", "8", RowBox[{"-", "12"}], RowBox[{"-", "2"}]}, {"0", "0", "0", "0", "0", "0", "20", "0", "0", "15", RowBox[{"-", "21"}], RowBox[{"-", "5"}]}, {"0", "0", "0", "0", "0", "0", "20", "0", "0", "15", RowBox[{"-", "20"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "20", "0", "0", "14", RowBox[{"-", "19"}], RowBox[{"-", "6"}]}, {"0", "0", "0", "0", "0", "0", "20", "0", "0", "14", RowBox[{"-", "20"}], RowBox[{"-", "5"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{"14", "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{"11", "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{"7", "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{"5", "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{"6", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{"6", "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{"6", "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{"10", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{"13", "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{"12", "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{"9", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{"14", "+", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{"12", "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{"5", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{"8", "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{"5", "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{ SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{"5", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{"6", "+", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{"7", "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{"7", "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{"7", "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{"8", "+", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{"6", "+", SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{"1", "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{"1", "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", "10", "0", "0", RowBox[{"-", "2"}], "14", "11"}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", RowBox[{"-", "1"}], "7", "5"}, {"0", "0", "0", "0", "0", "0", "6", "0", "0", RowBox[{"-", "1"}], "6", "6"}, {"0", "0", "0", "0", "0", "0", "10", "0", "0", RowBox[{"-", "2"}], "13", "12"}, {"0", "0", "0", "0", "0", "0", "9", "0", "0", RowBox[{"-", "2"}], "14", "12"}, {"0", "0", "0", "0", "0", "0", "5", "0", "0", RowBox[{"-", "1"}], "8", "5"}, {"0", "0", "0", "0", "0", "0", "1", "0", "0", "0", "0", "0"}, {"0", "0", "0", "0", "0", "0", "5", "0", "0", RowBox[{"-", "1"}], "6", "7"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", RowBox[{"-", "1"}], "7", "7"}, {"0", "0", "0", "0", "0", "0", "4", "0", "0", RowBox[{"-", "1"}], "8", "6"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], ",", TagBox[GridBox[{ { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { SubscriptBox["a", "1"], SubscriptBox["a", "2"], SubscriptBox["a", "3"], SubscriptBox["a", "4"], SubscriptBox["a", "5"], SubscriptBox["a", "6"], RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "2"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", SubscriptBox["a", "5"], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"]}], SubscriptBox["a", "7"], SubscriptBox["a", "8"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "-", SubscriptBox["a", "2"], "-", SubscriptBox["a", "3"], "-", RowBox[{"2", " ", SubscriptBox["a", "4"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "-", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "1"]}], "+", SubscriptBox["a", "2"], "+", RowBox[{"2", " ", SubscriptBox["a", "3"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "4"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "5"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "7"]}], "+", SubscriptBox["a", "8"]}], RowBox[{"5", "+", SubscriptBox["a", "1"], "+", SubscriptBox["a", "2"], "+", SubscriptBox["a", "6"], "-", SubscriptBox["a", "7"], "-", SubscriptBox["a", "8"]}]}, { SubscriptBox["a", "9"], SubscriptBox["a", "10"], SubscriptBox["a", "11"], SubscriptBox["a", "12"], SubscriptBox["a", "13"], SubscriptBox["a", "14"], RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "10"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", SubscriptBox["a", "13"], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"]}], SubscriptBox["a", "15"], SubscriptBox["a", "16"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "-", SubscriptBox["a", "10"], "-", SubscriptBox["a", "11"], "-", RowBox[{"2", " ", SubscriptBox["a", "12"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "-", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}], RowBox[{"3", "+", RowBox[{"2", " ", SubscriptBox["a", "9"]}], "+", SubscriptBox["a", "10"], "+", RowBox[{"2", " ", SubscriptBox["a", "11"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "12"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "13"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "15"]}], "+", SubscriptBox["a", "16"]}], RowBox[{"5", "+", SubscriptBox["a", "9"], "+", SubscriptBox["a", "10"], "+", SubscriptBox["a", "14"], "-", SubscriptBox["a", "15"], "-", SubscriptBox["a", "16"]}]}, { SubscriptBox["a", "17"], SubscriptBox["a", "18"], SubscriptBox["a", "19"], SubscriptBox["a", "20"], SubscriptBox["a", "21"], SubscriptBox["a", "22"], RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "18"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", SubscriptBox["a", "21"], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"]}], SubscriptBox["a", "23"], SubscriptBox["a", "24"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "-", SubscriptBox["a", "18"], "-", SubscriptBox["a", "19"], "-", RowBox[{"2", " ", SubscriptBox["a", "20"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "-", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "17"]}], "+", SubscriptBox["a", "18"], "+", RowBox[{"2", " ", SubscriptBox["a", "19"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "20"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "21"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "23"]}], "+", SubscriptBox["a", "24"]}], RowBox[{"6", "+", SubscriptBox["a", "17"], "+", SubscriptBox["a", "18"], "+", SubscriptBox["a", "22"], "-", SubscriptBox["a", "23"], "-", SubscriptBox["a", "24"]}]}, { SubscriptBox["a", "25"], SubscriptBox["a", "26"], SubscriptBox["a", "27"], SubscriptBox["a", "28"], SubscriptBox["a", "29"], SubscriptBox["a", "30"], RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "26"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", SubscriptBox["a", "29"], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"]}], SubscriptBox["a", "31"], SubscriptBox["a", "32"], RowBox[{"4", "-", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "-", SubscriptBox["a", "26"], "-", SubscriptBox["a", "27"], "-", RowBox[{"2", " ", SubscriptBox["a", "28"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "-", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}], RowBox[{"1", "+", RowBox[{"2", " ", SubscriptBox["a", "25"]}], "+", SubscriptBox["a", "26"], "+", RowBox[{"2", " ", SubscriptBox["a", "27"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "28"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "29"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "31"]}], "+", SubscriptBox["a", "32"]}], RowBox[{"6", "+", SubscriptBox["a", "25"], "+", SubscriptBox["a", "26"], "+", SubscriptBox["a", "30"], "-", SubscriptBox["a", "31"], "-", SubscriptBox["a", "32"]}]}, { SubscriptBox["a", "33"], SubscriptBox["a", "34"], SubscriptBox["a", "35"], SubscriptBox["a", "36"], SubscriptBox["a", "37"], SubscriptBox["a", "38"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "34"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", SubscriptBox["a", "37"], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"]}], SubscriptBox["a", "39"], SubscriptBox["a", "40"], RowBox[{"3", "-", RowBox[{"2", " ", SubscriptBox["a", "33"]}], "-", SubscriptBox["a", "34"], "-", SubscriptBox["a", "35"], "-", RowBox[{"2", " ", SubscriptBox["a", "36"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "-", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "33"]}], "+", SubscriptBox["a", "34"], "+", RowBox[{"2", " ", SubscriptBox["a", "35"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "36"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "37"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "39"]}], "+", SubscriptBox["a", "40"]}], RowBox[{"3", "+", SubscriptBox["a", "33"], "+", SubscriptBox["a", "34"], "+", SubscriptBox["a", "38"], "-", SubscriptBox["a", "39"], "-", SubscriptBox["a", "40"]}]}, { SubscriptBox["a", "41"], SubscriptBox["a", "42"], SubscriptBox["a", "43"], SubscriptBox["a", "44"], SubscriptBox["a", "45"], SubscriptBox["a", "46"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "42"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", SubscriptBox["a", "45"], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"]}], SubscriptBox["a", "47"], SubscriptBox["a", "48"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "-", SubscriptBox["a", "42"], "-", SubscriptBox["a", "43"], "-", RowBox[{"2", " ", SubscriptBox["a", "44"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "-", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "41"]}], "+", SubscriptBox["a", "42"], "+", RowBox[{"2", " ", SubscriptBox["a", "43"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "44"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "45"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "47"]}], "+", SubscriptBox["a", "48"]}], RowBox[{"2", "+", SubscriptBox["a", "41"], "+", SubscriptBox["a", "42"], "+", SubscriptBox["a", "46"], "-", SubscriptBox["a", "47"], "-", SubscriptBox["a", "48"]}]}, { SubscriptBox["a", "49"], SubscriptBox["a", "50"], SubscriptBox["a", "51"], SubscriptBox["a", "52"], SubscriptBox["a", "53"], SubscriptBox["a", "54"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "50"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", SubscriptBox["a", "53"], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"]}], SubscriptBox["a", "55"], SubscriptBox["a", "56"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "-", SubscriptBox["a", "50"], "-", SubscriptBox["a", "51"], "-", RowBox[{"2", " ", SubscriptBox["a", "52"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "-", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}], RowBox[{"2", "+", RowBox[{"2", " ", SubscriptBox["a", "49"]}], "+", SubscriptBox["a", "50"], "+", RowBox[{"2", " ", SubscriptBox["a", "51"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "52"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "53"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "55"]}], "+", SubscriptBox["a", "56"]}], RowBox[{"3", "+", SubscriptBox["a", "49"], "+", SubscriptBox["a", "50"], "+", SubscriptBox["a", "54"], "-", SubscriptBox["a", "55"], "-", SubscriptBox["a", "56"]}]}, { SubscriptBox["a", "57"], SubscriptBox["a", "58"], SubscriptBox["a", "59"], SubscriptBox["a", "60"], SubscriptBox["a", "61"], SubscriptBox["a", "62"], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "58"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", SubscriptBox["a", "61"], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"]}], SubscriptBox["a", "63"], SubscriptBox["a", "64"], RowBox[{"2", "-", RowBox[{"2", " ", SubscriptBox["a", "57"]}], "-", SubscriptBox["a", "58"], "-", SubscriptBox["a", "59"], "-", RowBox[{"2", " ", SubscriptBox["a", "60"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "-", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "57"]}], "+", SubscriptBox["a", "58"], "+", RowBox[{"2", " ", SubscriptBox["a", "59"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "60"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "61"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "63"]}], "+", SubscriptBox["a", "64"]}], RowBox[{"4", "+", SubscriptBox["a", "57"], "+", SubscriptBox["a", "58"], "+", SubscriptBox["a", "62"], "-", SubscriptBox["a", "63"], "-", SubscriptBox["a", "64"]}]}, { SubscriptBox["a", "65"], SubscriptBox["a", "66"], SubscriptBox["a", "67"], SubscriptBox["a", "68"], SubscriptBox["a", "69"], SubscriptBox["a", "70"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "65"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "66"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", SubscriptBox["a", "69"], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"]}], SubscriptBox["a", "71"], SubscriptBox["a", "72"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "-", SubscriptBox["a", "66"], "-", SubscriptBox["a", "67"], "-", RowBox[{"2", " ", SubscriptBox["a", "68"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "-", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SubscriptBox["a", "65"]}], "+", SubscriptBox["a", "66"], "+", RowBox[{"2", " ", SubscriptBox["a", "67"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "68"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "69"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "71"]}], "+", SubscriptBox["a", "72"]}], RowBox[{"1", "+", SubscriptBox["a", "65"], "+", SubscriptBox["a", "66"], "+", SubscriptBox["a", "70"], "-", SubscriptBox["a", "71"], "-", SubscriptBox["a", "72"]}]}, { SubscriptBox["a", "73"], SubscriptBox["a", "74"], SubscriptBox["a", "75"], SubscriptBox["a", "76"], SubscriptBox["a", "77"], SubscriptBox["a", "78"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "73"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "74"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", SubscriptBox["a", "77"], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"]}], SubscriptBox["a", "79"], SubscriptBox["a", "80"], RowBox[{"1", "-", RowBox[{"2", " ", SubscriptBox["a", "73"]}], "-", SubscriptBox["a", "74"], "-", SubscriptBox["a", "75"], "-", RowBox[{"2", " ", SubscriptBox["a", "76"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "-", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "73"]}], "+", SubscriptBox["a", "74"], "+", RowBox[{"2", " ", SubscriptBox["a", "75"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "76"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "77"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "79"]}], "+", SubscriptBox["a", "80"]}], RowBox[{ SubscriptBox["a", "73"], "+", SubscriptBox["a", "74"], "+", SubscriptBox["a", "78"], "-", SubscriptBox["a", "79"], "-", SubscriptBox["a", "80"]}]}, { SubscriptBox["a", "81"], SubscriptBox["a", "82"], SubscriptBox["a", "83"], SubscriptBox["a", "84"], SubscriptBox["a", "85"], SubscriptBox["a", "86"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "82"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", SubscriptBox["a", "85"], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"]}], SubscriptBox["a", "87"], SubscriptBox["a", "88"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "81"]}], "-", SubscriptBox["a", "82"], "-", SubscriptBox["a", "83"], "-", RowBox[{"2", " ", SubscriptBox["a", "84"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "-", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}], RowBox[{"1", "+", RowBox[{"2", " ", SubscriptBox["a", "81"]}], "+", SubscriptBox["a", "82"], "+", RowBox[{"2", " ", SubscriptBox["a", "83"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "84"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "85"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "87"]}], "+", SubscriptBox["a", "88"]}], RowBox[{ SubscriptBox["a", "81"], "+", SubscriptBox["a", "82"], "+", SubscriptBox["a", "86"], "-", SubscriptBox["a", "87"], "-", SubscriptBox["a", "88"]}]}, { SubscriptBox["a", "89"], SubscriptBox["a", "90"], SubscriptBox["a", "91"], SubscriptBox["a", "92"], SubscriptBox["a", "93"], SubscriptBox["a", "94"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "90"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", SubscriptBox["a", "93"], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"]}], SubscriptBox["a", "95"], SubscriptBox["a", "96"], RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SubscriptBox["a", "89"]}], "-", SubscriptBox["a", "90"], "-", SubscriptBox["a", "91"], "-", RowBox[{"2", " ", SubscriptBox["a", "92"]}], "-", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "-", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}], RowBox[{ RowBox[{"2", " ", SubscriptBox["a", "89"]}], "+", SubscriptBox["a", "90"], "+", RowBox[{"2", " ", SubscriptBox["a", "91"]}], "+", RowBox[{"3", " ", SubscriptBox["a", "92"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "93"]}], "+", RowBox[{"2", " ", SubscriptBox["a", "95"]}], "+", SubscriptBox["a", "96"]}], RowBox[{"1", "+", SubscriptBox["a", "89"], "+", SubscriptBox["a", "90"], "+", SubscriptBox["a", "94"], "-", SubscriptBox["a", "95"], "-", SubscriptBox["a", "96"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", "0", "0", "0", "0", "0", RowBox[{"-", "2"}], "0", "0", "4", "2", "5"}, {"0", "0", "0", "0", "0", "0", RowBox[{"-", "2"}], "0", "0", "3", "3", "5"}, {"0", "0", "0", "0", "0", "0", RowBox[{"-", "2"}], "0", "0", "3", "2", "6"}, {"0", "0", "0", "0", "0", "0", RowBox[{"-", "2"}], "0", "0", "4", "1", "6"}, {"0", "0", "0", "0", "0", "0", RowBox[{"-", "1"}], "0", "0", "3", "0", "3"}, {"0", "0", "0", "0", "0", "0", RowBox[{"-", "1"}], "0", "0", "2", "2", "2"}, {"0", "0", "0", "0", "0", "0", RowBox[{"-", "1"}], "0", "0", "1", "2", "3"}, {"0", "0", "0", "0", "0", "0", RowBox[{"-", "1"}], "0", "0", "2", "0", "4"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "1", RowBox[{"-", "1"}], "1"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]}], "}"}]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"-", "1"}], "1", "3", "1", "1", "1", "5", "5", "5", "3", "5", "7", "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}]}, {"1", RowBox[{"-", "1"}], "1", "3", "5", "1", "1", "5", "7", "5", "3", "5", RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}]}, {"3", "1", RowBox[{"-", "1"}], "1", "5", "5", "1", "1", "5", "7", "5", "3", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}]}, {"1", "3", "1", RowBox[{"-", "1"}], "1", "5", "5", "1", "3", "5", "7", "5", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], "0", RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}]}, {"1", "5", "5", "1", RowBox[{"-", "1"}], "3", "7", "3", "1", "1", "5", "5", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], RowBox[{"4", " ", SqrtBox["6"]}], SqrtBox["6"]}, {"1", "1", "5", "5", "3", RowBox[{"-", "1"}], "3", "7", "5", "1", "1", "5", RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"]}, {"5", "1", "1", "5", "7", "3", RowBox[{"-", "1"}], "3", "5", "5", "1", "1", RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"]}, {"5", "5", "1", "1", "3", "7", "3", RowBox[{"-", "1"}], "1", "5", "5", "1", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"]}, {"5", "7", "5", "3", "1", "5", "5", "1", RowBox[{"-", "1"}], "1", "3", "1", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0"}, {"3", "5", "7", "5", "1", "1", "5", "5", "1", RowBox[{"-", "1"}], "1", "3", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0"}, {"5", "3", "5", "7", "5", "1", "1", "5", "3", "1", RowBox[{"-", "1"}], "1", RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], "0", "0"}, {"7", "5", "3", "5", "5", "5", "1", "1", "1", "3", "1", RowBox[{"-", "1"}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0"}, {"0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"-", "1"}], "5", "11", "5", "1", "1", "7", "7", "11", "5", "11", "1", "17", "7"}, {"0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], "5", RowBox[{"-", "1"}], "5", "11", "7", "1", "1", "7", "17", "11", "5", "1", "11", "7"}, { RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "11", "5", RowBox[{"-", "1"}], "5", "7", "7", "1", "1", "11", "17", "11", "1", "5", "7"}, { RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "5", "11", "5", RowBox[{"-", "1"}], "1", "7", "7", "1", "5", "11", "17", "1", "11", "7"}, { SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "1", "7", "7", "1", RowBox[{"-", "1"}], "2", "5", "2", "1", "1", "7", "2", "7", "2"}, {"0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], "1", "1", "7", "7", "2", RowBox[{"-", "1"}], "2", "5", "7", "1", "1", "2", "7", "2"}, { SqrtBox["6"], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"], "7", "1", "1", "7", "5", "2", RowBox[{"-", "1"}], "2", "7", "7", "1", "2", "1", "2"}, { RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], "0", "7", "7", "1", "1", "2", "5", "2", RowBox[{"-", "1"}], "1", "7", "7", "2", "1", "2"}, { RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "11", "17", "11", "5", "1", "7", "7", "1", RowBox[{"-", "1"}], "5", "11", "7", "5", "1"}, { RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "5", "11", "17", "11", "1", "1", "7", "7", "5", RowBox[{"-", "1"}], "5", "7", "11", "1"}, { RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", RowBox[{"2", " ", SqrtBox["6"]}], "11", "5", "11", "17", "7", "1", "1", "7", "11", "5", RowBox[{"-", "1"}], "7", "5", "1"}, {"0", "0", "0", "0", SqrtBox["6"], SqrtBox["6"], SqrtBox["6"], SqrtBox["6"], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "1", "1", "1", "1", "2", "2", "2", "2", "7", "7", "7", RowBox[{"-", "1"}], "7", "5"}, { RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"4", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], "0", "0", "17", "11", "5", "11", "7", "7", "1", "1", "5", "11", "5", "7", RowBox[{"-", "1"}], "1"}, { RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], RowBox[{"2", " ", SqrtBox["6"]}], SqrtBox["6"], SqrtBox["6"], SqrtBox["6"], SqrtBox["6"], "0", "0", "0", "0", "7", "7", "7", "7", "2", "2", "2", "2", "1", "1", "1", "5", "1", RowBox[{"-", "1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]], "Output", CellChangeTimes->{3.738432163599625*^9, 3.7384329955560865`*^9, 3.7388749506600103`*^9}, CellLabel->"Out[95]=",ExpressionUUID->"dea4d8b7-2f35-4fd5-8c96-c4df84b94675"] }, Open ]], Cell[BoxData[" "], "Input", CellChangeTimes->{ 3.7388749945311375`*^9},ExpressionUUID->"b05b4df4-6df3-4385-b36d-\ 52f016bc097f"] }, WindowSize->{1218, 661}, WindowMargins->{{-8, Automatic}, {Automatic, 0}}, Magnification:>0.95 Inherited, FrontEndVersion->"11.3 for Microsoft Windows (64-bit) (March 6, 2018)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[558, 20, 664, 18, 50, "Input",ExpressionUUID->"748eabe5-c3d2-4801-b8b7-aa7a789097c7"], Cell[1225, 40, 723, 19, 48, "Input",ExpressionUUID->"0ab29ce4-3405-44f4-bf4a-16ef730ff686"], Cell[1951, 61, 9875, 235, 649, "Input",ExpressionUUID->"72e544ec-21b3-4511-8714-78e40bf96f8f"], Cell[11829, 298, 35696, 782, 1864, "Input",ExpressionUUID->"34558bf5-30de-4efd-a85d-1e42927d2f41"], Cell[47528, 1082, 13579, 318, 753, "Input",ExpressionUUID->"1669407f-19e4-41f4-83d2-404c097a4b8c"], Cell[61110, 1402, 1572, 43, 82, "Input",ExpressionUUID->"0ca661cb-0814-4baa-8045-ccb6be11fd34"], Cell[62685, 1447, 16048, 333, 766, "Input",ExpressionUUID->"8eb99bd7-ecdf-447b-9254-91418df0046a"], Cell[78736, 1782, 13582, 313, 759, "Input",ExpressionUUID->"df3b60f9-0301-4a00-901e-3f42ad1f6dcc"], Cell[92321, 2097, 3768, 87, 262, "Input",ExpressionUUID->"94e58c8f-e9bc-4bc5-9f72-1e7d65b723b4"], Cell[96092, 2186, 397, 13, 72, "Input",ExpressionUUID->"e0269727-13f8-41e1-9bed-e3d214f9ade5"], Cell[96492, 2201, 837, 23, 54, "Input",ExpressionUUID->"335fc47c-61a3-4d42-b8dc-1a6e429b3dbb"], Cell[97332, 2226, 4976, 131, 389, "Input",ExpressionUUID->"8f83b82e-c1db-40d9-ac4c-a723737f7704"], Cell[102311, 2359, 1032, 29, 27, "Input",ExpressionUUID->"d37cc6ff-e0b5-488e-9c86-c606b2039282"], Cell[103346, 2390, 1961, 44, 118, "Input",ExpressionUUID->"9a3eb7b4-a69e-4770-9009-32f6122d8145"], Cell[105310, 2436, 5280, 132, 154, "Input",ExpressionUUID->"affbea28-f93e-449d-873a-65b52e624ef9"], Cell[110593, 2570, 1184, 31, 46, "Input",ExpressionUUID->"15495297-a588-42f2-9830-ff3a5a9d76a4"], Cell[111780, 2603, 4113, 110, 336, "Input",ExpressionUUID->"cd35cdcc-79cb-420e-8b24-2c510cf42e01"], Cell[115896, 2715, 5507, 126, 280, "Input",ExpressionUUID->"b49300f9-4eb0-4e74-b00e-238ad2cc61d5"], Cell[121406, 2843, 3700, 86, 226, "Input",ExpressionUUID->"b43a5c15-ff8f-4841-a157-1d63bba9b7c4"], Cell[CellGroupData[{ Cell[125131, 2933, 1416, 35, 46, "Input",ExpressionUUID->"1571fc8f-6178-4fd6-b368-3e2ac055b580"], Cell[126550, 2970, 556812, 13055, 2610, "Output",ExpressionUUID->"dea4d8b7-2f35-4fd5-8c96-c4df84b94675"] }, Open ]], Cell[683377, 16028, 131, 3, 27, "Input",ExpressionUUID->"b05b4df4-6df3-4385-b36d-52f016bc097f"] } ] *)