9827 lines
395 KiB
Mathematica
9827 lines
395 KiB
Mathematica
(* 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[ 404129, 9819]
|
|
NotebookOptionsPosition[ 397270, 9717]
|
|
NotebookOutlinePosition[ 397757, 9735]
|
|
CellTagsIndexPosition[ 397714, 9732]
|
|
WindowFrame->Normal*)
|
|
|
|
(* Beginning of Notebook Content *)
|
|
Notebook[{
|
|
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[22]:=",ExpressionUUID->"e1bc883b-2413-4a7d-abe0-4a19eb3f78fd"],
|
|
|
|
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[23]:=",ExpressionUUID->"025b5df5-f2a6-4cee-a294-e76ee16e74d4"],
|
|
|
|
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[24]:=",ExpressionUUID->"54cc4a6c-be37-4091-ac21-3dfd11eb53ea"],
|
|
|
|
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[25]:=",ExpressionUUID->"d3298122-6e10-4115-8e61-a949acba4e08"],
|
|
|
|
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[26]:=",ExpressionUUID->"4e2a5664-aeb5-4dfb-88fb-7e7839ba2141"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"linearRelationsFromW", "=",
|
|
RowBox[{
|
|
"linearRelations", "@*", "linearRelationsMatrix", "@*", "gramMatrix"}]}],
|
|
";"}]], "Input",
|
|
CellChangeTimes->{{3.831110103314905*^9, 3.831110162272215*^9},
|
|
3.831206070230084*^9},
|
|
CellLabel->"In[27]:=",ExpressionUUID->"c9a1b25a-8cb3-40d1-ac83-1d2405398934"],
|
|
|
|
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[28]:=",ExpressionUUID->"30b57c08-a123-4e7d-9b0a-b512fcfecee8"],
|
|
|
|
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[29]:=",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[30]:=",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[31]:=",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[32]:=",ExpressionUUID->"810323e6-91cb-44f2-ad55-323fbec422eb"],
|
|
|
|
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]", "\"\<Name\>\""}]}], "]"}],
|
|
"]"}]}]], "Input",
|
|
CellChangeTimes->{{3.8315843493182087`*^9, 3.831584372878718*^9}, {
|
|
3.831584545556731*^9, 3.831584563248426*^9}},
|
|
CellLabel->"In[33]:=",ExpressionUUID->"948959db-c926-4458-9e45-ef7f3fb99ba5"],
|
|
|
|
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[34]:=",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", ",", "\"\<PlanarEmbedding\>\""}], "]"}]}], ";",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"FindFace", "[",
|
|
RowBox[{"g", ",", "emb"}], "]"}]}]}], "]"}]}], ";"}],
|
|
"\[IndentingNewLine]"}], "\n",
|
|
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[35]:=",ExpressionUUID->"5cb4f612-3c02-42ac-ad57-4fb2daf3366b"],
|
|
|
|
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[37]:=",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[38]:=",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]", "\"\<Name\>\""}]}], "]"}], "]"}],
|
|
"]"}], ",",
|
|
RowBox[{"Range", "[",
|
|
RowBox[{"Length", "[", "G", "]"}], "]"}], ",", "G"}], "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.831554845925479*^9, 3.8315548977219877`*^9},
|
|
3.833982029038528*^9},
|
|
CellLabel->"In[39]:=",ExpressionUUID->"bd52b017-bd99-4bdf-9126-b7c62804c9f2"],
|
|
|
|
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[40]:=",ExpressionUUID->"5ef8c91b-dd7a-440d-b44e-513ae9efffca"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"findGeometricGenerators", "[",
|
|
RowBox[{"W_", ",", "faces_"}], "]"}], ":=",
|
|
RowBox[{"Block", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"circs", ",", "pointsOfIntersection", ",", "duals"}], "}"}], ",",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"circs", "=",
|
|
RowBox[{"abbctoxyr", "/@", "W"}]}], ";", "\[IndentingNewLine]",
|
|
RowBox[{"pointsOfIntersection", "=",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"If", "[",
|
|
RowBox[{
|
|
RowBox[{"i", "==", "j"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0"}], "}"}], ",",
|
|
RowBox[{
|
|
RowBox[{"NSolve", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-",
|
|
RowBox[{
|
|
RowBox[{"circs", "[",
|
|
RowBox[{"[", "i", "]"}], "]"}], "[",
|
|
RowBox[{"[", "1", "]"}], "]"}]}], ")"}], "2"], "+",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-",
|
|
RowBox[{
|
|
RowBox[{"circs", "[",
|
|
RowBox[{"[", "i", "]"}], "]"}], "[",
|
|
RowBox[{"[", "2", "]"}], "]"}]}], ")"}], "2"]}], "==",
|
|
SuperscriptBox[
|
|
RowBox[{
|
|
RowBox[{"circs", "[",
|
|
RowBox[{"[", "i", "]"}], "]"}], "[",
|
|
RowBox[{"[", "3", "]"}], "]"}], "2"]}], ",",
|
|
RowBox[{
|
|
RowBox[{
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"x", "-",
|
|
RowBox[{
|
|
RowBox[{"circs", "[",
|
|
RowBox[{"[", "j", "]"}], "]"}], "[",
|
|
RowBox[{"[", "1", "]"}], "]"}]}], ")"}], "2"], "+",
|
|
SuperscriptBox[
|
|
RowBox[{"(",
|
|
RowBox[{"y", "-",
|
|
RowBox[{
|
|
RowBox[{"circs", "[",
|
|
RowBox[{"[", "j", "]"}], "]"}], "[",
|
|
RowBox[{"[", "2", "]"}], "]"}]}], ")"}], "2"]}], "==",
|
|
SuperscriptBox[
|
|
RowBox[{
|
|
RowBox[{"circs", "[",
|
|
RowBox[{"[", "j", "]"}], "]"}], "[",
|
|
RowBox[{"[", "3", "]"}], "]"}], "2"]}]}], "}"}], ",",
|
|
"Reals"}], "]"}], "/.",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"x", "->", "a_"}], ",",
|
|
RowBox[{"y", "->", "b_"}]}], "}"}], ",", "_"}], "}"}], "->",
|
|
RowBox[{"{",
|
|
RowBox[{"a", ",", "b"}], "}"}]}]}]}], "]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"i", ",",
|
|
RowBox[{"Length", "[", "circs", "]"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"j", ",",
|
|
RowBox[{"Length", "[", "circs", "]"}]}], "}"}]}], "]"}]}], ";",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"duals", "=",
|
|
RowBox[{
|
|
RowBox[{"(",
|
|
RowBox[{
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"CircleThrough", "[",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"pointsOfIntersection", "[",
|
|
RowBox[{"[",
|
|
RowBox[{
|
|
RowBox[{"face", "[",
|
|
RowBox[{"[", "i", "]"}], "]"}], ",",
|
|
RowBox[{"face", "[",
|
|
RowBox[{"[",
|
|
RowBox[{"If", "[",
|
|
RowBox[{
|
|
RowBox[{"i", "==",
|
|
RowBox[{"Length", "[", "face", "]"}]}], ",", "1", ",",
|
|
RowBox[{"i", "+", "1"}]}], "]"}], "]"}], "]"}]}], "]"}],
|
|
"]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"i", ",", "3"}], "}"}]}], "]"}], "]"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"face", ",", "faces"}], "}"}]}], "]"}], "//", "Chop"}],
|
|
")"}], "/.",
|
|
RowBox[{
|
|
RowBox[{"Circle", "[",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"x_", ",", "y_"}], "}"}], ",", "r_"}], "]"}], "->",
|
|
RowBox[{"{",
|
|
RowBox[{"x", ",", "y", ",", "r"}], "}"}]}]}]}], ";",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"invertAboutCircle", "@@", "#"}], "&"}], "/@", "duals"}]}]}],
|
|
"\[IndentingNewLine]", "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.836311382224783*^9, 3.836311419633215*^9}, {
|
|
3.836311452786697*^9, 3.8363115754821777`*^9}, {3.836311671596231*^9,
|
|
3.836311911486074*^9}, {3.83631202465561*^9, 3.8363120458893223`*^9}, {
|
|
3.8363120966552258`*^9, 3.8363121518749323`*^9}, {3.836312205319263*^9,
|
|
3.836312308220592*^9}, {3.8363126041123037`*^9, 3.8363126356297626`*^9}, {
|
|
3.836312719672307*^9, 3.836312731342832*^9}, {3.83631288194462*^9,
|
|
3.836312925832314*^9}, {3.836335503087988*^9, 3.83633554789843*^9}, {
|
|
3.836335652905367*^9, 3.8363356695012817`*^9}, {3.8363359177817593`*^9,
|
|
3.836335919048725*^9}, 3.836336062206873*^9, {3.836336095237904*^9,
|
|
3.836336114229784*^9}, {3.836336188817478*^9, 3.836336232187769*^9}, {
|
|
3.836336269426408*^9, 3.836336326435491*^9}, 3.836336424520152*^9},
|
|
CellLabel->"In[41]:=",ExpressionUUID->"2ffd6cba-1ba3-4c73-8457-ef7fc5958282"],
|
|
|
|
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[42]:=",ExpressionUUID->"4186f080-27d0-474f-9433-7cdeb3a7a49d"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"$RecursionLimit", "=", "16384"}]], "Input",
|
|
CellChangeTimes->{{3.833893222127377*^9, 3.833893227672316*^9}, {
|
|
3.83397931096562*^9, 3.833979311902438*^9}, {3.833982525256192*^9,
|
|
3.833982529177711*^9}, {3.833982918567665*^9, 3.8339829240001698`*^9}},
|
|
CellLabel->"In[43]:=",ExpressionUUID->"a546161f-063b-4b38-811b-1f5d9ac28696"],
|
|
|
|
Cell[BoxData["16384"], "Output",
|
|
CellChangeTimes->{
|
|
3.8338932281018763`*^9, 3.8339758669967527`*^9, 3.833979312227579*^9,
|
|
3.833979916481537*^9, 3.833980236024199*^9, 3.833980842837739*^9,
|
|
3.83398098522823*^9, 3.833981016536418*^9, {3.83398252603516*^9,
|
|
3.833982529689131*^9}, {3.8339829193261623`*^9, 3.8339829508363667`*^9},
|
|
3.8339830049394903`*^9, 3.833985185839014*^9, {3.833985309697896*^9,
|
|
3.833985324982264*^9}, {3.8339855257030573`*^9, 3.8339855467146*^9},
|
|
3.833989922637932*^9, 3.833990186870085*^9, 3.833993648764943*^9, {
|
|
3.83399468620287*^9, 3.8339947024536467`*^9}, 3.833995688332788*^9, {
|
|
3.833997659712306*^9, 3.833997676964181*^9}, {3.83399771946511*^9,
|
|
3.833997735813401*^9}, 3.833997886970297*^9, 3.833998804781659*^9,
|
|
3.833998949886093*^9, 3.833999546282991*^9, 3.834002950053997*^9,
|
|
3.834008369614998*^9, 3.834008404771652*^9, 3.834012063580451*^9, {
|
|
3.8340125211494923`*^9, 3.834012544564479*^9}, {3.834012632134491*^9,
|
|
3.834012669541378*^9}, {3.8340129486241903`*^9, 3.834012994884214*^9},
|
|
3.834013025749654*^9, {3.8340516513410587`*^9, 3.834051710003538*^9},
|
|
3.834061107105874*^9, {3.834061368190651*^9, 3.8340614192869053`*^9}, {
|
|
3.8340617843815823`*^9, 3.834061797970849*^9}, {3.834065075805954*^9,
|
|
3.834065147762154*^9}, {3.8340672561763277`*^9, 3.834067310718713*^9}, {
|
|
3.834069699109585*^9, 3.834069709702557*^9}, 3.834092717521625*^9,
|
|
3.834097171624065*^9, 3.8341343872984047`*^9, 3.834142620775568*^9,
|
|
3.834145530968349*^9, 3.834146073235483*^9, 3.8341809139458323`*^9,
|
|
3.834269357761674*^9, 3.8342693933710947`*^9, 3.834269448502894*^9,
|
|
3.834269494050521*^9, {3.8342695663389606`*^9, 3.8342696026888247`*^9},
|
|
3.8342701160872383`*^9, 3.834270161194154*^9, 3.834270438333136*^9,
|
|
3.834270555594716*^9, {3.834271103264781*^9, 3.834271120536076*^9},
|
|
3.834271489584754*^9, 3.834271596271693*^9, 3.834272147258156*^9,
|
|
3.834351698339382*^9, {3.834351996635762*^9, 3.834352017390819*^9},
|
|
3.834363957483852*^9, {3.834364187716065*^9, 3.834364198004562*^9},
|
|
3.8344822107164927`*^9, 3.83456973372355*^9, 3.834575082919744*^9,
|
|
3.834577447902966*^9, 3.8345890154068213`*^9, 3.834619110878572*^9, {
|
|
3.834619146500414*^9, 3.834619200887533*^9}, 3.834620064417549*^9,
|
|
3.834622032092245*^9, 3.8346548822352743`*^9, 3.834654946056427*^9, {
|
|
3.8346646221002398`*^9, 3.8346646607444057`*^9}, 3.834666963392949*^9,
|
|
3.8346675010015087`*^9, 3.83467065066402*^9, 3.834670688395502*^9,
|
|
3.834670724619562*^9, 3.8346707922130203`*^9, 3.834672572650928*^9, {
|
|
3.834672606536978*^9, 3.834672633714957*^9}, 3.834688011488668*^9,
|
|
3.834741745404797*^9, 3.834840168954259*^9, 3.835099016743781*^9,
|
|
3.8351796489040537`*^9, 3.836781531078821*^9, 3.836826948477407*^9,
|
|
3.836830434949655*^9, 3.8368306081895647`*^9, {3.8370185096902657`*^9,
|
|
3.837018542471815*^9}, 3.8372921427365923`*^9},
|
|
CellLabel->"Out[43]=",ExpressionUUID->"7f8ac2d2-cd59-46b6-a728-3bc3e2998507"]
|
|
}, Open ]],
|
|
|
|
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", "[", "\"\<BestFitParameters\>\"", "]"}]}], ";",
|
|
"\[IndentingNewLine]",
|
|
RowBox[{"Print", "[",
|
|
RowBox[{"nlm", "[", "\"\<RSquared\>\"", "]"}], "]"}], ";",
|
|
"\[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[44]:=",ExpressionUUID->"3971d33a-d19f-42ea-9b17-0801f7a59659"],
|
|
|
|
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[{"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}},
|
|
CellLabel->"In[45]:=",ExpressionUUID->"3db5443f-dda7-4082-8ab7-96e274634389"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"pyramidFractalDimension", "[",
|
|
RowBox[{"n_", ",", "max_", ",", "delta_"}], "]"}], ":=",
|
|
RowBox[{"fractalDimensionFromG", "[",
|
|
RowBox[{
|
|
RowBox[{"N", "[",
|
|
RowBox[{"pyramidG", "[", "n", "]"}], "]"}], ",", "max", ",", "delta",
|
|
",",
|
|
RowBox[{"N", "[",
|
|
RowBox[{"Table", "[",
|
|
RowBox[{
|
|
RowBox[{"If", "[",
|
|
RowBox[{
|
|
RowBox[{"i", "\[Equal]",
|
|
RowBox[{"n", "+", "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"}]}], "}"}]}], "]"}], "]"}]}], "]"}]}]], "Input",\
|
|
|
|
CellChangeTimes->{{3.833978967161902*^9, 3.8339789914381647`*^9}, {
|
|
3.833979205542704*^9, 3.833979255368734*^9}, {3.833979399981943*^9,
|
|
3.833979410979437*^9}, {3.8339798534902363`*^9, 3.833979853676499*^9}, {
|
|
3.8339800331837673`*^9, 3.833980033963599*^9}, {3.833981434488759*^9,
|
|
3.8339814414612226`*^9}, {3.833981948527481*^9, 3.8339819534472733`*^9}},
|
|
CellLabel->"In[47]:=",ExpressionUUID->"52eb731d-d72b-4ff7-afc4-5691e9750e37"],
|
|
|
|
Cell[BoxData[
|
|
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"}]}], "}"}]}], "]"}], "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.8346584900042677`*^9, 3.834658495237359*^9}, {
|
|
3.834752246211548*^9, 3.834752276988707*^9}},
|
|
CellLabel->"In[48]:=",ExpressionUUID->"6e172e8f-4972-4597-9559-948bf406a2c4"],
|
|
|
|
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[49]:=",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[51]:=",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[52]:=",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[53]:=",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[54]:=",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[55]:=",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[56]:=",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[57]:=",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[58]:=",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[59]:=",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[60]:=",ExpressionUUID->"851b8d35-e5c6-40f2-826f-018f704c8a73"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"g", "=",
|
|
RowBox[{"pyramidG", "[", "7", "]"}]}], ";"}]], "Input",
|
|
CellChangeTimes->{{3.836826920000658*^9, 3.836826922164174*^9}, {
|
|
3.8368304325805902`*^9, 3.8368304328370247`*^9}, {3.836830605294839*^9,
|
|
3.836830605767033*^9}},
|
|
CellLabel->"In[61]:=",ExpressionUUID->"c9c3f8c5-57c2-442b-83c1-93d4627643e0"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"g", "//", "graphFromG"}]], "Input",
|
|
CellChangeTimes->{{3.836826262636533*^9, 3.836826272003983*^9}, {
|
|
3.8368263211194973`*^9, 3.836826322965259*^9}, {3.8368268814461517`*^9,
|
|
3.836826884806394*^9}, 3.8368269267893*^9},
|
|
CellLabel->"In[62]:=",ExpressionUUID->"4d7d714e-f2ed-41ab-a3c1-9f7a73b68b46"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[
|
|
NamespaceBox["NetworkGraphics",
|
|
DynamicModuleBox[{Typeset`graph = HoldComplete[
|
|
Graph[{1, 2, 3, 4, 5, 6, 7, 8}, {
|
|
Null, {{1, 2}, {1, 3}, {1, 4}, {1, 5}, {1, 6}, {1, 7}, {1, 8}, {2, 3}, {
|
|
2, 8}, {3, 4}, {4, 5}, {5, 6}, {6, 7}, {7, 8}}}, {
|
|
GraphLayout -> "TutteEmbedding", VertexLabels -> {"Name"}}]]},
|
|
TagBox[GraphicsGroupBox[{
|
|
{Hue[0.6, 0.7, 0.5], Opacity[0.7], Arrowheads[0.],
|
|
ArrowBox[CompressedData["
|
|
1:eJxTTMoPSmVmYGDgA2ImKJ6k4glCeyB00x6urnk+lpWr9jCAwQd7dHnve6yl
|
|
h1le2l962/1owefHGPKZLyNY5xi9t69zZXo8ofrMfnT5Q6sLfQ8cuW1fEHN6
|
|
5Z4rbzDkD0Dk9xfhkIeav78bh/k+EPftvwB1H7p/0N2PLo+uH109uv/Q+ej+
|
|
Q+ej+w+dj+4/dD66+wDq4egq
|
|
"], 0.02220329551621769]},
|
|
{Hue[0.6, 0.2, 0.8], EdgeForm[{GrayLevel[0], Opacity[
|
|
0.7]}], {
|
|
DiskBox[{-6.344131569286608*^-17, -3.172065784643304*^-17},
|
|
0.02220329551621769],
|
|
InsetBox["1",
|
|
Offset[{2, 2}, {0.02220329551621763, 0.02220329551621766}],
|
|
ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}, {
|
|
DiskBox[{-1.8369701987210297*^-16, 1.}, 0.02220329551621769],
|
|
InsetBox["2",
|
|
Offset[{2, 2}, {0.022203295516217508, 1.0222032955162177}],
|
|
ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}, {
|
|
DiskBox[{0.7818314824680298, 0.6234898018587336},
|
|
0.02220329551621769],
|
|
InsetBox["3",
|
|
Offset[{2, 2}, {0.8040347779842475, 0.6456930973749513}],
|
|
ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}, {
|
|
DiskBox[{0.9749279121818236, -0.22252093395631428},
|
|
0.02220329551621769],
|
|
InsetBox["4",
|
|
Offset[{2, 2}, {0.9971312076980413, -0.2003176384400966}],
|
|
ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}, {
|
|
DiskBox[{0.4338837391175582, -0.900968867902419},
|
|
0.02220329551621769],
|
|
InsetBox["5",
|
|
Offset[{2, 2}, {0.45608703463377587, -0.8787655723862013}],
|
|
ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}, {
|
|
DiskBox[{-0.43388373911755806, -0.9009688679024193},
|
|
0.02220329551621769],
|
|
InsetBox["6", Offset[{2, 2},
|
|
{-0.4116804436013404, -0.8787655723862016}], ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}, {
|
|
DiskBox[{-0.9749279121818236, -0.22252093395631464},
|
|
0.02220329551621769],
|
|
InsetBox["7",
|
|
Offset[{2, 2}, {-0.9527246166656059, -0.20031763844009695}],
|
|
ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}, {
|
|
DiskBox[{-0.7818314824680299, 0.6234898018587334},
|
|
0.02220329551621769],
|
|
InsetBox["8",
|
|
Offset[{2, 2}, {-0.7596281869518122, 0.6456930973749511}],
|
|
ImageScaled[{0, 0}],
|
|
BaseStyle->"Graphics"]}}}],
|
|
MouseAppearanceTag["NetworkGraphics"]],
|
|
AllowKernelInitialization->False]],
|
|
DefaultBaseStyle->{
|
|
"NetworkGraphics", FrontEnd`GraphicsHighlightColor -> Hue[0.8, 1., 0.6]},
|
|
FormatType->TraditionalForm,
|
|
FrameTicks->None]], "Output",
|
|
CellChangeTimes->{
|
|
3.836826272272113*^9, 3.8368263233403797`*^9, 3.836826885323566*^9,
|
|
3.836826948691183*^9, 3.836830435182472*^9, 3.836830608429411*^9, {
|
|
3.837018510019552*^9, 3.8370185426913233`*^9}, 3.837292143044983*^9},
|
|
CellLabel->"Out[62]=",ExpressionUUID->"e8c2f1fb-ecfc-47d3-817b-447b50c2d140"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[{
|
|
RowBox[{
|
|
RowBox[{"root", "=",
|
|
RowBox[{"rootTupleFromG", "[",
|
|
RowBox[{"g", ",",
|
|
RowBox[{"\"\<Face\>\"", "->",
|
|
RowBox[{"{",
|
|
RowBox[{"1", ",", "2", ",", "3"}], "}"}]}], ",",
|
|
RowBox[{"\"\<Invert\>\"", "->", "5"}]}], "]"}]}],
|
|
";"}], "\[IndentingNewLine]",
|
|
RowBox[{"graphAbbc", "[", "root", "]"}]}], "Input",
|
|
CellChangeTimes->{{3.8367816749980087`*^9, 3.83678169373193*^9}, {
|
|
3.836782212585052*^9, 3.836782213164598*^9}, {3.836782537265017*^9,
|
|
3.836782580512849*^9}, {3.836783320961067*^9, 3.836783330078374*^9}, {
|
|
3.836783716493782*^9, 3.8367837243801003`*^9}, {3.8368262522877493`*^9,
|
|
3.836826267184659*^9}, {3.836826333956609*^9, 3.8368263402284737`*^9}, {
|
|
3.836826890490547*^9, 3.836826898050591*^9}, 3.83682693124685*^9, {
|
|
3.836830452142412*^9, 3.836830555345973*^9}},
|
|
CellLabel->"In[63]:=",ExpressionUUID->"64697f86-4592-4a50-b42f-8039aaa8a819"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[{
|
|
CircleBox[{-0.8019377358048382, 0.9504844339512095}, 0.04951556604879044],
|
|
CircleBox[{-0.8019377358048382, 0.8955263018638384}, 0.005442566038580752],
|
|
CircleBox[{-0.7877383903693225, 0.8938691951846615},
|
|
0.008853147072113328],
|
|
CircleBox[{-0.7418441504755342, 0.8875967871701637}, 0.03746773760994686],
|
|
CircleBox[{-0.8019377358047971, 0.9009688679023986}, 0.09903113209757894],
|
|
CircleBox[{-0.8679584905365658, 0.9009688679024263}, 0.033010377365860384],
|
|
CircleBox[{-0.8265450532663595, 0.8979301151448246},
|
|
0.008514396021295157],
|
|
CircleBox[{-0.8127056576307283, 0.8966512664782302},
|
|
0.005383960912945071]}]], "Output",
|
|
CellChangeTimes->{
|
|
3.836782581009417*^9, {3.836783321814218*^9, 3.836783330443108*^9},
|
|
3.8367837254414263`*^9, {3.836826253646843*^9, 3.836826267781098*^9}, {
|
|
3.836826336748612*^9, 3.836826340752605*^9}, 3.836826898801487*^9,
|
|
3.836826948722608*^9, {3.836830435225082*^9, 3.836830555839816*^9},
|
|
3.8368306084814796`*^9, {3.837018510066226*^9, 3.837018542729048*^9},
|
|
3.837292143107196*^9},
|
|
CellLabel->"Out[64]=",ExpressionUUID->"9ed73430-1920-472c-a0b4-4414f74c62bd"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData["root"], "Input",
|
|
CellChangeTimes->{{3.8367825880947943`*^9, 3.8367825884417067`*^9}},
|
|
CellLabel->"In[65]:=",ExpressionUUID->"a12d9058-1edd-4fb6-b435-8ceb29d8c529"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"31.183587772959072`", ",", "20.19566935808922`", ",",
|
|
RowBox[{"-", "16.19566935808922`"}], ",", "19.19566935808922`"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"265.50745689976964`", ",", "183.73686105254282`", ",",
|
|
RowBox[{"-", "147.34552233636435`"}], ",", "164.5411916944536`"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"160.33344075123415`", ",", "112.95418362018589`", ",",
|
|
RowBox[{"-", "88.97834679044612`"}], ",", "100.96626520531603`"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"35.677546980394254`", ",", "26.689628565524117`", ",",
|
|
RowBox[{"-", "19.79954482969879`"}], ",", "23.68962856552423`"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "14.59179388647999`"}], ",",
|
|
RowBox[{"-", "10.097834679044809`"}], ",", "8.097834679044354`", ",",
|
|
RowBox[{"-", "9.097834679044581`"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"47.379257131047325`", ",", "30.293504037133744`", ",",
|
|
RowBox[{"-", "26.29350403713397`"}], ",", "27.29350403713397`"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"174.92523463771386`", ",", "117.44814282762081`", ",",
|
|
RowBox[{"-", "97.07618146949085`"}], ",", "105.46022441275136`"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"272.0014161072047`", ",", "185.73686105254276`", ",",
|
|
RowBox[{"-", "150.94939780797398`"}], ",", "166.54119169445354`"}],
|
|
"}"}]}], "}"}]], "Output",
|
|
CellChangeTimes->{
|
|
3.836782588796229*^9, 3.836783334865951*^9, 3.836783729134719*^9,
|
|
3.836826352489934*^9, 3.836826948746271*^9, 3.8368304352401133`*^9,
|
|
3.836830608501217*^9, {3.837018510077012*^9, 3.8370185427522993`*^9},
|
|
3.837292143117023*^9},
|
|
CellLabel->"Out[65]=",ExpressionUUID->"98a8d185-fc9b-486a-b05c-667150a96589"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"alg", "=",
|
|
RowBox[{
|
|
RowBox[{"findGeneratorsFromG", "[",
|
|
RowBox[{"N", "[", "g", "]"}], "]"}], "//", "Chop"}]}]], "Input",
|
|
CellChangeTimes->{{3.836781716070932*^9, 3.8367817192268267`*^9}, {
|
|
3.836782228380805*^9, 3.836782229077721*^9}, {3.8367826154875526`*^9,
|
|
3.836782616394808*^9}, {3.836783355652117*^9, 3.836783356341704*^9}, {
|
|
3.836826397513062*^9, 3.836826429599427*^9}, 3.836826935990299*^9},
|
|
CellLabel->"In[66]:=",ExpressionUUID->"6c14882f-a3a6-490a-822b-b77dc0b9345c"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.493959207434937`", ",", "5.493959207434937`", ",", "0", ",",
|
|
RowBox[{"-", "0.44504186791262895`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "2.4450418679126296`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479547`", ",", "10.097834679044613`", ",", "0", ",",
|
|
RowBox[{"-", "1.`"}], ",", "0", ",", "0", ",", "0", ",",
|
|
"6.4939592074349335`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"18.195669358089223`", ",", "11.34481428276208`", ",", "0", ",",
|
|
RowBox[{"-", "1.246979603717467`"}], ",", "0", ",", "0", ",", "0", ",",
|
|
"9.09783467904461`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.59179388647955`", ",", "8.295896943239777`", ",", "0", ",",
|
|
RowBox[{"-", "1.0000000000000002`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "8.295896943239773`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6.49395920743494`", ",", "3.246979603717471`", ",", "0", ",",
|
|
RowBox[{"-", "0.4450418679126291`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "4.692021471630098`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"1.`"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.4939592074349335`", ",", "1.9999999999999998`", ",",
|
|
"6.4939592074349335`", ",",
|
|
RowBox[{"-", "1.`"}], ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479545`", ",", "5.4939592074349335`", ",",
|
|
"12.344814282762076`", ",",
|
|
RowBox[{"-", "2.246979603717467`"}], ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"18.19566935808922`", ",", "7.850855075327141`", ",",
|
|
"14.146752018566914`", ",",
|
|
RowBox[{"-", "2.801937735804838`"}], ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479538`", ",", "7.295896943239768`", ",",
|
|
"10.542876546957235`", ",",
|
|
RowBox[{"-", "2.2469796037174663`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.493959207434931`", ",", "4.246979603717465`", ",",
|
|
"4.246979603717465`", ",",
|
|
RowBox[{"-", "0.9999999999999996`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "0"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.493959207434934`", ",", "0", ",", "5.048917339522307`", ",",
|
|
"2.801937735804839`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.35689586789220945`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.493959207434934`", ",", "0", ",", "2.80193773580484`", ",",
|
|
"5.048917339522306`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.35689586789220945`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479547`", ",", "0", ",", "7.295896943239775`", ",",
|
|
"9.097834679044613`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.8019377358048383`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"18.195669358089223`", ",", "0", ",", "10.097834679044613`", ",",
|
|
"10.097834679044613`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1.`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479545`", ",", "0", ",", "9.097834679044611`", ",",
|
|
"7.2958969432397724`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.8019377358048382`"}], ",", "0"}], "}"}]}], "}"}], ",",
|
|
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.59179388647954`", ",", "0", ",", "0", ",", "8.295896943239768`",
|
|
",", "8.295896943239772`", ",", "0", ",",
|
|
RowBox[{"-", "0.9999999999999994`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.493959207434932`", ",", "0", ",", "0", ",", "4.692021471630094`",
|
|
",", "3.2469796037174663`", ",", "0", ",",
|
|
RowBox[{"-", "0.4450418679126285`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.4939592074349335`", ",", "0", ",", "0", ",", "2.4450418679126282`",
|
|
",", "5.4939592074349335`", ",", "0", ",",
|
|
RowBox[{"-", "0.4450418679126287`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479548`", ",", "0", ",", "0", ",", "6.493959207434934`",
|
|
",", "10.097834679044613`", ",", "0", ",",
|
|
RowBox[{"-", "1.`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"18.195669358089223`", ",", "0", ",", "0", ",", "9.09783467904461`",
|
|
",", "11.344814282762078`", ",", "0", ",",
|
|
RowBox[{"-", "1.2469796037174667`"}], ",", "0"}], "}"}]}], "}"}], ",",
|
|
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"18.195669358089205`", ",", "0", ",", "0", ",", "0", ",",
|
|
"7.850855075327136`", ",", "14.146752018566904`", ",",
|
|
RowBox[{"-", "2.801937735804836`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479532`", ",", "0", ",", "0", ",", "0", ",",
|
|
"7.295896943239766`", ",", "10.54287654695723`", ",",
|
|
RowBox[{"-", "2.2469796037174654`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.493959207434932`", ",", "0", ",", "0", ",", "0", ",",
|
|
"4.246979603717466`", ",", "4.246979603717465`", ",",
|
|
RowBox[{"-", "0.9999999999999997`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1.`", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"6.4939592074349335`", ",", "0", ",", "0", ",", "0", ",",
|
|
"1.9999999999999998`", ",", "6.4939592074349335`", ",",
|
|
RowBox[{"-", "1.`"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"14.591793886479536`", ",", "0", ",", "0", ",", "0", ",",
|
|
"5.49395920743493`", ",", "12.344814282762071`", ",",
|
|
RowBox[{"-", "2.246979603717466`"}], ",", "0"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"14.591793886479548`", ",",
|
|
RowBox[{"-", "1.`"}], ",", "0", ",", "0", ",", "0", ",",
|
|
"6.493959207434934`", ",", "10.097834679044613`", ",", "0"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"18.195669358089223`", ",",
|
|
RowBox[{"-", "1.2469796037174667`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "9.09783467904461`", ",", "11.344814282762078`", ",", "0"}],
|
|
"}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"14.59179388647954`", ",",
|
|
RowBox[{"-", "0.9999999999999994`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "8.295896943239768`", ",", "8.295896943239772`", ",", "0"}],
|
|
"}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6.493959207434932`", ",",
|
|
RowBox[{"-", "0.4450418679126285`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "4.692021471630094`", ",", "3.2469796037174663`", ",", "0"}],
|
|
"}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1.`", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1.`", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6.4939592074349335`", ",",
|
|
RowBox[{"-", "0.4450418679126287`"}], ",", "0", ",", "0", ",", "0",
|
|
",", "2.4450418679126282`", ",", "5.4939592074349335`", ",", "0"}],
|
|
"}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6.493959207434934`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.35689586789220945`"}], ",", "0", ",", "0", ",",
|
|
"2.80193773580484`", ",", "5.048917339522306`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"14.591793886479547`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.8019377358048383`"}], ",", "0", ",", "0", ",",
|
|
"7.295896943239775`", ",", "9.097834679044613`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"18.195669358089223`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1.`"}], ",", "0", ",", "0", ",", "10.097834679044613`",
|
|
",", "10.097834679044613`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"14.591793886479545`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.8019377358048382`"}], ",", "0", ",", "0", ",",
|
|
"9.097834679044611`", ",", "7.2958969432397724`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6.493959207434934`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.35689586789220945`"}], ",", "0", ",", "0", ",",
|
|
"5.048917339522307`", ",", "2.801937735804839`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1.`", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"1.`"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1.`"}], ",", "0", ",", "0.08442513121166557`", ",", "0",
|
|
",", "0.18970154787378368`", ",", "0", ",", "0", ",",
|
|
"0.18970154787378368`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",", "0.692021471630096`", ",", "0", ",",
|
|
RowBox[{"-", "0.246979603717467`"}], ",", "0", ",", "0", ",",
|
|
"0.5549581320873711`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0.6920214716300956`", ",", "0", ",",
|
|
"0.5549581320873711`", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "0.24697960371746702`"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "1.`", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",",
|
|
RowBox[{"-", "0.554958132087371`"}], ",", "0", ",", "1.`", ",", "0",
|
|
",", "0", ",", "0.5549581320873711`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",",
|
|
RowBox[{"-", "0.554958132087371`"}], ",", "0", ",",
|
|
"0.554958132087371`", ",", "0", ",", "0", ",", "1.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"1.`"}], "}"}]}], "}"}]}], "}"}]], "Output",
|
|
CellChangeTimes->{
|
|
3.836781719653142*^9, 3.8367822307404757`*^9, 3.836782616818862*^9,
|
|
3.8367833567887573`*^9, {3.83682640660728*^9, 3.836826430092823*^9},
|
|
3.836826948825577*^9, 3.8368304353276787`*^9, 3.8368306086119747`*^9, {
|
|
3.837018510291731*^9, 3.837018542863357*^9}, 3.837292143278347*^9},
|
|
CellLabel->"Out[66]=",ExpressionUUID->"d464800e-27b3-43f6-b7ed-f6b02a57bf58"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"FindFace", "[",
|
|
RowBox[{"graphFromG", "[", "cube", "]"}], "]"}], "-", "1"}]], "Input",
|
|
CellChangeTimes->{{3.8367826359217863`*^9, 3.836782643868738*^9}, {
|
|
3.836783384674279*^9, 3.8367833852202873`*^9}, {3.8368263719646263`*^9,
|
|
3.8368263747397413`*^9}, 3.8368269449100313`*^9, {3.8370186297313433`*^9,
|
|
3.837018630432625*^9}},
|
|
CellLabel->"In[67]:=",ExpressionUUID->"ddd3a665-d541-435d-a556-e983f9a2a721"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "1", ",", "5", ",", "4"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "3", ",", "2", ",", "1"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "4", ",", "7", ",", "3"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"1", ",", "2", ",", "6", ",", "5"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"2", ",", "3", ",", "7", ",", "6"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"4", ",", "5", ",", "6", ",", "7"}], "}"}]}], "}"}]], "Output",
|
|
CellChangeTimes->{
|
|
3.836782644415073*^9, 3.8367833855795393`*^9, 3.836826375067278*^9,
|
|
3.836826948840948*^9, 3.836830435352667*^9, 3.8368306086321363`*^9,
|
|
3.836830914208542*^9, {3.8370185103106823`*^9, 3.837018542920718*^9},
|
|
3.837018630776206*^9, 3.837292143303321*^9},
|
|
CellLabel->"Out[67]=",ExpressionUUID->"8effbbbc-2a8c-48eb-a72e-446a24a6602e"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[{
|
|
RowBox[{
|
|
RowBox[{"root", "=",
|
|
RowBox[{"rootTupleFromG", "[",
|
|
RowBox[{"cube", ",",
|
|
RowBox[{"\"\<Exact\>\"", "->", "True"}], ",",
|
|
RowBox[{"\"\<Invert\>\"", "->", "7"}]}], "]"}]}],
|
|
";"}], "\[IndentingNewLine]",
|
|
RowBox[{
|
|
RowBox[{"Print", "[",
|
|
RowBox[{"Show", "[",
|
|
RowBox[{"graphAbbc", "[", "root", "]"}], "]"}], "]"}],
|
|
";"}], "\[IndentingNewLine]", "root"}], "Input",
|
|
CellChangeTimes->{{3.836860637004139*^9, 3.836860663919491*^9}, {
|
|
3.836860765623703*^9, 3.836860766133486*^9}, {3.8368613771052217`*^9,
|
|
3.836861378016529*^9}, {3.836862527871093*^9, 3.836862533197001*^9}, {
|
|
3.8370185224891043`*^9, 3.837018526115962*^9}, {3.8370185575020027`*^9,
|
|
3.837018577404889*^9}},
|
|
CellLabel->"In[68]:=",ExpressionUUID->"74f40533-5cef-42bc-84d6-0432307eb122"],
|
|
|
|
Cell[BoxData[
|
|
GraphicsBox[{
|
|
CircleBox[
|
|
NCache[{Rational[-1, 2] 2^Rational[-1, 2], Rational[
|
|
31, 80]}, {-0.35355339059327373`, 0.3875}], NCache[
|
|
Rational[1, 80], 0.0125]],
|
|
CircleBox[
|
|
NCache[{Rational[-1, 2] 2^Rational[-1, 2], Rational[
|
|
17, 48]}, {-0.35355339059327373`, 0.3541666666666667}], NCache[
|
|
Rational[1, 48], 0.020833333333333332`]],
|
|
CircleBox[
|
|
NCache[{Rational[-1, 5] 2^Rational[1, 2], Rational[
|
|
7, 20]}, {-0.28284271247461906`, 0.35}], NCache[Rational[1, 20], 0.05]],
|
|
CircleBox[
|
|
NCache[{Rational[-3, 13] 2^Rational[1, 2], Rational[
|
|
21, 52]}, {-0.32635697593225277`, 0.40384615384615385`}], NCache[
|
|
Rational[1, 52], 0.019230769230769232`]],
|
|
CircleBox[
|
|
NCache[{Rational[-7, 13] 2^Rational[-1, 2], Rational[
|
|
21, 52]}, {-0.38074980525429475`, 0.40384615384615385`}], NCache[
|
|
Rational[1, 52], 0.019230769230769232`]],
|
|
CircleBox[
|
|
NCache[{Rational[-3, 5] 2^Rational[-1, 2], Rational[
|
|
7, 20]}, {-0.42426406871192845`, 0.35}], NCache[Rational[1, 20], 0.05]],
|
|
CircleBox[
|
|
NCache[{Rational[-1, 2] 2^Rational[-1, 2], Rational[
|
|
3, 8]}, {-0.35355339059327373`, 0.375}], NCache[Rational[1, 8], 0.125]],
|
|
CircleBox[
|
|
NCache[{Rational[-1, 2] 2^Rational[-1, 2], Rational[
|
|
11, 24]}, {-0.35355339059327373`, 0.4583333333333333}], NCache[
|
|
Rational[1, 24], 0.041666666666666664`]]}]], "Print",
|
|
CellChangeTimes->{{3.837018573687291*^9, 3.837018577934717*^9},
|
|
3.837292143332213*^9},
|
|
CellLabel->
|
|
"During evaluation of \
|
|
In[68]:=",ExpressionUUID->"a09f1a00-a905-497c-9b40-b1ee8d42bb37"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"22", ",", "80", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "20"}], " ",
|
|
SqrtBox["2"]}], ",", "31"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"12", ",", "48", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "12"}], " ",
|
|
SqrtBox["2"]}], ",", "17"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"4", ",", "20", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "4"}], " ",
|
|
SqrtBox["2"]}], ",", "7"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"14", ",", "52", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "12"}], " ",
|
|
SqrtBox["2"]}], ",", "21"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"16", ",", "52", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "14"}], " ",
|
|
SqrtBox["2"]}], ",", "21"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6", ",", "20", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "6"}], " ",
|
|
SqrtBox["2"]}], ",", "7"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "2"}], ",",
|
|
RowBox[{"-", "8"}], ",",
|
|
RowBox[{"2", " ",
|
|
SqrtBox["2"]}], ",",
|
|
RowBox[{"-", "3"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"8", ",", "24", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "6"}], " ",
|
|
SqrtBox["2"]}], ",", "11"}], "}"}]}], "}"}]], "Output",
|
|
CellChangeTimes->{{3.836860643338293*^9, 3.8368606643365726`*^9},
|
|
3.836860767752082*^9, 3.836861378401307*^9, 3.836862086260186*^9,
|
|
3.836862533676415*^9, {3.837018510326604*^9, 3.837018542955021*^9}, {
|
|
3.837018573689486*^9, 3.83701857794104*^9}, 3.837292143339044*^9},
|
|
CellLabel->"Out[70]=",ExpressionUUID->"2f347bab-dba3-4640-a956-79a2d4f0fb1a"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"root", "//", "N"}]], "Input",
|
|
CellChangeTimes->{{3.837018605506709*^9, 3.837018606427718*^9}},
|
|
CellLabel->"In[71]:=",ExpressionUUID->"adbe170c-01cd-4c8c-8b26-64a98a5b6af3"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"22.`", ",", "80.`", ",",
|
|
RowBox[{"-", "28.284271247461902`"}], ",", "31.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"12.`", ",", "48.`", ",",
|
|
RowBox[{"-", "16.970562748477143`"}], ",", "17.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"4.`", ",", "20.`", ",",
|
|
RowBox[{"-", "5.656854249492381`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"14.`", ",", "52.`", ",",
|
|
RowBox[{"-", "16.970562748477143`"}], ",", "21.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"16.`", ",", "52.`", ",",
|
|
RowBox[{"-", "19.79898987322333`"}], ",", "21.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6.`", ",", "20.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "2.`"}], ",",
|
|
RowBox[{"-", "8.`"}], ",", "2.8284271247461903`", ",",
|
|
RowBox[{"-", "3.`"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"8.`", ",", "24.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "11.`"}], "}"}]}],
|
|
"}"}]], "Output",
|
|
CellChangeTimes->{3.837018606809472*^9, 3.8372921433592587`*^9},
|
|
CellLabel->"Out[71]=",ExpressionUUID->"709c30e9-a35f-4fdd-8561-4951d790e7e9"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"alg", "=",
|
|
RowBox[{"RootApproximant", "[",
|
|
RowBox[{"findGeneratorsFromG", "[", "cube", "]"}], "]"}]}],
|
|
";"}]], "Input",
|
|
CellChangeTimes->{{3.8368606754023857`*^9, 3.836860701506312*^9},
|
|
3.8368607477896767`*^9, {3.836861383320847*^9, 3.836861384341001*^9},
|
|
3.837018536279613*^9},
|
|
CellLabel->"In[72]:=",ExpressionUUID->"6c3f7ffd-26f3-488f-886c-23454998ed6a"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData["alg"], "Input",
|
|
CellChangeTimes->{{3.837018645737122*^9, 3.8370186520234833`*^9}},
|
|
CellLabel->"In[73]:=",ExpressionUUID->"f2994baa-da4a-4e16-8ce5-73dfa6c93290"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "1", ",", "0", ",", "0", ",", "1", ",",
|
|
RowBox[{"-", "1"}], ",", "0", ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "3", ",", "0", ",", "0", ",", "2", ",", "1", ",",
|
|
RowBox[{"-", "1"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "3", ",", "0", ",", "0", ",", "3", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "2", ",", "0", ",", "0", ",", "2", ",", "2", ",",
|
|
RowBox[{"-", "1"}], ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "2", ",", "0", ",", "0", ",", "3", ",", "1", ",",
|
|
RowBox[{"-", "1"}], ",", "0"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "1", ",", "0", ",", "1", ",", "0", ",", "0",
|
|
",", "0", ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1", ",", "2", ",", "0", ",", "3", ",", "0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "3", ",", "0", ",", "3", ",", "0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "3", ",", "0", ",", "4", ",", "0", ",", "0",
|
|
",", "0", ",",
|
|
RowBox[{"-", "1"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "2", ",", "0", ",", "4", ",", "0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}]}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"4", ",",
|
|
RowBox[{"-", "1"}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
|
|
",", "2"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"4", ",",
|
|
RowBox[{"-", "1"}], ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "0", ",", "0", ",", "3"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"1", ",", "0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "0", ",", "0", ",", "1"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"3", ",",
|
|
RowBox[{"-", "1"}], ",", "0", ",", "0", ",", "1", ",", "0", ",", "0",
|
|
",", "2"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"3", ",",
|
|
RowBox[{"-", "1"}], ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
|
|
",", "3"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"1"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "2", ",", "2", ",", "0", ",", "0", ",", "2",
|
|
",", "0", ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "1", ",", "3", ",", "0", ",", "0", ",", "2",
|
|
",", "0", ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "1", ",", "2", ",", "0", ",", "0", ",", "3",
|
|
",", "0", ",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",",
|
|
RowBox[{"-", "1"}], ",", "1", ",", "0", ",", "0", ",", "1", ",", "0",
|
|
",", "0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "0", ",", "3", ",", "0", ",", "0", ",", "3",
|
|
",", "0", ",", "0"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "0", ",", "4", ",", "0", ",", "0", ",", "0",
|
|
",",
|
|
RowBox[{"-", "2"}], ",", "4"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "0", ",", "4", ",", "0", ",", "0", ",", "0",
|
|
",",
|
|
RowBox[{"-", "1"}], ",", "3"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",", "1", ",", "0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "1"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "0", ",", "3", ",", "0", ",", "0", ",", "0",
|
|
",",
|
|
RowBox[{"-", "1"}], ",", "4"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "1"}], ",", "0", ",", "3", ",", "0", ",", "0", ",", "0",
|
|
",", "0", ",", "3"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"1"}], "}"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "3", ",", "0", ",", "2", ",", "1"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "3", ",", "0", ",", "3", ",", "0"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "2", ",", "0", ",", "3", ",", "1"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{"0", ",", "0", ",", "0", ",",
|
|
RowBox[{"-", "1"}], ",", "2", ",", "0", ",", "2", ",", "2"}], "}"}],
|
|
",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "0", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "1", ",", "0", ",", "1", ",",
|
|
RowBox[{"-", "1"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "1", ",",
|
|
"0"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
|
|
"1"}], "}"}]}], "}"}]}], "}"}]], "Output",
|
|
CellChangeTimes->{{3.837018646638774*^9, 3.837018653016807*^9},
|
|
3.8372921436675253`*^9},
|
|
CellLabel->"Out[73]=",ExpressionUUID->"7db9785f-3672-4af8-906b-fa486e02ead5"]
|
|
}, Open ]],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{
|
|
RowBox[{"geom", "=",
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{
|
|
RowBox[{"Transpose", "[", "root", "]"}], ".",
|
|
RowBox[{"Transpose", "[", "#", "]"}], ".",
|
|
RowBox[{"PseudoInverse", "[",
|
|
RowBox[{"Transpose", "[", "root", "]"}], "]"}]}], "&"}], "/@",
|
|
"alg"}], "//", "Simplify"}]}], ";"}]], "Input",
|
|
CellChangeTimes->{{3.836861396756734*^9, 3.836861407500039*^9}, {
|
|
3.836861438320512*^9, 3.836861457101021*^9}},
|
|
CellLabel->"In[74]:=",ExpressionUUID->"770d5ee5-e393-4850-9a46-6c7de46cc618"],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"c", "=",
|
|
RowBox[{"root", "[",
|
|
RowBox[{"[",
|
|
RowBox[{"-", "1"}], "]"}], "]"}]}]], "Input",
|
|
CellChangeTimes->{{3.836862090498773*^9, 3.836862095367288*^9}},
|
|
CellLabel->"In[75]:=",ExpressionUUID->"68ee96ba-31f2-4143-bd53-307ccabc9cc0"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{"8", ",", "24", ",",
|
|
RowBox[{
|
|
RowBox[{"-", "6"}], " ",
|
|
SqrtBox["2"]}], ",", "11"}], "}"}]], "Output",
|
|
CellChangeTimes->{{3.8368620932615356`*^9, 3.836862095786551*^9},
|
|
3.836862541271953*^9, {3.8370185107163963`*^9, 3.8370185432453823`*^9},
|
|
3.8372921437368507`*^9},
|
|
CellLabel->"Out[75]=",ExpressionUUID->"358ad5ca-6dec-4316-b30f-84862b5ebec8"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"root", "//", "N"}]], "Input",
|
|
CellChangeTimes->{{3.8368625164866247`*^9, 3.836862516833157*^9}, {
|
|
3.836862635043832*^9, 3.836862640783617*^9}, {3.8368632642245083`*^9,
|
|
3.83686326457684*^9}},
|
|
CellLabel->"In[76]:=",ExpressionUUID->"f3528cd8-92c1-47b7-bb02-42e08ed49e1b"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"22.`", ",", "80.`", ",",
|
|
RowBox[{"-", "28.284271247461902`"}], ",", "31.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"12.`", ",", "48.`", ",",
|
|
RowBox[{"-", "16.970562748477143`"}], ",", "17.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"4.`", ",", "20.`", ",",
|
|
RowBox[{"-", "5.656854249492381`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"14.`", ",", "52.`", ",",
|
|
RowBox[{"-", "16.970562748477143`"}], ",", "21.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"16.`", ",", "52.`", ",",
|
|
RowBox[{"-", "19.79898987322333`"}], ",", "21.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"6.`", ",", "20.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "2.`"}], ",",
|
|
RowBox[{"-", "8.`"}], ",", "2.8284271247461903`", ",",
|
|
RowBox[{"-", "3.`"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"8.`", ",", "24.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "11.`"}], "}"}]}],
|
|
"}"}]], "Output",
|
|
CellChangeTimes->{
|
|
3.836862517142044*^9, {3.836862635581028*^9, 3.836862641160112*^9},
|
|
3.83686326503437*^9, {3.837018510773959*^9, 3.8370185433326883`*^9},
|
|
3.8372921437567043`*^9},
|
|
CellLabel->"Out[76]=",ExpressionUUID->"35bb09c2-4387-4867-9fad-4552b20f0c52"]
|
|
}, Open ]],
|
|
|
|
Cell[CellGroupData[{
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"10.`", ",", "8.`", ",",
|
|
RowBox[{"-", "5.656854249492381`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"24.`", ",", "24.`", ",",
|
|
RowBox[{"-", "16.970562748477143`"}], ",", "17.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"8.`", ",", "10.`", ",",
|
|
RowBox[{"-", "5.656854249492381`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"12.`", ",", "10.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "4.`"}], ",",
|
|
RowBox[{"-", "4.`"}], ",", "2.8284271247461903`", ",",
|
|
RowBox[{"-", "3.`"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"10.`", ",", "12.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "7.`"}], "}"}]}],
|
|
"}"}]], "Input",
|
|
CellLabel->"In[77]:=",ExpressionUUID->"240ccff6-1653-434c-8746-06b52ccf0f09"],
|
|
|
|
Cell[BoxData[
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"{",
|
|
RowBox[{"10.`", ",", "8.`", ",",
|
|
RowBox[{"-", "5.656854249492381`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"24.`", ",", "24.`", ",",
|
|
RowBox[{"-", "16.970562748477143`"}], ",", "17.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"8.`", ",", "10.`", ",",
|
|
RowBox[{"-", "5.656854249492381`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"12.`", ",", "10.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "7.`"}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{
|
|
RowBox[{"-", "4.`"}], ",",
|
|
RowBox[{"-", "4.`"}], ",", "2.8284271247461903`", ",",
|
|
RowBox[{"-", "3.`"}]}], "}"}], ",",
|
|
RowBox[{"{",
|
|
RowBox[{"10.`", ",", "12.`", ",",
|
|
RowBox[{"-", "8.485281374238571`"}], ",", "7.`"}], "}"}]}],
|
|
"}"}]], "Output",
|
|
CellChangeTimes->{{3.837018510796248*^9, 3.8370185433490953`*^9},
|
|
3.8372921437780027`*^9},
|
|
CellLabel->"Out[77]=",ExpressionUUID->"cbe19ba9-7b33-4c0f-af1a-c1d606049ebf"]
|
|
}, Open ]]
|
|
},
|
|
WindowSize->{1428., 779.25},
|
|
WindowMargins->{{6, Automatic}, {6, Automatic}},
|
|
TaggingRules->{
|
|
"WelcomeScreenSettings" -> {"FEStarting" -> False}, "TryRealOnly" -> False},
|
|
FrontEndVersion->"12.3 for Linux x86 (64-bit) (June 19, 2021)",
|
|
StyleDefinitions->"Default.nb",
|
|
ExpressionUUID->"e8622aad-0bd2-483b-a68b-2a26bc5485be"
|
|
]
|
|
(* End of Notebook Content *)
|
|
|
|
(* Internal cache information *)
|
|
(*CellTagsOutline
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*CellTagsIndex
|
|
CellTagsIndex->{}
|
|
*)
|
|
(*NotebookFileOutline
|
|
Notebook[{
|
|
Cell[558, 20, 419, 9, 29, "Input",ExpressionUUID->"e1bc883b-2413-4a7d-abe0-4a19eb3f78fd"],
|
|
Cell[980, 31, 1030, 27, 29, "Input",ExpressionUUID->"025b5df5-f2a6-4cee-a294-e76ee16e74d4"],
|
|
Cell[2013, 60, 510, 11, 29, "Input",ExpressionUUID->"54cc4a6c-be37-4091-ac21-3dfd11eb53ea"],
|
|
Cell[2526, 73, 440, 11, 29, "Input",ExpressionUUID->"d3298122-6e10-4115-8e61-a949acba4e08"],
|
|
Cell[2969, 86, 1416, 34, 29, "Input",ExpressionUUID->"4e2a5664-aeb5-4dfb-88fb-7e7839ba2141"],
|
|
Cell[4388, 122, 343, 8, 29, "Input",ExpressionUUID->"c9a1b25a-8cb3-40d1-ac83-1d2405398934"],
|
|
Cell[4734, 132, 1141, 33, 29, "Input",ExpressionUUID->"30b57c08-a123-4e7d-9b0a-b512fcfecee8"],
|
|
Cell[5878, 167, 741, 20, 29, "Input",ExpressionUUID->"e30807a9-5381-4ad1-b9fd-a6a877ae69fe"],
|
|
Cell[6622, 189, 672, 19, 29, "Input",ExpressionUUID->"d1264330-efcb-4ca7-a1c2-f6744f28eebe"],
|
|
Cell[7297, 210, 708, 19, 29, "Input",ExpressionUUID->"efd0e321-9f31-4641-bf42-f73e16044635"],
|
|
Cell[8008, 231, 548, 14, 29, "Input",ExpressionUUID->"810323e6-91cb-44f2-ad55-323fbec422eb"],
|
|
Cell[8559, 247, 702, 19, 29, "Input",ExpressionUUID->"948959db-c926-4458-9e45-ef7f3fb99ba5"],
|
|
Cell[9264, 268, 996, 28, 71, "Input",ExpressionUUID->"e7b8a43b-0fbc-4073-928d-10a091e21dd7"],
|
|
Cell[10263, 298, 4042, 107, 298, "Input",ExpressionUUID->"5cb4f612-3c02-42ac-ad57-4fb2daf3366b"],
|
|
Cell[14308, 407, 10810, 230, 422, "Input",ExpressionUUID->"df61872a-1e93-4b2b-ad66-1c8fee203402"],
|
|
Cell[25121, 639, 7334, 180, 546, "Input",ExpressionUUID->"dab3b84f-3f49-42e4-9bc4-79cb6408f946"],
|
|
Cell[32458, 821, 912, 24, 92, "Input",ExpressionUUID->"bd52b017-bd99-4bdf-9126-b7c62804c9f2"],
|
|
Cell[33373, 847, 443, 11, 29, "Input",ExpressionUUID->"5ef8c91b-dd7a-440d-b44e-513ae9efffca"],
|
|
Cell[33819, 860, 5511, 134, 289, "Input",ExpressionUUID->"2ffd6cba-1ba3-4c73-8457-ef7fc5958282"],
|
|
Cell[39333, 996, 5346, 111, 174, "Input",ExpressionUUID->"4186f080-27d0-474f-9433-7cdeb3a7a49d"],
|
|
Cell[CellGroupData[{
|
|
Cell[44704, 1111, 357, 5, 29, "Input",ExpressionUUID->"a546161f-063b-4b38-811b-1f5d9ac28696"],
|
|
Cell[45064, 1118, 3008, 42, 33, "Output",ExpressionUUID->"7f8ac2d2-cd59-46b6-a728-3bc3e2998507"]
|
|
}, Open ]],
|
|
Cell[48087, 1163, 2787, 67, 283, "Input",ExpressionUUID->"3971d33a-d19f-42ea-9b17-0801f7a59659"],
|
|
Cell[50877, 1232, 3212, 89, 209, "Input",ExpressionUUID->"3db5443f-dda7-4082-8ab7-96e274634389"],
|
|
Cell[54092, 1323, 1383, 34, 116, "Input",ExpressionUUID->"52eb731d-d72b-4ff7-afc4-5691e9750e37"],
|
|
Cell[55478, 1359, 843, 23, 65, "Input",ExpressionUUID->"6e172e8f-4972-4597-9559-948bf406a2c4"],
|
|
Cell[56324, 1384, 1581, 60, 196, "Input",ExpressionUUID->"897b1d52-af46-4e1c-8207-c0acc9e2c1f3"],
|
|
Cell[57908, 1446, 1861, 70, 147, "Input",ExpressionUUID->"a88926ed-6f50-457b-9480-401929196ff8"],
|
|
Cell[59772, 1518, 1550, 60, 137, "Input",ExpressionUUID->"ac2fc7fb-1a08-4495-8c53-210ad6f3664b"],
|
|
Cell[61325, 1580, 9993, 307, 443, "Input",ExpressionUUID->"609d9edf-fd45-4e4e-aae5-f4d3cc6359f5"],
|
|
Cell[71321, 1889, 4066, 151, 216, "Input",ExpressionUUID->"294e535d-e3a7-4a1d-8c24-303f127653b2"],
|
|
Cell[75390, 2042, 7538, 274, 221, "Input",ExpressionUUID->"45d67d9a-02e6-48ac-8e3a-435a001307e6"],
|
|
Cell[82931, 2318, 5347, 201, 250, "Input",ExpressionUUID->"65e20246-7792-4c97-b2ee-553e60d6428e"],
|
|
Cell[88281, 2521, 49457, 1063, 2753, "Input",ExpressionUUID->"1c98ab0f-7be0-4b82-83f8-0a1739369b4d"],
|
|
Cell[137741, 3586, 172929, 3666, 9909, "Input",ExpressionUUID->"239a4292-049d-4293-9674-7e78c28ca011"],
|
|
Cell[310673, 7254, 1486, 55, 125, "Input",ExpressionUUID->"b6c05a3c-d9ef-41f8-9987-9bf57f74096c"],
|
|
Cell[312162, 7311, 42950, 1327, 834, "Input",ExpressionUUID->"851b8d35-e5c6-40f2-826f-018f704c8a73"],
|
|
Cell[355115, 8640, 350, 7, 29, "Input",ExpressionUUID->"c9c3f8c5-57c2-442b-83c1-93d4627643e0"],
|
|
Cell[CellGroupData[{
|
|
Cell[355490, 8651, 328, 5, 29, "Input",ExpressionUUID->"4d7d714e-f2ed-41ab-a3c1-9f7a73b68b46"],
|
|
Cell[355821, 8658, 3401, 74, 374, "Output",ExpressionUUID->"e8c2f1fb-ecfc-47d3-817b-447b50c2d140"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[359259, 8737, 926, 18, 51, "Input",ExpressionUUID->"64697f86-4592-4a50-b42f-8039aaa8a819"],
|
|
Cell[360188, 8757, 1180, 20, 376, "Output",ExpressionUUID->"9ed73430-1920-472c-a0b4-4414f74c62bd"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[361405, 8782, 179, 2, 29, "Input",ExpressionUUID->"a12d9058-1edd-4fb6-b435-8ceb29d8c529"],
|
|
Cell[361587, 8786, 1826, 41, 55, "Output",ExpressionUUID->"98a8d185-fc9b-486a-b05c-667150a96589"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[363450, 8832, 522, 9, 29, "Input",ExpressionUUID->"6c14882f-a3a6-490a-822b-b77dc0b9345c"],
|
|
Cell[363975, 8843, 13115, 317, 343, "Output",ExpressionUUID->"d464800e-27b3-43f6-b7ed-f6b02a57bf58"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[377127, 9165, 454, 8, 29, "Input",ExpressionUUID->"ddd3a665-d541-435d-a556-e983f9a2a721"],
|
|
Cell[377584, 9175, 891, 20, 33, "Output",ExpressionUUID->"8effbbbc-2a8c-48eb-a72e-446a24a6602e"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[378512, 9200, 814, 18, 71, "Input",ExpressionUUID->"74f40533-5cef-42bc-84d6-0432307eb122"],
|
|
Cell[379329, 9220, 1606, 35, 367, "Print",ExpressionUUID->"a09f1a00-a905-497c-9b40-b1ee8d42bb37"],
|
|
Cell[380938, 9257, 1618, 49, 36, "Output",ExpressionUUID->"2f347bab-dba3-4640-a956-79a2d4f0fb1a"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[382593, 9311, 198, 3, 29, "Input",ExpressionUUID->"adbe170c-01cd-4c8c-8b26-64a98a5b6af3"],
|
|
Cell[382794, 9316, 1247, 31, 55, "Output",ExpressionUUID->"709c30e9-a35f-4fdd-8561-4951d790e7e9"]
|
|
}, Open ]],
|
|
Cell[384056, 9350, 413, 9, 29, "Input",ExpressionUUID->"6c3f7ffd-26f3-488f-886c-23454998ed6a"],
|
|
Cell[CellGroupData[{
|
|
Cell[384494, 9363, 176, 2, 29, "Input",ExpressionUUID->"f2994baa-da4a-4e16-8ce5-73dfa6c93290"],
|
|
Cell[384673, 9367, 7603, 206, 199, "Output",ExpressionUUID->"7db9785f-3672-4af8-906b-fa486e02ead5"]
|
|
}, Open ]],
|
|
Cell[392291, 9576, 563, 14, 29, "Input",ExpressionUUID->"770d5ee5-e393-4850-9a46-6c7de46cc618"],
|
|
Cell[CellGroupData[{
|
|
Cell[392879, 9594, 269, 6, 29, "Input",ExpressionUUID->"68ee96ba-31f2-4143-bd53-307ccabc9cc0"],
|
|
Cell[393151, 9602, 404, 9, 36, "Output",ExpressionUUID->"358ad5ca-6dec-4316-b30f-84862b5ebec8"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[393592, 9616, 299, 5, 29, "Input",ExpressionUUID->"f3528cd8-92c1-47b7-bb02-42e08ed49e1b"],
|
|
Cell[393894, 9623, 1373, 34, 55, "Output",ExpressionUUID->"35bb09c2-4387-4867-9fad-4552b20f0c52"]
|
|
}, Open ]],
|
|
Cell[CellGroupData[{
|
|
Cell[395304, 9662, 925, 24, 51, "Input",ExpressionUUID->"240ccff6-1653-434c-8746-06b52ccf0f09"],
|
|
Cell[396232, 9688, 1022, 26, 33, "Output",ExpressionUUID->"cbe19ba9-7b33-4c0f-af1a-c1d606049ebf"]
|
|
}, Open ]]
|
|
}
|
|
]
|
|
*)
|
|
|