(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 12.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 359067, 8756] NotebookOptionsPosition[ 353340, 8675] NotebookOutlinePosition[ 353830, 8693] CellTagsIndexPosition[ 353787, 8690] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Handy functions", "Section", CellChangeTimes->{{3.8646830510411797`*^9, 3.864683053091597*^9}},ExpressionUUID->"d9d62207-947e-4a55-994c-\ be968ba39c8b"], Cell[CellGroupData[{ Cell["Quadratic forms and linear relations", "Subsection", CellChangeTimes->{{3.8646832235938597`*^9, 3.864683227491637*^9}},ExpressionUUID->"ffcc14d7-54b2-406a-8618-\ 9531332769aa"], Cell["\<\ Gets a list of indices of the pivots of a matrix in reduced echelon form.\ \>", "Text", CellChangeTimes->{{3.8646834675398283`*^9, 3.864683486796194*^9}, 3.864683635933962*^9},ExpressionUUID->"ac72a206-5663-4fb8-9a75-\ 6d188f4c76e1"], Cell[BoxData[ RowBox[{ RowBox[{"pivots", "[", "A_", "]"}], ":=", RowBox[{"Flatten", "[", RowBox[{ RowBox[{"FirstPosition", "[", "1", "]"}], "/@", RowBox[{"Transpose", "[", "A", "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.831194837404834*^9, 3.8311948924696903`*^9}, { 3.831194930347896*^9, 3.831194932848599*^9}}, CellLabel->"In[1]:=",ExpressionUUID->"e1bc883b-2413-4a7d-abe0-4a19eb3f78fd"], Cell[TextData[{ "Constructs the matrix we\[CloseCurlyQuote]ve been calling ", Cell[BoxData[ FormBox[ TemplateBox[<|"boxes" -> FormBox[ StyleBox["P", "TI"], TraditionalForm], "errors" -> {}, "input" -> "P", "state" -> "Boxes"|>, "TeXAssistantTemplate"], TraditionalForm]],ExpressionUUID-> "b6d67594-7399-484f-ab24-507fe2e7cb7d"], " of any dimension. The most useful one by far is the ", Cell[BoxData[ FormBox[ TemplateBox[<|"boxes" -> FormBox[ RowBox[{"4", "\[Cross]", "4"}], TraditionalForm], "errors" -> {}, "input" -> "4\\times 4", "state" -> "Boxes"|>, "TeXAssistantTemplate"], TraditionalForm]],ExpressionUUID-> "a290e079-0f52-414c-9475-c308d5277d84"], " one." }], "Text", CellChangeTimes->{{3.864683498626568*^9, 3.864683509251071*^9}, { 3.864683595451868*^9, 3.864683668047246*^9}, {3.864731506766433*^9, 3.86473166070006*^9}},ExpressionUUID->"87b40a25-ff96-4305-b802-\ 220d3c3714ee"], Cell[BoxData[ RowBox[{ RowBox[{"pMatrix", "[", "n_", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Which", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"i", "\[Equal]", "2"}], "&&", RowBox[{"j", "\[Equal]", "1"}]}], "||", RowBox[{ RowBox[{"i", "\[Equal]", "1"}], "&&", RowBox[{"j", "\[Equal]", "2"}]}]}], ",", RowBox[{ RowBox[{"-", "1"}], "/", "2"}], ",", RowBox[{ RowBox[{"i", "\[Equal]", "j"}], "&&", RowBox[{"i", ">", "2"}]}], ",", "1", ",", "True", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", " ", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "n"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.831107414093502*^9, 3.83110748040809*^9}, { 3.831107557920609*^9, 3.8311075805621977`*^9}, {3.8311076270925627`*^9, 3.831107722019619*^9}, {3.83468833600141*^9, 3.8346883410498962`*^9}}, CellLabel->"In[9]:=",ExpressionUUID->"025b5df5-f2a6-4cee-a294-e76ee16e74d4"], Cell["\<\ Computes the gram matrix given a matrix whose columns are circles in a tuple \ in abbc coordinates.\ \>", "Text", CellChangeTimes->{{3.86468368363731*^9, 3.8646837180951366`*^9}},ExpressionUUID->"03438c1b-508d-4333-9054-\ 9967574ef3d3"], Cell[BoxData[ RowBox[{ RowBox[{"gramMatrix", "[", "W_", "]"}], ":=", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"Transpose", "[", "W", "]"}], ".", RowBox[{"pMatrix", "[", RowBox[{"Length", "[", "W", "]"}], "]"}], ".", "W"}], "]"}]}]], "Input", CellChangeTimes->{{3.831107486071478*^9, 3.831107546093779*^9}, { 3.831109392242589*^9, 3.831109394639595*^9}, {3.831110190169511*^9, 3.831110193792735*^9}}, CellLabel->"In[3]:=",ExpressionUUID->"54cc4a6c-be37-4091-ac21-3dfd11eb53ea"], Cell["\<\ Computes the linear relations matrix given the gram matrix. This matrix maps \ vectors of just four curvatures into the full tuple.\ \>", "Text", CellChangeTimes->{{3.864683730604188*^9, 3.864683747937598*^9}, { 3.8646837997502403`*^9, 3.8646838957084618`*^9}},ExpressionUUID->"b44fae9e-11fd-4fea-9594-\ 87a6c311bec8"], Cell[BoxData[ RowBox[{ RowBox[{"linearRelationsMatrix", "[", "G_", "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"RowReduce", "[", "G", "]"}], "[", RowBox[{"[", RowBox[{"1", ";;", RowBox[{"MatrixRank", "[", "G", "]"}]}], "]"}], "]"}], "//", "Transpose"}]}]], "Input", CellChangeTimes->{{3.831109396818718*^9, 3.831109426888632*^9}}, CellLabel->"In[3]:=",ExpressionUUID->"d3298122-6e10-4115-8e61-a949acba4e08"], Cell["\<\ Converts the linear relations matrix into more human-readable equations.\ \>", "Text", CellChangeTimes->{{3.8646839148506317`*^9, 3.86468394900528*^9}},ExpressionUUID->"551afa7d-856b-46fe-8670-\ 51fd64eff7cc"], Cell[BoxData[ RowBox[{ RowBox[{"linearRelations", "[", "L_", "]"}], ":=", RowBox[{"Select", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Equal", "[", RowBox[{ SubscriptBox["b", "i"], ",", RowBox[{ RowBox[{"L", "[", RowBox[{"[", "i", "]"}], "]"}], ".", RowBox[{"Table", "[", RowBox[{ SubscriptBox["b", "i"], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"pivots", "[", "L", "]"}]}], "}"}]}], "]"}]}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "L", "]"}]}], "}"}]}], "]"}], ",", RowBox[{ RowBox[{"Not", "[", RowBox[{"BooleanQ", "[", "#", "]"}], "]"}], "&"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.831109446192391*^9, 3.831109495064299*^9}, { 3.8311095335606937`*^9, 3.831109534992022*^9}, {3.831109584393684*^9, 3.831109833956565*^9}, {3.8311098747139893`*^9, 3.8311099163122053`*^9}, { 3.831110035487195*^9, 3.83111004405739*^9}, {3.831110077358601*^9, 3.831110081551445*^9}, {3.831194643897842*^9, 3.8311946492229443`*^9}, { 3.831194680087949*^9, 3.831194680680228*^9}, {3.831194956352386*^9, 3.831195002875142*^9}, {3.831205178380069*^9, 3.831205187846324*^9}, 3.834688343633176*^9}, CellLabel->"In[11]:=",ExpressionUUID->"4e2a5664-aeb5-4dfb-88fb-7e7839ba2141"], Cell["Same but from a tuple.", "Text", CellChangeTimes->{{3.86468395374198*^9, 3.864683987995091*^9}},ExpressionUUID->"7914b40a-8924-4161-b52d-\ 1ca82c95c0c4"], Cell[BoxData[ RowBox[{ RowBox[{"linearRelationsFromW", "=", RowBox[{ "linearRelations", "@*", "linearRelationsMatrix", "@*", "gramMatrix"}]}], ";"}]], "Input", CellChangeTimes->{{3.831110103314905*^9, 3.831110162272215*^9}, 3.831206070230084*^9}, CellLabel->"In[6]:=",ExpressionUUID->"c9a1b25a-8cb3-40d1-ac83-1d2405398934"], Cell["\<\ A left inverse for the linear relations matrix (i.e. sends a full tuple to \ just the four \[OpenCurlyDoubleQuote]special\[CloseCurlyDoubleQuote] linearly \ independent curvatures).\ \>", "Text", CellChangeTimes->{{3.864684056842209*^9, 3.864684121412198*^9}},ExpressionUUID->"777e5618-fae9-4bb5-b529-\ 4f4902364898"], Cell[BoxData[ RowBox[{ RowBox[{"inverseLinearRelations", "[", "G_", "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", "#"}], ",", "1", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", RowBox[{"G", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "}"}]}], "]"}], "&"}], "/@", RowBox[{"Flatten", "[", RowBox[{ RowBox[{ RowBox[{"FirstPosition", "[", RowBox[{"#", ",", "1"}], "]"}], "&"}], "/@", RowBox[{"(", RowBox[{ RowBox[{"RowReduce", "[", "G", "]"}], "//", RowBox[{"Select", "[", RowBox[{ RowBox[{"Not", "[", RowBox[{"AllTrue", "[", RowBox[{"#", ",", RowBox[{ RowBox[{"#", "\[Equal]", "0"}], "&"}]}], "]"}], "]"}], "&"}], "]"}]}], ")"}]}], "]"}]}]}]], "Input", CellChangeTimes->{{3.831194278291965*^9, 3.831194298458626*^9}, 3.831195204231324*^9}, CellLabel->"In[13]:=",ExpressionUUID->"30b57c08-a123-4e7d-9b0a-b512fcfecee8"], Cell[TextData[{ "Various functions to construct a quadratic form associated with a packing \ from the root tuple, ", Cell[BoxData[ FormBox[ TemplateBox[<|"boxes" -> FormBox[ StyleBox["G", "TI"], TraditionalForm], "errors" -> {}, "input" -> "G", "state" -> "Boxes"|>, "TeXAssistantTemplate"], TraditionalForm]],ExpressionUUID-> "b2c98825-e401-425d-b550-e32292e83fe4"], ", etc." }], "Text", CellChangeTimes->{{3.864684144417095*^9, 3.864684183254436*^9}, { 3.8647314865256433`*^9, 3.86473148733366*^9}},ExpressionUUID->"c96de117-3c03-4391-9112-\ 59dc2aa87e38"], Cell[BoxData[ RowBox[{ RowBox[{"quadraticFormMatrix", "[", RowBox[{"G_", ",", "L_"}], "]"}], ":=", RowBox[{"Inverse", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"G", "[", RowBox[{"[", RowBox[{"i", ",", " ", "j"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"pivots", "[", "L", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"pivots", "[", "L", "]"}]}], "}"}]}], "]"}], "]"}]}]], "Input",\ CellChangeTimes->{{3.831195055004586*^9, 3.83119507699967*^9}, { 3.831195107195753*^9, 3.831195121990181*^9}, {3.831195208095559*^9, 3.831195214781535*^9}}, CellLabel->"In[8]:=",ExpressionUUID->"e30807a9-5381-4ad1-b9fd-a6a877ae69fe"], Cell[BoxData[ RowBox[{ RowBox[{"quadraticForm", "[", RowBox[{"Q_", ",", "L_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"v", "=", RowBox[{"Table", "[", RowBox[{ SubscriptBox["b", "i"], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"pivots", "[", "L", "]"}]}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"v", ".", "Q", ".", "v"}], "\[Equal]", "0"}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.831195241841057*^9, 3.831195289590564*^9}}, CellLabel->"In[9]:=",ExpressionUUID->"d1264330-efcb-4ca7-a1c2-f6744f28eebe"], Cell[BoxData[ RowBox[{ RowBox[{"quadform", "[", "W_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"G", "=", RowBox[{"gramMatrix", "[", "W", "]"}]}], "}"}], ",", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"L", "=", RowBox[{"linearRelationsMatrix", "[", "G", "]"}]}], "}"}], ",", RowBox[{"quadraticForm", "[", RowBox[{ RowBox[{"quadraticFormMatrix", "[", RowBox[{"G", ",", "L"}], "]"}], ",", "L"}], "]"}]}], "]"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.831195337159152*^9, 3.831195396279203*^9}}, CellLabel->"In[10]:=",ExpressionUUID->"efd0e321-9f31-4641-bf42-f73e16044635"], Cell[BoxData[ RowBox[{ RowBox[{"quadformFromG", "[", "G_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"L", "=", RowBox[{"linearRelationsMatrix", "[", "G", "]"}]}], "}"}], ",", RowBox[{"quadraticForm", "[", RowBox[{ RowBox[{"quadraticFormMatrix", "[", RowBox[{"G", ",", "L"}], "]"}], ",", "L"}], "]"}]}], "]"}]}]], "Input",\ CellChangeTimes->{{3.8312049925958433`*^9, 3.8312050200596113`*^9}}, CellLabel->"In[11]:=",ExpressionUUID->"810323e6-91cb-44f2-ad55-323fbec422eb"] }, Open ]], Cell[CellGroupData[{ Cell["Graph utilities", "Subsection", CellChangeTimes->{{3.86468325145858*^9, 3.864683253669279*^9}},ExpressionUUID->"30f99b83-ea38-48b2-b913-\ e9a970532db2"], Cell["\<\ Given G, returns a planar Mathematica graph representing the tangencies\ \>", "Text", CellChangeTimes->{{3.864684194015627*^9, 3.864684215161499*^9}},ExpressionUUID->"4192620c-85de-4442-8b77-\ a4f0439b11b4"], Cell[BoxData[ RowBox[{ RowBox[{"graphFromG", "[", "G_", "]"}], ":=", RowBox[{"PlanarGraph", "[", RowBox[{"AdjacencyGraph", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"#", "\[Equal]", RowBox[{"-", "1"}]}], ",", "1", ",", "0"}], "]"}], "&"}], "/@", "#"}], "&"}], "/@", "G"}], ",", RowBox[{"VertexLabels", "\[Rule]", "\"\\""}]}], "]"}], "]"}]}]], "Input", CellChangeTimes->{{3.8315843493182087`*^9, 3.831584372878718*^9}, { 3.831584545556731*^9, 3.831584563248426*^9}}, CellLabel->"In[12]:=",ExpressionUUID->"948959db-c926-4458-9e45-ef7f3fb99ba5"], Cell[TextData[{ "A series of functions stolen from StackOverflow that find the faces of a \ planar graph (which are unique in our case, since the graph is always the \ vertex graph of a polyhedron). Usefully, the indices are guaranteed to line \ up with ", Cell[BoxData[ FormBox[ TemplateBox[<|"boxes" -> FormBox[ StyleBox["G", "TI"], TraditionalForm], "errors" -> {}, "input" -> "G", "state" -> "Boxes"|>, "TeXAssistantTemplate"], TraditionalForm]],ExpressionUUID-> "6d8e0958-42ce-4301-a0a0-b98a052dbdf6"] }], "Text", CellChangeTimes->{{3.8646842229863787`*^9, 3.864684357501741*^9}, { 3.864731477969768*^9, 3.864731478614419*^9}},ExpressionUUID->"652feb5a-94e0-4b51-96b7-\ 66625315f8ef"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"nextCandidate", "[", RowBox[{"s_", ",", "t_", ",", "adj_"}], "]"}], ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"length", ",", "pos"}], "}"}], ",", RowBox[{ RowBox[{"length", "=", RowBox[{"Length", "[", "adj", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"pos", "=", RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"adj", ",", "s"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "+", "1"}], ",", "length", ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"t", ",", RowBox[{"adj", "[", RowBox[{"[", "pos", "]"}], "]"}]}], "}"}]}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{3.831210886725911*^9}, CellLabel->"In[13]:=",ExpressionUUID->"e7b8a43b-0fbc-4073-928d-10a091e21dd7"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"FindFace", "[", RowBox[{"g_", "?", "PlanarGraphQ"}], "]"}], ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", "emb", "}"}], ",", RowBox[{ RowBox[{"emb", "=", RowBox[{"GraphEmbedding", "[", RowBox[{"g", ",", "\"\\""}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"FindFace", "[", RowBox[{"g", ",", "emb"}], "]"}]}]}], "]"}]}], ";"}], "\n"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FindFace", "[", RowBox[{ RowBox[{"g_", "?", "PlanarGraphQ"}], ",", "emb_"}], "]"}], ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{ "m", ",", "orderings", ",", "pAdj", ",", "rightF", ",", "s", ",", "t", ",", "initial", ",", "face"}], "}"}], ",", RowBox[{ RowBox[{"m", "=", RowBox[{"AdjacencyMatrix", "[", "g", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"pAdj", "[", "v", "]"}], "=", RowBox[{"SortBy", "[", RowBox[{ RowBox[{"Pick", "[", RowBox[{ RowBox[{"VertexList", "[", "g", "]"}], ",", RowBox[{"m", "[", RowBox[{"[", "v", "]"}], "]"}], ",", "1"}], "]"}], ",", RowBox[{ RowBox[{"ArcTan", "@@", RowBox[{"(", RowBox[{ RowBox[{"emb", "[", RowBox[{"[", "v", "]"}], "]"}], "-", RowBox[{"emb", "[", RowBox[{"[", "#", "]"}], "]"}]}], ")"}]}], "&"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"v", ",", RowBox[{"VertexList", "[", "g", "]"}]}], "}"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"rightF", "[", "_", "]"}], ":=", "False"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Reap", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"rightF", "[", "e", "]"}]}], ",", RowBox[{ RowBox[{"s", "=", RowBox[{"e", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"t", "=", RowBox[{"e", "[", RowBox[{"[", "2", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"initial", "=", "s"}], ";", "\[IndentingNewLine]", RowBox[{"face", "=", RowBox[{"{", "s", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"While", "[", RowBox[{ RowBox[{"t", "=!=", "initial"}], ",", RowBox[{ RowBox[{ RowBox[{"rightF", "[", RowBox[{"UndirectedEdge", "[", RowBox[{"s", ",", "t"}], "]"}], "]"}], "=", "True"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"s", ",", "t"}], "}"}], "=", RowBox[{"nextCandidate", "[", RowBox[{"s", ",", "t", ",", RowBox[{"pAdj", "[", "t", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"face", "=", RowBox[{"Join", "[", RowBox[{"face", ",", RowBox[{"{", "s", "}"}]}], "]"}]}], ";"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"Sow", "[", "face", "]"}], ";"}]}], "]"}], ",", RowBox[{"{", RowBox[{"e", ",", RowBox[{"EdgeList", "[", "g", "]"}]}], "}"}]}], "]"}], "]"}], "[", RowBox[{"[", RowBox[{"2", ",", "1"}], "]"}], "]"}]}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.8312108953940573`*^9, 3.831210895411563*^9}, 3.8312119634327393`*^9, 3.831542420732052*^9, {3.834688353349917*^9, 3.8346883534550037`*^9}}, CellLabel->"In[14]:=",ExpressionUUID->"5cb4f612-3c02-42ac-ad57-4fb2daf3366b"] }, Open ]], Cell[CellGroupData[{ Cell["Algebraic and Geometric Generators", "Subsection", CellChangeTimes->{{3.864683268299602*^9, 3.864683270300555*^9}, { 3.8646833152616262`*^9, 3.8646833208091173`*^9}},ExpressionUUID->"a54eae0a-eac8-4408-bb48-\ 69eb10a7147f"], Cell["\<\ These three functions find the generators of the algebraic Apollonian group \ of a polyhedral packing. These yield different matrices from the process \ discussed in our first paper, but they still work.\ \>", "Text", CellChangeTimes->{{3.864684365608055*^9, 3.864684397908317*^9}, { 3.8646844317958393`*^9, 3.864684510105069*^9}},ExpressionUUID->"6773c37a-4ed3-4315-9304-\ 64d7ebb905b7"], Cell[BoxData[ RowBox[{ RowBox[{"findGenerators", "[", RowBox[{"faces_", ",", "vertices_", ",", "G_"}], "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{ "face", ",", "otherVertex", ",", "verticesOnFace", ",", "allVertices", ",", "Gp", ",", "P", ",", "Gnew", ",", "L", ",", "Q", ",", "Qform", ",", "sol1", ",", "sol2", ",", "sols", ",", "coeff", ",", "coeffTable", ",", "small", ",", "Li", ",", "P2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"face", "=", RowBox[{"faces", "[", RowBox[{"[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"verticesOnFace", "=", RowBox[{"Sort", "[", RowBox[{"RandomSample", "[", RowBox[{"face", ",", "3"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"otherVertex", "=", RowBox[{"RandomChoice", "[", RowBox[{"Select", "[", RowBox[{"vertices", ",", RowBox[{ RowBox[{"Not", "[", RowBox[{"MemberQ", "[", RowBox[{"face", ",", "#"}], "]"}], "]"}], "&"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"allVertices", "=", RowBox[{"Append", "[", RowBox[{"verticesOnFace", ",", "otherVertex"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"P", "=", RowBox[{"Transpose", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"IdentityMatrix", "[", RowBox[{"Length", "[", "vertices", "]"}], "]"}], "[", RowBox[{"[", "#", "]"}], "]"}], "&"}], "/@", RowBox[{"DeleteDuplicates", "[", RowBox[{"Join", "[", RowBox[{"allVertices", ",", "vertices"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Gnew", "=", RowBox[{ RowBox[{"Transpose", "[", "P", "]"}], ".", "G", ".", "P"}]}], ";", "\[IndentingNewLine]", RowBox[{"L", "=", RowBox[{"linearRelationsMatrix", "[", "Gnew", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Gp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"G", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "allVertices"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "allVertices"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"Inverse", "[", "Gp", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Qform", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"#", ".", "Q", ".", "#"}], "&"}], "[", RowBox[{"Table", "[", RowBox[{ SubscriptBox["b", "j"], ",", RowBox[{"{", RowBox[{"j", ",", "allVertices"}], "}"}]}], "]"}], "]"}], ")"}], "\[Equal]", "0"}]}], ";", "\[IndentingNewLine]", RowBox[{"sols", "=", RowBox[{"Expand", "[", RowBox[{"FullSimplify", "[", RowBox[{"Total", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"#", "[", RowBox[{"[", "1", "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "&"}], "/@", RowBox[{"Solve", "[", RowBox[{"Qform", ",", SubscriptBox["b", "otherVertex"]}], "]"}]}], "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"coeff", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"sols", "/.", RowBox[{"Table", "[", RowBox[{ RowBox[{ SubscriptBox["b", "i"], "\[Rule]", RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", "curr"}], ",", "1", ",", "0"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "allVertices"}], "}"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"curr", ",", "allVertices"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"small", "=", RowBox[{"IdentityMatrix", "[", RowBox[{"Length", "[", "allVertices", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"small", "[", RowBox[{"[", RowBox[{"-", "1"}], "]"}], "]"}], "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"j", "\[Equal]", "4"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{"verticesOnFace", ",", RowBox[{"allVertices", "[", RowBox[{"[", "j", "]"}], "]"}]}], "]"}], ",", RowBox[{"coeff", "[", RowBox[{"[", "j", "]"}], "]"}], ",", "0"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"Length", "[", "allVertices", "]"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Li", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"j", "\[Equal]", "k"}], ",", "1", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"Length", "[", "vertices", "]"}]}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"k", ",", "allVertices"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"P2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"j", "\[Equal]", "k"}], ",", "1", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"Length", "[", "vertices", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"DeleteDuplicates", "[", RowBox[{"Join", "[", RowBox[{"allVertices", ",", "vertices"}], "]"}], "]"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"P2", ".", "L", ".", "small", ".", "Li"}]}]}], "\[IndentingNewLine]", "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "faces", "]"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.831211980673108*^9, 3.831212009547978*^9}, { 3.831212047936781*^9, 3.831212064698745*^9}, {3.831212136824675*^9, 3.8312121924739923`*^9}, {3.83121282873549*^9, 3.831212895555662*^9}, { 3.8312129593096933`*^9, 3.831213052703521*^9}, {3.8312133826923237`*^9, 3.831213512078041*^9}, {3.831213579312004*^9, 3.831213607562201*^9}, { 3.8312136458477*^9, 3.8312136689119587`*^9}, {3.831213699813815*^9, 3.831213723704392*^9}, {3.8312138140717983`*^9, 3.831213889152441*^9}, { 3.831213941035733*^9, 3.831213957988277*^9}, {3.831213991504438*^9, 3.831214049771612*^9}, {3.8312142057843103`*^9, 3.831214227198838*^9}, { 3.8313934326708517`*^9, 3.83139343995124*^9}, {3.831393489506013*^9, 3.831393506386162*^9}, {3.831393555227632*^9, 3.8313935602186413`*^9}, { 3.8313936045286083`*^9, 3.83139367389612*^9}, {3.831393815407503*^9, 3.8313939935486803`*^9}, {3.83139404462208*^9, 3.831394092415612*^9}, { 3.831394131767799*^9, 3.831394217388193*^9}, {3.831394341420259*^9, 3.831394342312114*^9}, {3.83139445920255*^9, 3.8313945442248793`*^9}, { 3.8313945973518257`*^9, 3.831394680082652*^9}, {3.8313947347981873`*^9, 3.831394898892132*^9}, {3.83139493417336*^9, 3.831395053557044*^9}, { 3.831395100567893*^9, 3.83139518418989*^9}, {3.831395217466712*^9, 3.831395241186327*^9}, {3.831395355721635*^9, 3.8313954066678057`*^9}, { 3.831395475153723*^9, 3.831395516960009*^9}, {3.83139559485061*^9, 3.8313956385922327`*^9}, {3.831395769312038*^9, 3.8313958340021877`*^9}, { 3.831395865647847*^9, 3.83139610784988*^9}, {3.831396182381921*^9, 3.831396202527211*^9}, {3.8313962730948772`*^9, 3.8313963875560293`*^9}, { 3.831396427697093*^9, 3.8313965616329517`*^9}, {3.831396608167254*^9, 3.83139664360338*^9}, {3.83139670106045*^9, 3.8313967846470547`*^9}, { 3.8313968308609743`*^9, 3.8313969389717007`*^9}, 3.831396972519156*^9, { 3.831397018773802*^9, 3.831397020188629*^9}, {3.831397062011731*^9, 3.831397076917077*^9}, {3.8313971287749977`*^9, 3.8313971288803463`*^9}, { 3.831397158974574*^9, 3.831397164029716*^9}, {3.831451905653893*^9, 3.831451941106399*^9}, {3.8314519809069433`*^9, 3.831452094855884*^9}, { 3.831542443369563*^9, 3.83154246854852*^9}, {3.831542595276044*^9, 3.8315426013894053`*^9}, {3.831542828964487*^9, 3.831542862477805*^9}, 3.8315429215303297`*^9, {3.831543065147149*^9, 3.831543089933201*^9}, { 3.8315431288434877`*^9, 3.831543129636121*^9}, {3.83154323687431*^9, 3.831543260658288*^9}, {3.831543295045744*^9, 3.831543299689423*^9}, 3.831543486496207*^9, {3.831543653211835*^9, 3.831543654095707*^9}, { 3.831544292671633*^9, 3.8315442949499702`*^9}, {3.831544329733664*^9, 3.831544394563963*^9}, {3.831544636528879*^9, 3.831544663053648*^9}, 3.831544723323721*^9, 3.831546276666531*^9, {3.8315463223978786`*^9, 3.831546322569023*^9}, {3.831546446056045*^9, 3.83154644840313*^9}, { 3.8315465437277803`*^9, 3.8315465842454453`*^9}, {3.8315466426699533`*^9, 3.831546646606488*^9}, {3.831546727818715*^9, 3.831546788772341*^9}, { 3.831546839246593*^9, 3.8315468396090813`*^9}, {3.83154706753721*^9, 3.8315471373421164`*^9}, {3.831549700570283*^9, 3.831549703647592*^9}, { 3.8315497447736797`*^9, 3.831549761864801*^9}, {3.831549996792459*^9, 3.831550026202232*^9}, {3.831550732962453*^9, 3.831550735264537*^9}, { 3.8315509704443493`*^9, 3.8315509727254343`*^9}, {3.831551320669722*^9, 3.831551407002722*^9}, 3.831551438305327*^9, {3.8315518862869797`*^9, 3.831551891551553*^9}, {3.831552338431473*^9, 3.8315523578513947`*^9}, { 3.8315524412649384`*^9, 3.831552441791979*^9}, {3.831552847687746*^9, 3.8315528556641293`*^9}, {3.83172514482829*^9, 3.831725228085017*^9}, { 3.831725320892393*^9, 3.8317253386411657`*^9}, {3.8317254340311728`*^9, 3.831725440268997*^9}, {3.8317255156810293`*^9, 3.8317256205301943`*^9}, { 3.831725829008904*^9, 3.831725851322979*^9}, {3.831726730605854*^9, 3.8317267923612432`*^9}, 3.833968804473505*^9}, CellLabel->"In[16]:=",ExpressionUUID->"df61872a-1e93-4b2b-ad66-1c8fee203402"], Cell[BoxData[ RowBox[{ RowBox[{"findGeneratorsN", "[", RowBox[{"faces_", ",", "vertices_", ",", "G_"}], "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{ "face", ",", "otherVertex", ",", "verticesOnFace", ",", "allVertices", ",", "Gp", ",", "P", ",", "Gnew", ",", "L", ",", "Q", ",", "Qform", ",", "sol1", ",", "sol2", ",", "sols", ",", "coeff", ",", "coeffTable", ",", "small", ",", "Li", ",", "P2"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"face", "=", RowBox[{ "faces", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], ";", "\[IndentingNewLine]", RowBox[{"verticesOnFace", "=", RowBox[{"Sort", "[", RowBox[{"RandomSample", "[", RowBox[{"face", ",", "3"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"otherVertex", "=", RowBox[{"RandomChoice", "[", RowBox[{"Select", "[", RowBox[{"vertices", ",", RowBox[{ RowBox[{"Not", "[", RowBox[{"MemberQ", "[", RowBox[{"face", ",", "#"}], "]"}], "]"}], "&"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"allVertices", "=", RowBox[{"Append", "[", RowBox[{"verticesOnFace", ",", "otherVertex"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"P", "=", RowBox[{"Transpose", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"IdentityMatrix", "[", RowBox[{"Length", "[", "vertices", "]"}], "]"}], "\[LeftDoubleBracket]", "#", "\[RightDoubleBracket]"}], "&"}], "/@", RowBox[{"DeleteDuplicates", "[", RowBox[{"Join", "[", RowBox[{"allVertices", ",", "vertices"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Gnew", "=", RowBox[{ RowBox[{"Transpose", "[", "P", "]"}], ".", "G", ".", "P"}]}], ";", "\[IndentingNewLine]", RowBox[{"L", "=", RowBox[{"linearRelationsMatrix", "[", "Gnew", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Gp", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"G", "\[LeftDoubleBracket]", RowBox[{"i", ",", "j"}], "\[RightDoubleBracket]"}], ",", RowBox[{"{", RowBox[{"i", ",", "allVertices"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "allVertices"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Q", "=", RowBox[{"Inverse", "[", "Gp", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Qform", "=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"#", ".", "Q", ".", "#"}], "&"}], "[", RowBox[{"Table", "[", RowBox[{ SubscriptBox["b", "j"], ",", RowBox[{"{", RowBox[{"j", ",", "allVertices"}], "}"}]}], "]"}], "]"}], ")"}], "\[Equal]", "0"}]}], ";", "\[IndentingNewLine]", RowBox[{"sols", "=", RowBox[{"Expand", "[", RowBox[{"FullSimplify", "[", RowBox[{"Total", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ "#", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], "&"}], "/@", RowBox[{"NSolve", "[", RowBox[{"Qform", ",", SubscriptBox["b", "otherVertex"]}], "]"}]}], "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"coeff", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"sols", "/.", RowBox[{"Table", "[", RowBox[{ RowBox[{ SubscriptBox["b", "i"], "\[Rule]", RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", "curr"}], ",", "1", ",", "0"}], "]"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "allVertices"}], "}"}]}], "]"}]}], ",", RowBox[{"{", RowBox[{"curr", ",", "allVertices"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"small", "=", RowBox[{"IdentityMatrix", "[", RowBox[{"Length", "[", "allVertices", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"small", "\[LeftDoubleBracket]", RowBox[{"-", "1"}], "\[RightDoubleBracket]"}], "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"j", "\[Equal]", "4"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{"verticesOnFace", ",", RowBox[{ "allVertices", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}]}], "]"}], ",", RowBox[{ "coeff", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], ",", "0"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"Length", "[", "allVertices", "]"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Li", "=", RowBox[{"Transpose", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"j", "\[Equal]", "k"}], ",", "1", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"Length", "[", "vertices", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", "allVertices"}], "}"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"P2", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"j", "\[Equal]", "k"}], ",", "1", ",", "0"}], "]"}], ",", RowBox[{"{", RowBox[{"j", ",", RowBox[{"Length", "[", "vertices", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"k", ",", RowBox[{"DeleteDuplicates", "[", RowBox[{"Join", "[", RowBox[{"allVertices", ",", "vertices"}], "]"}], "]"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"P2", ".", "L", ".", "small", ".", "Li"}]}]}], "\[IndentingNewLine]", "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"Length", "[", "faces", "]"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.833981987629899*^9, 3.83398199939977*^9}, { 3.834688227481195*^9, 3.834688274556583*^9}, {3.83468883312962*^9, 3.834688836641605*^9}, {3.834688881355237*^9, 3.834688884801515*^9}, { 3.8346889307534027`*^9, 3.834689029259427*^9}, {3.834689161206604*^9, 3.8346891613731537`*^9}, {3.83474319005858*^9, 3.834743210943413*^9}, { 3.834743284660774*^9, 3.8347432883605413`*^9}, {3.8347436150091953`*^9, 3.834743621722823*^9}}, CellLabel->"In[17]:=",ExpressionUUID->"dab3b84f-3f49-42e4-9bc4-79cb6408f946"], Cell[BoxData[ RowBox[{ RowBox[{"findGeneratorsFromG", "[", "G_", "]"}], ":=", RowBox[{"findGeneratorsN", "[", RowBox[{ RowBox[{"FindFace", "[", RowBox[{"PlanarGraph", "[", RowBox[{"AdjacencyGraph", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"#", "\[Equal]", RowBox[{"-", "1"}]}], ",", "1", ",", "0"}], "]"}], "&"}], "/@", "#"}], "&"}], "/@", "G"}], ",", RowBox[{"VertexLabels", "\[Rule]", "\"\\""}]}], "]"}], "]"}], "]"}], ",", RowBox[{"Range", "[", RowBox[{"Length", "[", "G", "]"}], "]"}], ",", "G"}], "]"}]}]], "Input", CellChangeTimes->{{3.831554845925479*^9, 3.8315548977219877`*^9}, 3.833982029038528*^9}, CellLabel->"In[18]:=",ExpressionUUID->"bd52b017-bd99-4bdf-9126-b7c62804c9f2"], Cell["\<\ abbctoxyr is a very convenient function for converting between abbc \ coordinates and xyr (x,y coordinates of center and radius) coordinates. Its \ inverse is also useful, but isn\[CloseCurlyQuote]t ever needed in this \ notebook.\ \>", "Text", CellChangeTimes->{{3.864684524686651*^9, 3.864684568011244*^9}},ExpressionUUID->"371e76d7-c3be-4ee9-ab19-\ eeefafc86d34"], Cell[BoxData[ RowBox[{ RowBox[{"abbctoxyr", "[", RowBox[{"{", RowBox[{"bt_", ",", "b_", ",", "h1_", ",", "h2_"}], "}"}], "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"h1", "/", "b"}], ",", RowBox[{"h2", "/", "b"}], ",", RowBox[{"1", "/", "b"}]}], "}"}]}]], "Input", CellChangeTimes->{{3.8363114259734707`*^9, 3.836311449666407*^9}}, CellLabel->"In[19]:=",ExpressionUUID->"5ef8c91b-dd7a-440d-b44e-513ae9efffca"], Cell["\<\ Finds the generators of the geometric Apollonian group associated with a \ particular root tuple.\ \>", "Text", CellChangeTimes->{{3.8646845834308863`*^9, 3.8646846026325207`*^9}, 3.864684705643474*^9},ExpressionUUID->"09cd9547-a570-4ff5-bee6-\ 11977bff1c99"], Cell[BoxData[ RowBox[{ RowBox[{"findGeometricGenerators", "[", "W_", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"W", ".", RowBox[{"Transpose", "[", "\[Sigma]", "]"}], ".", RowBox[{"PseudoInverse", "[", "W", "]"}]}], ",", RowBox[{"{", RowBox[{"\[Sigma]", ",", RowBox[{"findGeneratorsFromG", "[", RowBox[{"gramMatrix", "[", "W", "]"}], "]"}]}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.86468467845833*^9, 3.864684758983469*^9}},ExpressionUUID->"14db2bfc-ecf5-4a97-90fa-\ 8126e86e9190"] }, Open ]], Cell[CellGroupData[{ Cell["\<\ Fractal Dimension (Warning: circle counting slightly inaccurate for anything \ other than tetrahedron)\ \>", "Subsection", CellChangeTimes->{{3.8646833319676657`*^9, 3.864683358720407*^9}},ExpressionUUID->"9a9baebc-6ebe-40af-9838-\ fbc4f0a61e63"], Cell["\<\ search counts the circles, while fractalDimensionFromG uses that data to find \ the fractal dimension. This is a very old algorithm that is extremely slow \ and has serious issues. If you want to find fractal dimensions, use the much \ faster and actually correct code located in circle_counting_new.\ \>", "Text", CellChangeTimes->{{3.864684790307341*^9, 3.8646848638634033`*^9}},ExpressionUUID->"a40f213a-0639-4531-af71-\ cb3759d226bb"], Cell[BoxData[ RowBox[{ RowBox[{"search", "[", RowBox[{ "generators_", ",", "current_", ",", "lastgen_", ",", "upperBound_", ",", "faces_"}], "]"}], ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{"totals", ",", "invalid"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"invalid", "[", RowBox[{"\[Sigma]_", ",", "face_"}], "]"}], ":=", RowBox[{ RowBox[{"\[Sigma]", "\[Equal]", "lastgen"}], "||", RowBox[{"AllTrue", "[", RowBox[{ RowBox[{"Delete", "[", RowBox[{ RowBox[{"\[Sigma]", ".", "current"}], ",", RowBox[{ RowBox[{ RowBox[{"{", "#", "}"}], "&"}], "/@", "face"}]}], "]"}], ",", RowBox[{ RowBox[{"#", ">", "upperBound"}], "&"}]}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"totals", "[", "i_", "]"}], ":=", RowBox[{"If", "[", RowBox[{ RowBox[{"invalid", "[", RowBox[{ RowBox[{ "generators", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], ",", RowBox[{ "faces", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "]"}], ",", "0", ",", RowBox[{ RowBox[{"Length", "[", "current", "]"}], "-", RowBox[{"Length", "[", RowBox[{ "faces", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], "]"}], "-", RowBox[{"Length", "[", RowBox[{"Select", "[", RowBox[{ RowBox[{"Delete", "[", RowBox[{ RowBox[{ RowBox[{ "generators", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], ".", "current"}], ",", RowBox[{ RowBox[{ RowBox[{"{", "#", "}"}], "&"}], "/@", RowBox[{ "faces", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}]}], "]"}], ",", RowBox[{ RowBox[{"#", ">", "upperBound"}], "&"}]}], "]"}], "]"}], "+", RowBox[{"search", "[", RowBox[{"generators", ",", RowBox[{ RowBox[{ "generators", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], ".", "current"}], ",", RowBox[{ "generators", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], ",", "upperBound", ",", "faces"}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Total", "[", RowBox[{"totals", "/@", RowBox[{"Range", "[", RowBox[{"Length", "[", "generators", "]"}], "]"}]}], "]"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.831585478390266*^9, 3.831585832096991*^9}, { 3.831585873047202*^9, 3.831585884320414*^9}, {3.8315859333563128`*^9, 3.83158598633525*^9}, {3.831586158378029*^9, 3.831586222152265*^9}, { 3.831586295582384*^9, 3.831586377705759*^9}, {3.8315864822120523`*^9, 3.831586554779951*^9}, {3.8315866296308203`*^9, 3.831586667667411*^9}, { 3.831586741340292*^9, 3.831586755993217*^9}, {3.831592107164525*^9, 3.831592113959847*^9}, {3.831592169716857*^9, 3.831592280561895*^9}, { 3.831593557409717*^9, 3.8315935576894217`*^9}, {3.831593848468913*^9, 3.8315939374159*^9}, {3.831593976921562*^9, 3.831594001541377*^9}, { 3.8315940487580757`*^9, 3.8315940927666388`*^9}, {3.831594365932665*^9, 3.831594522762847*^9}, {3.831594614138864*^9, 3.831594754985476*^9}, { 3.8315949767507057`*^9, 3.831594980589171*^9}, {3.8316319386522493`*^9, 3.8316319392747498`*^9}, {3.831641985178143*^9, 3.831642038615139*^9}, 3.8316436263727818`*^9, {3.831643663092218*^9, 3.8316436694418087`*^9}, { 3.831643837833714*^9, 3.831643845617309*^9}, {3.8316438865181704`*^9, 3.831643933219273*^9}, {3.831643991735036*^9, 3.831644005728479*^9}, { 3.831718518985198*^9, 3.831718538584508*^9}, {3.831718573982415*^9, 3.831718579591817*^9}, {3.831718638646072*^9, 3.83171867240186*^9}, { 3.8317201135527287`*^9, 3.831720118218873*^9}, {3.831720321587966*^9, 3.831720325967662*^9}, {3.831721027895946*^9, 3.831721065838575*^9}, { 3.831721143231716*^9, 3.831721181846493*^9}, {3.831721396838306*^9, 3.83172139923806*^9}, {3.831721668116399*^9, 3.831721676695764*^9}, { 3.831723288861394*^9, 3.831723291074202*^9}, {3.83172431511852*^9, 3.831724317665661*^9}, 3.833891293020659*^9, {3.834269383514792*^9, 3.834269386321598*^9}, {3.834269487189498*^9, 3.8342694873961067`*^9}, { 3.834270103611849*^9, 3.834270107267815*^9}, {3.834270430339264*^9, 3.834270430502697*^9}, {3.834271267146653*^9, 3.834271275112032*^9}, { 3.834351949243196*^9, 3.834351950526677*^9}, {3.834352089916841*^9, 3.834352127810135*^9}, {3.8346566614593353`*^9, 3.8346566626212893`*^9}, { 3.834656744290606*^9, 3.8346567586616583`*^9}, {3.834659006866577*^9, 3.834659016440263*^9}, {3.8346706664345417`*^9, 3.834670668758758*^9}, { 3.834671395332242*^9, 3.83467148748079*^9}, {3.834671580308955*^9, 3.834671642730775*^9}, {3.834671988628789*^9, 3.834671991147118*^9}, { 3.83467255246567*^9, 3.8346725653260603`*^9}}, CellLabel->"In[21]:=",ExpressionUUID->"4186f080-27d0-474f-9433-7cdeb3a7a49d"], Cell[BoxData[ RowBox[{ RowBox[{"fractalDimensionFromG", "[", RowBox[{"G_", ",", "max_", ",", "delta_", ",", "root_"}], "]"}], ":=", RowBox[{"Block", "[", RowBox[{ RowBox[{"{", RowBox[{ "xs", ",", "ys", ",", "data", ",", "graph", ",", "faces", ",", "sigmas", ",", "nlm", ",", "params"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"xs", "=", RowBox[{"Range", "[", RowBox[{"delta", ",", "max", ",", "delta"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"graph", "=", RowBox[{"graphFromG", "[", "G", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"faces", "=", RowBox[{"FindFace", "[", "graph", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sigmas", "=", RowBox[{"findGeneratorsFromG", "[", "G", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"ys", "=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"search", "[", RowBox[{"sigmas", ",", "root", ",", RowBox[{"{", "}"}], ",", "#", ",", "faces"}], "]"}], "+", RowBox[{"Length", "[", "root", "]"}]}], "&"}], "/@", "xs"}]}], ";", "\[IndentingNewLine]", RowBox[{"data", "=", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ "xs", "\[LeftDoubleBracket]", "#", "\[RightDoubleBracket]"}], ",", RowBox[{ "ys", "\[LeftDoubleBracket]", "#", "\[RightDoubleBracket]"}]}], "}"}], "&"}], "/@", RowBox[{"Range", "[", RowBox[{"Length", "[", "ys", "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"nlm", "=", RowBox[{"NonlinearModelFit", "[", RowBox[{"data", ",", RowBox[{"a", " ", SuperscriptBox["x", "b"]}], ",", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", "x"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"params", "=", RowBox[{"nlm", "[", "\"\\"", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Print", "[", RowBox[{"nlm", "[", "\"\\"", "]"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"b", "/.", "params"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.8339647725688353`*^9, 3.8339649328744087`*^9}, { 3.833965051157412*^9, 3.8339650578368483`*^9}, {3.833965560813403*^9, 3.8339655739990377`*^9}, {3.833965620539852*^9, 3.833965639062742*^9}, { 3.833965942784672*^9, 3.833965996602522*^9}, {3.8342709119109173`*^9, 3.8342709184846773`*^9}, {3.834271399281299*^9, 3.834271400142085*^9}, { 3.8345760352900133`*^9, 3.834576035855191*^9}, {3.834594490350781*^9, 3.834594498152722*^9}}, CellLabel->"In[22]:=",ExpressionUUID->"3971d33a-d19f-42ea-9b17-0801f7a59659"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Gram Matrices", "Section", CellChangeTimes->{{3.8646831461718616`*^9, 3.864683148534131*^9}},ExpressionUUID->"38a90e2b-8230-44d5-9ded-\ 1a7e10c86573"], Cell[BoxData[{ RowBox[{ RowBox[{"pyramidG", "[", "n_", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Which", "[", RowBox[{ RowBox[{ RowBox[{"i", "\[Equal]", "0"}], "&&", RowBox[{"j", "\[Equal]", "0"}]}], ",", "1", ",", RowBox[{ RowBox[{"i", "\[Equal]", "0"}], "||", RowBox[{"j", "\[Equal]", "0"}]}], ",", RowBox[{"-", "1"}], ",", "True", ",", RowBox[{"1", "-", FractionBox[ RowBox[{"2", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox[ RowBox[{ RowBox[{"Abs", "[", RowBox[{"i", "-", "j"}], "]"}], "\[Pi]"}], "n"], "]"}], "2"]}], SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["\[Pi]", "n"], "]"}], "2"]]}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "0", ",", "n"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"pyramidTuple", "[", "n_", "]"}], ":=", RowBox[{"N", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", "1"}], ",", RowBox[{"-", "1"}], ",", FractionBox[ RowBox[{ RowBox[{"Sec", "[", FractionBox["\[Pi]", "n"], "]"}], "+", RowBox[{"Tan", "[", FractionBox["\[Pi]", "n"], "]"}]}], RowBox[{"Tan", "[", FractionBox["\[Pi]", "n"], "]"}]]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"n", "+", "1"}]}], "}"}]}], "]"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"prismG", "[", "n_", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"i", ">", "n"}], "&&", RowBox[{"j", "\[LessEqual]", "n"}]}], "||", RowBox[{ RowBox[{"i", "\[LessEqual]", "n"}], "&&", RowBox[{"j", ">", "n"}]}]}], ",", RowBox[{ RowBox[{"-", "1"}], "-", FractionBox[ RowBox[{"2", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox[ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Abs", "[", RowBox[{"i", "-", "j"}], "]"}], "-", "n"}], ")"}], "\[Pi]"}], "n"], "]"}], "2"]}], SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["\[Pi]", "n"], "]"}], "2"]]}], ",", RowBox[{"1", "-", FractionBox[ RowBox[{"2", SuperscriptBox[ RowBox[{"Sin", "[", FractionBox[ RowBox[{ RowBox[{"Abs", "[", RowBox[{"i", "-", "j"}], "]"}], "\[Pi]"}], "n"], "]"}], "2"]}], SuperscriptBox[ RowBox[{"Sin", "[", FractionBox["\[Pi]", "n"], "]"}], "2"]]}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"2", "n"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", RowBox[{"2", "n"}]}], "}"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.833978075492923*^9, 3.833978098104927*^9}, { 3.833978140873678*^9, 3.833978187704298*^9}, {3.833979750071292*^9, 3.833979764905096*^9}, {3.833980891992284*^9, 3.833980904095957*^9}, { 3.834756633987256*^9, 3.834756643293138*^9}, {3.834756704310459*^9, 3.8347567171630287`*^9}, {3.834757262153266*^9, 3.834757308568812*^9}, { 3.83475754283183*^9, 3.8347575451402903`*^9}, {3.834757791323676*^9, 3.834757807603224*^9}, {3.834758018406104*^9, 3.8347580192628*^9}, { 3.8347582118524027`*^9, 3.834758212224677*^9}, {3.834758276954211*^9, 3.834758277276855*^9}, {3.834758321078662*^9, 3.834758332831156*^9}, { 3.86468339626525*^9, 3.86468339654069*^9}},ExpressionUUID->"3db5443f-dda7-4082-8ab7-\ 96e274634389"], Cell[BoxData[{ RowBox[{ RowBox[{"tetrahedron", "=", GridBox[{ {"1", RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], "1"} }]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"octahedron", "=", GridBox[{ {"1", RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}]}, { RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], "1"} }]}], ";"}]}], "Input", CellChangeTimes->{{3.8367815709437532`*^9, 3.836781616938365*^9}}, CellLabel->"In[4]:=",ExpressionUUID->"897b1d52-af46-4e1c-8207-c0acc9e2c1f3"], Cell[BoxData[ RowBox[{ RowBox[{"cube", "=", GridBox[{ {"1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}]}, { RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}]}, { RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1"} }]}], ";"}]], "Input", CellChangeTimes->{{3.834755880160933*^9, 3.834755881259757*^9}, 3.834785693874516*^9}, CellLabel->"In[29]:=",ExpressionUUID->"a88926ed-6f50-457b-9480-401929196ff8"], Cell[BoxData[ RowBox[{ RowBox[{"g6v6f1", "=", GridBox[{ {"1", RowBox[{"-", "1"}], RowBox[{"-", SqrtBox["5"]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["5"]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"2", SqrtBox["5"]}]}], RowBox[{"-", "1"}]}, { RowBox[{"-", SqrtBox["5"]}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["5"]}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["5"]}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", SqrtBox["5"]}]}, { RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"2", SqrtBox["5"]}]}], RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["5"]}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", SqrtBox["5"]}], RowBox[{"-", "1"}], "1"} }]}], ";"}]], "Input", CellChangeTimes->{{3.834742774681567*^9, 3.8347428287244883`*^9}, { 3.834743896750102*^9, 3.8347439689703417`*^9}}, CellLabel->"In[30]:=",ExpressionUUID->"ac2fc7fb-1a08-4495-8c53-210ad6f3664b"], Cell[BoxData[ RowBox[{ RowBox[{"icos", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "4"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1"}], "}"}]}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.834743429368106*^9, 3.8347434388724737`*^9}}, CellLabel->"In[31]:=",ExpressionUUID->"609d9edf-fd45-4e4e-aae5-f4d3cc6359f5"], Cell[BoxData[ RowBox[{ RowBox[{"cuboc", "=", GridBox[{ {"1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}]}, { RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}]}, { RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "3"}], RowBox[{"-", "7"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], "1", RowBox[{"-", "3"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "3"}], "1", RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "7"}], RowBox[{"-", "3"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "3"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1"} }]}], ";"}]], "Input", CellChangeTimes->{{3.8347499838493013`*^9, 3.8347500201575737`*^9}, 3.834750116070956*^9, {3.8347502692524233`*^9, 3.834750279540098*^9}, { 3.8347503806900682`*^9, 3.834750484892733*^9}}, CellLabel->"In[32]:=",ExpressionUUID->"294e535d-e3a7-4a1d-8c24-303f127653b2"], Cell[BoxData[ RowBox[{ RowBox[{"squareantibipyramid", "=", TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"1", RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}]}, { RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}]}, { RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}]}, { RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}]}, { RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], "1", RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"-", "1"}]}, { RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"-", "1"}]}, { RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], "-", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], "1", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}]}, { RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], "1"} }, GridBoxAlignment->{"Columns" -> {{Center}}, "Rows" -> {{Baseline}}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}], ";"}]], "Input", CellChangeTimes->{{3.834755068584971*^9, 3.8347550726738453`*^9}, 3.8347857193270597`*^9}, CellLabel->"In[33]:=",ExpressionUUID->"45d67d9a-02e6-48ac-8e3a-435a001307e6"], Cell[BoxData[ RowBox[{ RowBox[{"rhombdodec", "=", GridBox[{ {"1", RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "1"}], RowBox[{"-", "17"}], RowBox[{"-", "7"}]}, { RowBox[{"-", "5"}], "1", RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "17"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "11"}], RowBox[{"-", "7"}]}, { RowBox[{"-", "11"}], RowBox[{"-", "5"}], "1", RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "11"}], RowBox[{"-", "17"}], RowBox[{"-", "11"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "17"}], RowBox[{"-", "1"}], RowBox[{"-", "11"}], RowBox[{"-", "7"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "2"}], RowBox[{"-", "5"}], RowBox[{"-", "2"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "2"}], RowBox[{"-", "7"}], RowBox[{"-", "2"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "2"}], "1", RowBox[{"-", "2"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "2"}], RowBox[{"-", "7"}], RowBox[{"-", "2"}]}, { RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "2"}], "1", RowBox[{"-", "2"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "2"}], RowBox[{"-", "1"}], RowBox[{"-", "2"}]}, { RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "2"}], RowBox[{"-", "5"}], RowBox[{"-", "2"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "2"}], RowBox[{"-", "1"}], RowBox[{"-", "2"}]}, { RowBox[{"-", "11"}], RowBox[{"-", "17"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "17"}], RowBox[{"-", "11"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "5"}], "1", RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "11"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "11"}], RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "17"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], "1", RowBox[{"-", "7"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "2"}], RowBox[{"-", "2"}], RowBox[{"-", "2"}], RowBox[{"-", "2"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], "1", RowBox[{"-", "7"}], RowBox[{"-", "5"}]}, { RowBox[{"-", "17"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "11"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "7"}], RowBox[{"-", "2"}], RowBox[{"-", "2"}], RowBox[{"-", "2"}], RowBox[{"-", "2"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], "1"} }]}], ";"}]], "Input", CellChangeTimes->{{3.834755613463056*^9, 3.834755830758485*^9}}, CellLabel->"In[34]:=",ExpressionUUID->"65e20246-7792-4c97-b2ee-553e60d6428e"], Cell[BoxData[ RowBox[{ RowBox[{"rhombtriacont", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1.`", ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "9.`"}], ",", "1.`", ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9.`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", "1.`", ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "9.`"}], ",", "1.`", ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", "1.`", ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", "1.`", ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "9.`"}], ",", "1.`", ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", RowBox[{"-", "9.`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "1.7639320225002102`"}], ",", "1.`", ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", "1.`", ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", "1.`", ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", "1.`", ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", "1.`", ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "48.59674775249769`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", "1.`", ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", "1.`", ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", "1.`", ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "6.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", "1.`", ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "55.83281572999748`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "36.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", "1.`", ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "17.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.70820393249937`"}], ",", RowBox[{"-", "8.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "48.59674775249769`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "6.23606797749979`"}], ",", RowBox[{"-", "55.83281572999748`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "36.88854381999832`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", RowBox[{"-", "17.94427190999916`"}], ",", "1.`"}], "}"}]}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.8351052258837433`*^9, 3.83510523223288*^9}}, CellLabel->"In[35]:=",ExpressionUUID->"1c98ab0f-7be0-4b82-83f8-0a1739369b4d"], Cell[BoxData[ RowBox[{ RowBox[{"truncIsoc", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1.`", ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "46.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`", ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`", ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", "1.`", ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", "1.`", ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", "1.`", ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", "1.`", ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", "1.`", ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", "1.`", ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", "1.`", ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", "1.`", ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", "1.`", ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", "1.`", ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`", ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`", ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`", ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", "1.`", ",", RowBox[{"-", "1.`"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "40.124611797498105`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "7.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.88854381999832`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "4.23606797749979`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "15.47213595499958`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "31.65247584249853`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "1.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "42.124611797498105`"}], ",", RowBox[{"-", "35.65247584249853`"}], ",", RowBox[{"-", "34.88854381999832`"}], ",", RowBox[{"-", "28.41640786499874`"}], ",", RowBox[{"-", "18.70820393249937`"}], ",", RowBox[{"-", "12.23606797749979`"}], ",", RowBox[{"-", "11.47213595499958`"}], ",", RowBox[{"-", "5.`"}], ",", RowBox[{"-", "48.124611797498105`"}], ",", RowBox[{"-", "46.124611797498105`"}], ",", RowBox[{"-", "21.94427190999916`"}], ",", RowBox[{"-", "19.94427190999916`"}], ",", RowBox[{"-", "27.18033988749895`"}], ",", RowBox[{"-", "25.18033988749895`"}], ",", RowBox[{"-", "1.`"}], ",", "1.`"}], "}"}]}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.835099208339944*^9, 3.835099213546089*^9}}, CellLabel->"In[36]:=",ExpressionUUID->"239a4292-049d-4293-9674-7e78c28ca011"], Cell[BoxData[ RowBox[{ RowBox[{"g6v7f1", "=", GridBox[{ {"1", RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"4", SqrtBox["2"]}]}]}, { RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"4", SqrtBox["2"]}]}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "3"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"4", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"4", SqrtBox["2"]}]}], RowBox[{"-", "1"}], "1"} }]}], ";"}]], "Input", CellChangeTimes->{{3.835179658699398*^9, 3.835179697234489*^9}, 3.835179904759911*^9, {3.8351799445200777`*^9, 3.835179974915256*^9}, 3.83518031842799*^9}, CellLabel->"In[37]:=",ExpressionUUID->"b6c05a3c-d9ef-41f8-9987-9bf57f74096c"], Cell[BoxData[ RowBox[{ RowBox[{"dodeca", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", "1", ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", "1", ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", "1", ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", "1", ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", "1", ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", "1", ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", "1", ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", "1", ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{ RowBox[{"-", "5"}], "-", RowBox[{"2", " ", RowBox[{"Sqrt", "[", "5", "]"}]}]}], ",", RowBox[{"-", "1"}], ",", RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "2"}], "-", RowBox[{"Sqrt", "[", "5", "]"}]}], ")"}]}], ",", "1"}], "}"}]}], "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.836826245042097*^9, 3.83682624774428*^9}}, CellLabel->"In[38]:=",ExpressionUUID->"851b8d35-e5c6-40f2-826f-018f704c8a73"], Cell[BoxData[ RowBox[{ RowBox[{"g6v7f2", "=", GridBox[{ {"1", RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "5"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}], RowBox[{"-", FractionBox["5", "3"]}]}, { RowBox[{"-", "1"}], RowBox[{"-", "5"}], RowBox[{"-", "7"}], RowBox[{"-", "1"}], "1", RowBox[{"-", "1"}]}, { RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", "1"}], RowBox[{"-", FractionBox["5", "3"]}], RowBox[{"-", "1"}], "1"} }]}], ";"}]], "Input", CellChangeTimes->{{3.8493085177656803`*^9, 3.8493085918602943`*^9}}, CellLabel->"In[43]:=",ExpressionUUID->"8fa9343c-0ee8-4e78-b216-6b629c1eb50f"] }, Open ]] }, WindowSize->{750.75, 778.5}, WindowMargins->{{6, Automatic}, {6, Automatic}}, TaggingRules->{ "WelcomeScreenSettings" -> {"FEStarting" -> False}, "TryRealOnly" -> False}, FrontEndVersion->"13.0 for Linux x86 (64-bit) (February 4, 2022)", StyleDefinitions->"Default.nb", ExpressionUUID->"e8622aad-0bd2-483b-a68b-2a26bc5485be" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 162, 3, 68, "Section",ExpressionUUID->"d9d62207-947e-4a55-994c-be968ba39c8b"], Cell[CellGroupData[{ Cell[767, 29, 186, 3, 54, "Subsection",ExpressionUUID->"ffcc14d7-54b2-406a-8618-9531332769aa"], Cell[956, 34, 248, 5, 35, "Text",ExpressionUUID->"ac72a206-5663-4fb8-9a75-6d188f4c76e1"], Cell[1207, 41, 418, 9, 29, "Input",ExpressionUUID->"e1bc883b-2413-4a7d-abe0-4a19eb3f78fd"], Cell[1628, 52, 949, 22, 59, "Text",ExpressionUUID->"87b40a25-ff96-4305-b802-220d3c3714ee"], Cell[2580, 76, 1029, 27, 71, "Input",ExpressionUUID->"025b5df5-f2a6-4cee-a294-e76ee16e74d4"], Cell[3612, 105, 250, 6, 35, "Text",ExpressionUUID->"03438c1b-508d-4333-9054-9967574ef3d3"], Cell[3865, 113, 509, 11, 29, "Input",ExpressionUUID->"54cc4a6c-be37-4091-ac21-3dfd11eb53ea"], Cell[4377, 126, 334, 7, 58, "Text",ExpressionUUID->"b44fae9e-11fd-4fea-9594-87a6c311bec8"], Cell[4714, 135, 439, 11, 29, "Input",ExpressionUUID->"d3298122-6e10-4115-8e61-a949acba4e08"], Cell[5156, 148, 223, 5, 35, "Text",ExpressionUUID->"551afa7d-856b-46fe-8670-51fd64eff7cc"], Cell[5382, 155, 1416, 34, 71, "Input",ExpressionUUID->"4e2a5664-aeb5-4dfb-88fb-7e7839ba2141"], Cell[6801, 191, 163, 3, 35, "Text",ExpressionUUID->"7914b40a-8924-4161-b52d-1ca82c95c0c4"], Cell[6967, 196, 342, 8, 29, "Input",ExpressionUUID->"c9a1b25a-8cb3-40d1-ac83-1d2405398934"], Cell[7312, 206, 331, 7, 58, "Text",ExpressionUUID->"777e5618-fae9-4bb5-b529-4f4902364898"], Cell[7646, 215, 1141, 33, 92, "Input",ExpressionUUID->"30b57c08-a123-4e7d-9b0a-b512fcfecee8"], Cell[8790, 250, 591, 15, 35, "Text",ExpressionUUID->"c96de117-3c03-4391-9112-59dc2aa87e38"], Cell[9384, 267, 740, 20, 51, "Input",ExpressionUUID->"e30807a9-5381-4ad1-b9fd-a6a877ae69fe"], Cell[10127, 289, 671, 19, 29, "Input",ExpressionUUID->"d1264330-efcb-4ca7-a1c2-f6744f28eebe"], Cell[10801, 310, 708, 19, 71, "Input",ExpressionUUID->"efd0e321-9f31-4641-bf42-f73e16044635"], Cell[11512, 331, 548, 14, 51, "Input",ExpressionUUID->"810323e6-91cb-44f2-ad55-323fbec422eb"] }, Open ]], Cell[CellGroupData[{ Cell[12097, 350, 162, 3, 54, "Subsection",ExpressionUUID->"30f99b83-ea38-48b2-b913-e9a970532db2"], Cell[12262, 355, 221, 5, 35, "Text",ExpressionUUID->"4192620c-85de-4442-8b77-a4f0439b11b4"], Cell[12486, 362, 702, 19, 51, "Input",ExpressionUUID->"948959db-c926-4458-9e45-ef7f3fb99ba5"], Cell[13191, 383, 721, 16, 81, "Text",ExpressionUUID->"652feb5a-94e0-4b51-96b7-66625315f8ef"], Cell[13915, 401, 996, 28, 71, "Input",ExpressionUUID->"e7b8a43b-0fbc-4073-928d-10a091e21dd7"], Cell[14914, 431, 4042, 107, 360, "Input",ExpressionUUID->"5cb4f612-3c02-42ac-ad57-4fb2daf3366b"] }, Open ]], Cell[CellGroupData[{ Cell[18993, 543, 235, 4, 54, "Subsection",ExpressionUUID->"a54eae0a-eac8-4408-bb48-69eb10a7147f"], Cell[19231, 549, 404, 8, 58, "Text",ExpressionUUID->"6773c37a-4ed3-4315-9304-64d7ebb905b7"], Cell[19638, 559, 10810, 230, 546, "Input",ExpressionUUID->"df61872a-1e93-4b2b-ad66-1c8fee203402"], Cell[30451, 791, 7334, 180, 546, "Input",ExpressionUUID->"dab3b84f-3f49-42e4-9bc4-79cb6408f946"], Cell[37788, 973, 912, 24, 92, "Input",ExpressionUUID->"bd52b017-bd99-4bdf-9126-b7c62804c9f2"], Cell[38703, 999, 380, 8, 81, "Text",ExpressionUUID->"371e76d7-c3be-4ee9-ab19-eeefafc86d34"], Cell[39086, 1009, 443, 11, 29, "Input",ExpressionUUID->"5ef8c91b-dd7a-440d-b44e-513ae9efffca"], Cell[39532, 1022, 274, 6, 35, "Text",ExpressionUUID->"09cd9547-a570-4ff5-bee6-11977bff1c99"], Cell[39809, 1030, 560, 15, 51, "Input",ExpressionUUID->"14db2bfc-ecf5-4a97-90fa-8126e86e9190"] }, Open ]], Cell[CellGroupData[{ Cell[40406, 1050, 260, 6, 81, "Subsection",ExpressionUUID->"9a9baebc-6ebe-40af-9838-fbc4f0a61e63"], Cell[40669, 1058, 452, 8, 81, "Text",ExpressionUUID->"a40f213a-0639-4531-af71-cb3759d226bb"], Cell[41124, 1068, 5346, 111, 216, "Input",ExpressionUUID->"4186f080-27d0-474f-9433-7cdeb3a7a49d"], Cell[46473, 1181, 2787, 67, 283, "Input",ExpressionUUID->"3971d33a-d19f-42ea-9b17-0801f7a59659"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[49309, 1254, 160, 3, 68, "Section",ExpressionUUID->"38a90e2b-8230-44d5-9ded-1a7e10c86573"], Cell[49472, 1259, 3892, 112, 296, "Input",ExpressionUUID->"3db5443f-dda7-4082-8ab7-96e274634389"], Cell[53367, 1373, 1580, 60, 196, "Input",ExpressionUUID->"897b1d52-af46-4e1c-8207-c0acc9e2c1f3"], Cell[54950, 1435, 1861, 70, 147, "Input",ExpressionUUID->"a88926ed-6f50-457b-9480-401929196ff8"], Cell[56814, 1507, 1550, 60, 137, "Input",ExpressionUUID->"ac2fc7fb-1a08-4495-8c53-210ad6f3664b"], Cell[58367, 1569, 9993, 307, 504, "Input",ExpressionUUID->"609d9edf-fd45-4e4e-aae5-f4d3cc6359f5"], Cell[68363, 1878, 4066, 151, 216, "Input",ExpressionUUID->"294e535d-e3a7-4a1d-8c24-303f127653b2"], Cell[72432, 2031, 7538, 274, 221, "Input",ExpressionUUID->"45d67d9a-02e6-48ac-8e3a-435a001307e6"], Cell[79973, 2307, 5347, 201, 250, "Input",ExpressionUUID->"65e20246-7792-4c97-b2ee-553e60d6428e"], Cell[85323, 2510, 49457, 1063, 2711, "Input",ExpressionUUID->"1c98ab0f-7be0-4b82-83f8-0a1739369b4d"], Cell[134783, 3575, 172929, 3666, 9909, "Input",ExpressionUUID->"239a4292-049d-4293-9674-7e78c28ca011"], Cell[307715, 7243, 1486, 55, 125, "Input",ExpressionUUID->"b6c05a3c-d9ef-41f8-9987-9bf57f74096c"], Cell[309204, 7300, 42950, 1327, 834, "Input",ExpressionUUID->"851b8d35-e5c6-40f2-826f-018f704c8a73"], Cell[352157, 8629, 1167, 43, 129, "Input",ExpressionUUID->"8fa9343c-0ee8-4e78-b216-6b629c1eb50f"] }, Open ]] } ] *)