(* 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[ 338852, 7784] NotebookOptionsPosition[ 336327, 7746] NotebookOutlinePosition[ 336699, 7762] CellTagsIndexPosition[ 336656, 7759] 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.738880289322649*^9, 3.7388803034648275`*^9}}, CellLabel-> "In[102]:=",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"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "Input", CellChangeTimes->{{3.7378245147847567`*^9, 3.737824531315222*^9}, { 3.737995674554207*^9, 3.7379956992022705`*^9}, 3.7380623568729105`*^9, 3.739125203939374*^9}, CellLabel-> "In[655]:=",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", "]"}]}], "}"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "B", "]"}], ">", "0"}], ",", RowBox[{"{", RowBox[{"B", ",", "\"\\""}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"Bend3", "[", RowBox[{"V", ",", "n", ",", "Reals"}], "]"}], "[", "i", "]"}], ",", "\"\\""}], "}"}]}], "]"}]}], "]"}]}], "\n"}], "\[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"}], "}"}], ",", 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"}], "\[Equal]", RowBox[{"cl", ".", RowBox[{"R", "[", RowBox[{"co", "[", RowBox[{"[", "i", "]"}], "]"}], "]"}]}]}], ",", "RING"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{"sol", "\[Equal]", RowBox[{"{", "}"}]}], ",", "Null", ",", RowBox[{ RowBox[{"sol", "=", RowBox[{"sol", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[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", "\[Equal]", "0"}], ",", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{ RowBox[{ RowBox[{"BMat", "[", "n", "]"}], "/.", "assignments"}], "/.", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"C", "[", "1", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "2", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "3", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "4", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "5", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "6", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "7", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "8", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "9", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "10", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "11", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "12", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "13", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "14", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "15", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "16", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "17", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "18", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "19", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "20", "]"}], "\[Rule]", "0"}], ",", RowBox[{ RowBox[{"C", "[", "21", "]"}], "\[Rule]", "0"}]}], "}"}]}], "]"}], "]"}], ",", RowBox[{ RowBox[{"others1", "=", RowBox[{ RowBox[{"Solve", "[", RowBox[{"rest", "\[Equal]", RowBox[{"Table", "[", RowBox[{"0", ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "l"}], "}"}]}], "]"}]}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"others2", "=", RowBox[{"<|", "|>"}]}], ";", "\[IndentingNewLine]", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "\[LessEqual]", "l"}], ",", RowBox[{"j", "++"}], ",", RowBox[{ RowBox[{"others2", "[", RowBox[{"rest", "[", RowBox[{"[", "j", "]"}], "]"}], "]"}], "=", 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"}], "]"}], "]"}]}]}], "]"}]}]}], "]"}]}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.7391252115192356`*^9, 3.7391252115401545`*^9}}, CellLabel-> "In[657]:=",ExpressionUUID->"80221e6e-fcc3-4461-a419-6059d3441ea7"], Cell[BoxData[ RowBox[{ RowBox[{"Everything", "[", RowBox[{"n_", ",", "FacesCW_", ",", RowBox[{"\[Epsilon]_:", "0"}], ",", "steps_", ",", RowBox[{"sizemax_:", "\[Infinity]"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"vertices", ",", "faces", ",", RowBox[{"f", "=", RowBox[{"Length", "[", "FacesCW", "]"}]}], ",", "radii", ",", "d", ",", "h", ",", "LineFaces", ",", "Vnye", ",", "Vout", ",", RowBox[{"bends", "=", RowBox[{"{", "}"}]}]}], "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ "vertices", ",", "faces", ",", "radii", ",", "d", ",", "h", ",", "LineFaces"}], "}"}], "=", RowBox[{"Packing", "[", RowBox[{"n", ",", "FacesCW", ",", "\[Epsilon]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"Vnye", "=", RowBox[{ RowBox[{"SendToInt", "[", "\[Epsilon]", "]"}], "//@", RowBox[{"SuperCluster", "[", RowBox[{"vertices", ",", "faces", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "d", ",", "h", ",", "n"}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Vout", "=", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"RootApproximant", "[", "Vnye", "]"}], "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"bends", "=", RowBox[{ RowBox[{"Bend4", "[", RowBox[{ RowBox[{"Vout", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "n"}], "]"}], "/@", RowBox[{"Range", "@", "f"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"Column", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"Render", "[", RowBox[{"radii", ",", "faces", ",", "vertices", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "n", ",", "d", ",", "h"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", RowBox[{"Thick", ",", " ", RowBox[{"DrawCircle", "/@", RowBox[{"Orbit", "[", RowBox[{ RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "f"}], ";;"}], "]"}], "]"}], ",", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}], ",", "steps", ",", "sizemax"}], "]"}]}], ",", "Red", ",", RowBox[{"DrawCircle", "/@", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{ RowBox[{"-", "f"}], ";;"}], "]"}], "]"}]}], ",", " ", "Blue", ",", " ", RowBox[{"DrawCircle", "/@", RowBox[{"Vnye", "[", RowBox[{"[", RowBox[{";;", "n"}], "]"}], "]"}]}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "d"}], ",", RowBox[{"2", " ", "d"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"-", "1.2"}], " ", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}], ",", RowBox[{"h", "+", RowBox[{"1.2", " ", RowBox[{"Max", "[", RowBox[{"Values", "[", "radii", "]"}], "]"}]}]}]}], "}"}]}], "}"}]}], ",", RowBox[{"PlotRangeClipping", "->", "True"}]}], "]"}], ",", "\[IndentingNewLine]", "Vout", ",", "\[IndentingNewLine]", "bends", ",", "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", RowBox[{"Simplify", "[", RowBox[{"RootApproximant", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"SendToInt", "[", "\[Epsilon]", "]"}], "//@", RowBox[{"Gram", "[", RowBox[{"SuperCluster", "[", RowBox[{"vertices", ",", "faces", ",", "radii", ",", RowBox[{"FacesCW", "[", RowBox[{"[", "LineFaces", "]"}], "]"}], ",", "d", ",", "h", ",", "n"}], "]"}], "]"}]}], "]"}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "}"}], "]"}]}]}], "]"}]}]], "Input", CellChangeTimes->{{3.737470377365205*^9, 3.737470438059895*^9}, { 3.737470482386249*^9, 3.7374706291316*^9}, {3.737471365625141*^9, 3.737471391640571*^9}, {3.737471696917704*^9, 3.7374717170638113`*^9}, { 3.737471876518211*^9, 3.737471941864938*^9}, {3.737716963448217*^9, 3.737716980888073*^9}, {3.737720445151472*^9, 3.737720446702874*^9}, { 3.737824443162737*^9, 3.737824455449666*^9}, {3.7378912948360367`*^9, 3.73789135603367*^9}, {3.737891444682703*^9, 3.7378914866810017`*^9}, { 3.7378915925235357`*^9, 3.737891593055147*^9}, {3.737905867803301*^9, 3.737905868137411*^9}, {3.73799267567642*^9, 3.737992677471591*^9}, { 3.7379929469710035`*^9, 3.7379929651434455`*^9}, {3.7379930588897543`*^9, 3.737993076943515*^9}, {3.7380635255102654`*^9, 3.7380635290957108`*^9}, { 3.7380636676088915`*^9, 3.7380636745872297`*^9}, {3.7380638177433786`*^9, 3.738063855095478*^9}, {3.738063909642552*^9, 3.7380639110946693`*^9}, { 3.7380639502698975`*^9, 3.738063956902152*^9}, {3.7380640873173466`*^9, 3.7380641169740276`*^9}, {3.7380642823624744`*^9, 3.738064323475514*^9}, { 3.7380643636749973`*^9, 3.7380643981976967`*^9}, {3.738064443997203*^9, 3.738064444270455*^9}, {3.7380646319055905`*^9, 3.7380646323294573`*^9}, { 3.738064693256534*^9, 3.738064738370883*^9}, {3.738064780948996*^9, 3.738064783577959*^9}, {3.738064816492895*^9, 3.738064820860215*^9}, { 3.738064905554728*^9, 3.738064908135788*^9}, {3.73806511977873*^9, 3.7380651218093004`*^9}, {3.738065157856887*^9, 3.7380651636254597`*^9}, { 3.738065275188075*^9, 3.738065299386354*^9}, {3.738065349198165*^9, 3.738065417491501*^9}, {3.738065502923974*^9, 3.7380655312192965`*^9}, { 3.738065586862509*^9, 3.7380656114477196`*^9}, {3.7383667450964403`*^9, 3.7383667808971167`*^9}, {3.7383668404673557`*^9, 3.7383668491723013`*^9}, {3.738366884492676*^9, 3.738366899165487*^9}, { 3.7383669350551987`*^9, 3.738366935597023*^9}, {3.738406454334059*^9, 3.7384064778900304`*^9}, {3.7384065311871557`*^9, 3.7384065390999947`*^9}, {3.7384088785270195`*^9, 3.738408882012842*^9}, { 3.7384089293051987`*^9, 3.738408929489704*^9}, {3.7384091549149723`*^9, 3.7384091574651527`*^9}, {3.7384095341398277`*^9, 3.738409537195654*^9}, { 3.738410849524389*^9, 3.7384108842784495`*^9}, {3.73841104193098*^9, 3.738411045112468*^9}, {3.738411222945875*^9, 3.738411223086499*^9}, { 3.738411291901064*^9, 3.7384112938647933`*^9}, {3.7384113284900064`*^9, 3.738411336118482*^9}, {3.7384113742605715`*^9, 3.738411385112833*^9}, { 3.738411497441986*^9, 3.7384115195708466`*^9}, {3.7384115693655043`*^9, 3.73841163508772*^9}, {3.738411670899951*^9, 3.7384116724797554`*^9}, { 3.738411750114659*^9, 3.73841176516743*^9}, {3.738411889531969*^9, 3.738411889696562*^9}, {3.7385985625147996`*^9, 3.738598562667409*^9}, { 3.738598719985386*^9, 3.738598730957058*^9}, {3.7386013106761007`*^9, 3.7386013108386655`*^9}, {3.738683755836348*^9, 3.7386837560148706`*^9}, { 3.738880307916935*^9, 3.73888032094709*^9}, 3.739125218463197*^9}, CellLabel-> "In[659]:=",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[{"2", ",", "7", ",", "6"}], "}"}], ",", " ", RowBox[{"{", RowBox[{"5", ",", "6", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "6", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "2", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "5", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "3", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "4", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "3", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "7"}], "}"}]}], "}"}], ",", RowBox[{"1", "/", "100"}], ",", "5", ",", "32"}], "]"}]], "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.738671416632803*^9, 3.738671464621436*^9}, { 3.7386715214288125`*^9, 3.7386715217948365`*^9}, {3.7386716018550005`*^9, 3.738671648743537*^9}, {3.7386718023143125`*^9, 3.73867183494204*^9}, { 3.7386720871598883`*^9, 3.7386721271908216`*^9}, {3.738672284788164*^9, 3.7386723201066904`*^9}, {3.738672546516434*^9, 3.7386725957080126`*^9}, { 3.738674291114772*^9, 3.7386743277567606`*^9}, {3.7386805166571894`*^9, 3.7386805668060427`*^9}, {3.7386810791624017`*^9, 3.7386811396127415`*^9}, {3.7386814782713137`*^9, 3.738681543363078*^9}, { 3.7386816898976307`*^9, 3.738681719544482*^9}, {3.7386818477562714`*^9, 3.738681859596021*^9}, {3.738682701484929*^9, 3.738682756230011*^9}, { 3.7386843903984723`*^9, 3.7386843904992466`*^9}, {3.738684424708892*^9, 3.7386844619238653`*^9}, {3.7386846401115694`*^9, 3.7386846425530405`*^9}, {3.7386848908844295`*^9, 3.738684919541772*^9}, { 3.738685450783483*^9, 3.7386855285324697`*^9}, {3.7386872872275896`*^9, 3.7386873330789165`*^9}, {3.73868750337795*^9, 3.7386875618149843`*^9}, { 3.7386877182904544`*^9, 3.738687719129985*^9}, {3.7388803260424805`*^9, 3.7388803284290786`*^9}, {3.738943661825966*^9, 3.7389437317041388`*^9}, { 3.738945752646738*^9, 3.738945814797018*^9}, {3.7389461878935165`*^9, 3.7389462474933977`*^9}, {3.7389463042200804`*^9, 3.7389463061510944`*^9}, {3.738948213317395*^9, 3.7389482757765207`*^9}, { 3.7390163636799154`*^9, 3.7390164456882296`*^9}, {3.7390165740706797`*^9, 3.739016636784433*^9}, {3.739016722260918*^9, 3.7390167754640846`*^9}, { 3.7390182754224586`*^9, 3.739018321179857*^9}, {3.7390186534781513`*^9, 3.739018712869171*^9}, {3.739018988020894*^9, 3.739019115639406*^9}, { 3.7390201435704327`*^9, 3.739020161327952*^9}, {3.739020507061387*^9, 3.7390205299191856`*^9}, {3.7390207409983344`*^9, 3.739020780979892*^9}, { 3.7390214134430995`*^9, 3.7390214712404594`*^9}, {3.739030863112644*^9, 3.7390309414900484`*^9}, {3.7390311136453695`*^9, 3.7390311570860806`*^9}, {3.7390313986891336`*^9, 3.739031445595641*^9}, { 3.7390317610790434`*^9, 3.7390317789980907`*^9}, {3.7390322931413*^9, 3.739032367376645*^9}, {3.7390327094092107`*^9, 3.739032759935993*^9}}, CellLabel-> "In[660]:=",ExpressionUUID->"8c0d00eb-3a38-4d87-9e21-66e5a04e235e"], Cell[BoxData[ TagBox[GridBox[{ { GraphicsBox[ {RGBColor[0, 0, 1], Thickness[ Large], {CircleBox[{4.82842712474619, 1.}], CircleBox[{0, 5.828427124746191}, 5.828427124746191], CircleBox[{5.828427124746191, 2.5606601717798205}, 0.8535533905932738], CircleBox[{6.828427124746191, 1.0000000000000004}], CircleBox[{11.656854249492383, 5.828427124746192}, 5.828427124746192], LineBox[{{-5.828427124746192, 11.656854249492383`}, { 17.48528137423857, 11.656854249492383`}}], LineBox[{{-5.828427124746192, 0}, {17.48528137423857, 0}}]}, {RGBColor[1, 0, 0], Dashing[{Small, Small}], LineBox[{{0, -5.828427124746192}, {0, 17.485281374238575`}}], LineBox[{{11.65685424949238, -5.828427124746192}, {11.65685424949238, 17.485281374238575`}}], CircleBox[{5.828427124746192, 11.656854249492381}, 5.828427124746192], CircleBox[{5.828427124746191, 4.306019374818707}, 1.522407749927483], CircleBox[{9.242640687119286, 0}, 2.4142135623730954], CircleBox[{6.966498312203889, 2.276142374915397}, 0.804737854124365], CircleBox[{5.82842712474619, 0}, 0.9999999999999998], CircleBox[{5.82842712474619, 1.546918160678027}, 0.546918160678027], CircleBox[{4.690355937288492, 2.2761423749153966}, 0.8047378541243649], CircleBox[{2.414213562373095, 0}, 2.414213562373095]}}]}, { GraphicsBox[ {Thickness[ Large], {CircleBox[{4.82842712474619, 1}], CircleBox[{0., 5.828427124746191}, 5.828427124746191], CircleBox[{5.828427124746192, 2.560660171779822}, 0.853553390593274], CircleBox[{6.828427124746191, 1}], CircleBox[{11.656854249492383, 5.828427124746192}, 5.828427124746192], TagBox[ConicHullRegionBox[{0., 11.656854249492383`}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"], CircleBox[{5.529307650266756, 8.469181606780273}, 0.2991194744794365], CircleBox[{5.828427124746191, 7.889087296526012}, 0.353553390593274], CircleBox[{6.127546599225627, 8.46918160678027}, 0.2991194744794365], CircleBox[{5.828427124746192, 10.199747468305835}, 1.457106781186548], CircleBox[{5.616370822851856, 3.6049571322036407}, 0.21205630189433172], CircleBox[{6.040483426640527, 3.6049571322036487}, 0.2120563018943322], CircleBox[{5.828427124746191, 4.463669859189174}, 0.15765048437046764], CircleBox[{5.828427124746191, 4.036893163892537}, 0.2691262109261693], CircleBox[{7.922263446102246, 0.29911947447943626}, 0.29911947447943626], CircleBox[{8.612038749637415, 0.3976588035558893}, 0.3976588035558893], CircleBox[{8.1045694996616, 0.8535533905932748}, 0.28451779686442497], CircleBox[{9.242640687119287, 0.25000000000000006}, 0.25000000000000006], CircleBox[{6.700219229313964, 2.1172093968074455}, 0.12454172922396761], CircleBox[{6.800512967810178, 2.360779904583967}, 0.13886940615199808], CircleBox[{6.966498312203889, 2.310660171779822}, 0.034517796864424584], CircleBox[{6.966498312203888, 2.133883476483185}, 0.1422588984322123], CircleBox[{5.656854249492381, 0.1715728752538099}, 0.1715728752538099], CircleBox[{5.8284271247461845, 0.43933982822017903}, 0.14644660940672635], CircleBox[{5.999999999999997, 0.17157287525380985}, 0.17157287525380985], CircleBox[{5.82842712474619, 0.04289321881345246}, 0.04289321881345246], CircleBox[{5.733322344904533, 1.6167812573081506}, 0.09510477984165594], CircleBox[{5.92353190458785, 1.616781257308153}, 0.09510477984165584], CircleBox[{5.82842712474619, 1.4502357756356505}, 0.09668238504237668], CircleBox[{4.956635020178426, 2.1172093968074566}, 0.12454172922396786], CircleBox[{4.856341281682204, 2.360779904583965}, 0.13886940615199786], CircleBox[{4.690355937288492, 2.3106601717798214}, 0.03451779686442457], CircleBox[{4.690355937288493, 2.133883476483185}, 0.1422588984322123], CircleBox[{3.552284749830793, 0.8535533905932734}, 0.28451779686442447], CircleBox[{3.734590803390135, 0.29911947447943626}, 0.29911947447943626], CircleBox[{3.0448154998549652, 0.39765880355588895}, 0.39765880355588895], CircleBox[{2.414213562373095, 0.2499999999999999}, 0.2499999999999999], CircleBox[{-4.82842712474619, 1.}], CircleBox[{-5.828427124746192, 2.560660171779822}, 0.853553390593274], CircleBox[{-6.828427124746191, 1.}], CircleBox[{-11.656854249492383, 5.828427124746192}, 5.828427124746192], CircleBox[{18.485281374238568, 1.}], CircleBox[{23.31370849898476, 5.828427124746191}, 5.828427124746191], CircleBox[{17.48528137423857, 2.560660171779822}, 0.853553390593274], CircleBox[{16.485281374238568, 1.}], CircleBox[{5.717316013635076, 7.437902832994914}, 0.11111111111111109], CircleBox[{5.939538235857304, 7.4379028329949115}, 0.11111111111111162], CircleBox[{5.828427124746188, 6.931980515339458}, 0.10355339059327373], CircleBox[{5.8284271247461925, 7.193184390303208}, 0.15765048437046789], CircleBox[{6.362055264509306, 8.762259854459751}, 0.07623259139473049], CircleBox[{6.532215184390223, 8.810161397231349}, 0.10054115137771892], CircleBox[{6.463195093923346, 8.64404212394683}, 0.07934599614714398], CircleBox[{6.646874665870682, 8.922428988181716}, 0.059929433687476816], CircleBox[{6.151211681970847, 8.12476210995526}, 0.04611207960352203], CircleBox[{6.2065047040759795, 8.041291580135244}, 0.0540110827613982], CircleBox[{6.248828416400771, 8.139087296526009}, 0.052550161456822606], CircleBox[{5.784242813239983, 8.699106707958665}, 0.04418431150620993], CircleBox[{5.828427124746191, 8.627987753750183}, 0.03954238095793526], CircleBox[{5.8726114362524, 8.699106707958663}, 0.044184311506209904], CircleBox[{5.7963768803490785, 8.27335666188303}, 0.03205024439711334], CircleBox[{5.860477369143306, 8.273356661883028}, 0.03205024439711333], CircleBox[{5.828427124746191, 8.328267877770575}, 0.03153009687409354], CircleBox[{5.505642567521541, 8.12476210995525}, 0.04611207960352231], CircleBox[{5.450349545416403, 8.041291580135242}, 0.05401108276139808], CircleBox[{5.408025833091609, 8.139087296526009}, 0.052550161456822585], CircleBox[{5.1936591555690415, 8.644042123946834}, 0.0793459961471437], CircleBox[{5.294798984983078, 8.762259854459751}, 0.07623259139473047], CircleBox[{5.1246390651021585, 8.810161397231349}, 0.10054115137771882], CircleBox[{5.0099795836217025, 8.922428988181718}, 0.05992943368747677], CircleBox[{4.227542705456852, 10.055969830203043}, 0.15022110482233492], CircleBox[{4.011079738953873, 10.23872340784526}, 0.13307218138173144], CircleBox[{4.252120609978684, 10.329631193172812}, 0.1245417292239678], CircleBox[{3.8856180831641267, 11.009251235631694}, 0.6476030138606882], CircleBox[{7.404733639513698, 10.32963119317281}, 0.12454172922396789], CircleBox[{7.771236166328258, 11.009251235631698}, 0.6476030138606887], CircleBox[{7.645774510538512, 10.238723407845255}, 0.13307218138173157], CircleBox[{7.429311544035531, 10.055969830203038}, 0.15022110482233503], CircleBox[{5.788427124746187, 4.862741699796961}, 0.04000000000000007], CircleBox[{5.8284271247462005, 4.959234347260243}, 0.06445492336158475], CircleBox[{5.868427124746196, 4.862741699796957}, 0.04000000000000004], CircleBox[{5.828427124746185, 4.724873734152918}, 0.10355339059327388], CircleBox[{6.066901593878759, 3.849659287425688}, 0.03406778130465211], CircleBox[{6.1105817575063766, 3.9098570539625643}, 0.04030780468002646], CircleBox[{6.1383954206578055, 3.8358576619061155}, 0.03874603698895114], CircleBox[{6.193454888714389, 3.3895435225617008}, 0.052146823424025684], CircleBox[{6.306815334863416, 3.3487174708204215}, 0.06834117287388655], CircleBox[{6.268552871751887, 3.4659902576697306}, 0.055015718375710156], CircleBox[{5.463399360778013, 3.3895435225616586}, 0.05214682342402773], CircleBox[{5.3500389146289935, 3.3487174708204277}, 0.06834117287388616], CircleBox[{5.3883013777405075, 3.4659902576697257}, 0.05501571837570998], CircleBox[{5.518458828834587, 3.8358576619061195}, 0.03874603698895069], CircleBox[{5.589952655613629, 3.849659287425683}, 0.03406778130465208], CircleBox[{5.546272491986008, 3.9098570539625634}, 0.040307804680026406], CircleBox[{5.680566096292682, 4.318893332681434}, 0.049287009484503125], CircleBox[{5.976288153199704, 4.3188933326814345}, 0.04928700948450317], CircleBox[{9.067420555739147, 0.523459080339014}, 0.07477986861985914], CircleBox[{8.43287137607882, 0.8050100413209919}, 0.04735353184241126], CircleBox[{8.438335804729983, 0.9054785216270295}, 0.05326344244864877], CircleBox[{8.528909341412334, 0.8439006927081661}, 0.056260046180544435], CircleBox[{7.88701390649607, 1.1289024287015408}, 0.06640602521773782], CircleBox[{8.00685477188208, 1.1946216129454836}, 0.07027185958502846], CircleBox[{7.876955262170067, 1.280330085889911}, 0.08535533905932738], CircleBox[{7.617215630125809, 0.07777341327737429}, 0.07777341327737429], CircleBox[{7.560295712022809, 0.21648357340957725}, 0.07216119113652575], CircleBox[{7.445208382054352, 0.09510477984165554}, 0.09510477984165554], CircleBox[{7.871765296082658, 0.6315772529585407}, 0.037151603115208286], CircleBox[{7.822437513994417, 0.6917995228004044}, 0.04069408957649428], CircleBox[{7.795477373096456, 0.6147032026094543}, 0.04098021350729695], CircleBox[{8.148767997590815, 0.5403533539501251}, 0.03178549140883084], CircleBox[{8.211519498410919, 0.5549667171547984}, 0.03264510100910577], CircleBox[{8.192113437158335, 0.49243464841919643}, 0.032828976561279755], CircleBox[{8.238460227597791, 0.15062706892822467}, 0.05020902297607489], CircleBox[{8.18447541124489, 0.05746459235362678}, 0.05746459235362678], CircleBox[{8.302241926482605, 0.06033694638381484}, 0.06033694638381484], CircleBox[{8.389087296526013, 0.031249999999999986}, 0.031249999999999986], CircleBox[{8.963761836581325, 0.0777734132773742}, 0.0777734132773742], CircleBox[{9.873242624601168, 0.06822746429607396}, 0.06822746429607396], CircleBox[{9.656854249492383, 0.17157287525381007}, 0.17157287525381007], CircleBox[{9.893879970170195, 0.20231410754236392}, 0.06743803584745464], CircleBox[{10.04737854124367, 0.11111111111111147}, 0.11111111111111147], CircleBox[{6.719760402325948, 2.5189853496818957}, 0.038753620764336826], CircleBox[{6.733905646373181, 2.6099086799837785}, 0.05326344244864873], CircleBox[{6.79601141784247, 2.5399087693776985}, 0.04031601221234453], CircleBox[{7.097283065639579, 2.0056110033475965}, 0.040930836803012176], CircleBox[{7.14181779960781, 2.0760046151037916}, 0.042367441124567175], CircleBox[{7.194112549695432, 1.991624578050966}, 0.056903559372888095], CircleBox[{6.55620543344649, 2.056764785457304}, 0.0316425351608816], CircleBox[{6.520226647546594, 1.994010389248187}, 0.04069408957649491], CircleBox[{6.591993370317968, 2.0043613946259367}, 0.031815260232157555], CircleBox[{6.306019374818705, 0.06822746429607393}, 0.06822746429607393], CircleBox[{6.187672642712093, 0.05132078828084547}, 0.05132078828084547], CircleBox[{6.218951416497474, 0.1464466094067302}, 0.04881553646891007], CircleBox[{5.792044015314456, 0.6185128603389085}, 0.036383109431700505], CircleBox[{5.864810234177848, 0.6185128603389126}, 0.03638310943170066], CircleBox[{5.82842712474619, 0.6926213672214948}, 0.04617475781476631], CircleBox[{5.437902832994918, 0.14644660940672616}, 0.04881553646890872], CircleBox[{5.350834874673667, 0.06822746429607379}, 0.06822746429607379], CircleBox[{5.46918160678027, 0.051320788280845436}, 0.051320788280845436], CircleBox[{6.072195968654856, 1.706381907360404}, 0.034824120558375936], CircleBox[{5.828427124746225, 1.2720464445247974}, 0.03634418412928136], CircleBox[{5.5846582808376, 1.7063819073604518}, 0.03482412055838107], CircleBox[{4.922948603119158, 2.6099086799837767}, 0.053263442448648446], CircleBox[{4.937093847166453, 2.5189853496818913}, 0.038753620764336756], CircleBox[{4.860842831649934, 2.5399087693776985}, 0.04031601221234446], CircleBox[{5.136627601945777, 1.994010389248209}, 0.040694089576494064], CircleBox[{5.100648816045936, 2.0567647854573035}, 0.03164253516088191], CircleBox[{5.064860879174407, 2.0043613946259375}, 0.03181526023215757], CircleBox[{4.4627416997969505, 1.9916245780509731}, 0.056903559372884695], CircleBox[{4.559571183852815, 2.0056110033475973}, 0.04093083680301209], CircleBox[{4.515036449884616, 2.076004615103789}, 0.042367441124567], CircleBox[{2.589433693753236, 0.5234590803390136}, 0.07477986861985908], CircleBox[{3.2185184447624064, 0.9054785216270269}, 0.05326344244864862], CircleBox[{3.2239828734135685, 0.8050100413209909}, 0.04735353184241121], CircleBox[{3.12794490808006, 0.8439006927081651}, 0.05626004618054437], CircleBox[{3.472378838247492, 0.05746459235362676}, 0.05746459235362676], CircleBox[{3.3546123230097775, 0.06033694638381486}, 0.06033694638381486], CircleBox[{3.4183940218945965, 0.1506270689282251}, 0.05020902297607504], CircleBox[{3.2677669529663693, 0.031249999999999986}, 0.031249999999999986], CircleBox[{3.5080862519015645, 0.5403533539501175}, 0.0317854914088305], CircleBox[{3.4453347510814685, 0.5549667171547981}, 0.032645101009105774], CircleBox[{3.464740812334047, 0.4924346484191963}, 0.03282897656127975], CircleBox[{4.211645867438039, 0.09510477984165593}, 0.09510477984165593], CircleBox[{4.096558537469583, 0.21648357340957836}, 0.07216119113652612], CircleBox[{4.039638619366582, 0.07777341327737414}, 0.07777341327737414], CircleBox[{3.834416735497974, 0.6917995228004008}, 0.040694089576494175], CircleBox[{3.7850889534097303, 0.631577252958542}, 0.037151603115208265], CircleBox[{3.861376876395938, 0.6147032026094543}, 0.04098021350729694], CircleBox[{3.7698403429963383, 1.1289024287015488}, 0.06640602521773807], CircleBox[{3.64999947761031, 1.1946216129454836}, 0.0702718595850284], CircleBox[{3.779898987322334, 1.28033008588991}, 0.08535533905932731], CircleBox[{1.60947570824873, 0.1111111111111111}, 0.1111111111111111], CircleBox[{1.7629742793221845, 0.20231410754236342}, 0.06743803584745447], CircleBox[{1.7836116248912244, 0.06822746429607386}, 0.06822746429607386], CircleBox[{1.9999999999999996, 0.17157287525380982}, 0.17157287525380982], CircleBox[{2.6930924129110556, 0.07777341327737422}, 0.07777341327737422], CircleBox[{-5.529307650266756, 8.469181606780273}, 0.2991194744794365], CircleBox[{-5.828427124746191, 7.889087296526012}, 0.353553390593274], CircleBox[{-6.127546599225627, 8.46918160678027}, 0.2991194744794365], CircleBox[{-5.828427124746192, 10.199747468305835}, 1.457106781186548], CircleBox[{-5.616370822851856, 3.6049571322036407}, 0.21205630189433172], CircleBox[{-6.040483426640527, 3.6049571322036487}, 0.2120563018943322], CircleBox[{-5.828427124746191, 4.463669859189174}, 0.15765048437046764], CircleBox[{-5.828427124746191, 4.036893163892537}, 0.2691262109261693], CircleBox[{-7.922263446102246, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-8.612038749637415, 0.3976588035558893}, 0.3976588035558893], CircleBox[{-8.1045694996616, 0.8535533905932748}, 0.28451779686442497], CircleBox[{-9.242640687119287, 0.25000000000000006}, 0.25000000000000006], CircleBox[{-6.700219229313964, 2.1172093968074455}, 0.12454172922396761], CircleBox[{-6.800512967810178, 2.360779904583967}, 0.13886940615199808], CircleBox[{-6.966498312203889, 2.310660171779822}, 0.034517796864424584], CircleBox[{-6.966498312203888, 2.133883476483185}, 0.1422588984322123], CircleBox[{-5.656854249492381, 0.1715728752538099}, 0.1715728752538099], CircleBox[{-5.8284271247461845, 0.43933982822017903}, 0.14644660940672635], CircleBox[{-5.999999999999997, 0.17157287525380985}, 0.17157287525380985], CircleBox[{-5.82842712474619, 0.04289321881345246}, 0.04289321881345246], CircleBox[{-5.733322344904533, 1.6167812573081506}, 0.09510477984165594], CircleBox[{-5.92353190458785, 1.616781257308153}, 0.09510477984165584], CircleBox[{-5.82842712474619, 1.4502357756356505}, 0.09668238504237668], CircleBox[{-4.956635020178426, 2.1172093968074566}, 0.12454172922396786], CircleBox[{-4.856341281682204, 2.360779904583965}, 0.13886940615199786], CircleBox[{-4.690355937288492, 2.3106601717798214}, 0.03451779686442457], CircleBox[{-4.690355937288493, 2.133883476483185}, 0.1422588984322123], CircleBox[{-3.552284749830793, 0.8535533905932734}, 0.28451779686442447], CircleBox[{-3.734590803390135, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-3.0448154998549652, 0.39765880355588895}, 0.39765880355588895], CircleBox[{-2.414213562373095, 0.2499999999999999}, 0.2499999999999999], CircleBox[{-18.485281374238568, 1.}], CircleBox[{-23.31370849898476, 5.828427124746191}, 5.828427124746191], CircleBox[{-17.48528137423857, 2.560660171779822}, 0.853553390593274], CircleBox[{-16.485281374238568, 1.}], CircleBox[{17.784400848718004, 8.469181606780273}, 0.2991194744794365], CircleBox[{17.485281374238568, 7.889087296526012}, 0.353553390593274], CircleBox[{17.186161899759135, 8.46918160678027}, 0.2991194744794365], CircleBox[{17.485281374238568, 10.199747468305835}, 1.457106781186548], CircleBox[{17.6973376761329, 3.6049571322036407}, 0.21205630189433172], CircleBox[{17.273225072344232, 3.6049571322036487}, 0.2120563018943322], CircleBox[{17.485281374238568, 4.463669859189174}, 0.15765048437046764], CircleBox[{17.485281374238568, 4.036893163892537}, 0.2691262109261693], CircleBox[{15.39144505288251, 0.29911947447943626}, 0.29911947447943626], CircleBox[{14.701669749347344, 0.3976588035558893}, 0.3976588035558893], CircleBox[{15.209138999323159, 0.8535533905932748}, 0.28451779686442497], CircleBox[{14.071067811865474, 0.25000000000000006}, 0.25000000000000006], CircleBox[{16.613489269670794, 2.1172093968074455}, 0.12454172922396761], CircleBox[{16.51319553117458, 2.360779904583967}, 0.13886940615199808], CircleBox[{16.34721018678087, 2.310660171779822}, 0.034517796864424584], CircleBox[{16.34721018678087, 2.133883476483185}, 0.1422588984322123], CircleBox[{17.656854249492376, 0.1715728752538099}, 0.1715728752538099], CircleBox[{17.485281374238575, 0.43933982822017903}, 0.14644660940672635], CircleBox[{17.313708498984763, 0.17157287525380985}, 0.17157287525380985], CircleBox[{17.485281374238568, 0.04289321881345246}, 0.04289321881345246], CircleBox[{17.580386154080223, 1.6167812573081506}, 0.09510477984165594], CircleBox[{17.39017659439691, 1.616781257308153}, 0.09510477984165584], CircleBox[{17.48528137423857, 1.4502357756356505}, 0.09668238504237668], CircleBox[{18.35707347880633, 2.1172093968074566}, 0.12454172922396786], CircleBox[{18.457367217302554, 2.360779904583965}, 0.13886940615199786], CircleBox[{18.623352561696265, 2.3106601717798214}, 0.03451779686442457], CircleBox[{18.62335256169627, 2.133883476483185}, 0.1422588984322123], CircleBox[{19.76142374915397, 0.8535533905932734}, 0.28451779686442447], CircleBox[{19.579117695594622, 0.29911947447943626}, 0.29911947447943626], CircleBox[{20.268892999129793, 0.39765880355588895}, 0.39765880355588895], CircleBox[{20.899494936611664, 0.2499999999999999}, 0.2499999999999999], CircleBox[{28.14213562373095, 1.}], CircleBox[{29.14213562373095, 2.560660171779822}, 0.853553390593274], CircleBox[{30.14213562373095, 1.}], CircleBox[{34.97056274847714, 5.828427124746192}, 5.828427124746192], CircleBox[{5.828427124746198, 6.584349442401625}, 0.048815536468909175], CircleBox[{5.82842712474618, 6.755203820042821}, 0.07322330470336312], CircleBox[{6.063102589554493, 7.581260790054871}, 0.03352506640118449], CircleBox[{5.593751659937902, 7.581260790054858}, 0.03352506640118439], CircleBox[{6.715929635786802, 8.994346716370554}, 0.03977386865482223], CircleBox[{4.940924613705583, 8.994346716370556}, 0.03977386865482216], CircleBox[{3.054077130398888, 10.878202541781652}, 0.07306581186918472], CircleBox[{3.1876726427121076, 10.803300858899107}, 0.0800943102542603], CircleBox[{3.1741409269036542, 10.949174917458837}, 0.06640602521773768], CircleBox[{2.914213562373093, 11.292577554195747}, 0.3642766952966373], CircleBox[{3.8425085013259017, 10.259676901993311}, 0.036796329745076184], CircleBox[{3.867932610596276, 10.326850113173421}, 0.03502724321283082], CircleBox[{3.7859115916709825, 10.321683666962018}, 0.04715633003632291], CircleBox[{4.359454940494637, 10.44351908100483}, 0.03195462697050008], CircleBox[{4.364701255361698, 10.515590817548102}, 0.04030780468002646], CircleBox[{4.271123709324728, 9.863385102338999}, 0.04723314634638413], CircleBox[{4.3541979903190136, 9.905952637444072}, 0.046112079603522135], CircleBox[{4.360517537627436, 9.794234051041887}, 0.06578510188862344], CircleBox[{4.414213562373096, 9.699747468305835}, 0.042893218813452476], CircleBox[{4.654743650250715, 11.142421261071124}, 0.04827249921765269], CircleBox[{4.662741699796953, 11.423717164502534}, 0.23313708498984778], CircleBox[{4.562355759818442, 11.162877461023967}, 0.04635296466515371], CircleBox[{4.58674600372088, 11.063836969029339}, 0.05564656009922352], CircleBox[{8.482713322588731, 10.949174917458834}, 0.06640602521773778], CircleBox[{8.469181606780277, 10.803300858899108}, 0.08009431025426038], CircleBox[{8.602777119093497, 10.87820254178165}, 0.07306581186918476], CircleBox[{8.742640687119293, 11.292577554195747}, 0.364276695296638], CircleBox[{7.788921638896107, 10.326850113173425}, 0.03502724321283075], CircleBox[{7.8143457481664855, 10.259676901993311}, 0.03679632974507634], CircleBox[{7.870942657821401, 10.321683666962015}, 0.04715633003632295], CircleBox[{7.302656259173369, 9.90595263744407}, 0.046112079603522156], CircleBox[{7.296336711864948, 9.794234051041887}, 0.0657851018886235], CircleBox[{7.385730540167658, 9.863385102338993}, 0.04723314634638438], CircleBox[{7.24264068711929, 9.699747468305834}, 0.04289321881345255], CircleBox[{7.297399308997745, 10.443519081004826}, 0.0319546269705001], CircleBox[{7.292152994130687, 10.515590817548102}, 0.040307804680026434], CircleBox[{7.070108245771505, 11.063836969029344}, 0.055646560099223544], CircleBox[{7.09449848967394, 11.162877461023967}, 0.04635296466515372], CircleBox[{7.002110599241671, 11.142421261071126}, 0.048272499217652705], CircleBox[{6.994112549695432, 11.42371716450254}, 0.23313708498984784], CircleBox[{5.82842712474618, 5.190013877835653}, 0.034859856317244746], CircleBox[{5.82842712474621, 5.111188635650454}, 0.043965385867989024], CircleBox[{6.396574962043801, 3.2417847186986437}, 0.03342046101750733], CircleBox[{5.260279287448493, 3.241784718698535}, 0.033420461017511296], CircleBox[{7.7794063032451355, 1.4225889843221229}, 0.04064539955206305], CircleBox[{7.257901592455408, 0.046112079603522316}, 0.046112079603522316], CircleBox[{7.33478861141058, 0.03205024439711255}, 0.03205024439711255], CircleBox[{9.063614866643263, 0.03205024439711334}, 0.03205024439711334], CircleBox[{9.525483399593906, 0.35000000000000053}, 0.05000000000000007], CircleBox[{10.19053669714671, 0.046112079603522135}, 0.046112079603522135], CircleBox[{10.310308043036876, 0.07777341327737437}, 0.07777341327737437], CircleBox[{10.202046527849323, 0.13725037123284234}, 0.04575012374428078], CircleBox[{10.449747468305848, 0.06250000000000044}, 0.06250000000000044], CircleBox[{9.46918160678027, 0.05132078828084551}, 0.05132078828084551], CircleBox[{6.4469399850851135, 0.03638310943170246}, 0.03638310943170246], CircleBox[{5.2099142644072645, 0.036383109431700505}, 0.036383109431700505], CircleBox[{4.398952657037003, 0.046112079603522135}, 0.046112079603522135], CircleBox[{4.322065638081863, 0.0320502443971133}, 0.0320502443971133], CircleBox[{3.8774479462472757, 1.4225889843221218}, 0.04064539955206044], CircleBox[{2.131370849898476, 0.35000000000000003}, 0.05], CircleBox[{1.4548077216430757, 0.13725037123284015}, 0.04575012374428005], CircleBox[{1.466317552345668, 0.046112079603522114}, 0.046112079603522114], CircleBox[{1.3465462064555276, 0.07777341327737415}, 0.07777341327737415], CircleBox[{1.2071067811865475, 0.06249999999999997}, 0.06249999999999997], CircleBox[{2.187672642712109, 0.05132078828084552}, 0.05132078828084552], CircleBox[{2.5932393828491183, 0.03205024439711332}, 0.03205024439711332], CircleBox[{-5.717316013635076, 7.437902832994914}, 0.11111111111111109], CircleBox[{-5.939538235857304, 7.4379028329949115}, 0.11111111111111162], CircleBox[{-5.828427124746188, 6.931980515339458}, 0.10355339059327373], CircleBox[{-5.8284271247461925, 7.193184390303208}, 0.15765048437046789], CircleBox[{-6.362055264509306, 8.762259854459751}, 0.07623259139473049], CircleBox[{-6.532215184390223, 8.810161397231349}, 0.10054115137771892], CircleBox[{-6.463195093923346, 8.64404212394683}, 0.07934599614714398], CircleBox[{-6.646874665870682, 8.922428988181716}, 0.059929433687476816], CircleBox[{-6.151211681970847, 8.12476210995526}, 0.04611207960352203], CircleBox[{-6.2065047040759795, 8.041291580135244}, 0.0540110827613982], CircleBox[{-6.248828416400771, 8.139087296526009}, 0.052550161456822606], CircleBox[{-5.784242813239983, 8.699106707958665}, 0.04418431150620993], CircleBox[{-5.828427124746191, 8.627987753750183}, 0.03954238095793526], CircleBox[{-5.8726114362524, 8.699106707958663}, 0.044184311506209904], CircleBox[{-5.7963768803490785, 8.27335666188303}, 0.03205024439711334], CircleBox[{-5.860477369143306, 8.273356661883028}, 0.03205024439711333], CircleBox[{-5.828427124746191, 8.328267877770575}, 0.03153009687409354], CircleBox[{-5.505642567521541, 8.12476210995525}, 0.04611207960352231], CircleBox[{-5.450349545416403, 8.041291580135242}, 0.05401108276139808], CircleBox[{-5.408025833091609, 8.139087296526009}, 0.052550161456822585], CircleBox[{-5.1936591555690415, 8.644042123946834}, 0.0793459961471437], CircleBox[{-5.294798984983078, 8.762259854459751}, 0.07623259139473047], CircleBox[{-5.1246390651021585, 8.810161397231349}, 0.10054115137771882], CircleBox[{-5.0099795836217025, 8.922428988181718}, 0.05992943368747677], CircleBox[{-4.227542705456852, 10.055969830203043}, 0.15022110482233492], CircleBox[{-4.011079738953873, 10.23872340784526}, 0.13307218138173144], CircleBox[{-4.252120609978684, 10.329631193172812}, 0.1245417292239678], CircleBox[{-3.8856180831641267, 11.009251235631694}, 0.6476030138606882], CircleBox[{-7.404733639513698, 10.32963119317281}, 0.12454172922396789], CircleBox[{-7.771236166328258, 11.009251235631698}, 0.6476030138606887], CircleBox[{-7.645774510538512, 10.238723407845255}, 0.13307218138173157], CircleBox[{-7.429311544035531, 10.055969830203038}, 0.15022110482233503], CircleBox[{-5.788427124746187, 4.862741699796961}, 0.04000000000000007], CircleBox[{-5.8284271247462005, 4.959234347260243}, 0.06445492336158475], CircleBox[{-5.868427124746196, 4.862741699796957}, 0.04000000000000004], CircleBox[{-5.828427124746185, 4.724873734152918}, 0.10355339059327388], CircleBox[{-6.066901593878759, 3.849659287425688}, 0.03406778130465211], CircleBox[{-6.1105817575063766, 3.9098570539625643}, 0.04030780468002646], CircleBox[{-6.1383954206578055, 3.8358576619061155}, 0.03874603698895114], CircleBox[{-6.193454888714389, 3.3895435225617008}, 0.052146823424025684], CircleBox[{-6.306815334863416, 3.3487174708204215}, 0.06834117287388655], CircleBox[{-6.268552871751887, 3.4659902576697306}, 0.055015718375710156], CircleBox[{-5.463399360778013, 3.3895435225616586}, 0.05214682342402773], CircleBox[{-5.3500389146289935, 3.3487174708204277}, 0.06834117287388616], CircleBox[{-5.3883013777405075, 3.4659902576697257}, 0.05501571837570998], CircleBox[{-5.518458828834587, 3.8358576619061195}, 0.03874603698895069], CircleBox[{-5.589952655613629, 3.849659287425683}, 0.03406778130465208], CircleBox[{-5.546272491986008, 3.9098570539625634}, 0.040307804680026406], CircleBox[{-5.680566096292682, 4.318893332681434}, 0.049287009484503125], CircleBox[{-5.976288153199704, 4.3188933326814345}, 0.04928700948450317], CircleBox[{-9.067420555739147, 0.523459080339014}, 0.07477986861985914], CircleBox[{-8.43287137607882, 0.8050100413209919}, 0.04735353184241126], CircleBox[{-8.438335804729983, 0.9054785216270295}, 0.05326344244864877], CircleBox[{-8.528909341412334, 0.8439006927081661}, 0.056260046180544435], CircleBox[{-7.88701390649607, 1.1289024287015408}, 0.06640602521773782], CircleBox[{-8.00685477188208, 1.1946216129454836}, 0.07027185958502846], CircleBox[{-7.876955262170067, 1.280330085889911}, 0.08535533905932738], CircleBox[{-7.617215630125809, 0.07777341327737429}, 0.07777341327737429], CircleBox[{-7.560295712022809, 0.21648357340957725}, 0.07216119113652575], CircleBox[{-7.445208382054352, 0.09510477984165554}, 0.09510477984165554], CircleBox[{-7.871765296082658, 0.6315772529585407}, 0.037151603115208286], CircleBox[{-7.822437513994417, 0.6917995228004044}, 0.04069408957649428], CircleBox[{-7.795477373096456, 0.6147032026094543}, 0.04098021350729695], CircleBox[{-8.148767997590815, 0.5403533539501251}, 0.03178549140883084], CircleBox[{-8.211519498410919, 0.5549667171547984}, 0.03264510100910577], CircleBox[{-8.192113437158335, 0.49243464841919643}, 0.032828976561279755], CircleBox[{-8.238460227597791, 0.15062706892822467}, 0.05020902297607489], CircleBox[{-8.18447541124489, 0.05746459235362678}, 0.05746459235362678], CircleBox[{-8.302241926482605, 0.06033694638381484}, 0.06033694638381484], CircleBox[{-8.389087296526013, 0.031249999999999986}, 0.031249999999999986], CircleBox[{-8.963761836581325, 0.0777734132773742}, 0.0777734132773742], CircleBox[{-9.873242624601168, 0.06822746429607396}, 0.06822746429607396], CircleBox[{-9.656854249492383, 0.17157287525381007}, 0.17157287525381007], CircleBox[{-9.893879970170195, 0.20231410754236392}, 0.06743803584745464], CircleBox[{-10.04737854124367, 0.11111111111111147}, 0.11111111111111147], CircleBox[{-6.719760402325948, 2.5189853496818957}, 0.038753620764336826], CircleBox[{-6.733905646373181, 2.6099086799837785}, 0.05326344244864873], CircleBox[{-6.79601141784247, 2.5399087693776985}, 0.04031601221234453], CircleBox[{-7.097283065639579, 2.0056110033475965}, 0.040930836803012176], CircleBox[{-7.14181779960781, 2.0760046151037916}, 0.042367441124567175], CircleBox[{-7.194112549695432, 1.991624578050966}, 0.056903559372888095], CircleBox[{-6.55620543344649, 2.056764785457304}, 0.0316425351608816], CircleBox[{-6.520226647546594, 1.994010389248187}, 0.04069408957649491], CircleBox[{-6.591993370317968, 2.0043613946259367}, 0.031815260232157555], CircleBox[{-6.306019374818705, 0.06822746429607393}, 0.06822746429607393], CircleBox[{-6.187672642712093, 0.05132078828084547}, 0.05132078828084547], CircleBox[{-6.218951416497474, 0.1464466094067302}, 0.04881553646891007], CircleBox[{-5.792044015314456, 0.6185128603389085}, 0.036383109431700505], CircleBox[{-5.864810234177848, 0.6185128603389126}, 0.03638310943170066], CircleBox[{-5.82842712474619, 0.6926213672214948}, 0.04617475781476631], CircleBox[{-5.437902832994918, 0.14644660940672616}, 0.04881553646890872], CircleBox[{-5.350834874673667, 0.06822746429607379}, 0.06822746429607379], CircleBox[{-5.46918160678027, 0.051320788280845436}, 0.051320788280845436], CircleBox[{-6.072195968654856, 1.706381907360404}, 0.034824120558375936], CircleBox[{-5.828427124746225, 1.2720464445247974}, 0.03634418412928136], CircleBox[{-5.5846582808376, 1.7063819073604518}, 0.03482412055838107], CircleBox[{-4.922948603119158, 2.6099086799837767}, 0.053263442448648446], CircleBox[{-4.937093847166453, 2.5189853496818913}, 0.038753620764336756], CircleBox[{-4.860842831649934, 2.5399087693776985}, 0.04031601221234446], CircleBox[{-5.136627601945777, 1.994010389248209}, 0.040694089576494064], CircleBox[{-5.100648816045936, 2.0567647854573035}, 0.03164253516088191], CircleBox[{-5.064860879174407, 2.0043613946259375}, 0.03181526023215757], CircleBox[{-4.4627416997969505, 1.9916245780509731}, 0.056903559372884695], CircleBox[{-4.559571183852815, 2.0056110033475973}, 0.04093083680301209], CircleBox[{-4.515036449884616, 2.076004615103789}, 0.042367441124567], CircleBox[{-2.589433693753236, 0.5234590803390136}, 0.07477986861985908], CircleBox[{-3.2185184447624064, 0.9054785216270269}, 0.05326344244864862], CircleBox[{-3.2239828734135685, 0.8050100413209909}, 0.04735353184241121], CircleBox[{-3.12794490808006, 0.8439006927081651}, 0.05626004618054437], CircleBox[{-3.472378838247492, 0.05746459235362676}, 0.05746459235362676], CircleBox[{-3.3546123230097775, 0.06033694638381486}, 0.06033694638381486], CircleBox[{-3.4183940218945965, 0.1506270689282251}, 0.05020902297607504], CircleBox[{-3.2677669529663693, 0.031249999999999986}, 0.031249999999999986], CircleBox[{-3.5080862519015645, 0.5403533539501175}, 0.0317854914088305], CircleBox[{-3.4453347510814685, 0.5549667171547981}, 0.032645101009105774], CircleBox[{-3.464740812334047, 0.4924346484191963}, 0.03282897656127975], CircleBox[{-4.211645867438039, 0.09510477984165593}, 0.09510477984165593], CircleBox[{-4.096558537469583, 0.21648357340957836}, 0.07216119113652612], CircleBox[{-4.039638619366582, 0.07777341327737414}, 0.07777341327737414], CircleBox[{-3.834416735497974, 0.6917995228004008}, 0.040694089576494175], CircleBox[{-3.7850889534097303, 0.631577252958542}, 0.037151603115208265], CircleBox[{-3.861376876395938, 0.6147032026094543}, 0.04098021350729694], CircleBox[{-3.7698403429963383, 1.1289024287015488}, 0.06640602521773807], CircleBox[{-3.64999947761031, 1.1946216129454836}, 0.0702718595850284], CircleBox[{-3.779898987322334, 1.28033008588991}, 0.08535533905932731], CircleBox[{-1.60947570824873, 0.1111111111111111}, 0.1111111111111111], CircleBox[{-1.7629742793221845, 0.20231410754236342}, 0.06743803584745447], CircleBox[{-1.7836116248912244, 0.06822746429607386}, 0.06822746429607386], CircleBox[{-1.9999999999999996, 0.17157287525380982}, 0.17157287525380982], CircleBox[{-2.6930924129110556, 0.07777341327737422}, 0.07777341327737422], CircleBox[{-17.784400848718004, 8.469181606780273}, 0.2991194744794365], CircleBox[{-17.485281374238568, 7.889087296526012}, 0.353553390593274], CircleBox[{-17.186161899759135, 8.46918160678027}, 0.2991194744794365], CircleBox[{-17.485281374238568, 10.199747468305835}, 1.457106781186548], CircleBox[{-17.6973376761329, 3.6049571322036407}, 0.21205630189433172], CircleBox[{-17.273225072344232, 3.6049571322036487}, 0.2120563018943322], CircleBox[{-17.485281374238568, 4.463669859189174}, 0.15765048437046764], CircleBox[{-17.485281374238568, 4.036893163892537}, 0.2691262109261693], CircleBox[{-15.39144505288251, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-14.701669749347344, 0.3976588035558893}, 0.3976588035558893], CircleBox[{-15.209138999323159, 0.8535533905932748}, 0.28451779686442497], CircleBox[{-14.071067811865474, 0.25000000000000006}, 0.25000000000000006], CircleBox[{-16.613489269670794, 2.1172093968074455}, 0.12454172922396761], CircleBox[{-16.51319553117458, 2.360779904583967}, 0.13886940615199808], CircleBox[{-16.34721018678087, 2.310660171779822}, 0.034517796864424584], CircleBox[{-16.34721018678087, 2.133883476483185}, 0.1422588984322123], CircleBox[{-17.656854249492376, 0.1715728752538099}, 0.1715728752538099], CircleBox[{-17.485281374238575, 0.43933982822017903}, 0.14644660940672635], CircleBox[{-17.313708498984763, 0.17157287525380985}, 0.17157287525380985], CircleBox[{-17.485281374238568, 0.04289321881345246}, 0.04289321881345246], CircleBox[{-17.580386154080223, 1.6167812573081506}, 0.09510477984165594], CircleBox[{-17.39017659439691, 1.616781257308153}, 0.09510477984165584], CircleBox[{-17.48528137423857, 1.4502357756356505}, 0.09668238504237668], CircleBox[{-18.35707347880633, 2.1172093968074566}, 0.12454172922396786], CircleBox[{-18.457367217302554, 2.360779904583965}, 0.13886940615199786], CircleBox[{-18.623352561696265, 2.3106601717798214}, 0.03451779686442457], CircleBox[{-18.62335256169627, 2.133883476483185}, 0.1422588984322123], CircleBox[{-19.76142374915397, 0.8535533905932734}, 0.28451779686442447], CircleBox[{-19.579117695594622, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-20.268892999129793, 0.39765880355588895}, 0.39765880355588895], CircleBox[{-20.899494936611664, 0.2499999999999999}, 0.2499999999999999], CircleBox[{-28.14213562373095, 1.}], CircleBox[{-29.14213562373095, 2.560660171779822}, 0.853553390593274], CircleBox[{-30.14213562373095, 1.}], CircleBox[{-34.97056274847714, 5.828427124746192}, 5.828427124746192], CircleBox[{17.596392485349682, 7.437902832994914}, 0.11111111111111109], CircleBox[{17.374170263127457, 7.4379028329949115}, 0.11111111111111162], CircleBox[{17.48528137423857, 6.931980515339458}, 0.10355339059327373], CircleBox[{17.485281374238568, 7.193184390303208}, 0.15765048437046789], CircleBox[{16.951653234475458, 8.762259854459751}, 0.07623259139473049], CircleBox[{16.781493314594535, 8.810161397231349}, 0.10054115137771892], CircleBox[{16.850513405061417, 8.64404212394683}, 0.07934599614714398], CircleBox[{16.66683383311408, 8.922428988181716}, 0.059929433687476816], CircleBox[{17.162496817013913, 8.12476210995526}, 0.04611207960352203], CircleBox[{17.107203794908777, 8.041291580135244}, 0.0540110827613982], CircleBox[{17.06488008258399, 8.139087296526009}, 0.052550161456822606], CircleBox[{17.52946568574478, 8.699106707958665}, 0.04418431150620993], CircleBox[{17.485281374238568, 8.627987753750183}, 0.03954238095793526], CircleBox[{17.44109706273236, 8.699106707958663}, 0.044184311506209904], CircleBox[{17.51733161863568, 8.27335666188303}, 0.03205024439711334], CircleBox[{17.453231129841452, 8.273356661883028}, 0.03205024439711333], CircleBox[{17.485281374238568, 8.328267877770575}, 0.03153009687409354], CircleBox[{17.80806593146322, 8.12476210995525}, 0.04611207960352231], CircleBox[{17.86335895356836, 8.041291580135242}, 0.05401108276139808], CircleBox[{17.90568266589315, 8.139087296526009}, 0.052550161456822585], CircleBox[{18.120049343415715, 8.644042123946834}, 0.0793459961471437], CircleBox[{18.01890951400168, 8.762259854459751}, 0.07623259139473047], CircleBox[{18.189069433882604, 8.810161397231349}, 0.10054115137771882], CircleBox[{18.303728915363056, 8.922428988181718}, 0.05992943368747677], CircleBox[{19.086165793527908, 10.055969830203043}, 0.15022110482233492], CircleBox[{19.30262876003088, 10.23872340784526}, 0.13307218138173144], CircleBox[{19.061587889006077, 10.329631193172812}, 0.1245417292239678], CircleBox[{19.428090415820634, 11.009251235631694}, 0.6476030138606882], CircleBox[{15.90897485947106, 10.32963119317281}, 0.12454172922396789], CircleBox[{15.542472332656505, 11.009251235631698}, 0.6476030138606887], CircleBox[{15.667933988446249, 10.238723407845255}, 0.13307218138173157], CircleBox[{15.884396954949226, 10.055969830203038}, 0.15022110482233503], CircleBox[{17.525281374238574, 4.862741699796961}, 0.04000000000000007], CircleBox[{17.485281374238557, 4.959234347260243}, 0.06445492336158475], CircleBox[{17.44528137423856, 4.862741699796957}, 0.04000000000000004], CircleBox[{17.485281374238575, 4.724873734152918}, 0.10355339059327388], CircleBox[{17.246806905106, 3.849659287425688}, 0.03406778130465211], CircleBox[{17.203126741478382, 3.9098570539625643}, 0.04030780468002646], CircleBox[{17.17531307832696, 3.8358576619061155}, 0.03874603698895114], CircleBox[{17.120253610270368, 3.3895435225617008}, 0.052146823424025684], CircleBox[{17.00689316412134, 3.3487174708204215}, 0.06834117287388655], CircleBox[{17.045155627232873, 3.4659902576697306}, 0.055015718375710156], CircleBox[{17.850309138206747, 3.3895435225616586}, 0.05214682342402773], CircleBox[{17.963669584355767, 3.3487174708204277}, 0.06834117287388616], CircleBox[{17.925407121244252, 3.4659902576697257}, 0.05501571837570998], CircleBox[{17.795249670150174, 3.8358576619061195}, 0.03874603698895069], CircleBox[{17.72375584337113, 3.849659287425683}, 0.03406778130465208], CircleBox[{17.767436006998754, 3.9098570539625634}, 0.040307804680026406], CircleBox[{17.633142402692076, 4.318893332681434}, 0.049287009484503125], CircleBox[{17.337420345785056, 4.3188933326814345}, 0.04928700948450317], CircleBox[{14.246287943245614, 0.523459080339014}, 0.07477986861985914], CircleBox[{14.88083712290594, 0.8050100413209919}, 0.04735353184241126], CircleBox[{14.875372694254777, 0.9054785216270295}, 0.05326344244864877], CircleBox[{14.784799157572424, 0.8439006927081661}, 0.056260046180544435], CircleBox[{15.42669459248869, 1.1289024287015408}, 0.06640602521773782], CircleBox[{15.306853727102677, 1.1946216129454836}, 0.07027185958502846], CircleBox[{15.43675323681469, 1.280330085889911}, 0.08535533905932738], CircleBox[{15.696492868858948, 0.07777341327737429}, 0.07777341327737429], CircleBox[{15.75341278696195, 0.21648357340957725}, 0.07216119113652575], CircleBox[{15.868500116930408, 0.09510477984165554}, 0.09510477984165554], CircleBox[{15.441943202902099, 0.6315772529585407}, 0.037151603115208286], CircleBox[{15.491270984990344, 0.6917995228004044}, 0.04069408957649428], CircleBox[{15.518231125888304, 0.6147032026094543}, 0.04098021350729695], CircleBox[{15.164940501393943, 0.5403533539501251}, 0.03178549140883084], CircleBox[{15.102189000573844, 0.5549667171547984}, 0.03264510100910577], CircleBox[{15.12159506182642, 0.49243464841919643}, 0.032828976561279755], CircleBox[{15.075248271386968, 0.15062706892822467}, 0.05020902297607489], CircleBox[{15.129233087739868, 0.05746459235362678}, 0.05746459235362678], CircleBox[{15.011466572502155, 0.06033694638381484}, 0.06033694638381484], CircleBox[{14.924621202458747, 0.031249999999999986}, 0.031249999999999986], CircleBox[{14.349946662403434, 0.0777734132773742}, 0.0777734132773742], CircleBox[{13.440465874383591, 0.06822746429607396}, 0.06822746429607396], CircleBox[{13.656854249492378, 0.17157287525381007}, 0.17157287525381007], CircleBox[{13.419828528814566, 0.20231410754236392}, 0.06743803584745464], CircleBox[{13.266329957741089, 0.11111111111111147}, 0.11111111111111147], CircleBox[{16.593948096658817, 2.5189853496818957}, 0.038753620764336826], CircleBox[{16.57980285261158, 2.6099086799837785}, 0.05326344244864873], CircleBox[{16.51769708114229, 2.5399087693776985}, 0.04031601221234453], CircleBox[{16.21642543334518, 2.0056110033475965}, 0.040930836803012176], CircleBox[{16.171890699376952, 2.0760046151037916}, 0.042367441124567175], CircleBox[{16.119595949289327, 1.991624578050966}, 0.056903559372888095], CircleBox[{16.75750306553827, 2.056764785457304}, 0.0316425351608816], CircleBox[{16.793481851438163, 1.994010389248187}, 0.04069408957649491], CircleBox[{16.72171512866679, 2.0043613946259367}, 0.031815260232157555], CircleBox[{17.007689124166056, 0.06822746429607393}, 0.06822746429607393], CircleBox[{17.126035856272665, 0.05132078828084547}, 0.05132078828084547], CircleBox[{17.094757082487284, 0.1464466094067302}, 0.04881553646891007], CircleBox[{17.521664483670303, 0.6185128603389085}, 0.036383109431700505], CircleBox[{17.44889826480691, 0.6185128603389126}, 0.03638310943170066], CircleBox[{17.48528137423857, 0.6926213672214948}, 0.04617475781476631], CircleBox[{17.87580566598984, 0.14644660940672616}, 0.04881553646890872], CircleBox[{17.962873624311094, 0.06822746429607379}, 0.06822746429607379], CircleBox[{17.844526892204488, 0.051320788280845436}, 0.051320788280845436], CircleBox[{17.241512530329903, 1.706381907360404}, 0.034824120558375936], CircleBox[{17.485281374238532, 1.2720464445247974}, 0.03634418412928136], CircleBox[{17.729050218147158, 1.7063819073604518}, 0.03482412055838107], CircleBox[{18.390759895865603, 2.6099086799837767}, 0.053263442448648446], CircleBox[{18.376614651818304, 2.5189853496818913}, 0.038753620764336756], CircleBox[{18.452865667334827, 2.5399087693776985}, 0.04031601221234446], CircleBox[{18.17708089703898, 1.994010389248209}, 0.040694089576494064], CircleBox[{18.213059682938823, 2.0567647854573035}, 0.03164253516088191], CircleBox[{18.24884761981035, 2.0043613946259375}, 0.03181526023215757], CircleBox[{18.85096679918781, 1.9916245780509731}, 0.056903559372884695], CircleBox[{18.754137315131945, 2.0056110033475973}, 0.04093083680301209], CircleBox[{18.798672049100144, 2.076004615103789}, 0.042367441124567], CircleBox[{20.724274805231524, 0.5234590803390136}, 0.07477986861985908], CircleBox[{20.095190054222353, 0.9054785216270269}, 0.05326344244864862], CircleBox[{20.08972562557119, 0.8050100413209909}, 0.04735353184241121], CircleBox[{20.185763590904703, 0.8439006927081651}, 0.05626004618054437], CircleBox[{19.841329660737266, 0.05746459235362676}, 0.05746459235362676], CircleBox[{19.95909617597498, 0.06033694638381486}, 0.06033694638381486], CircleBox[{19.89531447709016, 0.1506270689282251}, 0.05020902297607504], CircleBox[{20.045941546018387, 0.031249999999999986}, 0.031249999999999986], CircleBox[{19.805622247083196, 0.5403533539501175}, 0.0317854914088305], CircleBox[{19.86837374790329, 0.5549667171547981}, 0.032645101009105774], CircleBox[{19.848967686650713, 0.4924346484191963}, 0.03282897656127975], CircleBox[{19.102062631546723, 0.09510477984165593}, 0.09510477984165593], CircleBox[{19.217149961515176, 0.21648357340957836}, 0.07216119113652612], CircleBox[{19.274069879618178, 0.07777341327737414}, 0.07777341327737414], CircleBox[{19.479291763486785, 0.6917995228004008}, 0.040694089576494175], CircleBox[{19.528619545575026, 0.631577252958542}, 0.037151603115208265], CircleBox[{19.452331622588822, 0.6147032026094543}, 0.04098021350729694], CircleBox[{19.543868155988417, 1.1289024287015488}, 0.06640602521773807], CircleBox[{19.66370902137445, 1.1946216129454836}, 0.0702718595850284], CircleBox[{19.533809511662426, 1.28033008588991}, 0.08535533905932731], CircleBox[{21.70423279073603, 0.1111111111111111}, 0.1111111111111111], CircleBox[{21.550734219662573, 0.20231410754236342}, 0.06743803584745447], CircleBox[{21.530096874093537, 0.06822746429607386}, 0.06822746429607386], CircleBox[{21.313708498984756, 0.17157287525380982}, 0.17157287525380982], CircleBox[{20.620616086073703, 0.07777341327737422}, 0.07777341327737422], CircleBox[{28.84301614925152, 8.469181606780273}, 0.2991194744794365], CircleBox[{29.14213562373095, 7.889087296526012}, 0.353553390593274], CircleBox[{29.441255098210387, 8.46918160678027}, 0.2991194744794365], CircleBox[{29.142135623730947, 10.199747468305835}, 1.457106781186548], CircleBox[{28.930079321836615, 3.6049571322036407}, 0.21205630189433172], CircleBox[{29.354191925625283, 3.6049571322036487}, 0.2120563018943322], CircleBox[{29.14213562373095, 4.463669859189174}, 0.15765048437046764], CircleBox[{29.14213562373095, 4.036893163892537}, 0.2691262109261693], CircleBox[{31.235971945087, 0.29911947447943626}, 0.29911947447943626], CircleBox[{31.925747248622173, 0.3976588035558893}, 0.3976588035558893], CircleBox[{31.41827799864636, 0.8535533905932748}, 0.28451779686442497], CircleBox[{32.55634918610405, 0.25000000000000006}, 0.25000000000000006], CircleBox[{30.013927728298725, 2.1172093968074455}, 0.12454172922396761], CircleBox[{30.11422146679494, 2.360779904583967}, 0.13886940615199808], CircleBox[{30.28020681118865, 2.310660171779822}, 0.034517796864424584], CircleBox[{30.280206811188645, 2.133883476483185}, 0.1422588984322123], CircleBox[{28.970562748477136, 0.1715728752538099}, 0.1715728752538099], CircleBox[{29.142135623730944, 0.43933982822017903}, 0.14644660940672635], CircleBox[{29.313708498984756, 0.17157287525380985}, 0.17157287525380985], CircleBox[{29.14213562373095, 0.04289321881345246}, 0.04289321881345246], CircleBox[{29.047030843889292, 1.6167812573081506}, 0.09510477984165594], CircleBox[{29.237240403572606, 1.616781257308153}, 0.09510477984165584], CircleBox[{29.14213562373095, 1.4502357756356505}, 0.09668238504237668], CircleBox[{28.270343519163188, 2.1172093968074566}, 0.12454172922396786], CircleBox[{28.170049780666965, 2.360779904583965}, 0.13886940615199786], CircleBox[{28.00406443627325, 2.3106601717798214}, 0.03451779686442457], CircleBox[{28.00406443627325, 2.133883476483185}, 0.1422588984322123], CircleBox[{26.865993248815553, 0.8535533905932734}, 0.28451779686442447], CircleBox[{27.04829930237489, 0.29911947447943626}, 0.29911947447943626], CircleBox[{26.358523998839722, 0.39765880355588895}, 0.39765880355588895], CircleBox[{25.727922061357855, 0.2499999999999999}, 0.2499999999999999], CircleBox[{41.79898987322333, 1.}], CircleBox[{46.62741699796952, 5.828427124746191}, 5.828427124746191], CircleBox[{40.798989873223334, 2.560660171779822}, 0.853553390593274], CircleBox[{39.79898987322333, 1.}], CircleBox[{5.8284271247462085, 6.466840371656666}, 0.0348598563172457], CircleBox[{3.2864739814758117, 10.683483613964254}, 0.034378069392182686], CircleBox[{2.5330600823226015, 11.13224032929042}, 0.04922784040393116], CircleBox[{2.445611483469184, 11.169301848853351}, 0.04575012374428017], CircleBox[{2.515439126378227, 11.220660287372926}, 0.04093083680301219], CircleBox[{2.3313708498984735, 11.42371716450254}, 0.23313708498984803], CircleBox[{3.3305297855692495, 11.537906757150624}, 0.1189474923417592], CircleBox[{4.371320343559643, 11.565785075668224}, 0.09106917382415934], CircleBox[{4.995794678353879, 11.537906757150624}, 0.11894749234175905], CircleBox[{8.370380268016575, 10.683483613964253}, 0.034378069392182756], CircleBox[{8.326324463923136, 11.537906757150624}, 0.11894749234175929], CircleBox[{9.141415123114163, 11.220660287372926}, 0.04093083680301231], CircleBox[{9.325483399593912, 11.423717164502532}, 0.23313708498984861], CircleBox[{9.211242766023195, 11.169301848853339}, 0.045750123744280245], CircleBox[{9.123794167169773, 11.132240329290413}, 0.04922784040393116], CircleBox[{7.2855339059327395, 11.565785075668224}, 0.09106917382415934], CircleBox[{6.661059571138505, 11.537906757150623}, 0.11894749234175911], CircleBox[{10.563017928136377, 0.051320788280846}, 0.051320788280846], CircleBox[{10.691168824543178, 0.04000000000000127}, 0.04000000000000127], CircleBox[{0.965685424949238, 0.04}, 0.04], CircleBox[{1.0938363213560542, 0.051320788280845485}, 0.051320788280845485], CircleBox[{-5.828427124746198, 6.584349442401625}, 0.048815536468909175], CircleBox[{-5.82842712474618, 6.755203820042821}, 0.07322330470336312], CircleBox[{-6.063102589554493, 7.581260790054871}, 0.03352506640118449], CircleBox[{-5.593751659937902, 7.581260790054858}, 0.03352506640118439], CircleBox[{-6.715929635786802, 8.994346716370554}, 0.03977386865482223], CircleBox[{-4.940924613705583, 8.994346716370556}, 0.03977386865482216], CircleBox[{-3.054077130398888, 10.878202541781652}, 0.07306581186918472], CircleBox[{-3.1876726427121076, 10.803300858899107}, 0.0800943102542603], CircleBox[{-3.1741409269036542, 10.949174917458837}, 0.06640602521773768], CircleBox[{-2.914213562373093, 11.292577554195747}, 0.3642766952966373], CircleBox[{-3.8425085013259017, 10.259676901993311}, 0.036796329745076184], CircleBox[{-3.867932610596276, 10.326850113173421}, 0.03502724321283082], CircleBox[{-3.7859115916709825, 10.321683666962018}, 0.04715633003632291], CircleBox[{-4.359454940494637, 10.44351908100483}, 0.03195462697050008], CircleBox[{-4.364701255361698, 10.515590817548102}, 0.04030780468002646], CircleBox[{-4.271123709324728, 9.863385102338999}, 0.04723314634638413], CircleBox[{-4.3541979903190136, 9.905952637444072}, 0.046112079603522135], CircleBox[{-4.360517537627436, 9.794234051041887}, 0.06578510188862344], CircleBox[{-4.414213562373096, 9.699747468305835}, 0.042893218813452476], CircleBox[{-4.654743650250715, 11.142421261071124}, 0.04827249921765269], CircleBox[{-4.662741699796953, 11.423717164502534}, 0.23313708498984778], CircleBox[{-4.562355759818442, 11.162877461023967}, 0.04635296466515371], CircleBox[{-4.58674600372088, 11.063836969029339}, 0.05564656009922352], CircleBox[{-8.482713322588731, 10.949174917458834}, 0.06640602521773778], CircleBox[{-8.469181606780277, 10.803300858899108}, 0.08009431025426038], CircleBox[{-8.602777119093497, 10.87820254178165}, 0.07306581186918476], CircleBox[{-8.742640687119293, 11.292577554195747}, 0.364276695296638], CircleBox[{-7.788921638896107, 10.326850113173425}, 0.03502724321283075], CircleBox[{-7.8143457481664855, 10.259676901993311}, 0.03679632974507634], CircleBox[{-7.870942657821401, 10.321683666962015}, 0.04715633003632295], CircleBox[{-7.302656259173369, 9.90595263744407}, 0.046112079603522156], CircleBox[{-7.296336711864948, 9.794234051041887}, 0.0657851018886235], CircleBox[{-7.385730540167658, 9.863385102338993}, 0.04723314634638438], CircleBox[{-7.24264068711929, 9.699747468305834}, 0.04289321881345255], CircleBox[{-7.297399308997745, 10.443519081004826}, 0.0319546269705001], CircleBox[{-7.292152994130687, 10.515590817548102}, 0.040307804680026434], CircleBox[{-7.070108245771505, 11.063836969029344}, 0.055646560099223544], CircleBox[{-7.09449848967394, 11.162877461023967}, 0.04635296466515372], CircleBox[{-7.002110599241671, 11.142421261071126}, 0.048272499217652705], CircleBox[{-6.994112549695432, 11.42371716450254}, 0.23313708498984784], CircleBox[{-5.82842712474618, 5.190013877835653}, 0.034859856317244746], CircleBox[{-5.82842712474621, 5.111188635650454}, 0.043965385867989024], CircleBox[{-6.396574962043801, 3.2417847186986437}, 0.03342046101750733], CircleBox[{-5.260279287448493, 3.241784718698535}, 0.033420461017511296], CircleBox[{-7.7794063032451355, 1.4225889843221229}, 0.04064539955206305], CircleBox[{-7.257901592455408, 0.046112079603522316}, 0.046112079603522316], CircleBox[{-7.33478861141058, 0.03205024439711255}, 0.03205024439711255], CircleBox[{-9.063614866643263, 0.03205024439711334}, 0.03205024439711334], CircleBox[{-9.525483399593906, 0.35000000000000053}, 0.05000000000000007], CircleBox[{-10.19053669714671, 0.046112079603522135}, 0.046112079603522135], CircleBox[{-10.310308043036876, 0.07777341327737437}, 0.07777341327737437], CircleBox[{-10.202046527849323, 0.13725037123284234}, 0.04575012374428078], CircleBox[{-10.449747468305848, 0.06250000000000044}, 0.06250000000000044], CircleBox[{-9.46918160678027, 0.05132078828084551}, 0.05132078828084551], CircleBox[{-6.4469399850851135, 0.03638310943170246}, 0.03638310943170246], CircleBox[{-5.2099142644072645, 0.036383109431700505}, 0.036383109431700505], CircleBox[{-4.398952657037003, 0.046112079603522135}, 0.046112079603522135], CircleBox[{-4.322065638081863, 0.0320502443971133}, 0.0320502443971133], CircleBox[{-3.8774479462472757, 1.4225889843221218}, 0.04064539955206044], CircleBox[{-2.131370849898476, 0.35000000000000003}, 0.05], CircleBox[{-1.4548077216430757, 0.13725037123284015}, 0.04575012374428005], CircleBox[{-1.466317552345668, 0.046112079603522114}, 0.046112079603522114], CircleBox[{-1.3465462064555276, 0.07777341327737415}, 0.07777341327737415], CircleBox[{-1.2071067811865475, 0.06249999999999997}, 0.06249999999999997], CircleBox[{-2.187672642712109, 0.05132078828084552}, 0.05132078828084552], CircleBox[{-2.5932393828491183, 0.03205024439711332}, 0.03205024439711332], CircleBox[{-17.596392485349682, 7.437902832994914}, 0.11111111111111109], CircleBox[{-17.374170263127457, 7.4379028329949115}, 0.11111111111111162], CircleBox[{-17.48528137423857, 6.931980515339458}, 0.10355339059327373], CircleBox[{-17.485281374238568, 7.193184390303208}, 0.15765048437046789], CircleBox[{-16.951653234475458, 8.762259854459751}, 0.07623259139473049], CircleBox[{-16.781493314594535, 8.810161397231349}, 0.10054115137771892], CircleBox[{-16.850513405061417, 8.64404212394683}, 0.07934599614714398], CircleBox[{-16.66683383311408, 8.922428988181716}, 0.059929433687476816], CircleBox[{-17.162496817013913, 8.12476210995526}, 0.04611207960352203], CircleBox[{-17.107203794908777, 8.041291580135244}, 0.0540110827613982], CircleBox[{-17.06488008258399, 8.139087296526009}, 0.052550161456822606], CircleBox[{-17.52946568574478, 8.699106707958665}, 0.04418431150620993], CircleBox[{-17.485281374238568, 8.627987753750183}, 0.03954238095793526], CircleBox[{-17.44109706273236, 8.699106707958663}, 0.044184311506209904], CircleBox[{-17.51733161863568, 8.27335666188303}, 0.03205024439711334], CircleBox[{-17.453231129841452, 8.273356661883028}, 0.03205024439711333], CircleBox[{-17.485281374238568, 8.328267877770575}, 0.03153009687409354], CircleBox[{-17.80806593146322, 8.12476210995525}, 0.04611207960352231], CircleBox[{-17.86335895356836, 8.041291580135242}, 0.05401108276139808], CircleBox[{-17.90568266589315, 8.139087296526009}, 0.052550161456822585], CircleBox[{-18.120049343415715, 8.644042123946834}, 0.0793459961471437], CircleBox[{-18.01890951400168, 8.762259854459751}, 0.07623259139473047], CircleBox[{-18.189069433882604, 8.810161397231349}, 0.10054115137771882], CircleBox[{-18.303728915363056, 8.922428988181718}, 0.05992943368747677], CircleBox[{-19.086165793527908, 10.055969830203043}, 0.15022110482233492], CircleBox[{-19.30262876003088, 10.23872340784526}, 0.13307218138173144], CircleBox[{-19.061587889006077, 10.329631193172812}, 0.1245417292239678], CircleBox[{-19.428090415820634, 11.009251235631694}, 0.6476030138606882], CircleBox[{-15.90897485947106, 10.32963119317281}, 0.12454172922396789], CircleBox[{-15.542472332656505, 11.009251235631698}, 0.6476030138606887], CircleBox[{-15.667933988446249, 10.238723407845255}, 0.13307218138173157], CircleBox[{-15.884396954949226, 10.055969830203038}, 0.15022110482233503], CircleBox[{-17.525281374238574, 4.862741699796961}, 0.04000000000000007], CircleBox[{-17.485281374238557, 4.959234347260243}, 0.06445492336158475], CircleBox[{-17.44528137423856, 4.862741699796957}, 0.04000000000000004], CircleBox[{-17.485281374238575, 4.724873734152918}, 0.10355339059327388], CircleBox[{-17.246806905106, 3.849659287425688}, 0.03406778130465211], CircleBox[{-17.203126741478382, 3.9098570539625643}, 0.04030780468002646], CircleBox[{-17.17531307832696, 3.8358576619061155}, 0.03874603698895114], CircleBox[{-17.120253610270368, 3.3895435225617008}, 0.052146823424025684], CircleBox[{-17.00689316412134, 3.3487174708204215}, 0.06834117287388655], CircleBox[{-17.045155627232873, 3.4659902576697306}, 0.055015718375710156], CircleBox[{-17.850309138206747, 3.3895435225616586}, 0.05214682342402773], CircleBox[{-17.963669584355767, 3.3487174708204277}, 0.06834117287388616], CircleBox[{-17.925407121244252, 3.4659902576697257}, 0.05501571837570998], CircleBox[{-17.795249670150174, 3.8358576619061195}, 0.03874603698895069], CircleBox[{-17.72375584337113, 3.849659287425683}, 0.03406778130465208], CircleBox[{-17.767436006998754, 3.9098570539625634}, 0.040307804680026406], CircleBox[{-17.633142402692076, 4.318893332681434}, 0.049287009484503125], CircleBox[{-17.337420345785056, 4.3188933326814345}, 0.04928700948450317], CircleBox[{-14.246287943245614, 0.523459080339014}, 0.07477986861985914], CircleBox[{-14.88083712290594, 0.8050100413209919}, 0.04735353184241126], CircleBox[{-14.875372694254777, 0.9054785216270295}, 0.05326344244864877], CircleBox[{-14.784799157572424, 0.8439006927081661}, 0.056260046180544435], CircleBox[{-15.42669459248869, 1.1289024287015408}, 0.06640602521773782], CircleBox[{-15.306853727102677, 1.1946216129454836}, 0.07027185958502846], CircleBox[{-15.43675323681469, 1.280330085889911}, 0.08535533905932738], CircleBox[{-15.696492868858948, 0.07777341327737429}, 0.07777341327737429], CircleBox[{-15.75341278696195, 0.21648357340957725}, 0.07216119113652575], CircleBox[{-15.868500116930408, 0.09510477984165554}, 0.09510477984165554], CircleBox[{-15.441943202902099, 0.6315772529585407}, 0.037151603115208286], CircleBox[{-15.491270984990344, 0.6917995228004044}, 0.04069408957649428], CircleBox[{-15.518231125888304, 0.6147032026094543}, 0.04098021350729695], CircleBox[{-15.164940501393943, 0.5403533539501251}, 0.03178549140883084], CircleBox[{-15.102189000573844, 0.5549667171547984}, 0.03264510100910577], CircleBox[{-15.12159506182642, 0.49243464841919643}, 0.032828976561279755], CircleBox[{-15.075248271386968, 0.15062706892822467}, 0.05020902297607489], CircleBox[{-15.129233087739868, 0.05746459235362678}, 0.05746459235362678], CircleBox[{-15.011466572502155, 0.06033694638381484}, 0.06033694638381484], CircleBox[{-14.924621202458747, 0.031249999999999986}, 0.031249999999999986], CircleBox[{-14.349946662403434, 0.0777734132773742}, 0.0777734132773742], CircleBox[{-13.440465874383591, 0.06822746429607396}, 0.06822746429607396], CircleBox[{-13.656854249492378, 0.17157287525381007}, 0.17157287525381007], CircleBox[{-13.419828528814566, 0.20231410754236392}, 0.06743803584745464], CircleBox[{-13.266329957741089, 0.11111111111111147}, 0.11111111111111147], CircleBox[{-16.593948096658817, 2.5189853496818957}, 0.038753620764336826], CircleBox[{-16.57980285261158, 2.6099086799837785}, 0.05326344244864873], CircleBox[{-16.51769708114229, 2.5399087693776985}, 0.04031601221234453], CircleBox[{-16.21642543334518, 2.0056110033475965}, 0.040930836803012176], CircleBox[{-16.171890699376952, 2.0760046151037916}, 0.042367441124567175], CircleBox[{-16.119595949289327, 1.991624578050966}, 0.056903559372888095], CircleBox[{-16.75750306553827, 2.056764785457304}, 0.0316425351608816], CircleBox[{-16.793481851438163, 1.994010389248187}, 0.04069408957649491], CircleBox[{-16.72171512866679, 2.0043613946259367}, 0.031815260232157555], CircleBox[{-17.007689124166056, 0.06822746429607393}, 0.06822746429607393], CircleBox[{-17.126035856272665, 0.05132078828084547}, 0.05132078828084547], CircleBox[{-17.094757082487284, 0.1464466094067302}, 0.04881553646891007], CircleBox[{-17.521664483670303, 0.6185128603389085}, 0.036383109431700505], CircleBox[{-17.44889826480691, 0.6185128603389126}, 0.03638310943170066], CircleBox[{-17.48528137423857, 0.6926213672214948}, 0.04617475781476631], CircleBox[{-17.87580566598984, 0.14644660940672616}, 0.04881553646890872], CircleBox[{-17.962873624311094, 0.06822746429607379}, 0.06822746429607379], CircleBox[{-17.844526892204488, 0.051320788280845436}, 0.051320788280845436], CircleBox[{-17.241512530329903, 1.706381907360404}, 0.034824120558375936], CircleBox[{-17.485281374238532, 1.2720464445247974}, 0.03634418412928136], CircleBox[{-17.729050218147158, 1.7063819073604518}, 0.03482412055838107], CircleBox[{-18.390759895865603, 2.6099086799837767}, 0.053263442448648446], CircleBox[{-18.376614651818304, 2.5189853496818913}, 0.038753620764336756], CircleBox[{-18.452865667334827, 2.5399087693776985}, 0.04031601221234446], CircleBox[{-18.17708089703898, 1.994010389248209}, 0.040694089576494064], CircleBox[{-18.213059682938823, 2.0567647854573035}, 0.03164253516088191], CircleBox[{-18.24884761981035, 2.0043613946259375}, 0.03181526023215757], CircleBox[{-18.85096679918781, 1.9916245780509731}, 0.056903559372884695], CircleBox[{-18.754137315131945, 2.0056110033475973}, 0.04093083680301209], CircleBox[{-18.798672049100144, 2.076004615103789}, 0.042367441124567], CircleBox[{-20.724274805231524, 0.5234590803390136}, 0.07477986861985908], CircleBox[{-20.095190054222353, 0.9054785216270269}, 0.05326344244864862], CircleBox[{-20.08972562557119, 0.8050100413209909}, 0.04735353184241121], CircleBox[{-20.185763590904703, 0.8439006927081651}, 0.05626004618054437], CircleBox[{-19.841329660737266, 0.05746459235362676}, 0.05746459235362676], CircleBox[{-19.95909617597498, 0.06033694638381486}, 0.06033694638381486], CircleBox[{-19.89531447709016, 0.1506270689282251}, 0.05020902297607504], CircleBox[{-20.045941546018387, 0.031249999999999986}, 0.031249999999999986], CircleBox[{-19.805622247083196, 0.5403533539501175}, 0.0317854914088305], CircleBox[{-19.86837374790329, 0.5549667171547981}, 0.032645101009105774], CircleBox[{-19.848967686650713, 0.4924346484191963}, 0.03282897656127975], CircleBox[{-19.102062631546723, 0.09510477984165593}, 0.09510477984165593], CircleBox[{-19.217149961515176, 0.21648357340957836}, 0.07216119113652612], CircleBox[{-19.274069879618178, 0.07777341327737414}, 0.07777341327737414], CircleBox[{-19.479291763486785, 0.6917995228004008}, 0.040694089576494175], CircleBox[{-19.528619545575026, 0.631577252958542}, 0.037151603115208265], CircleBox[{-19.452331622588822, 0.6147032026094543}, 0.04098021350729694], CircleBox[{-19.543868155988417, 1.1289024287015488}, 0.06640602521773807], CircleBox[{-19.66370902137445, 1.1946216129454836}, 0.0702718595850284], CircleBox[{-19.533809511662426, 1.28033008588991}, 0.08535533905932731], CircleBox[{-21.70423279073603, 0.1111111111111111}, 0.1111111111111111], CircleBox[{-21.550734219662573, 0.20231410754236342}, 0.06743803584745447], CircleBox[{-21.530096874093537, 0.06822746429607386}, 0.06822746429607386], CircleBox[{-21.313708498984756, 0.17157287525380982}, 0.17157287525380982], CircleBox[{-20.620616086073703, 0.07777341327737422}, 0.07777341327737422], CircleBox[{-28.84301614925152, 8.469181606780273}, 0.2991194744794365], CircleBox[{-29.14213562373095, 7.889087296526012}, 0.353553390593274], CircleBox[{-29.441255098210387, 8.46918160678027}, 0.2991194744794365], CircleBox[{-29.142135623730947, 10.199747468305835}, 1.457106781186548], CircleBox[{-28.930079321836615, 3.6049571322036407}, 0.21205630189433172], CircleBox[{-29.354191925625283, 3.6049571322036487}, 0.2120563018943322], CircleBox[{-29.14213562373095, 4.463669859189174}, 0.15765048437046764], CircleBox[{-29.14213562373095, 4.036893163892537}, 0.2691262109261693], CircleBox[{-31.235971945087, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-31.925747248622173, 0.3976588035558893}, 0.3976588035558893], CircleBox[{-31.41827799864636, 0.8535533905932748}, 0.28451779686442497], CircleBox[{-32.55634918610405, 0.25000000000000006}, 0.25000000000000006], CircleBox[{-30.013927728298725, 2.1172093968074455}, 0.12454172922396761], CircleBox[{-30.11422146679494, 2.360779904583967}, 0.13886940615199808], CircleBox[{-30.28020681118865, 2.310660171779822}, 0.034517796864424584], CircleBox[{-30.280206811188645, 2.133883476483185}, 0.1422588984322123], CircleBox[{-28.970562748477136, 0.1715728752538099}, 0.1715728752538099], CircleBox[{-29.142135623730944, 0.43933982822017903}, 0.14644660940672635], CircleBox[{-29.313708498984756, 0.17157287525380985}, 0.17157287525380985], CircleBox[{-29.14213562373095, 0.04289321881345246}, 0.04289321881345246], CircleBox[{-29.047030843889292, 1.6167812573081506}, 0.09510477984165594], CircleBox[{-29.237240403572606, 1.616781257308153}, 0.09510477984165584], CircleBox[{-29.14213562373095, 1.4502357756356505}, 0.09668238504237668], CircleBox[{-28.270343519163188, 2.1172093968074566}, 0.12454172922396786], CircleBox[{-28.170049780666965, 2.360779904583965}, 0.13886940615199786], CircleBox[{-28.00406443627325, 2.3106601717798214}, 0.03451779686442457], CircleBox[{-28.00406443627325, 2.133883476483185}, 0.1422588984322123], CircleBox[{-26.865993248815553, 0.8535533905932734}, 0.28451779686442447], CircleBox[{-27.04829930237489, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-26.358523998839722, 0.39765880355588895}, 0.39765880355588895], CircleBox[{-25.727922061357855, 0.2499999999999999}, 0.2499999999999999], CircleBox[{-41.79898987322333, 1.}], CircleBox[{-46.62741699796952, 5.828427124746191}, 5.828427124746191], CircleBox[{-40.798989873223334, 2.560660171779822}, 0.853553390593274], CircleBox[{-39.79898987322333, 1.}], CircleBox[{17.48528137423856, 6.584349442401625}, 0.048815536468909175], CircleBox[{17.48528137423858, 6.755203820042821}, 0.07322330470336312], CircleBox[{17.250605909430263, 7.581260790054871}, 0.03352506640118449], CircleBox[{17.719956839046855, 7.581260790054858}, 0.03352506640118439], CircleBox[{16.59777886319796, 8.994346716370554}, 0.03977386865482223], CircleBox[{18.372783885279176, 8.994346716370556}, 0.03977386865482216], CircleBox[{20.25963136858587, 10.878202541781652}, 0.07306581186918472], CircleBox[{20.126035856272654, 10.803300858899107}, 0.0800943102542603], CircleBox[{20.139567572081106, 10.949174917458837}, 0.06640602521773768], CircleBox[{20.399494936611667, 11.292577554195747}, 0.3642766952966373], CircleBox[{19.47119999765886, 10.259676901993311}, 0.036796329745076184], CircleBox[{19.445775888388482, 10.326850113173421}, 0.03502724321283082], CircleBox[{19.52779690731378, 10.321683666962018}, 0.04715633003632291], CircleBox[{18.954253558490123, 10.44351908100483}, 0.03195462697050008], CircleBox[{18.94900724362306, 10.515590817548102}, 0.04030780468002646], CircleBox[{19.042584789660033, 9.863385102338999}, 0.04723314634638413], CircleBox[{18.959510508665744, 9.905952637444072}, 0.046112079603522135], CircleBox[{18.953190961357326, 9.794234051041887}, 0.06578510188862344], CircleBox[{18.89949493661166, 9.699747468305835}, 0.042893218813452476], CircleBox[{18.658964848734044, 11.142421261071124}, 0.04827249921765269], CircleBox[{18.650966799187806, 11.423717164502534}, 0.23313708498984778], CircleBox[{18.751352739166318, 11.162877461023967}, 0.04635296466515371], CircleBox[{18.726962495263876, 11.063836969029339}, 0.05564656009922352], CircleBox[{14.83099517639603, 10.949174917458834}, 0.06640602521773778], CircleBox[{14.844526892204481, 10.803300858899108}, 0.08009431025426038], CircleBox[{14.710931379891264, 10.87820254178165}, 0.07306581186918476], CircleBox[{14.571067811865465, 11.292577554195747}, 0.364276695296638], CircleBox[{15.524786860088652, 10.326850113173425}, 0.03502724321283075], CircleBox[{15.499362750818275, 10.259676901993311}, 0.03679632974507634], CircleBox[{15.442765841163359, 10.321683666962015}, 0.04715633003632295], CircleBox[{16.011052239811388, 9.90595263744407}, 0.046112079603522156], CircleBox[{16.01737178711981, 9.794234051041887}, 0.0657851018886235], CircleBox[{15.927977958817099, 9.863385102338993}, 0.04723314634638438], CircleBox[{16.071067811865472, 9.699747468305834}, 0.04289321881345255], CircleBox[{16.016309189987012, 10.443519081004826}, 0.0319546269705001], CircleBox[{16.02155550485407, 10.515590817548102}, 0.040307804680026434], CircleBox[{16.243600253213252, 11.063836969029344}, 0.055646560099223544], CircleBox[{16.219210009310817, 11.162877461023967}, 0.04635296466515372], CircleBox[{16.311597899743088, 11.142421261071126}, 0.048272499217652705], CircleBox[{16.319595949289326, 11.42371716450254}, 0.23313708498984784], CircleBox[{17.48528137423858, 5.190013877835653}, 0.034859856317244746], CircleBox[{17.485281374238546, 5.111188635650454}, 0.043965385867989024], CircleBox[{16.91713353694096, 3.2417847186986437}, 0.03342046101750733], CircleBox[{18.053429211536265, 3.241784718698535}, 0.033420461017511296], CircleBox[{15.534302195739624, 1.4225889843221229}, 0.04064539955206305], CircleBox[{16.05580690652935, 0.046112079603522316}, 0.046112079603522316], CircleBox[{15.978919887574175, 0.03205024439711255}, 0.03205024439711255], CircleBox[{14.250093632341496, 0.03205024439711334}, 0.03205024439711334], CircleBox[{13.788225099390854, 0.35000000000000053}, 0.05000000000000007], CircleBox[{13.123171801838048, 0.046112079603522135}, 0.046112079603522135], CircleBox[{13.003400455947885, 0.07777341327737437}, 0.07777341327737437], CircleBox[{13.111661971135437, 0.13725037123284234}, 0.04575012374428078], CircleBox[{12.86396103067891, 0.06250000000000044}, 0.06250000000000044], CircleBox[{13.844526892204488, 0.05132078828084551}, 0.05132078828084551], CircleBox[{16.866768513899643, 0.03638310943170246}, 0.03638310943170246], CircleBox[{18.103794234577492, 0.036383109431700505}, 0.036383109431700505], CircleBox[{18.914755841947755, 0.046112079603522135}, 0.046112079603522135], CircleBox[{18.991642860902896, 0.0320502443971133}, 0.0320502443971133], CircleBox[{19.436260552737483, 1.4225889843221218}, 0.04064539955206044], CircleBox[{21.182337649086286, 0.35000000000000003}, 0.05], CircleBox[{21.858900777341685, 0.13725037123284015}, 0.04575012374428005], CircleBox[{21.847390946639095, 0.046112079603522114}, 0.046112079603522114], CircleBox[{21.967162292529228, 0.07777341327737415}, 0.07777341327737415], CircleBox[{22.10660171779821, 0.06249999999999997}, 0.06249999999999997], CircleBox[{21.12603585627265, 0.05132078828084552}, 0.05132078828084552], CircleBox[{20.720469116135643, 0.03205024439711332}, 0.03205024439711332], CircleBox[{29.031024512619833, 7.437902832994914}, 0.11111111111111109], CircleBox[{29.25324673484206, 7.4379028329949115}, 0.11111111111111162], CircleBox[{29.142135623730947, 6.931980515339458}, 0.10355339059327373], CircleBox[{29.142135623730955, 7.193184390303208}, 0.15765048437046789], CircleBox[{29.675763763494068, 8.762259854459751}, 0.07623259139473049], CircleBox[{29.845923683374977, 8.810161397231349}, 0.10054115137771892], CircleBox[{29.77690359290811, 8.64404212394683}, 0.07934599614714398], CircleBox[{29.960583164855443, 8.922428988181716}, 0.059929433687476816], CircleBox[{29.464920180955605, 8.12476210995526}, 0.04611207960352203], CircleBox[{29.520213203060734, 8.041291580135244}, 0.0540110827613982], CircleBox[{29.562536915385532, 8.139087296526009}, 0.052550161456822606], CircleBox[{29.09795131222474, 8.699106707958665}, 0.04418431150620993], CircleBox[{29.142135623730947, 8.627987753750183}, 0.03954238095793526], CircleBox[{29.186319935237158, 8.699106707958663}, 0.044184311506209904], CircleBox[{29.11008537933384, 8.27335666188303}, 0.03205024439711334], CircleBox[{29.174185868128067, 8.273356661883028}, 0.03205024439711333], CircleBox[{29.142135623730947, 8.328267877770575}, 0.03153009687409354], CircleBox[{28.819351066506304, 8.12476210995525}, 0.04611207960352231], CircleBox[{28.76405804440116, 8.041291580135242}, 0.05401108276139808], CircleBox[{28.721734332076366, 8.139087296526009}, 0.052550161456822585], CircleBox[{28.5073676545538, 8.644042123946834}, 0.0793459961471437], CircleBox[{28.608507483967834, 8.762259854459751}, 0.07623259139473047], CircleBox[{28.43834756408692, 8.810161397231349}, 0.10054115137771882], CircleBox[{28.323688082606463, 8.922428988181718}, 0.05992943368747677], CircleBox[{27.541251204441615, 10.055969830203043}, 0.15022110482233492], CircleBox[{27.32478823793863, 10.23872340784526}, 0.13307218138173144], CircleBox[{27.565829108963445, 10.329631193172812}, 0.1245417292239678], CircleBox[{27.199326582148885, 11.009251235631694}, 0.6476030138606882], CircleBox[{30.718442138498457, 10.32963119317281}, 0.12454172922396789], CircleBox[{31.084944665313024, 11.009251235631698}, 0.6476030138606887], CircleBox[{30.95948300952327, 10.238723407845255}, 0.13307218138173157], CircleBox[{30.743020043020287, 10.055969830203038}, 0.15022110482233503], CircleBox[{29.10213562373095, 4.862741699796961}, 0.04000000000000007], CircleBox[{29.14213562373096, 4.959234347260243}, 0.06445492336158475], CircleBox[{29.182135623730954, 4.862741699796957}, 0.04000000000000004], CircleBox[{29.142135623730944, 4.724873734152918}, 0.10355339059327388], CircleBox[{29.38061009286352, 3.849659287425688}, 0.03406778130465211], CircleBox[{29.424290256491137, 3.9098570539625643}, 0.04030780468002646], CircleBox[{29.452103919642568, 3.8358576619061155}, 0.03874603698895114], CircleBox[{29.507163387699148, 3.3895435225617008}, 0.052146823424025684], CircleBox[{29.620523833848175, 3.3487174708204215}, 0.06834117287388655], CircleBox[{29.58226137073665, 3.4659902576697306}, 0.055015718375710156], CircleBox[{28.777107859762772, 3.3895435225616586}, 0.05214682342402773], CircleBox[{28.663747413613756, 3.3487174708204277}, 0.06834117287388616], CircleBox[{28.70200987672527, 3.4659902576697257}, 0.05501571837570998], CircleBox[{28.83216732781935, 3.8358576619061195}, 0.03874603698895069], CircleBox[{28.903661154598385, 3.849659287425683}, 0.03406778130465208], CircleBox[{28.859980990970765, 3.9098570539625634}, 0.040307804680026406], CircleBox[{28.994274595277442, 4.318893332681434}, 0.049287009484503125], CircleBox[{29.289996652184467, 4.3188933326814345}, 0.04928700948450317], CircleBox[{32.38112905472391, 0.523459080339014}, 0.07477986861985914], CircleBox[{31.746579875063578, 0.8050100413209919}, 0.04735353184241126], CircleBox[{31.752044303714744, 0.9054785216270295}, 0.05326344244864877], CircleBox[{31.84261784039709, 0.8439006927081661}, 0.056260046180544435], CircleBox[{31.200722405480832, 1.1289024287015408}, 0.06640602521773782], CircleBox[{31.320563270866838, 1.1946216129454836}, 0.07027185958502846], CircleBox[{31.190663761154823, 1.280330085889911}, 0.08535533905932738], CircleBox[{30.93092412911057, 0.07777341327737429}, 0.07777341327737429], CircleBox[{30.874004211007566, 0.21648357340957725}, 0.07216119113652575], CircleBox[{30.75891688103911, 0.09510477984165554}, 0.09510477984165554], CircleBox[{31.185473795067413, 0.6315772529585407}, 0.037151603115208286], CircleBox[{31.136146012979175, 0.6917995228004044}, 0.04069408957649428], CircleBox[{31.109185872081216, 0.6147032026094543}, 0.04098021350729695], CircleBox[{31.462476496575572, 0.5403533539501251}, 0.03178549140883084], CircleBox[{31.52522799739568, 0.5549667171547984}, 0.03264510100910577], CircleBox[{31.505821936143093, 0.49243464841919643}, 0.032828976561279755], CircleBox[{31.55216872658255, 0.15062706892822467}, 0.05020902297607489], CircleBox[{31.498183910229642, 0.05746459235362678}, 0.05746459235362678], CircleBox[{31.615950425467364, 0.06033694638381484}, 0.06033694638381484], CircleBox[{31.702795795510774, 0.031249999999999986}, 0.031249999999999986], CircleBox[{32.277470335566086, 0.0777734132773742}, 0.0777734132773742], CircleBox[{33.18695112358593, 0.06822746429607396}, 0.06822746429607396], CircleBox[{32.97056274847714, 0.17157287525381007}, 0.17157287525381007], CircleBox[{33.207588469154956, 0.20231410754236392}, 0.06743803584745464], CircleBox[{33.36108704022843, 0.11111111111111147}, 0.11111111111111147], CircleBox[{30.033468901310712, 2.5189853496818957}, 0.038753620764336826], CircleBox[{30.04761414535794, 2.6099086799837785}, 0.05326344244864873], CircleBox[{30.10971991682723, 2.5399087693776985}, 0.04031601221234453], CircleBox[{30.410991564624336, 2.0056110033475965}, 0.040930836803012176], CircleBox[{30.455526298592567, 2.0760046151037916}, 0.042367441124567175], CircleBox[{30.507821048680192, 1.991624578050966}, 0.056903559372888095], CircleBox[{29.869913932431245, 2.056764785457304}, 0.0316425351608816], CircleBox[{29.83393514653135, 1.994010389248187}, 0.04069408957649491], CircleBox[{29.905701869302725, 2.0043613946259367}, 0.031815260232157555], CircleBox[{29.619727873803466, 0.06822746429607393}, 0.06822746429607393], CircleBox[{29.50138114169685, 0.05132078828084547}, 0.05132078828084547], CircleBox[{29.532659915482235, 0.1464466094067302}, 0.04881553646891007], CircleBox[{29.105752514299212, 0.6185128603389085}, 0.036383109431700505], CircleBox[{29.17851873316261, 0.6185128603389126}, 0.03638310943170066], CircleBox[{29.14213562373095, 0.6926213672214948}, 0.04617475781476631], CircleBox[{28.75161133197968, 0.14644660940672616}, 0.04881553646890872], CircleBox[{28.664543373658425, 0.06822746429607379}, 0.06822746429607379], CircleBox[{28.78289010576503, 0.051320788280845436}, 0.051320788280845436], CircleBox[{29.385904467639616, 1.706381907360404}, 0.034824120558375936], CircleBox[{29.142135623730987, 1.2720464445247974}, 0.03634418412928136], CircleBox[{28.89836677982236, 1.7063819073604518}, 0.03482412055838107], CircleBox[{28.236657102103916, 2.6099086799837767}, 0.053263442448648446], CircleBox[{28.25080234615121, 2.5189853496818913}, 0.038753620764336756], CircleBox[{28.174551330634696, 2.5399087693776985}, 0.04031601221234446], CircleBox[{28.45033610093053, 1.994010389248209}, 0.040694089576494064], CircleBox[{28.414357315030692, 2.0567647854573035}, 0.03164253516088191], CircleBox[{28.378569378159163, 2.0043613946259375}, 0.03181526023215757], CircleBox[{27.77645019878171, 1.9916245780509731}, 0.056903559372884695], CircleBox[{27.873279682837573, 2.0056110033475973}, 0.04093083680301209], CircleBox[{27.828744948869375, 2.076004615103789}, 0.042367441124567], CircleBox[{25.903142192738, 0.5234590803390136}, 0.07477986861985908], CircleBox[{26.532226943747165, 0.9054785216270269}, 0.05326344244864862], CircleBox[{26.537691372398328, 0.8050100413209909}, 0.04735353184241121], CircleBox[{26.44165340706482, 0.8439006927081651}, 0.05626004618054437], CircleBox[{26.78608733723225, 0.05746459235362676}, 0.05746459235362676], CircleBox[{26.668320821994538, 0.06033694638381486}, 0.06033694638381486], CircleBox[{26.73210252087936, 0.1506270689282251}, 0.05020902297607504], CircleBox[{26.581475451951132, 0.031249999999999986}, 0.031249999999999986], CircleBox[{26.821794750886326, 0.5403533539501175}, 0.0317854914088305], CircleBox[{26.75904325006623, 0.5549667171547981}, 0.032645101009105774], CircleBox[{26.778449311318806, 0.4924346484191963}, 0.03282897656127975], CircleBox[{27.525354366422796, 0.09510477984165593}, 0.09510477984165593], CircleBox[{27.410267036454346, 0.21648357340957836}, 0.07216119113652612], CircleBox[{27.35334711835134, 0.07777341327737414}, 0.07777341327737414], CircleBox[{27.14812523448273, 0.6917995228004008}, 0.040694089576494175], CircleBox[{27.09879745239449, 0.631577252958542}, 0.037151603115208265], CircleBox[{27.1750853753807, 0.6147032026094543}, 0.04098021350729694], CircleBox[{27.0835488419811, 1.1289024287015488}, 0.06640602521773807], CircleBox[{26.96370797659507, 1.1946216129454836}, 0.0702718595850284], CircleBox[{27.093607486307096, 1.28033008588991}, 0.08535533905932731], CircleBox[{24.92318420723349, 0.1111111111111111}, 0.1111111111111111], CircleBox[{25.076682778306942, 0.20231410754236342}, 0.06743803584745447], CircleBox[{25.097320123875985, 0.06822746429607386}, 0.06822746429607386], CircleBox[{25.313708498984752, 0.17157287525380982}, 0.17157287525380982], CircleBox[{26.006800911895816, 0.07777341327737422}, 0.07777341327737422], CircleBox[{41.09810934770276, 8.469181606780273}, 0.2991194744794365], CircleBox[{40.79898987322333, 7.889087296526012}, 0.353553390593274], CircleBox[{40.499870398743894, 8.46918160678027}, 0.2991194744794365], CircleBox[{40.79898987322333, 10.199747468305835}, 1.457106781186548], CircleBox[{41.011046175117656, 3.6049571322036407}, 0.21205630189433172], CircleBox[{40.58693357132899, 3.6049571322036487}, 0.2120563018943322], CircleBox[{40.79898987322333, 4.463669859189174}, 0.15765048437046764], CircleBox[{40.79898987322332, 4.036893163892537}, 0.2691262109261693], CircleBox[{38.70515355186727, 0.29911947447943626}, 0.29911947447943626], CircleBox[{38.015378248332105, 0.3976588035558893}, 0.3976588035558893], CircleBox[{38.52284749830792, 0.8535533905932748}, 0.28451779686442497], CircleBox[{37.384776310850235, 0.25000000000000006}, 0.25000000000000006], CircleBox[{39.92719776865556, 2.1172093968074455}, 0.12454172922396761], CircleBox[{39.82690403015934, 2.360779904583967}, 0.13886940615199808], CircleBox[{39.66091868576563, 2.310660171779822}, 0.034517796864424584], CircleBox[{39.66091868576562, 2.133883476483185}, 0.1422588984322123], CircleBox[{40.970562748477136, 0.1715728752538099}, 0.1715728752538099], CircleBox[{40.798989873223334, 0.43933982822017903}, 0.14644660940672635], CircleBox[{40.62741699796952, 0.17157287525380985}, 0.17157287525380985], CircleBox[{40.79898987322333, 0.04289321881345246}, 0.04289321881345246], CircleBox[{40.89409465306498, 1.6167812573081506}, 0.09510477984165594], CircleBox[{40.703885093381665, 1.616781257308153}, 0.09510477984165584], CircleBox[{40.79898987322333, 1.4502357756356505}, 0.09668238504237668], CircleBox[{41.67078197779109, 2.1172093968074566}, 0.12454172922396786], CircleBox[{41.77107571628731, 2.360779904583965}, 0.13886940615199786], CircleBox[{41.937061060681025, 2.3106601717798214}, 0.03451779686442457], CircleBox[{41.93706106068103, 2.133883476483185}, 0.1422588984322123], CircleBox[{43.07513224813873, 0.8535533905932734}, 0.28451779686442447], CircleBox[{42.892826194579385, 0.29911947447943626}, 0.29911947447943626], CircleBox[{43.582601498114556, 0.39765880355588895}, 0.39765880355588895], CircleBox[{44.21320343559642, 0.2499999999999999}, 0.2499999999999999], CircleBox[{51.45584412271571, 1.}], CircleBox[{52.45584412271572, 2.560660171779822}, 0.853553390593274], CircleBox[{53.45584412271571, 1.}], CircleBox[{58.284271247461895, 5.828427124746192}, 5.828427124746192], CircleBox[{2.09383632135605, 11.303300858899108}, 0.03317614957623312], CircleBox[{1.9428090415820605, 11.494953496027213}, 0.16190075346517246], CircleBox[{2.5904120554427488, 11.58489835906342}, 0.07195589042896547], CircleBox[{3.497056274847714, 11.598569978244921}, 0.05828427124746207], CircleBox[{3.1791420680433764, 11.608685430279612}, 0.04816881921277853], CircleBox[{4.483405480573993, 11.622366515026432}, 0.03448773446595384], CircleBox[{4.238856090724502, 11.608685430279602}, 0.048168819212778546], CircleBox[{4.8570226039551585, 11.616379061126088}, 0.04047518836629302], CircleBox[{5.180824110885504, 11.584898359063418}, 0.07195589042896537], CircleBox[{8.159797974644672, 11.598569978244923}, 0.058284271247462036], CircleBox[{8.477712181449013, 11.608685430279612}, 0.04816881921277861], CircleBox[{9.563017928136343, 11.303300858899105}, 0.033176149576233264], CircleBox[{9.714045207910322, 11.494953496027202}, 0.1619007534651731], CircleBox[{9.066442194049648, 11.584898359063425}, 0.07195589042896573], CircleBox[{7.41799815876788, 11.608685430279603}, 0.04816881921277849], CircleBox[{7.173448768918389, 11.622366515026426}, 0.03448773446595386], CircleBox[{6.799831645537224, 11.616379061126091}, 0.04047518836629305], CircleBox[{6.4760301386068795, 11.584898359063418}, 0.07195589042896539], CircleBox[{10.792441121876049, 0.03205024439711454}, 0.03205024439711454], CircleBox[{0.8644131276163728, 0.03205024439711331}, 0.03205024439711331], CircleBox[{-5.8284271247462085, 6.466840371656666}, 0.0348598563172457], CircleBox[{-3.2864739814758117, 10.683483613964254}, 0.034378069392182686], CircleBox[{-2.5330600823226015, 11.13224032929042}, 0.04922784040393116], CircleBox[{-2.445611483469184, 11.169301848853351}, 0.04575012374428017], CircleBox[{-2.515439126378227, 11.220660287372926}, 0.04093083680301219], CircleBox[{-2.3313708498984735, 11.42371716450254}, 0.23313708498984803], CircleBox[{-3.3305297855692495, 11.537906757150624}, 0.1189474923417592], CircleBox[{-4.371320343559643, 11.565785075668224}, 0.09106917382415934], CircleBox[{-4.995794678353879, 11.537906757150624}, 0.11894749234175905], CircleBox[{-8.370380268016575, 10.683483613964253}, 0.034378069392182756], CircleBox[{-8.326324463923136, 11.537906757150624}, 0.11894749234175929], CircleBox[{-9.141415123114163, 11.220660287372926}, 0.04093083680301231], CircleBox[{-9.325483399593912, 11.423717164502532}, 0.23313708498984861], CircleBox[{-9.211242766023195, 11.169301848853339}, 0.045750123744280245], CircleBox[{-9.123794167169773, 11.132240329290413}, 0.04922784040393116], CircleBox[{-7.2855339059327395, 11.565785075668224}, 0.09106917382415934], CircleBox[{-6.661059571138505, 11.537906757150623}, 0.11894749234175911], CircleBox[{-10.563017928136377, 0.051320788280846}, 0.051320788280846], CircleBox[{-10.691168824543178, 0.04000000000000127}, 0.04000000000000127], CircleBox[{-0.965685424949238, 0.04}, 0.04], CircleBox[{-1.0938363213560542, 0.051320788280845485}, 0.051320788280845485], CircleBox[{-17.48528137423856, 6.584349442401625}, 0.048815536468909175], CircleBox[{-17.48528137423858, 6.755203820042821}, 0.07322330470336312], CircleBox[{-17.250605909430263, 7.581260790054871}, 0.03352506640118449], CircleBox[{-17.719956839046855, 7.581260790054858}, 0.03352506640118439], CircleBox[{-16.59777886319796, 8.994346716370554}, 0.03977386865482223], CircleBox[{-18.372783885279176, 8.994346716370556}, 0.03977386865482216], CircleBox[{-20.25963136858587, 10.878202541781652}, 0.07306581186918472], CircleBox[{-20.126035856272654, 10.803300858899107}, 0.0800943102542603], CircleBox[{-20.139567572081106, 10.949174917458837}, 0.06640602521773768], CircleBox[{-20.399494936611667, 11.292577554195747}, 0.3642766952966373], CircleBox[{-19.47119999765886, 10.259676901993311}, 0.036796329745076184], CircleBox[{-19.445775888388482, 10.326850113173421}, 0.03502724321283082], CircleBox[{-19.52779690731378, 10.321683666962018}, 0.04715633003632291], CircleBox[{-18.954253558490123, 10.44351908100483}, 0.03195462697050008], CircleBox[{-18.94900724362306, 10.515590817548102}, 0.04030780468002646], CircleBox[{-19.042584789660033, 9.863385102338999}, 0.04723314634638413], CircleBox[{-18.959510508665744, 9.905952637444072}, 0.046112079603522135], CircleBox[{-18.953190961357326, 9.794234051041887}, 0.06578510188862344], CircleBox[{-18.89949493661166, 9.699747468305835}, 0.042893218813452476], CircleBox[{-18.658964848734044, 11.142421261071124}, 0.04827249921765269], CircleBox[{-18.650966799187806, 11.423717164502534}, 0.23313708498984778], CircleBox[{-18.751352739166318, 11.162877461023967}, 0.04635296466515371], CircleBox[{-18.726962495263876, 11.063836969029339}, 0.05564656009922352], CircleBox[{-14.83099517639603, 10.949174917458834}, 0.06640602521773778], CircleBox[{-14.844526892204481, 10.803300858899108}, 0.08009431025426038], CircleBox[{-14.710931379891264, 10.87820254178165}, 0.07306581186918476], CircleBox[{-14.571067811865465, 11.292577554195747}, 0.364276695296638], CircleBox[{-15.524786860088652, 10.326850113173425}, 0.03502724321283075], CircleBox[{-15.499362750818275, 10.259676901993311}, 0.03679632974507634], CircleBox[{-15.442765841163359, 10.321683666962015}, 0.04715633003632295], CircleBox[{-16.011052239811388, 9.90595263744407}, 0.046112079603522156], CircleBox[{-16.01737178711981, 9.794234051041887}, 0.0657851018886235], CircleBox[{-15.927977958817099, 9.863385102338993}, 0.04723314634638438], CircleBox[{-16.071067811865472, 9.699747468305834}, 0.04289321881345255], CircleBox[{-16.016309189987012, 10.443519081004826}, 0.0319546269705001], CircleBox[{-16.02155550485407, 10.515590817548102}, 0.040307804680026434], CircleBox[{-16.243600253213252, 11.063836969029344}, 0.055646560099223544], CircleBox[{-16.219210009310817, 11.162877461023967}, 0.04635296466515372], CircleBox[{-16.311597899743088, 11.142421261071126}, 0.048272499217652705], CircleBox[{-16.319595949289326, 11.42371716450254}, 0.23313708498984784], CircleBox[{-17.48528137423858, 5.190013877835653}, 0.034859856317244746], CircleBox[{-17.485281374238546, 5.111188635650454}, 0.043965385867989024], CircleBox[{-16.91713353694096, 3.2417847186986437}, 0.03342046101750733], CircleBox[{-18.053429211536265, 3.241784718698535}, 0.033420461017511296], CircleBox[{-15.534302195739624, 1.4225889843221229}, 0.04064539955206305], CircleBox[{-16.05580690652935, 0.046112079603522316}, 0.046112079603522316], CircleBox[{-15.978919887574175, 0.03205024439711255}, 0.03205024439711255], CircleBox[{-14.250093632341496, 0.03205024439711334}, 0.03205024439711334], CircleBox[{-13.788225099390854, 0.35000000000000053}, 0.05000000000000007], CircleBox[{-13.123171801838048, 0.046112079603522135}, 0.046112079603522135], CircleBox[{-13.003400455947885, 0.07777341327737437}, 0.07777341327737437], CircleBox[{-13.111661971135437, 0.13725037123284234}, 0.04575012374428078], CircleBox[{-12.86396103067891, 0.06250000000000044}, 0.06250000000000044], CircleBox[{-13.844526892204488, 0.05132078828084551}, 0.05132078828084551], CircleBox[{-16.866768513899643, 0.03638310943170246}, 0.03638310943170246], CircleBox[{-18.103794234577492, 0.036383109431700505}, 0.036383109431700505], CircleBox[{-18.914755841947755, 0.046112079603522135}, 0.046112079603522135], CircleBox[{-18.991642860902896, 0.0320502443971133}, 0.0320502443971133], CircleBox[{-19.436260552737483, 1.4225889843221218}, 0.04064539955206044], CircleBox[{-21.182337649086286, 0.35000000000000003}, 0.05], CircleBox[{-21.858900777341685, 0.13725037123284015}, 0.04575012374428005], CircleBox[{-21.847390946639095, 0.046112079603522114}, 0.046112079603522114], CircleBox[{-21.967162292529228, 0.07777341327737415}, 0.07777341327737415], CircleBox[{-22.10660171779821, 0.06249999999999997}, 0.06249999999999997], CircleBox[{-21.12603585627265, 0.05132078828084552}, 0.05132078828084552], CircleBox[{-20.720469116135643, 0.03205024439711332}, 0.03205024439711332], CircleBox[{-29.031024512619833, 7.437902832994914}, 0.11111111111111109], CircleBox[{-29.25324673484206, 7.4379028329949115}, 0.11111111111111162], CircleBox[{-29.142135623730947, 6.931980515339458}, 0.10355339059327373], CircleBox[{-29.142135623730955, 7.193184390303208}, 0.15765048437046789], CircleBox[{-29.675763763494068, 8.762259854459751}, 0.07623259139473049], CircleBox[{-29.845923683374977, 8.810161397231349}, 0.10054115137771892], CircleBox[{-29.77690359290811, 8.64404212394683}, 0.07934599614714398], CircleBox[{-29.960583164855443, 8.922428988181716}, 0.059929433687476816], CircleBox[{-29.464920180955605, 8.12476210995526}, 0.04611207960352203], CircleBox[{-29.520213203060734, 8.041291580135244}, 0.0540110827613982], CircleBox[{-29.562536915385532, 8.139087296526009}, 0.052550161456822606], CircleBox[{-29.09795131222474, 8.699106707958665}, 0.04418431150620993], CircleBox[{-29.142135623730947, 8.627987753750183}, 0.03954238095793526], CircleBox[{-29.186319935237158, 8.699106707958663}, 0.044184311506209904], CircleBox[{-29.11008537933384, 8.27335666188303}, 0.03205024439711334], CircleBox[{-29.174185868128067, 8.273356661883028}, 0.03205024439711333], CircleBox[{-29.142135623730947, 8.328267877770575}, 0.03153009687409354], CircleBox[{-28.819351066506304, 8.12476210995525}, 0.04611207960352231], CircleBox[{-28.76405804440116, 8.041291580135242}, 0.05401108276139808], CircleBox[{-28.721734332076366, 8.139087296526009}, 0.052550161456822585], CircleBox[{-28.5073676545538, 8.644042123946834}, 0.0793459961471437], CircleBox[{-28.608507483967834, 8.762259854459751}, 0.07623259139473047], CircleBox[{-28.43834756408692, 8.810161397231349}, 0.10054115137771882], CircleBox[{-28.323688082606463, 8.922428988181718}, 0.05992943368747677], CircleBox[{-27.541251204441615, 10.055969830203043}, 0.15022110482233492], CircleBox[{-27.32478823793863, 10.23872340784526}, 0.13307218138173144], CircleBox[{-27.565829108963445, 10.329631193172812}, 0.1245417292239678], CircleBox[{-27.199326582148885, 11.009251235631694}, 0.6476030138606882], CircleBox[{-30.718442138498457, 10.32963119317281}, 0.12454172922396789], CircleBox[{-31.084944665313024, 11.009251235631698}, 0.6476030138606887], CircleBox[{-30.95948300952327, 10.238723407845255}, 0.13307218138173157], CircleBox[{-30.743020043020287, 10.055969830203038}, 0.15022110482233503], CircleBox[{-29.10213562373095, 4.862741699796961}, 0.04000000000000007], CircleBox[{-29.14213562373096, 4.959234347260243}, 0.06445492336158475], CircleBox[{-29.182135623730954, 4.862741699796957}, 0.04000000000000004], CircleBox[{-29.142135623730944, 4.724873734152918}, 0.10355339059327388], CircleBox[{-29.38061009286352, 3.849659287425688}, 0.03406778130465211], CircleBox[{-29.424290256491137, 3.9098570539625643}, 0.04030780468002646], CircleBox[{-29.452103919642568, 3.8358576619061155}, 0.03874603698895114], CircleBox[{-29.507163387699148, 3.3895435225617008}, 0.052146823424025684], CircleBox[{-29.620523833848175, 3.3487174708204215}, 0.06834117287388655], CircleBox[{-29.58226137073665, 3.4659902576697306}, 0.055015718375710156], CircleBox[{-28.777107859762772, 3.3895435225616586}, 0.05214682342402773], CircleBox[{-28.663747413613756, 3.3487174708204277}, 0.06834117287388616], CircleBox[{-28.70200987672527, 3.4659902576697257}, 0.05501571837570998], CircleBox[{-28.83216732781935, 3.8358576619061195}, 0.03874603698895069], CircleBox[{-28.903661154598385, 3.849659287425683}, 0.03406778130465208], CircleBox[{-28.859980990970765, 3.9098570539625634}, 0.040307804680026406], CircleBox[{-28.994274595277442, 4.318893332681434}, 0.049287009484503125], CircleBox[{-29.289996652184467, 4.3188933326814345}, 0.04928700948450317], CircleBox[{-32.38112905472391, 0.523459080339014}, 0.07477986861985914], CircleBox[{-31.746579875063578, 0.8050100413209919}, 0.04735353184241126], CircleBox[{-31.752044303714744, 0.9054785216270295}, 0.05326344244864877], CircleBox[{-31.84261784039709, 0.8439006927081661}, 0.056260046180544435], CircleBox[{-31.200722405480832, 1.1289024287015408}, 0.06640602521773782], CircleBox[{-31.320563270866838, 1.1946216129454836}, 0.07027185958502846], CircleBox[{-31.190663761154823, 1.280330085889911}, 0.08535533905932738], CircleBox[{-30.93092412911057, 0.07777341327737429}, 0.07777341327737429], CircleBox[{-30.874004211007566, 0.21648357340957725}, 0.07216119113652575], CircleBox[{-30.75891688103911, 0.09510477984165554}, 0.09510477984165554], CircleBox[{-31.185473795067413, 0.6315772529585407}, 0.037151603115208286], CircleBox[{-31.136146012979175, 0.6917995228004044}, 0.04069408957649428], CircleBox[{-31.109185872081216, 0.6147032026094543}, 0.04098021350729695], CircleBox[{-31.462476496575572, 0.5403533539501251}, 0.03178549140883084], CircleBox[{-31.52522799739568, 0.5549667171547984}, 0.03264510100910577], CircleBox[{-31.505821936143093, 0.49243464841919643}, 0.032828976561279755], CircleBox[{-31.55216872658255, 0.15062706892822467}, 0.05020902297607489], CircleBox[{-31.498183910229642, 0.05746459235362678}, 0.05746459235362678], CircleBox[{-31.615950425467364, 0.06033694638381484}, 0.06033694638381484], CircleBox[{-31.702795795510774, 0.031249999999999986}, 0.031249999999999986], CircleBox[{-32.277470335566086, 0.0777734132773742}, 0.0777734132773742], CircleBox[{-33.18695112358593, 0.06822746429607396}, 0.06822746429607396], CircleBox[{-32.97056274847714, 0.17157287525381007}, 0.17157287525381007], CircleBox[{-33.207588469154956, 0.20231410754236392}, 0.06743803584745464], CircleBox[{-33.36108704022843, 0.11111111111111147}, 0.11111111111111147], CircleBox[{-30.033468901310712, 2.5189853496818957}, 0.038753620764336826], CircleBox[{-30.04761414535794, 2.6099086799837785}, 0.05326344244864873], CircleBox[{-30.10971991682723, 2.5399087693776985}, 0.04031601221234453], CircleBox[{-30.410991564624336, 2.0056110033475965}, 0.040930836803012176], CircleBox[{-30.455526298592567, 2.0760046151037916}, 0.042367441124567175], CircleBox[{-30.507821048680192, 1.991624578050966}, 0.056903559372888095], CircleBox[{-29.869913932431245, 2.056764785457304}, 0.0316425351608816], CircleBox[{-29.83393514653135, 1.994010389248187}, 0.04069408957649491], CircleBox[{-29.905701869302725, 2.0043613946259367}, 0.031815260232157555], CircleBox[{-29.619727873803466, 0.06822746429607393}, 0.06822746429607393], CircleBox[{-29.50138114169685, 0.05132078828084547}, 0.05132078828084547], CircleBox[{-29.532659915482235, 0.1464466094067302}, 0.04881553646891007], CircleBox[{-29.105752514299212, 0.6185128603389085}, 0.036383109431700505], CircleBox[{-29.17851873316261, 0.6185128603389126}, 0.03638310943170066], CircleBox[{-29.14213562373095, 0.6926213672214948}, 0.04617475781476631], CircleBox[{-28.75161133197968, 0.14644660940672616}, 0.04881553646890872], CircleBox[{-28.664543373658425, 0.06822746429607379}, 0.06822746429607379], CircleBox[{-28.78289010576503, 0.051320788280845436}, 0.051320788280845436], CircleBox[{-29.385904467639616, 1.706381907360404}, 0.034824120558375936], CircleBox[{-29.142135623730987, 1.2720464445247974}, 0.03634418412928136], CircleBox[{-28.89836677982236, 1.7063819073604518}, 0.03482412055838107], CircleBox[{-28.236657102103916, 2.6099086799837767}, 0.053263442448648446], CircleBox[{-28.25080234615121, 2.5189853496818913}, 0.038753620764336756], CircleBox[{-28.174551330634696, 2.5399087693776985}, 0.04031601221234446], CircleBox[{-28.45033610093053, 1.994010389248209}, 0.040694089576494064], CircleBox[{-28.414357315030692, 2.0567647854573035}, 0.03164253516088191], CircleBox[{-28.378569378159163, 2.0043613946259375}, 0.03181526023215757], CircleBox[{-27.77645019878171, 1.9916245780509731}, 0.056903559372884695], CircleBox[{-27.873279682837573, 2.0056110033475973}, 0.04093083680301209], CircleBox[{-27.828744948869375, 2.076004615103789}, 0.042367441124567], CircleBox[{-25.903142192738, 0.5234590803390136}, 0.07477986861985908], CircleBox[{-26.532226943747165, 0.9054785216270269}, 0.05326344244864862], CircleBox[{-26.537691372398328, 0.8050100413209909}, 0.04735353184241121], CircleBox[{-26.44165340706482, 0.8439006927081651}, 0.05626004618054437], CircleBox[{-26.78608733723225, 0.05746459235362676}, 0.05746459235362676], CircleBox[{-26.668320821994538, 0.06033694638381486}, 0.06033694638381486], CircleBox[{-26.73210252087936, 0.1506270689282251}, 0.05020902297607504], CircleBox[{-26.581475451951132, 0.031249999999999986}, 0.031249999999999986], CircleBox[{-26.821794750886326, 0.5403533539501175}, 0.0317854914088305], CircleBox[{-26.75904325006623, 0.5549667171547981}, 0.032645101009105774], CircleBox[{-26.778449311318806, 0.4924346484191963}, 0.03282897656127975], CircleBox[{-27.525354366422796, 0.09510477984165593}, 0.09510477984165593], CircleBox[{-27.410267036454346, 0.21648357340957836}, 0.07216119113652612], CircleBox[{-27.35334711835134, 0.07777341327737414}, 0.07777341327737414], CircleBox[{-27.14812523448273, 0.6917995228004008}, 0.040694089576494175], CircleBox[{-27.09879745239449, 0.631577252958542}, 0.037151603115208265], CircleBox[{-27.1750853753807, 0.6147032026094543}, 0.04098021350729694], CircleBox[{-27.0835488419811, 1.1289024287015488}, 0.06640602521773807], CircleBox[{-26.96370797659507, 1.1946216129454836}, 0.0702718595850284], CircleBox[{-27.093607486307096, 1.28033008588991}, 0.08535533905932731], CircleBox[{-24.92318420723349, 0.1111111111111111}, 0.1111111111111111], CircleBox[{-25.076682778306942, 0.20231410754236342}, 0.06743803584745447], CircleBox[{-25.097320123875985, 0.06822746429607386}, 0.06822746429607386], CircleBox[{-25.313708498984752, 0.17157287525380982}, 0.17157287525380982], CircleBox[{-26.006800911895816, 0.07777341327737422}, 0.07777341327737422], CircleBox[{-41.09810934770276, 8.469181606780273}, 0.2991194744794365], CircleBox[{-40.79898987322333, 7.889087296526012}, 0.353553390593274], CircleBox[{-40.499870398743894, 8.46918160678027}, 0.2991194744794365], CircleBox[{-40.79898987322333, 10.199747468305835}, 1.457106781186548], CircleBox[{-41.011046175117656, 3.6049571322036407}, 0.21205630189433172], CircleBox[{-40.58693357132899, 3.6049571322036487}, 0.2120563018943322], CircleBox[{-40.79898987322333, 4.463669859189174}, 0.15765048437046764], CircleBox[{-40.79898987322332, 4.036893163892537}, 0.2691262109261693], CircleBox[{-38.70515355186727, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-38.015378248332105, 0.3976588035558893}, 0.3976588035558893], CircleBox[{-38.52284749830792, 0.8535533905932748}, 0.28451779686442497], CircleBox[{-37.384776310850235, 0.25000000000000006}, 0.25000000000000006], CircleBox[{-39.92719776865556, 2.1172093968074455}, 0.12454172922396761], CircleBox[{-39.82690403015934, 2.360779904583967}, 0.13886940615199808], CircleBox[{-39.66091868576563, 2.310660171779822}, 0.034517796864424584], CircleBox[{-39.66091868576562, 2.133883476483185}, 0.1422588984322123], CircleBox[{-40.970562748477136, 0.1715728752538099}, 0.1715728752538099], CircleBox[{-40.798989873223334, 0.43933982822017903}, 0.14644660940672635], CircleBox[{-40.62741699796952, 0.17157287525380985}, 0.17157287525380985], CircleBox[{-40.79898987322333, 0.04289321881345246}, 0.04289321881345246], CircleBox[{-40.89409465306498, 1.6167812573081506}, 0.09510477984165594], CircleBox[{-40.703885093381665, 1.616781257308153}, 0.09510477984165584], CircleBox[{-40.79898987322333, 1.4502357756356505}, 0.09668238504237668], CircleBox[{-41.67078197779109, 2.1172093968074566}, 0.12454172922396786], CircleBox[{-41.77107571628731, 2.360779904583965}, 0.13886940615199786], CircleBox[{-41.937061060681025, 2.3106601717798214}, 0.03451779686442457], CircleBox[{-41.93706106068103, 2.133883476483185}, 0.1422588984322123], CircleBox[{-43.07513224813873, 0.8535533905932734}, 0.28451779686442447], CircleBox[{-42.892826194579385, 0.29911947447943626}, 0.29911947447943626], CircleBox[{-43.582601498114556, 0.39765880355588895}, 0.39765880355588895], CircleBox[{-44.21320343559642, 0.2499999999999999}, 0.2499999999999999], CircleBox[{-51.45584412271571, 1.}], CircleBox[{-52.45584412271572, 2.560660171779822}, 0.853553390593274], CircleBox[{-53.45584412271571, 1.}], CircleBox[{-58.284271247461895, 5.828427124746192}, 5.828427124746192], CircleBox[{17.485281374238554, 6.466840371656666}, 0.0348598563172457], CircleBox[{20.027234517508948, 10.683483613964254}, 0.034378069392182686], CircleBox[{20.78064841666216, 11.13224032929042}, 0.04922784040393116], CircleBox[{20.868097015515573, 11.169301848853351}, 0.04575012374428017], CircleBox[{20.798269372606534, 11.220660287372926}, 0.04093083680301219], CircleBox[{20.982337649086286, 11.42371716450254}, 0.23313708498984803], CircleBox[{19.983178713415505, 11.537906757150624}, 0.1189474923417592], CircleBox[{18.942388155425117, 11.565785075668224}, 0.09106917382415934], CircleBox[{18.31791382063088, 11.537906757150624}, 0.11894749234175905], CircleBox[{14.94332823096818, 10.683483613964253}, 0.034378069392182756], CircleBox[{14.987384035061623, 11.537906757150624}, 0.11894749234175929], CircleBox[{14.172293375870595, 11.220660287372926}, 0.04093083680301231], CircleBox[{13.988225099390847, 11.423717164502532}, 0.23313708498984861], CircleBox[{14.102465732961566, 11.169301848853339}, 0.045750123744280245], CircleBox[{14.189914331814986, 11.132240329290413}, 0.04922784040393116], CircleBox[{16.02817459305202, 11.565785075668224}, 0.09106917382415934], CircleBox[{16.652648927846254, 11.537906757150623}, 0.11894749234175911], CircleBox[{12.750690570848384, 0.051320788280846}, 0.051320788280846], CircleBox[{12.622539674441578, 0.04000000000000127}, 0.04000000000000127], CircleBox[{22.348023074035524, 0.04}, 0.04], CircleBox[{22.219872177628705, 0.051320788280845485}, 0.051320788280845485], CircleBox[{29.142135623730958, 6.584349442401625}, 0.048815536468909175], CircleBox[{29.14213562373094, 6.755203820042821}, 0.07322330470336312], CircleBox[{29.37681108853925, 7.581260790054871}, 0.03352506640118449], CircleBox[{28.90746015892266, 7.581260790054858}, 0.03352506640118439], CircleBox[{30.029638134771563, 8.994346716370554}, 0.03977386865482223], CircleBox[{28.254633112690343, 8.994346716370556}, 0.03977386865482216], CircleBox[{26.367785629383647, 10.878202541781652}, 0.07306581186918472], CircleBox[{26.501381141696868, 10.803300858899107}, 0.0800943102542603], CircleBox[{26.487849425888417, 10.949174917458837}, 0.06640602521773768], CircleBox[{26.227922061357855, 11.292577554195747}, 0.3642766952966373], CircleBox[{27.15621700031066, 10.259676901993311}, 0.036796329745076184], CircleBox[{27.181641109581037, 10.326850113173421}, 0.03502724321283082], CircleBox[{27.09962009065574, 10.321683666962018}, 0.04715633003632291], CircleBox[{27.673163439479396, 10.44351908100483}, 0.03195462697050008], CircleBox[{27.678409754346458, 10.515590817548102}, 0.04030780468002646], CircleBox[{27.58483220830949, 9.863385102338999}, 0.04723314634638413], CircleBox[{27.66790648930377, 9.905952637444072}, 0.046112079603522135], CircleBox[{27.6742260366122, 9.794234051041887}, 0.06578510188862344], CircleBox[{27.727922061357855, 9.699747468305835}, 0.042893218813452476], CircleBox[{27.968452149235475, 11.142421261071124}, 0.04827249921765269], CircleBox[{27.97645019878171, 11.423717164502534}, 0.23313708498984778], CircleBox[{27.8760642588032, 11.162877461023967}, 0.04635296466515371], CircleBox[{27.90045450270564, 11.063836969029339}, 0.05564656009922352], CircleBox[{31.796421821573492, 10.949174917458834}, 0.06640602521773778], CircleBox[{31.782890105765034, 10.803300858899108}, 0.08009431025426038], CircleBox[{31.91648561807826, 10.87820254178165}, 0.07306581186918476], CircleBox[{32.05634918610405, 11.292577554195747}, 0.364276695296638], CircleBox[{31.102630137880865, 10.326850113173425}, 0.03502724321283075], CircleBox[{31.128054247151248, 10.259676901993311}, 0.03679632974507634], CircleBox[{31.184651156806158, 10.321683666962015}, 0.04715633003632295], CircleBox[{30.61636475815813, 9.90595263744407}, 0.046112079603522156], CircleBox[{30.6100452108497, 9.794234051041887}, 0.0657851018886235], CircleBox[{30.699439039152413, 9.863385102338993}, 0.04723314634638438], CircleBox[{30.556349186104047, 9.699747468305834}, 0.04289321881345255], CircleBox[{30.611107807982506, 10.443519081004826}, 0.0319546269705001], CircleBox[{30.605861493115444, 10.515590817548102}, 0.040307804680026434], CircleBox[{30.383816744756267, 11.063836969029344}, 0.055646560099223544], CircleBox[{30.408206988658698, 11.162877461023967}, 0.04635296466515372], CircleBox[{30.31581909822643, 11.142421261071126}, 0.048272499217652705], CircleBox[{30.307821048680193, 11.42371716450254}, 0.23313708498984784], CircleBox[{29.14213562373094, 5.190013877835653}, 0.034859856317244746], CircleBox[{29.142135623730965, 5.111188635650454}, 0.043965385867989024], CircleBox[{29.71028346102856, 3.2417847186986437}, 0.03342046101750733], CircleBox[{28.57398778643325, 3.241784718698535}, 0.033420461017511296], CircleBox[{31.093114802229895, 1.4225889843221229}, 0.04064539955206305], CircleBox[{30.571610091440164, 0.046112079603522316}, 0.046112079603522316], CircleBox[{30.648497110395336, 0.03205024439711255}, 0.03205024439711255], CircleBox[{32.37732336562802, 0.03205024439711334}, 0.03205024439711334], CircleBox[{32.83919189857867, 0.35000000000000053}, 0.05000000000000007], CircleBox[{33.50424519613147, 0.046112079603522135}, 0.046112079603522135], CircleBox[{33.624016542021636, 0.07777341327737437}, 0.07777341327737437], CircleBox[{33.515755026834086, 0.13725037123284234}, 0.04575012374428078], CircleBox[{33.76345596729061, 0.06250000000000044}, 0.06250000000000044], CircleBox[{32.78289010576503, 0.05132078828084551}, 0.05132078828084551], CircleBox[{29.760648484069872, 0.03638310943170246}, 0.03638310943170246], CircleBox[{28.523622763392023, 0.036383109431700505}, 0.036383109431700505], CircleBox[{27.712661156021763, 0.046112079603522135}, 0.046112079603522135], CircleBox[{27.635774137066626, 0.0320502443971133}, 0.0320502443971133], CircleBox[{27.191156445232036, 1.4225889843221218}, 0.04064539955206044], CircleBox[{25.44507934888324, 0.35000000000000003}, 0.05], CircleBox[{24.768516220627834, 0.13725037123284015}, 0.04575012374428005], CircleBox[{24.78002605133043, 0.046112079603522114}, 0.046112079603522114], CircleBox[{24.660254705440288, 0.07777341327737415}, 0.07777341327737415], CircleBox[{24.52081528017131, 0.06249999999999997}, 0.06249999999999997], CircleBox[{25.501381141696868, 0.05132078828084552}, 0.05132078828084552], CircleBox[{25.906947881833876, 0.03205024439711332}, 0.03205024439711332], CircleBox[{40.91010098433444, 7.437902832994914}, 0.11111111111111109], CircleBox[{40.68787876211221, 7.4379028329949115}, 0.11111111111111162], CircleBox[{40.798989873223334, 6.931980515339458}, 0.10355339059327373], CircleBox[{40.79898987322333, 7.193184390303208}, 0.15765048437046789], CircleBox[{40.26536173346022, 8.762259854459751}, 0.07623259139473049], CircleBox[{40.095201813579294, 8.810161397231349}, 0.10054115137771892], CircleBox[{40.16422190404618, 8.64404212394683}, 0.07934599614714398], CircleBox[{39.98054233209884, 8.922428988181716}, 0.059929433687476816], CircleBox[{40.476205315998676, 8.12476210995526}, 0.04611207960352203], CircleBox[{40.42091229389354, 8.041291580135244}, 0.0540110827613982], CircleBox[{40.37858858156874, 8.139087296526009}, 0.052550161456822606], CircleBox[{40.843174184729534, 8.699106707958665}, 0.04418431150620993], CircleBox[{40.79898987322332, 8.627987753750183}, 0.03954238095793526], CircleBox[{40.75480556171712, 8.699106707958663}, 0.044184311506209904], CircleBox[{40.83104011762044, 8.27335666188303}, 0.03205024439711334], CircleBox[{40.766939628826215, 8.273356661883028}, 0.03205024439711333], CircleBox[{40.79898987322332, 8.328267877770575}, 0.03153009687409354], CircleBox[{41.12177443044798, 8.12476210995525}, 0.04611207960352231], CircleBox[{41.17706745255312, 8.041291580135242}, 0.05401108276139808], CircleBox[{41.219391164877905, 8.139087296526009}, 0.052550161456822585], CircleBox[{41.43375784240048, 8.644042123946834}, 0.0793459961471437], CircleBox[{41.33261801298644, 8.762259854459751}, 0.07623259139473047], CircleBox[{41.50277793286737, 8.810161397231349}, 0.10054115137771882], CircleBox[{41.61743741434781, 8.922428988181718}, 0.05992943368747677], CircleBox[{42.39987429251267, 10.055969830203043}, 0.15022110482233492], CircleBox[{42.61633725901564, 10.23872340784526}, 0.13307218138173144], CircleBox[{42.375296387990836, 10.329631193172812}, 0.1245417292239678], CircleBox[{42.74179891480539, 11.009251235631694}, 0.6476030138606882], CircleBox[{39.22268335845582, 10.32963119317281}, 0.12454172922396789], CircleBox[{38.85618083164127, 11.009251235631698}, 0.6476030138606887], CircleBox[{38.98164248743101, 10.238723407845255}, 0.13307218138173157], CircleBox[{39.19810545393398, 10.055969830203038}, 0.15022110482233503], CircleBox[{40.83898987322333, 4.862741699796961}, 0.04000000000000007], CircleBox[{40.79898987322332, 4.959234347260243}, 0.06445492336158475], CircleBox[{40.75898987322332, 4.862741699796957}, 0.04000000000000004], CircleBox[{40.798989873223334, 4.724873734152918}, 0.10355339059327388], CircleBox[{40.560515404090765, 3.849659287425688}, 0.03406778130465211], CircleBox[{40.516835240463145, 3.9098570539625643}, 0.04030780468002646], CircleBox[{40.48902157731172, 3.8358576619061155}, 0.03874603698895114], CircleBox[{40.43396210925513, 3.3895435225617008}, 0.052146823424025684], CircleBox[{40.320601663106096, 3.3487174708204215}, 0.06834117287388655], CircleBox[{40.35886412621763, 3.4659902576697306}, 0.055015718375710156], CircleBox[{41.164017637191506, 3.3895435225616586}, 0.05214682342402773], CircleBox[{41.27737808334052, 3.3487174708204277}, 0.06834117287388616], CircleBox[{41.239115620229015, 3.4659902576697257}, 0.05501571837570998], CircleBox[{41.10895816913494, 3.8358576619061195}, 0.03874603698895069], CircleBox[{41.03746434235588, 3.849659287425683}, 0.03406778130465208], CircleBox[{41.08114450598352, 3.9098570539625634}, 0.040307804680026406], CircleBox[{40.94685090167684, 4.318893332681434}, 0.049287009484503125], CircleBox[{40.65112884476982, 4.3188933326814345}, 0.04928700948450317], CircleBox[{37.55999644223037, 0.523459080339014}, 0.07477986861985914], CircleBox[{38.1945456218907, 0.8050100413209919}, 0.04735353184241126], CircleBox[{38.18908119323954, 0.9054785216270295}, 0.05326344244864877], CircleBox[{38.09850765655718, 0.8439006927081661}, 0.056260046180544435], CircleBox[{38.74040309147345, 1.1289024287015408}, 0.06640602521773782], CircleBox[{38.620562226087436, 1.1946216129454836}, 0.07027185958502846], CircleBox[{38.75046173579945, 1.280330085889911}, 0.08535533905932738], CircleBox[{39.010201367843706, 0.07777341327737429}, 0.07777341327737429], CircleBox[{39.06712128594671, 0.21648357340957725}, 0.07216119113652575], CircleBox[{39.182208615915165, 0.09510477984165554}, 0.09510477984165554], CircleBox[{38.755651701886855, 0.6315772529585407}, 0.037151603115208286], CircleBox[{38.8049794839751, 0.6917995228004044}, 0.04069408957649428], CircleBox[{38.831939624873065, 0.6147032026094543}, 0.04098021350729695], CircleBox[{38.4786490003787, 0.5403533539501251}, 0.03178549140883084], CircleBox[{38.415897499558604, 0.5549667171547984}, 0.03264510100910577], CircleBox[{38.43530356081118, 0.49243464841919643}, 0.032828976561279755], CircleBox[{38.38895677037173, 0.15062706892822467}, 0.05020902297607489], CircleBox[{38.44294158672462, 0.05746459235362678}, 0.05746459235362678], CircleBox[{38.32517507148692, 0.06033694638381484}, 0.06033694638381484], CircleBox[{38.23832970144351, 0.031249999999999986}, 0.031249999999999986], CircleBox[{37.66365516138819, 0.0777734132773742}, 0.0777734132773742], CircleBox[{36.75417437336835, 0.06822746429607396}, 0.06822746429607396], CircleBox[{36.97056274847714, 0.17157287525381007}, 0.17157287525381007], CircleBox[{36.73353702779933, 0.20231410754236392}, 0.06743803584745464], CircleBox[{36.580038456725845, 0.11111111111111147}, 0.11111111111111147], CircleBox[{39.90765659564357, 2.5189853496818957}, 0.038753620764336826], CircleBox[{39.89351135159634, 2.6099086799837785}, 0.05326344244864873], CircleBox[{39.831405580127054, 2.5399087693776985}, 0.04031601221234453], CircleBox[{39.53013393232994, 2.0056110033475965}, 0.040930836803012176], CircleBox[{39.48559919836171, 2.0760046151037916}, 0.042367441124567175], CircleBox[{39.433304448274086, 1.991624578050966}, 0.056903559372888095], CircleBox[{40.071211564523026, 2.056764785457304}, 0.0316425351608816], CircleBox[{40.10719035042292, 1.994010389248187}, 0.04069408957649491], CircleBox[{40.03542362765155, 2.0043613946259367}, 0.031815260232157555], CircleBox[{40.321397623150816, 0.06822746429607393}, 0.06822746429607393], CircleBox[{40.439744355257425, 0.05132078828084547}, 0.05132078828084547], CircleBox[{40.40846558147204, 0.1464466094067302}, 0.04881553646891007], CircleBox[{40.83537298265506, 0.6185128603389085}, 0.036383109431700505], CircleBox[{40.76260676379167, 0.6185128603389126}, 0.03638310943170066], CircleBox[{40.79898987322333, 0.6926213672214948}, 0.04617475781476631], CircleBox[{41.189514164974604, 0.14644660940672616}, 0.04881553646890872], CircleBox[{41.27658212329585, 0.06822746429607379}, 0.06822746429607379], CircleBox[{41.15823539118925, 0.051320788280845436}, 0.051320788280845436], CircleBox[{40.55522102931466, 1.706381907360404}, 0.034824120558375936], CircleBox[{40.79898987322329, 1.2720464445247974}, 0.03634418412928136], CircleBox[{41.04275871713192, 1.7063819073604518}, 0.03482412055838107], CircleBox[{41.70446839485036, 2.6099086799837767}, 0.053263442448648446], CircleBox[{41.69032315080307, 2.5189853496818913}, 0.038753620764336756], CircleBox[{41.76657416631959, 2.5399087693776985}, 0.04031601221234446], CircleBox[{41.490789396023736, 1.994010389248209}, 0.040694089576494064], CircleBox[{41.52676818192358, 2.0567647854573035}, 0.03164253516088191], CircleBox[{41.56255611879511, 2.0043613946259375}, 0.03181526023215757], CircleBox[{42.16467529817257, 1.9916245780509731}, 0.056903559372884695], CircleBox[{42.0678458141167, 2.0056110033475973}, 0.04093083680301209], CircleBox[{42.11238054808491, 2.076004615103789}, 0.042367441124567], CircleBox[{44.03798330421628, 0.5234590803390136}, 0.07477986861985908], CircleBox[{43.408898553207116, 0.9054785216270269}, 0.05326344244864862], CircleBox[{43.40343412455595, 0.8050100413209909}, 0.04735353184241121], CircleBox[{43.499472089889466, 0.8439006927081651}, 0.05626004618054437], CircleBox[{43.15503815972203, 0.05746459235362676}, 0.05746459235362676], CircleBox[{43.27280467495974, 0.06033694638381486}, 0.06033694638381486], CircleBox[{43.20902297607492, 0.1506270689282251}, 0.05020902297607504], CircleBox[{43.35965004500314, 0.031249999999999986}, 0.031249999999999986], CircleBox[{43.119330746067966, 0.5403533539501175}, 0.0317854914088305], CircleBox[{43.18208224688806, 0.5549667171547981}, 0.032645101009105774], CircleBox[{43.162676185635476, 0.4924346484191963}, 0.03282897656127975], CircleBox[{42.41577113053148, 0.09510477984165593}, 0.09510477984165593], CircleBox[{42.530858460499935, 0.21648357340957836}, 0.07216119113652612], CircleBox[{42.58777837860294, 0.07777341327737414}, 0.07777341327737414], CircleBox[{42.793000262471544, 0.6917995228004008}, 0.040694089576494175], CircleBox[{42.84232804455978, 0.631577252958542}, 0.037151603115208265], CircleBox[{42.76604012157358, 0.6147032026094543}, 0.04098021350729694], CircleBox[{42.85757665497318, 1.1289024287015488}, 0.06640602521773807], CircleBox[{42.977417520359204, 1.1946216129454836}, 0.0702718595850284], CircleBox[{42.847518010647185, 1.28033008588991}, 0.08535533905932731], CircleBox[{45.01794128972079, 0.1111111111111111}, 0.1111111111111111], CircleBox[{44.86444271864733, 0.20231410754236342}, 0.06743803584745447], CircleBox[{44.8438053730783, 0.06822746429607386}, 0.06822746429607386], CircleBox[{44.62741699796951, 0.17157287525380982}, 0.17157287525380982], CircleBox[{43.934324585058455, 0.07777341327737422}, 0.07777341327737422], CircleBox[{52.156724648236285, 8.469181606780273}, 0.2991194744794365], CircleBox[{52.4558441227157, 7.889087296526012}, 0.353553390593274], CircleBox[{52.75496359719514, 8.46918160678027}, 0.2991194744794365], CircleBox[{52.4558441227157, 10.199747468305835}, 1.457106781186548], CircleBox[{52.243787820821375, 3.6049571322036407}, 0.21205630189433172], CircleBox[{52.667900424610046, 3.6049571322036487}, 0.2120563018943322], CircleBox[{52.45584412271571, 4.463669859189174}, 0.15765048437046764], CircleBox[{52.45584412271572, 4.036893163892537}, 0.2691262109261693], CircleBox[{54.54968044407176, 0.29911947447943626}, 0.29911947447943626], CircleBox[{55.23945574760693, 0.3976588035558893}, 0.3976588035558893], CircleBox[{54.73198649763112, 0.8535533905932748}, 0.28451779686442497], CircleBox[{55.87005768508881, 0.25000000000000006}, 0.25000000000000006], CircleBox[{53.327636227283485, 2.1172093968074455}, 0.12454172922396761], CircleBox[{53.427929965779704, 2.360779904583967}, 0.13886940615199808], CircleBox[{53.5939153101734, 2.310660171779822}, 0.034517796864424584], CircleBox[{53.59391531017341, 2.133883476483185}, 0.1422588984322123], CircleBox[{52.284271247461895, 0.1715728752538099}, 0.1715728752538099], CircleBox[{52.4558441227157, 0.43933982822017903}, 0.14644660940672635], CircleBox[{52.62741699796952, 0.17157287525380985}, 0.17157287525380985], CircleBox[{52.45584412271571, 0.04289321881345246}, 0.04289321881345246], CircleBox[{52.36073934287405, 1.6167812573081506}, 0.09510477984165594], CircleBox[{52.55094890255736, 1.616781257308153}, 0.09510477984165584], CircleBox[{52.45584412271572, 1.4502357756356505}, 0.09668238504237668], CircleBox[{51.58405201814795, 2.1172093968074566}, 0.12454172922396786], CircleBox[{51.48375827965173, 2.360779904583965}, 0.13886940615199786], CircleBox[{51.317772935258006, 2.3106601717798214}, 0.03451779686442457], CircleBox[{51.317772935258006, 2.133883476483185}, 0.1422588984322123], CircleBox[{50.17970174780031, 0.8535533905932734}, 0.28451779686442447], CircleBox[{50.362007801359645, 0.29911947447943626}, 0.29911947447943626], CircleBox[{49.67223249782448, 0.39765880355588895}, 0.39765880355588895], CircleBox[{49.04163056034262, 0.2499999999999999}, 0.2499999999999999], CircleBox[{65.11269837220809, 1.}], CircleBox[{69.94112549695427, 5.828427124746191}, 5.828427124746191], CircleBox[{64.11269837220809, 2.560660171779822}, 0.853553390593274], CircleBox[{63.11269837220809, 1.}]}, {RGBColor[1, 0, 0], CircleBox[{5.828427124746192, 11.656854249492383}, 5.828427124746192], CircleBox[{5.828427124746191, 4.306019374818707}, 1.522407749927483], CircleBox[{9.242640687119286, 0.}, 2.4142135623730954], CircleBox[{6.966498312203889, 2.276142374915397}, 0.8047378541243652], CircleBox[{5.828427124746191, 0}], CircleBox[{5.828427124746189, 1.546918160678027}, 0.546918160678027], CircleBox[{4.690355937288492, 2.2761423749153966}, 0.8047378541243649], CircleBox[{2.414213562373095, 0.}, 2.414213562373095], TagBox[ConicHullRegionBox[{0, 0}, {{0, -1}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{11.65685424949238, 0.}, {{0, 1}}], "InfiniteLine"]}, {RGBColor[0, 0, 1], CircleBox[{4.82842712474619, 1}], CircleBox[{0., 5.828427124746191}, 5.828427124746191], CircleBox[{5.828427124746192, 2.560660171779822}, 0.853553390593274], CircleBox[{6.828427124746191, 1}], CircleBox[{11.656854249492383, 5.828427124746192}, 5.828427124746192], TagBox[ConicHullRegionBox[{0., 11.656854249492383`}, {{-1, 0}}], "InfiniteLine"], TagBox[ConicHullRegionBox[{0, 0}, {{1, 0}}], "InfiniteLine"]}}, PlotRange->{{-11.65685424949238, 23.31370849898476}, {-6.99411254969543, 18.650966799187813`}}, PlotRangeClipping->True]}, { TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ { RowBox[{"12", "+", RowBox[{"8", " ", SqrtBox["2"]}]}], "1", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "1"}, {"0", RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "0", "1"}, { RowBox[{"8", " ", RowBox[{"(", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{"4", "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "3"}, { RowBox[{"8", " ", RowBox[{"(", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], ")"}]}], "1", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "1"}, { RowBox[{"12", "+", RowBox[{"8", " ", SqrtBox["2"]}]}], RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "2", "1"}, { RowBox[{"12", "+", RowBox[{"8", " ", SqrtBox["2"]}]}], "0", "0", "1"}, {"0", "0", "0", RowBox[{"-", "1"}]}, { RowBox[{"12", "+", RowBox[{"8", " ", SqrtBox["2"]}]}], RowBox[{"3", "-", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", "2"}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "5"}], "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox["2"]}]}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["2"]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "0"}, { RowBox[{"8", " ", RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["2"]}], ")"}]}], RowBox[{"3", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox["2"]}]}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}]}], "1", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "0"}, { RowBox[{"8", " ", RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox["2"]}]}, { RowBox[{"4", " ", RowBox[{"(", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["2"]}], ")"}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox["2"]}]}, {"0", RowBox[{ RowBox[{"-", "1"}], "+", SqrtBox["2"]}], "1", "0"}, {"0", "0", RowBox[{"-", "1"}], "0"}, { RowBox[{"12", "+", RowBox[{"8", " ", SqrtBox["2"]}]}], "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[{"3", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "0", "0", RowBox[{"5", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{"4", "+", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["2"]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}]}, {"0", RowBox[{"5", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"3", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"4", "+", SqrtBox["2"]}], RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["2"]}]}, {"0", "0", "0", "0", "1", "0", "0"}, {"0", "0", "0", "0", "0", "1", "0"}, {"0", "2", "0", "0", "2", "2", 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[{"10", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"3", " ", RowBox[{"(", RowBox[{"3", "+", SqrtBox["2"]}], ")"}]}], RowBox[{ RowBox[{"-", "3"}], " ", SqrtBox["2"]}], RowBox[{"2", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"1", "+", SqrtBox["2"]}]}, {"0", RowBox[{"3", " ", RowBox[{"(", RowBox[{"3", "+", SqrtBox["2"]}], ")"}]}], "0", "0", RowBox[{"10", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], " ", SqrtBox["2"]}], RowBox[{"2", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"0", "0", "0", "0", "1", "0", "0"}, {"0", RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}]}, {"0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}]}], RowBox[{ RowBox[{"-", "2"}], " ", SqrtBox["2"]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"2", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"3", " ", RowBox[{"(", RowBox[{"3", "+", SqrtBox["2"]}], ")"}]}], RowBox[{ RowBox[{"-", "3"}], " ", SqrtBox["2"]}], RowBox[{"10", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}]}], RowBox[{ RowBox[{"-", "2"}], " ", SqrtBox["2"]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}]}]}, {"0", RowBox[{"2", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"10", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], " ", SqrtBox["2"]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{"3", "+", SqrtBox["2"]}], ")"}]}]}, {"0", RowBox[{"1", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", "0", "0", "0", "1", "0", "0"}, {"0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", "0", RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"17", "+", RowBox[{"7", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "7"}], " ", SqrtBox["2"]}], RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"9", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"16", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "6"}], " ", SqrtBox["2"]}], RowBox[{"8", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"1", "+", SqrtBox["2"]}]}, {"0", RowBox[{"1", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", "0", "0", "0", "1", "0", "0"}, {"0", RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"50", "+", RowBox[{"36", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "17"}], "-", RowBox[{"12", " ", SqrtBox["2"]}]}], RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"8", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"16", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "6"}], " ", SqrtBox["2"]}], RowBox[{"9", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", RowBox[{"9", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"8", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "6"}], " ", SqrtBox["2"]}], RowBox[{"16", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "7"}], " ", SqrtBox["2"]}], RowBox[{"17", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"1", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", RowBox[{"8", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"9", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "6"}], " ", SqrtBox["2"]}], RowBox[{"16", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "17"}], "-", RowBox[{"12", " ", SqrtBox["2"]}]}], RowBox[{"50", "+", RowBox[{"36", " ", SqrtBox["2"]}]}]}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", RowBox[{"17", "+", RowBox[{"10", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "10"}], " ", SqrtBox["2"]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}]}], ")"}]}]}, {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"1", "+", SqrtBox["2"]}]}, {"0", RowBox[{"1", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}]}], ")"}]}], "0", "0", RowBox[{"17", "+", RowBox[{"10", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "10"}], " ", SqrtBox["2"]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}]}], ")"}]}]}, {"0", RowBox[{"98", "+", RowBox[{"70", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"98", "+", RowBox[{"70", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "49"}], "-", RowBox[{"30", " ", SqrtBox["2"]}]}], RowBox[{"98", "+", RowBox[{"70", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}]}], ")"}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"8", "+", RowBox[{"5", " ", SqrtBox["2"]}]}], ")"}]}], RowBox[{ RowBox[{"-", "10"}], " ", SqrtBox["2"]}], RowBox[{"17", "+", RowBox[{"10", " ", SqrtBox["2"]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"1", "+", SqrtBox["2"]}]}, {"0", RowBox[{"17", "+", RowBox[{"7", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "7"}], " ", SqrtBox["2"]}], RowBox[{"10", "+", RowBox[{"7", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"16", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"9", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "6"}], " ", SqrtBox["2"]}], RowBox[{"8", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"50", "+", RowBox[{"36", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "17"}], "-", RowBox[{"12", " ", SqrtBox["2"]}]}], RowBox[{"34", "+", RowBox[{"24", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"16", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"8", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "6"}], " ", SqrtBox["2"]}], RowBox[{"9", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"2", "+", SqrtBox["2"]}], "0", "0", RowBox[{"1", "+", SqrtBox["2"]}], RowBox[{"-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"10", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"2", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], " ", SqrtBox["2"]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{"3", "+", SqrtBox["2"]}], ")"}]}]}, {"0", RowBox[{"3", " ", RowBox[{"(", RowBox[{"3", "+", SqrtBox["2"]}], ")"}]}], "0", "0", RowBox[{"2", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "3"}], " ", SqrtBox["2"]}], RowBox[{"10", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}]}], "0", "0", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{ RowBox[{"-", "2"}], " ", SqrtBox["2"]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"4", "+", SqrtBox["2"]}], ")"}]}]}, {"0", RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], RowBox[{ RowBox[{"-", "1"}], "-", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}]}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"0", "1", "0", "0", "0", "0", "0"}, {"0", RowBox[{"3", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "0", "0", RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["2"]}], RowBox[{"4", "+", SqrtBox["2"]}], RowBox[{"5", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"5", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], "0", "0", RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["2"]}], RowBox[{"4", "+", SqrtBox["2"]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]}, {"0", "2", "0", "0", RowBox[{"-", "1"}], "2", "2"}, {"0", "0", "0", "0", "0", "1", "0"}, {"0", "0", "0", "0", "0", "0", "1"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]], ",", "\<\"nonintegral\"\>"}], "}"}], ",", RowBox[{"{", RowBox[{ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"0", RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["2"]}], "0", "0", RowBox[{"5", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{"4", "+", SqrtBox["2"]}], RowBox[{"3", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]}, {"0", RowBox[{"-", "1"}], "0", "0", "2", "2", "2"}, {"0", RowBox[{ RowBox[{"-", "2"}], "-", SqrtBox["2"]}], "0", "0", RowBox[{"3", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"4", "+", SqrtBox["2"]}], RowBox[{"5", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{ RowBox[{"-", "1"}], "-", SqrtBox["2"]}], "0", "0", RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}], RowBox[{"2", "+", SqrtBox["2"]}], RowBox[{"4", "+", RowBox[{"3", " ", SqrtBox["2"]}]}]}, {"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", "1", "3", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "1", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]}, {"1", RowBox[{"-", "1"}], "1", "3", "1", "1", "1", "0", "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", "0", "2"}, {"1", "1", RowBox[{"-", "1"}], "1", "1", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "3", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", RowBox[{"2", " ", SqrtBox["2"]}], "0", RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}]}, {"1", "3", "1", RowBox[{"-", "1"}], "1", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "1", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", "0", "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}]}, {"3", "1", "1", "1", RowBox[{"-", "1"}], "1", "1", "0", "0", "0", "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], "2", "0"}, { RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "1", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}], "1", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", "0"}, {"1", "1", "3", "1", "1", "1", RowBox[{"-", "1"}], "2", RowBox[{"2", " ", SqrtBox["2"]}], "0", RowBox[{"2", " ", SqrtBox["2"]}], "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", "0"}, { RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "0", "0", "2", RowBox[{"-", "1"}], "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", "1"}, { RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", RowBox[{"2", " ", SqrtBox["2"]}], "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", SqrtBox["2"]}], "1", RowBox[{"-", "1"}], "3", "1", "5", "3", "1", "3", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]}, { RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "3", RowBox[{"-", "1"}], "1", "1", "3", "5", "3", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1"}, { RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", "0", RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", "1", RowBox[{"-", "1"}], "3", "1", "3", "5", RowBox[{"3", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "0", RowBox[{"3", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "5", "1", "3", RowBox[{"-", "1"}], "1", "3", "1", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]}, {"0", RowBox[{"2", " ", SqrtBox["2"]}], "0", "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"10", "+", RowBox[{"6", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], "3", "3", "1", "1", RowBox[{"-", "1"}], "1", "3", RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]}, {"0", "0", "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"6", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", "5", "3", "3", "1", RowBox[{"-", "1"}], "1", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"4", " ", SqrtBox["2"]}]}]}, {"0", "0", RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", SqrtBox["2"]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "3", "3", "5", "1", "3", "1", RowBox[{"-", "1"}], "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}]}, { RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "2", "0", "0", "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}], "1"}, { RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], "2", RowBox[{"2", " ", RowBox[{"(", RowBox[{"2", "+", SqrtBox["2"]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "+", SqrtBox["2"]}], ")"}]}], "0", "0", "0", "1", RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], RowBox[{"5", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"3", "+", RowBox[{"4", " ", SqrtBox["2"]}]}], RowBox[{"1", "+", RowBox[{"2", " ", SqrtBox["2"]}]}], "1", RowBox[{"-", "1"}]} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"]], "Output", CellChangeTimes->{3.7390166613217773`*^9, 3.7390168470110493`*^9, 3.7390184344928455`*^9, 3.7390188280639668`*^9, 3.7390192755080724`*^9, 3.7390207038298035`*^9, 3.739021291945066*^9, 3.7390218502068453`*^9, 3.739031039915631*^9, 3.7390312922889347`*^9, 3.739031509182435*^9, 3.7390317054682884`*^9, 3.73903217574549*^9, 3.7390326068399267`*^9, 3.739032825642186*^9, 3.7391252973505683`*^9}, CellLabel-> "Out[660]=",ExpressionUUID->"fe6e0d7a-abe6-4fa4-83cb-383b4504b650"] }, Open ]], Cell[BoxData[""], "Input", CellChangeTimes->{{3.7390166395130324`*^9, 3.7390166401842403`*^9}},ExpressionUUID->"888d11c5-c159-427d-a4a3-\ ed987725c9c9"] }, WindowSize->{1218, 661}, WindowMargins->{{-8, 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, 65, "Input",ExpressionUUID->"748eabe5-c3d2-4801-b8b7-aa7a789097c7"], Cell[1225, 40, 695, 18, 62, "Input",ExpressionUUID->"0ab29ce4-3405-44f4-bf4a-16ef730ff686"], Cell[1923, 60, 9875, 235, 876, "Input",ExpressionUUID->"72e544ec-21b3-4511-8714-78e40bf96f8f"], Cell[11801, 297, 35696, 782, 2460, "Input",ExpressionUUID->"34558bf5-30de-4efd-a85d-1e42927d2f41"], Cell[47500, 1081, 13766, 317, 1028, "Input",ExpressionUUID->"1669407f-19e4-41f4-83d2-404c097a4b8c"], Cell[61269, 1400, 1572, 43, 108, "Input",ExpressionUUID->"0ca661cb-0814-4baa-8045-ccb6be11fd34"], Cell[62844, 1445, 16048, 333, 1020, "Input",ExpressionUUID->"8eb99bd7-ecdf-447b-9254-91418df0046a"], Cell[78895, 1780, 13582, 313, 1010, "Input",ExpressionUUID->"df3b60f9-0301-4a00-901e-3f42ad1f6dcc"], Cell[92480, 2095, 3768, 87, 348, "Input",ExpressionUUID->"94e58c8f-e9bc-4bc5-9f72-1e7d65b723b4"], Cell[96251, 2184, 397, 13, 94, "Input",ExpressionUUID->"e0269727-13f8-41e1-9bed-e3d214f9ade5"], Cell[96651, 2199, 682, 20, 70, "Input",ExpressionUUID->"335fc47c-61a3-4d42-b8dc-1a6e429b3dbb"], Cell[97336, 2221, 4976, 131, 514, "Input",ExpressionUUID->"8f83b82e-c1db-40d9-ac4c-a723737f7704"], Cell[102315, 2354, 1032, 29, 34, "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, 204, "Input",ExpressionUUID->"affbea28-f93e-449d-873a-65b52e624ef9"], Cell[110597, 2565, 1188, 32, 60, "Input",ExpressionUUID->"15495297-a588-42f2-9830-ff3a5a9d76a4"], Cell[111788, 2599, 934, 26, 84, "Input",ExpressionUUID->"cd35cdcc-79cb-420e-8b24-2c510cf42e01"], Cell[112725, 2627, 6785, 173, 468, "Input",ExpressionUUID->"80221e6e-fcc3-4461-a419-6059d3441ea7"], Cell[119513, 2802, 7713, 154, 420, "Input",ExpressionUUID->"b49300f9-4eb0-4e74-b00e-238ad2cc61d5"], Cell[127229, 2958, 3749, 87, 324, "Input",ExpressionUUID->"b43a5c15-ff8f-4841-a157-1d63bba9b7c4"], Cell[CellGroupData[{ Cell[131003, 3049, 4744, 78, 60, "Input",ExpressionUUID->"8c0d00eb-3a38-4d87-9e21-66e5a04e235e"], Cell[135750, 3129, 200402, 4609, 3370, "Output",ExpressionUUID->"fe6e0d7a-abe6-4fa4-83cb-383b4504b650"] }, Open ]], Cell[336167, 7741, 156, 3, 35, "Input",ExpressionUUID->"888d11c5-c159-427d-a4a3-ed987725c9c9"] } ] *)