fractal-angels-devils.nb

(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 10.4' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    374157,       6535]
NotebookOptionsPosition[    372957,       6488]
NotebookOutlinePosition[    373300,       6503]
CellTagsIndexPosition[    373257,       6500]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Fractal Shoulder Angels and Devils", "Title",
 CellChangeTimes->{{3.776600831050974*^9, 3.7766008318453026`*^9}, {
  3.776723290818482*^9, 3.7767232961055384`*^9}}],

Cell["Adam Rumpf, 3/15/2016", "Text",
 CellChangeTimes->{{3.7766008347881403`*^9, 3.776600838290375*^9}, {
  3.776723302901619*^9, 3.7767233184737387`*^9}}],

Cell[CellGroupData[{

Cell["Introduction", "Section",
 CellChangeTimes->{{3.7766008459498987`*^9, 3.776600848547045*^9}}],

Cell[TextData[{
 "This program is mostly meant as a joke. It displays a man with a tiny angel \
and devil on each shoulder, each of which has a tinier angel and devil on \
each shoulder, and so on. The main function ",
 StyleBox["combine[]", "Code"],
 " accepts (in order): a graphics object for the base, a graphics object for \
each left shoulder, a graphics object for each right shoulder, relative \
coordinates for the left child, relative coordinates for the right child, a \
scaling factor for the left child, a scaling factor for the right child, and \
a number of generations of children to include. There is also a Manipulate \
environment defined below which allows these elements to be adjusted with \
sliders and by clicking and dragging to position."
}], "Text",
 CellChangeTimes->{{3.776600856235587*^9, 3.776600860481224*^9}, {
  3.776723957039238*^9, 3.7767241560890017`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["Code", "Section",
 CellChangeTimes->{{3.776600864408964*^9, 3.7766008650447807`*^9}}],

Cell[CellGroupData[{

Cell["Initialization", "Subsection",
 CellChangeTimes->{{3.776600871130811*^9, 3.776600873087188*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{"Graphics", " ", "objects", " ", "for", " ", "a", " ", "man"}], 
    ",", " ", "angel", ",", " ", 
    RowBox[{"and", " ", 
     RowBox[{"devil", "."}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"man", "=", 
     RowBox[{"Graphics", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Opacity", "[", "0", "]"}], ",", 
        RowBox[{"Rectangle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "0.7"}], ",", "0"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.7", ",", "1.5"}], "}"}]}], "]"}], ",", 
        RowBox[{"Opacity", "[", "1", "]"}], ",", "LightGray", ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0.9"}], "}"}], ",", "0.25"}], "]"}], ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0.5"}], "}"}], ",", "0.25"}], "]"}], ",", 
        RowBox[{"Rectangle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "0.25"}], ",", "0"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.25", ",", "0.5"}], "}"}]}], "]"}]}], "}"}], "]"}]}], 
    ";"}], "\n", 
   RowBox[{
    RowBox[{"angel", "=", 
     RowBox[{"Graphics", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Opacity", "[", "0", "]"}], ",", 
        RowBox[{"Rectangle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "0.7"}], ",", "0"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.7", ",", "1.5"}], "}"}]}], "]"}], ",", 
        RowBox[{"Opacity", "[", "1", "]"}], ",", "LightBlue", ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0.9"}], "}"}], ",", "0.25"}], "]"}], ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0.5"}], "}"}], ",", "0.25"}], "]"}], ",", 
        RowBox[{"Rectangle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "0.25"}], ",", "0"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.25", ",", "0.5"}], "}"}]}], "]"}], ",", 
        RowBox[{"Polygon", "[", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{"0.15", ",", "0.6"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{"0.55", ",", "1"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{"0.5", ",", "0.1"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{"0.15", ",", "0.4"}], "}"}]}], "}"}], "]"}], ",", 
        RowBox[{"Polygon", "[", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.15"}], ",", "0.6"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.55"}], ",", "1"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.5"}], ",", "0.1"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.15"}], ",", "0.4"}], "}"}]}], "}"}], "]"}], ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "1.25"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.3", ",", "0.075"}], "}"}]}], "]"}], ",", "White", ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "1.25"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.2", ",", "0.0375"}], "}"}]}], "]"}]}], "}"}], "]"}]}], 
    ";"}], "\n", 
   RowBox[{
    RowBox[{"devil", "=", 
     RowBox[{"Graphics", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Opacity", "[", "0", "]"}], ",", 
        RowBox[{"Rectangle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "0.7"}], ",", "0"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.7", ",", "1.5"}], "}"}]}], "]"}], ",", 
        RowBox[{"Opacity", "[", "1", "]"}], ",", "LightRed", ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0.9"}], "}"}], ",", "0.25"}], "]"}], ",", 
        RowBox[{"Disk", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{"0", ",", "0.5"}], "}"}], ",", "0.25"}], "]"}], ",", 
        RowBox[{"Rectangle", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "0.25"}], ",", "0"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.25", ",", "0.5"}], "}"}]}], "]"}], ",", 
        RowBox[{"Polygon", "[", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{"0", ",", "1"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{"0.3", ",", "1.2"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{"0.1", ",", "0.8"}], "}"}]}], "}"}], "]"}], ",", 
        RowBox[{"Polygon", "[", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{"0", ",", "1"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.3"}], ",", "1.2"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.1"}], ",", "0.8"}], "}"}]}], "}"}], "]"}], ",", 
        RowBox[{"Annulus", "[", 
         RowBox[{
          RowBox[{"{", 
           RowBox[{
            RowBox[{"-", "0.1"}], ",", "0.55"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"0.45", ",", "0.5"}], "}"}], ",", 
          RowBox[{"{", 
           RowBox[{"Pi", ",", 
            RowBox[{"3", 
             RowBox[{"Pi", "/", "2"}]}]}], "}"}]}], "]"}], ",", 
        RowBox[{"Polygon", "[", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.65"}], ",", "0.5"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.5"}], ",", "0.5"}], "}"}], ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{"-", "0.575"}], ",", "0.65"}], "}"}]}], "}"}], "]"}]}], 
       "}"}], "]"}]}], ";"}]}]}]], "Input",
 CellChangeTimes->{{3.7766008761831923`*^9, 3.776600882799075*^9}, {
  3.7767233938855286`*^9, 3.7767234415264635`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{
    RowBox[{
    "Given", " ", "three", " ", "graphics", " ", "objects", " ", "b"}], ",", 
    " ", "l", ",", " ", 
    RowBox[{"and", " ", "r", " ", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"for", " ", "base"}], ",", " ", "left", ",", " ", 
       RowBox[{"and", " ", "right"}]}], ")"}]}], ",", " ", 
    RowBox[{
    "and", " ", "given", " ", "relative", " ", "coordinates", " ", "cl", " ", 
     "and", " ", "cr", " ", 
     RowBox[{"(", 
      RowBox[{"for", " ", "left", " ", "and", " ", "right"}], ")"}]}], ",", 
    " ", 
    RowBox[{
    "and", " ", "given", " ", "scaling", " ", "factors", " ", "sl", " ", 
     "and", " ", "sr"}], ",", " ", 
    RowBox[{
    "generates", " ", "a", " ", "graphics", " ", "object", " ", "containing", 
     " ", "all", " ", "3.", "  ", "The", " ", "optional", " ", "argument", 
     " ", "n", " ", "allows", " ", "for", " ", "recursively", " ", "applying",
      " ", "combine", " ", "n", " ", 
     RowBox[{"times", "."}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"combine", "[", 
     RowBox[{
     "b_", ",", "l_", ",", "r_", ",", "cl_", ",", "cr_", ",", "sl_", ",", 
      "sr_", ",", "1"}], "]"}], ":=", 
    RowBox[{"Graphics", "[", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"b", "/.", 
        RowBox[{"Graphics", "\[Rule]", "Identity"}]}], ",", 
       RowBox[{
        RowBox[{"Translate", "[", 
         RowBox[{
          RowBox[{"Scale", "[", 
           RowBox[{"l", ",", "sl"}], "]"}], ",", "cl"}], "]"}], "/.", 
        RowBox[{"Graphics", "\[Rule]", "Identity"}]}], ",", 
       RowBox[{
        RowBox[{"Translate", "[", 
         RowBox[{
          RowBox[{"Scale", "[", 
           RowBox[{"r", ",", "sr"}], "]"}], ",", "cr"}], "]"}], "/.", 
        RowBox[{"Graphics", "\[Rule]", "Identity"}]}]}], "}"}], "]"}]}], ";", 
   RowBox[{
    RowBox[{"combine", "[", 
     RowBox[{
     "b_", ",", "l_", ",", "r_", ",", "cl_", ",", "cr_", ",", "sl_", ",", 
      "sr_", ",", "n_"}], "]"}], ":=", 
    RowBox[{"combine", "[", 
     RowBox[{"b", ",", 
      RowBox[{"combine", "[", 
       RowBox[{
       "l", ",", "l", ",", "r", ",", "cl", ",", "cr", ",", "sl", ",", "sr", 
        ",", 
        RowBox[{"n", "-", "1"}]}], "]"}], ",", 
      RowBox[{"combine", "[", 
       RowBox[{
       "r", ",", "l", ",", "r", ",", "cl", ",", "cr", ",", "sl", ",", "sr", 
        ",", 
        RowBox[{"n", "-", "1"}]}], "]"}], ",", "cl", ",", "cr", ",", "sl", 
      ",", "sr", ",", "1"}], "]"}]}]}]}]], "Input",
 CellChangeTimes->{{3.667019751639427*^9, 3.667019821344244*^9}, {
   3.6670198655708504`*^9, 3.6670199102652264`*^9}, {3.6670200473246202`*^9, 
   3.6670200699619837`*^9}, {3.667020109165599*^9, 3.667020196020652*^9}, {
   3.6670205856065397`*^9, 3.6670207139360676`*^9}, {3.6670207525172634`*^9, 
   3.6670207545171165`*^9}, 3.6670208091392407`*^9, {3.66702136562683*^9, 
   3.6670213692620153`*^9}, 3.667021544761167*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell["Demonstration", "Subsection",
 CellChangeTimes->{{3.7766008885632277`*^9, 3.7766008904796133`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"Single", " ", 
    RowBox[{"angel", "/", "devil"}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{"combine", "[", 
   RowBox[{"man", ",", "devil", ",", "angel", ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "0.6"}], ",", "0.5"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0.6", ",", "0.5"}], "}"}], ",", "0.4", ",", "0.4", ",", "1"}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.7766008920271177`*^9, 3.7766008970415297`*^9}, {
  3.776723486957458*^9, 3.776723494539711*^9}}],

Cell[BoxData[
 GraphicsBox[{{
    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
    {GrayLevel[0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
     DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}]}}, 
   GeometricTransformationBox[GeometricTransformationBox[{
      {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
      {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
       DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
       PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
       PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
       InterpretationBox[
        FilledCurveBox[
         BSplineCurve[{{-0.6, 0.55}, {-0.6, 0.050000000000000044`}, {-0.1, 
          0.050000000000000044`}, {-0.1, 0.07500000000000001}, {-0.1, 
          0.10000000000000003`}, {-0.55, 0.10000000000000003`}, {-0.55, 
          0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
          SplineKnots -> {
           0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], Rational[
            1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
          SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, SplineDegree -> 
          2]],
        Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
       PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, {{{0.4, 
      0.}, {0., 0.4}}, Center}], {-0.6, 0.5}], 
   GeometricTransformationBox[GeometricTransformationBox[{
      {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
      {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
       DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
       PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
       PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 0.4}}], 
       DiskBox[{0, 1.25}, {0.3, 0.075}], 
       {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{0.4, 0.}, {0., 
      0.4}}, Center}], {0.6, 0.5}]}]], "Output",
 CellChangeTimes->{3.776724055472574*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"7", " ", "layers", " ", "of", " ", 
    RowBox[{"angels", "/", "devils"}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{"combine", "[", 
   RowBox[{"man", ",", "devil", ",", "angel", ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "0.75"}], ",", "0.5"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0.75", ",", "0.5"}], "}"}], ",", "0.4", ",", "0.4", ",", "7"}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.776723502908312*^9, 3.776723509887644*^9}, {
  3.776724179870575*^9, 3.776724208588749*^9}}],

Cell[BoxData[
 GraphicsBox[{{
    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
    {GrayLevel[0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
     DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}]}}, 
   GeometricTransformationBox[GeometricTransformationBox[{{
       {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
       {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
        DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
        PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
        PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
        InterpretationBox[
         FilledCurveBox[
          BSplineCurve[{{-0.6, 0.55}, {-0.6, 0.050000000000000044`}, {-0.1, 
           0.050000000000000044`}, {-0.1, 0.07500000000000001}, {-0.1, 
           0.10000000000000003`}, {-0.55, 0.10000000000000003`}, {-0.55, 
           0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
           SplineKnots -> {
            0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], Rational[
             1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
           SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, SplineDegree -> 
           2]],
         Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
        PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
           PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
           
           InterpretationBox[
            FilledCurveBox[
             BSplineCurve[{{-0.6, 0.55}, {-0.6, 0.050000000000000044`}, {-0.1,
               0.050000000000000044`}, {-0.1, 0.07500000000000001}, {-0.1, 
              0.10000000000000003`}, {-0.55, 0.10000000000000003`}, {-0.55, 
              0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
              SplineKnots -> {
               0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
              SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
              SplineDegree -> 2]],
            Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
           PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, 
            Center}], {-0.75, 0.5}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {
          0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
           PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 0.4}}], 
           DiskBox[{0, 1.25}, {0.3, 0.075}], 
           {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, 
            Center}], {-0.75, 0.5}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {
          0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{
      0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
   GeometricTransformationBox[GeometricTransformationBox[{{
       {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
       {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
        DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
        PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
        PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 0.4}}], 
        DiskBox[{0, 1.25}, {0.3, 0.075}], 
        {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
           PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
           
           InterpretationBox[
            FilledCurveBox[
             BSplineCurve[{{-0.6, 0.55}, {-0.6, 0.050000000000000044`}, {-0.1,
               0.050000000000000044`}, {-0.1, 0.07500000000000001}, {-0.1, 
              0.10000000000000003`}, {-0.55, 0.10000000000000003`}, {-0.55, 
              0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
              SplineKnots -> {
               0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
              SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
              SplineDegree -> 2]],
            Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
           PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, 
            Center}], {-0.75, 0.5}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {
          0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
           PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 0.4}}], 
           DiskBox[{0, 1.25}, {0.3, 0.075}], 
           {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, 
            Center}], {-0.75, 0.5}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {-0.75, 0.5}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                   GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {-0.75, 0.5}], 
               GeometricTransformationBox[GeometricTransformationBox[{{
                   {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                   {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}},
                     GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {-0.75, 0.5}], 
                  GeometricTransformationBox[GeometricTransformationBox[{{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
                    GeometricTransformationBox[GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[1, 0.85, 0.85], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                    PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                    
                    InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                    PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                    0.5}], GeometricTransformationBox[
                    GeometricTransformationBox[{
                    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                    {RGBColor[0.87, 0.94, 1], Opacity[1], 
                    DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                    RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                    PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                    PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15,
                     0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                    {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                    0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 
                    0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {
                  0., 0.4}}, Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}},
                Center}], {0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {
          0.75, 0.5}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}, {{{
      0.4, 0.}, {0., 0.4}}, Center}], {0.75, 0.5}]}]], "Output",
 CellChangeTimes->{{3.7767242007504826`*^9, 3.7767242101106863`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"Unbalanced", " ", 
    RowBox[{"angels", "/", "devils"}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{"combine", "[", 
   RowBox[{"man", ",", "devil", ",", "angel", ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "0.75"}], ",", "0.4"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"0.75", ",", "0.7"}], "}"}], ",", "0.4", ",", "0.5", ",", "5"}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.776724216930798*^9, 3.776724272346969*^9}}],

Cell[BoxData[
 GraphicsBox[{{
    {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
    {GrayLevel[0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
     DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}]}}, 
   GeometricTransformationBox[GeometricTransformationBox[{{
       {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
       {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
        DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
        PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
        PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
        InterpretationBox[
         FilledCurveBox[
          BSplineCurve[{{-0.6, 0.55}, {-0.6, 0.050000000000000044`}, {-0.1, 
           0.050000000000000044`}, {-0.1, 0.07500000000000001}, {-0.1, 
           0.10000000000000003`}, {-0.55, 0.10000000000000003`}, {-0.55, 
           0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
           SplineKnots -> {
            0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], Rational[
             1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
           SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, SplineDegree -> 
           2]],
         Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
        PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
           PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
           
           InterpretationBox[
            FilledCurveBox[
             BSplineCurve[{{-0.6, 0.55}, {-0.6, 0.050000000000000044`}, {-0.1,
               0.050000000000000044`}, {-0.1, 0.07500000000000001}, {-0.1, 
              0.10000000000000003`}, {-0.55, 0.10000000000000003`}, {-0.55, 
              0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
              SplineKnots -> {
               0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
              SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
              SplineDegree -> 2]],
            Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
           PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 0.}, {0., 
            0.4}}, Center}], {-0.75, 0.4}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 0.}, {0., 
            0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 0.}, {0., 0.4}}, 
         Center}], {-0.75, 0.4}], 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
           PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 0.4}}], 
           DiskBox[{0, 1.25}, {0.3, 0.075}], 
           {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 0.}, {0., 
            0.4}}, Center}], {-0.75, 0.4}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 0.}, {0., 
            0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 0.}, {0., 0.5}}, 
         Center}], {0.75, 0.7}]}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
    0.4}], GeometricTransformationBox[GeometricTransformationBox[{{
       {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
       {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
        DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
        PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
        PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 0.4}}], 
        DiskBox[{0, 1.25}, {0.3, 0.075}], 
        {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
           PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
           
           InterpretationBox[
            FilledCurveBox[
             BSplineCurve[{{-0.6, 0.55}, {-0.6, 0.050000000000000044`}, {-0.1,
               0.050000000000000044`}, {-0.1, 0.07500000000000001}, {-0.1, 
              0.10000000000000003`}, {-0.55, 0.10000000000000003`}, {-0.55, 
              0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
              SplineKnots -> {
               0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
              SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
              SplineDegree -> 2]],
            Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
           PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 0.}, {0., 
            0.4}}, Center}], {-0.75, 0.4}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 0.}, {0., 
            0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 0.}, {0., 0.4}}, 
         Center}], {-0.75, 0.4}], 
      GeometricTransformationBox[GeometricTransformationBox[{{
          {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
          {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
           DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
           PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
           PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 0.4}}], 
           DiskBox[{0, 1.25}, {0.3, 0.075}], 
           {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
              PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
              
              InterpretationBox[
               FilledCurveBox[
                BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                 0.050000000000000044`}, {-0.1, 0.050000000000000044`}, {-0.1,
                  0.07500000000000001}, {-0.1, 0.10000000000000003`}, {-0.55, 
                 0.10000000000000003`}, {-0.55, 0.55}, {-0.5750000000000001, 
                 0.55}, {-0.6, 0.55}}, 
                 SplineKnots -> {
                  0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                   Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                 SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                 SplineDegree -> 2]],
               Annulus[{-0.1, 0.55}, {0.45, 0.5}, {Pi, Rational[3, 2] Pi}]], 
              PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 0.}, {0., 
            0.4}}, Center}], {-0.75, 0.4}], 
         GeometricTransformationBox[GeometricTransformationBox[{{
             {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
             {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25], 
              DiskBox[{0, 0.5}, 0.25], RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
              PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 0.4}}], 
              PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
              {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[1, 0.85, 0.85], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                 PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                 
                 InterpretationBox[
                  FilledCurveBox[
                   BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                  
                  Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                   Pi, Rational[3, 2] Pi}]], 
                 PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 0.65}}]}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.4, 
               0.}, {0., 0.4}}, Center}], {-0.75, 0.4}], 
            GeometricTransformationBox[GeometricTransformationBox[{{
                {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                {RGBColor[0.87, 0.94, 1], Opacity[1], DiskBox[{0, 0.9}, 0.25],
                  DiskBox[{0, 0.5}, 0.25], 
                 RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                 PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                   0.4}}], 
                 PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                   0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                 {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, 
               GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[1, 0.85, 0.85], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0, 1}, {0.3, 1.2}, {0.1, 0.8}}], 
                   PolygonBox[{{0, 1}, {-0.3, 1.2}, {-0.1, 0.8}}], 
                   
                   InterpretationBox[
                    FilledCurveBox[
                    BSplineCurve[{{-0.6, 0.55}, {-0.6, 
                    0.050000000000000044`}, {-0.1, 
                    0.050000000000000044`}, {-0.1, 
                    0.07500000000000001}, {-0.1, 
                    0.10000000000000003`}, {-0.55, 
                    0.10000000000000003`}, {-0.55, 
                    0.55}, {-0.5750000000000001, 0.55}, {-0.6, 0.55}}, 
                    SplineKnots -> {
                    0, 0, 0, Rational[1, 4], Rational[1, 4], Rational[1, 2], 
                    Rational[1, 2], Rational[3, 4], Rational[3, 4], 1, 1, 1}, 
                    SplineWeights -> {1., 1., 2, 2, 2, 1., 1., 1., 1.}, 
                    SplineDegree -> 2]],
                    
                    Annulus[{-0.1, 0.55}, {0.45, 0.5}, {
                    Pi, Rational[3, 2] Pi}]], 
                   PolygonBox[{{-0.65, 0.5}, {-0.5, 0.5}, {-0.575, 
                    0.65}}]}}, {{{0.4, 0.}, {0., 0.4}}, Center}], {-0.75, 
                0.4}], GeometricTransformationBox[GeometricTransformationBox[{
                  {Opacity[0], RectangleBox[{-0.7, 0}, {0.7, 1.5}]}, 
                  {RGBColor[0.87, 0.94, 1], Opacity[1], 
                   DiskBox[{0, 0.9}, 0.25], DiskBox[{0, 0.5}, 0.25], 
                   RectangleBox[{-0.25, 0}, {0.25, 0.5}], 
                   PolygonBox[{{0.15, 0.6}, {0.55, 1}, {0.5, 0.1}, {0.15, 
                    0.4}}], 
                   PolygonBox[{{-0.15, 0.6}, {-0.55, 1}, {-0.5, 0.1}, {-0.15, 
                    0.4}}], DiskBox[{0, 1.25}, {0.3, 0.075}], 
                   {GrayLevel[1], DiskBox[{0, 1.25}, {0.2, 0.0375}]}}}, {{{
                  0.5, 0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 
               0.}, {0., 0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 0.}, {0., 
            0.5}}, Center}], {0.75, 0.7}]}, {{{0.5, 0.}, {0., 0.5}}, 
         Center}], {0.75, 0.7}]}, {{{0.5, 0.}, {0., 0.5}}, Center}], {0.75, 
    0.7}]}]], "Output",
 CellChangeTimes->{{3.7767242366538286`*^9, 3.7767242729469624`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", " ", 
   RowBox[{"Adjustable", " ", 
    RowBox[{"angels", "/", "devils"}]}], " ", "*)"}], "\[IndentingNewLine]", 
  RowBox[{"Manipulate", "[", 
   RowBox[{
    RowBox[{"combine", "[", 
     RowBox[{
     "man", ",", "devil", ",", "angel", ",", "left", ",", "right", ",", "sl", 
      ",", "sr", ",", "n"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"sl", ",", "0.4", ",", "\"\<devil scaling\>\""}], "}"}], ",", 
      "0.1", ",", "1.5"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"sr", ",", "0.4", ",", "\"\<angel scaling\>\""}], "}"}], ",", 
      "0.1", ",", "1.5"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"left", ",", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "0.6"}], ",", "0.5"}], "}"}]}], "}"}], ",", 
      "Locator"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"right", ",", 
        RowBox[{"{", 
         RowBox[{"0.6", ",", "0.5"}], "}"}]}], "}"}], ",", "Locator"}], "}"}],
     ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"n", ",", "2", ",", "\"\<rows\>\""}], "}"}], ",", "1", ",", 
      "6", ",", "1"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.776723517479953*^9, 3.77672352386626*^9}, {
  3.776724287203013*^9, 3.7767243101796455`*^9}}],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`left$$ = {-0.742, 
    1.3699999999999999`}, $CellContext`n$$ = 3, $CellContext`right$$ = {0.756,
     0.7799999999999999}, $CellContext`sl$$ = 
    0.44000000000000006`, $CellContext`sr$$ = 0.692, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`sl$$], 0.4, "devil scaling"}, 0.1, 1.5}, {{
       Hold[$CellContext`sr$$], 0.4, "angel scaling"}, 0.1, 1.5}, {{
       Hold[$CellContext`left$$], {-0.6, 0.5}}, Automatic}, {{
       Hold[$CellContext`right$$], {0.6, 0.5}}, Automatic}, {{
       Hold[$CellContext`n$$], 2, "rows"}, 1, 6, 1}}, Typeset`size$$ = {
    354., {213., 219.}}, Typeset`update$$ = 0, Typeset`initDone$$, 
    Typeset`skipInitDone$$ = True, $CellContext`sl$5010$$ = 
    0, $CellContext`sr$5011$$ = 0, $CellContext`n$5012$$ = 0}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`left$$ = {-0.6, 0.5}, $CellContext`n$$ = 
        2, $CellContext`right$$ = {0.6, 0.5}, $CellContext`sl$$ = 
        0.4, $CellContext`sr$$ = 0.4}, "ControllerVariables" :> {
        Hold[$CellContext`sl$$, $CellContext`sl$5010$$, 0], 
        Hold[$CellContext`sr$$, $CellContext`sr$5011$$, 0], 
        Hold[$CellContext`n$$, $CellContext`n$5012$$, 0]}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> $CellContext`combine[$CellContext`man, $CellContext`devil, \
$CellContext`angel, $CellContext`left$$, $CellContext`right$$, \
$CellContext`sl$$, $CellContext`sr$$, $CellContext`n$$], 
      "Specifications" :> {{{$CellContext`sl$$, 0.4, "devil scaling"}, 0.1, 
         1.5}, {{$CellContext`sr$$, 0.4, "angel scaling"}, 0.1, 
         1.5}, {{$CellContext`left$$, {-0.6, 0.5}}, Automatic, ControlType -> 
         Locator}, {{$CellContext`right$$, {0.6, 0.5}}, Automatic, 
         ControlType -> Locator}, {{$CellContext`n$$, 2, "rows"}, 1, 6, 1}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{411., {291., 297.}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.776724170365857*^9, 3.776724280899027*^9, 
  3.7767243113752627`*^9}]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
WindowSize->{759, 833},
WindowMargins->{{83, Automatic}, {Automatic, 42}},
FrontEndVersion->"10.4 for Microsoft Windows (64-bit) (April 11, 2016)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 170, 2, 90, "Title"],
Cell[753, 26, 156, 2, 30, "Text"],
Cell[CellGroupData[{
Cell[934, 32, 99, 1, 63, "Section"],
Cell[1036, 35, 893, 14, 163, "Text"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1966, 54, 91, 1, 63, "Section"],
Cell[CellGroupData[{
Cell[2082, 59, 102, 1, 43, "Subsection"],
Cell[2187, 62, 6372, 181, 352, "Input"],
Cell[8562, 245, 2991, 73, 252, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[11590, 323, 105, 1, 35, "Subsection"],
Cell[CellGroupData[{
Cell[11720, 328, 551, 14, 52, "Input"],
Cell[12274, 344, 1990, 34, 363, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[14301, 383, 572, 14, 52, "Input"],
Cell[14876, 399, 286320, 4835, 283, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[301233, 5239, 506, 13, 52, "Input"],
Cell[301742, 5254, 66848, 1127, 348, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[368627, 6386, 1410, 42, 112, "Input"],
Cell[370040, 6430, 2865, 52, 605, "Output"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)