(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 321346, 7286] NotebookOptionsPosition[ 318917, 7249] NotebookOutlinePosition[ 319289, 7265] CellTagsIndexPosition[ 319246, 7262] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"F", "[", "x_", "]"}], ":=", RowBox[{ FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", RowBox[{"(", RowBox[{ RowBox[{"PolyLog", "[", RowBox[{"2", ",", RowBox[{ RowBox[{"-", "\[ImaginaryI]"}], " ", SuperscriptBox["\[ExponentialE]", "x"]}]}], "]"}], "-", RowBox[{"PolyLog", "[", RowBox[{"2", ",", RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", "x"]}]}], "]"}]}], ")"}]}]}]], "Input", CellChangeTimes->{{3.737196866673444*^9, 3.737196875196076*^9}}, CellLabel->"In[1]:=",ExpressionUUID->"748eabe5-c3d2-4801-b8b7-aa7a789097c7"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"G3", "[", RowBox[{"a_", ",", "b_"}], "]"}], ":=", RowBox[{ RowBox[{"F", "[", RowBox[{"a", "-", "b"}], "]"}], "+", RowBox[{"F", "[", RowBox[{"b", "-", "a"}], "]"}], "-", RowBox[{ FractionBox["\[Pi]", "2"], RowBox[{"(", RowBox[{"a", "+", "b"}], ")"}]}]}]}], ";"}]], "Input", CellChangeTimes->{ 3.737201965981352*^9, {3.737202002231657*^9, 3.737202033142387*^9}, { 3.737202126146511*^9, 3.7372021534299583`*^9}, {3.7378972597648673`*^9, 3.7378972820313244`*^9}, {3.737897408257219*^9, 3.7378974198940997`*^9}}, CellLabel->"In[2]:=",ExpressionUUID->"0ab29ce4-3405-44f4-bf4a-16ef730ff686"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"EnergySetup", "[", RowBox[{"n_", ",", "FacesCW_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "i", ",", "rhoV", ",", "rhoF", ",", "include", ",", "LineFaces", ",", "f", ",", "Faces", ",", "NM", ",", "nonlinefaces", ",", "radii", ",", "RADII"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"Faces", "=", RowBox[{"Sort", "/@", "FacesCW"}]}], ";", "\[IndentingNewLine]", RowBox[{"f", "=", RowBox[{"Length", "[", "Faces", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"LineFaces", "=", RowBox[{"{", "}"}]}], ";", RowBox[{"rhoV", "=", RowBox[{"Table", "[", RowBox[{ SubscriptBox["rV", "i"], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"n", "-", "2"}]}], "}"}]}], "]"}]}], ";", RowBox[{"rhoF", "=", RowBox[{"Table", "[", RowBox[{ SubscriptBox["rF", "i"], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"f", "-", "2"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"include", " ", "=", " ", RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"nonlinefaces", "=", RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "f"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"-", "2"}]}], "]"}], "]"}], "\[Equal]", RowBox[{"n", "-", "1"}]}], "&&", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"i", ",", RowBox[{"-", "1"}]}], "]"}], "]"}], "\[Equal]", "n"}]}], ")"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "then", " ", "*)"}], " ", RowBox[{ RowBox[{"AppendTo", "[", RowBox[{"include", ",", "i"}], "]"}], ";", RowBox[{"AppendTo", "[", RowBox[{"nonlinefaces", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "else", " ", "*)"}], " ", RowBox[{"AppendTo", "[", RowBox[{"LineFaces", ",", "i"}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"NM", "=", RowBox[{"NMinimize", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"k", "=", "1"}], RowBox[{"f", "-", "2"}]], RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"i", "=", "1"}], RowBox[{"Length", "[", RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"include", "[", RowBox[{"[", "k", "]"}], "]"}], "]"}], "]"}], "]"}]], RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{ RowBox[{"include", "[", RowBox[{"[", "k", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "<", RowBox[{"n", "-", "1"}]}], ",", RowBox[{"G3", "[", RowBox[{ SubscriptBox["rV", RowBox[{"Faces", "[", RowBox[{"[", RowBox[{ RowBox[{"include", "[", RowBox[{"[", "k", "]"}], "]"}], ",", "i"}], "]"}], "]"}]], ",", SubscriptBox["rF", "k"]}], "]"}], ",", "0"}], "]"}]}]}], "+", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"i", "=", "1"}], RowBox[{"n", "-", "2"}]], RowBox[{ SubscriptBox["rV", "i"], "\[Pi]", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Flatten", "@", RowBox[{"Table", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "m", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"m", ",", "1", ",", "2"}], "}"}]}], "]"}]}], ",", "i"}], "]"}], ",", RowBox[{"(*", " ", "then", " ", "*)"}], " ", "1", ",", RowBox[{"(*", " ", "else", " ", "*)"}], " ", "2"}], "]"}]}]}], "+", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"j", "=", "1"}], RowBox[{"f", "-", "2"}]], RowBox[{ SubscriptBox["rF", "j"], "\[Pi]", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"include", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"n", "-", "1"}]}], "]"}], "||", RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", RowBox[{"include", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}], ",", "n"}], "]"}]}], ",", RowBox[{"(*", " ", "then", " ", "*)"}], " ", "1", ",", RowBox[{"(*", " ", "else", " ", "*)"}], " ", "2"}], "]"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"i", "=", "1"}], RowBox[{"n", "-", "2"}]], SubscriptBox["rV", "i"]}], "+", RowBox[{ UnderoverscriptBox["\[Sum]", RowBox[{"j", "=", "1"}], RowBox[{"f", "-", "2"}]], SubscriptBox["rF", "j"]}]}], "\[Equal]", "0"}]}], "}"}], ",", RowBox[{"Join", "[", RowBox[{"rhoV", ",", "rhoF"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"RADII", "=", RowBox[{"Exp", "[", RowBox[{"Re", "[", RowBox[{ RowBox[{"Join", "[", RowBox[{"rhoV", ",", "rhoF"}], "]"}], "/.", RowBox[{"(", RowBox[{"NM", "[", RowBox[{"[", "2", "]"}], "]"}], ")"}]}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"RADII", "/=", RowBox[{"RADII", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"radii", "=", RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"n", "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"radii", "[", "i", "]"}], "=", RowBox[{"RADII", "[", RowBox[{"[", "i", "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "nonlinefaces", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"radii", "[", RowBox[{"nonlinefaces", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"RADII", "[", RowBox[{"[", RowBox[{"n", "-", "2", "+", "i"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"radii", ",", "LineFaces"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7372045119396753`*^9, 3.7372046545187597`*^9}, { 3.737204685631832*^9, 3.7372047308167467`*^9}, {3.737204773625032*^9, 3.7372048110040503`*^9}, {3.737204842780097*^9, 3.737204924806987*^9}, { 3.7372050053122187`*^9, 3.737205008911607*^9}, {3.73720504639081*^9, 3.7372051214979887`*^9}, {3.7372051736233463`*^9, 3.737205179673382*^9}, { 3.737205261713398*^9, 3.7372052618754*^9}, {3.737205306100531*^9, 3.737205373527009*^9}, {3.737205491627762*^9, 3.737205535178033*^9}, { 3.737206922016953*^9, 3.737206989324239*^9}, {3.737207032865409*^9, 3.737207073209803*^9}, {3.737284915566703*^9, 3.737284955928123*^9}, { 3.737371291071519*^9, 3.7373713419977837`*^9}, {3.737468221809287*^9, 3.737468222498644*^9}, 3.737468268451545*^9, {3.7374683559250183`*^9, 3.737468513179357*^9}, {3.737468554130938*^9, 3.7374685561663094`*^9}, { 3.7374686045167637`*^9, 3.737468621354309*^9}, {3.737468670066434*^9, 3.737468700374711*^9}, {3.73746873598547*^9, 3.737468789149178*^9}, { 3.737469118685132*^9, 3.737469121422579*^9}, {3.737891244695794*^9, 3.737891247299219*^9}, {3.737995135349449*^9, 3.73799513678258*^9}}, CellLabel->"In[3]:=",ExpressionUUID->"72e544ec-21b3-4511-8714-78e40bf96f8f"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Boundary", "[", RowBox[{"n_", ",", "FacesCW_", ",", "LineFaces_", ",", "radii_", ",", RowBox[{"\[Epsilon]_:", "0"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "i", ",", "j", ",", "faces", ",", "vertices", ",", "lastvisited", ",", "d", ",", "h", ",", "H", ",", "breaker", ",", "unvisited", ",", "f", ",", "endcircle", ",", "ComputeEndcircle", ",", "ComputeEndcircle2", ",", "delete"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"unvisited", " ", "=", "FacesCW"}], ";", RowBox[{"(*", RowBox[{ "Keeps", " ", "track", " ", "of", " ", "the", " ", "faces", " ", "we", " ", RowBox[{"haven", "'"}], "t", " ", "visited"}], "*)"}], "\[IndentingNewLine]", RowBox[{"f", "=", RowBox[{"Length", "[", "FacesCW", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"faces", "=", RowBox[{"<|", "|>"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"centers", " ", "of", " ", "face", " ", "circles", " ", RowBox[{"(", RowBox[{ RowBox[{"or", " ", "normals"}], ",", " ", RowBox[{"for", " ", "lines"}]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "f"}], ",", RowBox[{"i", "++"}], ",", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"vertices", "=", RowBox[{"<|", "|>"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"centers", " ", "of", " ", "vertex", " ", "circles", " ", RowBox[{"(", RowBox[{ RowBox[{"or", " ", "normals"}], ",", " ", RowBox[{"for", " ", "lines"}]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"n", "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "Radii", " ", "is", " ", "an", " ", "assoc", " ", "from", " ", "v"}], "\[Rule]", RowBox[{ RowBox[{"rad", " ", "and", " ", "facelist"}], "\[Rule]", "rad"}]}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Vertex", " ", "circles", " ", "going", " ", "vertically", " ", "upwards", " ", "along", " ", "first", " ", "FaceLine"}], "*)"}], "\[IndentingNewLine]", RowBox[{"h", "=", "0"}], ";", " ", RowBox[{"(*", " ", RowBox[{"height", " ", "along", " ", "the", " ", "left", " ", "line"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{ RowBox[{"Length", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "-", "2"}]}], RowBox[{"(*", RowBox[{ "Number", " ", "of", " ", "vertex", " ", "circles", " ", "that", " ", "lie", " ", "along", " ", "first", " ", "LineFace"}], "*)"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vertices", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{"h", "+", RowBox[{"radii", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}]}]}], "}"}]}], ";", RowBox[{"(*", RowBox[{ "Set", " ", "the", " ", "center", " ", "of", " ", "this", " ", "vertex", " ", "circle"}], "*)"}], "\[IndentingNewLine]", RowBox[{"h", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "]"}]}]}]}]}], "]"}], ";", RowBox[{"(*", RowBox[{ "Keeps", " ", "track", " ", "of", " ", "our", " ", "cumulative", " ", "height", " ", "as", " ", "we", " ", "climb", " ", "up", " ", "the", " ", "first", " ", "FaceLine"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"unvisited", "=", RowBox[{"Delete", "[", RowBox[{"unvisited", ",", RowBox[{"Position", "[", RowBox[{"unvisited", ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"d", "=", "0"}], ";", RowBox[{"(*", RowBox[{"Horizontal", " ", "distance"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ComputeEndcircle", "[", RowBox[{"prev_", ",", "face_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Returns", " ", "which", " ", "vertex", " ", "circle", " ", "we", " ", "calculated", " ", "last", " ", "based", " ", "on", " ", "previous", " ", "vertex", " ", "circle", " ", "and", " ", "face"}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", RowBox[{"n", "-", "1"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], "\[Equal]", "prev"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "then", "*)"}], RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", RowBox[{"n", "-", "1"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "else", "*)"}], " ", RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", RowBox[{"n", "-", "1"}]}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle", "[", RowBox[{"n", ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], ";", RowBox[{"(*", RowBox[{ RowBox[{ "Previous", " ", "vertex", " ", "circle", " ", "is", " ", "bottom", " ", "line"}], ",", " ", RowBox[{"face", " ", "is", " ", "first", " ", "FaceLine"}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Face", " ", "circles", " ", "going", " ", "horizontally", " ", "across", " ", "upper", " ", "vertex", " ", "line"}], "*)"}], "\[IndentingNewLine]", RowBox[{"breaker", "=", "True"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "f"}], " ", ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "unvisited", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"n", "-", "1"}]}], "]"}], ",", " ", RowBox[{"(*", RowBox[{ RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{"circle", " ", "contains", " ", "n"}], "-", "1"}], ",", " ", RowBox[{ "so", " ", "it", " ", "is", " ", "on", " ", "the", " ", "upper", " ", "vertex", " ", "line"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", RowBox[{"ComputeEndcircle", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{ "circle", " ", "also", " ", "contains", " ", "the", " ", "vertex", " ", "right", " ", "before", " ", "n"}], "-", RowBox[{ "1", " ", "to", " ", "ensure", " ", "we", " ", "are", " ", "going", " ", "horizontally", " ", "across", " ", "in", " ", "the", " ", "right", " ", "order"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"If", " ", RowBox[{"we", "'"}], "ve", " ", "reached", " ", "the", " ", "second", " ", "faceline"}], ",", " ", RowBox[{"then", " ", "do", " ", RowBox[{"nothing", "--"}], "find", " ", "the", " ", "other", " ", "face", " ", "circle", " ", "containing", " ", "endcircle"}]}], "*)"}], "\[IndentingNewLine]", ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "else", " ", "if", " ", "the", " ", "face", " ", "circle", " ", "is", " ", "not", " ", "a", " ", "line"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", "h"}], "}"}]}], ";", " ", RowBox[{"(*", RowBox[{ "Set", " ", "the", " ", "center", " ", "of", " ", "this", " ", "face", " ", "circle"}], "*)"}], "\[IndentingNewLine]", RowBox[{"d", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}]}], ";", " ", RowBox[{"(*", " ", RowBox[{ "update", " ", "how", " ", "far", " ", "along", " ", "the", " ", "top", " ", "line", " ", "we", " ", "are"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ";", RowBox[{"(*", RowBox[{"Update", " ", "endcircle"}], "*)"}], "\[IndentingNewLine]", RowBox[{"unvisited", "=", RowBox[{"Delete", "[", RowBox[{"unvisited", ",", "i"}], "]"}]}], ";"}]}], "]"}]}], " ", RowBox[{"(*", " ", RowBox[{ "remove", " ", "that", " ", "face", " ", "from", " ", "the", " ", "unvisited", " ", "list"}], " ", "*)"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "Vertex", " ", "circles", " ", "along", " ", "the", " ", "second", " ", "FaceLine"}], ",", " ", RowBox[{"climbing", " ", "vertically", " ", "upwards"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"h", "=", "0"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{ RowBox[{"Length", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "]"}], "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"vertices", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"d", ",", RowBox[{"h", "+", RowBox[{"radii", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}]}]}], "}"}]}], ";", RowBox[{"h", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{ RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], ",", "i"}], "]"}], "]"}], "]"}], "]"}]}]}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"H", "=", "h"}], ";", "\[IndentingNewLine]", RowBox[{"h", "=", "0"}], ";", RowBox[{"(*", RowBox[{"Reset", " ", "height"}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"ComputeEndcircle2", "[", RowBox[{"prev_", ",", "face_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", "n"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], "\[Equal]", "prev"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "then", "*)"}], RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", "n"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", "else", "*)"}], " ", RowBox[{"face", "[", RowBox[{"[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Position", "[", RowBox[{"face", ",", "n"}], "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "1"}], "]"}], "]"}], "-", "2"}], ",", RowBox[{"Length", "[", "face", "]"}]}], "]"}], "+", "1"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle2", "[", RowBox[{ RowBox[{"n", "-", "1"}], ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{ "Face", " ", "circles", " ", "along", " ", "lower", " ", "vertex", " ", "line"}], ",", " ", RowBox[{ "moving", " ", "horizontally", " ", "from", " ", "origin", " ", "to", " ", "second", " ", "FaceLine"}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"d", "=", "0"}], ";", RowBox[{"(*", RowBox[{"Reset", " ", "distance"}], "*)"}], "\[IndentingNewLine]", RowBox[{"breaker", "=", "True"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "f"}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "unvisited", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "n"}], "]"}], ",", " ", RowBox[{"(*", " ", RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{"circle", " ", "contains", " ", "n"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "endcircle"}], RowBox[{"(*", " ", RowBox[{"ComputeEndcircle2", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], " ", "*)"}], "]"}], ",", RowBox[{"(*", " ", RowBox[{ RowBox[{"determine", " ", "if", " ", "this", " ", "face"}], "-", RowBox[{ "cirlce", " ", "also", " ", "contains", " ", "the", " ", "vertex", " ", "right", " ", "before", " ", "n"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"If", " ", RowBox[{"we", "'"}], "ve", " ", "reached", " ", "the", " ", "second", " ", "faceline"}], ",", " ", RowBox[{"then", " ", "do", " ", "nothing"}]}], "*)"}], "\[IndentingNewLine]", ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "else", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", "h"}], "}"}]}], ";", " ", RowBox[{"(*", " ", RowBox[{"then", " ", RowBox[{"we", "'"}], "ll", " ", "make", " ", "this", " ", RowBox[{"face", "'"}], "s", " ", "center", " ", "be", " ", "where", " ", "we", " ", "know", " ", "it", " ", "is"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"d", "+=", RowBox[{"2", RowBox[{"radii", "[", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}]}], ";", " ", RowBox[{"(*", " ", RowBox[{ "update", " ", "how", " ", "far", " ", "along", " ", "the", " ", "bottom", " ", "line", " ", "we", " ", "are"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"endcircle", "=", RowBox[{"ComputeEndcircle2", "[", RowBox[{"endcircle", ",", RowBox[{"unvisited", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"unvisited", "=", RowBox[{"Delete", "[", RowBox[{"unvisited", ",", "i"}], "]"}]}], ";"}]}], "]"}]}], " ", RowBox[{"(*", " ", RowBox[{ "remove", " ", "that", " ", "face", " ", "from", " ", "the", " ", "unvisited", " ", "list"}], " ", "*)"}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ "Set", " ", "the", " ", "normals", " ", "of", " ", "the", " ", "vertex", " ", "lines", " ", "and", " ", "face", " ", "lines"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0"}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", "n", "]"}], "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "1"}]}], "}"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", RowBox[{"n", "-", "1"}], "]"}], "=", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "faces", ",", "vertices", ",", "radii", ",", "d", ",", "H", ",", "n", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "0"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "]"}], "*=", RowBox[{"-", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "]"}], "*=", RowBox[{"-", "1"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"i", "\[Equal]", RowBox[{"n", "-", "1"}]}], "||", RowBox[{"i", "\[Equal]", "n"}]}], ",", "\[IndentingNewLine]", ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "d"}], "]"}], "\[LessEqual]", "\[Epsilon]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "=", RowBox[{"{", RowBox[{"0", ",", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "0"}], "]"}], "\[LessEqual]", "\[Epsilon]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "=", RowBox[{"{", RowBox[{"d", ",", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}]}], "]"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Return", " ", "the", " ", RowBox[{"assoc", "'"}], "s", " ", "of", " ", "the", " ", "faces", " ", "to", " ", "their", " ", "centers", " ", "and", " ", "vertices", " ", "to", " ", "their", " ", "centers"}], "*)"}], "\[IndentingNewLine]", RowBox[{"{", RowBox[{"vertices", ",", "faces", ",", "d", ",", "H"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.737219030683413*^9, 3.737219068499385*^9}, { 3.737219129031519*^9, 3.737219157331717*^9}, {3.737219214776095*^9, 3.737219232499251*^9}, {3.737219530428797*^9, 3.737219737723432*^9}, { 3.737219973681823*^9, 3.737219981058498*^9}, {3.7372852522441998`*^9, 3.737285273052194*^9}, {3.737285379557729*^9, 3.7372853808850813`*^9}, { 3.737285506667365*^9, 3.737285515803762*^9}, {3.7372856044249487`*^9, 3.737285632285976*^9}, {3.7372857006889677`*^9, 3.7372857800137577`*^9}, { 3.73728584887117*^9, 3.737285857200169*^9}, {3.737286074306966*^9, 3.7372860829425373`*^9}, {3.7372861272847137`*^9, 3.737286147655734*^9}, { 3.737286180526772*^9, 3.737286183012919*^9}, {3.737286465705851*^9, 3.7372864888059*^9}, {3.7372865215606728`*^9, 3.737286606697309*^9}, { 3.737286645970365*^9, 3.737286648042437*^9}, {3.737286686140306*^9, 3.7372867642027607`*^9}, {3.737287269374832*^9, 3.737287342750917*^9}, { 3.737287384822444*^9, 3.7372877639349957`*^9}, {3.737287798168841*^9, 3.737287798698641*^9}, {3.737287874201215*^9, 3.737287886754616*^9}, { 3.73728794855105*^9, 3.73728794906709*^9}, {3.737287984087804*^9, 3.737287984258391*^9}, {3.737288167935055*^9, 3.7372881688958406`*^9}, { 3.737288229464828*^9, 3.7372884829941387`*^9}, {3.7372889651024017`*^9, 3.737289028710766*^9}, {3.73728913478118*^9, 3.7372891349574013`*^9}, { 3.737289176488153*^9, 3.7372892189711437`*^9}, {3.737289296434997*^9, 3.737289307920455*^9}, {3.737289377154367*^9, 3.7372893780167713`*^9}, { 3.73728946731621*^9, 3.7372894685890083`*^9}, {3.737289519964464*^9, 3.7372895646104527`*^9}, {3.737289627498472*^9, 3.7372896504948683`*^9}, { 3.737289698936853*^9, 3.7372897006060762`*^9}, {3.737289761143084*^9, 3.737289790713337*^9}, {3.737289852057372*^9, 3.737289856144655*^9}, { 3.7372899307846327`*^9, 3.737289954524984*^9}, {3.737290111472128*^9, 3.737290137729048*^9}, {3.7372903101204*^9, 3.7372903238682327`*^9}, { 3.737290363021036*^9, 3.737290395639821*^9}, {3.737290434642714*^9, 3.737290436215727*^9}, {3.737290481178443*^9, 3.737290524071663*^9}, { 3.737290651768982*^9, 3.7372906712458363`*^9}, {3.737290704533799*^9, 3.7372907061133537`*^9}, {3.737290744976763*^9, 3.737290766875083*^9}, { 3.737290999240056*^9, 3.737291019271243*^9}, {3.737291057840662*^9, 3.737291080456534*^9}, {3.737291128953987*^9, 3.737291140451013*^9}, { 3.737291260286092*^9, 3.7372914176080303`*^9}, {3.7372914768350573`*^9, 3.737291536874617*^9}, {3.7372915673943977`*^9, 3.73729157857458*^9}, { 3.73729459361259*^9, 3.737294594755714*^9}, {3.737294841256043*^9, 3.737294872151122*^9}, {3.73729499894667*^9, 3.737295013697496*^9}, { 3.737295117321186*^9, 3.737295146177869*^9}, {3.737295198600103*^9, 3.737295201561144*^9}, {3.737295332216126*^9, 3.7372953659228153`*^9}, { 3.7372958344031277`*^9, 3.737296025548025*^9}, {3.737302057273785*^9, 3.737302228939927*^9}, 3.7373022837982073`*^9, {3.737302343644175*^9, 3.737302375974662*^9}, 3.737302421339328*^9, {3.737302477569655*^9, 3.737302565791008*^9}, {3.737302777019927*^9, 3.737302823909573*^9}, { 3.737303123387793*^9, 3.737303214311923*^9}, {3.7373032530403357`*^9, 3.7373032965502157`*^9}, {3.737303417213832*^9, 3.737303518053563*^9}, { 3.737303590633803*^9, 3.737303600566893*^9}, {3.737303631996339*^9, 3.737303736869626*^9}, {3.737303779146243*^9, 3.737303825046517*^9}, { 3.737304130063211*^9, 3.737304181026523*^9}, {3.7373042470907288`*^9, 3.737304349277087*^9}, {3.7373043812177143`*^9, 3.737304407351365*^9}, { 3.737304581411367*^9, 3.737304616831106*^9}, {3.7373046620344*^9, 3.7373047068712873`*^9}, {3.737304771496949*^9, 3.7373048444644938`*^9}, { 3.737305306432076*^9, 3.7373053158581667`*^9}, {3.7373053546618013`*^9, 3.737305355635768*^9}, 3.7373054429132357`*^9, {3.737306098271888*^9, 3.737306106600956*^9}, {3.737306417696192*^9, 3.737306447095158*^9}, { 3.7373064781213903`*^9, 3.737306483985478*^9}, {3.737306573567268*^9, 3.737306587589746*^9}, {3.737306720838073*^9, 3.73730674819695*^9}, { 3.737306852180376*^9, 3.737306861658111*^9}, {3.737306929352565*^9, 3.7373069458296127`*^9}, {3.737306985973919*^9, 3.73730703321769*^9}, { 3.737307104020858*^9, 3.737307104380198*^9}, {3.7373072016479588`*^9, 3.737307219827284*^9}, {3.737307283259153*^9, 3.737307449938692*^9}, { 3.737307507268676*^9, 3.737307531627266*^9}, {3.737307624863483*^9, 3.737307630803578*^9}, 3.7373692366355057`*^9, {3.737378768428591*^9, 3.737378772696554*^9}, {3.737456548739272*^9, 3.737456676468967*^9}, { 3.737456732055797*^9, 3.737456785246457*^9}, {3.737456880379624*^9, 3.73745693261576*^9}, {3.7374569872793217`*^9, 3.737457002918715*^9}, { 3.737457034354722*^9, 3.7374570868457327`*^9}, {3.7374573446089993`*^9, 3.737457359698818*^9}, {3.737457621684537*^9, 3.737457654757286*^9}, { 3.7374577893447638`*^9, 3.7374578203273153`*^9}, 3.73745786787053*^9, { 3.737458414579453*^9, 3.7374584346434393`*^9}, {3.73745848723744*^9, 3.737458515616708*^9}, {3.737458663428769*^9, 3.73745867379788*^9}, { 3.737458742757172*^9, 3.7374588188135767`*^9}, {3.7374589524311037`*^9, 3.737458970370059*^9}, {3.737459004685546*^9, 3.737459017734614*^9}, { 3.737469143102393*^9, 3.737469152438889*^9}, {3.7374723221463118`*^9, 3.7374723517302732`*^9}, {3.737472517403573*^9, 3.73747252044235*^9}, { 3.737472566196344*^9, 3.737472599816885*^9}, {3.737472901109223*^9, 3.737472904411367*^9}, {3.737472959283648*^9, 3.737472959747048*^9}, { 3.737472997133112*^9, 3.737473040080291*^9}, {3.7374732109292183`*^9, 3.73747321567245*^9}, {3.737474220810277*^9, 3.737474243746545*^9}, { 3.737720030799748*^9, 3.7377200552173643`*^9}, {3.737720087337412*^9, 3.7377201185616283`*^9}, {3.737720170734948*^9, 3.737720176149166*^9}, { 3.7377202115121927`*^9, 3.7377202116963243`*^9}, {3.7377202481305037`*^9, 3.737720253754922*^9}, {3.73772028641499*^9, 3.7377203344757833`*^9}, { 3.737891223277732*^9, 3.7378912238571*^9}, {3.737906075544756*^9, 3.7379060758948555`*^9}, {3.737991347709439*^9, 3.7379913481113663`*^9}, { 3.7379951711905804`*^9, 3.7379951715466285`*^9}}, CellLabel->"In[4]:=",ExpressionUUID->"34558bf5-30de-4efd-a85d-1e42927d2f41"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_"}], "}"}], ",", "r_", ",", "face_", ",", "vertices_", ",", "radii_", ",", "lines_"}], "]"}], ":=", RowBox[{"(*", " ", RowBox[{ "face", " ", "is", " ", "all", " ", "the", " ", "vertices", " ", "that", " ", "the", " ", "face", " ", "intersects"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{ RowBox[{"{", RowBox[{"x_", ",", "y_"}], "}"}], ",", RowBox[{"r", ":", " ", RowBox[{ "known", " ", "center", " ", "of", " ", "opposite", " ", "kind", " ", "and", " ", "its", " ", "radius", "\[IndentingNewLine]", "face"}], ":", " ", RowBox[{ "all", " ", "the", " ", "circles", " ", "of", " ", "its", " ", "kind", " ", "that", " ", "pass", " ", "thru", " ", "that", " ", "opposite", " ", "known", " ", "circle", "\[IndentingNewLine]", RowBox[{"vertices", ":", " ", RowBox[{ "all", " ", "the", " ", "circles", " ", "of", " ", "its", " ", "kind", " ", "that", " ", "are", " ", "tangent", " ", "to", " ", "the", " ", "one", " ", RowBox[{"we", "'"}], "e", " ", "looking", " ", "for"}]}]}]}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"verts", "=", "vertices"}], ",", "i", ",", "j", ",", "\[Phi]", ",", "\[Theta]", ",", "\[Omega]", ",", RowBox[{"face2", "=", "face"}], ",", "b", ",", RowBox[{"b2", "=", "True"}]}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "||", RowBox[{"MemberQ", "[", RowBox[{"lines", ",", RowBox[{"face2", "[", RowBox[{"[", "1", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "2"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "face2", "]"}]}], "&&", "b2"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{"lines", ",", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"face2", "=", RowBox[{"Join", "[", RowBox[{ RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", ";;"}], "]"}], "]"}], ",", RowBox[{"face2", "[", RowBox[{"[", RowBox[{";;", RowBox[{"i", "-", "1"}]}], "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"b2", "=", "False"}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"b", "=", "True"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "2"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "face2", "]"}]}], "&&", "b"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{"lines", ",", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"AppendTo", "[", RowBox[{"face2", ",", RowBox[{"face2", "[", RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", RowBox[{ RowBox[{"Length", "[", "face2", "]"}], "-", "1"}]}], ",", RowBox[{"j", ">", "i"}], ",", RowBox[{"j", "--"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Phi]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"j", "+", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "x"}], ",", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"j", "+", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "-", "y"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"j", "+", "1"}], "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", RowBox[{"(*", " ", RowBox[{"j", "+", RowBox[{ "1", " ", "refers", " ", "to", " ", "previously", " ", RowBox[{"computed", " ", "/", " ", "known"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Omega]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"x", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Cos", "[", RowBox[{"\[Phi]", "-", "\[Theta]", "-", "\[Omega]"}], "]"}]}]}], ",", RowBox[{"y", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Sin", "[", RowBox[{"\[Phi]", "-", "\[Theta]", "-", "\[Omega]"}], "]"}]}]}]}], "}"}]}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";", RowBox[{"b", "=", "False"}], ";", "Break"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"\[Phi]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "-", "x"}], ",", RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "-", "y"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"\[Theta]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", RowBox[{"i", "-", "1"}], "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", RowBox[{"(*", " ", RowBox[{"i", "-", RowBox[{ "1", " ", "refers", " ", "to", " ", "previously", " ", RowBox[{"computed", " ", "/", " ", "known"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\[Omega]", "=", RowBox[{"ArcTan", "[", RowBox[{ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "/", "r"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"verts", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "=", RowBox[{"{", RowBox[{ RowBox[{"x", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Cos", "[", RowBox[{"\[Phi]", "+", "\[Theta]", "+", "\[Omega]"}], "]"}]}]}], ",", RowBox[{"y", "+", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["r", "2"], "+", SuperscriptBox[ RowBox[{"radii", "[", RowBox[{"face2", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "2"]}]], RowBox[{"Sin", "[", RowBox[{"\[Phi]", "+", "\[Theta]", "+", "\[Omega]"}], "]"}]}]}]}], "}"}]}]}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";"}]}], "]"}], ";", "\[IndentingNewLine]", "verts"}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->CompressedData[" 1:eJwd030s1HEcB/BfylGhk+tmultSuqz0uKhUSsyVHk/IlWr0YDJEU5e7DCc0 xE8RihBdiLsJV1mblsgqD7XuGnk4VNfJUw/S1Pq9v3989vrn8/lsn733WRwY LjplRFHUbqagpUVmqkRr2NG6wv0a7HQYuQXPRnmXwOv+3EpokxSqhF+2f38I lZsLGqBOPdYCk/t9u2FwUvkgPLRzgQFSUv4kVJm++QOL5xwwucQoqxYT51v7 mUGnzw+JDds9raDUoOPDKKO/ofC6yjQCpi1nxcGy28OJcBEtS4NU/lAWDGfb 58Nkn7W3oLjOuQwq3aOI5W6FatgYW/ACjnq2vyLzWroT0q+tNfC4W2sXbNHv 0sGevSnERzZheii6T8+IYbR0KjSFuoxG4nBt8xGomNtOFA28CyJ9m35JoTwj RQ7NFV40XHfKIhveiPxBvLxzpADy7vNL4Pkuk2pYvLRQBV/lmb2FNQFUNzT1 2DYIs/VaImvAVw+nDyYRU/7uG4WRvMeT8MJklbGM0VbQSdwaqOmNZbyaOasP zlJXfILdnDaiE+fpnnjk4K8lardZ1EDbc5wGmDplPgrr+DQrgXHEksODD35X Ewd/S4TQ7n3FMbhJ4BcEKcd1wVB+xicUFj35FA63rF9zAXI/512CPar5V6BP 2+l00n+6loZ3J1xyoNgvpgDuize+A1ewKAVkf/xeAQUlC5TwnOZ9ExwLbP4I n2kbB+BGrnoY9ndMjcEjs4t2p+GuLuF+yB2mg+CcBMcQyBp/GQYpm3lSyLZ1 yYIeFvJiyAt9Vg4V3hNKuKiqvgmK3AJa4HOxuo3st/PvgBnCsSEYwa00wD5b q5mFyCvagQ1POKa332HcvLKmAzYFeWlgvGU6UajzHoScEGocrr4pnYbub4X/ YH1tolER/qU3h8h2dHWGkqyFG+FRL9VBqBt6RPxl3HMYTn/7EwATv+VGwH/H FkZC694l0fCrRC6BveuzY6H96ityOFsWdg+WunYr4A8zWStcddmlDZaXxq2J /sD888pcYp/m5DIpY7PxBgEUXHT7qWBMtooi/gegIJ/I "], CellLabel->"In[5]:=",ExpressionUUID->"1669407f-19e4-41f4-83d2-404c097a4b8c"], Cell[BoxData[ RowBox[{ RowBox[{"Cull", "[", "assoc_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"vis", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"unv", "=", RowBox[{"{", "}"}]}], ",", "i"}], "}"}], ",", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"Keys", "[", "assoc", "]"}], "]"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"assoc", "[", RowBox[{ RowBox[{"Keys", "[", "assoc", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"unv", ",", RowBox[{ RowBox[{"Keys", "[", "assoc", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"vis", ",", RowBox[{ RowBox[{"Keys", "[", "assoc", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";", RowBox[{"{", RowBox[{"vis", ",", "unv"}], "}"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.737378883847493*^9, 3.7373790220179577`*^9}}, CellLabel->"In[6]:=",ExpressionUUID->"0ca661cb-0814-4baa-8045-ccb6be11fd34"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Interior", "[", RowBox[{ "n_", ",", "FacesCW_", ",", "LineFaces_", ",", "radii_", ",", "vertices_", ",", "faces_", ",", "d_", ",", "h_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Vunv", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"Funv", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"Vvis", "=", RowBox[{"{", "}"}]}], ",", RowBox[{"Fvis", "=", RowBox[{"{", "}"}]}], ",", "i", ",", "j", ",", "f", ",", RowBox[{"verts", "=", "vertices"}], ",", "verts2", ",", RowBox[{"fcs", "=", "faces"}], ",", "fcs2", ",", "fi", ",", "vi", ",", "x", ",", "y", ",", "k", ",", "b"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"f", "=", RowBox[{"Length", "[", "FacesCW", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "n"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "i", "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"Vunv", ",", "i"}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"Vvis", ",", "i"}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "f"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[Equal]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"Funv", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"Fvis", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{ RowBox[{"j", "\[LessEqual]", RowBox[{"n", "+", RowBox[{"Length", "[", "FacesCW", "]"}]}]}], "&&", RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"Length", "[", "Vunv", "]"}], "+", RowBox[{"Length", "[", "Funv", "]"}]}], ">", "0"}], ")"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "Fvis", "]"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"(*", " ", RowBox[{ "for", " ", "a", " ", "known", " ", "face", " ", "circle"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Length", "[", RowBox[{"Intersection", "[", RowBox[{"Vvis", ",", RowBox[{"Fvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], "]"}], "*", RowBox[{"Length", "[", RowBox[{"Intersection", "[", RowBox[{"Vunv", ",", RowBox[{"Fvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], "]"}]}], ">", "0"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"fi", "=", RowBox[{"Fvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], "=", RowBox[{"fcs", "[", "fi", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"verts2", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "fi", "]"}], ",", "fi", ",", "verts", ",", "radii", ",", RowBox[{"{", RowBox[{ RowBox[{"n", "-", "1"}], ",", "n"}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "fcs", ",", "verts2", ",", "radii", ",", "d", ",", "h", ",", "n", ",", RowBox[{"{", RowBox[{ RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"FacesCW", "[", RowBox[{"[", RowBox[{"LineFaces", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}], ",", "0"}], "]"}], ",", RowBox[{"verts", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "fi", "]"}], ",", RowBox[{"Reverse", "[", "fi", "]"}], ",", "verts", ",", "radii", ",", RowBox[{"{", RowBox[{ RowBox[{"n", "-", "1"}], ",", "n"}], "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"verts", "=", "verts2"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"Vvis", ",", "Vunv"}], "}"}], "=", RowBox[{"Cull", "[", "verts", "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "Vvis", "]"}]}], ",", RowBox[{"i", "++"}], ",", " ", RowBox[{"(*", " ", RowBox[{ "for", " ", "a", " ", "known", " ", "vertex", " ", "circle"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"b", "=", "False"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"k", "=", "1"}], ",", RowBox[{"k", "\[LessEqual]", RowBox[{"Length", "[", "Fvis", "]"}]}], ",", RowBox[{"k", "++"}], ",", RowBox[{"b", "=", RowBox[{"b", "||", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Fvis", "[", RowBox[{"[", "k", "]"}], "]"}], ",", RowBox[{"Vvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", "True", ",", "False"}], "]"}]}]}]}], "]"}], ";", "b"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"b", "=", "False"}], ";", RowBox[{"For", "[", RowBox[{ RowBox[{"k", "=", "1"}], ",", RowBox[{"k", "\[LessEqual]", RowBox[{"Length", "[", "Funv", "]"}]}], ",", RowBox[{"k", "++"}], ",", RowBox[{"b", "=", RowBox[{"b", "||", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Funv", "[", RowBox[{"[", "k", "]"}], "]"}], ",", RowBox[{"Vvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}], ",", "True", ",", "False"}], "]"}]}]}]}], "]"}], ";", "b"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "then", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"vi", "=", RowBox[{"Vvis", "[", RowBox[{"[", "i", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], "=", RowBox[{"verts", "[", "vi", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"fcs2", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "vi", "]"}], ",", RowBox[{"FacesList", "[", RowBox[{"vi", ",", "FacesCW"}], "]"}], ",", "fcs", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "fcs2", ",", "verts", ",", "radii", ",", "d", ",", "h", ",", "n", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "0"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"fcs", "=", RowBox[{"FindRest", "[", RowBox[{ RowBox[{"{", RowBox[{"x", ",", "y"}], "}"}], ",", RowBox[{"radii", "[", "vi", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Reverse", "[", RowBox[{"FacesList", "[", RowBox[{"vi", ",", "FacesCW"}], "]"}], "]"}], ",", "fcs", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"fcs", "=", "fcs2"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"Fvis", ",", "Funv"}], "}"}], "=", RowBox[{"Cull", "[", "fcs", "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"verts", ",", "fcs"}], "}"}]}]}], "\[IndentingNewLine]", "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.737371589519445*^9, 3.7373715939907503`*^9}, { 3.7373717937672253`*^9, 3.737371867174656*^9}, {3.737371907831069*^9, 3.73737217884262*^9}, {3.7373722186269712`*^9, 3.737372303076326*^9}, { 3.737372765799387*^9, 3.737372795651403*^9}, {3.737372858097958*^9, 3.73737290560703*^9}, {3.7373729483086967`*^9, 3.737372962791078*^9}, { 3.737376949244026*^9, 3.737377199857114*^9}, {3.737378821576833*^9, 3.737378856709831*^9}, {3.737379029954533*^9, 3.737379249070065*^9}, { 3.737379302218759*^9, 3.737379442833221*^9}, {3.737379504802657*^9, 3.737379571504554*^9}, {3.73737972110927*^9, 3.737379741421777*^9}, { 3.737380015082492*^9, 3.737380027586205*^9}, {3.737380096483328*^9, 3.737380123433268*^9}, {3.737380170681796*^9, 3.7373801708619337`*^9}, { 3.737380320948838*^9, 3.7373804262726393`*^9}, {3.73738047325154*^9, 3.737380485443796*^9}, {3.737380518592564*^9, 3.737380537424242*^9}, { 3.737380576718589*^9, 3.737380596012712*^9}, {3.7373859949503098`*^9, 3.7373860041894217`*^9}, {3.7373893401960897`*^9, 3.737389340516891*^9}, { 3.737390296785729*^9, 3.7373904116517477`*^9}, {3.7373904724338512`*^9, 3.737390578698831*^9}, {3.737390622302457*^9, 3.737390636926055*^9}, 3.737390871387472*^9, {3.737391458456609*^9, 3.7373915337313957`*^9}, { 3.7373916762920856`*^9, 3.7373916866307707`*^9}, {3.737391755289661*^9, 3.737391760387761*^9}, {3.737392424160388*^9, 3.737392446839201*^9}, { 3.7373926496569033`*^9, 3.7373926770265007`*^9}, {3.737415538959766*^9, 3.737415550423221*^9}, {3.7374157811082497`*^9, 3.737415783008522*^9}, { 3.737416229137042*^9, 3.73741626934859*^9}, {3.737416301320304*^9, 3.7374164268381977`*^9}, {3.737416488079246*^9, 3.737416506542727*^9}, { 3.737418543755864*^9, 3.737418614467947*^9}, {3.73745208819372*^9, 3.7374521079510527`*^9}, {3.737452248507903*^9, 3.737452260807358*^9}, 3.737452337464182*^9, {3.737452547756901*^9, 3.737452552175274*^9}, { 3.737452597327281*^9, 3.737452623027234*^9}, {3.737452951467626*^9, 3.7374529538565903`*^9}, {3.7374529931356688`*^9, 3.73745300450865*^9}, { 3.737453253031118*^9, 3.7374532838306513`*^9}, {3.737453448755361*^9, 3.7374535016621037`*^9}, {3.737453540364457*^9, 3.7374535737880087`*^9}, { 3.7374536292349997`*^9, 3.737453661316655*^9}, {3.737453692604967*^9, 3.737453705446292*^9}, {3.7374538230331917`*^9, 3.737453850633659*^9}, { 3.7374540473125362`*^9, 3.73745406845465*^9}, {3.737454116980228*^9, 3.737454141500236*^9}, {3.737454665545776*^9, 3.737454752199181*^9}, { 3.737454823087352*^9, 3.737454936342786*^9}, {3.73745497887639*^9, 3.7374549822716417`*^9}, {3.737455062923647*^9, 3.737455067024728*^9}, { 3.7374592709534693`*^9, 3.737459282809087*^9}, {3.737459718460556*^9, 3.7374598283067007`*^9}, {3.737459871128312*^9, 3.737459943923081*^9}, { 3.737460424909642*^9, 3.737460468107106*^9}, {3.737460531451869*^9, 3.7374605342064867`*^9}, {3.737460570370933*^9, 3.73746065914788*^9}, { 3.737469228334271*^9, 3.7374692297752113`*^9}, {3.7374759421424723`*^9, 3.737475959220735*^9}, {3.737475996982561*^9, 3.737476043275124*^9}, { 3.7374760741261263`*^9, 3.7374762044096413`*^9}, {3.737476237384112*^9, 3.737476257932431*^9}, {3.737476290722767*^9, 3.7374763178872833`*^9}, { 3.737476633241235*^9, 3.73747668584684*^9}, {3.737476775880768*^9, 3.737476807271324*^9}, {3.737476934280177*^9, 3.7374769365813828`*^9}, { 3.737476994438554*^9, 3.7374770257193117`*^9}, {3.737478615746154*^9, 3.737478664034655*^9}, {3.737478700737122*^9, 3.737478703803566*^9}, { 3.737891193943988*^9, 3.7378911945027657`*^9}, {3.7379034272313843`*^9, 3.737903448515432*^9}, 3.737903546475888*^9}, CellLabel->"In[7]:=",ExpressionUUID->"8eb99bd7-ecdf-447b-9254-91418df0046a"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"ThrowOrderError", "[", RowBox[{ "fcs2_", ",", "verts_", ",", "radii_", ",", "d_", ",", "h_", ",", "n_", ",", "fls_", ",", "\[Epsilon]_"}], "]"}], RowBox[{"(*", " ", RowBox[{"fcs2", " ", "is", " ", "proposed", " ", "fcs", " ", RowBox[{"association", ".", " ", "fls"}], " ", "is", " ", "facelines"}], " ", "*)"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "j", ",", "b", ",", "b2", ",", "K"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"K", "=", RowBox[{"{", "}"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"Keys", "[", "fcs2", "]"}], "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{"fls", ",", RowBox[{ RowBox[{"Keys", "[", "fcs2", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"K", ",", RowBox[{ RowBox[{"Keys", "[", "fcs2", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"b", "=", "False"}], ";", " ", RowBox[{"(*", " ", "\"\\"", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "K", "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"b2", "=", "False"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"-", "\[Infinity]"}], "<", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "<", "0"}], "\[IndentingNewLine]", "||", RowBox[{ RowBox[{"-", "\[Infinity]"}], "<", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "<", "0"}], "\[IndentingNewLine]", "||", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], ">", "d"}], "\[IndentingNewLine]", "||", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], ">", "h"}], "\[IndentingNewLine]", "||", RowBox[{"(", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"n", "-", "1"}]}], "&&", RowBox[{ RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "\[NotEqual]", "n"}], "&&", RowBox[{ RowBox[{"verts", "[", RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"EuclideanDistance", "[", RowBox[{ RowBox[{"verts", "[", RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], ",", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}], "\[GreaterEqual]", RowBox[{ RowBox[{"(", RowBox[{"1", "-", "\[Epsilon]"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"radii", "[", RowBox[{"K", "[", RowBox[{"[", RowBox[{"i", ",", "j"}], "]"}], "]"}], "]"}], "+", RowBox[{"radii", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], ")"}]}]}], ",", RowBox[{ RowBox[{"b2", "=", "True"}], ";", "Break"}]}], "]"}]}], "]"}]}], "]"}], ";", "b2"}], ")"}]}]}], ",", "\[IndentingNewLine]", RowBox[{"b", "=", "True"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{ RowBox[{"j", "\[LessEqual]", RowBox[{"Length", "[", "K", "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"i", "\[NotEqual]", "j"}], "&&", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "\[NotEqual]", RowBox[{"{", RowBox[{ RowBox[{"-", "\[Infinity]"}], ",", RowBox[{"-", "\[Infinity]"}]}], "}"}]}], "&&", "\[IndentingNewLine]", RowBox[{ RowBox[{"EuclideanDistance", "[", RowBox[{ RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}]}], "]"}], "<", RowBox[{ RowBox[{"(", RowBox[{"1", "+", "\[Epsilon]"}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"radii", "[", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], "]"}], "+", RowBox[{"radii", "[", RowBox[{"fcs2", "[", RowBox[{"K", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "]"}]}], ")"}]}]}]}], "\[IndentingNewLine]", ",", RowBox[{"(*", " ", RowBox[{"then", ",", " ", "bad"}], " ", "*)"}], " ", RowBox[{"b", "=", "True"}]}], "]"}]}], "]"}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"fls", "[", RowBox[{"[", RowBox[{"1", ",", "i"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "\[NotEqual]", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "&&", RowBox[{ RowBox[{"fls", "[", RowBox[{"[", RowBox[{"1", ",", "i"}], "]"}], "]"}], "<", RowBox[{"n", "-", "1"}]}]}], ",", RowBox[{"b", "=", "True"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{ RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}]}], "&&", RowBox[{"!", "b"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"verts", "[", RowBox[{"fls", "[", RowBox[{"[", RowBox[{"2", ",", "i"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "\[NotEqual]", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"fcs2", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "&&", RowBox[{ RowBox[{"fls", "[", RowBox[{"[", RowBox[{"2", ",", "i"}], "]"}], "]"}], "<", RowBox[{"n", "-", "1"}]}]}], ",", RowBox[{"b", "=", "True"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "b"}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7373860513513117`*^9, 3.737386324009047*^9}, { 3.7373863565686207`*^9, 3.737386763058362*^9}, {3.737387011692689*^9, 3.7373874131979523`*^9}, {3.737387444285528*^9, 3.737387446417802*^9}, { 3.737387501724284*^9, 3.7373875162781897`*^9}, {3.7373875865809803`*^9, 3.7373876073787117`*^9}, {3.737387674890192*^9, 3.737387682382772*^9}, { 3.737387740454358*^9, 3.7373877582071867`*^9}, {3.737387870977488*^9, 3.737387912943714*^9}, {3.737388020284473*^9, 3.7373880216503363`*^9}, { 3.7373881133311872`*^9, 3.7373881231093473`*^9}, {3.737388218003031*^9, 3.737388251234787*^9}, {3.737388306336886*^9, 3.7373884325997267`*^9}, { 3.73738859353605*^9, 3.737388596101646*^9}, {3.7373886515625*^9, 3.737388731115857*^9}, {3.737388764603668*^9, 3.7373887825179358`*^9}, { 3.737388827395173*^9, 3.73738885534306*^9}, {3.7373889569580507`*^9, 3.7373891513974247`*^9}, {3.737389185971114*^9, 3.737389229300188*^9}, { 3.7373892871568117`*^9, 3.73738930336942*^9}, {3.737451960169162*^9, 3.737451962438613*^9}, {3.737452188533687*^9, 3.7374522140811863`*^9}, { 3.7374523846778708`*^9, 3.737452411688586*^9}, {3.7374524423850327`*^9, 3.7374525059763308`*^9}, {3.7374527627193413`*^9, 3.7374528272523108`*^9}, {3.7374529127507477`*^9, 3.737452943447597*^9}, { 3.737453021653625*^9, 3.737453033081242*^9}, 3.737453194007431*^9, { 3.737457949590412*^9, 3.737458106215234*^9}, {3.737458155680525*^9, 3.737458160666041*^9}, {3.7374582249762278`*^9, 3.737458233452886*^9}, 3.7379035853422227`*^9, {3.7379952037395506`*^9, 3.7379952046351557`*^9}}, CellLabel->"In[8]:=",ExpressionUUID->"df3b60f9-0301-4a00-901e-3f42ad1f6dcc"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"FacesList", "[", RowBox[{"v_", ",", "Faces_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"ContainV", "=", RowBox[{"{", "}"}]}], ",", "i", ",", RowBox[{"L", "=", "2"}], ",", RowBox[{"p", "=", "3"}], ",", "temp"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", "Faces", "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Faces", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "v"}], "]"}], ",", RowBox[{"AppendTo", "[", RowBox[{"ContainV", ",", RowBox[{"Faces", "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"While", "[", RowBox[{ RowBox[{"L", "<", RowBox[{"Length", "[", "ContainV", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"While", "[", RowBox[{ RowBox[{"p", "\[LessEqual]", RowBox[{"Length", "[", "ContainV", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", RowBox[{"Intersection", "[", RowBox[{ RowBox[{"ContainV", "[", RowBox[{"[", RowBox[{"L", "-", "1"}], "]"}], "]"}], ",", RowBox[{"ContainV", "[", RowBox[{"[", "p", "]"}], "]"}]}], "]"}], "]"}], "\[Equal]", "2"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"temp", "=", RowBox[{"ContainV", "[", RowBox[{"[", "p", "]"}], "]"}]}], ";", RowBox[{ RowBox[{"ContainV", "[", RowBox[{"[", "p", "]"}], "]"}], "=", RowBox[{"ContainV", "[", RowBox[{"[", "L", "]"}], "]"}]}], ";", RowBox[{ RowBox[{"ContainV", "[", RowBox[{"[", "L", "]"}], "]"}], "=", "temp"}], ";", RowBox[{"p", "=", RowBox[{"1", "+", RowBox[{"Length", "[", "ContainV", "]"}]}]}]}], ",", "\[IndentingNewLine]", RowBox[{"p", "++"}]}], "]"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", RowBox[{"L", "++"}], ";", "\[IndentingNewLine]", RowBox[{"p", "=", RowBox[{"L", "+", "1"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "ContainV"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7373893963188553`*^9, 3.737389499461423*^9}, { 3.737389625681715*^9, 3.7373896502694798`*^9}, {3.7373897037433033`*^9, 3.737389735684783*^9}, {3.737389775354559*^9, 3.737389877602042*^9}, { 3.737389938671054*^9, 3.737389955021085*^9}, {3.737390098064752*^9, 3.7373901898598967`*^9}, {3.7373902333090754`*^9, 3.737390260404229*^9}, { 3.737477725750886*^9, 3.7374777259423532`*^9}, {3.737477772140749*^9, 3.737477809678876*^9}, {3.737477865110086*^9, 3.7374778881276903`*^9}, { 3.7374781429692793`*^9, 3.737478158525076*^9}, {3.737478266335372*^9, 3.737478275141066*^9}, {3.7374783969519587`*^9, 3.7374784008097754`*^9}, { 3.737903596846489*^9, 3.737903597250413*^9}}, CellLabel->"In[9]:=",ExpressionUUID->"94e58c8f-e9bc-4bc5-9f72-1e7d65b723b4"], Cell[BoxData[ RowBox[{ RowBox[{"Q", "=", RowBox[{"(", GridBox[{ {"0", RowBox[{"1", "/", "2"}], "0", "0"}, { RowBox[{"1", "/", "2"}], "0", "0", "0"}, {"0", "0", RowBox[{"-", "1"}], "0"}, {"0", "0", "0", RowBox[{"-", "1"}]} }], ")"}]}], ";"}]], "Input", CellLabel->"In[10]:=",ExpressionUUID->"e0269727-13f8-41e1-9bed-e3d214f9ade5"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"InvCoords", "[", RowBox[{"z_", ",", "r_", ",", RowBox[{"d_:", "0"}]}], "]"}], ":=", RowBox[{"If", "[", RowBox[{ RowBox[{"r", "\[Equal]", "\[Infinity]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"2", "d"}], ",", "0", ",", "z"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ FractionBox[ SuperscriptBox[ RowBox[{"Norm", "[", "z", "]"}], "2"], "r"], "-", "r"}], ",", RowBox[{"1", "/", "r"}], ",", RowBox[{"z", "/", "r"}]}], "}"}]}], "]"}]}], ";"}]], "Input", CellLabel->"In[11]:=",ExpressionUUID->"335fc47c-61a3-4d42-b8dc-1a6e429b3dbb"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"Gram", "[", "SC_", "]"}], ":=", RowBox[{"SC", ".", "Q", ".", RowBox[{"Transpose", "[", "SC", "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"SuperCluster", "[", RowBox[{ "vertices_", ",", "faces_", ",", "radii_", ",", "fls_", ",", "d_", ",", "h_", ",", "n_"}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"sc", "=", RowBox[{"{", "}"}]}], ",", "i"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"n", "-", "2"}]}], ",", RowBox[{"i", "++"}], ",", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"vertices", "[", "i", "]"}], ",", RowBox[{"radii", "[", "i", "]"}]}], "]"}], "]"}]}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"vertices", "[", RowBox[{"n", "-", "1"}], "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["h", "2"], "+", RowBox[{ RowBox[{ RowBox[{"vertices", "[", RowBox[{"n", "-", "1"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], FractionBox["h", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"vertices", "[", "n", "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["h", "2"], "+", RowBox[{ RowBox[{ RowBox[{"vertices", "[", "n", "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], FractionBox["h", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", RowBox[{"Length", "[", RowBox[{"Keys", "[", "faces", "]"}], "]"}]}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{"fls", ",", RowBox[{ RowBox[{"Keys", "[", "faces", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"faces", "[", RowBox[{ RowBox[{"Keys", "[", "faces", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"radii", "[", RowBox[{ RowBox[{"Keys", "[", "faces", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AppendTo", "[", RowBox[{"sc", ",", RowBox[{"Flatten", "[", RowBox[{"InvCoords", "[", RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], ",", "\[Infinity]", ",", RowBox[{ FractionBox["d", "2"], "+", RowBox[{ RowBox[{ RowBox[{"faces", "[", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], FractionBox["d", "2"]}]}]}], "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", "sc"}]}], "\[IndentingNewLine]", "]"}]}], ";"}]}], "Input", CellLabel->"In[12]:=",ExpressionUUID->"8f83b82e-c1db-40d9-ac4c-a723737f7704"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"DrawCircle", "[", RowBox[{"{", RowBox[{"bhat_", ",", "b_", ",", "bx_", ",", "by_"}], "}"}], "]"}], ":=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", "b", "]"}], "\[GreaterEqual]", " ", ".01"}], ",", RowBox[{"Circle", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"bx", ",", "by"}], "}"}], "/", "b"}], ",", RowBox[{"1", "/", "b"}]}], "]"}], ",", RowBox[{"InfiniteLine", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"bx", ",", "by"}], "}"}], RowBox[{"bhat", "/", "2"}]}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "by"}], ",", "bx"}], "}"}]}], "]"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7383666121648498`*^9, 3.7383666304241414`*^9}, { 3.738366663056327*^9, 3.738366710683964*^9}, {3.7383669102892475`*^9, 3.73836691462473*^9}}, CellLabel->"In[14]:=",ExpressionUUID->"d37cc6ff-e0b5-488e-9c86-c606b2039282"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Packing", "[", RowBox[{"n_", ",", "FacesCW_", ",", RowBox[{"\[Epsilon]_:", "0"}]}], "]"}], ":=", "\[IndentingNewLine]", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "radii", ",", "LineFaces", ",", "vertices", ",", "faces", ",", "d", ",", "h"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{"radii", ",", "LineFaces"}], "}"}], "=", RowBox[{"EnergySetup", "[", RowBox[{"n", ",", "FacesCW"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"vertices", ",", "faces", ",", "d", ",", "h"}], "}"}], "=", RowBox[{"Boundary", "[", RowBox[{ "n", ",", "FacesCW", ",", "LineFaces", ",", "radii", ",", "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"{", RowBox[{"vertices", ",", "faces"}], "}"}], "=", RowBox[{"Interior", "[", RowBox[{ "n", ",", "FacesCW", ",", "LineFaces", ",", "radii", ",", "vertices", ",", "faces", ",", "d", ",", "h"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "vertices", ",", "faces", ",", "radii", ",", "d", ",", "h", ",", "LineFaces"}], "}"}]}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.737469007369687*^9, 3.737469107407995*^9}, { 3.73746916343927*^9, 3.737469194858486*^9}, {3.737469239984439*^9, 3.737469246965393*^9}, {3.737469315964088*^9, 3.737469336634994*^9}, { 3.737469428057992*^9, 3.737469432696295*^9}, {3.737469465014307*^9, 3.737469481114959*^9}, {3.7374695687460957`*^9, 3.7374696091341476`*^9}, { 3.737470455200612*^9, 3.7374704661283417`*^9}, {3.737478361306628*^9, 3.7374783619053802`*^9}, {3.737720455890616*^9, 3.737720462414033*^9}}, CellLabel->"In[15]:=",ExpressionUUID->"9a3eb7b4-a69e-4770-9009-32f6122d8145"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Render", "[", RowBox[{ "radii_", ",", "fcs_", ",", "verts_", ",", "fls_", ",", "n_", ",", "d_", ",", "h_"}], "]"}], ":=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{"Blue", ",", "Thick", ",", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", RowBox[{"n", "-", "1"}]}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "h"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "h"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{"i", "\[Equal]", "n"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"d", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", "0"}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Circle", "[", RowBox[{ RowBox[{"verts", "[", RowBox[{ RowBox[{"Keys", "[", "verts", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"radii", "[", RowBox[{ RowBox[{"Keys", "[", "verts", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", "Red", ",", "Dashed", ",", "\[IndentingNewLine]", RowBox[{"Table", "[", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"fls", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"h", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "\[Equal]", RowBox[{"fls", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d", ",", RowBox[{"-", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}], ",", RowBox[{"{", RowBox[{"d", ",", RowBox[{"h", "+", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}], "}"}]}], "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Circle", "[", RowBox[{ RowBox[{"fcs", "[", RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}], ",", RowBox[{"radii", "[", RowBox[{ RowBox[{"Keys", "[", "fcs", "]"}], "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}], "]"}]}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Length", "[", RowBox[{"Keys", "[", "fcs", "]"}], "]"}]}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7373911026555433`*^9, 3.737391276476068*^9}, { 3.737391324439508*^9, 3.737391325806115*^9}, {3.7373913655803022`*^9, 3.73739137356105*^9}, {3.737460834501174*^9, 3.7374608791258917`*^9}, { 3.737460909495472*^9, 3.737460979640925*^9}, {3.737469858560081*^9, 3.737469918056663*^9}, {3.73746995156046*^9, 3.7374701969102716`*^9}, { 3.737470230362206*^9, 3.737470299948655*^9}, 3.7378928141832247`*^9}, CellLabel->"In[16]:=",ExpressionUUID->"affbea28-f93e-449d-873a-65b52e624ef9"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{ RowBox[{"SendToInt", "[", RowBox[{"\[Epsilon]_:", "0"}], "]"}], "[", "y_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"x", "=", RowBox[{"Simplify", "[", "y", "]"}]}], "}"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{"x", "-", RowBox[{"Floor", "[", "x", "]"}]}], "]"}], "\[LessEqual]", "\[Epsilon]"}], " ", ",", RowBox[{"Floor", "[", "x", "]"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{"x", "-", RowBox[{"Ceiling", "[", "x", "]"}]}], "]"}], "\[LessEqual]", " ", "\[Epsilon]"}], " ", ",", RowBox[{"Ceiling", "[", "x", "]"}], ",", "x"}], "]"}], ",", "x"}], "]"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.7384110559425135`*^9, 3.7384110603257904`*^9}, { 3.7384111195493803`*^9, 3.7384111627798147`*^9}, {3.7389258502977815`*^9, 3.7389258643003516`*^9}}, CellLabel->"In[24]:=",ExpressionUUID->"15495297-a588-42f2-9830-ff3a5a9d76a4"], Cell[BoxData[{ RowBox[{ RowBox[{"R", "[", "vhat_", "]"}], ":=", RowBox[{ RowBox[{"IdentityMatrix", "[", "4", "]"}], "+", RowBox[{"2", RowBox[{"Q", ".", RowBox[{"Transpose", "[", RowBox[{"{", "vhat", "}"}], "]"}], ".", RowBox[{"{", "vhat", "}"}]}]}]}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"BMat", "[", "n_", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"b", "[", RowBox[{"i", ",", "j"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "n"}], "}"}]}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.7378245147847567`*^9, 3.737824531315222*^9}, { 3.737995674554207*^9, 3.7379956992022705`*^9}, 3.7380623568729105`*^9, { 3.7391187214671755`*^9, 3.739118722618456*^9}}, CellLabel-> "In[538]:=",ExpressionUUID->"cd35cdcc-79cb-420e-8b24-2c510cf42e01"], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"Bend4", "[", RowBox[{"V_", ",", "n_"}], "]"}], "[", "i_", "]"}], ":=", RowBox[{"With", "[", RowBox[{ RowBox[{"{", RowBox[{"B", "=", RowBox[{ RowBox[{"Bend3", "[", RowBox[{"V", ",", "n", ",", "Integers"}], "]"}], "[", "i", "]"}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "B", "]"}], ">", "0"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"B", ",", "\"\\""}], "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Bend3", "[", RowBox[{"V", ",", "n", ",", "Reals"}], "]"}], "[", "i", "]"}], ",", "\"\\""}], "}"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Bend3", "[", RowBox[{"V_", ",", "n_", ",", RowBox[{"RING_:", "Integers"}]}], "]"}], "[", "i_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{ "sol", ",", "assignments", ",", "rest", ",", "j", ",", "l", ",", "others1", ",", "others2", ",", "co", ",", "cl"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"cl", " ", "=", " ", RowBox[{"V", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"co", " ", "=", " ", RowBox[{"V", "[", RowBox[{"[", RowBox[{ RowBox[{"n", "+", "1"}], ";;"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"sol", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"BMat", "[", "n", "]"}], ".", "cl"}], "==", RowBox[{"cl", ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], "]"}]}]}], ",", "RING"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"sol", "==", RowBox[{"{", "}"}]}], ",", "Null", ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"sol", "=", RowBox[{ "sol", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], ";", "\[IndentingNewLine]", RowBox[{"assignments", "=", RowBox[{"Association", "[", "sol", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"rest", "=", RowBox[{"Complement", "[", RowBox[{ RowBox[{"Flatten", "[", RowBox[{"BMat", "[", "n", "]"}], "]"}], ",", RowBox[{"Keys", "[", "assignments", "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"l", "=", RowBox[{"Length", "[", "rest", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"l", "==", "0"}], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"BMat", "[", "n", "]"}], "/.", "assignments"}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"others1", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{"rest", "==", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "l"}], "}"}]}], "]"}]}], "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], ";", "\[IndentingNewLine]", RowBox[{"others2", "=", RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "l"}], ",", RowBox[{"j", "++"}], ",", RowBox[{ RowBox[{"others2", "[", RowBox[{ "rest", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}], "=", RowBox[{"Subscript", "[", RowBox[{"a", ",", " ", "j"}], "]"}]}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"others2", "=", RowBox[{"Normal", "[", "others2", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"BMat", "[", "n", "]"}], "/.", RowBox[{"(", RowBox[{"assignments", "/.", "others1"}], ")"}]}], ")"}], "/.", "others1"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}], "Input", CellChangeTimes->{3.739118739503786*^9}, CellLabel-> "In[542]:=",ExpressionUUID->"e65bbe1e-e47d-443d-bee4-ee5d9f6173e2"], Cell[BoxData[ RowBox[{ RowBox[{"Everything", "[", RowBox[{"n_", ",", "FacesCW_", ",", RowBox[{"\[Epsilon]_:", "0"}], ",", "steps_", ",", RowBox[{"sizemax_:", "\[Infinity]"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"vertices", ",", "faces", ",", RowBox[{"f", "=", RowBox[{"Length", "[", "FacesCW", "]"}]}], ",", "radii", ",", "d", ",", "h", ",", "LineFaces", ",", "Vnye", ",", "Vout", ",", RowBox[{"bends", "=", RowBox[{"{", "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ "vertices", ",", "faces", ",", "radii", ",", "d", ",", "h", ",", "LineFaces"}], "}"}], "=", RowBox[{"Packing", "[", RowBox[{"n", ",", "FacesCW", ",", "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Vnye", "=", RowBox[{ RowBox[{"SendToInt", "[", "\[Epsilon]", "]"}], "//@", RowBox[{"SuperCluster", "[", RowBox[{"vertices", ",", "faces", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "d", ",", "h", ",", "n"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Vout", "=", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"RootApproximant", "[", "Vnye", "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"bends", "=", RowBox[{ RowBox[{"Bend4", "[", RowBox[{ RowBox[{"Vout", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "n"}], "]"}], "/@", RowBox[{"Range", "@", "f"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Column", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Render", "[", RowBox[{"radii", ",", "faces", ",", "vertices", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "n", ",", "d", ",", "h"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", RowBox[{"Thick", ",", " ", RowBox[{"DrawCircle", "/@", RowBox[{"Orbit", "[", RowBox[{ RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "f"}], ";;"}], "]"}], "]"}], ",", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}], ",", "steps", ",", "sizemax"}], "]"}]}], ",", "Red", ",", RowBox[{"DrawCircle", "/@", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "f"}], ";;"}], "]"}], "]"}]}], ",", " ", "Blue", ",", " ", RowBox[{"DrawCircle", "/@", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}]}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "d"}], ",", RowBox[{"2", " ", "d"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "1.2"}], " ", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", RowBox[{"h", "+", RowBox[{"1.2", " ", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}]}], "}"}]}], "}"}]}], ",", RowBox[{"PlotRangeClipping", "->", "True"}]}], "]"}], ",", "\[IndentingNewLine]", "Vout", ",", "\[IndentingNewLine]", "bends", ",", "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"RootApproximant", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"SendToInt", "[", "\[Epsilon]", "]"}], "//@", RowBox[{"Gram", "[", RowBox[{"SuperCluster", "[", RowBox[{"vertices", ",", "faces", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "d", ",", "h", ",", "n"}], "]"}], "]"}]}], "]"}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}]}]}], "]"}]}]], "Input", CellChangeTimes->CompressedData[" 1:eJwdy30sFHAcBvATrWUN1SZDrfOSM+O85KXlVleGOpN557hEx6TdyduQl7Vu uvwj5aXjdjVOiLCcZlE7XF6OuFZnEldRNs6sJGul1e/5/fHdZ989z8NMFUcK dzEYDA45ONzt1tc2Z+S2rw0NQpeksGG430/5DrJMVJ7txKryLR+oTz6cCF+a NyVBdu2dbHj3yUAhnIwT2TPfG7k2WfIjcGFOOeNA3CydpTr5CutjiI/TNu5D nXr+ZAHx7cEbZ6FqrjYcarT6KDittrpE/xEmVakqSigldgol1MCW/MFWYvCh bmrBgYsGaFev/AQNhUnrNPdSbECb6J5oLdHKyjEGmpfkpsM6bWQGHJ7wL4Is i+VSOFGlkkDpnmUqo3n8NhQZ5JVQ5bLWAAPdHijgZRmvF2b6i/thjSz/Bd1H jQ5B69XyMVjdKqXKfu8Y4Fql+Ud4y7dtBQYbeOvQXaD4DpVlm9SpV5bbcKmi kRqj9jKZJKbES6h84y87qP16wh4qsgaOQo1pHhM+M0tnQ9Pkq95QEPcogO6f s7nQu3qRB4vNMi7AThk/FvZHiRKgubVjmmDeyPXok2fAmi0LMSy76ZwNGZqq PNjBExZAT83nYqiz/UGV92hHrxGZ1wcnoMdfoQ6yfNLewPhF3c8c4vHM09s5 dO+6A9s62NS8kGSbXKJ0qYtaWKQJgVNnjoXCyTHPdWi5Kv0G67UcszxirKyZ Kg8y2MIGzRJVoi9xhGmdA1SHLksWbNSautJe7Lg7jJY7sqHayYMDU4I2T0G/ p27BtDedGg7TpxYiISvRMgqe6xhJgnX8FgH8sttLBAPP+1E5RRE1M8Qr/Bhq qPRfKwx4KGiHiia9UUdMmJ2nSiqmheIPRu4f55UMuM8+4t5r4t6wXup/Znsy Lw== "], CellLabel-> "In[544]:=",ExpressionUUID->"b49300f9-4eb0-4e74-b00e-238ad2cc61d5"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Orbit", "[", RowBox[{"co_", ",", "cl_", ",", "steps_", ",", RowBox[{"sizemax_:", "\[Infinity]"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "j", ",", "k", ",", RowBox[{"orbit", "=", "cl"}], ",", "L"}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "\[LessEqual]", "steps"}], ",", RowBox[{"i", "++"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"L", "=", RowBox[{"Length", "[", "orbit", "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", RowBox[{"Length", "[", "co", "]"}]}], ",", RowBox[{"j", "++"}], ",", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"k", "=", "1"}], ",", RowBox[{"k", "\[LessEqual]", "L"}], ",", RowBox[{"k", "++"}], ",", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ "orbit", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}]}], ")"}], "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], "\[LessEqual]", "sizemax"}], "&&", RowBox[{"!", RowBox[{"MemberQ", "[", RowBox[{ RowBox[{"Round", "[", RowBox[{ RowBox[{"N", "[", "orbit", "]"}], ",", ".001"}], "]"}], ",", RowBox[{"Round", "[", RowBox[{ RowBox[{"N", "[", RowBox[{ RowBox[{ "orbit", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}]}], "]"}], ",", ".001"}], "]"}]}], RowBox[{"(*", RowBox[{"new", " ", "thing"}], "*)"}], "]"}]}]}], ",", RowBox[{"AppendTo", "[", RowBox[{"orbit", ",", RowBox[{ RowBox[{ "orbit", "\[LeftDoubleBracket]", "k", "\[RightDoubleBracket]"}], ".", RowBox[{"R", "[", RowBox[{ "co", "\[LeftDoubleBracket]", "j", "\[RightDoubleBracket]"}], "]"}]}]}], RowBox[{"(*", "newthing", "*)"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "orbit"}]}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.738062389806858*^9, 3.738062427087122*^9}, { 3.7380625273360224`*^9, 3.7380625840383434`*^9}, {3.738064608037428*^9, 3.738064608439394*^9}, {3.738408767299783*^9, 3.738408799676605*^9}, { 3.7385983894314737`*^9, 3.738598391136881*^9}}, CellLabel->"In[22]:=",ExpressionUUID->"b43a5c15-ff8f-4841-a157-1d63bba9b7c4"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Everything", "[", RowBox[{"7", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1", ",", "5", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "6", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "2", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "3", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "3", ",", "4", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "5", ",", "6", ",", "7"}], "}"}]}], "}"}], ",", RowBox[{"1", "/", "100"}], ",", "5", ",", "35"}], "]"}]], "Input", CellChangeTimes->{{3.737720388591385*^9, 3.7377204147139273`*^9}, { 3.73799104566405*^9, 3.737991046219566*^9}, {3.7379911247406125`*^9, 3.737991126272558*^9}, 3.737992714004908*^9, {3.7383399270780163`*^9, 3.738339928102619*^9}, {3.7383399833318253`*^9, 3.738340023435418*^9}, { 3.7383669397920876`*^9, 3.73836699772031*^9}, {3.7383676488210897`*^9, 3.738367650275752*^9}, {3.738411438453149*^9, 3.738411446817583*^9}, { 3.7384118416165533`*^9, 3.7384118445254*^9}, {3.738598401775426*^9, 3.7385984461068387`*^9}, {3.7385990810798445`*^9, 3.738599088815607*^9}, { 3.7386012597855043`*^9, 3.738601302494419*^9}, {3.738601598678238*^9, 3.738601639289603*^9}, {3.7386020946534925`*^9, 3.738602107358418*^9}, { 3.738602356489482*^9, 3.7386024023996735`*^9}, {3.7386031000929813`*^9, 3.738603131634983*^9}, {3.7386033447555046`*^9, 3.7386033939261928`*^9}, { 3.7386034982796383`*^9, 3.738603546222398*^9}, {3.738604540558546*^9, 3.7386046018698397`*^9}, {3.7386047974364233`*^9, 3.738604843888815*^9}, { 3.738605068506323*^9, 3.738605111398295*^9}, {3.7386052759377117`*^9, 3.738605335274602*^9}, {3.7386059315047274`*^9, 3.7386059872695265`*^9}, { 3.738606093824689*^9, 3.7386061370936213`*^9}, {3.738668592742067*^9, 3.7386686395816746`*^9}, {3.7386688556597276`*^9, 3.7386689139191813`*^9}, {3.73866909759364*^9, 3.7386691636266375`*^9}, { 3.7386693665464325`*^9, 3.73866937784991*^9}, {3.7386705904840393`*^9, 3.7386706292522974`*^9}, {3.738925891712088*^9, 3.7389258931990747`*^9}}, CellLabel-> "In[545]:=",ExpressionUUID->"8c0d00eb-3a38-4d87-9e21-66e5a04e235e"], Cell[BoxData[ TagBox[GridBox[{ { GraphicsBox[ {RGBColor[0, 0, 1], Thickness[ Large], {CircleBox[{5.236067977499794, 4.236067977499796}], CircleBox[{0, 4.2360679774997925}, 4.2360679774997925], CircleBox[{5.236067977499792, 1.6180339887498947}, 1.6180339887498951], CircleBox[{8.47213595499958, 1.6180339887498947}, 1.6180339887498947], CircleBox[{8.47213595499958, 5.854101966249684}, 2.6180339887498945], LineBox[{{-4.2360679774997925`, 8.472135954999578}, { 12.708203932499373`, 8.472135954999578}}], LineBox[{{-4.2360679774997925`, 0}, {12.708203932499373`, 0}}]}, {RGBColor[1, 0, 0], Dashing[{Small, Small}], CircleBox[{4.236067977499795, 3.236067977499795}, 1.0000000000000002], CircleBox[{4.23606797749979, 8.472135954999585}, 4.23606797749979], LineBox[{{0, -4.2360679774997925`}, {0, 12.70820393249937}}], CircleBox[{2.618033988749896, 0}, 2.618033988749896], CircleBox[{6.8541019662496865, 0}, 1.618033988749895], CircleBox[{6.85410196624969, 3.236067977499798}, 1.618033988749895], LineBox[{{8.472135954999581, -4.2360679774997925`}, { 8.472135954999581, 12.70820393249937}}]}}]}, { GraphicsBox[ {Thickness[ Large], {CircleBox[{5.236067977499794, 4.236067977499796}], CircleBox[{0., 4.2360679774997925}, 4.2360679774997925], CircleBox[{5.236067977499792, 1.618033988749895}, 1.618033988749895], CircleBox[{8.47213595499958, 1.6180339887498947}, 1.6180339887498947], CircleBox[{8.47213595499958, 5.854101966249684}, 2.6180339887498945], TagBox[ConicHullRegionBox[{0., 8.472135954999578}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"], CircleBox[{4.472135954999585, 3.1458980337503215}, 0.09016994374947444], CircleBox[{4.472135954999583, 3.3819660112501118}, 0.14589803375031593], CircleBox[{4.236067977499794, 3.3315594803123205}, 0.0954915028125264], CircleBox[{4.236067977499794, 3.0815594803123205}, 0.1545084971874735], CircleBox[{4.631658872499776, 5.760715623749715}, 0.6400795137499663], CircleBox[{5.456085866315521, 6.498105544012833}, 0.4660053666447195], CircleBox[{4.23606797749979, 7.413118960624632}, 1.0590169943749475], CircleBox[{3.372046510920909, 1.2200178888157331}, 0.28800715552629297], CircleBox[{3.788854381999834, 0.32360679774997925}, 0.32360679774997925], CircleBox[{3.268489762777639, 0.6504557740277432}, 0.2908926654166552], CircleBox[{2.618033988749896, 0.40450849718747406}, 0.40450849718747406], CircleBox[{6.637559601590591, 0.5669152706817988}, 0.13383054136359787], CircleBox[{6.472135954999582, 0.23606797749978975}, 0.23606797749978975], CircleBox[{6.995142309137604, 0.510288754353409}, 0.22820806857758286], CircleBox[{6.854101966249687, 0.15450849718747378}, 0.15450849718747378], CircleBox[{6.256645486206613, 3.3232357031894604}, 0.3692484114654944], CircleBox[{6.85410196624969, 3.4860679774997902}, 0.25000000000000017], CircleBox[{6.854101966249689, 2.831559480312316}, 0.4045084971874737], CircleBox[{-5.236067977499794, 4.236067977499796}], CircleBox[{-5.236067977499792, 1.618033988749895}, 1.618033988749895], CircleBox[{-8.47213595499958, 1.6180339887498947}, 1.6180339887498947], CircleBox[{-8.47213595499958, 5.854101966249684}, 2.6180339887498945], CircleBox[{11.70820393249937, 4.236067977499796}], CircleBox[{16.944271909999163, 4.2360679774997925}, 4.2360679774997925], CircleBox[{11.708203932499371, 1.618033988749895}, 1.618033988749895], CircleBox[{4.300700294777015, 3.648549229591426}, 0.10457728612622741], CircleBox[{4.338485732733606, 3.5099086876347356}, 0.03912010144784831], CircleBox[{4.236067977499793, 3.4919169369032477}, 0.06486595377840162], CircleBox[{4.053323979868238, 2.809665316359496}, 0.06091466587718499], CircleBox[{4.183931258032595, 2.896529615930177}, 0.03772648461884653], CircleBox[{4.107690527164227, 2.8930111608128017}, 0.03859539015998894], CircleBox[{4.081559480312318, 2.9656781074217147}, 0.0386271242968683], CircleBox[{4.747090739999821, 3.2581135024998713}, 0.0933863424999766], CircleBox[{4.618033988749886, 3.272542485937371}, 0.036474508437578476], CircleBox[{4.618033988749895, 3.1770509831248472}, 0.059016994374946875], CircleBox[{4.323981065502157, 3.2429857991266196}, 0.029304362667455078], CircleBox[{4.369898518863391, 3.2070879956093132}, 0.028979981890481118], CircleBox[{4.3851391759997815, 5.108745973749769}, 0.05694013108331233], CircleBox[{4.3993436320332755, 4.951536346130142}, 0.10090990403707892], CircleBox[{4.236067977499793, 4.9802190180963475}, 0.06486595377840186], CircleBox[{4.236067977499793, 5.140576474687274}, 0.09549150281252596], CircleBox[{3.9449457974348725, 6.028617474058145}, 0.09704072668830581], CircleBox[{4.1153812123082485, 6.273142822963835}, 0.0873297636910557], CircleBox[{3.9561645270757317, 6.209460713395294}, 0.08415015914403758], CircleBox[{3.8061893348788467, 6.328731820816217}, 0.10746966065523592], CircleBox[{4.867543707833093, 6.393446629166314}, 0.03519093633336125], CircleBox[{4.787403749494142, 6.441411065477199}, 0.05820606615167351], CircleBox[{4.9338634249997835, 6.458511071249701}, 0.0577159337500254], CircleBox[{4.854101966249685, 6.5086104634371615}, 0.03647450843757882], CircleBox[{5.426504401170463, 5.438627774694855}, 0.2175451109877916], CircleBox[{5.720271424886079, 5.645457877897454}, 0.14172881767044895], CircleBox[{5.4560858663155205, 5.843597046825371}, 0.1885031305427526], CircleBox[{2.6425782955984594, 7.759505704964401}, 0.16822918183097382], CircleBox[{2.968406894772595, 7.554847778295083}, 0.2165423646591003], CircleBox[{3.128322743103304, 7.874679474956502}, 0.14104034288791284], CircleBox[{2.824045318333195, 8.181243289582927}, 0.2908926654166548], CircleBox[{6.07843408025251, 7.427670477162557}, 0.24656485292133884], CircleBox[{5.648090636666385, 8.001461735277383}, 0.47067421972219875], CircleBox[{5.574298953963813, 7.244592502589417}, 0.28978370010357635], CircleBox[{3.5716567596772824, 1.6180339887498907}, 0.04637722907261107], CircleBox[{3.47356897574365, 1.5605345876962087}, 0.06732147135330832], CircleBox[{3.427050983124843, 1.665779740156156}, 0.047745751406263075], CircleBox[{3.5353221654543927, 1.7469831269033174}, 0.08759322650567423], CircleBox[{2.9927632866528757, 1.0720511742417451}, 0.11911679713797131], CircleBox[{3.0065922629632085, 0.8896569847071815}, 0.06380089189663783], CircleBox[{2.8144910837095556, 0.9000798658870479}, 0.128582837983864], CircleBox[{4.291796067500635, 0.23606797749978986}, 0.05572809000084117], CircleBox[{4.3964254340907205, 0.1089284288223054}, 0.1089284288223054], CircleBox[{4.167088466049541, 0.18059070550412848}, 0.08076261872237533], CircleBox[{4.236067977499792, 0.05901699437494747}, 0.05901699437494747], CircleBox[{3.6508483330053076, 0.943295404303224}, 0.10481060047813567], CircleBox[{3.5847388802584668, 0.7955488400753842}, 0.0570520171443955], CircleBox[{3.7434708861691943, 0.7522876245866496}, 0.10746966065523565], CircleBox[{1.933409783017148, 0.3692484114654956}, 0.08716772568966957], CircleBox[{1.74535599249993, 0.17978155430554385}, 0.17978155430554385], CircleBox[{2., 0.09016994374947426}, 0.09016994374947426], CircleBox[{2.1126551824156508, 0.2667713009690788}, 0.11930375268258314], CircleBox[{3.2437398678517684, 0.29158229760262566}, 0.06883324326979351], CircleBox[{3.0964639857893417, 0.14146505182132219}, 0.14146505182132219], CircleBox[{3.3720465109209092, 0.13421288010733348}, 0.13421288010733348], CircleBox[{6.69982991367446, 0.3998830953545377}, 0.044431455039392935], CircleBox[{6.741159964473352, 0.31980199585522384}, 0.045685999407889116], CircleBox[{6.180339887498956, 0.23606797749978947}, 0.05572809000084108], CircleBox[{6.000000000000008, 0.09016994374947448}, 0.09016994374947448], CircleBox[{6.142681634999817, 0.12905675124993132}, 0.05771593375002547], CircleBox[{6.236067977499793, 0.059016994374947444}, 0.059016994374947444], CircleBox[{6.7152444384058105, 0.77236804621173}, 0.08581867180130306], CircleBox[{6.854101966249696, 0.7548814032101687}, 0.054135591164774885], CircleBox[{6.854101966249689, 0.9438531601040971}, 0.13483616572915674], CircleBox[{6.637559601590587, 0.028979981890481083}, 0.028979981890481083], CircleBox[{7.167833824628376, 0.27378688952968905}, 0.06463231727723194], CircleBox[{7.113565781363298, 0.10892842882230544}, 0.10892842882230544], CircleBox[{7.39344662916633, 0.17978155430554416}, 0.17978155430554416], CircleBox[{5.754995607727034, 3.1944610200307926}, 0.0416069574689965], CircleBox[{5.754995607727028, 3.303389448853099}, 0.06732147135330771], CircleBox[{5.854101966249695, 3.2725424859373704}, 0.03647450843757853], CircleBox[{5.854101966249703, 3.1770509831248392}, 0.05901699437494673], CircleBox[{6.320467226597272, 3.842265586432701}, 0.1536906234573061], CircleBox[{6.558415966841808, 3.926001976118186}, 0.09856199980262817], CircleBox[{6.558415966841802, 3.7078324770557}, 0.11960749925986047], CircleBox[{6.2881007869285845, 2.9083630507964155}, 0.04681498952905354], CircleBox[{6.402590207155675, 2.80706169516267}, 0.04766736470412423], CircleBox[{6.371649994831528, 2.888168195231081}, 0.03914024493933066], CircleBox[{6.424223323628744, 2.9487196742236104}, 0.04104975761088273], CircleBox[{6.774850317308852, 2.2591932970036654}, 0.04898021270991386], CircleBox[{6.744093021841826, 2.372046510920917}, 0.06798926671055915], CircleBox[{6.904016009640584, 2.2714172993161554}, 0.08076261872237538], CircleBox[{6.854101966249698, 2.3843458848123618}, 0.04270509831248402], CircleBox[{6.637559601590588, 3.207087995609309}, 0.02897998189048106], CircleBox[{6.683281572999752, 3.2652475842498525}, 0.029179606750063064], CircleBox[{7.393446629166326, 3.3471790886109054}, 0.1111111111111112], CircleBox[{7.165369333867073, 3.26691655283129}, 0.13067666211325166], CircleBox[{7.3934466291663155, 3.056286423194243}, 0.17978155430554368], CircleBox[{-4.472135954999585, 3.1458980337503215}, 0.09016994374947444], CircleBox[{-4.472135954999583, 3.3819660112501118}, 0.14589803375031593], CircleBox[{-4.236067977499794, 3.3315594803123205}, 0.0954915028125264], CircleBox[{-4.236067977499794, 3.0815594803123205}, 0.1545084971874735], CircleBox[{-4.631658872499776, 5.760715623749715}, 0.6400795137499663], CircleBox[{-5.456085866315521, 6.498105544012833}, 0.4660053666447195], CircleBox[{-4.23606797749979, 7.413118960624632}, 1.0590169943749475], CircleBox[{-3.372046510920909, 1.2200178888157331}, 0.28800715552629297], CircleBox[{-3.788854381999834, 0.32360679774997925}, 0.32360679774997925], CircleBox[{-3.268489762777639, 0.6504557740277432}, 0.2908926654166552], CircleBox[{-2.618033988749896, 0.40450849718747406}, 0.40450849718747406], CircleBox[{-6.637559601590591, 0.5669152706817988}, 0.13383054136359787], CircleBox[{-6.472135954999582, 0.23606797749978975}, 0.23606797749978975], CircleBox[{-6.995142309137604, 0.510288754353409}, 0.22820806857758286], CircleBox[{-6.854101966249687, 0.15450849718747378}, 0.15450849718747378], CircleBox[{-6.256645486206613, 3.3232357031894604}, 0.3692484114654944], CircleBox[{-6.85410196624969, 3.4860679774997902}, 0.25000000000000017], CircleBox[{-6.854101966249689, 2.831559480312316}, 0.4045084971874737], CircleBox[{-11.70820393249937, 4.236067977499796}], CircleBox[{-16.944271909999163, 4.2360679774997925}, 4.2360679774997925], CircleBox[{-11.708203932499371, 1.618033988749895}, 1.618033988749895], CircleBox[{12.472135954999578, 3.1458980337503215}, 0.09016994374947444], CircleBox[{12.47213595499958, 3.3819660112501118}, 0.14589803375031593], CircleBox[{12.70820393249937, 3.3315594803123205}, 0.0954915028125264], CircleBox[{12.70820393249937, 3.0815594803123205}, 0.1545084971874735], CircleBox[{12.312613037499387, 5.760715623749715}, 0.6400795137499663], CircleBox[{11.48818604368364, 6.498105544012833}, 0.4660053666447195], CircleBox[{12.708203932499373, 7.413118960624632}, 1.0590169943749475], CircleBox[{13.572225399078254, 1.2200178888157331}, 0.28800715552629297], CircleBox[{13.155417527999328, 0.32360679774997925}, 0.32360679774997925], CircleBox[{13.675782147221524, 0.6504557740277432}, 0.2908926654166552], CircleBox[{14.326237921249268, 0.40450849718747406}, 0.40450849718747406], CircleBox[{10.306712308408573, 0.5669152706817988}, 0.13383054136359787], CircleBox[{10.47213595499958, 0.23606797749978975}, 0.23606797749978975], CircleBox[{9.949129600861559, 0.510288754353409}, 0.22820806857758286], CircleBox[{10.090169943749476, 0.15450849718747378}, 0.15450849718747378], CircleBox[{10.68762642379255, 3.3232357031894604}, 0.3692484114654944], CircleBox[{10.090169943749473, 3.4860679774997902}, 0.25000000000000017], CircleBox[{10.090169943749473, 2.831559480312316}, 0.4045084971874737], CircleBox[{22.180339887498956, 4.236067977499796}], CircleBox[{22.180339887498956, 1.618033988749895}, 1.618033988749895], CircleBox[{25.416407864998742, 1.6180339887498947}, 1.6180339887498947], CircleBox[{25.416407864998746, 5.854101966249684}, 2.6180339887498945], CircleBox[{4.291241573004763, 3.815753651661301}, 0.034099157303617504], CircleBox[{4.427423162444608, 3.590115643518519}, 0.034969011464341476], CircleBox[{3.9766041623861788, 2.6847073703833773}, 0.0324329768892004], CircleBox[{4.894427190999892, 3.265247584249867}, 0.029179606750060857], CircleBox[{4.68063786612426, 3.365360484011887}, 0.032779815758725336], CircleBox[{4.2859290443986, 4.750945217304306}, 0.08067690095761616], CircleBox[{4.236067977499795, 4.868415619221364}, 0.0469374450965872], CircleBox[{4.1338905067126674, 5.306084343120581}, 0.03405915692904149], CircleBox[{4.570267987688476, 5.062255838848491}, 0.06107304587038753], CircleBox[{4.479290805670512, 5.100407831733747}, 0.03757999366234484], CircleBox[{3.960984104921273, 5.832118630835772}, 0.03438548407231441], CircleBox[{3.8397443143677688, 6.113238148702645}, 0.037970423283867086], CircleBox[{3.8061893348788454, 6.182379271659975}, 0.03888288850100596], CircleBox[{4.051882200652925, 6.102589138463668}, 0.0329869683160195], CircleBox[{4.088320765561499, 6.1566816263431905}, 0.03223393521645628], CircleBox[{3.6396266425555837, 6.486397355608413}, 0.04305160568308296], CircleBox[{3.70555159401348, 6.422096324683534}, 0.02980701423483748], CircleBox[{3.9467397104726474, 6.357104248264026}, 0.03591584321053117], CircleBox[{4.015365477389482, 6.342327218137446}, 0.034282849827769926], CircleBox[{4.975762536263806, 6.345108634441399}, 0.038096364884126134], CircleBox[{4.955978546752872, 6.581404992496562}, 0.04099180218153242], CircleBox[{5.175330999339927, 5.275925440504886}, 0.041629744142959765], CircleBox[{5.183281572999757, 5.3723392204684925}, 0.03454915028125206], CircleBox[{5.688229281387888, 5.24659334642205}, 0.10707333360044709], CircleBox[{5.835736779936425, 5.3406893625472005}, 0.06789101242088236], CircleBox[{5.720271424886078, 5.427288378834968}, 0.07644068139204015], CircleBox[{5.28685884490105, 6.029937510268809}, 0.031808948734577], CircleBox[{5.800229349051443, 5.933238836327286}, 0.055044303241377324], CircleBox[{5.710186617062918, 5.852702168484845}, 0.06576069852230121], CircleBox[{5.6788878889062495, 5.997267906612137}, 0.08215435488509687], CircleBox[{2.3766690513087494, 7.903601071408887}, 0.13421288010733304], CircleBox[{2.4544337677271564, 8.109265104204145}, 0.08566218784090651], CircleBox[{2.118033988749901, 8.207381706405842}, 0.264754248593736], CircleBox[{2.9993841199046587, 7.2933186068283}, 0.04681498952905375], CircleBox[{3.1342401435671783, 7.3533368154115335}, 0.04443145503939316], CircleBox[{3.0891382814803725, 7.2767400925391374}, 0.044457441446545336], CircleBox[{3.136961618977111, 7.178431735141695}, 0.0648659537784019], CircleBox[{2.8564128879455297, 7.795122667389249}, 0.048551354418501766], CircleBox[{2.8895310166530814, 7.866741731552022}, 0.030354290504033914], CircleBox[{2.949211838590762, 7.817627457812107}, 0.04693744509658749], CircleBox[{3.1809564303346924, 8.191814328344849}, 0.06617495945383396], CircleBox[{3.3888543819998325, 8.302693235899588}, 0.16944271909999162], CircleBox[{3.277839414409729, 8.060213960977807}, 0.0972415920164004], CircleBox[{6.244137008493529, 7.7979963127711915}, 0.15914278189328898], CircleBox[{6.548621456069778, 7.842657662993157}, 0.14859966727397853], CircleBox[{6.354101966249682, 8.20738170640585}, 0.264754248593736], CircleBox[{5.435506834809585, 7.540438703807704}, 0.03700097994524783], CircleBox[{5.33344725219201, 7.469593452795464}, 0.03981449443030913], CircleBox[{5.363805943238234, 7.537700278521263}, 0.03475218601400544], CircleBox[{5.321990426771064, 7.603883208253475}, 0.04353394050503319], CircleBox[{5.285156591196916, 7.086588977640506}, 0.039713522711282395], CircleBox[{5.304195317399342, 6.983570413130159}, 0.04266631331904909], CircleBox[{5.938610399020357, 7.113360214864737}, 0.09744329061458494], CircleBox[{6.014459422840606, 6.957440671556471}, 0.07594638151136056], CircleBox[{5.829557659401117, 6.936768025945957}, 0.11010742898326883], CircleBox[{5.186076198408835, 8.247869435681407}, 0.05294214363635831], CircleBox[{5.114982232576085, 8.136420582757232}, 0.07925164894084046], CircleBox[{5.007043336758099, 8.222643087845858}, 0.05889727654960269], CircleBox[{5.083281572999749, 8.367414595449587}, 0.10472135954999576], CircleBox[{3.3329436511817896, 1.5501487661281506}, 0.04443145503939261], CircleBox[{3.3669998526227998, 1.6163607213472584}, 0.03002556525102138], CircleBox[{3.6066836793985724, 1.9353404280906068}, 0.04195895320674678], CircleBox[{3.5819235209943305, 1.475048280455735}, 0.042278872058001994], CircleBox[{3.5909253014327747, 1.5454626507163838}, 0.02870856056402011], CircleBox[{3.132468329102122, 0.9962066466226572}, 0.039848265864905814], CircleBox[{3.0793536691181016, 0.9498650617177586}, 0.030640808442508133], CircleBox[{2.6391434334470723, 0.8383107041973045}, 0.029807014234837465], CircleBox[{2.902597367416355, 0.7514456824517044}, 0.044202687203041414], CircleBox[{2.949448087693613, 0.8121599804861706}, 0.032486399219446786], CircleBox[{4.534151589016966, 0.12697786753957294}, 0.02997540837730314], CircleBox[{4.644695978684021, 0.05403484157548009}, 0.05403484157548009], CircleBox[{4.560570979879512, 0.07112697166331981}, 0.031808948734576875], CircleBox[{4.512461179749817, 0.030901699437494816}, 0.030901699437494816], CircleBox[{4.234181512826688, 0.3046611153854562}, 0.03385123504282836], CircleBox[{4.161028044556274, 0.3437999161794044}, 0.04911427373991492], CircleBox[{4.142681634999815, 0.036942786810341625}, 0.036942786810341625], CircleBox[{4.053323979868239, 0.05403484157547994}, 0.05403484157547994], CircleBox[{3.5100964824847822, 0.925753632931864}, 0.037030145317274096], CircleBox[{3.6127353873768944, 0.714617730532746}, 0.028584709221309856], CircleBox[{3.637279511252626, 0.652321901140459}, 0.03837187653767406], CircleBox[{2.0357335707721322, 0.4627047213945366}, 0.0514116357105039], CircleBox[{2.1017930018070095, 0.4154741915548447}, 0.029795330601443286], CircleBox[{2.1520286221051754, 0.5040125221710136}, 0.07200178888157337], CircleBox[{1.5169234915908456, 0.22426651931817185}, 0.05294214363635826], CircleBox[{1.548231992894671, 0.054034841575479844}, 0.054034841575479844], CircleBox[{1.4649258522768986, 0.1274174499427778}, 0.05698281591834556], CircleBox[{1.309016994374948, 0.10112712429686851}, 0.10112712429686851], CircleBox[{2.1760899590192637, 0.13067666211325174}, 0.03084857533149869], CircleBox[{2.2676610827271966, 0.07587057758263599}, 0.07587057758263599], CircleBox[{2.139603991710449, 0.054034841575479824}, 0.054034841575479824], CircleBox[{3.142230156027349, 0.31148800123863707}, 0.03460977791540401], CircleBox[{3.0623742797629028, 0.32645113557462696}, 0.04663587651066099], CircleBox[{3.5493597244040864, 0.06482592434875628}, 0.028991034709615563], CircleBox[{3.345546966046252, 0.2996058500037661}, 0.03328953888930724], CircleBox[{3.4221988564157306, 0.30473758353523217}, 0.04353394050503317], CircleBox[{2.968406894772594, 0.028979981890481094}, 0.028979981890481094], CircleBox[{2.9036104608782893, 0.07332951885411183}, 0.03279395778302931], CircleBox[{5.788854381999839, 0.04721359549995801}, 0.04721359549995801], CircleBox[{5.883281572999754, 0.0652475842498532}, 0.029179606750063276], CircleBox[{6.102237436136199, 0.0289799818904811}, 0.0289799818904811], CircleBox[{6.802983248181599, 1.102237436136196}, 0.031593105227406396], CircleBox[{6.8794499627346735, 1.1535005743393558}, 0.04101391985940124], CircleBox[{6.9298894016232895, 0.7954294374442638}, 0.03181717749777057], CircleBox[{7.001195965226964, 0.8335326608711477}, 0.049031332992420455], CircleBox[{7.028059507847761, 0.2202845043354241}, 0.031469214905060584], CircleBox[{7.593553117015736, 0.12141716201613688}, 0.02866270387091368], CircleBox[{7.577708763999686, 0.047213595499958134}, 0.047213595499958134], CircleBox[{7.6819822029340665, 0.13649570362703917}, 0.061042734389344835], CircleBox[{7.6631189606246535, 0.038627124296868466}, 0.038627124296868466], CircleBox[{7.2460918366588025, 0.33981124864587725}, 0.037756805405097356], CircleBox[{7.229601527022399, 0.40450849718747295}, 0.029008936414773163], CircleBox[{7.316397391606806, 0.40450849718747284}, 0.05778692816963898], CircleBox[{5.853229405064079, 3.397750791384645}, 0.04099180218153102], CircleBox[{5.609258426932468, 3.249092696602047}, 0.05517359550498009], CircleBox[{5.683281572999785, 3.2051662780622876}, 0.030901699437493525], CircleBox[{6.136721847243019, 3.7373975321392496}, 0.029489973802321063], CircleBox[{6.307842006943807, 4.078861671335899}, 0.08324207492521923], CircleBox[{6.434280694545179, 4.128188179871923}, 0.052477658963065305], CircleBox[{6.434280694545164, 4.019103430340675}, 0.056607090568177164], CircleBox[{6.741971636797586, 3.8420048452034234}, 0.035643345159037144], CircleBox[{6.722225308235342, 3.757161094523222}, 0.05146796019894793], CircleBox[{6.663968516310099, 3.8315929057943823}, 0.04305160568308252], CircleBox[{6.794327281551418, 2.1755069199136496}, 0.03694278681034126], CircleBox[{6.854101966249652, 2.089960568801931}, 0.06741808286457793], CircleBox[{6.923173906854946, 2.403591213539476}, 0.028997869943995384], CircleBox[{7.001195965226956, 2.4025353166286245}, 0.049031332992421364], CircleBox[{7.25373206958493, 3.4209032167411295}, 0.04686168790056322], CircleBox[{7.234439711664375, 3.5037963986450094}, 0.038246917306460355], CircleBox[{7.157011512851771, 3.452201660637992}, 0.05479685175615843], CircleBox[{7.331951382790222, 2.8152277895697178}, 0.03523364095368246], CircleBox[{7.543069126178385, 3.2517339008742168}, 0.06636191634437134], CircleBox[{7.663118960624622, 3.2985679774997836}, 0.06249999999999928], CircleBox[{7.66311896062462, 3.1349408532029135}, 0.10112712429686743], CircleBox[{-4.300700294777015, 3.648549229591426}, 0.10457728612622741], CircleBox[{-4.338485732733606, 3.5099086876347356}, 0.03912010144784831], CircleBox[{-4.236067977499793, 3.4919169369032477}, 0.06486595377840162], CircleBox[{-4.053323979868238, 2.809665316359496}, 0.06091466587718499], CircleBox[{-4.183931258032595, 2.896529615930177}, 0.03772648461884653], CircleBox[{-4.107690527164227, 2.8930111608128017}, 0.03859539015998894], CircleBox[{-4.081559480312318, 2.9656781074217147}, 0.0386271242968683], CircleBox[{-4.747090739999821, 3.2581135024998713}, 0.0933863424999766], CircleBox[{-4.618033988749886, 3.272542485937371}, 0.036474508437578476], CircleBox[{-4.618033988749895, 3.1770509831248472}, 0.059016994374946875], CircleBox[{-4.323981065502157, 3.2429857991266196}, 0.029304362667455078], CircleBox[{-4.369898518863391, 3.2070879956093132}, 0.028979981890481118], CircleBox[{-4.3851391759997815, 5.108745973749769}, 0.05694013108331233], CircleBox[{-4.3993436320332755, 4.951536346130142}, 0.10090990403707892], CircleBox[{-4.236067977499793, 4.9802190180963475}, 0.06486595377840186], CircleBox[{-4.236067977499793, 5.140576474687274}, 0.09549150281252596], CircleBox[{-3.9449457974348725, 6.028617474058145}, 0.09704072668830581], CircleBox[{-4.1153812123082485, 6.273142822963835}, 0.0873297636910557], CircleBox[{-3.9561645270757317, 6.209460713395294}, 0.08415015914403758], CircleBox[{-3.8061893348788467, 6.328731820816217}, 0.10746966065523592], CircleBox[{-4.867543707833093, 6.393446629166314}, 0.03519093633336125], CircleBox[{-4.787403749494142, 6.441411065477199}, 0.05820606615167351], CircleBox[{-4.9338634249997835, 6.458511071249701}, 0.0577159337500254], CircleBox[{-4.854101966249685, 6.5086104634371615}, 0.03647450843757882], CircleBox[{-5.426504401170463, 5.438627774694855}, 0.2175451109877916], CircleBox[{-5.720271424886079, 5.645457877897454}, 0.14172881767044895], CircleBox[{-5.4560858663155205, 5.843597046825371}, 0.1885031305427526], CircleBox[{-2.6425782955984594, 7.759505704964401}, 0.16822918183097382], CircleBox[{-2.968406894772595, 7.554847778295083}, 0.2165423646591003], CircleBox[{-3.128322743103304, 7.874679474956502}, 0.14104034288791284], CircleBox[{-2.824045318333195, 8.181243289582927}, 0.2908926654166548], CircleBox[{-6.07843408025251, 7.427670477162557}, 0.24656485292133884], CircleBox[{-5.648090636666385, 8.001461735277383}, 0.47067421972219875], CircleBox[{-5.574298953963813, 7.244592502589417}, 0.28978370010357635], CircleBox[{-3.5716567596772824, 1.6180339887498907}, 0.04637722907261107], CircleBox[{-3.47356897574365, 1.5605345876962087}, 0.06732147135330832], CircleBox[{-3.427050983124843, 1.665779740156156}, 0.047745751406263075], CircleBox[{-3.5353221654543927, 1.7469831269033174}, 0.08759322650567423], CircleBox[{-2.9927632866528757, 1.0720511742417451}, 0.11911679713797131], CircleBox[{-3.0065922629632085, 0.8896569847071815}, 0.06380089189663783], CircleBox[{-2.8144910837095556, 0.9000798658870479}, 0.128582837983864], CircleBox[{-4.291796067500635, 0.23606797749978986}, 0.05572809000084117], CircleBox[{-4.3964254340907205, 0.1089284288223054}, 0.1089284288223054], CircleBox[{-4.167088466049541, 0.18059070550412848}, 0.08076261872237533], CircleBox[{-4.236067977499792, 0.05901699437494747}, 0.05901699437494747], CircleBox[{-3.6508483330053076, 0.943295404303224}, 0.10481060047813567], CircleBox[{-3.5847388802584668, 0.7955488400753842}, 0.0570520171443955], CircleBox[{-3.7434708861691943, 0.7522876245866496}, 0.10746966065523565], CircleBox[{-1.933409783017148, 0.3692484114654956}, 0.08716772568966957], CircleBox[{-1.74535599249993, 0.17978155430554385}, 0.17978155430554385], CircleBox[{-2., 0.09016994374947426}, 0.09016994374947426], CircleBox[{-2.1126551824156508, 0.2667713009690788}, 0.11930375268258314], CircleBox[{-3.2437398678517684, 0.29158229760262566}, 0.06883324326979351], CircleBox[{-3.0964639857893417, 0.14146505182132219}, 0.14146505182132219], CircleBox[{-3.3720465109209092, 0.13421288010733348}, 0.13421288010733348], CircleBox[{-6.69982991367446, 0.3998830953545377}, 0.044431455039392935], CircleBox[{-6.741159964473352, 0.31980199585522384}, 0.045685999407889116], CircleBox[{-6.180339887498956, 0.23606797749978947}, 0.05572809000084108], CircleBox[{-6.000000000000008, 0.09016994374947448}, 0.09016994374947448], CircleBox[{-6.142681634999817, 0.12905675124993132}, 0.05771593375002547], CircleBox[{-6.236067977499793, 0.059016994374947444}, 0.059016994374947444], CircleBox[{-6.7152444384058105, 0.77236804621173}, 0.08581867180130306], CircleBox[{-6.854101966249696, 0.7548814032101687}, 0.054135591164774885], CircleBox[{-6.854101966249689, 0.9438531601040971}, 0.13483616572915674], CircleBox[{-6.637559601590587, 0.028979981890481083}, 0.028979981890481083], CircleBox[{-7.167833824628376, 0.27378688952968905}, 0.06463231727723194], CircleBox[{-7.113565781363298, 0.10892842882230544}, 0.10892842882230544], CircleBox[{-7.39344662916633, 0.17978155430554416}, 0.17978155430554416], CircleBox[{-5.754995607727034, 3.1944610200307926}, 0.0416069574689965], CircleBox[{-5.754995607727028, 3.303389448853099}, 0.06732147135330771], CircleBox[{-5.854101966249695, 3.2725424859373704}, 0.03647450843757853], CircleBox[{-5.854101966249703, 3.1770509831248392}, 0.05901699437494673], CircleBox[{-6.320467226597272, 3.842265586432701}, 0.1536906234573061], CircleBox[{-6.558415966841808, 3.926001976118186}, 0.09856199980262817], CircleBox[{-6.558415966841802, 3.7078324770557}, 0.11960749925986047], CircleBox[{-6.2881007869285845, 2.9083630507964155}, 0.04681498952905354], CircleBox[{-6.402590207155675, 2.80706169516267}, 0.04766736470412423], CircleBox[{-6.371649994831528, 2.888168195231081}, 0.03914024493933066], CircleBox[{-6.424223323628744, 2.9487196742236104}, 0.04104975761088273], CircleBox[{-6.774850317308852, 2.2591932970036654}, 0.04898021270991386], CircleBox[{-6.744093021841826, 2.372046510920917}, 0.06798926671055915], CircleBox[{-6.904016009640584, 2.2714172993161554}, 0.08076261872237538], CircleBox[{-6.854101966249698, 2.3843458848123618}, 0.04270509831248402], CircleBox[{-6.637559601590588, 3.207087995609309}, 0.02897998189048106], CircleBox[{-6.683281572999752, 3.2652475842498525}, 0.029179606750063064], CircleBox[{-7.393446629166326, 3.3471790886109054}, 0.1111111111111112], CircleBox[{-7.165369333867073, 3.26691655283129}, 0.13067666211325166], CircleBox[{-7.3934466291663155, 3.056286423194243}, 0.17978155430554368], CircleBox[{-12.472135954999578, 3.1458980337503215}, 0.09016994374947444], CircleBox[{-12.47213595499958, 3.3819660112501118}, 0.14589803375031593], CircleBox[{-12.70820393249937, 3.3315594803123205}, 0.0954915028125264], CircleBox[{-12.70820393249937, 3.0815594803123205}, 0.1545084971874735], CircleBox[{-12.312613037499387, 5.760715623749715}, 0.6400795137499663], CircleBox[{-11.48818604368364, 6.498105544012833}, 0.4660053666447195], CircleBox[{-12.708203932499373, 7.413118960624632}, 1.0590169943749475], CircleBox[{-13.572225399078254, 1.2200178888157331}, 0.28800715552629297], CircleBox[{-13.155417527999328, 0.32360679774997925}, 0.32360679774997925], CircleBox[{-13.675782147221524, 0.6504557740277432}, 0.2908926654166552], CircleBox[{-14.326237921249268, 0.40450849718747406}, 0.40450849718747406], CircleBox[{-10.306712308408573, 0.5669152706817988}, 0.13383054136359787], CircleBox[{-10.47213595499958, 0.23606797749978975}, 0.23606797749978975], CircleBox[{-9.949129600861559, 0.510288754353409}, 0.22820806857758286], CircleBox[{-10.090169943749476, 0.15450849718747378}, 0.15450849718747378], CircleBox[{-10.68762642379255, 3.3232357031894604}, 0.3692484114654944], CircleBox[{-10.090169943749473, 3.4860679774997902}, 0.25000000000000017], CircleBox[{-10.090169943749473, 2.831559480312316}, 0.4045084971874737], CircleBox[{-22.180339887498956, 4.236067977499796}], CircleBox[{-22.180339887498956, 1.618033988749895}, 1.618033988749895], CircleBox[{-25.416407864998742, 1.6180339887498947}, 1.6180339887498947], CircleBox[{-25.416407864998746, 5.854101966249684}, 2.6180339887498945], CircleBox[{12.643571615222147, 3.648549229591426}, 0.10457728612622741], CircleBox[{12.605786177265557, 3.5099086876347356}, 0.03912010144784831], CircleBox[{12.708203932499371, 3.4919169369032477}, 0.06486595377840162], CircleBox[{12.890947930130924, 2.809665316359496}, 0.06091466587718499], CircleBox[{12.760340651966567, 2.896529615930177}, 0.03772648461884653], CircleBox[{12.836581382834934, 2.8930111608128017}, 0.03859539015998894], CircleBox[{12.862712429686843, 2.9656781074217147}, 0.0386271242968683], CircleBox[{12.197181169999343, 3.2581135024998713}, 0.0933863424999766], CircleBox[{12.326237921249277, 3.272542485937371}, 0.036474508437578476], CircleBox[{12.326237921249268, 3.1770509831248472}, 0.059016994374946875], CircleBox[{12.620290844497006, 3.2429857991266196}, 0.029304362667455078], CircleBox[{12.574373391135769, 3.2070879956093132}, 0.028979981890481118], CircleBox[{12.55913273399938, 5.108745973749769}, 0.05694013108331233], CircleBox[{12.544928277965887, 4.951536346130142}, 0.10090990403707892], CircleBox[{12.70820393249937, 4.9802190180963475}, 0.06486595377840186], CircleBox[{12.70820393249937, 5.140576474687274}, 0.09549150281252596], CircleBox[{12.99932611256429, 6.028617474058145}, 0.09704072668830581], CircleBox[{12.828890697690914, 6.273142822963835}, 0.0873297636910557], CircleBox[{12.988107382923431, 6.209460713395294}, 0.08415015914403758], CircleBox[{13.138082575120315, 6.328731820816217}, 0.10746966065523592], CircleBox[{12.076728202166066, 6.393446629166314}, 0.03519093633336125], CircleBox[{12.156868160505024, 6.441411065477199}, 0.05820606615167351], CircleBox[{12.010408484999378, 6.458511071249701}, 0.0577159337500254], CircleBox[{12.090169943749478, 6.5086104634371615}, 0.03647450843757882], CircleBox[{11.5177675088287, 5.438627774694855}, 0.2175451109877916], CircleBox[{11.224000485113084, 5.645457877897454}, 0.14172881767044895], CircleBox[{11.488186043683644, 5.843597046825371}, 0.1885031305427526], CircleBox[{14.301693614400703, 7.759505704964401}, 0.16822918183097382], CircleBox[{13.975865015226567, 7.554847778295083}, 0.2165423646591003], CircleBox[{13.81594916689586, 7.874679474956502}, 0.14104034288791284], CircleBox[{14.12022659166597, 8.181243289582927}, 0.2908926654166548], CircleBox[{10.865837829746654, 7.427670477162557}, 0.24656485292133884], CircleBox[{11.296181273332778, 8.001461735277383}, 0.47067421972219875], CircleBox[{11.36997295603535, 7.244592502589417}, 0.28978370010357635], CircleBox[{13.372615150321879, 1.6180339887498907}, 0.04637722907261107], CircleBox[{13.470702934255513, 1.5605345876962087}, 0.06732147135330832], CircleBox[{13.51722092687432, 1.665779740156156}, 0.047745751406263075], CircleBox[{13.40894974454477, 1.7469831269033174}, 0.08759322650567423], CircleBox[{13.951508623346287, 1.0720511742417451}, 0.11911679713797131], CircleBox[{13.937679647035955, 0.8896569847071815}, 0.06380089189663783], CircleBox[{14.129780826289604, 0.9000798658870479}, 0.128582837983864], CircleBox[{12.652475842498527, 0.23606797749978986}, 0.05572809000084117], CircleBox[{12.547846475908441, 0.1089284288223054}, 0.1089284288223054], CircleBox[{12.777183443949625, 0.18059070550412848}, 0.08076261872237533], CircleBox[{12.708203932499371, 0.05901699437494747}, 0.05901699437494747], CircleBox[{13.293423576993856, 0.943295404303224}, 0.10481060047813567], CircleBox[{13.359533029740696, 0.7955488400753842}, 0.0570520171443955], CircleBox[{13.200801023829968, 0.7522876245866496}, 0.10746966065523565], CircleBox[{15.010862126982017, 0.3692484114654956}, 0.08716772568966957], CircleBox[{15.198915917499233, 0.17978155430554385}, 0.17978155430554385], CircleBox[{14.944271909999163, 0.09016994374947426}, 0.09016994374947426], CircleBox[{14.831616727583512, 0.2667713009690788}, 0.11930375268258314], CircleBox[{13.700532042147396, 0.29158229760262566}, 0.06883324326979351], CircleBox[{13.847807924209821, 0.14146505182132219}, 0.14146505182132219], CircleBox[{13.572225399078253, 0.13421288010733348}, 0.13421288010733348], CircleBox[{10.244441996324703, 0.3998830953545377}, 0.044431455039392935], CircleBox[{10.203111945525809, 0.31980199585522384}, 0.045685999407889116], CircleBox[{10.763932022500205, 0.23606797749978947}, 0.05572809000084108], CircleBox[{10.944271909999156, 0.09016994374947448}, 0.09016994374947448], CircleBox[{10.801590274999347, 0.12905675124993132}, 0.05771593375002547], CircleBox[{10.708203932499368, 0.059016994374947444}, 0.059016994374947444], CircleBox[{10.229027471593351, 0.77236804621173}, 0.08581867180130306], CircleBox[{10.090169943749466, 0.7548814032101687}, 0.054135591164774885], CircleBox[{10.090169943749476, 0.9438531601040971}, 0.13483616572915674], CircleBox[{10.306712308408574, 0.028979981890481083}, 0.028979981890481083], CircleBox[{9.776438085370787, 0.27378688952968905}, 0.06463231727723194], CircleBox[{9.830706128635864, 0.10892842882230544}, 0.10892842882230544], CircleBox[{9.550825280832834, 0.17978155430554416}, 0.17978155430554416], CircleBox[{11.189276302272129, 3.1944610200307926}, 0.0416069574689965], CircleBox[{11.189276302272136, 3.303389448853099}, 0.06732147135330771], CircleBox[{11.09016994374947, 3.2725424859373704}, 0.03647450843757853], CircleBox[{11.09016994374946, 3.1770509831248392}, 0.05901699437494673], CircleBox[{10.623804683401891, 3.842265586432701}, 0.1536906234573061], CircleBox[{10.385855943157356, 3.926001976118186}, 0.09856199980262817], CircleBox[{10.385855943157361, 3.7078324770557}, 0.11960749925986047], CircleBox[{10.656171123070576, 2.9083630507964155}, 0.04681498952905354], CircleBox[{10.541681702843485, 2.80706169516267}, 0.04766736470412423], CircleBox[{10.572621915167636, 2.888168195231081}, 0.03914024493933066], CircleBox[{10.520048586370418, 2.9487196742236104}, 0.04104975761088273], CircleBox[{10.169421592690309, 2.2591932970036654}, 0.04898021270991386], CircleBox[{10.200178888157339, 2.372046510920917}, 0.06798926671055915], CircleBox[{10.040255900358577, 2.2714172993161554}, 0.08076261872237538], CircleBox[{10.090169943749466, 2.3843458848123618}, 0.04270509831248402], CircleBox[{10.306712308408576, 3.207087995609309}, 0.02897998189048106], CircleBox[{10.260990336999411, 3.2652475842498525}, 0.029179606750063064], CircleBox[{9.550825280832836, 3.3471790886109054}, 0.1111111111111112], CircleBox[{9.778902576132092, 3.26691655283129}, 0.13067666211325166], CircleBox[{9.550825280832848, 3.056286423194243}, 0.17978155430554368], CircleBox[{21.41640786499875, 3.1458980337503215}, 0.09016994374947444], CircleBox[{21.416407864998742, 3.3819660112501118}, 0.14589803375031593], CircleBox[{21.180339887498956, 3.3315594803123205}, 0.0954915028125264], CircleBox[{21.180339887498956, 3.0815594803123205}, 0.1545084971874735], CircleBox[{21.57593078249894, 5.760715623749715}, 0.6400795137499663], CircleBox[{22.400357776314685, 6.498105544012833}, 0.4660053666447195], CircleBox[{21.180339887498953, 7.413118960624632}, 1.0590169943749475], CircleBox[{20.31631842092007, 1.2200178888157331}, 0.28800715552629297], CircleBox[{20.733126291999, 0.32360679774997925}, 0.32360679774997925], CircleBox[{20.2127616727768, 0.6504557740277432}, 0.2908926654166552], CircleBox[{19.562305898749056, 0.40450849718747406}, 0.40450849718747406], CircleBox[{23.581831511589755, 0.5669152706817988}, 0.13383054136359787], CircleBox[{23.416407864998746, 0.23606797749978975}, 0.23606797749978975], CircleBox[{23.939414219136765, 0.510288754353409}, 0.22820806857758286], CircleBox[{23.798373876248853, 0.15450849718747378}, 0.15450849718747378], CircleBox[{23.200917396205778, 3.3232357031894604}, 0.3692484114654944], CircleBox[{23.798373876248853, 3.4860679774997902}, 0.25000000000000017], CircleBox[{23.79837387624885, 2.831559480312316}, 0.4045084971874737], CircleBox[{28.652475842498532, 4.236067977499796}], CircleBox[{33.888543819998326, 4.2360679774997925}, 4.2360679774997925], CircleBox[{28.652475842498536, 1.618033988749895}, 1.618033988749895], CircleBox[{4.257833476405898, 3.897346625483688}, 0.03521731701221373], CircleBox[{4.965410891865912, 3.2429857991266178}, 0.029304362667455244], CircleBox[{5.081011271790178, 5.258324368416756}, 0.0339490851855861], CircleBox[{5.812265596126574, 5.129749977826541}, 0.06333024663982935], CircleBox[{5.900479195322323, 5.183047801476539}, 0.0397342821219733], CircleBox[{5.835736779936424, 5.23160461301596}, 0.041193737110360375], CircleBox[{5.806407832904139, 5.494000641879623}, 0.032508879537748635], CircleBox[{5.790064563689795, 5.8014370312027035}, 0.029152949905540855], CircleBox[{5.790148954235898, 6.0188778040394295}, 0.031185895357717014], CircleBox[{5.833092127401025, 6.061225512783406}, 0.029125335415294648], CircleBox[{5.7650529786434, 6.090936696801385}, 0.04511804960593542], CircleBox[{2.5448119223792984, 7.94117599142682}, 0.03807728126644007], CircleBox[{2.5108819314160815, 8.004260731489387}, 0.0335532200268332], CircleBox[{1.6535492065316484, 8.20458607317572}, 0.0631599594824662], CircleBox[{1.7829077199718224, 8.159794675491172}, 0.07373377414324749], CircleBox[{1.814491083709564, 8.27567886003992}, 0.04637722907261098], CircleBox[{1.6944271909999267, 8.367414595449583}, 0.10472135954999529], CircleBox[{2.513038394515452, 8.297658805579996}, 0.041188467783410246], CircleBox[{2.420610272857026, 8.38568558811183}, 0.08645036688775067], CircleBox[{2.433602907812845, 8.246598601509156}, 0.0532421468891386], CircleBox[{3.209045754446148, 7.048322446098648}, 0.030868845360735635], CircleBox[{3.178542920715906, 8.29886565405106}, 0.04090356950569742], CircleBox[{3.111617867130101, 8.330971947440503}, 0.03332430176023606], CircleBox[{3.1770509831248432, 8.405947392851147}, 0.06618856214843413], CircleBox[{3.1508806083866165, 8.044872190535045}, 0.030640808442508372], CircleBox[{3.5973838937588067, 8.306420545979805}, 0.03912010144784851], CircleBox[{3.6599800555137523, 8.338974549530764}, 0.031435143670052644], CircleBox[{3.6309154092855342, 8.418706689923052}, 0.05342926507652844], CircleBox[{6.337531659516016, 7.596679992750324}, 0.06278247927892747], CircleBox[{6.443650054274544, 7.579150246705434}, 0.044774044012428835], CircleBox[{6.424411054479184, 7.678968376951464}, 0.056881247236677035], CircleBox[{6.010397854125563, 8.34651622809565}, 0.02965479486428718], CircleBox[{6.063131575848153, 8.300064213631622}, 0.04062062796960079], CircleBox[{6.051525682142555, 8.418706689923052}, 0.053429265076528315], CircleBox[{6.880708136066684, 8.055494742938746}, 0.09835564827426399], CircleBox[{6.77770876399965, 8.302693235899588}, 0.1694427190999906], CircleBox[{6.683005475280017, 8.051087158737978}, 0.0993961377621966], CircleBox[{5.219486650061952, 6.9377561721200545}, 0.03326596632652322], CircleBox[{6.0784340802525065, 7.136777811745895}, 0.044327812495315436], CircleBox[{6.123177470023172, 7.077119958718344}, 0.030244503789122017], CircleBox[{6.059966407950126, 7.059143233277051}, 0.03547308157425611], CircleBox[{5.985982765543716, 6.784714065959313}, 0.036583980293397246], CircleBox[{5.956858710981066, 6.856158939340789}, 0.0405689878067502], CircleBox[{5.8933484941444885, 6.783332233988385}, 0.056060596975110226], CircleBox[{5.247570330177025, 8.3139681496946}, 0.03733835390392659], CircleBox[{5.2950849718747355, 8.405947392851145}, 0.06618856214843412], CircleBox[{4.95068372318286, 8.348155355836806}, 0.029267849293567957], CircleBox[{4.8412205457140445, 8.385685588111828}, 0.08645036688775082], CircleBox[{4.920095847402863, 8.280117669836795}, 0.04532936822135692], CircleBox[{4.7796518403446395, 0.03218654424197078}, 0.03218654424197078], CircleBox[{1.3893942516260163, 0.20356535405980192}, 0.029080764865685987], CircleBox[{1.1214171620161364, 0.12141716201613584}, 0.028662703870913433], CircleBox[{1.0472135954999582, 0.06472135954999579}, 0.06472135954999579], CircleBox[{1.1338305413635985, 0.028979981890481107}, 0.028979981890481107], CircleBox[{1.172851470999955, 0.081496206249994}, 0.03644621141666596], CircleBox[{1.418610697887265, 0.0296922807136464}, 0.0296922807136464], CircleBox[{2.837221395774531, 0.029692280713646407}, 0.029692280713646407], CircleBox[{5.669152706817997, 0.028979981890481628}, 0.028979981890481628], CircleBox[{6.8541019662496785, 1.2539763412810976}, 0.04045084971874479], CircleBox[{7.600886884134284, 0.21781226771633355}, 0.03111603824519051], CircleBox[{7.733639132068607, 0.032186544241971}, 0.032186544241971], CircleBox[{7.824922359499668, 0.06472135954999779}, 0.06472135954999779], CircleBox[{6.287814297591035, 4.212620339287953}, 0.052007658509724886], CircleBox[{6.365971511835156, 4.244870916623164}, 0.032542030294301444], CircleBox[{6.3659715118351805, 4.179420066904427}, 0.032908819424442966], CircleBox[{7.12955551962726, 3.531570275653281}, 0.029186531203746015], CircleBox[{7.824922359499661, 3.27606797749979}, 0.04000000000000048], CircleBox[{7.750907776327346, 3.2455268040250655}, 0.04006823214845766], CircleBox[{7.8249223594996185, 3.171346617949803}, 0.06472135954999433], CircleBox[{-4.291241573004763, 3.815753651661301}, 0.034099157303617504], CircleBox[{-4.427423162444608, 3.590115643518519}, 0.034969011464341476], CircleBox[{-3.9766041623861788, 2.6847073703833773}, 0.0324329768892004], CircleBox[{-4.894427190999892, 3.265247584249867}, 0.029179606750060857], CircleBox[{-4.68063786612426, 3.365360484011887}, 0.032779815758725336], CircleBox[{-4.2859290443986, 4.750945217304306}, 0.08067690095761616], CircleBox[{-4.236067977499795, 4.868415619221364}, 0.0469374450965872], CircleBox[{-4.1338905067126674, 5.306084343120581}, 0.03405915692904149], CircleBox[{-4.570267987688476, 5.062255838848491}, 0.06107304587038753], CircleBox[{-4.479290805670512, 5.100407831733747}, 0.03757999366234484], CircleBox[{-3.960984104921273, 5.832118630835772}, 0.03438548407231441], CircleBox[{-3.8397443143677688, 6.113238148702645}, 0.037970423283867086], CircleBox[{-3.8061893348788454, 6.182379271659975}, 0.03888288850100596], CircleBox[{-4.051882200652925, 6.102589138463668}, 0.0329869683160195], CircleBox[{-4.088320765561499, 6.1566816263431905}, 0.03223393521645628], CircleBox[{-3.6396266425555837, 6.486397355608413}, 0.04305160568308296], CircleBox[{-3.70555159401348, 6.422096324683534}, 0.02980701423483748], CircleBox[{-3.9467397104726474, 6.357104248264026}, 0.03591584321053117], CircleBox[{-4.015365477389482, 6.342327218137446}, 0.034282849827769926], CircleBox[{-4.975762536263806, 6.345108634441399}, 0.038096364884126134], CircleBox[{-4.955978546752872, 6.581404992496562}, 0.04099180218153242], CircleBox[{-5.175330999339927, 5.275925440504886}, 0.041629744142959765], CircleBox[{-5.183281572999757, 5.3723392204684925}, 0.03454915028125206], CircleBox[{-5.688229281387888, 5.24659334642205}, 0.10707333360044709], CircleBox[{-5.835736779936425, 5.3406893625472005}, 0.06789101242088236], CircleBox[{-5.720271424886078, 5.427288378834968}, 0.07644068139204015], CircleBox[{-5.28685884490105, 6.029937510268809}, 0.031808948734577], CircleBox[{-5.800229349051443, 5.933238836327286}, 0.055044303241377324], CircleBox[{-5.710186617062918, 5.852702168484845}, 0.06576069852230121], CircleBox[{-5.6788878889062495, 5.997267906612137}, 0.08215435488509687], CircleBox[{-2.3766690513087494, 7.903601071408887}, 0.13421288010733304], CircleBox[{-2.4544337677271564, 8.109265104204145}, 0.08566218784090651], CircleBox[{-2.118033988749901, 8.207381706405842}, 0.264754248593736], CircleBox[{-2.9993841199046587, 7.2933186068283}, 0.04681498952905375], CircleBox[{-3.1342401435671783, 7.3533368154115335}, 0.04443145503939316], CircleBox[{-3.0891382814803725, 7.2767400925391374}, 0.044457441446545336], CircleBox[{-3.136961618977111, 7.178431735141695}, 0.0648659537784019], CircleBox[{-2.8564128879455297, 7.795122667389249}, 0.048551354418501766], CircleBox[{-2.8895310166530814, 7.866741731552022}, 0.030354290504033914], CircleBox[{-2.949211838590762, 7.817627457812107}, 0.04693744509658749], CircleBox[{-3.1809564303346924, 8.191814328344849}, 0.06617495945383396], CircleBox[{-3.3888543819998325, 8.302693235899588}, 0.16944271909999162], CircleBox[{-3.277839414409729, 8.060213960977807}, 0.0972415920164004], CircleBox[{-6.244137008493529, 7.7979963127711915}, 0.15914278189328898], CircleBox[{-6.548621456069778, 7.842657662993157}, 0.14859966727397853], CircleBox[{-6.354101966249682, 8.20738170640585}, 0.264754248593736], CircleBox[{-5.435506834809585, 7.540438703807704}, 0.03700097994524783], CircleBox[{-5.33344725219201, 7.469593452795464}, 0.03981449443030913], CircleBox[{-5.363805943238234, 7.537700278521263}, 0.03475218601400544], CircleBox[{-5.321990426771064, 7.603883208253475}, 0.04353394050503319], CircleBox[{-5.285156591196916, 7.086588977640506}, 0.039713522711282395], CircleBox[{-5.304195317399342, 6.983570413130159}, 0.04266631331904909], CircleBox[{-5.938610399020357, 7.113360214864737}, 0.09744329061458494], CircleBox[{-6.014459422840606, 6.957440671556471}, 0.07594638151136056], CircleBox[{-5.829557659401117, 6.936768025945957}, 0.11010742898326883], CircleBox[{-5.186076198408835, 8.247869435681407}, 0.05294214363635831], CircleBox[{-5.114982232576085, 8.136420582757232}, 0.07925164894084046], CircleBox[{-5.007043336758099, 8.222643087845858}, 0.05889727654960269], CircleBox[{-5.083281572999749, 8.367414595449587}, 0.10472135954999576], CircleBox[{-3.3329436511817896, 1.5501487661281506}, 0.04443145503939261], CircleBox[{-3.3669998526227998, 1.6163607213472584}, 0.03002556525102138], CircleBox[{-3.6066836793985724, 1.9353404280906068}, 0.04195895320674678], CircleBox[{-3.5819235209943305, 1.475048280455735}, 0.042278872058001994], CircleBox[{-3.5909253014327747, 1.5454626507163838}, 0.02870856056402011], CircleBox[{-3.132468329102122, 0.9962066466226572}, 0.039848265864905814], CircleBox[{-3.0793536691181016, 0.9498650617177586}, 0.030640808442508133], CircleBox[{-2.6391434334470723, 0.8383107041973045}, 0.029807014234837465], CircleBox[{-2.902597367416355, 0.7514456824517044}, 0.044202687203041414], CircleBox[{-2.949448087693613, 0.8121599804861706}, 0.032486399219446786], CircleBox[{-4.534151589016966, 0.12697786753957294}, 0.02997540837730314], CircleBox[{-4.644695978684021, 0.05403484157548009}, 0.05403484157548009], CircleBox[{-4.560570979879512, 0.07112697166331981}, 0.031808948734576875], CircleBox[{-4.512461179749817, 0.030901699437494816}, 0.030901699437494816], CircleBox[{-4.234181512826688, 0.3046611153854562}, 0.03385123504282836], CircleBox[{-4.161028044556274, 0.3437999161794044}, 0.04911427373991492], CircleBox[{-4.142681634999815, 0.036942786810341625}, 0.036942786810341625], CircleBox[{-4.053323979868239, 0.05403484157547994}, 0.05403484157547994], CircleBox[{-3.5100964824847822, 0.925753632931864}, 0.037030145317274096], CircleBox[{-3.6127353873768944, 0.714617730532746}, 0.028584709221309856], CircleBox[{-3.637279511252626, 0.652321901140459}, 0.03837187653767406], CircleBox[{-2.0357335707721322, 0.4627047213945366}, 0.0514116357105039], CircleBox[{-2.1017930018070095, 0.4154741915548447}, 0.029795330601443286], CircleBox[{-2.1520286221051754, 0.5040125221710136}, 0.07200178888157337], CircleBox[{-1.5169234915908456, 0.22426651931817185}, 0.05294214363635826], CircleBox[{-1.548231992894671, 0.054034841575479844}, 0.054034841575479844], CircleBox[{-1.4649258522768986, 0.1274174499427778}, 0.05698281591834556], CircleBox[{-1.309016994374948, 0.10112712429686851}, 0.10112712429686851], CircleBox[{-2.1760899590192637, 0.13067666211325174}, 0.03084857533149869], CircleBox[{-2.2676610827271966, 0.07587057758263599}, 0.07587057758263599], CircleBox[{-2.139603991710449, 0.054034841575479824}, 0.054034841575479824], CircleBox[{-3.142230156027349, 0.31148800123863707}, 0.03460977791540401], CircleBox[{-3.0623742797629028, 0.32645113557462696}, 0.04663587651066099], CircleBox[{-3.5493597244040864, 0.06482592434875628}, 0.028991034709615563], CircleBox[{-3.345546966046252, 0.2996058500037661}, 0.03328953888930724], CircleBox[{-3.4221988564157306, 0.30473758353523217}, 0.04353394050503317], CircleBox[{-2.968406894772594, 0.028979981890481094}, 0.028979981890481094], CircleBox[{-2.9036104608782893, 0.07332951885411183}, 0.03279395778302931], CircleBox[{-5.788854381999839, 0.04721359549995801}, 0.04721359549995801], CircleBox[{-5.883281572999754, 0.0652475842498532}, 0.029179606750063276], CircleBox[{-6.102237436136199, 0.0289799818904811}, 0.0289799818904811], CircleBox[{-6.802983248181599, 1.102237436136196}, 0.031593105227406396], CircleBox[{-6.8794499627346735, 1.1535005743393558}, 0.04101391985940124], CircleBox[{-6.9298894016232895, 0.7954294374442638}, 0.03181717749777057], CircleBox[{-7.001195965226964, 0.8335326608711477}, 0.049031332992420455], CircleBox[{-7.028059507847761, 0.2202845043354241}, 0.031469214905060584], CircleBox[{-7.593553117015736, 0.12141716201613688}, 0.02866270387091368], CircleBox[{-7.577708763999686, 0.047213595499958134}, 0.047213595499958134], CircleBox[{-7.6819822029340665, 0.13649570362703917}, 0.061042734389344835], CircleBox[{-7.6631189606246535, 0.038627124296868466}, 0.038627124296868466], CircleBox[{-7.2460918366588025, 0.33981124864587725}, 0.037756805405097356], CircleBox[{-7.229601527022399, 0.40450849718747295}, 0.029008936414773163], CircleBox[{-7.316397391606806, 0.40450849718747284}, 0.05778692816963898], CircleBox[{-5.853229405064079, 3.397750791384645}, 0.04099180218153102], CircleBox[{-5.609258426932468, 3.249092696602047}, 0.05517359550498009], CircleBox[{-5.683281572999785, 3.2051662780622876}, 0.030901699437493525], CircleBox[{-6.136721847243019, 3.7373975321392496}, 0.029489973802321063], CircleBox[{-6.307842006943807, 4.078861671335899}, 0.08324207492521923], CircleBox[{-6.434280694545179, 4.128188179871923}, 0.052477658963065305], CircleBox[{-6.434280694545164, 4.019103430340675}, 0.056607090568177164], CircleBox[{-6.741971636797586, 3.8420048452034234}, 0.035643345159037144], CircleBox[{-6.722225308235342, 3.757161094523222}, 0.05146796019894793], CircleBox[{-6.663968516310099, 3.8315929057943823}, 0.04305160568308252], CircleBox[{-6.794327281551418, 2.1755069199136496}, 0.03694278681034126], CircleBox[{-6.854101966249652, 2.089960568801931}, 0.06741808286457793], CircleBox[{-6.923173906854946, 2.403591213539476}, 0.028997869943995384], CircleBox[{-7.001195965226956, 2.4025353166286245}, 0.049031332992421364], CircleBox[{-7.25373206958493, 3.4209032167411295}, 0.04686168790056322], CircleBox[{-7.234439711664375, 3.5037963986450094}, 0.038246917306460355], CircleBox[{-7.157011512851771, 3.452201660637992}, 0.05479685175615843], CircleBox[{-7.331951382790222, 2.8152277895697178}, 0.03523364095368246], CircleBox[{-7.543069126178385, 3.2517339008742168}, 0.06636191634437134], CircleBox[{-7.663118960624622, 3.2985679774997836}, 0.06249999999999928], CircleBox[{-7.66311896062462, 3.1349408532029135}, 0.10112712429686743], CircleBox[{-12.643571615222147, 3.648549229591426}, 0.10457728612622741], CircleBox[{-12.605786177265557, 3.5099086876347356}, 0.03912010144784831], CircleBox[{-12.708203932499371, 3.4919169369032477}, 0.06486595377840162], CircleBox[{-12.890947930130924, 2.809665316359496}, 0.06091466587718499], CircleBox[{-12.760340651966567, 2.896529615930177}, 0.03772648461884653], CircleBox[{-12.836581382834934, 2.8930111608128017}, 0.03859539015998894], CircleBox[{-12.862712429686843, 2.9656781074217147}, 0.0386271242968683], CircleBox[{-12.197181169999343, 3.2581135024998713}, 0.0933863424999766], CircleBox[{-12.326237921249277, 3.272542485937371}, 0.036474508437578476], CircleBox[{-12.326237921249268, 3.1770509831248472}, 0.059016994374946875], CircleBox[{-12.620290844497006, 3.2429857991266196}, 0.029304362667455078], CircleBox[{-12.574373391135769, 3.2070879956093132}, 0.028979981890481118], CircleBox[{-12.55913273399938, 5.108745973749769}, 0.05694013108331233], CircleBox[{-12.544928277965887, 4.951536346130142}, 0.10090990403707892], CircleBox[{-12.70820393249937, 4.9802190180963475}, 0.06486595377840186], CircleBox[{-12.70820393249937, 5.140576474687274}, 0.09549150281252596], CircleBox[{-12.99932611256429, 6.028617474058145}, 0.09704072668830581], CircleBox[{-12.828890697690914, 6.273142822963835}, 0.0873297636910557], CircleBox[{-12.988107382923431, 6.209460713395294}, 0.08415015914403758], CircleBox[{-13.138082575120315, 6.328731820816217}, 0.10746966065523592], CircleBox[{-12.076728202166066, 6.393446629166314}, 0.03519093633336125], CircleBox[{-12.156868160505024, 6.441411065477199}, 0.05820606615167351], CircleBox[{-12.010408484999378, 6.458511071249701}, 0.0577159337500254], CircleBox[{-12.090169943749478, 6.5086104634371615}, 0.03647450843757882], CircleBox[{-11.5177675088287, 5.438627774694855}, 0.2175451109877916], CircleBox[{-11.224000485113084, 5.645457877897454}, 0.14172881767044895], CircleBox[{-11.488186043683644, 5.843597046825371}, 0.1885031305427526], CircleBox[{-14.301693614400703, 7.759505704964401}, 0.16822918183097382], CircleBox[{-13.975865015226567, 7.554847778295083}, 0.2165423646591003], CircleBox[{-13.81594916689586, 7.874679474956502}, 0.14104034288791284], CircleBox[{-14.12022659166597, 8.181243289582927}, 0.2908926654166548], CircleBox[{-10.865837829746654, 7.427670477162557}, 0.24656485292133884], CircleBox[{-11.296181273332778, 8.001461735277383}, 0.47067421972219875], CircleBox[{-11.36997295603535, 7.244592502589417}, 0.28978370010357635], CircleBox[{-13.372615150321879, 1.6180339887498907}, 0.04637722907261107], CircleBox[{-13.470702934255513, 1.5605345876962087}, 0.06732147135330832], CircleBox[{-13.51722092687432, 1.665779740156156}, 0.047745751406263075], CircleBox[{-13.40894974454477, 1.7469831269033174}, 0.08759322650567423], CircleBox[{-13.951508623346287, 1.0720511742417451}, 0.11911679713797131], CircleBox[{-13.937679647035955, 0.8896569847071815}, 0.06380089189663783], CircleBox[{-14.129780826289604, 0.9000798658870479}, 0.128582837983864], CircleBox[{-12.652475842498527, 0.23606797749978986}, 0.05572809000084117], CircleBox[{-12.547846475908441, 0.1089284288223054}, 0.1089284288223054], CircleBox[{-12.777183443949625, 0.18059070550412848}, 0.08076261872237533], CircleBox[{-12.708203932499371, 0.05901699437494747}, 0.05901699437494747], CircleBox[{-13.293423576993856, 0.943295404303224}, 0.10481060047813567], CircleBox[{-13.359533029740696, 0.7955488400753842}, 0.0570520171443955], CircleBox[{-13.200801023829968, 0.7522876245866496}, 0.10746966065523565], CircleBox[{-15.010862126982017, 0.3692484114654956}, 0.08716772568966957], CircleBox[{-15.198915917499233, 0.17978155430554385}, 0.17978155430554385], CircleBox[{-14.944271909999163, 0.09016994374947426}, 0.09016994374947426], CircleBox[{-14.831616727583512, 0.2667713009690788}, 0.11930375268258314], CircleBox[{-13.700532042147396, 0.29158229760262566}, 0.06883324326979351], CircleBox[{-13.847807924209821, 0.14146505182132219}, 0.14146505182132219], CircleBox[{-13.572225399078253, 0.13421288010733348}, 0.13421288010733348], CircleBox[{-10.244441996324703, 0.3998830953545377}, 0.044431455039392935], CircleBox[{-10.203111945525809, 0.31980199585522384}, 0.045685999407889116], CircleBox[{-10.763932022500205, 0.23606797749978947}, 0.05572809000084108], CircleBox[{-10.944271909999156, 0.09016994374947448}, 0.09016994374947448], CircleBox[{-10.801590274999347, 0.12905675124993132}, 0.05771593375002547], CircleBox[{-10.708203932499368, 0.059016994374947444}, 0.059016994374947444], CircleBox[{-10.229027471593351, 0.77236804621173}, 0.08581867180130306], CircleBox[{-10.090169943749466, 0.7548814032101687}, 0.054135591164774885], CircleBox[{-10.090169943749476, 0.9438531601040971}, 0.13483616572915674], CircleBox[{-10.306712308408574, 0.028979981890481083}, 0.028979981890481083], CircleBox[{-9.776438085370787, 0.27378688952968905}, 0.06463231727723194], CircleBox[{-9.830706128635864, 0.10892842882230544}, 0.10892842882230544], CircleBox[{-9.550825280832834, 0.17978155430554416}, 0.17978155430554416], CircleBox[{-11.189276302272129, 3.1944610200307926}, 0.0416069574689965], CircleBox[{-11.189276302272136, 3.303389448853099}, 0.06732147135330771], CircleBox[{-11.09016994374947, 3.2725424859373704}, 0.03647450843757853], CircleBox[{-11.09016994374946, 3.1770509831248392}, 0.05901699437494673], CircleBox[{-10.623804683401891, 3.842265586432701}, 0.1536906234573061], CircleBox[{-10.385855943157356, 3.926001976118186}, 0.09856199980262817], CircleBox[{-10.385855943157361, 3.7078324770557}, 0.11960749925986047], CircleBox[{-10.656171123070576, 2.9083630507964155}, 0.04681498952905354], CircleBox[{-10.541681702843485, 2.80706169516267}, 0.04766736470412423], CircleBox[{-10.572621915167636, 2.888168195231081}, 0.03914024493933066], CircleBox[{-10.520048586370418, 2.9487196742236104}, 0.04104975761088273], CircleBox[{-10.169421592690309, 2.2591932970036654}, 0.04898021270991386], CircleBox[{-10.200178888157339, 2.372046510920917}, 0.06798926671055915], CircleBox[{-10.040255900358577, 2.2714172993161554}, 0.08076261872237538], CircleBox[{-10.090169943749466, 2.3843458848123618}, 0.04270509831248402], CircleBox[{-10.306712308408576, 3.207087995609309}, 0.02897998189048106], CircleBox[{-10.260990336999411, 3.2652475842498525}, 0.029179606750063064], CircleBox[{-9.550825280832836, 3.3471790886109054}, 0.1111111111111112], CircleBox[{-9.778902576132092, 3.26691655283129}, 0.13067666211325166], CircleBox[{-9.550825280832848, 3.056286423194243}, 0.17978155430554368], CircleBox[{-21.41640786499875, 3.1458980337503215}, 0.09016994374947444], CircleBox[{-21.416407864998742, 3.3819660112501118}, 0.14589803375031593], CircleBox[{-21.180339887498956, 3.3315594803123205}, 0.0954915028125264], CircleBox[{-21.180339887498956, 3.0815594803123205}, 0.1545084971874735], CircleBox[{-21.57593078249894, 5.760715623749715}, 0.6400795137499663], CircleBox[{-22.400357776314685, 6.498105544012833}, 0.4660053666447195], CircleBox[{-21.180339887498953, 7.413118960624632}, 1.0590169943749475], CircleBox[{-20.31631842092007, 1.2200178888157331}, 0.28800715552629297], CircleBox[{-20.733126291999, 0.32360679774997925}, 0.32360679774997925], CircleBox[{-20.2127616727768, 0.6504557740277432}, 0.2908926654166552], CircleBox[{-19.562305898749056, 0.40450849718747406}, 0.40450849718747406], CircleBox[{-23.581831511589755, 0.5669152706817988}, 0.13383054136359787], CircleBox[{-23.416407864998746, 0.23606797749978975}, 0.23606797749978975], CircleBox[{-23.939414219136765, 0.510288754353409}, 0.22820806857758286], CircleBox[{-23.798373876248853, 0.15450849718747378}, 0.15450849718747378], CircleBox[{-23.200917396205778, 3.3232357031894604}, 0.3692484114654944], CircleBox[{-23.798373876248853, 3.4860679774997902}, 0.25000000000000017], CircleBox[{-23.79837387624885, 2.831559480312316}, 0.4045084971874737], CircleBox[{-28.652475842498532, 4.236067977499796}], CircleBox[{-33.888543819998326, 4.2360679774997925}, 4.2360679774997925], CircleBox[{-28.652475842498536, 1.618033988749895}, 1.618033988749895], CircleBox[{12.6530303369944, 3.815753651661301}, 0.034099157303617504], CircleBox[{12.516848747554553, 3.590115643518519}, 0.034969011464341476], CircleBox[{12.967667747612982, 2.6847073703833773}, 0.0324329768892004], CircleBox[{12.049844718999273, 3.265247584249867}, 0.029179606750060857], CircleBox[{12.2636340438749, 3.365360484011887}, 0.032779815758725336], CircleBox[{12.658342865600565, 4.750945217304306}, 0.08067690095761616], CircleBox[{12.708203932499368, 4.868415619221364}, 0.0469374450965872], CircleBox[{12.810381403286497, 5.306084343120581}, 0.03405915692904149], CircleBox[{12.374003922310688, 5.062255838848491}, 0.06107304587038753], CircleBox[{12.464981104328649, 5.100407831733747}, 0.03757999366234484], CircleBox[{12.983287805077891, 5.832118630835772}, 0.03438548407231441], CircleBox[{13.104527595631396, 6.113238148702645}, 0.037970423283867086], CircleBox[{13.138082575120317, 6.182379271659975}, 0.03888288850100596], CircleBox[{12.892389709346235, 6.102589138463668}, 0.0329869683160195], CircleBox[{12.855951144437663, 6.1566816263431905}, 0.03223393521645628], CircleBox[{13.30464526744358, 6.486397355608413}, 0.04305160568308296], CircleBox[{13.238720315985681, 6.422096324683534}, 0.02980701423483748], CircleBox[{12.997532199526514, 6.357104248264026}, 0.03591584321053117], CircleBox[{12.928906432609681, 6.342327218137446}, 0.034282849827769926], CircleBox[{11.968509373735358, 6.345108634441399}, 0.038096364884126134], CircleBox[{11.988293363246292, 6.581404992496562}, 0.04099180218153242], CircleBox[{11.768940910659236, 5.275925440504886}, 0.041629744142959765], CircleBox[{11.760990336999404, 5.3723392204684925}, 0.03454915028125206], CircleBox[{11.256042628611276, 5.24659334642205}, 0.10707333360044709], CircleBox[{11.108535130062736, 5.3406893625472005}, 0.06789101242088236], CircleBox[{11.224000485113086, 5.427288378834968}, 0.07644068139204015], CircleBox[{11.657413065098112, 6.029937510268809}, 0.031808948734577], CircleBox[{11.144042560947717, 5.933238836327286}, 0.055044303241377324], CircleBox[{11.234085292936246, 5.852702168484845}, 0.06576069852230121], CircleBox[{11.265384021092913, 5.997267906612137}, 0.08215435488509687], CircleBox[{14.567602858690414, 7.903601071408887}, 0.13421288010733304], CircleBox[{14.489838142272006, 8.109265104204145}, 0.08566218784090651], CircleBox[{14.82623792124926, 8.207381706405842}, 0.264754248593736], CircleBox[{13.944887790094509, 7.2933186068283}, 0.04681498952905375], CircleBox[{13.810031766431983, 7.3533368154115335}, 0.04443145503939316], CircleBox[{13.855133628518791, 7.2767400925391374}, 0.044457441446545336], CircleBox[{13.807310291022052, 7.178431735141695}, 0.0648659537784019], CircleBox[{14.087859022053632, 7.795122667389249}, 0.048551354418501766], CircleBox[{14.054740893346079, 7.866741731552022}, 0.030354290504033914], CircleBox[{13.995060071408401, 7.817627457812107}, 0.04693744509658749], CircleBox[{13.76331547966447, 8.191814328344849}, 0.06617495945383396], CircleBox[{13.555417527999332, 8.302693235899588}, 0.16944271909999162], CircleBox[{13.666432495589431, 8.060213960977807}, 0.0972415920164004], CircleBox[{10.700134901505635, 7.7979963127711915}, 0.15914278189328898], CircleBox[{10.395650453929383, 7.842657662993157}, 0.14859966727397853], CircleBox[{10.59016994374948, 8.20738170640585}, 0.264754248593736], CircleBox[{11.508765075189576, 7.540438703807704}, 0.03700097994524783], CircleBox[{11.610824657807152, 7.469593452795464}, 0.03981449443030913], CircleBox[{11.58046596676093, 7.537700278521263}, 0.03475218601400544], CircleBox[{11.622281483228099, 7.603883208253475}, 0.04353394050503319], CircleBox[{11.659115318802248, 7.086588977640506}, 0.039713522711282395], CircleBox[{11.640076592599819, 6.983570413130159}, 0.04266631331904909], CircleBox[{11.005661510978804, 7.113360214864737}, 0.09744329061458494], CircleBox[{10.929812487158557, 6.957440671556471}, 0.07594638151136056], CircleBox[{11.114714250598047, 6.936768025945957}, 0.11010742898326883], CircleBox[{11.758195711590329, 8.247869435681407}, 0.05294214363635831], CircleBox[{11.829289677423079, 8.136420582757232}, 0.07925164894084046], CircleBox[{11.937228573241063, 8.222643087845858}, 0.05889727654960269], CircleBox[{11.860990336999416, 8.367414595449587}, 0.10472135954999576], CircleBox[{13.611328258817375, 1.5501487661281506}, 0.04443145503939261], CircleBox[{13.577272057376364, 1.6163607213472584}, 0.03002556525102138], CircleBox[{13.337588230600591, 1.9353404280906068}, 0.04195895320674678], CircleBox[{13.362348389004831, 1.475048280455735}, 0.042278872058001994], CircleBox[{13.353346608566389, 1.5454626507163838}, 0.02870856056402011], CircleBox[{13.811803580897038, 0.9962066466226572}, 0.039848265864905814], CircleBox[{13.864918240881062, 0.9498650617177586}, 0.030640808442508133], CircleBox[{14.30512847655209, 0.8383107041973045}, 0.029807014234837465], CircleBox[{14.041674542582806, 0.7514456824517044}, 0.044202687203041414], CircleBox[{13.99482382230555, 0.8121599804861706}, 0.032486399219446786], CircleBox[{12.410120320982198, 0.12697786753957294}, 0.02997540837730314], CircleBox[{12.299575931315143, 0.05403484157548009}, 0.05403484157548009], CircleBox[{12.38370093011965, 0.07112697166331981}, 0.031808948734576875], CircleBox[{12.431810730249344, 0.030901699437494816}, 0.030901699437494816], CircleBox[{12.710090397172474, 0.3046611153854562}, 0.03385123504282836], CircleBox[{12.783243865442888, 0.3437999161794044}, 0.04911427373991492], CircleBox[{12.801590274999345, 0.036942786810341625}, 0.036942786810341625], CircleBox[{12.890947930130926, 0.05403484157547994}, 0.05403484157547994], CircleBox[{13.434175427514383, 0.925753632931864}, 0.037030145317274096], CircleBox[{13.331536522622269, 0.714617730532746}, 0.028584709221309856], CircleBox[{13.306992398746535, 0.652321901140459}, 0.03837187653767406], CircleBox[{14.908538339227032, 0.4627047213945366}, 0.0514116357105039], CircleBox[{14.842478908192156, 0.4154741915548447}, 0.029795330601443286], CircleBox[{14.792243287893989, 0.5040125221710136}, 0.07200178888157337], CircleBox[{15.427348418408318, 0.22426651931817185}, 0.05294214363635826], CircleBox[{15.39603991710449, 0.054034841575479844}, 0.054034841575479844], CircleBox[{15.479346057722264, 0.1274174499427778}, 0.05698281591834556], CircleBox[{15.635254915624214, 0.10112712429686851}, 0.10112712429686851], CircleBox[{14.768181950979896, 0.13067666211325174}, 0.03084857533149869], CircleBox[{14.676610827271967, 0.07587057758263599}, 0.07587057758263599], CircleBox[{14.804667918288713, 0.054034841575479824}, 0.054034841575479824], CircleBox[{13.802041753971814, 0.31148800123863707}, 0.03460977791540401], CircleBox[{13.881897630236262, 0.32645113557462696}, 0.04663587651066099], CircleBox[{13.394912185595077, 0.06482592434875628}, 0.028991034709615563], CircleBox[{13.59872494395291, 0.2996058500037661}, 0.03328953888930724], CircleBox[{13.52207305358343, 0.30473758353523217}, 0.04353394050503317], CircleBox[{13.975865015226567, 0.028979981890481094}, 0.028979981890481094], CircleBox[{14.04066144912087, 0.07332951885411183}, 0.03279395778302931], CircleBox[{11.155417527999324, 0.04721359549995801}, 0.04721359549995801], CircleBox[{11.060990336999408, 0.0652475842498532}, 0.029179606750063276], CircleBox[{10.842034473862963, 0.0289799818904811}, 0.0289799818904811], CircleBox[{10.141288661817564, 1.102237436136196}, 0.031593105227406396], CircleBox[{10.06482194726449, 1.1535005743393558}, 0.04101391985940124], CircleBox[{10.014382508375874, 0.7954294374442638}, 0.03181717749777057], CircleBox[{9.943075944772197, 0.8335326608711477}, 0.049031332992420455], CircleBox[{9.9162124021514, 0.2202845043354241}, 0.031469214905060584], CircleBox[{9.350718792983427, 0.12141716201613688}, 0.02866270387091368], CircleBox[{9.366563145999477, 0.047213595499958134}, 0.047213595499958134], CircleBox[{9.262289707065095, 0.13649570362703917}, 0.061042734389344835], CircleBox[{9.281152949374507, 0.038627124296868466}, 0.038627124296868466], CircleBox[{9.69818007334036, 0.33981124864587725}, 0.037756805405097356], CircleBox[{9.714670382976765, 0.40450849718747295}, 0.029008936414773163], CircleBox[{9.627874518392359, 0.40450849718747284}, 0.05778692816963898], CircleBox[{11.091042504935086, 3.397750791384645}, 0.04099180218153102], CircleBox[{11.335013483066692, 3.249092696602047}, 0.05517359550498009], CircleBox[{11.260990336999376, 3.2051662780622876}, 0.030901699437493525], CircleBox[{10.807550062756142, 3.7373975321392496}, 0.029489973802321063], CircleBox[{10.636429903055355, 4.078861671335899}, 0.08324207492521923], CircleBox[{10.509991215453983, 4.128188179871923}, 0.052477658963065305], CircleBox[{10.509991215453997, 4.019103430340675}, 0.056607090568177164], CircleBox[{10.202300273201578, 3.8420048452034234}, 0.035643345159037144], CircleBox[{10.222046601763822, 3.757161094523222}, 0.05146796019894793], CircleBox[{10.280303393689064, 3.8315929057943823}, 0.04305160568308252], CircleBox[{10.149944628447747, 2.1755069199136496}, 0.03694278681034126], CircleBox[{10.09016994374951, 2.089960568801931}, 0.06741808286457793], CircleBox[{10.021098003144218, 2.403591213539476}, 0.028997869943995384], CircleBox[{9.943075944772207, 2.4025353166286245}, 0.049031332992421364], CircleBox[{9.690539840414234, 3.4209032167411295}, 0.04686168790056322], CircleBox[{9.709832198334787, 3.5037963986450094}, 0.038246917306460355], CircleBox[{9.78726039714739, 3.452201660637992}, 0.05479685175615843], CircleBox[{9.61232052720894, 2.8152277895697178}, 0.03523364095368246], CircleBox[{9.401202783820779, 3.2517339008742168}, 0.06636191634437134], CircleBox[{9.28115294937454, 3.2985679774997836}, 0.06249999999999928], CircleBox[{9.281152949374542, 3.1349408532029135}, 0.10112712429686743], CircleBox[{21.244972204776175, 3.648549229591426}, 0.10457728612622741], CircleBox[{21.28275764273277, 3.5099086876347356}, 0.03912010144784831], CircleBox[{21.180339887498956, 3.4919169369032477}, 0.06486595377840162], CircleBox[{20.9975958898674, 2.809665316359496}, 0.06091466587718499], CircleBox[{21.128203168031757, 2.896529615930177}, 0.03772648461884653], CircleBox[{21.05196243716339, 2.8930111608128017}, 0.03859539015998894], CircleBox[{21.02583139031148, 2.9656781074217147}, 0.0386271242968683], CircleBox[{21.691362649998982, 3.2581135024998713}, 0.0933863424999766], CircleBox[{21.562305898749045, 3.272542485937371}, 0.036474508437578476], CircleBox[{21.562305898749056, 3.1770509831248472}, 0.059016994374946875], CircleBox[{21.268252975501323, 3.2429857991266196}, 0.029304362667455078], CircleBox[{21.314170428862553, 3.2070879956093132}, 0.028979981890481118], CircleBox[{21.32941108599894, 5.108745973749769}, 0.05694013108331233], CircleBox[{21.34361554203244, 4.951536346130142}, 0.10090990403707892], CircleBox[{21.18033988749896, 4.9802190180963475}, 0.06486595377840186], CircleBox[{21.180339887498956, 5.140576474687274}, 0.09549150281252596], CircleBox[{20.889217707434035, 6.028617474058145}, 0.09704072668830581], CircleBox[{21.059653122307413, 6.273142822963835}, 0.0873297636910557], CircleBox[{20.900436437074895, 6.209460713395294}, 0.08415015914403758], CircleBox[{20.750461244878007, 6.328731820816217}, 0.10746966065523592 ], CircleBox[{21.811815617832256, 6.393446629166314}, 0.03519093633336125], CircleBox[{21.73167565949331, 6.441411065477199}, 0.05820606615167351], CircleBox[{21.878135334998948, 6.458511071249701}, 0.0577159337500254], CircleBox[{21.798373876248846, 6.5086104634371615}, 0.03647450843757882], CircleBox[{22.370776311169625, 5.438627774694855}, 0.2175451109877916], CircleBox[{22.664543334885245, 5.645457877897454}, 0.14172881767044895], CircleBox[{22.400357776314685, 5.843597046825371}, 0.1885031305427526], CircleBox[{19.586850205597624, 7.759505704964401}, 0.16822918183097382], CircleBox[{19.912678804771758, 7.554847778295083}, 0.2165423646591003], CircleBox[{20.072594653102467, 7.874679474956502}, 0.14104034288791284], CircleBox[{19.768317228332357, 8.181243289582927}, 0.2908926654166548], CircleBox[{23.022705990251673, 7.427670477162557}, 0.24656485292133884], CircleBox[{22.592362546665548, 8.001461735277383}, 0.47067421972219875], CircleBox[{22.518570863962974, 7.244592502589417}, 0.28978370010357635], CircleBox[{20.515928669676445, 1.6180339887498907}, 0.04637722907261107], CircleBox[{20.417840885742816, 1.5605345876962087}, 0.06732147135330832], CircleBox[{20.371322893124006, 1.665779740156156}, 0.047745751406263075], CircleBox[{20.479594075453555, 1.7469831269033174}, 0.08759322650567423], CircleBox[{19.937035196652037, 1.0720511742417451}, 0.11911679713797131], CircleBox[{19.950864172962373, 0.8896569847071815}, 0.06380089189663783], CircleBox[{19.758762993708714, 0.9000798658870479}, 0.128582837983864], CircleBox[{21.2360679774998, 0.23606797749978986}, 0.05572809000084117], CircleBox[{21.340697344089882, 0.1089284288223054}, 0.1089284288223054], CircleBox[{21.111360376048708, 0.18059070550412848}, 0.08076261872237533], CircleBox[{21.180339887498956, 0.05901699437494747}, 0.05901699437494747], CircleBox[{20.59512024300447, 0.943295404303224}, 0.10481060047813567], CircleBox[{20.52901079025763, 0.7955488400753842}, 0.0570520171443955], CircleBox[{20.687742796168358, 0.7522876245866496}, 0.10746966065523565], CircleBox[{18.877681693016314, 0.3692484114654956}, 0.08716772568966957], CircleBox[{18.689627902499094, 0.17978155430554385}, 0.17978155430554385], CircleBox[{18.944271909999163, 0.09016994374947426}, 0.09016994374947426], CircleBox[{19.056927092414814, 0.2667713009690788}, 0.11930375268258314], CircleBox[{20.18801177785093, 0.29158229760262566}, 0.06883324326979351], CircleBox[{20.040735895788504, 0.14146505182132219}, 0.14146505182132219], CircleBox[{20.316318420920073, 0.13421288010733348}, 0.13421288010733348], CircleBox[{23.644101823673626, 0.3998830953545377}, 0.044431455039392935], CircleBox[{23.68543187447251, 0.31980199585522384}, 0.045685999407889116], CircleBox[{23.12461179749812, 0.23606797749978947}, 0.05572809000084108], CircleBox[{22.94427190999917, 0.09016994374947448}, 0.09016994374947448], CircleBox[{23.08695354499898, 0.12905675124993132}, 0.05771593375002547], CircleBox[{23.180339887498956, 0.059016994374947444}, 0.059016994374947444], CircleBox[{23.659516348404974, 0.77236804621173}, 0.08581867180130306], CircleBox[{23.798373876248856, 0.7548814032101687}, 0.054135591164774885], CircleBox[{23.798373876248853, 0.9438531601040971}, 0.13483616572915674], CircleBox[{23.581831511589748, 0.028979981890481083}, 0.028979981890481083], CircleBox[{24.11210573462754, 0.27378688952968905}, 0.06463231727723194], CircleBox[{24.05783769136246, 0.10892842882230544}, 0.10892842882230544], CircleBox[{24.337718539165493, 0.17978155430554416}, 0.17978155430554416], CircleBox[{22.699267517726195, 3.1944610200307926}, 0.0416069574689965], CircleBox[{22.69926751772619, 3.303389448853099}, 0.06732147135330771], CircleBox[{22.79837387624886, 3.2725424859373704}, 0.03647450843757853], CircleBox[{22.798373876248867, 3.1770509831248392}, 0.05901699437494673], CircleBox[{23.264739136596436, 3.842265586432701}, 0.1536906234573061], CircleBox[{23.502687876840973, 3.926001976118186}, 0.09856199980262817], CircleBox[{23.502687876840966, 3.7078324770557}, 0.11960749925986047], CircleBox[{23.232372696927744, 2.9083630507964155}, 0.04681498952905354], CircleBox[{23.34686211715484, 2.80706169516267}, 0.04766736470412423], CircleBox[{23.31592190483069, 2.888168195231081}, 0.03914024493933066], CircleBox[{23.368495233627907, 2.9487196742236104}, 0.04104975761088273], CircleBox[{23.719122227308013, 2.2591932970036654}, 0.04898021270991386], CircleBox[{23.68836493184099, 2.372046510920917}, 0.06798926671055915], CircleBox[{23.848287919639745, 2.2714172993161554}, 0.08076261872237538], CircleBox[{23.798373876248863, 2.3843458848123618}, 0.04270509831248402], CircleBox[{23.58183151158975, 3.207087995609309}, 0.02897998189048106], CircleBox[{23.627553482998916, 3.2652475842498525}, 0.029179606750063064], CircleBox[{24.33771853916549, 3.3471790886109054}, 0.1111111111111112], CircleBox[{24.109641243866236, 3.26691655283129}, 0.13067666211325166], CircleBox[{24.337718539165476, 3.056286423194243}, 0.17978155430554368], CircleBox[{29.416407864998746, 3.1458980337503215}, 0.09016994374947444], CircleBox[{29.416407864998742, 3.3819660112501118}, 0.14589803375031593], CircleBox[{29.652475842498532, 3.3315594803123205}, 0.0954915028125264], CircleBox[{29.652475842498532, 3.0815594803123205}, 0.1545084971874735], CircleBox[{29.256884947498552, 5.760715623749715}, 0.6400795137499663], CircleBox[{28.4324579536828, 6.498105544012833}, 0.4660053666447195], CircleBox[{29.652475842498536, 7.413118960624632}, 1.0590169943749475], CircleBox[{30.51649730907742, 1.2200178888157331}, 0.28800715552629297], CircleBox[{30.09968943799849, 0.32360679774997925}, 0.32360679774997925], CircleBox[{30.620054057220685, 0.6504557740277432}, 0.2908926654166552], CircleBox[{31.27050983124843, 0.40450849718747406}, 0.40450849718747406], CircleBox[{27.250984218407734, 0.5669152706817988}, 0.13383054136359787], CircleBox[{27.416407864998742, 0.23606797749978975}, 0.23606797749978975], CircleBox[{26.89340151086072, 0.510288754353409}, 0.22820806857758286], CircleBox[{27.03444185374864, 0.15450849718747378}, 0.15450849718747378], CircleBox[{27.63189833379171, 3.3232357031894604}, 0.3692484114654944], CircleBox[{27.034441853748636, 3.4860679774997902}, 0.25000000000000017], CircleBox[{27.034441853748636, 2.831559480312316}, 0.4045084971874737], CircleBox[{39.12461179749812, 4.236067977499796}], CircleBox[{39.12461179749811, 1.618033988749895}, 1.618033988749895], CircleBox[{42.360679774997905, 1.6180339887498947}, 1.6180339887498947], CircleBox[{42.36067977499791, 5.854101966249684}, 2.6180339887498945], CircleBox[{4.254730406802391, 4.549566442364372}, 0.030196444924281803], CircleBox[{5.8833334429152195, 5.052340386487264}, 0.04175487922716425], CircleBox[{1.5412850320685427, 8.240450028051567}, 0.05469362818978079], CircleBox[{1.561445501674025, 8.327073212276003}, 0.03424466828532682], CircleBox[{1.4120226591666156, 8.354467400069039}, 0.11766855493054852], CircleBox[{1.882696878888804, 8.41983881947489}, 0.05229713552468855], CircleBox[{1.8546848651290517, 8.341585493167461}, 0.03081878348637084], CircleBox[{2.541640786499874, 8.429775275224582}, 0.04236067977499774], CircleBox[{3.0807767109089403, 8.43712712873925}, 0.035008826260328786], CircleBox[{3.530056647916492, 8.442718816266943}, 0.029417138732637415], CircleBox[{3.765393757777591, 8.41983881947489}, 0.05229713552468877], CircleBox[{6.3470554875733525, 7.502178013792606}, 0.03219818890039665], CircleBox[{5.930495168499701, 8.429775275224578}, 0.04236067977499769], CircleBox[{6.161553421817872, 8.437127128739252}, 0.035008826260328745], CircleBox[{6.983850718804858, 8.185568799070944}, 0.06764932891794125], CircleBox[{7.120847481359515, 8.177326025616605}, 0.06959518377629251], CircleBox[{7.060113295832978, 8.354467400069037}, 0.11766855493054897], CircleBox[{6.784636842305161, 7.960593640319301}, 0.03668476331944342], CircleBox[{6.7865512655229665, 7.894999346141148}, 0.028937461917026765], CircleBox[{6.721565354173388, 7.917353399191153}, 0.03978569547332209], CircleBox[{6.589439076110777, 8.439814547731064}, 0.03232140726851713], CircleBox[{5.914785170560346, 6.696221132939554}, 0.03364935242683122], CircleBox[{4.94207930708309, 8.442718816266945}, 0.029417138732637415], CircleBox[{4.70674219722199, 8.439814547731064}, 0.032321407268517205], CircleBox[{0.8726779962499652, 0.044945388576386004}, 0.044945388576386004], CircleBox[{6.269721493191651, 4.29826048191542}, 0.03552281390012357], CircleBox[{7.932791292082894, 3.1911225889233865}, 0.04494538857638328], CircleBox[{-4.257833476405898, 3.897346625483688}, 0.03521731701221373], CircleBox[{-4.965410891865912, 3.2429857991266178}, 0.029304362667455244], CircleBox[{-5.081011271790178, 5.258324368416756}, 0.0339490851855861], CircleBox[{-5.812265596126574, 5.129749977826541}, 0.06333024663982935], CircleBox[{-5.900479195322323, 5.183047801476539}, 0.0397342821219733], CircleBox[{-5.835736779936424, 5.23160461301596}, 0.041193737110360375], CircleBox[{-5.806407832904139, 5.494000641879623}, 0.032508879537748635], CircleBox[{-5.790064563689795, 5.8014370312027035}, 0.029152949905540855], CircleBox[{-5.790148954235898, 6.0188778040394295}, 0.031185895357717014], CircleBox[{-5.833092127401025, 6.061225512783406}, 0.029125335415294648], CircleBox[{-5.7650529786434, 6.090936696801385}, 0.04511804960593542], CircleBox[{-2.5448119223792984, 7.94117599142682}, 0.03807728126644007], CircleBox[{-2.5108819314160815, 8.004260731489387}, 0.0335532200268332], CircleBox[{-1.6535492065316484, 8.20458607317572}, 0.0631599594824662], CircleBox[{-1.7829077199718224, 8.159794675491172}, 0.07373377414324749], CircleBox[{-1.814491083709564, 8.27567886003992}, 0.04637722907261098], CircleBox[{-1.6944271909999267, 8.367414595449583}, 0.10472135954999529], CircleBox[{-2.513038394515452, 8.297658805579996}, 0.041188467783410246], CircleBox[{-2.420610272857026, 8.38568558811183}, 0.08645036688775067], CircleBox[{-2.433602907812845, 8.246598601509156}, 0.0532421468891386], CircleBox[{-3.209045754446148, 7.048322446098648}, 0.030868845360735635], CircleBox[{-3.178542920715906, 8.29886565405106}, 0.04090356950569742], CircleBox[{-3.111617867130101, 8.330971947440503}, 0.03332430176023606], CircleBox[{-3.1770509831248432, 8.405947392851147}, 0.06618856214843413], CircleBox[{-3.1508806083866165, 8.044872190535045}, 0.030640808442508372], CircleBox[{-3.5973838937588067, 8.306420545979805}, 0.03912010144784851], CircleBox[{-3.6599800555137523, 8.338974549530764}, 0.031435143670052644], CircleBox[{-3.6309154092855342, 8.418706689923052}, 0.05342926507652844], CircleBox[{-6.337531659516016, 7.596679992750324}, 0.06278247927892747], CircleBox[{-6.443650054274544, 7.579150246705434}, 0.044774044012428835], CircleBox[{-6.424411054479184, 7.678968376951464}, 0.056881247236677035], CircleBox[{-6.010397854125563, 8.34651622809565}, 0.02965479486428718], CircleBox[{-6.063131575848153, 8.300064213631622}, 0.04062062796960079], CircleBox[{-6.051525682142555, 8.418706689923052}, 0.053429265076528315], CircleBox[{-6.880708136066684, 8.055494742938746}, 0.09835564827426399], CircleBox[{-6.77770876399965, 8.302693235899588}, 0.1694427190999906], CircleBox[{-6.683005475280017, 8.051087158737978}, 0.0993961377621966], CircleBox[{-5.219486650061952, 6.9377561721200545}, 0.03326596632652322], CircleBox[{-6.0784340802525065, 7.136777811745895}, 0.044327812495315436], CircleBox[{-6.123177470023172, 7.077119958718344}, 0.030244503789122017], CircleBox[{-6.059966407950126, 7.059143233277051}, 0.03547308157425611], CircleBox[{-5.985982765543716, 6.784714065959313}, 0.036583980293397246], CircleBox[{-5.956858710981066, 6.856158939340789}, 0.0405689878067502], CircleBox[{-5.8933484941444885, 6.783332233988385}, 0.056060596975110226], CircleBox[{-5.247570330177025, 8.3139681496946}, 0.03733835390392659], CircleBox[{-5.2950849718747355, 8.405947392851145}, 0.06618856214843412], CircleBox[{-4.95068372318286, 8.348155355836806}, 0.029267849293567957], CircleBox[{-4.8412205457140445, 8.385685588111828}, 0.08645036688775082], CircleBox[{-4.920095847402863, 8.280117669836795}, 0.04532936822135692], CircleBox[{-4.7796518403446395, 0.03218654424197078}, 0.03218654424197078], CircleBox[{-1.3893942516260163, 0.20356535405980192}, 0.029080764865685987], CircleBox[{-1.1214171620161364, 0.12141716201613584}, 0.028662703870913433], CircleBox[{-1.0472135954999582, 0.06472135954999579}, 0.06472135954999579], CircleBox[{-1.1338305413635985, 0.028979981890481107}, 0.028979981890481107], CircleBox[{-1.172851470999955, 0.081496206249994}, 0.03644621141666596], CircleBox[{-1.418610697887265, 0.0296922807136464}, 0.0296922807136464], CircleBox[{-2.837221395774531, 0.029692280713646407}, 0.029692280713646407], CircleBox[{-5.669152706817997, 0.028979981890481628}, 0.028979981890481628], CircleBox[{-6.8541019662496785, 1.2539763412810976}, 0.04045084971874479], CircleBox[{-7.600886884134284, 0.21781226771633355}, 0.03111603824519051], CircleBox[{-7.733639132068607, 0.032186544241971}, 0.032186544241971], CircleBox[{-7.824922359499668, 0.06472135954999779}, 0.06472135954999779], CircleBox[{-6.287814297591035, 4.212620339287953}, 0.052007658509724886], CircleBox[{-6.365971511835156, 4.244870916623164}, 0.032542030294301444], CircleBox[{-6.3659715118351805, 4.179420066904427}, 0.032908819424442966], CircleBox[{-7.12955551962726, 3.531570275653281}, 0.029186531203746015], CircleBox[{-7.824922359499661, 3.27606797749979}, 0.04000000000000048], CircleBox[{-7.750907776327346, 3.2455268040250655}, 0.04006823214845766], CircleBox[{-7.8249223594996185, 3.171346617949803}, 0.06472135954999433], CircleBox[{-12.6530303369944, 3.815753651661301}, 0.034099157303617504], CircleBox[{-12.516848747554553, 3.590115643518519}, 0.034969011464341476], CircleBox[{-12.967667747612982, 2.6847073703833773}, 0.0324329768892004], CircleBox[{-12.049844718999273, 3.265247584249867}, 0.029179606750060857], CircleBox[{-12.2636340438749, 3.365360484011887}, 0.032779815758725336], CircleBox[{-12.658342865600565, 4.750945217304306}, 0.08067690095761616], CircleBox[{-12.708203932499368, 4.868415619221364}, 0.0469374450965872], CircleBox[{-12.810381403286497, 5.306084343120581}, 0.03405915692904149], CircleBox[{-12.374003922310688, 5.062255838848491}, 0.06107304587038753], CircleBox[{-12.464981104328649, 5.100407831733747}, 0.03757999366234484], CircleBox[{-12.983287805077891, 5.832118630835772}, 0.03438548407231441], CircleBox[{-13.104527595631396, 6.113238148702645}, 0.037970423283867086], CircleBox[{-13.138082575120317, 6.182379271659975}, 0.03888288850100596], CircleBox[{-12.892389709346235, 6.102589138463668}, 0.0329869683160195], CircleBox[{-12.855951144437663, 6.1566816263431905}, 0.03223393521645628], CircleBox[{-13.30464526744358, 6.486397355608413}, 0.04305160568308296], CircleBox[{-13.238720315985681, 6.422096324683534}, 0.02980701423483748], CircleBox[{-12.997532199526514, 6.357104248264026}, 0.03591584321053117], CircleBox[{-12.928906432609681, 6.342327218137446}, 0.034282849827769926], CircleBox[{-11.968509373735358, 6.345108634441399}, 0.038096364884126134], CircleBox[{-11.988293363246292, 6.581404992496562}, 0.04099180218153242], CircleBox[{-11.768940910659236, 5.275925440504886}, 0.041629744142959765], CircleBox[{-11.760990336999404, 5.3723392204684925}, 0.03454915028125206], CircleBox[{-11.256042628611276, 5.24659334642205}, 0.10707333360044709], CircleBox[{-11.108535130062736, 5.3406893625472005}, 0.06789101242088236], CircleBox[{-11.224000485113086, 5.427288378834968}, 0.07644068139204015], CircleBox[{-11.657413065098112, 6.029937510268809}, 0.031808948734577], CircleBox[{-11.144042560947717, 5.933238836327286}, 0.055044303241377324], CircleBox[{-11.234085292936246, 5.852702168484845}, 0.06576069852230121], CircleBox[{-11.265384021092913, 5.997267906612137}, 0.08215435488509687], CircleBox[{-14.567602858690414, 7.903601071408887}, 0.13421288010733304], CircleBox[{-14.489838142272006, 8.109265104204145}, 0.08566218784090651], CircleBox[{-14.82623792124926, 8.207381706405842}, 0.264754248593736], CircleBox[{-13.944887790094509, 7.2933186068283}, 0.04681498952905375], CircleBox[{-13.810031766431983, 7.3533368154115335}, 0.04443145503939316], CircleBox[{-13.855133628518791, 7.2767400925391374}, 0.044457441446545336], CircleBox[{-13.807310291022052, 7.178431735141695}, 0.0648659537784019], CircleBox[{-14.087859022053632, 7.795122667389249}, 0.048551354418501766], CircleBox[{-14.054740893346079, 7.866741731552022}, 0.030354290504033914], CircleBox[{-13.995060071408401, 7.817627457812107}, 0.04693744509658749], CircleBox[{-13.76331547966447, 8.191814328344849}, 0.06617495945383396], CircleBox[{-13.555417527999332, 8.302693235899588}, 0.16944271909999162], CircleBox[{-13.666432495589431, 8.060213960977807}, 0.0972415920164004], CircleBox[{-10.700134901505635, 7.7979963127711915}, 0.15914278189328898], CircleBox[{-10.395650453929383, 7.842657662993157}, 0.14859966727397853], CircleBox[{-10.59016994374948, 8.20738170640585}, 0.264754248593736], CircleBox[{-11.508765075189576, 7.540438703807704}, 0.03700097994524783], CircleBox[{-11.610824657807152, 7.469593452795464}, 0.03981449443030913], CircleBox[{-11.58046596676093, 7.537700278521263}, 0.03475218601400544], CircleBox[{-11.622281483228099, 7.603883208253475}, 0.04353394050503319], CircleBox[{-11.659115318802248, 7.086588977640506}, 0.039713522711282395], CircleBox[{-11.640076592599819, 6.983570413130159}, 0.04266631331904909], CircleBox[{-11.005661510978804, 7.113360214864737}, 0.09744329061458494], CircleBox[{-10.929812487158557, 6.957440671556471}, 0.07594638151136056], CircleBox[{-11.114714250598047, 6.936768025945957}, 0.11010742898326883], CircleBox[{-11.758195711590329, 8.247869435681407}, 0.05294214363635831], CircleBox[{-11.829289677423079, 8.136420582757232}, 0.07925164894084046], CircleBox[{-11.937228573241063, 8.222643087845858}, 0.05889727654960269], CircleBox[{-11.860990336999416, 8.367414595449587}, 0.10472135954999576], CircleBox[{-13.611328258817375, 1.5501487661281506}, 0.04443145503939261], CircleBox[{-13.577272057376364, 1.6163607213472584}, 0.03002556525102138], CircleBox[{-13.337588230600591, 1.9353404280906068}, 0.04195895320674678], CircleBox[{-13.362348389004831, 1.475048280455735}, 0.042278872058001994], CircleBox[{-13.353346608566389, 1.5454626507163838}, 0.02870856056402011], CircleBox[{-13.811803580897038, 0.9962066466226572}, 0.039848265864905814], CircleBox[{-13.864918240881062, 0.9498650617177586}, 0.030640808442508133], CircleBox[{-14.30512847655209, 0.8383107041973045}, 0.029807014234837465], CircleBox[{-14.041674542582806, 0.7514456824517044}, 0.044202687203041414], CircleBox[{-13.99482382230555, 0.8121599804861706}, 0.032486399219446786], CircleBox[{-12.410120320982198, 0.12697786753957294}, 0.02997540837730314], CircleBox[{-12.299575931315143, 0.05403484157548009}, 0.05403484157548009], CircleBox[{-12.38370093011965, 0.07112697166331981}, 0.031808948734576875], CircleBox[{-12.431810730249344, 0.030901699437494816}, 0.030901699437494816], CircleBox[{-12.710090397172474, 0.3046611153854562}, 0.03385123504282836], CircleBox[{-12.783243865442888, 0.3437999161794044}, 0.04911427373991492], CircleBox[{-12.801590274999345, 0.036942786810341625}, 0.036942786810341625], CircleBox[{-12.890947930130926, 0.05403484157547994}, 0.05403484157547994], CircleBox[{-13.434175427514383, 0.925753632931864}, 0.037030145317274096], CircleBox[{-13.331536522622269, 0.714617730532746}, 0.028584709221309856], CircleBox[{-13.306992398746535, 0.652321901140459}, 0.03837187653767406], CircleBox[{-14.908538339227032, 0.4627047213945366}, 0.0514116357105039], CircleBox[{-14.842478908192156, 0.4154741915548447}, 0.029795330601443286], CircleBox[{-14.792243287893989, 0.5040125221710136}, 0.07200178888157337], CircleBox[{-15.427348418408318, 0.22426651931817185}, 0.05294214363635826], CircleBox[{-15.39603991710449, 0.054034841575479844}, 0.054034841575479844], CircleBox[{-15.479346057722264, 0.1274174499427778}, 0.05698281591834556], CircleBox[{-15.635254915624214, 0.10112712429686851}, 0.10112712429686851], CircleBox[{-14.768181950979896, 0.13067666211325174}, 0.03084857533149869], CircleBox[{-14.676610827271967, 0.07587057758263599}, 0.07587057758263599], CircleBox[{-14.804667918288713, 0.054034841575479824}, 0.054034841575479824], CircleBox[{-13.802041753971814, 0.31148800123863707}, 0.03460977791540401], CircleBox[{-13.881897630236262, 0.32645113557462696}, 0.04663587651066099], CircleBox[{-13.394912185595077, 0.06482592434875628}, 0.028991034709615563], CircleBox[{-13.59872494395291, 0.2996058500037661}, 0.03328953888930724], CircleBox[{-13.52207305358343, 0.30473758353523217}, 0.04353394050503317], CircleBox[{-13.975865015226567, 0.028979981890481094}, 0.028979981890481094], CircleBox[{-14.04066144912087, 0.07332951885411183}, 0.03279395778302931], CircleBox[{-11.155417527999324, 0.04721359549995801}, 0.04721359549995801], CircleBox[{-11.060990336999408, 0.0652475842498532}, 0.029179606750063276], CircleBox[{-10.842034473862963, 0.0289799818904811}, 0.0289799818904811], CircleBox[{-10.141288661817564, 1.102237436136196}, 0.031593105227406396], CircleBox[{-10.06482194726449, 1.1535005743393558}, 0.04101391985940124], CircleBox[{-10.014382508375874, 0.7954294374442638}, 0.03181717749777057], CircleBox[{-9.943075944772197, 0.8335326608711477}, 0.049031332992420455], CircleBox[{-9.9162124021514, 0.2202845043354241}, 0.031469214905060584], CircleBox[{-9.350718792983427, 0.12141716201613688}, 0.02866270387091368], CircleBox[{-9.366563145999477, 0.047213595499958134}, 0.047213595499958134], CircleBox[{-9.262289707065095, 0.13649570362703917}, 0.061042734389344835], CircleBox[{-9.281152949374507, 0.038627124296868466}, 0.038627124296868466], CircleBox[{-9.69818007334036, 0.33981124864587725}, 0.037756805405097356], CircleBox[{-9.714670382976765, 0.40450849718747295}, 0.029008936414773163], CircleBox[{-9.627874518392359, 0.40450849718747284}, 0.05778692816963898], CircleBox[{-11.091042504935086, 3.397750791384645}, 0.04099180218153102], CircleBox[{-11.335013483066692, 3.249092696602047}, 0.05517359550498009], CircleBox[{-11.260990336999376, 3.2051662780622876}, 0.030901699437493525], CircleBox[{-10.807550062756142, 3.7373975321392496}, 0.029489973802321063], CircleBox[{-10.636429903055355, 4.078861671335899}, 0.08324207492521923], CircleBox[{-10.509991215453983, 4.128188179871923}, 0.052477658963065305], CircleBox[{-10.509991215453997, 4.019103430340675}, 0.056607090568177164], CircleBox[{-10.202300273201578, 3.8420048452034234}, 0.035643345159037144], CircleBox[{-10.222046601763822, 3.757161094523222}, 0.05146796019894793], CircleBox[{-10.280303393689064, 3.8315929057943823}, 0.04305160568308252], CircleBox[{-10.149944628447747, 2.1755069199136496}, 0.03694278681034126], CircleBox[{-10.09016994374951, 2.089960568801931}, 0.06741808286457793], CircleBox[{-10.021098003144218, 2.403591213539476}, 0.028997869943995384], CircleBox[{-9.943075944772207, 2.4025353166286245}, 0.049031332992421364], CircleBox[{-9.690539840414234, 3.4209032167411295}, 0.04686168790056322], CircleBox[{-9.709832198334787, 3.5037963986450094}, 0.038246917306460355], CircleBox[{-9.78726039714739, 3.452201660637992}, 0.05479685175615843], CircleBox[{-9.61232052720894, 2.8152277895697178}, 0.03523364095368246], CircleBox[{-9.401202783820779, 3.2517339008742168}, 0.06636191634437134], CircleBox[{-9.28115294937454, 3.2985679774997836}, 0.06249999999999928], CircleBox[{-9.281152949374542, 3.1349408532029135}, 0.10112712429686743], CircleBox[{-21.244972204776175, 3.648549229591426}, 0.10457728612622741], CircleBox[{-21.28275764273277, 3.5099086876347356}, 0.03912010144784831], CircleBox[{-21.180339887498956, 3.4919169369032477}, 0.06486595377840162], CircleBox[{-20.9975958898674, 2.809665316359496}, 0.06091466587718499], CircleBox[{-21.128203168031757, 2.896529615930177}, 0.03772648461884653], CircleBox[{-21.05196243716339, 2.8930111608128017}, 0.03859539015998894], CircleBox[{-21.02583139031148, 2.9656781074217147}, 0.0386271242968683], CircleBox[{-21.691362649998982, 3.2581135024998713}, 0.0933863424999766], CircleBox[{-21.562305898749045, 3.272542485937371}, 0.036474508437578476], CircleBox[{-21.562305898749056, 3.1770509831248472}, 0.059016994374946875], CircleBox[{-21.268252975501323, 3.2429857991266196}, 0.029304362667455078], CircleBox[{-21.314170428862553, 3.2070879956093132}, 0.028979981890481118], CircleBox[{-21.32941108599894, 5.108745973749769}, 0.05694013108331233], CircleBox[{-21.34361554203244, 4.951536346130142}, 0.10090990403707892], CircleBox[{-21.18033988749896, 4.9802190180963475}, 0.06486595377840186], CircleBox[{-21.180339887498956, 5.140576474687274}, 0.09549150281252596], CircleBox[{-20.889217707434035, 6.028617474058145}, 0.09704072668830581], CircleBox[{-21.059653122307413, 6.273142822963835}, 0.0873297636910557], CircleBox[{-20.900436437074895, 6.209460713395294}, 0.08415015914403758], CircleBox[{-20.750461244878007, 6.328731820816217}, 0.10746966065523592], CircleBox[{-21.811815617832256, 6.393446629166314}, 0.03519093633336125], CircleBox[{-21.73167565949331, 6.441411065477199}, 0.05820606615167351], CircleBox[{-21.878135334998948, 6.458511071249701}, 0.0577159337500254], CircleBox[{-21.798373876248846, 6.5086104634371615}, 0.03647450843757882], CircleBox[{-22.370776311169625, 5.438627774694855}, 0.2175451109877916], CircleBox[{-22.664543334885245, 5.645457877897454}, 0.14172881767044895], CircleBox[{-22.400357776314685, 5.843597046825371}, 0.1885031305427526], CircleBox[{-19.586850205597624, 7.759505704964401}, 0.16822918183097382], CircleBox[{-19.912678804771758, 7.554847778295083}, 0.2165423646591003], CircleBox[{-20.072594653102467, 7.874679474956502}, 0.14104034288791284], CircleBox[{-19.768317228332357, 8.181243289582927}, 0.2908926654166548], CircleBox[{-23.022705990251673, 7.427670477162557}, 0.24656485292133884], CircleBox[{-22.592362546665548, 8.001461735277383}, 0.47067421972219875], CircleBox[{-22.518570863962974, 7.244592502589417}, 0.28978370010357635], CircleBox[{-20.515928669676445, 1.6180339887498907}, 0.04637722907261107], CircleBox[{-20.417840885742816, 1.5605345876962087}, 0.06732147135330832], CircleBox[{-20.371322893124006, 1.665779740156156}, 0.047745751406263075], CircleBox[{-20.479594075453555, 1.7469831269033174}, 0.08759322650567423], CircleBox[{-19.937035196652037, 1.0720511742417451}, 0.11911679713797131], CircleBox[{-19.950864172962373, 0.8896569847071815}, 0.06380089189663783], CircleBox[{-19.758762993708714, 0.9000798658870479}, 0.128582837983864], CircleBox[{-21.2360679774998, 0.23606797749978986}, 0.05572809000084117], CircleBox[{-21.340697344089882, 0.1089284288223054}, 0.1089284288223054], CircleBox[{-21.111360376048708, 0.18059070550412848}, 0.08076261872237533], CircleBox[{-21.180339887498956, 0.05901699437494747}, 0.05901699437494747], CircleBox[{-20.59512024300447, 0.943295404303224}, 0.10481060047813567], CircleBox[{-20.52901079025763, 0.7955488400753842}, 0.0570520171443955], CircleBox[{-20.687742796168358, 0.7522876245866496}, 0.10746966065523565], CircleBox[{-18.877681693016314, 0.3692484114654956}, 0.08716772568966957], CircleBox[{-18.689627902499094, 0.17978155430554385}, 0.17978155430554385], CircleBox[{-18.944271909999163, 0.09016994374947426}, 0.09016994374947426], CircleBox[{-19.056927092414814, 0.2667713009690788}, 0.11930375268258314], CircleBox[{-20.18801177785093, 0.29158229760262566}, 0.06883324326979351], CircleBox[{-20.040735895788504, 0.14146505182132219}, 0.14146505182132219], CircleBox[{-20.316318420920073, 0.13421288010733348}, 0.13421288010733348], CircleBox[{-23.644101823673626, 0.3998830953545377}, 0.044431455039392935], CircleBox[{-23.68543187447251, 0.31980199585522384}, 0.045685999407889116], CircleBox[{-23.12461179749812, 0.23606797749978947}, 0.05572809000084108], CircleBox[{-22.94427190999917, 0.09016994374947448}, 0.09016994374947448], CircleBox[{-23.08695354499898, 0.12905675124993132}, 0.05771593375002547], CircleBox[{-23.180339887498956, 0.059016994374947444}, 0.059016994374947444], CircleBox[{-23.659516348404974, 0.77236804621173}, 0.08581867180130306], CircleBox[{-23.798373876248856, 0.7548814032101687}, 0.054135591164774885], CircleBox[{-23.798373876248853, 0.9438531601040971}, 0.13483616572915674], CircleBox[{-23.581831511589748, 0.028979981890481083}, 0.028979981890481083], CircleBox[{-24.11210573462754, 0.27378688952968905}, 0.06463231727723194], CircleBox[{-24.05783769136246, 0.10892842882230544}, 0.10892842882230544], CircleBox[{-24.337718539165493, 0.17978155430554416}, 0.17978155430554416], CircleBox[{-22.699267517726195, 3.1944610200307926}, 0.0416069574689965], CircleBox[{-22.69926751772619, 3.303389448853099}, 0.06732147135330771], CircleBox[{-22.79837387624886, 3.2725424859373704}, 0.03647450843757853], CircleBox[{-22.798373876248867, 3.1770509831248392}, 0.05901699437494673], CircleBox[{-23.264739136596436, 3.842265586432701}, 0.1536906234573061], CircleBox[{-23.502687876840973, 3.926001976118186}, 0.09856199980262817], CircleBox[{-23.502687876840966, 3.7078324770557}, 0.11960749925986047], CircleBox[{-23.232372696927744, 2.9083630507964155}, 0.04681498952905354], CircleBox[{-23.34686211715484, 2.80706169516267}, 0.04766736470412423], CircleBox[{-23.31592190483069, 2.888168195231081}, 0.03914024493933066], CircleBox[{-23.368495233627907, 2.9487196742236104}, 0.04104975761088273], CircleBox[{-23.719122227308013, 2.2591932970036654}, 0.04898021270991386], CircleBox[{-23.68836493184099, 2.372046510920917}, 0.06798926671055915], CircleBox[{-23.848287919639745, 2.2714172993161554}, 0.08076261872237538], CircleBox[{-23.798373876248863, 2.3843458848123618}, 0.04270509831248402], CircleBox[{-23.58183151158975, 3.207087995609309}, 0.02897998189048106], CircleBox[{-23.627553482998916, 3.2652475842498525}, 0.029179606750063064], CircleBox[{-24.33771853916549, 3.3471790886109054}, 0.1111111111111112], CircleBox[{-24.109641243866236, 3.26691655283129}, 0.13067666211325166], CircleBox[{-24.337718539165476, 3.056286423194243}, 0.17978155430554368], CircleBox[{-29.416407864998746, 3.1458980337503215}, 0.09016994374947444], CircleBox[{-29.416407864998742, 3.3819660112501118}, 0.14589803375031593], CircleBox[{-29.652475842498532, 3.3315594803123205}, 0.0954915028125264], CircleBox[{-29.652475842498532, 3.0815594803123205}, 0.1545084971874735], CircleBox[{-29.256884947498552, 5.760715623749715}, 0.6400795137499663], CircleBox[{-28.4324579536828, 6.498105544012833}, 0.4660053666447195], CircleBox[{-29.652475842498536, 7.413118960624632}, 1.0590169943749475], CircleBox[{-30.51649730907742, 1.2200178888157331}, 0.28800715552629297], CircleBox[{-30.09968943799849, 0.32360679774997925}, 0.32360679774997925], CircleBox[{-30.620054057220685, 0.6504557740277432}, 0.2908926654166552], CircleBox[{-31.27050983124843, 0.40450849718747406}, 0.40450849718747406], CircleBox[{-27.250984218407734, 0.5669152706817988}, 0.13383054136359787], CircleBox[{-27.416407864998742, 0.23606797749978975}, 0.23606797749978975], CircleBox[{-26.89340151086072, 0.510288754353409}, 0.22820806857758286], CircleBox[{-27.03444185374864, 0.15450849718747378}, 0.15450849718747378], CircleBox[{-27.63189833379171, 3.3232357031894604}, 0.3692484114654944], CircleBox[{-27.034441853748636, 3.4860679774997902}, 0.25000000000000017], CircleBox[{-27.034441853748636, 2.831559480312316}, 0.4045084971874737], CircleBox[{-39.12461179749812, 4.236067977499796}], CircleBox[{-39.12461179749811, 1.618033988749895}, 1.618033988749895], CircleBox[{-42.360679774997905, 1.6180339887498947}, 1.6180339887498947], CircleBox[{-42.36067977499791, 5.854101966249684}, 2.6180339887498945], CircleBox[{12.686438433593265, 3.897346625483688}, 0.03521731701221373], CircleBox[{11.978861018133252, 3.2429857991266178}, 0.029304362667455244], CircleBox[{11.863260638208985, 5.258324368416756}, 0.0339490851855861], CircleBox[{11.132006313872587, 5.129749977826541}, 0.06333024663982935], CircleBox[{11.04379271467684, 5.183047801476539}, 0.0397342821219733], CircleBox[{11.108535130062739, 5.23160461301596}, 0.041193737110360375], CircleBox[{11.137864077095022, 5.494000641879623}, 0.032508879537748635], CircleBox[{11.154207346309368, 5.8014370312027035}, 0.029152949905540855], CircleBox[{11.154122955763263, 6.0188778040394295}, 0.031185895357717014], CircleBox[{11.111179782598136, 6.061225512783406}, 0.029125335415294648], CircleBox[{11.179218931355763, 6.090936696801385}, 0.04511804960593542], CircleBox[{14.399459987619863, 7.94117599142682}, 0.03807728126644007], CircleBox[{14.43338997858308, 8.004260731489387}, 0.0335532200268332], CircleBox[{15.290722703467512, 8.20458607317572}, 0.0631599594824662], CircleBox[{15.161364190027339, 8.159794675491172}, 0.07373377414324749], CircleBox[{15.129780826289599, 8.27567886003992}, 0.04637722907261098], CircleBox[{15.249844718999235, 8.367414595449583}, 0.10472135954999529], CircleBox[{14.43123351548371, 8.297658805579996}, 0.041188467783410246], CircleBox[{14.523661637142137, 8.38568558811183}, 0.08645036688775067], CircleBox[{14.510669002186319, 8.246598601509156}, 0.0532421468891386], CircleBox[{13.735226155553015, 7.048322446098648}, 0.030868845360735635], CircleBox[{13.765728989283256, 8.29886565405106}, 0.04090356950569742], CircleBox[{13.832654042869063, 8.330971947440503}, 0.03332430176023606], CircleBox[{13.767220926874318, 8.405947392851147}, 0.06618856214843413], CircleBox[{13.793391301612544, 8.044872190535045}, 0.030640808442508372], CircleBox[{13.346888016240356, 8.306420545979805}, 0.03912010144784851], CircleBox[{13.284291854485412, 8.338974549530764}, 0.031435143670052644], CircleBox[{13.313356500713631, 8.418706689923052}, 0.05342926507652844], CircleBox[{10.606740250483147, 7.596679992750324}, 0.06278247927892747], CircleBox[{10.50062185572462, 7.579150246705434}, 0.044774044012428835], CircleBox[{10.519860855519978, 7.678968376951464}, 0.056881247236677035], CircleBox[{10.933874055873599, 8.34651622809565}, 0.02965479486428718], CircleBox[{10.881140334151008, 8.300064213631622}, 0.04062062796960079], CircleBox[{10.892746227856605, 8.418706689923052}, 0.053429265076528315], CircleBox[{10.06356377393248, 8.055494742938746}, 0.09835564827426399], CircleBox[{10.166563145999513, 8.302693235899588}, 0.1694427190999906], CircleBox[{10.261266434719145, 8.051087158737978}, 0.0993961377621966], CircleBox[{11.72478525993721, 6.9377561721200545}, 0.03326596632652322], CircleBox[{10.865837829746656, 7.136777811745895}, 0.044327812495315436], CircleBox[{10.821094439975992, 7.077119958718344}, 0.030244503789122017], CircleBox[{10.884305502049036, 7.059143233277051}, 0.03547308157425611], CircleBox[{10.958289144455446, 6.784714065959313}, 0.036583980293397246], CircleBox[{10.9874131990181, 6.856158939340789}, 0.0405689878067502], CircleBox[{11.050923415854674, 6.783332233988385}, 0.056060596975110226], CircleBox[{11.696701579822136, 8.3139681496946}, 0.03733835390392659], CircleBox[{11.649186938124426, 8.405947392851145}, 0.06618856214843412], CircleBox[{11.9935881868163, 8.348155355836806}, 0.029267849293567957], CircleBox[{12.10305136428512, 8.385685588111828}, 0.08645036688775082], CircleBox[{12.024176062596299, 8.280117669836795}, 0.04532936822135692], CircleBox[{12.164620069654523, 0.03218654424197078}, 0.03218654424197078], CircleBox[{15.554877658373146, 0.20356535405980192}, 0.029080764865685987], CircleBox[{15.822854747983026, 0.12141716201613584}, 0.028662703870913433], CircleBox[{15.897058314499201, 0.06472135954999579}, 0.06472135954999579], CircleBox[{15.810441368635564, 0.028979981890481107}, 0.028979981890481107], CircleBox[{15.771420438999206, 0.081496206249994}, 0.03644621141666596], CircleBox[{15.525661212111899, 0.0296922807136464}, 0.0296922807136464], CircleBox[{14.107050514224634, 0.029692280713646407}, 0.029692280713646407], CircleBox[{11.275119203181166, 0.028979981890481628}, 0.028979981890481628], CircleBox[{10.090169943749485, 1.2539763412810976}, 0.04045084971874479], CircleBox[{9.343385025864878, 0.21781226771633355}, 0.03111603824519051], CircleBox[{9.210632777930556, 0.032186544241971}, 0.032186544241971], CircleBox[{9.119349550499496, 0.06472135954999779}, 0.06472135954999779], CircleBox[{10.65645761240813, 4.212620339287953}, 0.052007658509724886], CircleBox[{10.578300398164007, 4.244870916623164}, 0.032542030294301444], CircleBox[{10.578300398163982, 4.179420066904427}, 0.032908819424442966], CircleBox[{9.814716390371904, 3.531570275653281}, 0.029186531203746015], CircleBox[{9.119349550499503, 3.27606797749979}, 0.04000000000000048], CircleBox[{9.193364133671817, 3.2455268040250655}, 0.04006823214845766], CircleBox[{9.119349550499543, 3.171346617949803}, 0.06472135954999433], CircleBox[{21.235513483003924, 3.815753651661301}, 0.034099157303617504], CircleBox[{21.37169507244377, 3.590115643518519}, 0.034969011464341476], CircleBox[{20.92087607238534, 2.6847073703833773}, 0.0324329768892004], CircleBox[{21.838699100999058, 3.265247584249867}, 0.029179606750060857], CircleBox[{21.62490977612342, 3.365360484011887}, 0.032779815758725336], CircleBox[{21.230200954397766, 4.750945217304306}, 0.08067690095761616], CircleBox[{21.180339887498956, 4.868415619221364}, 0.0469374450965872], CircleBox[{21.07816241671183, 5.306084343120581}, 0.03405915692904149], CircleBox[{21.51453989768764, 5.062255838848491}, 0.06107304587038753], CircleBox[{21.423562715669675, 5.100407831733747}, 0.03757999366234484], CircleBox[{20.905256014920433, 5.832118630835772}, 0.03438548407231441], CircleBox[{20.784016224366937, 6.113238148702645}, 0.037970423283867086], CircleBox[{20.750461244878004, 6.182379271659975}, 0.03888288850100596], CircleBox[{20.99615411065209, 6.102589138463668}, 0.0329869683160195], CircleBox[{21.032592675560657, 6.1566816263431905}, 0.03223393521645628], CircleBox[{20.583898552554746, 6.486397355608413}, 0.04305160568308296], CircleBox[{20.64982350401264, 6.422096324683534}, 0.02980701423483748], CircleBox[{20.891011620471808, 6.357104248264026}, 0.03591584321053117], CircleBox[{20.959637387388646, 6.342327218137446}, 0.034282849827769926], CircleBox[{21.92003444626297, 6.345108634441399}, 0.038096364884126134], CircleBox[{21.900250456752037, 6.581404992496562}, 0.04099180218153242], CircleBox[{22.11960290933909, 5.275925440504886}, 0.041629744142959765], CircleBox[{22.12755348299892, 5.3723392204684925}, 0.03454915028125206], CircleBox[{22.632501191387053, 5.24659334642205}, 0.10707333360044709], CircleBox[{22.780008689935585, 5.3406893625472005}, 0.06789101242088236], CircleBox[{22.664543334885238, 5.427288378834968}, 0.07644068139204015], CircleBox[{22.23113075490021, 6.029937510268809}, 0.031808948734577], CircleBox[{22.744501259050605, 5.933238836327286}, 0.055044303241377324], CircleBox[{22.654458527062083, 5.852702168484845}, 0.06576069852230121], CircleBox[{22.623159798905412, 5.997267906612137}, 0.08215435488509687], CircleBox[{19.320940961307915, 7.903601071408887}, 0.13421288010733304], CircleBox[{19.39870567772632, 8.109265104204145}, 0.08566218784090651], CircleBox[{19.062305898749067, 8.207381706405842}, 0.264754248593736], CircleBox[{19.94365602990382, 7.2933186068283}, 0.04681498952905375], CircleBox[{20.07851205356634, 7.3533368154115335}, 0.04443145503939316], CircleBox[{20.033410191479533, 7.2767400925391374}, 0.044457441446545336], CircleBox[{20.081233528976277, 7.178431735141695}, 0.0648659537784019], CircleBox[{19.800684797944694, 7.795122667389249}, 0.048551354418501766], CircleBox[{19.833802926652243, 7.866741731552022}, 0.030354290504033914], CircleBox[{19.893483748589926, 7.817627457812107}, 0.04693744509658749], CircleBox[{20.12522834033385, 8.191814328344849}, 0.06617495945383396], CircleBox[{20.333126291998997, 8.302693235899588}, 0.16944271909999162], CircleBox[{20.222111324408893, 8.060213960977807}, 0.0972415920164004], CircleBox[{23.18840891849269, 7.7979963127711915}, 0.15914278189328898], CircleBox[{23.49289336606894, 7.842657662993157}, 0.14859966727397853], CircleBox[{23.298373876248846, 8.20738170640585}, 0.264754248593736], CircleBox[{22.37977874480875, 7.540438703807704}, 0.03700097994524783], CircleBox[{22.277719162191172, 7.469593452795464}, 0.03981449443030913], CircleBox[{22.3080778532374, 7.537700278521263}, 0.03475218601400544], CircleBox[{22.266262336770225, 7.603883208253475}, 0.04353394050503319], CircleBox[{22.22942850119608, 7.086588977640506}, 0.039713522711282395], CircleBox[{22.248467227398503, 6.983570413130159}, 0.04266631331904909], CircleBox[{22.882882309019518, 7.113360214864737}, 0.09744329061458494], CircleBox[{22.958731332839765, 6.957440671556471}, 0.07594638151136056], CircleBox[{22.773829569400277, 6.936768025945957}, 0.11010742898326883], CircleBox[{22.130348108407997, 8.247869435681407}, 0.05294214363635831], CircleBox[{22.05925414257525, 8.136420582757232}, 0.07925164894084046], CircleBox[{21.95131524675726, 8.222643087845858}, 0.05889727654960269], CircleBox[{22.027553482998915, 8.367414595449587}, 0.10472135954999576], CircleBox[{20.277215561180952, 1.5501487661281506}, 0.04443145503939261], CircleBox[{20.311271762621967, 1.6163607213472584}, 0.03002556525102138], CircleBox[{20.550955589397738, 1.9353404280906068}, 0.04195895320674678], CircleBox[{20.526195430993496, 1.475048280455735}, 0.042278872058001994], CircleBox[{20.53519721143194, 1.5454626507163838}, 0.02870856056402011], CircleBox[{20.076740239101284, 0.9962066466226572}, 0.039848265864905814], CircleBox[{20.023625579117265, 0.9498650617177586}, 0.030640808442508133], CircleBox[{19.583415343446234, 0.8383107041973045}, 0.029807014234837465], CircleBox[{19.846869277415518, 0.7514456824517044}, 0.044202687203041414], CircleBox[{19.893719997692774, 0.8121599804861706}, 0.032486399219446786], CircleBox[{21.47842349901613, 0.12697786753957294}, 0.02997540837730314], CircleBox[{21.588967888683186, 0.05403484157548009}, 0.05403484157548009], CircleBox[{21.504842889878677, 0.07112697166331981}, 0.031808948734576875], CircleBox[{21.45673308974898, 0.030901699437494816}, 0.030901699437494816], CircleBox[{21.178453422825854, 0.3046611153854562}, 0.03385123504282836], CircleBox[{21.105299954555434, 0.3437999161794044}, 0.04911427373991492], CircleBox[{21.086953544998973, 0.036942786810341625}, 0.036942786810341625], CircleBox[{20.9975958898674, 0.05403484157547994}, 0.05403484157547994], CircleBox[{20.454368392483946, 0.925753632931864}, 0.037030145317274096], CircleBox[{20.55700729737606, 0.714617730532746}, 0.028584709221309856], CircleBox[{20.58155142125179, 0.652321901140459}, 0.03837187653767406], CircleBox[{18.980005480771297, 0.4627047213945366}, 0.0514116357105039], CircleBox[{19.046064911806173, 0.4154741915548447}, 0.029795330601443286], CircleBox[{19.09630053210434, 0.5040125221710136}, 0.07200178888157337], CircleBox[{18.461195401590007, 0.22426651931817185}, 0.05294214363635826], CircleBox[{18.492503902893834, 0.054034841575479844}, 0.054034841575479844], CircleBox[{18.40919776227606, 0.1274174499427778}, 0.05698281591834556], CircleBox[{18.25328890437411, 0.10112712429686851}, 0.10112712429686851], CircleBox[{19.120361869018424, 0.13067666211325174}, 0.03084857533149869], CircleBox[{19.211932992726357, 0.07587057758263599}, 0.07587057758263599], CircleBox[{19.083875901709607, 0.054034841575479824}, 0.054034841575479824], CircleBox[{20.08650206602651, 0.31148800123863707}, 0.03460977791540401], CircleBox[{20.006646189762066, 0.32645113557462696}, 0.04663587651066099], CircleBox[{20.49363163440325, 0.06482592434875628}, 0.028991034709615563], CircleBox[{20.289818876045416, 0.2996058500037661}, 0.03328953888930724], CircleBox[{20.366470766414892, 0.30473758353523217}, 0.04353394050503317], CircleBox[{19.912678804771755, 0.028979981890481094}, 0.028979981890481094], CircleBox[{19.84788237087745, 0.07332951885411183}, 0.03279395778302931], CircleBox[{22.733126291999003, 0.04721359549995801}, 0.04721359549995801], CircleBox[{22.827553482998916, 0.0652475842498532}, 0.029179606750063276], CircleBox[{23.046509346135363, 0.0289799818904811}, 0.0289799818904811], CircleBox[{23.747255158180764, 1.102237436136196}, 0.031593105227406396], CircleBox[{23.823721872733838, 1.1535005743393558}, 0.04101391985940124], CircleBox[{23.874161311622455, 0.7954294374442638}, 0.03181717749777057], CircleBox[{23.945467875226125, 0.8335326608711477}, 0.049031332992420455], CircleBox[{23.972331417846924, 0.2202845043354241}, 0.031469214905060584], CircleBox[{24.5378250270149, 0.12141716201613688}, 0.02866270387091368], CircleBox[{24.521980673998847, 0.047213595499958134}, 0.047213595499958134], CircleBox[{24.62625411293323, 0.13649570362703917}, 0.061042734389344835], CircleBox[{24.607390870623817, 0.038627124296868466}, 0.038627124296868466], CircleBox[{24.190363746657965, 0.33981124864587725}, 0.037756805405097356], CircleBox[{24.173873437021562, 0.40450849718747295}, 0.029008936414773163], CircleBox[{24.26066930160597, 0.40450849718747284}, 0.05778692816963898], CircleBox[{22.797501315063247, 3.397750791384645}, 0.04099180218153102], CircleBox[{22.55353033693163, 3.249092696602047}, 0.05517359550498009], CircleBox[{22.627553482998945, 3.2051662780622876}, 0.030901699437493525], CircleBox[{23.08099375724218, 3.7373975321392496}, 0.029489973802321063], CircleBox[{23.252113916942967, 4.078861671335899}, 0.08324207492521923], CircleBox[{23.378552604544343, 4.128188179871923}, 0.052477658963065305], CircleBox[{23.378552604544325, 4.019103430340675}, 0.056607090568177164], CircleBox[{23.68624354679675, 3.8420048452034234}, 0.035643345159037144], CircleBox[{23.666497218234507, 3.757161094523222}, 0.05146796019894793], CircleBox[{23.608240426309262, 3.8315929057943823}, 0.04305160568308252], CircleBox[{23.73859919155058, 2.1755069199136496}, 0.03694278681034126], CircleBox[{23.798373876248814, 2.089960568801931}, 0.06741808286457793], CircleBox[{23.867445816854108, 2.403591213539476}, 0.028997869943995384], CircleBox[{23.945467875226118, 2.4025353166286245}, 0.049031332992421364], CircleBox[{24.198003979584094, 3.4209032167411295}, 0.04686168790056322], CircleBox[{24.178711621663535, 3.5037963986450094}, 0.038246917306460355], CircleBox[{24.10128342285093, 3.452201660637992}, 0.05479685175615843], CircleBox[{24.276223292789382, 2.8152277895697178}, 0.03523364095368246], CircleBox[{24.487341036177547, 3.2517339008742168}, 0.06636191634437134], CircleBox[{24.607390870623785, 3.2985679774997836}, 0.06249999999999928], CircleBox[{24.60739087062378, 3.1349408532029135}, 0.10112712429686743], CircleBox[{29.58784352522131, 3.648549229591426}, 0.10457728612622741], CircleBox[{29.55005808726472, 3.5099086876347356}, 0.03912010144784831], CircleBox[{29.65247584249854, 3.4919169369032477}, 0.06486595377840162], CircleBox[{29.835219840130087, 2.809665316359496}, 0.06091466587718499], CircleBox[{29.704612561965728, 2.896529615930177}, 0.03772648461884653], CircleBox[{29.7808532928341, 2.8930111608128017}, 0.03859539015998894], CircleBox[{29.806984339686007, 2.9656781074217147}, 0.0386271242968683], CircleBox[{29.141453079998502, 3.2581135024998713}, 0.0933863424999766], CircleBox[{29.27050983124844, 3.272542485937371}, 0.036474508437578476], CircleBox[{29.270509831248432, 3.1770509831248472}, 0.059016994374946875], CircleBox[{29.56456275449617, 3.2429857991266196}, 0.029304362667455078], CircleBox[{29.51864530113493, 3.2070879956093132}, 0.028979981890481118], CircleBox[{29.50340464399854, 5.108745973749769}, 0.05694013108331233], CircleBox[{29.48920018796505, 4.951536346130142}, 0.10090990403707892], CircleBox[{29.652475842498536, 4.9802190180963475}, 0.06486595377840186], CircleBox[{29.652475842498536, 5.140576474687274}, 0.09549150281252596], CircleBox[{29.94359802256345, 6.028617474058145}, 0.09704072668830581], CircleBox[{29.773162607690082, 6.273142822963835}, 0.0873297636910557], CircleBox[{29.932379292922594, 6.209460713395294}, 0.08415015914403758], CircleBox[{30.082354485119478, 6.328731820816217}, 0.10746966065523592], CircleBox[{29.021000112165225, 6.393446629166314}, 0.03519093633336125], CircleBox[{29.101140070504186, 6.441411065477199}, 0.05820606615167351], CircleBox[{28.95468039499854, 6.458511071249701}, 0.0577159337500254], CircleBox[{29.03444185374864, 6.5086104634371615}, 0.03647450843757882], CircleBox[{28.462039418827864, 5.438627774694855}, 0.2175451109877916], CircleBox[{28.16827239511225, 5.645457877897454}, 0.14172881767044895], CircleBox[{28.432457953682807, 5.843597046825371}, 0.1885031305427526], CircleBox[{31.245965524399868, 7.759505704964401}, 0.16822918183097382], CircleBox[{30.920136925225734, 7.554847778295083}, 0.2165423646591003], CircleBox[{30.76022107689503, 7.874679474956502}, 0.14104034288791284], CircleBox[{31.064498501665135, 8.181243289582927}, 0.2908926654166548], CircleBox[{27.81010973974582, 7.427670477162557}, 0.24656485292133884], CircleBox[{28.240453183331937, 8.001461735277383}, 0.47067421972219875], CircleBox[{28.31424486603451, 7.244592502589417}, 0.28978370010357635], CircleBox[{30.316887060321037, 1.6180339887498907}, 0.04637722907261107], CircleBox[{30.414974844254676, 1.5605345876962087}, 0.06732147135330832], CircleBox[{30.461492836873482, 1.665779740156156}, 0.047745751406263075], CircleBox[{30.353221654543933, 1.7469831269033174}, 0.08759322650567423], CircleBox[{30.895780533345448, 1.0720511742417451}, 0.11911679713797131], CircleBox[{30.88195155703512, 0.8896569847071815}, 0.06380089189663783], CircleBox[{31.074052736288763, 0.9000798658870479}, 0.128582837983864], CircleBox[{29.596747752497688, 0.23606797749978986}, 0.05572809000084117], CircleBox[{29.492118385907606, 0.1089284288223054}, 0.1089284288223054], CircleBox[{29.721455353948787, 0.18059070550412848}, 0.08076261872237533], CircleBox[{29.652475842498536, 0.05901699437494747}, 0.05901699437494747], CircleBox[{30.237695486993015, 0.943295404303224}, 0.10481060047813567], CircleBox[{30.30380493973986, 0.7955488400753842}, 0.0570520171443955], CircleBox[{30.145072933829127, 0.7522876245866496}, 0.10746966065523565], CircleBox[{31.955134036981182, 0.3692484114654956}, 0.08716772568966957], CircleBox[{32.143187827498394, 0.17978155430554385}, 0.17978155430554385], CircleBox[{31.88854381999833, 0.09016994374947426}, 0.09016994374947426], CircleBox[{31.775888637582675, 0.2667713009690788}, 0.11930375268258314], CircleBox[{30.64480395214656, 0.29158229760262566}, 0.06883324326979351], CircleBox[{30.792079834208984, 0.14146505182132219}, 0.14146505182132219], CircleBox[{30.516497309077415, 0.13421288010733348}, 0.13421288010733348], CircleBox[{27.18871390632387, 0.3998830953545377}, 0.044431455039392935], CircleBox[{27.147383855524968, 0.31980199585522384}, 0.045685999407889116], CircleBox[{27.708203932499366, 0.23606797749978947}, 0.05572809000084108], CircleBox[{27.88854381999832, 0.09016994374947448}, 0.09016994374947448], CircleBox[{27.745862184998508, 0.12905675124993132}, 0.05771593375002547], CircleBox[{27.65247584249853, 0.059016994374947444}, 0.059016994374947444], CircleBox[{27.173299381592514, 0.77236804621173}, 0.08581867180130306], CircleBox[{27.03444185374863, 0.7548814032101687}, 0.054135591164774885], CircleBox[{27.03444185374864, 0.9438531601040971}, 0.13483616572915674], CircleBox[{27.250984218407737, 0.028979981890481083}, 0.028979981890481083], CircleBox[{26.72070999536995, 0.27378688952968905}, 0.06463231727723194], CircleBox[{26.774978038635027, 0.10892842882230544}, 0.10892842882230544], CircleBox[{26.495097190832, 0.17978155430554416}, 0.17978155430554416], CircleBox[{28.133548212271293, 3.1944610200307926}, 0.0416069574689965], CircleBox[{28.1335482122713, 3.303389448853099}, 0.06732147135330771], CircleBox[{28.034441853748632, 3.2725424859373704}, 0.03647450843757853], CircleBox[{28.034441853748625, 3.1770509831248392}, 0.05901699437494673], CircleBox[{27.568076593401056, 3.842265586432701}, 0.1536906234573061], CircleBox[{27.330127853156522, 3.926001976118186}, 0.09856199980262817], CircleBox[{27.330127853156522, 3.7078324770557}, 0.11960749925986047], CircleBox[{27.600443033069737, 2.9083630507964155}, 0.04681498952905354], CircleBox[{27.48595361284265, 2.80706169516267}, 0.04766736470412423], CircleBox[{27.5168938251668, 2.888168195231081}, 0.03914024493933066], CircleBox[{27.46432049636958, 2.9487196742236104}, 0.04104975761088273], CircleBox[{27.113693502689472, 2.2591932970036654}, 0.04898021270991386], CircleBox[{27.144450798156505, 2.372046510920917}, 0.06798926671055915], CircleBox[{26.98452781035774, 2.2714172993161554}, 0.08076261872237538], CircleBox[{27.034441853748632, 2.3843458848123618}, 0.04270509831248402], CircleBox[{27.25098421840774, 3.207087995609309}, 0.02897998189048106], CircleBox[{27.205262246998576, 3.2652475842498525}, 0.029179606750063064], CircleBox[{26.495097190832, 3.3471790886109054}, 0.1111111111111112], CircleBox[{26.723174486131256, 3.26691655283129}, 0.13067666211325166], CircleBox[{26.49509719083201, 3.056286423194243}, 0.17978155430554368], CircleBox[{38.360679774997905, 3.1458980337503215}, 0.09016994374947444], CircleBox[{38.360679774997905, 3.3819660112501118}, 0.14589803375031593], CircleBox[{38.12461179749812, 3.3315594803123205}, 0.0954915028125264], CircleBox[{38.12461179749812, 3.0815594803123205}, 0.1545084971874735], CircleBox[{38.52020269249811, 5.760715623749715}, 0.6400795137499663], CircleBox[{39.344629686313844, 6.498105544012833}, 0.4660053666447195], CircleBox[{38.12461179749812, 7.413118960624632}, 1.0590169943749475], CircleBox[{37.26059033091923, 1.2200178888157331}, 0.28800715552629297], CircleBox[{37.67739820199816, 0.32360679774997925}, 0.32360679774997925], CircleBox[{37.157033582775966, 0.6504557740277432}, 0.2908926654166552], CircleBox[{36.50657780874822, 0.40450849718747406}, 0.40450849718747406], CircleBox[{40.526103421588914, 0.5669152706817988}, 0.13383054136359787], CircleBox[{40.360679774997905, 0.23606797749978975}, 0.23606797749978975], CircleBox[{40.883686129135924, 0.510288754353409}, 0.22820806857758286], CircleBox[{40.74264578624802, 0.15450849718747378}, 0.15450849718747378], CircleBox[{40.14518930620494, 3.3232357031894604}, 0.3692484114654944], CircleBox[{40.74264578624802, 3.4860679774997902}, 0.25000000000000017], CircleBox[{40.74264578624801, 2.831559480312316}, 0.4045084971874737], CircleBox[{45.59674775249769, 4.236067977499796}], CircleBox[{50.83281572999749, 4.2360679774997925}, 4.2360679774997925], CircleBox[{45.59674775249769, 1.618033988749895}, 1.618033988749895]}, {RGBColor[1, 0, 0], CircleBox[{4.236067977499794, 3.2360679774997942}], CircleBox[{4.23606797749979, 8.47213595499958}, 4.23606797749979], CircleBox[{2.618033988749896, 0.}, 2.618033988749896], CircleBox[{6.8541019662496865, 0.}, 1.618033988749895], CircleBox[{6.854101966249689, 3.23606797749979}, 1.618033988749895], TagBox[ConicHullRegionBox[{0, 0}, {{0, -1}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{8.472135954999581, 0.}, {{0, 1}}], "InfiniteLine"]}, {RGBColor[0, 0, 1], CircleBox[{5.236067977499794, 4.236067977499796}], CircleBox[{0., 4.2360679774997925}, 4.2360679774997925], CircleBox[{5.236067977499792, 1.618033988749895}, 1.618033988749895], CircleBox[{8.47213595499958, 1.6180339887498947}, 1.6180339887498947], CircleBox[{8.47213595499958, 5.854101966249684}, 2.6180339887498945], TagBox[ConicHullRegionBox[{0., 8.472135954999578}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"]}}, PlotRange->{{-8.472135954999581, 16.944271909999163`}, {-5.083281572999751, 13.555417527999328`}}, PlotRangeClipping->True]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"22", "+", RowBox[{"10", " ", SqrtBox["5"]}]}], "1", RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}]}, {"0", RowBox[{ RowBox[{"-", "2"}], "+", SqrtBox["5"]}], "0", "1"}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], ")"}]}], RowBox[{"1", "+", SqrtBox["5"]}], "1"}, { RowBox[{"22", "+", RowBox[{"10", " ", SqrtBox["5"]}]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], ")"}]}], RowBox[{"3", "+", SqrtBox["5"]}], "1"}, { RowBox[{"20", "+", RowBox[{"8", " ", SqrtBox["5"]}]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"3", "-", SqrtBox["5"]}], ")"}]}], RowBox[{"1", "+", SqrtBox["5"]}], SqrtBox["5"]}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], "0", "0", "1"}, {"0", "0", "0", RowBox[{"-", "1"}]}, { RowBox[{"14", "+", RowBox[{"6", " ", SqrtBox["5"]}]}], "1", RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}]}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{ RowBox[{"-", "2"}], "+", SqrtBox["5"]}], "1", "2"}, {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"3", "-", SqrtBox["5"]}], ")"}]}], "1", "0"}, { RowBox[{"14", "+", RowBox[{"6", " ", SqrtBox["5"]}]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], ")"}]}], RowBox[{"2", "+", SqrtBox["5"]}], "0"}, { RowBox[{"8", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], ")"}]}], RowBox[{"2", "+", SqrtBox["5"]}], "2"}, {"0", "0", RowBox[{"-", "1"}], "0"}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], "0", "1", "0"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]}, { RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"-", "1"}], "0"}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", "1", "0", "0", "1", RowBox[{"1", "-", SqrtBox["5"]}], "1"}, {"0", RowBox[{"11", "+", RowBox[{"5", " ", SqrtBox["5"]}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"15", "+", RowBox[{"7", " ", SqrtBox["5"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", SqrtBox["5"]}]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], ")"}]}]}, {"0", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], "0", "0", RowBox[{"5", "+", RowBox[{"2", " ", SqrtBox["5"]}]}], RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"1", "+", SqrtBox["5"]}]}, {"0", RowBox[{"11", "+", RowBox[{"5", " ", SqrtBox["5"]}]}], "0", "0", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], RowBox[{ RowBox[{"-", "3"}], " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"3", "+", SqrtBox["5"]}]}, {"0", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"2", "+", SqrtBox["5"]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"-", "1"}], "0"}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", "3", "0", "0", SqrtBox["5"], "0", RowBox[{"-", "1"}]}, {"0", RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"5", "+", SqrtBox["5"]}], ")"}]}], "1", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["5"]}], ")"}]}]}, {"0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "0", "1", "0"}, {"0", "2", "0", "0", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], RowBox[{"-", "1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"11", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"5", "+", SqrtBox["5"]}], ")"}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["5"]}]}], RowBox[{"5", "+", SqrtBox["5"]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", "1", "0", "0", "1", RowBox[{"1", "-", SqrtBox["5"]}], "1"}, {"0", RowBox[{"5", "+", SqrtBox["5"]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"5", "+", SqrtBox["5"]}], ")"}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["5"]}]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"11", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], ")"}]}]}, {"0", RowBox[{"4", " ", SqrtBox["5"]}], "0", "0", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SqrtBox["5"]}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "5"}], "+", SqrtBox["5"]}], ")"}]}], RowBox[{"4", " ", SqrtBox["5"]}]}, {"0", RowBox[{"5", "+", SqrtBox["5"]}], "0", "0", "2", RowBox[{"1", "-", RowBox[{"2", " ", SqrtBox["5"]}]}], RowBox[{"5", "+", SqrtBox["5"]}]}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"15", "+", RowBox[{"7", " ", SqrtBox["5"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "8"}], "-", RowBox[{"3", " ", SqrtBox["5"]}]}], RowBox[{"11", "+", RowBox[{"5", " ", SqrtBox["5"]}]}]}, {"0", RowBox[{"2", "+", SqrtBox["5"]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}]}, {"0", "1", "0", "0", "1", RowBox[{"1", "-", SqrtBox["5"]}], "1"}, {"0", "0", "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"-", "1"}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}]}, {"0", RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{"5", "+", RowBox[{"2", " ", SqrtBox["5"]}]}], RowBox[{ RowBox[{"-", "2"}], " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}]}, {"0", RowBox[{"3", "+", SqrtBox["5"]}], "0", "0", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], RowBox[{ RowBox[{"-", "3"}], " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"11", "+", RowBox[{"5", " ", SqrtBox["5"]}]}]}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"-", "1"}], "0"}, {"0", "3", "0", "0", RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"3", "-", RowBox[{"3", " ", SqrtBox["5"]}]}], "2"}, {"0", "1", "0", "0", "1", RowBox[{"1", "-", SqrtBox["5"]}], "1"}, {"0", "0", "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"-", "1"}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}]}, {"0", "0", "0", "0", "1", "0", "0"}, {"0", RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"-", "5"}], RowBox[{"1", "+", SqrtBox["5"]}]}, {"0", "2", "0", "0", RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"3", "-", RowBox[{"3", " ", SqrtBox["5"]}]}], "3"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["5"]}], ")"}]}], RowBox[{"4", "+", SqrtBox["5"]}], RowBox[{"3", "+", SqrtBox["5"]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"2", "+", SqrtBox["5"]}], "0", "0", RowBox[{"-", "1"}], RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}]}, {"0", RowBox[{"3", "+", SqrtBox["5"]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["5"]}], ")"}]}], RowBox[{"4", "+", SqrtBox["5"]}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"7", "+", RowBox[{"3", " ", SqrtBox["5"]}]}], ")"}]}]}, {"0", RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{"-", "1"}], RowBox[{"2", " ", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}]}, {"0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["5"]}], ")"}]}], "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"5", "+", SqrtBox["5"]}], ")"}]}], "1", RowBox[{"1", "+", SqrtBox["5"]}]}, {"0", RowBox[{"-", "1"}], "0", "0", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["5"]}], "2"}, {"0", RowBox[{"-", "1"}], "0", "0", SqrtBox["5"], "0", "3"}, {"0", "0", "0", "0", RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}], RowBox[{"-", "1"}], RowBox[{ FractionBox["1", "2"], " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["5"]}], ")"}]}]}, {"0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}]}], "}"}]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"-", "1"}], "1", "1", RowBox[{"2", "+", SqrtBox["5"]}], "1", RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}], "0", "0", RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"3", "+", SqrtBox["5"]}], "0", RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}]}, {"1", RowBox[{"-", "1"}], "1", RowBox[{"2", "+", SqrtBox["5"]}], SqrtBox["5"], "1", "1", "0", "0", "0", RowBox[{"1", "+", SqrtBox["5"]}], "2", "0", "2"}, {"1", "1", RowBox[{"-", "1"}], "1", SqrtBox["5"], RowBox[{"2", "+", SqrtBox["5"]}], "1", "0", "2", "0", "0", "0", RowBox[{"1", "+", SqrtBox["5"]}], "2"}, { RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}], "1", RowBox[{"-", "1"}], "1", RowBox[{"2", "+", SqrtBox["5"]}], "1", RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{"3", "+", SqrtBox["5"]}], "0"}, {"1", SqrtBox["5"], SqrtBox["5"], "1", RowBox[{"-", "1"}], "1", SqrtBox["5"], RowBox[{"1", "+", SqrtBox["5"]}], "0", "4", RowBox[{"1", "+", SqrtBox["5"]}], "0", RowBox[{"1", "+", SqrtBox["5"]}], "0"}, { RowBox[{"2", "+", SqrtBox["5"]}], "1", RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}], "1", RowBox[{"-", "1"}], "1", RowBox[{"3", "+", SqrtBox["5"]}], "0", RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}], "0", "0"}, { RowBox[{"2", "+", SqrtBox["5"]}], "1", "1", "1", SqrtBox["5"], "1", RowBox[{"-", "1"}], RowBox[{"1", "+", SqrtBox["5"]}], "2", "0", "0", "2", "0", "0"}, {"0", "0", "0", RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"-", "1"}], "1", "1", RowBox[{"2", "+", SqrtBox["5"]}], "1", RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}]}, {"0", "0", "2", RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", "2", "1", RowBox[{"-", "1"}], SqrtBox["5"], RowBox[{"2", "+", SqrtBox["5"]}], "1", "1", "1"}, { RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{"1", "+", SqrtBox["5"]}], "4", RowBox[{"1", "+", SqrtBox["5"]}], "0", "1", SqrtBox["5"], RowBox[{"-", "1"}], "1", SqrtBox["5"], "1", SqrtBox["5"]}, { RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"3", "+", SqrtBox["5"]}], "0", RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}], "1", RowBox[{"-", "1"}], "1", RowBox[{"2", "+", SqrtBox["5"]}], "1"}, {"0", "2", "0", "0", "0", RowBox[{"1", "+", SqrtBox["5"]}], "2", "1", "1", SqrtBox["5"], "1", RowBox[{"-", "1"}], RowBox[{"2", "+", SqrtBox["5"]}], "1"}, { RowBox[{"3", "+", SqrtBox["5"]}], "0", RowBox[{"1", "+", SqrtBox["5"]}], RowBox[{"3", "+", SqrtBox["5"]}], RowBox[{"1", "+", SqrtBox["5"]}], "0", "0", RowBox[{"2", "+", SqrtBox["5"]}], "1", "1", RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"2", "+", SqrtBox["5"]}], RowBox[{"-", "1"}], "1"}, { RowBox[{"1", "+", SqrtBox["5"]}], "2", "2", "0", "0", "0", "0", RowBox[{"2", "+", SqrtBox["5"]}], "1", SqrtBox["5"], "1", "1", "1", RowBox[{"-", "1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]], "Output", CellChangeTimes->{3.7386051751436386`*^9, 3.738605367660136*^9, 3.7386060480549717`*^9, 3.7386061985278535`*^9, 3.738668734763968*^9, 3.738669010410738*^9, 3.7386693358435574`*^9, 3.7386695798026056`*^9, 3.738670667579774*^9, 3.7389259247816286`*^9, 3.7391187911338425`*^9}, CellLabel-> "Out[545]=",ExpressionUUID->"3921f178-3f0d-447a-a67b-dce2e268596f"] }, Open ]] }, WindowSize->{1060, 661}, WindowMargins->{{47, Automatic}, {Automatic, 0}}, Magnification:>1.2 Inherited, FrontEndVersion->"11.3 for Microsoft Windows (64-bit) (March 6, 2018)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[558, 20, 664, 18, 58, "Input",ExpressionUUID->"748eabe5-c3d2-4801-b8b7-aa7a789097c7"], Cell[1225, 40, 695, 18, 55, "Input",ExpressionUUID->"0ab29ce4-3405-44f4-bf4a-16ef730ff686"], Cell[1923, 60, 9875, 235, 944, "Input",ExpressionUUID->"72e544ec-21b3-4511-8714-78e40bf96f8f"], Cell[11801, 297, 35696, 782, 2724, "Input",ExpressionUUID->"34558bf5-30de-4efd-a85d-1e42927d2f41"], Cell[47500, 1081, 13766, 317, 1128, "Input",ExpressionUUID->"1669407f-19e4-41f4-83d2-404c097a4b8c"], Cell[61269, 1400, 1572, 43, 132, "Input",ExpressionUUID->"0ca661cb-0814-4baa-8045-ccb6be11fd34"], Cell[62844, 1445, 16048, 333, 1092, "Input",ExpressionUUID->"8eb99bd7-ecdf-447b-9254-91418df0046a"], Cell[78895, 1780, 13582, 313, 1061, "Input",ExpressionUUID->"df3b60f9-0301-4a00-901e-3f42ad1f6dcc"], Cell[92480, 2095, 3768, 87, 420, "Input",ExpressionUUID->"94e58c8f-e9bc-4bc5-9f72-1e7d65b723b4"], Cell[96251, 2184, 397, 13, 88, "Input",ExpressionUUID->"e0269727-13f8-41e1-9bed-e3d214f9ade5"], Cell[96651, 2199, 682, 20, 61, "Input",ExpressionUUID->"335fc47c-61a3-4d42-b8dc-1a6e429b3dbb"], Cell[97336, 2221, 4976, 131, 473, "Input",ExpressionUUID->"8f83b82e-c1db-40d9-ac4c-a723737f7704"], Cell[102315, 2354, 1032, 29, 60, "Input",ExpressionUUID->"d37cc6ff-e0b5-488e-9c86-c606b2039282"], Cell[103350, 2385, 1961, 44, 156, "Input",ExpressionUUID->"9a3eb7b4-a69e-4770-9009-32f6122d8145"], Cell[105314, 2431, 5280, 132, 228, "Input",ExpressionUUID->"affbea28-f93e-449d-873a-65b52e624ef9"], Cell[110597, 2565, 1186, 31, 60, "Input",ExpressionUUID->"15495297-a588-42f2-9830-ff3a5a9d76a4"], Cell[111786, 2598, 934, 25, 60, "Input",ExpressionUUID->"cd35cdcc-79cb-420e-8b24-2c510cf42e01"], Cell[112723, 2625, 5091, 135, 612, "Input",ExpressionUUID->"e65bbe1e-e47d-443d-bee4-ee5d9f6173e2"], Cell[117817, 2762, 5575, 130, 477, "Input",ExpressionUUID->"b49300f9-4eb0-4e74-b00e-238ad2cc61d5"], Cell[123395, 2894, 3749, 87, 324, "Input",ExpressionUUID->"b43a5c15-ff8f-4841-a157-1d63bba9b7c4"], Cell[CellGroupData[{ Cell[127169, 2985, 2352, 42, 60, "Input",ExpressionUUID->"8c0d00eb-3a38-4d87-9e21-66e5a04e235e"], Cell[129524, 3029, 189377, 4217, 2660, "Output",ExpressionUUID->"3921f178-3f0d-447a-a67b-dce2e268596f"] }, Open ]] } ] *)