(* 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[ 673680, 16457] NotebookOptionsPosition[ 671248, 16420] NotebookOutlinePosition[ 671622, 16436] CellTagsIndexPosition[ 671579, 16433] 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}}, 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[{ 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]", "verts"}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->CompressedData[" 1:eJwd030s1HEcB/BfylGhk+tmultSuqz0uKhUSsyVHk/IlWr0YDJEU5e7DCc0 xE8RihBdiLsJV1mblsgqD7XuGnk4VNfJUw/S1Pq9v3989vrn8/lsn733WRwY LjplRFHUbqagpUVmqkRr2NG6wv0a7HQYuQXPRnmXwOv+3EpokxSqhF+2f38I lZsLGqBOPdYCk/t9u2FwUvkgPLRzgQFSUv4kVJm++QOL5xwwucQoqxYT51v7 mUGnzw+JDds9raDUoOPDKKO/ofC6yjQCpi1nxcGy28OJcBEtS4NU/lAWDGfb 58Nkn7W3oLjOuQwq3aOI5W6FatgYW/ACjnq2vyLzWroT0q+tNfC4W2sXbNHv 0sGevSnERzZheii6T8+IYbR0KjSFuoxG4nBt8xGomNtOFA28CyJ9m35JoTwj RQ7NFV40XHfKIhveiPxBvLxzpADy7vNL4Pkuk2pYvLRQBV/lmb2FNQFUNzT1 2DYIs/VaImvAVw+nDyYRU/7uG4WRvMeT8MJklbGM0VbQSdwaqOmNZbyaOasP zlJXfILdnDaiE+fpnnjk4K8lardZ1EDbc5wGmDplPgrr+DQrgXHEksODD35X Ewd/S4TQ7n3FMbhJ4BcEKcd1wVB+xicUFj35FA63rF9zAXI/512CPar5V6BP 2+l00n+6loZ3J1xyoNgvpgDuize+A1ewKAVkf/xeAQUlC5TwnOZ9ExwLbP4I n2kbB+BGrnoY9ndMjcEjs4t2p+GuLuF+yB2mg+CcBMcQyBp/GQYpm3lSyLZ1 yYIeFvJiyAt9Vg4V3hNKuKiqvgmK3AJa4HOxuo3st/PvgBnCsSEYwa00wD5b q5mFyCvagQ1POKa332HcvLKmAzYFeWlgvGU6UajzHoScEGocrr4pnYbub4X/ YH1tolER/qU3h8h2dHWGkqyFG+FRL9VBqBt6RPxl3HMYTn/7EwATv+VGwH/H FkZC694l0fCrRC6BveuzY6H96ityOFsWdg+WunYr4A8zWStcddmlDZaXxq2J /sD888pcYp/m5DIpY7PxBgEUXHT7qWBMtooi/gegIJ/I "], CellLabel->"In[5]:=",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[{"{", RowBox[{ RowBox[{"2", "d"}], ",", "0", ",", "z"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ FractionBox[ SuperscriptBox[ RowBox[{"Norm", "[", "z", "]"}], "2"], "r"], "-", "r"}], ",", RowBox[{"1", "/", "r"}], ",", RowBox[{"z", "/", "r"}]}], "}"}]}], "]"}]}], ";"}]], "Input", CellLabel->"In[11]:=",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.7389263757227573`*^9, 3.738926389842006*^9}}, CellLabel->"In[27]:=",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[{"BMat", "[", "n_", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"b", "[", RowBox[{"i", ",", "j"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.7378245147847567`*^9, 3.737824531315222*^9}, { 3.737995674554207*^9, 3.7379956992022705`*^9}, 3.7380623568729105`*^9, { 3.739118337087802*^9, 3.739118338182268*^9}}, CellLabel-> "In[532]:=",ExpressionUUID->"cd35cdcc-79cb-420e-8b24-2c510cf42e01"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Bend4", "[", RowBox[{"V_", ",", "n_"}], "]"}], "[", "i_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"B", "=", RowBox[{ RowBox[{"Bend3", "[", RowBox[{"V", ",", "n", ",", "Integers"}], "]"}], "[", "i", "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "B", "]"}], ">", "0"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"B", ",", "\"\\""}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Bend3", "[", RowBox[{"V", ",", "n", ",", "Reals"}], "]"}], "[", "i", "]"}], ",", "\"\\""}], "}"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Bend3", "[", RowBox[{"V_", ",", "n_", ",", RowBox[{"RING_:", "Integers"}]}], "]"}], "[", "i_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "sol", ",", "assignments", ",", "rest", ",", "j", ",", "l", ",", "others1", ",", "others2", ",", "co", ",", "cl"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"cl", " ", "=", " ", RowBox[{"V", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"co", " ", "=", " ", RowBox[{"V", "[", RowBox[{"[", RowBox[{ RowBox[{"n", "+", "1"}], ";;"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"BMat", "[", "n", "]"}], ".", "cl"}], "==", RowBox[{"cl", ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], "]"}]}]}], ",", "RING"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"sol", "==", RowBox[{"{", "}"}]}], ",", "Null", ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"sol", "=", RowBox[{ "sol", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], ";", "\[IndentingNewLine]", RowBox[{"assignments", "=", RowBox[{"Association", "[", "sol", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"rest", "=", RowBox[{"Complement", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"BMat", "[", "n", "]"}], "]"}], ",", RowBox[{"Keys", "[", "assignments", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"l", "=", RowBox[{"Length", "[", "rest", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"l", "==", "0"}], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"BMat", "[", "n", "]"}], "/.", "assignments"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"others1", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{"rest", "==", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "l"}], "}"}]}], "]"}]}], "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], ";", "\[IndentingNewLine]", RowBox[{"others2", "=", RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "l"}], ",", RowBox[{"j", "++"}], ",", RowBox[{ RowBox[{"others2", "[", RowBox[{ "rest", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}], "=", RowBox[{"Subscript", "[", RowBox[{"a", ",", " ", "j"}], "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"others2", "=", RowBox[{"Normal", "[", "others2", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"BMat", "[", "n", "]"}], "/.", RowBox[{"(", RowBox[{"assignments", "/.", "others1"}], ")"}]}], ")"}], "/.", "others1"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "Input", CellChangeTimes->{3.7391183489895782`*^9}, CellLabel-> "In[534]:=",ExpressionUUID->"e31de811-b823-497f-970d-8b661b013541"], Cell[BoxData[ RowBox[{ RowBox[{"Everything", "[", RowBox[{"n_", ",", "FacesCW_", ",", RowBox[{"\[Epsilon]_:", "0"}], ",", "steps_", ",", RowBox[{"sizemax_:", "\[Infinity]"}]}], "]"}], ":=", 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[{"Simplify", "[", RowBox[{"RootApproximant", "[", "Vnye", "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"bends", "=", RowBox[{ RowBox[{"Bend4", "[", 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[{"Simplify", "[", 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->{{3.737470377365205*^9, 3.737470438059895*^9}, { 3.737470482386249*^9, 3.7374706291316*^9}, {3.737471365625141*^9, 3.737471391640571*^9}, {3.737471696917704*^9, 3.7374717170638113`*^9}, { 3.737471876518211*^9, 3.737471941864938*^9}, {3.737716963448217*^9, 3.737716980888073*^9}, {3.737720445151472*^9, 3.737720446702874*^9}, { 3.737824443162737*^9, 3.737824455449666*^9}, {3.7378912948360367`*^9, 3.73789135603367*^9}, {3.737891444682703*^9, 3.7378914866810017`*^9}, { 3.7378915925235357`*^9, 3.737891593055147*^9}, {3.737905867803301*^9, 3.737905868137411*^9}, {3.73799267567642*^9, 3.737992677471591*^9}, { 3.7379929469710035`*^9, 3.7379929651434455`*^9}, {3.7379930588897543`*^9, 3.737993076943515*^9}, {3.7380635255102654`*^9, 3.7380635290957108`*^9}, { 3.7380636676088915`*^9, 3.7380636745872297`*^9}, {3.7380638177433786`*^9, 3.738063855095478*^9}, {3.738063909642552*^9, 3.7380639110946693`*^9}, { 3.7380639502698975`*^9, 3.738063956902152*^9}, {3.7380640873173466`*^9, 3.7380641169740276`*^9}, {3.7380642823624744`*^9, 3.738064323475514*^9}, { 3.7380643636749973`*^9, 3.7380643981976967`*^9}, {3.738064443997203*^9, 3.738064444270455*^9}, {3.7380646319055905`*^9, 3.7380646323294573`*^9}, { 3.738064693256534*^9, 3.738064738370883*^9}, {3.738064780948996*^9, 3.738064783577959*^9}, {3.738064816492895*^9, 3.738064820860215*^9}, { 3.738064905554728*^9, 3.738064908135788*^9}, {3.73806511977873*^9, 3.7380651218093004`*^9}, {3.738065157856887*^9, 3.7380651636254597`*^9}, { 3.738065275188075*^9, 3.738065299386354*^9}, {3.738065349198165*^9, 3.738065417491501*^9}, {3.738065502923974*^9, 3.7380655312192965`*^9}, { 3.738065586862509*^9, 3.7380656114477196`*^9}, {3.7383667450964403`*^9, 3.7383667808971167`*^9}, {3.7383668404673557`*^9, 3.7383668491723013`*^9}, {3.738366884492676*^9, 3.738366899165487*^9}, { 3.7383669350551987`*^9, 3.738366935597023*^9}, {3.738406454334059*^9, 3.7384064778900304`*^9}, {3.7384065311871557`*^9, 3.7384065390999947`*^9}, {3.7384088785270195`*^9, 3.738408882012842*^9}, { 3.7384089293051987`*^9, 3.738408929489704*^9}, {3.7384091549149723`*^9, 3.7384091574651527`*^9}, {3.7384095341398277`*^9, 3.738409537195654*^9}, { 3.738410849524389*^9, 3.7384108842784495`*^9}, {3.73841104193098*^9, 3.738411045112468*^9}, {3.738411222945875*^9, 3.738411223086499*^9}, { 3.738411291901064*^9, 3.7384112938647933`*^9}, {3.7384113284900064`*^9, 3.738411336118482*^9}, {3.7384113742605715`*^9, 3.738411385112833*^9}, { 3.738411497441986*^9, 3.7384115195708466`*^9}, {3.7384115693655043`*^9, 3.73841163508772*^9}, {3.738411670899951*^9, 3.7384116724797554`*^9}, { 3.738411750114659*^9, 3.73841176516743*^9}, {3.738411889531969*^9, 3.738411889696562*^9}, {3.7385985625147996`*^9, 3.738598562667409*^9}, { 3.738598719985386*^9, 3.738598730957058*^9}, {3.7386013106761007`*^9, 3.7386013108386655`*^9}, 3.738926395145856*^9, {3.738926431904538*^9, 3.73892644187488*^9}, {3.739118355279134*^9, 3.739118358669047*^9}}, CellLabel-> "In[536]:=",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", "]"}], ",", ".01"}], "]"}], ",", RowBox[{"Round", "[", RowBox[{ RowBox[{"N", "[", RowBox[{ RowBox[{ "orbit", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}]}], "]"}], ",", ".01"}], "]"}]}], 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}, { 3.7385983894314737`*^9, 3.738598391136881*^9}, {3.738926669292841*^9, 3.7389266707618847`*^9}}, CellLabel->"In[30]:=",ExpressionUUID->"b43a5c15-ff8f-4841-a157-1d63bba9b7c4"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Everything", "[", RowBox[{"7", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "6", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "7", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "6", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4", ",", "5", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "4", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "5", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1", ",", "2", ",", "7"}], "}"}]}], "}"}], ",", RowBox[{"1", "/", "100"}], ",", "3", ",", "35"}], "]"}]], "Input", CellChangeTimes->{{3.737720388591385*^9, 3.7377204147139273`*^9}, { 3.73799104566405*^9, 3.737991046219566*^9}, {3.7379911247406125`*^9, 3.737991126272558*^9}, 3.737992714004908*^9, {3.7383399270780163`*^9, 3.738339928102619*^9}, {3.7383399833318253`*^9, 3.738340023435418*^9}, { 3.7383669397920876`*^9, 3.73836699772031*^9}, {3.7383676488210897`*^9, 3.738367650275752*^9}, {3.738411438453149*^9, 3.738411446817583*^9}, { 3.7384118416165533`*^9, 3.7384118445254*^9}, {3.738598401775426*^9, 3.7385984461068387`*^9}, {3.7385990810798445`*^9, 3.738599088815607*^9}, { 3.7386012597855043`*^9, 3.738601302494419*^9}, {3.738601598678238*^9, 3.738601639289603*^9}, {3.7386020946534925`*^9, 3.738602107358418*^9}, { 3.738602356489482*^9, 3.7386024023996735`*^9}, {3.7386031000929813`*^9, 3.738603131634983*^9}, {3.7386033447555046`*^9, 3.7386033939261928`*^9}, { 3.7386034982796383`*^9, 3.738603546222398*^9}, {3.738604540558546*^9, 3.7386046018698397`*^9}, {3.7386047974364233`*^9, 3.738604843888815*^9}, { 3.738605068506323*^9, 3.738605111398295*^9}, {3.7386052759377117`*^9, 3.738605335274602*^9}, {3.7386059315047274`*^9, 3.7386059872695265`*^9}, { 3.738606093824689*^9, 3.7386061370936213`*^9}, {3.738668592742067*^9, 3.7386686395816746`*^9}, {3.7386688556597276`*^9, 3.7386689139191813`*^9}, {3.73866909759364*^9, 3.7386691636266375`*^9}, { 3.7386693665464325`*^9, 3.73866937784991*^9}, {3.7389264482149277`*^9, 3.7389264521344476`*^9}, {3.738926692499796*^9, 3.738926694033662*^9}, { 3.738951378383294*^9, 3.738951427246646*^9}}, CellLabel-> "In[537]:=",ExpressionUUID->"8c0d00eb-3a38-4d87-9e21-66e5a04e235e"], Cell[BoxData[ TagBox[GridBox[{ { GraphicsBox[ {RGBColor[0, 0, 1], Thickness[ Large], {CircleBox[{3.6955181300451425, 1.8284271247461898}], CircleBox[{0, 2.828427124746189}, 2.828427124746189], CircleBox[{4.329568801169574, 0.48528137423856804}, 0.48528137423857026], CircleBox[{4.777910330337539, 1.1213203435596413}, 0.2928932188134526], CircleBox[{7.3910362600902895, 2.8284271247461894}, 2.8284271247461894], LineBox[{{-3.6955181300451447`, 5.656854249492379}, { 11.086554390135436`, 5.656854249492379}}], LineBox[{{-3.6955181300451447`, 0}, {11.086554390135436`, 0}}]}, {RGBColor[1, 0, 0], Dashing[{Small, Small}], CircleBox[{3.6955181300451447, 5.656854249492378}, 3.6955181300451447], LineBox[{{0, -3.6955181300451447`}, {0, 9.352372379537524}}], LineBox[{{7.391036260090292, -3.6955181300451447`}, { 7.391036260090292, 9.352372379537524}}], CircleBox[{5.860302530629934, 0}, 1.5307337294603587], CircleBox[{4.3780767486647925, 1.0448154998549666}, 0.2827250369469035], CircleBox[{4.777910330337537, 1.656854249492382}, 0.44834152916796527], CircleBox[{2.1647844005847876, 0}, 2.1647844005847876]}}]}, { GraphicsBox[ {Thickness[ Large], {CircleBox[{3.6955181300451425, 1.8284271247461898}], CircleBox[{0., 2.828427124746189}, 2.828427124746189], CircleBox[{4.329568801169574, 0.48528137423857026}, 0.48528137423857026], CircleBox[{4.777910330337538, 1.1213203435596413}, 0.2928932188134526], CircleBox[{7.391036260090289, 2.8284271247461894}, 2.8284271247461894], TagBox[ConicHullRegionBox[{0., 5.656854249492379}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"], CircleBox[{4.017279348567327, 3.0324400412919954}, 0.24626537501208592], CircleBox[{4.3780767486647925, 2.7967377808964824}, 0.1846990312590645], CircleBox[{3.6955181300451447, 4.449747468305832}, 1.2071067811865464], CircleBox[{5.138707730435013, 0.6094757082487257}, 0.333333333333331], CircleBox[{5.460468948957188, 0.1929764106676675}, 0.1929764106676675], CircleBox[{5.860302530629934, 0.2071067811865475}, 0.2071067811865475], CircleBox[{4.434621756054169, 1.0782890105765082}, 0.05308183932197301], CircleBox[{4.3780767486647925, 1.0065630780026282}, 0.038252421852338375], CircleBox[{4.7186295599588215, 1.6713902574536172}, 0.035093027562777025], CircleBox[{4.710559970488198, 1.4808592777918839}, 0.07289950418781897], CircleBox[{4.777910330337537, 1.5961940777125603}, 0.060660171779821255], CircleBox[{3.695518130045149, 0.6568542494923808}, 0.17157287525381032], CircleBox[{3.0614674589207183, 0.48528137423857076}, 0.48528137423857076], CircleBox[{2.164784400584788, 0.4142135623730951}, 0.4142135623730951], CircleBox[{-3.6955181300451425, 1.8284271247461898}], CircleBox[{-4.329568801169574, 0.48528137423857026}, 0.48528137423857026], CircleBox[{-4.777910330337538, 1.1213203435596413}, 0.2928932188134526], CircleBox[{-7.391036260090289, 2.8284271247461894}, 2.8284271247461894], CircleBox[{11.086554390135442, 1.8284271247461898}], CircleBox[{14.782072520180586, 2.828427124746189}, 2.828427124746189], CircleBox[{10.452503719011009, 0.48528137423857026}, 0.48528137423857026], CircleBox[{10.004162189843047, 1.1213203435596413}, 0.2928932188134526], CircleBox[{4.413589920256754, 3.1454862739974088}, 0.16585295746255918], CircleBox[{4.427445816757765, 3.3909761161195187}, 0.08002759982692155], CircleBox[{4.556363704738144, 3.4897141915641474}, 0.08235783481495375], CircleBox[{4.164852008456198, 2.7494462683655616}, 0.0337071888778282], CircleBox[{4.446294306596919, 2.5680775969119938}, 0.05392015269317491], CircleBox[{4.532704205849417, 2.5160997674582983}, 0.04691816067802713], CircleBox[{3.695518130045148, 2.9222634461022436}, 0.09383632135605452], CircleBox[{3.3737569115229635, 3.0324400412919936}, 0.24626537501208637], CircleBox[{2.99062180954683, 3.2426406871192834}, 0.19074356983054608], CircleBox[{2.2173108780270874, 4.89116882454314}, 0.19999999999999996], CircleBox[{2.4899807049427896, 4.879974858502534}, 0.07289950418781894], CircleBox[{2.4415625435439448, 4.985655087818791}, 0.04334433101036177], CircleBox[{2.463678753363429, 5.342584568965022}, 0.31426968052735427], CircleBox[{5.173725382063201, 4.8911688245431435}, 0.19999999999999957], CircleBox[{4.927357506726859, 5.342584568965026}, 0.31426968052735405], CircleBox[{4.974215848715683, 4.678181385615875}, 0.09183506135716561], CircleBox[{5.1246841571655795, 4.629370227288792}, 0.06635229915246602], CircleBox[{5.515700902381994, 0.5669943742237602}, 0.04604578501030027], CircleBox[{5.512460506296437, 0.6563257386787847}, 0.04334433101036166], CircleBox[{5.640045069989641, 0.452742581475949}, 0.12281790014470072], CircleBox[{4.813904802069169, 0.791424834732073}, 0.03896013545589796], CircleBox[{5.09267598432783, 0.9886968895286223}, 0.048671412685577745], CircleBox[{5.177743912010304, 1.0065630780026267}, 0.03825242185233832], CircleBox[{4.86342859411433, 0.3024785661018221}, 0.07900857355927227], CircleBox[{5.0231164548256535, 0.14515710963689998}, 0.14515710963689998], CircleBox[{5.226251859505504, 0.07106781186547524}, 0.07106781186547524], CircleBox[{5.68347920828393, 0.03774198887446843}, 0.03774198887446843], CircleBox[{6.273221235110954, 0.1444614189832768}, 0.0790085735592716], CircleBox[{6.1229349178414365, 0.0832611206852317}, 0.0832611206852317], CircleBox[{6.370547107116715, 0.05392015269317446}, 0.05392015269317446], CircleBox[{6.389637426794981, 0.1432369907379062}, 0.0374140570188867], CircleBox[{4.4706227369818725, 0.9918476978148651}, 0.04055667401370105], CircleBox[{4.74895757718228, 1.731560948165417}, 0.03228872552692549], CircleBox[{4.842892120060883, 1.4682150516782775}, 0.06003534551132186], CircleBox[{2.855600099720188, 1.1308301755385173}, 0.09183506135716551], CircleBox[{2.982370305751742, 1.0331095176344136}, 0.06822746429607388], CircleBox[{2.511558227412829, 1.0080498837291494}, 0.2734590803390134], CircleBox[{3.6955181300451483, 0.31370849898475767}, 0.17157287525380843], CircleBox[{3.5867322333437195, 0.08326112068523164}, 0.08326112068523164], CircleBox[{3.432885742833647, 0.07106781186547528}, 0.07106781186547528], CircleBox[{3.8499924716725946, 0.8005601543257043}, 0.03940984751089214], CircleBox[{3.9196888946291315, 0.7980970388562821}, 0.0303300858899107], CircleBox[{3.541043788417682, 0.800560154325719}, 0.039409847510892645], CircleBox[{3.471347365461163, 0.7980970388562807}, 0.03033008588991065], CircleBox[{1.4161918113908334, 0.23356251461630245}, 0.127739580897283], CircleBox[{1.4431896003898583, 0.05392015269317449}, 0.05392015269317449], CircleBox[{1.6743721516085524, 0.1451571096368999}, 0.1451571096368999], CircleBox[{2.675028977071574, 0.10456949966158671}, 0.057190958417936595], CircleBox[{2.5362026844977157, 0.08326112068523167}, 0.08326112068523167], CircleBox[{2.7302344744785945, 0.03310951763441173}, 0.03310951763441173], CircleBox[{-4.017279348567327, 3.0324400412919954}, 0.24626537501208592], CircleBox[{-4.3780767486647925, 2.7967377808964824}, 0.1846990312590645], CircleBox[{-3.6955181300451447, 4.449747468305832}, 1.2071067811865464], CircleBox[{-5.138707730435013, 0.6094757082487257}, 0.333333333333331], CircleBox[{-5.460468948957188, 0.1929764106676675}, 0.1929764106676675], CircleBox[{-5.860302530629934, 0.2071067811865475}, 0.2071067811865475], CircleBox[{-4.434621756054169, 1.0782890105765082}, 0.05308183932197301], CircleBox[{-4.3780767486647925, 1.0065630780026282}, 0.038252421852338375], CircleBox[{-4.7186295599588215, 1.6713902574536172}, 0.035093027562777025], CircleBox[{-4.710559970488198, 1.4808592777918839}, 0.07289950418781897], CircleBox[{-4.777910330337537, 1.5961940777125603}, 0.060660171779821255], CircleBox[{-3.695518130045149, 0.6568542494923808}, 0.17157287525381032], CircleBox[{-3.0614674589207183, 0.48528137423857076}, 0.48528137423857076], CircleBox[{-2.164784400584788, 0.4142135623730951}, 0.4142135623730951], CircleBox[{-11.086554390135442, 1.8284271247461898}], CircleBox[{-14.782072520180586, 2.828427124746189}, 2.828427124746189], CircleBox[{-10.452503719011009, 0.48528137423857026}, 0.48528137423857026], CircleBox[{-10.004162189843047, 1.1213203435596413}, 0.2928932188134526], CircleBox[{10.764793171613256, 3.0324400412919954}, 0.24626537501208592], CircleBox[{10.403995771515794, 2.7967377808964824}, 0.1846990312590645], CircleBox[{11.08655439013544, 4.449747468305832}, 1.2071067811865464], CircleBox[{9.643364789745572, 0.6094757082487257}, 0.333333333333331], CircleBox[{9.321603571223397, 0.1929764106676675}, 0.1929764106676675], CircleBox[{8.92176998955065, 0.2071067811865475}, 0.2071067811865475], CircleBox[{10.347450764126414, 1.0782890105765082}, 0.05308183932197301], CircleBox[{10.403995771515792, 1.0065630780026282}, 0.038252421852338375], CircleBox[{10.063442960221762, 1.6713902574536172}, 0.035093027562777025], CircleBox[{10.071512549692388, 1.4808592777918839}, 0.07289950418781897], CircleBox[{10.004162189843047, 1.5961940777125603}, 0.060660171779821255], CircleBox[{11.086554390135436, 0.6568542494923808}, 0.17157287525381032], CircleBox[{11.720605061259864, 0.48528137423857076}, 0.48528137423857076], CircleBox[{12.617288119595797, 0.4142135623730951}, 0.4142135623730951], CircleBox[{18.47759065022573, 1.8284271247461898}], CircleBox[{19.111641321350156, 0.48528137423857026}, 0.48528137423857026], CircleBox[{19.55998285051812, 1.1213203435596413}, 0.2928932188134526], CircleBox[{22.173108780270873, 2.8284271247461894}, 2.8284271247461894], CircleBox[{4.5563637047381444, 3.3529846513946397}, 0.05437170535455283], CircleBox[{4.2267041886002055, 3.2215907573118563}, 0.03593447791775362], CircleBox[{4.259984958459326, 3.3133967852566446}, 0.06171774381536457], CircleBox[{4.318820608936862, 3.382366880379535}, 0.028938242133579428], CircleBox[{4.646322165121889, 3.6235691376903527}, 0.029142871573604005], CircleBox[{4.592691448049554, 3.596854060930557}, 0.03077331271724059], CircleBox[{4.526459057060402, 2.6233954398532}, 0.04347826086956599], CircleBox[{3.153988526132451, 2.738740891312312}, 0.05920983072931897], CircleBox[{3.250451981913891, 2.7712361663282534}, 0.042579860299094316], CircleBox[{2.990621809546829, 2.889087296526011}, 0.16280982076272732], CircleBox[{3.695518130045148, 3.098258417802753}, 0.08215865034445169], CircleBox[{3.647700921311789, 3.206962543709592}, 0.036597707128396786], CircleBox[{3.5807975268169203, 3.216923681780078}, 0.031043171536767243], CircleBox[{2.7956212362147586, 3.5156937905404875}, 0.050432643684177256], CircleBox[{2.894116286425844, 3.471418711200317}, 0.05755604816206503], CircleBox[{3.206888040157762, 3.3076874873444533}, 0.03509302756277692], CircleBox[{2.1071308280119334, 5.116377695409313}, 0.050716331614351504], CircleBox[{2.1918868505784834, 5.124184397994243}, 0.034398461262982766], CircleBox[{1.8477590650225728, 5.355077554195742}, 0.30177669529663653], CircleBox[{2.5288077035315695, 4.9902616964342235}, 0.04402236049276024], CircleBox[{2.427416787796288, 4.798989873223329}, 0.029437251522859455], CircleBox[{2.416820411374605, 4.678181385615875}, 0.09183506135716576], CircleBox[{2.39747432789312, 4.4956211535460975}, 0.09174737048053258], CircleBox[{2.825984452387464, 5.431652653919073}, 0.05882352941176464], CircleBox[{2.956414504036116, 5.543717164502532}, 0.11313708498984751], CircleBox[{2.8431239191120343, 5.345275795110847}, 0.029237375972968053], CircleBox[{5.3951910076053995, 5.025863713272912}, 0.05920983072931899], CircleBox[{5.419262315846394, 4.921946958010999}, 0.04745843964475692], CircleBox[{5.5432771950677155, 5.355077554195743}, 0.301776695296636], CircleBox[{5.032799481290405, 4.522029230950186}, 0.07494484574313744], CircleBox[{4.945480399139843, 4.442930072037432}, 0.04287407908781979], CircleBox[{4.948343387038293, 4.350453131431063}, 0.04964716843738381], CircleBox[{4.9636194722940035, 4.798989873223331}, 0.0294372515228595], CircleBox[{4.9010555551475, 4.879974858502533}, 0.072899504187819], CircleBox[{4.835181289372301, 4.9871615253247175}, 0.05291146685950968], CircleBox[{4.565051807702827, 5.431652653919074}, 0.058823529411764684], CircleBox[{4.434621756054174, 5.543717164502533}, 0.11313708498984754], CircleBox[{5.576858977100152, 0.6162715391352}, 0.032494326301949844], CircleBox[{5.479942438925609, 0.4638640704319523}, 0.03767054177628108], CircleBox[{4.742603635414521, 0.7977284271792415}, 0.032619132800175026], CircleBox[{5.112323277457785, 1.0794015732905846}, 0.04413675389302877], CircleBox[{5.2147829433596025, 0.19431640220115015}, 0.052713249114356105], CircleBox[{4.7936105701072, 0.1545790581844089}, 0.08454209418155867], CircleBox[{4.82970068238075, 0.03774198887446838}, 0.03774198887446838], CircleBox[{6.128517895813989, 0.22836454772415168}, 0.061949671549647596], CircleBox[{6.468614447825509, 0.09800296986272158}, 0.053599604018303826], CircleBox[{6.537257734187129, 0.037741988874468536}, 0.037741988874468536], CircleBox[{6.625669395360114, 0.051776695296637094}, 0.051776695296637094], CircleBox[{6.26013611230268, 0.033109517634411785}, 0.033109517634411785], CircleBox[{2.870946820281223, 0.9877351237967181}, 0.052080593333235344], CircleBox[{2.824476153460896, 1.259391531017341}, 0.04044011451988096], CircleBox[{2.6994431831581016, 1.3410732552103997}, 0.10890896559074545], CircleBox[{2.5115582274128285, 1.3616032743224225}, 0.08009431025426014], CircleBox[{2.175089658092243, 0.9596065965917311}, 0.03923833468092825], CircleBox[{2.2138737940431557, 0.8774479462472788}, 0.05161458507336934], CircleBox[{2.523641577078356, 0.6939996662293929}, 0.040823509778199533], CircleBox[{3.492382725365301, 0.17295401695067888}, 0.046918160678027114], CircleBox[{3.881227272001623, 0.19238815542511975}, 0.050252531694167914], CircleBox[{3.8043040267465686, 0.08326112068523177}, 0.08326112068523177], CircleBox[{3.695518130045146, 0.03553390593273764}, 0.03553390593273764], CircleBox[{3.8802658779680077, 0.7379079127659964}, 0.030173070660055264], CircleBox[{3.5107703821222036, 0.7379079127660286}, 0.030173070660056298], CircleBox[{1.6435276341612113, 0.39579202005485403}, 0.1073686169272964], CircleBox[{1.5262502009453744, 0.053285616878171946}, 0.029142871573603842], CircleBox[{1.2681013422488576, 0.08326112068523173}, 0.08326112068523173], CircleBox[{1.082392200292394, 0.10355339059327377}, 0.10355339059327377], CircleBox[{1.8882557485211113, 0.046152578258215476}, 0.046152578258215476], CircleBox[{2.591673663536378, 0.21291172259434735}, 0.05775770107592123], CircleBox[{2.3990014900364707, 0.03310951763441173}, 0.03310951763441173], CircleBox[{-4.413589920256754, 3.1454862739974088}, 0.16585295746255918], CircleBox[{-4.427445816757765, 3.3909761161195187}, 0.08002759982692155], CircleBox[{-4.556363704738144, 3.4897141915641474}, 0.08235783481495375], CircleBox[{-4.164852008456198, 2.7494462683655616}, 0.0337071888778282], CircleBox[{-4.446294306596919, 2.5680775969119938}, 0.05392015269317491], CircleBox[{-4.532704205849417, 2.5160997674582983}, 0.04691816067802713], CircleBox[{-3.695518130045148, 2.9222634461022436}, 0.09383632135605452], CircleBox[{-3.3737569115229635, 3.0324400412919936}, 0.24626537501208637], CircleBox[{-2.99062180954683, 3.2426406871192834}, 0.19074356983054608], CircleBox[{-2.2173108780270874, 4.89116882454314}, 0.19999999999999996], CircleBox[{-2.4899807049427896, 4.879974858502534}, 0.07289950418781894], CircleBox[{-2.4415625435439448, 4.985655087818791}, 0.04334433101036177], CircleBox[{-2.463678753363429, 5.342584568965022}, 0.31426968052735427], CircleBox[{-5.173725382063201, 4.8911688245431435}, 0.19999999999999957], CircleBox[{-4.927357506726859, 5.342584568965026}, 0.31426968052735405], CircleBox[{-4.974215848715683, 4.678181385615875}, 0.09183506135716561], CircleBox[{-5.1246841571655795, 4.629370227288792}, 0.06635229915246602], CircleBox[{-5.515700902381994, 0.5669943742237602}, 0.04604578501030027], CircleBox[{-5.512460506296437, 0.6563257386787847}, 0.04334433101036166], CircleBox[{-5.640045069989641, 0.452742581475949}, 0.12281790014470072], CircleBox[{-4.813904802069169, 0.791424834732073}, 0.03896013545589796], CircleBox[{-5.09267598432783, 0.9886968895286223}, 0.048671412685577745], CircleBox[{-5.177743912010304, 1.0065630780026267}, 0.03825242185233832], CircleBox[{-4.86342859411433, 0.3024785661018221}, 0.07900857355927227], CircleBox[{-5.0231164548256535, 0.14515710963689998}, 0.14515710963689998], CircleBox[{-5.226251859505504, 0.07106781186547524}, 0.07106781186547524], CircleBox[{-5.68347920828393, 0.03774198887446843}, 0.03774198887446843], CircleBox[{-6.273221235110954, 0.1444614189832768}, 0.0790085735592716], CircleBox[{-6.1229349178414365, 0.0832611206852317}, 0.0832611206852317], CircleBox[{-6.370547107116715, 0.05392015269317446}, 0.05392015269317446], CircleBox[{-6.389637426794981, 0.1432369907379062}, 0.0374140570188867], CircleBox[{-4.4706227369818725, 0.9918476978148651}, 0.04055667401370105], CircleBox[{-4.74895757718228, 1.731560948165417}, 0.03228872552692549], CircleBox[{-4.842892120060883, 1.4682150516782775}, 0.06003534551132186], CircleBox[{-2.855600099720188, 1.1308301755385173}, 0.09183506135716551], CircleBox[{-2.982370305751742, 1.0331095176344136}, 0.06822746429607388], CircleBox[{-2.511558227412829, 1.0080498837291494}, 0.2734590803390134], CircleBox[{-3.6955181300451483, 0.31370849898475767}, 0.17157287525380843], CircleBox[{-3.5867322333437195, 0.08326112068523164}, 0.08326112068523164], CircleBox[{-3.432885742833647, 0.07106781186547528}, 0.07106781186547528], CircleBox[{-3.8499924716725946, 0.8005601543257043}, 0.03940984751089214], CircleBox[{-3.9196888946291315, 0.7980970388562821}, 0.0303300858899107], CircleBox[{-3.541043788417682, 0.800560154325719}, 0.039409847510892645], CircleBox[{-3.471347365461163, 0.7980970388562807}, 0.03033008588991065], CircleBox[{-1.4161918113908334, 0.23356251461630245}, 0.127739580897283], CircleBox[{-1.4431896003898583, 0.05392015269317449}, 0.05392015269317449], CircleBox[{-1.6743721516085524, 0.1451571096368999}, 0.1451571096368999], CircleBox[{-2.675028977071574, 0.10456949966158671}, 0.057190958417936595], CircleBox[{-2.5362026844977157, 0.08326112068523167}, 0.08326112068523167], CircleBox[{-2.7302344744785945, 0.03310951763441173}, 0.03310951763441173], CircleBox[{-10.764793171613256, 3.0324400412919954}, 0.24626537501208592], CircleBox[{-10.403995771515794, 2.7967377808964824}, 0.1846990312590645], CircleBox[{-11.08655439013544, 4.449747468305832}, 1.2071067811865464], CircleBox[{-9.643364789745572, 0.6094757082487257}, 0.333333333333331], CircleBox[{-9.321603571223397, 0.1929764106676675}, 0.1929764106676675], CircleBox[{-8.92176998955065, 0.2071067811865475}, 0.2071067811865475], CircleBox[{-10.347450764126414, 1.0782890105765082}, 0.05308183932197301], CircleBox[{-10.403995771515792, 1.0065630780026282}, 0.038252421852338375], CircleBox[{-10.063442960221762, 1.6713902574536172}, 0.035093027562777025], CircleBox[{-10.071512549692388, 1.4808592777918839}, 0.07289950418781897], CircleBox[{-10.004162189843047, 1.5961940777125603}, 0.060660171779821255], CircleBox[{-11.086554390135436, 0.6568542494923808}, 0.17157287525381032], CircleBox[{-11.720605061259864, 0.48528137423857076}, 0.48528137423857076], CircleBox[{-12.617288119595797, 0.4142135623730951}, 0.4142135623730951], CircleBox[{-18.47759065022573, 1.8284271247461898}], CircleBox[{-19.111641321350156, 0.48528137423857026}, 0.48528137423857026], CircleBox[{-19.55998285051812, 1.1213203435596413}, 0.2928932188134526], CircleBox[{-22.173108780270873, 2.8284271247461894}, 2.8284271247461894], CircleBox[{10.36848259992383, 3.1454862739974088}, 0.16585295746255918], CircleBox[{10.35462670342282, 3.3909761161195187}, 0.08002759982692155], CircleBox[{10.22570881544244, 3.4897141915641474}, 0.08235783481495375], CircleBox[{10.617220511724387, 2.7494462683655616}, 0.0337071888778282], CircleBox[{10.335778213583666, 2.5680775969119938}, 0.05392015269317491], CircleBox[{10.249368314331166, 2.5160997674582983}, 0.04691816067802713], CircleBox[{11.086554390135436, 2.9222634461022436}, 0.09383632135605452], CircleBox[{11.40831560865762, 3.0324400412919936}, 0.24626537501208637], CircleBox[{11.791450710633754, 3.2426406871192834}, 0.19074356983054608], CircleBox[{12.564761642153496, 4.89116882454314}, 0.19999999999999996], CircleBox[{12.292091815237796, 4.879974858502534}, 0.07289950418781894], CircleBox[{12.340509976636639, 4.985655087818791}, 0.04334433101036177], CircleBox[{12.318393766817154, 5.342584568965022}, 0.31426968052735427], CircleBox[{9.608347138117384, 4.8911688245431435}, 0.19999999999999957], CircleBox[{9.854715013453726, 5.342584568965026}, 0.31426968052735405], CircleBox[{9.8078566714649, 4.678181385615875}, 0.09183506135716561], CircleBox[{9.657388363015004, 4.629370227288792}, 0.06635229915246602], CircleBox[{9.26637161779859, 0.5669943742237602}, 0.04604578501030027], CircleBox[{9.269612013884148, 0.6563257386787847}, 0.04334433101036166], CircleBox[{9.142027450190943, 0.452742581475949}, 0.12281790014470072], CircleBox[{9.968167718111415, 0.791424834732073}, 0.03896013545589796], CircleBox[{9.689396535852755, 0.9886968895286223}, 0.048671412685577745], CircleBox[{9.604328608170281, 1.0065630780026267}, 0.03825242185233832], CircleBox[{9.918643926066254, 0.3024785661018221}, 0.07900857355927227], CircleBox[{9.758956065354932, 0.14515710963689998}, 0.14515710963689998], CircleBox[{9.55582066067508, 0.07106781186547524}, 0.07106781186547524], CircleBox[{9.098593311896655, 0.03774198887446843}, 0.03774198887446843], CircleBox[{8.50885128506963, 0.1444614189832768}, 0.0790085735592716], CircleBox[{8.659137602339149, 0.0832611206852317}, 0.0832611206852317], CircleBox[{8.411525413063869, 0.05392015269317446}, 0.05392015269317446], CircleBox[{8.392435093385602, 0.1432369907379062}, 0.0374140570188867], CircleBox[{10.311449783198713, 0.9918476978148651}, 0.04055667401370105], CircleBox[{10.033114942998306, 1.731560948165417}, 0.03228872552692549], CircleBox[{9.939180400119701, 1.4682150516782775}, 0.06003534551132186], CircleBox[{11.926472420460396, 1.1308301755385173}, 0.09183506135716551], CircleBox[{11.79970221442884, 1.0331095176344136}, 0.06822746429607388], CircleBox[{12.270514292767757, 1.0080498837291494}, 0.2734590803390134], CircleBox[{11.086554390135433, 0.31370849898475767}, 0.17157287525380843], CircleBox[{11.195340286836865, 0.08326112068523164}, 0.08326112068523164], CircleBox[{11.34918677734694, 0.07106781186547528}, 0.07106781186547528], CircleBox[{10.93208004850799, 0.8005601543257043}, 0.03940984751089214], CircleBox[{10.862383625551454, 0.7980970388562821}, 0.0303300858899107], CircleBox[{11.241028731762903, 0.800560154325719}, 0.039409847510892645], CircleBox[{11.310725154719421, 0.7980970388562807}, 0.03033008588991065], CircleBox[{13.365880708789753, 0.23356251461630245}, 0.127739580897283], CircleBox[{13.338882919790727, 0.05392015269317449}, 0.05392015269317449], CircleBox[{13.107700368572031, 0.1451571096368999}, 0.1451571096368999], CircleBox[{12.10704354310901, 0.10456949966158671}, 0.057190958417936595], CircleBox[{12.24586983568287, 0.08326112068523167}, 0.08326112068523167], CircleBox[{12.05183804570199, 0.03310951763441173}, 0.03310951763441173], CircleBox[{18.79935186874791, 3.0324400412919954}, 0.24626537501208592], CircleBox[{19.16014926884538, 2.7967377808964824}, 0.1846990312590645], CircleBox[{18.47759065022573, 4.449747468305832}, 1.2071067811865464], CircleBox[{19.920780250615596, 0.6094757082487257}, 0.333333333333331], CircleBox[{20.242541469137773, 0.1929764106676675}, 0.1929764106676675], CircleBox[{20.642375050810518, 0.2071067811865475}, 0.2071067811865475], CircleBox[{19.21669427623475, 1.0782890105765082}, 0.05308183932197301], CircleBox[{19.160149268845377, 1.0065630780026282}, 0.038252421852338375], CircleBox[{19.50070208013941, 1.6713902574536172}, 0.035093027562777025], CircleBox[{19.492632490668782, 1.4808592777918839}, 0.07289950418781897], CircleBox[{19.55998285051812, 1.5961940777125603}, 0.060660171779821255], CircleBox[{18.477590650225732, 0.6568542494923808}, 0.17157287525381032], CircleBox[{17.8435399791013, 0.48528137423857076}, 0.48528137423857076], CircleBox[{16.946856920765374, 0.4142135623730951}, 0.4142135623730951], CircleBox[{25.868626910316024, 1.8284271247461898}], CircleBox[{29.564145040361172, 2.828427124746189}, 2.828427124746189], CircleBox[{25.234576239191593, 0.48528137423857026}, 0.48528137423857026], CircleBox[{24.78623471002363, 1.1213203435596413}, 0.2928932188134526]}, {RGBColor[1, 0, 0], CircleBox[{3.6955181300451447, 5.656854249492379}, 3.6955181300451447], CircleBox[{5.860302530629933, 0.}, 1.5307337294603587], CircleBox[{4.378076748664793, 1.0448154998549666}, 0.2827250369469035], CircleBox[{4.777910330337537, 1.656854249492382}, 0.44834152916796527], CircleBox[{2.1647844005847876, 0.}, 2.1647844005847876], TagBox[ConicHullRegionBox[{0, 0}, {{0, -1}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{7.391036260090292, 0.}, {{0, 1}}], "InfiniteLine"]}, {RGBColor[0, 0, 1], CircleBox[{3.6955181300451425, 1.8284271247461898}], CircleBox[{0., 2.828427124746189}, 2.828427124746189], CircleBox[{4.329568801169574, 0.48528137423857026}, 0.48528137423857026], CircleBox[{4.777910330337538, 1.1213203435596413}, 0.2928932188134526], CircleBox[{7.391036260090289, 2.8284271247461894}, 2.8284271247461894], TagBox[ConicHullRegionBox[{0., 5.656854249492379}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"]}}, PlotRange->{{-7.391036260090292, 14.782072520180584`}, {-4.434621756054174, 10.091476005546554`}}, PlotRangeClipping->True]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"16", "1", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SqrtBox["2"]}]}]}, {"0", FractionBox["1", RowBox[{"2", " ", SqrtBox["2"]}]], "0", "1"}, { RowBox[{"16", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"1", "+", FractionBox["3", RowBox[{"2", " ", SqrtBox["2"]}]]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "1"}, { RowBox[{"24", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{ FractionBox["1", "382"], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]}, { RowBox[{"8", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], FractionBox["1", RowBox[{"2", " ", SqrtBox["2"]}]], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], "1"}, { RowBox[{"8", " ", SqrtBox["2"]}], "0", "0", "1"}, {"0", "0", "0", RowBox[{"-", "1"}]}, { RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"562", "-", RowBox[{"261", " ", "#1"}], "-", RowBox[{"159", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"5", " ", SuperscriptBox["#1", "3"]}], "+", RowBox[{"3", " ", SuperscriptBox["#1", "4"]}]}], "&"}], ",", "2"}], "]"}], RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"1", "-", RowBox[{"16", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"32", " ", SuperscriptBox["#1", "4"]}]}], "&"}], ",", "3"}], "]"}], "1", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}]}, { RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "0"}, { RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], RowBox[{"7", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]}, { RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "6193"}], "+", RowBox[{"621", " ", "#1"}], "-", RowBox[{"292", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"5", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "1"}], "]"}], RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]}, {"0", FractionBox[ SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], "4"], "1", "0"}, {"0", "0", RowBox[{"-", "1"}], "0"}, { RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "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[{ RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", FractionBox[ RowBox[{"5", "-", RowBox[{"48", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"144", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "-", RowBox[{"216", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"192", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "+", SqrtBox[ FractionBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"1016641", "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"28457", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}]}], ")"}]}], RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}], RowBox[{"12", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "0", "0", FractionBox[ RowBox[{ FractionBox["5", "12"], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "-", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]], RowBox[{ FractionBox["1", "16"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "16"}], "+", RowBox[{"64", " ", SqrtBox["2"]}], "+", RowBox[{"4", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{ SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "38"}], "+", RowBox[{"46", " ", SqrtBox["2"]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"6", " ", SqrtBox[ RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"24", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["2"]}], ")"}]}], "+", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "-", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{ FractionBox["5", "2"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", FractionBox[ RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"], RowBox[{"8", " ", SqrtBox["2"]}]]}]}, {"0", FractionBox[ RowBox[{"5", "+", RowBox[{"96", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"336", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"192", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "+", SqrtBox[ FractionBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"1016641", "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"28457", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}]}], ")"}]}], RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}], RowBox[{"48", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ FractionBox["5", "12"], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"(", RowBox[{"64", "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}], ")"}]}], RowBox[{"16", "-", RowBox[{"8", " ", SqrtBox["2"]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"4", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", SqrtBox["2"]}], ")"}]}], "-", RowBox[{ SqrtBox[ RowBox[{"1", "-", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", FractionBox[ RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}]}]}, {"0", FractionBox[ RowBox[{"15", "+", RowBox[{"10", " ", SqrtBox["2"]}], "-", RowBox[{"96", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"192", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "+", RowBox[{"144", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"288", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"144", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"3", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"2594", "+", RowBox[{"24", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"24", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", RowBox[{"4", " ", SqrtBox[ FractionBox[ RowBox[{"1016641", "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"28457", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}]}], RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}], "+", RowBox[{"3", " ", SqrtBox[ FractionBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"1016641", "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"28457", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}]}], ")"}]}], RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]}], RowBox[{"48", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{"16", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"16", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"4", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{"3", " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "32"}], " ", SqrtBox["2"]}], "+", RowBox[{"32", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{"16", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"12", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{"3", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}], "+", RowBox[{"2", " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}]}], ")"}]}], RowBox[{"28", "-", RowBox[{"13", " ", SqrtBox["2"]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"6", " ", SqrtBox[ RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"12", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", SqrtBox["2"]}], ")"}]}], "+", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]], "+", RowBox[{"5", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ SqrtBox[ RowBox[{"1", "-", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", FractionBox[ RowBox[{"5", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"7", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["3", "32"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"], RowBox[{"8", " ", SqrtBox["2"]}]]}]}, {"0", FractionBox[ RowBox[{"955", "-", RowBox[{"17360", " ", SqrtBox["2"]}], "-", RowBox[{"9", " ", SqrtBox["35221090"]}], "-", RowBox[{"9168", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"9168", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "+", RowBox[{"27504", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"9168", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"191", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", RowBox[{"191", " ", SqrtBox[ RowBox[{"2594", "+", RowBox[{"24", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"24", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", RowBox[{"382", " ", SqrtBox[ FractionBox[ RowBox[{"1016641", "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"28457", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}]}], RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}], "+", RowBox[{"191", " ", SqrtBox[ FractionBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"1016641", "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"28457", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}]}], ")"}]}], RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]}], RowBox[{"2292", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "2035"}], "-", SqrtBox["17610545"], "+", RowBox[{"1528", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"3056", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "+", RowBox[{"764", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{"382", " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}]}], RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], FractionBox[ RowBox[{ RowBox[{"-", "3056"}], "+", RowBox[{"3056", " ", SqrtBox["2"]}], "+", RowBox[{"4070", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"2035", " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{ SqrtBox["35221090"], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{"1528", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{"1528", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"1528", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{"1528", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}], "+", RowBox[{"382", " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}]}], "3056"], RowBox[{ RowBox[{"-", "10"}], "+", RowBox[{"29", " ", SqrtBox["2"]}], "-", RowBox[{"6", " ", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", FractionBox[ RowBox[{"2035", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "191"], "+", RowBox[{ FractionBox["1", "191"], " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"2", "-", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"16", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", SqrtBox["2"]}], ")"}]}], "-", RowBox[{"40", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["2"]}], ")"}]}], "+", RowBox[{ FractionBox["1", "382"], " ", SqrtBox[ FractionBox["17610545", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]]}], "+", RowBox[{ FractionBox["1", "764"], " ", SqrtBox[ FractionBox["17610545", RowBox[{"2", "+", SqrtBox["2"]}]]]}], "+", FractionBox["2035", RowBox[{"764", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", FractionBox["2035", RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "-", FractionBox[ RowBox[{"2035", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], RowBox[{"1528", " ", SqrtBox["2"]}]], "-", FractionBox[ RowBox[{ SqrtBox[ FractionBox["17610545", "2"]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "1528"], "-", RowBox[{ SqrtBox[ RowBox[{"1", "-", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{ FractionBox["3", "2"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", FractionBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]], "-", FractionBox[ RowBox[{"3", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]], "+", RowBox[{ FractionBox["1", "8"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"], RowBox[{"4", " ", SqrtBox["2"]}]]}]}, {"0", FractionBox[ RowBox[{"5", "-", RowBox[{"192", " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"288", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "-", RowBox[{"96", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"192", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]], "+", SqrtBox[ FractionBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"1016641", "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"7782", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"72", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{"28457", " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}]}], ")"}]}], RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}], RowBox[{"48", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ FractionBox["5", "12"], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{"2", "+", RowBox[{ FractionBox["1", "4"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", RowBox[{ FractionBox["3", "8"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}]}], RowBox[{"30", "-", RowBox[{"11", " ", SqrtBox["2"]}], "-", RowBox[{"5", " ", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"6", " ", SqrtBox[ RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"8", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "+", SqrtBox["2"]}], ")"}]}], "-", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "-", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "4"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], "-", FractionBox[ RowBox[{"3", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"3", " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}], "2"]}]}]}, {"0", "0", "0", "0", "0", "1", "0"}, {"0", RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "4"}], "+", RowBox[{"2", " ", SqrtBox["2"]}], "+", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], ")"}]}], "0", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], RowBox[{ RowBox[{"-", "2"}], "+", RowBox[{ FractionBox["1", "4"], " ", SqrtBox[ RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}]}], RowBox[{ RowBox[{"-", "7"}], "+", RowBox[{"4", " ", SqrtBox["2"]}], "-", RowBox[{"2", " ", SqrtBox[ RowBox[{"6", "-", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"2", " ", SqrtBox[ RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "-", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{ FractionBox["5", "12"], "+", RowBox[{ FractionBox["1", "12"], " ", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]}], "+", FractionBox["1", RowBox[{"6", " ", SqrtBox[ FractionBox["2", RowBox[{"1297", "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", FractionBox["28457", SqrtBox[ RowBox[{"1297", "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "-", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"12", " ", SuperscriptBox[ RowBox[{"(", RowBox[{"352344", "+", RowBox[{"14", " ", SqrtBox["129627778"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}]]]}]]]}]]}], ")"}]}]}]} }, 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$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"20", "+", RowBox[{"19", " ", SqrtBox["2"]}], "-", RowBox[{"16", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "+", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]]}], "0", "0", RowBox[{ RowBox[{"-", "12"}], "-", RowBox[{"9", " ", SqrtBox["2"]}], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], RowBox[{ FractionBox["1", "16"], " ", RowBox[{"(", RowBox[{"336", "+", RowBox[{"256", " ", SqrtBox["2"]}], "-", RowBox[{"24", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{ SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}]}], ")"}]}], RowBox[{"30", "-", FractionBox[ RowBox[{ RowBox[{"32", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", FractionBox[ RowBox[{"384", "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}], RowBox[{"8", " ", SqrtBox["2"]}]]}]}, {"0", RowBox[{"1", "+", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], ")"}]}], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], ")"}]}]}, {"0", FractionBox[ RowBox[{ RowBox[{"28", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"24", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"64", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"68", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"64", " ", SqrtBox[ RowBox[{"58", "+", RowBox[{"41", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"16", " ", SqrtBox[ RowBox[{"116", "+", RowBox[{"82", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"3", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"2", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{"80", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"48", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"64", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"68", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"11", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"8", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "960"}], "-", RowBox[{"672", " ", SqrtBox["2"]}], "+", RowBox[{"544", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"256", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"28", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"16", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"32", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"3", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}], "+", RowBox[{"2", " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "4"}], "+", RowBox[{"33", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"25", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["3", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}], "-", FractionBox[ RowBox[{ RowBox[{"128", " ", SqrtBox[ RowBox[{"58", "+", RowBox[{"41", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"32", " ", SqrtBox[ RowBox[{"116", "+", RowBox[{"82", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "6"}], "-", RowBox[{"5", " ", SqrtBox["2"]}], "+", RowBox[{"4", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"8", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", FractionBox[ RowBox[{ RowBox[{"-", "48"}], "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}], RowBox[{"8", " ", SqrtBox["2"]}]]}]}, {"0", FractionBox[ RowBox[{ RowBox[{"-", "16280"}], "-", RowBox[{"6105", " ", SqrtBox["2"]}], "-", RowBox[{"8", " ", SqrtBox["17610545"]}], "-", RowBox[{"3", " ", SqrtBox["35221090"]}], "+", RowBox[{"12224", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"7640", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"764", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"764", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"764", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "34595"}], "-", RowBox[{"16280", " ", SqrtBox["2"]}], "-", RowBox[{"17", " ", SqrtBox["17610545"]}], "-", RowBox[{"8", " ", SqrtBox["35221090"]}], "+", RowBox[{"22920", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"13752", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"2292", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"1910", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], FractionBox[ RowBox[{ RowBox[{"-", "192528"}], "-", RowBox[{"137520", " ", SqrtBox["2"]}], "+", RowBox[{"32", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"34", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"65120", "-", RowBox[{"3056", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], ")"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"69190", "-", RowBox[{"2292", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], ")"}]}], "-", RowBox[{"8140", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"2035", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"4", " ", SqrtBox["17610545"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{ SqrtBox["35221090"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}], "+", RowBox[{"382", " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}]}], "3056"], FractionBox[ RowBox[{"73260", "+", RowBox[{"40700", " ", SqrtBox["2"]}], "+", RowBox[{"36", " ", SqrtBox["17610545"]}], "+", RowBox[{"20", " ", SqrtBox["35221090"]}], "+", RowBox[{"7640", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"4584", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{ SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "36672"}], "-", RowBox[{"8140", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}]}], ")"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "21392"}], "-", RowBox[{"2035", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}]}], ")"}]}]}], RowBox[{"3056", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}, {"0", FractionBox[ RowBox[{ RowBox[{"80", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"40", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"16", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"32", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", RowBox[{ RowBox[{"-", "7"}], "-", RowBox[{"2", " ", SqrtBox["2"]}], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"(", RowBox[{"320", "+", RowBox[{"192", " ", SqrtBox["2"]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"16", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}], ")"}]}], RowBox[{"22", "+", RowBox[{"14", " ", SqrtBox["2"]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["5", "8"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], "-", FractionBox[ RowBox[{"3", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}], "2"]}]}]}, {"0", RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}]}], RowBox[{ RowBox[{"-", "9"}], "-", RowBox[{"6", " ", SqrtBox["2"]}], "+", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "8"}], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"-", "351"}], "-", RowBox[{"771", " ", "#1"}], "-", RowBox[{"253", " ", SuperscriptBox["#1", "2"]}], "-", RowBox[{"7", " ", SuperscriptBox["#1", "3"]}], "+", SuperscriptBox["#1", "4"]}], "&"}], ",", "4"}], "]"}]}]}], ")"}]}]}, {"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$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", FractionBox[ RowBox[{ RowBox[{"1280", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"970", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"96", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"56", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"96", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"128", " ", SqrtBox[ RowBox[{"292", "+", RowBox[{"206", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"12", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"7", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"4", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", RowBox[{ RowBox[{"-", "368"}], "-", RowBox[{"275", " ", SqrtBox["2"]}], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"12", "+", RowBox[{"7", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"8", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], ")"}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], RowBox[{"643", "+", RowBox[{"460", " ", SqrtBox["2"]}], "-", RowBox[{"28", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"24", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["13", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"13", "+", FractionBox["17", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"7", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"], RowBox[{"8", " ", SqrtBox["2"]}]]}], RowBox[{"1140", "-", FractionBox[ RowBox[{ RowBox[{"152", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"104", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"96", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"160", " ", SqrtBox[ RowBox[{"292", "+", RowBox[{"206", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"49", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"31", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"6", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", FractionBox[ RowBox[{"13504", "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}], RowBox[{"8", " ", SqrtBox["2"]}]]}]}, {"0", FractionBox[ RowBox[{ RowBox[{"100", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"56", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"32", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"7", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"6", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", RowBox[{ RowBox[{"-", "24"}], "-", RowBox[{"14", " ", SqrtBox["2"]}], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"7", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], RowBox[{"38", "+", RowBox[{"26", " ", SqrtBox["2"]}], "-", RowBox[{ FractionBox["7", "8"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}]}], RowBox[{"54", "+", RowBox[{"34", " ", SqrtBox["2"]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "38"}], "-", RowBox[{"31", " ", SqrtBox["2"]}], "+", RowBox[{"4", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], RowBox[{"8", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}]}]}, {"0", FractionBox[ RowBox[{ RowBox[{"2860", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"1984", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"1344", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"964", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"416", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"304", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"32", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"224", " ", SqrtBox[ RowBox[{"850", "+", RowBox[{"601", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"192", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"850", "+", RowBox[{"601", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"45", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"32", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"6", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "112"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "-", RowBox[{"96", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"1928", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"1344", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"608", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"416", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"64", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"45", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], RowBox[{"40", "+", RowBox[{"27", " ", SqrtBox["2"]}], "+", RowBox[{"241", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"168", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"76", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"52", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["17", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{ FractionBox["7", "2"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"13", "+", FractionBox["17", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{ FractionBox["45", "8"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"3", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ FractionBox["3", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"], RowBox[{"8", " ", SqrtBox["2"]}]]}], RowBox[{"746", "+", FractionBox[ RowBox[{"3", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"875758", "+", RowBox[{"3744", " ", "#1"}], "-", RowBox[{"1858", " ", SuperscriptBox["#1", "2"]}], "+", SuperscriptBox["#1", "3"]}], "&"}], ",", "3"}], "]"}], "2"]}], "21632"], "+", FractionBox[ RowBox[{ RowBox[{"9232", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"6544", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"2880", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"2048", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"1536", " ", SqrtBox[ RowBox[{"58", "+", RowBox[{"41", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"896", " ", SqrtBox[ RowBox[{"116", "+", RowBox[{"82", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"640", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"256", " ", SqrtBox[ RowBox[{"292", "+", RowBox[{"206", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"896", " ", SqrtBox[ RowBox[{"850", "+", RowBox[{"601", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"768", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"850", "+", RowBox[{"601", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"428", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"306", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"56", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"48", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"48", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"40", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"8272", "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}], ")"}]}]}], RowBox[{"16", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}]}, {"0", FractionBox[ RowBox[{"683760", "+", RowBox[{"490435", " ", SqrtBox["2"]}], "+", RowBox[{"336", " ", SqrtBox["17610545"]}], "+", RowBox[{"241", " ", SqrtBox["35221090"]}], "+", RowBox[{"1164336", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"838872", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"174192", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"113960", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"56", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"48", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"119184", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"97680", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"6112", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"12224", " ", SqrtBox[ RowBox[{"292", "+", RowBox[{"206", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"14516", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"9932", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"3056", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"1528", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"764", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "490435"}], "-", RowBox[{"341880", " ", SqrtBox["2"]}], "-", RowBox[{"241", " ", SqrtBox["17610545"]}], "-", RowBox[{"168", " ", SqrtBox["35221090"]}], "-", RowBox[{"47368", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "-", RowBox[{"30560", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"119184", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"87096", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"382", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"875758", "+", RowBox[{"3744", " ", "#1"}], "-", RowBox[{"1858", " ", SuperscriptBox["#1", "2"]}], "+", SuperscriptBox["#1", "3"]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"7258", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], FractionBox[ RowBox[{"443120", "+", RowBox[{"320880", " ", SqrtBox["2"]}], "+", RowBox[{"672", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"482", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"476736", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"348384", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"980870", "-", RowBox[{"20628", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], ")"}]}], "-", RowBox[{"24420", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"14245", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"12", " ", SqrtBox["17610545"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"7", " ", SqrtBox["35221090"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"4584", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"4584", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}], "+", RowBox[{"382", " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}], "-", RowBox[{"168", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "8140"}], "+", RowBox[{"191", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], ")"}]}]}], "3056"], FractionBox[ RowBox[{"6389900", "+", RowBox[{"4566540", " ", SqrtBox["2"]}], "+", RowBox[{"3140", " ", SqrtBox["17610545"]}], "+", RowBox[{"2244", " ", SqrtBox["35221090"]}], "-", RowBox[{"1173504", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"455840", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"224", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"192", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"825120", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"390720", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"171136", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"195584", " ", SqrtBox[ RowBox[{"292", "+", RowBox[{"206", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"142104", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"97792", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"12", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"7", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"21392", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"10696", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"4999616", "-", RowBox[{"24420", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}]}], ")"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"3603024", "-", RowBox[{"14245", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}]}], ")"}]}]}], RowBox[{"3056", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}, {"0", FractionBox[ RowBox[{ RowBox[{"2440", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"1688", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"208", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"152", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"224", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"112", " ", SqrtBox[ RowBox[{"292", "+", RowBox[{"206", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"7", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"6", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "1060"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "-", RowBox[{"728", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"208", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"152", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"7", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"6", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"(", RowBox[{"14336", "+", RowBox[{"10080", " ", SqrtBox["2"]}], "-", RowBox[{"1216", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"832", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"84", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"80", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"16", " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}], ")"}]}], RowBox[{"960", "-", RowBox[{"90", " ", SqrtBox[ RowBox[{"9", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}], "2"]}], "+", FractionBox[ RowBox[{ RowBox[{"5336", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"512", " ", SqrtBox[ RowBox[{"52", "+", RowBox[{"34", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"576", " ", SqrtBox[ RowBox[{"146", "+", RowBox[{"103", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"288", " ", SqrtBox[ RowBox[{"292", "+", RowBox[{"206", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"90", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "-", RowBox[{"69", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"4", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"86", "+", RowBox[{"60", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"8", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}]}, {"0", RowBox[{"232", "+", RowBox[{"150", " ", SqrtBox["2"]}], "-", RowBox[{"28", " ", SqrtBox[ RowBox[{"9", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"24", " ", SqrtBox[ RowBox[{"18", "+", RowBox[{"8", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}]}], "0", "0", RowBox[{ RowBox[{"-", "24"}], "-", RowBox[{"14", " ", SqrtBox["2"]}], "+", RowBox[{"28", " ", SqrtBox[ RowBox[{"9", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"24", " ", SqrtBox[ RowBox[{"18", "+", RowBox[{"8", " ", SqrtBox["2"]}]}]]}]}], RowBox[{"39", "+", RowBox[{"26", " ", SqrtBox["2"]}], "-", RowBox[{"52", " ", SqrtBox[ RowBox[{"9", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"38", " ", SqrtBox[ RowBox[{"18", "+", RowBox[{"8", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{"262", "+", RowBox[{"170", " ", SqrtBox["2"]}], "-", RowBox[{"52", " ", SqrtBox[ RowBox[{"9", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"38", " ", SqrtBox[ RowBox[{"18", "+", RowBox[{"8", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"24", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}], "+", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"26", "+", RowBox[{"17", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}]}, {"0", RowBox[{ RowBox[{"-", "24"}], "-", RowBox[{"14", " ", SqrtBox["2"]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}]}], "0", "0", RowBox[{"24", "+", RowBox[{"14", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "38"}], "-", RowBox[{"26", " ", SqrtBox["2"]}], "+", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}], RowBox[{ RowBox[{"-", "53"}], "-", RowBox[{"34", " ", SqrtBox["2"]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"43", "+", RowBox[{"30", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "2"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"2591", "+", RowBox[{"288", " ", "#1"}], "-", RowBox[{"3716", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"52", " ", SuperscriptBox["#1", "3"]}]}], "&"}], ",", "3"}], "]"}]}]}]} }, 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$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"296", "+", RowBox[{"217", " ", SqrtBox["2"]}], "-", RowBox[{"32", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"20", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"32", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"48", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", FractionBox[ RowBox[{"4", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"15", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], RowBox[{"3", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "368"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "-", RowBox[{"270", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"64", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"40", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["8", "15"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "3"], " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{"319", "+", RowBox[{"228", " ", SqrtBox["2"]}], "-", RowBox[{"20", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"16", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["3", "10"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "3"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], RowBox[{"1800", " ", SqrtBox["2"]}]]}], RowBox[{"592", "+", RowBox[{"436", " ", SqrtBox["2"]}], "-", RowBox[{"52", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"36", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"32", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"64", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "5"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", FractionBox[ RowBox[{"37", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"30", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"23", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"15", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], RowBox[{"1800", " ", SqrtBox["2"]}]]}]}, {"0", RowBox[{"17", "+", RowBox[{"10", " ", SqrtBox["2"]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", FractionBox[ RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], RowBox[{"12", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], "0", "0", RowBox[{ RowBox[{"-", "16"}], "-", RowBox[{"10", " ", SqrtBox["2"]}], "+", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ RowBox[{"584", "+", RowBox[{ SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{ SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}], RowBox[{"24", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], RowBox[{"26", "+", RowBox[{"18", " ", SqrtBox["2"]}], "-", RowBox[{ FractionBox["1", "10"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "24"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], "7200"]}], RowBox[{"42", "+", RowBox[{"26", " ", SqrtBox["2"]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", FractionBox[ RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"5", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"12", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], "7200"]}]}, {"0", RowBox[{ RowBox[{"-", "309"}], "-", RowBox[{"220", " ", SqrtBox["2"]}], "+", RowBox[{"88", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"61", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", FractionBox[ RowBox[{"31", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"60", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"11", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"15", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["1", "10"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], "0", "0", RowBox[{"-", FractionBox[ RowBox[{ RowBox[{"64", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"40", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"352", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"244", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["31", "15"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["22", "15"], " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], RowBox[{"28", "+", RowBox[{"19", " ", SqrtBox["2"]}], "+", RowBox[{"61", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"44", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["1", "10"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["31", "120"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "5"], " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], "2400"], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], RowBox[{"1800", " ", SqrtBox["2"]}]]}], RowBox[{ RowBox[{"-", "282"}], "-", RowBox[{"203", " ", SqrtBox["2"]}], "+", RowBox[{"149", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"105", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"24", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"24", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", FractionBox[ RowBox[{"83", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"60", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"119", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"60", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], "2400"], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], RowBox[{"1800", " ", SqrtBox["2"]}]]}]}, {"0", FractionBox[ RowBox[{"1983856", "+", RowBox[{"1441533", " ", SqrtBox["2"]}], "+", RowBox[{"2400", " ", SqrtBox["17610545"]}], "+", RowBox[{"1695", " ", SqrtBox["35221090"]}], "+", RowBox[{"7288560", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"5202840", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"1787760", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"328648", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"600", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"480", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}], ")"}]}]]}], "-", RowBox[{"1237680", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"530624", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"91680", " ", SqrtBox[ RowBox[{"58", "+", RowBox[{"41", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"183360", " ", SqrtBox[ RowBox[{"116", "+", RowBox[{"82", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"6876", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"4966", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"1528", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"1528", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"6876", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"4966", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"1528", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"1528", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}], RowBox[{"11460", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", RowBox[{"-", FractionBox[ RowBox[{"229955", "+", RowBox[{"162800", " ", SqrtBox["2"]}], "+", RowBox[{"113", " ", SqrtBox["17610545"]}], "+", RowBox[{"80", " ", SqrtBox["35221090"]}], "+", RowBox[{"32088", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"21392", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"82512", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"59592", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["2292", "5"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["4966", "15"], " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]]}], FractionBox[ RowBox[{"308656", "+", RowBox[{"223088", " ", SqrtBox["2"]}], "+", RowBox[{"651200", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"459910", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"320", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"226", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"330048", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"238368", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["3256", "3"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["2035", "3"], " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["8", "3"], " ", SqrtBox[ FractionBox["3522109", "5"]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "3"], " ", SqrtBox["35221090"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{"1528", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["14516", "15"], " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1528", "5"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1528", "5"], " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["382", "225"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"]}], "+", RowBox[{ FractionBox["382", "225"], " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"]}]}], "3056"], FractionBox[ RowBox[{"519862284", "+", RowBox[{"405644184", " ", SqrtBox["2"]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"70463", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]]}], "-", RowBox[{"10556", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"191", " ", RowBox[{"(", RowBox[{ SuperscriptBox["2", RowBox[{"1", "/", "3"}]], "+", SuperscriptBox["2", RowBox[{"5", "/", "6"}]]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "+", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"70463", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]]}], "-", RowBox[{"10556", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"191", " ", RowBox[{"(", RowBox[{ SuperscriptBox["2", RowBox[{"1", "/", "3"}]], "+", SuperscriptBox["2", RowBox[{"5", "/", "6"}]]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"2", "/", "3"}]]}], "-", RowBox[{"15", " ", SqrtBox["17610545"], " ", RowBox[{"(", RowBox[{"2336", "+", RowBox[{ SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", RowBox[{"(", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{ SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", RowBox[{"(", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], ")"}], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}], ")"}]}], "-", FractionBox[ RowBox[{"60", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "4586213"}], "-", RowBox[{"3488725", " ", SqrtBox["2"]}], "-", RowBox[{"6255", " ", SqrtBox["17610545"]}], "-", RowBox[{"4455", " ", SqrtBox["35221090"]}], "+", RowBox[{"365", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"3025440", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"340616", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"600", " ", SqrtBox[ RowBox[{"17610545", " ", RowBox[{"(", RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}], ")"}]}]]}], "+", RowBox[{"480", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}], ")"}]}]]}], "+", RowBox[{"2131560", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"195992", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"641760", " ", SqrtBox[ RowBox[{"58", "+", RowBox[{"41", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"733440", " ", SqrtBox[ RowBox[{"116", "+", RowBox[{"82", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"19100", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"13943", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"2674", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"2674", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"19100", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "+", RowBox[{"13943", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"2674", " ", SuperscriptBox["2", RowBox[{"1", "/", "6"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}], "-", RowBox[{"2674", " ", SuperscriptBox["2", RowBox[{"2", "/", "3"}]], " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]], " ", SuperscriptBox[ RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}], RowBox[{"1", "/", "3"}]]}]}], ")"}]}], SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]]}], "687600"]}, {"0", RowBox[{"266", "+", RowBox[{"186", " ", SqrtBox["2"]}], "-", RowBox[{"36", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"26", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"40", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"20", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", FractionBox[ RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], RowBox[{"12", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], "0", "0", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "516"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "-", RowBox[{"360", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{"144", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"104", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "3"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["4", "15"], " ", SqrtBox["2"], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{"220", "+", RowBox[{"155", " ", SqrtBox["2"]}], "-", RowBox[{"26", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"18", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["7", "30"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", RowBox[{ FractionBox["1", "8"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], "7200"]}], RowBox[{"476", "+", RowBox[{"331", " ", SqrtBox["2"]}], "-", RowBox[{"62", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"44", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"56", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"28", " ", SqrtBox[ RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"5", "+", FractionBox["7", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "-", FractionBox[ RowBox[{"11", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"20", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "-", FractionBox[ RowBox[{"17", " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], RowBox[{"20", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], "+", RowBox[{ FractionBox["1", "15"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}], "2"], "7200"]}]}, {"0", RowBox[{"96", "+", RowBox[{"66", " ", SqrtBox["2"]}], "-", RowBox[{"20", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"16", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"5", " ", SqrtBox["2"]}], "+", RowBox[{"10", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}]}], ")"}]}], RowBox[{"27", "+", RowBox[{"18", " ", SqrtBox["2"]}], "-", RowBox[{"36", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"26", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], RowBox[{"122", "+", RowBox[{"82", " ", SqrtBox["2"]}], "-", RowBox[{"36", " ", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"26", " ", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"24", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}]}, {"0", RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}]}], ")"}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "26"}], "-", RowBox[{"18", " ", SqrtBox["2"]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}], RowBox[{ RowBox[{"-", "41"}], "-", RowBox[{"26", " ", SqrtBox["2"]}], "+", RowBox[{"8", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ FractionBox["1", "30"], " ", SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"(", RowBox[{"292", "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "-", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]], "+", SuperscriptBox[ RowBox[{"(", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"45814511", "+", RowBox[{"15", " ", SqrtBox["1540435371501"]}]}], ")"}]}], ")"}], RowBox[{"1", "/", "3"}]]}], ")"}]}]}]} }, 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$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", SqrtBox["2"], "0", "0", SqrtBox["2"], RowBox[{"-", "1"}], "0"}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"11", "+", RowBox[{"8", " ", SqrtBox["2"]}], "+", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}]}], "0", "0", RowBox[{"4", "+", RowBox[{"2", " ", SqrtBox["2"]}], "-", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "+", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], ")"}]}], RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}], "+", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]], "+", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]], "-", RowBox[{"4", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}]}]}, {"0", RowBox[{"22", "+", RowBox[{"16", " ", SqrtBox["2"]}], "-", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], RowBox[{"764", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], "0", "0", RowBox[{"6", "+", RowBox[{"6", " ", SqrtBox["2"]}], "-", RowBox[{ FractionBox["1", "382"], " ", SqrtBox[ FractionBox["17610545", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]]}], "-", FractionBox["2035", RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]]}], FractionBox[ RowBox[{ RowBox[{"2035", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], "-", RowBox[{"4584", " ", RowBox[{"(", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], ")"}]}]}], "1528"], RowBox[{"18", "+", RowBox[{"14", " ", SqrtBox["2"]}], "-", FractionBox[ RowBox[{"3", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], RowBox[{"764", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}]}, {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"1", "+", SqrtBox["2"]}]}, {"0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", "0", "2", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"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$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"3", " ", SqrtBox["2"]}], "0", "0", RowBox[{"-", SqrtBox["2"]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}], "+", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], "0", "0", RowBox[{"-", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}], RowBox[{"2", "+", SqrtBox["2"], "+", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}], "+", SqrtBox[ RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]], "+", SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]]}]}, {"0", RowBox[{"4", "+", RowBox[{"4", " ", SqrtBox["2"]}], "+", RowBox[{ FractionBox["1", "382"], " ", SqrtBox[ FractionBox["17610545", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]]}], "+", FractionBox["2035", RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]]}], "0", "0", RowBox[{"-", FractionBox[ RowBox[{"2035", "+", SqrtBox["17610545"]}], RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]]}], FractionBox[ RowBox[{ RowBox[{"4584", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "+", RowBox[{"2035", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "1528"], RowBox[{"6", "+", RowBox[{"5", " ", SqrtBox["2"]}], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], RowBox[{"764", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}]}, {"0", "2", "0", "0", RowBox[{"-", "1"}], RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", "0", "0", "0", "0", "1", "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$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", FractionBox[ RowBox[{"6", "-", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]]}], SqrtBox["2"]], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "2"}], "+", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]]}], SqrtBox["2"]], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}], "-", RowBox[{ SqrtBox[ RowBox[{"1", "+", FractionBox["1", SqrtBox["2"]]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", FractionBox[ SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"], RowBox[{"8", " ", SqrtBox["2"]}]]}], RowBox[{"2", "-", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]], "+", FractionBox[ RowBox[{"32", "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}], RowBox[{"8", " ", SqrtBox["2"]}]]}]}, {"0", RowBox[{"1", "-", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], "0", "0", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], ")"}]}], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], " ", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], ")"}]}]}, {"0", RowBox[{ SqrtBox[ RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]], "+", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"(", RowBox[{ RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "-", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], ")"}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], "0", "0", FractionBox[ RowBox[{ RowBox[{ RowBox[{"-", "8"}], " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{ RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], RowBox[{ FractionBox["1", "32"], " ", RowBox[{"(", RowBox[{"64", "+", RowBox[{"32", " ", SqrtBox["2"]}], "+", RowBox[{"32", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"12", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"8", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"3", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}], "+", RowBox[{"2", " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}]}], ")"}]}], FractionBox[ RowBox[{ RowBox[{"32", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "+", RowBox[{"32", " ", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}], "-", RowBox[{"4", " ", RowBox[{"(", RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}], "+", RowBox[{"4", " ", SqrtBox[ RowBox[{"17", "+", RowBox[{"12", " ", SqrtBox["2"]}]}]]}]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"48", "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}], ")"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"128", "+", RowBox[{"3", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}]}], ")"}]}]}], RowBox[{"32", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}, {"0", FractionBox[ RowBox[{ RowBox[{"2035", " ", SqrtBox["2"]}], "+", SqrtBox["35221090"], "+", RowBox[{"3056", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "+", RowBox[{"3056", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "-", RowBox[{"764", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"764", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"764", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "2035"}], "-", SqrtBox["17610545"], "+", RowBox[{"382", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}]}], RowBox[{"382", " ", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}]], FractionBox[ RowBox[{"9168", "+", RowBox[{"9168", " ", SqrtBox["2"]}], "+", RowBox[{"2", " ", SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"4070", "-", RowBox[{"1528", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}]}], ")"}]}], "-", RowBox[{"2035", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{ SqrtBox["35221090"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"1528", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}], "+", RowBox[{"382", " ", SqrtBox["2"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}]}], "3056"], FractionBox[ RowBox[{"8140", "+", RowBox[{"8140", " ", SqrtBox["2"]}], "+", RowBox[{"4", " ", SqrtBox["17610545"]}], "+", RowBox[{"4", " ", SqrtBox["35221090"]}], "-", RowBox[{"6112", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{"4584", " ", SqrtBox["2"], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "-", RowBox[{ SqrtBox[ RowBox[{"35221090", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"382", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"(", RowBox[{"48", "+", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}], ")"}]}], "+", RowBox[{ SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], " ", RowBox[{"(", RowBox[{"15280", "-", RowBox[{"2035", " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{"382", " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}]}], ")"}]}]}], RowBox[{"3056", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}, {"0", RowBox[{"2", "-", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], "0", "0", RowBox[{ RowBox[{"-", "1"}], "+", FractionBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], RowBox[{"4", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]]}], RowBox[{"2", "+", SqrtBox["2"], "-", RowBox[{ FractionBox["3", "8"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}]}], RowBox[{"2", "+", SqrtBox["2"], "-", RowBox[{ FractionBox["3", "8"], " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], " ", RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}]}], "+", RowBox[{ FractionBox["1", "32"], " ", SuperscriptBox[ RowBox[{"Root", "[", RowBox[{ RowBox[{ RowBox[{"7", "+", RowBox[{"62", " ", "#1"}], "-", RowBox[{"29", " ", SuperscriptBox["#1", "2"]}], "+", RowBox[{"72", " ", SuperscriptBox["#1", "3"]}], "-", RowBox[{"51", " ", SuperscriptBox["#1", "4"]}], "-", RowBox[{"56", " ", SuperscriptBox["#1", "5"]}], "+", RowBox[{"4", " ", SuperscriptBox["#1", "6"]}]}], "&"}], ",", "4"}], "]"}], "2"]}]}]}, {"0", "0", "0", "0", "0", "1", "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$]]], ",", "\<\"nonintegral\"\>"}], "}"}]}], "}"}]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"-", "1"}], "1", "1", "1", "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "0", "0", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}]}, {"1", RowBox[{"-", "1"}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", SqrtBox["2"]}], "1", "1", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], "0", "0", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]]}, {"1", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], "1", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "1", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "0", "0", FractionBox[ RowBox[{ RowBox[{"-", "13"}], "+", SqrtBox["9539754"]}], "1177"], "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]]}, {"1", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}], "1", RowBox[{"7", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "0", "0", "0", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], RowBox[{ FractionBox["1", "382"], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}]}, {"1", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"1", "+", SqrtBox["2"]}], "1", RowBox[{"-", "1"}], "1", "1", "0", "0", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], "0", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], "0"}, { RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"7", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}], "1", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], RowBox[{ FractionBox["1", "382"], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], "0", "0"}, { RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", "1", RowBox[{"-", "1"}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "0", "0", "0"}, {"0", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "0", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", "1", "1", "1"}, { RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "-", SqrtBox["2"]}]]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "0", "0", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "0", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], "1", "1", "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1"}, {"0", RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "0", "0", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], RowBox[{ FractionBox["1", "382"], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}], "1", "1", RowBox[{"7", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]}, {"0", SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], FractionBox[ RowBox[{ RowBox[{"-", "13"}], "+", SqrtBox["9539754"]}], "1177"], "0", "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "1", "1", "1", RowBox[{"-", "1"}], RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]}, {"0", "0", "0", SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], "0", "1", "1", "1", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"-", "1"}], "1", RowBox[{"1", "+", SqrtBox["2"]}]}, { RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], "0", RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], RowBox[{ FractionBox["1", "382"], " ", RowBox[{"(", RowBox[{"2035", "+", SqrtBox["17610545"]}], ")"}]}], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], "0", "0", "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"7", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}], "1"}, { RowBox[{"2", " ", SqrtBox[ RowBox[{"2", "+", SqrtBox["2"]}]]}], SqrtBox[ RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]], SqrtBox[ RowBox[{"20", "+", RowBox[{"14", " ", SqrtBox["2"]}]}]], RowBox[{"2", " ", SqrtBox[ RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]]}], "0", "0", "0", "1", "1", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", SqrtBox["2"]}], "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.738926876915738*^9, 3.738951473822348*^9, 3.7391186663588023`*^9}, CellLabel-> "Out[537]=",ExpressionUUID->"7bea6812-bcf2-450d-9897-07bf30d78816"] }, Open ]] }, WindowSize->{862, 661}, WindowMargins->{{-13, Automatic}, {Automatic, 17}}, Magnification:>1.05 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, 54, "Input",ExpressionUUID->"748eabe5-c3d2-4801-b8b7-aa7a789097c7"], Cell[1225, 40, 695, 18, 52, "Input",ExpressionUUID->"0ab29ce4-3405-44f4-bf4a-16ef730ff686"], Cell[1923, 60, 9875, 235, 885, "Input",ExpressionUUID->"72e544ec-21b3-4511-8714-78e40bf96f8f"], Cell[11801, 297, 35696, 782, 2583, "Input",ExpressionUUID->"34558bf5-30de-4efd-a85d-1e42927d2f41"], Cell[47500, 1081, 13766, 317, 1075, "Input",ExpressionUUID->"1669407f-19e4-41f4-83d2-404c097a4b8c"], Cell[61269, 1400, 1572, 43, 119, "Input",ExpressionUUID->"0ca661cb-0814-4baa-8045-ccb6be11fd34"], Cell[62844, 1445, 16048, 333, 1087, "Input",ExpressionUUID->"8eb99bd7-ecdf-447b-9254-91418df0046a"], Cell[78895, 1780, 13582, 313, 1014, "Input",ExpressionUUID->"df3b60f9-0301-4a00-901e-3f42ad1f6dcc"], Cell[92480, 2095, 3768, 87, 383, "Input",ExpressionUUID->"94e58c8f-e9bc-4bc5-9f72-1e7d65b723b4"], Cell[96251, 2184, 397, 13, 82, "Input",ExpressionUUID->"e0269727-13f8-41e1-9bed-e3d214f9ade5"], Cell[96651, 2199, 682, 20, 58, "Input",ExpressionUUID->"335fc47c-61a3-4d42-b8dc-1a6e429b3dbb"], Cell[97336, 2221, 4976, 131, 450, "Input",ExpressionUUID->"8f83b82e-c1db-40d9-ac4c-a723737f7704"], Cell[102315, 2354, 1032, 29, 53, "Input",ExpressionUUID->"d37cc6ff-e0b5-488e-9c86-c606b2039282"], Cell[103350, 2385, 1961, 44, 141, "Input",ExpressionUUID->"9a3eb7b4-a69e-4770-9009-32f6122d8145"], Cell[105314, 2431, 5280, 132, 251, "Input",ExpressionUUID->"affbea28-f93e-449d-873a-65b52e624ef9"], Cell[110597, 2565, 1184, 31, 53, "Input",ExpressionUUID->"15495297-a588-42f2-9830-ff3a5a9d76a4"], Cell[111784, 2598, 932, 25, 53, "Input",ExpressionUUID->"cd35cdcc-79cb-420e-8b24-2c510cf42e01"], Cell[112719, 2625, 5093, 135, 581, "Input",ExpressionUUID->"e31de811-b823-497f-970d-8b661b013541"], Cell[117815, 2762, 7711, 154, 427, "Input",ExpressionUUID->"b49300f9-4eb0-4e74-b00e-238ad2cc61d5"], Cell[125529, 2918, 3798, 88, 295, "Input",ExpressionUUID->"b43a5c15-ff8f-4841-a157-1d63bba9b7c4"], Cell[CellGroupData[{ Cell[129352, 3010, 2400, 43, 53, "Input",ExpressionUUID->"8c0d00eb-3a38-4d87-9e21-66e5a04e235e"], Cell[131755, 3055, 539477, 13362, 3039, "Output",ExpressionUUID->"7bea6812-bcf2-450d-9897-07bf30d78816"] }, Open ]] } ] *)