(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 7.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 439903, 7905] NotebookOptionsPosition[ 437991, 7840] NotebookOutlinePosition[ 438368, 7857] CellTagsIndexPosition[ 438325, 7854] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"Chinese", " ", "Window", " ", "Lattice"}], " ", "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.569095872853571*^9, 3.5690958819811773`*^9}, { 3.569095928544022*^9, 3.569096049419129*^9}, {3.569096114732489*^9, 3.569096126654977*^9}, {3.56909616418988*^9, 3.569096227512899*^9}, { 3.569096263824181*^9, 3.5690962643201017`*^9}, {3.569096349832447*^9, 3.569096470863332*^9}, {3.5690967703540792`*^9, 3.569096791622985*^9}, { 3.569098829759396*^9, 3.569098858973378*^9}, {3.5690994409905024`*^9, 3.5690994733558693`*^9}, 3.569100040000037*^9, {3.5691001173463373`*^9, 3.5691001757894783`*^9}, {3.569102180871729*^9, 3.569102190666472*^9}, { 3.5691022236917458`*^9, 3.569102224587019*^9}, {3.5691022774827642`*^9, 3.56910234827354*^9}, {3.569102507257741*^9, 3.569102518875256*^9}, { 3.5691026377642527`*^9, 3.5691026402668123`*^9}, {3.5691027356558332`*^9, 3.5691027432268963`*^9}, {3.569102782599948*^9, 3.569102825580646*^9}, { 3.5691032772286367`*^9, 3.56910333988756*^9}, {3.5691034167496147`*^9, 3.5691034882427483`*^9}, 3.5692767001256447`*^9}], Cell[BoxData[{ RowBox[{ RowBox[{"CC", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"DD", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"CC", "[", RowBox[{"[", "jj", "]"}], "]"}], "+", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "CC", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"II", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"AL", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"AR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"BD", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"BU", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"RR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"SS", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"XX", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"YY", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"TT", "=", RowBox[{"{", RowBox[{ "AL", ",", "AR", ",", "BD", ",", "BU", ",", "RR", ",", "SS", ",", "XX", ",", "YY", ",", "II"}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{"W0", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", "9", "]"}], "]"}], "[", RowBox[{"DD", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "DD", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"T0", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"AbsoluteThickness", "[", "3", "]"}], ",", RowBox[{"Line", "[", "W0", "]"}]}], "}"}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"B0", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "1", ",", "0"}], "]"}], ",", RowBox[{"Polygon", "[", "W0", "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OM", "=", RowBox[{"{", RowBox[{"B0", ",", "T0"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nn", "=", "24"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RN", "=", RowBox[{"{", "9", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"WW", "=", "W0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"VV", "=", "WW"}], ";", RowBox[{"rr", "=", RowBox[{"8", "*", RowBox[{"Random", "[", "]"}]}]}], ";", RowBox[{"ss", "=", RowBox[{"1", "+", RowBox[{"Floor", "[", "rr", "]"}]}]}], ";", RowBox[{"WW", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", "ss", "]"}], "]"}], "[", RowBox[{"VV", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "VV", "]"}]}], "}"}]}], "]"}]}], ";", RowBox[{"BA", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", "0.8", "]"}], ",", RowBox[{"Polygon", "[", "WW", "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "BA"}], "]"}]}], ";", " ", RowBox[{"TW", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"AbsoluteThickness", "[", "3", "]"}], ",", RowBox[{"Line", "[", "WW", "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "TW"}], "]"}]}], ";", RowBox[{"RN", "=", RowBox[{"Append", "[", RowBox[{"RN", ",", "ss"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", "nn"}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OO", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "0.8"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AA", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "OO"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5691895621810207`*^9, 3.5691896304939737`*^9}, { 3.569189689973783*^9, 3.569189699449418*^9}, {3.569189833075899*^9, 3.569189839295191*^9}, {3.569189933576009*^9, 3.569189963232172*^9}, 3.569189999414619*^9, {3.56919007570163*^9, 3.569190089374713*^9}, { 3.5691901349214773`*^9, 3.569190164531541*^9}, {3.569190218171194*^9, 3.569190280597492*^9}, {3.5691903508696327`*^9, 3.569190418590394*^9}, { 3.569190449681917*^9, 3.569190498764385*^9}, {3.5691905761583557`*^9, 3.5691905892415648`*^9}, {3.569191309605033*^9, 3.569191363068797*^9}, { 3.5691921052006197`*^9, 3.5691921094526997`*^9}, {3.569192308277997*^9, 3.569192342460762*^9}, {3.5691929439360123`*^9, 3.569192950759523*^9}, { 3.569193165982074*^9, 3.569193173113134*^9}, {3.569193227162486*^9, 3.569193267221627*^9}, {3.569193347154641*^9, 3.569193378983679*^9}, { 3.569193415955845*^9, 3.569193432968062*^9}, {3.569193519771933*^9, 3.569193529192851*^9}, {3.569193650319289*^9, 3.56919365054558*^9}, { 3.569193736198901*^9, 3.569193795940599*^9}, {3.569193927713581*^9, 3.569193928487501*^9}, {3.56919399289904*^9, 3.569193993302128*^9}, { 3.569194074939762*^9, 3.5691940776632767`*^9}, {3.569194326062118*^9, 3.569194384628545*^9}, {3.569194416679089*^9, 3.569194457359954*^9}, { 3.56919450583011*^9, 3.569194506552959*^9}, {3.569194680846031*^9, 3.5691947299213552`*^9}, {3.5691947925292664`*^9, 3.569194792932428*^9}, { 3.569256575154726*^9, 3.569256580667233*^9}, {3.56926485620363*^9, 3.5692649026657057`*^9}, {3.569265026653585*^9, 3.5692650726193523`*^9}, { 3.569265105161083*^9, 3.569265105899716*^9}, {3.5692654581048937`*^9, 3.5692654588964033`*^9}, {3.569266461580043*^9, 3.569266465552587*^9}, { 3.5692665354959507`*^9, 3.569266538629697*^9}, {3.569266801502063*^9, 3.5692668394521427`*^9}, {3.5692674753134527`*^9, 3.569267484091485*^9}, { 3.569276365285261*^9, 3.569276365951309*^9}, {3.569276638617567*^9, 3.569276638767796*^9}, {3.5693372023327513`*^9, 3.5693372032761917`*^9}, { 3.56933726701714*^9, 3.569337277367485*^9}, {3.5693439547224073`*^9, 3.569343955616466*^9}, 3.569372624956444*^9, 3.569372656321269*^9}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"AA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.569191382447933*^9, 3.5691913945805902`*^9}, { 3.56934395933576*^9, 3.569343960126943*^9}}], Cell[BoxData[ GraphicsBox[{ {RGBColor[1, 1, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.8], PolygonBox[{{6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, { 8, -6}, {22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}}]}, {AbsoluteThickness[3], LineBox[{{6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, { 8, -6}, {22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}}]}, {GrayLevel[0.8], PolygonBox[{{16, -2}, {18, -2}, {18, 0}, {20, 0}, {20, 2}, {18, 2}, {18, 4}, {32, 4}, {32, 2}, {30, 2}, {30, 0}, {32, 0}, {32, -2}, {34, -2}, {34, 12}, {32, 12}, {32, 10}, {30, 10}, {30, 8}, {32, 8}, {32, 6}, {18, 6}, { 18, 8}, {20, 8}, {20, 10}, {18, 10}, {18, 12}, {16, 12}, {16, -2}}]}, {AbsoluteThickness[3], LineBox[{{16, -2}, {18, -2}, {18, 0}, {20, 0}, {20, 2}, {18, 2}, {18, 4}, {32, 4}, {32, 2}, {30, 2}, {30, 0}, {32, 0}, {32, -2}, {34, -2}, {34, 12}, {32, 12}, {32, 10}, {30, 10}, {30, 8}, {32, 8}, {32, 6}, {18, 6}, { 18, 8}, {20, 8}, {20, 10}, {18, 10}, {18, 12}, {16, 12}, {16, -2}}]}, {GrayLevel[0.8], PolygonBox[{{-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-32, 10}, {-32, 8}, {-34, 8}, {-34, 22}, {-32, 22}, {-32, 20}, {-30, 20}, {-30, 18}, {-32, 18}, {-32, 16}, {-18, 16}, {-18, 18}, {-20, 18}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}}]}, {AbsoluteThickness[3], LineBox[{{-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-32, 10}, {-32, 8}, {-34, 8}, {-34, 22}, {-32, 22}, {-32, 20}, {-30, 20}, {-30, 18}, {-32, 18}, {-32, 16}, {-18, 16}, {-18, 18}, {-20, 18}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}}]}, {GrayLevel[0.8], PolygonBox[{{16, 18}, {18, 18}, {18, 20}, {20, 20}, {20, 22}, {18, 22}, { 18, 24}, {32, 24}, {32, 22}, {30, 22}, {30, 20}, {32, 20}, {32, 18}, {34, 18}, {34, 32}, {32, 32}, {32, 30}, {30, 30}, {30, 28}, {32, 28}, {32, 26}, {18, 26}, {18, 28}, {20, 28}, {20, 30}, {18, 30}, {18, 32}, {16, 32}, {16, 18}}]}, {AbsoluteThickness[3], LineBox[{{16, 18}, {18, 18}, {18, 20}, {20, 20}, {20, 22}, {18, 22}, {18, 24}, {32, 24}, {32, 22}, {30, 22}, {30, 20}, {32, 20}, {32, 18}, {34, 18}, {34, 32}, {32, 32}, {32, 30}, {30, 30}, {30, 28}, {32, 28}, {32, 26}, {18, 26}, {18, 28}, {20, 28}, {20, 30}, {18, 30}, {18, 32}, {16, 32}, {16, 18}}]}, {GrayLevel[0.8], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.8], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.8], PolygonBox[{{6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, { 8, -6}, {22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}}]}, {AbsoluteThickness[3], LineBox[{{6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, { 8, -6}, {22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}}]}, {GrayLevel[0.8], PolygonBox[{{-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, -18}, {-8, \ -18}, {-8, -16}, {-22, -16}, {-22, -18}, {-20, -18}, {-20, -20}, {-22, -20}, \ {-22, -22}, {-24, -22}, {-24, -8}, {-22, -8}, {-22, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-8, -10}, {-8, -8}, {-6, -8}, {-6, -22}}]}, {AbsoluteThickness[3], LineBox[{{-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, -18}, {-8, \ -18}, {-8, -16}, {-22, -16}, {-22, -18}, {-20, -18}, {-20, -20}, {-22, -20}, \ {-22, -22}, {-24, -22}, {-24, -8}, {-22, -8}, {-22, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-8, -10}, {-8, -8}, {-6, -8}, {-6, -22}}]}, {GrayLevel[0.8], PolygonBox[{{6, -32}, {8, -32}, {8, -30}, {10, -30}, {10, -28}, { 8, -28}, {8, -26}, {22, -26}, {22, -28}, {20, -28}, {20, -30}, { 22, -30}, {22, -32}, {24, -32}, {24, -18}, {22, -18}, {22, -20}, { 20, -20}, {20, -22}, {22, -22}, {22, -24}, {8, -24}, {8, -22}, { 10, -22}, {10, -20}, {8, -20}, {8, -18}, {6, -18}, {6, -32}}]}, {AbsoluteThickness[3], LineBox[{{6, -32}, {8, -32}, {8, -30}, {10, -30}, {10, -28}, {8, -28}, { 8, -26}, {22, -26}, {22, -28}, {20, -28}, {20, -30}, {22, -30}, { 22, -32}, {24, -32}, {24, -18}, {22, -18}, {22, -20}, {20, -20}, { 20, -22}, {22, -22}, {22, -24}, {8, -24}, {8, -22}, {10, -22}, { 10, -20}, {8, -20}, {8, -18}, {6, -18}, {6, -32}}]}, {GrayLevel[0.8], PolygonBox[{{-32, -6}, {-32, -8}, {-30, -8}, {-30, -10}, {-28, -10}, \ {-28, -8}, {-26, -8}, {-26, -22}, {-28, -22}, {-28, -20}, {-30, -20}, {-30, \ -22}, {-32, -22}, {-32, -24}, {-18, -24}, {-18, -22}, {-20, -22}, {-20, -20}, \ {-22, -20}, {-22, -22}, {-24, -22}, {-24, -8}, {-22, -8}, {-22, -10}, {-20, \ -10}, {-20, -8}, {-18, -8}, {-18, -6}, {-32, -6}}]}, {AbsoluteThickness[3], LineBox[{{-32, -6}, {-32, -8}, {-30, -8}, {-30, -10}, {-28, -10}, {-28, \ -8}, {-26, -8}, {-26, -22}, {-28, -22}, {-28, -20}, {-30, -20}, {-30, -22}, \ {-32, -22}, {-32, -24}, {-18, -24}, {-18, -22}, {-20, -22}, {-20, -20}, {-22, \ -20}, {-22, -22}, {-24, -22}, {-24, -8}, {-22, -8}, {-22, -10}, {-20, -10}, \ {-20, -8}, {-18, -8}, {-18, -6}, {-32, -6}}]}, {GrayLevel[0.8], PolygonBox[{{-22, -16}, {-22, -18}, {-20, -18}, {-20, -20}, {-18, -20}, \ {-18, -18}, {-16, -18}, {-16, -32}, {-18, -32}, {-18, -30}, {-20, -30}, {-20, \ -32}, {-22, -32}, {-22, -34}, {-8, -34}, {-8, -32}, {-10, -32}, {-10, -30}, \ {-12, -30}, {-12, -32}, {-14, -32}, {-14, -18}, {-12, -18}, {-12, -20}, {-10, \ -20}, {-10, -18}, {-8, -18}, {-8, -16}, {-22, -16}}]}, {AbsoluteThickness[3], LineBox[{{-22, -16}, {-22, -18}, {-20, -18}, {-20, -20}, {-18, -20}, \ {-18, -18}, {-16, -18}, {-16, -32}, {-18, -32}, {-18, -30}, {-20, -30}, {-20, \ -32}, {-22, -32}, {-22, -34}, {-8, -34}, {-8, -32}, {-10, -32}, {-10, -30}, \ {-12, -30}, {-12, -32}, {-14, -32}, {-14, -18}, {-12, -18}, {-12, -20}, {-10, \ -20}, {-10, -18}, {-8, -18}, {-8, -16}, {-22, -16}}]}, {GrayLevel[0.8], PolygonBox[{{-12, -26}, {-12, -28}, {-10, -28}, {-10, -30}, {-8, -30}, \ {-8, -28}, {-6, -28}, {-6, -42}, {-8, -42}, {-8, -40}, {-10, -40}, {-10, \ -42}, {-12, -42}, {-12, -44}, {2, -44}, {2, -42}, {0, -42}, { 0, -40}, {-2, -40}, {-2, -42}, {-4, -42}, {-4, -28}, {-2, -28}, {-2, \ -30}, {0, -30}, {0, -28}, {2, -28}, {2, -26}, {-12, -26}}]}, {AbsoluteThickness[3], LineBox[{{-12, -26}, {-12, -28}, {-10, -28}, {-10, -30}, {-8, -30}, {-8, \ -28}, {-6, -28}, {-6, -42}, {-8, -42}, {-8, -40}, {-10, -40}, {-10, -42}, \ {-12, -42}, {-12, -44}, {2, -44}, {2, -42}, {0, -42}, { 0, -40}, {-2, -40}, {-2, -42}, {-4, -42}, {-4, -28}, {-2, -28}, {-2, \ -30}, {0, -30}, {0, -28}, {2, -28}, {2, -26}, {-12, -26}}]}, {GrayLevel[0.8], PolygonBox[{{-26, 12}, {-28, 12}, {-28, 10}, {-30, 10}, {-30, 8}, {-28, 8}, {-28, 6}, {-42, 6}, {-42, 8}, {-40, 8}, {-40, 10}, {-42, 10}, {-42, 12}, {-44, 12}, {-44, -2}, {-42, -2}, {-42, 0}, {-40, 0}, {-40, 2}, {-42, 2}, {-42, 4}, {-28, 4}, {-28, 2}, {-30, 2}, {-30, 0}, {-28, 0}, {-28, -2}, {-26, -2}, {-26, 12}}]}, {AbsoluteThickness[3], LineBox[{{-26, 12}, {-28, 12}, {-28, 10}, {-30, 10}, {-30, 8}, {-28, 8}, {-28, 6}, {-42, 6}, {-42, 8}, {-40, 8}, {-40, 10}, {-42, 10}, {-42, 12}, {-44, 12}, {-44, -2}, {-42, -2}, {-42, 0}, {-40, 0}, {-40, 2}, {-42, 2}, {-42, 4}, {-28, 4}, {-28, 2}, {-30, 2}, {-30, 0}, {-28, 0}, {-28, -2}, {-26, -2}, {-26, 12}}]}, {GrayLevel[0.8], PolygonBox[{{-36, 22}, {-38, 22}, {-38, 20}, {-40, 20}, {-40, 18}, {-38, 18}, {-38, 16}, {-52, 16}, {-52, 18}, {-50, 18}, {-50, 20}, {-52, 20}, {-52, 22}, {-54, 22}, {-54, 8}, {-52, 8}, {-52, 10}, {-50, 10}, {-50, 12}, {-52, 12}, {-52, 14}, {-38, 14}, {-38, 12}, {-40, 12}, {-40, 10}, {-38, 10}, {-38, 8}, {-36, 8}, {-36, 22}}]}, {AbsoluteThickness[3], LineBox[{{-36, 22}, {-38, 22}, {-38, 20}, {-40, 20}, {-40, 18}, {-38, 18}, {-38, 16}, {-52, 16}, {-52, 18}, {-50, 18}, {-50, 20}, {-52, 20}, {-52, 22}, {-54, 22}, {-54, 8}, {-52, 8}, {-52, 10}, {-50, 10}, {-50, 12}, {-52, 12}, {-52, 14}, {-38, 14}, {-38, 12}, {-40, 12}, {-40, 10}, {-38, 10}, {-38, 8}, {-36, 8}, {-36, 22}}]}, {GrayLevel[0.8], PolygonBox[{{36, 32}, {38, 32}, {38, 30}, {40, 30}, {40, 28}, {38, 28}, { 38, 26}, {52, 26}, {52, 28}, {50, 28}, {50, 30}, {52, 30}, {52, 32}, {54, 32}, {54, 18}, {52, 18}, {52, 20}, {50, 20}, {50, 22}, {52, 22}, {52, 24}, {38, 24}, {38, 22}, {40, 22}, {40, 20}, {38, 20}, {38, 18}, {36, 18}, {36, 32}}]}, {AbsoluteThickness[3], LineBox[{{36, 32}, {38, 32}, {38, 30}, {40, 30}, {40, 28}, {38, 28}, {38, 26}, {52, 26}, {52, 28}, {50, 28}, {50, 30}, {52, 30}, {52, 32}, {54, 32}, {54, 18}, {52, 18}, {52, 20}, {50, 20}, {50, 22}, {52, 22}, {52, 24}, {38, 24}, {38, 22}, {40, 22}, {40, 20}, {38, 20}, {38, 18}, {36, 18}, {36, 32}}]}, {GrayLevel[0.8], PolygonBox[{{-32, 36}, {-32, 38}, {-30, 38}, {-30, 40}, {-28, 40}, {-28, 38}, {-26, 38}, {-26, 52}, {-28, 52}, {-28, 50}, {-30, 50}, {-30, 52}, {-32, 52}, {-32, 54}, {-18, 54}, {-18, 52}, {-20, 52}, {-20, 50}, {-22, 50}, {-22, 52}, {-24, 52}, {-24, 38}, {-22, 38}, {-22, 40}, {-20, 40}, {-20, 38}, {-18, 38}, {-18, 36}, {-32, 36}}]}, {AbsoluteThickness[3], LineBox[{{-32, 36}, {-32, 38}, {-30, 38}, {-30, 40}, {-28, 40}, {-28, 38}, {-26, 38}, {-26, 52}, {-28, 52}, {-28, 50}, {-30, 50}, {-30, 52}, {-32, 52}, {-32, 54}, {-18, 54}, {-18, 52}, {-20, 52}, {-20, 50}, {-22, 50}, {-22, 52}, {-24, 52}, {-24, 38}, {-22, 38}, {-22, 40}, {-20, 40}, {-20, 38}, {-18, 38}, {-18, 36}, {-32, 36}}]}, {GrayLevel[0.8], PolygonBox[{{-22, 46}, {-22, 48}, {-20, 48}, {-20, 50}, {-18, 50}, {-18, 48}, {-16, 48}, {-16, 62}, {-18, 62}, {-18, 60}, {-20, 60}, {-20, 62}, {-22, 62}, {-22, 64}, {-8, 64}, {-8, 62}, {-10, 62}, {-10, 60}, {-12, 60}, {-12, 62}, {-14, 62}, {-14, 48}, {-12, 48}, {-12, 50}, {-10, 50}, {-10, 48}, {-8, 48}, {-8, 46}, {-22, 46}}]}, {AbsoluteThickness[3], LineBox[{{-22, 46}, {-22, 48}, {-20, 48}, {-20, 50}, {-18, 50}, {-18, 48}, {-16, 48}, {-16, 62}, {-18, 62}, {-18, 60}, {-20, 60}, {-20, 62}, {-22, 62}, {-22, 64}, {-8, 64}, {-8, 62}, {-10, 62}, {-10, 60}, {-12, 60}, {-12, 62}, {-14, 62}, {-14, 48}, {-12, 48}, {-12, 50}, {-10, 50}, {-10, 48}, {-8, 48}, {-8, 46}, {-22, 46}}]}, {GrayLevel[0.8], PolygonBox[{{-12, 36}, {-12, 38}, {-10, 38}, {-10, 40}, {-8, 40}, {-8, 38}, {-6, 38}, {-6, 52}, {-8, 52}, {-8, 50}, {-10, 50}, {-10, 52}, {-12, 52}, {-12, 54}, {2, 54}, {2, 52}, {0, 52}, {0, 50}, {-2, 50}, {-2, 52}, {-4, 52}, {-4, 38}, {-2, 38}, {-2, 40}, {0, 40}, {0, 38}, {2, 38}, { 2, 36}, {-12, 36}}]}, {AbsoluteThickness[3], LineBox[{{-12, 36}, {-12, 38}, {-10, 38}, {-10, 40}, {-8, 40}, {-8, 38}, {-6, 38}, {-6, 52}, {-8, 52}, {-8, 50}, {-10, 50}, {-10, 52}, {-12, 52}, {-12, 54}, {2, 54}, {2, 52}, {0, 52}, {0, 50}, {-2, 50}, {-2, 52}, {-4, 52}, {-4, 38}, {-2, 38}, {-2, 40}, {0, 40}, {0, 38}, {2, 38}, { 2, 36}, {-12, 36}}]}, {GrayLevel[0.8], PolygonBox[{{-2, 46}, {-2, 48}, {0, 48}, {0, 50}, {2, 50}, {2, 48}, {4, 48}, {4, 62}, {2, 62}, {2, 60}, {0, 60}, {0, 62}, {-2, 62}, {-2, 64}, { 12, 64}, {12, 62}, {10, 62}, {10, 60}, {8, 60}, {8, 62}, {6, 62}, {6, 48}, {8, 48}, {8, 50}, {10, 50}, {10, 48}, {12, 48}, {12, 46}, {-2, 46}}]}, {AbsoluteThickness[3], LineBox[{{-2, 46}, {-2, 48}, {0, 48}, {0, 50}, {2, 50}, {2, 48}, {4, 48}, {4, 62}, {2, 62}, {2, 60}, {0, 60}, {0, 62}, {-2, 62}, {-2, 64}, { 12, 64}, {12, 62}, {10, 62}, {10, 60}, {8, 60}, {8, 62}, {6, 62}, {6, 48}, {8, 48}, {8, 50}, {10, 50}, {10, 48}, {12, 48}, {12, 46}, {-2, 46}}]}, {GrayLevel[0.8], PolygonBox[{{2, 56}, {2, 58}, {0, 58}, {0, 60}, {-2, 60}, {-2, 58}, {-4, 58}, {-4, 72}, {-2, 72}, {-2, 70}, {0, 70}, {0, 72}, {2, 72}, {2, 74}, {-12, 74}, {-12, 72}, {-10, 72}, {-10, 70}, {-8, 70}, {-8, 72}, {-6, 72}, {-6, 58}, {-8, 58}, {-8, 60}, {-10, 60}, {-10, 58}, {-12, 58}, {-12, 56}, {2, 56}}]}, {AbsoluteThickness[3], LineBox[{{2, 56}, {2, 58}, {0, 58}, {0, 60}, {-2, 60}, {-2, 58}, {-4, 58}, {-4, 72}, {-2, 72}, {-2, 70}, {0, 70}, {0, 72}, {2, 72}, {2, 74}, {-12, 74}, {-12, 72}, {-10, 72}, {-10, 70}, {-8, 70}, {-8, 72}, {-6, 72}, {-6, 58}, {-8, 58}, {-8, 60}, {-10, 60}, {-10, 58}, {-12, 58}, {-12, 56}, {2, 56}}]}, {GrayLevel[0.8], PolygonBox[{{12, 66}, {12, 68}, {10, 68}, {10, 70}, {8, 70}, {8, 68}, {6, 68}, {6, 82}, {8, 82}, {8, 80}, {10, 80}, {10, 82}, {12, 82}, {12, 84}, {-2, 84}, {-2, 82}, {0, 82}, {0, 80}, {2, 80}, {2, 82}, {4, 82}, {4, 68}, {2, 68}, {2, 70}, {0, 70}, {0, 68}, {-2, 68}, {-2, 66}, {12, 66}}]}, {AbsoluteThickness[3], LineBox[{{12, 66}, {12, 68}, {10, 68}, {10, 70}, {8, 70}, {8, 68}, {6, 68}, {6, 82}, {8, 82}, {8, 80}, {10, 80}, {10, 82}, {12, 82}, {12, 84}, {-2, 84}, {-2, 82}, {0, 82}, {0, 80}, {2, 80}, {2, 82}, {4, 82}, {4, 68}, {2, 68}, {2, 70}, {0, 70}, {0, 68}, {-2, 68}, {-2, 66}, {12, 66}}]}, {GrayLevel[0.8], PolygonBox[{{66, -12}, {68, -12}, {68, -10}, {70, -10}, {70, -8}, { 68, -8}, {68, -6}, {82, -6}, {82, -8}, {80, -8}, {80, -10}, {82, -10}, { 82, -12}, {84, -12}, {84, 2}, {82, 2}, {82, 0}, {80, 0}, {80, -2}, { 82, -2}, {82, -4}, {68, -4}, {68, -2}, {70, -2}, {70, 0}, {68, 0}, {68, 2}, {66, 2}, {66, -12}}]}, {AbsoluteThickness[3], LineBox[{{66, -12}, {68, -12}, {68, -10}, {70, -10}, {70, -8}, {68, -8}, { 68, -6}, {82, -6}, {82, -8}, {80, -8}, {80, -10}, {82, -10}, {82, -12}, { 84, -12}, {84, 2}, {82, 2}, {82, 0}, {80, 0}, {80, -2}, {82, -2}, { 82, -4}, {68, -4}, {68, -2}, {70, -2}, {70, 0}, {68, 0}, {68, 2}, {66, 2}, {66, -12}}]}, {GrayLevel[0.8], PolygonBox[{{12, 66}, {12, 68}, {10, 68}, {10, 70}, {8, 70}, {8, 68}, {6, 68}, {6, 82}, {8, 82}, {8, 80}, {10, 80}, {10, 82}, {12, 82}, {12, 84}, {-2, 84}, {-2, 82}, {0, 82}, {0, 80}, {2, 80}, {2, 82}, {4, 82}, {4, 68}, {2, 68}, {2, 70}, {0, 70}, {0, 68}, {-2, 68}, {-2, 66}, {12, 66}}]}, {AbsoluteThickness[3], LineBox[{{12, 66}, {12, 68}, {10, 68}, {10, 70}, {8, 70}, {8, 68}, {6, 68}, {6, 82}, {8, 82}, {8, 80}, {10, 80}, {10, 82}, {12, 82}, {12, 84}, {-2, 84}, {-2, 82}, {0, 82}, {0, 80}, {2, 80}, {2, 82}, {4, 82}, {4, 68}, {2, 68}, {2, 70}, {0, 70}, {0, 68}, {-2, 68}, {-2, 66}, {12, 66}}]}, {GrayLevel[0.8], PolygonBox[{{2, 56}, {2, 58}, {0, 58}, {0, 60}, {-2, 60}, {-2, 58}, {-4, 58}, {-4, 72}, {-2, 72}, {-2, 70}, {0, 70}, {0, 72}, {2, 72}, {2, 74}, {-12, 74}, {-12, 72}, {-10, 72}, {-10, 70}, {-8, 70}, {-8, 72}, {-6, 72}, {-6, 58}, {-8, 58}, {-8, 60}, {-10, 60}, {-10, 58}, {-12, 58}, {-12, 56}, {2, 56}}]}, {AbsoluteThickness[3], LineBox[{{2, 56}, {2, 58}, {0, 58}, {0, 60}, {-2, 60}, {-2, 58}, {-4, 58}, {-4, 72}, {-2, 72}, {-2, 70}, {0, 70}, {0, 72}, {2, 72}, {2, 74}, {-12, 74}, {-12, 72}, {-10, 72}, {-10, 70}, {-8, 70}, {-8, 72}, {-6, 72}, {-6, 58}, {-8, 58}, {-8, 60}, {-10, 60}, {-10, 58}, {-12, 58}, {-12, 56}, {2, 56}}]}, {RGBColor[1, 0, 0], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic, ImageSize->{451.9999999999995, Automatic}]], "Output", CellChangeTimes->{3.56943683923066*^9, 3.5694368783053923`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"CC", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"DD", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"CC", "[", RowBox[{"[", "jj", "]"}], "]"}], "+", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "CC", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"II", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"AL", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"AR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"BD", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"BU", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"RR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"SS", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"XX", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"YY", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"TT", "=", RowBox[{"{", RowBox[{ "AL", ",", "AR", ",", "BD", ",", "BU", ",", "RR", ",", "SS", ",", "XX", ",", "YY", ",", "II"}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{"WW", "=", "DD"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OM", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"UU", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"nn", "=", "24"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RN", "=", RowBox[{"{", "9", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"mm", "=", RowBox[{"1", "+", RowBox[{"Floor", "[", RowBox[{"8", "*", RowBox[{"Random", "[", "]"}]}], "]"}]}]}], ";", RowBox[{"RN", "=", RowBox[{"Append", "[", RowBox[{"RN", ",", "mm"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", "1", ",", "nn"}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"VV", "=", "WW"}], ";", RowBox[{"WW", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", RowBox[{"RN", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}], "]"}], "[", RowBox[{"VV", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "VV", "]"}]}], "}"}]}], "]"}]}], ";", RowBox[{"UU", "=", RowBox[{"Append", "[", RowBox[{"UU", ",", "WW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "RN", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"BA", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", "0.7", "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "BA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TW", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"AbsoluteThickness", "[", "3", "]"}], ",", RowBox[{"Line", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "TW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "UU", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OO", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "0.8"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AA", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "OO"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.569269122420148*^9, 3.569269126466741*^9}, { 3.56926926840324*^9, 3.569269339301219*^9}, {3.569269419678811*^9, 3.569269441402975*^9}, {3.569269477946899*^9, 3.569269528403039*^9}, { 3.569269627117193*^9, 3.569269645906822*^9}, {3.569269698512396*^9, 3.569269725086259*^9}, 3.569269777099161*^9, 3.5692698440429564`*^9, { 3.569269934843803*^9, 3.5692699523160133`*^9}, {3.569275732307331*^9, 3.569275785114213*^9}, {3.569275823759439*^9, 3.56927584736866*^9}, { 3.5692759919840612`*^9, 3.56927599455824*^9}, {3.569276333965382*^9, 3.569276337376155*^9}, {3.569337148306706*^9, 3.569337157414135*^9}, { 3.569337347364829*^9, 3.569337365813414*^9}, {3.569340433137697*^9, 3.569340438907454*^9}, {3.569343974870887*^9, 3.569343975525769*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"Show", "[", RowBox[{"AA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.569276041873665*^9, 3.569276093701684*^9}, { 3.5693439789387417`*^9, 3.569343979610651*^9}, {3.56938389737156*^9, 3.569383897824898*^9}}], Cell[BoxData[ GraphicsBox[{ {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 18}, {-12, 18}, {-12, 16}, {2, 16}, {2, 18}, {0, 18}, {0, 20}, {2, 20}, { 2, 22}, {4, 22}, {4, 8}}]}, {AbsoluteThickness[3], LineBox[{{4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 18}, {-12, 18}, {-12, 16}, {2, 16}, {2, 18}, {0, 18}, {0, 20}, {2, 20}, { 2, 22}, {4, 22}, {4, 8}}]}, {GrayLevel[0.7], PolygonBox[{{14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}}]}, {AbsoluteThickness[3], LineBox[{{14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}}]}, {GrayLevel[0.7], PolygonBox[{{2, 14}, {2, 12}, {0, 12}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}}]}, {AbsoluteThickness[3], LineBox[{{2, 14}, {2, 12}, {0, 12}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-18, -10}, \ {-18, -12}, {-16, -12}, {-16, 2}, {-18, 2}, {-18, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}}]}, {AbsoluteThickness[3], LineBox[{{-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-18, -10}, \ {-18, -12}, {-16, -12}, {-16, 2}, {-18, 2}, {-18, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}}]}, {GrayLevel[0.7], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {AbsoluteThickness[3], LineBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {GrayLevel[0.7], PolygonBox[{{18, 24}, {18, 22}, {20, 22}, {20, 20}, {22, 20}, {22, 22}, { 24, 22}, {24, 8}, {22, 8}, {22, 10}, {20, 10}, {20, 8}, {18, 8}, {18, 6}, {32, 6}, {32, 8}, {30, 8}, {30, 10}, {28, 10}, {28, 8}, {26, 8}, {26, 22}, {28, 22}, {28, 20}, {30, 20}, {30, 22}, {32, 22}, {32, 24}, {18, 24}}]}, {AbsoluteThickness[3], LineBox[{{18, 24}, {18, 22}, {20, 22}, {20, 20}, {22, 20}, {22, 22}, {24, 22}, {24, 8}, {22, 8}, {22, 10}, {20, 10}, {20, 8}, {18, 8}, {18, 6}, { 32, 6}, {32, 8}, {30, 8}, {30, 10}, {28, 10}, {28, 8}, {26, 8}, {26, 22}, {28, 22}, {28, 20}, {30, 20}, {30, 22}, {32, 22}, {32, 24}, {18, 24}}]}, {GrayLevel[0.7], PolygonBox[{{8, 34}, {8, 32}, {10, 32}, {10, 30}, {12, 30}, {12, 32}, {14, 32}, {14, 18}, {12, 18}, {12, 20}, {10, 20}, {10, 18}, {8, 18}, {8, 16}, {22, 16}, {22, 18}, {20, 18}, {20, 20}, {18, 20}, {18, 18}, {16, 18}, {16, 32}, {18, 32}, {18, 30}, {20, 30}, {20, 32}, {22, 32}, {22, 34}, {8, 34}}]}, {AbsoluteThickness[3], LineBox[{{8, 34}, {8, 32}, {10, 32}, {10, 30}, {12, 30}, {12, 32}, {14, 32}, {14, 18}, {12, 18}, {12, 20}, {10, 20}, {10, 18}, {8, 18}, {8, 16}, {22, 16}, {22, 18}, {20, 18}, {20, 20}, {18, 20}, {18, 18}, {16, 18}, {16, 32}, {18, 32}, {18, 30}, {20, 30}, {20, 32}, {22, 32}, {22, 34}, {8, 34}}]}, {GrayLevel[0.7], PolygonBox[{{18, 24}, {18, 22}, {20, 22}, {20, 20}, {22, 20}, {22, 22}, { 24, 22}, {24, 8}, {22, 8}, {22, 10}, {20, 10}, {20, 8}, {18, 8}, {18, 6}, {32, 6}, {32, 8}, {30, 8}, {30, 10}, {28, 10}, {28, 8}, {26, 8}, {26, 22}, {28, 22}, {28, 20}, {30, 20}, {30, 22}, {32, 22}, {32, 24}, {18, 24}}]}, {AbsoluteThickness[3], LineBox[{{18, 24}, {18, 22}, {20, 22}, {20, 20}, {22, 20}, {22, 22}, {24, 22}, {24, 8}, {22, 8}, {22, 10}, {20, 10}, {20, 8}, {18, 8}, {18, 6}, { 32, 6}, {32, 8}, {30, 8}, {30, 10}, {28, 10}, {28, 8}, {26, 8}, {26, 22}, {28, 22}, {28, 20}, {30, 20}, {30, 22}, {32, 22}, {32, 24}, {18, 24}}]}, {GrayLevel[0.7], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {AbsoluteThickness[3], LineBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {GrayLevel[0.7], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, { 12, -12}, {12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {AbsoluteThickness[3], LineBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, {12, -12}, { 12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {GrayLevel[0.7], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, {8, -6}, { 22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {AbsoluteThickness[3], LineBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, {8, -6}, { 22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {GrayLevel[0.7], PolygonBox[{{-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}}]}, {AbsoluteThickness[3], LineBox[{{-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}}]}, {GrayLevel[0.7], PolygonBox[{{12, 24}, {12, 22}, {10, 22}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}}]}, {AbsoluteThickness[3], LineBox[{{12, 24}, {12, 22}, {10, 22}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}}]}, {GrayLevel[0.7], PolygonBox[{{22, 34}, {22, 32}, {20, 32}, {20, 30}, {18, 30}, {18, 32}, { 16, 32}, {16, 18}, {18, 18}, {18, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 32}, {8, 32}, {8, 34}, {22, 34}}]}, {AbsoluteThickness[3], LineBox[{{22, 34}, {22, 32}, {20, 32}, {20, 30}, {18, 30}, {18, 32}, {16, 32}, {16, 18}, {18, 18}, {18, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 32}, {8, 32}, {8, 34}, {22, 34}}]}, {GrayLevel[0.7], PolygonBox[{{32, 24}, {32, 22}, {30, 22}, {30, 20}, {28, 20}, {28, 22}, { 26, 22}, {26, 8}, {28, 8}, {28, 10}, {30, 10}, {30, 8}, {32, 8}, {32, 6}, {18, 6}, {18, 8}, {20, 8}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 22}, {18, 22}, {18, 24}, {32, 24}}]}, {AbsoluteThickness[3], LineBox[{{32, 24}, {32, 22}, {30, 22}, {30, 20}, {28, 20}, {28, 22}, {26, 22}, {26, 8}, {28, 8}, {28, 10}, {30, 10}, {30, 8}, {32, 8}, {32, 6}, { 18, 6}, {18, 8}, {20, 8}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 22}, {18, 22}, {18, 24}, {32, 24}}]}, {GrayLevel[0.7], PolygonBox[{{42, 14}, {42, 12}, {40, 12}, {40, 10}, {38, 10}, {38, 12}, { 36, 12}, {36, -2}, {38, -2}, {38, 0}, {40, 0}, {40, -2}, {42, -2}, { 42, -4}, {28, -4}, {28, -2}, {30, -2}, {30, 0}, {32, 0}, {32, -2}, { 34, -2}, {34, 12}, {32, 12}, {32, 10}, {30, 10}, {30, 12}, {28, 12}, {28, 14}, {42, 14}}]}, {AbsoluteThickness[3], LineBox[{{42, 14}, {42, 12}, {40, 12}, {40, 10}, {38, 10}, {38, 12}, {36, 12}, {36, -2}, {38, -2}, {38, 0}, {40, 0}, {40, -2}, {42, -2}, { 42, -4}, {28, -4}, {28, -2}, {30, -2}, {30, 0}, {32, 0}, {32, -2}, { 34, -2}, {34, 12}, {32, 12}, {32, 10}, {30, 10}, {30, 12}, {28, 12}, {28, 14}, {42, 14}}]}, {GrayLevel[0.7], PolygonBox[{{52, 4}, {52, 2}, {50, 2}, {50, 0}, {48, 0}, {48, 2}, {46, 2}, {46, -12}, {48, -12}, {48, -10}, {50, -10}, {50, -12}, {52, -12}, { 52, -14}, {38, -14}, {38, -12}, {40, -12}, {40, -10}, {42, -10}, { 42, -12}, {44, -12}, {44, 2}, {42, 2}, {42, 0}, {40, 0}, {40, 2}, {38, 2}, {38, 4}, {52, 4}}]}, {AbsoluteThickness[3], LineBox[{{52, 4}, {52, 2}, {50, 2}, {50, 0}, {48, 0}, {48, 2}, {46, 2}, { 46, -12}, {48, -12}, {48, -10}, {50, -10}, {50, -12}, {52, -12}, { 52, -14}, {38, -14}, {38, -12}, {40, -12}, {40, -10}, {42, -10}, { 42, -12}, {44, -12}, {44, 2}, {42, 2}, {42, 0}, {40, 0}, {40, 2}, {38, 2}, {38, 4}, {52, 4}}]}, {GrayLevel[0.7], PolygonBox[{{-52, 14}, {-52, 12}, {-50, 12}, {-50, 10}, {-48, 10}, {-48, 12}, {-46, 12}, {-46, -2}, {-48, -2}, {-48, 0}, {-50, 0}, {-50, -2}, {-52, -2}, {-52, -4}, {-38, -4}, {-38, -2}, {-40, -2}, \ {-40, 0}, {-42, 0}, {-42, -2}, {-44, -2}, {-44, 12}, {-42, 12}, {-42, 10}, {-40, 10}, {-40, 12}, {-38, 12}, {-38, 14}, {-52, 14}}]}, {AbsoluteThickness[3], LineBox[{{-52, 14}, {-52, 12}, {-50, 12}, {-50, 10}, {-48, 10}, {-48, 12}, {-46, 12}, {-46, -2}, {-48, -2}, {-48, 0}, {-50, 0}, {-50, -2}, {-52, -2}, {-52, -4}, {-38, -4}, {-38, -2}, {-40, -2}, \ {-40, 0}, {-42, 0}, {-42, -2}, {-44, -2}, {-44, 12}, {-42, 12}, {-42, 10}, {-40, 10}, {-40, 12}, {-38, 12}, {-38, 14}, {-52, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-42, 24}, {-42, 22}, {-40, 22}, {-40, 20}, {-38, 20}, {-38, 22}, {-36, 22}, {-36, 8}, {-38, 8}, {-38, 10}, {-40, 10}, {-40, 8}, {-42, 8}, {-42, 6}, {-28, 6}, {-28, 8}, {-30, 8}, {-30, 10}, {-32, 10}, {-32, 8}, {-34, 8}, {-34, 22}, {-32, 22}, {-32, 20}, {-30, 20}, {-30, 22}, {-28, 22}, {-28, 24}, {-42, 24}}]}, {AbsoluteThickness[3], LineBox[{{-42, 24}, {-42, 22}, {-40, 22}, {-40, 20}, {-38, 20}, {-38, 22}, {-36, 22}, {-36, 8}, {-38, 8}, {-38, 10}, {-40, 10}, {-40, 8}, {-42, 8}, {-42, 6}, {-28, 6}, {-28, 8}, {-30, 8}, {-30, 10}, {-32, 10}, {-32, 8}, {-34, 8}, {-34, 22}, {-32, 22}, {-32, 20}, {-30, 20}, {-30, 22}, {-28, 22}, {-28, 24}, {-42, 24}}]}, {GrayLevel[0.7], PolygonBox[{{-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}, {-18, -2}, {-20, -2}, \ {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}}]}, {AbsoluteThickness[3], LineBox[{{-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}, {-18, -2}, {-20, -2}, \ {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-42, 4}, {-42, 2}, {-40, 2}, {-40, 0}, {-38, 0}, {-38, 2}, {-36, 2}, {-36, -12}, {-38, -12}, {-38, -10}, {-40, -10}, {-40, -12}, {-42, \ -12}, {-42, -14}, {-28, -14}, {-28, -12}, {-30, -12}, {-30, -10}, {-32, -10}, \ {-32, -12}, {-34, -12}, {-34, 2}, {-32, 2}, {-32, 0}, {-30, 0}, {-30, 2}, {-28, 2}, {-28, 4}, {-42, 4}}]}, {AbsoluteThickness[3], LineBox[{{-42, 4}, {-42, 2}, {-40, 2}, {-40, 0}, {-38, 0}, {-38, 2}, {-36, 2}, {-36, -12}, {-38, -12}, {-38, -10}, {-40, -10}, {-40, -12}, {-42, \ -12}, {-42, -14}, {-28, -14}, {-28, -12}, {-30, -12}, {-30, -10}, {-32, -10}, \ {-32, -12}, {-34, -12}, {-34, 2}, {-32, 2}, {-32, 0}, {-30, 0}, {-30, 2}, {-28, 2}, {-28, 4}, {-42, 4}}]}, {GrayLevel[0.7], PolygonBox[{{-52, 14}, {-52, 12}, {-50, 12}, {-50, 10}, {-48, 10}, {-48, 12}, {-46, 12}, {-46, -2}, {-48, -2}, {-48, 0}, {-50, 0}, {-50, -2}, {-52, -2}, {-52, -4}, {-38, -4}, {-38, -2}, {-40, -2}, \ {-40, 0}, {-42, 0}, {-42, -2}, {-44, -2}, {-44, 12}, {-42, 12}, {-42, 10}, {-40, 10}, {-40, 12}, {-38, 12}, {-38, 14}, {-52, 14}}]}, {AbsoluteThickness[3], LineBox[{{-52, 14}, {-52, 12}, {-50, 12}, {-50, 10}, {-48, 10}, {-48, 12}, {-46, 12}, {-46, -2}, {-48, -2}, {-48, 0}, {-50, 0}, {-50, -2}, {-52, -2}, {-52, -4}, {-38, -4}, {-38, -2}, {-40, -2}, \ {-40, 0}, {-42, 0}, {-42, -2}, {-44, -2}, {-44, 12}, {-42, 12}, {-42, 10}, {-40, 10}, {-40, 12}, {-38, 12}, {-38, 14}, {-52, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-62, 24}, {-62, 22}, {-60, 22}, {-60, 20}, {-58, 20}, {-58, 22}, {-56, 22}, {-56, 8}, {-58, 8}, {-58, 10}, {-60, 10}, {-60, 8}, {-62, 8}, {-62, 6}, {-48, 6}, {-48, 8}, {-50, 8}, {-50, 10}, {-52, 10}, {-52, 8}, {-54, 8}, {-54, 22}, {-52, 22}, {-52, 20}, {-50, 20}, {-50, 22}, {-48, 22}, {-48, 24}, {-62, 24}}]}, {AbsoluteThickness[3], LineBox[{{-62, 24}, {-62, 22}, {-60, 22}, {-60, 20}, {-58, 20}, {-58, 22}, {-56, 22}, {-56, 8}, {-58, 8}, {-58, 10}, {-60, 10}, {-60, 8}, {-62, 8}, {-62, 6}, {-48, 6}, {-48, 8}, {-50, 8}, {-50, 10}, {-52, 10}, {-52, 8}, {-54, 8}, {-54, 22}, {-52, 22}, {-52, 20}, {-50, 20}, {-50, 22}, {-48, 22}, {-48, 24}, {-62, 24}}]}, {GrayLevel[0.7], PolygonBox[{{-52, 14}, {-52, 12}, {-50, 12}, {-50, 10}, {-48, 10}, {-48, 12}, {-46, 12}, {-46, -2}, {-48, -2}, {-48, 0}, {-50, 0}, {-50, -2}, {-52, -2}, {-52, -4}, {-38, -4}, {-38, -2}, {-40, -2}, \ {-40, 0}, {-42, 0}, {-42, -2}, {-44, -2}, {-44, 12}, {-42, 12}, {-42, 10}, {-40, 10}, {-40, 12}, {-38, 12}, {-38, 14}, {-52, 14}}]}, {AbsoluteThickness[3], LineBox[{{-52, 14}, {-52, 12}, {-50, 12}, {-50, 10}, {-48, 10}, {-48, 12}, {-46, 12}, {-46, -2}, {-48, -2}, {-48, 0}, {-50, 0}, {-50, -2}, {-52, -2}, {-52, -4}, {-38, -4}, {-38, -2}, {-40, -2}, \ {-40, 0}, {-42, 0}, {-42, -2}, {-44, -2}, {-44, 12}, {-42, 12}, {-42, 10}, {-40, 10}, {-40, 12}, {-38, 12}, {-38, 14}, {-52, 14}}]}, {RGBColor[1, 0, 0], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.569437052205052*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"CC", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"DD", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"CC", "[", RowBox[{"[", "jj", "]"}], "]"}], "+", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "CC", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"II", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"AL", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"AR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"BD", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"BU", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"RR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"SS", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"XX", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"YY", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"TT", "=", RowBox[{"{", RowBox[{ "AL", ",", "AR", ",", "BD", ",", "BU", ",", "RR", ",", "SS", ",", "XX", ",", "YY", ",", "II"}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{"WW", "=", "DD"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OM", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"UU", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RN", "=", RowBox[{"{", RowBox[{ "9", ",", "2", ",", "6", ",", "6", ",", "6", ",", "6", ",", "1", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"VV", "=", "WW"}], ";", RowBox[{"WW", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", RowBox[{"RN", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}], "]"}], "[", RowBox[{"VV", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "VV", "]"}]}], "}"}]}], "]"}]}], ";", RowBox[{"UU", "=", RowBox[{"Append", "[", RowBox[{"UU", ",", "WW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "RN", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"BA", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", "0.7", "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "BA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TW", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"AbsoluteThickness", "[", "3", "]"}], ",", RowBox[{"Line", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "TW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "UU", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OO", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "0.8"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AA", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "OO"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5693376285770082`*^9, 3.5693376341389227`*^9}, { 3.5693377982852287`*^9, 3.569337888037608*^9}, {3.5693379393936377`*^9, 3.56933796772064*^9}, {3.569338096284155*^9, 3.569338118298115*^9}, { 3.569338694758061*^9, 3.5693387003949423`*^9}, {3.569343994048766*^9, 3.569343994712275*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"AA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.569343997726048*^9, 3.5693439983814917`*^9}}], Cell[BoxData[ GraphicsBox[{ {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {AbsoluteThickness[3], LineBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {GrayLevel[0.7], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {AbsoluteThickness[3], LineBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {GrayLevel[0.7], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {AbsoluteThickness[3], LineBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {AbsoluteThickness[3], LineBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, \ {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {AbsoluteThickness[3], LineBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, {-12, \ -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {GrayLevel[0.7], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, { 12, -12}, {12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {AbsoluteThickness[3], LineBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, {12, -12}, { 12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {GrayLevel[0.7], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {AbsoluteThickness[3], LineBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {AbsoluteThickness[3], LineBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 0, 0], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.569437204035561*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"WW", "=", "DD"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OM", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"UU", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RN", "=", RowBox[{"{", RowBox[{ "9", ",", "2", ",", "6", ",", "6", ",", "6", ",", "6", ",", "1", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "2", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "1"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"VV", "=", "WW"}], ";", RowBox[{"WW", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", RowBox[{"RN", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}], "]"}], "[", RowBox[{"VV", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "VV", "]"}]}], "}"}]}], "]"}]}], ";", RowBox[{"UU", "=", RowBox[{"Append", "[", RowBox[{"UU", ",", "WW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "RN", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"BA", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", "0.7", "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "BA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TW", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"AbsoluteThickness", "[", "3", "]"}], ",", RowBox[{"Line", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "TW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "UU", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OO", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "0.8"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AA", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "OO"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.569338410480034*^9, 3.5693384116834717`*^9}, { 3.5693384417954197`*^9, 3.569338449771701*^9}, {3.569338809767308*^9, 3.5693388893706837`*^9}, {3.569339064465271*^9, 3.5693390672075787`*^9}, { 3.569344005542177*^9, 3.5693440061899233`*^9}}], Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"AA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.569344009574114*^9, 3.5693440102137423`*^9}}], Cell[BoxData[{ RowBox[{ RowBox[{"WW", "=", "DD"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OM", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"UU", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RN", "=", RowBox[{"{", RowBox[{ "9", ",", "2", ",", "6", ",", "6", ",", "6", ",", "6", ",", "1", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "2", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "1", ",", "6", ",", "6", ",", "6", ",", "6", ",", "2", ",", "4"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"VV", "=", "WW"}], ";", RowBox[{"WW", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", RowBox[{"RN", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}], "]"}], "[", RowBox[{"VV", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "VV", "]"}]}], "}"}]}], "]"}]}], ";", RowBox[{"UU", "=", RowBox[{"Append", "[", RowBox[{"UU", ",", "WW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "RN", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"BA", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", "0.7", "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "BA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TW", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"AbsoluteThickness", "[", "3", "]"}], ",", RowBox[{"Line", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "TW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "UU", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OO", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "0.8"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AA", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "OO"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.5693393002898617`*^9, 3.569339303148456*^9}, { 3.5693440177985697`*^9, 3.5693440184138927`*^9}, {3.569375611598797*^9, 3.569375612284294*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"AA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.5693440215569363`*^9, 3.5693440222377577`*^9}}], Cell[BoxData[ GraphicsBox[{ {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {AbsoluteThickness[3], LineBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {GrayLevel[0.7], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {AbsoluteThickness[3], LineBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {GrayLevel[0.7], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {AbsoluteThickness[3], LineBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {AbsoluteThickness[3], LineBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, \ {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {AbsoluteThickness[3], LineBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, {-12, \ -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {GrayLevel[0.7], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, { 12, -12}, {12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {AbsoluteThickness[3], LineBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, {12, -12}, { 12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {GrayLevel[0.7], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {AbsoluteThickness[3], LineBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {AbsoluteThickness[3], LineBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {AbsoluteThickness[3], LineBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {GrayLevel[0.7], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {AbsoluteThickness[3], LineBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {GrayLevel[0.7], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, {0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, {-12, -20}, \ {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, -30}, {-10, \ -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, {0, -30}, { 2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {AbsoluteThickness[3], LineBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, {0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, {-12, -20}, \ {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, -30}, {-10, \ -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, {0, -30}, { 2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {GrayLevel[0.7], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, {22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, {20, -10}, {20, -12}, {18, -12}, { 18, -14}, {32, -14}, {32, -12}, {30, -12}, {30, -10}, {28, -10}, { 28, -12}, {26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, {32, 2}, {32, 4}, {18, 4}}]}, {AbsoluteThickness[3], LineBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, {22, 2}, {24, 2}, { 24, -12}, {22, -12}, {22, -10}, {20, -10}, {20, -12}, {18, -12}, { 18, -14}, {32, -14}, {32, -12}, {30, -12}, {30, -10}, {28, -10}, { 28, -12}, {26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, {32, 2}, {32, 4}, {18, 4}}]}, {GrayLevel[0.7], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {AbsoluteThickness[3], LineBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, { 2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {AbsoluteThickness[3], LineBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, { 2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {GrayLevel[0.7], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -8}, {-12, \ -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, {2, -12}, { 4, -12}, {4, 2}}]}, {AbsoluteThickness[3], LineBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -8}, {-12, \ -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, {2, -12}, { 4, -12}, {4, 2}}]}, {GrayLevel[0.7], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {AbsoluteThickness[3], LineBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {AbsoluteThickness[3], LineBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 0, 0], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.5694373073975677`*^9}] }, Open ]], Cell[BoxData[{ RowBox[{ RowBox[{"WW", "=", "DD"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OM", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"UU", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RN", "=", RowBox[{"{", RowBox[{ "9", ",", "2", ",", "6", ",", "6", ",", "6", ",", "6", ",", "1", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "2", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "1", ",", "6", ",", "6", ",", "6", ",", "2", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "1"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"VV", "=", "WW"}], ";", RowBox[{"WW", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", RowBox[{"RN", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}], "]"}], "[", RowBox[{"VV", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "VV", "]"}]}], "}"}]}], "]"}]}], ";", RowBox[{"UU", "=", RowBox[{"Append", "[", RowBox[{"UU", ",", "WW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "RN", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"BA", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", "0.7", "]"}], ",", RowBox[{"Polygon", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "BA"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"TW", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"AbsoluteThickness", "[", "3", "]"}], ",", RowBox[{"Line", "[", RowBox[{"UU", "[", RowBox[{"[", "kk", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OM", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "TW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kk", ",", RowBox[{"Length", "[", "UU", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OO", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "0.8"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AA", "=", RowBox[{"Append", "[", RowBox[{"OM", ",", "OO"}], "]"}]}], ";"}]}], "Input", CellChangeTimes->{{3.569340046653903*^9, 3.569340070271414*^9}, { 3.5693440286946898`*^9, 3.56934403793545*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"AA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.5693440414224377`*^9, 3.569344042070004*^9}}], Cell[BoxData[ GraphicsBox[{ {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {AbsoluteThickness[3], LineBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {GrayLevel[0.7], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {AbsoluteThickness[3], LineBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {GrayLevel[0.7], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {AbsoluteThickness[3], LineBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {AbsoluteThickness[3], LineBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, \ {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {AbsoluteThickness[3], LineBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, {-12, \ -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {GrayLevel[0.7], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, { 12, -12}, {12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {AbsoluteThickness[3], LineBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, {12, -12}, { 12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {GrayLevel[0.7], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {AbsoluteThickness[3], LineBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {AbsoluteThickness[3], LineBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {AbsoluteThickness[3], LineBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {GrayLevel[0.7], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {AbsoluteThickness[3], LineBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {GrayLevel[0.7], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, {0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, {-12, -20}, \ {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, -30}, {-10, \ -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, {0, -30}, { 2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {AbsoluteThickness[3], LineBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, {0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, {-12, -20}, \ {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, -30}, {-10, \ -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, {0, -30}, { 2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {GrayLevel[0.7], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, {22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, {20, -10}, {20, -12}, {18, -12}, { 18, -14}, {32, -14}, {32, -12}, {30, -12}, {30, -10}, {28, -10}, { 28, -12}, {26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, {32, 2}, {32, 4}, {18, 4}}]}, {AbsoluteThickness[3], LineBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, {22, 2}, {24, 2}, { 24, -12}, {22, -12}, {22, -10}, {20, -10}, {20, -12}, {18, -12}, { 18, -14}, {32, -14}, {32, -12}, {30, -12}, {30, -10}, {28, -10}, { 28, -12}, {26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, {32, 2}, {32, 4}, {18, 4}}]}, {GrayLevel[0.7], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {AbsoluteThickness[3], LineBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {GrayLevel[0.7], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {AbsoluteThickness[3], LineBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, { 22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {GrayLevel[0.7], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {GrayLevel[0.7], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, { 2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {AbsoluteThickness[3], LineBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, { 2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {GrayLevel[0.7], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -8}, {-12, \ -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, {2, -12}, { 4, -12}, {4, 2}}]}, {AbsoluteThickness[3], LineBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -8}, {-12, \ -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, {2, -12}, { 4, -12}, {4, 2}}]}, {GrayLevel[0.7], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {AbsoluteThickness[3], LineBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {GrayLevel[0.7], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {AbsoluteThickness[3], LineBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {AbsoluteThickness[3], LineBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {GrayLevel[0.7], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {AbsoluteThickness[3], LineBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {GrayLevel[0.7], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, -8}, {-2, -10}, \ {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, -10}, {-8, \ -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, -22}, {-12, \ -22}, {-12, -24}, {2, -24}}]}, {AbsoluteThickness[3], LineBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, -8}, {-2, -10}, \ {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, -10}, {-8, \ -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, -22}, {-12, \ -22}, {-12, -24}, {2, -24}}]}, {GrayLevel[0.7], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, {8, -6}, { 22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {AbsoluteThickness[3], LineBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, {8, -6}, { 22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {GrayLevel[0.7], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {AbsoluteThickness[3], LineBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {GrayLevel[0.7], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {AbsoluteThickness[3], LineBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {GrayLevel[0.7], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {AbsoluteThickness[3], LineBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[1, 0, 0], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.569437420805921*^9}] }, Open ]], Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"B0", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.569344841941475*^9, 3.569344861157723*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"T0", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.5693448827370453`*^9, 3.569344883518488*^9}}], Cell[BoxData[ GraphicsBox[ {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.569437594700466*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"B0", ",", "T0", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.5693449097773523`*^9, 3.569344910857974*^9}}], Cell[BoxData[ GraphicsBox[{ {RGBColor[1, 1, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {AbsoluteThickness[3], LineBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, { 12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.569437600229526*^9}] }, Open ]], Cell[BoxData[ RowBox[{"\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"CC", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "3"}]}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "5"}]}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", RowBox[{"-", "7"}]}], "}"}], ",", RowBox[{"{", RowBox[{"9", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "5"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "7"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", "7"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", RowBox[{"-", "7"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"DD", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"CC", "[", RowBox[{"[", "jj", "]"}], "]"}], "+", RowBox[{"{", RowBox[{"5", ",", "5"}], "}"}]}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "CC", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"II", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], ",", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"AL", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"AR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"BD", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "+", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"BU", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}], "-", "10"}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"RR", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"SS", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}]}], ",", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"XX", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "-", "10"}]}], "}"}]}], ";", " ", RowBox[{ RowBox[{"YY", "[", "xx_", "]"}], ":=", RowBox[{"{", RowBox[{ RowBox[{"-", RowBox[{"xx", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{ RowBox[{"xx", "[", RowBox[{"[", "2", "]"}], "]"}], "+", "10"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"TT", "=", RowBox[{"{", RowBox[{ "AL", ",", "AR", ",", "BD", ",", "BU", ",", "RR", ",", "SS", ",", "XX", ",", "YY", ",", "II"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"HHH", "=", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",", RowBox[{"RGBColor", "[", RowBox[{"1", ",", "1", ",", "0"}], "]"}], ",", RowBox[{"RGBColor", "[", RowBox[{"0", ",", "1", ",", "0"}], "]"}], ",", RowBox[{"RGBColor", "[", RowBox[{"0", ",", "0", ",", "1"}], "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"CWW", "=", RowBox[{"{", RowBox[{"1", ",", "DD"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PAL", "=", RowBox[{"{", RowBox[{"2", ",", "1", ",", "4", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PAR", "=", RowBox[{"{", RowBox[{"2", ",", "1", ",", "4", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PBD", "=", RowBox[{"{", RowBox[{"2", ",", "1", ",", "4", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PBU", "=", RowBox[{"{", RowBox[{"2", ",", "1", ",", "4", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PRR", "=", RowBox[{"{", RowBox[{"4", ",", "3", ",", "1", ",", "2"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PSS", "=", RowBox[{"{", RowBox[{"3", ",", "4", ",", "2", ",", "1"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PXX", "=", RowBox[{"{", RowBox[{"2", ",", "1", ",", "4", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PYY", "=", RowBox[{"{", RowBox[{"2", ",", "1", ",", "4", ",", "3"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PII", "=", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"PPP", "=", RowBox[{"{", RowBox[{ "PAL", ",", "PAR", ",", "PBD", ",", "PBU", ",", "PRR", ",", "PSS", ",", "PXX", ",", "PYY", ",", "PII"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OOM", "=", RowBox[{"{", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"UUU", "=", RowBox[{"{", "CWW", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"RN", "=", RowBox[{"{", RowBox[{ "9", ",", "2", ",", "6", ",", "6", ",", "6", ",", "6", ",", "1", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "2", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "1", ",", "6", ",", "6", ",", "6", ",", "2", ",", "4", ",", "6", ",", "6", ",", "6", ",", "6", ",", "3", ",", "1"}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"VV", "=", RowBox[{"CWW", "[", RowBox[{"[", "2", "]"}], "]"}]}], ";", RowBox[{"WX", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"TT", "[", RowBox[{"[", RowBox[{"RN", "[", RowBox[{"[", "kkk", "]"}], "]"}], "]"}], "]"}], "[", RowBox[{"VV", "[", RowBox[{"[", "jj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jj", ",", "1", ",", RowBox[{"Length", "[", "VV", "]"}]}], "}"}]}], "]"}]}], ";", RowBox[{"CX", "=", RowBox[{ RowBox[{"PPP", "[", RowBox[{"[", RowBox[{"RN", "[", RowBox[{"[", "kkk", "]"}], "]"}], "]"}], "]"}], "[", RowBox[{"[", RowBox[{"CWW", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}]}], ";", RowBox[{"CWW", "=", RowBox[{"{", RowBox[{"CX", ",", "WX"}], "}"}]}], ";", RowBox[{"UUU", "=", RowBox[{"Append", "[", RowBox[{"UUU", ",", "CWW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kkk", ",", "2", ",", RowBox[{"Length", "[", "RN", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", RowBox[{ RowBox[{ RowBox[{"ABW", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"HHH", "[", RowBox[{"[", RowBox[{ RowBox[{"UUU", "[", RowBox[{"[", "kkk", "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",", RowBox[{"Polygon", "[", RowBox[{ RowBox[{"UUU", "[", RowBox[{"[", "kkk", "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "]"}]}], "}"}], "]"}]}], ";", RowBox[{"OOM", "=", RowBox[{"Append", "[", RowBox[{"OOM", ",", "ABW"}], "]"}]}]}], ",", RowBox[{"{", RowBox[{"kkk", ",", "1", ",", RowBox[{"Length", "[", "UUU", "]"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"OOO", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"1", ",", "1", ",", "1"}], "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", "0.8"}], "]"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AMA", "=", RowBox[{"Append", "[", RowBox[{"OOM", ",", "OOO"}], "]"}]}], ";"}], " "}]}]], "Input", CellChangeTimes->{ 3.569353994744529*^9, {3.569354140599128*^9, 3.569354315473137*^9}, 3.56935438941179*^9, {3.569354424380837*^9, 3.569354581425099*^9}, { 3.569354764818178*^9, 3.56935479476693*^9}, {3.569354850231167*^9, 3.56935487145345*^9}, {3.569354953825801*^9, 3.569354954097722*^9}, { 3.569355019057139*^9, 3.569355119773181*^9}, {3.5693552312282248`*^9, 3.569355234751275*^9}, {3.569355318530828*^9, 3.569355319386198*^9}, { 3.56935555160013*^9, 3.569355554759738*^9}, {3.569355625388673*^9, 3.5693556908724737`*^9}, {3.569355728945805*^9, 3.56935578248352*^9}, { 3.569355814139545*^9, 3.569355822539689*^9}, {3.5693558529770727`*^9, 3.5693560869859467`*^9}, {3.5693561694642897`*^9, 3.569356173314485*^9}, { 3.5693562420659657`*^9, 3.569356248920682*^9}, 3.569356334047504*^9, { 3.569356667267288*^9, 3.569356672099742*^9}, {3.569356721242496*^9, 3.56935672575247*^9}, {3.569357005219841*^9, 3.5693570258929787`*^9}, { 3.569357179186861*^9, 3.5693571845166817`*^9}, {3.5693573159326687`*^9, 3.569357348480151*^9}, {3.569357378639377*^9, 3.569357379364851*^9}, { 3.569357532937076*^9, 3.569357546037368*^9}, {3.5693575922089*^9, 3.5693575976633987`*^9}, {3.569357846053507*^9, 3.569357873915934*^9}, { 3.569357908561398*^9, 3.569357922561429*^9}, {3.569357978816546*^9, 3.569357990311028*^9}, {3.569358248050963*^9, 3.569358278178701*^9}, 3.569358316921015*^9, 3.569358402054545*^9, 3.569358849674183*^9, 3.569358923948266*^9, {3.569359004101365*^9, 3.569359006004117*^9}, { 3.569359041419633*^9, 3.569359042303423*^9}, {3.569359180310611*^9, 3.569359187940021*^9}, {3.569359523207869*^9, 3.569359547242248*^9}, { 3.5693595954450903`*^9, 3.569359596102045*^9}, {3.5693596623554068`*^9, 3.5693596861278143`*^9}, {3.569359732921814*^9, 3.569359768712674*^9}, { 3.569373184034446*^9, 3.569373236474955*^9}, {3.569373394699419*^9, 3.569373446847686*^9}, {3.5693740749655457`*^9, 3.569374080139189*^9}, { 3.569374197741555*^9, 3.569374209251176*^9}, {3.569374246720764*^9, 3.5693742500797997`*^9}, {3.5693742997662067`*^9, 3.5693743212521877`*^9}, {3.5693743858229017`*^9, 3.569374385941723*^9}, { 3.569374766579048*^9, 3.569374776253093*^9}, 3.569374989385054*^9, { 3.569375954030632*^9, 3.5693759618026667`*^9}, {3.569376088470643*^9, 3.569376089246015*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Show", "[", RowBox[{"AMA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]], "Input", CellChangeTimes->{{3.569356093725321*^9, 3.5693561017965603`*^9}}], Cell[BoxData[ GraphicsBox[{ {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, \ {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, { 12, -12}, {12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, {0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, {-12, -20}, \ {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, -30}, {-10, \ -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, {0, -30}, { 2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, {22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, {20, -10}, {20, -12}, {18, -12}, { 18, -14}, {32, -14}, {32, -12}, {30, -12}, {30, -10}, {28, -10}, { 28, -12}, {26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, {32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, { 2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -8}, {-12, \ -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, {2, -12}, { 4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, -8}, {-2, -10}, \ {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, -10}, {-8, \ -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, -22}, {-12, \ -22}, {-12, -24}, {2, -24}}]}, {RGBColor[1, 1, 0], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, {8, -6}, { 22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[1, 1, 1], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.569437731979102*^9}] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"QQQ", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{"UUU", "[", RowBox[{"[", "kkk", "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"kkk", ",", "1", ",", RowBox[{"Length", "[", "UUU", "]"}]}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"MMM", "[", "XYZ_", "]"}], ":=", RowBox[{"Sqrt", "[", RowBox[{"Max", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"XYZ", "[", RowBox[{"[", "kkk", "]"}], "]"}], "[", RowBox[{"[", "1", "]"}], "]"}], "^", "2"}], "+", RowBox[{ RowBox[{ RowBox[{"XYZ", "[", RowBox[{"[", "kkk", "]"}], "]"}], "[", RowBox[{"[", "2", "]"}], "]"}], "^", "2"}]}], ",", RowBox[{"{", RowBox[{"kkk", ",", RowBox[{"Length", "[", "XYZ", "]"}]}], "}"}]}], "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"QQM", "=", RowBox[{"Max", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"MMM", "[", RowBox[{"QQQ", "[", RowBox[{"[", "jjj", "]"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jjj", ",", "1", ",", RowBox[{"Length", "[", "QQQ", "]"}]}], "}"}]}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BOUND", "=", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"GrayLevel", "[", "0.8", "]"}], ",", RowBox[{"Disk", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"1.05", "*", "QQM"}]}], "]"}]}], "}"}], "]"}]}], ";", " ", RowBox[{"Show", "[", RowBox[{"BOUND", ",", "AMA", ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]}]}], "Input", CellChangeTimes->{{3.569376609961893*^9, 3.5693766393036222`*^9}, { 3.5693766808308764`*^9, 3.569376726692915*^9}, {3.5693767670477467`*^9, 3.569376922466473*^9}, {3.569377023474533*^9, 3.56937706267418*^9}, 3.5693770934484787`*^9, {3.569377128583359*^9, 3.569377147966229*^9}, { 3.569377181259103*^9, 3.569377198328308*^9}, 3.569377286643214*^9, { 3.569377340971148*^9, 3.569377520260995*^9}, {3.569377610438046*^9, 3.569377632186276*^9}}], Cell[BoxData[ GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, {-10, -12}, {-8, \ -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, -10}, {-22, -10}, \ {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, {-20, -20}, {-20, \ -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, -18}, {-10, -20}, \ {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, {12, -10}, {12, -8}, { 14, -8}, {14, -22}, {12, -22}, {12, -20}, {10, -20}, {10, -22}, { 8, -22}, {8, -24}, {22, -24}, {22, -22}, {20, -22}, {20, -20}, { 18, -20}, {18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, {-12, -10}, \ {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, -12}, {-22, \ -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, {10, -12}, { 12, -12}, {12, -14}, {-2, -14}, {-2, -12}, {0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, -22}, {-2, -20}, \ {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, {12, -18}, {10, -18}, { 10, -20}, {12, -20}, {12, -22}, {14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, {0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, {-12, -20}, \ {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, -30}, {-10, \ -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, {0, -30}, { 2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, {22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, {20, -10}, {20, -12}, {18, -12}, { 18, -14}, {32, -14}, {32, -12}, {30, -12}, {30, -10}, {28, -10}, { 28, -12}, {26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, {32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, {10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, {8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, {22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, {20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, {10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, { 2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, {2, -2}, { 2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, -8}, {-12, \ -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, {2, -12}, { 4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, -8}, {-2, -10}, \ {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, -10}, {-8, \ -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, -22}, {-12, \ -22}, {-12, -24}, {2, -24}}]}, {RGBColor[1, 1, 0], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, {22, -2}, { 22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, {8, 0}, {8, 2}, {6, 2}, { 6, -12}, {8, -12}, {8, -10}, {10, -10}, {10, -8}, {8, -8}, {8, -6}, { 22, -6}, {22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, {0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, {10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, { 22, -4}, {22, -2}, {20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, {18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, { 4, -12}, {2, -12}, {2, -10}, {0, -10}, {0, -12}, {-2, -12}, {-2, -14}, { 12, -14}, {12, -12}, {10, -12}, {10, -10}, {8, -10}, {8, -12}, { 6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[1, 1, 1], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic]], "Output", CellChangeTimes->{3.569438019977865*^9}] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"SHW", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Show", "[", RowBox[{"BOUND", ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"AMA", "[", RowBox[{"[", "jjj", "]"}], "]"}], ",", RowBox[{"{", RowBox[{"jjj", ",", "1", ",", "kkk"}], "}"}]}], "]"}], ",", RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}], ",", RowBox[{"{", RowBox[{"kkk", ",", "1", ",", RowBox[{"Length", "[", "AMA", "]"}]}], "}"}]}], "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.569377794000105*^9, 3.569377810387188*^9}, { 3.569377870759363*^9, 3.569377885234034*^9}, {3.569377917615851*^9, 3.569377961567555*^9}, {3.569378021894589*^9, 3.569378030773562*^9}, { 3.5693781622024927`*^9, 3.569378164296831*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListAnimate", "[", RowBox[{"SHW", ",", "5", ",", RowBox[{"AnimationRepetitions", "\[Rule]", "2"}]}], "]"}]], "Input", CellChangeTimes->{{3.569378090795247*^9, 3.5693781270748787`*^9}, { 3.5693781773525753`*^9, 3.569378177749658*^9}}], Cell[BoxData[ TagBox[ StyleBox[ DynamicModuleBox[{$CellContext`i4$$ = 33, Typeset`show$$ = True, Typeset`bookmarkList$$ = { "\"min\"" :> {$CellContext`i4$$ = 1}, "\"max\"" :> {$CellContext`i4$$ = 33}}, Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{ Hold[$CellContext`i4$$], 1, ""}, 1, 33, 1}}, Typeset`size$$ = Automatic, Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True, $CellContext`i4$2598$$ = 0}, PaneBox[ PanelBox[ DynamicWrapperBox[GridBox[{ { ItemBox[ ItemBox[ TagBox[ StyleBox[GridBox[{ {"\<\"\"\>", AnimatorBox[Dynamic[$CellContext`i4$$], {1, 33, 1}, AnimationRate->5, AnimationRepetitions->2, AppearanceElements->{ "ProgressSlider", "PlayPauseButton", "FasterSlowerButtons", "DirectionButton"}, AutoAction->False, DisplayAllSteps->True, PausedTime->0.]} }, AutoDelete->False, GridBoxAlignment->{ "Columns" -> {Right, {Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "ListAnimateLabel", StripOnInput->False], {"ControlArea", Top}], Alignment->{Automatic, Inherited}, StripOnInput->False], Background->None, StripOnInput->False]}, { ItemBox[ TagBox[ StyleBox[ PaneBox[ TagBox[ PaneSelectorBox[{1-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}}, AspectRatio->Automatic], 2-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}}, AspectRatio->Automatic], 3-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}}, AspectRatio->Automatic], 4-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}}, AspectRatio->Automatic], 5-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}}, AspectRatio->Automatic], 6-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}}, AspectRatio->Automatic], 7-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}}, AspectRatio->Automatic], 8-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}}, AspectRatio->Automatic], 9-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}}, AspectRatio->Automatic], 10-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}}, AspectRatio->Automatic], 11-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}}, AspectRatio->Automatic], 12-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}}, AspectRatio->Automatic], 13-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}}, AspectRatio->Automatic], 14-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}}, AspectRatio->Automatic], 15-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}}, AspectRatio->Automatic], 16-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}}, AspectRatio->Automatic], 17-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}}, AspectRatio->Automatic], 18-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}}, AspectRatio->Automatic], 19-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}}, AspectRatio->Automatic], 20-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}}, AspectRatio->Automatic], 21-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}}, AspectRatio->Automatic], 22-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}}, AspectRatio->Automatic], 23-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}}, AspectRatio->Automatic], 24-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}}, AspectRatio->Automatic], 25-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}}, AspectRatio->Automatic], 26-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}}, AspectRatio->Automatic], 27-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}}, AspectRatio->Automatic], 28-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, \ -8}, {-2, -10}, {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, \ -10}, {-8, -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, \ -22}, {-12, -22}, {-12, -24}, {2, -24}}]}}, AspectRatio->Automatic], 29-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, \ -8}, {-2, -10}, {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, \ -10}, {-8, -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, \ -22}, {-12, -22}, {-12, -24}, {2, -24}}]}, {RGBColor[1, 1, 0], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, { 22, -2}, {22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, { 8, 0}, {8, 2}, {6, 2}, {6, -12}, {8, -12}, {8, -10}, { 10, -10}, {10, -8}, {8, -8}, {8, -6}, {22, -6}, { 22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}}, AspectRatio->Automatic], 30-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, \ -8}, {-2, -10}, {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, \ -10}, {-8, -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, \ -22}, {-12, -22}, {-12, -24}, {2, -24}}]}, {RGBColor[1, 1, 0], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, { 22, -2}, {22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, { 8, 0}, {8, 2}, {6, 2}, {6, -12}, {8, -12}, {8, -10}, { 10, -10}, {10, -8}, {8, -8}, {8, -6}, {22, -6}, { 22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}}, AspectRatio->Automatic], 31-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, \ -8}, {-2, -10}, {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, \ -10}, {-8, -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, \ -22}, {-12, -22}, {-12, -24}, {2, -24}}]}, {RGBColor[1, 1, 0], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, { 22, -2}, {22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, { 8, 0}, {8, 2}, {6, 2}, {6, -12}, {8, -12}, {8, -10}, { 10, -10}, {10, -8}, {8, -8}, {8, -6}, {22, -6}, { 22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}}, AspectRatio->Automatic], 32-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, \ -8}, {-2, -10}, {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, \ -10}, {-8, -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, \ -22}, {-12, -22}, {-12, -24}, {2, -24}}]}, {RGBColor[1, 1, 0], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, { 22, -2}, {22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, { 8, 0}, {8, 2}, {6, 2}, {6, -12}, {8, -12}, {8, -10}, { 10, -10}, {10, -8}, {8, -8}, {8, -6}, {22, -6}, { 22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}}, AspectRatio->Automatic], 33-> GraphicsBox[{ {GrayLevel[0.8], DiskBox[{0, 0}, 36.67492331280326]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, 6}, {-8, 8}, {-10, 8}, {-10, 10}, {-12, 10}, {-12, 8}, {-14, 8}, {-14, 22}, {-12, 22}, {-12, 20}, {-10, 20}, {-10, 22}, {-8, 22}, {-8, 24}, {-22, 24}, {-22, 22}, {-20, 22}, {-20, 20}, {-18, 20}, {-18, 22}, {-16, 22}, {-16, 8}, {-18, 8}, {-18, 10}, {-20, 10}, {-20, 8}, {-22, 8}, {-22, 6}, {-8, 6}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-6, -8}, {-8, -8}, {-8, -10}, {-10, -10}, \ {-10, -12}, {-8, -12}, {-8, -14}, {-22, -14}, {-22, -12}, {-20, -12}, {-20, \ -10}, {-22, -10}, {-22, -8}, {-24, -8}, {-24, -22}, {-22, -22}, {-22, -20}, \ {-20, -20}, {-20, -18}, {-22, -18}, {-22, -16}, {-8, -16}, {-8, -18}, {-10, \ -18}, {-10, -20}, {-8, -20}, {-8, -22}, {-6, -22}, {-6, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, -6}, {8, -8}, {10, -8}, {10, -10}, { 12, -10}, {12, -8}, {14, -8}, {14, -22}, {12, -22}, { 12, -20}, {10, -20}, {10, -22}, {8, -22}, {8, -24}, { 22, -24}, {22, -22}, {20, -22}, {20, -20}, {18, -20}, { 18, -22}, {16, -22}, {16, -8}, {18, -8}, {18, -10}, { 20, -10}, {20, -8}, {22, -8}, {22, -6}, {8, -6}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-8, -14}, {-8, -12}, {-10, -12}, {-10, -10}, \ {-12, -10}, {-12, -12}, {-14, -12}, {-14, 2}, {-12, 2}, {-12, 0}, {-10, 0}, {-10, 2}, {-8, 2}, {-8, 4}, {-22, 4}, {-22, 2}, {-20, 2}, {-20, 0}, {-18, 0}, {-18, 2}, {-16, 2}, {-16, -12}, {-18, -12}, {-18, -10}, {-20, -10}, {-20, \ -12}, {-22, -12}, {-22, -14}, {-8, -14}}]}, {RGBColor[1, 0, 0], PolygonBox[{{14, -8}, {12, -8}, {12, -10}, {10, -10}, { 10, -12}, {12, -12}, {12, -14}, {-2, -14}, {-2, -12}, { 0, -12}, { 0, -10}, {-2, -10}, {-2, -8}, {-4, -8}, {-4, -22}, {-2, \ -22}, {-2, -20}, {0, -20}, {0, -18}, {-2, -18}, {-2, -16}, {12, -16}, { 12, -18}, {10, -18}, {10, -20}, {12, -20}, {12, -22}, { 14, -22}, {14, -8}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[1, 1, 0], PolygonBox[{{-14, 8}, {-12, 8}, {-12, 10}, {-10, 10}, {-10, 12}, {-12, 12}, {-12, 14}, {2, 14}, {2, 12}, {0, 12}, {0, 10}, {2, 10}, {2, 8}, {4, 8}, {4, 22}, {2, 22}, {2, 20}, {0, 20}, {0, 18}, {2, 18}, {2, 16}, {-12, 16}, {-12, 18}, {-10, 18}, {-10, 20}, {-12, 20}, {-12, 22}, {-14, 22}, {-14, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[0, 1, 0], PolygonBox[{{-18, -4}, {-18, -2}, {-20, -2}, {-20, 0}, {-22, 0}, {-22, -2}, {-24, -2}, {-24, 12}, {-22, 12}, {-22, 10}, {-20, 10}, {-20, 12}, {-18, 12}, {-18, 14}, {-32, 14}, {-32, 12}, {-30, 12}, {-30, 10}, {-28, 10}, {-28, 12}, {-26, 12}, {-26, -2}, {-28, -2}, {-28, 0}, {-30, 0}, {-30, -2}, {-32, -2}, {-32, -4}, {-18, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, -18}, {2, -18}, {2, -20}, {0, -20}, { 0, -22}, {2, -22}, { 2, -24}, {-12, -24}, {-12, -22}, {-10, -22}, {-10, -20}, \ {-12, -20}, {-12, -18}, {-14, -18}, {-14, -32}, {-12, -32}, {-12, -30}, {-10, \ -30}, {-10, -28}, {-12, -28}, {-12, -26}, {2, -26}, {2, -28}, {0, -28}, { 0, -30}, {2, -30}, {2, -32}, {4, -32}, {4, -18}}]}, {RGBColor[0, 0, 1], PolygonBox[{{18, 4}, {18, 2}, {20, 2}, {20, 0}, {22, 0}, { 22, 2}, {24, 2}, {24, -12}, {22, -12}, {22, -10}, { 20, -10}, {20, -12}, {18, -12}, {18, -14}, {32, -14}, { 32, -12}, {30, -12}, {30, -10}, {28, -10}, {28, -12}, { 26, -12}, {26, 2}, {28, 2}, {28, 0}, {30, 0}, {30, 2}, { 32, 2}, {32, 4}, {18, 4}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, 18}, {-2, 18}, {-2, 20}, {0, 20}, {0, 22}, {-2, 22}, {-2, 24}, {12, 24}, {12, 22}, {10, 22}, { 10, 20}, {12, 20}, {12, 18}, {14, 18}, {14, 32}, {12, 32}, {12, 30}, {10, 30}, {10, 28}, {12, 28}, {12, 26}, {-2, 26}, {-2, 28}, {0, 28}, {0, 30}, {-2, 30}, {-2, 32}, {-4, 32}, {-4, 18}}]}, {RGBColor[1, 1, 0], PolygonBox[{{6, 8}, {8, 8}, {8, 10}, {10, 10}, {10, 12}, { 8, 12}, {8, 14}, {22, 14}, {22, 12}, {20, 12}, {20, 10}, { 22, 10}, {22, 8}, {24, 8}, {24, 22}, {22, 22}, {22, 20}, { 20, 20}, {20, 18}, {22, 18}, {22, 16}, {8, 16}, {8, 18}, { 10, 18}, {10, 20}, {8, 20}, {8, 22}, {6, 22}, {6, 8}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-4, -2}, {-2, -2}, {-2, 0}, {0, 0}, {0, 2}, {-2, 2}, {-2, 4}, {12, 4}, {12, 2}, {10, 2}, {10, 0}, {12, 0}, {12, -2}, {14, -2}, {14, 12}, {12, 12}, {12, 10}, {10, 10}, {10, 8}, {12, 8}, {12, 6}, {-2, 6}, {-2, 8}, {0, 8}, {0, 10}, {-2, 10}, {-2, 12}, {-4, 12}, {-4, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -4}, {2, -2}, {0, -2}, {0, 0}, {-2, 0}, {-2, -2}, {-4, -2}, {-4, 12}, {-2, 12}, {-2, 10}, {0, 10}, {0, 12}, {2, 12}, {2, 14}, {-12, 14}, {-12, 12}, {-10, 12}, {-10, 10}, {-8, 10}, {-8, 12}, {-6, 12}, {-6, -2}, {-8, -2}, {-8, 0}, {-10, 0}, {-10, -2}, {-12, -2}, {-12, -4}, {2, -4}}]}, {RGBColor[1, 1, 0], PolygonBox[{{4, 2}, {2, 2}, {2, 0}, {0, 0}, {0, -2}, { 2, -2}, {2, -4}, {-12, -4}, {-12, -2}, {-10, -2}, {-10, 0}, {-12, 0}, {-12, 2}, {-14, 2}, {-14, -12}, {-12, -12}, {-12, -10}, {-10, -10}, {-10, \ -8}, {-12, -8}, {-12, -6}, {2, -6}, {2, -8}, {0, -8}, {0, -10}, {2, -10}, { 2, -12}, {4, -12}, {4, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[1, 0, 0], PolygonBox[{{-24, -2}, {-22, -2}, {-22, 0}, {-20, 0}, {-20, 2}, {-22, 2}, {-22, 4}, {-8, 4}, {-8, 2}, {-10, 2}, {-10, 0}, {-8, 0}, {-8, -2}, {-6, -2}, {-6, 12}, {-8, 12}, {-8, 10}, {-10, 10}, {-10, 8}, {-8, 8}, {-8, 6}, {-22, 6}, {-22, 8}, {-20, 8}, {-20, 10}, {-22, 10}, {-22, 12}, {-24, 12}, {-24, -2}}]}, {RGBColor[0, 1, 0], PolygonBox[{{2, -24}, {2, -22}, {0, -22}, { 0, -20}, {-2, -20}, {-2, -22}, {-4, -22}, {-4, -8}, {-2, \ -8}, {-2, -10}, {0, -10}, {0, -8}, {2, -8}, { 2, -6}, {-12, -6}, {-12, -8}, {-10, -8}, {-10, -10}, {-8, \ -10}, {-8, -8}, {-6, -8}, {-6, -22}, {-8, -22}, {-8, -20}, {-10, -20}, {-10, \ -22}, {-12, -22}, {-12, -24}, {2, -24}}]}, {RGBColor[1, 1, 0], PolygonBox[{{24, 2}, {22, 2}, {22, 0}, {20, 0}, {20, -2}, { 22, -2}, {22, -4}, {8, -4}, {8, -2}, {10, -2}, {10, 0}, { 8, 0}, {8, 2}, {6, 2}, {6, -12}, {8, -12}, {8, -10}, { 10, -10}, {10, -8}, {8, -8}, {8, -6}, {22, -6}, { 22, -8}, {20, -8}, {20, -10}, {22, -10}, {22, -12}, { 24, -12}, {24, 2}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 24}, {-2, 22}, {0, 22}, {0, 20}, {2, 20}, {2, 22}, {4, 22}, {4, 8}, {2, 8}, {2, 10}, {0, 10}, { 0, 8}, {-2, 8}, {-2, 6}, {12, 6}, {12, 8}, {10, 8}, {10, 10}, {8, 10}, {8, 8}, {6, 8}, {6, 22}, {8, 22}, {8, 20}, { 10, 20}, {10, 22}, {12, 22}, {12, 24}, {-2, 24}}]}, {RGBColor[0, 1, 0], PolygonBox[{{8, 14}, {8, 12}, {10, 12}, {10, 10}, {12, 10}, {12, 12}, {14, 12}, {14, -2}, {12, -2}, {12, 0}, {10, 0}, {10, -2}, {8, -2}, {8, -4}, {22, -4}, {22, -2}, { 20, -2}, {20, 0}, {18, 0}, {18, -2}, {16, -2}, {16, 12}, { 18, 12}, {18, 10}, {20, 10}, {20, 12}, {22, 12}, {22, 14}, {8, 14}}]}, {RGBColor[0, 0, 1], PolygonBox[{{-2, 4}, {-2, 2}, {0, 2}, {0, 0}, {2, 0}, {2, 2}, {4, 2}, {4, -12}, {2, -12}, {2, -10}, {0, -10}, { 0, -12}, {-2, -12}, {-2, -14}, {12, -14}, {12, -12}, { 10, -12}, {10, -10}, {8, -10}, {8, -12}, {6, -12}, {6, 2}, {8, 2}, {8, 0}, {10, 0}, {10, 2}, {12, 2}, {12, 4}, {-2, 4}}]}, {RGBColor[1, 1, 1], DiskBox[{0, 0}, 0.8]}}, AspectRatio->Automatic]}, Dynamic[$CellContext`i4$$], Alignment->Automatic, ImageSize->All], Identity, Editable->True, Selectable->True], ImageMargins->10], Deployed->False, StripOnInput->False, ScriptLevel->0, GraphicsBoxOptions->{PreserveImageOptions->True}, Graphics3DBoxOptions->{PreserveImageOptions->True}], Identity, Editable->False, Selectable->False], Alignment->{Left, Center}, Background->GrayLevel[1], Frame->1, FrameStyle->GrayLevel[0, 0.2], ItemSize->Automatic, StripOnInput->False]} }, AutoDelete->False, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Top}}, "RowsIndexed" -> {}}, GridBoxDividers->{ "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, "RowsIndexed" -> {}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> { Offset[0.7], { Offset[0.5599999999999999]}, Offset[0.7]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.4], { Offset[0.8]}, Offset[0.4]}, "RowsIndexed" -> {}}], If[ CurrentValue["SelectionOver"], Manipulate`Dump`ReadControllerState[ Map[Manipulate`Dump`updateOneVar[#, CurrentValue["PreviousFormatTime"], CurrentValue["CurrentFormatTime"]]& , { Manipulate`Dump`controllerLink[{$CellContext`i4$$, \ $CellContext`i4$2598$$}, "X1", If["DefaultAbsolute", True, "JB1"], False, {1, 33, 1}, 33, 1.]}], CurrentValue[{ "ControllerData", { "Gamepad", "Joystick", "Multi-Axis Controller"}}], {}]], ImageSizeCache->{295., {157.125, 161.375}}], DefaultBaseStyle->{}, FrameMargins->{{5, 5}, {5, 5}}], BaselinePosition->Automatic, ImageMargins->0], Deinitialization:>None, DynamicModuleValues:>{}, SynchronousInitialization->True, UnsavedVariables:>{Typeset`initDone$$}, UntrackedVariables:>{Typeset`size$$}], "ListAnimate", Deployed->True, StripOnInput->False], Manipulate`InterpretManipulate[1]]], "Output", CellChangeTimes->{{3.56943814286273*^9, 3.569438164038968*^9}}] }, Open ]] }, WindowSize->{482, 526}, WindowMargins->{{57, Automatic}, {Automatic, 7}}, Magnification->0.75, FrontEndVersion->"9.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (November 20, \ 2012)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[545, 20, 1195, 18, 49, "Input"], Cell[1743, 40, 11323, 337, 387, "Input"], Cell[CellGroupData[{ Cell[13091, 381, 245, 5, 23, "Input"], Cell[13339, 388, 18249, 302, 326, "Output"] }, Open ]], Cell[31603, 693, 9772, 315, 400, "Input"], Cell[CellGroupData[{ Cell[41400, 1012, 335, 8, 36, "Input"], Cell[41738, 1022, 18014, 301, 149, "Output"] }, Open ]], Cell[59767, 1326, 8933, 296, 374, "Input"], Cell[CellGroupData[{ Cell[68725, 1626, 197, 4, 23, "Input"], Cell[68925, 1632, 9376, 160, 281, "Output"] }, Open ]], Cell[78316, 1795, 3136, 91, 179, "Input"], Cell[81455, 1888, 197, 4, 23, "Input"], Cell[81655, 1894, 3103, 91, 192, "Input"], Cell[CellGroupData[{ Cell[84783, 1989, 199, 4, 23, "Input"], Cell[84985, 1995, 19198, 329, 281, "Output"] }, Open ]], Cell[104198, 2327, 3102, 90, 192, "Input"], Cell[CellGroupData[{ Cell[107325, 2421, 197, 4, 23, "Input"], Cell[107525, 2427, 22657, 388, 281, "Output"] }, Open ]], Cell[130197, 2818, 195, 4, 23, "Input"], Cell[CellGroupData[{ Cell[130417, 2826, 197, 4, 23, "Input"], Cell[130617, 2832, 433, 8, 223, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[131087, 2845, 208, 4, 23, "Input"], Cell[131298, 2851, 781, 15, 223, "Output"] }, Open ]], Cell[132094, 2869, 14302, 406, 569, "Input"], Cell[CellGroupData[{ Cell[146421, 3279, 198, 4, 23, "Input"], Cell[146622, 3285, 11466, 198, 281, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[158125, 3488, 2378, 67, 101, "Input"], Cell[160506, 3557, 11524, 199, 281, "Output"] }, Open ]], Cell[172045, 3759, 834, 21, 36, "Input"], Cell[CellGroupData[{ Cell[172904, 3784, 267, 5, 23, "Input"], Cell[173174, 3791, 264801, 4046, 377, "Output"] }, Open ]] } ] *) (* End of internal cache information *)